expand a bit the in-GDB help for the "catch exception" help text
[external/binutils.git] / bfd / elf32-i386.c
1 /* Intel 80386/80486-specific support for 32-bit ELF
2    Copyright (C) 1993-2019 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 "elfxx-x86.h"
22 #include "elf-nacl.h"
23 #include "elf-vxworks.h"
24 #include "dwarf2.h"
25 #include "opcode/i386.h"
26
27 /* 386 uses REL relocations instead of RELA.  */
28 #define USE_REL 1
29
30 #include "elf/i386.h"
31
32 static reloc_howto_type elf_howto_table[]=
33 {
34   HOWTO(R_386_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
35         bfd_elf_generic_reloc, "R_386_NONE",
36         TRUE, 0x00000000, 0x00000000, FALSE),
37   HOWTO(R_386_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
38         bfd_elf_generic_reloc, "R_386_32",
39         TRUE, 0xffffffff, 0xffffffff, FALSE),
40   HOWTO(R_386_PC32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
41         bfd_elf_generic_reloc, "R_386_PC32",
42         TRUE, 0xffffffff, 0xffffffff, TRUE),
43   HOWTO(R_386_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
44         bfd_elf_generic_reloc, "R_386_GOT32",
45         TRUE, 0xffffffff, 0xffffffff, FALSE),
46   HOWTO(R_386_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
47         bfd_elf_generic_reloc, "R_386_PLT32",
48         TRUE, 0xffffffff, 0xffffffff, TRUE),
49   HOWTO(R_386_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
50         bfd_elf_generic_reloc, "R_386_COPY",
51         TRUE, 0xffffffff, 0xffffffff, FALSE),
52   HOWTO(R_386_GLOB_DAT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
53         bfd_elf_generic_reloc, "R_386_GLOB_DAT",
54         TRUE, 0xffffffff, 0xffffffff, FALSE),
55   HOWTO(R_386_JUMP_SLOT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
56         bfd_elf_generic_reloc, "R_386_JUMP_SLOT",
57         TRUE, 0xffffffff, 0xffffffff, FALSE),
58   HOWTO(R_386_RELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
59         bfd_elf_generic_reloc, "R_386_RELATIVE",
60         TRUE, 0xffffffff, 0xffffffff, FALSE),
61   HOWTO(R_386_GOTOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
62         bfd_elf_generic_reloc, "R_386_GOTOFF",
63         TRUE, 0xffffffff, 0xffffffff, FALSE),
64   HOWTO(R_386_GOTPC, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
65         bfd_elf_generic_reloc, "R_386_GOTPC",
66         TRUE, 0xffffffff, 0xffffffff, TRUE),
67
68   /* We have a gap in the reloc numbers here.
69      R_386_standard counts the number up to this point, and
70      R_386_ext_offset is the value to subtract from a reloc type of
71      R_386_16 thru R_386_PC8 to form an index into this table.  */
72 #define R_386_standard (R_386_GOTPC + 1)
73 #define R_386_ext_offset (R_386_TLS_TPOFF - R_386_standard)
74
75   /* These relocs are a GNU extension.  */
76   HOWTO(R_386_TLS_TPOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
77         bfd_elf_generic_reloc, "R_386_TLS_TPOFF",
78         TRUE, 0xffffffff, 0xffffffff, FALSE),
79   HOWTO(R_386_TLS_IE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
80         bfd_elf_generic_reloc, "R_386_TLS_IE",
81         TRUE, 0xffffffff, 0xffffffff, FALSE),
82   HOWTO(R_386_TLS_GOTIE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
83         bfd_elf_generic_reloc, "R_386_TLS_GOTIE",
84         TRUE, 0xffffffff, 0xffffffff, FALSE),
85   HOWTO(R_386_TLS_LE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
86         bfd_elf_generic_reloc, "R_386_TLS_LE",
87         TRUE, 0xffffffff, 0xffffffff, FALSE),
88   HOWTO(R_386_TLS_GD, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
89         bfd_elf_generic_reloc, "R_386_TLS_GD",
90         TRUE, 0xffffffff, 0xffffffff, FALSE),
91   HOWTO(R_386_TLS_LDM, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
92         bfd_elf_generic_reloc, "R_386_TLS_LDM",
93         TRUE, 0xffffffff, 0xffffffff, FALSE),
94   HOWTO(R_386_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
95         bfd_elf_generic_reloc, "R_386_16",
96         TRUE, 0xffff, 0xffff, FALSE),
97   HOWTO(R_386_PC16, 0, 1, 16, TRUE, 0, complain_overflow_bitfield,
98         bfd_elf_generic_reloc, "R_386_PC16",
99         TRUE, 0xffff, 0xffff, TRUE),
100   HOWTO(R_386_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
101         bfd_elf_generic_reloc, "R_386_8",
102         TRUE, 0xff, 0xff, FALSE),
103   HOWTO(R_386_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
104         bfd_elf_generic_reloc, "R_386_PC8",
105         TRUE, 0xff, 0xff, TRUE),
106
107 #define R_386_ext (R_386_PC8 + 1 - R_386_ext_offset)
108 #define R_386_tls_offset (R_386_TLS_LDO_32 - R_386_ext)
109   /* These are common with Solaris TLS implementation.  */
110   HOWTO(R_386_TLS_LDO_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
111         bfd_elf_generic_reloc, "R_386_TLS_LDO_32",
112         TRUE, 0xffffffff, 0xffffffff, FALSE),
113   HOWTO(R_386_TLS_IE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
114         bfd_elf_generic_reloc, "R_386_TLS_IE_32",
115         TRUE, 0xffffffff, 0xffffffff, FALSE),
116   HOWTO(R_386_TLS_LE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
117         bfd_elf_generic_reloc, "R_386_TLS_LE_32",
118         TRUE, 0xffffffff, 0xffffffff, FALSE),
119   HOWTO(R_386_TLS_DTPMOD32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
120         bfd_elf_generic_reloc, "R_386_TLS_DTPMOD32",
121         TRUE, 0xffffffff, 0xffffffff, FALSE),
122   HOWTO(R_386_TLS_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
123         bfd_elf_generic_reloc, "R_386_TLS_DTPOFF32",
124         TRUE, 0xffffffff, 0xffffffff, FALSE),
125   HOWTO(R_386_TLS_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
126         bfd_elf_generic_reloc, "R_386_TLS_TPOFF32",
127         TRUE, 0xffffffff, 0xffffffff, FALSE),
128   HOWTO(R_386_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
129         bfd_elf_generic_reloc, "R_386_SIZE32",
130         TRUE, 0xffffffff, 0xffffffff, FALSE),
131   HOWTO(R_386_TLS_GOTDESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
132         bfd_elf_generic_reloc, "R_386_TLS_GOTDESC",
133         TRUE, 0xffffffff, 0xffffffff, FALSE),
134   HOWTO(R_386_TLS_DESC_CALL, 0, 0, 0, FALSE, 0, complain_overflow_dont,
135         bfd_elf_generic_reloc, "R_386_TLS_DESC_CALL",
136         FALSE, 0, 0, FALSE),
137   HOWTO(R_386_TLS_DESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
138         bfd_elf_generic_reloc, "R_386_TLS_DESC",
139         TRUE, 0xffffffff, 0xffffffff, FALSE),
140   HOWTO(R_386_IRELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
141         bfd_elf_generic_reloc, "R_386_IRELATIVE",
142         TRUE, 0xffffffff, 0xffffffff, FALSE),
143   HOWTO(R_386_GOT32X, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
144         bfd_elf_generic_reloc, "R_386_GOT32X",
145         TRUE, 0xffffffff, 0xffffffff, FALSE),
146
147   /* Another gap.  */
148 #define R_386_ext2 (R_386_GOT32X + 1 - R_386_tls_offset)
149 #define R_386_vt_offset (R_386_GNU_VTINHERIT - R_386_ext2)
150
151 /* GNU extension to record C++ vtable hierarchy.  */
152   HOWTO (R_386_GNU_VTINHERIT,   /* type */
153          0,                     /* rightshift */
154          2,                     /* size (0 = byte, 1 = short, 2 = long) */
155          0,                     /* bitsize */
156          FALSE,                 /* pc_relative */
157          0,                     /* bitpos */
158          complain_overflow_dont, /* complain_on_overflow */
159          NULL,                  /* special_function */
160          "R_386_GNU_VTINHERIT", /* name */
161          FALSE,                 /* partial_inplace */
162          0,                     /* src_mask */
163          0,                     /* dst_mask */
164          FALSE),                /* pcrel_offset */
165
166 /* GNU extension to record C++ vtable member usage.  */
167   HOWTO (R_386_GNU_VTENTRY,     /* type */
168          0,                     /* rightshift */
169          2,                     /* size (0 = byte, 1 = short, 2 = long) */
170          0,                     /* bitsize */
171          FALSE,                 /* pc_relative */
172          0,                     /* bitpos */
173          complain_overflow_dont, /* complain_on_overflow */
174          _bfd_elf_rel_vtable_reloc_fn, /* special_function */
175          "R_386_GNU_VTENTRY",   /* name */
176          FALSE,                 /* partial_inplace */
177          0,                     /* src_mask */
178          0,                     /* dst_mask */
179          FALSE)                 /* pcrel_offset */
180
181 #define R_386_vt (R_386_GNU_VTENTRY + 1 - R_386_vt_offset)
182
183 };
184
185 #define X86_PCREL_TYPE_P(TYPE) ((TYPE) == R_386_PC32)
186
187 #define X86_SIZE_TYPE_P(TYPE) ((TYPE) == R_386_SIZE32)
188
189 #ifdef DEBUG_GEN_RELOC
190 #define TRACE(str) \
191   fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str)
192 #else
193 #define TRACE(str)
194 #endif
195
196 static reloc_howto_type *
197 elf_i386_reloc_type_lookup (bfd *abfd,
198                             bfd_reloc_code_real_type code)
199 {
200   switch (code)
201     {
202     case BFD_RELOC_NONE:
203       TRACE ("BFD_RELOC_NONE");
204       return &elf_howto_table[R_386_NONE];
205
206     case BFD_RELOC_32:
207       TRACE ("BFD_RELOC_32");
208       return &elf_howto_table[R_386_32];
209
210     case BFD_RELOC_CTOR:
211       TRACE ("BFD_RELOC_CTOR");
212       return &elf_howto_table[R_386_32];
213
214     case BFD_RELOC_32_PCREL:
215       TRACE ("BFD_RELOC_PC32");
216       return &elf_howto_table[R_386_PC32];
217
218     case BFD_RELOC_386_GOT32:
219       TRACE ("BFD_RELOC_386_GOT32");
220       return &elf_howto_table[R_386_GOT32];
221
222     case BFD_RELOC_386_PLT32:
223       TRACE ("BFD_RELOC_386_PLT32");
224       return &elf_howto_table[R_386_PLT32];
225
226     case BFD_RELOC_386_COPY:
227       TRACE ("BFD_RELOC_386_COPY");
228       return &elf_howto_table[R_386_COPY];
229
230     case BFD_RELOC_386_GLOB_DAT:
231       TRACE ("BFD_RELOC_386_GLOB_DAT");
232       return &elf_howto_table[R_386_GLOB_DAT];
233
234     case BFD_RELOC_386_JUMP_SLOT:
235       TRACE ("BFD_RELOC_386_JUMP_SLOT");
236       return &elf_howto_table[R_386_JUMP_SLOT];
237
238     case BFD_RELOC_386_RELATIVE:
239       TRACE ("BFD_RELOC_386_RELATIVE");
240       return &elf_howto_table[R_386_RELATIVE];
241
242     case BFD_RELOC_386_GOTOFF:
243       TRACE ("BFD_RELOC_386_GOTOFF");
244       return &elf_howto_table[R_386_GOTOFF];
245
246     case BFD_RELOC_386_GOTPC:
247       TRACE ("BFD_RELOC_386_GOTPC");
248       return &elf_howto_table[R_386_GOTPC];
249
250       /* These relocs are a GNU extension.  */
251     case BFD_RELOC_386_TLS_TPOFF:
252       TRACE ("BFD_RELOC_386_TLS_TPOFF");
253       return &elf_howto_table[R_386_TLS_TPOFF - R_386_ext_offset];
254
255     case BFD_RELOC_386_TLS_IE:
256       TRACE ("BFD_RELOC_386_TLS_IE");
257       return &elf_howto_table[R_386_TLS_IE - R_386_ext_offset];
258
259     case BFD_RELOC_386_TLS_GOTIE:
260       TRACE ("BFD_RELOC_386_TLS_GOTIE");
261       return &elf_howto_table[R_386_TLS_GOTIE - R_386_ext_offset];
262
263     case BFD_RELOC_386_TLS_LE:
264       TRACE ("BFD_RELOC_386_TLS_LE");
265       return &elf_howto_table[R_386_TLS_LE - R_386_ext_offset];
266
267     case BFD_RELOC_386_TLS_GD:
268       TRACE ("BFD_RELOC_386_TLS_GD");
269       return &elf_howto_table[R_386_TLS_GD - R_386_ext_offset];
270
271     case BFD_RELOC_386_TLS_LDM:
272       TRACE ("BFD_RELOC_386_TLS_LDM");
273       return &elf_howto_table[R_386_TLS_LDM - R_386_ext_offset];
274
275     case BFD_RELOC_16:
276       TRACE ("BFD_RELOC_16");
277       return &elf_howto_table[R_386_16 - R_386_ext_offset];
278
279     case BFD_RELOC_16_PCREL:
280       TRACE ("BFD_RELOC_16_PCREL");
281       return &elf_howto_table[R_386_PC16 - R_386_ext_offset];
282
283     case BFD_RELOC_8:
284       TRACE ("BFD_RELOC_8");
285       return &elf_howto_table[R_386_8 - R_386_ext_offset];
286
287     case BFD_RELOC_8_PCREL:
288       TRACE ("BFD_RELOC_8_PCREL");
289       return &elf_howto_table[R_386_PC8 - R_386_ext_offset];
290
291     /* Common with Sun TLS implementation.  */
292     case BFD_RELOC_386_TLS_LDO_32:
293       TRACE ("BFD_RELOC_386_TLS_LDO_32");
294       return &elf_howto_table[R_386_TLS_LDO_32 - R_386_tls_offset];
295
296     case BFD_RELOC_386_TLS_IE_32:
297       TRACE ("BFD_RELOC_386_TLS_IE_32");
298       return &elf_howto_table[R_386_TLS_IE_32 - R_386_tls_offset];
299
300     case BFD_RELOC_386_TLS_LE_32:
301       TRACE ("BFD_RELOC_386_TLS_LE_32");
302       return &elf_howto_table[R_386_TLS_LE_32 - R_386_tls_offset];
303
304     case BFD_RELOC_386_TLS_DTPMOD32:
305       TRACE ("BFD_RELOC_386_TLS_DTPMOD32");
306       return &elf_howto_table[R_386_TLS_DTPMOD32 - R_386_tls_offset];
307
308     case BFD_RELOC_386_TLS_DTPOFF32:
309       TRACE ("BFD_RELOC_386_TLS_DTPOFF32");
310       return &elf_howto_table[R_386_TLS_DTPOFF32 - R_386_tls_offset];
311
312     case BFD_RELOC_386_TLS_TPOFF32:
313       TRACE ("BFD_RELOC_386_TLS_TPOFF32");
314       return &elf_howto_table[R_386_TLS_TPOFF32 - R_386_tls_offset];
315
316     case BFD_RELOC_SIZE32:
317       TRACE ("BFD_RELOC_SIZE32");
318       return &elf_howto_table[R_386_SIZE32 - R_386_tls_offset];
319
320     case BFD_RELOC_386_TLS_GOTDESC:
321       TRACE ("BFD_RELOC_386_TLS_GOTDESC");
322       return &elf_howto_table[R_386_TLS_GOTDESC - R_386_tls_offset];
323
324     case BFD_RELOC_386_TLS_DESC_CALL:
325       TRACE ("BFD_RELOC_386_TLS_DESC_CALL");
326       return &elf_howto_table[R_386_TLS_DESC_CALL - R_386_tls_offset];
327
328     case BFD_RELOC_386_TLS_DESC:
329       TRACE ("BFD_RELOC_386_TLS_DESC");
330       return &elf_howto_table[R_386_TLS_DESC - R_386_tls_offset];
331
332     case BFD_RELOC_386_IRELATIVE:
333       TRACE ("BFD_RELOC_386_IRELATIVE");
334       return &elf_howto_table[R_386_IRELATIVE - R_386_tls_offset];
335
336     case BFD_RELOC_386_GOT32X:
337       TRACE ("BFD_RELOC_386_GOT32X");
338       return &elf_howto_table[R_386_GOT32X - R_386_tls_offset];
339
340     case BFD_RELOC_VTABLE_INHERIT:
341       TRACE ("BFD_RELOC_VTABLE_INHERIT");
342       return &elf_howto_table[R_386_GNU_VTINHERIT - R_386_vt_offset];
343
344     case BFD_RELOC_VTABLE_ENTRY:
345       TRACE ("BFD_RELOC_VTABLE_ENTRY");
346       return &elf_howto_table[R_386_GNU_VTENTRY - R_386_vt_offset];
347
348     default:
349       TRACE ("Unknown");
350       /* xgettext:c-format */
351       _bfd_error_handler (_("%pB: unsupported relocation type: %#x"),
352                           abfd, (int) code);
353       bfd_set_error (bfd_error_bad_value);
354       return NULL;
355     }
356 }
357
358 static reloc_howto_type *
359 elf_i386_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
360                             const char *r_name)
361 {
362   unsigned int i;
363
364   for (i = 0; i < sizeof (elf_howto_table) / sizeof (elf_howto_table[0]); i++)
365     if (elf_howto_table[i].name != NULL
366         && strcasecmp (elf_howto_table[i].name, r_name) == 0)
367       return &elf_howto_table[i];
368
369   return NULL;
370 }
371
372 static reloc_howto_type *
373 elf_i386_rtype_to_howto (unsigned r_type)
374 {
375   unsigned int indx;
376
377   if ((indx = r_type) >= R_386_standard
378       && ((indx = r_type - R_386_ext_offset) - R_386_standard
379           >= R_386_ext - R_386_standard)
380       && ((indx = r_type - R_386_tls_offset) - R_386_ext
381           >= R_386_ext2 - R_386_ext)
382       && ((indx = r_type - R_386_vt_offset) - R_386_ext2
383           >= R_386_vt - R_386_ext2))
384       return NULL;
385   /* PR 17512: file: 0f67f69d.  */
386   if (elf_howto_table [indx].type != r_type)
387     return NULL;
388   return &elf_howto_table[indx];
389 }
390
391 static bfd_boolean
392 elf_i386_info_to_howto_rel (bfd *abfd,
393                             arelent *cache_ptr,
394                             Elf_Internal_Rela *dst)
395 {
396   unsigned int r_type = ELF32_R_TYPE (dst->r_info);
397
398   if ((cache_ptr->howto = elf_i386_rtype_to_howto (r_type)) == NULL)
399     {
400       /* xgettext:c-format */
401       _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
402                           abfd, r_type);
403       bfd_set_error (bfd_error_bad_value);
404       return FALSE;
405     }
406
407   return TRUE;
408 }
409
410 /* Return whether a symbol name implies a local label.  The UnixWare
411    2.1 cc generates temporary symbols that start with .X, so we
412    recognize them here.  FIXME: do other SVR4 compilers also use .X?.
413    If so, we should move the .X recognition into
414    _bfd_elf_is_local_label_name.  */
415
416 static bfd_boolean
417 elf_i386_is_local_label_name (bfd *abfd, const char *name)
418 {
419   if (name[0] == '.' && name[1] == 'X')
420     return TRUE;
421
422   return _bfd_elf_is_local_label_name (abfd, name);
423 }
424 \f
425 /* Support for core dump NOTE sections.  */
426
427 static bfd_boolean
428 elf_i386_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
429 {
430   int offset;
431   size_t size;
432
433   if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
434     {
435       int pr_version = bfd_get_32 (abfd, note->descdata);
436
437       if (pr_version != 1)
438         return FALSE;
439
440       /* pr_cursig */
441       elf_tdata (abfd)->core->signal = bfd_get_32 (abfd, note->descdata + 20);
442
443       /* pr_pid */
444       elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
445
446       /* pr_reg */
447       offset = 28;
448       size = bfd_get_32 (abfd, note->descdata + 8);
449     }
450   else
451     {
452       switch (note->descsz)
453         {
454         default:
455           return FALSE;
456
457         case 144:               /* Linux/i386 */
458           /* pr_cursig */
459           elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
460
461           /* pr_pid */
462           elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
463
464           /* pr_reg */
465           offset = 72;
466           size = 68;
467
468           break;
469         }
470     }
471
472   /* Make a ".reg/999" section.  */
473   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
474                                           size, note->descpos + offset);
475 }
476
477 static bfd_boolean
478 elf_i386_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
479 {
480   if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
481     {
482       int pr_version = bfd_get_32 (abfd, note->descdata);
483
484       if (pr_version != 1)
485         return FALSE;
486
487       elf_tdata (abfd)->core->program
488         = _bfd_elfcore_strndup (abfd, note->descdata + 8, 17);
489       elf_tdata (abfd)->core->command
490         = _bfd_elfcore_strndup (abfd, note->descdata + 25, 81);
491     }
492   else
493     {
494       switch (note->descsz)
495         {
496         default:
497           return FALSE;
498
499         case 124:               /* Linux/i386 elf_prpsinfo.  */
500           elf_tdata (abfd)->core->pid
501             = bfd_get_32 (abfd, note->descdata + 12);
502           elf_tdata (abfd)->core->program
503             = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
504           elf_tdata (abfd)->core->command
505             = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
506         }
507     }
508
509   /* Note that for some reason, a spurious space is tacked
510      onto the end of the args in some (at least one anyway)
511      implementations, so strip it off if it exists.  */
512   {
513     char *command = elf_tdata (abfd)->core->command;
514     int n = strlen (command);
515
516     if (0 < n && command[n - 1] == ' ')
517       command[n - 1] = '\0';
518   }
519
520   return TRUE;
521 }
522 \f
523 /* Functions for the i386 ELF linker.
524
525    In order to gain some understanding of code in this file without
526    knowing all the intricate details of the linker, note the
527    following:
528
529    Functions named elf_i386_* are called by external routines, other
530    functions are only called locally.  elf_i386_* functions appear
531    in this file more or less in the order in which they are called
532    from external routines.  eg. elf_i386_check_relocs is called
533    early in the link process, elf_i386_finish_dynamic_sections is
534    one of the last functions.  */
535
536 /* The size in bytes of an entry in the lazy procedure linkage table.  */
537
538 #define LAZY_PLT_ENTRY_SIZE 16
539
540 /* The size in bytes of an entry in the non-lazy procedure linkage
541    table.  */
542
543 #define NON_LAZY_PLT_ENTRY_SIZE 8
544
545 /* The first entry in an absolute lazy procedure linkage table looks
546    like this.  See the SVR4 ABI i386 supplement to see how this works.
547    Will be padded to LAZY_PLT_ENTRY_SIZE with lazy_plt->plt0_pad_byte.  */
548
549 static const bfd_byte elf_i386_lazy_plt0_entry[12] =
550 {
551   0xff, 0x35,   /* pushl contents of address */
552   0, 0, 0, 0,   /* replaced with address of .got + 4.  */
553   0xff, 0x25,   /* jmp indirect */
554   0, 0, 0, 0    /* replaced with address of .got + 8.  */
555 };
556
557 /* Subsequent entries in an absolute lazy procedure linkage table look
558    like this.  */
559
560 static const bfd_byte elf_i386_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
561 {
562   0xff, 0x25,   /* jmp indirect */
563   0, 0, 0, 0,   /* replaced with address of this symbol in .got.  */
564   0x68,         /* pushl immediate */
565   0, 0, 0, 0,   /* replaced with offset into relocation table.  */
566   0xe9,         /* jmp relative */
567   0, 0, 0, 0    /* replaced with offset to start of .plt.  */
568 };
569
570 /* The first entry in a PIC lazy procedure linkage table look like
571    this.  Will be padded to LAZY_PLT_ENTRY_SIZE with
572    lazy_plt->plt0_pad_byte.  */
573
574 static const bfd_byte elf_i386_pic_lazy_plt0_entry[12] =
575 {
576   0xff, 0xb3, 4, 0, 0, 0,       /* pushl 4(%ebx) */
577   0xff, 0xa3, 8, 0, 0, 0        /* jmp *8(%ebx) */
578 };
579
580 /* Subsequent entries in a PIC lazy procedure linkage table look like
581    this.  */
582
583 static const bfd_byte elf_i386_pic_lazy_plt_entry[LAZY_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 non-lazy procedure linkage table look like this.  */
594
595 static const bfd_byte elf_i386_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
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 non-lazy procedure linkage table look like
603    this.  */
604
605 static const bfd_byte elf_i386_pic_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
606 {
607   0xff, 0xa3,   /* jmp *offset(%ebx)  */
608   0, 0, 0, 0,   /* replaced with offset of this symbol in .got.  */
609   0x66, 0x90    /* xchg %ax,%ax  */
610 };
611
612 /* The first entry in an absolute IBT-enabled lazy procedure linkage
613    table looks like this.  */
614
615 static const bfd_byte elf_i386_lazy_ibt_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
616 {
617   0xff, 0x35, 0, 0, 0, 0,       /* pushl GOT[1]       */
618   0xff, 0x25, 0, 0, 0, 0,       /* jmp *GOT[2]        */
619   0x0f, 0x1f, 0x40, 0x00        /* nopl 0(%rax)       */
620 };
621
622 /* Subsequent entries for an absolute IBT-enabled lazy procedure linkage
623    table look like this.  Subsequent entries for a PIC IBT-enabled lazy
624    procedure linkage table are the same.  */
625
626 static const bfd_byte elf_i386_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
627 {
628   0xf3, 0x0f, 0x1e, 0xfb,       /* endbr32                    */
629   0x68, 0, 0, 0, 0,             /* pushl immediate            */
630   0xe9, 0, 0, 0, 0,             /* jmp relative               */
631   0x66, 0x90                    /* xchg %ax,%ax               */
632 };
633
634 /* The first entry in a PIC IBT-enabled lazy procedure linkage table
635    look like.  */
636
637 static const bfd_byte elf_i386_pic_lazy_ibt_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
638 {
639   0xff, 0xb3, 4, 0, 0, 0,       /* pushl 4(%ebx)      */
640   0xff, 0xa3, 8, 0, 0, 0,       /* jmp *8(%ebx)       */
641   0x0f, 0x1f, 0x40, 0x00        /* nopl 0(%rax)       */
642 };
643
644 /* Entries for branches with IBT-enabled in the absolute non-lazey
645    procedure linkage table look like this.  They have the same size
646    as the lazy PLT entry.  */
647
648 static const bfd_byte elf_i386_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
649 {
650   0xf3, 0x0f, 0x1e, 0xfb,            /* endbr32               */
651   0xff, 0x25, 0, 0, 0, 0,            /* jmp *name@GOT         */
652   0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
653 };
654
655 /* Entries for branches with IBT-enabled in the PIC non-lazey procedure
656    linkage table look like this.  They have the same size as the lazy
657    PLT entry.  */
658
659 static const bfd_byte elf_i386_pic_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
660 {
661   0xf3, 0x0f, 0x1e, 0xfb,            /* endbr32               */
662   0xff, 0xa3, 0, 0, 0, 0,            /* jmp *name@GOT(%ebx)   */
663   0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
664 };
665
666 /* .eh_frame covering the lazy .plt section.  */
667
668 static const bfd_byte elf_i386_eh_frame_lazy_plt[] =
669 {
670   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
671   0, 0, 0, 0,                   /* CIE ID */
672   1,                            /* CIE version */
673   'z', 'R', 0,                  /* Augmentation string */
674   1,                            /* Code alignment factor */
675   0x7c,                         /* Data alignment factor */
676   8,                            /* Return address column */
677   1,                            /* Augmentation size */
678   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
679   DW_CFA_def_cfa, 4, 4,         /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
680   DW_CFA_offset + 8, 1,         /* DW_CFA_offset: r8 (eip) at cfa-4 */
681   DW_CFA_nop, DW_CFA_nop,
682
683   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
684   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
685   0, 0, 0, 0,                   /* R_386_PC32 .plt goes here */
686   0, 0, 0, 0,                   /* .plt size goes here */
687   0,                            /* Augmentation size */
688   DW_CFA_def_cfa_offset, 8,     /* DW_CFA_def_cfa_offset: 8 */
689   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
690   DW_CFA_def_cfa_offset, 12,    /* DW_CFA_def_cfa_offset: 12 */
691   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
692   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
693   11,                           /* Block length */
694   DW_OP_breg4, 4,               /* DW_OP_breg4 (esp): 4 */
695   DW_OP_breg8, 0,               /* DW_OP_breg8 (eip): 0 */
696   DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
697   DW_OP_lit2, DW_OP_shl, DW_OP_plus,
698   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
699 };
700
701 /* .eh_frame covering the lazy .plt section with IBT-enabled.  */
702
703 static const bfd_byte elf_i386_eh_frame_lazy_ibt_plt[] =
704 {
705   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
706   0, 0, 0, 0,                   /* CIE ID */
707   1,                            /* CIE version */
708   'z', 'R', 0,                  /* Augmentation string */
709   1,                            /* Code alignment factor */
710   0x7c,                         /* Data alignment factor */
711   8,                            /* Return address column */
712   1,                            /* Augmentation size */
713   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
714   DW_CFA_def_cfa, 4, 4,         /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
715   DW_CFA_offset + 8, 1,         /* DW_CFA_offset: r8 (eip) at cfa-4 */
716   DW_CFA_nop, DW_CFA_nop,
717
718   PLT_FDE_LENGTH, 0, 0, 0,      /* FDE length */
719   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
720   0, 0, 0, 0,                   /* R_386_PC32 .plt goes here */
721   0, 0, 0, 0,                   /* .plt size goes here */
722   0,                            /* Augmentation size */
723   DW_CFA_def_cfa_offset, 8,     /* DW_CFA_def_cfa_offset: 8 */
724   DW_CFA_advance_loc + 6,       /* DW_CFA_advance_loc: 6 to __PLT__+6 */
725   DW_CFA_def_cfa_offset, 12,    /* DW_CFA_def_cfa_offset: 12 */
726   DW_CFA_advance_loc + 10,      /* DW_CFA_advance_loc: 10 to __PLT__+16 */
727   DW_CFA_def_cfa_expression,    /* DW_CFA_def_cfa_expression */
728   11,                           /* Block length */
729   DW_OP_breg4, 4,               /* DW_OP_breg4 (esp): 4 */
730   DW_OP_breg8, 0,               /* DW_OP_breg8 (eip): 0 */
731   DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
732   DW_OP_lit2, DW_OP_shl, DW_OP_plus,
733   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
734 };
735
736 /* .eh_frame covering the non-lazy .plt section.  */
737
738 static const bfd_byte elf_i386_eh_frame_non_lazy_plt[] =
739 {
740 #define PLT_GOT_FDE_LENGTH              16
741   PLT_CIE_LENGTH, 0, 0, 0,      /* CIE length */
742   0, 0, 0, 0,                   /* CIE ID */
743   1,                            /* CIE version */
744   'z', 'R', 0,                  /* Augmentation string */
745   1,                            /* Code alignment factor */
746   0x7c,                         /* Data alignment factor */
747   8,                            /* Return address column */
748   1,                            /* Augmentation size */
749   DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
750   DW_CFA_def_cfa, 4, 4,         /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
751   DW_CFA_offset + 8, 1,         /* DW_CFA_offset: r8 (eip) at cfa-4 */
752   DW_CFA_nop, DW_CFA_nop,
753
754   PLT_GOT_FDE_LENGTH, 0, 0, 0,  /* FDE length */
755   PLT_CIE_LENGTH + 8, 0, 0, 0,  /* CIE pointer */
756   0, 0, 0, 0,                   /* the start of non-lazy .plt goes here */
757   0, 0, 0, 0,                   /* non-lazy .plt size goes here */
758   0,                            /* Augmentation size */
759   DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
760 };
761
762 /* These are the standard parameters.  */
763 static const struct elf_x86_lazy_plt_layout elf_i386_lazy_plt =
764   {
765     elf_i386_lazy_plt0_entry,           /* plt0_entry */
766     sizeof (elf_i386_lazy_plt0_entry),  /* plt0_entry_size */
767     elf_i386_lazy_plt_entry,            /* plt_entry */
768     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
769     NULL,                               /* plt_tlsdesc_entry */
770     0,                                  /* plt_tlsdesc_entry_size*/
771     0,                                  /* plt_tlsdesc_got1_offset */
772     0,                                  /* plt_tlsdesc_got2_offset */
773     0,                                  /* plt_tlsdesc_got1_insn_end */
774     0,                                  /* plt_tlsdesc_got2_insn_end */
775     2,                                  /* plt0_got1_offset */
776     8,                                  /* plt0_got2_offset */
777     0,                                  /* plt0_got2_insn_end */
778     2,                                  /* plt_got_offset */
779     7,                                  /* plt_reloc_offset */
780     12,                                 /* plt_plt_offset */
781     0,                                  /* plt_got_insn_size */
782     0,                                  /* plt_plt_insn_end */
783     6,                                  /* plt_lazy_offset */
784     elf_i386_pic_lazy_plt0_entry,       /* pic_plt0_entry */
785     elf_i386_pic_lazy_plt_entry,        /* pic_plt_entry */
786     elf_i386_eh_frame_lazy_plt,         /* eh_frame_plt */
787     sizeof (elf_i386_eh_frame_lazy_plt) /* eh_frame_plt_size */
788   };
789
790 static const struct elf_x86_non_lazy_plt_layout elf_i386_non_lazy_plt =
791   {
792     elf_i386_non_lazy_plt_entry,        /* plt_entry */
793     elf_i386_pic_non_lazy_plt_entry,    /* pic_plt_entry */
794     NON_LAZY_PLT_ENTRY_SIZE,            /* plt_entry_size */
795     2,                                  /* plt_got_offset */
796     0,                                  /* plt_got_insn_size */
797     elf_i386_eh_frame_non_lazy_plt,     /* eh_frame_plt */
798     sizeof (elf_i386_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
799   };
800
801 static const struct elf_x86_lazy_plt_layout elf_i386_lazy_ibt_plt =
802   {
803     elf_i386_lazy_ibt_plt0_entry,       /* plt0_entry */
804     sizeof (elf_i386_lazy_ibt_plt0_entry), /* plt0_entry_size */
805     elf_i386_lazy_ibt_plt_entry,        /* plt_entry */
806     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
807     NULL,                               /* plt_tlsdesc_entry */
808     0,                                  /* plt_tlsdesc_entry_size*/
809     0,                                  /* plt_tlsdesc_got1_offset */
810     0,                                  /* plt_tlsdesc_got2_offset */
811     0,                                  /* plt_tlsdesc_got1_insn_end */
812     0,                                  /* plt_tlsdesc_got2_insn_end */
813     2,                                  /* plt0_got1_offset */
814     8,                                  /* plt0_got2_offset */
815     0,                                  /* plt0_got2_insn_end */
816     4+2,                                /* plt_got_offset */
817     4+1,                                /* plt_reloc_offset */
818     4+6,                                /* plt_plt_offset */
819     0,                                  /* plt_got_insn_size */
820     0,                                  /* plt_plt_insn_end */
821     0,                                  /* plt_lazy_offset */
822     elf_i386_pic_lazy_ibt_plt0_entry,   /* pic_plt0_entry */
823     elf_i386_lazy_ibt_plt_entry,        /* pic_plt_entry */
824     elf_i386_eh_frame_lazy_ibt_plt,     /* eh_frame_plt */
825     sizeof (elf_i386_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
826   };
827
828 static const struct elf_x86_non_lazy_plt_layout elf_i386_non_lazy_ibt_plt =
829   {
830     elf_i386_non_lazy_ibt_plt_entry,    /* plt_entry */
831     elf_i386_pic_non_lazy_ibt_plt_entry,/* pic_plt_entry */
832     LAZY_PLT_ENTRY_SIZE,                /* plt_entry_size */
833     4+2,                                /* plt_got_offset */
834     0,                                  /* plt_got_insn_size */
835     elf_i386_eh_frame_non_lazy_plt,     /* eh_frame_plt */
836     sizeof (elf_i386_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
837   };
838 \f
839
840 /* On VxWorks, the .rel.plt.unloaded section has absolute relocations
841    for the PLTResolve stub and then for each PLT entry.  */
842 #define PLTRESOLVE_RELOCS_SHLIB 0
843 #define PLTRESOLVE_RELOCS 2
844 #define PLT_NON_JUMP_SLOT_RELOCS 2
845
846 /* These are the standard parameters.  */
847 static const struct elf_x86_backend_data elf_i386_arch_bed =
848   {
849     is_normal                           /* os */
850   };
851
852 #define elf_backend_arch_data   &elf_i386_arch_bed
853
854 /* Return TRUE if the TLS access code sequence support transition
855    from R_TYPE.  */
856
857 static bfd_boolean
858 elf_i386_check_tls_transition (asection *sec,
859                                bfd_byte *contents,
860                                Elf_Internal_Shdr *symtab_hdr,
861                                struct elf_link_hash_entry **sym_hashes,
862                                unsigned int r_type,
863                                const Elf_Internal_Rela *rel,
864                                const Elf_Internal_Rela *relend)
865 {
866   unsigned int val, type, reg;
867   unsigned long r_symndx;
868   struct elf_link_hash_entry *h;
869   bfd_vma offset;
870   bfd_byte *call;
871   bfd_boolean indirect_call;
872
873   offset = rel->r_offset;
874   switch (r_type)
875     {
876     case R_386_TLS_GD:
877     case R_386_TLS_LDM:
878       if (offset < 2 || (rel + 1) >= relend)
879         return FALSE;
880
881       indirect_call = FALSE;
882       call = contents + offset + 4;
883       val = *(call - 5);
884       type = *(call - 6);
885       if (r_type == R_386_TLS_GD)
886         {
887           /* Check transition from GD access model.  Only
888                 leal foo@tlsgd(,%ebx,1), %eax
889                 call ___tls_get_addr@PLT
890              or
891                 leal foo@tlsgd(%ebx) %eax
892                 call ___tls_get_addr@PLT
893                 nop
894              or
895                 leal foo@tlsgd(%reg), %eax
896                 call *___tls_get_addr@GOT(%reg)
897                 which may be converted to
898                 addr32 call ___tls_get_addr
899              can transit to different access model.  */
900           if ((offset + 10) > sec->size
901               || (type != 0x8d && type != 0x04))
902             return FALSE;
903
904           if (type == 0x04)
905             {
906               /* leal foo@tlsgd(,%ebx,1), %eax
907                  call ___tls_get_addr@PLT  */
908               if (offset < 3)
909                 return FALSE;
910
911               if (*(call - 7) != 0x8d
912                   || val != 0x1d
913                   || call[0] != 0xe8)
914                 return FALSE;
915             }
916           else
917             {
918               /* This must be
919                         leal foo@tlsgd(%ebx), %eax
920                         call ___tls_get_addr@PLT
921                         nop
922                  or
923                         leal foo@tlsgd(%reg), %eax
924                         call *___tls_get_addr@GOT(%reg)
925                         which may be converted to
926                         addr32 call ___tls_get_addr
927
928                  %eax can't be used as the GOT base register since it
929                  is used to pass parameter to ___tls_get_addr.  */
930               reg = val & 7;
931               if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0)
932                 return FALSE;
933
934               indirect_call = call[0] == 0xff;
935               if (!(reg == 3 && call[0] == 0xe8 && call[5] == 0x90)
936                   && !(call[0] == 0x67 && call[1] == 0xe8)
937                   && !(indirect_call
938                        && (call[1] & 0xf8) == 0x90
939                        && (call[1] & 0x7) == reg))
940                 return FALSE;
941             }
942         }
943       else
944         {
945           /* Check transition from LD access model.  Only
946                 leal foo@tlsldm(%ebx), %eax
947                 call ___tls_get_addr@PLT
948              or
949                 leal foo@tlsldm(%reg), %eax
950                 call *___tls_get_addr@GOT(%reg)
951                 which may be converted to
952                 addr32 call ___tls_get_addr
953              can transit to different access model.  */
954           if (type != 0x8d || (offset + 9) > sec->size)
955             return FALSE;
956
957           /* %eax can't be used as the GOT base register since it is
958              used to pass parameter to ___tls_get_addr.  */
959           reg = val & 7;
960           if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0)
961             return FALSE;
962
963           indirect_call = call[0] == 0xff;
964           if (!(reg == 3 && call[0] == 0xe8)
965               && !(call[0] == 0x67 && call[1] == 0xe8)
966               && !(indirect_call
967                    && (call[1] & 0xf8) == 0x90
968                    && (call[1] & 0x7) == reg))
969             return FALSE;
970         }
971
972       r_symndx = ELF32_R_SYM (rel[1].r_info);
973       if (r_symndx < symtab_hdr->sh_info)
974         return FALSE;
975
976       h = sym_hashes[r_symndx - symtab_hdr->sh_info];
977       if (h == NULL
978           || !((struct elf_x86_link_hash_entry *) h)->tls_get_addr)
979         return FALSE;
980       else if (indirect_call)
981         return (ELF32_R_TYPE (rel[1].r_info) == R_386_GOT32X);
982       else
983         return (ELF32_R_TYPE (rel[1].r_info) == R_386_PC32
984                 || ELF32_R_TYPE (rel[1].r_info) == R_386_PLT32);
985
986     case R_386_TLS_IE:
987       /* Check transition from IE access model:
988                 movl foo@indntpoff(%rip), %eax
989                 movl foo@indntpoff(%rip), %reg
990                 addl foo@indntpoff(%rip), %reg
991        */
992
993       if (offset < 1 || (offset + 4) > sec->size)
994         return FALSE;
995
996       /* Check "movl foo@tpoff(%rip), %eax" first.  */
997       val = bfd_get_8 (abfd, contents + offset - 1);
998       if (val == 0xa1)
999         return TRUE;
1000
1001       if (offset < 2)
1002         return FALSE;
1003
1004       /* Check movl|addl foo@tpoff(%rip), %reg.   */
1005       type = bfd_get_8 (abfd, contents + offset - 2);
1006       return ((type == 0x8b || type == 0x03)
1007               && (val & 0xc7) == 0x05);
1008
1009     case R_386_TLS_GOTIE:
1010     case R_386_TLS_IE_32:
1011       /* Check transition from {IE_32,GOTIE} access model:
1012                 subl foo@{tpoff,gontoff}(%reg1), %reg2
1013                 movl foo@{tpoff,gontoff}(%reg1), %reg2
1014                 addl foo@{tpoff,gontoff}(%reg1), %reg2
1015        */
1016
1017       if (offset < 2 || (offset + 4) > sec->size)
1018         return FALSE;
1019
1020       val = bfd_get_8 (abfd, contents + offset - 1);
1021       if ((val & 0xc0) != 0x80 || (val & 7) == 4)
1022         return FALSE;
1023
1024       type = bfd_get_8 (abfd, contents + offset - 2);
1025       return type == 0x8b || type == 0x2b || type == 0x03;
1026
1027     case R_386_TLS_GOTDESC:
1028       /* Check transition from GDesc access model:
1029                 leal x@tlsdesc(%ebx), %eax
1030
1031          Make sure it's a leal adding ebx to a 32-bit offset
1032          into any register, although it's probably almost always
1033          going to be eax.  */
1034
1035       if (offset < 2 || (offset + 4) > sec->size)
1036         return FALSE;
1037
1038       if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1039         return FALSE;
1040
1041       val = bfd_get_8 (abfd, contents + offset - 1);
1042       return (val & 0xc7) == 0x83;
1043
1044     case R_386_TLS_DESC_CALL:
1045       /* Check transition from GDesc access model:
1046                 call *x@tlsdesc(%eax)
1047        */
1048       if (offset + 2 <= sec->size)
1049         {
1050           /* Make sure that it's a call *x@tlsdesc(%eax).  */
1051           call = contents + offset;
1052           return call[0] == 0xff && call[1] == 0x10;
1053         }
1054
1055       return FALSE;
1056
1057     default:
1058       abort ();
1059     }
1060 }
1061
1062 /* Return TRUE if the TLS access transition is OK or no transition
1063    will be performed.  Update R_TYPE if there is a transition.  */
1064
1065 static bfd_boolean
1066 elf_i386_tls_transition (struct bfd_link_info *info, bfd *abfd,
1067                          asection *sec, bfd_byte *contents,
1068                          Elf_Internal_Shdr *symtab_hdr,
1069                          struct elf_link_hash_entry **sym_hashes,
1070                          unsigned int *r_type, int tls_type,
1071                          const Elf_Internal_Rela *rel,
1072                          const Elf_Internal_Rela *relend,
1073                          struct elf_link_hash_entry *h,
1074                          unsigned long r_symndx,
1075                          bfd_boolean from_relocate_section)
1076 {
1077   unsigned int from_type = *r_type;
1078   unsigned int to_type = from_type;
1079   bfd_boolean check = TRUE;
1080
1081   /* Skip TLS transition for functions.  */
1082   if (h != NULL
1083       && (h->type == STT_FUNC
1084           || h->type == STT_GNU_IFUNC))
1085     return TRUE;
1086
1087   switch (from_type)
1088     {
1089     case R_386_TLS_GD:
1090     case R_386_TLS_GOTDESC:
1091     case R_386_TLS_DESC_CALL:
1092     case R_386_TLS_IE_32:
1093     case R_386_TLS_IE:
1094     case R_386_TLS_GOTIE:
1095       if (bfd_link_executable (info))
1096         {
1097           if (h == NULL)
1098             to_type = R_386_TLS_LE_32;
1099           else if (from_type != R_386_TLS_IE
1100                    && from_type != R_386_TLS_GOTIE)
1101             to_type = R_386_TLS_IE_32;
1102         }
1103
1104       /* When we are called from elf_i386_relocate_section, there may
1105          be additional transitions based on TLS_TYPE.  */
1106       if (from_relocate_section)
1107         {
1108           unsigned int new_to_type = to_type;
1109
1110           if (TLS_TRANSITION_IE_TO_LE_P (info, h, tls_type))
1111             new_to_type = R_386_TLS_LE_32;
1112
1113           if (to_type == R_386_TLS_GD
1114               || to_type == R_386_TLS_GOTDESC
1115               || to_type == R_386_TLS_DESC_CALL)
1116             {
1117               if (tls_type == GOT_TLS_IE_POS)
1118                 new_to_type = R_386_TLS_GOTIE;
1119               else if (tls_type & GOT_TLS_IE)
1120                 new_to_type = R_386_TLS_IE_32;
1121             }
1122
1123           /* We checked the transition before when we were called from
1124              elf_i386_check_relocs.  We only want to check the new
1125              transition which hasn't been checked before.  */
1126           check = new_to_type != to_type && from_type == to_type;
1127           to_type = new_to_type;
1128         }
1129
1130       break;
1131
1132     case R_386_TLS_LDM:
1133       if (bfd_link_executable (info))
1134         to_type = R_386_TLS_LE_32;
1135       break;
1136
1137     default:
1138       return TRUE;
1139     }
1140
1141   /* Return TRUE if there is no transition.  */
1142   if (from_type == to_type)
1143     return TRUE;
1144
1145   /* Check if the transition can be performed.  */
1146   if (check
1147       && ! elf_i386_check_tls_transition (sec, contents,
1148                                           symtab_hdr, sym_hashes,
1149                                           from_type, rel, relend))
1150     {
1151       reloc_howto_type *from, *to;
1152       const char *name;
1153
1154       from = elf_i386_rtype_to_howto (from_type);
1155       to = elf_i386_rtype_to_howto (to_type);
1156
1157       if (h)
1158         name = h->root.root.string;
1159       else
1160         {
1161           struct elf_x86_link_hash_table *htab;
1162
1163           htab = elf_x86_hash_table (info, I386_ELF_DATA);
1164           if (htab == NULL)
1165             name = "*unknown*";
1166           else
1167             {
1168               Elf_Internal_Sym *isym;
1169
1170               isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1171                                             abfd, r_symndx);
1172               name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1173             }
1174         }
1175
1176       _bfd_error_handler
1177         /* xgettext:c-format */
1178         (_("%pB: TLS transition from %s to %s against `%s'"
1179            " at %#" PRIx64 " in section `%pA' failed"),
1180          abfd, from->name, to->name, name,
1181          (uint64_t) rel->r_offset, sec);
1182       bfd_set_error (bfd_error_bad_value);
1183       return FALSE;
1184     }
1185
1186   *r_type = to_type;
1187   return TRUE;
1188 }
1189
1190 /* With the local symbol, foo, we convert
1191    mov foo@GOT[(%reg1)], %reg2
1192    to
1193    lea foo[@GOTOFF(%reg1)], %reg2
1194    and convert
1195    call/jmp *foo@GOT[(%reg)]
1196    to
1197    nop call foo/jmp foo nop
1198    When PIC is false, convert
1199    test %reg1, foo@GOT[(%reg2)]
1200    to
1201    test $foo, %reg1
1202    and convert
1203    binop foo@GOT[(%reg1)], %reg2
1204    to
1205    binop $foo, %reg2
1206    where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1207    instructions.  */
1208
1209 static
1210 bfd_boolean
1211 elf_i386_convert_load_reloc (bfd *abfd, Elf_Internal_Shdr *symtab_hdr,
1212                              bfd_byte *contents,
1213                              unsigned int *r_type_p,
1214                              Elf_Internal_Rela *irel,
1215                              struct elf_link_hash_entry *h,
1216                              bfd_boolean *converted,
1217                              struct bfd_link_info *link_info)
1218 {
1219   struct elf_x86_link_hash_table *htab;
1220   unsigned int opcode;
1221   unsigned int modrm;
1222   bfd_boolean baseless;
1223   Elf_Internal_Sym *isym;
1224   unsigned int addend;
1225   unsigned int nop;
1226   bfd_vma nop_offset;
1227   bfd_boolean is_pic;
1228   bfd_boolean to_reloc_32;
1229   unsigned int r_type;
1230   unsigned int r_symndx;
1231   bfd_vma roff = irel->r_offset;
1232   bfd_boolean local_ref;
1233   struct elf_x86_link_hash_entry *eh;
1234
1235   if (roff < 2)
1236     return TRUE;
1237
1238   /* Addend for R_386_GOT32X relocations must be 0.  */
1239   addend = bfd_get_32 (abfd, contents + roff);
1240   if (addend != 0)
1241     return TRUE;
1242
1243   htab = elf_x86_hash_table (link_info, I386_ELF_DATA);
1244   is_pic = bfd_link_pic (link_info);
1245
1246   r_type = *r_type_p;
1247   r_symndx = ELF32_R_SYM (irel->r_info);
1248
1249   modrm = bfd_get_8 (abfd, contents + roff - 1);
1250   baseless = (modrm & 0xc7) == 0x5;
1251
1252   if (baseless && is_pic)
1253     {
1254       /* For PIC, disallow R_386_GOT32X without a base register
1255          since we don't know what the GOT base is.  */
1256       const char *name;
1257
1258       if (h == NULL)
1259         {
1260           isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd,
1261                                         r_symndx);
1262           name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1263         }
1264       else
1265         name = h->root.root.string;
1266
1267       _bfd_error_handler
1268         /* xgettext:c-format */
1269         (_("%pB: direct GOT relocation R_386_GOT32X against `%s' without base"
1270            " register can not be used when making a shared object"),
1271          abfd, name);
1272       return FALSE;
1273     }
1274
1275   opcode = bfd_get_8 (abfd, contents + roff - 2);
1276
1277   /* Convert to R_386_32 if PIC is false or there is no base
1278      register.  */
1279   to_reloc_32 = !is_pic || baseless;
1280
1281   eh = elf_x86_hash_entry (h);
1282
1283   /* Try to convert R_386_GOT32X.  Get the symbol referred to by the
1284      reloc.  */
1285   if (h == NULL)
1286     {
1287       if (opcode == 0x0ff)
1288         /* Convert "call/jmp *foo@GOT[(%reg)]".  */
1289         goto convert_branch;
1290       else
1291         /* Convert "mov foo@GOT[(%reg1)], %reg2",
1292            "test %reg1, foo@GOT(%reg2)" and
1293            "binop foo@GOT[(%reg1)], %reg2". */
1294         goto convert_load;
1295     }
1296
1297   /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P.  */
1298   local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
1299
1300   /* Undefined weak symbol is only bound locally in executable
1301      and its reference is resolved as 0.  */
1302   if (h->root.type == bfd_link_hash_undefweak
1303       && !eh->linker_def
1304       && local_ref)
1305     {
1306       if (opcode == 0xff)
1307         {
1308           /* No direct branch to 0 for PIC.  */
1309           if (is_pic)
1310             return TRUE;
1311           else
1312             goto convert_branch;
1313         }
1314       else
1315         {
1316           /* We can convert load of address 0 to R_386_32.  */
1317           to_reloc_32 = TRUE;
1318           goto convert_load;
1319         }
1320     }
1321
1322   if (opcode == 0xff)
1323     {
1324       /* We have "call/jmp *foo@GOT[(%reg)]".  */
1325       if ((h->root.type == bfd_link_hash_defined
1326            || h->root.type == bfd_link_hash_defweak)
1327           && local_ref)
1328         {
1329           /* The function is locally defined.   */
1330 convert_branch:
1331           /* Convert R_386_GOT32X to R_386_PC32.  */
1332           if (modrm == 0x15 || (modrm & 0xf8) == 0x90)
1333             {
1334               /* Convert to "nop call foo".  ADDR_PREFIX_OPCODE
1335                  is a nop prefix.  */
1336               modrm = 0xe8;
1337               /* To support TLS optimization, always use addr32 prefix
1338                  for "call *___tls_get_addr@GOT(%reg)".  */
1339               if (eh && eh->tls_get_addr)
1340                 {
1341                   nop = 0x67;
1342                   nop_offset = irel->r_offset - 2;
1343                 }
1344               else
1345                 {
1346                   nop = link_info->call_nop_byte;
1347                   if (link_info->call_nop_as_suffix)
1348                     {
1349                       nop_offset = roff + 3;
1350                       irel->r_offset -= 1;
1351                     }
1352                   else
1353                     nop_offset = roff - 2;
1354                 }
1355             }
1356           else
1357             {
1358               /* Convert to "jmp foo nop".  */
1359               modrm = 0xe9;
1360               nop = NOP_OPCODE;
1361               nop_offset = roff + 3;
1362               irel->r_offset -= 1;
1363             }
1364
1365           bfd_put_8 (abfd, nop, contents + nop_offset);
1366           bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1367           /* When converting to PC-relative relocation, we
1368              need to adjust addend by -4.  */
1369           bfd_put_32 (abfd, -4, contents + irel->r_offset);
1370           irel->r_info = ELF32_R_INFO (r_symndx, R_386_PC32);
1371           *r_type_p = R_386_PC32;
1372           *converted = TRUE;
1373         }
1374     }
1375   else
1376     {
1377       /* We have "mov foo@GOT[(%re1g)], %reg2",
1378          "test %reg1, foo@GOT(%reg2)" and
1379          "binop foo@GOT[(%reg1)], %reg2".
1380
1381          Avoid optimizing _DYNAMIC since ld.so may use its
1382          link-time address.  */
1383       if (h == htab->elf.hdynamic)
1384         return TRUE;
1385
1386       /* def_regular is set by an assignment in a linker script in
1387          bfd_elf_record_link_assignment.  start_stop is set on
1388          __start_SECNAME/__stop_SECNAME which mark section SECNAME.  */
1389       if (h->start_stop
1390           || eh->linker_def
1391           || ((h->def_regular
1392                || h->root.type == bfd_link_hash_defined
1393                || h->root.type == bfd_link_hash_defweak)
1394               && local_ref))
1395         {
1396 convert_load:
1397           if (opcode == 0x8b)
1398             {
1399               if (to_reloc_32)
1400                 {
1401                   /* Convert "mov foo@GOT[(%reg1)], %reg2" to
1402                      "mov $foo, %reg2" with R_386_32.  */
1403                   r_type = R_386_32;
1404                   modrm = 0xc0 | (modrm & 0x38) >> 3;
1405                   bfd_put_8 (abfd, modrm, contents + roff - 1);
1406                   opcode = 0xc7;
1407                 }
1408               else
1409                 {
1410                   /* Convert "mov foo@GOT(%reg1), %reg2" to
1411                      "lea foo@GOTOFF(%reg1), %reg2".  */
1412                   r_type = R_386_GOTOFF;
1413                   opcode = 0x8d;
1414                 }
1415             }
1416           else
1417             {
1418               /* Only R_386_32 is supported.  */
1419               if (!to_reloc_32)
1420                 return TRUE;
1421
1422               if (opcode == 0x85)
1423                 {
1424                   /* Convert "test %reg1, foo@GOT(%reg2)" to
1425                      "test $foo, %reg1".  */
1426                   modrm = 0xc0 | (modrm & 0x38) >> 3;
1427                   opcode = 0xf7;
1428                 }
1429               else
1430                 {
1431                   /* Convert "binop foo@GOT(%reg1), %reg2" to
1432                      "binop $foo, %reg2".  */
1433                   modrm = (0xc0
1434                            | (modrm & 0x38) >> 3
1435                            | (opcode & 0x3c));
1436                   opcode = 0x81;
1437                 }
1438               bfd_put_8 (abfd, modrm, contents + roff - 1);
1439               r_type = R_386_32;
1440             }
1441
1442           bfd_put_8 (abfd, opcode, contents + roff - 2);
1443           irel->r_info = ELF32_R_INFO (r_symndx, r_type);
1444           *r_type_p = r_type;
1445           *converted = TRUE;
1446         }
1447     }
1448
1449   return TRUE;
1450 }
1451
1452 /* Rename some of the generic section flags to better document how they
1453    are used here.  */
1454 #define check_relocs_failed     sec_flg0
1455
1456 /* Look through the relocs for a section during the first phase, and
1457    calculate needed space in the global offset table, procedure linkage
1458    table, and dynamic reloc sections.  */
1459
1460 static bfd_boolean
1461 elf_i386_check_relocs (bfd *abfd,
1462                        struct bfd_link_info *info,
1463                        asection *sec,
1464                        const Elf_Internal_Rela *relocs)
1465 {
1466   struct elf_x86_link_hash_table *htab;
1467   Elf_Internal_Shdr *symtab_hdr;
1468   struct elf_link_hash_entry **sym_hashes;
1469   const Elf_Internal_Rela *rel;
1470   const Elf_Internal_Rela *rel_end;
1471   asection *sreloc;
1472   bfd_byte *contents;
1473   bfd_boolean converted;
1474
1475   if (bfd_link_relocatable (info))
1476     return TRUE;
1477
1478   /* Don't do anything special with non-loaded, non-alloced sections.
1479      In particular, any relocs in such sections should not affect GOT
1480      and PLT reference counting (ie. we don't allow them to create GOT
1481      or PLT entries), there's no possibility or desire to optimize TLS
1482      relocs, and there's not much point in propagating relocs to shared
1483      libs that the dynamic linker won't relocate.  */
1484   if ((sec->flags & SEC_ALLOC) == 0)
1485     return TRUE;
1486
1487   htab = elf_x86_hash_table (info, I386_ELF_DATA);
1488   if (htab == NULL)
1489     {
1490       sec->check_relocs_failed = 1;
1491       return FALSE;
1492     }
1493
1494   BFD_ASSERT (is_x86_elf (abfd, htab));
1495
1496   /* Get the section contents.  */
1497   if (elf_section_data (sec)->this_hdr.contents != NULL)
1498     contents = elf_section_data (sec)->this_hdr.contents;
1499   else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1500     {
1501       sec->check_relocs_failed = 1;
1502       return FALSE;
1503     }
1504
1505   symtab_hdr = &elf_symtab_hdr (abfd);
1506   sym_hashes = elf_sym_hashes (abfd);
1507
1508   converted = FALSE;
1509
1510   sreloc = NULL;
1511
1512   rel_end = relocs + sec->reloc_count;
1513   for (rel = relocs; rel < rel_end; rel++)
1514     {
1515       unsigned int r_type;
1516       unsigned int r_symndx;
1517       struct elf_link_hash_entry *h;
1518       struct elf_x86_link_hash_entry *eh;
1519       Elf_Internal_Sym *isym;
1520       const char *name;
1521       bfd_boolean size_reloc;
1522
1523       r_symndx = ELF32_R_SYM (rel->r_info);
1524       r_type = ELF32_R_TYPE (rel->r_info);
1525
1526       if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1527         {
1528           /* xgettext:c-format */
1529           _bfd_error_handler (_("%pB: bad symbol index: %d"),
1530                               abfd, r_symndx);
1531           goto error_return;
1532         }
1533
1534       if (r_symndx < symtab_hdr->sh_info)
1535         {
1536           /* A local symbol.  */
1537           isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1538                                         abfd, r_symndx);
1539           if (isym == NULL)
1540             goto error_return;
1541
1542           /* Check relocation against local STT_GNU_IFUNC symbol.  */
1543           if (ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1544             {
1545               h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel, TRUE);
1546               if (h == NULL)
1547                 goto error_return;
1548
1549               /* Fake a STT_GNU_IFUNC symbol.  */
1550               h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1551                                                       isym, NULL);
1552               h->type = STT_GNU_IFUNC;
1553               h->def_regular = 1;
1554               h->ref_regular = 1;
1555               h->forced_local = 1;
1556               h->root.type = bfd_link_hash_defined;
1557             }
1558           else
1559             h = NULL;
1560         }
1561       else
1562         {
1563           isym = NULL;
1564           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1565           while (h->root.type == bfd_link_hash_indirect
1566                  || h->root.type == bfd_link_hash_warning)
1567             h = (struct elf_link_hash_entry *) h->root.u.i.link;
1568         }
1569
1570       eh = (struct elf_x86_link_hash_entry *) h;
1571       if (h != NULL)
1572         {
1573           if (r_type == R_386_GOTOFF)
1574             eh->gotoff_ref = 1;
1575
1576           /* It is referenced by a non-shared object. */
1577           h->ref_regular = 1;
1578
1579           if (h->type == STT_GNU_IFUNC)
1580             elf_tdata (info->output_bfd)->has_gnu_symbols
1581               |= elf_gnu_symbol_ifunc;
1582         }
1583
1584       if (r_type == R_386_GOT32X
1585           && (h == NULL || h->type != STT_GNU_IFUNC))
1586         {
1587           Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1588           if (!elf_i386_convert_load_reloc (abfd, symtab_hdr, contents,
1589                                             &r_type, irel, h,
1590                                             &converted, info))
1591             goto error_return;
1592         }
1593
1594       if (! elf_i386_tls_transition (info, abfd, sec, contents,
1595                                      symtab_hdr, sym_hashes,
1596                                      &r_type, GOT_UNKNOWN,
1597                                      rel, rel_end, h, r_symndx, FALSE))
1598         goto error_return;
1599
1600       /* Check if _GLOBAL_OFFSET_TABLE_ is referenced.  */
1601       if (h == htab->elf.hgot)
1602         htab->got_referenced = TRUE;
1603
1604       switch (r_type)
1605         {
1606         case R_386_TLS_LDM:
1607           htab->tls_ld_or_ldm_got.refcount = 1;
1608           goto create_got;
1609
1610         case R_386_PLT32:
1611           /* This symbol requires a procedure linkage table entry.  We
1612              actually build the entry in adjust_dynamic_symbol,
1613              because this might be a case of linking PIC code which is
1614              never referenced by a dynamic object, in which case we
1615              don't need to generate a procedure linkage table entry
1616              after all.  */
1617
1618           /* If this is a local symbol, we resolve it directly without
1619              creating a procedure linkage table entry.  */
1620           if (h == NULL)
1621             continue;
1622
1623           eh->zero_undefweak &= 0x2;
1624           h->needs_plt = 1;
1625           h->plt.refcount = 1;
1626           break;
1627
1628         case R_386_SIZE32:
1629           size_reloc = TRUE;
1630           goto do_size;
1631
1632         case R_386_TLS_IE_32:
1633         case R_386_TLS_IE:
1634         case R_386_TLS_GOTIE:
1635           if (!bfd_link_executable (info))
1636             info->flags |= DF_STATIC_TLS;
1637           /* Fall through */
1638
1639         case R_386_GOT32:
1640         case R_386_GOT32X:
1641         case R_386_TLS_GD:
1642         case R_386_TLS_GOTDESC:
1643         case R_386_TLS_DESC_CALL:
1644           /* This symbol requires a global offset table entry.  */
1645           {
1646             int tls_type, old_tls_type;
1647
1648             switch (r_type)
1649               {
1650               default:
1651               case R_386_GOT32:
1652               case R_386_GOT32X:
1653                 tls_type = GOT_NORMAL;
1654                 break;
1655               case R_386_TLS_GD: tls_type = GOT_TLS_GD; break;
1656               case R_386_TLS_GOTDESC:
1657               case R_386_TLS_DESC_CALL:
1658                 tls_type = GOT_TLS_GDESC; break;
1659               case R_386_TLS_IE_32:
1660                 if (ELF32_R_TYPE (rel->r_info) == r_type)
1661                   tls_type = GOT_TLS_IE_NEG;
1662                 else
1663                   /* If this is a GD->IE transition, we may use either of
1664                      R_386_TLS_TPOFF and R_386_TLS_TPOFF32.  */
1665                   tls_type = GOT_TLS_IE;
1666                 break;
1667               case R_386_TLS_IE:
1668               case R_386_TLS_GOTIE:
1669                 tls_type = GOT_TLS_IE_POS; break;
1670               }
1671
1672             if (h != NULL)
1673               {
1674                 h->got.refcount = 1;
1675                 old_tls_type = elf_x86_hash_entry (h)->tls_type;
1676               }
1677             else
1678               {
1679                 bfd_signed_vma *local_got_refcounts;
1680
1681                 /* This is a global offset table entry for a local symbol.  */
1682                 local_got_refcounts = elf_local_got_refcounts (abfd);
1683                 if (local_got_refcounts == NULL)
1684                   {
1685                     bfd_size_type size;
1686
1687                     size = symtab_hdr->sh_info;
1688                     size *= (sizeof (bfd_signed_vma)
1689                              + sizeof (bfd_vma) + sizeof(char));
1690                     local_got_refcounts = (bfd_signed_vma *)
1691                         bfd_zalloc (abfd, size);
1692                     if (local_got_refcounts == NULL)
1693                       goto error_return;
1694                     elf_local_got_refcounts (abfd) = local_got_refcounts;
1695                     elf_x86_local_tlsdesc_gotent (abfd)
1696                       = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
1697                     elf_x86_local_got_tls_type (abfd)
1698                       = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
1699                   }
1700                 local_got_refcounts[r_symndx] = 1;
1701                 old_tls_type = elf_x86_local_got_tls_type (abfd) [r_symndx];
1702               }
1703
1704             if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE))
1705               tls_type |= old_tls_type;
1706             /* If a TLS symbol is accessed using IE at least once,
1707                there is no point to use dynamic model for it.  */
1708             else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
1709                      && (! GOT_TLS_GD_ANY_P (old_tls_type)
1710                          || (tls_type & GOT_TLS_IE) == 0))
1711               {
1712                 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type))
1713                   tls_type = old_tls_type;
1714                 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1715                          && GOT_TLS_GD_ANY_P (tls_type))
1716                   tls_type |= old_tls_type;
1717                 else
1718                   {
1719                     if (h)
1720                       name = h->root.root.string;
1721                     else
1722                       name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1723                                              NULL);
1724                     _bfd_error_handler
1725                       /* xgettext:c-format */
1726                       (_("%pB: `%s' accessed both as normal and "
1727                          "thread local symbol"),
1728                        abfd, name);
1729                     bfd_set_error (bfd_error_bad_value);
1730                     goto error_return;
1731                   }
1732               }
1733
1734             if (old_tls_type != tls_type)
1735               {
1736                 if (h != NULL)
1737                   elf_x86_hash_entry (h)->tls_type = tls_type;
1738                 else
1739                   elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
1740               }
1741           }
1742           /* Fall through */
1743
1744         case R_386_GOTOFF:
1745         case R_386_GOTPC:
1746 create_got:
1747           if (r_type != R_386_TLS_IE)
1748             {
1749               if (eh != NULL)
1750                 {
1751                   eh->zero_undefweak &= 0x2;
1752
1753                   /* Need GOT to resolve undefined weak symbol to 0.  */
1754                   if (r_type == R_386_GOTOFF
1755                       && h->root.type == bfd_link_hash_undefweak
1756                       && bfd_link_executable (info))
1757                     htab->got_referenced = TRUE;
1758                 }
1759               break;
1760             }
1761           /* Fall through */
1762
1763         case R_386_TLS_LE_32:
1764         case R_386_TLS_LE:
1765           if (eh != NULL)
1766             eh->zero_undefweak &= 0x2;
1767           if (bfd_link_executable (info))
1768             break;
1769           info->flags |= DF_STATIC_TLS;
1770           goto do_relocation;
1771
1772         case R_386_32:
1773         case R_386_PC32:
1774           if (eh != NULL && (sec->flags & SEC_CODE) != 0)
1775             eh->zero_undefweak |= 0x2;
1776 do_relocation:
1777           /* We are called after all symbols have been resolved.  Only
1778              relocation against STT_GNU_IFUNC symbol must go through
1779              PLT.  */
1780           if (h != NULL
1781               && (bfd_link_executable (info)
1782                   || h->type == STT_GNU_IFUNC))
1783             {
1784               bfd_boolean func_pointer_ref = FALSE;
1785
1786               if (r_type == R_386_PC32)
1787                 {
1788                   /* Since something like ".long foo - ." may be used
1789                      as pointer, make sure that PLT is used if foo is
1790                      a function defined in a shared library.  */
1791                   if ((sec->flags & SEC_CODE) == 0)
1792                     h->pointer_equality_needed = 1;
1793                   else if (h->type == STT_GNU_IFUNC
1794                            && bfd_link_pic (info))
1795                     {
1796                       _bfd_error_handler
1797                         /* xgettext:c-format */
1798                         (_("%pB: unsupported non-PIC call to IFUNC `%s'"),
1799                          abfd, h->root.root.string);
1800                       bfd_set_error (bfd_error_bad_value);
1801                       goto error_return;
1802                     }
1803                 }
1804               else
1805                 {
1806                   h->pointer_equality_needed = 1;
1807                   /* R_386_32 can be resolved at run-time.  */
1808                   if (r_type == R_386_32
1809                       && (sec->flags & SEC_READONLY) == 0)
1810                     func_pointer_ref = TRUE;
1811                 }
1812
1813               if (!func_pointer_ref)
1814                 {
1815                   /* If this reloc is in a read-only section, we might
1816                      need a copy reloc.  We can't check reliably at this
1817                      stage whether the section is read-only, as input
1818                      sections have not yet been mapped to output sections.
1819                      Tentatively set the flag for now, and correct in
1820                      adjust_dynamic_symbol.  */
1821                   h->non_got_ref = 1;
1822
1823                   /* We may need a .plt entry if the symbol is a function
1824                      defined in a shared lib or is a function referenced
1825                      from the code or read-only section.  */
1826                   if (!h->def_regular
1827                       || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
1828                     h->plt.refcount = 1;
1829                 }
1830             }
1831
1832           size_reloc = FALSE;
1833 do_size:
1834           if (NEED_DYNAMIC_RELOCATION_P (info, FALSE, h, sec, r_type,
1835                                          R_386_32))
1836             {
1837               struct elf_dyn_relocs *p;
1838               struct elf_dyn_relocs **head;
1839
1840               /* We must copy these reloc types into the output file.
1841                  Create a reloc section in dynobj and make room for
1842                  this reloc.  */
1843               if (sreloc == NULL)
1844                 {
1845                   sreloc = _bfd_elf_make_dynamic_reloc_section
1846                     (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE);
1847
1848                   if (sreloc == NULL)
1849                     goto error_return;
1850                 }
1851
1852               /* If this is a global symbol, we count the number of
1853                  relocations we need for this symbol.  */
1854               if (h != NULL)
1855                 {
1856                   head = &eh->dyn_relocs;
1857                 }
1858               else
1859                 {
1860                   /* Track dynamic relocs needed for local syms too.
1861                      We really need local syms available to do this
1862                      easily.  Oh well.  */
1863                   void **vpp;
1864                   asection *s;
1865
1866                   isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1867                                                 abfd, r_symndx);
1868                   if (isym == NULL)
1869                     goto error_return;
1870
1871                   s = bfd_section_from_elf_index (abfd, isym->st_shndx);
1872                   if (s == NULL)
1873                     s = sec;
1874
1875                   vpp = &elf_section_data (s)->local_dynrel;
1876                   head = (struct elf_dyn_relocs **)vpp;
1877                 }
1878
1879               p = *head;
1880               if (p == NULL || p->sec != sec)
1881                 {
1882                   bfd_size_type amt = sizeof *p;
1883                   p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj,
1884                                                            amt);
1885                   if (p == NULL)
1886                     goto error_return;
1887                   p->next = *head;
1888                   *head = p;
1889                   p->sec = sec;
1890                   p->count = 0;
1891                   p->pc_count = 0;
1892                 }
1893
1894               p->count += 1;
1895               /* Count size relocation as PC-relative relocation.  */
1896               if (r_type == R_386_PC32 || size_reloc)
1897                 p->pc_count += 1;
1898             }
1899           break;
1900
1901           /* This relocation describes the C++ object vtable hierarchy.
1902              Reconstruct it for later use during GC.  */
1903         case R_386_GNU_VTINHERIT:
1904           if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1905             goto error_return;
1906           break;
1907
1908           /* This relocation describes which C++ vtable entries are actually
1909              used.  Record for later use during GC.  */
1910         case R_386_GNU_VTENTRY:
1911           BFD_ASSERT (h != NULL);
1912           if (h != NULL
1913               && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
1914             goto error_return;
1915           break;
1916
1917         default:
1918           break;
1919         }
1920     }
1921
1922   if (elf_section_data (sec)->this_hdr.contents != contents)
1923     {
1924       if (!converted && !info->keep_memory)
1925         free (contents);
1926       else
1927         {
1928           /* Cache the section contents for elf_link_input_bfd if any
1929              load is converted or --no-keep-memory isn't used.  */
1930           elf_section_data (sec)->this_hdr.contents = contents;
1931         }
1932     }
1933
1934   /* Cache relocations if any load is converted.  */
1935   if (elf_section_data (sec)->relocs != relocs && converted)
1936     elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
1937
1938   return TRUE;
1939
1940 error_return:
1941   if (elf_section_data (sec)->this_hdr.contents != contents)
1942     free (contents);
1943   sec->check_relocs_failed = 1;
1944   return FALSE;
1945 }
1946
1947 /* Set the correct type for an x86 ELF section.  We do this by the
1948    section name, which is a hack, but ought to work.  */
1949
1950 static bfd_boolean
1951 elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
1952                         Elf_Internal_Shdr *hdr,
1953                         asection *sec)
1954 {
1955   const char *name;
1956
1957   name = bfd_get_section_name (abfd, sec);
1958
1959   /* This is an ugly, but unfortunately necessary hack that is
1960      needed when producing EFI binaries on x86. It tells
1961      elf.c:elf_fake_sections() not to consider ".reloc" as a section
1962      containing ELF relocation info.  We need this hack in order to
1963      be able to generate ELF binaries that can be translated into
1964      EFI applications (which are essentially COFF objects).  Those
1965      files contain a COFF ".reloc" section inside an ELFNN object,
1966      which would normally cause BFD to segfault because it would
1967      attempt to interpret this section as containing relocation
1968      entries for section "oc".  With this hack enabled, ".reloc"
1969      will be treated as a normal data section, which will avoid the
1970      segfault.  However, you won't be able to create an ELFNN binary
1971      with a section named "oc" that needs relocations, but that's
1972      the kind of ugly side-effects you get when detecting section
1973      types based on their names...  In practice, this limitation is
1974      unlikely to bite.  */
1975   if (strcmp (name, ".reloc") == 0)
1976     hdr->sh_type = SHT_PROGBITS;
1977
1978   return TRUE;
1979 }
1980
1981 /* Return the relocation value for @tpoff relocation
1982    if STT_TLS virtual address is ADDRESS.  */
1983
1984 static bfd_vma
1985 elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address)
1986 {
1987   struct elf_link_hash_table *htab = elf_hash_table (info);
1988   const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
1989   bfd_vma static_tls_size;
1990
1991   /* If tls_sec is NULL, we should have signalled an error already.  */
1992   if (htab->tls_sec == NULL)
1993     return 0;
1994
1995   /* Consider special static TLS alignment requirements.  */
1996   static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
1997   return static_tls_size + htab->tls_sec->vma - address;
1998 }
1999
2000 /* Relocate an i386 ELF section.  */
2001
2002 static bfd_boolean
2003 elf_i386_relocate_section (bfd *output_bfd,
2004                            struct bfd_link_info *info,
2005                            bfd *input_bfd,
2006                            asection *input_section,
2007                            bfd_byte *contents,
2008                            Elf_Internal_Rela *relocs,
2009                            Elf_Internal_Sym *local_syms,
2010                            asection **local_sections)
2011 {
2012   struct elf_x86_link_hash_table *htab;
2013   Elf_Internal_Shdr *symtab_hdr;
2014   struct elf_link_hash_entry **sym_hashes;
2015   bfd_vma *local_got_offsets;
2016   bfd_vma *local_tlsdesc_gotents;
2017   Elf_Internal_Rela *rel;
2018   Elf_Internal_Rela *wrel;
2019   Elf_Internal_Rela *relend;
2020   bfd_boolean is_vxworks_tls;
2021   unsigned plt_entry_size;
2022
2023   /* Skip if check_relocs failed.  */
2024   if (input_section->check_relocs_failed)
2025     return FALSE;
2026
2027   htab = elf_x86_hash_table (info, I386_ELF_DATA);
2028   if (htab == NULL)
2029     return FALSE;
2030
2031   if (!is_x86_elf (input_bfd, htab))
2032     {
2033       bfd_set_error (bfd_error_wrong_format);
2034       return FALSE;
2035     }
2036
2037   symtab_hdr = &elf_symtab_hdr (input_bfd);
2038   sym_hashes = elf_sym_hashes (input_bfd);
2039   local_got_offsets = elf_local_got_offsets (input_bfd);
2040   local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
2041   /* We have to handle relocations in vxworks .tls_vars sections
2042      specially, because the dynamic loader is 'weird'.  */
2043   is_vxworks_tls = (htab->target_os == is_vxworks
2044                     && bfd_link_pic (info)
2045                     && !strcmp (input_section->output_section->name,
2046                                 ".tls_vars"));
2047
2048   _bfd_x86_elf_set_tls_module_base (info);
2049
2050   plt_entry_size = htab->plt.plt_entry_size;
2051
2052   rel = wrel = relocs;
2053   relend = relocs + input_section->reloc_count;
2054   for (; rel < relend; wrel++, rel++)
2055     {
2056       unsigned int r_type, r_type_tls;
2057       reloc_howto_type *howto;
2058       unsigned long r_symndx;
2059       struct elf_link_hash_entry *h;
2060       struct elf_x86_link_hash_entry *eh;
2061       Elf_Internal_Sym *sym;
2062       asection *sec;
2063       bfd_vma off, offplt, plt_offset;
2064       bfd_vma relocation;
2065       bfd_boolean unresolved_reloc;
2066       bfd_reloc_status_type r;
2067       unsigned int indx;
2068       int tls_type;
2069       bfd_vma st_size;
2070       asection *resolved_plt;
2071       bfd_boolean resolved_to_zero;
2072       bfd_boolean relative_reloc;
2073
2074       r_type = ELF32_R_TYPE (rel->r_info);
2075       if (r_type == R_386_GNU_VTINHERIT
2076           || r_type == R_386_GNU_VTENTRY)
2077         {
2078           if (wrel != rel)
2079             *wrel = *rel;
2080           continue;
2081         }
2082
2083       howto = elf_i386_rtype_to_howto (r_type);
2084       if (howto == NULL)
2085         return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
2086
2087       r_symndx = ELF32_R_SYM (rel->r_info);
2088       h = NULL;
2089       sym = NULL;
2090       sec = NULL;
2091       unresolved_reloc = FALSE;
2092       if (r_symndx < symtab_hdr->sh_info)
2093         {
2094           sym = local_syms + r_symndx;
2095           sec = local_sections[r_symndx];
2096           relocation = (sec->output_section->vma
2097                         + sec->output_offset
2098                         + sym->st_value);
2099           st_size = sym->st_size;
2100
2101           if (ELF_ST_TYPE (sym->st_info) == STT_SECTION
2102               && ((sec->flags & SEC_MERGE) != 0
2103                   || (bfd_link_relocatable (info)
2104                       && sec->output_offset != 0)))
2105             {
2106               bfd_vma addend;
2107               bfd_byte *where = contents + rel->r_offset;
2108
2109               switch (howto->size)
2110                 {
2111                 case 0:
2112                   addend = bfd_get_8 (input_bfd, where);
2113                   if (howto->pc_relative)
2114                     {
2115                       addend = (addend ^ 0x80) - 0x80;
2116                       addend += 1;
2117                     }
2118                   break;
2119                 case 1:
2120                   addend = bfd_get_16 (input_bfd, where);
2121                   if (howto->pc_relative)
2122                     {
2123                       addend = (addend ^ 0x8000) - 0x8000;
2124                       addend += 2;
2125                     }
2126                   break;
2127                 case 2:
2128                   addend = bfd_get_32 (input_bfd, where);
2129                   if (howto->pc_relative)
2130                     {
2131                       addend = (addend ^ 0x80000000) - 0x80000000;
2132                       addend += 4;
2133                     }
2134                   break;
2135                 default:
2136                   abort ();
2137                 }
2138
2139               if (bfd_link_relocatable (info))
2140                 addend += sec->output_offset;
2141               else
2142                 {
2143                   asection *msec = sec;
2144                   addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec,
2145                                                    addend);
2146                   addend -= relocation;
2147                   addend += msec->output_section->vma + msec->output_offset;
2148                 }
2149
2150               switch (howto->size)
2151                 {
2152                 case 0:
2153                   /* FIXME: overflow checks.  */
2154                   if (howto->pc_relative)
2155                     addend -= 1;
2156                   bfd_put_8 (input_bfd, addend, where);
2157                   break;
2158                 case 1:
2159                   if (howto->pc_relative)
2160                     addend -= 2;
2161                   bfd_put_16 (input_bfd, addend, where);
2162                   break;
2163                 case 2:
2164                   if (howto->pc_relative)
2165                     addend -= 4;
2166                   bfd_put_32 (input_bfd, addend, where);
2167                   break;
2168                 }
2169             }
2170           else if (!bfd_link_relocatable (info)
2171                    && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2172             {
2173               /* Relocate against local STT_GNU_IFUNC symbol.  */
2174               h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd, rel,
2175                                                    FALSE);
2176               if (h == NULL)
2177                 abort ();
2178
2179               /* Set STT_GNU_IFUNC symbol value.  */
2180               h->root.u.def.value = sym->st_value;
2181               h->root.u.def.section = sec;
2182             }
2183         }
2184       else
2185         {
2186           bfd_boolean warned ATTRIBUTE_UNUSED;
2187           bfd_boolean ignored ATTRIBUTE_UNUSED;
2188
2189           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2190                                    r_symndx, symtab_hdr, sym_hashes,
2191                                    h, sec, relocation,
2192                                    unresolved_reloc, warned, ignored);
2193           st_size = h->size;
2194         }
2195
2196       if (sec != NULL && discarded_section (sec))
2197         {
2198           _bfd_clear_contents (howto, input_bfd, input_section,
2199                                contents, rel->r_offset);
2200           wrel->r_offset = rel->r_offset;
2201           wrel->r_info = 0;
2202           wrel->r_addend = 0;
2203
2204           /* For ld -r, remove relocations in debug sections against
2205              sections defined in discarded sections.  Not done for
2206              eh_frame editing code expects to be present.  */
2207            if (bfd_link_relocatable (info)
2208                && (input_section->flags & SEC_DEBUGGING))
2209              wrel--;
2210
2211            continue;
2212         }
2213
2214       if (bfd_link_relocatable (info))
2215         {
2216           if (wrel != rel)
2217             *wrel = *rel;
2218           continue;
2219         }
2220
2221       eh = (struct elf_x86_link_hash_entry *) h;
2222
2223       /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2224          it here if it is defined in a non-shared object.  */
2225       if (h != NULL
2226           && h->type == STT_GNU_IFUNC
2227           && h->def_regular)
2228         {
2229           asection *gotplt, *base_got;
2230           bfd_vma plt_index;
2231           const char *name;
2232
2233           if ((input_section->flags & SEC_ALLOC) == 0)
2234             {
2235               /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2236                  STT_GNU_IFUNC symbol as STT_FUNC.  */
2237               if (elf_section_type (input_section) == SHT_NOTE)
2238                 goto skip_ifunc;
2239               /* Dynamic relocs are not propagated for SEC_DEBUGGING
2240                  sections because such sections are not SEC_ALLOC and
2241                  thus ld.so will not process them.  */
2242               if ((input_section->flags & SEC_DEBUGGING) != 0)
2243                 continue;
2244               abort ();
2245             }
2246
2247           /* STT_GNU_IFUNC symbol must go through PLT.  */
2248           if (htab->elf.splt != NULL)
2249             {
2250               if (htab->plt_second != NULL)
2251                 {
2252                   resolved_plt = htab->plt_second;
2253                   plt_offset = eh->plt_second.offset;
2254                 }
2255               else
2256                 {
2257                   resolved_plt = htab->elf.splt;
2258                   plt_offset = h->plt.offset;
2259                 }
2260               gotplt = htab->elf.sgotplt;
2261             }
2262           else
2263             {
2264               resolved_plt = htab->elf.iplt;
2265               plt_offset = h->plt.offset;
2266               gotplt = htab->elf.igotplt;
2267             }
2268
2269           switch (r_type)
2270             {
2271             default:
2272               break;
2273
2274             case R_386_GOT32:
2275             case R_386_GOT32X:
2276               base_got = htab->elf.sgot;
2277               off = h->got.offset;
2278
2279               if (base_got == NULL)
2280                 abort ();
2281
2282               if (off == (bfd_vma) -1)
2283                 {
2284                   /* We can't use h->got.offset here to save state, or
2285                      even just remember the offset, as finish_dynamic_symbol
2286                      would use that as offset into .got.  */
2287
2288                   if (h->plt.offset == (bfd_vma) -1)
2289                     abort ();
2290
2291                   if (htab->elf.splt != NULL)
2292                     {
2293                       plt_index = (h->plt.offset / plt_entry_size
2294                                    - htab->plt.has_plt0);
2295                       off = (plt_index + 3) * 4;
2296                       base_got = htab->elf.sgotplt;
2297                     }
2298                   else
2299                     {
2300                       plt_index = h->plt.offset / plt_entry_size;
2301                       off = plt_index * 4;
2302                       base_got = htab->elf.igotplt;
2303                     }
2304
2305                   if (h->dynindx == -1
2306                       || h->forced_local
2307                       || info->symbolic)
2308                     {
2309                       /* This references the local defitionion.  We must
2310                          initialize this entry in the global offset table.
2311                          Since the offset must always be a multiple of 8,
2312                          we use the least significant bit to record
2313                          whether we have initialized it already.
2314
2315                          When doing a dynamic link, we create a .rela.got
2316                          relocation entry to initialize the value.  This
2317                          is done in the finish_dynamic_symbol routine.   */
2318                       if ((off & 1) != 0)
2319                         off &= ~1;
2320                       else
2321                         {
2322                           bfd_put_32 (output_bfd, relocation,
2323                                       base_got->contents + off);
2324                           h->got.offset |= 1;
2325                         }
2326                     }
2327
2328                   relocation = off;
2329                 }
2330               else
2331                 relocation = (base_got->output_section->vma
2332                               + base_got->output_offset + off
2333                               - gotplt->output_section->vma
2334                               - gotplt->output_offset);
2335
2336               if (rel->r_offset > 1
2337                   && (*(contents + rel->r_offset - 1) & 0xc7) == 0x5
2338                   && *(contents + rel->r_offset - 2) != 0x8d)
2339                 {
2340                   if (bfd_link_pic (info))
2341                     goto disallow_got32;
2342
2343                   /* Add the GOT base if there is no base register.  */
2344                   relocation += (gotplt->output_section->vma
2345                                  + gotplt->output_offset);
2346                 }
2347               else if (htab->elf.splt == NULL)
2348                 {
2349                   /* Adjust for static executables.  */
2350                   relocation += gotplt->output_offset;
2351                 }
2352
2353               goto do_relocation;
2354             }
2355
2356           if (h->plt.offset == (bfd_vma) -1)
2357             {
2358               /* Handle static pointers of STT_GNU_IFUNC symbols.  */
2359               if (r_type == R_386_32
2360                   && (input_section->flags & SEC_CODE) == 0)
2361                 goto do_ifunc_pointer;
2362               goto bad_ifunc_reloc;
2363             }
2364
2365           relocation = (resolved_plt->output_section->vma
2366                         + resolved_plt->output_offset + plt_offset);
2367
2368           switch (r_type)
2369             {
2370             default:
2371 bad_ifunc_reloc:
2372               if (h->root.root.string)
2373                 name = h->root.root.string;
2374               else
2375                 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2376                                          NULL);
2377               _bfd_error_handler
2378                 /* xgettext:c-format */
2379                 (_("%pB: relocation %s against STT_GNU_IFUNC "
2380                    "symbol `%s' isn't supported"), input_bfd,
2381                  howto->name, name);
2382               bfd_set_error (bfd_error_bad_value);
2383               return FALSE;
2384
2385             case R_386_32:
2386               /* Generate dynamic relcoation only when there is a
2387                  non-GOT reference in a shared object.  */
2388               if ((bfd_link_pic (info) && h->non_got_ref)
2389                   || h->plt.offset == (bfd_vma) -1)
2390                 {
2391                   Elf_Internal_Rela outrel;
2392                   asection *sreloc;
2393                   bfd_vma offset;
2394
2395 do_ifunc_pointer:
2396                   /* Need a dynamic relocation to get the real function
2397                      adddress.  */
2398                   offset = _bfd_elf_section_offset (output_bfd,
2399                                                     info,
2400                                                     input_section,
2401                                                     rel->r_offset);
2402                   if (offset == (bfd_vma) -1
2403                       || offset == (bfd_vma) -2)
2404                     abort ();
2405
2406                   outrel.r_offset = (input_section->output_section->vma
2407                                      + input_section->output_offset
2408                                      + offset);
2409
2410                   if (POINTER_LOCAL_IFUNC_P (info, h))
2411                     {
2412                       info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
2413                                               h->root.root.string,
2414                                               h->root.u.def.section->owner);
2415
2416                       /* This symbol is resolved locally.  */
2417                       outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
2418                       bfd_put_32 (output_bfd,
2419                                   (h->root.u.def.value
2420                                    + h->root.u.def.section->output_section->vma
2421                                    + h->root.u.def.section->output_offset),
2422                                   contents + offset);
2423                     }
2424                   else
2425                     outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
2426
2427                   /* Dynamic relocations are stored in
2428                      1. .rel.ifunc section in PIC object.
2429                      2. .rel.got section in dynamic executable.
2430                      3. .rel.iplt section in static executable.  */
2431                   if (bfd_link_pic (info))
2432                     sreloc = htab->elf.irelifunc;
2433                   else if (htab->elf.splt != NULL)
2434                     sreloc = htab->elf.srelgot;
2435                   else
2436                     sreloc = htab->elf.irelplt;
2437                   elf_append_rel (output_bfd, sreloc, &outrel);
2438
2439                   /* If this reloc is against an external symbol, we
2440                      do not want to fiddle with the addend.  Otherwise,
2441                      we need to include the symbol value so that it
2442                      becomes an addend for the dynamic reloc.  For an
2443                      internal symbol, we have updated addend.  */
2444                   continue;
2445                 }
2446               /* FALLTHROUGH */
2447             case R_386_PC32:
2448             case R_386_PLT32:
2449               goto do_relocation;
2450
2451             case R_386_GOTOFF:
2452               relocation -= (gotplt->output_section->vma
2453                              + gotplt->output_offset);
2454               goto do_relocation;
2455             }
2456         }
2457
2458 skip_ifunc:
2459       resolved_to_zero = (eh != NULL
2460                           && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
2461
2462       switch (r_type)
2463         {
2464         case R_386_GOT32X:
2465         case R_386_GOT32:
2466           /* Relocation is to the entry for this symbol in the global
2467              offset table.  */
2468           if (htab->elf.sgot == NULL)
2469             abort ();
2470
2471           relative_reloc = FALSE;
2472           if (h != NULL)
2473             {
2474               off = h->got.offset;
2475               if (RESOLVED_LOCALLY_P (info, h, htab))
2476                 {
2477                   /* We must initialize this entry in the global offset
2478                      table.  Since the offset must always be a multiple
2479                      of 4, we use the least significant bit to record
2480                      whether we have initialized it already.
2481
2482                      When doing a dynamic link, we create a .rel.got
2483                      relocation entry to initialize the value.  This
2484                      is done in the finish_dynamic_symbol routine.  */
2485                   if ((off & 1) != 0)
2486                     off &= ~1;
2487                   else
2488                     {
2489                       bfd_put_32 (output_bfd, relocation,
2490                                   htab->elf.sgot->contents + off);
2491                       h->got.offset |= 1;
2492
2493                       if (GENERATE_RELATIVE_RELOC_P (info, h))
2494                         {
2495                           /* PR ld/21402: If this symbol isn't dynamic
2496                              in PIC, generate R_386_RELATIVE here.  */
2497                           eh->no_finish_dynamic_symbol = 1;
2498                           relative_reloc = TRUE;
2499                         }
2500                     }
2501                 }
2502               else
2503                 unresolved_reloc = FALSE;
2504             }
2505           else
2506             {
2507               if (local_got_offsets == NULL)
2508                 abort ();
2509
2510               off = local_got_offsets[r_symndx];
2511
2512               /* The offset must always be a multiple of 4.  We use
2513                  the least significant bit to record whether we have
2514                  already generated the necessary reloc.  */
2515               if ((off & 1) != 0)
2516                 off &= ~1;
2517               else
2518                 {
2519                   bfd_put_32 (output_bfd, relocation,
2520                               htab->elf.sgot->contents + off);
2521                   local_got_offsets[r_symndx] |= 1;
2522
2523                   if (bfd_link_pic (info))
2524                     relative_reloc = TRUE;
2525                 }
2526             }
2527
2528           if (relative_reloc)
2529             {
2530               asection *s;
2531               Elf_Internal_Rela outrel;
2532
2533               s = htab->elf.srelgot;
2534               if (s == NULL)
2535                 abort ();
2536
2537               outrel.r_offset = (htab->elf.sgot->output_section->vma
2538                                  + htab->elf.sgot->output_offset
2539                                  + off);
2540               outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
2541               elf_append_rel (output_bfd, s, &outrel);
2542             }
2543
2544           if (off >= (bfd_vma) -2)
2545             abort ();
2546
2547           relocation = (htab->elf.sgot->output_section->vma
2548                         + htab->elf.sgot->output_offset + off);
2549           if (rel->r_offset > 1
2550               && (*(contents + rel->r_offset - 1) & 0xc7) == 0x5
2551               && *(contents + rel->r_offset - 2) != 0x8d)
2552             {
2553               if (bfd_link_pic (info))
2554                 {
2555                   /* For PIC, disallow R_386_GOT32 without a base
2556                      register, except for "lea foo@GOT, %reg", since
2557                      we don't know what the GOT base is.  */
2558                   const char *name;
2559
2560 disallow_got32:
2561                   if (h == NULL || h->root.root.string == NULL)
2562                     name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2563                                              NULL);
2564                   else
2565                     name = h->root.root.string;
2566
2567                   _bfd_error_handler
2568                     /* xgettext:c-format */
2569                     (_("%pB: direct GOT relocation %s against `%s'"
2570                        " without base register can not be used"
2571                        " when making a shared object"),
2572                      input_bfd, howto->name, name);
2573                   bfd_set_error (bfd_error_bad_value);
2574                   return FALSE;
2575                 }
2576             }
2577           else
2578             {
2579               /* Subtract the .got.plt section address only with a base
2580                  register.  */
2581               relocation -= (htab->elf.sgotplt->output_section->vma
2582                              + htab->elf.sgotplt->output_offset);
2583             }
2584
2585           break;
2586
2587         case R_386_GOTOFF:
2588           /* Relocation is relative to the start of the global offset
2589              table.  */
2590
2591           /* Check to make sure it isn't a protected function or data
2592              symbol for shared library since it may not be local when
2593              used as function address or with copy relocation.  We also
2594              need to make sure that a symbol is referenced locally.  */
2595           if (!bfd_link_executable (info) && h)
2596             {
2597               if (!h->def_regular)
2598                 {
2599                   const char *v;
2600
2601                   switch (ELF_ST_VISIBILITY (h->other))
2602                     {
2603                     case STV_HIDDEN:
2604                       v = _("hidden symbol");
2605                       break;
2606                     case STV_INTERNAL:
2607                       v = _("internal symbol");
2608                       break;
2609                     case STV_PROTECTED:
2610                       v = _("protected symbol");
2611                       break;
2612                     default:
2613                       v = _("symbol");
2614                       break;
2615                     }
2616
2617                   _bfd_error_handler
2618                     /* xgettext:c-format */
2619                     (_("%pB: relocation R_386_GOTOFF against undefined %s"
2620                        " `%s' can not be used when making a shared object"),
2621                      input_bfd, v, h->root.root.string);
2622                   bfd_set_error (bfd_error_bad_value);
2623                   return FALSE;
2624                 }
2625               else if (!SYMBOL_REFERENCES_LOCAL_P (info, h)
2626                        && (h->type == STT_FUNC
2627                            || h->type == STT_OBJECT)
2628                        && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2629                 {
2630                   _bfd_error_handler
2631                     /* xgettext:c-format */
2632                     (_("%pB: relocation R_386_GOTOFF against protected %s"
2633                        " `%s' can not be used when making a shared object"),
2634                      input_bfd,
2635                      h->type == STT_FUNC ? "function" : "data",
2636                      h->root.root.string);
2637                   bfd_set_error (bfd_error_bad_value);
2638                   return FALSE;
2639                 }
2640             }
2641
2642           /* Note that sgot is not involved in this
2643              calculation.  We always want the start of .got.plt.  If we
2644              defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2645              permitted by the ABI, we might have to change this
2646              calculation.  */
2647           relocation -= htab->elf.sgotplt->output_section->vma
2648                         + htab->elf.sgotplt->output_offset;
2649           break;
2650
2651         case R_386_GOTPC:
2652           /* Use global offset table as symbol value.  */
2653           relocation = htab->elf.sgotplt->output_section->vma
2654                        + htab->elf.sgotplt->output_offset;
2655           unresolved_reloc = FALSE;
2656           break;
2657
2658         case R_386_PLT32:
2659           /* Relocation is to the entry for this symbol in the
2660              procedure linkage table.  */
2661
2662           /* Resolve a PLT32 reloc against a local symbol directly,
2663              without using the procedure linkage table.  */
2664           if (h == NULL)
2665             break;
2666
2667           if ((h->plt.offset == (bfd_vma) -1
2668                && eh->plt_got.offset == (bfd_vma) -1)
2669               || htab->elf.splt == NULL)
2670             {
2671               /* We didn't make a PLT entry for this symbol.  This
2672                  happens when statically linking PIC code, or when
2673                  using -Bsymbolic.  */
2674               break;
2675             }
2676
2677           if (h->plt.offset != (bfd_vma) -1)
2678             {
2679               if (htab->plt_second != NULL)
2680                 {
2681                   resolved_plt = htab->plt_second;
2682                   plt_offset = eh->plt_second.offset;
2683                 }
2684               else
2685                 {
2686                   resolved_plt = htab->elf.splt;
2687                   plt_offset = h->plt.offset;
2688                 }
2689             }
2690           else
2691             {
2692               resolved_plt = htab->plt_got;
2693               plt_offset = eh->plt_got.offset;
2694             }
2695
2696           relocation = (resolved_plt->output_section->vma
2697                         + resolved_plt->output_offset
2698                         + plt_offset);
2699           unresolved_reloc = FALSE;
2700           break;
2701
2702         case R_386_SIZE32:
2703           /* Set to symbol size.  */
2704           relocation = st_size;
2705           /* Fall through.  */
2706
2707         case R_386_32:
2708         case R_386_PC32:
2709           if ((input_section->flags & SEC_ALLOC) == 0
2710               || is_vxworks_tls)
2711             break;
2712
2713           if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
2714                                              FALSE, resolved_to_zero,
2715                                              (r_type == R_386_PC32)))
2716             {
2717               Elf_Internal_Rela outrel;
2718               bfd_boolean skip, relocate;
2719               asection *sreloc;
2720
2721               /* When generating a shared object, these relocations
2722                  are copied into the output file to be resolved at run
2723                  time.  */
2724
2725               skip = FALSE;
2726               relocate = FALSE;
2727
2728               outrel.r_offset =
2729                 _bfd_elf_section_offset (output_bfd, info, input_section,
2730                                          rel->r_offset);
2731               if (outrel.r_offset == (bfd_vma) -1)
2732                 skip = TRUE;
2733               else if (outrel.r_offset == (bfd_vma) -2)
2734                 skip = TRUE, relocate = TRUE;
2735               outrel.r_offset += (input_section->output_section->vma
2736                                   + input_section->output_offset);
2737
2738               if (skip)
2739                 memset (&outrel, 0, sizeof outrel);
2740               else if (COPY_INPUT_RELOC_P (info, h, r_type))
2741                 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
2742               else
2743                 {
2744                   /* This symbol is local, or marked to become local.  */
2745                   relocate = TRUE;
2746                   outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
2747                 }
2748
2749               sreloc = elf_section_data (input_section)->sreloc;
2750
2751               if (sreloc == NULL || sreloc->contents == NULL)
2752                 {
2753                   r = bfd_reloc_notsupported;
2754                   goto check_relocation_error;
2755                 }
2756
2757               elf_append_rel (output_bfd, sreloc, &outrel);
2758
2759               /* If this reloc is against an external symbol, we do
2760                  not want to fiddle with the addend.  Otherwise, we
2761                  need to include the symbol value so that it becomes
2762                  an addend for the dynamic reloc.  */
2763               if (! relocate)
2764                 continue;
2765             }
2766           break;
2767
2768         case R_386_TLS_IE:
2769           if (!bfd_link_executable (info))
2770             {
2771               Elf_Internal_Rela outrel;
2772               asection *sreloc;
2773
2774               outrel.r_offset = rel->r_offset
2775                                 + input_section->output_section->vma
2776                                 + input_section->output_offset;
2777               outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
2778               sreloc = elf_section_data (input_section)->sreloc;
2779               if (sreloc == NULL)
2780                 abort ();
2781               elf_append_rel (output_bfd, sreloc, &outrel);
2782             }
2783           /* Fall through */
2784
2785         case R_386_TLS_GD:
2786         case R_386_TLS_GOTDESC:
2787         case R_386_TLS_DESC_CALL:
2788         case R_386_TLS_IE_32:
2789         case R_386_TLS_GOTIE:
2790           tls_type = GOT_UNKNOWN;
2791           if (h == NULL && local_got_offsets)
2792             tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
2793           else if (h != NULL)
2794             tls_type = elf_x86_hash_entry(h)->tls_type;
2795           if (tls_type == GOT_TLS_IE)
2796             tls_type = GOT_TLS_IE_NEG;
2797
2798            r_type_tls = r_type;
2799           if (! elf_i386_tls_transition (info, input_bfd,
2800                                          input_section, contents,
2801                                          symtab_hdr, sym_hashes,
2802                                          &r_type_tls, tls_type, rel,
2803                                          relend, h, r_symndx, TRUE))
2804             return FALSE;
2805
2806           if (r_type_tls == R_386_TLS_LE_32)
2807             {
2808               BFD_ASSERT (! unresolved_reloc);
2809               if (r_type == R_386_TLS_GD)
2810                 {
2811                   unsigned int type;
2812                   bfd_vma roff;
2813
2814                   /* GD->LE transition.  */
2815                   type = *(contents + rel->r_offset - 2);
2816                   if (type == 0x04)
2817                     {
2818                       /* Change
2819                                 leal foo@tlsgd(,%ebx,1), %eax
2820                                 call ___tls_get_addr@PLT
2821                          into:
2822                                 movl %gs:0, %eax
2823                                 subl $foo@tpoff, %eax
2824                          (6 byte form of subl).  */
2825                       roff = rel->r_offset + 5;
2826                     }
2827                   else
2828                     {
2829                       /* Change
2830                                 leal foo@tlsgd(%ebx), %eax
2831                                 call ___tls_get_addr@PLT
2832                                 nop
2833                          or
2834                                 leal foo@tlsgd(%reg), %eax
2835                                 call *___tls_get_addr@GOT(%reg)
2836                                 which may be converted to
2837                                 addr32 call ___tls_get_addr
2838                          into:
2839                                 movl %gs:0, %eax; subl $foo@tpoff, %eax
2840                          (6 byte form of subl).  */
2841                       roff = rel->r_offset + 6;
2842                     }
2843                   memcpy (contents + roff - 8,
2844                           "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
2845                   bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
2846                               contents + roff);
2847                   /* Skip R_386_PC32, R_386_PLT32 and R_386_GOT32X.  */
2848                   rel++;
2849                   wrel++;
2850                   continue;
2851                 }
2852               else if (r_type == R_386_TLS_GOTDESC)
2853                 {
2854                   /* GDesc -> LE transition.
2855                      It's originally something like:
2856                      leal x@tlsdesc(%ebx), %eax
2857
2858                      leal x@ntpoff, %eax
2859
2860                      Registers other than %eax may be set up here.  */
2861
2862                   unsigned int val;
2863                   bfd_vma roff;
2864
2865                   roff = rel->r_offset;
2866                   val = bfd_get_8 (input_bfd, contents + roff - 1);
2867
2868                   /* Now modify the instruction as appropriate.  */
2869                   /* aoliva FIXME: remove the above and xor the byte
2870                      below with 0x86.  */
2871                   bfd_put_8 (output_bfd, val ^ 0x86,
2872                              contents + roff - 1);
2873                   bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
2874                               contents + roff);
2875                   continue;
2876                 }
2877               else if (r_type == R_386_TLS_DESC_CALL)
2878                 {
2879                   /* GDesc -> LE transition.
2880                      It's originally:
2881                      call *(%eax)
2882                      Turn it into:
2883                      xchg %ax,%ax  */
2884
2885                   bfd_vma roff;
2886
2887                   roff = rel->r_offset;
2888                   bfd_put_8 (output_bfd, 0x66, contents + roff);
2889                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
2890                   continue;
2891                 }
2892               else if (r_type == R_386_TLS_IE)
2893                 {
2894                   unsigned int val;
2895
2896                   /* IE->LE transition:
2897                      Originally it can be one of:
2898                      movl foo, %eax
2899                      movl foo, %reg
2900                      addl foo, %reg
2901                      We change it into:
2902                      movl $foo, %eax
2903                      movl $foo, %reg
2904                      addl $foo, %reg.  */
2905                   val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
2906                   if (val == 0xa1)
2907                     {
2908                       /* movl foo, %eax.  */
2909                       bfd_put_8 (output_bfd, 0xb8,
2910                                  contents + rel->r_offset - 1);
2911                     }
2912                   else
2913                     {
2914                       unsigned int type;
2915
2916                       type = bfd_get_8 (input_bfd,
2917                                         contents + rel->r_offset - 2);
2918                       switch (type)
2919                         {
2920                         case 0x8b:
2921                           /* movl */
2922                           bfd_put_8 (output_bfd, 0xc7,
2923                                      contents + rel->r_offset - 2);
2924                           bfd_put_8 (output_bfd,
2925                                      0xc0 | ((val >> 3) & 7),
2926                                      contents + rel->r_offset - 1);
2927                           break;
2928                         case 0x03:
2929                           /* addl */
2930                           bfd_put_8 (output_bfd, 0x81,
2931                                      contents + rel->r_offset - 2);
2932                           bfd_put_8 (output_bfd,
2933                                      0xc0 | ((val >> 3) & 7),
2934                                      contents + rel->r_offset - 1);
2935                           break;
2936                         default:
2937                           BFD_FAIL ();
2938                           break;
2939                         }
2940                     }
2941                   bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
2942                               contents + rel->r_offset);
2943                   continue;
2944                 }
2945               else
2946                 {
2947                   unsigned int val, type;
2948
2949                   /* {IE_32,GOTIE}->LE transition:
2950                      Originally it can be one of:
2951                      subl foo(%reg1), %reg2
2952                      movl foo(%reg1), %reg2
2953                      addl foo(%reg1), %reg2
2954                      We change it into:
2955                      subl $foo, %reg2
2956                      movl $foo, %reg2 (6 byte form)
2957                      addl $foo, %reg2.  */
2958                   type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
2959                   val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
2960                   if (type == 0x8b)
2961                     {
2962                       /* movl */
2963                       bfd_put_8 (output_bfd, 0xc7,
2964                                  contents + rel->r_offset - 2);
2965                       bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
2966                                  contents + rel->r_offset - 1);
2967                     }
2968                   else if (type == 0x2b)
2969                     {
2970                       /* subl */
2971                       bfd_put_8 (output_bfd, 0x81,
2972                                  contents + rel->r_offset - 2);
2973                       bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7),
2974                                  contents + rel->r_offset - 1);
2975                     }
2976                   else if (type == 0x03)
2977                     {
2978                       /* addl */
2979                       bfd_put_8 (output_bfd, 0x81,
2980                                  contents + rel->r_offset - 2);
2981                       bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
2982                                  contents + rel->r_offset - 1);
2983                     }
2984                   else
2985                     BFD_FAIL ();
2986                   if (r_type == R_386_TLS_GOTIE)
2987                     bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
2988                                 contents + rel->r_offset);
2989                   else
2990                     bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
2991                                 contents + rel->r_offset);
2992                   continue;
2993                 }
2994             }
2995
2996           if (htab->elf.sgot == NULL)
2997             abort ();
2998
2999           if (h != NULL)
3000             {
3001               off = h->got.offset;
3002               offplt = elf_x86_hash_entry (h)->tlsdesc_got;
3003             }
3004           else
3005             {
3006               if (local_got_offsets == NULL)
3007                 abort ();
3008
3009               off = local_got_offsets[r_symndx];
3010               offplt = local_tlsdesc_gotents[r_symndx];
3011             }
3012
3013           if ((off & 1) != 0)
3014             off &= ~1;
3015           else
3016             {
3017               Elf_Internal_Rela outrel;
3018               int dr_type;
3019               asection *sreloc;
3020
3021               if (htab->elf.srelgot == NULL)
3022                 abort ();
3023
3024               indx = h && h->dynindx != -1 ? h->dynindx : 0;
3025
3026               if (GOT_TLS_GDESC_P (tls_type))
3027                 {
3028                   bfd_byte *loc;
3029                   outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC);
3030                   BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8
3031                               <= htab->elf.sgotplt->size);
3032                   outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3033                                      + htab->elf.sgotplt->output_offset
3034                                      + offplt
3035                                      + htab->sgotplt_jump_table_size);
3036                   sreloc = htab->elf.srelplt;
3037                   loc = sreloc->contents;
3038                   loc += (htab->next_tls_desc_index++
3039                           * sizeof (Elf32_External_Rel));
3040                   BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
3041                               <= sreloc->contents + sreloc->size);
3042                   bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3043                   if (indx == 0)
3044                     {
3045                       BFD_ASSERT (! unresolved_reloc);
3046                       bfd_put_32 (output_bfd,
3047                                   relocation - _bfd_x86_elf_dtpoff_base (info),
3048                                   htab->elf.sgotplt->contents + offplt
3049                                   + htab->sgotplt_jump_table_size + 4);
3050                     }
3051                   else
3052                     {
3053                       bfd_put_32 (output_bfd, 0,
3054                                   htab->elf.sgotplt->contents + offplt
3055                                   + htab->sgotplt_jump_table_size + 4);
3056                     }
3057                 }
3058
3059               sreloc = htab->elf.srelgot;
3060
3061               outrel.r_offset = (htab->elf.sgot->output_section->vma
3062                                  + htab->elf.sgot->output_offset + off);
3063
3064               if (GOT_TLS_GD_P (tls_type))
3065                 dr_type = R_386_TLS_DTPMOD32;
3066               else if (GOT_TLS_GDESC_P (tls_type))
3067                 goto dr_done;
3068               else if (tls_type == GOT_TLS_IE_POS)
3069                 dr_type = R_386_TLS_TPOFF;
3070               else
3071                 dr_type = R_386_TLS_TPOFF32;
3072
3073               if (dr_type == R_386_TLS_TPOFF && indx == 0)
3074                 bfd_put_32 (output_bfd,
3075                             relocation - _bfd_x86_elf_dtpoff_base (info),
3076                             htab->elf.sgot->contents + off);
3077               else if (dr_type == R_386_TLS_TPOFF32 && indx == 0)
3078                 bfd_put_32 (output_bfd,
3079                             _bfd_x86_elf_dtpoff_base (info) - relocation,
3080                             htab->elf.sgot->contents + off);
3081               else if (dr_type != R_386_TLS_DESC)
3082                 bfd_put_32 (output_bfd, 0,
3083                             htab->elf.sgot->contents + off);
3084               outrel.r_info = ELF32_R_INFO (indx, dr_type);
3085
3086               elf_append_rel (output_bfd, sreloc, &outrel);
3087
3088               if (GOT_TLS_GD_P (tls_type))
3089                 {
3090                   if (indx == 0)
3091                     {
3092                       BFD_ASSERT (! unresolved_reloc);
3093                       bfd_put_32 (output_bfd,
3094                                   relocation - _bfd_x86_elf_dtpoff_base (info),
3095                                   htab->elf.sgot->contents + off + 4);
3096                     }
3097                   else
3098                     {
3099                       bfd_put_32 (output_bfd, 0,
3100                                   htab->elf.sgot->contents + off + 4);
3101                       outrel.r_info = ELF32_R_INFO (indx,
3102                                                     R_386_TLS_DTPOFF32);
3103                       outrel.r_offset += 4;
3104                       elf_append_rel (output_bfd, sreloc, &outrel);
3105                     }
3106                 }
3107               else if (tls_type == GOT_TLS_IE_BOTH)
3108                 {
3109                   bfd_put_32 (output_bfd,
3110                               (indx == 0
3111                                ? relocation - _bfd_x86_elf_dtpoff_base (info)
3112                                : 0),
3113                               htab->elf.sgot->contents + off + 4);
3114                   outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
3115                   outrel.r_offset += 4;
3116                   elf_append_rel (output_bfd, sreloc, &outrel);
3117                 }
3118
3119             dr_done:
3120               if (h != NULL)
3121                 h->got.offset |= 1;
3122               else
3123                 local_got_offsets[r_symndx] |= 1;
3124             }
3125
3126           if (off >= (bfd_vma) -2
3127               && ! GOT_TLS_GDESC_P (tls_type))
3128             abort ();
3129           if (r_type_tls == R_386_TLS_GOTDESC
3130               || r_type_tls == R_386_TLS_DESC_CALL)
3131             {
3132               relocation = htab->sgotplt_jump_table_size + offplt;
3133               unresolved_reloc = FALSE;
3134             }
3135           else if (r_type_tls == r_type)
3136             {
3137               bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma
3138                               + htab->elf.sgotplt->output_offset;
3139               relocation = htab->elf.sgot->output_section->vma
3140                 + htab->elf.sgot->output_offset + off - g_o_t;
3141               if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE)
3142                   && tls_type == GOT_TLS_IE_BOTH)
3143                 relocation += 4;
3144               if (r_type == R_386_TLS_IE)
3145                 relocation += g_o_t;
3146               unresolved_reloc = FALSE;
3147             }
3148           else if (r_type == R_386_TLS_GD)
3149             {
3150               unsigned int val, type;
3151               bfd_vma roff;
3152
3153               /* GD->IE transition.  */
3154               type = *(contents + rel->r_offset - 2);
3155               val = *(contents + rel->r_offset - 1);
3156               if (type == 0x04)
3157                 {
3158                   /* Change
3159                         leal foo@tlsgd(,%ebx,1), %eax
3160                         call ___tls_get_addr@PLT
3161                      into:
3162                         movl %gs:0, %eax
3163                         subl $foo@gottpoff(%ebx), %eax.  */
3164                   val >>= 3;
3165                   roff = rel->r_offset - 3;
3166                 }
3167               else
3168                 {
3169                   /* Change
3170                         leal foo@tlsgd(%ebx), %eax
3171                         call ___tls_get_addr@PLT
3172                         nop
3173                      or
3174                         leal foo@tlsgd(%reg), %eax
3175                         call *___tls_get_addr@GOT(%reg)
3176                         which may be converted to
3177                         addr32 call ___tls_get_addr
3178                      into:
3179                         movl %gs:0, %eax;
3180                         subl $foo@gottpoff(%reg), %eax.  */
3181                   roff = rel->r_offset - 2;
3182                 }
3183               memcpy (contents + roff,
3184                       "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12);
3185               contents[roff + 7] = 0x80 | (val & 7);
3186               /* If foo is used only with foo@gotntpoff(%reg) and
3187                  foo@indntpoff, but not with foo@gottpoff(%reg), change
3188                  subl $foo@gottpoff(%reg), %eax
3189                  into:
3190                  addl $foo@gotntpoff(%reg), %eax.  */
3191               if (tls_type == GOT_TLS_IE_POS)
3192                 contents[roff + 6] = 0x03;
3193               bfd_put_32 (output_bfd,
3194                           htab->elf.sgot->output_section->vma
3195                           + htab->elf.sgot->output_offset + off
3196                           - htab->elf.sgotplt->output_section->vma
3197                           - htab->elf.sgotplt->output_offset,
3198                           contents + roff + 8);
3199               /* Skip R_386_PLT32 and R_386_GOT32X.  */
3200               rel++;
3201               wrel++;
3202               continue;
3203             }
3204           else if (r_type == R_386_TLS_GOTDESC)
3205             {
3206               /* GDesc -> IE transition.
3207                  It's originally something like:
3208                  leal x@tlsdesc(%ebx), %eax
3209
3210                  Change it to:
3211                  movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax
3212                  or:
3213                  movl x@gottpoff(%ebx), %eax # before negl %eax
3214
3215                  Registers other than %eax may be set up here.  */
3216
3217               bfd_vma roff;
3218
3219               /* First, make sure it's a leal adding ebx to a 32-bit
3220                  offset into any register, although it's probably
3221                  almost always going to be eax.  */
3222               roff = rel->r_offset;
3223
3224               /* Now modify the instruction as appropriate.  */
3225               /* To turn a leal into a movl in the form we use it, it
3226                  suffices to change the first byte from 0x8d to 0x8b.
3227                  aoliva FIXME: should we decide to keep the leal, all
3228                  we have to do is remove the statement below, and
3229                  adjust the relaxation of R_386_TLS_DESC_CALL.  */
3230               bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3231
3232               if (tls_type == GOT_TLS_IE_BOTH)
3233                 off += 4;
3234
3235               bfd_put_32 (output_bfd,
3236                           htab->elf.sgot->output_section->vma
3237                           + htab->elf.sgot->output_offset + off
3238                           - htab->elf.sgotplt->output_section->vma
3239                           - htab->elf.sgotplt->output_offset,
3240                           contents + roff);
3241               continue;
3242             }
3243           else if (r_type == R_386_TLS_DESC_CALL)
3244             {
3245               /* GDesc -> IE transition.
3246                  It's originally:
3247                  call *(%eax)
3248
3249                  Change it to:
3250                  xchg %ax,%ax
3251                  or
3252                  negl %eax
3253                  depending on how we transformed the TLS_GOTDESC above.
3254               */
3255
3256               bfd_vma roff;
3257
3258               roff = rel->r_offset;
3259
3260               /* Now modify the instruction as appropriate.  */
3261               if (tls_type != GOT_TLS_IE_NEG)
3262                 {
3263                   /* xchg %ax,%ax */
3264                   bfd_put_8 (output_bfd, 0x66, contents + roff);
3265                   bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3266                 }
3267               else
3268                 {
3269                   /* negl %eax */
3270                   bfd_put_8 (output_bfd, 0xf7, contents + roff);
3271                   bfd_put_8 (output_bfd, 0xd8, contents + roff + 1);
3272                 }
3273
3274               continue;
3275             }
3276           else
3277             BFD_ASSERT (FALSE);
3278           break;
3279
3280         case R_386_TLS_LDM:
3281           if (! elf_i386_tls_transition (info, input_bfd,
3282                                          input_section, contents,
3283                                          symtab_hdr, sym_hashes,
3284                                          &r_type, GOT_UNKNOWN, rel,
3285                                          relend, h, r_symndx, TRUE))
3286             return FALSE;
3287
3288           if (r_type != R_386_TLS_LDM)
3289             {
3290               /* LD->LE transition.  Change
3291                         leal foo@tlsldm(%ebx) %eax
3292                         call ___tls_get_addr@PLT
3293                  into:
3294                         movl %gs:0, %eax
3295                         nop
3296                         leal 0(%esi,1), %esi
3297                  or change
3298                         leal foo@tlsldm(%reg) %eax
3299                         call *___tls_get_addr@GOT(%reg)
3300                         which may be converted to
3301                         addr32 call ___tls_get_addr
3302                  into:
3303                         movl %gs:0, %eax
3304                         leal 0(%esi), %esi  */
3305               BFD_ASSERT (r_type == R_386_TLS_LE_32);
3306               if (*(contents + rel->r_offset + 4) == 0xff
3307                   || *(contents + rel->r_offset + 4) == 0x67)
3308                 memcpy (contents + rel->r_offset - 2,
3309                         "\x65\xa1\0\0\0\0\x8d\xb6\0\0\0", 12);
3310               else
3311                 memcpy (contents + rel->r_offset - 2,
3312                         "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11);
3313               /* Skip R_386_PC32/R_386_PLT32.  */
3314               rel++;
3315               wrel++;
3316               continue;
3317             }
3318
3319           if (htab->elf.sgot == NULL)
3320             abort ();
3321
3322           off = htab->tls_ld_or_ldm_got.offset;
3323           if (off & 1)
3324             off &= ~1;
3325           else
3326             {
3327               Elf_Internal_Rela outrel;
3328
3329               if (htab->elf.srelgot == NULL)
3330                 abort ();
3331
3332               outrel.r_offset = (htab->elf.sgot->output_section->vma
3333                                  + htab->elf.sgot->output_offset + off);
3334
3335               bfd_put_32 (output_bfd, 0,
3336                           htab->elf.sgot->contents + off);
3337               bfd_put_32 (output_bfd, 0,
3338                           htab->elf.sgot->contents + off + 4);
3339               outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32);
3340               elf_append_rel (output_bfd, htab->elf.srelgot, &outrel);
3341               htab->tls_ld_or_ldm_got.offset |= 1;
3342             }
3343           relocation = htab->elf.sgot->output_section->vma
3344                        + htab->elf.sgot->output_offset + off
3345                        - htab->elf.sgotplt->output_section->vma
3346                        - htab->elf.sgotplt->output_offset;
3347           unresolved_reloc = FALSE;
3348           break;
3349
3350         case R_386_TLS_LDO_32:
3351           if (!bfd_link_executable (info)
3352               || (input_section->flags & SEC_CODE) == 0)
3353             relocation -= _bfd_x86_elf_dtpoff_base (info);
3354           else
3355             /* When converting LDO to LE, we must negate.  */
3356             relocation = -elf_i386_tpoff (info, relocation);
3357           break;
3358
3359         case R_386_TLS_LE_32:
3360         case R_386_TLS_LE:
3361           if (!bfd_link_executable (info))
3362             {
3363               Elf_Internal_Rela outrel;
3364               asection *sreloc;
3365
3366               outrel.r_offset = rel->r_offset
3367                                 + input_section->output_section->vma
3368                                 + input_section->output_offset;
3369               if (h != NULL && h->dynindx != -1)
3370                 indx = h->dynindx;
3371               else
3372                 indx = 0;
3373               if (r_type == R_386_TLS_LE_32)
3374                 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32);
3375               else
3376                 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
3377               sreloc = elf_section_data (input_section)->sreloc;
3378               if (sreloc == NULL)
3379                 abort ();
3380               elf_append_rel (output_bfd, sreloc, &outrel);
3381               if (indx)
3382                 continue;
3383               else if (r_type == R_386_TLS_LE_32)
3384                 relocation = _bfd_x86_elf_dtpoff_base (info) - relocation;
3385               else
3386                 relocation -= _bfd_x86_elf_dtpoff_base (info);
3387             }
3388           else if (r_type == R_386_TLS_LE_32)
3389             relocation = elf_i386_tpoff (info, relocation);
3390           else
3391             relocation = -elf_i386_tpoff (info, relocation);
3392           break;
3393
3394         default:
3395           break;
3396         }
3397
3398       /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3399          because such sections are not SEC_ALLOC and thus ld.so will
3400          not process them.  */
3401       if (unresolved_reloc
3402           && !((input_section->flags & SEC_DEBUGGING) != 0
3403                && h->def_dynamic)
3404           && _bfd_elf_section_offset (output_bfd, info, input_section,
3405                                       rel->r_offset) != (bfd_vma) -1)
3406         {
3407           _bfd_error_handler
3408             /* xgettext:c-format */
3409             (_("%pB(%pA+%#" PRIx64 "): unresolvable %s relocation against symbol `%s'"),
3410              input_bfd,
3411              input_section,
3412              (uint64_t) rel->r_offset,
3413              howto->name,
3414              h->root.root.string);
3415           return FALSE;
3416         }
3417
3418 do_relocation:
3419       r = _bfd_final_link_relocate (howto, input_bfd, input_section,
3420                                     contents, rel->r_offset,
3421                                     relocation, 0);
3422
3423 check_relocation_error:
3424       if (r != bfd_reloc_ok)
3425         {
3426           const char *name;
3427
3428           if (h != NULL)
3429             name = h->root.root.string;
3430           else
3431             {
3432               name = bfd_elf_string_from_elf_section (input_bfd,
3433                                                       symtab_hdr->sh_link,
3434                                                       sym->st_name);
3435               if (name == NULL)
3436                 return FALSE;
3437               if (*name == '\0')
3438                 name = bfd_section_name (input_bfd, sec);
3439             }
3440
3441           if (r == bfd_reloc_overflow)
3442             (*info->callbacks->reloc_overflow)
3443               (info, (h ? &h->root : NULL), name, howto->name,
3444                (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3445           else
3446             {
3447               _bfd_error_handler
3448                 /* xgettext:c-format */
3449                 (_("%pB(%pA+%#" PRIx64 "): reloc against `%s': error %d"),
3450                  input_bfd, input_section,
3451                  (uint64_t) rel->r_offset, name, (int) r);
3452               return FALSE;
3453             }
3454         }
3455
3456       if (wrel != rel)
3457         *wrel = *rel;
3458     }
3459
3460   if (wrel != rel)
3461     {
3462       Elf_Internal_Shdr *rel_hdr;
3463       size_t deleted = rel - wrel;
3464
3465       rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3466       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3467       if (rel_hdr->sh_size == 0)
3468         {
3469           /* It is too late to remove an empty reloc section.  Leave
3470              one NONE reloc.
3471              ??? What is wrong with an empty section???  */
3472           rel_hdr->sh_size = rel_hdr->sh_entsize;
3473           deleted -= 1;
3474         }
3475       rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3476       rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3477       input_section->reloc_count -= deleted;
3478     }
3479
3480   return TRUE;
3481 }
3482
3483 /* Finish up dynamic symbol handling.  We set the contents of various
3484    dynamic sections here.  */
3485
3486 static bfd_boolean
3487 elf_i386_finish_dynamic_symbol (bfd *output_bfd,
3488                                 struct bfd_link_info *info,
3489                                 struct elf_link_hash_entry *h,
3490                                 Elf_Internal_Sym *sym)
3491 {
3492   struct elf_x86_link_hash_table *htab;
3493   unsigned plt_entry_size;
3494   struct elf_x86_link_hash_entry *eh;
3495   bfd_boolean local_undefweak;
3496   bfd_boolean use_plt_second;
3497
3498   htab = elf_x86_hash_table (info, I386_ELF_DATA);
3499   if (htab == NULL)
3500     return FALSE;
3501
3502   plt_entry_size = htab->plt.plt_entry_size;
3503
3504   /* Use the second PLT section only if there is .plt section.  */
3505   use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
3506
3507   eh = (struct elf_x86_link_hash_entry *) h;
3508   if (eh->no_finish_dynamic_symbol)
3509     abort ();
3510
3511   /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3512      resolved undefined weak symbols in executable so that their
3513      references have value 0 at run-time.  */
3514   local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
3515
3516   if (h->plt.offset != (bfd_vma) -1)
3517     {
3518       bfd_vma plt_index, plt_offset;
3519       bfd_vma got_offset;
3520       Elf_Internal_Rela rel;
3521       bfd_byte *loc;
3522       asection *plt, *resolved_plt, *gotplt, *relplt;
3523
3524       /* When building a static executable, use .iplt, .igot.plt and
3525          .rel.iplt sections for STT_GNU_IFUNC symbols.  */
3526       if (htab->elf.splt != NULL)
3527         {
3528           plt = htab->elf.splt;
3529           gotplt = htab->elf.sgotplt;
3530           relplt = htab->elf.srelplt;
3531         }
3532       else
3533         {
3534           plt = htab->elf.iplt;
3535           gotplt = htab->elf.igotplt;
3536           relplt = htab->elf.irelplt;
3537         }
3538
3539       VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
3540
3541       /* Get the index in the procedure linkage table which
3542          corresponds to this symbol.  This is the index of this symbol
3543          in all the symbols for which we are making plt entries.  The
3544          first entry in the procedure linkage table is reserved.
3545
3546          Get the offset into the .got table of the entry that
3547          corresponds to this function.  Each .got entry is 4 bytes.
3548          The first three are reserved.
3549
3550          For static executables, we don't reserve anything.  */
3551
3552       if (plt == htab->elf.splt)
3553         {
3554           got_offset = (h->plt.offset / plt_entry_size
3555                         - htab->plt.has_plt0);
3556           got_offset = (got_offset + 3) * 4;
3557         }
3558       else
3559         {
3560           got_offset = h->plt.offset / plt_entry_size;
3561           got_offset = got_offset * 4;
3562         }
3563
3564       /* Fill in the entry in the procedure linkage table and update
3565          the first slot.  */
3566       memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
3567               plt_entry_size);
3568
3569       if (use_plt_second)
3570         {
3571           const bfd_byte *plt_entry;
3572           if (bfd_link_pic (info))
3573             plt_entry = htab->non_lazy_plt->pic_plt_entry;
3574           else
3575             plt_entry = htab->non_lazy_plt->plt_entry;
3576           memcpy (htab->plt_second->contents + eh->plt_second.offset,
3577                   plt_entry, htab->non_lazy_plt->plt_entry_size);
3578
3579           resolved_plt = htab->plt_second;
3580           plt_offset = eh->plt_second.offset;
3581         }
3582       else
3583         {
3584           resolved_plt = plt;
3585           plt_offset = h->plt.offset;
3586         }
3587
3588       if (! bfd_link_pic (info))
3589         {
3590           bfd_put_32 (output_bfd,
3591                       (gotplt->output_section->vma
3592                        + gotplt->output_offset
3593                        + got_offset),
3594                       resolved_plt->contents + plt_offset
3595                       + htab->plt.plt_got_offset);
3596
3597           if (htab->target_os == is_vxworks)
3598             {
3599               int s, k, reloc_index;
3600
3601               /* Create the R_386_32 relocation referencing the GOT
3602                  for this PLT entry.  */
3603
3604               /* S: Current slot number (zero-based).  */
3605               s = ((h->plt.offset - htab->plt.plt_entry_size)
3606                    / htab->plt.plt_entry_size);
3607               /* K: Number of relocations for PLTResolve. */
3608               if (bfd_link_pic (info))
3609                 k = PLTRESOLVE_RELOCS_SHLIB;
3610               else
3611                 k = PLTRESOLVE_RELOCS;
3612               /* Skip the PLTresolve relocations, and the relocations for
3613                  the other PLT slots. */
3614               reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS;
3615               loc = (htab->srelplt2->contents + reloc_index
3616                      * sizeof (Elf32_External_Rel));
3617
3618               rel.r_offset = (plt->output_section->vma
3619                               + plt->output_offset
3620                               + h->plt.offset + 2),
3621               rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
3622               bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
3623
3624               /* Create the R_386_32 relocation referencing the beginning of
3625                  the PLT for this GOT entry.  */
3626               rel.r_offset = (htab->elf.sgotplt->output_section->vma
3627                               + htab->elf.sgotplt->output_offset
3628                               + got_offset);
3629               rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
3630               bfd_elf32_swap_reloc_out (output_bfd, &rel,
3631                                         loc + sizeof (Elf32_External_Rel));
3632             }
3633         }
3634       else
3635         {
3636           bfd_put_32 (output_bfd, got_offset,
3637                       resolved_plt->contents + plt_offset
3638                       + htab->plt.plt_got_offset);
3639         }
3640
3641       /* Fill in the entry in the global offset table.  Leave the entry
3642          as zero for undefined weak symbol in PIE.  No PLT relocation
3643          against undefined weak symbol in PIE.  */
3644       if (!local_undefweak)
3645         {
3646           if (htab->plt.has_plt0)
3647             bfd_put_32 (output_bfd,
3648                         (plt->output_section->vma
3649                          + plt->output_offset
3650                          + h->plt.offset
3651                          + htab->lazy_plt->plt_lazy_offset),
3652                         gotplt->contents + got_offset);
3653
3654           /* Fill in the entry in the .rel.plt section.  */
3655           rel.r_offset = (gotplt->output_section->vma
3656                           + gotplt->output_offset
3657                           + got_offset);
3658           if (PLT_LOCAL_IFUNC_P (info, h))
3659             {
3660               info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
3661                                       h->root.root.string,
3662                                       h->root.u.def.section->owner);
3663
3664               /* If an STT_GNU_IFUNC symbol is locally defined, generate
3665                  R_386_IRELATIVE instead of R_386_JUMP_SLOT.  Store addend
3666                  in the .got.plt section.  */
3667               bfd_put_32 (output_bfd,
3668                           (h->root.u.def.value
3669                            + h->root.u.def.section->output_section->vma
3670                            + h->root.u.def.section->output_offset),
3671                           gotplt->contents + got_offset);
3672               rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
3673               /* R_386_IRELATIVE comes last.  */
3674               plt_index = htab->next_irelative_index--;
3675             }
3676           else
3677             {
3678               rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
3679               plt_index = htab->next_jump_slot_index++;
3680             }
3681
3682           loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel);
3683           bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
3684
3685           /* Don't fill the second and third slots in PLT entry for
3686              static executables nor without PLT0.  */
3687           if (plt == htab->elf.splt && htab->plt.has_plt0)
3688             {
3689               bfd_put_32 (output_bfd,
3690                           plt_index * sizeof (Elf32_External_Rel),
3691                           plt->contents + h->plt.offset
3692                           + htab->lazy_plt->plt_reloc_offset);
3693               bfd_put_32 (output_bfd,
3694                           - (h->plt.offset
3695                              + htab->lazy_plt->plt_plt_offset + 4),
3696                           (plt->contents + h->plt.offset
3697                            + htab->lazy_plt->plt_plt_offset));
3698             }
3699         }
3700     }
3701   else if (eh->plt_got.offset != (bfd_vma) -1)
3702     {
3703       bfd_vma got_offset, plt_offset;
3704       asection *plt, *got, *gotplt;
3705       const bfd_byte *got_plt_entry;
3706
3707       /* Set the entry in the GOT procedure linkage table.  */
3708       plt = htab->plt_got;
3709       got = htab->elf.sgot;
3710       gotplt = htab->elf.sgotplt;
3711       got_offset = h->got.offset;
3712
3713       if (got_offset == (bfd_vma) -1
3714           || plt == NULL
3715           || got == NULL
3716           || gotplt == NULL)
3717         abort ();
3718
3719       /* Fill in the entry in the GOT procedure linkage table.  */
3720       if (! bfd_link_pic (info))
3721         {
3722           got_plt_entry = htab->non_lazy_plt->plt_entry;
3723           got_offset += got->output_section->vma + got->output_offset;
3724         }
3725       else
3726         {
3727           got_plt_entry = htab->non_lazy_plt->pic_plt_entry;
3728           got_offset += (got->output_section->vma
3729                          + got->output_offset
3730                          - gotplt->output_section->vma
3731                          - gotplt->output_offset);
3732         }
3733
3734       plt_offset = eh->plt_got.offset;
3735       memcpy (plt->contents + plt_offset, got_plt_entry,
3736               htab->non_lazy_plt->plt_entry_size);
3737       bfd_put_32 (output_bfd, got_offset,
3738                   (plt->contents + plt_offset
3739                    + htab->non_lazy_plt->plt_got_offset));
3740     }
3741
3742   if (!local_undefweak
3743       && !h->def_regular
3744       && (h->plt.offset != (bfd_vma) -1
3745           || eh->plt_got.offset != (bfd_vma) -1))
3746     {
3747       /* Mark the symbol as undefined, rather than as defined in
3748          the .plt section.  Leave the value if there were any
3749          relocations where pointer equality matters (this is a clue
3750          for the dynamic linker, to make function pointer
3751          comparisons work between an application and shared
3752          library), otherwise set it to zero.  If a function is only
3753          called from a binary, there is no need to slow down
3754          shared libraries because of that.  */
3755       sym->st_shndx = SHN_UNDEF;
3756       if (!h->pointer_equality_needed)
3757         sym->st_value = 0;
3758     }
3759
3760   _bfd_x86_elf_link_fixup_ifunc_symbol (info, htab, h, sym);
3761
3762   /* Don't generate dynamic GOT relocation against undefined weak
3763      symbol in executable.  */
3764   if (h->got.offset != (bfd_vma) -1
3765       && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry(h)->tls_type)
3766       && (elf_x86_hash_entry(h)->tls_type & GOT_TLS_IE) == 0
3767       && !local_undefweak)
3768     {
3769       Elf_Internal_Rela rel;
3770       asection *relgot = htab->elf.srelgot;
3771
3772       /* This symbol has an entry in the global offset table.  Set it
3773          up.  */
3774
3775       if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
3776         abort ();
3777
3778       rel.r_offset = (htab->elf.sgot->output_section->vma
3779                       + htab->elf.sgot->output_offset
3780                       + (h->got.offset & ~(bfd_vma) 1));
3781
3782       /* If this is a static link, or it is a -Bsymbolic link and the
3783          symbol is defined locally or was forced to be local because
3784          of a version file, we just want to emit a RELATIVE reloc.
3785          The entry in the global offset table will already have been
3786          initialized in the relocate_section function.  */
3787       if (h->def_regular
3788           && h->type == STT_GNU_IFUNC)
3789         {
3790           if (h->plt.offset == (bfd_vma) -1)
3791             {
3792               /* STT_GNU_IFUNC is referenced without PLT.  */
3793               if (htab->elf.splt == NULL)
3794                 {
3795                   /* use .rel[a].iplt section to store .got relocations
3796                      in static executable.  */
3797                   relgot = htab->elf.irelplt;
3798                 }
3799               if (SYMBOL_REFERENCES_LOCAL_P (info, h))
3800                 {
3801                   info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
3802                                           h->root.root.string,
3803                                           h->root.u.def.section->owner);
3804
3805                   bfd_put_32 (output_bfd,
3806                               (h->root.u.def.value
3807                                + h->root.u.def.section->output_section->vma
3808                                + h->root.u.def.section->output_offset),
3809                               htab->elf.sgot->contents + h->got.offset);
3810                   rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
3811                 }
3812               else
3813                 goto do_glob_dat;
3814             }
3815           else if (bfd_link_pic (info))
3816             {
3817               /* Generate R_386_GLOB_DAT.  */
3818               goto do_glob_dat;
3819             }
3820           else
3821             {
3822               asection *plt;
3823               bfd_vma plt_offset;
3824
3825               if (!h->pointer_equality_needed)
3826                 abort ();
3827
3828               /* For non-shared object, we can't use .got.plt, which
3829                  contains the real function addres if we need pointer
3830                  equality.  We load the GOT entry with the PLT entry.  */
3831               if (htab->plt_second != NULL)
3832                 {
3833                   plt = htab->plt_second;
3834                   plt_offset = eh->plt_second.offset;
3835                 }
3836               else
3837                 {
3838                   plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
3839                   plt_offset = h->plt.offset;
3840                 }
3841               bfd_put_32 (output_bfd,
3842                           (plt->output_section->vma
3843                            + plt->output_offset + plt_offset),
3844                           htab->elf.sgot->contents + h->got.offset);
3845               return TRUE;
3846             }
3847         }
3848       else if (bfd_link_pic (info)
3849                && SYMBOL_REFERENCES_LOCAL_P (info, h))
3850         {
3851           BFD_ASSERT((h->got.offset & 1) != 0);
3852           rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
3853         }
3854       else
3855         {
3856           BFD_ASSERT((h->got.offset & 1) == 0);
3857 do_glob_dat:
3858           bfd_put_32 (output_bfd, (bfd_vma) 0,
3859                       htab->elf.sgot->contents + h->got.offset);
3860           rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
3861         }
3862
3863       elf_append_rel (output_bfd, relgot, &rel);
3864     }
3865
3866   if (h->needs_copy)
3867     {
3868       Elf_Internal_Rela rel;
3869       asection *s;
3870
3871       /* This symbol needs a copy reloc.  Set it up.  */
3872       VERIFY_COPY_RELOC (h, htab)
3873
3874       rel.r_offset = (h->root.u.def.value
3875                       + h->root.u.def.section->output_section->vma
3876                       + h->root.u.def.section->output_offset);
3877       rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
3878       if (h->root.u.def.section == htab->elf.sdynrelro)
3879         s = htab->elf.sreldynrelro;
3880       else
3881         s = htab->elf.srelbss;
3882       elf_append_rel (output_bfd, s, &rel);
3883     }
3884
3885   return TRUE;
3886 }
3887
3888 /* Finish up local dynamic symbol handling.  We set the contents of
3889    various dynamic sections here.  */
3890
3891 static bfd_boolean
3892 elf_i386_finish_local_dynamic_symbol (void **slot, void *inf)
3893 {
3894   struct elf_link_hash_entry *h
3895     = (struct elf_link_hash_entry *) *slot;
3896   struct bfd_link_info *info
3897     = (struct bfd_link_info *) inf;
3898
3899   return elf_i386_finish_dynamic_symbol (info->output_bfd, info,
3900                                          h, NULL);
3901 }
3902
3903 /* Finish up undefined weak symbol handling in PIE.  Fill its PLT entry
3904    here since undefined weak symbol may not be dynamic and may not be
3905    called for elf_i386_finish_dynamic_symbol.  */
3906
3907 static bfd_boolean
3908 elf_i386_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
3909                                       void *inf)
3910 {
3911   struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
3912   struct bfd_link_info *info = (struct bfd_link_info *) inf;
3913
3914   if (h->root.type != bfd_link_hash_undefweak
3915       || h->dynindx != -1)
3916     return TRUE;
3917
3918   return elf_i386_finish_dynamic_symbol (info->output_bfd,
3919                                          info, h, NULL);
3920 }
3921
3922 /* Used to decide how to sort relocs in an optimal manner for the
3923    dynamic linker, before writing them out.  */
3924
3925 static enum elf_reloc_type_class
3926 elf_i386_reloc_type_class (const struct bfd_link_info *info,
3927                            const asection *rel_sec ATTRIBUTE_UNUSED,
3928                            const Elf_Internal_Rela *rela)
3929 {
3930   bfd *abfd = info->output_bfd;
3931   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
3932   struct elf_link_hash_table *htab = elf_hash_table (info);
3933
3934   if (htab->dynsym != NULL
3935       && htab->dynsym->contents != NULL)
3936     {
3937       /* Check relocation against STT_GNU_IFUNC symbol if there are
3938          dynamic symbols.  */
3939       unsigned long r_symndx = ELF32_R_SYM (rela->r_info);
3940       if (r_symndx != STN_UNDEF)
3941         {
3942           Elf_Internal_Sym sym;
3943           if (!bed->s->swap_symbol_in (abfd,
3944                                        (htab->dynsym->contents
3945                                         + r_symndx * sizeof (Elf32_External_Sym)),
3946                                        0, &sym))
3947             abort ();
3948
3949           if (ELF32_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
3950             return reloc_class_ifunc;
3951         }
3952     }
3953
3954   switch (ELF32_R_TYPE (rela->r_info))
3955     {
3956     case R_386_IRELATIVE:
3957       return reloc_class_ifunc;
3958     case R_386_RELATIVE:
3959       return reloc_class_relative;
3960     case R_386_JUMP_SLOT:
3961       return reloc_class_plt;
3962     case R_386_COPY:
3963       return reloc_class_copy;
3964     default:
3965       return reloc_class_normal;
3966     }
3967 }
3968
3969 /* Finish up the dynamic sections.  */
3970
3971 static bfd_boolean
3972 elf_i386_finish_dynamic_sections (bfd *output_bfd,
3973                                   struct bfd_link_info *info)
3974 {
3975   struct elf_x86_link_hash_table *htab;
3976
3977   htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
3978   if (htab == NULL)
3979     return FALSE;
3980
3981   if (!htab->elf.dynamic_sections_created)
3982     return TRUE;
3983
3984   if (htab->elf.splt && htab->elf.splt->size > 0)
3985     {
3986       /* UnixWare sets the entsize of .plt to 4, although that doesn't
3987          really seem like the right value.  */
3988       elf_section_data (htab->elf.splt->output_section)
3989         ->this_hdr.sh_entsize = 4;
3990
3991       if (htab->plt.has_plt0)
3992         {
3993           /* Fill in the special first entry in the procedure linkage
3994              table.  */
3995           memcpy (htab->elf.splt->contents, htab->plt.plt0_entry,
3996                   htab->lazy_plt->plt0_entry_size);
3997           memset (htab->elf.splt->contents + htab->lazy_plt->plt0_entry_size,
3998                   htab->plt0_pad_byte,
3999                   htab->plt.plt_entry_size - htab->lazy_plt->plt0_entry_size);
4000           if (!bfd_link_pic (info))
4001             {
4002               bfd_put_32 (output_bfd,
4003                           (htab->elf.sgotplt->output_section->vma
4004                            + htab->elf.sgotplt->output_offset
4005                            + 4),
4006                           htab->elf.splt->contents
4007                           + htab->lazy_plt->plt0_got1_offset);
4008               bfd_put_32 (output_bfd,
4009                           (htab->elf.sgotplt->output_section->vma
4010                            + htab->elf.sgotplt->output_offset
4011                            + 8),
4012                           htab->elf.splt->contents
4013                           + htab->lazy_plt->plt0_got2_offset);
4014
4015               if (htab->target_os == is_vxworks)
4016                 {
4017                   Elf_Internal_Rela rel;
4018                   int num_plts = (htab->elf.splt->size
4019                                   / htab->plt.plt_entry_size) - 1;
4020                   unsigned char *p;
4021                   asection *srelplt2 = htab->srelplt2;
4022
4023                   /* Generate a relocation for _GLOBAL_OFFSET_TABLE_
4024                      + 4.  On IA32 we use REL relocations so the
4025                      addend goes in the PLT directly.  */
4026                   rel.r_offset = (htab->elf.splt->output_section->vma
4027                                   + htab->elf.splt->output_offset
4028                                   + htab->lazy_plt->plt0_got1_offset);
4029                   rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
4030                                              R_386_32);
4031                   bfd_elf32_swap_reloc_out (output_bfd, &rel,
4032                                             srelplt2->contents);
4033                   /* Generate a relocation for _GLOBAL_OFFSET_TABLE_
4034                      + 8.  */
4035                   rel.r_offset = (htab->elf.splt->output_section->vma
4036                                   + htab->elf.splt->output_offset
4037                                   + htab->lazy_plt->plt0_got2_offset);
4038                   rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
4039                                              R_386_32);
4040                   bfd_elf32_swap_reloc_out (output_bfd, &rel,
4041                                             srelplt2->contents +
4042                                             sizeof (Elf32_External_Rel));
4043                   /* Correct the .rel.plt.unloaded relocations.  */
4044                   p = srelplt2->contents;
4045                   if (bfd_link_pic (info))
4046                     p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel);
4047                   else
4048                     p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel);
4049
4050                   for (; num_plts; num_plts--)
4051                     {
4052                       bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
4053                       rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
4054                                                  R_386_32);
4055                       bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4056                       p += sizeof (Elf32_External_Rel);
4057
4058                       bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
4059                       rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx,
4060                                                  R_386_32);
4061                       bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4062                       p += sizeof (Elf32_External_Rel);
4063                     }
4064                 }
4065             }
4066         }
4067     }
4068
4069   /* Fill PLT entries for undefined weak symbols in PIE.  */
4070   if (bfd_link_pie (info))
4071     bfd_hash_traverse (&info->hash->table,
4072                        elf_i386_pie_finish_undefweak_symbol,
4073                        info);
4074
4075   return TRUE;
4076 }
4077
4078 /* Fill PLT/GOT entries and allocate dynamic relocations for local
4079    STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4080    It has to be done before elf_link_sort_relocs is called so that
4081    dynamic relocations are properly sorted.  */
4082
4083 static bfd_boolean
4084 elf_i386_output_arch_local_syms
4085   (bfd *output_bfd ATTRIBUTE_UNUSED,
4086    struct bfd_link_info *info,
4087    void *flaginfo ATTRIBUTE_UNUSED,
4088    int (*func) (void *, const char *,
4089                 Elf_Internal_Sym *,
4090                 asection *,
4091                 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4092 {
4093   struct elf_x86_link_hash_table *htab
4094     = elf_x86_hash_table (info, I386_ELF_DATA);
4095   if (htab == NULL)
4096     return FALSE;
4097
4098   /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols.  */
4099   htab_traverse (htab->loc_hash_table,
4100                  elf_i386_finish_local_dynamic_symbol,
4101                  info);
4102
4103   return TRUE;
4104 }
4105
4106 /* Forward declaration.  */
4107 static const struct elf_x86_lazy_plt_layout elf_i386_nacl_plt;
4108
4109 /* Similar to _bfd_elf_get_synthetic_symtab.  Support PLTs with all
4110    dynamic relocations.   */
4111
4112 static long
4113 elf_i386_get_synthetic_symtab (bfd *abfd,
4114                                long symcount ATTRIBUTE_UNUSED,
4115                                asymbol **syms ATTRIBUTE_UNUSED,
4116                                long dynsymcount,
4117                                asymbol **dynsyms,
4118                                asymbol **ret)
4119 {
4120   long count, i, n;
4121   int j;
4122   bfd_byte *plt_contents;
4123   long relsize;
4124   const struct elf_x86_lazy_plt_layout *lazy_plt;
4125   const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4126   const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4127   const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
4128   asection *plt;
4129   bfd_vma got_addr;
4130   enum elf_x86_plt_type plt_type;
4131   struct elf_x86_plt plts[] =
4132     {
4133       { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4134       { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
4135       { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4136       { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
4137     };
4138
4139   *ret = NULL;
4140
4141   if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4142     return 0;
4143
4144   if (dynsymcount <= 0)
4145     return 0;
4146
4147   relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4148   if (relsize <= 0)
4149     return -1;
4150
4151   non_lazy_plt = NULL;
4152   /* Silence GCC 6.  */
4153   lazy_plt = NULL;
4154   non_lazy_ibt_plt = NULL;
4155   lazy_ibt_plt = NULL;
4156   switch (get_elf_x86_backend_data (abfd)->target_os)
4157     {
4158     case is_normal:
4159     case is_solaris:
4160       non_lazy_plt = &elf_i386_non_lazy_plt;
4161       lazy_ibt_plt = &elf_i386_lazy_ibt_plt;
4162       non_lazy_ibt_plt = &elf_i386_non_lazy_ibt_plt;
4163       /* Fall through */
4164     case is_vxworks:
4165       lazy_plt = &elf_i386_lazy_plt;
4166       break;
4167     case is_nacl:
4168       lazy_plt = &elf_i386_nacl_plt;
4169       break;
4170     }
4171
4172   got_addr = 0;
4173
4174   count = 0;
4175   for (j = 0; plts[j].name != NULL; j++)
4176     {
4177       plt = bfd_get_section_by_name (abfd, plts[j].name);
4178       if (plt == NULL || plt->size == 0)
4179         continue;
4180
4181       /* Get the PLT section contents.  */
4182       plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4183       if (plt_contents == NULL)
4184         break;
4185       if (!bfd_get_section_contents (abfd, (asection *) plt,
4186                                      plt_contents, 0, plt->size))
4187         {
4188           free (plt_contents);
4189           break;
4190         }
4191
4192       /* Check what kind of PLT it is.  */
4193       plt_type = plt_unknown;
4194       if (plts[j].type == plt_unknown
4195           && (plt->size >= (lazy_plt->plt0_entry_size
4196                             + lazy_plt->plt_entry_size)))
4197         {
4198           /* Match lazy PLT first.  */
4199           if (memcmp (plt_contents, lazy_plt->plt0_entry,
4200                       lazy_plt->plt0_got1_offset) == 0)
4201             {
4202               /* The fist entry in the lazy IBT PLT is the same as the
4203                  normal lazy PLT.  */
4204               if (lazy_ibt_plt != NULL
4205                   && (memcmp (plt_contents + lazy_ibt_plt->plt0_entry_size,
4206                               lazy_ibt_plt->plt_entry,
4207                               lazy_ibt_plt->plt_got_offset) == 0))
4208                 plt_type = plt_lazy | plt_second;
4209               else
4210                 plt_type = plt_lazy;
4211             }
4212           else if (memcmp (plt_contents, lazy_plt->pic_plt0_entry,
4213                            lazy_plt->plt0_got1_offset) == 0)
4214             {
4215               /* The fist entry in the PIC lazy IBT PLT is the same as
4216                  the normal PIC lazy PLT.  */
4217               if (lazy_ibt_plt != NULL
4218                   && (memcmp (plt_contents + lazy_ibt_plt->plt0_entry_size,
4219                               lazy_ibt_plt->pic_plt_entry,
4220                               lazy_ibt_plt->plt_got_offset) == 0))
4221                 plt_type = plt_lazy | plt_pic | plt_second;
4222               else
4223                 plt_type = plt_lazy | plt_pic;
4224             }
4225         }
4226
4227       if (non_lazy_plt != NULL
4228           && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4229           && plt->size >= non_lazy_plt->plt_entry_size)
4230         {
4231           /* Match non-lazy PLT.  */
4232           if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4233                       non_lazy_plt->plt_got_offset) == 0)
4234             plt_type = plt_non_lazy;
4235           else if (memcmp (plt_contents, non_lazy_plt->pic_plt_entry,
4236                            non_lazy_plt->plt_got_offset) == 0)
4237             plt_type = plt_pic;
4238         }
4239
4240       if ((non_lazy_ibt_plt != NULL)
4241           && (plt_type == plt_unknown || plt_type == plt_second)
4242           && plt->size >= non_lazy_ibt_plt->plt_entry_size)
4243         {
4244           if (memcmp (plt_contents,
4245                       non_lazy_ibt_plt->plt_entry,
4246                       non_lazy_ibt_plt->plt_got_offset) == 0)
4247             {
4248               /* Match IBT PLT.  */
4249               plt_type = plt_second;
4250               non_lazy_plt = non_lazy_ibt_plt;
4251             }
4252           else if (memcmp (plt_contents,
4253                            non_lazy_ibt_plt->pic_plt_entry,
4254                            non_lazy_ibt_plt->plt_got_offset) == 0)
4255             {
4256               /* Match PIC IBT PLT.  */
4257               plt_type = plt_second | plt_pic;
4258               non_lazy_plt = non_lazy_ibt_plt;
4259             }
4260         }
4261
4262       if (plt_type == plt_unknown)
4263         {
4264           free (plt_contents);
4265           continue;
4266         }
4267
4268       plts[j].sec = plt;
4269       plts[j].type = plt_type;
4270
4271       if ((plt_type & plt_lazy))
4272         {
4273           plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4274           plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4275           /* Skip PLT0 in lazy PLT.  */
4276           i = 1;
4277         }
4278       else
4279         {
4280           plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4281           plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4282           i = 0;
4283         }
4284
4285       /* Skip lazy PLT when the second PLT is used.  */
4286       if ((plt_type & (plt_lazy | plt_second))
4287           == (plt_lazy | plt_second))
4288         plts[j].count = 0;
4289       else
4290         {
4291           n = plt->size / plts[j].plt_entry_size;
4292           plts[j].count = n;
4293           count += n - i;
4294         }
4295
4296       plts[j].contents = plt_contents;
4297
4298       /* The _GLOBAL_OFFSET_TABLE_ address is needed.  */
4299       if ((plt_type & plt_pic))
4300         got_addr = (bfd_vma) -1;
4301     }
4302
4303   return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4304                                             got_addr, plts, dynsyms,
4305                                             ret);
4306 }
4307
4308 /* Set up i386 GNU properties.  Return the first relocatable ELF input
4309    with GNU properties if found.  Otherwise, return NULL.  */
4310
4311 static bfd *
4312 elf_i386_link_setup_gnu_properties (struct bfd_link_info *info)
4313 {
4314   struct elf_x86_init_table init_table;
4315
4316   switch (get_elf_x86_backend_data (info->output_bfd)->target_os)
4317     {
4318     case is_normal:
4319     case is_solaris:
4320       init_table.plt0_pad_byte = 0x0;
4321       init_table.lazy_plt = &elf_i386_lazy_plt;
4322       init_table.non_lazy_plt = &elf_i386_non_lazy_plt;
4323       init_table.lazy_ibt_plt = &elf_i386_lazy_ibt_plt;
4324       init_table.non_lazy_ibt_plt = &elf_i386_non_lazy_ibt_plt;
4325       break;
4326     case is_vxworks:
4327       init_table.plt0_pad_byte = 0x90;
4328       init_table.lazy_plt = &elf_i386_lazy_plt;
4329       init_table.non_lazy_plt = NULL;
4330       init_table.lazy_ibt_plt = NULL;
4331       init_table.non_lazy_ibt_plt = NULL;
4332       break;
4333     case is_nacl:
4334       init_table.plt0_pad_byte = 0x90;
4335       init_table.lazy_plt = &elf_i386_nacl_plt;
4336       init_table.non_lazy_plt = NULL;
4337       init_table.lazy_ibt_plt = NULL;
4338       init_table.non_lazy_ibt_plt = NULL;
4339       break;
4340     }
4341
4342   init_table.r_info = elf32_r_info;
4343   init_table.r_sym = elf32_r_sym;
4344
4345   return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
4346 }
4347
4348 #define TARGET_LITTLE_SYM               i386_elf32_vec
4349 #define TARGET_LITTLE_NAME              "elf32-i386"
4350 #define ELF_ARCH                        bfd_arch_i386
4351 #define ELF_TARGET_ID                   I386_ELF_DATA
4352 #define ELF_MACHINE_CODE                EM_386
4353 #define ELF_MAXPAGESIZE                 0x1000
4354
4355 #define elf_backend_can_gc_sections     1
4356 #define elf_backend_can_refcount        1
4357 #define elf_backend_want_got_plt        1
4358 #define elf_backend_plt_readonly        1
4359 #define elf_backend_want_plt_sym        0
4360 #define elf_backend_got_header_size     12
4361 #define elf_backend_plt_alignment       4
4362 #define elf_backend_dtrel_excludes_plt  1
4363 #define elf_backend_extern_protected_data 1
4364 #define elf_backend_caches_rawsize      1
4365 #define elf_backend_want_dynrelro       1
4366
4367 /* Support RELA for objdump of prelink objects.  */
4368 #define elf_info_to_howto                     elf_i386_info_to_howto_rel
4369 #define elf_info_to_howto_rel                 elf_i386_info_to_howto_rel
4370
4371 #define bfd_elf32_bfd_is_local_label_name     elf_i386_is_local_label_name
4372 #define bfd_elf32_bfd_reloc_type_lookup       elf_i386_reloc_type_lookup
4373 #define bfd_elf32_bfd_reloc_name_lookup       elf_i386_reloc_name_lookup
4374 #define bfd_elf32_get_synthetic_symtab        elf_i386_get_synthetic_symtab
4375
4376 #define elf_backend_relocs_compatible         _bfd_elf_relocs_compatible
4377 #define elf_backend_check_relocs              elf_i386_check_relocs
4378 #define elf_backend_create_dynamic_sections   _bfd_elf_create_dynamic_sections
4379 #define elf_backend_fake_sections             elf_i386_fake_sections
4380 #define elf_backend_finish_dynamic_sections   elf_i386_finish_dynamic_sections
4381 #define elf_backend_finish_dynamic_symbol     elf_i386_finish_dynamic_symbol
4382 #define elf_backend_output_arch_local_syms     elf_i386_output_arch_local_syms
4383 #define elf_backend_grok_prstatus             elf_i386_grok_prstatus
4384 #define elf_backend_grok_psinfo               elf_i386_grok_psinfo
4385 #define elf_backend_reloc_type_class          elf_i386_reloc_type_class
4386 #define elf_backend_relocate_section          elf_i386_relocate_section
4387 #define elf_backend_setup_gnu_properties      elf_i386_link_setup_gnu_properties
4388 #define elf_backend_hide_symbol               _bfd_x86_elf_hide_symbol
4389
4390 #define elf_backend_linux_prpsinfo32_ugid16     TRUE
4391
4392 #define elf32_bed                             elf32_i386_bed
4393
4394 #include "elf32-target.h"
4395
4396 /* FreeBSD support.  */
4397
4398 #undef  TARGET_LITTLE_SYM
4399 #define TARGET_LITTLE_SYM               i386_elf32_fbsd_vec
4400 #undef  TARGET_LITTLE_NAME
4401 #define TARGET_LITTLE_NAME              "elf32-i386-freebsd"
4402 #undef  ELF_OSABI
4403 #define ELF_OSABI                       ELFOSABI_FREEBSD
4404
4405 /* The kernel recognizes executables as valid only if they carry a
4406    "FreeBSD" label in the ELF header.  So we put this label on all
4407    executables and (for simplicity) also all other object files.  */
4408
4409 static void
4410 elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info)
4411 {
4412   _bfd_elf_post_process_headers (abfd, info);
4413
4414 #ifdef OLD_FREEBSD_ABI_LABEL
4415   {
4416     /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard.  */
4417     Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
4418     memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8);
4419   }
4420 #endif
4421 }
4422
4423 #undef  elf_backend_post_process_headers
4424 #define elf_backend_post_process_headers        elf_i386_fbsd_post_process_headers
4425 #undef  elf32_bed
4426 #define elf32_bed                               elf32_i386_fbsd_bed
4427
4428 #undef elf_backend_add_symbol_hook
4429
4430 #include "elf32-target.h"
4431
4432 /* Solaris 2.  */
4433
4434 #undef  TARGET_LITTLE_SYM
4435 #define TARGET_LITTLE_SYM               i386_elf32_sol2_vec
4436 #undef  TARGET_LITTLE_NAME
4437 #define TARGET_LITTLE_NAME              "elf32-i386-sol2"
4438
4439 static const struct elf_x86_backend_data elf_i386_solaris_arch_bed =
4440   {
4441     is_solaris                          /* os */
4442   };
4443
4444 #undef  elf_backend_arch_data
4445 #define elf_backend_arch_data           &elf_i386_solaris_arch_bed
4446
4447 #undef elf_backend_post_process_headers
4448
4449 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
4450    objects won't be recognized.  */
4451 #undef ELF_OSABI
4452
4453 #undef  elf32_bed
4454 #define elf32_bed                       elf32_i386_sol2_bed
4455
4456 /* The 32-bit static TLS arena size is rounded to the nearest 8-byte
4457    boundary.  */
4458 #undef  elf_backend_static_tls_alignment
4459 #define elf_backend_static_tls_alignment 8
4460
4461 /* The Solaris 2 ABI requires a plt symbol on all platforms.
4462
4463    Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
4464    File, p.63.  */
4465 #undef  elf_backend_want_plt_sym
4466 #define elf_backend_want_plt_sym        1
4467
4468 #undef  elf_backend_strtab_flags
4469 #define elf_backend_strtab_flags        SHF_STRINGS
4470
4471 /* Called to set the sh_flags, sh_link and sh_info fields of OSECTION which
4472    has a type >= SHT_LOOS.  Returns TRUE if these fields were initialised
4473    FALSE otherwise.  ISECTION is the best guess matching section from the
4474    input bfd IBFD, but it might be NULL.  */
4475
4476 static bfd_boolean
4477 elf32_i386_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
4478                                                 bfd *obfd ATTRIBUTE_UNUSED,
4479                                                 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
4480                                                 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
4481 {
4482   /* PR 19938: FIXME: Need to add code for setting the sh_info
4483      and sh_link fields of Solaris specific section types.  */
4484   return FALSE;
4485
4486   /* Based upon Oracle Solaris 11.3 Linkers and Libraries Guide, Ch. 13,
4487      Object File Format, Table 13-9  ELF sh_link and sh_info Interpretation:
4488
4489 http://docs.oracle.com/cd/E53394_01/html/E54813/chapter6-94076.html#scrolltoc
4490
4491      The following values should be set:
4492
4493 Type                 Link                           Info
4494 -----------------------------------------------------------------------------
4495 SHT_SUNW_ancillary   The section header index of    0
4496  [0x6fffffee]        the associated string table.
4497
4498 SHT_SUNW_capinfo     The section header index of    For a dynamic object, the
4499  [0x6ffffff0]        the associated symbol table.   section header index of
4500                                                     the associated
4501                                                     SHT_SUNW_capchain table,
4502                                                     otherwise 0.
4503
4504 SHT_SUNW_symsort     The section header index of    0
4505  [0x6ffffff1]        the associated symbol table.
4506
4507 SHT_SUNW_tlssort     The section header index of    0
4508  [0x6ffffff2]        the associated symbol table.
4509
4510 SHT_SUNW_LDYNSYM     The section header index of    One greater than the
4511  [0x6ffffff3]        the associated string table.   symbol table index of the
4512                      This index is the same string  last local symbol,
4513                      table used by the SHT_DYNSYM   STB_LOCAL. Since
4514                      section.                       SHT_SUNW_LDYNSYM only
4515                                                     contains local symbols,
4516                                                     sh_info is equivalent to
4517                                                     the number of symbols in
4518                                                     the table.
4519
4520 SHT_SUNW_cap         If symbol capabilities exist,  If any capabilities refer
4521  [0x6ffffff5]        the section header index of    to named strings, the
4522                      the associated                 section header index of
4523                      SHT_SUNW_capinfo table,        the associated string
4524                           otherwise 0.              table, otherwise 0.
4525
4526 SHT_SUNW_move        The section header index of    0
4527  [0x6ffffffa]        the associated symbol table.
4528
4529 SHT_SUNW_COMDAT      0                              0
4530  [0x6ffffffb]
4531
4532 SHT_SUNW_syminfo     The section header index of    The section header index
4533  [0x6ffffffc]        the associated symbol table.   of the associated
4534                                                     .dynamic section.
4535
4536 SHT_SUNW_verdef      The section header index of    The number of version
4537  [0x6ffffffd]        the associated string table.   definitions within the
4538                                                     section.
4539
4540 SHT_SUNW_verneed     The section header index of    The number of version
4541  [0x6ffffffe]        the associated string table.   dependencies within the
4542                                                     section.
4543
4544 SHT_SUNW_versym      The section header index of    0
4545  [0x6fffffff]        the associated symbol table.  */
4546 }
4547
4548 #undef  elf_backend_copy_special_section_fields
4549 #define elf_backend_copy_special_section_fields elf32_i386_copy_solaris_special_section_fields
4550
4551 #include "elf32-target.h"
4552
4553 /* Intel MCU support.  */
4554
4555 static bfd_boolean
4556 elf32_iamcu_elf_object_p (bfd *abfd)
4557 {
4558   /* Set the right machine number for an IAMCU elf32 file.  */
4559   bfd_default_set_arch_mach (abfd, bfd_arch_iamcu, bfd_mach_i386_iamcu);
4560   return TRUE;
4561 }
4562
4563 #undef  TARGET_LITTLE_SYM
4564 #define TARGET_LITTLE_SYM               iamcu_elf32_vec
4565 #undef  TARGET_LITTLE_NAME
4566 #define TARGET_LITTLE_NAME              "elf32-iamcu"
4567 #undef  ELF_ARCH
4568 #define ELF_ARCH                        bfd_arch_iamcu
4569
4570 #undef  ELF_MACHINE_CODE
4571 #define ELF_MACHINE_CODE                EM_IAMCU
4572
4573 #undef  elf_backend_arch_data
4574 #define elf_backend_arch_data           &elf_i386_arch_bed
4575
4576 #undef  ELF_OSABI
4577
4578 #undef  elf32_bed
4579 #define elf32_bed                       elf32_iamcu_bed
4580
4581 #undef  elf_backend_object_p
4582 #define elf_backend_object_p            elf32_iamcu_elf_object_p
4583
4584 #undef  elf_backend_static_tls_alignment
4585
4586 #undef  elf_backend_want_plt_sym
4587 #define elf_backend_want_plt_sym        0
4588
4589 #undef  elf_backend_strtab_flags
4590 #undef  elf_backend_copy_special_section_fields
4591
4592 #include "elf32-target.h"
4593
4594 /* Restore defaults.  */
4595 #undef  ELF_ARCH
4596 #define ELF_ARCH                        bfd_arch_i386
4597 #undef  ELF_MACHINE_CODE
4598 #define ELF_MACHINE_CODE                EM_386
4599
4600 /* Native Client support.  */
4601
4602 #undef  TARGET_LITTLE_SYM
4603 #define TARGET_LITTLE_SYM               i386_elf32_nacl_vec
4604 #undef  TARGET_LITTLE_NAME
4605 #define TARGET_LITTLE_NAME              "elf32-i386-nacl"
4606 #undef  elf32_bed
4607 #define elf32_bed                       elf32_i386_nacl_bed
4608
4609 #undef  ELF_MAXPAGESIZE
4610 #define ELF_MAXPAGESIZE                 0x10000
4611
4612 /* Restore defaults.  */
4613 #undef  ELF_OSABI
4614 #undef  elf_backend_want_plt_sym
4615 #define elf_backend_want_plt_sym        0
4616 #undef  elf_backend_post_process_headers
4617 #undef  elf_backend_static_tls_alignment
4618
4619 /* NaCl uses substantially different PLT entries for the same effects.  */
4620
4621 #undef  elf_backend_plt_alignment
4622 #define elf_backend_plt_alignment       5
4623 #define NACL_PLT_ENTRY_SIZE             64
4624 #define NACLMASK                        0xe0 /* 32-byte alignment mask.  */
4625
4626 static const bfd_byte elf_i386_nacl_plt0_entry[] =
4627   {
4628     0xff, 0x35,                   /* pushl contents of address */
4629     0, 0, 0, 0,                   /* replaced with address of .got + 4.  */
4630     0x8b, 0x0d,                   /* movl contents of address, %ecx */
4631     0, 0, 0, 0,                   /* replaced with address of .got + 8.  */
4632     0x83, 0xe1, NACLMASK,         /* andl $NACLMASK, %ecx */
4633     0xff, 0xe1                    /* jmp *%ecx */
4634   };
4635
4636 static const bfd_byte elf_i386_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
4637   {
4638     0x8b, 0x0d,                         /* movl contents of address, %ecx */
4639     0, 0, 0, 0,                         /* replaced with GOT slot address.  */
4640     0x83, 0xe1, NACLMASK,               /* andl $NACLMASK, %ecx */
4641     0xff, 0xe1,                         /* jmp *%ecx */
4642
4643     /* Pad to the next 32-byte boundary with nop instructions.  */
4644     0x90,
4645     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4646     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4647
4648     /* Lazy GOT entries point here (32-byte aligned).  */
4649     0x68,                              /* pushl immediate */
4650     0, 0, 0, 0,                        /* replaced with reloc offset.  */
4651     0xe9,                              /* jmp relative */
4652     0, 0, 0, 0,                        /* replaced with offset to .plt.  */
4653
4654     /* Pad to the next 32-byte boundary with nop instructions.  */
4655     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4656     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4657     0x90, 0x90
4658   };
4659
4660 static const bfd_byte
4661 elf_i386_nacl_pic_plt0_entry[sizeof (elf_i386_nacl_plt0_entry)] =
4662   {
4663     0xff, 0x73, 0x04,           /* pushl 4(%ebx) */
4664     0x8b, 0x4b, 0x08,           /* mov 0x8(%ebx), %ecx */
4665     0x83, 0xe1, 0xe0,           /* and $NACLMASK, %ecx */
4666     0xff, 0xe1,                 /* jmp *%ecx */
4667
4668     /* This is expected to be the same size as elf_i386_nacl_plt0_entry,
4669        so pad to that size with nop instructions.  */
4670     0x90, 0x90, 0x90, 0x90, 0x90, 0x90
4671   };
4672
4673 static const bfd_byte elf_i386_nacl_pic_plt_entry[NACL_PLT_ENTRY_SIZE] =
4674   {
4675     0x8b, 0x8b,          /* movl offset(%ebx), %ecx */
4676     0, 0, 0, 0,          /* replaced with offset of this symbol in .got.  */
4677     0x83, 0xe1, 0xe0,    /* andl $NACLMASK, %ecx */
4678     0xff, 0xe1,          /* jmp *%ecx */
4679
4680     /* Pad to the next 32-byte boundary with nop instructions.  */
4681     0x90,
4682     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4683     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4684
4685     /* Lazy GOT entries point here (32-byte aligned).  */
4686     0x68,                /* pushl immediate */
4687     0, 0, 0, 0,          /* replaced with offset into relocation table.  */
4688     0xe9,                /* jmp relative */
4689     0, 0, 0, 0,          /* replaced with offset to start of .plt.  */
4690
4691     /* Pad to the next 32-byte boundary with nop instructions.  */
4692     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4693     0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4694     0x90, 0x90
4695   };
4696
4697 static const bfd_byte elf_i386_nacl_eh_frame_plt[] =
4698   {
4699 #if (PLT_CIE_LENGTH != 20                               \
4700      || PLT_FDE_LENGTH != 36                            \
4701      || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8  \
4702      || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
4703 # error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
4704 #endif
4705     PLT_CIE_LENGTH, 0, 0, 0,            /* CIE length */
4706     0, 0, 0, 0,                         /* CIE ID */
4707     1,                                  /* CIE version */
4708     'z', 'R', 0,                        /* Augmentation string */
4709     1,                                  /* Code alignment factor */
4710     0x7c,                               /* Data alignment factor: -4 */
4711     8,                                  /* Return address column */
4712     1,                                  /* Augmentation size */
4713     DW_EH_PE_pcrel | DW_EH_PE_sdata4,   /* FDE encoding */
4714     DW_CFA_def_cfa, 4, 4,               /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
4715     DW_CFA_offset + 8, 1,               /* DW_CFA_offset: r8 (eip) at cfa-4 */
4716     DW_CFA_nop, DW_CFA_nop,
4717
4718     PLT_FDE_LENGTH, 0, 0, 0,     /* FDE length */
4719     PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
4720     0, 0, 0, 0,                  /* R_386_PC32 .plt goes here */
4721     0, 0, 0, 0,                  /* .plt size goes here */
4722     0,                           /* Augmentation size */
4723     DW_CFA_def_cfa_offset, 8,    /* DW_CFA_def_cfa_offset: 8 */
4724     DW_CFA_advance_loc + 6,      /* DW_CFA_advance_loc: 6 to __PLT__+6 */
4725     DW_CFA_def_cfa_offset, 12,   /* DW_CFA_def_cfa_offset: 12 */
4726     DW_CFA_advance_loc + 58,     /* DW_CFA_advance_loc: 58 to __PLT__+64 */
4727     DW_CFA_def_cfa_expression,   /* DW_CFA_def_cfa_expression */
4728     13,                          /* Block length */
4729     DW_OP_breg4, 4,              /* DW_OP_breg4 (esp): 4 */
4730     DW_OP_breg8, 0,              /* DW_OP_breg8 (eip): 0 */
4731     DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
4732     DW_OP_lit2, DW_OP_shl, DW_OP_plus,
4733     DW_CFA_nop, DW_CFA_nop
4734   };
4735
4736 static const struct elf_x86_lazy_plt_layout elf_i386_nacl_plt =
4737   {
4738     elf_i386_nacl_plt0_entry,           /* plt0_entry */
4739     sizeof (elf_i386_nacl_plt0_entry),  /* plt0_entry_size */
4740     elf_i386_nacl_plt_entry,            /* plt_entry */
4741     NACL_PLT_ENTRY_SIZE,                /* plt_entry_size */
4742     NULL,                               /* plt_tlsdesc_entry */
4743     0,                                  /* plt_tlsdesc_entry_size*/
4744     0,                                  /* plt_tlsdesc_got1_offset */
4745     0,                                  /* plt_tlsdesc_got2_offset */
4746     0,                                  /* plt_tlsdesc_got1_insn_end */
4747     0,                                  /* plt_tlsdesc_got2_insn_end */
4748     2,                                  /* plt0_got1_offset */
4749     8,                                  /* plt0_got2_offset */
4750     0,                                  /* plt0_got2_insn_end */
4751     2,                                  /* plt_got_offset */
4752     33,                                 /* plt_reloc_offset */
4753     38,                                 /* plt_plt_offset */
4754     0,                                  /* plt_got_insn_size */
4755     0,                                  /* plt_plt_insn_end */
4756     32,                                 /* plt_lazy_offset */
4757     elf_i386_nacl_pic_plt0_entry,       /* pic_plt0_entry */
4758     elf_i386_nacl_pic_plt_entry,        /* pic_plt_entry */
4759     elf_i386_nacl_eh_frame_plt,         /* eh_frame_plt */
4760     sizeof (elf_i386_nacl_eh_frame_plt) /* eh_frame_plt_size */
4761   };
4762
4763 static const struct elf_x86_backend_data elf_i386_nacl_arch_bed =
4764   {
4765     is_nacl                             /* os */
4766   };
4767
4768 static bfd_boolean
4769 elf32_i386_nacl_elf_object_p (bfd *abfd)
4770 {
4771   /* Set the right machine number for a NaCl i386 ELF32 file.  */
4772   bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386_nacl);
4773   return TRUE;
4774 }
4775
4776 #undef  elf_backend_arch_data
4777 #define elf_backend_arch_data   &elf_i386_nacl_arch_bed
4778
4779 #undef  elf_backend_object_p
4780 #define elf_backend_object_p                    elf32_i386_nacl_elf_object_p
4781 #undef  elf_backend_modify_segment_map
4782 #define elf_backend_modify_segment_map          nacl_modify_segment_map
4783 #undef  elf_backend_modify_program_headers
4784 #define elf_backend_modify_program_headers      nacl_modify_program_headers
4785 #undef  elf_backend_final_write_processing
4786 #define elf_backend_final_write_processing      nacl_final_write_processing
4787
4788 #include "elf32-target.h"
4789
4790 /* Restore defaults.  */
4791 #undef  elf_backend_object_p
4792 #undef  elf_backend_modify_segment_map
4793 #undef  elf_backend_modify_program_headers
4794 #undef  elf_backend_final_write_processing
4795
4796 /* VxWorks support.  */
4797
4798 #undef  TARGET_LITTLE_SYM
4799 #define TARGET_LITTLE_SYM               i386_elf32_vxworks_vec
4800 #undef  TARGET_LITTLE_NAME
4801 #define TARGET_LITTLE_NAME              "elf32-i386-vxworks"
4802 #undef  ELF_OSABI
4803 #undef  ELF_MAXPAGESIZE
4804 #define ELF_MAXPAGESIZE                 0x1000
4805 #undef  elf_backend_plt_alignment
4806 #define elf_backend_plt_alignment       4
4807
4808 static const struct elf_x86_backend_data elf_i386_vxworks_arch_bed =
4809   {
4810     is_vxworks                          /* os */
4811   };
4812
4813 #undef  elf_backend_arch_data
4814 #define elf_backend_arch_data   &elf_i386_vxworks_arch_bed
4815
4816 #undef elf_backend_relocs_compatible
4817 #undef elf_backend_add_symbol_hook
4818 #define elf_backend_add_symbol_hook \
4819   elf_vxworks_add_symbol_hook
4820 #undef elf_backend_link_output_symbol_hook
4821 #define elf_backend_link_output_symbol_hook \
4822   elf_vxworks_link_output_symbol_hook
4823 #undef elf_backend_emit_relocs
4824 #define elf_backend_emit_relocs                 elf_vxworks_emit_relocs
4825 #undef elf_backend_final_write_processing
4826 #define elf_backend_final_write_processing \
4827   elf_vxworks_final_write_processing
4828 #undef elf_backend_static_tls_alignment
4829
4830 /* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
4831    define it.  */
4832 #undef elf_backend_want_plt_sym
4833 #define elf_backend_want_plt_sym        1
4834
4835 #undef  elf32_bed
4836 #define elf32_bed                               elf32_i386_vxworks_bed
4837
4838 #include "elf32-target.h"