ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/Unix/sysdeps.h
Revision: 1.47
Committed: 2005-07-03T13:39:06Z (19 years, 4 months ago) by gbeauche
Content type: text/plain
Branch: MAIN
Changes since 1.46: +0 -14 lines
Log Message:
Remove obsolete and broken Cygwin/X11 hacks. Forbid builds of the Windows
version from within the Unix/ directory.

File Contents

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