gcc/config/svr4.h

   1 /* Operating system specific defines to be used when targeting GCC for some
   2    generic System V Release 4 system.
   3    Copyright (C) 1991, 1994, 1995 Free Software Foundation, Inc.
   4    Contributed by Ron Guilmette (rfg@segfault.us.com).
   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    To use this file, make up a file with a name like:
  24
  25         ?????svr4.h
  26
  27    where ????? is replaced by the name of the basic hardware that you
  28    are targeting for.  Then, in the file ?????svr4.h, put something
  29    like:
  30
  31         #include "?????.h"
  32         #include "svr4.h"
  33
  34    followed by any really system-specific defines (or overrides of
  35    defines) which you find that you need.  For example, CPP_PREDEFINES
  36    is defined here with only the defined -Dunix and -DSVR4.  You should
  37    probably override that in your target-specific ?????svr4.h file
  38    with a set of defines that includes these, but also contains an
  39    appropriate define for the type of hardware that you are targeting.
  40 */
  41
  42 /* Define a symbol indicating that we are using svr4.h.  */
  43 #define USING_SVR4_H
  44
  45 /* For the sake of libgcc2.c, indicate target supports atexit.  */
  46 #define HAVE_ATEXIT
  47
  48 /* Cpp, assembler, linker, library, and startfile spec's.  */
  49
  50 /* This defines which switch letters take arguments.  On svr4, most of
  51    the normal cases (defined in gcc.c) apply, and we also have -h* and
  52    -z* options (for the linker).  Note however that there is no such
  53    thing as a -T option for svr4.  */
  54
  55 #define SWITCH_TAKES_ARG(CHAR) \
  56   (   (CHAR) == 'D' \
  57    || (CHAR) == 'U' \
  58    || (CHAR) == 'o' \
  59    || (CHAR) == 'e' \
  60    || (CHAR) == 'u' \
  61    || (CHAR) == 'I' \
  62    || (CHAR) == 'm' \
  63    || (CHAR) == 'L' \
  64    || (CHAR) == 'A' \
  65    || (CHAR) == 'h' \
  66    || (CHAR) == 'z')
  67
  68 /* This defines which multi-letter switches take arguments.  On svr4,
  69    there are no such switches except those implemented by GCC itself.  */
  70
  71 #define WORD_SWITCH_TAKES_ARG(STR)                      \
  72  (DEFAULT_WORD_SWITCH_TAKES_ARG (STR)                   \
  73   && strcmp (STR, "Tdata") && strcmp (STR, "Ttext")     \
  74   && strcmp (STR, "Tbss"))
  75
  76 /* You should redefine CPP_PREDEFINES in any file which includes this one.
  77    The definition should be appropriate for the type of target system
  78    involved, and it should include any -A (assertion) options which are
  79    appropriate for the given target system.  */
  80 #undef CPP_PREDEFINES
  81
  82 /* Provide an ASM_SPEC appropriate for svr4.  Here we try to support as
  83    many of the specialized svr4 assembler options as seems reasonable,
  84    given that there are certain options which we can't (or shouldn't)
  85    support directly due to the fact that they conflict with other options
  86    for other svr4 tools (e.g. ld) or with other options for GCC itself.
  87    For example, we don't support the -o (output file) or -R (remove
  88    input file) options because GCC already handles these things.  We
  89    also don't support the -m (run m4) option for the assembler because
  90    that conflicts with the -m (produce load map) option of the svr4
  91    linker.  We do however allow passing arbitrary options to the svr4
  92    assembler via the -Wa, option.
  93
  94    Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,*
  95    option.
  96 */
  97
  98 #undef ASM_SPEC
  99 #define ASM_SPEC \
 100   "%{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
 101
 102 /* svr4 assemblers need the `-' (indicating input from stdin) to come after
 103    the -o option (and its argument) for some reason.  If we try to put it
 104    before the -o option, the assembler will try to read the file named as
 105    the output file in the -o option as an input file (after it has already
 106    written some stuff to it) and the binary stuff contained therein will
 107    cause totally confuse the assembler, resulting in many spurious error
 108    messages.  */
 109
 110 #undef ASM_FINAL_SPEC
 111 #define ASM_FINAL_SPEC "%{pipe:-}"
 112
 113 /* Under svr4, the normal location of the `ld' and `as' programs is the
 114    /usr/ccs/bin directory.  */
 115
 116 #ifndef CROSS_COMPILE
 117 #undef MD_EXEC_PREFIX
 118 #define MD_EXEC_PREFIX "/usr/ccs/bin/"
 119 #endif
 120
 121 /* Under svr4, the normal location of the various *crt*.o files is the
 122    /usr/ccs/lib directory.  */
 123
 124 #ifndef CROSS_COMPILE
 125 #undef MD_STARTFILE_PREFIX
 126 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
 127 #endif
 128
 129 /* Provide a LIB_SPEC appropriate for svr4.  Here we tack on the default
 130    standard C library (unless we are building a shared library).  */
 131
 132 #undef  LIB_SPEC
 133 #define LIB_SPEC "%{!shared:%{!symbolic:-lc}}"
 134
 135 /* Provide an ENDFILE_SPEC appropriate for svr4.  Here we tack on our own
 136    magical crtend.o file (see crtstuff.c) which provides part of the
 137    support for getting C++ file-scope static object constructed before
 138    entering `main', followed by the normal svr3/svr4 "finalizer" file,
 139    which is either `gcrtn.o' or `crtn.o'.  */
 140
 141 #undef  ENDFILE_SPEC
 142 #define ENDFILE_SPEC "crtend.o%s %{pg:gcrtn.o}%{!pg:crtn.o%s}"
 143
 144 /* Provide a LINK_SPEC appropriate for svr4.  Here we provide support
 145    for the special GCC options -static, -shared, and -symbolic which
 146    allow us to link things in one of these three modes by applying the
 147    appropriate combinations of options at link-time.  We also provide
 148    support here for as many of the other svr4 linker options as seems
 149    reasonable, given that some of them conflict with options for other
 150    svr4 tools (e.g. the assembler).  In particular, we do support the
 151    -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*,
 152    -l*, -o*, -r, -s, -u*, and -L* options are directly supported
 153    by gcc.c itself.  We don't directly support the -m (generate load
 154    map) option because that conflicts with the -m (run m4) option of
 155    the svr4 assembler.  We also don't directly support the svr4 linker's
 156    -I* or -M* options because these conflict with existing GCC options.
 157    We do however allow passing arbitrary options to the svr4 linker
 158    via the -Wl, option.  We don't support the svr4 linker's -a option
 159    at all because it is totally useless and because it conflicts with
 160    GCC's own -a option.
 161
 162    Note that gcc doesn't allow a space to follow -Y in a -YP,* option.
 163
 164    When the -G link option is used (-shared and -symbolic) a final link is
 165    not being done.  */
 166
 167 #undef  LINK_SPEC
 168 #ifdef CROSS_COMPILE
 169 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
 170                    %{b} %{Wl,*:%*} \
 171                    %{static:-dn -Bstatic} \
 172                    %{shared:-G -dy -z text %{!h*:%{o*:-h %*}}} \
 173                    %{symbolic:-Bsymbolic -G -dy -z text %{!h*:%{o*:-h %*}}} \
 174                    %{G:-G} \
 175                    %{YP,*} \
 176                    %{Qy:} %{!Qn:-Qy}"
 177 #else
 178 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
 179                    %{b} %{Wl,*:%*} \
 180                    %{static:-dn -Bstatic} \
 181                    %{shared:-G -dy -z text %{!h*:%{o*:-h %*}}} \
 182                    %{symbolic:-Bsymbolic -G -dy -z text %{!h*:%{o*:-h %*}}} \
 183                    %{G:-G} \
 184                    %{YP,*} \
 185                    %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
 186                     %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
 187                    %{Qy:} %{!Qn:-Qy}"
 188 #endif
 189
 190 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
 191    /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
 192    link step (depending upon the other gcc options selected, such as
 193    -traditional and -ansi).  These files each contain one (initialized)
 194    copy of a special variable called `_lib_version'.  Each one of these
 195    files has `_lib_version' initialized to a different (enum) value.
 196    The SVR4 library routines query the value of `_lib_version' at run
 197    to decide how they should behave.  Specifically, they decide (based
 198    upon the value of `_lib_version') if they will act in a strictly ANSI
 199    conforming manner or not.
 200 */
 201
 202 #undef  STARTFILE_SPEC
 203 #define STARTFILE_SPEC "%{!shared: \
 204                          %{!symbolic: \
 205                           %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}}}}\
 206                         %{pg:gcrti.o%s}%{!pg:crti.o%s} \
 207                         %{ansi:values-Xc.o%s} \
 208                         %{!ansi: \
 209                          %{traditional:values-Xt.o%s} \
 210                          %{!traditional:values-Xa.o%s}} \
 211                         crtbegin.o%s"
 212
 213 /* Attach a special .ident directive to the end of the file to identify
 214    the version of GCC which compiled this code.  The format of the
 215    .ident string is patterned after the ones produced by native svr4
 216    C compilers.  */
 217
 218 #define IDENT_ASM_OP ".ident"
 219
 220 #define ASM_FILE_END(FILE)                                      \
 221 do {                                                            \
 222      fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n",              \
 223               IDENT_ASM_OP, version_string);                    \
 224    } while (0)
 225
 226 /* Allow #sccs in preprocessor.  */
 227
 228 #define SCCS_DIRECTIVE
 229
 230 /* Output #ident as a .ident.  */
 231
 232 #define ASM_OUTPUT_IDENT(FILE, NAME) \
 233   fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME);
 234
 235 /* Use periods rather than dollar signs in special g++ assembler names.  */
 236
 237 #define NO_DOLLAR_IN_LABEL
 238
 239 /* Writing `int' for a bitfield forces int alignment for the structure.  */
 240
 241 #define PCC_BITFIELD_TYPE_MATTERS 1
 242
 243 /* Implicit library calls should use memcpy, not bcopy, etc.  */
 244
 245 #define TARGET_MEM_FUNCTIONS
 246
 247 /* Handle #pragma weak and #pragma pack.  */
 248
 249 #define HANDLE_SYSV_PRAGMA
 250
 251 /* System V Release 4 uses DWARF debugging info.  */
 252
 253 #define DWARF_DEBUGGING_INFO
 254
 255 /* The numbers used to denote specific machine registers in the System V
 256    Release 4 DWARF debugging information are quite likely to be totally
 257    different from the numbers used in BSD stabs debugging information
 258    for the same kind of target machine.  Thus, we undefine the macro
 259    DBX_REGISTER_NUMBER here as an extra inducement to get people to
 260    provide proper machine-specific definitions of DBX_REGISTER_NUMBER
 261    (which is also used to provide DWARF registers numbers in dwarfout.c)
 262    in their tm.h files which include this file.  */
 263
 264 #undef DBX_REGISTER_NUMBER
 265
 266 /* gas on SVR4 supports the use of .stabs.  Permit -gstabs to be used
 267    in general, although it will only work when using gas.  */
 268
 269 #define DBX_DEBUGGING_INFO
 270
 271 /* When generating stabs debugging, use N_BINCL entries.  */
 272
 273 #define DBX_USE_BINCL
 274
 275 /* Use DWARF debugging info by default.  */
 276
 277 #ifndef PREFERRED_DEBUGGING_TYPE
 278 #define PREFERRED_DEBUGGING_TYPE DWARF_DEBUG
 279 #endif
 280
 281 /* Make LBRAC and RBRAC addresses relative to the start of the
 282    function.  The native Solaris stabs debugging format works this
 283    way, gdb expects it, and it reduces the number of relocation
 284    entries.  */
 285
 286 #define DBX_BLOCKS_FUNCTION_RELATIVE 1
 287
 288 /* When using stabs, gcc2_compiled must be a stabs entry, not an
 289    ordinary symbol, or gdb won't see it.  Furthermore, since gdb reads
 290    the input piecemeal, starting with each N_SO, it's a lot easier if
 291    the gcc2 flag symbol is *after* the N_SO rather than before it.  So
 292    we emit an N_OPT stab there.  */
 293
 294 #define ASM_IDENTIFY_GCC(FILE)                                          \
 295 do                                                                      \
 296   {                                                                     \
 297     if (write_symbols != DBX_DEBUG)                                     \
 298       fputs ("gcc2_compiled.:\n", FILE);                                \
 299   }                                                                     \
 300 while (0)
 301
 302 #define ASM_IDENTIFY_GCC_AFTER_SOURCE(FILE)                             \
 303 do                                                                      \
 304   {                                                                     \
 305     if (write_symbols == DBX_DEBUG)                                     \
 306       fputs ("\t.stabs\t\"gcc2_compiled.\", 0x3c, 0, 0, 0\n", FILE);    \
 307   }                                                                     \
 308 while (0)
 309
 310 /* Like block addresses, stabs line numbers are relative to the
 311    current function.  */
 312
 313 #define ASM_OUTPUT_SOURCE_LINE(file, line)                              \
 314 do                                                                      \
 315   {                                                                     \
 316     static int sym_lineno = 1;                                          \
 317     fprintf (file, ".stabn 68,0,%d,.LM%d-",                             \
 318              line, sym_lineno);                                         \
 319     assemble_name (file,                                                \
 320                    XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0));\
 321     fprintf (file, "\n.LM%d:\n", sym_lineno);                           \
 322     sym_lineno += 1;                                                    \
 323   }                                                                     \
 324 while (0)
 325
 326 /* In order for relative line numbers to work, we must output the
 327    stabs entry for the function name first.  */
 328
 329 #define DBX_FUNCTION_FIRST
 330
 331 /* Generate a blank trailing N_SO to mark the end of the .o file, since
 332    we can't depend upon the linker to mark .o file boundaries with
 333    embedded stabs.  */
 334
 335 #define DBX_OUTPUT_MAIN_SOURCE_FILE_END(FILE, FILENAME)                 \
 336   fprintf (FILE,                                                        \
 337            "\t.text\n\t.stabs \"\",%d,0,0,.Letext\n.Letext:\n", N_SO)
 338
 339 /* Define the actual types of some ANSI-mandated types.  (These
 340    definitions should work for most SVR4 systems).  */
 341
 342 #undef SIZE_TYPE
 343 #define SIZE_TYPE "unsigned int"
 344
 345 #undef PTRDIFF_TYPE
 346 #define PTRDIFF_TYPE "int"
 347
 348 #undef WCHAR_TYPE
 349 #define WCHAR_TYPE "long int"
 350
 351 #undef WCHAR_TYPE_SIZE
 352 #define WCHAR_TYPE_SIZE BITS_PER_WORD
 353
 354 /* This causes trouble, because it requires the host machine
 355    to support ANSI C.  */
 356 /* #define MULTIBYTE_CHARS */
 357
 358 #undef ASM_BYTE_OP
 359 #define ASM_BYTE_OP     ".byte"
 360
 361 #undef SET_ASM_OP
 362 #define SET_ASM_OP      ".set"
 363
 364 /* This is how to begin an assembly language file.  Most svr4 assemblers want
 365    at least a .file directive to come first, and some want to see a .version
 366    directive come right after that.  Here we just establish a default
 367    which generates only the .file directive.  If you need a .version
 368    directive for any specific target, you should override this definition
 369    in the target-specific file which includes this one.  */
 370
 371 #undef ASM_FILE_START
 372 #define ASM_FILE_START(FILE)                                    \
 373   output_file_directive ((FILE), main_input_filename)
 374
 375 /* This is how to allocate empty space in some section.  The .zero
 376    pseudo-op is used for this on most svr4 assemblers.  */
 377
 378 #define SKIP_ASM_OP     ".zero"
 379
 380 #undef ASM_OUTPUT_SKIP
 381 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
 382   fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
 383
 384 /* This is how to output a reference to a user-level label named NAME.
 385    `assemble_name' uses this.
 386
 387    For System V Release 4 the convention is *not* to prepend a leading
 388    underscore onto user-level symbol names.  */
 389
 390 #undef ASM_OUTPUT_LABELREF
 391 #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME)
 392
 393 /* This is how to output an internal numbered label where
 394    PREFIX is the class of label and NUM is the number within the class.
 395
 396    For most svr4 systems, the convention is that any symbol which begins
 397    with a period is not put into the linker symbol table by the assembler.  */
 398
 399 #undef ASM_OUTPUT_INTERNAL_LABEL
 400 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM)                    \
 401 do {                                                                    \
 402   fprintf (FILE, ".%s%d:\n", PREFIX, NUM);                              \
 403 } while (0)
 404
 405 /* This is how to store into the string LABEL
 406    the symbol_ref name of an internal numbered label where
 407    PREFIX is the class of label and NUM is the number within the class.
 408    This is suitable for output with `assemble_name'.
 409
 410    For most svr4 systems, the convention is that any symbol which begins
 411    with a period is not put into the linker symbol table by the assembler.  */
 412
 413 #undef ASM_GENERATE_INTERNAL_LABEL
 414 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)                 \
 415 do {                                                                    \
 416   sprintf (LABEL, "*.%s%d", PREFIX, NUM);                               \
 417 } while (0)
 418
 419 /* Output the label which precedes a jumptable.  Note that for all svr4
 420    systems where we actually generate jumptables (which is to say every
 421    svr4 target except i386, where we use casesi instead) we put the jump-
 422    tables into the .rodata section and since other stuff could have been
 423    put into the .rodata section prior to any given jumptable, we have to
 424    make sure that the location counter for the .rodata section gets pro-
 425    perly re-aligned prior to the actual beginning of the jump table.  */
 426
 427 #define ALIGN_ASM_OP ".align"
 428
 429 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
 430 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE,PREFIX,NUM,TABLE) \
 431   ASM_OUTPUT_ALIGN ((FILE), 2);
 432 #endif
 433
 434 #undef ASM_OUTPUT_CASE_LABEL
 435 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)                \
 436   do {                                                                  \
 437     ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE)         \
 438     ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM);                      \
 439   } while (0)
 440
 441 /* The standard SVR4 assembler seems to require that certain builtin
 442    library routines (e.g. .udiv) be explicitly declared as .globl
 443    in each assembly file where they are referenced.  */
 444
 445 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                          \
 446   ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
 447
 448 /* This says how to output assembler code to declare an
 449    uninitialized external linkage data object.  Under SVR4,
 450    the linker seems to want the alignment of data objects
 451    to depend on their types.  We do exactly that here.  */
 452
 453 #define COMMON_ASM_OP   ".comm"
 454
 455 #undef ASM_OUTPUT_ALIGNED_COMMON
 456 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
 457 do {                                                                    \
 458   fprintf ((FILE), "\t%s\t", COMMON_ASM_OP);                            \
 459   assemble_name ((FILE), (NAME));                                       \
 460   fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);        \
 461 } while (0)
 462
 463 /* This says how to output assembler code to declare an
 464    uninitialized internal linkage data object.  Under SVR4,
 465    the linker seems to want the alignment of data objects
 466    to depend on their types.  We do exactly that here.  */
 467
 468 #define LOCAL_ASM_OP    ".local"
 469
 470 #undef ASM_OUTPUT_ALIGNED_LOCAL
 471 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)               \
 472 do {                                                                    \
 473   fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP);                             \
 474   assemble_name ((FILE), (NAME));                                       \
 475   fprintf ((FILE), "\n");                                               \
 476   ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN);                  \
 477 } while (0)
 478
 479 /* Biggest alignment supported by the object file format of this
 480    machine.  Use this macro to limit the alignment which can be
 481    specified using the `__attribute__ ((aligned (N)))' construct.  If
 482    not defined, the default value is `BIGGEST_ALIGNMENT'.  */
 483
 484 #define MAX_OFILE_ALIGNMENT (32768*8)
 485
 486 /* This is the pseudo-op used to generate a 32-bit word of data with a
 487    specific value in some section.  This is the same for all known svr4
 488    assemblers.  */
 489
 490 #define INT_ASM_OP              ".long"
 491
 492 /* This is the pseudo-op used to generate a contiguous sequence of byte
 493    values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
 494    AUTOMATICALLY APPENDED.  This is the same for most svr4 assemblers.  */
 495
 496 #undef ASCII_DATA_ASM_OP
 497 #define ASCII_DATA_ASM_OP       ".ascii"
 498
 499 /* Support const sections and the ctors and dtors sections for g++.
 500    Note that there appears to be two different ways to support const
 501    sections at the moment.  You can either #define the symbol
 502    READONLY_DATA_SECTION (giving it some code which switches to the
 503    readonly data section) or else you can #define the symbols
 504    EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
 505    SELECT_RTX_SECTION.  We do both here just to be on the safe side.  */
 506
 507 #define USE_CONST_SECTION       1
 508
 509 #define CONST_SECTION_ASM_OP    ".section\t.rodata"
 510
 511 /* Define the pseudo-ops used to switch to the .ctors and .dtors sections.
 512
 513    Note that we want to give these sections the SHF_WRITE attribute
 514    because these sections will actually contain data (i.e. tables of
 515    addresses of functions in the current root executable or shared library
 516    file) and, in the case of a shared library, the relocatable addresses
 517    will have to be properly resolved/relocated (and then written into) by
 518    the dynamic linker when it actually attaches the given shared library
 519    to the executing process.  (Note that on SVR4, you may wish to use the
 520    `-z text' option to the ELF linker, when building a shared library, as
 521    an additional check that you are doing everything right.  But if you do
 522    use the `-z text' option when building a shared library, you will get
 523    errors unless the .ctors and .dtors sections are marked as writable
 524    via the SHF_WRITE attribute.)  */
 525
 526 #define CTORS_SECTION_ASM_OP    ".section\t.ctors,\"aw\""
 527 #define DTORS_SECTION_ASM_OP    ".section\t.dtors,\"aw\""
 528
 529 /* On svr4, we *do* have support for the .init and .fini sections, and we
 530    can put stuff in there to be executed before and after `main'.  We let
 531    crtstuff.c and other files know this by defining the following symbols.
 532    The definitions say how to change sections to the .init and .fini
 533    sections.  This is the same for all known svr4 assemblers.  */
 534
 535 #define INIT_SECTION_ASM_OP     ".section\t.init"
 536 #define FINI_SECTION_ASM_OP     ".section\t.fini"
 537
 538 /* A default list of other sections which we might be "in" at any given
 539    time.  For targets that use additional sections (e.g. .tdesc) you
 540    should override this definition in the target-specific file which
 541    includes this file.  */
 542
 543 #undef EXTRA_SECTIONS
 544 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
 545
 546 /* A default list of extra section function definitions.  For targets
 547    that use additional sections (e.g. .tdesc) you should override this
 548    definition in the target-specific file which includes this file.  */
 549
 550 #undef EXTRA_SECTION_FUNCTIONS
 551 #define EXTRA_SECTION_FUNCTIONS                                         \
 552   CONST_SECTION_FUNCTION                                                \
 553   CTORS_SECTION_FUNCTION                                                \
 554   DTORS_SECTION_FUNCTION
 555
 556 #define READONLY_DATA_SECTION() const_section ()
 557
 558 extern void text_section ();
 559
 560 #define CONST_SECTION_FUNCTION                                          \
 561 void                                                                    \
 562 const_section ()                                                        \
 563 {                                                                       \
 564   if (!USE_CONST_SECTION)                                               \
 565     text_section();                                                     \
 566   else if (in_section != in_const)                                      \
 567     {                                                                   \
 568       fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP);             \
 569       in_section = in_const;                                            \
 570     }                                                                   \
 571 }
 572
 573 #define CTORS_SECTION_FUNCTION                                          \
 574 void                                                                    \
 575 ctors_section ()                                                        \
 576 {                                                                       \
 577   if (in_section != in_ctors)                                           \
 578     {                                                                   \
 579       fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP);             \
 580       in_section = in_ctors;                                            \
 581     }                                                                   \
 582 }
 583
 584 #define DTORS_SECTION_FUNCTION                                          \
 585 void                                                                    \
 586 dtors_section ()                                                        \
 587 {                                                                       \
 588   if (in_section != in_dtors)                                           \
 589     {                                                                   \
 590       fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP);             \
 591       in_section = in_dtors;                                            \
 592     }                                                                   \
 593 }
 594
 595 /* Switch into a generic section.
 596    This is currently only used to support section attributes.
 597
 598    We make the section read-only and executable for a function decl,
 599    read-only for a const data decl, and writable for a non-const data decl.  */
 600 #define ASM_OUTPUT_SECTION_NAME(FILE, DECL, NAME) \
 601   fprintf (FILE, ".section\t%s,\"%s\",@progbits\n", NAME, \
 602            (DECL) && TREE_CODE (DECL) == FUNCTION_DECL ? "ax" : \
 603            (DECL) && TREE_READONLY (DECL) ? "a" : "aw")
 604
 605
 606 /* A C statement (sans semicolon) to output an element in the table of
 607    global constructors.  */
 608 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME)                               \
 609   do {                                                                  \
 610     ctors_section ();                                                   \
 611     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 612     assemble_name (FILE, NAME);                                         \
 613     fprintf (FILE, "\n");                                               \
 614   } while (0)
 615
 616 /* A C statement (sans semicolon) to output an element in the table of
 617    global destructors.  */
 618 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME)                                \
 619   do {                                                                  \
 620     dtors_section ();                                                   \
 621     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 622     assemble_name (FILE, NAME);                                         \
 623     fprintf (FILE, "\n");                                               \
 624   } while (0)
 625
 626 /* A C statement or statements to switch to the appropriate
 627    section for output of DECL.  DECL is either a `VAR_DECL' node
 628    or a constant of some sort.  RELOC indicates whether forming
 629    the initial value of DECL requires link-time relocations.  */
 630
 631 #define SELECT_SECTION(DECL,RELOC)                                      \
 632 {                                                                       \
 633   if (TREE_CODE (DECL) == STRING_CST)                                   \
 634     {                                                                   \
 635       if (! flag_writable_strings)                                      \
 636         const_section ();                                               \
 637       else                                                              \
 638         data_section ();                                                \
 639     }                                                                   \
 640   else if (TREE_CODE (DECL) == VAR_DECL)                                \
 641     {                                                                   \
 642       if ((flag_pic && RELOC)                                           \
 643           || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL)          \
 644           || !DECL_INITIAL (DECL)                                       \
 645           || (DECL_INITIAL (DECL) != error_mark_node                    \
 646               && !TREE_CONSTANT (DECL_INITIAL (DECL))))                 \
 647         data_section ();                                                \
 648       else                                                              \
 649         const_section ();                                               \
 650     }                                                                   \
 651   else                                                                  \
 652     const_section ();                                                   \
 653 }
 654
 655 /* A C statement or statements to switch to the appropriate
 656    section for output of RTX in mode MODE.  RTX is some kind
 657    of constant in RTL.  The argument MODE is redundant except
 658    in the case of a `const_int' rtx.  Currently, these always
 659    go into the const section.  */
 660
 661 #undef SELECT_RTX_SECTION
 662 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
 663
 664 /* Define the strings used for the special svr4 .type and .size directives.
 665    These strings generally do not vary from one system running svr4 to
 666    another, but if a given system (e.g. m88k running svr) needs to use
 667    different pseudo-op names for these, they may be overridden in the
 668    file which includes this one.  */
 669
 670 #define TYPE_ASM_OP     ".type"
 671 #define SIZE_ASM_OP     ".size"
 672
 673 /* This is how we tell the assembler that a symbol is weak.  */
 674
 675 #define ASM_WEAKEN_LABEL(FILE,NAME) \
 676   do { fputs ("\t.weak\t", FILE); assemble_name (FILE, NAME); \
 677        fputc ('\n', FILE); } while (0)
 678
 679 /* The following macro defines the format used to output the second
 680    operand of the .type assembler directive.  Different svr4 assemblers
 681    expect various different forms for this operand.  The one given here
 682    is just a default.  You may need to override it in your machine-
 683    specific tm.h file (depending upon the particulars of your assembler).  */
 684
 685 #define TYPE_OPERAND_FMT        "@%s"
 686
 687 /* Write the extra assembler code needed to declare a function's result.
 688    Most svr4 assemblers don't require any special declaration of the
 689    result value, but there are exceptions.  */
 690
 691 #ifndef ASM_DECLARE_RESULT
 692 #define ASM_DECLARE_RESULT(FILE, RESULT)
 693 #endif
 694
 695 /* These macros generate the special .type and .size directives which
 696    are used to set the corresponding fields of the linker symbol table
 697    entries in an ELF object file under SVR4.  These macros also output
 698    the starting labels for the relevant functions/objects.  */
 699
 700 /* Write the extra assembler code needed to declare a function properly.
 701    Some svr4 assemblers need to also have something extra said about the
 702    function's return value.  We allow for that here.  */
 703
 704 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
 705   do {                                                                  \
 706     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 707     assemble_name (FILE, NAME);                                         \
 708     putc (',', FILE);                                                   \
 709     fprintf (FILE, TYPE_OPERAND_FMT, "function");                       \
 710     putc ('\n', FILE);                                                  \
 711     ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));                      \
 712     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 713   } while (0)
 714
 715 /* Write the extra assembler code needed to declare an object properly.  */
 716
 717 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
 718   do {                                                                  \
 719     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 720     assemble_name (FILE, NAME);                                         \
 721     putc (',', FILE);                                                   \
 722     fprintf (FILE, TYPE_OPERAND_FMT, "object");                         \
 723     putc ('\n', FILE);                                                  \
 724     size_directive_output = 0;                                          \
 725     if (!flag_inhibit_size_directive && DECL_SIZE (DECL))               \
 726       {                                                                 \
 727         size_directive_output = 1;                                      \
 728         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 729         assemble_name (FILE, NAME);                                     \
 730         fprintf (FILE, ",%d\n",  int_size_in_bytes (TREE_TYPE (DECL))); \
 731       }                                                                 \
 732     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 733   } while (0)
 734
 735 /* Output the size directive for a decl in rest_of_decl_compilation
 736    in the case where we did not do so before the initializer.
 737    Once we find the error_mark_node, we know that the value of
 738    size_directive_output was set
 739    by ASM_DECLARE_OBJECT_NAME when it was run for the same decl.  */
 740
 741 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END)         \
 742 do {                                                                     \
 743      char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0);                   \
 744      if (!flag_inhibit_size_directive && DECL_SIZE (DECL)                \
 745          && ! AT_END && TOP_LEVEL                                        \
 746          && DECL_INITIAL (DECL) == error_mark_node                       \
 747          && !size_directive_output)                                      \
 748        {                                                                 \
 749          size_directive_output = 1;                                      \
 750          fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 751          assemble_name (FILE, name);                                     \
 752          fprintf (FILE, ",%d\n",  int_size_in_bytes (TREE_TYPE (DECL))); \
 753        }                                                                 \
 754    } while (0)
 755
 756 /* This is how to declare the size of a function.  */
 757
 758 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)                    \
 759   do {                                                                  \
 760     if (!flag_inhibit_size_directive)                                   \
 761       {                                                                 \
 762         char label[256];                                                \
 763         static int labelno;                                             \
 764         labelno++;                                                      \
 765         ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno);            \
 766         ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno);               \
 767         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 768         assemble_name (FILE, (FNAME));                                  \
 769         fprintf (FILE, ",");                                            \
 770         assemble_name (FILE, label);                                    \
 771         fprintf (FILE, "-");                                            \
 772         assemble_name (FILE, (FNAME));                                  \
 773         putc ('\n', FILE);                                              \
 774       }                                                                 \
 775   } while (0)
 776
 777 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
 778    ASM_OUTPUT_LIMITED_STRING macros.  Each byte in the table
 779    corresponds to a particular byte value [0..255].  For any
 780    given byte value, if the value in the corresponding table
 781    position is zero, the given character can be output directly.
 782    If the table value is 1, the byte must be output as a \ooo
 783    octal escape.  If the tables value is anything else, then the
 784    byte value should be output as a \ followed by the value
 785    in the table.  Note that we can use standard UN*X escape
 786    sequences for many control characters, but we don't use
 787    \a to represent BEL because some svr4 assemblers (e.g. on
 788    the i386) don't know about that.  Also, we don't use \v
 789    since some versions of gas, such as 2.2 did not accept it.  */
 790
 791 #define ESCAPES \
 792 "\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\
 793 \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\
 794 \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\
 795 \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\
 796 \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\
 797 \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\
 798 \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\
 799 \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"
 800
 801 /* Some svr4 assemblers have a limit on the number of characters which
 802    can appear in the operand of a .string directive.  If your assembler
 803    has such a limitation, you should define STRING_LIMIT to reflect that
 804    limit.  Note that at least some svr4 assemblers have a limit on the
 805    actual number of bytes in the double-quoted string, and that they
 806    count each character in an escape sequence as one byte.  Thus, an
 807    escape sequence like \377 would count as four bytes.
 808
 809    If your target assembler doesn't support the .string directive, you
 810    should define this to zero.
 811 */
 812
 813 #define STRING_LIMIT    ((unsigned) 256)
 814
 815 #define STRING_ASM_OP   ".string"
 816
 817 /* The routine used to output NUL terminated strings.  We use a special
 818    version of this for most svr4 targets because doing so makes the
 819    generated assembly code more compact (and thus faster to assemble)
 820    as well as more readable, especially for targets like the i386
 821    (where the only alternative is to output character sequences as
 822    comma separated lists of numbers).   */
 823
 824 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)                            \
 825   do                                                                    \
 826     {                                                                   \
 827       register unsigned char *_limited_str = (unsigned char *) (STR);   \
 828       register unsigned ch;                                             \
 829       fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP);                      \
 830       for (; ch = *_limited_str; _limited_str++)                        \
 831         {                                                               \
 832           register int escape;                                          \
 833           switch (escape = ESCAPES[ch])                                 \
 834             {                                                           \
 835             case 0:                                                     \
 836               putc (ch, (FILE));                                        \
 837               break;                                                    \
 838             case 1:                                                     \
 839               fprintf ((FILE), "\\%03o", ch);                           \
 840               break;                                                    \
 841             default:                                                    \
 842               putc ('\\', (FILE));                                      \
 843               putc (escape, (FILE));                                    \
 844               break;                                                    \
 845             }                                                           \
 846         }                                                               \
 847       fprintf ((FILE), "\"\n");                                         \
 848     }                                                                   \
 849   while (0)
 850
 851 /* The routine used to output sequences of byte values.  We use a special
 852    version of this for most svr4 targets because doing so makes the
 853    generated assembly code more compact (and thus faster to assemble)
 854    as well as more readable.  Note that if we find subparts of the
 855    character sequence which end with NUL (and which are shorter than
 856    STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING.  */
 857
 858 #undef ASM_OUTPUT_ASCII
 859 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
 860   do                                                                    \
 861     {                                                                   \
 862       register unsigned char *_ascii_bytes = (unsigned char *) (STR);   \
 863       register unsigned char *limit = _ascii_bytes + (LENGTH);          \
 864       register unsigned bytes_in_chunk = 0;                             \
 865       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
 866         {                                                               \
 867           register unsigned char *p;                                    \
 868           if (bytes_in_chunk >= 60)                                     \
 869             {                                                           \
 870               fprintf ((FILE), "\"\n");                                 \
 871               bytes_in_chunk = 0;                                       \
 872             }                                                           \
 873           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
 874             continue;                                                   \
 875           if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT)          \
 876             {                                                           \
 877               if (bytes_in_chunk > 0)                                   \
 878                 {                                                       \
 879                   fprintf ((FILE), "\"\n");                             \
 880                   bytes_in_chunk = 0;                                   \
 881                 }                                                       \
 882               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
 883               _ascii_bytes = p;                                         \
 884             }                                                           \
 885           else                                                          \
 886             {                                                           \
 887               register int escape;                                      \
 888               register unsigned ch;                                     \
 889               if (bytes_in_chunk == 0)                                  \
 890                 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP);        \
 891               switch (escape = ESCAPES[ch = *_ascii_bytes])             \
 892                 {                                                       \
 893                 case 0:                                                 \
 894                   putc (ch, (FILE));                                    \
 895                   bytes_in_chunk++;                                     \
 896                   break;                                                \
 897                 case 1:                                                 \
 898                   fprintf ((FILE), "\\%03o", ch);                       \
 899                   bytes_in_chunk += 4;                                  \
 900                   break;                                                \
 901                 default:                                                \
 902                   putc ('\\', (FILE));                                  \
 903                   putc (escape, (FILE));                                \
 904                   bytes_in_chunk += 2;                                  \
 905                   break;                                                \
 906                 }                                                       \
 907             }                                                           \
 908         }                                                               \
 909       if (bytes_in_chunk > 0)                                           \
 910         fprintf ((FILE), "\"\n");                                       \
 911     }                                                                   \
 912   while (0)
 913
 914 /* All SVR4 targets use the ELF object file format.  */
 915 #define OBJECT_FORMAT_ELF