OSDN Git Service

* pa/elf.h, pa/som.h (ASM_OUTPUT_EXTERNAL): Use assemble_name_raw
[pf3gnuchains/gcc-fork.git] / gcc / config / pa / pa64-hpux.h
1 /* Definitions of target machine for GNU compiler, for HPs running
2    HPUX using the 64bit runtime model.
3    Copyright (C) 1999, 2000, 2001, 2002, 2004, 2005 Free Software Foundation,
4    Inc.
5
6 This file is part of GCC.
7
8 GCC 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 GCC 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 GCC; 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 #undef SUBTARGET_SWITCHES
24 #define SUBTARGET_SWITCHES                              \
25   { "sio",       MASK_SIO,                              \
26      N_("Generate cpp defines for server IO") },        \
27   { "wsio",     -MASK_SIO,                              \
28      N_("Generate cpp defines for workstation IO") },   \
29   {"gnu-ld",     MASK_GNU_LD,                           \
30      N_("Assume code will be linked by GNU ld") },      \
31   {"hp-ld",     -MASK_GNU_LD,                           \
32      N_("Assume code will be linked by HP ld") },
33
34 /* We can debug dynamically linked executables on hpux11; we also
35    want dereferencing of a NULL pointer to cause a SEGV.  Do not move
36    the "+Accept TypeMismatch" switch.  We check for it in collect2
37    to determine which init/fini is needed.  */
38 #undef LINK_SPEC
39 #if ((TARGET_DEFAULT | TARGET_CPU_DEFAULT) & MASK_GNU_LD)
40 #define LINK_SPEC \
41   "%{!shared:%{p:-L/lib/pa20_64/libp -L/usr/lib/pa20_64/libp %{!static:\
42      %nWarning: consider linking with `-static' as system libraries with\n\
43      %n  profiling support are only provided in archive format}}}\
44    %{!shared:%{pg:-L/lib/pa20_64/libp -L/usr/lib/pa20_64/libp %{!static:\
45      %nWarning: consider linking with `-static' as system libraries with\n\
46      %n  profiling support are only provided in archive format}}}\
47    %{mhp-ld:+Accept TypeMismatch -z} -E %{mlinker-opt:-O} %{!shared:-u main}\
48    %{static:-a archive} %{shared:%{mhp-ld:-b}%{!mhp-ld:-shared}}"
49 #else
50 #define LINK_SPEC \
51   "%{!shared:%{p:-L/lib/pa20_64/libp -L/usr/lib/pa20_64/libp %{!static:\
52      %nWarning: consider linking with `-static' as system libraries with\n\
53      %n  profiling support are only provided in archive format}}}\
54    %{!shared:%{pg:-L/lib/pa20_64/libp -L/usr/lib/pa20_64/libp %{!static:\
55      %nWarning: consider linking with `-static' as system libraries with\n\
56      %n  profiling support are only provided in archive format}}}\
57    %{!mgnu-ld:+Accept TypeMismatch -z} -E %{mlinker-opt:-O} %{!shared:-u main}\
58    %{static:-a archive} %{shared:%{mgnu-ld:-shared}%{!mgnu-ld:-b}}"
59 #endif
60
61 /* Profiling support is only provided in libc.a.  However, libprof and
62    libgprof are only available in shared form on HP-UX 11.00.  We use
63    the shared form if we are using the GNU linker or an archive form
64    isn't available.  We also usually need to link with libdld and it's
65    only available in shared form.  */
66 #undef LIB_SPEC
67 #if ((TARGET_DEFAULT | TARGET_CPU_DEFAULT) & MASK_GNU_LD)
68 #define LIB_SPEC \
69   "%{!shared:\
70      %{!p:%{!pg: -lc %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
71      %{p:%{!pg:%{static:%{!mhp-ld:-a shared}%{mhp-ld:-a archive_shared}}\
72            -lprof %{static:-a archive} -lc\
73            %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
74      %{pg:%{static:%{!mhp-ld:-a shared}%{mhp-ld:-a archive_shared}}\
75        -lgprof %{static:-a archive} -lc\
76        %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
77    /usr/lib/pa20_64/milli.a"
78 #else
79 #define LIB_SPEC \
80   "%{!shared:\
81      %{!p:%{!pg: -lc %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
82      %{p:%{!pg:%{static:%{mgnu-ld:-a shared}%{!mgnu-ld:-a archive_shared}}\
83            -lprof %{static:-a archive} -lc\
84            %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
85      %{pg:%{static:%{mgnu-ld:-a shared}%{!mgnu-ld:-a archive_shared}}\
86        -lgprof %{static:-a archive} -lc\
87        %{static:%{!nolibdld:-a shared -ldld -a archive -lc}}}}\
88    /usr/lib/pa20_64/milli.a"
89 #endif
90
91 /* Under hpux11, the normal location of the `ld' and `as' programs is the
92    /usr/ccs/bin directory.  */
93
94 #ifndef CROSS_COMPILE
95 #undef MD_EXEC_PREFIX
96 #define MD_EXEC_PREFIX "/usr/ccs/bin"
97 #endif
98
99 /* Default prefixes.  */
100
101 #undef STANDARD_STARTFILE_PREFIX_1
102 #define STANDARD_STARTFILE_PREFIX_1 "/lib/pa20_64/"
103
104 #undef STANDARD_STARTFILE_PREFIX_2
105 #define STANDARD_STARTFILE_PREFIX_2 "/usr/lib/pa20_64/"
106
107 /* Under hpux11 the normal location of the various pa20_64 *crt*.o files
108    is the /usr/ccs/lib/pa20_64 directory.  Some files may also be in the
109    /opt/langtools/lib/pa20_64 directory.  */
110
111 #ifndef CROSS_COMPILE
112 #undef MD_STARTFILE_PREFIX
113 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/pa20_64/"
114 #endif
115
116 #ifndef CROSS_COMPILE
117 #undef MD_STARTFILE_PREFIX_1
118 #define MD_STARTFILE_PREFIX_1 "/opt/langtools/lib/pa20_64/"
119 #endif
120
121 /* This macro specifies the biggest alignment supported by the object
122    file format of this machine.
123
124    The .align directive in the HP assembler allows alignments up to
125    4096 bytes.  However, the maximum alignment of a global common symbol
126    is 16 bytes using HP ld.  Unfortunately, this macro doesn't provide
127    a method to check for common symbols.  */
128 #undef MAX_OFILE_ALIGNMENT
129 #define MAX_OFILE_ALIGNMENT 32768
130
131 /* Due to limitations in the target structure, it isn't currently possible
132    to dynamically switch between the GNU and HP assemblers.  */
133 #undef TARGET_GAS
134
135 /* Configure selects the standard ELFOS defines for use with GAS.  */
136 #ifdef USING_ELFOS_H
137
138 /* We are using GAS.  */
139 #define TARGET_GAS 1
140
141 #undef TARGET_ASM_FILE_START
142 #define TARGET_ASM_FILE_START pa_hpux64_gas_file_start
143
144 /* This is how we output a null terminated string.  */
145 #undef STRING_ASM_OP
146 #define STRING_ASM_OP   "\t.stringz\t"
147
148 #define TEXT_SECTION_ASM_OP     "\t.text"
149 #define DATA_SECTION_ASM_OP     "\t.data"
150 #define BSS_SECTION_ASM_OP      "\t.section\t.bss"
151
152 #define JCR_SECTION_NAME        ".jcr"
153
154 #define HP_INIT_ARRAY_SECTION_ASM_OP    "\t.section\t.init"
155 #define GNU_INIT_ARRAY_SECTION_ASM_OP   "\t.section\t.init_array"
156 #define HP_FINI_ARRAY_SECTION_ASM_OP    "\t.section\t.fini"
157 #define GNU_FINI_ARRAY_SECTION_ASM_OP   "\t.section\t.fini_array"
158
159 /* We need to override the following two macros defined in elfos.h since
160    the .comm directive has a different syntax and it can't be used for
161    local common symbols.  */
162 #undef ASM_OUTPUT_ALIGNED_COMMON
163 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
164   pa_asm_output_aligned_common (FILE, NAME, SIZE, ALIGN)
165
166 #undef ASM_OUTPUT_ALIGNED_LOCAL
167 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)               \
168   pa_asm_output_aligned_local (FILE, NAME, SIZE, ALIGN)
169
170 /* The define in pa.h doesn't work with the alias attribute.  The
171    default is ok with the following define for GLOBAL_ASM_OP.  */
172 #undef TARGET_ASM_GLOBALIZE_LABEL
173
174 /* This is how we globalize a label.  */
175 #define GLOBAL_ASM_OP   "\t.globl\t"
176
177 /* Hacked version from defaults.h that uses assemble_name_raw
178    instead of assemble_name.  A symbol in a type directive that
179    isn't otherwise referenced doesn't cause the symbol to be
180    placed in the symbol table of the assembled object.  */
181 #undef ASM_OUTPUT_TYPE_DIRECTIVE
182 #define ASM_OUTPUT_TYPE_DIRECTIVE(STREAM, NAME, TYPE)           \
183 do {                                                            \
184   fputs (TYPE_ASM_OP, STREAM);                                  \
185   assemble_name_raw (STREAM, NAME);                             \
186   fputs (", ", STREAM);                                         \
187   fprintf (STREAM, TYPE_OPERAND_FMT, TYPE);                     \
188   putc ('\n', STREAM);                                          \
189 } while (0)
190
191 /* Hacked version from elfos.h that doesn't output a label.  */
192 #undef ASM_DECLARE_FUNCTION_NAME
193 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)             \
194 do {                                                            \
195   ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "function");           \
196   ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));                \
197 } while (0)
198
199 /* The type of external references must be set correctly for the
200    dynamic loader to work correctly.  This is equivalent to the
201    HP assembler's .IMPORT directive but relates more directly to
202    ELF object file types.  */
203 #define ASM_OUTPUT_EXTERNAL(FILE, DECL, NAME)                   \
204 do {                                                            \
205   if (FUNCTION_NAME_P (NAME))                                   \
206     ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "function");         \
207   else                                                          \
208     ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "object");           \
209 } while (0)
210
211 /* We need set the type for external libcalls.  Also note that not all
212    libcall names are passed to targetm.encode_section_info (e.g., __main).
213    Thus, we also have to do the section encoding if it hasn't been done
214    already.  */
215 #undef ASM_OUTPUT_EXTERNAL_LIBCALL
216 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                  \
217 do {                                                            \
218   if (!FUNCTION_NAME_P (XSTR (FUN, 0)))                         \
219     hppa_encode_label (FUN);                                    \
220   ASM_OUTPUT_TYPE_DIRECTIVE (FILE, XSTR (FUN, 0), "function");  \
221 } while (0)
222
223 /* We need to use the HP style for internal labels.  */
224 #undef ASM_GENERATE_INTERNAL_LABEL
225 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
226   sprintf (LABEL, "*%c$%s%04ld", (PREFIX)[0], (PREFIX) + 1, (long)(NUM))
227
228 #else /* USING_ELFOS_H */
229
230 /* We are not using GAS.  */
231 #define TARGET_GAS 0
232
233 /* HPUX 11 has the "new" HP assembler.  It's still lousy, but it's a whole
234    lot better than the assembler shipped with older versions of hpux.
235    However, it doesn't support weak symbols and is a bad fit with ELF.  */
236 #undef NEW_HP_ASSEMBLER
237 #define NEW_HP_ASSEMBLER 1
238
239 /* It looks like DWARF2 will be the easiest debug format to handle on this
240    platform.  */
241 #define DWARF2_DEBUGGING_INFO 1
242 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
243
244 /* This target uses the ELF object file format.  */
245 #define OBJECT_FORMAT_ELF
246
247 #undef TARGET_ASM_FILE_START
248 #define TARGET_ASM_FILE_START pa_hpux64_hpas_file_start
249
250 #undef TEXT_SECTION_ASM_OP
251 #define TEXT_SECTION_ASM_OP             "\t.SUBSPA $CODE$\n"
252 #undef READONLY_DATA_SECTION_ASM_OP
253 #define READONLY_DATA_SECTION_ASM_OP    "\t.SUBSPA $LIT$\n"
254 #undef DATA_SECTION_ASM_OP
255 #define DATA_SECTION_ASM_OP             "\t.SUBSPA $DATA$\n"
256 #undef BSS_SECTION_ASM_OP
257 #define BSS_SECTION_ASM_OP              "\t.SUBSPA $BSS$\n"
258
259 /* We provide explicit defines for CTORS_SECTION_ASM_OP and
260    DTORS_SECTION_ASM_OP since we don't yet have support for
261    named sections with the HP assembler.  */
262 #undef CTORS_SECTION_ASM_OP
263 #define CTORS_SECTION_ASM_OP "\t.SUBSPA \\.ctors,QUAD=1,ALIGN=8,ACCESS=31"
264 #undef DTORS_SECTION_ASM_OP
265 #define DTORS_SECTION_ASM_OP "\t.SUBSPA \\.dtors,QUAD=1,ALIGN=8,ACCESS=31"
266
267 #define HP_INIT_ARRAY_SECTION_ASM_OP \
268   "\t.SUBSPA \\.init,QUAD=1,ALIGN=8,ACCESS=31"
269 #define GNU_INIT_ARRAY_SECTION_ASM_OP \
270   "\t.SUBSPA \\.init_array,QUAD=1,ALIGN=8,ACCESS=31"
271 #define HP_FINI_ARRAY_SECTION_ASM_OP \
272   "\t.SUBSPA \\.fini,QUAD=1,ALIGN=8,ACCESS=31"
273 #define GNU_FINI_ARRAY_SECTION_ASM_OP \
274   "\t.SUBSPA \\.fini_array,QUAD=1,ALIGN=8,ACCESS=31"
275
276 #endif /* USING_ELFOS_H */
277
278 /* The following defines, used to run constructors and destructors with
279    the SOM linker under HP-UX 11, are not needed.  */
280 #undef HAS_INIT_SECTION
281 #undef LD_INIT_SWITCH
282 #undef LD_FINI_SWITCH
283
284 /* The following STARTFILE_SPEC and ENDFILE_SPEC defines provide the
285    magic needed to run initializers and finalizers.  */
286 #undef STARTFILE_SPEC
287 #if TARGET_HPUX_11_11
288 #define STARTFILE_SPEC \
289   "%{!shared: %{!symbolic: crt0%O%s} %{munix=95:unix95.o%s} \
290      %{!munix=93:%{!munix=95:unix98%O%s}}} %{static:crtbeginT%O%s} \
291    %{!static:%{!shared:crtbegin%O%s} %{shared:crtbeginS%O%s}}"
292 #else
293 #define STARTFILE_SPEC \
294   "%{!shared: %{!symbolic: crt0%O%s} %{munix=95:unix95%O%s}} \
295    %{static:crtbeginT%O%s} %{!static:%{!shared:crtbegin%O%s} \
296    %{shared:crtbeginS%O%s}}"
297 #endif
298 #undef ENDFILE_SPEC
299 #define ENDFILE_SPEC "%{!shared:crtend%O%s} %{shared:crtendS%O%s}"
300
301 /* Since HP uses the .init and .fini sections for array initializers
302    and finalizers, we need different defines for INIT_SECTION_ASM_OP
303    and FINI_SECTION_ASM_OP.  With the implementation adopted below,
304    the sections are not actually used.  However, we still must provide
305    defines to select the proper code path.  */
306 #undef INIT_SECTION_ASM_OP
307 #define INIT_SECTION_ASM_OP
308 #undef FINI_SECTION_ASM_OP
309 #define FINI_SECTION_ASM_OP
310
311 /* We are using array initializers and don't want calls in the INIT
312    and FINI sections.  */
313 #undef CRT_CALL_STATIC_FUNCTION
314 #define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC)
315
316 /* The init_priority attribute is not supported with HP ld.  This could be
317    supported if collect2 was used with LD_INIT_SWITCH.  Unfortunately, this
318    approach doesn't work with GNU ld since HP-UX doesn't support DT_INIT,
319    and therefore the -init and -fini GNU ld switches.  */
320 #undef SUPPORTS_INIT_PRIORITY
321 #define SUPPORTS_INIT_PRIORITY (TARGET_GNU_LD ? 1 : 0)
322
323 /* We use DTOR_LIST_BEGIN to carry a bunch of hacks to allow us to use
324    the init and fini array sections with both the HP and GNU linkers.
325    The linkers setup the required dynamic entries in the dynamic segment
326    and the dynamic linker does the calls.  This approach avoids using
327    collect2.
328
329    The first hack is to implement __do_global_ctors_aux in crtbegin as
330    it needs to be the first entry in the init array so that it is called
331    last.  HP got the order of the init array backwards.  The DT_INIT_ARRAY
332    is supposed to be executed in the same order as the addresses appear in
333    the array.  DT_FINI_ARRAY is supposed to be executed in the opposite
334    order.
335
336    The second hack is stubs for __cxa_finalize and _Jv_RegisterClasses.
337    The HP implementation of undefined weak symbols is broken.  The linker
338    and dynamic loader both search for undefined weak symbols contrary the
339    generic System V ABI.  An undefined weak symbol should resolve to a
340    value of 0 rather than causing an error.  The prototypes for
341    __cxa_finalize and _Jv_RegisterClasses in crtstuff.c are weak when
342    weak is supported (GNU as), so in theory a strong define should override
343    the stub functions provided here.
344
345    The final hack is a set of plabels to implement the effect of
346    CRT_CALL_STATIC_FUNCTION.  HP-UX 11 only supports DI_INIT_ARRAY and
347    DT_FINI_ARRAY and they put the arrays in .init and .fini, rather than
348    in .init_array and .fini_array.  The standard defines for .init and
349    .fini have the execute flag set.  So, the assembler has to be hacked
350    to munge the standard flags for these sections to make them agree
351    with what the HP linker expects.  With the GNU linker, we need to
352    used the .init_array and .fini_array sections.  So, we set up for
353    both just in case.  Once we have built the table, the linker does
354    the rest of the work.
355
356    The order is significant.  Placing __do_global_ctors_aux first in
357    the list, results in it being called last.  User specified initializers,
358    either using the linker +init command or a plabel, run before the
359    initializers specified here.  */
360
361 /* We need a __cxa_finalize stub if CRTSTUFFS_O is defined.  */
362 #ifdef CRTSTUFFS_O
363 #define PA_CXA_FINALIZE_STUB \
364 extern void __cxa_finalize (void *) TARGET_ATTRIBUTE_WEAK;              \
365 void                                                                    \
366 __cxa_finalize (void *p __attribute__((unused))) {}
367 #else
368 #define PA_CXA_FINALIZE_STUB
369 #endif
370
371 /* We need a _Jv_RegisterClasses stub if JCR_SECTION_NAME is defined.  */
372 #ifdef JCR_SECTION_NAME
373 #define PA_JV_REGISTERCLASSES_STUB \
374 void                                                                    \
375 _Jv_RegisterClasses (void *p __attribute__((unused))) {}
376 #else
377 #define PA_JV_REGISTERCLASSES_STUB
378 #endif
379
380 /* We need to add frame_dummy to the initializer list if EH_FRAME_SECTION_NAME
381    or JCR_SECTION_NAME is defined.  */
382 #if defined(EH_FRAME_SECTION_NAME) || defined(JCR_SECTION_NAME)
383 #define PA_INIT_FRAME_DUMMY_ASM_OP ".dword P%frame_dummy"
384 #else
385 #define PA_INIT_FRAME_DUMMY_ASM_OP ""
386 #endif
387
388 #define PA_INIT_FINI_HACK \
389 static void __attribute__((used))                                       \
390 __do_global_ctors_aux (void)                                            \
391 {                                                                       \
392   func_ptr *p = __CTOR_LIST__;                                          \
393   while (*(p + 1))                                                      \
394     p++;                                                                \
395   for (; *p != (func_ptr) -1; p--)                                      \
396     (*p) ();                                                            \
397 }                                                                       \
398                                                                         \
399 PA_CXA_FINALIZE_STUB                                                    \
400 PA_JV_REGISTERCLASSES_STUB                                              \
401                                                                         \
402 asm (HP_INIT_ARRAY_SECTION_ASM_OP);                                     \
403 asm (".dword P%__do_global_ctors_aux");                                 \
404 asm (PA_INIT_FRAME_DUMMY_ASM_OP);                                       \
405 asm (GNU_INIT_ARRAY_SECTION_ASM_OP);                                    \
406 asm (".dword P%__do_global_ctors_aux");                                 \
407 asm (PA_INIT_FRAME_DUMMY_ASM_OP);                                       \
408 asm (HP_FINI_ARRAY_SECTION_ASM_OP);                                     \
409 asm (".dword P%__do_global_dtors_aux");                                 \
410 asm (GNU_FINI_ARRAY_SECTION_ASM_OP);                                    \
411 asm (".dword P%__do_global_dtors_aux")
412
413 /* The following two variants of DTOR_LIST_BEGIN are identical to those
414    in crtstuff.c except for the addition of the above init-fini hack.  */
415 #ifdef DTORS_SECTION_ASM_OP
416 #define DTOR_LIST_BEGIN \
417 asm (DTORS_SECTION_ASM_OP);                                             \
418 STATIC func_ptr __DTOR_LIST__[1]                                        \
419   __attribute__ ((aligned(sizeof(func_ptr))))                           \
420   = { (func_ptr) (-1) };                                                \
421 PA_INIT_FINI_HACK
422 #else
423 #define DTOR_LIST_BEGIN \
424 STATIC func_ptr __DTOR_LIST__[1]                                        \
425   __attribute__ ((section(".dtors"), aligned(sizeof(func_ptr))))        \
426   = { (func_ptr) (-1) };                                                \
427 PA_INIT_FINI_HACK
428 #endif
429
430 /* If using HP ld do not call pxdb.  Use size as a program that does nothing
431    and returns 0.  /bin/true cannot be used because it is a script without
432    an interpreter.  */
433 #define INIT_ENVIRONMENT "LD_PXDB=/usr/ccs/bin/size"
434
435 /* The HPUX dynamic linker objects to weak symbols with no
436    definitions, so do not use them in gthr-posix.h.  */
437 #define GTHREAD_USE_WEAK 0