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