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

Subversion Repositories or1k

[/] [or1k/] [tags/] [start/] [gdb-5.0/] [bfd/] [elf32-d30v.c] - Diff between revs 579 and 1765

Only display areas with differences | Details | Blame | View Log

Rev 579 Rev 1765
/* D30V-specific support for 32-bit ELF
/* D30V-specific support for 32-bit ELF
   Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
   Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
   Contributed by Martin Hunt (hunt@cygnus.com).
   Contributed by Martin Hunt (hunt@cygnus.com).
 
 
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 2 of the License, or
the Free Software Foundation; either version 2 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 
 
#include "bfd.h"
#include "bfd.h"
#include "sysdep.h"
#include "sysdep.h"
#include "libbfd.h"
#include "libbfd.h"
#include "elf-bfd.h"
#include "elf-bfd.h"
 
 
static reloc_howto_type *bfd_elf32_bfd_reloc_type_lookup
static reloc_howto_type *bfd_elf32_bfd_reloc_type_lookup
  PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
  PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
static void d30v_info_to_howto_rel
static void d30v_info_to_howto_rel
  PARAMS ((bfd *, arelent *, Elf32_Internal_Rel *));
  PARAMS ((bfd *, arelent *, Elf32_Internal_Rel *));
static void d30v_info_to_howto_rela
static void d30v_info_to_howto_rela
  PARAMS ((bfd *, arelent *, Elf32_Internal_Rela *));
  PARAMS ((bfd *, arelent *, Elf32_Internal_Rela *));
static bfd_reloc_status_type bfd_elf_d30v_reloc PARAMS ((
static bfd_reloc_status_type bfd_elf_d30v_reloc PARAMS ((
     bfd *abfd,
     bfd *abfd,
     arelent *reloc_entry,
     arelent *reloc_entry,
     asymbol *symbol,
     asymbol *symbol,
     PTR data,
     PTR data,
     asection *input_section,
     asection *input_section,
     bfd *output_bfd,
     bfd *output_bfd,
     char **error_message));
     char **error_message));
static bfd_reloc_status_type bfd_elf_d30v_reloc_21 PARAMS ((
static bfd_reloc_status_type bfd_elf_d30v_reloc_21 PARAMS ((
     bfd *abfd,
     bfd *abfd,
     arelent *reloc_entry,
     arelent *reloc_entry,
     asymbol *symbol,
     asymbol *symbol,
     PTR data,
     PTR data,
     asection *input_section,
     asection *input_section,
     bfd *output_bfd,
     bfd *output_bfd,
     char **error_message));
     char **error_message));
 
 
enum reloc_type
enum reloc_type
{
{
  R_D30V_NONE = 0,
  R_D30V_NONE = 0,
  R_D30V_6,
  R_D30V_6,
  R_D30V_9_PCREL,
  R_D30V_9_PCREL,
  R_D30V_9_PCREL_R,
  R_D30V_9_PCREL_R,
  R_D30V_15,
  R_D30V_15,
  R_D30V_15_PCREL,
  R_D30V_15_PCREL,
  R_D30V_15_PCREL_R,
  R_D30V_15_PCREL_R,
  R_D30V_21,
  R_D30V_21,
  R_D30V_21_PCREL,
  R_D30V_21_PCREL,
  R_D30V_21_PCREL_R,
  R_D30V_21_PCREL_R,
  R_D30V_32,
  R_D30V_32,
  R_D30V_32_PCREL,
  R_D30V_32_PCREL,
  R_D30V_32_NORMAL,
  R_D30V_32_NORMAL,
  R_D30V_max
  R_D30V_max
};
};
 
 
static reloc_howto_type elf_d30v_howto_table[] =
static reloc_howto_type elf_d30v_howto_table[] =
{
{
  /* This reloc does nothing.  */
  /* This reloc does nothing.  */
  HOWTO (R_D30V_NONE,           /* type */
  HOWTO (R_D30V_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_D30V_NONE",         /* name */
         "R_D30V_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 6 bit absolute relocation */
  /* A 6 bit absolute relocation */
  HOWTO (R_D30V_6,              /* type */
  HOWTO (R_D30V_6,              /* type */
         0,                      /* rightshift */
         0,                      /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         6,                     /* bitsize */
         6,                     /* 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_D30V_6",            /* name */
         "R_D30V_6",            /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3f,                  /* src_mask */
         0x3f,                  /* src_mask */
         0x3f,                  /* dst_mask */
         0x3f,                  /* dst_mask */
         false),                /* pcrel_offset */
         false),                /* pcrel_offset */
 
 
  /* A relative 9 bit relocation, right shifted by 3 */
  /* A relative 9 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_9_PCREL,        /* type */
  HOWTO (R_D30V_9_PCREL,        /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         6,                     /* bitsize */
         6,                     /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_9_PCREL",      /* name */
         "R_D30V_9_PCREL",      /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3f,                  /* src_mask */
         0x3f,                  /* src_mask */
         0x3f,                  /* dst_mask */
         0x3f,                  /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* A relative 9 bit relocation, right shifted by 3 */
  /* A relative 9 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_9_PCREL_R,      /* type */
  HOWTO (R_D30V_9_PCREL_R,      /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         6,                     /* bitsize */
         6,                     /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_9_PCREL_R",    /* name */
         "R_D30V_9_PCREL_R",    /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3f,                  /* src_mask */
         0x3f,                  /* src_mask */
         0x3f,                  /* dst_mask */
         0x3f,                  /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* An absolute 15 bit relocation, right shifted by 3 */
  /* An absolute 15 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_15,             /* type */
  HOWTO (R_D30V_15,             /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         12,                    /* bitsize */
         12,                    /* bitsize */
         false,                 /* pc_relative */
         false,                 /* 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_D30V_15",           /* name */
         "R_D30V_15",           /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xfff,                 /* src_mask */
         0xfff,                 /* src_mask */
         0xfff,                 /* dst_mask */
         0xfff,                 /* dst_mask */
         false),                /* pcrel_offset */
         false),                /* pcrel_offset */
 
 
  /* A relative 15 bit relocation, right shifted by 3 */
  /* A relative 15 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_15_PCREL,       /* type */
  HOWTO (R_D30V_15_PCREL,       /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         12,                    /* bitsize */
         12,                    /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_15_PCREL",     /* name */
         "R_D30V_15_PCREL",     /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xfff,                 /* src_mask */
         0xfff,                 /* src_mask */
         0xfff,                 /* dst_mask */
         0xfff,                 /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* A relative 15 bit relocation, right shifted by 3 */
  /* A relative 15 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_15_PCREL_R,     /* type */
  HOWTO (R_D30V_15_PCREL_R,     /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         12,                    /* bitsize */
         12,                    /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_15_PCREL_R",   /* name */
         "R_D30V_15_PCREL_R",   /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xfff,                 /* src_mask */
         0xfff,                 /* src_mask */
         0xfff,                 /* dst_mask */
         0xfff,                 /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* An absolute 21 bit relocation, right shifted by 3 */
  /* An absolute 21 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_21,             /* type */
  HOWTO (R_D30V_21,             /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         18,                    /* bitsize */
         18,                    /* bitsize */
         false,                 /* pc_relative */
         false,                 /* 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_D30V_21",           /* name */
         "R_D30V_21",           /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* dst_mask */
         0x3ffff,               /* dst_mask */
         false),                /* pcrel_offset */
         false),                /* pcrel_offset */
 
 
  /* A relative 21 bit relocation, right shifted by 3 */
  /* A relative 21 bit relocation, right shifted by 3 */
  HOWTO (R_D30V_21_PCREL,       /* type */
  HOWTO (R_D30V_21_PCREL,       /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         18,                    /* bitsize */
         18,                    /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_21_PCREL",     /* name */
         "R_D30V_21_PCREL",     /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* dst_mask */
         0x3ffff,               /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* A relative 21 bit relocation, right shifted by 3, in the Right container */
  /* A relative 21 bit relocation, right shifted by 3, in the Right container */
  HOWTO (R_D30V_21_PCREL_R,     /* type */
  HOWTO (R_D30V_21_PCREL_R,     /* type */
         3,                     /* rightshift */
         3,                     /* rightshift */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         2,                     /* size (0 = byte, 1 = short, 2 = long) */
         18,                    /* bitsize */
         18,                    /* 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_d30v_reloc_21, /* special_function */
         bfd_elf_d30v_reloc_21, /* special_function */
         "R_D30V_21_PCREL_R",   /* name */
         "R_D30V_21_PCREL_R",   /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* src_mask */
         0x3ffff,               /* dst_mask */
         0x3ffff,               /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* A D30V 32 bit absolute relocation */
  /* A D30V 32 bit absolute relocation */
  HOWTO (R_D30V_32,             /* type */
  HOWTO (R_D30V_32,             /* type */
         0,                      /* rightshift */
         0,                      /* rightshift */
         4,                     /* size (0 = byte, 1 = short, 2 = long) */
         4,                     /* 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_d30v_reloc,    /* special_function */
         bfd_elf_d30v_reloc,    /* special_function */
         "R_D30V_32",           /* name */
         "R_D30V_32",           /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* dst_mask */
         0xffffffff,            /* dst_mask */
         false),                /* pcrel_offset */
         false),                /* pcrel_offset */
 
 
  /* A relative 32 bit relocation */
  /* A relative 32 bit relocation */
  HOWTO (R_D30V_32_PCREL,       /* type */
  HOWTO (R_D30V_32_PCREL,       /* type */
         0,                      /* rightshift */
         0,                      /* rightshift */
         4,                     /* size (0 = byte, 1 = short, 2 = long) */
         4,                     /* size (0 = byte, 1 = short, 2 = long) */
         32,                    /* bitsize */
         32,                    /* 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_d30v_reloc,    /* special_function */
         bfd_elf_d30v_reloc,    /* special_function */
         "R_D30V_32_PCREL",     /* name */
         "R_D30V_32_PCREL",     /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* dst_mask */
         0xffffffff,            /* dst_mask */
         true),                 /* pcrel_offset */
         true),                 /* pcrel_offset */
 
 
  /* A regular 32 bit absolute relocation */
  /* A regular 32 bit absolute relocation */
  HOWTO (R_D30V_32_NORMAL,              /* type */
  HOWTO (R_D30V_32_NORMAL,              /* 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_D30V_32_NORMAL",            /* name */
         "R_D30V_32_NORMAL",            /* name */
         false,                 /* partial_inplace */
         false,                 /* partial_inplace */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* src_mask */
         0xffffffff,            /* dst_mask */
         0xffffffff,            /* dst_mask */
         false),                /* pcrel_offset */
         false),                /* pcrel_offset */
 
 
};
};
 
 
#define MIN32 (long long)0xffffffff80000000LL
#define MIN32 (long long)0xffffffff80000000LL
#define MAX32 0x7fffffffLL
#define MAX32 0x7fffffffLL
 
 
static bfd_reloc_status_type
static bfd_reloc_status_type
bfd_elf_d30v_reloc (abfd, reloc_entry, symbol, data, input_section, output_bfd, error_message)
bfd_elf_d30v_reloc (abfd, reloc_entry, symbol, data, input_section, output_bfd, error_message)
     bfd *abfd;
     bfd *abfd;
     arelent *reloc_entry;
     arelent *reloc_entry;
     asymbol *symbol;
     asymbol *symbol;
     PTR data;
     PTR data;
     asection *input_section;
     asection *input_section;
     bfd *output_bfd;
     bfd *output_bfd;
     char **error_message;
     char **error_message;
{
{
  long long relocation;
  long long relocation;
  bfd_vma in1, in2, num;
  bfd_vma in1, in2, num;
  bfd_vma tmp_addr = 0;
  bfd_vma tmp_addr = 0;
  bfd_reloc_status_type r;
  bfd_reloc_status_type r;
  asection *reloc_target_output_section;
  asection *reloc_target_output_section;
  bfd_size_type addr = reloc_entry->address;
  bfd_size_type addr = reloc_entry->address;
  bfd_reloc_status_type flag = bfd_reloc_ok;
  bfd_reloc_status_type flag = bfd_reloc_ok;
  bfd_vma output_base = 0;
  bfd_vma output_base = 0;
  reloc_howto_type *howto = reloc_entry->howto;
  reloc_howto_type *howto = reloc_entry->howto;
  int make_absolute = 0;
  int make_absolute = 0;
 
 
  r = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
  r = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
                             input_section, output_bfd, error_message);
                             input_section, output_bfd, error_message);
  if (r != bfd_reloc_continue)
  if (r != bfd_reloc_continue)
    return r;
    return r;
 
 
  /* a hacked-up version of bfd_perform_reloc() follows */
  /* a hacked-up version of bfd_perform_reloc() follows */
 if (bfd_is_und_section (symbol->section)
 if (bfd_is_und_section (symbol->section)
      && (symbol->flags & BSF_WEAK) == 0
      && (symbol->flags & BSF_WEAK) == 0
      && output_bfd == (bfd *) NULL)
      && output_bfd == (bfd *) NULL)
    flag = bfd_reloc_undefined;
    flag = bfd_reloc_undefined;
 
 
  /* Is the address of the relocation really within the section?  */
  /* Is the address of the relocation really within the section?  */
  if (reloc_entry->address > input_section->_cooked_size)
  if (reloc_entry->address > input_section->_cooked_size)
    return bfd_reloc_outofrange;
    return bfd_reloc_outofrange;
 
 
  /* Work out which section the relocation is targetted at and the
  /* Work out which section the relocation is targetted at and the
     initial relocation command value.  */
     initial relocation command value.  */
 
 
  /* Get symbol value.  (Common symbols are special.)  */
  /* Get symbol value.  (Common symbols are special.)  */
  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;
 
 
  reloc_target_output_section = symbol->section->output_section;
  reloc_target_output_section = symbol->section->output_section;
 
 
  /* Convert input-section-relative symbol value to absolute.  */
  /* Convert input-section-relative symbol value to absolute.  */
  if (output_bfd)
  if (output_bfd)
    output_base = 0;
    output_base = 0;
  else
  else
    output_base = reloc_target_output_section->vma;
    output_base = reloc_target_output_section->vma;
 
 
  relocation += output_base + symbol->section->output_offset;
  relocation += output_base + symbol->section->output_offset;
 
 
  /* Add in supplied addend.  */
  /* Add in supplied addend.  */
  relocation += reloc_entry->addend;
  relocation += reloc_entry->addend;
 
 
  /* Here the variable relocation holds the final address of the
  /* Here the variable relocation holds the final address of the
     symbol we are relocating against, plus any addend.  */
     symbol we are relocating against, plus any addend.  */
 
 
  if (howto->pc_relative == true)
  if (howto->pc_relative == true)
    {
    {
      tmp_addr = input_section->output_section->vma + input_section->output_offset
      tmp_addr = input_section->output_section->vma + input_section->output_offset
        + reloc_entry->address;
        + reloc_entry->address;
      relocation -= tmp_addr;
      relocation -= tmp_addr;
    }
    }
 
 
  if (output_bfd != (bfd *) NULL)
  if (output_bfd != (bfd *) NULL)
    {
    {
      /* This is a partial relocation, and we want to apply the relocation
      /* This is a partial relocation, and we want to apply the relocation
         to the reloc entry rather than the raw data. Modify the reloc
         to the reloc entry rather than the raw data. Modify the reloc
         inplace to reflect what we now know.  */
         inplace to reflect what we now know.  */
      reloc_entry->addend = relocation;
      reloc_entry->addend = relocation;
      reloc_entry->address += input_section->output_offset;
      reloc_entry->address += input_section->output_offset;
      return flag;
      return flag;
    }
    }
  else
  else
    reloc_entry->addend = 0;
    reloc_entry->addend = 0;
 
 
  in1 = bfd_get_32 (abfd, (bfd_byte *) data + addr);
  in1 = bfd_get_32 (abfd, (bfd_byte *) data + addr);
  in2 = bfd_get_32 (abfd, (bfd_byte *) data + addr + 4);
  in2 = bfd_get_32 (abfd, (bfd_byte *) data + addr + 4);
 
 
  /* extract the addend */
  /* extract the addend */
  num = ((in2 & 0x3FFFF)
  num = ((in2 & 0x3FFFF)
         | ((in2 & 0xFF00000) >> 2)
         | ((in2 & 0xFF00000) >> 2)
         | ((in1 & 0x3F) << 26));
         | ((in1 & 0x3F) << 26));
  in1 &= 0xFFFFFFC0;
  in1 &= 0xFFFFFFC0;
  in2 = 0x80000000;
  in2 = 0x80000000;
 
 
  relocation += num;
  relocation += num;
 
 
  if (howto->pc_relative == true && howto->bitsize == 32)
  if (howto->pc_relative == true && howto->bitsize == 32)
    {
    {
      /* the D30V has a PC that doesn't wrap and PC-relative jumps */
      /* the D30V has a PC that doesn't wrap and PC-relative jumps */
      /* are signed, so a PC-relative jump can'tbe more than +/- 2^31 byrtes */
      /* are signed, so a PC-relative jump can'tbe more than +/- 2^31 byrtes */
      /* if one exceeds this, change it to an absolute jump */
      /* if one exceeds this, change it to an absolute jump */
      if (relocation > MAX32)
      if (relocation > MAX32)
        {
        {
          relocation = (relocation + tmp_addr) & 0xffffffff;
          relocation = (relocation + tmp_addr) & 0xffffffff;
          make_absolute = 1;
          make_absolute = 1;
        }
        }
      else if (relocation < MIN32)
      else if (relocation < MIN32)
        {
        {
          relocation = (relocation + tmp_addr) & 0xffffffff;
          relocation = (relocation + tmp_addr) & 0xffffffff;
          make_absolute = 1;
          make_absolute = 1;
        }
        }
    }
    }
 
 
  in1 |= (relocation >> 26) & 0x3F;     /* top 6 bits */
  in1 |= (relocation >> 26) & 0x3F;     /* top 6 bits */
  in2 |= ((relocation & 0x03FC0000) << 2);  /* next 8 bits */
  in2 |= ((relocation & 0x03FC0000) << 2);  /* next 8 bits */
  in2 |= relocation & 0x0003FFFF;               /* bottom 18 bits */
  in2 |= relocation & 0x0003FFFF;               /* bottom 18 bits */
 
 
  /* change a PC-relative instruction to its absolute equivalent */
  /* change a PC-relative instruction to its absolute equivalent */
  /* with this simple hack */
  /* with this simple hack */
  if (make_absolute)
  if (make_absolute)
    in1 |= 0x00100000;
    in1 |= 0x00100000;
 
 
  bfd_put_32 (abfd, in1, (bfd_byte *) data + addr);
  bfd_put_32 (abfd, in1, (bfd_byte *) data + addr);
  bfd_put_32 (abfd, in2, (bfd_byte *) data + addr + 4);
  bfd_put_32 (abfd, in2, (bfd_byte *) data + addr + 4);
 
 
  return flag;
  return flag;
}
}
 
 
 
 
static bfd_reloc_status_type
static bfd_reloc_status_type
bfd_elf_d30v_reloc_21 (abfd, reloc_entry, symbol, data, input_section, output_bfd, error_message)
bfd_elf_d30v_reloc_21 (abfd, reloc_entry, symbol, data, input_section, output_bfd, error_message)
     bfd *abfd;
     bfd *abfd;
     arelent *reloc_entry;
     arelent *reloc_entry;
     asymbol *symbol;
     asymbol *symbol;
     PTR data;
     PTR data;
     asection *input_section;
     asection *input_section;
     bfd *output_bfd;
     bfd *output_bfd;
     char **error_message;
     char **error_message;
{
{
  bfd_vma relocation;
  bfd_vma relocation;
  bfd_vma in1, num;
  bfd_vma in1, num;
  bfd_reloc_status_type r;
  bfd_reloc_status_type r;
  asection *reloc_target_output_section;
  asection *reloc_target_output_section;
  bfd_size_type addr = reloc_entry->address;
  bfd_size_type addr = reloc_entry->address;
  bfd_reloc_status_type flag = bfd_reloc_ok;
  bfd_reloc_status_type flag = bfd_reloc_ok;
  bfd_vma output_base = 0;
  bfd_vma output_base = 0;
  reloc_howto_type *howto = reloc_entry->howto;
  reloc_howto_type *howto = reloc_entry->howto;
  int mask, max;
  int mask, max;
 
 
  r = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
  r = bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
                             input_section, output_bfd, error_message);
                             input_section, output_bfd, error_message);
  if (r != bfd_reloc_continue)
  if (r != bfd_reloc_continue)
    return r;
    return r;
 
 
  /* a hacked-up version of bfd_perform_reloc() follows */
  /* a hacked-up version of bfd_perform_reloc() follows */
 if (bfd_is_und_section (symbol->section)
 if (bfd_is_und_section (symbol->section)
      && (symbol->flags & BSF_WEAK) == 0
      && (symbol->flags & BSF_WEAK) == 0
      && output_bfd == (bfd *) NULL)
      && output_bfd == (bfd *) NULL)
    flag = bfd_reloc_undefined;
    flag = bfd_reloc_undefined;
 
 
  /* Is the address of the relocation really within the section?  */
  /* Is the address of the relocation really within the section?  */
  if (reloc_entry->address > input_section->_cooked_size)
  if (reloc_entry->address > input_section->_cooked_size)
    return bfd_reloc_outofrange;
    return bfd_reloc_outofrange;
 
 
  /* Work out which section the relocation is targetted at and the
  /* Work out which section the relocation is targetted at and the
     initial relocation command value.  */
     initial relocation command value.  */
 
 
  /* Get symbol value.  (Common symbols are special.)  */
  /* Get symbol value.  (Common symbols are special.)  */
  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;
 
 
  reloc_target_output_section = symbol->section->output_section;
  reloc_target_output_section = symbol->section->output_section;
 
 
  /* Convert input-section-relative symbol value to absolute.  */
  /* Convert input-section-relative symbol value to absolute.  */
  if (output_bfd)
  if (output_bfd)
    output_base = 0;
    output_base = 0;
  else
  else
    output_base = reloc_target_output_section->vma;
    output_base = reloc_target_output_section->vma;
 
 
  relocation += output_base + symbol->section->output_offset;
  relocation += output_base + symbol->section->output_offset;
 
 
  /* Add in supplied addend.  */
  /* Add in supplied addend.  */
  relocation += reloc_entry->addend;
  relocation += reloc_entry->addend;
 
 
  /* Here the variable relocation holds the final address of the
  /* Here the variable relocation holds the final address of the
     symbol we are relocating against, plus any addend.  */
     symbol we are relocating against, plus any addend.  */
 
 
  if (howto->pc_relative == true)
  if (howto->pc_relative == true)
    {
    {
      relocation -= input_section->output_section->vma + input_section->output_offset;
      relocation -= input_section->output_section->vma + input_section->output_offset;
      if (howto->pcrel_offset == true)
      if (howto->pcrel_offset == true)
        relocation -= reloc_entry->address;
        relocation -= reloc_entry->address;
    }
    }
 
 
  if (output_bfd != (bfd *) NULL)
  if (output_bfd != (bfd *) NULL)
    {
    {
      /* This is a partial relocation, and we want to apply the relocation
      /* This is a partial relocation, and we want to apply the relocation
         to the reloc entry rather than the raw data. Modify the reloc
         to the reloc entry rather than the raw data. Modify the reloc
         inplace to reflect what we now know.  */
         inplace to reflect what we now know.  */
      reloc_entry->addend = relocation;
      reloc_entry->addend = relocation;
      reloc_entry->address += input_section->output_offset;
      reloc_entry->address += input_section->output_offset;
      return flag;
      return flag;
    }
    }
  else
  else
    reloc_entry->addend = 0;
    reloc_entry->addend = 0;
 
 
  in1 = bfd_get_32 (abfd, (bfd_byte *) data + addr);
  in1 = bfd_get_32 (abfd, (bfd_byte *) data + addr);
 
 
  mask =  (1 << howto->bitsize) - 1;
  mask =  (1 << howto->bitsize) - 1;
  if (howto->bitsize == 6)
  if (howto->bitsize == 6)
    mask <<= 12;
    mask <<= 12;
  max = (1 << (howto->bitsize + 2)) - 1;
  max = (1 << (howto->bitsize + 2)) - 1;
 
 
  /* extract the addend */
  /* extract the addend */
  num = in1 & mask;  /* 18 bits */
  num = in1 & mask;  /* 18 bits */
  if (howto->bitsize == 6)
  if (howto->bitsize == 6)
    num >>= 12;
    num >>= 12;
  num <<= 3; /* shift left 3 */
  num <<= 3; /* shift left 3 */
  in1 &= ~mask;  /* mask out addend */
  in1 &= ~mask;  /* mask out addend */
 
 
  relocation += num;
  relocation += num;
  if (howto->type == R_D30V_21_PCREL_R || howto->type == R_D30V_15_PCREL_R ||
  if (howto->type == R_D30V_21_PCREL_R || howto->type == R_D30V_15_PCREL_R ||
      howto->type == R_D30V_9_PCREL_R )
      howto->type == R_D30V_9_PCREL_R )
    {
    {
      relocation += 4;
      relocation += 4;
    }
    }
 
 
  if ((int)relocation < 0 )
  if ((int)relocation < 0 )
    {
    {
      if (~(int)relocation > max)
      if (~(int)relocation > max)
        flag = bfd_reloc_overflow;
        flag = bfd_reloc_overflow;
    }
    }
  else
  else
    {
    {
      if ((int)relocation > max)
      if ((int)relocation > max)
        flag = bfd_reloc_overflow;
        flag = bfd_reloc_overflow;
    }
    }
  relocation >>= 3;
  relocation >>= 3;
  if (howto->bitsize == 6)
  if (howto->bitsize == 6)
    in1 |= ((relocation & (mask >> 12)) << 12);
    in1 |= ((relocation & (mask >> 12)) << 12);
  else
  else
    in1 |= relocation & mask;
    in1 |= relocation & mask;
 
 
  bfd_put_32 (abfd, in1, (bfd_byte *) data + addr);
  bfd_put_32 (abfd, in1, (bfd_byte *) data + addr);
 
 
  return flag;
  return flag;
}
}
 
 
/* Map BFD reloc types to D30V ELF reloc types.  */
/* Map BFD reloc types to D30V ELF reloc types.  */
 
 
struct d30v_reloc_map
struct d30v_reloc_map
{
{
  bfd_reloc_code_real_type bfd_reloc_val;
  bfd_reloc_code_real_type bfd_reloc_val;
  unsigned char elf_reloc_val;
  unsigned char elf_reloc_val;
};
};
 
 
 
 
static const struct d30v_reloc_map d30v_reloc_map[] =
static const struct d30v_reloc_map d30v_reloc_map[] =
{
{
  { BFD_RELOC_NONE, R_D30V_NONE, },
  { BFD_RELOC_NONE, R_D30V_NONE, },
  { BFD_RELOC_D30V_6, R_D30V_6 },
  { BFD_RELOC_D30V_6, R_D30V_6 },
  { BFD_RELOC_D30V_9_PCREL, R_D30V_9_PCREL },
  { BFD_RELOC_D30V_9_PCREL, R_D30V_9_PCREL },
  { BFD_RELOC_D30V_9_PCREL_R, R_D30V_9_PCREL_R },
  { BFD_RELOC_D30V_9_PCREL_R, R_D30V_9_PCREL_R },
  { BFD_RELOC_D30V_15, R_D30V_15 },
  { BFD_RELOC_D30V_15, R_D30V_15 },
  { BFD_RELOC_D30V_15_PCREL, R_D30V_15_PCREL },
  { BFD_RELOC_D30V_15_PCREL, R_D30V_15_PCREL },
  { BFD_RELOC_D30V_15_PCREL_R, R_D30V_15_PCREL_R },
  { BFD_RELOC_D30V_15_PCREL_R, R_D30V_15_PCREL_R },
  { BFD_RELOC_D30V_21, R_D30V_21 },
  { BFD_RELOC_D30V_21, R_D30V_21 },
  { BFD_RELOC_D30V_21_PCREL, R_D30V_21_PCREL },
  { BFD_RELOC_D30V_21_PCREL, R_D30V_21_PCREL },
  { BFD_RELOC_D30V_21_PCREL_R, R_D30V_21_PCREL_R },
  { BFD_RELOC_D30V_21_PCREL_R, R_D30V_21_PCREL_R },
  { BFD_RELOC_D30V_32, R_D30V_32 },
  { BFD_RELOC_D30V_32, R_D30V_32 },
  { BFD_RELOC_D30V_32_PCREL, R_D30V_32_PCREL },
  { BFD_RELOC_D30V_32_PCREL, R_D30V_32_PCREL },
  { BFD_RELOC_32, R_D30V_32_NORMAL },
  { BFD_RELOC_32, R_D30V_32_NORMAL },
};
};
 
 
static reloc_howto_type *
static reloc_howto_type *
bfd_elf32_bfd_reloc_type_lookup (abfd, code)
bfd_elf32_bfd_reloc_type_lookup (abfd, code)
     bfd *abfd ATTRIBUTE_UNUSED;
     bfd *abfd ATTRIBUTE_UNUSED;
     bfd_reloc_code_real_type code;
     bfd_reloc_code_real_type code;
{
{
  unsigned int i;
  unsigned int i;
 
 
  for (i = 0;
  for (i = 0;
       i < sizeof (d30v_reloc_map) / sizeof (struct d30v_reloc_map);
       i < sizeof (d30v_reloc_map) / sizeof (struct d30v_reloc_map);
       i++)
       i++)
    {
    {
      if (d30v_reloc_map[i].bfd_reloc_val == code)
      if (d30v_reloc_map[i].bfd_reloc_val == code)
        return &elf_d30v_howto_table[d30v_reloc_map[i].elf_reloc_val];
        return &elf_d30v_howto_table[d30v_reloc_map[i].elf_reloc_val];
    }
    }
 
 
  return NULL;
  return NULL;
}
}
 
 
/* Set the howto pointer for an D30V ELF reloc (type REL).  */
/* Set the howto pointer for an D30V ELF reloc (type REL).  */
 
 
static void
static void
d30v_info_to_howto_rel (abfd, cache_ptr, dst)
d30v_info_to_howto_rel (abfd, cache_ptr, dst)
     bfd *abfd ATTRIBUTE_UNUSED;
     bfd *abfd ATTRIBUTE_UNUSED;
     arelent *cache_ptr;
     arelent *cache_ptr;
     Elf32_Internal_Rel *dst;
     Elf32_Internal_Rel *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);
  BFD_ASSERT (r_type < (unsigned int) R_D30V_max);
  BFD_ASSERT (r_type < (unsigned int) R_D30V_max);
  cache_ptr->howto = &elf_d30v_howto_table[r_type];
  cache_ptr->howto = &elf_d30v_howto_table[r_type];
}
}
 
 
/* Set the howto pointer for an D30V ELF reloc (type RELA).  */
/* Set the howto pointer for an D30V ELF reloc (type RELA).  */
 
 
static void
static void
d30v_info_to_howto_rela (abfd, cache_ptr, dst)
d30v_info_to_howto_rela (abfd, cache_ptr, dst)
     bfd *abfd ATTRIBUTE_UNUSED;
     bfd *abfd ATTRIBUTE_UNUSED;
     arelent *cache_ptr;
     arelent *cache_ptr;
     Elf32_Internal_Rela *dst;
     Elf32_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);
  BFD_ASSERT (r_type < (unsigned int) R_D30V_max);
  BFD_ASSERT (r_type < (unsigned int) R_D30V_max);
  cache_ptr->howto = &elf_d30v_howto_table[r_type];
  cache_ptr->howto = &elf_d30v_howto_table[r_type];
}
}
 
 
#define ELF_ARCH                bfd_arch_d30v
#define ELF_ARCH                bfd_arch_d30v
#define ELF_MACHINE_CODE        EM_CYGNUS_D30V
#define ELF_MACHINE_CODE        EM_CYGNUS_D30V
#define ELF_MAXPAGESIZE         0x1000
#define ELF_MAXPAGESIZE         0x1000
 
 
#define TARGET_BIG_SYM          bfd_elf32_d30v_vec
#define TARGET_BIG_SYM          bfd_elf32_d30v_vec
#define TARGET_BIG_NAME         "elf32-d30v"
#define TARGET_BIG_NAME         "elf32-d30v"
 
 
#define elf_info_to_howto       d30v_info_to_howto_rela
#define elf_info_to_howto       d30v_info_to_howto_rela
#define elf_info_to_howto_rel   d30v_info_to_howto_rel
#define elf_info_to_howto_rel   d30v_info_to_howto_rel
#define elf_backend_object_p    0
#define elf_backend_object_p    0
#define elf_backend_final_write_processing      0
#define elf_backend_final_write_processing      0
 
 
#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.