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