1 /* coff object file format
2 Copyright (C) 1989, 90, 91, 92, 94, 95, 96, 1997
3 Free Software Foundation, Inc.
5 This file is part of GAS.
7 GAS is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GAS is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 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
29 #define WORKING_DOT_WORD
30 #define WARN_SIGNED_OVERFLOW_WORD
31 #define OBJ_COFF_OMIT_OPTIONAL_HEADER
41 /* This internal_lineno crap is to stop namespace pollution from the
42 bfd internal coff headerfile. */
43 #define internal_lineno bfd_internal_lineno
44 #include "coff/internal.h"
45 #undef internal_lineno
47 /* CPU-specific setup: */
52 #define TARGET_FORMAT "coff-arm"
58 #include "coff/powerpc.h"
60 #include "coff/rs6000.h"
65 #include "coff/sparc.h"
69 #include "coff/i386.h"
72 #define TARGET_FORMAT "pe-i386"
76 #define TARGET_FORMAT "coff-i386"
81 #include "coff/m68k.h"
83 #define TARGET_FORMAT "coff-m68k"
88 #include "coff/a29k.h"
89 #define TARGET_FORMAT "coff-a29k-big"
93 #include "coff/i960.h"
94 #define TARGET_FORMAT "coff-Intel-little"
99 #define TARGET_FORMAT "coff-z8k"
103 #include "coff/h8300.h"
104 #define TARGET_FORMAT "coff-h8300"
108 #include "coff/h8500.h"
109 #define TARGET_FORMAT "coff-h8500"
114 #define TARGET_FORMAT \
116 ? (sh_small ? "coff-shl-small" : "coff-shl") \
117 : (sh_small ? "coff-sh-small" : "coff-sh"))
121 #include "coff/m88k.h"
122 #define TARGET_FORMAT "coff-m88kbcs"
126 #include "coff/w65.h"
127 #define TARGET_FORMAT "coff-w65"
130 /* start-sanitize-tic80 */
132 #include "coff/tic80.h"
133 #define TARGET_FORMAT "coff-tic80"
134 #define ALIGNMENT_IN_S_FLAGS 1
136 /* end-sanitize-tic80 */
138 /* Targets may also set this. Also, if BFD_ASSEMBLER is defined, this
139 will already have been defined. */
140 #undef SYMBOLS_NEED_BACKPOINTERS
141 #define SYMBOLS_NEED_BACKPOINTERS 1
143 #ifndef OBJ_COFF_MAX_AUXENTRIES
144 #define OBJ_COFF_MAX_AUXENTRIES 1
145 #endif /* OBJ_COFF_MAX_AUXENTRIES */
147 extern void coff_obj_symbol_new_hook
PARAMS ((struct symbol
*));
148 #define obj_symbol_new_hook coff_obj_symbol_new_hook
150 extern void coff_obj_read_begin_hook
PARAMS ((void));
151 #define obj_read_begin_hook coff_obj_read_begin_hook
153 /* ***********************************************************************
155 This file really contains two implementations of the COFF back end.
156 They are in the process of being merged, but this is only a
157 preliminary, mechanical merging. Many definitions that are
158 identical between the two are still found in both versions.
160 The first version, with BFD_ASSEMBLER defined, uses high-level BFD
161 interfaces and data structures. The second version, with
162 BFD_ASSEMBLER not defined, also uses BFD, but mostly for swapping
163 data structures and for doing the actual I/O. The latter defines
164 the preprocessor symbols BFD and BFD_HEADERS. Try not to let this
167 These two are in the process of being merged, and eventually the
168 BFD_ASSEMBLER version should take over completely. Release timing
169 issues and namespace problems convinced me to merge the two
170 together in this fashion, a little sooner than I would have liked.
171 The real merge should be much better done by the time the next
174 For now, the structure of this file is:
182 Unfortunately, the common portions are very small at the moment,
183 and many declarations or definitions are duplicated. The structure
184 of obj-coff.c is similar.
186 See doc/internals.texi for a brief discussion of the history, if
189 Ken Raeburn, 5 May 1994
191 *********************************************************************** */
195 #include "bfd/libcoff.h"
197 #define OUTPUT_FLAVOR bfd_target_coff_flavour
201 /* Alter the field names, for now, until we've fixed up the other
202 references to use the new name. */
204 #define TC_SYMFIELD_TYPE struct symbol *
208 #define OBJ_SYMFIELD_TYPE unsigned long
209 #define sy_obj sy_flags
211 #define SYM_AUXENT(S) (&coffsymbol ((S)->bsym)->native[1].u.auxent)
213 #define DO_NOT_STRIP 0
215 extern void obj_coff_section
PARAMS ((int));
217 /* The number of auxiliary entries */
218 #define S_GET_NUMBER_AUXILIARY(s) (coffsymbol((s)->bsym)->native->u.syment.n_numaux)
219 /* The number of auxiliary entries */
220 #define S_SET_NUMBER_AUXILIARY(s,v) (S_GET_NUMBER_AUXILIARY (s) = (v))
222 /* True if a symbol name is in the string table, i.e. its length is > 8. */
223 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
225 extern int S_SET_DATA_TYPE
PARAMS ((struct symbol
*, int));
226 extern int S_SET_STORAGE_CLASS
PARAMS ((struct symbol
*, int));
227 extern int S_GET_STORAGE_CLASS
PARAMS ((struct symbol
*));
228 extern void SA_SET_SYM_ENDNDX
PARAMS ((struct symbol
*, struct symbol
*));
230 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
231 /* Omit the tv related fields */
234 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
235 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
236 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
237 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
238 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
239 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
240 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
241 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
242 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
243 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
244 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
246 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
247 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
248 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
249 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
250 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
251 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
252 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
253 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
254 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
257 * Internal use only definitions. SF_ stands for symbol flags.
259 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
261 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
262 * more on the balname/callname hack, see tc-i960.h. b.out is done
266 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
267 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
268 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
269 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
270 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
272 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
274 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
275 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
276 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
277 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
279 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
281 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
282 #define SF_PROCESS (0x00020000) /* Process symbol before write */
283 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
284 #define SF_TAG (0x00080000) /* Is a tag */
285 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
286 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
287 /* All other bits are unused. */
290 #define SF_GET(s) ((s)->sy_flags)
291 #define SF_GET_DEBUG(s) ((s)->bsym->flags & BSF_DEBUGGING)
292 #define SF_SET_DEBUG(s) ((s)->bsym->flags |= BSF_DEBUGGING)
293 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
294 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
295 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
296 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
297 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
298 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
299 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
300 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
301 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
302 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
303 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
304 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
305 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
306 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
307 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
308 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
309 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
312 #define SF_SET(s,v) (SF_GET (s) = (v))
313 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
314 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
315 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
316 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
317 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
318 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
319 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
320 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
321 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
322 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
323 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
324 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
325 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
326 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
327 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
328 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
329 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
330 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
332 /* -------------- Line number handling ------- */
333 extern int text_lineno_number
;
334 extern int coff_line_base
;
335 extern int coff_n_line_nos
;
337 #define obj_emit_lineno(WHERE,LINE,FILE_START) abort ()
338 extern void coff_add_linesym
PARAMS ((struct symbol
*));
341 void c_dot_file_symbol
PARAMS ((char *filename
));
342 #define obj_app_file c_dot_file_symbol
344 extern void coff_frob_symbol
PARAMS ((struct symbol
*, int *));
345 extern void coff_adjust_symtab
PARAMS ((void));
346 extern void coff_frob_section
PARAMS ((segT
));
347 extern void coff_adjust_section_syms
PARAMS ((bfd
*, asection
*, PTR
));
348 extern void coff_frob_file_after_relocs
PARAMS ((void));
349 #define obj_frob_symbol(S,P) coff_frob_symbol(S,&P)
350 #define obj_adjust_symtab() coff_adjust_symtab()
351 #define obj_frob_section(S) coff_frob_section (S)
352 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
354 extern struct symbol
*coff_last_function
;
356 /* Forward the segment of a forwarded symbol, handle assignments that
357 just copy symbol values, etc. */
359 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
360 (SF_GET_GET_SEGMENT (dest) \
361 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
364 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
365 (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
366 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
374 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
375 #endif /* no C_LEAFSTAT */
378 #else /* not BFD_ASSEMBLER */
381 /* Allow translate from aout relocs to coff relocs */
385 #define RELOC_CONST 3
386 #define RELOC_CONSTH 4
387 #define RELOC_JUMPTARG 5
388 #define RELOC_BASE22 6
391 #define RELOC_BASE13 9
392 #define RELOC_WDISP22 10
393 #define RELOC_WDISP30 11
396 extern const segT N_TYPE_seg
[];
398 /* Magic number of paged executable. */
399 #define DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE 0x8300
404 /* Symbol table entry data type */
409 struct internal_syment ost_entry
;
410 /* Auxiliary entry. */
411 union internal_auxent ost_auxent
[OBJ_COFF_MAX_AUXENTRIES
];
412 /* obj_coff internal use only flags */
413 unsigned int ost_flags
;
417 #define DO_NOT_STRIP 0
419 /* Symbol table macros and constants */
421 /* Possible and usefull section number in symbol table
422 * The values of TEXT, DATA and BSS may not be portable.
425 #define C_ABS_SECTION N_ABS
426 #define C_UNDEF_SECTION N_UNDEF
427 #define C_DEBUG_SECTION N_DEBUG
428 #define C_NTV_SECTION N_TV
429 #define C_PTV_SECTION P_TV
430 #define C_REGISTER_SECTION 50
433 * Macros to extract information from a symbol table entry.
434 * This syntaxic indirection allows independence regarding a.out or coff.
435 * The argument (s) of all these macros is a pointer to a symbol table entry.
439 /* True if the symbol is external */
440 #define S_IS_EXTERNAL(s) ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION)
441 /* True if symbol has been defined, ie :
442 section > 0 (DATA, TEXT or BSS)
443 section == 0 and value > 0 (external bss symbol) */
444 #define S_IS_DEFINED(s) \
445 ((s)->sy_symbol.ost_entry.n_scnum > C_UNDEF_SECTION \
446 || ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION \
447 && S_GET_VALUE (s) > 0) \
448 || ((s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
449 /* True if a debug special symbol entry */
450 #define S_IS_DEBUG(s) ((s)->sy_symbol.ost_entry.n_scnum == C_DEBUG_SECTION)
451 /* True if a symbol is local symbol name */
452 /* A symbol name whose name includes ^A is a gas internal pseudo symbol */
453 #define S_IS_LOCAL(s) \
454 ((s)->sy_symbol.ost_entry.n_scnum == C_REGISTER_SECTION \
455 || (S_LOCAL_NAME(s) && ! flag_keep_locals && ! S_IS_DEBUG (s)) \
456 || strchr (S_GET_NAME (s), '\001') != NULL \
457 || strchr (S_GET_NAME (s), '\002') != NULL \
458 || (flag_strip_local_absolute \
459 && !S_IS_EXTERNAL(s) \
460 && (s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
461 /* True if a symbol is not defined in this file */
462 #define S_IS_EXTERN(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
463 && S_GET_VALUE (s) == 0)
465 * True if a symbol can be multiply defined (bss symbols have this def
466 * though it is bad practice)
468 #define S_IS_COMMON(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
469 && S_GET_VALUE (s) != 0)
470 /* True if a symbol name is in the string table, i.e. its length is > 8. */
471 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
474 /* The name of the symbol */
475 #define S_GET_NAME(s) ((char*)(s)->sy_symbol.ost_entry.n_offset)
476 /* The pointer to the string table */
477 #define S_GET_OFFSET(s) ((s)->sy_symbol.ost_entry.n_offset)
478 /* The numeric value of the segment */
479 #define S_GET_SEGMENT(s) s_get_segment(s)
481 #define S_GET_DATA_TYPE(s) ((s)->sy_symbol.ost_entry.n_type)
482 /* The storage class */
483 #define S_GET_STORAGE_CLASS(s) ((s)->sy_symbol.ost_entry.n_sclass)
484 /* The number of auxiliary entries */
485 #define S_GET_NUMBER_AUXILIARY(s) ((s)->sy_symbol.ost_entry.n_numaux)
488 /* Set the name of the symbol */
489 #define S_SET_NAME(s,v) ((s)->sy_symbol.ost_entry.n_offset = (unsigned long)(v))
490 /* Set the offset of the symbol */
491 #define S_SET_OFFSET(s,v) ((s)->sy_symbol.ost_entry.n_offset = (v))
492 /* The numeric value of the segment */
493 #define S_SET_SEGMENT(s,v) ((s)->sy_symbol.ost_entry.n_scnum = SEGMENT_TO_SYMBOL_TYPE(v))
495 #define S_SET_DATA_TYPE(s,v) ((s)->sy_symbol.ost_entry.n_type = (v))
496 /* The storage class */
497 #define S_SET_STORAGE_CLASS(s,v) ((s)->sy_symbol.ost_entry.n_sclass = (v))
498 /* The number of auxiliary entries */
499 #define S_SET_NUMBER_AUXILIARY(s,v) ((s)->sy_symbol.ost_entry.n_numaux = (v))
501 /* Additional modifiers */
502 /* The symbol is external (does not mean undefined) */
503 #define S_SET_EXTERNAL(s) { S_SET_STORAGE_CLASS(s, C_EXT) ; SF_CLEAR_LOCAL(s); }
505 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
506 /* Omit the tv related fields */
508 #define SYM_AUXENT(S) (&(S)->sy_symbol.ost_auxent[0])
510 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
511 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
512 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
513 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
514 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
515 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l)
516 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
517 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
518 #define SA_GET_FILE_FNAME_OFFSET(s) (SYM_AUXENT (s)->x_file.x_n.x_offset)
519 #define SA_GET_FILE_FNAME_ZEROS(s) (SYM_AUXENT (s)->x_file.x_n.x_zeroes)
520 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
521 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
522 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
525 #define SA_SET_SYM_TAGNDX(s,v) (SYM_AUXENT (s)->x_sym.x_tagndx.l=(v))
526 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
527 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
528 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
529 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
530 #define SA_SET_SYM_ENDNDX(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l=(v))
531 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
532 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
533 #define SA_SET_FILE_FNAME_OFFSET(s,v) (SYM_AUXENT (s)->x_file.x_n.x_offset=(v))
534 #define SA_SET_FILE_FNAME_ZEROS(s,v) (SYM_AUXENT (s)->x_file.x_n.x_zeroes=(v))
535 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
536 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
537 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
540 * Internal use only definitions. SF_ stands for symbol flags.
542 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
544 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
545 * more on the balname/callname hack, see tc-i960.h. b.out is done
549 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
550 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
551 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
552 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
553 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
555 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
557 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
558 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
559 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
560 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
562 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
564 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
565 #define SF_PROCESS (0x00020000) /* Process symbol before write */
566 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
567 #define SF_TAG (0x00080000) /* Is a tag */
568 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
569 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
570 #define SF_ADJ_LNNOPTR (0x00400000) /* Has a lnnoptr */
571 /* All other bits are unused. */
574 #define SF_GET(s) ((s)->sy_symbol.ost_flags)
575 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
576 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
577 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
578 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
579 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
580 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
581 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
582 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
583 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
584 #define SF_GET_DEBUG(s) (SF_GET (s) & SF_DEBUG)
585 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
586 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
587 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
588 #define SF_GET_ADJ_LNNOPTR(s) (SF_GET (s) & SF_ADJ_LNNOPTR)
589 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
590 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
591 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
592 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
593 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
596 #define SF_SET(s,v) (SF_GET (s) = (v))
597 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
598 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
599 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
600 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
601 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
602 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
603 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
604 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
605 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
606 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
607 #define SF_SET_DEBUG(s) (SF_GET (s) |= SF_DEBUG)
608 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
609 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
610 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
611 #define SF_SET_ADJ_LNNOPTR(s) (SF_GET (s) |= SF_ADJ_LNNOPTR)
612 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
613 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
614 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
615 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
616 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
618 /* File header macro and type definition */
621 * File position calculators. Beware to use them when all the
622 * appropriate fields are set in the header.
625 #ifdef OBJ_COFF_OMIT_OPTIONAL_HEADER
626 #define OBJ_COFF_AOUTHDRSZ (0)
628 #define OBJ_COFF_AOUTHDRSZ (AOUTHDRSZ)
629 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
631 #define H_GET_FILE_SIZE(h) \
632 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
633 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
634 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
635 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h) + \
636 H_GET_SYMBOL_TABLE_SIZE(h) + \
637 (h)->string_table_size)
638 #define H_GET_TEXT_FILE_OFFSET(h) \
639 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
640 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ)
641 #define H_GET_DATA_FILE_OFFSET(h) \
642 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
643 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
645 #define H_GET_BSS_FILE_OFFSET(h) 0
646 #define H_GET_RELOCATION_FILE_OFFSET(h) \
647 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
648 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
649 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h))
650 #define H_GET_LINENO_FILE_OFFSET(h) \
651 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
652 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
653 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
654 H_GET_RELOCATION_SIZE(h))
655 #define H_GET_SYMBOL_TABLE_FILE_OFFSET(h) \
656 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
657 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
658 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
659 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h))
663 #define H_GET_MAGIC_NUMBER(h) ((h)->aouthdr.magic)
664 #define H_GET_VERSION_STAMP(h) ((h)->aouthdr.vstamp)
665 #define H_GET_TEXT_SIZE(h) ((h)->aouthdr.tsize)
666 #define H_GET_DATA_SIZE(h) ((h)->aouthdr.dsize)
667 #define H_GET_BSS_SIZE(h) ((h)->aouthdr.bsize)
668 #define H_GET_ENTRY_POINT(h) ((h)->aouthdr.entry)
669 #define H_GET_TEXT_START(h) ((h)->aouthdr.text_start)
670 #define H_GET_DATA_START(h) ((h)->aouthdr.data_start)
672 #define H_GET_FILE_MAGIC_NUMBER(h) ((h)->filehdr.f_magic)
673 #define H_GET_NUMBER_OF_SECTIONS(h) ((h)->filehdr.f_nscns)
674 #define H_GET_TIME_STAMP(h) ((h)->filehdr.f_timdat)
675 #define H_GET_SYMBOL_TABLE_POINTER(h) ((h)->filehdr.f_symptr)
676 #define H_GET_SYMBOL_COUNT(h) ((h)->filehdr.f_nsyms)
677 #define H_GET_SYMBOL_TABLE_SIZE(h) (H_GET_SYMBOL_COUNT(h) * SYMESZ)
678 #define H_GET_SIZEOF_OPTIONAL_HEADER(h) ((h)->filehdr.f_opthdr)
679 #define H_GET_FLAGS(h) ((h)->filehdr.f_flags)
680 /* Extra fields to achieve bsd a.out compatibility and for convenience */
681 #define H_GET_RELOCATION_SIZE(h) ((h)->relocation_size)
682 #define H_GET_STRING_SIZE(h) ((h)->string_table_size)
683 #define H_GET_LINENO_SIZE(h) ((h)->lineno_size)
685 #ifndef OBJ_COFF_OMIT_OPTIONAL_HEADER
686 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
688 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
689 #else /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
690 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
691 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
692 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
694 #define H_GET_TEXT_RELOCATION_SIZE(h) (text_section_header.s_nreloc * RELSZ)
695 #define H_GET_DATA_RELOCATION_SIZE(h) (data_section_header.s_nreloc * RELSZ)
699 #define H_SET_MAGIC_NUMBER(h,v) ((h)->aouthdr.magic = (v))
700 #define H_SET_VERSION_STAMP(h,v) ((h)->aouthdr.vstamp = (v))
701 #define H_SET_TEXT_SIZE(h,v) ((h)->aouthdr.tsize = (v))
702 #define H_SET_DATA_SIZE(h,v) ((h)->aouthdr.dsize = (v))
703 #define H_SET_BSS_SIZE(h,v) ((h)->aouthdr.bsize = (v))
704 #define H_SET_ENTRY_POINT(h,v) ((h)->aouthdr.entry = (v))
705 #define H_SET_TEXT_START(h,v) ((h)->aouthdr.text_start = (v))
706 #define H_SET_DATA_START(h,v) ((h)->aouthdr.data_start = (v))
708 #define H_SET_FILE_MAGIC_NUMBER(h,v) ((h)->filehdr.f_magic = (v))
709 #define H_SET_NUMBER_OF_SECTIONS(h,v) ((h)->filehdr.f_nscns = (v))
710 #define H_SET_TIME_STAMP(h,v) ((h)->filehdr.f_timdat = (v))
711 #define H_SET_SYMBOL_TABLE_POINTER(h,v) ((h)->filehdr.f_symptr = (v))
712 #define H_SET_SYMBOL_TABLE_SIZE(h,v) ((h)->filehdr.f_nsyms = (v))
713 #define H_SET_SIZEOF_OPTIONAL_HEADER(h,v) ((h)->filehdr.f_opthdr = (v))
714 #define H_SET_FLAGS(h,v) ((h)->filehdr.f_flags = (v))
715 /* Extra fields to achieve bsd a.out compatibility and for convinience */
716 #define H_SET_RELOCATION_SIZE(h,t,d) ((h)->relocation_size = (t)+(d))
717 #define H_SET_STRING_SIZE(h,v) ((h)->string_table_size = (v))
718 #define H_SET_LINENO_SIZE(h,v) ((h)->lineno_size = (v))
720 /* Segment flipping */
724 struct internal_aouthdr aouthdr
; /* a.out header */
725 struct internal_filehdr filehdr
; /* File header, not machine dep. */
726 long string_table_size
; /* names + '\0' + sizeof(int) */
727 long relocation_size
; /* Cumulated size of relocation
728 information for all sections in
730 long lineno_size
; /* Size of the line number information
738 struct bfd_internal_lineno line
;
739 char *frag
; /* Frag to which the line number is related */
740 struct lineno_list
*next
; /* Forward chain pointer */
746 #define obj_segment_name(i) (segment_info[(int) (i)].scnhdr.s_name)
748 #define obj_add_segment(s) obj_coff_add_segment (s)
750 extern segT obj_coff_add_segment
PARAMS ((const char *));
752 extern void obj_coff_section
PARAMS ((int));
754 extern void c_dot_file_symbol
PARAMS ((char *filename
));
755 #define obj_app_file c_dot_file_symbol
756 extern void obj_extra_stuff
PARAMS ((object_headers
* headers
));
758 extern segT s_get_segment
PARAMS ((struct symbol
* ptr
));
760 extern void c_section_header
PARAMS ((struct internal_scnhdr
* header
,
771 #ifndef tc_coff_symbol_emit_hook
772 void tc_coff_symbol_emit_hook
PARAMS ((struct symbol
*));
779 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
780 #endif /* no C_LEAFSTAT */
782 extern struct internal_scnhdr data_section_header
;
783 extern struct internal_scnhdr text_section_header
;
785 /* Forward the segment of a forwarded symbol. */
786 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
787 (SF_GET_GET_SEGMENT (dest) \
788 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
792 #define obj_handle_link_once(t) obj_coff_pe_handle_link_once (t)
793 extern void obj_coff_pe_handle_link_once ();
796 #endif /* not BFD_ASSEMBLER */
798 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
799 to redefine the symbol later on. This can happen if C symbols use
800 a prefix, and a symbol is defined both with and without the prefix,
801 as in start/_start/__start in gcc/libgcc1-test.c. */
802 #define RESOLVE_SYMBOL_REDEFINITION(sym) \
803 (SF_GET_GET_SEGMENT (sym) \
804 ? (sym->sy_frag = frag_now, \
805 S_SET_VALUE (sym, frag_now_fix ()), \
806 S_SET_SEGMENT (sym, now_seg), \
810 /* Stabs in a coff file go into their own section. */
811 #define SEPARATE_STAB_SECTIONS 1
813 /* We need 12 bytes at the start of the section to hold some initial
815 extern void obj_coff_init_stab_section
PARAMS ((segT
));
816 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
818 #endif /* OBJ_FORMAT_H */