bfd/elf32-i960.c

   1 /* Intel 960 specific support for 32-bit ELF
   2    Copyright (C) 1999-2018 Free Software Foundation, Inc.
   3
   4    This file is part of BFD, the Binary File Descriptor library.
   5
   6    This program 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 of the License, or
   9    (at your option) any later version.
  10
  11    This program 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 this program; if not, write to the Free Software
  18    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  19    MA 02110-1301, USA.  */
  20
  21 #include "sysdep.h"
  22 #include "bfd.h"
  23 #include "libbfd.h"
  24 #include "elf-bfd.h"
  25 #include "elf/i960.h"
  26
  27 #define USE_REL 1
  28
  29 #define bfd_elf32_bfd_reloc_type_lookup elf32_i960_reloc_type_lookup
  30 #define bfd_elf32_bfd_reloc_name_lookup \
  31   elf32_i960_reloc_name_lookup
  32 #define elf_info_to_howto               elf32_i960_info_to_howto
  33 #define elf_info_to_howto_rel           elf32_i960_info_to_howto_rel
  34
  35 /* ELF relocs are against symbols.  If we are producing relocatable
  36    output, and the reloc is against an external symbol, and nothing
  37    has given us any additional addend, the resulting reloc will also
  38    be against the same symbol.  In such a case, we don't want to
  39    change anything about the way the reloc is handled, since it will
  40    all be done at final link time.  Rather than put special case code
  41    into bfd_perform_relocation, all the reloc types use this howto
  42    function.  It just short circuits the reloc if producing
  43    relocatable output against an external symbol.  */
  44
  45 static bfd_reloc_status_type
  46 elf32_i960_relocate (bfd *abfd ATTRIBUTE_UNUSED,
  47                      arelent *reloc_entry,
  48                      asymbol *symbol,
  49                      void * data ATTRIBUTE_UNUSED,
  50                      asection *input_section,
  51                      bfd *output_bfd,
  52                      char **error_message ATTRIBUTE_UNUSED)
  53 {
  54   /* HACK: I think this first condition is necessary when producing
  55      relocatable output.  After the end of HACK, the code is identical
  56      to bfd_elf_generic_reloc().  I would _guess_ the first change
  57      belongs there rather than here.  martindo 1998-10-23.  */
  58   if (output_bfd != (bfd *) NULL
  59       && reloc_entry->howto->pc_relative
  60       && !reloc_entry->howto->pcrel_offset)
  61     reloc_entry->addend -= symbol->value;
  62
  63   /* This is more dubious.  */
  64   else if (output_bfd != (bfd *) NULL
  65            && (symbol->flags & BSF_SECTION_SYM) != 0)
  66     reloc_entry->addend -= symbol->section->output_section->vma;
  67
  68   else
  69     {
  70       /* ...end of HACK.  */
  71       if (output_bfd != (bfd *) NULL
  72           && (symbol->flags & BSF_SECTION_SYM) == 0
  73           && (! reloc_entry->howto->partial_inplace
  74               || reloc_entry->addend == 0))
  75         {
  76           reloc_entry->address += input_section->output_offset;
  77           return bfd_reloc_ok;
  78         }
  79     }
  80
  81   return bfd_reloc_continue;
  82 }
  83
  84 static reloc_howto_type elf_howto_table[]=
  85 {
  86   HOWTO (R_960_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
  87          elf32_i960_relocate, "R_960_NONE", TRUE,
  88          0x00000000, 0x00000000, FALSE),
  89   EMPTY_HOWTO (1),
  90   HOWTO (R_960_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  91          elf32_i960_relocate, "R_960_32", TRUE,
  92          0xffffffff, 0xffffffff, FALSE),
  93   HOWTO (R_960_IP24, 0, 2, 24, TRUE, 0, complain_overflow_signed,
  94          elf32_i960_relocate, "R_960_IP24 ", TRUE,
  95          0x00ffffff, 0x00ffffff, FALSE),
  96   EMPTY_HOWTO (4),
  97   EMPTY_HOWTO (5),
  98   EMPTY_HOWTO (6),
  99   EMPTY_HOWTO (7)
 100 };
 101
 102 static enum elf_i960_reloc_type
 103 elf32_i960_bfd_to_reloc_type (bfd_reloc_code_real_type code)
 104 {
 105   switch (code)
 106     {
 107     default:
 108       return R_960_NONE;
 109     case BFD_RELOC_I960_CALLJ:
 110       return R_960_OPTCALL;
 111     case BFD_RELOC_32:
 112     case BFD_RELOC_CTOR:
 113       return R_960_32;
 114     case BFD_RELOC_24_PCREL:
 115       return R_960_IP24;
 116     }
 117 }
 118
 119 static void
 120 elf32_i960_info_to_howto (bfd *               abfd ATTRIBUTE_UNUSED,
 121                           arelent *           cache_ptr ATTRIBUTE_UNUSED,
 122                           Elf_Internal_Rela * dst ATTRIBUTE_UNUSED)
 123 {
 124   abort ();
 125 }
 126
 127 static void
 128 elf32_i960_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
 129                               arelent *cache_ptr,
 130                               Elf_Internal_Rela *dst)
 131 {
 132   enum elf_i960_reloc_type type;
 133
 134   type = (enum elf_i960_reloc_type) ELF32_R_TYPE (dst->r_info);
 135
 136   /* PR 17521: file: 9609b8d6.  */
 137   if (type >= R_960_max)
 138     {
 139       /* xgettext:c-format */
 140       _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
 141                           abfd, type);
 142       type = 0;
 143     }
 144
 145   cache_ptr->howto = &elf_howto_table[(int) type];
 146 }
 147
 148 static reloc_howto_type *
 149 elf32_i960_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 150                               bfd_reloc_code_real_type code)
 151 {
 152   return elf_howto_table + elf32_i960_bfd_to_reloc_type (code);
 153 }
 154
 155 static reloc_howto_type *
 156 elf32_i960_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 157                               const char *r_name)
 158 {
 159   unsigned int i;
 160
 161   for (i = 0; i < sizeof (elf_howto_table) / sizeof (elf_howto_table[0]); i++)
 162     if (elf_howto_table[i].name != NULL
 163         && strcasecmp (elf_howto_table[i].name, r_name) == 0)
 164       return &elf_howto_table[i];
 165
 166   return NULL;
 167 }
 168
 169 #define TARGET_LITTLE_SYM       i960_elf32_vec
 170 #define TARGET_LITTLE_NAME      "elf32-i960"
 171 #define ELF_ARCH                bfd_arch_i960
 172 #define ELF_MACHINE_CODE        EM_960
 173 #define ELF_MAXPAGESIZE         1 /* FIXME: This number is wrong,  It should be the page size in bytes.  */
 174
 175 #include "elf32-target.h"