X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=gas%2Fas.h;h=51e16f11bf8f5aa03b73aa1f2293a8cfb6f4f187;hb=add39d2344036db9334bdeb1ec20a90beaa3ca49;hp=1b2561f1da25e254419781cb66b90a046791f324;hpb=85051959f4b156350cb8fcb4c08db004950f3ea1;p=deliverable%2Fbinutils-gdb.git diff --git a/gas/as.h b/gas/as.h index 1b2561f1da..51e16f11bf 100644 --- a/gas/as.h +++ b/gas/as.h @@ -1,63 +1,140 @@ /* as.h - global header file - Copyright (C) 1987, 1990, 1991, 1992 Free Software Foundation, Inc. + Copyright (C) 1987-2016 Free Software Foundation, Inc. This file is part of GAS, the GNU Assembler. GAS is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2, or (at your option) + the Free Software Foundation; either version 3, or (at your option) any later version. - GAS is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. + GAS is distributed in the hope that it will be useful, but WITHOUT + ANY WARRANTY; without even the implied warranty of MERCHANTABILITY + or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public + License for more details. You should have received a copy of the GNU General Public License - along with GAS; see the file COPYING. If not, write to - the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ + along with GAS; see the file COPYING. If not, write to the Free + Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA + 02110-1301, USA. */ +#ifndef GAS #define GAS 1 -/* - * I think this stuff is largely out of date. xoxorich. - * - * CAPITALISED names are #defined. - * "lowercaseH" is #defined if "lowercase.h" has been #include-d. - * "lowercaseT" is a typedef of "lowercase" objects. - * "lowercaseP" is type "pointer to object of type 'lowercase'". - * "lowercaseS" is typedef struct ... lowercaseS. - * - * #define DEBUG to enable all the "know" assertion tests. - * #define SUSPECT when debugging hash code. - * #define COMMON as "extern" for all modules except one, where you #define - * COMMON as "". - * If TEST is #defined, then we are testing a module: #define COMMON as "". - */ - -/* These #defines are for parameters of entire assembler. */ - -#define DEBUG /* temporary */ -/* These #includes are for type definitions etc. */ +/* I think this stuff is largely out of date. xoxorich. + CAPITALISED names are #defined. + "lowercaseH" is #defined if "lowercase.h" has been #include-d. + "lowercaseT" is a typedef of "lowercase" objects. + "lowercaseP" is type "pointer to object of type 'lowercase'". + "lowercaseS" is typedef struct ... lowercaseS. + + #define DEBUG to enable all the "know" assertion tests. + #define SUSPECT when debugging hash code. + #define COMMON as "extern" for all modules except one, where you #define + COMMON as "". + If TEST is #defined, then we are testing a module: #define COMMON as "". */ + +#include "alloca-conf.h" + +/* Now, tend to the rest of the configuration. */ + +/* System include files first... */ #include + +#ifdef STRING_WITH_STRINGS +#include +#include +#else +#ifdef HAVE_STRING_H +#include +#else +#ifdef HAVE_STRINGS_H +#include +#endif +#endif +#endif + +#ifdef HAVE_STDLIB_H +#include +#endif +#ifdef HAVE_UNISTD_H +#include +#endif +#ifdef HAVE_SYS_TYPES_H +/* for size_t, pid_t */ +#include +#endif + +#ifdef HAVE_ERRNO_H +#include +#endif + +#include + +#include "getopt.h" +/* The first getopt value for machine-independent long options. + 150 isn't special; it's just an arbitrary non-ASCII char value. */ +#define OPTION_STD_BASE 150 +/* The first getopt value for machine-dependent long options. + 190 gives the standard options room to grow. */ +#define OPTION_MD_BASE 190 + #ifdef DEBUG #undef NDEBUG #endif -#include +#if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 6) +#define __PRETTY_FUNCTION__ ((char *) NULL) +#endif +#define gas_assert(P) \ + ((void) ((P) ? 0 : (as_assert (__FILE__, __LINE__, __PRETTY_FUNCTION__), 0))) +#undef abort +#define abort() as_abort (__FILE__, __LINE__, __PRETTY_FUNCTION__) + +/* Now GNU header files... */ +#include "ansidecl.h" +#include "bfd.h" +#include "libiberty.h" + +/* Define the standard progress macros. */ +#include "progress.h" -#include -#ifdef BFD_ASSEMBLER -#include +/* Other stuff from config.h. */ +#ifdef NEED_DECLARATION_ENVIRON +extern char **environ; +#endif +#ifdef NEED_DECLARATION_ERRNO +extern int errno; +#endif +#ifdef NEED_DECLARATION_FFS +extern int ffs (int); +#endif +#ifdef NEED_DECLARATION_FREE +extern void free (); +#endif +#ifdef NEED_DECLARATION_MALLOC +extern void *malloc (); +extern void *realloc (); +#endif +#ifdef NEED_DECLARATION_STRSTR +extern char *strstr (); +#endif + +#if !HAVE_DECL_MEMPCPY +void *mempcpy(void *, const void *, size_t); +#endif + +#if !HAVE_DECL_VSNPRINTF +extern int vsnprintf(char *, size_t, const char *, va_list); +#endif + +/* This is needed for VMS. */ +#if ! defined (HAVE_UNLINK) && defined (HAVE_REMOVE) +#define unlink remove #endif -#include "host.h" -#include "flonum.h" -/* Make Saber happier on obstack.h. */ -#ifdef SABER -#undef __PTR_TO_INT -#define __PTR_TO_INT(P) ((int)(P)) -#undef __INT_TO_PTR -#define __INT_TO_PTR(P) ((char *)(P)) +/* Hack to make "gcc -Wall" not complain about obstack macros. */ +#if !defined (memcpy) && !defined (bcopy) +#define bcopy(src,dest,size) memcpy (dest, src, size) #endif #ifndef __LINE__ @@ -68,404 +145,405 @@ #define __FILE__ "unknown" #endif /* __FILE__ */ -#ifndef __STDC__ -#ifndef const -#define const +#ifndef FOPEN_WB +#ifdef USE_BINARY_FOPEN +#include "fopen-bin.h" +#else +#include "fopen-same.h" +#endif #endif -#ifndef volatile -#define volatile + +#ifndef EXIT_SUCCESS +#define EXIT_SUCCESS 0 +#define EXIT_FAILURE 1 +#endif + +#ifndef SEEK_SET +#define SEEK_SET 0 #endif -#endif /* ! __STDC__ */ #define obstack_chunk_alloc xmalloc #define obstack_chunk_free xfree #define xfree free -#define BAD_CASE(val) \ -{ \ - as_fatal("Case value %d unexpected at line %d of file \"%s\"\n", \ - val, __LINE__, __FILE__); \ - } +#include "asintl.h" + +#define BAD_CASE(val) \ + { \ + as_fatal (_("Case value %ld unexpected at line %d of file \"%s\"\n"), \ + (long) val, __LINE__, __FILE__); \ + } +#include "flonum.h" /* These are assembler-wide concepts */ -#ifdef BFD_ASSEMBLER extern bfd *stdoutput; typedef bfd_vma addressT; typedef bfd_signed_vma offsetT; -#else -typedef unsigned long addressT; -typedef long offsetT; -#endif /* Type of symbol value, etc. For use in prototypes. */ typedef addressT valueT; #ifndef COMMON #ifdef TEST -#define COMMON /* declare our COMMONs storage here. */ +#define COMMON /* Declare our COMMONs storage here. */ #else -#define COMMON extern /* our commons live elswhere */ +#define COMMON extern /* Our commons live elsewhere. */ #endif #endif /* COMMON now defined */ -#ifdef DEBUG +#ifndef ENABLE_CHECKING +#define ENABLE_CHECKING 0 +#endif + +#if ENABLE_CHECKING || defined (DEBUG) #ifndef know -#define know(p) assert(p) /* Verify our assumptions! */ +#define know(p) gas_assert(p) /* Verify our assumptions! */ #endif /* not yet defined */ #else -#define know(p) /* know() checks are no-op.ed */ -#endif - -#if defined (BROKEN_ASSERT) && !defined (NDEBUG) -/* Used on machines where the "assert" macro is buggy. (For example, on the - RS/6000, Reiser-cpp substitution is done to put the condition into a - string, so if the condition contains a string, parse errors result.) If - the condition fails, just drop core file. */ -#undef assert -#define assert(p) ((p) ? 0 : (abort (), 0)) +#define know(p) do {} while (0) /* know() checks are no-op.ed */ #endif /* input_scrub.c */ -/* - * Supplies sanitised buffers to read.c. - * Also understands printing line-number part of error messages. - */ +/* Supplies sanitised buffers to read.c. + Also understands printing line-number part of error messages. */ - /* subsegs.c Sub-segments. Also, segment(=expression type)s.*/ -#ifndef BFD_ASSEMBLER -/* - * This table describes the use of segments as EXPRESSION types. - * - * X_seg X_add_symbol X_subtract_symbol X_add_number - * SEG_ABSENT no (legal) expression - * SEG_PASS1 no (defined) " - * SEG_BIG * > 32 bits const. - * SEG_ABSOLUTE 0 - * SEG_DATA * 0 - * SEG_TEXT * 0 - * SEG_BSS * 0 - * SEG_UNKNOWN * 0 - * SEG_DIFFERENCE 0 * 0 - * SEG_REGISTER * - * - * The blank fields MUST be 0, and are nugatory. - * The '0' fields MAY be 0. The '*' fields MAY NOT be 0. - * - * SEG_BIG: X_add_number is < 0 if the result is in - * generic_floating_point_number. The value is -'c' where c is the - * character that introduced the constant. e.g. "0f6.9" will have -'f' - * as a X_add_number value. - * X_add_number > 0 is a count of how many littlenums it took to - * represent a bignum. - * SEG_DIFFERENCE: - * If segments of both symbols are known, they are the same segment. - * X_add_symbol != X_sub_symbol (then we just cancel them, => SEG_ABSOLUTE). - */ - - -#ifdef MANY_SEGMENTS -#include "bfd.h" -#define N_SEGMENTS 10 -#define SEG_NORMAL(x) ((x) >= SEG_E0 && (x) <= SEG_E9) -#define SEG_LIST SEG_E0,SEG_E1,SEG_E2,SEG_E3,SEG_E4,SEG_E5,SEG_E6,SEG_E7,SEG_E8,SEG_E9 -#define SEG_TEXT SEG_E0 -#define SEG_DATA SEG_E1 -#define SEG_BSS SEG_E2 -#else -#define N_SEGMENTS 3 -#define SEG_NORMAL(x) ((x) == SEG_TEXT || (x) == SEG_DATA || (x) == SEG_BSS) -#define SEG_LIST SEG_TEXT,SEG_DATA,SEG_BSS -#endif - -typedef enum _segT - { - SEG_ABSOLUTE = 0, - SEG_LIST, - SEG_UNKNOWN, - SEG_ABSENT, /* Mythical Segment (absent): NO expression seen. */ - SEG_PASS1, /* Mythical Segment: Need another pass. */ - SEG_GOOF, /* Only happens if AS has a logic error. */ - /* Invented so we don't crash printing */ - /* error message involving weird segment. */ - SEG_BIG, /* Bigger than 32 bits constant. */ - SEG_DIFFERENCE, /* Mythical Segment: absolute difference. */ - SEG_DEBUG, /* Debug segment */ - SEG_NTV, /* Transfert vector preload segment */ - SEG_PTV, /* Transfert vector postload segment */ - SEG_REGISTER /* Mythical: a register-valued expression */ - } segT; - -#define SEG_MAXIMUM_ORDINAL (SEG_REGISTER) -#else typedef asection *segT; -#define SEG_NORMAL(SEG) ((SEG) != absolute_section \ +#define SEG_NORMAL(SEG) ( (SEG) != absolute_section \ && (SEG) != undefined_section \ - && (SEG) != big_section \ && (SEG) != reg_section \ - && (SEG) != pass1_section \ - && (SEG) != diff_section \ - && (SEG) != absent_section) -#endif + && (SEG) != expr_section) typedef int subsegT; -/* What subseg we are accreting now? */ +/* What subseg we are accessing now? */ COMMON subsegT now_subseg; -/* Segment our instructions emit to. */ +/* Segment our instructions emit to. */ COMMON segT now_seg; -#ifdef BFD_ASSEMBLER #define segment_name(SEG) bfd_get_section_name (stdoutput, SEG) -#else -extern char *const seg_name[]; -#define segment_name(SEG) seg_name[(int) (SEG)] -#endif - -#ifndef BFD_ASSEMBLER -extern int section_alignment[]; -#endif -#ifdef BFD_ASSEMBLER -extern segT big_section, reg_section, pass1_section; -extern segT diff_section, absent_section; +extern segT reg_section, expr_section; /* Shouldn't these be eliminated someday? */ extern segT text_section, data_section, bss_section; -#define absolute_section (&bfd_abs_section) -#define undefined_section (&bfd_und_section) -#else -#define big_section SEG_BIG -#define reg_section SEG_REGISTER -#define pass1_section SEG_PASS1 -#define diff_section SEG_DIFFERENCE -#define absent_section SEG_ABSENT -#define text_section SEG_TEXT -#define data_section SEG_DATA -#define bss_section SEG_BSS -#define absolute_section SEG_ABSOLUTE -#define undefined_section SEG_UNKNOWN +#define absolute_section bfd_abs_section_ptr +#define undefined_section bfd_und_section_ptr + +enum _relax_state +{ + /* Dummy frag used by listing code. */ + rs_dummy = 0, + + /* Variable chars to be repeated fr_offset times. + Fr_symbol unused. Used with fr_offset == 0 for a + constant length frag. */ + rs_fill, + + /* Align. The fr_offset field holds the power of 2 to which to + align. The fr_var field holds the number of characters in the + fill pattern. The fr_subtype field holds the maximum number of + bytes to skip when aligning, or 0 if there is no maximum. */ + rs_align, + + /* Align code. The fr_offset field holds the power of 2 to which + to align. This type is only generated by machine specific + code, which is normally responsible for handling the fill + pattern. The fr_subtype field holds the maximum number of + bytes to skip when aligning, or 0 if there is no maximum. */ + rs_align_code, + + /* Test for alignment. Like rs_align, but used by several targets + to warn if data is not properly aligned. */ + rs_align_test, + + /* Org: Fr_offset, fr_symbol: address. 1 variable char: fill + character. */ + rs_org, + +#ifndef WORKING_DOT_WORD + /* JF: gunpoint */ + rs_broken_word, #endif -/* relax() */ + /* Machine specific relaxable (or similarly alterable) instruction. */ + rs_machine_dependent, -typedef enum _relax_state - { - /* Variable chars to be repeated fr_offset times. - Fr_symbol unused. Used with fr_offset == 0 for a - constant length frag. */ - rs_fill = 1, + /* .space directive with expression operand that needs to be computed + later. Similar to rs_org, but different. + fr_symbol: operand + 1 variable char: fill character */ + rs_space, - /* Align: Fr_offset: power of 2. 1 variable char: fill character. */ - rs_align, + /* A DWARF leb128 value; only ELF uses this. The subtype is 0 for + unsigned, 1 for signed. */ + rs_leb128, - /* Org: Fr_offset, fr_symbol: address. 1 variable char: fill - character. */ - rs_org, + /* Exception frame information which we may be able to optimize. */ + rs_cfa, - rs_machine_dependent + /* Cross-fragment dwarf2 line number optimization. */ + rs_dwarf2dbg +}; -#ifndef WORKING_DOT_WORD - /* JF: gunpoint */ - , rs_broken_word -#endif - } relax_stateT; +typedef enum _relax_state relax_stateT; -/* typedef unsigned char relax_substateT; */ -/* JF this is more likely to leave the end of a struct frag on an align - boundry. Be very careful with this. */ -typedef unsigned long relax_substateT; +/* This type is used in prototypes, so it can't be a type that will be + widened for argument passing. */ +typedef unsigned int relax_substateT; /* Enough bits for address, but still an integer type. Could be a problem, cross-assembling for 64-bit machines. */ typedef addressT relax_addressT; - -/* frags.c */ - -/* - * A code fragment (frag) is some known number of chars, followed by some - * unknown number of chars. Typically the unknown number of chars is an - * instruction address whose size is yet unknown. We always know the greatest - * possible size the unknown number of chars may become, and reserve that - * much room at the end of the frag. - * Once created, frags do not change address during assembly. - * We chain the frags in (a) forward-linked list(s). The object-file address - * of the 1st char of a frag is generally not known until after relax(). - * Many things at assembly time describe an address by {object-file-address - * of a particular frag}+offset. - - BUG: it may be smarter to have a single pointer off to various different - notes for different frag kinds. See how code pans - */ -struct frag +struct relax_type { - /* Object file address. */ - addressT fr_address; - /* Chain forward; ascending address order. Rooted in frch_root. */ - struct frag *fr_next; - - /* (Fixed) number of chars we know we have. May be 0. */ - offsetT fr_fix; - /* (Variable) number of chars after above. May be 0. */ - offsetT fr_var; - /* For variable-length tail. */ - struct symbol *fr_symbol; - /* For variable-length tail. */ - offsetT fr_offset; - /* Points to opcode low addr byte, for relaxation. */ - char *fr_opcode; - -#ifndef NO_LISTING - struct list_info_struct *line; -#endif - - /* What state is my tail in? */ - relax_stateT fr_type; - relax_substateT fr_subtype; - - /* These are needed only on the NS32K machines */ - char fr_pcrel_adjust; - char fr_bsr; - - /* Chars begin here. - One day we will compile fr_literal[0]. */ - char fr_literal[1]; + /* Forward reach. Signed number. > 0. */ + offsetT rlx_forward; + /* Backward reach. Signed number. < 0. */ + offsetT rlx_backward; + + /* Bytes length of this address. */ + unsigned char rlx_length; + + /* Next longer relax-state. 0 means there is no 'next' relax-state. */ + relax_substateT rlx_more; }; -#define SIZEOF_STRUCT_FRAG \ -((int)zero_address_frag.fr_literal-(int)&zero_address_frag) -/* We want to say fr_literal[0] above. */ +typedef struct relax_type relax_typeS; + +/* main program "as.c" (command arguments etc). */ + +COMMON unsigned char flag_no_comments; /* -f */ +COMMON unsigned char flag_debug; /* -D */ +COMMON unsigned char flag_signed_overflow_ok; /* -J */ +#ifndef WORKING_DOT_WORD +COMMON unsigned char flag_warn_displacement; /* -K */ +#endif -typedef struct frag fragS; +/* True if local symbols should be retained. */ +COMMON int flag_keep_locals; /* -L */ + +/* True if we are assembling in MRI mode. */ +COMMON int flag_mri; + +/* Should the data section be made read-only and appended to the text + section? */ +COMMON unsigned char flag_readonly_data_in_text; /* -R */ + +/* True if warnings should be inhibited. */ +COMMON int flag_no_warnings; /* -W */ + +/* True if warnings count as errors. */ +COMMON int flag_fatal_warnings; /* --fatal-warnings */ + +/* True if we should attempt to generate output even if non-fatal errors + are detected. */ +COMMON unsigned char flag_always_generate_output; /* -Z */ -/* Current frag we are building. This frag is incomplete. It is, however, - included in frchain_now. The fr_fix field is bogus; instead, use: - obstack_next_free(&frags)-frag_now->fr_literal. */ -COMMON fragS *frag_now; -#define frag_now_fix() ((char*)obstack_next_free (&frags) - frag_now->fr_literal) +/* This is true if the assembler should output time and space usage. */ +COMMON unsigned char flag_print_statistics; -/* For foreign-segment symbol fixups. */ -COMMON fragS zero_address_frag; -/* For local common (N_BSS segment) fixups. */ -COMMON fragS bss_address_frag; +/* True if local absolute symbols are to be stripped. */ +COMMON int flag_strip_local_absolute; -/* main program "as.c" (command arguments etc) */ +/* True if we should generate a traditional format object file. */ +COMMON int flag_traditional_format; -/* ['x'] TRUE if "-x" seen. */ -COMMON char flagseen[128]; -COMMON unsigned char flag_readonly_data_in_text; -COMMON unsigned char flag_suppress_warnings; -COMMON unsigned char flag_always_generate_output; +/* Type of compressed debug sections we should generate. */ +COMMON enum compressed_debug_section_type flag_compress_debug; + +/* TRUE if .note.GNU-stack section with SEC_CODE should be created */ +COMMON int flag_execstack; + +/* TRUE if .note.GNU-stack section with SEC_CODE should be created */ +COMMON int flag_noexecstack; /* name of emitted object file */ -COMMON char *out_file_name; +COMMON const char *out_file_name; + +/* name of file defining extensions to the basic instruction set */ +COMMON char *insttbl_file_name; -/* TRUE if we need a second pass. */ +/* TRUE if we need a second pass. */ COMMON int need_pass_2; /* TRUE if we should do no relaxing, and leave lots of padding. */ COMMON int linkrelax; +/* TRUE if we should produce a listing. */ +extern int listing; + +/* Type of debugging information we should generate. We currently support + stabs, ECOFF, and DWARF2. + + NOTE! This means debug information about the assembly source code itself + and _not_ about possible debug information from a high-level language. + This is especially relevant to DWARF2, since the compiler may emit line + number directives that the assembler resolves. */ + +enum debug_info_type +{ + DEBUG_UNSPECIFIED, + DEBUG_NONE, + DEBUG_STABS, + DEBUG_ECOFF, + DEBUG_DWARF, + DEBUG_DWARF2 +}; + +extern enum debug_info_type debug_type; +extern int use_gnu_debug_info_extensions; +COMMON bfd_boolean flag_dwarf_sections; + +/* Maximum level of macro nesting. */ +extern int max_macro_nest; + +/* Verbosity level. */ +extern int verbose; + +/* Obstack chunk size. Keep large for efficient space use, make small to + increase malloc calls for monitoring memory allocation. */ +extern int chunksize; + struct _pseudo_type - { - /* assembler mnemonic, lower case, no '.' */ - char *poc_name; - /* Do the work */ - void (*poc_handler) (); - /* Value to pass to handler */ - int poc_val; - }; +{ + /* assembler mnemonic, lower case, no '.' */ + const char *poc_name; + /* Do the work */ + void (*poc_handler) (int); + /* Value to pass to handler */ + int poc_val; +}; typedef struct _pseudo_type pseudo_typeS; -#ifdef BFD_ASSEMBLER_xxx -struct lineno_struct - { - alent line; - fragS *frag; - struct lineno_struct *next; - }; -typedef struct lineno_struct lineno; +#if (__GNUC__ >= 2) && !defined(VMS) +/* for use with -Wformat */ + +#if __GNUC__ == 2 && __GNUC_MINOR__ < 6 +/* Support for double underscores in attribute names was added in gcc + 2.6, so avoid them if we are using an earlier version. */ +#define __printf__ printf +#define __format__ format #endif -#if defined (__STDC__) && !defined(NO_STDARG) +#define PRINTF_LIKE(FCN) \ + void FCN (const char *format, ...) \ + __attribute__ ((__format__ (__printf__, 1, 2))) +#define PRINTF_WHERE_LIKE(FCN) \ + void FCN (const char *file, unsigned int line, const char *format, ...) \ + __attribute__ ((__format__ (__printf__, 3, 4))) -#if __GNUC__ >= 2 -/* for use with -Wformat */ -#define PRINTF_LIKE(FCN) void FCN (const char *Format, ...) \ - __attribute__ ((format (printf, 1, 2))) -#else /* ANSI C with stdarg, but not GNU C */ -#define PRINTF_LIKE(FCN) void FCN (const char *Format, ...) -#endif -#else /* not ANSI C, or not stdarg */ -#define PRINTF_LIKE(FCN) void FCN () -#endif +#else /* __GNUC__ < 2 || defined(VMS) */ + +#define PRINTF_LIKE(FCN) void FCN (const char *format, ...) +#define PRINTF_WHERE_LIKE(FCN) void FCN (const char *file, \ + unsigned int line, \ + const char *format, ...) + +#endif /* __GNUC__ < 2 || defined(VMS) */ PRINTF_LIKE (as_bad); -PRINTF_LIKE (as_fatal); +PRINTF_LIKE (as_fatal) ATTRIBUTE_NORETURN; PRINTF_LIKE (as_tsktsk); PRINTF_LIKE (as_warn); -void fprint_value PARAMS ((FILE *file, addressT value)); -void sprint_value PARAMS ((char *buf, addressT value)); - -int had_errors PARAMS ((void)); -int had_warnings PARAMS ((void)); - -char *app_push PARAMS ((void)); -char *atof_ieee PARAMS ((char *str, int what_kind, LITTLENUM_TYPE * words)); -char *input_scrub_include_file PARAMS ((char *filename, char *position)); -char *input_scrub_new_file PARAMS ((char *filename)); -char *input_scrub_next_buffer PARAMS ((char **bufp)); -#if 0 /* incompatible with solaris 2 native cc */ -char *strstr PARAMS ((const char *s, const char *wanted)); -#endif -char *xmalloc PARAMS ((long size)); -char *xrealloc PARAMS ((char *ptr, long n)); -int do_scrub_next_char PARAMS ((int (*get) (), void (*unget) ())); -int gen_to_words PARAMS ((LITTLENUM_TYPE * words, int precision, - long exponent_bits)); -int had_err PARAMS ((void)); -int had_errors PARAMS ((void)); -int had_warnings PARAMS ((void)); -int ignore_input PARAMS ((void)); -int scrub_from_file PARAMS ((void)); -int scrub_from_file PARAMS ((void)); -int scrub_from_string PARAMS ((void)); -int seen_at_least_1_file PARAMS ((void)); -void app_pop PARAMS ((char *arg)); -void as_howmuch PARAMS ((FILE * stream)); -void as_perror PARAMS ((char *gripe, char *filename)); -void as_where PARAMS ((void)); -void bump_line_counters PARAMS ((void)); -void do_scrub_begin PARAMS ((void)); -void input_scrub_begin PARAMS ((void)); -void input_scrub_close PARAMS ((void)); -void input_scrub_end PARAMS ((void)); -void int_to_gen PARAMS ((long x)); -void new_logical_line PARAMS ((char *fname, int line_number)); -void scrub_to_file PARAMS ((int ch)); -void scrub_to_string PARAMS ((int ch)); -void subsegs_begin PARAMS ((void)); -void subseg_change PARAMS ((segT seg, int subseg)); -#ifdef BFD_ASSEMBLER -segT subseg_new PARAMS ((const char *name, subsegT subseg)); -void subseg_set PARAMS ((segT seg, subsegT subseg)); -#else -void subseg_new PARAMS ((segT seg, subsegT subseg)); -#endif +PRINTF_WHERE_LIKE (as_bad_where); +PRINTF_WHERE_LIKE (as_warn_where); + +void as_assert (const char *, int, const char *); +void as_abort (const char *, int, const char *) ATTRIBUTE_NORETURN; +void sprint_value (char *, addressT); +int had_errors (void); +int had_warnings (void); +void as_warn_value_out_of_range (const char *, offsetT, offsetT, offsetT, + const char *, unsigned); +void as_bad_value_out_of_range (const char *, offsetT, offsetT, offsetT, + const char *, unsigned); +void print_version_id (void); +char * app_push (void); +char * atof_ieee (char *, int, LITTLENUM_TYPE *); +const char * ieee_md_atof (int, char *, int *, bfd_boolean); +const char * vax_md_atof (int, char *, int *); +char * input_scrub_include_file (const char *, char *); +void input_scrub_insert_line (const char *); +void input_scrub_insert_file (char *); +char * input_scrub_new_file (const char *); +char * input_scrub_next_buffer (char **bufp); +size_t do_scrub_chars (size_t (*get) (char *, size_t), char *, size_t); +int gen_to_words (LITTLENUM_TYPE *, int, long); +int had_err (void); +int ignore_input (void); +void cond_finish_check (int); +void cond_exit_macro (int); +int seen_at_least_1_file (void); +void app_pop (char *); +const char * as_where (unsigned int *); +void bump_line_counters (void); +void do_scrub_begin (int); +void input_scrub_begin (void); +void input_scrub_close (void); +void input_scrub_end (void); +int new_logical_line (const char *, int); +int new_logical_line_flags (const char *, int, int); +void subsegs_begin (void); +void subseg_change (segT, int); +segT subseg_new (const char *, subsegT); +segT subseg_force_new (const char *, subsegT); +void subseg_set (segT, subsegT); +int subseg_text_p (segT); +int seg_not_empty_p (segT); +void start_dependencies (char *); +void register_dependency (const char *); +void print_dependencies (void); +segT subseg_get (const char *, int); + +const char *remap_debug_filename (const char *); +void add_debug_prefix_map (const char *); + +static inline char * +xmemdup0 (const char *in, size_t len) +{ + char *out = (char *) xmalloc (len + 1); + out[len] = 0; + return (char *) memcpy (out, in, len); +} + +struct expressionS; +struct fix; +typedef struct symbol symbolS; +typedef struct frag fragS; -/* this one starts the chain of target dependant headers */ +/* literal.c */ +valueT add_to_literal_pool (symbolS *, valueT, segT, int); + +int check_eh_frame (struct expressionS *, unsigned int *); +int eh_frame_estimate_size_before_relax (fragS *); +int eh_frame_relax_frag (fragS *); +void eh_frame_convert_frag (fragS *); +int generic_force_reloc (struct fix *); + +#include "expr.h" /* Before targ-*.h */ + +/* This one starts the chain of target dependant headers. */ #include "targ-env.h" -#include "expr.h" -#include "struc-symbol.h" +#ifdef OBJ_MAYBE_ELF +#define IS_ELF (OUTPUT_FLAVOR == bfd_target_elf_flavour) +#else +#ifdef OBJ_ELF +#define IS_ELF 1 +#else +#define IS_ELF 0 +#endif +#endif + #include "write.h" #include "frags.h" #include "hash.h" @@ -475,22 +553,78 @@ void subseg_new PARAMS ((segT seg, subsegT subseg)); #include "tc.h" #include "obj.h" +#ifdef USE_EMULATIONS +#include "emul.h" +#endif #include "listing.h" -#ifdef BFD_ASSEMBLER -/* Someday perhaps this will be selectable at run-time. */ -#if defined (OBJ_AOUT) || defined (OBJ_BOUT) -#define OUTPUT_FLAVOR bfd_target_aout_flavour +#ifdef H_TICK_HEX +extern int enable_h_tick_hex; #endif -#ifdef OBJ_COFF -#define OUTPUT_FLAVOR bfd_target_coff_flavour + +#ifdef TC_M68K +/* True if we are assembling in m68k MRI mode. */ +COMMON int flag_m68k_mri; +#define DOLLAR_AMBIGU flag_m68k_mri +#else +#define flag_m68k_mri 0 #endif -#ifdef OBJ_ECOFF -#define OUTPUT_FLAVOR bfd_target_ecoff_flavour + +#ifdef WARN_COMMENTS +COMMON int warn_comment; +COMMON unsigned int found_comment; +COMMON const char * found_comment_file; #endif -#ifdef OBJ_ELF -#define OUTPUT_FLAVOR bfd_target_elf_flavour + +#if defined OBJ_ELF || defined OBJ_MAYBE_ELF +/* If .size directive failure should be error or warning. */ +COMMON int flag_allow_nonconst_size; + +/* If we should generate ELF common symbols with the STT_COMMON type. */ +extern int flag_use_elf_stt_common; + +/* If section name substitution sequences should be honored */ +COMMON int flag_sectname_subst; +#endif + +#ifndef DOLLAR_AMBIGU +#define DOLLAR_AMBIGU 0 +#endif + +#ifndef NUMBERS_WITH_SUFFIX +#define NUMBERS_WITH_SUFFIX 0 +#endif + +#ifndef LOCAL_LABELS_DOLLAR +#define LOCAL_LABELS_DOLLAR 0 +#endif + +#ifndef LOCAL_LABELS_FB +#define LOCAL_LABELS_FB 0 +#endif + +#ifndef LABELS_WITHOUT_COLONS +#define LABELS_WITHOUT_COLONS 0 +#endif + +#ifndef NO_PSEUDO_DOT +#define NO_PSEUDO_DOT 0 +#endif + +#ifndef TEXT_SECTION_NAME +#define TEXT_SECTION_NAME ".text" +#define DATA_SECTION_NAME ".data" +#define BSS_SECTION_NAME ".bss" +#endif + +#ifndef OCTETS_PER_BYTE_POWER +#define OCTETS_PER_BYTE_POWER 0 +#endif +#ifndef OCTETS_PER_BYTE +#define OCTETS_PER_BYTE (1<