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