ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/Unix/sysdeps.h
Revision: 1.43
Committed: 2005-06-25T11:06:24Z (19 years, 5 months ago) by gbeauche
Content type: text/plain
Branch: MAIN
Changes since 1.42: +1 -1 lines
Log Message:
We HAVE_PTHREADS even if we use our own pthreads implementation, this also
induces availability of locking primitives. I will merge the !HAVE_PTHREADS
case (a la Basilisk II) for EMULATED_PPC when I get back to home.

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(__CYGWIN__)
87 #define DIRECT_ADDRESSING 1
88 #define DIRECT_ADDRESSING_HACK 1
89 /*
90 The following address translation functions were empirically
91 determined on a Windows XP system running Cygwin 1.5.12-1 so
92 that RAM size can be maximized (up to 960 MB) and avoiding
93 the use of a TLB. This also takes into account reduced address
94 space available when the Cygwin runtime is used.
95 */
96 #define DIRECT_ADDRESSING_VIRT2PHYS(ADDR) \
97 ((ADDR) + (((ADDR) < 0x41000000) ? 0x39000000 : 0xcf800000))
98 #define DIRECT_ADDRESSING_PHYS2VIRT(ADDR) \
99 ((ADDR) - (((ADDR) >= 0x39000000) ? 0x39000000 : 0xcf800000))
100 #elif defined(NATMEM_OFFSET)
101 #define DIRECT_ADDRESSING 1
102 #else
103 #define REAL_ADDRESSING 1
104 #endif
105
106 #define POWERPC_ROM 1
107
108 #if EMULATED_PPC
109 // Mac ROM is write protected when banked memory is used
110 #if REAL_ADDRESSING || DIRECT_ADDRESSING
111 # define ROM_IS_WRITE_PROTECTED 0
112 # define USE_SCRATCHMEM_SUBTERFUGE 1
113 #else
114 # define ROM_IS_WRITE_PROTECTED 1
115 #endif
116 // Configure PowerPC emulator
117 #define PPC_REENTRANT_JIT 1
118 #define PPC_CHECK_INTERRUPTS 1
119 #define PPC_DECODE_CACHE 1
120 #define PPC_FLIGHT_RECORDER 1
121 #define PPC_PROFILE_COMPILE_TIME 0
122 #define PPC_PROFILE_GENERIC_CALLS 0
123 #define KPX_MAX_CPUS 1
124 #if ENABLE_DYNGEN
125 // Don't bother with predecode cache when using JIT
126 #define PPC_ENABLE_JIT 1
127 #undef PPC_DECODE_CACHE
128 #endif
129 #if defined(__i386__)
130 #define DYNGEN_ASM_OPTS 1
131 #endif
132 #else
133 // Mac ROM is write protected
134 #define ROM_IS_WRITE_PROTECTED 1
135 #define USE_SCRATCHMEM_SUBTERFUGE 0
136 #endif
137
138 // Data types
139 typedef unsigned char uint8;
140 typedef signed char int8;
141 #if SIZEOF_SHORT == 2
142 typedef unsigned short uint16;
143 typedef short int16;
144 #elif SIZEOF_INT == 2
145 typedef unsigned int uint16;
146 typedef int int16;
147 #else
148 #error "No 2 byte type, you lose."
149 #endif
150 #if SIZEOF_INT == 4
151 typedef unsigned int uint32;
152 typedef int int32;
153 #elif SIZEOF_LONG == 4
154 typedef unsigned long uint32;
155 typedef long int32;
156 #else
157 #error "No 4 byte type, you lose."
158 #endif
159 #if SIZEOF_LONG == 8
160 typedef unsigned long uint64;
161 typedef long int64;
162 #define VAL64(a) (a ## l)
163 #define UVAL64(a) (a ## ul)
164 #elif SIZEOF_LONG_LONG == 8
165 typedef unsigned long long uint64;
166 typedef long long int64;
167 #define VAL64(a) (a ## LL)
168 #define UVAL64(a) (a ## uLL)
169 #else
170 #error "No 8 byte type, you lose."
171 #endif
172 #if SIZEOF_VOID_P == 4
173 typedef uint32 uintptr;
174 typedef int32 intptr;
175 #elif SIZEOF_VOID_P == 8
176 typedef uint64 uintptr;
177 typedef int64 intptr;
178 #else
179 #error "Unsupported size of pointer"
180 #endif
181
182 /**
183 * Helper functions to byteswap data
184 **/
185
186 #if defined(__GNUC__)
187 #if defined(__x86_64__) || defined(__i386__)
188 // Linux/AMD64 currently has no asm optimized bswap_32() in <byteswap.h>
189 #define opt_bswap_32 do_opt_bswap_32
190 static inline uint32 do_opt_bswap_32(uint32 x)
191 {
192 uint32 v;
193 __asm__ __volatile__ ("bswap %0" : "=r" (v) : "0" (x));
194 return v;
195 }
196 #endif
197 #endif
198
199 #ifdef HAVE_BYTESWAP_H
200 #include <byteswap.h>
201 #endif
202
203 #ifdef opt_bswap_16
204 #undef bswap_16
205 #define bswap_16 opt_bswap_16
206 #endif
207 #ifndef bswap_16
208 #define bswap_16 generic_bswap_16
209 #endif
210
211 static inline uint16 generic_bswap_16(uint16 x)
212 {
213 return ((x & 0xff) << 8) | ((x >> 8) & 0xff);
214 }
215
216 #ifdef opt_bswap_32
217 #undef bswap_32
218 #define bswap_32 opt_bswap_32
219 #endif
220 #ifndef bswap_32
221 #define bswap_32 generic_bswap_32
222 #endif
223
224 static inline uint32 generic_bswap_32(uint32 x)
225 {
226 return (((x & 0xff000000) >> 24) |
227 ((x & 0x00ff0000) >> 8) |
228 ((x & 0x0000ff00) << 8) |
229 ((x & 0x000000ff) << 24) );
230 }
231
232 #if defined(__i386__)
233 #define opt_bswap_64 do_opt_bswap_64
234 static inline uint64 do_opt_bswap_64(uint64 x)
235 {
236 return (bswap_32(x >> 32) | (((uint64)bswap_32((uint32)x)) << 32));
237 }
238 #endif
239
240 #ifdef opt_bswap_64
241 #undef bswap_64
242 #define bswap_64 opt_bswap_64
243 #endif
244 #ifndef bswap_64
245 #define bswap_64 generic_bswap_64
246 #endif
247
248 static inline uint64 generic_bswap_64(uint64 x)
249 {
250 return (((x & UVAL64(0xff00000000000000)) >> 56) |
251 ((x & UVAL64(0x00ff000000000000)) >> 40) |
252 ((x & UVAL64(0x0000ff0000000000)) >> 24) |
253 ((x & UVAL64(0x000000ff00000000)) >> 8) |
254 ((x & UVAL64(0x00000000ff000000)) << 8) |
255 ((x & UVAL64(0x0000000000ff0000)) << 24) |
256 ((x & UVAL64(0x000000000000ff00)) << 40) |
257 ((x & UVAL64(0x00000000000000ff)) << 56) );
258 }
259
260 #ifdef WORDS_BIGENDIAN
261 static inline uint16 tswap16(uint16 x) { return x; }
262 static inline uint32 tswap32(uint32 x) { return x; }
263 static inline uint64 tswap64(uint64 x) { return x; }
264 #else
265 static inline uint16 tswap16(uint16 x) { return bswap_16(x); }
266 static inline uint32 tswap32(uint32 x) { return bswap_32(x); }
267 static inline uint64 tswap64(uint64 x) { return bswap_64(x); }
268 #endif
269
270 // spin locks
271 #ifdef __GNUC__
272
273 #if defined(__powerpc__) || defined(__ppc__)
274 #define HAVE_TEST_AND_SET 1
275 static inline int testandset(volatile int *p)
276 {
277 int ret;
278 __asm__ __volatile__("0: lwarx %0,0,%1\n"
279 " xor. %0,%3,%0\n"
280 " bne 1f\n"
281 " stwcx. %2,0,%1\n"
282 " bne- 0b\n"
283 "1: "
284 : "=&r" (ret)
285 : "r" (p), "r" (1), "r" (0)
286 : "cr0", "memory");
287 return ret;
288 }
289 #endif
290
291 /* FIXME: SheepShaver occasionnally hangs with those locks */
292 #if 0 && (defined(__i386__) || defined(__x86_64__))
293 #define HAVE_TEST_AND_SET 1
294 static inline int testandset(volatile int *p)
295 {
296 long int ret;
297 /* Note: the "xchg" instruction does not need a "lock" prefix */
298 __asm__ __volatile__("xchgl %k0, %1"
299 : "=r" (ret), "=m" (*p)
300 : "0" (1), "m" (*p)
301 : "memory");
302 return ret;
303 }
304 #endif
305
306 #ifdef __s390__
307 #define HAVE_TEST_AND_SET 1
308 static inline int testandset(volatile int *p)
309 {
310 int ret;
311
312 __asm__ __volatile__("0: cs %0,%1,0(%2)\n"
313 " jl 0b"
314 : "=&d" (ret)
315 : "r" (1), "a" (p), "0" (*p)
316 : "cc", "memory" );
317 return ret;
318 }
319 #endif
320
321 #ifdef __alpha__
322 #define HAVE_TEST_AND_SET 1
323 static inline int testandset(volatile int *p)
324 {
325 int ret;
326 unsigned long one;
327
328 __asm__ __volatile__("0: mov 1,%2\n"
329 " ldl_l %0,%1\n"
330 " stl_c %2,%1\n"
331 " beq %2,1f\n"
332 ".subsection 2\n"
333 "1: br 0b\n"
334 ".previous"
335 : "=r" (ret), "=m" (*p), "=r" (one)
336 : "m" (*p));
337 return ret;
338 }
339 #endif
340
341 #ifdef __sparc__
342 #define HAVE_TEST_AND_SET 1
343 static inline int testandset(volatile int *p)
344 {
345 int ret;
346
347 __asm__ __volatile__("ldstub [%1], %0"
348 : "=r" (ret)
349 : "r" (p)
350 : "memory");
351
352 return (ret ? 1 : 0);
353 }
354 #endif
355
356 #ifdef __arm__
357 #define HAVE_TEST_AND_SET 1
358 static inline int testandset(volatile int *p)
359 {
360 register unsigned int ret;
361 __asm__ __volatile__("swp %0, %1, [%2]"
362 : "=r"(ret)
363 : "0"(1), "r"(p));
364
365 return ret;
366 }
367 #endif
368
369 #endif /* __GNUC__ */
370
371 typedef volatile int spinlock_t;
372
373 static const spinlock_t SPIN_LOCK_UNLOCKED = 0;
374
375 #if HAVE_TEST_AND_SET
376 #define HAVE_SPINLOCKS 1
377 static inline void spin_lock(spinlock_t *lock)
378 {
379 while (testandset(lock));
380 }
381
382 static inline void spin_unlock(spinlock_t *lock)
383 {
384 *lock = 0;
385 }
386
387 static inline int spin_trylock(spinlock_t *lock)
388 {
389 return !testandset(lock);
390 }
391 #else
392 static inline void spin_lock(spinlock_t *lock)
393 {
394 }
395
396 static inline void spin_unlock(spinlock_t *lock)
397 {
398 }
399
400 static inline int spin_trylock(spinlock_t *lock)
401 {
402 return 1;
403 }
404 #endif
405
406 // Time data type for Time Manager emulation
407 #ifdef HAVE_CLOCK_GETTIME
408 typedef struct timespec tm_time_t;
409 #else
410 typedef struct timeval tm_time_t;
411 #endif
412
413 /* Define codes for all the float formats that we know of.
414 * Though we only handle IEEE format. */
415 #define UNKNOWN_FLOAT_FORMAT 0
416 #define IEEE_FLOAT_FORMAT 1
417 #define VAX_FLOAT_FORMAT 2
418 #define IBM_FLOAT_FORMAT 3
419 #define C4X_FLOAT_FORMAT 4
420
421 // High-precision timing
422 #if defined(HAVE_PTHREADS) && defined(HAVE_CLOCK_NANOSLEEP) && 0
423 #define PRECISE_TIMING 1
424 #define PRECISE_TIMING_POSIX 1
425 #endif
426
427 // Timing functions
428 extern uint64 GetTicks_usec(void);
429 extern void Delay_usec(uint32 usec);
430
431 #ifdef HAVE_PTHREADS
432 // Setup pthread attributes
433 extern void Set_pthread_attr(pthread_attr_t *attr, int priority);
434 #endif
435
436 // Various definitions
437 typedef struct rgb_color {
438 uint8 red;
439 uint8 green;
440 uint8 blue;
441 uint8 alpha;
442 } rgb_color;
443
444 // X11 display fast locks
445 #ifdef HAVE_SPINLOCKS
446 #define X11_LOCK_TYPE spinlock_t
447 #define X11_LOCK_INIT SPIN_LOCK_UNLOCKED
448 #define XDisplayLock() spin_lock(&x_display_lock)
449 #define XDisplayUnlock() spin_unlock(&x_display_lock)
450 #elif defined(HAVE_PTHREADS)
451 #define X11_LOCK_TYPE pthread_mutex_t
452 #define X11_LOCK_INIT PTHREAD_MUTEX_INITIALIZER
453 #define XDisplayLock() pthread_mutex_lock(&x_display_lock);
454 #define XDisplayUnlock() pthread_mutex_unlock(&x_display_lock);
455 #else
456 #define XDisplayLock()
457 #define XDisplayUnlock()
458 #endif
459 #ifdef X11_LOCK_TYPE
460 extern X11_LOCK_TYPE x_display_lock;
461 #endif
462
463 // Macro for calling MacOS routines
464 #define CallMacOS(type, tvect) call_macos((uintptr)tvect)
465 #define CallMacOS1(type, tvect, arg1) call_macos1((uintptr)tvect, (uintptr)arg1)
466 #define CallMacOS2(type, tvect, arg1, arg2) call_macos2((uintptr)tvect, (uintptr)arg1, (uintptr)arg2)
467 #define CallMacOS3(type, tvect, arg1, arg2, arg3) call_macos3((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3)
468 #define CallMacOS4(type, tvect, arg1, arg2, arg3, arg4) call_macos4((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4)
469 #define CallMacOS5(type, tvect, arg1, arg2, arg3, arg4, arg5) call_macos5((uintptr)tvect, (uintptr)arg1, (uintptr)arg2, (uintptr)arg3, (uintptr)arg4, (uintptr)arg5)
470 #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)
471 #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)
472
473 #ifdef __cplusplus
474 extern "C" {
475 #endif
476 extern uint32 call_macos(uint32 tvect);
477 extern uint32 call_macos1(uint32 tvect, uint32 arg1);
478 extern uint32 call_macos2(uint32 tvect, uint32 arg1, uint32 arg2);
479 extern uint32 call_macos3(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3);
480 extern uint32 call_macos4(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4);
481 extern uint32 call_macos5(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5);
482 extern uint32 call_macos6(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6);
483 extern uint32 call_macos7(uint32 tvect, uint32 arg1, uint32 arg2, uint32 arg3, uint32 arg4, uint32 arg5, uint32 arg6, uint32 arg7);
484 #ifdef __cplusplus
485 }
486 #endif
487
488 #endif