OSDN Git Service

4f9b487fc8c51f754e831ca4bb2795739264dde0
[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   } while (0)
372
373 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
374   do {                                                                  \
375     const char *xname = NAME;                                           \
376     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
377       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
378     if ((TREE_STATIC (DECL)                                             \
379          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
380         || DECL_INITIAL (DECL))                                         \
381       machopic_define_name (xname);                                     \
382     if ((TREE_STATIC (DECL)                                             \
383          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
384         || DECL_INITIAL (DECL))                                         \
385       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
386     ASM_OUTPUT_LABEL (FILE, xname);                                     \
387     /* Avoid generating stubs for functions we've just defined by       \
388        outputting any required stub name label now.  */                 \
389     machopic_output_possible_stub_label (FILE, xname);                  \
390   } while (0)
391
392 /* Wrap new method names in quotes so the assembler doesn't gag.
393    Make Objective-C internal symbols local.  */
394
395 #undef  ASM_OUTPUT_LABELREF
396 #define ASM_OUTPUT_LABELREF(FILE,NAME)                                       \
397   do {                                                                       \
398        const char *xname = darwin_strip_name_encoding (NAME);                \
399        if (! strcmp (xname, "<pic base>"))                                   \
400          machopic_output_function_base_name(FILE);                           \
401        else if (xname[0] == '&' || xname[0] == '*')                          \
402          {                                                                   \
403            int len = strlen (xname);                                         \
404            if (len > 6 && !strcmp ("$stub", xname + len - 5))                \
405              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
406            else if (len > 7 && !strcmp ("$stub\"", xname + len - 6))         \
407              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
408            else if (len > 14 && !strcmp ("$non_lazy_ptr", xname + len - 13)) \
409              machopic_validate_stub_or_non_lazy_ptr (xname, 0);              \
410            fputs (&xname[1], FILE);                                          \
411          }                                                                   \
412        else if (xname[0] == '+' || xname[0] == '-')                          \
413          fprintf (FILE, "\"%s\"", xname);                                    \
414        else if (!strncmp (xname, "_OBJC_", 6))                               \
415          fprintf (FILE, "L%s", xname);                                       \
416        else if (!strncmp (xname, ".objc_class_name_", 17))                   \
417          fprintf (FILE, "%s", xname);                                        \
418        else                                                                  \
419          fprintf (FILE, "_%s", xname);                                       \
420   } while (0)
421
422 /* Output before executable code.  */
423 #undef TEXT_SECTION_ASM_OP
424 #define TEXT_SECTION_ASM_OP ".text"
425
426 /* Output before writable data.  */
427
428 #undef DATA_SECTION_ASM_OP
429 #define DATA_SECTION_ASM_OP ".data"
430
431 #undef  ALIGN_ASM_OP
432 #define ALIGN_ASM_OP            ".align"
433
434 #undef  ASM_OUTPUT_ALIGN
435 #define ASM_OUTPUT_ALIGN(FILE,LOG)      \
436   if ((LOG) != 0)                       \
437     fprintf (FILE, "\t%s %d\n", ALIGN_ASM_OP, (LOG))
438
439 /* Ensure correct alignment of bss data.  */
440
441 #undef  ASM_OUTPUT_ALIGNED_DECL_LOCAL
442 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN)    \
443   do {                                                                  \
444     fputs (".lcomm ", (FILE));                                          \
445     assemble_name ((FILE), (NAME));                                     \
446     fprintf ((FILE), ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n", (SIZE),    \
447              floor_log2 ((ALIGN) / BITS_PER_UNIT));                     \
448     if ((DECL) && ((TREE_STATIC (DECL)                                  \
449          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
450         || DECL_INITIAL (DECL)))                                        \
451       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
452     if ((DECL) && ((TREE_STATIC (DECL)                                  \
453          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
454         || DECL_INITIAL (DECL)))                                        \
455       machopic_define_name (NAME);                                      \
456   } while (0)
457
458 /* The maximum alignment which the object file format can support.
459    For Mach-O, this is 2^15.  */
460
461 #undef  MAX_OFILE_ALIGNMENT
462 #define MAX_OFILE_ALIGNMENT 0x8000
463
464 /* Create new Mach-O sections.  */
465
466 #undef  SECTION_FUNCTION
467 #define SECTION_FUNCTION(FUNCTION, SECTION, DIRECTIVE, OBJC)            \
468 extern void FUNCTION PARAMS ((void));                                   \
469 void                                                                    \
470 FUNCTION ()                                                             \
471 {                                                                       \
472   if (in_section != SECTION)                                            \
473     {                                                                   \
474       if (OBJC)                                                         \
475         objc_section_init ();                                           \
476       data_section ();                                                  \
477       if (asm_out_file)                                                 \
478         fprintf (asm_out_file, "%s\n", DIRECTIVE);                      \
479       in_section = SECTION;                                             \
480     }                                                                   \
481 }                                                                       \
482
483 /* Darwin uses many types of special sections.  */
484
485 #undef  EXTRA_SECTIONS
486 #define EXTRA_SECTIONS                                  \
487   in_const, in_const_data, in_cstring, in_literal4, in_literal8,        \
488   in_constructor, in_destructor, in_mod_init, in_mod_term,              \
489   in_objc_class, in_objc_meta_class, in_objc_category,  \
490   in_objc_class_vars, in_objc_instance_vars,            \
491   in_objc_cls_meth, in_objc_inst_meth,                  \
492   in_objc_cat_cls_meth, in_objc_cat_inst_meth,          \
493   in_objc_selector_refs,                                \
494   in_objc_selector_fixup,                               \
495   in_objc_symbols, in_objc_module_info,                 \
496   in_objc_protocol, in_objc_string_object,              \
497   in_objc_constant_string_object,                       \
498   in_objc_class_names, in_objc_meth_var_names,          \
499   in_objc_meth_var_types, in_objc_cls_refs,             \
500   in_machopic_nl_symbol_ptr,                            \
501   in_machopic_lazy_symbol_ptr,                          \
502   in_machopic_symbol_stub,                              \
503   in_machopic_symbol_stub1,                             \
504   in_machopic_picsymbol_stub,                           \
505   in_machopic_picsymbol_stub1,                          \
506   in_darwin_exception, in_darwin_eh_frame,              \
507   num_sections
508
509 #undef  EXTRA_SECTION_FUNCTIONS
510 #define EXTRA_SECTION_FUNCTIONS                 \
511 static void objc_section_init PARAMS ((void));  \
512 SECTION_FUNCTION (const_section,                \
513                   in_const,                     \
514                   ".const", 0)                  \
515 SECTION_FUNCTION (const_data_section,           \
516                   in_const_data,                \
517                   ".const_data", 0)             \
518 SECTION_FUNCTION (cstring_section,              \
519                   in_cstring,                   \
520                   ".cstring", 0)                \
521 SECTION_FUNCTION (literal4_section,             \
522                   in_literal4,                  \
523                   ".literal4", 0)               \
524 SECTION_FUNCTION (literal8_section,             \
525                   in_literal8,                  \
526                   ".literal8", 0)               \
527 SECTION_FUNCTION (constructor_section,          \
528                   in_constructor,               \
529                   ".constructor", 0)            \
530 SECTION_FUNCTION (mod_init_section,             \
531                   in_mod_init,                  \
532                   ".mod_init_func", 0)  \
533 SECTION_FUNCTION (mod_term_section, \
534                   in_mod_term,                  \
535                   ".mod_term_func", 0)  \
536 SECTION_FUNCTION (destructor_section,           \
537                   in_destructor,                \
538                   ".destructor", 0)             \
539 SECTION_FUNCTION (objc_class_section,           \
540                   in_objc_class,                \
541                   ".objc_class", 1)             \
542 SECTION_FUNCTION (objc_meta_class_section,      \
543                   in_objc_meta_class,           \
544                   ".objc_meta_class", 1)        \
545 SECTION_FUNCTION (objc_category_section,        \
546                   in_objc_category,             \
547                 ".objc_category", 1)            \
548 SECTION_FUNCTION (objc_class_vars_section,      \
549                   in_objc_class_vars,           \
550                   ".objc_class_vars", 1)        \
551 SECTION_FUNCTION (objc_instance_vars_section,   \
552                   in_objc_instance_vars,        \
553                   ".objc_instance_vars", 1)     \
554 SECTION_FUNCTION (objc_cls_meth_section,        \
555                   in_objc_cls_meth,             \
556                   ".objc_cls_meth", 1)  \
557 SECTION_FUNCTION (objc_inst_meth_section,       \
558                   in_objc_inst_meth,            \
559                   ".objc_inst_meth", 1) \
560 SECTION_FUNCTION (objc_cat_cls_meth_section,    \
561                   in_objc_cat_cls_meth,         \
562                   ".objc_cat_cls_meth", 1)      \
563 SECTION_FUNCTION (objc_cat_inst_meth_section,   \
564                   in_objc_cat_inst_meth,        \
565                   ".objc_cat_inst_meth", 1)     \
566 SECTION_FUNCTION (objc_selector_refs_section,   \
567                   in_objc_selector_refs,        \
568                   ".objc_message_refs", 1)      \
569 SECTION_FUNCTION (objc_selector_fixup_section,  \
570                   in_objc_selector_fixup,       \
571                   ".section __OBJC, __sel_fixup", 1)    \
572 SECTION_FUNCTION (objc_symbols_section,         \
573                   in_objc_symbols,              \
574                   ".objc_symbols", 1)   \
575 SECTION_FUNCTION (objc_module_info_section,     \
576                   in_objc_module_info,          \
577                   ".objc_module_info", 1)       \
578 SECTION_FUNCTION (objc_protocol_section,        \
579                   in_objc_protocol,             \
580                   ".objc_protocol", 1)  \
581 SECTION_FUNCTION (objc_string_object_section,   \
582                   in_objc_string_object,        \
583                   ".objc_string_object", 1)     \
584 SECTION_FUNCTION (objc_constant_string_object_section,  \
585                   in_objc_constant_string_object,       \
586                   ".section __OBJC, __cstring_object", 1)       \
587 SECTION_FUNCTION (objc_class_names_section,     \
588                 in_objc_class_names,            \
589                 ".objc_class_names", 1) \
590 SECTION_FUNCTION (objc_meth_var_names_section,  \
591                 in_objc_meth_var_names,         \
592                 ".objc_meth_var_names", 1)      \
593 SECTION_FUNCTION (objc_meth_var_types_section,  \
594                 in_objc_meth_var_types,         \
595                 ".objc_meth_var_types", 1)      \
596 SECTION_FUNCTION (objc_cls_refs_section,        \
597                 in_objc_cls_refs,               \
598                 ".objc_cls_refs", 1)            \
599                                                 \
600 SECTION_FUNCTION (machopic_lazy_symbol_ptr_section,     \
601                 in_machopic_lazy_symbol_ptr,            \
602                 ".lazy_symbol_pointer", 0)              \
603 SECTION_FUNCTION (machopic_nl_symbol_ptr_section,       \
604                 in_machopic_nl_symbol_ptr,              \
605                 ".non_lazy_symbol_pointer", 0)          \
606 SECTION_FUNCTION (machopic_symbol_stub_section,         \
607                 in_machopic_symbol_stub,                \
608                 ".symbol_stub", 0)                      \
609 SECTION_FUNCTION (machopic_symbol_stub1_section,        \
610                 in_machopic_symbol_stub1,               \
611                 ".section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16", 0)\
612 SECTION_FUNCTION (machopic_picsymbol_stub_section,      \
613                 in_machopic_picsymbol_stub,             \
614                 ".picsymbol_stub", 0)                   \
615 SECTION_FUNCTION (machopic_picsymbol_stub1_section,     \
616                 in_machopic_picsymbol_stub1,            \
617                 ".section __TEXT,__picsymbolstub1,symbol_stubs,pure_instructions,32", 0)\
618 SECTION_FUNCTION (darwin_exception_section,             \
619                 in_darwin_exception,                    \
620                 ".section __DATA,__gcc_except_tab", 0)  \
621 SECTION_FUNCTION (darwin_eh_frame_section,              \
622                 in_darwin_eh_frame,                     \
623                 ".section __TEXT,__eh_frame", 0)        \
624                                                         \
625 static void                                     \
626 objc_section_init ()                            \
627 {                                               \
628   static int been_here = 0;                     \
629                                                 \
630   if (been_here == 0)                           \
631     {                                           \
632       been_here = 1;                            \
633           /* written, cold -> hot */            \
634       objc_cat_cls_meth_section ();             \
635       objc_cat_inst_meth_section ();            \
636       objc_string_object_section ();            \
637       objc_constant_string_object_section ();   \
638       objc_selector_refs_section ();            \
639       objc_selector_fixup_section ();           \
640       objc_cls_refs_section ();                 \
641       objc_class_section ();                    \
642       objc_meta_class_section ();               \
643           /* shared, hot -> cold */             \
644       objc_cls_meth_section ();                 \
645       objc_inst_meth_section ();                \
646       objc_protocol_section ();                 \
647       objc_class_names_section ();              \
648       objc_meth_var_types_section ();           \
649       objc_meth_var_names_section ();           \
650       objc_category_section ();                 \
651       objc_class_vars_section ();               \
652       objc_instance_vars_section ();            \
653       objc_module_info_section ();              \
654       objc_symbols_section ();                  \
655     }                                           \
656 }
657
658 #define READONLY_DATA_SECTION const_section
659
660 #undef  TARGET_ASM_SELECT_SECTION
661 #define TARGET_ASM_SELECT_SECTION machopic_select_section
662 #undef  TARGET_ASM_SELECT_RTX_SECTION
663 #define TARGET_ASM_SELECT_RTX_SECTION machopic_select_rtx_section
664
665 #define ASM_DECLARE_UNRESOLVED_REFERENCE(FILE,NAME)                     \
666     do {                                                                \
667          if (FILE) {                                                    \
668            if (MACHOPIC_INDIRECT)                                       \
669              fprintf (FILE, "\t.lazy_reference ");                      \
670            else                                                         \
671              fprintf (FILE, "\t.reference ");                           \
672            assemble_name (FILE, NAME);                                  \
673            fprintf (FILE, "\n");                                        \
674          }                                                              \
675        } while (0)
676
677 #define ASM_DECLARE_CLASS_REFERENCE(FILE,NAME)                          \
678     do {                                                                \
679          if (FILE) {                                                    \
680            fprintf (FILE, "\t");                                        \
681            assemble_name (FILE, NAME);                                  \
682            fprintf (FILE, "=0\n");                                      \
683            (*targetm.asm_out.globalize_label) (FILE, NAME);             \
684          }                                                              \
685        } while (0)
686
687 /* Globalizing directive for a label.  */
688 #define GLOBAL_ASM_OP ".globl "
689 #define TARGET_ASM_GLOBALIZE_LABEL darwin_globalize_label
690
691 #undef ASM_GENERATE_INTERNAL_LABEL
692 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)   \
693   sprintf (LABEL, "*%s%ld", PREFIX, (long)(NUM))
694
695 /* Since we have a separate readonly data section, define this so that
696    jump tables end up in text rather than data.  */
697
698 #ifndef JUMP_TABLES_IN_TEXT_SECTION
699 #define JUMP_TABLES_IN_TEXT_SECTION 1
700 #endif
701
702 /* Symbolic names for various things we might know about a symbol.  */
703
704 enum machopic_addr_class {
705   MACHOPIC_UNDEFINED,
706   MACHOPIC_DEFINED_DATA,
707   MACHOPIC_UNDEFINED_DATA,
708   MACHOPIC_DEFINED_FUNCTION,
709   MACHOPIC_UNDEFINED_FUNCTION
710 };
711
712 /* Macros defining the various PIC cases.  */
713
714 #define MACHO_DYNAMIC_NO_PIC_P  (TARGET_DYNAMIC_NO_PIC)
715 #define MACHOPIC_INDIRECT       (flag_pic || MACHO_DYNAMIC_NO_PIC_P)
716 #define MACHOPIC_JUST_INDIRECT  (flag_pic == 1 || MACHO_DYNAMIC_NO_PIC_P)
717 #define MACHOPIC_PURE           (flag_pic == 2 && ! MACHO_DYNAMIC_NO_PIC_P)
718
719 #undef TARGET_ENCODE_SECTION_INFO
720 #define TARGET_ENCODE_SECTION_INFO  darwin_encode_section_info
721 #undef TARGET_STRIP_NAME_ENCODING
722 #define TARGET_STRIP_NAME_ENCODING  darwin_strip_name_encoding
723
724 #define GEN_BINDER_NAME_FOR_STUB(BUF,STUB,STUB_LENGTH)          \
725   do {                                                          \
726     const char *const stub_ = (STUB);                           \
727     char *buffer_ = (BUF);                                      \
728     strcpy (buffer_, stub_);                                    \
729     if (stub_[0] == '"')                                        \
730       {                                                         \
731         strcpy (buffer_ + (STUB_LENGTH) - 1, "_binder\"");      \
732       }                                                         \
733     else                                                        \
734       {                                                         \
735         strcpy (buffer_ + (STUB_LENGTH), "_binder");            \
736       }                                                         \
737   } while (0)
738
739 #define GEN_SYMBOL_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)    \
740   do {                                                          \
741     const char *const symbol_ = (SYMBOL);                       \
742     char *buffer_ = (BUF);                                      \
743     if (name_needs_quotes (symbol_) && symbol_[0] != '"')       \
744       {                                                         \
745           sprintf (buffer_, "\"%s\"", symbol_);                 \
746       }                                                         \
747     else                                                        \
748       {                                                         \
749         strcpy (buffer_, symbol_);                              \
750       }                                                         \
751   } while (0)
752
753 /* Given a symbol name string, create the lazy pointer version
754    of the symbol name.  */
755
756 #define GEN_LAZY_PTR_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)  \
757   do {                                                          \
758     const char *symbol_ = darwin_strip_name_encoding (SYMBOL);  \
759     char *buffer_ = (BUF);                                      \
760     if (symbol_[0] == '"')                                      \
761       {                                                         \
762         strcpy (buffer_, "\"L");                                \
763         strcpy (buffer_ + 2, symbol_ + 1);                      \
764         strcpy (buffer_ + (SYMBOL_LENGTH), "$lazy_ptr\"");      \
765       }                                                         \
766     else if (name_needs_quotes (symbol_))                       \
767       {                                                         \
768         strcpy (buffer_, "\"L");                                \
769         strcpy (buffer_ + 2, symbol_);                          \
770         strcpy (buffer_ + (SYMBOL_LENGTH) + 2, "$lazy_ptr\"");  \
771       }                                                         \
772     else                                                        \
773       {                                                         \
774         strcpy (buffer_, "L");                                  \
775         strcpy (buffer_ + 1, symbol_);                          \
776         strcpy (buffer_ + (SYMBOL_LENGTH) + 1, "$lazy_ptr");    \
777       }                                                         \
778   } while (0)
779
780 #define TARGET_ASM_EXCEPTION_SECTION darwin_exception_section
781
782 #define TARGET_ASM_EH_FRAME_SECTION darwin_eh_frame_section
783   
784 #undef ASM_PREFERRED_EH_DATA_FORMAT
785 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL)  \
786   (((CODE) == 2 && (GLOBAL) == 1) \
787    ? (DW_EH_PE_pcrel | DW_EH_PE_indirect) : \
788      ((CODE) == 1 || (GLOBAL) == 0) ? DW_EH_PE_pcrel : DW_EH_PE_absptr)
789
790 #define ASM_OUTPUT_DWARF_DELTA(FILE,SIZE,LABEL1,LABEL2)  \
791   darwin_asm_output_dwarf_delta (FILE, SIZE, LABEL1, LABEL2)
792
793 #define TARGET_TERMINATE_DW2_EH_FRAME_INFO false
794
795 #define DARWIN_REGISTER_TARGET_PRAGMAS()                        \
796   do {                                                          \
797     c_register_pragma (0, "mark", darwin_pragma_ignore);        \
798     c_register_pragma (0, "options", darwin_pragma_options);    \
799     c_register_pragma (0, "segment", darwin_pragma_ignore);     \
800     c_register_pragma (0, "unused", darwin_pragma_unused);      \
801   } while (0)
802
803 #undef ASM_APP_ON
804 #define ASM_APP_ON ""
805 #undef ASM_APP_OFF
806 #define ASM_APP_OFF ""