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