Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* obj-aout.h, a.out object file format for gas, the assembler. |
4c63da97 | 2 | Copyright (C) 1989, 90, 91, 92, 93, 94, 95, 96, 98, 99, 2000 |
252b5132 RH |
3 | Free Software Foundation, Inc. |
4 | ||
5 | This file is part of GAS, the GNU Assembler. | |
6 | ||
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. | |
11 | ||
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. | |
16 | ||
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 | |
dcd619be | 20 | 02111-1307, USA. */ |
252b5132 RH |
21 | |
22 | /* Tag to validate a.out object file format processing */ | |
23 | #define OBJ_AOUT 1 | |
24 | ||
25 | #include "targ-cpu.h" | |
26 | ||
27 | #ifdef BFD_ASSEMBLER | |
28 | ||
29 | #include "bfd/libaout.h" | |
30 | ||
31 | #define OUTPUT_FLAVOR bfd_target_aout_flavour | |
32 | ||
33 | #else /* ! BFD_ASSEMBLER */ | |
34 | ||
35 | #ifndef VMS | |
dcd619be | 36 | #include "aout_gnu.h" /* Needed to define struct nlist. Sigh. */ |
252b5132 RH |
37 | #else |
38 | #include "a_out.h" | |
39 | #endif | |
40 | ||
41 | #ifndef AOUT_MACHTYPE | |
42 | #define AOUT_MACHTYPE 0 | |
43 | #endif /* AOUT_MACHTYPE */ | |
44 | ||
45 | extern const short seg_N_TYPE[]; | |
46 | extern const segT N_TYPE_seg[]; | |
47 | ||
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 */ | |
51 | ||
52 | #endif /* ! BFD_ASSEMBLER */ | |
53 | ||
4c63da97 AM |
54 | extern const pseudo_typeS aout_pseudo_table[]; |
55 | ||
56 | #ifndef obj_pop_insert | |
57 | #define obj_pop_insert() pop_insert (aout_pseudo_table) | |
58 | #endif | |
59 | ||
252b5132 RH |
60 | /* SYMBOL TABLE */ |
61 | /* Symbol table entry data type */ | |
62 | ||
63 | typedef struct nlist obj_symbol_type; /* Symbol table entry */ | |
64 | ||
65 | /* Symbol table macros and constants */ | |
66 | ||
67 | #ifdef BFD_ASSEMBLER | |
68 | ||
49309057 ILT |
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) | |
252b5132 RH |
81 | |
82 | asection *text_section, *data_section, *bss_section; | |
83 | ||
84 | #define obj_frob_symbol(S,PUNT) obj_aout_frob_symbol (S, &PUNT) | |
85 | #define obj_frob_file() obj_aout_frob_file () | |
49309057 | 86 | extern void obj_aout_frob_symbol PARAMS ((symbolS *, int *)); |
252b5132 RH |
87 | extern void obj_aout_frob_file PARAMS ((void)); |
88 | ||
89 | #define obj_sec_sym_ok_for_reloc(SEC) (1) | |
90 | ||
91 | #else | |
92 | ||
93 | /* We use the sy_obj field to record whether a symbol is weak. */ | |
94 | #define OBJ_SYMFIELD_TYPE char | |
95 | ||
96 | /* | |
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. | |
100 | */ | |
101 | ||
102 | /* True if the symbol is external */ | |
103 | #define S_IS_EXTERNAL(s) ((s)->sy_symbol.n_type & N_EXT) | |
104 | ||
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) | |
108 | ||
109 | #define S_IS_COMMON(s) \ | |
110 | (S_GET_TYPE (s) == N_UNDF && S_GET_VALUE (s) != 0) | |
111 | ||
112 | #define S_IS_REGISTER(s) ((s)->sy_symbol.n_type == N_REGISTER) | |
113 | ||
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) \ | |
118 | ((S_GET_NAME (s) \ | |
119 | && !S_IS_DEBUG (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) | |
130 | ||
131 | /* Accessors */ | |
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) | |
146 | ||
147 | /* Modifiers */ | |
148 | /* Assume that a symbol cannot be simultaneously in more than on segment */ | |
149 | /* set 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) | |
168 | ||
169 | /* File header macro and type definition */ | |
170 | ||
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)) | |
178 | ||
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) | |
189 | ||
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) | |
194 | ||
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)))) | |
199 | ||
200 | #define H_SET_VERSION(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \ | |
201 | | ((v) << 24) \ | |
202 | | (H_GET_MACHTYPE(h) << 16) \ | |
203 | | (H_GET_MAGIC_NUMBER(h)))) | |
204 | ||
205 | #define H_SET_MACHTYPE(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \ | |
206 | | (H_GET_VERSION(h) << 24) \ | |
207 | | ((v) << 16) \ | |
208 | | (H_GET_MAGIC_NUMBER(h)))) | |
209 | ||
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) \ | |
213 | | ((v)))) | |
214 | ||
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))) | |
218 | ||
219 | #define H_SET_RELOCATION_SIZE(h,t,d) (H_SET_TEXT_RELOCATION_SIZE((h),(t)),\ | |
220 | H_SET_DATA_RELOCATION_SIZE((h),(d))) | |
221 | ||
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) | |
225 | ||
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)) | |
228 | ||
229 | typedef struct | |
230 | { | |
231 | struct exec header; /* a.out header */ | |
814f6641 | 232 | long string_table_size; /* names + '\0' + sizeof (int) */ |
252b5132 RH |
233 | } |
234 | ||
235 | object_headers; | |
236 | ||
dcd619be | 237 | /* line numbering stuff. */ |
252b5132 RH |
238 | #define OBJ_EMIT_LINENO(a, b, c) {;} |
239 | ||
240 | struct fix; | |
241 | void tc_aout_fix_to_chars PARAMS ((char *where, struct fix *fixP, relax_addressT segment_address)); | |
242 | ||
243 | #endif | |
244 | ||
4c63da97 | 245 | #define obj_read_begin_hook() {;} |
252b5132 RH |
246 | #define obj_symbol_new_hook(s) {;} |
247 | ||
248 | #define EMIT_SECTION_SYMBOLS 0 | |
249 | ||
250 | #define AOUT_STABS |