gcc/config/m68k/netbsd-elf.h

   1 /* Definitions of target machine for GNU compiler,
   2    for m68k (including m68010) NetBSD platforms using the
   3    ELF object format.
   4    Copyright (C) 2002, 2003, 2004, 2006 Free Software Foundation, Inc.
   5    Contributed by Wasabi Systems. Inc.
   6
   7    This file is derived from <m68k/m68kv4.h>, <m68k/m68kelf.h>,
   8    and <m68k/linux.h>.
   9
  10 This file is part of GCC.
  11
  12 GCC is free software; you can redistribute it and/or modify
  13 it under the terms of the GNU General Public License as published by
  14 the Free Software Foundation; either version 2, or (at your option)
  15 any later version.
  16
  17 GCC is distributed in the hope that it will be useful,
  18 but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 GNU General Public License for more details.
  21
  22 You should have received a copy of the GNU General Public License
  23 along with GCC; see the file COPYING.  If not, write to
  24 the Free Software Foundation, 51 Franklin Street, Fifth Floor,
  25 Boston, MA 02110-1301, USA.  */
  26
  27 #define TARGET_OS_CPP_BUILTINS()                \
  28   do                                            \
  29     {                                           \
  30       NETBSD_OS_CPP_BUILTINS_ELF();             \
  31       builtin_define ("__m68k__");              \
  32       builtin_define ("__SVR4_ABI__");          \
  33       builtin_define ("__motorola__");          \
  34       if (TARGET_HARD_FLOAT)                    \
  35         builtin_define ("__HAVE_FPU__");        \
  36     }                                           \
  37   while (0)
  38
  39 /* Don't try using XFmode on the 68010.  */
  40 #undef LONG_DOUBLE_TYPE_SIZE
  41 #define LONG_DOUBLE_TYPE_SIZE (TARGET_68020 ? 80 : 64)
  42
  43 #undef LIBGCC2_LONG_DOUBLE_TYPE_SIZE
  44 #ifdef __mc68010__
  45 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 64
  46 #else
  47 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 80
  48 #endif
  49
  50 #undef SUBTARGET_EXTRA_SPECS
  51 #define SUBTARGET_EXTRA_SPECS \
  52   { "netbsd_entry_point",   NETBSD_ENTRY_POINT },
  53
  54
  55 #undef TARGET_VERSION
  56 #define TARGET_VERSION                  \
  57   fprintf (stderr,                      \
  58            TARGET_68010                 \
  59            ? " (NetBSD/68010 ELF)"      \
  60            : " (NetBSD/m68k ELF)");
  61
  62
  63 /* Provide a CPP_SPEC appropriate for NetBSD m68k targets.  Currently we
  64    deal with the GCC option '-posix', as well as an indication as to
  65    whether or not use of the FPU is allowed.  */
  66
  67 #undef CPP_SPEC
  68 #define CPP_SPEC NETBSD_CPP_SPEC
  69
  70
  71 /* Provide an ASM_SPEC appropriate for NetBSD m68k ELF targets.  We need
  72    to passn PIC code generation options.  */
  73
  74 #undef ASM_SPEC
  75 #define ASM_SPEC "%(asm_cpu_spec) %{fpic|fpie:-k} %{fPIC|fPIE:-k -K}"
  76
  77 #define AS_NEEDS_DASH_FOR_PIPED_INPUT
  78
  79 /* Provide a LINK_SPEC appropriate for a NetBSD/m68k ELF target.  */
  80
  81 #undef LINK_SPEC
  82 #define LINK_SPEC NETBSD_LINK_SPEC_ELF
  83
  84 #define NETBSD_ENTRY_POINT "_start"
  85
  86 /* Output assembler code to FILE to increment profiler label # LABELNO
  87    for profiling a function only.  */
  88
  89 #undef FUNCTION_PROFILER
  90 #define FUNCTION_PROFILER(FILE, LABELNO)                                \
  91 do                                                                      \
  92   {                                                                     \
  93     asm_fprintf (FILE, "\tlea (%LLP%d,%Rpc),%Ra1\n", (LABELNO));        \
  94     if (flag_pic)                                                       \
  95       fprintf (FILE, "\tbsr.l __mcount@PLTPC\n");                       \
  96     else                                                                \
  97       fprintf (FILE, "\tjbsr __mcount\n");                              \
  98   }                                                                     \
  99 while (0)
 100
 101
 102 /* Make gcc agree with <machine/ansi.h>  */
 103
 104 #undef SIZE_TYPE
 105 #define SIZE_TYPE "unsigned int"
 106
 107 #undef PTRDIFF_TYPE
 108 #define PTRDIFF_TYPE "int"
 109
 110
 111 /* XXX
 112    Here is a bunch of stuff lifted from m68kelf.h.  We don't use that
 113    file directly, because it has a lot of baggage we don't want.  */
 114
 115
 116 /* The prefix for register names.  Note that REGISTER_NAMES
 117    is supposed to include this prefix.  Also note that this is NOT an
 118    fprintf format string, it is a literal string.  */
 119
 120 #undef REGISTER_PREFIX
 121 #define REGISTER_PREFIX "%"
 122
 123
 124 /* The prefix for local (compiler generated) lables.
 125    These labels will not appear in the symbol table.  */
 126
 127 #undef LOCAL_LABEL_PREFIX
 128 #define LOCAL_LABEL_PREFIX "."
 129
 130
 131 /* The prefix to add to user-visible assembler symbols.  */
 132
 133 #undef USER_LABEL_PREFIX
 134 #define USER_LABEL_PREFIX ""
 135
 136
 137 /* The prefix for immediate operands.  */
 138
 139 #undef IMMEDIATE_PREFIX
 140 #define IMMEDIATE_PREFIX "#"
 141
 142
 143 #undef ASM_COMMENT_START
 144 #define ASM_COMMENT_START "|"
 145
 146
 147 /* Currently, JUMP_TABLES_IN_TEXT_SECTION must be defined in order to
 148    keep switch tables in the text section.  */
 149
 150 #undef JUMP_TABLES_IN_TEXT_SECTION
 151 #define JUMP_TABLES_IN_TEXT_SECTION 1
 152
 153
 154 /* Use the default action for outputting the case label.  */
 155 #undef ASM_OUTPUT_CASE_LABEL
 156 #define ASM_RETURN_CASE_JUMP                            \
 157   do {                                                  \
 158     if (TARGET_COLDFIRE)                                \
 159       {                                                 \
 160         if (ADDRESS_REG_P (operands[0]))                \
 161           return "jmp %%pc@(2,%0:l)";                   \
 162         else                                            \
 163           return "ext%.l %0\n\tjmp %%pc@(2,%0:l)";      \
 164       }                                                 \
 165     else                                                \
 166       return "jmp %%pc@(2,%0:w)";                       \
 167   } while (0)
 168
 169
 170 /* This is how to output an assembler line that says to advance the
 171    location counter to a multiple of 2**LOG bytes.  */
 172
 173 #undef ASM_OUTPUT_ALIGN
 174 #define ASM_OUTPUT_ALIGN(FILE,LOG)                                      \
 175 do                                                                      \
 176   {                                                                     \
 177     if ((LOG) > 0)                                                      \
 178       fprintf ((FILE), "%s%u\n", ALIGN_ASM_OP, 1 << (LOG));             \
 179   }                                                                     \
 180 while (0)
 181
 182
 183 /* If defined, a C expression whose value is a string containing the
 184    assembler operation to identify the following data as uninitialized global
 185    data.  */
 186
 187 #define BSS_SECTION_ASM_OP      ".section\t.bss"
 188
 189
 190 /* Like `ASM_OUTPUT_BSS' except takes the required alignment as a
 191    separate, explicit argument.  If you define this macro, it is used
 192    in place of `ASM_OUTPUT_BSS', and gives you more flexibility in
 193    handling the required alignment of the variable.  The alignment is
 194    specified as the number of bits.
 195
 196    Try to use function `asm_output_aligned_bss' defined in file
 197    `varasm.c' when defining this macro.  */
 198
 199 #undef ASM_OUTPUT_ALIGNED_BSS
 200 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN)           \
 201   asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
 202
 203
 204 #undef ASM_OUTPUT_COMMON
 205 #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)                    \
 206 ( fputs (".comm ", (FILE)),                                             \
 207   assemble_name ((FILE), (NAME)),                                       \
 208   fprintf ((FILE), ",%u\n", (int)(SIZE)))
 209
 210 #undef ASM_OUTPUT_LOCAL
 211 #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)                     \
 212 ( fputs (".lcomm ", (FILE)),                                            \
 213   assemble_name ((FILE), (NAME)),                                       \
 214   fprintf ((FILE), ",%u\n", (int)(SIZE)))
 215
 216
 217 /* XXX
 218    This is the end of the chunk lifted from m68kelf.h  */
 219
 220
 221 /* XXX
 222    The following chunk is more or less lifted from m68kv4.h.
 223    We'd like to just #include that file, but it has not yet
 224    been converted to the new include style.
 225
 226    Should there be a m68kv4-abi.h ??  */
 227
 228
 229 /* Register in which address to store a structure value is passed to a
 230    function.  The default in m68k.h is a1.  For m68k/SVR4 it is a0. */
 231
 232 #undef M68K_STRUCT_VALUE_REGNUM
 233 #define M68K_STRUCT_VALUE_REGNUM 8
 234
 235
 236 /* Register in which static-chain is passed to a function.  The
 237    default isn m68k.h is a0, but that is already the struct value
 238    regnum.  Make it a1 instead.  */
 239
 240 #undef STATIC_CHAIN_REGNUM
 241 #define STATIC_CHAIN_REGNUM 9
 242
 243
 244 /* Now to renumber registers for dbx and gdb.
 245    We use the Sun-3 convention, which is:
 246    floating point registers have numbers 18 to 25, not
 247    16 to 23 as they do in the compiler.  */
 248
 249 #undef DBX_REGISTER_NUMBER
 250 #define DBX_REGISTER_NUMBER(REGNO) ((REGNO) < 16 ? (REGNO) : (REGNO) + 2)
 251
 252
 253 /* 1 if N is a possible register number for a function value.  For
 254    m68k/SVR4 allow d0, a0, or fp0 as return registers, for integral,
 255    pointer, or floating types, respectively.  Reject fp0 if not using
 256    a 68881 coprocessor.  */
 257
 258 #undef FUNCTION_VALUE_REGNO_P
 259 #define FUNCTION_VALUE_REGNO_P(N)                                       \
 260   ((N) == 0 || (N) == 8 || (TARGET_68881 && (N) == 16))
 261
 262
 263 /* Define this to be true when FUNCTION_VALUE_REGNO_P is true for
 264    more than one register.  */
 265
 266 #undef NEEDS_UNTYPED_CALL
 267 #define NEEDS_UNTYPED_CALL 1
 268
 269
 270 /* Define how to generate (in the callee) the output value of a
 271    function and how to find (in the caller) the value returned by a
 272    function.  VALTYPE is the data type of the value (as a tree).  If
 273    the precise function being called is known, FUNC is its
 274    FUNCTION_DECL; otherwise, FUNC is 0.  For m68k/SVR4 generate the
 275    result in d0, a0, or fp0 as appropriate.  */
 276
 277 #undef FUNCTION_VALUE
 278 #define FUNCTION_VALUE(VALTYPE, FUNC)                                   \
 279   m68k_function_value (VALTYPE, FUNC)
 280
 281
 282 /* For compatibility with the large body of existing code which does
 283    not always properly declare external functions returning pointer
 284    types, the m68k/SVR4 convention is to copy the value returned for
 285    pointer functions from a0 to d0 in the function epilogue, so that
 286    callers that have neglected to properly declare the callee can
 287    still find the correct return value.  */
 288
 289 extern int current_function_returns_pointer;
 290 #define FUNCTION_EXTRA_EPILOGUE(FILE, SIZE)                             \
 291 do                                                                      \
 292   {                                                                     \
 293     if (current_function_returns_pointer                                \
 294         && ! find_equiv_reg (0, get_last_insn (), 0, 0, 0, 8, Pmode))   \
 295       asm_fprintf (FILE, "\tmove.l %Ra0,%Rd0\n");                       \
 296   }                                                                     \
 297 while (0)
 298
 299
 300 /* Define how to find the value returned by a library function
 301    assuming the value has mode MODE.
 302    For m68k/SVR4 look for integer values in d0, pointer values in d0
 303    (returned in both d0 and a0), and floating values in fp0.  */
 304
 305 #undef LIBCALL_VALUE
 306 #define LIBCALL_VALUE(MODE)                                             \
 307   m68k_libcall_value (MODE)
 308
 309
 310 /* Boundary (in *bits*) on which stack pointer should be aligned.
 311    The m68k/SVR4 convention is to keep the stack pointer longword aligned.  */
 312
 313 #undef STACK_BOUNDARY
 314 #define STACK_BOUNDARY 32
 315
 316
 317 /* Alignment of field after `int : 0' in a structure.
 318    For m68k/SVR4, this is the next longword boundary.  */
 319
 320 #undef EMPTY_FIELD_BOUNDARY
 321 #define EMPTY_FIELD_BOUNDARY 32
 322
 323
 324 /* No data type wants to be aligned rounder than this.
 325    For m68k/SVR4, some types (doubles for example) are aligned on 8 byte
 326    boundaries */
 327
 328 #undef BIGGEST_ALIGNMENT
 329 #define BIGGEST_ALIGNMENT 64
 330
 331
 332 /* For m68k SVR4, structures are returned using the reentrant
 333    technique.  */
 334
 335 #undef PCC_STATIC_STRUCT_RETURN
 336
 337
 338 /* The svr4 ABI for the m68k says that records and unions are returned
 339    in memory.  */
 340
 341 #undef DEFAULT_PCC_STRUCT_RETURN
 342 #define DEFAULT_PCC_STRUCT_RETURN 1
 343
 344 /* Output assembler code for a block containing the constant parts
 345    of a trampoline, leaving space for the variable parts.  */
 346
 347 /* On m68k svr4, the trampoline is different from the generic version
 348    in that we use a1 as the static call chain.  */
 349
 350 #undef TRAMPOLINE_TEMPLATE
 351 #define TRAMPOLINE_TEMPLATE(FILE)                                       \
 352 {                                                                       \
 353   assemble_aligned_integer (2, GEN_INT (0x227a));                       \
 354   assemble_aligned_integer (2, GEN_INT (8));                            \
 355   assemble_aligned_integer (2, GEN_INT (0x2f3a));                       \
 356   assemble_aligned_integer (2, GEN_INT (8));                            \
 357   assemble_aligned_integer (2, GEN_INT (0x4e75));                       \
 358   assemble_aligned_integer (4, const0_rtx);                             \
 359   assemble_aligned_integer (4, const0_rtx);                             \
 360 }
 361
 362 /* Redefine since we are using a different trampoline */
 363 #undef TRAMPOLINE_SIZE
 364 #define TRAMPOLINE_SIZE 18
 365
 366 /* Emit RTL insns to initialize the variable parts of a trampoline.
 367    FNADDR is an RTX for the address of the function's pure code.
 368    CXT is an RTX for the static chain value for the function.  */
 369
 370 #undef INITIALIZE_TRAMPOLINE
 371 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT)                       \
 372 {                                                                       \
 373   emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 10)), CXT); \
 374   emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 14)), FNADDR); \
 375 }
 376
 377
 378 /* XXX
 379    This is the end of the chunk lifted from m68kv4.h  */