1*a9fa9459Szrj /* as.h - global header file
2*a9fa9459Szrj Copyright (C) 1987-2016 Free Software Foundation, Inc.
3*a9fa9459Szrj
4*a9fa9459Szrj This file is part of GAS, the GNU Assembler.
5*a9fa9459Szrj
6*a9fa9459Szrj GAS is free software; you can redistribute it and/or modify
7*a9fa9459Szrj it under the terms of the GNU General Public License as published by
8*a9fa9459Szrj the Free Software Foundation; either version 3, or (at your option)
9*a9fa9459Szrj any later version.
10*a9fa9459Szrj
11*a9fa9459Szrj GAS is distributed in the hope that it will be useful, but WITHOUT
12*a9fa9459Szrj ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13*a9fa9459Szrj or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
14*a9fa9459Szrj License for more details.
15*a9fa9459Szrj
16*a9fa9459Szrj You should have received a copy of the GNU General Public License
17*a9fa9459Szrj along with GAS; see the file COPYING. If not, write to the Free
18*a9fa9459Szrj Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
19*a9fa9459Szrj 02110-1301, USA. */
20*a9fa9459Szrj
21*a9fa9459Szrj #ifndef GAS
22*a9fa9459Szrj #define GAS 1
23*a9fa9459Szrj /* I think this stuff is largely out of date. xoxorich.
24*a9fa9459Szrj
25*a9fa9459Szrj CAPITALISED names are #defined.
26*a9fa9459Szrj "lowercaseH" is #defined if "lowercase.h" has been #include-d.
27*a9fa9459Szrj "lowercaseT" is a typedef of "lowercase" objects.
28*a9fa9459Szrj "lowercaseP" is type "pointer to object of type 'lowercase'".
29*a9fa9459Szrj "lowercaseS" is typedef struct ... lowercaseS.
30*a9fa9459Szrj
31*a9fa9459Szrj #define DEBUG to enable all the "know" assertion tests.
32*a9fa9459Szrj #define SUSPECT when debugging hash code.
33*a9fa9459Szrj #define COMMON as "extern" for all modules except one, where you #define
34*a9fa9459Szrj COMMON as "".
35*a9fa9459Szrj If TEST is #defined, then we are testing a module: #define COMMON as "". */
36*a9fa9459Szrj
37*a9fa9459Szrj #include "alloca-conf.h"
38*a9fa9459Szrj
39*a9fa9459Szrj /* Now, tend to the rest of the configuration. */
40*a9fa9459Szrj
41*a9fa9459Szrj /* System include files first... */
42*a9fa9459Szrj #include <stdio.h>
43*a9fa9459Szrj
44*a9fa9459Szrj #ifdef STRING_WITH_STRINGS
45*a9fa9459Szrj #include <string.h>
46*a9fa9459Szrj #include <strings.h>
47*a9fa9459Szrj #else
48*a9fa9459Szrj #ifdef HAVE_STRING_H
49*a9fa9459Szrj #include <string.h>
50*a9fa9459Szrj #else
51*a9fa9459Szrj #ifdef HAVE_STRINGS_H
52*a9fa9459Szrj #include <strings.h>
53*a9fa9459Szrj #endif
54*a9fa9459Szrj #endif
55*a9fa9459Szrj #endif
56*a9fa9459Szrj
57*a9fa9459Szrj #ifdef HAVE_STDLIB_H
58*a9fa9459Szrj #include <stdlib.h>
59*a9fa9459Szrj #endif
60*a9fa9459Szrj #ifdef HAVE_UNISTD_H
61*a9fa9459Szrj #include <unistd.h>
62*a9fa9459Szrj #endif
63*a9fa9459Szrj #ifdef HAVE_SYS_TYPES_H
64*a9fa9459Szrj /* for size_t, pid_t */
65*a9fa9459Szrj #include <sys/types.h>
66*a9fa9459Szrj #endif
67*a9fa9459Szrj
68*a9fa9459Szrj #ifdef HAVE_ERRNO_H
69*a9fa9459Szrj #include <errno.h>
70*a9fa9459Szrj #endif
71*a9fa9459Szrj
72*a9fa9459Szrj #include <stdarg.h>
73*a9fa9459Szrj
74*a9fa9459Szrj #include "getopt.h"
75*a9fa9459Szrj /* The first getopt value for machine-independent long options.
76*a9fa9459Szrj 150 isn't special; it's just an arbitrary non-ASCII char value. */
77*a9fa9459Szrj #define OPTION_STD_BASE 150
78*a9fa9459Szrj /* The first getopt value for machine-dependent long options.
79*a9fa9459Szrj 290 gives the standard options room to grow. */
80*a9fa9459Szrj #define OPTION_MD_BASE 290
81*a9fa9459Szrj
82*a9fa9459Szrj #ifdef DEBUG
83*a9fa9459Szrj #undef NDEBUG
84*a9fa9459Szrj #endif
85*a9fa9459Szrj #if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 6)
86*a9fa9459Szrj #define __PRETTY_FUNCTION__ ((char *) NULL)
87*a9fa9459Szrj #endif
88*a9fa9459Szrj #define gas_assert(P) \
89*a9fa9459Szrj ((void) ((P) ? 0 : (as_assert (__FILE__, __LINE__, __PRETTY_FUNCTION__), 0)))
90*a9fa9459Szrj #undef abort
91*a9fa9459Szrj #define abort() as_abort (__FILE__, __LINE__, __PRETTY_FUNCTION__)
92*a9fa9459Szrj
93*a9fa9459Szrj /* Now GNU header files... */
94*a9fa9459Szrj #include "ansidecl.h"
95*a9fa9459Szrj #include "bfd.h"
96*a9fa9459Szrj #include "libiberty.h"
97*a9fa9459Szrj
98*a9fa9459Szrj /* Define the standard progress macros. */
99*a9fa9459Szrj #include "progress.h"
100*a9fa9459Szrj
101*a9fa9459Szrj /* Other stuff from config.h. */
102*a9fa9459Szrj #ifdef NEED_DECLARATION_ENVIRON
103*a9fa9459Szrj extern char **environ;
104*a9fa9459Szrj #endif
105*a9fa9459Szrj #ifdef NEED_DECLARATION_ERRNO
106*a9fa9459Szrj extern int errno;
107*a9fa9459Szrj #endif
108*a9fa9459Szrj #ifdef NEED_DECLARATION_FFS
109*a9fa9459Szrj extern int ffs (int);
110*a9fa9459Szrj #endif
111*a9fa9459Szrj #ifdef NEED_DECLARATION_FREE
112*a9fa9459Szrj extern void free ();
113*a9fa9459Szrj #endif
114*a9fa9459Szrj #ifdef NEED_DECLARATION_MALLOC
115*a9fa9459Szrj extern void *malloc ();
116*a9fa9459Szrj extern void *realloc ();
117*a9fa9459Szrj #endif
118*a9fa9459Szrj #ifdef NEED_DECLARATION_STRSTR
119*a9fa9459Szrj extern char *strstr ();
120*a9fa9459Szrj #endif
121*a9fa9459Szrj
122*a9fa9459Szrj #if !HAVE_DECL_MEMPCPY
123*a9fa9459Szrj void *mempcpy(void *, const void *, size_t);
124*a9fa9459Szrj #endif
125*a9fa9459Szrj
126*a9fa9459Szrj #if !HAVE_DECL_VSNPRINTF
127*a9fa9459Szrj extern int vsnprintf(char *, size_t, const char *, va_list);
128*a9fa9459Szrj #endif
129*a9fa9459Szrj
130*a9fa9459Szrj /* This is needed for VMS. */
131*a9fa9459Szrj #if ! defined (HAVE_UNLINK) && defined (HAVE_REMOVE)
132*a9fa9459Szrj #define unlink remove
133*a9fa9459Szrj #endif
134*a9fa9459Szrj
135*a9fa9459Szrj /* Hack to make "gcc -Wall" not complain about obstack macros. */
136*a9fa9459Szrj #if !defined (memcpy) && !defined (bcopy)
137*a9fa9459Szrj #define bcopy(src,dest,size) memcpy (dest, src, size)
138*a9fa9459Szrj #endif
139*a9fa9459Szrj
140*a9fa9459Szrj #ifndef __LINE__
141*a9fa9459Szrj #define __LINE__ "unknown"
142*a9fa9459Szrj #endif /* __LINE__ */
143*a9fa9459Szrj
144*a9fa9459Szrj #ifndef __FILE__
145*a9fa9459Szrj #define __FILE__ "unknown"
146*a9fa9459Szrj #endif /* __FILE__ */
147*a9fa9459Szrj
148*a9fa9459Szrj #ifndef FOPEN_WB
149*a9fa9459Szrj #ifdef USE_BINARY_FOPEN
150*a9fa9459Szrj #include "fopen-bin.h"
151*a9fa9459Szrj #else
152*a9fa9459Szrj #include "fopen-same.h"
153*a9fa9459Szrj #endif
154*a9fa9459Szrj #endif
155*a9fa9459Szrj
156*a9fa9459Szrj #ifndef EXIT_SUCCESS
157*a9fa9459Szrj #define EXIT_SUCCESS 0
158*a9fa9459Szrj #define EXIT_FAILURE 1
159*a9fa9459Szrj #endif
160*a9fa9459Szrj
161*a9fa9459Szrj #ifndef SEEK_SET
162*a9fa9459Szrj #define SEEK_SET 0
163*a9fa9459Szrj #endif
164*a9fa9459Szrj
165*a9fa9459Szrj #define obstack_chunk_alloc xmalloc
166*a9fa9459Szrj #define obstack_chunk_free xfree
167*a9fa9459Szrj
168*a9fa9459Szrj #define xfree free
169*a9fa9459Szrj
170*a9fa9459Szrj #include "asintl.h"
171*a9fa9459Szrj
172*a9fa9459Szrj #define BAD_CASE(val) \
173*a9fa9459Szrj { \
174*a9fa9459Szrj as_fatal (_("Case value %ld unexpected at line %d of file \"%s\"\n"), \
175*a9fa9459Szrj (long) val, __LINE__, __FILE__); \
176*a9fa9459Szrj }
177*a9fa9459Szrj
178*a9fa9459Szrj #include "flonum.h"
179*a9fa9459Szrj
180*a9fa9459Szrj /* These are assembler-wide concepts */
181*a9fa9459Szrj
182*a9fa9459Szrj extern bfd *stdoutput;
183*a9fa9459Szrj typedef bfd_vma addressT;
184*a9fa9459Szrj typedef bfd_signed_vma offsetT;
185*a9fa9459Szrj
186*a9fa9459Szrj /* Type of symbol value, etc. For use in prototypes. */
187*a9fa9459Szrj typedef addressT valueT;
188*a9fa9459Szrj
189*a9fa9459Szrj #ifndef COMMON
190*a9fa9459Szrj #ifdef TEST
191*a9fa9459Szrj #define COMMON /* Declare our COMMONs storage here. */
192*a9fa9459Szrj #else
193*a9fa9459Szrj #define COMMON extern /* Our commons live elsewhere. */
194*a9fa9459Szrj #endif
195*a9fa9459Szrj #endif
196*a9fa9459Szrj /* COMMON now defined */
197*a9fa9459Szrj
198*a9fa9459Szrj #ifndef ENABLE_CHECKING
199*a9fa9459Szrj #define ENABLE_CHECKING 0
200*a9fa9459Szrj #endif
201*a9fa9459Szrj
202*a9fa9459Szrj #if ENABLE_CHECKING || defined (DEBUG)
203*a9fa9459Szrj #ifndef know
204*a9fa9459Szrj #define know(p) gas_assert(p) /* Verify our assumptions! */
205*a9fa9459Szrj #endif /* not yet defined */
206*a9fa9459Szrj #else
207*a9fa9459Szrj #define know(p) do {} while (0) /* know() checks are no-op.ed */
208*a9fa9459Szrj #endif
209*a9fa9459Szrj
210*a9fa9459Szrj /* input_scrub.c */
211*a9fa9459Szrj
212*a9fa9459Szrj /* Supplies sanitised buffers to read.c.
213*a9fa9459Szrj Also understands printing line-number part of error messages. */
214*a9fa9459Szrj
215*a9fa9459Szrj /* subsegs.c Sub-segments. Also, segment(=expression type)s.*/
216*a9fa9459Szrj
217*a9fa9459Szrj typedef asection *segT;
218*a9fa9459Szrj #define SEG_NORMAL(SEG) ( (SEG) != absolute_section \
219*a9fa9459Szrj && (SEG) != undefined_section \
220*a9fa9459Szrj && (SEG) != reg_section \
221*a9fa9459Szrj && (SEG) != expr_section)
222*a9fa9459Szrj typedef int subsegT;
223*a9fa9459Szrj
224*a9fa9459Szrj /* What subseg we are accessing now? */
225*a9fa9459Szrj COMMON subsegT now_subseg;
226*a9fa9459Szrj
227*a9fa9459Szrj /* Segment our instructions emit to. */
228*a9fa9459Szrj COMMON segT now_seg;
229*a9fa9459Szrj
230*a9fa9459Szrj #define segment_name(SEG) bfd_get_section_name (stdoutput, SEG)
231*a9fa9459Szrj
232*a9fa9459Szrj extern segT reg_section, expr_section;
233*a9fa9459Szrj /* Shouldn't these be eliminated someday? */
234*a9fa9459Szrj extern segT text_section, data_section, bss_section;
235*a9fa9459Szrj #define absolute_section bfd_abs_section_ptr
236*a9fa9459Szrj #define undefined_section bfd_und_section_ptr
237*a9fa9459Szrj
238*a9fa9459Szrj enum _relax_state
239*a9fa9459Szrj {
240*a9fa9459Szrj /* Dummy frag used by listing code. */
241*a9fa9459Szrj rs_dummy = 0,
242*a9fa9459Szrj
243*a9fa9459Szrj /* Variable chars to be repeated fr_offset times.
244*a9fa9459Szrj Fr_symbol unused. Used with fr_offset == 0 for a
245*a9fa9459Szrj constant length frag. */
246*a9fa9459Szrj rs_fill,
247*a9fa9459Szrj
248*a9fa9459Szrj /* Align. The fr_offset field holds the power of 2 to which to
249*a9fa9459Szrj align. The fr_var field holds the number of characters in the
250*a9fa9459Szrj fill pattern. The fr_subtype field holds the maximum number of
251*a9fa9459Szrj bytes to skip when aligning, or 0 if there is no maximum. */
252*a9fa9459Szrj rs_align,
253*a9fa9459Szrj
254*a9fa9459Szrj /* Align code. The fr_offset field holds the power of 2 to which
255*a9fa9459Szrj to align. This type is only generated by machine specific
256*a9fa9459Szrj code, which is normally responsible for handling the fill
257*a9fa9459Szrj pattern. The fr_subtype field holds the maximum number of
258*a9fa9459Szrj bytes to skip when aligning, or 0 if there is no maximum. */
259*a9fa9459Szrj rs_align_code,
260*a9fa9459Szrj
261*a9fa9459Szrj /* Test for alignment. Like rs_align, but used by several targets
262*a9fa9459Szrj to warn if data is not properly aligned. */
263*a9fa9459Szrj rs_align_test,
264*a9fa9459Szrj
265*a9fa9459Szrj /* Org: Fr_offset, fr_symbol: address. 1 variable char: fill
266*a9fa9459Szrj character. */
267*a9fa9459Szrj rs_org,
268*a9fa9459Szrj
269*a9fa9459Szrj #ifndef WORKING_DOT_WORD
270*a9fa9459Szrj /* JF: gunpoint */
271*a9fa9459Szrj rs_broken_word,
272*a9fa9459Szrj #endif
273*a9fa9459Szrj
274*a9fa9459Szrj /* Machine specific relaxable (or similarly alterable) instruction. */
275*a9fa9459Szrj rs_machine_dependent,
276*a9fa9459Szrj
277*a9fa9459Szrj /* .space directive with expression operand that needs to be computed
278*a9fa9459Szrj later. Similar to rs_org, but different.
279*a9fa9459Szrj fr_symbol: operand
280*a9fa9459Szrj 1 variable char: fill character */
281*a9fa9459Szrj rs_space,
282*a9fa9459Szrj
283*a9fa9459Szrj /* A DWARF leb128 value; only ELF uses this. The subtype is 0 for
284*a9fa9459Szrj unsigned, 1 for signed. */
285*a9fa9459Szrj rs_leb128,
286*a9fa9459Szrj
287*a9fa9459Szrj /* Exception frame information which we may be able to optimize. */
288*a9fa9459Szrj rs_cfa,
289*a9fa9459Szrj
290*a9fa9459Szrj /* Cross-fragment dwarf2 line number optimization. */
291*a9fa9459Szrj rs_dwarf2dbg
292*a9fa9459Szrj };
293*a9fa9459Szrj
294*a9fa9459Szrj typedef enum _relax_state relax_stateT;
295*a9fa9459Szrj
296*a9fa9459Szrj /* This type is used in prototypes, so it can't be a type that will be
297*a9fa9459Szrj widened for argument passing. */
298*a9fa9459Szrj typedef unsigned int relax_substateT;
299*a9fa9459Szrj
300*a9fa9459Szrj /* Enough bits for address, but still an integer type.
301*a9fa9459Szrj Could be a problem, cross-assembling for 64-bit machines. */
302*a9fa9459Szrj typedef addressT relax_addressT;
303*a9fa9459Szrj
304*a9fa9459Szrj struct relax_type
305*a9fa9459Szrj {
306*a9fa9459Szrj /* Forward reach. Signed number. > 0. */
307*a9fa9459Szrj offsetT rlx_forward;
308*a9fa9459Szrj /* Backward reach. Signed number. < 0. */
309*a9fa9459Szrj offsetT rlx_backward;
310*a9fa9459Szrj
311*a9fa9459Szrj /* Bytes length of this address. */
312*a9fa9459Szrj unsigned char rlx_length;
313*a9fa9459Szrj
314*a9fa9459Szrj /* Next longer relax-state. 0 means there is no 'next' relax-state. */
315*a9fa9459Szrj relax_substateT rlx_more;
316*a9fa9459Szrj };
317*a9fa9459Szrj
318*a9fa9459Szrj typedef struct relax_type relax_typeS;
319*a9fa9459Szrj
320*a9fa9459Szrj /* main program "as.c" (command arguments etc). */
321*a9fa9459Szrj
322*a9fa9459Szrj COMMON unsigned char flag_no_comments; /* -f */
323*a9fa9459Szrj COMMON unsigned char flag_debug; /* -D */
324*a9fa9459Szrj COMMON unsigned char flag_signed_overflow_ok; /* -J */
325*a9fa9459Szrj #ifndef WORKING_DOT_WORD
326*a9fa9459Szrj COMMON unsigned char flag_warn_displacement; /* -K */
327*a9fa9459Szrj #endif
328*a9fa9459Szrj
329*a9fa9459Szrj /* True if local symbols should be retained. */
330*a9fa9459Szrj COMMON int flag_keep_locals; /* -L */
331*a9fa9459Szrj
332*a9fa9459Szrj /* True if we are assembling in MRI mode. */
333*a9fa9459Szrj COMMON int flag_mri;
334*a9fa9459Szrj
335*a9fa9459Szrj /* Should the data section be made read-only and appended to the text
336*a9fa9459Szrj section? */
337*a9fa9459Szrj COMMON unsigned char flag_readonly_data_in_text; /* -R */
338*a9fa9459Szrj
339*a9fa9459Szrj /* True if warnings should be inhibited. */
340*a9fa9459Szrj COMMON int flag_no_warnings; /* -W */
341*a9fa9459Szrj
342*a9fa9459Szrj /* True if warnings count as errors. */
343*a9fa9459Szrj COMMON int flag_fatal_warnings; /* --fatal-warnings */
344*a9fa9459Szrj
345*a9fa9459Szrj /* True if we should attempt to generate output even if non-fatal errors
346*a9fa9459Szrj are detected. */
347*a9fa9459Szrj COMMON unsigned char flag_always_generate_output; /* -Z */
348*a9fa9459Szrj
349*a9fa9459Szrj /* This is true if the assembler should output time and space usage. */
350*a9fa9459Szrj COMMON unsigned char flag_print_statistics;
351*a9fa9459Szrj
352*a9fa9459Szrj /* True if local absolute symbols are to be stripped. */
353*a9fa9459Szrj COMMON int flag_strip_local_absolute;
354*a9fa9459Szrj
355*a9fa9459Szrj /* True if we should generate a traditional format object file. */
356*a9fa9459Szrj COMMON int flag_traditional_format;
357*a9fa9459Szrj
358*a9fa9459Szrj /* Type of compressed debug sections we should generate. */
359*a9fa9459Szrj COMMON enum compressed_debug_section_type flag_compress_debug;
360*a9fa9459Szrj
361*a9fa9459Szrj /* TRUE if .note.GNU-stack section with SEC_CODE should be created */
362*a9fa9459Szrj COMMON int flag_execstack;
363*a9fa9459Szrj
364*a9fa9459Szrj /* TRUE if .note.GNU-stack section with SEC_CODE should be created */
365*a9fa9459Szrj COMMON int flag_noexecstack;
366*a9fa9459Szrj
367*a9fa9459Szrj /* name of emitted object file */
368*a9fa9459Szrj COMMON const char *out_file_name;
369*a9fa9459Szrj
370*a9fa9459Szrj /* name of file defining extensions to the basic instruction set */
371*a9fa9459Szrj COMMON char *insttbl_file_name;
372*a9fa9459Szrj
373*a9fa9459Szrj /* TRUE if we need a second pass. */
374*a9fa9459Szrj COMMON int need_pass_2;
375*a9fa9459Szrj
376*a9fa9459Szrj /* TRUE if we should do no relaxing, and
377*a9fa9459Szrj leave lots of padding. */
378*a9fa9459Szrj COMMON int linkrelax;
379*a9fa9459Szrj
380*a9fa9459Szrj COMMON int do_not_pad_sections_to_alignment;
381*a9fa9459Szrj
382*a9fa9459Szrj /* TRUE if we should produce a listing. */
383*a9fa9459Szrj extern int listing;
384*a9fa9459Szrj
385*a9fa9459Szrj /* Type of debugging information we should generate. We currently support
386*a9fa9459Szrj stabs, ECOFF, and DWARF2.
387*a9fa9459Szrj
388*a9fa9459Szrj NOTE! This means debug information about the assembly source code itself
389*a9fa9459Szrj and _not_ about possible debug information from a high-level language.
390*a9fa9459Szrj This is especially relevant to DWARF2, since the compiler may emit line
391*a9fa9459Szrj number directives that the assembler resolves. */
392*a9fa9459Szrj
393*a9fa9459Szrj enum debug_info_type
394*a9fa9459Szrj {
395*a9fa9459Szrj DEBUG_UNSPECIFIED,
396*a9fa9459Szrj DEBUG_NONE,
397*a9fa9459Szrj DEBUG_STABS,
398*a9fa9459Szrj DEBUG_ECOFF,
399*a9fa9459Szrj DEBUG_DWARF,
400*a9fa9459Szrj DEBUG_DWARF2
401*a9fa9459Szrj };
402*a9fa9459Szrj
403*a9fa9459Szrj extern enum debug_info_type debug_type;
404*a9fa9459Szrj extern int use_gnu_debug_info_extensions;
405*a9fa9459Szrj COMMON bfd_boolean flag_dwarf_sections;
406*a9fa9459Szrj
407*a9fa9459Szrj /* Maximum level of macro nesting. */
408*a9fa9459Szrj extern int max_macro_nest;
409*a9fa9459Szrj
410*a9fa9459Szrj /* Verbosity level. */
411*a9fa9459Szrj extern int verbose;
412*a9fa9459Szrj
413*a9fa9459Szrj /* Obstack chunk size. Keep large for efficient space use, make small to
414*a9fa9459Szrj increase malloc calls for monitoring memory allocation. */
415*a9fa9459Szrj extern int chunksize;
416*a9fa9459Szrj
417*a9fa9459Szrj struct _pseudo_type
418*a9fa9459Szrj {
419*a9fa9459Szrj /* assembler mnemonic, lower case, no '.' */
420*a9fa9459Szrj const char *poc_name;
421*a9fa9459Szrj /* Do the work */
422*a9fa9459Szrj void (*poc_handler) (int);
423*a9fa9459Szrj /* Value to pass to handler */
424*a9fa9459Szrj int poc_val;
425*a9fa9459Szrj };
426*a9fa9459Szrj
427*a9fa9459Szrj typedef struct _pseudo_type pseudo_typeS;
428*a9fa9459Szrj
429*a9fa9459Szrj #if (__GNUC__ >= 2) && !defined(VMS)
430*a9fa9459Szrj /* for use with -Wformat */
431*a9fa9459Szrj
432*a9fa9459Szrj #if __GNUC__ == 2 && __GNUC_MINOR__ < 6
433*a9fa9459Szrj /* Support for double underscores in attribute names was added in gcc
434*a9fa9459Szrj 2.6, so avoid them if we are using an earlier version. */
435*a9fa9459Szrj #define __printf__ printf
436*a9fa9459Szrj #define __format__ format
437*a9fa9459Szrj #endif
438*a9fa9459Szrj
439*a9fa9459Szrj #define PRINTF_LIKE(FCN) \
440*a9fa9459Szrj void FCN (const char *format, ...) \
441*a9fa9459Szrj __attribute__ ((__format__ (__printf__, 1, 2)))
442*a9fa9459Szrj #define PRINTF_WHERE_LIKE(FCN) \
443*a9fa9459Szrj void FCN (const char *file, unsigned int line, const char *format, ...) \
444*a9fa9459Szrj __attribute__ ((__format__ (__printf__, 3, 4)))
445*a9fa9459Szrj
446*a9fa9459Szrj #else /* __GNUC__ < 2 || defined(VMS) */
447*a9fa9459Szrj
448*a9fa9459Szrj #define PRINTF_LIKE(FCN) void FCN (const char *format, ...)
449*a9fa9459Szrj #define PRINTF_WHERE_LIKE(FCN) void FCN (const char *file, \
450*a9fa9459Szrj unsigned int line, \
451*a9fa9459Szrj const char *format, ...)
452*a9fa9459Szrj
453*a9fa9459Szrj #endif /* __GNUC__ < 2 || defined(VMS) */
454*a9fa9459Szrj
455*a9fa9459Szrj PRINTF_LIKE (as_bad);
456*a9fa9459Szrj PRINTF_LIKE (as_fatal) ATTRIBUTE_NORETURN;
457*a9fa9459Szrj PRINTF_LIKE (as_tsktsk);
458*a9fa9459Szrj PRINTF_LIKE (as_warn);
459*a9fa9459Szrj PRINTF_WHERE_LIKE (as_bad_where);
460*a9fa9459Szrj PRINTF_WHERE_LIKE (as_warn_where);
461*a9fa9459Szrj
462*a9fa9459Szrj void as_assert (const char *, int, const char *);
463*a9fa9459Szrj void as_abort (const char *, int, const char *) ATTRIBUTE_NORETURN;
464*a9fa9459Szrj void sprint_value (char *, addressT);
465*a9fa9459Szrj int had_errors (void);
466*a9fa9459Szrj int had_warnings (void);
467*a9fa9459Szrj void as_warn_value_out_of_range (const char *, offsetT, offsetT, offsetT,
468*a9fa9459Szrj const char *, unsigned);
469*a9fa9459Szrj void as_bad_value_out_of_range (const char *, offsetT, offsetT, offsetT,
470*a9fa9459Szrj const char *, unsigned);
471*a9fa9459Szrj void print_version_id (void);
472*a9fa9459Szrj char * app_push (void);
473*a9fa9459Szrj char * atof_ieee (char *, int, LITTLENUM_TYPE *);
474*a9fa9459Szrj const char * ieee_md_atof (int, char *, int *, bfd_boolean);
475*a9fa9459Szrj const char * vax_md_atof (int, char *, int *);
476*a9fa9459Szrj char * input_scrub_include_file (const char *, char *);
477*a9fa9459Szrj void input_scrub_insert_line (const char *);
478*a9fa9459Szrj void input_scrub_insert_file (char *);
479*a9fa9459Szrj char * input_scrub_new_file (const char *);
480*a9fa9459Szrj char * input_scrub_next_buffer (char **bufp);
481*a9fa9459Szrj size_t do_scrub_chars (size_t (*get) (char *, size_t), char *, size_t);
482*a9fa9459Szrj int gen_to_words (LITTLENUM_TYPE *, int, long);
483*a9fa9459Szrj int had_err (void);
484*a9fa9459Szrj int ignore_input (void);
485*a9fa9459Szrj void cond_finish_check (int);
486*a9fa9459Szrj void cond_exit_macro (int);
487*a9fa9459Szrj int seen_at_least_1_file (void);
488*a9fa9459Szrj void app_pop (char *);
489*a9fa9459Szrj const char * as_where (unsigned int *);
490*a9fa9459Szrj void bump_line_counters (void);
491*a9fa9459Szrj void do_scrub_begin (int);
492*a9fa9459Szrj void input_scrub_begin (void);
493*a9fa9459Szrj void input_scrub_close (void);
494*a9fa9459Szrj void input_scrub_end (void);
495*a9fa9459Szrj int new_logical_line (const char *, int);
496*a9fa9459Szrj int new_logical_line_flags (const char *, int, int);
497*a9fa9459Szrj void subsegs_begin (void);
498*a9fa9459Szrj void subseg_change (segT, int);
499*a9fa9459Szrj segT subseg_new (const char *, subsegT);
500*a9fa9459Szrj segT subseg_force_new (const char *, subsegT);
501*a9fa9459Szrj void subseg_set (segT, subsegT);
502*a9fa9459Szrj int subseg_text_p (segT);
503*a9fa9459Szrj int seg_not_empty_p (segT);
504*a9fa9459Szrj void start_dependencies (char *);
505*a9fa9459Szrj void register_dependency (const char *);
506*a9fa9459Szrj void print_dependencies (void);
507*a9fa9459Szrj segT subseg_get (const char *, int);
508*a9fa9459Szrj
509*a9fa9459Szrj const char *remap_debug_filename (const char *);
510*a9fa9459Szrj void add_debug_prefix_map (const char *);
511*a9fa9459Szrj
512*a9fa9459Szrj static inline char *
xmemdup0(const char * in,size_t len)513*a9fa9459Szrj xmemdup0 (const char *in, size_t len)
514*a9fa9459Szrj {
515*a9fa9459Szrj char *out = (char *) xmalloc (len + 1);
516*a9fa9459Szrj out[len] = 0;
517*a9fa9459Szrj return (char *) memcpy (out, in, len);
518*a9fa9459Szrj }
519*a9fa9459Szrj
520*a9fa9459Szrj struct expressionS;
521*a9fa9459Szrj struct fix;
522*a9fa9459Szrj typedef struct symbol symbolS;
523*a9fa9459Szrj typedef struct frag fragS;
524*a9fa9459Szrj
525*a9fa9459Szrj /* literal.c */
526*a9fa9459Szrj valueT add_to_literal_pool (symbolS *, valueT, segT, int);
527*a9fa9459Szrj
528*a9fa9459Szrj int check_eh_frame (struct expressionS *, unsigned int *);
529*a9fa9459Szrj int eh_frame_estimate_size_before_relax (fragS *);
530*a9fa9459Szrj int eh_frame_relax_frag (fragS *);
531*a9fa9459Szrj void eh_frame_convert_frag (fragS *);
532*a9fa9459Szrj int generic_force_reloc (struct fix *);
533*a9fa9459Szrj
534*a9fa9459Szrj #include "expr.h" /* Before targ-*.h */
535*a9fa9459Szrj
536*a9fa9459Szrj /* This one starts the chain of target dependant headers. */
537*a9fa9459Szrj #include "targ-env.h"
538*a9fa9459Szrj
539*a9fa9459Szrj #ifdef OBJ_MAYBE_ELF
540*a9fa9459Szrj #define IS_ELF (OUTPUT_FLAVOR == bfd_target_elf_flavour)
541*a9fa9459Szrj #else
542*a9fa9459Szrj #ifdef OBJ_ELF
543*a9fa9459Szrj #define IS_ELF 1
544*a9fa9459Szrj #else
545*a9fa9459Szrj #define IS_ELF 0
546*a9fa9459Szrj #endif
547*a9fa9459Szrj #endif
548*a9fa9459Szrj
549*a9fa9459Szrj #include "write.h"
550*a9fa9459Szrj #include "frags.h"
551*a9fa9459Szrj #include "hash.h"
552*a9fa9459Szrj #include "read.h"
553*a9fa9459Szrj #include "symbols.h"
554*a9fa9459Szrj
555*a9fa9459Szrj #include "tc.h"
556*a9fa9459Szrj #include "obj.h"
557*a9fa9459Szrj
558*a9fa9459Szrj #ifdef USE_EMULATIONS
559*a9fa9459Szrj #include "emul.h"
560*a9fa9459Szrj #endif
561*a9fa9459Szrj #include "listing.h"
562*a9fa9459Szrj
563*a9fa9459Szrj #ifdef H_TICK_HEX
564*a9fa9459Szrj extern int enable_h_tick_hex;
565*a9fa9459Szrj #endif
566*a9fa9459Szrj
567*a9fa9459Szrj #ifdef TC_M68K
568*a9fa9459Szrj /* True if we are assembling in m68k MRI mode. */
569*a9fa9459Szrj COMMON int flag_m68k_mri;
570*a9fa9459Szrj #define DOLLAR_AMBIGU flag_m68k_mri
571*a9fa9459Szrj #else
572*a9fa9459Szrj #define flag_m68k_mri 0
573*a9fa9459Szrj #endif
574*a9fa9459Szrj
575*a9fa9459Szrj #ifdef WARN_COMMENTS
576*a9fa9459Szrj COMMON int warn_comment;
577*a9fa9459Szrj COMMON unsigned int found_comment;
578*a9fa9459Szrj COMMON const char * found_comment_file;
579*a9fa9459Szrj #endif
580*a9fa9459Szrj
581*a9fa9459Szrj #if defined OBJ_ELF || defined OBJ_MAYBE_ELF
582*a9fa9459Szrj /* If .size directive failure should be error or warning. */
583*a9fa9459Szrj COMMON int flag_allow_nonconst_size;
584*a9fa9459Szrj
585*a9fa9459Szrj /* If we should generate ELF common symbols with the STT_COMMON type. */
586*a9fa9459Szrj extern int flag_use_elf_stt_common;
587*a9fa9459Szrj
588*a9fa9459Szrj /* If section name substitution sequences should be honored */
589*a9fa9459Szrj COMMON int flag_sectname_subst;
590*a9fa9459Szrj #endif
591*a9fa9459Szrj
592*a9fa9459Szrj #ifndef DOLLAR_AMBIGU
593*a9fa9459Szrj #define DOLLAR_AMBIGU 0
594*a9fa9459Szrj #endif
595*a9fa9459Szrj
596*a9fa9459Szrj #ifndef NUMBERS_WITH_SUFFIX
597*a9fa9459Szrj #define NUMBERS_WITH_SUFFIX 0
598*a9fa9459Szrj #endif
599*a9fa9459Szrj
600*a9fa9459Szrj #ifndef LOCAL_LABELS_DOLLAR
601*a9fa9459Szrj #define LOCAL_LABELS_DOLLAR 0
602*a9fa9459Szrj #endif
603*a9fa9459Szrj
604*a9fa9459Szrj #ifndef LOCAL_LABELS_FB
605*a9fa9459Szrj #define LOCAL_LABELS_FB 0
606*a9fa9459Szrj #endif
607*a9fa9459Szrj
608*a9fa9459Szrj #ifndef LABELS_WITHOUT_COLONS
609*a9fa9459Szrj #define LABELS_WITHOUT_COLONS 0
610*a9fa9459Szrj #endif
611*a9fa9459Szrj
612*a9fa9459Szrj #ifndef NO_PSEUDO_DOT
613*a9fa9459Szrj #define NO_PSEUDO_DOT 0
614*a9fa9459Szrj #endif
615*a9fa9459Szrj
616*a9fa9459Szrj #ifndef TEXT_SECTION_NAME
617*a9fa9459Szrj #define TEXT_SECTION_NAME ".text"
618*a9fa9459Szrj #define DATA_SECTION_NAME ".data"
619*a9fa9459Szrj #define BSS_SECTION_NAME ".bss"
620*a9fa9459Szrj #endif
621*a9fa9459Szrj
622*a9fa9459Szrj #ifndef OCTETS_PER_BYTE_POWER
623*a9fa9459Szrj #define OCTETS_PER_BYTE_POWER 0
624*a9fa9459Szrj #endif
625*a9fa9459Szrj #ifndef OCTETS_PER_BYTE
626*a9fa9459Szrj #define OCTETS_PER_BYTE (1<<OCTETS_PER_BYTE_POWER)
627*a9fa9459Szrj #endif
628*a9fa9459Szrj #if OCTETS_PER_BYTE != (1<<OCTETS_PER_BYTE_POWER)
629*a9fa9459Szrj #error "Octets per byte conflicts with its power-of-two definition!"
630*a9fa9459Szrj #endif
631*a9fa9459Szrj
632*a9fa9459Szrj #endif /* GAS */
633