| /* Operating system specific defines to be used when targeting GCC for some |
| generic System V Release 4 system. |
| Copyright (C) 1991, 1994, 1995, 1996 Free Software Foundation, Inc. |
| Contributed by Ron Guilmette (rfg@monkeys.com). |
| |
| 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. |
| |
| To use this file, make up a file with a name like: |
| |
| ?????svr4.h |
| |
| where ????? is replaced by the name of the basic hardware that you |
| are targeting for. Then, in the file ?????svr4.h, put something |
| like: |
| |
| #include "?????.h" |
| #include "svr4.h" |
| |
| followed by any really system-specific defines (or overrides of |
| defines) which you find that you need. For example, CPP_PREDEFINES |
| is defined here with only the defined -Dunix and -DSVR4. You should |
| probably override that in your target-specific ?????svr4.h file |
| with a set of defines that includes these, but also contains an |
| appropriate define for the type of hardware that you are targeting. |
| */ |
| |
| /* Define a symbol indicating that we are using svr4.h. */ |
| #define USING_SVR4_H |
| |
| /* For the sake of libgcc2.c, indicate target supports atexit. */ |
| #define HAVE_ATEXIT |
| |
| /* Cpp, assembler, linker, library, and startfile spec's. */ |
| |
| /* This defines which switch letters take arguments. On svr4, most of |
| the normal cases (defined in gcc.c) apply, and we also have -h* and |
| -z* options (for the linker). Note however that there is no such |
| thing as a -T option for svr4. */ |
| |
| #define SWITCH_TAKES_ARG(CHAR) \ |
| (DEFAULT_SWITCH_TAKES_ARG (CHAR) \ |
| || (CHAR) == 'h' \ |
| || (CHAR) == 'x' \ |
| || (CHAR) == 'z') |
| |
| /* This defines which multi-letter switches take arguments. On svr4, |
| there are no such switches except those implemented by GCC itself. */ |
| |
| #define WORD_SWITCH_TAKES_ARG(STR) \ |
| (DEFAULT_WORD_SWITCH_TAKES_ARG (STR) \ |
| && strcmp (STR, "Tdata") && strcmp (STR, "Ttext") \ |
| && strcmp (STR, "Tbss")) |
| |
| /* You should redefine CPP_PREDEFINES in any file which includes this one. |
| The definition should be appropriate for the type of target system |
| involved, and it should include any -A (assertion) options which are |
| appropriate for the given target system. */ |
| #undef CPP_PREDEFINES |
| |
| /* Provide an ASM_SPEC appropriate for svr4. Here we try to support as |
| many of the specialized svr4 assembler options as seems reasonable, |
| given that there are certain options which we can't (or shouldn't) |
| support directly due to the fact that they conflict with other options |
| for other svr4 tools (e.g. ld) or with other options for GCC itself. |
| For example, we don't support the -o (output file) or -R (remove |
| input file) options because GCC already handles these things. We |
| also don't support the -m (run m4) option for the assembler because |
| that conflicts with the -m (produce load map) option of the svr4 |
| linker. We do however allow passing arbitrary options to the svr4 |
| assembler via the -Wa, option. |
| |
| Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,* |
| option. |
| */ |
| |
| #undef ASM_SPEC |
| #define ASM_SPEC \ |
| "%{v:-V} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}" |
| |
| /* svr4 assemblers need the `-' (indicating input from stdin) to come after |
| the -o option (and its argument) for some reason. If we try to put it |
| before the -o option, the assembler will try to read the file named as |
| the output file in the -o option as an input file (after it has already |
| written some stuff to it) and the binary stuff contained therein will |
| cause totally confuse the assembler, resulting in many spurious error |
| messages. */ |
| |
| #undef ASM_FINAL_SPEC |
| #define ASM_FINAL_SPEC "%|" |
| |
| /* Under svr4, the normal location of the `ld' and `as' programs is the |
| /usr/ccs/bin directory. */ |
| |
| #ifndef CROSS_COMPILE |
| #undef MD_EXEC_PREFIX |
| #define MD_EXEC_PREFIX "/usr/ccs/bin/" |
| #endif |
| |
| /* Under svr4, the normal location of the various *crt*.o files is the |
| /usr/ccs/lib directory. */ |
| |
| #ifndef CROSS_COMPILE |
| #undef MD_STARTFILE_PREFIX |
| #define MD_STARTFILE_PREFIX "/usr/ccs/lib/" |
| #endif |
| |
| /* Provide a LIB_SPEC appropriate for svr4. Here we tack on the default |
| standard C library (unless we are building a shared library). */ |
| |
| #undef LIB_SPEC |
| #define LIB_SPEC "%{!shared:%{!symbolic:-lc}}" |
| |
| /* Provide an ENDFILE_SPEC appropriate for svr4. Here we tack on our own |
| magical crtend.o file (see crtstuff.c) which provides part of the |
| support for getting C++ file-scope static object constructed before |
| entering `main', followed by the normal svr3/svr4 "finalizer" file, |
| which is either `gcrtn.o' or `crtn.o'. */ |
| |
| #undef ENDFILE_SPEC |
| #define ENDFILE_SPEC "crtend.o%s %{pg:gcrtn.o%s}%{!pg:crtn.o%s}" |
| |
| /* Provide a LINK_SPEC appropriate for svr4. Here we provide support |
| for the special GCC options -static, -shared, and -symbolic which |
| allow us to link things in one of these three modes by applying the |
| appropriate combinations of options at link-time. We also provide |
| support here for as many of the other svr4 linker options as seems |
| reasonable, given that some of them conflict with options for other |
| svr4 tools (e.g. the assembler). In particular, we do support the |
| -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*, |
| -l*, -o*, -r, -s, -u*, and -L* options are directly supported |
| by gcc.c itself. We don't directly support the -m (generate load |
| map) option because that conflicts with the -m (run m4) option of |
| the svr4 assembler. We also don't directly support the svr4 linker's |
| -I* or -M* options because these conflict with existing GCC options. |
| We do however allow passing arbitrary options to the svr4 linker |
| via the -Wl, option. We don't support the svr4 linker's -a option |
| at all because it is totally useless and because it conflicts with |
| GCC's own -a option. |
| |
| Note that gcc doesn't allow a space to follow -Y in a -YP,* option. |
| |
| When the -G link option is used (-shared and -symbolic) a final link is |
| not being done. */ |
| |
| #undef LINK_SPEC |
| #ifdef CROSS_COMPILE |
| #define LINK_SPEC "%{h*} %{v:-V} \ |
| %{b} %{Wl,*:%*} \ |
| %{static:-dn -Bstatic} \ |
| %{shared:-G -dy -z text %{!h*:%{o*:-h %*}}} \ |
| %{symbolic:-Bsymbolic -G -dy -z text %{!h*:%{o*:-h %*}}} \ |
| %{G:-G} \ |
| %{YP,*} \ |
| %{Qy:} %{!Qn:-Qy}" |
| #else |
| #define LINK_SPEC "%{h*} %{v:-V} \ |
| %{b} %{Wl,*:%*} \ |
| %{static:-dn -Bstatic} \ |
| %{shared:-G -dy -z text %{!h*:%{o*:-h %*}}} \ |
| %{symbolic:-Bsymbolic -G -dy -z text %{!h*:%{o*:-h %*}}} \ |
| %{G:-G} \ |
| %{YP,*} \ |
| %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \ |
| %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \ |
| %{Qy:} %{!Qn:-Qy}" |
| #endif |
| |
| /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o, |
| /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final |
| link step (depending upon the other gcc options selected, such as |
| -traditional and -ansi). These files each contain one (initialized) |
| copy of a special variable called `_lib_version'. Each one of these |
| files has `_lib_version' initialized to a different (enum) value. |
| The SVR4 library routines query the value of `_lib_version' at run |
| to decide how they should behave. Specifically, they decide (based |
| upon the value of `_lib_version') if they will act in a strictly ANSI |
| conforming manner or not. |
| */ |
| |
| #undef STARTFILE_SPEC |
| #define STARTFILE_SPEC "%{!shared: \ |
| %{!symbolic: \ |
| %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}}}}\ |
| %{pg:gcrti.o%s}%{!pg:crti.o%s} \ |
| %{ansi:values-Xc.o%s} \ |
| %{!ansi: \ |
| %{traditional:values-Xt.o%s} \ |
| %{!traditional:values-Xa.o%s}} \ |
| crtbegin.o%s" |
| |
| /* Attach a special .ident directive to the end of the file to identify |
| the version of GCC which compiled this code. The format of the |
| .ident string is patterned after the ones produced by native svr4 |
| C compilers. */ |
| |
| #define IDENT_ASM_OP ".ident" |
| |
| #define ASM_FILE_END(FILE) \ |
| do { \ |
| fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n", \ |
| IDENT_ASM_OP, version_string); \ |
| } while (0) |
| |
| /* Allow #sccs in preprocessor. */ |
| |
| #define SCCS_DIRECTIVE |
| |
| /* Output #ident as a .ident. */ |
| |
| #define ASM_OUTPUT_IDENT(FILE, NAME) \ |
| fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME); |
| |
| /* Use periods rather than dollar signs in special g++ assembler names. */ |
| |
| #define NO_DOLLAR_IN_LABEL |
| |
| /* Writing `int' for a bitfield forces int alignment for the structure. */ |
| |
| #define PCC_BITFIELD_TYPE_MATTERS 1 |
| |
| /* Implicit library calls should use memcpy, not bcopy, etc. */ |
| |
| #define TARGET_MEM_FUNCTIONS |
| |
| /* Handle #pragma weak and #pragma pack. */ |
| |
| #define HANDLE_SYSV_PRAGMA |
| |
| /* System V Release 4 uses DWARF debugging info. */ |
| |
| #define DWARF_DEBUGGING_INFO |
| |
| /* All ELF targets can support DWARF-2. */ |
| |
| #define DWARF2_DEBUGGING_INFO |
| |
| /* The numbers used to denote specific machine registers in the System V |
| Release 4 DWARF debugging information are quite likely to be totally |
| different from the numbers used in BSD stabs debugging information |
| for the same kind of target machine. Thus, we undefine the macro |
| DBX_REGISTER_NUMBER here as an extra inducement to get people to |
| provide proper machine-specific definitions of DBX_REGISTER_NUMBER |
| (which is also used to provide DWARF registers numbers in dwarfout.c) |
| in their tm.h files which include this file. */ |
| |
| #undef DBX_REGISTER_NUMBER |
| |
| /* gas on SVR4 supports the use of .stabs. Permit -gstabs to be used |
| in general, although it will only work when using gas. */ |
| |
| #define DBX_DEBUGGING_INFO |
| |
| /* When generating stabs debugging, use N_BINCL entries. */ |
| |
| #define DBX_USE_BINCL |
| |
| /* Use DWARF debugging info by default. */ |
| |
| #ifndef PREFERRED_DEBUGGING_TYPE |
| #define PREFERRED_DEBUGGING_TYPE DWARF_DEBUG |
| #endif |
| |
| /* Make LBRAC and RBRAC addresses relative to the start of the |
| function. The native Solaris stabs debugging format works this |
| way, gdb expects it, and it reduces the number of relocation |
| entries. */ |
| |
| #define DBX_BLOCKS_FUNCTION_RELATIVE 1 |
| |
| /* When using stabs, gcc2_compiled must be a stabs entry, not an |
| ordinary symbol, or gdb won't see it. Furthermore, since gdb reads |
| the input piecemeal, starting with each N_SO, it's a lot easier if |
| the gcc2 flag symbol is *after* the N_SO rather than before it. So |
| we emit an N_OPT stab there. */ |
| |
| #define ASM_IDENTIFY_GCC(FILE) \ |
| do \ |
| { \ |
| if (write_symbols != DBX_DEBUG) \ |
| fputs ("gcc2_compiled.:\n", FILE); \ |
| } \ |
| while (0) |
| |
| #define ASM_IDENTIFY_GCC_AFTER_SOURCE(FILE) \ |
| do \ |
| { \ |
| if (write_symbols == DBX_DEBUG) \ |
| fputs ("\t.stabs\t\"gcc2_compiled.\", 0x3c, 0, 0, 0\n", FILE); \ |
| } \ |
| while (0) |
| |
| /* Like block addresses, stabs line numbers are relative to the |
| current function. */ |
| |
| #define ASM_OUTPUT_SOURCE_LINE(file, line) \ |
| do \ |
| { \ |
| static int sym_lineno = 1; \ |
| fprintf (file, ".stabn 68,0,%d,.LM%d-", \ |
| line, sym_lineno); \ |
| assemble_name (file, \ |
| XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0));\ |
| fprintf (file, "\n.LM%d:\n", sym_lineno); \ |
| sym_lineno += 1; \ |
| } \ |
| while (0) |
| |
| /* In order for relative line numbers to work, we must output the |
| stabs entry for the function name first. */ |
| |
| #define DBX_FUNCTION_FIRST |
| |
| /* Generate a blank trailing N_SO to mark the end of the .o file, since |
| we can't depend upon the linker to mark .o file boundaries with |
| embedded stabs. */ |
| |
| #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME) \ |
| do \ |
| { \ |
| text_section (); \ |
| fprintf (FILE, \ |
| "\t.stabs \"\",%d,0,0,.Letext\n.Letext:\n", N_SO); \ |
| } \ |
| while (0) |
| |
| /* Define the actual types of some ANSI-mandated types. (These |
| definitions should work for most SVR4 systems). */ |
| |
| #undef SIZE_TYPE |
| #define SIZE_TYPE "unsigned int" |
| |
| #undef PTRDIFF_TYPE |
| #define PTRDIFF_TYPE "int" |
| |
| #undef WCHAR_TYPE |
| #define WCHAR_TYPE "long int" |
| |
| #undef WCHAR_TYPE_SIZE |
| #define WCHAR_TYPE_SIZE BITS_PER_WORD |
| |
| /* This causes trouble, because it requires the host machine |
| to support ANSI C. */ |
| /* #define MULTIBYTE_CHARS */ |
| |
| #undef ASM_BYTE_OP |
| #define ASM_BYTE_OP ".byte" |
| |
| #undef SET_ASM_OP |
| #define SET_ASM_OP ".set" |
| |
| /* This is how to begin an assembly language file. Most svr4 assemblers want |
| at least a .file directive to come first, and some want to see a .version |
| directive come right after that. Here we just establish a default |
| which generates only the .file directive. If you need a .version |
| directive for any specific target, you should override this definition |
| in the target-specific file which includes this one. */ |
| |
| #undef ASM_FILE_START |
| #define ASM_FILE_START(FILE) \ |
| output_file_directive ((FILE), main_input_filename) |
| |
| /* This is how to allocate empty space in some section. The .zero |
| pseudo-op is used for this on most svr4 assemblers. */ |
| |
| #define SKIP_ASM_OP ".zero" |
| |
| #undef ASM_OUTPUT_SKIP |
| #define ASM_OUTPUT_SKIP(FILE,SIZE) \ |
| fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE)) |
| |
| /* The prefix to add to user-visible assembler symbols. |
| |
| For System V Release 4 the convention is *not* to prepend a leading |
| underscore onto user-level symbol names. */ |
| |
| #undef USER_LABEL_PREFIX |
| #define USER_LABEL_PREFIX "" |
| |
| /* This is how to output an internal numbered label where |
| PREFIX is the class of label and NUM is the number within the class. |
| |
| For most svr4 systems, the convention is that any symbol which begins |
| with a period is not put into the linker symbol table by the assembler. */ |
| |
| #undef ASM_OUTPUT_INTERNAL_LABEL |
| #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM) \ |
| do { \ |
| fprintf (FILE, ".%s%d:\n", PREFIX, NUM); \ |
| } while (0) |
| |
| /* This is how to store into the string LABEL |
| the symbol_ref name of an internal numbered label where |
| PREFIX is the class of label and NUM is the number within the class. |
| This is suitable for output with `assemble_name'. |
| |
| For most svr4 systems, the convention is that any symbol which begins |
| with a period is not put into the linker symbol table by the assembler. */ |
| |
| #undef ASM_GENERATE_INTERNAL_LABEL |
| #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \ |
| do { \ |
| sprintf (LABEL, "*.%s%d", PREFIX, NUM); \ |
| } while (0) |
| |
| /* Output the label which precedes a jumptable. Note that for all svr4 |
| systems where we actually generate jumptables (which is to say every |
| svr4 target except i386, where we use casesi instead) we put the jump- |
| tables into the .rodata section and since other stuff could have been |
| put into the .rodata section prior to any given jumptable, we have to |
| make sure that the location counter for the .rodata section gets pro- |
| perly re-aligned prior to the actual beginning of the jump table. */ |
| |
| #define ALIGN_ASM_OP ".align" |
| |
| #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL |
| #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE,PREFIX,NUM,TABLE) \ |
| ASM_OUTPUT_ALIGN ((FILE), 2); |
| #endif |
| |
| #undef ASM_OUTPUT_CASE_LABEL |
| #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE) \ |
| do { \ |
| ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE) \ |
| ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM); \ |
| } while (0) |
| |
| /* The standard SVR4 assembler seems to require that certain builtin |
| library routines (e.g. .udiv) be explicitly declared as .globl |
| in each assembly file where they are referenced. */ |
| |
| #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \ |
| ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0)) |
| |
| /* This says how to output assembler code to declare an |
| uninitialized external linkage data object. Under SVR4, |
| the linker seems to want the alignment of data objects |
| to depend on their types. We do exactly that here. */ |
| |
| #define COMMON_ASM_OP ".comm" |
| |
| #undef ASM_OUTPUT_ALIGNED_COMMON |
| #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \ |
| do { \ |
| fprintf ((FILE), "\t%s\t", COMMON_ASM_OP); \ |
| assemble_name ((FILE), (NAME)); \ |
| fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \ |
| } while (0) |
| |
| /* This says how to output assembler code to declare an |
| uninitialized internal linkage data object. Under SVR4, |
| the linker seems to want the alignment of data objects |
| to depend on their types. We do exactly that here. */ |
| |
| #define LOCAL_ASM_OP ".local" |
| |
| #undef ASM_OUTPUT_ALIGNED_LOCAL |
| #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \ |
| do { \ |
| fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP); \ |
| assemble_name ((FILE), (NAME)); \ |
| fprintf ((FILE), "\n"); \ |
| ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN); \ |
| } while (0) |
| |
| /* Biggest alignment supported by the object file format of this |
| machine. Use this macro to limit the alignment which can be |
| specified using the `__attribute__ ((aligned (N)))' construct. If |
| not defined, the default value is `BIGGEST_ALIGNMENT'. */ |
| |
| #define MAX_OFILE_ALIGNMENT (32768*8) |
| |
| /* This is the pseudo-op used to generate a 32-bit word of data with a |
| specific value in some section. This is the same for all known svr4 |
| assemblers. */ |
| |
| #define INT_ASM_OP ".long" |
| |
| /* This is the pseudo-op used to generate a contiguous sequence of byte |
| values from a double-quoted string WITHOUT HAVING A TERMINATING NUL |
| AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */ |
| |
| #undef ASCII_DATA_ASM_OP |
| #define ASCII_DATA_ASM_OP ".ascii" |
| |
| /* Support const sections and the ctors and dtors sections for g++. |
| Note that there appears to be two different ways to support const |
| sections at the moment. You can either #define the symbol |
| READONLY_DATA_SECTION (giving it some code which switches to the |
| readonly data section) or else you can #define the symbols |
| EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and |
| SELECT_RTX_SECTION. We do both here just to be on the safe side. */ |
| |
| #define USE_CONST_SECTION 1 |
| |
| #define CONST_SECTION_ASM_OP ".section\t.rodata" |
| |
| /* Define the pseudo-ops used to switch to the .ctors and .dtors sections. |
| |
| Note that we want to give these sections the SHF_WRITE attribute |
| because these sections will actually contain data (i.e. tables of |
| addresses of functions in the current root executable or shared library |
| file) and, in the case of a shared library, the relocatable addresses |
| will have to be properly resolved/relocated (and then written into) by |
| the dynamic linker when it actually attaches the given shared library |
| to the executing process. (Note that on SVR4, you may wish to use the |
| `-z text' option to the ELF linker, when building a shared library, as |
| an additional check that you are doing everything right. But if you do |
| use the `-z text' option when building a shared library, you will get |
| errors unless the .ctors and .dtors sections are marked as writable |
| via the SHF_WRITE attribute.) */ |
| |
| #define CTORS_SECTION_ASM_OP ".section\t.ctors,\"aw\"" |
| #define DTORS_SECTION_ASM_OP ".section\t.dtors,\"aw\"" |
| |
| /* On svr4, we *do* have support for the .init and .fini sections, and we |
| can put stuff in there to be executed before and after `main'. We let |
| crtstuff.c and other files know this by defining the following symbols. |
| The definitions say how to change sections to the .init and .fini |
| sections. This is the same for all known svr4 assemblers. */ |
| |
| #define INIT_SECTION_ASM_OP ".section\t.init" |
| #define FINI_SECTION_ASM_OP ".section\t.fini" |
| |
| /* A default list of other sections which we might be "in" at any given |
| time. For targets that use additional sections (e.g. .tdesc) you |
| should override this definition in the target-specific file which |
| includes this file. */ |
| |
| #undef EXTRA_SECTIONS |
| #define EXTRA_SECTIONS in_const, in_ctors, in_dtors |
| |
| /* A default list of extra section function definitions. For targets |
| that use additional sections (e.g. .tdesc) you should override this |
| definition in the target-specific file which includes this file. */ |
| |
| #undef EXTRA_SECTION_FUNCTIONS |
| #define EXTRA_SECTION_FUNCTIONS \ |
| CONST_SECTION_FUNCTION \ |
| CTORS_SECTION_FUNCTION \ |
| DTORS_SECTION_FUNCTION |
| |
| #define READONLY_DATA_SECTION() const_section () |
| |
| extern void text_section (); |
| |
| #define CONST_SECTION_FUNCTION \ |
| void \ |
| const_section () \ |
| { \ |
| if (!USE_CONST_SECTION) \ |
| text_section(); \ |
| else if (in_section != in_const) \ |
| { \ |
| fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \ |
| in_section = in_const; \ |
| } \ |
| } |
| |
| #define CTORS_SECTION_FUNCTION \ |
| void \ |
| ctors_section () \ |
| { \ |
| if (in_section != in_ctors) \ |
| { \ |
| fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP); \ |
| in_section = in_ctors; \ |
| } \ |
| } |
| |
| #define DTORS_SECTION_FUNCTION \ |
| void \ |
| dtors_section () \ |
| { \ |
| if (in_section != in_dtors) \ |
| { \ |
| fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP); \ |
| in_section = in_dtors; \ |
| } \ |
| } |
| |
| /* Switch into a generic section. |
| |
| We make the section read-only and executable for a function decl, |
| read-only for a const data decl, and writable for a non-const data decl. |
| |
| If the section has already been defined, we must not |
| emit the attributes here. The SVR4 assembler does not |
| recognize section redefinitions. |
| If DECL is NULL, no attributes are emitted. */ |
| |
| #define ASM_OUTPUT_SECTION_NAME(FILE, DECL, NAME, RELOC) \ |
| do { \ |
| static struct section_info \ |
| { \ |
| struct section_info *next; \ |
| char *name; \ |
| enum sect_enum {SECT_RW, SECT_RO, SECT_EXEC} type; \ |
| } *sections; \ |
| struct section_info *s; \ |
| char *mode; \ |
| enum sect_enum type; \ |
| \ |
| for (s = sections; s; s = s->next) \ |
| if (!strcmp (NAME, s->name)) \ |
| break; \ |
| \ |
| if (DECL && TREE_CODE (DECL) == FUNCTION_DECL) \ |
| type = SECT_EXEC, mode = "ax"; \ |
| else if (DECL && DECL_READONLY_SECTION (DECL, RELOC)) \ |
| type = SECT_RO, mode = "a"; \ |
| else \ |
| type = SECT_RW, mode = "aw"; \ |
| \ |
| if (s == 0) \ |
| { \ |
| s = (struct section_info *) xmalloc (sizeof (struct section_info)); \ |
| s->name = xmalloc ((strlen (NAME) + 1) * sizeof (*NAME)); \ |
| strcpy (s->name, NAME); \ |
| s->type = type; \ |
| s->next = sections; \ |
| sections = s; \ |
| fprintf (FILE, ".section\t%s,\"%s\",@progbits\n", NAME, mode); \ |
| } \ |
| else \ |
| { \ |
| if (DECL && s->type != type) \ |
| error_with_decl (DECL, "%s causes a section type conflict"); \ |
| \ |
| fprintf (FILE, ".section\t%s\n", NAME); \ |
| } \ |
| } while (0) |
| |
| #define MAKE_DECL_ONE_ONLY(DECL) (DECL_WEAK (DECL) = 1) |
| #define UNIQUE_SECTION_P(DECL) (DECL_ONE_ONLY (DECL)) |
| #define UNIQUE_SECTION(DECL,RELOC) \ |
| do { \ |
| int len; \ |
| char *name, *string, *prefix; \ |
| \ |
| name = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL)); \ |
| \ |
| if (! DECL_ONE_ONLY (DECL)) \ |
| prefix = "."; \ |
| else if (TREE_CODE (DECL) == FUNCTION_DECL) \ |
| prefix = ".gnu.linkonce.t."; \ |
| else if (DECL_READONLY_SECTION (DECL, RELOC)) \ |
| prefix = ".gnu.linkonce.r."; \ |
| else \ |
| prefix = ".gnu.linkonce.d."; \ |
| \ |
| len = strlen (name) + strlen (prefix); \ |
| string = alloca (len + 1); \ |
| sprintf (string, "%s%s", prefix, name); \ |
| \ |
| DECL_SECTION_NAME (DECL) = build_string (len, string); \ |
| } while (0) |
| |
| /* A C statement (sans semicolon) to output an element in the table of |
| global constructors. */ |
| #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \ |
| do { \ |
| ctors_section (); \ |
| fprintf (FILE, "\t%s\t ", INT_ASM_OP); \ |
| assemble_name (FILE, NAME); \ |
| fprintf (FILE, "\n"); \ |
| } while (0) |
| |
| /* A C statement (sans semicolon) to output an element in the table of |
| global destructors. */ |
| #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \ |
| do { \ |
| dtors_section (); \ |
| fprintf (FILE, "\t%s\t ", INT_ASM_OP); \ |
| assemble_name (FILE, NAME); \ |
| fprintf (FILE, "\n"); \ |
| } while (0) |
| |
| /* A C statement or statements to switch to the appropriate |
| section for output of DECL. DECL is either a `VAR_DECL' node |
| or a constant of some sort. RELOC indicates whether forming |
| the initial value of DECL requires link-time relocations. */ |
| |
| #define SELECT_SECTION(DECL,RELOC) \ |
| { \ |
| if (flag_pic && RELOC) \ |
| data_section (); \ |
| else if (TREE_CODE (DECL) == STRING_CST) \ |
| { \ |
| if (! flag_writable_strings) \ |
| const_section (); \ |
| else \ |
| data_section (); \ |
| } \ |
| else if (TREE_CODE (DECL) == VAR_DECL) \ |
| { \ |
| if (! DECL_READONLY_SECTION (DECL, RELOC)) \ |
| data_section (); \ |
| else \ |
| const_section (); \ |
| } \ |
| else \ |
| const_section (); \ |
| } |
| |
| /* A C statement or statements to switch to the appropriate |
| section for output of RTX in mode MODE. RTX is some kind |
| of constant in RTL. The argument MODE is redundant except |
| in the case of a `const_int' rtx. Currently, these always |
| go into the const section. */ |
| |
| #undef SELECT_RTX_SECTION |
| #define SELECT_RTX_SECTION(MODE,RTX) const_section() |
| |
| /* Define the strings used for the special svr4 .type and .size directives. |
| These strings generally do not vary from one system running svr4 to |
| another, but if a given system (e.g. m88k running svr) needs to use |
| different pseudo-op names for these, they may be overridden in the |
| file which includes this one. */ |
| |
| #define TYPE_ASM_OP ".type" |
| #define SIZE_ASM_OP ".size" |
| |
| /* This is how we tell the assembler that a symbol is weak. */ |
| |
| #define ASM_WEAKEN_LABEL(FILE,NAME) \ |
| do { fputs ("\t.weak\t", FILE); assemble_name (FILE, NAME); \ |
| fputc ('\n', FILE); } while (0) |
| |
| /* The following macro defines the format used to output the second |
| operand of the .type assembler directive. Different svr4 assemblers |
| expect various different forms for this operand. The one given here |
| is just a default. You may need to override it in your machine- |
| specific tm.h file (depending upon the particulars of your assembler). */ |
| |
| #define TYPE_OPERAND_FMT "@%s" |
| |
| /* Write the extra assembler code needed to declare a function's result. |
| Most svr4 assemblers don't require any special declaration of the |
| result value, but there are exceptions. */ |
| |
| #ifndef ASM_DECLARE_RESULT |
| #define ASM_DECLARE_RESULT(FILE, RESULT) |
| #endif |
| |
| /* These macros generate the special .type and .size directives which |
| are used to set the corresponding fields of the linker symbol table |
| entries in an ELF object file under SVR4. These macros also output |
| the starting labels for the relevant functions/objects. */ |
| |
| /* Write the extra assembler code needed to declare a function properly. |
| Some svr4 assemblers need to also have something extra said about the |
| function's return value. We allow for that here. */ |
| |
| #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \ |
| do { \ |
| fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \ |
| assemble_name (FILE, NAME); \ |
| putc (',', FILE); \ |
| fprintf (FILE, TYPE_OPERAND_FMT, "function"); \ |
| putc ('\n', FILE); \ |
| ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \ |
| ASM_OUTPUT_LABEL(FILE, NAME); \ |
| } while (0) |
| |
| /* Write the extra assembler code needed to declare an object properly. */ |
| |
| #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \ |
| do { \ |
| fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \ |
| assemble_name (FILE, NAME); \ |
| putc (',', FILE); \ |
| fprintf (FILE, TYPE_OPERAND_FMT, "object"); \ |
| putc ('\n', FILE); \ |
| size_directive_output = 0; \ |
| if (!flag_inhibit_size_directive && DECL_SIZE (DECL)) \ |
| { \ |
| size_directive_output = 1; \ |
| fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \ |
| assemble_name (FILE, NAME); \ |
| fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \ |
| } \ |
| ASM_OUTPUT_LABEL(FILE, NAME); \ |
| } while (0) |
| |
| /* Output the size directive for a decl in rest_of_decl_compilation |
| in the case where we did not do so before the initializer. |
| Once we find the error_mark_node, we know that the value of |
| size_directive_output was set |
| by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */ |
| |
| #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END) \ |
| do { \ |
| char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \ |
| if (!flag_inhibit_size_directive && DECL_SIZE (DECL) \ |
| && ! AT_END && TOP_LEVEL \ |
| && DECL_INITIAL (DECL) == error_mark_node \ |
| && !size_directive_output) \ |
| { \ |
| size_directive_output = 1; \ |
| fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \ |
| assemble_name (FILE, name); \ |
| fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \ |
| } \ |
| } while (0) |
| |
| /* This is how to declare the size of a function. */ |
| |
| #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \ |
| do { \ |
| if (!flag_inhibit_size_directive) \ |
| { \ |
| char label[256]; \ |
| static int labelno; \ |
| labelno++; \ |
| ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \ |
| ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \ |
| fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \ |
| assemble_name (FILE, (FNAME)); \ |
| fprintf (FILE, ","); \ |
| assemble_name (FILE, label); \ |
| fprintf (FILE, "-"); \ |
| assemble_name (FILE, (FNAME)); \ |
| putc ('\n', FILE); \ |
| } \ |
| } while (0) |
| |
| /* A table of bytes codes used by the ASM_OUTPUT_ASCII and |
| ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table |
| corresponds to a particular byte value [0..255]. For any |
| given byte value, if the value in the corresponding table |
| position is zero, the given character can be output directly. |
| If the table value is 1, the byte must be output as a \ooo |
| octal escape. If the tables value is anything else, then the |
| byte value should be output as a \ followed by the value |
| in the table. Note that we can use standard UN*X escape |
| sequences for many control characters, but we don't use |
| \a to represent BEL because some svr4 assemblers (e.g. on |
| the i386) don't know about that. Also, we don't use \v |
| since some versions of gas, such as 2.2 did not accept it. */ |
| |
| #define ESCAPES \ |
| "\1\1\1\1\1\1\1\1btn\1fr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\ |
| \0\0\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\ |
| \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\\0\0\0\ |
| \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\ |
| \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\ |
| \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\ |
| \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\ |
| \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1" |
| |
| /* Some svr4 assemblers have a limit on the number of characters which |
| can appear in the operand of a .string directive. If your assembler |
| has such a limitation, you should define STRING_LIMIT to reflect that |
| limit. Note that at least some svr4 assemblers have a limit on the |
| actual number of bytes in the double-quoted string, and that they |
| count each character in an escape sequence as one byte. Thus, an |
| escape sequence like \377 would count as four bytes. |
| |
| If your target assembler doesn't support the .string directive, you |
| should define this to zero. |
| */ |
| |
| #define STRING_LIMIT ((unsigned) 256) |
| |
| #define STRING_ASM_OP ".string" |
| |
| /* The routine used to output NUL terminated strings. We use a special |
| version of this for most svr4 targets because doing so makes the |
| generated assembly code more compact (and thus faster to assemble) |
| as well as more readable, especially for targets like the i386 |
| (where the only alternative is to output character sequences as |
| comma separated lists of numbers). */ |
| |
| #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \ |
| do \ |
| { \ |
| register unsigned char *_limited_str = (unsigned char *) (STR); \ |
| register unsigned ch; \ |
| fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP); \ |
| for (; ch = *_limited_str; _limited_str++) \ |
| { \ |
| register int escape; \ |
| switch (escape = ESCAPES[ch]) \ |
| { \ |
| case 0: \ |
| putc (ch, (FILE)); \ |
| break; \ |
| case 1: \ |
| fprintf ((FILE), "\\%03o", ch); \ |
| break; \ |
| default: \ |
| putc ('\\', (FILE)); \ |
| putc (escape, (FILE)); \ |
| break; \ |
| } \ |
| } \ |
| fprintf ((FILE), "\"\n"); \ |
| } \ |
| while (0) |
| |
| /* The routine used to output sequences of byte values. We use a special |
| version of this for most svr4 targets because doing so makes the |
| generated assembly code more compact (and thus faster to assemble) |
| as well as more readable. Note that if we find subparts of the |
| character sequence which end with NUL (and which are shorter than |
| STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */ |
| |
| #undef ASM_OUTPUT_ASCII |
| #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \ |
| do \ |
| { \ |
| register unsigned char *_ascii_bytes = (unsigned char *) (STR); \ |
| register unsigned char *limit = _ascii_bytes + (LENGTH); \ |
| register unsigned bytes_in_chunk = 0; \ |
| for (; _ascii_bytes < limit; _ascii_bytes++) \ |
| { \ |
| register unsigned char *p; \ |
| if (bytes_in_chunk >= 60) \ |
| { \ |
| fprintf ((FILE), "\"\n"); \ |
| bytes_in_chunk = 0; \ |
| } \ |
| for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \ |
| continue; \ |
| if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT) \ |
| { \ |
| if (bytes_in_chunk > 0) \ |
| { \ |
| fprintf ((FILE), "\"\n"); \ |
| bytes_in_chunk = 0; \ |
| } \ |
| ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \ |
| _ascii_bytes = p; \ |
| } \ |
| else \ |
| { \ |
| register int escape; \ |
| register unsigned ch; \ |
| if (bytes_in_chunk == 0) \ |
| fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP); \ |
| switch (escape = ESCAPES[ch = *_ascii_bytes]) \ |
| { \ |
| case 0: \ |
| putc (ch, (FILE)); \ |
| bytes_in_chunk++; \ |
| break; \ |
| case 1: \ |
| fprintf ((FILE), "\\%03o", ch); \ |
| bytes_in_chunk += 4; \ |
| break; \ |
| default: \ |
| putc ('\\', (FILE)); \ |
| putc (escape, (FILE)); \ |
| bytes_in_chunk += 2; \ |
| break; \ |
| } \ |
| } \ |
| } \ |
| if (bytes_in_chunk > 0) \ |
| fprintf ((FILE), "\"\n"); \ |
| } \ |
| while (0) |
| |
| /* All SVR4 targets use the ELF object file format. */ |
| #define OBJECT_FORMAT_ELF |