bfd/elf64-mips.c

   1 /* MIPS-specific support for 64-bit ELF
   2    Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002
   3    Free Software Foundation, Inc.
   4    Ian Lance Taylor, Cygnus Support
   5    Linker support added by Mark Mitchell, CodeSourcery, LLC.
   6    <mark@codesourcery.com>
   7
   8 This file is part of BFD, the Binary File Descriptor library.
   9
  10 This program is free software; you can redistribute it and/or modify
  11 it under the terms of the GNU General Public License as published by
  12 the Free Software Foundation; either version 2 of the License, or
  13 (at your option) any later version.
  14
  15 This program is distributed in the hope that it will be useful,
  16 but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 GNU General Public License for more details.
  19
  20 You should have received a copy of the GNU General Public License
  21 along with this program; if not, write to the Free Software
  22 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  23
  24 /* This file supports the 64-bit MIPS ELF ABI.
  25
  26    The MIPS 64-bit ELF ABI uses an unusual reloc format.  This file
  27    overrides the usual ELF reloc handling, and handles reading and
  28    writing the relocations here.  */
  29
  30 /* TODO: Many things are unsupported, even if there is some code for it
  31  .       (which was mostly stolen from elf32-mips.c and slightly adapted).
  32  .
  33  .   - Relocation handling for REL relocs is wrong in many cases and
  34  .     generally untested.
  35  .   - Relocation handling for RELA relocs related to GOT support are
  36  .     also likely to be wrong.
  37  .   - Support for MIPS16 is untested.
  38  .   - Combined relocs with RSS_* entries are unsupported.
  39  .   - The whole GOT handling for NewABI is missing, some parts of
  40  .     the OldABI version is still lying around and should be removed.
  41  */
  42
  43 #include "bfd.h"
  44 #include "sysdep.h"
  45 #include "libbfd.h"
  46 #include "aout/ar.h"
  47 #include "bfdlink.h"
  48 #include "genlink.h"
  49 #include "elf-bfd.h"
  50 #include "elfxx-mips.h"
  51 #include "elf/mips.h"
  52
  53 /* Get the ECOFF swapping routines.  The 64-bit ABI is not supposed to
  54    use ECOFF.  However, we support it anyhow for an easier changeover.  */
  55 #include "coff/sym.h"
  56 #include "coff/symconst.h"
  57 #include "coff/internal.h"
  58 #include "coff/ecoff.h"
  59 /* The 64 bit versions of the mdebug data structures are in alpha.h.  */
  60 #include "coff/alpha.h"
  61 #define ECOFF_SIGNED_64
  62 #include "ecoffswap.h"
  63
  64 static void mips_elf64_swap_reloc_in
  65   PARAMS ((bfd *, const Elf64_Mips_External_Rel *,
  66            Elf64_Mips_Internal_Rel *));
  67 static void mips_elf64_swap_reloca_in
  68   PARAMS ((bfd *, const Elf64_Mips_External_Rela *,
  69            Elf64_Mips_Internal_Rela *));
  70 static void mips_elf64_swap_reloc_out
  71   PARAMS ((bfd *, const Elf64_Mips_Internal_Rel *,
  72            Elf64_Mips_External_Rel *));
  73 static void mips_elf64_swap_reloca_out
  74   PARAMS ((bfd *, const Elf64_Mips_Internal_Rela *,
  75            Elf64_Mips_External_Rela *));
  76 static void mips_elf64_be_swap_reloc_in
  77   PARAMS ((bfd *, const bfd_byte *, Elf_Internal_Rel *));
  78 static void mips_elf64_be_swap_reloc_out
  79   PARAMS ((bfd *, const Elf_Internal_Rel *, bfd_byte *));
  80 static void mips_elf64_be_swap_reloca_in
  81   PARAMS ((bfd *, const bfd_byte *, Elf_Internal_Rela *));
  82 static void mips_elf64_be_swap_reloca_out
  83   PARAMS ((bfd *, const Elf_Internal_Rela *, bfd_byte *));
  84 static reloc_howto_type *bfd_elf64_bfd_reloc_type_lookup
  85   PARAMS ((bfd *, bfd_reloc_code_real_type));
  86 static reloc_howto_type *mips_elf64_rtype_to_howto
  87   PARAMS ((unsigned int, boolean));
  88 static void mips_elf64_info_to_howto_rel
  89   PARAMS ((bfd *, arelent *, Elf64_Internal_Rel *));
  90 static void mips_elf64_info_to_howto_rela
  91   PARAMS ((bfd *, arelent *, Elf64_Internal_Rela *));
  92 static long mips_elf64_get_reloc_upper_bound PARAMS ((bfd *, asection *));
  93 static boolean mips_elf64_slurp_one_reloc_table
  94   PARAMS ((bfd *, asection *, asymbol **, const Elf_Internal_Shdr *));
  95 static boolean mips_elf64_slurp_reloc_table
  96   PARAMS ((bfd *, asection *, asymbol **, boolean));
  97 static void mips_elf64_write_relocs PARAMS ((bfd *, asection *, PTR));
  98 static void mips_elf64_write_rel
  99   PARAMS((bfd *, asection *, Elf_Internal_Shdr *, int *, PTR));
 100 static void mips_elf64_write_rela
 101   PARAMS((bfd *, asection *, Elf_Internal_Shdr *, int *, PTR));
 102 static bfd_reloc_status_type mips_elf64_hi16_reloc
 103   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 104 static bfd_reloc_status_type mips_elf64_gprel16_reloc
 105   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 106 static bfd_reloc_status_type mips_elf64_literal_reloc
 107   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 108 static bfd_reloc_status_type mips_elf64_gprel32_reloc
 109   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 110 static bfd_reloc_status_type mips_elf64_shift6_reloc
 111   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 112 static bfd_reloc_status_type mips_elf64_got16_reloc
 113   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 114 static bfd_reloc_status_type mips16_jump_reloc
 115   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 116 static bfd_reloc_status_type mips16_gprel_reloc
 117   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
 118 static boolean mips_elf64_assign_gp PARAMS ((bfd *, bfd_vma *));
 119 static bfd_reloc_status_type mips_elf64_final_gp
 120   PARAMS ((bfd *, asymbol *, boolean, char **, bfd_vma *));
 121 static boolean mips_elf64_object_p PARAMS ((bfd *));
 122 static irix_compat_t elf64_mips_irix_compat PARAMS ((bfd *));
 123
 124 extern const bfd_target bfd_elf64_bigmips_vec;
 125 extern const bfd_target bfd_elf64_littlemips_vec;
 126
 127 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
 128    from smaller values.  Start with zero, widen, *then* decrement.  */
 129 #define MINUS_ONE       (((bfd_vma)0) - 1)
 130
 131 /* The number of local .got entries we reserve.  */
 132 #define MIPS_RESERVED_GOTNO (2)
 133 \f
 134 /* The relocation table used for SHT_REL sections.  */
 135
 136 static reloc_howto_type mips_elf64_howto_table_rel[] =
 137 {
 138   /* No relocation.  */
 139   HOWTO (R_MIPS_NONE,           /* type */
 140          0,                     /* rightshift */
 141          0,                     /* size (0 = byte, 1 = short, 2 = long) */
 142          0,                     /* bitsize */
 143          false,                 /* pc_relative */
 144          0,                     /* bitpos */
 145          complain_overflow_dont, /* complain_on_overflow */
 146          bfd_elf_generic_reloc, /* special_function */
 147          "R_MIPS_NONE",         /* name */
 148          false,                 /* partial_inplace */
 149          0,                     /* src_mask */
 150          0,                     /* dst_mask */
 151          false),                /* pcrel_offset */
 152
 153   /* 16 bit relocation.  */
 154   HOWTO (R_MIPS_16,             /* type */
 155          0,                     /* rightshift */
 156          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 157          16,                    /* bitsize */
 158          false,                 /* pc_relative */
 159          0,                     /* bitpos */
 160          complain_overflow_signed, /* complain_on_overflow */
 161          bfd_elf_generic_reloc, /* special_function */
 162          "R_MIPS_16",           /* name */
 163          true,                  /* partial_inplace */
 164          0x0000ffff,            /* src_mask */
 165          0x0000ffff,            /* dst_mask */
 166          false),                /* pcrel_offset */
 167
 168   /* 32 bit relocation.  */
 169   HOWTO (R_MIPS_32,             /* type */
 170          0,                     /* rightshift */
 171          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 172          32,                    /* bitsize */
 173          false,                 /* pc_relative */
 174          0,                     /* bitpos */
 175          complain_overflow_dont, /* complain_on_overflow */
 176          bfd_elf_generic_reloc, /* special_function */
 177          "R_MIPS_32",           /* name */
 178          true,                  /* partial_inplace */
 179          0xffffffff,            /* src_mask */
 180          0xffffffff,            /* dst_mask */
 181          false),                /* pcrel_offset */
 182
 183   /* 32 bit symbol relative relocation.  */
 184   HOWTO (R_MIPS_REL32,          /* type */
 185          0,                     /* rightshift */
 186          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 187          32,                    /* bitsize */
 188          false,                 /* pc_relative */
 189          0,                     /* bitpos */
 190          complain_overflow_dont, /* complain_on_overflow */
 191          bfd_elf_generic_reloc, /* special_function */
 192          "R_MIPS_REL32",        /* name */
 193          true,                  /* partial_inplace */
 194          0xffffffff,            /* src_mask */
 195          0xffffffff,            /* dst_mask */
 196          false),                /* pcrel_offset */
 197
 198   /* 26 bit jump address.  */
 199   HOWTO (R_MIPS_26,             /* type */
 200          2,                     /* rightshift */
 201          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 202          26,                    /* bitsize */
 203          false,                 /* pc_relative */
 204          0,                     /* bitpos */
 205          complain_overflow_dont, /* complain_on_overflow */
 206                                 /* This needs complex overflow
 207                                    detection, because the upper 36
 208                                    bits must match the PC + 4.  */
 209          bfd_elf_generic_reloc, /* special_function */
 210          "R_MIPS_26",           /* name */
 211          true,                  /* partial_inplace */
 212          0x03ffffff,            /* src_mask */
 213          0x03ffffff,            /* dst_mask */
 214          false),                /* pcrel_offset */
 215
 216   /* R_MIPS_HI16 and R_MIPS_LO16 are unsupported for NewABI REL.
 217      However, the native IRIX6 tools use them, so we try our best. */
 218
 219   /* High 16 bits of symbol value.  */
 220   HOWTO (R_MIPS_HI16,           /* type */
 221          0,                     /* rightshift */
 222          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 223          16,                    /* bitsize */
 224          false,                 /* pc_relative */
 225          0,                     /* bitpos */
 226          complain_overflow_dont, /* complain_on_overflow */
 227          mips_elf64_hi16_reloc, /* special_function */
 228          "R_MIPS_HI16",         /* name */
 229          true,                  /* partial_inplace */
 230          0x0000ffff,            /* src_mask */
 231          0x0000ffff,            /* dst_mask */
 232          false),                /* pcrel_offset */
 233
 234   /* Low 16 bits of symbol value.  */
 235   HOWTO (R_MIPS_LO16,           /* type */
 236          0,                     /* rightshift */
 237          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 238          16,                    /* bitsize */
 239          false,                 /* pc_relative */
 240          0,                     /* bitpos */
 241          complain_overflow_dont, /* complain_on_overflow */
 242          bfd_elf_generic_reloc, /* special_function */
 243          "R_MIPS_LO16",         /* name */
 244          true,                  /* partial_inplace */
 245          0x0000ffff,            /* src_mask */
 246          0x0000ffff,            /* dst_mask */
 247          false),                /* pcrel_offset */
 248
 249   /* GP relative reference.  */
 250   HOWTO (R_MIPS_GPREL16,        /* type */
 251          0,                     /* rightshift */
 252          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 253          16,                    /* bitsize */
 254          false,                 /* pc_relative */
 255          0,                     /* bitpos */
 256          complain_overflow_signed, /* complain_on_overflow */
 257          mips_elf64_gprel16_reloc, /* special_function */
 258          "R_MIPS_GPREL16",      /* name */
 259          true,                  /* partial_inplace */
 260          0x0000ffff,            /* src_mask */
 261          0x0000ffff,            /* dst_mask */
 262          false),                /* pcrel_offset */
 263
 264   /* Reference to literal section.  */
 265   HOWTO (R_MIPS_LITERAL,        /* type */
 266          0,                     /* rightshift */
 267          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 268          16,                    /* bitsize */
 269          false,                 /* pc_relative */
 270          0,                     /* bitpos */
 271          complain_overflow_signed, /* complain_on_overflow */
 272          mips_elf64_literal_reloc, /* special_function */
 273          "R_MIPS_LITERAL",      /* name */
 274          true,                  /* partial_inplace */
 275          0x0000ffff,            /* src_mask */
 276          0x0000ffff,            /* dst_mask */
 277          false),                /* pcrel_offset */
 278
 279   /* Reference to global offset table.  */
 280   HOWTO (R_MIPS_GOT16,          /* type */
 281          0,                     /* rightshift */
 282          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 283          16,                    /* bitsize */
 284          false,                 /* pc_relative */
 285          0,                     /* bitpos */
 286          complain_overflow_signed, /* complain_on_overflow */
 287          mips_elf64_got16_reloc, /* special_function */
 288          "R_MIPS_GOT16",        /* name */
 289          true,                  /* partial_inplace */
 290          0x0000ffff,            /* src_mask */
 291          0x0000ffff,            /* dst_mask */
 292          false),                /* pcrel_offset */
 293
 294   /* 16 bit PC relative reference.  */
 295   HOWTO (R_MIPS_PC16,           /* type */
 296          0,                     /* rightshift */
 297          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 298          16,                    /* bitsize */
 299          true,                  /* pc_relative */
 300          0,                     /* bitpos */
 301          complain_overflow_signed, /* complain_on_overflow */
 302          bfd_elf_generic_reloc, /* special_function */
 303          "R_MIPS_PC16",         /* name */
 304          true,                  /* partial_inplace */
 305          0x0000ffff,            /* src_mask */
 306          0x0000ffff,            /* dst_mask */
 307          true),                 /* pcrel_offset */
 308
 309   /* 16 bit call through global offset table.  */
 310   HOWTO (R_MIPS_CALL16,         /* type */
 311          0,                     /* rightshift */
 312          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 313          16,                    /* bitsize */
 314          false,                 /* pc_relative */
 315          0,                     /* bitpos */
 316          complain_overflow_signed, /* complain_on_overflow */
 317          bfd_elf_generic_reloc, /* special_function */
 318          "R_MIPS_CALL16",       /* name */
 319          true,                  /* partial_inplace */
 320          0x0000ffff,            /* src_mask */
 321          0x0000ffff,            /* dst_mask */
 322          false),                /* pcrel_offset */
 323
 324   /* 32 bit GP relative reference.  */
 325   HOWTO (R_MIPS_GPREL32,        /* type */
 326          0,                     /* rightshift */
 327          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 328          32,                    /* bitsize */
 329          false,                 /* pc_relative */
 330          0,                     /* bitpos */
 331          complain_overflow_dont, /* complain_on_overflow */
 332          mips_elf64_gprel32_reloc, /* special_function */
 333          "R_MIPS_GPREL32",      /* name */
 334          true,                  /* partial_inplace */
 335          0xffffffff,            /* src_mask */
 336          0xffffffff,            /* dst_mask */
 337          false),                /* pcrel_offset */
 338
 339   EMPTY_HOWTO (13),
 340   EMPTY_HOWTO (14),
 341   EMPTY_HOWTO (15),
 342
 343   /* A 5 bit shift field.  */
 344   HOWTO (R_MIPS_SHIFT5,         /* type */
 345          0,                     /* rightshift */
 346          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 347          5,                     /* bitsize */
 348          false,                 /* pc_relative */
 349          6,                     /* bitpos */
 350          complain_overflow_bitfield, /* complain_on_overflow */
 351          bfd_elf_generic_reloc, /* special_function */
 352          "R_MIPS_SHIFT5",       /* name */
 353          true,                  /* partial_inplace */
 354          0x000007c0,            /* src_mask */
 355          0x000007c0,            /* dst_mask */
 356          false),                /* pcrel_offset */
 357
 358   /* A 6 bit shift field.  */
 359   HOWTO (R_MIPS_SHIFT6,         /* type */
 360          0,                     /* rightshift */
 361          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 362          6,                     /* bitsize */
 363          false,                 /* pc_relative */
 364          6,                     /* bitpos */
 365          complain_overflow_bitfield, /* complain_on_overflow */
 366          mips_elf64_shift6_reloc, /* special_function */
 367          "R_MIPS_SHIFT6",       /* name */
 368          true,                  /* partial_inplace */
 369          0x000007c4,            /* src_mask */
 370          0x000007c4,            /* dst_mask */
 371          false),                /* pcrel_offset */
 372
 373   /* 64 bit relocation.  */
 374   HOWTO (R_MIPS_64,             /* type */
 375          0,                     /* rightshift */
 376          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 377          64,                    /* bitsize */
 378          false,                 /* pc_relative */
 379          0,                     /* bitpos */
 380          complain_overflow_dont, /* complain_on_overflow */
 381          bfd_elf_generic_reloc, /* special_function */
 382          "R_MIPS_64",           /* name */
 383          true,                  /* partial_inplace */
 384          MINUS_ONE,             /* src_mask */
 385          MINUS_ONE,             /* dst_mask */
 386          false),                /* pcrel_offset */
 387
 388   /* Displacement in the global offset table.  */
 389   HOWTO (R_MIPS_GOT_DISP,       /* type */
 390          0,                     /* rightshift */
 391          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 392          16,                    /* bitsize */
 393          false,                 /* pc_relative */
 394          0,                     /* bitpos */
 395          complain_overflow_signed, /* complain_on_overflow */
 396          bfd_elf_generic_reloc, /* special_function */
 397          "R_MIPS_GOT_DISP",     /* name */
 398          true,                  /* partial_inplace */
 399          0x0000ffff,            /* src_mask */
 400          0x0000ffff,            /* dst_mask */
 401          false),                /* pcrel_offset */
 402
 403   /* Displacement to page pointer in the global offset table.  */
 404   HOWTO (R_MIPS_GOT_PAGE,       /* type */
 405          0,                     /* rightshift */
 406          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 407          16,                    /* bitsize */
 408          false,                 /* pc_relative */
 409          0,                     /* bitpos */
 410          complain_overflow_signed, /* complain_on_overflow */
 411          bfd_elf_generic_reloc, /* special_function */
 412          "R_MIPS_GOT_PAGE",     /* name */
 413          true,                  /* partial_inplace */
 414          0x0000ffff,            /* src_mask */
 415          0x0000ffff,            /* dst_mask */
 416          false),                /* pcrel_offset */
 417
 418   /* Offset from page pointer in the global offset table.  */
 419   HOWTO (R_MIPS_GOT_OFST,       /* type */
 420          0,                     /* rightshift */
 421          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 422          16,                    /* bitsize */
 423          false,                 /* pc_relative */
 424          0,                     /* bitpos */
 425          complain_overflow_signed, /* complain_on_overflow */
 426          bfd_elf_generic_reloc, /* special_function */
 427          "R_MIPS_GOT_OFST",     /* name */
 428          true,                  /* partial_inplace */
 429          0x0000ffff,            /* src_mask */
 430          0x0000ffff,            /* dst_mask */
 431          false),                /* pcrel_offset */
 432
 433   /* High 16 bits of displacement in global offset table.  */
 434   HOWTO (R_MIPS_GOT_HI16,       /* type */
 435          0,                     /* rightshift */
 436          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 437          16,                    /* bitsize */
 438          false,                 /* pc_relative */
 439          0,                     /* bitpos */
 440          complain_overflow_dont, /* complain_on_overflow */
 441          bfd_elf_generic_reloc, /* special_function */
 442          "R_MIPS_GOT_HI16",     /* name */
 443          true,                  /* partial_inplace */
 444          0x0000ffff,            /* src_mask */
 445          0x0000ffff,            /* dst_mask */
 446          false),                /* pcrel_offset */
 447
 448   /* Low 16 bits of displacement in global offset table.  */
 449   HOWTO (R_MIPS_GOT_LO16,       /* type */
 450          0,                     /* rightshift */
 451          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 452          16,                    /* bitsize */
 453          false,                 /* pc_relative */
 454          0,                     /* bitpos */
 455          complain_overflow_dont, /* complain_on_overflow */
 456          bfd_elf_generic_reloc, /* special_function */
 457          "R_MIPS_GOT_LO16",     /* name */
 458          true,                  /* partial_inplace */
 459          0x0000ffff,            /* src_mask */
 460          0x0000ffff,            /* dst_mask */
 461          false),                /* pcrel_offset */
 462
 463   /* 64 bit substraction.  */
 464   HOWTO (R_MIPS_SUB,            /* type */
 465          0,                     /* rightshift */
 466          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 467          64,                    /* bitsize */
 468          false,                 /* pc_relative */
 469          0,                     /* bitpos */
 470          complain_overflow_dont, /* complain_on_overflow */
 471          bfd_elf_generic_reloc, /* special_function */
 472          "R_MIPS_SUB",          /* name */
 473          true,                  /* partial_inplace */
 474          MINUS_ONE,             /* src_mask */
 475          MINUS_ONE,             /* dst_mask */
 476          false),                /* pcrel_offset */
 477
 478   /* Insert the addend as an instruction.  */
 479   /* FIXME: Not handled correctly.  */
 480   HOWTO (R_MIPS_INSERT_A,       /* type */
 481          0,                     /* rightshift */
 482          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 483          32,                    /* bitsize */
 484          false,                 /* pc_relative */
 485          0,                     /* bitpos */
 486          complain_overflow_dont, /* complain_on_overflow */
 487          bfd_elf_generic_reloc, /* special_function */
 488          "R_MIPS_INSERT_A",     /* name */
 489          true,                  /* partial_inplace */
 490          0xffffffff,            /* src_mask */
 491          0xffffffff,            /* dst_mask */
 492          false),                /* pcrel_offset */
 493
 494   /* Insert the addend as an instruction, and change all relocations
 495      to refer to the old instruction at the address.  */
 496   /* FIXME: Not handled correctly.  */
 497   HOWTO (R_MIPS_INSERT_B,       /* type */
 498          0,                     /* rightshift */
 499          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 500          32,                    /* bitsize */
 501          false,                 /* pc_relative */
 502          0,                     /* bitpos */
 503          complain_overflow_dont, /* complain_on_overflow */
 504          bfd_elf_generic_reloc, /* special_function */
 505          "R_MIPS_INSERT_B",     /* name */
 506          true,                  /* partial_inplace */
 507          0xffffffff,            /* src_mask */
 508          0xffffffff,            /* dst_mask */
 509          false),                /* pcrel_offset */
 510
 511   /* Delete a 32 bit instruction.  */
 512   /* FIXME: Not handled correctly.  */
 513   HOWTO (R_MIPS_DELETE,         /* type */
 514          0,                     /* rightshift */
 515          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 516          32,                    /* bitsize */
 517          false,                 /* pc_relative */
 518          0,                     /* bitpos */
 519          complain_overflow_dont, /* complain_on_overflow */
 520          bfd_elf_generic_reloc, /* special_function */
 521          "R_MIPS_DELETE",       /* name */
 522          true,                  /* partial_inplace */
 523          0xffffffff,            /* src_mask */
 524          0xffffffff,            /* dst_mask */
 525          false),                /* pcrel_offset */
 526
 527   /* The MIPS ELF64 ABI Draft wants us to support these for REL relocations.
 528      We don't, because
 529        a) It means building the addend from a R_MIPS_HIGHEST/R_MIPS_HIGHER/
 530           R_MIPS_HI16/R_MIPS_LO16 sequence with varying ordering, using
 531           fallable heuristics.
 532        b) No other NewABI toolchain actually emits such relocations.  */
 533   EMPTY_HOWTO (R_MIPS_HIGHER),
 534   EMPTY_HOWTO (R_MIPS_HIGHEST),
 535
 536   /* High 16 bits of displacement in global offset table.  */
 537   HOWTO (R_MIPS_CALL_HI16,      /* type */
 538          0,                     /* rightshift */
 539          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 540          16,                    /* bitsize */
 541          false,                 /* pc_relative */
 542          0,                     /* bitpos */
 543          complain_overflow_dont, /* complain_on_overflow */
 544          bfd_elf_generic_reloc, /* special_function */
 545          "R_MIPS_CALL_HI16",    /* name */
 546          true,                  /* partial_inplace */
 547          0x0000ffff,            /* src_mask */
 548          0x0000ffff,            /* dst_mask */
 549          false),                /* pcrel_offset */
 550
 551   /* Low 16 bits of displacement in global offset table.  */
 552   HOWTO (R_MIPS_CALL_LO16,      /* type */
 553          0,                     /* rightshift */
 554          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 555          16,                    /* bitsize */
 556          false,                 /* pc_relative */
 557          0,                     /* bitpos */
 558          complain_overflow_dont, /* complain_on_overflow */
 559          bfd_elf_generic_reloc, /* special_function */
 560          "R_MIPS_CALL_LO16",    /* name */
 561          true,                  /* partial_inplace */
 562          0x0000ffff,            /* src_mask */
 563          0x0000ffff,            /* dst_mask */
 564          false),                /* pcrel_offset */
 565
 566   /* Section displacement, used by an associated event location section.  */
 567   HOWTO (R_MIPS_SCN_DISP,       /* type */
 568          0,                     /* rightshift */
 569          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 570          32,                    /* bitsize */
 571          false,                 /* pc_relative */
 572          0,                     /* bitpos */
 573          complain_overflow_dont, /* complain_on_overflow */
 574          bfd_elf_generic_reloc, /* special_function */
 575          "R_MIPS_SCN_DISP",     /* name */
 576          true,                  /* partial_inplace */
 577          0xffffffff,            /* src_mask */
 578          0xffffffff,            /* dst_mask */
 579          false),                /* pcrel_offset */
 580
 581   HOWTO (R_MIPS_REL16,          /* type */
 582          0,                     /* rightshift */
 583          1,                     /* size (0 = byte, 1 = short, 2 = long) */
 584          16,                    /* bitsize */
 585          false,                 /* pc_relative */
 586          0,                     /* bitpos */
 587          complain_overflow_signed, /* complain_on_overflow */
 588          bfd_elf_generic_reloc, /* special_function */
 589          "R_MIPS_REL16",        /* name */
 590          true,                  /* partial_inplace */
 591          0xffff,                /* src_mask */
 592          0xffff,                /* dst_mask */
 593          false),                /* pcrel_offset */
 594
 595   /* These two are obsolete.  */
 596   EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
 597   EMPTY_HOWTO (R_MIPS_PJUMP),
 598
 599   /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
 600      It must be used for multigot GOT's (and only there).  */
 601   HOWTO (R_MIPS_RELGOT,         /* type */
 602          0,                     /* rightshift */
 603          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 604          32,                    /* bitsize */
 605          false,                 /* pc_relative */
 606          0,                     /* bitpos */
 607          complain_overflow_dont, /* complain_on_overflow */
 608          bfd_elf_generic_reloc, /* special_function */
 609          "R_MIPS_RELGOT",       /* name */
 610          true,                  /* partial_inplace */
 611          0xffffffff,            /* src_mask */
 612          0xffffffff,            /* dst_mask */
 613          false),                /* pcrel_offset */
 614
 615   /* Protected jump conversion.  This is an optimization hint.  No
 616      relocation is required for correctness.  */
 617   HOWTO (R_MIPS_JALR,           /* type */
 618          0,                     /* rightshift */
 619          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 620          32,                    /* bitsize */
 621          false,                 /* pc_relative */
 622          0,                     /* bitpos */
 623          complain_overflow_dont, /* complain_on_overflow */
 624          bfd_elf_generic_reloc, /* special_function */
 625          "R_MIPS_JALR",         /* name */
 626          false,                 /* partial_inplace */
 627          0,                     /* src_mask */
 628          0x00000000,            /* dst_mask */
 629          false),                /* pcrel_offset */
 630 };
 631
 632 /* The relocation table used for SHT_RELA sections.  */
 633
 634 static reloc_howto_type mips_elf64_howto_table_rela[] =
 635 {
 636   /* No relocation.  */
 637   HOWTO (R_MIPS_NONE,           /* type */
 638          0,                     /* rightshift */
 639          0,                     /* size (0 = byte, 1 = short, 2 = long) */
 640          0,                     /* bitsize */
 641          false,                 /* pc_relative */
 642          0,                     /* bitpos */
 643          complain_overflow_dont, /* complain_on_overflow */
 644          bfd_elf_generic_reloc, /* special_function */
 645          "R_MIPS_NONE",         /* name */
 646          false,                 /* partial_inplace */
 647          0,                     /* src_mask */
 648          0,                     /* dst_mask */
 649          false),                /* pcrel_offset */
 650
 651   /* 16 bit relocation.  */
 652   HOWTO (R_MIPS_16,             /* type */
 653          0,                     /* rightshift */
 654          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 655          16,                    /* bitsize */
 656          false,                 /* pc_relative */
 657          0,                     /* bitpos */
 658          complain_overflow_signed, /* complain_on_overflow */
 659          bfd_elf_generic_reloc, /* special_function */
 660          "R_MIPS_16",           /* name */
 661          false,                 /* partial_inplace */
 662          0,                     /* src_mask */
 663          0x0000ffff,            /* dst_mask */
 664          false),                /* pcrel_offset */
 665
 666   /* 32 bit relocation.  */
 667   HOWTO (R_MIPS_32,             /* type */
 668          0,                     /* rightshift */
 669          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 670          32,                    /* bitsize */
 671          false,                 /* pc_relative */
 672          0,                     /* bitpos */
 673          complain_overflow_dont, /* complain_on_overflow */
 674          bfd_elf_generic_reloc, /* special_function */
 675          "R_MIPS_32",           /* name */
 676          false,                 /* partial_inplace */
 677          0,                     /* src_mask */
 678          0xffffffff,            /* dst_mask */
 679          false),                /* pcrel_offset */
 680
 681   /* 32 bit symbol relative relocation.  */
 682   HOWTO (R_MIPS_REL32,          /* type */
 683          0,                     /* rightshift */
 684          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 685          32,                    /* bitsize */
 686          false,                 /* pc_relative */
 687          0,                     /* bitpos */
 688          complain_overflow_dont, /* complain_on_overflow */
 689          bfd_elf_generic_reloc, /* special_function */
 690          "R_MIPS_REL32",        /* name */
 691          false,                 /* partial_inplace */
 692          0,                     /* src_mask */
 693          0xffffffff,            /* dst_mask */
 694          false),                /* pcrel_offset */
 695
 696   /* 26 bit jump address.  */
 697   HOWTO (R_MIPS_26,             /* type */
 698          2,                     /* rightshift */
 699          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 700          26,                    /* bitsize */
 701          false,                 /* pc_relative */
 702          0,                     /* bitpos */
 703          complain_overflow_dont, /* complain_on_overflow */
 704                                 /* This needs complex overflow
 705                                    detection, because the upper 36
 706                                    bits must match the PC + 4.  */
 707          bfd_elf_generic_reloc, /* special_function */
 708          "R_MIPS_26",           /* name */
 709          false,                 /* partial_inplace */
 710          0,                     /* src_mask */
 711          0x03ffffff,            /* dst_mask */
 712          false),                /* pcrel_offset */
 713
 714   /* High 16 bits of symbol value.  */
 715   HOWTO (R_MIPS_HI16,           /* type */
 716          0,                     /* rightshift */
 717          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 718          16,                    /* bitsize */
 719          false,                 /* pc_relative */
 720          0,                     /* bitpos */
 721          complain_overflow_dont, /* complain_on_overflow */
 722          bfd_elf_generic_reloc, /* special_function */
 723          "R_MIPS_HI16",         /* name */
 724          false,                 /* partial_inplace */
 725          0,                     /* src_mask */
 726          0x0000ffff,            /* dst_mask */
 727          false),                /* pcrel_offset */
 728
 729   /* Low 16 bits of symbol value.  */
 730   HOWTO (R_MIPS_LO16,           /* type */
 731          0,                     /* rightshift */
 732          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 733          16,                    /* bitsize */
 734          false,                 /* pc_relative */
 735          0,                     /* bitpos */
 736          complain_overflow_dont, /* complain_on_overflow */
 737          bfd_elf_generic_reloc, /* special_function */
 738          "R_MIPS_LO16",         /* name */
 739          false,                 /* partial_inplace */
 740          0,                     /* src_mask */
 741          0x0000ffff,            /* dst_mask */
 742          false),                /* pcrel_offset */
 743
 744   /* GP relative reference.  */
 745   HOWTO (R_MIPS_GPREL16,        /* type */
 746          0,                     /* rightshift */
 747          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 748          16,                    /* bitsize */
 749          false,                 /* pc_relative */
 750          0,                     /* bitpos */
 751          complain_overflow_signed, /* complain_on_overflow */
 752          mips_elf64_gprel16_reloc, /* special_function */
 753          "R_MIPS_GPREL16",      /* name */
 754          false,                 /* partial_inplace */
 755          0,                     /* src_mask */
 756          0x0000ffff,            /* dst_mask */
 757          false),                /* pcrel_offset */
 758
 759   /* Reference to literal section.  */
 760   HOWTO (R_MIPS_LITERAL,        /* type */
 761          0,                     /* rightshift */
 762          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 763          16,                    /* bitsize */
 764          false,                 /* pc_relative */
 765          0,                     /* bitpos */
 766          complain_overflow_signed, /* complain_on_overflow */
 767          mips_elf64_literal_reloc, /* special_function */
 768          "R_MIPS_LITERAL",      /* name */
 769          false,                 /* partial_inplace */
 770          0,                     /* src_mask */
 771          0x0000ffff,            /* dst_mask */
 772          false),                /* pcrel_offset */
 773
 774   /* Reference to global offset table.  */
 775   HOWTO (R_MIPS_GOT16,          /* type */
 776          0,                     /* rightshift */
 777          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 778          16,                    /* bitsize */
 779          false,                 /* pc_relative */
 780          0,                     /* bitpos */
 781          complain_overflow_signed, /* complain_on_overflow */
 782          mips_elf64_got16_reloc, /* special_function */
 783          "R_MIPS_GOT16",        /* name */
 784          false,                 /* partial_inplace */
 785          0,                     /* src_mask */
 786          0x0000ffff,            /* dst_mask */
 787          false),                /* pcrel_offset */
 788
 789   /* 16 bit PC relative reference.  */
 790   HOWTO (R_MIPS_PC16,           /* type */
 791          0,                     /* rightshift */
 792          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 793          16,                    /* bitsize */
 794          true,                  /* pc_relative */
 795          0,                     /* bitpos */
 796          complain_overflow_signed, /* complain_on_overflow */
 797          bfd_elf_generic_reloc, /* special_function */
 798          "R_MIPS_PC16",         /* name */
 799          false,                 /* partial_inplace */
 800          0,                     /* src_mask */
 801          0x0000ffff,            /* dst_mask */
 802          true),                 /* pcrel_offset */
 803
 804   /* 16 bit call through global offset table.  */
 805   HOWTO (R_MIPS_CALL16,         /* type */
 806          0,                     /* rightshift */
 807          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 808          16,                    /* bitsize */
 809          false,                 /* pc_relative */
 810          0,                     /* bitpos */
 811          complain_overflow_signed, /* complain_on_overflow */
 812          bfd_elf_generic_reloc, /* special_function */
 813          "R_MIPS_CALL16",       /* name */
 814          false,                 /* partial_inplace */
 815          0,                     /* src_mask */
 816          0x0000ffff,            /* dst_mask */
 817          false),                /* pcrel_offset */
 818
 819   /* 32 bit GP relative reference.  */
 820   HOWTO (R_MIPS_GPREL32,        /* type */
 821          0,                     /* rightshift */
 822          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 823          32,                    /* bitsize */
 824          false,                 /* pc_relative */
 825          0,                     /* bitpos */
 826          complain_overflow_dont, /* complain_on_overflow */
 827          mips_elf64_gprel32_reloc, /* special_function */
 828          "R_MIPS_GPREL32",      /* name */
 829          false,                 /* partial_inplace */
 830          0,                     /* src_mask */
 831          0xffffffff,            /* dst_mask */
 832          false),                /* pcrel_offset */
 833
 834   EMPTY_HOWTO (13),
 835   EMPTY_HOWTO (14),
 836   EMPTY_HOWTO (15),
 837
 838   /* A 5 bit shift field.  */
 839   HOWTO (R_MIPS_SHIFT5,         /* type */
 840          0,                     /* rightshift */
 841          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 842          5,                     /* bitsize */
 843          false,                 /* pc_relative */
 844          6,                     /* bitpos */
 845          complain_overflow_bitfield, /* complain_on_overflow */
 846          bfd_elf_generic_reloc, /* special_function */
 847          "R_MIPS_SHIFT5",       /* name */
 848          false,                 /* partial_inplace */
 849          0,                     /* src_mask */
 850          0x000007c0,            /* dst_mask */
 851          false),                /* pcrel_offset */
 852
 853   /* A 6 bit shift field.  */
 854   HOWTO (R_MIPS_SHIFT6,         /* type */
 855          0,                     /* rightshift */
 856          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 857          6,                     /* bitsize */
 858          false,                 /* pc_relative */
 859          6,                     /* bitpos */
 860          complain_overflow_bitfield, /* complain_on_overflow */
 861          mips_elf64_shift6_reloc, /* special_function */
 862          "R_MIPS_SHIFT6",       /* name */
 863          false,                 /* partial_inplace */
 864          0,                     /* src_mask */
 865          0x000007c4,            /* dst_mask */
 866          false),                /* pcrel_offset */
 867
 868   /* 64 bit relocation.  */
 869   HOWTO (R_MIPS_64,             /* type */
 870          0,                     /* rightshift */
 871          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 872          64,                    /* bitsize */
 873          false,                 /* pc_relative */
 874          0,                     /* bitpos */
 875          complain_overflow_dont, /* complain_on_overflow */
 876          bfd_elf_generic_reloc, /* special_function */
 877          "R_MIPS_64",           /* name */
 878          false,                 /* partial_inplace */
 879          0,                     /* src_mask */
 880          MINUS_ONE,             /* dst_mask */
 881          false),                /* pcrel_offset */
 882
 883   /* Displacement in the global offset table.  */
 884   HOWTO (R_MIPS_GOT_DISP,       /* type */
 885          0,                     /* rightshift */
 886          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 887          16,                    /* bitsize */
 888          false,                 /* pc_relative */
 889          0,                     /* bitpos */
 890          complain_overflow_signed, /* complain_on_overflow */
 891          bfd_elf_generic_reloc, /* special_function */
 892          "R_MIPS_GOT_DISP",     /* name */
 893          false,                 /* partial_inplace */
 894          0,                     /* src_mask */
 895          0x0000ffff,            /* dst_mask */
 896          false),                /* pcrel_offset */
 897
 898   /* Displacement to page pointer in the global offset table.  */
 899   HOWTO (R_MIPS_GOT_PAGE,       /* type */
 900          0,                     /* rightshift */
 901          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 902          16,                    /* bitsize */
 903          false,                 /* pc_relative */
 904          0,                     /* bitpos */
 905          complain_overflow_signed, /* complain_on_overflow */
 906          bfd_elf_generic_reloc, /* special_function */
 907          "R_MIPS_GOT_PAGE",     /* name */
 908          false,                 /* partial_inplace */
 909          0,                     /* src_mask */
 910          0x0000ffff,            /* dst_mask */
 911          false),                /* pcrel_offset */
 912
 913   /* Offset from page pointer in the global offset table.  */
 914   HOWTO (R_MIPS_GOT_OFST,       /* type */
 915          0,                     /* rightshift */
 916          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 917          16,                    /* bitsize */
 918          false,                 /* pc_relative */
 919          0,                     /* bitpos */
 920          complain_overflow_signed, /* complain_on_overflow */
 921          bfd_elf_generic_reloc, /* special_function */
 922          "R_MIPS_GOT_OFST",     /* name */
 923          false,                 /* partial_inplace */
 924          0,                     /* src_mask */
 925          0x0000ffff,            /* dst_mask */
 926          false),                /* pcrel_offset */
 927
 928   /* High 16 bits of displacement in global offset table.  */
 929   HOWTO (R_MIPS_GOT_HI16,       /* type */
 930          0,                     /* rightshift */
 931          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 932          16,                    /* bitsize */
 933          false,                 /* pc_relative */
 934          0,                     /* bitpos */
 935          complain_overflow_dont, /* complain_on_overflow */
 936          bfd_elf_generic_reloc, /* special_function */
 937          "R_MIPS_GOT_HI16",     /* name */
 938          false,                 /* partial_inplace */
 939          0,                     /* src_mask */
 940          0x0000ffff,            /* dst_mask */
 941          false),                /* pcrel_offset */
 942
 943   /* Low 16 bits of displacement in global offset table.  */
 944   HOWTO (R_MIPS_GOT_LO16,       /* type */
 945          0,                     /* rightshift */
 946          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 947          16,                    /* bitsize */
 948          false,                 /* pc_relative */
 949          0,                     /* bitpos */
 950          complain_overflow_dont, /* complain_on_overflow */
 951          bfd_elf_generic_reloc, /* special_function */
 952          "R_MIPS_GOT_LO16",     /* name */
 953          false,                 /* partial_inplace */
 954          0,                     /* src_mask */
 955          0x0000ffff,            /* dst_mask */
 956          false),                /* pcrel_offset */
 957
 958   /* 64 bit substraction.  */
 959   HOWTO (R_MIPS_SUB,            /* type */
 960          0,                     /* rightshift */
 961          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 962          64,                    /* bitsize */
 963          false,                 /* pc_relative */
 964          0,                     /* bitpos */
 965          complain_overflow_dont, /* complain_on_overflow */
 966          bfd_elf_generic_reloc, /* special_function */
 967          "R_MIPS_SUB",          /* name */
 968          false,                 /* partial_inplace */
 969          0,                     /* src_mask */
 970          MINUS_ONE,             /* dst_mask */
 971          false),                /* pcrel_offset */
 972
 973   /* Insert the addend as an instruction.  */
 974   /* FIXME: Not handled correctly.  */
 975   HOWTO (R_MIPS_INSERT_A,       /* type */
 976          0,                     /* rightshift */
 977          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 978          32,                    /* bitsize */
 979          false,                 /* pc_relative */
 980          0,                     /* bitpos */
 981          complain_overflow_dont, /* complain_on_overflow */
 982          bfd_elf_generic_reloc, /* special_function */
 983          "R_MIPS_INSERT_A",     /* name */
 984          false,                 /* partial_inplace */
 985          0,                     /* src_mask */
 986          0xffffffff,            /* dst_mask */
 987          false),                /* pcrel_offset */
 988
 989   /* Insert the addend as an instruction, and change all relocations
 990      to refer to the old instruction at the address.  */
 991   /* FIXME: Not handled correctly.  */
 992   HOWTO (R_MIPS_INSERT_B,       /* type */
 993          0,                     /* rightshift */
 994          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 995          32,                    /* bitsize */
 996          false,                 /* pc_relative */
 997          0,                     /* bitpos */
 998          complain_overflow_dont, /* complain_on_overflow */
 999          bfd_elf_generic_reloc, /* special_function */
1000          "R_MIPS_INSERT_B",     /* name */
1001          false,                 /* partial_inplace */
1002          0,                     /* src_mask */
1003          0xffffffff,            /* dst_mask */
1004          false),                /* pcrel_offset */
1005
1006   /* Delete a 32 bit instruction.  */
1007   /* FIXME: Not handled correctly.  */
1008   HOWTO (R_MIPS_DELETE,         /* type */
1009          0,                     /* rightshift */
1010          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1011          32,                    /* bitsize */
1012          false,                 /* pc_relative */
1013          0,                     /* bitpos */
1014          complain_overflow_dont, /* complain_on_overflow */
1015          bfd_elf_generic_reloc, /* special_function */
1016          "R_MIPS_DELETE",       /* name */
1017          false,                 /* partial_inplace */
1018          0,                     /* src_mask */
1019          0xffffffff,            /* dst_mask */
1020          false),                /* pcrel_offset */
1021
1022   /* Get the higher value of a 64 bit addend.  */
1023   HOWTO (R_MIPS_HIGHER,         /* type */
1024          0,                     /* rightshift */
1025          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1026          16,                    /* bitsize */
1027          false,                 /* pc_relative */
1028          0,                     /* bitpos */
1029          complain_overflow_dont, /* complain_on_overflow */
1030          bfd_elf_generic_reloc, /* special_function */
1031          "R_MIPS_HIGHER",       /* name */
1032          false,                 /* partial_inplace */
1033          0,                     /* src_mask */
1034          0x0000ffff,            /* dst_mask */
1035          false),                /* pcrel_offset */
1036
1037   /* Get the highest value of a 64 bit addend.  */
1038   HOWTO (R_MIPS_HIGHEST,        /* type */
1039          0,                     /* rightshift */
1040          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1041          16,                    /* bitsize */
1042          false,                 /* pc_relative */
1043          0,                     /* bitpos */
1044          complain_overflow_dont, /* complain_on_overflow */
1045          bfd_elf_generic_reloc, /* special_function */
1046          "R_MIPS_HIGHEST",      /* name */
1047          false,                 /* partial_inplace */
1048          0,                     /* src_mask */
1049          0x0000ffff,            /* dst_mask */
1050          false),                /* pcrel_offset */
1051
1052   /* High 16 bits of displacement in global offset table.  */
1053   HOWTO (R_MIPS_CALL_HI16,      /* type */
1054          0,                     /* rightshift */
1055          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1056          16,                    /* bitsize */
1057          false,                 /* pc_relative */
1058          0,                     /* bitpos */
1059          complain_overflow_dont, /* complain_on_overflow */
1060          bfd_elf_generic_reloc, /* special_function */
1061          "R_MIPS_CALL_HI16",    /* name */
1062          false,                 /* partial_inplace */
1063          0,                     /* src_mask */
1064          0x0000ffff,            /* dst_mask */
1065          false),                /* pcrel_offset */
1066
1067   /* Low 16 bits of displacement in global offset table.  */
1068   HOWTO (R_MIPS_CALL_LO16,      /* type */
1069          0,                     /* rightshift */
1070          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1071          16,                    /* bitsize */
1072          false,                 /* pc_relative */
1073          0,                     /* bitpos */
1074          complain_overflow_dont, /* complain_on_overflow */
1075          bfd_elf_generic_reloc, /* special_function */
1076          "R_MIPS_CALL_LO16",    /* name */
1077          false,                 /* partial_inplace */
1078          0,                     /* src_mask */
1079          0x0000ffff,            /* dst_mask */
1080          false),                /* pcrel_offset */
1081
1082   /* Section displacement, used by an associated event location section.  */
1083   HOWTO (R_MIPS_SCN_DISP,       /* type */
1084          0,                     /* rightshift */
1085          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1086          32,                    /* bitsize */
1087          false,                 /* pc_relative */
1088          0,                     /* bitpos */
1089          complain_overflow_dont, /* complain_on_overflow */
1090          bfd_elf_generic_reloc, /* special_function */
1091          "R_MIPS_SCN_DISP",     /* name */
1092          false,                 /* partial_inplace */
1093          0,                     /* src_mask */
1094          0xffffffff,            /* dst_mask */
1095          false),                /* pcrel_offset */
1096
1097   HOWTO (R_MIPS_REL16,          /* type */
1098          0,                     /* rightshift */
1099          1,                     /* size (0 = byte, 1 = short, 2 = long) */
1100          16,                    /* bitsize */
1101          false,                 /* pc_relative */
1102          0,                     /* bitpos */
1103          complain_overflow_signed, /* complain_on_overflow */
1104          bfd_elf_generic_reloc, /* special_function */
1105          "R_MIPS_REL16",        /* name */
1106          false,                 /* partial_inplace */
1107          0,                     /* src_mask */
1108          0xffff,                /* dst_mask */
1109          false),                /* pcrel_offset */
1110
1111   /* These two are obsolete.  */
1112   EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
1113   EMPTY_HOWTO (R_MIPS_PJUMP),
1114
1115   /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
1116      It must be used for multigot GOT's (and only there).  */
1117   HOWTO (R_MIPS_RELGOT,         /* type */
1118          0,                     /* rightshift */
1119          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1120          32,                    /* bitsize */
1121          false,                 /* pc_relative */
1122          0,                     /* bitpos */
1123          complain_overflow_dont, /* complain_on_overflow */
1124          bfd_elf_generic_reloc, /* special_function */
1125          "R_MIPS_RELGOT",       /* name */
1126          false,                 /* partial_inplace */
1127          0,                     /* src_mask */
1128          0xffffffff,            /* dst_mask */
1129          false),                /* pcrel_offset */
1130
1131   /* Protected jump conversion.  This is an optimization hint.  No
1132      relocation is required for correctness.  */
1133   HOWTO (R_MIPS_JALR,           /* type */
1134          0,                     /* rightshift */
1135          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1136          32,                    /* bitsize */
1137          false,                 /* pc_relative */
1138          0,                     /* bitpos */
1139          complain_overflow_dont, /* complain_on_overflow */
1140          bfd_elf_generic_reloc, /* special_function */
1141          "R_MIPS_JALR",         /* name */
1142          false,                 /* partial_inplace */
1143          0,                     /* src_mask */
1144          0x00000000,            /* dst_mask */
1145          false),                /* pcrel_offset */
1146 };
1147
1148 /* The reloc used for the mips16 jump instruction.  */
1149 static reloc_howto_type elf_mips16_jump_howto =
1150   HOWTO (R_MIPS16_26,           /* type */
1151          2,                     /* rightshift */
1152          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1153          26,                    /* bitsize */
1154          false,                 /* pc_relative */
1155          0,                     /* bitpos */
1156          complain_overflow_dont, /* complain_on_overflow */
1157                                 /* This needs complex overflow
1158                                    detection, because the upper four
1159                                    bits must match the PC.  */
1160          mips16_jump_reloc,     /* special_function */
1161          "R_MIPS16_26",         /* name */
1162          true,                  /* partial_inplace */
1163          0x3ffffff,             /* src_mask */
1164          0x3ffffff,             /* dst_mask */
1165          false);                /* pcrel_offset */
1166
1167 /* The reloc used for the mips16 gprel instruction.  */
1168 static reloc_howto_type elf_mips16_gprel_howto =
1169   HOWTO (R_MIPS16_GPREL,        /* type */
1170          0,                     /* rightshift */
1171          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1172          16,                    /* bitsize */
1173          false,                 /* pc_relative */
1174          0,                     /* bitpos */
1175          complain_overflow_signed, /* complain_on_overflow */
1176          mips16_gprel_reloc,    /* special_function */
1177          "R_MIPS16_GPREL",      /* name */
1178          true,                  /* partial_inplace */
1179          0x07ff001f,            /* src_mask */
1180          0x07ff001f,            /* dst_mask */
1181          false);                /* pcrel_offset */
1182
1183 /* GNU extension to record C++ vtable hierarchy */
1184 static reloc_howto_type elf_mips_gnu_vtinherit_howto =
1185   HOWTO (R_MIPS_GNU_VTINHERIT,  /* type */
1186          0,                     /* rightshift */
1187          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1188          0,                     /* bitsize */
1189          false,                 /* pc_relative */
1190          0,                     /* bitpos */
1191          complain_overflow_dont, /* complain_on_overflow */
1192          NULL,                  /* special_function */
1193          "R_MIPS_GNU_VTINHERIT", /* name */
1194          false,                 /* partial_inplace */
1195          0,                     /* src_mask */
1196          0,                     /* dst_mask */
1197          false);                /* pcrel_offset */
1198
1199 /* GNU extension to record C++ vtable member usage */
1200 static reloc_howto_type elf_mips_gnu_vtentry_howto =
1201   HOWTO (R_MIPS_GNU_VTENTRY,    /* type */
1202          0,                     /* rightshift */
1203          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1204          0,                     /* bitsize */
1205          false,                 /* pc_relative */
1206          0,                     /* bitpos */
1207          complain_overflow_dont, /* complain_on_overflow */
1208          _bfd_elf_rel_vtable_reloc_fn, /* special_function */
1209          "R_MIPS_GNU_VTENTRY",  /* name */
1210          false,                 /* partial_inplace */
1211          0,                     /* src_mask */
1212          0,                     /* dst_mask */
1213          false);                /* pcrel_offset */
1214 \f
1215 /* Swap in a MIPS 64-bit Rel reloc.  */
1216
1217 static void
1218 mips_elf64_swap_reloc_in (abfd, src, dst)
1219      bfd *abfd;
1220      const Elf64_Mips_External_Rel *src;
1221      Elf64_Mips_Internal_Rel *dst;
1222 {
1223   dst->r_offset = H_GET_64 (abfd, src->r_offset);
1224   dst->r_sym = H_GET_32 (abfd, src->r_sym);
1225   dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1226   dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1227   dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1228   dst->r_type = H_GET_8 (abfd, src->r_type);
1229 }
1230
1231 /* Swap in a MIPS 64-bit Rela reloc.  */
1232
1233 static void
1234 mips_elf64_swap_reloca_in (abfd, src, dst)
1235      bfd *abfd;
1236      const Elf64_Mips_External_Rela *src;
1237      Elf64_Mips_Internal_Rela *dst;
1238 {
1239   dst->r_offset = H_GET_64 (abfd, src->r_offset);
1240   dst->r_sym = H_GET_32 (abfd, src->r_sym);
1241   dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1242   dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1243   dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1244   dst->r_type = H_GET_8 (abfd, src->r_type);
1245   dst->r_addend = H_GET_S64 (abfd, src->r_addend);
1246 }
1247
1248 /* Swap out a MIPS 64-bit Rel reloc.  */
1249
1250 static void
1251 mips_elf64_swap_reloc_out (abfd, src, dst)
1252      bfd *abfd;
1253      const Elf64_Mips_Internal_Rel *src;
1254      Elf64_Mips_External_Rel *dst;
1255 {
1256   H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1257   H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1258   H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1259   H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1260   H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1261   H_PUT_8 (abfd, src->r_type, dst->r_type);
1262 }
1263
1264 /* Swap out a MIPS 64-bit Rela reloc.  */
1265
1266 static void
1267 mips_elf64_swap_reloca_out (abfd, src, dst)
1268      bfd *abfd;
1269      const Elf64_Mips_Internal_Rela *src;
1270      Elf64_Mips_External_Rela *dst;
1271 {
1272   H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1273   H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1274   H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1275   H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1276   H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1277   H_PUT_8 (abfd, src->r_type, dst->r_type);
1278   H_PUT_S64 (abfd, src->r_addend, dst->r_addend);
1279 }
1280
1281 /* Swap in a MIPS 64-bit Rel reloc.  */
1282
1283 static void
1284 mips_elf64_be_swap_reloc_in (abfd, src, dst)
1285      bfd *abfd;
1286      const bfd_byte *src;
1287      Elf_Internal_Rel *dst;
1288 {
1289   Elf64_Mips_Internal_Rel mirel;
1290
1291   mips_elf64_swap_reloc_in (abfd,
1292                             (const Elf64_Mips_External_Rel *) src,
1293                             &mirel);
1294
1295   dst[0].r_offset = mirel.r_offset;
1296   dst[0].r_info = ELF64_R_INFO (mirel.r_sym, mirel.r_type);
1297   dst[1].r_offset = mirel.r_offset;
1298   dst[1].r_info = ELF64_R_INFO (mirel.r_ssym, mirel.r_type2);
1299   dst[2].r_offset = mirel.r_offset;
1300   dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirel.r_type3);
1301 }
1302
1303 /* Swap in a MIPS 64-bit Rela reloc.  */
1304
1305 static void
1306 mips_elf64_be_swap_reloca_in (abfd, src, dst)
1307      bfd *abfd;
1308      const bfd_byte *src;
1309      Elf_Internal_Rela *dst;
1310 {
1311   Elf64_Mips_Internal_Rela mirela;
1312
1313   mips_elf64_swap_reloca_in (abfd,
1314                              (const Elf64_Mips_External_Rela *) src,
1315                              &mirela);
1316
1317   dst[0].r_offset = mirela.r_offset;
1318   dst[0].r_info = ELF64_R_INFO (mirela.r_sym, mirela.r_type);
1319   dst[0].r_addend = mirela.r_addend;
1320   dst[1].r_offset = mirela.r_offset;
1321   dst[1].r_info = ELF64_R_INFO (mirela.r_ssym, mirela.r_type2);
1322   dst[1].r_addend = 0;
1323   dst[2].r_offset = mirela.r_offset;
1324   dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirela.r_type3);
1325   dst[2].r_addend = 0;
1326 }
1327
1328 /* Swap out a MIPS 64-bit Rel reloc.  */
1329
1330 static void
1331 mips_elf64_be_swap_reloc_out (abfd, src, dst)
1332      bfd *abfd;
1333      const Elf_Internal_Rel *src;
1334      bfd_byte *dst;
1335 {
1336   Elf64_Mips_Internal_Rel mirel;
1337
1338   mirel.r_offset = src[0].r_offset;
1339   BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1340 #if 0
1341   BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1342 #endif
1343
1344   mirel.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1345   mirel.r_sym = ELF64_R_SYM (src[0].r_info);
1346   mirel.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1347   mirel.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1348   mirel.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1349
1350   mips_elf64_swap_reloc_out (abfd, &mirel,
1351                              (Elf64_Mips_External_Rel *) dst);
1352 }
1353
1354 /* Swap out a MIPS 64-bit Rela reloc.  */
1355
1356 static void
1357 mips_elf64_be_swap_reloca_out (abfd, src, dst)
1358      bfd *abfd;
1359      const Elf_Internal_Rela *src;
1360      bfd_byte *dst;
1361 {
1362   Elf64_Mips_Internal_Rela mirela;
1363
1364   mirela.r_offset = src[0].r_offset;
1365   BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1366   BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1367
1368   mirela.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1369   mirela.r_sym = ELF64_R_SYM (src[0].r_info);
1370   mirela.r_addend = src[0].r_addend;
1371   BFD_ASSERT(src[1].r_addend == 0);
1372   BFD_ASSERT(src[2].r_addend == 0);
1373
1374   mirela.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1375   mirela.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1376   mirela.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1377
1378   mips_elf64_swap_reloca_out (abfd, &mirela,
1379                               (Elf64_Mips_External_Rela *) dst);
1380 }
1381 \f
1382 /* Do a R_MIPS_HI16 relocation.  */
1383
1384 static bfd_reloc_status_type
1385 mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data, input_section,
1386                        output_bfd, error_message)
1387      bfd *abfd ATTRIBUTE_UNUSED;
1388      arelent *reloc_entry;
1389      asymbol *symbol;
1390      PTR data ATTRIBUTE_UNUSED;
1391      asection *input_section;
1392      bfd *output_bfd;
1393      char **error_message ATTRIBUTE_UNUSED;
1394 {
1395   /* If we're relocating, and this is an external symbol, we don't
1396      want to change anything.  */
1397   if (output_bfd != (bfd *) NULL
1398       && (symbol->flags & BSF_SECTION_SYM) == 0
1399       && (! reloc_entry->howto->partial_inplace
1400           || reloc_entry->addend == 0))
1401     {
1402       reloc_entry->address += input_section->output_offset;
1403       return bfd_reloc_ok;
1404     }
1405
1406   if (((reloc_entry->addend & 0xffff) + 0x8000) & ~0xffff)
1407     reloc_entry->addend += 0x8000;
1408
1409   return bfd_reloc_continue;
1410 }
1411
1412 /* Do a R_MIPS_GOT16 reloc.  This is a reloc against the global offset
1413    table used for PIC code.  If the symbol is an external symbol, the
1414    instruction is modified to contain the offset of the appropriate
1415    entry in the global offset table.  If the symbol is a section
1416    symbol, the next reloc is a R_MIPS_LO16 reloc.  The two 16 bit
1417    addends are combined to form the real addend against the section
1418    symbol; the GOT16 is modified to contain the offset of an entry in
1419    the global offset table, and the LO16 is modified to offset it
1420    appropriately.  Thus an offset larger than 16 bits requires a
1421    modified value in the global offset table.
1422
1423    This implementation suffices for the assembler, but the linker does
1424    not yet know how to create global offset tables.  */
1425
1426 static bfd_reloc_status_type
1427 mips_elf64_got16_reloc (abfd, reloc_entry, symbol, data, input_section,
1428                         output_bfd, error_message)
1429      bfd *abfd;
1430      arelent *reloc_entry;
1431      asymbol *symbol;
1432      PTR data;
1433      asection *input_section;
1434      bfd *output_bfd;
1435      char **error_message;
1436 {
1437   /* If we're relocating, and this is a local symbol, we can handle it
1438      just like an R_MIPS_HI16.  */
1439   if (output_bfd != (bfd *) NULL
1440       && (symbol->flags & BSF_SECTION_SYM) != 0)
1441     return mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data,
1442                                   input_section, output_bfd, error_message);
1443
1444
1445   /* Otherwise we try to handle it as R_MIPS_GOT_DISP.  */
1446   return bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1447                                 input_section, output_bfd, error_message);
1448 }
1449
1450 /* Set the GP value for OUTPUT_BFD.  Returns false if this is a
1451    dangerous relocation.  */
1452
1453 static boolean
1454 mips_elf64_assign_gp (output_bfd, pgp)
1455      bfd *output_bfd;
1456      bfd_vma *pgp;
1457 {
1458   unsigned int count;
1459   asymbol **sym;
1460   unsigned int i;
1461
1462   /* If we've already figured out what GP will be, just return it.  */
1463   *pgp = _bfd_get_gp_value (output_bfd);
1464   if (*pgp)
1465     return true;
1466
1467   count = bfd_get_symcount (output_bfd);
1468   sym = bfd_get_outsymbols (output_bfd);
1469
1470   /* The linker script will have created a symbol named `_gp' with the
1471      appropriate value.  */
1472   if (sym == (asymbol **) NULL)
1473     i = count;
1474   else
1475     {
1476       for (i = 0; i < count; i++, sym++)
1477         {
1478           register const char *name;
1479
1480           name = bfd_asymbol_name (*sym);
1481           if (*name == '_' && strcmp (name, "_gp") == 0)
1482             {
1483               *pgp = bfd_asymbol_value (*sym);
1484               _bfd_set_gp_value (output_bfd, *pgp);
1485               break;
1486             }
1487         }
1488     }
1489
1490   if (i >= count)
1491     {
1492       /* Only get the error once.  */
1493       *pgp = 4;
1494       _bfd_set_gp_value (output_bfd, *pgp);
1495       return false;
1496     }
1497
1498   return true;
1499 }
1500
1501 /* We have to figure out the gp value, so that we can adjust the
1502    symbol value correctly.  We look up the symbol _gp in the output
1503    BFD.  If we can't find it, we're stuck.  We cache it in the ELF
1504    target data.  We don't need to adjust the symbol value for an
1505    external symbol if we are producing relocateable output.  */
1506
1507 static bfd_reloc_status_type
1508 mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message, pgp)
1509      bfd *output_bfd;
1510      asymbol *symbol;
1511      boolean relocateable;
1512      char **error_message;
1513      bfd_vma *pgp;
1514 {
1515   if (bfd_is_und_section (symbol->section)
1516       && ! relocateable)
1517     {
1518       *pgp = 0;
1519       return bfd_reloc_undefined;
1520     }
1521
1522   *pgp = _bfd_get_gp_value (output_bfd);
1523   if (*pgp == 0
1524       && (! relocateable
1525           || (symbol->flags & BSF_SECTION_SYM) != 0))
1526     {
1527       if (relocateable)
1528         {
1529           /* Make up a value.  */
1530           *pgp = symbol->section->output_section->vma /*+ 0x4000*/;
1531           _bfd_set_gp_value (output_bfd, *pgp);
1532         }
1533       else if (!mips_elf64_assign_gp (output_bfd, pgp))
1534         {
1535           *error_message =
1536             (char *) _("GP relative relocation when _gp not defined");
1537           return bfd_reloc_dangerous;
1538         }
1539     }
1540
1541   return bfd_reloc_ok;
1542 }
1543
1544 /* Do a R_MIPS_GPREL16 relocation.  This is a 16 bit value which must
1545    become the offset from the gp register.  */
1546
1547 static bfd_reloc_status_type
1548 mips_elf64_gprel16_reloc (abfd, reloc_entry, symbol, data, input_section,
1549                           output_bfd, error_message)
1550      bfd *abfd;
1551      arelent *reloc_entry;
1552      asymbol *symbol;
1553      PTR data;
1554      asection *input_section;
1555      bfd *output_bfd;
1556      char **error_message;
1557 {
1558   boolean relocateable;
1559   bfd_reloc_status_type ret;
1560   bfd_vma gp;
1561
1562   /* If we're relocating, and this is an external symbol with no
1563      addend, we don't want to change anything.  We will only have an
1564      addend if this is a newly created reloc, not read from an ELF
1565      file.  */
1566   if (output_bfd != (bfd *) NULL
1567       && (symbol->flags & BSF_SECTION_SYM) == 0
1568       && (! reloc_entry->howto->partial_inplace
1569           || reloc_entry->addend == 0))
1570     {
1571       reloc_entry->address += input_section->output_offset;
1572       return bfd_reloc_ok;
1573     }
1574
1575   if (output_bfd != (bfd *) NULL)
1576     relocateable = true;
1577   else
1578     {
1579       relocateable = false;
1580       output_bfd = symbol->section->output_section->owner;
1581     }
1582
1583   ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1584                              &gp);
1585   if (ret != bfd_reloc_ok)
1586     return ret;
1587
1588   return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1589                                         input_section, relocateable,
1590                                         data, gp);
1591 }
1592
1593 /* Do a R_MIPS_LITERAL relocation.  */
1594
1595 static bfd_reloc_status_type
1596 mips_elf64_literal_reloc (abfd, reloc_entry, symbol, data, input_section,
1597                           output_bfd, error_message)
1598      bfd *abfd;
1599      arelent *reloc_entry;
1600      asymbol *symbol;
1601      PTR data;
1602      asection *input_section;
1603      bfd *output_bfd;
1604      char **error_message;
1605 {
1606   boolean relocateable;
1607   bfd_reloc_status_type ret;
1608   bfd_vma gp;
1609
1610   /* If we're relocating, and this is an external symbol, we don't
1611      want to change anything.  */
1612   if (output_bfd != (bfd *) NULL
1613       && (symbol->flags & BSF_SECTION_SYM) == 0
1614       && (! reloc_entry->howto->partial_inplace
1615           || reloc_entry->addend == 0))
1616     {
1617       reloc_entry->address += input_section->output_offset;
1618       return bfd_reloc_ok;
1619     }
1620
1621   /* FIXME: The entries in the .lit8 and .lit4 sections should be merged.  */
1622   if (output_bfd != (bfd *) NULL)
1623     relocateable = true;
1624   else
1625     {
1626       relocateable = false;
1627       output_bfd = symbol->section->output_section->owner;
1628     }
1629
1630   ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1631                              &gp);
1632   if (ret != bfd_reloc_ok)
1633     return ret;
1634
1635   return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1636                                         input_section, relocateable,
1637                                         data, gp);
1638 }
1639
1640 /* Do a R_MIPS_GPREL32 relocation.  This is a 32 bit value which must
1641    become the offset from the gp register.  */
1642
1643 static bfd_reloc_status_type
1644 mips_elf64_gprel32_reloc (abfd, reloc_entry, symbol, data, input_section,
1645                           output_bfd, error_message)
1646      bfd *abfd;
1647      arelent *reloc_entry;
1648      asymbol *symbol;
1649      PTR data;
1650      asection *input_section;
1651      bfd *output_bfd;
1652      char **error_message;
1653 {
1654   boolean relocateable;
1655   bfd_reloc_status_type ret;
1656   bfd_vma gp;
1657   bfd_vma relocation;
1658   unsigned long val;
1659
1660   /* If we're relocating, and this is an external symbol with no
1661      addend, we don't want to change anything.  We will only have an
1662      addend if this is a newly created reloc, not read from an ELF
1663      file.  */
1664   if (output_bfd != (bfd *) NULL
1665       && (symbol->flags & BSF_SECTION_SYM) == 0
1666       && reloc_entry->addend == 0)
1667     {
1668       *error_message = (char *)
1669         _("32bits gp relative relocation occurs for an external symbol");
1670       return bfd_reloc_outofrange;
1671     }
1672
1673   if (output_bfd != (bfd *) NULL)
1674     {
1675       relocateable = true;
1676       gp = _bfd_get_gp_value (output_bfd);
1677     }
1678   else
1679     {
1680       relocateable = false;
1681       output_bfd = symbol->section->output_section->owner;
1682
1683       ret = mips_elf64_final_gp (output_bfd, symbol, relocateable,
1684                                  error_message, &gp);
1685       if (ret != bfd_reloc_ok)
1686         return ret;
1687     }
1688
1689   if (bfd_is_com_section (symbol->section))
1690     relocation = 0;
1691   else
1692     relocation = symbol->value;
1693
1694   relocation += symbol->section->output_section->vma;
1695   relocation += symbol->section->output_offset;
1696
1697   if (reloc_entry->address > input_section->_cooked_size)
1698     return bfd_reloc_outofrange;
1699
1700   if (reloc_entry->howto->src_mask == 0)
1701     {
1702       /* This case arises with the 64-bit MIPS ELF ABI.  */
1703       val = 0;
1704     }
1705   else
1706     val = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1707
1708   /* Set val to the offset into the section or symbol.  */
1709   val += reloc_entry->addend;
1710
1711   /* Adjust val for the final section location and GP value.  If we
1712      are producing relocateable output, we don't want to do this for
1713      an external symbol.  */
1714   if (! relocateable
1715       || (symbol->flags & BSF_SECTION_SYM) != 0)
1716     val += relocation - gp;
1717
1718   bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
1719
1720   if (relocateable)
1721     reloc_entry->address += input_section->output_offset;
1722
1723   return bfd_reloc_ok;
1724 }
1725
1726 /* Do a R_MIPS_SHIFT6 relocation. The MSB of the shift is stored at bit 2,
1727    the rest is at bits 6-10. The bitpos already got right by the howto.  */
1728
1729 static bfd_reloc_status_type
1730 mips_elf64_shift6_reloc (abfd, reloc_entry, symbol, data, input_section,
1731                          output_bfd, error_message)
1732      bfd *abfd ATTRIBUTE_UNUSED;
1733      arelent *reloc_entry;
1734      asymbol *symbol;
1735      PTR data ATTRIBUTE_UNUSED;
1736      asection *input_section;
1737      bfd *output_bfd;
1738      char **error_message ATTRIBUTE_UNUSED;
1739 {
1740   /* If we're relocating, and this is an external symbol, we don't
1741      want to change anything.  */
1742   if (output_bfd != (bfd *) NULL
1743       && (symbol->flags & BSF_SECTION_SYM) == 0
1744       && (! reloc_entry->howto->partial_inplace
1745           || reloc_entry->addend == 0))
1746     {
1747       reloc_entry->address += input_section->output_offset;
1748       return bfd_reloc_ok;
1749     }
1750
1751   reloc_entry->addend = (reloc_entry->addend & 0x00007c0)
1752                         | (reloc_entry->addend & 0x00000800) >> 9;
1753
1754   return bfd_reloc_continue;
1755 }
1756
1757 /* Handle a mips16 jump.  */
1758
1759 static bfd_reloc_status_type
1760 mips16_jump_reloc (abfd, reloc_entry, symbol, data, input_section,
1761                    output_bfd, error_message)
1762      bfd *abfd ATTRIBUTE_UNUSED;
1763      arelent *reloc_entry;
1764      asymbol *symbol;
1765      PTR data ATTRIBUTE_UNUSED;
1766      asection *input_section;
1767      bfd *output_bfd;
1768      char **error_message ATTRIBUTE_UNUSED;
1769 {
1770   if (output_bfd != (bfd *) NULL
1771       && (symbol->flags & BSF_SECTION_SYM) == 0
1772       && (! reloc_entry->howto->partial_inplace
1773           || reloc_entry->addend == 0))
1774     {
1775       reloc_entry->address += input_section->output_offset;
1776       return bfd_reloc_ok;
1777     }
1778
1779   /* FIXME.  */
1780   {
1781     static boolean warned;
1782
1783     if (! warned)
1784       (*_bfd_error_handler)
1785         (_("Linking mips16 objects into %s format is not supported"),
1786          bfd_get_target (input_section->output_section->owner));
1787     warned = true;
1788   }
1789
1790   return bfd_reloc_undefined;
1791 }
1792
1793 /* Handle a mips16 GP relative reloc.  */
1794
1795 static bfd_reloc_status_type
1796 mips16_gprel_reloc (abfd, reloc_entry, symbol, data, input_section,
1797                     output_bfd, error_message)
1798      bfd *abfd;
1799      arelent *reloc_entry;
1800      asymbol *symbol;
1801      PTR data;
1802      asection *input_section;
1803      bfd *output_bfd;
1804      char **error_message;
1805 {
1806   boolean relocateable;
1807   bfd_reloc_status_type ret;
1808   bfd_vma gp;
1809   unsigned short extend, insn;
1810   unsigned long final;
1811
1812   /* If we're relocating, and this is an external symbol with no
1813      addend, we don't want to change anything.  We will only have an
1814      addend if this is a newly created reloc, not read from an ELF
1815      file.  */
1816   if (output_bfd != NULL
1817       && (symbol->flags & BSF_SECTION_SYM) == 0
1818       && reloc_entry->addend == 0)
1819     {
1820       reloc_entry->address += input_section->output_offset;
1821       return bfd_reloc_ok;
1822     }
1823
1824   if (output_bfd != NULL)
1825     relocateable = true;
1826   else
1827     {
1828       relocateable = false;
1829       output_bfd = symbol->section->output_section->owner;
1830     }
1831
1832   ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1833                              &gp);
1834   if (ret != bfd_reloc_ok)
1835     return ret;
1836
1837   if (reloc_entry->address > input_section->_cooked_size)
1838     return bfd_reloc_outofrange;
1839
1840   /* Pick up the mips16 extend instruction and the real instruction.  */
1841   extend = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
1842   insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address + 2);
1843
1844   /* Stuff the current addend back as a 32 bit value, do the usual
1845      relocation, and then clean up.  */
1846   bfd_put_32 (abfd,
1847               (bfd_vma) (((extend & 0x1f) << 11)
1848                          | (extend & 0x7e0)
1849                          | (insn & 0x1f)),
1850               (bfd_byte *) data + reloc_entry->address);
1851
1852   ret = _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1853                                        input_section, relocateable, data, gp);
1854
1855   final = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1856   bfd_put_16 (abfd,
1857               (bfd_vma) ((extend & 0xf800)
1858                          | ((final >> 11) & 0x1f)
1859                          | (final & 0x7e0)),
1860               (bfd_byte *) data + reloc_entry->address);
1861   bfd_put_16 (abfd,
1862               (bfd_vma) ((insn & 0xffe0)
1863                          | (final & 0x1f)),
1864               (bfd_byte *) data + reloc_entry->address + 2);
1865
1866   return ret;
1867 }
1868 \f
1869 /* A mapping from BFD reloc types to MIPS ELF reloc types.  */
1870
1871 struct elf_reloc_map {
1872   bfd_reloc_code_real_type bfd_val;
1873   enum elf_mips_reloc_type elf_val;
1874 };
1875
1876 static const struct elf_reloc_map mips_reloc_map[] =
1877 {
1878   { BFD_RELOC_NONE, R_MIPS_NONE },
1879   { BFD_RELOC_16, R_MIPS_16 },
1880   { BFD_RELOC_32, R_MIPS_32 },
1881   /* There is no BFD reloc for R_MIPS_REL32.  */
1882   { BFD_RELOC_64, R_MIPS_64 },
1883   { BFD_RELOC_CTOR, R_MIPS_64 },
1884   { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1885   { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1886   { BFD_RELOC_LO16, R_MIPS_LO16 },
1887   { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1888   { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1889   { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1890   { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1891   { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1892   { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1893   { BFD_RELOC_MIPS_SHIFT5, R_MIPS_SHIFT5 },
1894   { BFD_RELOC_MIPS_SHIFT6, R_MIPS_SHIFT6 },
1895   { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP },
1896   { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1897   { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1898   { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1899   { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1900   { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1901   { BFD_RELOC_MIPS_INSERT_A, R_MIPS_INSERT_A },
1902   { BFD_RELOC_MIPS_INSERT_B, R_MIPS_INSERT_B },
1903   { BFD_RELOC_MIPS_DELETE, R_MIPS_DELETE },
1904   { BFD_RELOC_MIPS_HIGHEST, R_MIPS_HIGHEST },
1905   { BFD_RELOC_MIPS_HIGHER, R_MIPS_HIGHER },
1906   { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1907   { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1908   { BFD_RELOC_MIPS_SCN_DISP, R_MIPS_SCN_DISP },
1909   { BFD_RELOC_MIPS_REL16, R_MIPS_REL16 },
1910   /* Use of R_MIPS_ADD_IMMEDIATE and R_MIPS_PJUMP is deprecated.  */
1911   { BFD_RELOC_MIPS_RELGOT, R_MIPS_RELGOT },
1912   { BFD_RELOC_MIPS_JALR, R_MIPS_JALR }
1913 };
1914
1915 /* Given a BFD reloc type, return a howto structure.  */
1916
1917 static reloc_howto_type *
1918 bfd_elf64_bfd_reloc_type_lookup (abfd, code)
1919      bfd *abfd ATTRIBUTE_UNUSED;
1920      bfd_reloc_code_real_type code;
1921 {
1922   unsigned int i;
1923   /* FIXME: We default to RELA here instead of choosing the right
1924      relocation variant.  */
1925   reloc_howto_type *howto_table = mips_elf64_howto_table_rela;
1926
1927   for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1928        i++)
1929     {
1930       if (mips_reloc_map[i].bfd_val == code)
1931         return &howto_table[(int) mips_reloc_map[i].elf_val];
1932     }
1933
1934   switch (code)
1935     {
1936     case BFD_RELOC_MIPS16_JMP:
1937       return &elf_mips16_jump_howto;
1938     case BFD_RELOC_MIPS16_GPREL:
1939       return &elf_mips16_gprel_howto;
1940     case BFD_RELOC_VTABLE_INHERIT:
1941       return &elf_mips_gnu_vtinherit_howto;
1942     case BFD_RELOC_VTABLE_ENTRY:
1943       return &elf_mips_gnu_vtentry_howto;
1944     default:
1945       bfd_set_error (bfd_error_bad_value);
1946       return NULL;
1947     }
1948 }
1949
1950 /* Given a MIPS Elf64_Internal_Rel, fill in an arelent structure.  */
1951
1952 static reloc_howto_type *
1953 mips_elf64_rtype_to_howto (r_type, rela_p)
1954      unsigned int r_type;
1955      boolean rela_p;
1956 {
1957   switch (r_type)
1958     {
1959     case R_MIPS16_26:
1960       return &elf_mips16_jump_howto;
1961     case R_MIPS16_GPREL:
1962       return &elf_mips16_gprel_howto;
1963     case R_MIPS_GNU_VTINHERIT:
1964       return &elf_mips_gnu_vtinherit_howto;
1965     case R_MIPS_GNU_VTENTRY:
1966       return &elf_mips_gnu_vtentry_howto;
1967     default:
1968       BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1969       if (rela_p)
1970         return &mips_elf64_howto_table_rela[r_type];
1971       else
1972         return &mips_elf64_howto_table_rel[r_type];
1973       break;
1974     }
1975 }
1976
1977 /* Prevent relocation handling by bfd for MIPS ELF64.  */
1978
1979 static void
1980 mips_elf64_info_to_howto_rel (abfd, cache_ptr, dst)
1981      bfd *abfd ATTRIBUTE_UNUSED;
1982      arelent *cache_ptr ATTRIBUTE_UNUSED;
1983      Elf64_Internal_Rel *dst ATTRIBUTE_UNUSED;
1984 {
1985   BFD_ASSERT (0);
1986 }
1987
1988 static void
1989 mips_elf64_info_to_howto_rela (abfd, cache_ptr, dst)
1990      bfd *abfd ATTRIBUTE_UNUSED;
1991      arelent *cache_ptr ATTRIBUTE_UNUSED;
1992      Elf64_Internal_Rela *dst ATTRIBUTE_UNUSED;
1993 {
1994   BFD_ASSERT (0);
1995 }
1996
1997 /* Since each entry in an SHT_REL or SHT_RELA section can represent up
1998    to three relocs, we must tell the user to allocate more space.  */
1999
2000 static long
2001 mips_elf64_get_reloc_upper_bound (abfd, sec)
2002      bfd *abfd ATTRIBUTE_UNUSED;
2003      asection *sec;
2004 {
2005   return (sec->reloc_count * 3 + 1) * sizeof (arelent *);
2006 }
2007
2008 /* Read the relocations from one reloc section.  */
2009
2010 static boolean
2011 mips_elf64_slurp_one_reloc_table (abfd, asect, symbols, rel_hdr)
2012      bfd *abfd;
2013      asection *asect;
2014      asymbol **symbols;
2015      const Elf_Internal_Shdr *rel_hdr;
2016 {
2017   PTR allocated = NULL;
2018   bfd_byte *native_relocs;
2019   arelent *relents;
2020   arelent *relent;
2021   bfd_vma count;
2022   bfd_vma i;
2023   int entsize;
2024   reloc_howto_type *howto_table;
2025
2026   allocated = (PTR) bfd_malloc (rel_hdr->sh_size);
2027   if (allocated == NULL)
2028     return false;
2029
2030   if (bfd_seek (abfd, rel_hdr->sh_offset, SEEK_SET) != 0
2031       || (bfd_bread (allocated, rel_hdr->sh_size, abfd) != rel_hdr->sh_size))
2032     goto error_return;
2033
2034   native_relocs = (bfd_byte *) allocated;
2035
2036   relents = asect->relocation + asect->reloc_count;
2037
2038   entsize = rel_hdr->sh_entsize;
2039   BFD_ASSERT (entsize == sizeof (Elf64_Mips_External_Rel)
2040               || entsize == sizeof (Elf64_Mips_External_Rela));
2041
2042   count = rel_hdr->sh_size / entsize;
2043
2044   if (entsize == sizeof (Elf64_Mips_External_Rel))
2045     howto_table = mips_elf64_howto_table_rel;
2046   else
2047     howto_table = mips_elf64_howto_table_rela;
2048
2049   relent = relents;
2050   for (i = 0; i < count; i++, native_relocs += entsize)
2051     {
2052       Elf64_Mips_Internal_Rela rela;
2053       boolean used_sym, used_ssym;
2054       int ir;
2055
2056       if (entsize == sizeof (Elf64_Mips_External_Rela))
2057         mips_elf64_swap_reloca_in (abfd,
2058                                    (Elf64_Mips_External_Rela *) native_relocs,
2059                                    &rela);
2060       else
2061         {
2062           Elf64_Mips_Internal_Rel rel;
2063
2064           mips_elf64_swap_reloc_in (abfd,
2065                                     (Elf64_Mips_External_Rel *) native_relocs,
2066                                     &rel);
2067           rela.r_offset = rel.r_offset;
2068           rela.r_sym = rel.r_sym;
2069           rela.r_ssym = rel.r_ssym;
2070           rela.r_type3 = rel.r_type3;
2071           rela.r_type2 = rel.r_type2;
2072           rela.r_type = rel.r_type;
2073           rela.r_addend = 0;
2074         }
2075
2076       /* Each entry represents up to three actual relocations.  */
2077
2078       used_sym = false;
2079       used_ssym = false;
2080       for (ir = 0; ir < 3; ir++)
2081         {
2082           enum elf_mips_reloc_type type;
2083
2084           switch (ir)
2085             {
2086             default:
2087               abort ();
2088             case 0:
2089               type = (enum elf_mips_reloc_type) rela.r_type;
2090               break;
2091             case 1:
2092               type = (enum elf_mips_reloc_type) rela.r_type2;
2093               break;
2094             case 2:
2095               type = (enum elf_mips_reloc_type) rela.r_type3;
2096               break;
2097             }
2098
2099           if (type == R_MIPS_NONE)
2100             {
2101               /* There are no more relocations in this entry.  If this
2102                  is the first entry, we need to generate a dummy
2103                  relocation so that the generic linker knows that
2104                  there has been a break in the sequence of relocations
2105                  applying to a particular address.  */
2106               if (ir == 0)
2107                 {
2108                   relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2109                   if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2110                     relent->address = rela.r_offset;
2111                   else
2112                     relent->address = rela.r_offset - asect->vma;
2113                   relent->addend = 0;
2114                   relent->howto = &howto_table[(int) R_MIPS_NONE];
2115                   ++relent;
2116                 }
2117               break;
2118             }
2119
2120           /* Some types require symbols, whereas some do not.  */
2121           switch (type)
2122             {
2123             case R_MIPS_NONE:
2124             case R_MIPS_LITERAL:
2125             case R_MIPS_INSERT_A:
2126             case R_MIPS_INSERT_B:
2127             case R_MIPS_DELETE:
2128               relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2129               break;
2130
2131             default:
2132               if (! used_sym)
2133                 {
2134                   if (rela.r_sym == 0)
2135                     relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2136                   else
2137                     {
2138                       asymbol **ps, *s;
2139
2140                       ps = symbols + rela.r_sym - 1;
2141                       s = *ps;
2142                       if ((s->flags & BSF_SECTION_SYM) == 0)
2143                         relent->sym_ptr_ptr = ps;
2144                       else
2145                         relent->sym_ptr_ptr = s->section->symbol_ptr_ptr;
2146                     }
2147
2148                   used_sym = true;
2149                 }
2150               else if (! used_ssym)
2151                 {
2152                   switch (rela.r_ssym)
2153                     {
2154                     case RSS_UNDEF:
2155                       relent->sym_ptr_ptr =
2156                         bfd_abs_section_ptr->symbol_ptr_ptr;
2157                       break;
2158
2159                     case RSS_GP:
2160                     case RSS_GP0:
2161                     case RSS_LOC:
2162                       /* FIXME: I think these need to be handled using
2163                          special howto structures.  */
2164                       BFD_ASSERT (0);
2165                       break;
2166
2167                     default:
2168                       BFD_ASSERT (0);
2169                       break;
2170                     }
2171
2172                   used_ssym = true;
2173                 }
2174               else
2175                 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2176
2177               break;
2178             }
2179
2180           /* The address of an ELF reloc is section relative for an
2181              object file, and absolute for an executable file or
2182              shared library.  The address of a BFD reloc is always
2183              section relative.  */
2184           if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2185             relent->address = rela.r_offset;
2186           else
2187             relent->address = rela.r_offset - asect->vma;
2188
2189           relent->addend = rela.r_addend;
2190
2191           relent->howto = &howto_table[(int) type];
2192
2193           ++relent;
2194         }
2195     }
2196
2197   asect->reloc_count += relent - relents;
2198
2199   if (allocated != NULL)
2200     free (allocated);
2201
2202   return true;
2203
2204  error_return:
2205   if (allocated != NULL)
2206     free (allocated);
2207   return false;
2208 }
2209
2210 /* Read the relocations.  On Irix 6, there can be two reloc sections
2211    associated with a single data section.  */
2212
2213 static boolean
2214 mips_elf64_slurp_reloc_table (abfd, asect, symbols, dynamic)
2215      bfd *abfd;
2216      asection *asect;
2217      asymbol **symbols;
2218      boolean dynamic;
2219 {
2220   bfd_size_type amt;
2221   struct bfd_elf_section_data * const d = elf_section_data (asect);
2222
2223   if (dynamic)
2224     {
2225       bfd_set_error (bfd_error_invalid_operation);
2226       return false;
2227     }
2228
2229   if (asect->relocation != NULL
2230       || (asect->flags & SEC_RELOC) == 0
2231       || asect->reloc_count == 0)
2232     return true;
2233
2234   /* Allocate space for 3 arelent structures for each Rel structure.  */
2235   amt = asect->reloc_count;
2236   amt *= 3 * sizeof (arelent);
2237   asect->relocation = (arelent *) bfd_alloc (abfd, amt);
2238   if (asect->relocation == NULL)
2239     return false;
2240
2241   /* The slurp_one_reloc_table routine increments reloc_count.  */
2242   asect->reloc_count = 0;
2243
2244   if (! mips_elf64_slurp_one_reloc_table (abfd, asect, symbols, &d->rel_hdr))
2245     return false;
2246   if (d->rel_hdr2 != NULL)
2247     {
2248       if (! mips_elf64_slurp_one_reloc_table (abfd, asect, symbols,
2249                                               d->rel_hdr2))
2250         return false;
2251     }
2252
2253   return true;
2254 }
2255
2256 /* Write out the relocations.  */
2257
2258 static void
2259 mips_elf64_write_relocs (abfd, sec, data)
2260      bfd *abfd;
2261      asection *sec;
2262      PTR data;
2263 {
2264   boolean *failedp = (boolean *) data;
2265   int count;
2266   Elf_Internal_Shdr *rel_hdr;
2267   unsigned int idx;
2268
2269   /* If we have already failed, don't do anything.  */
2270   if (*failedp)
2271     return;
2272
2273   if ((sec->flags & SEC_RELOC) == 0)
2274     return;
2275
2276   /* The linker backend writes the relocs out itself, and sets the
2277      reloc_count field to zero to inhibit writing them here.  Also,
2278      sometimes the SEC_RELOC flag gets set even when there aren't any
2279      relocs.  */
2280   if (sec->reloc_count == 0)
2281     return;
2282
2283   /* We can combine up to three relocs that refer to the same address
2284      if the latter relocs have no associated symbol.  */
2285   count = 0;
2286   for (idx = 0; idx < sec->reloc_count; idx++)
2287     {
2288       bfd_vma addr;
2289       unsigned int i;
2290
2291       ++count;
2292
2293       addr = sec->orelocation[idx]->address;
2294       for (i = 0; i < 2; i++)
2295         {
2296           arelent *r;
2297
2298           if (idx + 1 >= sec->reloc_count)
2299             break;
2300           r = sec->orelocation[idx + 1];
2301           if (r->address != addr
2302               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2303               || (*r->sym_ptr_ptr)->value != 0)
2304             break;
2305
2306           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2307
2308           ++idx;
2309         }
2310     }
2311
2312   rel_hdr = &elf_section_data (sec)->rel_hdr;
2313
2314   /* Do the actual relocation.  */
2315
2316   if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rel))
2317     mips_elf64_write_rel (abfd, sec, rel_hdr, &count, data);
2318   else if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rela))
2319     mips_elf64_write_rela (abfd, sec, rel_hdr, &count, data);
2320   else
2321     BFD_ASSERT (0);
2322 }
2323
2324 static void
2325 mips_elf64_write_rel (abfd, sec, rel_hdr, count, data)
2326      bfd *abfd;
2327      asection *sec;
2328      Elf_Internal_Shdr *rel_hdr;
2329      int *count;
2330      PTR data;
2331 {
2332   boolean *failedp = (boolean *) data;
2333   Elf64_Mips_External_Rel *ext_rel;
2334   unsigned int idx;
2335   asymbol *last_sym = 0;
2336   int last_sym_idx = 0;
2337
2338   rel_hdr->sh_size = (bfd_vma)(rel_hdr->sh_entsize * *count);
2339   rel_hdr->contents = (PTR) bfd_alloc (abfd, rel_hdr->sh_size);
2340   if (rel_hdr->contents == NULL)
2341     {
2342       *failedp = true;
2343       return;
2344     }
2345
2346   ext_rel = (Elf64_Mips_External_Rel *) rel_hdr->contents;
2347   for (idx = 0; idx < sec->reloc_count; idx++, ext_rel++)
2348     {
2349       arelent *ptr;
2350       Elf64_Mips_Internal_Rel int_rel;
2351       asymbol *sym;
2352       int n;
2353       unsigned int i;
2354
2355       ptr = sec->orelocation[idx];
2356
2357       /* The address of an ELF reloc is section relative for an object
2358          file, and absolute for an executable file or shared library.
2359          The address of a BFD reloc is always section relative.  */
2360       if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2361         int_rel.r_offset = ptr->address;
2362       else
2363         int_rel.r_offset = ptr->address + sec->vma;
2364
2365       sym = *ptr->sym_ptr_ptr;
2366       if (sym == last_sym)
2367         n = last_sym_idx;
2368       else
2369         {
2370           last_sym = sym;
2371           n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2372           if (n < 0)
2373             {
2374               *failedp = true;
2375               return;
2376             }
2377           last_sym_idx = n;
2378         }
2379
2380       int_rel.r_sym = n;
2381       int_rel.r_ssym = RSS_UNDEF;
2382
2383       if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2384           && ! _bfd_elf_validate_reloc (abfd, ptr))
2385         {
2386           *failedp = true;
2387           return;
2388         }
2389
2390       int_rel.r_type = ptr->howto->type;
2391       int_rel.r_type2 = (int) R_MIPS_NONE;
2392       int_rel.r_type3 = (int) R_MIPS_NONE;
2393
2394       for (i = 0; i < 2; i++)
2395         {
2396           arelent *r;
2397
2398           if (idx + 1 >= sec->reloc_count)
2399             break;
2400           r = sec->orelocation[idx + 1];
2401           if (r->address != ptr->address
2402               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2403               || (*r->sym_ptr_ptr)->value != 0)
2404             break;
2405
2406           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2407
2408           if (i == 0)
2409             int_rel.r_type2 = r->howto->type;
2410           else
2411             int_rel.r_type3 = r->howto->type;
2412
2413           ++idx;
2414         }
2415
2416       mips_elf64_swap_reloc_out (abfd, &int_rel, ext_rel);
2417     }
2418
2419   BFD_ASSERT (ext_rel - (Elf64_Mips_External_Rel *) rel_hdr->contents
2420               == *count);
2421 }
2422
2423 static void
2424 mips_elf64_write_rela (abfd, sec, rela_hdr, count, data)
2425      bfd *abfd;
2426      asection *sec;
2427      Elf_Internal_Shdr *rela_hdr;
2428      int *count;
2429      PTR data;
2430 {
2431   boolean *failedp = (boolean *) data;
2432   Elf64_Mips_External_Rela *ext_rela;
2433   unsigned int idx;
2434   asymbol *last_sym = 0;
2435   int last_sym_idx = 0;
2436
2437   rela_hdr->sh_size = (bfd_vma)(rela_hdr->sh_entsize * *count);
2438   rela_hdr->contents = (PTR) bfd_alloc (abfd, rela_hdr->sh_size);
2439   if (rela_hdr->contents == NULL)
2440     {
2441       *failedp = true;
2442       return;
2443     }
2444
2445   ext_rela = (Elf64_Mips_External_Rela *) rela_hdr->contents;
2446   for (idx = 0; idx < sec->reloc_count; idx++, ext_rela++)
2447     {
2448       arelent *ptr;
2449       Elf64_Mips_Internal_Rela int_rela;
2450       asymbol *sym;
2451       int n;
2452       unsigned int i;
2453
2454       ptr = sec->orelocation[idx];
2455
2456       /* The address of an ELF reloc is section relative for an object
2457          file, and absolute for an executable file or shared library.
2458          The address of a BFD reloc is always section relative.  */
2459       if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2460         int_rela.r_offset = ptr->address;
2461       else
2462         int_rela.r_offset = ptr->address + sec->vma;
2463
2464       sym = *ptr->sym_ptr_ptr;
2465       if (sym == last_sym)
2466         n = last_sym_idx;
2467       else
2468         {
2469           last_sym = sym;
2470           n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2471           if (n < 0)
2472             {
2473               *failedp = true;
2474               return;
2475             }
2476           last_sym_idx = n;
2477         }
2478
2479       int_rela.r_sym = n;
2480       int_rela.r_addend = ptr->addend;
2481       int_rela.r_ssym = RSS_UNDEF;
2482
2483       if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2484           && ! _bfd_elf_validate_reloc (abfd, ptr))
2485         {
2486           *failedp = true;
2487           return;
2488         }
2489
2490       int_rela.r_type = ptr->howto->type;
2491       int_rela.r_type2 = (int) R_MIPS_NONE;
2492       int_rela.r_type3 = (int) R_MIPS_NONE;
2493
2494       for (i = 0; i < 2; i++)
2495         {
2496           arelent *r;
2497
2498           if (idx + 1 >= sec->reloc_count)
2499             break;
2500           r = sec->orelocation[idx + 1];
2501           if (r->address != ptr->address
2502               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2503               || (*r->sym_ptr_ptr)->value != 0)
2504             break;
2505
2506           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2507
2508           if (i == 0)
2509             int_rela.r_type2 = r->howto->type;
2510           else
2511             int_rela.r_type3 = r->howto->type;
2512
2513           ++idx;
2514         }
2515
2516       mips_elf64_swap_reloca_out (abfd, &int_rela, ext_rela);
2517     }
2518
2519   BFD_ASSERT (ext_rela - (Elf64_Mips_External_Rela *) rela_hdr->contents
2520               == *count);
2521 }
2522 \f
2523 /* Set the right machine number for a MIPS ELF file.  */
2524
2525 static boolean
2526 mips_elf64_object_p (abfd)
2527      bfd *abfd;
2528 {
2529   unsigned long mach;
2530
2531   /* Irix 6 is broken.  Object file symbol tables are not always
2532      sorted correctly such that local symbols precede global symbols,
2533      and the sh_info field in the symbol table is not always right.  */
2534   if (elf64_mips_irix_compat (abfd) != ict_none)
2535     elf_bad_symtab (abfd) = true;
2536
2537   mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
2538   bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
2539   return true;
2540 }
2541
2542 /* Depending on the target vector we generate some version of Irix
2543    executables or "normal" MIPS ELF ABI executables.  */
2544 static irix_compat_t
2545 elf64_mips_irix_compat (abfd)
2546      bfd *abfd;
2547 {
2548   if ((abfd->xvec == &bfd_elf64_bigmips_vec)
2549       || (abfd->xvec == &bfd_elf64_littlemips_vec))
2550     return ict_irix6;
2551   else
2552     return ict_none;
2553 }
2554 \f
2555 /* ECOFF swapping routines.  These are used when dealing with the
2556    .mdebug section, which is in the ECOFF debugging format.  */
2557 static const struct ecoff_debug_swap mips_elf64_ecoff_debug_swap =
2558 {
2559   /* Symbol table magic number.  */
2560   magicSym2,
2561   /* Alignment of debugging information.  E.g., 4.  */
2562   8,
2563   /* Sizes of external symbolic information.  */
2564   sizeof (struct hdr_ext),
2565   sizeof (struct dnr_ext),
2566   sizeof (struct pdr_ext),
2567   sizeof (struct sym_ext),
2568   sizeof (struct opt_ext),
2569   sizeof (struct fdr_ext),
2570   sizeof (struct rfd_ext),
2571   sizeof (struct ext_ext),
2572   /* Functions to swap in external symbolic data.  */
2573   ecoff_swap_hdr_in,
2574   ecoff_swap_dnr_in,
2575   ecoff_swap_pdr_in,
2576   ecoff_swap_sym_in,
2577   ecoff_swap_opt_in,
2578   ecoff_swap_fdr_in,
2579   ecoff_swap_rfd_in,
2580   ecoff_swap_ext_in,
2581   _bfd_ecoff_swap_tir_in,
2582   _bfd_ecoff_swap_rndx_in,
2583   /* Functions to swap out external symbolic data.  */
2584   ecoff_swap_hdr_out,
2585   ecoff_swap_dnr_out,
2586   ecoff_swap_pdr_out,
2587   ecoff_swap_sym_out,
2588   ecoff_swap_opt_out,
2589   ecoff_swap_fdr_out,
2590   ecoff_swap_rfd_out,
2591   ecoff_swap_ext_out,
2592   _bfd_ecoff_swap_tir_out,
2593   _bfd_ecoff_swap_rndx_out,
2594   /* Function to read in symbolic data.  */
2595   _bfd_mips_elf_read_ecoff_info
2596 };
2597 \f
2598 /* Relocations in the 64 bit MIPS ELF ABI are more complex than in
2599    standard ELF.  This structure is used to redirect the relocation
2600    handling routines.  */
2601
2602 const struct elf_size_info mips_elf64_size_info =
2603 {
2604   sizeof (Elf64_External_Ehdr),
2605   sizeof (Elf64_External_Phdr),
2606   sizeof (Elf64_External_Shdr),
2607   sizeof (Elf64_Mips_External_Rel),
2608   sizeof (Elf64_Mips_External_Rela),
2609   sizeof (Elf64_External_Sym),
2610   sizeof (Elf64_External_Dyn),
2611   sizeof (Elf_External_Note),
2612   4,            /* hash-table entry size */
2613   3,            /* internal relocations per external relocations */
2614   64,           /* arch_size */
2615   8,            /* file_align */
2616   ELFCLASS64,
2617   EV_CURRENT,
2618   bfd_elf64_write_out_phdrs,
2619   bfd_elf64_write_shdrs_and_ehdr,
2620   mips_elf64_write_relocs,
2621   bfd_elf64_swap_symbol_in,
2622   bfd_elf64_swap_symbol_out,
2623   mips_elf64_slurp_reloc_table,
2624   bfd_elf64_slurp_symbol_table,
2625   bfd_elf64_swap_dyn_in,
2626   bfd_elf64_swap_dyn_out,
2627   mips_elf64_be_swap_reloc_in,
2628   mips_elf64_be_swap_reloc_out,
2629   mips_elf64_be_swap_reloca_in,
2630   mips_elf64_be_swap_reloca_out
2631 };
2632
2633 #define ELF_ARCH                        bfd_arch_mips
2634 #define ELF_MACHINE_CODE                EM_MIPS
2635
2636 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
2637    a value of 0x1000, and we are compatible.
2638    FIXME: How does this affect NewABI?  */
2639 #define ELF_MAXPAGESIZE                 0x1000
2640
2641 #define elf_backend_collect             true
2642 #define elf_backend_type_change_ok      true
2643 #define elf_backend_can_gc_sections     true
2644 #define elf_info_to_howto               mips_elf64_info_to_howto_rela
2645 #define elf_info_to_howto_rel           mips_elf64_info_to_howto_rel
2646 #define elf_backend_object_p            mips_elf64_object_p
2647 #define elf_backend_symbol_processing   _bfd_mips_elf_symbol_processing
2648 #define elf_backend_section_processing  _bfd_mips_elf_section_processing
2649 #define elf_backend_section_from_shdr   _bfd_mips_elf_section_from_shdr
2650 #define elf_backend_fake_sections       _bfd_mips_elf_fake_sections
2651 #define elf_backend_section_from_bfd_section \
2652                                 _bfd_mips_elf_section_from_bfd_section
2653 #define elf_backend_add_symbol_hook     _bfd_mips_elf_add_symbol_hook
2654 #define elf_backend_link_output_symbol_hook \
2655                                 _bfd_mips_elf_link_output_symbol_hook
2656 #define elf_backend_create_dynamic_sections \
2657                                 _bfd_mips_elf_create_dynamic_sections
2658 #define elf_backend_check_relocs        _bfd_mips_elf_check_relocs
2659 #define elf_backend_adjust_dynamic_symbol \
2660                                 _bfd_mips_elf_adjust_dynamic_symbol
2661 #define elf_backend_always_size_sections \
2662                                 _bfd_mips_elf_always_size_sections
2663 #define elf_backend_size_dynamic_sections \
2664                                 _bfd_mips_elf_size_dynamic_sections
2665 #define elf_backend_relocate_section    _bfd_mips_elf_relocate_section
2666 #define elf_backend_finish_dynamic_symbol \
2667                                 _bfd_mips_elf_finish_dynamic_symbol
2668 #define elf_backend_finish_dynamic_sections \
2669                                 _bfd_mips_elf_finish_dynamic_sections
2670 #define elf_backend_final_write_processing \
2671                                 _bfd_mips_elf_final_write_processing
2672 #define elf_backend_additional_program_headers \
2673                                 _bfd_mips_elf_additional_program_headers
2674 #define elf_backend_modify_segment_map  _bfd_mips_elf_modify_segment_map
2675 #define elf_backend_gc_mark_hook        _bfd_mips_elf_gc_mark_hook
2676 #define elf_backend_gc_sweep_hook       _bfd_mips_elf_gc_sweep_hook
2677 #define elf_backend_hide_symbol         _bfd_mips_elf_hide_symbol
2678 #define elf_backend_ignore_discarded_relocs \
2679                                         _bfd_mips_elf_ignore_discarded_relocs
2680 #define elf_backend_mips_irix_compat    elf64_mips_irix_compat
2681 #define elf_backend_mips_rtype_to_howto mips_elf64_rtype_to_howto
2682 #define elf_backend_ecoff_debug_swap    &mips_elf64_ecoff_debug_swap
2683 #define elf_backend_size_info           mips_elf64_size_info
2684
2685 #define elf_backend_got_header_size     (4 * MIPS_RESERVED_GOTNO)
2686 #define elf_backend_plt_header_size     0
2687
2688 /* MIPS ELF64 can use a mixture of REL and RELA, but some Relocations
2689    work better/work only in RELA, so we default to this.  */
2690 #define elf_backend_may_use_rel_p       1
2691 #define elf_backend_may_use_rela_p      1
2692 #define elf_backend_default_use_rela_p  1
2693
2694 #define elf_backend_write_section       _bfd_mips_elf_write_section
2695
2696 /* We don't set bfd_elf64_bfd_is_local_label_name because the 32-bit
2697    MIPS-specific function only applies to IRIX5, which had no 64-bit
2698    ABI.  */
2699 #define bfd_elf64_find_nearest_line     _bfd_mips_elf_find_nearest_line
2700 #define bfd_elf64_set_section_contents  _bfd_mips_elf_set_section_contents
2701 #define bfd_elf64_bfd_get_relocated_section_contents \
2702                                 _bfd_elf_mips_get_relocated_section_contents
2703 #define bfd_elf64_bfd_link_hash_table_create \
2704                                 _bfd_mips_elf_link_hash_table_create
2705 #define bfd_elf64_bfd_final_link        _bfd_mips_elf_final_link
2706 #define bfd_elf64_bfd_merge_private_bfd_data \
2707                                 _bfd_mips_elf_merge_private_bfd_data
2708 #define bfd_elf64_bfd_set_private_flags _bfd_mips_elf_set_private_flags
2709 #define bfd_elf64_bfd_print_private_bfd_data \
2710                                 _bfd_mips_elf_print_private_bfd_data
2711
2712 #define bfd_elf64_get_reloc_upper_bound mips_elf64_get_reloc_upper_bound
2713
2714 /* MIPS ELF64 archive functions.  */
2715 #define bfd_elf64_archive_functions
2716 extern boolean bfd_elf64_archive_slurp_armap
2717   PARAMS((bfd *));
2718 extern boolean bfd_elf64_archive_write_armap
2719   PARAMS((bfd *, unsigned int, struct orl *, unsigned int, int));
2720 #define bfd_elf64_archive_slurp_extended_name_table \
2721                         _bfd_archive_coff_slurp_extended_name_table
2722 #define bfd_elf64_archive_construct_extended_name_table \
2723                         _bfd_archive_coff_construct_extended_name_table
2724 #define bfd_elf64_archive_truncate_arname \
2725                         _bfd_archive_coff_truncate_arname
2726 #define bfd_elf64_archive_read_ar_hdr   _bfd_archive_coff_read_ar_hdr
2727 #define bfd_elf64_archive_openr_next_archived_file \
2728                         _bfd_archive_coff_openr_next_archived_file
2729 #define bfd_elf64_archive_get_elt_at_index \
2730                         _bfd_archive_coff_get_elt_at_index
2731 #define bfd_elf64_archive_generic_stat_arch_elt \
2732                         _bfd_archive_coff_generic_stat_arch_elt
2733 #define bfd_elf64_archive_update_armap_timestamp \
2734                         _bfd_archive_coff_update_armap_timestamp
2735
2736 /* The SGI style (n)64 NewABI.  */
2737 #define TARGET_LITTLE_SYM               bfd_elf64_littlemips_vec
2738 #define TARGET_LITTLE_NAME              "elf64-littlemips"
2739 #define TARGET_BIG_SYM                  bfd_elf64_bigmips_vec
2740 #define TARGET_BIG_NAME                 "elf64-bigmips"
2741
2742 #include "elf64-target.h"
2743
2744 #define INCLUDED_TARGET_FILE            /* More a type of flag.  */
2745
2746 /* The SYSV-style 'traditional' (n)64 NewABI.  */
2747 #undef TARGET_LITTLE_SYM
2748 #undef TARGET_LITTLE_NAME
2749 #undef TARGET_BIG_SYM
2750 #undef TARGET_BIG_NAME
2751
2752 #define TARGET_LITTLE_SYM               bfd_elf64_tradlittlemips_vec
2753 #define TARGET_LITTLE_NAME              "elf64-tradlittlemips"
2754 #define TARGET_BIG_SYM                  bfd_elf64_tradbigmips_vec
2755 #define TARGET_BIG_NAME                 "elf64-tradbigmips"
2756
2757 /* Include the target file again for this target.  */
2758 #include "elf64-target.h"