bfd/coff-sparc.c

   1 /* BFD back-end for Sparc COFF files.
   2    Copyright 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
   3    Written by Cygnus Support.
   4
   5 This file is part of BFD, the Binary File Descriptor library.
   6
   7 This program 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 of the License, or
  10 (at your option) any later version.
  11
  12 This program 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.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program; if not, write to the Free Software
  19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  20
  21 #include "bfd.h"
  22 #include "sysdep.h"
  23 #include "libbfd.h"
  24 #include "obstack.h"
  25 #include "coff/sparc.h"
  26 #include "coff/internal.h"
  27 #include "libcoff.h"
  28
  29 #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3)
  30
  31 #define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC)
  32
  33 /* The page size is a guess based on ELF.  */
  34 #define COFF_PAGE_SIZE 0x10000
  35
  36 enum reloc_type
  37   {
  38     R_SPARC_NONE = 0,
  39     R_SPARC_8,          R_SPARC_16,             R_SPARC_32,
  40     R_SPARC_DISP8,      R_SPARC_DISP16,         R_SPARC_DISP32,
  41     R_SPARC_WDISP30,    R_SPARC_WDISP22,
  42     R_SPARC_HI22,       R_SPARC_22,
  43     R_SPARC_13,         R_SPARC_LO10,
  44     R_SPARC_GOT10,      R_SPARC_GOT13,          R_SPARC_GOT22,
  45     R_SPARC_PC10,       R_SPARC_PC22,
  46     R_SPARC_WPLT30,
  47     R_SPARC_COPY,
  48     R_SPARC_GLOB_DAT,   R_SPARC_JMP_SLOT,
  49     R_SPARC_RELATIVE,
  50     R_SPARC_UA32,
  51     R_SPARC_max
  52   };
  53
  54 #if 0
  55 static CONST char *CONST reloc_type_names[] =
  56 {
  57   "R_SPARC_NONE",
  58   "R_SPARC_8",          "R_SPARC_16",           "R_SPARC_32",
  59   "R_SPARC_DISP8",      "R_SPARC_DISP16",       "R_SPARC_DISP32",
  60   "R_SPARC_WDISP30",    "R_SPARC_WDISP22",
  61   "R_SPARC_HI22",       "R_SPARC_22",
  62   "R_SPARC_13",         "R_SPARC_LO10",
  63   "R_SPARC_GOT10",      "R_SPARC_GOT13",        "R_SPARC_GOT22",
  64   "R_SPARC_PC10",       "R_SPARC_PC22",
  65   "R_SPARC_WPLT30",
  66   "R_SPARC_COPY",
  67   "R_SPARC_GLOB_DAT",   "R_SPARC_JMP_SLOT",
  68   "R_SPARC_RELATIVE",
  69   "R_SPARC_UA32",
  70 };
  71 #endif
  72
  73 /* This is stolen pretty directly from elf.c.  */
  74 static bfd_reloc_status_type
  75 bfd_coff_generic_reloc PARAMS ((bfd *, arelent *, asymbol *, PTR,
  76                                 asection *, bfd *, char **));
  77
  78 static bfd_reloc_status_type
  79 bfd_coff_generic_reloc (abfd, reloc_entry, symbol, data, input_section,
  80                         output_bfd, error_message)
  81      bfd *abfd;
  82      arelent *reloc_entry;
  83      asymbol *symbol;
  84      PTR data;
  85      asection *input_section;
  86      bfd *output_bfd;
  87      char **error_message;
  88 {
  89   if (output_bfd != (bfd *) NULL
  90       && (symbol->flags & BSF_SECTION_SYM) == 0
  91       && reloc_entry->addend == 0)
  92     {
  93       reloc_entry->address += input_section->output_offset;
  94       return bfd_reloc_ok;
  95     }
  96
  97   return bfd_reloc_continue;
  98 }
  99
 100 static reloc_howto_type coff_sparc_howto_table[] =
 101 {
 102   HOWTO(R_SPARC_NONE,    0,0, 0,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_NONE",    false,0,0x00000000,true),
 103   HOWTO(R_SPARC_8,       0,0, 8,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8",       false,0,0x000000ff,true),
 104   HOWTO(R_SPARC_16,      0,1,16,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16",      false,0,0x0000ffff,true),
 105   HOWTO(R_SPARC_32,      0,2,32,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32",      false,0,0xffffffff,true),
 106   HOWTO(R_SPARC_DISP8,   0,0, 8,true, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP8",   false,0,0x000000ff,true),
 107   HOWTO(R_SPARC_DISP16,  0,1,16,true, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP16",  false,0,0x0000ffff,true),
 108   HOWTO(R_SPARC_DISP32,  0,2,32,true, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP32",  false,0,0x00ffffff,true),
 109   HOWTO(R_SPARC_WDISP30, 2,2,30,true, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_WDISP30", false,0,0x3fffffff,true),
 110   HOWTO(R_SPARC_WDISP22, 2,2,22,true, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_WDISP22", false,0,0x003fffff,true),
 111   HOWTO(R_SPARC_HI22,   10,2,22,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_HI22",    false,0,0x003fffff,true),
 112   HOWTO(R_SPARC_22,      0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22",      false,0,0x003fffff,true),
 113   HOWTO(R_SPARC_13,      0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13",      false,0,0x00001fff,true),
 114   HOWTO(R_SPARC_LO10,    0,2,10,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_LO10",    false,0,0x000003ff,true),
 115   HOWTO(R_SPARC_GOT10,   0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10",   false,0,0x000003ff,true),
 116   HOWTO(R_SPARC_GOT13,   0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13",   false,0,0x00001fff,true),
 117   HOWTO(R_SPARC_GOT22,  10,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22",   false,0,0x003fffff,true),
 118   HOWTO(R_SPARC_PC10,    0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10",    false,0,0x000003ff,true),
 119   HOWTO(R_SPARC_PC22,    0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22",    false,0,0x003fffff,true),
 120   HOWTO(R_SPARC_WPLT30,  0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_WPLT30",  false,0,0x00000000,true),
 121   HOWTO(R_SPARC_COPY,    0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_COPY",    false,0,0x00000000,true),
 122   HOWTO(R_SPARC_GLOB_DAT,0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_GLOB_DAT",false,0,0x00000000,true),
 123   HOWTO(R_SPARC_JMP_SLOT,0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_JMP_SLOT",false,0,0x00000000,true),
 124   HOWTO(R_SPARC_RELATIVE,0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_RELATIVE",false,0,0x00000000,true),
 125   HOWTO(R_SPARC_UA32,    0,0,00,false,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_UA32",    false,0,0x00000000,true),
 126 };
 127
 128 struct coff_reloc_map {
 129   unsigned char bfd_reloc_val;
 130   unsigned char coff_reloc_val;
 131 };
 132
 133 static CONST struct coff_reloc_map sparc_reloc_map[] =
 134 {
 135   { BFD_RELOC_NONE, R_SPARC_NONE, },
 136   { BFD_RELOC_16, R_SPARC_16, },
 137   { BFD_RELOC_8, R_SPARC_8 },
 138   { BFD_RELOC_8_PCREL, R_SPARC_DISP8 },
 139   { BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits.  */
 140   { BFD_RELOC_32, R_SPARC_32 },
 141   { BFD_RELOC_32_PCREL, R_SPARC_DISP32 },
 142   { BFD_RELOC_HI22, R_SPARC_HI22 },
 143   { BFD_RELOC_LO10, R_SPARC_LO10, },
 144   { BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 },
 145   { BFD_RELOC_SPARC22, R_SPARC_22 },
 146   { BFD_RELOC_SPARC13, R_SPARC_13 },
 147   { BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 },
 148   { BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 },
 149   { BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 },
 150   { BFD_RELOC_SPARC_PC10, R_SPARC_PC10 },
 151   { BFD_RELOC_SPARC_PC22, R_SPARC_PC22 },
 152   { BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 },
 153   { BFD_RELOC_SPARC_COPY, R_SPARC_COPY },
 154   { BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT },
 155   { BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT },
 156   { BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE },
 157   { BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 },
 158   /*  { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */
 159 };
 160
 161 static reloc_howto_type *
 162 coff_sparc_reloc_type_lookup (abfd, code)
 163      bfd *abfd;
 164      bfd_reloc_code_real_type code;
 165 {
 166   unsigned int i;
 167   for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++)
 168     {
 169       if (sparc_reloc_map[i].bfd_reloc_val == code)
 170         return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val];
 171     }
 172   return 0;
 173 }
 174 #define coff_bfd_reloc_type_lookup      coff_sparc_reloc_type_lookup
 175
 176 static void
 177 rtype2howto (cache_ptr, dst)
 178      arelent *cache_ptr;
 179      struct internal_reloc *dst;
 180 {
 181   BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max);
 182   cache_ptr->howto = &coff_sparc_howto_table[dst->r_type];
 183 }
 184
 185 #define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry)
 186
 187 #define SWAP_IN_RELOC_OFFSET    bfd_h_get_32
 188 #define SWAP_OUT_RELOC_OFFSET   bfd_h_put_32
 189 /* This is just like the standard one, except that we don't set up an
 190    addend for relocs against global symbols (otherwise linking objects
 191    created by -r fails), and we add in the reloc offset at the end.  */
 192 #define CALC_ADDEND(abfd, ptr, reloc, cache_ptr)                \
 193   {                                                             \
 194     coff_symbol_type *coffsym = (coff_symbol_type *) NULL;      \
 195     if (ptr && bfd_asymbol_bfd (ptr) != abfd)                   \
 196       coffsym = (obj_symbols (abfd)                             \
 197                  + (cache_ptr->sym_ptr_ptr - symbols));         \
 198     else if (ptr)                                               \
 199       coffsym = coff_symbol_from (abfd, ptr);                   \
 200     if (coffsym != (coff_symbol_type *) NULL                    \
 201         && coffsym->native->u.syment.n_scnum == 0)              \
 202       cache_ptr->addend = 0;                                    \
 203     else if (ptr && bfd_asymbol_bfd (ptr) == abfd               \
 204              && ptr->section != (asection *) NULL               \
 205              && (ptr->flags & BSF_GLOBAL) == 0)                 \
 206       cache_ptr->addend = - (ptr->section->vma + ptr->value);   \
 207     else                                                        \
 208       cache_ptr->addend = 0;                                    \
 209     cache_ptr->addend += reloc.r_offset;                        \
 210   }
 211
 212 /* Clear the r_spare field in relocs.  */
 213 #define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \
 214   do { \
 215        dst->r_spare[0] = 0; \
 216        dst->r_spare[1] = 0; \
 217      } while (0)
 218
 219 #define __A_MAGIC_SET__
 220
 221 /* Enable Sparc-specific hacks in coffcode.h. */
 222
 223 #define COFF_SPARC
 224
 225 #include "coffcode.h"
 226
 227 const bfd_target
 228 #ifdef TARGET_SYM
 229   TARGET_SYM =
 230 #else
 231   sparccoff_vec =
 232 #endif
 233 {
 234 #ifdef TARGET_NAME
 235   TARGET_NAME,
 236 #else
 237   "coff-sparc",                 /* name */
 238 #endif
 239   bfd_target_coff_flavour,
 240   true,                 /* data byte order is big */
 241   true,                 /* header byte order is big */
 242
 243   (HAS_RELOC | EXEC_P |         /* object flags */
 244    HAS_LINENO | HAS_DEBUG |
 245    HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
 246
 247   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
 248   '_',                          /* leading underscore */
 249   '/',                          /* ar_pad_char */
 250   15,                           /* ar_max_namelen */
 251
 252   2,                            /* minimum alignment power */
 253   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
 254      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
 255      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
 256   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
 257      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
 258      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
 259
 260 /* Note that we allow an object file to be treated as a core file as well. */
 261     {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
 262        bfd_generic_archive_p, coff_object_p},
 263     {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
 264        bfd_false},
 265     {bfd_false, coff_write_object_contents, /* bfd_write_contents */
 266        _bfd_write_archive_contents, bfd_false},
 267
 268      BFD_JUMP_TABLE_GENERIC (coff),
 269      BFD_JUMP_TABLE_COPY (coff),
 270      BFD_JUMP_TABLE_CORE (_bfd_nocore),
 271      BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
 272      BFD_JUMP_TABLE_SYMBOLS (coff),
 273      BFD_JUMP_TABLE_RELOCS (coff),
 274      BFD_JUMP_TABLE_WRITE (coff),
 275      BFD_JUMP_TABLE_LINK (coff),
 276      BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
 277
 278   COFF_SWAP_TABLE,
 279 };