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