Removed v850eq sanitization.
[binutils-gdb.git] / bfd / elf32-v850.c
index 0cca799e208b0b60301e501b3d9639a01bccc20b..2a43479fdb09ede235894085f039b68156a2d319 100644 (file)
@@ -45,11 +45,12 @@ static boolean v850_elf_relocate_section PARAMS((bfd *,
                                                 Elf_Internal_Rela *,
                                                 Elf_Internal_Sym *,
                                                 asection **));
-
 /* Try to minimize the amount of space occupied by relocation tables
    on the ROM (not that the ROM won't be swamped by other ELF overhead).  */
 #define USE_REL
 
+/* Note: It is REQUIRED that the 'type' value of each entry in this array
+   match the index of the entry in the array.  */
 static reloc_howto_type v850_elf_howto_table[] =
 {
   /* This reloc does nothing.  */
@@ -82,21 +83,6 @@ static reloc_howto_type v850_elf_howto_table[] =
         0x00ffffff,                    /* dst_mask */
         true),                         /* pcrel_offset */
 
-  /* A PC relative 16 bit load/store. */
-  HOWTO (R_V850_16_PCREL,              /* type */
-        0,                             /* rightshift */
-        2,                             /* size (0 = byte, 1 = short, 2 = long) */
-        15,                            /* bitsize */
-        true,                          /* pc_relative */
-        17,                            /* bitpos */
-        complain_overflow_bitfield,    /* complain_on_overflow */
-        v850_elf_reloc,                /* special_function */
-        "R_V850_16_PCREL",             /* name */
-        false,                         /* partial_inplace */
-        0xfffe0000,                    /* src_mask */
-        0xfffe0000,                    /* dst_mask */
-        true),                         /* pcrel_offset */
-
   /* A PC relative 22 bit branch. */
   HOWTO (R_V850_22_PCREL,              /* type */
         2,                             /* rightshift */
@@ -202,8 +188,8 @@ static reloc_howto_type v850_elf_howto_table[] =
         0xff,                          /* dst_mask */
         false),                        /* pcrel_offset */
 
-  /* Offset from the short data area pointer.  */
-  HOWTO (R_V850_SDA_OFFSET,            /* type */
+  /* 16 bit offset from the short data area pointer.  */
+  HOWTO (R_V850_SDA_16_16_OFFSET,      /* type */
         0,                             /* rightshift */
         1,                             /* size (0 = byte, 1 = short, 2 = long) */
         16,                            /* bitsize */
@@ -211,14 +197,29 @@ static reloc_howto_type v850_elf_howto_table[] =
         0,                             /* bitpos */
         complain_overflow_dont,        /* complain_on_overflow */
         v850_elf_reloc,                /* special_function */
-        "R_V850_SDA_OFFSET",           /* name */
-        true,                          /* partial_inplace */
+        "R_V850_SDA_16_16_OFFSET",     /* name */
+        false,                         /* partial_inplace */
         0xffff,                        /* src_mask */
         0xffff,                        /* dst_mask */
         false),                        /* pcrel_offset */
 
-  /* Offset from the zero data area pointer.  */
-  HOWTO (R_V850_ZDA_OFFSET,            /* type */
+  /* 15 bit offset from the short data area pointer.  */
+  HOWTO (R_V850_SDA_15_16_OFFSET,      /* type */
+        1,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        16,                            /* bitsize */
+        false,                         /* pc_relative */
+        1,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_SDA_15_16_OFFSET",     /* name */
+        false,                         /* partial_inplace */
+        0xfffe,                        /* src_mask */
+        0xfffe,                        /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 16 bit offset from the zero data area pointer.  */
+  HOWTO (R_V850_ZDA_16_16_OFFSET,      /* type */
         0,                             /* rightshift */
         1,                             /* size (0 = byte, 1 = short, 2 = long) */
         16,                            /* bitsize */
@@ -226,27 +227,180 @@ static reloc_howto_type v850_elf_howto_table[] =
         0,                             /* bitpos */
         complain_overflow_dont,        /* complain_on_overflow */
         v850_elf_reloc,                /* special_function */
-        "R_V850_ZDA_OFFSET",           /* name */
-        true,                          /* partial_inplace */
+        "R_V850_ZDA_16_16_OFFSET",     /* name */
+        false,                         /* partial_inplace */
         0xffff,                        /* src_mask */
         0xffff,                        /* dst_mask */
         false),                        /* pcrel_offset */
 
-  /* Offset from the tiny data area pointer.  */
-  HOWTO (R_V850_TDA_OFFSET,            /* type */
+  /* 15 bit offset from the zero data area pointer.  */
+  HOWTO (R_V850_ZDA_15_16_OFFSET,      /* type */
+        1,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        16,                            /* bitsize */
+        false,                         /* pc_relative */
+        1,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_ZDA_15_16_OFFSET",     /* name */
+        false,                         /* partial_inplace */
+        0xfffe,                        /* src_mask */
+        0xfffe,                        /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 6 bit offset from the tiny data area pointer.  */
+  HOWTO (R_V850_TDA_6_8_OFFSET,                /* type */
+        2,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        8,                             /* bitsize */
+        false,                         /* pc_relative */
+        1,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_6_8_OFFSET",       /* name */
+        false,                         /* partial_inplace */
+        0x7e,                          /* src_mask */
+        0x7e,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 8 bit offset from the tiny data area pointer.  */
+  HOWTO (R_V850_TDA_7_8_OFFSET,                /* type */
+        1,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        8,                             /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_7_8_OFFSET",       /* name */
+        false,                         /* partial_inplace */
+        0x7f,                          /* src_mask */
+        0x7f,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+  
+  /* 7 bit offset from the tiny data area pointer.  */
+  HOWTO (R_V850_TDA_7_7_OFFSET,                /* type */
+        0,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        7,                             /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_7_7_OFFSET",       /* name */
+        false,                         /* partial_inplace */
+        0x7f,                          /* src_mask */
+        0x7f,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 16 bit offset from the tiny data area pointer!  */
+  HOWTO (R_V850_TDA_16_16_OFFSET,      /* type */
+        0,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        16,                            /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_16_16_OFFSET",     /* name */
+        false,                         /* partial_inplace */
+        0xffff,                        /* src_mask */
+        0xfff,                         /* dst_mask */
+        false),                        /* pcrel_offset */
+
+/* start-sanitize-v850e */
+  
+  /* 5 bit offset from the tiny data area pointer.  */
+  HOWTO (R_V850_TDA_4_5_OFFSET,                /* type */
+        1,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        5,                             /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_4_5_OFFSET",       /* name */
+        false,                         /* partial_inplace */
+        0x0f,                          /* src_mask */
+        0x0f,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 4 bit offset from the tiny data area pointer.  */
+  HOWTO (R_V850_TDA_4_4_OFFSET,                /* type */
+        0,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        4,                             /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_TDA_4_4_OFFSET",       /* name */
+        false,                         /* partial_inplace */
+        0x0f,                          /* src_mask */
+        0x0f,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 16 bit offset from the short data area pointer.  */
+  HOWTO (R_V850_SDA_16_16_SPLIT_OFFSET,        /* type */
         0,                             /* rightshift */
         2,                             /* size (0 = byte, 1 = short, 2 = long) */
-        8,                             /* bitsize */
+        16,                            /* bitsize */
         false,                         /* pc_relative */
         0,                             /* bitpos */
         complain_overflow_dont,        /* complain_on_overflow */
         v850_elf_reloc,                /* special_function */
-        "R_V850_TDA_OFFSET",           /* name */
-        true,                          /* partial_inplace */
-        0xff,                          /* src_mask */
-        0xff,                          /* dst_mask */
+        "R_V850_SDA_16_16_SPLIT_OFFSET",/* name */
+        false,                         /* partial_inplace */
+        0xfffe0020,                    /* src_mask */
+        0xfffe0020,                    /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 16 bit offset from the zero data area pointer.  */
+  HOWTO (R_V850_ZDA_16_16_SPLIT_OFFSET,        /* type */
+        0,                             /* rightshift */
+        2,                             /* size (0 = byte, 1 = short, 2 = long) */
+        16,                            /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_ZDA_16_16_SPLIT_OFFSET",/* name */
+        false,                         /* partial_inplace */
+        0xfffe0020,                    /* src_mask */
+        0xfffe0020,                    /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 6 bit offset from the call table base pointer.  */
+  HOWTO (R_V850_CALLT_6_7_OFFSET,      /* type */
+        0,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        7,                             /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_CALLT_6_7_OFFSET",     /* name */
+        false,                         /* partial_inplace */
+        0x3f,                          /* src_mask */
+        0x3f,                          /* dst_mask */
+        false),                        /* pcrel_offset */
+
+  /* 16 bit offset from the call table base pointer.  */
+  HOWTO (R_V850_CALLT_16_16_OFFSET,    /* type */
+        0,                             /* rightshift */
+        1,                             /* size (0 = byte, 1 = short, 2 = long) */
+        16,                            /* bitsize */
+        false,                         /* pc_relative */
+        0,                             /* bitpos */
+        complain_overflow_dont,        /* complain_on_overflow */
+        v850_elf_reloc,                /* special_function */
+        "R_V850_CALLT_16_16_OFFSET",   /* name */
+        false,                         /* partial_inplace */
+        0xffff,                        /* src_mask */
+        0xffff,                        /* dst_mask */
         false),                        /* pcrel_offset */
 
+/* end-sanitize-v850e */
 };
 
 /* Map BFD reloc types to V850 ELF reloc types.  */
@@ -259,27 +413,39 @@ struct v850_elf_reloc_map
 
 static const struct v850_elf_reloc_map v850_elf_reloc_map[] =
 {
-  { BFD_RELOC_NONE,            R_V850_NONE, },
-  { BFD_RELOC_V850_9_PCREL,    R_V850_9_PCREL, },
-  { BFD_RELOC_V850_16_PCREL,   R_V850_16_PCREL, },
-  { BFD_RELOC_V850_22_PCREL,   R_V850_22_PCREL, },
-  { BFD_RELOC_HI16_S,          R_V850_HI16_S, },
-  { BFD_RELOC_HI16,            R_V850_HI16, },
-  { BFD_RELOC_LO16,            R_V850_LO16, },
-  { BFD_RELOC_32,              R_V850_32, },
-  { BFD_RELOC_16,              R_V850_16, },
-  { BFD_RELOC_8,               R_V850_8, },
-  { BFD_RELOC_V850_TDA_OFFSET, R_V850_TDA_OFFSET, },
-  { BFD_RELOC_V850_SDA_OFFSET, R_V850_SDA_OFFSET, },
-  { BFD_RELOC_V850_ZDA_OFFSET, R_V850_ZDA_OFFSET, },
+  { BFD_RELOC_NONE,            R_V850_NONE },
+  { BFD_RELOC_V850_9_PCREL,    R_V850_9_PCREL },
+  { BFD_RELOC_V850_22_PCREL,   R_V850_22_PCREL },
+  { BFD_RELOC_HI16_S,          R_V850_HI16_S },
+  { BFD_RELOC_HI16,            R_V850_HI16 },
+  { BFD_RELOC_LO16,            R_V850_LO16 },
+  { BFD_RELOC_32,              R_V850_32 },
+  { BFD_RELOC_16,              R_V850_16 },
+  { BFD_RELOC_8,               R_V850_8 },
+  { BFD_RELOC_V850_SDA_16_16_OFFSET, R_V850_SDA_16_16_OFFSET },
+  { BFD_RELOC_V850_SDA_15_16_OFFSET, R_V850_SDA_15_16_OFFSET },
+  { BFD_RELOC_V850_ZDA_16_16_OFFSET, R_V850_ZDA_16_16_OFFSET },
+  { BFD_RELOC_V850_ZDA_15_16_OFFSET, R_V850_ZDA_15_16_OFFSET },
+  { BFD_RELOC_V850_TDA_6_8_OFFSET,   R_V850_TDA_6_8_OFFSET   },
+  { BFD_RELOC_V850_TDA_7_8_OFFSET,   R_V850_TDA_7_8_OFFSET   },
+  { BFD_RELOC_V850_TDA_7_7_OFFSET,   R_V850_TDA_7_7_OFFSET   },
+  { BFD_RELOC_V850_TDA_16_16_OFFSET, R_V850_TDA_16_16_OFFSET },
+/* start-sanitize-v850e */
+  { BFD_RELOC_V850_TDA_4_5_OFFSET,         R_V850_TDA_4_5_OFFSET         },
+  { BFD_RELOC_V850_TDA_4_4_OFFSET,         R_V850_TDA_4_4_OFFSET         },
+  { BFD_RELOC_V850_SDA_16_16_SPLIT_OFFSET, R_V850_SDA_16_16_SPLIT_OFFSET },
+  { BFD_RELOC_V850_ZDA_16_16_SPLIT_OFFSET, R_V850_ZDA_16_16_SPLIT_OFFSET },
+  { BFD_RELOC_V850_CALLT_6_7_OFFSET,       R_V850_CALLT_6_7_OFFSET       },
+  { BFD_RELOC_V850_CALLT_16_16_OFFSET,     R_V850_CALLT_16_16_OFFSET     },
+/* end-sanitize-v850e */
 };
 
 \f
 /* Map a bfd relocation into the appropriate howto structure */
 static reloc_howto_type *
 v850_elf_reloc_type_lookup (abfd, code)
-     bfd *abfd;
-     bfd_reloc_code_real_type code;
+     bfd *                     abfd;
+     bfd_reloc_code_real_type  code;
 {
   unsigned int i;
 
@@ -288,7 +454,11 @@ v850_elf_reloc_type_lookup (abfd, code)
        i++)
     {
       if (v850_elf_reloc_map[i].bfd_reloc_val == code)
-       return &v850_elf_howto_table[v850_elf_reloc_map[i].elf_reloc_val];
+       {
+         BFD_ASSERT (v850_elf_howto_table[v850_elf_reloc_map[i].elf_reloc_val].type == v850_elf_reloc_map[i].elf_reloc_val);
+         
+         return & v850_elf_howto_table[v850_elf_reloc_map[i].elf_reloc_val];
+       }
     }
 
   return NULL;
@@ -298,9 +468,9 @@ v850_elf_reloc_type_lookup (abfd, code)
 /* Set the howto pointer for an V850 ELF reloc.  */
 static void
 v850_elf_info_to_howto_rel (abfd, cache_ptr, dst)
-     bfd *abfd;
-     arelent *cache_ptr;
-     Elf32_Internal_Rel *dst;
+     bfd *                 abfd;
+     arelent *             cache_ptr;
+     Elf32_Internal_Rel *  dst;
 {
   unsigned int r_type;
 
@@ -316,10 +486,10 @@ v850_elf_info_to_howto_rel (abfd, cache_ptr, dst)
 
 static boolean
 v850_elf_check_relocs (abfd, info, sec, relocs)
-     bfd *abfd;
-     struct bfd_link_info *info;
-     asection *sec;
-     const Elf_Internal_Rela *relocs;
+     bfd *                      abfd;
+     struct bfd_link_info *     info;
+     asection *                 sec;
+     const Elf_Internal_Rela *  relocs;
 {
   boolean ret = true;
   bfd *dynobj;
@@ -364,7 +534,6 @@ v850_elf_check_relocs (abfd, info, sec, relocs)
        default:
        case R_V850_NONE:
        case R_V850_9_PCREL:
-       case R_V850_16_PCREL:
        case R_V850_22_PCREL:
        case R_V850_HI16_S:
        case R_V850_HI16:
@@ -372,19 +541,38 @@ v850_elf_check_relocs (abfd, info, sec, relocs)
        case R_V850_32:
        case R_V850_16:
        case R_V850_8:
+/* start-sanitize-v850e */
+       case R_V850_CALLT_6_7_OFFSET:
+       case R_V850_CALLT_16_16_OFFSET:
+/* end-sanitize-v850e */
          break;
 
-       case R_V850_SDA_OFFSET:
+/* start-sanitize-v850e */
+       case R_V850_SDA_16_16_SPLIT_OFFSET:
+/* end-sanitize-v850e */
+       case R_V850_SDA_16_16_OFFSET:
+       case R_V850_SDA_15_16_OFFSET:
          other = V850_OTHER_SDA;
          common = ".scommon";
          goto small_data_common;
-
-       case R_V850_ZDA_OFFSET:
+         
+/* start-sanitize-v850e */
+       case R_V850_ZDA_16_16_SPLIT_OFFSET:
+/* end-sanitize-v850e */
+       case R_V850_ZDA_16_16_OFFSET:
+       case R_V850_ZDA_15_16_OFFSET:
          other = V850_OTHER_ZDA;
          common = ".zcommon";
          goto small_data_common;
-
-       case R_V850_TDA_OFFSET:
+         
+/* start-sanitize-v850e */
+       case R_V850_TDA_4_5_OFFSET:
+       case R_V850_TDA_4_4_OFFSET:
+/* end-sanitize-v850e */         
+       case R_V850_TDA_6_8_OFFSET:
+       case R_V850_TDA_7_8_OFFSET:
+       case R_V850_TDA_7_7_OFFSET:
+       case R_V850_TDA_16_16_OFFSET:
          other = V850_OTHER_TDA;
          common = ".tcommon";
          /* fall through */
@@ -398,29 +586,31 @@ v850_elf_check_relocs (abfd, info, sec, relocs)
              if ((h->other & V850_OTHER_MASK) != (other & V850_OTHER_MASK)
                  && (h->other & V850_OTHER_ERROR) == 0)
                {
-                 const char *msg;
-
+                 const char * msg;
+                 static char  buff[100]; /* XXX */
+                 
                  switch (h->other & V850_OTHER_MASK)
                    {
                    default:
-                     msg = "Variable cannot occupy in multiple small data regions";
+                     msg = "cannot occupy in multiple small data regions";
                      break;
                    case V850_OTHER_SDA | V850_OTHER_ZDA | V850_OTHER_TDA:
-                     msg = "Variable can only be in one of the small, zero, and tiny data regions";
+                     msg = "can only be in one of the small, zero, and tiny data regions";
                      break;
                    case V850_OTHER_SDA | V850_OTHER_ZDA:
-                     msg = "Variable cannot be in both small and zero data regions simultaneously";
+                     msg = "cannot be in both small and zero data regions simultaneously";
                      break;
                    case V850_OTHER_SDA | V850_OTHER_TDA:
-                     msg = "Variable cannot be in both small and tiny data regions simultaneously";
+                     msg = "cannot be in both small and tiny data regions simultaneously";
                      break;
                    case V850_OTHER_ZDA | V850_OTHER_TDA:
-                     msg = "Variable cannot be in both zero and tiny data regions simultaneously";
+                     msg = "cannot be in both zero and tiny data regions simultaneously";
                      break;
                    }
 
-                 (*info->callbacks->warning) (info, msg, h->root.root.string,
-                                              abfd, h->root.u.def.section, 0);
+                 sprintf (buff, "Variable '%s' %s", h->root.root.string, msg );
+                 info->callbacks->warning (info, buff, h->root.root.string,
+                                           abfd, h->root.u.def.section, 0);
 
                  bfd_set_error (bfd_error_bad_value);
                  h->other |= V850_OTHER_ERROR;
@@ -450,16 +640,26 @@ v850_elf_check_relocs (abfd, info, sec, relocs)
 }
 
 \f
+/* Insert the addend into the instruction.  */
 static bfd_reloc_status_type
 v850_elf_reloc (abfd, reloc, symbol, data, isection, obfd, err)
-     bfd *abfd;
-     arelent *reloc;
-     asymbol *symbol;
-     PTR data;
-     asection *isection;
-     bfd *obfd;
-     char **err;
+     bfd *       abfd;
+     arelent *   reloc;
+     asymbol *   symbol;
+     PTR         data;
+     asection *  isection;
+     bfd *       obfd;
+     char **     err;
 {
+  long relocation;
+  long insn;
+
+  
+  /* If there is an output BFD,
+     and the symbol is not a section name (which is only defined at final link time),
+     and either we are not putting the addend into the instruction
+         or the addend is zero, so there is nothing to add into the instruction
+     then just fixup the address and return.  */
   if (obfd != (bfd *) NULL
       && (symbol->flags & BSF_SECTION_SYM) == 0
       && (! reloc->howto->partial_inplace
@@ -468,11 +668,13 @@ v850_elf_reloc (abfd, reloc, symbol, data, isection, obfd, err)
       reloc->address += isection->output_offset;
       return bfd_reloc_ok;
     }
+#if 0  
   else if (obfd != NULL)
     {
       return bfd_reloc_continue;
     }
-
+#endif
+  
   /* Catch relocs involving undefined symbols.  */
   if (bfd_is_und_section (symbol->section)
       && (symbol->flags & BSF_WEAK) == 0
@@ -480,229 +682,293 @@ v850_elf_reloc (abfd, reloc, symbol, data, isection, obfd, err)
     return bfd_reloc_undefined;
 
   /* We handle final linking of some relocs ourselves.  */
-    {
-      long relocation, insn;
-
-      /* Is the address of the relocation really within the section?  */
-      if (reloc->address > isection->_cooked_size)
-       return bfd_reloc_outofrange;
-
-      /* Work out which section the relocation is targetted at and the
-        initial relocation command value.  */
-
-      /* Get symbol value.  (Common symbols are special.)  */
-      if (bfd_is_com_section (symbol->section))
-       relocation = 0;
-      else
-       relocation = symbol->value;
-
-      /* Convert input-section-relative symbol value to absolute + addend.  */
-      relocation += symbol->section->output_section->vma;
-      relocation += symbol->section->output_offset;
-      relocation += reloc->addend;
-
-      if (reloc->howto->pc_relative == true)
-       {
-         /* Here the variable relocation holds the final address of the
-            symbol we are relocating against, plus any addend.  */
-         relocation -= isection->output_section->vma + isection->output_offset;
-
-         /* Deal with pcrel_offset */
-         relocation -= reloc->address;
-       }
-
-      /* I've got no clue... */
-      reloc->addend = 0;       
-
-      switch (reloc->howto->type)
-       {
-       default:
-         return bfd_reloc_notsupported;
-
-       case R_V850_22_PCREL:
-         if (relocation > 0x1ffff || relocation < -0x200000)
-           return bfd_reloc_overflow;
-
-         if ((relocation % 2) != 0)
-           return bfd_reloc_dangerous;
-
-         insn = bfd_get_32 (abfd, (bfd_byte *) data + reloc->address);
-         insn &= ~0xfffe003f;
-         insn |= (((relocation & 0xfffe) << 16)
-                  | ((relocation & 0x3f0000) >> 16));
-         bfd_put_32 (abfd, insn, (bfd_byte *)data + reloc->address);
-         return bfd_reloc_ok;
 
-       case R_V850_16_PCREL:
-         if (relocation > 0x7fff || relocation < -0x10000)
-           return bfd_reloc_overflow;
-
-         if ((relocation % 2) != 0)
-           return bfd_reloc_dangerous;
-
-         insn = bfd_get_32 (abfd, (bfd_byte *) data + reloc->address);
-         insn &= 0x1ffff;
-         insn |= ((relocation & 0xfffe) << 16);
-         bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc->address);
-         return bfd_reloc_ok;
-
-       case R_V850_9_PCREL:
-         if (relocation > 0xff || relocation < -0x100)
-           return bfd_reloc_overflow;
-
-         if ((relocation % 2) != 0)
-           return bfd_reloc_dangerous;
-
-         insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
-         insn &= ~ 0xf870;
-         insn |= ((relocation & 0x1f0) << 7) | ((relocation & 0x0e) << 3);
-         bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
-         return bfd_reloc_ok;
-
-       case R_V850_HI16_S:
-         relocation += bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
-         relocation = (relocation >> 16) + ((relocation & 0x8000) != 0);
-         bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
-         return bfd_reloc_ok;
-
-       case R_V850_HI16:
-         relocation += bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
-         relocation = (relocation >> 16);
-         bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
-         return bfd_reloc_ok;
-
-       case R_V850_16:
-       case R_V850_ZDA_OFFSET:
-         relocation += (short)bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
-
-         if ((long)relocation > 0x7fff || (long)relocation < -0x8000)
-           return bfd_reloc_overflow;
-
-         bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
-         return bfd_reloc_ok;
-
-#if 0
-       case R_V850_SDA_OFFSET:
-         {
-           unsigned long gp;
-           struct bfd_link_hash_entry *h;
-
-           relocation += (short)bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
-
-           /* Get the value of __gp.  */
-           h = bfd_link_hash_lookup (info->hash, "__gp", false, false, true);
-           if (h == (struct bfd_link_hash_entry *) NULL
-               || h->type != bfd_link_hash_defined)
-             return bfd_reloc_undefined;
-
-           gp = (h->u.def.value
-                 + h->u.def.section->output_section->vma
-                 + h->u.def.section->output_offset);
-           relocation -= gp;
-
-           if ((long)relocation > 0x7fff || (long)relocation < -0x8000)
-             return bfd_reloc_overflow;
-
-           bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
-           return bfd_reloc_ok;
-         }
-#endif
-       }
+  /* Is the address of the relocation really within the section?  */
+  if (reloc->address > isection->_cooked_size)
+    return bfd_reloc_outofrange;
+  
+  /* Work out which section the relocation is targetted at and the
+     initial relocation command value.  */
+  
+  /* Get symbol value.  (Common symbols are special.)  */
+  if (bfd_is_com_section (symbol->section))
+    relocation = 0;
+  else
+    relocation = symbol->value;
+  
+  /* Convert input-section-relative symbol value to absolute + addend.  */
+  relocation += symbol->section->output_section->vma;
+  relocation += symbol->section->output_offset;
+  relocation += reloc->addend;
+  
+  if (reloc->howto->pc_relative == true)
+    {
+      /* Here the variable relocation holds the final address of the
+        symbol we are relocating against, plus any addend.  */
+      relocation -= isection->output_section->vma + isection->output_offset;
+      
+      /* Deal with pcrel_offset */
+      relocation -= reloc->address;
     }
-
-  return bfd_reloc_continue;
-}
-
-\f
-/*ARGSUSED*/
-static boolean
-v850_elf_is_local_label_name (abfd, name)
-     bfd *abfd;
-     const char *name;
-{
-  return ((name[0] == '.' && (name[1] == 'L' || name[1] == '.'))
-         || (name[0] == '_' && name[1] == '.' && name[2] == 'L'
-             && name[3] == '_'));
-}
-
-\f
-/* Perform a relocation as part of a final link.  */
-static bfd_reloc_status_type
-v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
-                                   input_section, contents, offset, value,
-                                   addend, info, sym_sec, is_local)
-     reloc_howto_type *howto;
-     bfd *input_bfd;
-     bfd *output_bfd;
-     asection *input_section;
-     bfd_byte *contents;
-     bfd_vma offset;
-     bfd_vma value;
-     bfd_vma addend;
-     struct bfd_link_info *info;
-     asection *sym_sec;
-     int is_local;
-{
-  unsigned long insn;
-  unsigned long r_type = howto->type;
-  bfd_byte *hit_data = contents + offset;
-
-  switch (r_type)
+  
+  /* I've got no clue... */
+  reloc->addend = 0;   
+  
+  switch (reloc->howto->type)
     {
-    case R_V850_9_PCREL:
-      value -= (input_section->output_section->vma
-               + input_section->output_offset);
-      value -= offset;
-
-      if ((long)value > 0xff || (long)value < -0x100)
-       return bfd_reloc_overflow;
-
-      if ((value % 2) != 0)
-       return bfd_reloc_dangerous;
-
-      insn = bfd_get_16 (input_bfd, hit_data);
-      insn &= 0x078f;
-      insn |= ((value & 0x1f0) << 7) | ((value & 0x0e) << 3);
-      bfd_put_16 (input_bfd, insn, hit_data);
-      return bfd_reloc_ok;
-    
-    case R_V850_16_PCREL:
-      value -= (input_section->output_section->vma + input_section->output_offset);
-      value -= offset;
-
-      if ((long)value > 0x7fff || (long)value < -0x10000)
+    default:
+      /* fprintf (stderr, "reloc type %d not SUPPORTED\n", reloc->howto->type ); */
+      return bfd_reloc_notsupported;
+      
+    case R_V850_22_PCREL:
+      if (relocation > 0x1ffff || relocation < -0x200000)
        return bfd_reloc_overflow;
       
-      if ((value % 2) != 0)
+      if ((relocation % 2) != 0)
        return bfd_reloc_dangerous;
       
-      insn = bfd_get_32 (input_bfd, hit_data);
-      insn &= 0x1ffff;
-      insn |= ((value & 0xfffe) << 16);
-      bfd_put_32 (input_bfd, insn, hit_data);
+      insn = bfd_get_32 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= ~0xfffe003f;
+      insn |= (((relocation & 0xfffe) << 16)
+              | ((relocation & 0x3f0000) >> 16));
+      bfd_put_32 (abfd, insn, (bfd_byte *)data + reloc->address);
       return bfd_reloc_ok;
       
-    case R_V850_22_PCREL:
-      value -= (input_section->output_section->vma
-               + input_section->output_offset);
-      value -= offset;
-    
-      if ((long)value > 0x1ffff || (long)value < -0x200000)
+    case R_V850_9_PCREL:
+      if (relocation > 0xff || relocation < -0x100)
        return bfd_reloc_overflow;
-
-      if ((value % 2) != 0)
+      
+      if ((relocation % 2) != 0)
        return bfd_reloc_dangerous;
-
-      insn = bfd_get_32 (input_bfd, hit_data);
-      insn &= 0x1ffc0;
-      insn |= (((value & 0xfffe) << 16) | ((value & 0x3f0000) >> 16));
-      bfd_put_32 (input_bfd, insn, hit_data);
+      
+      insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= ~ 0xf870;
+      insn |= ((relocation & 0x1f0) << 7) | ((relocation & 0x0e) << 3);
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
       return bfd_reloc_ok;
       
     case R_V850_HI16_S:
-      value += (short)bfd_get_16 (input_bfd, hit_data);
-      value = (value >> 16) + ((value & 0x8000) != 0);
-
+      relocation += bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      relocation = (relocation >> 16) + ((relocation & 0x8000) != 0);
+      bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_HI16:
+      relocation += bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      relocation = (relocation >> 16);
+      bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_LO16:
+      relocation += (short)bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      /* Do not complain if value has top bit set, as this has been anticipated.  */
+      bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+
+    case R_V850_16:
+      relocation += (short)bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      /* drop through */
+      
+    case R_V850_SDA_16_16_OFFSET:
+    case R_V850_ZDA_16_16_OFFSET:
+    case R_V850_TDA_16_16_OFFSET:
+      if ((long)relocation > 0x7fff || (long)relocation < -0x8000)
+       return bfd_reloc_overflow;
+      bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_SDA_15_16_OFFSET:
+    case R_V850_ZDA_15_16_OFFSET:
+      if ((long)relocation > 0x7ffe || (long)relocation < -0x8000)
+       return bfd_reloc_overflow;
+      
+      if (relocation & 1)
+       return bfd_reloc_dangerous;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 1;
+      insn |= (relocation >> 1) & ~1;
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_TDA_6_8_OFFSET:
+      if ((long) relocation > 0xfc || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      if (relocation & 3)
+       return bfd_reloc_dangerous;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xff81;
+      insn |= (relocation >> 1);
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_TDA_7_8_OFFSET:
+      if ((long) relocation > 0xfe || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      if (relocation & 1)
+       return bfd_reloc_dangerous;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xff80;
+      insn |= (relocation >> 1);
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_TDA_7_7_OFFSET:
+      if ((long) relocation > 0x7f || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xff80;
+      insn |= relocation;
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+/* start-sanitize-v850e */
+    case R_V850_TDA_4_5_OFFSET:
+      if ((long) relocation > 0x1e || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      if (relocation & 1)
+       return bfd_reloc_dangerous;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xfff0;
+      insn |= (relocation >> 1);
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_TDA_4_4_OFFSET:
+      if ((long) relocation > 0xf || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xfff0;
+      insn |= relocation;
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_ZDA_16_16_SPLIT_OFFSET:
+    case R_V850_SDA_16_16_SPLIT_OFFSET:
+      if ((long) relocation > 0xffff || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      insn  = bfd_get_32 (abfd, (bfd_byte *) data + reloc->address);
+      
+      insn &= 0x0001ffdf;
+      insn |= (relocation & 1) << 5;
+      insn |= (relocation & ~1) << 16;
+      
+      bfd_put_32 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_CALLT_6_7_OFFSET:
+      if ((long) relocation > 0x7e || (long) relocation < 0)
+       return bfd_reloc_overflow;
+      
+      if (relocation & 1)
+       return bfd_reloc_dangerous;
+      
+      insn  = bfd_get_16 (abfd, (bfd_byte *) data + reloc->address);
+      insn &= 0xff80;
+      insn |= (relocation >> 1);
+      
+      bfd_put_16 (abfd, insn, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+    case R_V850_CALLT_16_16_OFFSET:
+      bfd_put_16 (abfd, relocation, (bfd_byte *)data + reloc->address);
+      return bfd_reloc_ok;
+      
+/* end-sanitize-v850e */
+    }
+
+  return bfd_reloc_continue;
+}
+
+\f
+/*ARGSUSED*/
+static boolean
+v850_elf_is_local_label_name (abfd, name)
+     bfd *         abfd;
+     const char *  name;
+{
+  return ((name[0] == '.' && (name[1] == 'L' || name[1] == '.'))
+         || (name[0] == '_' && name[1] == '.' && name[2] == 'L'
+             && name[3] == '_'));
+}
+
+\f
+/* Perform a relocation as part of a final link.  */
+static bfd_reloc_status_type
+v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
+                                   input_section, contents, offset, value,
+                                   addend, info, sym_sec, is_local)
+     reloc_howto_type *      howto;
+     bfd *                   input_bfd;
+     bfd *                   output_bfd;
+     asection *              input_section;
+     bfd_byte *              contents;
+     bfd_vma                 offset;
+     bfd_vma                 value;
+     bfd_vma                 addend;
+     struct bfd_link_info *  info;
+     asection *              sym_sec;
+     int                     is_local;
+{
+  unsigned long  insn;
+  unsigned long  r_type   = howto->type;
+  bfd_byte *     hit_data = contents + offset;
+
+  switch (r_type)
+    {
+    case R_V850_9_PCREL:
+      value -= (input_section->output_section->vma
+               + input_section->output_offset);
+      value -= offset;
+
+      if ((long)value > 0xff || (long)value < -0x100)
+       return bfd_reloc_overflow;
+
+      if ((value % 2) != 0)
+       return bfd_reloc_dangerous;
+
+      insn = bfd_get_16 (input_bfd, hit_data);
+      insn &= 0x078f;
+      insn |= ((value & 0x1f0) << 7) | ((value & 0x0e) << 3);
+      bfd_put_16 (input_bfd, insn, hit_data);
+      return bfd_reloc_ok;
+    
+    case R_V850_22_PCREL:
+      value -= (input_section->output_section->vma
+               + input_section->output_offset);
+      value -= offset;
+    
+      if ((long)value > 0x1ffff || (long)value < -0x200000)
+       return bfd_reloc_overflow;
+
+      if ((value % 2) != 0)
+       return bfd_reloc_dangerous;
+
+      insn = bfd_get_32 (input_bfd, hit_data);
+      insn &= 0x1ffc0;
+      insn |= (((value & 0xfffe) << 16) | ((value & 0x3f0000) >> 16));
+      bfd_put_32 (input_bfd, insn, hit_data);
+      return bfd_reloc_ok;
+      
+    case R_V850_HI16_S:
+      value += (short)bfd_get_16 (input_bfd, hit_data);
+      value = (value >> 16) + ((value & 0x8000) != 0);
+
       if ((long)value > 0x7fff || (long)value < -0x8000)
        return bfd_reloc_overflow;
 
@@ -727,15 +993,45 @@ v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
       return bfd_reloc_ok;
 
     case R_V850_16:
-    case R_V850_ZDA_OFFSET:
-      value += (short)bfd_get_16 (input_bfd, hit_data);
+      value += (short) bfd_get_16 (input_bfd, hit_data);
 
-      if ((long)value > 0x7fff || (long)value < -0x8000)
+      if ((long) value > 0x7fff || (long) value < -0x8000)
        return bfd_reloc_overflow;
 
       bfd_put_16 (input_bfd, value, hit_data);
       return bfd_reloc_ok;
 
+    case R_V850_ZDA_16_16_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      value -= sym_sec->output_section->vma;
+      value += (short) bfd_get_16 (input_bfd, hit_data);
+
+      if ((long) value > 0x7fff || (long) value < -0x8000)
+       return bfd_reloc_overflow;
+
+      bfd_put_16 (input_bfd, value, hit_data);
+      return bfd_reloc_ok;
+
+    case R_V850_ZDA_15_16_OFFSET:      
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      insn = bfd_get_16 (input_bfd, hit_data);
+
+      value -= sym_sec->output_section->vma;
+      value += ((insn & 0xfffe) << 1);
+      
+      if ((long) value > 0x7ffe || (long) value < -0x8000)
+       return bfd_reloc_overflow;
+
+      value &= ~1;
+      value |= (insn & 1);
+      
+      bfd_put_16 (input_bfd, value, hit_data);
+      return bfd_reloc_ok;
+
     case R_V850_32:
       value += bfd_get_32 (input_bfd, hit_data);
       bfd_put_32 (input_bfd, value, hit_data);
@@ -750,24 +1046,179 @@ v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
       bfd_put_8 (input_bfd, value, hit_data);
       return bfd_reloc_ok;
 
-    case R_V850_SDA_OFFSET:
+    case R_V850_SDA_16_16_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
       {
-       unsigned long gp;
-       struct bfd_link_hash_entry *h;
+       unsigned long                gp;
+       struct bfd_link_hash_entry * h;
 
-       value += (short)bfd_get_16 (input_bfd, hit_data);
+       /* Get the value of __gp.  */
+       h = bfd_link_hash_lookup (info->hash, "__gp", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_other;
+
+       gp = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+
+       value -= sym_sec->output_section->vma;
+       value -= (gp - sym_sec->output_section->vma);
+       value += (short) bfd_get_16 (input_bfd, hit_data);
+
+       if ((long)value > 0x7fff || (long)value < -0x8000)
+         return bfd_reloc_overflow;
+
+       bfd_put_16 (input_bfd, value, hit_data);
+       return bfd_reloc_ok;
+      }
+
+    case R_V850_SDA_15_16_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      {
+       unsigned long                gp;
+       struct bfd_link_hash_entry * h;
 
        /* Get the value of __gp.  */
-       h = bfd_link_hash_lookup (info->hash, "__gp", false,
-                                 false, true);
+       h = bfd_link_hash_lookup (info->hash, "__gp", false, false, true);
        if (h == (struct bfd_link_hash_entry *) NULL
            || h->type != bfd_link_hash_defined)
-          return bfd_reloc_undefined;
+         return bfd_reloc_other;
 
        gp = (h->u.def.value
              + h->u.def.section->output_section->vma
              + h->u.def.section->output_offset);
-       value -= gp;
+       
+       value -= sym_sec->output_section->vma;
+       value -= (gp - sym_sec->output_section->vma);
+
+       insn = bfd_get_16 (input_bfd, hit_data);
+       
+       value += ((insn & 0xfffe) << 1);
+       
+       if ((long)value > 0x7ffe || (long)value < -0x8000)
+         return bfd_reloc_overflow;
+
+       value &= ~1;
+       value |= (insn & 1);
+       
+       bfd_put_16 (input_bfd, value, hit_data);
+       return bfd_reloc_ok;
+      }
+
+    case R_V850_TDA_6_8_OFFSET:
+      {
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+       
+       insn = bfd_get_16 (input_bfd, hit_data);
+
+       /* Get the value of __ep.  */
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_continue;  /* Actually this indicates that __ep could not be found. */
+
+       ep = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+
+       value -= ep;
+       value += ((insn & 0x7e) << 2);
+       
+       if ((long) value > 0xfc || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       if ((value % 2) != 0)
+         return bfd_reloc_dangerous;
+       
+       insn &= 0xff81;
+       insn |= (value >> 1);
+
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_TDA_7_8_OFFSET:
+      {
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+       
+       insn = bfd_get_16 (input_bfd, hit_data);
+
+       /* Get the value of __ep.  */
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_continue;    /* Actually this indicates that __ep could not be found. */
+
+       ep = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       
+       value -= ep;
+       value += ((insn & 0x7f) << 1);
+       
+       if ((long) value > 0xfe || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       insn &= 0xff80;
+       insn |= (value >> 1);
+       
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_TDA_7_7_OFFSET:
+      {
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+       
+       insn = bfd_get_16 (input_bfd, hit_data);
+
+       /* Get the value of __ep.  */
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_continue;  /* Actually this indicates that __ep could not be found. */
+
+       ep = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       value -= ep;
+       
+       value += insn & 0x7f;
+       
+       if ((long) value > 0x7f || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       insn &= 0xff80;
+       insn |= value;
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_TDA_16_16_OFFSET:
+      {
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+
+       /* Get the value of __ep.  */
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_other;
+
+       ep = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       value -= ep;
+       
+       value += (short) bfd_get_16 (input_bfd, hit_data);
 
        if ((long)value > 0x7fff || (long)value < -0x8000)
          return bfd_reloc_overflow;
@@ -776,85 +1227,181 @@ v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
        return bfd_reloc_ok;
       }
 
-    case R_V850_TDA_OFFSET:
+/* start-sanitize-v850e */
+    case R_V850_TDA_4_5_OFFSET:
       {
-       unsigned long ep;
-       struct bfd_link_hash_entry *h;
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+       
+       /* Get the value of __ep.  */
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_continue;  /* Actually this indicates that __ep could not be found. */
 
+       ep = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       value -= ep;
+       
        insn = bfd_get_16 (input_bfd, hit_data);
 
+       value += ((insn & 0xf) << 1);
+       
+       if ((long) value > 0x1e || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       insn &= 0xfff0;
+       insn |= (value >> 1);
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_TDA_4_4_OFFSET:
+      {
+       unsigned long                ep;
+       struct bfd_link_hash_entry * h;
+       
        /* Get the value of __ep.  */
-       h = bfd_link_hash_lookup (info->hash, "__ep", false,
-                                 false, true);
+       h = bfd_link_hash_lookup (info->hash, "__ep", false, false, true);
        if (h == (struct bfd_link_hash_entry *) NULL
            || h->type != bfd_link_hash_defined)
-          return bfd_reloc_undefined;
+         return bfd_reloc_continue;  /* Actually this indicates that __ep could not be found. */
 
        ep = (h->u.def.value
              + h->u.def.section->output_section->vma
              + h->u.def.section->output_offset);
        value -= ep;
+       
+       insn = bfd_get_16 (input_bfd, hit_data);
 
+       value += insn & 0xf;
+       
+       if ((long) value > 0xf || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       insn &= 0xfff0;
+       insn |= value;
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_SDA_16_16_SPLIT_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      {
+       unsigned long                gp;
+       struct bfd_link_hash_entry * h;
 
-       /* Overflow computation and operand insertion is complicated
-          by valid offsets and insertions changing depending on the
-          instruction being used!  */
-       if ((insn & 0x0780) == 0x0500)
-         {
-           value += ((insn & 0x7f) << 1);
+       /* Get the value of __gp.  */
+       h = bfd_link_hash_lookup (info->hash, "__gp", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_other;
 
-           /* Handle sld.w and sst.w -- 8 bit unsigned offset */
-           if ((long) value > 0xff || (long) value < 0)
-             return bfd_reloc_overflow;
+       gp = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       
+       value -= sym_sec->output_section->vma;
+       value -= (gp - sym_sec->output_section->vma);
 
-           if ((value % 2) != 0)
-             return bfd_reloc_dangerous;
+       insn = bfd_get_32 (input_bfd, hit_data);
+       
+       value += ((insn & 0xfffe0000) >> 16);
+       value += ((insn & 0x20) >> 5);
+         
+       if ((long)value > 0x7fff || (long)value < -0x8000)
+         return bfd_reloc_overflow;
 
-           insn &= 0xff81;
-           insn |= (value >> 1);
-           bfd_put_16 (input_bfd, insn, hit_data);
-           return bfd_reloc_ok;
-         }
+       insn &= 0x0001ffdf;
+       insn |= (value & 1) << 5;
+       insn |= (value & ~1) << 16;
+       
+       bfd_put_32 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
 
-       if ((insn & 0x0780) == 0x0400 || (insn & 0x0780) == 0x0480)
-         {
-           value += ((insn & 0x7f) << 1);
+    case R_V850_ZDA_16_16_SPLIT_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      insn = bfd_get_32 (input_bfd, hit_data);
+       
+      value -= sym_sec->output_section->vma;
+      value += ((insn & 0xfffe0000) >> 16);
+      value += ((insn & 0x20) >> 5);
+         
+      if ((long)value > 0x7fff || (long)value < -0x8000)
+       return bfd_reloc_overflow;
+      
+      insn &= 0x0001ffdf;
+      insn |= (value & 1) << 5;
+      insn |= (value & ~1) << 16;
+      
+      bfd_put_32 (input_bfd, insn, hit_data);
+      return bfd_reloc_ok;
 
-           /* Handle sld.h and sst.h -- 8 bit unsigned offset */
-           if ((long) value > 0xff || (long) value < 0)
-             return bfd_reloc_overflow;
+    case R_V850_CALLT_6_7_OFFSET:
+      {
+       unsigned long                ctbp;
+       struct bfd_link_hash_entry * h;
+       
+       /* Get the value of __ctbp.  */
+       h = bfd_link_hash_lookup (info->hash, "__ctbp", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_continue;  /* Actually this indicates that __ctbp could not be found. */
 
-           if ((value % 2) != 0)
-             return bfd_reloc_dangerous;
+       ctbp = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+       value -= ctbp;
+       
+       insn = bfd_get_16 (input_bfd, hit_data);
 
-           insn &= 0xff80;
-           insn |= (value >> 1);
-           bfd_put_16 (input_bfd, insn, hit_data);
-           return bfd_reloc_ok;
-         }
+       value += ((insn & 0x3f) << 1);
+       
+       if ((long) value > 0x7e || (long) value < 0)
+         return bfd_reloc_overflow;
+       
+       insn &= 0xff80;
+       insn |= (value >> 1);
+       bfd_put_16 (input_bfd, insn, hit_data);
+       return bfd_reloc_ok;
+      }
+    
+    case R_V850_CALLT_16_16_OFFSET:
+      if (sym_sec == NULL)
+       return bfd_reloc_undefined;
+         
+      {
+       unsigned long                ctbp;
+       struct bfd_link_hash_entry * h;
 
-       if ((insn & 0x0780) == 0x0300 || (insn & 0x0780) == 0x0380)
-         {
-           value += (insn & 0x7f);
-
-           /* Handle sld.b and sst.b -- 7 bit unsigned offset */
-           if ((long) value > 0x7f || (long) value < 0)
-             return bfd_reloc_overflow;
-           insn &= 0xff80;
-           insn |= value;
-           bfd_put_16 (input_bfd, insn, hit_data);
-           return bfd_reloc_ok;
-         }
+       /* Get the value of __ctbp.  */
+       h = bfd_link_hash_lookup (info->hash, "__ctbp", false, false, true);
+       if (h == (struct bfd_link_hash_entry *) NULL
+           || h->type != bfd_link_hash_defined)
+         return bfd_reloc_other;
+
+       ctbp = (h->u.def.value
+             + h->u.def.section->output_section->vma
+             + h->u.def.section->output_offset);
+
+       value -= sym_sec->output_section->vma;
+       value -= (ctbp - sym_sec->output_section->vma);
+       value += (short) bfd_get_16 (input_bfd, hit_data);
 
-       /* Guess (XXX) that it's a movea instruction or something
-          similar.  */
-       value += (short)insn;
-        if ((long)value > 0x7fff || (long)value < -0x8000)
-          return bfd_reloc_overflow;
+       if ((long) value > 0xffff || (long) value < 0)
+         return bfd_reloc_overflow;
 
-        bfd_put_16 (input_bfd, value, hit_data);
-        return bfd_reloc_ok;
+       bfd_put_16 (input_bfd, value, hit_data);
+       return bfd_reloc_ok;
       }
+
+/* end-sanitize-v850e */
     
     case R_V850_NONE:
       return bfd_reloc_ok;
@@ -869,38 +1416,39 @@ v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
 static boolean
 v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
                           contents, relocs, local_syms, local_sections)
-     bfd *output_bfd;
-     struct bfd_link_info *info;
-     bfd *input_bfd;
-     asection *input_section;
-     bfd_byte *contents;
-     Elf_Internal_Rela *relocs;
-     Elf_Internal_Sym *local_syms;
-     asection **local_sections;
+     bfd *                  output_bfd;
+     struct bfd_link_info * info;
+     bfd *                  input_bfd;
+     asection *             input_section;
+     bfd_byte *             contents;
+     Elf_Internal_Rela *    relocs;
+     Elf_Internal_Sym *     local_syms;
+     asection **            local_sections;
 {
-  Elf_Internal_Shdr *symtab_hdr;
-  struct elf_link_hash_entry **sym_hashes;
-  Elf_Internal_Rela *rel, *relend;
+  Elf_Internal_Shdr *           symtab_hdr;
+  struct elf_link_hash_entry ** sym_hashes;
+  Elf_Internal_Rela *           rel;
+  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);
 
-  rel = relocs;
+  rel    = relocs;
   relend = relocs + input_section->reloc_count;
   for (; rel < relend; rel++)
     {
-      int r_type;
-      reloc_howto_type *howto;
-      unsigned long r_symndx;
-      Elf_Internal_Sym *sym;
-      asection *sec;
-      struct elf_link_hash_entry *h;
-      bfd_vma relocation;
-      bfd_reloc_status_type r;
+      int                          r_type;
+      reloc_howto_type *           howto;
+      unsigned long                r_symndx;
+      Elf_Internal_Sym *           sym;
+      asection *                   sec;
+      struct elf_link_hash_entry * h;
+      bfd_vma                      relocation;
+      bfd_reloc_status_type        r;
 
       r_symndx = ELF32_R_SYM (rel->r_info);
-      r_type = ELF32_R_TYPE (rel->r_info);
-      howto = v850_elf_howto_table + r_type;
+      r_type   = ELF32_R_TYPE (rel->r_info);
+      howto    = v850_elf_howto_table + r_type;
 
       if (info->relocateable)
        {
@@ -932,13 +1480,24 @@ v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
          relocation = (sec->output_section->vma
                        + sec->output_offset
                        + sym->st_value);
+#if 0
+         {
+           char * name;
+           name = bfd_elf_string_from_elf_section (input_bfd, symtab_hdr->sh_link, sym->st_name);
+           name = (name == NULL) ? "<none>" : name;
+fprintf (stderr, "local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x rel %x\n", sec->name, name, sym->st_name,
+        sec->output_section->vma, sec->output_offset, sym->st_value, rel->r_addend, rel);
+         }
+#endif
        }
       else
        {
          h = sym_hashes[r_symndx - symtab_hdr->sh_info];
+         
          while (h->root.type == bfd_link_hash_indirect
                 || h->root.type == bfd_link_hash_warning)
            h = (struct elf_link_hash_entry *) h->root.u.i.link;
+         
          if (h->root.type == bfd_link_hash_defined
              || h->root.type == bfd_link_hash_defweak)
            {
@@ -969,8 +1528,8 @@ v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
 
       if (r != bfd_reloc_ok)
        {
-         const char *name;
-         const char *msg = (const char *)0;
+         const char * name;
+         const char * msg = (const char *)0;
 
          if (h != NULL)
            name = h->root.root.string;
@@ -992,6 +1551,7 @@ v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
              break;
 
            case bfd_reloc_undefined:
+             fprintf (stderr, "undef2 %s\n", name );
              if (! ((*info->callbacks->undefined_symbol)
                     (info, name, input_bfd, input_section,
                      rel->r_offset)))
@@ -1007,7 +1567,15 @@ v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
              goto common_error;
 
            case bfd_reloc_dangerous:
-             msg = "internal error: dangerous error";
+             msg = "internal error: dangerous relocation";
+             goto common_error;
+
+           case bfd_reloc_other:
+             msg = "could not locate special linker symbol __gp";
+             goto common_error;
+
+           case bfd_reloc_continue:
+             msg = "could not locate special linker symbol __ep";
              goto common_error;
 
            default:
@@ -1028,38 +1596,159 @@ v850_elf_relocate_section (output_bfd, info, input_bfd, input_section,
 }
 
 /* Set the right machine number.  */
-
 static boolean
 v850_elf_object_p (abfd)
      bfd *abfd;
 {
-  switch (get_elf_backend_data (abfd) -> elf_machine_code)
+  switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
     {
     default:
-    case EM_CYGNUS_V850:   (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, 0); break;
+    case E_V850_ARCH:   (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, 0); break;
 /* start-sanitize-v850e */
-    case EM_CYGNUS_V850E:  (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850e); break;
+    case E_V850E_ARCH:  (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850e); break;
+    case E_V850EQ_ARCH: (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850eq); break;
 /* end-sanitize-v850e */
-/* start-sanitize-v850eq */
-    case EM_CYGNUS_V850EQ: (void) bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850eq); break;
-/* start-sanitize-v850eq */
     }
 }
 
+/* Store the machine number in the flags field.  */
+void
+v850_elf_final_write_processing (abfd, linker)
+     bfd *   abfd;
+     boolean linker;
+{
+  unsigned long val;
+
+  switch (bfd_get_mach (abfd))
+    {
+    default:
+    case 0: val = E_V850_ARCH; break;
+/* start-sanitize-v850e */
+    case bfd_mach_v850e:  val = E_V850E_ARCH; break;
+    case bfd_mach_v850eq: val = E_V850EQ_ARCH;  break;
+/* end-sanitize-v850e */
+    }
+
+  elf_elfheader (abfd)->e_flags &=~ EF_V850_ARCH;
+  elf_elfheader (abfd)->e_flags |= val;
+}
+
+/* Function to keep V850 specific file flags. */
+boolean
+v850_elf_set_private_flags (abfd, flags)
+     bfd *    abfd;
+     flagword flags;
+{
+  BFD_ASSERT (!elf_flags_init (abfd)
+             || elf_elfheader (abfd)->e_flags == flags);
+
+  elf_elfheader (abfd)->e_flags = flags;
+  elf_flags_init (abfd) = true;
+  return true;
+}
+
+/* Copy backend specific data from one object module to another */
+boolean
+v850_elf_copy_private_bfd_data (ibfd, obfd)
+     bfd * ibfd;
+     bfd * obfd;
+{
+  if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
+      || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
+    return true;
+
+  BFD_ASSERT (!elf_flags_init (obfd)
+             || (elf_elfheader (obfd)->e_flags
+                 == elf_elfheader (ibfd)->e_flags));
+
+  elf_gp (obfd) = elf_gp (ibfd);
+  elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
+  elf_flags_init (obfd) = true;
+  return true;
+}
+
+/* Merge backend specific data from an object file to the output
+   object file when linking.  */
+boolean
+v850_elf_merge_private_bfd_data (ibfd, obfd)
+     bfd * ibfd;
+     bfd * obfd;
+{
+  flagword old_flags;
+  flagword new_flags;
+
+  if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
+      || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
+    return true;
+
+  new_flags = elf_elfheader (ibfd)->e_flags;
+  old_flags = elf_elfheader (obfd)->e_flags;
+
+  if (! elf_flags_init (obfd))
+    {
+      elf_flags_init (obfd) = true;
+      elf_elfheader (obfd)->e_flags = new_flags;
+
+      if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
+         && bfd_get_arch_info (obfd)->the_default)
+       {
+         return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd), bfd_get_mach (ibfd));
+       }
+
+      return true;
+    }
+
+  /* Check flag compatibility.  */
+
+  if (new_flags == old_flags)
+    return true;
+
+  if ((new_flags & EF_V850_ARCH) != (old_flags & EF_V850_ARCH))
+    {
+      _bfd_error_handler ("%s: Architecture mismatch with previous modules",
+            bfd_get_filename (ibfd));
+#if 0
+      bfd_set_error (bfd_error_bad_value);
+      return false;
+#else
+      return true;
+#endif
+    }
+
+  return true;
+}
+/* Display the flags field */
+
+static boolean
+v850_elf_print_private_bfd_data (abfd, ptr)
+     bfd *   abfd;
+     PTR     ptr;
+{
+  FILE * file = (FILE *) ptr;
+  
+  BFD_ASSERT (abfd != NULL && ptr != NULL)
+  
+  fprintf (file, "private flags = %x", elf_elfheader (abfd)->e_flags);
+  
+  switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
+    {
+    default:
+    case E_V850_ARCH: fprintf (file, ": v850 architecture"); break;
+/* start-sanitize-v850e */
+    case E_V850E_ARCH:  fprintf (file, ": v850e architecture"); break;
+    case E_V850EQ_ARCH: fprintf (file, ": v850eq architecture"); break;
+/* end-sanitize-v850e */
+    }
+  
+  fputc ('\n', file);
+  
+  return true;
+}
 \f
 #define TARGET_LITTLE_SYM                      bfd_elf32_v850_vec
 #define TARGET_LITTLE_NAME                     "elf32-v850"
 #define ELF_ARCH                               bfd_arch_v850
 #define ELF_MACHINE_CODE                       EM_CYGNUS_V850
-/* start-sanitize-v850e */
-#undef  ELF_MACHINE_CODE
-#define ELF_MACHINE_CODE                       EM_CYGNUS_V850E
-/* end-sanitize-v850e */
-/* start-sanitize-v850eq */
-#undef  ELF_MACHINE_CODE
-#define ELF_MACHINE_CODE                       EM_CYGNUS_V850EQ
-/* end-sanitize-v850eq */
-
 #define ELF_MAXPAGESIZE                                0x1000
        
 #define elf_info_to_howto                      0
@@ -1067,8 +1756,13 @@ v850_elf_object_p (abfd)
 #define elf_backend_check_relocs               v850_elf_check_relocs
 #define elf_backend_relocate_section           v850_elf_relocate_section
 #define elf_backend_object_p                   v850_elf_object_p
+#define elf_backend_final_write_processing     v850_elf_final_write_processing
 #define bfd_elf32_bfd_is_local_label_name      v850_elf_is_local_label_name
 #define bfd_elf32_bfd_reloc_type_lookup                v850_elf_reloc_type_lookup
+#define bfd_elf32_bfd_copy_private_bfd_data    v850_elf_copy_private_bfd_data
+#define bfd_elf32_bfd_merge_private_bfd_data   v850_elf_merge_private_bfd_data
+#define bfd_elf32_bfd_set_private_flags                v850_elf_set_private_flags
+#define bfd_elf32_bfd_print_private_bfd_data   v850_elf_print_private_bfd_data
 
 #define elf_symbol_leading_char                        '_'