OSDN Git Service

* i960.c (i960_output_function_prologue, i960_print_operand,
[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 #undef  DOLLARS_IN_IDENTIFIERS
291 #define DOLLARS_IN_IDENTIFIERS 2
292
293 /* We use Dbx symbol format.  */
294
295 #define DBX_DEBUGGING_INFO 1
296
297 /* When generating stabs debugging, use N_BINCL entries.  */
298
299 #define DBX_USE_BINCL
300
301 /* There is no limit to the length of stabs strings.  */
302
303 #define DBX_CONTIN_LENGTH 0
304
305 /* gdb needs a null N_SO at the end of each file for scattered loading.  */
306
307 #undef  DBX_OUTPUT_MAIN_SOURCE_FILE_END
308 #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME)                 \
309 do { text_section ();                                                   \
310      fprintf (FILE,                                                     \
311               "\t.stabs \"%s\",%d,0,0,Letext\nLetext:\n", "" , N_SO);   \
312    } while (0)
313
314 /* Our profiling scheme doesn't LP labels and counter words.  */
315
316 #define NO_PROFILE_COUNTERS
317
318 #undef  INIT_SECTION_ASM_OP
319 #define INIT_SECTION_ASM_OP
320
321 #undef  INVOKE__main
322
323 #define TARGET_ASM_CONSTRUCTOR  machopic_asm_out_constructor
324 #define TARGET_ASM_DESTRUCTOR   machopic_asm_out_destructor
325
326 /* Always prefix with an underscore.  */
327
328 #define USER_LABEL_PREFIX "_"
329
330 /* Don't output a .file directive.  That is only used by the assembler for
331    error reporting.  */
332
333 #undef  ASM_FILE_START
334 #define ASM_FILE_START(FILE)
335
336 #undef  ASM_FILE_END
337 #define ASM_FILE_END(FILE)                                      \
338   do {                                                          \
339     machopic_finish (asm_out_file);                             \
340     if (strcmp (lang_hooks.name, "GNU C++") == 0)               \
341       {                                                         \
342         constructor_section ();                                 \
343         destructor_section ();                                  \
344         ASM_OUTPUT_ALIGN (FILE, 1);                             \
345       }                                                         \
346   } while (0)
347
348 #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
349   fprintf (FILE, "\t.space "HOST_WIDE_INT_PRINT_UNSIGNED"\n", SIZE)
350
351 /* Give ObjC methods pretty symbol names.  */
352
353 #undef  OBJC_GEN_METHOD_LABEL
354 #define OBJC_GEN_METHOD_LABEL(BUF,IS_INST,CLASS_NAME,CAT_NAME,SEL_NAME,NUM) \
355   do { if (CAT_NAME)                                                    \
356          sprintf (BUF, "%c[%s(%s) %s]", (IS_INST) ? '-' : '+',          \
357                   (CLASS_NAME), (CAT_NAME), (SEL_NAME));                \
358        else                                                             \
359          sprintf (BUF, "%c[%s %s]", (IS_INST) ? '-' : '+',              \
360                   (CLASS_NAME), (SEL_NAME));                            \
361      } while (0)
362
363 /* The RTTI data (e.g., __ti4name) is common and public (and static),
364    but it does need to be referenced via indirect PIC data pointers.
365    The machopic_define_name calls are telling the machopic subsystem
366    that the name *is* defined in this module, so it doesn't need to
367    make them indirect.  */
368
369 #undef ASM_DECLARE_OBJECT_NAME
370 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
371   do {                                                                  \
372     const char *xname = NAME;                                           \
373     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
374       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
375     if ((TREE_STATIC (DECL)                                             \
376          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
377         || DECL_INITIAL (DECL))                                         \
378       machopic_define_name (xname);                                     \
379     if ((TREE_STATIC (DECL)                                             \
380          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
381         || DECL_INITIAL (DECL))                                         \
382       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
383     ASM_OUTPUT_LABEL (FILE, xname);                                     \
384   } while (0)
385
386 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
387   do {                                                                  \
388     const char *xname = NAME;                                           \
389     if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF)             \
390       xname = IDENTIFIER_POINTER (DECL_NAME (DECL));                    \
391     if ((TREE_STATIC (DECL)                                             \
392          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
393         || DECL_INITIAL (DECL))                                         \
394       machopic_define_name (xname);                                     \
395     if ((TREE_STATIC (DECL)                                             \
396          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
397         || DECL_INITIAL (DECL))                                         \
398       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
399     ASM_OUTPUT_LABEL (FILE, xname);                                     \
400     /* Avoid generating stubs for functions we've just defined by       \
401        outputting any required stub name label now.  */                 \
402     machopic_output_possible_stub_label (FILE, xname);                  \
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 (xname[0] == '&' || xname[0] == '*')                               \
413          {                                                                   \
414            int len = strlen (xname);                                         \
415            if (len > 6 && !strcmp ("$stub", xname + len - 5))                \
416              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
417            else if (len > 7 && !strcmp ("$stub\"", xname + len - 6))         \
418              machopic_validate_stub_or_non_lazy_ptr (xname, 1);              \
419            else if (len > 14 && !strcmp ("$non_lazy_ptr", xname + len - 13)) \
420              machopic_validate_stub_or_non_lazy_ptr (xname, 0);              \
421            fputs (&xname[1], FILE);                                          \
422          }                                                                   \
423        else if (xname[0] == '+' || xname[0] == '-')                          \
424          fprintf (FILE, "\"%s\"", xname);                                    \
425        else if (!strncmp (xname, "_OBJC_", 6))                               \
426          fprintf (FILE, "L%s", xname);                                       \
427        else if (!strncmp (xname, ".objc_class_name_", 17))                   \
428          fprintf (FILE, "%s", xname);                                        \
429        else                                                                  \
430          fprintf (FILE, "_%s", xname);                                       \
431   } while (0)
432
433 /* Output before executable code.  */
434 #undef TEXT_SECTION_ASM_OP
435 #define TEXT_SECTION_ASM_OP ".text"
436
437 /* Output before writable data.  */
438
439 #undef DATA_SECTION_ASM_OP
440 #define DATA_SECTION_ASM_OP ".data"
441
442 #undef  ALIGN_ASM_OP
443 #define ALIGN_ASM_OP            ".align"
444
445 #undef  ASM_OUTPUT_ALIGN
446 #define ASM_OUTPUT_ALIGN(FILE,LOG)      \
447   if ((LOG) != 0)                       \
448     fprintf (FILE, "\t%s %d\n", ALIGN_ASM_OP, (LOG))
449
450 /* Ensure correct alignment of bss data.  */
451
452 #undef  ASM_OUTPUT_ALIGNED_DECL_LOCAL
453 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN)    \
454   do {                                                                  \
455     fputs (".lcomm ", (FILE));                                          \
456     assemble_name ((FILE), (NAME));                                     \
457     fprintf ((FILE), ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n", (SIZE),    \
458              floor_log2 ((ALIGN) / BITS_PER_UNIT));                     \
459     if ((DECL) && ((TREE_STATIC (DECL)                                  \
460          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
461         || DECL_INITIAL (DECL)))                                        \
462       (* targetm.encode_section_info) (DECL, DECL_RTL (DECL), false);   \
463     if ((DECL) && ((TREE_STATIC (DECL)                                  \
464          && (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL)))               \
465         || DECL_INITIAL (DECL)))                                        \
466       machopic_define_name (NAME);                                      \
467   } while (0)
468
469 /* The maximum alignment which the object file format can support.
470    For Mach-O, this is 2^15.  */
471
472 #undef  MAX_OFILE_ALIGNMENT
473 #define MAX_OFILE_ALIGNMENT 0x8000
474
475 /* Create new Mach-O sections.  */
476
477 #undef  SECTION_FUNCTION
478 #define SECTION_FUNCTION(FUNCTION, SECTION, DIRECTIVE, OBJC)            \
479 extern void FUNCTION PARAMS ((void));                                   \
480 void                                                                    \
481 FUNCTION ()                                                             \
482 {                                                                       \
483   if (in_section != SECTION)                                            \
484     {                                                                   \
485       if (OBJC)                                                         \
486         objc_section_init ();                                           \
487       data_section ();                                                  \
488       if (asm_out_file)                                                 \
489         fprintf (asm_out_file, "%s\n", DIRECTIVE);                      \
490       in_section = SECTION;                                             \
491     }                                                                   \
492 }                                                                       \
493
494 /* Darwin uses many types of special sections.  */
495
496 #undef  EXTRA_SECTIONS
497 #define EXTRA_SECTIONS                                  \
498   in_const, in_const_data, in_cstring, in_literal4, in_literal8,        \
499   in_constructor, in_destructor, in_mod_init, in_mod_term,              \
500   in_objc_class, in_objc_meta_class, in_objc_category,  \
501   in_objc_class_vars, in_objc_instance_vars,            \
502   in_objc_cls_meth, in_objc_inst_meth,                  \
503   in_objc_cat_cls_meth, in_objc_cat_inst_meth,          \
504   in_objc_selector_refs,                                \
505   in_objc_selector_fixup,                               \
506   in_objc_symbols, in_objc_module_info,                 \
507   in_objc_protocol, in_objc_string_object,              \
508   in_objc_constant_string_object,                       \
509   in_objc_class_names, in_objc_meth_var_names,          \
510   in_objc_meth_var_types, in_objc_cls_refs,             \
511   in_machopic_nl_symbol_ptr,                            \
512   in_machopic_lazy_symbol_ptr,                          \
513   in_machopic_symbol_stub,                              \
514   in_machopic_symbol_stub1,                             \
515   in_machopic_picsymbol_stub,                           \
516   in_machopic_picsymbol_stub1,                          \
517   in_darwin_exception, in_darwin_eh_frame,              \
518   num_sections
519
520 #undef  EXTRA_SECTION_FUNCTIONS
521 #define EXTRA_SECTION_FUNCTIONS                 \
522 static void objc_section_init PARAMS ((void));  \
523 SECTION_FUNCTION (const_section,                \
524                   in_const,                     \
525                   ".const", 0)                  \
526 SECTION_FUNCTION (const_data_section,           \
527                   in_const_data,                \
528                   ".const_data", 0)             \
529 SECTION_FUNCTION (cstring_section,              \
530                   in_cstring,                   \
531                   ".cstring", 0)                \
532 SECTION_FUNCTION (literal4_section,             \
533                   in_literal4,                  \
534                   ".literal4", 0)               \
535 SECTION_FUNCTION (literal8_section,             \
536                   in_literal8,                  \
537                   ".literal8", 0)               \
538 SECTION_FUNCTION (constructor_section,          \
539                   in_constructor,               \
540                   ".constructor", 0)            \
541 SECTION_FUNCTION (mod_init_section,             \
542                   in_mod_init,                  \
543                   ".mod_init_func", 0)  \
544 SECTION_FUNCTION (mod_term_section, \
545                   in_mod_term,                  \
546                   ".mod_term_func", 0)  \
547 SECTION_FUNCTION (destructor_section,           \
548                   in_destructor,                \
549                   ".destructor", 0)             \
550 SECTION_FUNCTION (objc_class_section,           \
551                   in_objc_class,                \
552                   ".objc_class", 1)             \
553 SECTION_FUNCTION (objc_meta_class_section,      \
554                   in_objc_meta_class,           \
555                   ".objc_meta_class", 1)        \
556 SECTION_FUNCTION (objc_category_section,        \
557                   in_objc_category,             \
558                 ".objc_category", 1)            \
559 SECTION_FUNCTION (objc_class_vars_section,      \
560                   in_objc_class_vars,           \
561                   ".objc_class_vars", 1)        \
562 SECTION_FUNCTION (objc_instance_vars_section,   \
563                   in_objc_instance_vars,        \
564                   ".objc_instance_vars", 1)     \
565 SECTION_FUNCTION (objc_cls_meth_section,        \
566                   in_objc_cls_meth,             \
567                   ".objc_cls_meth", 1)  \
568 SECTION_FUNCTION (objc_inst_meth_section,       \
569                   in_objc_inst_meth,            \
570                   ".objc_inst_meth", 1) \
571 SECTION_FUNCTION (objc_cat_cls_meth_section,    \
572                   in_objc_cat_cls_meth,         \
573                   ".objc_cat_cls_meth", 1)      \
574 SECTION_FUNCTION (objc_cat_inst_meth_section,   \
575                   in_objc_cat_inst_meth,        \
576                   ".objc_cat_inst_meth", 1)     \
577 SECTION_FUNCTION (objc_selector_refs_section,   \
578                   in_objc_selector_refs,        \
579                   ".objc_message_refs", 1)      \
580 SECTION_FUNCTION (objc_selector_fixup_section,  \
581                   in_objc_selector_fixup,       \
582                   ".section __OBJC, __sel_fixup", 1)    \
583 SECTION_FUNCTION (objc_symbols_section,         \
584                   in_objc_symbols,              \
585                   ".objc_symbols", 1)   \
586 SECTION_FUNCTION (objc_module_info_section,     \
587                   in_objc_module_info,          \
588                   ".objc_module_info", 1)       \
589 SECTION_FUNCTION (objc_protocol_section,        \
590                   in_objc_protocol,             \
591                   ".objc_protocol", 1)  \
592 SECTION_FUNCTION (objc_string_object_section,   \
593                   in_objc_string_object,        \
594                   ".objc_string_object", 1)     \
595 SECTION_FUNCTION (objc_constant_string_object_section,  \
596                   in_objc_constant_string_object,       \
597                   ".section __OBJC, __cstring_object", 1)       \
598 SECTION_FUNCTION (objc_class_names_section,     \
599                 in_objc_class_names,            \
600                 ".objc_class_names", 1) \
601 SECTION_FUNCTION (objc_meth_var_names_section,  \
602                 in_objc_meth_var_names,         \
603                 ".objc_meth_var_names", 1)      \
604 SECTION_FUNCTION (objc_meth_var_types_section,  \
605                 in_objc_meth_var_types,         \
606                 ".objc_meth_var_types", 1)      \
607 SECTION_FUNCTION (objc_cls_refs_section,        \
608                 in_objc_cls_refs,               \
609                 ".objc_cls_refs", 1)            \
610                                                 \
611 SECTION_FUNCTION (machopic_lazy_symbol_ptr_section,     \
612                 in_machopic_lazy_symbol_ptr,            \
613                 ".lazy_symbol_pointer", 0)              \
614 SECTION_FUNCTION (machopic_nl_symbol_ptr_section,       \
615                 in_machopic_nl_symbol_ptr,              \
616                 ".non_lazy_symbol_pointer", 0)          \
617 SECTION_FUNCTION (machopic_symbol_stub_section,         \
618                 in_machopic_symbol_stub,                \
619                 ".symbol_stub", 0)                      \
620 SECTION_FUNCTION (machopic_symbol_stub1_section,        \
621                 in_machopic_symbol_stub1,               \
622                 ".section __TEXT,__symbol_stub1,symbol_stubs,pure_instructions,16", 0)\
623 SECTION_FUNCTION (machopic_picsymbol_stub_section,      \
624                 in_machopic_picsymbol_stub,             \
625                 ".picsymbol_stub", 0)                   \
626 SECTION_FUNCTION (machopic_picsymbol_stub1_section,     \
627                 in_machopic_picsymbol_stub1,            \
628                 ".section __TEXT,__picsymbolstub1,symbol_stubs,pure_instructions,32", 0)\
629 SECTION_FUNCTION (darwin_exception_section,             \
630                 in_darwin_exception,                    \
631                 ".section __DATA,__gcc_except_tab", 0)  \
632 SECTION_FUNCTION (darwin_eh_frame_section,              \
633                 in_darwin_eh_frame,                     \
634                 ".section __TEXT,__eh_frame", 0)        \
635                                                         \
636 static void                                     \
637 objc_section_init ()                            \
638 {                                               \
639   static int been_here = 0;                     \
640                                                 \
641   if (been_here == 0)                           \
642     {                                           \
643       been_here = 1;                            \
644           /* written, cold -> hot */            \
645       objc_cat_cls_meth_section ();             \
646       objc_cat_inst_meth_section ();            \
647       objc_string_object_section ();            \
648       objc_constant_string_object_section ();   \
649       objc_selector_refs_section ();            \
650       objc_selector_fixup_section ();           \
651       objc_cls_refs_section ();                 \
652       objc_class_section ();                    \
653       objc_meta_class_section ();               \
654           /* shared, hot -> cold */             \
655       objc_cls_meth_section ();                 \
656       objc_inst_meth_section ();                \
657       objc_protocol_section ();                 \
658       objc_class_names_section ();              \
659       objc_meth_var_types_section ();           \
660       objc_meth_var_names_section ();           \
661       objc_category_section ();                 \
662       objc_class_vars_section ();               \
663       objc_instance_vars_section ();            \
664       objc_module_info_section ();              \
665       objc_symbols_section ();                  \
666     }                                           \
667 }
668
669 #define READONLY_DATA_SECTION const_section
670
671 #undef  TARGET_ASM_SELECT_SECTION
672 #define TARGET_ASM_SELECT_SECTION machopic_select_section
673 #undef  TARGET_ASM_SELECT_RTX_SECTION
674 #define TARGET_ASM_SELECT_RTX_SECTION machopic_select_rtx_section
675
676 #define ASM_DECLARE_UNRESOLVED_REFERENCE(FILE,NAME)                     \
677     do {                                                                \
678          if (FILE) {                                                    \
679            if (MACHOPIC_INDIRECT)                                       \
680              fprintf (FILE, "\t.lazy_reference ");                      \
681            else                                                         \
682              fprintf (FILE, "\t.reference ");                           \
683            assemble_name (FILE, NAME);                                  \
684            fprintf (FILE, "\n");                                        \
685          }                                                              \
686        } while (0)
687
688 #define ASM_DECLARE_CLASS_REFERENCE(FILE,NAME)                          \
689     do {                                                                \
690          if (FILE) {                                                    \
691            fprintf (FILE, "\t");                                        \
692            assemble_name (FILE, NAME);                                  \
693            fprintf (FILE, "=0\n");                                      \
694            (*targetm.asm_out.globalize_label) (FILE, NAME);             \
695          }                                                              \
696        } while (0)
697
698 /* Globalizing directive for a label.  */
699 #define GLOBAL_ASM_OP ".globl "
700 #define TARGET_ASM_GLOBALIZE_LABEL darwin_globalize_label
701
702 #undef ASM_GENERATE_INTERNAL_LABEL
703 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)   \
704   sprintf (LABEL, "*%s%ld", PREFIX, (long)(NUM))
705
706 /* Since we have a separate readonly data section, define this so that
707    jump tables end up in text rather than data.  */
708
709 #ifndef JUMP_TABLES_IN_TEXT_SECTION
710 #define JUMP_TABLES_IN_TEXT_SECTION 1
711 #endif
712
713 /* Symbolic names for various things we might know about a symbol.  */
714
715 enum machopic_addr_class {
716   MACHOPIC_UNDEFINED,
717   MACHOPIC_DEFINED_DATA,
718   MACHOPIC_UNDEFINED_DATA,
719   MACHOPIC_DEFINED_FUNCTION,
720   MACHOPIC_UNDEFINED_FUNCTION
721 };
722
723 /* Macros defining the various PIC cases.  */
724
725 #define MACHO_DYNAMIC_NO_PIC_P  (TARGET_DYNAMIC_NO_PIC)
726 #define MACHOPIC_INDIRECT       (flag_pic || MACHO_DYNAMIC_NO_PIC_P)
727 #define MACHOPIC_JUST_INDIRECT  (flag_pic == 1 || MACHO_DYNAMIC_NO_PIC_P)
728 #define MACHOPIC_PURE           (flag_pic == 2 && ! MACHO_DYNAMIC_NO_PIC_P)
729
730 #undef TARGET_ENCODE_SECTION_INFO
731 #define TARGET_ENCODE_SECTION_INFO  darwin_encode_section_info
732 #undef TARGET_STRIP_NAME_ENCODING
733 #define TARGET_STRIP_NAME_ENCODING  darwin_strip_name_encoding
734
735 #define GEN_BINDER_NAME_FOR_STUB(BUF,STUB,STUB_LENGTH)          \
736   do {                                                          \
737     const char *const stub_ = (STUB);                           \
738     char *buffer_ = (BUF);                                      \
739     strcpy (buffer_, stub_);                                    \
740     if (stub_[0] == '"')                                        \
741       {                                                         \
742         strcpy (buffer_ + (STUB_LENGTH) - 1, "_binder\"");      \
743       }                                                         \
744     else                                                        \
745       {                                                         \
746         strcpy (buffer_ + (STUB_LENGTH), "_binder");            \
747       }                                                         \
748   } while (0)
749
750 #define GEN_SYMBOL_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)    \
751   do {                                                          \
752     const char *const symbol_ = (SYMBOL);                       \
753     char *buffer_ = (BUF);                                      \
754     if (name_needs_quotes (symbol_) && symbol_[0] != '"')       \
755       {                                                         \
756           sprintf (buffer_, "\"%s\"", symbol_);                 \
757       }                                                         \
758     else                                                        \
759       {                                                         \
760         strcpy (buffer_, symbol_);                              \
761       }                                                         \
762   } while (0)
763
764 /* Given a symbol name string, create the lazy pointer version
765    of the symbol name.  */
766
767 #define GEN_LAZY_PTR_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH)  \
768   do {                                                          \
769     const char *symbol_ = darwin_strip_name_encoding (SYMBOL);  \
770     char *buffer_ = (BUF);                                      \
771     if (symbol_[0] == '"')                                      \
772       {                                                         \
773         strcpy (buffer_, "\"L");                                \
774         strcpy (buffer_ + 2, symbol_ + 1);                      \
775         strcpy (buffer_ + (SYMBOL_LENGTH), "$lazy_ptr\"");      \
776       }                                                         \
777     else if (name_needs_quotes (symbol_))                       \
778       {                                                         \
779         strcpy (buffer_, "\"L");                                \
780         strcpy (buffer_ + 2, symbol_);                          \
781         strcpy (buffer_ + (SYMBOL_LENGTH) + 2, "$lazy_ptr\"");  \
782       }                                                         \
783     else                                                        \
784       {                                                         \
785         strcpy (buffer_, "L");                                  \
786         strcpy (buffer_ + 1, symbol_);                          \
787         strcpy (buffer_ + (SYMBOL_LENGTH) + 1, "$lazy_ptr");    \
788       }                                                         \
789   } while (0)
790
791 #define TARGET_ASM_EXCEPTION_SECTION darwin_exception_section
792
793 #define TARGET_ASM_EH_FRAME_SECTION darwin_eh_frame_section
794   
795 #undef ASM_PREFERRED_EH_DATA_FORMAT
796 #define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL)  \
797   (((CODE) == 2 && (GLOBAL) == 1) \
798    ? (DW_EH_PE_pcrel | DW_EH_PE_indirect) : \
799      ((CODE) == 1 || (GLOBAL) == 0) ? DW_EH_PE_pcrel : DW_EH_PE_absptr)
800
801 #define ASM_OUTPUT_DWARF_DELTA(FILE,SIZE,LABEL1,LABEL2)  \
802   darwin_asm_output_dwarf_delta (FILE, SIZE, LABEL1, LABEL2)
803
804 #define TARGET_TERMINATE_DW2_EH_FRAME_INFO false
805
806 #define DARWIN_REGISTER_TARGET_PRAGMAS()                        \
807   do {                                                          \
808     c_register_pragma (0, "mark", darwin_pragma_ignore);        \
809     c_register_pragma (0, "options", darwin_pragma_options);    \
810     c_register_pragma (0, "segment", darwin_pragma_ignore);     \
811     c_register_pragma (0, "unused", darwin_pragma_unused);      \
812   } while (0)
813
814 #undef ASM_APP_ON
815 #define ASM_APP_ON ""
816 #undef ASM_APP_OFF
817 #define ASM_APP_OFF ""