OSDN Git Service

2005-05-25 Andrew Haley <aph@redhat.com>
[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-2004 Hewlett-Packard Development Company, L.P.
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 /*
18  * This header is private to the gc.  It is almost always included from
19  * gc_priv.h.  However it is possible to include it by itself if just the
20  * configuration macros are needed.  In that
21  * case, a few declarations relying on types declared in gc_priv.h will be
22  * omitted.
23  */
24  
25 #ifndef GCCONFIG_H
26
27 # define GCCONFIG_H
28
29 # ifndef GC_PRIVATE_H
30     /* Fake ptr_t declaration, just to avoid compilation errors.        */
31     /* This avoids many instances if "ifndef GC_PRIVATE_H" below.       */
32     typedef struct GC_undefined_struct * ptr_t;
33 # endif
34
35 /* Machine dependent parameters.  Some tuning parameters can be found   */
36 /* near the top of gc_private.h.                                        */
37
38 /* Machine specific parts contributed by various people.  See README file. */
39
40 /* First a unified test for Linux: */
41 # if defined(linux) || defined(__linux__)
42 #  ifndef LINUX
43 #    define LINUX
44 #  endif
45 # endif
46
47 /* And one for NetBSD: */
48 # if defined(__NetBSD__)
49 #    define NETBSD
50 # endif
51
52 /* And one for OpenBSD: */
53 # if defined(__OpenBSD__)
54 #    define OPENBSD
55 # endif
56
57 /* And one for FreeBSD: */
58 # if defined(__FreeBSD__)
59 #    define FREEBSD
60 # endif
61
62 /* Determine the machine type: */
63 # if defined(__arm__) || defined(__thumb__)
64 #    define ARM32
65 #    if !defined(LINUX) && !defined(NETBSD)
66 #      define NOSYS
67 #      define mach_type_known
68 #    endif
69 # endif
70 # if defined(sun) && defined(mc68000)
71 #    define M68K
72 #    define SUNOS4
73 #    define mach_type_known
74 # endif
75 # if defined(hp9000s300)
76 #    define M68K
77 #    define HP
78 #    define mach_type_known
79 # endif
80 # if defined(OPENBSD) && defined(m68k)
81 #    define M68K
82 #    define mach_type_known
83 # endif
84 # if defined(OPENBSD) && defined(__sparc__)
85 #    define SPARC
86 #    define mach_type_known
87 # endif
88 # if defined(NETBSD) && (defined(m68k) || defined(__m68k__))
89 #    define M68K
90 #    define mach_type_known
91 # endif
92 # if defined(NETBSD) && defined(__powerpc__)
93 #    define POWERPC
94 #    define mach_type_known
95 # endif
96 # if defined(NETBSD) && (defined(__arm32__) || defined(__arm__))
97 #    define ARM32
98 #    define mach_type_known
99 # endif
100 # if defined(vax)
101 #    define VAX
102 #    ifdef ultrix
103 #       define ULTRIX
104 #    else
105 #       define BSD
106 #    endif
107 #    define mach_type_known
108 # endif
109 # if defined(__NetBSD__) && defined(__vax__)
110 #    define VAX
111 #    define mach_type_known
112 # endif
113 # if defined(mips) || defined(__mips) || defined(_mips)
114 #    define MIPS
115 #    if defined(nec_ews) || defined(_nec_ews)
116 #      define EWS4800
117 #    endif
118 #    if !defined(LINUX) && !defined(EWS4800) && !defined(NETBSD)
119 #      if defined(ultrix) || defined(__ultrix)
120 #        define ULTRIX
121 #      else
122 #        if defined(_SYSTYPE_SVR4) || defined(SYSTYPE_SVR4) \
123             || defined(__SYSTYPE_SVR4__)
124 #          define IRIX5   /* or IRIX 6.X */
125 #        else
126 #          define RISCOS  /* or IRIX 4.X */
127 #        endif
128 #      endif
129 #    endif /* !LINUX */
130 #    define mach_type_known
131 # endif
132 # if defined(DGUX) && (defined(i386) || defined(__i386__))
133 #    define I386
134 #    ifndef _USING_DGUX
135 #    define _USING_DGUX
136 #    endif
137 #    define mach_type_known
138 # endif
139 # if defined(sequent) && (defined(i386) || defined(__i386__))
140 #    define I386
141 #    define SEQUENT
142 #    define mach_type_known
143 # endif
144 # if defined(sun) && (defined(i386) || defined(__i386__))
145 #    define I386
146 #    define SUNOS5
147 #    define mach_type_known
148 # endif
149 # if (defined(__OS2__) || defined(__EMX__)) && defined(__32BIT__)
150 #    define I386
151 #    define OS2
152 #    define mach_type_known
153 # endif
154 # if defined(ibm032)
155 #   define RT
156 #   define mach_type_known
157 # endif
158 # if defined(sun) && (defined(sparc) || defined(__sparc))
159 #   define SPARC
160     /* Test for SunOS 5.x */
161 #     include <errno.h>
162 #     ifdef ECHRNG
163 #       define SUNOS5
164 #     else
165 #       define SUNOS4
166 #     endif
167 #   define mach_type_known
168 # endif
169 # if defined(sparc) && defined(unix) && !defined(sun) && !defined(linux) \
170      && !defined(__OpenBSD__) && !(__NetBSD__)
171 #   define SPARC
172 #   define DRSNX
173 #   define mach_type_known
174 # endif
175 # if defined(_IBMR2)
176 #   define RS6000
177 #   define mach_type_known
178 # endif
179 # if defined(__NetBSD__) && defined(__sparc__)
180 #   define SPARC
181 #   define mach_type_known
182 # endif
183 # if defined(_M_XENIX) && defined(_M_SYSV) && defined(_M_I386)
184         /* The above test may need refinement   */
185 #   define I386
186 #   if defined(_SCO_ELF)
187 #     define SCO_ELF
188 #   else
189 #     define SCO
190 #   endif
191 #   define mach_type_known
192 # endif
193 # if defined(_AUX_SOURCE)
194 #   define M68K
195 #   define SYSV
196 #   define mach_type_known
197 # endif
198 # if defined(_PA_RISC1_0) || defined(_PA_RISC1_1) || defined(_PA_RISC2_0) \
199      || defined(hppa) || defined(__hppa__)
200 #   define HP_PA
201 #   ifndef LINUX
202 #     define HPUX
203 #   endif
204 #   define mach_type_known
205 # endif
206 # if defined(__ia64) && defined(_HPUX_SOURCE)
207 #   define IA64
208 #   define HPUX
209 #   define mach_type_known
210 # endif
211 # if defined(__BEOS__) && defined(_X86_)
212 #    define I386
213 #    define BEOS
214 #    define mach_type_known
215 # endif
216 # if defined(LINUX) && (defined(i386) || defined(__i386__))
217 #    define I386
218 #    define mach_type_known
219 # endif
220 # if defined(LINUX) && defined(__x86_64__)
221 #    define X86_64
222 #    define mach_type_known
223 # endif
224 # if defined(LINUX) && (defined(__ia64__) || defined(__ia64))
225 #    define IA64
226 #    define mach_type_known
227 # endif
228 # if defined(LINUX) && defined(__arm__)
229 #    define ARM32
230 #    define mach_type_known
231 # endif
232 # if defined(LINUX) && defined(__cris__)
233 #    ifndef CRIS
234 #       define CRIS
235 #    endif
236 #    define mach_type_known
237 # endif
238 # if defined(LINUX) && (defined(powerpc) || defined(__powerpc__) || defined(powerpc64) || defined(__powerpc64__))
239 #    define POWERPC
240 #    define mach_type_known
241 # endif
242 # if defined(LINUX) && defined(__mc68000__)
243 #    define M68K
244 #    define mach_type_known
245 # endif
246 # if defined(LINUX) && (defined(sparc) || defined(__sparc__))
247 #    define SPARC
248 #    define mach_type_known
249 # endif
250 # if defined(LINUX) && defined(__arm__)
251 #    define ARM32
252 #    define mach_type_known
253 # endif
254 # if defined(LINUX) && defined(__sh__)
255 #    define SH
256 #    define mach_type_known
257 # endif
258 # if defined(LINUX) && defined(__m32r__)
259 #    define M32R
260 #    define mach_type_known
261 # endif
262 # if defined(__alpha) || defined(__alpha__)
263 #   define ALPHA
264 #   if !defined(LINUX) && !defined(NETBSD) && !defined(OPENBSD) && !defined(FREEBSD)
265 #     define OSF1       /* a.k.a Digital Unix */
266 #   endif
267 #   define mach_type_known
268 # endif
269 # if defined(_AMIGA) && !defined(AMIGA)
270 #   define AMIGA
271 # endif
272 # ifdef AMIGA 
273 #   define M68K
274 #   define mach_type_known
275 # endif
276 # if defined(THINK_C) || defined(__MWERKS__) && !defined(__powerc)
277 #   define M68K
278 #   define MACOS
279 #   define mach_type_known
280 # endif
281 # if defined(__MWERKS__) && defined(__powerc) && !defined(__MACH__)
282 #   define POWERPC
283 #   define MACOS
284 #   define mach_type_known
285 # endif
286 # if defined(macosx) \
287      || defined(__APPLE__) && defined(__MACH__) && defined(__ppc__) \
288      || defined(__APPLE__) && defined(__MACH__) && defined(__ppc64__)
289 #    define DARWIN
290 #    define POWERPC
291 #    define mach_type_known
292 # endif
293 # if defined(__APPLE__) && defined(__MACH__) && defined(__i386__)
294 #    define DARWIN
295 #    define I386
296      --> Not really supported, but at least we recognize it.
297 # endif
298 # if defined(NeXT) && defined(mc68000)
299 #   define M68K
300 #   define NEXT
301 #   define mach_type_known
302 # endif
303 # if defined(NeXT) && (defined(i386) || defined(__i386__))
304 #   define I386
305 #   define NEXT
306 #   define mach_type_known
307 # endif
308 # if defined(__OpenBSD__) && (defined(i386) || defined(__i386__))
309 #   define I386
310 #   define OPENBSD
311 #   define mach_type_known
312 # endif
313 # if defined(FREEBSD) && (defined(i386) || defined(__i386__))
314 #   define I386
315 #   define mach_type_known
316 # endif
317 # if defined(__NetBSD__) && (defined(i386) || defined(__i386__))
318 #   define I386
319 #   define mach_type_known
320 # endif
321 # if defined(__NetBSD__) && defined(__x86_64__)
322 #    define X86_64
323 #    define mach_type_known
324 # endif
325 # if defined(bsdi) && (defined(i386) || defined(__i386__))
326 #    define I386
327 #    define BSDI
328 #    define mach_type_known
329 # endif
330 # if !defined(mach_type_known) && defined(__386BSD__)
331 #   define I386
332 #   define THREE86BSD
333 #   define mach_type_known
334 # endif
335 # if defined(_CX_UX) && defined(_M88K)
336 #   define M88K
337 #   define CX_UX
338 #   define mach_type_known
339 # endif
340 # if defined(DGUX) && defined(m88k)
341 #   define M88K
342     /* DGUX defined */
343 #   define mach_type_known
344 # endif
345 # if defined(_WIN32_WCE)
346     /* SH3, SH4, MIPS already defined for corresponding architectures */
347 #   if defined(SH3) || defined(SH4)
348 #     define SH
349 #   endif
350 #   if defined(x86)
351 #     define I386
352 #   endif
353 #   if defined(ARM)
354 #     define ARM32
355 #   endif
356 #   define MSWINCE
357 #   define mach_type_known
358 # else
359 #   if (defined(_MSDOS) || defined(_MSC_VER)) && (_M_IX86 >= 300) \
360         || defined(_WIN32) && !defined(__CYGWIN32__) && !defined(__CYGWIN__)
361 #     define I386
362 #     define MSWIN32    /* or Win32s */
363 #     define mach_type_known
364 #   endif
365 #   if defined(_MSC_VER) && defined(_M_IA64)
366 #     define IA64
367 #     define MSWIN32    /* Really win64, but we don't treat 64-bit      */
368                         /* variants as a differnt platform.             */
369 #   endif
370 # endif
371 # if defined(__DJGPP__)
372 #   define I386
373 #   ifndef DJGPP
374 #     define DJGPP  /* MSDOS running the DJGPP port of GCC */
375 #   endif
376 #   define mach_type_known
377 # endif
378 # if defined(__CYGWIN32__) || defined(__CYGWIN__)
379 #   define I386
380 #   define CYGWIN32
381 #   define mach_type_known
382 # endif
383 # if defined(__MINGW32__)
384 #   define I386
385 #   define MSWIN32
386 #   define mach_type_known
387 # endif
388 # if defined(__BORLANDC__)
389 #   define I386
390 #   define MSWIN32
391 #   define mach_type_known
392 # endif
393 # if defined(_UTS) && !defined(mach_type_known)
394 #   define S370
395 #   define UTS4
396 #   define mach_type_known
397 # endif
398 # if defined(__pj__)
399 #   define PJ
400 #   define mach_type_known
401 # endif
402 # if defined(__embedded__) && defined(PPC)
403 #   define POWERPC
404 #   define NOSYS
405 #   define mach_type_known
406 # endif
407 /* Ivan Demakov */
408 # if defined(__WATCOMC__) && defined(__386__)
409 #   define I386
410 #   if !defined(OS2) && !defined(MSWIN32) && !defined(DOS4GW)
411 #     if defined(__OS2__)
412 #       define OS2
413 #     else
414 #       if defined(__WINDOWS_386__) || defined(__NT__)
415 #         define MSWIN32
416 #       else
417 #         define DOS4GW
418 #       endif
419 #     endif
420 #   endif
421 #   define mach_type_known
422 # endif
423 # if defined(__s390__) && defined(LINUX)
424 #    define S390
425 #    define mach_type_known
426 # endif
427 # if defined(__GNU__)
428 #   if defined(__i386__)
429 /* The Debian Hurd running on generic PC */  
430 #     define  HURD
431 #     define  I386
432 #     define  mach_type_known
433 #    endif 
434 # endif
435
436 /* Feel free to add more clauses here */
437
438 /* Or manually define the machine type here.  A machine type is         */
439 /* characterized by the architecture.  Some                             */
440 /* machine types are further subdivided by OS.                          */
441 /* the macros ULTRIX, RISCOS, and BSD to distinguish.                   */
442 /* Note that SGI IRIX is treated identically to RISCOS.                 */
443 /* SYSV on an M68K actually means A/UX.                                 */
444 /* The distinction in these cases is usually the stack starting address */
445 # ifndef mach_type_known
446         --> unknown machine type
447 # endif
448                     /* Mapping is: M68K       ==> Motorola 680X0        */
449                     /*             (SUNOS4,HP,NEXT, and SYSV (A/UX),    */
450                     /*             MACOS and AMIGA variants)            */
451                     /*             I386       ==> Intel 386             */
452                     /*              (SEQUENT, OS2, SCO, LINUX, NETBSD,  */
453                     /*               FREEBSD, THREE86BSD, MSWIN32,      */
454                     /*               BSDI,SUNOS5, NEXT, other variants) */
455                     /*             NS32K      ==> Encore Multimax       */
456                     /*             MIPS       ==> R2000 or R3000        */
457                     /*                  (RISCOS, ULTRIX variants)       */
458                     /*             VAX        ==> DEC VAX               */
459                     /*                  (BSD, ULTRIX variants)          */
460                     /*             RS6000     ==> IBM RS/6000 AIX3.X    */
461                     /*             RT         ==> IBM PC/RT             */
462                     /*             HP_PA      ==> HP9000/700 & /800     */
463                     /*                            HP/UX, LINUX          */
464                     /*             SPARC      ==> SPARC v7/v8/v9        */
465                     /*                  (SUNOS4, SUNOS5, LINUX,         */
466                     /*                   DRSNX variants)                */
467                     /*             ALPHA      ==> DEC Alpha             */
468                     /*                  (OSF1 and LINUX variants)       */
469                     /*             M88K       ==> Motorola 88XX0        */
470                     /*                  (CX_UX and DGUX)                */
471                     /*             S370       ==> 370-like machine      */
472                     /*                  running Amdahl UTS4             */
473                     /*             S390       ==> 390-like machine      */
474                     /*                  running LINUX                   */
475                     /*             ARM32      ==> Intel StrongARM       */
476                     /*             IA64       ==> Intel IPF             */
477                     /*                            (e.g. Itanium)        */
478                     /*                  (LINUX and HPUX)                */
479                     /*             SH         ==> Hitachi SuperH        */
480                     /*                  (LINUX & MSWINCE)               */
481                     /*             X86_64     ==> AMD x86-64            */
482                     /*             POWERPC    ==> IBM/Apple PowerPC     */
483                     /*                  (MACOS(<=9),DARWIN(incl.MACOSX),*/
484                     /*                   LINUX, NETBSD, NOSYS variants) */
485                     /*             CRIS       ==> Axis Etrax            */
486                     /*             M32R       ==> Renesas M32R          */
487
488
489 /*
490  * For each architecture and OS, the following need to be defined:
491  *
492  * CPP_WORD_SZ is a simple integer constant representing the word size.
493  * in bits.  We assume byte addressibility, where a byte has 8 bits.
494  * We also assume CPP_WORD_SZ is either 32 or 64.
495  * (We care about the length of pointers, not hardware
496  * bus widths.  Thus a 64 bit processor with a C compiler that uses
497  * 32 bit pointers should use CPP_WORD_SZ of 32, not 64. Default is 32.)
498  *
499  * MACH_TYPE is a string representation of the machine type.
500  * OS_TYPE is analogous for the OS.
501  *
502  * ALIGNMENT is the largest N, such that
503  * all pointer are guaranteed to be aligned on N byte boundaries.
504  * defining it to be 1 will always work, but perform poorly.
505  *
506  * DATASTART is the beginning of the data segment.
507  * On some platforms SEARCH_FOR_DATA_START is defined.
508  * SEARCH_FOR_DATASTART will cause GC_data_start to
509  * be set to an address determined by accessing data backwards from _end
510  * until an unmapped page is found.  DATASTART will be defined to be
511  * GC_data_start.
512  * On UNIX-like systems, the collector will scan the area between DATASTART
513  * and DATAEND for root pointers.
514  *
515  * DATAEND, if not `end' where `end' is defined as ``extern int end[];''.
516  * RTH suggests gaining access to linker script synth'd values with
517  * this idiom instead of `&end' where `end' is defined as ``extern int end;'' .
518  * Otherwise, ``GCC will assume these are in .sdata/.sbss'' and it will, e.g.,
519  * cause failures on alpha*-*-* with ``-msmall-data or -fpic'' or mips-*-*
520  * without any special options.
521  *
522  * ALIGN_DOUBLE of GC_malloc should return blocks aligned to twice
523  * the pointer size.
524  *
525  * STACKBOTTOM is the cool end of the stack, which is usually the
526  * highest address in the stack.
527  * Under PCR or OS/2, we have other ways of finding thread stacks.
528  * For each machine, the following should:
529  * 1) define STACK_GROWS_UP if the stack grows toward higher addresses, and
530  * 2) define exactly one of
531  *      STACKBOTTOM (should be defined to be an expression)
532  *      LINUX_STACKBOTTOM
533  *      HEURISTIC1
534  *      HEURISTIC2
535  * If STACKBOTTOM is defined, then it's value will be used directly as the
536  * stack base.  If LINUX_STACKBOTTOM is defined, then it will be determined
537  * with a method appropriate for most Linux systems.  Currently we look
538  * first for __libc_stack_end, and if that fails read it from /proc.
539  * If either of the last two macros are defined, then STACKBOTTOM is computed
540  * during collector startup using one of the following two heuristics:
541  * HEURISTIC1:  Take an address inside GC_init's frame, and round it up to
542  *              the next multiple of STACK_GRAN.
543  * HEURISTIC2:  Take an address inside GC_init's frame, increment it repeatedly
544  *              in small steps (decrement if STACK_GROWS_UP), and read the value
545  *              at each location.  Remember the value when the first
546  *              Segmentation violation or Bus error is signalled.  Round that
547  *              to the nearest plausible page boundary, and use that instead
548  *              of STACKBOTTOM.
549  *
550  * Gustavo Rodriguez-Rivera points out that on most (all?) Unix machines,
551  * the value of environ is a pointer that can serve as STACKBOTTOM.
552  * I expect that HEURISTIC2 can be replaced by this approach, which
553  * interferes far less with debugging.  However it has the disadvantage
554  * that it's confused by a putenv call before the collector is initialized.
555  * This could be dealt with by intercepting putenv ...
556  *
557  * If no expression for STACKBOTTOM can be found, and neither of the above
558  * heuristics are usable, the collector can still be used with all of the above
559  * undefined, provided one of the following is done:
560  * 1) GC_mark_roots can be changed to somehow mark from the correct stack(s)
561  *    without reference to STACKBOTTOM.  This is appropriate for use in
562  *    conjunction with thread packages, since there will be multiple stacks.
563  *    (Allocating thread stacks in the heap, and treating them as ordinary
564  *    heap data objects is also possible as a last resort.  However, this is
565  *    likely to introduce significant amounts of excess storage retention
566  *    unless the dead parts of the thread stacks are periodically cleared.)
567  * 2) Client code may set GC_stackbottom before calling any GC_ routines.
568  *    If the author of the client code controls the main program, this is
569  *    easily accomplished by introducing a new main program, setting
570  *    GC_stackbottom to the address of a local variable, and then calling
571  *    the original main program.  The new main program would read something
572  *    like:
573  *
574  *              # include "gc_private.h"
575  *
576  *              main(argc, argv, envp)
577  *              int argc;
578  *              char **argv, **envp;
579  *              {
580  *                  int dummy;
581  *
582  *                  GC_stackbottom = (ptr_t)(&dummy);
583  *                  return(real_main(argc, argv, envp));
584  *              }
585  *
586  *
587  * Each architecture may also define the style of virtual dirty bit
588  * implementation to be used:
589  *   MPROTECT_VDB: Write protect the heap and catch faults.
590  *   PROC_VDB: Use the SVR4 /proc primitives to read dirty bits.
591  *
592  * An architecture may define DYNAMIC_LOADING if dynamic_load.c
593  * defined GC_register_dynamic_libraries() for the architecture.
594  *
595  * An architecture may define PREFETCH(x) to preload the cache with *x.
596  * This defaults to a no-op.
597  *
598  * PREFETCH_FOR_WRITE(x) is used if *x is about to be written.
599  *
600  * An architecture may also define CLEAR_DOUBLE(x) to be a fast way to
601  * clear the two words at GC_malloc-aligned address x.  By default,
602  * word stores of 0 are used instead.
603  *
604  * HEAP_START may be defined as the initial address hint for mmap-based
605  * allocation.
606  */
607
608 /* If we are using a recent version of gcc, we can use __builtin_unwind_init()
609  * to push the relevant registers onto the stack.  This generally makes
610  * USE_GENERIC_PUSH_REGS the preferred approach for marking from registers.
611  */
612 # if defined(__GNUC__) && ((__GNUC__ >= 3) || \
613                            (__GNUC__ == 2 && __GNUC_MINOR__ >= 8)) \
614                        && !defined(__INTEL_COMPILER)
615 #   define HAVE_BUILTIN_UNWIND_INIT
616 # endif
617
618 # define STACK_GRAN 0x1000000
619 # ifdef M68K
620 #   define MACH_TYPE "M68K"
621 #   define ALIGNMENT 2
622 #   ifdef OPENBSD
623 #       define OS_TYPE "OPENBSD"
624 #       define HEURISTIC2
625 #       ifdef __ELF__
626 #         define DATASTART GC_data_start
627 #         define DYNAMIC_LOADING
628 #       else
629           extern char etext[];
630 #         define DATASTART ((ptr_t)(etext))
631 #       endif
632 #       define USE_GENERIC_PUSH_REGS
633 #   endif
634 #   ifdef NETBSD
635 #       define OS_TYPE "NETBSD"
636 #       define HEURISTIC2
637 #       ifdef __ELF__
638 #         define DATASTART GC_data_start
639 #         define DYNAMIC_LOADING
640 #       else
641           extern char etext[];
642 #         define DATASTART ((ptr_t)(etext))
643 #       endif
644 #       define USE_GENERIC_PUSH_REGS
645 #   endif
646 #   ifdef LINUX
647 #       define OS_TYPE "LINUX"
648 #       define STACKBOTTOM ((ptr_t)0xf0000000)
649 #       define USE_GENERIC_PUSH_REGS
650 #            define USE_MMAP
651               /* We never got around to the assembly version. */
652 /* #       define MPROTECT_VDB - Reported to not work  9/17/01 */
653 #       ifdef __ELF__
654 #            define DYNAMIC_LOADING
655 #            include <features.h>
656 #            if defined(__GLIBC__)&& __GLIBC__>=2
657 #              define SEARCH_FOR_DATA_START
658 #            else /* !GLIBC2 */
659                extern char **__environ;
660 #              define DATASTART ((ptr_t)(&__environ))
661                              /* hideous kludge: __environ is the first */
662                              /* word in crt0.o, and delimits the start */
663                              /* of the data segment, no matter which   */
664                              /* ld options were passed through.        */
665                              /* We could use _etext instead, but that  */
666                              /* would include .rodata, which may       */
667                              /* contain large read-only data tables    */
668                              /* that we'd rather not scan.             */
669 #            endif /* !GLIBC2 */
670              extern int _end[];
671 #            define DATAEND (_end)
672 #       else
673              extern int etext[];
674 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
675 #       endif
676 #   endif
677 #   ifdef SUNOS4
678 #       define OS_TYPE "SUNOS4"
679         extern char etext[];
680 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1ffff) & ~0x1ffff))
681 #       define HEURISTIC1       /* differs      */
682 #       define DYNAMIC_LOADING
683 #   endif
684 #   ifdef HP
685 #       define OS_TYPE "HP"
686         extern char etext[];
687 #       define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
688 #       define STACKBOTTOM ((ptr_t) 0xffeffffc)
689                               /* empirically determined.  seems to work. */
690 #       include <unistd.h>
691 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
692 #   endif
693 #   ifdef SYSV
694 #       define OS_TYPE "SYSV"
695         extern etext[];
696 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x3fffff) \
697                                    & ~0x3fffff) \
698                                   +((word)etext & 0x1fff))
699         /* This only works for shared-text binaries with magic number 0413.
700            The other sorts of SysV binaries put the data at the end of the text,
701            in which case the default of etext would work.  Unfortunately,
702            handling both would require having the magic-number available.
703                                 -- Parag
704            */
705 #       define STACKBOTTOM ((ptr_t)0xFFFFFFFE)
706                         /* The stack starts at the top of memory, but   */
707                         /* 0x0 cannot be used as setjump_test complains */
708                         /* that the stack direction is incorrect.  Two  */
709                         /* bytes down from 0x0 should be safe enough.   */
710                         /*              --Parag                         */
711 #       include <sys/mmu.h>
712 #       define GETPAGESIZE() PAGESIZE   /* Is this still right? */
713 #   endif
714 #   ifdef AMIGA
715 #       define OS_TYPE "AMIGA"
716                 /* STACKBOTTOM and DATASTART handled specially  */
717                 /* in os_dep.c                                  */
718 #       define DATAEND  /* not needed */
719 #       define GETPAGESIZE() 4096
720 #   endif
721 #   ifdef MACOS
722 #     ifndef __LOWMEM__
723 #     include <LowMem.h>
724 #     endif
725 #     define OS_TYPE "MACOS"
726                         /* see os_dep.c for details of global data segments. */
727 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
728 #     define DATAEND    /* not needed */
729 #     define GETPAGESIZE() 4096
730 #   endif
731 #   ifdef NEXT
732 #       define OS_TYPE "NEXT"
733 #       define DATASTART ((ptr_t) get_etext())
734 #       define STACKBOTTOM ((ptr_t) 0x4000000)
735 #       define DATAEND  /* not needed */
736 #   endif
737 # endif
738
739 # ifdef POWERPC
740 #   define MACH_TYPE "POWERPC"
741 #   ifdef MACOS
742 #     define ALIGNMENT 2  /* Still necessary?  Could it be 4?   */
743 #     ifndef __LOWMEM__
744 #     include <LowMem.h>
745 #     endif
746 #     define OS_TYPE "MACOS"
747                         /* see os_dep.c for details of global data segments. */
748 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
749 #     define DATAEND  /* not needed */
750 #   endif
751 #   ifdef LINUX
752 #     if (defined (powerpc64) || defined(__powerpc64__))
753 #       define ALIGNMENT 8
754 #       define CPP_WORDSZ 64
755 #       define HBLKSIZE 4096
756 #     else
757 #       define ALIGNMENT 4
758 #     endif
759 #     define OS_TYPE "LINUX"
760       /* HEURISTIC1 has been reliably reported to fail for a 32-bit     */
761       /* executable on a 64 bit kernel.                                 */
762 #     define LINUX_STACKBOTTOM
763 #     define DYNAMIC_LOADING
764 #     define SEARCH_FOR_DATA_START
765       extern int _end[];
766 #     define DATAEND (_end)
767 #   endif
768 #   ifdef DARWIN
769 #     if (defined (__ppc64__))
770 #       define ALIGNMENT 8
771 #       define CPP_WORDSZ 64
772 #     else
773 #       define ALIGNMENT 4
774 #     endif
775 #     define OS_TYPE "DARWIN"
776 #     define DYNAMIC_LOADING
777       /* XXX: see get_end(3), get_etext() and get_end() should not be used.
778          These aren't used when dyld support is enabled (it is by default) */
779 #     define DATASTART ((ptr_t) get_etext())
780 #     define DATAEND    ((ptr_t) get_end())
781 #     define STACKBOTTOM ((ptr_t) 0xc0000000)
782 #     define USE_MMAP
783 #     define USE_MMAP_ANON
784 #     define USE_ASM_PUSH_REGS
785       /* This is potentially buggy. It needs more testing. See the comments in
786          os_dep.c */
787 #     define MPROTECT_VDB
788 #     include <unistd.h>
789 #     define GETPAGESIZE() getpagesize()
790 #     if defined(USE_PPC_PREFETCH) && defined(__GNUC__)
791         /* The performance impact of prefetches is untested */
792 #       define PREFETCH(x) \
793           __asm__ __volatile__ ("dcbt 0,%0" : : "r" ((const void *) (x)))
794 #       define PREFETCH_FOR_WRITE(x) \
795           __asm__ __volatile__ ("dcbtst 0,%0" : : "r" ((const void *) (x)))
796 #     endif
797       /* There seems to be some issues with trylock hanging on darwin. This
798          should be looked into some more */
799 #     define NO_PTHREAD_TRYLOCK
800 #   endif
801 #   ifdef NETBSD
802 #     define ALIGNMENT 4
803 #     define OS_TYPE "NETBSD"
804 #     define HEURISTIC2
805       extern char etext[];
806 #     define DATASTART GC_data_start
807 #     define DYNAMIC_LOADING
808 #   endif
809 #   ifdef NOSYS
810 #     define ALIGNMENT 4
811 #     define OS_TYPE "NOSYS"
812       extern void __end[], __dso_handle[];
813 #     define DATASTART (__dso_handle)  /* OK, that's ugly.  */
814 #     define DATAEND (__end)
815         /* Stack starts at 0xE0000000 for the simulator.  */
816 #     undef STACK_GRAN
817 #     define STACK_GRAN 0x10000000
818 #     define HEURISTIC1
819 #   endif
820 # endif
821
822 # ifdef VAX
823 #   define MACH_TYPE "VAX"
824 #   define ALIGNMENT 4  /* Pointers are longword aligned by 4.2 C compiler */
825     extern char etext[];
826 #   define DATASTART ((ptr_t)(etext))
827 #   ifdef BSD
828 #       define OS_TYPE "BSD"
829 #       define HEURISTIC1
830                         /* HEURISTIC2 may be OK, but it's hard to test. */
831 #   endif
832 #   ifdef ULTRIX
833 #       define OS_TYPE "ULTRIX"
834 #       define STACKBOTTOM ((ptr_t) 0x7fffc800)
835 #   endif
836 # endif
837
838 # ifdef RT
839 #   define MACH_TYPE "RT"
840 #   define ALIGNMENT 4
841 #   define DATASTART ((ptr_t) 0x10000000)
842 #   define STACKBOTTOM ((ptr_t) 0x1fffd800)
843 # endif
844
845 # ifdef SPARC
846 #   define MACH_TYPE "SPARC"
847 #   if defined(__arch64__) || defined(__sparcv9)
848 #     define ALIGNMENT 8
849 #     define CPP_WORDSZ 64
850 #     define ELF_CLASS ELFCLASS64
851 #   else
852 #     define ALIGNMENT 4        /* Required by hardware */
853 #     define CPP_WORDSZ 32
854 #   endif
855 #   define ALIGN_DOUBLE
856 #   ifdef SUNOS5
857 #       define OS_TYPE "SUNOS5"
858         extern int _etext[];
859         extern int _end[];
860         extern ptr_t GC_SysVGetDataStart();
861 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
862 #       define DATAEND (_end)
863 #       if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
864 #           define USE_MMAP
865             /* Otherwise we now use calloc.  Mmap may result in the     */
866             /* heap interleaved with thread stacks, which can result in */
867             /* excessive blacklisting.  Sbrk is unusable since it       */
868             /* doesn't interact correctly with the system malloc.       */
869 #       endif
870 #       ifdef USE_MMAP
871 #         define HEAP_START (ptr_t)0x40000000
872 #       else
873 #         define HEAP_START DATAEND
874 #       endif
875 #       define PROC_VDB
876 /*      HEURISTIC1 reportedly no longer works under 2.7.                */
877 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
878 /*      Apparently USRSTACK is defined to be USERLIMIT, but in some     */
879 /*      installations that's undefined.  We work around this with a     */
880 /*      gross hack:                                                     */
881 #       include <sys/vmparam.h>
882 #       ifdef USERLIMIT
883           /* This should work everywhere, but doesn't.  */
884 #         define STACKBOTTOM USRSTACK
885 #       else
886 #         define HEURISTIC2
887 #       endif
888 #       include <unistd.h>
889 #       define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
890                 /* getpagesize() appeared to be missing from at least one */
891                 /* Solaris 5.4 installation.  Weird.                      */
892 #       define DYNAMIC_LOADING
893 #   endif
894 #   ifdef SUNOS4
895 #       define OS_TYPE "SUNOS4"
896         /* [If you have a weak stomach, don't read this.]               */
897         /* We would like to use:                                        */
898 /* #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1fff) & ~0x1fff)) */
899         /* This fails occasionally, due to an ancient, but very         */
900         /* persistent ld bug.  etext is set 32 bytes too high.          */
901         /* We instead read the text segment size from the a.out         */
902         /* header, which happens to be mapped into our address space    */
903         /* at the start of the text segment.  The detective work here   */
904         /* was done by Robert Ehrlich, Manuel Serrano, and Bernard      */
905         /* Serpette of INRIA.                                           */
906         /* This assumes ZMAGIC, i.e. demand-loadable executables.       */
907 #       define TEXTSTART 0x2000
908 #       define DATASTART ((ptr_t)(*(int *)(TEXTSTART+0x4)+TEXTSTART))
909 #       define MPROTECT_VDB
910 #       define HEURISTIC1
911 #       define DYNAMIC_LOADING
912 #   endif
913 #   ifdef DRSNX
914 #       define OS_TYPE "DRSNX"
915         extern ptr_t GC_SysVGetDataStart();
916         extern int etext[];
917 #       define DATASTART GC_SysVGetDataStart(0x10000, etext)
918 #       define MPROTECT_VDB
919 #       define STACKBOTTOM ((ptr_t) 0xdfff0000)
920 #       define DYNAMIC_LOADING
921 #   endif
922 #   ifdef LINUX
923 #     define OS_TYPE "LINUX"
924 #     ifdef __ELF__
925 #       define DYNAMIC_LOADING
926 #     else
927           Linux Sparc/a.out not supported
928 #     endif
929       extern int _end[];
930       extern int _etext[];
931 #     define DATAEND (_end)
932 #     define SVR4
933       extern ptr_t GC_SysVGetDataStart();
934 #     ifdef __arch64__
935 #       define DATASTART GC_SysVGetDataStart(0x100000, _etext)
936 #     else
937 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
938 #     endif
939 #     define LINUX_STACKBOTTOM
940 #   endif
941 #   ifdef OPENBSD
942 #     define OS_TYPE "OPENBSD"
943 #     define STACKBOTTOM ((ptr_t) 0xf8000000)
944       extern int etext[];
945 #     define DATASTART ((ptr_t)(etext))
946 #   endif
947 #   ifdef NETBSD
948 #     define OS_TYPE "NETBSD"
949 #     define HEURISTIC2
950 #     ifdef __ELF__
951 #       define DATASTART GC_data_start
952 #       define DYNAMIC_LOADING
953 #     else
954         extern char etext[];
955 #       define DATASTART ((ptr_t)(etext))
956 #     endif
957 #   endif
958 # endif
959
960 # ifdef I386
961 #   define MACH_TYPE "I386"
962 #   if defined(__LP64__) || defined(_WIN64)
963 #     define CPP_WORDSZ 64
964 #     define ALIGNMENT 8
965 #   else
966 #     define CPP_WORDSZ 32
967 #     define ALIGNMENT 4
968                         /* Appears to hold for all "32 bit" compilers   */
969                         /* except Borland.  The -a4 option fixes        */
970                         /* Borland.                                     */
971                         /* Ivan Demakov: For Watcom the option is -zp4. */
972 #   endif
973 #   ifndef SMALL_CONFIG
974 #     define ALIGN_DOUBLE /* Not strictly necessary, but may give speed   */
975                           /* improvement on Pentiums.                     */
976 #   endif
977 #   ifdef HAVE_BUILTIN_UNWIND_INIT
978 #       define USE_GENERIC_PUSH_REGS
979 #   endif
980 #   ifdef SEQUENT
981 #       define OS_TYPE "SEQUENT"
982         extern int etext[];
983 #       define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
984 #       define STACKBOTTOM ((ptr_t) 0x3ffff000) 
985 #   endif
986 #   ifdef BEOS
987 #     define OS_TYPE "BEOS"
988 #     include <OS.h>
989 #     define GETPAGESIZE() B_PAGE_SIZE
990       extern int etext[];
991 #     define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
992 #   endif
993 #   ifdef SUNOS5
994 #       define OS_TYPE "SUNOS5"
995         extern int _etext[], _end[];
996         extern ptr_t GC_SysVGetDataStart();
997 #       define DATASTART GC_SysVGetDataStart(0x1000, _etext)
998 #       define DATAEND (_end)
999 /*      # define STACKBOTTOM ((ptr_t)(_start)) worked through 2.7,      */
1000 /*      but reportedly breaks under 2.8.  It appears that the stack     */
1001 /*      base is a property of the executable, so this should not break  */
1002 /*      old executables.                                                */
1003 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
1004 #       include <sys/vm.h>
1005 #       define STACKBOTTOM USRSTACK
1006 /* At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
1007 /* It appears to be fixed in 2.8 and 2.9.                               */
1008 #       ifdef SOLARIS25_PROC_VDB_BUG_FIXED
1009 #         define PROC_VDB
1010 #       endif
1011 #       define DYNAMIC_LOADING
1012 #       if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
1013 #           define USE_MMAP
1014             /* Otherwise we now use calloc.  Mmap may result in the     */
1015             /* heap interleaved with thread stacks, which can result in */
1016             /* excessive blacklisting.  Sbrk is unusable since it       */
1017             /* doesn't interact correctly with the system malloc.       */
1018 #       endif
1019 #       ifdef USE_MMAP
1020 #         define HEAP_START (ptr_t)0x40000000
1021 #       else
1022 #         define HEAP_START DATAEND
1023 #       endif
1024 #   endif
1025 #   ifdef SCO
1026 #       define OS_TYPE "SCO"
1027         extern int etext[];
1028 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x3fffff) \
1029                                   & ~0x3fffff) \
1030                                  +((word)etext & 0xfff))
1031 #       define STACKBOTTOM ((ptr_t) 0x7ffffffc)
1032 #   endif
1033 #   ifdef SCO_ELF
1034 #       define OS_TYPE "SCO_ELF"
1035         extern int etext[];
1036 #       define DATASTART ((ptr_t)(etext))
1037 #       define STACKBOTTOM ((ptr_t) 0x08048000)
1038 #       define DYNAMIC_LOADING
1039 #       define ELF_CLASS ELFCLASS32
1040 #   endif
1041 #   ifdef DGUX
1042 #       define OS_TYPE "DGUX"
1043         extern int _etext, _end;
1044         extern ptr_t GC_SysVGetDataStart();
1045 #       define DATASTART GC_SysVGetDataStart(0x1000, &_etext)
1046 #       define DATAEND (&_end)
1047 #       define STACK_GROWS_DOWN
1048 #       define HEURISTIC2
1049 #       include <unistd.h>
1050 #       define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
1051 #       define DYNAMIC_LOADING
1052 #       ifndef USE_MMAP
1053 #         define USE_MMAP
1054 #       endif /* USE_MMAP */
1055 #       define MAP_FAILED (void *) -1
1056 #       ifdef USE_MMAP
1057 #         define HEAP_START (ptr_t)0x40000000
1058 #       else /* USE_MMAP */
1059 #         define HEAP_START DATAEND
1060 #       endif /* USE_MMAP */
1061 #   endif /* DGUX */
1062
1063 #   ifdef LINUX
1064 #       ifndef __GNUC__
1065           /* The Intel compiler doesn't like inline assembly */
1066 #         define USE_GENERIC_PUSH_REGS
1067 #       endif
1068 #       define OS_TYPE "LINUX"
1069 #       define LINUX_STACKBOTTOM
1070 #       if 0
1071 #         define HEURISTIC1
1072 #         undef STACK_GRAN
1073 #         define STACK_GRAN 0x10000000
1074           /* STACKBOTTOM is usually 0xc0000000, but this changes with   */
1075           /* different kernel configurations.  In particular, systems   */
1076           /* with 2GB physical memory will usually move the user        */
1077           /* address space limit, and hence initial SP to 0x80000000.   */
1078 #       endif
1079 #       if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1080 #           define MPROTECT_VDB
1081 #       else
1082             /* We seem to get random errors in incremental mode,        */
1083             /* possibly because Linux threads is itself a malloc client */
1084             /* and can't deal with the signals.                         */
1085 #       endif
1086 #       define HEAP_START (ptr_t)0x1000
1087                 /* This encourages mmap to give us low addresses,       */
1088                 /* thus allowing the heap to grow to ~3GB               */
1089 #       ifdef __ELF__
1090 #            define DYNAMIC_LOADING
1091 #            ifdef UNDEFINED    /* includes ro data */
1092                extern int _etext[];
1093 #              define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1094 #            endif
1095 #            include <features.h>
1096 #            if defined(__GLIBC__) && __GLIBC__ >= 2
1097 #                define SEARCH_FOR_DATA_START
1098 #            else
1099                  extern char **__environ;
1100 #                define DATASTART ((ptr_t)(&__environ))
1101                               /* hideous kludge: __environ is the first */
1102                               /* word in crt0.o, and delimits the start */
1103                               /* of the data segment, no matter which   */
1104                               /* ld options were passed through.        */
1105                               /* We could use _etext instead, but that  */
1106                               /* would include .rodata, which may       */
1107                               /* contain large read-only data tables    */
1108                               /* that we'd rather not scan.             */
1109 #            endif
1110              extern int _end[];
1111 #            define DATAEND (_end)
1112 #       else
1113              extern int etext[];
1114 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1115 #       endif
1116 #       ifdef USE_I686_PREFETCH
1117           /* FIXME: Thus should use __builtin_prefetch, but we'll leave that    */
1118           /* for the next rtelease.                                             */
1119 #         define PREFETCH(x) \
1120             __asm__ __volatile__ ("     prefetchnta     %0": : "m"(*(char *)(x)))
1121             /* Empirically prefetcht0 is much more effective at reducing        */
1122             /* cache miss stalls for the targetted load instructions.  But it   */
1123             /* seems to interfere enough with other cache traffic that the net  */
1124             /* result is worse than prefetchnta.                                */
1125 #         if 0 
1126             /* Using prefetches for write seems to have a slight negative       */
1127             /* impact on performance, at least for a PIII/500.                  */
1128 #           define PREFETCH_FOR_WRITE(x) \
1129               __asm__ __volatile__ ("   prefetcht0      %0": : "m"(*(char *)(x)))
1130 #         endif
1131 #       endif
1132 #       ifdef USE_3DNOW_PREFETCH
1133 #         define PREFETCH(x) \
1134             __asm__ __volatile__ ("     prefetch        %0": : "m"(*(char *)(x)))
1135 #         define PREFETCH_FOR_WRITE(x) \
1136             __asm__ __volatile__ ("     prefetchw       %0": : "m"(*(char *)(x)))
1137 #       endif
1138 #   endif
1139 #   ifdef CYGWIN32
1140 #       define OS_TYPE "CYGWIN32"
1141           extern int _data_start__[];
1142           extern int _data_end__[];
1143           extern int _bss_start__[];
1144           extern int _bss_end__[];
1145         /* For binutils 2.9.1, we have                  */
1146         /*      DATASTART   = _data_start__             */
1147         /*      DATAEND     = _bss_end__                */
1148         /* whereas for some earlier versions it was     */
1149         /*      DATASTART   = _bss_start__              */
1150         /*      DATAEND     = _data_end__               */
1151         /* To get it right for both, we take the        */
1152         /* minumum/maximum of the two.                  */
1153 #     ifndef MAX
1154 #       define MAX(x,y) ((x) > (y) ? (x) : (y))
1155 #     endif
1156 #     ifndef MIN
1157 #       define MIN(x,y) ((x) < (y) ? (x) : (y))
1158 #     endif
1159 #       define DATASTART ((ptr_t) MIN(_data_start__, _bss_start__))
1160 #       define DATAEND   ((ptr_t) MAX(_data_end__, _bss_end__))
1161 #       undef STACK_GRAN
1162 #       define STACK_GRAN 0x10000
1163 #       define HEURISTIC1
1164 #   endif
1165 #   ifdef OS2
1166 #       define OS_TYPE "OS2"
1167                 /* STACKBOTTOM and DATASTART are handled specially in   */
1168                 /* os_dep.c. OS2 actually has the right                 */
1169                 /* system call!                                         */
1170 #       define DATAEND  /* not needed */
1171 #       define USE_GENERIC_PUSH_REGS
1172 #   endif
1173 #   ifdef MSWIN32
1174 #       define OS_TYPE "MSWIN32"
1175                 /* STACKBOTTOM and DATASTART are handled specially in   */
1176                 /* os_dep.c.                                            */
1177 #       ifndef __WATCOMC__
1178 #         define MPROTECT_VDB
1179 #       endif
1180 #       define DATAEND  /* not needed */
1181 #   endif
1182 #   ifdef MSWINCE
1183 #       define OS_TYPE "MSWINCE"
1184 #       define DATAEND  /* not needed */
1185 #   endif
1186 #   ifdef DJGPP
1187 #       define OS_TYPE "DJGPP"
1188 #       include "stubinfo.h"
1189         extern int etext[];
1190         extern int _stklen;
1191         extern int __djgpp_stack_limit;
1192 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1ff) & ~0x1ff))
1193 /* #       define STACKBOTTOM ((ptr_t)((word) _stubinfo + _stubinfo->size \
1194                                                      + _stklen)) */
1195 #       define STACKBOTTOM ((ptr_t)((word) __djgpp_stack_limit + _stklen))
1196                 /* This may not be right.  */
1197 #   endif
1198 #   ifdef OPENBSD
1199 #       define OS_TYPE "OPENBSD"
1200 #   endif
1201 #   ifdef FREEBSD
1202 #       define OS_TYPE "FREEBSD"
1203 #       ifndef GC_FREEBSD_THREADS
1204 #           define MPROTECT_VDB
1205 #       endif
1206 #       define SIG_SUSPEND SIGUSR1
1207 #       define SIG_THR_RESTART SIGUSR2
1208 #       define FREEBSD_STACKBOTTOM
1209 #       ifdef __ELF__
1210 #           define DYNAMIC_LOADING
1211 #       endif
1212         extern char etext[];
1213         extern char * GC_FreeBSDGetDataStart();
1214 #       define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
1215 #   endif
1216 #   ifdef NETBSD
1217 #       define OS_TYPE "NETBSD"
1218 #       ifdef __ELF__
1219 #           define DYNAMIC_LOADING
1220 #       endif
1221 #   endif
1222 #   ifdef THREE86BSD
1223 #       define OS_TYPE "THREE86BSD"
1224 #   endif
1225 #   ifdef BSDI
1226 #       define OS_TYPE "BSDI"
1227 #   endif
1228 #   if defined(OPENBSD) || defined(NETBSD) \
1229         || defined(THREE86BSD) || defined(BSDI)
1230 #       define HEURISTIC2
1231         extern char etext[];
1232 #       define DATASTART ((ptr_t)(etext))
1233 #   endif
1234 #   ifdef NEXT
1235 #       define OS_TYPE "NEXT"
1236 #       define DATASTART ((ptr_t) get_etext())
1237 #       define STACKBOTTOM ((ptr_t)0xc0000000)
1238 #       define DATAEND  /* not needed */
1239 #   endif
1240 #   ifdef DOS4GW
1241 #     define OS_TYPE "DOS4GW"
1242       extern long __nullarea;
1243       extern char _end;
1244       extern char *_STACKTOP;
1245       /* Depending on calling conventions Watcom C either precedes
1246          or does not precedes with undescore names of C-variables.
1247          Make sure startup code variables always have the same names.  */
1248       #pragma aux __nullarea "*";
1249       #pragma aux _end "*";
1250 #     define STACKBOTTOM ((ptr_t) _STACKTOP)
1251                          /* confused? me too. */
1252 #     define DATASTART ((ptr_t) &__nullarea)
1253 #     define DATAEND ((ptr_t) &_end)
1254 #   endif
1255 #   ifdef HURD
1256 #     define OS_TYPE "HURD"
1257 #     define STACK_GROWS_DOWN
1258 #     define HEURISTIC2
1259       extern int  __data_start[];
1260 #     define DATASTART ( (ptr_t) (__data_start))
1261       extern int   _end[];
1262 #     define DATAEND ( (ptr_t) (_end))
1263 /* #     define MPROTECT_VDB  Not quite working yet? */
1264 #     define DYNAMIC_LOADING
1265 #   endif
1266 # endif
1267
1268 # ifdef NS32K
1269 #   define MACH_TYPE "NS32K"
1270 #   define ALIGNMENT 4
1271     extern char **environ;
1272 #   define DATASTART ((ptr_t)(&environ))
1273                               /* hideous kludge: environ is the first   */
1274                               /* word in crt0.o, and delimits the start */
1275                               /* of the data segment, no matter which   */
1276                               /* ld options were passed through.        */
1277 #   define STACKBOTTOM ((ptr_t) 0xfffff000) /* for Encore */
1278 # endif
1279
1280 # ifdef MIPS
1281 #   define MACH_TYPE "MIPS"
1282 #   ifdef LINUX
1283       /* This was developed for a linuxce style platform.  Probably     */
1284       /* needs to be tweaked for workstation class machines.            */
1285 #     define OS_TYPE "LINUX"
1286 #     define DYNAMIC_LOADING
1287       extern int _end[];
1288 #     define DATAEND (_end)
1289       extern int __data_start[];
1290 #     define DATASTART ((ptr_t)(__data_start))
1291 #     define ALIGNMENT 4
1292 #     define USE_GENERIC_PUSH_REGS
1293 #     if __GLIBC__ == 2 && __GLIBC_MINOR__ >= 2 || __GLIBC__ > 2
1294 #        define LINUX_STACKBOTTOM
1295 #     else
1296 #        define STACKBOTTOM 0x80000000
1297 #     endif
1298 #   endif /* Linux */
1299 #   ifdef EWS4800
1300 #      define HEURISTIC2
1301 #      if defined(_MIPS_SZPTR) && (_MIPS_SZPTR == 64)
1302          extern int _fdata[], _end[];
1303 #        define DATASTART ((ptr_t)_fdata)
1304 #        define DATAEND ((ptr_t)_end)
1305 #        define CPP_WORDSZ _MIPS_SZPTR
1306 #        define ALIGNMENT (_MIPS_SZPTR/8)
1307 #      else
1308          extern int etext[], edata[], end[];
1309          extern int _DYNAMIC_LINKING[], _gp[];
1310 #        define DATASTART ((ptr_t)((((word)etext + 0x3ffff) & ~0x3ffff) \
1311                + ((word)etext & 0xffff)))
1312 #        define DATAEND (edata)
1313 #        define DATASTART2 (_DYNAMIC_LINKING \
1314                ? (ptr_t)(((word)_gp + 0x8000 + 0x3ffff) & ~0x3ffff) \
1315                : (ptr_t)edata)
1316 #        define DATAEND2 (end)
1317 #        define ALIGNMENT 4
1318 #      endif
1319 #      define OS_TYPE "EWS4800"
1320 #      define USE_GENERIC_PUSH_REGS 1
1321 #   endif
1322 #   ifdef ULTRIX
1323 #       define HEURISTIC2
1324 #       define DATASTART (ptr_t)0x10000000
1325                               /* Could probably be slightly higher since */
1326                               /* startup code allocates lots of stuff.   */
1327 #       define OS_TYPE "ULTRIX"
1328 #       define ALIGNMENT 4
1329 #   endif
1330 #   ifdef RISCOS
1331 #       define HEURISTIC2
1332 #       define DATASTART (ptr_t)0x10000000
1333 #       define OS_TYPE "RISCOS"
1334 #       define ALIGNMENT 4  /* Required by hardware */
1335 #   endif
1336 #   ifdef IRIX5
1337 #       define HEURISTIC2
1338         extern int _fdata[];
1339 #       define DATASTART ((ptr_t)(_fdata))
1340 #       ifdef USE_MMAP
1341 #         define HEAP_START (ptr_t)0x30000000
1342 #       else
1343 #         define HEAP_START DATASTART
1344 #       endif
1345                               /* Lowest plausible heap address.         */
1346                               /* In the MMAP case, we map there.        */
1347                               /* In either case it is used to identify  */
1348                               /* heap sections so they're not           */
1349                               /* considered as roots.                   */
1350 #       define OS_TYPE "IRIX5"
1351 /*#       define MPROTECT_VDB DOB: this should work, but there is evidence */
1352 /*              of recent breakage.                                        */
1353 #       ifdef _MIPS_SZPTR
1354 #         define CPP_WORDSZ _MIPS_SZPTR
1355 #         define ALIGNMENT (_MIPS_SZPTR/8)
1356 #         if CPP_WORDSZ != 64
1357 #           define ALIGN_DOUBLE
1358 #         endif
1359 #       else
1360 #         define ALIGNMENT 4
1361 #         define ALIGN_DOUBLE
1362 #       endif
1363 #       define DYNAMIC_LOADING
1364 #   endif
1365 #   ifdef MSWINCE
1366 #       define OS_TYPE "MSWINCE"
1367 #       define ALIGNMENT 4
1368 #       define DATAEND /* not needed */
1369 #   endif
1370 #   if defined(NETBSD)
1371 #     define OS_TYPE "NETBSD"
1372 #     define ALIGNMENT 4
1373 #     define HEURISTIC2
1374 #     define USE_GENERIC_PUSH_REGS
1375 #     ifdef __ELF__
1376         extern int etext[];
1377 #       define DATASTART GC_data_start
1378 #       define NEED_FIND_LIMIT
1379 #       define DYNAMIC_LOADING
1380 #     else
1381 #       define DATASTART ((ptr_t) 0x10000000)
1382 #       define STACKBOTTOM ((ptr_t) 0x7ffff000)
1383 #     endif /* _ELF_ */
1384 #  endif
1385 # endif
1386
1387 # ifdef RS6000
1388 #   define MACH_TYPE "RS6000"
1389 #   ifdef ALIGNMENT
1390 #     undef ALIGNMENT
1391 #   endif
1392 #   ifdef IA64
1393 #     undef IA64 /* DOB: some AIX installs stupidly define IA64 in /usr/include/sys/systemcfg.h */
1394 #   endif
1395 #   ifdef __64BIT__
1396 #     define ALIGNMENT 8
1397 #     define CPP_WORDSZ 64
1398 #     define STACKBOTTOM ((ptr_t)0x1000000000000000)
1399 #   else
1400 #     define ALIGNMENT 4
1401 #     define CPP_WORDSZ 32
1402 #     define STACKBOTTOM ((ptr_t)((ulong)&errno))
1403 #   endif
1404  /* From AIX linker man page:
1405  _text Specifies the first location of the program.
1406  _etext Specifies the first location after the program.
1407  _data Specifies the first location of the data.
1408  _edata Specifies the first location after the initialized data
1409  _end or end Specifies the first location after all data.
1410  */
1411     extern int _data[], _end[];
1412 #   define DATASTART ((ptr_t)((ulong)_data))
1413 #   define DATAEND ((ptr_t)((ulong)_end))
1414     extern int errno;
1415 #   define USE_GENERIC_PUSH_REGS
1416 #   define DYNAMIC_LOADING
1417         /* For really old versions of AIX, this may have to be removed. */
1418 # endif
1419
1420 # ifdef HP_PA
1421 #   define MACH_TYPE "HP_PA"
1422 #   ifdef __LP64__
1423 #     define CPP_WORDSZ 64
1424 #     define ALIGNMENT 8
1425 #   else
1426 #     define CPP_WORDSZ 32
1427 #     define ALIGNMENT 4
1428 #     define ALIGN_DOUBLE
1429 #   endif
1430 #   if !defined(GC_HPUX_THREADS) && !defined(GC_LINUX_THREADS)
1431 #     ifndef LINUX /* For now. */
1432 #       define MPROTECT_VDB
1433 #     endif
1434 #   else
1435 #     define GENERIC_COMPARE_AND_SWAP
1436         /* No compare-and-swap instruction.  Use pthread mutexes        */
1437         /* when we absolutely have to.                                  */
1438 #     ifdef PARALLEL_MARK
1439 #       define USE_MARK_BYTES
1440                 /* Minimize compare-and-swap usage.             */
1441 #     endif
1442 #   endif
1443 #   define STACK_GROWS_UP
1444 #   ifdef HPUX
1445 #     define OS_TYPE "HPUX"
1446       extern int __data_start[];
1447 #     define DATASTART ((ptr_t)(__data_start))
1448 #     if 0
1449         /* The following appears to work for 7xx systems running HP/UX  */
1450         /* 9.xx Furthermore, it might result in much faster             */
1451         /* collections than HEURISTIC2, which may involve scanning      */
1452         /* segments that directly precede the stack.  It is not the     */
1453         /* default, since it may not work on older machine/OS           */
1454         /* combinations. (Thanks to Raymond X.T. Nijssen for uncovering */
1455         /* this.)                                                       */
1456 #       define STACKBOTTOM ((ptr_t) 0x7b033000)  /* from /etc/conf/h/param.h */
1457 #     else
1458         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1459         /* to this.  Note that the GC must be initialized before the    */
1460         /* first putenv call.                                           */
1461         extern char ** environ;
1462 #       define STACKBOTTOM ((ptr_t)environ)
1463 #     endif
1464 #     define DYNAMIC_LOADING
1465 #     include <unistd.h>
1466 #     define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1467 #     ifndef __GNUC__
1468 #       define PREFETCH(x)  { \
1469                               register long addr = (long)(x); \
1470                               (void) _asm ("LDW", 0, 0, addr, 0); \
1471                             }
1472 #     endif
1473 #   endif /* HPUX */
1474 #   ifdef LINUX
1475 #     define OS_TYPE "LINUX"
1476 #     define LINUX_STACKBOTTOM
1477 #     define DYNAMIC_LOADING
1478 #     define SEARCH_FOR_DATA_START
1479       extern int _end[];
1480 #     define DATAEND (&_end)
1481 #   endif /* LINUX */
1482 # endif /* HP_PA */
1483
1484 # ifdef ALPHA
1485 #   define MACH_TYPE "ALPHA"
1486 #   define ALIGNMENT 8
1487 #   define CPP_WORDSZ 64
1488 #   ifndef LINUX
1489 #     define USE_GENERIC_PUSH_REGS
1490       /* Gcc and probably the DEC/Compaq compiler spill pointers to preserved */
1491       /* fp registers in some cases when the target is a 21264.  The assembly */
1492       /* code doesn't handle that yet, and version dependencies make that a   */
1493       /* bit tricky.  Do the easy thing for now.                                    */
1494 #   endif
1495 #   ifdef NETBSD
1496 #       define OS_TYPE "NETBSD"
1497 #       define HEURISTIC2
1498 #       define DATASTART GC_data_start
1499 #       define ELFCLASS32 32
1500 #       define ELFCLASS64 64
1501 #       define ELF_CLASS ELFCLASS64
1502 #       define DYNAMIC_LOADING
1503 #   endif
1504 #   ifdef OPENBSD
1505 #       define OS_TYPE "OPENBSD"
1506 #       define HEURISTIC2
1507 #       ifdef __ELF__   /* since OpenBSD/Alpha 2.9 */
1508 #          define DATASTART GC_data_start
1509 #          define ELFCLASS32 32
1510 #          define ELFCLASS64 64
1511 #          define ELF_CLASS ELFCLASS64
1512 #       else            /* ECOFF, until OpenBSD/Alpha 2.7 */
1513 #          define DATASTART ((ptr_t) 0x140000000)
1514 #       endif
1515 #   endif
1516 #   ifdef FREEBSD
1517 #       define OS_TYPE "FREEBSD"
1518 /* MPROTECT_VDB is not yet supported at all on FreeBSD/alpha. */
1519 #       define SIG_SUSPEND SIGUSR1
1520 #       define SIG_THR_RESTART SIGUSR2
1521 #       define FREEBSD_STACKBOTTOM
1522 #       ifdef __ELF__
1523 #           define DYNAMIC_LOADING
1524 #       endif
1525 /* Handle unmapped hole alpha*-*-freebsd[45]* puts between etext and edata. */
1526         extern char etext[];
1527         extern char edata[];
1528         extern char end[];
1529 #       define NEED_FIND_LIMIT
1530 #       define DATASTART ((ptr_t)(&etext))
1531 #       define DATAEND (GC_find_limit (DATASTART, TRUE))
1532 #       define DATASTART2 ((ptr_t)(&edata))
1533 #       define DATAEND2 ((ptr_t)(&end))
1534 #   endif
1535 #   ifdef OSF1
1536 #       define OS_TYPE "OSF1"
1537 #       define DATASTART ((ptr_t) 0x140000000)
1538         extern int _end[];
1539 #       define DATAEND ((ptr_t) &_end)
1540         extern char ** environ;
1541         /* round up from the value of environ to the nearest page boundary */
1542         /* Probably breaks if putenv is called before collector            */
1543         /* initialization.                                                 */
1544 #       define STACKBOTTOM ((ptr_t)(((word)(environ) | (getpagesize()-1))+1))
1545 /* #    define HEURISTIC2 */
1546         /* Normally HEURISTIC2 is too conervative, since                */
1547         /* the text segment immediately follows the stack.              */
1548         /* Hence we give an upper pound.                                */
1549         /* This is currently unused, since we disabled HEURISTIC2       */
1550         extern int __start[];
1551 #       define HEURISTIC2_LIMIT ((ptr_t)((word)(__start) & ~(getpagesize()-1)))
1552 #       ifndef GC_OSF1_THREADS
1553           /* Unresolved signal issues with threads.     */
1554 #         define MPROTECT_VDB
1555 #       endif
1556 #       define DYNAMIC_LOADING
1557 #   endif
1558 #   ifdef LINUX
1559 #       define OS_TYPE "LINUX"
1560 #       define LINUX_STACKBOTTOM
1561 #       ifdef __ELF__
1562 #         define SEARCH_FOR_DATA_START
1563 #         define DYNAMIC_LOADING
1564 #       else
1565 #           define DATASTART ((ptr_t) 0x140000000)
1566 #       endif
1567         extern int _end[];
1568 #       define DATAEND (_end)
1569 #       define MPROTECT_VDB
1570                 /* Has only been superficially tested.  May not */
1571                 /* work on all versions.                        */
1572 #   endif
1573 # endif
1574
1575 # ifdef IA64
1576 #   define MACH_TYPE "IA64"
1577 #   define USE_GENERIC_PUSH_REGS
1578         /* We need to get preserved registers in addition to register   */
1579         /* windows.   That's easiest to do with setjmp.                 */
1580 #   ifdef PARALLEL_MARK
1581 #       define USE_MARK_BYTES
1582             /* Compare-and-exchange is too expensive to use for         */
1583             /* setting mark bits.                                       */
1584 #   endif
1585 #   ifdef HPUX
1586 #       ifdef _ILP32
1587 #         define CPP_WORDSZ 32
1588 #         define ALIGN_DOUBLE
1589             /* Requires 8 byte alignment for malloc */
1590 #         define ALIGNMENT 4
1591 #       else
1592 #         ifndef _LP64
1593                 ---> unknown ABI
1594 #         endif
1595 #         define CPP_WORDSZ 64
1596 #         define ALIGN_DOUBLE
1597             /* Requires 16 byte alignment for malloc */
1598 #         define ALIGNMENT 8
1599 #       endif
1600 #       define OS_TYPE "HPUX"   
1601         extern int __data_start[];
1602 #       define DATASTART ((ptr_t)(__data_start))
1603         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1604         /* to this.  Note that the GC must be initialized before the    */
1605         /* first putenv call.                                           */
1606         extern char ** environ;
1607 #       define STACKBOTTOM ((ptr_t)environ)
1608 #       define HPUX_STACKBOTTOM
1609 #       define DYNAMIC_LOADING
1610 #       include <unistd.h>
1611 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1612         /* The following was empirically determined, and is probably    */
1613         /* not very robust.                                             */
1614         /* Note that the backing store base seems to be at a nice       */
1615         /* address minus one page.                                      */
1616 #       define BACKING_STORE_DISPLACEMENT 0x1000000
1617 #       define BACKING_STORE_ALIGNMENT 0x1000
1618         extern ptr_t GC_register_stackbottom;
1619 #       define BACKING_STORE_BASE GC_register_stackbottom
1620         /* Known to be wrong for recent HP/UX versions!!!       */
1621 #   endif
1622 #   ifdef LINUX
1623 #       define CPP_WORDSZ 64
1624 #       define ALIGN_DOUBLE
1625           /* Requires 16 byte alignment for malloc */
1626 #       define ALIGNMENT 8
1627 #       define OS_TYPE "LINUX"
1628         /* The following works on NUE and older kernels:        */
1629 /* #       define STACKBOTTOM ((ptr_t) 0xa000000000000000l)     */
1630         /* This does not work on NUE:                           */
1631 #       define LINUX_STACKBOTTOM
1632         /* We also need the base address of the register stack  */
1633         /* backing store.  This is computed in                  */
1634         /* GC_linux_register_stack_base based on the following  */
1635         /* constants:                                           */
1636 #       define BACKING_STORE_ALIGNMENT 0x100000
1637 #       define BACKING_STORE_DISPLACEMENT 0x80000000
1638         extern ptr_t GC_register_stackbottom;
1639 #       define BACKING_STORE_BASE GC_register_stackbottom
1640 #       define SEARCH_FOR_DATA_START
1641 #       ifdef __GNUC__
1642 #         define DYNAMIC_LOADING
1643 #       else
1644           /* In the Intel compiler environment, we seem to end up with  */
1645           /* statically linked executables and an undefined reference   */
1646           /* to _DYNAMIC                                                */
1647 #       endif
1648 #       define MPROTECT_VDB
1649                 /* Requires Linux 2.3.47 or later.      */
1650         extern int _end[];
1651 #       define DATAEND (_end)
1652 #       ifdef __GNUC__
1653 #         ifndef __INTEL_COMPILER
1654 #           define PREFETCH(x) \
1655               __asm__ ("        lfetch  [%0]": : "r"(x))
1656 #           define PREFETCH_FOR_WRITE(x) \
1657               __asm__ ("        lfetch.excl     [%0]": : "r"(x))
1658 #           define CLEAR_DOUBLE(x) \
1659               __asm__ ("        stf.spill       [%0]=f0": : "r"((void *)(x)))
1660 #         else
1661 #           include <ia64intrin.h>
1662 #           define PREFETCH(x) \
1663               __lfetch(__lfhint_none, (x))
1664 #           define PREFETCH_FOR_WRITE(x) \
1665               __lfetch(__lfhint_nta,  (x))
1666 #           define CLEAR_DOUBLE(x) \
1667               __stf_spill((void *)(x), 0)
1668 #         endif // __INTEL_COMPILER
1669 #       endif
1670 #   endif
1671 #   ifdef MSWIN32
1672       /* FIXME: This is a very partial guess.  There is no port, yet.   */
1673 #     define OS_TYPE "MSWIN32"
1674                 /* STACKBOTTOM and DATASTART are handled specially in   */
1675                 /* os_dep.c.                                            */
1676 #     define DATAEND  /* not needed */
1677 #     if defined(_WIN64)
1678 #       define CPP_WORDSZ 64
1679 #     else
1680 #       define CPP_WORDSZ 32   /* Is this possible?     */
1681 #     endif
1682 #     define ALIGNMENT 8
1683 #   endif
1684 # endif
1685
1686 # ifdef M88K
1687 #   define MACH_TYPE "M88K"
1688 #   define ALIGNMENT 4
1689 #   define ALIGN_DOUBLE
1690     extern int etext[];
1691 #   ifdef CX_UX
1692 #       define OS_TYPE "CX_UX"
1693 #       define DATASTART ((((word)etext + 0x3fffff) & ~0x3fffff) + 0x10000)
1694 #   endif
1695 #   ifdef  DGUX
1696 #       define OS_TYPE "DGUX"
1697         extern ptr_t GC_SysVGetDataStart();
1698 #       define DATASTART GC_SysVGetDataStart(0x10000, etext)
1699 #   endif
1700 #   define STACKBOTTOM ((char*)0xf0000000) /* determined empirically */
1701 # endif
1702
1703 # ifdef S370
1704     /* If this still works, and if anyone cares, this should probably   */
1705     /* be moved to the S390 category.                                   */
1706 #   define MACH_TYPE "S370"
1707 #   define ALIGNMENT 4  /* Required by hardware */
1708 #   define USE_GENERIC_PUSH_REGS
1709 #   ifdef UTS4
1710 #       define OS_TYPE "UTS4"
1711        extern int etext[];
1712         extern int _etext[];
1713         extern int _end[];
1714         extern ptr_t GC_SysVGetDataStart();
1715 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
1716 #       define DATAEND (_end)
1717 #       define HEURISTIC2
1718 #   endif
1719 # endif
1720
1721 # ifdef S390
1722 #   define MACH_TYPE "S390"
1723 #   define USE_GENERIC_PUSH_REGS
1724 #   ifndef __s390x__
1725 #   define ALIGNMENT 4
1726 #   define CPP_WORDSZ 32
1727 #   else
1728 #   define ALIGNMENT 8
1729 #   define CPP_WORDSZ 64
1730 #   define HBLKSIZE 4096
1731 #   endif
1732 #   ifdef LINUX
1733 #       define OS_TYPE "LINUX"
1734 #       define LINUX_STACKBOTTOM
1735 #       define DYNAMIC_LOADING
1736        extern int __data_start[];
1737 #       define DATASTART ((ptr_t)(__data_start))
1738     extern int _end[];
1739 #   define DATAEND (_end)
1740 #   define CACHE_LINE_SIZE 256
1741 #   define GETPAGESIZE() 4096
1742 #   endif
1743 # endif
1744
1745 # if defined(PJ)
1746 #   define ALIGNMENT 4
1747     extern int _etext[];
1748 #   define DATASTART ((ptr_t)(_etext))
1749 #   define HEURISTIC1
1750 # endif
1751
1752 # ifdef ARM32
1753 #   define CPP_WORDSZ 32
1754 #   define MACH_TYPE "ARM32"
1755 #   define ALIGNMENT 4
1756 #   ifdef NETBSD
1757 #       define OS_TYPE "NETBSD"
1758 #       define HEURISTIC2
1759 #       ifdef __ELF__
1760 #          define DATASTART GC_data_start
1761 #          define DYNAMIC_LOADING
1762 #       else
1763            extern char etext[];
1764 #          define DATASTART ((ptr_t)(etext))
1765 #       endif
1766 #       define USE_GENERIC_PUSH_REGS
1767 #   endif
1768 #   ifdef LINUX
1769 #       define OS_TYPE "LINUX"
1770 #       define HEURISTIC1
1771 #       undef STACK_GRAN
1772 #       define STACK_GRAN 0x10000000
1773 #       define USE_GENERIC_PUSH_REGS
1774 #       ifdef __ELF__
1775 #            define DYNAMIC_LOADING
1776 #            include <features.h>
1777 #            if defined(__GLIBC__) && __GLIBC__ >= 2
1778 #                define SEARCH_FOR_DATA_START
1779 #            else
1780                  extern char **__environ;
1781 #                define DATASTART ((ptr_t)(&__environ))
1782                               /* hideous kludge: __environ is the first */
1783                               /* word in crt0.o, and delimits the start */
1784                               /* of the data segment, no matter which   */
1785                               /* ld options were passed through.        */
1786                               /* We could use _etext instead, but that  */
1787                               /* would include .rodata, which may       */
1788                               /* contain large read-only data tables    */
1789                               /* that we'd rather not scan.             */
1790 #            endif
1791              extern int _end[];
1792 #            define DATAEND (_end)
1793 #       else
1794              extern int etext[];
1795 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1796 #       endif
1797 #   endif
1798 #   ifdef MSWINCE
1799 #     define OS_TYPE "MSWINCE"
1800 #     define DATAEND /* not needed */
1801 #   endif
1802 #   ifdef NOSYS
1803       /* __data_start is usually defined in the target linker script.  */
1804       extern int __data_start[];
1805 #     define DATASTART (ptr_t)(__data_start)
1806 #     define USE_GENERIC_PUSH_REGS
1807       /* __stack_base__ is set in newlib/libc/sys/arm/crt0.S  */
1808       extern void *__stack_base__;
1809 #     define STACKBOTTOM ((ptr_t) (__stack_base__))
1810 #   endif
1811 #endif
1812
1813 # ifdef CRIS
1814 #   define MACH_TYPE "CRIS"
1815 #   define CPP_WORDSZ 32
1816 #   define ALIGNMENT 1
1817 #   define OS_TYPE "LINUX"
1818 #   define DYNAMIC_LOADING
1819 #   define LINUX_STACKBOTTOM
1820 #   define USE_GENERIC_PUSH_REGS
1821 #   define SEARCH_FOR_DATA_START
1822       extern int _end[];
1823 #   define DATAEND (_end)
1824 # endif
1825
1826 # ifdef SH
1827 #   define MACH_TYPE "SH"
1828 #   define ALIGNMENT 4
1829 #   ifdef MSWINCE
1830 #     define OS_TYPE "MSWINCE"
1831 #     define DATAEND /* not needed */
1832 #   endif
1833 #   ifdef LINUX
1834 #     define OS_TYPE "LINUX"
1835 #     define STACKBOTTOM ((ptr_t) 0x7c000000)
1836 #     define USE_GENERIC_PUSH_REGS
1837 #     define DYNAMIC_LOADING
1838 #     define SEARCH_FOR_DATA_START
1839       extern int _end[];
1840 #     define DATAEND (_end)
1841 #   endif
1842 # endif
1843  
1844 # ifdef SH4
1845 #   define MACH_TYPE "SH4"
1846 #   define OS_TYPE "MSWINCE"
1847 #   define ALIGNMENT 4
1848 #   define DATAEND /* not needed */
1849 # endif
1850
1851 # ifdef M32R
1852 #   define CPP_WORDSZ 32
1853 #   define MACH_TYPE "M32R"
1854 #   define ALIGNMENT 4
1855 #   ifdef LINUX
1856 #     define OS_TYPE "LINUX"
1857 #     define LINUX_STACKBOTTOM
1858 #     undef STACK_GRAN
1859 #     define STACK_GRAN 0x10000000
1860 #     define USE_GENERIC_PUSH_REGS
1861 #     define DYNAMIC_LOADING
1862 #     define SEARCH_FOR_DATA_START
1863       extern int _end[];
1864 #     define DATAEND (_end)
1865 #   endif
1866 # endif
1867
1868 # ifdef X86_64
1869 #   define MACH_TYPE "X86_64"
1870 #   define ALIGNMENT 8
1871 #   define CPP_WORDSZ 64
1872 #   ifndef HBLKSIZE
1873 #     define HBLKSIZE 4096
1874 #   endif
1875 #   define CACHE_LINE_SIZE 64
1876 #   define USE_GENERIC_PUSH_REGS
1877 #   ifdef LINUX
1878 #       define OS_TYPE "LINUX"
1879 #       define LINUX_STACKBOTTOM
1880 #       if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1881 #           define MPROTECT_VDB
1882 #       else
1883             /* We seem to get random errors in incremental mode,        */
1884             /* possibly because Linux threads is itself a malloc client */
1885             /* and can't deal with the signals.                         */
1886 #       endif
1887 #       ifdef __ELF__
1888 #            define DYNAMIC_LOADING
1889 #            ifdef UNDEFINED    /* includes ro data */
1890                extern int _etext[];
1891 #              define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1892 #            endif
1893 #            include <features.h>
1894 #            define SEARCH_FOR_DATA_START
1895              extern int _end[];
1896 #            define DATAEND (_end)
1897 #       else
1898              extern int etext[];
1899 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1900 #       endif
1901 #       if defined(__GNUC__) && __GNUC >= 3
1902 #           define PREFETCH(x) __builtin_prefetch((x), 0, 0)
1903 #           define PREFETCH_FOR_WRITE(x) __builtin_prefetch((x), 1)
1904 #       endif
1905 #   endif
1906 #   ifdef NETBSD
1907 #       define OS_TYPE "NETBSD"
1908 #       ifdef __ELF__
1909 #           define DYNAMIC_LOADING
1910 #       endif
1911 #       define HEURISTIC2
1912         extern char etext[];
1913 #       define SEARCH_FOR_DATA_START
1914 #   endif
1915 # endif
1916
1917 #if defined(LINUX) && defined(USE_MMAP)
1918     /* The kernel may do a somewhat better job merging mappings etc.    */
1919     /* with anonymous mappings.                                         */
1920 #   define USE_MMAP_ANON
1921 #endif
1922
1923 #if defined(LINUX) && defined(REDIRECT_MALLOC)
1924     /* Rld appears to allocate some memory with its own allocator, and  */
1925     /* some through malloc, which might be redirected.  To make this    */
1926     /* work with collectable memory, we have to scan memory allocated   */
1927     /* by rld's internal malloc.                                        */
1928 #   define USE_PROC_FOR_LIBRARIES
1929 #endif
1930     
1931 # ifndef STACK_GROWS_UP
1932 #   define STACK_GROWS_DOWN
1933 # endif
1934
1935 # ifndef CPP_WORDSZ
1936 #   define CPP_WORDSZ 32
1937 # endif
1938
1939 # ifndef OS_TYPE
1940 #   define OS_TYPE ""
1941 # endif
1942
1943 # ifndef DATAEND
1944     extern int end[];
1945 #   define DATAEND (end)
1946 # endif
1947
1948 # if defined(SVR4) && !defined(GETPAGESIZE)
1949 #    include <unistd.h>
1950 #    define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
1951 # endif
1952
1953 # ifndef GETPAGESIZE
1954 #   if defined(SUNOS5) || defined(IRIX5)
1955 #       include <unistd.h>
1956 #   endif
1957 #   define GETPAGESIZE() getpagesize()
1958 # endif
1959
1960 # if defined(SUNOS5) || defined(DRSNX) || defined(UTS4)
1961             /* OS has SVR4 generic features.  Probably others also qualify.     */
1962 #   define SVR4
1963 # endif
1964
1965 # if defined(SUNOS5) || defined(DRSNX)
1966             /* OS has SUNOS5 style semi-undocumented interface to dynamic       */
1967             /* loader.                                                          */
1968 #   define SUNOS5DL
1969             /* OS has SUNOS5 style signal handlers.                             */
1970 #   define SUNOS5SIGS
1971 # endif
1972
1973 # if defined(HPUX)
1974 #   define SUNOS5SIGS
1975 # endif
1976
1977 # if defined(FREEBSD) && (__FreeBSD__ >= 4)
1978 #   define SUNOS5SIGS
1979 # endif
1980
1981 # if defined(SVR4) || defined(LINUX) || defined(IRIX5) || defined(HPUX) \
1982             || defined(OPENBSD) || defined(NETBSD) || defined(FREEBSD) \
1983             || defined(DGUX) || defined(BSD) || defined(SUNOS4) \
1984             || defined(_AIX) || defined(DARWIN) || defined(OSF1)
1985 #   define UNIX_LIKE   /* Basic Unix-like system calls work.    */
1986 # endif
1987
1988 # if CPP_WORDSZ != 32 && CPP_WORDSZ != 64
1989            -> bad word size
1990 # endif
1991
1992 # ifdef PCR
1993 #   undef DYNAMIC_LOADING
1994 #   undef STACKBOTTOM
1995 #   undef HEURISTIC1
1996 #   undef HEURISTIC2
1997 #   undef PROC_VDB
1998 #   undef MPROTECT_VDB
1999 #   define PCR_VDB
2000 # endif
2001
2002 # ifdef SRC_M3
2003         /* Postponed for now. */
2004 #   undef PROC_VDB
2005 #   undef MPROTECT_VDB
2006 # endif
2007
2008 # ifdef SMALL_CONFIG
2009         /* Presumably not worth the space it takes. */
2010 #   undef PROC_VDB
2011 #   undef MPROTECT_VDB
2012 # endif
2013
2014 # ifdef USE_MUNMAP
2015 #   undef MPROTECT_VDB  /* Can't deal with address space holes. */
2016 # endif
2017
2018 # ifdef PARALLEL_MARK
2019 #   undef MPROTECT_VDB  /* For now.     */
2020 # endif
2021
2022 # if !defined(PCR_VDB) && !defined(PROC_VDB) && !defined(MPROTECT_VDB)
2023 #   define DEFAULT_VDB
2024 # endif
2025
2026 # ifndef PREFETCH
2027 #   define PREFETCH(x)
2028 #   define NO_PREFETCH
2029 # endif
2030
2031 # ifndef PREFETCH_FOR_WRITE
2032 #   define PREFETCH_FOR_WRITE(x)
2033 #   define NO_PREFETCH_FOR_WRITE
2034 # endif
2035
2036 # ifndef CACHE_LINE_SIZE
2037 #   define CACHE_LINE_SIZE 32   /* Wild guess   */
2038 # endif
2039
2040 # ifdef LINUX
2041 #   define REGISTER_LIBRARIES_EARLY
2042     /* We sometimes use dl_iterate_phdr, which may acquire an internal  */
2043     /* lock.  This isn't safe after the world has stopped.  So we must  */
2044     /* call GC_register_dynamic_libraries before stopping the world.    */
2045     /* For performance reasons, this may be beneficial on other         */
2046     /* platforms as well, though it should be avoided in win32.         */
2047 # endif /* LINUX */
2048
2049 # if defined(SEARCH_FOR_DATA_START)
2050     extern ptr_t GC_data_start;
2051 #   define DATASTART GC_data_start
2052 # endif
2053
2054 # ifndef CLEAR_DOUBLE
2055 #   define CLEAR_DOUBLE(x) \
2056                 ((word*)x)[0] = 0; \
2057                 ((word*)x)[1] = 0;
2058 # endif /* CLEAR_DOUBLE */
2059
2060         /* Internally we use GC_SOLARIS_THREADS to test for either old or pthreads. */
2061 # if defined(GC_SOLARIS_PTHREADS) && !defined(GC_SOLARIS_THREADS)
2062 #   define GC_SOLARIS_THREADS
2063 # endif
2064
2065 # if defined(GC_IRIX_THREADS) && !defined(IRIX5)
2066         --> inconsistent configuration
2067 # endif
2068 # if defined(GC_LINUX_THREADS) && !defined(LINUX)
2069         --> inconsistent configuration
2070 # endif
2071 # if defined(GC_SOLARIS_THREADS) && !defined(SUNOS5)
2072         --> inconsistent configuration
2073 # endif
2074 # if defined(GC_HPUX_THREADS) && !defined(HPUX)
2075         --> inconsistent configuration
2076 # endif
2077 # if defined(GC_AIX_THREADS) && !defined(_AIX)
2078         --> inconsistent configuration
2079 # endif
2080 # if defined(GC_WIN32_THREADS) && !defined(MSWIN32) && !defined(CYGWIN32)
2081         --> inconsistent configuration
2082 # endif
2083
2084 # if defined(PCR) || defined(SRC_M3) || \
2085                 defined(GC_SOLARIS_THREADS) || defined(GC_WIN32_THREADS) || \
2086                 defined(GC_PTHREADS)
2087 #   define THREADS
2088 # endif
2089
2090 # if defined(HP_PA) || defined(M88K) || defined(POWERPC) && !defined(DARWIN) \
2091              || defined(LINT) || defined(MSWINCE) || defined(ARM32) || defined(CRIS) \
2092              || (defined(I386) && defined(__LCC__))
2093         /* Use setjmp based hack to mark from callee-save registers.    */
2094         /* The define should move to the individual platform            */
2095         /* descriptions.                                                */
2096 #       define USE_GENERIC_PUSH_REGS
2097 # endif
2098
2099 # if defined(MSWINCE)
2100 #   define NO_GETENV
2101 # endif
2102
2103 # if defined(SPARC)
2104 #   define ASM_CLEAR_CODE       /* Stack clearing is crucial, and we    */
2105                                 /* include assembly code to do it well. */
2106 # endif
2107
2108   /* Can we save call chain in objects for debugging?                   */
2109   /* SET NFRAMES (# of saved frames) and NARGS (#of args for each       */
2110   /* frame) to reasonable values for the platform.                      */
2111   /* Set SAVE_CALL_CHAIN if we can.  SAVE_CALL_COUNT can be specified   */
2112   /* at build time, though we feel free to adjust it slightly.          */
2113   /* Define NEED_CALLINFO if we either save the call stack or           */
2114   /* GC_ADD_CALLER is defined.                                          */
2115   /* GC_CAN_SAVE_CALL_STACKS is set in gc.h.                            */
2116
2117 #if defined(SPARC)
2118 # define CAN_SAVE_CALL_ARGS
2119 #endif
2120 #if (defined(I386) || defined(X86_64)) && defined(LINUX)
2121             /* SAVE_CALL_CHAIN is supported if the code is compiled to save     */
2122             /* frame pointers by default, i.e. no -fomit-frame-pointer flag.    */
2123 # define CAN_SAVE_CALL_ARGS
2124 #endif
2125
2126 # if defined(SAVE_CALL_COUNT) && !defined(GC_ADD_CALLER) \
2127              && defined(GC_CAN_SAVE_CALL_STACKS)
2128 #   define SAVE_CALL_CHAIN 
2129 # endif
2130 # ifdef SAVE_CALL_CHAIN
2131 #   if defined(SAVE_CALL_NARGS) && defined(CAN_SAVE_CALL_ARGS)
2132 #     define NARGS SAVE_CALL_NARGS
2133 #   else
2134 #     define NARGS 0    /* Number of arguments to save for each call.   */
2135 #   endif
2136 # endif
2137 # ifdef SAVE_CALL_CHAIN
2138 #   ifndef SAVE_CALL_COUNT
2139 #     define NFRAMES 6  /* Number of frames to save. Even for           */
2140                                 /* alignment reasons.                           */
2141 #   else
2142 #     define NFRAMES ((SAVE_CALL_COUNT + 1) & ~1)
2143 #   endif
2144 #   define NEED_CALLINFO
2145 # endif /* SAVE_CALL_CHAIN */
2146 # ifdef GC_ADD_CALLER
2147 #   define NFRAMES 1
2148 #   define NARGS 0
2149 #   define NEED_CALLINFO
2150 # endif
2151
2152 # if defined(MAKE_BACK_GRAPH) && !defined(DBG_HDRS_ALL)
2153 #   define DBG_HDRS_ALL
2154 # endif
2155
2156 # if defined(POINTER_MASK) && !defined(POINTER_SHIFT)
2157 #   define POINTER_SHIFT 0
2158 # endif
2159
2160 # if defined(POINTER_SHIFT) && !defined(POINTER_MASK)
2161 #   define POINTER_MASK ((GC_word)(-1))
2162 # endif
2163
2164 # if !defined(FIXUP_POINTER) && defined(POINTER_MASK)
2165 #   define FIXUP_POINTER(p) (p) = ((p) & (POINTER_MASK) << POINTER_SHIFT)
2166 # endif
2167
2168 # if defined(FIXUP_POINTER)
2169 #   define NEED_FIXUP_POINTER 1
2170 # else
2171 #   define NEED_FIXUP_POINTER 0
2172 #   define FIXUP_POINTER(p)
2173 # endif
2174
2175 #ifdef GC_PRIVATE_H
2176         /* This relies on some type definitions from gc_priv.h, from    */
2177         /* where it's normally included.                                */
2178         /*                                                              */
2179         /* How to get heap memory from the OS:                          */
2180         /* Note that sbrk()-like allocation is preferred, since it      */
2181         /* usually makes it possible to merge consecutively allocated   */
2182         /* chunks.  It also avoids unintented recursion with            */
2183         /* -DREDIRECT_MALLOC.                                           */
2184         /* GET_MEM() returns a HLKSIZE aligned chunk.                   */
2185         /* 0 is taken to mean failure.                                  */
2186         /* In the case os USE_MMAP, the argument must also be a         */
2187         /* physical page size.                                          */
2188         /* GET_MEM is currently not assumed to retrieve 0 filled space, */
2189         /* though we should perhaps take advantage of the case in which */
2190         /* does.                                                        */
2191         struct hblk;    /* See gc_priv.h.       */
2192 # ifdef PCR
2193             char * real_malloc();
2194 #   define GET_MEM(bytes) HBLKPTR(real_malloc((size_t)bytes + GC_page_size) \
2195                                           + GC_page_size-1)
2196 # else
2197 #   ifdef OS2
2198               void * os2_alloc(size_t bytes);
2199 #     define GET_MEM(bytes) HBLKPTR((ptr_t)os2_alloc((size_t)bytes \
2200                                             + GC_page_size) \
2201                                             + GC_page_size-1)
2202 #   else
2203 #     if defined(NEXT) || defined(DOS4GW) || \
2204                  (defined(AMIGA) && !defined(GC_AMIGA_FASTALLOC)) || \
2205                  (defined(SUNOS5) && !defined(USE_MMAP))
2206 #       define GET_MEM(bytes) HBLKPTR((size_t) \
2207                                               calloc(1, (size_t)bytes + GC_page_size) \
2208                                               + GC_page_size-1)
2209 #     else
2210 #       ifdef MSWIN32
2211           extern ptr_t GC_win32_get_mem();
2212 #         define GET_MEM(bytes) (struct hblk *)GC_win32_get_mem(bytes)
2213 #       else
2214 #         ifdef MACOS
2215 #           if defined(USE_TEMPORARY_MEMORY)
2216                         extern Ptr GC_MacTemporaryNewPtr(size_t size,
2217                                                          Boolean clearMemory);
2218 #               define GET_MEM(bytes) HBLKPTR( \
2219                             GC_MacTemporaryNewPtr(bytes + GC_page_size, true) \
2220                             + GC_page_size-1)
2221 #           else
2222 #                   define GET_MEM(bytes) HBLKPTR( \
2223                                 NewPtrClear(bytes + GC_page_size) + GC_page_size-1)
2224 #           endif
2225 #         else
2226 #           ifdef MSWINCE
2227               extern ptr_t GC_wince_get_mem();
2228 #             define GET_MEM(bytes) (struct hblk *)GC_wince_get_mem(bytes)
2229 #           else
2230 #             if defined(AMIGA) && defined(GC_AMIGA_FASTALLOC)
2231                         extern void *GC_amiga_get_mem(size_t size);
2232 #                       define GET_MEM(bytes) HBLKPTR((size_t) \
2233                           GC_amiga_get_mem((size_t)bytes + GC_page_size) \
2234                           + GC_page_size-1)
2235 #             else
2236                 extern ptr_t GC_unix_get_mem();
2237 #               define GET_MEM(bytes) (struct hblk *)GC_unix_get_mem(bytes)
2238 #             endif
2239 #           endif
2240 #         endif
2241 #       endif
2242 #     endif
2243 #   endif
2244 # endif
2245
2246 #endif /* GC_PRIVATE_H */
2247
2248 # endif /* GCCONFIG_H */