]>
Commit | Line | Data |
---|---|---|
2a2ab3f9 JVA |
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 Free Software Foundation, Inc. | |
4 | ||
5 | Written by Ron Guilmette (rfg@ncd.com). | |
6 | ||
7 | This file is part of GNU CC. | |
8 | ||
9 | GNU CC is free software; you can redistribute it and/or modify | |
10 | it under the terms of the GNU General Public License as published by | |
11 | the Free Software Foundation; either version 2, or (at your option) | |
12 | any later version. | |
13 | ||
14 | GNU CC is distributed in the hope that it will be useful, | |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
18 | ||
19 | You should have received a copy of the GNU General Public License | |
20 | along with GNU CC; see the file COPYING. If not, write to | |
21 | the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | |
22 | ||
23 | To use this file, make up a file with a name like: | |
24 | ||
25 | ?????svr4.h | |
26 | ||
27 | where ????? is replaced by the name of the basic hardware that you | |
28 | are targeting for. Then, in the file ?????svr4.h, put something | |
29 | like: | |
30 | ||
31 | #include "?????.h" | |
32 | #include "svr4.h" | |
33 | ||
34 | followed by any really system-specific defines (or overrides of | |
35 | defines) which you find that you need. For example, CPP_PREDEFINES | |
36 | is defined here with only the defined -Dunix and -DSVR4. You should | |
37 | probably override that in your target-specific ?????svr4.h file | |
38 | with a set of defines that includes these, but also contains an | |
39 | appropriate define for the type of hardware that you are targeting. | |
40 | */ | |
41 | ||
42 | /* Define a symbol so that libgcc* can know what sort of operating | |
43 | environment and assembler syntax we are targeting for. */ | |
44 | #ifndef SVR4 | |
45 | #define SVR4 | |
46 | #endif | |
47 | ||
48 | /* For the sake of libgcc2.c, indicate target supports atexit. */ | |
49 | #define HAVE_ATEXIT | |
50 | ||
51 | /* Cpp, assembler, linker, library, and startfile spec's. */ | |
52 | ||
53 | /* This defines which switch letters take arguments. On svr4, most of | |
54 | the normal cases (defined in gcc.c) apply, and we also have -h* and | |
55 | -z* options (for the linker). Note however that there is no such | |
56 | thing as a -T option for svr4. */ | |
57 | ||
58 | #define SWITCH_TAKES_ARG(CHAR) \ | |
59 | ( (CHAR) == 'D' \ | |
60 | || (CHAR) == 'U' \ | |
61 | || (CHAR) == 'o' \ | |
62 | || (CHAR) == 'e' \ | |
63 | || (CHAR) == 'u' \ | |
64 | || (CHAR) == 'I' \ | |
65 | || (CHAR) == 'm' \ | |
66 | || (CHAR) == 'L' \ | |
67 | || (CHAR) == 'A' \ | |
68 | || (CHAR) == 'h' \ | |
69 | || (CHAR) == 'z') | |
70 | ||
71 | /* This defines which multi-letter switches take arguments. On svr4, | |
72 | there are no such switches except those implemented by GCC itself. */ | |
73 | ||
74 | #define WORD_SWITCH_TAKES_ARG(STR) \ | |
75 | (!strcmp (STR, "include") || !strcmp (STR, "imacros")) | |
76 | ||
77 | /* You should redefine CPP_PREDEFINES in any file which includes this one. | |
78 | The definition should be appropriate for the type of target system | |
79 | involved, and it should include any -A (assertion) options which are | |
80 | appropriate for the given target system. */ | |
81 | #undef CPP_PREDEFINES | |
82 | ||
83 | /* Provide an ASM_SPEC appropriate for svr4. Here we try to support as | |
84 | many of the specialized svr4 assembler options as seems reasonable, | |
85 | given that there are certain options which we can't (or shouldn't) | |
86 | support directly due to the fact that they conflict with other options | |
87 | for other svr4 tools (e.g. ld) or with other options for GCC itself. | |
88 | For example, we don't support the -o (output file) or -R (remove | |
89 | input file) options because GCC already handles these things. We | |
90 | also don't support the -m (run m4) option for the assembler because | |
91 | that conflicts with the -m (produce load map) option of the svr4 | |
92 | linker. We do however allow passing arbitrary options to the svr4 | |
93 | assembler via the -Wa, option. | |
94 | ||
95 | Note that gcc doesn't allow a space to follow -Y in a -Ym,* or -Yd,* | |
96 | option. | |
97 | */ | |
98 | ||
99 | #undef ASM_SPEC | |
100 | #define ASM_SPEC \ | |
101 | "%{V} %{v:%{!V:-V}} %{Qy:} %{!Qn:-Qy} %{n} %{T} %{Ym,*} %{Yd,*} %{Wa,*:%*}" | |
102 | ||
103 | /* svr4 assemblers need the `-' (indicating input from stdin) to come after | |
104 | the -o option (and its argument) for some reason. If we try to put it | |
105 | before the -o option, the assembler will try to read the file named as | |
106 | the output file in the -o option as an input file (after it has already | |
107 | written some stuff to it) and the binary stuff contained therein will | |
108 | cause totally confuse the assembler, resulting in many spurious error | |
109 | messages. */ | |
110 | ||
111 | #undef ASM_FINAL_SPEC | |
112 | #define ASM_FINAL_SPEC "%{pipe:-}" | |
113 | ||
114 | /* Under svr4, the normal location of the various *crt*.o files is the | |
115 | /usr/ccs/lib directory. */ | |
116 | ||
117 | #undef MD_STARTFILE_PREFIX | |
118 | #define MD_STARTFILE_PREFIX "/usr/ccs/lib/" | |
119 | ||
b4ac57ab | 120 | /* Provide a LIB_SPEC appropriate for svr4. Here we tack on the default |
2a2ab3f9 JVA |
121 | standard C library (unless we are building a shared library) followed by |
122 | our own magical crtend.o file (see crtstuff.c) which provides part of | |
123 | the support for getting C++ file-scope static object constructed before | |
124 | entering `main', followed by the normal svr3/svr4 "finalizer" file, | |
125 | which is either `gcrtn.o' or `crtn.o'. */ | |
126 | ||
127 | #undef LIB_SPEC | |
128 | #define LIB_SPEC \ | |
129 | "%{!shared:%{!symbolic:-lc}} \ | |
130 | crtend.o%s \ | |
131 | %{!shared:%{!symbolic:%{pg:gcrtn.o}%{!pg:crtn.o%s}}}" | |
132 | ||
133 | /* Provide a LINK_SPEC appropriate for svr4. Here we provide support | |
134 | for the special GCC options -static, -shared, and -symbolic which | |
135 | allow us to link things in one of these three modes by applying the | |
136 | appropriate combinations of options at link-time. We also provide | |
137 | support here for as many of the other svr4 linker options as seems | |
138 | reasonable, given that some of them conflict with options for other | |
139 | svr4 tools (e.g. the assembler). In particular, we do support the | |
140 | -h*, -z*, -V, -b, -t, -Qy, -Qn, and -YP* options here, and the -e*, | |
141 | -l*, -o*, -r, -s, -u*, and -L* options are directly supported | |
142 | by gcc.c itself. We don't directly support the -m (generate load | |
143 | map) option because that conflicts with the -m (run m4) option of | |
144 | the svr4 assembler. We also don't directly support the svr4 linker's | |
145 | -I* or -M* options because these conflict with existing GCC options. | |
146 | We do however allow passing arbitrary options to the svr4 linker | |
147 | via the -Wl, option. We don't support the svr4 linker's -a option | |
148 | at all because it is totally useless and because it conflicts with | |
149 | GCC's own -a option. | |
150 | ||
151 | Note that gcc doesn't allow a space to follow -Y in a -YP,* option. | |
152 | ||
153 | When the -G link option is used (-shared and -symbolic) a final link is | |
154 | not being done. */ | |
155 | ||
156 | #undef LINK_SPEC | |
b4ac57ab RS |
157 | #define LINK_SPEC "%{h*} %{V} %{v:%{!V:-V}} \ |
158 | %{b} %{Wl,*:%*} \ | |
2a2ab3f9 JVA |
159 | %{static:-dn -Bstatic} \ |
160 | %{shared:-G -dy} \ | |
161 | %{symbolic:-Bsymbolic -G -dy} \ | |
b4ac57ab | 162 | %{G:-G} \ |
2a2ab3f9 JVA |
163 | %{YP,*} \ |
164 | %{!YP,*:%{p:-Y P,/usr/ccs/lib/libp:/usr/lib/libp:/usr/ccs/lib:/usr/lib} \ | |
165 | %{!p:-Y P,/usr/ccs/lib:/usr/lib}} \ | |
166 | %{Qy:} %{!Qn:-Qy}" | |
167 | ||
168 | /* Gcc automatically adds in one of the files /usr/ccs/lib/values-Xc.o, | |
169 | /usr/ccs/lib/values-Xa.o, or /usr/ccs/lib/values-Xt.o for each final | |
170 | link step (depending upon the other gcc options selected, such as | |
171 | -traditional and -ansi). These files each contain one (initialized) | |
172 | copy of a special variable called `_lib_version'. Each one of these | |
173 | files has `_lib_version' initialized to a different (enum) value. | |
174 | The SVR4 library routines query the value of `_lib_version' at run | |
175 | to decide how they should behave. Specifically, they decide (based | |
176 | upon the value of `_lib_version') if they will act in a strictly ANSI | |
b4ac57ab | 177 | conforming manner or not. |
2a2ab3f9 JVA |
178 | */ |
179 | ||
180 | #undef STARTFILE_SPEC | |
181 | #define STARTFILE_SPEC "%{!shared: \ | |
182 | %{!symbolic: \ | |
183 | %{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} \ | |
184 | %{pg:gcrti.o%s}%{!pg:crti.o%s} \ | |
185 | %{ansi:values-Xc.o%s} \ | |
186 | %{!ansi: \ | |
187 | %{traditional:values-Xt.o%s} \ | |
188 | %{!traditional:values-Xa.o%s}}}} crtbegin.o%s" | |
189 | ||
b4ac57ab | 190 | /* Attach a special .ident directive to the end of the file to identify |
2a2ab3f9 | 191 | the version of GCC which compiled this code. The format of the |
b4ac57ab | 192 | .ident string is patterned after the ones produced by native svr4 |
2a2ab3f9 JVA |
193 | C compilers. */ |
194 | ||
195 | #define ASM_FILE_END(FILE) \ | |
196 | do { \ | |
197 | fprintf ((FILE), "\t.ident\t\"GCC: (GNU) %s\"\n", \ | |
198 | version_string); \ | |
199 | } while (0) | |
200 | ||
201 | /* Allow #sccs in preprocessor. */ | |
202 | ||
203 | #define SCCS_DIRECTIVE | |
204 | ||
205 | /* Output #ident as a .ident. */ | |
206 | ||
207 | #define ASM_OUTPUT_IDENT(FILE, NAME) \ | |
208 | fprintf (FILE, "\t.ident \"%s\"\n", NAME); | |
209 | ||
210 | /* Use periods rather than dollar signs in special g++ assembler names. */ | |
211 | ||
212 | #define NO_DOLLAR_IN_LABEL | |
213 | ||
214 | /* Writing `int' for a bitfield forces int alignment for the structure. */ | |
215 | ||
216 | #define PCC_BITFIELD_TYPE_MATTERS 1 | |
217 | ||
218 | /* Implicit library calls should use memcpy, not bcopy, etc. */ | |
219 | ||
220 | #define TARGET_MEM_FUNCTIONS | |
221 | ||
222 | /* System V Release 4 uses DWARF debugging info. */ | |
223 | ||
224 | #define DWARF_DEBUGGING_INFO | |
225 | ||
226 | /* The numbers used to denote specific machine registers in the System V | |
227 | Release 4 DWARF debugging information are quite likely to be totally | |
228 | different from the numbers used in BSD stabs debugging information | |
229 | for the same kind of target machine. Thus, we undefine the macro | |
230 | DBX_REGISTER_NUMBER here as an extra inducement to get people to | |
231 | provide proper machine-specific definitions of DBX_REGISTER_NUMBER | |
232 | (which is also used to provide DWARF registers numbers in dwarfout.c) | |
233 | in their tm.h files which include this file. */ | |
234 | ||
235 | #undef DBX_REGISTER_NUMBER | |
236 | ||
237 | /* Define the actual types of some ANSI-mandated types. (These | |
238 | definitions should work for most SVR4 systems). */ | |
239 | ||
240 | #undef SIZE_TYPE | |
241 | #define SIZE_TYPE "unsigned int" | |
242 | ||
243 | #undef PTRDIFF_TYPE | |
244 | #define PTRDIFF_TYPE "int" | |
245 | ||
246 | #undef WCHAR_TYPE | |
247 | #define WCHAR_TYPE "long int" | |
248 | ||
249 | #undef WCHAR_TYPE_SIZE | |
250 | #define WCHAR_TYPE_SIZE BITS_PER_WORD | |
251 | ||
252 | #undef ASM_BYTE_OP | |
253 | #define ASM_BYTE_OP "\t.byte" | |
254 | ||
255 | /* This is how to begin an assembly language file. Most svr4 assemblers want | |
256 | at least a .file directive to come first, and some want to see a .version | |
257 | directive come right after that. Here we just establish a default | |
258 | which generates only the .file directive. If you need a .version | |
259 | directive for any specific target, you should override this definition | |
260 | in the target-specific file which includes this one. */ | |
261 | ||
262 | #undef ASM_FILE_START | |
263 | #define ASM_FILE_START(FILE) \ | |
264 | output_file_directive ((FILE), main_input_filename) | |
265 | ||
266 | /* This is how to allocate empty space in some section. The .zero | |
267 | pseudo-op is used for this on most svr4 assemblers. */ | |
268 | ||
269 | #undef ASM_OUTPUT_SKIP | |
270 | #define ASM_OUTPUT_SKIP(FILE,SIZE) fprintf (FILE, "\t.zero\t%u\n", (SIZE)) | |
271 | ||
272 | /* This is how to output a reference to a user-level label named NAME. | |
273 | `assemble_name' uses this. | |
274 | ||
275 | For System V Release 4 the convention is *not* to prepend a leading | |
276 | underscore onto user-level symbol names. */ | |
277 | ||
278 | #undef ASM_OUTPUT_LABELREF | |
279 | #define ASM_OUTPUT_LABELREF(FILE,NAME) fprintf (FILE, "%s", NAME) | |
280 | ||
281 | /* The standard SVR4 assembler seems to require that certain builtin | |
282 | library routines (e.g. .udiv) be explicitly declared as .globl | |
283 | in each assembly file where they are referenced. */ | |
284 | ||
285 | #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \ | |
286 | ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0)) | |
287 | ||
288 | /* This says how to output assembler code to declare an | |
289 | uninitialized external linkage data object. Under SVR4, | |
290 | the linker seems to want the alignment of data objects | |
291 | to depend on their types. We do exactly that here. */ | |
292 | ||
293 | #undef ASM_OUTPUT_ALIGNED_COMMON | |
294 | #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \ | |
295 | do { \ | |
296 | fputs ("\t.comm\t", (FILE)); \ | |
297 | assemble_name ((FILE), (NAME)); \ | |
298 | fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \ | |
299 | } while (0) | |
300 | ||
301 | /* This says how to output assembler code to declare an | |
302 | uninitialized internal linkage data object. Under SVR4, | |
303 | the linker seems to want the alignment of data objects | |
304 | to depend on their types. We do exactly that here. */ | |
305 | ||
306 | #define BSS_ASM_OP "\t.bss" | |
307 | ||
308 | #undef ASM_OUTPUT_ALIGNED_LOCAL | |
309 | #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \ | |
310 | do { \ | |
311 | fprintf ((FILE), "%s\t%s,%u,%u\n", \ | |
312 | BSS_ASM_OP, (NAME), (SIZE), (ALIGN) / BITS_PER_UNIT); \ | |
313 | } while (0) | |
314 | ||
315 | /* This is the pseudo-op used to generate a 32-bit word of data with a | |
316 | specific value in some section. This is the same for all known svr4 | |
317 | assemblers. */ | |
318 | ||
319 | #define INT_ASM_OP "\t.long\t" | |
320 | ||
321 | /* This is the pseudo-op used to generate a contiguous sequence of byte | |
322 | values from a double-quoted string WITHOUT HAVING A TERMINATING NUL | |
323 | AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */ | |
324 | ||
325 | #undef ASCII_DATA_ASM_OP | |
326 | #define ASCII_DATA_ASM_OP ".ascii" | |
327 | ||
328 | /* Support const sections and the ctors and dtors sections for g++. | |
329 | Note that there appears to be two different ways to support const | |
330 | sections at the moment. You can either #define the symbol | |
331 | READONLY_DATA_SECTION (giving it some code which switches to the | |
332 | readonly data section) or else you can #define the symbols | |
333 | EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and | |
334 | SELECT_RTX_SECTION. We do both here just to be on the safe side. */ | |
335 | ||
336 | #define USE_CONST_SECTION 1 | |
337 | ||
338 | #define CONST_SECTION_ASM_OP "\t.section\t.rodata" | |
339 | #define CTORS_SECTION_ASM_OP "\t.section\t.ctors,\"a\",@progbits\n" | |
340 | #define DTORS_SECTION_ASM_OP "\t.section\t.dtors,\"a\",@progbits\n" | |
341 | ||
342 | /* On svr4, we *do* have support for the .init section, and we can put | |
343 | stuff in there to be executed before `main'. We let crtstuff.c and | |
344 | other files know this by defining the following symbol. The definition | |
345 | says how to change sections to the .init section. This is the same | |
346 | for all know svr4 assemblers. */ | |
347 | ||
348 | #define INIT_SECTION_ASM_OP "\t.section\t.init" | |
349 | ||
350 | /* A default list of other sections which we might be "in" at any given | |
351 | time. For targets that use additional sections (e.g. .tdesc) you | |
352 | should override this definition in the target-specific file which | |
353 | includes this file. */ | |
354 | ||
355 | #undef EXTRA_SECTIONS | |
356 | #define EXTRA_SECTIONS in_const, in_ctors, in_dtors | |
357 | ||
358 | /* A default list of extra section function definitions. For targets | |
359 | that use additional sections (e.g. .tdesc) you should override this | |
360 | definition in the target-specific file which includes this file. */ | |
361 | ||
362 | #undef EXTRA_SECTION_FUNCTIONS | |
363 | #define EXTRA_SECTION_FUNCTIONS \ | |
364 | CONST_SECTION_FUNCTION \ | |
365 | CTORS_SECTION_FUNCTION \ | |
366 | DTORS_SECTION_FUNCTION | |
367 | ||
368 | #define READONLY_DATA_SECTION() const_section () | |
369 | ||
370 | extern void text_section(); | |
371 | ||
372 | #define CONST_SECTION_FUNCTION \ | |
373 | void \ | |
374 | const_section () \ | |
375 | { \ | |
376 | if (!USE_CONST_SECTION) \ | |
377 | text_section(); \ | |
378 | else if (in_section != in_const) \ | |
379 | { \ | |
380 | fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \ | |
381 | in_section = in_const; \ | |
382 | } \ | |
383 | } | |
384 | ||
385 | #define CTORS_SECTION_FUNCTION \ | |
386 | void \ | |
387 | ctors_section () \ | |
388 | { \ | |
389 | if (in_section != in_ctors) \ | |
390 | { \ | |
391 | fprintf (asm_out_file, CTORS_SECTION_ASM_OP); \ | |
392 | in_section = in_ctors; \ | |
393 | } \ | |
394 | } | |
395 | ||
396 | #define DTORS_SECTION_FUNCTION \ | |
397 | void \ | |
398 | dtors_section () \ | |
399 | { \ | |
400 | if (in_section != in_dtors) \ | |
401 | { \ | |
402 | fprintf (asm_out_file, DTORS_SECTION_ASM_OP); \ | |
403 | in_section = in_dtors; \ | |
404 | } \ | |
405 | } | |
406 | ||
407 | /* A C statement (sans semicolon) to output an element in the table of | |
408 | global constructors. */ | |
409 | #define ASM_OUTPUT_CONSTRUCTOR(FILE,NAME) \ | |
410 | do { \ | |
411 | ctors_section (); \ | |
412 | fprintf (FILE, "%s\t ", INT_ASM_OP); \ | |
413 | assemble_name (FILE, NAME); \ | |
414 | fprintf (FILE, "\n"); \ | |
415 | } while (0) | |
416 | ||
417 | /* A C statement (sans semicolon) to output an element in the table of | |
418 | global destructors. */ | |
419 | #define ASM_OUTPUT_DESTRUCTOR(FILE,NAME) \ | |
420 | do { \ | |
421 | dtors_section (); \ | |
422 | fprintf (FILE, "%s\t ", INT_ASM_OP); \ | |
423 | assemble_name (FILE, NAME); \ | |
424 | fprintf (FILE, "\n"); \ | |
425 | } while (0) | |
426 | ||
427 | /* A C statement or statements to switch to the appropriate | |
428 | section for output of DECL. DECL is either a `VAR_DECL' node | |
429 | or a constant of some sort. RELOC indicates whether forming | |
430 | the initial value of DECL requires link-time relocations. */ | |
431 | ||
432 | #define SELECT_SECTION(DECL,RELOC) \ | |
433 | { \ | |
434 | if (TREE_CODE (DECL) == STRING_CST) \ | |
435 | { \ | |
436 | if (! flag_writable_strings) \ | |
437 | const_section (); \ | |
438 | else \ | |
439 | data_section (); \ | |
440 | } \ | |
441 | else if (TREE_CODE (DECL) == VAR_DECL) \ | |
442 | { \ | |
443 | if ((flag_pic && RELOC) \ | |
444 | || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL)) \ | |
445 | data_section (); \ | |
446 | else \ | |
447 | const_section (); \ | |
448 | } \ | |
449 | else \ | |
450 | const_section (); \ | |
451 | } | |
452 | ||
453 | /* A C statement or statements to switch to the appropriate | |
454 | section for output of RTX in mode MODE. RTX is some kind | |
455 | of constant in RTL. The argument MODE is redundant except | |
456 | in the case of a `const_int' rtx. Currently, these always | |
457 | go into the const section. */ | |
458 | ||
459 | #undef SELECT_RTX_SECTION | |
460 | #define SELECT_RTX_SECTION(MODE,RTX) const_section() | |
461 | ||
462 | /* Define the strings used for the special svr4 .type and .size directives. | |
463 | These strings generally do not vary from one system running svr4 to | |
464 | another, but if a given system (e.g. m88k running svr) needs to use | |
465 | different pseudo-op names for these, they may be overridden in the | |
466 | file which includes this one. */ | |
467 | ||
468 | #define TYPE_ASM_OP "\t.type" | |
469 | #define SIZE_ASM_OP "\t.size" | |
470 | ||
471 | /* The following macro defines the format used to output the second | |
472 | operand of the .type assembler directive. Different svr4 assemblers | |
473 | expect various different forms for this operand. The one given here | |
474 | is just a default. You may need to override it in your machine- | |
475 | specific tm.h file (depending upon the particulars of your assembler). */ | |
476 | ||
477 | #define TYPE_OPERAND_FMT "@%s" | |
478 | ||
479 | /* These macros generate the special .type and .size directives which | |
480 | are used to set the corresponding fields of the linker symbol table | |
481 | entries in an ELF object file under SVR4. */ | |
482 | ||
483 | /* Write the extra assembler code needed to declare a function properly. */ | |
484 | ||
485 | #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \ | |
486 | do { \ | |
487 | fprintf (FILE, "%s\t ", TYPE_ASM_OP); \ | |
488 | assemble_name (FILE, NAME); \ | |
489 | putc (',', FILE); \ | |
490 | fprintf (FILE, TYPE_OPERAND_FMT, "function"); \ | |
491 | putc ('\n', FILE); \ | |
492 | ASM_OUTPUT_LABEL(FILE, NAME); \ | |
493 | } while (0) | |
494 | ||
495 | /* Write the extra assembler code needed to declare an object properly. */ | |
496 | ||
497 | #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \ | |
498 | do { \ | |
499 | fprintf (FILE, "%s\t ", TYPE_ASM_OP); \ | |
500 | assemble_name (FILE, NAME); \ | |
501 | putc (',', FILE); \ | |
502 | fprintf (FILE, TYPE_OPERAND_FMT, "object"); \ | |
503 | putc ('\n', FILE); \ | |
504 | if (!flag_inhibit_size_directive) \ | |
505 | { \ | |
506 | fprintf (FILE, "%s\t ", SIZE_ASM_OP); \ | |
507 | assemble_name (FILE, NAME); \ | |
508 | fprintf (FILE, ",%d\n", int_size_in_bytes (TREE_TYPE (decl))); \ | |
509 | } \ | |
510 | ASM_OUTPUT_LABEL(FILE, NAME); \ | |
511 | } while (0) | |
512 | ||
513 | /* This is how to declare the size of a function. */ | |
514 | ||
515 | #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \ | |
516 | do { \ | |
517 | if (!flag_inhibit_size_directive) \ | |
518 | { \ | |
519 | char label[256]; \ | |
520 | static int labelno; \ | |
521 | labelno++; \ | |
522 | ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \ | |
523 | ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \ | |
524 | fprintf (FILE, "%s\t ", SIZE_ASM_OP); \ | |
525 | assemble_name (FILE, (FNAME)); \ | |
526 | fprintf (FILE, ","); \ | |
527 | assemble_name (FILE, label); \ | |
528 | fprintf (FILE, "-"); \ | |
529 | ASM_OUTPUT_LABELREF (FILE, (FNAME)); \ | |
530 | putc ('\n', FILE); \ | |
531 | } \ | |
532 | } while (0) | |
533 | ||
534 | /* A table of bytes codes used by the ASM_OUTPUT_ASCII and | |
535 | ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table | |
536 | corresponds to a particular byte value [0..255]. For any | |
537 | given byte value, if the value in the corresponding table | |
538 | position is zero, the given character can be output directly. | |
539 | If the table value is 1, the byte must be output as a \ooo | |
540 | octal escape. If the tables value is anything else, then the | |
541 | byte value should be output as a \ followed by the value | |
542 | in the table. Note that we can use standard UN*X escape | |
543 | sequences for many control characters, but we don't use | |
544 | \a to represent BEL because some svr4 assemblers (e.g. on | |
545 | the i386) don't know about that. */ | |
546 | ||
547 | #define ESCAPES \ | |
548 | "\1\1\1\1\1\1\1\1btnvfr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\ | |
549 | \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\ | |
550 | \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\ | |
551 | \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\ | |
552 | \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\ | |
553 | \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\ | |
554 | \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\ | |
555 | \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" | |
556 | ||
557 | /* Some svr4 assemblers have a limit on the number of characters which | |
558 | can appear in the operand of a .string directive. If your assembler | |
559 | has such a limitation, you should define STRING_LIMIT to reflect that | |
560 | limit. Note that at least some svr4 assemblers have a limit on the | |
561 | actual number of bytes in the double-quoted string, and that they | |
b4ac57ab | 562 | count each character in an escape sequence as one byte. Thus, an |
2a2ab3f9 JVA |
563 | escape sequence like \377 would count as four bytes. |
564 | ||
565 | If your target assembler doesn't support the .string directive, you | |
566 | should define this to zero. | |
567 | */ | |
568 | ||
569 | #define STRING_LIMIT ((unsigned) 256) | |
570 | ||
571 | #define STRING_ASM_OP ".string" | |
572 | ||
573 | /* The routine used to output NUL terminated strings. We use a special | |
574 | version of this for most svr4 targets because doing so makes the | |
575 | generated assembly code more compact (and thus faster to assemble) | |
576 | as well as more readable, especially for targets like the i386 | |
577 | (where the only alternative is to output character sequences as | |
578 | comma separated lists of numbers). */ | |
579 | ||
580 | #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \ | |
581 | do \ | |
582 | { \ | |
583 | register unsigned char *_limited_str = (unsigned char *) (STR); \ | |
584 | register unsigned ch; \ | |
585 | fprintf ((FILE), "\t%s\t\"", STRING_ASM_OP); \ | |
586 | for (; ch = *_limited_str; _limited_str++) \ | |
587 | { \ | |
588 | register int escape; \ | |
589 | switch (escape = ESCAPES[ch]) \ | |
590 | { \ | |
591 | case 0: \ | |
592 | putc (ch, (FILE)); \ | |
593 | break; \ | |
594 | case 1: \ | |
595 | fprintf ((FILE), "\\%03o", ch); \ | |
596 | break; \ | |
597 | default: \ | |
598 | putc ('\\', (FILE)); \ | |
599 | putc (escape, (FILE)); \ | |
600 | break; \ | |
601 | } \ | |
602 | } \ | |
603 | fprintf ((FILE), "\"\n"); \ | |
604 | } \ | |
605 | while (0) | |
606 | ||
607 | /* The routine used to output sequences of byte values. We use a special | |
608 | version of this for most svr4 targets because doing so makes the | |
609 | generated assembly code more compact (and thus faster to assemble) | |
610 | as well as more readable. Note that if we find subparts of the | |
611 | character sequence which end with NUL (and which are shorter than | |
612 | STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */ | |
613 | ||
614 | #undef ASM_OUTPUT_ASCII | |
615 | #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \ | |
616 | do \ | |
617 | { \ | |
618 | register unsigned char *_ascii_bytes = (unsigned char *) (STR); \ | |
619 | register unsigned char *limit = _ascii_bytes + (LENGTH); \ | |
620 | register unsigned bytes_in_chunk = 0; \ | |
621 | for (; _ascii_bytes < limit; _ascii_bytes++) \ | |
622 | { \ | |
623 | register unsigned char *p; \ | |
624 | if (bytes_in_chunk >= 60) \ | |
625 | { \ | |
626 | fprintf ((FILE), "\"\n"); \ | |
627 | bytes_in_chunk = 0; \ | |
628 | } \ | |
629 | for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \ | |
630 | continue; \ | |
631 | if (p < limit && (p - _ascii_bytes) <= STRING_LIMIT) \ | |
632 | { \ | |
633 | if (bytes_in_chunk > 0) \ | |
634 | { \ | |
635 | fprintf ((FILE), "\"\n"); \ | |
636 | bytes_in_chunk = 0; \ | |
637 | } \ | |
638 | ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \ | |
639 | _ascii_bytes = p; \ | |
640 | } \ | |
641 | else \ | |
642 | { \ | |
643 | register int escape; \ | |
644 | register unsigned ch; \ | |
645 | if (bytes_in_chunk == 0) \ | |
646 | fprintf ((FILE), "\t%s\t\"", ASCII_DATA_ASM_OP); \ | |
647 | switch (escape = ESCAPES[ch = *_ascii_bytes]) \ | |
648 | { \ | |
649 | case 0: \ | |
650 | putc (ch, (FILE)); \ | |
651 | bytes_in_chunk++; \ | |
652 | break; \ | |
653 | case 1: \ | |
654 | fprintf ((FILE), "\\%03o", ch); \ | |
655 | bytes_in_chunk += 4; \ | |
656 | break; \ | |
657 | default: \ | |
658 | putc ('\\', (FILE)); \ | |
659 | putc (escape, (FILE)); \ | |
660 | bytes_in_chunk += 2; \ | |
661 | break; \ | |
662 | } \ | |
663 | } \ | |
664 | } \ | |
665 | if (bytes_in_chunk > 0) \ | |
666 | fprintf ((FILE), "\"\n"); \ | |
667 | } \ | |
668 | while (0) |