815 lines
30 KiB
C
815 lines
30 KiB
C
/* Target definitions for Darwin (Mac OS X) systems.
|
|
Copyright (C) 1989, 1990, 1991, 1992, 1993, 2000, 2001, 2002
|
|
Free Software Foundation, Inc.
|
|
Contributed by Apple Computer Inc.
|
|
|
|
This file is part of GNU CC.
|
|
|
|
GNU CC is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
GNU CC is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GNU CC; see the file COPYING. If not, write to
|
|
the Free Software Foundation, 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
/* The definitions in this file are common to all processor types
|
|
running Darwin, which is the kernel for Mac OS X. Darwin is
|
|
basically a BSD user layer laid over a Mach kernel, then evolved
|
|
for many years (at NeXT) in parallel with other Unix systems. So
|
|
while the runtime is a somewhat idiosyncratic Mach-based thing,
|
|
other definitions look like they would for a BSD variant. */
|
|
|
|
/* Although NeXT ran on many different architectures, as of Jan 2001
|
|
the only supported Darwin targets are PowerPC and x86. */
|
|
|
|
/* Technically, STANDARD_EXEC_PREFIX should be /usr/libexec/, but in
|
|
practice this makes it hard to install new compilers elsewhere, so
|
|
leave it undefined and expect system builders to set configure args
|
|
correctly. */
|
|
|
|
/* One of Darwin's NeXT legacies is the Mach-O format, which is partly
|
|
like a.out and partly like COFF, with additional features like
|
|
multi-architecture binary support. */
|
|
|
|
#define OBJECT_FORMAT_MACHO
|
|
|
|
/* Suppress g++ attempt to link in the math library automatically.
|
|
(Some Darwin versions have a libm, but they seem to cause problems
|
|
for C++ executables.) */
|
|
|
|
#define MATH_LIBRARY ""
|
|
|
|
/* We have atexit. */
|
|
|
|
#define HAVE_ATEXIT
|
|
|
|
/* Define an empty body for the function do_global_dtors() in libgcc2.c. */
|
|
|
|
#define DO_GLOBAL_DTORS_BODY
|
|
|
|
/* The string value for __SIZE_TYPE__. */
|
|
|
|
#ifndef SIZE_TYPE
|
|
#define SIZE_TYPE "long unsigned int"
|
|
#endif
|
|
|
|
/* Type used for ptrdiff_t, as a string used in a declaration. */
|
|
|
|
#undef PTRDIFF_TYPE
|
|
#define PTRDIFF_TYPE "int"
|
|
|
|
/* wchar_t is int. */
|
|
|
|
#undef WCHAR_TYPE
|
|
#define WCHAR_TYPE "int"
|
|
#undef WCHAR_TYPE_SIZE
|
|
#define WCHAR_TYPE_SIZE 32
|
|
|
|
/* Default to using the NeXT-style runtime, since that's what is
|
|
pre-installed on Darwin systems. */
|
|
|
|
#define NEXT_OBJC_RUNTIME
|
|
|
|
/* Don't default to pcc-struct-return, because gcc is the only compiler, and
|
|
we want to retain compatibility with older gcc versions. */
|
|
|
|
#undef DEFAULT_PCC_STRUCT_RETURN
|
|
#define DEFAULT_PCC_STRUCT_RETURN 0
|
|
|
|
/* This table intercepts weirdo options whose names would interfere
|
|
with normal driver conventions, and either translates them into
|
|
standardly-named options, or adds a 'Z' so that they can get to
|
|
specs processing without interference.
|
|
|
|
Do not expand a linker option to "-Xlinker -<option>", since that
|
|
forfeits the ability to control via spec strings later. However,
|
|
as a special exception, do this translation with -filelist, because
|
|
otherwise the driver will think there are no input files and quit.
|
|
(The alternative would be to hack the driver to recognize -filelist
|
|
specially, but it's simpler to use the translation table.)
|
|
|
|
Note that an option name with a prefix that matches another option
|
|
name, that also takes an argument, needs to be modified so the
|
|
prefix is different, otherwise a '*' after the shorter option will
|
|
match with the longer one. */
|
|
#define TARGET_OPTION_TRANSLATE_TABLE \
|
|
{ "-all_load", "-Zall_load" }, \
|
|
{ "-allowable_client", "-Zallowable_client" }, \
|
|
{ "-arch_errors_fatal", "-Zarch_errors_fatal" }, \
|
|
{ "-bind_at_load", "-Zbind_at_load" }, \
|
|
{ "-bundle", "-Zbundle" }, \
|
|
{ "-bundle_loader", "-Zbundle_loader" }, \
|
|
{ "-weak_reference_mismatches", "-Zweak_reference_mismatches" }, \
|
|
{ "-dependency-file", "-MF" }, \
|
|
{ "-dylib_file", "-Zdylib_file" }, \
|
|
{ "-dynamic", "-Zdynamic" }, \
|
|
{ "-dynamiclib", "-Zdynamiclib" }, \
|
|
{ "-exported_symbols_list", "-Zexported_symbols_list" }, \
|
|
{ "-seg_addr_table_filename", "-Zseg_addr_table_filename" }, \
|
|
{ "-filelist", "-Xlinker -filelist -Xlinker" }, \
|
|
{ "-flat_namespace", "-Zflat_namespace" }, \
|
|
{ "-force_cpusubtype_ALL", "-Zforce_cpusubtype_ALL" }, \
|
|
{ "-force_flat_namespace", "-Zforce_flat_namespace" }, \
|
|
{ "-image_base", "-Zimage_base" }, \
|
|
{ "-init", "-Zinit" }, \
|
|
{ "-install_name", "-Zinstall_name" }, \
|
|
{ "-multiply_defined_unused", "-Zmultiplydefinedunused" }, \
|
|
{ "-multiply_defined", "-Zmultiply_defined" }, \
|
|
{ "-multi_module", "-Zmulti_module" }, \
|
|
{ "-static", "-static -Wa,-static" }, \
|
|
{ "-single_module", "-Zsingle_module" }, \
|
|
{ "-unexported_symbols_list", "-Zunexported_symbols_list" }
|
|
|
|
/* These compiler options take n arguments. */
|
|
|
|
#undef WORD_SWITCH_TAKES_ARG
|
|
#define WORD_SWITCH_TAKES_ARG(STR) \
|
|
(DEFAULT_WORD_SWITCH_TAKES_ARG (STR) ? 1 : \
|
|
!strcmp (STR, "Zallowable_client") ? 1 : \
|
|
!strcmp (STR, "arch") ? 1 : \
|
|
!strcmp (STR, "arch_only") ? 1 : \
|
|
!strcmp (STR, "Zbundle_loader") ? 1 : \
|
|
!strcmp (STR, "client_name") ? 1 : \
|
|
!strcmp (STR, "compatibility_version") ? 1 : \
|
|
!strcmp (STR, "current_version") ? 1 : \
|
|
!strcmp (STR, "Zdylib_file") ? 1 : \
|
|
!strcmp (STR, "Zexported_symbols_list") ? 1 : \
|
|
!strcmp (STR, "Zimage_base") ? 1 : \
|
|
!strcmp (STR, "Zinit") ? 1 : \
|
|
!strcmp (STR, "Zinstall_name") ? 1 : \
|
|
!strcmp (STR, "Zmultiplydefinedunused") ? 1 : \
|
|
!strcmp (STR, "Zmultiply_defined") ? 1 : \
|
|
!strcmp (STR, "precomp-trustfile") ? 1 : \
|
|
!strcmp (STR, "read_only_relocs") ? 1 : \
|
|
!strcmp (STR, "sectcreate") ? 3 : \
|
|
!strcmp (STR, "sectorder") ? 3 : \
|
|
!strcmp (STR, "Zseg_addr_table_filename") ?1 :\
|
|
!strcmp (STR, "seg1addr") ? 1 : \
|
|
!strcmp (STR, "segprot") ? 3 : \
|
|
!strcmp (STR, "seg_addr_table") ? 1 : \
|
|
!strcmp (STR, "sub_library") ? 1 : \
|
|
!strcmp (STR, "sub_umbrella") ? 1 : \
|
|
!strcmp (STR, "umbrella") ? 1 : \
|
|
!strcmp (STR, "undefined") ? 1 : \
|
|
!strcmp (STR, "Zunexported_symbols_list") ? 1 : \
|
|
!strcmp (STR, "Zweak_reference_mismatches") ? 1 : \
|
|
!strcmp (STR, "pagezero_size") ? 1 : \
|
|
!strcmp (STR, "segs_read_only_addr") ? 1 : \
|
|
!strcmp (STR, "segs_read_write_addr") ? 1 : \
|
|
!strcmp (STR, "sectalign") ? 3 : \
|
|
!strcmp (STR, "sectobjectsymbols") ? 2 : \
|
|
!strcmp (STR, "segcreate") ? 3 : \
|
|
!strcmp (STR, "dylinker_install_name") ? 1 : \
|
|
0)
|
|
|
|
/* Machine dependent cpp options. */
|
|
|
|
#undef CPP_SPEC
|
|
#define CPP_SPEC "%{static:%{!dynamic:-D__STATIC__}}%{!static:-D__DYNAMIC__}"
|
|
|
|
/* This is mostly a clone of the standard LINK_COMMAND_SPEC, plus
|
|
precomp, libtool, and fat build additions. Also we
|
|
don't specify a second %G after %L because libSystem is
|
|
self-contained and doesn't need to link against libgcc.a. */
|
|
/* In general, random Darwin linker flags should go into LINK_SPEC
|
|
instead of LINK_COMMAND_SPEC. The command spec is better for
|
|
specifying the handling of options understood by generic Unix
|
|
linkers, and for positional arguments like libraries. */
|
|
#define LINK_COMMAND_SPEC "\
|
|
%{!fdump=*:%{!fsyntax-only:%{!precomp:%{!c:%{!M:%{!MM:%{!E:%{!S:\
|
|
%{!Zdynamiclib:%(linker)}%{Zdynamiclib:/usr/bin/libtool} \
|
|
%l %X %{d} %{s} %{t} %{Z} \
|
|
%{!Zdynamiclib:%{A} %{e*} %{m} %{N} %{n} %{r} %{u*} %{x} %{z}} \
|
|
%{@:-o %f%u.out}%{!@:%{o*}%{!o:-o a.out}} \
|
|
%{!Zdynamiclib:%{!A:%{!nostdlib:%{!nostartfiles:%S}}}} \
|
|
%{L*} %(link_libgcc) %o %{!nostdlib:%{!nodefaultlibs:%G %L}} \
|
|
%{!A:%{!nostdlib:%{!nostartfiles:%E}}} %{T*} %{F*} \
|
|
%{!--help:%{!no-c++filt|c++filt:| c++filt3 }} }}}}}}}}"
|
|
|
|
/* Please keep the random linker options in alphabetical order (modulo
|
|
'Z' and 'no' prefixes). Options that can only go to one of libtool
|
|
or ld must be listed twice, under both !Zdynamiclib and
|
|
Zdynamiclib, with one of the cases reporting an error. */
|
|
/* Note that options taking arguments may appear multiple times on a
|
|
command line with different arguments each time, so put a * after
|
|
their names so all of them get passed. */
|
|
#define LINK_SPEC \
|
|
"%{static}%{!static:-dynamic} \
|
|
%{!Zdynamiclib: \
|
|
%{Zbundle:-bundle} \
|
|
%{Zbundle_loader*:-bundle_loader %*} \
|
|
%{client_name*} \
|
|
%{compatibility_version*:%e-compatibility_version only allowed with -dynamiclib\
|
|
} \
|
|
%{current_version*:%e-current_version only allowed with -dynamiclib} \
|
|
%{Zforce_cpusubtype_ALL:-force_cpusubtype_ALL} \
|
|
%{Zforce_flat_namespace:-force_flat_namespace} \
|
|
%{Zinstall_name*:%e-install_name only allowed with -dynamiclib} \
|
|
%{keep_private_externs} \
|
|
%{private_bundle} \
|
|
} \
|
|
%{Zdynamiclib: \
|
|
%{Zbundle:%e-bundle not allowed with -dynamiclib} \
|
|
%{Zbundle_loader*:%e-bundle_loader not allowed with -dynamiclib} \
|
|
%{client_name*:%e-client_name not allowed with -dynamiclib} \
|
|
%{compatibility_version*} \
|
|
%{current_version*} \
|
|
%{Zforce_cpusubtype_ALL:%e-force_cpusubtype_ALL not allowed with -dynamiclib} \
|
|
%{Zforce_flat_namespace:%e-force_flat_namespace not allowed with -dynamiclib} \
|
|
%{Zinstall_name*:-install_name %*} \
|
|
%{keep_private_externs:%e-keep_private_externs not allowed with -dynamiclib} \
|
|
%{private_bundle:%e-private_bundle not allowed with -dynamiclib} \
|
|
} \
|
|
%{Zall_load:-all_load}%{Zdynamiclib:%{!Zall_load:-noall_load}} \
|
|
%{Zallowable_client*:-allowable_client %*} \
|
|
%{Zbind_at_load:-bind_at_load} \
|
|
%{Zarch_errors_fatal:-arch_errors_fatal} \
|
|
%{Zdylib_file*:-dylib_file %*} \
|
|
%{Zdynamic:-dynamic}\
|
|
%{Zexported_symbols_list*:-exported_symbols_list %*} \
|
|
%{Zflat_namespace:-flat_namespace} \
|
|
%{headerpad_max_install_names*} \
|
|
%{Zimage_base*:-image_base %*} \
|
|
%{Zinit*:-init %*} \
|
|
%{nomultidefs} \
|
|
%{Zmulti_module:-multi_module} %{Zsingle_module:-single_module} \
|
|
%{Zmultiply_defined*:-multiply_defined %*} \
|
|
%{Zmultiplydefinedunused*:-multiply_defined_unused %*} \
|
|
%{prebind} %{noprebind} %{prebind_all_twolevel_modules} \
|
|
%{read_only_relocs} \
|
|
%{sectcreate*} %{sectorder*} %{seg1addr*} %{segprot*} %{seg_addr_table*} \
|
|
%{Zseg_addr_table_filename*:-seg_addr_table_filename %*} \
|
|
%{sub_library*} %{sub_umbrella*} \
|
|
%{twolevel_namespace} %{twolevel_namespace_hints} \
|
|
%{umbrella*} \
|
|
%{undefined*} \
|
|
%{Zunexported_symbols_list*:-unexported_symbols_list %*} \
|
|
%{Zweak_reference_mismatches*:-weak_reference_mismatches %*} \
|
|
%{X} \
|
|
%{y*} \
|
|
%{w} \
|
|
%{pagezero_size*} %{segs_read_*} %{seglinkedit} %{noseglinkedit} \
|
|
%{sectalign*} %{sectobjectsymbols*} %{segcreate*} %{whyload} \
|
|
%{whatsloaded} %{dylinker_install_name*} \
|
|
%{dylinker} %{Mach} "
|
|
|
|
|
|
/* Machine dependent libraries. */
|
|
|
|
#undef LIB_SPEC
|
|
#define LIB_SPEC "%{!static:-lSystem}"
|
|
|
|
/* We specify crt0.o as -lcrt0.o so that ld will search the library path. */
|
|
|
|
#undef STARTFILE_SPEC
|
|
#define STARTFILE_SPEC \
|
|
"%{!Zdynamiclib:%{Zbundle:%{!static:-lbundle1.o}} \
|
|
%{!Zbundle:%{pg:%{static:-lgcrt0.o} \
|
|
%{!static:%{object:-lgcrt0.o} \
|
|
%{!object:%{preload:-lgcrt0.o} \
|
|
%{!preload:-lgcrt1.o -lcrt2.o}}}} \
|
|
%{!pg:%{static:-lcrt0.o} \
|
|
%{!static:%{object:-lcrt0.o} \
|
|
%{!object:%{preload:-lcrt0.o} \
|
|
%{!preload:-lcrt1.o -lcrt2.o}}}}}}"
|
|
|
|
/* The native Darwin linker doesn't necessarily place files in the order
|
|
that they're specified on the link line. Thus, it is pointless
|
|
to put anything in ENDFILE_SPEC. */
|
|
/* #define ENDFILE_SPEC "" */
|
|
|
|
#undef DOLLARS_IN_IDENTIFIERS
|
|
#define DOLLARS_IN_IDENTIFIERS 2
|
|
|
|
/* We use Dbx symbol format. */
|
|
|
|
#define DBX_DEBUGGING_INFO 1
|
|
|
|
/* When generating stabs debugging, use N_BINCL entries. */
|
|
|
|
#define DBX_USE_BINCL
|
|
|
|
/* There is no limit to the length of stabs strings. */
|
|
|
|
#define DBX_CONTIN_LENGTH 0
|
|
|
|
/* gdb needs a null N_SO at the end of each file for scattered loading. */
|
|
|
|
#undef DBX_OUTPUT_MAIN_SOURCE_FILE_END
|
|
#define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME) \
|
|
do { text_section (); \
|
|
fprintf (FILE, \
|
|
"\t.stabs \"%s\",%d,0,0,Letext\nLetext:\n", "" , N_SO); \
|
|
} while (0)
|
|
|
|
/* Our profiling scheme doesn't LP labels and counter words. */
|
|
|
|
#define NO_PROFILE_COUNTERS
|
|
|
|
#undef INIT_SECTION_ASM_OP
|
|
#define INIT_SECTION_ASM_OP
|
|
|
|
#undef INVOKE__main
|
|
|
|
#define TARGET_ASM_CONSTRUCTOR machopic_asm_out_constructor
|
|
#define TARGET_ASM_DESTRUCTOR machopic_asm_out_destructor
|
|
|
|
/* Always prefix with an underscore. */
|
|
|
|
#define USER_LABEL_PREFIX "_"
|
|
|
|
/* Don't output a .file directive. That is only used by the assembler for
|
|
error reporting. */
|
|
|
|
#undef ASM_FILE_START
|
|
#define ASM_FILE_START(FILE)
|
|
|
|
#undef ASM_FILE_END
|
|
#define ASM_FILE_END(FILE) \
|
|
do { \
|
|
machopic_finish (asm_out_file); \
|
|
if (strcmp (lang_hooks.name, "GNU C++") == 0) \
|
|
{ \
|
|
constructor_section (); \
|
|
destructor_section (); \
|
|
ASM_OUTPUT_ALIGN (FILE, 1); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define ASM_OUTPUT_SKIP(FILE,SIZE) \
|
|
fprintf (FILE, "\t.space %d\n", SIZE)
|
|
|
|
/* Give ObjC methods pretty symbol names. */
|
|
|
|
#undef OBJC_GEN_METHOD_LABEL
|
|
#define OBJC_GEN_METHOD_LABEL(BUF,IS_INST,CLASS_NAME,CAT_NAME,SEL_NAME,NUM) \
|
|
do { if (CAT_NAME) \
|
|
sprintf (BUF, "%c[%s(%s) %s]", (IS_INST) ? '-' : '+', \
|
|
(CLASS_NAME), (CAT_NAME), (SEL_NAME)); \
|
|
else \
|
|
sprintf (BUF, "%c[%s %s]", (IS_INST) ? '-' : '+', \
|
|
(CLASS_NAME), (SEL_NAME)); \
|
|
} while (0)
|
|
|
|
/* The RTTI data (e.g., __ti4name) is common and public (and static),
|
|
but it does need to be referenced via indirect PIC data pointers.
|
|
The machopic_define_name calls are telling the machopic subsystem
|
|
that the name *is* defined in this module, so it doesn't need to
|
|
make them indirect. */
|
|
|
|
#undef ASM_DECLARE_OBJECT_NAME
|
|
#define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
|
|
do { \
|
|
const char *xname = NAME; \
|
|
if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF) \
|
|
xname = IDENTIFIER_POINTER (DECL_NAME (DECL)); \
|
|
if ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL)) \
|
|
machopic_define_name (xname); \
|
|
if ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL)) \
|
|
(* targetm.encode_section_info) (DECL, false); \
|
|
ASM_OUTPUT_LABEL (FILE, xname); \
|
|
} while (0)
|
|
|
|
#define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
|
|
do { \
|
|
const char *xname = NAME; \
|
|
if (GET_CODE (XEXP (DECL_RTL (DECL), 0)) != SYMBOL_REF) \
|
|
xname = IDENTIFIER_POINTER (DECL_NAME (DECL)); \
|
|
if ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL)) \
|
|
machopic_define_name (xname); \
|
|
if ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL)) \
|
|
(* targetm.encode_section_info) (DECL, false); \
|
|
ASM_OUTPUT_LABEL (FILE, xname); \
|
|
/* Avoid generating stubs for functions we've just defined by \
|
|
outputting any required stub name label now. */ \
|
|
machopic_output_possible_stub_label (FILE, xname); \
|
|
} while (0)
|
|
|
|
/* Wrap new method names in quotes so the assembler doesn't gag.
|
|
Make Objective-C internal symbols local. */
|
|
|
|
#undef ASM_OUTPUT_LABELREF
|
|
#define ASM_OUTPUT_LABELREF(FILE,NAME) \
|
|
do { \
|
|
const char *xname = darwin_strip_name_encoding (NAME); \
|
|
if (xname[0] == '&' || xname[0] == '*') \
|
|
{ \
|
|
int len = strlen (xname); \
|
|
if (len > 6 && !strcmp ("$stub", xname + len - 5)) \
|
|
machopic_validate_stub_or_non_lazy_ptr (xname, 1); \
|
|
else if (len > 7 && !strcmp ("$stub\"", xname + len - 6)) \
|
|
machopic_validate_stub_or_non_lazy_ptr (xname, 1); \
|
|
else if (len > 14 && !strcmp ("$non_lazy_ptr", xname + len - 13)) \
|
|
machopic_validate_stub_or_non_lazy_ptr (xname, 0); \
|
|
fputs (&xname[1], FILE); \
|
|
} \
|
|
else if (xname[0] == '+' || xname[0] == '-') \
|
|
fprintf (FILE, "\"%s\"", xname); \
|
|
else if (!strncmp (xname, "_OBJC_", 6)) \
|
|
fprintf (FILE, "L%s", xname); \
|
|
else if (!strncmp (xname, ".objc_class_name_", 17)) \
|
|
fprintf (FILE, "%s", xname); \
|
|
else \
|
|
fprintf (FILE, "_%s", xname); \
|
|
} while (0)
|
|
|
|
/* Output before executable code. */
|
|
#undef TEXT_SECTION_ASM_OP
|
|
#define TEXT_SECTION_ASM_OP ".text"
|
|
|
|
/* Output before writable data. */
|
|
|
|
#undef DATA_SECTION_ASM_OP
|
|
#define DATA_SECTION_ASM_OP ".data"
|
|
|
|
#undef ALIGN_ASM_OP
|
|
#define ALIGN_ASM_OP ".align"
|
|
|
|
#undef ASM_OUTPUT_ALIGN
|
|
#define ASM_OUTPUT_ALIGN(FILE,LOG) \
|
|
if ((LOG) != 0) \
|
|
fprintf (FILE, "\t%s %d\n", ALIGN_ASM_OP, (LOG))
|
|
|
|
/* Ensure correct alignment of bss data. */
|
|
|
|
#undef ASM_OUTPUT_ALIGNED_DECL_LOCAL
|
|
#define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN) \
|
|
do { \
|
|
fputs (".lcomm ", (FILE)); \
|
|
assemble_name ((FILE), (NAME)); \
|
|
fprintf ((FILE), ",%u,%u\n", (SIZE), \
|
|
floor_log2 ((ALIGN) / BITS_PER_UNIT)); \
|
|
if ((DECL) && ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL))) \
|
|
(* targetm.encode_section_info) (DECL, false); \
|
|
if ((DECL) && ((TREE_STATIC (DECL) \
|
|
&& (!DECL_COMMON (DECL) || !TREE_PUBLIC (DECL))) \
|
|
|| DECL_INITIAL (DECL))) \
|
|
machopic_define_name (NAME); \
|
|
} while (0)
|
|
|
|
/* The maximum alignment which the object file format can support.
|
|
For Mach-O, this is 2^15. */
|
|
|
|
#undef MAX_OFILE_ALIGNMENT
|
|
#define MAX_OFILE_ALIGNMENT 0x8000
|
|
|
|
/* Create new Mach-O sections. */
|
|
|
|
#undef SECTION_FUNCTION
|
|
#define SECTION_FUNCTION(FUNCTION, SECTION, DIRECTIVE, OBJC) \
|
|
extern void FUNCTION PARAMS ((void)); \
|
|
void \
|
|
FUNCTION () \
|
|
{ \
|
|
if (in_section != SECTION) \
|
|
{ \
|
|
if (OBJC) \
|
|
objc_section_init (); \
|
|
data_section (); \
|
|
if (asm_out_file) \
|
|
fprintf (asm_out_file, "%s\n", DIRECTIVE); \
|
|
in_section = SECTION; \
|
|
} \
|
|
} \
|
|
|
|
/* Darwin uses many types of special sections. */
|
|
|
|
#undef EXTRA_SECTIONS
|
|
#define EXTRA_SECTIONS \
|
|
in_const, in_const_data, in_cstring, in_literal4, in_literal8, \
|
|
in_constructor, in_destructor, in_mod_init, in_mod_term, \
|
|
in_objc_class, in_objc_meta_class, in_objc_category, \
|
|
in_objc_class_vars, in_objc_instance_vars, \
|
|
in_objc_cls_meth, in_objc_inst_meth, \
|
|
in_objc_cat_cls_meth, in_objc_cat_inst_meth, \
|
|
in_objc_selector_refs, \
|
|
in_objc_selector_fixup, \
|
|
in_objc_symbols, in_objc_module_info, \
|
|
in_objc_protocol, in_objc_string_object, \
|
|
in_objc_constant_string_object, \
|
|
in_objc_class_names, in_objc_meth_var_names, \
|
|
in_objc_meth_var_types, in_objc_cls_refs, \
|
|
in_machopic_nl_symbol_ptr, \
|
|
in_machopic_lazy_symbol_ptr, \
|
|
in_machopic_symbol_stub, \
|
|
in_machopic_picsymbol_stub, \
|
|
in_darwin_exception, in_darwin_eh_frame, \
|
|
num_sections
|
|
|
|
#undef EXTRA_SECTION_FUNCTIONS
|
|
#define EXTRA_SECTION_FUNCTIONS \
|
|
static void objc_section_init PARAMS ((void)); \
|
|
SECTION_FUNCTION (const_section, \
|
|
in_const, \
|
|
".const", 0) \
|
|
SECTION_FUNCTION (const_data_section, \
|
|
in_const_data, \
|
|
".const_data", 0) \
|
|
SECTION_FUNCTION (cstring_section, \
|
|
in_cstring, \
|
|
".cstring", 0) \
|
|
SECTION_FUNCTION (literal4_section, \
|
|
in_literal4, \
|
|
".literal4", 0) \
|
|
SECTION_FUNCTION (literal8_section, \
|
|
in_literal8, \
|
|
".literal8", 0) \
|
|
SECTION_FUNCTION (constructor_section, \
|
|
in_constructor, \
|
|
".constructor", 0) \
|
|
SECTION_FUNCTION (mod_init_section, \
|
|
in_mod_init, \
|
|
".mod_init_func", 0) \
|
|
SECTION_FUNCTION (mod_term_section, \
|
|
in_mod_term, \
|
|
".mod_term_func", 0) \
|
|
SECTION_FUNCTION (destructor_section, \
|
|
in_destructor, \
|
|
".destructor", 0) \
|
|
SECTION_FUNCTION (objc_class_section, \
|
|
in_objc_class, \
|
|
".objc_class", 1) \
|
|
SECTION_FUNCTION (objc_meta_class_section, \
|
|
in_objc_meta_class, \
|
|
".objc_meta_class", 1) \
|
|
SECTION_FUNCTION (objc_category_section, \
|
|
in_objc_category, \
|
|
".objc_category", 1) \
|
|
SECTION_FUNCTION (objc_class_vars_section, \
|
|
in_objc_class_vars, \
|
|
".objc_class_vars", 1) \
|
|
SECTION_FUNCTION (objc_instance_vars_section, \
|
|
in_objc_instance_vars, \
|
|
".objc_instance_vars", 1) \
|
|
SECTION_FUNCTION (objc_cls_meth_section, \
|
|
in_objc_cls_meth, \
|
|
".objc_cls_meth", 1) \
|
|
SECTION_FUNCTION (objc_inst_meth_section, \
|
|
in_objc_inst_meth, \
|
|
".objc_inst_meth", 1) \
|
|
SECTION_FUNCTION (objc_cat_cls_meth_section, \
|
|
in_objc_cat_cls_meth, \
|
|
".objc_cat_cls_meth", 1) \
|
|
SECTION_FUNCTION (objc_cat_inst_meth_section, \
|
|
in_objc_cat_inst_meth, \
|
|
".objc_cat_inst_meth", 1) \
|
|
SECTION_FUNCTION (objc_selector_refs_section, \
|
|
in_objc_selector_refs, \
|
|
".objc_message_refs", 1) \
|
|
SECTION_FUNCTION (objc_selector_fixup_section, \
|
|
in_objc_selector_fixup, \
|
|
".section __OBJC, __sel_fixup", 1) \
|
|
SECTION_FUNCTION (objc_symbols_section, \
|
|
in_objc_symbols, \
|
|
".objc_symbols", 1) \
|
|
SECTION_FUNCTION (objc_module_info_section, \
|
|
in_objc_module_info, \
|
|
".objc_module_info", 1) \
|
|
SECTION_FUNCTION (objc_protocol_section, \
|
|
in_objc_protocol, \
|
|
".objc_protocol", 1) \
|
|
SECTION_FUNCTION (objc_string_object_section, \
|
|
in_objc_string_object, \
|
|
".objc_string_object", 1) \
|
|
SECTION_FUNCTION (objc_constant_string_object_section, \
|
|
in_objc_constant_string_object, \
|
|
".section __OBJC, __cstring_object", 1) \
|
|
SECTION_FUNCTION (objc_class_names_section, \
|
|
in_objc_class_names, \
|
|
".objc_class_names", 1) \
|
|
SECTION_FUNCTION (objc_meth_var_names_section, \
|
|
in_objc_meth_var_names, \
|
|
".objc_meth_var_names", 1) \
|
|
SECTION_FUNCTION (objc_meth_var_types_section, \
|
|
in_objc_meth_var_types, \
|
|
".objc_meth_var_types", 1) \
|
|
SECTION_FUNCTION (objc_cls_refs_section, \
|
|
in_objc_cls_refs, \
|
|
".objc_cls_refs", 1) \
|
|
\
|
|
SECTION_FUNCTION (machopic_lazy_symbol_ptr_section, \
|
|
in_machopic_lazy_symbol_ptr, \
|
|
".lazy_symbol_pointer", 0) \
|
|
SECTION_FUNCTION (machopic_nl_symbol_ptr_section, \
|
|
in_machopic_nl_symbol_ptr, \
|
|
".non_lazy_symbol_pointer", 0) \
|
|
SECTION_FUNCTION (machopic_symbol_stub_section, \
|
|
in_machopic_symbol_stub, \
|
|
".symbol_stub", 0) \
|
|
SECTION_FUNCTION (machopic_picsymbol_stub_section, \
|
|
in_machopic_picsymbol_stub, \
|
|
".picsymbol_stub", 0) \
|
|
SECTION_FUNCTION (darwin_exception_section, \
|
|
in_darwin_exception, \
|
|
".section __DATA,__gcc_except_tab", 0) \
|
|
SECTION_FUNCTION (darwin_eh_frame_section, \
|
|
in_darwin_eh_frame, \
|
|
".section __TEXT,__eh_frame", 0) \
|
|
\
|
|
static void \
|
|
objc_section_init () \
|
|
{ \
|
|
static int been_here = 0; \
|
|
\
|
|
if (been_here == 0) \
|
|
{ \
|
|
been_here = 1; \
|
|
/* written, cold -> hot */ \
|
|
objc_cat_cls_meth_section (); \
|
|
objc_cat_inst_meth_section (); \
|
|
objc_string_object_section (); \
|
|
objc_constant_string_object_section (); \
|
|
objc_selector_refs_section (); \
|
|
objc_selector_fixup_section (); \
|
|
objc_cls_refs_section (); \
|
|
objc_class_section (); \
|
|
objc_meta_class_section (); \
|
|
/* shared, hot -> cold */ \
|
|
objc_cls_meth_section (); \
|
|
objc_inst_meth_section (); \
|
|
objc_protocol_section (); \
|
|
objc_class_names_section (); \
|
|
objc_meth_var_types_section (); \
|
|
objc_meth_var_names_section (); \
|
|
objc_category_section (); \
|
|
objc_class_vars_section (); \
|
|
objc_instance_vars_section (); \
|
|
objc_module_info_section (); \
|
|
objc_symbols_section (); \
|
|
} \
|
|
}
|
|
|
|
#define READONLY_DATA_SECTION const_section
|
|
|
|
#undef TARGET_ASM_SELECT_SECTION
|
|
#define TARGET_ASM_SELECT_SECTION machopic_select_section
|
|
#undef TARGET_ASM_SELECT_RTX_SECTION
|
|
#define TARGET_ASM_SELECT_RTX_SECTION machopic_select_rtx_section
|
|
|
|
#define ASM_DECLARE_UNRESOLVED_REFERENCE(FILE,NAME) \
|
|
do { \
|
|
if (FILE) { \
|
|
if (flag_pic) \
|
|
fprintf (FILE, "\t.lazy_reference "); \
|
|
else \
|
|
fprintf (FILE, "\t.reference "); \
|
|
assemble_name (FILE, NAME); \
|
|
fprintf (FILE, "\n"); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define ASM_DECLARE_CLASS_REFERENCE(FILE,NAME) \
|
|
do { \
|
|
if (FILE) { \
|
|
fprintf (FILE, "\t"); \
|
|
assemble_name (FILE, NAME); \
|
|
fprintf (FILE, "=0\n"); \
|
|
(*targetm.asm_out.globalize_label) (FILE, NAME); \
|
|
} \
|
|
} while (0)
|
|
|
|
/* Globalizing directive for a label. */
|
|
#define GLOBAL_ASM_OP ".globl "
|
|
#define TARGET_ASM_GLOBALIZE_LABEL darwin_globalize_label
|
|
|
|
#undef ASM_GENERATE_INTERNAL_LABEL
|
|
#define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM) \
|
|
sprintf (LABEL, "*%s%ld", PREFIX, (long)(NUM))
|
|
|
|
/* This is how to output an internal numbered label where PREFIX is
|
|
the class of label and NUM is the number within the class. */
|
|
|
|
#undef ASM_OUTPUT_INTERNAL_LABEL
|
|
#define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM) \
|
|
fprintf (FILE, "%s%d:\n", PREFIX, NUM)
|
|
|
|
/* Since we have a separate readonly data section, define this so that
|
|
jump tables end up in text rather than data. */
|
|
|
|
#ifndef JUMP_TABLES_IN_TEXT_SECTION
|
|
#define JUMP_TABLES_IN_TEXT_SECTION 1
|
|
#endif
|
|
|
|
/* Symbolic names for various things we might know about a symbol. */
|
|
|
|
enum machopic_addr_class {
|
|
MACHOPIC_UNDEFINED,
|
|
MACHOPIC_DEFINED_DATA,
|
|
MACHOPIC_UNDEFINED_DATA,
|
|
MACHOPIC_DEFINED_FUNCTION,
|
|
MACHOPIC_UNDEFINED_FUNCTION
|
|
};
|
|
|
|
/* Macros defining the various PIC cases. */
|
|
|
|
#define MACHOPIC_INDIRECT (flag_pic)
|
|
#define MACHOPIC_JUST_INDIRECT (flag_pic == 1)
|
|
#define MACHOPIC_PURE (flag_pic == 2)
|
|
|
|
#undef TARGET_ENCODE_SECTION_INFO
|
|
#define TARGET_ENCODE_SECTION_INFO darwin_encode_section_info
|
|
#undef TARGET_STRIP_NAME_ENCODING
|
|
#define TARGET_STRIP_NAME_ENCODING darwin_strip_name_encoding
|
|
|
|
#define GEN_BINDER_NAME_FOR_STUB(BUF,STUB,STUB_LENGTH) \
|
|
do { \
|
|
const char *const stub_ = (STUB); \
|
|
char *buffer_ = (BUF); \
|
|
strcpy (buffer_, stub_); \
|
|
if (stub_[0] == '"') \
|
|
{ \
|
|
strcpy (buffer_ + (STUB_LENGTH) - 1, "_binder\""); \
|
|
} \
|
|
else \
|
|
{ \
|
|
strcpy (buffer_ + (STUB_LENGTH), "_binder"); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define GEN_SYMBOL_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH) \
|
|
do { \
|
|
const char *const symbol_ = (SYMBOL); \
|
|
char *buffer_ = (BUF); \
|
|
if (name_needs_quotes (symbol_) && symbol_[0] != '"') \
|
|
{ \
|
|
sprintf (buffer_, "\"%s\"", symbol_); \
|
|
} \
|
|
else \
|
|
{ \
|
|
strcpy (buffer_, symbol_); \
|
|
} \
|
|
} while (0)
|
|
|
|
/* Given a symbol name string, create the lazy pointer version
|
|
of the symbol name. */
|
|
|
|
#define GEN_LAZY_PTR_NAME_FOR_SYMBOL(BUF,SYMBOL,SYMBOL_LENGTH) \
|
|
do { \
|
|
const char *symbol_ = darwin_strip_name_encoding (SYMBOL); \
|
|
char *buffer_ = (BUF); \
|
|
if (symbol_[0] == '"') \
|
|
{ \
|
|
strcpy (buffer_, "\"L"); \
|
|
strcpy (buffer_ + 2, symbol_ + 1); \
|
|
strcpy (buffer_ + (SYMBOL_LENGTH), "$lazy_ptr\""); \
|
|
} \
|
|
else if (name_needs_quotes (symbol_)) \
|
|
{ \
|
|
strcpy (buffer_, "\"L"); \
|
|
strcpy (buffer_ + 2, symbol_); \
|
|
strcpy (buffer_ + (SYMBOL_LENGTH) + 2, "$lazy_ptr\""); \
|
|
} \
|
|
else \
|
|
{ \
|
|
strcpy (buffer_, "L"); \
|
|
strcpy (buffer_ + 1, symbol_); \
|
|
strcpy (buffer_ + (SYMBOL_LENGTH) + 1, "$lazy_ptr"); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define TARGET_ASM_EXCEPTION_SECTION darwin_exception_section
|
|
|
|
#define TARGET_ASM_EH_FRAME_SECTION darwin_eh_frame_section
|
|
|
|
#undef ASM_PREFERRED_EH_DATA_FORMAT
|
|
#define ASM_PREFERRED_EH_DATA_FORMAT(CODE,GLOBAL) \
|
|
(((CODE) == 2 && (GLOBAL) == 1) \
|
|
? (DW_EH_PE_pcrel | DW_EH_PE_indirect) : \
|
|
((CODE) == 1 || (GLOBAL) == 0) ? DW_EH_PE_pcrel : DW_EH_PE_absptr)
|
|
|
|
#define ASM_OUTPUT_DWARF_DELTA(FILE,SIZE,LABEL1,LABEL2) \
|
|
darwin_asm_output_dwarf_delta (FILE, SIZE, LABEL1, LABEL2)
|
|
|
|
#define TARGET_TERMINATE_DW2_EH_FRAME_INFO false
|
|
|
|
#define DARWIN_REGISTER_TARGET_PRAGMAS(PFILE) \
|
|
do { \
|
|
cpp_register_pragma (PFILE, 0, "mark", darwin_pragma_ignore); \
|
|
cpp_register_pragma (PFILE, 0, "options", darwin_pragma_options); \
|
|
cpp_register_pragma (PFILE, 0, "segment", darwin_pragma_ignore); \
|
|
cpp_register_pragma (PFILE, 0, "unused", darwin_pragma_unused); \
|
|
} while (0)
|
|
|
|
#undef ASM_APP_ON
|
|
#define ASM_APP_ON ""
|
|
#undef ASM_APP_OFF
|
|
#define ASM_APP_OFF ""
|