gas/config/obj-coff.h

   1 /* coff object file format
   2    Copyright (C) 1989, 1990, 1991, 1992, 1994 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 2, 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
  18    the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  19
  20 #define OBJ_COFF 1
  21
  22 #include "targ-cpu.h"
  23
  24 /* This internal_lineno crap is to stop namespace pollution from the
  25    bfd internal coff headerfile. */
  26
  27 #include "bfd.h"
  28 #define internal_lineno bfd_internal_lineno
  29 #include "coff/internal.h"
  30 #undef internal_lineno
  31
  32 #include "../bfd/libcoff.h"
  33
  34 #ifdef TC_A29K
  35 #include "coff/a29k.h"
  36 #define TARGET_FORMAT "coff-a29k-big"
  37 extern bfd *stdoutput;
  38
  39 #endif /* TC_A29K */
  40
  41 #ifdef TC_I960
  42 #include "coff/i960.h"
  43 #define TARGET_FORMAT "coff-i960-big"
  44 #endif
  45
  46 #ifdef TC_I386
  47 #  include "coff/i386.h"
  48 #  define TARGET_FORMAT "coff-i386"
  49 extern bfd *stdoutput;
  50
  51 #endif /* TC_I386 */
  52
  53 #ifdef TC_M68K
  54 #  include "coff/m68k.h"
  55 #  define TARGET_FORMAT "coff-m68k"
  56 #endif /* TC_M68K */
  57
  58 #ifdef TC_PPC
  59 #include "coff/rs6000.h"
  60 #endif
  61
  62 #ifdef TC_SPARC
  63 #include "coff/sparc.h"
  64 #ifdef TE_LYNX
  65 #define TARGET_FORMAT "coff-sparc-lynx"
  66 #else
  67 #define TARGET_FORMAT "coff-sparc"
  68 #endif
  69 #endif
  70
  71 /* SYMBOL TABLE */
  72
  73 /* targets may also set this */
  74 #ifndef SYMBOLS_NEED_BACKPOINTERS
  75 #define SYMBOLS_NEED_BACKPOINTERS 1
  76 #endif /* SYMBOLS_NEED_BACKPOINTERS */
  77
  78 /* Alter the field names, for now, until we've fixed up the other
  79    references to use the new name.  */
  80 #ifdef TC_I960
  81 #define TC_SYMFIELD_TYPE        struct symbol *
  82 #define sy_tc                   bal
  83 #endif
  84
  85 #define OBJ_SYMFIELD_TYPE       unsigned long
  86 #define sy_obj                  sy_flags
  87
  88 #ifndef OBJ_COFF_MAX_AUXENTRIES
  89 #define OBJ_COFF_MAX_AUXENTRIES 1
  90 #endif
  91
  92
  93 #define SYM_AUXENT(S)   (&coffsymbol ((S)->bsym)->native[1].u.auxent)
  94
  95 #define DO_NOT_STRIP    0
  96 #define DO_STRIP        1
  97
  98 extern void obj_coff_section PARAMS ((int));
  99
 100 /* The number of auxiliary entries */
 101 #define S_GET_NUMBER_AUXILIARY(s)       (coffsymbol((s)->bsym)->native->u.syment.n_numaux)
 102 /* The number of auxiliary entries */
 103 #define S_SET_NUMBER_AUXILIARY(s,v)     (S_GET_NUMBER_AUXILIARY (s) = (v))
 104
 105 /* True if a symbol name is in the string table, i.e. its length is > 8. */
 106 #define S_IS_STRING(s)          (strlen(S_GET_NAME(s)) > 8 ? 1 : 0)
 107
 108 extern int S_SET_DATA_TYPE PARAMS ((struct symbol *, int));
 109 extern int S_SET_STORAGE_CLASS PARAMS ((struct symbol *, int));
 110 extern int S_GET_STORAGE_CLASS PARAMS ((struct symbol *));
 111 extern void SA_SET_SYM_ENDNDX PARAMS ((struct symbol *, struct symbol *));
 112
 113 /* Auxiliary entry macros. SA_ stands for symbol auxiliary */
 114 /* Omit the tv related fields */
 115 /* Accessors */
 116
 117 #define SA_GET_SYM_TAGNDX(s)    (SYM_AUXENT (s)->x_sym.x_tagndx.l)
 118 #define SA_GET_SYM_LNNO(s)      (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno)
 119 #define SA_GET_SYM_SIZE(s)      (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size)
 120 #define SA_GET_SYM_FSIZE(s)     (SYM_AUXENT (s)->x_sym.x_misc.x_fsize)
 121 #define SA_GET_SYM_LNNOPTR(s)   (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr)
 122 #define SA_GET_SYM_ENDNDX(s)    (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_endndx)
 123 #define SA_GET_SYM_DIMEN(s,i)   (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)])
 124 #define SA_GET_FILE_FNAME(s)    (SYM_AUXENT (s)->x_file.x_fname)
 125 #define SA_GET_SCN_SCNLEN(s)    (SYM_AUXENT (s)->x_scn.x_scnlen)
 126 #define SA_GET_SCN_NRELOC(s)    (SYM_AUXENT (s)->x_scn.x_nreloc)
 127 #define SA_GET_SCN_NLINNO(s)    (SYM_AUXENT (s)->x_scn.x_nlinno)
 128
 129 #define SA_SET_SYM_LNNO(s,v)    (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_lnno=(v))
 130 #define SA_SET_SYM_SIZE(s,v)    (SYM_AUXENT (s)->x_sym.x_misc.x_lnsz.x_size=(v))
 131 #define SA_SET_SYM_FSIZE(s,v)   (SYM_AUXENT (s)->x_sym.x_misc.x_fsize=(v))
 132 #define SA_SET_SYM_LNNOPTR(s,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_fcn.x_lnnoptr=(v))
 133 #define SA_SET_SYM_DIMEN(s,i,v) (SYM_AUXENT (s)->x_sym.x_fcnary.x_ary.x_dimen[(i)]=(v))
 134 #define SA_SET_FILE_FNAME(s,v)  strncpy(SYM_AUXENT (s)->x_file.x_fname,(v),FILNMLEN)
 135 #define SA_SET_SCN_SCNLEN(s,v)  (SYM_AUXENT (s)->x_scn.x_scnlen=(v))
 136 #define SA_SET_SCN_NRELOC(s,v)  (SYM_AUXENT (s)->x_scn.x_nreloc=(v))
 137 #define SA_SET_SCN_NLINNO(s,v)  (SYM_AUXENT (s)->x_scn.x_nlinno=(v))
 138
 139 /*
 140  * Internal use only definitions. SF_ stands for symbol flags.
 141  *
 142  * These values can be assigned to sy_symbol.ost_flags field of a symbolS.
 143  *
 144  * You'll break i960 if you shift the SYSPROC bits anywhere else.  for
 145  * more on the balname/callname hack, see tc-i960.h.  b.out is done
 146  * differently.
 147  */
 148
 149 #define SF_I960_MASK    (0x000001ff)    /* Bits 0-8 are used by the i960 port. */
 150 #define SF_SYSPROC      (0x0000003f)    /* bits 0-5 are used to store the sysproc number */
 151 #define SF_IS_SYSPROC   (0x00000040)    /* bit 6 marks symbols that are sysprocs */
 152 #define SF_BALNAME      (0x00000080)    /* bit 7 marks BALNAME symbols */
 153 #define SF_CALLNAME     (0x00000100)    /* bit 8 marks CALLNAME symbols */
 154
 155 #define SF_NORMAL_MASK  (0x0000ffff)    /* bits 12-15 are general purpose. */
 156
 157 #define SF_STATICS      (0x00001000)    /* Mark the .text & all symbols */
 158 #define SF_DEFINED      (0x00002000)    /* Symbol is defined in this file */
 159 #define SF_STRING       (0x00004000)    /* Symbol name length > 8 */
 160 #define SF_LOCAL        (0x00008000)    /* Symbol must not be emitted */
 161
 162 #define SF_DEBUG_MASK   (0xffff0000)    /* bits 16-31 are debug info */
 163
 164 #define SF_FUNCTION     (0x00010000)    /* The symbol is a function */
 165 #define SF_PROCESS      (0x00020000)    /* Process symbol before write */
 166 #define SF_TAGGED       (0x00040000)    /* Is associated with a tag */
 167 #define SF_TAG          (0x00080000)    /* Is a tag */
 168 #define SF_DEBUG        (0x00100000)    /* Is in debug or abs section */
 169 #define SF_GET_SEGMENT  (0x00200000)    /* Get the section of the forward symbol. */
 170 /* All other bits are unused. */
 171
 172 /* Accessors */
 173 #define SF_GET(s)               ((s)->sy_flags)
 174 #define SF_GET_DEBUG(s)         ((s)->bsym->flags & BSF_DEBUGGING)
 175 #define SF_SET_DEBUG(s)         ((s)->bsym->flags |= BSF_DEBUGGING)
 176 #define SF_GET_NORMAL_FIELD(s)  (SF_GET (s) & SF_NORMAL_MASK)
 177 #define SF_GET_DEBUG_FIELD(s)   (SF_GET (s) & SF_DEBUG_MASK)
 178 #define SF_GET_FILE(s)          (SF_GET (s) & SF_FILE)
 179 #define SF_GET_STATICS(s)       (SF_GET (s) & SF_STATICS)
 180 #define SF_GET_DEFINED(s)       (SF_GET (s) & SF_DEFINED)
 181 #define SF_GET_STRING(s)        (SF_GET (s) & SF_STRING)
 182 #define SF_GET_LOCAL(s)         (SF_GET (s) & SF_LOCAL)
 183 #define SF_GET_FUNCTION(s)      (SF_GET (s) & SF_FUNCTION)
 184 #define SF_GET_PROCESS(s)       (SF_GET (s) & SF_PROCESS)
 185 #define SF_GET_TAGGED(s)        (SF_GET (s) & SF_TAGGED)
 186 #define SF_GET_TAG(s)           (SF_GET (s) & SF_TAG)
 187 #define SF_GET_GET_SEGMENT(s)   (SF_GET (s) & SF_GET_SEGMENT)
 188 #define SF_GET_I960(s)          (SF_GET (s) & SF_I960_MASK)     /* used by i960 */
 189 #define SF_GET_BALNAME(s)       (SF_GET (s) & SF_BALNAME)       /* used by i960 */
 190 #define SF_GET_CALLNAME(s)      (SF_GET (s) & SF_CALLNAME)      /* used by i960 */
 191 #define SF_GET_IS_SYSPROC(s)    (SF_GET (s) & SF_IS_SYSPROC)    /* used by i960 */
 192 #define SF_GET_SYSPROC(s)       (SF_GET (s) & SF_SYSPROC)       /* used by i960 */
 193
 194 /* Modifiers */
 195 #define SF_SET(s,v)             (SF_GET (s) = (v))
 196 #define SF_SET_NORMAL_FIELD(s,v)(SF_GET (s) |= ((v) & SF_NORMAL_MASK))
 197 #define SF_SET_DEBUG_FIELD(s,v) (SF_GET (s) |= ((v) & SF_DEBUG_MASK))
 198 #define SF_SET_FILE(s)          (SF_GET (s) |= SF_FILE)
 199 #define SF_SET_STATICS(s)       (SF_GET (s) |= SF_STATICS)
 200 #define SF_SET_DEFINED(s)       (SF_GET (s) |= SF_DEFINED)
 201 #define SF_SET_STRING(s)        (SF_GET (s) |= SF_STRING)
 202 #define SF_SET_LOCAL(s)         (SF_GET (s) |= SF_LOCAL)
 203 #define SF_CLEAR_LOCAL(s)       (SF_GET (s) &= ~SF_LOCAL)
 204 #define SF_SET_FUNCTION(s)      (SF_GET (s) |= SF_FUNCTION)
 205 #define SF_SET_PROCESS(s)       (SF_GET (s) |= SF_PROCESS)
 206 #define SF_SET_TAGGED(s)        (SF_GET (s) |= SF_TAGGED)
 207 #define SF_SET_TAG(s)           (SF_GET (s) |= SF_TAG)
 208 #define SF_SET_GET_SEGMENT(s)   (SF_GET (s) |= SF_GET_SEGMENT)
 209 #define SF_SET_I960(s,v)        (SF_GET (s) |= ((v) & SF_I960_MASK))    /* used by i960 */
 210 #define SF_SET_BALNAME(s)       (SF_GET (s) |= SF_BALNAME)      /* used by i960 */
 211 #define SF_SET_CALLNAME(s)      (SF_GET (s) |= SF_CALLNAME)     /* used by i960 */
 212 #define SF_SET_IS_SYSPROC(s)    (SF_GET (s) |= SF_IS_SYSPROC)   /* used by i960 */
 213 #define SF_SET_SYSPROC(s,v)     (SF_GET (s) |= ((v) & SF_SYSPROC))      /* used by i960 */
 214
 215 /* --------------  Line number handling ------- */
 216 extern int text_lineno_number;
 217 extern int coff_line_base;
 218
 219 #define obj_emit_lineno(WHERE,LINE,FILE_START)  abort ()
 220 extern void coff_add_linesym PARAMS ((struct symbol *));
 221
 222 /* stack stuff */
 223 typedef struct
 224   {
 225     unsigned long chunk_size;
 226     unsigned long element_size;
 227     unsigned long size;
 228     char *data;
 229     unsigned long pointer;
 230   }
 231 stack;
 232
 233 char *stack_pop PARAMS ((stack * st));
 234 char *stack_push PARAMS ((stack * st, char *element));
 235 char *stack_top PARAMS ((stack * st));
 236 stack *stack_init PARAMS ((unsigned long chunk_size,
 237                            unsigned long element_size));
 238 void c_dot_file_symbol PARAMS ((char *filename));
 239 void stack_delete PARAMS ((stack * st));
 240
 241 #ifndef tc_coff_symbol_emit_hook
 242 void tc_coff_symbol_emit_hook PARAMS ((/* symbolS * */));
 243 #endif
 244
 245 extern void coff_frob_symbol PARAMS ((struct symbol *, int *));
 246 extern void coff_frob_file PARAMS ((void));
 247 extern void coff_frob_section PARAMS ((segT));
 248 #define obj_frob_symbol(S,P)    coff_frob_symbol(S,&P)
 249 #define obj_frob_file()         coff_frob_file ()
 250 #define obj_frob_section(S)     coff_frob_section (S)
 251
 252 extern struct symbol *coff_last_function;
 253
 254 /* Forward the segment of a forwarded symbol.  */
 255 #ifndef TE_I386AIX
 256 #define obj_frob_forward_symbol(symp) \
 257   (SF_GET_GET_SEGMENT (symp) \
 258    ? (S_SET_SEGMENT (symp, S_GET_SEGMENT (symp->sy_value.X_add_symbol)), 0) \
 259    : 0)
 260 #else
 261 #define obj_frob_forward_symbol(symp) \
 262   (SF_GET_GET_SEGMENT (symp) && S_GET_SEGMENT (symp) == SEG_UNKNOWN \
 263    ? (S_SET_SEGMENT (symp, S_GET_SEGMENT (symp->sy_value.X_add_symbol)), 0) \
 264    : 0)
 265 #endif
 266
 267 /* sanity check */
 268
 269 #ifdef TC_I960
 270 #ifndef C_LEAFSTAT
 271 hey ! Where is the C_LEAFSTAT definition ? i960 - coff support is depending on it.
 272 #endif /* no C_LEAFSTAT */
 273 #endif /* TC_I960 */
 274
 275 #define SEPARATE_STAB_SECTIONS
 276 /* We need 12 bytes at the start of the section to hold some initial
 277    information.  */
 278 extern void obj_coff_init_stab_section PARAMS ((segT));
 279 #define INIT_STAB_SECTION(seg) obj_coff_init_stab_section (seg)
 280
 281
 282 /* end of obj-coff.h */