gas/config/obj-coff.h

   1 /* coff object file format
   2    Copyright (C) 1989-2023 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_AARCH64
  44 #include "coff/aarch64.h"
  45 #endif
  46
  47 #ifdef TC_PPC
  48 #include "coff/rs6000.h"
  49 #endif
  50
  51 #ifdef TC_I386
  52 #ifdef TE_PEP
  53 #include "coff/x86_64.h"
  54 #else
  55 #include "coff/i386.h"
  56 #endif
  57
  58 #ifndef TARGET_FORMAT
  59 #ifdef TE_PEP
  60 #define TARGET_FORMAT "coff-x86-64"
  61 #else
  62 #define TARGET_FORMAT "coff-i386"
  63 #endif
  64 #endif
  65 #endif
  66
  67 #ifdef TC_Z80
  68 #include "coff/z80.h"
  69 #define TARGET_FORMAT "coff-z80"
  70 #endif
  71
  72 #ifdef TC_Z8K
  73 #include "coff/z8k.h"
  74 #define TARGET_FORMAT "coff-z8k"
  75 #endif
  76
  77 #ifdef TC_SH
  78
  79 #ifdef TE_PE
  80 #define COFF_WITH_PE
  81 #endif
  82
  83 #include "coff/sh.h"
  84
  85 #ifdef TE_PE
  86 #define TARGET_FORMAT "pe-shl"
  87 #else
  88
  89 #define TARGET_FORMAT                                   \
  90   (!target_big_endian                                   \
  91    ? (sh_small ? "coff-shl-small" : "coff-shl")         \
  92    : (sh_small ? "coff-sh-small" : "coff-sh"))
  93
  94 #endif
  95 #endif
  96
  97 #ifdef TC_TIC30
  98 #include "coff/tic30.h"
  99 #define TARGET_FORMAT "coff-tic30"
 100 #endif
 101
 102 #ifdef TC_TIC4X
 103 #include "coff/tic4x.h"
 104 #define TARGET_FORMAT "coff2-tic4x"
 105 #endif
 106
 107 #ifdef TC_TIC54X
 108 #include "coff/tic54x.h"
 109 #define TARGET_FORMAT "coff1-c54x"
 110 #endif
 111
 112 #ifdef TC_MCORE
 113 #include "coff/mcore.h"
 114 #ifndef TARGET_FORMAT
 115 #define TARGET_FORMAT "pe-mcore"
 116 #endif
 117 #endif
 118
 119 #ifdef TE_PE
 120 #define obj_set_weak_hook pecoff_obj_set_weak_hook
 121 #define obj_clear_weak_hook pecoff_obj_clear_weak_hook
 122 #endif
 123
 124 #ifndef OBJ_COFF_MAX_AUXENTRIES
 125 #define OBJ_COFF_MAX_AUXENTRIES 1
 126 #endif
 127
 128 #define obj_symbol_new_hook coff_obj_symbol_new_hook
 129 #define obj_symbol_clone_hook coff_obj_symbol_clone_hook
 130 #define obj_read_begin_hook coff_obj_read_begin_hook
 131
 132 #include "bfd/libcoff.h"
 133
 134 #define OUTPUT_FLAVOR bfd_target_coff_flavour
 135
 136 /* COFF symbol flags.  See SF_* macros.  */
 137 #define OBJ_SYMFIELD_TYPE       unsigned long
 138
 139 /* We can't use the predefined section symbols in bfd/section.c, as
 140    COFF symbols have extra fields.  See bfd/libcoff.h:coff_symbol_type.  */
 141 #ifndef obj_sec_sym_ok_for_reloc
 142 #define obj_sec_sym_ok_for_reloc(SEC)   ((SEC)->owner != 0)
 143 #endif
 144
 145 #define SYM_AUXENT(S) \
 146   (&coffsymbol (symbol_get_bfdsym (S))->native[1].u.auxent)
 147 #define SYM_AUXINFO(S) \
 148   (&coffsymbol (symbol_get_bfdsym (S))->native[1])
 149
 150 /* The number of auxiliary entries.  */
 151 #define S_GET_NUMBER_AUXILIARY(s) \
 152   (coffsymbol (symbol_get_bfdsym (s))->native->u.syment.n_numaux)
 153 /* The number of auxiliary entries.  */
 154 #define S_SET_NUMBER_AUXILIARY(s, v)    (S_GET_NUMBER_AUXILIARY (s) = (v))
 155
 156 /* True if a symbol name is in the string table, i.e. its length is > 8.  */
 157 #define S_IS_STRING(s)          (strlen (S_GET_NAME (s)) > 8 ? 1 : 0)
 158
 159 /* Auxiliary entry macros. SA_ stands for symbol auxiliary.  */
 160 /* Omit the tv related fields.  */
 161 /* Accessors.  */
 162
 163 #define SA_GET_SYM_TAGNDX(s)    (SYM_AUXENT (s)->x_sym.x_tagndx.l)
 164 #define SA_GET_SYM_LNNO(s)      (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
 165 #define SA_GET_SYM_SIZE(s)      (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
 166 #define SA_GET_SYM_FSIZE(s)     (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
 167 #define SA_GET_SYM_LNNOPTR(s)   (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
 168 #define SA_GET_SYM_ENDNDX(s)    (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
 169 #define SA_GET_SYM_DIMEN(s,i)   (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
 170 #define SA_GET_FILE_FNAME(s)    (SYM_AUXENT (s)->x_file.x_fname)
 171 #define SA_GET_SCN_SCNLEN(s)    (SYM_AUXENT (s)->x_scn.x_scnlen)
 172 #define SA_GET_SCN_NRELOC(s)    (SYM_AUXENT (s)->x_scn.x_nreloc)
 173 #define SA_GET_SCN_NLINNO(s)    (SYM_AUXENT (s)->x_scn.x_nlinno)
 174
 175 #define SA_SET_SYM_LNNO(s,v)    (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno = (v))
 176 #define SA_SET_SYM_SIZE(s,v)    (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size = (v))
 177 #define SA_SET_SYM_FSIZE(s,v)   (SYM_AUXENT (s)->x_sym.x_misc.x_fsize = (v))
 178 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr = (v))
 179 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)] = (v))
 180 #define SA_SET_FILE_FNAME(s,v)  strncpy (SYM_AUXENT (s)->x_file.x_fname, (v), FILNMLEN)
 181 #define SA_SET_SCN_SCNLEN(s,v)  (SYM_AUXENT (s)->x_scn.x_scnlen = (v))
 182 #define SA_SET_SCN_NRELOC(s,v)  (SYM_AUXENT (s)->x_scn.x_nreloc = (v))
 183 #define SA_SET_SCN_NLINNO(s,v)  (SYM_AUXENT (s)->x_scn.x_nlinno = (v))
 184
 185 #ifdef OBJ_XCOFF
 186 #define SA_GET_SECT_SCNLEN(s)   (SYM_AUXENT (s)->x_sect.x_scnlen)
 187 #define SA_GET_SECT_NRELOC(s)   (SYM_AUXENT (s)->x_sect.x_nreloc)
 188 #define SA_SET_SECT_SCNLEN(s,v) (SYM_AUXENT (s)->x_sect.x_scnlen = (v))
 189 #define SA_SET_SECT_NRELOC(s,v) (SYM_AUXENT (s)->x_sect.x_nreloc = (v))
 190 #endif
 191
 192 /* Internal use only definitions.  SF_ stands for symbol flags.  These
 193    values can be assigned to OBJ_SYMFIELD_TYPE obj field of a symbolS.  */
 194
 195 #define SF_NORMAL_MASK  0x0000ffff      /* bits 12-15 are general purpose.  */
 196
 197 #define SF_STATICS      0x00001000      /* Mark the .text & all symbols.  */
 198 #define SF_DEFINED      0x00002000      /* Symbol is defined in this file.  */
 199 #define SF_STRING       0x00004000      /* Symbol name length > 8.  */
 200 #define SF_LOCAL        0x00008000      /* Symbol must not be emitted.  */
 201
 202 #define SF_DEBUG_MASK   0xffff0000      /* bits 16-31 are debug info.  */
 203
 204 #define SF_FUNCTION     0x00010000      /* The symbol is a function.  */
 205 #define SF_PROCESS      0x00020000      /* Process symbol before write.  */
 206 #define SF_TAGGED       0x00040000      /* Is associated with a tag.  */
 207 #define SF_TAG          0x00080000      /* Is a tag.  */
 208 #define SF_DEBUG        0x00100000      /* Is in debug or abs section.  */
 209 #define SF_GET_SEGMENT  0x00200000      /* Get the section of the forward symbol.  */
 210 /* All other bits are unused.  */
 211
 212 /* Accessors.  */
 213 #define SF_GET(s)               (* symbol_get_obj (s))
 214 #define SF_GET_DEBUG(s)         (symbol_get_bfdsym (s)->flags & BSF_DEBUGGING)
 215 #define SF_SET_DEBUG(s)         (symbol_get_bfdsym (s)->flags |= BSF_DEBUGGING)
 216 #define SF_GET_NORMAL_FIELD(s)  (SF_GET (s) & SF_NORMAL_MASK)
 217 #define SF_GET_DEBUG_FIELD(s)   (SF_GET (s) & SF_DEBUG_MASK)
 218 #define SF_GET_FILE(s)          (SF_GET (s) & SF_FILE)
 219 #define SF_GET_STATICS(s)       (SF_GET (s) & SF_STATICS)
 220 #define SF_GET_DEFINED(s)       (SF_GET (s) & SF_DEFINED)
 221 #define SF_GET_STRING(s)        (SF_GET (s) & SF_STRING)
 222 #define SF_GET_LOCAL(s)         (SF_GET (s) & SF_LOCAL)
 223 #define SF_GET_FUNCTION(s)      (SF_GET (s) & SF_FUNCTION)
 224 #define SF_GET_PROCESS(s)       (SF_GET (s) & SF_PROCESS)
 225 #define SF_GET_TAGGED(s)        (SF_GET (s) & SF_TAGGED)
 226 #define SF_GET_TAG(s)           (SF_GET (s) & SF_TAG)
 227 #define SF_GET_GET_SEGMENT(s)   (SF_GET (s) & SF_GET_SEGMENT)
 228
 229 /* Modifiers.  */
 230 #define SF_SET(s,v)             (SF_GET (s) = (v))
 231 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
 232 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
 233 #define SF_SET_FILE(s)          (SF_GET (s) |= SF_FILE)
 234 #define SF_SET_STATICS(s)       (SF_GET (s) |= SF_STATICS)
 235 #define SF_SET_DEFINED(s)       (SF_GET (s) |= SF_DEFINED)
 236 #define SF_SET_STRING(s)        (SF_GET (s) |= SF_STRING)
 237 #define SF_SET_LOCAL(s)         (SF_GET (s) |= SF_LOCAL)
 238 #define SF_CLEAR_LOCAL(s)       (SF_GET (s) &= ~SF_LOCAL)
 239 #define SF_SET_FUNCTION(s)      (SF_GET (s) |= SF_FUNCTION)
 240 #define SF_SET_PROCESS(s)       (SF_GET (s) |= SF_PROCESS)
 241 #define SF_SET_TAGGED(s)        (SF_GET (s) |= SF_TAGGED)
 242 #define SF_SET_TAG(s)           (SF_GET (s) |= SF_TAG)
 243 #define SF_SET_GET_SEGMENT(s)   (SF_GET (s) |= SF_GET_SEGMENT)
 244
 245
 246 /*  Line number handling.  */
 247 extern int text_lineno_number;
 248 extern int coff_line_base;
 249 extern int coff_n_line_nos;
 250 extern symbolS *coff_last_function;
 251
 252 #define obj_emit_lineno(WHERE, LINE, FILE_START)        abort ()
 253 #define obj_app_file(name)           c_dot_file_symbol (name)
 254 #define obj_frob_symbol(S,P)         coff_frob_symbol (S, & P)
 255 #define obj_frob_section(S)          coff_frob_section (S)
 256 #define obj_frob_file_after_relocs() coff_frob_file_after_relocs ()
 257 #ifndef obj_adjust_symtab
 258 #define obj_adjust_symtab()          coff_adjust_symtab ()
 259 #endif
 260
 261 /* Forward the segment of a forwarded symbol, handle assignments that
 262    just copy symbol values, etc.  */
 263 #ifndef OBJ_COPY_SYMBOL_ATTRIBUTES
 264 #ifndef TE_I386AIX
 265 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
 266   (SF_GET_GET_SEGMENT (dest) \
 267    ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
 268    : 0)
 269 #else
 270 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest, src) \
 271   (SF_GET_GET_SEGMENT (dest) && S_GET_SEGMENT (dest) == SEG_UNKNOWN \
 272    ? (S_SET_SEGMENT (dest, S_GET_SEGMENT (src)), 0) \
 273    : 0)
 274 #endif
 275 #endif
 276
 277 /* Sanity check.  */
 278
 279 extern const pseudo_typeS coff_pseudo_table[];
 280
 281 #ifndef obj_pop_insert
 282 #define obj_pop_insert() pop_insert (coff_pseudo_table)
 283 #endif
 284
 285 /* In COFF, if a symbol is defined using .def/.val SYM/.endef, it's OK
 286    to redefine the symbol later on.  This can happen if C symbols use
 287    a prefix, and a symbol is defined both with and without the prefix,
 288    as in start/_start/__start in gcc/libgcc1-test.c.  */
 289 #define RESOLVE_SYMBOL_REDEFINITION(sym)                \
 290 (SF_GET_GET_SEGMENT (sym)                               \
 291  ? (sym->frag = frag_now,                               \
 292     S_SET_VALUE (sym, frag_now_fix ()),                 \
 293     S_SET_SEGMENT (sym, now_seg),                       \
 294     0)                                                  \
 295  : 0)
 296
 297 /* Stabs in a coff file go into their own section.  */
 298 #define SEPARATE_STAB_SECTIONS 1
 299
 300 /* We need 12 bytes at the start of the section to hold some initial
 301    information.  */
 302 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
 303
 304 /* Store the number of relocations in the section aux entry.  */
 305 #ifdef OBJ_XCOFF
 306 #define SET_SECTION_RELOCS(sec, relocs, n)              \
 307   do {                                                  \
 308     symbolS * sectSym = section_symbol (sec);           \
 309     if (S_GET_STORAGE_CLASS (sectSym) == C_DWARF)       \
 310       SA_SET_SECT_NRELOC (sectSym, n);                  \
 311     else                                                \
 312       SA_SET_SCN_NRELOC (sectSym, n);                   \
 313   } while (0)
 314 #else
 315 #define SET_SECTION_RELOCS(sec, relocs, n) \
 316   SA_SET_SCN_NRELOC (section_symbol (sec), n)
 317 #endif
 318
 319 extern int  S_SET_DATA_TYPE              (symbolS *, int);
 320 extern int  S_SET_STORAGE_CLASS          (symbolS *, int);
 321 extern int  S_GET_STORAGE_CLASS          (symbolS *);
 322 extern void SA_SET_SYM_ENDNDX            (symbolS *, symbolS *);
 323 extern void coff_add_linesym             (symbolS *);
 324 extern void c_dot_file_symbol            (const char *);
 325 extern void coff_frob_symbol             (symbolS *, int *);
 326 extern void coff_adjust_symtab           (void);
 327 extern void coff_frob_section            (segT);
 328 extern void coff_adjust_section_syms     (bfd *, asection *, void *);
 329 extern void coff_frob_file_after_relocs  (void);
 330 extern void coff_obj_symbol_new_hook     (symbolS *);
 331 extern void coff_obj_symbol_clone_hook   (symbolS *, symbolS *);
 332 extern void coff_obj_read_begin_hook     (void);
 333 #ifdef TE_PE
 334 extern void pecoff_obj_set_weak_hook     (symbolS *);
 335 extern void pecoff_obj_clear_weak_hook   (symbolS *);
 336 #endif
 337 extern void obj_coff_section             (int);
 338 extern segT obj_coff_add_segment         (const char *);
 339 extern void obj_coff_section             (int);
 340 extern segT s_get_segment                (symbolS *);
 341 #ifndef tc_coff_symbol_emit_hook
 342 extern void tc_coff_symbol_emit_hook     (symbolS *);
 343 #endif
 344 extern void obj_coff_pe_handle_link_once (void);
 345 extern void obj_coff_init_stab_section   (segT);
 346 extern void c_section_header             (struct internal_scnhdr *,
 347                                           char *, long, long, long, long,
 348                                           long, long, long, long);
 349 extern void obj_coff_seh_do_final (void);
 350
 351 #ifndef obj_coff_generate_pdata
 352 #define obj_coff_generate_pdata obj_coff_seh_do_final
 353 #endif
 354
 355
 356 #endif /* OBJ_FORMAT_H */