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