1 | /* obj-aout.h, a.out object file format for gas, the assembler.
|
---|
2 | Copyright 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1998, 2000,
|
---|
3 | 2002, 2003 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
|
---|
20 | 02111-1307, USA. */
|
---|
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
|
---|
36 | #include "aout_gnu.h" /* Needed to define struct nlist. Sigh. */
|
---|
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 |
|
---|
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 |
|
---|
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 |
|
---|
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)
|
---|
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_before_fix() obj_aout_frob_file_before_fix ()
|
---|
86 | extern void obj_aout_frob_symbol PARAMS ((symbolS *, int *));
|
---|
87 | extern void obj_aout_frob_file_before_fix 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 | /* Return true for symbols that should not be reduced to section
|
---|
113 | symbols or eliminated from expressions, because they may be
|
---|
114 | overridden by the linker. */
|
---|
115 | #define S_FORCE_RELOC(s, strict) \
|
---|
116 | (!SEG_NORMAL (S_GET_SEGMENT (s)))
|
---|
117 |
|
---|
118 | #define S_IS_REGISTER(s) ((s)->sy_symbol.n_type == N_REGISTER)
|
---|
119 |
|
---|
120 | /* True if a debug special symbol entry */
|
---|
121 | #define S_IS_DEBUG(s) ((s)->sy_symbol.n_type & N_STAB)
|
---|
122 | /* True if a symbol is local symbol name */
|
---|
123 | #define S_IS_LOCAL(s) \
|
---|
124 | ((S_GET_NAME (s) \
|
---|
125 | && !S_IS_DEBUG (s) \
|
---|
126 | && (strchr (S_GET_NAME (s), '\001') != NULL \
|
---|
127 | || strchr (S_GET_NAME (s), '\002') != NULL \
|
---|
128 | || (S_LOCAL_NAME(s) && !flag_keep_locals))) \
|
---|
129 | || (flag_strip_local_absolute \
|
---|
130 | && ! S_IS_EXTERNAL(s) \
|
---|
131 | && S_GET_SEGMENT (s) == absolute_section))
|
---|
132 | /* True if a symbol is not defined in this file */
|
---|
133 | #define S_IS_EXTERN(s) ((s)->sy_symbol.n_type & N_EXT)
|
---|
134 | /* True if the symbol has been generated because of a .stabd directive */
|
---|
135 | #define S_IS_STABD(s) (S_GET_NAME(s) == (char *)0)
|
---|
136 |
|
---|
137 | /* Accessors */
|
---|
138 | /* The name of the symbol */
|
---|
139 | #define S_GET_NAME(s) ((s)->sy_symbol.n_un.n_name)
|
---|
140 | /* The pointer to the string table */
|
---|
141 | #define S_GET_OFFSET(s) ((s)->sy_symbol.n_un.n_strx)
|
---|
142 | /* The type of the symbol */
|
---|
143 | #define S_GET_TYPE(s) ((s)->sy_symbol.n_type & N_TYPE)
|
---|
144 | /* The numeric value of the segment */
|
---|
145 | #define S_GET_SEGMENT(s) (N_TYPE_seg[S_GET_TYPE(s)])
|
---|
146 | /* The n_other expression value */
|
---|
147 | #define S_GET_OTHER(s) ((s)->sy_symbol.n_other)
|
---|
148 | /* The n_desc expression value */
|
---|
149 | #define S_GET_DESC(s) ((s)->sy_symbol.n_desc)
|
---|
150 | /* Whether the symbol is weak. */
|
---|
151 | #define S_GET_WEAK(s) ((s)->sy_obj)
|
---|
152 |
|
---|
153 | /* Modifiers */
|
---|
154 | /* Assume that a symbol cannot be simultaneously in more than on segment */
|
---|
155 | /* set segment */
|
---|
156 | #define S_SET_SEGMENT(s,seg) ((s)->sy_symbol.n_type &= ~N_TYPE,(s)->sy_symbol.n_type|=SEGMENT_TO_SYMBOL_TYPE(seg))
|
---|
157 | /* The symbol is external */
|
---|
158 | #define S_SET_EXTERNAL(s) ((s)->sy_symbol.n_type |= N_EXT)
|
---|
159 | /* The symbol is not external */
|
---|
160 | #define S_CLEAR_EXTERNAL(s) ((s)->sy_symbol.n_type &= ~N_EXT)
|
---|
161 | /* Set the name of the symbol */
|
---|
162 | #define S_SET_NAME(s,v) ((s)->sy_symbol.n_un.n_name = (v))
|
---|
163 | /* Set the offset in the string table */
|
---|
164 | #define S_SET_OFFSET(s,v) ((s)->sy_symbol.n_un.n_strx = (v))
|
---|
165 | /* Set the n_type field */
|
---|
166 | #define S_SET_TYPE(s,t) ((s)->sy_symbol.n_type = (t))
|
---|
167 | /* Set the n_other expression value */
|
---|
168 | #define S_SET_OTHER(s,v) ((s)->sy_symbol.n_other = (v))
|
---|
169 | /* Set the n_desc expression value */
|
---|
170 | #define S_SET_DESC(s,v) ((s)->sy_symbol.n_desc = (v))
|
---|
171 | /* Mark the symbol as weak. This causes n_type to be adjusted when
|
---|
172 | the symbol is written out. */
|
---|
173 | #define S_SET_WEAK(s) ((s)->sy_obj = 1)
|
---|
174 |
|
---|
175 | /* File header macro and type definition */
|
---|
176 |
|
---|
177 | #define H_GET_FILE_SIZE(h) (H_GET_HEADER_SIZE(h) \
|
---|
178 | + H_GET_TEXT_SIZE(h) \
|
---|
179 | + H_GET_DATA_SIZE(h) \
|
---|
180 | + H_GET_SYMBOL_TABLE_SIZE(h) \
|
---|
181 | + H_GET_TEXT_RELOCATION_SIZE(h) \
|
---|
182 | + H_GET_DATA_RELOCATION_SIZE(h) \
|
---|
183 | + H_GET_STRING_SIZE(h))
|
---|
184 |
|
---|
185 | #define H_GET_HEADER_SIZE(h) (EXEC_BYTES_SIZE)
|
---|
186 | #define H_GET_TEXT_SIZE(h) ((h)->header.a_text)
|
---|
187 | #define H_GET_DATA_SIZE(h) ((h)->header.a_data)
|
---|
188 | #define H_GET_BSS_SIZE(h) ((h)->header.a_bss)
|
---|
189 | #define H_GET_TEXT_RELOCATION_SIZE(h) ((h)->header.a_trsize)
|
---|
190 | #define H_GET_DATA_RELOCATION_SIZE(h) ((h)->header.a_drsize)
|
---|
191 | #define H_GET_SYMBOL_TABLE_SIZE(h) ((h)->header.a_syms)
|
---|
192 | #define H_GET_ENTRY_POINT(h) ((h)->header.a_entry)
|
---|
193 | #define H_GET_STRING_SIZE(h) ((h)->string_table_size)
|
---|
194 | #define H_GET_LINENO_SIZE(h) (0)
|
---|
195 |
|
---|
196 | #define H_GET_DYNAMIC(h) ((h)->header.a_info >> 31)
|
---|
197 | #define H_GET_VERSION(h) (((h)->header.a_info >> 24) & 0x7f)
|
---|
198 | #define H_GET_MACHTYPE(h) (((h)->header.a_info >> 16) & 0xff)
|
---|
199 | #define H_GET_MAGIC_NUMBER(h) ((h)->header.a_info & 0xffff)
|
---|
200 |
|
---|
201 | #define H_SET_DYNAMIC(h,v) ((h)->header.a_info = (((v) << 31) \
|
---|
202 | | (H_GET_VERSION(h) << 24) \
|
---|
203 | | (H_GET_MACHTYPE(h) << 16) \
|
---|
204 | | (H_GET_MAGIC_NUMBER(h))))
|
---|
205 |
|
---|
206 | #define H_SET_VERSION(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
|
---|
207 | | ((v) << 24) \
|
---|
208 | | (H_GET_MACHTYPE(h) << 16) \
|
---|
209 | | (H_GET_MAGIC_NUMBER(h))))
|
---|
210 |
|
---|
211 | #define H_SET_MACHTYPE(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
|
---|
212 | | (H_GET_VERSION(h) << 24) \
|
---|
213 | | ((v) << 16) \
|
---|
214 | | (H_GET_MAGIC_NUMBER(h))))
|
---|
215 |
|
---|
216 | #define H_SET_MAGIC_NUMBER(h,v) ((h)->header.a_info = ((H_GET_DYNAMIC(h) << 31) \
|
---|
217 | | (H_GET_VERSION(h) << 24) \
|
---|
218 | | (H_GET_MACHTYPE(h) << 16) \
|
---|
219 | | ((v))))
|
---|
220 |
|
---|
221 | #define H_SET_TEXT_SIZE(h,v) ((h)->header.a_text = md_section_align(SEG_TEXT, (v)))
|
---|
222 | #define H_SET_DATA_SIZE(h,v) ((h)->header.a_data = md_section_align(SEG_DATA, (v)))
|
---|
223 | #define H_SET_BSS_SIZE(h,v) ((h)->header.a_bss = md_section_align(SEG_BSS, (v)))
|
---|
224 |
|
---|
225 | #define H_SET_RELOCATION_SIZE(h,t,d) (H_SET_TEXT_RELOCATION_SIZE((h),(t)),\
|
---|
226 | H_SET_DATA_RELOCATION_SIZE((h),(d)))
|
---|
227 |
|
---|
228 | #define H_SET_TEXT_RELOCATION_SIZE(h,v) ((h)->header.a_trsize = (v))
|
---|
229 | #define H_SET_DATA_RELOCATION_SIZE(h,v) ((h)->header.a_drsize = (v))
|
---|
230 | #define H_SET_SYMBOL_TABLE_SIZE(h,v) ((h)->header.a_syms = (v) * 12)
|
---|
231 |
|
---|
232 | #define H_SET_ENTRY_POINT(h,v) ((h)->header.a_entry = (v))
|
---|
233 | #define H_SET_STRING_SIZE(h,v) ((h)->string_table_size = (v))
|
---|
234 |
|
---|
235 | typedef struct
|
---|
236 | {
|
---|
237 | struct exec header; /* a.out header */
|
---|
238 | long string_table_size; /* names + '\0' + sizeof (int) */
|
---|
239 | }
|
---|
240 |
|
---|
241 | object_headers;
|
---|
242 |
|
---|
243 | /* line numbering stuff. */
|
---|
244 | #define OBJ_EMIT_LINENO(a, b, c) {;}
|
---|
245 |
|
---|
246 | struct fix;
|
---|
247 | void tc_aout_fix_to_chars PARAMS ((char *where, struct fix *fixP, relax_addressT segment_address));
|
---|
248 |
|
---|
249 | #endif
|
---|
250 |
|
---|
251 | #define obj_read_begin_hook() {;}
|
---|
252 | #define obj_symbol_new_hook(s) {;}
|
---|
253 |
|
---|
254 | #define EMIT_SECTION_SYMBOLS 0
|
---|
255 |
|
---|
256 | #define AOUT_STABS
|
---|