gcc/config/elfos.h

   1 /* elfos.h  --  operating system specific defines to be used when
   2    targeting GCC for some generic ELF system
   3    Copyright (C) 1991, 1994, 1995, 1999, 2000, 2001
   4    Free Software Foundation, Inc.
   5    Based on svr4.h contributed by Ron Guilmette (rfg@netcom.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, 59 Temple Place - Suite 330,
  22 Boston, MA 02111-1307, USA.  */
  23
  24
  25 /* Define a symbol indicating that we are using elfos.h.
  26    Some CPU specific configuration files use this.  */
  27 #define USING_ELFOS_H
  28
  29 /* The prefix to add to user-visible assembler symbols.
  30
  31    For ELF systems the convention is *not* to prepend a leading
  32    underscore onto user-level symbol names.  */
  33
  34 #undef  USER_LABEL_PREFIX
  35 #define USER_LABEL_PREFIX ""
  36
  37 /* Biggest alignment supported by the object file format of this
  38    machine.  Use this macro to limit the alignment which can be
  39    specified using the `__attribute__ ((aligned (N)))' construct.  If
  40    not defined, the default value is `BIGGEST_ALIGNMENT'.  */
  41 #ifndef MAX_OFILE_ALIGNMENT
  42 #define MAX_OFILE_ALIGNMENT (32768 * 8)
  43 #endif
  44
  45 #undef  ENDFILE_SPEC
  46 #define ENDFILE_SPEC "crtend.o%s"
  47
  48 #undef  STARTFILE_SPEC
  49 #define STARTFILE_SPEC "%{!shared: \
  50                          %{!symbolic: \
  51                           %{pg:gcrt0.o%s}%{!pg:%{p:mcrt0.o%s}%{!p:crt0.o%s}}}}\
  52                         crtbegin.o%s"
  53
  54 /* Use periods rather than dollar signs in special g++ assembler names.  */
  55
  56 #define NO_DOLLAR_IN_LABEL
  57
  58 /* Writing `int' for a bitfield forces int alignment for the structure.  */
  59
  60 #define PCC_BITFIELD_TYPE_MATTERS 1
  61
  62 /* Implicit library calls should use memcpy, not bcopy, etc.  */
  63
  64 #define TARGET_MEM_FUNCTIONS
  65
  66 /* Handle #pragma weak and #pragma pack.  */
  67
  68 #define HANDLE_SYSV_PRAGMA
  69
  70 /* System V Release 4 uses DWARF debugging info.  */
  71
  72 #ifndef DWARF_DEBUGGING_INFO
  73 #define DWARF_DEBUGGING_INFO 1
  74 #endif
  75
  76 /* All ELF targets can support DWARF-2.  */
  77
  78 #ifndef DWARF2_DEBUGGING_INFO
  79 #define DWARF2_DEBUGGING_INFO 1
  80 #endif
  81
  82 /* Also allow them to support STABS debugging.  */
  83
  84 #include "dbxelf.h"
  85
  86 /* The GNU tools operate better with stabs.  Since we don't have
  87    any native tools to be compatible with, default to stabs.  */
  88
  89 #ifndef PREFERRED_DEBUGGING_TYPE
  90 #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
  91 #endif
  92
  93 /* All SVR4 targets use the ELF object file format.  */
  94 #define OBJECT_FORMAT_ELF
  95
  96
  97 /* Output #ident as a .ident.  */
  98
  99 #define ASM_OUTPUT_IDENT(FILE, NAME) \
 100   fprintf (FILE, "%s\"%s\"\n", IDENT_ASM_OP, NAME);
 101
 102 #define IDENT_ASM_OP "\t.ident\t"
 103
 104 #undef  ASM_BYTE_OP
 105 #define ASM_BYTE_OP     "\t.byte\t"
 106
 107 #undef  SET_ASM_OP
 108 #define SET_ASM_OP      "\t.set\t"
 109
 110 /* This is how to begin an assembly language file.  Most svr4 assemblers want
 111    at least a .file directive to come first, and some want to see a .version
 112    directive come right after that.  Here we just establish a default
 113    which generates only the .file directive.  If you need a .version
 114    directive for any specific target, you should override this definition
 115    in the target-specific file which includes this one.  */
 116
 117 #undef ASM_FILE_START
 118 #define ASM_FILE_START(FILE)                            \
 119   output_file_directive ((FILE), main_input_filename)
 120
 121 /* This is how to allocate empty space in some section.  The .zero
 122    pseudo-op is used for this on most svr4 assemblers.  */
 123
 124 #define SKIP_ASM_OP     "\t.zero\t"
 125
 126 #undef  ASM_OUTPUT_SKIP
 127 #define ASM_OUTPUT_SKIP(FILE, SIZE) \
 128   fprintf (FILE, "%s%u\n", SKIP_ASM_OP, (SIZE))
 129
 130 /* This is how to output an internal numbered label where
 131    PREFIX is the class of label and NUM is the number within the class.
 132
 133    For most svr4 systems, the convention is that any symbol which begins
 134    with a period is not put into the linker symbol table by the assembler.  */
 135
 136 #undef  ASM_OUTPUT_INTERNAL_LABEL
 137 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM)    \
 138   do                                                    \
 139     {                                                   \
 140       fprintf (FILE, ".%s%d:\n", PREFIX, NUM);          \
 141     }                                                   \
 142   while (0)
 143
 144 /* This is how to store into the string LABEL
 145    the symbol_ref name of an internal numbered label where
 146    PREFIX is the class of label and NUM is the number within the class.
 147    This is suitable for output with `assemble_name'.
 148
 149    For most svr4 systems, the convention is that any symbol which begins
 150    with a period is not put into the linker symbol table by the assembler.  */
 151
 152 #undef  ASM_GENERATE_INTERNAL_LABEL
 153 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)         \
 154   do                                                            \
 155     {                                                           \
 156       sprintf (LABEL, "*.%s%u", PREFIX, (unsigned) (NUM));      \
 157     }                                                           \
 158   while (0)
 159
 160 /* Output the label which precedes a jumptable.  Note that for all svr4
 161    systems where we actually generate jumptables (which is to say every
 162    svr4 target except i386, where we use casesi instead) we put the jump-
 163    tables into the .rodata section and since other stuff could have been
 164    put into the .rodata section prior to any given jumptable, we have to
 165    make sure that the location counter for the .rodata section gets pro-
 166    perly re-aligned prior to the actual beginning of the jump table.  */
 167
 168 #define ALIGN_ASM_OP "\t.align\t"
 169
 170 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
 171 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE, PREFIX, NUM, TABLE) \
 172   ASM_OUTPUT_ALIGN ((FILE), 2);
 173 #endif
 174
 175 #undef  ASM_OUTPUT_CASE_LABEL
 176 #define ASM_OUTPUT_CASE_LABEL(FILE, PREFIX, NUM, JUMPTABLE)             \
 177   do                                                                    \
 178     {                                                                   \
 179       ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE)       \
 180         ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM);                  \
 181     }                                                                   \
 182   while (0)
 183
 184 /* The standard SVR4 assembler seems to require that certain builtin
 185    library routines (e.g. .udiv) be explicitly declared as .globl
 186    in each assembly file where they are referenced.  */
 187
 188 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)  \
 189   ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
 190
 191 /* This says how to output assembler code to declare an
 192    uninitialized external linkage data object.  Under SVR4,
 193    the linker seems to want the alignment of data objects
 194    to depend on their types.  We do exactly that here.  */
 195
 196 #define COMMON_ASM_OP   "\t.comm\t"
 197
 198 #undef  ASM_OUTPUT_ALIGNED_COMMON
 199 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
 200   do                                                                    \
 201     {                                                                   \
 202       fprintf ((FILE), "%s", COMMON_ASM_OP);                            \
 203       assemble_name ((FILE), (NAME));                                   \
 204       fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);    \
 205     }                                                                   \
 206   while (0)
 207
 208 /* This says how to output assembler code to declare an
 209    uninitialized internal linkage data object.  Under SVR4,
 210    the linker seems to want the alignment of data objects
 211    to depend on their types.  We do exactly that here.  */
 212
 213 #define LOCAL_ASM_OP    "\t.local\t"
 214
 215 #undef  ASM_OUTPUT_ALIGNED_LOCAL
 216 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)       \
 217   do                                                            \
 218     {                                                           \
 219       fprintf ((FILE), "%s", LOCAL_ASM_OP);                     \
 220       assemble_name ((FILE), (NAME));                           \
 221       fprintf ((FILE), "\n");                                   \
 222       ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN);      \
 223     }                                                           \
 224   while (0)
 225
 226 /* This is the pseudo-op used to generate a reference to a specific
 227    symbol in some section.  It is only used in machine-specific
 228    configuration files.  This is the same for all known svr4
 229    assemblers, except those in targets that don't use 32-bit pointers.
 230    Those should override INT_ASM_OP.  Yes, the name of the macro is
 231    misleading.  */
 232
 233 #ifndef INT_ASM_OP
 234 #define INT_ASM_OP              "\t.long\t"
 235 #endif
 236
 237 /* This is the pseudo-op used to generate a contiguous sequence of byte
 238    values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
 239    AUTOMATICALLY APPENDED.  This is the same for most svr4 assemblers.  */
 240
 241 #undef  ASCII_DATA_ASM_OP
 242 #define ASCII_DATA_ASM_OP       "\t.ascii\t"
 243
 244 /* Support const sections and the ctors and dtors sections for g++.
 245    Note that there appears to be two different ways to support const
 246    sections at the moment.  You can either #define the symbol
 247    READONLY_DATA_SECTION (giving it some code which switches to the
 248    readonly data section) or else you can #define the symbols
 249    EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
 250    SELECT_RTX_SECTION.  We do both here just to be on the safe side.  */
 251
 252 #define USE_CONST_SECTION       1
 253
 254 #define CONST_SECTION_ASM_OP    "\t.section\t.rodata"
 255
 256 /* On svr4, we *do* have support for the .init and .fini sections, and we
 257    can put stuff in there to be executed before and after `main'.  We let
 258    crtstuff.c and other files know this by defining the following symbols.
 259    The definitions say how to change sections to the .init and .fini
 260    sections.  This is the same for all known svr4 assemblers.  */
 261
 262 #define INIT_SECTION_ASM_OP     "\t.section\t.init"
 263 #define FINI_SECTION_ASM_OP     "\t.section\t.fini"
 264
 265 /* A default list of other sections which we might be "in" at any given
 266    time.  For targets that use additional sections (e.g. .tdesc) you
 267    should override this definition in the target-specific file which
 268    includes this file.  */
 269
 270 #undef  EXTRA_SECTIONS
 271 #define EXTRA_SECTIONS in_const
 272
 273 /* A default list of extra section function definitions.  For targets
 274    that use additional sections (e.g. .tdesc) you should override this
 275    definition in the target-specific file which includes this file.  */
 276
 277 #undef  EXTRA_SECTION_FUNCTIONS
 278 #define EXTRA_SECTION_FUNCTIONS         \
 279   CONST_SECTION_FUNCTION
 280
 281 #define READONLY_DATA_SECTION() const_section ()
 282
 283 #define CONST_SECTION_FUNCTION                                  \
 284 void                                                            \
 285 const_section ()                                                \
 286 {                                                               \
 287   if (!USE_CONST_SECTION)                                       \
 288     text_section ();                                            \
 289   else if (in_section != in_const)                              \
 290     {                                                           \
 291       fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP);     \
 292       in_section = in_const;                                    \
 293     }                                                           \
 294 }
 295
 296 #define MAKE_DECL_ONE_ONLY(DECL) (DECL_WEAK (DECL) = 1)
 297
 298 #define UNIQUE_SECTION(DECL, RELOC)                             \
 299   do                                                            \
 300     {                                                           \
 301       int len;                                                  \
 302       int sec;                                                  \
 303       const char *name;                                         \
 304       char *string;                                             \
 305       const char *prefix;                                       \
 306       static const char *prefixes[4][2] =                       \
 307       {                                                         \
 308         { ".text.",   ".gnu.linkonce.t." },                     \
 309         { ".rodata.", ".gnu.linkonce.r." },                     \
 310         { ".data.",   ".gnu.linkonce.d." },                     \
 311         { ".bss.",    ".gnu.linkonce.b." }                      \
 312       };                                                        \
 313                                                                 \
 314       if (TREE_CODE (DECL) == FUNCTION_DECL)                    \
 315         sec = 0;                                                \
 316       else if (DECL_INITIAL (DECL) == 0                         \
 317                || DECL_INITIAL (DECL) == error_mark_node)       \
 318         sec =  3;                                               \
 319       else if (DECL_READONLY_SECTION (DECL, RELOC))             \
 320         sec = 1;                                                \
 321       else                                                      \
 322         sec = 2;                                                \
 323                                                                 \
 324       name   = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL)); \
 325       /* Strip off any encoding in name.  */                    \
 326       STRIP_NAME_ENCODING (name, name);                         \
 327       prefix = prefixes[sec][DECL_ONE_ONLY(DECL)];              \
 328       len    = strlen (name) + strlen (prefix);                 \
 329       string = alloca (len + 1);                                \
 330                                                                 \
 331       sprintf (string, "%s%s", prefix, name);                   \
 332                                                                 \
 333       DECL_SECTION_NAME (DECL) = build_string (len, string);    \
 334     }                                                           \
 335   while (0)
 336
 337 /* Switch into a generic section.  */
 338 #define TARGET_ASM_NAMED_SECTION  default_elf_asm_named_section
 339
 340 /* A C statement or statements to switch to the appropriate
 341    section for output of RTX in mode MODE.  RTX is some kind
 342    of constant in RTL.  The argument MODE is redundant except
 343    in the case of a `const_int' rtx.  Currently, these always
 344    go into the const section.  */
 345
 346 #undef  SELECT_RTX_SECTION
 347 #define SELECT_RTX_SECTION(MODE, RTX) const_section ()
 348
 349 /* A C statement or statements to switch to the appropriate
 350    section for output of DECL.  DECL is either a `VAR_DECL' node
 351    or a constant of some sort.  RELOC indicates whether forming
 352    the initial value of DECL requires link-time relocations.  */
 353
 354 #undef SELECT_SECTION
 355 #define SELECT_SECTION(DECL, RELOC)                             \
 356 {                                                               \
 357   if (TREE_CODE (DECL) == STRING_CST)                           \
 358     {                                                           \
 359       if (! flag_writable_strings)                              \
 360         const_section ();                                       \
 361       else                                                      \
 362         data_section ();                                        \
 363     }                                                           \
 364   else if (TREE_CODE (DECL) == VAR_DECL)                        \
 365     {                                                           \
 366       if ((flag_pic && RELOC)                                   \
 367           || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL)  \
 368           || !DECL_INITIAL (DECL)                               \
 369           || (DECL_INITIAL (DECL) != error_mark_node            \
 370               && !TREE_CONSTANT (DECL_INITIAL (DECL))))         \
 371         data_section ();                                        \
 372       else                                                      \
 373         const_section ();                                       \
 374     }                                                           \
 375   else if (TREE_CODE (DECL) == CONSTRUCTOR)                     \
 376     {                                                           \
 377       if ((flag_pic && RELOC)                                   \
 378           || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL)  \
 379           || ! TREE_CONSTANT (DECL))                            \
 380         data_section ();                                        \
 381       else                                                      \
 382         const_section ();                                       \
 383     }                                                           \
 384   else                                                          \
 385     const_section ();                                           \
 386 }
 387
 388 /* Define the strings used for the special svr4 .type and .size directives.
 389    These strings generally do not vary from one system running svr4 to
 390    another, but if a given system (e.g. m88k running svr) needs to use
 391    different pseudo-op names for these, they may be overridden in the
 392    file which includes this one.  */
 393
 394 #define TYPE_ASM_OP     "\t.type\t"
 395 #define SIZE_ASM_OP     "\t.size\t"
 396
 397 /* This is how we tell the assembler that a symbol is weak.  */
 398
 399 #define ASM_WEAKEN_LABEL(FILE, NAME)    \
 400   do                                    \
 401     {                                   \
 402       fputs ("\t.weak\t", (FILE));      \
 403       assemble_name ((FILE), (NAME));   \
 404       fputc ('\n', (FILE));             \
 405     }                                   \
 406   while (0)
 407
 408 /* The following macro defines the format used to output the second
 409    operand of the .type assembler directive.  Different svr4 assemblers
 410    expect various different forms for this operand.  The one given here
 411    is just a default.  You may need to override it in your machine-
 412    specific tm.h file (depending upon the particulars of your assembler).  */
 413
 414 #define TYPE_OPERAND_FMT        "@%s"
 415
 416 /* Write the extra assembler code needed to declare a function's result.
 417    Most svr4 assemblers don't require any special declaration of the
 418    result value, but there are exceptions.  */
 419
 420 #ifndef ASM_DECLARE_RESULT
 421 #define ASM_DECLARE_RESULT(FILE, RESULT)
 422 #endif
 423
 424 /* These macros generate the special .type and .size directives which
 425    are used to set the corresponding fields of the linker symbol table
 426    entries in an ELF object file under SVR4.  These macros also output
 427    the starting labels for the relevant functions/objects.  */
 428
 429 /* Write the extra assembler code needed to declare a function properly.
 430    Some svr4 assemblers need to also have something extra said about the
 431    function's return value.  We allow for that here.  */
 432
 433 #ifndef ASM_DECLARE_FUNCTION_NAME
 434 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)     \
 435   do                                                    \
 436     {                                                   \
 437       fprintf (FILE, "%s", TYPE_ASM_OP);                \
 438       assemble_name (FILE, NAME);                       \
 439       putc (',', FILE);                                 \
 440       fprintf (FILE, TYPE_OPERAND_FMT, "function");     \
 441       putc ('\n', FILE);                                \
 442                                                         \
 443       ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));    \
 444       ASM_OUTPUT_LABEL(FILE, NAME);                     \
 445     }                                                   \
 446   while (0)
 447 #endif
 448
 449 /* Write the extra assembler code needed to declare an object properly.  */
 450
 451 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)               \
 452   do                                                            \
 453     {                                                           \
 454       fprintf (FILE, "%s", TYPE_ASM_OP);                        \
 455       assemble_name (FILE, NAME);                               \
 456       putc (',', FILE);                                         \
 457       fprintf (FILE, TYPE_OPERAND_FMT, "object");               \
 458       putc ('\n', FILE);                                        \
 459                                                                 \
 460       size_directive_output = 0;                                \
 461                                                                 \
 462       if (!flag_inhibit_size_directive                          \
 463           && (DECL) && DECL_SIZE (DECL))                        \
 464         {                                                       \
 465           size_directive_output = 1;                            \
 466           fprintf (FILE, "%s", SIZE_ASM_OP);                    \
 467           assemble_name (FILE, NAME);                           \
 468           putc (',', FILE);                                     \
 469           fprintf (FILE, HOST_WIDE_INT_PRINT_DEC,               \
 470                    int_size_in_bytes (TREE_TYPE (DECL)));       \
 471           fputc ('\n', FILE);                                   \
 472         }                                                       \
 473                                                                 \
 474       ASM_OUTPUT_LABEL (FILE, NAME);                            \
 475     }                                                           \
 476   while (0)
 477
 478 /* Output the size directive for a decl in rest_of_decl_compilation
 479    in the case where we did not do so before the initializer.
 480    Once we find the error_mark_node, we know that the value of
 481    size_directive_output was set
 482    by ASM_DECLARE_OBJECT_NAME when it was run for the same decl.  */
 483
 484 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END)\
 485   do                                                            \
 486     {                                                           \
 487       const char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0);   \
 488                                                                 \
 489       if (!flag_inhibit_size_directive                          \
 490           && DECL_SIZE (DECL)                                   \
 491           && ! AT_END && TOP_LEVEL                              \
 492           && DECL_INITIAL (DECL) == error_mark_node             \
 493           && !size_directive_output)                            \
 494         {                                                       \
 495           size_directive_output = 1;                            \
 496           fprintf (FILE, "%s", SIZE_ASM_OP);                    \
 497           assemble_name (FILE, name);                           \
 498           putc (',', FILE);                                     \
 499           fprintf (FILE, HOST_WIDE_INT_PRINT_DEC,               \
 500                    int_size_in_bytes (TREE_TYPE (DECL)));       \
 501           fputc ('\n', FILE);                                   \
 502         }                                                       \
 503     }                                                           \
 504   while (0)
 505
 506 /* This is how to declare the size of a function.  */
 507 #ifndef ASM_DECLARE_FUNCTION_SIZE
 508 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)            \
 509   do                                                            \
 510     {                                                           \
 511       if (!flag_inhibit_size_directive)                         \
 512         {                                                       \
 513           char label[256];                                      \
 514           static int labelno;                                   \
 515                                                                 \
 516           labelno++;                                            \
 517                                                                 \
 518           ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno);  \
 519           ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno);     \
 520                                                                 \
 521           fprintf (FILE, "%s", SIZE_ASM_OP);                    \
 522           assemble_name (FILE, (FNAME));                        \
 523           fprintf (FILE, ",");                                  \
 524           assemble_name (FILE, label);                          \
 525           fprintf (FILE, "-");                                  \
 526           assemble_name (FILE, (FNAME));                        \
 527           putc ('\n', FILE);                                    \
 528         }                                                       \
 529     }                                                           \
 530   while (0)
 531 #endif
 532
 533 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
 534    ASM_OUTPUT_LIMITED_STRING macros.  Each byte in the table
 535    corresponds to a particular byte value [0..255].  For any
 536    given byte value, if the value in the corresponding table
 537    position is zero, the given character can be output directly.
 538    If the table value is 1, the byte must be output as a \ooo
 539    octal escape.  If the tables value is anything else, then the
 540    byte value should be output as a \ followed by the value
 541    in the table.  Note that we can use standard UN*X escape
 542    sequences for many control characters, but we don't use
 543    \a to represent BEL because some svr4 assemblers (e.g. on
 544    the i386) don't know about that.  Also, we don't use \v
 545    since some versions of gas, such as 2.2 did not accept it.  */
 546
 547 #define ESCAPES \
 548 "\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\
 549 \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\
 550 \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\
 551 \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\
 552 \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\
 553 \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\
 554 \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\
 555 \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"
 556
 557 /* Some svr4 assemblers have a limit on the number of characters which
 558    can appear in the operand of a .string directive.  If your assembler
 559    has such a limitation, you should define STRING_LIMIT to reflect that
 560    limit.  Note that at least some svr4 assemblers have a limit on the
 561    actual number of bytes in the double-quoted string, and that they
 562    count each character in an escape sequence as one byte.  Thus, an
 563    escape sequence like \377 would count as four bytes.
 564
 565    If your target assembler doesn't support the .string directive, you
 566    should define this to zero.
 567 */
 568
 569 #define STRING_LIMIT    ((unsigned) 256)
 570
 571 #define STRING_ASM_OP   "\t.string\t"
 572
 573 /* The routine used to output NUL terminated strings.  We use a special
 574    version of this for most svr4 targets because doing so makes the
 575    generated assembly code more compact (and thus faster to assemble)
 576    as well as more readable, especially for targets like the i386
 577    (where the only alternative is to output character sequences as
 578    comma separated lists of numbers).   */
 579
 580 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR)            \
 581   do                                                    \
 582     {                                                   \
 583       register const unsigned char *_limited_str =      \
 584         (const unsigned char *) (STR);                  \
 585       register unsigned ch;                             \
 586                                                         \
 587       fprintf ((FILE), "%s\"", STRING_ASM_OP);          \
 588                                                         \
 589       for (; (ch = *_limited_str); _limited_str++)      \
 590         {                                               \
 591           register int escape;                          \
 592                                                         \
 593           switch (escape = ESCAPES[ch])                 \
 594             {                                           \
 595             case 0:                                     \
 596               putc (ch, (FILE));                        \
 597               break;                                    \
 598             case 1:                                     \
 599               fprintf ((FILE), "\\%03o", ch);           \
 600               break;                                    \
 601             default:                                    \
 602               putc ('\\', (FILE));                      \
 603               putc (escape, (FILE));                    \
 604               break;                                    \
 605             }                                           \
 606         }                                               \
 607                                                         \
 608       fprintf ((FILE), "\"\n");                         \
 609     }                                                   \
 610   while (0)
 611
 612 /* The routine used to output sequences of byte values.  We use a special
 613    version of this for most svr4 targets because doing so makes the
 614    generated assembly code more compact (and thus faster to assemble)
 615    as well as more readable.  Note that if we find subparts of the
 616    character sequence which end with NUL (and which are shorter than
 617    STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING.  */
 618
 619 #undef  ASM_OUTPUT_ASCII
 620 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)                             \
 621   do                                                                    \
 622     {                                                                   \
 623       register const unsigned char *_ascii_bytes =                      \
 624         (const unsigned char *) (STR);                                  \
 625       register const unsigned char *limit = _ascii_bytes + (LENGTH);    \
 626       register unsigned bytes_in_chunk = 0;                             \
 627                                                                         \
 628       for (; _ascii_bytes < limit; _ascii_bytes++)                      \
 629         {                                                               \
 630           register const unsigned char *p;                              \
 631                                                                         \
 632           if (bytes_in_chunk >= 60)                                     \
 633             {                                                           \
 634               fprintf ((FILE), "\"\n");                                 \
 635               bytes_in_chunk = 0;                                       \
 636             }                                                           \
 637                                                                         \
 638           for (p = _ascii_bytes; p < limit && *p != '\0'; p++)          \
 639             continue;                                                   \
 640                                                                         \
 641           if (p < limit && (p - _ascii_bytes) <= (long)STRING_LIMIT)    \
 642             {                                                           \
 643               if (bytes_in_chunk > 0)                                   \
 644                 {                                                       \
 645                   fprintf ((FILE), "\"\n");                             \
 646                   bytes_in_chunk = 0;                                   \
 647                 }                                                       \
 648                                                                         \
 649               ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);         \
 650               _ascii_bytes = p;                                         \
 651             }                                                           \
 652           else                                                          \
 653             {                                                           \
 654               register int escape;                                      \
 655               register unsigned ch;                                     \
 656                                                                         \
 657               if (bytes_in_chunk == 0)                                  \
 658                 fprintf ((FILE), "%s\"", ASCII_DATA_ASM_OP);            \
 659                                                                         \
 660               switch (escape = ESCAPES[ch = *_ascii_bytes])             \
 661                 {                                                       \
 662                 case 0:                                                 \
 663                   putc (ch, (FILE));                                    \
 664                   bytes_in_chunk++;                                     \
 665                   break;                                                \
 666                 case 1:                                                 \
 667                   fprintf ((FILE), "\\%03o", ch);                       \
 668                   bytes_in_chunk += 4;                                  \
 669                   break;                                                \
 670                 default:                                                \
 671                   putc ('\\', (FILE));                                  \
 672                   putc (escape, (FILE));                                \
 673                   bytes_in_chunk += 2;                                  \
 674                   break;                                                \
 675                 }                                                       \
 676             }                                                           \
 677         }                                                               \
 678                                                                         \
 679       if (bytes_in_chunk > 0)                                           \
 680         fprintf ((FILE), "\"\n");                                       \
 681     }                                                                   \
 682   while (0)