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