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