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