bfd/elf32-mips.c

   1 /* MIPS-specific support for 32-bit ELF
   2    Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
   3    2003, 2004 Free Software Foundation, Inc.
   4
   5    Most of the information added by Ian Lance Taylor, Cygnus Support,
   6    <ian@cygnus.com>.
   7    N32/64 ABI support added by Mark Mitchell, CodeSourcery, LLC.
   8    <mark@codesourcery.com>
   9    Traditional MIPS targets support added by Koundinya.K, Dansk Data
  10    Elektronik & Operations Research Group. <kk@ddeorg.soft.net>
  11
  12 This file is part of BFD, the Binary File Descriptor library.
  13
  14 This program is free software; you can redistribute it and/or modify
  15 it under the terms of the GNU General Public License as published by
  16 the Free Software Foundation; either version 2 of the License, or
  17 (at your option) any later version.
  18
  19 This program is distributed in the hope that it will be useful,
  20 but WITHOUT ANY WARRANTY; without even the implied warranty of
  21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22 GNU General Public License for more details.
  23
  24 You should have received a copy of the GNU General Public License
  25 along with this program; if not, write to the Free Software
  26 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  27
  28 /* This file handles MIPS ELF targets.  SGI Irix 5 uses a slightly
  29    different MIPS ELF from other targets.  This matters when linking.
  30    This file supports both, switching at runtime.  */
  31
  32 #include "bfd.h"
  33 #include "sysdep.h"
  34 #include "libbfd.h"
  35 #include "bfdlink.h"
  36 #include "genlink.h"
  37 #include "elf-bfd.h"
  38 #include "elfxx-mips.h"
  39 #include "elf/mips.h"
  40
  41 /* Get the ECOFF swapping routines.  */
  42 #include "coff/sym.h"
  43 #include "coff/symconst.h"
  44 #include "coff/internal.h"
  45 #include "coff/ecoff.h"
  46 #include "coff/mips.h"
  47 #define ECOFF_SIGNED_32
  48 #include "ecoffswap.h"
  49
  50 static bfd_reloc_status_type gprel32_with_gp
  51   (bfd *, asymbol *, arelent *, asection *, bfd_boolean, void *, bfd_vma);
  52 static bfd_reloc_status_type mips_elf_gprel32_reloc
  53   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
  54 static bfd_reloc_status_type mips32_64bit_reloc
  55   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
  56 static reloc_howto_type *bfd_elf32_bfd_reloc_type_lookup
  57   (bfd *, bfd_reloc_code_real_type);
  58 static reloc_howto_type *mips_elf32_rtype_to_howto
  59   (unsigned int, bfd_boolean);
  60 static void mips_info_to_howto_rel
  61   (bfd *, arelent *, Elf_Internal_Rela *);
  62 static void mips_info_to_howto_rela
  63   (bfd *, arelent *, Elf_Internal_Rela *);
  64 static bfd_boolean mips_elf_sym_is_global
  65   (bfd *, asymbol *);
  66 static bfd_boolean mips_elf32_object_p
  67   (bfd *);
  68 static bfd_boolean mips_elf_is_local_label_name
  69   (bfd *, const char *);
  70 static bfd_reloc_status_type mips16_jump_reloc
  71   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
  72 static bfd_reloc_status_type mips16_gprel_reloc
  73   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
  74 static bfd_reloc_status_type mips_elf_final_gp
  75   (bfd *, asymbol *, bfd_boolean, char **, bfd_vma *);
  76 static bfd_boolean mips_elf_assign_gp
  77   (bfd *, bfd_vma *);
  78 static bfd_boolean elf32_mips_grok_prstatus
  79   (bfd *, Elf_Internal_Note *);
  80 static bfd_boolean elf32_mips_grok_psinfo
  81   (bfd *, Elf_Internal_Note *);
  82 static irix_compat_t elf32_mips_irix_compat
  83   (bfd *);
  84
  85 extern const bfd_target bfd_elf32_bigmips_vec;
  86 extern const bfd_target bfd_elf32_littlemips_vec;
  87
  88 /* Nonzero if ABFD is using the N32 ABI.  */
  89 #define ABI_N32_P(abfd) \
  90   ((elf_elfheader (abfd)->e_flags & EF_MIPS_ABI2) != 0)
  91
  92 /* Whether we are trying to be compatible with IRIX at all.  */
  93 #define SGI_COMPAT(abfd) \
  94   (elf32_mips_irix_compat (abfd) != ict_none)
  95
  96 /* The number of local .got entries we reserve.  */
  97 #define MIPS_RESERVED_GOTNO (2)
  98
  99 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
 100    from smaller values.  Start with zero, widen, *then* decrement.  */
 101 #define MINUS_ONE       (((bfd_vma)0) - 1)
 102
 103 /* The relocation table used for SHT_REL sections.  */
 104
 105 static reloc_howto_type elf_mips_howto_table_rel[] =
 106 {
 107   /* No relocation.  */
 108   HOWTO (R_MIPS_NONE,           /* type */
 109          0,                     /* rightshift */
 110          0,                     /* size (0 = byte, 1 = short, 2 = long) */
 111          0,                     /* bitsize */
 112          FALSE,                 /* pc_relative */
 113          0,                     /* bitpos */
 114          complain_overflow_dont, /* complain_on_overflow */
 115          _bfd_mips_elf_generic_reloc, /* special_function */
 116          "R_MIPS_NONE",         /* name */
 117          FALSE,                 /* partial_inplace */
 118          0,                     /* src_mask */
 119          0,                     /* dst_mask */
 120          FALSE),                /* pcrel_offset */
 121
 122   /* 16 bit relocation.  */
 123   HOWTO (R_MIPS_16,             /* type */
 124          0,                     /* rightshift */
 125          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 126          16,                    /* bitsize */
 127          FALSE,                 /* pc_relative */
 128          0,                     /* bitpos */
 129          complain_overflow_signed, /* complain_on_overflow */
 130          _bfd_mips_elf_generic_reloc, /* special_function */
 131          "R_MIPS_16",           /* name */
 132          TRUE,                  /* partial_inplace */
 133          0x0000ffff,            /* src_mask */
 134          0x0000ffff,            /* dst_mask */
 135          FALSE),                /* pcrel_offset */
 136
 137   /* 32 bit relocation.  */
 138   HOWTO (R_MIPS_32,             /* type */
 139          0,                     /* rightshift */
 140          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 141          32,                    /* bitsize */
 142          FALSE,                 /* pc_relative */
 143          0,                     /* bitpos */
 144          complain_overflow_dont, /* complain_on_overflow */
 145          _bfd_mips_elf_generic_reloc, /* special_function */
 146          "R_MIPS_32",           /* name */
 147          TRUE,                  /* partial_inplace */
 148          0xffffffff,            /* src_mask */
 149          0xffffffff,            /* dst_mask */
 150          FALSE),                /* pcrel_offset */
 151
 152   /* 32 bit symbol relative relocation.  */
 153   HOWTO (R_MIPS_REL32,          /* type */
 154          0,                     /* rightshift */
 155          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 156          32,                    /* bitsize */
 157          FALSE,                 /* pc_relative */
 158          0,                     /* bitpos */
 159          complain_overflow_dont, /* complain_on_overflow */
 160          _bfd_mips_elf_generic_reloc, /* special_function */
 161          "R_MIPS_REL32",        /* name */
 162          TRUE,                  /* partial_inplace */
 163          0xffffffff,            /* src_mask */
 164          0xffffffff,            /* dst_mask */
 165          FALSE),                /* pcrel_offset */
 166
 167   /* 26 bit jump address.  */
 168   HOWTO (R_MIPS_26,             /* type */
 169          2,                     /* rightshift */
 170          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 171          26,                    /* bitsize */
 172          FALSE,                 /* pc_relative */
 173          0,                     /* bitpos */
 174          complain_overflow_dont, /* complain_on_overflow */
 175                                 /* This needs complex overflow
 176                                    detection, because the upper four
 177                                    bits must match the PC + 4.  */
 178          _bfd_mips_elf_generic_reloc, /* special_function */
 179          "R_MIPS_26",           /* name */
 180          TRUE,                  /* partial_inplace */
 181          0x03ffffff,            /* src_mask */
 182          0x03ffffff,            /* dst_mask */
 183          FALSE),                /* pcrel_offset */
 184
 185   /* High 16 bits of symbol value.  */
 186   HOWTO (R_MIPS_HI16,           /* type */
 187          16,                    /* rightshift */
 188          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 189          16,                    /* bitsize */
 190          FALSE,                 /* pc_relative */
 191          0,                     /* bitpos */
 192          complain_overflow_dont, /* complain_on_overflow */
 193          _bfd_mips_elf_hi16_reloc, /* special_function */
 194          "R_MIPS_HI16",         /* name */
 195          TRUE,                  /* partial_inplace */
 196          0x0000ffff,            /* src_mask */
 197          0x0000ffff,            /* dst_mask */
 198          FALSE),                /* pcrel_offset */
 199
 200   /* Low 16 bits of symbol value.  */
 201   HOWTO (R_MIPS_LO16,           /* type */
 202          0,                     /* rightshift */
 203          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 204          16,                    /* bitsize */
 205          FALSE,                 /* pc_relative */
 206          0,                     /* bitpos */
 207          complain_overflow_dont, /* complain_on_overflow */
 208          _bfd_mips_elf_lo16_reloc, /* special_function */
 209          "R_MIPS_LO16",         /* name */
 210          TRUE,                  /* partial_inplace */
 211          0x0000ffff,            /* src_mask */
 212          0x0000ffff,            /* dst_mask */
 213          FALSE),                /* pcrel_offset */
 214
 215   /* GP relative reference.  */
 216   HOWTO (R_MIPS_GPREL16,        /* type */
 217          0,                     /* rightshift */
 218          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 219          16,                    /* bitsize */
 220          FALSE,                 /* pc_relative */
 221          0,                     /* bitpos */
 222          complain_overflow_signed, /* complain_on_overflow */
 223          _bfd_mips_elf32_gprel16_reloc, /* special_function */
 224          "R_MIPS_GPREL16",      /* name */
 225          TRUE,                  /* partial_inplace */
 226          0x0000ffff,            /* src_mask */
 227          0x0000ffff,            /* dst_mask */
 228          FALSE),                /* pcrel_offset */
 229
 230   /* Reference to literal section.  */
 231   HOWTO (R_MIPS_LITERAL,        /* type */
 232          0,                     /* rightshift */
 233          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 234          16,                    /* bitsize */
 235          FALSE,                 /* pc_relative */
 236          0,                     /* bitpos */
 237          complain_overflow_signed, /* complain_on_overflow */
 238          _bfd_mips_elf32_gprel16_reloc, /* special_function */
 239          "R_MIPS_LITERAL",      /* name */
 240          TRUE,                  /* partial_inplace */
 241          0x0000ffff,            /* src_mask */
 242          0x0000ffff,            /* dst_mask */
 243          FALSE),                /* pcrel_offset */
 244
 245   /* Reference to global offset table.  */
 246   HOWTO (R_MIPS_GOT16,          /* type */
 247          0,                     /* rightshift */
 248          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 249          16,                    /* bitsize */
 250          FALSE,                 /* pc_relative */
 251          0,                     /* bitpos */
 252          complain_overflow_signed, /* complain_on_overflow */
 253          _bfd_mips_elf_got16_reloc, /* special_function */
 254          "R_MIPS_GOT16",        /* name */
 255          TRUE,                  /* partial_inplace */
 256          0x0000ffff,            /* src_mask */
 257          0x0000ffff,            /* dst_mask */
 258          FALSE),                /* pcrel_offset */
 259
 260   /* 16 bit PC relative reference.  */
 261   HOWTO (R_MIPS_PC16,           /* type */
 262          0,                     /* rightshift */
 263          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 264          16,                    /* bitsize */
 265          TRUE,                  /* pc_relative */
 266          0,                     /* bitpos */
 267          complain_overflow_signed, /* complain_on_overflow */
 268          _bfd_mips_elf_generic_reloc, /* special_function */
 269          "R_MIPS_PC16",         /* name */
 270          TRUE,                  /* partial_inplace */
 271          0x0000ffff,            /* src_mask */
 272          0x0000ffff,            /* dst_mask */
 273          TRUE),                 /* pcrel_offset */
 274
 275   /* 16 bit call through global offset table.  */
 276   HOWTO (R_MIPS_CALL16,         /* type */
 277          0,                     /* rightshift */
 278          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 279          16,                    /* bitsize */
 280          FALSE,                 /* pc_relative */
 281          0,                     /* bitpos */
 282          complain_overflow_signed, /* complain_on_overflow */
 283          _bfd_mips_elf_generic_reloc, /* special_function */
 284          "R_MIPS_CALL16",       /* name */
 285          TRUE,                  /* partial_inplace */
 286          0x0000ffff,            /* src_mask */
 287          0x0000ffff,            /* dst_mask */
 288          FALSE),                /* pcrel_offset */
 289
 290   /* 32 bit GP relative reference.  */
 291   HOWTO (R_MIPS_GPREL32,        /* type */
 292          0,                     /* rightshift */
 293          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 294          32,                    /* bitsize */
 295          FALSE,                 /* pc_relative */
 296          0,                     /* bitpos */
 297          complain_overflow_dont, /* complain_on_overflow */
 298          mips_elf_gprel32_reloc, /* special_function */
 299          "R_MIPS_GPREL32",      /* name */
 300          TRUE,                  /* partial_inplace */
 301          0xffffffff,            /* src_mask */
 302          0xffffffff,            /* dst_mask */
 303          FALSE),                /* pcrel_offset */
 304
 305   /* The remaining relocs are defined on Irix 5, although they are
 306      not defined by the ABI.  */
 307   EMPTY_HOWTO (13),
 308   EMPTY_HOWTO (14),
 309   EMPTY_HOWTO (15),
 310
 311   /* A 5 bit shift field.  */
 312   HOWTO (R_MIPS_SHIFT5,         /* type */
 313          0,                     /* rightshift */
 314          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 315          5,                     /* bitsize */
 316          FALSE,                 /* pc_relative */
 317          6,                     /* bitpos */
 318          complain_overflow_bitfield, /* complain_on_overflow */
 319          _bfd_mips_elf_generic_reloc, /* special_function */
 320          "R_MIPS_SHIFT5",       /* name */
 321          TRUE,                  /* partial_inplace */
 322          0x000007c0,            /* src_mask */
 323          0x000007c0,            /* dst_mask */
 324          FALSE),                /* pcrel_offset */
 325
 326   /* A 6 bit shift field.  */
 327   /* FIXME: This is not handled correctly; a special function is
 328      needed to put the most significant bit in the right place.  */
 329   HOWTO (R_MIPS_SHIFT6,         /* type */
 330          0,                     /* rightshift */
 331          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 332          6,                     /* bitsize */
 333          FALSE,                 /* pc_relative */
 334          6,                     /* bitpos */
 335          complain_overflow_bitfield, /* complain_on_overflow */
 336          _bfd_mips_elf_generic_reloc, /* special_function */
 337          "R_MIPS_SHIFT6",       /* name */
 338          TRUE,                  /* partial_inplace */
 339          0x000007c4,            /* src_mask */
 340          0x000007c4,            /* dst_mask */
 341          FALSE),                /* pcrel_offset */
 342
 343   /* A 64 bit relocation.  */
 344   HOWTO (R_MIPS_64,             /* type */
 345          0,                     /* rightshift */
 346          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 347          64,                    /* bitsize */
 348          FALSE,                 /* pc_relative */
 349          0,                     /* bitpos */
 350          complain_overflow_dont, /* complain_on_overflow */
 351          mips32_64bit_reloc,    /* special_function */
 352          "R_MIPS_64",           /* name */
 353          TRUE,                  /* partial_inplace */
 354          MINUS_ONE,             /* src_mask */
 355          MINUS_ONE,             /* dst_mask */
 356          FALSE),                /* pcrel_offset */
 357
 358   /* Displacement in the global offset table.  */
 359   HOWTO (R_MIPS_GOT_DISP,       /* type */
 360          0,                     /* rightshift */
 361          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 362          16,                    /* bitsize */
 363          FALSE,                 /* pc_relative */
 364          0,                     /* bitpos */
 365          complain_overflow_signed, /* complain_on_overflow */
 366          _bfd_mips_elf_generic_reloc, /* special_function */
 367          "R_MIPS_GOT_DISP",     /* name */
 368          TRUE,                  /* partial_inplace */
 369          0x0000ffff,            /* src_mask */
 370          0x0000ffff,            /* dst_mask */
 371          FALSE),                /* pcrel_offset */
 372
 373   /* Displacement to page pointer in the global offset table.  */
 374   HOWTO (R_MIPS_GOT_PAGE,       /* type */
 375          0,                     /* rightshift */
 376          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 377          16,                    /* bitsize */
 378          FALSE,                 /* pc_relative */
 379          0,                     /* bitpos */
 380          complain_overflow_signed, /* complain_on_overflow */
 381          _bfd_mips_elf_generic_reloc, /* special_function */
 382          "R_MIPS_GOT_PAGE",     /* name */
 383          TRUE,                  /* partial_inplace */
 384          0x0000ffff,            /* src_mask */
 385          0x0000ffff,            /* dst_mask */
 386          FALSE),                /* pcrel_offset */
 387
 388   /* Offset from page pointer in the global offset table.  */
 389   HOWTO (R_MIPS_GOT_OFST,       /* type */
 390          0,                     /* rightshift */
 391          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 392          16,                    /* bitsize */
 393          FALSE,                 /* pc_relative */
 394          0,                     /* bitpos */
 395          complain_overflow_signed, /* complain_on_overflow */
 396          _bfd_mips_elf_generic_reloc, /* special_function */
 397          "R_MIPS_GOT_OFST",     /* name */
 398          TRUE,                  /* partial_inplace */
 399          0x0000ffff,            /* src_mask */
 400          0x0000ffff,            /* dst_mask */
 401          FALSE),                /* pcrel_offset */
 402
 403   /* High 16 bits of displacement in global offset table.  */
 404   HOWTO (R_MIPS_GOT_HI16,       /* type */
 405          0,                     /* rightshift */
 406          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 407          16,                    /* bitsize */
 408          FALSE,                 /* pc_relative */
 409          0,                     /* bitpos */
 410          complain_overflow_dont, /* complain_on_overflow */
 411          _bfd_mips_elf_generic_reloc, /* special_function */
 412          "R_MIPS_GOT_HI16",     /* name */
 413          TRUE,                  /* partial_inplace */
 414          0x0000ffff,            /* src_mask */
 415          0x0000ffff,            /* dst_mask */
 416          FALSE),                /* pcrel_offset */
 417
 418   /* Low 16 bits of displacement in global offset table.  */
 419   HOWTO (R_MIPS_GOT_LO16,       /* type */
 420          0,                     /* rightshift */
 421          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 422          16,                    /* bitsize */
 423          FALSE,                 /* pc_relative */
 424          0,                     /* bitpos */
 425          complain_overflow_dont, /* complain_on_overflow */
 426          _bfd_mips_elf_generic_reloc, /* special_function */
 427          "R_MIPS_GOT_LO16",     /* name */
 428          TRUE,                  /* partial_inplace */
 429          0x0000ffff,            /* src_mask */
 430          0x0000ffff,            /* dst_mask */
 431          FALSE),                /* pcrel_offset */
 432
 433   /* 64 bit subtraction.  Used in the N32 ABI.  */
 434   HOWTO (R_MIPS_SUB,            /* type */
 435          0,                     /* rightshift */
 436          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 437          64,                    /* bitsize */
 438          FALSE,                 /* pc_relative */
 439          0,                     /* bitpos */
 440          complain_overflow_dont, /* complain_on_overflow */
 441          _bfd_mips_elf_generic_reloc, /* special_function */
 442          "R_MIPS_SUB",          /* name */
 443          TRUE,                  /* partial_inplace */
 444          MINUS_ONE,             /* src_mask */
 445          MINUS_ONE,             /* dst_mask */
 446          FALSE),                /* pcrel_offset */
 447
 448   /* Used to cause the linker to insert and delete instructions?  */
 449   EMPTY_HOWTO (R_MIPS_INSERT_A),
 450   EMPTY_HOWTO (R_MIPS_INSERT_B),
 451   EMPTY_HOWTO (R_MIPS_DELETE),
 452
 453   /* Get the higher value of a 64 bit addend.  */
 454   HOWTO (R_MIPS_HIGHER,         /* type */
 455          0,                     /* rightshift */
 456          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 457          16,                    /* bitsize */
 458          FALSE,                 /* pc_relative */
 459          0,                     /* bitpos */
 460          complain_overflow_dont, /* complain_on_overflow */
 461          _bfd_mips_elf_generic_reloc, /* special_function */
 462          "R_MIPS_HIGHER",       /* name */
 463          TRUE,                  /* partial_inplace */
 464          0x0000ffff,            /* src_mask */
 465          0x0000ffff,            /* dst_mask */
 466          FALSE),                /* pcrel_offset */
 467
 468   /* Get the highest value of a 64 bit addend.  */
 469   HOWTO (R_MIPS_HIGHEST,        /* type */
 470          0,                     /* rightshift */
 471          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 472          16,                    /* bitsize */
 473          FALSE,                 /* pc_relative */
 474          0,                     /* bitpos */
 475          complain_overflow_dont, /* complain_on_overflow */
 476          _bfd_mips_elf_generic_reloc, /* special_function */
 477          "R_MIPS_HIGHEST",      /* name */
 478          TRUE,                  /* partial_inplace */
 479          0x0000ffff,            /* src_mask */
 480          0x0000ffff,            /* dst_mask */
 481          FALSE),                /* pcrel_offset */
 482
 483   /* High 16 bits of displacement in global offset table.  */
 484   HOWTO (R_MIPS_CALL_HI16,      /* type */
 485          0,                     /* rightshift */
 486          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 487          16,                    /* bitsize */
 488          FALSE,                 /* pc_relative */
 489          0,                     /* bitpos */
 490          complain_overflow_dont, /* complain_on_overflow */
 491          _bfd_mips_elf_generic_reloc, /* special_function */
 492          "R_MIPS_CALL_HI16",    /* name */
 493          TRUE,                  /* partial_inplace */
 494          0x0000ffff,            /* src_mask */
 495          0x0000ffff,            /* dst_mask */
 496          FALSE),                /* pcrel_offset */
 497
 498   /* Low 16 bits of displacement in global offset table.  */
 499   HOWTO (R_MIPS_CALL_LO16,      /* type */
 500          0,                     /* rightshift */
 501          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 502          16,                    /* bitsize */
 503          FALSE,                 /* pc_relative */
 504          0,                     /* bitpos */
 505          complain_overflow_dont, /* complain_on_overflow */
 506          _bfd_mips_elf_generic_reloc, /* special_function */
 507          "R_MIPS_CALL_LO16",    /* name */
 508          TRUE,                  /* partial_inplace */
 509          0x0000ffff,            /* src_mask */
 510          0x0000ffff,            /* dst_mask */
 511          FALSE),                /* pcrel_offset */
 512
 513   /* Section displacement.  */
 514   HOWTO (R_MIPS_SCN_DISP,       /* type */
 515          0,                     /* rightshift */
 516          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 517          32,                    /* bitsize */
 518          FALSE,                 /* pc_relative */
 519          0,                     /* bitpos */
 520          complain_overflow_dont, /* complain_on_overflow */
 521          _bfd_mips_elf_generic_reloc, /* special_function */
 522          "R_MIPS_SCN_DISP",     /* name */
 523          TRUE,                  /* partial_inplace */
 524          0xffffffff,            /* src_mask */
 525          0xffffffff,            /* dst_mask */
 526          FALSE),                /* pcrel_offset */
 527
 528   EMPTY_HOWTO (R_MIPS_REL16),
 529   EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
 530   EMPTY_HOWTO (R_MIPS_PJUMP),
 531   EMPTY_HOWTO (R_MIPS_RELGOT),
 532
 533   /* Protected jump conversion.  This is an optimization hint.  No
 534      relocation is required for correctness.  */
 535   HOWTO (R_MIPS_JALR,           /* type */
 536          0,                     /* rightshift */
 537          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 538          32,                    /* bitsize */
 539          FALSE,                 /* pc_relative */
 540          0,                     /* bitpos */
 541          complain_overflow_dont, /* complain_on_overflow */
 542          _bfd_mips_elf_generic_reloc, /* special_function */
 543          "R_MIPS_JALR",         /* name */
 544          FALSE,                 /* partial_inplace */
 545          0x00000000,            /* src_mask */
 546          0x00000000,            /* dst_mask */
 547          FALSE),                /* pcrel_offset */
 548 };
 549
 550 /* The reloc used for BFD_RELOC_CTOR when doing a 64 bit link.  This
 551    is a hack to make the linker think that we need 64 bit values.  */
 552 static reloc_howto_type elf_mips_ctor64_howto =
 553   HOWTO (R_MIPS_64,             /* type */
 554          0,                     /* rightshift */
 555          4,                     /* size (0 = byte, 1 = short, 2 = long) */
 556          32,                    /* bitsize */
 557          FALSE,                 /* pc_relative */
 558          0,                     /* bitpos */
 559          complain_overflow_signed, /* complain_on_overflow */
 560          mips32_64bit_reloc,    /* special_function */
 561          "R_MIPS_64",           /* name */
 562          TRUE,                  /* partial_inplace */
 563          0xffffffff,            /* src_mask */
 564          0xffffffff,            /* dst_mask */
 565          FALSE);                /* pcrel_offset */
 566
 567 static reloc_howto_type elf_mips16_howto_table_rel[] =
 568 {
 569   /* The reloc used for the mips16 jump instruction.  */
 570   HOWTO (R_MIPS16_26,           /* type */
 571          2,                     /* rightshift */
 572          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 573          26,                    /* bitsize */
 574          FALSE,                 /* pc_relative */
 575          0,                     /* bitpos */
 576          complain_overflow_dont, /* complain_on_overflow */
 577                                 /* This needs complex overflow
 578                                    detection, because the upper four
 579                                    bits must match the PC.  */
 580          mips16_jump_reloc,     /* special_function */
 581          "R_MIPS16_26",         /* name */
 582          TRUE,                  /* partial_inplace */
 583          0x3ffffff,             /* src_mask */
 584          0x3ffffff,             /* dst_mask */
 585          FALSE),                /* pcrel_offset */
 586
 587   /* The reloc used for the mips16 gprel instruction.  */
 588   HOWTO (R_MIPS16_GPREL,        /* type */
 589          0,                     /* rightshift */
 590          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 591          16,                    /* bitsize */
 592          FALSE,                 /* pc_relative */
 593          0,                     /* bitpos */
 594          complain_overflow_signed, /* complain_on_overflow */
 595          mips16_gprel_reloc,    /* special_function */
 596          "R_MIPS16_GPREL",      /* name */
 597          TRUE,                  /* partial_inplace */
 598          0x0000ffff,            /* src_mask */
 599          0x0000ffff,            /* dst_mask */
 600          FALSE),                /* pcrel_offset */
 601
 602   /* A placeholder for MIPS16 reference to global offset table.  */
 603   EMPTY_HOWTO (R_MIPS16_GOT16),
 604
 605   /* A placeholder for MIPS16 16 bit call through global offset table.  */
 606   EMPTY_HOWTO (R_MIPS16_CALL16),
 607
 608   /* MIPS16 high 16 bits of symbol value.  */
 609   HOWTO (R_MIPS16_HI16,         /* type */
 610          16,                    /* rightshift */
 611          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 612          16,                    /* bitsize */
 613          FALSE,                 /* pc_relative */
 614          0,                     /* bitpos */
 615          complain_overflow_dont, /* complain_on_overflow */
 616          _bfd_mips_elf_hi16_reloc, /* special_function */
 617          "R_MIPS16_HI16",       /* name */
 618          TRUE,                  /* partial_inplace */
 619          0x0000ffff,            /* src_mask */
 620          0x0000ffff,            /* dst_mask */
 621          FALSE),                /* pcrel_offset */
 622
 623   /* MIPS16 low 16 bits of symbol value.  */
 624   HOWTO (R_MIPS16_LO16,         /* type */
 625          0,                     /* rightshift */
 626          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 627          16,                    /* bitsize */
 628          FALSE,                 /* pc_relative */
 629          0,                     /* bitpos */
 630          complain_overflow_dont, /* complain_on_overflow */
 631          _bfd_mips_elf_lo16_reloc, /* special_function */
 632          "R_MIPS16_LO16",       /* name */
 633          TRUE,                  /* partial_inplace */
 634          0x0000ffff,            /* src_mask */
 635          0x0000ffff,            /* dst_mask */
 636          FALSE),                /* pcrel_offset */
 637 };
 638
 639 /* 16 bit offset for pc-relative branches.  */
 640 static reloc_howto_type elf_mips_gnu_rel16_s2 =
 641   HOWTO (R_MIPS_GNU_REL16_S2,   /* type */
 642          2,                     /* rightshift */
 643          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 644          16,                    /* bitsize */
 645          TRUE,                  /* pc_relative */
 646          0,                     /* bitpos */
 647          complain_overflow_signed, /* complain_on_overflow */
 648          _bfd_mips_elf_generic_reloc, /* special_function */
 649          "R_MIPS_GNU_REL16_S2", /* name */
 650          TRUE,                  /* partial_inplace */
 651          0xffff,                /* src_mask */
 652          0xffff,                /* dst_mask */
 653          TRUE);                 /* pcrel_offset */
 654
 655 /* 32 bit pc-relative.  This was a GNU extension used by embedded-PIC.
 656    It was co-opted by mips-linux for exception-handling data.  It is no
 657    longer used, but should continue to be supported by the linker for
 658    backward compatibility.  (GCC stopped using it in May, 2004.)  */
 659 static reloc_howto_type elf_mips_gnu_pcrel32 =
 660   HOWTO (R_MIPS_PC32,           /* type */
 661          0,                     /* rightshift */
 662          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 663          32,                    /* bitsize */
 664          TRUE,                  /* pc_relative */
 665          0,                     /* bitpos */
 666          complain_overflow_signed, /* complain_on_overflow */
 667          _bfd_mips_elf_generic_reloc, /* special_function */
 668          "R_MIPS_PC32",         /* name */
 669          TRUE,                  /* partial_inplace */
 670          0xffffffff,            /* src_mask */
 671          0xffffffff,            /* dst_mask */
 672          TRUE);                 /* pcrel_offset */
 673
 674 /* GNU extension to record C++ vtable hierarchy */
 675 static reloc_howto_type elf_mips_gnu_vtinherit_howto =
 676   HOWTO (R_MIPS_GNU_VTINHERIT,  /* type */
 677          0,                     /* rightshift */
 678          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 679          0,                     /* bitsize */
 680          FALSE,                 /* pc_relative */
 681          0,                     /* bitpos */
 682          complain_overflow_dont, /* complain_on_overflow */
 683          NULL,                  /* special_function */
 684          "R_MIPS_GNU_VTINHERIT", /* name */
 685          FALSE,                 /* partial_inplace */
 686          0,                     /* src_mask */
 687          0,                     /* dst_mask */
 688          FALSE);                /* pcrel_offset */
 689
 690 /* GNU extension to record C++ vtable member usage */
 691 static reloc_howto_type elf_mips_gnu_vtentry_howto =
 692   HOWTO (R_MIPS_GNU_VTENTRY,    /* type */
 693          0,                     /* rightshift */
 694          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 695          0,                     /* bitsize */
 696          FALSE,                 /* pc_relative */
 697          0,                     /* bitpos */
 698          complain_overflow_dont, /* complain_on_overflow */
 699          _bfd_elf_rel_vtable_reloc_fn, /* special_function */
 700          "R_MIPS_GNU_VTENTRY",  /* name */
 701          FALSE,                 /* partial_inplace */
 702          0,                     /* src_mask */
 703          0,                     /* dst_mask */
 704          FALSE);                /* pcrel_offset */
 705
 706 /* Set the GP value for OUTPUT_BFD.  Returns FALSE if this is a
 707    dangerous relocation.  */
 708
 709 static bfd_boolean
 710 mips_elf_assign_gp (bfd *output_bfd, bfd_vma *pgp)
 711 {
 712   unsigned int count;
 713   asymbol **sym;
 714   unsigned int i;
 715
 716   /* If we've already figured out what GP will be, just return it.  */
 717   *pgp = _bfd_get_gp_value (output_bfd);
 718   if (*pgp)
 719     return TRUE;
 720
 721   count = bfd_get_symcount (output_bfd);
 722   sym = bfd_get_outsymbols (output_bfd);
 723
 724   /* The linker script will have created a symbol named `_gp' with the
 725      appropriate value.  */
 726   if (sym == NULL)
 727     i = count;
 728   else
 729     {
 730       for (i = 0; i < count; i++, sym++)
 731         {
 732           register const char *name;
 733
 734           name = bfd_asymbol_name (*sym);
 735           if (*name == '_' && strcmp (name, "_gp") == 0)
 736             {
 737               *pgp = bfd_asymbol_value (*sym);
 738               _bfd_set_gp_value (output_bfd, *pgp);
 739               break;
 740             }
 741         }
 742     }
 743
 744   if (i >= count)
 745     {
 746       /* Only get the error once.  */
 747       *pgp = 4;
 748       _bfd_set_gp_value (output_bfd, *pgp);
 749       return FALSE;
 750     }
 751
 752   return TRUE;
 753 }
 754
 755 /* We have to figure out the gp value, so that we can adjust the
 756    symbol value correctly.  We look up the symbol _gp in the output
 757    BFD.  If we can't find it, we're stuck.  We cache it in the ELF
 758    target data.  We don't need to adjust the symbol value for an
 759    external symbol if we are producing relocatable output.  */
 760
 761 static bfd_reloc_status_type
 762 mips_elf_final_gp (bfd *output_bfd, asymbol *symbol, bfd_boolean relocatable,
 763                    char **error_message, bfd_vma *pgp)
 764 {
 765   if (bfd_is_und_section (symbol->section)
 766       && ! relocatable)
 767     {
 768       *pgp = 0;
 769       return bfd_reloc_undefined;
 770     }
 771
 772   *pgp = _bfd_get_gp_value (output_bfd);
 773   if (*pgp == 0
 774       && (! relocatable
 775           || (symbol->flags & BSF_SECTION_SYM) != 0))
 776     {
 777       if (relocatable)
 778         {
 779           /* Make up a value.  */
 780           *pgp = symbol->section->output_section->vma + 0x4000;
 781           _bfd_set_gp_value (output_bfd, *pgp);
 782         }
 783       else if (!mips_elf_assign_gp (output_bfd, pgp))
 784         {
 785           *error_message =
 786             (char *) _("GP relative relocation when _gp not defined");
 787           return bfd_reloc_dangerous;
 788         }
 789     }
 790
 791   return bfd_reloc_ok;
 792 }
 793
 794 /* Do a R_MIPS_GPREL16 relocation.  This is a 16 bit value which must
 795    become the offset from the gp register.  This function also handles
 796    R_MIPS_LITERAL relocations, although those can be handled more
 797    cleverly because the entries in the .lit8 and .lit4 sections can be
 798    merged.  */
 799
 800 bfd_reloc_status_type
 801 _bfd_mips_elf32_gprel16_reloc (bfd *abfd, arelent *reloc_entry,
 802                                asymbol *symbol, void *data,
 803                                asection *input_section, bfd *output_bfd,
 804                                char **error_message)
 805 {
 806   bfd_boolean relocatable;
 807   bfd_reloc_status_type ret;
 808   bfd_vma gp;
 809
 810   /* R_MIPS_LITERAL relocations are defined for local symbols only.  */
 811   if (reloc_entry->howto->type == R_MIPS_LITERAL
 812       && output_bfd != NULL
 813       && (symbol->flags & BSF_SECTION_SYM) == 0
 814       && (symbol->flags & BSF_LOCAL) != 0)
 815     {
 816       *error_message = (char *)
 817         _("literal relocation occurs for an external symbol");
 818       return bfd_reloc_outofrange;
 819     }
 820
 821   if (output_bfd != NULL)
 822     relocatable = TRUE;
 823   else
 824     {
 825       relocatable = FALSE;
 826       output_bfd = symbol->section->output_section->owner;
 827     }
 828
 829   ret = mips_elf_final_gp (output_bfd, symbol, relocatable, error_message,
 830                            &gp);
 831   if (ret != bfd_reloc_ok)
 832     return ret;
 833
 834   return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
 835                                         input_section, relocatable,
 836                                         data, gp);
 837 }
 838
 839 /* Do a R_MIPS_GPREL32 relocation.  This is a 32 bit value which must
 840    become the offset from the gp register.  */
 841
 842 static bfd_reloc_status_type
 843 mips_elf_gprel32_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
 844                         void *data, asection *input_section, bfd *output_bfd,
 845                         char **error_message)
 846 {
 847   bfd_boolean relocatable;
 848   bfd_reloc_status_type ret;
 849   bfd_vma gp;
 850
 851   /* R_MIPS_GPREL32 relocations are defined for local symbols only.  */
 852   if (output_bfd != NULL
 853       && (symbol->flags & BSF_SECTION_SYM) == 0
 854       && (symbol->flags & BSF_LOCAL) != 0)
 855     {
 856       *error_message = (char *)
 857         _("32bits gp relative relocation occurs for an external symbol");
 858       return bfd_reloc_outofrange;
 859     }
 860
 861   if (output_bfd != NULL)
 862     relocatable = TRUE;
 863   else
 864     {
 865       relocatable = FALSE;
 866       output_bfd = symbol->section->output_section->owner;
 867     }
 868
 869   ret = mips_elf_final_gp (output_bfd, symbol, relocatable,
 870                            error_message, &gp);
 871   if (ret != bfd_reloc_ok)
 872     return ret;
 873
 874   return gprel32_with_gp (abfd, symbol, reloc_entry, input_section,
 875                           relocatable, data, gp);
 876 }
 877
 878 static bfd_reloc_status_type
 879 gprel32_with_gp (bfd *abfd, asymbol *symbol, arelent *reloc_entry,
 880                  asection *input_section, bfd_boolean relocatable,
 881                  void *data, bfd_vma gp)
 882 {
 883   bfd_vma relocation;
 884   bfd_vma val;
 885
 886   if (bfd_is_com_section (symbol->section))
 887     relocation = 0;
 888   else
 889     relocation = symbol->value;
 890
 891   relocation += symbol->section->output_section->vma;
 892   relocation += symbol->section->output_offset;
 893
 894   if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
 895     return bfd_reloc_outofrange;
 896
 897   /* Set val to the offset into the section or symbol.  */
 898   val = reloc_entry->addend;
 899
 900   if (reloc_entry->howto->partial_inplace)
 901     val += bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
 902
 903   /* Adjust val for the final section location and GP value.  If we
 904      are producing relocatable output, we don't want to do this for
 905      an external symbol.  */
 906   if (! relocatable
 907       || (symbol->flags & BSF_SECTION_SYM) != 0)
 908     val += relocation - gp;
 909
 910   if (reloc_entry->howto->partial_inplace)
 911     bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
 912   else
 913     reloc_entry->addend = val;
 914
 915   if (relocatable)
 916     reloc_entry->address += input_section->output_offset;
 917
 918   return bfd_reloc_ok;
 919 }
 920
 921 /* Handle a 64 bit reloc in a 32 bit MIPS ELF file.  These are
 922    generated when addresses are 64 bits.  The upper 32 bits are a simple
 923    sign extension.  */
 924
 925 static bfd_reloc_status_type
 926 mips32_64bit_reloc (bfd *abfd, arelent *reloc_entry,
 927                     asymbol *symbol ATTRIBUTE_UNUSED,
 928                     void *data, asection *input_section,
 929                     bfd *output_bfd, char **error_message)
 930 {
 931   bfd_reloc_status_type r;
 932   arelent reloc32;
 933   unsigned long val;
 934   bfd_size_type addr;
 935
 936   /* Do a normal 32 bit relocation on the lower 32 bits.  */
 937   reloc32 = *reloc_entry;
 938   if (bfd_big_endian (abfd))
 939     reloc32.address += 4;
 940   reloc32.howto = &elf_mips_howto_table_rel[R_MIPS_32];
 941   r = bfd_perform_relocation (abfd, &reloc32, data, input_section,
 942                               output_bfd, error_message);
 943
 944   /* Sign extend into the upper 32 bits.  */
 945   val = bfd_get_32 (abfd, (bfd_byte *) data + reloc32.address);
 946   if ((val & 0x80000000) != 0)
 947     val = 0xffffffff;
 948   else
 949     val = 0;
 950   addr = reloc_entry->address;
 951   if (bfd_little_endian (abfd))
 952     addr += 4;
 953   bfd_put_32 (abfd, val, (bfd_byte *) data + addr);
 954
 955   return r;
 956 }
 957
 958 /* Handle a mips16 jump.  */
 959
 960 static bfd_reloc_status_type
 961 mips16_jump_reloc (bfd *abfd ATTRIBUTE_UNUSED, arelent *reloc_entry,
 962                    asymbol *symbol, void *data ATTRIBUTE_UNUSED,
 963                    asection *input_section, bfd *output_bfd,
 964                    char **error_message ATTRIBUTE_UNUSED)
 965 {
 966   if (output_bfd != NULL
 967       && (symbol->flags & BSF_SECTION_SYM) == 0
 968       && reloc_entry->addend == 0)
 969     {
 970       reloc_entry->address += input_section->output_offset;
 971       return bfd_reloc_ok;
 972     }
 973
 974   /* FIXME.  */
 975   {
 976     static bfd_boolean warned;
 977
 978     if (! warned)
 979       (*_bfd_error_handler)
 980         (_("Linking mips16 objects into %s format is not supported"),
 981          bfd_get_target (input_section->output_section->owner));
 982     warned = TRUE;
 983   }
 984
 985   return bfd_reloc_undefined;
 986 }
 987
 988 /* Handle a mips16 GP relative reloc.  */
 989
 990 static bfd_reloc_status_type
 991 mips16_gprel_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
 992                     void *data, asection *input_section, bfd *output_bfd,
 993                     char **error_message)
 994 {
 995   bfd_boolean relocatable;
 996   bfd_reloc_status_type ret;
 997   bfd_byte *location;
 998   bfd_vma gp;
 999
1000   /* If we're relocating, and this is an external symbol, we don't want
1001      to change anything.  */
1002   if (output_bfd != NULL
1003       && (symbol->flags & BSF_SECTION_SYM) == 0
1004       && (symbol->flags & BSF_LOCAL) != 0)
1005     {
1006       reloc_entry->address += input_section->output_offset;
1007       return bfd_reloc_ok;
1008     }
1009
1010   if (output_bfd != NULL)
1011     relocatable = TRUE;
1012   else
1013     {
1014       relocatable = FALSE;
1015       output_bfd = symbol->section->output_section->owner;
1016     }
1017
1018   ret = mips_elf_final_gp (output_bfd, symbol, relocatable, error_message,
1019                            &gp);
1020   if (ret != bfd_reloc_ok)
1021     return ret;
1022
1023   location = (bfd_byte *) data + reloc_entry->address;
1024   _bfd_mips16_elf_reloc_unshuffle (abfd, reloc_entry->howto->type, FALSE,
1025                                    location);
1026   ret = _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1027                                        input_section, relocatable,
1028                                        data, gp);
1029   _bfd_mips16_elf_reloc_shuffle (abfd, reloc_entry->howto->type, !relocatable,
1030                                  location);
1031
1032   return ret;
1033 }
1034
1035 /* A mapping from BFD reloc types to MIPS ELF reloc types.  */
1036
1037 struct elf_reloc_map {
1038   bfd_reloc_code_real_type bfd_val;
1039   enum elf_mips_reloc_type elf_val;
1040 };
1041
1042 static const struct elf_reloc_map mips_reloc_map[] =
1043 {
1044   { BFD_RELOC_NONE, R_MIPS_NONE },
1045   { BFD_RELOC_16, R_MIPS_16 },
1046   { BFD_RELOC_32, R_MIPS_32 },
1047   /* There is no BFD reloc for R_MIPS_REL32.  */
1048   { BFD_RELOC_64, R_MIPS_64 },
1049   { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1050   { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1051   { BFD_RELOC_LO16, R_MIPS_LO16 },
1052   { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1053   { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1054   { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1055   { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1056   { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1057   { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1058   { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1059   { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1060   { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1061   { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1062   { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1063   { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1064   { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1065   { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP }
1066 };
1067
1068 static const struct elf_reloc_map mips16_reloc_map[] =
1069 {
1070   { BFD_RELOC_MIPS16_JMP, R_MIPS16_26 - R_MIPS16_min },
1071   { BFD_RELOC_MIPS16_GPREL, R_MIPS16_GPREL - R_MIPS16_min },
1072   { BFD_RELOC_MIPS16_HI16_S, R_MIPS16_HI16 - R_MIPS16_min },
1073   { BFD_RELOC_MIPS16_LO16, R_MIPS16_LO16 - R_MIPS16_min },
1074 };
1075
1076 /* Given a BFD reloc type, return a howto structure.  */
1077
1078 static reloc_howto_type *
1079 bfd_elf32_bfd_reloc_type_lookup (bfd *abfd, bfd_reloc_code_real_type code)
1080 {
1081   unsigned int i;
1082   reloc_howto_type *howto_table = elf_mips_howto_table_rel;
1083   reloc_howto_type *howto16_table = elf_mips16_howto_table_rel;
1084
1085   for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1086        i++)
1087     {
1088       if (mips_reloc_map[i].bfd_val == code)
1089         return &howto_table[(int) mips_reloc_map[i].elf_val];
1090     }
1091
1092   for (i = 0; i < sizeof (mips16_reloc_map) / sizeof (struct elf_reloc_map);
1093        i++)
1094     {
1095       if (mips16_reloc_map[i].bfd_val == code)
1096         return &howto16_table[(int) mips16_reloc_map[i].elf_val];
1097     }
1098
1099   switch (code)
1100     {
1101     default:
1102       bfd_set_error (bfd_error_bad_value);
1103       return NULL;
1104
1105     case BFD_RELOC_CTOR:
1106       /* We need to handle BFD_RELOC_CTOR specially.
1107          Select the right relocation (R_MIPS_32 or R_MIPS_64) based on the
1108          size of addresses of the ABI.  */
1109       if ((elf_elfheader (abfd)->e_flags & (E_MIPS_ABI_O64
1110                                             | E_MIPS_ABI_EABI64)) != 0)
1111         return &elf_mips_ctor64_howto;
1112       else
1113         return &howto_table[(int) R_MIPS_32];
1114
1115     case BFD_RELOC_VTABLE_INHERIT:
1116       return &elf_mips_gnu_vtinherit_howto;
1117     case BFD_RELOC_VTABLE_ENTRY:
1118       return &elf_mips_gnu_vtentry_howto;
1119     case BFD_RELOC_16_PCREL_S2:
1120       return &elf_mips_gnu_rel16_s2;
1121     case BFD_RELOC_32_PCREL:
1122       return &elf_mips_gnu_pcrel32;
1123     }
1124 }
1125
1126 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure.  */
1127
1128 static reloc_howto_type *
1129 mips_elf32_rtype_to_howto (unsigned int r_type,
1130                            bfd_boolean rela_p ATTRIBUTE_UNUSED)
1131 {
1132   switch (r_type)
1133     {
1134     case R_MIPS_GNU_VTINHERIT:
1135       return &elf_mips_gnu_vtinherit_howto;
1136     case R_MIPS_GNU_VTENTRY:
1137       return &elf_mips_gnu_vtentry_howto;
1138     case R_MIPS_GNU_REL16_S2:
1139       return &elf_mips_gnu_rel16_s2;
1140     case R_MIPS_PC32:
1141       return &elf_mips_gnu_pcrel32;
1142     default:
1143       if (r_type >= R_MIPS16_min && r_type < R_MIPS16_max)
1144         return &elf_mips16_howto_table_rel[r_type - R_MIPS16_min];
1145       BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1146       return &elf_mips_howto_table_rel[r_type];
1147     }
1148 }
1149
1150 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure.  */
1151
1152 static void
1153 mips_info_to_howto_rel (bfd *abfd, arelent *cache_ptr, Elf_Internal_Rela *dst)
1154 {
1155   unsigned int r_type;
1156
1157   r_type = ELF32_R_TYPE (dst->r_info);
1158   cache_ptr->howto = mips_elf32_rtype_to_howto (r_type, FALSE);
1159
1160   /* The addend for a GPREL16 or LITERAL relocation comes from the GP
1161      value for the object file.  We get the addend now, rather than
1162      when we do the relocation, because the symbol manipulations done
1163      by the linker may cause us to lose track of the input BFD.  */
1164   if (((*cache_ptr->sym_ptr_ptr)->flags & BSF_SECTION_SYM) != 0
1165       && (r_type == (unsigned int) R_MIPS_GPREL16
1166           || r_type == (unsigned int) R_MIPS_LITERAL))
1167     cache_ptr->addend = elf_gp (abfd);
1168 }
1169
1170 /* Given a MIPS Elf_Internal_Rela, fill in an arelent structure.  */
1171
1172 static void
1173 mips_info_to_howto_rela (bfd *abfd, arelent *cache_ptr, Elf_Internal_Rela *dst)
1174 {
1175   mips_info_to_howto_rel (abfd, cache_ptr, dst);
1176
1177   /* If we ever need to do any extra processing with dst->r_addend
1178      (the field omitted in an Elf_Internal_Rel) we can do it here.  */
1179 }
1180 \f
1181 /* Determine whether a symbol is global for the purposes of splitting
1182    the symbol table into global symbols and local symbols.  At least
1183    on Irix 5, this split must be between section symbols and all other
1184    symbols.  On most ELF targets the split is between static symbols
1185    and externally visible symbols.  */
1186
1187 static bfd_boolean
1188 mips_elf_sym_is_global (bfd *abfd ATTRIBUTE_UNUSED, asymbol *sym)
1189 {
1190   if (SGI_COMPAT (abfd))
1191     return (sym->flags & BSF_SECTION_SYM) == 0;
1192   else
1193     return ((sym->flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1194             || bfd_is_und_section (bfd_get_section (sym))
1195             || bfd_is_com_section (bfd_get_section (sym)));
1196 }
1197 \f
1198 /* Set the right machine number for a MIPS ELF file.  */
1199
1200 static bfd_boolean
1201 mips_elf32_object_p (bfd *abfd)
1202 {
1203   unsigned long mach;
1204
1205   /* Irix 5 and 6 are broken.  Object file symbol tables are not always
1206      sorted correctly such that local symbols precede global symbols,
1207      and the sh_info field in the symbol table is not always right.  */
1208   if (SGI_COMPAT (abfd))
1209     elf_bad_symtab (abfd) = TRUE;
1210
1211   if (ABI_N32_P (abfd))
1212     return FALSE;
1213
1214   mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
1215   bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
1216
1217   return TRUE;
1218 }
1219 \f
1220 /* MIPS ELF local labels start with '$', not 'L'.  */
1221
1222 static bfd_boolean
1223 mips_elf_is_local_label_name (bfd *abfd, const char *name)
1224 {
1225   if (name[0] == '$')
1226     return TRUE;
1227
1228   /* On Irix 6, the labels go back to starting with '.', so we accept
1229      the generic ELF local label syntax as well.  */
1230   return _bfd_elf_is_local_label_name (abfd, name);
1231 }
1232 \f
1233 /* Support for core dump NOTE sections.  */
1234 static bfd_boolean
1235 elf32_mips_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
1236 {
1237   int offset;
1238   unsigned int size;
1239
1240   switch (note->descsz)
1241     {
1242       default:
1243         return FALSE;
1244
1245       case 256:         /* Linux/MIPS */
1246         /* pr_cursig */
1247         elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
1248
1249         /* pr_pid */
1250         elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
1251
1252         /* pr_reg */
1253         offset = 72;
1254         size = 180;
1255
1256         break;
1257     }
1258
1259   /* Make a ".reg/999" section.  */
1260   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
1261                                           size, note->descpos + offset);
1262 }
1263
1264 static bfd_boolean
1265 elf32_mips_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
1266 {
1267   switch (note->descsz)
1268     {
1269       default:
1270         return FALSE;
1271
1272       case 128:         /* Linux/MIPS elf_prpsinfo */
1273         elf_tdata (abfd)->core_program
1274          = _bfd_elfcore_strndup (abfd, note->descdata + 32, 16);
1275         elf_tdata (abfd)->core_command
1276          = _bfd_elfcore_strndup (abfd, note->descdata + 48, 80);
1277     }
1278
1279   /* Note that for some reason, a spurious space is tacked
1280      onto the end of the args in some (at least one anyway)
1281      implementations, so strip it off if it exists.  */
1282
1283   {
1284     char *command = elf_tdata (abfd)->core_command;
1285     int n = strlen (command);
1286
1287     if (0 < n && command[n - 1] == ' ')
1288       command[n - 1] = '\0';
1289   }
1290
1291   return TRUE;
1292 }
1293 \f
1294 /* Depending on the target vector we generate some version of Irix
1295    executables or "normal" MIPS ELF ABI executables.  */
1296 static irix_compat_t
1297 elf32_mips_irix_compat (bfd *abfd)
1298 {
1299   if ((abfd->xvec == &bfd_elf32_bigmips_vec)
1300       || (abfd->xvec == &bfd_elf32_littlemips_vec))
1301     return ict_irix5;
1302   else
1303     return ict_none;
1304 }
1305 \f
1306 /* ECOFF swapping routines.  These are used when dealing with the
1307    .mdebug section, which is in the ECOFF debugging format.  */
1308 static const struct ecoff_debug_swap mips_elf32_ecoff_debug_swap = {
1309   /* Symbol table magic number.  */
1310   magicSym,
1311   /* Alignment of debugging information.  E.g., 4.  */
1312   4,
1313   /* Sizes of external symbolic information.  */
1314   sizeof (struct hdr_ext),
1315   sizeof (struct dnr_ext),
1316   sizeof (struct pdr_ext),
1317   sizeof (struct sym_ext),
1318   sizeof (struct opt_ext),
1319   sizeof (struct fdr_ext),
1320   sizeof (struct rfd_ext),
1321   sizeof (struct ext_ext),
1322   /* Functions to swap in external symbolic data.  */
1323   ecoff_swap_hdr_in,
1324   ecoff_swap_dnr_in,
1325   ecoff_swap_pdr_in,
1326   ecoff_swap_sym_in,
1327   ecoff_swap_opt_in,
1328   ecoff_swap_fdr_in,
1329   ecoff_swap_rfd_in,
1330   ecoff_swap_ext_in,
1331   _bfd_ecoff_swap_tir_in,
1332   _bfd_ecoff_swap_rndx_in,
1333   /* Functions to swap out external symbolic data.  */
1334   ecoff_swap_hdr_out,
1335   ecoff_swap_dnr_out,
1336   ecoff_swap_pdr_out,
1337   ecoff_swap_sym_out,
1338   ecoff_swap_opt_out,
1339   ecoff_swap_fdr_out,
1340   ecoff_swap_rfd_out,
1341   ecoff_swap_ext_out,
1342   _bfd_ecoff_swap_tir_out,
1343   _bfd_ecoff_swap_rndx_out,
1344   /* Function to read in symbolic data.  */
1345   _bfd_mips_elf_read_ecoff_info
1346 };
1347 \f
1348 #define ELF_ARCH                        bfd_arch_mips
1349 #define ELF_MACHINE_CODE                EM_MIPS
1350
1351 #define elf_backend_collect             TRUE
1352 #define elf_backend_type_change_ok      TRUE
1353 #define elf_backend_can_gc_sections     TRUE
1354 #define elf_info_to_howto               mips_info_to_howto_rela
1355 #define elf_info_to_howto_rel           mips_info_to_howto_rel
1356 #define elf_backend_sym_is_global       mips_elf_sym_is_global
1357 #define elf_backend_object_p            mips_elf32_object_p
1358 #define elf_backend_symbol_processing   _bfd_mips_elf_symbol_processing
1359 #define elf_backend_section_processing  _bfd_mips_elf_section_processing
1360 #define elf_backend_section_from_shdr   _bfd_mips_elf_section_from_shdr
1361 #define elf_backend_fake_sections       _bfd_mips_elf_fake_sections
1362 #define elf_backend_section_from_bfd_section \
1363                                         _bfd_mips_elf_section_from_bfd_section
1364 #define elf_backend_add_symbol_hook     _bfd_mips_elf_add_symbol_hook
1365 #define elf_backend_link_output_symbol_hook \
1366                                         _bfd_mips_elf_link_output_symbol_hook
1367 #define elf_backend_create_dynamic_sections \
1368                                         _bfd_mips_elf_create_dynamic_sections
1369 #define elf_backend_check_relocs        _bfd_mips_elf_check_relocs
1370 #define elf_backend_adjust_dynamic_symbol \
1371                                         _bfd_mips_elf_adjust_dynamic_symbol
1372 #define elf_backend_always_size_sections \
1373                                         _bfd_mips_elf_always_size_sections
1374 #define elf_backend_size_dynamic_sections \
1375                                         _bfd_mips_elf_size_dynamic_sections
1376 #define elf_backend_relocate_section    _bfd_mips_elf_relocate_section
1377 #define elf_backend_finish_dynamic_symbol \
1378                                         _bfd_mips_elf_finish_dynamic_symbol
1379 #define elf_backend_finish_dynamic_sections \
1380                                         _bfd_mips_elf_finish_dynamic_sections
1381 #define elf_backend_final_write_processing \
1382                                         _bfd_mips_elf_final_write_processing
1383 #define elf_backend_additional_program_headers \
1384                                         _bfd_mips_elf_additional_program_headers
1385 #define elf_backend_modify_segment_map  _bfd_mips_elf_modify_segment_map
1386 #define elf_backend_gc_mark_hook        _bfd_mips_elf_gc_mark_hook
1387 #define elf_backend_gc_sweep_hook       _bfd_mips_elf_gc_sweep_hook
1388 #define elf_backend_copy_indirect_symbol \
1389                                         _bfd_mips_elf_copy_indirect_symbol
1390 #define elf_backend_hide_symbol         _bfd_mips_elf_hide_symbol
1391 #define elf_backend_grok_prstatus       elf32_mips_grok_prstatus
1392 #define elf_backend_grok_psinfo         elf32_mips_grok_psinfo
1393 #define elf_backend_ecoff_debug_swap    &mips_elf32_ecoff_debug_swap
1394
1395 #define elf_backend_got_header_size     (4 * MIPS_RESERVED_GOTNO)
1396 #define elf_backend_may_use_rel_p       1
1397 #define elf_backend_may_use_rela_p      0
1398 #define elf_backend_default_use_rela_p  0
1399 #define elf_backend_sign_extend_vma     TRUE
1400
1401 #define elf_backend_discard_info        _bfd_mips_elf_discard_info
1402 #define elf_backend_ignore_discarded_relocs \
1403                                         _bfd_mips_elf_ignore_discarded_relocs
1404 #define elf_backend_mips_irix_compat    elf32_mips_irix_compat
1405 #define elf_backend_mips_rtype_to_howto mips_elf32_rtype_to_howto
1406 #define bfd_elf32_bfd_is_local_label_name \
1407                                         mips_elf_is_local_label_name
1408 #define bfd_elf32_find_nearest_line     _bfd_mips_elf_find_nearest_line
1409 #define bfd_elf32_new_section_hook      _bfd_mips_elf_new_section_hook
1410 #define bfd_elf32_set_section_contents  _bfd_mips_elf_set_section_contents
1411 #define bfd_elf32_bfd_get_relocated_section_contents \
1412                                 _bfd_elf_mips_get_relocated_section_contents
1413 #define bfd_elf32_bfd_link_hash_table_create \
1414                                         _bfd_mips_elf_link_hash_table_create
1415 #define bfd_elf32_bfd_final_link        _bfd_mips_elf_final_link
1416 #define bfd_elf32_bfd_merge_private_bfd_data \
1417                                         _bfd_mips_elf_merge_private_bfd_data
1418 #define bfd_elf32_bfd_set_private_flags _bfd_mips_elf_set_private_flags
1419 #define bfd_elf32_bfd_print_private_bfd_data \
1420                                         _bfd_mips_elf_print_private_bfd_data
1421
1422 /* Support for SGI-ish mips targets.  */
1423 #define TARGET_LITTLE_SYM               bfd_elf32_littlemips_vec
1424 #define TARGET_LITTLE_NAME              "elf32-littlemips"
1425 #define TARGET_BIG_SYM                  bfd_elf32_bigmips_vec
1426 #define TARGET_BIG_NAME                 "elf32-bigmips"
1427
1428 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
1429    a value of 0x1000, and we are compatible.  */
1430 #define ELF_MAXPAGESIZE                 0x1000
1431
1432 #include "elf32-target.h"
1433
1434 /* Support for traditional mips targets.  */
1435 #undef TARGET_LITTLE_SYM
1436 #undef TARGET_LITTLE_NAME
1437 #undef TARGET_BIG_SYM
1438 #undef TARGET_BIG_NAME
1439
1440 #undef ELF_MAXPAGESIZE
1441
1442 #define TARGET_LITTLE_SYM               bfd_elf32_tradlittlemips_vec
1443 #define TARGET_LITTLE_NAME              "elf32-tradlittlemips"
1444 #define TARGET_BIG_SYM                  bfd_elf32_tradbigmips_vec
1445 #define TARGET_BIG_NAME                 "elf32-tradbigmips"
1446
1447 /* The SVR4 MIPS ABI says that this should be 0x10000, and Linux uses
1448    page sizes of up to that limit, so we need to respect it.  */
1449 #define ELF_MAXPAGESIZE                 0x10000
1450 #define elf32_bed                       elf32_tradbed
1451
1452 /* Include the target file again for this target.  */
1453 #include "elf32-target.h"