1 /* coff object file format
2 Copyright (C) 1989-2021 Free Software Foundation, Inc.
4 This file is part of GAS.
6 GAS is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3, or (at your option)
11 GAS is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GAS; see the file COPYING. If not, write to the Free
18 Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
28 /* This internal_lineno crap is to stop namespace pollution from the
29 bfd internal coff headerfile. */
30 #define internal_lineno bfd_internal_lineno
31 #include "coff/internal.h"
32 #undef internal_lineno
34 /* CPU-specific setup: */
39 #define TARGET_FORMAT "coff-arm"
44 #include "coff/rs6000.h"
49 #include "coff/x86_64.h"
51 #include "coff/i386.h"
56 #define TARGET_FORMAT "coff-x86-64"
58 #define TARGET_FORMAT "coff-i386"
65 #define TARGET_FORMAT "coff-z80"
70 #define TARGET_FORMAT "coff-z8k"
82 #define TARGET_FORMAT "pe-shl"
85 #define TARGET_FORMAT \
87 ? (sh_small ? "coff-shl-small" : "coff-shl") \
88 : (sh_small ? "coff-sh-small" : "coff-sh"))
94 #include "coff/tic30.h"
95 #define TARGET_FORMAT "coff-tic30"
99 #include "coff/tic4x.h"
100 #define TARGET_FORMAT "coff2-tic4x"
104 #include "coff/tic54x.h"
105 #define TARGET_FORMAT "coff1-c54x"
109 #include "coff/mcore.h"
110 #ifndef TARGET_FORMAT
111 #define TARGET_FORMAT "pe-mcore"
116 #define obj_set_weak_hook pecoff_obj_set_weak_hook
117 #define obj_clear_weak_hook pecoff_obj_clear_weak_hook
120 #ifndef OBJ_COFF_MAX_AUXENTRIES
121 #define OBJ_COFF_MAX_AUXENTRIES 1
124 #define obj_symbol_new_hook coff_obj_symbol_new_hook
125 #define obj_symbol_clone_hook coff_obj_symbol_clone_hook
126 #define obj_read_begin_hook coff_obj_read_begin_hook
128 #include "bfd/libcoff.h"
130 #define OUTPUT_FLAVOR bfd_target_coff_flavour
132 /* Alter the field names, for now, until we've fixed up the other
133 references to use the new name. */
134 #define OBJ_SYMFIELD_TYPE unsigned long
135 #define sy_obj sy_obj_flags
137 /* We can't use the predefined section symbols in bfd/section.c, as
138 COFF symbols have extra fields. See bfd/libcoff.h:coff_symbol_type. */
139 #ifndef obj_sec_sym_ok_for_reloc
140 #define obj_sec_sym_ok_for_reloc(SEC) ((SEC)->owner != 0)
143 #define SYM_AUXENT(S) \
144 (&coffsymbol (symbol_get_bfdsym (S))->native[1].u.auxent)
145 #define SYM_AUXINFO(S) \
146 (&coffsymbol (symbol_get_bfdsym (S))->native[1])
148 /* The number of auxiliary entries. */
149 #define S_GET_NUMBER_AUXILIARY(s) \
150 (coffsymbol (symbol_get_bfdsym (s))->native->u.syment.n_numaux)
151 /* The number of auxiliary entries. */
152 #define S_SET_NUMBER_AUXILIARY(s, v) (S_GET_NUMBER_AUXILIARY (s) = (v))
154 /* True if a symbol name is in the string table, i.e. its length is > 8. */
155 #define S_IS_STRING(s) (strlen (S_GET_NAME (s)) > 8 ? 1 : 0)
157 /* Auxiliary entry macros. SA_ stands for symbol auxiliary. */
158 /* Omit the tv related fields. */
161 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
162 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
163 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
164 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
165 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
166 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
167 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
168 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
169 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
170 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
171 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
173 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno = (v))
174 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size = (v))
175 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize = (v))
176 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr = (v))
177 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)] = (v))
178 #define SA_SET_FILE_FNAME(s,v) strncpy (SYM_AUXENT (s)->x_file.x_fname, (v), FILNMLEN)
179 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen = (v))
180 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc = (v))
181 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno = (v))
184 #define SA_GET_SECT_SCNLEN(s) (SYM_AUXENT (s)->x_sect.x_scnlen)
185 #define SA_GET_SECT_NRELOC(s) (SYM_AUXENT (s)->x_sect.x_nreloc)
186 #define SA_SET_SECT_SCNLEN(s,v) (SYM_AUXENT (s)->x_sect.x_scnlen = (v))
187 #define SA_SET_SECT_NRELOC(s,v) (SYM_AUXENT (s)->x_sect.x_nreloc = (v))
190 /* Internal use only definitions. SF_ stands for symbol flags.
192 These values can be assigned to sy_symbol.ost_flags field of a symbolS. */
194 #define SF_NORMAL_MASK 0x0000ffff /* bits 12-15 are general purpose. */
196 #define SF_STATICS 0x00001000 /* Mark the .text & all symbols. */
197 #define SF_DEFINED 0x00002000 /* Symbol is defined in this file. */
198 #define SF_STRING 0x00004000 /* Symbol name length > 8. */
199 #define SF_LOCAL 0x00008000 /* Symbol must not be emitted. */
201 #define SF_DEBUG_MASK 0xffff0000 /* bits 16-31 are debug info. */
203 #define SF_FUNCTION 0x00010000 /* The symbol is a function. */
204 #define SF_PROCESS 0x00020000 /* Process symbol before write. */
205 #define SF_TAGGED 0x00040000 /* Is associated with a tag. */
206 #define SF_TAG 0x00080000 /* Is a tag. */
207 #define SF_DEBUG 0x00100000 /* Is in debug or abs section. */
208 #define SF_GET_SEGMENT 0x00200000 /* Get the section of the forward symbol. */
209 /* All other bits are unused. */
212 #define SF_GET(s) (* symbol_get_obj (s))
213 #define SF_GET_DEBUG(s) (symbol_get_bfdsym (s)->flags & BSF_DEBUGGING)
214 #define SF_SET_DEBUG(s) (symbol_get_bfdsym (s)->flags |= BSF_DEBUGGING)
215 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
216 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
217 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
218 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
219 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
220 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
221 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
222 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
223 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
224 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
225 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
226 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
229 #define SF_SET(s,v) (SF_GET (s) = (v))
230 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
231 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
232 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
233 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
234 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
235 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
236 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
237 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
238 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
239 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
240 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
241 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
242 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
245 /* Line number handling. */
246 extern int text_lineno_number
;
247 extern int coff_line_base
;
248 extern int coff_n_line_nos
;
249 extern symbolS
*coff_last_function
;
251 #define obj_emit_lineno(WHERE, LINE, FILE_START) abort ()
252 #define obj_app_file(name, app) c_dot_file_symbol (name, app)
253 #define obj_frob_symbol(S,P) coff_frob_symbol (S, & P)
254 #define obj_frob_section(S) coff_frob_section (S)
255 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
256 #ifndef obj_adjust_symtab
257 #define obj_adjust_symtab() coff_adjust_symtab ()
260 /* Forward the segment of a forwarded symbol, handle assignments that
261 just copy symbol values, etc. */
262 #ifndef OBJ_COPY_SYMBOL_ATTRIBUTES
264 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
265 (SF_GET_GET_SEGMENT (dest) \
266 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
269 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
270 (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
271 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
278 extern const pseudo_typeS coff_pseudo_table
[];
280 #ifndef obj_pop_insert
281 #define obj_pop_insert() pop_insert (coff_pseudo_table)
284 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
285 to redefine the symbol later on. This can happen if C symbols use
286 a prefix, and a symbol is defined both with and without the prefix,
287 as in start/_start/__start in gcc/libgcc1-test.c. */
288 #define RESOLVE_SYMBOL_REDEFINITION(sym) \
289 (SF_GET_GET_SEGMENT (sym) \
290 ? (sym->frag = frag_now, \
291 S_SET_VALUE (sym, frag_now_fix ()), \
292 S_SET_SEGMENT (sym, now_seg), \
296 /* Stabs in a coff file go into their own section. */
297 #define SEPARATE_STAB_SECTIONS 1
299 /* We need 12 bytes at the start of the section to hold some initial
301 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
303 /* Store the number of relocations in the section aux entry. */
305 #define SET_SECTION_RELOCS(sec, relocs, n) \
307 symbolS * sectSym = section_symbol (sec); \
308 if (S_GET_STORAGE_CLASS (sectSym) == C_DWARF) \
309 SA_SET_SECT_NRELOC (sectSym, n); \
311 SA_SET_SCN_NRELOC (sectSym, n); \
314 #define SET_SECTION_RELOCS(sec, relocs, n) \
315 SA_SET_SCN_NRELOC (section_symbol (sec), n)
318 #define obj_app_file(name, app) c_dot_file_symbol (name, app)
320 extern int S_SET_DATA_TYPE (symbolS
*, int);
321 extern int S_SET_STORAGE_CLASS (symbolS
*, int);
322 extern int S_GET_STORAGE_CLASS (symbolS
*);
323 extern void SA_SET_SYM_ENDNDX (symbolS
*, symbolS
*);
324 extern void coff_add_linesym (symbolS
*);
325 extern void c_dot_file_symbol (const char *, int);
326 extern void coff_frob_symbol (symbolS
*, int *);
327 extern void coff_adjust_symtab (void);
328 extern void coff_frob_section (segT
);
329 extern void coff_adjust_section_syms (bfd
*, asection
*, void *);
330 extern void coff_frob_file_after_relocs (void);
331 extern void coff_obj_symbol_new_hook (symbolS
*);
332 extern void coff_obj_symbol_clone_hook (symbolS
*, symbolS
*);
333 extern void coff_obj_read_begin_hook (void);
335 extern void pecoff_obj_set_weak_hook (symbolS
*);
336 extern void pecoff_obj_clear_weak_hook (symbolS
*);
338 extern void obj_coff_section (int);
339 extern segT
obj_coff_add_segment (const char *);
340 extern void obj_coff_section (int);
341 extern void c_dot_file_symbol (const char *, int);
342 extern segT
s_get_segment (symbolS
*);
343 #ifndef tc_coff_symbol_emit_hook
344 extern void tc_coff_symbol_emit_hook (symbolS
*);
346 extern void obj_coff_pe_handle_link_once (void);
347 extern void obj_coff_init_stab_section (segT
);
348 extern void c_section_header (struct internal_scnhdr
*,
349 char *, long, long, long, long,
350 long, long, long, long);
351 extern void obj_coff_seh_do_final (void);
353 #ifndef obj_coff_generate_pdata
354 #define obj_coff_generate_pdata obj_coff_seh_do_final
358 #endif /* OBJ_FORMAT_H */