bfd/elf-m10200.c

   1 /* Matsushita 10200 specific support for 32-bit ELF
   2    Copyright (C) 1996-2016 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
  26 static bfd_boolean
  27 mn10200_elf_relax_delete_bytes (bfd *, asection *, bfd_vma, int);
  28 static bfd_boolean
  29 mn10200_elf_symbol_address_p (bfd *, asection *, Elf_Internal_Sym *, bfd_vma);
  30
  31 enum reloc_type
  32 {
  33   R_MN10200_NONE = 0,
  34   R_MN10200_32,
  35   R_MN10200_16,
  36   R_MN10200_8,
  37   R_MN10200_24,
  38   R_MN10200_PCREL8,
  39   R_MN10200_PCREL16,
  40   R_MN10200_PCREL24,
  41   R_MN10200_MAX
  42 };
  43
  44 static reloc_howto_type elf_mn10200_howto_table[] =
  45 {
  46   /* Dummy relocation.  Does nothing.  */
  47   HOWTO (R_MN10200_NONE,
  48          0,
  49          3,
  50          0,
  51          FALSE,
  52          0,
  53          complain_overflow_dont,
  54          bfd_elf_generic_reloc,
  55          "R_MN10200_NONE",
  56          FALSE,
  57          0,
  58          0,
  59          FALSE),
  60   /* Standard 32 bit reloc.  */
  61   HOWTO (R_MN10200_32,
  62          0,
  63          2,
  64          32,
  65          FALSE,
  66          0,
  67          complain_overflow_bitfield,
  68          bfd_elf_generic_reloc,
  69          "R_MN10200_32",
  70          FALSE,
  71          0xffffffff,
  72          0xffffffff,
  73          FALSE),
  74   /* Standard 16 bit reloc.  */
  75   HOWTO (R_MN10200_16,
  76          0,
  77          1,
  78          16,
  79          FALSE,
  80          0,
  81          complain_overflow_bitfield,
  82          bfd_elf_generic_reloc,
  83          "R_MN10200_16",
  84          FALSE,
  85          0xffff,
  86          0xffff,
  87          FALSE),
  88   /* Standard 8 bit reloc.  */
  89   HOWTO (R_MN10200_8,
  90          0,
  91          0,
  92          8,
  93          FALSE,
  94          0,
  95          complain_overflow_bitfield,
  96          bfd_elf_generic_reloc,
  97          "R_MN10200_8",
  98          FALSE,
  99          0xff,
 100          0xff,
 101          FALSE),
 102   /* Standard 24 bit reloc.  */
 103   HOWTO (R_MN10200_24,
 104          0,
 105          2,
 106          24,
 107          FALSE,
 108          0,
 109          complain_overflow_bitfield,
 110          bfd_elf_generic_reloc,
 111          "R_MN10200_24",
 112          FALSE,
 113          0xffffff,
 114          0xffffff,
 115          FALSE),
 116   /* Simple 8 pc-relative reloc.  */
 117   HOWTO (R_MN10200_PCREL8,
 118          0,
 119          0,
 120          8,
 121          TRUE,
 122          0,
 123          complain_overflow_bitfield,
 124          bfd_elf_generic_reloc,
 125          "R_MN10200_PCREL8",
 126          FALSE,
 127          0xff,
 128          0xff,
 129          TRUE),
 130   /* Simple 16 pc-relative reloc.  */
 131   HOWTO (R_MN10200_PCREL16,
 132          0,
 133          1,
 134          16,
 135          TRUE,
 136          0,
 137          complain_overflow_bitfield,
 138          bfd_elf_generic_reloc,
 139          "R_MN10200_PCREL16",
 140          FALSE,
 141          0xffff,
 142          0xffff,
 143          TRUE),
 144   /* Simple 32bit pc-relative reloc with a 1 byte adjustment
 145      to get the pc-relative offset correct.  */
 146   HOWTO (R_MN10200_PCREL24,
 147          0,
 148          2,
 149          24,
 150          TRUE,
 151          0,
 152          complain_overflow_bitfield,
 153          bfd_elf_generic_reloc,
 154          "R_MN10200_PCREL24",
 155          FALSE,
 156          0xffffff,
 157          0xffffff,
 158          TRUE),
 159 };
 160
 161 struct mn10200_reloc_map
 162 {
 163   bfd_reloc_code_real_type bfd_reloc_val;
 164   unsigned char elf_reloc_val;
 165 };
 166
 167 static const struct mn10200_reloc_map mn10200_reloc_map[] =
 168 {
 169   { BFD_RELOC_NONE    , R_MN10200_NONE   , },
 170   { BFD_RELOC_32      , R_MN10200_32     , },
 171   { BFD_RELOC_16      , R_MN10200_16     , },
 172   { BFD_RELOC_8       , R_MN10200_8      , },
 173   { BFD_RELOC_24      , R_MN10200_24     , },
 174   { BFD_RELOC_8_PCREL , R_MN10200_PCREL8 , },
 175   { BFD_RELOC_16_PCREL, R_MN10200_PCREL16, },
 176   { BFD_RELOC_24_PCREL, R_MN10200_PCREL24, },
 177 };
 178
 179 static reloc_howto_type *
 180 bfd_elf32_bfd_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 181                                  bfd_reloc_code_real_type code)
 182 {
 183   unsigned int i;
 184
 185   for (i = 0;
 186        i < sizeof (mn10200_reloc_map) / sizeof (struct mn10200_reloc_map);
 187        i++)
 188     {
 189       if (mn10200_reloc_map[i].bfd_reloc_val == code)
 190         return &elf_mn10200_howto_table[mn10200_reloc_map[i].elf_reloc_val];
 191     }
 192
 193   return NULL;
 194 }
 195
 196 static reloc_howto_type *
 197 bfd_elf32_bfd_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 198                                  const char *r_name)
 199 {
 200   unsigned int i;
 201
 202   for (i = 0;
 203        i < (sizeof (elf_mn10200_howto_table)
 204             / sizeof (elf_mn10200_howto_table[0]));
 205        i++)
 206     if (elf_mn10200_howto_table[i].name != NULL
 207         && strcasecmp (elf_mn10200_howto_table[i].name, r_name) == 0)
 208       return &elf_mn10200_howto_table[i];
 209
 210   return NULL;
 211 }
 212
 213 /* Set the howto pointer for an MN10200 ELF reloc.  */
 214
 215 static void
 216 mn10200_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
 217                        arelent *cache_ptr,
 218                        Elf_Internal_Rela *dst)
 219 {
 220   unsigned int r_type;
 221
 222   r_type = ELF32_R_TYPE (dst->r_info);
 223   BFD_ASSERT (r_type < (unsigned int) R_MN10200_MAX);
 224   cache_ptr->howto = &elf_mn10200_howto_table[r_type];
 225 }
 226
 227 /* Perform a relocation as part of a final link.  */
 228
 229 static bfd_reloc_status_type
 230 mn10200_elf_final_link_relocate (reloc_howto_type *howto,
 231                                  bfd *input_bfd,
 232                                  bfd *output_bfd ATTRIBUTE_UNUSED,
 233                                  asection *input_section,
 234                                  bfd_byte *contents,
 235                                  bfd_vma offset,
 236                                  bfd_vma value,
 237                                  bfd_vma addend,
 238                                  struct bfd_link_info *info ATTRIBUTE_UNUSED,
 239                                  asection *sym_sec ATTRIBUTE_UNUSED,
 240                                  int is_local ATTRIBUTE_UNUSED)
 241 {
 242   unsigned long r_type = howto->type;
 243   bfd_byte *hit_data = contents + offset;
 244
 245   switch (r_type)
 246     {
 247
 248     case R_MN10200_NONE:
 249       return bfd_reloc_ok;
 250
 251     case R_MN10200_32:
 252       value += addend;
 253       bfd_put_32 (input_bfd, value, hit_data);
 254       return bfd_reloc_ok;
 255
 256     case R_MN10200_16:
 257       value += addend;
 258
 259       if ((long) value > 0x7fff || (long) value < -0x8000)
 260         return bfd_reloc_overflow;
 261
 262       bfd_put_16 (input_bfd, value, hit_data);
 263       return bfd_reloc_ok;
 264
 265     case R_MN10200_8:
 266       value += addend;
 267
 268       if ((long) value > 0x7f || (long) value < -0x80)
 269         return bfd_reloc_overflow;
 270
 271       bfd_put_8 (input_bfd, value, hit_data);
 272       return bfd_reloc_ok;
 273
 274     case R_MN10200_24:
 275       value += addend;
 276
 277       if ((long) value > 0x7fffff || (long) value < -0x800000)
 278         return bfd_reloc_overflow;
 279
 280       value &= 0xffffff;
 281       value |= (bfd_get_32 (input_bfd, hit_data) & 0xff000000);
 282       bfd_put_32 (input_bfd, value, hit_data);
 283       return bfd_reloc_ok;
 284
 285     case R_MN10200_PCREL8:
 286       value -= (input_section->output_section->vma
 287                 + input_section->output_offset);
 288       value -= (offset + 1);
 289       value += addend;
 290
 291       if ((long) value > 0xff || (long) value < -0x100)
 292         return bfd_reloc_overflow;
 293
 294       bfd_put_8 (input_bfd, value, hit_data);
 295       return bfd_reloc_ok;
 296
 297     case R_MN10200_PCREL16:
 298       value -= (input_section->output_section->vma
 299                 + input_section->output_offset);
 300       value -= (offset + 2);
 301       value += addend;
 302
 303       if ((long) value > 0xffff || (long) value < -0x10000)
 304         return bfd_reloc_overflow;
 305
 306       bfd_put_16 (input_bfd, value, hit_data);
 307       return bfd_reloc_ok;
 308
 309     case R_MN10200_PCREL24:
 310       value -= (input_section->output_section->vma
 311                 + input_section->output_offset);
 312       value -= (offset + 3);
 313       value += addend;
 314
 315       if ((long) value > 0xffffff || (long) value < -0x1000000)
 316         return bfd_reloc_overflow;
 317
 318       value &= 0xffffff;
 319       value |= (bfd_get_32 (input_bfd, hit_data) & 0xff000000);
 320       bfd_put_32 (input_bfd, value, hit_data);
 321       return bfd_reloc_ok;
 322
 323     default:
 324       return bfd_reloc_notsupported;
 325     }
 326 }
 327 \f
 328 /* Relocate an MN10200 ELF section.  */
 329 static bfd_boolean
 330 mn10200_elf_relocate_section (bfd *output_bfd,
 331                               struct bfd_link_info *info,
 332                               bfd *input_bfd,
 333                               asection *input_section,
 334                               bfd_byte *contents,
 335                               Elf_Internal_Rela *relocs,
 336                               Elf_Internal_Sym *local_syms,
 337                               asection **local_sections)
 338 {
 339   Elf_Internal_Shdr *symtab_hdr;
 340   struct elf_link_hash_entry **sym_hashes;
 341   Elf_Internal_Rela *rel, *relend;
 342
 343   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
 344   sym_hashes = elf_sym_hashes (input_bfd);
 345
 346   rel = relocs;
 347   relend = relocs + input_section->reloc_count;
 348   for (; rel < relend; rel++)
 349     {
 350       int r_type;
 351       reloc_howto_type *howto;
 352       unsigned long r_symndx;
 353       Elf_Internal_Sym *sym;
 354       asection *sec;
 355       struct elf_link_hash_entry *h;
 356       bfd_vma relocation;
 357       bfd_reloc_status_type r;
 358
 359       r_symndx = ELF32_R_SYM (rel->r_info);
 360       r_type = ELF32_R_TYPE (rel->r_info);
 361       howto = elf_mn10200_howto_table + r_type;
 362
 363       h = NULL;
 364       sym = NULL;
 365       sec = NULL;
 366       if (r_symndx < symtab_hdr->sh_info)
 367         {
 368           sym = local_syms + r_symndx;
 369           sec = local_sections[r_symndx];
 370           relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
 371         }
 372       else
 373         {
 374           bfd_boolean unresolved_reloc, warned, ignored;
 375
 376           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
 377                                    r_symndx, symtab_hdr, sym_hashes,
 378                                    h, sec, relocation,
 379                                    unresolved_reloc, warned, ignored);
 380         }
 381
 382       if (sec != NULL && discarded_section (sec))
 383         RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
 384                                          rel, 1, relend, howto, 0, contents);
 385
 386       if (bfd_link_relocatable (info))
 387         continue;
 388
 389       r = mn10200_elf_final_link_relocate (howto, input_bfd, output_bfd,
 390                                            input_section,
 391                                            contents, rel->r_offset,
 392                                            relocation, rel->r_addend,
 393                                            info, sec, h == NULL);
 394
 395       if (r != bfd_reloc_ok)
 396         {
 397           const char *name;
 398           const char *msg = (const char *) 0;
 399
 400           if (h != NULL)
 401             name = h->root.root.string;
 402           else
 403             {
 404               name = (bfd_elf_string_from_elf_section
 405                       (input_bfd, symtab_hdr->sh_link, sym->st_name));
 406               if (name == NULL || *name == '\0')
 407                 name = bfd_section_name (input_bfd, sec);
 408             }
 409
 410           switch (r)
 411             {
 412             case bfd_reloc_overflow:
 413               if (! ((*info->callbacks->reloc_overflow)
 414                      (info, (h ? &h->root : NULL), name, howto->name,
 415                       (bfd_vma) 0, input_bfd, input_section,
 416                       rel->r_offset)))
 417                 return FALSE;
 418               break;
 419
 420             case bfd_reloc_undefined:
 421               if (! ((*info->callbacks->undefined_symbol)
 422                      (info, name, input_bfd, input_section,
 423                       rel->r_offset, TRUE)))
 424                 return FALSE;
 425               break;
 426
 427             case bfd_reloc_outofrange:
 428               msg = _("internal error: out of range error");
 429               goto common_error;
 430
 431             case bfd_reloc_notsupported:
 432               msg = _("internal error: unsupported relocation error");
 433               goto common_error;
 434
 435             case bfd_reloc_dangerous:
 436               msg = _("internal error: dangerous error");
 437               goto common_error;
 438
 439             default:
 440               msg = _("internal error: unknown error");
 441               /* fall through */
 442
 443             common_error:
 444               if (!((*info->callbacks->warning)
 445                     (info, msg, name, input_bfd, input_section,
 446                      rel->r_offset)))
 447                 return FALSE;
 448               break;
 449             }
 450         }
 451     }
 452
 453   return TRUE;
 454 }
 455
 456 /* Delete some bytes from a section while relaxing.  */
 457
 458 static bfd_boolean
 459 mn10200_elf_relax_delete_bytes (bfd *abfd, asection *sec,
 460                                 bfd_vma addr, int count)
 461 {
 462   Elf_Internal_Shdr *symtab_hdr;
 463   unsigned int sec_shndx;
 464   bfd_byte *contents;
 465   Elf_Internal_Rela *irel, *irelend;
 466   bfd_vma toaddr;
 467   Elf_Internal_Sym *isym;
 468   Elf_Internal_Sym *isymend;
 469   struct elf_link_hash_entry **sym_hashes;
 470   struct elf_link_hash_entry **end_hashes;
 471   unsigned int symcount;
 472
 473   sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
 474
 475   contents = elf_section_data (sec)->this_hdr.contents;
 476
 477   toaddr = sec->size;
 478
 479   irel = elf_section_data (sec)->relocs;
 480   irelend = irel + sec->reloc_count;
 481
 482   /* Actually delete the bytes.  */
 483   memmove (contents + addr, contents + addr + count,
 484            (size_t) (toaddr - addr - count));
 485   sec->size -= count;
 486
 487   /* Adjust all the relocs.  */
 488   for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++)
 489     {
 490       /* Get the new reloc address.  */
 491       if ((irel->r_offset > addr
 492            && irel->r_offset < toaddr))
 493         irel->r_offset -= count;
 494     }
 495
 496   /* Adjust the local symbols defined in this section.  */
 497   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
 498   isym = (Elf_Internal_Sym *) symtab_hdr->contents;
 499   for (isymend = isym + symtab_hdr->sh_info; isym < isymend; isym++)
 500     {
 501       if (isym->st_shndx == sec_shndx
 502           && isym->st_value > addr
 503           && isym->st_value < toaddr)
 504         isym->st_value -= count;
 505     }
 506
 507   /* Now adjust the global symbols defined in this section.  */
 508   symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)
 509               - symtab_hdr->sh_info);
 510   sym_hashes = elf_sym_hashes (abfd);
 511   end_hashes = sym_hashes + symcount;
 512   for (; sym_hashes < end_hashes; sym_hashes++)
 513     {
 514       struct elf_link_hash_entry *sym_hash = *sym_hashes;
 515       if ((sym_hash->root.type == bfd_link_hash_defined
 516            || sym_hash->root.type == bfd_link_hash_defweak)
 517           && sym_hash->root.u.def.section == sec
 518           && sym_hash->root.u.def.value > addr
 519           && sym_hash->root.u.def.value < toaddr)
 520         {
 521           sym_hash->root.u.def.value -= count;
 522         }
 523     }
 524
 525   return TRUE;
 526 }
 527
 528 /* This function handles relaxing for the mn10200.
 529
 530    There are quite a few relaxing opportunities available on the mn10200:
 531
 532         * jsr:24 -> jsr:16                                         2 bytes
 533
 534         * jmp:24 -> jmp:16                                         2 bytes
 535         * jmp:16 -> bra:8                                          1 byte
 536
 537                 * If the previous instruction is a conditional branch
 538                 around the jump/bra, we may be able to reverse its condition
 539                 and change its target to the jump's target.  The jump/bra
 540                 can then be deleted.                               2 bytes
 541
 542         * mov abs24 -> mov abs16        2 byte savings
 543
 544         * Most instructions which accept imm24 can relax to imm16  2 bytes
 545         - Most instructions which accept imm16 can relax to imm8   1 byte
 546
 547         * Most instructions which accept d24 can relax to d16      2 bytes
 548         - Most instructions which accept d16 can relax to d8       1 byte
 549
 550         abs24, imm24, d24 all look the same at the reloc level.  It
 551         might make the code simpler if we had different relocs for
 552         the various relaxable operand types.
 553
 554         We don't handle imm16->imm8 or d16->d8 as they're very rare
 555         and somewhat more difficult to support.  */
 556
 557 static bfd_boolean
 558 mn10200_elf_relax_section (bfd *abfd,
 559                            asection *sec,
 560                            struct bfd_link_info *link_info,
 561                            bfd_boolean *again)
 562 {
 563   Elf_Internal_Shdr *symtab_hdr;
 564   Elf_Internal_Rela *internal_relocs;
 565   Elf_Internal_Rela *irel, *irelend;
 566   bfd_byte *contents = NULL;
 567   Elf_Internal_Sym *isymbuf = NULL;
 568
 569   /* Assume nothing changes.  */
 570   *again = FALSE;
 571
 572   /* We don't have to do anything for a relocatable link, if
 573      this section does not have relocs, or if this is not a
 574      code section.  */
 575   if (bfd_link_relocatable (link_info)
 576       || (sec->flags & SEC_RELOC) == 0
 577       || sec->reloc_count == 0
 578       || (sec->flags & SEC_CODE) == 0)
 579     return TRUE;
 580
 581   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
 582
 583   /* Get a copy of the native relocations.  */
 584   internal_relocs = (_bfd_elf_link_read_relocs
 585                      (abfd, sec, NULL, (Elf_Internal_Rela *) NULL,
 586                       link_info->keep_memory));
 587   if (internal_relocs == NULL)
 588     goto error_return;
 589
 590   /* Walk through them looking for relaxing opportunities.  */
 591   irelend = internal_relocs + sec->reloc_count;
 592   for (irel = internal_relocs; irel < irelend; irel++)
 593     {
 594       bfd_vma symval;
 595
 596       /* If this isn't something that can be relaxed, then ignore
 597          this reloc.  */
 598       if (ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_NONE
 599           || ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_8
 600           || ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_MAX)
 601         continue;
 602
 603       /* Get the section contents if we haven't done so already.  */
 604       if (contents == NULL)
 605         {
 606           /* Get cached copy if it exists.  */
 607           if (elf_section_data (sec)->this_hdr.contents != NULL)
 608             contents = elf_section_data (sec)->this_hdr.contents;
 609           else
 610             {
 611               /* Go get them off disk.  */
 612               if (!bfd_malloc_and_get_section (abfd, sec, &contents))
 613                 goto error_return;
 614             }
 615         }
 616
 617       /* Read this BFD's local symbols if we haven't done so already.  */
 618       if (isymbuf == NULL && symtab_hdr->sh_info != 0)
 619         {
 620           isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
 621           if (isymbuf == NULL)
 622             isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
 623                                             symtab_hdr->sh_info, 0,
 624                                             NULL, NULL, NULL);
 625           if (isymbuf == NULL)
 626             goto error_return;
 627         }
 628
 629       /* Get the value of the symbol referred to by the reloc.  */
 630       if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
 631         {
 632           /* A local symbol.  */
 633           Elf_Internal_Sym *isym;
 634           asection *sym_sec;
 635
 636           isym = isymbuf + ELF32_R_SYM (irel->r_info);
 637           if (isym->st_shndx == SHN_UNDEF)
 638             sym_sec = bfd_und_section_ptr;
 639           else if (isym->st_shndx == SHN_ABS)
 640             sym_sec = bfd_abs_section_ptr;
 641           else if (isym->st_shndx == SHN_COMMON)
 642             sym_sec = bfd_com_section_ptr;
 643           else
 644             sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
 645           symval = (isym->st_value
 646                     + sym_sec->output_section->vma
 647                     + sym_sec->output_offset);
 648         }
 649       else
 650         {
 651           unsigned long indx;
 652           struct elf_link_hash_entry *h;
 653
 654           /* An external symbol.  */
 655           indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
 656           h = elf_sym_hashes (abfd)[indx];
 657           BFD_ASSERT (h != NULL);
 658           if (h->root.type != bfd_link_hash_defined
 659               && h->root.type != bfd_link_hash_defweak)
 660             {
 661               /* This appears to be a reference to an undefined
 662                  symbol.  Just ignore it--it will be caught by the
 663                  regular reloc processing.  */
 664               continue;
 665             }
 666
 667           symval = (h->root.u.def.value
 668                     + h->root.u.def.section->output_section->vma
 669                     + h->root.u.def.section->output_offset);
 670         }
 671
 672       /* For simplicity of coding, we are going to modify the section
 673          contents, the section relocs, and the BFD symbol table.  We
 674          must tell the rest of the code not to free up this
 675          information.  It would be possible to instead create a table
 676          of changes which have to be made, as is done in coff-mips.c;
 677          that would be more work, but would require less memory when
 678          the linker is run.  */
 679
 680       /* Try to turn a 24bit pc-relative branch/call into a 16bit pc-relative
 681          branch/call.  */
 682       if (ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_PCREL24)
 683         {
 684           bfd_vma value = symval;
 685
 686           /* Deal with pc-relative gunk.  */
 687           value -= (sec->output_section->vma + sec->output_offset);
 688           value -= (irel->r_offset + 3);
 689           value += irel->r_addend;
 690
 691           /* See if the value will fit in 16 bits, note the high value is
 692              0x7fff + 2 as the target will be two bytes closer if we are
 693              able to relax.  */
 694           if ((long) value < 0x8001 && (long) value > -0x8000)
 695             {
 696               unsigned char code;
 697
 698               /* Get the opcode.  */
 699               code = bfd_get_8 (abfd, contents + irel->r_offset - 1);
 700
 701               if (code != 0xe0 && code != 0xe1)
 702                 continue;
 703
 704               /* Note that we've changed the relocs, section contents, etc.  */
 705               elf_section_data (sec)->relocs = internal_relocs;
 706               elf_section_data (sec)->this_hdr.contents = contents;
 707               symtab_hdr->contents = (unsigned char *) isymbuf;
 708
 709               /* Fix the opcode.  */
 710               if (code == 0xe0)
 711                 bfd_put_8 (abfd, 0xfc, contents + irel->r_offset - 2);
 712               else if (code == 0xe1)
 713                 bfd_put_8 (abfd, 0xfd, contents + irel->r_offset - 2);
 714
 715               /* Fix the relocation's type.  */
 716               irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
 717                                            R_MN10200_PCREL16);
 718
 719               /* The opcode got shorter too, so we have to fix the offset.  */
 720               irel->r_offset -= 1;
 721
 722               /* Delete two bytes of data.  */
 723               if (!mn10200_elf_relax_delete_bytes (abfd, sec,
 724                                                    irel->r_offset + 1, 2))
 725                 goto error_return;
 726
 727               /* That will change things, so, we should relax again.
 728                  Note that this is not required, and it may be slow.  */
 729               *again = TRUE;
 730             }
 731         }
 732
 733       /* Try to turn a 16bit pc-relative branch into a 8bit pc-relative
 734          branch.  */
 735       if (ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_PCREL16)
 736         {
 737           bfd_vma value = symval;
 738
 739           /* Deal with pc-relative gunk.  */
 740           value -= (sec->output_section->vma + sec->output_offset);
 741           value -= (irel->r_offset + 2);
 742           value += irel->r_addend;
 743
 744           /* See if the value will fit in 8 bits, note the high value is
 745              0x7f + 1 as the target will be one bytes closer if we are
 746              able to relax.  */
 747           if ((long) value < 0x80 && (long) value > -0x80)
 748             {
 749               unsigned char code;
 750
 751               /* Get the opcode.  */
 752               code = bfd_get_8 (abfd, contents + irel->r_offset - 1);
 753
 754               if (code != 0xfc)
 755                 continue;
 756
 757               /* Note that we've changed the relocs, section contents, etc.  */
 758               elf_section_data (sec)->relocs = internal_relocs;
 759               elf_section_data (sec)->this_hdr.contents = contents;
 760               symtab_hdr->contents = (unsigned char *) isymbuf;
 761
 762               /* Fix the opcode.  */
 763               bfd_put_8 (abfd, 0xea, contents + irel->r_offset - 1);
 764
 765               /* Fix the relocation's type.  */
 766               irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
 767                                            R_MN10200_PCREL8);
 768
 769               /* Delete one byte of data.  */
 770               if (!mn10200_elf_relax_delete_bytes (abfd, sec,
 771                                                    irel->r_offset + 1, 1))
 772                 goto error_return;
 773
 774               /* That will change things, so, we should relax again.
 775                  Note that this is not required, and it may be slow.  */
 776               *again = TRUE;
 777             }
 778         }
 779
 780       /* Try to eliminate an unconditional 8 bit pc-relative branch
 781          which immediately follows a conditional 8 bit pc-relative
 782          branch around the unconditional branch.
 783
 784             original:           new:
 785             bCC lab1            bCC' lab2
 786             bra lab2
 787            lab1:               lab1:
 788
 789          This happens when the bCC can't reach lab2 at assembly time,
 790          but due to other relaxations it can reach at link time.  */
 791       if (ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_PCREL8)
 792         {
 793           Elf_Internal_Rela *nrel;
 794           bfd_vma value = symval;
 795           unsigned char code;
 796
 797           /* Deal with pc-relative gunk.  */
 798           value -= (sec->output_section->vma + sec->output_offset);
 799           value -= (irel->r_offset + 1);
 800           value += irel->r_addend;
 801
 802           /* Do nothing if this reloc is the last byte in the section.  */
 803           if (irel->r_offset == sec->size)
 804             continue;
 805
 806           /* See if the next instruction is an unconditional pc-relative
 807              branch, more often than not this test will fail, so we
 808              test it first to speed things up.  */
 809           code = bfd_get_8 (abfd, contents + irel->r_offset + 1);
 810           if (code != 0xea)
 811             continue;
 812
 813           /* Also make sure the next relocation applies to the next
 814              instruction and that it's a pc-relative 8 bit branch.  */
 815           nrel = irel + 1;
 816           if (nrel == irelend
 817               || irel->r_offset + 2 != nrel->r_offset
 818               || ELF32_R_TYPE (nrel->r_info) != (int) R_MN10200_PCREL8)
 819             continue;
 820
 821           /* Make sure our destination immediately follows the
 822              unconditional branch.  */
 823           if (symval != (sec->output_section->vma + sec->output_offset
 824                          + irel->r_offset + 3))
 825             continue;
 826
 827           /* Now make sure we are a conditional branch.  This may not
 828              be necessary, but why take the chance.
 829
 830              Note these checks assume that R_MN10200_PCREL8 relocs
 831              only occur on bCC and bCCx insns.  If they occured
 832              elsewhere, we'd need to know the start of this insn
 833              for this check to be accurate.  */
 834           code = bfd_get_8 (abfd, contents + irel->r_offset - 1);
 835           if (code != 0xe0 && code != 0xe1 && code != 0xe2
 836               && code != 0xe3 && code != 0xe4 && code != 0xe5
 837               && code != 0xe6 && code != 0xe7 && code != 0xe8
 838               && code != 0xe9 && code != 0xec && code != 0xed
 839               && code != 0xee && code != 0xef && code != 0xfc
 840               && code != 0xfd && code != 0xfe && code != 0xff)
 841             continue;
 842
 843           /* We also have to be sure there is no symbol/label
 844              at the unconditional branch.  */
 845           if (mn10200_elf_symbol_address_p (abfd, sec, isymbuf,
 846                                             irel->r_offset + 1))
 847             continue;
 848
 849           /* Note that we've changed the relocs, section contents, etc.  */
 850           elf_section_data (sec)->relocs = internal_relocs;
 851           elf_section_data (sec)->this_hdr.contents = contents;
 852           symtab_hdr->contents = (unsigned char *) isymbuf;
 853
 854           /* Reverse the condition of the first branch.  */
 855           switch (code)
 856             {
 857             case 0xfc:
 858               code = 0xfd;
 859               break;
 860             case 0xfd:
 861               code = 0xfc;
 862               break;
 863             case 0xfe:
 864               code = 0xff;
 865               break;
 866             case 0xff:
 867               code = 0xfe;
 868               break;
 869             case 0xe8:
 870               code = 0xe9;
 871               break;
 872             case 0xe9:
 873               code = 0xe8;
 874               break;
 875             case 0xe0:
 876               code = 0xe2;
 877               break;
 878             case 0xe2:
 879               code = 0xe0;
 880               break;
 881             case 0xe3:
 882               code = 0xe1;
 883               break;
 884             case 0xe1:
 885               code = 0xe3;
 886               break;
 887             case 0xe4:
 888               code = 0xe6;
 889               break;
 890             case 0xe6:
 891               code = 0xe4;
 892               break;
 893             case 0xe7:
 894               code = 0xe5;
 895               break;
 896             case 0xe5:
 897               code = 0xe7;
 898               break;
 899             case 0xec:
 900               code = 0xed;
 901               break;
 902             case 0xed:
 903               code = 0xec;
 904               break;
 905             case 0xee:
 906               code = 0xef;
 907               break;
 908             case 0xef:
 909               code = 0xee;
 910               break;
 911             }
 912           bfd_put_8 (abfd, code, contents + irel->r_offset - 1);
 913
 914           /* Set the reloc type and symbol for the first branch
 915              from the second branch.  */
 916           irel->r_info = nrel->r_info;
 917
 918           /* Make the reloc for the second branch a null reloc.  */
 919           nrel->r_info = ELF32_R_INFO (ELF32_R_SYM (nrel->r_info),
 920                                        R_MN10200_NONE);
 921
 922           /* Delete two bytes of data.  */
 923           if (!mn10200_elf_relax_delete_bytes (abfd, sec,
 924                                                irel->r_offset + 1, 2))
 925             goto error_return;
 926
 927           /* That will change things, so, we should relax again.
 928              Note that this is not required, and it may be slow.  */
 929           *again = TRUE;
 930         }
 931
 932       /* Try to turn a 24bit immediate, displacement or absolute address
 933          into a 16bit immediate, displacement or absolute address.  */
 934       if (ELF32_R_TYPE (irel->r_info) == (int) R_MN10200_24)
 935         {
 936           bfd_vma value = symval;
 937
 938           /* See if the value will fit in 16 bits.
 939              We allow any 16bit match here.  We prune those we can't
 940              handle below.  */
 941           if ((long) value < 0x7fff && (long) value > -0x8000)
 942             {
 943               unsigned char code;
 944
 945               /* All insns which have 24bit operands are 5 bytes long,
 946                  the first byte will always be 0xf4, but we double check
 947                  it just in case.  */
 948
 949               /* Get the first opcode.  */
 950               code = bfd_get_8 (abfd, contents + irel->r_offset - 2);
 951
 952               if (code != 0xf4)
 953                 continue;
 954
 955               /* Get the second opcode.  */
 956               code = bfd_get_8 (abfd, contents + irel->r_offset - 1);
 957
 958               switch (code & 0xfc)
 959                 {
 960                 /* mov imm24,dn -> mov imm16,dn */
 961                 case 0x70:
 962                   /* Not safe if the high bit is on as relaxing may
 963                      move the value out of high mem and thus not fit
 964                      in a signed 16bit value.  */
 965                   if (value & 0x8000)
 966                     continue;
 967
 968                   /* Note that we've changed the relocation contents, etc.  */
 969                   elf_section_data (sec)->relocs = internal_relocs;
 970                   elf_section_data (sec)->this_hdr.contents = contents;
 971                   symtab_hdr->contents = (unsigned char *) isymbuf;
 972
 973                   /* Fix the opcode.  */
 974                   bfd_put_8 (abfd, 0xf8 + (code & 0x03),
 975                              contents + irel->r_offset - 2);
 976
 977                   /* Fix the relocation's type.  */
 978                   irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
 979                                                R_MN10200_16);
 980
 981                   /* The opcode got shorter too, so we have to fix the
 982                      offset.  */
 983                   irel->r_offset -= 1;
 984
 985                   /* Delete two bytes of data.  */
 986                   if (!mn10200_elf_relax_delete_bytes (abfd, sec,
 987                                                        irel->r_offset + 1, 2))
 988                     goto error_return;
 989
 990                   /* That will change things, so, we should relax again.
 991                      Note that this is not required, and it may be slow.  */
 992                   *again = TRUE;
 993                   break;
 994
 995                 /* mov imm24,an -> mov imm16,an
 996                    cmp imm24,an -> cmp imm16,an
 997                    mov (abs24),dn -> mov (abs16),dn
 998                    mov dn,(abs24) -> mov dn,(abs16)
 999                    movb dn,(abs24) -> movb dn,(abs16)
1000                    movbu (abs24),dn -> movbu (abs16),dn */
1001                 case 0x74:
1002                 case 0x7c:
1003                 case 0xc0:
1004                 case 0x40:
1005                 case 0x44:
1006                 case 0xc8:
1007                   /* Note that we've changed the relocation contents, etc.  */
1008                   elf_section_data (sec)->relocs = internal_relocs;
1009                   elf_section_data (sec)->this_hdr.contents = contents;
1010                   symtab_hdr->contents = (unsigned char *) isymbuf;
1011
1012                   if ((code & 0xfc) == 0x74)
1013                     code = 0xdc + (code & 0x03);
1014                   else if ((code & 0xfc) == 0x7c)
1015                     code = 0xec + (code & 0x03);
1016                   else if ((code & 0xfc) == 0xc0)
1017                     code = 0xc8 + (code & 0x03);
1018                   else if ((code & 0xfc) == 0x40)
1019                     code = 0xc0 + (code & 0x03);
1020                   else if ((code & 0xfc) == 0x44)
1021                     code = 0xc4 + (code & 0x03);
1022                   else if ((code & 0xfc) == 0xc8)
1023                     code = 0xcc + (code & 0x03);
1024
1025                   /* Fix the opcode.  */
1026                   bfd_put_8 (abfd, code, contents + irel->r_offset - 2);
1027
1028                   /* Fix the relocation's type.  */
1029                   irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1030                                                R_MN10200_16);
1031
1032                   /* The opcode got shorter too, so we have to fix the
1033                      offset.  */
1034                   irel->r_offset -= 1;
1035
1036                   /* Delete two bytes of data.  */
1037                   if (!mn10200_elf_relax_delete_bytes (abfd, sec,
1038                                                        irel->r_offset + 1, 2))
1039                     goto error_return;
1040
1041                   /* That will change things, so, we should relax again.
1042                      Note that this is not required, and it may be slow.  */
1043                   *again = TRUE;
1044                   break;
1045
1046                 /* cmp imm24,dn -> cmp imm16,dn
1047                    mov (abs24),an -> mov (abs16),an
1048                    mov an,(abs24) -> mov an,(abs16)
1049                    add imm24,dn -> add imm16,dn
1050                    add imm24,an -> add imm16,an
1051                    sub imm24,dn -> sub imm16,dn
1052                    sub imm24,an -> sub imm16,an
1053                    And all d24->d16 in memory ops.  */
1054                 case 0x78:
1055                 case 0xd0:
1056                 case 0x50:
1057                 case 0x60:
1058                 case 0x64:
1059                 case 0x68:
1060                 case 0x6c:
1061                 case 0x80:
1062                 case 0xf0:
1063                 case 0x00:
1064                 case 0x10:
1065                 case 0xb0:
1066                 case 0x30:
1067                 case 0xa0:
1068                 case 0x20:
1069                 case 0x90:
1070                   /* Not safe if the high bit is on as relaxing may
1071                      move the value out of high mem and thus not fit
1072                      in a signed 16bit value.  */
1073                   if (((code & 0xfc) == 0x78
1074                        || (code & 0xfc) == 0x60
1075                        || (code & 0xfc) == 0x64
1076                        || (code & 0xfc) == 0x68
1077                        || (code & 0xfc) == 0x6c
1078                        || (code & 0xfc) == 0x80
1079                        || (code & 0xfc) == 0xf0
1080                        || (code & 0xfc) == 0x00
1081                        || (code & 0xfc) == 0x10
1082                        || (code & 0xfc) == 0xb0
1083                        || (code & 0xfc) == 0x30
1084                        || (code & 0xfc) == 0xa0
1085                        || (code & 0xfc) == 0x20
1086                        || (code & 0xfc) == 0x90)
1087                       && (value & 0x8000) != 0)
1088                     continue;
1089
1090                   /* Note that we've changed the relocation contents, etc.  */
1091                   elf_section_data (sec)->relocs = internal_relocs;
1092                   elf_section_data (sec)->this_hdr.contents = contents;
1093                   symtab_hdr->contents = (unsigned char *) isymbuf;
1094
1095                   /* Fix the opcode.  */
1096                   bfd_put_8 (abfd, 0xf7, contents + irel->r_offset - 2);
1097
1098                   if ((code & 0xfc) == 0x78)
1099                     code = 0x48 + (code & 0x03);
1100                   else if ((code & 0xfc) == 0xd0)
1101                     code = 0x30 + (code & 0x03);
1102                   else if ((code & 0xfc) == 0x50)
1103                     code = 0x20 + (code & 0x03);
1104                   else if ((code & 0xfc) == 0x60)
1105                     code = 0x18 + (code & 0x03);
1106                   else if ((code & 0xfc) == 0x64)
1107                     code = 0x08 + (code & 0x03);
1108                   else if ((code & 0xfc) == 0x68)
1109                     code = 0x1c + (code & 0x03);
1110                   else if ((code & 0xfc) == 0x6c)
1111                     code = 0x0c + (code & 0x03);
1112                   else if ((code & 0xfc) == 0x80)
1113                     code = 0xc0 + (code & 0x07);
1114                   else if ((code & 0xfc) == 0xf0)
1115                     code = 0xb0 + (code & 0x07);
1116                   else if ((code & 0xfc) == 0x00)
1117                     code = 0x80 + (code & 0x07);
1118                   else if ((code & 0xfc) == 0x10)
1119                     code = 0xa0 + (code & 0x07);
1120                   else if ((code & 0xfc) == 0xb0)
1121                     code = 0x70 + (code & 0x07);
1122                   else if ((code & 0xfc) == 0x30)
1123                     code = 0x60 + (code & 0x07);
1124                   else if ((code & 0xfc) == 0xa0)
1125                     code = 0xd0 + (code & 0x07);
1126                   else if ((code & 0xfc) == 0x20)
1127                     code = 0x90 + (code & 0x07);
1128                   else if ((code & 0xfc) == 0x90)
1129                     code = 0x50 + (code & 0x07);
1130
1131                   bfd_put_8 (abfd, code, contents + irel->r_offset - 1);
1132
1133                   /* Fix the relocation's type.  */
1134                   irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1135                                                R_MN10200_16);
1136
1137                   /* Delete one bytes of data.  */
1138                   if (!mn10200_elf_relax_delete_bytes (abfd, sec,
1139                                                        irel->r_offset + 2, 1))
1140                     goto error_return;
1141
1142                   /* That will change things, so, we should relax again.
1143                      Note that this is not required, and it may be slow.  */
1144                   *again = TRUE;
1145                   break;
1146
1147                 /* movb (abs24),dn ->movbu (abs16),dn extxb bn */
1148                 case 0xc4:
1149                   /* Note that we've changed the reldection contents, etc.  */
1150                   elf_section_data (sec)->relocs = internal_relocs;
1151                   elf_section_data (sec)->this_hdr.contents = contents;
1152                   symtab_hdr->contents = (unsigned char *) isymbuf;
1153
1154                   bfd_put_8 (abfd, 0xcc + (code & 0x03),
1155                              contents + irel->r_offset - 2);
1156
1157                   bfd_put_8 (abfd, 0xb8 + (code & 0x03),
1158                              contents + irel->r_offset - 1);
1159
1160                   /* Fix the relocation's type.  */
1161                   irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1162                                                R_MN10200_16);
1163
1164                   /* The reloc will be applied one byte in front of its
1165                      current location.  */
1166                   irel->r_offset -= 1;
1167
1168                   /* Delete one bytes of data.  */
1169                   if (!mn10200_elf_relax_delete_bytes (abfd, sec,
1170                                                        irel->r_offset + 2, 1))
1171                     goto error_return;
1172
1173                   /* That will change things, so, we should relax again.
1174                      Note that this is not required, and it may be slow.  */
1175                   *again = TRUE;
1176                   break;
1177                 }
1178             }
1179         }
1180     }
1181
1182   if (isymbuf != NULL
1183       && symtab_hdr->contents != (unsigned char *) isymbuf)
1184     {
1185       if (! link_info->keep_memory)
1186         free (isymbuf);
1187       else
1188         {
1189           /* Cache the symbols for elf_link_input_bfd.  */
1190           symtab_hdr->contents = (unsigned char *) isymbuf;
1191         }
1192     }
1193
1194   if (contents != NULL
1195       && elf_section_data (sec)->this_hdr.contents != contents)
1196     {
1197       if (! link_info->keep_memory)
1198         free (contents);
1199       else
1200         {
1201           /* Cache the section contents for elf_link_input_bfd.  */
1202           elf_section_data (sec)->this_hdr.contents = contents;
1203         }
1204     }
1205
1206   if (internal_relocs != NULL
1207       && elf_section_data (sec)->relocs != internal_relocs)
1208     free (internal_relocs);
1209
1210   return TRUE;
1211
1212  error_return:
1213   if (isymbuf != NULL
1214       && symtab_hdr->contents != (unsigned char *) isymbuf)
1215     free (isymbuf);
1216   if (contents != NULL
1217       && elf_section_data (sec)->this_hdr.contents != contents)
1218     free (contents);
1219   if (internal_relocs != NULL
1220       && elf_section_data (sec)->relocs != internal_relocs)
1221     free (internal_relocs);
1222
1223   return FALSE;
1224 }
1225
1226 /* Return TRUE if a symbol exists at the given address, else return
1227    FALSE.  */
1228 static bfd_boolean
1229 mn10200_elf_symbol_address_p (bfd *abfd,
1230                               asection *sec,
1231                               Elf_Internal_Sym *isym,
1232                               bfd_vma addr)
1233 {
1234   Elf_Internal_Shdr *symtab_hdr;
1235   unsigned int sec_shndx;
1236   Elf_Internal_Sym *isymend;
1237   struct elf_link_hash_entry **sym_hashes;
1238   struct elf_link_hash_entry **end_hashes;
1239   unsigned int symcount;
1240
1241   sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
1242
1243   /* Examine all the local symbols.  */
1244   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1245   for (isymend = isym + symtab_hdr->sh_info; isym < isymend; isym++)
1246     {
1247       if (isym->st_shndx == sec_shndx
1248           && isym->st_value == addr)
1249         return TRUE;
1250     }
1251
1252   symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)
1253               - symtab_hdr->sh_info);
1254   sym_hashes = elf_sym_hashes (abfd);
1255   end_hashes = sym_hashes + symcount;
1256   for (; sym_hashes < end_hashes; sym_hashes++)
1257     {
1258       struct elf_link_hash_entry *sym_hash = *sym_hashes;
1259       if ((sym_hash->root.type == bfd_link_hash_defined
1260            || sym_hash->root.type == bfd_link_hash_defweak)
1261           && sym_hash->root.u.def.section == sec
1262           && sym_hash->root.u.def.value == addr)
1263         return TRUE;
1264     }
1265
1266   return FALSE;
1267 }
1268
1269 /* This is a version of bfd_generic_get_relocated_section_contents
1270    which uses mn10200_elf_relocate_section.  */
1271
1272 static bfd_byte *
1273 mn10200_elf_get_relocated_section_contents (bfd *output_bfd,
1274                                             struct bfd_link_info *link_info,
1275                                             struct bfd_link_order *link_order,
1276                                             bfd_byte *data,
1277                                             bfd_boolean relocatable,
1278                                             asymbol **symbols)
1279 {
1280   Elf_Internal_Shdr *symtab_hdr;
1281   asection *input_section = link_order->u.indirect.section;
1282   bfd *input_bfd = input_section->owner;
1283   asection **sections = NULL;
1284   Elf_Internal_Rela *internal_relocs = NULL;
1285   Elf_Internal_Sym *isymbuf = NULL;
1286
1287   /* We only need to handle the case of relaxing, or of having a
1288      particular set of section contents, specially.  */
1289   if (relocatable
1290       || elf_section_data (input_section)->this_hdr.contents == NULL)
1291     return bfd_generic_get_relocated_section_contents (output_bfd, link_info,
1292                                                        link_order, data,
1293                                                        relocatable,
1294                                                        symbols);
1295
1296   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1297
1298   memcpy (data, elf_section_data (input_section)->this_hdr.contents,
1299           (size_t) input_section->size);
1300
1301   if ((input_section->flags & SEC_RELOC) != 0
1302       && input_section->reloc_count > 0)
1303     {
1304       Elf_Internal_Sym *isym;
1305       Elf_Internal_Sym *isymend;
1306       asection **secpp;
1307       bfd_size_type amt;
1308
1309       internal_relocs = (_bfd_elf_link_read_relocs
1310                          (input_bfd, input_section, NULL,
1311                           (Elf_Internal_Rela *) NULL, FALSE));
1312       if (internal_relocs == NULL)
1313         goto error_return;
1314
1315       if (symtab_hdr->sh_info != 0)
1316         {
1317           isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
1318           if (isymbuf == NULL)
1319             isymbuf = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
1320                                             symtab_hdr->sh_info, 0,
1321                                             NULL, NULL, NULL);
1322           if (isymbuf == NULL)
1323             goto error_return;
1324         }
1325
1326       amt = symtab_hdr->sh_info;
1327       amt *= sizeof (asection *);
1328       sections = (asection **) bfd_malloc (amt);
1329       if (sections == NULL && amt != 0)
1330         goto error_return;
1331
1332       isymend = isymbuf + symtab_hdr->sh_info;
1333       for (isym = isymbuf, secpp = sections; isym < isymend; ++isym, ++secpp)
1334         {
1335           asection *isec;
1336
1337           if (isym->st_shndx == SHN_UNDEF)
1338             isec = bfd_und_section_ptr;
1339           else if (isym->st_shndx == SHN_ABS)
1340             isec = bfd_abs_section_ptr;
1341           else if (isym->st_shndx == SHN_COMMON)
1342             isec = bfd_com_section_ptr;
1343           else
1344             isec = bfd_section_from_elf_index (input_bfd, isym->st_shndx);
1345
1346           *secpp = isec;
1347         }
1348
1349       if (! mn10200_elf_relocate_section (output_bfd, link_info, input_bfd,
1350                                      input_section, data, internal_relocs,
1351                                      isymbuf, sections))
1352         goto error_return;
1353
1354       if (sections != NULL)
1355         free (sections);
1356       if (isymbuf != NULL
1357           && symtab_hdr->contents != (unsigned char *) isymbuf)
1358         free (isymbuf);
1359       if (elf_section_data (input_section)->relocs != internal_relocs)
1360         free (internal_relocs);
1361     }
1362
1363   return data;
1364
1365  error_return:
1366   if (sections != NULL)
1367     free (sections);
1368   if (isymbuf != NULL
1369       && symtab_hdr->contents != (unsigned char *) isymbuf)
1370     free (isymbuf);
1371   if (internal_relocs != NULL
1372       && elf_section_data (input_section)->relocs != internal_relocs)
1373     free (internal_relocs);
1374   return NULL;
1375 }
1376
1377 #define TARGET_LITTLE_SYM       mn10200_elf32_vec
1378 #define TARGET_LITTLE_NAME      "elf32-mn10200"
1379 #define ELF_ARCH                bfd_arch_mn10200
1380 #define ELF_MACHINE_CODE        EM_MN10200
1381 #define ELF_MACHINE_ALT1        EM_CYGNUS_MN10200
1382 #define ELF_MAXPAGESIZE         0x1000
1383
1384 #define elf_backend_rela_normal 1
1385 #define elf_info_to_howto       mn10200_info_to_howto
1386 #define elf_info_to_howto_rel   0
1387 #define elf_backend_relocate_section mn10200_elf_relocate_section
1388 #define bfd_elf32_bfd_relax_section     mn10200_elf_relax_section
1389 #define bfd_elf32_bfd_get_relocated_section_contents \
1390                                 mn10200_elf_get_relocated_section_contents
1391
1392 #define elf_symbol_leading_char '_'
1393
1394 #include "elf32-target.h"