bfd/elf64-x86-64.c

   1 /* X86-64 specific support for ELF
   2    Copyright (C) 2000-2018 Free Software Foundation, Inc.
   3    Contributed by Jan Hubicka <jh@suse.cz>.
   4
   5    This file is part of BFD, the Binary File Descriptor library.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  20    MA 02110-1301, USA.  */
  21
  22 #include "elfxx-x86.h"
  23 #include "elf-nacl.h"
  24 #include "dwarf2.h"
  25 #include "libiberty.h"
  26
  27 #include "opcode/i386.h"
  28 #include "elf/x86-64.h"
  29
  30 static bfd_boolean elf64_x86_64_copy_solaris_special_section_fields
  31   (const bfd *, bfd *, const Elf_Internal_Shdr *, Elf_Internal_Shdr *);
  32
  33 #ifdef CORE_HEADER
  34 #include <stdarg.h>
  35 #include CORE_HEADER
  36 #endif
  37
  38 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value.  */
  39 #define MINUS_ONE (~ (bfd_vma) 0)
  40
  41 /* Since both 32-bit and 64-bit x86-64 encode relocation type in the
  42    identical manner, we use ELF32_R_TYPE instead of ELF64_R_TYPE to get
  43    relocation type.  We also use ELF_ST_TYPE instead of ELF64_ST_TYPE
  44    since they are the same.  */
  45
  46 /* The relocation "howto" table.  Order of fields:
  47    type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
  48    special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset.  */
  49 static reloc_howto_type x86_64_elf_howto_table[] =
  50 {
  51   HOWTO(R_X86_64_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
  52         bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
  53         FALSE),
  54   HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  55         bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
  56         FALSE),
  57   HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
  58         bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
  59         TRUE),
  60   HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
  61         bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
  62         FALSE),
  63   HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
  64         bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
  65         TRUE),
  66   HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  67         bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
  68         FALSE),
  69   HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  70         bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
  71         MINUS_ONE, FALSE),
  72   HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  73         bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
  74         MINUS_ONE, FALSE),
  75   HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  76         bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
  77         MINUS_ONE, FALSE),
  78   HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
  79         bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
  80         0xffffffff, TRUE),
  81   HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
  82         bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
  83         FALSE),
  84   HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
  85         bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
  86         FALSE),
  87   HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
  88         bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
  89   HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
  90         bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
  91   HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
  92         bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
  93   HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
  94         bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
  95   HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  96         bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
  97         MINUS_ONE, FALSE),
  98   HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
  99         bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
 100         MINUS_ONE, FALSE),
 101   HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
 102         bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
 103         MINUS_ONE, FALSE),
 104   HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 105         bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
 106         0xffffffff, TRUE),
 107   HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 108         bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
 109         0xffffffff, TRUE),
 110   HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
 111         bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
 112         0xffffffff, FALSE),
 113   HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 114         bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
 115         0xffffffff, TRUE),
 116   HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
 117         bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
 118         0xffffffff, FALSE),
 119   HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
 120         bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
 121         TRUE),
 122   HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
 123         bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
 124         FALSE, MINUS_ONE, MINUS_ONE, FALSE),
 125   HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 126         bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
 127         FALSE, 0xffffffff, 0xffffffff, TRUE),
 128   HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
 129         bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
 130         FALSE),
 131   HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
 132         bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
 133         MINUS_ONE, TRUE),
 134   HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
 135         bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
 136         FALSE, MINUS_ONE, MINUS_ONE, TRUE),
 137   HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
 138         bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
 139         MINUS_ONE, FALSE),
 140   HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
 141         bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
 142         MINUS_ONE, FALSE),
 143   HOWTO(R_X86_64_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
 144         bfd_elf_generic_reloc, "R_X86_64_SIZE32", FALSE, 0xffffffff, 0xffffffff,
 145         FALSE),
 146   HOWTO(R_X86_64_SIZE64, 0, 4, 64, FALSE, 0, complain_overflow_unsigned,
 147         bfd_elf_generic_reloc, "R_X86_64_SIZE64", FALSE, MINUS_ONE, MINUS_ONE,
 148         FALSE),
 149   HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
 150         complain_overflow_bitfield, bfd_elf_generic_reloc,
 151         "R_X86_64_GOTPC32_TLSDESC",
 152         FALSE, 0xffffffff, 0xffffffff, TRUE),
 153   HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
 154         complain_overflow_dont, bfd_elf_generic_reloc,
 155         "R_X86_64_TLSDESC_CALL",
 156         FALSE, 0, 0, FALSE),
 157   HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
 158         complain_overflow_bitfield, bfd_elf_generic_reloc,
 159         "R_X86_64_TLSDESC",
 160         FALSE, MINUS_ONE, MINUS_ONE, FALSE),
 161   HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
 162         bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
 163         MINUS_ONE, FALSE),
 164   HOWTO(R_X86_64_RELATIVE64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
 165         bfd_elf_generic_reloc, "R_X86_64_RELATIVE64", FALSE, MINUS_ONE,
 166         MINUS_ONE, FALSE),
 167   HOWTO(R_X86_64_PC32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 168         bfd_elf_generic_reloc, "R_X86_64_PC32_BND", FALSE, 0xffffffff, 0xffffffff,
 169         TRUE),
 170   HOWTO(R_X86_64_PLT32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 171         bfd_elf_generic_reloc, "R_X86_64_PLT32_BND", FALSE, 0xffffffff, 0xffffffff,
 172         TRUE),
 173   HOWTO(R_X86_64_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 174         bfd_elf_generic_reloc, "R_X86_64_GOTPCRELX", FALSE, 0xffffffff,
 175         0xffffffff, TRUE),
 176   HOWTO(R_X86_64_REX_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
 177         bfd_elf_generic_reloc, "R_X86_64_REX_GOTPCRELX", FALSE, 0xffffffff,
 178         0xffffffff, TRUE),
 179
 180   /* We have a gap in the reloc numbers here.
 181      R_X86_64_standard counts the number up to this point, and
 182      R_X86_64_vt_offset is the value to subtract from a reloc type of
 183      R_X86_64_GNU_VT* to form an index into this table.  */
 184 #define R_X86_64_standard (R_X86_64_REX_GOTPCRELX + 1)
 185 #define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
 186
 187 /* GNU extension to record C++ vtable hierarchy.  */
 188   HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
 189          NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
 190
 191 /* GNU extension to record C++ vtable member usage.  */
 192   HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
 193          _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
 194          FALSE),
 195
 196 /* Use complain_overflow_bitfield on R_X86_64_32 for x32.  */
 197   HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 198         bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
 199         FALSE)
 200 };
 201
 202 /* Set if a relocation is converted from a GOTPCREL relocation.  */
 203 #define R_X86_64_converted_reloc_bit (1 << 7)
 204
 205 #define X86_PCREL_TYPE_P(TYPE)          \
 206   (   ((TYPE) == R_X86_64_PC8)          \
 207    || ((TYPE) == R_X86_64_PC16)         \
 208    || ((TYPE) == R_X86_64_PC32)         \
 209    || ((TYPE) == R_X86_64_PC32_BND)     \
 210    || ((TYPE) == R_X86_64_PC64))
 211
 212 #define X86_SIZE_TYPE_P(TYPE)           \
 213   ((TYPE) == R_X86_64_SIZE32 || (TYPE) == R_X86_64_SIZE64)
 214
 215 /* Map BFD relocs to the x86_64 elf relocs.  */
 216 struct elf_reloc_map
 217 {
 218   bfd_reloc_code_real_type bfd_reloc_val;
 219   unsigned char elf_reloc_val;
 220 };
 221
 222 static const struct elf_reloc_map x86_64_reloc_map[] =
 223 {
 224   { BFD_RELOC_NONE,             R_X86_64_NONE, },
 225   { BFD_RELOC_64,               R_X86_64_64,   },
 226   { BFD_RELOC_32_PCREL,         R_X86_64_PC32, },
 227   { BFD_RELOC_X86_64_GOT32,     R_X86_64_GOT32,},
 228   { BFD_RELOC_X86_64_PLT32,     R_X86_64_PLT32,},
 229   { BFD_RELOC_X86_64_COPY,      R_X86_64_COPY, },
 230   { BFD_RELOC_X86_64_GLOB_DAT,  R_X86_64_GLOB_DAT, },
 231   { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
 232   { BFD_RELOC_X86_64_RELATIVE,  R_X86_64_RELATIVE, },
 233   { BFD_RELOC_X86_64_GOTPCREL,  R_X86_64_GOTPCREL, },
 234   { BFD_RELOC_32,               R_X86_64_32, },
 235   { BFD_RELOC_X86_64_32S,       R_X86_64_32S, },
 236   { BFD_RELOC_16,               R_X86_64_16, },
 237   { BFD_RELOC_16_PCREL,         R_X86_64_PC16, },
 238   { BFD_RELOC_8,                R_X86_64_8, },
 239   { BFD_RELOC_8_PCREL,          R_X86_64_PC8, },
 240   { BFD_RELOC_X86_64_DTPMOD64,  R_X86_64_DTPMOD64, },
 241   { BFD_RELOC_X86_64_DTPOFF64,  R_X86_64_DTPOFF64, },
 242   { BFD_RELOC_X86_64_TPOFF64,   R_X86_64_TPOFF64, },
 243   { BFD_RELOC_X86_64_TLSGD,     R_X86_64_TLSGD, },
 244   { BFD_RELOC_X86_64_TLSLD,     R_X86_64_TLSLD, },
 245   { BFD_RELOC_X86_64_DTPOFF32,  R_X86_64_DTPOFF32, },
 246   { BFD_RELOC_X86_64_GOTTPOFF,  R_X86_64_GOTTPOFF, },
 247   { BFD_RELOC_X86_64_TPOFF32,   R_X86_64_TPOFF32, },
 248   { BFD_RELOC_64_PCREL,         R_X86_64_PC64, },
 249   { BFD_RELOC_X86_64_GOTOFF64,  R_X86_64_GOTOFF64, },
 250   { BFD_RELOC_X86_64_GOTPC32,   R_X86_64_GOTPC32, },
 251   { BFD_RELOC_X86_64_GOT64,     R_X86_64_GOT64, },
 252   { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
 253   { BFD_RELOC_X86_64_GOTPC64,   R_X86_64_GOTPC64, },
 254   { BFD_RELOC_X86_64_GOTPLT64,  R_X86_64_GOTPLT64, },
 255   { BFD_RELOC_X86_64_PLTOFF64,  R_X86_64_PLTOFF64, },
 256   { BFD_RELOC_SIZE32,           R_X86_64_SIZE32, },
 257   { BFD_RELOC_SIZE64,           R_X86_64_SIZE64, },
 258   { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
 259   { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
 260   { BFD_RELOC_X86_64_TLSDESC,   R_X86_64_TLSDESC, },
 261   { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
 262   { BFD_RELOC_X86_64_PC32_BND,  R_X86_64_PC32_BND, },
 263   { BFD_RELOC_X86_64_PLT32_BND, R_X86_64_PLT32_BND, },
 264   { BFD_RELOC_X86_64_GOTPCRELX, R_X86_64_GOTPCRELX, },
 265   { BFD_RELOC_X86_64_REX_GOTPCRELX, R_X86_64_REX_GOTPCRELX, },
 266   { BFD_RELOC_VTABLE_INHERIT,   R_X86_64_GNU_VTINHERIT, },
 267   { BFD_RELOC_VTABLE_ENTRY,     R_X86_64_GNU_VTENTRY, },
 268 };
 269
 270 static reloc_howto_type *
 271 elf_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
 272 {
 273   unsigned i;
 274
 275   if (r_type == (unsigned int) R_X86_64_32)
 276     {
 277       if (ABI_64_P (abfd))
 278         i = r_type;
 279       else
 280         i = ARRAY_SIZE (x86_64_elf_howto_table) - 1;
 281     }
 282   else if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
 283            || r_type >= (unsigned int) R_X86_64_max)
 284     {
 285       if (r_type >= (unsigned int) R_X86_64_standard)
 286         {
 287           /* xgettext:c-format */
 288           _bfd_error_handler (_("%B: invalid relocation type %d"),
 289                               abfd, (int) r_type);
 290           r_type = R_X86_64_NONE;
 291         }
 292       i = r_type;
 293     }
 294   else
 295     i = r_type - (unsigned int) R_X86_64_vt_offset;
 296   BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
 297   return &x86_64_elf_howto_table[i];
 298 }
 299
 300 /* Given a BFD reloc type, return a HOWTO structure.  */
 301 static reloc_howto_type *
 302 elf_x86_64_reloc_type_lookup (bfd *abfd,
 303                               bfd_reloc_code_real_type code)
 304 {
 305   unsigned int i;
 306
 307   for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
 308        i++)
 309     {
 310       if (x86_64_reloc_map[i].bfd_reloc_val == code)
 311         return elf_x86_64_rtype_to_howto (abfd,
 312                                           x86_64_reloc_map[i].elf_reloc_val);
 313     }
 314   return NULL;
 315 }
 316
 317 static reloc_howto_type *
 318 elf_x86_64_reloc_name_lookup (bfd *abfd,
 319                               const char *r_name)
 320 {
 321   unsigned int i;
 322
 323   if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
 324     {
 325       /* Get x32 R_X86_64_32.  */
 326       reloc_howto_type *reloc
 327         = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
 328       BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
 329       return reloc;
 330     }
 331
 332   for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
 333     if (x86_64_elf_howto_table[i].name != NULL
 334         && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
 335       return &x86_64_elf_howto_table[i];
 336
 337   return NULL;
 338 }
 339
 340 /* Given an x86_64 ELF reloc type, fill in an arelent structure.  */
 341
 342 static void
 343 elf_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
 344                           Elf_Internal_Rela *dst)
 345 {
 346   unsigned r_type;
 347
 348   r_type = ELF32_R_TYPE (dst->r_info);
 349   if (r_type != (unsigned int) R_X86_64_GNU_VTINHERIT
 350       && r_type != (unsigned int) R_X86_64_GNU_VTENTRY)
 351     r_type &= ~R_X86_64_converted_reloc_bit;
 352   cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
 353
 354   BFD_ASSERT (r_type == cache_ptr->howto->type || cache_ptr->howto->type == R_X86_64_NONE);
 355 }
 356 \f
 357 /* Support for core dump NOTE sections.  */
 358 static bfd_boolean
 359 elf_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
 360 {
 361   int offset;
 362   size_t size;
 363
 364   switch (note->descsz)
 365     {
 366       default:
 367         return FALSE;
 368
 369       case 296:         /* sizeof(istruct elf_prstatus) on Linux/x32 */
 370         /* pr_cursig */
 371         elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
 372
 373         /* pr_pid */
 374         elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
 375
 376         /* pr_reg */
 377         offset = 72;
 378         size = 216;
 379
 380         break;
 381
 382       case 336:         /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
 383         /* pr_cursig */
 384         elf_tdata (abfd)->core->signal
 385           = bfd_get_16 (abfd, note->descdata + 12);
 386
 387         /* pr_pid */
 388         elf_tdata (abfd)->core->lwpid
 389           = bfd_get_32 (abfd, note->descdata + 32);
 390
 391         /* pr_reg */
 392         offset = 112;
 393         size = 216;
 394
 395         break;
 396     }
 397
 398   /* Make a ".reg/999" section.  */
 399   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
 400                                           size, note->descpos + offset);
 401 }
 402
 403 static bfd_boolean
 404 elf_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
 405 {
 406   switch (note->descsz)
 407     {
 408       default:
 409         return FALSE;
 410
 411       case 124:         /* sizeof(struct elf_prpsinfo) on Linux/x32 */
 412         elf_tdata (abfd)->core->pid
 413           = bfd_get_32 (abfd, note->descdata + 12);
 414         elf_tdata (abfd)->core->program
 415           = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
 416         elf_tdata (abfd)->core->command
 417           = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
 418         break;
 419
 420       case 136:         /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
 421         elf_tdata (abfd)->core->pid
 422           = bfd_get_32 (abfd, note->descdata + 24);
 423         elf_tdata (abfd)->core->program
 424          = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
 425         elf_tdata (abfd)->core->command
 426          = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
 427     }
 428
 429   /* Note that for some reason, a spurious space is tacked
 430      onto the end of the args in some (at least one anyway)
 431      implementations, so strip it off if it exists.  */
 432
 433   {
 434     char *command = elf_tdata (abfd)->core->command;
 435     int n = strlen (command);
 436
 437     if (0 < n && command[n - 1] == ' ')
 438       command[n - 1] = '\0';
 439   }
 440
 441   return TRUE;
 442 }
 443
 444 #ifdef CORE_HEADER
 445 static char *
 446 elf_x86_64_write_core_note (bfd *abfd, char *buf, int *bufsiz,
 447                             int note_type, ...)
 448 {
 449   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
 450   va_list ap;
 451   const char *fname, *psargs;
 452   long pid;
 453   int cursig;
 454   const void *gregs;
 455
 456   switch (note_type)
 457     {
 458     default:
 459       return NULL;
 460
 461     case NT_PRPSINFO:
 462       va_start (ap, note_type);
 463       fname = va_arg (ap, const char *);
 464       psargs = va_arg (ap, const char *);
 465       va_end (ap);
 466
 467       if (bed->s->elfclass == ELFCLASS32)
 468         {
 469           prpsinfo32_t data;
 470           memset (&data, 0, sizeof (data));
 471           strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
 472           strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
 473           return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
 474                                      &data, sizeof (data));
 475         }
 476       else
 477         {
 478           prpsinfo64_t data;
 479           memset (&data, 0, sizeof (data));
 480           strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
 481           strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
 482           return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
 483                                      &data, sizeof (data));
 484         }
 485       /* NOTREACHED */
 486
 487     case NT_PRSTATUS:
 488       va_start (ap, note_type);
 489       pid = va_arg (ap, long);
 490       cursig = va_arg (ap, int);
 491       gregs = va_arg (ap, const void *);
 492       va_end (ap);
 493
 494       if (bed->s->elfclass == ELFCLASS32)
 495         {
 496           if (bed->elf_machine_code == EM_X86_64)
 497             {
 498               prstatusx32_t prstat;
 499               memset (&prstat, 0, sizeof (prstat));
 500               prstat.pr_pid = pid;
 501               prstat.pr_cursig = cursig;
 502               memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
 503               return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
 504                                          &prstat, sizeof (prstat));
 505             }
 506           else
 507             {
 508               prstatus32_t prstat;
 509               memset (&prstat, 0, sizeof (prstat));
 510               prstat.pr_pid = pid;
 511               prstat.pr_cursig = cursig;
 512               memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
 513               return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
 514                                          &prstat, sizeof (prstat));
 515             }
 516         }
 517       else
 518         {
 519           prstatus64_t prstat;
 520           memset (&prstat, 0, sizeof (prstat));
 521           prstat.pr_pid = pid;
 522           prstat.pr_cursig = cursig;
 523           memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
 524           return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
 525                                      &prstat, sizeof (prstat));
 526         }
 527     }
 528   /* NOTREACHED */
 529 }
 530 #endif
 531 \f
 532 /* Functions for the x86-64 ELF linker.  */
 533
 534 /* The size in bytes of an entry in the global offset table.  */
 535
 536 #define GOT_ENTRY_SIZE 8
 537
 538 /* The size in bytes of an entry in the lazy procedure linkage table.  */
 539
 540 #define LAZY_PLT_ENTRY_SIZE 16
 541
 542 /* The size in bytes of an entry in the non-lazy procedure linkage
 543    table.  */
 544
 545 #define NON_LAZY_PLT_ENTRY_SIZE 8
 546
 547 /* The first entry in a lazy procedure linkage table looks like this.
 548    See the SVR4 ABI i386 supplement and the x86-64 ABI to see how this
 549    works.  */
 550
 551 static const bfd_byte elf_x86_64_lazy_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
 552 {
 553   0xff, 0x35, 8, 0, 0, 0,       /* pushq GOT+8(%rip)  */
 554   0xff, 0x25, 16, 0, 0, 0,      /* jmpq *GOT+16(%rip) */
 555   0x0f, 0x1f, 0x40, 0x00        /* nopl 0(%rax)       */
 556 };
 557
 558 /* Subsequent entries in a lazy procedure linkage table look like this.  */
 559
 560 static const bfd_byte elf_x86_64_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 561 {
 562   0xff, 0x25,   /* jmpq *name@GOTPC(%rip) */
 563   0, 0, 0, 0,   /* replaced with offset to this symbol in .got.  */
 564   0x68,         /* pushq immediate */
 565   0, 0, 0, 0,   /* replaced with index into relocation table.  */
 566   0xe9,         /* jmp relative */
 567   0, 0, 0, 0    /* replaced with offset to start of .plt0.  */
 568 };
 569
 570 /* The first entry in a lazy procedure linkage table with BND prefix
 571    like this.  */
 572
 573 static const bfd_byte elf_x86_64_lazy_bnd_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
 574 {
 575   0xff, 0x35, 8, 0, 0, 0,         /* pushq GOT+8(%rip)        */
 576   0xf2, 0xff, 0x25, 16, 0, 0, 0,  /* bnd jmpq *GOT+16(%rip)   */
 577   0x0f, 0x1f, 0                   /* nopl (%rax)              */
 578 };
 579
 580 /* Subsequent entries for branches with BND prefx in a lazy procedure
 581    linkage table look like this.  */
 582
 583 static const bfd_byte elf_x86_64_lazy_bnd_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 584 {
 585   0x68, 0, 0, 0, 0,             /* pushq immediate            */
 586   0xf2, 0xe9, 0, 0, 0, 0,       /* bnd jmpq relative          */
 587   0x0f, 0x1f, 0x44, 0, 0        /* nopl 0(%rax,%rax,1)        */
 588 };
 589
 590 /* The first entry in the IBT-enabled lazy procedure linkage table is the
 591    the same as the lazy PLT with BND prefix so that bound registers are
 592    preserved when control is passed to dynamic linker.  Subsequent
 593    entries for a IBT-enabled lazy procedure linkage table look like
 594    this.  */
 595
 596 static const bfd_byte elf_x86_64_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 597 {
 598   0xf3, 0x0f, 0x1e, 0xfa,       /* endbr64                    */
 599   0x68, 0, 0, 0, 0,             /* pushq immediate            */
 600   0xf2, 0xe9, 0, 0, 0, 0,       /* bnd jmpq relative          */
 601   0x90                          /* nop                        */
 602 };
 603
 604 /* The first entry in the x32 IBT-enabled lazy procedure linkage table
 605    is the same as the normal lazy PLT.  Subsequent entries for an
 606    x32 IBT-enabled lazy procedure linkage table look like this.  */
 607
 608 static const bfd_byte elf_x32_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 609 {
 610   0xf3, 0x0f, 0x1e, 0xfa,       /* endbr64                    */
 611   0x68, 0, 0, 0, 0,             /* pushq immediate            */
 612   0xe9, 0, 0, 0, 0,             /* jmpq relative              */
 613   0x66, 0x90                    /* xchg %ax,%ax               */
 614 };
 615
 616 /* Entries in the non-lazey procedure linkage table look like this.  */
 617
 618 static const bfd_byte elf_x86_64_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
 619 {
 620   0xff, 0x25,        /* jmpq *name@GOTPC(%rip)                        */
 621   0, 0, 0, 0,        /* replaced with offset to this symbol in .got.  */
 622   0x66, 0x90         /* xchg %ax,%ax                                  */
 623 };
 624
 625 /* Entries for branches with BND prefix in the non-lazey procedure
 626    linkage table look like this.  */
 627
 628 static const bfd_byte elf_x86_64_non_lazy_bnd_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
 629 {
 630   0xf2, 0xff, 0x25,  /* bnd jmpq *name@GOTPC(%rip)                    */
 631   0, 0, 0, 0,        /* replaced with offset to this symbol in .got.  */
 632   0x90               /* nop                                           */
 633 };
 634
 635 /* Entries for branches with IBT-enabled in the non-lazey procedure
 636    linkage table look like this.  They have the same size as the lazy
 637    PLT entry.  */
 638
 639 static const bfd_byte elf_x86_64_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 640 {
 641   0xf3, 0x0f, 0x1e, 0xfa,       /* endbr64                     */
 642   0xf2, 0xff, 0x25,             /* bnd jmpq *name@GOTPC(%rip)  */
 643   0, 0, 0, 0,  /* replaced with offset to this symbol in .got. */
 644   0x0f, 0x1f, 0x44, 0x00, 0x00  /* nopl 0x0(%rax,%rax,1)       */
 645 };
 646
 647 /* Entries for branches with IBT-enabled in the x32 non-lazey procedure
 648    linkage table look like this.  They have the same size as the lazy
 649    PLT entry.  */
 650
 651 static const bfd_byte elf_x32_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
 652 {
 653   0xf3, 0x0f, 0x1e, 0xfa,            /* endbr64                */
 654   0xff, 0x25,                        /* jmpq *name@GOTPC(%rip) */
 655   0, 0, 0, 0,  /* replaced with offset to this symbol in .got. */
 656   0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1)  */
 657 };
 658
 659 /* .eh_frame covering the lazy .plt section.  */
 660
 661 static const bfd_byte elf_x86_64_eh_frame_lazy_plt[] =
 662 {
 663   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 664   0, 0, 0, 0,                   /* CIE ID */
 665   1,                            /* CIE version */
 666   'z', 'R', 0,                  /* Augmentation string */
 667   1,                            /* Code alignment factor */
 668   0x78,                         /* Data alignment factor */
 669   16,                           /* Return address column */
 670   1,                            /* Augmentation size */
 671   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 672   DW_CFA_def_cfa, 7, 8,         /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
 673   DW_CFA_offset + 16, 1,        /* DW_CFA_offset: r16 (rip) at cfa-8 */
 674   DW_CFA_nop, DW_CFA_nop,
 675
 676   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
 677   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 678   0, 0, 0, 0,                   /* R_X86_64_PC32 .plt goes here */
 679   0, 0, 0, 0,                   /* .plt size goes here */
 680   0,                            /* Augmentation size */
 681   DW_CFA_def_cfa_offset, 16,    /* DW_CFA_def_cfa_offset: 16 */
 682   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
 683   DW_CFA_def_cfa_offset, 24,    /* DW_CFA_def_cfa_offset: 24 */
 684   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
 685   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
 686   11,                           /* Block length */
 687   DW_OP_breg7, 8,               /* DW_OP_breg7 (rsp): 8 */
 688   DW_OP_breg16, 0,              /* DW_OP_breg16 (rip): 0 */
 689   DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
 690   DW_OP_lit3, DW_OP_shl, DW_OP_plus,
 691   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 692 };
 693
 694 /* .eh_frame covering the lazy BND .plt section.  */
 695
 696 static const bfd_byte elf_x86_64_eh_frame_lazy_bnd_plt[] =
 697 {
 698   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 699   0, 0, 0, 0,                   /* CIE ID */
 700   1,                            /* CIE version */
 701   'z', 'R', 0,                  /* Augmentation string */
 702   1,                            /* Code alignment factor */
 703   0x78,                         /* Data alignment factor */
 704   16,                           /* Return address column */
 705   1,                            /* Augmentation size */
 706   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 707   DW_CFA_def_cfa, 7, 8,         /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
 708   DW_CFA_offset + 16, 1,        /* DW_CFA_offset: r16 (rip) at cfa-8 */
 709   DW_CFA_nop, DW_CFA_nop,
 710
 711   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
 712   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 713   0, 0, 0, 0,                   /* R_X86_64_PC32 .plt goes here */
 714   0, 0, 0, 0,                   /* .plt size goes here */
 715   0,                            /* Augmentation size */
 716   DW_CFA_def_cfa_offset, 16,    /* DW_CFA_def_cfa_offset: 16 */
 717   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
 718   DW_CFA_def_cfa_offset, 24,    /* DW_CFA_def_cfa_offset: 24 */
 719   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
 720   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
 721   11,                           /* Block length */
 722   DW_OP_breg7, 8,               /* DW_OP_breg7 (rsp): 8 */
 723   DW_OP_breg16, 0,              /* DW_OP_breg16 (rip): 0 */
 724   DW_OP_lit15, DW_OP_and, DW_OP_lit5, DW_OP_ge,
 725   DW_OP_lit3, DW_OP_shl, DW_OP_plus,
 726   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 727 };
 728
 729 /* .eh_frame covering the lazy .plt section with IBT-enabled.  */
 730
 731 static const bfd_byte elf_x86_64_eh_frame_lazy_ibt_plt[] =
 732 {
 733   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 734   0, 0, 0, 0,                   /* CIE ID */
 735   1,                            /* CIE version */
 736   'z', 'R', 0,                  /* Augmentation string */
 737   1,                            /* Code alignment factor */
 738   0x78,                         /* Data alignment factor */
 739   16,                           /* Return address column */
 740   1,                            /* Augmentation size */
 741   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 742   DW_CFA_def_cfa, 7, 8,         /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
 743   DW_CFA_offset + 16, 1,        /* DW_CFA_offset: r16 (rip) at cfa-8 */
 744   DW_CFA_nop, DW_CFA_nop,
 745
 746   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
 747   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 748   0, 0, 0, 0,                   /* R_X86_64_PC32 .plt goes here */
 749   0, 0, 0, 0,                   /* .plt size goes here */
 750   0,                            /* Augmentation size */
 751   DW_CFA_def_cfa_offset, 16,    /* DW_CFA_def_cfa_offset: 16 */
 752   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
 753   DW_CFA_def_cfa_offset, 24,    /* DW_CFA_def_cfa_offset: 24 */
 754   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
 755   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
 756   11,                           /* Block length */
 757   DW_OP_breg7, 8,               /* DW_OP_breg7 (rsp): 8 */
 758   DW_OP_breg16, 0,              /* DW_OP_breg16 (rip): 0 */
 759   DW_OP_lit15, DW_OP_and, DW_OP_lit10, DW_OP_ge,
 760   DW_OP_lit3, DW_OP_shl, DW_OP_plus,
 761   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 762 };
 763
 764 /* .eh_frame covering the x32 lazy .plt section with IBT-enabled.  */
 765
 766 static const bfd_byte elf_x32_eh_frame_lazy_ibt_plt[] =
 767 {
 768   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 769   0, 0, 0, 0,                   /* CIE ID */
 770   1,                            /* CIE version */
 771   'z', 'R', 0,                  /* Augmentation string */
 772   1,                            /* Code alignment factor */
 773   0x78,                         /* Data alignment factor */
 774   16,                           /* Return address column */
 775   1,                            /* Augmentation size */
 776   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 777   DW_CFA_def_cfa, 7, 8,         /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
 778   DW_CFA_offset + 16, 1,        /* DW_CFA_offset: r16 (rip) at cfa-8 */
 779   DW_CFA_nop, DW_CFA_nop,
 780
 781   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
 782   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 783   0, 0, 0, 0,                   /* R_X86_64_PC32 .plt goes here */
 784   0, 0, 0, 0,                   /* .plt size goes here */
 785   0,                            /* Augmentation size */
 786   DW_CFA_def_cfa_offset, 16,    /* DW_CFA_def_cfa_offset: 16 */
 787   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
 788   DW_CFA_def_cfa_offset, 24,    /* DW_CFA_def_cfa_offset: 24 */
 789   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
 790   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
 791   11,                           /* Block length */
 792   DW_OP_breg7, 8,               /* DW_OP_breg7 (rsp): 8 */
 793   DW_OP_breg16, 0,              /* DW_OP_breg16 (rip): 0 */
 794   DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
 795   DW_OP_lit3, DW_OP_shl, DW_OP_plus,
 796   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 797 };
 798
 799 /* .eh_frame covering the non-lazy .plt section.  */
 800
 801 static const bfd_byte elf_x86_64_eh_frame_non_lazy_plt[] =
 802 {
 803 #define PLT_GOT_FDE_LENGTH              20
 804   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 805   0, 0, 0, 0,                   /* CIE ID */
 806   1,                            /* CIE version */
 807   'z', 'R', 0,                  /* Augmentation string */
 808   1,                            /* Code alignment factor */
 809   0x78,                         /* Data alignment factor */
 810   16,                           /* Return address column */
 811   1,                            /* Augmentation size */
 812   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 813   DW_CFA_def_cfa, 7, 8,         /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
 814   DW_CFA_offset + 16, 1,        /* DW_CFA_offset: r16 (rip) at cfa-8 */
 815   DW_CFA_nop, DW_CFA_nop,
 816
 817   PLT_GOT_FDE_LENGTH, 0, 0, 0,  /* FDE length */
 818   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 819   0, 0, 0, 0,                   /* the start of non-lazy .plt goes here */
 820   0, 0, 0, 0,                   /* non-lazy .plt size goes here */
 821   0,                            /* Augmentation size */
 822   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop,
 823   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 824 };
 825
 826 /* These are the standard parameters.  */
 827 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_plt =
 828   {
 829     elf_x86_64_lazy_plt0_entry,         /* plt0_entry */
 830     LAZY_PLT_ENTRY_SIZE,                /* plt0_entry_size */
 831     elf_x86_64_lazy_plt_entry,          /* plt_entry */
 832     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 833     2,                                  /* plt0_got1_offset */
 834     8,                                  /* plt0_got2_offset */
 835     12,                                 /* plt0_got2_insn_end */
 836     2,                                  /* plt_got_offset */
 837     7,                                  /* plt_reloc_offset */
 838     12,                                 /* plt_plt_offset */
 839     6,                                  /* plt_got_insn_size */
 840     LAZY_PLT_ENTRY_SIZE,                /* plt_plt_insn_end */
 841     6,                                  /* plt_lazy_offset */
 842     elf_x86_64_lazy_plt0_entry,         /* pic_plt0_entry */
 843     elf_x86_64_lazy_plt_entry,          /* pic_plt_entry */
 844     elf_x86_64_eh_frame_lazy_plt,       /* eh_frame_plt */
 845     sizeof (elf_x86_64_eh_frame_lazy_plt) /* eh_frame_plt_size */
 846   };
 847
 848 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_plt =
 849   {
 850     elf_x86_64_non_lazy_plt_entry,      /* plt_entry */
 851     elf_x86_64_non_lazy_plt_entry,      /* pic_plt_entry */
 852     NON_LAZY_PLT_ENTRY_SIZE,            /* plt_entry_size */
 853     2,                                  /* plt_got_offset */
 854     6,                                  /* plt_got_insn_size */
 855     elf_x86_64_eh_frame_non_lazy_plt,   /* eh_frame_plt */
 856     sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
 857   };
 858
 859 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_bnd_plt =
 860   {
 861     elf_x86_64_lazy_bnd_plt0_entry,     /* plt0_entry */
 862     LAZY_PLT_ENTRY_SIZE,                /* plt0_entry_size */
 863     elf_x86_64_lazy_bnd_plt_entry,      /* plt_entry */
 864     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 865     2,                                  /* plt0_got1_offset */
 866     1+8,                                /* plt0_got2_offset */
 867     1+12,                               /* plt0_got2_insn_end */
 868     1+2,                                /* plt_got_offset */
 869     1,                                  /* plt_reloc_offset */
 870     7,                                  /* plt_plt_offset */
 871     1+6,                                /* plt_got_insn_size */
 872     11,                                 /* plt_plt_insn_end */
 873     0,                                  /* plt_lazy_offset */
 874     elf_x86_64_lazy_bnd_plt0_entry,     /* pic_plt0_entry */
 875     elf_x86_64_lazy_bnd_plt_entry,      /* pic_plt_entry */
 876     elf_x86_64_eh_frame_lazy_bnd_plt,   /* eh_frame_plt */
 877     sizeof (elf_x86_64_eh_frame_lazy_bnd_plt) /* eh_frame_plt_size */
 878   };
 879
 880 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_bnd_plt =
 881   {
 882     elf_x86_64_non_lazy_bnd_plt_entry,  /* plt_entry */
 883     elf_x86_64_non_lazy_bnd_plt_entry,  /* pic_plt_entry */
 884     NON_LAZY_PLT_ENTRY_SIZE,            /* plt_entry_size */
 885     1+2,                                /* plt_got_offset */
 886     1+6,                                /* plt_got_insn_size */
 887     elf_x86_64_eh_frame_non_lazy_plt,   /* eh_frame_plt */
 888     sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
 889   };
 890
 891 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_ibt_plt =
 892   {
 893     elf_x86_64_lazy_bnd_plt0_entry,     /* plt0_entry */
 894     LAZY_PLT_ENTRY_SIZE,                /* plt0_entry_size */
 895     elf_x86_64_lazy_ibt_plt_entry,      /* plt_entry */
 896     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 897     2,                                  /* plt0_got1_offset */
 898     1+8,                                /* plt0_got2_offset */
 899     1+12,                               /* plt0_got2_insn_end */
 900     4+1+2,                              /* plt_got_offset */
 901     4+1,                                /* plt_reloc_offset */
 902     4+1+6,                              /* plt_plt_offset */
 903     4+1+6,                              /* plt_got_insn_size */
 904     4+1+5+5,                            /* plt_plt_insn_end */
 905     0,                                  /* plt_lazy_offset */
 906     elf_x86_64_lazy_bnd_plt0_entry,     /* pic_plt0_entry */
 907     elf_x86_64_lazy_ibt_plt_entry,      /* pic_plt_entry */
 908     elf_x86_64_eh_frame_lazy_ibt_plt,   /* eh_frame_plt */
 909     sizeof (elf_x86_64_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
 910   };
 911
 912 static const struct elf_x86_lazy_plt_layout elf_x32_lazy_ibt_plt =
 913   {
 914     elf_x86_64_lazy_plt0_entry,         /* plt0_entry */
 915     LAZY_PLT_ENTRY_SIZE,                /* plt0_entry_size */
 916     elf_x32_lazy_ibt_plt_entry,         /* plt_entry */
 917     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 918     2,                                  /* plt0_got1_offset */
 919     8,                                  /* plt0_got2_offset */
 920     12,                                 /* plt0_got2_insn_end */
 921     4+2,                                /* plt_got_offset */
 922     4+1,                                /* plt_reloc_offset */
 923     4+6,                                /* plt_plt_offset */
 924     4+6,                                /* plt_got_insn_size */
 925     4+5+5,                              /* plt_plt_insn_end */
 926     0,                                  /* plt_lazy_offset */
 927     elf_x86_64_lazy_plt0_entry,         /* pic_plt0_entry */
 928     elf_x32_lazy_ibt_plt_entry,         /* pic_plt_entry */
 929     elf_x32_eh_frame_lazy_ibt_plt,      /* eh_frame_plt */
 930     sizeof (elf_x32_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
 931   };
 932
 933 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_ibt_plt =
 934   {
 935     elf_x86_64_non_lazy_ibt_plt_entry,  /* plt_entry */
 936     elf_x86_64_non_lazy_ibt_plt_entry,  /* pic_plt_entry */
 937     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 938     4+1+2,                              /* plt_got_offset */
 939     4+1+6,                              /* plt_got_insn_size */
 940     elf_x86_64_eh_frame_non_lazy_plt,   /* eh_frame_plt */
 941     sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
 942   };
 943
 944 static const struct elf_x86_non_lazy_plt_layout elf_x32_non_lazy_ibt_plt =
 945   {
 946     elf_x32_non_lazy_ibt_plt_entry,     /* plt_entry */
 947     elf_x32_non_lazy_ibt_plt_entry,     /* pic_plt_entry */
 948     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
 949     4+2,                                /* plt_got_offset */
 950     4+6,                                /* plt_got_insn_size */
 951     elf_x86_64_eh_frame_non_lazy_plt,   /* eh_frame_plt */
 952     sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
 953   };
 954
 955 static const struct elf_x86_backend_data elf_x86_64_arch_bed =
 956   {
 957     is_normal                            /* os */
 958   };
 959
 960 #define elf_backend_arch_data   &elf_x86_64_arch_bed
 961
 962 static bfd_boolean
 963 elf64_x86_64_elf_object_p (bfd *abfd)
 964 {
 965   /* Set the right machine number for an x86-64 elf64 file.  */
 966   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
 967   return TRUE;
 968 }
 969
 970 static bfd_boolean
 971 elf32_x86_64_elf_object_p (bfd *abfd)
 972 {
 973   /* Set the right machine number for an x86-64 elf32 file.  */
 974   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32);
 975   return TRUE;
 976 }
 977
 978 /* Return TRUE if the TLS access code sequence support transition
 979    from R_TYPE.  */
 980
 981 static bfd_boolean
 982 elf_x86_64_check_tls_transition (bfd *abfd,
 983                                  struct bfd_link_info *info,
 984                                  asection *sec,
 985                                  bfd_byte *contents,
 986                                  Elf_Internal_Shdr *symtab_hdr,
 987                                  struct elf_link_hash_entry **sym_hashes,
 988                                  unsigned int r_type,
 989                                  const Elf_Internal_Rela *rel,
 990                                  const Elf_Internal_Rela *relend)
 991 {
 992   unsigned int val;
 993   unsigned long r_symndx;
 994   bfd_boolean largepic = FALSE;
 995   struct elf_link_hash_entry *h;
 996   bfd_vma offset;
 997   struct elf_x86_link_hash_table *htab;
 998   bfd_byte *call;
 999   bfd_boolean indirect_call;
1000
1001   htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1002   offset = rel->r_offset;
1003   switch (r_type)
1004     {
1005     case R_X86_64_TLSGD:
1006     case R_X86_64_TLSLD:
1007       if ((rel + 1) >= relend)
1008         return FALSE;
1009
1010       if (r_type == R_X86_64_TLSGD)
1011         {
1012           /* Check transition from GD access model.  For 64bit, only
1013                 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1014                 .word 0x6666; rex64; call __tls_get_addr@PLT
1015              or
1016                 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1017                 .byte 0x66; rex64
1018                 call *__tls_get_addr@GOTPCREL(%rip)
1019                 which may be converted to
1020                 addr32 call __tls_get_addr
1021              can transit to different access model.  For 32bit, only
1022                 leaq foo@tlsgd(%rip), %rdi
1023                 .word 0x6666; rex64; call __tls_get_addr@PLT
1024              or
1025                 leaq foo@tlsgd(%rip), %rdi
1026                 .byte 0x66; rex64
1027                 call *__tls_get_addr@GOTPCREL(%rip)
1028                 which may be converted to
1029                 addr32 call __tls_get_addr
1030              can transit to different access model.  For largepic,
1031              we also support:
1032                 leaq foo@tlsgd(%rip), %rdi
1033                 movabsq $__tls_get_addr@pltoff, %rax
1034                 addq $r15, %rax
1035                 call *%rax
1036              or
1037                 leaq foo@tlsgd(%rip), %rdi
1038                 movabsq $__tls_get_addr@pltoff, %rax
1039                 addq $rbx, %rax
1040                 call *%rax  */
1041
1042           static const unsigned char leaq[] = { 0x66, 0x48, 0x8d, 0x3d };
1043
1044           if ((offset + 12) > sec->size)
1045             return FALSE;
1046
1047           call = contents + offset + 4;
1048           if (call[0] != 0x66
1049               || !((call[1] == 0x48
1050                     && call[2] == 0xff
1051                     && call[3] == 0x15)
1052                    || (call[1] == 0x48
1053                        && call[2] == 0x67
1054                        && call[3] == 0xe8)
1055                    || (call[1] == 0x66
1056                        && call[2] == 0x48
1057                        && call[3] == 0xe8)))
1058             {
1059               if (!ABI_64_P (abfd)
1060                   || (offset + 19) > sec->size
1061                   || offset < 3
1062                   || memcmp (call - 7, leaq + 1, 3) != 0
1063                   || memcmp (call, "\x48\xb8", 2) != 0
1064                   || call[11] != 0x01
1065                   || call[13] != 0xff
1066                   || call[14] != 0xd0
1067                   || !((call[10] == 0x48 && call[12] == 0xd8)
1068                        || (call[10] == 0x4c && call[12] == 0xf8)))
1069                 return FALSE;
1070               largepic = TRUE;
1071             }
1072           else if (ABI_64_P (abfd))
1073             {
1074               if (offset < 4
1075                   || memcmp (contents + offset - 4, leaq, 4) != 0)
1076                 return FALSE;
1077             }
1078           else
1079             {
1080               if (offset < 3
1081                   || memcmp (contents + offset - 3, leaq + 1, 3) != 0)
1082                 return FALSE;
1083             }
1084           indirect_call = call[2] == 0xff;
1085         }
1086       else
1087         {
1088           /* Check transition from LD access model.  Only
1089                 leaq foo@tlsld(%rip), %rdi;
1090                 call __tls_get_addr@PLT
1091              or
1092                 leaq foo@tlsld(%rip), %rdi;
1093                 call *__tls_get_addr@GOTPCREL(%rip)
1094                 which may be converted to
1095                 addr32 call __tls_get_addr
1096              can transit to different access model.  For largepic
1097              we also support:
1098                 leaq foo@tlsld(%rip), %rdi
1099                 movabsq $__tls_get_addr@pltoff, %rax
1100                 addq $r15, %rax
1101                 call *%rax
1102              or
1103                 leaq foo@tlsld(%rip), %rdi
1104                 movabsq $__tls_get_addr@pltoff, %rax
1105                 addq $rbx, %rax
1106                 call *%rax  */
1107
1108           static const unsigned char lea[] = { 0x48, 0x8d, 0x3d };
1109
1110           if (offset < 3 || (offset + 9) > sec->size)
1111             return FALSE;
1112
1113           if (memcmp (contents + offset - 3, lea, 3) != 0)
1114             return FALSE;
1115
1116           call = contents + offset + 4;
1117           if (!(call[0] == 0xe8
1118                 || (call[0] == 0xff && call[1] == 0x15)
1119                 || (call[0] == 0x67 && call[1] == 0xe8)))
1120             {
1121               if (!ABI_64_P (abfd)
1122                   || (offset + 19) > sec->size
1123                   || memcmp (call, "\x48\xb8", 2) != 0
1124                   || call[11] != 0x01
1125                   || call[13] != 0xff
1126                   || call[14] != 0xd0
1127                   || !((call[10] == 0x48 && call[12] == 0xd8)
1128                        || (call[10] == 0x4c && call[12] == 0xf8)))
1129                 return FALSE;
1130               largepic = TRUE;
1131             }
1132           indirect_call = call[0] == 0xff;
1133         }
1134
1135       r_symndx = htab->r_sym (rel[1].r_info);
1136       if (r_symndx < symtab_hdr->sh_info)
1137         return FALSE;
1138
1139       h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1140       if (h == NULL
1141           || !((struct elf_x86_link_hash_entry *) h)->tls_get_addr)
1142         return FALSE;
1143       else
1144         {
1145           r_type = (ELF32_R_TYPE (rel[1].r_info)
1146                     & ~R_X86_64_converted_reloc_bit);
1147           if (largepic)
1148             return r_type == R_X86_64_PLTOFF64;
1149           else if (indirect_call)
1150             return r_type == R_X86_64_GOTPCRELX;
1151           else
1152             return (r_type == R_X86_64_PC32 || r_type == R_X86_64_PLT32);
1153         }
1154
1155     case R_X86_64_GOTTPOFF:
1156       /* Check transition from IE access model:
1157                 mov foo@gottpoff(%rip), %reg
1158                 add foo@gottpoff(%rip), %reg
1159        */
1160
1161       /* Check REX prefix first.  */
1162       if (offset >= 3 && (offset + 4) <= sec->size)
1163         {
1164           val = bfd_get_8 (abfd, contents + offset - 3);
1165           if (val != 0x48 && val != 0x4c)
1166             {
1167               /* X32 may have 0x44 REX prefix or no REX prefix.  */
1168               if (ABI_64_P (abfd))
1169                 return FALSE;
1170             }
1171         }
1172       else
1173         {
1174           /* X32 may not have any REX prefix.  */
1175           if (ABI_64_P (abfd))
1176             return FALSE;
1177           if (offset < 2 || (offset + 3) > sec->size)
1178             return FALSE;
1179         }
1180
1181       val = bfd_get_8 (abfd, contents + offset - 2);
1182       if (val != 0x8b && val != 0x03)
1183         return FALSE;
1184
1185       val = bfd_get_8 (abfd, contents + offset - 1);
1186       return (val & 0xc7) == 5;
1187
1188     case R_X86_64_GOTPC32_TLSDESC:
1189       /* Check transition from GDesc access model:
1190                 leaq x@tlsdesc(%rip), %rax
1191
1192          Make sure it's a leaq adding rip to a 32-bit offset
1193          into any register, although it's probably almost always
1194          going to be rax.  */
1195
1196       if (offset < 3 || (offset + 4) > sec->size)
1197         return FALSE;
1198
1199       val = bfd_get_8 (abfd, contents + offset - 3);
1200       if ((val & 0xfb) != 0x48)
1201         return FALSE;
1202
1203       if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1204         return FALSE;
1205
1206       val = bfd_get_8 (abfd, contents + offset - 1);
1207       return (val & 0xc7) == 0x05;
1208
1209     case R_X86_64_TLSDESC_CALL:
1210       /* Check transition from GDesc access model:
1211                 call *x@tlsdesc(%rax)
1212        */
1213       if (offset + 2 <= sec->size)
1214         {
1215           /* Make sure that it's a call *x@tlsdesc(%rax).  */
1216           call = contents + offset;
1217           return call[0] == 0xff && call[1] == 0x10;
1218         }
1219
1220       return FALSE;
1221
1222     default:
1223       abort ();
1224     }
1225 }
1226
1227 /* Return TRUE if the TLS access transition is OK or no transition
1228    will be performed.  Update R_TYPE if there is a transition.  */
1229
1230 static bfd_boolean
1231 elf_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1232                            asection *sec, bfd_byte *contents,
1233                            Elf_Internal_Shdr *symtab_hdr,
1234                            struct elf_link_hash_entry **sym_hashes,
1235                            unsigned int *r_type, int tls_type,
1236                            const Elf_Internal_Rela *rel,
1237                            const Elf_Internal_Rela *relend,
1238                            struct elf_link_hash_entry *h,
1239                            unsigned long r_symndx,
1240                            bfd_boolean from_relocate_section)
1241 {
1242   unsigned int from_type = *r_type;
1243   unsigned int to_type = from_type;
1244   bfd_boolean check = TRUE;
1245
1246   /* Skip TLS transition for functions.  */
1247   if (h != NULL
1248       && (h->type == STT_FUNC
1249           || h->type == STT_GNU_IFUNC))
1250     return TRUE;
1251
1252   switch (from_type)
1253     {
1254     case R_X86_64_TLSGD:
1255     case R_X86_64_GOTPC32_TLSDESC:
1256     case R_X86_64_TLSDESC_CALL:
1257     case R_X86_64_GOTTPOFF:
1258       if (bfd_link_executable (info))
1259         {
1260           if (h == NULL)
1261             to_type = R_X86_64_TPOFF32;
1262           else
1263             to_type = R_X86_64_GOTTPOFF;
1264         }
1265
1266       /* When we are called from elf_x86_64_relocate_section, there may
1267          be additional transitions based on TLS_TYPE.  */
1268       if (from_relocate_section)
1269         {
1270           unsigned int new_to_type = to_type;
1271
1272           if (TLS_TRANSITION_IE_TO_LE_P (info, h, tls_type))
1273             new_to_type = R_X86_64_TPOFF32;
1274
1275           if (to_type == R_X86_64_TLSGD
1276               || to_type == R_X86_64_GOTPC32_TLSDESC
1277               || to_type == R_X86_64_TLSDESC_CALL)
1278             {
1279               if (tls_type == GOT_TLS_IE)
1280                 new_to_type = R_X86_64_GOTTPOFF;
1281             }
1282
1283           /* We checked the transition before when we were called from
1284              elf_x86_64_check_relocs.  We only want to check the new
1285              transition which hasn't been checked before.  */
1286           check = new_to_type != to_type && from_type == to_type;
1287           to_type = new_to_type;
1288         }
1289
1290       break;
1291
1292     case R_X86_64_TLSLD:
1293       if (bfd_link_executable (info))
1294         to_type = R_X86_64_TPOFF32;
1295       break;
1296
1297     default:
1298       return TRUE;
1299     }
1300
1301   /* Return TRUE if there is no transition.  */
1302   if (from_type == to_type)
1303     return TRUE;
1304
1305   /* Check if the transition can be performed.  */
1306   if (check
1307       && ! elf_x86_64_check_tls_transition (abfd, info, sec, contents,
1308                                             symtab_hdr, sym_hashes,
1309                                             from_type, rel, relend))
1310     {
1311       reloc_howto_type *from, *to;
1312       const char *name;
1313
1314       from = elf_x86_64_rtype_to_howto (abfd, from_type);
1315       to = elf_x86_64_rtype_to_howto (abfd, to_type);
1316
1317       if (h)
1318         name = h->root.root.string;
1319       else
1320         {
1321           struct elf_x86_link_hash_table *htab;
1322
1323           htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1324           if (htab == NULL)
1325             name = "*unknown*";
1326           else
1327             {
1328               Elf_Internal_Sym *isym;
1329
1330               isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1331                                             abfd, r_symndx);
1332               name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1333             }
1334         }
1335
1336       _bfd_error_handler
1337         /* xgettext:c-format */
1338         (_("%B: TLS transition from %s to %s against `%s' at %#Lx "
1339            "in section `%A' failed"),
1340          abfd, from->name, to->name, name, rel->r_offset, sec);
1341       bfd_set_error (bfd_error_bad_value);
1342       return FALSE;
1343     }
1344
1345   *r_type = to_type;
1346   return TRUE;
1347 }
1348
1349 /* Rename some of the generic section flags to better document how they
1350    are used here.  */
1351 #define check_relocs_failed     sec_flg0
1352
1353 static bfd_boolean
1354 elf_x86_64_need_pic (struct bfd_link_info *info,
1355                      bfd *input_bfd, asection *sec,
1356                      struct elf_link_hash_entry *h,
1357                      Elf_Internal_Shdr *symtab_hdr,
1358                      Elf_Internal_Sym *isym,
1359                      reloc_howto_type *howto)
1360 {
1361   const char *v = "";
1362   const char *und = "";
1363   const char *pic = "";
1364   const char *object;
1365
1366   const char *name;
1367   if (h)
1368     {
1369       name = h->root.root.string;
1370       switch (ELF_ST_VISIBILITY (h->other))
1371         {
1372         case STV_HIDDEN:
1373           v = _("hidden symbol ");
1374           break;
1375         case STV_INTERNAL:
1376           v = _("internal symbol ");
1377           break;
1378         case STV_PROTECTED:
1379           v = _("protected symbol ");
1380           break;
1381         default:
1382           if (((struct elf_x86_link_hash_entry *) h)->def_protected)
1383             v = _("protected symbol ");
1384           else
1385             v = _("symbol ");
1386           pic = _("; recompile with -fPIC");
1387           break;
1388         }
1389
1390       if (!h->def_regular && !h->def_dynamic)
1391         und = _("undefined ");
1392     }
1393   else
1394     {
1395       name = bfd_elf_sym_name (input_bfd, symtab_hdr, isym, NULL);
1396       pic = _("; recompile with -fPIC");
1397     }
1398
1399   if (bfd_link_dll (info))
1400     object = _("a shared object");
1401   else if (bfd_link_pie (info))
1402     object = _("a PIE object");
1403   else
1404     object = _("a PDE object");
1405
1406   /* xgettext:c-format */
1407   _bfd_error_handler (_("%B: relocation %s against %s%s`%s' can "
1408                         "not be used when making %s%s"),
1409                       input_bfd, howto->name, und, v, name,
1410                       object, pic);
1411   bfd_set_error (bfd_error_bad_value);
1412   sec->check_relocs_failed = 1;
1413   return FALSE;
1414 }
1415
1416 /* With the local symbol, foo, we convert
1417    mov foo@GOTPCREL(%rip), %reg
1418    to
1419    lea foo(%rip), %reg
1420    and convert
1421    call/jmp *foo@GOTPCREL(%rip)
1422    to
1423    nop call foo/jmp foo nop
1424    When PIC is false, convert
1425    test %reg, foo@GOTPCREL(%rip)
1426    to
1427    test $foo, %reg
1428    and convert
1429    binop foo@GOTPCREL(%rip), %reg
1430    to
1431    binop $foo, %reg
1432    where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1433    instructions.  */
1434
1435 static bfd_boolean
1436 elf_x86_64_convert_load_reloc (bfd *abfd,
1437                                bfd_byte *contents,
1438                                unsigned int *r_type_p,
1439                                Elf_Internal_Rela *irel,
1440                                struct elf_link_hash_entry *h,
1441                                bfd_boolean *converted,
1442                                struct bfd_link_info *link_info)
1443 {
1444   struct elf_x86_link_hash_table *htab;
1445   bfd_boolean is_pic;
1446   bfd_boolean no_overflow;
1447   bfd_boolean relocx;
1448   bfd_boolean to_reloc_pc32;
1449   asection *tsec;
1450   bfd_signed_vma raddend;
1451   unsigned int opcode;
1452   unsigned int modrm;
1453   unsigned int r_type = *r_type_p;
1454   unsigned int r_symndx;
1455   bfd_vma roff = irel->r_offset;
1456
1457   if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
1458     return TRUE;
1459
1460   raddend = irel->r_addend;
1461   /* Addend for 32-bit PC-relative relocation must be -4.  */
1462   if (raddend != -4)
1463     return TRUE;
1464
1465   htab = elf_x86_hash_table (link_info, X86_64_ELF_DATA);
1466   is_pic = bfd_link_pic (link_info);
1467
1468   relocx = (r_type == R_X86_64_GOTPCRELX
1469             || r_type == R_X86_64_REX_GOTPCRELX);
1470
1471   /* TRUE if --no-relax is used.  */
1472   no_overflow = link_info->disable_target_specific_optimizations > 1;
1473
1474   r_symndx = htab->r_sym (irel->r_info);
1475
1476   opcode = bfd_get_8 (abfd, contents + roff - 2);
1477
1478   /* Convert mov to lea since it has been done for a while.  */
1479   if (opcode != 0x8b)
1480     {
1481       /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
1482          for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
1483          test, xor instructions.  */
1484       if (!relocx)
1485         return TRUE;
1486     }
1487
1488   /* We convert only to R_X86_64_PC32:
1489      1. Branch.
1490      2. R_X86_64_GOTPCREL since we can't modify REX byte.
1491      3. no_overflow is true.
1492      4. PIC.
1493      */
1494   to_reloc_pc32 = (opcode == 0xff
1495                    || !relocx
1496                    || no_overflow
1497                    || is_pic);
1498
1499   /* Get the symbol referred to by the reloc.  */
1500   if (h == NULL)
1501     {
1502       Elf_Internal_Sym *isym
1503         = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
1504
1505       /* Skip relocation against undefined symbols.  */
1506       if (isym->st_shndx == SHN_UNDEF)
1507         return TRUE;
1508
1509       if (isym->st_shndx == SHN_ABS)
1510         tsec = bfd_abs_section_ptr;
1511       else if (isym->st_shndx == SHN_COMMON)
1512         tsec = bfd_com_section_ptr;
1513       else if (isym->st_shndx == SHN_X86_64_LCOMMON)
1514         tsec = &_bfd_elf_large_com_section;
1515       else
1516         tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
1517     }
1518   else
1519     {
1520       /* Undefined weak symbol is only bound locally in executable
1521          and its reference is resolved as 0 without relocation
1522          overflow.  We can only perform this optimization for
1523          GOTPCRELX relocations since we need to modify REX byte.
1524          It is OK convert mov with R_X86_64_GOTPCREL to
1525          R_X86_64_PC32.  */
1526       bfd_boolean local_ref;
1527       struct elf_x86_link_hash_entry *eh = elf_x86_hash_entry (h);
1528
1529       /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P.  */
1530       local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
1531       if ((relocx || opcode == 0x8b)
1532           && (h->root.type == bfd_link_hash_undefweak
1533               && !eh->linker_def
1534               && local_ref))
1535         {
1536           if (opcode == 0xff)
1537             {
1538               /* Skip for branch instructions since R_X86_64_PC32
1539                  may overflow.  */
1540               if (no_overflow)
1541                 return TRUE;
1542             }
1543           else if (relocx)
1544             {
1545               /* For non-branch instructions, we can convert to
1546                  R_X86_64_32/R_X86_64_32S since we know if there
1547                  is a REX byte.  */
1548               to_reloc_pc32 = FALSE;
1549             }
1550
1551           /* Since we don't know the current PC when PIC is true,
1552              we can't convert to R_X86_64_PC32.  */
1553           if (to_reloc_pc32 && is_pic)
1554             return TRUE;
1555
1556           goto convert;
1557         }
1558       /* Avoid optimizing GOTPCREL relocations againt _DYNAMIC since
1559          ld.so may use its link-time address.  */
1560       else if (h->start_stop
1561                || eh->linker_def
1562                || ((h->def_regular
1563                     || h->root.type == bfd_link_hash_defined
1564                     || h->root.type == bfd_link_hash_defweak)
1565                    && h != htab->elf.hdynamic
1566                    && local_ref))
1567         {
1568           /* bfd_link_hash_new or bfd_link_hash_undefined is
1569              set by an assignment in a linker script in
1570              bfd_elf_record_link_assignment.  start_stop is set
1571              on __start_SECNAME/__stop_SECNAME which mark section
1572              SECNAME.  */
1573           if (h->start_stop
1574               || eh->linker_def
1575               || (h->def_regular
1576                   && (h->root.type == bfd_link_hash_new
1577                       || h->root.type == bfd_link_hash_undefined
1578                       || ((h->root.type == bfd_link_hash_defined
1579                            || h->root.type == bfd_link_hash_defweak)
1580                           && h->root.u.def.section == bfd_und_section_ptr))))
1581             {
1582               /* Skip since R_X86_64_32/R_X86_64_32S may overflow.  */
1583               if (no_overflow)
1584                 return TRUE;
1585               goto convert;
1586             }
1587           tsec = h->root.u.def.section;
1588         }
1589       else
1590         return TRUE;
1591     }
1592
1593   /* Don't convert GOTPCREL relocation against large section.  */
1594   if (elf_section_data (tsec) !=  NULL
1595       && (elf_section_flags (tsec) & SHF_X86_64_LARGE) != 0)
1596     return TRUE;
1597
1598   /* Skip since R_X86_64_PC32/R_X86_64_32/R_X86_64_32S may overflow.  */
1599   if (no_overflow)
1600     return TRUE;
1601
1602 convert:
1603   if (opcode == 0xff)
1604     {
1605       /* We have "call/jmp *foo@GOTPCREL(%rip)".  */
1606       unsigned int nop;
1607       unsigned int disp;
1608       bfd_vma nop_offset;
1609
1610       /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
1611          R_X86_64_PC32.  */
1612       modrm = bfd_get_8 (abfd, contents + roff - 1);
1613       if (modrm == 0x25)
1614         {
1615           /* Convert to "jmp foo nop".  */
1616           modrm = 0xe9;
1617           nop = NOP_OPCODE;
1618           nop_offset = irel->r_offset + 3;
1619           disp = bfd_get_32 (abfd, contents + irel->r_offset);
1620           irel->r_offset -= 1;
1621           bfd_put_32 (abfd, disp, contents + irel->r_offset);
1622         }
1623       else
1624         {
1625           struct elf_x86_link_hash_entry *eh
1626             = (struct elf_x86_link_hash_entry *) h;
1627
1628           /* Convert to "nop call foo".  ADDR_PREFIX_OPCODE
1629              is a nop prefix.  */
1630           modrm = 0xe8;
1631           /* To support TLS optimization, always use addr32 prefix for
1632              "call *__tls_get_addr@GOTPCREL(%rip)".  */
1633           if (eh && eh->tls_get_addr)
1634             {
1635               nop = 0x67;
1636               nop_offset = irel->r_offset - 2;
1637             }
1638           else
1639             {
1640               nop = link_info->call_nop_byte;
1641               if (link_info->call_nop_as_suffix)
1642                 {
1643                   nop_offset = irel->r_offset + 3;
1644                   disp = bfd_get_32 (abfd, contents + irel->r_offset);
1645                   irel->r_offset -= 1;
1646                   bfd_put_32 (abfd, disp, contents + irel->r_offset);
1647                 }
1648               else
1649                 nop_offset = irel->r_offset - 2;
1650             }
1651         }
1652       bfd_put_8 (abfd, nop, contents + nop_offset);
1653       bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1654       r_type = R_X86_64_PC32;
1655     }
1656   else
1657     {
1658       unsigned int rex;
1659       unsigned int rex_mask = REX_R;
1660
1661       if (r_type == R_X86_64_REX_GOTPCRELX)
1662         rex = bfd_get_8 (abfd, contents + roff - 3);
1663       else
1664         rex = 0;
1665
1666       if (opcode == 0x8b)
1667         {
1668           if (to_reloc_pc32)
1669             {
1670               /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1671                  "lea foo(%rip), %reg".  */
1672               opcode = 0x8d;
1673               r_type = R_X86_64_PC32;
1674             }
1675           else
1676             {
1677               /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1678                  "mov $foo, %reg".  */
1679               opcode = 0xc7;
1680               modrm = bfd_get_8 (abfd, contents + roff - 1);
1681               modrm = 0xc0 | (modrm & 0x38) >> 3;
1682               if ((rex & REX_W) != 0
1683                   && ABI_64_P (link_info->output_bfd))
1684                 {
1685                   /* Keep the REX_W bit in REX byte for LP64.  */
1686                   r_type = R_X86_64_32S;
1687                   goto rewrite_modrm_rex;
1688                 }
1689               else
1690                 {
1691                   /* If the REX_W bit in REX byte isn't needed,
1692                      use R_X86_64_32 and clear the W bit to avoid
1693                      sign-extend imm32 to imm64.  */
1694                   r_type = R_X86_64_32;
1695                   /* Clear the W bit in REX byte.  */
1696                   rex_mask |= REX_W;
1697                   goto rewrite_modrm_rex;
1698                 }
1699             }
1700         }
1701       else
1702         {
1703           /* R_X86_64_PC32 isn't supported.  */
1704           if (to_reloc_pc32)
1705             return TRUE;
1706
1707           modrm = bfd_get_8 (abfd, contents + roff - 1);
1708           if (opcode == 0x85)
1709             {
1710               /* Convert "test %reg, foo@GOTPCREL(%rip)" to
1711                  "test $foo, %reg".  */
1712               modrm = 0xc0 | (modrm & 0x38) >> 3;
1713               opcode = 0xf7;
1714             }
1715           else
1716             {
1717               /* Convert "binop foo@GOTPCREL(%rip), %reg" to
1718                  "binop $foo, %reg".  */
1719               modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
1720               opcode = 0x81;
1721             }
1722
1723           /* Use R_X86_64_32 with 32-bit operand to avoid relocation
1724              overflow when sign-extending imm32 to imm64.  */
1725           r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
1726
1727 rewrite_modrm_rex:
1728           bfd_put_8 (abfd, modrm, contents + roff - 1);
1729
1730           if (rex)
1731             {
1732               /* Move the R bit to the B bit in REX byte.  */
1733               rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
1734               bfd_put_8 (abfd, rex, contents + roff - 3);
1735             }
1736
1737           /* No addend for R_X86_64_32/R_X86_64_32S relocations.  */
1738           irel->r_addend = 0;
1739         }
1740
1741       bfd_put_8 (abfd, opcode, contents + roff - 2);
1742     }
1743
1744   *r_type_p = r_type;
1745   irel->r_info = htab->r_info (r_symndx,
1746                                r_type | R_X86_64_converted_reloc_bit);
1747
1748   *converted = TRUE;
1749
1750   return TRUE;
1751 }
1752
1753 /* Look through the relocs for a section during the first phase, and
1754    calculate needed space in the global offset table, procedure
1755    linkage table, and dynamic reloc sections.  */
1756
1757 static bfd_boolean
1758 elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1759                          asection *sec,
1760                          const Elf_Internal_Rela *relocs)
1761 {
1762   struct elf_x86_link_hash_table *htab;
1763   Elf_Internal_Shdr *symtab_hdr;
1764   struct elf_link_hash_entry **sym_hashes;
1765   const Elf_Internal_Rela *rel;
1766   const Elf_Internal_Rela *rel_end;
1767   asection *sreloc;
1768   bfd_byte *contents;
1769   bfd_boolean converted;
1770
1771   if (bfd_link_relocatable (info))
1772     return TRUE;
1773
1774   /* Don't do anything special with non-loaded, non-alloced sections.
1775      In particular, any relocs in such sections should not affect GOT
1776      and PLT reference counting (ie. we don't allow them to create GOT
1777      or PLT entries), there's no possibility or desire to optimize TLS
1778      relocs, and there's not much point in propagating relocs to shared
1779      libs that the dynamic linker won't relocate.  */
1780   if ((sec->flags & SEC_ALLOC) == 0)
1781     return TRUE;
1782
1783   htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1784   if (htab == NULL)
1785     {
1786       sec->check_relocs_failed = 1;
1787       return FALSE;
1788     }
1789
1790   BFD_ASSERT (is_x86_elf (abfd, htab));
1791
1792   /* Get the section contents.  */
1793   if (elf_section_data (sec)->this_hdr.contents != NULL)
1794     contents = elf_section_data (sec)->this_hdr.contents;
1795   else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1796     {
1797       sec->check_relocs_failed = 1;
1798       return FALSE;
1799     }
1800
1801   symtab_hdr = &elf_symtab_hdr (abfd);
1802   sym_hashes = elf_sym_hashes (abfd);
1803
1804   converted = FALSE;
1805
1806   sreloc = NULL;
1807
1808   rel_end = relocs + sec->reloc_count;
1809   for (rel = relocs; rel < rel_end; rel++)
1810     {
1811       unsigned int r_type;
1812       unsigned int r_symndx;
1813       struct elf_link_hash_entry *h;
1814       struct elf_x86_link_hash_entry *eh;
1815       Elf_Internal_Sym *isym;
1816       const char *name;
1817       bfd_boolean size_reloc;
1818       bfd_boolean converted_reloc;
1819
1820       r_symndx = htab->r_sym (rel->r_info);
1821       r_type = ELF32_R_TYPE (rel->r_info);
1822
1823       if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1824         {
1825           /* xgettext:c-format */
1826           _bfd_error_handler (_("%B: bad symbol index: %d"),
1827                               abfd, r_symndx);
1828           goto error_return;
1829         }
1830
1831       if (r_symndx < symtab_hdr->sh_info)
1832         {
1833           /* A local symbol.  */
1834           isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1835                                         abfd, r_symndx);
1836           if (isym == NULL)
1837             goto error_return;
1838
1839           /* Check relocation against local STT_GNU_IFUNC symbol.  */
1840           if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1841             {
1842               h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel,
1843                                                    TRUE);
1844               if (h == NULL)
1845                 goto error_return;
1846
1847               /* Fake a STT_GNU_IFUNC symbol.  */
1848               h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1849                                                       isym, NULL);
1850               h->type = STT_GNU_IFUNC;
1851               h->def_regular = 1;
1852               h->ref_regular = 1;
1853               h->forced_local = 1;
1854               h->root.type = bfd_link_hash_defined;
1855             }
1856           else
1857             h = NULL;
1858         }
1859       else
1860         {
1861           isym = NULL;
1862           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1863           while (h->root.type == bfd_link_hash_indirect
1864                  || h->root.type == bfd_link_hash_warning)
1865             h = (struct elf_link_hash_entry *) h->root.u.i.link;
1866         }
1867
1868       /* Check invalid x32 relocations.  */
1869       if (!ABI_64_P (abfd))
1870         switch (r_type)
1871           {
1872           default:
1873             break;
1874
1875           case R_X86_64_DTPOFF64:
1876           case R_X86_64_TPOFF64:
1877           case R_X86_64_PC64:
1878           case R_X86_64_GOTOFF64:
1879           case R_X86_64_GOT64:
1880           case R_X86_64_GOTPCREL64:
1881           case R_X86_64_GOTPC64:
1882           case R_X86_64_GOTPLT64:
1883           case R_X86_64_PLTOFF64:
1884               {
1885                 if (h)
1886                   name = h->root.root.string;
1887                 else
1888                   name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1889                                            NULL);
1890                 _bfd_error_handler
1891                   /* xgettext:c-format */
1892                   (_("%B: relocation %s against symbol `%s' isn't "
1893                      "supported in x32 mode"), abfd,
1894                    x86_64_elf_howto_table[r_type].name, name);
1895                 bfd_set_error (bfd_error_bad_value);
1896                 goto error_return;
1897               }
1898             break;
1899           }
1900
1901       if (h != NULL)
1902         {
1903           /* It is referenced by a non-shared object. */
1904           h->ref_regular = 1;
1905
1906           if (h->type == STT_GNU_IFUNC)
1907             elf_tdata (info->output_bfd)->has_gnu_symbols
1908               |= elf_gnu_symbol_ifunc;
1909         }
1910
1911       converted_reloc = FALSE;
1912       if ((r_type == R_X86_64_GOTPCREL
1913            || r_type == R_X86_64_GOTPCRELX
1914            || r_type == R_X86_64_REX_GOTPCRELX)
1915           && (h == NULL || h->type != STT_GNU_IFUNC))
1916         {
1917           Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1918           if (!elf_x86_64_convert_load_reloc (abfd, contents, &r_type,
1919                                               irel, h, &converted_reloc,
1920                                               info))
1921             goto error_return;
1922
1923           if (converted_reloc)
1924             converted = TRUE;
1925         }
1926
1927       if (! elf_x86_64_tls_transition (info, abfd, sec, contents,
1928                                        symtab_hdr, sym_hashes,
1929                                        &r_type, GOT_UNKNOWN,
1930                                        rel, rel_end, h, r_symndx, FALSE))
1931         goto error_return;
1932
1933       /* Check if _GLOBAL_OFFSET_TABLE_ is referenced.  */
1934       if (h == htab->elf.hgot)
1935         htab->got_referenced = TRUE;
1936
1937       eh = (struct elf_x86_link_hash_entry *) h;
1938       switch (r_type)
1939         {
1940         case R_X86_64_TLSLD:
1941           htab->tls_ld_or_ldm_got.refcount = 1;
1942           goto create_got;
1943
1944         case R_X86_64_TPOFF32:
1945           if (!bfd_link_executable (info) && ABI_64_P (abfd))
1946             return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
1947                                         &x86_64_elf_howto_table[r_type]);
1948           if (eh != NULL)
1949             eh->zero_undefweak &= 0x2;
1950           break;
1951
1952         case R_X86_64_GOTTPOFF:
1953           if (!bfd_link_executable (info))
1954             info->flags |= DF_STATIC_TLS;
1955           /* Fall through */
1956
1957         case R_X86_64_GOT32:
1958         case R_X86_64_GOTPCREL:
1959         case R_X86_64_GOTPCRELX:
1960         case R_X86_64_REX_GOTPCRELX:
1961         case R_X86_64_TLSGD:
1962         case R_X86_64_GOT64:
1963         case R_X86_64_GOTPCREL64:
1964         case R_X86_64_GOTPLT64:
1965         case R_X86_64_GOTPC32_TLSDESC:
1966         case R_X86_64_TLSDESC_CALL:
1967           /* This symbol requires a global offset table entry.  */
1968           {
1969             int tls_type, old_tls_type;
1970
1971             switch (r_type)
1972               {
1973               default: tls_type = GOT_NORMAL; break;
1974               case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
1975               case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
1976               case R_X86_64_GOTPC32_TLSDESC:
1977               case R_X86_64_TLSDESC_CALL:
1978                 tls_type = GOT_TLS_GDESC; break;
1979               }
1980
1981             if (h != NULL)
1982               {
1983                 h->got.refcount = 1;
1984                 old_tls_type = eh->tls_type;
1985               }
1986             else
1987               {
1988                 bfd_signed_vma *local_got_refcounts;
1989
1990                 /* This is a global offset table entry for a local symbol.  */
1991                 local_got_refcounts = elf_local_got_refcounts (abfd);
1992                 if (local_got_refcounts == NULL)
1993                   {
1994                     bfd_size_type size;
1995
1996                     size = symtab_hdr->sh_info;
1997                     size *= sizeof (bfd_signed_vma)
1998                       + sizeof (bfd_vma) + sizeof (char);
1999                     local_got_refcounts = ((bfd_signed_vma *)
2000                                            bfd_zalloc (abfd, size));
2001                     if (local_got_refcounts == NULL)
2002                       goto error_return;
2003                     elf_local_got_refcounts (abfd) = local_got_refcounts;
2004                     elf_x86_local_tlsdesc_gotent (abfd)
2005                       = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
2006                     elf_x86_local_got_tls_type (abfd)
2007                       = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
2008                   }
2009                 local_got_refcounts[r_symndx] = 1;
2010                 old_tls_type
2011                   = elf_x86_local_got_tls_type (abfd) [r_symndx];
2012               }
2013
2014             /* If a TLS symbol is accessed using IE at least once,
2015                there is no point to use dynamic model for it.  */
2016             if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
2017                 && (! GOT_TLS_GD_ANY_P (old_tls_type)
2018                     || tls_type != GOT_TLS_IE))
2019               {
2020                 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
2021                   tls_type = old_tls_type;
2022                 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2023                          && GOT_TLS_GD_ANY_P (tls_type))
2024                   tls_type |= old_tls_type;
2025                 else
2026                   {
2027                     if (h)
2028                       name = h->root.root.string;
2029                     else
2030                       name = bfd_elf_sym_name (abfd, symtab_hdr,
2031                                                isym, NULL);
2032                     _bfd_error_handler
2033                       /* xgettext:c-format */
2034                       (_("%B: '%s' accessed both as normal and"
2035                          " thread local symbol"),
2036                        abfd, name);
2037                     bfd_set_error (bfd_error_bad_value);
2038                     goto error_return;
2039                   }
2040               }
2041
2042             if (old_tls_type != tls_type)
2043               {
2044                 if (eh != NULL)
2045                   eh->tls_type = tls_type;
2046                 else
2047                   elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
2048               }
2049           }
2050           /* Fall through */
2051
2052         case R_X86_64_GOTOFF64:
2053         case R_X86_64_GOTPC32:
2054         case R_X86_64_GOTPC64:
2055         create_got:
2056           if (eh != NULL)
2057             eh->zero_undefweak &= 0x2;
2058           break;
2059
2060         case R_X86_64_PLT32:
2061         case R_X86_64_PLT32_BND:
2062           /* This symbol requires a procedure linkage table entry.  We
2063              actually build the entry in adjust_dynamic_symbol,
2064              because this might be a case of linking PIC code which is
2065              never referenced by a dynamic object, in which case we
2066              don't need to generate a procedure linkage table entry
2067              after all.  */
2068
2069           /* If this is a local symbol, we resolve it directly without
2070              creating a procedure linkage table entry.  */
2071           if (h == NULL)
2072             continue;
2073
2074           eh->zero_undefweak &= 0x2;
2075           h->needs_plt = 1;
2076           h->plt.refcount = 1;
2077           break;
2078
2079         case R_X86_64_PLTOFF64:
2080           /* This tries to form the 'address' of a function relative
2081              to GOT.  For global symbols we need a PLT entry.  */
2082           if (h != NULL)
2083             {
2084               h->needs_plt = 1;
2085               h->plt.refcount = 1;
2086             }
2087           goto create_got;
2088
2089         case R_X86_64_SIZE32:
2090         case R_X86_64_SIZE64:
2091           size_reloc = TRUE;
2092           goto do_size;
2093
2094         case R_X86_64_32:
2095           if (!ABI_64_P (abfd))
2096             goto pointer;
2097           /* Fall through.  */
2098         case R_X86_64_8:
2099         case R_X86_64_16:
2100         case R_X86_64_32S:
2101           /* Check relocation overflow as these relocs may lead to
2102              run-time relocation overflow.  Don't error out for
2103              sections we don't care about, such as debug sections or
2104              when relocation overflow check is disabled.  */
2105           if (!info->no_reloc_overflow_check
2106               && !converted_reloc
2107               && (bfd_link_pic (info)
2108                   || (bfd_link_executable (info)
2109                       && h != NULL
2110                       && !h->def_regular
2111                       && h->def_dynamic
2112                       && (sec->flags & SEC_READONLY) == 0)))
2113             return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
2114                                         &x86_64_elf_howto_table[r_type]);
2115           /* Fall through.  */
2116
2117         case R_X86_64_PC8:
2118         case R_X86_64_PC16:
2119         case R_X86_64_PC32:
2120         case R_X86_64_PC32_BND:
2121         case R_X86_64_PC64:
2122         case R_X86_64_64:
2123 pointer:
2124           if (eh != NULL && (sec->flags & SEC_CODE) != 0)
2125             eh->zero_undefweak |= 0x2;
2126           /* We are called after all symbols have been resolved.  Only
2127              relocation against STT_GNU_IFUNC symbol must go through
2128              PLT.  */
2129           if (h != NULL
2130               && (bfd_link_executable (info)
2131                   || h->type == STT_GNU_IFUNC))
2132             {
2133               bfd_boolean func_pointer_ref = FALSE;
2134
2135               if (r_type == R_X86_64_PC32)
2136                 {
2137                   /* Since something like ".long foo - ." may be used
2138                      as pointer, make sure that PLT is used if foo is
2139                      a function defined in a shared library.  */
2140                   if ((sec->flags & SEC_CODE) == 0)
2141                     h->pointer_equality_needed = 1;
2142                 }
2143               else if (r_type != R_X86_64_PC32_BND
2144                        && r_type != R_X86_64_PC64)
2145                 {
2146                   h->pointer_equality_needed = 1;
2147                   /* At run-time, R_X86_64_64 can be resolved for both
2148                      x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2149                      can only be resolved for x32.  */
2150                   if ((sec->flags & SEC_READONLY) == 0
2151                       && (r_type == R_X86_64_64
2152                           || (!ABI_64_P (abfd)
2153                               && (r_type == R_X86_64_32
2154                                   || r_type == R_X86_64_32S))))
2155                     func_pointer_ref = TRUE;
2156                 }
2157
2158               if (!func_pointer_ref)
2159                 {
2160                   /* If this reloc is in a read-only section, we might
2161                      need a copy reloc.  We can't check reliably at this
2162                      stage whether the section is read-only, as input
2163                      sections have not yet been mapped to output sections.
2164                      Tentatively set the flag for now, and correct in
2165                      adjust_dynamic_symbol.  */
2166                   h->non_got_ref = 1;
2167
2168                   /* We may need a .plt entry if the symbol is a function
2169                      defined in a shared lib or is a function referenced
2170                      from the code or read-only section.  */
2171                   if (!h->def_regular
2172                       || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2173                     h->plt.refcount = 1;
2174                 }
2175             }
2176
2177           size_reloc = FALSE;
2178 do_size:
2179           if (NEED_DYNAMIC_RELOCATION_P (info, h, sec, r_type,
2180                                          htab->pointer_r_type))
2181             {
2182               struct elf_dyn_relocs *p;
2183               struct elf_dyn_relocs **head;
2184
2185               /* We must copy these reloc types into the output file.
2186                  Create a reloc section in dynobj and make room for
2187                  this reloc.  */
2188               if (sreloc == NULL)
2189                 {
2190                   sreloc = _bfd_elf_make_dynamic_reloc_section
2191                     (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2192                      abfd, /*rela?*/ TRUE);
2193
2194                   if (sreloc == NULL)
2195                     goto error_return;
2196                 }
2197
2198               /* If this is a global symbol, we count the number of
2199                  relocations we need for this symbol.  */
2200               if (h != NULL)
2201                 head = &eh->dyn_relocs;
2202               else
2203                 {
2204                   /* Track dynamic relocs needed for local syms too.
2205                      We really need local syms available to do this
2206                      easily.  Oh well.  */
2207                   asection *s;
2208                   void **vpp;
2209
2210                   isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2211                                                 abfd, r_symndx);
2212                   if (isym == NULL)
2213                     goto error_return;
2214
2215                   s = bfd_section_from_elf_index (abfd, isym->st_shndx);
2216                   if (s == NULL)
2217                     s = sec;
2218
2219                   /* Beware of type punned pointers vs strict aliasing
2220                      rules.  */
2221                   vpp = &(elf_section_data (s)->local_dynrel);
2222                   head = (struct elf_dyn_relocs **)vpp;
2223                 }
2224
2225               p = *head;
2226               if (p == NULL || p->sec != sec)
2227                 {
2228                   bfd_size_type amt = sizeof *p;
2229
2230                   p = ((struct elf_dyn_relocs *)
2231                        bfd_alloc (htab->elf.dynobj, amt));
2232                   if (p == NULL)
2233                     goto error_return;
2234                   p->next = *head;
2235                   *head = p;
2236                   p->sec = sec;
2237                   p->count = 0;
2238                   p->pc_count = 0;
2239                 }
2240
2241               p->count += 1;
2242               /* Count size relocation as PC-relative relocation.  */
2243               if (X86_PCREL_TYPE_P (r_type) || size_reloc)
2244                 p->pc_count += 1;
2245             }
2246           break;
2247
2248           /* This relocation describes the C++ object vtable hierarchy.
2249              Reconstruct it for later use during GC.  */
2250         case R_X86_64_GNU_VTINHERIT:
2251           if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2252             goto error_return;
2253           break;
2254
2255           /* This relocation describes which C++ vtable entries are actually
2256              used.  Record for later use during GC.  */
2257         case R_X86_64_GNU_VTENTRY:
2258           BFD_ASSERT (h != NULL);
2259           if (h != NULL
2260               && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2261             goto error_return;
2262           break;
2263
2264         default:
2265           break;
2266         }
2267     }
2268
2269   if (elf_section_data (sec)->this_hdr.contents != contents)
2270     {
2271       if (!converted && !info->keep_memory)
2272         free (contents);
2273       else
2274         {
2275           /* Cache the section contents for elf_link_input_bfd if any
2276              load is converted or --no-keep-memory isn't used.  */
2277           elf_section_data (sec)->this_hdr.contents = contents;
2278         }
2279     }
2280
2281   /* Cache relocations if any load is converted.  */
2282   if (elf_section_data (sec)->relocs != relocs && converted)
2283     elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
2284
2285   return TRUE;
2286
2287 error_return:
2288   if (elf_section_data (sec)->this_hdr.contents != contents)
2289     free (contents);
2290   sec->check_relocs_failed = 1;
2291   return FALSE;
2292 }
2293
2294 /* Return the relocation value for @tpoff relocation
2295    if STT_TLS virtual address is ADDRESS.  */
2296
2297 static bfd_vma
2298 elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
2299 {
2300   struct elf_link_hash_table *htab = elf_hash_table (info);
2301   const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2302   bfd_vma static_tls_size;
2303
2304   /* If tls_segment is NULL, we should have signalled an error already.  */
2305   if (htab->tls_sec == NULL)
2306     return 0;
2307
2308   /* Consider special static TLS alignment requirements.  */
2309   static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2310   return address - static_tls_size - htab->tls_sec->vma;
2311 }
2312
2313 /* Is the instruction before OFFSET in CONTENTS a 32bit relative
2314    branch?  */
2315
2316 static bfd_boolean
2317 is_32bit_relative_branch (bfd_byte *contents, bfd_vma offset)
2318 {
2319   /* Opcode             Instruction
2320      0xe8               call
2321      0xe9               jump
2322      0x0f 0x8x          conditional jump */
2323   return ((offset > 0
2324            && (contents [offset - 1] == 0xe8
2325                || contents [offset - 1] == 0xe9))
2326           || (offset > 1
2327               && contents [offset - 2] == 0x0f
2328               && (contents [offset - 1] & 0xf0) == 0x80));
2329 }
2330
2331 /* Relocate an x86_64 ELF section.  */
2332
2333 static bfd_boolean
2334 elf_x86_64_relocate_section (bfd *output_bfd,
2335                              struct bfd_link_info *info,
2336                              bfd *input_bfd,
2337                              asection *input_section,
2338                              bfd_byte *contents,
2339                              Elf_Internal_Rela *relocs,
2340                              Elf_Internal_Sym *local_syms,
2341                              asection **local_sections)
2342 {
2343   struct elf_x86_link_hash_table *htab;
2344   Elf_Internal_Shdr *symtab_hdr;
2345   struct elf_link_hash_entry **sym_hashes;
2346   bfd_vma *local_got_offsets;
2347   bfd_vma *local_tlsdesc_gotents;
2348   Elf_Internal_Rela *rel;
2349   Elf_Internal_Rela *wrel;
2350   Elf_Internal_Rela *relend;
2351   unsigned int plt_entry_size;
2352
2353   /* Skip if check_relocs failed.  */
2354   if (input_section->check_relocs_failed)
2355     return FALSE;
2356
2357   htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
2358   if (htab == NULL)
2359     return FALSE;
2360
2361   BFD_ASSERT (is_x86_elf (input_bfd, htab));
2362
2363   plt_entry_size = htab->plt.plt_entry_size;
2364   symtab_hdr = &elf_symtab_hdr (input_bfd);
2365   sym_hashes = elf_sym_hashes (input_bfd);
2366   local_got_offsets = elf_local_got_offsets (input_bfd);
2367   local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
2368
2369   _bfd_x86_elf_set_tls_module_base (info);
2370
2371   rel = wrel = relocs;
2372   relend = relocs + input_section->reloc_count;
2373   for (; rel < relend; wrel++, rel++)
2374     {
2375       unsigned int r_type, r_type_tls;
2376       reloc_howto_type *howto;
2377       unsigned long r_symndx;
2378       struct elf_link_hash_entry *h;
2379       struct elf_x86_link_hash_entry *eh;
2380       Elf_Internal_Sym *sym;
2381       asection *sec;
2382       bfd_vma off, offplt, plt_offset;
2383       bfd_vma relocation;
2384       bfd_boolean unresolved_reloc;
2385       bfd_reloc_status_type r;
2386       int tls_type;
2387       asection *base_got, *resolved_plt;
2388       bfd_vma st_size;
2389       bfd_boolean resolved_to_zero;
2390       bfd_boolean relative_reloc;
2391       bfd_boolean converted_reloc;
2392       bfd_boolean need_copy_reloc_in_pie;
2393
2394       r_type = ELF32_R_TYPE (rel->r_info);
2395       if (r_type == (int) R_X86_64_GNU_VTINHERIT
2396           || r_type == (int) R_X86_64_GNU_VTENTRY)
2397         {
2398           if (wrel != rel)
2399             *wrel = *rel;
2400           continue;
2401         }
2402
2403       converted_reloc = (r_type & R_X86_64_converted_reloc_bit) != 0;
2404       r_type &= ~R_X86_64_converted_reloc_bit;
2405
2406       if (r_type >= (int) R_X86_64_standard)
2407         return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
2408
2409       if (r_type != (int) R_X86_64_32
2410           || ABI_64_P (output_bfd))
2411         howto = x86_64_elf_howto_table + r_type;
2412       else
2413         howto = (x86_64_elf_howto_table
2414                  + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
2415       r_symndx = htab->r_sym (rel->r_info);
2416       h = NULL;
2417       sym = NULL;
2418       sec = NULL;
2419       unresolved_reloc = FALSE;
2420       if (r_symndx < symtab_hdr->sh_info)
2421         {
2422           sym = local_syms + r_symndx;
2423           sec = local_sections[r_symndx];
2424
2425           relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2426                                                 &sec, rel);
2427           st_size = sym->st_size;
2428
2429           /* Relocate against local STT_GNU_IFUNC symbol.  */
2430           if (!bfd_link_relocatable (info)
2431               && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2432             {
2433               h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd,
2434                                                    rel, FALSE);
2435               if (h == NULL)
2436                 abort ();
2437
2438               /* Set STT_GNU_IFUNC symbol value.  */
2439               h->root.u.def.value = sym->st_value;
2440               h->root.u.def.section = sec;
2441             }
2442         }
2443       else
2444         {
2445           bfd_boolean warned ATTRIBUTE_UNUSED;
2446           bfd_boolean ignored ATTRIBUTE_UNUSED;
2447
2448           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2449                                    r_symndx, symtab_hdr, sym_hashes,
2450                                    h, sec, relocation,
2451                                    unresolved_reloc, warned, ignored);
2452           st_size = h->size;
2453         }
2454
2455       if (sec != NULL && discarded_section (sec))
2456         {
2457           _bfd_clear_contents (howto, input_bfd, input_section,
2458                                contents + rel->r_offset);
2459           wrel->r_offset = rel->r_offset;
2460           wrel->r_info = 0;
2461           wrel->r_addend = 0;
2462
2463           /* For ld -r, remove relocations in debug sections against
2464              sections defined in discarded sections.  Not done for
2465              eh_frame editing code expects to be present.  */
2466            if (bfd_link_relocatable (info)
2467                && (input_section->flags & SEC_DEBUGGING))
2468              wrel--;
2469
2470           continue;
2471         }
2472
2473       if (bfd_link_relocatable (info))
2474         {
2475           if (wrel != rel)
2476             *wrel = *rel;
2477           continue;
2478         }
2479
2480       if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
2481         {
2482           if (r_type == R_X86_64_64)
2483             {
2484               /* For x32, treat R_X86_64_64 like R_X86_64_32 and
2485                  zero-extend it to 64bit if addend is zero.  */
2486               r_type = R_X86_64_32;
2487               memset (contents + rel->r_offset + 4, 0, 4);
2488             }
2489           else if (r_type == R_X86_64_SIZE64)
2490             {
2491               /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
2492                  zero-extend it to 64bit if addend is zero.  */
2493               r_type = R_X86_64_SIZE32;
2494               memset (contents + rel->r_offset + 4, 0, 4);
2495             }
2496         }
2497
2498       eh = (struct elf_x86_link_hash_entry *) h;
2499
2500       /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2501          it here if it is defined in a non-shared object.  */
2502       if (h != NULL
2503           && h->type == STT_GNU_IFUNC
2504           && h->def_regular)
2505         {
2506           bfd_vma plt_index;
2507           const char *name;
2508
2509           if ((input_section->flags & SEC_ALLOC) == 0)
2510             {
2511               /* Dynamic relocs are not propagated for SEC_DEBUGGING
2512                  sections because such sections are not SEC_ALLOC and
2513                  thus ld.so will not process them.  */
2514               if ((input_section->flags & SEC_DEBUGGING) != 0)
2515                 continue;
2516               abort ();
2517             }
2518
2519           switch (r_type)
2520             {
2521             default:
2522               break;
2523
2524             case R_X86_64_GOTPCREL:
2525             case R_X86_64_GOTPCRELX:
2526             case R_X86_64_REX_GOTPCRELX:
2527             case R_X86_64_GOTPCREL64:
2528               base_got = htab->elf.sgot;
2529               off = h->got.offset;
2530
2531               if (base_got == NULL)
2532                 abort ();
2533
2534               if (off == (bfd_vma) -1)
2535                 {
2536                   /* We can't use h->got.offset here to save state, or
2537                      even just remember the offset, as finish_dynamic_symbol
2538                      would use that as offset into .got.  */
2539
2540                   if (h->plt.offset == (bfd_vma) -1)
2541                     abort ();
2542
2543                   if (htab->elf.splt != NULL)
2544                     {
2545                       plt_index = (h->plt.offset / plt_entry_size
2546                                    - htab->plt.has_plt0);
2547                       off = (plt_index + 3) * GOT_ENTRY_SIZE;
2548                       base_got = htab->elf.sgotplt;
2549                     }
2550                   else
2551                     {
2552                       plt_index = h->plt.offset / plt_entry_size;
2553                       off = plt_index * GOT_ENTRY_SIZE;
2554                       base_got = htab->elf.igotplt;
2555                     }
2556
2557                   if (h->dynindx == -1
2558                       || h->forced_local
2559                       || info->symbolic)
2560                     {
2561                       /* This references the local defitionion.  We must
2562                          initialize this entry in the global offset table.
2563                          Since the offset must always be a multiple of 8,
2564                          we use the least significant bit to record
2565                          whether we have initialized it already.
2566
2567                          When doing a dynamic link, we create a .rela.got
2568                          relocation entry to initialize the value.  This
2569                          is done in the finish_dynamic_symbol routine.   */
2570                       if ((off & 1) != 0)
2571                         off &= ~1;
2572                       else
2573                         {
2574                           bfd_put_64 (output_bfd, relocation,
2575                                       base_got->contents + off);
2576                           /* Note that this is harmless for the GOTPLT64
2577                              case, as -1 | 1 still is -1.  */
2578                           h->got.offset |= 1;
2579                         }
2580                     }
2581                 }
2582
2583               relocation = (base_got->output_section->vma
2584                             + base_got->output_offset + off);
2585
2586               goto do_relocation;
2587             }
2588
2589           if (h->plt.offset == (bfd_vma) -1)
2590             {
2591               /* Handle static pointers of STT_GNU_IFUNC symbols.  */
2592               if (r_type == htab->pointer_r_type
2593                   && (input_section->flags & SEC_CODE) == 0)
2594                 goto do_ifunc_pointer;
2595               goto bad_ifunc_reloc;
2596             }
2597
2598           /* STT_GNU_IFUNC symbol must go through PLT.  */
2599           if (htab->elf.splt != NULL)
2600             {
2601               if (htab->plt_second != NULL)
2602                 {
2603                   resolved_plt = htab->plt_second;
2604                   plt_offset = eh->plt_second.offset;
2605                 }
2606               else
2607                 {
2608                   resolved_plt = htab->elf.splt;
2609                   plt_offset =  h->plt.offset;
2610                 }
2611             }
2612           else
2613             {
2614               resolved_plt = htab->elf.iplt;
2615               plt_offset =  h->plt.offset;
2616             }
2617
2618           relocation = (resolved_plt->output_section->vma
2619                         + resolved_plt->output_offset + plt_offset);
2620
2621           switch (r_type)
2622             {
2623             default:
2624 bad_ifunc_reloc:
2625               if (h->root.root.string)
2626                 name = h->root.root.string;
2627               else
2628                 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2629                                          NULL);
2630               _bfd_error_handler
2631                 /* xgettext:c-format */
2632                 (_("%B: relocation %s against STT_GNU_IFUNC "
2633                    "symbol `%s' isn't supported"), input_bfd,
2634                  howto->name, name);
2635               bfd_set_error (bfd_error_bad_value);
2636               return FALSE;
2637
2638             case R_X86_64_32S:
2639               if (bfd_link_pic (info))
2640                 abort ();
2641               goto do_relocation;
2642
2643             case R_X86_64_32:
2644               if (ABI_64_P (output_bfd))
2645                 goto do_relocation;
2646               /* FALLTHROUGH */
2647             case R_X86_64_64:
2648 do_ifunc_pointer:
2649               if (rel->r_addend != 0)
2650                 {
2651                   if (h->root.root.string)
2652                     name = h->root.root.string;
2653                   else
2654                     name = bfd_elf_sym_name (input_bfd, symtab_hdr,
2655                                              sym, NULL);
2656                   _bfd_error_handler
2657                     /* xgettext:c-format */
2658                     (_("%B: relocation %s against STT_GNU_IFUNC "
2659                        "symbol `%s' has non-zero addend: %Ld"),
2660                      input_bfd, howto->name, name, rel->r_addend);
2661                   bfd_set_error (bfd_error_bad_value);
2662                   return FALSE;
2663                 }
2664
2665               /* Generate dynamic relcoation only when there is a
2666                  non-GOT reference in a shared object or there is no
2667                  PLT.  */
2668               if ((bfd_link_pic (info) && h->non_got_ref)
2669                   || h->plt.offset == (bfd_vma) -1)
2670                 {
2671                   Elf_Internal_Rela outrel;
2672                   asection *sreloc;
2673
2674                   /* Need a dynamic relocation to get the real function
2675                      address.  */
2676                   outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2677                                                              info,
2678                                                              input_section,
2679                                                              rel->r_offset);
2680                   if (outrel.r_offset == (bfd_vma) -1
2681                       || outrel.r_offset == (bfd_vma) -2)
2682                     abort ();
2683
2684                   outrel.r_offset += (input_section->output_section->vma
2685                                       + input_section->output_offset);
2686
2687                   if (POINTER_LOCAL_IFUNC_P (info, h))
2688                     {
2689                       info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
2690                                               h->root.root.string,
2691                                               h->root.u.def.section->owner);
2692
2693                       /* This symbol is resolved locally.  */
2694                       outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
2695                       outrel.r_addend = (h->root.u.def.value
2696                                          + h->root.u.def.section->output_section->vma
2697                                          + h->root.u.def.section->output_offset);
2698                     }
2699                   else
2700                     {
2701                       outrel.r_info = htab->r_info (h->dynindx, r_type);
2702                       outrel.r_addend = 0;
2703                     }
2704
2705                   /* Dynamic relocations are stored in
2706                      1. .rela.ifunc section in PIC object.
2707                      2. .rela.got section in dynamic executable.
2708                      3. .rela.iplt section in static executable.  */
2709                   if (bfd_link_pic (info))
2710                     sreloc = htab->elf.irelifunc;
2711                   else if (htab->elf.splt != NULL)
2712                     sreloc = htab->elf.srelgot;
2713                   else
2714                     sreloc = htab->elf.irelplt;
2715                   elf_append_rela (output_bfd, sreloc, &outrel);
2716
2717                   /* If this reloc is against an external symbol, we
2718                      do not want to fiddle with the addend.  Otherwise,
2719                      we need to include the symbol value so that it
2720                      becomes an addend for the dynamic reloc.  For an
2721                      internal symbol, we have updated addend.  */
2722                   continue;
2723                 }
2724               /* FALLTHROUGH */
2725             case R_X86_64_PC32:
2726             case R_X86_64_PC32_BND:
2727             case R_X86_64_PC64:
2728             case R_X86_64_PLT32:
2729             case R_X86_64_PLT32_BND:
2730               goto do_relocation;
2731             }
2732         }
2733
2734       resolved_to_zero = (eh != NULL
2735                           && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
2736
2737       /* When generating a shared object, the relocations handled here are
2738          copied into the output file to be resolved at run time.  */
2739       switch (r_type)
2740         {
2741         case R_X86_64_GOT32:
2742         case R_X86_64_GOT64:
2743           /* Relocation is to the entry for this symbol in the global
2744              offset table.  */
2745         case R_X86_64_GOTPCREL:
2746         case R_X86_64_GOTPCRELX:
2747         case R_X86_64_REX_GOTPCRELX:
2748         case R_X86_64_GOTPCREL64:
2749           /* Use global offset table entry as symbol value.  */
2750         case R_X86_64_GOTPLT64:
2751           /* This is obsolete and treated the same as GOT64.  */
2752           base_got = htab->elf.sgot;
2753
2754           if (htab->elf.sgot == NULL)
2755             abort ();
2756
2757           relative_reloc = FALSE;
2758           if (h != NULL)
2759             {
2760               off = h->got.offset;
2761               if (h->needs_plt
2762                   && h->plt.offset != (bfd_vma)-1
2763                   && off == (bfd_vma)-1)
2764                 {
2765                   /* We can't use h->got.offset here to save
2766                      state, or even just remember the offset, as
2767                      finish_dynamic_symbol would use that as offset into
2768                      .got.  */
2769                   bfd_vma plt_index = (h->plt.offset / plt_entry_size
2770                                        - htab->plt.has_plt0);
2771                   off = (plt_index + 3) * GOT_ENTRY_SIZE;
2772                   base_got = htab->elf.sgotplt;
2773                 }
2774
2775               if (RESOLVED_LOCALLY_P (info, h, htab))
2776                 {
2777                   /* We must initialize this entry in the global offset
2778                      table.  Since the offset must always be a multiple
2779                      of 8, we use the least significant bit to record
2780                      whether we have initialized it already.
2781
2782                      When doing a dynamic link, we create a .rela.got
2783                      relocation entry to initialize the value.  This is
2784                      done in the finish_dynamic_symbol routine.  */
2785                   if ((off & 1) != 0)
2786                     off &= ~1;
2787                   else
2788                     {
2789                       bfd_put_64 (output_bfd, relocation,
2790                                   base_got->contents + off);
2791                       /* Note that this is harmless for the GOTPLT64 case,
2792                          as -1 | 1 still is -1.  */
2793                       h->got.offset |= 1;
2794
2795                       if (GENERATE_RELATIVE_RELOC_P (info, h))
2796                         {
2797                           /* If this symbol isn't dynamic in PIC,
2798                              generate R_X86_64_RELATIVE here.  */
2799                           eh->no_finish_dynamic_symbol = 1;
2800                           relative_reloc = TRUE;
2801                         }
2802                     }
2803                 }
2804               else
2805                 unresolved_reloc = FALSE;
2806             }
2807           else
2808             {
2809               if (local_got_offsets == NULL)
2810                 abort ();
2811
2812               off = local_got_offsets[r_symndx];
2813
2814               /* The offset must always be a multiple of 8.  We use
2815                  the least significant bit to record whether we have
2816                  already generated the necessary reloc.  */
2817               if ((off & 1) != 0)
2818                 off &= ~1;
2819               else
2820                 {
2821                   bfd_put_64 (output_bfd, relocation,
2822                               base_got->contents + off);
2823                   local_got_offsets[r_symndx] |= 1;
2824
2825                   if (bfd_link_pic (info))
2826                     relative_reloc = TRUE;
2827                 }
2828             }
2829
2830           if (relative_reloc)
2831             {
2832               asection *s;
2833               Elf_Internal_Rela outrel;
2834
2835               /* We need to generate a R_X86_64_RELATIVE reloc
2836                  for the dynamic linker.  */
2837               s = htab->elf.srelgot;
2838               if (s == NULL)
2839                 abort ();
2840
2841               outrel.r_offset = (base_got->output_section->vma
2842                                  + base_got->output_offset
2843                                  + off);
2844               outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
2845               outrel.r_addend = relocation;
2846               elf_append_rela (output_bfd, s, &outrel);
2847             }
2848
2849           if (off >= (bfd_vma) -2)
2850             abort ();
2851
2852           relocation = base_got->output_section->vma
2853                        + base_got->output_offset + off;
2854           if (r_type != R_X86_64_GOTPCREL
2855               && r_type != R_X86_64_GOTPCRELX
2856               && r_type != R_X86_64_REX_GOTPCRELX
2857               && r_type != R_X86_64_GOTPCREL64)
2858             relocation -= htab->elf.sgotplt->output_section->vma
2859                           - htab->elf.sgotplt->output_offset;
2860
2861           break;
2862
2863         case R_X86_64_GOTOFF64:
2864           /* Relocation is relative to the start of the global offset
2865              table.  */
2866
2867           /* Check to make sure it isn't a protected function or data
2868              symbol for shared library since it may not be local when
2869              used as function address or with copy relocation.  We also
2870              need to make sure that a symbol is referenced locally.  */
2871           if (bfd_link_pic (info) && h)
2872             {
2873               if (!h->def_regular)
2874                 {
2875                   const char *v;
2876
2877                   switch (ELF_ST_VISIBILITY (h->other))
2878                     {
2879                     case STV_HIDDEN:
2880                       v = _("hidden symbol");
2881                       break;
2882                     case STV_INTERNAL:
2883                       v = _("internal symbol");
2884                       break;
2885                     case STV_PROTECTED:
2886                       v = _("protected symbol");
2887                       break;
2888                     default:
2889                       v = _("symbol");
2890                       break;
2891                     }
2892
2893                   _bfd_error_handler
2894                     /* xgettext:c-format */
2895                     (_("%B: relocation R_X86_64_GOTOFF64 against undefined %s"
2896                        " `%s' can not be used when making a shared object"),
2897                      input_bfd, v, h->root.root.string);
2898                   bfd_set_error (bfd_error_bad_value);
2899                   return FALSE;
2900                 }
2901               else if (!bfd_link_executable (info)
2902                        && !SYMBOL_REFERENCES_LOCAL_P (info, h)
2903                        && (h->type == STT_FUNC
2904                            || h->type == STT_OBJECT)
2905                        && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2906                 {
2907                   _bfd_error_handler
2908               /* xgettext:c-format */
2909                     (_("%B: relocation R_X86_64_GOTOFF64 against protected %s"
2910                        " `%s' can not be used when making a shared object"),
2911                      input_bfd,
2912                      h->type == STT_FUNC ? "function" : "data",
2913                      h->root.root.string);
2914                   bfd_set_error (bfd_error_bad_value);
2915               return FALSE;
2916                 }
2917             }
2918
2919           /* Note that sgot is not involved in this
2920              calculation.  We always want the start of .got.plt.  If we
2921              defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2922              permitted by the ABI, we might have to change this
2923              calculation.  */
2924           relocation -= htab->elf.sgotplt->output_section->vma
2925                         + htab->elf.sgotplt->output_offset;
2926           break;
2927
2928         case R_X86_64_GOTPC32:
2929         case R_X86_64_GOTPC64:
2930           /* Use global offset table as symbol value.  */
2931           relocation = htab->elf.sgotplt->output_section->vma
2932                        + htab->elf.sgotplt->output_offset;
2933           unresolved_reloc = FALSE;
2934           break;
2935
2936         case R_X86_64_PLTOFF64:
2937           /* Relocation is PLT entry relative to GOT.  For local
2938              symbols it's the symbol itself relative to GOT.  */
2939           if (h != NULL
2940               /* See PLT32 handling.  */
2941               && (h->plt.offset != (bfd_vma) -1
2942                   || eh->plt_got.offset != (bfd_vma) -1)
2943               && htab->elf.splt != NULL)
2944             {
2945               if (eh->plt_got.offset != (bfd_vma) -1)
2946                 {
2947                   /* Use the GOT PLT.  */
2948                   resolved_plt = htab->plt_got;
2949                   plt_offset = eh->plt_got.offset;
2950                 }
2951               else if (htab->plt_second != NULL)
2952                 {
2953                   resolved_plt = htab->plt_second;
2954                   plt_offset = eh->plt_second.offset;
2955                 }
2956               else
2957                 {
2958                   resolved_plt = htab->elf.splt;
2959                   plt_offset = h->plt.offset;
2960                 }
2961
2962               relocation = (resolved_plt->output_section->vma
2963                             + resolved_plt->output_offset
2964                             + plt_offset);
2965               unresolved_reloc = FALSE;
2966             }
2967
2968           relocation -= htab->elf.sgotplt->output_section->vma
2969                         + htab->elf.sgotplt->output_offset;
2970           break;
2971
2972         case R_X86_64_PLT32:
2973         case R_X86_64_PLT32_BND:
2974           /* Relocation is to the entry for this symbol in the
2975              procedure linkage table.  */
2976
2977           /* Resolve a PLT32 reloc against a local symbol directly,
2978              without using the procedure linkage table.  */
2979           if (h == NULL)
2980             break;
2981
2982           if ((h->plt.offset == (bfd_vma) -1
2983                && eh->plt_got.offset == (bfd_vma) -1)
2984               || htab->elf.splt == NULL)
2985             {
2986               /* We didn't make a PLT entry for this symbol.  This
2987                  happens when statically linking PIC code, or when
2988                  using -Bsymbolic.  */
2989               break;
2990             }
2991
2992           if (h->plt.offset != (bfd_vma) -1)
2993             {
2994               if (htab->plt_second != NULL)
2995                 {
2996                   resolved_plt = htab->plt_second;
2997                   plt_offset = eh->plt_second.offset;
2998                 }
2999               else
3000                 {
3001                   resolved_plt = htab->elf.splt;
3002                   plt_offset = h->plt.offset;
3003                 }
3004             }
3005           else
3006             {
3007               /* Use the GOT PLT.  */
3008               resolved_plt = htab->plt_got;
3009               plt_offset = eh->plt_got.offset;
3010             }
3011
3012           relocation = (resolved_plt->output_section->vma
3013                         + resolved_plt->output_offset
3014                         + plt_offset);
3015           unresolved_reloc = FALSE;
3016           break;
3017
3018         case R_X86_64_SIZE32:
3019         case R_X86_64_SIZE64:
3020           /* Set to symbol size.  */
3021           relocation = st_size;
3022           goto direct;
3023
3024         case R_X86_64_PC8:
3025         case R_X86_64_PC16:
3026         case R_X86_64_PC32:
3027         case R_X86_64_PC32_BND:
3028           /* Don't complain about -fPIC if the symbol is undefined when
3029              building executable unless it is unresolved weak symbol or
3030              -z nocopyreloc is used.  */
3031           if ((input_section->flags & SEC_ALLOC) != 0
3032               && (input_section->flags & SEC_READONLY) != 0
3033               && h != NULL
3034               && ((bfd_link_executable (info)
3035                    && ((h->root.type == bfd_link_hash_undefweak
3036                         && !resolved_to_zero)
3037                        || ((info->nocopyreloc
3038                             || (eh->def_protected
3039                                 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3040                            && h->def_dynamic
3041                            && !(h->root.u.def.section->flags & SEC_CODE))))
3042                   || bfd_link_dll (info)))
3043             {
3044               bfd_boolean fail = FALSE;
3045               bfd_boolean branch
3046                 = ((r_type == R_X86_64_PC32
3047                     || r_type == R_X86_64_PC32_BND)
3048                    && is_32bit_relative_branch (contents, rel->r_offset));
3049
3050               if (SYMBOL_REFERENCES_LOCAL_P (info, h))
3051                 {
3052                   /* Symbol is referenced locally.  Make sure it is
3053                      defined locally or for a branch.  */
3054                   fail = (!(h->def_regular || ELF_COMMON_DEF_P (h))
3055                           && !branch);
3056                 }
3057               else if (!(bfd_link_pie (info)
3058                          && (h->needs_copy || eh->needs_copy)))
3059                 {
3060                   /* Symbol doesn't need copy reloc and isn't referenced
3061                      locally.  We only allow branch to symbol with
3062                      non-default visibility. */
3063                   fail = (!branch
3064                           || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT);
3065                 }
3066
3067               if (fail)
3068                 return elf_x86_64_need_pic (info, input_bfd, input_section,
3069                                             h, NULL, NULL, howto);
3070             }
3071           /* Fall through.  */
3072
3073         case R_X86_64_8:
3074         case R_X86_64_16:
3075         case R_X86_64_32:
3076         case R_X86_64_PC64:
3077         case R_X86_64_64:
3078           /* FIXME: The ABI says the linker should make sure the value is
3079              the same when it's zeroextended to 64 bit.  */
3080
3081 direct:
3082           if ((input_section->flags & SEC_ALLOC) == 0)
3083             break;
3084
3085           need_copy_reloc_in_pie = (bfd_link_pie (info)
3086                                     && h != NULL
3087                                     && (h->needs_copy
3088                                         || eh->needs_copy
3089                                         || (h->root.type
3090                                             == bfd_link_hash_undefined))
3091                                     && (X86_PCREL_TYPE_P (r_type)
3092                                         || X86_SIZE_TYPE_P (r_type)));
3093
3094           if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
3095                                              need_copy_reloc_in_pie,
3096                                              resolved_to_zero, FALSE))
3097             {
3098               Elf_Internal_Rela outrel;
3099               bfd_boolean skip, relocate;
3100               asection *sreloc;
3101
3102               /* When generating a shared object, these relocations
3103                  are copied into the output file to be resolved at run
3104                  time.  */
3105               skip = FALSE;
3106               relocate = FALSE;
3107
3108               outrel.r_offset =
3109                 _bfd_elf_section_offset (output_bfd, info, input_section,
3110                                          rel->r_offset);
3111               if (outrel.r_offset == (bfd_vma) -1)
3112                 skip = TRUE;
3113               else if (outrel.r_offset == (bfd_vma) -2)
3114                 skip = TRUE, relocate = TRUE;
3115
3116               outrel.r_offset += (input_section->output_section->vma
3117                                   + input_section->output_offset);
3118
3119               if (skip)
3120                 memset (&outrel, 0, sizeof outrel);
3121
3122               else if (COPY_INPUT_RELOC_P (info, h, r_type))
3123                 {
3124                   outrel.r_info = htab->r_info (h->dynindx, r_type);
3125                   outrel.r_addend = rel->r_addend;
3126                 }
3127               else
3128                 {
3129                   /* This symbol is local, or marked to become local.
3130                      When relocation overflow check is disabled, we
3131                      convert R_X86_64_32 to dynamic R_X86_64_RELATIVE.  */
3132                   if (r_type == htab->pointer_r_type
3133                       || (r_type == R_X86_64_32
3134                           && info->no_reloc_overflow_check))
3135                     {
3136                       relocate = TRUE;
3137                       outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
3138                       outrel.r_addend = relocation + rel->r_addend;
3139                     }
3140                   else if (r_type == R_X86_64_64
3141                            && !ABI_64_P (output_bfd))
3142                     {
3143                       relocate = TRUE;
3144                       outrel.r_info = htab->r_info (0,
3145                                                     R_X86_64_RELATIVE64);
3146                       outrel.r_addend = relocation + rel->r_addend;
3147                       /* Check addend overflow.  */
3148                       if ((outrel.r_addend & 0x80000000)
3149                           != (rel->r_addend & 0x80000000))
3150                         {
3151                           const char *name;
3152                           int addend = rel->r_addend;
3153                           if (h && h->root.root.string)
3154                             name = h->root.root.string;
3155                           else
3156                             name = bfd_elf_sym_name (input_bfd, symtab_hdr,
3157                                                      sym, NULL);
3158                           _bfd_error_handler
3159                             /* xgettext:c-format */
3160                             (_("%B: addend %s%#x in relocation %s against "
3161                                "symbol `%s' at %#Lx in section `%A' is "
3162                                "out of range"),
3163                              input_bfd, addend < 0 ? "-" : "", addend,
3164                              howto->name, name, rel->r_offset, input_section);
3165                           bfd_set_error (bfd_error_bad_value);
3166                           return FALSE;
3167                         }
3168                     }
3169                   else
3170                     {
3171                       long sindx;
3172
3173                       if (bfd_is_abs_section (sec))
3174                         sindx = 0;
3175                       else if (sec == NULL || sec->owner == NULL)
3176                         {
3177                           bfd_set_error (bfd_error_bad_value);
3178                           return FALSE;
3179                         }
3180                       else
3181                         {
3182                           asection *osec;
3183
3184                           /* We are turning this relocation into one
3185                              against a section symbol.  It would be
3186                              proper to subtract the symbol's value,
3187                              osec->vma, from the emitted reloc addend,
3188                              but ld.so expects buggy relocs.  */
3189                           osec = sec->output_section;
3190                           sindx = elf_section_data (osec)->dynindx;
3191                           if (sindx == 0)
3192                             {
3193                               asection *oi = htab->elf.text_index_section;
3194                               sindx = elf_section_data (oi)->dynindx;
3195                             }
3196                           BFD_ASSERT (sindx != 0);
3197                         }
3198
3199                       outrel.r_info = htab->r_info (sindx, r_type);
3200                       outrel.r_addend = relocation + rel->r_addend;
3201                     }
3202                 }
3203
3204               sreloc = elf_section_data (input_section)->sreloc;
3205
3206               if (sreloc == NULL || sreloc->contents == NULL)
3207                 {
3208                   r = bfd_reloc_notsupported;
3209                   goto check_relocation_error;
3210                 }
3211
3212               elf_append_rela (output_bfd, sreloc, &outrel);
3213
3214               /* If this reloc is against an external symbol, we do
3215                  not want to fiddle with the addend.  Otherwise, we
3216                  need to include the symbol value so that it becomes
3217                  an addend for the dynamic reloc.  */
3218               if (! relocate)
3219                 continue;
3220             }
3221
3222           break;
3223
3224         case R_X86_64_TLSGD:
3225         case R_X86_64_GOTPC32_TLSDESC:
3226         case R_X86_64_TLSDESC_CALL:
3227         case R_X86_64_GOTTPOFF:
3228           tls_type = GOT_UNKNOWN;
3229           if (h == NULL && local_got_offsets)
3230             tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
3231           else if (h != NULL)
3232             tls_type = elf_x86_hash_entry (h)->tls_type;
3233
3234           r_type_tls = r_type;
3235           if (! elf_x86_64_tls_transition (info, input_bfd,
3236                                            input_section, contents,
3237                                            symtab_hdr, sym_hashes,
3238                                            &r_type_tls, tls_type, rel,
3239                                            relend, h, r_symndx, TRUE))
3240             return FALSE;
3241
3242           if (r_type_tls == R_X86_64_TPOFF32)
3243             {
3244               bfd_vma roff = rel->r_offset;
3245
3246               BFD_ASSERT (! unresolved_reloc);
3247
3248               if (r_type == R_X86_64_TLSGD)
3249                 {
3250                   /* GD->LE transition.  For 64bit, change
3251                         .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3252                         .word 0x6666; rex64; call __tls_get_addr@PLT
3253                      or
3254                         .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3255                         .byte 0x66; rex64
3256                         call *__tls_get_addr@GOTPCREL(%rip)
3257                         which may be converted to
3258                         addr32 call __tls_get_addr
3259                      into:
3260                         movq %fs:0, %rax
3261                         leaq foo@tpoff(%rax), %rax
3262                      For 32bit, change
3263                         leaq foo@tlsgd(%rip), %rdi
3264                         .word 0x6666; rex64; call __tls_get_addr@PLT
3265                      or
3266                         leaq foo@tlsgd(%rip), %rdi
3267                         .byte 0x66; rex64
3268                         call *__tls_get_addr@GOTPCREL(%rip)
3269                         which may be converted to
3270                         addr32 call __tls_get_addr
3271                      into:
3272                         movl %fs:0, %eax
3273                         leaq foo@tpoff(%rax), %rax
3274                      For largepic, change:
3275                         leaq foo@tlsgd(%rip), %rdi
3276                         movabsq $__tls_get_addr@pltoff, %rax
3277                         addq %r15, %rax
3278                         call *%rax
3279                      into:
3280                         movq %fs:0, %rax
3281                         leaq foo@tpoff(%rax), %rax
3282                         nopw 0x0(%rax,%rax,1)  */
3283                   int largepic = 0;
3284                   if (ABI_64_P (output_bfd))
3285                     {
3286                       if (contents[roff + 5] == 0xb8)
3287                         {
3288                           memcpy (contents + roff - 3,
3289                                   "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
3290                                   "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3291                           largepic = 1;
3292                         }
3293                       else
3294                         memcpy (contents + roff - 4,
3295                                 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3296                                 16);
3297                     }
3298                   else
3299                     memcpy (contents + roff - 3,
3300                             "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3301                             15);
3302                   bfd_put_32 (output_bfd,
3303                               elf_x86_64_tpoff (info, relocation),
3304                               contents + roff + 8 + largepic);
3305                   /* Skip R_X86_64_PC32, R_X86_64_PLT32,
3306                      R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64.  */
3307                   rel++;
3308                   wrel++;
3309                   continue;
3310                 }
3311               else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3312                 {
3313                   /* GDesc -> LE transition.
3314                      It's originally something like:
3315                      leaq x@tlsdesc(%rip), %rax
3316
3317                      Change it to:
3318                      movl $x@tpoff, %rax.  */
3319
3320                   unsigned int val, type;
3321
3322                   type = bfd_get_8 (input_bfd, contents + roff - 3);
3323                   val = bfd_get_8 (input_bfd, contents + roff - 1);
3324                   bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3325                              contents + roff - 3);
3326                   bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3327                   bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3328                              contents + roff - 1);
3329                   bfd_put_32 (output_bfd,
3330                               elf_x86_64_tpoff (info, relocation),
3331                               contents + roff);
3332                   continue;
3333                 }
3334               else if (r_type == R_X86_64_TLSDESC_CALL)
3335                 {
3336                   /* GDesc -> LE transition.
3337                      It's originally:
3338                      call *(%rax)
3339                      Turn it into:
3340                      xchg %ax,%ax.  */
3341                   bfd_put_8 (output_bfd, 0x66, contents + roff);
3342                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3343                   continue;
3344                 }
3345               else if (r_type == R_X86_64_GOTTPOFF)
3346                 {
3347                   /* IE->LE transition:
3348                      For 64bit, originally it can be one of:
3349                      movq foo@gottpoff(%rip), %reg
3350                      addq foo@gottpoff(%rip), %reg
3351                      We change it into:
3352                      movq $foo, %reg
3353                      leaq foo(%reg), %reg
3354                      addq $foo, %reg.
3355                      For 32bit, originally it can be one of:
3356                      movq foo@gottpoff(%rip), %reg
3357                      addl foo@gottpoff(%rip), %reg
3358                      We change it into:
3359                      movq $foo, %reg
3360                      leal foo(%reg), %reg
3361                      addl $foo, %reg. */
3362
3363                   unsigned int val, type, reg;
3364
3365                   if (roff >= 3)
3366                     val = bfd_get_8 (input_bfd, contents + roff - 3);
3367                   else
3368                     val = 0;
3369                   type = bfd_get_8 (input_bfd, contents + roff - 2);
3370                   reg = bfd_get_8 (input_bfd, contents + roff - 1);
3371                   reg >>= 3;
3372                   if (type == 0x8b)
3373                     {
3374                       /* movq */
3375                       if (val == 0x4c)
3376                         bfd_put_8 (output_bfd, 0x49,
3377                                    contents + roff - 3);
3378                       else if (!ABI_64_P (output_bfd) && val == 0x44)
3379                         bfd_put_8 (output_bfd, 0x41,
3380                                    contents + roff - 3);
3381                       bfd_put_8 (output_bfd, 0xc7,
3382                                  contents + roff - 2);
3383                       bfd_put_8 (output_bfd, 0xc0 | reg,
3384                                  contents + roff - 1);
3385                     }
3386                   else if (reg == 4)
3387                     {
3388                       /* addq/addl -> addq/addl - addressing with %rsp/%r12
3389                          is special  */
3390                       if (val == 0x4c)
3391                         bfd_put_8 (output_bfd, 0x49,
3392                                    contents + roff - 3);
3393                       else if (!ABI_64_P (output_bfd) && val == 0x44)
3394                         bfd_put_8 (output_bfd, 0x41,
3395                                    contents + roff - 3);
3396                       bfd_put_8 (output_bfd, 0x81,
3397                                  contents + roff - 2);
3398                       bfd_put_8 (output_bfd, 0xc0 | reg,
3399                                  contents + roff - 1);
3400                     }
3401                   else
3402                     {
3403                       /* addq/addl -> leaq/leal */
3404                       if (val == 0x4c)
3405                         bfd_put_8 (output_bfd, 0x4d,
3406                                    contents + roff - 3);
3407                       else if (!ABI_64_P (output_bfd) && val == 0x44)
3408                         bfd_put_8 (output_bfd, 0x45,
3409                                    contents + roff - 3);
3410                       bfd_put_8 (output_bfd, 0x8d,
3411                                  contents + roff - 2);
3412                       bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
3413                                  contents + roff - 1);
3414                     }
3415                   bfd_put_32 (output_bfd,
3416                               elf_x86_64_tpoff (info, relocation),
3417                               contents + roff);
3418                   continue;
3419                 }
3420               else
3421                 BFD_ASSERT (FALSE);
3422             }
3423
3424           if (htab->elf.sgot == NULL)
3425             abort ();
3426
3427           if (h != NULL)
3428             {
3429               off = h->got.offset;
3430               offplt = elf_x86_hash_entry (h)->tlsdesc_got;
3431             }
3432           else
3433             {
3434               if (local_got_offsets == NULL)
3435                 abort ();
3436
3437               off = local_got_offsets[r_symndx];
3438               offplt = local_tlsdesc_gotents[r_symndx];
3439             }
3440
3441           if ((off & 1) != 0)
3442             off &= ~1;
3443           else
3444             {
3445               Elf_Internal_Rela outrel;
3446               int dr_type, indx;
3447               asection *sreloc;
3448
3449               if (htab->elf.srelgot == NULL)
3450                 abort ();
3451
3452               indx = h && h->dynindx != -1 ? h->dynindx : 0;
3453
3454               if (GOT_TLS_GDESC_P (tls_type))
3455                 {
3456                   outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
3457                   BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
3458                               + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
3459                   outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3460                                      + htab->elf.sgotplt->output_offset
3461                                      + offplt
3462                                      + htab->sgotplt_jump_table_size);
3463                   sreloc = htab->elf.srelplt;
3464                   if (indx == 0)
3465                     outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3466                   else
3467                     outrel.r_addend = 0;
3468                   elf_append_rela (output_bfd, sreloc, &outrel);
3469                 }
3470
3471               sreloc = htab->elf.srelgot;
3472
3473               outrel.r_offset = (htab->elf.sgot->output_section->vma
3474                                  + htab->elf.sgot->output_offset + off);
3475
3476               if (GOT_TLS_GD_P (tls_type))
3477                 dr_type = R_X86_64_DTPMOD64;
3478               else if (GOT_TLS_GDESC_P (tls_type))
3479                 goto dr_done;
3480               else
3481                 dr_type = R_X86_64_TPOFF64;
3482
3483               bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
3484               outrel.r_addend = 0;
3485               if ((dr_type == R_X86_64_TPOFF64
3486                    || dr_type == R_X86_64_TLSDESC) && indx == 0)
3487                 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3488               outrel.r_info = htab->r_info (indx, dr_type);
3489
3490               elf_append_rela (output_bfd, sreloc, &outrel);
3491
3492               if (GOT_TLS_GD_P (tls_type))
3493                 {
3494                   if (indx == 0)
3495                     {
3496                       BFD_ASSERT (! unresolved_reloc);
3497                       bfd_put_64 (output_bfd,
3498                                   relocation - _bfd_x86_elf_dtpoff_base (info),
3499                                   htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3500                     }
3501                   else
3502                     {
3503                       bfd_put_64 (output_bfd, 0,
3504                                   htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3505                       outrel.r_info = htab->r_info (indx,
3506                                                     R_X86_64_DTPOFF64);
3507                       outrel.r_offset += GOT_ENTRY_SIZE;
3508                       elf_append_rela (output_bfd, sreloc,
3509                                                 &outrel);
3510                     }
3511                 }
3512
3513             dr_done:
3514               if (h != NULL)
3515                 h->got.offset |= 1;
3516               else
3517                 local_got_offsets[r_symndx] |= 1;
3518             }
3519
3520           if (off >= (bfd_vma) -2
3521               && ! GOT_TLS_GDESC_P (tls_type))
3522             abort ();
3523           if (r_type_tls == r_type)
3524             {
3525               if (r_type == R_X86_64_GOTPC32_TLSDESC
3526                   || r_type == R_X86_64_TLSDESC_CALL)
3527                 relocation = htab->elf.sgotplt->output_section->vma
3528                   + htab->elf.sgotplt->output_offset
3529                   + offplt + htab->sgotplt_jump_table_size;
3530               else
3531                 relocation = htab->elf.sgot->output_section->vma
3532                   + htab->elf.sgot->output_offset + off;
3533               unresolved_reloc = FALSE;
3534             }
3535           else
3536             {
3537               bfd_vma roff = rel->r_offset;
3538
3539               if (r_type == R_X86_64_TLSGD)
3540                 {
3541                   /* GD->IE transition.  For 64bit, change
3542                         .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3543                         .word 0x6666; rex64; call __tls_get_addr@PLT
3544                      or
3545                         .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3546                         .byte 0x66; rex64
3547                         call *__tls_get_addr@GOTPCREL(%rip
3548                         which may be converted to
3549                         addr32 call __tls_get_addr
3550                      into:
3551                         movq %fs:0, %rax
3552                         addq foo@gottpoff(%rip), %rax
3553                      For 32bit, change
3554                         leaq foo@tlsgd(%rip), %rdi
3555                         .word 0x6666; rex64; call __tls_get_addr@PLT
3556                      or
3557                         leaq foo@tlsgd(%rip), %rdi
3558                         .byte 0x66; rex64;
3559                         call *__tls_get_addr@GOTPCREL(%rip)
3560                         which may be converted to
3561                         addr32 call __tls_get_addr
3562                      into:
3563                         movl %fs:0, %eax
3564                         addq foo@gottpoff(%rip), %rax
3565                      For largepic, change:
3566                         leaq foo@tlsgd(%rip), %rdi
3567                         movabsq $__tls_get_addr@pltoff, %rax
3568                         addq %r15, %rax
3569                         call *%rax
3570                      into:
3571                         movq %fs:0, %rax
3572                         addq foo@gottpoff(%rax), %rax
3573                         nopw 0x0(%rax,%rax,1)  */
3574                   int largepic = 0;
3575                   if (ABI_64_P (output_bfd))
3576                     {
3577                       if (contents[roff + 5] == 0xb8)
3578                         {
3579                           memcpy (contents + roff - 3,
3580                                   "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
3581                                   "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3582                           largepic = 1;
3583                         }
3584                       else
3585                         memcpy (contents + roff - 4,
3586                                 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3587                                 16);
3588                     }
3589                   else
3590                     memcpy (contents + roff - 3,
3591                             "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3592                             15);
3593
3594                   relocation = (htab->elf.sgot->output_section->vma
3595                                 + htab->elf.sgot->output_offset + off
3596                                 - roff
3597                                 - largepic
3598                                 - input_section->output_section->vma
3599                                 - input_section->output_offset
3600                                 - 12);
3601                   bfd_put_32 (output_bfd, relocation,
3602                               contents + roff + 8 + largepic);
3603                   /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64.  */
3604                   rel++;
3605                   wrel++;
3606                   continue;
3607                 }
3608               else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3609                 {
3610                   /* GDesc -> IE transition.
3611                      It's originally something like:
3612                      leaq x@tlsdesc(%rip), %rax
3613
3614                      Change it to:
3615                      movq x@gottpoff(%rip), %rax # before xchg %ax,%ax.  */
3616
3617                   /* Now modify the instruction as appropriate. To
3618                      turn a leaq into a movq in the form we use it, it
3619                      suffices to change the second byte from 0x8d to
3620                      0x8b.  */
3621                   bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3622
3623                   bfd_put_32 (output_bfd,
3624                               htab->elf.sgot->output_section->vma
3625                               + htab->elf.sgot->output_offset + off
3626                               - rel->r_offset
3627                               - input_section->output_section->vma
3628                               - input_section->output_offset
3629                               - 4,
3630                               contents + roff);
3631                   continue;
3632                 }
3633               else if (r_type == R_X86_64_TLSDESC_CALL)
3634                 {
3635                   /* GDesc -> IE transition.
3636                      It's originally:
3637                      call *(%rax)
3638
3639                      Change it to:
3640                      xchg %ax, %ax.  */
3641
3642                   bfd_put_8 (output_bfd, 0x66, contents + roff);
3643                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3644                   continue;
3645                 }
3646               else
3647                 BFD_ASSERT (FALSE);
3648             }
3649           break;
3650
3651         case R_X86_64_TLSLD:
3652           if (! elf_x86_64_tls_transition (info, input_bfd,
3653                                            input_section, contents,
3654                                            symtab_hdr, sym_hashes,
3655                                            &r_type, GOT_UNKNOWN, rel,
3656                                            relend, h, r_symndx, TRUE))
3657             return FALSE;
3658
3659           if (r_type != R_X86_64_TLSLD)
3660             {
3661               /* LD->LE transition:
3662                         leaq foo@tlsld(%rip), %rdi
3663                         call __tls_get_addr@PLT
3664                  For 64bit, we change it into:
3665                         .word 0x6666; .byte 0x66; movq %fs:0, %rax
3666                  For 32bit, we change it into:
3667                         nopl 0x0(%rax); movl %fs:0, %eax
3668                  Or
3669                         leaq foo@tlsld(%rip), %rdi;
3670                         call *__tls_get_addr@GOTPCREL(%rip)
3671                         which may be converted to
3672                         addr32 call __tls_get_addr
3673                  For 64bit, we change it into:
3674                         .word 0x6666; .word 0x6666; movq %fs:0, %rax
3675                  For 32bit, we change it into:
3676                         nopw 0x0(%rax); movl %fs:0, %eax
3677                  For largepic, change:
3678                         leaq foo@tlsgd(%rip), %rdi
3679                         movabsq $__tls_get_addr@pltoff, %rax
3680                         addq %rbx, %rax
3681                         call *%rax
3682                  into
3683                         data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
3684                         movq %fs:0, %eax  */
3685
3686               BFD_ASSERT (r_type == R_X86_64_TPOFF32);
3687               if (ABI_64_P (output_bfd))
3688                 {
3689                   if (contents[rel->r_offset + 5] == 0xb8)
3690                     memcpy (contents + rel->r_offset - 3,
3691                             "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
3692                             "\x64\x48\x8b\x04\x25\0\0\0", 22);
3693                   else if (contents[rel->r_offset + 4] == 0xff
3694                            || contents[rel->r_offset + 4] == 0x67)
3695                     memcpy (contents + rel->r_offset - 3,
3696                             "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
3697                             13);
3698                   else
3699                     memcpy (contents + rel->r_offset - 3,
3700                             "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
3701                 }
3702               else
3703                 {
3704                   if (contents[rel->r_offset + 4] == 0xff)
3705                     memcpy (contents + rel->r_offset - 3,
3706                             "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
3707                             13);
3708                   else
3709                     memcpy (contents + rel->r_offset - 3,
3710                             "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
3711                 }
3712               /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
3713                  and R_X86_64_PLTOFF64.  */
3714               rel++;
3715               wrel++;
3716               continue;
3717             }
3718
3719           if (htab->elf.sgot == NULL)
3720             abort ();
3721
3722           off = htab->tls_ld_or_ldm_got.offset;
3723           if (off & 1)
3724             off &= ~1;
3725           else
3726             {
3727               Elf_Internal_Rela outrel;
3728
3729               if (htab->elf.srelgot == NULL)
3730                 abort ();
3731
3732               outrel.r_offset = (htab->elf.sgot->output_section->vma
3733                                  + htab->elf.sgot->output_offset + off);
3734
3735               bfd_put_64 (output_bfd, 0,
3736                           htab->elf.sgot->contents + off);
3737               bfd_put_64 (output_bfd, 0,
3738                           htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3739               outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
3740               outrel.r_addend = 0;
3741               elf_append_rela (output_bfd, htab->elf.srelgot,
3742                                         &outrel);
3743               htab->tls_ld_or_ldm_got.offset |= 1;
3744             }
3745           relocation = htab->elf.sgot->output_section->vma
3746                        + htab->elf.sgot->output_offset + off;
3747           unresolved_reloc = FALSE;
3748           break;
3749
3750         case R_X86_64_DTPOFF32:
3751           if (!bfd_link_executable (info)
3752               || (input_section->flags & SEC_CODE) == 0)
3753             relocation -= _bfd_x86_elf_dtpoff_base (info);
3754           else
3755             relocation = elf_x86_64_tpoff (info, relocation);
3756           break;
3757
3758         case R_X86_64_TPOFF32:
3759         case R_X86_64_TPOFF64:
3760           BFD_ASSERT (bfd_link_executable (info));
3761           relocation = elf_x86_64_tpoff (info, relocation);
3762           break;
3763
3764         case R_X86_64_DTPOFF64:
3765           BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
3766           relocation -= _bfd_x86_elf_dtpoff_base (info);
3767           break;
3768
3769         default:
3770           break;
3771         }
3772
3773       /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3774          because such sections are not SEC_ALLOC and thus ld.so will
3775          not process them.  */
3776       if (unresolved_reloc
3777           && !((input_section->flags & SEC_DEBUGGING) != 0
3778                && h->def_dynamic)
3779           && _bfd_elf_section_offset (output_bfd, info, input_section,
3780                                       rel->r_offset) != (bfd_vma) -1)
3781         {
3782           switch (r_type)
3783             {
3784             case R_X86_64_32S:
3785               sec = h->root.u.def.section;
3786               if ((info->nocopyreloc
3787                    || (eh->def_protected
3788                        && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3789                   && !(h->root.u.def.section->flags & SEC_CODE))
3790                 return elf_x86_64_need_pic (info, input_bfd, input_section,
3791                                             h, NULL, NULL, howto);
3792               /* Fall through.  */
3793
3794             default:
3795               _bfd_error_handler
3796                 /* xgettext:c-format */
3797                 (_("%B(%A+%#Lx): unresolvable %s relocation against symbol `%s'"),
3798                  input_bfd,
3799                  input_section,
3800                  rel->r_offset,
3801                  howto->name,
3802                  h->root.root.string);
3803               return FALSE;
3804             }
3805         }
3806
3807 do_relocation:
3808       r = _bfd_final_link_relocate (howto, input_bfd, input_section,
3809                                     contents, rel->r_offset,
3810                                     relocation, rel->r_addend);
3811
3812 check_relocation_error:
3813       if (r != bfd_reloc_ok)
3814         {
3815           const char *name;
3816
3817           if (h != NULL)
3818             name = h->root.root.string;
3819           else
3820             {
3821               name = bfd_elf_string_from_elf_section (input_bfd,
3822                                                       symtab_hdr->sh_link,
3823                                                       sym->st_name);
3824               if (name == NULL)
3825                 return FALSE;
3826               if (*name == '\0')
3827                 name = bfd_section_name (input_bfd, sec);
3828             }
3829
3830           if (r == bfd_reloc_overflow)
3831             {
3832               if (converted_reloc)
3833                 {
3834                   info->callbacks->einfo
3835                     (_("%F%P: failed to convert GOTPCREL relocation; relink with --no-relax\n"));
3836                   return FALSE;
3837                 }
3838               (*info->callbacks->reloc_overflow)
3839                 (info, (h ? &h->root : NULL), name, howto->name,
3840                  (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3841             }
3842           else
3843             {
3844               _bfd_error_handler
3845                 /* xgettext:c-format */
3846                 (_("%B(%A+%#Lx): reloc against `%s': error %d"),
3847                  input_bfd, input_section,
3848                  rel->r_offset, name, (int) r);
3849               return FALSE;
3850             }
3851         }
3852
3853       if (wrel != rel)
3854         *wrel = *rel;
3855     }
3856
3857   if (wrel != rel)
3858     {
3859       Elf_Internal_Shdr *rel_hdr;
3860       size_t deleted = rel - wrel;
3861
3862       rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3863       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3864       if (rel_hdr->sh_size == 0)
3865         {
3866           /* It is too late to remove an empty reloc section.  Leave
3867              one NONE reloc.
3868              ??? What is wrong with an empty section???  */
3869           rel_hdr->sh_size = rel_hdr->sh_entsize;
3870           deleted -= 1;
3871         }
3872       rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3873       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3874       input_section->reloc_count -= deleted;
3875     }
3876
3877   return TRUE;
3878 }
3879
3880 /* Finish up dynamic symbol handling.  We set the contents of various
3881    dynamic sections here.  */
3882
3883 static bfd_boolean
3884 elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3885                                   struct bfd_link_info *info,
3886                                   struct elf_link_hash_entry *h,
3887                                   Elf_Internal_Sym *sym)
3888 {
3889   struct elf_x86_link_hash_table *htab;
3890   bfd_boolean use_plt_second;
3891   struct elf_x86_link_hash_entry *eh;
3892   bfd_boolean local_undefweak;
3893
3894   htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
3895   if (htab == NULL)
3896     return FALSE;
3897
3898   /* Use the second PLT section only if there is .plt section.  */
3899   use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
3900
3901   eh = (struct elf_x86_link_hash_entry *) h;
3902   if (eh->no_finish_dynamic_symbol)
3903     abort ();
3904
3905   /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3906      resolved undefined weak symbols in executable so that their
3907      references have value 0 at run-time.  */
3908   local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
3909
3910   if (h->plt.offset != (bfd_vma) -1)
3911     {
3912       bfd_vma plt_index;
3913       bfd_vma got_offset, plt_offset;
3914       Elf_Internal_Rela rela;
3915       bfd_byte *loc;
3916       asection *plt, *gotplt, *relplt, *resolved_plt;
3917       const struct elf_backend_data *bed;
3918       bfd_vma plt_got_pcrel_offset;
3919
3920       /* When building a static executable, use .iplt, .igot.plt and
3921          .rela.iplt sections for STT_GNU_IFUNC symbols.  */
3922       if (htab->elf.splt != NULL)
3923         {
3924           plt = htab->elf.splt;
3925           gotplt = htab->elf.sgotplt;
3926           relplt = htab->elf.srelplt;
3927         }
3928       else
3929         {
3930           plt = htab->elf.iplt;
3931           gotplt = htab->elf.igotplt;
3932           relplt = htab->elf.irelplt;
3933         }
3934
3935       VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
3936
3937       /* Get the index in the procedure linkage table which
3938          corresponds to this symbol.  This is the index of this symbol
3939          in all the symbols for which we are making plt entries.  The
3940          first entry in the procedure linkage table is reserved.
3941
3942          Get the offset into the .got table of the entry that
3943          corresponds to this function.  Each .got entry is GOT_ENTRY_SIZE
3944          bytes. The first three are reserved for the dynamic linker.
3945
3946          For static executables, we don't reserve anything.  */
3947
3948       if (plt == htab->elf.splt)
3949         {
3950           got_offset = (h->plt.offset / htab->plt.plt_entry_size
3951                         - htab->plt.has_plt0);
3952           got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
3953         }
3954       else
3955         {
3956           got_offset = h->plt.offset / htab->plt.plt_entry_size;
3957           got_offset = got_offset * GOT_ENTRY_SIZE;
3958         }
3959
3960       /* Fill in the entry in the procedure linkage table.  */
3961       memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
3962               htab->plt.plt_entry_size);
3963       if (use_plt_second)
3964         {
3965           memcpy (htab->plt_second->contents + eh->plt_second.offset,
3966                   htab->non_lazy_plt->plt_entry,
3967                   htab->non_lazy_plt->plt_entry_size);
3968
3969           resolved_plt = htab->plt_second;
3970           plt_offset = eh->plt_second.offset;
3971         }
3972       else
3973         {
3974           resolved_plt = plt;
3975           plt_offset = h->plt.offset;
3976         }
3977
3978       /* Insert the relocation positions of the plt section.  */
3979
3980       /* Put offset the PC-relative instruction referring to the GOT entry,
3981          subtracting the size of that instruction.  */
3982       plt_got_pcrel_offset = (gotplt->output_section->vma
3983                               + gotplt->output_offset
3984                               + got_offset
3985                               - resolved_plt->output_section->vma
3986                               - resolved_plt->output_offset
3987                               - plt_offset
3988                               - htab->plt.plt_got_insn_size);
3989
3990       /* Check PC-relative offset overflow in PLT entry.  */
3991       if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
3992         /* xgettext:c-format */
3993         info->callbacks->einfo (_("%F%B: PC-relative offset overflow in PLT entry for `%s'\n"),
3994                                 output_bfd, h->root.root.string);
3995
3996       bfd_put_32 (output_bfd, plt_got_pcrel_offset,
3997                   (resolved_plt->contents + plt_offset
3998                    + htab->plt.plt_got_offset));
3999
4000       /* Fill in the entry in the global offset table, initially this
4001          points to the second part of the PLT entry.  Leave the entry
4002          as zero for undefined weak symbol in PIE.  No PLT relocation
4003          against undefined weak symbol in PIE.  */
4004       if (!local_undefweak)
4005         {
4006           if (htab->plt.has_plt0)
4007             bfd_put_64 (output_bfd, (plt->output_section->vma
4008                                      + plt->output_offset
4009                                      + h->plt.offset
4010                                      + htab->lazy_plt->plt_lazy_offset),
4011                         gotplt->contents + got_offset);
4012
4013           /* Fill in the entry in the .rela.plt section.  */
4014           rela.r_offset = (gotplt->output_section->vma
4015                            + gotplt->output_offset
4016                            + got_offset);
4017           if (PLT_LOCAL_IFUNC_P (info, h))
4018             {
4019               info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
4020                                       h->root.root.string,
4021                                       h->root.u.def.section->owner);
4022
4023               /* If an STT_GNU_IFUNC symbol is locally defined, generate
4024                  R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT.  */
4025               rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4026               rela.r_addend = (h->root.u.def.value
4027                                + h->root.u.def.section->output_section->vma
4028                                + h->root.u.def.section->output_offset);
4029               /* R_X86_64_IRELATIVE comes last.  */
4030               plt_index = htab->next_irelative_index--;
4031             }
4032           else
4033             {
4034               rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
4035               rela.r_addend = 0;
4036               plt_index = htab->next_jump_slot_index++;
4037             }
4038
4039           /* Don't fill the second and third slots in PLT entry for
4040              static executables nor without PLT0.  */
4041           if (plt == htab->elf.splt && htab->plt.has_plt0)
4042             {
4043               bfd_vma plt0_offset
4044                 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
4045
4046               /* Put relocation index.  */
4047               bfd_put_32 (output_bfd, plt_index,
4048                           (plt->contents + h->plt.offset
4049                            + htab->lazy_plt->plt_reloc_offset));
4050
4051               /* Put offset for jmp .PLT0 and check for overflow.  We don't
4052                  check relocation index for overflow since branch displacement
4053                  will overflow first.  */
4054               if (plt0_offset > 0x80000000)
4055                 /* xgettext:c-format */
4056                 info->callbacks->einfo (_("%F%B: branch displacement overflow in PLT entry for `%s'\n"),
4057                                         output_bfd, h->root.root.string);
4058               bfd_put_32 (output_bfd, - plt0_offset,
4059                           (plt->contents + h->plt.offset
4060                            + htab->lazy_plt->plt_plt_offset));
4061             }
4062
4063           bed = get_elf_backend_data (output_bfd);
4064           loc = relplt->contents + plt_index * bed->s->sizeof_rela;
4065           bed->s->swap_reloca_out (output_bfd, &rela, loc);
4066         }
4067     }
4068   else if (eh->plt_got.offset != (bfd_vma) -1)
4069     {
4070       bfd_vma got_offset, plt_offset;
4071       asection *plt, *got;
4072       bfd_boolean got_after_plt;
4073       int32_t got_pcrel_offset;
4074
4075       /* Set the entry in the GOT procedure linkage table.  */
4076       plt = htab->plt_got;
4077       got = htab->elf.sgot;
4078       got_offset = h->got.offset;
4079
4080       if (got_offset == (bfd_vma) -1
4081           || (h->type == STT_GNU_IFUNC && h->def_regular)
4082           || plt == NULL
4083           || got == NULL)
4084         abort ();
4085
4086       /* Use the non-lazy PLT entry template for the GOT PLT since they
4087          are the identical.  */
4088       /* Fill in the entry in the GOT procedure linkage table.  */
4089       plt_offset = eh->plt_got.offset;
4090       memcpy (plt->contents + plt_offset,
4091               htab->non_lazy_plt->plt_entry,
4092               htab->non_lazy_plt->plt_entry_size);
4093
4094       /* Put offset the PC-relative instruction referring to the GOT
4095          entry, subtracting the size of that instruction.  */
4096       got_pcrel_offset = (got->output_section->vma
4097                           + got->output_offset
4098                           + got_offset
4099                           - plt->output_section->vma
4100                           - plt->output_offset
4101                           - plt_offset
4102                           - htab->non_lazy_plt->plt_got_insn_size);
4103
4104       /* Check PC-relative offset overflow in GOT PLT entry.  */
4105       got_after_plt = got->output_section->vma > plt->output_section->vma;
4106       if ((got_after_plt && got_pcrel_offset < 0)
4107           || (!got_after_plt && got_pcrel_offset > 0))
4108         /* xgettext:c-format */
4109         info->callbacks->einfo (_("%F%B: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
4110                                 output_bfd, h->root.root.string);
4111
4112       bfd_put_32 (output_bfd, got_pcrel_offset,
4113                   (plt->contents + plt_offset
4114                    + htab->non_lazy_plt->plt_got_offset));
4115     }
4116
4117   if (!local_undefweak
4118       && !h->def_regular
4119       && (h->plt.offset != (bfd_vma) -1
4120           || eh->plt_got.offset != (bfd_vma) -1))
4121     {
4122       /* Mark the symbol as undefined, rather than as defined in
4123          the .plt section.  Leave the value if there were any
4124          relocations where pointer equality matters (this is a clue
4125          for the dynamic linker, to make function pointer
4126          comparisons work between an application and shared
4127          library), otherwise set it to zero.  If a function is only
4128          called from a binary, there is no need to slow down
4129          shared libraries because of that.  */
4130       sym->st_shndx = SHN_UNDEF;
4131       if (!h->pointer_equality_needed)
4132         sym->st_value = 0;
4133     }
4134
4135   /* Don't generate dynamic GOT relocation against undefined weak
4136      symbol in executable.  */
4137   if (h->got.offset != (bfd_vma) -1
4138       && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry (h)->tls_type)
4139       && elf_x86_hash_entry (h)->tls_type != GOT_TLS_IE
4140       && !local_undefweak)
4141     {
4142       Elf_Internal_Rela rela;
4143       asection *relgot = htab->elf.srelgot;
4144
4145       /* This symbol has an entry in the global offset table.  Set it
4146          up.  */
4147       if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
4148         abort ();
4149
4150       rela.r_offset = (htab->elf.sgot->output_section->vma
4151                        + htab->elf.sgot->output_offset
4152                        + (h->got.offset &~ (bfd_vma) 1));
4153
4154       /* If this is a static link, or it is a -Bsymbolic link and the
4155          symbol is defined locally or was forced to be local because
4156          of a version file, we just want to emit a RELATIVE reloc.
4157          The entry in the global offset table will already have been
4158          initialized in the relocate_section function.  */
4159       if (h->def_regular
4160           && h->type == STT_GNU_IFUNC)
4161         {
4162           if (h->plt.offset == (bfd_vma) -1)
4163             {
4164               /* STT_GNU_IFUNC is referenced without PLT.  */
4165               if (htab->elf.splt == NULL)
4166                 {
4167                   /* use .rel[a].iplt section to store .got relocations
4168                      in static executable.  */
4169                   relgot = htab->elf.irelplt;
4170                 }
4171               if (SYMBOL_REFERENCES_LOCAL_P (info, h))
4172                 {
4173                   info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
4174                                           h->root.root.string,
4175                                           h->root.u.def.section->owner);
4176
4177                   rela.r_info = htab->r_info (0,
4178                                               R_X86_64_IRELATIVE);
4179                   rela.r_addend = (h->root.u.def.value
4180                                    + h->root.u.def.section->output_section->vma
4181                                    + h->root.u.def.section->output_offset);
4182                 }
4183               else
4184                 goto do_glob_dat;
4185             }
4186           else if (bfd_link_pic (info))
4187             {
4188               /* Generate R_X86_64_GLOB_DAT.  */
4189               goto do_glob_dat;
4190             }
4191           else
4192             {
4193               asection *plt;
4194               bfd_vma plt_offset;
4195
4196               if (!h->pointer_equality_needed)
4197                 abort ();
4198
4199               /* For non-shared object, we can't use .got.plt, which
4200                  contains the real function addres if we need pointer
4201                  equality.  We load the GOT entry with the PLT entry.  */
4202               if (htab->plt_second != NULL)
4203                 {
4204                   plt = htab->plt_second;
4205                   plt_offset = eh->plt_second.offset;
4206                 }
4207               else
4208                 {
4209                   plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4210                   plt_offset =  h->plt.offset;
4211                 }
4212               bfd_put_64 (output_bfd, (plt->output_section->vma
4213                                        + plt->output_offset
4214                                        + plt_offset),
4215                           htab->elf.sgot->contents + h->got.offset);
4216               return TRUE;
4217             }
4218         }
4219       else if (bfd_link_pic (info)
4220                && SYMBOL_REFERENCES_LOCAL_P (info, h))
4221         {
4222           if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
4223             return FALSE;
4224           BFD_ASSERT((h->got.offset & 1) != 0);
4225           rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
4226           rela.r_addend = (h->root.u.def.value
4227                            + h->root.u.def.section->output_section->vma
4228                            + h->root.u.def.section->output_offset);
4229         }
4230       else
4231         {
4232           BFD_ASSERT((h->got.offset & 1) == 0);
4233 do_glob_dat:
4234           bfd_put_64 (output_bfd, (bfd_vma) 0,
4235                       htab->elf.sgot->contents + h->got.offset);
4236           rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
4237           rela.r_addend = 0;
4238         }
4239
4240       elf_append_rela (output_bfd, relgot, &rela);
4241     }
4242
4243   if (h->needs_copy)
4244     {
4245       Elf_Internal_Rela rela;
4246       asection *s;
4247
4248       /* This symbol needs a copy reloc.  Set it up.  */
4249       VERIFY_COPY_RELOC (h, htab)
4250
4251       rela.r_offset = (h->root.u.def.value
4252                        + h->root.u.def.section->output_section->vma
4253                        + h->root.u.def.section->output_offset);
4254       rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
4255       rela.r_addend = 0;
4256       if (h->root.u.def.section == htab->elf.sdynrelro)
4257         s = htab->elf.sreldynrelro;
4258       else
4259         s = htab->elf.srelbss;
4260       elf_append_rela (output_bfd, s, &rela);
4261     }
4262
4263   return TRUE;
4264 }
4265
4266 /* Finish up local dynamic symbol handling.  We set the contents of
4267    various dynamic sections here.  */
4268
4269 static bfd_boolean
4270 elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
4271 {
4272   struct elf_link_hash_entry *h
4273     = (struct elf_link_hash_entry *) *slot;
4274   struct bfd_link_info *info
4275     = (struct bfd_link_info *) inf;
4276
4277   return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4278                                            info, h, NULL);
4279 }
4280
4281 /* Finish up undefined weak symbol handling in PIE.  Fill its PLT entry
4282    here since undefined weak symbol may not be dynamic and may not be
4283    called for elf_x86_64_finish_dynamic_symbol.  */
4284
4285 static bfd_boolean
4286 elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4287                                         void *inf)
4288 {
4289   struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4290   struct bfd_link_info *info = (struct bfd_link_info *) inf;
4291
4292   if (h->root.type != bfd_link_hash_undefweak
4293       || h->dynindx != -1)
4294     return TRUE;
4295
4296   return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4297                                            info, h, NULL);
4298 }
4299
4300 /* Used to decide how to sort relocs in an optimal manner for the
4301    dynamic linker, before writing them out.  */
4302
4303 static enum elf_reloc_type_class
4304 elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
4305                              const asection *rel_sec ATTRIBUTE_UNUSED,
4306                              const Elf_Internal_Rela *rela)
4307 {
4308   bfd *abfd = info->output_bfd;
4309   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
4310   struct elf_x86_link_hash_table *htab
4311     = elf_x86_hash_table (info, X86_64_ELF_DATA);
4312
4313   if (htab->elf.dynsym != NULL
4314       && htab->elf.dynsym->contents != NULL)
4315     {
4316       /* Check relocation against STT_GNU_IFUNC symbol if there are
4317          dynamic symbols.  */
4318       unsigned long r_symndx = htab->r_sym (rela->r_info);
4319       if (r_symndx != STN_UNDEF)
4320         {
4321           Elf_Internal_Sym sym;
4322           if (!bed->s->swap_symbol_in (abfd,
4323                                        (htab->elf.dynsym->contents
4324                                         + r_symndx * bed->s->sizeof_sym),
4325                                        0, &sym))
4326             abort ();
4327
4328           if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
4329             return reloc_class_ifunc;
4330         }
4331     }
4332
4333   switch ((int) ELF32_R_TYPE (rela->r_info))
4334     {
4335     case R_X86_64_IRELATIVE:
4336       return reloc_class_ifunc;
4337     case R_X86_64_RELATIVE:
4338     case R_X86_64_RELATIVE64:
4339       return reloc_class_relative;
4340     case R_X86_64_JUMP_SLOT:
4341       return reloc_class_plt;
4342     case R_X86_64_COPY:
4343       return reloc_class_copy;
4344     default:
4345       return reloc_class_normal;
4346     }
4347 }
4348
4349 /* Finish up the dynamic sections.  */
4350
4351 static bfd_boolean
4352 elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
4353                                     struct bfd_link_info *info)
4354 {
4355   struct elf_x86_link_hash_table *htab;
4356
4357   htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4358   if (htab == NULL)
4359     return FALSE;
4360
4361   if (! htab->elf.dynamic_sections_created)
4362     return TRUE;
4363
4364   if (htab->elf.splt && htab->elf.splt->size > 0)
4365     {
4366       elf_section_data (htab->elf.splt->output_section)
4367         ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
4368
4369       if (htab->plt.has_plt0)
4370         {
4371           /* Fill in the special first entry in the procedure linkage
4372              table.  */
4373           memcpy (htab->elf.splt->contents,
4374                   htab->lazy_plt->plt0_entry,
4375                   htab->lazy_plt->plt0_entry_size);
4376           /* Add offset for pushq GOT+8(%rip), since the instruction
4377              uses 6 bytes subtract this value.  */
4378           bfd_put_32 (output_bfd,
4379                       (htab->elf.sgotplt->output_section->vma
4380                        + htab->elf.sgotplt->output_offset
4381                        + 8
4382                        - htab->elf.splt->output_section->vma
4383                        - htab->elf.splt->output_offset
4384                        - 6),
4385                       (htab->elf.splt->contents
4386                        + htab->lazy_plt->plt0_got1_offset));
4387           /* Add offset for the PC-relative instruction accessing
4388              GOT+16, subtracting the offset to the end of that
4389              instruction.  */
4390           bfd_put_32 (output_bfd,
4391                       (htab->elf.sgotplt->output_section->vma
4392                        + htab->elf.sgotplt->output_offset
4393                        + 16
4394                        - htab->elf.splt->output_section->vma
4395                        - htab->elf.splt->output_offset
4396                        - htab->lazy_plt->plt0_got2_insn_end),
4397                       (htab->elf.splt->contents
4398                        + htab->lazy_plt->plt0_got2_offset));
4399         }
4400
4401       if (htab->tlsdesc_plt)
4402         {
4403           bfd_put_64 (output_bfd, (bfd_vma) 0,
4404                       htab->elf.sgot->contents + htab->tlsdesc_got);
4405
4406           memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
4407                   htab->lazy_plt->plt0_entry,
4408                   htab->lazy_plt->plt0_entry_size);
4409
4410           /* Add offset for pushq GOT+8(%rip), since the
4411              instruction uses 6 bytes subtract this value.  */
4412           bfd_put_32 (output_bfd,
4413                       (htab->elf.sgotplt->output_section->vma
4414                        + htab->elf.sgotplt->output_offset
4415                        + 8
4416                        - htab->elf.splt->output_section->vma
4417                        - htab->elf.splt->output_offset
4418                        - htab->tlsdesc_plt
4419                        - 6),
4420                       (htab->elf.splt->contents
4421                        + htab->tlsdesc_plt
4422                        + htab->lazy_plt->plt0_got1_offset));
4423           /* Add offset for the PC-relative instruction accessing
4424              GOT+TDG, where TDG stands for htab->tlsdesc_got,
4425              subtracting the offset to the end of that
4426              instruction.  */
4427           bfd_put_32 (output_bfd,
4428                       (htab->elf.sgot->output_section->vma
4429                        + htab->elf.sgot->output_offset
4430                        + htab->tlsdesc_got
4431                        - htab->elf.splt->output_section->vma
4432                        - htab->elf.splt->output_offset
4433                        - htab->tlsdesc_plt
4434                        - htab->lazy_plt->plt0_got2_insn_end),
4435                       (htab->elf.splt->contents
4436                        + htab->tlsdesc_plt
4437                        + htab->lazy_plt->plt0_got2_offset));
4438         }
4439     }
4440
4441   /* Fill PLT entries for undefined weak symbols in PIE.  */
4442   if (bfd_link_pie (info))
4443     bfd_hash_traverse (&info->hash->table,
4444                        elf_x86_64_pie_finish_undefweak_symbol,
4445                        info);
4446
4447   return TRUE;
4448 }
4449
4450 /* Fill PLT/GOT entries and allocate dynamic relocations for local
4451    STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4452    It has to be done before elf_link_sort_relocs is called so that
4453    dynamic relocations are properly sorted.  */
4454
4455 static bfd_boolean
4456 elf_x86_64_output_arch_local_syms
4457   (bfd *output_bfd ATTRIBUTE_UNUSED,
4458    struct bfd_link_info *info,
4459    void *flaginfo ATTRIBUTE_UNUSED,
4460    int (*func) (void *, const char *,
4461                 Elf_Internal_Sym *,
4462                 asection *,
4463                 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4464 {
4465   struct elf_x86_link_hash_table *htab
4466     = elf_x86_hash_table (info, X86_64_ELF_DATA);
4467   if (htab == NULL)
4468     return FALSE;
4469
4470   /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols.  */
4471   htab_traverse (htab->loc_hash_table,
4472                  elf_x86_64_finish_local_dynamic_symbol,
4473                  info);
4474
4475   return TRUE;
4476 }
4477
4478 /* Forward declaration.  */
4479 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt;
4480
4481 /* Similar to _bfd_elf_get_synthetic_symtab.  Support PLTs with all
4482    dynamic relocations.   */
4483
4484 static long
4485 elf_x86_64_get_synthetic_symtab (bfd *abfd,
4486                                  long symcount ATTRIBUTE_UNUSED,
4487                                  asymbol **syms ATTRIBUTE_UNUSED,
4488                                  long dynsymcount,
4489                                  asymbol **dynsyms,
4490                                  asymbol **ret)
4491 {
4492   long count, i, n;
4493   int j;
4494   bfd_byte *plt_contents;
4495   long relsize;
4496   const struct elf_x86_lazy_plt_layout *lazy_plt;
4497   const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4498   const struct elf_x86_lazy_plt_layout *lazy_bnd_plt;
4499   const struct elf_x86_non_lazy_plt_layout *non_lazy_bnd_plt;
4500   const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4501   const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
4502   asection *plt;
4503   enum elf_x86_plt_type plt_type;
4504   struct elf_x86_plt plts[] =
4505     {
4506       { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4507       { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
4508       { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4509       { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
4510       { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
4511     };
4512
4513   *ret = NULL;
4514
4515   if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4516     return 0;
4517
4518   if (dynsymcount <= 0)
4519     return 0;
4520
4521   relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4522   if (relsize <= 0)
4523     return -1;
4524
4525   if (get_elf_x86_backend_data (abfd)->target_os == is_normal)
4526     {
4527       lazy_plt = &elf_x86_64_lazy_plt;
4528       non_lazy_plt = &elf_x86_64_non_lazy_plt;
4529       lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
4530       non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
4531       if (ABI_64_P (abfd))
4532         {
4533           lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4534           non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4535         }
4536       else
4537         {
4538           lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4539           non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4540         }
4541     }
4542   else
4543     {
4544       lazy_plt = &elf_x86_64_nacl_plt;
4545       non_lazy_plt = NULL;
4546       lazy_bnd_plt = NULL;
4547       non_lazy_bnd_plt = NULL;
4548       lazy_ibt_plt = NULL;
4549       non_lazy_ibt_plt = NULL;
4550     }
4551
4552   count = 0;
4553   for (j = 0; plts[j].name != NULL; j++)
4554     {
4555       plt = bfd_get_section_by_name (abfd, plts[j].name);
4556       if (plt == NULL || plt->size == 0)
4557         continue;
4558
4559       /* Get the PLT section contents.  */
4560       plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4561       if (plt_contents == NULL)
4562         break;
4563       if (!bfd_get_section_contents (abfd, (asection *) plt,
4564                                      plt_contents, 0, plt->size))
4565         {
4566           free (plt_contents);
4567           break;
4568         }
4569
4570       /* Check what kind of PLT it is.  */
4571       plt_type = plt_unknown;
4572       if (plts[j].type == plt_unknown
4573           && (plt->size >= (lazy_plt->plt_entry_size
4574                             + lazy_plt->plt_entry_size)))
4575         {
4576           /* Match lazy PLT first.  Need to check the first two
4577              instructions.   */
4578           if ((memcmp (plt_contents, lazy_plt->plt0_entry,
4579                        lazy_plt->plt0_got1_offset) == 0)
4580               && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
4581                           2) == 0))
4582             plt_type = plt_lazy;
4583           else if (lazy_bnd_plt != NULL
4584                    && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
4585                                lazy_bnd_plt->plt0_got1_offset) == 0)
4586                    && (memcmp (plt_contents + 6,
4587                                lazy_bnd_plt->plt0_entry + 6, 3) == 0))
4588             {
4589               plt_type = plt_lazy | plt_second;
4590               /* The fist entry in the lazy IBT PLT is the same as the
4591                  lazy BND PLT.  */
4592               if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
4593                            lazy_ibt_plt->plt_entry,
4594                            lazy_ibt_plt->plt_got_offset) == 0))
4595                 lazy_plt = lazy_ibt_plt;
4596               else
4597                 lazy_plt = lazy_bnd_plt;
4598             }
4599         }
4600
4601       if (non_lazy_plt != NULL
4602           && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4603           && plt->size >= non_lazy_plt->plt_entry_size)
4604         {
4605           /* Match non-lazy PLT.  */
4606           if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4607                       non_lazy_plt->plt_got_offset) == 0)
4608             plt_type = plt_non_lazy;
4609         }
4610
4611       if (plt_type == plt_unknown || plt_type == plt_second)
4612         {
4613           if (non_lazy_bnd_plt != NULL
4614               && plt->size >= non_lazy_bnd_plt->plt_entry_size
4615               && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
4616                           non_lazy_bnd_plt->plt_got_offset) == 0))
4617             {
4618               /* Match BND PLT.  */
4619               plt_type = plt_second;
4620               non_lazy_plt = non_lazy_bnd_plt;
4621             }
4622           else if (non_lazy_ibt_plt != NULL
4623                    && plt->size >= non_lazy_ibt_plt->plt_entry_size
4624                    && (memcmp (plt_contents,
4625                                non_lazy_ibt_plt->plt_entry,
4626                                non_lazy_ibt_plt->plt_got_offset) == 0))
4627             {
4628               /* Match IBT PLT.  */
4629               plt_type = plt_second;
4630               non_lazy_plt = non_lazy_ibt_plt;
4631             }
4632         }
4633
4634       if (plt_type == plt_unknown)
4635         {
4636           free (plt_contents);
4637           continue;
4638         }
4639
4640       plts[j].sec = plt;
4641       plts[j].type = plt_type;
4642
4643       if ((plt_type & plt_lazy))
4644         {
4645           plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4646           plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
4647           plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4648           /* Skip PLT0 in lazy PLT.  */
4649           i = 1;
4650         }
4651       else
4652         {
4653           plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4654           plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
4655           plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4656           i = 0;
4657         }
4658
4659       /* Skip lazy PLT when the second PLT is used.  */
4660       if (plt_type == (plt_lazy | plt_second))
4661         plts[j].count = 0;
4662       else
4663         {
4664           n = plt->size / plts[j].plt_entry_size;
4665           plts[j].count = n;
4666           count += n - i;
4667         }
4668
4669       plts[j].contents = plt_contents;
4670     }
4671
4672   return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4673                                             (bfd_vma) 0, plts, dynsyms,
4674                                             ret);
4675 }
4676
4677 /* Handle an x86-64 specific section when reading an object file.  This
4678    is called when elfcode.h finds a section with an unknown type.  */
4679
4680 static bfd_boolean
4681 elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
4682                               const char *name, int shindex)
4683 {
4684   if (hdr->sh_type != SHT_X86_64_UNWIND)
4685     return FALSE;
4686
4687   if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
4688     return FALSE;
4689
4690   return TRUE;
4691 }
4692
4693 /* Hook called by the linker routine which adds symbols from an object
4694    file.  We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4695    of .bss.  */
4696
4697 static bfd_boolean
4698 elf_x86_64_add_symbol_hook (bfd *abfd,
4699                             struct bfd_link_info *info ATTRIBUTE_UNUSED,
4700                             Elf_Internal_Sym *sym,
4701                             const char **namep ATTRIBUTE_UNUSED,
4702                             flagword *flagsp ATTRIBUTE_UNUSED,
4703                             asection **secp,
4704                             bfd_vma *valp)
4705 {
4706   asection *lcomm;
4707
4708   switch (sym->st_shndx)
4709     {
4710     case SHN_X86_64_LCOMMON:
4711       lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4712       if (lcomm == NULL)
4713         {
4714           lcomm = bfd_make_section_with_flags (abfd,
4715                                                "LARGE_COMMON",
4716                                                (SEC_ALLOC
4717                                                 | SEC_IS_COMMON
4718                                                 | SEC_LINKER_CREATED));
4719           if (lcomm == NULL)
4720             return FALSE;
4721           elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4722         }
4723       *secp = lcomm;
4724       *valp = sym->st_size;
4725       return TRUE;
4726     }
4727
4728   return TRUE;
4729 }
4730
4731
4732 /* Given a BFD section, try to locate the corresponding ELF section
4733    index.  */
4734
4735 static bfd_boolean
4736 elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4737                                          asection *sec, int *index_return)
4738 {
4739   if (sec == &_bfd_elf_large_com_section)
4740     {
4741       *index_return = SHN_X86_64_LCOMMON;
4742       return TRUE;
4743     }
4744   return FALSE;
4745 }
4746
4747 /* Process a symbol.  */
4748
4749 static void
4750 elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4751                               asymbol *asym)
4752 {
4753   elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4754
4755   switch (elfsym->internal_elf_sym.st_shndx)
4756     {
4757     case SHN_X86_64_LCOMMON:
4758       asym->section = &_bfd_elf_large_com_section;
4759       asym->value = elfsym->internal_elf_sym.st_size;
4760       /* Common symbol doesn't set BSF_GLOBAL.  */
4761       asym->flags &= ~BSF_GLOBAL;
4762       break;
4763     }
4764 }
4765
4766 static bfd_boolean
4767 elf_x86_64_common_definition (Elf_Internal_Sym *sym)
4768 {
4769   return (sym->st_shndx == SHN_COMMON
4770           || sym->st_shndx == SHN_X86_64_LCOMMON);
4771 }
4772
4773 static unsigned int
4774 elf_x86_64_common_section_index (asection *sec)
4775 {
4776   if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4777     return SHN_COMMON;
4778   else
4779     return SHN_X86_64_LCOMMON;
4780 }
4781
4782 static asection *
4783 elf_x86_64_common_section (asection *sec)
4784 {
4785   if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4786     return bfd_com_section_ptr;
4787   else
4788     return &_bfd_elf_large_com_section;
4789 }
4790
4791 static bfd_boolean
4792 elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
4793                          const Elf_Internal_Sym *sym,
4794                          asection **psec,
4795                          bfd_boolean newdef,
4796                          bfd_boolean olddef,
4797                          bfd *oldbfd,
4798                          const asection *oldsec)
4799 {
4800   /* A normal common symbol and a large common symbol result in a
4801      normal common symbol.  We turn the large common symbol into a
4802      normal one.  */
4803   if (!olddef
4804       && h->root.type == bfd_link_hash_common
4805       && !newdef
4806       && bfd_is_com_section (*psec)
4807       && oldsec != *psec)
4808     {
4809       if (sym->st_shndx == SHN_COMMON
4810           && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
4811         {
4812           h->root.u.c.p->section
4813             = bfd_make_section_old_way (oldbfd, "COMMON");
4814           h->root.u.c.p->section->flags = SEC_ALLOC;
4815         }
4816       else if (sym->st_shndx == SHN_X86_64_LCOMMON
4817                && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
4818         *psec = bfd_com_section_ptr;
4819     }
4820
4821   return TRUE;
4822 }
4823
4824 static int
4825 elf_x86_64_additional_program_headers (bfd *abfd,
4826                                        struct bfd_link_info *info ATTRIBUTE_UNUSED)
4827 {
4828   asection *s;
4829   int count = 0;
4830
4831   /* Check to see if we need a large readonly segment.  */
4832   s = bfd_get_section_by_name (abfd, ".lrodata");
4833   if (s && (s->flags & SEC_LOAD))
4834     count++;
4835
4836   /* Check to see if we need a large data segment.  Since .lbss sections
4837      is placed right after the .bss section, there should be no need for
4838      a large data segment just because of .lbss.  */
4839   s = bfd_get_section_by_name (abfd, ".ldata");
4840   if (s && (s->flags & SEC_LOAD))
4841     count++;
4842
4843   return count;
4844 }
4845
4846 /* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
4847
4848 static bfd_boolean
4849 elf_x86_64_relocs_compatible (const bfd_target *input,
4850                               const bfd_target *output)
4851 {
4852   return ((xvec_get_elf_backend_data (input)->s->elfclass
4853            == xvec_get_elf_backend_data (output)->s->elfclass)
4854           && _bfd_elf_relocs_compatible (input, output));
4855 }
4856
4857 /* Set up x86-64 GNU properties.  Return the first relocatable ELF input
4858    with GNU properties if found.  Otherwise, return NULL.  */
4859
4860 static bfd *
4861 elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
4862 {
4863   struct elf_x86_init_table init_table;
4864   const struct elf_backend_data *bed;
4865
4866   if ((int) R_X86_64_standard >= (int) R_X86_64_converted_reloc_bit
4867       || (int) R_X86_64_max <= (int) R_X86_64_converted_reloc_bit
4868       || ((int) (R_X86_64_GNU_VTINHERIT | R_X86_64_converted_reloc_bit)
4869           != (int) R_X86_64_GNU_VTINHERIT)
4870       || ((int) (R_X86_64_GNU_VTENTRY | R_X86_64_converted_reloc_bit)
4871           != (int) R_X86_64_GNU_VTENTRY))
4872     abort ();
4873
4874   /* This is unused for x86-64.  */
4875   init_table.plt0_pad_byte = 0x90;
4876
4877   if (get_elf_x86_backend_data (info->output_bfd)->target_os
4878       == is_normal)
4879     {
4880       if (info->bndplt)
4881         {
4882           init_table.lazy_plt = &elf_x86_64_lazy_bnd_plt;
4883           init_table.non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
4884         }
4885       else
4886         {
4887           init_table.lazy_plt = &elf_x86_64_lazy_plt;
4888           init_table.non_lazy_plt = &elf_x86_64_non_lazy_plt;
4889         }
4890
4891       if (ABI_64_P (info->output_bfd))
4892         {
4893           init_table.lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4894           init_table.non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4895         }
4896       else
4897         {
4898           init_table.lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4899           init_table.non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4900         }
4901     }
4902   else
4903     {
4904       init_table.lazy_plt = &elf_x86_64_nacl_plt;
4905       init_table.non_lazy_plt = NULL;
4906       init_table.lazy_ibt_plt = NULL;
4907       init_table.non_lazy_ibt_plt = NULL;
4908     }
4909
4910   if (ABI_64_P (info->output_bfd))
4911     {
4912       init_table.r_info = elf64_r_info;
4913       init_table.r_sym = elf64_r_sym;
4914     }
4915   else
4916     {
4917       init_table.r_info = elf32_r_info;
4918       init_table.r_sym = elf32_r_sym;
4919     }
4920
4921   bed = get_elf_backend_data (info->output_bfd);
4922   init_table.need_global_offset_table
4923     = (bed->elf_backend_copy_special_section_fields
4924        == elf64_x86_64_copy_solaris_special_section_fields);
4925
4926   return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
4927 }
4928
4929 static const struct bfd_elf_special_section
4930 elf_x86_64_special_sections[]=
4931 {
4932   { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS,   SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4933   { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4934   { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
4935   { STRING_COMMA_LEN (".lbss"),            -2, SHT_NOBITS,   SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4936   { STRING_COMMA_LEN (".ldata"),           -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4937   { STRING_COMMA_LEN (".lrodata"),         -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4938   { NULL,                       0,          0, 0,            0 }
4939 };
4940
4941 #define TARGET_LITTLE_SYM                   x86_64_elf64_vec
4942 #define TARGET_LITTLE_NAME                  "elf64-x86-64"
4943 #define ELF_ARCH                            bfd_arch_i386
4944 #define ELF_TARGET_ID                       X86_64_ELF_DATA
4945 #define ELF_MACHINE_CODE                    EM_X86_64
4946 #define ELF_MAXPAGESIZE                     0x200000
4947 #define ELF_MINPAGESIZE                     0x1000
4948 #define ELF_COMMONPAGESIZE                  0x1000
4949
4950 #define elf_backend_can_gc_sections         1
4951 #define elf_backend_can_refcount            1
4952 #define elf_backend_want_got_plt            1
4953 #define elf_backend_plt_readonly            1
4954 #define elf_backend_want_plt_sym            0
4955 #define elf_backend_got_header_size         (GOT_ENTRY_SIZE*3)
4956 #define elf_backend_rela_normal             1
4957 #define elf_backend_plt_alignment           4
4958 #define elf_backend_extern_protected_data   1
4959 #define elf_backend_caches_rawsize          1
4960 #define elf_backend_dtrel_excludes_plt      1
4961 #define elf_backend_want_dynrelro           1
4962
4963 #define elf_info_to_howto                   elf_x86_64_info_to_howto
4964
4965 #define bfd_elf64_bfd_reloc_type_lookup     elf_x86_64_reloc_type_lookup
4966 #define bfd_elf64_bfd_reloc_name_lookup \
4967   elf_x86_64_reloc_name_lookup
4968
4969 #define elf_backend_relocs_compatible       elf_x86_64_relocs_compatible
4970 #define elf_backend_check_relocs            elf_x86_64_check_relocs
4971 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
4972 #define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
4973 #define elf_backend_finish_dynamic_symbol   elf_x86_64_finish_dynamic_symbol
4974 #define elf_backend_output_arch_local_syms  elf_x86_64_output_arch_local_syms
4975 #define elf_backend_grok_prstatus           elf_x86_64_grok_prstatus
4976 #define elf_backend_grok_psinfo             elf_x86_64_grok_psinfo
4977 #ifdef CORE_HEADER
4978 #define elf_backend_write_core_note         elf_x86_64_write_core_note
4979 #endif
4980 #define elf_backend_reloc_type_class        elf_x86_64_reloc_type_class
4981 #define elf_backend_relocate_section        elf_x86_64_relocate_section
4982 #define elf_backend_init_index_section      _bfd_elf_init_1_index_section
4983 #define elf_backend_object_p                elf64_x86_64_elf_object_p
4984 #define bfd_elf64_get_synthetic_symtab      elf_x86_64_get_synthetic_symtab
4985
4986 #define elf_backend_section_from_shdr \
4987         elf_x86_64_section_from_shdr
4988
4989 #define elf_backend_section_from_bfd_section \
4990   elf_x86_64_elf_section_from_bfd_section
4991 #define elf_backend_add_symbol_hook \
4992   elf_x86_64_add_symbol_hook
4993 #define elf_backend_symbol_processing \
4994   elf_x86_64_symbol_processing
4995 #define elf_backend_common_section_index \
4996   elf_x86_64_common_section_index
4997 #define elf_backend_common_section \
4998   elf_x86_64_common_section
4999 #define elf_backend_common_definition \
5000   elf_x86_64_common_definition
5001 #define elf_backend_merge_symbol \
5002   elf_x86_64_merge_symbol
5003 #define elf_backend_special_sections \
5004   elf_x86_64_special_sections
5005 #define elf_backend_additional_program_headers \
5006   elf_x86_64_additional_program_headers
5007 #define elf_backend_setup_gnu_properties \
5008   elf_x86_64_link_setup_gnu_properties
5009 #define elf_backend_hide_symbol \
5010   _bfd_x86_elf_hide_symbol
5011
5012 #include "elf64-target.h"
5013
5014 /* CloudABI support.  */
5015
5016 #undef  TARGET_LITTLE_SYM
5017 #define TARGET_LITTLE_SYM                   x86_64_elf64_cloudabi_vec
5018 #undef  TARGET_LITTLE_NAME
5019 #define TARGET_LITTLE_NAME                  "elf64-x86-64-cloudabi"
5020
5021 #undef  ELF_OSABI
5022 #define ELF_OSABI                           ELFOSABI_CLOUDABI
5023
5024 #undef  elf64_bed
5025 #define elf64_bed elf64_x86_64_cloudabi_bed
5026
5027 #include "elf64-target.h"
5028
5029 /* FreeBSD support.  */
5030
5031 #undef  TARGET_LITTLE_SYM
5032 #define TARGET_LITTLE_SYM                   x86_64_elf64_fbsd_vec
5033 #undef  TARGET_LITTLE_NAME
5034 #define TARGET_LITTLE_NAME                  "elf64-x86-64-freebsd"
5035
5036 #undef  ELF_OSABI
5037 #define ELF_OSABI                           ELFOSABI_FREEBSD
5038
5039 #undef  elf64_bed
5040 #define elf64_bed elf64_x86_64_fbsd_bed
5041
5042 #include "elf64-target.h"
5043
5044 /* Solaris 2 support.  */
5045
5046 #undef  TARGET_LITTLE_SYM
5047 #define TARGET_LITTLE_SYM                   x86_64_elf64_sol2_vec
5048 #undef  TARGET_LITTLE_NAME
5049 #define TARGET_LITTLE_NAME                  "elf64-x86-64-sol2"
5050
5051 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
5052    objects won't be recognized.  */
5053 #undef ELF_OSABI
5054
5055 #undef  elf64_bed
5056 #define elf64_bed                           elf64_x86_64_sol2_bed
5057
5058 /* The 64-bit static TLS arena size is rounded to the nearest 16-byte
5059    boundary.  */
5060 #undef  elf_backend_static_tls_alignment
5061 #define elf_backend_static_tls_alignment    16
5062
5063 /* The Solaris 2 ABI requires a plt symbol on all platforms.
5064
5065    Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
5066    File, p.63.  */
5067 #undef  elf_backend_want_plt_sym
5068 #define elf_backend_want_plt_sym            1
5069
5070 #undef  elf_backend_strtab_flags
5071 #define elf_backend_strtab_flags        SHF_STRINGS
5072
5073 static bfd_boolean
5074 elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
5075                                                   bfd *obfd ATTRIBUTE_UNUSED,
5076                                                   const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
5077                                                   Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
5078 {
5079   /* PR 19938: FIXME: Need to add code for setting the sh_info
5080      and sh_link fields of Solaris specific section types.  */
5081   return FALSE;
5082 }
5083
5084 #undef  elf_backend_copy_special_section_fields
5085 #define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
5086
5087 #include "elf64-target.h"
5088
5089 /* Native Client support.  */
5090
5091 static bfd_boolean
5092 elf64_x86_64_nacl_elf_object_p (bfd *abfd)
5093 {
5094   /* Set the right machine number for a NaCl x86-64 ELF64 file.  */
5095   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
5096   return TRUE;
5097 }
5098
5099 #undef  TARGET_LITTLE_SYM
5100 #define TARGET_LITTLE_SYM               x86_64_elf64_nacl_vec
5101 #undef  TARGET_LITTLE_NAME
5102 #define TARGET_LITTLE_NAME              "elf64-x86-64-nacl"
5103 #undef  elf64_bed
5104 #define elf64_bed                       elf64_x86_64_nacl_bed
5105
5106 #undef  ELF_MAXPAGESIZE
5107 #undef  ELF_MINPAGESIZE
5108 #undef  ELF_COMMONPAGESIZE
5109 #define ELF_MAXPAGESIZE                 0x10000
5110 #define ELF_MINPAGESIZE                 0x10000
5111 #define ELF_COMMONPAGESIZE              0x10000
5112
5113 /* Restore defaults.  */
5114 #undef  ELF_OSABI
5115 #undef  elf_backend_static_tls_alignment
5116 #undef  elf_backend_want_plt_sym
5117 #define elf_backend_want_plt_sym        0
5118 #undef  elf_backend_strtab_flags
5119 #undef  elf_backend_copy_special_section_fields
5120
5121 /* NaCl uses substantially different PLT entries for the same effects.  */
5122
5123 #undef  elf_backend_plt_alignment
5124 #define elf_backend_plt_alignment       5
5125 #define NACL_PLT_ENTRY_SIZE             64
5126 #define NACLMASK                        0xe0 /* 32-byte alignment mask.  */
5127
5128 static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
5129   {
5130     0xff, 0x35, 8, 0, 0, 0,             /* pushq GOT+8(%rip)            */
5131     0x4c, 0x8b, 0x1d, 16, 0, 0, 0,      /* mov GOT+16(%rip), %r11       */
5132     0x41, 0x83, 0xe3, NACLMASK,         /* and $-32, %r11d              */
5133     0x4d, 0x01, 0xfb,                   /* add %r15, %r11               */
5134     0x41, 0xff, 0xe3,                   /* jmpq *%r11                   */
5135
5136     /* 9-byte nop sequence to pad out to the next 32-byte boundary.  */
5137     0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1)     */
5138
5139     /* 32 bytes of nop to pad out to the standard size.  */
5140     0x66, 0x66, 0x66, 0x66, 0x66, 0x66,    /* excess data16 prefixes    */
5141     0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5142     0x66, 0x66, 0x66, 0x66, 0x66, 0x66,    /* excess data16 prefixes    */
5143     0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5144     0x66,                                  /* excess data16 prefix      */
5145     0x90                                   /* nop */
5146   };
5147
5148 static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
5149   {
5150     0x4c, 0x8b, 0x1d, 0, 0, 0, 0,       /* mov name@GOTPCREL(%rip),%r11 */
5151     0x41, 0x83, 0xe3, NACLMASK,         /* and $-32, %r11d              */
5152     0x4d, 0x01, 0xfb,                   /* add %r15, %r11               */
5153     0x41, 0xff, 0xe3,                   /* jmpq *%r11                   */
5154
5155     /* 15-byte nop sequence to pad out to the next 32-byte boundary.  */
5156     0x66, 0x66, 0x66, 0x66, 0x66, 0x66,    /* excess data16 prefixes    */
5157     0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5158
5159     /* Lazy GOT entries point here (32-byte aligned).  */
5160     0x68,                 /* pushq immediate */
5161     0, 0, 0, 0,           /* replaced with index into relocation table.  */
5162     0xe9,                 /* jmp relative */
5163     0, 0, 0, 0,           /* replaced with offset to start of .plt0.  */
5164
5165     /* 22 bytes of nop to pad out to the standard size.  */
5166     0x66, 0x66, 0x66, 0x66, 0x66, 0x66,    /* excess data16 prefixes    */
5167     0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5168     0x0f, 0x1f, 0x80, 0, 0, 0, 0,          /* nopl 0x0(%rax)            */
5169   };
5170
5171 /* .eh_frame covering the .plt section.  */
5172
5173 static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
5174   {
5175 #if (PLT_CIE_LENGTH != 20                               \
5176      || PLT_FDE_LENGTH != 36                            \
5177      || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8  \
5178      || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
5179 # error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
5180 #endif
5181     PLT_CIE_LENGTH, 0, 0, 0,    /* CIE length */
5182     0, 0, 0, 0,                 /* CIE ID */
5183     1,                          /* CIE version */
5184     'z', 'R', 0,                /* Augmentation string */
5185     1,                          /* Code alignment factor */
5186     0x78,                       /* Data alignment factor */
5187     16,                         /* Return address column */
5188     1,                          /* Augmentation size */
5189     DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
5190     DW_CFA_def_cfa, 7, 8,       /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
5191     DW_CFA_offset + 16, 1,      /* DW_CFA_offset: r16 (rip) at cfa-8 */
5192     DW_CFA_nop, DW_CFA_nop,
5193
5194     PLT_FDE_LENGTH, 0, 0, 0,    /* FDE length */
5195     PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
5196     0, 0, 0, 0,                 /* R_X86_64_PC32 .plt goes here */
5197     0, 0, 0, 0,                 /* .plt size goes here */
5198     0,                          /* Augmentation size */
5199     DW_CFA_def_cfa_offset, 16,  /* DW_CFA_def_cfa_offset: 16 */
5200     DW_CFA_advance_loc + 6,     /* DW_CFA_advance_loc: 6 to __PLT__+6 */
5201     DW_CFA_def_cfa_offset, 24,  /* DW_CFA_def_cfa_offset: 24 */
5202     DW_CFA_advance_loc + 58,    /* DW_CFA_advance_loc: 58 to __PLT__+64 */
5203     DW_CFA_def_cfa_expression,  /* DW_CFA_def_cfa_expression */
5204     13,                         /* Block length */
5205     DW_OP_breg7, 8,             /* DW_OP_breg7 (rsp): 8 */
5206     DW_OP_breg16, 0,            /* DW_OP_breg16 (rip): 0 */
5207     DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
5208     DW_OP_lit3, DW_OP_shl, DW_OP_plus,
5209     DW_CFA_nop, DW_CFA_nop
5210   };
5211
5212 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt =
5213   {
5214     elf_x86_64_nacl_plt0_entry,              /* plt0_entry */
5215     NACL_PLT_ENTRY_SIZE,                     /* plt0_entry_size */
5216     elf_x86_64_nacl_plt_entry,               /* plt_entry */
5217     NACL_PLT_ENTRY_SIZE,                     /* plt_entry_size */
5218     2,                                       /* plt0_got1_offset */
5219     9,                                       /* plt0_got2_offset */
5220     13,                                      /* plt0_got2_insn_end */
5221     3,                                       /* plt_got_offset */
5222     33,                                      /* plt_reloc_offset */
5223     38,                                      /* plt_plt_offset */
5224     7,                                       /* plt_got_insn_size */
5225     42,                                      /* plt_plt_insn_end */
5226     32,                                      /* plt_lazy_offset */
5227     elf_x86_64_nacl_plt0_entry,              /* pic_plt0_entry */
5228     elf_x86_64_nacl_plt_entry,               /* pic_plt_entry */
5229     elf_x86_64_nacl_eh_frame_plt,            /* eh_frame_plt */
5230     sizeof (elf_x86_64_nacl_eh_frame_plt)    /* eh_frame_plt_size */
5231   };
5232
5233 static const struct elf_x86_backend_data elf_x86_64_nacl_arch_bed =
5234   {
5235     is_nacl                                  /* os */
5236   };
5237
5238 #undef  elf_backend_arch_data
5239 #define elf_backend_arch_data   &elf_x86_64_nacl_arch_bed
5240
5241 #undef  elf_backend_object_p
5242 #define elf_backend_object_p                    elf64_x86_64_nacl_elf_object_p
5243 #undef  elf_backend_modify_segment_map
5244 #define elf_backend_modify_segment_map          nacl_modify_segment_map
5245 #undef  elf_backend_modify_program_headers
5246 #define elf_backend_modify_program_headers      nacl_modify_program_headers
5247 #undef  elf_backend_final_write_processing
5248 #define elf_backend_final_write_processing      nacl_final_write_processing
5249
5250 #include "elf64-target.h"
5251
5252 /* Native Client x32 support.  */
5253
5254 static bfd_boolean
5255 elf32_x86_64_nacl_elf_object_p (bfd *abfd)
5256 {
5257   /* Set the right machine number for a NaCl x86-64 ELF32 file.  */
5258   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
5259   return TRUE;
5260 }
5261
5262 #undef  TARGET_LITTLE_SYM
5263 #define TARGET_LITTLE_SYM               x86_64_elf32_nacl_vec
5264 #undef  TARGET_LITTLE_NAME
5265 #define TARGET_LITTLE_NAME              "elf32-x86-64-nacl"
5266 #undef  elf32_bed
5267 #define elf32_bed                       elf32_x86_64_nacl_bed
5268
5269 #define bfd_elf32_bfd_reloc_type_lookup \
5270   elf_x86_64_reloc_type_lookup
5271 #define bfd_elf32_bfd_reloc_name_lookup \
5272   elf_x86_64_reloc_name_lookup
5273 #define bfd_elf32_get_synthetic_symtab \
5274   elf_x86_64_get_synthetic_symtab
5275
5276 #undef elf_backend_object_p
5277 #define elf_backend_object_p \
5278   elf32_x86_64_nacl_elf_object_p
5279
5280 #undef elf_backend_bfd_from_remote_memory
5281 #define elf_backend_bfd_from_remote_memory \
5282   _bfd_elf32_bfd_from_remote_memory
5283
5284 #undef elf_backend_size_info
5285 #define elf_backend_size_info \
5286   _bfd_elf32_size_info
5287
5288 #include "elf32-target.h"
5289
5290 /* Restore defaults.  */
5291 #undef  elf_backend_object_p
5292 #define elf_backend_object_p                elf64_x86_64_elf_object_p
5293 #undef  elf_backend_bfd_from_remote_memory
5294 #undef  elf_backend_size_info
5295 #undef  elf_backend_modify_segment_map
5296 #undef  elf_backend_modify_program_headers
5297 #undef  elf_backend_final_write_processing
5298
5299 /* Intel L1OM support.  */
5300
5301 static bfd_boolean
5302 elf64_l1om_elf_object_p (bfd *abfd)
5303 {
5304   /* Set the right machine number for an L1OM elf64 file.  */
5305   bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
5306   return TRUE;
5307 }
5308
5309 #undef  TARGET_LITTLE_SYM
5310 #define TARGET_LITTLE_SYM                   l1om_elf64_vec
5311 #undef  TARGET_LITTLE_NAME
5312 #define TARGET_LITTLE_NAME                  "elf64-l1om"
5313 #undef ELF_ARCH
5314 #define ELF_ARCH                            bfd_arch_l1om
5315
5316 #undef  ELF_MACHINE_CODE
5317 #define ELF_MACHINE_CODE                    EM_L1OM
5318
5319 #undef  ELF_OSABI
5320
5321 #undef  elf64_bed
5322 #define elf64_bed elf64_l1om_bed
5323
5324 #undef elf_backend_object_p
5325 #define elf_backend_object_p                elf64_l1om_elf_object_p
5326
5327 /* Restore defaults.  */
5328 #undef  ELF_MAXPAGESIZE
5329 #undef  ELF_MINPAGESIZE
5330 #undef  ELF_COMMONPAGESIZE
5331 #define ELF_MAXPAGESIZE                 0x200000
5332 #define ELF_MINPAGESIZE                 0x1000
5333 #define ELF_COMMONPAGESIZE              0x1000
5334 #undef  elf_backend_plt_alignment
5335 #define elf_backend_plt_alignment       4
5336 #undef  elf_backend_arch_data
5337 #define elf_backend_arch_data   &elf_x86_64_arch_bed
5338
5339 #include "elf64-target.h"
5340
5341 /* FreeBSD L1OM support.  */
5342
5343 #undef  TARGET_LITTLE_SYM
5344 #define TARGET_LITTLE_SYM                   l1om_elf64_fbsd_vec
5345 #undef  TARGET_LITTLE_NAME
5346 #define TARGET_LITTLE_NAME                  "elf64-l1om-freebsd"
5347
5348 #undef  ELF_OSABI
5349 #define ELF_OSABI                           ELFOSABI_FREEBSD
5350
5351 #undef  elf64_bed
5352 #define elf64_bed elf64_l1om_fbsd_bed
5353
5354 #include "elf64-target.h"
5355
5356 /* Intel K1OM support.  */
5357
5358 static bfd_boolean
5359 elf64_k1om_elf_object_p (bfd *abfd)
5360 {
5361   /* Set the right machine number for an K1OM elf64 file.  */
5362   bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
5363   return TRUE;
5364 }
5365
5366 #undef  TARGET_LITTLE_SYM
5367 #define TARGET_LITTLE_SYM                   k1om_elf64_vec
5368 #undef  TARGET_LITTLE_NAME
5369 #define TARGET_LITTLE_NAME                  "elf64-k1om"
5370 #undef ELF_ARCH
5371 #define ELF_ARCH                            bfd_arch_k1om
5372
5373 #undef  ELF_MACHINE_CODE
5374 #define ELF_MACHINE_CODE                    EM_K1OM
5375
5376 #undef  ELF_OSABI
5377
5378 #undef  elf64_bed
5379 #define elf64_bed elf64_k1om_bed
5380
5381 #undef elf_backend_object_p
5382 #define elf_backend_object_p                elf64_k1om_elf_object_p
5383
5384 #undef  elf_backend_static_tls_alignment
5385
5386 #undef elf_backend_want_plt_sym
5387 #define elf_backend_want_plt_sym            0
5388
5389 #include "elf64-target.h"
5390
5391 /* FreeBSD K1OM support.  */
5392
5393 #undef  TARGET_LITTLE_SYM
5394 #define TARGET_LITTLE_SYM                   k1om_elf64_fbsd_vec
5395 #undef  TARGET_LITTLE_NAME
5396 #define TARGET_LITTLE_NAME                  "elf64-k1om-freebsd"
5397
5398 #undef  ELF_OSABI
5399 #define ELF_OSABI                           ELFOSABI_FREEBSD
5400
5401 #undef  elf64_bed
5402 #define elf64_bed elf64_k1om_fbsd_bed
5403
5404 #include "elf64-target.h"
5405
5406 /* 32bit x86-64 support.  */
5407
5408 #undef  TARGET_LITTLE_SYM
5409 #define TARGET_LITTLE_SYM                   x86_64_elf32_vec
5410 #undef  TARGET_LITTLE_NAME
5411 #define TARGET_LITTLE_NAME                  "elf32-x86-64"
5412 #undef  elf32_bed
5413
5414 #undef ELF_ARCH
5415 #define ELF_ARCH                            bfd_arch_i386
5416
5417 #undef  ELF_MACHINE_CODE
5418 #define ELF_MACHINE_CODE                    EM_X86_64
5419
5420 #undef  ELF_OSABI
5421
5422 #undef elf_backend_object_p
5423 #define elf_backend_object_p \
5424   elf32_x86_64_elf_object_p
5425
5426 #undef elf_backend_bfd_from_remote_memory
5427 #define elf_backend_bfd_from_remote_memory \
5428   _bfd_elf32_bfd_from_remote_memory
5429
5430 #undef elf_backend_size_info
5431 #define elf_backend_size_info \
5432   _bfd_elf32_size_info
5433
5434 #include "elf32-target.h"