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.
6 * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
7 * OR IMPLIED. ANY USE IS AT YOUR OWN RISK.
9 * Permission is hereby granted to use or copy this program
10 * for any purpose, provided the above notices are retained on all copies.
11 * Permission to modify the code and to distribute modified code is granted,
12 * provided the above notices are retained, and a notice that the code was
13 * modified is included with the above copyright notice.
20 /* Machine dependent parameters. Some tuning parameters can be found */
21 /* near the top of gc_private.h. */
23 /* Machine specific parts contributed by various people. See README file. */
25 /* First a unified test for Linux: */
26 # if defined(linux) || defined(__linux__)
30 /* Determine the machine type: */
31 # if defined(sun) && defined(mc68000)
34 # define mach_type_known
36 # if defined(hp9000s300)
39 # define mach_type_known
41 # if defined(__OpenBSD__) && defined(m68k)
44 # define mach_type_known
46 # if defined(__OpenBSD__) && defined(__sparc__)
49 # define mach_type_known
51 # if defined(__NetBSD__) && defined(m68k)
54 # define mach_type_known
56 # if defined(__NetBSD__) && defined(arm32)
59 # define mach_type_known
68 # define mach_type_known
70 # if defined(mips) || defined(__mips)
73 # if defined(ultrix) || defined(__ultrix) || defined(__NetBSD__)
76 # if defined(_SYSTYPE_SVR4) || defined(SYSTYPE_SVR4) \
77 || defined(__SYSTYPE_SVR4__)
78 # define IRIX5 /* or IRIX 6.X */
80 # define RISCOS /* or IRIX 4.X */
84 # define mach_type_known
86 # if defined(sequent) && defined(i386)
89 # define mach_type_known
91 # if defined(sun) && defined(i386)
94 # define mach_type_known
96 # if (defined(__OS2__) || defined(__EMX__)) && defined(__32BIT__)
99 # define mach_type_known
103 # define mach_type_known
105 # if defined(sun) && (defined(sparc) || defined(__sparc))
107 /* Test for SunOS 5.x */
114 # define mach_type_known
116 # if defined(sparc) && defined(unix) && !defined(sun) && !defined(linux) \
117 && !defined(__OpenBSD__)
120 # define mach_type_known
124 # define mach_type_known
126 # if defined(_M_XENIX) && defined(_M_SYSV) && defined(_M_I386)
127 /* The above test may need refinement */
129 # if defined(_SCO_ELF)
134 # define mach_type_known
136 # if defined(_AUX_SOURCE)
139 # define mach_type_known
141 # if defined(_PA_RISC1_0) || defined(_PA_RISC1_1) || defined(_PA_RISC2_0) \
142 || defined(hppa) || defined(__hppa__)
147 # define mach_type_known
149 # if defined(LINUX) && (defined(i386) || defined(__i386__))
151 # define mach_type_known
153 # if defined(LINUX) && (defined(__ia64__) || defined(__ia64))
155 # define mach_type_known
157 # if defined(LINUX) && defined(powerpc)
159 # define mach_type_known
161 # if defined(LINUX) && defined(__mc68000__)
163 # define mach_type_known
165 # if defined(LINUX) && (defined(sparc) || defined(__sparc__))
167 # define mach_type_known
169 # if defined(LINUX) && defined(arm)
171 # define mach_type_known
173 # if defined(__alpha) || defined(__alpha__)
176 # define OSF1 /* a.k.a Digital Unix */
178 # define mach_type_known
180 # if defined(_AMIGA) && !defined(AMIGA)
185 # define mach_type_known
187 # if defined(THINK_C) || defined(__MWERKS__) && !defined(__powerc)
190 # define mach_type_known
192 # if defined(__MWERKS__) && defined(__powerc)
195 # define mach_type_known
200 # define mach_type_known
202 # if defined(NeXT) && defined(mc68000)
205 # define mach_type_known
207 # if defined(NeXT) && defined(i386)
210 # define mach_type_known
212 # if defined(__OpenBSD__) && defined(i386)
215 # define mach_type_known
217 # if defined(__FreeBSD__) && defined(i386)
220 # define mach_type_known
222 # if defined(__NetBSD__) && defined(i386)
225 # define mach_type_known
227 # if defined(bsdi) && defined(i386)
230 # define mach_type_known
232 # if !defined(mach_type_known) && defined(__386BSD__)
235 # define mach_type_known
237 # if defined(_CX_UX) && defined(_M88K)
240 # define mach_type_known
245 # define mach_type_known
247 # if (defined(_MSDOS) || defined(_MSC_VER)) && (_M_IX86 >= 300) \
248 || defined(_WIN32) && !defined(__CYGWIN32__) && !defined(__CYGWIN__)
250 # define MSWIN32 /* or Win32s */
251 # define mach_type_known
253 # if defined(__DJGPP__)
256 # define DJGPP /* MSDOS running the DJGPP port of GCC */
258 # define mach_type_known
260 # if defined(__CYGWIN32__) || defined(__CYGWIN__)
263 # define mach_type_known
265 # if defined(__MINGW32__)
268 # define mach_type_known
270 # if defined(__BORLANDC__)
273 # define mach_type_known
275 # if defined(_UTS) && !defined(mach_type_known)
278 # define mach_type_known
282 # define mach_type_known
285 # if defined(__WATCOMC__) && defined(__386__)
287 # if !defined(OS2) && !defined(MSWIN32) && !defined(DOS4GW)
288 # if defined(__OS2__)
291 # if defined(__WINDOWS_386__) || defined(__NT__)
298 # define mach_type_known
301 /* Feel free to add more clauses here */
303 /* Or manually define the machine type here. A machine type is */
304 /* characterized by the architecture. Some */
305 /* machine types are further subdivided by OS. */
306 /* the macros ULTRIX, RISCOS, and BSD to distinguish. */
307 /* Note that SGI IRIX is treated identically to RISCOS. */
308 /* SYSV on an M68K actually means A/UX. */
309 /* The distinction in these cases is usually the stack starting address */
310 # ifndef mach_type_known
311 --> unknown machine type
313 /* Mapping is: M68K ==> Motorola 680X0 */
314 /* (SUNOS4,HP,NEXT, and SYSV (A/UX), */
315 /* MACOS and AMIGA variants) */
316 /* I386 ==> Intel 386 */
317 /* (SEQUENT, OS2, SCO, LINUX, NETBSD, */
318 /* FREEBSD, THREE86BSD, MSWIN32, */
319 /* BSDI,SUNOS5, NEXT, other variants) */
320 /* NS32K ==> Encore Multimax */
321 /* MIPS ==> R2000 or R3000 */
322 /* (RISCOS, ULTRIX variants) */
323 /* VAX ==> DEC VAX */
324 /* (BSD, ULTRIX variants) */
325 /* RS6000 ==> IBM RS/6000 AIX3.X */
326 /* RT ==> IBM PC/RT */
327 /* HP_PA ==> HP9000/700 & /800 */
329 /* SPARC ==> SPARC under SunOS */
330 /* (SUNOS4, SUNOS5, */
331 /* DRSNX variants) */
332 /* ALPHA ==> DEC Alpha */
333 /* (OSF1 and LINUX variants) */
334 /* M88K ==> Motorola 88XX0 */
335 /* (CX_UX and DGUX) */
336 /* S370 ==> 370-like machine */
337 /* running Amdahl UTS4 */
338 /* ARM32 ==> Intel StrongARM */
339 /* IA64 ==> Intel IA64 */
344 * For each architecture and OS, the following need to be defined:
346 * CPP_WORD_SZ is a simple integer constant representing the word size.
347 * in bits. We assume byte addressibility, where a byte has 8 bits.
348 * We also assume CPP_WORD_SZ is either 32 or 64.
349 * (We care about the length of pointers, not hardware
350 * bus widths. Thus a 64 bit processor with a C compiler that uses
351 * 32 bit pointers should use CPP_WORD_SZ of 32, not 64. Default is 32.)
353 * MACH_TYPE is a string representation of the machine type.
354 * OS_TYPE is analogous for the OS.
356 * ALIGNMENT is the largest N, such that
357 * all pointer are guaranteed to be aligned on N byte boundaries.
358 * defining it to be 1 will always work, but perform poorly.
360 * DATASTART is the beginning of the data segment.
361 * On UNIX systems, the collector will scan the area between DATASTART
362 * and DATAEND for root pointers.
364 * DATAEND, if not &end.
366 * ALIGN_DOUBLE of GC_malloc should return blocks aligned to twice
369 * STACKBOTTOM is the cool end of the stack, which is usually the
370 * highest address in the stack.
371 * Under PCR or OS/2, we have other ways of finding thread stacks.
372 * For each machine, the following should:
373 * 1) define STACK_GROWS_UP if the stack grows toward higher addresses, and
374 * 2) define exactly one of
375 * STACKBOTTOM (should be defined to be an expression)
378 * If either of the last two macros are defined, then STACKBOTTOM is computed
379 * during collector startup using one of the following two heuristics:
380 * HEURISTIC1: Take an address inside GC_init's frame, and round it up to
381 * the next multiple of STACK_GRAN.
382 * HEURISTIC2: Take an address inside GC_init's frame, increment it repeatedly
383 * in small steps (decrement if STACK_GROWS_UP), and read the value
384 * at each location. Remember the value when the first
385 * Segmentation violation or Bus error is signalled. Round that
386 * to the nearest plausible page boundary, and use that instead
389 * Gustavo Rodriguez-Rivera points out that on most (all?) Unix machines,
390 * the value of environ is a pointer that can serve as STACKBOTTOM.
391 * I expect that HEURISTIC2 can be replaced by this approach, which
392 * interferes far less with debugging.
394 * If no expression for STACKBOTTOM can be found, and neither of the above
395 * heuristics are usable, the collector can still be used with all of the above
396 * undefined, provided one of the following is done:
397 * 1) GC_mark_roots can be changed to somehow mark from the correct stack(s)
398 * without reference to STACKBOTTOM. This is appropriate for use in
399 * conjunction with thread packages, since there will be multiple stacks.
400 * (Allocating thread stacks in the heap, and treating them as ordinary
401 * heap data objects is also possible as a last resort. However, this is
402 * likely to introduce significant amounts of excess storage retention
403 * unless the dead parts of the thread stacks are periodically cleared.)
404 * 2) Client code may set GC_stackbottom before calling any GC_ routines.
405 * If the author of the client code controls the main program, this is
406 * easily accomplished by introducing a new main program, setting
407 * GC_stackbottom to the address of a local variable, and then calling
408 * the original main program. The new main program would read something
411 * # include "gc_private.h"
413 * main(argc, argv, envp)
415 * char **argv, **envp;
419 * GC_stackbottom = (ptr_t)(&dummy);
420 * return(real_main(argc, argv, envp));
424 * Each architecture may also define the style of virtual dirty bit
425 * implementation to be used:
426 * MPROTECT_VDB: Write protect the heap and catch faults.
427 * PROC_VDB: Use the SVR4 /proc primitives to read dirty bits.
429 * An architecture may define DYNAMIC_LOADING if dynamic_load.c
430 * defined GC_register_dynamic_libraries() for the architecture.
432 * An architecture may define PREFETCH(x) to preload the cache with *x.
433 * This defaults to a no-op.
435 * PREFETCH_FOR_WRITE(x) is used if *x is about to be written.
437 * An architecture may also define CLEAR_DOUBLE(x) to be a fast way to
438 * clear the two words at GC_malloc-aligned address x. By default,
439 * word stores of 0 are used instead.
443 # define STACK_GRAN 0x1000000
445 # define MACH_TYPE "M68K"
448 # define OS_TYPE "OPENBSD"
451 # define DATASTART ((ptr_t)(&etext))
454 # define OS_TYPE "NETBSD"
457 # define DATASTART ((ptr_t)(&etext))
460 # define OS_TYPE "LINUX"
461 # define STACKBOTTOM ((ptr_t)0xf0000000)
462 # define MPROTECT_VDB
464 # define DYNAMIC_LOADING
465 extern char **__environ;
466 # define DATASTART ((ptr_t)(&__environ))
467 /* hideous kludge: __environ is the first */
468 /* word in crt0.o, and delimits the start */
469 /* of the data segment, no matter which */
470 /* ld options were passed through. */
471 /* We could use _etext instead, but that */
472 /* would include .rodata, which may */
473 /* contain large read-only data tables */
474 /* that we'd rather not scan. */
476 # define DATAEND (&_end)
479 # define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
483 # define OS_TYPE "SUNOS4"
485 # define DATASTART ((ptr_t)((((word) (&etext)) + 0x1ffff) & ~0x1ffff))
486 # define HEURISTIC1 /* differs */
487 # define DYNAMIC_LOADING
490 # define OS_TYPE "HP"
492 # define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
493 # define STACKBOTTOM ((ptr_t) 0xffeffffc)
494 /* empirically determined. seems to work. */
496 # define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
499 # define OS_TYPE "SYSV"
501 # define DATASTART ((ptr_t)((((word) (&etext)) + 0x3fffff) \
503 +((word)&etext & 0x1fff))
504 /* This only works for shared-text binaries with magic number 0413.
505 The other sorts of SysV binaries put the data at the end of the text,
506 in which case the default of &etext would work. Unfortunately,
507 handling both would require having the magic-number available.
510 # define STACKBOTTOM ((ptr_t)0xFFFFFFFE)
511 /* The stack starts at the top of memory, but */
512 /* 0x0 cannot be used as setjump_test complains */
513 /* that the stack direction is incorrect. Two */
514 /* bytes down from 0x0 should be safe enough. */
516 # include <sys/mmu.h>
517 # define GETPAGESIZE() PAGESIZE /* Is this still right? */
520 # define OS_TYPE "AMIGA"
521 /* STACKBOTTOM and DATASTART handled specially */
523 # define DATAEND /* not needed */
524 # define GETPAGESIZE() 4096
530 # define OS_TYPE "MACOS"
531 /* see os_dep.c for details of global data segments. */
532 # define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
533 # define DATAEND /* not needed */
534 # define GETPAGESIZE() 4096
537 # define OS_TYPE "NEXT"
538 # define DATASTART ((ptr_t) get_etext())
539 # define STACKBOTTOM ((ptr_t) 0x4000000)
540 # define DATAEND /* not needed */
545 # define MACH_TYPE "POWERPC"
547 # define ALIGNMENT 2 /* Still necessary? Could it be 4? */
551 # define OS_TYPE "MACOS"
552 /* see os_dep.c for details of global data segments. */
553 # define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
554 # define DATAEND /* not needed */
557 # define ALIGNMENT 4 /* Guess. Can someone verify? */
558 /* This was 2, but that didn't sound right. */
559 # define OS_TYPE "LINUX"
561 # define DYNAMIC_LOADING
563 # define STACK_GRAN 0x10000000
564 /* Stack usually starts at 0x80000000 */
565 # define LINUX_DATA_START
567 # define DATAEND (&_end)
571 # define OS_TYPE "MACOSX"
572 # define DATASTART ((ptr_t) get_etext())
573 # define STACKBOTTOM ((ptr_t) 0xc0000000)
574 # define DATAEND /* not needed */
579 # define MACH_TYPE "VAX"
580 # define ALIGNMENT 4 /* Pointers are longword aligned by 4.2 C compiler */
582 # define DATASTART ((ptr_t)(&etext))
584 # define OS_TYPE "BSD"
586 /* HEURISTIC2 may be OK, but it's hard to test. */
589 # define OS_TYPE "ULTRIX"
590 # define STACKBOTTOM ((ptr_t) 0x7fffc800)
595 # define MACH_TYPE "RT"
597 # define DATASTART ((ptr_t) 0x10000000)
598 # define STACKBOTTOM ((ptr_t) 0x1fffd800)
602 # define MACH_TYPE "SPARC"
603 # define ALIGNMENT 4 /* Required by hardware */
604 # define ALIGN_DOUBLE
607 # define OS_TYPE "SUNOS5"
610 extern char * GC_SysVGetDataStart();
611 # define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &_etext)
612 # define DATAEND (&_end)
617 # define HEAP_START (ptr_t)0x40000000
619 # define HEAP_START DATAEND
622 /* HEURISTIC1 reportedly no longer works under 2.7. Thus we */
623 /* switched to HEURISTIC2, eventhough it creates some debugging */
627 # define GETPAGESIZE() sysconf(_SC_PAGESIZE)
628 /* getpagesize() appeared to be missing from at least one */
629 /* Solaris 5.4 installation. Weird. */
630 # define DYNAMIC_LOADING
633 # define OS_TYPE "SUNOS4"
634 /* [If you have a weak stomach, don't read this.] */
635 /* We would like to use: */
636 /* # define DATASTART ((ptr_t)((((word) (&etext)) + 0x1fff) & ~0x1fff)) */
637 /* This fails occasionally, due to an ancient, but very */
638 /* persistent ld bug. &etext is set 32 bytes too high. */
639 /* We instead read the text segment size from the a.out */
640 /* header, which happens to be mapped into our address space */
641 /* at the start of the text segment. The detective work here */
642 /* was done by Robert Ehrlich, Manuel Serrano, and Bernard */
643 /* Serpette of INRIA. */
644 /* This assumes ZMAGIC, i.e. demand-loadable executables. */
645 # define TEXTSTART 0x2000
646 # define DATASTART ((ptr_t)(*(int *)(TEXTSTART+0x4)+TEXTSTART))
647 # define MPROTECT_VDB
649 # define DYNAMIC_LOADING
652 # define CPP_WORDSZ 32
653 # define OS_TYPE "DRSNX"
654 extern char * GC_SysVGetDataStart();
656 # define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &etext)
657 # define MPROTECT_VDB
658 # define STACKBOTTOM ((ptr_t) 0xdfff0000)
659 # define DYNAMIC_LOADING
662 # define OS_TYPE "LINUX"
664 # define LINUX_DATA_START
665 # define DYNAMIC_LOADING
667 Linux Sparc non elf ?
670 # define DATAEND (&_end)
672 # define STACKBOTTOM ((ptr_t) 0xf0000000)
675 # define OS_TYPE "OPENBSD"
676 # define STACKBOTTOM ((ptr_t) 0xf8000000)
677 # define DATASTART ((ptr_t)(&etext))
682 # define MACH_TYPE "I386"
683 # define ALIGNMENT 4 /* Appears to hold for all "32 bit" compilers */
684 /* except Borland. The -a4 option fixes */
686 /* Ivan Demakov: For Watcom the option is -zp4. */
687 # ifndef SMALL_CONFIG
688 # define ALIGN_DOUBLE /* Not strictly necessary, but may give speed */
689 /* improvement on Pentiums. */
692 # define OS_TYPE "SEQUENT"
694 # define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
695 # define STACKBOTTOM ((ptr_t) 0x3ffff000)
698 # define OS_TYPE "SUNOS5"
699 extern int etext, _start;
700 extern char * GC_SysVGetDataStart();
701 # define DATASTART GC_SysVGetDataStart(0x1000, &etext)
702 # define STACKBOTTOM ((ptr_t)(&_start))
703 /** At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
704 /*# define PROC_VDB*/
705 # define DYNAMIC_LOADING
710 # define HEAP_START (ptr_t)0x40000000
712 # define HEAP_START DATAEND
716 # define OS_TYPE "SCO"
718 # define DATASTART ((ptr_t)((((word) (&etext)) + 0x3fffff) \
720 +((word)&etext & 0xfff))
721 # define STACKBOTTOM ((ptr_t) 0x7ffffffc)
724 # define OS_TYPE "SCO_ELF"
726 # define DATASTART ((ptr_t)(&etext))
727 # define STACKBOTTOM ((ptr_t) 0x08048000)
728 # define DYNAMIC_LOADING
729 # define ELF_CLASS ELFCLASS32
732 # define OS_TYPE "LINUX"
733 # define LINUX_STACKBOTTOM
737 # define STACK_GRAN 0x10000000
738 /* STACKBOTTOM is usually 0xc0000000, but this changes with */
739 /* different kernel configurations. In particular, systems */
740 /* with 2GB physical memory will usually move the user */
741 /* address space limit, and hence initial SP to 0x80000000. */
743 # if !defined(LINUX_THREADS) || !defined(REDIRECT_MALLOC)
744 # define MPROTECT_VDB
746 /* We seem to get random errors in incremental mode, */
747 /* possibly because Linux threads is itself a malloc client */
748 /* and can't deal with the signals. */
751 # define DYNAMIC_LOADING
752 # ifdef UNDEFINED /* includes ro data */
754 # define DATASTART ((ptr_t)((((word) (&_etext)) + 0xfff) & ~0xfff))
756 # include <features.h>
757 # if defined(__GLIBC__) && __GLIBC__ >= 2
758 # define LINUX_DATA_START
760 extern char **__environ;
761 # define DATASTART ((ptr_t)(&__environ))
762 /* hideous kludge: __environ is the first */
763 /* word in crt0.o, and delimits the start */
764 /* of the data segment, no matter which */
765 /* ld options were passed through. */
766 /* We could use _etext instead, but that */
767 /* would include .rodata, which may */
768 /* contain large read-only data tables */
769 /* that we'd rather not scan. */
772 # define DATAEND (&_end)
775 # define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
777 # ifdef USE_I686_PREFETCH
778 # define PREFETCH(x) \
779 __asm__ __volatile__ (" prefetchnta %0": : "m"(*(char *)(x)))
780 /* Empirically prefetcht0 is much more effective at reducing */
781 /* cache miss stalls for the targetted load instructions. But it */
782 /* seems to interfere enough with other cache traffic that the net */
783 /* result is worse than prefetchnta. */
785 /* Using prefetches for write seems to have a slight negative */
786 /* impact on performance, at least for a PIII/500. */
787 # define PREFETCH_FOR_WRITE(x) \
788 __asm__ __volatile__ (" prefetcht0 %0": : "m"(*(char *)(x)))
791 # ifdef USE_3DNOW_PREFETCH
792 # define PREFETCH(x) \
793 __asm__ __volatile__ (" prefetch %0": : "m"(*(char *)(x)))
794 # define PREFETCH_FOR_WRITE(x)
795 __asm__ __volatile__ (" prefetchw %0": : "m"(*(char *)(x)))
799 # define OS_TYPE "CYGWIN32"
800 extern int _data_start__;
801 extern int _data_end__;
802 extern int _bss_start__;
803 extern int _bss_end__;
804 /* For binutils 2.9.1, we have */
805 /* DATASTART = _data_start__ */
806 /* DATAEND = _bss_end__ */
807 /* whereas for some earlier versions it was */
808 /* DATASTART = _bss_start__ */
809 /* DATAEND = _data_end__ */
810 /* To get it right for both, we take the */
811 /* minumum/maximum of the two. */
812 # define MAX(x,y) ((x) > (y) ? (x) : (y))
813 # define MIN(x,y) ((x) < (y) ? (x) : (y))
814 # define DATASTART ((ptr_t) MIN(&_data_start__, &_bss_start__))
815 # define DATAEND ((ptr_t) MAX(&_data_end__, &_bss_end__))
817 # define STACK_GRAN 0x10000
821 # define OS_TYPE "OS2"
822 /* STACKBOTTOM and DATASTART are handled specially in */
823 /* os_dep.c. OS2 actually has the right */
825 # define DATAEND /* not needed */
828 # define OS_TYPE "MSWIN32"
829 /* STACKBOTTOM and DATASTART are handled specially in */
832 # define MPROTECT_VDB
834 # define DATAEND /* not needed */
837 # define OS_TYPE "DJGPP"
838 # include "stubinfo.h"
841 extern int __djgpp_stack_limit;
842 # define DATASTART ((ptr_t)((((word) (&etext)) + 0x1ff) & ~0x1ff))
843 /* # define STACKBOTTOM ((ptr_t)((word) _stubinfo + _stubinfo->size \
845 # define STACKBOTTOM ((ptr_t)((word) __djgpp_stack_limit + _stklen))
846 /* This may not be right. */
849 # define OS_TYPE "OPENBSD"
852 # define OS_TYPE "FREEBSD"
853 # define MPROTECT_VDB
856 # define OS_TYPE "NETBSD"
859 # define OS_TYPE "THREE86BSD"
862 # define OS_TYPE "BSDI"
864 # if defined(OPENBSD) || defined(FREEBSD) || defined(NETBSD) \
865 || defined(THREE86BSD) || defined(BSDI)
868 # define DATASTART ((ptr_t)(&etext))
871 # define OS_TYPE "NEXT"
872 # define DATASTART ((ptr_t) get_etext())
873 # define STACKBOTTOM ((ptr_t)0xc0000000)
874 # define DATAEND /* not needed */
877 # define OS_TYPE "DOS4GW"
878 extern long __nullarea;
880 extern char *_STACKTOP;
881 /* Depending on calling conventions Watcom C either precedes
882 or does not precedes with undescore names of C-variables.
883 Make sure startup code variables always have the same names. */
884 #pragma aux __nullarea "*";
885 #pragma aux _end "*";
886 # define STACKBOTTOM ((ptr_t) _STACKTOP)
887 /* confused? me too. */
888 # define DATASTART ((ptr_t) &__nullarea)
889 # define DATAEND ((ptr_t) &_end)
894 # define MACH_TYPE "NS32K"
896 extern char **environ;
897 # define DATASTART ((ptr_t)(&environ))
898 /* hideous kludge: environ is the first */
899 /* word in crt0.o, and delimits the start */
900 /* of the data segment, no matter which */
901 /* ld options were passed through. */
902 # define STACKBOTTOM ((ptr_t) 0xfffff000) /* for Encore */
906 # define MACH_TYPE "MIPS"
907 /* # define STACKBOTTOM ((ptr_t)0x7fff8000) sometimes also works. */
909 /* This was developed for a linuxce style platform. Probably */
910 /* needs to be tweaked for workstation class machines. */
911 # define OS_TYPE "LINUX"
912 extern int __data_start;
913 # define DATASTART ((ptr_t)(&__data_start))
915 # define USE_GENERIC_PUSH_REGS 1
916 # define STACKBOTTOM 0x80000000
917 /* In many cases, this should probably use LINUX_STACKBOTTOM */
918 /* instead. But some kernel versions seem to give the wrong */
919 /* value from /proc. */
923 # define DATASTART (ptr_t)0x10000000
924 /* Could probably be slightly higher since */
925 /* startup code allocates lots of stuff. */
926 # define OS_TYPE "ULTRIX"
931 # define DATASTART (ptr_t)0x10000000
932 # define OS_TYPE "RISCOS"
933 # define ALIGNMENT 4 /* Required by hardware */
938 # define DATASTART ((ptr_t)(&_fdata))
940 # define HEAP_START (ptr_t)0x30000000
942 # define HEAP_START DATASTART
944 /* Lowest plausible heap address. */
945 /* In the MMAP case, we map there. */
946 /* In either case it is used to identify */
947 /* heap sections so they're not */
948 /* considered as roots. */
949 # define OS_TYPE "IRIX5"
950 # define MPROTECT_VDB
952 # define CPP_WORDSZ _MIPS_SZPTR
953 # define ALIGNMENT (_MIPS_SZPTR/8)
954 # if CPP_WORDSZ != 64
955 # define ALIGN_DOUBLE
959 # define ALIGN_DOUBLE
961 # define DYNAMIC_LOADING
966 # define MACH_TYPE "RS6000"
968 # define DATASTART ((ptr_t)0x20000000)
970 # define STACKBOTTOM ((ptr_t)((ulong)&errno))
971 # define DYNAMIC_LOADING
972 /* For really old versions of AIX, this may have to be removed. */
976 /* OS is assumed to be HP/UX */
977 # define MACH_TYPE "HP_PA"
978 # define OS_TYPE "HPUX"
980 # define CPP_WORDSZ 64
983 # define CPP_WORDSZ 32
985 # define ALIGN_DOUBLE
987 extern int __data_start;
988 # define DATASTART ((ptr_t)(&__data_start))
990 /* The following appears to work for 7xx systems running HP/UX */
991 /* 9.xx Furthermore, it might result in much faster */
992 /* collections than HEURISTIC2, which may involve scanning */
993 /* segments that directly precede the stack. It is not the */
994 /* default, since it may not work on older machine/OS */
995 /* combinations. (Thanks to Raymond X.T. Nijssen for uncovering */
997 # define STACKBOTTOM ((ptr_t) 0x7b033000) /* from /etc/conf/h/param.h */
999 /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2 */
1000 /* to this. We'll probably do this on other platforms, too. */
1001 /* For now I'll use it where I can test it. */
1002 extern char ** environ;
1003 # define STACKBOTTOM ((ptr_t)environ)
1005 # define STACK_GROWS_UP
1006 # define DYNAMIC_LOADING
1007 # ifndef HPUX_THREADS
1008 # define MPROTECT_VDB
1010 # include <unistd.h>
1011 # define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1015 # define MACH_TYPE "ALPHA"
1016 # define ALIGNMENT 8
1017 # define USE_GENERIC_PUSH_REGS
1018 /* Gcc and probably the DEC/Compaq compiler spill pointers to preserved */
1019 /* fp registers in some cases when the target is a 21264. The assembly */
1020 /* code doesn't handle that yet, and version dependencies make that a */
1021 /* bit tricky. Do the easy thing for now. */
1023 # define OS_TYPE "OSF1"
1024 # define DATASTART ((ptr_t) 0x140000000)
1026 # define DATAEND ((ptr_t) &_end)
1028 /* Normally HEURISTIC2 is too conervative, since */
1029 /* the text segment immediately follows the stack. */
1030 /* Hence we give an upper pound. */
1032 # define HEURISTIC2_LIMIT ((ptr_t)((word)(&__start) & ~(getpagesize()-1)))
1033 # define CPP_WORDSZ 64
1034 # define MPROTECT_VDB
1035 # define DYNAMIC_LOADING
1038 # define OS_TYPE "LINUX"
1039 # define CPP_WORDSZ 64
1040 # define STACKBOTTOM ((ptr_t) 0x120000000)
1042 # define LINUX_DATA_START
1043 # define DYNAMIC_LOADING
1044 /* This doesn't work if the collector is in a dynamic library. */
1046 # define DATASTART ((ptr_t) 0x140000000)
1049 # define DATAEND (&_end)
1050 # define MPROTECT_VDB
1051 /* Has only been superficially tested. May not */
1052 /* work on all versions. */
1057 # define MACH_TYPE "IA64"
1058 # define ALIGN_DOUBLE
1059 /* Requires 16 byte alignment for malloc */
1060 # define ALIGNMENT 8
1061 # define USE_GENERIC_PUSH_REGS
1062 /* We need to get preserved registers in addition to register windows. */
1063 /* That's easiest to do with setjmp. */
1068 # define OS_TYPE "LINUX"
1069 # define CPP_WORDSZ 64
1070 /* This should really be done through /proc, but that */
1071 /* requires we run on an IA64 kernel. */
1072 # define STACKBOTTOM ((ptr_t) 0xa000000000000000l)
1073 /* We also need the base address of the register stack */
1074 /* backing store. There is probably a better way to */
1075 /* get that, too ... */
1076 # define BACKING_STORE_BASE ((ptr_t) 0x9fffffff80000000l)
1078 # define SEARCH_FOR_DATA_START
1079 # define DATASTART GC_data_start
1081 extern int data_start;
1082 # define DATASTART ((ptr_t)(&data_start))
1084 # define DYNAMIC_LOADING
1085 # define MPROTECT_VDB
1086 /* Requires Linux 2.3.47 or later. */
1088 # define DATAEND (&_end)
1089 # define PREFETCH(x) \
1090 __asm__ (" lfetch [%0]": : "r"((void *)(x)))
1091 # define PREFETCH_FOR_WRITE(x) \
1092 __asm__ (" lfetch.excl [%0]": : "r"((void *)(x)))
1093 # define CLEAR_DOUBLE(x) \
1094 __asm__ (" stf.spill [%0]=f0": : "r"((void *)(x)))
1099 # define MACH_TYPE "M88K"
1100 # define ALIGNMENT 4
1101 # define ALIGN_DOUBLE
1104 # define OS_TYPE "CX_UX"
1105 # define DATASTART ((((word)&etext + 0x3fffff) & ~0x3fffff) + 0x10000)
1108 # define OS_TYPE "DGUX"
1109 extern char * GC_SysVGetDataStart();
1110 # define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &etext)
1112 # define STACKBOTTOM ((char*)0xf0000000) /* determined empirically */
1116 # define MACH_TYPE "S370"
1117 # define OS_TYPE "UTS4"
1118 # define ALIGNMENT 4 /* Required by hardware */
1122 extern char * GC_SysVGetDataStart();
1123 # define DATASTART (ptr_t)GC_SysVGetDataStart(0x10000, &_etext)
1124 # define DATAEND (&_end)
1129 # define ALIGNMENT 4
1131 # define DATASTART ((ptr_t)(&_etext))
1136 # define CPP_WORDSZ 32
1137 # define MACH_TYPE "ARM32"
1138 # define ALIGNMENT 4
1140 # define OS_TYPE "NETBSD"
1143 # define DATASTART ((ptr_t)(&etext))
1144 # define USE_GENERIC_PUSH_REGS
1147 # define OS_TYPE "LINUX"
1150 # define STACK_GRAN 0x10000000
1151 # define USE_GENERIC_PUSH_REGS
1153 # define DYNAMIC_LOADING
1154 # include <features.h>
1155 # if defined(__GLIBC__) && __GLIBC__ >= 2
1156 # define LINUX_DATA_START
1158 extern char **__environ;
1159 # define DATASTART ((ptr_t)(&__environ))
1160 /* hideous kludge: __environ is the first */
1161 /* word in crt0.o, and delimits the start */
1162 /* of the data segment, no matter which */
1163 /* ld options were passed through. */
1164 /* We could use _etext instead, but that */
1165 /* would include .rodata, which may */
1166 /* contain large read-only data tables */
1167 /* that we'd rather not scan. */
1170 # define DATAEND (&_end)
1173 # define DATASTART ((ptr_t)((((word) (&etext)) + 0xfff) & ~0xfff))
1178 #ifdef LINUX_DATA_START
1179 /* Some Linux distributions arrange to define __data_start. Some */
1180 /* define data_start as a weak symbol. The latter is technically */
1181 /* broken, since the user program may define data_start, in which */
1182 /* case we lose. Nonetheless, we try both, prefering __data_start. */
1183 /* We assume gcc. */
1184 # pragma weak __data_start
1185 extern int __data_start;
1186 # pragma weak data_start
1187 extern int data_start;
1188 # define DATASTART ((ptr_t)(&__data_start != 0? &__data_start : &data_start))
1191 # ifndef STACK_GROWS_UP
1192 # define STACK_GROWS_DOWN
1196 # define CPP_WORDSZ 32
1205 # define DATAEND (&end)
1208 # if defined(SVR4) && !defined(GETPAGESIZE)
1209 # include <unistd.h>
1210 # define GETPAGESIZE() sysconf(_SC_PAGESIZE)
1213 # ifndef GETPAGESIZE
1214 # if defined(SUNOS5) || defined(IRIX5)
1215 # include <unistd.h>
1217 # define GETPAGESIZE() getpagesize()
1220 # if defined(SUNOS5) || defined(DRSNX) || defined(UTS4)
1221 /* OS has SVR4 generic features. Probably others also qualify. */
1225 # if defined(SUNOS5) || defined(DRSNX)
1226 /* OS has SUNOS5 style semi-undocumented interface to dynamic */
1229 /* OS has SUNOS5 style signal handlers. */
1237 # if CPP_WORDSZ != 32 && CPP_WORDSZ != 64
1242 # undef DYNAMIC_LOADING
1247 # undef MPROTECT_VDB
1252 /* Postponed for now. */
1254 # undef MPROTECT_VDB
1257 # ifdef SMALL_CONFIG
1258 /* Presumably not worth the space it takes. */
1260 # undef MPROTECT_VDB
1264 # undef MPROTECT_VDB /* Can't deal with address space holes. */
1267 # if !defined(PCR_VDB) && !defined(PROC_VDB) && !defined(MPROTECT_VDB)
1268 # define DEFAULT_VDB
1272 # define PREFETCH(x)
1273 # define NO_PREFETCH
1276 # ifndef PREFETCH_FOR_WRITE
1277 # define PREFETCH_FOR_WRITE(x)
1278 # define NO_PREFETCH_FOR_WRITE
1281 # ifndef CACHE_LINE_SIZE
1282 # define CACHE_LINE_SIZE 32 /* Wild guess */
1285 # ifndef CLEAR_DOUBLE
1286 # define CLEAR_DOUBLE(x) \
1287 ((word*)x)[0] = 0; \
1289 # endif /* CLEAR_DOUBLE */
1291 # if defined(_SOLARIS_PTHREADS) && !defined(SOLARIS_THREADS)
1292 # define SOLARIS_THREADS
1294 # if defined(IRIX_THREADS) && !defined(IRIX5)
1295 --> inconsistent configuration
1297 # if defined(IRIX_JDK_THREADS) && !defined(IRIX5)
1298 --> inconsistent configuration
1300 # if defined(LINUX_THREADS) && !defined(LINUX)
1301 --> inconsistent configuration
1303 # if defined(SOLARIS_THREADS) && !defined(SUNOS5)
1304 --> inconsistent configuration
1306 # if defined(HPUX_THREADS) && !defined(HPUX)
1307 --> inconsistent configuration
1309 # if defined(PCR) || defined(SRC_M3) || \
1310 defined(SOLARIS_THREADS) || defined(WIN32_THREADS) || \
1311 defined(IRIX_THREADS) || defined(LINUX_THREADS) || \
1312 defined(IRIX_JDK_THREADS) || defined(HPUX_THREADS)
1316 # if defined(HP_PA) || defined(M88K) || defined(POWERPC) \
1317 || (defined(I386) && defined(OS2)) || defined(UTS4) || defined(LINT)
1318 /* Use setjmp based hack to mark from callee-save registers. */
1319 # define USE_GENERIC_PUSH_REGS
1321 # if defined(SPARC) && !defined(LINUX)
1322 # define SAVE_CALL_CHAIN
1323 # define ASM_CLEAR_CODE /* Stack clearing is crucial, and we */
1324 /* include assembly code to do it well. */
1327 # endif /* GCCONFIG_H */