OSDN Git Service

* include/gc_pthread_redirects.h: Generalize test to use GC_PTHREADS.
[pf3gnuchains/gcc-fork.git] / boehm-gc / include / private / gcconfig.h
1 /* 
2  * Copyright 1988, 1989 Hans-J. Boehm, Alan J. Demers
3  * Copyright (c) 1991-1994 by Xerox Corporation.  All rights reserved.
4  * Copyright (c) 1996 by Silicon Graphics.  All rights reserved.
5  * Copyright (c) 2000 by Hewlett-Packard Company.  All rights reserved.
6  *
7  * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
8  * OR IMPLIED.  ANY USE IS AT YOUR OWN RISK.
9  *
10  * Permission is hereby granted to use or copy this program
11  * for any purpose,  provided the above notices are retained on all copies.
12  * Permission to modify the code and to distribute modified code is granted,
13  * provided the above notices are retained, and a notice that the code was
14  * modified is included with the above copyright notice.
15  */
16  
17 #ifndef GCCONFIG_H
18
19 # define GCCONFIG_H
20
21 /* Machine dependent parameters.  Some tuning parameters can be found   */
22 /* near the top of gc_private.h.                                        */
23
24 /* Machine specific parts contributed by various people.  See README file. */
25
26 /* First a unified test for Linux: */
27 # if defined(linux) || defined(__linux__)
28 #    define LINUX
29 # endif
30
31 /* And one for NetBSD: */
32 # if defined(__NetBSD__)
33 #    define NETBSD
34 # endif
35
36 /* And one for OpenBSD: */
37 # if defined(__OpenBSD__)
38 #    define OPENBSD
39 # endif
40
41 /* Determine the machine type: */
42 # if defined(sun) && defined(mc68000)
43 #    define M68K
44 #    define SUNOS4
45 #    define mach_type_known
46 # endif
47 # if defined(hp9000s300)
48 #    define M68K
49 #    define HP
50 #    define mach_type_known
51 # endif
52 # if defined(OPENBSD) && defined(m68k)
53 #    define M68K
54 #    define mach_type_known
55 # endif
56 # if defined(OPENBSD) && defined(__sparc__)
57 #    define SPARC
58 #    define mach_type_known
59 # endif
60 # if defined(NETBSD) && defined(m68k)
61 #    define M68K
62 #    define mach_type_known
63 # endif
64 # if defined(NETBSD) && defined(__powerpc__)
65 #    define POWERPC
66 #    define mach_type_known
67 # endif
68 # if defined(NETBSD) && defined(__arm32__)
69 #    define ARM32
70 #    define mach_type_known
71 # endif
72 # if defined(vax)
73 #    define VAX
74 #    ifdef ultrix
75 #       define ULTRIX
76 #    else
77 #       define BSD
78 #    endif
79 #    define mach_type_known
80 # endif
81 # if defined(mips) || defined(__mips)
82 #    define MIPS
83 #    if !defined(LINUX)
84 #      if defined(ultrix) || defined(__ultrix) || defined(__NetBSD__)
85 #        define ULTRIX
86 #      else
87 #        if defined(_SYSTYPE_SVR4) || defined(SYSTYPE_SVR4) \
88             || defined(__SYSTYPE_SVR4__)
89 #          define IRIX5   /* or IRIX 6.X */
90 #        else
91 #          define RISCOS  /* or IRIX 4.X */
92 #        endif
93 #      endif
94 #    endif /* !LINUX */
95 #    if defined(__NetBSD__) && defined(__MIPSEL__)
96 #      undef ULTRIX
97 #    endif
98 #    define mach_type_known
99 # endif
100 # if defined(sequent) && (defined(i386) || defined(__i386__))
101 #    define I386
102 #    define SEQUENT
103 #    define mach_type_known
104 # endif
105 # if defined(sun) && (defined(i386) || defined(__i386__))
106 #    define I386
107 #    define SUNOS5
108 #    define mach_type_known
109 # endif
110 # if (defined(__OS2__) || defined(__EMX__)) && defined(__32BIT__)
111 #    define I386
112 #    define OS2
113 #    define mach_type_known
114 # endif
115 # if defined(ibm032)
116 #   define RT
117 #   define mach_type_known
118 # endif
119 # if defined(sun) && (defined(sparc) || defined(__sparc))
120 #   define SPARC
121     /* Test for SunOS 5.x */
122 #     include <errno.h>
123 #     ifdef ECHRNG
124 #       define SUNOS5
125 #     else
126 #       define SUNOS4
127 #     endif
128 #   define mach_type_known
129 # endif
130 # if defined(sparc) && defined(unix) && !defined(sun) && !defined(linux) \
131      && !defined(__OpenBSD__) && !(__NetBSD__)
132 #   define SPARC
133 #   define DRSNX
134 #   define mach_type_known
135 # endif
136 # if defined(_IBMR2)
137 #   define RS6000
138 #   define mach_type_known
139 # endif
140 # if defined(__NetBSD__) && defined(__sparc__)
141 #   define SPARC
142 #   define mach_type_known
143 # endif
144 # if defined(_M_XENIX) && defined(_M_SYSV) && defined(_M_I386)
145         /* The above test may need refinement   */
146 #   define I386
147 #   if defined(_SCO_ELF)
148 #     define SCO_ELF
149 #   else
150 #     define SCO
151 #   endif
152 #   define mach_type_known
153 # endif
154 # if defined(_AUX_SOURCE)
155 #   define M68K
156 #   define SYSV
157 #   define mach_type_known
158 # endif
159 # if defined(_PA_RISC1_0) || defined(_PA_RISC1_1) || defined(_PA_RISC2_0) \
160      || defined(hppa) || defined(__hppa__)
161 #   define HP_PA
162 #   ifndef LINUX
163 #     define HPUX
164 #   endif
165 #   define mach_type_known
166 # endif
167 # if defined(__ia64) && defined(_HPUX_SOURCE)
168 #   define IA64
169 #   define HPUX
170 #   define mach_type_known
171 # endif
172 # if defined(__BEOS__) && defined(_X86_)
173 #    define I386
174 #    define BEOS
175 #    define mach_type_known
176 # endif
177 # if defined(LINUX) && (defined(i386) || defined(__i386__))
178 #    define I386
179 #    define mach_type_known
180 # endif
181 # if defined(LINUX) && (defined(__ia64__) || defined(__ia64))
182 #    define IA64
183 #    define mach_type_known
184 # endif
185 # if defined(LINUX) && (defined(powerpc) || defined(__powerpc__))
186 #    define POWERPC
187 #    define mach_type_known
188 # endif
189 # if defined(LINUX) && defined(__mc68000__)
190 #    define M68K
191 #    define mach_type_known
192 # endif
193 # if defined(LINUX) && (defined(sparc) || defined(__sparc__))
194 #    define SPARC
195 #    define mach_type_known
196 # endif
197 # if defined(LINUX) && defined(__arm__)
198 #    define ARM32
199 #    define mach_type_known
200 # endif
201 # if defined(LINUX) && defined(__sh__)
202 #    define SH
203 #    define mach_type_known
204 # endif
205 # if defined(__alpha) || defined(__alpha__)
206 #   define ALPHA
207 #   if !defined(LINUX) && !defined(NETBSD) && !defined(OPENBSD)
208 #     define OSF1       /* a.k.a Digital Unix */
209 #   endif
210 #   define mach_type_known
211 # endif
212 # if defined(_AMIGA) && !defined(AMIGA)
213 #   define AMIGA
214 # endif
215 # ifdef AMIGA 
216 #   define M68K
217 #   define mach_type_known
218 # endif
219 # if defined(THINK_C) || defined(__MWERKS__) && !defined(__powerc)
220 #   define M68K
221 #   define MACOS
222 #   define mach_type_known
223 # endif
224 # if defined(__MWERKS__) && defined(__powerc)
225 #   define POWERPC
226 #   define MACOS
227 #   define mach_type_known
228 # endif
229 # if defined(macosx) || \
230      defined(__APPLE__) && defined(__MACH__) && defined(__ppc__)
231 #    define MACOSX
232 #    define POWERPC
233 #    define mach_type_known
234 # endif
235 # if defined(__APPLE__) && defined(__MACH__) && defined(__i386__)
236 #    define MACOSX
237 #    define I386
238      --> Not really supported, but at least we recognize it.
239 # endif
240 # if defined(NeXT) && defined(mc68000)
241 #   define M68K
242 #   define NEXT
243 #   define mach_type_known
244 # endif
245 # if defined(NeXT) && (defined(i386) || defined(__i386__))
246 #   define I386
247 #   define NEXT
248 #   define mach_type_known
249 # endif
250 # if defined(__OpenBSD__) && (defined(i386) || defined(__i386__))
251 #   define I386
252 #   define OPENBSD
253 #   define mach_type_known
254 # endif
255 # if defined(__FreeBSD__) && (defined(i386) || defined(__i386__))
256 #   define I386
257 #   define FREEBSD
258 #   define mach_type_known
259 # endif
260 # if defined(__NetBSD__) && (defined(i386) || defined(__i386__))
261 #   define I386
262 #   define mach_type_known
263 # endif
264 # if defined(bsdi) && (defined(i386) || defined(__i386__))
265 #    define I386
266 #    define BSDI
267 #    define mach_type_known
268 # endif
269 # if !defined(mach_type_known) && defined(__386BSD__)
270 #   define I386
271 #   define THREE86BSD
272 #   define mach_type_known
273 # endif
274 # if defined(_CX_UX) && defined(_M88K)
275 #   define M88K
276 #   define CX_UX
277 #   define mach_type_known
278 # endif
279 # if defined(DGUX)
280 #   define M88K
281     /* DGUX defined */
282 #   define mach_type_known
283 # endif
284 # if defined(_WIN32_WCE)
285     /* SH3, SH4, MIPS already defined for corresponding architectures */
286 #   if defined(SH3) || defined(SH4)
287 #     define SH
288 #   endif
289 #   if defined(x86)
290 #     define I386
291 #   endif
292 #   if defined(ARM)
293 #     define ARM32
294 #   endif
295 #   define MSWINCE
296 #   define mach_type_known
297 # else
298 #   if (defined(_MSDOS) || defined(_MSC_VER)) && (_M_IX86 >= 300) \
299         || defined(_WIN32) && !defined(__CYGWIN32__) && !defined(__CYGWIN__)
300 #     define I386
301 #     define MSWIN32    /* or Win32s */
302 #     define mach_type_known
303 #   endif
304 # endif
305 # if defined(__DJGPP__)
306 #   define I386
307 #   ifndef DJGPP
308 #     define DJGPP  /* MSDOS running the DJGPP port of GCC */
309 #   endif
310 #   define mach_type_known
311 # endif
312 # if defined(__CYGWIN32__) || defined(__CYGWIN__)
313 #   define I386
314 #   define CYGWIN32
315 #   define mach_type_known
316 # endif
317 # if defined(__MINGW32__)
318 #   define I386
319 #   define MSWIN32
320 #   define mach_type_known
321 # endif
322 # if defined(__BORLANDC__)
323 #   define I386
324 #   define MSWIN32
325 #   define mach_type_known
326 # endif
327 # if defined(_UTS) && !defined(mach_type_known)
328 #   define S370
329 #   define UTS4
330 #   define mach_type_known
331 # endif
332 # if defined(__pj__)
333 #   define PJ
334 #   define mach_type_known
335 # endif
336 # if defined(__embedded__) && defined(PPC)
337 #   define POWERPC
338 #   define NOSYS
339 #   define mach_type_known
340 # endif
341 /* Ivan Demakov */
342 # if defined(__WATCOMC__) && defined(__386__)
343 #   define I386
344 #   if !defined(OS2) && !defined(MSWIN32) && !defined(DOS4GW)
345 #     if defined(__OS2__)
346 #       define OS2
347 #     else
348 #       if defined(__WINDOWS_386__) || defined(__NT__)
349 #         define MSWIN32
350 #       else
351 #         define DOS4GW
352 #       endif
353 #     endif
354 #   endif
355 #   define mach_type_known
356 # endif
357 # if defined(__s390__) && defined(LINUX)
358 #    define S370
359 #    define mach_type_known
360 # endif
361 # if defined(__GNU__)
362 #   if defined(__i386__)
363 /* The Debian Hurd running on generic PC */  
364 #     define  HURD
365 #     define  I386
366 #     define  mach_type_known
367 #    endif 
368 # endif
369
370 /* Feel free to add more clauses here */
371
372 /* Or manually define the machine type here.  A machine type is         */
373 /* characterized by the architecture.  Some                             */
374 /* machine types are further subdivided by OS.                          */
375 /* the macros ULTRIX, RISCOS, and BSD to distinguish.                   */
376 /* Note that SGI IRIX is treated identically to RISCOS.                 */
377 /* SYSV on an M68K actually means A/UX.                                 */
378 /* The distinction in these cases is usually the stack starting address */
379 # ifndef mach_type_known
380         --> unknown machine type
381 # endif
382                     /* Mapping is: M68K       ==> Motorola 680X0        */
383                     /*             (SUNOS4,HP,NEXT, and SYSV (A/UX),    */
384                     /*             MACOS and AMIGA variants)            */
385                     /*             I386       ==> Intel 386             */
386                     /*              (SEQUENT, OS2, SCO, LINUX, NETBSD,  */
387                     /*               FREEBSD, THREE86BSD, MSWIN32,      */
388                     /*               BSDI,SUNOS5, NEXT, other variants) */
389                     /*             NS32K      ==> Encore Multimax       */
390                     /*             MIPS       ==> R2000 or R3000        */
391                     /*                  (RISCOS, ULTRIX variants)       */
392                     /*             VAX        ==> DEC VAX               */
393                     /*                  (BSD, ULTRIX variants)          */
394                     /*             RS6000     ==> IBM RS/6000 AIX3.X    */
395                     /*             RT         ==> IBM PC/RT             */
396                     /*             HP_PA      ==> HP9000/700 & /800     */
397                     /*                            HP/UX, LINUX          */
398                     /*             SPARC      ==> SPARC v7/v8/v9        */
399                     /*                  (SUNOS4, SUNOS5, LINUX,         */
400                     /*                   DRSNX variants)                */
401                     /*             ALPHA      ==> DEC Alpha             */
402                     /*                  (OSF1 and LINUX variants)       */
403                     /*             M88K       ==> Motorola 88XX0        */
404                     /*                  (CX_UX and DGUX)                */
405                     /*             S370       ==> 370-like machine      */
406                     /*                  running Amdahl UTS4             */
407                     /*                  or a 390 running LINUX          */
408                     /*             ARM32      ==> Intel StrongARM       */
409                     /*             IA64       ==> Intel IPF             */
410                     /*                            (e.g. Itanium)        */
411                     /*                  (LINUX and HPUX)                */
412                     /*             IA64_32    ==> IA64 w/32 bit ABI     */
413                     /*                  (HPUX)                          */
414                     /*             SH         ==> Hitachi SuperH        */
415                     /*                  (LINUX & MSWINCE)               */
416
417
418 /*
419  * For each architecture and OS, the following need to be defined:
420  *
421  * CPP_WORD_SZ is a simple integer constant representing the word size.
422  * in bits.  We assume byte addressibility, where a byte has 8 bits.
423  * We also assume CPP_WORD_SZ is either 32 or 64.
424  * (We care about the length of pointers, not hardware
425  * bus widths.  Thus a 64 bit processor with a C compiler that uses
426  * 32 bit pointers should use CPP_WORD_SZ of 32, not 64. Default is 32.)
427  *
428  * MACH_TYPE is a string representation of the machine type.
429  * OS_TYPE is analogous for the OS.
430  *
431  * ALIGNMENT is the largest N, such that
432  * all pointer are guaranteed to be aligned on N byte boundaries.
433  * defining it to be 1 will always work, but perform poorly.
434  *
435  * DATASTART is the beginning of the data segment.
436  * On UNIX systems, the collector will scan the area between DATASTART
437  * and DATAEND for root pointers.
438  *
439  * DATAEND, if not &end.
440  *
441  * ALIGN_DOUBLE of GC_malloc should return blocks aligned to twice
442  * the pointer size.
443  *
444  * STACKBOTTOM is the cool end of the stack, which is usually the
445  * highest address in the stack.
446  * Under PCR or OS/2, we have other ways of finding thread stacks.
447  * For each machine, the following should:
448  * 1) define STACK_GROWS_UP if the stack grows toward higher addresses, and
449  * 2) define exactly one of
450  *      STACKBOTTOM (should be defined to be an expression)
451  *      HEURISTIC1
452  *      HEURISTIC2
453  * If either of the last two macros are defined, then STACKBOTTOM is computed
454  * during collector startup using one of the following two heuristics:
455  * HEURISTIC1:  Take an address inside GC_init's frame, and round it up to
456  *              the next multiple of STACK_GRAN.
457  * HEURISTIC2:  Take an address inside GC_init's frame, increment it repeatedly
458  *              in small steps (decrement if STACK_GROWS_UP), and read the value
459  *              at each location.  Remember the value when the first
460  *              Segmentation violation or Bus error is signalled.  Round that
461  *              to the nearest plausible page boundary, and use that instead
462  *              of STACKBOTTOM.
463  *
464  * Gustavo Rodriguez-Rivera points out that on most (all?) Unix machines,
465  * the value of environ is a pointer that can serve as STACKBOTTOM.
466  * I expect that HEURISTIC2 can be replaced by this approach, which
467  * interferes far less with debugging.  However it has the disadvantage
468  * that it's confused by a putenv call before the collector is initialized.
469  * This could be dealt with by intercepting putenv ...
470  *
471  * If no expression for STACKBOTTOM can be found, and neither of the above
472  * heuristics are usable, the collector can still be used with all of the above
473  * undefined, provided one of the following is done:
474  * 1) GC_mark_roots can be changed to somehow mark from the correct stack(s)
475  *    without reference to STACKBOTTOM.  This is appropriate for use in
476  *    conjunction with thread packages, since there will be multiple stacks.
477  *    (Allocating thread stacks in the heap, and treating them as ordinary
478  *    heap data objects is also possible as a last resort.  However, this is
479  *    likely to introduce significant amounts of excess storage retention
480  *    unless the dead parts of the thread stacks are periodically cleared.)
481  * 2) Client code may set GC_stackbottom before calling any GC_ routines.
482  *    If the author of the client code controls the main program, this is
483  *    easily accomplished by introducing a new main program, setting
484  *    GC_stackbottom to the address of a local variable, and then calling
485  *    the original main program.  The new main program would read something
486  *    like:
487  *
488  *              # include "gc_private.h"
489  *
490  *              main(argc, argv, envp)
491  *              int argc;
492  *              char **argv, **envp;
493  *              {
494  *                  int dummy;
495  *
496  *                  GC_stackbottom = (ptr_t)(&dummy);
497  *                  return(real_main(argc, argv, envp));
498  *              }
499  *
500  *
501  * Each architecture may also define the style of virtual dirty bit
502  * implementation to be used:
503  *   MPROTECT_VDB: Write protect the heap and catch faults.
504  *   PROC_VDB: Use the SVR4 /proc primitives to read dirty bits.
505  *
506  * An architecture may define DYNAMIC_LOADING if dynamic_load.c
507  * defined GC_register_dynamic_libraries() for the architecture.
508  *
509  * An architecture may define PREFETCH(x) to preload the cache with *x.
510  * This defaults to a no-op.
511  *
512  * PREFETCH_FOR_WRITE(x) is used if *x is about to be written.
513  *
514  * An architecture may also define CLEAR_DOUBLE(x) to be a fast way to
515  * clear the two words at GC_malloc-aligned address x.  By default,
516  * word stores of 0 are used instead.
517  */
518
519 /* If we are using a recent version of gcc, we can use __builtin_unwind_init()
520  * to push the relevant registers onto the stack.  This generally makes
521  * USE_GENERIC_PUSH_REGS the preferred approach for marking from registers.
522  */
523 # if defined(__GNUC__) && ((__GNUC__ >= 3) || \
524                            (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
525 #   define HAVE_BUILTIN_UNWIND_INIT
526 # endif
527
528 # define STACK_GRAN 0x1000000
529 # ifdef M68K
530 #   define MACH_TYPE "M68K"
531 #   define ALIGNMENT 2
532 #   ifdef OPENBSD
533 #       define OS_TYPE "OPENBSD"
534 #       define HEURISTIC2
535         extern char etext;
536 #       define DATASTART ((ptr_t)(&etext))
537 #   endif
538 #   ifdef NETBSD
539 #       define OS_TYPE "NETBSD"
540 #       define HEURISTIC2
541         extern char etext;
542 #       define DATASTART ((ptr_t)(&etext))
543 #   endif
544 #   ifdef LINUX
545 #       define OS_TYPE "LINUX"
546 #       define STACKBOTTOM ((ptr_t)0xf0000000)
547 /* #       define MPROTECT_VDB - Reported to not work  9/17/01 */
548 #       ifdef __ELF__
549 #            define DYNAMIC_LOADING
550 #            include <features.h>
551 #            if defined(__GLIBC__)&& __GLIBC__>=2
552 #              define LINUX_DATA_START
553 #            else /* !GLIBC2 */
554                extern char **__environ;
555 #              define DATASTART ((ptr_t)(&__environ))
556                              /* hideous kludge: __environ is the first */
557                              /* word in crt0.o, and delimits the start */
558                              /* of the data segment, no matter which   */
559                              /* ld options were passed through.        */
560                              /* We could use _etext instead, but that  */
561                              /* would include .rodata, which may       */
562                              /* contain large read-only data tables    */
563                              /* that we'd rather not scan.             */
564 #            endif /* !GLIBC2 */
565              extern int _end;
566 #            define DATAEND (&_end)
567 #       else
568              extern int etext;
569 #            define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
570 #       endif
571 #   endif
572 #   ifdef SUNOS4
573 #       define OS_TYPE "SUNOS4"
574         extern char etext;
575 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0x1ffff) & ~0x1ffff))
576 #       define HEURISTIC1       /* differs      */
577 #       define DYNAMIC_LOADING
578 #   endif
579 #   ifdef HP
580 #       define OS_TYPE "HP"
581         extern char etext;
582 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
583 #       define STACKBOTTOM ((ptr_t) 0xffeffffc)
584                               /* empirically determined.  seems to work. */
585 #       include <unistd.h>
586 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
587 #   endif
588 #   ifdef SYSV
589 #       define OS_TYPE "SYSV"
590         extern etext;
591 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0x3fffff) \
592                                    & ~0x3fffff) \
593                                   +((word)&etext & 0x1fff))
594         /* This only works for shared-text binaries with magic number 0413.
595            The other sorts of SysV binaries put the data at the end of the text,
596            in which case the default of &etext would work.  Unfortunately,
597            handling both would require having the magic-number available.
598                                 -- Parag
599            */
600 #       define STACKBOTTOM ((ptr_t)0xFFFFFFFE)
601                         /* The stack starts at the top of memory, but   */
602                         /* 0x0 cannot be used as setjump_test complains */
603                         /* that the stack direction is incorrect.  Two  */
604                         /* bytes down from 0x0 should be safe enough.   */
605                         /*              --Parag                         */
606 #       include <sys/mmu.h>
607 #       define GETPAGESIZE() PAGESIZE   /* Is this still right? */
608 #   endif
609 #   ifdef AMIGA
610 #       define OS_TYPE "AMIGA"
611                 /* STACKBOTTOM and DATASTART handled specially  */
612                 /* in os_dep.c                                  */
613 #       define DATAEND  /* not needed */
614 #       define GETPAGESIZE() 4096
615 #   endif
616 #   ifdef MACOS
617 #     ifndef __LOWMEM__
618 #     include <LowMem.h>
619 #     endif
620 #     define OS_TYPE "MACOS"
621                         /* see os_dep.c for details of global data segments. */
622 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
623 #     define DATAEND    /* not needed */
624 #     define GETPAGESIZE() 4096
625 #   endif
626 #   ifdef NEXT
627 #       define OS_TYPE "NEXT"
628 #       define DATASTART ((ptr_t) get_etext())
629 #       define STACKBOTTOM ((ptr_t) 0x4000000)
630 #       define DATAEND  /* not needed */
631 #   endif
632 # endif
633
634 # ifdef POWERPC
635 #   define MACH_TYPE "POWERPC"
636 #   ifdef MACOS
637 #     define ALIGNMENT 2  /* Still necessary?  Could it be 4?   */
638 #     ifndef __LOWMEM__
639 #     include <LowMem.h>
640 #     endif
641 #     define OS_TYPE "MACOS"
642                         /* see os_dep.c for details of global data segments. */
643 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
644 #     define DATAEND  /* not needed */
645 #   endif
646 #   ifdef LINUX
647 #     define ALIGNMENT 4        /* Guess.  Can someone verify?  */
648                                 /* This was 2, but that didn't sound right. */
649 #     define OS_TYPE "LINUX"
650 #     define HEURISTIC1
651 #     define DYNAMIC_LOADING
652 #     undef STACK_GRAN
653 #     define STACK_GRAN 0x10000000
654         /* Stack usually starts at 0x80000000 */
655 #     define LINUX_DATA_START
656       extern int _end;
657 #     define DATAEND (&_end)
658 #   endif
659 #   ifdef MACOSX
660       /* There are reasons to suspect this may not be reliable.         */
661 #     define ALIGNMENT 4
662 #     define OS_TYPE "MACOSX"
663 #     define DATASTART ((ptr_t) get_etext())
664 #     define STACKBOTTOM ((ptr_t) 0xc0000000)
665 #     define DATAEND    /* not needed */
666 #     define MPROTECT_VDB
667 #     include <unistd.h>
668 #     define GETPAGESIZE() getpagesize()
669 #   endif
670 #   ifdef NETBSD
671 #     define ALIGNMENT 4
672 #     define OS_TYPE "NETBSD"
673 #     define HEURISTIC2
674       extern char etext;
675 #     define DATASTART GC_data_start
676 #     define DYNAMIC_LOADING
677 #   endif
678 #   ifdef NOSYS
679 #     define ALIGNMENT 4
680 #     define OS_TYPE "NOSYS"
681       extern void __end, __dso_handle;
682 #     define DATASTART (&__dso_handle)  /* OK, that's ugly.  */
683 #     define DATAEND (&__end)
684         /* Stack starts at 0xE0000000 for the simulator.  */
685 #     undef STACK_GRAN
686 #     define STACK_GRAN 0x10000000
687 #     define HEURISTIC1
688 #   endif
689 # endif
690
691 # ifdef VAX
692 #   define MACH_TYPE "VAX"
693 #   define ALIGNMENT 4  /* Pointers are longword aligned by 4.2 C compiler */
694     extern char etext;
695 #   define DATASTART ((ptr_t)(&etext))
696 #   ifdef BSD
697 #       define OS_TYPE "BSD"
698 #       define HEURISTIC1
699                         /* HEURISTIC2 may be OK, but it's hard to test. */
700 #   endif
701 #   ifdef ULTRIX
702 #       define OS_TYPE "ULTRIX"
703 #       define STACKBOTTOM ((ptr_t) 0x7fffc800)
704 #   endif
705 # endif
706
707 # ifdef RT
708 #   define MACH_TYPE "RT"
709 #   define ALIGNMENT 4
710 #   define DATASTART ((ptr_t) 0x10000000)
711 #   define STACKBOTTOM ((ptr_t) 0x1fffd800)
712 # endif
713
714 # ifdef SPARC
715 #   define MACH_TYPE "SPARC"
716 #   if defined(__arch64__) || defined(__sparcv9)
717 #     define ALIGNMENT 8
718 #   else
719 #     define ALIGNMENT 4        /* Required by hardware */
720 #   endif
721 #   define ALIGN_DOUBLE
722 #   ifdef SUNOS5
723 #       define OS_TYPE "SUNOS5"
724         extern int _etext;
725         extern int _end;
726         extern char * GC_SysVGetDataStart();
727 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &_etext)
728 #       define DATAEND (&_end)
729 #       ifndef USE_MMAP
730 #           define USE_MMAP
731 #       endif
732 #       ifdef USE_MMAP
733 #         define HEAP_START (ptr_t)0x40000000
734 #       else
735 #         define HEAP_START DATAEND
736 #       endif
737 #       define PROC_VDB
738 /*      HEURISTIC1 reportedly no longer works under 2.7.                */
739 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
740 /*      Apparently USRSTACK is defined to be USERLIMIT, but in some     */
741 /*      installations that's undefined.  We work around this with a     */
742 /*      gross hack:                                                     */
743 #       include <sys/vmparam.h>
744 #       ifdef USERLIMIT
745           /* This should work everywhere, but doesn't.  */
746 #         define STACKBOTTOM USRSTACK
747 #       else
748 #         define HEURISTIC2
749 #       endif
750 #       include <unistd.h>
751 #       define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
752                 /* getpagesize() appeared to be missing from at least one */
753                 /* Solaris 5.4 installation.  Weird.                      */
754 #       define DYNAMIC_LOADING
755 #   endif
756 #   ifdef SUNOS4
757 #       define OS_TYPE "SUNOS4"
758         /* [If you have a weak stomach, don't read this.]               */
759         /* We would like to use:                                        */
760 /* #       define DATASTART ((ptr_t)((((word) (&etext)) + 0x1fff) & ~0x1fff)) */
761         /* This fails occasionally, due to an ancient, but very         */
762         /* persistent ld bug.  &etext is set 32 bytes too high.         */
763         /* We instead read the text segment size from the a.out         */
764         /* header, which happens to be mapped into our address space    */
765         /* at the start of the text segment.  The detective work here   */
766         /* was done by Robert Ehrlich, Manuel Serrano, and Bernard      */
767         /* Serpette of INRIA.                                           */
768         /* This assumes ZMAGIC, i.e. demand-loadable executables.       */
769 #       define TEXTSTART 0x2000
770 #       define DATASTART ((ptr_t)(*(int *)(TEXTSTART+0x4)+TEXTSTART))
771 #       define MPROTECT_VDB
772 #       define HEURISTIC1
773 #       define DYNAMIC_LOADING
774 #   endif
775 #   ifdef DRSNX
776 #       define CPP_WORDSZ 32
777 #       define OS_TYPE "DRSNX"
778         extern char * GC_SysVGetDataStart();
779         extern int etext;
780 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &etext)
781 #       define MPROTECT_VDB
782 #       define STACKBOTTOM ((ptr_t) 0xdfff0000)
783 #       define DYNAMIC_LOADING
784 #   endif
785 #   ifdef LINUX
786 #     define OS_TYPE "LINUX"
787 #     ifdef __ELF__
788 #       define DYNAMIC_LOADING
789 #     else
790           Linux Sparc/a.out not supported
791 #     endif
792       extern int _end;
793       extern int _etext;
794 #     define DATAEND (&_end)
795 #     define SVR4
796 #     ifdef __arch64__
797 #       define STACKBOTTOM ((ptr_t) 0x80000000000ULL)
798 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x100000, &_etext)
799 #       define CPP_WORDSZ 64
800 #     else
801 #       define STACKBOTTOM ((ptr_t) 0xf0000000)
802 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &_etext)
803 #     endif
804 #   endif
805 #   ifdef OPENBSD
806 #     define OS_TYPE "OPENBSD"
807 #     define STACKBOTTOM ((ptr_t) 0xf8000000)
808       extern int etext;
809 #     define DATASTART ((ptr_t)(&etext))
810 #   endif
811 #   ifdef NETBSD
812 #     define OS_TYPE "NETBSD"
813 #     define HEURISTIC2
814 #     ifdef __ELF__
815 #       define DATASTART GC_data_start
816 #       define DYNAMIC_LOADING
817 #     else
818         extern char etext;
819 #       define DATASTART ((ptr_t)(&etext))
820 #     endif
821 #   endif
822 # endif
823
824 # ifdef I386
825 #   define MACH_TYPE "I386"
826 #   define ALIGNMENT 4  /* Appears to hold for all "32 bit" compilers   */
827                         /* except Borland.  The -a4 option fixes        */
828                         /* Borland.                                     */
829                         /* Ivan Demakov: For Watcom the option is -zp4. */
830 #   ifndef SMALL_CONFIG
831 #     define ALIGN_DOUBLE /* Not strictly necessary, but may give speed   */
832                           /* improvement on Pentiums.                     */
833 #   endif
834 #   ifdef HAVE_BUILTIN_UNWIND_INIT
835 #       define USE_GENERIC_PUSH_REGS
836 #   endif
837 #   ifdef SEQUENT
838 #       define OS_TYPE "SEQUENT"
839         extern int etext;
840 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
841 #       define STACKBOTTOM ((ptr_t) 0x3ffff000) 
842 #   endif
843 #   ifdef BEOS
844 #     define OS_TYPE "BEOS"
845 #     include <OS.h>
846 #     define GETPAGESIZE() B_PAGE_SIZE
847       extern int etext;
848 #     define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
849 #   endif
850 #   ifdef SUNOS5
851 #       define OS_TYPE "SUNOS5"
852         extern int _etext, _end;
853         extern char * GC_SysVGetDataStart();
854 #       define DATASTART GC_SysVGetDataStart(0x1000, &_etext)
855 #       define DATAEND (&_end)
856 /*      # define STACKBOTTOM ((ptr_t)(&_start)) worked through 2.7,     */
857 /*      but reportedly breaks under 2.8.  It appears that the stack     */
858 /*      base is a property of the executable, so this should not break  */
859 /*      old executables.                                                */
860 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
861 #       include <sys/vmparam.h>
862 #       define STACKBOTTOM USRSTACK
863 /** At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
864 #       ifdef SOLARIS25_PROC_VDB_BUG_FIXED
865 #         define PROC_VDB
866 #       endif
867 #       define DYNAMIC_LOADING
868 #       ifndef USE_MMAP
869 #           define USE_MMAP
870 #       endif
871 #       ifdef USE_MMAP
872 #         define HEAP_START (ptr_t)0x40000000
873 #       else
874 #         define HEAP_START DATAEND
875 #       endif
876 #   endif
877 #   ifdef SCO
878 #       define OS_TYPE "SCO"
879         extern int etext;
880 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0x3fffff) \
881                                   & ~0x3fffff) \
882                                  +((word)&etext & 0xfff))
883 #       define STACKBOTTOM ((ptr_t) 0x7ffffffc)
884 #   endif
885 #   ifdef SCO_ELF
886 #       define OS_TYPE "SCO_ELF"
887         extern int etext;
888 #       define DATASTART ((ptr_t)(&etext))
889 #       define STACKBOTTOM ((ptr_t) 0x08048000)
890 #       define DYNAMIC_LOADING
891 #       define ELF_CLASS ELFCLASS32
892 #   endif
893 #   ifdef LINUX
894 #       define OS_TYPE "LINUX"
895 #       define LINUX_STACKBOTTOM
896 #       if 0
897 #         define HEURISTIC1
898 #         undef STACK_GRAN
899 #         define STACK_GRAN 0x10000000
900           /* STACKBOTTOM is usually 0xc0000000, but this changes with   */
901           /* different kernel configurations.  In particular, systems   */
902           /* with 2GB physical memory will usually move the user        */
903           /* address space limit, and hence initial SP to 0x80000000.   */
904 #       endif
905 #       if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
906 #           define MPROTECT_VDB
907 #       else
908             /* We seem to get random errors in incremental mode,        */
909             /* possibly because Linux threads is itself a malloc client */
910             /* and can't deal with the signals.                         */
911 #       endif
912 #       ifdef __ELF__
913 #            define DYNAMIC_LOADING
914 #            ifdef UNDEFINED    /* includes ro data */
915                extern int _etext;
916 #              define DATASTART ((ptr_t)((((word) (&_etext)) + 0xfff) & ~0xfff))
917 #            endif
918 #            include <features.h>
919 #            if defined(__GLIBC__) && __GLIBC__ >= 2
920 #                define LINUX_DATA_START
921 #            else
922                  extern char **__environ;
923 #                define DATASTART ((ptr_t)(&__environ))
924                               /* hideous kludge: __environ is the first */
925                               /* word in crt0.o, and delimits the start */
926                               /* of the data segment, no matter which   */
927                               /* ld options were passed through.        */
928                               /* We could use _etext instead, but that  */
929                               /* would include .rodata, which may       */
930                               /* contain large read-only data tables    */
931                               /* that we'd rather not scan.             */
932 #            endif
933              extern int _end;
934 #            define DATAEND (&_end)
935 #       else
936              extern int etext;
937 #            define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
938 #       endif
939 #       ifdef USE_I686_PREFETCH
940 #         define PREFETCH(x) \
941             __asm__ __volatile__ ("     prefetchnta     %0": : "m"(*(char *)(x)))
942             /* Empirically prefetcht0 is much more effective at reducing        */
943             /* cache miss stalls for the targetted load instructions.  But it   */
944             /* seems to interfere enough with other cache traffic that the net  */
945             /* result is worse than prefetchnta.                                */
946 #         if 0 
947             /* Using prefetches for write seems to have a slight negative       */
948             /* impact on performance, at least for a PIII/500.                  */
949 #           define PREFETCH_FOR_WRITE(x) \
950               __asm__ __volatile__ ("   prefetcht0      %0": : "m"(*(char *)(x)))
951 #         endif
952 #       endif
953 #       ifdef USE_3DNOW_PREFETCH
954 #         define PREFETCH(x) \
955             __asm__ __volatile__ ("     prefetch        %0": : "m"(*(char *)(x)))
956 #         define PREFETCH_FOR_WRITE(x) \
957             __asm__ __volatile__ ("     prefetchw       %0": : "m"(*(char *)(x)))
958 #       endif
959 #   endif
960 #   ifdef CYGWIN32
961 #       define OS_TYPE "CYGWIN32"
962           extern int _data_start__;
963           extern int _data_end__;
964           extern int _bss_start__;
965           extern int _bss_end__;
966         /* For binutils 2.9.1, we have                  */
967         /*      DATASTART   = _data_start__             */
968         /*      DATAEND     = _bss_end__                */
969         /* whereas for some earlier versions it was     */
970         /*      DATASTART   = _bss_start__              */
971         /*      DATAEND     = _data_end__               */
972         /* To get it right for both, we take the        */
973         /* minumum/maximum of the two.                  */
974 #       define MAX(x,y) ((x) > (y) ? (x) : (y))
975 #       define MIN(x,y) ((x) < (y) ? (x) : (y))
976 #       define DATASTART ((ptr_t) MIN(&_data_start__, &_bss_start__))
977 #       define DATAEND   ((ptr_t) MAX(&_data_end__, &_bss_end__))
978 #       undef STACK_GRAN
979 #       define STACK_GRAN 0x10000
980 #       define HEURISTIC1
981 #   endif
982 #   ifdef OS2
983 #       define OS_TYPE "OS2"
984                 /* STACKBOTTOM and DATASTART are handled specially in   */
985                 /* os_dep.c. OS2 actually has the right                 */
986                 /* system call!                                         */
987 #       define DATAEND  /* not needed */
988 #       define USE_GENERIC_PUSH_REGS
989 #   endif
990 #   ifdef MSWIN32
991 #       define OS_TYPE "MSWIN32"
992                 /* STACKBOTTOM and DATASTART are handled specially in   */
993                 /* os_dep.c.                                            */
994 #       ifndef __WATCOMC__
995 #         define MPROTECT_VDB
996 #       endif
997 #       define DATAEND  /* not needed */
998 #   endif
999 #   ifdef MSWINCE
1000 #       define OS_TYPE "MSWINCE"
1001 #       define DATAEND  /* not needed */
1002 #   endif
1003 #   ifdef DJGPP
1004 #       define OS_TYPE "DJGPP"
1005 #       include "stubinfo.h"
1006         extern int etext;
1007         extern int _stklen;
1008         extern int __djgpp_stack_limit;
1009 #       define DATASTART ((ptr_t)((((word) (&etext)) + 0x1ff) & ~0x1ff))
1010 /* #       define STACKBOTTOM ((ptr_t)((word) _stubinfo + _stubinfo->size \
1011                                                      + _stklen)) */
1012 #       define STACKBOTTOM ((ptr_t)((word) __djgpp_stack_limit + _stklen))
1013                 /* This may not be right.  */
1014 #   endif
1015 #   ifdef OPENBSD
1016 #       define OS_TYPE "OPENBSD"
1017 #   endif
1018 #   ifdef FREEBSD
1019 #       define OS_TYPE "FREEBSD"
1020 #       ifndef GC_FREEBSD_THREADS
1021 #           define MPROTECT_VDB
1022 #       endif
1023 #       define SIG_SUSPEND SIGUSR1
1024 #       define SIG_THR_RESTART SIGUSR2
1025 #       define FREEBSD_STACKBOTTOM
1026 #       ifdef __ELF__
1027 #           define DYNAMIC_LOADING
1028 #       endif
1029 #   endif
1030 #   ifdef NETBSD
1031 #       define OS_TYPE "NETBSD"
1032 #   endif
1033 #   ifdef THREE86BSD
1034 #       define OS_TYPE "THREE86BSD"
1035 #   endif
1036 #   ifdef BSDI
1037 #       define OS_TYPE "BSDI"
1038 #   endif
1039 #   if defined(OPENBSD) || defined(NETBSD) || defined(FREEBSD) \
1040         || defined(THREE86BSD) || defined(BSDI)
1041 #       define HEURISTIC2
1042         extern char etext;
1043 #       define DATASTART ((ptr_t)(&etext))
1044 #   endif
1045 #   ifdef NEXT
1046 #       define OS_TYPE "NEXT"
1047 #       define DATASTART ((ptr_t) get_etext())
1048 #       define STACKBOTTOM ((ptr_t)0xc0000000)
1049 #       define DATAEND  /* not needed */
1050 #   endif
1051 #   ifdef DOS4GW
1052 #     define OS_TYPE "DOS4GW"
1053       extern long __nullarea;
1054       extern char _end;
1055       extern char *_STACKTOP;
1056       /* Depending on calling conventions Watcom C either precedes
1057          or does not precedes with undescore names of C-variables.
1058          Make sure startup code variables always have the same names.  */
1059       #pragma aux __nullarea "*";
1060       #pragma aux _end "*";
1061 #     define STACKBOTTOM ((ptr_t) _STACKTOP)
1062                          /* confused? me too. */
1063 #     define DATASTART ((ptr_t) &__nullarea)
1064 #     define DATAEND ((ptr_t) &_end)
1065 #   endif
1066 #   ifdef HURD
1067 #     define OS_TYPE "HURD"
1068 #     define STACK_GROWS_DOWN
1069 #     define HEURISTIC2
1070       extern int  __data_start;
1071 #     define DATASTART ( (ptr_t) (&__data_start))
1072       extern int   _end;
1073 #     define DATAEND ( (ptr_t) (&_end))
1074 /* #     define MPROTECT_VDB  Not quite working yet? */
1075 #     define DYNAMIC_LOADING
1076 #   endif
1077 # endif
1078
1079 # ifdef NS32K
1080 #   define MACH_TYPE "NS32K"
1081 #   define ALIGNMENT 4
1082     extern char **environ;
1083 #   define DATASTART ((ptr_t)(&environ))
1084                               /* hideous kludge: environ is the first   */
1085                               /* word in crt0.o, and delimits the start */
1086                               /* of the data segment, no matter which   */
1087                               /* ld options were passed through.        */
1088 #   define STACKBOTTOM ((ptr_t) 0xfffff000) /* for Encore */
1089 # endif
1090
1091 # ifdef MIPS
1092 #   define MACH_TYPE "MIPS"
1093 #   ifdef LINUX
1094       /* This was developed for a linuxce style platform.  Probably     */
1095       /* needs to be tweaked for workstation class machines.            */
1096 #     define OS_TYPE "LINUX"
1097       extern int __data_start;
1098 #     define DATASTART ((ptr_t)(&__data_start))
1099 #     define ALIGNMENT 4
1100 #     define USE_GENERIC_PUSH_REGS
1101 #     define STACKBOTTOM ((ptr_t)0x7fff8000)
1102         /* Older toolchains may need 0x80000000.        */
1103         /* In many cases, this should probably use LINUX_STACKBOTTOM    */
1104         /* instead. But some kernel versions seem to give the wrong     */
1105         /* value from /proc.                                            */
1106 #   endif /* Linux */
1107 #   ifdef ULTRIX
1108 #       define HEURISTIC2
1109 #       define DATASTART (ptr_t)0x10000000
1110                               /* Could probably be slightly higher since */
1111                               /* startup code allocates lots of stuff.   */
1112 #       define OS_TYPE "ULTRIX"
1113 #       define ALIGNMENT 4
1114 #   endif
1115 #   ifdef RISCOS
1116 #       define HEURISTIC2
1117 #       define DATASTART (ptr_t)0x10000000
1118 #       define OS_TYPE "RISCOS"
1119 #       define ALIGNMENT 4  /* Required by hardware */
1120 #   endif
1121 #   ifdef IRIX5
1122 #       define HEURISTIC2
1123         extern int _fdata;
1124 #       define DATASTART ((ptr_t)(&_fdata))
1125 #       ifdef USE_MMAP
1126 #         define HEAP_START (ptr_t)0x30000000
1127 #       else
1128 #         define HEAP_START DATASTART
1129 #       endif
1130                               /* Lowest plausible heap address.         */
1131                               /* In the MMAP case, we map there.        */
1132                               /* In either case it is used to identify  */
1133                               /* heap sections so they're not           */
1134                               /* considered as roots.                   */
1135 #       define OS_TYPE "IRIX5"
1136 #       define MPROTECT_VDB
1137 #       ifdef _MIPS_SZPTR
1138 #         define CPP_WORDSZ _MIPS_SZPTR
1139 #         define ALIGNMENT (_MIPS_SZPTR/8)
1140 #         if CPP_WORDSZ != 64
1141 #           define ALIGN_DOUBLE
1142 #         endif
1143 #       else
1144 #         define ALIGNMENT 4
1145 #         define ALIGN_DOUBLE
1146 #       endif
1147 #       define DYNAMIC_LOADING
1148 #   endif
1149 #   ifdef MSWINCE
1150 #       define OS_TYPE "MSWINCE"
1151 #       define ALIGNMENT 4
1152 #       define DATAEND /* not needed */
1153 #   endif
1154 #   if defined(NETBSD)
1155       /* This also checked for __MIPSEL__ .  Why?  NETBSD recognition   */
1156       /* should be handled at the top of the file.                      */
1157 #     define ALIGNMENT 4
1158 #     define OS_TYPE "NETBSD"
1159 #     define HEURISTIC2
1160 #     define USE_GENERIC_PUSH_REGS
1161 #     ifdef __ELF__
1162         extern int etext;
1163 #       define DATASTART GC_data_start
1164 #       define NEED_FIND_LIMIT
1165 #       define DYNAMIC_LOADING
1166 #     else
1167 #       define DATASTART ((ptr_t) 0x10000000)
1168 #       define STACKBOTTOM ((ptr_t) 0x7ffff000)
1169 #     endif /* _ELF_ */
1170 #  endif
1171 # endif
1172
1173 # ifdef RS6000
1174 #   define MACH_TYPE "RS6000"
1175 #   define ALIGNMENT 4
1176 #   define DATASTART ((ptr_t)0x20000000)
1177     extern int errno;
1178 #   define STACKBOTTOM ((ptr_t)((ulong)&errno))
1179 #   define DYNAMIC_LOADING
1180         /* For really old versions of AIX, this may have to be removed. */
1181 # endif
1182
1183 # ifdef HP_PA
1184 #   define MACH_TYPE "HP_PA"
1185 #   ifdef __LP64__
1186 #     define CPP_WORDSZ 64
1187 #     define ALIGNMENT 8
1188 #   else
1189 #     define CPP_WORDSZ 32
1190 #     define ALIGNMENT 4
1191 #     define ALIGN_DOUBLE
1192 #   endif
1193 #   if !defined(GC_HPUX_THREADS) && !defined(GC_LINUX_THREADS)
1194 #     ifndef LINUX /* For now. */
1195 #       define MPROTECT_VDB
1196 #     endif
1197 #   else
1198 #     define GENERIC_COMPARE_AND_SWAP
1199         /* No compare-and-swap instruction.  Use pthread mutexes        */
1200         /* when we absolutely have to.                                  */
1201 #     ifdef PARALLEL_MARK
1202 #       define USE_MARK_BYTES
1203                 /* Minimize compare-and-swap usage.             */
1204 #     endif
1205 #   endif
1206 #   define STACK_GROWS_UP
1207 #   ifdef HPUX
1208 #     define OS_TYPE "HPUX"
1209       extern int __data_start;
1210 #     define DATASTART ((ptr_t)(&__data_start))
1211 #     if 0
1212         /* The following appears to work for 7xx systems running HP/UX  */
1213         /* 9.xx Furthermore, it might result in much faster             */
1214         /* collections than HEURISTIC2, which may involve scanning      */
1215         /* segments that directly precede the stack.  It is not the     */
1216         /* default, since it may not work on older machine/OS           */
1217         /* combinations. (Thanks to Raymond X.T. Nijssen for uncovering */
1218         /* this.)                                                       */
1219 #       define STACKBOTTOM ((ptr_t) 0x7b033000)  /* from /etc/conf/h/param.h */
1220 #     else
1221         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1222         /* to this.  Note that the GC must be initialized before the    */
1223         /* first putenv call.                                           */
1224         extern char ** environ;
1225 #       define STACKBOTTOM ((ptr_t)environ)
1226 #     endif
1227 #     define DYNAMIC_LOADING
1228 #     include <unistd.h>
1229 #     define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1230 #     ifndef __GNUC__
1231 #       define PREFETCH(x)  { \
1232                               register long addr = (long)(x); \
1233                               (void) _asm ("LDW", 0, 0, addr, 0); \
1234                             }
1235 #     endif
1236 #   endif /* HPUX */
1237 #   ifdef LINUX
1238 #     define OS_TYPE "LINUX"
1239 #     define LINUX_STACKBOTTOM
1240 #     define DYNAMIC_LOADING
1241 #     define LINUX_DATA_START
1242       extern int _end;
1243 #     define DATAEND (&_end)
1244 #   endif /* LINUX */
1245 # endif /* HP_PA */
1246
1247 # ifdef ALPHA
1248 #   define MACH_TYPE "ALPHA"
1249 #   define ALIGNMENT 8
1250 #   ifdef NETBSD
1251 #       define OS_TYPE "NETBSD"
1252 #       define HEURISTIC2
1253 #       define DATASTART GC_data_start
1254 #       define ELFCLASS32 32
1255 #       define ELFCLASS64 64
1256 #       define ELF_CLASS ELFCLASS64
1257 #       define CPP_WORDSZ 64
1258 #       define DYNAMIC_LOADING
1259 #   endif
1260 #   ifdef OPENBSD
1261 #       define OS_TYPE "OPENBSD"
1262 #       define HEURISTIC2
1263 #       define CPP_WORDSZ 64
1264 #       ifdef __ELF__   /* since OpenBSD/Alpha 2.9 */
1265 #          define DATASTART GC_data_start
1266 #          define ELFCLASS32 32
1267 #          define ELFCLASS64 64
1268 #          define ELF_CLASS ELFCLASS64
1269 #       else            /* ECOFF, until OpenBSD/Alpha 2.7 */
1270 #          define DATASTART ((ptr_t) 0x140000000)
1271 #       endif
1272 #   endif
1273 #   ifdef OSF1
1274 #       define OS_TYPE "OSF1"
1275 #       define DATASTART ((ptr_t) 0x140000000)
1276         extern int _end;
1277 #       define DATAEND ((ptr_t) &_end)
1278         extern char ** environ;
1279         /* round up from the value of environ to the nearest page boundary */
1280         /* Probably breaks if putenv is called before collector            */
1281         /* initialization.                                                 */
1282 #       define STACKBOTTOM ((ptr_t)(((word)(environ) | (getpagesize()-1))+1))
1283 /* #    define HEURISTIC2 */
1284         /* Normally HEURISTIC2 is too conervative, since                */
1285         /* the text segment immediately follows the stack.              */
1286         /* Hence we give an upper pound.                                */
1287         /* This is currently unused, since we disabled HEURISTIC2       */
1288         extern int __start;
1289 #       define HEURISTIC2_LIMIT ((ptr_t)((word)(&__start) & ~(getpagesize()-1)))
1290 #       define CPP_WORDSZ 64
1291 #       define MPROTECT_VDB
1292 #       define DYNAMIC_LOADING
1293 #   endif
1294 #   ifdef LINUX
1295 #       define OS_TYPE "LINUX"
1296 #       define CPP_WORDSZ 64
1297 #       define STACKBOTTOM ((ptr_t) 0x120000000)
1298 #       ifdef __ELF__
1299 #         define SEARCH_FOR_DATA_START
1300 #         define DATASTART GC_data_start
1301 #         define DYNAMIC_LOADING
1302 #       else
1303 #           define DATASTART ((ptr_t) 0x140000000)
1304 #       endif
1305         extern int _end;
1306 #       define DATAEND (&_end)
1307 #       define MPROTECT_VDB
1308                 /* Has only been superficially tested.  May not */
1309                 /* work on all versions.                        */
1310 #   endif
1311 # endif
1312
1313 # ifdef IA64
1314 #   define MACH_TYPE "IA64"
1315 #   define USE_GENERIC_PUSH_REGS
1316         /* We need to get preserved registers in addition to register   */
1317         /* windows.   That's easiest to do with setjmp.                 */
1318 #   ifdef PARALLEL_MARK
1319 #       define USE_MARK_BYTES
1320             /* Compare-and-exchange is too expensive to use for         */
1321             /* setting mark bits.                                       */
1322 #   endif
1323 #   ifdef HPUX
1324 #       ifdef _ILP32
1325 #         define CPP_WORDSZ 32
1326 #         define ALIGN_DOUBLE
1327             /* Requires 8 byte alignment for malloc */
1328 #         define ALIGNMENT 4
1329 #       else
1330 #         ifndef _LP64
1331                 ---> unknown ABI
1332 #         endif
1333 #         define CPP_WORDSZ 64
1334 #         define ALIGN_DOUBLE
1335             /* Requires 16 byte alignment for malloc */
1336 #         define ALIGNMENT 8
1337 #       endif
1338 #       define OS_TYPE "HPUX"   
1339         extern int __data_start;
1340 #       define DATASTART ((ptr_t)(&__data_start))
1341         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1342         /* to this.  Note that the GC must be initialized before the    */
1343         /* first putenv call.                                           */
1344         extern char ** environ;
1345 #       define STACKBOTTOM ((ptr_t)environ)
1346 #       define DYNAMIC_LOADING
1347 #       include <unistd.h>
1348 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1349         /* The following was empirically determined, and is probably    */
1350         /* not very robust.                                             */
1351         /* Note that the backing store base seems to be at a nice       */
1352         /* address minus one page.                                      */
1353 #       define BACKING_STORE_DISPLACEMENT 0x1000000
1354 #       define BACKING_STORE_ALIGNMENT 0x1000
1355 #       define BACKING_STORE_BASE \
1356           (ptr_t)(((word)GC_stackbottom - BACKING_STORE_DISPLACEMENT - 1) \
1357                         & ~(BACKING_STORE_ALIGNMENT - 1))
1358 #   endif
1359 #   ifdef LINUX
1360 #       define CPP_WORDSZ 64
1361 #       define ALIGN_DOUBLE
1362           /* Requires 16 byte alignment for malloc */
1363 #       define ALIGNMENT 8
1364 #       define OS_TYPE "LINUX"
1365         /* The following works on NUE and older kernels:        */
1366 /* #       define STACKBOTTOM ((ptr_t) 0xa000000000000000l)     */
1367         /* This does not work on NUE:                           */
1368 #       define LINUX_STACKBOTTOM
1369         /* We also need the base address of the register stack  */
1370         /* backing store.  This is computed in                  */
1371         /* GC_linux_register_stack_base based on the following  */
1372         /* constants:                                           */
1373 #       define BACKING_STORE_ALIGNMENT 0x100000
1374 #       define BACKING_STORE_DISPLACEMENT 0x80000000
1375         extern char * GC_register_stackbottom;
1376 #       define BACKING_STORE_BASE ((ptr_t)GC_register_stackbottom)
1377 #       define SEARCH_FOR_DATA_START
1378 #       define DATASTART GC_data_start
1379 #       define DYNAMIC_LOADING
1380 #       define MPROTECT_VDB
1381                 /* Requires Linux 2.3.47 or later.      */
1382         extern int _end;
1383 #       define DATAEND (&_end)
1384 #       ifdef __GNUC__
1385 #         define PREFETCH(x) \
1386             __asm__ ("  lfetch  [%0]": : "r"((void *)(x)))
1387 #         define PREFETCH_FOR_WRITE(x) \
1388             __asm__ ("  lfetch.excl     [%0]": : "r"((void *)(x)))
1389 #         define CLEAR_DOUBLE(x) \
1390             __asm__ ("  stf.spill       [%0]=f0": : "r"((void *)(x)))
1391 #       endif
1392 #   endif
1393 # endif
1394
1395 # ifdef M88K
1396 #   define MACH_TYPE "M88K"
1397 #   define ALIGNMENT 4
1398 #   define ALIGN_DOUBLE
1399     extern int etext;
1400 #   ifdef CX_UX
1401 #       define OS_TYPE "CX_UX"
1402 #       define DATASTART ((((word)&etext + 0x3fffff) & ~0x3fffff) + 0x10000)
1403 #   endif
1404 #   ifdef  DGUX
1405 #       define OS_TYPE "DGUX"
1406         extern char * GC_SysVGetDataStart();
1407 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &etext)
1408 #   endif
1409 #   define STACKBOTTOM ((char*)0xf0000000) /* determined empirically */
1410 # endif
1411
1412 # ifdef S370
1413 #   define MACH_TYPE "S370"
1414 #   define ALIGNMENT 4  /* Required by hardware */
1415 #   define USE_GENERIC_PUSH_REGS
1416 #   ifdef UTS4
1417 #       define OS_TYPE "UTS4"
1418         extern int etext;
1419         extern int _etext;
1420         extern int _end;
1421         extern char * GC_SysVGetDataStart();
1422 #       define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &_etext)
1423 #       define DATAEND (&_end)
1424 #       define HEURISTIC2
1425 #   endif
1426 #   ifdef LINUX
1427 #       define OS_TYPE "LINUX"
1428 #       define HEURISTIC1
1429 #       define DYNAMIC_LOADING
1430         extern int __data_start;
1431 #       define DATASTART ((ptr_t)(&__data_start))
1432 #   endif
1433 # endif
1434
1435 # if defined(PJ)
1436 #   define ALIGNMENT 4
1437     extern int _etext;
1438 #   define DATASTART ((ptr_t)(&_etext))
1439 #   define HEURISTIC1
1440 # endif
1441
1442 # ifdef ARM32
1443 #   define CPP_WORDSZ 32
1444 #   define MACH_TYPE "ARM32"
1445 #   define ALIGNMENT 4
1446 #   ifdef NETBSD
1447 #       define OS_TYPE "NETBSD"
1448 #       define HEURISTIC2
1449         extern char etext;
1450 #       define DATASTART ((ptr_t)(&etext))
1451 #       define USE_GENERIC_PUSH_REGS
1452 #   endif
1453 #   ifdef LINUX
1454 #       define OS_TYPE "LINUX"
1455 #       define HEURISTIC1
1456 #       undef STACK_GRAN
1457 #       define STACK_GRAN 0x10000000
1458 #       define USE_GENERIC_PUSH_REGS
1459 #       ifdef __ELF__
1460 #            define DYNAMIC_LOADING
1461 #            include <features.h>
1462 #            if defined(__GLIBC__) && __GLIBC__ >= 2
1463 #                define LINUX_DATA_START
1464 #            else
1465                  extern char **__environ;
1466 #                define DATASTART ((ptr_t)(&__environ))
1467                               /* hideous kludge: __environ is the first */
1468                               /* word in crt0.o, and delimits the start */
1469                               /* of the data segment, no matter which   */
1470                               /* ld options were passed through.        */
1471                               /* We could use _etext instead, but that  */
1472                               /* would include .rodata, which may       */
1473                               /* contain large read-only data tables    */
1474                               /* that we'd rather not scan.             */
1475 #            endif
1476              extern int _end;
1477 #            define DATAEND (&_end)
1478 #       else
1479              extern int etext;
1480 #            define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
1481 #       endif
1482 #   endif
1483 #   ifdef MSWINCE
1484 #     define OS_TYPE "MSWINCE"
1485 #     define DATAEND /* not needed */
1486 #   endif
1487 #endif
1488
1489 # ifdef SH
1490 #   define MACH_TYPE "SH"
1491 #   define ALIGNMENT 4
1492 #   ifdef MSWINCE
1493 #     define OS_TYPE "MSWINCE"
1494 #     define DATAEND /* not needed */
1495 #   endif
1496 #   ifdef LINUX
1497 #     define OS_TYPE "LINUX"
1498 #     define STACKBOTTOM ((ptr_t) 0x7c000000)
1499 #     define USE_GENERIC_PUSH_REGS
1500 #     define DYNAMIC_LOADING
1501 #     define LINUX_DATA_START
1502       extern int _end;
1503 #     define DATAEND (&_end)
1504 #   endif
1505 # endif
1506  
1507 # ifdef SH4
1508 #   define MACH_TYPE "SH4"
1509 #   define OS_TYPE "MSWINCE"
1510 #   define ALIGNMENT 4
1511 #   define DATAEND /* not needed */
1512 # endif
1513
1514 #ifdef LINUX_DATA_START
1515     /* Some Linux distributions arrange to define __data_start.  Some   */
1516     /* define data_start as a weak symbol.  The latter is technically   */
1517     /* broken, since the user program may define data_start, in which   */
1518     /* case we lose.  Nonetheless, we try both, prefering __data_start. */
1519     /* We assume gcc.   */
1520 #   pragma weak __data_start
1521     extern int __data_start;
1522 #   pragma weak data_start
1523     extern int data_start;
1524 #   define DATASTART ((ptr_t)(&__data_start != 0? &__data_start : &data_start))
1525 #endif
1526
1527 #if defined(LINUX) && defined(REDIRECT_MALLOC)
1528     /* Rld appears to allocate some memory with its own allocator, and  */
1529     /* some through malloc, which might be redirected.  To make this    */
1530     /* work with collectable memory, we have to scan memory allocated   */
1531     /* by rld's internal malloc.                                        */
1532 #   define USE_PROC_FOR_LIBRARIES
1533 #endif
1534     
1535 # ifndef STACK_GROWS_UP
1536 #   define STACK_GROWS_DOWN
1537 # endif
1538
1539 # ifndef CPP_WORDSZ
1540 #   define CPP_WORDSZ 32
1541 # endif
1542
1543 # ifndef OS_TYPE
1544 #   define OS_TYPE ""
1545 # endif
1546
1547 # ifndef DATAEND
1548     extern int end;
1549 #   define DATAEND (&end)
1550 # endif
1551
1552 # if defined(SVR4) && !defined(GETPAGESIZE)
1553 #    include <unistd.h>
1554 #    define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
1555 # endif
1556
1557 # ifndef GETPAGESIZE
1558 #   if defined(SUNOS5) || defined(IRIX5)
1559 #       include <unistd.h>
1560 #   endif
1561 #   define GETPAGESIZE() getpagesize()
1562 # endif
1563
1564 # if defined(SUNOS5) || defined(DRSNX) || defined(UTS4)
1565     /* OS has SVR4 generic features.  Probably others also qualify.     */
1566 #   define SVR4
1567 # endif
1568
1569 # if defined(SUNOS5) || defined(DRSNX)
1570     /* OS has SUNOS5 style semi-undocumented interface to dynamic       */
1571     /* loader.                                                          */
1572 #   define SUNOS5DL
1573     /* OS has SUNOS5 style signal handlers.                             */
1574 #   define SUNOS5SIGS
1575 # endif
1576
1577 # if defined(HPUX)
1578 #   define SUNOS5SIGS
1579 # endif
1580
1581 # if defined(SVR4) || defined(LINUX) || defined(IRIX) || defined(HPUX) \
1582     || defined(OPENBSD) || defined(NETBSD) || defined(FREEBSD) \
1583     || defined(BSD) || defined(AIX) || defined(MACOSX) || defined(OSF1)
1584 #   define UNIX_LIKE   /* Basic Unix-like system calls work.    */
1585 # endif
1586
1587 # if CPP_WORDSZ != 32 && CPP_WORDSZ != 64
1588    -> bad word size
1589 # endif
1590
1591 # ifdef PCR
1592 #   undef DYNAMIC_LOADING
1593 #   undef STACKBOTTOM
1594 #   undef HEURISTIC1
1595 #   undef HEURISTIC2
1596 #   undef PROC_VDB
1597 #   undef MPROTECT_VDB
1598 #   define PCR_VDB
1599 # endif
1600
1601 # ifdef SRC_M3
1602 /* Postponed for now. */
1603 #   undef PROC_VDB
1604 #   undef MPROTECT_VDB
1605 # endif
1606
1607 # ifdef SMALL_CONFIG
1608 /* Presumably not worth the space it takes. */
1609 #   undef PROC_VDB
1610 #   undef MPROTECT_VDB
1611 # endif
1612
1613 # ifdef USE_MUNMAP
1614 #   undef MPROTECT_VDB  /* Can't deal with address space holes. */
1615 # endif
1616
1617 # ifdef PARALLEL_MARK
1618 #   undef MPROTECT_VDB  /* For now.     */
1619 # endif
1620
1621 # if !defined(PCR_VDB) && !defined(PROC_VDB) && !defined(MPROTECT_VDB)
1622 #   define DEFAULT_VDB
1623 # endif
1624
1625 # ifndef PREFETCH
1626 #   define PREFETCH(x)
1627 #   define NO_PREFETCH
1628 # endif
1629
1630 # ifndef PREFETCH_FOR_WRITE
1631 #   define PREFETCH_FOR_WRITE(x)
1632 #   define NO_PREFETCH_FOR_WRITE
1633 # endif
1634
1635 # ifndef CACHE_LINE_SIZE
1636 #   define CACHE_LINE_SIZE 32   /* Wild guess   */
1637 # endif
1638
1639 # ifndef CLEAR_DOUBLE
1640 #   define CLEAR_DOUBLE(x) \
1641         ((word*)x)[0] = 0; \
1642         ((word*)x)[1] = 0;
1643 # endif /* CLEAR_DOUBLE */
1644
1645 /* Internally we use GC_SOLARIS_THREADS to test for either old or pthreads. */
1646 # if defined(GC_SOLARIS_PTHREADS) && !defined(GC_SOLARIS_THREADS)
1647 #   define GC_SOLARIS_THREADS
1648 # endif
1649
1650 # if defined(GC_IRIX_THREADS) && !defined(IRIX5)
1651 --> inconsistent configuration
1652 # endif
1653 # if defined(GC_LINUX_THREADS) && !defined(LINUX)
1654 --> inconsistent configuration
1655 # endif
1656 # if defined(GC_SOLARIS_THREADS) && !defined(SUNOS5)
1657 --> inconsistent configuration
1658 # endif
1659 # if defined(GC_HPUX_THREADS) && !defined(HPUX)
1660 --> inconsistent configuration
1661 # endif
1662 # if defined(GC_WIN32_THREADS) && !defined(MSWIN32)
1663     /* Ideally CYGWIN32 should work, in addition to MSWIN32.  I suspect */
1664     /* the necessary code is mostly there, but nobody has actually made */
1665     /* sure the right combination of pieces is compiled in, etc.        */
1666 --> inconsistent configuration
1667 # endif
1668
1669 # if defined(PCR) || defined(SRC_M3) || \
1670         defined(GC_SOLARIS_THREADS) || defined(GC_WIN32_THREADS) || \
1671         defined(GC_PTHREADS)
1672 #   define THREADS
1673 # endif
1674
1675 # if defined(HP_PA) || defined(M88K) || defined(POWERPC) && !defined(MACOSX) \
1676      || defined(LINT) || defined(MSWINCE) \
1677      || (defined(I386) && defined(__LCC__))
1678         /* Use setjmp based hack to mark from callee-save registers.    */
1679         /* The define should move to the individual platform            */
1680         /* descriptions.                                                */
1681 #       define USE_GENERIC_PUSH_REGS
1682 # endif
1683 # if defined(I386) && defined(LINUX)
1684     /* SAVE_CALL_CHAIN is supported if the code is compiled to save     */
1685     /* frame pointers by default, i.e. no -fomit-frame-pointer flag.    */
1686 # ifdef SAVE_CALL_COUNT
1687 #   define SAVE_CALL_CHAIN 
1688 # endif
1689 # endif
1690 # if defined(SPARC)
1691 #   define SAVE_CALL_CHAIN
1692 #   define ASM_CLEAR_CODE       /* Stack clearing is crucial, and we    */
1693                                 /* include assembly code to do it well. */
1694 # endif
1695
1696 # endif /* GCCONFIG_H */