OSDN Git Service

(TRAMPOLINE_TEMPLATE): Correct first instruction.
[pf3gnuchains/gcc-fork.git] / gcc / config / m68k / linux.h
1 /* Definitions for Motorola 68k running Linux with ELF format.
2    Copyright (C) 1995, 1996 Free Software Foundation, Inc.
3
4 This file is part of GNU CC.
5
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 1, or (at your option)
9 any later version.
10
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING.  If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21 #define LINUX_DEFAULT_ELF
22 #define MOTOROLA                /* Use Motorola syntax */
23 #define USE_GAS                 /* But GAS wants jbsr instead of jsr */
24
25 #include <m68k/m68k.h>
26 #include <linux.h>              /* some common stuff */
27
28 #undef TARGET_VERSION
29 #define TARGET_VERSION fprintf (stderr, " (68k Linux/ELF)");
30
31 /* 68020 with 68881 */
32 #define TARGET_DEFAULT 7
33
34 /* for 68k machines this only needs to be TRUE for the 68000 */
35
36 #undef STRICT_ALIGNMENT     
37 #define STRICT_ALIGNMENT 0
38
39 #undef SUBTARGET_SWITCHES
40 #define SUBTARGET_SWITCHES      {"ieee-fp", 0},
41
42 /* Here are four prefixes that are used by asm_fprintf to
43    facilitate customization for alternate assembler syntaxes.
44    Machines with no likelihood of an alternate syntax need not
45    define these and need not use asm_fprintf.  */
46
47 /* The prefix for register names.  Note that REGISTER_NAMES
48    is supposed to include this prefix. Also note that this is NOT an
49    fprintf format string, it is a literal string */
50
51 #undef REGISTER_PREFIX
52 #define REGISTER_PREFIX "%"
53
54 /* The prefix for local (compiler generated) labels.
55    These labels will not appear in the symbol table. */
56
57 #undef LOCAL_LABEL_PREFIX
58 #define LOCAL_LABEL_PREFIX "."
59
60 /* The prefix to add to user-visible assembler symbols. */
61
62 #undef USER_LABEL_PREFIX
63 #define USER_LABEL_PREFIX ""
64
65 /* How to refer to registers in assembler output.
66    This sequence is indexed by compiler's hard-register-number.
67    Motorola format uses different register names than defined in m68k.h. */
68
69 #undef REGISTER_NAMES
70
71 #ifndef SUPPORT_SUN_FPA
72
73 #define REGISTER_NAMES \
74 {"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7", \
75  "%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%a6", "%sp", \
76  "%fp0", "%fp1", "%fp2", "%fp3", "%fp4", "%fp5", "%fp6", "%fp7" }
77
78 #else /* SUPPORTED_SUN_FPA */
79
80 #define REGISTER_NAMES \
81 {"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7", \
82  "%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%a6", "%sp", \
83  "%fp0", "%fp1", "%fp2", "%fp3", "%fp4", "%fp5", "%fp6", "%fp7", \
84  "%fpa0", "%fpa1", "%fpa2", "%fpa3", "%fpa4", "%fpa5", "%fpa6", "%fpa7", \
85  "%fpa8", "%fpa9", "%fpa10","%fpa11","%fpa12","%fpa13","%fpa14","%fpa15", \
86  "%fpa16","%fpa17","%fpa18","%fpa19","%fpa20","%fpa21","%fpa22","%fpa23", \
87  "%fpa24","%fpa25","%fpa26","%fpa27","%fpa28","%fpa29","%fpa30","%fpa31" }
88
89 #endif /* defined SUPPORT_SUN_FPA */
90
91 #undef SIZE_TYPE
92 #define SIZE_TYPE "unsigned int"
93  
94 #undef PTRDIFF_TYPE
95 #define PTRDIFF_TYPE "int"
96   
97 #undef WCHAR_TYPE
98 #define WCHAR_TYPE "long int"
99    
100 #undef WCHAR_TYPE_SIZE
101 #define WCHAR_TYPE_SIZE BITS_PER_WORD
102
103 #define CPP_PREDEFINES \
104   "-D__ELF__ -Dunix -Dmc68000 -Dmc68020 -Dlinux -Asystem(unix) -Asystem(posix) -Acpu(m68k) -Amachine(m68k)"
105
106 #undef CPP_SPEC
107 #if TARGET_DEFAULT & 2
108 #define CPP_SPEC \
109   "%{fPIC:-D__PIC__ -D__pic__} %{fpic:-D__PIC__ -D__pic__} %{!msoft-float:-D__HAVE_68881__} %{posix:-D_POSIX_SOURCE}"
110 #else
111 #define CPP_SPEC \
112   "%{fPIC:-D__PIC__ -D__pic__} %{fpic:-D__PIC__ -D__pic__} %{m68881:-D__HAVE_68881__} %{posix:-D_POSIX_SOURCE}"
113 #endif
114
115 #undef  LIB_SPEC
116 #if 1
117 /* We no longer link with libc_p.a or libg.a by default.  If you want
118    to profile or debug the Linux C library, please add -lc_p or -ggdb
119    to LDFLAGS at the link time, respectively.  */
120 #define LIB_SPEC \
121   "%{!shared:%{!symbolic: %{mieee-fp:-lieee} %{p:-lgmon} %{pg:-lgmon} \
122      %{!ggdb:-lc} %{ggdb:-lg}}}"
123 #else
124 #define LIB_SPEC \
125   "%{!shared:%{!symbolic: \
126      %{mieee-fp:-lieee} %{p:-lgmon -lc_p} %{pg:-lgmon -lc_p} \
127      %{!p:%{!pg:%{!g*:-lc} %{g*:-lg}}}}}"
128 #endif
129
130 /* Provide a LINK_SPEC appropriate for Linux.  Here we provide support
131    for the special GCC options -static and -shared, which allow us to
132    link things in one of these three modes by applying the appropriate
133    combinations of options at link-time.  We like to support here for
134    as many of the other GNU linker options as possible.  But I don't
135    have the time to search for those flags.  I am sure how to add
136    support for -soname shared_object_name. H.J.
137
138    I took out %{v:%{!V:-V}}.  It is too much :-(.  They can use
139    -Wl,-V.
140
141    When the -shared link option is used a final link is not being
142    done.  */
143
144 /* If ELF is the default format, we should not use /lib/elf. */
145
146 #undef  LINK_SPEC
147 #ifndef LINUX_DEFAULT_ELF
148 #define LINK_SPEC "-m m68kelf %{shared} %{symbolic:-shared -Bsymbolic} \
149   %{!shared:%{!symbolic: \
150     %{!static: \
151       %{rdynamic:-export-dynamic} \
152       %{!dynamic-linker*:-dynamic-linker /lib/elf/ld-linux.so.1} \
153       %{!rpath*:-rpath /lib/elf/}} %{static}}}"
154 #else
155 #define LINK_SPEC "-m m68kelf %{shared} %{symbolic:-shared -Bsymbolic} \
156   %{!shared:%{!symbolic: \
157     %{!static: \
158       %{rdynamic:-export-dynamic} \
159       %{!dynamic-linker*:-dynamic-linker /lib/ld-linux.so.1}} \
160     %{static}}}"
161 #endif
162
163 /* For compatibility with linux/a.out */
164
165 #undef PCC_BITFIELD_TYPE_MATTERS
166
167 /* Currently, JUMP_TABLES_IN_TEXT_SECTION must be defined in order to
168    keep switch tables in the text section.  */
169    
170 #define JUMP_TABLES_IN_TEXT_SECTION 1
171
172 /* Use the default action for outputting the case label.  */
173 #undef ASM_OUTPUT_CASE_LABEL
174
175 #define ASM_RETURN_CASE_JUMP \
176   return "jmp (2,%%pc,%0.w)"
177
178 /* This is how to output an assembler line that says to advance the
179    location counter to a multiple of 2**LOG bytes.  */
180
181 #undef ASM_OUTPUT_ALIGN
182 #define ASM_OUTPUT_ALIGN(FILE,LOG)                              \
183   if ((LOG) > 0)                                                \
184     fprintf ((FILE), "\t%s \t%u\n", ALIGN_ASM_OP, 1 << (LOG));
185
186 /* Output assembler code to FILE to increment profiler label # LABELNO
187    for profiling a function entry.  */
188
189 #undef FUNCTION_PROFILER
190 #define FUNCTION_PROFILER(FILE, LABELNO) \
191 {                                                                       \
192   asm_fprintf (FILE, "\tlea (%LLP%d,%Rpc),%Ra1\n", (LABELNO));          \
193   if (flag_pic)                                                         \
194     fprintf (FILE, "\tbsr.l _mcount@PLTPC\n");                          \
195   else                                                                  \
196     fprintf (FILE, "\tjbsr _mcount\n");                                 \
197 }
198
199 /* Register in which address to store a structure value is passed to a
200    function.  The default in m68k.h is a1.  For m68k/SVR4 it is a0. */
201
202 #undef STRUCT_VALUE_REGNUM
203 #define STRUCT_VALUE_REGNUM 8
204
205 /* Register in which static-chain is passed to a function.  The
206    default in m68k.h is a0, but that is already the struct value
207    regnum.  Make it a1 instead.  */
208
209 #undef STATIC_CHAIN_REGNUM
210 #define STATIC_CHAIN_REGNUM 9
211
212 /* How to renumber registers for dbx and gdb.
213    On the Sun-3, the floating point registers have numbers
214    18 to 25, not 16 to 23 as they do in the compiler.  */
215
216 #define DBX_REGISTER_NUMBER(REGNO) ((REGNO) < 16 ? (REGNO) : (REGNO) + 2)
217
218 /* Do not break .stabs pseudos into continuations.  */
219
220 #define DBX_CONTIN_LENGTH 0
221
222 /* Allow folding division by zero.  */
223 #define REAL_INFINITY
224
225 /* 1 if N is a possible register number for a function value.  For
226    m68k/SVR4 allow d0, a0, or fp0 as return registers, for integral,
227    pointer, or floating types, respectively.  Reject fp0 if not using
228    a 68881 coprocessor.  */
229
230 #undef FUNCTION_VALUE_REGNO_P
231 #define FUNCTION_VALUE_REGNO_P(N) \
232   ((N) == 0 || (N) == 8 || (TARGET_68881 && (N) == 16))
233
234 /* Define this to be true when FUNCTION_VALUE_REGNO_P is true for
235    more than one register.  */
236
237 #undef NEEDS_UNTYPED_CALL
238 #define NEEDS_UNTYPED_CALL 1
239
240 /* Define how to generate (in the callee) the output value of a
241    function and how to find (in the caller) the value returned by a
242    function.  VALTYPE is the data type of the value (as a tree).  If
243    the precise function being called is known, FUNC is its
244    FUNCTION_DECL; otherwise, FUNC is 0.  For m68k/SVR4 generate the
245    result in d0, a0, or fp0 as appropriate. */
246    
247 #undef FUNCTION_VALUE
248 #define FUNCTION_VALUE(VALTYPE, FUNC)                                   \
249   (TREE_CODE (VALTYPE) == REAL_TYPE && TARGET_68881                     \
250    ? gen_rtx (REG, TYPE_MODE (VALTYPE), 16)                             \
251    : (POINTER_TYPE_P (VALTYPE)                                          \
252       ? gen_rtx (REG, TYPE_MODE (VALTYPE), 8)                           \
253       : gen_rtx (REG, TYPE_MODE (VALTYPE), 0)))
254
255 /* For compatibility with the large body of existing code which does
256    not always properly declare external functions returning pointer
257    types, the m68k/SVR4 convention is to copy the value returned for
258    pointer functions from a0 to d0 in the function epilogue, so that
259    callers that have neglected to properly declare the callee can
260    still find the correct return value.  */
261
262 extern int current_function_returns_pointer;
263 #define FUNCTION_EXTRA_EPILOGUE(FILE, SIZE)                             \
264 do {                                                                    \
265   if ((current_function_returns_pointer) &&                             \
266       ! find_equiv_reg (0, get_last_insn (), 0, 0, 0, 8, Pmode))        \
267     asm_fprintf (FILE, "\tmove.l %Ra0,%Rd0\n");                         \
268 } while (0);
269
270 /* Define how to find the value returned by a library function
271    assuming the value has mode MODE.
272    For m68k/SVR4 look for integer values in d0, pointer values in d0
273    (returned in both d0 and a0), and floating values in fp0.  */
274
275 #undef LIBCALL_VALUE
276 #define LIBCALL_VALUE(MODE)                                             \
277   ((((MODE) == SFmode || (MODE) == DFmode || (MODE) == XFmode)          \
278     && TARGET_68881)                                                    \
279    ? gen_rtx (REG, (MODE), 16)                                          \
280    : gen_rtx (REG, (MODE), 0))
281
282 /* In m68k svr4, a symbol_ref rtx can be a valid PIC operand if it is
283    an operand of a function call. */
284 #undef LEGITIMATE_PIC_OPERAND_P
285 #define LEGITIMATE_PIC_OPERAND_P(X) \
286   ((! symbolic_operand (X, VOIDmode) \
287     && ! (GET_CODE (X) == CONST_DOUBLE && CONST_DOUBLE_MEM (X)  \
288           && GET_CODE (CONST_DOUBLE_MEM (X)) == MEM             \
289           && symbolic_operand (XEXP (CONST_DOUBLE_MEM (X), 0), VOIDmode))) \
290    || (GET_CODE (X) == SYMBOL_REF && SYMBOL_REF_FLAG (X)))
291
292 /* Turn off function cse if we are doing PIC. We always want function
293    call to be done as `bsr foo@PLTPC', so it will force the assembler
294    to create the PLT entry for `foo'.  Doing function cse will cause
295    the address of `foo' to be loaded into a register, which is exactly
296    what we want to avoid when we are doing PIC on svr4 m68k.  */
297 #undef SUBTARGET_OVERRIDE_OPTIONS
298 #define SUBTARGET_OVERRIDE_OPTIONS \
299   if (flag_pic) flag_no_function_cse = 1;
300
301 /* For m68k SVR4, structures are returned using the reentrant
302    technique. */
303 #undef PCC_STATIC_STRUCT_RETURN
304 #define DEFAULT_PCC_STRUCT_RETURN 0
305
306 /* Output assembler code for a block containing the constant parts
307    of a trampoline, leaving space for the variable parts.  */
308
309 /* On m68k svr4, the trampoline is different from the generic version
310    in that we use a1 as the static call chain.  */
311
312 #undef TRAMPOLINE_TEMPLATE
313 #define TRAMPOLINE_TEMPLATE(FILE)                                       \
314 {                                                                       \
315   ASM_OUTPUT_SHORT (FILE, gen_rtx (CONST_INT, VOIDmode, 0x227a));       \
316   ASM_OUTPUT_SHORT (FILE, gen_rtx (CONST_INT, VOIDmode, 8));            \
317   ASM_OUTPUT_SHORT (FILE, gen_rtx (CONST_INT, VOIDmode, 0x2f3a));       \
318   ASM_OUTPUT_SHORT (FILE, gen_rtx (CONST_INT, VOIDmode, 8));            \
319   ASM_OUTPUT_SHORT (FILE, gen_rtx (CONST_INT, VOIDmode, 0x4e75));       \
320   ASM_OUTPUT_INT (FILE, const0_rtx);                                    \
321   ASM_OUTPUT_INT (FILE, const0_rtx);                                    \
322 }