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