OSDN Git Service

PR c++/19797
[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   pa_hpux_asm_output_external ((FILE), (DECL), (NAME))
205 #define ASM_OUTPUT_EXTERNAL_REAL(FILE, DECL, NAME)              \
206 do {                                                            \
207   if (FUNCTION_NAME_P (NAME))                                   \
208     ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "function");         \
209   else                                                          \
210     ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "object");           \
211 } while (0)
212
213 /* We need set the type for external libcalls.  Also note that not all
214    libcall names are passed to targetm.encode_section_info (e.g., __main).
215    Thus, we also have to do the section encoding if it hasn't been done
216    already.  */
217 #undef ASM_OUTPUT_EXTERNAL_LIBCALL
218 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)                  \
219 do {                                                            \
220   if (!FUNCTION_NAME_P (XSTR (FUN, 0)))                         \
221     hppa_encode_label (FUN);                                    \
222   ASM_OUTPUT_TYPE_DIRECTIVE (FILE, XSTR (FUN, 0), "function");  \
223 } while (0)
224
225 /* We need to use the HP style for internal labels.  */
226 #undef ASM_GENERATE_INTERNAL_LABEL
227 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
228   sprintf (LABEL, "*%c$%s%04ld", (PREFIX)[0], (PREFIX) + 1, (long)(NUM))
229
230 #else /* USING_ELFOS_H */
231
232 /* We are not using GAS.  */
233 #define TARGET_GAS 0
234
235 /* HPUX 11 has the "new" HP assembler.  It's still lousy, but it's a whole
236    lot better than the assembler shipped with older versions of hpux.
237    However, it doesn't support weak symbols and is a bad fit with ELF.  */
238 #undef NEW_HP_ASSEMBLER
239 #define NEW_HP_ASSEMBLER 1
240
241 /* It looks like DWARF2 will be the easiest debug format to handle on this
242    platform.  */
243 #define DWARF2_DEBUGGING_INFO 1
244 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
245
246 /* This target uses the ELF object file format.  */
247 #define OBJECT_FORMAT_ELF
248
249 #undef TARGET_ASM_FILE_START
250 #define TARGET_ASM_FILE_START pa_hpux64_hpas_file_start
251
252 #undef TEXT_SECTION_ASM_OP
253 #define TEXT_SECTION_ASM_OP             "\t.SUBSPA $CODE$\n"
254 #undef READONLY_DATA_SECTION_ASM_OP
255 #define READONLY_DATA_SECTION_ASM_OP    "\t.SUBSPA $LIT$\n"
256 #undef DATA_SECTION_ASM_OP
257 #define DATA_SECTION_ASM_OP             "\t.SUBSPA $DATA$\n"
258 #undef BSS_SECTION_ASM_OP
259 #define BSS_SECTION_ASM_OP              "\t.SUBSPA $BSS$\n"
260
261 /* We provide explicit defines for CTORS_SECTION_ASM_OP and
262    DTORS_SECTION_ASM_OP since we don't yet have support for
263    named sections with the HP assembler.  */
264 #undef CTORS_SECTION_ASM_OP
265 #define CTORS_SECTION_ASM_OP "\t.SUBSPA \\.ctors,QUAD=1,ALIGN=8,ACCESS=31"
266 #undef DTORS_SECTION_ASM_OP
267 #define DTORS_SECTION_ASM_OP "\t.SUBSPA \\.dtors,QUAD=1,ALIGN=8,ACCESS=31"
268
269 #define HP_INIT_ARRAY_SECTION_ASM_OP \
270   "\t.SUBSPA \\.init,QUAD=1,ALIGN=8,ACCESS=31"
271 #define GNU_INIT_ARRAY_SECTION_ASM_OP \
272   "\t.SUBSPA \\.init_array,QUAD=1,ALIGN=8,ACCESS=31"
273 #define HP_FINI_ARRAY_SECTION_ASM_OP \
274   "\t.SUBSPA \\.fini,QUAD=1,ALIGN=8,ACCESS=31"
275 #define GNU_FINI_ARRAY_SECTION_ASM_OP \
276   "\t.SUBSPA \\.fini_array,QUAD=1,ALIGN=8,ACCESS=31"
277
278 #endif /* USING_ELFOS_H */
279
280 /* The following defines, used to run constructors and destructors with
281    the SOM linker under HP-UX 11, are not needed.  */
282 #undef HAS_INIT_SECTION
283 #undef LD_INIT_SWITCH
284 #undef LD_FINI_SWITCH
285
286 /* The following STARTFILE_SPEC and ENDFILE_SPEC defines provide the
287    magic needed to run initializers and finalizers.  */
288 #undef STARTFILE_SPEC
289 #if TARGET_HPUX_11_11
290 #define STARTFILE_SPEC \
291   "%{!shared: %{!symbolic: crt0%O%s} %{munix=95:unix95.o%s} \
292      %{!munix=93:%{!munix=95:unix98%O%s}}} %{static:crtbeginT%O%s} \
293    %{!static:%{!shared:crtbegin%O%s} %{shared:crtbeginS%O%s}}"
294 #else
295 #define STARTFILE_SPEC \
296   "%{!shared: %{!symbolic: crt0%O%s} %{munix=95:unix95%O%s}} \
297    %{static:crtbeginT%O%s} %{!static:%{!shared:crtbegin%O%s} \
298    %{shared:crtbeginS%O%s}}"
299 #endif
300 #undef ENDFILE_SPEC
301 #define ENDFILE_SPEC "%{!shared:crtend%O%s} %{shared:crtendS%O%s}"
302
303 /* Since HP uses the .init and .fini sections for array initializers
304    and finalizers, we need different defines for INIT_SECTION_ASM_OP
305    and FINI_SECTION_ASM_OP.  With the implementation adopted below,
306    the sections are not actually used.  However, we still must provide
307    defines to select the proper code path.  */
308 #undef INIT_SECTION_ASM_OP
309 #define INIT_SECTION_ASM_OP
310 #undef FINI_SECTION_ASM_OP
311 #define FINI_SECTION_ASM_OP
312
313 /* We are using array initializers and don't want calls in the INIT
314    and FINI sections.  */
315 #undef CRT_CALL_STATIC_FUNCTION
316 #define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC)
317
318 /* The init_priority attribute is not supported with HP ld.  This could be
319    supported if collect2 was used with LD_INIT_SWITCH.  Unfortunately, this
320    approach doesn't work with GNU ld since HP-UX doesn't support DT_INIT,
321    and therefore the -init and -fini GNU ld switches.  */
322 #undef SUPPORTS_INIT_PRIORITY
323 #define SUPPORTS_INIT_PRIORITY (TARGET_GNU_LD ? 1 : 0)
324
325 /* We use DTOR_LIST_BEGIN to carry a bunch of hacks to allow us to use
326    the init and fini array sections with both the HP and GNU linkers.
327    The linkers setup the required dynamic entries in the dynamic segment
328    and the dynamic linker does the calls.  This approach avoids using
329    collect2.
330
331    The first hack is to implement __do_global_ctors_aux in crtbegin as
332    it needs to be the first entry in the init array so that it is called
333    last.  HP got the order of the init array backwards.  The DT_INIT_ARRAY
334    is supposed to be executed in the same order as the addresses appear in
335    the array.  DT_FINI_ARRAY is supposed to be executed in the opposite
336    order.
337
338    The second hack is stubs for __cxa_finalize and _Jv_RegisterClasses.
339    The HP implementation of undefined weak symbols is broken.  The linker
340    and dynamic loader both search for undefined weak symbols contrary the
341    generic System V ABI.  An undefined weak symbol should resolve to a
342    value of 0 rather than causing an error.  The prototypes for
343    __cxa_finalize and _Jv_RegisterClasses in crtstuff.c are weak when
344    weak is supported (GNU as), so in theory a strong define should override
345    the stub functions provided here.
346
347    The final hack is a set of plabels to implement the effect of
348    CRT_CALL_STATIC_FUNCTION.  HP-UX 11 only supports DI_INIT_ARRAY and
349    DT_FINI_ARRAY and they put the arrays in .init and .fini, rather than
350    in .init_array and .fini_array.  The standard defines for .init and
351    .fini have the execute flag set.  So, the assembler has to be hacked
352    to munge the standard flags for these sections to make them agree
353    with what the HP linker expects.  With the GNU linker, we need to
354    used the .init_array and .fini_array sections.  So, we set up for
355    both just in case.  Once we have built the table, the linker does
356    the rest of the work.
357
358    The order is significant.  Placing __do_global_ctors_aux first in
359    the list, results in it being called last.  User specified initializers,
360    either using the linker +init command or a plabel, run before the
361    initializers specified here.  */
362
363 /* We need a __cxa_finalize stub if CRTSTUFFS_O is defined.  */
364 #ifdef CRTSTUFFS_O
365 #define PA_CXA_FINALIZE_STUB \
366 extern void __cxa_finalize (void *) TARGET_ATTRIBUTE_WEAK;              \
367 void                                                                    \
368 __cxa_finalize (void *p __attribute__((unused))) {}
369 #else
370 #define PA_CXA_FINALIZE_STUB
371 #endif
372
373 /* We need a _Jv_RegisterClasses stub if JCR_SECTION_NAME is defined.  */
374 #ifdef JCR_SECTION_NAME
375 #define PA_JV_REGISTERCLASSES_STUB \
376 void                                                                    \
377 _Jv_RegisterClasses (void *p __attribute__((unused))) {}
378 #else
379 #define PA_JV_REGISTERCLASSES_STUB
380 #endif
381
382 /* We need to add frame_dummy to the initializer list if EH_FRAME_SECTION_NAME
383    or JCR_SECTION_NAME is defined.  */
384 #if defined(EH_FRAME_SECTION_NAME) || defined(JCR_SECTION_NAME)
385 #define PA_INIT_FRAME_DUMMY_ASM_OP ".dword P%frame_dummy"
386 #else
387 #define PA_INIT_FRAME_DUMMY_ASM_OP ""
388 #endif
389
390 #define PA_INIT_FINI_HACK \
391 static void __attribute__((used))                                       \
392 __do_global_ctors_aux (void)                                            \
393 {                                                                       \
394   func_ptr *p = __CTOR_LIST__;                                          \
395   while (*(p + 1))                                                      \
396     p++;                                                                \
397   for (; *p != (func_ptr) -1; p--)                                      \
398     (*p) ();                                                            \
399 }                                                                       \
400                                                                         \
401 PA_CXA_FINALIZE_STUB                                                    \
402 PA_JV_REGISTERCLASSES_STUB                                              \
403                                                                         \
404 asm (HP_INIT_ARRAY_SECTION_ASM_OP);                                     \
405 asm (".dword P%__do_global_ctors_aux");                                 \
406 asm (PA_INIT_FRAME_DUMMY_ASM_OP);                                       \
407 asm (GNU_INIT_ARRAY_SECTION_ASM_OP);                                    \
408 asm (".dword P%__do_global_ctors_aux");                                 \
409 asm (PA_INIT_FRAME_DUMMY_ASM_OP);                                       \
410 asm (HP_FINI_ARRAY_SECTION_ASM_OP);                                     \
411 asm (".dword P%__do_global_dtors_aux");                                 \
412 asm (GNU_FINI_ARRAY_SECTION_ASM_OP);                                    \
413 asm (".dword P%__do_global_dtors_aux")
414
415 /* The following two variants of DTOR_LIST_BEGIN are identical to those
416    in crtstuff.c except for the addition of the above init-fini hack.  */
417 #ifdef DTORS_SECTION_ASM_OP
418 #define DTOR_LIST_BEGIN \
419 asm (DTORS_SECTION_ASM_OP);                                             \
420 STATIC func_ptr __DTOR_LIST__[1]                                        \
421   __attribute__ ((aligned(sizeof(func_ptr))))                           \
422   = { (func_ptr) (-1) };                                                \
423 PA_INIT_FINI_HACK
424 #else
425 #define DTOR_LIST_BEGIN \
426 STATIC func_ptr __DTOR_LIST__[1]                                        \
427   __attribute__ ((section(".dtors"), aligned(sizeof(func_ptr))))        \
428   = { (func_ptr) (-1) };                                                \
429 PA_INIT_FINI_HACK
430 #endif
431
432 /* If using HP ld do not call pxdb.  Use size as a program that does nothing
433    and returns 0.  /bin/true cannot be used because it is a script without
434    an interpreter.  */
435 #define INIT_ENVIRONMENT "LD_PXDB=/usr/ccs/bin/size"
436
437 /* The HPUX dynamic linker objects to weak symbols with no
438    definitions, so do not use them in gthr-posix.h.  */
439 #define GTHREAD_USE_WEAK 0