xref: /netbsd/external/gpl3/gdb/dist/gas/config/obj-coff.h (revision 1424dfb3)
1 /* coff object file format
2    Copyright (C) 1989-2020 Free Software Foundation, Inc.
3 
4    This file is part of GAS.
5 
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)
9    any later version.
10 
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.
15 
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
19    02110-1301, USA.  */
20 
21 #ifndef OBJ_FORMAT_H
22 #define OBJ_FORMAT_H
23 
24 #define OBJ_COFF 1
25 
26 #include "targ-cpu.h"
27 
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
33 
34 /* CPU-specific setup:  */
35 
36 #ifdef TC_ARM
37 #include "coff/arm.h"
38 #ifndef TARGET_FORMAT
39 #define TARGET_FORMAT "coff-arm"
40 #endif
41 #endif
42 
43 #ifdef TC_PPC
44 #include "coff/rs6000.h"
45 #endif
46 
47 #ifdef TC_I386
48 #ifdef TE_PEP
49 #include "coff/x86_64.h"
50 #else
51 #include "coff/i386.h"
52 #endif
53 
54 #ifndef TARGET_FORMAT
55 #ifdef TE_PEP
56 #define TARGET_FORMAT "coff-x86-64"
57 #else
58 #define TARGET_FORMAT "coff-i386"
59 #endif
60 #endif
61 #endif
62 
63 #ifdef TC_Z80
64 #include "coff/z80.h"
65 #define TARGET_FORMAT "coff-z80"
66 #endif
67 
68 #ifdef TC_Z8K
69 #include "coff/z8k.h"
70 #define TARGET_FORMAT "coff-z8k"
71 #endif
72 
73 #ifdef TC_SH
74 
75 #ifdef TE_PE
76 #define COFF_WITH_PE
77 #endif
78 
79 #include "coff/sh.h"
80 
81 #ifdef TE_PE
82 #define TARGET_FORMAT "pe-shl"
83 #else
84 
85 #define TARGET_FORMAT					\
86   (!target_big_endian					\
87    ? (sh_small ? "coff-shl-small" : "coff-shl")		\
88    : (sh_small ? "coff-sh-small" : "coff-sh"))
89 
90 #endif
91 #endif
92 
93 #ifdef TC_TIC30
94 #include "coff/tic30.h"
95 #define TARGET_FORMAT "coff-tic30"
96 #endif
97 
98 #ifdef TC_TIC4X
99 #include "coff/tic4x.h"
100 #define TARGET_FORMAT "coff2-tic4x"
101 #endif
102 
103 #ifdef TC_TIC54X
104 #include "coff/tic54x.h"
105 #define TARGET_FORMAT "coff1-c54x"
106 #endif
107 
108 #ifdef TC_MCORE
109 #include "coff/mcore.h"
110 #ifndef TARGET_FORMAT
111 #define TARGET_FORMAT "pe-mcore"
112 #endif
113 #endif
114 
115 #ifdef TE_PE
116 #define obj_set_weak_hook pecoff_obj_set_weak_hook
117 #define obj_clear_weak_hook pecoff_obj_clear_weak_hook
118 #endif
119 
120 #ifndef OBJ_COFF_MAX_AUXENTRIES
121 #define OBJ_COFF_MAX_AUXENTRIES 1
122 #endif
123 
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
127 
128 #include "bfd/libcoff.h"
129 
130 #define OUTPUT_FLAVOR bfd_target_coff_flavour
131 
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
136 
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)
141 #endif
142 
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])
147 
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))
153 
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)
156 
157 /* Auxiliary entry macros. SA_ stands for symbol auxiliary.  */
158 /* Omit the tv related fields.  */
159 /* Accessors.  */
160 
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)
172 
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))
182 
183 /* Internal use only definitions. SF_ stands for symbol flags.
184 
185    These values can be assigned to sy_symbol.ost_flags field of a symbolS.  */
186 
187 #define SF_NORMAL_MASK	0x0000ffff	/* bits 12-15 are general purpose.  */
188 
189 #define SF_STATICS	0x00001000	/* Mark the .text & all symbols.  */
190 #define SF_DEFINED	0x00002000	/* Symbol is defined in this file.  */
191 #define SF_STRING	0x00004000	/* Symbol name length > 8.  */
192 #define SF_LOCAL	0x00008000	/* Symbol must not be emitted.  */
193 
194 #define SF_DEBUG_MASK	0xffff0000	/* bits 16-31 are debug info.  */
195 
196 #define SF_FUNCTION	0x00010000	/* The symbol is a function.  */
197 #define SF_PROCESS	0x00020000	/* Process symbol before write.  */
198 #define SF_TAGGED	0x00040000	/* Is associated with a tag.  */
199 #define SF_TAG		0x00080000	/* Is a tag.  */
200 #define SF_DEBUG	0x00100000	/* Is in debug or abs section.  */
201 #define SF_GET_SEGMENT	0x00200000	/* Get the section of the forward symbol.  */
202 /* All other bits are unused.  */
203 
204 /* Accessors.  */
205 #define SF_GET(s)		(* symbol_get_obj (s))
206 #define SF_GET_DEBUG(s)		(symbol_get_bfdsym (s)->flags & BSF_DEBUGGING)
207 #define SF_SET_DEBUG(s)		(symbol_get_bfdsym (s)->flags |= BSF_DEBUGGING)
208 #define SF_GET_NORMAL_FIELD(s)	(SF_GET (s) & SF_NORMAL_MASK)
209 #define SF_GET_DEBUG_FIELD(s)	(SF_GET (s) & SF_DEBUG_MASK)
210 #define SF_GET_FILE(s)		(SF_GET (s) & SF_FILE)
211 #define SF_GET_STATICS(s)	(SF_GET (s) & SF_STATICS)
212 #define SF_GET_DEFINED(s)	(SF_GET (s) & SF_DEFINED)
213 #define SF_GET_STRING(s)	(SF_GET (s) & SF_STRING)
214 #define SF_GET_LOCAL(s)		(SF_GET (s) & SF_LOCAL)
215 #define SF_GET_FUNCTION(s)      (SF_GET (s) & SF_FUNCTION)
216 #define SF_GET_PROCESS(s)	(SF_GET (s) & SF_PROCESS)
217 #define SF_GET_TAGGED(s)	(SF_GET (s) & SF_TAGGED)
218 #define SF_GET_TAG(s)		(SF_GET (s) & SF_TAG)
219 #define SF_GET_GET_SEGMENT(s)	(SF_GET (s) & SF_GET_SEGMENT)
220 
221 /* Modifiers.  */
222 #define SF_SET(s,v)		(SF_GET (s) = (v))
223 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
224 #define SF_SET_DEBUG_FIELD(s,v)	(SF_GET (s) |= ((v) & SF_DEBUG_MASK))
225 #define SF_SET_FILE(s)		(SF_GET (s) |= SF_FILE)
226 #define SF_SET_STATICS(s)	(SF_GET (s) |= SF_STATICS)
227 #define SF_SET_DEFINED(s)	(SF_GET (s) |= SF_DEFINED)
228 #define SF_SET_STRING(s)	(SF_GET (s) |= SF_STRING)
229 #define SF_SET_LOCAL(s)		(SF_GET (s) |= SF_LOCAL)
230 #define SF_CLEAR_LOCAL(s)	(SF_GET (s) &= ~SF_LOCAL)
231 #define SF_SET_FUNCTION(s)      (SF_GET (s) |= SF_FUNCTION)
232 #define SF_SET_PROCESS(s)	(SF_GET (s) |= SF_PROCESS)
233 #define SF_SET_TAGGED(s)	(SF_GET (s) |= SF_TAGGED)
234 #define SF_SET_TAG(s)		(SF_GET (s) |= SF_TAG)
235 #define SF_SET_GET_SEGMENT(s)	(SF_GET (s) |= SF_GET_SEGMENT)
236 
237 
238 /*  Line number handling.  */
239 extern int text_lineno_number;
240 extern int coff_line_base;
241 extern int coff_n_line_nos;
242 extern symbolS *coff_last_function;
243 
244 #define obj_emit_lineno(WHERE, LINE, FILE_START)	abort ()
245 #define obj_app_file(name, app)      c_dot_file_symbol (name, app)
246 #define obj_frob_symbol(S,P) 	     coff_frob_symbol (S, & P)
247 #define obj_frob_section(S)	     coff_frob_section (S)
248 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
249 #ifndef obj_adjust_symtab
250 #define obj_adjust_symtab()	     coff_adjust_symtab ()
251 #endif
252 
253 /* Forward the segment of a forwarded symbol, handle assignments that
254    just copy symbol values, etc.  */
255 #ifndef OBJ_COPY_SYMBOL_ATTRIBUTES
256 #ifndef TE_I386AIX
257 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
258   (SF_GET_GET_SEGMENT (dest) \
259    ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
260    : 0)
261 #else
262 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
263   (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
264    ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
265    : 0)
266 #endif
267 #endif
268 
269 /* Sanity check.  */
270 
271 extern const pseudo_typeS coff_pseudo_table[];
272 
273 #ifndef obj_pop_insert
274 #define obj_pop_insert() pop_insert (coff_pseudo_table)
275 #endif
276 
277 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
278    to redefine the symbol later on.  This can happen if C symbols use
279    a prefix, and a symbol is defined both with and without the prefix,
280    as in start/_start/__start in gcc/libgcc1-test.c.  */
281 #define RESOLVE_SYMBOL_REDEFINITION(sym)		\
282 (SF_GET_GET_SEGMENT (sym)				\
283  ? (sym->frag = frag_now,				\
284     S_SET_VALUE (sym, frag_now_fix ()),			\
285     S_SET_SEGMENT (sym, now_seg),			\
286     0)							\
287  : 0)
288 
289 /* Stabs in a coff file go into their own section.  */
290 #define SEPARATE_STAB_SECTIONS 1
291 
292 /* We need 12 bytes at the start of the section to hold some initial
293    information.  */
294 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
295 
296 /* Store the number of relocations in the section aux entry.  */
297 #define SET_SECTION_RELOCS(sec, relocs, n) \
298   SA_SET_SCN_NRELOC (section_symbol (sec), n)
299 
300 #define obj_app_file(name, app) c_dot_file_symbol (name, app)
301 
302 extern int  S_SET_DATA_TYPE              (symbolS *, int);
303 extern int  S_SET_STORAGE_CLASS          (symbolS *, int);
304 extern int  S_GET_STORAGE_CLASS          (symbolS *);
305 extern void SA_SET_SYM_ENDNDX            (symbolS *, symbolS *);
306 extern void coff_add_linesym             (symbolS *);
307 extern void c_dot_file_symbol            (const char *, int);
308 extern void coff_frob_symbol             (symbolS *, int *);
309 extern void coff_adjust_symtab           (void);
310 extern void coff_frob_section            (segT);
311 extern void coff_adjust_section_syms     (bfd *, asection *, void *);
312 extern void coff_frob_file_after_relocs  (void);
313 extern void coff_obj_symbol_new_hook     (symbolS *);
314 extern void coff_obj_symbol_clone_hook   (symbolS *, symbolS *);
315 extern void coff_obj_read_begin_hook     (void);
316 #ifdef TE_PE
317 extern void pecoff_obj_set_weak_hook     (symbolS *);
318 extern void pecoff_obj_clear_weak_hook   (symbolS *);
319 #endif
320 extern void obj_coff_section             (int);
321 extern segT obj_coff_add_segment         (const char *);
322 extern void obj_coff_section             (int);
323 extern void c_dot_file_symbol            (const char *, int);
324 extern segT s_get_segment                (symbolS *);
325 #ifndef tc_coff_symbol_emit_hook
326 extern void tc_coff_symbol_emit_hook     (symbolS *);
327 #endif
328 extern void obj_coff_pe_handle_link_once (void);
329 extern void obj_coff_init_stab_section   (segT);
330 extern void c_section_header             (struct internal_scnhdr *,
331 					  char *, long, long, long, long,
332 					  long, long, long, long);
333 extern void obj_coff_seh_do_final (void);
334 
335 #ifndef obj_coff_generate_pdata
336 #define obj_coff_generate_pdata obj_coff_seh_do_final
337 #endif
338 
339 
340 #endif /* OBJ_FORMAT_H */
341