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