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