OSDN Git Service

73673fd02bd4c8edfe7f3baa7232e4c7cfc72491
[pf3gnuchains/gcc-fork.git] / 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 #ifdef __mc68010__
44 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 64
45 #else
46 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 80
47 #endif
48
49 #define EXTRA_SPECS \
50   { "netbsd_entry_point",   NETBSD_ENTRY_POINT },
51
52
53 #undef TARGET_VERSION
54 #define TARGET_VERSION                  \
55   fprintf (stderr,                      \
56            TARGET_68010                 \
57            ? " (NetBSD/68010 ELF)"      \
58            : " (NetBSD/m68k ELF)");
59
60
61 /* Provide a CPP_SPEC appropriate for NetBSD m68k targets.  Currently we
62    deal with the GCC option '-posix', as well as an indication as to
63    whether or not use of the FPU is allowed.  */
64
65 #undef CPP_SPEC
66 #define CPP_SPEC NETBSD_CPP_SPEC
67
68
69 /* Provide an ASM_SPEC appropriate for NetBSD m68k ELF targets.  We pass
70    on some CPU options, as well as PIC code generation options.  */
71
72 #undef ASM_SPEC
73 #define ASM_SPEC \
74   "%{m68010} %{m68020} %{m68030} %{m68040} %{m68060} \
75    %{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  */