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   /* If we're relocating, and this is an external symbol, we don't want
1590      to change anything.  */
1591   if (output_bfd != NULL
1592       && (symbol->flags & BSF_SECTION_SYM) == 0
1593       && (symbol->flags & BSF_LOCAL) != 0)
1594     {
1595       *error_message = (char *)
1596         _("32bits gp relative relocation occurs for an external symbol");
1597       return bfd_reloc_outofrange;
1598     }
1599
1600   if (output_bfd != NULL)
1601     relocatable = TRUE;
1602   else
1603     {
1604       relocatable = FALSE;
1605       output_bfd = symbol->section->output_section->owner;
1606     }
1607
1608     ret = mips_elf64_final_gp (output_bfd, symbol, relocatable,
1609                                error_message, &gp);
1610     if (ret != bfd_reloc_ok)
1611       return ret;
1612
1613   if (bfd_is_com_section (symbol->section))
1614     relocation = 0;
1615   else
1616     relocation = symbol->value;
1617
1618   relocation += symbol->section->output_section->vma;
1619   relocation += symbol->section->output_offset;
1620
1621   if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
1622     return bfd_reloc_outofrange;
1623
1624   /* Set val to the offset into the section or symbol.  */
1625   val = reloc_entry->addend;
1626
1627   if (reloc_entry->howto->partial_inplace)
1628     val += bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1629
1630   /* Adjust val for the final section location and GP value.  If we
1631      are producing relocatable output, we don't want to do this for
1632      an external symbol.  */
1633   if (! relocatable
1634       || (symbol->flags & BSF_SECTION_SYM) != 0)
1635     val += relocation - gp;
1636
1637   if (reloc_entry->howto->partial_inplace)
1638     bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
1639   else
1640     reloc_entry->addend = val;
1641
1642   if (relocatable)
1643     reloc_entry->address += input_section->output_offset;
1644
1645   return bfd_reloc_ok;
1646 }
1647
1648 /* Do a R_MIPS_SHIFT6 relocation. The MSB of the shift is stored at bit 2,
1649    the rest is at bits 6-10. The bitpos already got right by the howto.  */
1650
1651 static bfd_reloc_status_type
1652 mips_elf64_shift6_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1653                          void *data, asection *input_section, bfd *output_bfd,
1654                          char **error_message)
1655 {
1656   if (reloc_entry->howto->partial_inplace)
1657     {
1658       reloc_entry->addend = ((reloc_entry->addend & 0x00007c0)
1659                              | (reloc_entry->addend & 0x00000800) >> 9);
1660     }
1661
1662   return _bfd_mips_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1663                                       input_section, output_bfd,
1664                                       error_message);
1665 }
1666
1667 /* Handle a mips16 jump.  */
1668
1669 static bfd_reloc_status_type
1670 mips16_jump_reloc (bfd *abfd ATTRIBUTE_UNUSED, arelent *reloc_entry,
1671                    asymbol *symbol, void *data ATTRIBUTE_UNUSED,
1672                    asection *input_section, bfd *output_bfd,
1673                    char **error_message ATTRIBUTE_UNUSED)
1674 {
1675   if (output_bfd != NULL
1676       && (symbol->flags & BSF_SECTION_SYM) == 0
1677       && (! reloc_entry->howto->partial_inplace
1678           || reloc_entry->addend == 0))
1679     {
1680       reloc_entry->address += input_section->output_offset;
1681       return bfd_reloc_ok;
1682     }
1683
1684   /* FIXME.  */
1685   {
1686     static bfd_boolean warned;
1687
1688     if (! warned)
1689       (*_bfd_error_handler)
1690         (_("Linking mips16 objects into %s format is not supported"),
1691          bfd_get_target (input_section->output_section->owner));
1692     warned = TRUE;
1693   }
1694
1695   return bfd_reloc_undefined;
1696 }
1697
1698 /* Handle a mips16 GP relative reloc.  */
1699
1700 static bfd_reloc_status_type
1701 mips16_gprel_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1702                     void *data, asection *input_section, bfd *output_bfd,
1703                     char **error_message)
1704 {
1705   bfd_boolean relocatable;
1706   bfd_reloc_status_type ret;
1707   bfd_vma gp;
1708   unsigned short extend = 0;
1709   unsigned short insn = 0;
1710   bfd_signed_vma val;
1711   bfd_vma relocation;
1712
1713   /* If we're relocating, and this is an external symbol with no
1714      addend, we don't want to change anything.  */
1715   if (output_bfd != NULL
1716       && (symbol->flags & BSF_SECTION_SYM) == 0
1717       && (symbol->flags & BSF_LOCAL) != 0)
1718     {
1719       reloc_entry->address += input_section->output_offset;
1720       return bfd_reloc_ok;
1721     }
1722
1723   if (output_bfd != NULL)
1724     relocatable = TRUE;
1725   else
1726     {
1727       relocatable = FALSE;
1728       output_bfd = symbol->section->output_section->owner;
1729     }
1730
1731   ret = mips_elf64_final_gp (output_bfd, symbol, relocatable, error_message,
1732                              &gp);
1733   if (ret != bfd_reloc_ok)
1734     return ret;
1735
1736   if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
1737     return bfd_reloc_outofrange;
1738
1739   if (bfd_is_com_section (symbol->section))
1740     relocation = 0;
1741   else
1742     relocation = symbol->value;
1743
1744   relocation += symbol->section->output_section->vma;
1745   relocation += symbol->section->output_offset;
1746
1747   /* Set val to the offset into the section or symbol.  */
1748   val = reloc_entry->addend;
1749
1750   if (reloc_entry->howto->partial_inplace)
1751     {
1752       /* Pick up the mips16 extend instruction and the real instruction.  */
1753       extend = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
1754       insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address + 2);
1755       val += ((extend & 0x1f) << 11) | (extend & 0x7e0) | (insn & 0x1f);
1756     }
1757
1758   _bfd_mips_elf_sign_extend(val, 16);
1759
1760   /* Adjust val for the final section location and GP value.  If we
1761      are producing relocatable output, we don't want to do this for
1762      an external symbol.  */
1763   if (! relocatable
1764       || (symbol->flags & BSF_SECTION_SYM) != 0)
1765     val += relocation - gp;
1766
1767   if (reloc_entry->howto->partial_inplace)
1768     {
1769       bfd_put_16 (abfd,
1770                   (extend & 0xf800) | ((val >> 11) & 0x1f) | (val & 0x7e0),
1771                   (bfd_byte *) data + reloc_entry->address);
1772       bfd_put_16 (abfd,
1773                   (insn & 0xffe0) | (val & 0x1f),
1774                   (bfd_byte *) data + reloc_entry->address + 2);
1775     }
1776   else
1777     reloc_entry->addend = val;
1778
1779   if (relocatable)
1780     reloc_entry->address += input_section->output_offset;
1781   else if (((val & ~0xffff) != ~0xffff) && ((val & ~0xffff) != 0))
1782     return bfd_reloc_overflow;
1783
1784   return bfd_reloc_ok;
1785 }
1786 \f
1787 /* A mapping from BFD reloc types to MIPS ELF reloc types.  */
1788
1789 struct elf_reloc_map {
1790   bfd_reloc_code_real_type bfd_val;
1791   enum elf_mips_reloc_type elf_val;
1792 };
1793
1794 static const struct elf_reloc_map mips_reloc_map[] =
1795 {
1796   { BFD_RELOC_NONE, R_MIPS_NONE },
1797   { BFD_RELOC_16, R_MIPS_16 },
1798   { BFD_RELOC_32, R_MIPS_32 },
1799   /* There is no BFD reloc for R_MIPS_REL32.  */
1800   { BFD_RELOC_64, R_MIPS_64 },
1801   { BFD_RELOC_CTOR, R_MIPS_64 },
1802   { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1803   { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1804   { BFD_RELOC_LO16, R_MIPS_LO16 },
1805   { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1806   { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1807   { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1808   { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1809   { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1810   { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1811   { BFD_RELOC_MIPS_SHIFT5, R_MIPS_SHIFT5 },
1812   { BFD_RELOC_MIPS_SHIFT6, R_MIPS_SHIFT6 },
1813   { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP },
1814   { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1815   { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1816   { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1817   { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1818   { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1819   { BFD_RELOC_MIPS_INSERT_A, R_MIPS_INSERT_A },
1820   { BFD_RELOC_MIPS_INSERT_B, R_MIPS_INSERT_B },
1821   { BFD_RELOC_MIPS_DELETE, R_MIPS_DELETE },
1822   { BFD_RELOC_MIPS_HIGHEST, R_MIPS_HIGHEST },
1823   { BFD_RELOC_MIPS_HIGHER, R_MIPS_HIGHER },
1824   { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1825   { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1826   { BFD_RELOC_MIPS_SCN_DISP, R_MIPS_SCN_DISP },
1827   { BFD_RELOC_MIPS_REL16, R_MIPS_REL16 },
1828   /* Use of R_MIPS_ADD_IMMEDIATE and R_MIPS_PJUMP is deprecated.  */
1829   { BFD_RELOC_MIPS_RELGOT, R_MIPS_RELGOT },
1830   { BFD_RELOC_MIPS_JALR, R_MIPS_JALR }
1831 };
1832
1833 /* Given a BFD reloc type, return a howto structure.  */
1834
1835 static reloc_howto_type *
1836 bfd_elf64_bfd_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1837                                  bfd_reloc_code_real_type code)
1838 {
1839   unsigned int i;
1840   /* FIXME: We default to RELA here instead of choosing the right
1841      relocation variant.  */
1842   reloc_howto_type *howto_table = mips_elf64_howto_table_rela;
1843
1844   for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1845        i++)
1846     {
1847       if (mips_reloc_map[i].bfd_val == code)
1848         return &howto_table[(int) mips_reloc_map[i].elf_val];
1849     }
1850
1851   switch (code)
1852     {
1853     case BFD_RELOC_MIPS16_JMP:
1854       return &elf_mips16_jump_howto;
1855     case BFD_RELOC_MIPS16_GPREL:
1856       return &elf_mips16_gprel_howto;
1857     case BFD_RELOC_VTABLE_INHERIT:
1858       return &elf_mips_gnu_vtinherit_howto;
1859     case BFD_RELOC_VTABLE_ENTRY:
1860       return &elf_mips_gnu_vtentry_howto;
1861     case BFD_RELOC_16_PCREL_S2:
1862       return &elf_mips_gnu_rela16_s2;
1863     default:
1864       bfd_set_error (bfd_error_bad_value);
1865       return NULL;
1866     }
1867 }
1868
1869 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure.  */
1870
1871 static reloc_howto_type *
1872 mips_elf64_rtype_to_howto (unsigned int r_type, bfd_boolean rela_p)
1873 {
1874   switch (r_type)
1875     {
1876     case R_MIPS16_26:
1877       return &elf_mips16_jump_howto;
1878     case R_MIPS16_GPREL:
1879       return &elf_mips16_gprel_howto;
1880     case R_MIPS_GNU_VTINHERIT:
1881       return &elf_mips_gnu_vtinherit_howto;
1882     case R_MIPS_GNU_VTENTRY:
1883       return &elf_mips_gnu_vtentry_howto;
1884     case R_MIPS_GNU_REL16_S2:
1885       if (rela_p)
1886         return &elf_mips_gnu_rela16_s2;
1887       else
1888         return &elf_mips_gnu_rel16_s2;
1889     default:
1890       BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1891       if (rela_p)
1892         return &mips_elf64_howto_table_rela[r_type];
1893       else
1894         return &mips_elf64_howto_table_rel[r_type];
1895       break;
1896     }
1897 }
1898
1899 /* Prevent relocation handling by bfd for MIPS ELF64.  */
1900
1901 static void
1902 mips_elf64_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
1903                               arelent *cache_ptr ATTRIBUTE_UNUSED,
1904                               Elf_Internal_Rela *dst ATTRIBUTE_UNUSED)
1905 {
1906   BFD_ASSERT (0);
1907 }
1908
1909 static void
1910 mips_elf64_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
1911                                arelent *cache_ptr ATTRIBUTE_UNUSED,
1912                                Elf_Internal_Rela *dst ATTRIBUTE_UNUSED)
1913 {
1914   BFD_ASSERT (0);
1915 }
1916
1917 /* Since each entry in an SHT_REL or SHT_RELA section can represent up
1918    to three relocs, we must tell the user to allocate more space.  */
1919
1920 static long
1921 mips_elf64_get_reloc_upper_bound (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1922 {
1923   return (sec->reloc_count * 3 + 1) * sizeof (arelent *);
1924 }
1925
1926 static long
1927 mips_elf64_get_dynamic_reloc_upper_bound (bfd *abfd)
1928 {
1929   return _bfd_elf_get_dynamic_reloc_upper_bound (abfd) * 3;
1930 }
1931
1932 /* We must also copy more relocations than the corresponding functions
1933    in elf.c would, so the two following functions are slightly
1934    modified from elf.c, that multiply the external relocation count by
1935    3 to obtain the internal relocation count.  */
1936
1937 static long
1938 mips_elf64_canonicalize_reloc (bfd *abfd, sec_ptr section,
1939                                arelent **relptr, asymbol **symbols)
1940 {
1941   arelent *tblptr;
1942   unsigned int i;
1943   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1944
1945   if (! bed->s->slurp_reloc_table (abfd, section, symbols, FALSE))
1946     return -1;
1947
1948   tblptr = section->relocation;
1949   for (i = 0; i < section->reloc_count * 3; i++)
1950     *relptr++ = tblptr++;
1951
1952   *relptr = NULL;
1953
1954   return section->reloc_count * 3;
1955 }
1956
1957 static long
1958 mips_elf64_canonicalize_dynamic_reloc (bfd *abfd, arelent **storage,
1959                                        asymbol **syms)
1960 {
1961   bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
1962   asection *s;
1963   long ret;
1964
1965   if (elf_dynsymtab (abfd) == 0)
1966     {
1967       bfd_set_error (bfd_error_invalid_operation);
1968       return -1;
1969     }
1970
1971   slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
1972   ret = 0;
1973   for (s = abfd->sections; s != NULL; s = s->next)
1974     {
1975       if (elf_section_data (s)->this_hdr.sh_link == elf_dynsymtab (abfd)
1976           && (elf_section_data (s)->this_hdr.sh_type == SHT_REL
1977               || elf_section_data (s)->this_hdr.sh_type == SHT_RELA))
1978         {
1979           arelent *p;
1980           long count, i;
1981
1982           if (! (*slurp_relocs) (abfd, s, syms, TRUE))
1983             return -1;
1984           count = s->size / elf_section_data (s)->this_hdr.sh_entsize * 3;
1985           p = s->relocation;
1986           for (i = 0; i < count; i++)
1987             *storage++ = p++;
1988           ret += count;
1989         }
1990     }
1991
1992   *storage = NULL;
1993
1994   return ret;
1995 }
1996
1997 /* Read the relocations from one reloc section.  This is mostly copied
1998    from elfcode.h, except for the changes to expand one external
1999    relocation to 3 internal ones.  We must unfortunately set
2000    reloc_count to the number of external relocations, because a lot of
2001    generic code seems to depend on this.  */
2002
2003 static bfd_boolean
2004 mips_elf64_slurp_one_reloc_table (bfd *abfd, asection *asect,
2005                                   Elf_Internal_Shdr *rel_hdr,
2006                                   bfd_size_type reloc_count,
2007                                   arelent *relents, asymbol **symbols,
2008                                   bfd_boolean dynamic)
2009 {
2010   void *allocated;
2011   bfd_byte *native_relocs;
2012   arelent *relent;
2013   bfd_vma i;
2014   int entsize;
2015   bfd_boolean rela_p;
2016
2017   allocated = bfd_malloc (rel_hdr->sh_size);
2018   if (allocated == NULL)
2019     return FALSE;
2020
2021   if (bfd_seek (abfd, rel_hdr->sh_offset, SEEK_SET) != 0
2022       || (bfd_bread (allocated, rel_hdr->sh_size, abfd)
2023           != rel_hdr->sh_size))
2024     goto error_return;
2025
2026   native_relocs = allocated;
2027
2028   entsize = rel_hdr->sh_entsize;
2029   BFD_ASSERT (entsize == sizeof (Elf64_Mips_External_Rel)
2030               || entsize == sizeof (Elf64_Mips_External_Rela));
2031
2032   if (entsize == sizeof (Elf64_Mips_External_Rel))
2033     rela_p = FALSE;
2034   else
2035     rela_p = TRUE;
2036
2037   for (i = 0, relent = relents;
2038        i < reloc_count;
2039        i++, native_relocs += entsize)
2040     {
2041       Elf64_Mips_Internal_Rela rela;
2042       bfd_boolean used_sym, used_ssym;
2043       int ir;
2044
2045       if (entsize == sizeof (Elf64_Mips_External_Rela))
2046         mips_elf64_swap_reloca_in (abfd,
2047                                    (Elf64_Mips_External_Rela *) native_relocs,
2048                                    &rela);
2049       else
2050         mips_elf64_swap_reloc_in (abfd,
2051                                   (Elf64_Mips_External_Rel *) native_relocs,
2052                                   &rela);
2053
2054       /* Each entry represents exactly three actual relocations.  */
2055
2056       used_sym = FALSE;
2057       used_ssym = FALSE;
2058       for (ir = 0; ir < 3; ir++)
2059         {
2060           enum elf_mips_reloc_type type;
2061
2062           switch (ir)
2063             {
2064             default:
2065               abort ();
2066             case 0:
2067               type = (enum elf_mips_reloc_type) rela.r_type;
2068               break;
2069             case 1:
2070               type = (enum elf_mips_reloc_type) rela.r_type2;
2071               break;
2072             case 2:
2073               type = (enum elf_mips_reloc_type) rela.r_type3;
2074               break;
2075             }
2076
2077           /* Some types require symbols, whereas some do not.  */
2078           switch (type)
2079             {
2080             case R_MIPS_NONE:
2081             case R_MIPS_LITERAL:
2082             case R_MIPS_INSERT_A:
2083             case R_MIPS_INSERT_B:
2084             case R_MIPS_DELETE:
2085               relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2086               break;
2087
2088             default:
2089               if (! used_sym)
2090                 {
2091                   if (rela.r_sym == 0)
2092                     relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2093                   else
2094                     {
2095                       asymbol **ps, *s;
2096
2097                       ps = symbols + rela.r_sym - 1;
2098                       s = *ps;
2099                       if ((s->flags & BSF_SECTION_SYM) == 0)
2100                         relent->sym_ptr_ptr = ps;
2101                       else
2102                         relent->sym_ptr_ptr = s->section->symbol_ptr_ptr;
2103                     }
2104
2105                   used_sym = TRUE;
2106                 }
2107               else if (! used_ssym)
2108                 {
2109                   switch (rela.r_ssym)
2110                     {
2111                     case RSS_UNDEF:
2112                       relent->sym_ptr_ptr =
2113                         bfd_abs_section_ptr->symbol_ptr_ptr;
2114                       break;
2115
2116                     case RSS_GP:
2117                     case RSS_GP0:
2118                     case RSS_LOC:
2119                       /* FIXME: I think these need to be handled using
2120                          special howto structures.  */
2121                       BFD_ASSERT (0);
2122                       break;
2123
2124                     default:
2125                       BFD_ASSERT (0);
2126                       break;
2127                     }
2128
2129                   used_ssym = TRUE;
2130                 }
2131               else
2132                 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2133
2134               break;
2135             }
2136
2137           /* The address of an ELF reloc is section relative for an
2138              object file, and absolute for an executable file or
2139              shared library.  The address of a BFD reloc is always
2140              section relative.  */
2141           if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0 || dynamic)
2142             relent->address = rela.r_offset;
2143           else
2144             relent->address = rela.r_offset - asect->vma;
2145
2146           relent->addend = rela.r_addend;
2147
2148           relent->howto = mips_elf64_rtype_to_howto (type, rela_p);
2149
2150           ++relent;
2151         }
2152     }
2153
2154   asect->reloc_count += (relent - relents) / 3;
2155
2156   if (allocated != NULL)
2157     free (allocated);
2158
2159   return TRUE;
2160
2161  error_return:
2162   if (allocated != NULL)
2163     free (allocated);
2164   return FALSE;
2165 }
2166
2167 /* Read the relocations.  On Irix 6, there can be two reloc sections
2168    associated with a single data section.  This is copied from
2169    elfcode.h as well, with changes as small as accounting for 3
2170    internal relocs per external reloc and resetting reloc_count to
2171    zero before processing the relocs of a section.  */
2172
2173 static bfd_boolean
2174 mips_elf64_slurp_reloc_table (bfd *abfd, asection *asect,
2175                               asymbol **symbols, bfd_boolean dynamic)
2176 {
2177   struct bfd_elf_section_data * const d = elf_section_data (asect);
2178   Elf_Internal_Shdr *rel_hdr;
2179   Elf_Internal_Shdr *rel_hdr2;
2180   bfd_size_type reloc_count;
2181   bfd_size_type reloc_count2;
2182   arelent *relents;
2183   bfd_size_type amt;
2184
2185   if (asect->relocation != NULL)
2186     return TRUE;
2187
2188   if (! dynamic)
2189     {
2190       if ((asect->flags & SEC_RELOC) == 0
2191           || asect->reloc_count == 0)
2192         return TRUE;
2193
2194       rel_hdr = &d->rel_hdr;
2195       reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2196       rel_hdr2 = d->rel_hdr2;
2197       reloc_count2 = (rel_hdr2 ? NUM_SHDR_ENTRIES (rel_hdr2) : 0);
2198
2199       BFD_ASSERT (asect->reloc_count == reloc_count + reloc_count2);
2200       BFD_ASSERT (asect->rel_filepos == rel_hdr->sh_offset
2201                   || (rel_hdr2 && asect->rel_filepos == rel_hdr2->sh_offset));
2202
2203     }
2204   else
2205     {
2206       /* Note that ASECT->RELOC_COUNT tends not to be accurate in this
2207          case because relocations against this section may use the
2208          dynamic symbol table, and in that case bfd_section_from_shdr
2209          in elf.c does not update the RELOC_COUNT.  */
2210       if (asect->size == 0)
2211         return TRUE;
2212
2213       rel_hdr = &d->this_hdr;
2214       reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2215       rel_hdr2 = NULL;
2216       reloc_count2 = 0;
2217     }
2218
2219   /* Allocate space for 3 arelent structures for each Rel structure.  */
2220   amt = (reloc_count + reloc_count2) * 3 * sizeof (arelent);
2221   relents = bfd_alloc (abfd, amt);
2222   if (relents == NULL)
2223     return FALSE;
2224
2225   /* The slurp_one_reloc_table routine increments reloc_count.  */
2226   asect->reloc_count = 0;
2227
2228   if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2229                                           rel_hdr, reloc_count,
2230                                           relents,
2231                                           symbols, dynamic))
2232     return FALSE;
2233   if (d->rel_hdr2 != NULL)
2234     {
2235       if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2236                                               rel_hdr2, reloc_count2,
2237                                               relents + reloc_count * 3,
2238                                               symbols, dynamic))
2239         return FALSE;
2240     }
2241
2242   asect->relocation = relents;
2243   return TRUE;
2244 }
2245
2246 /* Write out the relocations.  */
2247
2248 static void
2249 mips_elf64_write_relocs (bfd *abfd, asection *sec, void *data)
2250 {
2251   bfd_boolean *failedp = data;
2252   int count;
2253   Elf_Internal_Shdr *rel_hdr;
2254   unsigned int idx;
2255
2256   /* If we have already failed, don't do anything.  */
2257   if (*failedp)
2258     return;
2259
2260   if ((sec->flags & SEC_RELOC) == 0)
2261     return;
2262
2263   /* The linker backend writes the relocs out itself, and sets the
2264      reloc_count field to zero to inhibit writing them here.  Also,
2265      sometimes the SEC_RELOC flag gets set even when there aren't any
2266      relocs.  */
2267   if (sec->reloc_count == 0)
2268     return;
2269
2270   /* We can combine up to three relocs that refer to the same address
2271      if the latter relocs have no associated symbol.  */
2272   count = 0;
2273   for (idx = 0; idx < sec->reloc_count; idx++)
2274     {
2275       bfd_vma addr;
2276       unsigned int i;
2277
2278       ++count;
2279
2280       addr = sec->orelocation[idx]->address;
2281       for (i = 0; i < 2; i++)
2282         {
2283           arelent *r;
2284
2285           if (idx + 1 >= sec->reloc_count)
2286             break;
2287           r = sec->orelocation[idx + 1];
2288           if (r->address != addr
2289               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2290               || (*r->sym_ptr_ptr)->value != 0)
2291             break;
2292
2293           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2294
2295           ++idx;
2296         }
2297     }
2298
2299   rel_hdr = &elf_section_data (sec)->rel_hdr;
2300
2301   /* Do the actual relocation.  */
2302
2303   if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rel))
2304     mips_elf64_write_rel (abfd, sec, rel_hdr, &count, data);
2305   else if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rela))
2306     mips_elf64_write_rela (abfd, sec, rel_hdr, &count, data);
2307   else
2308     BFD_ASSERT (0);
2309 }
2310
2311 static void
2312 mips_elf64_write_rel (bfd *abfd, asection *sec,
2313                       Elf_Internal_Shdr *rel_hdr,
2314                       int *count, void *data)
2315 {
2316   bfd_boolean *failedp = data;
2317   Elf64_Mips_External_Rel *ext_rel;
2318   unsigned int idx;
2319   asymbol *last_sym = 0;
2320   int last_sym_idx = 0;
2321
2322   rel_hdr->sh_size = rel_hdr->sh_entsize * *count;
2323   rel_hdr->contents = bfd_alloc (abfd, rel_hdr->sh_size);
2324   if (rel_hdr->contents == NULL)
2325     {
2326       *failedp = TRUE;
2327       return;
2328     }
2329
2330   ext_rel = (Elf64_Mips_External_Rel *) rel_hdr->contents;
2331   for (idx = 0; idx < sec->reloc_count; idx++, ext_rel++)
2332     {
2333       arelent *ptr;
2334       Elf64_Mips_Internal_Rela int_rel;
2335       asymbol *sym;
2336       int n;
2337       unsigned int i;
2338
2339       ptr = sec->orelocation[idx];
2340
2341       /* The address of an ELF reloc is section relative for an object
2342          file, and absolute for an executable file or shared library.
2343          The address of a BFD reloc is always section relative.  */
2344       if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2345         int_rel.r_offset = ptr->address;
2346       else
2347         int_rel.r_offset = ptr->address + sec->vma;
2348
2349       sym = *ptr->sym_ptr_ptr;
2350       if (sym == last_sym)
2351         n = last_sym_idx;
2352       else if (bfd_is_abs_section (sym->section) && sym->value == 0)
2353         n = STN_UNDEF;
2354       else
2355         {
2356           last_sym = sym;
2357           n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2358           if (n < 0)
2359             {
2360               *failedp = TRUE;
2361               return;
2362             }
2363           last_sym_idx = n;
2364         }
2365
2366       int_rel.r_sym = n;
2367       int_rel.r_ssym = RSS_UNDEF;
2368
2369       if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2370           && ! _bfd_elf_validate_reloc (abfd, ptr))
2371         {
2372           *failedp = TRUE;
2373           return;
2374         }
2375
2376       int_rel.r_type = ptr->howto->type;
2377       int_rel.r_type2 = (int) R_MIPS_NONE;
2378       int_rel.r_type3 = (int) R_MIPS_NONE;
2379
2380       for (i = 0; i < 2; i++)
2381         {
2382           arelent *r;
2383
2384           if (idx + 1 >= sec->reloc_count)
2385             break;
2386           r = sec->orelocation[idx + 1];
2387           if (r->address != ptr->address
2388               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2389               || (*r->sym_ptr_ptr)->value != 0)
2390             break;
2391
2392           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2393
2394           if (i == 0)
2395             int_rel.r_type2 = r->howto->type;
2396           else
2397             int_rel.r_type3 = r->howto->type;
2398
2399           ++idx;
2400         }
2401
2402       mips_elf64_swap_reloc_out (abfd, &int_rel, ext_rel);
2403     }
2404
2405   BFD_ASSERT (ext_rel - (Elf64_Mips_External_Rel *) rel_hdr->contents
2406               == *count);
2407 }
2408
2409 static void
2410 mips_elf64_write_rela (bfd *abfd, asection *sec,
2411                        Elf_Internal_Shdr *rela_hdr,
2412                        int *count, void *data)
2413 {
2414   bfd_boolean *failedp = data;
2415   Elf64_Mips_External_Rela *ext_rela;
2416   unsigned int idx;
2417   asymbol *last_sym = 0;
2418   int last_sym_idx = 0;
2419
2420   rela_hdr->sh_size = rela_hdr->sh_entsize * *count;
2421   rela_hdr->contents = bfd_alloc (abfd, rela_hdr->sh_size);
2422   if (rela_hdr->contents == NULL)
2423     {
2424       *failedp = TRUE;
2425       return;
2426     }
2427
2428   ext_rela = (Elf64_Mips_External_Rela *) rela_hdr->contents;
2429   for (idx = 0; idx < sec->reloc_count; idx++, ext_rela++)
2430     {
2431       arelent *ptr;
2432       Elf64_Mips_Internal_Rela int_rela;
2433       asymbol *sym;
2434       int n;
2435       unsigned int i;
2436
2437       ptr = sec->orelocation[idx];
2438
2439       /* The address of an ELF reloc is section relative for an object
2440          file, and absolute for an executable file or shared library.
2441          The address of a BFD reloc is always section relative.  */
2442       if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2443         int_rela.r_offset = ptr->address;
2444       else
2445         int_rela.r_offset = ptr->address + sec->vma;
2446
2447       sym = *ptr->sym_ptr_ptr;
2448       if (sym == last_sym)
2449         n = last_sym_idx;
2450       else if (bfd_is_abs_section (sym->section) && sym->value == 0)
2451         n = STN_UNDEF;
2452       else
2453         {
2454           last_sym = sym;
2455           n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2456           if (n < 0)
2457             {
2458               *failedp = TRUE;
2459               return;
2460             }
2461           last_sym_idx = n;
2462         }
2463
2464       int_rela.r_sym = n;
2465       int_rela.r_addend = ptr->addend;
2466       int_rela.r_ssym = RSS_UNDEF;
2467
2468       if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2469           && ! _bfd_elf_validate_reloc (abfd, ptr))
2470         {
2471           *failedp = TRUE;
2472           return;
2473         }
2474
2475       int_rela.r_type = ptr->howto->type;
2476       int_rela.r_type2 = (int) R_MIPS_NONE;
2477       int_rela.r_type3 = (int) R_MIPS_NONE;
2478
2479       for (i = 0; i < 2; i++)
2480         {
2481           arelent *r;
2482
2483           if (idx + 1 >= sec->reloc_count)
2484             break;
2485           r = sec->orelocation[idx + 1];
2486           if (r->address != ptr->address
2487               || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2488               || (*r->sym_ptr_ptr)->value != 0)
2489             break;
2490
2491           /* We can merge the reloc at IDX + 1 with the reloc at IDX.  */
2492
2493           if (i == 0)
2494             int_rela.r_type2 = r->howto->type;
2495           else
2496             int_rela.r_type3 = r->howto->type;
2497
2498           ++idx;
2499         }
2500
2501       mips_elf64_swap_reloca_out (abfd, &int_rela, ext_rela);
2502     }
2503
2504   BFD_ASSERT (ext_rela - (Elf64_Mips_External_Rela *) rela_hdr->contents
2505               == *count);
2506 }
2507 \f
2508 /* Set the right machine number for a MIPS ELF file.  */
2509
2510 static bfd_boolean
2511 mips_elf64_object_p (bfd *abfd)
2512 {
2513   unsigned long mach;
2514
2515   /* Irix 6 is broken.  Object file symbol tables are not always
2516      sorted correctly such that local symbols precede global symbols,
2517      and the sh_info field in the symbol table is not always right.  */
2518   if (elf64_mips_irix_compat (abfd) != ict_none)
2519     elf_bad_symtab (abfd) = TRUE;
2520
2521   mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
2522   bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
2523   return TRUE;
2524 }
2525
2526 /* Depending on the target vector we generate some version of Irix
2527    executables or "normal" MIPS ELF ABI executables.  */
2528 static irix_compat_t
2529 elf64_mips_irix_compat (bfd *abfd)
2530 {
2531   if ((abfd->xvec == &bfd_elf64_bigmips_vec)
2532       || (abfd->xvec == &bfd_elf64_littlemips_vec))
2533     return ict_irix6;
2534   else
2535     return ict_none;
2536 }
2537 \f
2538 /* Support for core dump NOTE sections.  */
2539 static bfd_boolean
2540 elf64_mips_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
2541 {
2542   int offset;
2543   unsigned int size;
2544
2545   switch (note->descsz)
2546     {
2547       default:
2548         return FALSE;
2549
2550       case 480:         /* Linux/MIPS - N64 kernel */
2551         /* pr_cursig */
2552         elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2553
2554         /* pr_pid */
2555         elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 32);
2556
2557         /* pr_reg */
2558         offset = 112;
2559         size = 360;
2560
2561         break;
2562     }
2563
2564   /* Make a ".reg/999" section.  */
2565   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2566                                           size, note->descpos + offset);
2567 }
2568
2569 static bfd_boolean
2570 elf64_mips_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
2571 {
2572   switch (note->descsz)
2573     {
2574       default:
2575         return FALSE;
2576
2577       case 136:         /* Linux/MIPS - N64 kernel elf_prpsinfo */
2578         elf_tdata (abfd)->core_program
2579          = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
2580         elf_tdata (abfd)->core_command
2581          = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
2582     }
2583
2584   /* Note that for some reason, a spurious space is tacked
2585      onto the end of the args in some (at least one anyway)
2586      implementations, so strip it off if it exists.  */
2587
2588   {
2589     char *command = elf_tdata (abfd)->core_command;
2590     int n = strlen (command);
2591
2592     if (0 < n && command[n - 1] == ' ')
2593       command[n - 1] = '\0';
2594   }
2595
2596   return TRUE;
2597 }
2598 \f
2599 /* ECOFF swapping routines.  These are used when dealing with the
2600    .mdebug section, which is in the ECOFF debugging format.  */
2601 static const struct ecoff_debug_swap mips_elf64_ecoff_debug_swap =
2602 {
2603   /* Symbol table magic number.  */
2604   magicSym2,
2605   /* Alignment of debugging information.  E.g., 4.  */
2606   8,
2607   /* Sizes of external symbolic information.  */
2608   sizeof (struct hdr_ext),
2609   sizeof (struct dnr_ext),
2610   sizeof (struct pdr_ext),
2611   sizeof (struct sym_ext),
2612   sizeof (struct opt_ext),
2613   sizeof (struct fdr_ext),
2614   sizeof (struct rfd_ext),
2615   sizeof (struct ext_ext),
2616   /* Functions to swap in external symbolic data.  */
2617   ecoff_swap_hdr_in,
2618   ecoff_swap_dnr_in,
2619   ecoff_swap_pdr_in,
2620   ecoff_swap_sym_in,
2621   ecoff_swap_opt_in,
2622   ecoff_swap_fdr_in,
2623   ecoff_swap_rfd_in,
2624   ecoff_swap_ext_in,
2625   _bfd_ecoff_swap_tir_in,
2626   _bfd_ecoff_swap_rndx_in,
2627   /* Functions to swap out external symbolic data.  */
2628   ecoff_swap_hdr_out,
2629   ecoff_swap_dnr_out,
2630   ecoff_swap_pdr_out,
2631   ecoff_swap_sym_out,
2632   ecoff_swap_opt_out,
2633   ecoff_swap_fdr_out,
2634   ecoff_swap_rfd_out,
2635   ecoff_swap_ext_out,
2636   _bfd_ecoff_swap_tir_out,
2637   _bfd_ecoff_swap_rndx_out,
2638   /* Function to read in symbolic data.  */
2639   _bfd_mips_elf_read_ecoff_info
2640 };
2641 \f
2642 /* Relocations in the 64 bit MIPS ELF ABI are more complex than in
2643    standard ELF.  This structure is used to redirect the relocation
2644    handling routines.  */
2645
2646 const struct elf_size_info mips_elf64_size_info =
2647 {
2648   sizeof (Elf64_External_Ehdr),
2649   sizeof (Elf64_External_Phdr),
2650   sizeof (Elf64_External_Shdr),
2651   sizeof (Elf64_Mips_External_Rel),
2652   sizeof (Elf64_Mips_External_Rela),
2653   sizeof (Elf64_External_Sym),
2654   sizeof (Elf64_External_Dyn),
2655   sizeof (Elf_External_Note),
2656   4,            /* hash-table entry size */
2657   3,            /* internal relocations per external relocations */
2658   64,           /* arch_size */
2659   3,            /* log_file_align */
2660   ELFCLASS64,
2661   EV_CURRENT,
2662   bfd_elf64_write_out_phdrs,
2663   bfd_elf64_write_shdrs_and_ehdr,
2664   mips_elf64_write_relocs,
2665   bfd_elf64_swap_symbol_in,
2666   bfd_elf64_swap_symbol_out,
2667   mips_elf64_slurp_reloc_table,
2668   bfd_elf64_slurp_symbol_table,
2669   bfd_elf64_swap_dyn_in,
2670   bfd_elf64_swap_dyn_out,
2671   mips_elf64_be_swap_reloc_in,
2672   mips_elf64_be_swap_reloc_out,
2673   mips_elf64_be_swap_reloca_in,
2674   mips_elf64_be_swap_reloca_out
2675 };
2676
2677 #define ELF_ARCH                        bfd_arch_mips
2678 #define ELF_MACHINE_CODE                EM_MIPS
2679
2680 #define elf_backend_collect             TRUE
2681 #define elf_backend_type_change_ok      TRUE
2682 #define elf_backend_can_gc_sections     TRUE
2683 #define elf_info_to_howto               mips_elf64_info_to_howto_rela
2684 #define elf_info_to_howto_rel           mips_elf64_info_to_howto_rel
2685 #define elf_backend_object_p            mips_elf64_object_p
2686 #define elf_backend_symbol_processing   _bfd_mips_elf_symbol_processing
2687 #define elf_backend_section_processing  _bfd_mips_elf_section_processing
2688 #define elf_backend_section_from_shdr   _bfd_mips_elf_section_from_shdr
2689 #define elf_backend_fake_sections       _bfd_mips_elf_fake_sections
2690 #define elf_backend_section_from_bfd_section \
2691                                 _bfd_mips_elf_section_from_bfd_section
2692 #define elf_backend_add_symbol_hook     _bfd_mips_elf_add_symbol_hook
2693 #define elf_backend_link_output_symbol_hook \
2694                                 _bfd_mips_elf_link_output_symbol_hook
2695 #define elf_backend_create_dynamic_sections \
2696                                 _bfd_mips_elf_create_dynamic_sections
2697 #define elf_backend_check_relocs        _bfd_mips_elf_check_relocs
2698 #define elf_backend_adjust_dynamic_symbol \
2699                                 _bfd_mips_elf_adjust_dynamic_symbol
2700 #define elf_backend_always_size_sections \
2701                                 _bfd_mips_elf_always_size_sections
2702 #define elf_backend_size_dynamic_sections \
2703                                 _bfd_mips_elf_size_dynamic_sections
2704 #define elf_backend_relocate_section    _bfd_mips_elf_relocate_section
2705 #define elf_backend_finish_dynamic_symbol \
2706                                 _bfd_mips_elf_finish_dynamic_symbol
2707 #define elf_backend_finish_dynamic_sections \
2708                                 _bfd_mips_elf_finish_dynamic_sections
2709 #define elf_backend_final_write_processing \
2710                                 _bfd_mips_elf_final_write_processing
2711 #define elf_backend_additional_program_headers \
2712                                 _bfd_mips_elf_additional_program_headers
2713 #define elf_backend_modify_segment_map  _bfd_mips_elf_modify_segment_map
2714 #define elf_backend_gc_mark_hook        _bfd_mips_elf_gc_mark_hook
2715 #define elf_backend_gc_sweep_hook       _bfd_mips_elf_gc_sweep_hook
2716 #define elf_backend_copy_indirect_symbol \
2717                                         _bfd_mips_elf_copy_indirect_symbol
2718 #define elf_backend_hide_symbol         _bfd_mips_elf_hide_symbol
2719 #define elf_backend_ignore_discarded_relocs \
2720                                         _bfd_mips_elf_ignore_discarded_relocs
2721 #define elf_backend_mips_irix_compat    elf64_mips_irix_compat
2722 #define elf_backend_mips_rtype_to_howto mips_elf64_rtype_to_howto
2723 #define elf_backend_ecoff_debug_swap    &mips_elf64_ecoff_debug_swap
2724 #define elf_backend_size_info           mips_elf64_size_info
2725
2726 #define elf_backend_grok_prstatus       elf64_mips_grok_prstatus
2727 #define elf_backend_grok_psinfo         elf64_mips_grok_psinfo
2728
2729 #define elf_backend_got_header_size     (4 * MIPS_RESERVED_GOTNO)
2730
2731 /* MIPS ELF64 can use a mixture of REL and RELA, but some Relocations
2732    work better/work only in RELA, so we default to this.  */
2733 #define elf_backend_may_use_rel_p       1
2734 #define elf_backend_may_use_rela_p      1
2735 #define elf_backend_default_use_rela_p  1
2736
2737 #define elf_backend_write_section       _bfd_mips_elf_write_section
2738
2739 /* We don't set bfd_elf64_bfd_is_local_label_name because the 32-bit
2740    MIPS-specific function only applies to IRIX5, which had no 64-bit
2741    ABI.  */
2742 #define bfd_elf64_find_nearest_line     _bfd_mips_elf_find_nearest_line
2743 #define bfd_elf64_new_section_hook      _bfd_mips_elf_new_section_hook
2744 #define bfd_elf64_set_section_contents  _bfd_mips_elf_set_section_contents
2745 #define bfd_elf64_bfd_get_relocated_section_contents \
2746                                 _bfd_elf_mips_get_relocated_section_contents
2747 #define bfd_elf64_bfd_link_hash_table_create \
2748                                 _bfd_mips_elf_link_hash_table_create
2749 #define bfd_elf64_bfd_final_link        _bfd_mips_elf_final_link
2750 #define bfd_elf64_bfd_merge_private_bfd_data \
2751                                 _bfd_mips_elf_merge_private_bfd_data
2752 #define bfd_elf64_bfd_set_private_flags _bfd_mips_elf_set_private_flags
2753 #define bfd_elf64_bfd_print_private_bfd_data \
2754                                 _bfd_mips_elf_print_private_bfd_data
2755
2756 #define bfd_elf64_get_reloc_upper_bound mips_elf64_get_reloc_upper_bound
2757 #define bfd_elf64_canonicalize_reloc mips_elf64_canonicalize_reloc
2758 #define bfd_elf64_get_dynamic_reloc_upper_bound mips_elf64_get_dynamic_reloc_upper_bound
2759 #define bfd_elf64_canonicalize_dynamic_reloc mips_elf64_canonicalize_dynamic_reloc
2760 #define bfd_elf64_bfd_relax_section     _bfd_mips_relax_section
2761
2762 /* MIPS ELF64 archive functions.  */
2763 #define bfd_elf64_archive_functions
2764 extern bfd_boolean bfd_elf64_archive_slurp_armap
2765   (bfd *);
2766 extern bfd_boolean bfd_elf64_archive_write_armap
2767   (bfd *, unsigned int, struct orl *, unsigned int, int);
2768 #define bfd_elf64_archive_slurp_extended_name_table \
2769                         _bfd_archive_coff_slurp_extended_name_table
2770 #define bfd_elf64_archive_construct_extended_name_table \
2771                         _bfd_archive_coff_construct_extended_name_table
2772 #define bfd_elf64_archive_truncate_arname \
2773                         _bfd_archive_coff_truncate_arname
2774 #define bfd_elf64_archive_read_ar_hdr   _bfd_archive_coff_read_ar_hdr
2775 #define bfd_elf64_archive_openr_next_archived_file \
2776                         _bfd_archive_coff_openr_next_archived_file
2777 #define bfd_elf64_archive_get_elt_at_index \
2778                         _bfd_archive_coff_get_elt_at_index
2779 #define bfd_elf64_archive_generic_stat_arch_elt \
2780                         _bfd_archive_coff_generic_stat_arch_elt
2781 #define bfd_elf64_archive_update_armap_timestamp \
2782                         _bfd_archive_coff_update_armap_timestamp
2783
2784 /* The SGI style (n)64 NewABI.  */
2785 #define TARGET_LITTLE_SYM               bfd_elf64_littlemips_vec
2786 #define TARGET_LITTLE_NAME              "elf64-littlemips"
2787 #define TARGET_BIG_SYM                  bfd_elf64_bigmips_vec
2788 #define TARGET_BIG_NAME                 "elf64-bigmips"
2789
2790 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
2791    a value of 0x1000, and we are compatible.
2792    FIXME: How does this affect NewABI?  */
2793 #define ELF_MAXPAGESIZE                 0x1000
2794
2795 #include "elf64-target.h"
2796
2797 /* The SYSV-style 'traditional' (n)64 NewABI.  */
2798 #undef TARGET_LITTLE_SYM
2799 #undef TARGET_LITTLE_NAME
2800 #undef TARGET_BIG_SYM
2801 #undef TARGET_BIG_NAME
2802
2803 #undef ELF_MAXPAGESIZE
2804
2805 #define TARGET_LITTLE_SYM               bfd_elf64_tradlittlemips_vec
2806 #define TARGET_LITTLE_NAME              "elf64-tradlittlemips"
2807 #define TARGET_BIG_SYM                  bfd_elf64_tradbigmips_vec
2808 #define TARGET_BIG_NAME                 "elf64-tradbigmips"
2809
2810 /* The SVR4 MIPS ABI says that this should be 0x10000, and Linux uses
2811    page sizes of up to that limit, so we need to respect it.  */
2812 #define ELF_MAXPAGESIZE                 0x10000
2813 #define elf64_bed                       elf64_tradbed
2814
2815 /* Include the target file again for this target.  */
2816 #include "elf64-target.h"