bfd/coff-m68k.c

   1 /* BFD back-end for Motorola 68000 COFF binaries.
   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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  20
  21 #include "bfd.h"
  22 #include "sysdep.h"
  23 #include "libbfd.h"
  24 #include "obstack.h"
  25 #include "coff/m68k.h"
  26 #include "coff/internal.h"
  27 #include "libcoff.h"
  28
  29 #ifndef LYNX_SPECIAL_FN
  30 #define LYNX_SPECIAL_FN 0
  31 #endif
  32
  33 /* Clean up namespace.  */
  34 #define m68kcoff_howto_table    _bfd_m68kcoff_howto_table
  35 #define m68k_rtype2howto        _bfd_m68kcoff_rtype2howto
  36 #define m68k_howto2rtype        _bfd_m68kcoff_howto2rtype
  37
  38 #ifdef ONLY_DECLARE_RELOCS
  39 extern reloc_howto_type m68kcoff_howto_table[];
  40 #else
  41 reloc_howto_type m68kcoff_howto_table[] =
  42 {
  43   HOWTO(R_RELBYTE,             0,  0,   8,  false, 0, complain_overflow_bitfield, LYNX_SPECIAL_FN, "8", true, 0x000000ff,0x000000ff, false),
  44   HOWTO(R_RELWORD,             0,  1,   16, false, 0, complain_overflow_bitfield, LYNX_SPECIAL_FN, "16",        true, 0x0000ffff,0x0000ffff, false),
  45   HOWTO(R_RELLONG,             0,  2,   32, false, 0, complain_overflow_bitfield, LYNX_SPECIAL_FN, "32",        true, 0xffffffff,0xffffffff, false),
  46   HOWTO(R_PCRBYTE,             0,  0,   8,  true,  0, complain_overflow_signed, LYNX_SPECIAL_FN, "DISP8",    true, 0x000000ff,0x000000ff, false),
  47   HOWTO(R_PCRWORD,             0,  1,   16, true,  0, complain_overflow_signed, LYNX_SPECIAL_FN, "DISP16",   true, 0x0000ffff,0x0000ffff, false),
  48   HOWTO(R_PCRLONG,             0,  2,   32, true,  0, complain_overflow_signed, LYNX_SPECIAL_FN, "DISP32",   true, 0xffffffff,0xffffffff, false),
  49   HOWTO(R_RELLONG_NEG,         0,  -2,  32, false, 0, complain_overflow_bitfield, LYNX_SPECIAL_FN, "-32",       true, 0xffffffff,0xffffffff, false),
  50 };
  51 #endif /* not ONLY_DECLARE_RELOCS */
  52
  53 #ifndef BADMAG
  54 #define BADMAG(x) M68KBADMAG(x)
  55 #endif
  56 #define M68 1           /* Customize coffcode.h */
  57
  58 /* Turn a howto into a reloc number */
  59
  60 #ifdef ONLY_DECLARE_RELOCS
  61 extern void m68k_rtype2howto PARAMS ((arelent *internal, int relocentry));
  62 extern int m68k_howto2rtype PARAMS ((CONST struct reloc_howto_struct *));
  63 #else
  64 void
  65 m68k_rtype2howto(internal, relocentry)
  66      arelent *internal;
  67      int relocentry;
  68 {
  69   switch (relocentry)
  70   {
  71    case R_RELBYTE:      internal->howto = m68kcoff_howto_table + 0; break;
  72    case R_RELWORD:      internal->howto = m68kcoff_howto_table + 1; break;
  73    case R_RELLONG:      internal->howto = m68kcoff_howto_table + 2; break;
  74    case R_PCRBYTE:      internal->howto = m68kcoff_howto_table + 3; break;
  75    case R_PCRWORD:      internal->howto = m68kcoff_howto_table + 4; break;
  76    case R_PCRLONG:      internal->howto = m68kcoff_howto_table + 5; break;
  77    case R_RELLONG_NEG:  internal->howto = m68kcoff_howto_table + 6; break;
  78   }
  79 }
  80
  81 int
  82 m68k_howto2rtype (internal)
  83      CONST struct reloc_howto_struct *internal;
  84 {
  85   if (internal->pc_relative)
  86   {
  87     switch (internal->bitsize)
  88     {
  89      case 32: return R_PCRLONG;
  90      case 16: return R_PCRWORD;
  91      case 8: return R_PCRBYTE;
  92     }
  93   }
  94   else
  95   {
  96     switch (internal->bitsize)
  97      {
  98       case 32: return R_RELLONG;
  99       case 16: return R_RELWORD;
 100       case 8: return R_RELBYTE;
 101      }
 102   }
 103   return R_RELLONG;
 104 }
 105 #endif /* not ONLY_DECLARE_RELOCS */
 106
 107 #define RTYPE2HOWTO(internal, relocentry) \
 108   m68k_rtype2howto(internal, (relocentry)->r_type)
 109
 110 #define SELECT_RELOC(external, internal) \
 111   external.r_type = m68k_howto2rtype(internal);
 112
 113 #include "coffcode.h"
 114
 115 bfd_target
 116 #ifdef TARGET_SYM
 117   TARGET_SYM =
 118 #else
 119   m68kcoff_vec =
 120 #endif
 121 {
 122 #ifdef TARGET_NAME
 123   TARGET_NAME,
 124 #else
 125   "coff-m68k",                  /* name */
 126 #endif
 127   bfd_target_coff_flavour,
 128   true,                         /* data byte order is big */
 129   true,                         /* header byte order is big */
 130
 131   (HAS_RELOC | EXEC_P |         /* object flags */
 132    HAS_LINENO | HAS_DEBUG |
 133    HAS_SYMS | HAS_LOCALS | WP_TEXT),
 134
 135   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
 136 #ifdef NAMES_HAVE_UNDERSCORE
 137   '_',
 138 #else
 139   0,                            /* leading underscore */
 140 #endif
 141   '/',                          /* ar_pad_char */
 142   15,                           /* ar_max_namelen */
 143   1,                            /* minimum section alignment */
 144   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
 145      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
 146      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
 147   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
 148      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
 149      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
 150
 151  {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
 152    bfd_generic_archive_p, _bfd_dummy_target},
 153  {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
 154    bfd_false},
 155  {bfd_false, coff_write_object_contents, /* bfd_write_contents */
 156    _bfd_write_archive_contents, bfd_false},
 157
 158      BFD_JUMP_TABLE_GENERIC (coff),
 159      BFD_JUMP_TABLE_COPY (coff),
 160      BFD_JUMP_TABLE_CORE (_bfd_nocore),
 161      BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
 162      BFD_JUMP_TABLE_SYMBOLS (coff),
 163      BFD_JUMP_TABLE_RELOCS (coff),
 164      BFD_JUMP_TABLE_WRITE (coff),
 165      BFD_JUMP_TABLE_LINK (coff),
 166
 167   COFF_SWAP_TABLE
 168  };