gcc/config/arm/aof.h

   1 /* Definitions of target machine for GNU compiler, for Advanced RISC Machines
   2    ARM compilation, AOF Assembler.
   3    Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
   4    Contributed by Richard Earnshaw (rearnsha@armltd.co.uk)
   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 \f
  24
  25 #define AOF_ASSEMBLER
  26
  27 #define LINK_LIBGCC_SPECIAL 1
  28
  29 #define LINK_SPEC "%{aof} %{bin} %{aif} %{ihf} %{shl,*} %{reent*} %{split} \
  30                    %{ov*,*} %{reloc*} -nodebug"
  31
  32 #define STARTFILE_SPEC "crtbegin.o%s"
  33
  34 #define ENDFILE_SPEC "crtend.o%s"
  35
  36 #ifndef ASM_SPEC
  37 #define ASM_SPEC "%{g -g} -arch 4 \
  38 -apcs 3%{mapcs-32:/32bit}%{mapcs-26:/26bit}%{!mapcs-26:%{!macps-32:/26bit}}"
  39 #endif
  40
  41 #ifndef LIB_SPEC
  42 #define LIB_SPEC "%{Eb: armlib_h.32b%s}%{!Eb: armlib_h.32l%s}"
  43 #endif
  44
  45 #define LIBGCC_SPEC "libgcc.a%s"
  46
  47 /* Dividing the Output into Sections (Text, Data, ...) */
  48 /* AOF Assembler syntax is a nightmare when it comes to areas, since once
  49    we change from one area to another, we can't go back again.  Instead,
  50    we must create a new area with the same attributes and add the new output
  51    to that.  Unfortunately, there is nothing we can do here to guarantee that
  52    two areas with the same attributes will be linked adjacently in the
  53    resulting executable, so we have to be careful not to do pc-relative
  54    addressing across such boundaries.  */
  55 char *aof_text_section ();
  56 #define TEXT_SECTION_ASM_OP aof_text_section ()
  57
  58 #define SELECT_RTX_SECTION(MODE,RTX) text_section ();
  59
  60 char *aof_data_section ();
  61 #define DATA_SECTION_ASM_OP aof_data_section ()
  62
  63 #define EXTRA_SECTIONS in_zero_init, in_ctor, in_dtor, in_common
  64
  65 #define EXTRA_SECTION_FUNCTIONS \
  66 ZERO_INIT_SECTION               \
  67 CTOR_SECTION                    \
  68 DTOR_SECTION                    \
  69 COMMON_SECTION
  70
  71 #define ZERO_INIT_SECTION                                       \
  72 void                                                            \
  73 zero_init_section ()                                            \
  74 {                                                               \
  75   static int zero_init_count = 1;                               \
  76   if (in_section != in_zero_init)                               \
  77     {                                                           \
  78       fprintf (asm_out_file, "\tAREA |C$$zidata%d|,NOINIT\n",   \
  79                zero_init_count++);                              \
  80       in_section = in_zero_init;                                \
  81     }                                                           \
  82 }
  83
  84 #define CTOR_SECTION                                                    \
  85 void                                                                    \
  86 ctor_section ()                                                         \
  87 {                                                                       \
  88   static int ctors_once = 0;                                            \
  89   if (in_section != in_ctor)                                            \
  90     {                                                                   \
  91       if (ctors_once)                                                   \
  92         {                                                               \
  93           fprintf (stderr,                                              \
  94                    "Attempt to output more than one ctor section\n");   \
  95           abort ();                                                     \
  96         }                                                               \
  97       fprintf (asm_out_file, "\t%s\n", CTORS_SECTION_ASM_OP);           \
  98       in_section = in_ctor;                                             \
  99       ctors_once = 1;                                                   \
 100     }                                                                   \
 101 }
 102
 103 #define DTOR_SECTION                                                    \
 104 void                                                                    \
 105 dtor_section ()                                                         \
 106 {                                                                       \
 107   static int dtors_once = 0;                                            \
 108   if (in_section != in_dtor)                                            \
 109     {                                                                   \
 110       if (dtors_once)                                                   \
 111         {                                                               \
 112           fprintf (stderr,                                              \
 113                    "Attempt to output more than one dtor section\n");   \
 114           abort ();                                                     \
 115         }                                                               \
 116       fprintf (asm_out_file, "\t%s\n", DTORS_SECTION_ASM_OP);           \
 117       in_section = in_dtor;                                             \
 118       dtors_once = 1;                                                   \
 119     }                                                                   \
 120 }
 121
 122 /* Used by ASM_OUTPUT_COMMON (below) to tell varasm.c that we've
 123    changed areas.  */
 124 #define COMMON_SECTION                                          \
 125 void                                                            \
 126 common_section ()                                               \
 127 {                                                               \
 128   static int common_count = 1;                                  \
 129   if (in_section != in_common)                                  \
 130     {                                                           \
 131       in_section = in_common;                                   \
 132     }                                                           \
 133 }
 134 #define CTOR_LIST_BEGIN                                 \
 135 asm (CTORS_SECTION_ASM_OP);                             \
 136 extern func_ptr __CTOR_END__[1];                        \
 137 func_ptr __CTOR_LIST__[1] = {__CTOR_END__};
 138
 139 #define CTOR_LIST_END                                   \
 140 asm (CTORS_SECTION_ASM_OP);                             \
 141 func_ptr __CTOR_END__[1] = { (func_ptr) 0 };
 142
 143 #define DO_GLOBAL_CTORS_BODY            \
 144 do {                                    \
 145   func_ptr *ptr = __CTOR_LIST__ + 1;    \
 146   while (*ptr)                          \
 147     (*ptr++) ();                        \
 148 } while (0)
 149
 150 #define DTOR_LIST_BEGIN                                 \
 151 asm (DTORS_SECTION_ASM_OP);                             \
 152 extern func_ptr __DTOR_END__[1];                        \
 153 func_ptr __DTOR_LIST__[1] = {__DTOR_END__};
 154
 155 #define DTOR_LIST_END                                   \
 156 asm (DTORS_SECTION_ASM_OP);                             \
 157 func_ptr __DTOR_END__[1] = { (func_ptr) 0 };
 158
 159 #define DO_GLOBAL_DTORS_BODY            \
 160 do {                                    \
 161   func_ptr *ptr = __DTOR_LIST__ + 1;    \
 162   while (*ptr)                          \
 163     (*ptr++) ();                        \
 164 } while (0)
 165
 166 #define JUMP_TABLES_IN_TEXT_SECTION 1
 167
 168 #ifndef ARM_OS_NAME
 169 #define ARM_OS_NAME "(generic)"
 170 #endif
 171
 172 /* For the AOF linker, we need to reference __main to force the standard
 173    library to get linked in. */
 174
 175 #define ASM_FILE_START(STREAM)                                  \
 176 {                                                               \
 177   extern char *version_string;                                  \
 178   fprintf ((STREAM), "%s Generated by gcc %s for ARM/%s\n",     \
 179            ASM_COMMENT_START, version_string, ARM_OS_NAME);     \
 180   fprintf ((STREAM), "__r0\tRN\t0\n");                          \
 181   fprintf ((STREAM), "__a1\tRN\t0\n");                          \
 182   fprintf ((STREAM), "__a2\tRN\t1\n");                          \
 183   fprintf ((STREAM), "__a3\tRN\t2\n");                          \
 184   fprintf ((STREAM), "__a4\tRN\t3\n");                          \
 185   fprintf ((STREAM), "__v1\tRN\t4\n");                          \
 186   fprintf ((STREAM), "__v2\tRN\t5\n");                          \
 187   fprintf ((STREAM), "__v3\tRN\t6\n");                          \
 188   fprintf ((STREAM), "__v4\tRN\t7\n");                          \
 189   fprintf ((STREAM), "__v5\tRN\t8\n");                          \
 190   fprintf ((STREAM), "__v6\tRN\t9\n");                          \
 191   fprintf ((STREAM), "__sl\tRN\t10\n");                         \
 192   fprintf ((STREAM), "__fp\tRN\t11\n");                         \
 193   fprintf ((STREAM), "__ip\tRN\t12\n");                         \
 194   fprintf ((STREAM), "__sp\tRN\t13\n");                         \
 195   fprintf ((STREAM), "__lr\tRN\t14\n");                         \
 196   fprintf ((STREAM), "__pc\tRN\t15\n");                         \
 197   fprintf ((STREAM), "__f0\tFN\t0\n");                          \
 198   fprintf ((STREAM), "__f1\tFN\t1\n");                          \
 199   fprintf ((STREAM), "__f2\tFN\t2\n");                          \
 200   fprintf ((STREAM), "__f3\tFN\t3\n");                          \
 201   fprintf ((STREAM), "__f4\tFN\t4\n");                          \
 202   fprintf ((STREAM), "__f5\tFN\t5\n");                          \
 203   fprintf ((STREAM), "__f6\tFN\t6\n");                          \
 204   fprintf ((STREAM), "__f7\tFN\t7\n");                          \
 205   text_section ();                                              \
 206 }
 207
 208 /* Some systems use __main in a way incompatible with its use in gcc, in these
 209    cases use the macros NAME__MAIN to give a quoted symbol and SYMBOL__MAIN to
 210    give the same symbol without quotes for an alternative entry point.  You
 211    must define both, or neither. */
 212 #define NAME__MAIN "__gccmain"
 213 #define SYMBOL__MAIN __gccmain
 214
 215 #define ASM_FILE_END(STREAM)            \
 216 do                                      \
 217 {                                       \
 218   if (flag_pic)                         \
 219     aof_dump_pic_table (STREAM);        \
 220   aof_dump_imports (STREAM);            \
 221   fputs ("\tEND\n", (STREAM));          \
 222 } while (0);
 223
 224 #define ASM_IDENTIFY_GCC(STREAM) fputs ("|gcc2_compiled.|\n", (STREAM))
 225
 226 #define ASM_COMMENT_START ";"
 227
 228 #define ASM_APP_ON ""
 229
 230 #define ASM_APP_OFF ""
 231
 232 #define ASM_OUTPUT_LONG_DOUBLE(STREAM,VALUE) \
 233   ASM_OUTPUT_DOUBLE((STREAM),(VALUE))
 234
 235 #define ASM_OUTPUT_DOUBLE(STREAM,VALUE)                         \
 236 do {                                                            \
 237   char dstr[30];                                                \
 238   long l[2];                                                    \
 239   REAL_VALUE_TO_TARGET_DOUBLE ((VALUE), l);                     \
 240   REAL_VALUE_TO_DECIMAL ((VALUE), "%.14g", dstr);               \
 241   fprintf ((STREAM), "\tDCD &%lx, &%lx\t%s double %s\n",        \
 242            l[0], l[1], ASM_COMMENT_START, dstr);                \
 243 } while (0)
 244
 245 #define ASM_OUTPUT_FLOAT(STREAM,VALUE)                  \
 246 do {                                                    \
 247   char dstr[30];                                        \
 248   long l;                                               \
 249   REAL_VALUE_TO_TARGET_SINGLE ((VALUE), l);             \
 250   REAL_VALUE_TO_DECIMAL ((VALUE), "%.7g", dstr);        \
 251   fprintf ((STREAM), "\tDCD &%lx\t%s double %s\n",      \
 252            l, ASM_COMMENT_START, dstr);                 \
 253 } while (0)
 254
 255 #define ASM_OUTPUT_INT(STREAM,VALUE)            \
 256   (fprintf ((STREAM), "\tDCD\t"),               \
 257    output_addr_const ((STREAM), (VALUE)),       \
 258    fputc ('\n', (STREAM)))
 259
 260 #define ASM_OUTPUT_SHORT(STREAM,VALUE)          \
 261   (fprintf ((STREAM), "\tDCW\t"),               \
 262    output_addr_const ((STREAM), (VALUE)),       \
 263    fputc ('\n', (STREAM)))
 264
 265 #define ASM_OUTPUT_CHAR(STREAM,VALUE)           \
 266   (fprintf ((STREAM), "\tDCB\t"),               \
 267    output_addr_const ((STREAM), (VALUE)),       \
 268    fputc ('\n', (STREAM)))
 269
 270 #define ASM_OUTPUT_BYTE(STREAM,VALUE)           \
 271   fprintf ((STREAM), "\tDCB\t%d\n", (VALUE))
 272
 273 #define ASM_OUTPUT_ASCII(STREAM,PTR,LEN)                \
 274 {                                                       \
 275   int i;                                                \
 276   char *ptr = (PTR);                                    \
 277   fprintf ((STREAM), "\tDCB");                          \
 278   for (i = 0; i < (LEN); i++)                           \
 279     fprintf ((STREAM), " &%02x%s",                      \
 280              (unsigned ) *(ptr++),                      \
 281              (i + 1 < (LEN)                             \
 282               ? ((i & 3) == 3 ? "\n\tDCB" : ",")        \
 283               : "\n"));                                 \
 284 }
 285
 286 #define IS_ASM_LOGICAL_LINE_SEPARATOR(C) ((C) == '\n')
 287
 288 #define ASM_OPEN_PAREN "("
 289 #define ASM_CLOSE_PAREN ")"
 290
 291 /* Output of Uninitialized Variables */
 292
 293 #define ASM_OUTPUT_COMMON(STREAM,NAME,SIZE,ROUNDED)             \
 294   (common_section (),                                           \
 295    fprintf ((STREAM), "\tAREA "),                               \
 296    assemble_name ((STREAM), (NAME)),                            \
 297    fprintf ((STREAM), ", DATA, COMMON\n\t%% %d\t%s size=%d\n",  \
 298             (ROUNDED), ASM_COMMENT_START, SIZE))
 299
 300 #define ASM_OUTPUT_LOCAL(STREAM,NAME,SIZE,ROUNDED)      \
 301    (zero_init_section (),                               \
 302     assemble_name ((STREAM), (NAME)),                   \
 303     fprintf ((STREAM), "\n"),                           \
 304     fprintf ((STREAM), "\t%% %d\t%s size=%d\n",         \
 305              (ROUNDED), ASM_COMMENT_START, SIZE))
 306
 307 /* Output and Generation of Labels */
 308
 309 extern int arm_main_function;
 310
 311 #define ASM_GLOBALIZE_LABEL(STREAM,NAME)                \
 312 do {                                                    \
 313   fprintf ((STREAM), "\tEXPORT\t");                     \
 314   assemble_name ((STREAM), (NAME));                     \
 315   fputc ('\n', (STREAM));                               \
 316   if ((NAME)[0] == 'm' && ! strcmp ((NAME), "main"))    \
 317     arm_main_function = 1;                              \
 318 } while (0)
 319
 320 #define ASM_OUTPUT_LABEL(STREAM,NAME)   \
 321 do {                                    \
 322   assemble_name (STREAM,NAME);          \
 323   fputs ("\n", STREAM);                 \
 324 } while (0)
 325
 326 #define ASM_DECLARE_FUNCTION_NAME(STREAM,NAME,DECL) \
 327 {                                               \
 328   if (TARGET_POKE_FUNCTION_NAME)                \
 329     arm_poke_function_name ((STREAM), (NAME));  \
 330   ASM_OUTPUT_LABEL (STREAM, NAME);              \
 331   if (! TREE_PUBLIC (DECL))                     \
 332     {                                           \
 333       fputs ("\tKEEP ", STREAM);                \
 334       ASM_OUTPUT_LABEL (STREAM, NAME);          \
 335     }                                           \
 336   aof_delete_import ((NAME));                   \
 337 }
 338
 339 #define ASM_DECLARE_OBJECT_NAME(STREAM,NAME,DECL) \
 340 {                                               \
 341   ASM_OUTPUT_LABEL (STREAM, NAME);              \
 342   if (! TREE_PUBLIC (DECL))                     \
 343     {                                           \
 344       fputs ("\tKEEP ", STREAM);                \
 345       ASM_OUTPUT_LABEL (STREAM, NAME);          \
 346     }                                           \
 347   aof_delete_import ((NAME));                   \
 348 }
 349
 350 #define ASM_OUTPUT_EXTERNAL(STREAM,DECL,NAME)   \
 351  aof_add_import ((NAME))
 352
 353 #define ASM_OUTPUT_EXTERNAL_LIBCALL(STREAM,SYMREF)      \
 354  (fprintf ((STREAM), "\tIMPORT\t"),                     \
 355   assemble_name ((STREAM), XSTR ((SYMREF), 0)),         \
 356   fputc ('\n', (STREAM)))
 357
 358 #define ASM_OUTPUT_LABELREF(STREAM,NAME)        \
 359   fprintf ((STREAM), "|%s|", NAME)
 360
 361 #define ASM_GENERATE_INTERNAL_LABEL(STRING,PREFIX,NUM)  \
 362   sprintf ((STRING), "*|%s..%d|", (PREFIX), (NUM))
 363
 364 #define ASM_FORMAT_PRIVATE_NAME(OUTVAR,NAME,NUMBER)     \
 365  ((OUTVAR) = (char *) alloca (strlen ((NAME)) + 10),    \
 366   sprintf ((OUTVAR), "%s.%d", (NAME), (NUMBER)))
 367
 368 /* How initialization functions are handled */
 369
 370 #define CTORS_SECTION_ASM_OP "AREA\t|C$$gnu_ctorsvec|, DATA, READONLY"
 371 #define DTORS_SECTION_ASM_OP "AREA\t|C$$gnu_dtorsvec|, DATA, READONLY"
 372
 373 #define ASM_OUTPUT_CONSTRUCTOR(STREAM,NAME)     \
 374 do {                                            \
 375   ctor_section ();                              \
 376   fprintf ((STREAM), "\tDCD\t");                \
 377   assemble_name ((STREAM), (NAME));             \
 378   fputc ('\n', (STREAM));                       \
 379 } while (0);
 380
 381 #define ASM_OUTPUT_DESTRUCTOR(STREAM,NAME)      \
 382 do {                                            \
 383   dtor_section ();                              \
 384   fprintf ((STREAM), "\tDCD\t");                \
 385   assemble_name ((STREAM), (NAME));             \
 386   fputc ('\n', (STREAM));                       \
 387 } while (0);
 388
 389 /* Output of Assembler Instructions */
 390
 391 #define REGISTER_NAMES                  \
 392 {                                       \
 393   "a1", "a2", "a3", "a4",       \
 394   "v1", "v2", "v3", "v4",       \
 395   "v5", "v6", "sl", "fp",       \
 396   "ip", "sp", "lr", "pc",       \
 397   "f0", "f1", "f2", "f3",       \
 398   "f4", "f5", "f6", "f7",       \
 399   "cc", "sfp", "afp"            \
 400 }
 401
 402 #define ADDITIONAL_REGISTER_NAMES               \
 403 {                                               \
 404   {"r0", 0}, {"a1", 0},                         \
 405   {"r1", 1}, {"a2", 1},                         \
 406   {"r2", 2}, {"a3", 2},                         \
 407   {"r3", 3}, {"a4", 3},                         \
 408   {"r4", 4}, {"v1", 4},                         \
 409   {"r5", 5}, {"v2", 5},                         \
 410   {"r6", 6}, {"v3", 6},                         \
 411   {"r7", 7}, {"wr", 7},                         \
 412   {"r8", 8}, {"v5", 8},                         \
 413   {"r9", 9}, {"v6", 9},                         \
 414   {"r10", 10}, {"sl", 10}, {"v7", 10},          \
 415   {"r11", 11}, {"fp", 11},                      \
 416   {"r12", 12}, {"ip", 12},                      \
 417   {"r13", 13}, {"sp", 13},                      \
 418   {"r14", 14}, {"lr", 14},                      \
 419   {"r15", 15}, {"pc", 15}                       \
 420 }
 421
 422 #define REGISTER_PREFIX "__"
 423 #define USER_LABEL_PREFIX ""
 424 #define LOCAL_LABEL_PREFIX ""
 425
 426 /* AOF does not prefix user function names with an underscore.  */
 427 #define ARM_MCOUNT_NAME "_mcount"
 428
 429 /* Output of Dispatch Tables */
 430
 431 #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM,BODY,VALUE,REL)         \
 432   fprintf ((STREAM), "\tb\t|L..%d|\n", (VALUE))
 433
 434 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM,VALUE)   \
 435   fprintf ((STREAM), "\tDCD\t|L..%d|\n", (VALUE))
 436
 437 /* A label marking the start of a jump table is a data label. */
 438 #define ASM_OUTPUT_CASE_LABEL(STREAM,PREFIX,NUM,TABLE)  \
 439   fprintf ((STREAM), "\tALIGN\n|%s..%d|\n", (PREFIX), (NUM))
 440
 441 /* Assembler Commands for Alignment */
 442
 443 #define ASM_OUTPUT_SKIP(STREAM,NBYTES)          \
 444  fprintf ((STREAM), "\t%%\t%d\n", (NBYTES))
 445
 446 #define ASM_OUTPUT_ALIGN(STREAM,POWER)                  \
 447 do {                                                    \
 448   register int amount = 1 << (POWER);                   \
 449   if (amount == 2)                                      \
 450     fprintf ((STREAM), "\tALIGN 2\n");                  \
 451   else if (amount == 4)                                 \
 452     fprintf ((STREAM), "\tALIGN\n");                    \
 453   else                                                  \
 454     fprintf ((STREAM), "\tALIGN %d\n", amount);         \
 455 } while (0)
 456
 457 #include "arm/arm.h"
 458
 459 #undef DBX_DEBUGGING_INFO