src/include/misc.h

#ifndef MISC_H
#define MISC_H

/*
 *  Copyright (C) 2003-2007  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright  
 *     notice, this list of conditions and the following disclaimer in the 
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE   
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *
 *
 *  $Id: misc.h,v 1.257 2007/06/15 17:12:31 debug Exp $
 *
 *  Misc. definitions for gxemul.
 */


#include <sys/types.h>
#include <inttypes.h>

/*
 *  ../../config.h contains #defines set by the configure script. Some of these
 *  might reduce speed of the emulator, so don't enable them unless you
 *  need them.
 */

#include "../../config.h"


#ifdef NO_C99_PRINTF_DEFINES
/*
 *  This is a SUPER-UGLY HACK which happens to work on some machines.
 *  The correct solution is to upgrade your compiler to C99.
 */
#ifdef NO_C99_64BIT_LONGLONG
#define PRIi8           "i"
#define PRIi16          "i"
#define PRIi32          "i"
#define PRIi64          "lli"
#define PRIx8           "x"
#define PRIx16          "x"
#define PRIx32          "x"
#define PRIx64          "llx"
#else
#define PRIi8           "i"
#define PRIi16          "i"
#define PRIi32          "i"
#define PRIi64          "li"
#define PRIx8           "x"
#define PRIx16          "x"
#define PRIx32          "x"
#define PRIx64          "lx"
#endif
#endif


#ifdef NO_MAP_ANON
#ifdef mmap
#undef mmap
#endif
#include <fcntl.h>
#include <stdlib.h>
#include <sys/mman.h>
static void *no_map_anon_mmap(void *addr, size_t len, int prot, int flags,
        int nonsense_fd, off_t offset)
{
        void *p;
        int fd = open("/dev/zero", O_RDWR);
        if (fd < 0) {
                fprintf(stderr, "Could not open /dev/zero\n");
                exit(1);
        }

        printf("addr=%p len=%lli prot=0x%x flags=0x%x nonsense_fd=%i "
            "offset=%16lli\n", addr, (long long) len, prot, flags,
            nonsense_fd, (long long) offset);

        p = mmap(addr, len, prot, flags, fd, offset);

        printf("p = %p\n", p);

        /*  TODO: Close the descriptor?  */
        return p;
}
#define mmap no_map_anon_mmap
#endif


struct cpu;
struct emul;
struct machine;
struct memory;


#define NO_BYTE_ORDER_OVERRIDE          -1
#define EMUL_UNDEFINED_ENDIAN           0
#define EMUL_LITTLE_ENDIAN              1
#define EMUL_BIG_ENDIAN                 2

#ifdef HOST_LITTLE_ENDIAN
#define LE16_TO_HOST(x)     (x)
#define BE16_TO_HOST(x)     ((((x) & 0xff00) >> 8) | (((x)&0xff) << 8))
#else
#define LE16_TO_HOST(x)     ((((x) & 0xff00) >> 8) | (((x)&0xff) << 8))
#define BE16_TO_HOST(x)     (x)
#endif

#ifdef HOST_LITTLE_ENDIAN
#define LE32_TO_HOST(x)     (x)
#define BE32_TO_HOST(x)     ((((x) & 0xff000000) >> 24) | (((x)&0xff) << 24) | \
                             (((x) & 0xff0000) >> 8) | (((x) & 0xff00) << 8))
#else
#define LE32_TO_HOST(x)     ((((x) & 0xff000000) >> 24) | (((x)&0xff) << 24) | \
                             (((x) & 0xff0000) >> 8) | (((x) & 0xff00) << 8))
#define BE32_TO_HOST(x)     (x)
#endif

#ifdef HOST_LITTLE_ENDIAN
#define LE64_TO_HOST(x)     (x)
#define BE64_TO_HOST(x)     (   (((x) >> 56) & 0xff) +                  \
                                ((((x) >> 48) & 0xff) << 8) +           \
                                ((((x) >> 40) & 0xff) << 16) +          \
                                ((((x) >> 32) & 0xff) << 24) +          \
                                ((((x) >> 24) & 0xff) << 32) +          \
                                ((((x) >> 16) & 0xff) << 40) +          \
                                ((((x) >> 8) & 0xff) << 48) +           \
                                (((x) & 0xff) << 56)  )
#else
#define BE64_TO_HOST(x)     (x)
#define LE64_TO_HOST(x)     (   (((x) >> 56) & 0xff) +                  \
                                ((((x) >> 48) & 0xff) << 8) +           \
                                ((((x) >> 40) & 0xff) << 16) +          \
                                ((((x) >> 32) & 0xff) << 24) +          \
                                ((((x) >> 24) & 0xff) << 32) +          \
                                ((((x) >> 16) & 0xff) << 40) +          \
                                ((((x) >> 8) & 0xff) << 48) +           \
                                (((x) & 0xff) << 56)  )
#endif


/*  Debug stuff:  */
#define DEBUG_BUFSIZE           1024
#define DEBUG_INDENTATION       4


#ifdef HAVE___FUNCTION__

#define FAILURE(error_msg)                                      {       \
                char where_msg[400];                                    \
                snprintf(where_msg, sizeof(where_msg),                  \
                    "%s, line %i, function '%s'\n",                     \
                    __FILE__, __LINE__, __FUNCTION__);                  \
                fprintf(stderr, "%s: %s\n", error_msg, where_msg);      \
                exit(1);                                                \
        }

#else

#define FAILURE(error_msg)                                      {       \
                char where_msg[400];                                    \
                snprintf(where_msg, sizeof(where_msg),                  \
                    "%s, line %i\n", __FILE__, __LINE__);               \
                fprintf(stderr, "%s: %s\n", error_msg, where_msg);      \
                exit(1);                                                \
        }

#endif  /*  !HAVE___FUNCTION__  */


#define CHECK_ALLOCATION(ptr)                                   {       \
                if ((ptr) == NULL)                                      \
                        FAILURE("Out of memory");                       \
        }


/*  bootblock.c:  */
int load_bootblock(struct machine *m, struct cpu *cpu,
        int *n_loadp, char ***load_namesp);


/*  bootblock_apple.c:  */
int apple_load_bootblock(struct machine *m, struct cpu *cpu,
        int disk_id, int disk_type, int *n_loadp, char ***load_namesp);


/*  bootblock_iso9660.c:  */
int iso_load_bootblock(struct machine *m, struct cpu *cpu,
        int disk_id, int disk_type, int iso_type, unsigned char *buf,
        int *n_loadp, char ***load_namesp);


/*  dec_prom.c:  */
int decstation_prom_emul(struct cpu *cpu);


/*  dreamcast.c:  */
void dreamcast_machine_setup(struct machine *);
int dreamcast_emul(struct cpu *cpu);


/*  dreamcast_scramble.c:  */
void dreamcast_descramble(char *from, char *to);


/*  file.c:  */
int file_n_executables_loaded(void);
void file_load(struct machine *machine, struct memory *mem,
        char *filename, uint64_t *entrypointp,
        int arch, uint64_t *gpp, int *byte_order, uint64_t *tocp);


/*  main.c:  */
void debug_indentation(int diff);
void debug(char *fmt, ...);
void fatal(char *fmt, ...);


/*  misc.c:  */
unsigned long long mystrtoull(const char *s, char **endp, int base);
int mymkstemp(char *template);
#ifdef USE_STRLCPY_REPLACEMENTS
size_t mystrlcpy(char *dst, const char *src, size_t size);
size_t mystrlcat(char *dst, const char *src, size_t size);
#endif
void print_separator_line(void);


/*  mvmeprom.c:  */
void mvmeprom_init(struct machine *machine);
int mvmeprom_emul(struct cpu *cpu);


/*  ps2_bios.c:  */
int playstation2_sifbios_emul(struct cpu *cpu);


/*  sh_ipl_g.c:  */
void sh_ipl_g_emul_init(struct machine *machine);
int sh_ipl_g_emul(struct cpu *);


/*  yamon.c:  */
void yamon_machine_setup(struct machine *machine, uint64_t env);
int yamon_emul(struct cpu *);


#endif  /*  MISC_H  */
1	dpavlin	4	#ifndef MISC_H
2			#define MISC_H
3
4			/*
5	dpavlin	34	* Copyright (C) 2003-2007 Anders Gavare. All rights reserved.
6	dpavlin	4	*
7			* Redistribution and use in source and binary forms, with or without
8			* modification, are permitted provided that the following conditions are met:
9			*
10			* 1. Redistributions of source code must retain the above copyright
11			* notice, this list of conditions and the following disclaimer.
12			* 2. Redistributions in binary form must reproduce the above copyright
13			* notice, this list of conditions and the following disclaimer in the
14			* documentation and/or other materials provided with the distribution.
15			* 3. The name of the author may not be used to endorse or promote products
16			* derived from this software without specific prior written permission.
17			*
18			* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19			* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20			* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21			* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22			* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23			* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24			* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25			* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26			* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27			* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28			* SUCH DAMAGE.
29			*
30			*
31	dpavlin	42	* $Id: misc.h,v 1.257 2007/06/15 17:12:31 debug Exp $
32	dpavlin	4	*
33			* Misc. definitions for gxemul.
34			*/
35
36
37			#include <sys/types.h>
38			#include <inttypes.h>
39
40			/*
41			* ../../config.h contains #defines set by the configure script. Some of these
42			* might reduce speed of the emulator, so don't enable them unless you
43			* need them.
44			*/
45
46			#include "../../config.h"
47
48	dpavlin	24
49			#ifdef NO_C99_PRINTF_DEFINES
50			/*
51			* This is a SUPER-UGLY HACK which happens to work on some machines.
52			* The correct solution is to upgrade your compiler to C99.
53	dpavlin	4	*/
54	dpavlin	24	#ifdef NO_C99_64BIT_LONGLONG
55	dpavlin	32	#define PRIi8 "i"
56	dpavlin	24	#define PRIi16 "i"
57			#define PRIi32 "i"
58			#define PRIi64 "lli"
59	dpavlin	32	#define PRIx8 "x"
60	dpavlin	24	#define PRIx16 "x"
61			#define PRIx32 "x"
62			#define PRIx64 "llx"
63			#else
64	dpavlin	32	#define PRIi8 "i"
65	dpavlin	24	#define PRIi16 "i"
66			#define PRIi32 "i"
67			#define PRIi64 "li"
68	dpavlin	32	#define PRIx8 "x"
69	dpavlin	24	#define PRIx16 "x"
70			#define PRIx32 "x"
71			#define PRIx64 "lx"
72			#endif
73			#endif
74	dpavlin	4
75
76			#ifdef NO_MAP_ANON
77			#ifdef mmap
78			#undef mmap
79			#endif
80			#include <fcntl.h>
81			#include <stdlib.h>
82			#include <sys/mman.h>
83			static void no_map_anon_mmap(void addr, size_t len, int prot, int flags,
84			int nonsense_fd, off_t offset)
85			{
86			void *p;
87			int fd = open("/dev/zero", O_RDWR);
88			if (fd < 0) {
89			fprintf(stderr, "Could not open /dev/zero\n");
90			exit(1);
91			}
92
93			printf("addr=%p len=%lli prot=0x%x flags=0x%x nonsense_fd=%i "
94			"offset=%16lli\n", addr, (long long) len, prot, flags,
95			nonsense_fd, (long long) offset);
96
97			p = mmap(addr, len, prot, flags, fd, offset);
98
99			printf("p = %p\n", p);
100
101			/* TODO: Close the descriptor? */
102			return p;
103			}
104			#define mmap no_map_anon_mmap
105			#endif
106
107
108			struct cpu;
109			struct emul;
110			struct machine;
111			struct memory;
112
113
114	dpavlin	32	#define NO_BYTE_ORDER_OVERRIDE -1
115			#define EMUL_UNDEFINED_ENDIAN 0
116			#define EMUL_LITTLE_ENDIAN 1
117			#define EMUL_BIG_ENDIAN 2
118	dpavlin	4
119	dpavlin	22	#ifdef HOST_LITTLE_ENDIAN
120	dpavlin	30	#define LE16_TO_HOST(x) (x)
121	dpavlin	32	#define BE16_TO_HOST(x) ((((x) & 0xff00) >> 8) \| (((x)&0xff) << 8))
122	dpavlin	30	#else
123	dpavlin	32	#define LE16_TO_HOST(x) ((((x) & 0xff00) >> 8) \| (((x)&0xff) << 8))
124	dpavlin	30	#define BE16_TO_HOST(x) (x)
125			#endif
126
127			#ifdef HOST_LITTLE_ENDIAN
128	dpavlin	22	#define LE32_TO_HOST(x) (x)
129	dpavlin	32	#define BE32_TO_HOST(x) ((((x) & 0xff000000) >> 24) \| (((x)&0xff) << 24) \| \
130	dpavlin	22	(((x) & 0xff0000) >> 8) \| (((x) & 0xff00) << 8))
131			#else
132	dpavlin	32	#define LE32_TO_HOST(x) ((((x) & 0xff000000) >> 24) \| (((x)&0xff) << 24) \| \
133	dpavlin	22	(((x) & 0xff0000) >> 8) \| (((x) & 0xff00) << 8))
134			#define BE32_TO_HOST(x) (x)
135			#endif
136	dpavlin	4
137	dpavlin	32	#ifdef HOST_LITTLE_ENDIAN
138			#define LE64_TO_HOST(x) (x)
139			#define BE64_TO_HOST(x) ( (((x) >> 56) & 0xff) + \
140			((((x) >> 48) & 0xff) << 8) + \
141			((((x) >> 40) & 0xff) << 16) + \
142			((((x) >> 32) & 0xff) << 24) + \
143			((((x) >> 24) & 0xff) << 32) + \
144			((((x) >> 16) & 0xff) << 40) + \
145			((((x) >> 8) & 0xff) << 48) + \
146			(((x) & 0xff) << 56) )
147			#else
148			#define BE64_TO_HOST(x) (x)
149			#define LE64_TO_HOST(x) ( (((x) >> 56) & 0xff) + \
150			((((x) >> 48) & 0xff) << 8) + \
151			((((x) >> 40) & 0xff) << 16) + \
152			((((x) >> 32) & 0xff) << 24) + \
153			((((x) >> 24) & 0xff) << 32) + \
154			((((x) >> 16) & 0xff) << 40) + \
155			((((x) >> 8) & 0xff) << 48) + \
156			(((x) & 0xff) << 56) )
157			#endif
158	dpavlin	30
159	dpavlin	32
160	dpavlin	4	/* Debug stuff: */
161			#define DEBUG_BUFSIZE 1024
162	dpavlin	22	#define DEBUG_INDENTATION 4
163	dpavlin	4
164
165	dpavlin	42	#ifdef HAVE___FUNCTION__
166
167			#define FAILURE(error_msg) { \
168			char where_msg[400]; \
169			snprintf(where_msg, sizeof(where_msg), \
170			"%s, line %i, function '%s'\n", \
171			__FILE__, __LINE__, __FUNCTION__); \
172			fprintf(stderr, "%s: %s\n", error_msg, where_msg); \
173			exit(1); \
174			}
175
176			#else
177
178			#define FAILURE(error_msg) { \
179			char where_msg[400]; \
180			snprintf(where_msg, sizeof(where_msg), \
181			"%s, line %i\n", __FILE__, __LINE__); \
182			fprintf(stderr, "%s: %s\n", error_msg, where_msg); \
183			exit(1); \
184			}
185
186			#endif /* !HAVE___FUNCTION__ */
187
188
189			#define CHECK_ALLOCATION(ptr) { \
190			if ((ptr) == NULL) \
191			FAILURE("Out of memory"); \
192			}
193
194
195	dpavlin	36	/* bootblock.c: */
196			int load_bootblock(struct machine m, struct cpu cpu,
197			int n_loadp, char **load_namesp);
198
199
200			/* bootblock_apple.c: */
201			int apple_load_bootblock(struct machine m, struct cpu cpu,
202			int disk_id, int disk_type, int n_loadp, char **load_namesp);
203
204
205			/* bootblock_iso9660.c: */
206			int iso_load_bootblock(struct machine m, struct cpu cpu,
207			int disk_id, int disk_type, int iso_type, unsigned char *buf,
208			int n_loadp, char **load_namesp);
209
210
211	dpavlin	4	/* dec_prom.c: */
212			int decstation_prom_emul(struct cpu *cpu);
213
214
215	dpavlin	32	/* dreamcast.c: */
216			void dreamcast_machine_setup(struct machine *);
217			int dreamcast_emul(struct cpu *cpu);
218
219
220	dpavlin	34	/* dreamcast_scramble.c: */
221			void dreamcast_descramble(char from, char to);
222
223
224	dpavlin	4	/* file.c: */
225			int file_n_executables_loaded(void);
226			void file_load(struct machine machine, struct memory mem,
227			char filename, uint64_t entrypointp,
228			int arch, uint64_t gpp, int byte_order, uint64_t *tocp);
229
230
231			/* main.c: */
232			void debug_indentation(int diff);
233			void debug(char *fmt, ...);
234			void fatal(char *fmt, ...);
235	dpavlin	10
236
237			/* misc.c: */
238	dpavlin	4	unsigned long long mystrtoull(const char s, char *endp, int base);
239	dpavlin	10	int mymkstemp(char *template);
240			#ifdef USE_STRLCPY_REPLACEMENTS
241			size_t mystrlcpy(char dst, const char src, size_t size);
242			size_t mystrlcat(char dst, const char src, size_t size);
243			#endif
244	dpavlin	42	void print_separator_line(void);
245	dpavlin	4
246
247	dpavlin	42	/* mvmeprom.c: */
248			void mvmeprom_init(struct machine *machine);
249			int mvmeprom_emul(struct cpu *cpu);
250	dpavlin	4
251
252			/* ps2_bios.c: */
253			int playstation2_sifbios_emul(struct cpu *cpu);
254
255
256	dpavlin	36	/* sh_ipl_g.c: */
257			void sh_ipl_g_emul_init(struct machine *machine);
258			int sh_ipl_g_emul(struct cpu *);
259
260
261	dpavlin	10	/* yamon.c: */
262	dpavlin	32	void yamon_machine_setup(struct machine *machine, uint64_t env);
263			int yamon_emul(struct cpu *);
264	dpavlin	10
265
266	dpavlin	4	#endif /* MISC_H */