1 /* coff object file format
2 Copyright (C) 1989, 90, 91, 92, 94, 95, 96, 97, 98, 99, 2000
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"
121 #define TARGET_FORMAT "pe-shl"
123 #define TARGET_FORMAT \
125 ? (sh_small ? "coff-shl-small" : "coff-shl") \
126 : (sh_small ? "coff-sh-small" : "coff-sh"))
132 #include "coff/mipspe.h"
134 #define TARGET_FORMAT "pe-mips"
138 #include "coff/m88k.h"
139 #define TARGET_FORMAT "coff-m88kbcs"
143 #include "coff/w65.h"
144 #define TARGET_FORMAT "coff-w65"
148 #include "coff/tic30.h"
149 #define TARGET_FORMAT "coff-tic30"
153 #include "coff/tic54x.h"
154 #define TARGET_FORMAT "coff1-c54x"
158 #include "coff/tic80.h"
159 #define TARGET_FORMAT "coff-tic80"
160 #define ALIGNMENT_IN_S_FLAGS 1
164 #include "coff/mcore.h"
165 #ifndef TARGET_FORMAT
166 #define TARGET_FORMAT "pe-mcore"
170 /* Targets may also set this. Also, if BFD_ASSEMBLER is defined, this
171 will already have been defined. */
172 #undef SYMBOLS_NEED_BACKPOINTERS
173 #define SYMBOLS_NEED_BACKPOINTERS 1
175 #ifndef OBJ_COFF_MAX_AUXENTRIES
176 #define OBJ_COFF_MAX_AUXENTRIES 1
177 #endif /* OBJ_COFF_MAX_AUXENTRIES */
179 extern void coff_obj_symbol_new_hook
PARAMS ((symbolS
*));
180 #define obj_symbol_new_hook coff_obj_symbol_new_hook
182 extern void coff_obj_read_begin_hook
PARAMS ((void));
183 #define obj_read_begin_hook coff_obj_read_begin_hook
185 /* ***********************************************************************
187 This file really contains two implementations of the COFF back end.
188 They are in the process of being merged, but this is only a
189 preliminary, mechanical merging. Many definitions that are
190 identical between the two are still found in both versions.
192 The first version, with BFD_ASSEMBLER defined, uses high-level BFD
193 interfaces and data structures. The second version, with
194 BFD_ASSEMBLER not defined, also uses BFD, but mostly for swapping
195 data structures and for doing the actual I/O. The latter defines
196 the preprocessor symbols BFD and BFD_HEADERS. Try not to let this
199 These two are in the process of being merged, and eventually the
200 BFD_ASSEMBLER version should take over completely. Release timing
201 issues and namespace problems convinced me to merge the two
202 together in this fashion, a little sooner than I would have liked.
203 The real merge should be much better done by the time the next
206 For now, the structure of this file is:
214 Unfortunately, the common portions are very small at the moment,
215 and many declarations or definitions are duplicated. The structure
216 of obj-coff.c is similar.
218 See doc/internals.texi for a brief discussion of the history, if
221 Ken Raeburn, 5 May 1994
223 *********************************************************************** */
227 #include "bfd/libcoff.h"
229 #define OUTPUT_FLAVOR bfd_target_coff_flavour
233 /* Alter the field names, for now, until we've fixed up the other
234 references to use the new name. */
236 #define TC_SYMFIELD_TYPE symbolS *
240 #define OBJ_SYMFIELD_TYPE unsigned long
241 #define sy_obj sy_flags
243 #define SYM_AUXENT(S) \
244 (&coffsymbol (symbol_get_bfdsym (S))->native[1].u.auxent)
245 #define SYM_AUXINFO(S) \
246 (&coffsymbol (symbol_get_bfdsym (S))->native[1])
248 #define DO_NOT_STRIP 0
250 extern void obj_coff_section
PARAMS ((int));
252 /* The number of auxiliary entries */
253 #define S_GET_NUMBER_AUXILIARY(s) \
254 (coffsymbol (symbol_get_bfdsym (s))->native->u.syment.n_numaux)
255 /* The number of auxiliary entries */
256 #define S_SET_NUMBER_AUXILIARY(s,v) (S_GET_NUMBER_AUXILIARY (s) = (v))
258 /* True if a symbol name is in the string table, i.e. its length is > 8. */
259 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
261 extern int S_SET_DATA_TYPE
PARAMS ((symbolS
*, int));
262 extern int S_SET_STORAGE_CLASS
PARAMS ((symbolS
*, int));
263 extern int S_GET_STORAGE_CLASS
PARAMS ((symbolS
*));
264 extern void SA_SET_SYM_ENDNDX
PARAMS ((symbolS
*, symbolS
*));
266 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
267 /* Omit the tv related fields */
270 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
271 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
272 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
273 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
274 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
275 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
276 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
277 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
278 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
279 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
280 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
282 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
283 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
284 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
285 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
286 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
287 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
288 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
289 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
290 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
293 * Internal use only definitions. SF_ stands for symbol flags.
295 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
297 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
298 * more on the balname/callname hack, see tc-i960.h. b.out is done
302 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
303 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
304 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
305 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
306 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
308 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
310 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
311 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
312 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
313 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
315 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
317 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
318 #define SF_PROCESS (0x00020000) /* Process symbol before write */
319 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
320 #define SF_TAG (0x00080000) /* Is a tag */
321 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
322 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
323 /* All other bits are unused. */
326 #define SF_GET(s) (*symbol_get_obj (s))
327 #define SF_GET_DEBUG(s) (symbol_get_bfdsym (s)->flags & BSF_DEBUGGING)
328 #define SF_SET_DEBUG(s) (symbol_get_bfdsym (s)->flags |= BSF_DEBUGGING)
329 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
330 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
331 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
332 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
333 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
334 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
335 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
336 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
337 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
338 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
339 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
340 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
341 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
342 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
343 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
344 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
345 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
348 #define SF_SET(s,v) (SF_GET (s) = (v))
349 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
350 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
351 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
352 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
353 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
354 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
355 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
356 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
357 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
358 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
359 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
360 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
361 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
362 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
363 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
364 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
365 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
366 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
368 /* -------------- Line number handling ------- */
369 extern int text_lineno_number
;
370 extern int coff_line_base
;
371 extern int coff_n_line_nos
;
373 #define obj_emit_lineno(WHERE,LINE,FILE_START) abort ()
374 extern void coff_add_linesym
PARAMS ((symbolS
*));
377 void c_dot_file_symbol
PARAMS ((const char *filename
));
378 #define obj_app_file c_dot_file_symbol
380 extern void coff_frob_symbol
PARAMS ((symbolS
*, int *));
381 extern void coff_adjust_symtab
PARAMS ((void));
382 extern void coff_frob_section
PARAMS ((segT
));
383 extern void coff_adjust_section_syms
PARAMS ((bfd
*, asection
*, PTR
));
384 extern void coff_frob_file_after_relocs
PARAMS ((void));
385 #define obj_frob_symbol(S,P) coff_frob_symbol(S,&P)
386 #ifndef obj_adjust_symtab
387 #define obj_adjust_symtab() coff_adjust_symtab()
389 #define obj_frob_section(S) coff_frob_section (S)
390 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
392 extern symbolS
*coff_last_function
;
394 /* Forward the segment of a forwarded symbol, handle assignments that
395 just copy symbol values, etc. */
396 #ifndef OBJ_COPY_SYMBOL_ATTRIBUTES
398 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
399 (SF_GET_GET_SEGMENT (dest) \
400 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
403 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
404 (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
405 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
414 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
415 #endif /* no C_LEAFSTAT */
418 #else /* not BFD_ASSEMBLER */
421 /* Allow translate from aout relocs to coff relocs */
425 #define RELOC_CONST 3
426 #define RELOC_CONSTH 4
427 #define RELOC_JUMPTARG 5
428 #define RELOC_BASE22 6
431 #define RELOC_BASE13 9
432 #define RELOC_WDISP22 10
433 #define RELOC_WDISP30 11
436 extern const segT N_TYPE_seg
[];
438 /* Magic number of paged executable. */
439 #define DEFAULT_MAGIC_NUMBER_FOR_OBJECT_FILE 0x8300
444 /* Symbol table entry data type */
449 struct internal_syment ost_entry
;
450 /* Auxiliary entry. */
451 union internal_auxent ost_auxent
[OBJ_COFF_MAX_AUXENTRIES
];
452 /* obj_coff internal use only flags */
453 unsigned int ost_flags
;
457 #define DO_NOT_STRIP 0
459 /* Symbol table macros and constants */
461 /* Possible and usefull section number in symbol table
462 * The values of TEXT, DATA and BSS may not be portable.
465 #define C_ABS_SECTION N_ABS
466 #define C_UNDEF_SECTION N_UNDEF
467 #define C_DEBUG_SECTION N_DEBUG
468 #define C_NTV_SECTION N_TV
469 #define C_PTV_SECTION P_TV
470 #define C_REGISTER_SECTION 50
473 * Macros to extract information from a symbol table entry.
474 * This syntaxic indirection allows independence regarding a.out or coff.
475 * The argument (s) of all these macros is a pointer to a symbol table entry.
479 /* True if the symbol is external */
480 #define S_IS_EXTERNAL(s) ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION)
481 /* True if symbol has been defined, ie :
482 section > 0 (DATA, TEXT or BSS)
483 section == 0 and value > 0 (external bss symbol) */
484 #define S_IS_DEFINED(s) \
485 ((s)->sy_symbol.ost_entry.n_scnum > C_UNDEF_SECTION \
486 || ((s)->sy_symbol.ost_entry.n_scnum == C_UNDEF_SECTION \
487 && S_GET_VALUE (s) > 0) \
488 || ((s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
489 /* True if a debug special symbol entry */
490 #define S_IS_DEBUG(s) ((s)->sy_symbol.ost_entry.n_scnum == C_DEBUG_SECTION)
491 /* True if a symbol is local symbol name */
492 /* A symbol name whose name includes ^A is a gas internal pseudo symbol */
493 #define S_IS_LOCAL(s) \
494 ((s)->sy_symbol.ost_entry.n_scnum == C_REGISTER_SECTION \
495 || (S_LOCAL_NAME(s) && ! flag_keep_locals && ! S_IS_DEBUG (s)) \
496 || strchr (S_GET_NAME (s), '\001') != NULL \
497 || strchr (S_GET_NAME (s), '\002') != NULL \
498 || (flag_strip_local_absolute \
499 && !S_IS_EXTERNAL(s) \
500 && (s)->sy_symbol.ost_entry.n_scnum == C_ABS_SECTION))
501 /* True if a symbol is not defined in this file */
502 #define S_IS_EXTERN(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
503 && S_GET_VALUE (s) == 0)
505 * True if a symbol can be multiply defined (bss symbols have this def
506 * though it is bad practice)
508 #define S_IS_COMMON(s) ((s)->sy_symbol.ost_entry.n_scnum == 0 \
509 && S_GET_VALUE (s) != 0)
510 /* True if a symbol name is in the string table, i.e. its length is > 8. */
511 #define S_IS_STRING(s) (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
513 /* True if a symbol is defined as weak. */
515 #define S_IS_WEAK(s) \
516 ((s)->sy_symbol.ost_entry.n_sclass == C_NT_WEAK \
517 || (s)->sy_symbol.ost_entry.n_sclass == C_WEAKEXT)
519 #define S_IS_WEAK(s) \
520 ((s)->sy_symbol.ost_entry.n_sclass == C_WEAKEXT)
524 /* The name of the symbol */
525 #define S_GET_NAME(s) ((char*)(s)->sy_symbol.ost_entry.n_offset)
526 /* The pointer to the string table */
527 #define S_GET_OFFSET(s) ((s)->sy_symbol.ost_entry.n_offset)
528 /* The numeric value of the segment */
529 #define S_GET_SEGMENT(s) s_get_segment(s)
531 #define S_GET_DATA_TYPE(s) ((s)->sy_symbol.ost_entry.n_type)
532 /* The storage class */
533 #define S_GET_STORAGE_CLASS(s) ((s)->sy_symbol.ost_entry.n_sclass)
534 /* The number of auxiliary entries */
535 #define S_GET_NUMBER_AUXILIARY(s) ((s)->sy_symbol.ost_entry.n_numaux)
538 /* Set the name of the symbol */
539 #define S_SET_NAME(s,v) ((s)->sy_symbol.ost_entry.n_offset = (unsigned long)(v))
540 /* Set the offset of the symbol */
541 #define S_SET_OFFSET(s,v) ((s)->sy_symbol.ost_entry.n_offset = (v))
542 /* The numeric value of the segment */
543 #define S_SET_SEGMENT(s,v) ((s)->sy_symbol.ost_entry.n_scnum = SEGMENT_TO_SYMBOL_TYPE(v))
545 #define S_SET_DATA_TYPE(s,v) ((s)->sy_symbol.ost_entry.n_type = (v))
546 /* The storage class */
547 #define S_SET_STORAGE_CLASS(s,v) ((s)->sy_symbol.ost_entry.n_sclass = (v))
548 /* The number of auxiliary entries */
549 #define S_SET_NUMBER_AUXILIARY(s,v) ((s)->sy_symbol.ost_entry.n_numaux = (v))
551 /* Additional modifiers */
552 /* The symbol is external (does not mean undefined) */
553 #define S_SET_EXTERNAL(s) { S_SET_STORAGE_CLASS(s, C_EXT) ; SF_CLEAR_LOCAL(s); }
555 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
556 /* Omit the tv related fields */
558 #define SYM_AUXENT(S) (&(S)->sy_symbol.ost_auxent[0])
560 #define SA_GET_SYM_TAGNDX(s) (SYM_AUXENT (s)->x_sym.x_tagndx.l)
561 #define SA_GET_SYM_LNNO(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
562 #define SA_GET_SYM_SIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
563 #define SA_GET_SYM_FSIZE(s) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
564 #define SA_GET_SYM_LNNOPTR(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
565 #define SA_GET_SYM_ENDNDX(s) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l)
566 #define SA_GET_SYM_DIMEN(s,i) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
567 #define SA_GET_FILE_FNAME(s) (SYM_AUXENT (s)->x_file.x_fname)
568 #define SA_GET_FILE_FNAME_OFFSET(s) (SYM_AUXENT (s)->x_file.x_n.x_offset)
569 #define SA_GET_FILE_FNAME_ZEROS(s) (SYM_AUXENT (s)->x_file.x_n.x_zeroes)
570 #define SA_GET_SCN_SCNLEN(s) (SYM_AUXENT (s)->x_scn.x_scnlen)
571 #define SA_GET_SCN_NRELOC(s) (SYM_AUXENT (s)->x_scn.x_nreloc)
572 #define SA_GET_SCN_NLINNO(s) (SYM_AUXENT (s)->x_scn.x_nlinno)
575 #define SA_SET_SYM_TAGNDX(s,v) (SYM_AUXENT (s)->x_sym.x_tagndx.l=(v))
576 #define SA_SET_SYM_LNNO(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
577 #define SA_SET_SYM_SIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
578 #define SA_SET_SYM_FSIZE(s,v) (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
579 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
580 #define SA_SET_SYM_ENDNDX(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx.l=(v))
581 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
582 #define SA_SET_FILE_FNAME(s,v) strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
583 #define SA_SET_FILE_FNAME_OFFSET(s,v) (SYM_AUXENT (s)->x_file.x_n.x_offset=(v))
584 #define SA_SET_FILE_FNAME_ZEROS(s,v) (SYM_AUXENT (s)->x_file.x_n.x_zeroes=(v))
585 #define SA_SET_SCN_SCNLEN(s,v) (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
586 #define SA_SET_SCN_NRELOC(s,v) (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
587 #define SA_SET_SCN_NLINNO(s,v) (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
590 * Internal use only definitions. SF_ stands for symbol flags.
592 * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
594 * You'll break i960 if you shift the SYSPROC bits anywhere else. for
595 * more on the balname/callname hack, see tc-i960.h. b.out is done
599 #define SF_I960_MASK (0x000001ff) /* Bits 0-8 are used by the i960 port. */
600 #define SF_SYSPROC (0x0000003f) /* bits 0-5 are used to store the sysproc number */
601 #define SF_IS_SYSPROC (0x00000040) /* bit 6 marks symbols that are sysprocs */
602 #define SF_BALNAME (0x00000080) /* bit 7 marks BALNAME symbols */
603 #define SF_CALLNAME (0x00000100) /* bit 8 marks CALLNAME symbols */
605 #define SF_NORMAL_MASK (0x0000ffff) /* bits 12-15 are general purpose. */
607 #define SF_STATICS (0x00001000) /* Mark the .text & all symbols */
608 #define SF_DEFINED (0x00002000) /* Symbol is defined in this file */
609 #define SF_STRING (0x00004000) /* Symbol name length > 8 */
610 #define SF_LOCAL (0x00008000) /* Symbol must not be emitted */
612 #define SF_DEBUG_MASK (0xffff0000) /* bits 16-31 are debug info */
614 #define SF_FUNCTION (0x00010000) /* The symbol is a function */
615 #define SF_PROCESS (0x00020000) /* Process symbol before write */
616 #define SF_TAGGED (0x00040000) /* Is associated with a tag */
617 #define SF_TAG (0x00080000) /* Is a tag */
618 #define SF_DEBUG (0x00100000) /* Is in debug or abs section */
619 #define SF_GET_SEGMENT (0x00200000) /* Get the section of the forward symbol. */
620 #define SF_ADJ_LNNOPTR (0x00400000) /* Has a lnnoptr */
621 /* All other bits are unused. */
624 #define SF_GET(s) ((s)->sy_symbol.ost_flags)
625 #define SF_GET_NORMAL_FIELD(s) (SF_GET (s) & SF_NORMAL_MASK)
626 #define SF_GET_DEBUG_FIELD(s) (SF_GET (s) & SF_DEBUG_MASK)
627 #define SF_GET_FILE(s) (SF_GET (s) & SF_FILE)
628 #define SF_GET_STATICS(s) (SF_GET (s) & SF_STATICS)
629 #define SF_GET_DEFINED(s) (SF_GET (s) & SF_DEFINED)
630 #define SF_GET_STRING(s) (SF_GET (s) & SF_STRING)
631 #define SF_GET_LOCAL(s) (SF_GET (s) & SF_LOCAL)
632 #define SF_GET_FUNCTION(s) (SF_GET (s) & SF_FUNCTION)
633 #define SF_GET_PROCESS(s) (SF_GET (s) & SF_PROCESS)
634 #define SF_GET_DEBUG(s) (SF_GET (s) & SF_DEBUG)
635 #define SF_GET_TAGGED(s) (SF_GET (s) & SF_TAGGED)
636 #define SF_GET_TAG(s) (SF_GET (s) & SF_TAG)
637 #define SF_GET_GET_SEGMENT(s) (SF_GET (s) & SF_GET_SEGMENT)
638 #define SF_GET_ADJ_LNNOPTR(s) (SF_GET (s) & SF_ADJ_LNNOPTR)
639 #define SF_GET_I960(s) (SF_GET (s) & SF_I960_MASK) /* used by i960 */
640 #define SF_GET_BALNAME(s) (SF_GET (s) & SF_BALNAME) /* used by i960 */
641 #define SF_GET_CALLNAME(s) (SF_GET (s) & SF_CALLNAME) /* used by i960 */
642 #define SF_GET_IS_SYSPROC(s) (SF_GET (s) & SF_IS_SYSPROC) /* used by i960 */
643 #define SF_GET_SYSPROC(s) (SF_GET (s) & SF_SYSPROC) /* used by i960 */
646 #define SF_SET(s,v) (SF_GET (s) = (v))
647 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
648 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
649 #define SF_SET_FILE(s) (SF_GET (s) |= SF_FILE)
650 #define SF_SET_STATICS(s) (SF_GET (s) |= SF_STATICS)
651 #define SF_SET_DEFINED(s) (SF_GET (s) |= SF_DEFINED)
652 #define SF_SET_STRING(s) (SF_GET (s) |= SF_STRING)
653 #define SF_SET_LOCAL(s) (SF_GET (s) |= SF_LOCAL)
654 #define SF_CLEAR_LOCAL(s) (SF_GET (s) &= ~SF_LOCAL)
655 #define SF_SET_FUNCTION(s) (SF_GET (s) |= SF_FUNCTION)
656 #define SF_SET_PROCESS(s) (SF_GET (s) |= SF_PROCESS)
657 #define SF_SET_DEBUG(s) (SF_GET (s) |= SF_DEBUG)
658 #define SF_SET_TAGGED(s) (SF_GET (s) |= SF_TAGGED)
659 #define SF_SET_TAG(s) (SF_GET (s) |= SF_TAG)
660 #define SF_SET_GET_SEGMENT(s) (SF_GET (s) |= SF_GET_SEGMENT)
661 #define SF_SET_ADJ_LNNOPTR(s) (SF_GET (s) |= SF_ADJ_LNNOPTR)
662 #define SF_SET_I960(s,v) (SF_GET (s) |= ((v) & SF_I960_MASK)) /* used by i960 */
663 #define SF_SET_BALNAME(s) (SF_GET (s) |= SF_BALNAME) /* used by i960 */
664 #define SF_SET_CALLNAME(s) (SF_GET (s) |= SF_CALLNAME) /* used by i960 */
665 #define SF_SET_IS_SYSPROC(s) (SF_GET (s) |= SF_IS_SYSPROC) /* used by i960 */
666 #define SF_SET_SYSPROC(s,v) (SF_GET (s) |= ((v) & SF_SYSPROC)) /* used by i960 */
668 /* File header macro and type definition */
671 * File position calculators. Beware to use them when all the
672 * appropriate fields are set in the header.
675 #ifdef OBJ_COFF_OMIT_OPTIONAL_HEADER
676 #define OBJ_COFF_AOUTHDRSZ (0)
678 #define OBJ_COFF_AOUTHDRSZ (AOUTHDRSZ)
679 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
681 #define H_GET_FILE_SIZE(h) \
682 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
683 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
684 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
685 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h) + \
686 H_GET_SYMBOL_TABLE_SIZE(h) + \
687 (h)->string_table_size)
688 #define H_GET_TEXT_FILE_OFFSET(h) \
689 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
690 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ)
691 #define H_GET_DATA_FILE_OFFSET(h) \
692 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
693 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
695 #define H_GET_BSS_FILE_OFFSET(h) 0
696 #define H_GET_RELOCATION_FILE_OFFSET(h) \
697 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
698 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
699 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h))
700 #define H_GET_LINENO_FILE_OFFSET(h) \
701 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
702 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
703 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
704 H_GET_RELOCATION_SIZE(h))
705 #define H_GET_SYMBOL_TABLE_FILE_OFFSET(h) \
706 (long)(FILHSZ + OBJ_COFF_AOUTHDRSZ + \
707 H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ + \
708 H_GET_TEXT_SIZE(h) + H_GET_DATA_SIZE(h) + \
709 H_GET_RELOCATION_SIZE(h) + H_GET_LINENO_SIZE(h))
713 #define H_GET_MAGIC_NUMBER(h) ((h)->aouthdr.magic)
714 #define H_GET_VERSION_STAMP(h) ((h)->aouthdr.vstamp)
715 #define H_GET_TEXT_SIZE(h) ((h)->aouthdr.tsize)
716 #define H_GET_DATA_SIZE(h) ((h)->aouthdr.dsize)
717 #define H_GET_BSS_SIZE(h) ((h)->aouthdr.bsize)
718 #define H_GET_ENTRY_POINT(h) ((h)->aouthdr.entry)
719 #define H_GET_TEXT_START(h) ((h)->aouthdr.text_start)
720 #define H_GET_DATA_START(h) ((h)->aouthdr.data_start)
722 #define H_GET_FILE_MAGIC_NUMBER(h) ((h)->filehdr.f_magic)
723 #define H_GET_NUMBER_OF_SECTIONS(h) ((h)->filehdr.f_nscns)
724 #define H_GET_TIME_STAMP(h) ((h)->filehdr.f_timdat)
725 #define H_GET_SYMBOL_TABLE_POINTER(h) ((h)->filehdr.f_symptr)
726 #define H_GET_SYMBOL_COUNT(h) ((h)->filehdr.f_nsyms)
727 #define H_GET_SYMBOL_TABLE_SIZE(h) (H_GET_SYMBOL_COUNT(h) * SYMESZ)
728 #define H_GET_SIZEOF_OPTIONAL_HEADER(h) ((h)->filehdr.f_opthdr)
729 #define H_GET_FLAGS(h) ((h)->filehdr.f_flags)
730 /* Extra fields to achieve bsd a.out compatibility and for convenience */
731 #define H_GET_RELOCATION_SIZE(h) ((h)->relocation_size)
732 #define H_GET_STRING_SIZE(h) ((h)->string_table_size)
733 #define H_GET_LINENO_SIZE(h) ((h)->lineno_size)
735 #ifndef OBJ_COFF_OMIT_OPTIONAL_HEADER
736 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
738 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
739 #else /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
740 #define H_GET_HEADER_SIZE(h) (sizeof(FILHDR) \
741 + (H_GET_NUMBER_OF_SECTIONS(h) * SCNHSZ))
742 #endif /* OBJ_COFF_OMIT_OPTIONAL_HEADER */
744 #define H_GET_TEXT_RELOCATION_SIZE(h) (text_section_header.s_nreloc * RELSZ)
745 #define H_GET_DATA_RELOCATION_SIZE(h) (data_section_header.s_nreloc * RELSZ)
749 #define H_SET_MAGIC_NUMBER(h,v) ((h)->aouthdr.magic = (v))
750 #define H_SET_VERSION_STAMP(h,v) ((h)->aouthdr.vstamp = (v))
751 #define H_SET_TEXT_SIZE(h,v) ((h)->aouthdr.tsize = (v))
752 #define H_SET_DATA_SIZE(h,v) ((h)->aouthdr.dsize = (v))
753 #define H_SET_BSS_SIZE(h,v) ((h)->aouthdr.bsize = (v))
754 #define H_SET_ENTRY_POINT(h,v) ((h)->aouthdr.entry = (v))
755 #define H_SET_TEXT_START(h,v) ((h)->aouthdr.text_start = (v))
756 #define H_SET_DATA_START(h,v) ((h)->aouthdr.data_start = (v))
758 #define H_SET_FILE_MAGIC_NUMBER(h,v) ((h)->filehdr.f_magic = (v))
759 #define H_SET_NUMBER_OF_SECTIONS(h,v) ((h)->filehdr.f_nscns = (v))
760 #define H_SET_TIME_STAMP(h,v) ((h)->filehdr.f_timdat = (v))
761 #define H_SET_SYMBOL_TABLE_POINTER(h,v) ((h)->filehdr.f_symptr = (v))
762 #define H_SET_SYMBOL_TABLE_SIZE(h,v) ((h)->filehdr.f_nsyms = (v))
763 #define H_SET_SIZEOF_OPTIONAL_HEADER(h,v) ((h)->filehdr.f_opthdr = (v))
764 #define H_SET_FLAGS(h,v) ((h)->filehdr.f_flags = (v))
765 /* Extra fields to achieve bsd a.out compatibility and for convinience */
766 #define H_SET_RELOCATION_SIZE(h,t,d) ((h)->relocation_size = (t)+(d))
767 #define H_SET_STRING_SIZE(h,v) ((h)->string_table_size = (v))
768 #define H_SET_LINENO_SIZE(h,v) ((h)->lineno_size = (v))
770 /* Segment flipping */
774 struct internal_aouthdr aouthdr
; /* a.out header */
775 struct internal_filehdr filehdr
; /* File header, not machine dep. */
776 long string_table_size
; /* names + '\0' + sizeof(int) */
777 long relocation_size
; /* Cumulated size of relocation
778 information for all sections in
780 long lineno_size
; /* Size of the line number information
788 struct bfd_internal_lineno line
;
789 char *frag
; /* Frag to which the line number is related */
790 struct lineno_list
*next
; /* Forward chain pointer */
796 #define obj_segment_name(i) (segment_info[(int) (i)].scnhdr.s_name)
798 #define obj_add_segment(s) obj_coff_add_segment (s)
800 extern segT obj_coff_add_segment
PARAMS ((const char *));
802 extern void obj_coff_section
PARAMS ((int));
804 extern void c_dot_file_symbol
PARAMS ((char *filename
));
805 #define obj_app_file c_dot_file_symbol
806 extern void obj_extra_stuff
PARAMS ((object_headers
* headers
));
808 extern segT s_get_segment
PARAMS ((symbolS
*ptr
));
810 extern void c_section_header
PARAMS ((struct internal_scnhdr
* header
,
821 #ifndef tc_coff_symbol_emit_hook
822 void tc_coff_symbol_emit_hook
PARAMS ((symbolS
*));
829 hey
! Where is the C_LEAFSTAT definition
? i960
- coff support is depending on it
.
830 #endif /* no C_LEAFSTAT */
832 extern struct internal_scnhdr data_section_header
;
833 extern struct internal_scnhdr text_section_header
;
835 /* Forward the segment of a forwarded symbol. */
836 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
837 (SF_GET_GET_SEGMENT (dest) \
838 ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
842 #define obj_handle_link_once(t) obj_coff_pe_handle_link_once (t)
843 extern void obj_coff_pe_handle_link_once ();
846 #endif /* not BFD_ASSEMBLER */
848 extern const pseudo_typeS coff_pseudo_table
[];
850 #ifndef obj_pop_insert
851 #define obj_pop_insert() pop_insert (coff_pseudo_table)
854 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
855 to redefine the symbol later on. This can happen if C symbols use
856 a prefix, and a symbol is defined both with and without the prefix,
857 as in start/_start/__start in gcc/libgcc1-test.c. */
858 #define RESOLVE_SYMBOL_REDEFINITION(sym) \
859 (SF_GET_GET_SEGMENT (sym) \
860 ? (sym->sy_frag = frag_now, \
861 S_SET_VALUE (sym, frag_now_fix ()), \
862 S_SET_SEGMENT (sym, now_seg), \
866 /* Stabs in a coff file go into their own section. */
867 #define SEPARATE_STAB_SECTIONS 1
869 /* We need 12 bytes at the start of the section to hold some initial
871 extern void obj_coff_init_stab_section
PARAMS ((segT
));
872 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
874 /* Store the number of relocations in the section aux entry. */
875 #define SET_SECTION_RELOCS(sec, relocs, n) \
876 SA_SET_SCN_NRELOC (section_symbol (sec), n)
878 #endif /* OBJ_FORMAT_H */