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