1 /* coff object file format
2 Copyright (C) 1989, 90, 91, 92, 94, 95, 96, 97, 98, 1999
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"
131 #include "coff/tic30.h"
132 #define TARGET_FORMAT "coff-tic30"
136 #include "coff/tic80.h"
137 #define TARGET_FORMAT "coff-tic80"
138 #define ALIGNMENT_IN_S_FLAGS 1
142 #include "coff/mcore.h"
143 #ifndef TARGET_FORMAT
144 #define TARGET_FORMAT "pe-mcore"
148 /* Targets may also set this. Also, if BFD_ASSEMBLER is defined, this
149 will already have been defined. */
150 #undef SYMBOLS_NEED_BACKPOINTERS
151 #define SYMBOLS_NEED_BACKPOINTERS 1
153 #ifndef OBJ_COFF_MAX_AUXENTRIES
154 #define OBJ_COFF_MAX_AUXENTRIES 1
155 #endif /* OBJ_COFF_MAX_AUXENTRIES */
157 extern void coff_obj_symbol_new_hook
PARAMS ((struct symbol
*));
158 #define obj_symbol_new_hook coff_obj_symbol_new_hook
160 extern void coff_obj_read_begin_hook
PARAMS ((void));
161 #define obj_read_begin_hook coff_obj_read_begin_hook
163 /* ***********************************************************************
165 This file really contains two implementations of the COFF back end.
166 They are in the process of being merged, but this is only a
167 preliminary, mechanical merging. Many definitions that are
168 identical between the two are still found in both versions.
170 The first version, with BFD_ASSEMBLER defined, uses high-level BFD
171 interfaces and data structures. The second version, with
172 BFD_ASSEMBLER not defined, also uses BFD, but mostly for swapping
173 data structures and for doing the actual I/O. The latter defines
174 the preprocessor symbols BFD and BFD_HEADERS. Try not to let this
177 These two are in the process of being merged, and eventually the
178 BFD_ASSEMBLER version should take over completely. Release timing
179 issues and namespace problems convinced me to merge the two
180 together in this fashion, a little sooner than I would have liked.
181 The real merge should be much better done by the time the next
184 For now, the structure of this file is:
192 Unfortunately, the common portions are very small at the moment,
193 and many declarations or definitions are duplicated. The structure
194 of obj-coff.c is similar.
196 See doc/internals.texi for a brief discussion of the history, if
199 Ken Raeburn, 5 May 1994
201 *********************************************************************** */
205 #include "bfd/libcoff.h"
207 #define OUTPUT_FLAVOR bfd_target_coff_flavour
211 /* Alter the field names, for now, until we've fixed up the other
212 references to use the new name. */
214 #define TC_SYMFIELD_TYPE struct symbol *
218 #define OBJ_SYMFIELD_TYPE unsigned long
219 #define sy_obj sy_flags
221 #define SYM_AUXENT(S) (&coffsymbol ((S)->bsym)->native[1].u.auxent)
222 #define SYM_AUXINFO(S) (&coffsymbol ((S)->bsym)->native[1])
224 #define DO_NOT_STRIP 0
226 extern void obj_coff_section
PARAMS ((int));
228 /* The number of auxiliary entries */
229 #define S_GET_NUMBER_AUXILIARY(s) (coffsymbol((s)->bsym)->native->u.syment.n_numaux)
230 /* The number of auxiliary entries */
231 #define S_SET_NUMBER_AUXILIARY(s,v) (S_GET_NUMBER_AUXILIARY (s) = (v))
233 /* True if a symbol name is in the string table, i.e. its length is > 8. */
234 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
236 extern int S_SET_DATA_TYPE
PARAMS ((struct symbol
*, int));
237 extern int S_SET_STORAGE_CLASS
PARAMS ((struct symbol
*, int));
238 extern int S_GET_STORAGE_CLASS
PARAMS ((struct symbol
*));
239 extern void SA_SET_SYM_ENDNDX
PARAMS ((struct symbol
*, struct symbol
*));
241 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
242 /* Omit the tv related fields */
245 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
246 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
247 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
248 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
249 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
250 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
251 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
252 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
253 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
254 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
255 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
257 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
258 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
259 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
260 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
261 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
262 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
263 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
264 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
265 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
268 * Internal use only definitions. SF_ stands for symbol flags.
270 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
272 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
273 * more on the balname/callname hack, see tc-i960.h. b.out is done
277 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
278 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
279 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
280 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
281 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
283 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
285 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
286 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
287 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
288 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
290 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
292 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
293 #define SF_PROCESS (0x00020000) /* Process symbol before write */
294 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
295 #define SF_TAG (0x00080000) /* Is a tag */
296 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
297 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
298 /* All other bits are unused. */
301 #define SF_GET(s) ((s)->sy_flags)
302 #define SF_GET_DEBUG(s) ((s)->bsym->flags & BSF_DEBUGGING)
303 #define SF_SET_DEBUG(s) ((s)->bsym->flags |= BSF_DEBUGGING)
304 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
305 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
306 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
307 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
308 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
309 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
310 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
311 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
312 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
313 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
314 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
315 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
316 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
317 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
318 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
319 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
320 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
323 #define SF_SET(s,v) (SF_GET (s) = (v))
324 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
325 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
326 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
327 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
328 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
329 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
330 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
331 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
332 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
333 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
334 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
335 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
336 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
337 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
338 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
339 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
340 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
341 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
343 /* -------------- Line number handling ------- */
344 extern int text_lineno_number
;
345 extern int coff_line_base
;
346 extern int coff_n_line_nos
;
348 #define obj_emit_lineno(WHERE,LINE,FILE_START) abort ()
349 extern void coff_add_linesym
PARAMS ((struct symbol
*));
352 void c_dot_file_symbol
PARAMS ((char *filename
));
353 #define obj_app_file c_dot_file_symbol
355 extern void coff_frob_symbol
PARAMS ((struct symbol
*, int *));
356 extern void coff_adjust_symtab
PARAMS ((void));
357 extern void coff_frob_section
PARAMS ((segT
));
358 extern void coff_adjust_section_syms
PARAMS ((bfd
*, asection
*, PTR
));
359 extern void coff_frob_file_after_relocs
PARAMS ((void));
360 #define obj_frob_symbol(S,P) coff_frob_symbol(S,&P)
361 #ifndef obj_adjust_symtab
362 #define obj_adjust_symtab() coff_adjust_symtab()
364 #define obj_frob_section(S) coff_frob_section (S)
365 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
367 extern struct symbol
*coff_last_function
;
369 /* Forward the segment of a forwarded symbol, handle assignments that
370 just copy symbol values, etc. */
372 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
373 (SF_GET_GET_SEGMENT (dest) \
374 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
377 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
378 (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
379 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
387 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
388 #endif /* no C_LEAFSTAT */
391 #else /* not BFD_ASSEMBLER */
394 /* Allow translate from aout relocs to coff relocs */
398 #define RELOC_CONST 3
399 #define RELOC_CONSTH 4
400 #define RELOC_JUMPTARG 5
401 #define RELOC_BASE22 6
404 #define RELOC_BASE13 9
405 #define RELOC_WDISP22 10
406 #define RELOC_WDISP30 11
409 extern const segT N_TYPE_seg
[];
411 /* Magic number of paged executable. */
412 #define DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE 0x8300
417 /* Symbol table entry data type */
422 struct internal_syment ost_entry
;
423 /* Auxiliary entry. */
424 union internal_auxent ost_auxent
[OBJ_COFF_MAX_AUXENTRIES
];
425 /* obj_coff internal use only flags */
426 unsigned int ost_flags
;
430 #define DO_NOT_STRIP 0
432 /* Symbol table macros and constants */
434 /* Possible and usefull section number in symbol table
435 * The values of TEXT, DATA and BSS may not be portable.
438 #define C_ABS_SECTION N_ABS
439 #define C_UNDEF_SECTION N_UNDEF
440 #define C_DEBUG_SECTION N_DEBUG
441 #define C_NTV_SECTION N_TV
442 #define C_PTV_SECTION P_TV
443 #define C_REGISTER_SECTION 50
446 * Macros to extract information from a symbol table entry.
447 * This syntaxic indirection allows independence regarding a.out or coff.
448 * The argument (s) of all these macros is a pointer to a symbol table entry.
452 /* True if the symbol is external */
453 #define S_IS_EXTERNAL(s) ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION)
454 /* True if symbol has been defined, ie :
455 section > 0 (DATA, TEXT or BSS)
456 section == 0 and value > 0 (external bss symbol) */
457 #define S_IS_DEFINED(s) \
458 ((s)->sy_symbol.ost_entry.n_scnum > C_UNDEF_SECTION \
459 || ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION \
460 && S_GET_VALUE (s) > 0) \
461 || ((s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
462 /* True if a debug special symbol entry */
463 #define S_IS_DEBUG(s) ((s)->sy_symbol.ost_entry.n_scnum == C_DEBUG_SECTION)
464 /* True if a symbol is local symbol name */
465 /* A symbol name whose name includes ^A is a gas internal pseudo symbol */
466 #define S_IS_LOCAL(s) \
467 ((s)->sy_symbol.ost_entry.n_scnum == C_REGISTER_SECTION \
468 || (S_LOCAL_NAME(s) && ! flag_keep_locals && ! S_IS_DEBUG (s)) \
469 || strchr (S_GET_NAME (s), '\001') != NULL \
470 || strchr (S_GET_NAME (s), '\002') != NULL \
471 || (flag_strip_local_absolute \
472 && !S_IS_EXTERNAL(s) \
473 && (s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
474 /* True if a symbol is not defined in this file */
475 #define S_IS_EXTERN(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
476 && S_GET_VALUE (s) == 0)
478 * True if a symbol can be multiply defined (bss symbols have this def
479 * though it is bad practice)
481 #define S_IS_COMMON(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
482 && S_GET_VALUE (s) != 0)
483 /* True if a symbol name is in the string table, i.e. its length is > 8. */
484 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
486 /* True if a symbol is defined as weak. */
488 #define S_IS_WEAK(s) \
489 ((s)->sy_symbol.ost_entry.n_sclass == C_NT_WEAK \
490 || (s)->sy_symbol.ost_entry.n_sclass == C_WEAKEXT)
492 #define S_IS_WEAK(s) \
493 ((s)->sy_symbol.ost_entry.n_sclass == C_WEAKEXT)
497 /* The name of the symbol */
498 #define S_GET_NAME(s) ((char*)(s)->sy_symbol.ost_entry.n_offset)
499 /* The pointer to the string table */
500 #define S_GET_OFFSET(s) ((s)->sy_symbol.ost_entry.n_offset)
501 /* The numeric value of the segment */
502 #define S_GET_SEGMENT(s) s_get_segment(s)
504 #define S_GET_DATA_TYPE(s) ((s)->sy_symbol.ost_entry.n_type)
505 /* The storage class */
506 #define S_GET_STORAGE_CLASS(s) ((s)->sy_symbol.ost_entry.n_sclass)
507 /* The number of auxiliary entries */
508 #define S_GET_NUMBER_AUXILIARY(s) ((s)->sy_symbol.ost_entry.n_numaux)
511 /* Set the name of the symbol */
512 #define S_SET_NAME(s,v) ((s)->sy_symbol.ost_entry.n_offset = (unsigned long)(v))
513 /* Set the offset of the symbol */
514 #define S_SET_OFFSET(s,v) ((s)->sy_symbol.ost_entry.n_offset = (v))
515 /* The numeric value of the segment */
516 #define S_SET_SEGMENT(s,v) ((s)->sy_symbol.ost_entry.n_scnum = SEGMENT_TO_SYMBOL_TYPE(v))
518 #define S_SET_DATA_TYPE(s,v) ((s)->sy_symbol.ost_entry.n_type = (v))
519 /* The storage class */
520 #define S_SET_STORAGE_CLASS(s,v) ((s)->sy_symbol.ost_entry.n_sclass = (v))
521 /* The number of auxiliary entries */
522 #define S_SET_NUMBER_AUXILIARY(s,v) ((s)->sy_symbol.ost_entry.n_numaux = (v))
524 /* Additional modifiers */
525 /* The symbol is external (does not mean undefined) */
526 #define S_SET_EXTERNAL(s) { S_SET_STORAGE_CLASS(s, C_EXT) ; SF_CLEAR_LOCAL(s); }
528 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
529 /* Omit the tv related fields */
531 #define SYM_AUXENT(S) (&(S)->sy_symbol.ost_auxent[0])
533 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
534 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
535 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
536 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
537 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
538 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l)
539 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
540 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
541 #define SA_GET_FILE_FNAME_OFFSET(s) (SYM_AUXENT (s)->x_file.x_n.x_offset)
542 #define SA_GET_FILE_FNAME_ZEROS(s) (SYM_AUXENT (s)->x_file.x_n.x_zeroes)
543 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
544 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
545 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
548 #define SA_SET_SYM_TAGNDX(s,v) (SYM_AUXENT (s)->x_sym.x_tagndx.l=(v))
549 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
550 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
551 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
552 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
553 #define SA_SET_SYM_ENDNDX(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l=(v))
554 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
555 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
556 #define SA_SET_FILE_FNAME_OFFSET(s,v) (SYM_AUXENT (s)->x_file.x_n.x_offset=(v))
557 #define SA_SET_FILE_FNAME_ZEROS(s,v) (SYM_AUXENT (s)->x_file.x_n.x_zeroes=(v))
558 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
559 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
560 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
563 * Internal use only definitions. SF_ stands for symbol flags.
565 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
567 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
568 * more on the balname/callname hack, see tc-i960.h. b.out is done
572 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
573 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
574 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
575 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
576 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
578 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
580 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
581 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
582 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
583 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
585 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
587 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
588 #define SF_PROCESS (0x00020000) /* Process symbol before write */
589 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
590 #define SF_TAG (0x00080000) /* Is a tag */
591 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
592 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
593 #define SF_ADJ_LNNOPTR (0x00400000) /* Has a lnnoptr */
594 /* All other bits are unused. */
597 #define SF_GET(s) ((s)->sy_symbol.ost_flags)
598 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
599 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
600 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
601 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
602 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
603 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
604 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
605 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
606 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
607 #define SF_GET_DEBUG(s) (SF_GET (s) & SF_DEBUG)
608 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
609 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
610 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
611 #define SF_GET_ADJ_LNNOPTR(s) (SF_GET (s) & SF_ADJ_LNNOPTR)
612 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
613 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
614 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
615 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
616 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
619 #define SF_SET(s,v) (SF_GET (s) = (v))
620 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
621 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
622 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
623 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
624 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
625 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
626 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
627 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
628 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
629 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
630 #define SF_SET_DEBUG(s) (SF_GET (s) |= SF_DEBUG)
631 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
632 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
633 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
634 #define SF_SET_ADJ_LNNOPTR(s) (SF_GET (s) |= SF_ADJ_LNNOPTR)
635 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
636 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
637 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
638 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
639 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
641 /* File header macro and type definition */
644 * File position calculators. Beware to use them when all the
645 * appropriate fields are set in the header.
648 #ifdef OBJ_COFF_OMIT_OPTIONAL_HEADER
649 #define OBJ_COFF_AOUTHDRSZ (0)
651 #define OBJ_COFF_AOUTHDRSZ (AOUTHDRSZ)
652 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
654 #define H_GET_FILE_SIZE(h) \
655 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
656 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
657 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
658 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h) + \
659 H_GET_SYMBOL_TABLE_SIZE(h) + \
660 (h)->string_table_size)
661 #define H_GET_TEXT_FILE_OFFSET(h) \
662 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
663 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ)
664 #define H_GET_DATA_FILE_OFFSET(h) \
665 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
666 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
668 #define H_GET_BSS_FILE_OFFSET(h) 0
669 #define H_GET_RELOCATION_FILE_OFFSET(h) \
670 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
671 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
672 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h))
673 #define H_GET_LINENO_FILE_OFFSET(h) \
674 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
675 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
676 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
677 H_GET_RELOCATION_SIZE(h))
678 #define H_GET_SYMBOL_TABLE_FILE_OFFSET(h) \
679 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
680 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
681 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
682 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h))
686 #define H_GET_MAGIC_NUMBER(h) ((h)->aouthdr.magic)
687 #define H_GET_VERSION_STAMP(h) ((h)->aouthdr.vstamp)
688 #define H_GET_TEXT_SIZE(h) ((h)->aouthdr.tsize)
689 #define H_GET_DATA_SIZE(h) ((h)->aouthdr.dsize)
690 #define H_GET_BSS_SIZE(h) ((h)->aouthdr.bsize)
691 #define H_GET_ENTRY_POINT(h) ((h)->aouthdr.entry)
692 #define H_GET_TEXT_START(h) ((h)->aouthdr.text_start)
693 #define H_GET_DATA_START(h) ((h)->aouthdr.data_start)
695 #define H_GET_FILE_MAGIC_NUMBER(h) ((h)->filehdr.f_magic)
696 #define H_GET_NUMBER_OF_SECTIONS(h) ((h)->filehdr.f_nscns)
697 #define H_GET_TIME_STAMP(h) ((h)->filehdr.f_timdat)
698 #define H_GET_SYMBOL_TABLE_POINTER(h) ((h)->filehdr.f_symptr)
699 #define H_GET_SYMBOL_COUNT(h) ((h)->filehdr.f_nsyms)
700 #define H_GET_SYMBOL_TABLE_SIZE(h) (H_GET_SYMBOL_COUNT(h) * SYMESZ)
701 #define H_GET_SIZEOF_OPTIONAL_HEADER(h) ((h)->filehdr.f_opthdr)
702 #define H_GET_FLAGS(h) ((h)->filehdr.f_flags)
703 /* Extra fields to achieve bsd a.out compatibility and for convenience */
704 #define H_GET_RELOCATION_SIZE(h) ((h)->relocation_size)
705 #define H_GET_STRING_SIZE(h) ((h)->string_table_size)
706 #define H_GET_LINENO_SIZE(h) ((h)->lineno_size)
708 #ifndef OBJ_COFF_OMIT_OPTIONAL_HEADER
709 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
711 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
712 #else /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
713 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
714 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
715 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
717 #define H_GET_TEXT_RELOCATION_SIZE(h) (text_section_header.s_nreloc * RELSZ)
718 #define H_GET_DATA_RELOCATION_SIZE(h) (data_section_header.s_nreloc * RELSZ)
722 #define H_SET_MAGIC_NUMBER(h,v) ((h)->aouthdr.magic = (v))
723 #define H_SET_VERSION_STAMP(h,v) ((h)->aouthdr.vstamp = (v))
724 #define H_SET_TEXT_SIZE(h,v) ((h)->aouthdr.tsize = (v))
725 #define H_SET_DATA_SIZE(h,v) ((h)->aouthdr.dsize = (v))
726 #define H_SET_BSS_SIZE(h,v) ((h)->aouthdr.bsize = (v))
727 #define H_SET_ENTRY_POINT(h,v) ((h)->aouthdr.entry = (v))
728 #define H_SET_TEXT_START(h,v) ((h)->aouthdr.text_start = (v))
729 #define H_SET_DATA_START(h,v) ((h)->aouthdr.data_start = (v))
731 #define H_SET_FILE_MAGIC_NUMBER(h,v) ((h)->filehdr.f_magic = (v))
732 #define H_SET_NUMBER_OF_SECTIONS(h,v) ((h)->filehdr.f_nscns = (v))
733 #define H_SET_TIME_STAMP(h,v) ((h)->filehdr.f_timdat = (v))
734 #define H_SET_SYMBOL_TABLE_POINTER(h,v) ((h)->filehdr.f_symptr = (v))
735 #define H_SET_SYMBOL_TABLE_SIZE(h,v) ((h)->filehdr.f_nsyms = (v))
736 #define H_SET_SIZEOF_OPTIONAL_HEADER(h,v) ((h)->filehdr.f_opthdr = (v))
737 #define H_SET_FLAGS(h,v) ((h)->filehdr.f_flags = (v))
738 /* Extra fields to achieve bsd a.out compatibility and for convinience */
739 #define H_SET_RELOCATION_SIZE(h,t,d) ((h)->relocation_size = (t)+(d))
740 #define H_SET_STRING_SIZE(h,v) ((h)->string_table_size = (v))
741 #define H_SET_LINENO_SIZE(h,v) ((h)->lineno_size = (v))
743 /* Segment flipping */
747 struct internal_aouthdr aouthdr
; /* a.out header */
748 struct internal_filehdr filehdr
; /* File header, not machine dep. */
749 long string_table_size
; /* names + '\0' + sizeof(int) */
750 long relocation_size
; /* Cumulated size of relocation
751 information for all sections in
753 long lineno_size
; /* Size of the line number information
761 struct bfd_internal_lineno line
;
762 char *frag
; /* Frag to which the line number is related */
763 struct lineno_list
*next
; /* Forward chain pointer */
769 #define obj_segment_name(i) (segment_info[(int) (i)].scnhdr.s_name)
771 #define obj_add_segment(s) obj_coff_add_segment (s)
773 extern segT obj_coff_add_segment
PARAMS ((const char *));
775 extern void obj_coff_section
PARAMS ((int));
777 extern void c_dot_file_symbol
PARAMS ((char *filename
));
778 #define obj_app_file c_dot_file_symbol
779 extern void obj_extra_stuff
PARAMS ((object_headers
* headers
));
781 extern segT s_get_segment
PARAMS ((struct symbol
* ptr
));
783 extern void c_section_header
PARAMS ((struct internal_scnhdr
* header
,
794 #ifndef tc_coff_symbol_emit_hook
795 void tc_coff_symbol_emit_hook
PARAMS ((struct symbol
*));
802 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
803 #endif /* no C_LEAFSTAT */
805 extern struct internal_scnhdr data_section_header
;
806 extern struct internal_scnhdr text_section_header
;
808 /* Forward the segment of a forwarded symbol. */
809 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
810 (SF_GET_GET_SEGMENT (dest) \
811 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
815 #define obj_handle_link_once(t) obj_coff_pe_handle_link_once (t)
816 extern void obj_coff_pe_handle_link_once ();
819 #endif /* not BFD_ASSEMBLER */
821 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
822 to redefine the symbol later on. This can happen if C symbols use
823 a prefix, and a symbol is defined both with and without the prefix,
824 as in start/_start/__start in gcc/libgcc1-test.c. */
825 #define RESOLVE_SYMBOL_REDEFINITION(sym) \
826 (SF_GET_GET_SEGMENT (sym) \
827 ? (sym->sy_frag = frag_now, \
828 S_SET_VALUE (sym, frag_now_fix ()), \
829 S_SET_SEGMENT (sym, now_seg), \
833 /* Stabs in a coff file go into their own section. */
834 #define SEPARATE_STAB_SECTIONS 1
836 /* We need 12 bytes at the start of the section to hold some initial
838 extern void obj_coff_init_stab_section
PARAMS ((segT
));
839 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
841 #endif /* OBJ_FORMAT_H */