ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/Unix/sysdeps.h
Revision: 1.56
Committed: 2007-02-17T09:01:30Z (17 years, 4 months ago) by gbeauche
Content type: text/plain
Branch: MAIN
Changes since 1.55: +1 -0 lines
Log Message:
merge PPC_PROFILE_REGS_USE fixes from KPX branch

File Contents

# Content
1 /*
2 * sysdeps.h - System dependent definitions for Linux
3 *
4 * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 #ifndef SYSDEPS_H
22 #define SYSDEPS_H
23
24 #ifndef __STDC__
25 #error "Your compiler is not ANSI. Get a real one."
26 #endif
27
28 #include "config.h"
29 #include "user_strings_unix.h"
30
31 #ifndef STDC_HEADERS
32 #error "You don't have ANSI C header files."
33 #endif
34
35 #ifdef HAVE_UNISTD_H
36 # include <sys/types.h>
37 # include <unistd.h>
38 #endif
39
40 #include <netinet/in.h>
41 #include <assert.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <stddef.h>
45 #include <string.h>
46 #include <signal.h>
47
48 #ifdef HAVE_PTHREADS
49 # include <pthread.h>
50 #endif
51
52 #ifdef HAVE_FCNTL_H
53 # include <fcntl.h>
54 #endif
55
56 #ifdef TIME_WITH_SYS_TIME
57 # include <sys/time.h>
58 # include <time.h>
59 #else
60 # ifdef HAVE_SYS_TIME_H
61 # include <sys/time.h>
62 # else
63 # include <time.h>
64 # endif
65 #endif
66
67 // Fix offsetof() on FreeBSD and GCC >= 3.4
68 #if defined(__FreeBSD__) && defined(__cplusplus)
69 #undef offsetof
70 /* The cast to "char &" below avoids problems with user-defined
71 "operator &", which can appear in a POD type. */
72 #define offsetof(TYPE, MEMBER) \
73 (__offsetof__ (reinterpret_cast <size_t> \
74 (&reinterpret_cast <char &> \
75 (static_cast<TYPE *> (0)->MEMBER))))
76 #endif
77
78 // Define for external components
79 #define SHEEPSHAVER 1
80
81 // Always use Real Addressing mode on native architectures
82 // Otherwise, use Direct Addressing mode if NATMEM_OFFSET is set
83 #if !defined(EMULATED_PPC)
84 #define REAL_ADDRESSING 1
85 #include "ppc_asm.tmpl"
86 #elif defined(NATMEM_OFFSET)
87 #define DIRECT_ADDRESSING 1
88 #else
89 #define REAL_ADDRESSING 1
90 #endif
91
92 // Always use the complete non-stubs Ethernet driver
93 #define USE_ETHER_FULL_DRIVER 1
94
95 #define POWERPC_ROM 1
96
97 #if EMULATED_PPC
98 // Mac ROM is write protected when banked memory is used
99 #if REAL_ADDRESSING || DIRECT_ADDRESSING
100 # define ROM_IS_WRITE_PROTECTED 0
101 # define USE_SCRATCHMEM_SUBTERFUGE 1
102 #else
103 # define ROM_IS_WRITE_PROTECTED 1
104 #endif
105 // Configure PowerPC emulator
106 #define PPC_REENTRANT_JIT 1
107 #define PPC_CHECK_INTERRUPTS 1
108 #define PPC_DECODE_CACHE 1
109 #define PPC_FLIGHT_RECORDER 1
110 #define PPC_PROFILE_COMPILE_TIME 0
111 #define PPC_PROFILE_GENERIC_CALLS 1
112 #define PPC_PROFILE_REGS_USE 0
113 #define KPX_MAX_CPUS 1
114 #if ENABLE_DYNGEN
115 #define PPC_ENABLE_JIT 1
116 #endif
117 #if defined(__i386__) || defined(__x86_64__)
118 #define DYNGEN_ASM_OPTS 1
119 #endif
120 #else
121 // Mac ROM is write protected
122 #define ROM_IS_WRITE_PROTECTED 1
123 #define USE_SCRATCHMEM_SUBTERFUGE 0
124 #endif
125
126 // Data types
127 typedef unsigned char uint8;
128 typedef signed char int8;
129 #if SIZEOF_SHORT == 2
130 typedef unsigned short uint16;
131 typedef short int16;
132 #elif SIZEOF_INT == 2
133 typedef unsigned int uint16;
134 typedef int int16;
135 #else
136 #error "No 2 byte type, you lose."
137 #endif
138 #if SIZEOF_INT == 4
139 typedef unsigned int uint32;
140 typedef int int32;
141 #elif SIZEOF_LONG == 4
142 typedef unsigned long uint32;
143 typedef long int32;
144 #else
145 #error "No 4 byte type, you lose."
146 #endif
147 #if SIZEOF_LONG == 8
148 typedef unsigned long uint64;
149 typedef long int64;
150 #define VAL64(a) (a ## l)
151 #define UVAL64(a) (a ## ul)
152 #elif SIZEOF_LONG_LONG == 8
153 typedef unsigned long long uint64;
154 typedef long long int64;
155 #define VAL64(a) (a ## LL)
156 #define UVAL64(a) (a ## uLL)
157 #else
158 #error "No 8 byte type, you lose."
159 #endif
160 #if SIZEOF_VOID_P == 4
161 typedef uint32 uintptr;
162 typedef int32 intptr;
163 #elif SIZEOF_VOID_P == 8
164 typedef uint64 uintptr;
165 typedef int64 intptr;
166 #else
167 #error "Unsupported size of pointer"
168 #endif
169
170 // Define if the host processor supports fast unaligned load/stores
171 #if defined __i386__ || defined __x86_64__
172 #define UNALIGNED_PROFITABLE 1
173 #endif
174
175
176 /**
177 * Helper functions to byteswap data
178 **/
179
180 #if defined(__GNUC__)
181 #if defined(__x86_64__) || defined(__i386__)
182 // Linux/AMD64 currently has no asm optimized bswap_32() in <byteswap.h>
183 #define opt_bswap_32 do_opt_bswap_32
184 static inline uint32 do_opt_bswap_32(uint32 x)
185 {
186 uint32 v;
187 __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x));
188 return v;
189 }
190 #endif
191 #endif
192
193 #ifdef HAVE_BYTESWAP_H
194 #include <byteswap.h>
195 #endif
196
197 #ifdef opt_bswap_16
198 #undef bswap_16
199 #define bswap_16 opt_bswap_16
200 #endif
201 #ifndef bswap_16
202 #define bswap_16 generic_bswap_16
203 #endif
204
205 static inline uint16 generic_bswap_16(uint16 x)
206 {
207 return ((x & 0xff) << 8) | ((x >> 8) & 0xff);
208 }
209
210 #ifdef opt_bswap_32
211 #undef bswap_32
212 #define bswap_32 opt_bswap_32
213 #endif
214 #ifndef bswap_32
215 #define bswap_32 generic_bswap_32
216 #endif
217
218 static inline uint32 generic_bswap_32(uint32 x)
219 {
220 return (((x & 0xff000000) >> 24) |
221 ((x & 0x00ff0000) >> 8) |
222 ((x & 0x0000ff00) << 8) |
223 ((x & 0x000000ff) << 24) );
224 }
225
226 #if defined(__i386__)
227 #define opt_bswap_64 do_opt_bswap_64
228 static inline uint64 do_opt_bswap_64(uint64 x)
229 {
230 return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32));
231 }
232 #endif
233
234 #ifdef opt_bswap_64
235 #undef bswap_64
236 #define bswap_64 opt_bswap_64
237 #endif
238 #ifndef bswap_64
239 #define bswap_64 generic_bswap_64
240 #endif
241
242 static inline uint64 generic_bswap_64(uint64 x)
243 {
244 return (((x & UVAL64(0xff00000000000000)) >> 56) |
245 ((x & UVAL64(0x00ff000000000000)) >> 40) |
246 ((x & UVAL64(0x0000ff0000000000)) >> 24) |
247 ((x & UVAL64(0x000000ff00000000)) >> 8) |
248 ((x & UVAL64(0x00000000ff000000)) << 8) |
249 ((x & UVAL64(0x0000000000ff0000)) << 24) |
250 ((x & UVAL64(0x000000000000ff00)) << 40) |
251 ((x & UVAL64(0x00000000000000ff)) << 56) );
252 }
253
254 #ifdef WORDS_BIGENDIAN
255 static inline uint16 tswap16(uint16 x) { return x; }
256 static inline uint32 tswap32(uint32 x) { return x; }
257 static inline uint64 tswap64(uint64 x) { return x; }
258 #else
259 static inline uint16 tswap16(uint16 x) { return bswap_16(x); }
260 static inline uint32 tswap32(uint32 x) { return bswap_32(x); }
261 static inline uint64 tswap64(uint64 x) { return bswap_64(x); }
262 #endif
263
264 // spin locks
265 #ifdef __GNUC__
266
267 #if defined(__powerpc__) || defined(__ppc__)
268 #define HAVE_TEST_AND_SET 1
269 static inline int testandset(volatile int *p)
270 {
271 int ret;
272 __asm__ __volatile__("0: lwarx %0,0,%1\n"
273 " xor. %0,%3,%0\n"
274 " bne 1f\n"
275 " stwcx. %2,0,%1\n"
276 " bne- 0b\n"
277 "1: "
278 : "=&r" (ret)
279 : "r" (p), "r" (1), "r" (0)
280 : "cr0", "memory");
281 return ret;
282 }
283 #endif
284
285 #if defined(__i386__) || defined(__x86_64__)
286 #define HAVE_TEST_AND_SET 1
287 static inline int testandset(volatile int *p)
288 {
289 long int ret;
290 /* Note: the "xchg" instruction does not need a "lock" prefix */
291 __asm__ __volatile__("xchgl %k0, %1"
292 : "=r" (ret), "=m" (*p)
293 : "0" (1), "m" (*p)
294 : "memory");
295 return ret;
296 }
297 #endif
298
299 #ifdef __s390__
300 #define HAVE_TEST_AND_SET 1
301 static inline int testandset(volatile int *p)
302 {
303 int ret;
304
305 __asm__ __volatile__("0: cs %0,%1,0(%2)\n"
306 " jl 0b"
307 : "=&d" (ret)
308 : "r" (1), "a" (p), "0" (*p)
309 : "cc", "memory" );
310 return ret;
311 }
312 #endif
313
314 #ifdef __alpha__
315 #define HAVE_TEST_AND_SET 1
316 static inline int testandset(volatile int *p)
317 {
318 int ret;
319 unsigned long one;
320
321 __asm__ __volatile__("0: mov 1,%2\n"
322 " ldl_l %0,%1\n"
323 " stl_c %2,%1\n"
324 " beq %2,1f\n"
325 ".subsection 2\n"
326 "1: br 0b\n"
327 ".previous"
328 : "=r" (ret), "=m" (*p), "=r" (one)
329 : "m" (*p));
330 return ret;
331 }
332 #endif
333
334 #ifdef __sparc__
335 #define HAVE_TEST_AND_SET 1
336 static inline int testandset(volatile int *p)
337 {
338 int ret;
339
340 __asm__ __volatile__("ldstub [%1], %0"
341 : "=r" (ret)
342 : "r" (p)
343 : "memory");
344
345 return (ret ? 1 : 0);
346 }
347 #endif
348
349 #ifdef __arm__
350 #define HAVE_TEST_AND_SET 1
351 static inline int testandset(volatile int *p)
352 {
353 register unsigned int ret;
354 __asm__ __volatile__("swp %0, %1, [%2]"
355 : "=r"(ret)
356 : "0"(1), "r"(p));
357
358 return ret;
359 }
360 #endif
361
362 #endif /* __GNUC__ */
363
364 typedef volatile int spinlock_t;
365
366 static const spinlock_t SPIN_LOCK_UNLOCKED = 0;
367
368 #if defined(HAVE_TEST_AND_SET) && defined(HAVE_PTHREADS)
369 // There is nothing to lock if we are not in an multithreaded environment
370 #define HAVE_SPINLOCKS 1
371 static inline void spin_lock(spinlock_t *lock)
372 {
373 while (testandset(lock));
374 }
375
376 static inline void spin_unlock(spinlock_t *lock)
377 {
378 *lock = 0;
379 }
380
381 static inline int spin_trylock(spinlock_t *lock)
382 {
383 return !testandset(lock);
384 }
385 #else
386 static inline void spin_lock(spinlock_t *lock)
387 {
388 }
389
390 static inline void spin_unlock(spinlock_t *lock)
391 {
392 }
393
394 static inline int spin_trylock(spinlock_t *lock)
395 {
396 return 1;
397 }
398 #endif
399
400 // Time data type for Time Manager emulation
401 #ifdef HAVE_CLOCK_GETTIME
402 typedef struct timespec tm_time_t;
403 #else
404 typedef struct timeval tm_time_t;
405 #endif
406
407 /* Define codes for all the float formats that we know of.
408 * Though we only handle IEEE format. */
409 #define UNKNOWN_FLOAT_FORMAT 0
410 #define IEEE_FLOAT_FORMAT 1
411 #define VAX_FLOAT_FORMAT 2
412 #define IBM_FLOAT_FORMAT 3
413 #define C4X_FLOAT_FORMAT 4
414
415 // High-precision timing
416 #if defined(HAVE_PTHREADS) && defined(HAVE_CLOCK_NANOSLEEP)
417 #define PRECISE_TIMING 1
418 #define PRECISE_TIMING_POSIX 1
419 #endif
420
421 // Timing functions
422 extern uint64 GetTicks_usec(void);
423 extern void Delay_usec(uint32 usec);
424
425 #ifdef HAVE_PTHREADS
426 // Setup pthread attributes
427 extern void Set_pthread_attr(pthread_attr_t *attr, int priority);
428 #endif
429
430 // Various definitions
431 typedef struct rgb_color {
432 uint8 red;
433 uint8 green;
434 uint8 blue;
435 uint8 alpha;
436 } rgb_color;
437
438 // X11 display fast locks
439 #if defined(HAVE_PTHREADS)
440 #define X11_LOCK_TYPE pthread_mutex_t
441 #define X11_LOCK_INIT PTHREAD_MUTEX_INITIALIZER
442 #define XDisplayLock() pthread_mutex_lock(&x_display_lock);
443 #define XDisplayUnlock() pthread_mutex_unlock(&x_display_lock);
444 #elif defined(HAVE_SPINLOCKS)
445 #define X11_LOCK_TYPE spinlock_t
446 #define X11_LOCK_INIT SPIN_LOCK_UNLOCKED
447 #define XDisplayLock() spin_lock(&x_display_lock)
448 #define XDisplayUnlock() spin_unlock(&x_display_lock)
449 #else
450 #define XDisplayLock()
451 #define XDisplayUnlock()
452 #endif
453 #ifdef X11_LOCK_TYPE
454 extern X11_LOCK_TYPE x_display_lock;
455 #endif
456
457 // Macro for calling MacOS routines
458 #define CallMacOS(type, tvect) call_macos((uintptr)tvect)
459 #define CallMacOS1(type, tvect, arg1) call_macos1((uintptr)tvect, (uintptr)arg1)
460 #define CallMacOS2(type, tvect, arg1, arg2) call_macos2((uintptr)tvect, (uintptr)arg1, (uintptr)arg2)
461 #define CallMacOS3(type, tvect, arg1, arg2, arg3) call_macos3((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3)
462 #define CallMacOS4(type, tvect, arg1, arg2, arg3, arg4) call_macos4((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4)
463 #define CallMacOS5(type, tvect, arg1, arg2, arg3, arg4, arg5) call_macos5((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5)
464 #define CallMacOS6(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6) call_macos6((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6)
465 #define CallMacOS7(type, tvect, arg1, arg2, arg3, arg4, arg5, arg6, arg7) call_macos7((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5, (uintptr)arg6, (uintptr)arg7)
466
467 #ifdef __cplusplus
468 extern "C" {
469 #endif
470 extern uint32 call_macos(uint32 tvect);
471 extern uint32 call_macos1(uint32 tvect, uint32 arg1);
472 extern uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2);
473 extern uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3);
474 extern uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4);
475 extern uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5);
476 extern uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6);
477 extern uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7);
478 #ifdef __cplusplus
479 }
480 #endif
481
482 #endif