projects / gcc.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Shared library support.
[gcc.git] / gcc / config / svr4.h
1 /* svr4.h -- operating system specific defines to be used when
2 targeting GCC for some generic System V Release 4 system.
3 Copyright (C) 1991, 1994 Free Software Foundation, Inc.
4 Contributed by Ron Guilmette (rfg@netcom.com).
5
6 This file is part of GNU CC.
7
8 GNU CC 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 GNU CC 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 GNU CC; see the file COPYING. If not, write to
20 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
21
22 To use this file, make up a file with a name like:
23
24 ?????svr4.h
25
26 where ????? is replaced by the name of the basic hardware that you
27 are targeting for. Then, in the file ?????svr4.h, put something
28 like:
29
30 #include "?????.h"
31 #include "svr4.h"
32
33 followed by any really system-specific defines (or overrides of
34 defines) which you find that you need. For example, CPP_PREDEFINES
35 is defined here with only the defined -Dunix and -DSVR4. You should
36 probably override that in your target-specific ?????svr4.h file
37 with a set of defines that includes these, but also contains an
38 appropriate define for the type of hardware that you are targeting.
39 */
40
41 /* Define a symbol indicating that we are using svr4.h. */
42 #define USING_SVR4_H
43
44 /* For the sake of libgcc2.c, indicate target supports atexit. */
45 #define HAVE_ATEXIT
46
47 /* Cpp, assembler, linker, library, and startfile spec's. */
48
49 /* This defines which switch letters take arguments. On svr4, most of
50 the normal cases (defined in gcc.c) apply, and we also have -h* and
51 -z* options (for the linker). Note however that there is no such
52 thing as a -T option for svr4. */
53
54 #define SWITCH_TAKES_ARG(CHAR) \
55 ( (CHAR) == 'D' \
56 || (CHAR) == 'U' \
57 || (CHAR) == 'o' \
58 || (CHAR) == 'e' \
59 || (CHAR) == 'u' \
60 || (CHAR) == 'I' \
61 || (CHAR) == 'm' \
62 || (CHAR) == 'L' \
63 || (CHAR) == 'A' \
64 || (CHAR) == 'h' \
65 || (CHAR) == 'z')
66
67 /* This defines which multi-letter switches take arguments. On svr4,
68 there are no such switches except those implemented by GCC itself. */
69
70 #define WORD_SWITCH_TAKES_ARG(STR) \
71 (DEFAULT_WORD_SWITCH_TAKES_ARG (STR) \
72 && strcmp (STR, "Tdata") && strcmp (STR, "Ttext") \
73 && strcmp (STR, "Tbss"))
74
75 /* You should redefine CPP_PREDEFINES in any file which includes this one.
76 The definition should be appropriate for the type of target system
77 involved, and it should include any -A (assertion) options which are
78 appropriate for the given target system. */
79 #undef CPP_PREDEFINES
80
81 /* Provide an ASM_SPEC appropriate for svr4. Here we try to support as
82 many of the specialized svr4 assembler options as seems reasonable,
83 given that there are certain options which we can't (or shouldn't)
84 support directly due to the fact that they conflict with other options
85 for other svr4 tools (e.g. ld) or with other options for GCC itself.
86 For example, we don't support the -o (output file) or -R (remove
87 input file) options because GCC already handles these things. We
88 also don't support the -m (run m4) option for the assembler because
89 that conflicts with the -m (produce load map) option of the svr4
90 linker. We do however allow passing arbitrary options to the svr4
91 assembler via the -Wa, option.
92
93 Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,*
94 option.
95 */
96
97 #undef ASM_SPEC
98 #define ASM_SPEC \
99 "%{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}"
100
101 /* svr4 assemblers need the `-' (indicating input from stdin) to come after
102 the -o option (and its argument) for some reason. If we try to put it
103 before the -o option, the assembler will try to read the file named as
104 the output file in the -o option as an input file (after it has already
105 written some stuff to it) and the binary stuff contained therein will
106 cause totally confuse the assembler, resulting in many spurious error
107 messages. */
108
109 #undef ASM_FINAL_SPEC
110 #define ASM_FINAL_SPEC "%{pipe:-}"
111
112 /* Under svr4, the normal location of the `ld' and `as' programs is the
113 /usr/ccs/bin directory. */
114
115 #undef MD_EXEC_PREFIX
116 #define MD_EXEC_PREFIX "/usr/ccs/bin/"
117
118 /* Under svr4, the normal location of the various *crt*.o files is the
119 /usr/ccs/lib directory. */
120
121 #undef MD_STARTFILE_PREFIX
122 #define MD_STARTFILE_PREFIX "/usr/ccs/lib/"
123
124 /* Provide a LIB_SPEC appropriate for svr4. Here we tack on the default
125 standard C library (unless we are building a shared library). */
126
127 #undef LIB_SPEC
128 #define LIB_SPEC "%{!shared:%{!symbolic:-lc}}"
129
130 /* Provide a LIBGCC_SPEC appropriate for svr4. We also want to exclude
131 libgcc when -symbolic. */
132
133 #undef LIBGCC_SPEC
134 #define LIBGCC_SPEC "%{!shared:%{!symbolic:-lgcc}}"
135
136 /* Provide an ENDFILE_SPEC appropriate for svr4. Here we tack on our own
137 magical crtend.o file (see crtstuff.c) which provides part of the
138 support for getting C++ file-scope static object constructed before
139 entering `main', followed by the normal svr3/svr4 "finalizer" file,
140 which is either `gcrtn.o' or `crtn.o'. */
141
142 #undef ENDFILE_SPEC
143 #define ENDFILE_SPEC "crtend.o%s %{pg:gcrtn.o}%{!pg:crtn.o%s}"
144
145 /* Provide a LINK_SPEC appropriate for svr4. Here we provide support
146 for the special GCC options -static, -shared, and -symbolic which
147 allow us to link things in one of these three modes by applying the
148 appropriate combinations of options at link-time. We also provide
149 support here for as many of the other svr4 linker options as seems
150 reasonable, given that some of them conflict with options for other
151 svr4 tools (e.g. the assembler). In particular, we do support the
152 -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*,
153 -l*, -o*, -r, -s, -u*, and -L* options are directly supported
154 by gcc.c itself. We don't directly support the -m (generate load
155 map) option because that conflicts with the -m (run m4) option of
156 the svr4 assembler. We also don't directly support the svr4 linker's
157 -I* or -M* options because these conflict with existing GCC options.
158 We do however allow passing arbitrary options to the svr4 linker
159 via the -Wl, option. We don't support the svr4 linker's -a option
160 at all because it is totally useless and because it conflicts with
161 GCC's own -a option.
162
163 Note that gcc doesn't allow a space to follow -Y in a -YP,* option.
164
165 When the -G link option is used (-shared and -symbolic) a final link is
166 not being done. */
167
168 #undef LINK_SPEC
169 #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \
170 %{b} %{Wl,*:%*} \
171 %{static:-dn -Bstatic} \
172 %{shared:-G -dy -z text} \
173 %{symbolic:-Bsymbolic -G -dy -z text} \
174 %{G:-G} \
175 %{YP,*} \
176 %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \
177 %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \
178 %{Qy:} %{!Qn:-Qy}"
179
180 /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o,
181 /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final
182 link step (depending upon the other gcc options selected, such as
183 -traditional and -ansi). These files each contain one (initialized)
184 copy of a special variable called `_lib_version'. Each one of these
185 files has `_lib_version' initialized to a different (enum) value.
186 The SVR4 library routines query the value of `_lib_version' at run
187 to decide how they should behave. Specifically, they decide (based
188 upon the value of `_lib_version') if they will act in a strictly ANSI
189 conforming manner or not.
190 */
191
192 #undef STARTFILE_SPEC
193 #define STARTFILE_SPEC "%{!shared: \
194 %{!symbolic: \
195 %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}}}}\
196 %{pg:gcrti.o%s}%{!pg:crti.o%s} \
197 %{ansi:values-Xc.o%s} \
198 %{!ansi: \
199 %{traditional:values-Xt.o%s} \
200 %{!traditional:values-Xa.o%s}} \
201 crtbegin.o%s"
202
203 /* Attach a special .ident directive to the end of the file to identify
204 the version of GCC which compiled this code. The format of the
205 .ident string is patterned after the ones produced by native svr4
206 C compilers. */
207
208 #define IDENT_ASM_OP ".ident"
209
210 #define ASM_FILE_END(FILE) \
211 do { \
212 fprintf ((FILE), "\t%s\t\"GCC: (GNU) %s\"\n", \
213 IDENT_ASM_OP, version_string); \
214 } while (0)
215
216 /* Allow #sccs in preprocessor. */
217
218 #define SCCS_DIRECTIVE
219
220 /* Output #ident as a .ident. */
221
222 #define ASM_OUTPUT_IDENT(FILE, NAME) \
223 fprintf (FILE, "\t%s\t\"%s\"\n", IDENT_ASM_OP, NAME);
224
225 /* Use periods rather than dollar signs in special g++ assembler names. */
226
227 #define NO_DOLLAR_IN_LABEL
228
229 /* Writing `int' for a bitfield forces int alignment for the structure. */
230
231 #define PCC_BITFIELD_TYPE_MATTERS 1
232
233 /* Implicit library calls should use memcpy, not bcopy, etc. */
234
235 #define TARGET_MEM_FUNCTIONS
236
237 /* Handle #pragma weak and #pragma pack. */
238
239 #define HANDLE_SYSV_PRAGMA
240
241 /* System V Release 4 uses DWARF debugging info. */
242
243 #define DWARF_DEBUGGING_INFO
244
245 /* The numbers used to denote specific machine registers in the System V
246 Release 4 DWARF debugging information are quite likely to be totally
247 different from the numbers used in BSD stabs debugging information
248 for the same kind of target machine. Thus, we undefine the macro
249 DBX_REGISTER_NUMBER here as an extra inducement to get people to
250 provide proper machine-specific definitions of DBX_REGISTER_NUMBER
251 (which is also used to provide DWARF registers numbers in dwarfout.c)
252 in their tm.h files which include this file. */
253
254 #undef DBX_REGISTER_NUMBER
255
256 /* gas on SVR4 supports the use of .stabs. Permit -gstabs to be used
257 in general, although it will only work when using gas. */
258
259 #define DBX_DEBUGGING_INFO
260
261 /* Use DWARF debugging info by default. */
262
263 #ifndef PREFERRED_DEBUGGING_TYPE
264 #define PREFERRED_DEBUGGING_TYPE DWARF_DEBUG
265 #endif
266
267 /* Make LBRAC and RBRAC addresses relative to the start of the
268 function. The native Solaris stabs debugging format works this
269 way, gdb expects it, and it reduces the number of relocation
270 entries. */
271
272 #define DBX_BLOCKS_FUNCTION_RELATIVE 1
273
274 /* When using stabs, gcc2_compiled must be a stabs entry, not an
275 ordinary symbol, or gdb won't see it. Furthermore, since gdb reads
276 the input piecemeal, starting with each N_SO, it's a lot easier if
277 the gcc2 flag symbol is *after* the N_SO rather than before it. So
278 we emit an N_OPT stab there. */
279
280 #define ASM_IDENTIFY_GCC(FILE) \
281 do \
282 { \
283 if (write_symbols != DBX_DEBUG) \
284 fputs ("gcc2_compiled.:\n", FILE); \
285 } \
286 while (0)
287
288 #define ASM_IDENTIFY_GCC_AFTER_SOURCE(FILE) \
289 do \
290 { \
291 if (write_symbols == DBX_DEBUG) \
292 fputs ("\t.stabs\t\"gcc2_compiled.\", 0x3c, 0, 0, 0\n", FILE); \
293 } \
294 while (0)
295
296 /* Like block addresses, stabs line numbers are relative to the
297 current function. */
298
299 #define ASM_OUTPUT_SOURCE_LINE(file, line) \
300 do \
301 { \
302 static int sym_lineno = 1; \
303 fprintf (file, ".stabn 68,0,%d,.LM%d-%s\n.LM%d:\n", \
304 line, sym_lineno, \
305 XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0), \
306 sym_lineno); \
307 sym_lineno += 1; \
308 } \
309 while (0)
310
311 /* In order for relative line numbers to work, we must output the
312 stabs entry for the function name first. */
313
314 #define DBX_FUNCTION_FIRST
315
316 /* Define the actual types of some ANSI-mandated types. (These
317 definitions should work for most SVR4 systems). */
318
319 #undef SIZE_TYPE
320 #define SIZE_TYPE "unsigned int"
321
322 #undef PTRDIFF_TYPE
323 #define PTRDIFF_TYPE "int"
324
325 #undef WCHAR_TYPE
326 #define WCHAR_TYPE "long int"
327
328 #undef WCHAR_TYPE_SIZE
329 #define WCHAR_TYPE_SIZE BITS_PER_WORD
330
331 /* This causes trouble, because it requires the host machine
332 to support ANSI C. */
333 /* #define MULTIBYTE_CHARS */
334
335 #undef ASM_BYTE_OP
336 #define ASM_BYTE_OP ".byte"
337
338 #undef SET_ASM_OP
339 #define SET_ASM_OP ".set"
340
341 /* This is how to begin an assembly language file. Most svr4 assemblers want
342 at least a .file directive to come first, and some want to see a .version
343 directive come right after that. Here we just establish a default
344 which generates only the .file directive. If you need a .version
345 directive for any specific target, you should override this definition
346 in the target-specific file which includes this one. */
347
348 #undef ASM_FILE_START
349 #define ASM_FILE_START(FILE) \
350 output_file_directive ((FILE), main_input_filename)
351
352 /* This is how to allocate empty space in some section. The .zero
353 pseudo-op is used for this on most svr4 assemblers. */
354
355 #define SKIP_ASM_OP ".zero"
356
357 #undef ASM_OUTPUT_SKIP
358 #define ASM_OUTPUT_SKIP(FILE,SIZE) \
359 fprintf (FILE, "\t%s\t%u\n", SKIP_ASM_OP, (SIZE))
360
361 /* This is how to output a reference to a user-level label named NAME.
362 `assemble_name' uses this.
363
364 For System V Release 4 the convention is *not* to prepend a leading
365 underscore onto user-level symbol names. */
366
367 #undef ASM_OUTPUT_LABELREF
368 #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME)
369
370 /* This is how to output an internal numbered label where
371 PREFIX is the class of label and NUM is the number within the class.
372
373 For most svr4 systems, the convention is that any symbol which begins
374 with a period is not put into the linker symbol table by the assembler. */
375
376 #undef ASM_OUTPUT_INTERNAL_LABEL
377 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM) \
378 do { \
379 fprintf (FILE, ".%s%d:\n", PREFIX, NUM); \
380 } while (0)
381
382 /* This is how to store into the string LABEL
383 the symbol_ref name of an internal numbered label where
384 PREFIX is the class of label and NUM is the number within the class.
385 This is suitable for output with `assemble_name'.
386
387 For most svr4 systems, the convention is that any symbol which begins
388 with a period is not put into the linker symbol table by the assembler. */
389
390 #undef ASM_GENERATE_INTERNAL_LABEL
391 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
392 do { \
393 sprintf (LABEL, "*.%s%d", PREFIX, NUM); \
394 } while (0)
395
396 /* Output the label which precedes a jumptable. Note that for all svr4
397 systems where we actually generate jumptables (which is to say every
398 svr4 target except i386, where we use casesi instead) we put the jump-
399 tables into the .rodata section and since other stuff could have been
400 put into the .rodata section prior to any given jumptable, we have to
401 make sure that the location counter for the .rodata section gets pro-
402 perly re-aligned prior to the actual beginning of the jump table. */
403
404 #define ALIGN_ASM_OP ".align"
405
406 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
407 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE,PREFIX,NUM,TABLE) \
408 ASM_OUTPUT_ALIGN ((FILE), 2);
409 #endif
410
411 #undef ASM_OUTPUT_CASE_LABEL
412 #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE) \
413 do { \
414 ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE) \
415 ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM); \
416 } while (0)
417
418 /* The standard SVR4 assembler seems to require that certain builtin
419 library routines (e.g. .udiv) be explicitly declared as .globl
420 in each assembly file where they are referenced. */
421
422 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
423 ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
424
425 /* This says how to output assembler code to declare an
426 uninitialized external linkage data object. Under SVR4,
427 the linker seems to want the alignment of data objects
428 to depend on their types. We do exactly that here. */
429
430 #define COMMON_ASM_OP ".comm"
431
432 #undef ASM_OUTPUT_ALIGNED_COMMON
433 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \
434 do { \
435 fprintf ((FILE), "\t%s\t", COMMON_ASM_OP); \
436 assemble_name ((FILE), (NAME)); \
437 fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \
438 } while (0)
439
440 /* This says how to output assembler code to declare an
441 uninitialized internal linkage data object. Under SVR4,
442 the linker seems to want the alignment of data objects
443 to depend on their types. We do exactly that here. */
444
445 #define LOCAL_ASM_OP ".local"
446
447 #undef ASM_OUTPUT_ALIGNED_LOCAL
448 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
449 do { \
450 fprintf ((FILE), "\t%s\t", LOCAL_ASM_OP); \
451 assemble_name ((FILE), (NAME)); \
452 fprintf ((FILE), "\n"); \
453 ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN); \
454 } while (0)
455
456 /* This is the pseudo-op used to generate a 32-bit word of data with a
457 specific value in some section. This is the same for all known svr4
458 assemblers. */
459
460 #define INT_ASM_OP ".long"
461
462 /* This is the pseudo-op used to generate a contiguous sequence of byte
463 values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
464 AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */
465
466 #undef ASCII_DATA_ASM_OP
467 #define ASCII_DATA_ASM_OP ".ascii"
468
469 /* Support const sections and the ctors and dtors sections for g++.
470 Note that there appears to be two different ways to support const
471 sections at the moment. You can either #define the symbol
472 READONLY_DATA_SECTION (giving it some code which switches to the
473 readonly data section) or else you can #define the symbols
474 EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
475 SELECT_RTX_SECTION. We do both here just to be on the safe side. */
476
477 #define USE_CONST_SECTION 1
478
479 #define CONST_SECTION_ASM_OP ".section\t.rodata"
480
481 /* Define the pseudo-ops used to switch to the .ctors and .dtors sections.
482
483 Note that we want to give these sections the SHF_WRITE attribute
484 because these sections will actually contain data (i.e. tables of
485 addresses of functions in the current root executable or shared library
486 file) and, in the case of a shared library, the relocatable addresses
487 will have to be properly resolved/relocated (and then written into) by
488 the dynamic linker when it actually attaches the given shared library
489 to the executing process. (Note that on SVR4, you may wish to use the
490 `-z text' option to the ELF linker, when building a shared library, as
491 an additional check that you are doing everything right. But if you do
492 use the `-z text' option when building a shared library, you will get
493 errors unless the .ctors and .dtors sections are marked as writable
494 via the SHF_WRITE attribute.) */
495
496 #define CTORS_SECTION_ASM_OP ".section\t.ctors,\"aw\""
497 #define DTORS_SECTION_ASM_OP ".section\t.dtors,\"aw\""
498
499 /* On svr4, we *do* have support for the .init and .fini sections, and we
500 can put stuff in there to be executed before and after `main'. We let
501 crtstuff.c and other files know this by defining the following symbols.
502 The definitions say how to change sections to the .init and .fini
503 sections. This is the same for all known svr4 assemblers. */
504
505 #define INIT_SECTION_ASM_OP ".section\t.init"
506 #define FINI_SECTION_ASM_OP ".section\t.fini"
507
508 /* A default list of other sections which we might be "in" at any given
509 time. For targets that use additional sections (e.g. .tdesc) you
510 should override this definition in the target-specific file which
511 includes this file. */
512
513 #undef EXTRA_SECTIONS
514 #define EXTRA_SECTIONS in_const, in_ctors, in_dtors
515
516 /* A default list of extra section function definitions. For targets
517 that use additional sections (e.g. .tdesc) you should override this
518 definition in the target-specific file which includes this file. */
519
520 #undef EXTRA_SECTION_FUNCTIONS
521 #define EXTRA_SECTION_FUNCTIONS \
522 CONST_SECTION_FUNCTION \
523 CTORS_SECTION_FUNCTION \
524 DTORS_SECTION_FUNCTION
525
526 #define READONLY_DATA_SECTION() const_section ()
527
528 extern void text_section ();
529
530 #define CONST_SECTION_FUNCTION \
531 void \
532 const_section () \
533 { \
534 if (!USE_CONST_SECTION) \
535 text_section(); \
536 else if (in_section != in_const) \
537 { \
538 fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \
539 in_section = in_const; \
540 } \
541 }
542
543 #define CTORS_SECTION_FUNCTION \
544 void \
545 ctors_section () \
546 { \
547 if (in_section != in_ctors) \
548 { \
549 fprintf (asm_out_file, "%s\n", CTORS_SECTION_ASM_OP); \
550 in_section = in_ctors; \
551 } \
552 }
553
554 #define DTORS_SECTION_FUNCTION \
555 void \
556 dtors_section () \
557 { \
558 if (in_section != in_dtors) \
559 { \
560 fprintf (asm_out_file, "%s\n", DTORS_SECTION_ASM_OP); \
561 in_section = in_dtors; \
562 } \
563 }
564
565 /* Switch into a generic section.
566 This is currently only used to support section attributes. */
567
568 #define ASM_OUTPUT_SECTION(FILE, NAME) \
569 fprintf (FILE, ".section\t%s,\"a\",@progbits\n", NAME)
570
571 /* A C statement (sans semicolon) to output an element in the table of
572 global constructors. */
573 #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \
574 do { \
575 ctors_section (); \
576 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
577 assemble_name (FILE, NAME); \
578 fprintf (FILE, "\n"); \
579 } while (0)
580
581 /* A C statement (sans semicolon) to output an element in the table of
582 global destructors. */
583 #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \
584 do { \
585 dtors_section (); \
586 fprintf (FILE, "\t%s\t ", INT_ASM_OP); \
587 assemble_name (FILE, NAME); \
588 fprintf (FILE, "\n"); \
589 } while (0)
590
591 /* A C statement or statements to switch to the appropriate
592 section for output of DECL. DECL is either a `VAR_DECL' node
593 or a constant of some sort. RELOC indicates whether forming
594 the initial value of DECL requires link-time relocations. */
595
596 #define SELECT_SECTION(DECL,RELOC) \
597 { \
598 if (TREE_CODE (DECL) == STRING_CST) \
599 { \
600 if (! flag_writable_strings) \
601 const_section (); \
602 else \
603 data_section (); \
604 } \
605 else if (TREE_CODE (DECL) == VAR_DECL) \
606 { \
607 if ((flag_pic && RELOC) \
608 || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL) \
609 || !DECL_INITIAL (DECL) \
610 || (DECL_INITIAL (DECL) != error_mark_node \
611 && !TREE_CONSTANT (DECL_INITIAL (DECL)))) \
612 data_section (); \
613 else \
614 const_section (); \
615 } \
616 else \
617 const_section (); \
618 }
619
620 /* A C statement or statements to switch to the appropriate
621 section for output of RTX in mode MODE. RTX is some kind
622 of constant in RTL. The argument MODE is redundant except
623 in the case of a `const_int' rtx. Currently, these always
624 go into the const section. */
625
626 #undef SELECT_RTX_SECTION
627 #define SELECT_RTX_SECTION(MODE,RTX) const_section()
628
629 /* Define the strings used for the special svr4 .type and .size directives.
630 These strings generally do not vary from one system running svr4 to
631 another, but if a given system (e.g. m88k running svr) needs to use
632 different pseudo-op names for these, they may be overridden in the
633 file which includes this one. */
634
635 #define TYPE_ASM_OP ".type"
636 #define SIZE_ASM_OP ".size"
637 #define WEAK_ASM_OP ".weak"
638
639 /* The following macro defines the format used to output the second
640 operand of the .type assembler directive. Different svr4 assemblers
641 expect various different forms for this operand. The one given here
642 is just a default. You may need to override it in your machine-
643 specific tm.h file (depending upon the particulars of your assembler). */
644
645 #define TYPE_OPERAND_FMT "@%s"
646
647 /* Write the extra assembler code needed to declare a function's result.
648 Most svr4 assemblers don't require any special declaration of the
649 result value, but there are exceptions. */
650
651 #ifndef ASM_DECLARE_RESULT
652 #define ASM_DECLARE_RESULT(FILE, RESULT)
653 #endif
654
655 /* These macros generate the special .type and .size directives which
656 are used to set the corresponding fields of the linker symbol table
657 entries in an ELF object file under SVR4. These macros also output
658 the starting labels for the relevant functions/objects. */
659
660 /* Write the extra assembler code needed to declare a function properly.
661 Some svr4 assemblers need to also have something extra said about the
662 function's return value. We allow for that here. */
663
664 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
665 do { \
666 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
667 assemble_name (FILE, NAME); \
668 putc (',', FILE); \
669 fprintf (FILE, TYPE_OPERAND_FMT, "function"); \
670 putc ('\n', FILE); \
671 ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \
672 ASM_OUTPUT_LABEL(FILE, NAME); \
673 } while (0)
674
675 /* Write the extra assembler code needed to declare an object properly. */
676
677 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
678 do { \
679 fprintf (FILE, "\t%s\t ", TYPE_ASM_OP); \
680 assemble_name (FILE, NAME); \
681 putc (',', FILE); \
682 fprintf (FILE, TYPE_OPERAND_FMT, "object"); \
683 putc ('\n', FILE); \
684 size_directive_output = 0; \
685 if (!flag_inhibit_size_directive && DECL_SIZE (DECL)) \
686 { \
687 size_directive_output = 1; \
688 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
689 assemble_name (FILE, NAME); \
690 fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
691 } \
692 ASM_OUTPUT_LABEL(FILE, NAME); \
693 } while (0)
694
695 /* Output the size directive for a decl in rest_of_decl_compilation
696 in the case where we did not do so before the initializer.
697 Once we find the error_mark_node, we know that the value of
698 size_directive_output was set
699 by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */
700
701 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END) \
702 do { \
703 char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \
704 if (!flag_inhibit_size_directive && DECL_SIZE (DECL) \
705 && ! AT_END && TOP_LEVEL \
706 && DECL_INITIAL (DECL) == error_mark_node \
707 && !size_directive_output) \
708 { \
709 size_directive_output = 1; \
710 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
711 assemble_name (FILE, name); \
712 fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (DECL))); \
713 } \
714 } while (0)
715
716 /* This is how to declare the size of a function. */
717
718 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \
719 do { \
720 if (!flag_inhibit_size_directive) \
721 { \
722 char label[256]; \
723 static int labelno; \
724 labelno++; \
725 ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \
726 ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \
727 fprintf (FILE, "\t%s\t ", SIZE_ASM_OP); \
728 assemble_name (FILE, (FNAME)); \
729 fprintf (FILE, ","); \
730 assemble_name (FILE, label); \
731 fprintf (FILE, "-"); \
732 assemble_name (FILE, (FNAME)); \
733 putc ('\n', FILE); \
734 } \
735 } while (0)
736
737 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
738 ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table
739 corresponds to a particular byte value [0..255]. For any
740 given byte value, if the value in the corresponding table
741 position is zero, the given character can be output directly.
742 If the table value is 1, the byte must be output as a \ooo
743 octal escape. If the tables value is anything else, then the
744 byte value should be output as a \ followed by the value
745 in the table. Note that we can use standard UN*X escape
746 sequences for many control characters, but we don't use
747 \a to represent BEL because some svr4 assemblers (e.g. on
748 the i386) don't know about that. Also, we don't use \v
749 since some versions of gas, such as 2.2 did not accept it. */
750
751 #define ESCAPES \
752 "\1\1\1\1\1\1\1\1btn\1fr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
753 \0\0\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\
754 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\\0\0\0\
755 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\
756 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
757 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
758 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
759 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1"
760
761 /* Some svr4 assemblers have a limit on the number of characters which
762 can appear in the operand of a .string directive. If your assembler
763 has such a limitation, you should define STRING_LIMIT to reflect that
764 limit. Note that at least some svr4 assemblers have a limit on the
765 actual number of bytes in the double-quoted string, and that they
766 count each character in an escape sequence as one byte. Thus, an
767 escape sequence like \377 would count as four bytes.
768
769 If your target assembler doesn't support the .string directive, you
770 should define this to zero.
771 */
772
773 #define STRING_LIMIT ((unsigned) 256)
774
775 #define STRING_ASM_OP ".string"
776
777 /* The routine used to output NUL terminated strings. We use a special
778 version of this for most svr4 targets because doing so makes the
779 generated assembly code more compact (and thus faster to assemble)
780 as well as more readable, especially for targets like the i386
781 (where the only alternative is to output character sequences as
782 comma separated lists of numbers). */
783
784 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \
785 do \
786 { \
787 register unsigned char *_limited_str = (unsigned char *) (STR); \
788 register unsigned ch; \
789 fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP); \
790 for (; ch = *_limited_str; _limited_str++) \
791 { \
792 register int escape; \
793 switch (escape = ESCAPES[ch]) \
794 { \
795 case 0: \
796 putc (ch, (FILE)); \
797 break; \
798 case 1: \
799 fprintf ((FILE), "\\%03o", ch); \
800 break; \
801 default: \
802 putc ('\\', (FILE)); \
803 putc (escape, (FILE)); \
804 break; \
805 } \
806 } \
807 fprintf ((FILE), "\"\n"); \
808 } \
809 while (0)
810
811 /* The routine used to output sequences of byte values. We use a special
812 version of this for most svr4 targets because doing so makes the
813 generated assembly code more compact (and thus faster to assemble)
814 as well as more readable. Note that if we find subparts of the
815 character sequence which end with NUL (and which are shorter than
816 STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */
817
818 #undef ASM_OUTPUT_ASCII
819 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \
820 do \
821 { \
822 register unsigned char *_ascii_bytes = (unsigned char *) (STR); \
823 register unsigned char *limit = _ascii_bytes + (LENGTH); \
824 register unsigned bytes_in_chunk = 0; \
825 for (; _ascii_bytes < limit; _ascii_bytes++) \
826 { \
827 register unsigned char *p; \
828 if (bytes_in_chunk >= 60) \
829 { \
830 fprintf ((FILE), "\"\n"); \
831 bytes_in_chunk = 0; \
832 } \
833 for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \
834 continue; \
835 if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT) \
836 { \
837 if (bytes_in_chunk > 0) \
838 { \
839 fprintf ((FILE), "\"\n"); \
840 bytes_in_chunk = 0; \
841 } \
842 ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \
843 _ascii_bytes = p; \
844 } \
845 else \
846 { \
847 register int escape; \
848 register unsigned ch; \
849 if (bytes_in_chunk == 0) \
850 fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP); \
851 switch (escape = ESCAPES[ch = *_ascii_bytes]) \
852 { \
853 case 0: \
854 putc (ch, (FILE)); \
855 bytes_in_chunk++; \
856 break; \
857 case 1: \
858 fprintf ((FILE), "\\%03o", ch); \
859 bytes_in_chunk += 4; \
860 break; \
861 default: \
862 putc ('\\', (FILE)); \
863 putc (escape, (FILE)); \
864 bytes_in_chunk += 2; \
865 break; \
866 } \
867 } \
868 } \
869 if (bytes_in_chunk > 0) \
870 fprintf ((FILE), "\"\n"); \
871 } \
872 while (0)
873
874 /* All SVR4 targets use the ELF object file format. */
875 #define OBJECT_FORMAT_ELF