bfd/elf64-mips.c

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