OSDN Git Service

2003-07-30 Chris Demetriou <cgd@broadcom.com>
[pf3gnuchains/gcc-fork.git] / 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
3    Free Software Foundation, Inc.
4    Contributed by Apple Computer Inc.
5
6 This file is part of GNU CC.
7
8 GNU CC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2, or (at your option)
11 any later version.
12
13 GNU CC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GNU CC; see the file COPYING.  If not, write to
20 the Free Software Foundation, 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA.  */
22
23 /* The definitions in this file are common to all processor types
24    running Darwin, which is the kernel for Mac OS X.  Darwin is
25    basically a BSD user layer laid over a Mach kernel, then evolved
26    for many years (at NeXT) in parallel with other Unix systems.  So
27    while the runtime is a somewhat idiosyncratic Mach-based thing,
28    other definitions look like they would for a BSD variant.  */
29
30 /* Although NeXT ran on many different architectures, as of Jan 2001
31    the only supported Darwin targets are PowerPC and x86.  */
32
33 /* Technically, STANDARD_EXEC_PREFIX should be /usr/libexec/, but in
34    practice this makes it hard to install new compilers elsewhere, so
35    leave it undefined and expect system builders to set configure args
36    correctly.  */
37
38 /* One of Darwin's NeXT legacies is the Mach-O format, which is partly
39    like a.out and partly like COFF, with additional features like
40    multi-architecture binary support.  */
41
42 #define OBJECT_FORMAT_MACHO
43
44 /* Suppress g++ attempt to link in the math library automatically.
45    (Some Darwin versions have a libm, but they seem to cause problems
46    for C++ executables.)  */
47
48 #define MATH_LIBRARY ""
49
50 /* We have atexit.  */
51
52 #define HAVE_ATEXIT
53
54 /* Define an empty body for the function do_global_dtors() in libgcc2.c.  */
55
56 #define DO_GLOBAL_DTORS_BODY
57
58 /* The string value for __SIZE_TYPE__.  */
59
60 #ifndef SIZE_TYPE
61 #define SIZE_TYPE "long unsigned int"
62 #endif
63
64 /* Type used for ptrdiff_t, as a string used in a declaration.  */
65
66 #undef  PTRDIFF_TYPE
67 #define PTRDIFF_TYPE "int"
68
69 /* wchar_t is int.  */
70
71 #undef  WCHAR_TYPE
72 #define WCHAR_TYPE "int"
73 #undef  WCHAR_TYPE_SIZE
74 #define WCHAR_TYPE_SIZE 32
75
76 /* Default to using the NeXT-style runtime, since that's what is
77    pre-installed on Darwin systems.  */
78
79 #define NEXT_OBJC_RUNTIME
80
81 /* Don't default to pcc-struct-return, because gcc is the only compiler, and
82    we want to retain compatibility with older gcc versions.  */
83
84 #undef  DEFAULT_PCC_STRUCT_RETURN
85 #define DEFAULT_PCC_STRUCT_RETURN 0
86
87 /* This table intercepts weirdo options whose names would interfere
88    with normal driver conventions, and either translates them into
89    standardly-named options, or adds a 'Z' so that they can get to
90    specs processing without interference.
91
92    Do not expand a linker option to "-Xlinker -<option>", since that
93    forfeits the ability to control via spec strings later.  However,
94    as a special exception, do this translation with -filelist, because
95    otherwise the driver will think there are no input files and quit.
96    (The alternative would be to hack the driver to recognize -filelist
97    specially, but it's simpler to use the translation table.)
98
99    Note that an option name with a prefix that matches another option
100    name, that also takes an argument, needs to be modified so the
101    prefix is different, otherwise a '*' after the shorter option will
102    match with the longer one.  */
103 #define TARGET_OPTION_TRANSLATE_TABLE \
104   { "-all_load", "-Zall_load" },  \
105   { "-allowable_client", "-Zallowable_client" },  \
106   { "-arch_errors_fatal", "-Zarch_errors_fatal" },  \
107   { "-bind_at_load", "-Zbind_at_load" },  \
108   { "-bundle", "-Zbundle" },  \
109   { "-bundle_loader", "-Zbundle_loader" },  \
110   { "-weak_reference_mismatches", "-Zweak_reference_mismatches" },  \
111   { "-dependency-file", "-MF" }, \
112   { "-dylib_file", "-Zdylib_file" }, \
113   { "-dynamic", "-Zdynamic" },  \
114   { "-dynamiclib", "-Zdynamiclib" },  \
115   { "-exported_symbols_list", "-Zexported_symbols_list" },  \
116   { "-seg_addr_table_filename", "-Zseg_addr_table_filename" }, \
117   { "-filelist", "-Xlinker -filelist -Xlinker" },  \
118   { "-flat_namespace", "-Zflat_namespace" },  \
119   { "-force_cpusubtype_ALL", "-Zforce_cpusubtype_ALL" },  \
120   { "-force_flat_namespace", "-Zforce_flat_namespace" },  \
121   { "-image_base", "-Zimage_base" },  \
122   { "-init", "-Zinit" },  \
123   { "-install_name", "-Zinstall_name" },  \
124   { "-multiply_defined_unused", "-Zmultiplydefinedunused" },  \
125   { "-multiply_defined", "-Zmultiply_defined" },  \
126   { "-multi_module", "-Zmulti_module" },  \
127   { "-static", "-static -Wa,-static" },  \
128   { "-single_module", "-Zsingle_module" },  \
129   { "-unexported_symbols_list", "-Zunexported_symbols_list" }
130
131 /* These compiler options take n arguments.  */
132
133 #undef  WORD_SWITCH_TAKES_ARG
134 #define WORD_SWITCH_TAKES_ARG(STR)              \
135   (DEFAULT_WORD_SWITCH_TAKES_ARG (STR) ? 1 :    \
136    !strcmp (STR, "Zallowable_client") ? 1 :     \
137    !strcmp (STR, "arch") ? 1 :                  \
138    !strcmp (STR, "arch_only") ? 1 :             \
139    !strcmp (STR, "Zbundle_loader") ? 1 :        \
140    !strcmp (STR, "client_name") ? 1 :           \
141    !strcmp (STR, "compatibility_version") ? 1 : \
142    !strcmp (STR, "current_version") ? 1 :       \
143    !strcmp (STR, "Zdylib_file") ? 1 :           \
144    !strcmp (STR, "Zexported_symbols_list") ? 1 : \
145    !strcmp (STR, "Zimage_base") ? 1 :           \
146    !strcmp (STR, "Zinit") ? 1 :                 \
147    !strcmp (STR, "Zinstall_name") ? 1 :         \
148    !strcmp (STR, "Zmultiplydefinedunused") ? 1 : \
149    !strcmp (STR, "Zmultiply_defined") ? 1 :     \
150    !strcmp (STR, "precomp-trustfile") ? 1 :     \
151    !strcmp (STR, "read_only_relocs") ? 1 :      \
152    !strcmp (STR, "sectcreate") ? 3 :            \
153    !strcmp (STR, "sectorder") ? 3 :             \
154    !strcmp (STR, "Zseg_addr_table_filename") ?1 :\
155    !strcmp (STR, "seg1addr") ? 1 :              \
156    !strcmp (STR, "segprot") ? 3 :               \
157    !strcmp (STR, "seg_addr_table") ? 1 :        \
158    !strcmp (STR, "sub_library") ? 1 :           \
159    !strcmp (STR, "sub_umbrella") ? 1 :          \
160    !strcmp (STR, "umbrella") ? 1 :              \
161    !strcmp (STR, "undefined") ? 1 :             \
162    !strcmp (STR, "Zunexported_symbols_list") ? 1 : \
163    !strcmp (STR, "Zweak_reference_mismatches") ? 1 : \
164    !strcmp (STR, "pagezero_size") ? 1 :         \
165    !strcmp (STR, "segs_read_only_addr") ? 1 :   \
166    !strcmp (STR, "segs_read_write_addr") ? 1 :  \
167    !strcmp (STR, "sectalign") ? 3 :             \
168    !strcmp (STR, "sectobjectsymbols") ? 2 :     \
169    !strcmp (STR, "segcreate") ? 3 :             \
170    !strcmp (STR, "dylinker_install_name") ? 1 : \
171    0)
172
173 /* Machine dependent cpp options.  */
174
175 #undef  CPP_SPEC
176 #define CPP_SPEC "%{static:%{!dynamic:-D__STATIC__}}%{!static:-D__DYNAMIC__}"
177
178 /* This is mostly a clone of the standard LINK_COMMAND_SPEC, plus
179    precomp, libtool, and fat build additions.  Also we
180    don't specify a second %G after %L because libSystem is
181    self-contained and doesn't need to link against libgcc.a.  */
182 /* In general, random Darwin linker flags should go into LINK_SPEC
183    instead of LINK_COMMAND_SPEC.  The command spec is better for
184    specifying the handling of options understood by generic Unix
185    linkers, and for positional arguments like libraries.  */
186 #define LINK_COMMAND_SPEC "\
187 %{!fdump=*:%{!fsyntax-only:%{!precomp:%{!c:%{!M:%{!MM:%{!E:%{!S:\
188     %{!Zdynamiclib:%(linker)}%{Zdynamiclib:/usr/bin/libtool} \
189     %l %X %{d} %{s} %{t} %{Z} \
190     %{!Zdynamiclib:%{A} %{e*} %{m} %{N} %{n} %{r} %{u*} %{x} %{z}} \
191     %{@:-o %f%u.out}%{!@:%{o*}%{!o:-o a.out}} \
192     %{!Zdynamiclib:%{!A:%{!nostdlib:%{!nostartfiles:%S}}}} \
193     %{L*} %(link_libgcc) %o %{fprofile-arcs:-lgcov} \
194     %{!nostdlib:%{!nodefaultlibs:%G %L}} \
195     %{!A:%{!nostdlib:%{!nostartfiles:%E}}} %{T*} %{F*} \
196     %{!--help:%{!no-c++filt|c++filt:| c++filt3 }} }}}}}}}}"
197
198 /* Please keep the random linker options in alphabetical order (modulo
199    'Z' and 'no' prefixes).  Options that can only go to one of libtool
200    or ld must be listed twice, under both !Zdynamiclib and
201    Zdynamiclib, with one of the cases reporting an error.  */
202 /* Note that options taking arguments may appear multiple times on a
203    command line with different arguments each time, so put a * after
204    their names so all of them get passed.  */
205 #define LINK_SPEC  \
206   "%{static}%{!static:-dynamic} \
207    %{!Zdynamiclib: \
208      %{Zbundle:-bundle} \
209      %{Zbundle_loader*:-bundle_loader %*} \
210      %{client_name*} \
211      %{compatibility_version*:%e-compatibility_version only allowed with -dynamiclib\
212 } \
213      %{current_version*:%e-current_version only allowed with -dynamiclib} \
214      %{Zforce_cpusubtype_ALL:-force_cpusubtype_ALL} \
215      %{Zforce_flat_namespace:-force_flat_namespace} \
216      %{Zinstall_name*:%e-install_name only allowed with -dynamiclib} \
217      %{keep_private_externs} \
218      %{private_bundle} \
219     } \
220    %{Zdynamiclib: \
221      %{Zbundle:%e-bundle not allowed with -dynamiclib} \
222      %{Zbundle_loader*:%e-bundle_loader not allowed with -dynamiclib} \
223      %{client_name*:%e-client_name not allowed with -dynamiclib} \
224      %{compatibility_version*} \
225      %{current_version*} \
226      %{Zforce_cpusubtype_ALL:%e-force_cpusubtype_ALL not allowed with -dynamiclib} \
227      %{Zforce_flat_namespace:%e-force_flat_namespace not allowed with -dynamiclib} \
228      %{Zinstall_name*:-install_name %*} \
229      %{keep_private_externs:%e-keep_private_externs not allowed with -dynamiclib} \
230      %{private_bundle:%e-private_bundle not allowed with -dynamiclib} \
231     } \
232    %{Zall_load:-all_load}%{Zdynamiclib:%{!Zall_load:-noall_load}} \
233    %{Zallowable_client*:-allowable_client %*} \
234    %{Zbind_at_load:-bind_at_load} \
235    %{Zarch_errors_fatal:-arch_errors_fatal} \
236    %{Zdylib_file*:-dylib_file %*} \
237    %{Zdynamic:-dynamic}\
238    %{Zexported_symbols_list*:-exported_symbols_list %*} \
239    %{Zflat_namespace:-flat_namespace} \
240    %{headerpad_max_install_names*} \
241    %{Zimage_base*:-image_base %*} \
242    %{Zinit*:-init %*} \
243    %{nomultidefs} \
244    %{Zmulti_module:-multi_module} %{Zsingle_module:-single_module} \
245    %{Zmultiply_defined*:-multiply_defined %*} \
246    %{Zmultiplydefinedunused*:-multiply_defined_unused %*} \
247    %{prebind} %{noprebind} %{prebind_all_twolevel_modules} \
248    %{read_only_relocs} \
249    %{sectcreate*} %{sectorder*} %{seg1addr*} %{segprot*} %{seg_addr_table*} \
250    %{Zseg_addr_table_filename*:-seg_addr_table_filename %*} \
251    %{sub_library*} %{sub_umbrella*} \
252    %{twolevel_namespace} %{twolevel_namespace_hints} \
253    %{umbrella*} \
254    %{undefined*} \
255    %{Zunexported_symbols_list*:-unexported_symbols_list %*} \
256    %{Zweak_reference_mismatches*:-weak_reference_mismatches %*} \
257    %{X} \
258    %{y*} \
259    %{w} \
260    %{pagezero_size*} %{segs_read_*} %{seglinkedit} %{noseglinkedit}  \
261    %{sectalign*} %{sectobjectsymbols*} %{segcreate*} %{whyload} \
262    %{whatsloaded} %{dylinker_install_name*} \
263    %{dylinker} %{Mach} "
264
265
266 /* Machine dependent libraries.  */
267
268 #undef  LIB_SPEC
269 #define LIB_SPEC "%{!static:-lSystem}"
270
271 /* We specify crt0.o as -lcrt0.o so that ld will search the library path.  */
272
273 #undef  STARTFILE_SPEC
274 #define STARTFILE_SPEC  \
275   "%{!Zdynamiclib:%{Zbundle:%{!static:-lbundle1.o}} \
276      %{!Zbundle:%{pg:%{static:-lgcrt0.o} \
277                      %{!static:%{object:-lgcrt0.o} \
278                                %{!object:%{preload:-lgcrt0.o} \
279                                  %{!preload:-lgcrt1.o -lcrt2.o}}}} \
280                 %{!pg:%{static:-lcrt0.o} \
281                       %{!static:%{object:-lcrt0.o} \
282                                 %{!object:%{preload:-lcrt0.o} \
283                                   %{!preload:-lcrt1.o -lcrt2.o}}}}}}"
284
285 /* The native Darwin linker doesn't necessarily place files in the order
286    that they're specified on the link line.  Thus, it is pointless
287    to put anything in ENDFILE_SPEC.  */
288 /* #define ENDFILE_SPEC "" */
289
290 /* We use Dbx symbol format.  */
291
292 #define DBX_DEBUGGING_INFO 1
293
294 /* When generating stabs debugging, use N_BINCL entries.  */
295
296 #define DBX_USE_BINCL
297
298 /* There is no limit to the length of stabs strings.  */
299
300 #define DBX_CONTIN_LENGTH 0
301
302 /* gdb needs a null N_SO at the end of each file for scattered loading.  */
303
304 #undef  DBX_OUTPUT_MAIN_SOURCE_FILE_END
305 #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME)                 \
306 do { text_section ();                                                   \
307      fprintf (FILE,                                                     \
308               "\t.stabs \"%s\",%d,0,0,Letext\nLetext:\n", "" , N_SO);   \
309    } while (0)
310
311 /* Our profiling scheme doesn't LP labels and counter words.  */
312
313 #define NO_PROFILE_COUNTERS     1
314
315 #undef  INIT_SECTION_ASM_OP
316 #define INIT_SECTION_ASM_OP
317
318 #undef  INVOKE__main
319
320 #define TARGET_ASM_CONSTRUCTOR  machopic_asm_out_constructor
321 #define TARGET_ASM_DESTRUCTOR   machopic_asm_out_destructor
322
323 /* Always prefix with an underscore.  */
324
325 #define USER_LABEL_PREFIX "_"
326
327 /* Don't output a .file directive.  That is only used by the assembler for
328    error reporting.  */
329 #undef  TARGET_ASM_FILE_START_FILE_DIRECTIVE
330 #define TARGET_ASM_FILE_START_FILE_DIRECTIVE false
331
332 #undef  TARGET_ASM_FILE_END
333 #define TARGET_ASM_FILE_END darwin_file_end
334
335 #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
336   fprintf (FILE, "\t.space "HOST_WIDE_INT_PRINT_UNSIGNED"\n", SIZE)
337
338 /* Give ObjC methods pretty symbol names.  */
339
340 #undef  OBJC_GEN_METHOD_LABEL
341 #define OBJC_GEN_METHOD_LABEL(BUF,IS_INST,CLASS_NAME,CAT_NAME,SEL_NAME,NUM) \
342   do { if (CAT_NAME)                                                    \
343          sprintf (BUF, "%c[%s(%s) %s]", (IS_INST) ? '-' : '+',          \
344                   (CLASS_NAME), (CAT_NAME), (SEL_NAME));                \
345        else                                                             \
346          sprintf (BUF, "%c[%s %s]", (IS_INST) ? '-' : '+',              \
347                   (CLASS_NAME), (SEL_NAME));                            \
348      } while (0)
349
350 /* The RTTI data (e.g., __ti4name) is common and public (and static),
351    but it does need to be referenced via indirect PIC data pointers.
352    The machopic_define_name calls are telling the machopic subsystem
353    that the name *is* defined in this module, so it doesn't need to
354    make them indirect.  */
355
356 #undef ASM_DECLARE_OBJECT_NAME
357 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
358   do {                                                                  \
359     const char *xname = NAME;                                           \
360     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
361       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
362     if ((TREE_STATIC (DECL)                                             \
363          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
364         || DECL_INITIAL (DECL))                                         \
365       machopic_define_name (xname);                                     \
366     if ((TREE_STATIC (DECL)                                             \
367          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
368         || DECL_INITIAL (DECL))                                         \
369       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
370     ASM_OUTPUT_LABEL (FILE, xname);                                     \
371     /* Darwin doesn't support zero-size objects, so give them a         \
372        byte.  */                                                        \
373     if (tree_low_cst (DECL_SIZE_UNIT (DECL), 1) == 0)                   \
374       assemble_zeros (1);                                               \
375   } while (0)
376
377 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
378   do {                                                                  \
379     const char *xname = NAME;                                           \
380     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
381       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
382     if ((TREE_STATIC (DECL)                                             \
383          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
384         || DECL_INITIAL (DECL))                                         \
385       machopic_define_name (xname);                                     \
386     if ((TREE_STATIC (DECL)                                             \
387          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
388         || DECL_INITIAL (DECL))                                         \
389       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
390     ASM_OUTPUT_LABEL (FILE, xname);                                     \
391     /* Avoid generating stubs for functions we've just defined by       \
392        outputting any required stub name label now.  */                 \
393     machopic_output_possible_stub_label (FILE, xname);                  \
394   } while (0)
395
396 #define ASM_DECLARE_CONSTANT_NAME(FILE, NAME, EXP, SIZE)        \
397   do {                                                          \
398     ASM_OUTPUT_LABEL (FILE, NAME);                              \
399     /* Darwin doesn't support zero-size objects, so give them a \
400        byte.  */                                                \
401     if ((SIZE) == 0)                                            \
402       assemble_zeros (1);                                       \
403   } while (0)
404
405 /* Wrap new method names in quotes so the assembler doesn't gag.
406    Make Objective-C internal symbols local.  */
407
408 #undef  ASM_OUTPUT_LABELREF
409 #define ASM_OUTPUT_LABELREF(FILE,NAME)                                       \
410   do {                                                                       \
411        const char *xname = darwin_strip_name_encoding (NAME);                \
412        if (! strcmp (xname, "<pic base>"))                                   \
413          machopic_output_function_base_name(FILE);                           \
414        else if (xname[0] == '&' || xname[0] == '*')                          \
415          {                                                                   \
416            int len = strlen (xname);                                         \
417            if (len > 6 && !strcmp ("$stub", xname + len - 5))                \
418              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
419            else if (len > 7 && !strcmp ("$stub\"", xname + len - 6))         \
420              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
421            else if (len > 14 && !strcmp ("$non_lazy_ptr", xname + len - 13)) \
422              machopic_validate_stub_or_non_lazy_ptr (xname, 0);              \
423            fputs (&xname[1], FILE);                                          \
424          }                                                                   \
425        else if (xname[0] == '+' || xname[0] == '-')                          \
426          fprintf (FILE, "\"%s\"", xname);                                    \
427        else if (!strncmp (xname, "_OBJC_", 6))                               \
428          fprintf (FILE, "L%s", xname);                                       \
429        else if (!strncmp (xname, ".objc_class_name_", 17))                   \
430          fprintf (FILE, "%s", xname);                                        \
431        else                                                                  \
432          fprintf (FILE, "_%s", xname);                                       \
433   } while (0)
434
435 /* Output before executable code.  */
436 #undef TEXT_SECTION_ASM_OP
437 #define TEXT_SECTION_ASM_OP ".text"
438
439 /* Output before writable data.  */
440
441 #undef DATA_SECTION_ASM_OP
442 #define DATA_SECTION_ASM_OP ".data"
443
444 #undef  ALIGN_ASM_OP
445 #define ALIGN_ASM_OP            ".align"
446
447 #undef  ASM_OUTPUT_ALIGN
448 #define ASM_OUTPUT_ALIGN(FILE,LOG)      \
449   if ((LOG) != 0)                       \
450     fprintf (FILE, "\t%s %d\n", ALIGN_ASM_OP, (LOG))
451
452 /* Ensure correct alignment of bss data.  */
453
454 #undef  ASM_OUTPUT_ALIGNED_DECL_LOCAL
455 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN)    \
456   do {                                                                  \
457     fputs (".lcomm ", (FILE));                                          \
458     assemble_name ((FILE), (NAME));                                     \
459     fprintf ((FILE), ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n", (SIZE),    \
460              floor_log2 ((ALIGN) / BITS_PER_UNIT));                     \
461     if ((DECL) && ((TREE_STATIC (DECL)                                  \
462          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
463         || DECL_INITIAL (DECL)))                                        \
464       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
465     if ((DECL) && ((TREE_STATIC (DECL)                                  \
466          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
467         || DECL_INITIAL (DECL)))                                        \
468       machopic_define_name (NAME);                                      \
469   } while (0)
470
471 /* The maximum alignment which the object file format can support.
472    For Mach-O, this is 2^15.  */
473
474 #undef  MAX_OFILE_ALIGNMENT
475 #define MAX_OFILE_ALIGNMENT 0x8000
476
477 /* Create new Mach-O sections.  */
478
479 #undef  SECTION_FUNCTION
480 #define SECTION_FUNCTION(FUNCTION, SECTION, DIRECTIVE, OBJC)            \
481 extern void FUNCTION PARAMS ((void));                                   \
482 void                                                                    \
483 FUNCTION ()                                                             \
484 {                                                                       \
485   if (in_section != SECTION)                                            \
486     {                                                                   \
487       if (OBJC)                                                         \
488         objc_section_init ();                                           \
489       data_section ();                                                  \
490       if (asm_out_file)                                                 \
491         fprintf (asm_out_file, "%s\n", DIRECTIVE);                      \
492       in_section = SECTION;                                             \
493     }                                                                   \
494 }                                                                       \
495
496 /* Darwin uses many types of special sections.  */
497
498 #undef  EXTRA_SECTIONS
499 #define EXTRA_SECTIONS                                  \
500   in_const, in_const_data, in_cstring, in_literal4, in_literal8,        \
501   in_constructor, in_destructor, in_mod_init, in_mod_term,              \
502   in_objc_class, in_objc_meta_class, in_objc_category,  \
503   in_objc_class_vars, in_objc_instance_vars,            \
504   in_objc_cls_meth, in_objc_inst_meth,                  \
505   in_objc_cat_cls_meth, in_objc_cat_inst_meth,          \
506   in_objc_selector_refs,                                \
507   in_objc_selector_fixup,                               \
508   in_objc_symbols, in_objc_module_info,                 \
509   in_objc_protocol, in_objc_string_object,              \
510   in_objc_constant_string_object,                       \
511   in_objc_class_names, in_objc_meth_var_names,          \
512   in_objc_meth_var_types, in_objc_cls_refs,             \
513   in_machopic_nl_symbol_ptr,                            \
514   in_machopic_lazy_symbol_ptr,                          \
515   in_machopic_symbol_stub,                              \
516   in_machopic_symbol_stub1,                             \
517   in_machopic_picsymbol_stub,                           \
518   in_machopic_picsymbol_stub1,                          \
519   in_darwin_exception, in_darwin_eh_frame,              \
520   num_sections
521
522 #undef  EXTRA_SECTION_FUNCTIONS
523 #define EXTRA_SECTION_FUNCTIONS                 \
524 static void objc_section_init PARAMS ((void));  \
525 SECTION_FUNCTION (const_section,                \
526                   in_const,                     \
527                   ".const", 0)                  \
528 SECTION_FUNCTION (const_data_section,           \
529                   in_const_data,                \
530                   ".const_data", 0)             \
531 SECTION_FUNCTION (cstring_section,              \
532                   in_cstring,                   \
533                   ".cstring", 0)                \
534 SECTION_FUNCTION (literal4_section,             \
535                   in_literal4,                  \
536                   ".literal4", 0)               \
537 SECTION_FUNCTION (literal8_section,             \
538                   in_literal8,                  \
539                   ".literal8", 0)               \
540 SECTION_FUNCTION (constructor_section,          \
541                   in_constructor,               \
542                   ".constructor", 0)            \
543 SECTION_FUNCTION (mod_init_section,             \
544                   in_mod_init,                  \
545                   ".mod_init_func", 0)  \
546 SECTION_FUNCTION (mod_term_section, \
547                   in_mod_term,                  \
548                   ".mod_term_func", 0)  \
549 SECTION_FUNCTION (destructor_section,           \
550                   in_destructor,                \
551                   ".destructor", 0)             \
552 SECTION_FUNCTION (objc_class_section,           \
553                   in_objc_class,                \
554                   ".objc_class", 1)             \
555 SECTION_FUNCTION (objc_meta_class_section,      \
556                   in_objc_meta_class,           \
557                   ".objc_meta_class", 1)        \
558 SECTION_FUNCTION (objc_category_section,        \
559                   in_objc_category,             \
560                 ".objc_category", 1)            \
561 SECTION_FUNCTION (objc_class_vars_section,      \
562                   in_objc_class_vars,           \
563                   ".objc_class_vars", 1)        \
564 SECTION_FUNCTION (objc_instance_vars_section,   \
565                   in_objc_instance_vars,        \
566                   ".objc_instance_vars", 1)     \
567 SECTION_FUNCTION (objc_cls_meth_section,        \
568                   in_objc_cls_meth,             \
569                   ".objc_cls_meth", 1)  \
570 SECTION_FUNCTION (objc_inst_meth_section,       \
571                   in_objc_inst_meth,            \
572                   ".objc_inst_meth", 1) \
573 SECTION_FUNCTION (objc_cat_cls_meth_section,    \
574                   in_objc_cat_cls_meth,         \
575                   ".objc_cat_cls_meth", 1)      \
576 SECTION_FUNCTION (objc_cat_inst_meth_section,   \
577                   in_objc_cat_inst_meth,        \
578                   ".objc_cat_inst_meth", 1)     \
579 SECTION_FUNCTION (objc_selector_refs_section,   \
580                   in_objc_selector_refs,        \
581                   ".objc_message_refs", 1)      \
582 SECTION_FUNCTION (objc_selector_fixup_section,  \
583                   in_objc_selector_fixup,       \
584                   ".section __OBJC, __sel_fixup", 1)    \
585 SECTION_FUNCTION (objc_symbols_section,         \
586                   in_objc_symbols,              \
587                   ".objc_symbols", 1)   \
588 SECTION_FUNCTION (objc_module_info_section,     \
589                   in_objc_module_info,          \
590                   ".objc_module_info", 1)       \
591 SECTION_FUNCTION (objc_protocol_section,        \
592                   in_objc_protocol,             \
593                   ".objc_protocol", 1)  \
594 SECTION_FUNCTION (objc_string_object_section,   \
595                   in_objc_string_object,        \
596                   ".objc_string_object", 1)     \
597 SECTION_FUNCTION (objc_constant_string_object_section,  \
598                   in_objc_constant_string_object,       \
599                   ".section __OBJC, __cstring_object", 1)       \
600 SECTION_FUNCTION (objc_class_names_section,     \
601                 in_objc_class_names,            \
602                 ".objc_class_names", 1) \
603 SECTION_FUNCTION (objc_meth_var_names_section,  \
604                 in_objc_meth_var_names,         \
605                 ".objc_meth_var_names", 1)      \
606 SECTION_FUNCTION (objc_meth_var_types_section,  \
607                 in_objc_meth_var_types,         \
608                 ".objc_meth_var_types", 1)      \
609 SECTION_FUNCTION (objc_cls_refs_section,        \
610                 in_objc_cls_refs,               \
611                 ".objc_cls_refs", 1)            \
612                                                 \
613 SECTION_FUNCTION (machopic_lazy_symbol_ptr_section,     \
614                 in_machopic_lazy_symbol_ptr,            \
615                 ".lazy_symbol_pointer", 0)              \
616 SECTION_FUNCTION (machopic_nl_symbol_ptr_section,       \
617                 in_machopic_nl_symbol_ptr,              \
618                 ".non_lazy_symbol_pointer", 0)          \
619 SECTION_FUNCTION (machopic_symbol_stub_section,         \
620                 in_machopic_symbol_stub,                \
621                 ".symbol_stub", 0)                      \
622 SECTION_FUNCTION (machopic_symbol_stub1_section,        \
623                 in_machopic_symbol_stub1,               \
624                 ".section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16", 0)\
625 SECTION_FUNCTION (machopic_picsymbol_stub_section,      \
626                 in_machopic_picsymbol_stub,             \
627                 ".picsymbol_stub", 0)                   \
628 SECTION_FUNCTION (machopic_picsymbol_stub1_section,     \
629                 in_machopic_picsymbol_stub1,            \
630                 ".section __TEXT,__picsymbolstub1,symbol_stubs,pure_instructions,32", 0)\
631 SECTION_FUNCTION (darwin_exception_section,             \
632                 in_darwin_exception,                    \
633                 ".section __DATA,__gcc_except_tab", 0)  \
634 SECTION_FUNCTION (darwin_eh_frame_section,              \
635                 in_darwin_eh_frame,                     \
636                 ".section __TEXT,__eh_frame", 0)        \
637                                                         \
638 static void                                     \
639 objc_section_init ()                            \
640 {                                               \
641   static int been_here = 0;                     \
642                                                 \
643   if (been_here == 0)                           \
644     {                                           \
645       been_here = 1;                            \
646           /* written, cold -> hot */            \
647       objc_cat_cls_meth_section ();             \
648       objc_cat_inst_meth_section ();            \
649       objc_string_object_section ();            \
650       objc_constant_string_object_section ();   \
651       objc_selector_refs_section ();            \
652       objc_selector_fixup_section ();           \
653       objc_cls_refs_section ();                 \
654       objc_class_section ();                    \
655       objc_meta_class_section ();               \
656           /* shared, hot -> cold */             \
657       objc_cls_meth_section ();                 \
658       objc_inst_meth_section ();                \
659       objc_protocol_section ();                 \
660       objc_class_names_section ();              \
661       objc_meth_var_types_section ();           \
662       objc_meth_var_names_section ();           \
663       objc_category_section ();                 \
664       objc_class_vars_section ();               \
665       objc_instance_vars_section ();            \
666       objc_module_info_section ();              \
667       objc_symbols_section ();                  \
668     }                                           \
669 }
670
671 #define READONLY_DATA_SECTION const_section
672
673 #undef  TARGET_ASM_SELECT_SECTION
674 #define TARGET_ASM_SELECT_SECTION machopic_select_section
675 #undef  TARGET_ASM_SELECT_RTX_SECTION
676 #define TARGET_ASM_SELECT_RTX_SECTION machopic_select_rtx_section
677
678 #define ASM_DECLARE_UNRESOLVED_REFERENCE(FILE,NAME)                     \
679     do {                                                                \
680          if (FILE) {                                                    \
681            if (MACHOPIC_INDIRECT)                                       \
682              fprintf (FILE, "\t.lazy_reference ");                      \
683            else                                                         \
684              fprintf (FILE, "\t.reference ");                           \
685            assemble_name (FILE, NAME);                                  \
686            fprintf (FILE, "\n");                                        \
687          }                                                              \
688        } while (0)
689
690 #define ASM_DECLARE_CLASS_REFERENCE(FILE,NAME)                          \
691     do {                                                                \
692          if (FILE) {                                                    \
693            fprintf (FILE, "\t");                                        \
694            assemble_name (FILE, NAME);                                  \
695            fprintf (FILE, "=0\n");                                      \
696            (*targetm.asm_out.globalize_label) (FILE, NAME);             \
697          }                                                              \
698        } while (0)
699
700 /* Globalizing directive for a label.  */
701 #define GLOBAL_ASM_OP ".globl "
702 #define TARGET_ASM_GLOBALIZE_LABEL darwin_globalize_label
703
704 #undef ASM_GENERATE_INTERNAL_LABEL
705 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)   \
706   sprintf (LABEL, "*%s%ld", PREFIX, (long)(NUM))
707
708 /* Since we have a separate readonly data section, define this so that
709    jump tables end up in text rather than data.  */
710
711 #ifndef JUMP_TABLES_IN_TEXT_SECTION
712 #define JUMP_TABLES_IN_TEXT_SECTION 1
713 #endif
714
715 /* Symbolic names for various things we might know about a symbol.  */
716
717 enum machopic_addr_class {
718   MACHOPIC_UNDEFINED,
719   MACHOPIC_DEFINED_DATA,
720   MACHOPIC_UNDEFINED_DATA,
721   MACHOPIC_DEFINED_FUNCTION,
722   MACHOPIC_UNDEFINED_FUNCTION
723 };
724
725 /* Macros defining the various PIC cases.  */
726
727 #define MACHO_DYNAMIC_NO_PIC_P  (TARGET_DYNAMIC_NO_PIC)
728 #define MACHOPIC_INDIRECT       (flag_pic || MACHO_DYNAMIC_NO_PIC_P)
729 #define MACHOPIC_JUST_INDIRECT  (flag_pic == 1 || MACHO_DYNAMIC_NO_PIC_P)
730 #define MACHOPIC_PURE           (flag_pic == 2 && ! MACHO_DYNAMIC_NO_PIC_P)
731
732 #undef TARGET_ENCODE_SECTION_INFO
733 #define TARGET_ENCODE_SECTION_INFO  darwin_encode_section_info
734 #undef TARGET_STRIP_NAME_ENCODING
735 #define TARGET_STRIP_NAME_ENCODING  darwin_strip_name_encoding
736
737 #define GEN_BINDER_NAME_FOR_STUB(BUF,STUB,STUB_LENGTH)          \
738   do {                                                          \
739     const char *const stub_ = (STUB);                           \
740     char *buffer_ = (BUF);                                      \
741     strcpy (buffer_, stub_);                                    \
742     if (stub_[0] == '"')                                        \
743       {                                                         \
744         strcpy (buffer_ + (STUB_LENGTH) - 1, "_binder\"");      \
745       }                                                         \
746     else                                                        \
747       {                                                         \
748         strcpy (buffer_ + (STUB_LENGTH), "_binder");            \
749       }                                                         \
750   } while (0)
751
752 #define GEN_SYMBOL_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)    \
753   do {                                                          \
754     const char *const symbol_ = (SYMBOL);                       \
755     char *buffer_ = (BUF);                                      \
756     if (name_needs_quotes (symbol_) && symbol_[0] != '"')       \
757       {                                                         \
758           sprintf (buffer_, "\"%s\"", symbol_);                 \
759       }                                                         \
760     else                                                        \
761       {                                                         \
762         strcpy (buffer_, symbol_);                              \
763       }                                                         \
764   } while (0)
765
766 /* Given a symbol name string, create the lazy pointer version
767    of the symbol name.  */
768
769 #define GEN_LAZY_PTR_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)  \
770   do {                                                          \
771     const char *symbol_ = darwin_strip_name_encoding (SYMBOL);  \
772     char *buffer_ = (BUF);                                      \
773     if (symbol_[0] == '"')                                      \
774       {                                                         \
775         strcpy (buffer_, "\"L");                                \
776         strcpy (buffer_ + 2, symbol_ + 1);                      \
777         strcpy (buffer_ + (SYMBOL_LENGTH), "$lazy_ptr\"");      \
778       }                                                         \
779     else if (name_needs_quotes (symbol_))                       \
780       {                                                         \
781         strcpy (buffer_, "\"L");                                \
782         strcpy (buffer_ + 2, symbol_);                          \
783         strcpy (buffer_ + (SYMBOL_LENGTH) + 2, "$lazy_ptr\"");  \
784       }                                                         \
785     else                                                        \
786       {                                                         \
787         strcpy (buffer_, "L");                                  \
788         strcpy (buffer_ + 1, symbol_);                          \
789         strcpy (buffer_ + (SYMBOL_LENGTH) + 1, "$lazy_ptr");    \
790       }                                                         \
791   } while (0)
792
793 #define TARGET_ASM_EXCEPTION_SECTION darwin_exception_section
794
795 #define TARGET_ASM_EH_FRAME_SECTION darwin_eh_frame_section
796   
797 #undef ASM_PREFERRED_EH_DATA_FORMAT
798 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL)  \
799   (((CODE) == 2 && (GLOBAL) == 1) \
800    ? (DW_EH_PE_pcrel | DW_EH_PE_indirect) : \
801      ((CODE) == 1 || (GLOBAL) == 0) ? DW_EH_PE_pcrel : DW_EH_PE_absptr)
802
803 #define ASM_OUTPUT_DWARF_DELTA(FILE,SIZE,LABEL1,LABEL2)  \
804   darwin_asm_output_dwarf_delta (FILE, SIZE, LABEL1, LABEL2)
805
806 #define TARGET_TERMINATE_DW2_EH_FRAME_INFO false
807
808 #define DARWIN_REGISTER_TARGET_PRAGMAS()                        \
809   do {                                                          \
810     c_register_pragma (0, "mark", darwin_pragma_ignore);        \
811     c_register_pragma (0, "options", darwin_pragma_options);    \
812     c_register_pragma (0, "segment", darwin_pragma_ignore);     \
813     c_register_pragma (0, "unused", darwin_pragma_unused);      \
814   } while (0)
815
816 #undef ASM_APP_ON
817 #define ASM_APP_ON ""
818 #undef ASM_APP_OFF
819 #define ASM_APP_OFF ""