gcc/config/darwin.h

   1 /* Target definitions for Darwin (Mac OS X) systems.
   2    Copyright (C) 1989, 1990, 1991, 1992, 1993, 2000, 2001, 2002, 2003, 2004,
   3    2005
   4    Free Software Foundation, Inc.
   5    Contributed by Apple Computer Inc.
   6
   7 This file is part of GCC.
   8
   9 GCC is free software; you can redistribute it and/or modify
  10 it under the terms of the GNU General Public License as published by
  11 the Free Software Foundation; either version 2, or (at your option)
  12 any later version.
  13
  14 GCC is distributed in the hope that it will be useful,
  15 but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 GNU General Public License for more details.
  18
  19 You should have received a copy of the GNU General Public License
  20 along with GCC; see the file COPYING.  If not, write to
  21 the Free Software Foundation, 51 Franklin Street, Fifth Floor,
  22 Boston, MA 02110-1301, USA.  */
  23
  24 #ifndef CONFIG_DARWIN_H
  25 #define CONFIG_DARWIN_H
  26
  27 /* The definitions in this file are common to all processor types
  28    running Darwin, which is the kernel for Mac OS X.  Darwin is
  29    basically a BSD user layer laid over a Mach kernel, then evolved
  30    for many years (at NeXT) in parallel with other Unix systems.  So
  31    while the runtime is a somewhat idiosyncratic Mach-based thing,
  32    other definitions look like they would for a BSD variant.  */
  33
  34 /* Although NeXT ran on many different architectures, as of Jan 2001
  35    the only supported Darwin targets are PowerPC and x86.  */
  36
  37 /* One of Darwin's NeXT legacies is the Mach-O format, which is partly
  38    like a.out and partly like COFF, with additional features like
  39    multi-architecture binary support.  */
  40
  41 #define OBJECT_FORMAT_MACHO
  42
  43 /* Suppress g++ attempt to link in the math library automatically. */
  44 #define MATH_LIBRARY ""
  45
  46 /* We have atexit.  */
  47
  48 #define HAVE_ATEXIT
  49
  50 /* Define an empty body for the function do_global_dtors() in libgcc2.c.  */
  51
  52 #define DO_GLOBAL_DTORS_BODY
  53
  54 /* The string value for __SIZE_TYPE__.  */
  55
  56 #ifndef SIZE_TYPE
  57 #define SIZE_TYPE "long unsigned int"
  58 #endif
  59
  60 /* Type used for ptrdiff_t, as a string used in a declaration.  */
  61
  62 #undef  PTRDIFF_TYPE
  63 #define PTRDIFF_TYPE "int"
  64
  65 /* wchar_t is int.  */
  66
  67 #undef  WCHAR_TYPE
  68 #define WCHAR_TYPE "int"
  69 #undef  WCHAR_TYPE_SIZE
  70 #define WCHAR_TYPE_SIZE 32
  71
  72 /* Default to using the NeXT-style runtime, since that's what is
  73    pre-installed on Darwin systems.  */
  74
  75 #define NEXT_OBJC_RUNTIME
  76
  77 /* Don't default to pcc-struct-return, because gcc is the only compiler, and
  78    we want to retain compatibility with older gcc versions.  */
  79
  80 #undef  DEFAULT_PCC_STRUCT_RETURN
  81 #define DEFAULT_PCC_STRUCT_RETURN 0
  82
  83 /* True if pragma ms_struct is in effect.  */
  84 extern GTY(()) int darwin_ms_struct;
  85
  86 /* This table intercepts weirdo options whose names would interfere
  87    with normal driver conventions, and either translates them into
  88    standardly-named options, or adds a 'Z' so that they can get to
  89    specs processing without interference.
  90
  91    Do not expand a linker option to "-Xlinker -<option>", since that
  92    forfeits the ability to control via spec strings later.  However,
  93    as a special exception, do this translation with -filelist, because
  94    otherwise the driver will think there are no input files and quit.
  95    (The alternative would be to hack the driver to recognize -filelist
  96    specially, but it's simpler to use the translation table.)
  97
  98    Note that an option name with a prefix that matches another option
  99    name, that also takes an argument, needs to be modified so the
 100    prefix is different, otherwise a '*' after the shorter option will
 101    match with the longer one.
 102
 103    The SUBTARGET_OPTION_TRANSLATE_TABLE macro, which _must_ be defined
 104    in gcc/config/{i386,rs6000}/darwin.h, should contain any additional
 105    command-line option translations specific to the particular target
 106    architecture.  */
 107
 108 #define TARGET_OPTION_TRANSLATE_TABLE \
 109   { "-all_load", "-Zall_load" },  \
 110   { "-allowable_client", "-Zallowable_client" },  \
 111   { "-arch_errors_fatal", "-Zarch_errors_fatal" },  \
 112   { "-bind_at_load", "-Zbind_at_load" },  \
 113   { "-bundle", "-Zbundle" },  \
 114   { "-bundle_loader", "-Zbundle_loader" },  \
 115   { "-weak_reference_mismatches", "-Zweak_reference_mismatches" },  \
 116   { "-dead_strip", "-Zdead_strip" }, \
 117   { "-no_dead_strip_inits_and_terms", "-Zno_dead_strip_inits_and_terms" }, \
 118   { "-dependency-file", "-MF" }, \
 119   { "-dylib_file", "-Zdylib_file" }, \
 120   { "-dynamic", "-Zdynamic" },  \
 121   { "-dynamiclib", "-Zdynamiclib" },  \
 122   { "-exported_symbols_list", "-Zexported_symbols_list" },  \
 123   { "-gfull", "-g -fno-eliminate-unused-debug-symbols" }, \
 124   { "-gused", "-g -feliminate-unused-debug-symbols" }, \
 125   { "-segaddr", "-Zsegaddr" }, \
 126   { "-segs_read_only_addr", "-Zsegs_read_only_addr" }, \
 127   { "-segs_read_write_addr", "-Zsegs_read_write_addr" }, \
 128   { "-seg_addr_table", "-Zseg_addr_table" }, \
 129   { "-seg_addr_table_filename", "-Zfn_seg_addr_table_filename" }, \
 130   { "-filelist", "-Xlinker -filelist -Xlinker" },  \
 131   { "-framework", "-Xlinker -framework -Xlinker" },  \
 132   { "-flat_namespace", "-Zflat_namespace" },  \
 133   { "-force_cpusubtype_ALL", "-Zforce_cpusubtype_ALL" },  \
 134   { "-force_flat_namespace", "-Zforce_flat_namespace" },  \
 135   { "-image_base", "-Zimage_base" },  \
 136   { "-init", "-Zinit" },  \
 137   { "-install_name", "-Zinstall_name" },  \
 138   { "-multiply_defined_unused", "-Zmultiplydefinedunused" },  \
 139   { "-multiply_defined", "-Zmultiply_defined" },  \
 140   { "-multi_module", "-Zmulti_module" },  \
 141   { "-static", "-static -Wa,-static" },  \
 142   { "-single_module", "-Zsingle_module" },  \
 143   { "-unexported_symbols_list", "-Zunexported_symbols_list" }, \
 144   SUBTARGET_OPTION_TRANSLATE_TABLE
 145
 146 /* These compiler options take n arguments.  */
 147
 148 #undef  WORD_SWITCH_TAKES_ARG
 149 #define WORD_SWITCH_TAKES_ARG(STR)              \
 150   (DEFAULT_WORD_SWITCH_TAKES_ARG (STR) ? 1 :    \
 151    !strcmp (STR, "Zallowable_client") ? 1 :     \
 152    !strcmp (STR, "arch") ? 1 :                  \
 153    !strcmp (STR, "arch_only") ? 1 :             \
 154    !strcmp (STR, "Zbundle_loader") ? 1 :        \
 155    !strcmp (STR, "client_name") ? 1 :           \
 156    !strcmp (STR, "compatibility_version") ? 1 : \
 157    !strcmp (STR, "current_version") ? 1 :       \
 158    !strcmp (STR, "Zdylib_file") ? 1 :           \
 159    !strcmp (STR, "Zexported_symbols_list") ? 1 : \
 160    !strcmp (STR, "Zimage_base") ? 1 :           \
 161    !strcmp (STR, "Zinit") ? 1 :                 \
 162    !strcmp (STR, "Zinstall_name") ? 1 :         \
 163    !strcmp (STR, "Zmultiplydefinedunused") ? 1 : \
 164    !strcmp (STR, "Zmultiply_defined") ? 1 :     \
 165    !strcmp (STR, "precomp-trustfile") ? 1 :     \
 166    !strcmp (STR, "read_only_relocs") ? 1 :      \
 167    !strcmp (STR, "sectcreate") ? 3 :            \
 168    !strcmp (STR, "sectorder") ? 3 :             \
 169    !strcmp (STR, "Zsegaddr") ? 2 :              \
 170    !strcmp (STR, "Zsegs_read_only_addr") ? 1 :  \
 171    !strcmp (STR, "Zsegs_read_write_addr") ? 1 : \
 172    !strcmp (STR, "Zseg_addr_table") ? 1 :       \
 173    !strcmp (STR, "Zfn_seg_addr_table_filename") ? 1 :\
 174    !strcmp (STR, "seg1addr") ? 1 :              \
 175    !strcmp (STR, "segprot") ? 3 :               \
 176    !strcmp (STR, "sub_library") ? 1 :           \
 177    !strcmp (STR, "sub_umbrella") ? 1 :          \
 178    !strcmp (STR, "umbrella") ? 1 :              \
 179    !strcmp (STR, "undefined") ? 1 :             \
 180    !strcmp (STR, "Zunexported_symbols_list") ? 1 : \
 181    !strcmp (STR, "Zweak_reference_mismatches") ? 1 : \
 182    !strcmp (STR, "pagezero_size") ? 1 :         \
 183    !strcmp (STR, "segs_read_only_addr") ? 1 :   \
 184    !strcmp (STR, "segs_read_write_addr") ? 1 :  \
 185    !strcmp (STR, "sectalign") ? 3 :             \
 186    !strcmp (STR, "sectobjectsymbols") ? 2 :     \
 187    !strcmp (STR, "segcreate") ? 3 :             \
 188    !strcmp (STR, "dylinker_install_name") ? 1 : \
 189    0)
 190
 191 /* Machine dependent cpp options.  Don't add more options here, add
 192    them to darwin_cpp_builtins in darwin-c.c.  */
 193
 194 #undef  CPP_SPEC
 195 #define CPP_SPEC "%{static:%{!dynamic:-D__STATIC__}}%{!static:-D__DYNAMIC__}"
 196
 197 /* This is mostly a clone of the standard LINK_COMMAND_SPEC, plus
 198    precomp, libtool, and fat build additions.  Also we
 199    don't specify a second %G after %L because libSystem is
 200    self-contained and doesn't need to link against libgcc.a.  */
 201 /* In general, random Darwin linker flags should go into LINK_SPEC
 202    instead of LINK_COMMAND_SPEC.  The command spec is better for
 203    specifying the handling of options understood by generic Unix
 204    linkers, and for positional arguments like libraries.  */
 205 #define LINK_COMMAND_SPEC "\
 206 %{!fdump=*:%{!fsyntax-only:%{!precomp:%{!c:%{!M:%{!MM:%{!E:%{!S:\
 207     %{!Zdynamiclib:%(linker)}%{Zdynamiclib:/usr/bin/libtool} \
 208     %l %X %{d} %{s} %{t} %{Z} \
 209     %{!Zdynamiclib:%{A} %{e*} %{m} %{N} %{n} %{r} %{u*} %{x} %{z}} \
 210     %{@:-o %f%u.out}%{!@:%{o*}%{!o:-o a.out}} \
 211     %{!A:%{!nostdlib:%{!nostartfiles:%S}}} \
 212     %{L*} %{fopenmp:%:include(libgomp.spec)%(link_gomp)}   \
 213     %(link_libgcc) %o %{fprofile-arcs|fprofile-generate|coverage:-lgcov} \
 214     %{!nostdlib:%{!nodefaultlibs:%(link_ssp) %G %L}} \
 215     %{!A:%{!nostdlib:%{!nostartfiles:%E}}} %{T*} %{F*} }}}}}}}}"
 216
 217 #ifdef TARGET_SYSTEM_ROOT
 218 #define LINK_SYSROOT_SPEC \
 219   "%{isysroot*:-syslibroot %*;:-syslibroot " TARGET_SYSTEM_ROOT "}"
 220 #else
 221 #define LINK_SYSROOT_SPEC "%{isysroot*:-syslibroot %*}"
 222 #endif
 223
 224 /* Please keep the random linker options in alphabetical order (modulo
 225    'Z' and 'no' prefixes).  Options that can only go to one of libtool
 226    or ld must be listed twice, under both !Zdynamiclib and
 227    Zdynamiclib, with one of the cases reporting an error.  */
 228 /* Note that options taking arguments may appear multiple times on a
 229    command line with different arguments each time, so put a * after
 230    their names so all of them get passed.  */
 231 #define LINK_SPEC  \
 232   "%{static}%{!static:-dynamic} \
 233    %{fgnu-runtime:%:replace-outfile(-lobjc -lobjc-gnu)}\
 234    %{!Zdynamiclib: \
 235      %{Zforce_cpusubtype_ALL:-arch %(darwin_arch) -force_cpusubtype_ALL} \
 236      %{!Zforce_cpusubtype_ALL:-arch %(darwin_subarch)} \
 237      %{Zbundle:-bundle} \
 238      %{Zbundle_loader*:-bundle_loader %*} \
 239      %{client_name*} \
 240      %{compatibility_version*:%e-compatibility_version only allowed with -dynamiclib\
 241 } \
 242      %{current_version*:%e-current_version only allowed with -dynamiclib} \
 243      %{Zforce_flat_namespace:-force_flat_namespace} \
 244      %{Zinstall_name*:%e-install_name only allowed with -dynamiclib} \
 245      %{keep_private_externs} \
 246      %{private_bundle} \
 247     } \
 248    %{Zdynamiclib: \
 249      %{Zbundle:%e-bundle not allowed with -dynamiclib} \
 250      %{Zbundle_loader*:%e-bundle_loader not allowed with -dynamiclib} \
 251      %{client_name*:%e-client_name not allowed with -dynamiclib} \
 252      %{compatibility_version*} \
 253      %{current_version*} \
 254      %{Zforce_cpusubtype_ALL:-arch_only %(darwin_arch)} \
 255      %{!Zforce_cpusubtype_ALL: -arch_only %(darwin_subarch)} \
 256      %{Zforce_flat_namespace:%e-force_flat_namespace not allowed with -dynamiclib} \
 257      %{Zinstall_name*:-install_name %*} \
 258      %{keep_private_externs:%e-keep_private_externs not allowed with -dynamiclib} \
 259      %{private_bundle:%e-private_bundle not allowed with -dynamiclib} \
 260     } \
 261    %{Zall_load:-all_load}%{Zdynamiclib:%{!Zall_load:-noall_load}} \
 262    %{Zallowable_client*:-allowable_client %*} \
 263    %{Zbind_at_load:-bind_at_load} \
 264    %{Zarch_errors_fatal:-arch_errors_fatal} \
 265    %{Zdead_strip:-dead_strip} \
 266    %{Zno_dead_strip_inits_and_terms:-no_dead_strip_inits_and_terms} \
 267    %{Zdylib_file*:-dylib_file %*} \
 268    %{Zdynamic:-dynamic}\
 269    %{Zexported_symbols_list*:-exported_symbols_list %*} \
 270    %{Zflat_namespace:-flat_namespace} \
 271    %{headerpad_max_install_names*} \
 272    %{Zimage_base*:-image_base %*} \
 273    %{Zinit*:-init %*} \
 274    %{mmacosx-version-min=*:-macosx_version_min %*} \
 275    %{!mmacosx-version-min=*:%{shared-libgcc:-macosx_version_min 10.3}} \
 276    %{nomultidefs} \
 277    %{Zmulti_module:-multi_module} %{Zsingle_module:-single_module} \
 278    %{Zmultiply_defined*:-multiply_defined %*} \
 279    %{!Zmultiply_defined*:%{shared-libgcc: \
 280      %:version-compare(< 10.5 mmacosx-version-min= -multiply_defined) \
 281      %:version-compare(< 10.5 mmacosx-version-min= suppress)}} \
 282    %{Zmultiplydefinedunused*:-multiply_defined_unused %*} \
 283    %{prebind} %{noprebind} %{nofixprebinding} %{prebind_all_twolevel_modules} \
 284    %{read_only_relocs} \
 285    %{sectcreate*} %{sectorder*} %{seg1addr*} %{segprot*} \
 286    %{Zsegaddr*:-segaddr %*} \
 287    %{Zsegs_read_only_addr*:-segs_read_only_addr %*} \
 288    %{Zsegs_read_write_addr*:-segs_read_write_addr %*} \
 289    %{Zseg_addr_table*: -seg_addr_table %*} \
 290    %{Zfn_seg_addr_table_filename*:-seg_addr_table_filename %*} \
 291    %{sub_library*} %{sub_umbrella*} \
 292    " LINK_SYSROOT_SPEC " \
 293    %{twolevel_namespace} %{twolevel_namespace_hints} \
 294    %{umbrella*} \
 295    %{undefined*} \
 296    %{Zunexported_symbols_list*:-unexported_symbols_list %*} \
 297    %{Zweak_reference_mismatches*:-weak_reference_mismatches %*} \
 298    %{!Zweak_reference_mismatches*:-weak_reference_mismatches non-weak} \
 299    %{X} \
 300    %{y*} \
 301    %{w} \
 302    %{pagezero_size*} %{segs_read_*} %{seglinkedit} %{noseglinkedit}  \
 303    %{sectalign*} %{sectobjectsymbols*} %{segcreate*} %{whyload} \
 304    %{whatsloaded} %{dylinker_install_name*} \
 305    %{dylinker} %{Mach} "
 306
 307
 308 /* Machine dependent libraries.  */
 309
 310 #define LIB_SPEC "%{!static:-lSystem}"
 311
 312 /* Support -mmacosx-version-min by supplying different (stub) libgcc_s.dylib
 313    libraries to link against, and by not linking against libgcc_s on
 314    earlier-than-10.3.9.
 315
 316    Note that by default, -lgcc_eh is not linked against!  This is
 317    because in a future version of Darwin the EH frame information may
 318    be in a new format, or the fallback routine might be changed; if
 319    you want to explicitly link against the static version of those
 320    routines, because you know you don't need to unwind through system
 321    libraries, you need to explicitly say -static-libgcc.
 322
 323    If it is linked against, it has to be before -lgcc, because it may
 324    need symbols from -lgcc.  */
 325 #undef REAL_LIBGCC_SPEC
 326 #define REAL_LIBGCC_SPEC                                                   \
 327    "%{static-libgcc|static: -lgcc_eh -lgcc;                                \
 328       shared-libgcc|fexceptions:                                           \
 329        %:version-compare(!> 10.5 mmacosx-version-min= -lgcc_s.10.4)        \
 330        %:version-compare(>= 10.5 mmacosx-version-min= -lgcc_s.10.5)        \
 331        -lgcc;                                                              \
 332       :%:version-compare(>< 10.3.9 10.5 mmacosx-version-min= -lgcc_s.10.4) \
 333        %:version-compare(>= 10.5 mmacosx-version-min= -lgcc_s.10.5)        \
 334        -lgcc}"
 335
 336 /* We specify crt0.o as -lcrt0.o so that ld will search the library path.
 337
 338    crt3.o provides __cxa_atexit on systems that don't have it.  Since
 339    it's only used with C++, which requires passing -shared-libgcc, key
 340    off that to avoid unnecessarily adding a destructor to every
 341    powerpc program built.  */
 342
 343 #undef  STARTFILE_SPEC
 344 #define STARTFILE_SPEC                                                      \
 345   "%{!Zdynamiclib:%{Zbundle:%{!static:-lbundle1.o}}                         \
 346      %{!Zbundle:%{pg:%{static:-lgcrt0.o}                                    \
 347                      %{!static:%{object:-lgcrt0.o}                          \
 348                                %{!object:%{preload:-lgcrt0.o}               \
 349                                  %{!preload:-lgcrt1.o %(darwin_crt2)}}}}    \
 350                 %{!pg:%{static:-lcrt0.o}                                    \
 351                       %{!static:%{object:-lcrt0.o}                          \
 352                                 %{!object:%{preload:-lcrt0.o}               \
 353                                   %{!preload:-lcrt1.o %(darwin_crt2)}}}}}}  \
 354   %{shared-libgcc:%:version-compare(< 10.5 mmacosx-version-min= crt3.o%s)}"
 355
 356 /* The native Darwin linker doesn't necessarily place files in the order
 357    that they're specified on the link line.  Thus, it is pointless
 358    to put anything in ENDFILE_SPEC.  */
 359 /* #define ENDFILE_SPEC "" */
 360
 361 /* Default Darwin ASM_SPEC, very simple.  */
 362 #define ASM_SPEC "-arch %(darwin_arch) \
 363   %{Zforce_cpusubtype_ALL:-force_cpusubtype_ALL}"
 364
 365 /* We use Dbx symbol format.  */
 366
 367 #define DBX_DEBUGGING_INFO 1
 368
 369 /* Also enable Dwarf 2 as an option.  */
 370 #define DWARF2_DEBUGGING_INFO
 371 #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
 372
 373 #define DEBUG_FRAME_SECTION     "__DWARF,__debug_frame,regular,debug"
 374 #define DEBUG_INFO_SECTION      "__DWARF,__debug_info,regular,debug"
 375 #define DEBUG_ABBREV_SECTION    "__DWARF,__debug_abbrev,regular,debug"
 376 #define DEBUG_ARANGES_SECTION   "__DWARF,__debug_aranges,regular,debug"
 377 #define DEBUG_MACINFO_SECTION   "__DWARF,__debug_macinfo,regular,debug"
 378 #define DEBUG_LINE_SECTION      "__DWARF,__debug_line,regular,debug"
 379 #define DEBUG_LOC_SECTION       "__DWARF,__debug_loc,regular,debug"
 380 #define DEBUG_PUBNAMES_SECTION  "__DWARF,__debug_pubnames,regular,debug"
 381 #define DEBUG_STR_SECTION       "__DWARF,__debug_str,regular,debug"
 382 #define DEBUG_RANGES_SECTION    "__DWARF,__debug_ranges,regular,debug"
 383
 384 /* When generating stabs debugging, use N_BINCL entries.  */
 385
 386 #define DBX_USE_BINCL
 387
 388 /* There is no limit to the length of stabs strings.  */
 389
 390 #define DBX_CONTIN_LENGTH 0
 391
 392 /* gdb needs a null N_SO at the end of each file for scattered loading.  */
 393
 394 #define DBX_OUTPUT_NULL_N_SO_AT_MAIN_SOURCE_FILE_END
 395
 396 /* GCC's definition of 'one_only' is the same as its definition of 'weak'.  */
 397 #define MAKE_DECL_ONE_ONLY(DECL) (DECL_WEAK (DECL) = 1)
 398
 399 /* Mach-O supports 'weak imports', and 'weak definitions' in coalesced
 400    sections.  machopic_select_section ensures that weak variables go in
 401    coalesced sections.  Weak aliases (or any other kind of aliases) are
 402    not supported.  Weak symbols that aren't visible outside the .s file
 403    are not supported.  */
 404 #define ASM_WEAKEN_DECL(FILE, DECL, NAME, ALIAS)                        \
 405   do {                                                                  \
 406     if (ALIAS)                                                          \
 407       {                                                                 \
 408         warning (0, "alias definitions not supported in Mach-O; ignored");      \
 409         break;                                                          \
 410       }                                                                 \
 411                                                                         \
 412     if (! DECL_EXTERNAL (DECL) && TREE_PUBLIC (DECL))                   \
 413       targetm.asm_out.globalize_label (FILE, NAME);                     \
 414     if (DECL_EXTERNAL (DECL))                                           \
 415       fputs ("\t.weak_reference ", FILE);                               \
 416     else if (! lookup_attribute ("weak", DECL_ATTRIBUTES (DECL))        \
 417         && lookup_attribute ("weak_import", DECL_ATTRIBUTES (DECL)))    \
 418       break;                                                            \
 419     else if (TREE_PUBLIC (DECL))                                        \
 420       fputs ("\t.weak_definition ", FILE);                              \
 421     else                                                                \
 422       break;                                                            \
 423     assemble_name (FILE, NAME);                                         \
 424     fputc ('\n', FILE);                                                 \
 425   } while (0)
 426
 427 /* Darwin has the pthread routines in libSystem, which every program
 428    links to, so there's no need for weak-ness for that.  */
 429 #define GTHREAD_USE_WEAK 0
 430
 431 /* The Darwin linker imposes two limitations on common symbols: they
 432    can't have hidden visibility, and they can't appear in dylibs.  As
 433    a consequence, we should never use common symbols to represent
 434    vague linkage. */
 435 #undef USE_COMMON_FOR_ONE_ONLY
 436 #define USE_COMMON_FOR_ONE_ONLY 0
 437
 438 /* The Darwin linker doesn't want coalesced symbols to appear in
 439    a static archive's table of contents. */
 440 #undef TARGET_WEAK_NOT_IN_ARCHIVE_TOC
 441 #define TARGET_WEAK_NOT_IN_ARCHIVE_TOC 1
 442
 443 /* On Darwin, we don't (at the time of writing) have linkonce sections
 444    with names, so it's safe to make the class data not comdat.  */
 445 #define TARGET_CXX_CLASS_DATA_ALWAYS_COMDAT hook_bool_void_false
 446
 447 /* We make exception information linkonce. */
 448 #undef TARGET_USES_WEAK_UNWIND_INFO
 449 #define TARGET_USES_WEAK_UNWIND_INFO 1
 450
 451 /* We need to use a nonlocal label for the start of an EH frame: the
 452    Darwin linker requires that a coalesced section start with a label.
 453    Unfortunately, it also requires that 'debug' sections don't contain
 454    labels.  */
 455 #undef FRAME_BEGIN_LABEL
 456 #define FRAME_BEGIN_LABEL (for_eh ? "EH_frame" : "Lframe")
 457
 458 /* Emit a label for the FDE corresponding to DECL.  EMPTY means
 459    emit a label for an empty FDE. */
 460 #define TARGET_ASM_EMIT_UNWIND_LABEL darwin_emit_unwind_label
 461
 462 /* Emit a label to separate the exception table.  */
 463 #define TARGET_ASM_EMIT_EXCEPT_TABLE_LABEL darwin_emit_except_table_label
 464
 465 /* Our profiling scheme doesn't LP labels and counter words.  */
 466
 467 #define NO_PROFILE_COUNTERS     1
 468
 469 #undef  INIT_SECTION_ASM_OP
 470 #define INIT_SECTION_ASM_OP
 471
 472 #undef  INVOKE__main
 473
 474 #define TARGET_ASM_CONSTRUCTOR  machopic_asm_out_constructor
 475 #define TARGET_ASM_DESTRUCTOR   machopic_asm_out_destructor
 476
 477 /* Always prefix with an underscore.  */
 478
 479 #define USER_LABEL_PREFIX "_"
 480
 481 /* Don't output a .file directive.  That is only used by the assembler for
 482    error reporting.  */
 483 #undef  TARGET_ASM_FILE_START_FILE_DIRECTIVE
 484 #define TARGET_ASM_FILE_START_FILE_DIRECTIVE false
 485
 486 #undef  TARGET_ASM_FILE_END
 487 #define TARGET_ASM_FILE_END darwin_file_end
 488
 489 #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
 490   fprintf (FILE, "\t.space "HOST_WIDE_INT_PRINT_UNSIGNED"\n", SIZE)
 491
 492 /* Give ObjC methods pretty symbol names.  */
 493
 494 #undef  OBJC_GEN_METHOD_LABEL
 495 #define OBJC_GEN_METHOD_LABEL(BUF,IS_INST,CLASS_NAME,CAT_NAME,SEL_NAME,NUM) \
 496   do { if (CAT_NAME)                                                    \
 497          sprintf (BUF, "%c[%s(%s) %s]", (IS_INST) ? '-' : '+',          \
 498                   (CLASS_NAME), (CAT_NAME), (SEL_NAME));                \
 499        else                                                             \
 500          sprintf (BUF, "%c[%s %s]", (IS_INST) ? '-' : '+',              \
 501                   (CLASS_NAME), (SEL_NAME));                            \
 502      } while (0)
 503
 504 /* The RTTI data (e.g., __ti4name) is common and public (and static),
 505    but it does need to be referenced via indirect PIC data pointers.
 506    The machopic_define_symbol calls are telling the machopic subsystem
 507    that the name *is* defined in this module, so it doesn't need to
 508    make them indirect.  */
 509
 510 #undef ASM_DECLARE_OBJECT_NAME
 511 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
 512   do {                                                                  \
 513     const char *xname = NAME;                                           \
 514     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
 515       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
 516     if (! DECL_WEAK (DECL)                                              \
 517         && ((TREE_STATIC (DECL)                                         \
 518              && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))           \
 519             || DECL_INITIAL (DECL)))                                    \
 520         machopic_define_symbol (DECL_RTL (DECL));                       \
 521     if ((TREE_STATIC (DECL)                                             \
 522          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
 523         || DECL_INITIAL (DECL))                                         \
 524       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
 525     ASM_OUTPUT_LABEL (FILE, xname);                                     \
 526     /* Darwin doesn't support zero-size objects, so give them a         \
 527        byte.  */                                                        \
 528     if (tree_low_cst (DECL_SIZE_UNIT (DECL), 1) == 0)                   \
 529       assemble_zeros (1);                                               \
 530   } while (0)
 531
 532 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
 533   do {                                                                  \
 534     const char *xname = NAME;                                           \
 535     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
 536       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
 537     if (! DECL_WEAK (DECL)                                              \
 538         && ((TREE_STATIC (DECL)                                         \
 539              && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))           \
 540             || DECL_INITIAL (DECL)))                                    \
 541         machopic_define_symbol (DECL_RTL (DECL));                       \
 542     if ((TREE_STATIC (DECL)                                             \
 543          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
 544         || DECL_INITIAL (DECL))                                         \
 545       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
 546     ASM_OUTPUT_LABEL (FILE, xname);                                     \
 547   } while (0)
 548
 549 #define ASM_DECLARE_CONSTANT_NAME(FILE, NAME, EXP, SIZE)        \
 550   do {                                                          \
 551     ASM_OUTPUT_LABEL (FILE, NAME);                              \
 552     /* Darwin doesn't support zero-size objects, so give them a \
 553        byte.  */                                                \
 554     if ((SIZE) == 0)                                            \
 555       assemble_zeros (1);                                       \
 556   } while (0)
 557
 558 /* Wrap new method names in quotes so the assembler doesn't gag.
 559    Make Objective-C internal symbols local.  */
 560
 561 #undef  ASM_OUTPUT_LABELREF
 562 #define ASM_OUTPUT_LABELREF(FILE,NAME)                                       \
 563   do {                                                                       \
 564        const char *xname = (NAME);                                           \
 565        if (! strcmp (xname, "<pic base>"))                                   \
 566          machopic_output_function_base_name(FILE);                           \
 567        else if (xname[0] == '&' || xname[0] == '*')                          \
 568          {                                                                   \
 569            int len = strlen (xname);                                         \
 570            if (len > 6 && !strcmp ("$stub", xname + len - 5))                \
 571              machopic_validate_stub_or_non_lazy_ptr (xname);                 \
 572            else if (len > 7 && !strcmp ("$stub\"", xname + len - 6))         \
 573              machopic_validate_stub_or_non_lazy_ptr (xname);                 \
 574            else if (len > 14 && !strcmp ("$non_lazy_ptr", xname + len - 13)) \
 575              machopic_validate_stub_or_non_lazy_ptr (xname);                 \
 576            else if (len > 15 && !strcmp ("$non_lazy_ptr\"", xname + len - 14)) \
 577              machopic_validate_stub_or_non_lazy_ptr (xname);                 \
 578            if (xname[1] != '"' && name_needs_quotes (&xname[1]))             \
 579              fprintf (FILE, "\"%s\"", &xname[1]);                            \
 580            else                                                              \
 581              fputs (&xname[1], FILE);                                        \
 582          }                                                                   \
 583        else if (xname[0] == '+' || xname[0] == '-')                          \
 584          fprintf (FILE, "\"%s\"", xname);                                    \
 585        else if (!strncmp (xname, "_OBJC_", 6))                               \
 586          fprintf (FILE, "L%s", xname);                                       \
 587        else if (!strncmp (xname, ".objc_class_name_", 17))                   \
 588          fprintf (FILE, "%s", xname);                                        \
 589        else if (xname[0] != '"' && name_needs_quotes (xname))                \
 590          fprintf (FILE, "\"%s\"", xname);                                    \
 591        else                                                                  \
 592          asm_fprintf (FILE, "%U%s", xname);                                  \
 593   } while (0)
 594
 595 /* Output before executable code.  */
 596 #undef TEXT_SECTION_ASM_OP
 597 #define TEXT_SECTION_ASM_OP "\t.text"
 598
 599 /* Output before writable data.  */
 600
 601 #undef DATA_SECTION_ASM_OP
 602 #define DATA_SECTION_ASM_OP "\t.data"
 603
 604 #undef  ALIGN_ASM_OP
 605 #define ALIGN_ASM_OP            ".align"
 606
 607 #undef  ASM_OUTPUT_ALIGN
 608 #define ASM_OUTPUT_ALIGN(FILE,LOG)      \
 609   if ((LOG) != 0)                       \
 610     fprintf (FILE, "\t%s %d\n", ALIGN_ASM_OP, (LOG))
 611
 612 /* Ensure correct alignment of bss data.  */
 613
 614 #undef  ASM_OUTPUT_ALIGNED_DECL_LOCAL
 615 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN)    \
 616   do {                                                                  \
 617     unsigned HOST_WIDE_INT _new_size = SIZE;                            \
 618     fputs (".lcomm ", (FILE));                                          \
 619     assemble_name ((FILE), (NAME));                                     \
 620     if (_new_size == 0) _new_size = 1;                                  \
 621     fprintf ((FILE), ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n", _new_size, \
 622              floor_log2 ((ALIGN) / BITS_PER_UNIT));                     \
 623     if ((DECL) && ((TREE_STATIC (DECL)                                  \
 624          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
 625         || DECL_INITIAL (DECL)))                                        \
 626       {                                                                 \
 627         (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false); \
 628         machopic_define_symbol (DECL_RTL (DECL));                       \
 629       }                                                                 \
 630   } while (0)
 631
 632 /* The maximum alignment which the object file format can support.
 633    For Mach-O, this is 2^15.  */
 634
 635 #undef  MAX_OFILE_ALIGNMENT
 636 #define MAX_OFILE_ALIGNMENT 0x8000
 637
 638 /* Declare the section variables.  */
 639 #ifndef USED_FOR_TARGET
 640 enum darwin_section_enum {
 641 #define DEF_SECTION(NAME, FLAGS, DIRECTIVE, OBJC) NAME,
 642 #include "darwin-sections.def"
 643 #undef DEF_SECTION
 644   NUM_DARWIN_SECTIONS
 645 };
 646 extern GTY(()) section * darwin_sections[NUM_DARWIN_SECTIONS];
 647 #endif
 648
 649 #undef  TARGET_ASM_SELECT_SECTION
 650 #define TARGET_ASM_SELECT_SECTION machopic_select_section
 651 #define USE_SELECT_SECTION_FOR_FUNCTIONS
 652
 653 #undef  TARGET_ASM_SELECT_RTX_SECTION
 654 #define TARGET_ASM_SELECT_RTX_SECTION machopic_select_rtx_section
 655 #undef  TARGET_ASM_UNIQUE_SECTION
 656 #define TARGET_ASM_UNIQUE_SECTION darwin_unique_section
 657 #undef  TARGET_ASM_FUNCTION_RODATA_SECTION
 658 #define TARGET_ASM_FUNCTION_RODATA_SECTION default_no_function_rodata_section
 659
 660
 661 #define ASM_DECLARE_UNRESOLVED_REFERENCE(FILE,NAME)                     \
 662     do {                                                                \
 663          if (FILE) {                                                    \
 664            if (MACHOPIC_INDIRECT)                                       \
 665              fprintf (FILE, "\t.lazy_reference ");                      \
 666            else                                                         \
 667              fprintf (FILE, "\t.reference ");                           \
 668            assemble_name (FILE, NAME);                                  \
 669            fprintf (FILE, "\n");                                        \
 670          }                                                              \
 671        } while (0)
 672
 673 #define ASM_DECLARE_CLASS_REFERENCE(FILE,NAME)                          \
 674     do {                                                                \
 675          if (FILE) {                                                    \
 676            fprintf (FILE, "\t");                                        \
 677            assemble_name (FILE, NAME);                                  \
 678            fprintf (FILE, "=0\n");                                      \
 679            (*targetm.asm_out.globalize_label) (FILE, NAME);             \
 680          }                                                              \
 681        } while (0)
 682
 683 /* Globalizing directive for a label.  */
 684 #define GLOBAL_ASM_OP ".globl "
 685 #define TARGET_ASM_GLOBALIZE_LABEL darwin_globalize_label
 686
 687 /* Emit an assembler directive to set visibility for a symbol.  Used
 688    to support visibility attribute and Darwin's private extern
 689    feature.  */
 690 #undef TARGET_ASM_ASSEMBLE_VISIBILITY
 691 #define TARGET_ASM_ASSEMBLE_VISIBILITY darwin_assemble_visibility
 692
 693 /* Extra attributes for Darwin.  */
 694 #define SUBTARGET_ATTRIBUTE_TABLE                                            \
 695   /* { name, min_len, max_len, decl_req, type_req, fn_type_req, handler } */ \
 696   { "weak_import", 0, 0, true, false, false,                                 \
 697     darwin_handle_weak_import_attribute }
 698
 699 #undef ASM_GENERATE_INTERNAL_LABEL
 700 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)   \
 701   sprintf (LABEL, "*%s%ld", PREFIX, (long)(NUM))
 702
 703 #undef TARGET_ASM_MARK_DECL_PRESERVED
 704 #define TARGET_ASM_MARK_DECL_PRESERVED darwin_mark_decl_preserved
 705
 706 /* Set on a symbol with SYMBOL_FLAG_FUNCTION or
 707    MACHO_SYMBOL_FLAG_VARIABLE to indicate that the function or
 708    variable has been defined in this translation unit.
 709    When porting Mach-O to new architectures you need to make
 710    sure these aren't clobbered by the backend.  */
 711
 712 #define MACHO_SYMBOL_FLAG_VARIABLE (SYMBOL_FLAG_MACH_DEP)
 713 #define MACHO_SYMBOL_FLAG_DEFINED ((SYMBOL_FLAG_MACH_DEP) << 1)
 714
 715 /* Set on a symbol to indicate when fix-and-continue style code
 716    generation is being used and the symbol refers to a static symbol
 717    that should be rebound from new instances of a translation unit to
 718    the original instance of the data.  */
 719
 720 #define MACHO_SYMBOL_STATIC ((SYMBOL_FLAG_MACH_DEP) << 2)
 721
 722 /* Symbolic names for various things we might know about a symbol.  */
 723
 724 enum machopic_addr_class {
 725   MACHOPIC_UNDEFINED,
 726   MACHOPIC_DEFINED_DATA,
 727   MACHOPIC_UNDEFINED_DATA,
 728   MACHOPIC_DEFINED_FUNCTION,
 729   MACHOPIC_UNDEFINED_FUNCTION
 730 };
 731
 732 /* Macros defining the various PIC cases.  */
 733
 734 #define MACHO_DYNAMIC_NO_PIC_P  (TARGET_DYNAMIC_NO_PIC)
 735 #define MACHOPIC_INDIRECT       (flag_pic || MACHO_DYNAMIC_NO_PIC_P)
 736 #define MACHOPIC_JUST_INDIRECT  (MACHO_DYNAMIC_NO_PIC_P)
 737 #define MACHOPIC_PURE           (flag_pic && ! MACHO_DYNAMIC_NO_PIC_P)
 738
 739 #undef TARGET_ENCODE_SECTION_INFO
 740 #define TARGET_ENCODE_SECTION_INFO  darwin_encode_section_info
 741 #undef TARGET_STRIP_NAME_ENCODING
 742 #define TARGET_STRIP_NAME_ENCODING  default_strip_name_encoding
 743
 744 #define GEN_BINDER_NAME_FOR_STUB(BUF,STUB,STUB_LENGTH)          \
 745   do {                                                          \
 746     const char *const stub_ = (STUB);                           \
 747     char *buffer_ = (BUF);                                      \
 748     strcpy (buffer_, stub_);                                    \
 749     if (stub_[0] == '"')                                        \
 750       {                                                         \
 751         strcpy (buffer_ + (STUB_LENGTH) - 1, "_binder\"");      \
 752       }                                                         \
 753     else                                                        \
 754       {                                                         \
 755         strcpy (buffer_ + (STUB_LENGTH), "_binder");            \
 756       }                                                         \
 757   } while (0)
 758
 759 #define GEN_SYMBOL_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)    \
 760   do {                                                          \
 761     const char *const symbol_ = (SYMBOL);                       \
 762     char *buffer_ = (BUF);                                      \
 763     if (name_needs_quotes (symbol_) && symbol_[0] != '"')       \
 764       {                                                         \
 765           sprintf (buffer_, "\"%s\"", symbol_);                 \
 766       }                                                         \
 767     else                                                        \
 768       {                                                         \
 769         strcpy (buffer_, symbol_);                              \
 770       }                                                         \
 771   } while (0)
 772
 773 /* Given a symbol name string, create the lazy pointer version
 774    of the symbol name.  */
 775
 776 #define GEN_LAZY_PTR_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)  \
 777   do {                                                          \
 778     const char *symbol_ = (SYMBOL);                             \
 779     char *buffer_ = (BUF);                                      \
 780     if (symbol_[0] == '"')                                      \
 781       {                                                         \
 782         strcpy (buffer_, "\"L");                                \
 783         strcpy (buffer_ + 2, symbol_ + 1);                      \
 784         strcpy (buffer_ + (SYMBOL_LENGTH), "$lazy_ptr\"");      \
 785       }                                                         \
 786     else if (name_needs_quotes (symbol_))                       \
 787       {                                                         \
 788         strcpy (buffer_, "\"L");                                \
 789         strcpy (buffer_ + 2, symbol_);                          \
 790         strcpy (buffer_ + (SYMBOL_LENGTH) + 2, "$lazy_ptr\"");  \
 791       }                                                         \
 792     else                                                        \
 793       {                                                         \
 794         strcpy (buffer_, "L");                                  \
 795         strcpy (buffer_ + 1, symbol_);                          \
 796         strcpy (buffer_ + (SYMBOL_LENGTH) + 1, "$lazy_ptr");    \
 797       }                                                         \
 798   } while (0)
 799
 800 #define EH_FRAME_SECTION_NAME   "__TEXT"
 801 #define EH_FRAME_SECTION_ATTR ",coalesced,no_toc+strip_static_syms+live_support"
 802
 803 /* Java runtime class list.  */
 804 #define JCR_SECTION_NAME "__DATA,jcr,regular,no_dead_strip"
 805
 806 #undef ASM_PREFERRED_EH_DATA_FORMAT
 807 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL)  \
 808   (((CODE) == 2 && (GLOBAL) == 1) \
 809    ? (DW_EH_PE_pcrel | DW_EH_PE_indirect | DW_EH_PE_sdata4) : \
 810      ((CODE) == 1 || (GLOBAL) == 0) ? DW_EH_PE_pcrel : DW_EH_PE_absptr)
 811
 812 #define ASM_OUTPUT_DWARF_DELTA(FILE,SIZE,LABEL1,LABEL2)  \
 813   darwin_asm_output_dwarf_delta (FILE, SIZE, LABEL1, LABEL2)
 814
 815 #define ASM_OUTPUT_DWARF_OFFSET(FILE,SIZE,LABEL,BASE)  \
 816   darwin_asm_output_dwarf_offset (FILE, SIZE, LABEL, BASE)
 817
 818 #define ASM_MAYBE_OUTPUT_ENCODED_ADDR_RTX(ASM_OUT_FILE, ENCODING, SIZE, ADDR, DONE)     \
 819       if (ENCODING == ASM_PREFERRED_EH_DATA_FORMAT (2, 1)) {                            \
 820         darwin_non_lazy_pcrel (ASM_OUT_FILE, ADDR);                                     \
 821         goto DONE;                                                                      \
 822       }
 823
 824 /* Experimentally, putting jump tables in text is faster on SPEC.
 825    Also this is needed for correctness for coalesced functions.  */
 826
 827 #ifndef JUMP_TABLES_IN_TEXT_SECTION
 828 #define JUMP_TABLES_IN_TEXT_SECTION 1
 829 #endif
 830
 831 #define TARGET_TERMINATE_DW2_EH_FRAME_INFO false
 832
 833 #define TARGET_ASM_INIT_SECTIONS darwin_init_sections
 834 #undef TARGET_ASM_NAMED_SECTION
 835 #define TARGET_ASM_NAMED_SECTION darwin_asm_named_section
 836
 837 /* Handle pragma weak and pragma pack.  */
 838 #define HANDLE_SYSV_PRAGMA 1
 839
 840 #define DARWIN_REGISTER_TARGET_PRAGMAS()                        \
 841   do {                                                          \
 842     c_register_pragma (0, "mark", darwin_pragma_ignore);        \
 843     c_register_pragma (0, "options", darwin_pragma_options);    \
 844     c_register_pragma (0, "segment", darwin_pragma_ignore);     \
 845     c_register_pragma (0, "unused", darwin_pragma_unused);      \
 846     c_register_pragma (0, "ms_struct", darwin_pragma_ms_struct); \
 847   } while (0)
 848
 849 #undef ASM_APP_ON
 850 #define ASM_APP_ON ""
 851 #undef ASM_APP_OFF
 852 #define ASM_APP_OFF ""
 853
 854 void darwin_register_frameworks (const char *, const char *, int);
 855 void darwin_register_objc_includes (const char *, const char *, int);
 856 #define TARGET_EXTRA_PRE_INCLUDES darwin_register_objc_includes
 857 #define TARGET_EXTRA_INCLUDES darwin_register_frameworks
 858
 859 void add_framework_path (char *);
 860 #define TARGET_OPTF add_framework_path
 861
 862 #define TARGET_POSIX_IO
 863
 864 /* All new versions of Darwin have C99 functions.  */
 865
 866 #define TARGET_C99_FUNCTIONS 1
 867
 868 #define WINT_TYPE "int"
 869
 870 /* Every program on darwin links against libSystem which contains the pthread
 871    routines, so there's no need to explicitly call out when doing threaded
 872    work.  */
 873
 874 #undef GOMP_SELF_SPECS
 875 #define GOMP_SELF_SPECS ""
 876
 877 /* Darwin can't support anchors until we can cope with the adjustments
 878    to size that ASM_DECLARE_OBJECT_NAME and ASM_DECLARE_CONSTANT_NAME
 879    when outputting members of an anchor block and the linker can be
 880    taught to keep them together or we find some other suitable
 881    code-gen technique.  */
 882
 883 #if 0
 884 #define TARGET_ASM_OUTPUT_ANCHOR darwin_asm_output_anchor
 885 #else
 886 #define TARGET_ASM_OUTPUT_ANCHOR NULL
 887 #endif
 888
 889 /* Attempt to turn on execute permission for the stack.  This may be
 890     used by INITIALIZE_TRAMPOLINE of the target needs it (that is,
 891     if the target machine can change execute permissions on a page).
 892
 893     There is no way to query the execute permission of the stack, so
 894     we always issue the mprotect() call.
 895
 896     Unfortunately it is not possible to make this namespace-clean.
 897
 898     Also note that no errors should be emitted by this code; it is
 899     considered dangerous for library calls to send messages to
 900     stdout/stderr.  */
 901
 902 #define ENABLE_EXECUTE_STACK                                            \
 903 extern void __enable_execute_stack (void *);                            \
 904 void                                                                    \
 905 __enable_execute_stack (void *addr)                                     \
 906 {                                                                       \
 907    extern int mprotect (void *, size_t, int);                           \
 908    extern int getpagesize (void);                                       \
 909    static int size;                                                     \
 910    static long mask;                                                    \
 911                                                                         \
 912    char *page, *end;                                                    \
 913                                                                         \
 914    if (size == 0)                                                       \
 915      {                                                                  \
 916        size = getpagesize();                                            \
 917        mask = ~((long) size - 1);                                       \
 918      }                                                                  \
 919                                                                         \
 920    page = (char *) (((long) addr) & mask);                              \
 921    end  = (char *) ((((long) (addr + (TARGET_64BIT ? 48 : 40))) & mask) + size); \
 922                                                                         \
 923    /* 7 == PROT_READ | PROT_WRITE | PROT_EXEC */                        \
 924    (void) mprotect (page, end - page, 7);                               \
 925 }
 926
 927 #endif /* CONFIG_DARWIN_H */