-Wimplicit-fallthrough noreturn fixes
[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;
cbe950e9
L
1950 case R_386_32:
1951 case R_386_PC32:
1952 case R_386_PLT32:
1953 case R_386_GOT32:
02a86693 1954 case R_386_GOT32X:
9d4057ee
AM
1955 if (htab->elf.dynobj == NULL)
1956 htab->elf.dynobj = abfd;
466ee2af
L
1957 /* Create the ifunc sections for static executables. */
1958 if (h->type == STT_GNU_IFUNC
1959 && !_bfd_elf_create_ifunc_sections (htab->elf.dynobj,
1960 info))
c337a162 1961 goto error_return;
cbe950e9
L
1962 break;
1963 }
1964
ad1e85de
L
1965 /* It is referenced by a non-shared object. */
1966 h->ref_regular = 1;
61315175 1967 h->root.non_ir_ref = 1;
13a2df29
L
1968
1969 if (h->type == STT_GNU_IFUNC)
1970 elf_tdata (info->output_bfd)->has_gnu_symbols
1971 |= elf_gnu_symbol_ifunc;
71cb9464 1972 }
252b5132 1973
bedfd056 1974 if (! elf_i386_tls_transition (info, abfd, sec, contents,
142411ca
L
1975 symtab_hdr, sym_hashes,
1976 &r_type, GOT_UNKNOWN,
bedfd056 1977 rel, rel_end, h, r_symndx, FALSE))
c337a162 1978 goto error_return;
13ae64f3
JJ
1979
1980 switch (r_type)
252b5132 1981 {
37e55690
JJ
1982 case R_386_TLS_LDM:
1983 htab->tls_ldm_got.refcount += 1;
1984 goto create_got;
1985
1986 case R_386_PLT32:
1987 /* This symbol requires a procedure linkage table entry. We
1988 actually build the entry in adjust_dynamic_symbol,
1989 because this might be a case of linking PIC code which is
1990 never referenced by a dynamic object, in which case we
1991 don't need to generate a procedure linkage table entry
1992 after all. */
1993
1994 /* If this is a local symbol, we resolve it directly without
1995 creating a procedure linkage table entry. */
1996 if (h == NULL)
1997 continue;
1998
aec6b87e 1999 eh->has_got_reloc = 1;
f5385ebf 2000 h->needs_plt = 1;
37e55690
JJ
2001 h->plt.refcount += 1;
2002 break;
2003
6a3e1bae 2004 case R_386_SIZE32:
06a6a421 2005 size_reloc = TRUE;
6a3e1bae
L
2006 goto do_size;
2007
13ae64f3 2008 case R_386_TLS_IE_32:
37e55690
JJ
2009 case R_386_TLS_IE:
2010 case R_386_TLS_GOTIE:
0e1862bb 2011 if (!bfd_link_executable (info))
13ae64f3 2012 info->flags |= DF_STATIC_TLS;
37e55690
JJ
2013 /* Fall through */
2014
252b5132 2015 case R_386_GOT32:
02a86693 2016 case R_386_GOT32X:
13ae64f3 2017 case R_386_TLS_GD:
67a4f2b7
AO
2018 case R_386_TLS_GOTDESC:
2019 case R_386_TLS_DESC_CALL:
252b5132 2020 /* This symbol requires a global offset table entry. */
13ae64f3
JJ
2021 {
2022 int tls_type, old_tls_type;
2023
2024 switch (r_type)
2025 {
2026 default:
02a86693
L
2027 case R_386_GOT32:
2028 case R_386_GOT32X:
2029 tls_type = GOT_NORMAL;
2030 break;
13ae64f3 2031 case R_386_TLS_GD: tls_type = GOT_TLS_GD; break;
67a4f2b7
AO
2032 case R_386_TLS_GOTDESC:
2033 case R_386_TLS_DESC_CALL:
2034 tls_type = GOT_TLS_GDESC; break;
37e55690
JJ
2035 case R_386_TLS_IE_32:
2036 if (ELF32_R_TYPE (rel->r_info) == r_type)
2037 tls_type = GOT_TLS_IE_NEG;
2038 else
ebcfb3c0
JJ
2039 /* If this is a GD->IE transition, we may use either of
2040 R_386_TLS_TPOFF and R_386_TLS_TPOFF32. */
37e55690
JJ
2041 tls_type = GOT_TLS_IE;
2042 break;
2043 case R_386_TLS_IE:
2044 case R_386_TLS_GOTIE:
2045 tls_type = GOT_TLS_IE_POS; break;
13ae64f3
JJ
2046 }
2047
2048 if (h != NULL)
2049 {
2050 h->got.refcount += 1;
2051 old_tls_type = elf_i386_hash_entry(h)->tls_type;
2052 }
2053 else
2054 {
2055 bfd_signed_vma *local_got_refcounts;
2056
2057 /* This is a global offset table entry for a local symbol. */
2058 local_got_refcounts = elf_local_got_refcounts (abfd);
2059 if (local_got_refcounts == NULL)
2060 {
2061 bfd_size_type size;
2062
2063 size = symtab_hdr->sh_info;
67a4f2b7
AO
2064 size *= (sizeof (bfd_signed_vma)
2065 + sizeof (bfd_vma) + sizeof(char));
a50b1753
NC
2066 local_got_refcounts = (bfd_signed_vma *)
2067 bfd_zalloc (abfd, size);
13ae64f3 2068 if (local_got_refcounts == NULL)
c337a162 2069 goto error_return;
13ae64f3 2070 elf_local_got_refcounts (abfd) = local_got_refcounts;
67a4f2b7
AO
2071 elf_i386_local_tlsdesc_gotent (abfd)
2072 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
13ae64f3 2073 elf_i386_local_got_tls_type (abfd)
67a4f2b7 2074 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
13ae64f3
JJ
2075 }
2076 local_got_refcounts[r_symndx] += 1;
2077 old_tls_type = elf_i386_local_got_tls_type (abfd) [r_symndx];
2078 }
2079
37e55690
JJ
2080 if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE))
2081 tls_type |= old_tls_type;
13ae64f3
JJ
2082 /* If a TLS symbol is accessed using IE at least once,
2083 there is no point to use dynamic model for it. */
ebcfb3c0 2084 else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7 2085 && (! GOT_TLS_GD_ANY_P (old_tls_type)
37e55690 2086 || (tls_type & GOT_TLS_IE) == 0))
13ae64f3 2087 {
67a4f2b7 2088 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type))
37e55690 2089 tls_type = old_tls_type;
67a4f2b7
AO
2090 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2091 && GOT_TLS_GD_ANY_P (tls_type))
2092 tls_type |= old_tls_type;
13ae64f3
JJ
2093 else
2094 {
09a24cbf 2095 if (h)
4c544807
L
2096 name = h->root.root.string;
2097 else
2098 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
2099 NULL);
4eca0228 2100 _bfd_error_handler
d003868e 2101 (_("%B: `%s' accessed both as normal and "
55fd94b0 2102 "thread local symbol"),
4c544807 2103 abfd, name);
68c4a57e 2104 bfd_set_error (bfd_error_bad_value);
c337a162 2105 goto error_return;
13ae64f3
JJ
2106 }
2107 }
2108
2109 if (old_tls_type != tls_type)
2110 {
2111 if (h != NULL)
2112 elf_i386_hash_entry (h)->tls_type = tls_type;
2113 else
2114 elf_i386_local_got_tls_type (abfd) [r_symndx] = tls_type;
2115 }
2116 }
0ac8d2ca
AM
2117 /* Fall through */
2118
2119 case R_386_GOTOFF:
2120 case R_386_GOTPC:
13ae64f3 2121 create_got:
6de2ae4a 2122 if (htab->elf.sgot == NULL)
0ac8d2ca
AM
2123 {
2124 if (htab->elf.dynobj == NULL)
2125 htab->elf.dynobj = abfd;
6de2ae4a 2126 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
c337a162 2127 goto error_return;
0ac8d2ca 2128 }
37e55690 2129 if (r_type != R_386_TLS_IE)
aec6b87e
L
2130 {
2131 if (eh != NULL)
2132 eh->has_got_reloc = 1;
2133 break;
2134 }
37e55690 2135 /* Fall through */
252b5132 2136
37e55690
JJ
2137 case R_386_TLS_LE_32:
2138 case R_386_TLS_LE:
aec6b87e
L
2139 if (eh != NULL)
2140 eh->has_got_reloc = 1;
0e1862bb 2141 if (bfd_link_executable (info))
37e55690 2142 break;
bffbf940 2143 info->flags |= DF_STATIC_TLS;
aec6b87e 2144 goto do_relocation;
252b5132
RH
2145
2146 case R_386_32:
2147 case R_386_PC32:
aec6b87e
L
2148 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
2149 eh->has_non_got_reloc = 1;
2150do_relocation:
bf52d7c7
L
2151 /* We are called after all symbols have been resolved. Only
2152 relocation against STT_GNU_IFUNC symbol must go through
2153 PLT. */
d1ed1c7d
L
2154 if (h != NULL
2155 && (bfd_link_executable (info)
bf52d7c7 2156 || h->type == STT_GNU_IFUNC))
6725bdbf 2157 {
12d0ee4a 2158 /* If this reloc is in a read-only section, we might
ebe50bae
AM
2159 need a copy reloc. We can't check reliably at this
2160 stage whether the section is read-only, as input
2161 sections have not yet been mapped to output sections.
2162 Tentatively set the flag for now, and correct in
2163 adjust_dynamic_symbol. */
f5385ebf 2164 h->non_got_ref = 1;
12d0ee4a 2165
233cc9c1
L
2166 /* We may need a .plt entry if the symbol is a function
2167 defined in a shared lib or is a STT_GNU_IFUNC function
2168 referenced from the code or read-only section. */
2169 if (!h->def_regular
2170 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2171 h->plt.refcount += 1;
2172
4b627c18
L
2173 if (r_type == R_386_PC32)
2174 {
2175 /* Since something like ".long foo - ." may be used
2176 as pointer, make sure that PLT is used if foo is
2177 a function defined in a shared library. */
2178 if ((sec->flags & SEC_CODE) == 0)
2179 h->pointer_equality_needed = 1;
74437ea2
L
2180 else if (h->type == STT_GNU_IFUNC
2181 && bfd_link_pic (info))
2182 {
2183 if (isym == NULL)
2184 name = h->root.root.string;
2185 else
2186 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
2187 NULL);
4eca0228 2188 _bfd_error_handler
74437ea2
L
2189 (_("%B: unsupported non-PIC call to IFUNC `%s'"),
2190 abfd, name);
2191 bfd_set_error (bfd_error_bad_value);
2192 goto error_return;
2193 }
4b627c18
L
2194 }
2195 else
04ebc307
L
2196 {
2197 h->pointer_equality_needed = 1;
2198 /* R_386_32 can be resolved at run-time. */
2199 if (r_type == R_386_32
2200 && (sec->flags & SEC_READONLY) == 0)
2201 eh->func_pointer_refcount += 1;
2202 }
6725bdbf 2203 }
7843f00e 2204
06a6a421 2205 size_reloc = FALSE;
6a3e1bae 2206do_size:
252b5132 2207 /* If we are creating a shared library, and this is a reloc
f69da49f
AM
2208 against a global symbol, or a non PC relative reloc
2209 against a local symbol, then we need to copy the reloc
2210 into the shared library. However, if we are linking with
2211 -Bsymbolic, we do not need to copy a reloc against a
2212 global symbol which is defined in an object we are
2213 including in the link (i.e., DEF_REGULAR is set). At
2214 this point we have not seen all the input files, so it is
2215 possible that DEF_REGULAR is not set now but will be set
1f655a09
L
2216 later (it is never cleared). In case of a weak definition,
2217 DEF_REGULAR may be cleared later by a strong definition in
ebe50bae 2218 a shared library. We account for that possibility below by
1f655a09
L
2219 storing information in the relocs_copied field of the hash
2220 table entry. A similar situation occurs when creating
2221 shared libraries and symbol visibility changes render the
12d0ee4a 2222 symbol local.
56882138 2223
12d0ee4a
AM
2224 If on the other hand, we are creating an executable, we
2225 may need to keep relocations for symbols satisfied by a
2226 dynamic library if we manage to avoid copy relocs for the
233cc9c1
L
2227 symbol.
2228
2229 Generate dynamic pointer relocation against STT_GNU_IFUNC
2230 symbol in the non-code section. */
081b1afe
L
2231 if ((bfd_link_pic (info)
2232 && (r_type != R_386_PC32
2233 || (h != NULL
2234 && (! (bfd_link_pie (info)
2235 || SYMBOLIC_BIND (info, h))
2236 || h->root.type == bfd_link_hash_defweak
2237 || !h->def_regular))))
233cc9c1
L
2238 || (h != NULL
2239 && h->type == STT_GNU_IFUNC
2240 && r_type == R_386_32
2241 && (sec->flags & SEC_CODE) == 0)
081b1afe
L
2242 || (ELIMINATE_COPY_RELOCS
2243 && !bfd_link_pic (info)
2244 && h != NULL
2245 && (h->root.type == bfd_link_hash_defweak
2246 || !h->def_regular)))
252b5132 2247 {
e03a8ed8
L
2248 struct elf_dyn_relocs *p;
2249 struct elf_dyn_relocs **head;
ec338859 2250
12d0ee4a
AM
2251 /* We must copy these reloc types into the output file.
2252 Create a reloc section in dynobj and make room for
2253 this reloc. */
252b5132
RH
2254 if (sreloc == NULL)
2255 {
0ac8d2ca
AM
2256 if (htab->elf.dynobj == NULL)
2257 htab->elf.dynobj = abfd;
2258
83bac4b0
NC
2259 sreloc = _bfd_elf_make_dynamic_reloc_section
2260 (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE);
2261
252b5132 2262 if (sreloc == NULL)
c337a162 2263 goto error_return;
252b5132
RH
2264 }
2265
0c715baa
AM
2266 /* If this is a global symbol, we count the number of
2267 relocations we need for this symbol. */
2268 if (h != NULL)
252b5132 2269 {
d5597ebc 2270 head = &eh->dyn_relocs;
0c715baa
AM
2271 }
2272 else
2273 {
ec338859
AM
2274 /* Track dynamic relocs needed for local syms too.
2275 We really need local syms available to do this
2276 easily. Oh well. */
87d72d41 2277 void **vpp;
ec338859 2278 asection *s;
87d72d41
AM
2279
2280 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2281 abfd, r_symndx);
2282 if (isym == NULL)
c337a162 2283 goto error_return;
87d72d41
AM
2284
2285 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
ec338859 2286 if (s == NULL)
87d72d41 2287 s = sec;
ec338859 2288
e81d3500 2289 vpp = &elf_section_data (s)->local_dynrel;
e03a8ed8 2290 head = (struct elf_dyn_relocs **)vpp;
ec338859
AM
2291 }
2292
2293 p = *head;
2294 if (p == NULL || p->sec != sec)
2295 {
2296 bfd_size_type amt = sizeof *p;
a50b1753
NC
2297 p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj,
2298 amt);
ec338859 2299 if (p == NULL)
c337a162 2300 goto error_return;
ec338859
AM
2301 p->next = *head;
2302 *head = p;
2303 p->sec = sec;
2304 p->count = 0;
2305 p->pc_count = 0;
252b5132 2306 }
ec338859
AM
2307
2308 p->count += 1;
06a6a421
L
2309 /* Count size relocation as PC-relative relocation. */
2310 if (r_type == R_386_PC32 || size_reloc)
ec338859 2311 p->pc_count += 1;
252b5132 2312 }
252b5132
RH
2313 break;
2314
2315 /* This relocation describes the C++ object vtable hierarchy.
2316 Reconstruct it for later use during GC. */
2317 case R_386_GNU_VTINHERIT:
d17e0c6e 2318 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
c337a162 2319 goto error_return;
252b5132
RH
2320 break;
2321
2322 /* This relocation describes which C++ vtable entries are actually
2323 used. Record for later use during GC. */
2324 case R_386_GNU_VTENTRY:
c6aa130f
MS
2325 BFD_ASSERT (h != NULL);
2326 if (h != NULL
2327 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
c337a162 2328 goto error_return;
252b5132
RH
2329 break;
2330
2331 default:
2332 break;
2333 }
dd7e64d4
L
2334
2335 if (use_plt_got
2336 && h != NULL
2337 && h->plt.refcount > 0
8ded2ddc
L
2338 && (((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
2339 || h->got.refcount > 0)
dd7e64d4
L
2340 && htab->plt_got == NULL)
2341 {
2342 /* Create the GOT procedure linkage table. */
2343 unsigned int plt_got_align;
2344 const struct elf_backend_data *bed;
2345
2346 bed = get_elf_backend_data (info->output_bfd);
2347 BFD_ASSERT (sizeof (elf_i386_got_plt_entry) == 8
2348 && (sizeof (elf_i386_got_plt_entry)
2349 == sizeof (elf_i386_pic_got_plt_entry)));
2350 plt_got_align = 3;
2351
2352 if (htab->elf.dynobj == NULL)
2353 htab->elf.dynobj = abfd;
2354 htab->plt_got
2355 = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
2356 ".plt.got",
2357 (bed->dynamic_sec_flags
2358 | SEC_ALLOC
2359 | SEC_CODE
2360 | SEC_LOAD
2361 | SEC_READONLY));
2362 if (htab->plt_got == NULL
2363 || !bfd_set_section_alignment (htab->elf.dynobj,
2364 htab->plt_got,
2365 plt_got_align))
c337a162 2366 goto error_return;
dd7e64d4 2367 }
c1d11331 2368
52bf37dd 2369 if (r_type == R_386_GOT32X
c1d11331 2370 && (h == NULL || h->type != STT_GNU_IFUNC))
02a86693 2371 sec->need_convert_load = 1;
252b5132
RH
2372 }
2373
bedfd056
L
2374 if (elf_section_data (sec)->this_hdr.contents != contents)
2375 {
2376 if (!info->keep_memory)
2377 free (contents);
2378 else
2379 {
2380 /* Cache the section contents for elf_link_input_bfd. */
2381 elf_section_data (sec)->this_hdr.contents = contents;
2382 }
2383 }
2384
b34976b6 2385 return TRUE;
c337a162
L
2386
2387error_return:
bedfd056
L
2388 if (elf_section_data (sec)->this_hdr.contents != contents)
2389 free (contents);
c337a162
L
2390 sec->check_relocs_failed = 1;
2391 return FALSE;
252b5132
RH
2392}
2393
2394/* Return the section that should be marked against GC for a given
2395 relocation. */
2396
2397static asection *
55fd94b0 2398elf_i386_gc_mark_hook (asection *sec,
07adf181 2399 struct bfd_link_info *info,
55fd94b0
AM
2400 Elf_Internal_Rela *rel,
2401 struct elf_link_hash_entry *h,
2402 Elf_Internal_Sym *sym)
252b5132
RH
2403{
2404 if (h != NULL)
07adf181
AM
2405 switch (ELF32_R_TYPE (rel->r_info))
2406 {
2407 case R_386_GNU_VTINHERIT:
2408 case R_386_GNU_VTENTRY:
2409 return NULL;
2410 }
2411
2412 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
252b5132
RH
2413}
2414
aec6b87e
L
2415/* Remove undefined weak symbol from the dynamic symbol table if it
2416 is resolved to 0. */
2417
2418static bfd_boolean
2419elf_i386_fixup_symbol (struct bfd_link_info *info,
2420 struct elf_link_hash_entry *h)
2421{
2422 if (h->dynindx != -1
2423 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
e62b9723 2424 elf_i386_hash_entry (h)->has_got_reloc,
aec6b87e
L
2425 elf_i386_hash_entry (h)))
2426 {
2427 h->dynindx = -1;
2428 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
2429 h->dynstr_index);
2430 }
2431 return TRUE;
2432}
2433
252b5132
RH
2434/* Adjust a symbol defined by a dynamic object and referenced by a
2435 regular object. The current definition is in some section of the
2436 dynamic object, but we're not including those sections. We have to
2437 change the definition to something the rest of the link can
2438 understand. */
2439
b34976b6 2440static bfd_boolean
55fd94b0
AM
2441elf_i386_adjust_dynamic_symbol (struct bfd_link_info *info,
2442 struct elf_link_hash_entry *h)
252b5132 2443{
6725bdbf 2444 struct elf_i386_link_hash_table *htab;
252b5132 2445 asection *s;
5ca5bb35
L
2446 struct elf_i386_link_hash_entry *eh;
2447 struct elf_dyn_relocs *p;
252b5132 2448
cbe950e9
L
2449 /* STT_GNU_IFUNC symbol must go through PLT. */
2450 if (h->type == STT_GNU_IFUNC)
2451 {
73bcf233
L
2452 /* All local STT_GNU_IFUNC references must be treate as local
2453 calls via local PLT. */
5ca5bb35
L
2454 if (h->ref_regular
2455 && SYMBOL_CALLS_LOCAL (info, h))
2456 {
73bcf233 2457 bfd_size_type pc_count = 0, count = 0;
5ca5bb35
L
2458 struct elf_dyn_relocs **pp;
2459
2460 eh = (struct elf_i386_link_hash_entry *) h;
2461 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2462 {
2463 pc_count += p->pc_count;
2464 p->count -= p->pc_count;
2465 p->pc_count = 0;
73bcf233 2466 count += p->count;
5ca5bb35
L
2467 if (p->count == 0)
2468 *pp = p->next;
2469 else
2470 pp = &p->next;
2471 }
2472
73bcf233 2473 if (pc_count || count)
5ca5bb35 2474 {
5ca5bb35 2475 h->non_got_ref = 1;
233cc9c1
L
2476 if (pc_count)
2477 {
2478 /* Increment PLT reference count only for PC-relative
2479 references. */
2480 h->needs_plt = 1;
2481 if (h->plt.refcount <= 0)
2482 h->plt.refcount = 1;
2483 else
2484 h->plt.refcount += 1;
2485 }
5ca5bb35
L
2486 }
2487 }
2488
cbe950e9
L
2489 if (h->plt.refcount <= 0)
2490 {
2491 h->plt.offset = (bfd_vma) -1;
2492 h->needs_plt = 0;
2493 }
2494 return TRUE;
2495 }
2496
252b5132
RH
2497 /* If this is a function, put it in the procedure linkage table. We
2498 will fill in the contents of the procedure linkage table later,
2499 when we know the address of the .got section. */
2500 if (h->type == STT_FUNC
f5385ebf 2501 || h->needs_plt)
252b5132 2502 {
6725bdbf 2503 if (h->plt.refcount <= 0
9c7a29a3
AM
2504 || SYMBOL_CALLS_LOCAL (info, h)
2505 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2506 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH
2507 {
2508 /* This case can occur if we saw a PLT32 reloc in an input
dd5724d5
AM
2509 file, but the symbol was never referred to by a dynamic
2510 object, or if all references were garbage collected. In
2511 such a case, we don't actually need to build a procedure
2512 linkage table, and we can just do a PC32 reloc instead. */
bbd7ec4a 2513 h->plt.offset = (bfd_vma) -1;
f5385ebf 2514 h->needs_plt = 0;
252b5132
RH
2515 }
2516
b34976b6 2517 return TRUE;
252b5132 2518 }
6725bdbf
AM
2519 else
2520 /* It's possible that we incorrectly decided a .plt reloc was
2521 needed for an R_386_PC32 reloc to a non-function sym in
2522 check_relocs. We can't decide accurately between function and
2523 non-function syms in check-relocs; Objects loaded later in
2524 the link may change h->type. So fix it now. */
bbd7ec4a 2525 h->plt.offset = (bfd_vma) -1;
252b5132
RH
2526
2527 /* If this is a weak symbol, and there is a real definition, the
2528 processor independent code will have arranged for us to see the
2529 real definition first, and we can just use the same value. */
f6e332e6 2530 if (h->u.weakdef != NULL)
252b5132 2531 {
f6e332e6
AM
2532 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2533 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2534 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2535 h->root.u.def.value = h->u.weakdef->root.u.def.value;
a23b6845 2536 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
f6e332e6 2537 h->non_got_ref = h->u.weakdef->non_got_ref;
b34976b6 2538 return TRUE;
252b5132
RH
2539 }
2540
2541 /* This is a reference to a symbol defined by a dynamic object which
2542 is not a function. */
2543
2544 /* If we are creating a shared library, we must presume that the
2545 only references to the symbol are via the global offset table.
2546 For such cases we need not do anything here; the relocations will
2547 be handled correctly by relocate_section. */
0e1862bb 2548 if (!bfd_link_executable (info))
b34976b6 2549 return TRUE;
252b5132 2550
7843f00e 2551 /* If there are no references to this symbol that do not use the
d5597ebc
L
2552 GOT nor R_386_GOTOFF relocation, we don't need to generate a copy
2553 reloc. */
2554 eh = (struct elf_i386_link_hash_entry *) h;
2555 if (!h->non_got_ref && !eh->gotoff_ref)
b34976b6 2556 return TRUE;
7843f00e 2557
8bd621d8
AM
2558 /* If -z nocopyreloc was given, we won't generate them either. */
2559 if (info->nocopyreloc)
2560 {
f5385ebf 2561 h->non_got_ref = 0;
b34976b6 2562 return TRUE;
8bd621d8
AM
2563 }
2564
643796e3 2565 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
2566 if (htab == NULL)
2567 return FALSE;
643796e3 2568
d5597ebc
L
2569 /* If there aren't any dynamic relocs in read-only sections nor
2570 R_386_GOTOFF relocation, then we can keep the dynamic relocs and
2571 avoid the copy reloc. This doesn't work on VxWorks, where we can
2572 not have dynamic relocations (other than copy and jump slot
2573 relocations) in an executable. */
23209a78 2574 if (ELIMINATE_COPY_RELOCS
d5597ebc 2575 && !eh->gotoff_ref
23209a78 2576 && !get_elf_i386_backend_data (info->output_bfd)->is_vxworks)
ebe50bae 2577 {
a23b6845
AM
2578 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2579 {
2580 s = p->sec->output_section;
2581 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2582 break;
2583 }
2584
a23b6845
AM
2585 if (p == NULL)
2586 {
f5385ebf 2587 h->non_got_ref = 0;
a23b6845
AM
2588 return TRUE;
2589 }
ebe50bae
AM
2590 }
2591
252b5132
RH
2592 /* We must allocate the symbol in our .dynbss section, which will
2593 become part of the .bss section of the executable. There will be
2594 an entry for this symbol in the .dynsym section. The dynamic
2595 object will contain position independent code, so all references
2596 from the dynamic object to this symbol will go through the global
2597 offset table. The dynamic linker will use the .dynsym entry to
2598 determine the address it must put in the global offset table, so
2599 both the dynamic object and the regular object will refer to the
2600 same memory location for the variable. */
2601
252b5132
RH
2602 /* We must generate a R_386_COPY reloc to tell the dynamic linker to
2603 copy the initial value out of the dynamic object and into the
0ac8d2ca 2604 runtime process image. */
1d7e9d18 2605 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
252b5132 2606 {
eea6121a 2607 htab->srelbss->size += sizeof (Elf32_External_Rel);
f5385ebf 2608 h->needs_copy = 1;
252b5132
RH
2609 }
2610
0ac8d2ca 2611 s = htab->sdynbss;
252b5132 2612
6cabe1ea 2613 return _bfd_elf_adjust_dynamic_copy (info, h, s);
252b5132
RH
2614}
2615
6725bdbf 2616/* Allocate space in .plt, .got and associated reloc sections for
0c715baa 2617 dynamic relocs. */
6725bdbf 2618
b34976b6 2619static bfd_boolean
eb4ff4d6 2620elf_i386_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
6725bdbf
AM
2621{
2622 struct bfd_link_info *info;
2623 struct elf_i386_link_hash_table *htab;
5a15f56f 2624 struct elf_i386_link_hash_entry *eh;
e03a8ed8 2625 struct elf_dyn_relocs *p;
25e762b9 2626 unsigned plt_entry_size;
aec6b87e 2627 bfd_boolean resolved_to_zero;
6725bdbf 2628
e92d460e 2629 if (h->root.type == bfd_link_hash_indirect)
b34976b6 2630 return TRUE;
6725bdbf 2631
cbe950e9 2632 eh = (struct elf_i386_link_hash_entry *) h;
e92d460e 2633
6725bdbf
AM
2634 info = (struct bfd_link_info *) inf;
2635 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
2636 if (htab == NULL)
2637 return FALSE;
6725bdbf 2638
25e762b9
RM
2639 plt_entry_size = GET_PLT_ENTRY_SIZE (info->output_bfd);
2640
e62b9723
L
2641 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
2642 eh->has_got_reloc,
2643 eh);
aec6b87e 2644
04ebc307
L
2645 /* Clear the reference count of function pointer relocations if
2646 symbol isn't a normal function. */
2647 if (h->type != STT_FUNC)
2648 eh->func_pointer_refcount = 0;
2649
dd7e64d4
L
2650 /* We can't use the GOT PLT if pointer equality is needed since
2651 finish_dynamic_symbol won't clear symbol value and the dynamic
2652 linker won't update the GOT slot. We will get into an infinite
2653 loop at run-time. */
2654 if (htab->plt_got != NULL
2655 && h->type != STT_GNU_IFUNC
2656 && !h->pointer_equality_needed
2657 && h->plt.refcount > 0
2658 && h->got.refcount > 0)
2659 {
2660 /* Don't use the regular PLT if there are both GOT and GOTPLT
2661 reloctions. */
2662 h->plt.offset = (bfd_vma) -1;
2663
2664 /* Use the GOT PLT. */
2665 eh->plt_got.refcount = 1;
2666 }
2667
cbe950e9
L
2668 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
2669 here if it is defined and referenced in a non-shared object. */
2670 if (h->type == STT_GNU_IFUNC
2671 && h->def_regular)
25e762b9 2672 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h, &eh->dyn_relocs,
2df3368d
L
2673 &htab->readonly_dynrelocs_against_ifunc,
2674 plt_entry_size,
233cc9c1 2675 plt_entry_size, 4, TRUE);
04ebc307
L
2676 /* Don't create the PLT entry if there are only function pointer
2677 relocations which can be resolved at run-time. */
cbe950e9 2678 else if (htab->elf.dynamic_sections_created
04ebc307
L
2679 && (h->plt.refcount > eh->func_pointer_refcount
2680 || eh->plt_got.refcount > 0))
6725bdbf 2681 {
25070364
L
2682 bfd_boolean use_plt_got;
2683
04ebc307
L
2684 /* Clear the reference count of function pointer relocations
2685 if PLT is used. */
2686 eh->func_pointer_refcount = 0;
2687
8ded2ddc 2688 if ((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
25070364
L
2689 {
2690 /* Don't use the regular PLT for DF_BIND_NOW. */
2691 h->plt.offset = (bfd_vma) -1;
2692
2693 /* Use the GOT PLT. */
2694 h->got.refcount = 1;
2695 eh->plt_got.refcount = 1;
2696 }
2697
2698 use_plt_got = eh->plt_got.refcount > 0;
dd7e64d4 2699
5a15f56f
AM
2700 /* Make sure this symbol is output as a dynamic symbol.
2701 Undefined weak syms won't yet be marked as dynamic. */
2702 if (h->dynindx == -1
aec6b87e
L
2703 && !h->forced_local
2704 && !resolved_to_zero)
5a15f56f 2705 {
c152c796 2706 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2707 return FALSE;
5a15f56f
AM
2708 }
2709
0e1862bb 2710 if (bfd_link_pic (info)
4e795f50 2711 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
ced53ee5 2712 {
6de2ae4a 2713 asection *s = htab->elf.splt;
dd7e64d4 2714 asection *got_s = htab->plt_got;
6725bdbf 2715
7c1e8d3e
L
2716 /* If this is the first .plt entry, make room for the special
2717 first entry. The .plt section is used by prelink to undo
2718 prelinking for dynamic relocations. */
2719 if (s->size == 0)
2720 s->size = plt_entry_size;
2721
dd7e64d4
L
2722 if (use_plt_got)
2723 eh->plt_got.offset = got_s->size;
2724 else
7c1e8d3e 2725 h->plt.offset = s->size;
6725bdbf 2726
ced53ee5
AM
2727 /* If this symbol is not defined in a regular file, and we are
2728 not generating a shared library, then set the symbol to this
2729 location in the .plt. This is required to make function
2730 pointers compare as equal between the normal executable and
2731 the shared library. */
0e1862bb 2732 if (! bfd_link_pic (info)
f5385ebf 2733 && !h->def_regular)
ced53ee5 2734 {
dd7e64d4
L
2735 if (use_plt_got)
2736 {
2737 /* We need to make a call to the entry of the GOT PLT
2738 instead of regular PLT entry. */
2739 h->root.u.def.section = got_s;
2740 h->root.u.def.value = eh->plt_got.offset;
2741 }
2742 else
2743 {
2744 h->root.u.def.section = s;
2745 h->root.u.def.value = h->plt.offset;
2746 }
ced53ee5 2747 }
6725bdbf 2748
ced53ee5 2749 /* Make room for this entry. */
dd7e64d4
L
2750 if (use_plt_got)
2751 got_s->size += sizeof (elf_i386_got_plt_entry);
2752 else
2753 {
2754 s->size += plt_entry_size;
6725bdbf 2755
dd7e64d4
L
2756 /* We also need to make an entry in the .got.plt section,
2757 which will be placed in the .got section by the linker
2758 script. */
2759 htab->elf.sgotplt->size += 4;
6725bdbf 2760
aec6b87e
L
2761 /* There should be no PLT relocation against resolved
2762 undefined weak symbol in executable. */
2763 if (!resolved_to_zero)
2764 {
2765 /* We also need to make an entry in the .rel.plt
2766 section. */
2767 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
2768 htab->elf.srelplt->reloc_count++;
2769 }
dd7e64d4 2770 }
eac338cf 2771
23209a78 2772 if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks
0e1862bb 2773 && !bfd_link_pic (info))
eac338cf
PB
2774 {
2775 /* VxWorks has a second set of relocations for each PLT entry
2776 in executables. They go in a separate relocation section,
2777 which is processed by the kernel loader. */
2778
2779 /* There are two relocations for the initial PLT entry: an
2780 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 4 and an
2781 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 8. */
2782
25e762b9 2783 if (h->plt.offset == plt_entry_size)
eac338cf
PB
2784 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2785
2786 /* There are two extra relocations for each subsequent PLT entry:
2787 an R_386_32 relocation for the GOT entry, and an R_386_32
2788 relocation for the PLT entry. */
2789
2790 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2791 }
6725bdbf 2792 }
ced53ee5
AM
2793 else
2794 {
13f42277 2795 eh->plt_got.offset = (bfd_vma) -1;
51b64d56 2796 h->plt.offset = (bfd_vma) -1;
f5385ebf 2797 h->needs_plt = 0;
ced53ee5 2798 }
6725bdbf
AM
2799 }
2800 else
2801 {
13f42277 2802 eh->plt_got.offset = (bfd_vma) -1;
51b64d56 2803 h->plt.offset = (bfd_vma) -1;
f5385ebf 2804 h->needs_plt = 0;
6725bdbf
AM
2805 }
2806
67a4f2b7
AO
2807 eh->tlsdesc_got = (bfd_vma) -1;
2808
37e55690 2809 /* If R_386_TLS_{IE_32,IE,GOTIE} symbol is now local to the binary,
13ae64f3
JJ
2810 make it a R_386_TLS_LE_32 requiring no TLS entry. */
2811 if (h->got.refcount > 0
0e1862bb 2812 && bfd_link_executable (info)
13ae64f3 2813 && h->dynindx == -1
37e55690 2814 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE))
cedb70c5 2815 h->got.offset = (bfd_vma) -1;
13ae64f3 2816 else if (h->got.refcount > 0)
6725bdbf 2817 {
0ac8d2ca 2818 asection *s;
b34976b6 2819 bfd_boolean dyn;
13ae64f3 2820 int tls_type = elf_i386_hash_entry(h)->tls_type;
6725bdbf 2821
5a15f56f
AM
2822 /* Make sure this symbol is output as a dynamic symbol.
2823 Undefined weak syms won't yet be marked as dynamic. */
2824 if (h->dynindx == -1
aec6b87e
L
2825 && !h->forced_local
2826 && !resolved_to_zero)
5a15f56f 2827 {
c152c796 2828 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2829 return FALSE;
5a15f56f
AM
2830 }
2831
6de2ae4a 2832 s = htab->elf.sgot;
67a4f2b7
AO
2833 if (GOT_TLS_GDESC_P (tls_type))
2834 {
6de2ae4a 2835 eh->tlsdesc_got = htab->elf.sgotplt->size
67a4f2b7 2836 - elf_i386_compute_jump_table_size (htab);
6de2ae4a 2837 htab->elf.sgotplt->size += 8;
67a4f2b7
AO
2838 h->got.offset = (bfd_vma) -2;
2839 }
2840 if (! GOT_TLS_GDESC_P (tls_type)
2841 || GOT_TLS_GD_P (tls_type))
2842 {
2843 h->got.offset = s->size;
2844 s->size += 4;
2845 /* R_386_TLS_GD needs 2 consecutive GOT slots. */
2846 if (GOT_TLS_GD_P (tls_type) || tls_type == GOT_TLS_IE_BOTH)
2847 s->size += 4;
2848 }
ebe50bae 2849 dyn = htab->elf.dynamic_sections_created;
13ae64f3 2850 /* R_386_TLS_IE_32 needs one dynamic relocation,
37e55690
JJ
2851 R_386_TLS_IE resp. R_386_TLS_GOTIE needs one dynamic relocation,
2852 (but if both R_386_TLS_IE_32 and R_386_TLS_IE is present, we
2853 need two), R_386_TLS_GD needs one if local symbol and two if
aec6b87e
L
2854 global. No dynamic relocation against resolved undefined weak
2855 symbol in executable. */
37e55690 2856 if (tls_type == GOT_TLS_IE_BOTH)
6de2ae4a 2857 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7 2858 else if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
37e55690 2859 || (tls_type & GOT_TLS_IE))
6de2ae4a 2860 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
67a4f2b7 2861 else if (GOT_TLS_GD_P (tls_type))
6de2ae4a 2862 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7 2863 else if (! GOT_TLS_GDESC_P (tls_type)
aec6b87e
L
2864 && ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2865 && !resolved_to_zero)
67a4f2b7 2866 || h->root.type != bfd_link_hash_undefweak)
0e1862bb 2867 && (bfd_link_pic (info)
ef5aade5 2868 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
6de2ae4a 2869 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
67a4f2b7 2870 if (GOT_TLS_GDESC_P (tls_type))
6de2ae4a 2871 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
6725bdbf
AM
2872 }
2873 else
51b64d56 2874 h->got.offset = (bfd_vma) -1;
6725bdbf 2875
5a15f56f 2876 if (eh->dyn_relocs == NULL)
b34976b6 2877 return TRUE;
5a15f56f 2878
0c715baa
AM
2879 /* In the shared -Bsymbolic case, discard space allocated for
2880 dynamic pc-relative relocs against symbols which turn out to be
2881 defined in regular objects. For the normal shared case, discard
0ac8d2ca
AM
2882 space for pc-relative relocs that have become local due to symbol
2883 visibility changes. */
0c715baa 2884
0e1862bb 2885 if (bfd_link_pic (info))
5a15f56f 2886 {
09695f56
AM
2887 /* The only reloc that uses pc_count is R_386_PC32, which will
2888 appear on a call or on something like ".long foo - .". We
2889 want calls to protected symbols to resolve directly to the
2890 function rather than going via the plt. If people want
2891 function pointer comparisons to work as expected then they
2892 should avoid writing assembly like ".long foo - .". */
2893 if (SYMBOL_CALLS_LOCAL (info, h))
5a15f56f 2894 {
e03a8ed8 2895 struct elf_dyn_relocs **pp;
0c715baa
AM
2896
2897 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2898 {
c3ce498c
L
2899 p->count -= p->pc_count;
2900 p->pc_count = 0;
0c715baa
AM
2901 if (p->count == 0)
2902 *pp = p->next;
2903 else
2904 pp = &p->next;
2905 }
5a15f56f 2906 }
4e795f50 2907
23209a78 2908 if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks)
3348747a 2909 {
e03a8ed8 2910 struct elf_dyn_relocs **pp;
3348747a
NS
2911 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2912 {
2913 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2914 *pp = p->next;
2915 else
2916 pp = &p->next;
2917 }
2918 }
2919
4e795f50 2920 /* Also discard relocs on undefined weak syms with non-default
aec6b87e 2921 visibility or in PIE. */
22d606e9 2922 if (eh->dyn_relocs != NULL
c353e543 2923 && h->root.type == bfd_link_hash_undefweak)
22d606e9 2924 {
aec6b87e
L
2925 /* Undefined weak symbol is never bound locally in shared
2926 library. */
2927 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2928 || resolved_to_zero)
2929 {
2930 if (h->non_got_ref)
2931 {
2932 /* Keep dynamic non-GOT/non-PLT relocation so that we
2933 can branch to 0 without PLT. */
2934 struct elf_dyn_relocs **pp;
2935
2936 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2937 if (p->pc_count == 0)
2938 *pp = p->next;
2939 else
2940 {
2941 /* Remove non-R_386_PC32 relocation. */
2942 p->count = p->pc_count;
2943 pp = &p->next;
2944 }
22d606e9 2945
aec6b87e
L
2946 if (eh->dyn_relocs != NULL)
2947 {
2948 /* Make sure undefined weak symbols are output
2949 as dynamic symbols in PIEs for dynamic non-GOT
2950 non-PLT reloations. */
2951 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2952 return FALSE;
2953 }
2954 }
2955 else
2956 eh->dyn_relocs = NULL;
2957 }
22d606e9
AM
2958 else if (h->dynindx == -1
2959 && !h->forced_local)
2960 {
2961 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2962 return FALSE;
2963 }
2964 }
0c715baa 2965 }
a23b6845 2966 else if (ELIMINATE_COPY_RELOCS)
0c715baa
AM
2967 {
2968 /* For the non-shared case, discard space for relocs against
2969 symbols which turn out to need copy relocs or are not
04ebc307
L
2970 dynamic. Keep dynamic relocations for run-time function
2971 pointer initialization. */
0c715baa 2972
aec6b87e
L
2973 if ((!h->non_got_ref
2974 || eh->func_pointer_refcount > 0
2975 || (h->root.type == bfd_link_hash_undefweak
2976 && !resolved_to_zero))
f5385ebf
AM
2977 && ((h->def_dynamic
2978 && !h->def_regular)
ebe50bae 2979 || (htab->elf.dynamic_sections_created
0c715baa
AM
2980 && (h->root.type == bfd_link_hash_undefweak
2981 || h->root.type == bfd_link_hash_undefined))))
2982 {
2983 /* Make sure this symbol is output as a dynamic symbol.
2984 Undefined weak syms won't yet be marked as dynamic. */
2985 if (h->dynindx == -1
aec6b87e
L
2986 && !h->forced_local
2987 && !resolved_to_zero)
0c715baa 2988 {
c152c796 2989 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2990 return FALSE;
0c715baa 2991 }
5a15f56f 2992
0c715baa
AM
2993 /* If that succeeded, we know we'll be keeping all the
2994 relocs. */
2995 if (h->dynindx != -1)
2996 goto keep;
2997 }
2998
2999 eh->dyn_relocs = NULL;
04ebc307 3000 eh->func_pointer_refcount = 0;
0c715baa 3001
ec338859 3002 keep: ;
5a15f56f
AM
3003 }
3004
0c715baa
AM
3005 /* Finally, allocate space. */
3006 for (p = eh->dyn_relocs; p != NULL; p = p->next)
12d0ee4a 3007 {
e7c33416
NC
3008 asection *sreloc;
3009
cbe950e9 3010 sreloc = elf_section_data (p->sec)->sreloc;
e7c33416
NC
3011
3012 BFD_ASSERT (sreloc != NULL);
eea6121a 3013 sreloc->size += p->count * sizeof (Elf32_External_Rel);
12d0ee4a
AM
3014 }
3015
b34976b6 3016 return TRUE;
6725bdbf
AM
3017}
3018
c25bc9fc
L
3019/* Allocate space in .plt, .got and associated reloc sections for
3020 local dynamic relocs. */
3021
3022static bfd_boolean
3023elf_i386_allocate_local_dynrelocs (void **slot, void *inf)
3024{
3025 struct elf_link_hash_entry *h
3026 = (struct elf_link_hash_entry *) *slot;
3027
3028 if (h->type != STT_GNU_IFUNC
3029 || !h->def_regular
3030 || !h->ref_regular
3031 || !h->forced_local
3032 || h->root.type != bfd_link_hash_defined)
3033 abort ();
3034
3035 return elf_i386_allocate_dynrelocs (h, inf);
3036}
3037
0c715baa
AM
3038/* Find any dynamic relocs that apply to read-only sections. */
3039
b34976b6 3040static bfd_boolean
eb4ff4d6 3041elf_i386_readonly_dynrelocs (struct elf_link_hash_entry *h, void *inf)
0c715baa
AM
3042{
3043 struct elf_i386_link_hash_entry *eh;
e03a8ed8 3044 struct elf_dyn_relocs *p;
0c715baa 3045
aa715242
L
3046 /* Skip local IFUNC symbols. */
3047 if (h->forced_local && h->type == STT_GNU_IFUNC)
3048 return TRUE;
3049
0c715baa
AM
3050 eh = (struct elf_i386_link_hash_entry *) h;
3051 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3052 {
3053 asection *s = p->sec->output_section;
3054
3055 if (s != NULL && (s->flags & SEC_READONLY) != 0)
3056 {
3057 struct bfd_link_info *info = (struct bfd_link_info *) inf;
3058
3059 info->flags |= DF_TEXTREL;
3060
0e1862bb 3061 if ((info->warn_shared_textrel && bfd_link_pic (info))
1952c5cd
L
3062 || info->error_textrel)
3063 info->callbacks->einfo (_("%P: %B: warning: relocation against `%s' in readonly section `%A'\n"),
b70321a2
L
3064 p->sec->owner, h->root.root.string,
3065 p->sec);
3066
0c715baa 3067 /* Not an error, just cut short the traversal. */
b34976b6 3068 return FALSE;
0c715baa
AM
3069 }
3070 }
b34976b6 3071 return TRUE;
0c715baa
AM
3072}
3073
c175a657 3074/* Convert load via the GOT slot to load immediate. */
daa67607
L
3075
3076static bfd_boolean
02a86693 3077elf_i386_convert_load (bfd *abfd, asection *sec,
a6af384b 3078 struct bfd_link_info *link_info)
daa67607 3079{
c175a657 3080 struct elf_i386_link_hash_table *htab;
daa67607
L
3081 Elf_Internal_Shdr *symtab_hdr;
3082 Elf_Internal_Rela *internal_relocs;
3083 Elf_Internal_Rela *irel, *irelend;
3084 bfd_byte *contents;
c175a657 3085 bfd_boolean changed;
daa67607
L
3086 bfd_signed_vma *local_got_refcounts;
3087
3088 /* Don't even try to convert non-ELF outputs. */
3089 if (!is_elf_hash_table (link_info->hash))
3090 return FALSE;
3091
c1d11331 3092 /* Nothing to do if there is no need or no output. */
daa67607 3093 if ((sec->flags & (SEC_CODE | SEC_RELOC)) != (SEC_CODE | SEC_RELOC)
02a86693 3094 || sec->need_convert_load == 0
c8831961 3095 || bfd_is_abs_section (sec->output_section))
daa67607
L
3096 return TRUE;
3097
3098 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3099
3100 /* Load the relocations for this section. */
3101 internal_relocs = (_bfd_elf_link_read_relocs
3102 (abfd, sec, NULL, (Elf_Internal_Rela *) NULL,
3103 link_info->keep_memory));
3104 if (internal_relocs == NULL)
3105 return FALSE;
3106
c175a657 3107 changed = FALSE;
daa67607 3108 htab = elf_i386_hash_table (link_info);
daa67607
L
3109 local_got_refcounts = elf_local_got_refcounts (abfd);
3110
3111 /* Get the section contents. */
3112 if (elf_section_data (sec)->this_hdr.contents != NULL)
3113 contents = elf_section_data (sec)->this_hdr.contents;
3114 else
3115 {
3116 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
3117 goto error_return;
3118 }
3119
3120 irelend = internal_relocs + sec->reloc_count;
3121 for (irel = internal_relocs; irel < irelend; irel++)
3122 {
3123 unsigned int r_type = ELF32_R_TYPE (irel->r_info);
c175a657 3124 unsigned int r_symndx;
daa67607 3125 struct elf_link_hash_entry *h;
c175a657 3126 bfd_boolean converted;
daa67607 3127
7d4d9709
L
3128 /* Don't convert R_386_GOT32 since we can't tell if it is applied
3129 to "mov $foo@GOT, %reg" which isn't a load via GOT. */
3130 if (r_type != R_386_GOT32X)
daa67607
L
3131 continue;
3132
c175a657 3133 r_symndx = ELF32_R_SYM (irel->r_info);
02a86693 3134 if (r_symndx < symtab_hdr->sh_info)
c175a657
L
3135 h = elf_i386_get_local_sym_hash (htab, sec->owner,
3136 (const Elf_Internal_Rela *) irel,
3137 FALSE);
3138 else
02a86693 3139 {
c175a657
L
3140 h = elf_sym_hashes (abfd)[r_symndx - symtab_hdr->sh_info];
3141 while (h->root.type == bfd_link_hash_indirect
3142 || h->root.type == bfd_link_hash_warning)
3143 h = (struct elf_link_hash_entry *) h->root.u.i.link;
daa67607
L
3144 }
3145
02a86693 3146 /* STT_GNU_IFUNC must keep GOT32 relocations. */
c175a657 3147 if (h != NULL && h->type == STT_GNU_IFUNC)
02a86693
L
3148 continue;
3149
c175a657
L
3150 converted = FALSE;
3151 if (!elf_i386_convert_load_reloc (abfd, symtab_hdr, contents,
3152 irel, h, &converted, link_info))
3153 goto error_return;
bae420ef 3154
c175a657 3155 if (converted)
02a86693 3156 {
c175a657
L
3157 changed = converted;
3158 if (h)
02a86693 3159 {
c175a657
L
3160 if (h->got.refcount > 0)
3161 h->got.refcount -= 1;
02a86693 3162 }
c175a657 3163 else
02a86693 3164 {
c175a657
L
3165 if (local_got_refcounts != NULL
3166 && local_got_refcounts[r_symndx] > 0)
3167 local_got_refcounts[r_symndx] -= 1;
02a86693 3168 }
daa67607
L
3169 }
3170 }
3171
3172 if (contents != NULL
3173 && elf_section_data (sec)->this_hdr.contents != contents)
3174 {
c175a657 3175 if (!changed && !link_info->keep_memory)
daa67607
L
3176 free (contents);
3177 else
3178 {
3179 /* Cache the section contents for elf_link_input_bfd. */
3180 elf_section_data (sec)->this_hdr.contents = contents;
3181 }
3182 }
3183
3184 if (elf_section_data (sec)->relocs != internal_relocs)
3185 {
c175a657 3186 if (!changed)
daa67607
L
3187 free (internal_relocs);
3188 else
3189 elf_section_data (sec)->relocs = internal_relocs;
3190 }
3191
3192 return TRUE;
3193
3194 error_return:
3195 if (contents != NULL
3196 && elf_section_data (sec)->this_hdr.contents != contents)
3197 free (contents);
3198 if (internal_relocs != NULL
3199 && elf_section_data (sec)->relocs != internal_relocs)
3200 free (internal_relocs);
3201 return FALSE;
3202}
3203
252b5132
RH
3204/* Set the sizes of the dynamic sections. */
3205
b34976b6 3206static bfd_boolean
23209a78 3207elf_i386_size_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
252b5132 3208{
6725bdbf 3209 struct elf_i386_link_hash_table *htab;
252b5132
RH
3210 bfd *dynobj;
3211 asection *s;
b34976b6 3212 bfd_boolean relocs;
0c715baa 3213 bfd *ibfd;
252b5132 3214
6725bdbf 3215 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
3216 if (htab == NULL)
3217 return FALSE;
ebe50bae 3218 dynobj = htab->elf.dynobj;
ffb2e45b
AM
3219 if (dynobj == NULL)
3220 abort ();
252b5132 3221
0c715baa
AM
3222 /* Set up .got offsets for local syms, and space for local dynamic
3223 relocs. */
c72f2fb2 3224 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
161d71a6
L
3225 {
3226 bfd_signed_vma *local_got;
3227 bfd_signed_vma *end_local_got;
13ae64f3 3228 char *local_tls_type;
67a4f2b7 3229 bfd_vma *local_tlsdesc_gotent;
161d71a6
L
3230 bfd_size_type locsymcount;
3231 Elf_Internal_Shdr *symtab_hdr;
3232 asection *srel;
6725bdbf 3233
0ffa91dd 3234 if (! is_i386_elf (ibfd))
161d71a6 3235 continue;
6725bdbf 3236
0c715baa
AM
3237 for (s = ibfd->sections; s != NULL; s = s->next)
3238 {
e03a8ed8 3239 struct elf_dyn_relocs *p;
0c715baa 3240
02a86693 3241 if (!elf_i386_convert_load (ibfd, s, info))
daa67607
L
3242 return FALSE;
3243
e03a8ed8 3244 for (p = ((struct elf_dyn_relocs *)
e81d3500 3245 elf_section_data (s)->local_dynrel);
ec338859
AM
3246 p != NULL;
3247 p = p->next)
0c715baa 3248 {
ec338859
AM
3249 if (!bfd_is_abs_section (p->sec)
3250 && bfd_is_abs_section (p->sec->output_section))
3251 {
3252 /* Input section has been discarded, either because
3253 it is a copy of a linkonce section or due to
3254 linker script /DISCARD/, so we'll be discarding
3255 the relocs too. */
3256 }
23209a78 3257 else if (get_elf_i386_backend_data (output_bfd)->is_vxworks
3348747a
NS
3258 && strcmp (p->sec->output_section->name,
3259 ".tls_vars") == 0)
3260 {
3261 /* Relocations in vxworks .tls_vars sections are
3262 handled specially by the loader. */
3263 }
248866a8 3264 else if (p->count != 0)
ec338859
AM
3265 {
3266 srel = elf_section_data (p->sec)->sreloc;
eea6121a 3267 srel->size += p->count * sizeof (Elf32_External_Rel);
4b819e1f
L
3268 if ((p->sec->output_section->flags & SEC_READONLY) != 0
3269 && (info->flags & DF_TEXTREL) == 0)
b70321a2
L
3270 {
3271 info->flags |= DF_TEXTREL;
0e1862bb 3272 if ((info->warn_shared_textrel && bfd_link_pic (info))
1952c5cd
L
3273 || info->error_textrel)
3274 info->callbacks->einfo (_("%P: %B: warning: relocation in readonly section `%A'\n"),
b70321a2 3275 p->sec->owner, p->sec);
b70321a2 3276 }
ec338859 3277 }
0c715baa
AM
3278 }
3279 }
3280
3281 local_got = elf_local_got_refcounts (ibfd);
161d71a6
L
3282 if (!local_got)
3283 continue;
6725bdbf 3284
0ffa91dd 3285 symtab_hdr = &elf_symtab_hdr (ibfd);
161d71a6
L
3286 locsymcount = symtab_hdr->sh_info;
3287 end_local_got = local_got + locsymcount;
13ae64f3 3288 local_tls_type = elf_i386_local_got_tls_type (ibfd);
67a4f2b7 3289 local_tlsdesc_gotent = elf_i386_local_tlsdesc_gotent (ibfd);
6de2ae4a
L
3290 s = htab->elf.sgot;
3291 srel = htab->elf.srelgot;
67a4f2b7
AO
3292 for (; local_got < end_local_got;
3293 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
161d71a6 3294 {
67a4f2b7 3295 *local_tlsdesc_gotent = (bfd_vma) -1;
161d71a6 3296 if (*local_got > 0)
6725bdbf 3297 {
67a4f2b7
AO
3298 if (GOT_TLS_GDESC_P (*local_tls_type))
3299 {
6de2ae4a 3300 *local_tlsdesc_gotent = htab->elf.sgotplt->size
67a4f2b7 3301 - elf_i386_compute_jump_table_size (htab);
6de2ae4a 3302 htab->elf.sgotplt->size += 8;
67a4f2b7
AO
3303 *local_got = (bfd_vma) -2;
3304 }
3305 if (! GOT_TLS_GDESC_P (*local_tls_type)
3306 || GOT_TLS_GD_P (*local_tls_type))
3307 {
3308 *local_got = s->size;
3309 s->size += 4;
3310 if (GOT_TLS_GD_P (*local_tls_type)
3311 || *local_tls_type == GOT_TLS_IE_BOTH)
3312 s->size += 4;
3313 }
0e1862bb 3314 if (bfd_link_pic (info)
67a4f2b7 3315 || GOT_TLS_GD_ANY_P (*local_tls_type)
37e55690
JJ
3316 || (*local_tls_type & GOT_TLS_IE))
3317 {
3318 if (*local_tls_type == GOT_TLS_IE_BOTH)
eea6121a 3319 srel->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7
AO
3320 else if (GOT_TLS_GD_P (*local_tls_type)
3321 || ! GOT_TLS_GDESC_P (*local_tls_type))
eea6121a 3322 srel->size += sizeof (Elf32_External_Rel);
67a4f2b7 3323 if (GOT_TLS_GDESC_P (*local_tls_type))
6de2ae4a 3324 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
37e55690 3325 }
6725bdbf 3326 }
161d71a6
L
3327 else
3328 *local_got = (bfd_vma) -1;
6725bdbf 3329 }
252b5132 3330 }
6725bdbf 3331
13ae64f3
JJ
3332 if (htab->tls_ldm_got.refcount > 0)
3333 {
3334 /* Allocate 2 got entries and 1 dynamic reloc for R_386_TLS_LDM
3335 relocs. */
6de2ae4a
L
3336 htab->tls_ldm_got.offset = htab->elf.sgot->size;
3337 htab->elf.sgot->size += 8;
3338 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
13ae64f3
JJ
3339 }
3340 else
3341 htab->tls_ldm_got.offset = -1;
3342
0c715baa
AM
3343 /* Allocate global sym .plt and .got entries, and space for global
3344 sym dynamic relocs. */
eb4ff4d6 3345 elf_link_hash_traverse (&htab->elf, elf_i386_allocate_dynrelocs, info);
252b5132 3346
c25bc9fc
L
3347 /* Allocate .plt and .got entries, and space for local symbols. */
3348 htab_traverse (htab->loc_hash_table,
3349 elf_i386_allocate_local_dynrelocs,
3350 info);
3351
67a4f2b7
AO
3352 /* For every jump slot reserved in the sgotplt, reloc_count is
3353 incremented. However, when we reserve space for TLS descriptors,
3354 it's not incremented, so in order to compute the space reserved
3355 for them, it suffices to multiply the reloc count by the jump
e1f98742 3356 slot size.
caa0075c 3357
e1f98742
L
3358 PR ld/13302: We start next_irelative_index at the end of .rela.plt
3359 so that R_386_IRELATIVE entries come last. */
6de2ae4a 3360 if (htab->elf.srelplt)
e1f98742
L
3361 {
3362 htab->next_tls_desc_index = htab->elf.srelplt->reloc_count;
3363 htab->sgotplt_jump_table_size = htab->next_tls_desc_index * 4;
3364 htab->next_irelative_index = htab->elf.srelplt->reloc_count - 1;
3365 }
3366 else if (htab->elf.irelplt)
3367 htab->next_irelative_index = htab->elf.irelplt->reloc_count - 1;
3368
67a4f2b7 3369
a7b16ceb
L
3370 if (htab->elf.sgotplt)
3371 {
3372 /* Don't allocate .got.plt section if there are no GOT nor PLT
9a2a56cc 3373 entries and there is no reference to _GLOBAL_OFFSET_TABLE_. */
9d4b2dba
L
3374 if ((htab->elf.hgot == NULL
3375 || !htab->elf.hgot->ref_regular_nonweak)
e28df02b
L
3376 && (htab->elf.sgotplt->size
3377 == get_elf_backend_data (output_bfd)->got_header_size)
a7b16ceb
L
3378 && (htab->elf.splt == NULL
3379 || htab->elf.splt->size == 0)
3380 && (htab->elf.sgot == NULL
3381 || htab->elf.sgot->size == 0)
3382 && (htab->elf.iplt == NULL
3383 || htab->elf.iplt->size == 0)
3384 && (htab->elf.igotplt == NULL
3385 || htab->elf.igotplt->size == 0))
3386 htab->elf.sgotplt->size = 0;
3387 }
3388
9a2a56cc
AM
3389
3390 if (htab->plt_eh_frame != NULL
3391 && htab->elf.splt != NULL
3392 && htab->elf.splt->size != 0
3393 && !bfd_is_abs_section (htab->elf.splt->output_section)
3394 && _bfd_elf_eh_frame_present (info))
3395 htab->plt_eh_frame->size = sizeof (elf_i386_eh_frame_plt);
3396
5a15f56f
AM
3397 /* We now have determined the sizes of the various dynamic sections.
3398 Allocate memory for them. */
b34976b6 3399 relocs = FALSE;
252b5132
RH
3400 for (s = dynobj->sections; s != NULL; s = s->next)
3401 {
eac338cf
PB
3402 bfd_boolean strip_section = TRUE;
3403
252b5132
RH
3404 if ((s->flags & SEC_LINKER_CREATED) == 0)
3405 continue;
3406
6de2ae4a 3407 if (s == htab->elf.splt
9a2a56cc 3408 || s == htab->elf.sgot)
252b5132 3409 {
6725bdbf
AM
3410 /* Strip this section if we don't need it; see the
3411 comment below. */
eac338cf
PB
3412 /* We'd like to strip these sections if they aren't needed, but if
3413 we've exported dynamic symbols from them we must leave them.
3414 It's too late to tell BFD to get rid of the symbols. */
3415
7325306f 3416 if (htab->elf.hplt != NULL)
eac338cf 3417 strip_section = FALSE;
252b5132 3418 }
9a2a56cc
AM
3419 else if (s == htab->elf.sgotplt
3420 || s == htab->elf.iplt
3421 || s == htab->elf.igotplt
dd7e64d4 3422 || s == htab->plt_got
9a2a56cc
AM
3423 || s == htab->plt_eh_frame
3424 || s == htab->sdynbss)
3425 {
3426 /* Strip these too. */
3427 }
0112cd26 3428 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rel"))
252b5132 3429 {
6de2ae4a
L
3430 if (s->size != 0
3431 && s != htab->elf.srelplt
3432 && s != htab->srelplt2)
b34976b6 3433 relocs = TRUE;
252b5132 3434
0ac8d2ca
AM
3435 /* We use the reloc_count field as a counter if we need
3436 to copy relocs into the output file. */
5ae0bfb6 3437 s->reloc_count = 0;
252b5132 3438 }
6725bdbf 3439 else
252b5132
RH
3440 {
3441 /* It's not one of our sections, so don't allocate space. */
3442 continue;
3443 }
3444
c456f082 3445 if (s->size == 0)
252b5132 3446 {
0ac8d2ca
AM
3447 /* If we don't need this section, strip it from the
3448 output file. This is mostly to handle .rel.bss and
3449 .rel.plt. We must create both sections in
3450 create_dynamic_sections, because they must be created
3451 before the linker maps input sections to output
3452 sections. The linker does that before
3453 adjust_dynamic_symbol is called, and it is that
3454 function which decides whether anything needs to go
3455 into these sections. */
c456f082
AM
3456 if (strip_section)
3457 s->flags |= SEC_EXCLUDE;
252b5132
RH
3458 continue;
3459 }
3460
c456f082
AM
3461 if ((s->flags & SEC_HAS_CONTENTS) == 0)
3462 continue;
3463
f69da49f
AM
3464 /* Allocate memory for the section contents. We use bfd_zalloc
3465 here in case unused entries are not reclaimed before the
3466 section's contents are written out. This should not happen,
3467 but this way if it does, we get a R_386_NONE reloc instead
3468 of garbage. */
a50b1753 3469 s->contents = (unsigned char *) bfd_zalloc (dynobj, s->size);
6725bdbf 3470 if (s->contents == NULL)
b34976b6 3471 return FALSE;
252b5132
RH
3472 }
3473
e41b3a13 3474 if (htab->plt_eh_frame != NULL
9a2a56cc
AM
3475 && htab->plt_eh_frame->contents != NULL)
3476 {
3477 memcpy (htab->plt_eh_frame->contents, elf_i386_eh_frame_plt,
3478 sizeof (elf_i386_eh_frame_plt));
3479 bfd_put_32 (dynobj, htab->elf.splt->size,
3480 htab->plt_eh_frame->contents + PLT_FDE_LEN_OFFSET);
3481 }
e41b3a13 3482
ebe50bae 3483 if (htab->elf.dynamic_sections_created)
252b5132
RH
3484 {
3485 /* Add some entries to the .dynamic section. We fill in the
3486 values later, in elf_i386_finish_dynamic_sections, but we
3487 must add the entries now so that we get the correct size for
3488 the .dynamic section. The DT_DEBUG entry is filled in by the
3489 dynamic linker and used by the debugger. */
dc810e39 3490#define add_dynamic_entry(TAG, VAL) \
5a580b3a 3491 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 3492
0e1862bb 3493 if (bfd_link_executable (info))
252b5132 3494 {
dc810e39 3495 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 3496 return FALSE;
252b5132
RH
3497 }
3498
6de2ae4a 3499 if (htab->elf.splt->size != 0)
252b5132 3500 {
7c1e8d3e
L
3501 /* DT_PLTGOT is used by prelink even if there is no PLT
3502 relocation. */
3503 if (!add_dynamic_entry (DT_PLTGOT, 0))
b34976b6 3504 return FALSE;
7c1e8d3e
L
3505
3506 if (htab->elf.srelplt->size != 0)
3507 {
3508 if (!add_dynamic_entry (DT_PLTRELSZ, 0)
3509 || !add_dynamic_entry (DT_PLTREL, DT_REL)
3510 || !add_dynamic_entry (DT_JMPREL, 0))
3511 return FALSE;
3512 }
252b5132
RH
3513 }
3514
3515 if (relocs)
3516 {
dc810e39
AM
3517 if (!add_dynamic_entry (DT_REL, 0)
3518 || !add_dynamic_entry (DT_RELSZ, 0)
3519 || !add_dynamic_entry (DT_RELENT, sizeof (Elf32_External_Rel)))
b34976b6 3520 return FALSE;
252b5132 3521
0c715baa
AM
3522 /* If any dynamic relocs apply to a read-only section,
3523 then we need a DT_TEXTREL entry. */
248866a8 3524 if ((info->flags & DF_TEXTREL) == 0)
eb4ff4d6
L
3525 elf_link_hash_traverse (&htab->elf,
3526 elf_i386_readonly_dynrelocs, info);
0c715baa
AM
3527
3528 if ((info->flags & DF_TEXTREL) != 0)
3529 {
2df3368d 3530 if (htab->readonly_dynrelocs_against_ifunc)
8efa2874
L
3531 {
3532 info->callbacks->einfo
3533 (_("%P%X: read-only segment has dynamic IFUNC relocations; recompile with -fPIC\n"));
3534 bfd_set_error (bfd_error_bad_value);
3535 return FALSE;
3536 }
3537
0c715baa 3538 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 3539 return FALSE;
0c715baa 3540 }
252b5132 3541 }
23209a78 3542 if (get_elf_i386_backend_data (output_bfd)->is_vxworks
7a2b07ff
NS
3543 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
3544 return FALSE;
252b5132 3545 }
dc810e39 3546#undef add_dynamic_entry
252b5132 3547
b34976b6 3548 return TRUE;
252b5132
RH
3549}
3550
67a4f2b7
AO
3551static bfd_boolean
3552elf_i386_always_size_sections (bfd *output_bfd,
3553 struct bfd_link_info *info)
3554{
3555 asection *tls_sec = elf_hash_table (info)->tls_sec;
3556
3557 if (tls_sec)
3558 {
3559 struct elf_link_hash_entry *tlsbase;
3560
3561 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
3562 "_TLS_MODULE_BASE_",
3563 FALSE, FALSE, FALSE);
3564
3565 if (tlsbase && tlsbase->type == STT_TLS)
3566 {
4dfe6ac6 3567 struct elf_i386_link_hash_table *htab;
67a4f2b7
AO
3568 struct bfd_link_hash_entry *bh = NULL;
3569 const struct elf_backend_data *bed
3570 = get_elf_backend_data (output_bfd);
3571
4dfe6ac6
NC
3572 htab = elf_i386_hash_table (info);
3573 if (htab == NULL)
3574 return FALSE;
3575
67a4f2b7
AO
3576 if (!(_bfd_generic_link_add_one_symbol
3577 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
3578 tls_sec, 0, NULL, FALSE,
3579 bed->collect, &bh)))
3580 return FALSE;
9f03412a 3581
4dfe6ac6 3582 htab->tls_module_base = bh;
9f03412a 3583
67a4f2b7
AO
3584 tlsbase = (struct elf_link_hash_entry *)bh;
3585 tlsbase->def_regular = 1;
3586 tlsbase->other = STV_HIDDEN;
576fa883 3587 tlsbase->root.linker_def = 1;
67a4f2b7
AO
3588 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
3589 }
3590 }
3591
3592 return TRUE;
3593}
3594
38701953
AM
3595/* Set the correct type for an x86 ELF section. We do this by the
3596 section name, which is a hack, but ought to work. */
3597
b34976b6 3598static bfd_boolean
55fd94b0
AM
3599elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
3600 Elf_Internal_Shdr *hdr,
3601 asection *sec)
38701953 3602{
91d6fa6a 3603 const char *name;
38701953
AM
3604
3605 name = bfd_get_section_name (abfd, sec);
3606
3607 /* This is an ugly, but unfortunately necessary hack that is
3608 needed when producing EFI binaries on x86. It tells
3609 elf.c:elf_fake_sections() not to consider ".reloc" as a section
3610 containing ELF relocation info. We need this hack in order to
3611 be able to generate ELF binaries that can be translated into
3612 EFI applications (which are essentially COFF objects). Those
3613 files contain a COFF ".reloc" section inside an ELFNN object,
3614 which would normally cause BFD to segfault because it would
3615 attempt to interpret this section as containing relocation
3616 entries for section "oc". With this hack enabled, ".reloc"
3617 will be treated as a normal data section, which will avoid the
3618 segfault. However, you won't be able to create an ELFNN binary
3619 with a section named "oc" that needs relocations, but that's
3620 the kind of ugly side-effects you get when detecting section
3621 types based on their names... In practice, this limitation is
3622 unlikely to bite. */
3623 if (strcmp (name, ".reloc") == 0)
3624 hdr->sh_type = SHT_PROGBITS;
3625
b34976b6 3626 return TRUE;
38701953
AM
3627}
3628
9f03412a
AO
3629/* _TLS_MODULE_BASE_ needs to be treated especially when linking
3630 executables. Rather than setting it to the beginning of the TLS
3631 section, we have to set it to the end. This function may be called
3632 multiple times, it is idempotent. */
3633
3634static void
eb4ff4d6 3635elf_i386_set_tls_module_base (struct bfd_link_info *info)
9f03412a 3636{
4dfe6ac6 3637 struct elf_i386_link_hash_table *htab;
9f03412a
AO
3638 struct bfd_link_hash_entry *base;
3639
0e1862bb 3640 if (!bfd_link_executable (info))
9f03412a
AO
3641 return;
3642
4dfe6ac6
NC
3643 htab = elf_i386_hash_table (info);
3644 if (htab == NULL)
3645 return;
9f03412a 3646
4dfe6ac6
NC
3647 base = htab->tls_module_base;
3648 if (base == NULL)
9f03412a
AO
3649 return;
3650
4dfe6ac6 3651 base->u.def.value = htab->elf.tls_size;
9f03412a
AO
3652}
3653
13ae64f3
JJ
3654/* Return the base VMA address which should be subtracted from real addresses
3655 when resolving @dtpoff relocation.
3656 This is PT_TLS segment p_vaddr. */
3657
3658static bfd_vma
eb4ff4d6 3659elf_i386_dtpoff_base (struct bfd_link_info *info)
13ae64f3 3660{
e1918d23
AM
3661 /* If tls_sec is NULL, we should have signalled an error already. */
3662 if (elf_hash_table (info)->tls_sec == NULL)
6a30718d 3663 return 0;
e1918d23 3664 return elf_hash_table (info)->tls_sec->vma;
13ae64f3
JJ
3665}
3666
3667/* Return the relocation value for @tpoff relocation
3668 if STT_TLS virtual address is ADDRESS. */
3669
3670static bfd_vma
eb4ff4d6 3671elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address)
13ae64f3 3672{
e1918d23 3673 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO
3674 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
3675 bfd_vma static_tls_size;
13ae64f3 3676
e1918d23
AM
3677 /* If tls_sec is NULL, we should have signalled an error already. */
3678 if (htab->tls_sec == NULL)
6a30718d 3679 return 0;
7dc98aea
RO
3680
3681 /* Consider special static TLS alignment requirements. */
3682 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
3683 return static_tls_size + htab->tls_sec->vma - address;
13ae64f3
JJ
3684}
3685
252b5132
RH
3686/* Relocate an i386 ELF section. */
3687
b34976b6 3688static bfd_boolean
55fd94b0
AM
3689elf_i386_relocate_section (bfd *output_bfd,
3690 struct bfd_link_info *info,
3691 bfd *input_bfd,
3692 asection *input_section,
3693 bfd_byte *contents,
3694 Elf_Internal_Rela *relocs,
3695 Elf_Internal_Sym *local_syms,
3696 asection **local_sections)
252b5132 3697{
6725bdbf 3698 struct elf_i386_link_hash_table *htab;
252b5132
RH
3699 Elf_Internal_Shdr *symtab_hdr;
3700 struct elf_link_hash_entry **sym_hashes;
3701 bfd_vma *local_got_offsets;
67a4f2b7 3702 bfd_vma *local_tlsdesc_gotents;
252b5132 3703 Elf_Internal_Rela *rel;
60f2e42e 3704 Elf_Internal_Rela *wrel;
252b5132 3705 Elf_Internal_Rela *relend;
3348747a 3706 bfd_boolean is_vxworks_tls;
25e762b9 3707 unsigned plt_entry_size;
252b5132 3708
0ffa91dd 3709 BFD_ASSERT (is_i386_elf (input_bfd));
6bbec505 3710
c337a162
L
3711 /* Skip if check_relocs failed. */
3712 if (input_section->check_relocs_failed)
3713 return FALSE;
3714
6725bdbf 3715 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
3716 if (htab == NULL)
3717 return FALSE;
0ffa91dd 3718 symtab_hdr = &elf_symtab_hdr (input_bfd);
252b5132
RH
3719 sym_hashes = elf_sym_hashes (input_bfd);
3720 local_got_offsets = elf_local_got_offsets (input_bfd);
67a4f2b7 3721 local_tlsdesc_gotents = elf_i386_local_tlsdesc_gotent (input_bfd);
3348747a
NS
3722 /* We have to handle relocations in vxworks .tls_vars sections
3723 specially, because the dynamic loader is 'weird'. */
23209a78 3724 is_vxworks_tls = (get_elf_i386_backend_data (output_bfd)->is_vxworks
0e1862bb 3725 && bfd_link_pic (info)
3348747a
NS
3726 && !strcmp (input_section->output_section->name,
3727 ".tls_vars"));
252b5132 3728
eb4ff4d6 3729 elf_i386_set_tls_module_base (info);
9f03412a 3730
25e762b9
RM
3731 plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd);
3732
60f2e42e 3733 rel = wrel = relocs;
252b5132 3734 relend = relocs + input_section->reloc_count;
60f2e42e 3735 for (; rel < relend; wrel++, rel++)
252b5132 3736 {
13ae64f3 3737 unsigned int r_type;
252b5132
RH
3738 reloc_howto_type *howto;
3739 unsigned long r_symndx;
3740 struct elf_link_hash_entry *h;
dd7e64d4 3741 struct elf_i386_link_hash_entry *eh;
252b5132
RH
3742 Elf_Internal_Sym *sym;
3743 asection *sec;
dd7e64d4 3744 bfd_vma off, offplt, plt_offset;
252b5132 3745 bfd_vma relocation;
b34976b6 3746 bfd_boolean unresolved_reloc;
252b5132 3747 bfd_reloc_status_type r;
1b452ec6 3748 unsigned int indx;
13ae64f3 3749 int tls_type;
1788fc08 3750 bfd_vma st_size;
dd7e64d4 3751 asection *resolved_plt;
aec6b87e 3752 bfd_boolean resolved_to_zero;
252b5132
RH
3753
3754 r_type = ELF32_R_TYPE (rel->r_info);
55fd94b0
AM
3755 if (r_type == R_386_GNU_VTINHERIT
3756 || r_type == R_386_GNU_VTENTRY)
18954b29
L
3757 {
3758 if (wrel != rel)
3759 *wrel = *rel;
3760 continue;
3761 }
dc47f327 3762
55fd94b0 3763 if ((indx = r_type) >= R_386_standard
13ae64f3
JJ
3764 && ((indx = r_type - R_386_ext_offset) - R_386_standard
3765 >= R_386_ext - R_386_standard)
3766 && ((indx = r_type - R_386_tls_offset) - R_386_ext
c74be520 3767 >= R_386_ext2 - R_386_ext))
252b5132 3768 {
4eca0228 3769 _bfd_error_handler
d003868e
AM
3770 (_("%B: unrecognized relocation (0x%x) in section `%A'"),
3771 input_bfd, input_section, r_type);
252b5132 3772 bfd_set_error (bfd_error_bad_value);
b34976b6 3773 return FALSE;
252b5132 3774 }
1b452ec6 3775 howto = elf_howto_table + indx;
252b5132
RH
3776
3777 r_symndx = ELF32_R_SYM (rel->r_info);
252b5132
RH
3778 h = NULL;
3779 sym = NULL;
3780 sec = NULL;
b34976b6 3781 unresolved_reloc = FALSE;
252b5132
RH
3782 if (r_symndx < symtab_hdr->sh_info)
3783 {
3784 sym = local_syms + r_symndx;
3785 sec = local_sections[r_symndx];
3786 relocation = (sec->output_section->vma
3787 + sec->output_offset
3788 + sym->st_value);
1788fc08 3789 st_size = sym->st_size;
ab96bf03
AM
3790
3791 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION
3792 && ((sec->flags & SEC_MERGE) != 0
0e1862bb 3793 || (bfd_link_relocatable (info)
ab96bf03 3794 && sec->output_offset != 0)))
f8df10f4 3795 {
f8df10f4 3796 bfd_vma addend;
4a335f3d 3797 bfd_byte *where = contents + rel->r_offset;
f8df10f4 3798
4a335f3d 3799 switch (howto->size)
f8df10f4 3800 {
4a335f3d
AM
3801 case 0:
3802 addend = bfd_get_8 (input_bfd, where);
3803 if (howto->pc_relative)
3804 {
3805 addend = (addend ^ 0x80) - 0x80;
3806 addend += 1;
3807 }
3808 break;
3809 case 1:
3810 addend = bfd_get_16 (input_bfd, where);
3811 if (howto->pc_relative)
3812 {
3813 addend = (addend ^ 0x8000) - 0x8000;
3814 addend += 2;
3815 }
3816 break;
3817 case 2:
3818 addend = bfd_get_32 (input_bfd, where);
3819 if (howto->pc_relative)
3820 {
3821 addend = (addend ^ 0x80000000) - 0x80000000;
3822 addend += 4;
3823 }
3824 break;
3825 default:
3826 abort ();
f8df10f4
JJ
3827 }
3828
0e1862bb 3829 if (bfd_link_relocatable (info))
ab96bf03
AM
3830 addend += sec->output_offset;
3831 else
3832 {
3833 asection *msec = sec;
3834 addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec,
3835 addend);
3836 addend -= relocation;
3837 addend += msec->output_section->vma + msec->output_offset;
3838 }
4a335f3d
AM
3839
3840 switch (howto->size)
3841 {
3842 case 0:
16a10388 3843 /* FIXME: overflow checks. */
4a335f3d
AM
3844 if (howto->pc_relative)
3845 addend -= 1;
3846 bfd_put_8 (input_bfd, addend, where);
4a335f3d
AM
3847 break;
3848 case 1:
3849 if (howto->pc_relative)
3850 addend -= 2;
3851 bfd_put_16 (input_bfd, addend, where);
4a335f3d
AM
3852 break;
3853 case 2:
3854 if (howto->pc_relative)
3855 addend -= 4;
3856 bfd_put_32 (input_bfd, addend, where);
3857 break;
3858 }
f8df10f4 3859 }
0e1862bb 3860 else if (!bfd_link_relocatable (info)
1f85278f 3861 && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc
L
3862 {
3863 /* Relocate against local STT_GNU_IFUNC symbol. */
9fff0c39
L
3864 h = elf_i386_get_local_sym_hash (htab, input_bfd, rel,
3865 FALSE);
c25bc9fc
L
3866 if (h == NULL)
3867 abort ();
3868
23209a78 3869 /* Set STT_GNU_IFUNC symbol value. */
c25bc9fc
L
3870 h->root.u.def.value = sym->st_value;
3871 h->root.u.def.section = sec;
3872 }
252b5132
RH
3873 }
3874 else
3875 {
3d540e93 3876 bfd_boolean warned ATTRIBUTE_UNUSED;
62d887d4 3877 bfd_boolean ignored ATTRIBUTE_UNUSED;
ffb2e45b 3878
b2a8e766
AM
3879 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
3880 r_symndx, symtab_hdr, sym_hashes,
3881 h, sec, relocation,
62d887d4 3882 unresolved_reloc, warned, ignored);
1788fc08 3883 st_size = h->size;
252b5132
RH
3884 }
3885
dbaa2011 3886 if (sec != NULL && discarded_section (sec))
60f2e42e
L
3887 {
3888 _bfd_clear_contents (howto, input_bfd, input_section,
3889 contents + rel->r_offset);
3890 wrel->r_offset = rel->r_offset;
3891 wrel->r_info = 0;
3892 wrel->r_addend = 0;
3893
3894 /* For ld -r, remove relocations in debug sections against
3895 sections defined in discarded sections. Not done for
3896 eh_frame editing code expects to be present. */
3897 if (bfd_link_relocatable (info)
3898 && (input_section->flags & SEC_DEBUGGING))
3899 wrel--;
3900
3901 continue;
3902 }
9635fe29 3903
0e1862bb 3904 if (bfd_link_relocatable (info))
2d5da473
L
3905 {
3906 if (wrel != rel)
3907 *wrel = *rel;
3908 continue;
3909 }
ab96bf03 3910
cbe950e9
L
3911 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
3912 it here if it is defined in a non-shared object. */
3913 if (h != NULL
3914 && h->type == STT_GNU_IFUNC
3915 && h->def_regular)
3916 {
3917 asection *plt, *gotplt, *base_got;
3918 bfd_vma plt_index;
4c544807 3919 const char *name;
cbe950e9 3920
97dc35c8
L
3921 if ((input_section->flags & SEC_ALLOC) == 0)
3922 {
3923 /* Dynamic relocs are not propagated for SEC_DEBUGGING
3924 sections because such sections are not SEC_ALLOC and
3925 thus ld.so will not process them. */
3926 if ((input_section->flags & SEC_DEBUGGING) != 0)
0eace210 3927 continue;
97dc35c8
L
3928 abort ();
3929 }
cbe950e9
L
3930
3931 /* STT_GNU_IFUNC symbol must go through PLT. */
6de2ae4a 3932 if (htab->elf.splt != NULL)
cbe950e9 3933 {
6de2ae4a
L
3934 plt = htab->elf.splt;
3935 gotplt = htab->elf.sgotplt;
cbe950e9
L
3936 }
3937 else
3938 {
6de2ae4a
L
3939 plt = htab->elf.iplt;
3940 gotplt = htab->elf.igotplt;
cbe950e9
L
3941 }
3942
cbe950e9
L
3943 switch (r_type)
3944 {
3945 default:
233cc9c1 3946 break;
cbe950e9
L
3947
3948 case R_386_GOT32:
02a86693 3949 case R_386_GOT32X:
6de2ae4a 3950 base_got = htab->elf.sgot;
cbe950e9
L
3951 off = h->got.offset;
3952
7afd84dc 3953 if (base_got == NULL)
cbe950e9
L
3954 abort ();
3955
7afd84dc 3956 if (off == (bfd_vma) -1)
cbe950e9 3957 {
7afd84dc
L
3958 /* We can't use h->got.offset here to save state, or
3959 even just remember the offset, as finish_dynamic_symbol
3960 would use that as offset into .got. */
6bbec505 3961
233cc9c1
L
3962 if (h->plt.offset == (bfd_vma) -1)
3963 abort ();
3964
6de2ae4a 3965 if (htab->elf.splt != NULL)
7afd84dc 3966 {
25e762b9 3967 plt_index = h->plt.offset / plt_entry_size - 1;
7afd84dc 3968 off = (plt_index + 3) * 4;
6de2ae4a 3969 base_got = htab->elf.sgotplt;
7afd84dc 3970 }
cbe950e9
L
3971 else
3972 {
25e762b9 3973 plt_index = h->plt.offset / plt_entry_size;
7afd84dc 3974 off = plt_index * 4;
6de2ae4a 3975 base_got = htab->elf.igotplt;
7afd84dc
L
3976 }
3977
3978 if (h->dynindx == -1
3979 || h->forced_local
3980 || info->symbolic)
3981 {
3982 /* This references the local defitionion. We must
3983 initialize this entry in the global offset table.
3984 Since the offset must always be a multiple of 8,
3985 we use the least significant bit to record
3986 whether we have initialized it already.
3987
3988 When doing a dynamic link, we create a .rela.got
3989 relocation entry to initialize the value. This
3990 is done in the finish_dynamic_symbol routine. */
3991 if ((off & 1) != 0)
3992 off &= ~1;
3993 else
3994 {
3995 bfd_put_32 (output_bfd, relocation,
3996 base_got->contents + off);
3997 h->got.offset |= 1;
3998 }
cbe950e9 3999 }
cbe950e9 4000
7afd84dc 4001 relocation = off;
7afd84dc
L
4002 }
4003 else
ca8c86ef
L
4004 relocation = (base_got->output_section->vma
4005 + base_got->output_offset + off
4006 - gotplt->output_section->vma
4007 - gotplt->output_offset);
4008
712ec279
L
4009 if ((*(contents + rel->r_offset - 1) & 0xc7) == 0x5)
4010 {
4011 if (bfd_link_pic (info))
4012 goto disallow_got32;
4013
4014 /* Add the GOT base if there is no base register. */
4015 relocation += (gotplt->output_section->vma
4016 + gotplt->output_offset);
4017 }
4018 else if (htab->elf.splt == NULL)
4019 {
4020 /* Adjust for static executables. */
4021 relocation += gotplt->output_offset;
4022 }
0018b0a3 4023
cbe950e9 4024 goto do_relocation;
233cc9c1
L
4025 }
4026
4027 if (h->plt.offset == (bfd_vma) -1)
4028 {
4029 /* Handle static pointers of STT_GNU_IFUNC symbols. */
4030 if (r_type == R_386_32
4031 && (input_section->flags & SEC_CODE) == 0)
4032 goto do_ifunc_pointer;
4033 goto bad_ifunc_reloc;
4034 }
4035
4036 relocation = (plt->output_section->vma
4037 + plt->output_offset + h->plt.offset);
4038
4039 switch (r_type)
4040 {
4041 default:
4042bad_ifunc_reloc:
4043 if (h->root.root.string)
4044 name = h->root.root.string;
4045 else
4046 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4047 NULL);
4eca0228 4048 _bfd_error_handler
233cc9c1
L
4049 (_("%B: relocation %s against STT_GNU_IFUNC "
4050 "symbol `%s' isn't supported"), input_bfd,
4051 howto->name, name);
4052 bfd_set_error (bfd_error_bad_value);
4053 return FALSE;
4054
4055 case R_386_32:
4056 /* Generate dynamic relcoation only when there is a
4057 non-GOT reference in a shared object. */
4058 if ((bfd_link_pic (info) && h->non_got_ref)
4059 || h->plt.offset == (bfd_vma) -1)
4060 {
4061 Elf_Internal_Rela outrel;
4062 asection *sreloc;
4063 bfd_vma offset;
4064
4065do_ifunc_pointer:
4066 /* Need a dynamic relocation to get the real function
4067 adddress. */
4068 offset = _bfd_elf_section_offset (output_bfd,
4069 info,
4070 input_section,
4071 rel->r_offset);
4072 if (offset == (bfd_vma) -1
4073 || offset == (bfd_vma) -2)
4074 abort ();
4075
4076 outrel.r_offset = (input_section->output_section->vma
4077 + input_section->output_offset
4078 + offset);
4079
4080 if (h->dynindx == -1
4081 || h->forced_local
4082 || bfd_link_executable (info))
4083 {
4084 /* This symbol is resolved locally. */
4085 outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
4086 bfd_put_32 (output_bfd,
4087 (h->root.u.def.value
4088 + h->root.u.def.section->output_section->vma
4089 + h->root.u.def.section->output_offset),
4090 contents + offset);
4091 }
4092 else
4093 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
4094
4095 /* Dynamic relocations are stored in
4096 1. .rel.ifunc section in PIC object.
4097 2. .rel.got section in dynamic executable.
4098 3. .rel.iplt section in static executable. */
4099 if (bfd_link_pic (info))
4100 sreloc = htab->elf.irelifunc;
4101 else if (htab->elf.splt != NULL)
4102 sreloc = htab->elf.srelgot;
4103 else
4104 sreloc = htab->elf.irelplt;
4105 elf_append_rel (output_bfd, sreloc, &outrel);
4106
4107 /* If this reloc is against an external symbol, we
4108 do not want to fiddle with the addend. Otherwise,
4109 we need to include the symbol value so that it
4110 becomes an addend for the dynamic reloc. For an
4111 internal symbol, we have updated addend. */
4112 continue;
4113 }
4114 /* FALLTHROUGH */
4115 case R_386_PC32:
4116 case R_386_PLT32:
4117 goto do_relocation;
cbe950e9
L
4118
4119 case R_386_GOTOFF:
4120 relocation -= (gotplt->output_section->vma
4121 + gotplt->output_offset);
4122 goto do_relocation;
4123 }
4124 }
4125
04ebc307 4126 eh = (struct elf_i386_link_hash_entry *) h;
aec6b87e 4127 resolved_to_zero = (eh != NULL
e62b9723
L
4128 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
4129 eh->has_got_reloc,
4130 eh));
aec6b87e 4131
252b5132
RH
4132 switch (r_type)
4133 {
02a86693
L
4134 case R_386_GOT32X:
4135 /* Avoid optimizing _DYNAMIC since ld.so may use its
4136 link-time address. */
4137 if (h == htab->elf.hdynamic)
4138 goto r_386_got32;
4139
4140 if (bfd_link_pic (info))
4141 {
4142 /* It is OK to convert mov to lea and convert indirect
4143 branch to direct branch. It is OK to convert adc,
4144 add, and, cmp, or, sbb, sub, test, xor only when PIC
4145 is false. */
02e2aef8
L
4146 unsigned int opcode, addend;
4147 addend = bfd_get_32 (input_bfd, contents + rel->r_offset);
4148 if (addend != 0)
4149 goto r_386_got32;
4150 opcode = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
02a86693
L
4151 if (opcode != 0x8b && opcode != 0xff)
4152 goto r_386_got32;
4153 }
4154
4155 /* Resolve "mov GOT[(%reg)], %reg",
4156 "call/jmp *GOT[(%reg)]", "test %reg, foo@GOT[(%reg)]"
4157 and "binop foo@GOT[(%reg)], %reg". */
4158 if (h == NULL
4159 || (h->plt.offset == (bfd_vma) -1
4160 && h->got.offset == (bfd_vma) -1)
4161 || htab->elf.sgotplt == NULL)
4162 abort ();
4163
4164 offplt = (htab->elf.sgotplt->output_section->vma
4165 + htab->elf.sgotplt->output_offset);
4166
4167 /* It is relative to .got.plt section. */
4168 if (h->got.offset != (bfd_vma) -1)
32875eb1
L
4169 /* Use GOT entry. Mask off the least significant bit in
4170 GOT offset which may be set by R_386_GOT32 processing
4171 below. */
02a86693
L
4172 relocation = (htab->elf.sgot->output_section->vma
4173 + htab->elf.sgot->output_offset
32875eb1 4174 + (h->got.offset & ~1) - offplt);
02a86693
L
4175 else
4176 /* Use GOTPLT entry. */
4177 relocation = (h->plt.offset / plt_entry_size - 1 + 3) * 4;
4178
4179 if (!bfd_link_pic (info))
4180 {
4181 /* If not PIC, add the .got.plt section address for
a3718e9e 4182 baseless addressing. */
02a86693 4183 unsigned int modrm;
02e2aef8 4184 modrm = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
02a86693
L
4185 if ((modrm & 0xc7) == 0x5)
4186 relocation += offplt;
4187 }
4188
4189 unresolved_reloc = FALSE;
4190 break;
4191
252b5132 4192 case R_386_GOT32:
02a86693 4193r_386_got32:
252b5132
RH
4194 /* Relocation is to the entry for this symbol in the global
4195 offset table. */
6de2ae4a 4196 if (htab->elf.sgot == NULL)
ffb2e45b 4197 abort ();
252b5132
RH
4198
4199 if (h != NULL)
4200 {
b34976b6 4201 bfd_boolean dyn;
252b5132
RH
4202
4203 off = h->got.offset;
ebe50bae 4204 dyn = htab->elf.dynamic_sections_created;
0e1862bb
L
4205 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
4206 bfd_link_pic (info),
4207 h)
4208 || (bfd_link_pic (info)
586119b3 4209 && SYMBOL_REFERENCES_LOCAL (info, h))
ef5aade5
L
4210 || (ELF_ST_VISIBILITY (h->other)
4211 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH
4212 {
4213 /* This is actually a static link, or it is a
4214 -Bsymbolic link and the symbol is defined
4215 locally, or the symbol was forced to be local
4216 because of a version file. We must initialize
4217 this entry in the global offset table. Since the
4218 offset must always be a multiple of 4, we use the
4219 least significant bit to record whether we have
4220 initialized it already.
4221
4222 When doing a dynamic link, we create a .rel.got
4223 relocation entry to initialize the value. This
4224 is done in the finish_dynamic_symbol routine. */
4225 if ((off & 1) != 0)
4226 off &= ~1;
4227 else
4228 {
4229 bfd_put_32 (output_bfd, relocation,
6de2ae4a 4230 htab->elf.sgot->contents + off);
252b5132
RH
4231 h->got.offset |= 1;
4232 }
4233 }
8c694914 4234 else
b34976b6 4235 unresolved_reloc = FALSE;
252b5132
RH
4236 }
4237 else
4238 {
ffb2e45b
AM
4239 if (local_got_offsets == NULL)
4240 abort ();
252b5132
RH
4241
4242 off = local_got_offsets[r_symndx];
4243
4244 /* The offset must always be a multiple of 4. We use
83be169b
AM
4245 the least significant bit to record whether we have
4246 already generated the necessary reloc. */
252b5132
RH
4247 if ((off & 1) != 0)
4248 off &= ~1;
4249 else
4250 {
6725bdbf 4251 bfd_put_32 (output_bfd, relocation,
6de2ae4a 4252 htab->elf.sgot->contents + off);
252b5132 4253
0e1862bb 4254 if (bfd_link_pic (info))
252b5132 4255 {
947216bf
AM
4256 asection *s;
4257 Elf_Internal_Rela outrel;
252b5132 4258
6de2ae4a 4259 s = htab->elf.srelgot;
947216bf 4260 if (s == NULL)
ffb2e45b 4261 abort ();
252b5132 4262
6de2ae4a
L
4263 outrel.r_offset = (htab->elf.sgot->output_section->vma
4264 + htab->elf.sgot->output_offset
252b5132
RH
4265 + off);
4266 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
59d6ffb2 4267 elf_append_rel (output_bfd, s, &outrel);
252b5132
RH
4268 }
4269
4270 local_got_offsets[r_symndx] |= 1;
4271 }
252b5132
RH
4272 }
4273
ffb2e45b
AM
4274 if (off >= (bfd_vma) -2)
4275 abort ();
4276
74d7f0aa
L
4277 relocation = (htab->elf.sgot->output_section->vma
4278 + htab->elf.sgot->output_offset + off);
4279 if ((*(contents + rel->r_offset - 1) & 0xc7) == 0x5)
4280 {
4281 if (bfd_link_pic (info))
4282 {
4283 /* For PIC, disallow R_386_GOT32 without a base
4284 register since we don't know what the GOT base
4285 is. */
4286 const char *name;
4287
712ec279 4288disallow_got32:
74d7f0aa
L
4289 if (h == NULL)
4290 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4291 NULL);
4292 else
4293 name = h->root.root.string;
4294
4eca0228 4295 _bfd_error_handler
712ec279
L
4296 (_("%B: direct GOT relocation %s against `%s' without base register can not be used when making a shared object"),
4297 input_bfd, howto->name, name);
74d7f0aa
L
4298 bfd_set_error (bfd_error_bad_value);
4299 return FALSE;
4300 }
4301 }
4302 else
4303 {
4304 /* Subtract the .got.plt section address only with a base
4305 register. */
4306 relocation -= (htab->elf.sgotplt->output_section->vma
4307 + htab->elf.sgotplt->output_offset);
4308 }
4309
252b5132
RH
4310 break;
4311
4312 case R_386_GOTOFF:
4313 /* Relocation is relative to the start of the global offset
4314 table. */
4315
3d949995
L
4316 /* Check to make sure it isn't a protected function or data
4317 symbol for shared library since it may not be local when
4318 used as function address or with copy relocation. We also
e3c0e327 4319 need to make sure that a symbol is referenced locally. */
0e1862bb 4320 if (!bfd_link_executable (info) && h)
90f487df 4321 {
41bed6dd
L
4322 if (!h->def_regular)
4323 {
4324 const char *v;
4325
4326 switch (ELF_ST_VISIBILITY (h->other))
4327 {
4328 case STV_HIDDEN:
4329 v = _("hidden symbol");
4330 break;
4331 case STV_INTERNAL:
4332 v = _("internal symbol");
4333 break;
4334 case STV_PROTECTED:
4335 v = _("protected symbol");
4336 break;
4337 default:
4338 v = _("symbol");
4339 break;
4340 }
4341
4eca0228 4342 _bfd_error_handler
41bed6dd
L
4343 (_("%B: relocation R_386_GOTOFF against undefined %s `%s' can not be used when making a shared object"),
4344 input_bfd, v, h->root.root.string);
4345 bfd_set_error (bfd_error_bad_value);
4346 return FALSE;
4347 }
d5597ebc 4348 else if (!SYMBOL_REFERENCES_LOCAL (info, h)
3d949995
L
4349 && (h->type == STT_FUNC
4350 || h->type == STT_OBJECT)
41bed6dd
L
4351 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
4352 {
4eca0228 4353 _bfd_error_handler
3d949995
L
4354 (_("%B: relocation R_386_GOTOFF against protected %s `%s' can not be used when making a shared object"),
4355 input_bfd,
4356 h->type == STT_FUNC ? "function" : "data",
4357 h->root.root.string);
41bed6dd
L
4358 bfd_set_error (bfd_error_bad_value);
4359 return FALSE;
4360 }
90f487df
L
4361 }
4362
8c37241b
JJ
4363 /* Note that sgot is not involved in this
4364 calculation. We always want the start of .got.plt. If we
4365 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
252b5132
RH
4366 permitted by the ABI, we might have to change this
4367 calculation. */
6de2ae4a
L
4368 relocation -= htab->elf.sgotplt->output_section->vma
4369 + htab->elf.sgotplt->output_offset;
252b5132
RH
4370 break;
4371
4372 case R_386_GOTPC:
4373 /* Use global offset table as symbol value. */
6de2ae4a
L
4374 relocation = htab->elf.sgotplt->output_section->vma
4375 + htab->elf.sgotplt->output_offset;
b34976b6 4376 unresolved_reloc = FALSE;
252b5132
RH
4377 break;
4378
4379 case R_386_PLT32:
4380 /* Relocation is to the entry for this symbol in the
4381 procedure linkage table. */
4382
dd5724d5 4383 /* Resolve a PLT32 reloc against a local symbol directly,
83be169b 4384 without using the procedure linkage table. */
252b5132
RH
4385 if (h == NULL)
4386 break;
4387
dd7e64d4
L
4388 if ((h->plt.offset == (bfd_vma) -1
4389 && eh->plt_got.offset == (bfd_vma) -1)
6de2ae4a 4390 || htab->elf.splt == NULL)
252b5132
RH
4391 {
4392 /* We didn't make a PLT entry for this symbol. This
83be169b
AM
4393 happens when statically linking PIC code, or when
4394 using -Bsymbolic. */
252b5132
RH
4395 break;
4396 }
4397
dd7e64d4
L
4398 if (h->plt.offset != (bfd_vma) -1)
4399 {
4400 resolved_plt = htab->elf.splt;
4401 plt_offset = h->plt.offset;
4402 }
4403 else
4404 {
4405 resolved_plt = htab->plt_got;
4406 plt_offset = eh->plt_got.offset;
4407 }
4408
4409 relocation = (resolved_plt->output_section->vma
4410 + resolved_plt->output_offset
4411 + plt_offset);
b34976b6 4412 unresolved_reloc = FALSE;
252b5132
RH
4413 break;
4414
1788fc08 4415 case R_386_SIZE32:
1788fc08
L
4416 /* Set to symbol size. */
4417 relocation = st_size;
4418 /* Fall through. */
4419
252b5132
RH
4420 case R_386_32:
4421 case R_386_PC32:
3348747a
NS
4422 if ((input_section->flags & SEC_ALLOC) == 0
4423 || is_vxworks_tls)
ec338859
AM
4424 break;
4425
aec6b87e
L
4426 /* Copy dynamic function pointer relocations. Don't generate
4427 dynamic relocations against resolved undefined weak symbols
4428 in PIE, except for R_386_PC32. */
0e1862bb 4429 if ((bfd_link_pic (info)
ef5aade5 4430 && (h == NULL
aec6b87e
L
4431 || ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4432 && (!resolved_to_zero
4433 || r_type == R_386_PC32))
4434 || h->root.type != bfd_link_hash_undefweak))
1788fc08 4435 && ((r_type != R_386_PC32 && r_type != R_386_SIZE32)
f6c52c13 4436 || !SYMBOL_CALLS_LOCAL (info, h)))
a23b6845 4437 || (ELIMINATE_COPY_RELOCS
0e1862bb 4438 && !bfd_link_pic (info)
12d0ee4a
AM
4439 && h != NULL
4440 && h->dynindx != -1
aec6b87e
L
4441 && (!h->non_got_ref
4442 || eh->func_pointer_refcount > 0
4443 || (h->root.type == bfd_link_hash_undefweak
4444 && !resolved_to_zero))
bae420ef
L
4445 && ((h->def_dynamic && !h->def_regular)
4446 /* Undefined weak symbol is bound locally when
4447 PIC is false. */
4448 || h->root.type == bfd_link_hash_undefweak)))
252b5132 4449 {
947216bf 4450 Elf_Internal_Rela outrel;
b34976b6 4451 bfd_boolean skip, relocate;
0c715baa 4452 asection *sreloc;
252b5132
RH
4453
4454 /* When generating a shared object, these relocations
4455 are copied into the output file to be resolved at run
4456 time. */
4457
b34976b6
AM
4458 skip = FALSE;
4459 relocate = FALSE;
252b5132 4460
c629eae0
JJ
4461 outrel.r_offset =
4462 _bfd_elf_section_offset (output_bfd, info, input_section,
4463 rel->r_offset);
4464 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 4465 skip = TRUE;
0bb2d96a 4466 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 4467 skip = TRUE, relocate = TRUE;
252b5132
RH
4468 outrel.r_offset += (input_section->output_section->vma
4469 + input_section->output_offset);
4470
4471 if (skip)
0bb2d96a 4472 memset (&outrel, 0, sizeof outrel);
5a15f56f
AM
4473 else if (h != NULL
4474 && h->dynindx != -1
4475 && (r_type == R_386_PC32
4e0c91e4
L
4476 || !(bfd_link_executable (info)
4477 || SYMBOLIC_BIND (info, h))
f5385ebf 4478 || !h->def_regular))
0bb2d96a 4479 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
252b5132
RH
4480 else
4481 {
5a15f56f 4482 /* This symbol is local, or marked to become local. */
b34976b6 4483 relocate = TRUE;
5a15f56f 4484 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
252b5132
RH
4485 }
4486
cbe950e9 4487 sreloc = elf_section_data (input_section)->sreloc;
e7c33416 4488
62d78908
L
4489 if (sreloc == NULL || sreloc->contents == NULL)
4490 {
4491 r = bfd_reloc_notsupported;
4492 goto check_relocation_error;
4493 }
0c715baa 4494
59d6ffb2 4495 elf_append_rel (output_bfd, sreloc, &outrel);
252b5132
RH
4496
4497 /* If this reloc is against an external symbol, we do
4498 not want to fiddle with the addend. Otherwise, we
4499 need to include the symbol value so that it becomes
4500 an addend for the dynamic reloc. */
0f88be7a 4501 if (! relocate)
252b5132
RH
4502 continue;
4503 }
252b5132
RH
4504 break;
4505
37e55690 4506 case R_386_TLS_IE:
0e1862bb 4507 if (!bfd_link_executable (info))
37e55690 4508 {
947216bf 4509 Elf_Internal_Rela outrel;
37e55690 4510 asection *sreloc;
37e55690
JJ
4511
4512 outrel.r_offset = rel->r_offset
4513 + input_section->output_section->vma
4514 + input_section->output_offset;
4515 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
4516 sreloc = elf_section_data (input_section)->sreloc;
4517 if (sreloc == NULL)
4518 abort ();
59d6ffb2 4519 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690
JJ
4520 }
4521 /* Fall through */
4522
13ae64f3 4523 case R_386_TLS_GD:
67a4f2b7
AO
4524 case R_386_TLS_GOTDESC:
4525 case R_386_TLS_DESC_CALL:
13ae64f3 4526 case R_386_TLS_IE_32:
37e55690 4527 case R_386_TLS_GOTIE:
13ae64f3
JJ
4528 tls_type = GOT_UNKNOWN;
4529 if (h == NULL && local_got_offsets)
4530 tls_type = elf_i386_local_got_tls_type (input_bfd) [r_symndx];
4531 else if (h != NULL)
142411ca 4532 tls_type = elf_i386_hash_entry(h)->tls_type;
37e55690
JJ
4533 if (tls_type == GOT_TLS_IE)
4534 tls_type = GOT_TLS_IE_NEG;
142411ca
L
4535
4536 if (! elf_i386_tls_transition (info, input_bfd,
4537 input_section, contents,
4538 symtab_hdr, sym_hashes,
4539 &r_type, tls_type, rel,
bedfd056 4540 relend, h, r_symndx, TRUE))
142411ca 4541 return FALSE;
13ae64f3
JJ
4542
4543 if (r_type == R_386_TLS_LE_32)
4544 {
82e51918 4545 BFD_ASSERT (! unresolved_reloc);
13ae64f3
JJ
4546 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
4547 {
142411ca 4548 unsigned int type;
13ae64f3
JJ
4549 bfd_vma roff;
4550
4551 /* GD->LE transition. */
6eaa7fb5 4552 type = *(contents + rel->r_offset - 2);
13ae64f3
JJ
4553 if (type == 0x04)
4554 {
6eaa7fb5
L
4555 /* Change
4556 leal foo@tlsgd(,%ebx,1), %eax
4557 call ___tls_get_addr@PLT
4558 into:
4559 movl %gs:0, %eax
4560 subl $foo@tpoff, %eax
13ae64f3 4561 (6 byte form of subl). */
142411ca 4562 roff = rel->r_offset + 5;
13ae64f3
JJ
4563 }
4564 else
4565 {
6eaa7fb5
L
4566 /* Change
4567 leal foo@tlsgd(%ebx), %eax
4568 call ___tls_get_addr@PLT
4569 nop
4570 or
4571 leal foo@tlsgd(%reg), %eax
4572 call *___tls_get_addr@GOT(%reg)
4573 which may be converted to
4574 addr32 call ___tls_get_addr
4575 into:
4576 movl %gs:0, %eax; subl $foo@tpoff, %eax
142411ca 4577 (6 byte form of subl). */
142411ca 4578 roff = rel->r_offset + 6;
13ae64f3 4579 }
6eaa7fb5
L
4580 memcpy (contents + roff - 8,
4581 "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
eb4ff4d6 4582 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
13ae64f3 4583 contents + roff);
6eaa7fb5 4584 /* Skip R_386_PC32, R_386_PLT32 and R_386_GOT32X. */
13ae64f3 4585 rel++;
60f2e42e 4586 wrel++;
13ae64f3
JJ
4587 continue;
4588 }
67a4f2b7
AO
4589 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
4590 {
4591 /* GDesc -> LE transition.
4592 It's originally something like:
4593 leal x@tlsdesc(%ebx), %eax
4594
4595 leal x@ntpoff, %eax
4596
4597 Registers other than %eax may be set up here. */
4598
142411ca 4599 unsigned int val;
67a4f2b7
AO
4600 bfd_vma roff;
4601
67a4f2b7 4602 roff = rel->r_offset;
67a4f2b7 4603 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO
4604
4605 /* Now modify the instruction as appropriate. */
4606 /* aoliva FIXME: remove the above and xor the byte
4607 below with 0x86. */
4608 bfd_put_8 (output_bfd, val ^ 0x86,
4609 contents + roff - 1);
eb4ff4d6 4610 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
67a4f2b7
AO
4611 contents + roff);
4612 continue;
4613 }
4614 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
4615 {
4616 /* GDesc -> LE transition.
4617 It's originally:
4618 call *(%eax)
4619 Turn it into:
142411ca 4620 xchg %ax,%ax */
67a4f2b7 4621
67a4f2b7 4622 bfd_vma roff;
6bbec505 4623
67a4f2b7 4624 roff = rel->r_offset;
10efb593 4625 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO
4626 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
4627 continue;
4628 }
37e55690 4629 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_IE)
13ae64f3 4630 {
142411ca 4631 unsigned int val;
13ae64f3
JJ
4632
4633 /* IE->LE transition:
37e55690
JJ
4634 Originally it can be one of:
4635 movl foo, %eax
4636 movl foo, %reg
4637 addl foo, %reg
4638 We change it into:
4639 movl $foo, %eax
4640 movl $foo, %reg
4641 addl $foo, %reg. */
37e55690 4642 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
37e55690
JJ
4643 if (val == 0xa1)
4644 {
4645 /* movl foo, %eax. */
55fd94b0
AM
4646 bfd_put_8 (output_bfd, 0xb8,
4647 contents + rel->r_offset - 1);
37e55690 4648 }
299bf759 4649 else
37e55690 4650 {
142411ca
L
4651 unsigned int type;
4652
55fd94b0
AM
4653 type = bfd_get_8 (input_bfd,
4654 contents + rel->r_offset - 2);
299bf759 4655 switch (type)
26e41594 4656 {
299bf759
L
4657 case 0x8b:
4658 /* movl */
299bf759
L
4659 bfd_put_8 (output_bfd, 0xc7,
4660 contents + rel->r_offset - 2);
4661 bfd_put_8 (output_bfd,
4662 0xc0 | ((val >> 3) & 7),
4663 contents + rel->r_offset - 1);
4664 break;
4665 case 0x03:
4666 /* addl */
299bf759
L
4667 bfd_put_8 (output_bfd, 0x81,
4668 contents + rel->r_offset - 2);
4669 bfd_put_8 (output_bfd,
4670 0xc0 | ((val >> 3) & 7),
4671 contents + rel->r_offset - 1);
4672 break;
4673 default:
4674 BFD_FAIL ();
4675 break;
26e41594 4676 }
37e55690 4677 }
eb4ff4d6 4678 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ
4679 contents + rel->r_offset);
4680 continue;
4681 }
4682 else
4683 {
4684 unsigned int val, type;
4685
4686 /* {IE_32,GOTIE}->LE transition:
4687 Originally it can be one of:
13ae64f3 4688 subl foo(%reg1), %reg2
13ae64f3 4689 movl foo(%reg1), %reg2
37e55690 4690 addl foo(%reg1), %reg2
13ae64f3
JJ
4691 We change it into:
4692 subl $foo, %reg2
37e55690
JJ
4693 movl $foo, %reg2 (6 byte form)
4694 addl $foo, %reg2. */
13ae64f3
JJ
4695 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
4696 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
13ae64f3
JJ
4697 if (type == 0x8b)
4698 {
4699 /* movl */
13ae64f3
JJ
4700 bfd_put_8 (output_bfd, 0xc7,
4701 contents + rel->r_offset - 2);
4702 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
4703 contents + rel->r_offset - 1);
4704 }
4705 else if (type == 0x2b)
4706 {
4707 /* subl */
13ae64f3
JJ
4708 bfd_put_8 (output_bfd, 0x81,
4709 contents + rel->r_offset - 2);
4710 bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7),
4711 contents + rel->r_offset - 1);
4712 }
37e55690
JJ
4713 else if (type == 0x03)
4714 {
4715 /* addl */
4716 bfd_put_8 (output_bfd, 0x81,
4717 contents + rel->r_offset - 2);
4718 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
4719 contents + rel->r_offset - 1);
4720 }
13ae64f3
JJ
4721 else
4722 BFD_FAIL ();
37e55690 4723 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTIE)
eb4ff4d6 4724 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ
4725 contents + rel->r_offset);
4726 else
eb4ff4d6 4727 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
37e55690 4728 contents + rel->r_offset);
13ae64f3
JJ
4729 continue;
4730 }
4731 }
4732
6de2ae4a 4733 if (htab->elf.sgot == NULL)
13ae64f3
JJ
4734 abort ();
4735
4736 if (h != NULL)
67a4f2b7
AO
4737 {
4738 off = h->got.offset;
4739 offplt = elf_i386_hash_entry (h)->tlsdesc_got;
4740 }
13ae64f3
JJ
4741 else
4742 {
4743 if (local_got_offsets == NULL)
4744 abort ();
4745
4746 off = local_got_offsets[r_symndx];
67a4f2b7 4747 offplt = local_tlsdesc_gotents[r_symndx];
13ae64f3
JJ
4748 }
4749
4750 if ((off & 1) != 0)
4751 off &= ~1;
26e41594 4752 else
13ae64f3 4753 {
947216bf 4754 Elf_Internal_Rela outrel;
91d6fa6a 4755 int dr_type;
67a4f2b7 4756 asection *sreloc;
13ae64f3 4757
6de2ae4a 4758 if (htab->elf.srelgot == NULL)
13ae64f3
JJ
4759 abort ();
4760
67a4f2b7
AO
4761 indx = h && h->dynindx != -1 ? h->dynindx : 0;
4762
4763 if (GOT_TLS_GDESC_P (tls_type))
4764 {
59d6ffb2 4765 bfd_byte *loc;
67a4f2b7
AO
4766 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC);
4767 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8
6de2ae4a
L
4768 <= htab->elf.sgotplt->size);
4769 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
4770 + htab->elf.sgotplt->output_offset
67a4f2b7
AO
4771 + offplt
4772 + htab->sgotplt_jump_table_size);
6de2ae4a 4773 sreloc = htab->elf.srelplt;
67a4f2b7 4774 loc = sreloc->contents;
5ae0bfb6
RS
4775 loc += (htab->next_tls_desc_index++
4776 * sizeof (Elf32_External_Rel));
67a4f2b7 4777 BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
c3b02097 4778 <= sreloc->contents + sreloc->size);
67a4f2b7
AO
4779 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
4780 if (indx == 0)
4781 {
4782 BFD_ASSERT (! unresolved_reloc);
4783 bfd_put_32 (output_bfd,
eb4ff4d6 4784 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 4785 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO
4786 + htab->sgotplt_jump_table_size + 4);
4787 }
4788 else
4789 {
4790 bfd_put_32 (output_bfd, 0,
6de2ae4a 4791 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO
4792 + htab->sgotplt_jump_table_size + 4);
4793 }
4794 }
4795
6de2ae4a 4796 sreloc = htab->elf.srelgot;
67a4f2b7 4797
6de2ae4a
L
4798 outrel.r_offset = (htab->elf.sgot->output_section->vma
4799 + htab->elf.sgot->output_offset + off);
13ae64f3 4800
67a4f2b7 4801 if (GOT_TLS_GD_P (tls_type))
13ae64f3 4802 dr_type = R_386_TLS_DTPMOD32;
67a4f2b7
AO
4803 else if (GOT_TLS_GDESC_P (tls_type))
4804 goto dr_done;
37e55690
JJ
4805 else if (tls_type == GOT_TLS_IE_POS)
4806 dr_type = R_386_TLS_TPOFF;
13ae64f3
JJ
4807 else
4808 dr_type = R_386_TLS_TPOFF32;
67a4f2b7 4809
37e55690 4810 if (dr_type == R_386_TLS_TPOFF && indx == 0)
eb4ff4d6
L
4811 bfd_put_32 (output_bfd,
4812 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 4813 htab->elf.sgot->contents + off);
37e55690 4814 else if (dr_type == R_386_TLS_TPOFF32 && indx == 0)
23209a78 4815 bfd_put_32 (output_bfd,
eb4ff4d6 4816 elf_i386_dtpoff_base (info) - relocation,
6de2ae4a 4817 htab->elf.sgot->contents + off);
67a4f2b7 4818 else if (dr_type != R_386_TLS_DESC)
c366c25e 4819 bfd_put_32 (output_bfd, 0,
6de2ae4a 4820 htab->elf.sgot->contents + off);
13ae64f3 4821 outrel.r_info = ELF32_R_INFO (indx, dr_type);
67a4f2b7 4822
59d6ffb2 4823 elf_append_rel (output_bfd, sreloc, &outrel);
13ae64f3 4824
67a4f2b7 4825 if (GOT_TLS_GD_P (tls_type))
13ae64f3
JJ
4826 {
4827 if (indx == 0)
4828 {
82e51918 4829 BFD_ASSERT (! unresolved_reloc);
13ae64f3 4830 bfd_put_32 (output_bfd,
eb4ff4d6 4831 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 4832 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ
4833 }
4834 else
4835 {
4836 bfd_put_32 (output_bfd, 0,
6de2ae4a 4837 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ
4838 outrel.r_info = ELF32_R_INFO (indx,
4839 R_386_TLS_DTPOFF32);
4840 outrel.r_offset += 4;
59d6ffb2 4841 elf_append_rel (output_bfd, sreloc, &outrel);
13ae64f3
JJ
4842 }
4843 }
37e55690
JJ
4844 else if (tls_type == GOT_TLS_IE_BOTH)
4845 {
4846 bfd_put_32 (output_bfd,
eb4ff4d6
L
4847 (indx == 0
4848 ? relocation - elf_i386_dtpoff_base (info)
4849 : 0),
6de2ae4a 4850 htab->elf.sgot->contents + off + 4);
37e55690
JJ
4851 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
4852 outrel.r_offset += 4;
59d6ffb2 4853 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690 4854 }
13ae64f3 4855
67a4f2b7 4856 dr_done:
13ae64f3
JJ
4857 if (h != NULL)
4858 h->got.offset |= 1;
4859 else
4860 local_got_offsets[r_symndx] |= 1;
4861 }
4862
67a4f2b7
AO
4863 if (off >= (bfd_vma) -2
4864 && ! GOT_TLS_GDESC_P (tls_type))
13ae64f3 4865 abort ();
67a4f2b7
AO
4866 if (r_type == R_386_TLS_GOTDESC
4867 || r_type == R_386_TLS_DESC_CALL)
4868 {
4869 relocation = htab->sgotplt_jump_table_size + offplt;
4870 unresolved_reloc = FALSE;
4871 }
4872 else if (r_type == ELF32_R_TYPE (rel->r_info))
13ae64f3 4873 {
6de2ae4a
L
4874 bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma
4875 + htab->elf.sgotplt->output_offset;
4876 relocation = htab->elf.sgot->output_section->vma
4877 + htab->elf.sgot->output_offset + off - g_o_t;
37e55690
JJ
4878 if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE)
4879 && tls_type == GOT_TLS_IE_BOTH)
4880 relocation += 4;
4881 if (r_type == R_386_TLS_IE)
8c37241b 4882 relocation += g_o_t;
b34976b6 4883 unresolved_reloc = FALSE;
13ae64f3 4884 }
67a4f2b7 4885 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
13ae64f3
JJ
4886 {
4887 unsigned int val, type;
4888 bfd_vma roff;
4889
4890 /* GD->IE transition. */
6eaa7fb5
L
4891 type = *(contents + rel->r_offset - 2);
4892 val = *(contents + rel->r_offset - 1);
13ae64f3
JJ
4893 if (type == 0x04)
4894 {
6eaa7fb5
L
4895 /* Change
4896 leal foo@tlsgd(,%ebx,1), %eax
4897 call ___tls_get_addr@PLT
4898 into:
4899 movl %gs:0, %eax
4900 subl $foo@gottpoff(%ebx), %eax. */
13ae64f3 4901 val >>= 3;
142411ca 4902 roff = rel->r_offset - 3;
13ae64f3
JJ
4903 }
4904 else
4905 {
6eaa7fb5
L
4906 /* Change
4907 leal foo@tlsgd(%ebx), %eax
4908 call ___tls_get_addr@PLT
4909 nop
4910 or
4911 leal foo@tlsgd(%reg), %eax
4912 call *___tls_get_addr@GOT(%reg)
4913 which may be converted to
4914 addr32 call ___tls_get_addr
4915 into:
4916 movl %gs:0, %eax;
4917 subl $foo@gottpoff(%reg), %eax. */
13ae64f3
JJ
4918 roff = rel->r_offset - 2;
4919 }
4920 memcpy (contents + roff,
4921 "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12);
4922 contents[roff + 7] = 0x80 | (val & 7);
37e55690
JJ
4923 /* If foo is used only with foo@gotntpoff(%reg) and
4924 foo@indntpoff, but not with foo@gottpoff(%reg), change
4925 subl $foo@gottpoff(%reg), %eax
4926 into:
4927 addl $foo@gotntpoff(%reg), %eax. */
ebcfb3c0
JJ
4928 if (tls_type == GOT_TLS_IE_POS)
4929 contents[roff + 6] = 0x03;
8c37241b 4930 bfd_put_32 (output_bfd,
6de2ae4a
L
4931 htab->elf.sgot->output_section->vma
4932 + htab->elf.sgot->output_offset + off
4933 - htab->elf.sgotplt->output_section->vma
4934 - htab->elf.sgotplt->output_offset,
13ae64f3 4935 contents + roff + 8);
6eaa7fb5 4936 /* Skip R_386_PLT32 and R_386_GOT32X. */
13ae64f3 4937 rel++;
60f2e42e 4938 wrel++;
13ae64f3
JJ
4939 continue;
4940 }
67a4f2b7
AO
4941 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
4942 {
4943 /* GDesc -> IE transition.
4944 It's originally something like:
4945 leal x@tlsdesc(%ebx), %eax
4946
4947 Change it to:
142411ca 4948 movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax
67a4f2b7
AO
4949 or:
4950 movl x@gottpoff(%ebx), %eax # before negl %eax
4951
4952 Registers other than %eax may be set up here. */
4953
67a4f2b7
AO
4954 bfd_vma roff;
4955
4956 /* First, make sure it's a leal adding ebx to a 32-bit
4957 offset into any register, although it's probably
4958 almost always going to be eax. */
4959 roff = rel->r_offset;
67a4f2b7
AO
4960
4961 /* Now modify the instruction as appropriate. */
4962 /* To turn a leal into a movl in the form we use it, it
4963 suffices to change the first byte from 0x8d to 0x8b.
4964 aoliva FIXME: should we decide to keep the leal, all
4965 we have to do is remove the statement below, and
4966 adjust the relaxation of R_386_TLS_DESC_CALL. */
4967 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
4968
4969 if (tls_type == GOT_TLS_IE_BOTH)
4970 off += 4;
4971
4972 bfd_put_32 (output_bfd,
6de2ae4a
L
4973 htab->elf.sgot->output_section->vma
4974 + htab->elf.sgot->output_offset + off
4975 - htab->elf.sgotplt->output_section->vma
4976 - htab->elf.sgotplt->output_offset,
67a4f2b7
AO
4977 contents + roff);
4978 continue;
4979 }
4980 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
4981 {
4982 /* GDesc -> IE transition.
4983 It's originally:
4984 call *(%eax)
4985
4986 Change it to:
142411ca 4987 xchg %ax,%ax
67a4f2b7
AO
4988 or
4989 negl %eax
4990 depending on how we transformed the TLS_GOTDESC above.
4991 */
4992
67a4f2b7
AO
4993 bfd_vma roff;
4994
67a4f2b7 4995 roff = rel->r_offset;
67a4f2b7
AO
4996
4997 /* Now modify the instruction as appropriate. */
4998 if (tls_type != GOT_TLS_IE_NEG)
4999 {
10efb593
L
5000 /* xchg %ax,%ax */
5001 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO
5002 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
5003 }
5004 else
5005 {
5006 /* negl %eax */
5007 bfd_put_8 (output_bfd, 0xf7, contents + roff);
5008 bfd_put_8 (output_bfd, 0xd8, contents + roff + 1);
5009 }
5010
5011 continue;
5012 }
5013 else
5014 BFD_ASSERT (FALSE);
13ae64f3
JJ
5015 break;
5016
5017 case R_386_TLS_LDM:
142411ca
L
5018 if (! elf_i386_tls_transition (info, input_bfd,
5019 input_section, contents,
5020 symtab_hdr, sym_hashes,
5021 &r_type, GOT_UNKNOWN, rel,
bedfd056 5022 relend, h, r_symndx, TRUE))
142411ca 5023 return FALSE;
13ae64f3 5024
142411ca
L
5025 if (r_type != R_386_TLS_LDM)
5026 {
6eaa7fb5
L
5027 /* LD->LE transition. Change
5028 leal foo@tlsldm(%ebx) %eax
5029 call ___tls_get_addr@PLT
5030 into:
5031 movl %gs:0, %eax
5032 nop
5033 leal 0(%esi,1), %esi
5034 or change
5035 leal foo@tlsldm(%reg) %eax
5036 call *___tls_get_addr@GOT(%reg)
5037 which may be converted to
5038 addr32 call ___tls_get_addr
5039 into:
5040 movl %gs:0, %eax
5041 leal 0(%esi), %esi */
142411ca 5042 BFD_ASSERT (r_type == R_386_TLS_LE_32);
6eaa7fb5
L
5043 if (*(contents + rel->r_offset + 4) == 0xff
5044 || *(contents + rel->r_offset + 4) == 0x67)
5045 memcpy (contents + rel->r_offset - 2,
5046 "\x65\xa1\0\0\0\0\x8d\xb6\0\0\0", 12);
5047 else
5048 memcpy (contents + rel->r_offset - 2,
5049 "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11);
a3fadc9a 5050 /* Skip R_386_PC32/R_386_PLT32. */
13ae64f3 5051 rel++;
60f2e42e 5052 wrel++;
13ae64f3
JJ
5053 continue;
5054 }
5055
6de2ae4a 5056 if (htab->elf.sgot == NULL)
13ae64f3
JJ
5057 abort ();
5058
5059 off = htab->tls_ldm_got.offset;
5060 if (off & 1)
5061 off &= ~1;
5062 else
5063 {
947216bf 5064 Elf_Internal_Rela outrel;
13ae64f3 5065
6de2ae4a 5066 if (htab->elf.srelgot == NULL)
13ae64f3
JJ
5067 abort ();
5068
6de2ae4a
L
5069 outrel.r_offset = (htab->elf.sgot->output_section->vma
5070 + htab->elf.sgot->output_offset + off);
13ae64f3
JJ
5071
5072 bfd_put_32 (output_bfd, 0,
6de2ae4a 5073 htab->elf.sgot->contents + off);
13ae64f3 5074 bfd_put_32 (output_bfd, 0,
6de2ae4a 5075 htab->elf.sgot->contents + off + 4);
13ae64f3 5076 outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32);
59d6ffb2 5077 elf_append_rel (output_bfd, htab->elf.srelgot, &outrel);
13ae64f3
JJ
5078 htab->tls_ldm_got.offset |= 1;
5079 }
6de2ae4a
L
5080 relocation = htab->elf.sgot->output_section->vma
5081 + htab->elf.sgot->output_offset + off
5082 - htab->elf.sgotplt->output_section->vma
5083 - htab->elf.sgotplt->output_offset;
b34976b6 5084 unresolved_reloc = FALSE;
13ae64f3
JJ
5085 break;
5086
5087 case R_386_TLS_LDO_32:
0e1862bb
L
5088 if (!bfd_link_executable (info)
5089 || (input_section->flags & SEC_CODE) == 0)
eb4ff4d6 5090 relocation -= elf_i386_dtpoff_base (info);
13ae64f3
JJ
5091 else
5092 /* When converting LDO to LE, we must negate. */
eb4ff4d6 5093 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ
5094 break;
5095
5096 case R_386_TLS_LE_32:
13ae64f3 5097 case R_386_TLS_LE:
0e1862bb 5098 if (!bfd_link_executable (info))
37e55690 5099 {
947216bf 5100 Elf_Internal_Rela outrel;
37e55690 5101 asection *sreloc;
37e55690
JJ
5102
5103 outrel.r_offset = rel->r_offset
5104 + input_section->output_section->vma
5105 + input_section->output_offset;
5106 if (h != NULL && h->dynindx != -1)
5107 indx = h->dynindx;
5108 else
5109 indx = 0;
5110 if (r_type == R_386_TLS_LE_32)
5111 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32);
5112 else
5113 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
5114 sreloc = elf_section_data (input_section)->sreloc;
5115 if (sreloc == NULL)
5116 abort ();
59d6ffb2 5117 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690
JJ
5118 if (indx)
5119 continue;
5120 else if (r_type == R_386_TLS_LE_32)
eb4ff4d6 5121 relocation = elf_i386_dtpoff_base (info) - relocation;
37e55690 5122 else
eb4ff4d6 5123 relocation -= elf_i386_dtpoff_base (info);
37e55690
JJ
5124 }
5125 else if (r_type == R_386_TLS_LE_32)
eb4ff4d6 5126 relocation = elf_i386_tpoff (info, relocation);
37e55690 5127 else
eb4ff4d6 5128 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ
5129 break;
5130
252b5132
RH
5131 default:
5132 break;
5133 }
5134
239e1f3a
AM
5135 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
5136 because such sections are not SEC_ALLOC and thus ld.so will
5137 not process them. */
8c694914 5138 if (unresolved_reloc
239e1f3a 5139 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM
5140 && h->def_dynamic)
5141 && _bfd_elf_section_offset (output_bfd, info, input_section,
5142 rel->r_offset) != (bfd_vma) -1)
6a30718d 5143 {
4eca0228 5144 _bfd_error_handler
843fe662 5145 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
d003868e
AM
5146 input_bfd,
5147 input_section,
6a30718d 5148 (long) rel->r_offset,
843fe662 5149 howto->name,
6a30718d 5150 h->root.root.string);
b34976b6 5151 return FALSE;
6a30718d 5152 }
83be169b 5153
cbe950e9 5154do_relocation:
252b5132
RH
5155 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
5156 contents, rel->r_offset,
55fd94b0 5157 relocation, 0);
252b5132 5158
62d78908 5159check_relocation_error:
cf5c0c5b 5160 if (r != bfd_reloc_ok)
252b5132 5161 {
cf5c0c5b 5162 const char *name;
ffb2e45b 5163
cf5c0c5b
AM
5164 if (h != NULL)
5165 name = h->root.root.string;
5166 else
5167 {
5168 name = bfd_elf_string_from_elf_section (input_bfd,
5169 symtab_hdr->sh_link,
5170 sym->st_name);
5171 if (name == NULL)
b34976b6 5172 return FALSE;
cf5c0c5b
AM
5173 if (*name == '\0')
5174 name = bfd_section_name (input_bfd, sec);
5175 }
ffb2e45b 5176
cf5c0c5b 5177 if (r == bfd_reloc_overflow)
1a72702b
AM
5178 (*info->callbacks->reloc_overflow)
5179 (info, (h ? &h->root : NULL), name, howto->name,
5180 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
cf5c0c5b
AM
5181 else
5182 {
4eca0228 5183 _bfd_error_handler
d003868e
AM
5184 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
5185 input_bfd, input_section,
cf5c0c5b 5186 (long) rel->r_offset, name, (int) r);
b34976b6 5187 return FALSE;
cf5c0c5b 5188 }
252b5132 5189 }
60f2e42e
L
5190
5191 if (wrel != rel)
5192 *wrel = *rel;
5193 }
5194
5195 if (wrel != rel)
5196 {
5197 Elf_Internal_Shdr *rel_hdr;
5198 size_t deleted = rel - wrel;
5199
5200 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
5201 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5202 if (rel_hdr->sh_size == 0)
5203 {
5204 /* It is too late to remove an empty reloc section. Leave
5205 one NONE reloc.
5206 ??? What is wrong with an empty section??? */
5207 rel_hdr->sh_size = rel_hdr->sh_entsize;
5208 deleted -= 1;
5209 }
5210 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
5211 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5212 input_section->reloc_count -= deleted;
252b5132
RH
5213 }
5214
b34976b6 5215 return TRUE;
252b5132
RH
5216}
5217
5218/* Finish up dynamic symbol handling. We set the contents of various
5219 dynamic sections here. */
5220
b34976b6 5221static bfd_boolean
55fd94b0
AM
5222elf_i386_finish_dynamic_symbol (bfd *output_bfd,
5223 struct bfd_link_info *info,
5224 struct elf_link_hash_entry *h,
5225 Elf_Internal_Sym *sym)
252b5132 5226{
6725bdbf 5227 struct elf_i386_link_hash_table *htab;
25e762b9
RM
5228 unsigned plt_entry_size;
5229 const struct elf_i386_backend_data *abed;
dd7e64d4 5230 struct elf_i386_link_hash_entry *eh;
aec6b87e 5231 bfd_boolean local_undefweak;
252b5132 5232
6725bdbf 5233 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
5234 if (htab == NULL)
5235 return FALSE;
252b5132 5236
25e762b9
RM
5237 abed = get_elf_i386_backend_data (output_bfd);
5238 plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd);
5239
dd7e64d4
L
5240 eh = (struct elf_i386_link_hash_entry *) h;
5241
aec6b87e
L
5242 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
5243 resolved undefined weak symbols in executable so that their
5244 references have value 0 at run-time. */
e62b9723
L
5245 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
5246 eh->has_got_reloc,
5247 eh);
aec6b87e 5248
252b5132
RH
5249 if (h->plt.offset != (bfd_vma) -1)
5250 {
252b5132
RH
5251 bfd_vma plt_index;
5252 bfd_vma got_offset;
947216bf
AM
5253 Elf_Internal_Rela rel;
5254 bfd_byte *loc;
cbe950e9
L
5255 asection *plt, *gotplt, *relplt;
5256
5257 /* When building a static executable, use .iplt, .igot.plt and
5258 .rel.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 5259 if (htab->elf.splt != NULL)
cbe950e9 5260 {
6de2ae4a
L
5261 plt = htab->elf.splt;
5262 gotplt = htab->elf.sgotplt;
5263 relplt = htab->elf.srelplt;
cbe950e9
L
5264 }
5265 else
5266 {
6de2ae4a
L
5267 plt = htab->elf.iplt;
5268 gotplt = htab->elf.igotplt;
5269 relplt = htab->elf.irelplt;
cbe950e9 5270 }
252b5132
RH
5271
5272 /* This symbol has an entry in the procedure linkage table. Set
5273 it up. */
5274
cbe950e9 5275 if ((h->dynindx == -1
aec6b87e 5276 && !local_undefweak
0e1862bb 5277 && !((h->forced_local || bfd_link_executable (info))
cbe950e9
L
5278 && h->def_regular
5279 && h->type == STT_GNU_IFUNC))
5280 || plt == NULL
5281 || gotplt == NULL
5282 || relplt == NULL)
cec7f46a 5283 abort ();
252b5132
RH
5284
5285 /* Get the index in the procedure linkage table which
5286 corresponds to this symbol. This is the index of this symbol
5287 in all the symbols for which we are making plt entries. The
cbe950e9 5288 first entry in the procedure linkage table is reserved.
252b5132 5289
cbe950e9 5290 Get the offset into the .got table of the entry that
252b5132 5291 corresponds to this function. Each .got entry is 4 bytes.
cbe950e9 5292 The first three are reserved.
6bbec505 5293
cbe950e9
L
5294 For static executables, we don't reserve anything. */
5295
6de2ae4a 5296 if (plt == htab->elf.splt)
cbe950e9 5297 {
e1f98742
L
5298 got_offset = h->plt.offset / plt_entry_size - 1;
5299 got_offset = (got_offset + 3) * 4;
cbe950e9
L
5300 }
5301 else
5302 {
e1f98742
L
5303 got_offset = h->plt.offset / plt_entry_size;
5304 got_offset = got_offset * 4;
cbe950e9 5305 }
252b5132
RH
5306
5307 /* Fill in the entry in the procedure linkage table. */
0e1862bb 5308 if (! bfd_link_pic (info))
252b5132 5309 {
25e762b9
RM
5310 memcpy (plt->contents + h->plt.offset, abed->plt->plt_entry,
5311 abed->plt->plt_entry_size);
252b5132 5312 bfd_put_32 (output_bfd,
cbe950e9
L
5313 (gotplt->output_section->vma
5314 + gotplt->output_offset
252b5132 5315 + got_offset),
25e762b9
RM
5316 plt->contents + h->plt.offset
5317 + abed->plt->plt_got_offset);
eac338cf 5318
25e762b9 5319 if (abed->is_vxworks)
eac338cf
PB
5320 {
5321 int s, k, reloc_index;
5322
5323 /* Create the R_386_32 relocation referencing the GOT
5324 for this PLT entry. */
5325
5326 /* S: Current slot number (zero-based). */
25e762b9
RM
5327 s = ((h->plt.offset - abed->plt->plt_entry_size)
5328 / abed->plt->plt_entry_size);
eac338cf 5329 /* K: Number of relocations for PLTResolve. */
0e1862bb 5330 if (bfd_link_pic (info))
eac338cf
PB
5331 k = PLTRESOLVE_RELOCS_SHLIB;
5332 else
5333 k = PLTRESOLVE_RELOCS;
5334 /* Skip the PLTresolve relocations, and the relocations for
5335 the other PLT slots. */
5336 reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS;
5337 loc = (htab->srelplt2->contents + reloc_index
5338 * sizeof (Elf32_External_Rel));
5339
6de2ae4a
L
5340 rel.r_offset = (htab->elf.splt->output_section->vma
5341 + htab->elf.splt->output_offset
eac338cf 5342 + h->plt.offset + 2),
7325306f 5343 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB
5344 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
5345
5346 /* Create the R_386_32 relocation referencing the beginning of
5347 the PLT for this GOT entry. */
6de2ae4a
L
5348 rel.r_offset = (htab->elf.sgotplt->output_section->vma
5349 + htab->elf.sgotplt->output_offset
eac338cf 5350 + got_offset);
7325306f 5351 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
eac338cf 5352 bfd_elf32_swap_reloc_out (output_bfd, &rel,
13ca3149 5353 loc + sizeof (Elf32_External_Rel));
eac338cf 5354 }
252b5132
RH
5355 }
5356 else
5357 {
25e762b9
RM
5358 memcpy (plt->contents + h->plt.offset, abed->plt->pic_plt_entry,
5359 abed->plt->plt_entry_size);
252b5132 5360 bfd_put_32 (output_bfd, got_offset,
25e762b9
RM
5361 plt->contents + h->plt.offset
5362 + abed->plt->plt_got_offset);
252b5132
RH
5363 }
5364
aec6b87e
L
5365 /* Fill in the entry in the global offset table. Leave the entry
5366 as zero for undefined weak symbol in PIE. No PLT relocation
5367 against undefined weak symbol in PIE. */
5368 if (!local_undefweak)
cbe950e9 5369 {
cbe950e9 5370 bfd_put_32 (output_bfd,
aec6b87e
L
5371 (plt->output_section->vma
5372 + plt->output_offset
5373 + h->plt.offset
5374 + abed->plt->plt_lazy_offset),
cbe950e9 5375 gotplt->contents + got_offset);
252b5132 5376
aec6b87e
L
5377 /* Fill in the entry in the .rel.plt section. */
5378 rel.r_offset = (gotplt->output_section->vma
5379 + gotplt->output_offset
5380 + got_offset);
5381 if (h->dynindx == -1
5382 || ((bfd_link_executable (info)
5383 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
5384 && h->def_regular
5385 && h->type == STT_GNU_IFUNC))
5386 {
5387 /* If an STT_GNU_IFUNC symbol is locally defined, generate
5388 R_386_IRELATIVE instead of R_386_JUMP_SLOT. Store addend
5389 in the .got.plt section. */
5390 bfd_put_32 (output_bfd,
5391 (h->root.u.def.value
5392 + h->root.u.def.section->output_section->vma
5393 + h->root.u.def.section->output_offset),
5394 gotplt->contents + got_offset);
5395 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
5396 /* R_386_IRELATIVE comes last. */
5397 plt_index = htab->next_irelative_index--;
5398 }
5399 else
5400 {
5401 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
5402 plt_index = htab->next_jump_slot_index++;
5403 }
5404
5405 loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel);
5406 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
5407
5408 /* Don't fill PLT entry for static executables. */
5409 if (plt == htab->elf.splt)
5410 {
5411 bfd_put_32 (output_bfd,
5412 plt_index * sizeof (Elf32_External_Rel),
5413 plt->contents + h->plt.offset
5414 + abed->plt->plt_reloc_offset);
5415 bfd_put_32 (output_bfd, - (h->plt.offset
5416 + abed->plt->plt_plt_offset + 4),
5417 plt->contents + h->plt.offset
5418 + abed->plt->plt_plt_offset);
5419 }
e1f98742 5420 }
dd7e64d4
L
5421 }
5422 else if (eh->plt_got.offset != (bfd_vma) -1)
5423 {
5424 bfd_vma got_offset, plt_offset;
5425 asection *plt, *got, *gotplt;
5426 const bfd_byte *got_plt_entry;
5427
5428 /* Offset of displacement of the indirect jump. */
5429 bfd_vma plt_got_offset = 2;
e1f98742 5430
dd7e64d4
L
5431 /* Set the entry in the GOT procedure linkage table. */
5432 plt = htab->plt_got;
5433 got = htab->elf.sgot;
5434 gotplt = htab->elf.sgotplt;
5435 got_offset = h->got.offset;
5436
5437 if (got_offset == (bfd_vma) -1
5438 || plt == NULL
5439 || got == NULL
5440 || gotplt == NULL)
5441 abort ();
5442
5443 /* Fill in the entry in the GOT procedure linkage table. */
0e1862bb 5444 if (! bfd_link_pic (info))
252b5132 5445 {
dd7e64d4
L
5446 got_plt_entry = elf_i386_got_plt_entry;
5447 got_offset += got->output_section->vma + got->output_offset;
252b5132 5448 }
dd7e64d4
L
5449 else
5450 {
5451 got_plt_entry = elf_i386_pic_got_plt_entry;
5452 got_offset += (got->output_section->vma
5453 + got->output_offset
5454 - gotplt->output_section->vma
5455 - gotplt->output_offset);
5456 }
5457
5458 plt_offset = eh->plt_got.offset;
5459 memcpy (plt->contents + plt_offset, got_plt_entry,
5460 sizeof (elf_i386_got_plt_entry));
5461 bfd_put_32 (output_bfd, got_offset,
5462 plt->contents + plt_offset + plt_got_offset);
5463 }
5464
aec6b87e
L
5465 if (!local_undefweak
5466 && !h->def_regular
dd7e64d4
L
5467 && (h->plt.offset != (bfd_vma) -1
5468 || eh->plt_got.offset != (bfd_vma) -1))
5469 {
5470 /* Mark the symbol as undefined, rather than as defined in
5471 the .plt section. Leave the value if there were any
5472 relocations where pointer equality matters (this is a clue
5473 for the dynamic linker, to make function pointer
5474 comparisons work between an application and shared
5475 library), otherwise set it to zero. If a function is only
5476 called from a binary, there is no need to slow down
5477 shared libraries because of that. */
5478 sym->st_shndx = SHN_UNDEF;
5479 if (!h->pointer_equality_needed)
5480 sym->st_value = 0;
252b5132
RH
5481 }
5482
aec6b87e
L
5483 /* Don't generate dynamic GOT relocation against undefined weak
5484 symbol in executable. */
13ae64f3 5485 if (h->got.offset != (bfd_vma) -1
67a4f2b7 5486 && ! GOT_TLS_GD_ANY_P (elf_i386_hash_entry(h)->tls_type)
aec6b87e
L
5487 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE) == 0
5488 && !local_undefweak)
252b5132 5489 {
947216bf 5490 Elf_Internal_Rela rel;
233cc9c1 5491 asection *relgot = htab->elf.srelgot;
252b5132
RH
5492
5493 /* This symbol has an entry in the global offset table. Set it
5494 up. */
5495
6de2ae4a 5496 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
ffb2e45b 5497 abort ();
252b5132 5498
6de2ae4a
L
5499 rel.r_offset = (htab->elf.sgot->output_section->vma
5500 + htab->elf.sgot->output_offset
dc810e39 5501 + (h->got.offset & ~(bfd_vma) 1));
252b5132 5502
dd5724d5
AM
5503 /* If this is a static link, or it is a -Bsymbolic link and the
5504 symbol is defined locally or was forced to be local because
5505 of a version file, we just want to emit a RELATIVE reloc.
252b5132
RH
5506 The entry in the global offset table will already have been
5507 initialized in the relocate_section function. */
710ab287 5508 if (h->def_regular
0018b0a3
L
5509 && h->type == STT_GNU_IFUNC)
5510 {
233cc9c1
L
5511 if (h->plt.offset == (bfd_vma) -1)
5512 {
5513 /* STT_GNU_IFUNC is referenced without PLT. */
5514 if (htab->elf.splt == NULL)
5515 {
5516 /* use .rel[a].iplt section to store .got relocations
5517 in static executable. */
5518 relgot = htab->elf.irelplt;
5519 }
5520 if (SYMBOL_REFERENCES_LOCAL (info, h))
5521 {
5522 bfd_put_32 (output_bfd,
5523 (h->root.u.def.value
5524 + h->root.u.def.section->output_section->vma
5525 + h->root.u.def.section->output_offset),
5526 htab->elf.sgot->contents + h->got.offset);
5527 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
5528 }
5529 else
5530 goto do_glob_dat;
5531 }
5532 else if (bfd_link_pic (info))
710ab287
L
5533 {
5534 /* Generate R_386_GLOB_DAT. */
5535 goto do_glob_dat;
5536 }
5537 else
5538 {
cd2b2c10
L
5539 asection *plt;
5540
710ab287
L
5541 if (!h->pointer_equality_needed)
5542 abort ();
5543
5544 /* For non-shared object, we can't use .got.plt, which
5545 contains the real function addres if we need pointer
5546 equality. We load the GOT entry with the PLT entry. */
cd2b2c10 5547 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
710ab287
L
5548 bfd_put_32 (output_bfd,
5549 (plt->output_section->vma
5550 + plt->output_offset + h->plt.offset),
6de2ae4a 5551 htab->elf.sgot->contents + h->got.offset);
710ab287
L
5552 return TRUE;
5553 }
0018b0a3 5554 }
0e1862bb 5555 else if (bfd_link_pic (info)
0018b0a3 5556 && SYMBOL_REFERENCES_LOCAL (info, h))
dd5724d5 5557 {
6725bdbf 5558 BFD_ASSERT((h->got.offset & 1) != 0);
dd5724d5
AM
5559 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
5560 }
252b5132
RH
5561 else
5562 {
dd5724d5 5563 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 5564do_glob_dat:
6725bdbf 5565 bfd_put_32 (output_bfd, (bfd_vma) 0,
6de2ae4a 5566 htab->elf.sgot->contents + h->got.offset);
252b5132
RH
5567 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
5568 }
5569
233cc9c1 5570 elf_append_rel (output_bfd, relgot, &rel);
252b5132
RH
5571 }
5572
f5385ebf 5573 if (h->needs_copy)
252b5132 5574 {
947216bf 5575 Elf_Internal_Rela rel;
252b5132
RH
5576
5577 /* This symbol needs a copy reloc. Set it up. */
5578
ffb2e45b
AM
5579 if (h->dynindx == -1
5580 || (h->root.type != bfd_link_hash_defined
5581 && h->root.type != bfd_link_hash_defweak)
5582 || htab->srelbss == NULL)
5583 abort ();
252b5132
RH
5584
5585 rel.r_offset = (h->root.u.def.value
5586 + h->root.u.def.section->output_section->vma
5587 + h->root.u.def.section->output_offset);
5588 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
59d6ffb2 5589 elf_append_rel (output_bfd, htab->srelbss, &rel);
252b5132
RH
5590 }
5591
b34976b6 5592 return TRUE;
252b5132
RH
5593}
5594
c25bc9fc
L
5595/* Finish up local dynamic symbol handling. We set the contents of
5596 various dynamic sections here. */
5597
5598static bfd_boolean
5599elf_i386_finish_local_dynamic_symbol (void **slot, void *inf)
5600{
5601 struct elf_link_hash_entry *h
5602 = (struct elf_link_hash_entry *) *slot;
5603 struct bfd_link_info *info
23209a78 5604 = (struct bfd_link_info *) inf;
c25bc9fc
L
5605
5606 return elf_i386_finish_dynamic_symbol (info->output_bfd, info,
5607 h, NULL);
5608}
5609
aec6b87e
L
5610/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
5611 here since undefined weak symbol may not be dynamic and may not be
5612 called for elf_i386_finish_dynamic_symbol. */
5613
5614static bfd_boolean
5615elf_i386_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
5616 void *inf)
5617{
5618 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
5619 struct bfd_link_info *info = (struct bfd_link_info *) inf;
5620
5621 if (h->root.type != bfd_link_hash_undefweak
5622 || h->dynindx != -1)
5623 return TRUE;
5624
5625 return elf_i386_finish_dynamic_symbol (info->output_bfd,
5626 info, h, NULL);
5627}
5628
38701953
AM
5629/* Used to decide how to sort relocs in an optimal manner for the
5630 dynamic linker, before writing them out. */
5631
5632static enum elf_reloc_type_class
cae1fbbb 5633elf_i386_reloc_type_class (const struct bfd_link_info *info,
7e612e98
AM
5634 const asection *rel_sec ATTRIBUTE_UNUSED,
5635 const Elf_Internal_Rela *rela)
38701953 5636{
cae1fbbb
L
5637 bfd *abfd = info->output_bfd;
5638 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
5639 struct elf_link_hash_table *htab = elf_hash_table (info);
cae1fbbb 5640
d9e3b590
L
5641 if (htab->dynsym != NULL
5642 && htab->dynsym->contents != NULL)
5643 {
5644 /* Check relocation against STT_GNU_IFUNC symbol if there are
5645 dynamic symbols. */
5646 unsigned long r_symndx = ELF32_R_SYM (rela->r_info);
c428ce9d
L
5647 if (r_symndx != STN_UNDEF)
5648 {
5649 Elf_Internal_Sym sym;
5650 if (!bed->s->swap_symbol_in (abfd,
5651 (htab->dynsym->contents
5652 + r_symndx * sizeof (Elf32_External_Sym)),
5653 0, &sym))
5654 abort ();
d9e3b590 5655
c428ce9d
L
5656 if (ELF32_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
5657 return reloc_class_ifunc;
5658 }
d9e3b590 5659 }
cae1fbbb 5660
55fd94b0 5661 switch (ELF32_R_TYPE (rela->r_info))
38701953 5662 {
c428ce9d
L
5663 case R_386_IRELATIVE:
5664 return reloc_class_ifunc;
38701953
AM
5665 case R_386_RELATIVE:
5666 return reloc_class_relative;
5667 case R_386_JUMP_SLOT:
5668 return reloc_class_plt;
5669 case R_386_COPY:
5670 return reloc_class_copy;
5671 default:
5672 return reloc_class_normal;
5673 }
5674}
5675
252b5132
RH
5676/* Finish up the dynamic sections. */
5677
b34976b6 5678static bfd_boolean
55fd94b0
AM
5679elf_i386_finish_dynamic_sections (bfd *output_bfd,
5680 struct bfd_link_info *info)
252b5132 5681{
6725bdbf 5682 struct elf_i386_link_hash_table *htab;
252b5132 5683 bfd *dynobj;
252b5132 5684 asection *sdyn;
25e762b9 5685 const struct elf_i386_backend_data *abed;
252b5132 5686
6725bdbf 5687 htab = elf_i386_hash_table (info);
4dfe6ac6
NC
5688 if (htab == NULL)
5689 return FALSE;
5690
ebe50bae 5691 dynobj = htab->elf.dynobj;
3d4d4302 5692 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
25e762b9 5693 abed = get_elf_i386_backend_data (output_bfd);
252b5132 5694
ebe50bae 5695 if (htab->elf.dynamic_sections_created)
252b5132 5696 {
252b5132
RH
5697 Elf32_External_Dyn *dyncon, *dynconend;
5698
6de2ae4a 5699 if (sdyn == NULL || htab->elf.sgot == NULL)
ffb2e45b 5700 abort ();
252b5132
RH
5701
5702 dyncon = (Elf32_External_Dyn *) sdyn->contents;
eea6121a 5703 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
252b5132
RH
5704 for (; dyncon < dynconend; dyncon++)
5705 {
5706 Elf_Internal_Dyn dyn;
51b64d56 5707 asection *s;
252b5132
RH
5708
5709 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
5710
5711 switch (dyn.d_tag)
5712 {
5713 default:
25e762b9
RM
5714 if (abed->is_vxworks
5715 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
7a2b07ff 5716 break;
0ac8d2ca 5717 continue;
252b5132
RH
5718
5719 case DT_PLTGOT:
6de2ae4a 5720 s = htab->elf.sgotplt;
8c37241b 5721 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
6725bdbf
AM
5722 break;
5723
252b5132 5724 case DT_JMPREL:
6de2ae4a 5725 s = htab->elf.srelplt;
6348e046 5726 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
252b5132
RH
5727 break;
5728
5729 case DT_PLTRELSZ:
6de2ae4a 5730 s = htab->elf.srelplt;
eea6121a 5731 dyn.d_un.d_val = s->size;
252b5132
RH
5732 break;
5733
5734 case DT_RELSZ:
5735 /* My reading of the SVR4 ABI indicates that the
5736 procedure linkage table relocs (DT_JMPREL) should be
5737 included in the overall relocs (DT_REL). This is
5738 what Solaris does. However, UnixWare can not handle
5739 that case. Therefore, we override the DT_RELSZ entry
6348e046 5740 here to make it not include the JMPREL relocs. */
6de2ae4a 5741 s = htab->elf.srelplt;
6348e046
AM
5742 if (s == NULL)
5743 continue;
eea6121a 5744 dyn.d_un.d_val -= s->size;
6348e046
AM
5745 break;
5746
5747 case DT_REL:
5748 /* We may not be using the standard ELF linker script.
5749 If .rel.plt is the first .rel section, we adjust
5750 DT_REL to not include it. */
6de2ae4a 5751 s = htab->elf.srelplt;
6348e046
AM
5752 if (s == NULL)
5753 continue;
5754 if (dyn.d_un.d_ptr != s->output_section->vma + s->output_offset)
5755 continue;
eea6121a 5756 dyn.d_un.d_ptr += s->size;
252b5132
RH
5757 break;
5758 }
0ac8d2ca
AM
5759
5760 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
252b5132
RH
5761 }
5762
5763 /* Fill in the first entry in the procedure linkage table. */
6de2ae4a 5764 if (htab->elf.splt && htab->elf.splt->size > 0)
252b5132 5765 {
0e1862bb 5766 if (bfd_link_pic (info))
eac338cf 5767 {
25e762b9
RM
5768 memcpy (htab->elf.splt->contents, abed->plt->pic_plt0_entry,
5769 abed->plt->plt0_entry_size);
5770 memset (htab->elf.splt->contents + abed->plt->plt0_entry_size,
5771 abed->plt0_pad_byte,
5772 abed->plt->plt_entry_size - abed->plt->plt0_entry_size);
eac338cf 5773 }
252b5132
RH
5774 else
5775 {
25e762b9
RM
5776 memcpy (htab->elf.splt->contents, abed->plt->plt0_entry,
5777 abed->plt->plt0_entry_size);
5778 memset (htab->elf.splt->contents + abed->plt->plt0_entry_size,
5779 abed->plt0_pad_byte,
5780 abed->plt->plt_entry_size - abed->plt->plt0_entry_size);
252b5132 5781 bfd_put_32 (output_bfd,
6de2ae4a
L
5782 (htab->elf.sgotplt->output_section->vma
5783 + htab->elf.sgotplt->output_offset
6725bdbf 5784 + 4),
25e762b9
RM
5785 htab->elf.splt->contents
5786 + abed->plt->plt0_got1_offset);
252b5132 5787 bfd_put_32 (output_bfd,
6de2ae4a
L
5788 (htab->elf.sgotplt->output_section->vma
5789 + htab->elf.sgotplt->output_offset
6725bdbf 5790 + 8),
25e762b9
RM
5791 htab->elf.splt->contents
5792 + abed->plt->plt0_got2_offset);
eac338cf 5793
25e762b9 5794 if (abed->is_vxworks)
eac338cf
PB
5795 {
5796 Elf_Internal_Rela rel;
7325306f 5797
eac338cf
PB
5798 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 4.
5799 On IA32 we use REL relocations so the addend goes in
5800 the PLT directly. */
6de2ae4a
L
5801 rel.r_offset = (htab->elf.splt->output_section->vma
5802 + htab->elf.splt->output_offset
25e762b9 5803 + abed->plt->plt0_got1_offset);
7325306f 5804 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB
5805 bfd_elf32_swap_reloc_out (output_bfd, &rel,
5806 htab->srelplt2->contents);
5807 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 8. */
6de2ae4a
L
5808 rel.r_offset = (htab->elf.splt->output_section->vma
5809 + htab->elf.splt->output_offset
25e762b9 5810 + abed->plt->plt0_got2_offset);
7325306f 5811 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB
5812 bfd_elf32_swap_reloc_out (output_bfd, &rel,
5813 htab->srelplt2->contents +
5814 sizeof (Elf32_External_Rel));
5815 }
252b5132
RH
5816 }
5817
5818 /* UnixWare sets the entsize of .plt to 4, although that doesn't
5819 really seem like the right value. */
6de2ae4a 5820 elf_section_data (htab->elf.splt->output_section)
6725bdbf 5821 ->this_hdr.sh_entsize = 4;
eac338cf
PB
5822
5823 /* Correct the .rel.plt.unloaded relocations. */
0e1862bb 5824 if (abed->is_vxworks && !bfd_link_pic (info))
eac338cf 5825 {
25e762b9
RM
5826 int num_plts = (htab->elf.splt->size
5827 / abed->plt->plt_entry_size) - 1;
4c9b0de6 5828 unsigned char *p;
eac338cf
PB
5829
5830 p = htab->srelplt2->contents;
0e1862bb 5831 if (bfd_link_pic (info))
eac338cf
PB
5832 p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel);
5833 else
5834 p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel);
5835
5836 for (; num_plts; num_plts--)
5837 {
5838 Elf_Internal_Rela rel;
5839 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
7325306f 5840 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB
5841 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
5842 p += sizeof (Elf32_External_Rel);
5843
5844 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
7325306f 5845 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
eac338cf
PB
5846 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
5847 p += sizeof (Elf32_External_Rel);
5848 }
5849 }
252b5132
RH
5850 }
5851 }
5852
6de2ae4a 5853 if (htab->elf.sgotplt)
252b5132 5854 {
56d4289c
L
5855 if (bfd_is_abs_section (htab->elf.sgotplt->output_section))
5856 {
4eca0228 5857 _bfd_error_handler
56d4289c
L
5858 (_("discarded output section: `%A'"), htab->elf.sgotplt);
5859 return FALSE;
5860 }
5861
12d0ee4a 5862 /* Fill in the first three entries in the global offset table. */
6de2ae4a 5863 if (htab->elf.sgotplt->size > 0)
12d0ee4a
AM
5864 {
5865 bfd_put_32 (output_bfd,
55fd94b0 5866 (sdyn == NULL ? 0
12d0ee4a 5867 : sdyn->output_section->vma + sdyn->output_offset),
6de2ae4a
L
5868 htab->elf.sgotplt->contents);
5869 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 4);
5870 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 8);
12d0ee4a 5871 }
252b5132 5872
6de2ae4a 5873 elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize = 4;
12d0ee4a 5874 }
8c37241b 5875
e41b3a13 5876 /* Adjust .eh_frame for .plt section. */
9a2a56cc
AM
5877 if (htab->plt_eh_frame != NULL
5878 && htab->plt_eh_frame->contents != NULL)
e41b3a13
JJ
5879 {
5880 if (htab->elf.splt != NULL
5881 && htab->elf.splt->size != 0
5882 && (htab->elf.splt->flags & SEC_EXCLUDE) == 0
5883 && htab->elf.splt->output_section != NULL
5884 && htab->plt_eh_frame->output_section != NULL)
5885 {
5886 bfd_vma plt_start = htab->elf.splt->output_section->vma;
5887 bfd_vma eh_frame_start = htab->plt_eh_frame->output_section->vma
5888 + htab->plt_eh_frame->output_offset
5889 + PLT_FDE_START_OFFSET;
5890 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
5891 htab->plt_eh_frame->contents
5892 + PLT_FDE_START_OFFSET);
5893 }
5894 if (htab->plt_eh_frame->sec_info_type
dbaa2011 5895 == SEC_INFO_TYPE_EH_FRAME)
e41b3a13
JJ
5896 {
5897 if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
5898 htab->plt_eh_frame,
5899 htab->plt_eh_frame->contents))
5900 return FALSE;
5901 }
5902 }
5903
6de2ae4a
L
5904 if (htab->elf.sgot && htab->elf.sgot->size > 0)
5905 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize = 4;
8c37241b 5906
aec6b87e
L
5907 /* Fill PLT entries for undefined weak symbols in PIE. */
5908 if (bfd_link_pie (info))
5909 bfd_hash_traverse (&info->hash->table,
5910 elf_i386_pie_finish_undefweak_symbol,
5911 info);
5912
b34976b6 5913 return TRUE;
252b5132
RH
5914}
5915
233cc9c1
L
5916/* Fill PLT/GOT entries and allocate dynamic relocations for local
5917 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
5918 It has to be done before elf_link_sort_relocs is called so that
5919 dynamic relocations are properly sorted. */
5920
5921static bfd_boolean
5922elf_i386_output_arch_local_syms
5923 (bfd *output_bfd ATTRIBUTE_UNUSED,
5924 struct bfd_link_info *info,
5925 void *flaginfo ATTRIBUTE_UNUSED,
5926 int (*func) (void *, const char *,
5927 Elf_Internal_Sym *,
5928 asection *,
5929 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
5930{
5931 struct elf_i386_link_hash_table *htab = elf_i386_hash_table (info);
5932 if (htab == NULL)
5933 return FALSE;
5934
5935 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
5936 htab_traverse (htab->loc_hash_table,
5937 elf_i386_finish_local_dynamic_symbol,
5938 info);
5939
5940 return TRUE;
5941}
5942
3972882e 5943/* Return an array of PLT entry symbol values. */
4c45e5c9 5944
3972882e
L
5945static bfd_vma *
5946elf_i386_get_plt_sym_val (bfd *abfd, asymbol **dynsyms, asection *plt,
5947 asection *relplt)
4c45e5c9 5948{
3972882e
L
5949 bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
5950 arelent *p;
5951 long count, i;
5952 bfd_vma *plt_sym_val;
144bed8d 5953 bfd_vma plt_offset;
3972882e
L
5954 bfd_byte *plt_contents;
5955 const struct elf_i386_backend_data *bed
5956 = get_elf_i386_backend_data (abfd);
5957 Elf_Internal_Shdr *hdr;
5958
5959 /* Get the .plt section contents. */
5960 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
5961 if (plt_contents == NULL)
5962 return NULL;
5963 if (!bfd_get_section_contents (abfd, (asection *) plt,
5964 plt_contents, 0, plt->size))
5965 {
5966bad_return:
5967 free (plt_contents);
5968 return NULL;
5969 }
144bed8d 5970
3972882e
L
5971 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
5972 if (! (*slurp_relocs) (abfd, relplt, dynsyms, TRUE))
5973 goto bad_return;
144bed8d 5974
3972882e
L
5975 hdr = &elf_section_data (relplt)->this_hdr;
5976 count = relplt->size / hdr->sh_entsize;
5977
5978 plt_sym_val = (bfd_vma *) bfd_malloc (sizeof (bfd_vma) * count);
5979 if (plt_sym_val == NULL)
5980 goto bad_return;
cca5b8b6 5981
35181b3e 5982 for (i = 0; i < count; i++)
3972882e 5983 plt_sym_val[i] = -1;
cca5b8b6 5984
3972882e
L
5985 plt_offset = bed->plt->plt_entry_size;
5986 p = relplt->relocation;
5987 for (i = 0; i < count; i++, p++)
144bed8d 5988 {
3972882e
L
5989 long reloc_index;
5990
6f25f223 5991 /* Skip unknown relocation. PR 17512: file: bc9d6cf5. */
533d0af0 5992 if (p->howto == NULL)
6f25f223 5993 continue;
533d0af0
L
5994
5995 if (p->howto->type != R_386_JUMP_SLOT
5996 && p->howto->type != R_386_IRELATIVE)
3972882e
L
5997 continue;
5998
5999 reloc_index = H_GET_32 (abfd, (plt_contents + plt_offset
6000 + bed->plt->plt_reloc_offset));
6001 reloc_index /= sizeof (Elf32_External_Rel);
ec1f73bb
AM
6002 if (reloc_index < count)
6003 plt_sym_val[reloc_index] = plt->vma + plt_offset;
6004
144bed8d 6005 plt_offset += bed->plt->plt_entry_size;
fca6ae69
L
6006
6007 /* PR binutils/18437: Skip extra relocations in the .rel.plt
6008 section. */
6009 if (plt_offset >= plt->size)
6010 break;
144bed8d
L
6011 }
6012
3972882e
L
6013 free (plt_contents);
6014
6015 return plt_sym_val;
6016}
6017
6018/* Similar to _bfd_elf_get_synthetic_symtab. */
6019
6020static long
6021elf_i386_get_synthetic_symtab (bfd *abfd,
6022 long symcount,
6023 asymbol **syms,
6024 long dynsymcount,
6025 asymbol **dynsyms,
6026 asymbol **ret)
6027{
6028 asection *plt = bfd_get_section_by_name (abfd, ".plt");
6029 return _bfd_elf_ifunc_get_synthetic_symtab (abfd, symcount, syms,
6030 dynsymcount, dynsyms, ret,
6031 plt,
6032 elf_i386_get_plt_sym_val);
4c45e5c9
JJ
6033}
6034
fdc90cb4
JJ
6035/* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
6036
6037static bfd_boolean
6038elf_i386_hash_symbol (struct elf_link_hash_entry *h)
6039{
6040 if (h->plt.offset != (bfd_vma) -1
6041 && !h->def_regular
6042 && !h->pointer_equality_needed)
6043 return FALSE;
6044
6045 return _bfd_elf_hash_symbol (h);
6046}
4c45e5c9 6047
6d00b590 6048#define TARGET_LITTLE_SYM i386_elf32_vec
252b5132
RH
6049#define TARGET_LITTLE_NAME "elf32-i386"
6050#define ELF_ARCH bfd_arch_i386
ae95ffa6 6051#define ELF_TARGET_ID I386_ELF_DATA
252b5132
RH
6052#define ELF_MACHINE_CODE EM_386
6053#define ELF_MAXPAGESIZE 0x1000
252b5132
RH
6054
6055#define elf_backend_can_gc_sections 1
51b64d56 6056#define elf_backend_can_refcount 1
252b5132
RH
6057#define elf_backend_want_got_plt 1
6058#define elf_backend_plt_readonly 1
6059#define elf_backend_want_plt_sym 0
6060#define elf_backend_got_header_size 12
e41b3a13 6061#define elf_backend_plt_alignment 4
f7483970 6062#define elf_backend_extern_protected_data 1
bedfd056 6063#define elf_backend_caches_rawsize 1
252b5132 6064
8c29f035
AM
6065/* Support RELA for objdump of prelink objects. */
6066#define elf_info_to_howto elf_i386_info_to_howto_rel
dd5724d5
AM
6067#define elf_info_to_howto_rel elf_i386_info_to_howto_rel
6068
13ae64f3 6069#define bfd_elf32_mkobject elf_i386_mkobject
13ae64f3 6070
dd5724d5
AM
6071#define bfd_elf32_bfd_is_local_label_name elf_i386_is_local_label_name
6072#define bfd_elf32_bfd_link_hash_table_create elf_i386_link_hash_table_create
6073#define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup
13285a1b 6074#define bfd_elf32_bfd_reloc_name_lookup elf_i386_reloc_name_lookup
3972882e 6075#define bfd_elf32_get_synthetic_symtab elf_i386_get_synthetic_symtab
dd5724d5
AM
6076
6077#define elf_backend_adjust_dynamic_symbol elf_i386_adjust_dynamic_symbol
13285a1b 6078#define elf_backend_relocs_compatible _bfd_elf_relocs_compatible
dd5724d5 6079#define elf_backend_check_relocs elf_i386_check_relocs
0ac8d2ca 6080#define elf_backend_copy_indirect_symbol elf_i386_copy_indirect_symbol
6725bdbf 6081#define elf_backend_create_dynamic_sections elf_i386_create_dynamic_sections
0ac8d2ca 6082#define elf_backend_fake_sections elf_i386_fake_sections
dd5724d5
AM
6083#define elf_backend_finish_dynamic_sections elf_i386_finish_dynamic_sections
6084#define elf_backend_finish_dynamic_symbol elf_i386_finish_dynamic_symbol
233cc9c1 6085#define elf_backend_output_arch_local_syms elf_i386_output_arch_local_syms
dd5724d5 6086#define elf_backend_gc_mark_hook elf_i386_gc_mark_hook
c5fccbec
DJ
6087#define elf_backend_grok_prstatus elf_i386_grok_prstatus
6088#define elf_backend_grok_psinfo elf_i386_grok_psinfo
db6751f2 6089#define elf_backend_reloc_type_class elf_i386_reloc_type_class
0ac8d2ca
AM
6090#define elf_backend_relocate_section elf_i386_relocate_section
6091#define elf_backend_size_dynamic_sections elf_i386_size_dynamic_sections
67a4f2b7 6092#define elf_backend_always_size_sections elf_i386_always_size_sections
74541ad4
AM
6093#define elf_backend_omit_section_dynsym \
6094 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
fdc90cb4 6095#define elf_backend_hash_symbol elf_i386_hash_symbol
aec6b87e 6096#define elf_backend_fixup_symbol elf_i386_fixup_symbol
dd5724d5 6097
252b5132 6098#include "elf32-target.h"
2bc3c89a
AM
6099
6100/* FreeBSD support. */
6101
6102#undef TARGET_LITTLE_SYM
6d00b590 6103#define TARGET_LITTLE_SYM i386_elf32_fbsd_vec
2bc3c89a
AM
6104#undef TARGET_LITTLE_NAME
6105#define TARGET_LITTLE_NAME "elf32-i386-freebsd"
d1036acb
L
6106#undef ELF_OSABI
6107#define ELF_OSABI ELFOSABI_FREEBSD
2bc3c89a
AM
6108
6109/* The kernel recognizes executables as valid only if they carry a
6110 "FreeBSD" label in the ELF header. So we put this label on all
6111 executables and (for simplicity) also all other object files. */
6112
2bc3c89a 6113static void
d8045f23 6114elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info)
2bc3c89a 6115{
78245035 6116 _bfd_elf_post_process_headers (abfd, info);
2bc3c89a 6117
2bc3c89a 6118#ifdef OLD_FREEBSD_ABI_LABEL
cf7363b4
L
6119 {
6120 /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard. */
6121 Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
6122 memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8);
6123 }
caf47ea6 6124#endif
2bc3c89a
AM
6125}
6126
6127#undef elf_backend_post_process_headers
d8045f23 6128#define elf_backend_post_process_headers elf_i386_fbsd_post_process_headers
571fe01f
NC
6129#undef elf32_bed
6130#define elf32_bed elf32_i386_fbsd_bed
2bc3c89a 6131
d8045f23
NC
6132#undef elf_backend_add_symbol_hook
6133
2bc3c89a 6134#include "elf32-target.h"
eac338cf 6135
a6cc6b3b
RO
6136/* Solaris 2. */
6137
6138#undef TARGET_LITTLE_SYM
6d00b590 6139#define TARGET_LITTLE_SYM i386_elf32_sol2_vec
a6cc6b3b
RO
6140#undef TARGET_LITTLE_NAME
6141#define TARGET_LITTLE_NAME "elf32-i386-sol2"
6142
914082d1
L
6143#undef elf_backend_post_process_headers
6144
a6cc6b3b
RO
6145/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
6146 objects won't be recognized. */
6147#undef ELF_OSABI
6148
6149#undef elf32_bed
6150#define elf32_bed elf32_i386_sol2_bed
6151
7dc98aea
RO
6152/* The 32-bit static TLS arena size is rounded to the nearest 8-byte
6153 boundary. */
84865015 6154#undef elf_backend_static_tls_alignment
7dc98aea
RO
6155#define elf_backend_static_tls_alignment 8
6156
a6cc6b3b
RO
6157/* The Solaris 2 ABI requires a plt symbol on all platforms.
6158
6159 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
6160 File, p.63. */
84865015 6161#undef elf_backend_want_plt_sym
a6cc6b3b
RO
6162#define elf_backend_want_plt_sym 1
6163
84865015
NC
6164#undef elf_backend_strtab_flags
6165#define elf_backend_strtab_flags SHF_STRINGS
6166
5522f910
NC
6167/* Called to set the sh_flags, sh_link and sh_info fields of OSECTION which
6168 has a type >= SHT_LOOS. Returns TRUE if these fields were initialised
6169 FALSE otherwise. ISECTION is the best guess matching section from the
6170 input bfd IBFD, but it might be NULL. */
6171
84865015 6172static bfd_boolean
5522f910
NC
6173elf32_i386_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
6174 bfd *obfd ATTRIBUTE_UNUSED,
6175 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
6176 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
84865015
NC
6177{
6178 /* PR 19938: FIXME: Need to add code for setting the sh_info
5522f910
NC
6179 and sh_link fields of Solaris specific section types. */
6180 return FALSE;
84865015 6181
5522f910 6182 /* Based upon Oracle Solaris 11.3 Linkers and Libraries Guide, Ch. 13,
84865015
NC
6183 Object File Format, Table 13-9 ELF sh_link and sh_info Interpretation:
6184
6185http://docs.oracle.com/cd/E53394_01/html/E54813/chapter6-94076.html#scrolltoc
6186
6187 The following values should be set:
6188
6189Type Link Info
6190-----------------------------------------------------------------------------
6191SHT_SUNW_ancillary The section header index of 0
6192 [0x6fffffee] the associated string table.
6193
6194SHT_SUNW_capinfo The section header index of For a dynamic object, the
6195 [0x6ffffff0] the associated symbol table. section header index of
6196 the associated
6197 SHT_SUNW_capchain table,
6198 otherwise 0.
6199
6200SHT_SUNW_symsort The section header index of 0
6201 [0x6ffffff1] the associated symbol table.
6202
6203SHT_SUNW_tlssort The section header index of 0
6204 [0x6ffffff2] the associated symbol table.
6205
6206SHT_SUNW_LDYNSYM The section header index of One greater than the
6207 [0x6ffffff3] the associated string table. symbol table index of the
6208 This index is the same string last local symbol,
6209 table used by the SHT_DYNSYM STB_LOCAL. Since
6210 section. SHT_SUNW_LDYNSYM only
6211 contains local symbols,
6212 sh_info is equivalent to
6213 the number of symbols in
6214 the table.
6215
6216SHT_SUNW_cap If symbol capabilities exist, If any capabilities refer
6217 [0x6ffffff5] the section header index of to named strings, the
6218 the associated section header index of
6219 SHT_SUNW_capinfo table, the associated string
6220 otherwise 0. table, otherwise 0.
6221
6222SHT_SUNW_move The section header index of 0
6223 [0x6ffffffa] the associated symbol table.
6224
6225SHT_SUNW_COMDAT 0 0
6226 [0x6ffffffb]
6227
6228SHT_SUNW_syminfo The section header index of The section header index
6229 [0x6ffffffc] the associated symbol table. of the associated
6230 .dynamic section.
6231
6232SHT_SUNW_verdef The section header index of The number of version
6233 [0x6ffffffd] the associated string table. definitions within the
6234 section.
6235
6236SHT_SUNW_verneed The section header index of The number of version
6237 [0x6ffffffe] the associated string table. dependencies within the
6238 section.
6239
6240SHT_SUNW_versym The section header index of 0
6241 [0x6fffffff] the associated symbol table. */
84865015
NC
6242}
6243
5522f910
NC
6244#undef elf_backend_copy_special_section_fields
6245#define elf_backend_copy_special_section_fields elf32_i386_copy_solaris_special_section_fields
84865015 6246
a6cc6b3b
RO
6247#include "elf32-target.h"
6248
bf64a951
L
6249/* Intel MCU support. */
6250
6251static bfd_boolean
6252elf32_iamcu_elf_object_p (bfd *abfd)
6253{
6254 /* Set the right machine number for an IAMCU elf32 file. */
6255 bfd_default_set_arch_mach (abfd, bfd_arch_iamcu, bfd_mach_i386_iamcu);
6256 return TRUE;
6257}
6258
6259#undef TARGET_LITTLE_SYM
6260#define TARGET_LITTLE_SYM iamcu_elf32_vec
6261#undef TARGET_LITTLE_NAME
6262#define TARGET_LITTLE_NAME "elf32-iamcu"
84865015 6263#undef ELF_ARCH
bf64a951
L
6264#define ELF_ARCH bfd_arch_iamcu
6265
6266#undef ELF_MACHINE_CODE
6267#define ELF_MACHINE_CODE EM_IAMCU
6268
6269#undef ELF_OSABI
6270
6271#undef elf32_bed
6272#define elf32_bed elf32_iamcu_bed
6273
6274#undef elf_backend_object_p
6275#define elf_backend_object_p elf32_iamcu_elf_object_p
6276
6277#undef elf_backend_static_tls_alignment
6278
6279#undef elf_backend_want_plt_sym
6280#define elf_backend_want_plt_sym 0
6281
84865015 6282#undef elf_backend_strtab_flags
5522f910 6283#undef elf_backend_copy_special_section_fields
84865015 6284
bf64a951
L
6285#include "elf32-target.h"
6286
6287/* Restore defaults. */
6288#undef ELF_ARCH
6289#define ELF_ARCH bfd_arch_i386
6290#undef ELF_MACHINE_CODE
6291#define ELF_MACHINE_CODE EM_386
6292
a27e4371
RM
6293/* Native Client support. */
6294
6295#undef TARGET_LITTLE_SYM
6d00b590 6296#define TARGET_LITTLE_SYM i386_elf32_nacl_vec
a27e4371
RM
6297#undef TARGET_LITTLE_NAME
6298#define TARGET_LITTLE_NAME "elf32-i386-nacl"
6299#undef elf32_bed
6300#define elf32_bed elf32_i386_nacl_bed
6301
6302#undef ELF_MAXPAGESIZE
6303#define ELF_MAXPAGESIZE 0x10000
6304
6305/* Restore defaults. */
6306#undef ELF_OSABI
6307#undef elf_backend_want_plt_sym
6308#define elf_backend_want_plt_sym 0
6309#undef elf_backend_post_process_headers
a27e4371
RM
6310#undef elf_backend_static_tls_alignment
6311
6312/* NaCl uses substantially different PLT entries for the same effects. */
6313
6314#undef elf_backend_plt_alignment
6315#define elf_backend_plt_alignment 5
6316#define NACL_PLT_ENTRY_SIZE 64
6317#define NACLMASK 0xe0 /* 32-byte alignment mask. */
6318
6319static const bfd_byte elf_i386_nacl_plt0_entry[] =
6320 {
6321 0xff, 0x35, /* pushl contents of address */
6322 0, 0, 0, 0, /* replaced with address of .got + 4. */
6323 0x8b, 0x0d, /* movl contents of address, %ecx */
6324 0, 0, 0, 0, /* replaced with address of .got + 8. */
6325 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */
6326 0xff, 0xe1 /* jmp *%ecx */
6327 };
6328
6329static const bfd_byte elf_i386_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
6330 {
6331 0x8b, 0x0d, /* movl contents of address, %ecx */
6332 0, 0, 0, 0, /* replaced with GOT slot address. */
6333 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */
6334 0xff, 0xe1, /* jmp *%ecx */
6335
6336 /* Pad to the next 32-byte boundary with nop instructions. */
6337 0x90,
6338 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6339 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6340
6341 /* Lazy GOT entries point here (32-byte aligned). */
6342 0x68, /* pushl immediate */
6343 0, 0, 0, 0, /* replaced with reloc offset. */
6344 0xe9, /* jmp relative */
6345 0, 0, 0, 0, /* replaced with offset to .plt. */
6346
6347 /* Pad to the next 32-byte boundary with nop instructions. */
6348 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6349 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6350 0x90, 0x90
6351 };
6352
6353static const bfd_byte
6354elf_i386_nacl_pic_plt0_entry[sizeof (elf_i386_nacl_plt0_entry)] =
6355 {
6356 0xff, 0x73, 0x04, /* pushl 4(%ebx) */
6357 0x8b, 0x4b, 0x08, /* mov 0x8(%ebx), %ecx */
6358 0x83, 0xe1, 0xe0, /* and $NACLMASK, %ecx */
6359 0xff, 0xe1, /* jmp *%ecx */
caa0075c
RM
6360
6361 /* This is expected to be the same size as elf_i386_nacl_plt0_entry,
6362 so pad to that size with nop instructions. */
6363 0x90, 0x90, 0x90, 0x90, 0x90, 0x90
a27e4371
RM
6364 };
6365
6366static const bfd_byte elf_i386_nacl_pic_plt_entry[NACL_PLT_ENTRY_SIZE] =
6367 {
6368 0x8b, 0x8b, /* movl offset(%ebx), %ecx */
6369 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
6370 0x83, 0xe1, 0xe0, /* andl $NACLMASK, %ecx */
6371 0xff, 0xe1, /* jmp *%ecx */
6372
6373 /* Pad to the next 32-byte boundary with nop instructions. */
6374 0x90,
6375 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6376 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6377
6378 /* Lazy GOT entries point here (32-byte aligned). */
6379 0x68, /* pushl immediate */
6380 0, 0, 0, 0, /* replaced with offset into relocation table. */
6381 0xe9, /* jmp relative */
6382 0, 0, 0, 0, /* replaced with offset to start of .plt. */
6383
6384 /* Pad to the next 32-byte boundary with nop instructions. */
6385 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6386 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
6387 0x90, 0x90
6388 };
6389
6390static const bfd_byte elf_i386_nacl_eh_frame_plt[] =
6391 {
6392#if (PLT_CIE_LENGTH != 20 \
6393 || PLT_FDE_LENGTH != 36 \
6394 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
6395 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
6396# error "Need elf_i386_backend_data parameters for eh_frame_plt offsets!"
6397#endif
6398 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
6399 0, 0, 0, 0, /* CIE ID */
6400 1, /* CIE version */
6401 'z', 'R', 0, /* Augmentation string */
6402 1, /* Code alignment factor */
6403 0x7c, /* Data alignment factor: -4 */
6404 8, /* Return address column */
6405 1, /* Augmentation size */
6406 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
6407 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
6408 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */
6409 DW_CFA_nop, DW_CFA_nop,
6410
6411 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
6412 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
6413 0, 0, 0, 0, /* R_386_PC32 .plt goes here */
6414 0, 0, 0, 0, /* .plt size goes here */
6415 0, /* Augmentation size */
6416 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */
6417 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
6418 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */
6419 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
6420 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
6421 13, /* Block length */
6422 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */
6423 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */
6424 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
6425 DW_OP_lit2, DW_OP_shl, DW_OP_plus,
6426 DW_CFA_nop, DW_CFA_nop
6427 };
6428
6429static const struct elf_i386_plt_layout elf_i386_nacl_plt =
6430 {
6431 elf_i386_nacl_plt0_entry, /* plt0_entry */
6432 sizeof (elf_i386_nacl_plt0_entry), /* plt0_entry_size */
6433 2, /* plt0_got1_offset */
6434 8, /* plt0_got2_offset */
6435 elf_i386_nacl_plt_entry, /* plt_entry */
6436 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
6437 2, /* plt_got_offset */
6438 33, /* plt_reloc_offset */
6439 38, /* plt_plt_offset */
6440 32, /* plt_lazy_offset */
6441 elf_i386_nacl_pic_plt0_entry, /* pic_plt0_entry */
6442 elf_i386_nacl_pic_plt_entry, /* pic_plt_entry */
6443 elf_i386_nacl_eh_frame_plt, /* eh_frame_plt */
6444 sizeof (elf_i386_nacl_eh_frame_plt),/* eh_frame_plt_size */
6445 };
6446
6447static const struct elf_i386_backend_data elf_i386_nacl_arch_bed =
6448 {
6449 &elf_i386_nacl_plt, /* plt */
6450 0x90, /* plt0_pad_byte: nop insn */
6451 0, /* is_vxworks */
6452 };
6453
64b384e1
RM
6454static bfd_boolean
6455elf32_i386_nacl_elf_object_p (bfd *abfd)
6456{
6457 /* Set the right machine number for a NaCl i386 ELF32 file. */
6458 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386_nacl);
6459 return TRUE;
6460}
6461
a27e4371
RM
6462#undef elf_backend_arch_data
6463#define elf_backend_arch_data &elf_i386_nacl_arch_bed
6464
64b384e1
RM
6465#undef elf_backend_object_p
6466#define elf_backend_object_p elf32_i386_nacl_elf_object_p
5a68afcf
RM
6467#undef elf_backend_modify_segment_map
6468#define elf_backend_modify_segment_map nacl_modify_segment_map
6469#undef elf_backend_modify_program_headers
6470#define elf_backend_modify_program_headers nacl_modify_program_headers
887badb3
RM
6471#undef elf_backend_final_write_processing
6472#define elf_backend_final_write_processing nacl_final_write_processing
5a68afcf 6473
a27e4371
RM
6474#include "elf32-target.h"
6475
5a68afcf 6476/* Restore defaults. */
64b384e1 6477#undef elf_backend_object_p
5a68afcf
RM
6478#undef elf_backend_modify_segment_map
6479#undef elf_backend_modify_program_headers
887badb3 6480#undef elf_backend_final_write_processing
5a68afcf 6481
eac338cf
PB
6482/* VxWorks support. */
6483
6484#undef TARGET_LITTLE_SYM
6d00b590 6485#define TARGET_LITTLE_SYM i386_elf32_vxworks_vec
eac338cf
PB
6486#undef TARGET_LITTLE_NAME
6487#define TARGET_LITTLE_NAME "elf32-i386-vxworks"
d1036acb 6488#undef ELF_OSABI
a27e4371
RM
6489#undef elf_backend_plt_alignment
6490#define elf_backend_plt_alignment 4
eac338cf 6491
23209a78
RM
6492static const struct elf_i386_backend_data elf_i386_vxworks_arch_bed =
6493 {
25e762b9 6494 &elf_i386_plt, /* plt */
23209a78
RM
6495 0x90, /* plt0_pad_byte */
6496 1, /* is_vxworks */
6497 };
eac338cf 6498
23209a78
RM
6499#undef elf_backend_arch_data
6500#define elf_backend_arch_data &elf_i386_vxworks_arch_bed
eac338cf 6501
13285a1b 6502#undef elf_backend_relocs_compatible
eac338cf
PB
6503#undef elf_backend_add_symbol_hook
6504#define elf_backend_add_symbol_hook \
6505 elf_vxworks_add_symbol_hook
6506#undef elf_backend_link_output_symbol_hook
6507#define elf_backend_link_output_symbol_hook \
9c72ff84 6508 elf_vxworks_link_output_symbol_hook
eac338cf
PB
6509#undef elf_backend_emit_relocs
6510#define elf_backend_emit_relocs elf_vxworks_emit_relocs
6511#undef elf_backend_final_write_processing
6512#define elf_backend_final_write_processing \
6513 elf_vxworks_final_write_processing
7dc98aea 6514#undef elf_backend_static_tls_alignment
eac338cf
PB
6515
6516/* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
6517 define it. */
6518#undef elf_backend_want_plt_sym
6519#define elf_backend_want_plt_sym 1
6520
6521#undef elf32_bed
6522#define elf32_bed elf32_i386_vxworks_bed
6523
6524#include "elf32-target.h"
This page took 1.440282 seconds and 4 git commands to generate.