bfd/elf32-i386.c

   1 /* Intel 80386/80486-specific support for 32-bit ELF
   2    Copyright (C) 1993-2016 Free Software Foundation, Inc.
   3
   4    This file is part of BFD, the Binary File Descriptor library.
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program; if not, write to the Free Software
  18    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  19    MA 02110-1301, USA.  */
  20
  21 #include "sysdep.h"
  22 #include "bfd.h"
  23 #include "bfdlink.h"
  24 #include "libbfd.h"
  25 #include "elf-bfd.h"
  26 #include "elf-nacl.h"
  27 #include "elf-vxworks.h"
  28 #include "bfd_stdint.h"
  29 #include "objalloc.h"
  30 #include "hashtab.h"
  31 #include "dwarf2.h"
  32 #include "opcode/i386.h"
  33
  34 /* 386 uses REL relocations instead of RELA.  */
  35 #define USE_REL 1
  36
  37 #include "elf/i386.h"
  38
  39 static reloc_howto_type elf_howto_table[]=
  40 {
  41   HOWTO(R_386_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
  42         bfd_elf_generic_reloc, "R_386_NONE",
  43         TRUE, 0x00000000, 0x00000000, FALSE),
  44   HOWTO(R_386_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  45         bfd_elf_generic_reloc, "R_386_32",
  46         TRUE, 0xffffffff, 0xffffffff, FALSE),
  47   HOWTO(R_386_PC32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
  48         bfd_elf_generic_reloc, "R_386_PC32",
  49         TRUE, 0xffffffff, 0xffffffff, TRUE),
  50   HOWTO(R_386_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  51         bfd_elf_generic_reloc, "R_386_GOT32",
  52         TRUE, 0xffffffff, 0xffffffff, FALSE),
  53   HOWTO(R_386_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
  54         bfd_elf_generic_reloc, "R_386_PLT32",
  55         TRUE, 0xffffffff, 0xffffffff, TRUE),
  56   HOWTO(R_386_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  57         bfd_elf_generic_reloc, "R_386_COPY",
  58         TRUE, 0xffffffff, 0xffffffff, FALSE),
  59   HOWTO(R_386_GLOB_DAT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  60         bfd_elf_generic_reloc, "R_386_GLOB_DAT",
  61         TRUE, 0xffffffff, 0xffffffff, FALSE),
  62   HOWTO(R_386_JUMP_SLOT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  63         bfd_elf_generic_reloc, "R_386_JUMP_SLOT",
  64         TRUE, 0xffffffff, 0xffffffff, FALSE),
  65   HOWTO(R_386_RELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  66         bfd_elf_generic_reloc, "R_386_RELATIVE",
  67         TRUE, 0xffffffff, 0xffffffff, FALSE),
  68   HOWTO(R_386_GOTOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  69         bfd_elf_generic_reloc, "R_386_GOTOFF",
  70         TRUE, 0xffffffff, 0xffffffff, FALSE),
  71   HOWTO(R_386_GOTPC, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
  72         bfd_elf_generic_reloc, "R_386_GOTPC",
  73         TRUE, 0xffffffff, 0xffffffff, TRUE),
  74
  75   /* We have a gap in the reloc numbers here.
  76      R_386_standard counts the number up to this point, and
  77      R_386_ext_offset is the value to subtract from a reloc type of
  78      R_386_16 thru R_386_PC8 to form an index into this table.  */
  79 #define R_386_standard (R_386_GOTPC + 1)
  80 #define R_386_ext_offset (R_386_TLS_TPOFF - R_386_standard)
  81
  82   /* These relocs are a GNU extension.  */
  83   HOWTO(R_386_TLS_TPOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  84         bfd_elf_generic_reloc, "R_386_TLS_TPOFF",
  85         TRUE, 0xffffffff, 0xffffffff, FALSE),
  86   HOWTO(R_386_TLS_IE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  87         bfd_elf_generic_reloc, "R_386_TLS_IE",
  88         TRUE, 0xffffffff, 0xffffffff, FALSE),
  89   HOWTO(R_386_TLS_GOTIE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  90         bfd_elf_generic_reloc, "R_386_TLS_GOTIE",
  91         TRUE, 0xffffffff, 0xffffffff, FALSE),
  92   HOWTO(R_386_TLS_LE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  93         bfd_elf_generic_reloc, "R_386_TLS_LE",
  94         TRUE, 0xffffffff, 0xffffffff, FALSE),
  95   HOWTO(R_386_TLS_GD, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  96         bfd_elf_generic_reloc, "R_386_TLS_GD",
  97         TRUE, 0xffffffff, 0xffffffff, FALSE),
  98   HOWTO(R_386_TLS_LDM, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
  99         bfd_elf_generic_reloc, "R_386_TLS_LDM",
 100         TRUE, 0xffffffff, 0xffffffff, FALSE),
 101   HOWTO(R_386_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
 102         bfd_elf_generic_reloc, "R_386_16",
 103         TRUE, 0xffff, 0xffff, FALSE),
 104   HOWTO(R_386_PC16, 0, 1, 16, TRUE, 0, complain_overflow_bitfield,
 105         bfd_elf_generic_reloc, "R_386_PC16",
 106         TRUE, 0xffff, 0xffff, TRUE),
 107   HOWTO(R_386_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
 108         bfd_elf_generic_reloc, "R_386_8",
 109         TRUE, 0xff, 0xff, FALSE),
 110   HOWTO(R_386_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
 111         bfd_elf_generic_reloc, "R_386_PC8",
 112         TRUE, 0xff, 0xff, TRUE),
 113
 114 #define R_386_ext (R_386_PC8 + 1 - R_386_ext_offset)
 115 #define R_386_tls_offset (R_386_TLS_LDO_32 - R_386_ext)
 116   /* These are common with Solaris TLS implementation.  */
 117   HOWTO(R_386_TLS_LDO_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 118         bfd_elf_generic_reloc, "R_386_TLS_LDO_32",
 119         TRUE, 0xffffffff, 0xffffffff, FALSE),
 120   HOWTO(R_386_TLS_IE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 121         bfd_elf_generic_reloc, "R_386_TLS_IE_32",
 122         TRUE, 0xffffffff, 0xffffffff, FALSE),
 123   HOWTO(R_386_TLS_LE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 124         bfd_elf_generic_reloc, "R_386_TLS_LE_32",
 125         TRUE, 0xffffffff, 0xffffffff, FALSE),
 126   HOWTO(R_386_TLS_DTPMOD32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 127         bfd_elf_generic_reloc, "R_386_TLS_DTPMOD32",
 128         TRUE, 0xffffffff, 0xffffffff, FALSE),
 129   HOWTO(R_386_TLS_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 130         bfd_elf_generic_reloc, "R_386_TLS_DTPOFF32",
 131         TRUE, 0xffffffff, 0xffffffff, FALSE),
 132   HOWTO(R_386_TLS_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 133         bfd_elf_generic_reloc, "R_386_TLS_TPOFF32",
 134         TRUE, 0xffffffff, 0xffffffff, FALSE),
 135   HOWTO(R_386_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
 136         bfd_elf_generic_reloc, "R_386_SIZE32",
 137         TRUE, 0xffffffff, 0xffffffff, FALSE),
 138   HOWTO(R_386_TLS_GOTDESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 139         bfd_elf_generic_reloc, "R_386_TLS_GOTDESC",
 140         TRUE, 0xffffffff, 0xffffffff, FALSE),
 141   HOWTO(R_386_TLS_DESC_CALL, 0, 0, 0, FALSE, 0, complain_overflow_dont,
 142         bfd_elf_generic_reloc, "R_386_TLS_DESC_CALL",
 143         FALSE, 0, 0, FALSE),
 144   HOWTO(R_386_TLS_DESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 145         bfd_elf_generic_reloc, "R_386_TLS_DESC",
 146         TRUE, 0xffffffff, 0xffffffff, FALSE),
 147   HOWTO(R_386_IRELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 148         bfd_elf_generic_reloc, "R_386_IRELATIVE",
 149         TRUE, 0xffffffff, 0xffffffff, FALSE),
 150   HOWTO(R_386_GOT32X, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
 151         bfd_elf_generic_reloc, "R_386_GOT32X",
 152         TRUE, 0xffffffff, 0xffffffff, FALSE),
 153
 154   /* Another gap.  */
 155 #define R_386_ext2 (R_386_GOT32X + 1 - R_386_tls_offset)
 156 #define R_386_vt_offset (R_386_GNU_VTINHERIT - R_386_ext2)
 157
 158 /* GNU extension to record C++ vtable hierarchy.  */
 159   HOWTO (R_386_GNU_VTINHERIT,   /* type */
 160          0,                     /* rightshift */
 161          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 162          0,                     /* bitsize */
 163          FALSE,                 /* pc_relative */
 164          0,                     /* bitpos */
 165          complain_overflow_dont, /* complain_on_overflow */
 166          NULL,                  /* special_function */
 167          "R_386_GNU_VTINHERIT", /* name */
 168          FALSE,                 /* partial_inplace */
 169          0,                     /* src_mask */
 170          0,                     /* dst_mask */
 171          FALSE),                /* pcrel_offset */
 172
 173 /* GNU extension to record C++ vtable member usage.  */
 174   HOWTO (R_386_GNU_VTENTRY,     /* type */
 175          0,                     /* rightshift */
 176          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 177          0,                     /* bitsize */
 178          FALSE,                 /* pc_relative */
 179          0,                     /* bitpos */
 180          complain_overflow_dont, /* complain_on_overflow */
 181          _bfd_elf_rel_vtable_reloc_fn, /* special_function */
 182          "R_386_GNU_VTENTRY",   /* name */
 183          FALSE,                 /* partial_inplace */
 184          0,                     /* src_mask */
 185          0,                     /* dst_mask */
 186          FALSE)                 /* pcrel_offset */
 187
 188 #define R_386_vt (R_386_GNU_VTENTRY + 1 - R_386_vt_offset)
 189
 190 };
 191
 192 #ifdef DEBUG_GEN_RELOC
 193 #define TRACE(str) \
 194   fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str)
 195 #else
 196 #define TRACE(str)
 197 #endif
 198
 199 static reloc_howto_type *
 200 elf_i386_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 201                             bfd_reloc_code_real_type code)
 202 {
 203   switch (code)
 204     {
 205     case BFD_RELOC_NONE:
 206       TRACE ("BFD_RELOC_NONE");
 207       return &elf_howto_table[R_386_NONE];
 208
 209     case BFD_RELOC_32:
 210       TRACE ("BFD_RELOC_32");
 211       return &elf_howto_table[R_386_32];
 212
 213     case BFD_RELOC_CTOR:
 214       TRACE ("BFD_RELOC_CTOR");
 215       return &elf_howto_table[R_386_32];
 216
 217     case BFD_RELOC_32_PCREL:
 218       TRACE ("BFD_RELOC_PC32");
 219       return &elf_howto_table[R_386_PC32];
 220
 221     case BFD_RELOC_386_GOT32:
 222       TRACE ("BFD_RELOC_386_GOT32");
 223       return &elf_howto_table[R_386_GOT32];
 224
 225     case BFD_RELOC_386_PLT32:
 226       TRACE ("BFD_RELOC_386_PLT32");
 227       return &elf_howto_table[R_386_PLT32];
 228
 229     case BFD_RELOC_386_COPY:
 230       TRACE ("BFD_RELOC_386_COPY");
 231       return &elf_howto_table[R_386_COPY];
 232
 233     case BFD_RELOC_386_GLOB_DAT:
 234       TRACE ("BFD_RELOC_386_GLOB_DAT");
 235       return &elf_howto_table[R_386_GLOB_DAT];
 236
 237     case BFD_RELOC_386_JUMP_SLOT:
 238       TRACE ("BFD_RELOC_386_JUMP_SLOT");
 239       return &elf_howto_table[R_386_JUMP_SLOT];
 240
 241     case BFD_RELOC_386_RELATIVE:
 242       TRACE ("BFD_RELOC_386_RELATIVE");
 243       return &elf_howto_table[R_386_RELATIVE];
 244
 245     case BFD_RELOC_386_GOTOFF:
 246       TRACE ("BFD_RELOC_386_GOTOFF");
 247       return &elf_howto_table[R_386_GOTOFF];
 248
 249     case BFD_RELOC_386_GOTPC:
 250       TRACE ("BFD_RELOC_386_GOTPC");
 251       return &elf_howto_table[R_386_GOTPC];
 252
 253       /* These relocs are a GNU extension.  */
 254     case BFD_RELOC_386_TLS_TPOFF:
 255       TRACE ("BFD_RELOC_386_TLS_TPOFF");
 256       return &elf_howto_table[R_386_TLS_TPOFF - R_386_ext_offset];
 257
 258     case BFD_RELOC_386_TLS_IE:
 259       TRACE ("BFD_RELOC_386_TLS_IE");
 260       return &elf_howto_table[R_386_TLS_IE - R_386_ext_offset];
 261
 262     case BFD_RELOC_386_TLS_GOTIE:
 263       TRACE ("BFD_RELOC_386_TLS_GOTIE");
 264       return &elf_howto_table[R_386_TLS_GOTIE - R_386_ext_offset];
 265
 266     case BFD_RELOC_386_TLS_LE:
 267       TRACE ("BFD_RELOC_386_TLS_LE");
 268       return &elf_howto_table[R_386_TLS_LE - R_386_ext_offset];
 269
 270     case BFD_RELOC_386_TLS_GD:
 271       TRACE ("BFD_RELOC_386_TLS_GD");
 272       return &elf_howto_table[R_386_TLS_GD - R_386_ext_offset];
 273
 274     case BFD_RELOC_386_TLS_LDM:
 275       TRACE ("BFD_RELOC_386_TLS_LDM");
 276       return &elf_howto_table[R_386_TLS_LDM - R_386_ext_offset];
 277
 278     case BFD_RELOC_16:
 279       TRACE ("BFD_RELOC_16");
 280       return &elf_howto_table[R_386_16 - R_386_ext_offset];
 281
 282     case BFD_RELOC_16_PCREL:
 283       TRACE ("BFD_RELOC_16_PCREL");
 284       return &elf_howto_table[R_386_PC16 - R_386_ext_offset];
 285
 286     case BFD_RELOC_8:
 287       TRACE ("BFD_RELOC_8");
 288       return &elf_howto_table[R_386_8 - R_386_ext_offset];
 289
 290     case BFD_RELOC_8_PCREL:
 291       TRACE ("BFD_RELOC_8_PCREL");
 292       return &elf_howto_table[R_386_PC8 - R_386_ext_offset];
 293
 294     /* Common with Sun TLS implementation.  */
 295     case BFD_RELOC_386_TLS_LDO_32:
 296       TRACE ("BFD_RELOC_386_TLS_LDO_32");
 297       return &elf_howto_table[R_386_TLS_LDO_32 - R_386_tls_offset];
 298
 299     case BFD_RELOC_386_TLS_IE_32:
 300       TRACE ("BFD_RELOC_386_TLS_IE_32");
 301       return &elf_howto_table[R_386_TLS_IE_32 - R_386_tls_offset];
 302
 303     case BFD_RELOC_386_TLS_LE_32:
 304       TRACE ("BFD_RELOC_386_TLS_LE_32");
 305       return &elf_howto_table[R_386_TLS_LE_32 - R_386_tls_offset];
 306
 307     case BFD_RELOC_386_TLS_DTPMOD32:
 308       TRACE ("BFD_RELOC_386_TLS_DTPMOD32");
 309       return &elf_howto_table[R_386_TLS_DTPMOD32 - R_386_tls_offset];
 310
 311     case BFD_RELOC_386_TLS_DTPOFF32:
 312       TRACE ("BFD_RELOC_386_TLS_DTPOFF32");
 313       return &elf_howto_table[R_386_TLS_DTPOFF32 - R_386_tls_offset];
 314
 315     case BFD_RELOC_386_TLS_TPOFF32:
 316       TRACE ("BFD_RELOC_386_TLS_TPOFF32");
 317       return &elf_howto_table[R_386_TLS_TPOFF32 - R_386_tls_offset];
 318
 319     case BFD_RELOC_SIZE32:
 320       TRACE ("BFD_RELOC_SIZE32");
 321       return &elf_howto_table[R_386_SIZE32 - R_386_tls_offset];
 322
 323     case BFD_RELOC_386_TLS_GOTDESC:
 324       TRACE ("BFD_RELOC_386_TLS_GOTDESC");
 325       return &elf_howto_table[R_386_TLS_GOTDESC - R_386_tls_offset];
 326
 327     case BFD_RELOC_386_TLS_DESC_CALL:
 328       TRACE ("BFD_RELOC_386_TLS_DESC_CALL");
 329       return &elf_howto_table[R_386_TLS_DESC_CALL - R_386_tls_offset];
 330
 331     case BFD_RELOC_386_TLS_DESC:
 332       TRACE ("BFD_RELOC_386_TLS_DESC");
 333       return &elf_howto_table[R_386_TLS_DESC - R_386_tls_offset];
 334
 335     case BFD_RELOC_386_IRELATIVE:
 336       TRACE ("BFD_RELOC_386_IRELATIVE");
 337       return &elf_howto_table[R_386_IRELATIVE - R_386_tls_offset];
 338
 339     case BFD_RELOC_386_GOT32X:
 340       TRACE ("BFD_RELOC_386_GOT32X");
 341       return &elf_howto_table[R_386_GOT32X - R_386_tls_offset];
 342
 343     case BFD_RELOC_VTABLE_INHERIT:
 344       TRACE ("BFD_RELOC_VTABLE_INHERIT");
 345       return &elf_howto_table[R_386_GNU_VTINHERIT - R_386_vt_offset];
 346
 347     case BFD_RELOC_VTABLE_ENTRY:
 348       TRACE ("BFD_RELOC_VTABLE_ENTRY");
 349       return &elf_howto_table[R_386_GNU_VTENTRY - R_386_vt_offset];
 350
 351     default:
 352       break;
 353     }
 354
 355   TRACE ("Unknown");
 356   return 0;
 357 }
 358
 359 static reloc_howto_type *
 360 elf_i386_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 361                             const char *r_name)
 362 {
 363   unsigned int i;
 364
 365   for (i = 0; i < sizeof (elf_howto_table) / sizeof (elf_howto_table[0]); i++)
 366     if (elf_howto_table[i].name != NULL
 367         && strcasecmp (elf_howto_table[i].name, r_name) == 0)
 368       return &elf_howto_table[i];
 369
 370   return NULL;
 371 }
 372
 373 static reloc_howto_type *
 374 elf_i386_rtype_to_howto (bfd *abfd, unsigned r_type)
 375 {
 376   unsigned int indx;
 377
 378   if ((indx = r_type) >= R_386_standard
 379       && ((indx = r_type - R_386_ext_offset) - R_386_standard
 380           >= R_386_ext - R_386_standard)
 381       && ((indx = r_type - R_386_tls_offset) - R_386_ext
 382           >= R_386_ext2 - R_386_ext)
 383       && ((indx = r_type - R_386_vt_offset) - R_386_ext2
 384           >= R_386_vt - R_386_ext2))
 385     {
 386       (*_bfd_error_handler) (_("%B: invalid relocation type %d"),
 387                              abfd, (int) r_type);
 388       indx = R_386_NONE;
 389     }
 390   /* PR 17512: file: 0f67f69d.  */
 391   if (elf_howto_table [indx].type != r_type)
 392     return NULL;
 393   return &elf_howto_table[indx];
 394 }
 395
 396 static void
 397 elf_i386_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
 398                             arelent *cache_ptr,
 399                             Elf_Internal_Rela *dst)
 400 {
 401   unsigned int r_type = ELF32_R_TYPE (dst->r_info);
 402   cache_ptr->howto = elf_i386_rtype_to_howto (abfd, r_type);
 403 }
 404
 405 /* Return whether a symbol name implies a local label.  The UnixWare
 406    2.1 cc generates temporary symbols that start with .X, so we
 407    recognize them here.  FIXME: do other SVR4 compilers also use .X?.
 408    If so, we should move the .X recognition into
 409    _bfd_elf_is_local_label_name.  */
 410
 411 static bfd_boolean
 412 elf_i386_is_local_label_name (bfd *abfd, const char *name)
 413 {
 414   if (name[0] == '.' && name[1] == 'X')
 415     return TRUE;
 416
 417   return _bfd_elf_is_local_label_name (abfd, name);
 418 }
 419 \f
 420 /* Support for core dump NOTE sections.  */
 421
 422 static bfd_boolean
 423 elf_i386_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
 424 {
 425   int offset;
 426   size_t size;
 427
 428   if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
 429     {
 430       int pr_version = bfd_get_32 (abfd, note->descdata);
 431
 432       if (pr_version != 1)
 433         return FALSE;
 434
 435       /* pr_cursig */
 436       elf_tdata (abfd)->core->signal = bfd_get_32 (abfd, note->descdata + 20);
 437
 438       /* pr_pid */
 439       elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
 440
 441       /* pr_reg */
 442       offset = 28;
 443       size = bfd_get_32 (abfd, note->descdata + 8);
 444     }
 445   else
 446     {
 447       switch (note->descsz)
 448         {
 449         default:
 450           return FALSE;
 451
 452         case 144:               /* Linux/i386 */
 453           /* pr_cursig */
 454           elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
 455
 456           /* pr_pid */
 457           elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
 458
 459           /* pr_reg */
 460           offset = 72;
 461           size = 68;
 462
 463           break;
 464         }
 465     }
 466
 467   /* Make a ".reg/999" section.  */
 468   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
 469                                           size, note->descpos + offset);
 470 }
 471
 472 static bfd_boolean
 473 elf_i386_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
 474 {
 475   if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
 476     {
 477       int pr_version = bfd_get_32 (abfd, note->descdata);
 478
 479       if (pr_version != 1)
 480         return FALSE;
 481
 482       elf_tdata (abfd)->core->program
 483         = _bfd_elfcore_strndup (abfd, note->descdata + 8, 17);
 484       elf_tdata (abfd)->core->command
 485         = _bfd_elfcore_strndup (abfd, note->descdata + 25, 81);
 486     }
 487   else
 488     {
 489       switch (note->descsz)
 490         {
 491         default:
 492           return FALSE;
 493
 494         case 124:               /* Linux/i386 elf_prpsinfo.  */
 495           elf_tdata (abfd)->core->pid
 496             = bfd_get_32 (abfd, note->descdata + 12);
 497           elf_tdata (abfd)->core->program
 498             = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
 499           elf_tdata (abfd)->core->command
 500             = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
 501         }
 502     }
 503
 504   /* Note that for some reason, a spurious space is tacked
 505      onto the end of the args in some (at least one anyway)
 506      implementations, so strip it off if it exists.  */
 507   {
 508     char *command = elf_tdata (abfd)->core->command;
 509     int n = strlen (command);
 510
 511     if (0 < n && command[n - 1] == ' ')
 512       command[n - 1] = '\0';
 513   }
 514
 515   return TRUE;
 516 }
 517 \f
 518 /* Functions for the i386 ELF linker.
 519
 520    In order to gain some understanding of code in this file without
 521    knowing all the intricate details of the linker, note the
 522    following:
 523
 524    Functions named elf_i386_* are called by external routines, other
 525    functions are only called locally.  elf_i386_* functions appear
 526    in this file more or less in the order in which they are called
 527    from external routines.  eg. elf_i386_check_relocs is called
 528    early in the link process, elf_i386_finish_dynamic_sections is
 529    one of the last functions.  */
 530
 531
 532 /* The name of the dynamic interpreter.  This is put in the .interp
 533    section.  */
 534
 535 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
 536
 537 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
 538    copying dynamic variables from a shared lib into an app's dynbss
 539    section, and instead use a dynamic relocation to point into the
 540    shared lib.  */
 541 #define ELIMINATE_COPY_RELOCS 1
 542
 543 /* The size in bytes of an entry in the procedure linkage table.  */
 544
 545 #define PLT_ENTRY_SIZE 16
 546
 547 /* The first entry in an absolute procedure linkage table looks like
 548    this.  See the SVR4 ABI i386 supplement to see how this works.
 549    Will be padded to PLT_ENTRY_SIZE with htab->plt0_pad_byte.  */
 550
 551 static const bfd_byte elf_i386_plt0_entry[12] =
 552 {
 553   0xff, 0x35,   /* pushl contents of address */
 554   0, 0, 0, 0,   /* replaced with address of .got + 4.  */
 555   0xff, 0x25,   /* jmp indirect */
 556   0, 0, 0, 0    /* replaced with address of .got + 8.  */
 557 };
 558
 559 /* Subsequent entries in an absolute procedure linkage table look like
 560    this.  */
 561
 562 static const bfd_byte elf_i386_plt_entry[PLT_ENTRY_SIZE] =
 563 {
 564   0xff, 0x25,   /* jmp indirect */
 565   0, 0, 0, 0,   /* replaced with address of this symbol in .got.  */
 566   0x68,         /* pushl immediate */
 567   0, 0, 0, 0,   /* replaced with offset into relocation table.  */
 568   0xe9,         /* jmp relative */
 569   0, 0, 0, 0    /* replaced with offset to start of .plt.  */
 570 };
 571
 572 /* The first entry in a PIC procedure linkage table look like this.
 573    Will be padded to PLT_ENTRY_SIZE with htab->plt0_pad_byte.  */
 574
 575 static const bfd_byte elf_i386_pic_plt0_entry[12] =
 576 {
 577   0xff, 0xb3, 4, 0, 0, 0,       /* pushl 4(%ebx) */
 578   0xff, 0xa3, 8, 0, 0, 0        /* jmp *8(%ebx) */
 579 };
 580
 581 /* Subsequent entries in a PIC procedure linkage table look like this.  */
 582
 583 static const bfd_byte elf_i386_pic_plt_entry[PLT_ENTRY_SIZE] =
 584 {
 585   0xff, 0xa3,   /* jmp *offset(%ebx) */
 586   0, 0, 0, 0,   /* replaced with offset of this symbol in .got.  */
 587   0x68,         /* pushl immediate */
 588   0, 0, 0, 0,   /* replaced with offset into relocation table.  */
 589   0xe9,         /* jmp relative */
 590   0, 0, 0, 0    /* replaced with offset to start of .plt.  */
 591 };
 592
 593 /* Entries in the GOT procedure linkage table look like this.  */
 594
 595 static const bfd_byte elf_i386_got_plt_entry[8] =
 596 {
 597   0xff, 0x25,   /* jmp indirect */
 598   0, 0, 0, 0,   /* replaced with offset of this symbol in .got.  */
 599   0x66, 0x90    /* xchg %ax,%ax  */
 600 };
 601
 602 /* Entries in the PIC GOT procedure linkage table look like this.  */
 603
 604 static const bfd_byte elf_i386_pic_got_plt_entry[8] =
 605 {
 606   0xff, 0xa3,   /* jmp *offset(%ebx)  */
 607   0, 0, 0, 0,   /* replaced with offset of this symbol in .got.  */
 608   0x66, 0x90    /* xchg %ax,%ax  */
 609 };
 610
 611 /* .eh_frame covering the .plt section.  */
 612
 613 static const bfd_byte elf_i386_eh_frame_plt[] =
 614 {
 615 #define PLT_CIE_LENGTH          20
 616 #define PLT_FDE_LENGTH          36
 617 #define PLT_FDE_START_OFFSET    4 + PLT_CIE_LENGTH + 8
 618 #define PLT_FDE_LEN_OFFSET      4 + PLT_CIE_LENGTH + 12
 619   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
 620   0, 0, 0, 0,                   /* CIE ID */
 621   1,                            /* CIE version */
 622   'z', 'R', 0,                  /* Augmentation string */
 623   1,                            /* Code alignment factor */
 624   0x7c,                         /* Data alignment factor */
 625   8,                            /* Return address column */
 626   1,                            /* Augmentation size */
 627   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
 628   DW_CFA_def_cfa, 4, 4,         /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
 629   DW_CFA_offset + 8, 1,         /* DW_CFA_offset: r8 (eip) at cfa-4 */
 630   DW_CFA_nop, DW_CFA_nop,
 631
 632   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
 633   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
 634   0, 0, 0, 0,                   /* R_386_PC32 .plt goes here */
 635   0, 0, 0, 0,                   /* .plt size goes here */
 636   0,                            /* Augmentation size */
 637   DW_CFA_def_cfa_offset, 8,     /* DW_CFA_def_cfa_offset: 8 */
 638   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
 639   DW_CFA_def_cfa_offset, 12,    /* DW_CFA_def_cfa_offset: 12 */
 640   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
 641   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
 642   11,                           /* Block length */
 643   DW_OP_breg4, 4,               /* DW_OP_breg4 (esp): 4 */
 644   DW_OP_breg8, 0,               /* DW_OP_breg8 (eip): 0 */
 645   DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
 646   DW_OP_lit2, DW_OP_shl, DW_OP_plus,
 647   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
 648 };
 649
 650 struct elf_i386_plt_layout
 651 {
 652   /* The first entry in an absolute procedure linkage table looks like this.  */
 653   const bfd_byte *plt0_entry;
 654   unsigned int plt0_entry_size;
 655
 656   /* Offsets into plt0_entry that are to be replaced with GOT[1] and GOT[2].  */
 657   unsigned int plt0_got1_offset;
 658   unsigned int plt0_got2_offset;
 659
 660   /* Later entries in an absolute procedure linkage table look like this.  */
 661   const bfd_byte *plt_entry;
 662   unsigned int plt_entry_size;
 663
 664   /* Offsets into plt_entry that are to be replaced with...  */
 665   unsigned int plt_got_offset;    /* ... address of this symbol in .got. */
 666   unsigned int plt_reloc_offset;  /* ... offset into relocation table. */
 667   unsigned int plt_plt_offset;    /* ... offset to start of .plt. */
 668
 669   /* Offset into plt_entry where the initial value of the GOT entry points.  */
 670   unsigned int plt_lazy_offset;
 671
 672   /* The first entry in a PIC procedure linkage table looks like this.  */
 673   const bfd_byte *pic_plt0_entry;
 674
 675   /* Subsequent entries in a PIC procedure linkage table look like this.  */
 676   const bfd_byte *pic_plt_entry;
 677
 678   /* .eh_frame covering the .plt section.  */
 679   const bfd_byte *eh_frame_plt;
 680   unsigned int eh_frame_plt_size;
 681 };
 682
 683 #define GET_PLT_ENTRY_SIZE(abfd) \
 684   get_elf_i386_backend_data (abfd)->plt->plt_entry_size
 685
 686 /* These are the standard parameters.  */
 687 static const struct elf_i386_plt_layout elf_i386_plt =
 688   {
 689     elf_i386_plt0_entry,                /* plt0_entry */
 690     sizeof (elf_i386_plt0_entry),       /* plt0_entry_size */
 691     2,                                  /* plt0_got1_offset */
 692     8,                                  /* plt0_got2_offset */
 693     elf_i386_plt_entry,                 /* plt_entry */
 694     PLT_ENTRY_SIZE,                     /* plt_entry_size */
 695     2,                                  /* plt_got_offset */
 696     7,                                  /* plt_reloc_offset */
 697     12,                                 /* plt_plt_offset */
 698     6,                                  /* plt_lazy_offset */
 699     elf_i386_pic_plt0_entry,            /* pic_plt0_entry */
 700     elf_i386_pic_plt_entry,             /* pic_plt_entry */
 701     elf_i386_eh_frame_plt,              /* eh_frame_plt */
 702     sizeof (elf_i386_eh_frame_plt),     /* eh_frame_plt_size */
 703   };
 704 \f
 705
 706 /* On VxWorks, the .rel.plt.unloaded section has absolute relocations
 707    for the PLTResolve stub and then for each PLT entry.  */
 708 #define PLTRESOLVE_RELOCS_SHLIB 0
 709 #define PLTRESOLVE_RELOCS 2
 710 #define PLT_NON_JUMP_SLOT_RELOCS 2
 711
 712 /* Architecture-specific backend data for i386.  */
 713
 714 struct elf_i386_backend_data
 715 {
 716   /* Parameters describing PLT generation.  */
 717   const struct elf_i386_plt_layout *plt;
 718
 719   /* Value used to fill the unused bytes of the first PLT entry.  */
 720   bfd_byte plt0_pad_byte;
 721
 722   /* True if the target system is VxWorks.  */
 723   int is_vxworks;
 724 };
 725
 726 #define get_elf_i386_backend_data(abfd) \
 727   ((const struct elf_i386_backend_data *) \
 728    get_elf_backend_data (abfd)->arch_data)
 729
 730 /* These are the standard parameters.  */
 731 static const struct elf_i386_backend_data elf_i386_arch_bed =
 732   {
 733     &elf_i386_plt,                      /* plt */
 734     0,                                  /* plt0_pad_byte */
 735     0,                                  /* is_vxworks */
 736   };
 737
 738 #define elf_backend_arch_data   &elf_i386_arch_bed
 739
 740 /* Is a undefined weak symbol which is resolved to 0.  Reference to an
 741    undefined weak symbol is resolved to 0 when building executable if
 742    it isn't dynamic and
 743    1. Has non-GOT/non-PLT relocations in text section.  Or
 744    2. Has no GOT/PLT relocation.
 745  */
 746 #define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, EH) \
 747   ((EH)->elf.root.type == bfd_link_hash_undefweak               \
 748    && bfd_link_executable (INFO)                                \
 749    && (elf_i386_hash_table (INFO)->interp == NULL               \
 750        || !(EH)->has_got_reloc                                  \
 751        || (EH)->has_non_got_reloc                               \
 752        || !(INFO)->dynamic_undefined_weak))
 753
 754 /* i386 ELF linker hash entry.  */
 755
 756 struct elf_i386_link_hash_entry
 757 {
 758   struct elf_link_hash_entry elf;
 759
 760   /* Track dynamic relocs copied for this symbol.  */
 761   struct elf_dyn_relocs *dyn_relocs;
 762
 763 #define GOT_UNKNOWN     0
 764 #define GOT_NORMAL      1
 765 #define GOT_TLS_GD      2
 766 #define GOT_TLS_IE      4
 767 #define GOT_TLS_IE_POS  5
 768 #define GOT_TLS_IE_NEG  6
 769 #define GOT_TLS_IE_BOTH 7
 770 #define GOT_TLS_GDESC   8
 771 #define GOT_TLS_GD_BOTH_P(type)                                         \
 772   ((type) == (GOT_TLS_GD | GOT_TLS_GDESC))
 773 #define GOT_TLS_GD_P(type)                                              \
 774   ((type) == GOT_TLS_GD || GOT_TLS_GD_BOTH_P (type))
 775 #define GOT_TLS_GDESC_P(type)                                           \
 776   ((type) == GOT_TLS_GDESC || GOT_TLS_GD_BOTH_P (type))
 777 #define GOT_TLS_GD_ANY_P(type)                                          \
 778   (GOT_TLS_GD_P (type) || GOT_TLS_GDESC_P (type))
 779   unsigned char tls_type;
 780
 781   /* Symbol is referenced by R_386_GOTOFF relocation.  */
 782   unsigned int gotoff_ref : 1;
 783
 784   /* Symbol has GOT or PLT relocations.  */
 785   unsigned int has_got_reloc : 1;
 786
 787   /* Symbol has non-GOT/non-PLT relocations in text sections.  */
 788   unsigned int has_non_got_reloc : 1;
 789
 790   /* Reference count of C/C++ function pointer relocations in read-write
 791      section which can be resolved at run-time.  */
 792   bfd_signed_vma func_pointer_refcount;
 793
 794   /* Information about the GOT PLT entry. Filled when there are both
 795      GOT and PLT relocations against the same function.  */
 796   union gotplt_union plt_got;
 797
 798   /* Offset of the GOTPLT entry reserved for the TLS descriptor,
 799      starting at the end of the jump table.  */
 800   bfd_vma tlsdesc_got;
 801 };
 802
 803 #define elf_i386_hash_entry(ent) ((struct elf_i386_link_hash_entry *)(ent))
 804
 805 struct elf_i386_obj_tdata
 806 {
 807   struct elf_obj_tdata root;
 808
 809   /* tls_type for each local got entry.  */
 810   char *local_got_tls_type;
 811
 812   /* GOTPLT entries for TLS descriptors.  */
 813   bfd_vma *local_tlsdesc_gotent;
 814 };
 815
 816 #define elf_i386_tdata(abfd) \
 817   ((struct elf_i386_obj_tdata *) (abfd)->tdata.any)
 818
 819 #define elf_i386_local_got_tls_type(abfd) \
 820   (elf_i386_tdata (abfd)->local_got_tls_type)
 821
 822 #define elf_i386_local_tlsdesc_gotent(abfd) \
 823   (elf_i386_tdata (abfd)->local_tlsdesc_gotent)
 824
 825 #define is_i386_elf(bfd)                                \
 826   (bfd_get_flavour (bfd) == bfd_target_elf_flavour      \
 827    && elf_tdata (bfd) != NULL                           \
 828    && elf_object_id (bfd) == I386_ELF_DATA)
 829
 830 static bfd_boolean
 831 elf_i386_mkobject (bfd *abfd)
 832 {
 833   return bfd_elf_allocate_object (abfd, sizeof (struct elf_i386_obj_tdata),
 834                                   I386_ELF_DATA);
 835 }
 836
 837 /* i386 ELF linker hash table.  */
 838
 839 struct elf_i386_link_hash_table
 840 {
 841   struct elf_link_hash_table elf;
 842
 843   /* Short-cuts to get to dynamic linker sections.  */
 844   asection *interp;
 845   asection *sdynbss;
 846   asection *srelbss;
 847   asection *plt_eh_frame;
 848   asection *plt_got;
 849
 850   union
 851   {
 852     bfd_signed_vma refcount;
 853     bfd_vma offset;
 854   } tls_ldm_got;
 855
 856   /* The amount of space used by the reserved portion of the sgotplt
 857      section, plus whatever space is used by the jump slots.  */
 858   bfd_vma sgotplt_jump_table_size;
 859
 860   /* Small local sym cache.  */
 861   struct sym_cache sym_cache;
 862
 863   /* _TLS_MODULE_BASE_ symbol.  */
 864   struct bfd_link_hash_entry *tls_module_base;
 865
 866   /* Used by local STT_GNU_IFUNC symbols.  */
 867   htab_t loc_hash_table;
 868   void * loc_hash_memory;
 869
 870   /* The (unloaded but important) .rel.plt.unloaded section on VxWorks.  */
 871   asection *srelplt2;
 872
 873   /* The index of the next unused R_386_TLS_DESC slot in .rel.plt.  */
 874   bfd_vma next_tls_desc_index;
 875
 876   /* The index of the next unused R_386_JUMP_SLOT slot in .rel.plt.  */
 877   bfd_vma next_jump_slot_index;
 878
 879   /* The index of the next unused R_386_IRELATIVE slot in .rel.plt.  */
 880   bfd_vma next_irelative_index;
 881
 882   /* TRUE if there are dynamic relocs against IFUNC symbols that apply
 883      to read-only sections.  */
 884   bfd_boolean readonly_dynrelocs_against_ifunc;
 885 };
 886
 887 /* Get the i386 ELF linker hash table from a link_info structure.  */
 888
 889 #define elf_i386_hash_table(p) \
 890   (elf_hash_table_id  ((struct elf_link_hash_table *) ((p)->hash)) \
 891   == I386_ELF_DATA ? ((struct elf_i386_link_hash_table *) ((p)->hash)) : NULL)
 892
 893 #define elf_i386_compute_jump_table_size(htab) \
 894   ((htab)->elf.srelplt->reloc_count * 4)
 895
 896 /* Create an entry in an i386 ELF linker hash table.  */
 897
 898 static struct bfd_hash_entry *
 899 elf_i386_link_hash_newfunc (struct bfd_hash_entry *entry,
 900                             struct bfd_hash_table *table,
 901                             const char *string)
 902 {
 903   /* Allocate the structure if it has not already been allocated by a
 904      subclass.  */
 905   if (entry == NULL)
 906     {
 907       entry = (struct bfd_hash_entry *)
 908           bfd_hash_allocate (table, sizeof (struct elf_i386_link_hash_entry));
 909       if (entry == NULL)
 910         return entry;
 911     }
 912
 913   /* Call the allocation method of the superclass.  */
 914   entry = _bfd_elf_link_hash_newfunc (entry, table, string);
 915   if (entry != NULL)
 916     {
 917       struct elf_i386_link_hash_entry *eh;
 918
 919       eh = (struct elf_i386_link_hash_entry *) entry;
 920       eh->dyn_relocs = NULL;
 921       eh->tls_type = GOT_UNKNOWN;
 922       eh->gotoff_ref = 0;
 923       eh->has_got_reloc = 0;
 924       eh->has_non_got_reloc = 0;
 925       eh->func_pointer_refcount = 0;
 926       eh->plt_got.offset = (bfd_vma) -1;
 927       eh->tlsdesc_got = (bfd_vma) -1;
 928     }
 929
 930   return entry;
 931 }
 932
 933 /* Compute a hash of a local hash entry.  We use elf_link_hash_entry
 934   for local symbol so that we can handle local STT_GNU_IFUNC symbols
 935   as global symbol.  We reuse indx and dynstr_index for local symbol
 936   hash since they aren't used by global symbols in this backend.  */
 937
 938 static hashval_t
 939 elf_i386_local_htab_hash (const void *ptr)
 940 {
 941   struct elf_link_hash_entry *h
 942     = (struct elf_link_hash_entry *) ptr;
 943   return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
 944 }
 945
 946 /* Compare local hash entries.  */
 947
 948 static int
 949 elf_i386_local_htab_eq (const void *ptr1, const void *ptr2)
 950 {
 951   struct elf_link_hash_entry *h1
 952      = (struct elf_link_hash_entry *) ptr1;
 953   struct elf_link_hash_entry *h2
 954     = (struct elf_link_hash_entry *) ptr2;
 955
 956   return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
 957 }
 958
 959 /* Find and/or create a hash entry for local symbol.  */
 960
 961 static struct elf_link_hash_entry *
 962 elf_i386_get_local_sym_hash (struct elf_i386_link_hash_table *htab,
 963                              bfd *abfd, const Elf_Internal_Rela *rel,
 964                              bfd_boolean create)
 965 {
 966   struct elf_i386_link_hash_entry e, *ret;
 967   asection *sec = abfd->sections;
 968   hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
 969                                        ELF32_R_SYM (rel->r_info));
 970   void **slot;
 971
 972   e.elf.indx = sec->id;
 973   e.elf.dynstr_index = ELF32_R_SYM (rel->r_info);
 974   slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
 975                                    create ? INSERT : NO_INSERT);
 976
 977   if (!slot)
 978     return NULL;
 979
 980   if (*slot)
 981     {
 982       ret = (struct elf_i386_link_hash_entry *) *slot;
 983       return &ret->elf;
 984     }
 985
 986   ret = (struct elf_i386_link_hash_entry *)
 987         objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
 988                         sizeof (struct elf_i386_link_hash_entry));
 989   if (ret)
 990     {
 991       memset (ret, 0, sizeof (*ret));
 992       ret->elf.indx = sec->id;
 993       ret->elf.dynstr_index = ELF32_R_SYM (rel->r_info);
 994       ret->elf.dynindx = -1;
 995       ret->func_pointer_refcount = 0;
 996       ret->plt_got.offset = (bfd_vma) -1;
 997       *slot = ret;
 998     }
 999   return &ret->elf;
1000 }
1001
1002 /* Destroy an i386 ELF linker hash table.  */
1003
1004 static void
1005 elf_i386_link_hash_table_free (bfd *obfd)
1006 {
1007   struct elf_i386_link_hash_table *htab
1008     = (struct elf_i386_link_hash_table *) obfd->link.hash;
1009
1010   if (htab->loc_hash_table)
1011     htab_delete (htab->loc_hash_table);
1012   if (htab->loc_hash_memory)
1013     objalloc_free ((struct objalloc *) htab->loc_hash_memory);
1014   _bfd_elf_link_hash_table_free (obfd);
1015 }
1016
1017 /* Create an i386 ELF linker hash table.  */
1018
1019 static struct bfd_link_hash_table *
1020 elf_i386_link_hash_table_create (bfd *abfd)
1021 {
1022   struct elf_i386_link_hash_table *ret;
1023   bfd_size_type amt = sizeof (struct elf_i386_link_hash_table);
1024
1025   ret = (struct elf_i386_link_hash_table *) bfd_zmalloc (amt);
1026   if (ret == NULL)
1027     return NULL;
1028
1029   if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
1030                                       elf_i386_link_hash_newfunc,
1031                                       sizeof (struct elf_i386_link_hash_entry),
1032                                       I386_ELF_DATA))
1033     {
1034       free (ret);
1035       return NULL;
1036     }
1037
1038   ret->loc_hash_table = htab_try_create (1024,
1039                                          elf_i386_local_htab_hash,
1040                                          elf_i386_local_htab_eq,
1041                                          NULL);
1042   ret->loc_hash_memory = objalloc_create ();
1043   if (!ret->loc_hash_table || !ret->loc_hash_memory)
1044     {
1045       elf_i386_link_hash_table_free (abfd);
1046       return NULL;
1047     }
1048   ret->elf.root.hash_table_free = elf_i386_link_hash_table_free;
1049
1050   return &ret->elf.root;
1051 }
1052
1053 /* Create .plt, .rel.plt, .got, .got.plt, .rel.got, .dynbss, and
1054    .rel.bss sections in DYNOBJ, and set up shortcuts to them in our
1055    hash table.  */
1056
1057 static bfd_boolean
1058 elf_i386_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info)
1059 {
1060   struct elf_i386_link_hash_table *htab;
1061
1062   if (!_bfd_elf_create_dynamic_sections (dynobj, info))
1063     return FALSE;
1064
1065   htab = elf_i386_hash_table (info);
1066   if (htab == NULL)
1067     return FALSE;
1068
1069   htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss");
1070   if (!htab->sdynbss)
1071     abort ();
1072
1073   if (bfd_link_executable (info))
1074     {
1075       /* Always allow copy relocs for building executables.  */
1076       asection *s = bfd_get_linker_section (dynobj, ".rel.bss");
1077       if (s == NULL)
1078         {
1079           const struct elf_backend_data *bed = get_elf_backend_data (dynobj);
1080           s = bfd_make_section_anyway_with_flags (dynobj,
1081                                                   ".rel.bss",
1082                                                   (bed->dynamic_sec_flags
1083                                                    | SEC_READONLY));
1084           if (s == NULL
1085               || ! bfd_set_section_alignment (dynobj, s,
1086                                               bed->s->log_file_align))
1087             return FALSE;
1088         }
1089       htab->srelbss = s;
1090     }
1091
1092   if (get_elf_i386_backend_data (dynobj)->is_vxworks
1093       && !elf_vxworks_create_dynamic_sections (dynobj, info,
1094                                                &htab->srelplt2))
1095     return FALSE;
1096
1097   if (!info->no_ld_generated_unwind_info
1098       && htab->plt_eh_frame == NULL
1099       && htab->elf.splt != NULL)
1100     {
1101       flagword flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY
1102                         | SEC_HAS_CONTENTS | SEC_IN_MEMORY
1103                         | SEC_LINKER_CREATED);
1104       htab->plt_eh_frame
1105         = bfd_make_section_anyway_with_flags (dynobj, ".eh_frame", flags);
1106       if (htab->plt_eh_frame == NULL
1107           || !bfd_set_section_alignment (dynobj, htab->plt_eh_frame, 2))
1108         return FALSE;
1109     }
1110
1111   return TRUE;
1112 }
1113
1114 /* Copy the extra info we tack onto an elf_link_hash_entry.  */
1115
1116 static void
1117 elf_i386_copy_indirect_symbol (struct bfd_link_info *info,
1118                                struct elf_link_hash_entry *dir,
1119                                struct elf_link_hash_entry *ind)
1120 {
1121   struct elf_i386_link_hash_entry *edir, *eind;
1122
1123   edir = (struct elf_i386_link_hash_entry *) dir;
1124   eind = (struct elf_i386_link_hash_entry *) ind;
1125
1126   if (eind->dyn_relocs != NULL)
1127     {
1128       if (edir->dyn_relocs != NULL)
1129         {
1130           struct elf_dyn_relocs **pp;
1131           struct elf_dyn_relocs *p;
1132
1133           /* Add reloc counts against the indirect sym to the direct sym
1134              list.  Merge any entries against the same section.  */
1135           for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
1136             {
1137               struct elf_dyn_relocs *q;
1138
1139               for (q = edir->dyn_relocs; q != NULL; q = q->next)
1140                 if (q->sec == p->sec)
1141                   {
1142                     q->pc_count += p->pc_count;
1143                     q->count += p->count;
1144                     *pp = p->next;
1145                     break;
1146                   }
1147               if (q == NULL)
1148                 pp = &p->next;
1149             }
1150           *pp = edir->dyn_relocs;
1151         }
1152
1153       edir->dyn_relocs = eind->dyn_relocs;
1154       eind->dyn_relocs = NULL;
1155     }
1156
1157   if (ind->root.type == bfd_link_hash_indirect
1158       && dir->got.refcount <= 0)
1159     {
1160       edir->tls_type = eind->tls_type;
1161       eind->tls_type = GOT_UNKNOWN;
1162     }
1163
1164   /* Copy gotoff_ref so that elf_i386_adjust_dynamic_symbol will
1165      generate a R_386_COPY reloc.  */
1166   edir->gotoff_ref |= eind->gotoff_ref;
1167
1168   edir->has_got_reloc |= eind->has_got_reloc;
1169   edir->has_non_got_reloc |= eind->has_non_got_reloc;
1170
1171   if (ELIMINATE_COPY_RELOCS
1172       && ind->root.type != bfd_link_hash_indirect
1173       && dir->dynamic_adjusted)
1174     {
1175       /* If called to transfer flags for a weakdef during processing
1176          of elf_adjust_dynamic_symbol, don't copy non_got_ref.
1177          We clear it ourselves for ELIMINATE_COPY_RELOCS.  */
1178       dir->ref_dynamic |= ind->ref_dynamic;
1179       dir->ref_regular |= ind->ref_regular;
1180       dir->ref_regular_nonweak |= ind->ref_regular_nonweak;
1181       dir->needs_plt |= ind->needs_plt;
1182       dir->pointer_equality_needed |= ind->pointer_equality_needed;
1183     }
1184   else
1185     {
1186       if (eind->func_pointer_refcount > 0)
1187         {
1188           edir->func_pointer_refcount += eind->func_pointer_refcount;
1189           eind->func_pointer_refcount = 0;
1190         }
1191
1192       _bfd_elf_link_hash_copy_indirect (info, dir, ind);
1193     }
1194 }
1195
1196 /* Return TRUE if the TLS access code sequence support transition
1197    from R_TYPE.  */
1198
1199 static bfd_boolean
1200 elf_i386_check_tls_transition (bfd *abfd, asection *sec,
1201                                bfd_byte *contents,
1202                                Elf_Internal_Shdr *symtab_hdr,
1203                                struct elf_link_hash_entry **sym_hashes,
1204                                unsigned int r_type,
1205                                const Elf_Internal_Rela *rel,
1206                                const Elf_Internal_Rela *relend)
1207 {
1208   unsigned int val, type;
1209   unsigned long r_symndx;
1210   struct elf_link_hash_entry *h;
1211   bfd_vma offset;
1212
1213   /* Get the section contents.  */
1214   if (contents == NULL)
1215     {
1216       if (elf_section_data (sec)->this_hdr.contents != NULL)
1217         contents = elf_section_data (sec)->this_hdr.contents;
1218       else
1219         {
1220           /* FIXME: How to better handle error condition?  */
1221           if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1222             return FALSE;
1223
1224           /* Cache the section contents for elf_link_input_bfd.  */
1225           elf_section_data (sec)->this_hdr.contents = contents;
1226         }
1227     }
1228
1229   offset = rel->r_offset;
1230   switch (r_type)
1231     {
1232     case R_386_TLS_GD:
1233     case R_386_TLS_LDM:
1234       if (offset < 2 || (rel + 1) >= relend)
1235         return FALSE;
1236
1237       type = bfd_get_8 (abfd, contents + offset - 2);
1238       if (r_type == R_386_TLS_GD)
1239         {
1240           /* Check transition from GD access model.  Only
1241                 leal foo@tlsgd(,%reg,1), %eax; call ___tls_get_addr
1242                 leal foo@tlsgd(%reg), %eax; call ___tls_get_addr; nop
1243              can transit to different access model.  */
1244           if ((offset + 10) > sec->size ||
1245               (type != 0x8d && type != 0x04))
1246             return FALSE;
1247
1248           val = bfd_get_8 (abfd, contents + offset - 1);
1249           if (type == 0x04)
1250             {
1251               /* leal foo@tlsgd(,%reg,1), %eax; call ___tls_get_addr */
1252               if (offset < 3)
1253                 return FALSE;
1254
1255               if (bfd_get_8 (abfd, contents + offset - 3) != 0x8d)
1256                 return FALSE;
1257
1258               if ((val & 0xc7) != 0x05 || val == (4 << 3))
1259                 return FALSE;
1260             }
1261           else
1262             {
1263               /* leal foo@tlsgd(%reg), %eax; call ___tls_get_addr; nop  */
1264               if ((val & 0xf8) != 0x80 || (val & 7) == 4)
1265                 return FALSE;
1266
1267               if (bfd_get_8 (abfd, contents + offset + 9) != 0x90)
1268                 return FALSE;
1269             }
1270         }
1271       else
1272         {
1273           /* Check transition from LD access model.  Only
1274                 leal foo@tlsgd(%reg), %eax; call ___tls_get_addr
1275              can transit to different access model.  */
1276           if (type != 0x8d || (offset + 9) > sec->size)
1277             return FALSE;
1278
1279           val = bfd_get_8 (abfd, contents + offset - 1);
1280           if ((val & 0xf8) != 0x80 || (val & 7) == 4)
1281             return FALSE;
1282         }
1283
1284       if (bfd_get_8 (abfd, contents + offset + 4) != 0xe8)
1285         return FALSE;
1286
1287       r_symndx = ELF32_R_SYM (rel[1].r_info);
1288       if (r_symndx < symtab_hdr->sh_info)
1289         return FALSE;
1290
1291       h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1292       /* Use strncmp to check ___tls_get_addr since ___tls_get_addr
1293          may be versioned.  */
1294       return (h != NULL
1295               && h->root.root.string != NULL
1296               && (ELF32_R_TYPE (rel[1].r_info) == R_386_PC32
1297                   || ELF32_R_TYPE (rel[1].r_info) == R_386_PLT32)
1298               && (strncmp (h->root.root.string, "___tls_get_addr",
1299                            15) == 0));
1300
1301     case R_386_TLS_IE:
1302       /* Check transition from IE access model:
1303                 movl foo@indntpoff(%rip), %eax
1304                 movl foo@indntpoff(%rip), %reg
1305                 addl foo@indntpoff(%rip), %reg
1306        */
1307
1308       if (offset < 1 || (offset + 4) > sec->size)
1309         return FALSE;
1310
1311       /* Check "movl foo@tpoff(%rip), %eax" first.  */
1312       val = bfd_get_8 (abfd, contents + offset - 1);
1313       if (val == 0xa1)
1314         return TRUE;
1315
1316       if (offset < 2)
1317         return FALSE;
1318
1319       /* Check movl|addl foo@tpoff(%rip), %reg.   */
1320       type = bfd_get_8 (abfd, contents + offset - 2);
1321       return ((type == 0x8b || type == 0x03)
1322               && (val & 0xc7) == 0x05);
1323
1324     case R_386_TLS_GOTIE:
1325     case R_386_TLS_IE_32:
1326       /* Check transition from {IE_32,GOTIE} access model:
1327                 subl foo@{tpoff,gontoff}(%reg1), %reg2
1328                 movl foo@{tpoff,gontoff}(%reg1), %reg2
1329                 addl foo@{tpoff,gontoff}(%reg1), %reg2
1330        */
1331
1332       if (offset < 2 || (offset + 4) > sec->size)
1333         return FALSE;
1334
1335       val = bfd_get_8 (abfd, contents + offset - 1);
1336       if ((val & 0xc0) != 0x80 || (val & 7) == 4)
1337         return FALSE;
1338
1339       type = bfd_get_8 (abfd, contents + offset - 2);
1340       return type == 0x8b || type == 0x2b || type == 0x03;
1341
1342     case R_386_TLS_GOTDESC:
1343       /* Check transition from GDesc access model:
1344                 leal x@tlsdesc(%ebx), %eax
1345
1346          Make sure it's a leal adding ebx to a 32-bit offset
1347          into any register, although it's probably almost always
1348          going to be eax.  */
1349
1350       if (offset < 2 || (offset + 4) > sec->size)
1351         return FALSE;
1352
1353       if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1354         return FALSE;
1355
1356       val = bfd_get_8 (abfd, contents + offset - 1);
1357       return (val & 0xc7) == 0x83;
1358
1359     case R_386_TLS_DESC_CALL:
1360       /* Check transition from GDesc access model:
1361                 call *x@tlsdesc(%rax)
1362        */
1363       if (offset + 2 <= sec->size)
1364         {
1365           /* Make sure that it's a call *x@tlsdesc(%rax).  */
1366           static const unsigned char call[] = { 0xff, 0x10 };
1367           return memcmp (contents + offset, call, 2) == 0;
1368         }
1369
1370       return FALSE;
1371
1372     default:
1373       abort ();
1374     }
1375 }
1376
1377 /* Return TRUE if the TLS access transition is OK or no transition
1378    will be performed.  Update R_TYPE if there is a transition.  */
1379
1380 static bfd_boolean
1381 elf_i386_tls_transition (struct bfd_link_info *info, bfd *abfd,
1382                          asection *sec, bfd_byte *contents,
1383                          Elf_Internal_Shdr *symtab_hdr,
1384                          struct elf_link_hash_entry **sym_hashes,
1385                          unsigned int *r_type, int tls_type,
1386                          const Elf_Internal_Rela *rel,
1387                          const Elf_Internal_Rela *relend,
1388                          struct elf_link_hash_entry *h,
1389                          unsigned long r_symndx)
1390 {
1391   unsigned int from_type = *r_type;
1392   unsigned int to_type = from_type;
1393   bfd_boolean check = TRUE;
1394
1395   /* Skip TLS transition for functions.  */
1396   if (h != NULL
1397       && (h->type == STT_FUNC
1398           || h->type == STT_GNU_IFUNC))
1399     return TRUE;
1400
1401   switch (from_type)
1402     {
1403     case R_386_TLS_GD:
1404     case R_386_TLS_GOTDESC:
1405     case R_386_TLS_DESC_CALL:
1406     case R_386_TLS_IE_32:
1407     case R_386_TLS_IE:
1408     case R_386_TLS_GOTIE:
1409       if (bfd_link_executable (info))
1410         {
1411           if (h == NULL)
1412             to_type = R_386_TLS_LE_32;
1413           else if (from_type != R_386_TLS_IE
1414                    && from_type != R_386_TLS_GOTIE)
1415             to_type = R_386_TLS_IE_32;
1416         }
1417
1418       /* When we are called from elf_i386_relocate_section, CONTENTS
1419          isn't NULL and there may be additional transitions based on
1420          TLS_TYPE.  */
1421       if (contents != NULL)
1422         {
1423           unsigned int new_to_type = to_type;
1424
1425           if (bfd_link_executable (info)
1426               && h != NULL
1427               && h->dynindx == -1
1428               && (tls_type & GOT_TLS_IE))
1429             new_to_type = R_386_TLS_LE_32;
1430
1431           if (to_type == R_386_TLS_GD
1432               || to_type == R_386_TLS_GOTDESC
1433               || to_type == R_386_TLS_DESC_CALL)
1434             {
1435               if (tls_type == GOT_TLS_IE_POS)
1436                 new_to_type = R_386_TLS_GOTIE;
1437               else if (tls_type & GOT_TLS_IE)
1438                 new_to_type = R_386_TLS_IE_32;
1439             }
1440
1441           /* We checked the transition before when we were called from
1442              elf_i386_check_relocs.  We only want to check the new
1443              transition which hasn't been checked before.  */
1444           check = new_to_type != to_type && from_type == to_type;
1445           to_type = new_to_type;
1446         }
1447
1448       break;
1449
1450     case R_386_TLS_LDM:
1451       if (bfd_link_executable (info))
1452         to_type = R_386_TLS_LE_32;
1453       break;
1454
1455     default:
1456       return TRUE;
1457     }
1458
1459   /* Return TRUE if there is no transition.  */
1460   if (from_type == to_type)
1461     return TRUE;
1462
1463   /* Check if the transition can be performed.  */
1464   if (check
1465       && ! elf_i386_check_tls_transition (abfd, sec, contents,
1466                                           symtab_hdr, sym_hashes,
1467                                           from_type, rel, relend))
1468     {
1469       reloc_howto_type *from, *to;
1470       const char *name;
1471
1472       from = elf_i386_rtype_to_howto (abfd, from_type);
1473       to = elf_i386_rtype_to_howto (abfd, to_type);
1474
1475       if (h)
1476         name = h->root.root.string;
1477       else
1478         {
1479           struct elf_i386_link_hash_table *htab;
1480
1481           htab = elf_i386_hash_table (info);
1482           if (htab == NULL)
1483             name = "*unknown*";
1484           else
1485             {
1486               Elf_Internal_Sym *isym;
1487
1488               isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1489                                             abfd, r_symndx);
1490               name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1491             }
1492         }
1493
1494       (*_bfd_error_handler)
1495         (_("%B: TLS transition from %s to %s against `%s' at 0x%lx "
1496            "in section `%A' failed"),
1497          abfd, sec, from->name, to->name, name,
1498          (unsigned long) rel->r_offset);
1499       bfd_set_error (bfd_error_bad_value);
1500       return FALSE;
1501     }
1502
1503   *r_type = to_type;
1504   return TRUE;
1505 }
1506
1507 /* Rename some of the generic section flags to better document how they
1508    are used here.  */
1509 #define need_convert_load sec_flg0
1510
1511 /* Look through the relocs for a section during the first phase, and
1512    calculate needed space in the global offset table, procedure linkage
1513    table, and dynamic reloc sections.  */
1514
1515 static bfd_boolean
1516 elf_i386_check_relocs (bfd *abfd,
1517                        struct bfd_link_info *info,
1518                        asection *sec,
1519                        const Elf_Internal_Rela *relocs)
1520 {
1521   struct elf_i386_link_hash_table *htab;
1522   Elf_Internal_Shdr *symtab_hdr;
1523   struct elf_link_hash_entry **sym_hashes;
1524   const Elf_Internal_Rela *rel;
1525   const Elf_Internal_Rela *rel_end;
1526   asection *sreloc;
1527   bfd_boolean use_plt_got;
1528
1529   if (bfd_link_relocatable (info))
1530     return TRUE;
1531
1532   BFD_ASSERT (is_i386_elf (abfd));
1533
1534   htab = elf_i386_hash_table (info);
1535   if (htab == NULL)
1536     return FALSE;
1537
1538   use_plt_got = (!get_elf_i386_backend_data (abfd)->is_vxworks
1539                  && (get_elf_i386_backend_data (abfd)
1540                      == &elf_i386_arch_bed));
1541
1542   symtab_hdr = &elf_symtab_hdr (abfd);
1543   sym_hashes = elf_sym_hashes (abfd);
1544
1545   sreloc = NULL;
1546
1547   rel_end = relocs + sec->reloc_count;
1548   for (rel = relocs; rel < rel_end; rel++)
1549     {
1550       unsigned int r_type;
1551       unsigned long r_symndx;
1552       struct elf_link_hash_entry *h;
1553       struct elf_i386_link_hash_entry *eh;
1554       Elf_Internal_Sym *isym;
1555       const char *name;
1556       bfd_boolean size_reloc;
1557
1558       r_symndx = ELF32_R_SYM (rel->r_info);
1559       r_type = ELF32_R_TYPE (rel->r_info);
1560
1561       if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1562         {
1563           (*_bfd_error_handler) (_("%B: bad symbol index: %d"),
1564                                  abfd,
1565                                  r_symndx);
1566           return FALSE;
1567         }
1568
1569       if (r_symndx < symtab_hdr->sh_info)
1570         {
1571           /* A local symbol.  */
1572           isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1573                                         abfd, r_symndx);
1574           if (isym == NULL)
1575             return FALSE;
1576
1577           /* Check relocation against local STT_GNU_IFUNC symbol.  */
1578           if (ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1579             {
1580               h = elf_i386_get_local_sym_hash (htab, abfd, rel, TRUE);
1581               if (h == NULL)
1582                 return FALSE;
1583
1584               /* Fake a STT_GNU_IFUNC symbol.  */
1585               h->type = STT_GNU_IFUNC;
1586               h->def_regular = 1;
1587               h->ref_regular = 1;
1588               h->forced_local = 1;
1589               h->root.type = bfd_link_hash_defined;
1590             }
1591           else
1592             h = NULL;
1593         }
1594       else
1595         {
1596           isym = NULL;
1597           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1598           while (h->root.type == bfd_link_hash_indirect
1599                  || h->root.type == bfd_link_hash_warning)
1600             h = (struct elf_link_hash_entry *) h->root.u.i.link;
1601         }
1602
1603       eh = (struct elf_i386_link_hash_entry *) h;
1604       if (h != NULL)
1605         {
1606           /* Create the ifunc sections for static executables.  If we
1607              never see an indirect function symbol nor we are building
1608              a static executable, those sections will be empty and
1609              won't appear in output.  */
1610           switch (r_type)
1611             {
1612             default:
1613               break;
1614
1615             case R_386_GOTOFF:
1616               eh->gotoff_ref = 1;
1617             case R_386_32:
1618             case R_386_PC32:
1619             case R_386_PLT32:
1620             case R_386_GOT32:
1621             case R_386_GOT32X:
1622               if (htab->elf.dynobj == NULL)
1623                 htab->elf.dynobj = abfd;
1624               if (!_bfd_elf_create_ifunc_sections (htab->elf.dynobj, info))
1625                 return FALSE;
1626               break;
1627             }
1628
1629           /* It is referenced by a non-shared object. */
1630           h->ref_regular = 1;
1631           h->root.non_ir_ref = 1;
1632
1633           if (h->type == STT_GNU_IFUNC)
1634             elf_tdata (info->output_bfd)->has_gnu_symbols
1635               |= elf_gnu_symbol_ifunc;
1636         }
1637
1638       if (! elf_i386_tls_transition (info, abfd, sec, NULL,
1639                                      symtab_hdr, sym_hashes,
1640                                      &r_type, GOT_UNKNOWN,
1641                                      rel, rel_end, h, r_symndx))
1642         return FALSE;
1643
1644       switch (r_type)
1645         {
1646         case R_386_TLS_LDM:
1647           htab->tls_ldm_got.refcount += 1;
1648           goto create_got;
1649
1650         case R_386_PLT32:
1651           /* This symbol requires a procedure linkage table entry.  We
1652              actually build the entry in adjust_dynamic_symbol,
1653              because this might be a case of linking PIC code which is
1654              never referenced by a dynamic object, in which case we
1655              don't need to generate a procedure linkage table entry
1656              after all.  */
1657
1658           /* If this is a local symbol, we resolve it directly without
1659              creating a procedure linkage table entry.  */
1660           if (h == NULL)
1661             continue;
1662
1663           eh->has_got_reloc = 1;
1664           h->needs_plt = 1;
1665           h->plt.refcount += 1;
1666           break;
1667
1668         case R_386_SIZE32:
1669           size_reloc = TRUE;
1670           goto do_size;
1671
1672         case R_386_TLS_IE_32:
1673         case R_386_TLS_IE:
1674         case R_386_TLS_GOTIE:
1675           if (!bfd_link_executable (info))
1676             info->flags |= DF_STATIC_TLS;
1677           /* Fall through */
1678
1679         case R_386_GOT32:
1680         case R_386_GOT32X:
1681         case R_386_TLS_GD:
1682         case R_386_TLS_GOTDESC:
1683         case R_386_TLS_DESC_CALL:
1684           /* This symbol requires a global offset table entry.  */
1685           {
1686             int tls_type, old_tls_type;
1687
1688             switch (r_type)
1689               {
1690               default:
1691               case R_386_GOT32:
1692               case R_386_GOT32X:
1693                 tls_type = GOT_NORMAL;
1694                 break;
1695               case R_386_TLS_GD: tls_type = GOT_TLS_GD; break;
1696               case R_386_TLS_GOTDESC:
1697               case R_386_TLS_DESC_CALL:
1698                 tls_type = GOT_TLS_GDESC; break;
1699               case R_386_TLS_IE_32:
1700                 if (ELF32_R_TYPE (rel->r_info) == r_type)
1701                   tls_type = GOT_TLS_IE_NEG;
1702                 else
1703                   /* If this is a GD->IE transition, we may use either of
1704                      R_386_TLS_TPOFF and R_386_TLS_TPOFF32.  */
1705                   tls_type = GOT_TLS_IE;
1706                 break;
1707               case R_386_TLS_IE:
1708               case R_386_TLS_GOTIE:
1709                 tls_type = GOT_TLS_IE_POS; break;
1710               }
1711
1712             if (h != NULL)
1713               {
1714                 h->got.refcount += 1;
1715                 old_tls_type = elf_i386_hash_entry(h)->tls_type;
1716               }
1717             else
1718               {
1719                 bfd_signed_vma *local_got_refcounts;
1720
1721                 /* This is a global offset table entry for a local symbol.  */
1722                 local_got_refcounts = elf_local_got_refcounts (abfd);
1723                 if (local_got_refcounts == NULL)
1724                   {
1725                     bfd_size_type size;
1726
1727                     size = symtab_hdr->sh_info;
1728                     size *= (sizeof (bfd_signed_vma)
1729                              + sizeof (bfd_vma) + sizeof(char));
1730                     local_got_refcounts = (bfd_signed_vma *)
1731                         bfd_zalloc (abfd, size);
1732                     if (local_got_refcounts == NULL)
1733                       return FALSE;
1734                     elf_local_got_refcounts (abfd) = local_got_refcounts;
1735                     elf_i386_local_tlsdesc_gotent (abfd)
1736                       = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
1737                     elf_i386_local_got_tls_type (abfd)
1738                       = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
1739                   }
1740                 local_got_refcounts[r_symndx] += 1;
1741                 old_tls_type = elf_i386_local_got_tls_type (abfd) [r_symndx];
1742               }
1743
1744             if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE))
1745               tls_type |= old_tls_type;
1746             /* If a TLS symbol is accessed using IE at least once,
1747                there is no point to use dynamic model for it.  */
1748             else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
1749                      && (! GOT_TLS_GD_ANY_P (old_tls_type)
1750                          || (tls_type & GOT_TLS_IE) == 0))
1751               {
1752                 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type))
1753                   tls_type = old_tls_type;
1754                 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1755                          && GOT_TLS_GD_ANY_P (tls_type))
1756                   tls_type |= old_tls_type;
1757                 else
1758                   {
1759                     if (h)
1760                       name = h->root.root.string;
1761                     else
1762                       name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1763                                              NULL);
1764                     (*_bfd_error_handler)
1765                       (_("%B: `%s' accessed both as normal and "
1766                          "thread local symbol"),
1767                        abfd, name);
1768                     bfd_set_error (bfd_error_bad_value);
1769                     return FALSE;
1770                   }
1771               }
1772
1773             if (old_tls_type != tls_type)
1774               {
1775                 if (h != NULL)
1776                   elf_i386_hash_entry (h)->tls_type = tls_type;
1777                 else
1778                   elf_i386_local_got_tls_type (abfd) [r_symndx] = tls_type;
1779               }
1780           }
1781           /* Fall through */
1782
1783         case R_386_GOTOFF:
1784         case R_386_GOTPC:
1785         create_got:
1786           if (htab->elf.sgot == NULL)
1787             {
1788               if (htab->elf.dynobj == NULL)
1789                 htab->elf.dynobj = abfd;
1790               if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
1791                 return FALSE;
1792             }
1793           if (r_type != R_386_TLS_IE)
1794             {
1795               if (eh != NULL)
1796                 eh->has_got_reloc = 1;
1797               break;
1798             }
1799           /* Fall through */
1800
1801         case R_386_TLS_LE_32:
1802         case R_386_TLS_LE:
1803           if (eh != NULL)
1804             eh->has_got_reloc = 1;
1805           if (bfd_link_executable (info))
1806             break;
1807           info->flags |= DF_STATIC_TLS;
1808           goto do_relocation;
1809
1810         case R_386_32:
1811         case R_386_PC32:
1812           if (eh != NULL && (sec->flags & SEC_CODE) != 0)
1813             eh->has_non_got_reloc = 1;
1814 do_relocation:
1815           /* STT_GNU_IFUNC symbol must go through PLT even if it is
1816              locally defined and undefined symbol may turn out to be
1817              a STT_GNU_IFUNC symbol later.  */
1818           if (h != NULL
1819               && (bfd_link_executable (info)
1820                   || ((h->type == STT_GNU_IFUNC
1821                        || h->root.type == bfd_link_hash_undefweak
1822                        || h->root.type == bfd_link_hash_undefined)
1823                       && SYMBOLIC_BIND (info, h))))
1824             {
1825               /* If this reloc is in a read-only section, we might
1826                  need a copy reloc.  We can't check reliably at this
1827                  stage whether the section is read-only, as input
1828                  sections have not yet been mapped to output sections.
1829                  Tentatively set the flag for now, and correct in
1830                  adjust_dynamic_symbol.  */
1831               h->non_got_ref = 1;
1832
1833               /* We may need a .plt entry if the function this reloc
1834                  refers to is in a shared lib.  */
1835               h->plt.refcount += 1;
1836               if (r_type == R_386_PC32)
1837                 {
1838                   /* Since something like ".long foo - ." may be used
1839                      as pointer, make sure that PLT is used if foo is
1840                      a function defined in a shared library.  */
1841                   if ((sec->flags & SEC_CODE) == 0)
1842                     h->pointer_equality_needed = 1;
1843                 }
1844               else
1845                 {
1846                   h->pointer_equality_needed = 1;
1847                   /* R_386_32 can be resolved at run-time.  */
1848                   if (r_type == R_386_32
1849                       && (sec->flags & SEC_READONLY) == 0)
1850                     eh->func_pointer_refcount += 1;
1851                 }
1852             }
1853
1854           size_reloc = FALSE;
1855 do_size:
1856           /* If we are creating a shared library, and this is a reloc
1857              against a global symbol, or a non PC relative reloc
1858              against a local symbol, then we need to copy the reloc
1859              into the shared library.  However, if we are linking with
1860              -Bsymbolic, we do not need to copy a reloc against a
1861              global symbol which is defined in an object we are
1862              including in the link (i.e., DEF_REGULAR is set).  At
1863              this point we have not seen all the input files, so it is
1864              possible that DEF_REGULAR is not set now but will be set
1865              later (it is never cleared).  In case of a weak definition,
1866              DEF_REGULAR may be cleared later by a strong definition in
1867              a shared library.  We account for that possibility below by
1868              storing information in the relocs_copied field of the hash
1869              table entry.  A similar situation occurs when creating
1870              shared libraries and symbol visibility changes render the
1871              symbol local.
1872
1873              If on the other hand, we are creating an executable, we
1874              may need to keep relocations for symbols satisfied by a
1875              dynamic library if we manage to avoid copy relocs for the
1876              symbol.  */
1877           if ((bfd_link_pic (info)
1878                && (sec->flags & SEC_ALLOC) != 0
1879                && (r_type != R_386_PC32
1880                    || (h != NULL
1881                        && (! (bfd_link_pie (info)
1882                               || SYMBOLIC_BIND (info, h))
1883                            || h->root.type == bfd_link_hash_defweak
1884                            || !h->def_regular))))
1885               || (ELIMINATE_COPY_RELOCS
1886                   && !bfd_link_pic (info)
1887                   && (sec->flags & SEC_ALLOC) != 0
1888                   && h != NULL
1889                   && (h->root.type == bfd_link_hash_defweak
1890                       || !h->def_regular)))
1891             {
1892               struct elf_dyn_relocs *p;
1893               struct elf_dyn_relocs **head;
1894
1895               /* We must copy these reloc types into the output file.
1896                  Create a reloc section in dynobj and make room for
1897                  this reloc.  */
1898               if (sreloc == NULL)
1899                 {
1900                   if (htab->elf.dynobj == NULL)
1901                     htab->elf.dynobj = abfd;
1902
1903                   sreloc = _bfd_elf_make_dynamic_reloc_section
1904                     (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE);
1905
1906                   if (sreloc == NULL)
1907                     return FALSE;
1908                 }
1909
1910               /* If this is a global symbol, we count the number of
1911                  relocations we need for this symbol.  */
1912               if (h != NULL)
1913                 {
1914                   head = &eh->dyn_relocs;
1915                 }
1916               else
1917                 {
1918                   /* Track dynamic relocs needed for local syms too.
1919                      We really need local syms available to do this
1920                      easily.  Oh well.  */
1921                   void **vpp;
1922                   asection *s;
1923
1924                   isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1925                                                 abfd, r_symndx);
1926                   if (isym == NULL)
1927                     return FALSE;
1928
1929                   s = bfd_section_from_elf_index (abfd, isym->st_shndx);
1930                   if (s == NULL)
1931                     s = sec;
1932
1933                   vpp = &elf_section_data (s)->local_dynrel;
1934                   head = (struct elf_dyn_relocs **)vpp;
1935                 }
1936
1937               p = *head;
1938               if (p == NULL || p->sec != sec)
1939                 {
1940                   bfd_size_type amt = sizeof *p;
1941                   p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj,
1942                                                            amt);
1943                   if (p == NULL)
1944                     return FALSE;
1945                   p->next = *head;
1946                   *head = p;
1947                   p->sec = sec;
1948                   p->count = 0;
1949                   p->pc_count = 0;
1950                 }
1951
1952               p->count += 1;
1953               /* Count size relocation as PC-relative relocation.  */
1954               if (r_type == R_386_PC32 || size_reloc)
1955                 p->pc_count += 1;
1956             }
1957           break;
1958
1959           /* This relocation describes the C++ object vtable hierarchy.
1960              Reconstruct it for later use during GC.  */
1961         case R_386_GNU_VTINHERIT:
1962           if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1963             return FALSE;
1964           break;
1965
1966           /* This relocation describes which C++ vtable entries are actually
1967              used.  Record for later use during GC.  */
1968         case R_386_GNU_VTENTRY:
1969           BFD_ASSERT (h != NULL);
1970           if (h != NULL
1971               && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
1972             return FALSE;
1973           break;
1974
1975         default:
1976           break;
1977         }
1978
1979       if (use_plt_got
1980           && h != NULL
1981           && h->plt.refcount > 0
1982           && (((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
1983               || h->got.refcount > 0)
1984           && htab->plt_got == NULL)
1985         {
1986           /* Create the GOT procedure linkage table.  */
1987           unsigned int plt_got_align;
1988           const struct elf_backend_data *bed;
1989
1990           bed = get_elf_backend_data (info->output_bfd);
1991           BFD_ASSERT (sizeof (elf_i386_got_plt_entry) == 8
1992                       && (sizeof (elf_i386_got_plt_entry)
1993                           == sizeof (elf_i386_pic_got_plt_entry)));
1994           plt_got_align = 3;
1995
1996           if (htab->elf.dynobj == NULL)
1997             htab->elf.dynobj = abfd;
1998           htab->plt_got
1999             = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
2000                                                   ".plt.got",
2001                                                   (bed->dynamic_sec_flags
2002                                                    | SEC_ALLOC
2003                                                    | SEC_CODE
2004                                                    | SEC_LOAD
2005                                                    | SEC_READONLY));
2006           if (htab->plt_got == NULL
2007               || !bfd_set_section_alignment (htab->elf.dynobj,
2008                                              htab->plt_got,
2009                                              plt_got_align))
2010             return FALSE;
2011         }
2012
2013       if ((r_type == R_386_GOT32 || r_type == R_386_GOT32X)
2014           && (h == NULL || h->type != STT_GNU_IFUNC))
2015         sec->need_convert_load = 1;
2016     }
2017
2018   return TRUE;
2019 }
2020
2021 /* Return the section that should be marked against GC for a given
2022    relocation.  */
2023
2024 static asection *
2025 elf_i386_gc_mark_hook (asection *sec,
2026                        struct bfd_link_info *info,
2027                        Elf_Internal_Rela *rel,
2028                        struct elf_link_hash_entry *h,
2029                        Elf_Internal_Sym *sym)
2030 {
2031   if (h != NULL)
2032     switch (ELF32_R_TYPE (rel->r_info))
2033       {
2034       case R_386_GNU_VTINHERIT:
2035       case R_386_GNU_VTENTRY:
2036         return NULL;
2037       }
2038
2039   return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
2040 }
2041
2042 /* Update the got entry reference counts for the section being removed.  */
2043
2044 static bfd_boolean
2045 elf_i386_gc_sweep_hook (bfd *abfd,
2046                         struct bfd_link_info *info,
2047                         asection *sec,
2048                         const Elf_Internal_Rela *relocs)
2049 {
2050   struct elf_i386_link_hash_table *htab;
2051   Elf_Internal_Shdr *symtab_hdr;
2052   struct elf_link_hash_entry **sym_hashes;
2053   bfd_signed_vma *local_got_refcounts;
2054   const Elf_Internal_Rela *rel, *relend;
2055
2056   if (bfd_link_relocatable (info))
2057     return TRUE;
2058
2059   htab = elf_i386_hash_table (info);
2060   if (htab == NULL)
2061     return FALSE;
2062
2063   elf_section_data (sec)->local_dynrel = NULL;
2064
2065   symtab_hdr = &elf_symtab_hdr (abfd);
2066   sym_hashes = elf_sym_hashes (abfd);
2067   local_got_refcounts = elf_local_got_refcounts (abfd);
2068
2069   relend = relocs + sec->reloc_count;
2070   for (rel = relocs; rel < relend; rel++)
2071     {
2072       unsigned long r_symndx;
2073       unsigned int r_type;
2074       struct elf_link_hash_entry *h = NULL;
2075
2076       r_symndx = ELF32_R_SYM (rel->r_info);
2077       if (r_symndx >= symtab_hdr->sh_info)
2078         {
2079           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2080           while (h->root.type == bfd_link_hash_indirect
2081                  || h->root.type == bfd_link_hash_warning)
2082             h = (struct elf_link_hash_entry *) h->root.u.i.link;
2083         }
2084       else
2085         {
2086           /* A local symbol.  */
2087           Elf_Internal_Sym *isym;
2088
2089           isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2090                                         abfd, r_symndx);
2091
2092           /* Check relocation against local STT_GNU_IFUNC symbol.  */
2093           if (isym != NULL
2094               && ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
2095             {
2096               h = elf_i386_get_local_sym_hash (htab, abfd, rel, FALSE);
2097               if (h == NULL)
2098                 abort ();
2099             }
2100         }
2101
2102       if (h)
2103         {
2104           struct elf_i386_link_hash_entry *eh;
2105           struct elf_dyn_relocs **pp;
2106           struct elf_dyn_relocs *p;
2107
2108           eh = (struct elf_i386_link_hash_entry *) h;
2109           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
2110             if (p->sec == sec)
2111               {
2112                 /* Everything must go for SEC.  */
2113                 *pp = p->next;
2114                 break;
2115               }
2116         }
2117
2118       r_type = ELF32_R_TYPE (rel->r_info);
2119       if (! elf_i386_tls_transition (info, abfd, sec, NULL,
2120                                      symtab_hdr, sym_hashes,
2121                                      &r_type, GOT_UNKNOWN,
2122                                      rel, relend, h, r_symndx))
2123         return FALSE;
2124
2125       switch (r_type)
2126         {
2127         case R_386_TLS_LDM:
2128           if (htab->tls_ldm_got.refcount > 0)
2129             htab->tls_ldm_got.refcount -= 1;
2130           break;
2131
2132         case R_386_TLS_GD:
2133         case R_386_TLS_GOTDESC:
2134         case R_386_TLS_DESC_CALL:
2135         case R_386_TLS_IE_32:
2136         case R_386_TLS_IE:
2137         case R_386_TLS_GOTIE:
2138         case R_386_GOT32:
2139         case R_386_GOT32X:
2140           if (h != NULL)
2141             {
2142               if (h->got.refcount > 0)
2143                 h->got.refcount -= 1;
2144               if (h->type == STT_GNU_IFUNC)
2145                 {
2146                   if (h->plt.refcount > 0)
2147                     h->plt.refcount -= 1;
2148                 }
2149             }
2150           else if (local_got_refcounts != NULL)
2151             {
2152               if (local_got_refcounts[r_symndx] > 0)
2153                 local_got_refcounts[r_symndx] -= 1;
2154             }
2155           break;
2156
2157         case R_386_32:
2158         case R_386_PC32:
2159         case R_386_SIZE32:
2160           if (bfd_link_pic (info)
2161               && (h == NULL || h->type != STT_GNU_IFUNC))
2162             break;
2163           /* Fall through */
2164
2165         case R_386_PLT32:
2166           if (h != NULL)
2167             {
2168               if (h->plt.refcount > 0)
2169                 h->plt.refcount -= 1;
2170               if (r_type == R_386_32
2171                   && (sec->flags & SEC_READONLY) == 0)
2172                 {
2173                   struct elf_i386_link_hash_entry *eh
2174                     = (struct elf_i386_link_hash_entry *) h;
2175                   if (eh->func_pointer_refcount > 0)
2176                     eh->func_pointer_refcount -= 1;
2177                 }
2178             }
2179           break;
2180
2181         case R_386_GOTOFF:
2182           if (h != NULL && h->type == STT_GNU_IFUNC)
2183             {
2184               if (h->got.refcount > 0)
2185                 h->got.refcount -= 1;
2186               if (h->plt.refcount > 0)
2187                 h->plt.refcount -= 1;
2188             }
2189           break;
2190
2191         default:
2192           break;
2193         }
2194     }
2195
2196   return TRUE;
2197 }
2198
2199 /* Remove undefined weak symbol from the dynamic symbol table if it
2200    is resolved to 0.   */
2201
2202 static bfd_boolean
2203 elf_i386_fixup_symbol (struct bfd_link_info *info,
2204                        struct elf_link_hash_entry *h)
2205 {
2206   if (h->dynindx != -1
2207       && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
2208                                           elf_i386_hash_entry (h)))
2209     {
2210       h->dynindx = -1;
2211       _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
2212                               h->dynstr_index);
2213     }
2214   return TRUE;
2215 }
2216
2217 /* Adjust a symbol defined by a dynamic object and referenced by a
2218    regular object.  The current definition is in some section of the
2219    dynamic object, but we're not including those sections.  We have to
2220    change the definition to something the rest of the link can
2221    understand.  */
2222
2223 static bfd_boolean
2224 elf_i386_adjust_dynamic_symbol (struct bfd_link_info *info,
2225                                 struct elf_link_hash_entry *h)
2226 {
2227   struct elf_i386_link_hash_table *htab;
2228   asection *s;
2229   struct elf_i386_link_hash_entry *eh;
2230   struct elf_dyn_relocs *p;
2231
2232   /* STT_GNU_IFUNC symbol must go through PLT. */
2233   if (h->type == STT_GNU_IFUNC)
2234     {
2235       /* All local STT_GNU_IFUNC references must be treate as local
2236          calls via local PLT.  */
2237       if (h->ref_regular
2238           && SYMBOL_CALLS_LOCAL (info, h))
2239         {
2240           bfd_size_type pc_count = 0, count = 0;
2241           struct elf_dyn_relocs **pp;
2242
2243           eh = (struct elf_i386_link_hash_entry *) h;
2244           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2245             {
2246               pc_count += p->pc_count;
2247               p->count -= p->pc_count;
2248               p->pc_count = 0;
2249               count += p->count;
2250               if (p->count == 0)
2251                 *pp = p->next;
2252               else
2253                 pp = &p->next;
2254             }
2255
2256           if (pc_count || count)
2257             {
2258               h->needs_plt = 1;
2259               h->non_got_ref = 1;
2260               if (h->plt.refcount <= 0)
2261                 h->plt.refcount = 1;
2262               else
2263                 h->plt.refcount += 1;
2264             }
2265         }
2266
2267       if (h->plt.refcount <= 0)
2268         {
2269           h->plt.offset = (bfd_vma) -1;
2270           h->needs_plt = 0;
2271         }
2272       return TRUE;
2273     }
2274
2275   /* If this is a function, put it in the procedure linkage table.  We
2276      will fill in the contents of the procedure linkage table later,
2277      when we know the address of the .got section.  */
2278   if (h->type == STT_FUNC
2279       || h->needs_plt)
2280     {
2281       if (h->plt.refcount <= 0
2282           || SYMBOL_CALLS_LOCAL (info, h)
2283           || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2284               && h->root.type == bfd_link_hash_undefweak))
2285         {
2286           /* This case can occur if we saw a PLT32 reloc in an input
2287              file, but the symbol was never referred to by a dynamic
2288              object, or if all references were garbage collected.  In
2289              such a case, we don't actually need to build a procedure
2290              linkage table, and we can just do a PC32 reloc instead.  */
2291           h->plt.offset = (bfd_vma) -1;
2292           h->needs_plt = 0;
2293         }
2294
2295       return TRUE;
2296     }
2297   else
2298     /* It's possible that we incorrectly decided a .plt reloc was
2299        needed for an R_386_PC32 reloc to a non-function sym in
2300        check_relocs.  We can't decide accurately between function and
2301        non-function syms in check-relocs;  Objects loaded later in
2302        the link may change h->type.  So fix it now.  */
2303     h->plt.offset = (bfd_vma) -1;
2304
2305   /* If this is a weak symbol, and there is a real definition, the
2306      processor independent code will have arranged for us to see the
2307      real definition first, and we can just use the same value.  */
2308   if (h->u.weakdef != NULL)
2309     {
2310       BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2311                   || h->u.weakdef->root.type == bfd_link_hash_defweak);
2312       h->root.u.def.section = h->u.weakdef->root.u.def.section;
2313       h->root.u.def.value = h->u.weakdef->root.u.def.value;
2314       if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
2315         h->non_got_ref = h->u.weakdef->non_got_ref;
2316       return TRUE;
2317     }
2318
2319   /* This is a reference to a symbol defined by a dynamic object which
2320      is not a function.  */
2321
2322   /* If we are creating a shared library, we must presume that the
2323      only references to the symbol are via the global offset table.
2324      For such cases we need not do anything here; the relocations will
2325      be handled correctly by relocate_section.  */
2326   if (!bfd_link_executable (info))
2327     return TRUE;
2328
2329   /* If there are no references to this symbol that do not use the
2330      GOT nor R_386_GOTOFF relocation, we don't need to generate a copy
2331      reloc.  */
2332   eh = (struct elf_i386_link_hash_entry *) h;
2333   if (!h->non_got_ref && !eh->gotoff_ref)
2334     return TRUE;
2335
2336   /* If -z nocopyreloc was given, we won't generate them either.  */
2337   if (info->nocopyreloc)
2338     {
2339       h->non_got_ref = 0;
2340       return TRUE;
2341     }
2342
2343   htab = elf_i386_hash_table (info);
2344   if (htab == NULL)
2345     return FALSE;
2346
2347   /* If there aren't any dynamic relocs in read-only sections nor
2348      R_386_GOTOFF relocation, then we can keep the dynamic relocs and
2349      avoid the copy reloc.  This doesn't work on VxWorks, where we can
2350      not have dynamic relocations (other than copy and jump slot
2351      relocations) in an executable.  */
2352   if (ELIMINATE_COPY_RELOCS
2353       && !eh->gotoff_ref
2354       && !get_elf_i386_backend_data (info->output_bfd)->is_vxworks)
2355     {
2356       for (p = eh->dyn_relocs; p != NULL; p = p->next)
2357         {
2358           s = p->sec->output_section;
2359           if (s != NULL && (s->flags & SEC_READONLY) != 0)
2360             break;
2361         }
2362
2363       if (p == NULL)
2364         {
2365           h->non_got_ref = 0;
2366           return TRUE;
2367         }
2368     }
2369
2370   /* We must allocate the symbol in our .dynbss section, which will
2371      become part of the .bss section of the executable.  There will be
2372      an entry for this symbol in the .dynsym section.  The dynamic
2373      object will contain position independent code, so all references
2374      from the dynamic object to this symbol will go through the global
2375      offset table.  The dynamic linker will use the .dynsym entry to
2376      determine the address it must put in the global offset table, so
2377      both the dynamic object and the regular object will refer to the
2378      same memory location for the variable.  */
2379
2380   /* We must generate a R_386_COPY reloc to tell the dynamic linker to
2381      copy the initial value out of the dynamic object and into the
2382      runtime process image.  */
2383   if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
2384     {
2385       htab->srelbss->size += sizeof (Elf32_External_Rel);
2386       h->needs_copy = 1;
2387     }
2388
2389   s = htab->sdynbss;
2390
2391   return _bfd_elf_adjust_dynamic_copy (info, h, s);
2392 }
2393
2394 /* Allocate space in .plt, .got and associated reloc sections for
2395    dynamic relocs.  */
2396
2397 static bfd_boolean
2398 elf_i386_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
2399 {
2400   struct bfd_link_info *info;
2401   struct elf_i386_link_hash_table *htab;
2402   struct elf_i386_link_hash_entry *eh;
2403   struct elf_dyn_relocs *p;
2404   unsigned plt_entry_size;
2405   bfd_boolean resolved_to_zero;
2406
2407   if (h->root.type == bfd_link_hash_indirect)
2408     return TRUE;
2409
2410   eh = (struct elf_i386_link_hash_entry *) h;
2411
2412   info = (struct bfd_link_info *) inf;
2413   htab = elf_i386_hash_table (info);
2414   if (htab == NULL)
2415     return FALSE;
2416
2417   plt_entry_size = GET_PLT_ENTRY_SIZE (info->output_bfd);
2418
2419   resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
2420
2421   /* Clear the reference count of function pointer relocations if
2422      symbol isn't a normal function.  */
2423   if (h->type != STT_FUNC)
2424     eh->func_pointer_refcount = 0;
2425
2426   /* We can't use the GOT PLT if pointer equality is needed since
2427      finish_dynamic_symbol won't clear symbol value and the dynamic
2428      linker won't update the GOT slot.  We will get into an infinite
2429      loop at run-time.  */
2430   if (htab->plt_got != NULL
2431       && h->type != STT_GNU_IFUNC
2432       && !h->pointer_equality_needed
2433       && h->plt.refcount > 0
2434       && h->got.refcount > 0)
2435     {
2436       /* Don't use the regular PLT if there are both GOT and GOTPLT
2437          reloctions.  */
2438       h->plt.offset = (bfd_vma) -1;
2439
2440       /* Use the GOT PLT.  */
2441       eh->plt_got.refcount = 1;
2442     }
2443
2444   /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
2445      here if it is defined and referenced in a non-shared object.  */
2446   if (h->type == STT_GNU_IFUNC
2447       && h->def_regular)
2448     return _bfd_elf_allocate_ifunc_dyn_relocs (info, h, &eh->dyn_relocs,
2449                                                &htab->readonly_dynrelocs_against_ifunc,
2450                                                plt_entry_size,
2451                                                plt_entry_size, 4);
2452   /* Don't create the PLT entry if there are only function pointer
2453      relocations which can be resolved at run-time.  */
2454   else if (htab->elf.dynamic_sections_created
2455            && (h->plt.refcount > eh->func_pointer_refcount
2456                || eh->plt_got.refcount > 0))
2457     {
2458       bfd_boolean use_plt_got;
2459
2460       /* Clear the reference count of function pointer relocations
2461          if PLT is used.  */
2462       eh->func_pointer_refcount = 0;
2463
2464       if ((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
2465         {
2466           /* Don't use the regular PLT for DF_BIND_NOW. */
2467           h->plt.offset = (bfd_vma) -1;
2468
2469           /* Use the GOT PLT.  */
2470           h->got.refcount = 1;
2471           eh->plt_got.refcount = 1;
2472         }
2473
2474       use_plt_got = eh->plt_got.refcount > 0;
2475
2476       /* Make sure this symbol is output as a dynamic symbol.
2477          Undefined weak syms won't yet be marked as dynamic.  */
2478       if (h->dynindx == -1
2479           && !h->forced_local
2480           && !resolved_to_zero)
2481         {
2482           if (! bfd_elf_link_record_dynamic_symbol (info, h))
2483             return FALSE;
2484         }
2485
2486       if (bfd_link_pic (info)
2487           || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
2488         {
2489           asection *s = htab->elf.splt;
2490           asection *got_s = htab->plt_got;
2491
2492           /* If this is the first .plt entry, make room for the special
2493              first entry.  The .plt section is used by prelink to undo
2494              prelinking for dynamic relocations.  */
2495           if (s->size == 0)
2496             s->size = plt_entry_size;
2497
2498           if (use_plt_got)
2499             eh->plt_got.offset = got_s->size;
2500           else
2501             h->plt.offset = s->size;
2502
2503           /* If this symbol is not defined in a regular file, and we are
2504              not generating a shared library, then set the symbol to this
2505              location in the .plt.  This is required to make function
2506              pointers compare as equal between the normal executable and
2507              the shared library.  */
2508           if (! bfd_link_pic (info)
2509               && !h->def_regular)
2510             {
2511               if (use_plt_got)
2512                 {
2513                   /* We need to make a call to the entry of the GOT PLT
2514                      instead of regular PLT entry.  */
2515                   h->root.u.def.section = got_s;
2516                   h->root.u.def.value = eh->plt_got.offset;
2517                 }
2518               else
2519                 {
2520                   h->root.u.def.section = s;
2521                   h->root.u.def.value = h->plt.offset;
2522                 }
2523             }
2524
2525           /* Make room for this entry.  */
2526           if (use_plt_got)
2527             got_s->size += sizeof (elf_i386_got_plt_entry);
2528           else
2529             {
2530               s->size += plt_entry_size;
2531
2532               /* We also need to make an entry in the .got.plt section,
2533                  which will be placed in the .got section by the linker
2534                  script.  */
2535               htab->elf.sgotplt->size += 4;
2536
2537               /* There should be no PLT relocation against resolved
2538                  undefined weak symbol in executable.  */
2539               if (!resolved_to_zero)
2540                 {
2541                   /* We also need to make an entry in the .rel.plt
2542                      section.  */
2543                   htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
2544                   htab->elf.srelplt->reloc_count++;
2545                 }
2546             }
2547
2548           if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks
2549               && !bfd_link_pic (info))
2550             {
2551               /* VxWorks has a second set of relocations for each PLT entry
2552                  in executables.  They go in a separate relocation section,
2553                  which is processed by the kernel loader.  */
2554
2555               /* There are two relocations for the initial PLT entry: an
2556                  R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 4 and an
2557                  R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 8.  */
2558
2559               if (h->plt.offset == plt_entry_size)
2560                 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2561
2562               /* There are two extra relocations for each subsequent PLT entry:
2563                  an R_386_32 relocation for the GOT entry, and an R_386_32
2564                  relocation for the PLT entry.  */
2565
2566               htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2567             }
2568         }
2569       else
2570         {
2571           eh->plt_got.offset = (bfd_vma) -1;
2572           h->plt.offset = (bfd_vma) -1;
2573           h->needs_plt = 0;
2574         }
2575     }
2576   else
2577     {
2578       eh->plt_got.offset = (bfd_vma) -1;
2579       h->plt.offset = (bfd_vma) -1;
2580       h->needs_plt = 0;
2581     }
2582
2583   eh->tlsdesc_got = (bfd_vma) -1;
2584
2585   /* If R_386_TLS_{IE_32,IE,GOTIE} symbol is now local to the binary,
2586      make it a R_386_TLS_LE_32 requiring no TLS entry.  */
2587   if (h->got.refcount > 0
2588       && bfd_link_executable (info)
2589       && h->dynindx == -1
2590       && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE))
2591     h->got.offset = (bfd_vma) -1;
2592   else if (h->got.refcount > 0)
2593     {
2594       asection *s;
2595       bfd_boolean dyn;
2596       int tls_type = elf_i386_hash_entry(h)->tls_type;
2597
2598       /* Make sure this symbol is output as a dynamic symbol.
2599          Undefined weak syms won't yet be marked as dynamic.  */
2600       if (h->dynindx == -1
2601           && !h->forced_local
2602           && !resolved_to_zero)
2603         {
2604           if (! bfd_elf_link_record_dynamic_symbol (info, h))
2605             return FALSE;
2606         }
2607
2608       s = htab->elf.sgot;
2609       if (GOT_TLS_GDESC_P (tls_type))
2610         {
2611           eh->tlsdesc_got = htab->elf.sgotplt->size
2612             - elf_i386_compute_jump_table_size (htab);
2613           htab->elf.sgotplt->size += 8;
2614           h->got.offset = (bfd_vma) -2;
2615         }
2616       if (! GOT_TLS_GDESC_P (tls_type)
2617           || GOT_TLS_GD_P (tls_type))
2618         {
2619           h->got.offset = s->size;
2620           s->size += 4;
2621           /* R_386_TLS_GD needs 2 consecutive GOT slots.  */
2622           if (GOT_TLS_GD_P (tls_type) || tls_type == GOT_TLS_IE_BOTH)
2623             s->size += 4;
2624         }
2625       dyn = htab->elf.dynamic_sections_created;
2626       /* R_386_TLS_IE_32 needs one dynamic relocation,
2627          R_386_TLS_IE resp. R_386_TLS_GOTIE needs one dynamic relocation,
2628          (but if both R_386_TLS_IE_32 and R_386_TLS_IE is present, we
2629          need two), R_386_TLS_GD needs one if local symbol and two if
2630          global.  No dynamic relocation against resolved undefined weak
2631          symbol in executable.  */
2632       if (tls_type == GOT_TLS_IE_BOTH)
2633         htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
2634       else if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
2635                || (tls_type & GOT_TLS_IE))
2636         htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
2637       else if (GOT_TLS_GD_P (tls_type))
2638         htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
2639       else if (! GOT_TLS_GDESC_P (tls_type)
2640                && ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2641                     && !resolved_to_zero)
2642                    || h->root.type != bfd_link_hash_undefweak)
2643                && (bfd_link_pic (info)
2644                    || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
2645         htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
2646       if (GOT_TLS_GDESC_P (tls_type))
2647         htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
2648     }
2649   else
2650     h->got.offset = (bfd_vma) -1;
2651
2652   if (eh->dyn_relocs == NULL)
2653     return TRUE;
2654
2655   /* In the shared -Bsymbolic case, discard space allocated for
2656      dynamic pc-relative relocs against symbols which turn out to be
2657      defined in regular objects.  For the normal shared case, discard
2658      space for pc-relative relocs that have become local due to symbol
2659      visibility changes.  */
2660
2661   if (bfd_link_pic (info))
2662     {
2663       /* The only reloc that uses pc_count is R_386_PC32, which will
2664          appear on a call or on something like ".long foo - .".  We
2665          want calls to protected symbols to resolve directly to the
2666          function rather than going via the plt.  If people want
2667          function pointer comparisons to work as expected then they
2668          should avoid writing assembly like ".long foo - .".  */
2669       if (SYMBOL_CALLS_LOCAL (info, h))
2670         {
2671           struct elf_dyn_relocs **pp;
2672
2673           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2674             {
2675               p->count -= p->pc_count;
2676               p->pc_count = 0;
2677               if (p->count == 0)
2678                 *pp = p->next;
2679               else
2680                 pp = &p->next;
2681             }
2682         }
2683
2684       if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks)
2685         {
2686           struct elf_dyn_relocs **pp;
2687           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2688             {
2689               if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2690                 *pp = p->next;
2691               else
2692                 pp = &p->next;
2693             }
2694         }
2695
2696       /* Also discard relocs on undefined weak syms with non-default
2697          visibility or in PIE.  */
2698       if (eh->dyn_relocs != NULL
2699           && h->root.type == bfd_link_hash_undefweak)
2700         {
2701           /* Undefined weak symbol is never bound locally in shared
2702              library.  */
2703           if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2704               || resolved_to_zero)
2705             {
2706               if (h->non_got_ref)
2707                 {
2708                   /* Keep dynamic non-GOT/non-PLT relocation so that we
2709                      can branch to 0 without PLT.  */
2710                   struct elf_dyn_relocs **pp;
2711
2712                   for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2713                     if (p->pc_count == 0)
2714                       *pp = p->next;
2715                     else
2716                       {
2717                         /* Remove non-R_386_PC32 relocation.  */
2718                         p->count = p->pc_count;
2719                         pp = &p->next;
2720                       }
2721
2722                   if (eh->dyn_relocs != NULL)
2723                     {
2724                       /* Make sure undefined weak symbols are output
2725                          as dynamic symbols in PIEs for dynamic non-GOT
2726                          non-PLT reloations.  */
2727                       if (! bfd_elf_link_record_dynamic_symbol (info, h))
2728                         return FALSE;
2729                     }
2730                 }
2731               else
2732                 eh->dyn_relocs = NULL;
2733             }
2734           else if (h->dynindx == -1
2735                    && !h->forced_local)
2736             {
2737               if (! bfd_elf_link_record_dynamic_symbol (info, h))
2738                 return FALSE;
2739             }
2740         }
2741     }
2742   else if (ELIMINATE_COPY_RELOCS)
2743     {
2744       /* For the non-shared case, discard space for relocs against
2745          symbols which turn out to need copy relocs or are not
2746          dynamic.  Keep dynamic relocations for run-time function
2747          pointer initialization.  */
2748
2749       if ((!h->non_got_ref
2750            || eh->func_pointer_refcount > 0
2751            || (h->root.type == bfd_link_hash_undefweak
2752                && !resolved_to_zero))
2753           && ((h->def_dynamic
2754                && !h->def_regular)
2755               || (htab->elf.dynamic_sections_created
2756                   && (h->root.type == bfd_link_hash_undefweak
2757                       || h->root.type == bfd_link_hash_undefined))))
2758         {
2759           /* Make sure this symbol is output as a dynamic symbol.
2760              Undefined weak syms won't yet be marked as dynamic.  */
2761           if (h->dynindx == -1
2762               && !h->forced_local
2763               && !resolved_to_zero)
2764             {
2765               if (! bfd_elf_link_record_dynamic_symbol (info, h))
2766                 return FALSE;
2767             }
2768
2769           /* If that succeeded, we know we'll be keeping all the
2770              relocs.  */
2771           if (h->dynindx != -1)
2772             goto keep;
2773         }
2774
2775       eh->dyn_relocs = NULL;
2776       eh->func_pointer_refcount = 0;
2777
2778     keep: ;
2779     }
2780
2781   /* Finally, allocate space.  */
2782   for (p = eh->dyn_relocs; p != NULL; p = p->next)
2783     {
2784       asection *sreloc;
2785
2786       sreloc = elf_section_data (p->sec)->sreloc;
2787
2788       BFD_ASSERT (sreloc != NULL);
2789       sreloc->size += p->count * sizeof (Elf32_External_Rel);
2790     }
2791
2792   return TRUE;
2793 }
2794
2795 /* Allocate space in .plt, .got and associated reloc sections for
2796    local dynamic relocs.  */
2797
2798 static bfd_boolean
2799 elf_i386_allocate_local_dynrelocs (void **slot, void *inf)
2800 {
2801   struct elf_link_hash_entry *h
2802     = (struct elf_link_hash_entry *) *slot;
2803
2804   if (h->type != STT_GNU_IFUNC
2805       || !h->def_regular
2806       || !h->ref_regular
2807       || !h->forced_local
2808       || h->root.type != bfd_link_hash_defined)
2809     abort ();
2810
2811   return elf_i386_allocate_dynrelocs (h, inf);
2812 }
2813
2814 /* Find any dynamic relocs that apply to read-only sections.  */
2815
2816 static bfd_boolean
2817 elf_i386_readonly_dynrelocs (struct elf_link_hash_entry *h, void *inf)
2818 {
2819   struct elf_i386_link_hash_entry *eh;
2820   struct elf_dyn_relocs *p;
2821
2822   /* Skip local IFUNC symbols. */
2823   if (h->forced_local && h->type == STT_GNU_IFUNC)
2824     return TRUE;
2825
2826   eh = (struct elf_i386_link_hash_entry *) h;
2827   for (p = eh->dyn_relocs; p != NULL; p = p->next)
2828     {
2829       asection *s = p->sec->output_section;
2830
2831       if (s != NULL && (s->flags & SEC_READONLY) != 0)
2832         {
2833           struct bfd_link_info *info = (struct bfd_link_info *) inf;
2834
2835           info->flags |= DF_TEXTREL;
2836
2837           if ((info->warn_shared_textrel && bfd_link_pic (info))
2838               || info->error_textrel)
2839             info->callbacks->einfo (_("%P: %B: warning: relocation against `%s' in readonly section `%A'\n"),
2840                                     p->sec->owner, h->root.root.string,
2841                                     p->sec);
2842
2843           /* Not an error, just cut short the traversal.  */
2844           return FALSE;
2845         }
2846     }
2847   return TRUE;
2848 }
2849
2850 /* With the local symbol, foo, we convert
2851    mov foo@GOT[(%reg1)], %reg2
2852    to
2853    lea foo[@GOTOFF(%reg1)], %reg2
2854    and convert
2855    call/jmp *foo@GOT[(%reg)]
2856    to
2857    nop call foo/jmp foo nop
2858    When PIC is false, convert
2859    test %reg1, foo@GOT[(%reg2)]
2860    to
2861    test $foo, %reg1
2862    and convert
2863    binop foo@GOT[(%reg1)], %reg2
2864    to
2865    binop $foo, %reg2
2866    where binop is one of adc, add, and, cmp, or, sbb, sub, xor
2867    instructions.  */
2868
2869 static bfd_boolean
2870 elf_i386_convert_load (bfd *abfd, asection *sec,
2871                        struct bfd_link_info *link_info)
2872 {
2873   Elf_Internal_Shdr *symtab_hdr;
2874   Elf_Internal_Rela *internal_relocs;
2875   Elf_Internal_Rela *irel, *irelend;
2876   bfd_byte *contents;
2877   struct elf_i386_link_hash_table *htab;
2878   bfd_boolean changed_contents;
2879   bfd_boolean changed_relocs;
2880   bfd_boolean is_pic;
2881   bfd_signed_vma *local_got_refcounts;
2882
2883   /* Don't even try to convert non-ELF outputs.  */
2884   if (!is_elf_hash_table (link_info->hash))
2885     return FALSE;
2886
2887   /* Nothing to do if there is no need or no output.  */
2888   if ((sec->flags & (SEC_CODE | SEC_RELOC)) != (SEC_CODE | SEC_RELOC)
2889       || sec->need_convert_load == 0
2890       || bfd_is_abs_section (sec->output_section))
2891     return TRUE;
2892
2893   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2894
2895   /* Load the relocations for this section.  */
2896   internal_relocs = (_bfd_elf_link_read_relocs
2897                      (abfd, sec, NULL, (Elf_Internal_Rela *) NULL,
2898                       link_info->keep_memory));
2899   if (internal_relocs == NULL)
2900     return FALSE;
2901
2902   htab = elf_i386_hash_table (link_info);
2903   changed_contents = FALSE;
2904   changed_relocs = FALSE;
2905   local_got_refcounts = elf_local_got_refcounts (abfd);
2906
2907   is_pic = bfd_link_pic (link_info);
2908
2909   /* Get the section contents.  */
2910   if (elf_section_data (sec)->this_hdr.contents != NULL)
2911     contents = elf_section_data (sec)->this_hdr.contents;
2912   else
2913     {
2914       if (!bfd_malloc_and_get_section (abfd, sec, &contents))
2915         goto error_return;
2916     }
2917
2918   irelend = internal_relocs + sec->reloc_count;
2919   for (irel = internal_relocs; irel < irelend; irel++)
2920     {
2921       unsigned int r_type = ELF32_R_TYPE (irel->r_info);
2922       unsigned int r_symndx = ELF32_R_SYM (irel->r_info);
2923       unsigned int indx;
2924       struct elf_link_hash_entry *h;
2925       unsigned int opcode;
2926       unsigned int modrm;
2927       bfd_vma roff;
2928       bfd_boolean baseless;
2929       Elf_Internal_Sym *isym;
2930       unsigned int addend;
2931       unsigned int nop;
2932       bfd_vma nop_offset;
2933       bfd_boolean to_reloc_32;
2934
2935       if (r_type != R_386_GOT32 && r_type != R_386_GOT32X)
2936         continue;
2937
2938       roff = irel->r_offset;
2939       if (roff < 2)
2940         continue;
2941
2942       /* Addend for R_386_GOT32 and R_386_GOT32X relocations must be 0.  */
2943       addend = bfd_get_32 (abfd, contents + roff);
2944       if (addend != 0)
2945         continue;
2946
2947       modrm = bfd_get_8 (abfd, contents + roff - 1);
2948       baseless = (modrm & 0xc7) == 0x5;
2949
2950       if (r_type == R_386_GOT32X && baseless && is_pic)
2951         {
2952           /* For PIC, disallow R_386_GOT32X without a base register
2953              since we don't know what the GOT base is.   Allow
2954              R_386_GOT32 for existing object files.  */
2955           const char *name;
2956
2957           if (r_symndx < symtab_hdr->sh_info)
2958             {
2959               isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd,
2960                                             r_symndx);
2961               name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
2962             }
2963           else
2964             {
2965               indx = r_symndx - symtab_hdr->sh_info;
2966               h = elf_sym_hashes (abfd)[indx];
2967               BFD_ASSERT (h != NULL);
2968               name = h->root.root.string;
2969             }
2970
2971           (*_bfd_error_handler)
2972             (_("%B: direct GOT relocation R_386_GOT32X against `%s' without base register can not be used when making a shared object"),
2973              abfd, name);
2974           goto error_return;
2975         }
2976
2977       opcode = bfd_get_8 (abfd, contents + roff - 2);
2978
2979       /* Convert mov to lea since it has been done for a while.  */
2980       if (opcode != 0x8b)
2981         {
2982           /* Only convert R_386_GOT32X relocation for call, jmp or
2983              one of adc, add, and, cmp, or, sbb, sub, test, xor
2984              instructions.  */
2985           if (r_type != R_386_GOT32X)
2986             continue;
2987         }
2988
2989       /* Convert to R_386_32 if PIC is false or there is no base
2990          register.  */
2991       to_reloc_32 = !is_pic || baseless;
2992
2993       /* Try to convert R_386_GOT32 and R_386_GOT32X.  Get the symbol
2994          referred to by the reloc.  */
2995       if (r_symndx < symtab_hdr->sh_info)
2996         {
2997           isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2998                                         abfd, r_symndx);
2999
3000           /* STT_GNU_IFUNC must keep GOT32 relocations.  */
3001           if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
3002             continue;
3003
3004           h = NULL;
3005           if (opcode == 0x0ff)
3006             /* Convert "call/jmp *foo@GOT[(%reg)]".  */
3007             goto convert_branch;
3008           else
3009             /* Convert "mov foo@GOT[(%reg1)], %reg2",
3010                "test %reg1, foo@GOT(%reg2)" and
3011                "binop foo@GOT[(%reg1)], %reg2". */
3012             goto convert_load;
3013         }
3014
3015       indx = r_symndx - symtab_hdr->sh_info;
3016       h = elf_sym_hashes (abfd)[indx];
3017       BFD_ASSERT (h != NULL);
3018
3019       while (h->root.type == bfd_link_hash_indirect
3020              || h->root.type == bfd_link_hash_warning)
3021         h = (struct elf_link_hash_entry *) h->root.u.i.link;
3022
3023       /* STT_GNU_IFUNC must keep GOT32 relocations.  */
3024       if (h->type == STT_GNU_IFUNC)
3025         continue;
3026
3027       /* Undefined weak symbol is only bound locally in executable
3028          and its reference is resolved as 0.  */
3029       if (UNDEFINED_WEAK_RESOLVED_TO_ZERO (link_info,
3030                                            elf_i386_hash_entry (h)))
3031         {
3032           if (opcode == 0xff)
3033             {
3034               /* No direct branch to 0 for PIC.  */
3035               if (is_pic)
3036                 continue;
3037               else
3038                 goto convert_branch;
3039             }
3040           else
3041             {
3042               /* We can convert load of address 0 to R_386_32.  */
3043               to_reloc_32 = TRUE;
3044               goto convert_load;
3045             }
3046         }
3047
3048       if (opcode == 0xff)
3049         {
3050           /* We have "call/jmp *foo@GOT[(%reg)]".  */
3051           if ((h->root.type == bfd_link_hash_defined
3052                || h->root.type == bfd_link_hash_defweak)
3053               && SYMBOL_REFERENCES_LOCAL (link_info, h))
3054             {
3055               /* The function is locally defined.   */
3056 convert_branch:
3057               /* Convert R_386_GOT32X to R_386_PC32.  */
3058               if (modrm == 0x15 || (modrm & 0xf8) == 0x90)
3059                 {
3060                   /* Convert to "nop call foo".  ADDR_PREFIX_OPCODE
3061                      is a nop prefix.  */
3062                   modrm = 0xe8;
3063                   nop = link_info->call_nop_byte;
3064                   if (link_info->call_nop_as_suffix)
3065                     {
3066                       nop_offset = roff + 3;
3067                       irel->r_offset -= 1;
3068                     }
3069                   else
3070                     nop_offset = roff - 2;
3071                 }
3072               else
3073                 {
3074                   /* Convert to "jmp foo nop".  */
3075                   modrm = 0xe9;
3076                   nop = NOP_OPCODE;
3077                   nop_offset = roff + 3;
3078                   irel->r_offset -= 1;
3079                 }
3080
3081               bfd_put_8 (abfd, nop, contents + nop_offset);
3082               bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
3083               /* When converting to PC-relative relocation, we
3084                  need to adjust addend by -4.  */
3085               bfd_put_32 (abfd, -4, contents + irel->r_offset);
3086               irel->r_info = ELF32_R_INFO (r_symndx, R_386_PC32);
3087
3088               if (h)
3089                 {
3090                   if (h->got.refcount > 0)
3091                     h->got.refcount -= 1;
3092                 }
3093               else
3094                 {
3095                   if (local_got_refcounts != NULL
3096                       && local_got_refcounts[r_symndx] > 0)
3097                     local_got_refcounts[r_symndx] -= 1;
3098                 }
3099
3100               changed_contents = TRUE;
3101               changed_relocs = TRUE;
3102             }
3103         }
3104       else
3105         {
3106           /* We have "mov foo@GOT[(%re1g)], %reg2",
3107              "test %reg1, foo@GOT(%reg2)" and
3108              "binop foo@GOT[(%reg1)], %reg2".
3109
3110              Avoid optimizing _DYNAMIC since ld.so may use its
3111              link-time address.  */
3112           if (h == htab->elf.hdynamic)
3113             continue;
3114
3115           /* def_regular is set by an assignment in a linker script in
3116              bfd_elf_record_link_assignment.  */
3117           if ((h->def_regular
3118                || h->root.type == bfd_link_hash_defined
3119                || h->root.type == bfd_link_hash_defweak)
3120               && SYMBOL_REFERENCES_LOCAL (link_info, h))
3121             {
3122 convert_load:
3123               if (opcode == 0x8b)
3124                 {
3125                   if (to_reloc_32)
3126                     {
3127                       /* Convert "mov foo@GOT[(%reg1)], %reg2" to
3128                          "mov $foo, %reg2" with R_386_32.  */
3129                       r_type = R_386_32;
3130                       modrm = 0xc0 | (modrm & 0x38) >> 3;
3131                       bfd_put_8 (abfd, modrm, contents + roff - 1);
3132                       opcode = 0xc7;
3133                     }
3134                   else
3135                     {
3136                       /* Convert "mov foo@GOT(%reg1), %reg2" to
3137                          "lea foo@GOTOFF(%reg1), %reg2".  */
3138                       r_type = R_386_GOTOFF;
3139                       opcode = 0x8d;
3140                     }
3141                 }
3142               else
3143                 {
3144                   /* Only R_386_32 is supported.  */
3145                   if (!to_reloc_32)
3146                     continue;
3147
3148                   if (opcode == 0x85)
3149                     {
3150                       /* Convert "test %reg1, foo@GOT(%reg2)" to
3151                          "test $foo, %reg1".  */
3152                       modrm = 0xc0 | (modrm & 0x38) >> 3;
3153                       opcode = 0xf7;
3154                     }
3155                   else
3156                     {
3157                       /* Convert "binop foo@GOT(%reg1), %reg2" to
3158                          "binop $foo, %reg2".  */
3159                       modrm = (0xc0
3160                                | (modrm & 0x38) >> 3
3161                                | (opcode & 0x3c));
3162                       opcode = 0x81;
3163                     }
3164                   bfd_put_8 (abfd, modrm, contents + roff - 1);
3165                   r_type = R_386_32;
3166                 }
3167
3168               bfd_put_8 (abfd, opcode, contents + roff - 2);
3169               irel->r_info = ELF32_R_INFO (r_symndx, r_type);
3170
3171               if (h)
3172                 {
3173                   if (h->got.refcount > 0)
3174                     h->got.refcount -= 1;
3175                 }
3176               else
3177                 {
3178                   if (local_got_refcounts != NULL
3179                       && local_got_refcounts[r_symndx] > 0)
3180                     local_got_refcounts[r_symndx] -= 1;
3181                 }
3182
3183               changed_contents = TRUE;
3184               changed_relocs = TRUE;
3185             }
3186         }
3187     }
3188
3189   if (contents != NULL
3190       && elf_section_data (sec)->this_hdr.contents != contents)
3191     {
3192       if (!changed_contents && !link_info->keep_memory)
3193         free (contents);
3194       else
3195         {
3196           /* Cache the section contents for elf_link_input_bfd.  */
3197           elf_section_data (sec)->this_hdr.contents = contents;
3198         }
3199     }
3200
3201   if (elf_section_data (sec)->relocs != internal_relocs)
3202     {
3203       if (!changed_relocs)
3204         free (internal_relocs);
3205       else
3206         elf_section_data (sec)->relocs = internal_relocs;
3207     }
3208
3209   return TRUE;
3210
3211  error_return:
3212   if (contents != NULL
3213       && elf_section_data (sec)->this_hdr.contents != contents)
3214     free (contents);
3215   if (internal_relocs != NULL
3216       && elf_section_data (sec)->relocs != internal_relocs)
3217     free (internal_relocs);
3218   return FALSE;
3219 }
3220
3221 /* Set the sizes of the dynamic sections.  */
3222
3223 static bfd_boolean
3224 elf_i386_size_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
3225 {
3226   struct elf_i386_link_hash_table *htab;
3227   bfd *dynobj;
3228   asection *s;
3229   bfd_boolean relocs;
3230   bfd *ibfd;
3231
3232   htab = elf_i386_hash_table (info);
3233   if (htab == NULL)
3234     return FALSE;
3235   dynobj = htab->elf.dynobj;
3236   if (dynobj == NULL)
3237     abort ();
3238
3239   if (htab->elf.dynamic_sections_created)
3240     {
3241       /* Set the contents of the .interp section to the interpreter.  */
3242       if (bfd_link_executable (info) && !info->nointerp)
3243         {
3244           s = bfd_get_linker_section (dynobj, ".interp");
3245           if (s == NULL)
3246             abort ();
3247           s->size = sizeof ELF_DYNAMIC_INTERPRETER;
3248           s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
3249           htab->interp = s;
3250         }
3251     }
3252
3253   /* Set up .got offsets for local syms, and space for local dynamic
3254      relocs.  */
3255   for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
3256     {
3257       bfd_signed_vma *local_got;
3258       bfd_signed_vma *end_local_got;
3259       char *local_tls_type;
3260       bfd_vma *local_tlsdesc_gotent;
3261       bfd_size_type locsymcount;
3262       Elf_Internal_Shdr *symtab_hdr;
3263       asection *srel;
3264
3265       if (! is_i386_elf (ibfd))
3266         continue;
3267
3268       for (s = ibfd->sections; s != NULL; s = s->next)
3269         {
3270           struct elf_dyn_relocs *p;
3271
3272           if (!elf_i386_convert_load (ibfd, s, info))
3273             return FALSE;
3274
3275           for (p = ((struct elf_dyn_relocs *)
3276                      elf_section_data (s)->local_dynrel);
3277                p != NULL;
3278                p = p->next)
3279             {
3280               if (!bfd_is_abs_section (p->sec)
3281                   && bfd_is_abs_section (p->sec->output_section))
3282                 {
3283                   /* Input section has been discarded, either because
3284                      it is a copy of a linkonce section or due to
3285                      linker script /DISCARD/, so we'll be discarding
3286                      the relocs too.  */
3287                 }
3288               else if (get_elf_i386_backend_data (output_bfd)->is_vxworks
3289                        && strcmp (p->sec->output_section->name,
3290                                   ".tls_vars") == 0)
3291                 {
3292                   /* Relocations in vxworks .tls_vars sections are
3293                      handled specially by the loader.  */
3294                 }
3295               else if (p->count != 0)
3296                 {
3297                   srel = elf_section_data (p->sec)->sreloc;
3298                   srel->size += p->count * sizeof (Elf32_External_Rel);
3299                   if ((p->sec->output_section->flags & SEC_READONLY) != 0
3300                       && (info->flags & DF_TEXTREL) == 0)
3301                     {
3302                       info->flags |= DF_TEXTREL;
3303                       if ((info->warn_shared_textrel && bfd_link_pic (info))
3304                           || info->error_textrel)
3305                         info->callbacks->einfo (_("%P: %B: warning: relocation in readonly section `%A'\n"),
3306                                                 p->sec->owner, p->sec);
3307                     }
3308                 }
3309             }
3310         }
3311
3312       local_got = elf_local_got_refcounts (ibfd);
3313       if (!local_got)
3314         continue;
3315
3316       symtab_hdr = &elf_symtab_hdr (ibfd);
3317       locsymcount = symtab_hdr->sh_info;
3318       end_local_got = local_got + locsymcount;
3319       local_tls_type = elf_i386_local_got_tls_type (ibfd);
3320       local_tlsdesc_gotent = elf_i386_local_tlsdesc_gotent (ibfd);
3321       s = htab->elf.sgot;
3322       srel = htab->elf.srelgot;
3323       for (; local_got < end_local_got;
3324            ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
3325         {
3326           *local_tlsdesc_gotent = (bfd_vma) -1;
3327           if (*local_got > 0)
3328             {
3329               if (GOT_TLS_GDESC_P (*local_tls_type))
3330                 {
3331                   *local_tlsdesc_gotent = htab->elf.sgotplt->size
3332                     - elf_i386_compute_jump_table_size (htab);
3333                   htab->elf.sgotplt->size += 8;
3334                   *local_got = (bfd_vma) -2;
3335                 }
3336               if (! GOT_TLS_GDESC_P (*local_tls_type)
3337                   || GOT_TLS_GD_P (*local_tls_type))
3338                 {
3339                   *local_got = s->size;
3340                   s->size += 4;
3341                   if (GOT_TLS_GD_P (*local_tls_type)
3342                       || *local_tls_type == GOT_TLS_IE_BOTH)
3343                     s->size += 4;
3344                 }
3345               if (bfd_link_pic (info)
3346                   || GOT_TLS_GD_ANY_P (*local_tls_type)
3347                   || (*local_tls_type & GOT_TLS_IE))
3348                 {
3349                   if (*local_tls_type == GOT_TLS_IE_BOTH)
3350                     srel->size += 2 * sizeof (Elf32_External_Rel);
3351                   else if (GOT_TLS_GD_P (*local_tls_type)
3352                            || ! GOT_TLS_GDESC_P (*local_tls_type))
3353                     srel->size += sizeof (Elf32_External_Rel);
3354                   if (GOT_TLS_GDESC_P (*local_tls_type))
3355                     htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
3356                 }
3357             }
3358           else
3359             *local_got = (bfd_vma) -1;
3360         }
3361     }
3362
3363   if (htab->tls_ldm_got.refcount > 0)
3364     {
3365       /* Allocate 2 got entries and 1 dynamic reloc for R_386_TLS_LDM
3366          relocs.  */
3367       htab->tls_ldm_got.offset = htab->elf.sgot->size;
3368       htab->elf.sgot->size += 8;
3369       htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
3370     }
3371   else
3372     htab->tls_ldm_got.offset = -1;
3373
3374   /* Allocate global sym .plt and .got entries, and space for global
3375      sym dynamic relocs.  */
3376   elf_link_hash_traverse (&htab->elf, elf_i386_allocate_dynrelocs, info);
3377
3378   /* Allocate .plt and .got entries, and space for local symbols.  */
3379   htab_traverse (htab->loc_hash_table,
3380                  elf_i386_allocate_local_dynrelocs,
3381                  info);
3382
3383   /* For every jump slot reserved in the sgotplt, reloc_count is
3384      incremented.  However, when we reserve space for TLS descriptors,
3385      it's not incremented, so in order to compute the space reserved
3386      for them, it suffices to multiply the reloc count by the jump
3387      slot size.
3388
3389      PR ld/13302: We start next_irelative_index at the end of .rela.plt
3390      so that R_386_IRELATIVE entries come last.  */
3391   if (htab->elf.srelplt)
3392     {
3393       htab->next_tls_desc_index = htab->elf.srelplt->reloc_count;
3394       htab->sgotplt_jump_table_size = htab->next_tls_desc_index * 4;
3395       htab->next_irelative_index = htab->elf.srelplt->reloc_count - 1;
3396     }
3397   else if (htab->elf.irelplt)
3398     htab->next_irelative_index = htab->elf.irelplt->reloc_count - 1;
3399
3400
3401   if (htab->elf.sgotplt)
3402     {
3403       /* Don't allocate .got.plt section if there are no GOT nor PLT
3404          entries and there is no reference to _GLOBAL_OFFSET_TABLE_.  */
3405       if ((htab->elf.hgot == NULL
3406            || !htab->elf.hgot->ref_regular_nonweak)
3407           && (htab->elf.sgotplt->size
3408               == get_elf_backend_data (output_bfd)->got_header_size)
3409           && (htab->elf.splt == NULL
3410               || htab->elf.splt->size == 0)
3411           && (htab->elf.sgot == NULL
3412               || htab->elf.sgot->size == 0)
3413           && (htab->elf.iplt == NULL
3414               || htab->elf.iplt->size == 0)
3415           && (htab->elf.igotplt == NULL
3416               || htab->elf.igotplt->size == 0))
3417         htab->elf.sgotplt->size = 0;
3418     }
3419
3420
3421   if (htab->plt_eh_frame != NULL
3422       && htab->elf.splt != NULL
3423       && htab->elf.splt->size != 0
3424       && !bfd_is_abs_section (htab->elf.splt->output_section)
3425       && _bfd_elf_eh_frame_present (info))
3426     htab->plt_eh_frame->size = sizeof (elf_i386_eh_frame_plt);
3427
3428   /* We now have determined the sizes of the various dynamic sections.
3429      Allocate memory for them.  */
3430   relocs = FALSE;
3431   for (s = dynobj->sections; s != NULL; s = s->next)
3432     {
3433       bfd_boolean strip_section = TRUE;
3434
3435       if ((s->flags & SEC_LINKER_CREATED) == 0)
3436         continue;
3437
3438       if (s == htab->elf.splt
3439           || s == htab->elf.sgot)
3440         {
3441           /* Strip this section if we don't need it; see the
3442              comment below.  */
3443           /* We'd like to strip these sections if they aren't needed, but if
3444              we've exported dynamic symbols from them we must leave them.
3445              It's too late to tell BFD to get rid of the symbols.  */
3446
3447           if (htab->elf.hplt != NULL)
3448             strip_section = FALSE;
3449         }
3450       else if (s == htab->elf.sgotplt
3451                || s == htab->elf.iplt
3452                || s == htab->elf.igotplt
3453                || s == htab->plt_got
3454                || s == htab->plt_eh_frame
3455                || s == htab->sdynbss)
3456         {
3457           /* Strip these too.  */
3458         }
3459       else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rel"))
3460         {
3461           if (s->size != 0
3462               && s != htab->elf.srelplt
3463               && s != htab->srelplt2)
3464             relocs = TRUE;
3465
3466           /* We use the reloc_count field as a counter if we need
3467              to copy relocs into the output file.  */
3468           s->reloc_count = 0;
3469         }
3470       else
3471         {
3472           /* It's not one of our sections, so don't allocate space.  */
3473           continue;
3474         }
3475
3476       if (s->size == 0)
3477         {
3478           /* If we don't need this section, strip it from the
3479              output file.  This is mostly to handle .rel.bss and
3480              .rel.plt.  We must create both sections in
3481              create_dynamic_sections, because they must be created
3482              before the linker maps input sections to output
3483              sections.  The linker does that before
3484              adjust_dynamic_symbol is called, and it is that
3485              function which decides whether anything needs to go
3486              into these sections.  */
3487           if (strip_section)
3488             s->flags |= SEC_EXCLUDE;
3489           continue;
3490         }
3491
3492       if ((s->flags & SEC_HAS_CONTENTS) == 0)
3493         continue;
3494
3495       /* Allocate memory for the section contents.  We use bfd_zalloc
3496          here in case unused entries are not reclaimed before the
3497          section's contents are written out.  This should not happen,
3498          but this way if it does, we get a R_386_NONE reloc instead
3499          of garbage.  */
3500       s->contents = (unsigned char *) bfd_zalloc (dynobj, s->size);
3501       if (s->contents == NULL)
3502         return FALSE;
3503     }
3504
3505   if (htab->plt_eh_frame != NULL
3506       && htab->plt_eh_frame->contents != NULL)
3507     {
3508       memcpy (htab->plt_eh_frame->contents, elf_i386_eh_frame_plt,
3509               sizeof (elf_i386_eh_frame_plt));
3510       bfd_put_32 (dynobj, htab->elf.splt->size,
3511                   htab->plt_eh_frame->contents + PLT_FDE_LEN_OFFSET);
3512     }
3513
3514   if (htab->elf.dynamic_sections_created)
3515     {
3516       /* Add some entries to the .dynamic section.  We fill in the
3517          values later, in elf_i386_finish_dynamic_sections, but we
3518          must add the entries now so that we get the correct size for
3519          the .dynamic section.  The DT_DEBUG entry is filled in by the
3520          dynamic linker and used by the debugger.  */
3521 #define add_dynamic_entry(TAG, VAL) \
3522   _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3523
3524       if (bfd_link_executable (info))
3525         {
3526           if (!add_dynamic_entry (DT_DEBUG, 0))
3527             return FALSE;
3528         }
3529
3530       if (htab->elf.splt->size != 0)
3531         {
3532           /* DT_PLTGOT is used by prelink even if there is no PLT
3533              relocation.  */
3534           if (!add_dynamic_entry (DT_PLTGOT, 0))
3535             return FALSE;
3536
3537           if (htab->elf.srelplt->size != 0)
3538             {
3539               if (!add_dynamic_entry (DT_PLTRELSZ, 0)
3540                   || !add_dynamic_entry (DT_PLTREL, DT_REL)
3541                   || !add_dynamic_entry (DT_JMPREL, 0))
3542                 return FALSE;
3543             }
3544         }
3545
3546       if (relocs)
3547         {
3548           if (!add_dynamic_entry (DT_REL, 0)
3549               || !add_dynamic_entry (DT_RELSZ, 0)
3550               || !add_dynamic_entry (DT_RELENT, sizeof (Elf32_External_Rel)))
3551             return FALSE;
3552
3553           /* If any dynamic relocs apply to a read-only section,
3554              then we need a DT_TEXTREL entry.  */
3555           if ((info->flags & DF_TEXTREL) == 0)
3556             elf_link_hash_traverse (&htab->elf,
3557                                     elf_i386_readonly_dynrelocs, info);
3558
3559           if ((info->flags & DF_TEXTREL) != 0)
3560             {
3561               if (htab->readonly_dynrelocs_against_ifunc)
3562                 {
3563                   info->callbacks->einfo
3564                     (_("%P%X: read-only segment has dynamic IFUNC relocations; recompile with -fPIC\n"));
3565                   bfd_set_error (bfd_error_bad_value);
3566                   return FALSE;
3567                 }
3568
3569               if (!add_dynamic_entry (DT_TEXTREL, 0))
3570                 return FALSE;
3571             }
3572         }
3573       if (get_elf_i386_backend_data (output_bfd)->is_vxworks
3574           && !elf_vxworks_add_dynamic_entries (output_bfd, info))
3575         return FALSE;
3576     }
3577 #undef add_dynamic_entry
3578
3579   return TRUE;
3580 }
3581
3582 static bfd_boolean
3583 elf_i386_always_size_sections (bfd *output_bfd,
3584                                struct bfd_link_info *info)
3585 {
3586   asection *tls_sec = elf_hash_table (info)->tls_sec;
3587
3588   if (tls_sec)
3589     {
3590       struct elf_link_hash_entry *tlsbase;
3591
3592       tlsbase = elf_link_hash_lookup (elf_hash_table (info),
3593                                       "_TLS_MODULE_BASE_",
3594                                       FALSE, FALSE, FALSE);
3595
3596       if (tlsbase && tlsbase->type == STT_TLS)
3597         {
3598           struct elf_i386_link_hash_table *htab;
3599           struct bfd_link_hash_entry *bh = NULL;
3600           const struct elf_backend_data *bed
3601             = get_elf_backend_data (output_bfd);
3602
3603           htab = elf_i386_hash_table (info);
3604           if (htab == NULL)
3605             return FALSE;
3606
3607           if (!(_bfd_generic_link_add_one_symbol
3608                 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
3609                  tls_sec, 0, NULL, FALSE,
3610                  bed->collect, &bh)))
3611             return FALSE;
3612
3613           htab->tls_module_base = bh;
3614
3615           tlsbase = (struct elf_link_hash_entry *)bh;
3616           tlsbase->def_regular = 1;
3617           tlsbase->other = STV_HIDDEN;
3618           tlsbase->root.linker_def = 1;
3619           (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
3620         }
3621     }
3622
3623   return TRUE;
3624 }
3625
3626 /* Set the correct type for an x86 ELF section.  We do this by the
3627    section name, which is a hack, but ought to work.  */
3628
3629 static bfd_boolean
3630 elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
3631                         Elf_Internal_Shdr *hdr,
3632                         asection *sec)
3633 {
3634   const char *name;
3635
3636   name = bfd_get_section_name (abfd, sec);
3637
3638   /* This is an ugly, but unfortunately necessary hack that is
3639      needed when producing EFI binaries on x86. It tells
3640      elf.c:elf_fake_sections() not to consider ".reloc" as a section
3641      containing ELF relocation info.  We need this hack in order to
3642      be able to generate ELF binaries that can be translated into
3643      EFI applications (which are essentially COFF objects).  Those
3644      files contain a COFF ".reloc" section inside an ELFNN object,
3645      which would normally cause BFD to segfault because it would
3646      attempt to interpret this section as containing relocation
3647      entries for section "oc".  With this hack enabled, ".reloc"
3648      will be treated as a normal data section, which will avoid the
3649      segfault.  However, you won't be able to create an ELFNN binary
3650      with a section named "oc" that needs relocations, but that's
3651      the kind of ugly side-effects you get when detecting section
3652      types based on their names...  In practice, this limitation is
3653      unlikely to bite.  */
3654   if (strcmp (name, ".reloc") == 0)
3655     hdr->sh_type = SHT_PROGBITS;
3656
3657   return TRUE;
3658 }
3659
3660 /* _TLS_MODULE_BASE_ needs to be treated especially when linking
3661    executables.  Rather than setting it to the beginning of the TLS
3662    section, we have to set it to the end.    This function may be called
3663    multiple times, it is idempotent.  */
3664
3665 static void
3666 elf_i386_set_tls_module_base (struct bfd_link_info *info)
3667 {
3668   struct elf_i386_link_hash_table *htab;
3669   struct bfd_link_hash_entry *base;
3670
3671   if (!bfd_link_executable (info))
3672     return;
3673
3674   htab = elf_i386_hash_table (info);
3675   if (htab == NULL)
3676     return;
3677
3678   base = htab->tls_module_base;
3679   if (base == NULL)
3680     return;
3681
3682   base->u.def.value = htab->elf.tls_size;
3683 }
3684
3685 /* Return the base VMA address which should be subtracted from real addresses
3686    when resolving @dtpoff relocation.
3687    This is PT_TLS segment p_vaddr.  */
3688
3689 static bfd_vma
3690 elf_i386_dtpoff_base (struct bfd_link_info *info)
3691 {
3692   /* If tls_sec is NULL, we should have signalled an error already.  */
3693   if (elf_hash_table (info)->tls_sec == NULL)
3694     return 0;
3695   return elf_hash_table (info)->tls_sec->vma;
3696 }
3697
3698 /* Return the relocation value for @tpoff relocation
3699    if STT_TLS virtual address is ADDRESS.  */
3700
3701 static bfd_vma
3702 elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address)
3703 {
3704   struct elf_link_hash_table *htab = elf_hash_table (info);
3705   const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
3706   bfd_vma static_tls_size;
3707
3708   /* If tls_sec is NULL, we should have signalled an error already.  */
3709   if (htab->tls_sec == NULL)
3710     return 0;
3711
3712   /* Consider special static TLS alignment requirements.  */
3713   static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
3714   return static_tls_size + htab->tls_sec->vma - address;
3715 }
3716
3717 /* Relocate an i386 ELF section.  */
3718
3719 static bfd_boolean
3720 elf_i386_relocate_section (bfd *output_bfd,
3721                            struct bfd_link_info *info,
3722                            bfd *input_bfd,
3723                            asection *input_section,
3724                            bfd_byte *contents,
3725                            Elf_Internal_Rela *relocs,
3726                            Elf_Internal_Sym *local_syms,
3727                            asection **local_sections)
3728 {
3729   struct elf_i386_link_hash_table *htab;
3730   Elf_Internal_Shdr *symtab_hdr;
3731   struct elf_link_hash_entry **sym_hashes;
3732   bfd_vma *local_got_offsets;
3733   bfd_vma *local_tlsdesc_gotents;
3734   Elf_Internal_Rela *rel;
3735   Elf_Internal_Rela *wrel;
3736   Elf_Internal_Rela *relend;
3737   bfd_boolean is_vxworks_tls;
3738   unsigned plt_entry_size;
3739
3740   BFD_ASSERT (is_i386_elf (input_bfd));
3741
3742   htab = elf_i386_hash_table (info);
3743   if (htab == NULL)
3744     return FALSE;
3745   symtab_hdr = &elf_symtab_hdr (input_bfd);
3746   sym_hashes = elf_sym_hashes (input_bfd);
3747   local_got_offsets = elf_local_got_offsets (input_bfd);
3748   local_tlsdesc_gotents = elf_i386_local_tlsdesc_gotent (input_bfd);
3749   /* We have to handle relocations in vxworks .tls_vars sections
3750      specially, because the dynamic loader is 'weird'.  */
3751   is_vxworks_tls = (get_elf_i386_backend_data (output_bfd)->is_vxworks
3752                     && bfd_link_pic (info)
3753                     && !strcmp (input_section->output_section->name,
3754                                 ".tls_vars"));
3755
3756   elf_i386_set_tls_module_base (info);
3757
3758   plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd);
3759
3760   rel = wrel = relocs;
3761   relend = relocs + input_section->reloc_count;
3762   for (; rel < relend; wrel++, rel++)
3763     {
3764       unsigned int r_type;
3765       reloc_howto_type *howto;
3766       unsigned long r_symndx;
3767       struct elf_link_hash_entry *h;
3768       struct elf_i386_link_hash_entry *eh;
3769       Elf_Internal_Sym *sym;
3770       asection *sec;
3771       bfd_vma off, offplt, plt_offset;
3772       bfd_vma relocation;
3773       bfd_boolean unresolved_reloc;
3774       bfd_reloc_status_type r;
3775       unsigned int indx;
3776       int tls_type;
3777       bfd_vma st_size;
3778       asection *resolved_plt;
3779       bfd_boolean resolved_to_zero;
3780
3781       r_type = ELF32_R_TYPE (rel->r_info);
3782       if (r_type == R_386_GNU_VTINHERIT
3783           || r_type == R_386_GNU_VTENTRY)
3784         {
3785           if (wrel != rel)
3786             *wrel = *rel;
3787           continue;
3788         }
3789
3790       if ((indx = r_type) >= R_386_standard
3791           && ((indx = r_type - R_386_ext_offset) - R_386_standard
3792               >= R_386_ext - R_386_standard)
3793           && ((indx = r_type - R_386_tls_offset) - R_386_ext
3794               >= R_386_ext2 - R_386_ext))
3795         {
3796           (*_bfd_error_handler)
3797             (_("%B: unrecognized relocation (0x%x) in section `%A'"),
3798              input_bfd, input_section, r_type);
3799           bfd_set_error (bfd_error_bad_value);
3800           return FALSE;
3801         }
3802       howto = elf_howto_table + indx;
3803
3804       r_symndx = ELF32_R_SYM (rel->r_info);
3805       h = NULL;
3806       sym = NULL;
3807       sec = NULL;
3808       unresolved_reloc = FALSE;
3809       if (r_symndx < symtab_hdr->sh_info)
3810         {
3811           sym = local_syms + r_symndx;
3812           sec = local_sections[r_symndx];
3813           relocation = (sec->output_section->vma
3814                         + sec->output_offset
3815                         + sym->st_value);
3816           st_size = sym->st_size;
3817
3818           if (ELF_ST_TYPE (sym->st_info) == STT_SECTION
3819               && ((sec->flags & SEC_MERGE) != 0
3820                   || (bfd_link_relocatable (info)
3821                       && sec->output_offset != 0)))
3822             {
3823               bfd_vma addend;
3824               bfd_byte *where = contents + rel->r_offset;
3825
3826               switch (howto->size)
3827                 {
3828                 case 0:
3829                   addend = bfd_get_8 (input_bfd, where);
3830                   if (howto->pc_relative)
3831                     {
3832                       addend = (addend ^ 0x80) - 0x80;
3833                       addend += 1;
3834                     }
3835                   break;
3836                 case 1:
3837                   addend = bfd_get_16 (input_bfd, where);
3838                   if (howto->pc_relative)
3839                     {
3840                       addend = (addend ^ 0x8000) - 0x8000;
3841                       addend += 2;
3842                     }
3843                   break;
3844                 case 2:
3845                   addend = bfd_get_32 (input_bfd, where);
3846                   if (howto->pc_relative)
3847                     {
3848                       addend = (addend ^ 0x80000000) - 0x80000000;
3849                       addend += 4;
3850                     }
3851                   break;
3852                 default:
3853                   abort ();
3854                 }
3855
3856               if (bfd_link_relocatable (info))
3857                 addend += sec->output_offset;
3858               else
3859                 {
3860                   asection *msec = sec;
3861                   addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec,
3862                                                    addend);
3863                   addend -= relocation;
3864                   addend += msec->output_section->vma + msec->output_offset;
3865                 }
3866
3867               switch (howto->size)
3868                 {
3869                 case 0:
3870                   /* FIXME: overflow checks.  */
3871                   if (howto->pc_relative)
3872                     addend -= 1;
3873                   bfd_put_8 (input_bfd, addend, where);
3874                   break;
3875                 case 1:
3876                   if (howto->pc_relative)
3877                     addend -= 2;
3878                   bfd_put_16 (input_bfd, addend, where);
3879                   break;
3880                 case 2:
3881                   if (howto->pc_relative)
3882                     addend -= 4;
3883                   bfd_put_32 (input_bfd, addend, where);
3884                   break;
3885                 }
3886             }
3887           else if (!bfd_link_relocatable (info)
3888                    && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
3889             {
3890               /* Relocate against local STT_GNU_IFUNC symbol.  */
3891               h = elf_i386_get_local_sym_hash (htab, input_bfd, rel,
3892                                                FALSE);
3893               if (h == NULL)
3894                 abort ();
3895
3896               /* Set STT_GNU_IFUNC symbol value.  */
3897               h->root.u.def.value = sym->st_value;
3898               h->root.u.def.section = sec;
3899             }
3900         }
3901       else
3902         {
3903           bfd_boolean warned ATTRIBUTE_UNUSED;
3904           bfd_boolean ignored ATTRIBUTE_UNUSED;
3905
3906           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
3907                                    r_symndx, symtab_hdr, sym_hashes,
3908                                    h, sec, relocation,
3909                                    unresolved_reloc, warned, ignored);
3910           st_size = h->size;
3911         }
3912
3913       if (sec != NULL && discarded_section (sec))
3914         {
3915           _bfd_clear_contents (howto, input_bfd, input_section,
3916                                contents + rel->r_offset);
3917           wrel->r_offset = rel->r_offset;
3918           wrel->r_info = 0;
3919           wrel->r_addend = 0;
3920
3921           /* For ld -r, remove relocations in debug sections against
3922              sections defined in discarded sections.  Not done for
3923              eh_frame editing code expects to be present.  */
3924            if (bfd_link_relocatable (info)
3925                && (input_section->flags & SEC_DEBUGGING))
3926              wrel--;
3927
3928            continue;
3929         }
3930
3931       if (bfd_link_relocatable (info))
3932         {
3933           if (wrel != rel)
3934             *wrel = *rel;
3935           continue;
3936         }
3937
3938       /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
3939          it here if it is defined in a non-shared object.  */
3940       if (h != NULL
3941           && h->type == STT_GNU_IFUNC
3942           && h->def_regular)
3943         {
3944           asection *plt, *gotplt, *base_got;
3945           bfd_vma plt_index;
3946           const char *name;
3947
3948           if ((input_section->flags & SEC_ALLOC) == 0)
3949             {
3950               /* Dynamic relocs are not propagated for SEC_DEBUGGING
3951                  sections because such sections are not SEC_ALLOC and
3952                  thus ld.so will not process them.  */
3953               if ((input_section->flags & SEC_DEBUGGING) != 0)
3954                 continue;
3955               abort ();
3956             }
3957           else if (h->plt.offset == (bfd_vma) -1)
3958             abort ();
3959
3960           /* STT_GNU_IFUNC symbol must go through PLT.  */
3961           if (htab->elf.splt != NULL)
3962             {
3963               plt = htab->elf.splt;
3964               gotplt = htab->elf.sgotplt;
3965             }
3966           else
3967             {
3968               plt = htab->elf.iplt;
3969               gotplt = htab->elf.igotplt;
3970             }
3971
3972           relocation = (plt->output_section->vma
3973                         + plt->output_offset + h->plt.offset);
3974
3975           switch (r_type)
3976             {
3977             default:
3978               if (h->root.root.string)
3979                 name = h->root.root.string;
3980               else
3981                 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
3982                                          NULL);
3983               (*_bfd_error_handler)
3984                 (_("%B: relocation %s against STT_GNU_IFUNC "
3985                    "symbol `%s' isn't handled by %s"), input_bfd,
3986                  elf_howto_table[r_type].name,
3987                  name, __FUNCTION__);
3988               bfd_set_error (bfd_error_bad_value);
3989               return FALSE;
3990
3991             case R_386_32:
3992               /* Generate dynamic relcoation only when there is a
3993                  non-GOT reference in a shared object.  */
3994               if (bfd_link_pic (info) && h->non_got_ref)
3995                 {
3996                   Elf_Internal_Rela outrel;
3997                   asection *sreloc;
3998                   bfd_vma offset;
3999
4000                   /* Need a dynamic relocation to get the real function
4001                      adddress.  */
4002                   offset = _bfd_elf_section_offset (output_bfd,
4003                                                     info,
4004                                                     input_section,
4005                                                     rel->r_offset);
4006                   if (offset == (bfd_vma) -1
4007                       || offset == (bfd_vma) -2)
4008                     abort ();
4009
4010                   outrel.r_offset = (input_section->output_section->vma
4011                                      + input_section->output_offset
4012                                      + offset);
4013
4014                   if (h->dynindx == -1
4015                       || h->forced_local
4016                       || bfd_link_executable (info))
4017                     {
4018                       /* This symbol is resolved locally.  */
4019                       outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
4020                       bfd_put_32 (output_bfd,
4021                                   (h->root.u.def.value
4022                                    + h->root.u.def.section->output_section->vma
4023                                    + h->root.u.def.section->output_offset),
4024                                   contents + offset);
4025                     }
4026                   else
4027                     outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
4028
4029                   sreloc = htab->elf.irelifunc;
4030                   elf_append_rel (output_bfd, sreloc, &outrel);
4031
4032                   /* If this reloc is against an external symbol, we
4033                      do not want to fiddle with the addend.  Otherwise,
4034                      we need to include the symbol value so that it
4035                      becomes an addend for the dynamic reloc.  For an
4036                      internal symbol, we have updated addend.  */
4037                   continue;
4038                 }
4039               /* FALLTHROUGH */
4040             case R_386_PC32:
4041             case R_386_PLT32:
4042               goto do_relocation;
4043
4044             case R_386_GOT32:
4045             case R_386_GOT32X:
4046               base_got = htab->elf.sgot;
4047               off = h->got.offset;
4048
4049               if (base_got == NULL)
4050                 abort ();
4051
4052               if (off == (bfd_vma) -1)
4053                 {
4054                   /* We can't use h->got.offset here to save state, or
4055                      even just remember the offset, as finish_dynamic_symbol
4056                      would use that as offset into .got.  */
4057
4058                   if (htab->elf.splt != NULL)
4059                     {
4060                       plt_index = h->plt.offset / plt_entry_size - 1;
4061                       off = (plt_index + 3) * 4;
4062                       base_got = htab->elf.sgotplt;
4063                     }
4064                   else
4065                     {
4066                       plt_index = h->plt.offset / plt_entry_size;
4067                       off = plt_index * 4;
4068                       base_got = htab->elf.igotplt;
4069                     }
4070
4071                   if (h->dynindx == -1
4072                       || h->forced_local
4073                       || info->symbolic)
4074                     {
4075                       /* This references the local defitionion.  We must
4076                          initialize this entry in the global offset table.
4077                          Since the offset must always be a multiple of 8,
4078                          we use the least significant bit to record
4079                          whether we have initialized it already.
4080
4081                          When doing a dynamic link, we create a .rela.got
4082                          relocation entry to initialize the value.  This
4083                          is done in the finish_dynamic_symbol routine.   */
4084                       if ((off & 1) != 0)
4085                         off &= ~1;
4086                       else
4087                         {
4088                           bfd_put_32 (output_bfd, relocation,
4089                                       base_got->contents + off);
4090                           h->got.offset |= 1;
4091                         }
4092                     }
4093
4094                   relocation = off;
4095
4096                   /* Adjust for static executables.  */
4097                   if (htab->elf.splt == NULL)
4098                     relocation += gotplt->output_offset;
4099                 }
4100               else
4101                 {
4102                   relocation = (base_got->output_section->vma
4103                                 + base_got->output_offset + off
4104                                 - gotplt->output_section->vma
4105                                 - gotplt->output_offset);
4106                   /* Adjust for static executables.  */
4107                   if (htab->elf.splt == NULL)
4108                     relocation += gotplt->output_offset;
4109                 }
4110
4111               goto do_relocation;
4112
4113             case R_386_GOTOFF:
4114               relocation -= (gotplt->output_section->vma
4115                              + gotplt->output_offset);
4116               goto do_relocation;
4117             }
4118         }
4119
4120       eh = (struct elf_i386_link_hash_entry *) h;
4121       resolved_to_zero = (eh != NULL
4122                           && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
4123
4124       switch (r_type)
4125         {
4126         case R_386_GOT32X:
4127           /* Avoid optimizing _DYNAMIC since ld.so may use its
4128              link-time address.  */
4129           if (h == htab->elf.hdynamic)
4130             goto r_386_got32;
4131
4132           if (bfd_link_pic (info))
4133             {
4134               /* It is OK to convert mov to lea and convert indirect
4135                  branch to direct branch.  It is OK to convert adc,
4136                  add, and, cmp, or, sbb, sub, test, xor only when PIC
4137                  is false.   */
4138               unsigned int opcode, addend;
4139               addend = bfd_get_32 (input_bfd, contents + rel->r_offset);
4140               if (addend != 0)
4141                 goto r_386_got32;
4142               opcode = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
4143               if (opcode != 0x8b && opcode != 0xff)
4144                 goto r_386_got32;
4145             }
4146
4147           /* Resolve "mov GOT[(%reg)], %reg",
4148              "call/jmp *GOT[(%reg)]", "test %reg, foo@GOT[(%reg)]"
4149              and "binop foo@GOT[(%reg)], %reg".  */
4150           if (h == NULL
4151               || (h->plt.offset == (bfd_vma) -1
4152                   && h->got.offset == (bfd_vma) -1)
4153               || htab->elf.sgotplt == NULL)
4154             abort ();
4155
4156           offplt = (htab->elf.sgotplt->output_section->vma
4157                     + htab->elf.sgotplt->output_offset);
4158
4159           /* It is relative to .got.plt section.  */
4160           if (h->got.offset != (bfd_vma) -1)
4161             /* Use GOT entry.  Mask off the least significant bit in
4162                GOT offset which may be set by R_386_GOT32 processing
4163                below.  */
4164             relocation = (htab->elf.sgot->output_section->vma
4165                           + htab->elf.sgot->output_offset
4166                           + (h->got.offset & ~1) - offplt);
4167           else
4168             /* Use GOTPLT entry.  */
4169             relocation = (h->plt.offset / plt_entry_size - 1 + 3) * 4;
4170
4171           if (!bfd_link_pic (info))
4172             {
4173               /* If not PIC, add the .got.plt section address for
4174                  baseless addressing.  */
4175               unsigned int modrm;
4176               modrm = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
4177               if ((modrm & 0xc7) == 0x5)
4178                 relocation += offplt;
4179             }
4180
4181           unresolved_reloc = FALSE;
4182           break;
4183
4184         case R_386_GOT32:
4185 r_386_got32:
4186           /* Relocation is to the entry for this symbol in the global
4187              offset table.  */
4188           if (htab->elf.sgot == NULL)
4189             abort ();
4190
4191           if (h != NULL)
4192             {
4193               bfd_boolean dyn;
4194
4195               off = h->got.offset;
4196               dyn = htab->elf.dynamic_sections_created;
4197               if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
4198                                                      bfd_link_pic (info),
4199                                                      h)
4200                   || (bfd_link_pic (info)
4201                       && SYMBOL_REFERENCES_LOCAL (info, h))
4202                   || (ELF_ST_VISIBILITY (h->other)
4203                       && h->root.type == bfd_link_hash_undefweak))
4204                 {
4205                   /* This is actually a static link, or it is a
4206                      -Bsymbolic link and the symbol is defined
4207                      locally, or the symbol was forced to be local
4208                      because of a version file.  We must initialize
4209                      this entry in the global offset table.  Since the
4210                      offset must always be a multiple of 4, we use the
4211                      least significant bit to record whether we have
4212                      initialized it already.
4213
4214                      When doing a dynamic link, we create a .rel.got
4215                      relocation entry to initialize the value.  This
4216                      is done in the finish_dynamic_symbol routine.  */
4217                   if ((off & 1) != 0)
4218                     off &= ~1;
4219                   else
4220                     {
4221                       bfd_put_32 (output_bfd, relocation,
4222                                   htab->elf.sgot->contents + off);
4223                       h->got.offset |= 1;
4224                     }
4225                 }
4226               else
4227                 unresolved_reloc = FALSE;
4228             }
4229           else
4230             {
4231               if (local_got_offsets == NULL)
4232                 abort ();
4233
4234               off = local_got_offsets[r_symndx];
4235
4236               /* The offset must always be a multiple of 4.  We use
4237                  the least significant bit to record whether we have
4238                  already generated the necessary reloc.  */
4239               if ((off & 1) != 0)
4240                 off &= ~1;
4241               else
4242                 {
4243                   bfd_put_32 (output_bfd, relocation,
4244                               htab->elf.sgot->contents + off);
4245
4246                   if (bfd_link_pic (info))
4247                     {
4248                       asection *s;
4249                       Elf_Internal_Rela outrel;
4250
4251                       s = htab->elf.srelgot;
4252                       if (s == NULL)
4253                         abort ();
4254
4255                       outrel.r_offset = (htab->elf.sgot->output_section->vma
4256                                          + htab->elf.sgot->output_offset
4257                                          + off);
4258                       outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
4259                       elf_append_rel (output_bfd, s, &outrel);
4260                     }
4261
4262                   local_got_offsets[r_symndx] |= 1;
4263                 }
4264             }
4265
4266           if (off >= (bfd_vma) -2)
4267             abort ();
4268
4269           relocation = htab->elf.sgot->output_section->vma
4270                        + htab->elf.sgot->output_offset + off
4271                        - htab->elf.sgotplt->output_section->vma
4272                        - htab->elf.sgotplt->output_offset;
4273           break;
4274
4275         case R_386_GOTOFF:
4276           /* Relocation is relative to the start of the global offset
4277              table.  */
4278
4279           /* Check to make sure it isn't a protected function or data
4280              symbol for shared library since it may not be local when
4281              used as function address or with copy relocation.  We also
4282              need to make sure that a symbol is referenced locally.  */
4283           if (!bfd_link_executable (info) && h)
4284             {
4285               if (!h->def_regular)
4286                 {
4287                   const char *v;
4288
4289                   switch (ELF_ST_VISIBILITY (h->other))
4290                     {
4291                     case STV_HIDDEN:
4292                       v = _("hidden symbol");
4293                       break;
4294                     case STV_INTERNAL:
4295                       v = _("internal symbol");
4296                       break;
4297                     case STV_PROTECTED:
4298                       v = _("protected symbol");
4299                       break;
4300                     default:
4301                       v = _("symbol");
4302                       break;
4303                     }
4304
4305                   (*_bfd_error_handler)
4306                     (_("%B: relocation R_386_GOTOFF against undefined %s `%s' can not be used when making a shared object"),
4307                      input_bfd, v, h->root.root.string);
4308                   bfd_set_error (bfd_error_bad_value);
4309                   return FALSE;
4310                 }
4311               else if (!SYMBOL_REFERENCES_LOCAL (info, h)
4312                        && (h->type == STT_FUNC
4313                            || h->type == STT_OBJECT)
4314                        && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
4315                 {
4316                   (*_bfd_error_handler)
4317                     (_("%B: relocation R_386_GOTOFF against protected %s `%s' can not be used when making a shared object"),
4318                      input_bfd,
4319                      h->type == STT_FUNC ? "function" : "data",
4320                      h->root.root.string);
4321                   bfd_set_error (bfd_error_bad_value);
4322                   return FALSE;
4323                 }
4324             }
4325
4326           /* Note that sgot is not involved in this
4327              calculation.  We always want the start of .got.plt.  If we
4328              defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
4329              permitted by the ABI, we might have to change this
4330              calculation.  */
4331           relocation -= htab->elf.sgotplt->output_section->vma
4332                         + htab->elf.sgotplt->output_offset;
4333           break;
4334
4335         case R_386_GOTPC:
4336           /* Use global offset table as symbol value.  */
4337           relocation = htab->elf.sgotplt->output_section->vma
4338                        + htab->elf.sgotplt->output_offset;
4339           unresolved_reloc = FALSE;
4340           break;
4341
4342         case R_386_PLT32:
4343           /* Relocation is to the entry for this symbol in the
4344              procedure linkage table.  */
4345
4346           /* Resolve a PLT32 reloc against a local symbol directly,
4347              without using the procedure linkage table.  */
4348           if (h == NULL)
4349             break;
4350
4351           if ((h->plt.offset == (bfd_vma) -1
4352                && eh->plt_got.offset == (bfd_vma) -1)
4353               || htab->elf.splt == NULL)
4354             {
4355               /* We didn't make a PLT entry for this symbol.  This
4356                  happens when statically linking PIC code, or when
4357                  using -Bsymbolic.  */
4358               break;
4359             }
4360
4361           if (h->plt.offset != (bfd_vma) -1)
4362             {
4363               resolved_plt = htab->elf.splt;
4364               plt_offset = h->plt.offset;
4365             }
4366           else
4367             {
4368               resolved_plt = htab->plt_got;
4369               plt_offset = eh->plt_got.offset;
4370             }
4371
4372           relocation = (resolved_plt->output_section->vma
4373                         + resolved_plt->output_offset
4374                         + plt_offset);
4375           unresolved_reloc = FALSE;
4376           break;
4377
4378         case R_386_SIZE32:
4379           /* Set to symbol size.  */
4380           relocation = st_size;
4381           /* Fall through.  */
4382
4383         case R_386_32:
4384         case R_386_PC32:
4385           if ((input_section->flags & SEC_ALLOC) == 0
4386               || is_vxworks_tls)
4387             break;
4388
4389           /* Copy dynamic function pointer relocations.  Don't generate
4390              dynamic relocations against resolved undefined weak symbols
4391              in PIE, except for R_386_PC32.  */
4392           if ((bfd_link_pic (info)
4393                && (h == NULL
4394                    || ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4395                         && (!resolved_to_zero
4396                             || r_type == R_386_PC32))
4397                        || h->root.type != bfd_link_hash_undefweak))
4398                && ((r_type != R_386_PC32 && r_type != R_386_SIZE32)
4399                    || !SYMBOL_CALLS_LOCAL (info, h)))
4400               || (ELIMINATE_COPY_RELOCS
4401                   && !bfd_link_pic (info)
4402                   && h != NULL
4403                   && h->dynindx != -1
4404                   && (!h->non_got_ref
4405                       || eh->func_pointer_refcount > 0
4406                       || (h->root.type == bfd_link_hash_undefweak
4407                           && !resolved_to_zero))
4408                   && ((h->def_dynamic && !h->def_regular)
4409                       /* Undefined weak symbol is bound locally when
4410                          PIC is false.  */
4411                       || h->root.type == bfd_link_hash_undefweak)))
4412             {
4413               Elf_Internal_Rela outrel;
4414               bfd_boolean skip, relocate;
4415               asection *sreloc;
4416
4417               /* When generating a shared object, these relocations
4418                  are copied into the output file to be resolved at run
4419                  time.  */
4420
4421               skip = FALSE;
4422               relocate = FALSE;
4423
4424               outrel.r_offset =
4425                 _bfd_elf_section_offset (output_bfd, info, input_section,
4426                                          rel->r_offset);
4427               if (outrel.r_offset == (bfd_vma) -1)
4428                 skip = TRUE;
4429               else if (outrel.r_offset == (bfd_vma) -2)
4430                 skip = TRUE, relocate = TRUE;
4431               outrel.r_offset += (input_section->output_section->vma
4432                                   + input_section->output_offset);
4433
4434               if (skip)
4435                 memset (&outrel, 0, sizeof outrel);
4436               else if (h != NULL
4437                        && h->dynindx != -1
4438                        && (r_type == R_386_PC32
4439                            || !(bfd_link_executable (info)
4440                                 || SYMBOLIC_BIND (info, h))
4441                            || !h->def_regular))
4442                 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
4443               else
4444                 {
4445                   /* This symbol is local, or marked to become local.  */
4446                   relocate = TRUE;
4447                   outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
4448                 }
4449
4450               sreloc = elf_section_data (input_section)->sreloc;
4451
4452               if (sreloc == NULL || sreloc->contents == NULL)
4453                 {
4454                   r = bfd_reloc_notsupported;
4455                   goto check_relocation_error;
4456                 }
4457
4458               elf_append_rel (output_bfd, sreloc, &outrel);
4459
4460               /* If this reloc is against an external symbol, we do
4461                  not want to fiddle with the addend.  Otherwise, we
4462                  need to include the symbol value so that it becomes
4463                  an addend for the dynamic reloc.  */
4464               if (! relocate)
4465                 continue;
4466             }
4467           break;
4468
4469         case R_386_TLS_IE:
4470           if (!bfd_link_executable (info))
4471             {
4472               Elf_Internal_Rela outrel;
4473               asection *sreloc;
4474
4475               outrel.r_offset = rel->r_offset
4476                                 + input_section->output_section->vma
4477                                 + input_section->output_offset;
4478               outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
4479               sreloc = elf_section_data (input_section)->sreloc;
4480               if (sreloc == NULL)
4481                 abort ();
4482               elf_append_rel (output_bfd, sreloc, &outrel);
4483             }
4484           /* Fall through */
4485
4486         case R_386_TLS_GD:
4487         case R_386_TLS_GOTDESC:
4488         case R_386_TLS_DESC_CALL:
4489         case R_386_TLS_IE_32:
4490         case R_386_TLS_GOTIE:
4491           tls_type = GOT_UNKNOWN;
4492           if (h == NULL && local_got_offsets)
4493             tls_type = elf_i386_local_got_tls_type (input_bfd) [r_symndx];
4494           else if (h != NULL)
4495             tls_type = elf_i386_hash_entry(h)->tls_type;
4496           if (tls_type == GOT_TLS_IE)
4497             tls_type = GOT_TLS_IE_NEG;
4498
4499           if (! elf_i386_tls_transition (info, input_bfd,
4500                                          input_section, contents,
4501                                          symtab_hdr, sym_hashes,
4502                                          &r_type, tls_type, rel,
4503                                          relend, h, r_symndx))
4504             return FALSE;
4505
4506           if (r_type == R_386_TLS_LE_32)
4507             {
4508               BFD_ASSERT (! unresolved_reloc);
4509               if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
4510                 {
4511                   unsigned int type;
4512                   bfd_vma roff;
4513
4514                   /* GD->LE transition.  */
4515                   type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
4516                   if (type == 0x04)
4517                     {
4518                       /* leal foo(,%reg,1), %eax; call ___tls_get_addr
4519                          Change it into:
4520                          movl %gs:0, %eax; subl $foo@tpoff, %eax
4521                          (6 byte form of subl).  */
4522                       memcpy (contents + rel->r_offset - 3,
4523                               "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
4524                       roff = rel->r_offset + 5;
4525                     }
4526                   else
4527                     {
4528                       /* leal foo(%reg), %eax; call ___tls_get_addr; nop
4529                          Change it into:
4530                          movl %gs:0, %eax; subl $foo@tpoff, %eax
4531                          (6 byte form of subl).  */
4532                       memcpy (contents + rel->r_offset - 2,
4533                               "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
4534                       roff = rel->r_offset + 6;
4535                     }
4536                   bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
4537                               contents + roff);
4538                   /* Skip R_386_PC32/R_386_PLT32.  */
4539                   rel++;
4540                   wrel++;
4541                   continue;
4542                 }
4543               else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
4544                 {
4545                   /* GDesc -> LE transition.
4546                      It's originally something like:
4547                      leal x@tlsdesc(%ebx), %eax
4548
4549                      leal x@ntpoff, %eax
4550
4551                      Registers other than %eax may be set up here.  */
4552
4553                   unsigned int val;
4554                   bfd_vma roff;
4555
4556                   roff = rel->r_offset;
4557                   val = bfd_get_8 (input_bfd, contents + roff - 1);
4558
4559                   /* Now modify the instruction as appropriate.  */
4560                   /* aoliva FIXME: remove the above and xor the byte
4561                      below with 0x86.  */
4562                   bfd_put_8 (output_bfd, val ^ 0x86,
4563                              contents + roff - 1);
4564                   bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
4565                               contents + roff);
4566                   continue;
4567                 }
4568               else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
4569                 {
4570                   /* GDesc -> LE transition.
4571                      It's originally:
4572                      call *(%eax)
4573                      Turn it into:
4574                      xchg %ax,%ax  */
4575
4576                   bfd_vma roff;
4577
4578                   roff = rel->r_offset;
4579                   bfd_put_8 (output_bfd, 0x66, contents + roff);
4580                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
4581                   continue;
4582                 }
4583               else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_IE)
4584                 {
4585                   unsigned int val;
4586
4587                   /* IE->LE transition:
4588                      Originally it can be one of:
4589                      movl foo, %eax
4590                      movl foo, %reg
4591                      addl foo, %reg
4592                      We change it into:
4593                      movl $foo, %eax
4594                      movl $foo, %reg
4595                      addl $foo, %reg.  */
4596                   val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
4597                   if (val == 0xa1)
4598                     {
4599                       /* movl foo, %eax.  */
4600                       bfd_put_8 (output_bfd, 0xb8,
4601                                  contents + rel->r_offset - 1);
4602                     }
4603                   else
4604                     {
4605                       unsigned int type;
4606
4607                       type = bfd_get_8 (input_bfd,
4608                                         contents + rel->r_offset - 2);
4609                       switch (type)
4610                         {
4611                         case 0x8b:
4612                           /* movl */
4613                           bfd_put_8 (output_bfd, 0xc7,
4614                                      contents + rel->r_offset - 2);
4615                           bfd_put_8 (output_bfd,
4616                                      0xc0 | ((val >> 3) & 7),
4617                                      contents + rel->r_offset - 1);
4618                           break;
4619                         case 0x03:
4620                           /* addl */
4621                           bfd_put_8 (output_bfd, 0x81,
4622                                      contents + rel->r_offset - 2);
4623                           bfd_put_8 (output_bfd,
4624                                      0xc0 | ((val >> 3) & 7),
4625                                      contents + rel->r_offset - 1);
4626                           break;
4627                         default:
4628                           BFD_FAIL ();
4629                           break;
4630                         }
4631                     }
4632                   bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
4633                               contents + rel->r_offset);
4634                   continue;
4635                 }
4636               else
4637                 {
4638                   unsigned int val, type;
4639
4640                   /* {IE_32,GOTIE}->LE transition:
4641                      Originally it can be one of:
4642                      subl foo(%reg1), %reg2
4643                      movl foo(%reg1), %reg2
4644                      addl foo(%reg1), %reg2
4645                      We change it into:
4646                      subl $foo, %reg2
4647                      movl $foo, %reg2 (6 byte form)
4648                      addl $foo, %reg2.  */
4649                   type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
4650                   val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
4651                   if (type == 0x8b)
4652                     {
4653                       /* movl */
4654                       bfd_put_8 (output_bfd, 0xc7,
4655                                  contents + rel->r_offset - 2);
4656                       bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
4657                                  contents + rel->r_offset - 1);
4658                     }
4659                   else if (type == 0x2b)
4660                     {
4661                       /* subl */
4662                       bfd_put_8 (output_bfd, 0x81,
4663                                  contents + rel->r_offset - 2);
4664                       bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7),
4665                                  contents + rel->r_offset - 1);
4666                     }
4667                   else if (type == 0x03)
4668                     {
4669                       /* addl */
4670                       bfd_put_8 (output_bfd, 0x81,
4671                                  contents + rel->r_offset - 2);
4672                       bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
4673                                  contents + rel->r_offset - 1);
4674                     }
4675                   else
4676                     BFD_FAIL ();
4677                   if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTIE)
4678                     bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
4679                                 contents + rel->r_offset);
4680                   else
4681                     bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
4682                                 contents + rel->r_offset);
4683                   continue;
4684                 }
4685             }
4686
4687           if (htab->elf.sgot == NULL)
4688             abort ();
4689
4690           if (h != NULL)
4691             {
4692               off = h->got.offset;
4693               offplt = elf_i386_hash_entry (h)->tlsdesc_got;
4694             }
4695           else
4696             {
4697               if (local_got_offsets == NULL)
4698                 abort ();
4699
4700               off = local_got_offsets[r_symndx];
4701               offplt = local_tlsdesc_gotents[r_symndx];
4702             }
4703
4704           if ((off & 1) != 0)
4705             off &= ~1;
4706           else
4707             {
4708               Elf_Internal_Rela outrel;
4709               int dr_type;
4710               asection *sreloc;
4711
4712               if (htab->elf.srelgot == NULL)
4713                 abort ();
4714
4715               indx = h && h->dynindx != -1 ? h->dynindx : 0;
4716
4717               if (GOT_TLS_GDESC_P (tls_type))
4718                 {
4719                   bfd_byte *loc;
4720                   outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC);
4721                   BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8
4722                               <= htab->elf.sgotplt->size);
4723                   outrel.r_offset = (htab->elf.sgotplt->output_section->vma
4724                                      + htab->elf.sgotplt->output_offset
4725                                      + offplt
4726                                      + htab->sgotplt_jump_table_size);
4727                   sreloc = htab->elf.srelplt;
4728                   loc = sreloc->contents;
4729                   loc += (htab->next_tls_desc_index++
4730                           * sizeof (Elf32_External_Rel));
4731                   BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
4732                               <= sreloc->contents + sreloc->size);
4733                   bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
4734                   if (indx == 0)
4735                     {
4736                       BFD_ASSERT (! unresolved_reloc);
4737                       bfd_put_32 (output_bfd,
4738                                   relocation - elf_i386_dtpoff_base (info),
4739                                   htab->elf.sgotplt->contents + offplt
4740                                   + htab->sgotplt_jump_table_size + 4);
4741                     }
4742                   else
4743                     {
4744                       bfd_put_32 (output_bfd, 0,
4745                                   htab->elf.sgotplt->contents + offplt
4746                                   + htab->sgotplt_jump_table_size + 4);
4747                     }
4748                 }
4749
4750               sreloc = htab->elf.srelgot;
4751
4752               outrel.r_offset = (htab->elf.sgot->output_section->vma
4753                                  + htab->elf.sgot->output_offset + off);
4754
4755               if (GOT_TLS_GD_P (tls_type))
4756                 dr_type = R_386_TLS_DTPMOD32;
4757               else if (GOT_TLS_GDESC_P (tls_type))
4758                 goto dr_done;
4759               else if (tls_type == GOT_TLS_IE_POS)
4760                 dr_type = R_386_TLS_TPOFF;
4761               else
4762                 dr_type = R_386_TLS_TPOFF32;
4763
4764               if (dr_type == R_386_TLS_TPOFF && indx == 0)
4765                 bfd_put_32 (output_bfd,
4766                             relocation - elf_i386_dtpoff_base (info),
4767                             htab->elf.sgot->contents + off);
4768               else if (dr_type == R_386_TLS_TPOFF32 && indx == 0)
4769                 bfd_put_32 (output_bfd,
4770                             elf_i386_dtpoff_base (info) - relocation,
4771                             htab->elf.sgot->contents + off);
4772               else if (dr_type != R_386_TLS_DESC)
4773                 bfd_put_32 (output_bfd, 0,
4774                             htab->elf.sgot->contents + off);
4775               outrel.r_info = ELF32_R_INFO (indx, dr_type);
4776
4777               elf_append_rel (output_bfd, sreloc, &outrel);
4778
4779               if (GOT_TLS_GD_P (tls_type))
4780                 {
4781                   if (indx == 0)
4782                     {
4783                       BFD_ASSERT (! unresolved_reloc);
4784                       bfd_put_32 (output_bfd,
4785                                   relocation - elf_i386_dtpoff_base (info),
4786                                   htab->elf.sgot->contents + off + 4);
4787                     }
4788                   else
4789                     {
4790                       bfd_put_32 (output_bfd, 0,
4791                                   htab->elf.sgot->contents + off + 4);
4792                       outrel.r_info = ELF32_R_INFO (indx,
4793                                                     R_386_TLS_DTPOFF32);
4794                       outrel.r_offset += 4;
4795                       elf_append_rel (output_bfd, sreloc, &outrel);
4796                     }
4797                 }
4798               else if (tls_type == GOT_TLS_IE_BOTH)
4799                 {
4800                   bfd_put_32 (output_bfd,
4801                               (indx == 0
4802                                ? relocation - elf_i386_dtpoff_base (info)
4803                                : 0),
4804                               htab->elf.sgot->contents + off + 4);
4805                   outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
4806                   outrel.r_offset += 4;
4807                   elf_append_rel (output_bfd, sreloc, &outrel);
4808                 }
4809
4810             dr_done:
4811               if (h != NULL)
4812                 h->got.offset |= 1;
4813               else
4814                 local_got_offsets[r_symndx] |= 1;
4815             }
4816
4817           if (off >= (bfd_vma) -2
4818               && ! GOT_TLS_GDESC_P (tls_type))
4819             abort ();
4820           if (r_type == R_386_TLS_GOTDESC
4821               || r_type == R_386_TLS_DESC_CALL)
4822             {
4823               relocation = htab->sgotplt_jump_table_size + offplt;
4824               unresolved_reloc = FALSE;
4825             }
4826           else if (r_type == ELF32_R_TYPE (rel->r_info))
4827             {
4828               bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma
4829                               + htab->elf.sgotplt->output_offset;
4830               relocation = htab->elf.sgot->output_section->vma
4831                 + htab->elf.sgot->output_offset + off - g_o_t;
4832               if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE)
4833                   && tls_type == GOT_TLS_IE_BOTH)
4834                 relocation += 4;
4835               if (r_type == R_386_TLS_IE)
4836                 relocation += g_o_t;
4837               unresolved_reloc = FALSE;
4838             }
4839           else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
4840             {
4841               unsigned int val, type;
4842               bfd_vma roff;
4843
4844               /* GD->IE transition.  */
4845               type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
4846               val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
4847               if (type == 0x04)
4848                 {
4849                   /* leal foo(,%reg,1), %eax; call ___tls_get_addr
4850                      Change it into:
4851                      movl %gs:0, %eax; subl $foo@gottpoff(%reg), %eax.  */
4852                   val >>= 3;
4853                   roff = rel->r_offset - 3;
4854                 }
4855               else
4856                 {
4857                   /* leal foo(%reg), %eax; call ___tls_get_addr; nop
4858                      Change it into:
4859                      movl %gs:0, %eax; subl $foo@gottpoff(%reg), %eax.  */
4860                   roff = rel->r_offset - 2;
4861                 }
4862               memcpy (contents + roff,
4863                       "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12);
4864               contents[roff + 7] = 0x80 | (val & 7);
4865               /* If foo is used only with foo@gotntpoff(%reg) and
4866                  foo@indntpoff, but not with foo@gottpoff(%reg), change
4867                  subl $foo@gottpoff(%reg), %eax
4868                  into:
4869                  addl $foo@gotntpoff(%reg), %eax.  */
4870               if (tls_type == GOT_TLS_IE_POS)
4871                 contents[roff + 6] = 0x03;
4872               bfd_put_32 (output_bfd,
4873                           htab->elf.sgot->output_section->vma
4874                           + htab->elf.sgot->output_offset + off
4875                           - htab->elf.sgotplt->output_section->vma
4876                           - htab->elf.sgotplt->output_offset,
4877                           contents + roff + 8);
4878               /* Skip R_386_PLT32.  */
4879               rel++;
4880               wrel++;
4881               continue;
4882             }
4883           else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
4884             {
4885               /* GDesc -> IE transition.
4886                  It's originally something like:
4887                  leal x@tlsdesc(%ebx), %eax
4888
4889                  Change it to:
4890                  movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax
4891                  or:
4892                  movl x@gottpoff(%ebx), %eax # before negl %eax
4893
4894                  Registers other than %eax may be set up here.  */
4895
4896               bfd_vma roff;
4897
4898               /* First, make sure it's a leal adding ebx to a 32-bit
4899                  offset into any register, although it's probably
4900                  almost always going to be eax.  */
4901               roff = rel->r_offset;
4902
4903               /* Now modify the instruction as appropriate.  */
4904               /* To turn a leal into a movl in the form we use it, it
4905                  suffices to change the first byte from 0x8d to 0x8b.
4906                  aoliva FIXME: should we decide to keep the leal, all
4907                  we have to do is remove the statement below, and
4908                  adjust the relaxation of R_386_TLS_DESC_CALL.  */
4909               bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
4910
4911               if (tls_type == GOT_TLS_IE_BOTH)
4912                 off += 4;
4913
4914               bfd_put_32 (output_bfd,
4915                           htab->elf.sgot->output_section->vma
4916                           + htab->elf.sgot->output_offset + off
4917                           - htab->elf.sgotplt->output_section->vma
4918                           - htab->elf.sgotplt->output_offset,
4919                           contents + roff);
4920               continue;
4921             }
4922           else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
4923             {
4924               /* GDesc -> IE transition.
4925                  It's originally:
4926                  call *(%eax)
4927
4928                  Change it to:
4929                  xchg %ax,%ax
4930                  or
4931                  negl %eax
4932                  depending on how we transformed the TLS_GOTDESC above.
4933               */
4934
4935               bfd_vma roff;
4936
4937               roff = rel->r_offset;
4938
4939               /* Now modify the instruction as appropriate.  */
4940               if (tls_type != GOT_TLS_IE_NEG)
4941                 {
4942                   /* xchg %ax,%ax */
4943                   bfd_put_8 (output_bfd, 0x66, contents + roff);
4944                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
4945                 }
4946               else
4947                 {
4948                   /* negl %eax */
4949                   bfd_put_8 (output_bfd, 0xf7, contents + roff);
4950                   bfd_put_8 (output_bfd, 0xd8, contents + roff + 1);
4951                 }
4952
4953               continue;
4954             }
4955           else
4956             BFD_ASSERT (FALSE);
4957           break;
4958
4959         case R_386_TLS_LDM:
4960           if (! elf_i386_tls_transition (info, input_bfd,
4961                                          input_section, contents,
4962                                          symtab_hdr, sym_hashes,
4963                                          &r_type, GOT_UNKNOWN, rel,
4964                                          relend, h, r_symndx))
4965             return FALSE;
4966
4967           if (r_type != R_386_TLS_LDM)
4968             {
4969               /* LD->LE transition:
4970                  leal foo(%reg), %eax; call ___tls_get_addr.
4971                  We change it into:
4972                  movl %gs:0, %eax; nop; leal 0(%esi,1), %esi.  */
4973               BFD_ASSERT (r_type == R_386_TLS_LE_32);
4974               memcpy (contents + rel->r_offset - 2,
4975                       "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11);
4976               /* Skip R_386_PC32/R_386_PLT32.  */
4977               rel++;
4978               wrel++;
4979               continue;
4980             }
4981
4982           if (htab->elf.sgot == NULL)
4983             abort ();
4984
4985           off = htab->tls_ldm_got.offset;
4986           if (off & 1)
4987             off &= ~1;
4988           else
4989             {
4990               Elf_Internal_Rela outrel;
4991
4992               if (htab->elf.srelgot == NULL)
4993                 abort ();
4994
4995               outrel.r_offset = (htab->elf.sgot->output_section->vma
4996                                  + htab->elf.sgot->output_offset + off);
4997
4998               bfd_put_32 (output_bfd, 0,
4999                           htab->elf.sgot->contents + off);
5000               bfd_put_32 (output_bfd, 0,
5001                           htab->elf.sgot->contents + off + 4);
5002               outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32);
5003               elf_append_rel (output_bfd, htab->elf.srelgot, &outrel);
5004               htab->tls_ldm_got.offset |= 1;
5005             }
5006           relocation = htab->elf.sgot->output_section->vma
5007                        + htab->elf.sgot->output_offset + off
5008                        - htab->elf.sgotplt->output_section->vma
5009                        - htab->elf.sgotplt->output_offset;
5010           unresolved_reloc = FALSE;
5011           break;
5012
5013         case R_386_TLS_LDO_32:
5014           if (!bfd_link_executable (info)
5015               || (input_section->flags & SEC_CODE) == 0)
5016             relocation -= elf_i386_dtpoff_base (info);
5017           else
5018             /* When converting LDO to LE, we must negate.  */
5019             relocation = -elf_i386_tpoff (info, relocation);
5020           break;
5021
5022         case R_386_TLS_LE_32:
5023         case R_386_TLS_LE:
5024           if (!bfd_link_executable (info))
5025             {
5026               Elf_Internal_Rela outrel;
5027               asection *sreloc;
5028
5029               outrel.r_offset = rel->r_offset
5030                                 + input_section->output_section->vma
5031                                 + input_section->output_offset;
5032               if (h != NULL && h->dynindx != -1)
5033                 indx = h->dynindx;
5034               else
5035                 indx = 0;
5036               if (r_type == R_386_TLS_LE_32)
5037                 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32);
5038               else
5039                 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
5040               sreloc = elf_section_data (input_section)->sreloc;
5041               if (sreloc == NULL)
5042                 abort ();
5043               elf_append_rel (output_bfd, sreloc, &outrel);
5044               if (indx)
5045                 continue;
5046               else if (r_type == R_386_TLS_LE_32)
5047                 relocation = elf_i386_dtpoff_base (info) - relocation;
5048               else
5049                 relocation -= elf_i386_dtpoff_base (info);
5050             }
5051           else if (r_type == R_386_TLS_LE_32)
5052             relocation = elf_i386_tpoff (info, relocation);
5053           else
5054             relocation = -elf_i386_tpoff (info, relocation);
5055           break;
5056
5057         default:
5058           break;
5059         }
5060
5061       /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
5062          because such sections are not SEC_ALLOC and thus ld.so will
5063          not process them.  */
5064       if (unresolved_reloc
5065           && !((input_section->flags & SEC_DEBUGGING) != 0
5066                && h->def_dynamic)
5067           && _bfd_elf_section_offset (output_bfd, info, input_section,
5068                                       rel->r_offset) != (bfd_vma) -1)
5069         {
5070           (*_bfd_error_handler)
5071             (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
5072              input_bfd,
5073              input_section,
5074              (long) rel->r_offset,
5075              howto->name,
5076              h->root.root.string);
5077           return FALSE;
5078         }
5079
5080 do_relocation:
5081       r = _bfd_final_link_relocate (howto, input_bfd, input_section,
5082                                     contents, rel->r_offset,
5083                                     relocation, 0);
5084
5085 check_relocation_error:
5086       if (r != bfd_reloc_ok)
5087         {
5088           const char *name;
5089
5090           if (h != NULL)
5091             name = h->root.root.string;
5092           else
5093             {
5094               name = bfd_elf_string_from_elf_section (input_bfd,
5095                                                       symtab_hdr->sh_link,
5096                                                       sym->st_name);
5097               if (name == NULL)
5098                 return FALSE;
5099               if (*name == '\0')
5100                 name = bfd_section_name (input_bfd, sec);
5101             }
5102
5103           if (r == bfd_reloc_overflow)
5104             {
5105               if (! ((*info->callbacks->reloc_overflow)
5106                      (info, (h ? &h->root : NULL), name, howto->name,
5107                       (bfd_vma) 0, input_bfd, input_section,
5108                       rel->r_offset)))
5109                 return FALSE;
5110             }
5111           else
5112             {
5113               (*_bfd_error_handler)
5114                 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
5115                  input_bfd, input_section,
5116                  (long) rel->r_offset, name, (int) r);
5117               return FALSE;
5118             }
5119         }
5120
5121       if (wrel != rel)
5122         *wrel = *rel;
5123     }
5124
5125   if (wrel != rel)
5126     {
5127       Elf_Internal_Shdr *rel_hdr;
5128       size_t deleted = rel - wrel;
5129
5130       rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
5131       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5132       if (rel_hdr->sh_size == 0)
5133         {
5134           /* It is too late to remove an empty reloc section.  Leave
5135              one NONE reloc.
5136              ??? What is wrong with an empty section???  */
5137           rel_hdr->sh_size = rel_hdr->sh_entsize;
5138           deleted -= 1;
5139         }
5140       rel_hdr = _bfd_elf_single_rel_hdr (input_section);
5141       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5142       input_section->reloc_count -= deleted;
5143     }
5144
5145   return TRUE;
5146 }
5147
5148 /* Finish up dynamic symbol handling.  We set the contents of various
5149    dynamic sections here.  */
5150
5151 static bfd_boolean
5152 elf_i386_finish_dynamic_symbol (bfd *output_bfd,
5153                                 struct bfd_link_info *info,
5154                                 struct elf_link_hash_entry *h,
5155                                 Elf_Internal_Sym *sym)
5156 {
5157   struct elf_i386_link_hash_table *htab;
5158   unsigned plt_entry_size;
5159   const struct elf_i386_backend_data *abed;
5160   struct elf_i386_link_hash_entry *eh;
5161   bfd_boolean local_undefweak;
5162
5163   htab = elf_i386_hash_table (info);
5164   if (htab == NULL)
5165     return FALSE;
5166
5167   abed = get_elf_i386_backend_data (output_bfd);
5168   plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd);
5169
5170   eh = (struct elf_i386_link_hash_entry *) h;
5171
5172   /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
5173      resolved undefined weak symbols in executable so that their
5174      references have value 0 at run-time.  */
5175   local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
5176
5177   if (h->plt.offset != (bfd_vma) -1)
5178     {
5179       bfd_vma plt_index;
5180       bfd_vma got_offset;
5181       Elf_Internal_Rela rel;
5182       bfd_byte *loc;
5183       asection *plt, *gotplt, *relplt;
5184
5185       /* When building a static executable, use .iplt, .igot.plt and
5186          .rel.iplt sections for STT_GNU_IFUNC symbols.  */
5187       if (htab->elf.splt != NULL)
5188         {
5189           plt = htab->elf.splt;
5190           gotplt = htab->elf.sgotplt;
5191           relplt = htab->elf.srelplt;
5192         }
5193       else
5194         {
5195           plt = htab->elf.iplt;
5196           gotplt = htab->elf.igotplt;
5197           relplt = htab->elf.irelplt;
5198         }
5199
5200       /* This symbol has an entry in the procedure linkage table.  Set
5201          it up.  */
5202
5203       if ((h->dynindx == -1
5204            && !local_undefweak
5205            && !((h->forced_local || bfd_link_executable (info))
5206                 && h->def_regular
5207                 && h->type == STT_GNU_IFUNC))
5208           || plt == NULL
5209           || gotplt == NULL
5210           || relplt == NULL)
5211         abort ();
5212
5213       /* Get the index in the procedure linkage table which
5214          corresponds to this symbol.  This is the index of this symbol
5215          in all the symbols for which we are making plt entries.  The
5216          first entry in the procedure linkage table is reserved.
5217
5218          Get the offset into the .got table of the entry that
5219          corresponds to this function.  Each .got entry is 4 bytes.
5220          The first three are reserved.
5221
5222          For static executables, we don't reserve anything.  */
5223
5224       if (plt == htab->elf.splt)
5225         {
5226           got_offset = h->plt.offset / plt_entry_size - 1;
5227           got_offset = (got_offset + 3) * 4;
5228         }
5229       else
5230         {
5231           got_offset = h->plt.offset / plt_entry_size;
5232           got_offset = got_offset * 4;
5233         }
5234
5235       /* Fill in the entry in the procedure linkage table.  */
5236       if (! bfd_link_pic (info))
5237         {
5238           memcpy (plt->contents + h->plt.offset, abed->plt->plt_entry,
5239                   abed->plt->plt_entry_size);
5240           bfd_put_32 (output_bfd,
5241                       (gotplt->output_section->vma
5242                        + gotplt->output_offset
5243                        + got_offset),
5244                       plt->contents + h->plt.offset
5245                       + abed->plt->plt_got_offset);
5246
5247           if (abed->is_vxworks)
5248             {
5249               int s, k, reloc_index;
5250
5251               /* Create the R_386_32 relocation referencing the GOT
5252                  for this PLT entry.  */
5253
5254               /* S: Current slot number (zero-based).  */
5255               s = ((h->plt.offset - abed->plt->plt_entry_size)
5256                    / abed->plt->plt_entry_size);
5257               /* K: Number of relocations for PLTResolve. */
5258               if (bfd_link_pic (info))
5259                 k = PLTRESOLVE_RELOCS_SHLIB;
5260               else
5261                 k = PLTRESOLVE_RELOCS;
5262               /* Skip the PLTresolve relocations, and the relocations for
5263                  the other PLT slots. */
5264               reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS;
5265               loc = (htab->srelplt2->contents + reloc_index
5266                      * sizeof (Elf32_External_Rel));
5267
5268               rel.r_offset = (htab->elf.splt->output_section->vma
5269                               + htab->elf.splt->output_offset
5270                               + h->plt.offset + 2),
5271               rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
5272               bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
5273
5274               /* Create the R_386_32 relocation referencing the beginning of
5275                  the PLT for this GOT entry.  */
5276               rel.r_offset = (htab->elf.sgotplt->output_section->vma
5277                               + htab->elf.sgotplt->output_offset
5278                               + got_offset);
5279               rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
5280               bfd_elf32_swap_reloc_out (output_bfd, &rel,
5281                                         loc + sizeof (Elf32_External_Rel));
5282             }
5283         }
5284       else
5285         {
5286           memcpy (plt->contents + h->plt.offset, abed->plt->pic_plt_entry,
5287                   abed->plt->plt_entry_size);
5288           bfd_put_32 (output_bfd, got_offset,
5289                       plt->contents + h->plt.offset
5290                       + abed->plt->plt_got_offset);
5291         }
5292
5293       /* Fill in the entry in the global offset table.  Leave the entry
5294          as zero for undefined weak symbol in PIE.  No PLT relocation
5295          against undefined weak symbol in PIE.  */
5296       if (!local_undefweak)
5297         {
5298           bfd_put_32 (output_bfd,
5299                       (plt->output_section->vma
5300                        + plt->output_offset
5301                        + h->plt.offset
5302                        + abed->plt->plt_lazy_offset),
5303                       gotplt->contents + got_offset);
5304
5305           /* Fill in the entry in the .rel.plt section.  */
5306           rel.r_offset = (gotplt->output_section->vma
5307                           + gotplt->output_offset
5308                           + got_offset);
5309           if (h->dynindx == -1
5310               || ((bfd_link_executable (info)
5311                    || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
5312                   && h->def_regular
5313                   && h->type == STT_GNU_IFUNC))
5314             {
5315               /* If an STT_GNU_IFUNC symbol is locally defined, generate
5316                  R_386_IRELATIVE instead of R_386_JUMP_SLOT.  Store addend
5317                  in the .got.plt section.  */
5318               bfd_put_32 (output_bfd,
5319                           (h->root.u.def.value
5320                            + h->root.u.def.section->output_section->vma
5321                            + h->root.u.def.section->output_offset),
5322                           gotplt->contents + got_offset);
5323               rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
5324               /* R_386_IRELATIVE comes last.  */
5325               plt_index = htab->next_irelative_index--;
5326             }
5327           else
5328             {
5329               rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
5330               plt_index = htab->next_jump_slot_index++;
5331             }
5332
5333           loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel);
5334           bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
5335
5336           /* Don't fill PLT entry for static executables.  */
5337           if (plt == htab->elf.splt)
5338             {
5339               bfd_put_32 (output_bfd,
5340                           plt_index * sizeof (Elf32_External_Rel),
5341                           plt->contents + h->plt.offset
5342                           + abed->plt->plt_reloc_offset);
5343               bfd_put_32 (output_bfd, - (h->plt.offset
5344                                          + abed->plt->plt_plt_offset + 4),
5345                           plt->contents + h->plt.offset
5346                           + abed->plt->plt_plt_offset);
5347             }
5348         }
5349     }
5350   else if (eh->plt_got.offset != (bfd_vma) -1)
5351     {
5352       bfd_vma got_offset, plt_offset;
5353       asection *plt, *got, *gotplt;
5354       const bfd_byte *got_plt_entry;
5355
5356       /* Offset of displacement of the indirect jump.  */
5357       bfd_vma plt_got_offset = 2;
5358
5359       /* Set the entry in the GOT procedure linkage table.  */
5360       plt = htab->plt_got;
5361       got = htab->elf.sgot;
5362       gotplt = htab->elf.sgotplt;
5363       got_offset = h->got.offset;
5364
5365       if (got_offset == (bfd_vma) -1
5366           || plt == NULL
5367           || got == NULL
5368           || gotplt == NULL)
5369         abort ();
5370
5371       /* Fill in the entry in the GOT procedure linkage table.  */
5372       if (! bfd_link_pic (info))
5373         {
5374           got_plt_entry = elf_i386_got_plt_entry;
5375           got_offset += got->output_section->vma + got->output_offset;
5376         }
5377       else
5378         {
5379           got_plt_entry = elf_i386_pic_got_plt_entry;
5380           got_offset += (got->output_section->vma
5381                          + got->output_offset
5382                          - gotplt->output_section->vma
5383                          - gotplt->output_offset);
5384         }
5385
5386       plt_offset = eh->plt_got.offset;
5387       memcpy (plt->contents + plt_offset, got_plt_entry,
5388               sizeof (elf_i386_got_plt_entry));
5389       bfd_put_32 (output_bfd, got_offset,
5390                   plt->contents + plt_offset + plt_got_offset);
5391     }
5392
5393   if (!local_undefweak
5394       && !h->def_regular
5395       && (h->plt.offset != (bfd_vma) -1
5396           || eh->plt_got.offset != (bfd_vma) -1))
5397     {
5398       /* Mark the symbol as undefined, rather than as defined in
5399          the .plt section.  Leave the value if there were any
5400          relocations where pointer equality matters (this is a clue
5401          for the dynamic linker, to make function pointer
5402          comparisons work between an application and shared
5403          library), otherwise set it to zero.  If a function is only
5404          called from a binary, there is no need to slow down
5405          shared libraries because of that.  */
5406       sym->st_shndx = SHN_UNDEF;
5407       if (!h->pointer_equality_needed)
5408         sym->st_value = 0;
5409     }
5410
5411   /* Don't generate dynamic GOT relocation against undefined weak
5412      symbol in executable.  */
5413   if (h->got.offset != (bfd_vma) -1
5414       && ! GOT_TLS_GD_ANY_P (elf_i386_hash_entry(h)->tls_type)
5415       && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE) == 0
5416       && !local_undefweak)
5417     {
5418       Elf_Internal_Rela rel;
5419
5420       /* This symbol has an entry in the global offset table.  Set it
5421          up.  */
5422
5423       if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
5424         abort ();
5425
5426       rel.r_offset = (htab->elf.sgot->output_section->vma
5427                       + htab->elf.sgot->output_offset
5428                       + (h->got.offset & ~(bfd_vma) 1));
5429
5430       /* If this is a static link, or it is a -Bsymbolic link and the
5431          symbol is defined locally or was forced to be local because
5432          of a version file, we just want to emit a RELATIVE reloc.
5433          The entry in the global offset table will already have been
5434          initialized in the relocate_section function.  */
5435       if (h->def_regular
5436           && h->type == STT_GNU_IFUNC)
5437         {
5438           if (bfd_link_pic (info))
5439             {
5440               /* Generate R_386_GLOB_DAT.  */
5441               goto do_glob_dat;
5442             }
5443           else
5444             {
5445               asection *plt;
5446
5447               if (!h->pointer_equality_needed)
5448                 abort ();
5449
5450               /* For non-shared object, we can't use .got.plt, which
5451                  contains the real function addres if we need pointer
5452                  equality.  We load the GOT entry with the PLT entry.  */
5453               plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
5454               bfd_put_32 (output_bfd,
5455                           (plt->output_section->vma
5456                            + plt->output_offset + h->plt.offset),
5457                           htab->elf.sgot->contents + h->got.offset);
5458               return TRUE;
5459             }
5460         }
5461       else if (bfd_link_pic (info)
5462                && SYMBOL_REFERENCES_LOCAL (info, h))
5463         {
5464           BFD_ASSERT((h->got.offset & 1) != 0);
5465           rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
5466         }
5467       else
5468         {
5469           BFD_ASSERT((h->got.offset & 1) == 0);
5470 do_glob_dat:
5471           bfd_put_32 (output_bfd, (bfd_vma) 0,
5472                       htab->elf.sgot->contents + h->got.offset);
5473           rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
5474         }
5475
5476       elf_append_rel (output_bfd, htab->elf.srelgot, &rel);
5477     }
5478
5479   if (h->needs_copy)
5480     {
5481       Elf_Internal_Rela rel;
5482
5483       /* This symbol needs a copy reloc.  Set it up.  */
5484
5485       if (h->dynindx == -1
5486           || (h->root.type != bfd_link_hash_defined
5487               && h->root.type != bfd_link_hash_defweak)
5488           || htab->srelbss == NULL)
5489         abort ();
5490
5491       rel.r_offset = (h->root.u.def.value
5492                       + h->root.u.def.section->output_section->vma
5493                       + h->root.u.def.section->output_offset);
5494       rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
5495       elf_append_rel (output_bfd, htab->srelbss, &rel);
5496     }
5497
5498   return TRUE;
5499 }
5500
5501 /* Finish up local dynamic symbol handling.  We set the contents of
5502    various dynamic sections here.  */
5503
5504 static bfd_boolean
5505 elf_i386_finish_local_dynamic_symbol (void **slot, void *inf)
5506 {
5507   struct elf_link_hash_entry *h
5508     = (struct elf_link_hash_entry *) *slot;
5509   struct bfd_link_info *info
5510     = (struct bfd_link_info *) inf;
5511
5512   return elf_i386_finish_dynamic_symbol (info->output_bfd, info,
5513                                          h, NULL);
5514 }
5515
5516 /* Finish up undefined weak symbol handling in PIE.  Fill its PLT entry
5517    here since undefined weak symbol may not be dynamic and may not be
5518    called for elf_i386_finish_dynamic_symbol.  */
5519
5520 static bfd_boolean
5521 elf_i386_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
5522                                       void *inf)
5523 {
5524   struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
5525   struct bfd_link_info *info = (struct bfd_link_info *) inf;
5526
5527   if (h->root.type != bfd_link_hash_undefweak
5528       || h->dynindx != -1)
5529     return TRUE;
5530
5531   return elf_i386_finish_dynamic_symbol (info->output_bfd,
5532                                              info, h, NULL);
5533 }
5534
5535 /* Used to decide how to sort relocs in an optimal manner for the
5536    dynamic linker, before writing them out.  */
5537
5538 static enum elf_reloc_type_class
5539 elf_i386_reloc_type_class (const struct bfd_link_info *info,
5540                            const asection *rel_sec ATTRIBUTE_UNUSED,
5541                            const Elf_Internal_Rela *rela)
5542 {
5543   bfd *abfd = info->output_bfd;
5544   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
5545   struct elf_link_hash_table *htab = elf_hash_table (info);
5546
5547   if (htab->dynsym != NULL
5548       && htab->dynsym->contents != NULL)
5549     {
5550       /* Check relocation against STT_GNU_IFUNC symbol if there are
5551          dynamic symbols.  */
5552       unsigned long r_symndx = ELF32_R_SYM (rela->r_info);
5553       Elf_Internal_Sym sym;
5554       if (!bed->s->swap_symbol_in (abfd,
5555                                    (htab->dynsym->contents
5556                                     + r_symndx * sizeof (Elf32_External_Sym)),
5557                                    0, &sym))
5558         abort ();
5559
5560       if (ELF32_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
5561         return reloc_class_ifunc;
5562     }
5563
5564   switch (ELF32_R_TYPE (rela->r_info))
5565     {
5566     case R_386_RELATIVE:
5567       return reloc_class_relative;
5568     case R_386_JUMP_SLOT:
5569       return reloc_class_plt;
5570     case R_386_COPY:
5571       return reloc_class_copy;
5572     default:
5573       return reloc_class_normal;
5574     }
5575 }
5576
5577 /* Finish up the dynamic sections.  */
5578
5579 static bfd_boolean
5580 elf_i386_finish_dynamic_sections (bfd *output_bfd,
5581                                   struct bfd_link_info *info)
5582 {
5583   struct elf_i386_link_hash_table *htab;
5584   bfd *dynobj;
5585   asection *sdyn;
5586   const struct elf_i386_backend_data *abed;
5587
5588   htab = elf_i386_hash_table (info);
5589   if (htab == NULL)
5590     return FALSE;
5591
5592   dynobj = htab->elf.dynobj;
5593   sdyn = bfd_get_linker_section (dynobj, ".dynamic");
5594   abed = get_elf_i386_backend_data (output_bfd);
5595
5596   if (htab->elf.dynamic_sections_created)
5597     {
5598       Elf32_External_Dyn *dyncon, *dynconend;
5599
5600       if (sdyn == NULL || htab->elf.sgot == NULL)
5601         abort ();
5602
5603       dyncon = (Elf32_External_Dyn *) sdyn->contents;
5604       dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
5605       for (; dyncon < dynconend; dyncon++)
5606         {
5607           Elf_Internal_Dyn dyn;
5608           asection *s;
5609
5610           bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
5611
5612           switch (dyn.d_tag)
5613             {
5614             default:
5615               if (abed->is_vxworks
5616                   && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
5617                 break;
5618               continue;
5619
5620             case DT_PLTGOT:
5621               s = htab->elf.sgotplt;
5622               dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
5623               break;
5624
5625             case DT_JMPREL:
5626               s = htab->elf.srelplt;
5627               dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
5628               break;
5629
5630             case DT_PLTRELSZ:
5631               s = htab->elf.srelplt;
5632               dyn.d_un.d_val = s->size;
5633               break;
5634
5635             case DT_RELSZ:
5636               /* My reading of the SVR4 ABI indicates that the
5637                  procedure linkage table relocs (DT_JMPREL) should be
5638                  included in the overall relocs (DT_REL).  This is
5639                  what Solaris does.  However, UnixWare can not handle
5640                  that case.  Therefore, we override the DT_RELSZ entry
5641                  here to make it not include the JMPREL relocs.  */
5642               s = htab->elf.srelplt;
5643               if (s == NULL)
5644                 continue;
5645               dyn.d_un.d_val -= s->size;
5646               break;
5647
5648             case DT_REL:
5649               /* We may not be using the standard ELF linker script.
5650                  If .rel.plt is the first .rel section, we adjust
5651                  DT_REL to not include it.  */
5652               s = htab->elf.srelplt;
5653               if (s == NULL)
5654                 continue;
5655               if (dyn.d_un.d_ptr != s->output_section->vma + s->output_offset)
5656                 continue;
5657               dyn.d_un.d_ptr += s->size;
5658               break;
5659             }
5660
5661           bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
5662         }
5663
5664       /* Fill in the first entry in the procedure linkage table.  */
5665       if (htab->elf.splt && htab->elf.splt->size > 0)
5666         {
5667           if (bfd_link_pic (info))
5668             {
5669               memcpy (htab->elf.splt->contents, abed->plt->pic_plt0_entry,
5670                       abed->plt->plt0_entry_size);
5671               memset (htab->elf.splt->contents + abed->plt->plt0_entry_size,
5672                       abed->plt0_pad_byte,
5673                       abed->plt->plt_entry_size - abed->plt->plt0_entry_size);
5674             }
5675           else
5676             {
5677               memcpy (htab->elf.splt->contents, abed->plt->plt0_entry,
5678                       abed->plt->plt0_entry_size);
5679               memset (htab->elf.splt->contents + abed->plt->plt0_entry_size,
5680                       abed->plt0_pad_byte,
5681                       abed->plt->plt_entry_size - abed->plt->plt0_entry_size);
5682               bfd_put_32 (output_bfd,
5683                           (htab->elf.sgotplt->output_section->vma
5684                            + htab->elf.sgotplt->output_offset
5685                            + 4),
5686                           htab->elf.splt->contents
5687                           + abed->plt->plt0_got1_offset);
5688               bfd_put_32 (output_bfd,
5689                           (htab->elf.sgotplt->output_section->vma
5690                            + htab->elf.sgotplt->output_offset
5691                            + 8),
5692                           htab->elf.splt->contents
5693                           + abed->plt->plt0_got2_offset);
5694
5695               if (abed->is_vxworks)
5696                 {
5697                   Elf_Internal_Rela rel;
5698
5699                   /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 4.
5700                      On IA32 we use REL relocations so the addend goes in
5701                      the PLT directly.  */
5702                   rel.r_offset = (htab->elf.splt->output_section->vma
5703                                   + htab->elf.splt->output_offset
5704                                   + abed->plt->plt0_got1_offset);
5705                   rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
5706                   bfd_elf32_swap_reloc_out (output_bfd, &rel,
5707                                             htab->srelplt2->contents);
5708                   /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 8.  */
5709                   rel.r_offset = (htab->elf.splt->output_section->vma
5710                                   + htab->elf.splt->output_offset
5711                                   + abed->plt->plt0_got2_offset);
5712                   rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
5713                   bfd_elf32_swap_reloc_out (output_bfd, &rel,
5714                                             htab->srelplt2->contents +
5715                                             sizeof (Elf32_External_Rel));
5716                 }
5717             }
5718
5719           /* UnixWare sets the entsize of .plt to 4, although that doesn't
5720              really seem like the right value.  */
5721           elf_section_data (htab->elf.splt->output_section)
5722             ->this_hdr.sh_entsize = 4;
5723
5724           /* Correct the .rel.plt.unloaded relocations.  */
5725           if (abed->is_vxworks && !bfd_link_pic (info))
5726             {
5727               int num_plts = (htab->elf.splt->size
5728                               / abed->plt->plt_entry_size) - 1;
5729               unsigned char *p;
5730
5731               p = htab->srelplt2->contents;
5732               if (bfd_link_pic (info))
5733                 p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel);
5734               else
5735                 p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel);
5736
5737               for (; num_plts; num_plts--)
5738                 {
5739                   Elf_Internal_Rela rel;
5740                   bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
5741                   rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
5742                   bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
5743                   p += sizeof (Elf32_External_Rel);
5744
5745                   bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
5746                   rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
5747                   bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
5748                   p += sizeof (Elf32_External_Rel);
5749                 }
5750             }
5751         }
5752     }
5753
5754   if (htab->elf.sgotplt)
5755     {
5756       if (bfd_is_abs_section (htab->elf.sgotplt->output_section))
5757         {
5758           (*_bfd_error_handler)
5759             (_("discarded output section: `%A'"), htab->elf.sgotplt);
5760           return FALSE;
5761         }
5762
5763       /* Fill in the first three entries in the global offset table.  */
5764       if (htab->elf.sgotplt->size > 0)
5765         {
5766           bfd_put_32 (output_bfd,
5767                       (sdyn == NULL ? 0
5768                        : sdyn->output_section->vma + sdyn->output_offset),
5769                       htab->elf.sgotplt->contents);
5770           bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 4);
5771           bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 8);
5772         }
5773
5774       elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize = 4;
5775     }
5776
5777   /* Adjust .eh_frame for .plt section.  */
5778   if (htab->plt_eh_frame != NULL
5779       && htab->plt_eh_frame->contents != NULL)
5780     {
5781       if (htab->elf.splt != NULL
5782           && htab->elf.splt->size != 0
5783           && (htab->elf.splt->flags & SEC_EXCLUDE) == 0
5784           && htab->elf.splt->output_section != NULL
5785           && htab->plt_eh_frame->output_section != NULL)
5786         {
5787           bfd_vma plt_start = htab->elf.splt->output_section->vma;
5788           bfd_vma eh_frame_start = htab->plt_eh_frame->output_section->vma
5789                                    + htab->plt_eh_frame->output_offset
5790                                    + PLT_FDE_START_OFFSET;
5791           bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
5792                              htab->plt_eh_frame->contents
5793                              + PLT_FDE_START_OFFSET);
5794         }
5795       if (htab->plt_eh_frame->sec_info_type
5796           == SEC_INFO_TYPE_EH_FRAME)
5797         {
5798           if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
5799                                                  htab->plt_eh_frame,
5800                                                  htab->plt_eh_frame->contents))
5801             return FALSE;
5802         }
5803     }
5804
5805   if (htab->elf.sgot && htab->elf.sgot->size > 0)
5806     elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize = 4;
5807
5808   /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols.  */
5809   htab_traverse (htab->loc_hash_table,
5810                  elf_i386_finish_local_dynamic_symbol,
5811                  info);
5812
5813   /* Fill PLT entries for undefined weak symbols in PIE.  */
5814   if (bfd_link_pie (info))
5815     bfd_hash_traverse (&info->hash->table,
5816                        elf_i386_pie_finish_undefweak_symbol,
5817                        info);
5818
5819   return TRUE;
5820 }
5821
5822 /* Return an array of PLT entry symbol values.  */
5823
5824 static bfd_vma *
5825 elf_i386_get_plt_sym_val (bfd *abfd, asymbol **dynsyms, asection *plt,
5826                           asection *relplt)
5827 {
5828   bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
5829   arelent *p;
5830   long count, i;
5831   bfd_vma *plt_sym_val;
5832   bfd_vma plt_offset;
5833   bfd_byte *plt_contents;
5834   const struct elf_i386_backend_data *bed
5835     = get_elf_i386_backend_data (abfd);
5836   Elf_Internal_Shdr *hdr;
5837
5838   /* Get the .plt section contents.  */
5839   plt_contents = (bfd_byte *) bfd_malloc (plt->size);
5840   if (plt_contents == NULL)
5841     return NULL;
5842   if (!bfd_get_section_contents (abfd, (asection *) plt,
5843                                  plt_contents, 0, plt->size))
5844     {
5845 bad_return:
5846       free (plt_contents);
5847       return NULL;
5848     }
5849
5850   slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
5851   if (! (*slurp_relocs) (abfd, relplt, dynsyms, TRUE))
5852     goto bad_return;
5853
5854   hdr = &elf_section_data (relplt)->this_hdr;
5855   count = relplt->size / hdr->sh_entsize;
5856
5857   plt_sym_val = (bfd_vma *) bfd_malloc (sizeof (bfd_vma) * count);
5858   if (plt_sym_val == NULL)
5859     goto bad_return;
5860
5861   for (i = 0; i < count; i++)
5862     plt_sym_val[i] = -1;
5863
5864   plt_offset = bed->plt->plt_entry_size;
5865   p = relplt->relocation;
5866   for (i = 0; i < count; i++, p++)
5867     {
5868       long reloc_index;
5869
5870       /* Skip unknown relocation.  PR 17512: file: bc9d6cf5.  */
5871       if (p->howto == NULL)
5872         continue;
5873
5874       if (p->howto->type != R_386_JUMP_SLOT
5875           && p->howto->type != R_386_IRELATIVE)
5876         continue;
5877
5878       reloc_index = H_GET_32 (abfd, (plt_contents + plt_offset
5879                                      + bed->plt->plt_reloc_offset));
5880       reloc_index /= sizeof (Elf32_External_Rel);
5881       if (reloc_index < count)
5882         plt_sym_val[reloc_index] = plt->vma + plt_offset;
5883
5884       plt_offset += bed->plt->plt_entry_size;
5885
5886       /* PR binutils/18437: Skip extra relocations in the .rel.plt
5887          section.  */
5888       if (plt_offset >= plt->size)
5889         break;
5890     }
5891
5892   free (plt_contents);
5893
5894   return plt_sym_val;
5895 }
5896
5897 /* Similar to _bfd_elf_get_synthetic_symtab.  */
5898
5899 static long
5900 elf_i386_get_synthetic_symtab (bfd *abfd,
5901                                long symcount,
5902                                asymbol **syms,
5903                                long dynsymcount,
5904                                asymbol **dynsyms,
5905                                asymbol **ret)
5906 {
5907   asection *plt = bfd_get_section_by_name (abfd, ".plt");
5908   return _bfd_elf_ifunc_get_synthetic_symtab (abfd, symcount, syms,
5909                                               dynsymcount, dynsyms, ret,
5910                                               plt,
5911                                               elf_i386_get_plt_sym_val);
5912 }
5913
5914 /* Return TRUE if symbol should be hashed in the `.gnu.hash' section.  */
5915
5916 static bfd_boolean
5917 elf_i386_hash_symbol (struct elf_link_hash_entry *h)
5918 {
5919   if (h->plt.offset != (bfd_vma) -1
5920       && !h->def_regular
5921       && !h->pointer_equality_needed)
5922     return FALSE;
5923
5924   return _bfd_elf_hash_symbol (h);
5925 }
5926
5927 /* Hook called by the linker routine which adds symbols from an object
5928    file.  */
5929
5930 static bfd_boolean
5931 elf_i386_add_symbol_hook (bfd * abfd,
5932                           struct bfd_link_info * info,
5933                           Elf_Internal_Sym * sym,
5934                           const char ** namep ATTRIBUTE_UNUSED,
5935                           flagword * flagsp ATTRIBUTE_UNUSED,
5936                           asection ** secp ATTRIBUTE_UNUSED,
5937                           bfd_vma * valp ATTRIBUTE_UNUSED)
5938 {
5939   if (ELF_ST_BIND (sym->st_info) == STB_GNU_UNIQUE
5940       && (abfd->flags & DYNAMIC) == 0
5941       && bfd_get_flavour (info->output_bfd) == bfd_target_elf_flavour)
5942     elf_tdata (info->output_bfd)->has_gnu_symbols
5943       |= elf_gnu_symbol_unique;
5944
5945   return TRUE;
5946 }
5947
5948 #define TARGET_LITTLE_SYM               i386_elf32_vec
5949 #define TARGET_LITTLE_NAME              "elf32-i386"
5950 #define ELF_ARCH                        bfd_arch_i386
5951 #define ELF_TARGET_ID                   I386_ELF_DATA
5952 #define ELF_MACHINE_CODE                EM_386
5953 #define ELF_MAXPAGESIZE                 0x1000
5954
5955 #define elf_backend_can_gc_sections     1
5956 #define elf_backend_can_refcount        1
5957 #define elf_backend_want_got_plt        1
5958 #define elf_backend_plt_readonly        1
5959 #define elf_backend_want_plt_sym        0
5960 #define elf_backend_got_header_size     12
5961 #define elf_backend_plt_alignment       4
5962 #define elf_backend_extern_protected_data 1
5963
5964 /* Support RELA for objdump of prelink objects.  */
5965 #define elf_info_to_howto                     elf_i386_info_to_howto_rel
5966 #define elf_info_to_howto_rel                 elf_i386_info_to_howto_rel
5967
5968 #define bfd_elf32_mkobject                    elf_i386_mkobject
5969
5970 #define bfd_elf32_bfd_is_local_label_name     elf_i386_is_local_label_name
5971 #define bfd_elf32_bfd_link_hash_table_create  elf_i386_link_hash_table_create
5972 #define bfd_elf32_bfd_reloc_type_lookup       elf_i386_reloc_type_lookup
5973 #define bfd_elf32_bfd_reloc_name_lookup       elf_i386_reloc_name_lookup
5974 #define bfd_elf32_get_synthetic_symtab        elf_i386_get_synthetic_symtab
5975
5976 #define elf_backend_adjust_dynamic_symbol     elf_i386_adjust_dynamic_symbol
5977 #define elf_backend_relocs_compatible         _bfd_elf_relocs_compatible
5978 #define elf_backend_check_relocs              elf_i386_check_relocs
5979 #define elf_backend_copy_indirect_symbol      elf_i386_copy_indirect_symbol
5980 #define elf_backend_create_dynamic_sections   elf_i386_create_dynamic_sections
5981 #define elf_backend_fake_sections             elf_i386_fake_sections
5982 #define elf_backend_finish_dynamic_sections   elf_i386_finish_dynamic_sections
5983 #define elf_backend_finish_dynamic_symbol     elf_i386_finish_dynamic_symbol
5984 #define elf_backend_gc_mark_hook              elf_i386_gc_mark_hook
5985 #define elf_backend_gc_sweep_hook             elf_i386_gc_sweep_hook
5986 #define elf_backend_grok_prstatus             elf_i386_grok_prstatus
5987 #define elf_backend_grok_psinfo               elf_i386_grok_psinfo
5988 #define elf_backend_reloc_type_class          elf_i386_reloc_type_class
5989 #define elf_backend_relocate_section          elf_i386_relocate_section
5990 #define elf_backend_size_dynamic_sections     elf_i386_size_dynamic_sections
5991 #define elf_backend_always_size_sections      elf_i386_always_size_sections
5992 #define elf_backend_omit_section_dynsym \
5993   ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
5994 #define elf_backend_hash_symbol               elf_i386_hash_symbol
5995 #define elf_backend_add_symbol_hook           elf_i386_add_symbol_hook
5996 #define elf_backend_fixup_symbol              elf_i386_fixup_symbol
5997
5998 #include "elf32-target.h"
5999
6000 /* FreeBSD support.  */
6001
6002 #undef  TARGET_LITTLE_SYM
6003 #define TARGET_LITTLE_SYM               i386_elf32_fbsd_vec
6004 #undef  TARGET_LITTLE_NAME
6005 #define TARGET_LITTLE_NAME              "elf32-i386-freebsd"
6006 #undef  ELF_OSABI
6007 #define ELF_OSABI                       ELFOSABI_FREEBSD
6008
6009 /* The kernel recognizes executables as valid only if they carry a
6010    "FreeBSD" label in the ELF header.  So we put this label on all
6011    executables and (for simplicity) also all other object files.  */
6012
6013 static void
6014 elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info)
6015 {
6016   _bfd_elf_post_process_headers (abfd, info);
6017
6018 #ifdef OLD_FREEBSD_ABI_LABEL
6019   {
6020     /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard.  */
6021     Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
6022     memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8);
6023   }
6024 #endif
6025 }
6026
6027 #undef  elf_backend_post_process_headers
6028 #define elf_backend_post_process_headers        elf_i386_fbsd_post_process_headers
6029 #undef  elf32_bed
6030 #define elf32_bed                               elf32_i386_fbsd_bed
6031
6032 #undef elf_backend_add_symbol_hook
6033
6034 #include "elf32-target.h"
6035
6036 /* Solaris 2.  */
6037
6038 #undef  TARGET_LITTLE_SYM
6039 #define TARGET_LITTLE_SYM               i386_elf32_sol2_vec
6040 #undef  TARGET_LITTLE_NAME
6041 #define TARGET_LITTLE_NAME              "elf32-i386-sol2"
6042
6043 #undef elf_backend_post_process_headers
6044
6045 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
6046    objects won't be recognized.  */
6047 #undef ELF_OSABI
6048
6049 #undef  elf32_bed
6050 #define elf32_bed                       elf32_i386_sol2_bed
6051
6052 /* The 32-bit static TLS arena size is rounded to the nearest 8-byte
6053    boundary.  */
6054 #undef  elf_backend_static_tls_alignment
6055 #define elf_backend_static_tls_alignment 8
6056
6057 /* The Solaris 2 ABI requires a plt symbol on all platforms.
6058
6059    Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
6060    File, p.63.  */
6061 #undef  elf_backend_want_plt_sym
6062 #define elf_backend_want_plt_sym        1
6063
6064 #undef  elf_backend_strtab_flags
6065 #define elf_backend_strtab_flags        SHF_STRINGS
6066
6067 static bfd_boolean
6068 elf32_i386_set_special_info_link (const bfd *ibfd ATTRIBUTE_UNUSED,
6069                                   bfd *obfd ATTRIBUTE_UNUSED,
6070                                   const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
6071                                   Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
6072 {
6073   /* PR 19938: FIXME: Need to add code for setting the sh_info
6074      and sh_link fields of Solaris specific section types.
6075
6076      Based upon Oracle Solaris 11.3 Linkers and Libraries Guide, Ch. 13,
6077      Object File Format, Table 13-9  ELF sh_link and sh_info Interpretation:
6078
6079 http://docs.oracle.com/cd/E53394_01/html/E54813/chapter6-94076.html#scrolltoc
6080
6081      The following values should be set:
6082
6083 Type                 Link                           Info
6084 -----------------------------------------------------------------------------
6085 SHT_SUNW_ancillary   The section header index of    0
6086  [0x6fffffee]        the associated string table.
6087
6088 SHT_SUNW_capinfo     The section header index of    For a dynamic object, the
6089  [0x6ffffff0]        the associated symbol table.   section header index of
6090                                                     the associated
6091                                                     SHT_SUNW_capchain table,
6092                                                     otherwise 0.
6093
6094 SHT_SUNW_symsort     The section header index of    0
6095  [0x6ffffff1]        the associated symbol table.
6096
6097 SHT_SUNW_tlssort     The section header index of    0
6098  [0x6ffffff2]        the associated symbol table.
6099
6100 SHT_SUNW_LDYNSYM     The section header index of    One greater than the
6101  [0x6ffffff3]        the associated string table.   symbol table index of the
6102                      This index is the same string  last local symbol,
6103                      table used by the SHT_DYNSYM   STB_LOCAL. Since
6104                      section.                       SHT_SUNW_LDYNSYM only
6105                                                     contains local symbols,
6106                                                     sh_info is equivalent to
6107                                                     the number of symbols in
6108                                                     the table.
6109
6110 SHT_SUNW_cap         If symbol capabilities exist,  If any capabilities refer
6111  [0x6ffffff5]        the section header index of    to named strings, the
6112                      the associated                 section header index of
6113                      SHT_SUNW_capinfo table,        the associated string
6114                           otherwise 0.              table, otherwise 0.
6115
6116 SHT_SUNW_move        The section header index of    0
6117  [0x6ffffffa]        the associated symbol table.
6118
6119 SHT_SUNW_COMDAT      0                              0
6120  [0x6ffffffb]
6121
6122 SHT_SUNW_syminfo     The section header index of    The section header index
6123  [0x6ffffffc]        the associated symbol table.   of the associated
6124                                                     .dynamic section.
6125
6126 SHT_SUNW_verdef      The section header index of    The number of version
6127  [0x6ffffffd]        the associated string table.   definitions within the
6128                                                     section.
6129
6130 SHT_SUNW_verneed     The section header index of    The number of version
6131  [0x6ffffffe]        the associated string table.   dependencies within the
6132                                                     section.
6133
6134 SHT_SUNW_versym      The section header index of    0
6135  [0x6fffffff]        the associated symbol table.  */
6136   return FALSE;
6137 }
6138
6139 #undef  elf_backend_set_special_section_info_and_link
6140 #define elf_backend_set_special_section_info_and_link elf32_i386_set_special_info_link
6141
6142 #include "elf32-target.h"
6143
6144 /* Intel MCU support.  */
6145
6146 static bfd_boolean
6147 elf32_iamcu_elf_object_p (bfd *abfd)
6148 {
6149   /* Set the right machine number for an IAMCU elf32 file.  */
6150   bfd_default_set_arch_mach (abfd, bfd_arch_iamcu, bfd_mach_i386_iamcu);
6151   return TRUE;
6152 }
6153
6154 #undef  TARGET_LITTLE_SYM
6155 #define TARGET_LITTLE_SYM               iamcu_elf32_vec
6156 #undef  TARGET_LITTLE_NAME
6157 #define TARGET_LITTLE_NAME              "elf32-iamcu"
6158 #undef  ELF_ARCH
6159 #define ELF_ARCH                        bfd_arch_iamcu
6160
6161 #undef  ELF_MACHINE_CODE
6162 #define ELF_MACHINE_CODE                EM_IAMCU
6163
6164 #undef  ELF_OSABI
6165
6166 #undef  elf32_bed
6167 #define elf32_bed                       elf32_iamcu_bed
6168
6169 #undef  elf_backend_object_p
6170 #define elf_backend_object_p            elf32_iamcu_elf_object_p
6171
6172 #undef  elf_backend_static_tls_alignment
6173
6174 #undef  elf_backend_want_plt_sym
6175 #define elf_backend_want_plt_sym            0
6176
6177 #undef  elf_backend_strtab_flags
6178 #undef  elf_backend_set_special_section_info_and_link
6179
6180 #include "elf32-target.h"
6181
6182 /* Restore defaults.  */
6183 #undef  ELF_ARCH
6184 #define ELF_ARCH                        bfd_arch_i386
6185 #undef  ELF_MACHINE_CODE
6186 #define ELF_MACHINE_CODE                EM_386
6187
6188 /* Native Client support.  */
6189
6190 #undef  TARGET_LITTLE_SYM
6191 #define TARGET_LITTLE_SYM               i386_elf32_nacl_vec
6192 #undef  TARGET_LITTLE_NAME
6193 #define TARGET_LITTLE_NAME              "elf32-i386-nacl"
6194 #undef  elf32_bed
6195 #define elf32_bed                       elf32_i386_nacl_bed
6196
6197 #undef  ELF_MAXPAGESIZE
6198 #define ELF_MAXPAGESIZE                 0x10000
6199
6200 /* Restore defaults.  */
6201 #undef  ELF_OSABI
6202 #undef  elf_backend_want_plt_sym
6203 #define elf_backend_want_plt_sym        0
6204 #undef  elf_backend_post_process_headers
6205 #undef  elf_backend_static_tls_alignment
6206
6207 /* NaCl uses substantially different PLT entries for the same effects.  */
6208
6209 #undef  elf_backend_plt_alignment
6210 #define elf_backend_plt_alignment       5
6211 #define NACL_PLT_ENTRY_SIZE             64
6212 #define NACLMASK                        0xe0 /* 32-byte alignment mask.  */
6213
6214 static const bfd_byte elf_i386_nacl_plt0_entry[] =
6215   {
6216     0xff, 0x35,                   /* pushl contents of address */
6217     0, 0, 0, 0,                   /* replaced with address of .got + 4.  */
6218     0x8b, 0x0d,                   /* movl contents of address, %ecx */
6219     0, 0, 0, 0,                   /* replaced with address of .got + 8.  */
6220     0x83, 0xe1, NACLMASK,         /* andl $NACLMASK, %ecx */
6221     0xff, 0xe1                    /* jmp *%ecx */
6222   };
6223
6224 static const bfd_byte elf_i386_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
6225   {
6226     0x8b, 0x0d,                         /* movl contents of address, %ecx */
6227     0, 0, 0, 0,                         /* replaced with GOT slot address.  */
6228     0x83, 0xe1, NACLMASK,               /* andl $NACLMASK, %ecx */
6229     0xff, 0xe1,                         /* jmp *%ecx */
6230
6231     /* Pad to the next 32-byte boundary with nop instructions.  */
6232     0x90,
6233     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6234     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6235
6236     /* Lazy GOT entries point here (32-byte aligned).  */
6237     0x68,                              /* pushl immediate */
6238     0, 0, 0, 0,                        /* replaced with reloc offset.  */
6239     0xe9,                              /* jmp relative */
6240     0, 0, 0, 0,                        /* replaced with offset to .plt.  */
6241
6242     /* Pad to the next 32-byte boundary with nop instructions.  */
6243     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6244     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6245     0x90, 0x90
6246   };
6247
6248 static const bfd_byte
6249 elf_i386_nacl_pic_plt0_entry[sizeof (elf_i386_nacl_plt0_entry)] =
6250   {
6251     0xff, 0x73, 0x04,           /* pushl 4(%ebx) */
6252     0x8b, 0x4b, 0x08,           /* mov 0x8(%ebx), %ecx */
6253     0x83, 0xe1, 0xe0,           /* and $NACLMASK, %ecx */
6254     0xff, 0xe1,                 /* jmp *%ecx */
6255
6256     /* This is expected to be the same size as elf_i386_nacl_plt0_entry,
6257        so pad to that size with nop instructions.  */
6258     0x90, 0x90, 0x90, 0x90, 0x90, 0x90
6259   };
6260
6261 static const bfd_byte elf_i386_nacl_pic_plt_entry[NACL_PLT_ENTRY_SIZE] =
6262   {
6263     0x8b, 0x8b,          /* movl offset(%ebx), %ecx */
6264     0, 0, 0, 0,          /* replaced with offset of this symbol in .got.  */
6265     0x83, 0xe1, 0xe0,    /* andl $NACLMASK, %ecx */
6266     0xff, 0xe1,          /* jmp *%ecx */
6267
6268     /* Pad to the next 32-byte boundary with nop instructions.  */
6269     0x90,
6270     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6271     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6272
6273     /* Lazy GOT entries point here (32-byte aligned).  */
6274     0x68,                /* pushl immediate */
6275     0, 0, 0, 0,          /* replaced with offset into relocation table.  */
6276     0xe9,                /* jmp relative */
6277     0, 0, 0, 0,          /* replaced with offset to start of .plt.  */
6278
6279     /* Pad to the next 32-byte boundary with nop instructions.  */
6280     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6281     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6282     0x90, 0x90
6283   };
6284
6285 static const bfd_byte elf_i386_nacl_eh_frame_plt[] =
6286   {
6287 #if (PLT_CIE_LENGTH != 20                               \
6288      || PLT_FDE_LENGTH != 36                            \
6289      || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8  \
6290      || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
6291 # error "Need elf_i386_backend_data parameters for eh_frame_plt offsets!"
6292 #endif
6293     PLT_CIE_LENGTH, 0, 0, 0,            /* CIE length */
6294     0, 0, 0, 0,                         /* CIE ID */
6295     1,                                  /* CIE version */
6296     'z', 'R', 0,                        /* Augmentation string */
6297     1,                                  /* Code alignment factor */
6298     0x7c,                               /* Data alignment factor: -4 */
6299     8,                                  /* Return address column */
6300     1,                                  /* Augmentation size */
6301     DW_EH_PE_pcrel | DW_EH_PE_sdata4,   /* FDE encoding */
6302     DW_CFA_def_cfa, 4, 4,               /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
6303     DW_CFA_offset + 8, 1,               /* DW_CFA_offset: r8 (eip) at cfa-4 */
6304     DW_CFA_nop, DW_CFA_nop,
6305
6306     PLT_FDE_LENGTH, 0, 0, 0,     /* FDE length */
6307     PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
6308     0, 0, 0, 0,                  /* R_386_PC32 .plt goes here */
6309     0, 0, 0, 0,                  /* .plt size goes here */
6310     0,                           /* Augmentation size */
6311     DW_CFA_def_cfa_offset, 8,    /* DW_CFA_def_cfa_offset: 8 */
6312     DW_CFA_advance_loc + 6,      /* DW_CFA_advance_loc: 6 to __PLT__+6 */
6313     DW_CFA_def_cfa_offset, 12,   /* DW_CFA_def_cfa_offset: 12 */
6314     DW_CFA_advance_loc + 58,     /* DW_CFA_advance_loc: 58 to __PLT__+64 */
6315     DW_CFA_def_cfa_expression,   /* DW_CFA_def_cfa_expression */
6316     13,                          /* Block length */
6317     DW_OP_breg4, 4,              /* DW_OP_breg4 (esp): 4 */
6318     DW_OP_breg8, 0,              /* DW_OP_breg8 (eip): 0 */
6319     DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
6320     DW_OP_lit2, DW_OP_shl, DW_OP_plus,
6321     DW_CFA_nop, DW_CFA_nop
6322   };
6323
6324 static const struct elf_i386_plt_layout elf_i386_nacl_plt =
6325   {
6326     elf_i386_nacl_plt0_entry,           /* plt0_entry */
6327     sizeof (elf_i386_nacl_plt0_entry),  /* plt0_entry_size */
6328     2,                                  /* plt0_got1_offset */
6329     8,                                  /* plt0_got2_offset */
6330     elf_i386_nacl_plt_entry,            /* plt_entry */
6331     NACL_PLT_ENTRY_SIZE,                /* plt_entry_size */
6332     2,                                  /* plt_got_offset */
6333     33,                                 /* plt_reloc_offset */
6334     38,                                 /* plt_plt_offset */
6335     32,                                 /* plt_lazy_offset */
6336     elf_i386_nacl_pic_plt0_entry,       /* pic_plt0_entry */
6337     elf_i386_nacl_pic_plt_entry,        /* pic_plt_entry */
6338     elf_i386_nacl_eh_frame_plt,         /* eh_frame_plt */
6339     sizeof (elf_i386_nacl_eh_frame_plt),/* eh_frame_plt_size */
6340   };
6341
6342 static const struct elf_i386_backend_data elf_i386_nacl_arch_bed =
6343   {
6344     &elf_i386_nacl_plt,                      /* plt */
6345     0x90,                               /* plt0_pad_byte: nop insn */
6346     0,                                  /* is_vxworks */
6347   };
6348
6349 static bfd_boolean
6350 elf32_i386_nacl_elf_object_p (bfd *abfd)
6351 {
6352   /* Set the right machine number for a NaCl i386 ELF32 file.  */
6353   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386_nacl);
6354   return TRUE;
6355 }
6356
6357 #undef  elf_backend_arch_data
6358 #define elf_backend_arch_data   &elf_i386_nacl_arch_bed
6359
6360 #undef  elf_backend_object_p
6361 #define elf_backend_object_p                    elf32_i386_nacl_elf_object_p
6362 #undef  elf_backend_modify_segment_map
6363 #define elf_backend_modify_segment_map          nacl_modify_segment_map
6364 #undef  elf_backend_modify_program_headers
6365 #define elf_backend_modify_program_headers      nacl_modify_program_headers
6366 #undef  elf_backend_final_write_processing
6367 #define elf_backend_final_write_processing      nacl_final_write_processing
6368
6369 #include "elf32-target.h"
6370
6371 /* Restore defaults.  */
6372 #undef  elf_backend_object_p
6373 #undef  elf_backend_modify_segment_map
6374 #undef  elf_backend_modify_program_headers
6375 #undef  elf_backend_final_write_processing
6376
6377 /* VxWorks support.  */
6378
6379 #undef  TARGET_LITTLE_SYM
6380 #define TARGET_LITTLE_SYM               i386_elf32_vxworks_vec
6381 #undef  TARGET_LITTLE_NAME
6382 #define TARGET_LITTLE_NAME              "elf32-i386-vxworks"
6383 #undef  ELF_OSABI
6384 #undef  elf_backend_plt_alignment
6385 #define elf_backend_plt_alignment       4
6386
6387 static const struct elf_i386_backend_data elf_i386_vxworks_arch_bed =
6388   {
6389     &elf_i386_plt,                      /* plt */
6390     0x90,                               /* plt0_pad_byte */
6391     1,                                  /* is_vxworks */
6392   };
6393
6394 #undef  elf_backend_arch_data
6395 #define elf_backend_arch_data   &elf_i386_vxworks_arch_bed
6396
6397 #undef elf_backend_relocs_compatible
6398 #undef elf_backend_add_symbol_hook
6399 #define elf_backend_add_symbol_hook \
6400   elf_vxworks_add_symbol_hook
6401 #undef elf_backend_link_output_symbol_hook
6402 #define elf_backend_link_output_symbol_hook \
6403   elf_vxworks_link_output_symbol_hook
6404 #undef elf_backend_emit_relocs
6405 #define elf_backend_emit_relocs                 elf_vxworks_emit_relocs
6406 #undef elf_backend_final_write_processing
6407 #define elf_backend_final_write_processing \
6408   elf_vxworks_final_write_processing
6409 #undef elf_backend_static_tls_alignment
6410
6411 /* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
6412    define it.  */
6413 #undef elf_backend_want_plt_sym
6414 #define elf_backend_want_plt_sym        1
6415
6416 #undef  elf32_bed
6417 #define elf32_bed                               elf32_i386_vxworks_bed
6418
6419 #include "elf32-target.h"