gcc/config/svr4.h

   1 /* svr4.h  --  operating system specific defines to be used when
   2    targeting GCC for some generic System V Release 4 system.
   3    Copyright (C) 1991 Free Software Foundation, Inc.
   4
   5    Written by Ron Guilmette (rfg@ncd.com).
   6
   7 This file is part of GNU CC.
   8
   9 GNU CC is free software; you can redistribute it and/or modify
  10 it under the terms of the GNU General Public License as published by
  11 the Free Software Foundation; either version 2, or (at your option)
  12 any later version.
  13
  14 GNU CC is distributed in the hope that it will be useful,
  15 but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 GNU General Public License for more details.
  18
  19 You should have received a copy of the GNU General Public License
  20 along with GNU CC; see the file COPYING.  If not, write to
  21 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, 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 /* For the sake of libgcc2.c, indicate target supports atexit.  */
  43 #define HAVE_ATEXIT
  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   (   (CHAR) == 'D' \
  54    || (CHAR) == 'U' \
  55    || (CHAR) == 'o' \
  56    || (CHAR) == 'e' \
  57    || (CHAR) == 'u' \
  58    || (CHAR) == 'I' \
  59    || (CHAR) == 'm' \
  60    || (CHAR) == 'L' \
  61    || (CHAR) == 'A' \
  62    || (CHAR) == 'h' \
  63    || (CHAR) == 'z')
  64
  65 /* This defines which multi-letter switches take arguments.  On svr4,
  66    there are no such switches except those implemented by GCC itself.  */
  67
  68 #define WORD_SWITCH_TAKES_ARG(STR)                      \
  69  (!strcmp (STR, "include") || !strcmp (STR, "imacros")  \
  70   || !strcmp (STR, "aux-info"))
  71
  72 /* You should redefine CPP_PREDEFINES in any file which includes this one.
  73    The definition should be appropriate for the type of target system
  74    involved, and it should include any -A (assertion) options which are
  75    appropriate for the given target system.  */
  76 #undef CPP_PREDEFINES
  77
  78 /* Provide an ASM_SPEC appropriate for svr4.  Here we try to support as
  79    many of the specialized svr4 assembler options as seems reasonable,
  80    given that there are certain options which we can't (or shouldn't)
  81    support directly due to the fact that they conflict with other options
  82    for other svr4 tools (e.g. ld) or with other options for GCC itself.
  83    For example, we don't support the -o (output file) or -R (remove
  84    input file) options because GCC already handles these things.  We
  85    also don't support the -m (run m4) option for the assembler because
  86    that conflicts with the -m (produce load map) option of the svr4
  87    linker.  We do however allow passing arbitrary options to the svr4
  88    assembler via the -Wa, option.
  89
  90    Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,*
  91    option.
  92 */
  93
  94 #undef ASM_SPEC
  95 #define ASM_SPEC \
  96   "%{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
  97
  98 /* svr4 assemblers need the `-' (indicating input from stdin) to come after
  99    the -o option (and its argument) for some reason.  If we try to put it
 100    before the -o option, the assembler will try to read the file named as
 101    the output file in the -o option as an input file (after it has already
 102    written some stuff to it) and the binary stuff contained therein will
 103    cause totally confuse the assembler, resulting in many spurious error
 104    messages.  */
 105
 106 #undef ASM_FINAL_SPEC
 107 #define ASM_FINAL_SPEC "%{pipe:-}"
 108
 109 /* Under svr4, the normal location of the `ld' and `as' programs is the
 110    /usr/ccs/bin directory.  */
 111
 112 #undef MD_EXEC_PREFIX
 113 #define MD_EXEC_PREFIX "/usr/ccs/bin/"
 114
 115 /* Under svr4, the normal location of the various *crt*.o files is the
 116    /usr/ccs/lib directory.  */
 117
 118 #undef MD_STARTFILE_PREFIX
 119 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
 120
 121 /* Provide a LIB_SPEC appropriate for svr4.  Here we tack on the default
 122    standard C library (unless we are building a shared library) followed by
 123    our own magical crtend.o file (see crtstuff.c) which provides part of
 124    the support for getting C++ file-scope static object constructed before
 125    entering `main', followed by the normal svr3/svr4 "finalizer" file,
 126    which is either `gcrtn.o' or `crtn.o'.  */
 127
 128 #undef  LIB_SPEC
 129 #define LIB_SPEC \
 130   "%{!shared:%{!symbolic:-lc}} \
 131   crtend.o%s \
 132   %{!shared:%{!symbolic:%{pg:gcrtn.o}%{!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    -h*, -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 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
 159                    %{b} %{Wl,*:%*} \
 160                    %{static:-dn -Bstatic} \
 161                    %{shared:-G -dy} \
 162                    %{symbolic:-Bsymbolic -G -dy} \
 163                    %{G:-G} \
 164                    %{YP,*} \
 165                    %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
 166                     %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
 167                    %{Qy:} %{!Qn:-Qy}"
 168
 169 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
 170    /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
 171    link step (depending upon the other gcc options selected, such as
 172    -traditional and -ansi).  These files each contain one (initialized)
 173    copy of a special variable called `_lib_version'.  Each one of these
 174    files has `_lib_version' initialized to a different (enum) value.
 175    The SVR4 library routines query the value of `_lib_version' at run
 176    to decide how they should behave.  Specifically, they decide (based
 177    upon the value of `_lib_version') if they will act in a strictly ANSI
 178    conforming manner or not.
 179 */
 180
 181 #undef  STARTFILE_SPEC
 182 #define STARTFILE_SPEC "%{!shared: \
 183                          %{!symbolic: \
 184                           %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} \
 185                           %{pg:gcrti.o%s}%{!pg:crti.o%s} \
 186                           %{ansi:values-Xc.o%s} \
 187                           %{!ansi: \
 188                            %{traditional:values-Xt.o%s} \
 189                            %{!traditional:values-Xa.o%s}}}} crtbegin.o%s"
 190
 191 /* Attach a special .ident directive to the end of the file to identify
 192    the version of GCC which compiled this code.  The format of the
 193    .ident string is patterned after the ones produced by native svr4
 194    C compilers.  */
 195
 196 #define IDENT_ASM_OP ".ident"
 197
 198 #define ASM_FILE_END(FILE)                                      \
 199 do {                                                            \
 200      fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n",              \
 201               IDENT_ASM_OP, version_string);                    \
 202    } while (0)
 203
 204 /* Allow #sccs in preprocessor.  */
 205
 206 #define SCCS_DIRECTIVE
 207
 208 /* Output #ident as a .ident.  */
 209
 210 #define ASM_OUTPUT_IDENT(FILE, NAME) \
 211   fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME);
 212
 213 /* Use periods rather than dollar signs in special g++ assembler names.  */
 214
 215 #define NO_DOLLAR_IN_LABEL
 216
 217 /* Writing `int' for a bitfield forces int alignment for the structure.  */
 218
 219 #define PCC_BITFIELD_TYPE_MATTERS 1
 220
 221 /* Implicit library calls should use memcpy, not bcopy, etc.  */
 222
 223 #define TARGET_MEM_FUNCTIONS
 224
 225 /* Handle #pragma weak and #pragma pack.  */
 226
 227 #define HANDLE_SYSV_PRAGMA
 228
 229 /* System V Release 4 uses DWARF debugging info.  */
 230
 231 #define DWARF_DEBUGGING_INFO
 232
 233 /* The numbers used to denote specific machine registers in the System V
 234    Release 4 DWARF debugging information are quite likely to be totally
 235    different from the numbers used in BSD stabs debugging information
 236    for the same kind of target machine.  Thus, we undefine the macro
 237    DBX_REGISTER_NUMBER here as an extra inducement to get people to
 238    provide proper machine-specific definitions of DBX_REGISTER_NUMBER
 239    (which is also used to provide DWARF registers numbers in dwarfout.c)
 240    in their tm.h files which include this file.  */
 241
 242 #undef DBX_REGISTER_NUMBER
 243
 244 /* Define the actual types of some ANSI-mandated types.  (These
 245    definitions should work for most SVR4 systems).  */
 246
 247 #undef SIZE_TYPE
 248 #define SIZE_TYPE "unsigned int"
 249
 250 #undef PTRDIFF_TYPE
 251 #define PTRDIFF_TYPE "int"
 252
 253 #undef WCHAR_TYPE
 254 #define WCHAR_TYPE "long int"
 255
 256 #undef WCHAR_TYPE_SIZE
 257 #define WCHAR_TYPE_SIZE BITS_PER_WORD
 258
 259 /* This causes trouble, because it requires the host machine
 260    to support ANSI C.  */
 261 /* #define MULTIBYTE_CHARS */
 262
 263 #undef ASM_BYTE_OP
 264 #define ASM_BYTE_OP     ".byte"
 265
 266 #undef SET_ASM_OP
 267 #define SET_ASM_OP      ".set"
 268
 269 /* This is how to begin an assembly language file.  Most svr4 assemblers want
 270    at least a .file directive to come first, and some want to see a .version
 271    directive come right after that.  Here we just establish a default
 272    which generates only the .file directive.  If you need a .version
 273    directive for any specific target, you should override this definition
 274    in the target-specific file which includes this one.  */
 275
 276 #undef ASM_FILE_START
 277 #define ASM_FILE_START(FILE)                                    \
 278   output_file_directive ((FILE), main_input_filename)
 279
 280 /* This is how to allocate empty space in some section.  The .zero
 281    pseudo-op is used for this on most svr4 assemblers.  */
 282
 283 #define SKIP_ASM_OP     ".zero"
 284
 285 #undef ASM_OUTPUT_SKIP
 286 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
 287   fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
 288
 289 /* This is how to output a reference to a user-level label named NAME.
 290    `assemble_name' uses this.
 291
 292    For System V Release 4 the convention is *not* to prepend a leading
 293    underscore onto user-level symbol names.  */
 294
 295 #undef ASM_OUTPUT_LABELREF
 296 #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME)
 297
 298 /* This is how to output an internal numbered label where
 299    PREFIX is the class of label and NUM is the number within the class.
 300
 301    For most svr4 systems, the convention is that any symbol which begins
 302    with a period is not put into the linker symbol table by the assembler.  */
 303
 304 #undef ASM_OUTPUT_INTERNAL_LABEL
 305 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM)                    \
 306 do {                                                                    \
 307   fprintf (FILE, ".%s%d:\n", PREFIX, NUM);                              \
 308 } while (0)
 309
 310 /* This is how to store into the string LABEL
 311    the symbol_ref name of an internal numbered label where
 312    PREFIX is the class of label and NUM is the number within the class.
 313    This is suitable for output with `assemble_name'.
 314
 315    For most svr4 systems, the convention is that any symbol which begins
 316    with a period is not put into the linker symbol table by the assembler.  */
 317
 318 #undef ASM_GENERATE_INTERNAL_LABEL
 319 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)                 \
 320 do {                                                                    \
 321   sprintf (LABEL, "*.%s%d", PREFIX, NUM);                               \
 322 } while (0)
 323
 324 /* Output the label which preceeds a jumptable.  Note that for all svr4
 325    systems where we actually generate jumptables (which is to say every
 326    svr4 target except i386, where we use casesi instead) we put the jump-
 327    tables into the .rodata section and since other stuff could have been
 328    put into the .rodata section prior to any given jumptable, we have to
 329    make sure that the location counter for the .rodata section gets pro-
 330    perly re-aligned prior to the actual beginning of the jump table.  */
 331
 332 #define ALIGN_ASM_OP ".align"
 333
 334 #undef ASM_OUTPUT_CASE_LABEL
 335 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)                \
 336   do {                                                                  \
 337     ASM_OUTPUT_ALIGN ((FILE), 2);                                       \
 338     ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM);                      \
 339   } while (0)
 340
 341 /* The standard SVR4 assembler seems to require that certain builtin
 342    library routines (e.g. .udiv) be explicitly declared as .globl
 343    in each assembly file where they are referenced.  */
 344
 345 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                          \
 346   ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
 347
 348 /* This says how to output assembler code to declare an
 349    uninitialized external linkage data object.  Under SVR4,
 350    the linker seems to want the alignment of data objects
 351    to depend on their types.  We do exactly that here.  */
 352
 353 #define COMMON_ASM_OP   ".comm"
 354
 355 #undef ASM_OUTPUT_ALIGNED_COMMON
 356 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
 357 do {                                                                    \
 358   fprintf ((FILE), "\t%s\t", COMMON_ASM_OP);                            \
 359   assemble_name ((FILE), (NAME));                                       \
 360   fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);        \
 361 } while (0)
 362
 363 /* This says how to output assembler code to declare an
 364    uninitialized internal linkage data object.  Under SVR4,
 365    the linker seems to want the alignment of data objects
 366    to depend on their types.  We do exactly that here.  */
 367
 368 #define LOCAL_ASM_OP    ".local"
 369
 370 #undef ASM_OUTPUT_ALIGNED_LOCAL
 371 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)               \
 372 do {                                                                    \
 373   fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP);                             \
 374   assemble_name ((FILE), (NAME));                                       \
 375   fprintf ((FILE), "\n");                                               \
 376   ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN);                  \
 377 } while (0)
 378
 379 /* This is the pseudo-op used to generate a 32-bit word of data with a
 380    specific value in some section.  This is the same for all known svr4
 381    assemblers.  */
 382
 383 #define INT_ASM_OP              ".long"
 384
 385 /* This is the pseudo-op used to generate a contiguous sequence of byte
 386    values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
 387    AUTOMATICALLY APPENDED.  This is the same for most svr4 assemblers.  */
 388
 389 #undef ASCII_DATA_ASM_OP
 390 #define ASCII_DATA_ASM_OP       ".ascii"
 391
 392 /* Support const sections and the ctors and dtors sections for g++.
 393    Note that there appears to be two different ways to support const
 394    sections at the moment.  You can either #define the symbol
 395    READONLY_DATA_SECTION (giving it some code which switches to the
 396    readonly data section) or else you can #define the symbols
 397    EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
 398    SELECT_RTX_SECTION.  We do both here just to be on the safe side.  */
 399
 400 #define USE_CONST_SECTION       1
 401
 402 #define CONST_SECTION_ASM_OP    ".section\t.rodata"
 403 #define CTORS_SECTION_ASM_OP    ".section\t.ctors,\"a\",@progbits"
 404 #define DTORS_SECTION_ASM_OP    ".section\t.dtors,\"a\",@progbits"
 405
 406 /* On svr4, we *do* have support for the .init section, and we can put
 407    stuff in there to be executed before `main'.  We let crtstuff.c and
 408    other files know this by defining the following symbol.  The definition
 409    says how to change sections to the .init section.  This is the same
 410    for all know svr4 assemblers.  */
 411
 412 #define INIT_SECTION_ASM_OP     ".section\t.init"
 413
 414 /* A default list of other sections which we might be "in" at any given
 415    time.  For targets that use additional sections (e.g. .tdesc) you
 416    should override this definition in the target-specific file which
 417    includes this file.  */
 418
 419 #undef EXTRA_SECTIONS
 420 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
 421
 422 /* A default list of extra section function definitions.  For targets
 423    that use additional sections (e.g. .tdesc) you should override this
 424    definition in the target-specific file which includes this file.  */
 425
 426 #undef EXTRA_SECTION_FUNCTIONS
 427 #define EXTRA_SECTION_FUNCTIONS                                         \
 428   CONST_SECTION_FUNCTION                                                \
 429   CTORS_SECTION_FUNCTION                                                \
 430   DTORS_SECTION_FUNCTION
 431
 432 #define READONLY_DATA_SECTION() const_section ()
 433
 434 extern void text_section();
 435
 436 #define CONST_SECTION_FUNCTION                                          \
 437 void                                                                    \
 438 const_section ()                                                        \
 439 {                                                                       \
 440   if (!USE_CONST_SECTION)                                               \
 441     text_section();                                                     \
 442   else if (in_section != in_const)                                      \
 443     {                                                                   \
 444       fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP);             \
 445       in_section = in_const;                                            \
 446     }                                                                   \
 447 }
 448
 449 #define CTORS_SECTION_FUNCTION                                          \
 450 void                                                                    \
 451 ctors_section ()                                                        \
 452 {                                                                       \
 453   if (in_section != in_ctors)                                           \
 454     {                                                                   \
 455       fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP);             \
 456       in_section = in_ctors;                                            \
 457     }                                                                   \
 458 }
 459
 460 #define DTORS_SECTION_FUNCTION                                          \
 461 void                                                                    \
 462 dtors_section ()                                                        \
 463 {                                                                       \
 464   if (in_section != in_dtors)                                           \
 465     {                                                                   \
 466       fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP);             \
 467       in_section = in_dtors;                                            \
 468     }                                                                   \
 469 }
 470
 471 /* A C statement (sans semicolon) to output an element in the table of
 472    global constructors.  */
 473 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME)                               \
 474   do {                                                                  \
 475     ctors_section ();                                                   \
 476     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 477     assemble_name (FILE, NAME);                                         \
 478     fprintf (FILE, "\n");                                               \
 479   } while (0)
 480
 481 /* A C statement (sans semicolon) to output an element in the table of
 482    global destructors.  */
 483 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME)                                \
 484   do {                                                                  \
 485     dtors_section ();                                                   \
 486     fprintf (FILE, "\t%s\t ", INT_ASM_OP);                              \
 487     assemble_name (FILE, NAME);                                         \
 488     fprintf (FILE, "\n");                                               \
 489   } while (0)
 490
 491 /* A C statement or statements to switch to the appropriate
 492    section for output of DECL.  DECL is either a `VAR_DECL' node
 493    or a constant of some sort.  RELOC indicates whether forming
 494    the initial value of DECL requires link-time relocations.  */
 495
 496 #define SELECT_SECTION(DECL,RELOC)                                      \
 497 {                                                                       \
 498   if (TREE_CODE (DECL) == STRING_CST)                                   \
 499     {                                                                   \
 500       if (! flag_writable_strings)                                      \
 501         const_section ();                                               \
 502       else                                                              \
 503         data_section ();                                                \
 504     }                                                                   \
 505   else if (TREE_CODE (DECL) == VAR_DECL)                                \
 506     {                                                                   \
 507       if ((flag_pic && RELOC)                                           \
 508           || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL))         \
 509         data_section ();                                                \
 510       else                                                              \
 511         const_section ();                                               \
 512     }                                                                   \
 513   else                                                                  \
 514     const_section ();                                                   \
 515 }
 516
 517 /* A C statement or statements to switch to the appropriate
 518    section for output of RTX in mode MODE.  RTX is some kind
 519    of constant in RTL.  The argument MODE is redundant except
 520    in the case of a `const_int' rtx.  Currently, these always
 521    go into the const section.  */
 522
 523 #undef SELECT_RTX_SECTION
 524 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
 525
 526 /* Define the strings used for the special svr4 .type and .size directives.
 527    These strings generally do not vary from one system running svr4 to
 528    another, but if a given system (e.g. m88k running svr) needs to use
 529    different pseudo-op names for these, they may be overridden in the
 530    file which includes this one.  */
 531
 532 #define TYPE_ASM_OP     ".type"
 533 #define SIZE_ASM_OP     ".size"
 534 #define WEAK_ASM_OP     ".weak"
 535
 536 /* The following macro defines the format used to output the second
 537    operand of the .type assembler directive.  Different svr4 assemblers
 538    expect various different forms for this operand.  The one given here
 539    is just a default.  You may need to override it in your machine-
 540    specific tm.h file (depending upon the particulars of your assembler).  */
 541
 542 #define TYPE_OPERAND_FMT        "@%s"
 543
 544 /* Write the extra assembler code needed to declare a function's result.
 545    Most svr4 assemblers don't require any special declaration of the
 546    result value, but there are exceptions.  */
 547
 548 #ifndef ASM_DECLARE_RESULT
 549 #define ASM_DECLARE_RESULT(FILE, RESULT)
 550 #endif
 551
 552 /* These macros generate the special .type and .size directives which
 553    are used to set the corresponding fields of the linker symbol table
 554    entries in an ELF object file under SVR4.  These macros also output
 555    the starting labels for the relevant functions/objects.  */
 556
 557 /* Write the extra assembler code needed to declare a function properly.
 558    Some svr4 assemblers need to also have something extra said about the
 559    function's return value.  We allow for that here.  */
 560
 561 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)                     \
 562   do {                                                                  \
 563     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 564     assemble_name (FILE, NAME);                                         \
 565     putc (',', FILE);                                                   \
 566     fprintf (FILE, TYPE_OPERAND_FMT, "function");                       \
 567     putc ('\n', FILE);                                                  \
 568     ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));                      \
 569     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 570   } while (0)
 571
 572 /* Write the extra assembler code needed to declare an object properly.  */
 573
 574 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)                       \
 575   do {                                                                  \
 576     fprintf (FILE, "\t%s\t ", TYPE_ASM_OP);                             \
 577     assemble_name (FILE, NAME);                                         \
 578     putc (',', FILE);                                                   \
 579     fprintf (FILE, TYPE_OPERAND_FMT, "object");                         \
 580     putc ('\n', FILE);                                                  \
 581     if (!flag_inhibit_size_directive)                                   \
 582       {                                                                 \
 583         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 584         assemble_name (FILE, NAME);                                     \
 585         fprintf (FILE, ",%d\n",  int_size_in_bytes (TREE_TYPE (decl))); \
 586       }                                                                 \
 587     ASM_OUTPUT_LABEL(FILE, NAME);                                       \
 588   } while (0)
 589
 590 /* This is how to declare the size of a function.  */
 591
 592 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)                    \
 593   do {                                                                  \
 594     if (!flag_inhibit_size_directive)                                   \
 595       {                                                                 \
 596         char label[256];                                                \
 597         static int labelno;                                             \
 598         labelno++;                                                      \
 599         ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno);            \
 600         ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno);               \
 601         fprintf (FILE, "\t%s\t ", SIZE_ASM_OP);                         \
 602         assemble_name (FILE, (FNAME));                                  \
 603         fprintf (FILE, ",");                                            \
 604         assemble_name (FILE, label);                                    \
 605         fprintf (FILE, "-");                                            \
 606         assemble_name (FILE, (FNAME));                                  \
 607         putc ('\n', FILE);                                              \
 608       }                                                                 \
 609   } while (0)
 610
 611 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
 612    ASM_OUTPUT_LIMITED_STRING macros.  Each byte in the table
 613    corresponds to a particular byte value [0..255].  For any
 614    given byte value, if the value in the corresponding table
 615    position is zero, the given character can be output directly.
 616    If the table value is 1, the byte must be output as a \ooo
 617    octal escape.  If the tables value is anything else, then the
 618    byte value should be output as a \ followed by the value
 619    in the table.  Note that we can use standard UN*X escape
 620    sequences for many control characters, but we don't use
 621    \a to represent BEL because some svr4 assemblers (e.g. on
 622    the i386) don't know about that.   */
 623
 624 #define ESCAPES \
 625 "\1\1\1\1\1\1\1\1btnvfr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
 626 \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\
 627 \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\
 628 \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\
 629 \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\
 630 \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\
 631 \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\
 632 \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"
 633
 634 /* Some svr4 assemblers have a limit on the number of characters which
 635    can appear in the operand of a .string directive.  If your assembler
 636    has such a limitation, you should define STRING_LIMIT to reflect that
 637    limit.  Note that at least some svr4 assemblers have a limit on the
 638    actual number of bytes in the double-quoted string, and that they
 639    count each character in an escape sequence as one byte.  Thus, an
 640    escape sequence like \377 would count as four bytes.
 641
 642    If your target assembler doesn't support the .string directive, you
 643    should define this to zero.
 644 */
 645
 646 #define STRING_LIMIT    ((unsigned) 256)
 647
 648 #define STRING_ASM_OP   ".string"
 649
 650 /* The routine used to output NUL terminated strings.  We use a special
 651    version of this for most svr4 targets because doing so makes the
 652    generated assembly code more compact (and thus faster to assemble)
 653    as well as more readable, especially for targets like the i386
 654    (where the only alternative is to output character sequences as
 655    comma separated lists of numbers).   */
 656
 657 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)                            \
 658   do                                                                    \
 659     {                                                                   \
 660       register unsigned char *_limited_str = (unsigned char *) (STR);   \
 661       register unsigned ch;                                             \
 662       fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP);                      \
 663       for (; ch = *_limited_str; _limited_str++)                        \
 664         {                                                               \
 665           register int escape;                                          \
 666           switch (escape = ESCAPES[ch])                                 \
 667             {                                                           \
 668             case 0:                                                     \
 669               putc (ch, (FILE));                                        \
 670               break;                                                    \
 671             case 1:                                                     \
 672               fprintf ((FILE), "\\%03o", ch);                           \
 673               break;                                                    \
 674             default:                                                    \
 675               putc ('\\', (FILE));                                      \
 676               putc (escape, (FILE));                                    \
 677               break;                                                    \
 678             }                                                           \
 679         }                                                               \
 680       fprintf ((FILE), "\"\n");                                         \
 681     }                                                                   \
 682   while (0)
 683
 684 /* The routine used to output sequences of byte values.  We use a special
 685    version of this for most svr4 targets because doing so makes the
 686    generated assembly code more compact (and thus faster to assemble)
 687    as well as more readable.  Note that if we find subparts of the
 688    character sequence which end with NUL (and which are shorter than
 689    STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING.  */
 690
 691 #undef ASM_OUTPUT_ASCII
 692 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
 693   do                                                                    \
 694     {                                                                   \
 695       register unsigned char *_ascii_bytes = (unsigned char *) (STR);   \
 696       register unsigned char *limit = _ascii_bytes + (LENGTH);          \
 697       register unsigned bytes_in_chunk = 0;                             \
 698       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
 699         {                                                               \
 700           register unsigned char *p;                                    \
 701           if (bytes_in_chunk >= 60)                                     \
 702             {                                                           \
 703               fprintf ((FILE), "\"\n");                                 \
 704               bytes_in_chunk = 0;                                       \
 705             }                                                           \
 706           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
 707             continue;                                                   \
 708           if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT)          \
 709             {                                                           \
 710               if (bytes_in_chunk > 0)                                   \
 711                 {                                                       \
 712                   fprintf ((FILE), "\"\n");                             \
 713                   bytes_in_chunk = 0;                                   \
 714                 }                                                       \
 715               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
 716               _ascii_bytes = p;                                         \
 717             }                                                           \
 718           else                                                          \
 719             {                                                           \
 720               register int escape;                                      \
 721               register unsigned ch;                                     \
 722               if (bytes_in_chunk == 0)                                  \
 723                 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP);        \
 724               switch (escape = ESCAPES[ch = *_ascii_bytes])             \
 725                 {                                                       \
 726                 case 0:                                                 \
 727                   putc (ch, (FILE));                                    \
 728                   bytes_in_chunk++;                                     \
 729                   break;                                                \
 730                 case 1:                                                 \
 731                   fprintf ((FILE), "\\%03o", ch);                       \
 732                   bytes_in_chunk += 4;                                  \
 733                   break;                                                \
 734                 default:                                                \
 735                   putc ('\\', (FILE));                                  \
 736                   putc (escape, (FILE));                                \
 737                   bytes_in_chunk += 2;                                  \
 738                   break;                                                \
 739                 }                                                       \
 740             }                                                           \
 741         }                                                               \
 742       if (bytes_in_chunk > 0)                                           \
 743         fprintf ((FILE), "\"\n");                                       \
 744     }                                                                   \
 745   while (0)