1 /* obj-aout.h, a.out object file format for gas, the assembler.
2 Copyright (C) 1989, 90, 91, 92, 93, 94, 95, 96, 98, 99, 2000
3 Free Software Foundation, Inc.
5 This file is part of GAS, the GNU Assembler.
7 GAS is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as
9 published by the Free Software Foundation; either version 2,
10 or (at your option) any later version.
12 GAS is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
15 the GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GAS; see the file COPYING. If not, write to the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
22 /* Tag to validate a.out object file format processing */
29 #include "bfd/libaout.h"
31 #define OUTPUT_FLAVOR bfd_target_aout_flavour
33 #else /* ! BFD_ASSEMBLER */
36 #include "aout_gnu.h" /* Needed to define struct nlist. Sigh. */
42 #define AOUT_MACHTYPE 0
43 #endif /* AOUT_MACHTYPE */
45 extern const short seg_N_TYPE
[];
46 extern const segT N_TYPE_seg
[];
48 #ifndef DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE
49 #define DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE (OMAGIC)
50 #endif /* DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE */
52 #endif /* ! BFD_ASSEMBLER */
54 extern const pseudo_typeS aout_pseudo_table
[];
56 #ifndef obj_pop_insert
57 #define obj_pop_insert() pop_insert (aout_pseudo_table)
61 /* Symbol table entry data type */
63 typedef struct nlist obj_symbol_type
; /* Symbol table entry */
65 /* Symbol table macros and constants */
69 #define S_SET_OTHER(S,V) \
70 (aout_symbol (symbol_get_bfdsym (S))->other = (V))
71 #define S_SET_TYPE(S,T) \
72 (aout_symbol (symbol_get_bfdsym (S))->type = (T))
73 #define S_SET_DESC(S,D) \
74 (aout_symbol (symbol_get_bfdsym (S))->desc = (D))
75 #define S_GET_OTHER(S) \
76 (aout_symbol (symbol_get_bfdsym (S))->other)
77 #define S_GET_TYPE(S) \
78 (aout_symbol (symbol_get_bfdsym (S))->type)
79 #define S_GET_DESC(S) \
80 (aout_symbol (symbol_get_bfdsym (S))->desc)
82 asection
*text_section
, *data_section
, *bss_section
;
84 #define obj_frob_symbol(S,PUNT) obj_aout_frob_symbol (S, &PUNT)
85 #define obj_frob_file() obj_aout_frob_file ()
86 extern void obj_aout_frob_symbol
PARAMS ((symbolS
*, int *));
87 extern void obj_aout_frob_file
PARAMS ((void));
89 #define obj_sec_sym_ok_for_reloc(SEC) (1)
93 /* We use the sy_obj field to record whether a symbol is weak. */
94 #define OBJ_SYMFIELD_TYPE char
97 * Macros to extract information from a symbol table entry.
98 * This syntaxic indirection allows independence regarding a.out or coff.
99 * The argument (s) of all these macros is a pointer to a symbol table entry.
102 /* True if the symbol is external */
103 #define S_IS_EXTERNAL(s) ((s)->sy_symbol.n_type & N_EXT)
105 /* True if symbol has been defined, ie is in N_{TEXT,DATA,BSS,ABS} or N_EXT */
106 #define S_IS_DEFINED(s) \
107 (S_GET_TYPE (s) != N_UNDF || S_GET_DESC (s) != 0)
109 #define S_IS_COMMON(s) \
110 (S_GET_TYPE (s) == N_UNDF && S_GET_VALUE (s) != 0)
112 #define S_IS_REGISTER(s) ((s)->sy_symbol.n_type == N_REGISTER)
114 /* True if a debug special symbol entry */
115 #define S_IS_DEBUG(s) ((s)->sy_symbol.n_type & N_STAB)
116 /* True if a symbol is local symbol name */
117 #define S_IS_LOCAL(s) \
120 && (strchr (S_GET_NAME (s), '\001') != NULL \
121 || strchr (S_GET_NAME (s), '\002') != NULL \
122 || (S_LOCAL_NAME(s) && !flag_keep_locals))) \
123 || (flag_strip_local_absolute \
124 && ! S_IS_EXTERNAL(s) \
125 && S_GET_SEGMENT (s) == absolute_section))
126 /* True if a symbol is not defined in this file */
127 #define S_IS_EXTERN(s) ((s)->sy_symbol.n_type & N_EXT)
128 /* True if the symbol has been generated because of a .stabd directive */
129 #define S_IS_STABD(s) (S_GET_NAME(s) == (char *)0)
132 /* The name of the symbol */
133 #define S_GET_NAME(s) ((s)->sy_symbol.n_un.n_name)
134 /* The pointer to the string table */
135 #define S_GET_OFFSET(s) ((s)->sy_symbol.n_un.n_strx)
136 /* The type of the symbol */
137 #define S_GET_TYPE(s) ((s)->sy_symbol.n_type & N_TYPE)
138 /* The numeric value of the segment */
139 #define S_GET_SEGMENT(s) (N_TYPE_seg[S_GET_TYPE(s)])
140 /* The n_other expression value */
141 #define S_GET_OTHER(s) ((s)->sy_symbol.n_other)
142 /* The n_desc expression value */
143 #define S_GET_DESC(s) ((s)->sy_symbol.n_desc)
144 /* Whether the symbol is weak. */
145 #define S_GET_WEAK(s) ((s)->sy_obj)
148 /* Assume that a symbol cannot be simultaneously in more than on segment */
150 #define S_SET_SEGMENT(s,seg) ((s)->sy_symbol.n_type &= ~N_TYPE,(s)->sy_symbol.n_type|=SEGMENT_TO_SYMBOL_TYPE(seg))
151 /* The symbol is external */
152 #define S_SET_EXTERNAL(s) ((s)->sy_symbol.n_type |= N_EXT)
153 /* The symbol is not external */
154 #define S_CLEAR_EXTERNAL(s) ((s)->sy_symbol.n_type &= ~N_EXT)
155 /* Set the name of the symbol */
156 #define S_SET_NAME(s,v) ((s)->sy_symbol.n_un.n_name = (v))
157 /* Set the offset in the string table */
158 #define S_SET_OFFSET(s,v) ((s)->sy_symbol.n_un.n_strx = (v))
159 /* Set the n_type field */
160 #define S_SET_TYPE(s,t) ((s)->sy_symbol.n_type = (t))
161 /* Set the n_other expression value */
162 #define S_SET_OTHER(s,v) ((s)->sy_symbol.n_other = (v))
163 /* Set the n_desc expression value */
164 #define S_SET_DESC(s,v) ((s)->sy_symbol.n_desc = (v))
165 /* Mark the symbol as weak. This causes n_type to be adjusted when
166 the symbol is written out. */
167 #define S_SET_WEAK(s) ((s)->sy_obj = 1)
169 /* File header macro and type definition */
171 #define H_GET_FILE_SIZE(h) (H_GET_HEADER_SIZE(h) \
172 + H_GET_TEXT_SIZE(h) \
173 + H_GET_DATA_SIZE(h) \
174 + H_GET_SYMBOL_TABLE_SIZE(h) \
175 + H_GET_TEXT_RELOCATION_SIZE(h) \
176 + H_GET_DATA_RELOCATION_SIZE(h) \
177 + H_GET_STRING_SIZE(h))
179 #define H_GET_HEADER_SIZE(h) (EXEC_BYTES_SIZE)
180 #define H_GET_TEXT_SIZE(h) ((h)->header.a_text)
181 #define H_GET_DATA_SIZE(h) ((h)->header.a_data)
182 #define H_GET_BSS_SIZE(h) ((h)->header.a_bss)
183 #define H_GET_TEXT_RELOCATION_SIZE(h) ((h)->header.a_trsize)
184 #define H_GET_DATA_RELOCATION_SIZE(h) ((h)->header.a_drsize)
185 #define H_GET_SYMBOL_TABLE_SIZE(h) ((h)->header.a_syms)
186 #define H_GET_ENTRY_POINT(h) ((h)->header.a_entry)
187 #define H_GET_STRING_SIZE(h) ((h)->string_table_size)
188 #define H_GET_LINENO_SIZE(h) (0)
190 #define H_GET_DYNAMIC(h) ((h)->header.a_info >> 31)
191 #define H_GET_VERSION(h) (((h)->header.a_info >> 24) & 0x7f)
192 #define H_GET_MACHTYPE(h) (((h)->header.a_info >> 16) & 0xff)
193 #define H_GET_MAGIC_NUMBER(h) ((h)->header.a_info & 0xffff)
195 #define H_SET_DYNAMIC(h,v) ((h)->header.a_info = (((v) << 31) \
196 | (H_GET_VERSION(h) << 24) \
197 | (H_GET_MACHTYPE(h) << 16) \
198 | (H_GET_MAGIC_NUMBER(h))))
200 #define H_SET_VERSION(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
202 | (H_GET_MACHTYPE(h) << 16) \
203 | (H_GET_MAGIC_NUMBER(h))))
205 #define H_SET_MACHTYPE(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
206 | (H_GET_VERSION(h) << 24) \
208 | (H_GET_MAGIC_NUMBER(h))))
210 #define H_SET_MAGIC_NUMBER(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
211 | (H_GET_VERSION(h) << 24) \
212 | (H_GET_MACHTYPE(h) << 16) \
215 #define H_SET_TEXT_SIZE(h,v) ((h)->header.a_text = md_section_align(SEG_TEXT, (v)))
216 #define H_SET_DATA_SIZE(h,v) ((h)->header.a_data = md_section_align(SEG_DATA, (v)))
217 #define H_SET_BSS_SIZE(h,v) ((h)->header.a_bss = md_section_align(SEG_BSS, (v)))
219 #define H_SET_RELOCATION_SIZE(h,t,d) (H_SET_TEXT_RELOCATION_SIZE((h),(t)),\
220 H_SET_DATA_RELOCATION_SIZE((h),(d)))
222 #define H_SET_TEXT_RELOCATION_SIZE(h,v) ((h)->header.a_trsize = (v))
223 #define H_SET_DATA_RELOCATION_SIZE(h,v) ((h)->header.a_drsize = (v))
224 #define H_SET_SYMBOL_TABLE_SIZE(h,v) ((h)->header.a_syms = (v) * 12)
226 #define H_SET_ENTRY_POINT(h,v) ((h)->header.a_entry = (v))
227 #define H_SET_STRING_SIZE(h,v) ((h)->string_table_size = (v))
231 struct exec header
; /* a.out header */
232 long string_table_size
; /* names + '\0' + sizeof(int) */
237 /* line numbering stuff. */
238 #define OBJ_EMIT_LINENO(a, b, c) {;}
241 void tc_aout_fix_to_chars
PARAMS ((char *where
, struct fix
*fixP
, relax_addressT segment_address
));
245 #define obj_read_begin_hook() {;}
246 #define obj_symbol_new_hook(s) {;}
248 #define EMIT_SECTION_SYMBOLS 0
252 /* end of obj-aout.h */