OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [bfd/] [elf32-iq2000.c] - Diff between revs 834 and 842

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 834 Rev 842
/* IQ2000-specific support for 32-bit ELF.
/* IQ2000-specific support for 32-bit ELF.
   Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008
   Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
 
 
   This file is part of BFD, the Binary File Descriptor library.
   This file is part of BFD, the Binary File Descriptor library.
 
 
   This program is free software; you can redistribute it and/or modify
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   This program is distributed in the hope that it will be useful,
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   You should have received a copy of the GNU General Public License
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   along with this program; if not, write to the Free Software
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
 
 
#include "sysdep.h"
#include "sysdep.h"
#include "bfd.h"
#include "bfd.h"
#include "libbfd.h"
#include "libbfd.h"
#include "elf-bfd.h"
#include "elf-bfd.h"
#include "elf/iq2000.h"
#include "elf/iq2000.h"
 
 
/* Forward declarations.  */
/* Forward declarations.  */
 
 
static bfd_reloc_status_type iq2000_elf_howto_hi16_reloc (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
static bfd_reloc_status_type iq2000_elf_howto_hi16_reloc (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
 
 


static reloc_howto_type iq2000_elf_howto_table [] =
static reloc_howto_type iq2000_elf_howto_table [] =
{
{
  /* This reloc does nothing.  */
  /* This reloc does nothing.  */
 
 
  HOWTO (R_IQ2000_NONE,              /* type */
  HOWTO (R_IQ2000_NONE,              /* type */
         0,                           /* rightshift */
         0,                           /* rightshift */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         32,                         /* bitsize */
         32,                         /* bitsize */
         FALSE,                      /* pc_relative */
         FALSE,                      /* pc_relative */
         0,                           /* bitpos */
         0,                           /* bitpos */
         complain_overflow_bitfield, /* complain_on_overflow */
         complain_overflow_bitfield, /* complain_on_overflow */
         bfd_elf_generic_reloc,      /* special_function */
         bfd_elf_generic_reloc,      /* special_function */
         "R_IQ2000_NONE",            /* name */
         "R_IQ2000_NONE",            /* name */
         FALSE,                      /* partial_inplace */
         FALSE,                      /* partial_inplace */
         0,                           /* src_mask */
         0,                           /* src_mask */
         0,                           /* dst_mask */
         0,                           /* dst_mask */
         FALSE),                     /* pcrel_offset */
         FALSE),                     /* pcrel_offset */
 
 
  /* A 16 bit absolute relocation.  */
  /* A 16 bit absolute relocation.  */
  HOWTO (R_IQ2000_16,                /* type */
  HOWTO (R_IQ2000_16,                /* type */
         0,                           /* rightshift */
         0,                           /* rightshift */
         1,                          /* size (0 = byte, 1 = short, 2 = long) */
         1,                          /* size (0 = byte, 1 = short, 2 = long) */
         16,                         /* bitsize */
         16,                         /* bitsize */
         FALSE,                      /* pc_relative */
         FALSE,                      /* pc_relative */
         0,                           /* bitpos */
         0,                           /* bitpos */
         complain_overflow_bitfield, /* complain_on_overflow */
         complain_overflow_bitfield, /* complain_on_overflow */
         bfd_elf_generic_reloc,      /* special_function */
         bfd_elf_generic_reloc,      /* special_function */
         "R_IQ2000_16",              /* name */
         "R_IQ2000_16",              /* name */
         FALSE,                      /* partial_inplace */
         FALSE,                      /* partial_inplace */
         0x0000,                     /* src_mask */
         0x0000,                     /* src_mask */
         0xffff,                     /* dst_mask */
         0xffff,                     /* dst_mask */
         FALSE),                     /* pcrel_offset */
         FALSE),                     /* pcrel_offset */
 
 
  /* A 32 bit absolute relocation.  */
  /* A 32 bit absolute relocation.  */
  HOWTO (R_IQ2000_32,                /* type */
  HOWTO (R_IQ2000_32,                /* type */
         0,                           /* rightshift */
         0,                           /* rightshift */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         31,                         /* bitsize */
         31,                         /* bitsize */
         FALSE,                      /* pc_relative */
         FALSE,                      /* pc_relative */
         0,                           /* bitpos */
         0,                           /* bitpos */
         complain_overflow_bitfield, /* complain_on_overflow */
         complain_overflow_bitfield, /* complain_on_overflow */
         bfd_elf_generic_reloc,      /* special_function */
         bfd_elf_generic_reloc,      /* special_function */
         "R_IQ2000_32",              /* name */
         "R_IQ2000_32",              /* name */
         FALSE,                      /* partial_inplace */
         FALSE,                      /* partial_inplace */
         0x00000000,                 /* src_mask */
         0x00000000,                 /* src_mask */
         0x7fffffff,                 /* dst_mask */
         0x7fffffff,                 /* dst_mask */
         FALSE),                     /* pcrel_offset */
         FALSE),                     /* pcrel_offset */
 
 
  /* 26 bit branch address.  */
  /* 26 bit branch address.  */
  HOWTO (R_IQ2000_26,           /* type */
  HOWTO (R_IQ2000_26,           /* type */
         2,                     /* rightshift */
         2,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         26,                    /* bitsize */
         26,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
                                /* This needs complex overflow
                                /* This needs complex overflow
                                   detection, because the upper four
                                   detection, because the upper four
                                   bits must match the PC.  */
                                   bits must match the PC.  */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_26",         /* name */
         "R_IQ2000_26",         /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x00000000,            /* src_mask */
         0x00000000,            /* src_mask */
         0x03ffffff,            /* dst_mask */
         0x03ffffff,            /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* 16 bit PC relative reference.  */
  /* 16 bit PC relative reference.  */
  HOWTO (R_IQ2000_PC16,         /* type */
  HOWTO (R_IQ2000_PC16,         /* type */
         2,                     /* rightshift */
         2,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         16,                    /* bitsize */
         16,                    /* bitsize */
         TRUE,                  /* pc_relative */
         TRUE,                  /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_signed, /* complain_on_overflow */
         complain_overflow_signed, /* complain_on_overflow */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_PC16",       /* name */
         "R_IQ2000_PC16",       /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x0000,                /* src_mask */
         0x0000,                /* src_mask */
         0xffff,                /* dst_mask */
         0xffff,                /* dst_mask */
         TRUE),                 /* pcrel_offset */
         TRUE),                 /* pcrel_offset */
 
 
  /* high 16 bits of symbol value.  */
  /* high 16 bits of symbol value.  */
  HOWTO (R_IQ2000_HI16,         /* type */
  HOWTO (R_IQ2000_HI16,         /* type */
         16,                    /* rightshift */
         16,                    /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         15,                    /* bitsize */
         15,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
         iq2000_elf_howto_hi16_reloc,   /* special_function */
         iq2000_elf_howto_hi16_reloc,   /* special_function */
         "R_IQ2000_HI16",       /* name */
         "R_IQ2000_HI16",       /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x0000,                /* src_mask */
         0x0000,                /* src_mask */
         0x7fff,                /* dst_mask */
         0x7fff,                /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* Low 16 bits of symbol value.  */
  /* Low 16 bits of symbol value.  */
  HOWTO (R_IQ2000_LO16,         /* type */
  HOWTO (R_IQ2000_LO16,         /* type */
         0,                      /* rightshift */
         0,                      /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         16,                    /* bitsize */
         16,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_LO16",       /* name */
         "R_IQ2000_LO16",       /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x0000,                /* src_mask */
         0x0000,                /* src_mask */
         0xffff,                /* dst_mask */
         0xffff,                /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* 16-bit jump offset.  */
  /* 16-bit jump offset.  */
  HOWTO (R_IQ2000_OFFSET_16,    /* type */
  HOWTO (R_IQ2000_OFFSET_16,    /* type */
         2,                     /* rightshift */
         2,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         16,                    /* bitsize */
         16,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_OFFSET_16",  /* name */
         "R_IQ2000_OFFSET_16",  /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x0000,                /* src_mask */
         0x0000,                /* src_mask */
         0xffff,                /* dst_mask */
         0xffff,                /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* 21-bit jump offset.  */
  /* 21-bit jump offset.  */
  HOWTO (R_IQ2000_OFFSET_21,    /* type */
  HOWTO (R_IQ2000_OFFSET_21,    /* type */
         2,                     /* rightshift */
         2,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         21,                    /* bitsize */
         21,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_OFFSET_21",  /* name */
         "R_IQ2000_OFFSET_21",  /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x000000,              /* src_mask */
         0x000000,              /* src_mask */
         0x1fffff,              /* dst_mask */
         0x1fffff,              /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* unsigned high 16 bits of value.  */
  /* unsigned high 16 bits of value.  */
  HOWTO (R_IQ2000_OFFSET_21,    /* type */
  HOWTO (R_IQ2000_OFFSET_21,    /* type */
         16,                    /* rightshift */
         16,                    /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         16,                    /* bitsize */
         16,                    /* bitsize */
         FALSE,                 /* pc_relative */
         FALSE,                 /* pc_relative */
         0,                      /* bitpos */
         0,                      /* bitpos */
         complain_overflow_dont, /* complain_on_overflow */
         complain_overflow_dont, /* complain_on_overflow */
         bfd_elf_generic_reloc, /* special_function */
         bfd_elf_generic_reloc, /* special_function */
         "R_IQ2000_UHI16",      /* name */
         "R_IQ2000_UHI16",      /* name */
         FALSE,                 /* partial_inplace */
         FALSE,                 /* partial_inplace */
         0x0000,                /* src_mask */
         0x0000,                /* src_mask */
         0x7fff,                /* dst_mask */
         0x7fff,                /* dst_mask */
         FALSE),                /* pcrel_offset */
         FALSE),                /* pcrel_offset */
 
 
  /* A 32 bit absolute debug relocation.  */
  /* A 32 bit absolute debug relocation.  */
  HOWTO (R_IQ2000_32_DEBUG,          /* type */
  HOWTO (R_IQ2000_32_DEBUG,          /* type */
         0,                           /* rightshift */
         0,                           /* rightshift */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         2,                          /* size (0 = byte, 1 = short, 2 = long) */
         32,                         /* bitsize */
         32,                         /* bitsize */
         FALSE,                      /* pc_relative */
         FALSE,                      /* pc_relative */
         0,                           /* bitpos */
         0,                           /* bitpos */
         complain_overflow_bitfield, /* complain_on_overflow */
         complain_overflow_bitfield, /* complain_on_overflow */
         bfd_elf_generic_reloc,      /* special_function */
         bfd_elf_generic_reloc,      /* special_function */
         "R_IQ2000_32",              /* name */
         "R_IQ2000_32",              /* name */
         FALSE,                      /* partial_inplace */
         FALSE,                      /* partial_inplace */
         0x00000000,                 /* src_mask */
         0x00000000,                 /* src_mask */
         0xffffffff,                 /* dst_mask */
         0xffffffff,                 /* dst_mask */
         FALSE),                     /* pcrel_offset */
         FALSE),                     /* pcrel_offset */
 
 
};
};
 
 
/* GNU extension to record C++ vtable hierarchy.  */
/* GNU extension to record C++ vtable hierarchy.  */
static reloc_howto_type iq2000_elf_vtinherit_howto =
static reloc_howto_type iq2000_elf_vtinherit_howto =
  HOWTO (R_IQ2000_GNU_VTINHERIT,    /* type */
  HOWTO (R_IQ2000_GNU_VTINHERIT,    /* type */
         0,                         /* rightshift */
         0,                         /* rightshift */
         2,                        /* size (0 = byte, 1 = short, 2 = long) */
         2,                        /* size (0 = byte, 1 = short, 2 = long) */
         0,                         /* bitsize */
         0,                         /* bitsize */
         FALSE,                    /* pc_relative */
         FALSE,                    /* pc_relative */
         0,                         /* bitpos */
         0,                         /* bitpos */
         complain_overflow_dont,   /* complain_on_overflow */
         complain_overflow_dont,   /* complain_on_overflow */
         NULL,                     /* special_function */
         NULL,                     /* special_function */
         "R_IQ2000_GNU_VTINHERIT",  /* name */
         "R_IQ2000_GNU_VTINHERIT",  /* name */
         FALSE,                    /* partial_inplace */
         FALSE,                    /* partial_inplace */
         0,                         /* src_mask */
         0,                         /* src_mask */
         0,                         /* dst_mask */
         0,                         /* dst_mask */
         FALSE);                   /* pcrel_offset */
         FALSE);                   /* pcrel_offset */
 
 
/* GNU extension to record C++ vtable member usage.  */
/* GNU extension to record C++ vtable member usage.  */
static reloc_howto_type iq2000_elf_vtentry_howto =
static reloc_howto_type iq2000_elf_vtentry_howto =
  HOWTO (R_IQ2000_GNU_VTENTRY,     /* type */
  HOWTO (R_IQ2000_GNU_VTENTRY,     /* type */
         0,                         /* rightshift */
         0,                         /* rightshift */
         2,                        /* size (0 = byte, 1 = short, 2 = long) */
         2,                        /* size (0 = byte, 1 = short, 2 = long) */
         0,                         /* bitsize */
         0,                         /* bitsize */
         FALSE,                    /* pc_relative */
         FALSE,                    /* pc_relative */
         0,                         /* bitpos */
         0,                         /* bitpos */
         complain_overflow_dont,   /* complain_on_overflow */
         complain_overflow_dont,   /* complain_on_overflow */
         NULL,                     /* special_function */
         NULL,                     /* special_function */
         "R_IQ2000_GNU_VTENTRY",    /* name */
         "R_IQ2000_GNU_VTENTRY",    /* name */
         FALSE,                    /* partial_inplace */
         FALSE,                    /* partial_inplace */
         0,                         /* src_mask */
         0,                         /* src_mask */
         0,                         /* dst_mask */
         0,                         /* dst_mask */
         FALSE);                   /* pcrel_offset */
         FALSE);                   /* pcrel_offset */
 
 


static bfd_reloc_status_type
static bfd_reloc_status_type
iq2000_elf_howto_hi16_reloc (bfd *abfd ATTRIBUTE_UNUSED,
iq2000_elf_howto_hi16_reloc (bfd *abfd ATTRIBUTE_UNUSED,
                             arelent *reloc_entry,
                             arelent *reloc_entry,
                             asymbol *symbol,
                             asymbol *symbol,
                             void * data,
                             void * data,
                             asection *input_section,
                             asection *input_section,
                             bfd *output_bfd,
                             bfd *output_bfd,
                             char **error_message ATTRIBUTE_UNUSED)
                             char **error_message ATTRIBUTE_UNUSED)
{
{
  bfd_reloc_status_type ret;
  bfd_reloc_status_type ret;
  bfd_vma relocation;
  bfd_vma relocation;
 
 
  /* If we're relocating and this an external symbol,
  /* If we're relocating and this an external symbol,
     we don't want to change anything.  */
     we don't want to change anything.  */
  if (output_bfd != (bfd *) NULL
  if (output_bfd != (bfd *) NULL
      && (symbol->flags & BSF_SECTION_SYM) == 0
      && (symbol->flags & BSF_SECTION_SYM) == 0
      && reloc_entry->addend == 0)
      && reloc_entry->addend == 0)
    {
    {
      reloc_entry->address += input_section->output_offset;
      reloc_entry->address += input_section->output_offset;
      return bfd_reloc_ok;
      return bfd_reloc_ok;
    }
    }
 
 
  if (bfd_is_com_section (symbol->section))
  if (bfd_is_com_section (symbol->section))
    relocation = 0;
    relocation = 0;
  else
  else
    relocation = symbol->value;
    relocation = symbol->value;
 
 
  relocation += symbol->section->output_section->vma;
  relocation += symbol->section->output_section->vma;
  relocation += symbol->section->output_offset;
  relocation += symbol->section->output_offset;
  relocation += reloc_entry->addend;
  relocation += reloc_entry->addend;
 
 
  /* If %lo will have sign-extension, compensate by add 0x10000 to hi portion.  */
  /* If %lo will have sign-extension, compensate by add 0x10000 to hi portion.  */
  if (relocation & 0x8000)
  if (relocation & 0x8000)
    reloc_entry->addend += 0x10000;
    reloc_entry->addend += 0x10000;
 
 
  /* Now do the reloc in the usual way.  */
  /* Now do the reloc in the usual way.  */
  ret = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
  ret = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
                                input_section, output_bfd, error_message);
                                input_section, output_bfd, error_message);
 
 
  /* Put it back the way it was.  */
  /* Put it back the way it was.  */
  if (relocation & 0x8000)
  if (relocation & 0x8000)
    reloc_entry->addend -= 0x10000;
    reloc_entry->addend -= 0x10000;
 
 
  return ret;
  return ret;
}
}
 
 
static bfd_reloc_status_type
static bfd_reloc_status_type
iq2000_elf_relocate_hi16 (bfd *input_bfd,
iq2000_elf_relocate_hi16 (bfd *input_bfd,
                          Elf_Internal_Rela *relhi,
                          Elf_Internal_Rela *relhi,
                          bfd_byte *contents,
                          bfd_byte *contents,
                          bfd_vma value)
                          bfd_vma value)
{
{
  bfd_vma insn;
  bfd_vma insn;
 
 
  insn = bfd_get_32 (input_bfd, contents + relhi->r_offset);
  insn = bfd_get_32 (input_bfd, contents + relhi->r_offset);
 
 
  value += relhi->r_addend;
  value += relhi->r_addend;
  value &= 0x7fffffff; /* Mask off top-bit which is Harvard mask bit.  */
  value &= 0x7fffffff; /* Mask off top-bit which is Harvard mask bit.  */
 
 
  /* If top-bit of %lo value is on, this means that %lo will
  /* If top-bit of %lo value is on, this means that %lo will
     sign-propagate and so we compensate by adding 1 to %hi value.  */
     sign-propagate and so we compensate by adding 1 to %hi value.  */
  if (value & 0x8000)
  if (value & 0x8000)
    value += 0x10000;
    value += 0x10000;
 
 
  value >>= 16;
  value >>= 16;
  insn = ((insn & ~0xFFFF) | value);
  insn = ((insn & ~0xFFFF) | value);
 
 
  bfd_put_32 (input_bfd, insn, contents + relhi->r_offset);
  bfd_put_32 (input_bfd, insn, contents + relhi->r_offset);
  return bfd_reloc_ok;
  return bfd_reloc_ok;
}
}
 
 
static bfd_reloc_status_type
static bfd_reloc_status_type
iq2000_elf_relocate_offset16 (bfd *input_bfd,
iq2000_elf_relocate_offset16 (bfd *input_bfd,
                              Elf_Internal_Rela *rel,
                              Elf_Internal_Rela *rel,
                              bfd_byte *contents,
                              bfd_byte *contents,
                              bfd_vma value,
                              bfd_vma value,
                              bfd_vma location)
                              bfd_vma location)
{
{
  bfd_vma insn;
  bfd_vma insn;
  bfd_vma jtarget;
  bfd_vma jtarget;
 
 
  insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
  insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
 
 
  value += rel->r_addend;
  value += rel->r_addend;
 
 
  if (value & 3)
  if (value & 3)
    return bfd_reloc_dangerous;
    return bfd_reloc_dangerous;
 
 
  jtarget = (value & 0x3fffc) | (location & 0xf0000000L);
  jtarget = (value & 0x3fffc) | (location & 0xf0000000L);
 
 
  if (jtarget != value)
  if (jtarget != value)
    return bfd_reloc_overflow;
    return bfd_reloc_overflow;
 
 
  insn = (insn & ~0xFFFF) | ((value >> 2) & 0xFFFF);
  insn = (insn & ~0xFFFF) | ((value >> 2) & 0xFFFF);
 
 
  bfd_put_32 (input_bfd, insn, contents + rel->r_offset);
  bfd_put_32 (input_bfd, insn, contents + rel->r_offset);
  return bfd_reloc_ok;
  return bfd_reloc_ok;
}
}
 
 
/* Map BFD reloc types to IQ2000 ELF reloc types.  */
/* Map BFD reloc types to IQ2000 ELF reloc types.  */
 
 
static reloc_howto_type *
static reloc_howto_type *
iq2000_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
iq2000_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
                          bfd_reloc_code_real_type code)
                          bfd_reloc_code_real_type code)
{
{
  /* Note that the iq2000_elf_howto_table is indxed by the R_
  /* Note that the iq2000_elf_howto_table is indxed by the R_
     constants.  Thus, the order that the howto records appear in the
     constants.  Thus, the order that the howto records appear in the
     table *must* match the order of the relocation types defined in
     table *must* match the order of the relocation types defined in
     include/elf/iq2000.h.  */
     include/elf/iq2000.h.  */
 
 
  switch (code)
  switch (code)
    {
    {
    case BFD_RELOC_NONE:
    case BFD_RELOC_NONE:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_NONE];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_NONE];
    case BFD_RELOC_16:
    case BFD_RELOC_16:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_16];
    case BFD_RELOC_32:
    case BFD_RELOC_32:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_32];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_32];
    case BFD_RELOC_MIPS_JMP:
    case BFD_RELOC_MIPS_JMP:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_26];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_26];
    case BFD_RELOC_IQ2000_OFFSET_16:
    case BFD_RELOC_IQ2000_OFFSET_16:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_OFFSET_16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_OFFSET_16];
    case BFD_RELOC_IQ2000_OFFSET_21:
    case BFD_RELOC_IQ2000_OFFSET_21:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_OFFSET_21];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_OFFSET_21];
    case BFD_RELOC_16_PCREL_S2:
    case BFD_RELOC_16_PCREL_S2:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_PC16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_PC16];
    case BFD_RELOC_HI16:
    case BFD_RELOC_HI16:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_HI16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_HI16];
    case BFD_RELOC_IQ2000_UHI16:
    case BFD_RELOC_IQ2000_UHI16:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_UHI16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_UHI16];
    case BFD_RELOC_LO16:
    case BFD_RELOC_LO16:
      return &iq2000_elf_howto_table[ (int) R_IQ2000_LO16];
      return &iq2000_elf_howto_table[ (int) R_IQ2000_LO16];
    case BFD_RELOC_VTABLE_INHERIT:
    case BFD_RELOC_VTABLE_INHERIT:
      return &iq2000_elf_vtinherit_howto;
      return &iq2000_elf_vtinherit_howto;
    case BFD_RELOC_VTABLE_ENTRY:
    case BFD_RELOC_VTABLE_ENTRY:
      return &iq2000_elf_vtentry_howto;
      return &iq2000_elf_vtentry_howto;
    default:
    default:
      /* Pacify gcc -Wall.  */
      /* Pacify gcc -Wall.  */
      return NULL;
      return NULL;
    }
    }
  return NULL;
  return NULL;
}
}
 
 
static reloc_howto_type *
static reloc_howto_type *
iq2000_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, const char *r_name)
iq2000_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, const char *r_name)
{
{
  unsigned int i;
  unsigned int i;
 
 
  for (i = 0;
  for (i = 0;
       i < (sizeof (iq2000_elf_howto_table)
       i < (sizeof (iq2000_elf_howto_table)
            / sizeof (iq2000_elf_howto_table[0]));
            / sizeof (iq2000_elf_howto_table[0]));
       i++)
       i++)
    if (iq2000_elf_howto_table[i].name != NULL
    if (iq2000_elf_howto_table[i].name != NULL
        && strcasecmp (iq2000_elf_howto_table[i].name, r_name) == 0)
        && strcasecmp (iq2000_elf_howto_table[i].name, r_name) == 0)
      return &iq2000_elf_howto_table[i];
      return &iq2000_elf_howto_table[i];
 
 
  if (strcasecmp (iq2000_elf_vtinherit_howto.name, r_name) == 0)
  if (strcasecmp (iq2000_elf_vtinherit_howto.name, r_name) == 0)
    return &iq2000_elf_vtinherit_howto;
    return &iq2000_elf_vtinherit_howto;
  if (strcasecmp (iq2000_elf_vtentry_howto.name, r_name) == 0)
  if (strcasecmp (iq2000_elf_vtentry_howto.name, r_name) == 0)
    return &iq2000_elf_vtentry_howto;
    return &iq2000_elf_vtentry_howto;
 
 
  return NULL;
  return NULL;
}
}


/* Perform a single relocation.  By default we use the standard BFD
/* Perform a single relocation.  By default we use the standard BFD
   routines.  */
   routines.  */
 
 
static bfd_reloc_status_type
static bfd_reloc_status_type
iq2000_final_link_relocate (reloc_howto_type *  howto,
iq2000_final_link_relocate (reloc_howto_type *  howto,
                            bfd *               input_bfd,
                            bfd *               input_bfd,
                            asection *          input_section,
                            asection *          input_section,
                            bfd_byte *          contents,
                            bfd_byte *          contents,
                            Elf_Internal_Rela * rel,
                            Elf_Internal_Rela * rel,
                            bfd_vma             relocation)
                            bfd_vma             relocation)
{
{
  return _bfd_final_link_relocate (howto, input_bfd, input_section,
  return _bfd_final_link_relocate (howto, input_bfd, input_section,
                                   contents, rel->r_offset,
                                   contents, rel->r_offset,
                                   relocation, rel->r_addend);
                                   relocation, rel->r_addend);
}
}


/* Set the howto pointer for a IQ2000 ELF reloc.  */
/* Set the howto pointer for a IQ2000 ELF reloc.  */
 
 
static void
static void
iq2000_info_to_howto_rela (bfd * abfd ATTRIBUTE_UNUSED,
iq2000_info_to_howto_rela (bfd * abfd ATTRIBUTE_UNUSED,
                           arelent * cache_ptr,
                           arelent * cache_ptr,
                           Elf_Internal_Rela * dst)
                           Elf_Internal_Rela * dst)
{
{
  unsigned int r_type;
  unsigned int r_type;
 
 
  r_type = ELF32_R_TYPE (dst->r_info);
  r_type = ELF32_R_TYPE (dst->r_info);
  switch (r_type)
  switch (r_type)
    {
    {
    case R_IQ2000_GNU_VTINHERIT:
    case R_IQ2000_GNU_VTINHERIT:
      cache_ptr->howto = & iq2000_elf_vtinherit_howto;
      cache_ptr->howto = & iq2000_elf_vtinherit_howto;
      break;
      break;
 
 
    case R_IQ2000_GNU_VTENTRY:
    case R_IQ2000_GNU_VTENTRY:
      cache_ptr->howto = & iq2000_elf_vtentry_howto;
      cache_ptr->howto = & iq2000_elf_vtentry_howto;
      break;
      break;
 
 
    default:
    default:
      cache_ptr->howto = & iq2000_elf_howto_table [r_type];
      cache_ptr->howto = & iq2000_elf_howto_table [r_type];
      break;
      break;
    }
    }
}
}
 
 
/* Look through the relocs for a section during the first phase.
/* Look through the relocs for a section during the first phase.
   Since we don't do .gots or .plts, we just need to consider the
   Since we don't do .gots or .plts, we just need to consider the
   virtual table relocs for gc.  */
   virtual table relocs for gc.  */
 
 
static bfd_boolean
static bfd_boolean
iq2000_elf_check_relocs (bfd *abfd,
iq2000_elf_check_relocs (bfd *abfd,
                         struct bfd_link_info *info,
                         struct bfd_link_info *info,
                         asection *sec,
                         asection *sec,
                         const Elf_Internal_Rela *relocs)
                         const Elf_Internal_Rela *relocs)
{
{
  Elf_Internal_Shdr *symtab_hdr;
  Elf_Internal_Shdr *symtab_hdr;
  struct elf_link_hash_entry **sym_hashes;
  struct elf_link_hash_entry **sym_hashes;
  const Elf_Internal_Rela *rel;
  const Elf_Internal_Rela *rel;
  const Elf_Internal_Rela *rel_end;
  const Elf_Internal_Rela *rel_end;
  bfd_boolean changed = FALSE;
  bfd_boolean changed = FALSE;
 
 
  if (info->relocatable)
  if (info->relocatable)
    return TRUE;
    return TRUE;
 
 
  symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
  symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
  sym_hashes = elf_sym_hashes (abfd);
  sym_hashes = elf_sym_hashes (abfd);
 
 
  rel_end = relocs + sec->reloc_count;
  rel_end = relocs + sec->reloc_count;
  for (rel = relocs; rel < rel_end; rel++)
  for (rel = relocs; rel < rel_end; rel++)
    {
    {
      struct elf_link_hash_entry *h;
      struct elf_link_hash_entry *h;
      unsigned long r_symndx;
      unsigned long r_symndx;
 
 
      r_symndx = ELF32_R_SYM (rel->r_info);
      r_symndx = ELF32_R_SYM (rel->r_info);
      if (r_symndx < symtab_hdr->sh_info)
      if (r_symndx < symtab_hdr->sh_info)
        h = NULL;
        h = NULL;
      else
      else
        {
        {
          h = sym_hashes[r_symndx - symtab_hdr->sh_info];
          h = sym_hashes[r_symndx - symtab_hdr->sh_info];
          while (h->root.type == bfd_link_hash_indirect
          while (h->root.type == bfd_link_hash_indirect
                 || h->root.type == bfd_link_hash_warning)
                 || h->root.type == bfd_link_hash_warning)
            h = (struct elf_link_hash_entry *) h->root.u.i.link;
            h = (struct elf_link_hash_entry *) h->root.u.i.link;
        }
        }
 
 
      switch (ELF32_R_TYPE (rel->r_info))
      switch (ELF32_R_TYPE (rel->r_info))
        {
        {
          /* This relocation describes the C++ object vtable
          /* This relocation describes the C++ object vtable
             hierarchy.  Reconstruct it for later use during GC.  */
             hierarchy.  Reconstruct it for later use during GC.  */
        case R_IQ2000_GNU_VTINHERIT:
        case R_IQ2000_GNU_VTINHERIT:
          if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
          if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
            return FALSE;
            return FALSE;
          break;
          break;
 
 
          /* This relocation describes which C++ vtable entries
          /* This relocation describes which C++ vtable entries
             are actually used.  Record for later use during GC.  */
             are actually used.  Record for later use during GC.  */
        case R_IQ2000_GNU_VTENTRY:
        case R_IQ2000_GNU_VTENTRY:
          BFD_ASSERT (h != NULL);
          BFD_ASSERT (h != NULL);
          if (h != NULL
          if (h != NULL
              && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
              && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
            return FALSE;
            return FALSE;
          break;
          break;
 
 
        case R_IQ2000_32:
        case R_IQ2000_32:
          /* For debug section, change to special harvard-aware relocations.  */
          /* For debug section, change to special harvard-aware relocations.  */
          if (CONST_STRNEQ (sec->name, ".debug")
          if (CONST_STRNEQ (sec->name, ".debug")
              || CONST_STRNEQ (sec->name, ".stab")
              || CONST_STRNEQ (sec->name, ".stab")
              || CONST_STRNEQ (sec->name, ".eh_frame"))
              || CONST_STRNEQ (sec->name, ".eh_frame"))
            {
            {
              ((Elf_Internal_Rela *) rel)->r_info
              ((Elf_Internal_Rela *) rel)->r_info
                = ELF32_R_INFO (ELF32_R_SYM (rel->r_info), R_IQ2000_32_DEBUG);
                = ELF32_R_INFO (ELF32_R_SYM (rel->r_info), R_IQ2000_32_DEBUG);
              changed = TRUE;
              changed = TRUE;
            }
            }
          break;
          break;
        }
        }
    }
    }
 
 
  if (changed)
  if (changed)
    /* Note that we've changed relocs, otherwise if !info->keep_memory
    /* Note that we've changed relocs, otherwise if !info->keep_memory
       we'll free the relocs and lose our changes.  */
       we'll free the relocs and lose our changes.  */
    elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
    elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
 
 
  return TRUE;
  return TRUE;
}
}
 
 


/* Relocate a IQ2000 ELF section.
/* Relocate a IQ2000 ELF section.
   There is some attempt to make this function usable for many architectures,
   There is some attempt to make this function usable for many architectures,
   both USE_REL and USE_RELA ['twould be nice if such a critter existed],
   both USE_REL and USE_RELA ['twould be nice if such a critter existed],
   if only to serve as a learning tool.
   if only to serve as a learning tool.
 
 
   The RELOCATE_SECTION function is called by the new ELF backend linker
   The RELOCATE_SECTION function is called by the new ELF backend linker
   to handle the relocations for a section.
   to handle the relocations for a section.
 
 
   The relocs are always passed as Rela structures; if the section
   The relocs are always passed as Rela structures; if the section
   actually uses Rel structures, the r_addend field will always be
   actually uses Rel structures, the r_addend field will always be
   zero.
   zero.
 
 
   This function is responsible for adjusting the section contents as
   This function is responsible for adjusting the section contents as
   necessary, and (if using Rela relocs and generating a relocatable
   necessary, and (if using Rela relocs and generating a relocatable
   output file) adjusting the reloc addend as necessary.
   output file) adjusting the reloc addend as necessary.
 
 
   This function does not have to worry about setting the reloc
   This function does not have to worry about setting the reloc
   address or the reloc symbol index.
   address or the reloc symbol index.
 
 
   LOCAL_SYMS is a pointer to the swapped in local symbols.
   LOCAL_SYMS is a pointer to the swapped in local symbols.
 
 
   LOCAL_SECTIONS is an array giving the section in the input file
   LOCAL_SECTIONS is an array giving the section in the input file
   corresponding to the st_shndx field of each local symbol.
   corresponding to the st_shndx field of each local symbol.
 
 
   The global hash table entry for the global symbols can be found
   The global hash table entry for the global symbols can be found
   via elf_sym_hashes (input_bfd).
   via elf_sym_hashes (input_bfd).
 
 
   When generating relocatable output, this function must handle
   When generating relocatable output, this function must handle
   STB_LOCAL/STT_SECTION symbols specially.  The output symbol is
   STB_LOCAL/STT_SECTION symbols specially.  The output symbol is
   going to be the section symbol corresponding to the output
   going to be the section symbol corresponding to the output
   section, which means that the addend must be adjusted
   section, which means that the addend must be adjusted
   accordingly.  */
   accordingly.  */
 
 
static bfd_boolean
static bfd_boolean
iq2000_elf_relocate_section (bfd *                   output_bfd ATTRIBUTE_UNUSED,
iq2000_elf_relocate_section (bfd *                   output_bfd ATTRIBUTE_UNUSED,
                             struct bfd_link_info *  info,
                             struct bfd_link_info *  info,
                             bfd *                   input_bfd,
                             bfd *                   input_bfd,
                             asection *              input_section,
                             asection *              input_section,
                             bfd_byte *              contents,
                             bfd_byte *              contents,
                             Elf_Internal_Rela *     relocs,
                             Elf_Internal_Rela *     relocs,
                             Elf_Internal_Sym *      local_syms,
                             Elf_Internal_Sym *      local_syms,
                             asection **             local_sections)
                             asection **             local_sections)
{
{
  Elf_Internal_Shdr *           symtab_hdr;
  Elf_Internal_Shdr *           symtab_hdr;
  struct elf_link_hash_entry ** sym_hashes;
  struct elf_link_hash_entry ** sym_hashes;
  Elf_Internal_Rela *           rel;
  Elf_Internal_Rela *           rel;
  Elf_Internal_Rela *           relend;
  Elf_Internal_Rela *           relend;
 
 
  symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
  symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
  sym_hashes = elf_sym_hashes (input_bfd);
  sym_hashes = elf_sym_hashes (input_bfd);
  relend     = relocs + input_section->reloc_count;
  relend     = relocs + input_section->reloc_count;
 
 
  for (rel = relocs; rel < relend; rel ++)
  for (rel = relocs; rel < relend; rel ++)
    {
    {
      reloc_howto_type *           howto;
      reloc_howto_type *           howto;
      unsigned long                r_symndx;
      unsigned long                r_symndx;
      Elf_Internal_Sym *           sym;
      Elf_Internal_Sym *           sym;
      asection *                   sec;
      asection *                   sec;
      struct elf_link_hash_entry * h;
      struct elf_link_hash_entry * h;
      bfd_vma                      relocation;
      bfd_vma                      relocation;
      bfd_reloc_status_type        r;
      bfd_reloc_status_type        r;
      const char *                 name = NULL;
      const char *                 name = NULL;
      int                          r_type;
      int                          r_type;
 
 
      r_type = ELF32_R_TYPE (rel->r_info);
      r_type = ELF32_R_TYPE (rel->r_info);
 
 
      if (   r_type == R_IQ2000_GNU_VTINHERIT
      if (   r_type == R_IQ2000_GNU_VTINHERIT
          || r_type == R_IQ2000_GNU_VTENTRY)
          || r_type == R_IQ2000_GNU_VTENTRY)
        continue;
        continue;
 
 
      r_symndx = ELF32_R_SYM (rel->r_info);
      r_symndx = ELF32_R_SYM (rel->r_info);
 
 
      howto  = iq2000_elf_howto_table + ELF32_R_TYPE (rel->r_info);
      howto  = iq2000_elf_howto_table + ELF32_R_TYPE (rel->r_info);
      h      = NULL;
      h      = NULL;
      sym    = NULL;
      sym    = NULL;
      sec    = NULL;
      sec    = NULL;
 
 
      if (r_symndx < symtab_hdr->sh_info)
      if (r_symndx < symtab_hdr->sh_info)
        {
        {
          asection *osec;
          asection *osec;
 
 
          sym = local_syms + r_symndx;
          sym = local_syms + r_symndx;
          osec = sec = local_sections [r_symndx];
          osec = sec = local_sections [r_symndx];
          if ((sec->flags & SEC_MERGE)
          if ((sec->flags & SEC_MERGE)
              && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
              && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
            /* This relocation is relative to a section symbol that is
            /* This relocation is relative to a section symbol that is
               going to be merged.  Change it so that it is relative
               going to be merged.  Change it so that it is relative
               to the merged section symbol.  */
               to the merged section symbol.  */
            rel->r_addend = _bfd_elf_rel_local_sym (output_bfd, sym, &sec,
            rel->r_addend = _bfd_elf_rel_local_sym (output_bfd, sym, &sec,
                                                    rel->r_addend);
                                                    rel->r_addend);
 
 
          relocation = (sec->output_section->vma
          relocation = (sec->output_section->vma
                        + sec->output_offset
                        + sec->output_offset
                        + sym->st_value);
                        + sym->st_value);
 
 
          name = bfd_elf_string_from_elf_section
          name = bfd_elf_string_from_elf_section
            (input_bfd, symtab_hdr->sh_link, sym->st_name);
            (input_bfd, symtab_hdr->sh_link, sym->st_name);
          name = (name == NULL) ? bfd_section_name (input_bfd, osec) : name;
          name = (name == NULL) ? bfd_section_name (input_bfd, osec) : name;
        }
        }
      else
      else
        {
        {
          bfd_boolean unresolved_reloc;
          bfd_boolean unresolved_reloc;
          bfd_boolean warned;
          bfd_boolean warned;
 
 
          RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
          RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
                                   r_symndx, symtab_hdr, sym_hashes,
                                   r_symndx, symtab_hdr, sym_hashes,
                                   h, sec, relocation,
                                   h, sec, relocation,
                                   unresolved_reloc, warned);
                                   unresolved_reloc, warned);
 
 
          name = h->root.root.string;
          name = h->root.root.string;
        }
        }
 
 
      if (sec != NULL && elf_discarded_section (sec))
      if (sec != NULL && elf_discarded_section (sec))
        {
        {
          /* For relocs against symbols from removed linkonce sections,
          /* For relocs against symbols from removed linkonce sections,
             or sections discarded by a linker script, we just want the
             or sections discarded by a linker script, we just want the
             section contents zeroed.  Avoid any special processing.  */
             section contents zeroed.  Avoid any special processing.  */
          _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
          _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
          rel->r_info = 0;
          rel->r_info = 0;
          rel->r_addend = 0;
          rel->r_addend = 0;
          continue;
          continue;
        }
        }
 
 
      if (info->relocatable)
      if (info->relocatable)
        continue;
        continue;
 
 
      switch (r_type)
      switch (r_type)
        {
        {
        case R_IQ2000_HI16:
        case R_IQ2000_HI16:
          r = iq2000_elf_relocate_hi16 (input_bfd, rel, contents, relocation);
          r = iq2000_elf_relocate_hi16 (input_bfd, rel, contents, relocation);
          break;
          break;
 
 
        case R_IQ2000_OFFSET_16:
        case R_IQ2000_OFFSET_16:
          r = iq2000_elf_relocate_offset16 (input_bfd, rel, contents, relocation,
          r = iq2000_elf_relocate_offset16 (input_bfd, rel, contents, relocation,
                                            input_section->output_section->vma
                                            input_section->output_section->vma
                                            + input_section->output_offset
                                            + input_section->output_offset
                                            + rel->r_offset);
                                            + rel->r_offset);
          break;
          break;
 
 
        case R_IQ2000_PC16:
        case R_IQ2000_PC16:
          rel->r_addend -= 4;
          rel->r_addend -= 4;
          /* Fall through.  */
          /* Fall through.  */
 
 
        default:
        default:
          r = iq2000_final_link_relocate (howto, input_bfd, input_section,
          r = iq2000_final_link_relocate (howto, input_bfd, input_section,
                                         contents, rel, relocation);
                                         contents, rel, relocation);
          break;
          break;
        }
        }
 
 
      if (r != bfd_reloc_ok)
      if (r != bfd_reloc_ok)
        {
        {
          const char * msg = (const char *) NULL;
          const char * msg = (const char *) NULL;
 
 
          switch (r)
          switch (r)
            {
            {
            case bfd_reloc_overflow:
            case bfd_reloc_overflow:
              r = info->callbacks->reloc_overflow
              r = info->callbacks->reloc_overflow
                (info, (h ? &h->root : NULL), name, howto->name,
                (info, (h ? &h->root : NULL), name, howto->name,
                 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
                 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
              break;
              break;
 
 
            case bfd_reloc_undefined:
            case bfd_reloc_undefined:
              r = info->callbacks->undefined_symbol
              r = info->callbacks->undefined_symbol
                (info, name, input_bfd, input_section, rel->r_offset, TRUE);
                (info, name, input_bfd, input_section, rel->r_offset, TRUE);
              break;
              break;
 
 
            case bfd_reloc_outofrange:
            case bfd_reloc_outofrange:
              msg = _("internal error: out of range error");
              msg = _("internal error: out of range error");
              break;
              break;
 
 
            case bfd_reloc_notsupported:
            case bfd_reloc_notsupported:
              msg = _("internal error: unsupported relocation error");
              msg = _("internal error: unsupported relocation error");
              break;
              break;
 
 
            case bfd_reloc_dangerous:
            case bfd_reloc_dangerous:
              msg = _("internal error: dangerous relocation");
              msg = _("internal error: dangerous relocation");
              break;
              break;
 
 
            default:
            default:
              msg = _("internal error: unknown error");
              msg = _("internal error: unknown error");
              break;
              break;
            }
            }
 
 
          if (msg)
          if (msg)
            r = info->callbacks->warning
            r = info->callbacks->warning
              (info, msg, name, input_bfd, input_section, rel->r_offset);
              (info, msg, name, input_bfd, input_section, rel->r_offset);
 
 
          if (! r)
          if (! r)
            return FALSE;
            return FALSE;
        }
        }
    }
    }
 
 
  return TRUE;
  return TRUE;
}
}


 
 
/* Return the section that should be marked against GC for a given
/* Return the section that should be marked against GC for a given
   relocation.  */
   relocation.  */
 
 
static asection *
static asection *
iq2000_elf_gc_mark_hook (asection *sec,
iq2000_elf_gc_mark_hook (asection *sec,
                         struct bfd_link_info *info,
                         struct bfd_link_info *info,
                         Elf_Internal_Rela *rel,
                         Elf_Internal_Rela *rel,
                         struct elf_link_hash_entry *h,
                         struct elf_link_hash_entry *h,
                         Elf_Internal_Sym *sym)
                         Elf_Internal_Sym *sym)
{
{
  if (h != NULL)
  if (h != NULL)
    switch (ELF32_R_TYPE (rel->r_info))
    switch (ELF32_R_TYPE (rel->r_info))
      {
      {
      case R_IQ2000_GNU_VTINHERIT:
      case R_IQ2000_GNU_VTINHERIT:
      case R_IQ2000_GNU_VTENTRY:
      case R_IQ2000_GNU_VTENTRY:
        return NULL;
        return NULL;
      }
      }
 
 
  return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
  return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
}
}
 
 


/* Return the MACH for an e_flags value.  */
/* Return the MACH for an e_flags value.  */
 
 
static int
static int
elf32_iq2000_machine (bfd *abfd)
elf32_iq2000_machine (bfd *abfd)
{
{
  switch (elf_elfheader (abfd)->e_flags & EF_IQ2000_CPU_MASK)
  switch (elf_elfheader (abfd)->e_flags & EF_IQ2000_CPU_MASK)
    {
    {
    case EF_IQ2000_CPU_IQ10:
    case EF_IQ2000_CPU_IQ10:
      return bfd_mach_iq10;
      return bfd_mach_iq10;
 
 
    case EF_IQ2000_CPU_IQ2000:
    case EF_IQ2000_CPU_IQ2000:
    default:
    default:
      return bfd_mach_iq2000;
      return bfd_mach_iq2000;
    }
    }
}
}
 
 


/* Function to set the ELF flag bits.  */
/* Function to set the ELF flag bits.  */
 
 
static bfd_boolean
static bfd_boolean
iq2000_elf_set_private_flags (bfd *abfd, flagword flags)
iq2000_elf_set_private_flags (bfd *abfd, flagword flags)
{
{
  elf_elfheader (abfd)->e_flags = flags;
  elf_elfheader (abfd)->e_flags = flags;
  elf_flags_init (abfd) = TRUE;
  elf_flags_init (abfd) = TRUE;
  return TRUE;
  return TRUE;
}
}
 
 
/* Copy backend specific data from one object module to another.  */
/* Copy backend specific data from one object module to another.  */
 
 
static bfd_boolean
static bfd_boolean
iq2000_elf_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
iq2000_elf_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
{
{
  if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
  if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
      || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
      || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
    return TRUE;
    return TRUE;
 
 
  BFD_ASSERT (!elf_flags_init (obfd)
  BFD_ASSERT (!elf_flags_init (obfd)
              || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
              || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
 
 
  elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
  elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
  elf_flags_init (obfd) = TRUE;
  elf_flags_init (obfd) = TRUE;
 
 
  /* Copy object attributes.  */
  /* Copy object attributes.  */
  _bfd_elf_copy_obj_attributes (ibfd, obfd);
  _bfd_elf_copy_obj_attributes (ibfd, obfd);
 
 
  return TRUE;
  return TRUE;
}
}
 
 
/* Merge backend specific data from an object
/* Merge backend specific data from an object
   file to the output object file when linking.  */
   file to the output object file when linking.  */
 
 
static bfd_boolean
static bfd_boolean
iq2000_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
iq2000_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
{
{
  flagword old_flags, old_partial;
  flagword old_flags, old_partial;
  flagword new_flags, new_partial;
  flagword new_flags, new_partial;
  bfd_boolean error = FALSE;
  bfd_boolean error = FALSE;
  char new_opt[80];
  char new_opt[80];
  char old_opt[80];
  char old_opt[80];
 
 
  new_opt[0] = old_opt[0] = '\0';
  new_opt[0] = old_opt[0] = '\0';
  new_flags = elf_elfheader (ibfd)->e_flags;
  new_flags = elf_elfheader (ibfd)->e_flags;
  old_flags = elf_elfheader (obfd)->e_flags;
  old_flags = elf_elfheader (obfd)->e_flags;
 
 
  if (!elf_flags_init (obfd))
  if (!elf_flags_init (obfd))
    {
    {
      /* First call, no flags set.  */
      /* First call, no flags set.  */
      elf_flags_init (obfd) = TRUE;
      elf_flags_init (obfd) = TRUE;
      elf_elfheader (obfd)->e_flags = new_flags;
      elf_elfheader (obfd)->e_flags = new_flags;
    }
    }
 
 
  else if (new_flags != old_flags)
  else if (new_flags != old_flags)
    {
    {
      /* Warn if different cpu is used, but allow a
      /* Warn if different cpu is used, but allow a
         specific cpu to override the generic cpu.  */
         specific cpu to override the generic cpu.  */
      new_partial = (new_flags & EF_IQ2000_CPU_MASK);
      new_partial = (new_flags & EF_IQ2000_CPU_MASK);
      old_partial = (old_flags & EF_IQ2000_CPU_MASK);
      old_partial = (old_flags & EF_IQ2000_CPU_MASK);
 
 
      if (new_partial != old_partial)
      if (new_partial != old_partial)
        {
        {
          switch (new_partial)
          switch (new_partial)
            {
            {
            case EF_IQ2000_CPU_IQ10:
            case EF_IQ2000_CPU_IQ10:
              strcat (new_opt, " -m10");
              strcat (new_opt, " -m10");
              break;
              break;
 
 
            default:
            default:
            case EF_IQ2000_CPU_IQ2000:
            case EF_IQ2000_CPU_IQ2000:
              strcat (new_opt, " -m2000");
              strcat (new_opt, " -m2000");
              break;
              break;
            }
            }
 
 
          switch (old_partial)
          switch (old_partial)
            {
            {
            case EF_IQ2000_CPU_IQ10:
            case EF_IQ2000_CPU_IQ10:
              strcat (old_opt, " -m10");
              strcat (old_opt, " -m10");
              break;
              break;
 
 
            default:
            default:
            case EF_IQ2000_CPU_IQ2000:
            case EF_IQ2000_CPU_IQ2000:
              strcat (old_opt, " -m2000");
              strcat (old_opt, " -m2000");
              break;
              break;
            }
            }
        }
        }
 
 
      /* Print out any mismatches from above.  */
      /* Print out any mismatches from above.  */
      if (new_opt[0])
      if (new_opt[0])
        {
        {
          error = TRUE;
          error = TRUE;
          _bfd_error_handler
          _bfd_error_handler
            (_("%s: compiled with %s and linked with modules compiled with %s"),
            (_("%s: compiled with %s and linked with modules compiled with %s"),
             bfd_get_filename (ibfd), new_opt, old_opt);
             bfd_get_filename (ibfd), new_opt, old_opt);
        }
        }
 
 
      new_flags &= ~ EF_IQ2000_ALL_FLAGS;
      new_flags &= ~ EF_IQ2000_ALL_FLAGS;
      old_flags &= ~ EF_IQ2000_ALL_FLAGS;
      old_flags &= ~ EF_IQ2000_ALL_FLAGS;
 
 
      /* Warn about any other mismatches.  */
      /* Warn about any other mismatches.  */
      if (new_flags != old_flags)
      if (new_flags != old_flags)
        {
        {
          error = TRUE;
          error = TRUE;
 
 
          _bfd_error_handler
          _bfd_error_handler
            (_("%s: uses different e_flags (0x%lx) fields than previous modules (0x%lx)"),
            (_("%s: uses different e_flags (0x%lx) fields than previous modules (0x%lx)"),
             bfd_get_filename (ibfd), (long)new_flags, (long)old_flags);
             bfd_get_filename (ibfd), (long)new_flags, (long)old_flags);
        }
        }
    }
    }
 
 
  if (error)
  if (error)
    bfd_set_error (bfd_error_bad_value);
    bfd_set_error (bfd_error_bad_value);
 
 
  return !error;
  return !error;
}
}
 
 


static bfd_boolean
static bfd_boolean
iq2000_elf_print_private_bfd_data (bfd *abfd, void * ptr)
iq2000_elf_print_private_bfd_data (bfd *abfd, void * ptr)
{
{
  FILE *file = (FILE *) ptr;
  FILE *file = (FILE *) ptr;
  flagword flags;
  flagword flags;
 
 
  BFD_ASSERT (abfd != NULL && ptr != NULL);
  BFD_ASSERT (abfd != NULL && ptr != NULL);
 
 
  /* Print normal ELF private data.  */
  /* Print normal ELF private data.  */
  _bfd_elf_print_private_bfd_data (abfd, ptr);
  _bfd_elf_print_private_bfd_data (abfd, ptr);
 
 
  flags = elf_elfheader (abfd)->e_flags;
  flags = elf_elfheader (abfd)->e_flags;
  fprintf (file, _("private flags = 0x%lx:"), (unsigned long) flags);
  fprintf (file, _("private flags = 0x%lx:"), (unsigned long) flags);
 
 
  switch (flags & EF_IQ2000_CPU_MASK)
  switch (flags & EF_IQ2000_CPU_MASK)
    {
    {
    case EF_IQ2000_CPU_IQ10:
    case EF_IQ2000_CPU_IQ10:
      fprintf (file, " -m10");
      fprintf (file, " -m10");
      break;
      break;
    case EF_IQ2000_CPU_IQ2000:
    case EF_IQ2000_CPU_IQ2000:
      fprintf (file, " -m2000");
      fprintf (file, " -m2000");
      break;
      break;
    default:
    default:
      break;
      break;
    }
    }
 
 
  fputc ('\n', file);
  fputc ('\n', file);
  return TRUE;
  return TRUE;
}
}
 
 
static
static
bfd_boolean
bfd_boolean
iq2000_elf_object_p (bfd *abfd)
iq2000_elf_object_p (bfd *abfd)
{
{
  bfd_default_set_arch_mach (abfd, bfd_arch_iq2000,
  bfd_default_set_arch_mach (abfd, bfd_arch_iq2000,
                             elf32_iq2000_machine (abfd));
                             elf32_iq2000_machine (abfd));
  return TRUE;
  return TRUE;
}
}
 
 


#define ELF_ARCH                bfd_arch_iq2000
#define ELF_ARCH                bfd_arch_iq2000
#define ELF_MACHINE_CODE        EM_IQ2000
#define ELF_MACHINE_CODE        EM_IQ2000
#define ELF_MAXPAGESIZE         0x1000
#define ELF_MAXPAGESIZE         0x1000
 
 
#define TARGET_BIG_SYM          bfd_elf32_iq2000_vec
#define TARGET_BIG_SYM          bfd_elf32_iq2000_vec
#define TARGET_BIG_NAME         "elf32-iq2000"
#define TARGET_BIG_NAME         "elf32-iq2000"
 
 
#define elf_info_to_howto_rel                   NULL
#define elf_info_to_howto_rel                   NULL
#define elf_info_to_howto                       iq2000_info_to_howto_rela
#define elf_info_to_howto                       iq2000_info_to_howto_rela
#define elf_backend_relocate_section            iq2000_elf_relocate_section
#define elf_backend_relocate_section            iq2000_elf_relocate_section
#define elf_backend_gc_mark_hook                iq2000_elf_gc_mark_hook
#define elf_backend_gc_mark_hook                iq2000_elf_gc_mark_hook
#define elf_backend_check_relocs                iq2000_elf_check_relocs
#define elf_backend_check_relocs                iq2000_elf_check_relocs
#define elf_backend_object_p                    iq2000_elf_object_p
#define elf_backend_object_p                    iq2000_elf_object_p
#define elf_backend_rela_normal                 1
#define elf_backend_rela_normal                 1
 
 
#define elf_backend_can_gc_sections             1
#define elf_backend_can_gc_sections             1
 
 
#define bfd_elf32_bfd_reloc_type_lookup         iq2000_reloc_type_lookup
#define bfd_elf32_bfd_reloc_type_lookup         iq2000_reloc_type_lookup
#define bfd_elf32_bfd_reloc_name_lookup iq2000_reloc_name_lookup
#define bfd_elf32_bfd_reloc_name_lookup iq2000_reloc_name_lookup
#define bfd_elf32_bfd_set_private_flags         iq2000_elf_set_private_flags
#define bfd_elf32_bfd_set_private_flags         iq2000_elf_set_private_flags
#define bfd_elf32_bfd_copy_private_bfd_data     iq2000_elf_copy_private_bfd_data
#define bfd_elf32_bfd_copy_private_bfd_data     iq2000_elf_copy_private_bfd_data
#define bfd_elf32_bfd_merge_private_bfd_data    iq2000_elf_merge_private_bfd_data
#define bfd_elf32_bfd_merge_private_bfd_data    iq2000_elf_merge_private_bfd_data
#define bfd_elf32_bfd_print_private_bfd_data    iq2000_elf_print_private_bfd_data
#define bfd_elf32_bfd_print_private_bfd_data    iq2000_elf_print_private_bfd_data
 
 
#include "elf32-target.h"
#include "elf32-target.h"
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.