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