projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Automatic date update in version.in
[deliverable/binutils-gdb.git] / bfd / elf32-i386.c
CommitLineData
252b5132 1/* Intel 80386/80486-specific support for 32-bit ELF
219d1afa 2 Copyright (C) 1993-2018 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
0afcef53 21#include "elfxx-x86.h"
5a68afcf 22#include "elf-nacl.h"
eac338cf 23#include "elf-vxworks.h"
e41b3a13 24#include "dwarf2.h"
02a86693 25#include "opcode/i386.h"
252b5132 26
55fd94b0
AM		 27/* 386 uses REL relocations instead of RELA. */
28#define USE_REL 1
252b5132
RH		 29
30#include "elf/i386.h"
31
32static reloc_howto_type elf_howto_table[]=
33{
6346d5ca 34 HOWTO(R_386_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
1b452ec6 35 bfd_elf_generic_reloc, "R_386_NONE",
b34976b6
AM		 36 TRUE, 0x00000000, 0x00000000, FALSE),
37 HOWTO(R_386_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 38 bfd_elf_generic_reloc, "R_386_32",
b34976b6
AM		 39 TRUE, 0xffffffff, 0xffffffff, FALSE),
40 HOWTO(R_386_PC32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
1b452ec6 41 bfd_elf_generic_reloc, "R_386_PC32",
b34976b6
AM		 42 TRUE, 0xffffffff, 0xffffffff, TRUE),
43 HOWTO(R_386_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 44 bfd_elf_generic_reloc, "R_386_GOT32",
b34976b6
AM		 45 TRUE, 0xffffffff, 0xffffffff, FALSE),
46 HOWTO(R_386_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
1b452ec6 47 bfd_elf_generic_reloc, "R_386_PLT32",
b34976b6
AM		 48 TRUE, 0xffffffff, 0xffffffff, TRUE),
49 HOWTO(R_386_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 50 bfd_elf_generic_reloc, "R_386_COPY",
b34976b6
AM		 51 TRUE, 0xffffffff, 0xffffffff, FALSE),
52 HOWTO(R_386_GLOB_DAT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 53 bfd_elf_generic_reloc, "R_386_GLOB_DAT",
b34976b6
AM		 54 TRUE, 0xffffffff, 0xffffffff, FALSE),
55 HOWTO(R_386_JUMP_SLOT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 56 bfd_elf_generic_reloc, "R_386_JUMP_SLOT",
b34976b6
AM		 57 TRUE, 0xffffffff, 0xffffffff, FALSE),
58 HOWTO(R_386_RELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 59 bfd_elf_generic_reloc, "R_386_RELATIVE",
b34976b6
AM		 60 TRUE, 0xffffffff, 0xffffffff, FALSE),
61 HOWTO(R_386_GOTOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
1b452ec6 62 bfd_elf_generic_reloc, "R_386_GOTOFF",
b34976b6
AM		 63 TRUE, 0xffffffff, 0xffffffff, FALSE),
64 HOWTO(R_386_GOTPC, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
1b452ec6 65 bfd_elf_generic_reloc, "R_386_GOTPC",
b34976b6 66 TRUE, 0xffffffff, 0xffffffff, TRUE),
1b452ec6 67
dc47f327
AM		 68 /* We have a gap in the reloc numbers here.
69 R_386_standard counts the number up to this point, and
70 R_386_ext_offset is the value to subtract from a reloc type of
71 R_386_16 thru R_386_PC8 to form an index into this table. */
55fd94b0
AM		 72#define R_386_standard (R_386_GOTPC + 1)
73#define R_386_ext_offset (R_386_TLS_TPOFF - R_386_standard)
1b452ec6 74
37e55690 75 /* These relocs are a GNU extension. */
b34976b6 76 HOWTO(R_386_TLS_TPOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
37e55690 77 bfd_elf_generic_reloc, "R_386_TLS_TPOFF",
b34976b6
AM		 78 TRUE, 0xffffffff, 0xffffffff, FALSE),
79 HOWTO(R_386_TLS_IE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
37e55690 80 bfd_elf_generic_reloc, "R_386_TLS_IE",
b34976b6
AM		 81 TRUE, 0xffffffff, 0xffffffff, FALSE),
82 HOWTO(R_386_TLS_GOTIE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
37e55690 83 bfd_elf_generic_reloc, "R_386_TLS_GOTIE",
b34976b6
AM		 84 TRUE, 0xffffffff, 0xffffffff, FALSE),
85 HOWTO(R_386_TLS_LE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 86 bfd_elf_generic_reloc, "R_386_TLS_LE",
b34976b6
AM		 87 TRUE, 0xffffffff, 0xffffffff, FALSE),
88 HOWTO(R_386_TLS_GD, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 89 bfd_elf_generic_reloc, "R_386_TLS_GD",
b34976b6
AM		 90 TRUE, 0xffffffff, 0xffffffff, FALSE),
91 HOWTO(R_386_TLS_LDM, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 92 bfd_elf_generic_reloc, "R_386_TLS_LDM",
b34976b6
AM		 93 TRUE, 0xffffffff, 0xffffffff, FALSE),
94 HOWTO(R_386_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
1b452ec6 95 bfd_elf_generic_reloc, "R_386_16",
b34976b6 96 TRUE, 0xffff, 0xffff, FALSE),
b0360d8c 97 HOWTO(R_386_PC16, 0, 1, 16, TRUE, 0, complain_overflow_bitfield,
1b452ec6 98 bfd_elf_generic_reloc, "R_386_PC16",
b34976b6
AM		 99 TRUE, 0xffff, 0xffff, TRUE),
100 HOWTO(R_386_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
1b452ec6 101 bfd_elf_generic_reloc, "R_386_8",
b34976b6
AM		 102 TRUE, 0xff, 0xff, FALSE),
103 HOWTO(R_386_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
1b452ec6 104 bfd_elf_generic_reloc, "R_386_PC8",
b34976b6 105 TRUE, 0xff, 0xff, TRUE),
dc47f327 106
55fd94b0
AM		 107#define R_386_ext (R_386_PC8 + 1 - R_386_ext_offset)
108#define R_386_tls_offset (R_386_TLS_LDO_32 - R_386_ext)
13ae64f3 109 /* These are common with Solaris TLS implementation. */
b34976b6 110 HOWTO(R_386_TLS_LDO_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 111 bfd_elf_generic_reloc, "R_386_TLS_LDO_32",
b34976b6
AM		 112 TRUE, 0xffffffff, 0xffffffff, FALSE),
113 HOWTO(R_386_TLS_IE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 114 bfd_elf_generic_reloc, "R_386_TLS_IE_32",
b34976b6
AM		 115 TRUE, 0xffffffff, 0xffffffff, FALSE),
116 HOWTO(R_386_TLS_LE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 117 bfd_elf_generic_reloc, "R_386_TLS_LE_32",
b34976b6
AM		 118 TRUE, 0xffffffff, 0xffffffff, FALSE),
119 HOWTO(R_386_TLS_DTPMOD32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 120 bfd_elf_generic_reloc, "R_386_TLS_DTPMOD32",
b34976b6
AM		 121 TRUE, 0xffffffff, 0xffffffff, FALSE),
122 HOWTO(R_386_TLS_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 123 bfd_elf_generic_reloc, "R_386_TLS_DTPOFF32",
b34976b6
AM		 124 TRUE, 0xffffffff, 0xffffffff, FALSE),
125 HOWTO(R_386_TLS_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
13ae64f3 126 bfd_elf_generic_reloc, "R_386_TLS_TPOFF32",
b34976b6 127 TRUE, 0xffffffff, 0xffffffff, FALSE),
1788fc08
L		 128 HOWTO(R_386_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
129 bfd_elf_generic_reloc, "R_386_SIZE32",
130 TRUE, 0xffffffff, 0xffffffff, FALSE),
67a4f2b7
AO		 131 HOWTO(R_386_TLS_GOTDESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
132 bfd_elf_generic_reloc, "R_386_TLS_GOTDESC",
133 TRUE, 0xffffffff, 0xffffffff, FALSE),
134 HOWTO(R_386_TLS_DESC_CALL, 0, 0, 0, FALSE, 0, complain_overflow_dont,
135 bfd_elf_generic_reloc, "R_386_TLS_DESC_CALL",
136 FALSE, 0, 0, FALSE),
137 HOWTO(R_386_TLS_DESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
138 bfd_elf_generic_reloc, "R_386_TLS_DESC",
139 TRUE, 0xffffffff, 0xffffffff, FALSE),
cbe950e9
L		 140 HOWTO(R_386_IRELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
141 bfd_elf_generic_reloc, "R_386_IRELATIVE",
142 TRUE, 0xffffffff, 0xffffffff, FALSE),
02a86693
L		 143 HOWTO(R_386_GOT32X, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
144 bfd_elf_generic_reloc, "R_386_GOT32X",
145 TRUE, 0xffffffff, 0xffffffff, FALSE),
13ae64f3
JJ		 146
147 /* Another gap. */
02a86693 148#define R_386_ext2 (R_386_GOT32X + 1 - R_386_tls_offset)
c74be520 149#define R_386_vt_offset (R_386_GNU_VTINHERIT - R_386_ext2)
252b5132
RH		 150
151/* GNU extension to record C++ vtable hierarchy. */
252b5132
RH		 152 HOWTO (R_386_GNU_VTINHERIT, /* type */
153 0, /* rightshift */
154 2, /* size (0 = byte, 1 = short, 2 = long) */
155 0, /* bitsize */
b34976b6 156 FALSE, /* pc_relative */
252b5132
RH		 157 0, /* bitpos */
158 complain_overflow_dont, /* complain_on_overflow */
159 NULL, /* special_function */
160 "R_386_GNU_VTINHERIT", /* name */
b34976b6 161 FALSE, /* partial_inplace */
252b5132
RH		 162 0, /* src_mask */
163 0, /* dst_mask */
b34976b6 164 FALSE), /* pcrel_offset */
252b5132
RH		 165
166/* GNU extension to record C++ vtable member usage. */
252b5132
RH		 167 HOWTO (R_386_GNU_VTENTRY, /* type */
168 0, /* rightshift */
169 2, /* size (0 = byte, 1 = short, 2 = long) */
170 0, /* bitsize */
b34976b6 171 FALSE, /* pc_relative */
252b5132
RH		 172 0, /* bitpos */
173 complain_overflow_dont, /* complain_on_overflow */
174 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
175 "R_386_GNU_VTENTRY", /* name */
b34976b6 176 FALSE, /* partial_inplace */
252b5132
RH		 177 0, /* src_mask */
178 0, /* dst_mask */
b34976b6 179 FALSE) /* pcrel_offset */
dc47f327 180
55fd94b0 181#define R_386_vt (R_386_GNU_VTENTRY + 1 - R_386_vt_offset)
dc47f327
AM		 182
183};
184
daf1c414
L		 185#define X86_PCREL_TYPE_P(TYPE) ((TYPE) == R_386_PC32)
186
aebcc8ff
L		 187#define X86_SIZE_TYPE_P(TYPE) ((TYPE) == R_386_SIZE32)
188
252b5132 189#ifdef DEBUG_GEN_RELOC
55fd94b0
AM		 190#define TRACE(str) \
191 fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str)
252b5132
RH		 192#else
193#define TRACE(str)
194#endif
195
196static reloc_howto_type *
f3185997 197elf_i386_reloc_type_lookup (bfd *abfd,
55fd94b0 198 bfd_reloc_code_real_type code)
252b5132
RH		 199{
200 switch (code)
201 {
202 case BFD_RELOC_NONE:
203 TRACE ("BFD_RELOC_NONE");
55fd94b0 204 return &elf_howto_table[R_386_NONE];
252b5132
RH		 205
206 case BFD_RELOC_32:
207 TRACE ("BFD_RELOC_32");
55fd94b0 208 return &elf_howto_table[R_386_32];
252b5132
RH		 209
210 case BFD_RELOC_CTOR:
211 TRACE ("BFD_RELOC_CTOR");
55fd94b0 212 return &elf_howto_table[R_386_32];
252b5132
RH		 213
214 case BFD_RELOC_32_PCREL:
215 TRACE ("BFD_RELOC_PC32");
55fd94b0 216 return &elf_howto_table[R_386_PC32];
252b5132
RH		 217
218 case BFD_RELOC_386_GOT32:
219 TRACE ("BFD_RELOC_386_GOT32");
55fd94b0 220 return &elf_howto_table[R_386_GOT32];
252b5132
RH		 221
222 case BFD_RELOC_386_PLT32:
223 TRACE ("BFD_RELOC_386_PLT32");
55fd94b0 224 return &elf_howto_table[R_386_PLT32];
252b5132
RH		 225
226 case BFD_RELOC_386_COPY:
227 TRACE ("BFD_RELOC_386_COPY");
55fd94b0 228 return &elf_howto_table[R_386_COPY];
252b5132
RH		 229
230 case BFD_RELOC_386_GLOB_DAT:
231 TRACE ("BFD_RELOC_386_GLOB_DAT");
55fd94b0 232 return &elf_howto_table[R_386_GLOB_DAT];
252b5132
RH		 233
234 case BFD_RELOC_386_JUMP_SLOT:
235 TRACE ("BFD_RELOC_386_JUMP_SLOT");
55fd94b0 236 return &elf_howto_table[R_386_JUMP_SLOT];
252b5132
RH		 237
238 case BFD_RELOC_386_RELATIVE:
239 TRACE ("BFD_RELOC_386_RELATIVE");
55fd94b0 240 return &elf_howto_table[R_386_RELATIVE];
252b5132
RH		 241
242 case BFD_RELOC_386_GOTOFF:
243 TRACE ("BFD_RELOC_386_GOTOFF");
55fd94b0 244 return &elf_howto_table[R_386_GOTOFF];
252b5132
RH		 245
246 case BFD_RELOC_386_GOTPC:
247 TRACE ("BFD_RELOC_386_GOTPC");
55fd94b0 248 return &elf_howto_table[R_386_GOTPC];
252b5132 249
37e55690
JJ		 250 /* These relocs are a GNU extension. */
251 case BFD_RELOC_386_TLS_TPOFF:
252 TRACE ("BFD_RELOC_386_TLS_TPOFF");
55fd94b0 253 return &elf_howto_table[R_386_TLS_TPOFF - R_386_ext_offset];
37e55690
JJ		 254
255 case BFD_RELOC_386_TLS_IE:
256 TRACE ("BFD_RELOC_386_TLS_IE");
55fd94b0 257 return &elf_howto_table[R_386_TLS_IE - R_386_ext_offset];
37e55690
JJ		 258
259 case BFD_RELOC_386_TLS_GOTIE:
260 TRACE ("BFD_RELOC_386_TLS_GOTIE");
55fd94b0 261 return &elf_howto_table[R_386_TLS_GOTIE - R_386_ext_offset];
37e55690 262
13ae64f3
JJ		 263 case BFD_RELOC_386_TLS_LE:
264 TRACE ("BFD_RELOC_386_TLS_LE");
55fd94b0 265 return &elf_howto_table[R_386_TLS_LE - R_386_ext_offset];
13ae64f3
JJ		 266
267 case BFD_RELOC_386_TLS_GD:
268 TRACE ("BFD_RELOC_386_TLS_GD");
55fd94b0 269 return &elf_howto_table[R_386_TLS_GD - R_386_ext_offset];
13ae64f3
JJ		 270
271 case BFD_RELOC_386_TLS_LDM:
272 TRACE ("BFD_RELOC_386_TLS_LDM");
55fd94b0 273 return &elf_howto_table[R_386_TLS_LDM - R_386_ext_offset];
13ae64f3 274
252b5132
RH		 275 case BFD_RELOC_16:
276 TRACE ("BFD_RELOC_16");
55fd94b0 277 return &elf_howto_table[R_386_16 - R_386_ext_offset];
252b5132
RH		 278
279 case BFD_RELOC_16_PCREL:
280 TRACE ("BFD_RELOC_16_PCREL");
55fd94b0 281 return &elf_howto_table[R_386_PC16 - R_386_ext_offset];
252b5132
RH		 282
283 case BFD_RELOC_8:
284 TRACE ("BFD_RELOC_8");
55fd94b0 285 return &elf_howto_table[R_386_8 - R_386_ext_offset];
252b5132
RH		 286
287 case BFD_RELOC_8_PCREL:
288 TRACE ("BFD_RELOC_8_PCREL");
55fd94b0 289 return &elf_howto_table[R_386_PC8 - R_386_ext_offset];
252b5132 290
13ae64f3
JJ		 291 /* Common with Sun TLS implementation. */
292 case BFD_RELOC_386_TLS_LDO_32:
293 TRACE ("BFD_RELOC_386_TLS_LDO_32");
55fd94b0 294 return &elf_howto_table[R_386_TLS_LDO_32 - R_386_tls_offset];
13ae64f3
JJ		 295
296 case BFD_RELOC_386_TLS_IE_32:
297 TRACE ("BFD_RELOC_386_TLS_IE_32");
55fd94b0 298 return &elf_howto_table[R_386_TLS_IE_32 - R_386_tls_offset];
13ae64f3
JJ		 299
300 case BFD_RELOC_386_TLS_LE_32:
301 TRACE ("BFD_RELOC_386_TLS_LE_32");
55fd94b0 302 return &elf_howto_table[R_386_TLS_LE_32 - R_386_tls_offset];
13ae64f3
JJ		 303
304 case BFD_RELOC_386_TLS_DTPMOD32:
305 TRACE ("BFD_RELOC_386_TLS_DTPMOD32");
55fd94b0 306 return &elf_howto_table[R_386_TLS_DTPMOD32 - R_386_tls_offset];
13ae64f3
JJ		 307
308 case BFD_RELOC_386_TLS_DTPOFF32:
309 TRACE ("BFD_RELOC_386_TLS_DTPOFF32");
55fd94b0 310 return &elf_howto_table[R_386_TLS_DTPOFF32 - R_386_tls_offset];
13ae64f3
JJ		 311
312 case BFD_RELOC_386_TLS_TPOFF32:
313 TRACE ("BFD_RELOC_386_TLS_TPOFF32");
55fd94b0 314 return &elf_howto_table[R_386_TLS_TPOFF32 - R_386_tls_offset];
13ae64f3 315
1788fc08
L		 316 case BFD_RELOC_SIZE32:
317 TRACE ("BFD_RELOC_SIZE32");
318 return &elf_howto_table[R_386_SIZE32 - R_386_tls_offset];
319
67a4f2b7
AO		 320 case BFD_RELOC_386_TLS_GOTDESC:
321 TRACE ("BFD_RELOC_386_TLS_GOTDESC");
322 return &elf_howto_table[R_386_TLS_GOTDESC - R_386_tls_offset];
323
324 case BFD_RELOC_386_TLS_DESC_CALL:
325 TRACE ("BFD_RELOC_386_TLS_DESC_CALL");
326 return &elf_howto_table[R_386_TLS_DESC_CALL - R_386_tls_offset];
327
328 case BFD_RELOC_386_TLS_DESC:
329 TRACE ("BFD_RELOC_386_TLS_DESC");
330 return &elf_howto_table[R_386_TLS_DESC - R_386_tls_offset];
331
cbe950e9
L		 332 case BFD_RELOC_386_IRELATIVE:
333 TRACE ("BFD_RELOC_386_IRELATIVE");
2a750708 334 return &elf_howto_table[R_386_IRELATIVE - R_386_tls_offset];
cbe950e9 335
02a86693
L		 336 case BFD_RELOC_386_GOT32X:
337 TRACE ("BFD_RELOC_386_GOT32X");
338 return &elf_howto_table[R_386_GOT32X - R_386_tls_offset];
339
252b5132
RH		 340 case BFD_RELOC_VTABLE_INHERIT:
341 TRACE ("BFD_RELOC_VTABLE_INHERIT");
55fd94b0 342 return &elf_howto_table[R_386_GNU_VTINHERIT - R_386_vt_offset];
252b5132
RH		 343
344 case BFD_RELOC_VTABLE_ENTRY:
345 TRACE ("BFD_RELOC_VTABLE_ENTRY");
55fd94b0 346 return &elf_howto_table[R_386_GNU_VTENTRY - R_386_vt_offset];
252b5132
RH		 347
348 default:
f3185997
NC		 349 TRACE ("Unknown");
350 /* xgettext:c-format */
e8f5af78 351 _bfd_error_handler (_("%pB: unsupported relocation type: %#x"),
f3185997
NC		 352 abfd, (int) code);
353 bfd_set_error (bfd_error_bad_value);
354 return NULL;
252b5132 355 }
252b5132
RH		 356}
357
157090f7
AM		 358static reloc_howto_type *
359elf_i386_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
360 const char *r_name)
361{
362 unsigned int i;
363
364 for (i = 0; i < sizeof (elf_howto_table) / sizeof (elf_howto_table[0]); i++)
365 if (elf_howto_table[i].name != NULL
366 && strcasecmp (elf_howto_table[i].name, r_name) == 0)
367 return &elf_howto_table[i];
368
369 return NULL;
370}
371
142411ca 372static reloc_howto_type *
f3185997 373elf_i386_rtype_to_howto (bfd *abfd ATTRIBUTE_UNUSED, unsigned r_type)
252b5132 374{
dc47f327
AM		 375 unsigned int indx;
376
377 if ((indx = r_type) >= R_386_standard
378 && ((indx = r_type - R_386_ext_offset) - R_386_standard
379 >= R_386_ext - R_386_standard)
13ae64f3 380 && ((indx = r_type - R_386_tls_offset) - R_386_ext
c74be520
L		 381 >= R_386_ext2 - R_386_ext)
382 && ((indx = r_type - R_386_vt_offset) - R_386_ext2
383 >= R_386_vt - R_386_ext2))
f3185997 384 return NULL;
06614111
NC		 385 /* PR 17512: file: 0f67f69d. */
386 if (elf_howto_table [indx].type != r_type)
387 return NULL;
142411ca
L		 388 return &elf_howto_table[indx];
389}
390
f3185997
NC		 391static bfd_boolean
392elf_i386_info_to_howto_rel (bfd *abfd,
142411ca
L		 393 arelent *cache_ptr,
394 Elf_Internal_Rela *dst)
395{
396 unsigned int r_type = ELF32_R_TYPE (dst->r_info);
f3185997
NC		 397
398 if ((cache_ptr->howto = elf_i386_rtype_to_howto (abfd, r_type)) == NULL)
399 {
400 /* xgettext:c-format */
401 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
402 abfd, r_type);
403 bfd_set_error (bfd_error_bad_value);
404 return FALSE;
405 }
406
407 return TRUE;
252b5132
RH		 408}
409
410/* Return whether a symbol name implies a local label. The UnixWare
411 2.1 cc generates temporary symbols that start with .X, so we
412 recognize them here. FIXME: do other SVR4 compilers also use .X?.
413 If so, we should move the .X recognition into
414 _bfd_elf_is_local_label_name. */
415
b34976b6 416static bfd_boolean
55fd94b0 417elf_i386_is_local_label_name (bfd *abfd, const char *name)
252b5132
RH		 418{
419 if (name[0] == '.' && name[1] == 'X')
b34976b6 420 return TRUE;
252b5132
RH		 421
422 return _bfd_elf_is_local_label_name (abfd, name);
423}
424\f
38701953 425/* Support for core dump NOTE sections. */
61adc1a4 426
b34976b6 427static bfd_boolean
55fd94b0 428elf_i386_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
38701953
AM		 429{
430 int offset;
eea6121a 431 size_t size;
38701953 432
61adc1a4 433 if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
38701953 434 {
61adc1a4
NC		 435 int pr_version = bfd_get_32 (abfd, note->descdata);
436
437 if (pr_version != 1)
07d6d2b8 438 return FALSE;
61adc1a4
NC		 439
440 /* pr_cursig */
228e534f 441 elf_tdata (abfd)->core->signal = bfd_get_32 (abfd, note->descdata + 20);
61adc1a4
NC		 442
443 /* pr_pid */
228e534f 444 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
61adc1a4
NC		 445
446 /* pr_reg */
447 offset = 28;
eea6121a 448 size = bfd_get_32 (abfd, note->descdata + 8);
61adc1a4
NC		 449 }
450 else
451 {
452 switch (note->descsz)
453 {
454 default:
455 return FALSE;
38701953 456
61adc1a4
NC		 457 case 144: /* Linux/i386 */
458 /* pr_cursig */
228e534f 459 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
38701953 460
61adc1a4 461 /* pr_pid */
228e534f 462 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
38701953 463
61adc1a4
NC		 464 /* pr_reg */
465 offset = 72;
eea6121a 466 size = 68;
38701953 467
61adc1a4
NC		 468 break;
469 }
38701953
AM		 470 }
471
472 /* Make a ".reg/999" section. */
473 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
eea6121a 474 size, note->descpos + offset);
38701953
AM		 475}
476
b34976b6 477static bfd_boolean
55fd94b0 478elf_i386_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
38701953 479{
61adc1a4 480 if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0)
38701953 481 {
61adc1a4
NC		 482 int pr_version = bfd_get_32 (abfd, note->descdata);
483
484 if (pr_version != 1)
b34976b6 485 return FALSE;
38701953 486
228e534f 487 elf_tdata (abfd)->core->program
61adc1a4 488 = _bfd_elfcore_strndup (abfd, note->descdata + 8, 17);
228e534f 489 elf_tdata (abfd)->core->command
61adc1a4
NC		 490 = _bfd_elfcore_strndup (abfd, note->descdata + 25, 81);
491 }
492 else
493 {
494 switch (note->descsz)
495 {
496 default:
497 return FALSE;
498
499 case 124: /* Linux/i386 elf_prpsinfo. */
228e534f 500 elf_tdata (abfd)->core->pid
261b8d08 501 = bfd_get_32 (abfd, note->descdata + 12);
228e534f 502 elf_tdata (abfd)->core->program
61adc1a4 503 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
228e534f 504 elf_tdata (abfd)->core->command
61adc1a4
NC		 505 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
506 }
38701953
AM		 507 }
508
509 /* Note that for some reason, a spurious space is tacked
510 onto the end of the args in some (at least one anyway)
511 implementations, so strip it off if it exists. */
38701953 512 {
228e534f 513 char *command = elf_tdata (abfd)->core->command;
38701953
AM		 514 int n = strlen (command);
515
516 if (0 < n && command[n - 1] == ' ')
517 command[n - 1] = '\0';
518 }
519
b34976b6 520 return TRUE;
38701953
AM		 521}
522\f
523/* Functions for the i386 ELF linker.
524
525 In order to gain some understanding of code in this file without
526 knowing all the intricate details of the linker, note the
527 following:
528
529 Functions named elf_i386_* are called by external routines, other
530 functions are only called locally. elf_i386_* functions appear
531 in this file more or less in the order in which they are called
532 from external routines. eg. elf_i386_check_relocs is called
533 early in the link process, elf_i386_finish_dynamic_sections is
534 one of the last functions. */
535
f604c2a2 536/* The size in bytes of an entry in the lazy procedure linkage table. */
252b5132 537
f604c2a2 538#define LAZY_PLT_ENTRY_SIZE 16
252b5132 539
f604c2a2
L		 540/* The size in bytes of an entry in the non-lazy procedure linkage
541 table. */
252b5132 542
f604c2a2
L		 543#define NON_LAZY_PLT_ENTRY_SIZE 8
544
545/* The first entry in an absolute lazy procedure linkage table looks
546 like this. See the SVR4 ABI i386 supplement to see how this works.
547 Will be padded to LAZY_PLT_ENTRY_SIZE with lazy_plt->plt0_pad_byte. */
548
549static const bfd_byte elf_i386_lazy_plt0_entry[12] =
252b5132
RH		 550{
551 0xff, 0x35, /* pushl contents of address */
552 0, 0, 0, 0, /* replaced with address of .got + 4. */
553 0xff, 0x25, /* jmp indirect */
eac338cf 554 0, 0, 0, 0 /* replaced with address of .got + 8. */
252b5132
RH		 555};
556
f604c2a2
L		 557/* Subsequent entries in an absolute lazy procedure linkage table look
558 like this. */
252b5132 559
f604c2a2 560static const bfd_byte elf_i386_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
252b5132
RH		 561{
562 0xff, 0x25, /* jmp indirect */
563 0, 0, 0, 0, /* replaced with address of this symbol in .got. */
564 0x68, /* pushl immediate */
565 0, 0, 0, 0, /* replaced with offset into relocation table. */
566 0xe9, /* jmp relative */
567 0, 0, 0, 0 /* replaced with offset to start of .plt. */
568};
569
f604c2a2
L		 570/* The first entry in a PIC lazy procedure linkage table look like
571 this. Will be padded to LAZY_PLT_ENTRY_SIZE with
572 lazy_plt->plt0_pad_byte. */
252b5132 573
f604c2a2 574static const bfd_byte elf_i386_pic_lazy_plt0_entry[12] =
252b5132
RH		 575{
576 0xff, 0xb3, 4, 0, 0, 0, /* pushl 4(%ebx) */
eac338cf 577 0xff, 0xa3, 8, 0, 0, 0 /* jmp *8(%ebx) */
252b5132
RH		 578};
579
f604c2a2
L		 580/* Subsequent entries in a PIC lazy procedure linkage table look like
581 this. */
252b5132 582
f604c2a2 583static const bfd_byte elf_i386_pic_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
252b5132
RH		 584{
585 0xff, 0xa3, /* jmp *offset(%ebx) */
586 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
587 0x68, /* pushl immediate */
588 0, 0, 0, 0, /* replaced with offset into relocation table. */
589 0xe9, /* jmp relative */
590 0, 0, 0, 0 /* replaced with offset to start of .plt. */
591};
592
f604c2a2 593/* Entries in the non-lazy procedure linkage table look like this. */
dd7e64d4 594
f604c2a2 595static const bfd_byte elf_i386_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
dd7e64d4
L		 596{
597 0xff, 0x25, /* jmp indirect */
598 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
599 0x66, 0x90 /* xchg %ax,%ax */
600};
601
f604c2a2
L		 602/* Entries in the PIC non-lazy procedure linkage table look like
603 this. */
dd7e64d4 604
f604c2a2 605static const bfd_byte elf_i386_pic_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
dd7e64d4
L		 606{
607 0xff, 0xa3, /* jmp *offset(%ebx) */
608 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
609 0x66, 0x90 /* xchg %ax,%ax */
610};
611
ee2fdd6f
L		 612/* The first entry in an absolute IBT-enabled lazy procedure linkage
613 table looks like this. */
614
615static const bfd_byte elf_i386_lazy_ibt_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
616{
07d6d2b8
AM		 617 0xff, 0x35, 0, 0, 0, 0, /* pushl GOT[1] */
618 0xff, 0x25, 0, 0, 0, 0, /* jmp *GOT[2] */
619 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
ee2fdd6f
L		 620};
621
622/* Subsequent entries for an absolute IBT-enabled lazy procedure linkage
623 table look like this. Subsequent entries for a PIC IBT-enabled lazy
624 procedure linkage table are the same. */
625
626static const bfd_byte elf_i386_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
627{
07d6d2b8
AM		 628 0xf3, 0x0f, 0x1e, 0xfb, /* endbr32 */
629 0x68, 0, 0, 0, 0, /* pushl immediate */
630 0xe9, 0, 0, 0, 0, /* jmp relative */
631 0x66, 0x90 /* xchg %ax,%ax */
ee2fdd6f
L		 632};
633
634/* The first entry in a PIC IBT-enabled lazy procedure linkage table
635 look like. */
636
637static const bfd_byte elf_i386_pic_lazy_ibt_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
638{
639 0xff, 0xb3, 4, 0, 0, 0, /* pushl 4(%ebx) */
07d6d2b8
AM		 640 0xff, 0xa3, 8, 0, 0, 0, /* jmp *8(%ebx) */
641 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
ee2fdd6f
L		 642};
643
644/* Entries for branches with IBT-enabled in the absolute non-lazey
645 procedure linkage table look like this. They have the same size
646 as the lazy PLT entry. */
647
648static const bfd_byte elf_i386_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
649{
07d6d2b8 650 0xf3, 0x0f, 0x1e, 0xfb, /* endbr32 */
ee2fdd6f
L		 651 0xff, 0x25, 0, 0, 0, 0, /* jmp *name@GOT */
652 0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
653};
654
655/* Entries for branches with IBT-enabled in the PIC non-lazey procedure
656 linkage table look like this. They have the same size as the lazy
657 PLT entry. */
658
659static const bfd_byte elf_i386_pic_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
660{
07d6d2b8 661 0xf3, 0x0f, 0x1e, 0xfb, /* endbr32 */
ee2fdd6f
L		 662 0xff, 0xa3, 0, 0, 0, 0, /* jmp *name@GOT(%ebx) */
663 0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
664};
665
f604c2a2 666/* .eh_frame covering the lazy .plt section. */
e41b3a13 667
f604c2a2 668static const bfd_byte elf_i386_eh_frame_lazy_plt[] =
e41b3a13 669{
e41b3a13
JJ		 670 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
671 0, 0, 0, 0, /* CIE ID */
672 1, /* CIE version */
673 'z', 'R', 0, /* Augmentation string */
674 1, /* Code alignment factor */
675 0x7c, /* Data alignment factor */
676 8, /* Return address column */
677 1, /* Augmentation size */
678 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
679 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
680 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */
681 DW_CFA_nop, DW_CFA_nop,
682
683 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
684 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
685 0, 0, 0, 0, /* R_386_PC32 .plt goes here */
686 0, 0, 0, 0, /* .plt size goes here */
687 0, /* Augmentation size */
688 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */
689 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
690 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */
691 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
692 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
693 11, /* Block length */
694 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */
695 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */
696 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
28ede8be 697 DW_OP_lit2, DW_OP_shl, DW_OP_plus,
e41b3a13
JJ		 698 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
699};
700
ee2fdd6f
L		 701/* .eh_frame covering the lazy .plt section with IBT-enabled. */
702
703static const bfd_byte elf_i386_eh_frame_lazy_ibt_plt[] =
704{
705 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
706 0, 0, 0, 0, /* CIE ID */
707 1, /* CIE version */
708 'z', 'R', 0, /* Augmentation string */
709 1, /* Code alignment factor */
710 0x7c, /* Data alignment factor */
711 8, /* Return address column */
712 1, /* Augmentation size */
713 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
714 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
715 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */
716 DW_CFA_nop, DW_CFA_nop,
717
718 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
719 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
720 0, 0, 0, 0, /* R_386_PC32 .plt goes here */
721 0, 0, 0, 0, /* .plt size goes here */
722 0, /* Augmentation size */
723 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */
724 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
725 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */
726 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
727 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
728 11, /* Block length */
729 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */
730 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */
731 DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
732 DW_OP_lit2, DW_OP_shl, DW_OP_plus,
733 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
734};
735
f604c2a2 736/* .eh_frame covering the non-lazy .plt section. */
fff53dae 737
f604c2a2 738static const bfd_byte elf_i386_eh_frame_non_lazy_plt[] =
fff53dae
L		 739{
740#define PLT_GOT_FDE_LENGTH 16
741 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
742 0, 0, 0, 0, /* CIE ID */
743 1, /* CIE version */
744 'z', 'R', 0, /* Augmentation string */
745 1, /* Code alignment factor */
746 0x7c, /* Data alignment factor */
747 8, /* Return address column */
748 1, /* Augmentation size */
749 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
750 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
751 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */
752 DW_CFA_nop, DW_CFA_nop,
753
754 PLT_GOT_FDE_LENGTH, 0, 0, 0, /* FDE length */
755 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
f604c2a2
L		 756 0, 0, 0, 0, /* the start of non-lazy .plt goes here */
757 0, 0, 0, 0, /* non-lazy .plt size goes here */
fff53dae
L		 758 0, /* Augmentation size */
759 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
760};
761
25e762b9 762/* These are the standard parameters. */
765e526c 763static const struct elf_x86_lazy_plt_layout elf_i386_lazy_plt =
25e762b9 764 {
07d6d2b8
AM		 765 elf_i386_lazy_plt0_entry, /* plt0_entry */
766 sizeof (elf_i386_lazy_plt0_entry), /* plt0_entry_size */
767 elf_i386_lazy_plt_entry, /* plt_entry */
768 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
769 2, /* plt0_got1_offset */
770 8, /* plt0_got2_offset */
771 0, /* plt0_got2_insn_end */
772 2, /* plt_got_offset */
773 7, /* plt_reloc_offset */
774 12, /* plt_plt_offset */
775 0, /* plt_got_insn_size */
776 0, /* plt_plt_insn_end */
777 6, /* plt_lazy_offset */
778 elf_i386_pic_lazy_plt0_entry, /* pic_plt0_entry */
779 elf_i386_pic_lazy_plt_entry, /* pic_plt_entry */
780 elf_i386_eh_frame_lazy_plt, /* eh_frame_plt */
f604c2a2
L		 781 sizeof (elf_i386_eh_frame_lazy_plt) /* eh_frame_plt_size */
782 };
783
765e526c 784static const struct elf_x86_non_lazy_plt_layout elf_i386_non_lazy_plt =
f604c2a2 785 {
07d6d2b8
AM		 786 elf_i386_non_lazy_plt_entry, /* plt_entry */
787 elf_i386_pic_non_lazy_plt_entry, /* pic_plt_entry */
788 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
789 2, /* plt_got_offset */
790 0, /* plt_got_insn_size */
791 elf_i386_eh_frame_non_lazy_plt, /* eh_frame_plt */
f604c2a2 792 sizeof (elf_i386_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
25e762b9 793 };
ee2fdd6f 794
765e526c 795static const struct elf_x86_lazy_plt_layout elf_i386_lazy_ibt_plt =
ee2fdd6f 796 {
07d6d2b8 797 elf_i386_lazy_ibt_plt0_entry, /* plt0_entry */
ee2fdd6f 798 sizeof (elf_i386_lazy_ibt_plt0_entry), /* plt0_entry_size */
07d6d2b8
AM		 799 elf_i386_lazy_ibt_plt_entry, /* plt_entry */
800 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
801 2, /* plt0_got1_offset */
802 8, /* plt0_got2_offset */
803 0, /* plt0_got2_insn_end */
804 4+2, /* plt_got_offset */
805 4+1, /* plt_reloc_offset */
806 4+6, /* plt_plt_offset */
807 0, /* plt_got_insn_size */
808 0, /* plt_plt_insn_end */
809 0, /* plt_lazy_offset */
810 elf_i386_pic_lazy_ibt_plt0_entry, /* pic_plt0_entry */
811 elf_i386_lazy_ibt_plt_entry, /* pic_plt_entry */
812 elf_i386_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
ee2fdd6f
L		 813 sizeof (elf_i386_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
814 };
815
765e526c 816static const struct elf_x86_non_lazy_plt_layout elf_i386_non_lazy_ibt_plt =
ee2fdd6f 817 {
07d6d2b8 818 elf_i386_non_lazy_ibt_plt_entry, /* plt_entry */
ee2fdd6f 819 elf_i386_pic_non_lazy_ibt_plt_entry,/* pic_plt_entry */
07d6d2b8
AM		 820 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
821 4+2, /* plt_got_offset */
822 0, /* plt_got_insn_size */
823 elf_i386_eh_frame_non_lazy_plt, /* eh_frame_plt */
ee2fdd6f
L		 824 sizeof (elf_i386_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
825 };
25e762b9
RM		 826\f
827
eac338cf
PB		 828/* On VxWorks, the .rel.plt.unloaded section has absolute relocations
829 for the PLTResolve stub and then for each PLT entry. */
830#define PLTRESOLVE_RELOCS_SHLIB 0
831#define PLTRESOLVE_RELOCS 2
832#define PLT_NON_JUMP_SLOT_RELOCS 2
833
23209a78 834/* These are the standard parameters. */
851b6fa1 835static const struct elf_x86_backend_data elf_i386_arch_bed =
23209a78 836 {
07d6d2b8 837 is_normal /* os */
23209a78
RM		 838 };
839
840#define elf_backend_arch_data &elf_i386_arch_bed
841
142411ca
L		 842/* Return TRUE if the TLS access code sequence support transition
843 from R_TYPE. */
844
845static bfd_boolean
bedfd056 846elf_i386_check_tls_transition (asection *sec,
142411ca
L		 847 bfd_byte *contents,
848 Elf_Internal_Shdr *symtab_hdr,
849 struct elf_link_hash_entry **sym_hashes,
850 unsigned int r_type,
851 const Elf_Internal_Rela *rel,
852 const Elf_Internal_Rela *relend)
13ae64f3 853{
6eaa7fb5 854 unsigned int val, type, reg;
142411ca
L		 855 unsigned long r_symndx;
856 struct elf_link_hash_entry *h;
857 bfd_vma offset;
6eaa7fb5 858 bfd_byte *call;
1d4af308 859 bfd_boolean indirect_call;
142411ca 860
142411ca 861 offset = rel->r_offset;
13ae64f3 862 switch (r_type)
142411ca
L		 863 {
864 case R_386_TLS_GD:
865 case R_386_TLS_LDM:
866 if (offset < 2 || (rel + 1) >= relend)
867 return FALSE;
868
6eaa7fb5
L		 869 indirect_call = FALSE;
870 call = contents + offset + 4;
871 val = *(call - 5);
872 type = *(call - 6);
142411ca
L		 873 if (r_type == R_386_TLS_GD)
874 {
09e8c3bf 875 /* Check transition from GD access model. Only
6eaa7fb5
L		 876 leal foo@tlsgd(,%ebx,1), %eax
877 call ___tls_get_addr@PLT
878 or
879 leal foo@tlsgd(%ebx) %eax
880 call ___tls_get_addr@PLT
881 nop
882 or
883 leal foo@tlsgd(%reg), %eax
884 call *___tls_get_addr@GOT(%reg)
885 which may be converted to
886 addr32 call ___tls_get_addr
142411ca 887 can transit to different access model. */
6eaa7fb5
L		 888 if ((offset + 10) > sec->size
889 || (type != 0x8d && type != 0x04))
142411ca
L		 890 return FALSE;
891
142411ca
L		 892 if (type == 0x04)
893 {
6eaa7fb5
L		 894 /* leal foo@tlsgd(,%ebx,1), %eax
895 call ___tls_get_addr@PLT */
142411ca
L		 896 if (offset < 3)
897 return FALSE;
898
6eaa7fb5
L		 899 if (*(call - 7) != 0x8d
900 || val != 0x1d
901 || call[0] != 0xe8)
142411ca
L		 902 return FALSE;
903 }
904 else
905 {
6eaa7fb5
L		 906 /* This must be
907 leal foo@tlsgd(%ebx), %eax
908 call ___tls_get_addr@PLT
909 nop
910 or
911 leal foo@tlsgd(%reg), %eax
912 call *___tls_get_addr@GOT(%reg)
913 which may be converted to
914 addr32 call ___tls_get_addr
915
916 %eax can't be used as the GOT base register since it
917 is used to pass parameter to ___tls_get_addr. */
918 reg = val & 7;
919 if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0)
142411ca
L		 920 return FALSE;
921
6eaa7fb5
L		 922 indirect_call = call[0] == 0xff;
923 if (!(reg == 3 && call[0] == 0xe8 && call[5] == 0x90)
924 && !(call[0] == 0x67 && call[1] == 0xe8)
925 && !(indirect_call
926 && (call[1] & 0xf8) == 0x90
927 && (call[1] & 0x7) == reg))
142411ca
L		 928 return FALSE;
929 }
930 }
931 else
932 {
933 /* Check transition from LD access model. Only
6eaa7fb5
L		 934 leal foo@tlsldm(%ebx), %eax
935 call ___tls_get_addr@PLT
936 or
937 leal foo@tlsldm(%reg), %eax
938 call *___tls_get_addr@GOT(%reg)
939 which may be converted to
940 addr32 call ___tls_get_addr
142411ca
L		 941 can transit to different access model. */
942 if (type != 0x8d || (offset + 9) > sec->size)
943 return FALSE;
944
6eaa7fb5
L		 945 /* %eax can't be used as the GOT base register since it is
946 used to pass parameter to ___tls_get_addr. */
947 reg = val & 7;
948 if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0)
142411ca 949 return FALSE;
142411ca 950
6eaa7fb5
L		 951 indirect_call = call[0] == 0xff;
952 if (!(reg == 3 && call[0] == 0xe8)
953 && !(call[0] == 0x67 && call[1] == 0xe8)
954 && !(indirect_call
955 && (call[1] & 0xf8) == 0x90
956 && (call[1] & 0x7) == reg))
957 return FALSE;
958 }
142411ca
L		 959
960 r_symndx = ELF32_R_SYM (rel[1].r_info);
961 if (r_symndx < symtab_hdr->sh_info)
962 return FALSE;
963
964 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1d4af308 965 if (h == NULL
0afcef53 966 || !((struct elf_x86_link_hash_entry *) h)->tls_get_addr)
6eaa7fb5
L		 967 return FALSE;
968 else if (indirect_call)
969 return (ELF32_R_TYPE (rel[1].r_info) == R_386_GOT32X);
970 else
971 return (ELF32_R_TYPE (rel[1].r_info) == R_386_PC32
972 || ELF32_R_TYPE (rel[1].r_info) == R_386_PLT32);
142411ca
L		 973
974 case R_386_TLS_IE:
975 /* Check transition from IE access model:
976 movl foo@indntpoff(%rip), %eax
977 movl foo@indntpoff(%rip), %reg
978 addl foo@indntpoff(%rip), %reg
979 */
980
981 if (offset < 1 || (offset + 4) > sec->size)
982 return FALSE;
983
984 /* Check "movl foo@tpoff(%rip), %eax" first. */
985 val = bfd_get_8 (abfd, contents + offset - 1);
986 if (val == 0xa1)
987 return TRUE;
988
989 if (offset < 2)
990 return FALSE;
991
992 /* Check movl|addl foo@tpoff(%rip), %reg. */
993 type = bfd_get_8 (abfd, contents + offset - 2);
994 return ((type == 0x8b || type == 0x03)
995 && (val & 0xc7) == 0x05);
996
997 case R_386_TLS_GOTIE:
998 case R_386_TLS_IE_32:
999 /* Check transition from {IE_32,GOTIE} access model:
1000 subl foo@{tpoff,gontoff}(%reg1), %reg2
1001 movl foo@{tpoff,gontoff}(%reg1), %reg2
1002 addl foo@{tpoff,gontoff}(%reg1), %reg2
1003 */
1004
1005 if (offset < 2 || (offset + 4) > sec->size)
1006 return FALSE;
1007
1008 val = bfd_get_8 (abfd, contents + offset - 1);
1009 if ((val & 0xc0) != 0x80 || (val & 7) == 4)
1010 return FALSE;
1011
1012 type = bfd_get_8 (abfd, contents + offset - 2);
1013 return type == 0x8b || type == 0x2b || type == 0x03;
1014
1015 case R_386_TLS_GOTDESC:
1016 /* Check transition from GDesc access model:
1017 leal x@tlsdesc(%ebx), %eax
1018
1019 Make sure it's a leal adding ebx to a 32-bit offset
1020 into any register, although it's probably almost always
1021 going to be eax. */
1022
1023 if (offset < 2 || (offset + 4) > sec->size)
1024 return FALSE;
1025
1026 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1027 return FALSE;
1028
1029 val = bfd_get_8 (abfd, contents + offset - 1);
1030 return (val & 0xc7) == 0x83;
1031
1032 case R_386_TLS_DESC_CALL:
1033 /* Check transition from GDesc access model:
6eaa7fb5 1034 call *x@tlsdesc(%eax)
142411ca
L		 1035 */
1036 if (offset + 2 <= sec->size)
1037 {
6eaa7fb5
L		 1038 /* Make sure that it's a call *x@tlsdesc(%eax). */
1039 call = contents + offset;
1040 return call[0] == 0xff && call[1] == 0x10;
142411ca
L		 1041 }
1042
1043 return FALSE;
1044
1045 default:
1046 abort ();
1047 }
1048}
1049
1050/* Return TRUE if the TLS access transition is OK or no transition
1051 will be performed. Update R_TYPE if there is a transition. */
1052
1053static bfd_boolean
1054elf_i386_tls_transition (struct bfd_link_info *info, bfd *abfd,
1055 asection *sec, bfd_byte *contents,
1056 Elf_Internal_Shdr *symtab_hdr,
1057 struct elf_link_hash_entry **sym_hashes,
1058 unsigned int *r_type, int tls_type,
1059 const Elf_Internal_Rela *rel,
1060 const Elf_Internal_Rela *relend,
4c544807 1061 struct elf_link_hash_entry *h,
bedfd056
L		 1062 unsigned long r_symndx,
1063 bfd_boolean from_relocate_section)
142411ca
L		 1064{
1065 unsigned int from_type = *r_type;
1066 unsigned int to_type = from_type;
1067 bfd_boolean check = TRUE;
1068
bb1cb422
L		 1069 /* Skip TLS transition for functions. */
1070 if (h != NULL
1071 && (h->type == STT_FUNC
1072 || h->type == STT_GNU_IFUNC))
1073 return TRUE;
1074
142411ca 1075 switch (from_type)
13ae64f3
JJ		 1076 {
1077 case R_386_TLS_GD:
67a4f2b7
AO		 1078 case R_386_TLS_GOTDESC:
1079 case R_386_TLS_DESC_CALL:
13ae64f3 1080 case R_386_TLS_IE_32:
37e55690
JJ		 1081 case R_386_TLS_IE:
1082 case R_386_TLS_GOTIE:
0e1862bb 1083 if (bfd_link_executable (info))
142411ca
L		 1084 {
1085 if (h == NULL)
1086 to_type = R_386_TLS_LE_32;
1087 else if (from_type != R_386_TLS_IE
1088 && from_type != R_386_TLS_GOTIE)
1089 to_type = R_386_TLS_IE_32;
1090 }
1091
bedfd056
L		 1092 /* When we are called from elf_i386_relocate_section, there may
1093 be additional transitions based on TLS_TYPE. */
1094 if (from_relocate_section)
142411ca
L		 1095 {
1096 unsigned int new_to_type = to_type;
1097
51537393 1098 if (TLS_TRANSITION_IE_TO_LE_P (info, h, tls_type))
142411ca
L		 1099 new_to_type = R_386_TLS_LE_32;
1100
1101 if (to_type == R_386_TLS_GD
1102 || to_type == R_386_TLS_GOTDESC
1103 || to_type == R_386_TLS_DESC_CALL)
1104 {
1105 if (tls_type == GOT_TLS_IE_POS)
1106 new_to_type = R_386_TLS_GOTIE;
1107 else if (tls_type & GOT_TLS_IE)
1108 new_to_type = R_386_TLS_IE_32;
1109 }
1110
1111 /* We checked the transition before when we were called from
1112 elf_i386_check_relocs. We only want to check the new
1113 transition which hasn't been checked before. */
1114 check = new_to_type != to_type && from_type == to_type;
1115 to_type = new_to_type;
1116 }
1117
1118 break;
1119
13ae64f3 1120 case R_386_TLS_LDM:
0e1862bb 1121 if (bfd_link_executable (info))
142411ca
L		 1122 to_type = R_386_TLS_LE_32;
1123 break;
1124
1125 default:
1126 return TRUE;
1127 }
1128
1129 /* Return TRUE if there is no transition. */
1130 if (from_type == to_type)
1131 return TRUE;
1132
1133 /* Check if the transition can be performed. */
1134 if (check
bedfd056 1135 && ! elf_i386_check_tls_transition (sec, contents,
142411ca
L		 1136 symtab_hdr, sym_hashes,
1137 from_type, rel, relend))
1138 {
2f629d23 1139 reloc_howto_type *from, *to;
4c544807 1140 const char *name;
142411ca
L		 1141
1142 from = elf_i386_rtype_to_howto (abfd, from_type);
1143 to = elf_i386_rtype_to_howto (abfd, to_type);
1144
4c544807
L		 1145 if (h)
1146 name = h->root.root.string;
1147 else
1148 {
0afcef53 1149 struct elf_x86_link_hash_table *htab;
4dfe6ac6 1150
0afcef53 1151 htab = elf_x86_hash_table (info, I386_ELF_DATA);
4dfe6ac6
NC		 1152 if (htab == NULL)
1153 name = "*unknown*";
1154 else
1155 {
1156 Elf_Internal_Sym *isym;
1157
1158 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1159 abfd, r_symndx);
1160 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1161 }
4c544807
L		 1162 }
1163
4eca0228 1164 _bfd_error_handler
695344c0 1165 /* xgettext:c-format */
2dcf00ce
AM		 1166 (_("%pB: TLS transition from %s to %s against `%s'"
1167 " at %#" PRIx64 " in section `%pA' failed"),
c08bb8dd 1168 abfd, from->name, to->name, name,
2dcf00ce 1169 (uint64_t) rel->r_offset, sec);
142411ca
L		 1170 bfd_set_error (bfd_error_bad_value);
1171 return FALSE;
13ae64f3
JJ		 1172 }
1173
142411ca
L		 1174 *r_type = to_type;
1175 return TRUE;
13ae64f3
JJ		 1176}
1177
c175a657
L		 1178/* With the local symbol, foo, we convert
1179 mov foo@GOT[(%reg1)], %reg2
1180 to
1181 lea foo[@GOTOFF(%reg1)], %reg2
1182 and convert
1183 call/jmp *foo@GOT[(%reg)]
1184 to
1185 nop call foo/jmp foo nop
1186 When PIC is false, convert
1187 test %reg1, foo@GOT[(%reg2)]
1188 to
1189 test $foo, %reg1
1190 and convert
1191 binop foo@GOT[(%reg1)], %reg2
1192 to
1193 binop $foo, %reg2
1194 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1195 instructions. */
1196
1197static
1198bfd_boolean
1199elf_i386_convert_load_reloc (bfd *abfd, Elf_Internal_Shdr *symtab_hdr,
1200 bfd_byte *contents,
6999821f 1201 unsigned int *r_type_p,
c175a657
L		 1202 Elf_Internal_Rela *irel,
1203 struct elf_link_hash_entry *h,
5e5e02ae 1204 bfd_boolean *converted,
c175a657
L		 1205 struct bfd_link_info *link_info)
1206{
0afcef53 1207 struct elf_x86_link_hash_table *htab;
c175a657
L		 1208 unsigned int opcode;
1209 unsigned int modrm;
1210 bfd_boolean baseless;
1211 Elf_Internal_Sym *isym;
1212 unsigned int addend;
1213 unsigned int nop;
1214 bfd_vma nop_offset;
1215 bfd_boolean is_pic;
1216 bfd_boolean to_reloc_32;
1217 unsigned int r_type;
1218 unsigned int r_symndx;
1219 bfd_vma roff = irel->r_offset;
0a27fed7
L		 1220 bfd_boolean local_ref;
1221 struct elf_x86_link_hash_entry *eh;
c175a657
L		 1222
1223 if (roff < 2)
1224 return TRUE;
1225
7d4d9709 1226 /* Addend for R_386_GOT32X relocations must be 0. */
c175a657
L		 1227 addend = bfd_get_32 (abfd, contents + roff);
1228 if (addend != 0)
1229 return TRUE;
1230
0afcef53 1231 htab = elf_x86_hash_table (link_info, I386_ELF_DATA);
c175a657
L		 1232 is_pic = bfd_link_pic (link_info);
1233
6999821f 1234 r_type = *r_type_p;
c175a657
L		 1235 r_symndx = ELF32_R_SYM (irel->r_info);
1236
1237 modrm = bfd_get_8 (abfd, contents + roff - 1);
1238 baseless = (modrm & 0xc7) == 0x5;
1239
7d4d9709 1240 if (baseless && is_pic)
c175a657
L		 1241 {
1242 /* For PIC, disallow R_386_GOT32X without a base register
7d4d9709 1243 since we don't know what the GOT base is. */
c175a657
L		 1244 const char *name;
1245
1246 if (h == NULL)
1247 {
1248 isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd,
1249 r_symndx);
1250 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1251 }
1252 else
1253 name = h->root.root.string;
1254
4eca0228 1255 _bfd_error_handler
695344c0 1256 /* xgettext:c-format */
871b3ab2 1257 (_("%pB: direct GOT relocation R_386_GOT32X against `%s' without base"
63a5468a 1258 " register can not be used when making a shared object"),
c175a657
L		 1259 abfd, name);
1260 return FALSE;
1261 }
1262
1263 opcode = bfd_get_8 (abfd, contents + roff - 2);
1264
c175a657
L		 1265 /* Convert to R_386_32 if PIC is false or there is no base
1266 register. */
1267 to_reloc_32 = !is_pic || baseless;
1268
0a27fed7
L		 1269 eh = elf_x86_hash_entry (h);
1270
7d4d9709
L		 1271 /* Try to convert R_386_GOT32X. Get the symbol referred to by the
1272 reloc. */
c175a657
L		 1273 if (h == NULL)
1274 {
1275 if (opcode == 0x0ff)
1276 /* Convert "call/jmp *foo@GOT[(%reg)]". */
1277 goto convert_branch;
1278 else
1279 /* Convert "mov foo@GOT[(%reg1)], %reg2",
1280 "test %reg1, foo@GOT(%reg2)" and
1281 "binop foo@GOT[(%reg1)], %reg2". */
1282 goto convert_load;
1283 }
1284
0a27fed7
L		 1285 /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P. */
1286 local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
1287
c175a657
L		 1288 /* Undefined weak symbol is only bound locally in executable
1289 and its reference is resolved as 0. */
0a27fed7
L		 1290 if (h->root.type == bfd_link_hash_undefweak
1291 && !eh->linker_def
1292 && local_ref)
c175a657
L		 1293 {
1294 if (opcode == 0xff)
1295 {
1296 /* No direct branch to 0 for PIC. */
1297 if (is_pic)
1298 return TRUE;
1299 else
1300 goto convert_branch;
1301 }
1302 else
1303 {
1304 /* We can convert load of address 0 to R_386_32. */
1305 to_reloc_32 = TRUE;
1306 goto convert_load;
1307 }
1308 }
1309
1310 if (opcode == 0xff)
1311 {
1312 /* We have "call/jmp *foo@GOT[(%reg)]". */
1313 if ((h->root.type == bfd_link_hash_defined
1314 || h->root.type == bfd_link_hash_defweak)
0a27fed7 1315 && local_ref)
c175a657
L		 1316 {
1317 /* The function is locally defined. */
1318convert_branch:
1319 /* Convert R_386_GOT32X to R_386_PC32. */
1320 if (modrm == 0x15 || (modrm & 0xf8) == 0x90)
1321 {
1322 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
1323 is a nop prefix. */
1324 modrm = 0xe8;
6eaa7fb5
L		 1325 /* To support TLS optimization, always use addr32 prefix
1326 for "call *___tls_get_addr@GOT(%reg)". */
1d4af308 1327 if (eh && eh->tls_get_addr)
c175a657 1328 {
6eaa7fb5
L		 1329 nop = 0x67;
1330 nop_offset = irel->r_offset - 2;
c175a657
L		 1331 }
1332 else
6eaa7fb5
L		 1333 {
1334 nop = link_info->call_nop_byte;
1335 if (link_info->call_nop_as_suffix)
1336 {
1337 nop_offset = roff + 3;
1338 irel->r_offset -= 1;
1339 }
1340 else
1341 nop_offset = roff - 2;
1342 }
c175a657
L		 1343 }
1344 else
1345 {
1346 /* Convert to "jmp foo nop". */
1347 modrm = 0xe9;
1348 nop = NOP_OPCODE;
1349 nop_offset = roff + 3;
1350 irel->r_offset -= 1;
1351 }
1352
1353 bfd_put_8 (abfd, nop, contents + nop_offset);
1354 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1355 /* When converting to PC-relative relocation, we
1356 need to adjust addend by -4. */
1357 bfd_put_32 (abfd, -4, contents + irel->r_offset);
1358 irel->r_info = ELF32_R_INFO (r_symndx, R_386_PC32);
6999821f 1359 *r_type_p = R_386_PC32;
5e5e02ae 1360 *converted = TRUE;
c175a657
L		 1361 }
1362 }
1363 else
1364 {
1365 /* We have "mov foo@GOT[(%re1g)], %reg2",
1366 "test %reg1, foo@GOT(%reg2)" and
1367 "binop foo@GOT[(%reg1)], %reg2".
1368
1369 Avoid optimizing _DYNAMIC since ld.so may use its
1370 link-time address. */
1371 if (h == htab->elf.hdynamic)
1372 return TRUE;
1373
1374 /* def_regular is set by an assignment in a linker script in
cbd0eecf
L		 1375 bfd_elf_record_link_assignment. start_stop is set on
1376 __start_SECNAME/__stop_SECNAME which mark section SECNAME. */
1377 if (h->start_stop
0a27fed7 1378 || eh->linker_def
cbd0eecf
L		 1379 || ((h->def_regular
1380 || h->root.type == bfd_link_hash_defined
1381 || h->root.type == bfd_link_hash_defweak)
0a27fed7 1382 && local_ref))
c175a657
L		 1383 {
1384convert_load:
1385 if (opcode == 0x8b)
1386 {
1387 if (to_reloc_32)
1388 {
1389 /* Convert "mov foo@GOT[(%reg1)], %reg2" to
1390 "mov $foo, %reg2" with R_386_32. */
1391 r_type = R_386_32;
1392 modrm = 0xc0 | (modrm & 0x38) >> 3;
1393 bfd_put_8 (abfd, modrm, contents + roff - 1);
1394 opcode = 0xc7;
1395 }
1396 else
1397 {
1398 /* Convert "mov foo@GOT(%reg1), %reg2" to
1399 "lea foo@GOTOFF(%reg1), %reg2". */
1400 r_type = R_386_GOTOFF;
1401 opcode = 0x8d;
1402 }
1403 }
1404 else
1405 {
1406 /* Only R_386_32 is supported. */
1407 if (!to_reloc_32)
1408 return TRUE;
1409
1410 if (opcode == 0x85)
1411 {
1412 /* Convert "test %reg1, foo@GOT(%reg2)" to
1413 "test $foo, %reg1". */
1414 modrm = 0xc0 | (modrm & 0x38) >> 3;
1415 opcode = 0xf7;
1416 }
1417 else
1418 {
1419 /* Convert "binop foo@GOT(%reg1), %reg2" to
1420 "binop $foo, %reg2". */
1421 modrm = (0xc0
1422 | (modrm & 0x38) >> 3
1423 | (opcode & 0x3c));
1424 opcode = 0x81;
1425 }
1426 bfd_put_8 (abfd, modrm, contents + roff - 1);
1427 r_type = R_386_32;
1428 }
1429
1430 bfd_put_8 (abfd, opcode, contents + roff - 2);
1431 irel->r_info = ELF32_R_INFO (r_symndx, r_type);
6999821f 1432 *r_type_p = r_type;
5e5e02ae 1433 *converted = TRUE;
c175a657
L		 1434 }
1435 }
1436
1437 return TRUE;
1438}
1439
c1d11331
L		 1440/* Rename some of the generic section flags to better document how they
1441 are used here. */
6999821f 1442#define check_relocs_failed sec_flg0
c1d11331 1443
252b5132 1444/* Look through the relocs for a section during the first phase, and
0ac8d2ca
AM		 1445 calculate needed space in the global offset table, procedure linkage
1446 table, and dynamic reloc sections. */
252b5132 1447
b34976b6 1448static bfd_boolean
55fd94b0
AM		 1449elf_i386_check_relocs (bfd *abfd,
1450 struct bfd_link_info *info,
1451 asection *sec,
1452 const Elf_Internal_Rela *relocs)
252b5132 1453{
0afcef53 1454 struct elf_x86_link_hash_table *htab;
252b5132
RH		 1455 Elf_Internal_Shdr *symtab_hdr;
1456 struct elf_link_hash_entry **sym_hashes;
252b5132
RH		 1457 const Elf_Internal_Rela *rel;
1458 const Elf_Internal_Rela *rel_end;
252b5132 1459 asection *sreloc;
bedfd056 1460 bfd_byte *contents;
5e5e02ae 1461 bfd_boolean converted;
252b5132 1462
0e1862bb 1463 if (bfd_link_relocatable (info))
b34976b6 1464 return TRUE;
252b5132 1465
081b1afe
L		 1466 /* Don't do anything special with non-loaded, non-alloced sections.
1467 In particular, any relocs in such sections should not affect GOT
1468 and PLT reference counting (ie. we don't allow them to create GOT
1469 or PLT entries), there's no possibility or desire to optimize TLS
1470 relocs, and there's not much point in propagating relocs to shared
1471 libs that the dynamic linker won't relocate. */
1472 if ((sec->flags & SEC_ALLOC) == 0)
1473 return TRUE;
1474
0afcef53 1475 htab = elf_x86_hash_table (info, I386_ELF_DATA);
4dfe6ac6 1476 if (htab == NULL)
c337a162
L		 1477 {
1478 sec->check_relocs_failed = 1;
1479 return FALSE;
1480 }
4dfe6ac6 1481
fe53b4a4
L		 1482 BFD_ASSERT (is_x86_elf (abfd, htab));
1483
bedfd056
L		 1484 /* Get the section contents. */
1485 if (elf_section_data (sec)->this_hdr.contents != NULL)
1486 contents = elf_section_data (sec)->this_hdr.contents;
1487 else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1488 {
1489 sec->check_relocs_failed = 1;
1490 return FALSE;
1491 }
1492
0ffa91dd 1493 symtab_hdr = &elf_symtab_hdr (abfd);
252b5132 1494 sym_hashes = elf_sym_hashes (abfd);
252b5132 1495
5e5e02ae
L		 1496 converted = FALSE;
1497
252b5132
RH		 1498 sreloc = NULL;
1499
1500 rel_end = relocs + sec->reloc_count;
1501 for (rel = relocs; rel < rel_end; rel++)
1502 {
13ae64f3 1503 unsigned int r_type;
d42c267e 1504 unsigned int r_symndx;
252b5132 1505 struct elf_link_hash_entry *h;
0afcef53 1506 struct elf_x86_link_hash_entry *eh;
4c544807
L		 1507 Elf_Internal_Sym *isym;
1508 const char *name;
06a6a421 1509 bfd_boolean size_reloc;
252b5132
RH		 1510
1511 r_symndx = ELF32_R_SYM (rel->r_info);
13ae64f3 1512 r_type = ELF32_R_TYPE (rel->r_info);
252b5132 1513
d9bc7a44 1514 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
f5f31454 1515 {
695344c0 1516 /* xgettext:c-format */
871b3ab2 1517 _bfd_error_handler (_("%pB: bad symbol index: %d"),
4eca0228 1518 abfd, r_symndx);
c337a162 1519 goto error_return;
f5f31454
L		 1520 }
1521
252b5132 1522 if (r_symndx < symtab_hdr->sh_info)
c25bc9fc
L		 1523 {
1524 /* A local symbol. */
c2e61a4e
L		 1525 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1526 abfd, r_symndx);
1527 if (isym == NULL)
c337a162 1528 goto error_return;
c25bc9fc
L		 1529
1530 /* Check relocation against local STT_GNU_IFUNC symbol. */
c25bc9fc
L		 1531 if (ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1532 {
0afcef53 1533 h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel, TRUE);
c25bc9fc 1534 if (h == NULL)
c337a162 1535 goto error_return;
6bbec505 1536
c25bc9fc 1537 /* Fake a STT_GNU_IFUNC symbol. */
6322e5c5
L		 1538 h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1539 isym, NULL);
c25bc9fc
L		 1540 h->type = STT_GNU_IFUNC;
1541 h->def_regular = 1;
1542 h->ref_regular = 1;
1543 h->forced_local = 1;
1544 h->root.type = bfd_link_hash_defined;
1545 }
1546 else
1547 h = NULL;
1548 }
252b5132 1549 else
71cb9464 1550 {
4c544807 1551 isym = NULL;
71cb9464
L		 1552 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1553 while (h->root.type == bfd_link_hash_indirect
1554 || h->root.type == bfd_link_hash_warning)
1555 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c25bc9fc 1556 }
cbe950e9 1557
0afcef53 1558 eh = (struct elf_x86_link_hash_entry *) h;
c25bc9fc
L		 1559 if (h != NULL)
1560 {
f604c2a2
L		 1561 if (r_type == R_386_GOTOFF)
1562 eh->gotoff_ref = 1;
cbe950e9 1563
ad1e85de
L		 1564 /* It is referenced by a non-shared object. */
1565 h->ref_regular = 1;
13a2df29
L		 1566
1567 if (h->type == STT_GNU_IFUNC)
1568 elf_tdata (info->output_bfd)->has_gnu_symbols
1569 |= elf_gnu_symbol_ifunc;
71cb9464 1570 }
252b5132 1571
6999821f
L		 1572 if (r_type == R_386_GOT32X
1573 && (h == NULL || h->type != STT_GNU_IFUNC))
1574 {
1575 Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1576 if (!elf_i386_convert_load_reloc (abfd, symtab_hdr, contents,
5e5e02ae
L		 1577 &r_type, irel, h,
1578 &converted, info))
6999821f
L		 1579 goto error_return;
1580 }
1581
bedfd056 1582 if (! elf_i386_tls_transition (info, abfd, sec, contents,
142411ca
L		 1583 symtab_hdr, sym_hashes,
1584 &r_type, GOT_UNKNOWN,
bedfd056 1585 rel, rel_end, h, r_symndx, FALSE))
c337a162 1586 goto error_return;
13ae64f3 1587
cd048363
L		 1588 /* Check if _GLOBAL_OFFSET_TABLE_ is referenced. */
1589 if (h == htab->elf.hgot)
1590 htab->got_referenced = TRUE;
1591
13ae64f3 1592 switch (r_type)
252b5132 1593 {
37e55690 1594 case R_386_TLS_LDM:
0f09b4d8 1595 htab->tls_ld_or_ldm_got.refcount = 1;
37e55690
JJ		 1596 goto create_got;
1597
1598 case R_386_PLT32:
1599 /* This symbol requires a procedure linkage table entry. We
1600 actually build the entry in adjust_dynamic_symbol,
1601 because this might be a case of linking PIC code which is
1602 never referenced by a dynamic object, in which case we
1603 don't need to generate a procedure linkage table entry
1604 after all. */
1605
1606 /* If this is a local symbol, we resolve it directly without
1607 creating a procedure linkage table entry. */
1608 if (h == NULL)
1609 continue;
1610
98b273dc 1611 eh->zero_undefweak &= 0x2;
f5385ebf 1612 h->needs_plt = 1;
79b0c981 1613 h->plt.refcount = 1;
37e55690
JJ		 1614 break;
1615
6a3e1bae 1616 case R_386_SIZE32:
06a6a421 1617 size_reloc = TRUE;
6a3e1bae
L		 1618 goto do_size;
1619
13ae64f3 1620 case R_386_TLS_IE_32:
37e55690
JJ		 1621 case R_386_TLS_IE:
1622 case R_386_TLS_GOTIE:
0e1862bb 1623 if (!bfd_link_executable (info))
13ae64f3 1624 info->flags |= DF_STATIC_TLS;
37e55690
JJ		 1625 /* Fall through */
1626
252b5132 1627 case R_386_GOT32:
02a86693 1628 case R_386_GOT32X:
13ae64f3 1629 case R_386_TLS_GD:
67a4f2b7
AO		 1630 case R_386_TLS_GOTDESC:
1631 case R_386_TLS_DESC_CALL:
252b5132 1632 /* This symbol requires a global offset table entry. */
13ae64f3
JJ		 1633 {
1634 int tls_type, old_tls_type;
1635
1636 switch (r_type)
1637 {
1638 default:
02a86693
L		 1639 case R_386_GOT32:
1640 case R_386_GOT32X:
1641 tls_type = GOT_NORMAL;
1642 break;
13ae64f3 1643 case R_386_TLS_GD: tls_type = GOT_TLS_GD; break;
67a4f2b7
AO		 1644 case R_386_TLS_GOTDESC:
1645 case R_386_TLS_DESC_CALL:
1646 tls_type = GOT_TLS_GDESC; break;
37e55690
JJ		 1647 case R_386_TLS_IE_32:
1648 if (ELF32_R_TYPE (rel->r_info) == r_type)
1649 tls_type = GOT_TLS_IE_NEG;
1650 else
ebcfb3c0
JJ		 1651 /* If this is a GD->IE transition, we may use either of
1652 R_386_TLS_TPOFF and R_386_TLS_TPOFF32. */
37e55690
JJ		 1653 tls_type = GOT_TLS_IE;
1654 break;
1655 case R_386_TLS_IE:
1656 case R_386_TLS_GOTIE:
1657 tls_type = GOT_TLS_IE_POS; break;
13ae64f3
JJ		 1658 }
1659
1660 if (h != NULL)
1661 {
0f09b4d8 1662 h->got.refcount = 1;
0afcef53 1663 old_tls_type = elf_x86_hash_entry (h)->tls_type;
13ae64f3
JJ		 1664 }
1665 else
1666 {
1667 bfd_signed_vma *local_got_refcounts;
1668
1669 /* This is a global offset table entry for a local symbol. */
1670 local_got_refcounts = elf_local_got_refcounts (abfd);
1671 if (local_got_refcounts == NULL)
1672 {
1673 bfd_size_type size;
1674
1675 size = symtab_hdr->sh_info;
67a4f2b7
AO		 1676 size *= (sizeof (bfd_signed_vma)
1677 + sizeof (bfd_vma) + sizeof(char));
a50b1753 1678 local_got_refcounts = (bfd_signed_vma *)
07d6d2b8 1679 bfd_zalloc (abfd, size);
13ae64f3 1680 if (local_got_refcounts == NULL)
c337a162 1681 goto error_return;
13ae64f3 1682 elf_local_got_refcounts (abfd) = local_got_refcounts;
0afcef53 1683 elf_x86_local_tlsdesc_gotent (abfd)
67a4f2b7 1684 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
0afcef53 1685 elf_x86_local_got_tls_type (abfd)
67a4f2b7 1686 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
13ae64f3 1687 }
0f09b4d8 1688 local_got_refcounts[r_symndx] = 1;
0afcef53 1689 old_tls_type = elf_x86_local_got_tls_type (abfd) [r_symndx];
13ae64f3
JJ		 1690 }
1691
37e55690
JJ		 1692 if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE))
1693 tls_type |= old_tls_type;
13ae64f3
JJ		 1694 /* If a TLS symbol is accessed using IE at least once,
1695 there is no point to use dynamic model for it. */
ebcfb3c0 1696 else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7 1697 && (! GOT_TLS_GD_ANY_P (old_tls_type)
37e55690 1698 || (tls_type & GOT_TLS_IE) == 0))
13ae64f3 1699 {
67a4f2b7 1700 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type))
37e55690 1701 tls_type = old_tls_type;
67a4f2b7
AO		 1702 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1703 && GOT_TLS_GD_ANY_P (tls_type))
1704 tls_type |= old_tls_type;
13ae64f3
JJ		 1705 else
1706 {
09a24cbf 1707 if (h)
4c544807
L		 1708 name = h->root.root.string;
1709 else
1710 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1711 NULL);
4eca0228 1712 _bfd_error_handler
695344c0 1713 /* xgettext:c-format */
871b3ab2 1714 (_("%pB: `%s' accessed both as normal and "
55fd94b0 1715 "thread local symbol"),
4c544807 1716 abfd, name);
68c4a57e 1717 bfd_set_error (bfd_error_bad_value);
c337a162 1718 goto error_return;
13ae64f3
JJ		 1719 }
1720 }
1721
1722 if (old_tls_type != tls_type)
1723 {
1724 if (h != NULL)
0afcef53 1725 elf_x86_hash_entry (h)->tls_type = tls_type;
13ae64f3 1726 else
0afcef53 1727 elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
13ae64f3
JJ		 1728 }
1729 }
0ac8d2ca
AM		 1730 /* Fall through */
1731
1732 case R_386_GOTOFF:
1733 case R_386_GOTPC:
cd048363 1734create_got:
37e55690 1735 if (r_type != R_386_TLS_IE)
aec6b87e
L		 1736 {
1737 if (eh != NULL)
cd048363
L		 1738 {
1739 eh->zero_undefweak &= 0x2;
1740
1741 /* Need GOT to resolve undefined weak symbol to 0. */
1742 if (r_type == R_386_GOTOFF
1743 && h->root.type == bfd_link_hash_undefweak
1744 && bfd_link_executable (info))
1745 htab->got_referenced = TRUE;
1746 }
aec6b87e
L		 1747 break;
1748 }
37e55690 1749 /* Fall through */
252b5132 1750
37e55690
JJ		 1751 case R_386_TLS_LE_32:
1752 case R_386_TLS_LE:
aec6b87e 1753 if (eh != NULL)
98b273dc 1754 eh->zero_undefweak &= 0x2;
0e1862bb 1755 if (bfd_link_executable (info))
37e55690 1756 break;
bffbf940 1757 info->flags |= DF_STATIC_TLS;
aec6b87e 1758 goto do_relocation;
252b5132
RH		 1759
1760 case R_386_32:
1761 case R_386_PC32:
aec6b87e 1762 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
98b273dc 1763 eh->zero_undefweak |= 0x2;
aec6b87e 1764do_relocation:
bf52d7c7
L		 1765 /* We are called after all symbols have been resolved. Only
1766 relocation against STT_GNU_IFUNC symbol must go through
1767 PLT. */
d1ed1c7d
L		 1768 if (h != NULL
1769 && (bfd_link_executable (info)
bf52d7c7 1770 || h->type == STT_GNU_IFUNC))
6725bdbf 1771 {
79b0c981 1772 bfd_boolean func_pointer_ref = FALSE;
233cc9c1 1773
4b627c18
L		 1774 if (r_type == R_386_PC32)
1775 {
1776 /* Since something like ".long foo - ." may be used
1777 as pointer, make sure that PLT is used if foo is
1778 a function defined in a shared library. */
1779 if ((sec->flags & SEC_CODE) == 0)
1780 h->pointer_equality_needed = 1;
74437ea2
L		 1781 else if (h->type == STT_GNU_IFUNC
1782 && bfd_link_pic (info))
1783 {
6322e5c5
L		 1784 _bfd_error_handler
1785 /* xgettext:c-format */
871b3ab2 1786 (_("%pB: unsupported non-PIC call to IFUNC `%s'"),
6322e5c5 1787 abfd, h->root.root.string);
74437ea2
L		 1788 bfd_set_error (bfd_error_bad_value);
1789 goto error_return;
1790 }
4b627c18
L		 1791 }
1792 else
04ebc307
L		 1793 {
1794 h->pointer_equality_needed = 1;
1795 /* R_386_32 can be resolved at run-time. */
1796 if (r_type == R_386_32
1797 && (sec->flags & SEC_READONLY) == 0)
79b0c981
L		 1798 func_pointer_ref = TRUE;
1799 }
1800
1801 if (!func_pointer_ref)
1802 {
1803 /* If this reloc is in a read-only section, we might
1804 need a copy reloc. We can't check reliably at this
1805 stage whether the section is read-only, as input
1806 sections have not yet been mapped to output sections.
1807 Tentatively set the flag for now, and correct in
1808 adjust_dynamic_symbol. */
1809 h->non_got_ref = 1;
1810
1811 /* We may need a .plt entry if the symbol is a function
1812 defined in a shared lib or is a function referenced
1813 from the code or read-only section. */
1814 if (!h->def_regular
1815 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
1816 h->plt.refcount = 1;
04ebc307 1817 }
6725bdbf 1818 }
7843f00e 1819
06a6a421 1820 size_reloc = FALSE;
6a3e1bae 1821do_size:
451875b4 1822 if (NEED_DYNAMIC_RELOCATION_P (info, FALSE, h, sec, r_type,
daf1c414 1823 R_386_32))
252b5132 1824 {
e03a8ed8
L		 1825 struct elf_dyn_relocs *p;
1826 struct elf_dyn_relocs **head;
ec338859 1827
12d0ee4a
AM		 1828 /* We must copy these reloc types into the output file.
1829 Create a reloc section in dynobj and make room for
1830 this reloc. */
252b5132
RH		 1831 if (sreloc == NULL)
1832 {
83bac4b0
NC		 1833 sreloc = _bfd_elf_make_dynamic_reloc_section
1834 (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE);
1835
252b5132 1836 if (sreloc == NULL)
c337a162 1837 goto error_return;
252b5132
RH		 1838 }
1839
0c715baa
AM		 1840 /* If this is a global symbol, we count the number of
1841 relocations we need for this symbol. */
1842 if (h != NULL)
252b5132 1843 {
d5597ebc 1844 head = &eh->dyn_relocs;
0c715baa
AM		 1845 }
1846 else
1847 {
ec338859
AM		 1848 /* Track dynamic relocs needed for local syms too.
1849 We really need local syms available to do this
1850 easily. Oh well. */
87d72d41 1851 void **vpp;
ec338859 1852 asection *s;
87d72d41
AM		 1853
1854 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1855 abfd, r_symndx);
1856 if (isym == NULL)
c337a162 1857 goto error_return;
87d72d41
AM		 1858
1859 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
ec338859 1860 if (s == NULL)
87d72d41 1861 s = sec;
ec338859 1862
e81d3500 1863 vpp = &elf_section_data (s)->local_dynrel;
e03a8ed8 1864 head = (struct elf_dyn_relocs **)vpp;
ec338859
AM		 1865 }
1866
1867 p = *head;
1868 if (p == NULL || p->sec != sec)
1869 {
1870 bfd_size_type amt = sizeof *p;
a50b1753 1871 p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj,
07d6d2b8 1872 amt);
ec338859 1873 if (p == NULL)
c337a162 1874 goto error_return;
ec338859
AM		 1875 p->next = *head;
1876 *head = p;
1877 p->sec = sec;
1878 p->count = 0;
1879 p->pc_count = 0;
252b5132 1880 }
ec338859
AM		 1881
1882 p->count += 1;
06a6a421
L		 1883 /* Count size relocation as PC-relative relocation. */
1884 if (r_type == R_386_PC32 || size_reloc)
ec338859 1885 p->pc_count += 1;
252b5132 1886 }
252b5132
RH		 1887 break;
1888
1889 /* This relocation describes the C++ object vtable hierarchy.
1890 Reconstruct it for later use during GC. */
1891 case R_386_GNU_VTINHERIT:
d17e0c6e 1892 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
c337a162 1893 goto error_return;
252b5132
RH		 1894 break;
1895
1896 /* This relocation describes which C++ vtable entries are actually
1897 used. Record for later use during GC. */
1898 case R_386_GNU_VTENTRY:
c6aa130f
MS		 1899 BFD_ASSERT (h != NULL);
1900 if (h != NULL
1901 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
c337a162 1902 goto error_return;
252b5132
RH		 1903 break;
1904
1905 default:
1906 break;
1907 }
1908 }
1909
bedfd056
L		 1910 if (elf_section_data (sec)->this_hdr.contents != contents)
1911 {
5e5e02ae 1912 if (!converted && !info->keep_memory)
bedfd056
L		 1913 free (contents);
1914 else
1915 {
5e5e02ae
L		 1916 /* Cache the section contents for elf_link_input_bfd if any
1917 load is converted or --no-keep-memory isn't used. */
bedfd056
L		 1918 elf_section_data (sec)->this_hdr.contents = contents;
1919 }
1920 }
1921
5e5e02ae
L		 1922 /* Cache relocations if any load is converted. */
1923 if (elf_section_data (sec)->relocs != relocs && converted)
1924 elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
1925
b34976b6 1926 return TRUE;
c337a162
L		 1927
1928error_return:
bedfd056
L		 1929 if (elf_section_data (sec)->this_hdr.contents != contents)
1930 free (contents);
c337a162
L		 1931 sec->check_relocs_failed = 1;
1932 return FALSE;
252b5132
RH		 1933}
1934
38701953
AM		 1935/* Set the correct type for an x86 ELF section. We do this by the
1936 section name, which is a hack, but ought to work. */
1937
b34976b6 1938static bfd_boolean
55fd94b0
AM		 1939elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
1940 Elf_Internal_Shdr *hdr,
1941 asection *sec)
38701953 1942{
91d6fa6a 1943 const char *name;
38701953
AM		 1944
1945 name = bfd_get_section_name (abfd, sec);
1946
1947 /* This is an ugly, but unfortunately necessary hack that is
1948 needed when producing EFI binaries on x86. It tells
1949 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1950 containing ELF relocation info. We need this hack in order to
1951 be able to generate ELF binaries that can be translated into
1952 EFI applications (which are essentially COFF objects). Those
1953 files contain a COFF ".reloc" section inside an ELFNN object,
1954 which would normally cause BFD to segfault because it would
1955 attempt to interpret this section as containing relocation
1956 entries for section "oc". With this hack enabled, ".reloc"
1957 will be treated as a normal data section, which will avoid the
1958 segfault. However, you won't be able to create an ELFNN binary
1959 with a section named "oc" that needs relocations, but that's
1960 the kind of ugly side-effects you get when detecting section
1961 types based on their names... In practice, this limitation is
1962 unlikely to bite. */
1963 if (strcmp (name, ".reloc") == 0)
1964 hdr->sh_type = SHT_PROGBITS;
1965
b34976b6 1966 return TRUE;
38701953
AM		 1967}
1968
13ae64f3
JJ		 1969/* Return the relocation value for @tpoff relocation
1970 if STT_TLS virtual address is ADDRESS. */
1971
1972static bfd_vma
eb4ff4d6 1973elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address)
13ae64f3 1974{
e1918d23 1975 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO		 1976 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
1977 bfd_vma static_tls_size;
13ae64f3 1978
e1918d23
AM		 1979 /* If tls_sec is NULL, we should have signalled an error already. */
1980 if (htab->tls_sec == NULL)
6a30718d 1981 return 0;
7dc98aea
RO		 1982
1983 /* Consider special static TLS alignment requirements. */
1984 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
1985 return static_tls_size + htab->tls_sec->vma - address;
13ae64f3
JJ		 1986}
1987
252b5132
RH		 1988/* Relocate an i386 ELF section. */
1989
b34976b6 1990static bfd_boolean
55fd94b0
AM		 1991elf_i386_relocate_section (bfd *output_bfd,
1992 struct bfd_link_info *info,
1993 bfd *input_bfd,
1994 asection *input_section,
1995 bfd_byte *contents,
1996 Elf_Internal_Rela *relocs,
1997 Elf_Internal_Sym *local_syms,
1998 asection **local_sections)
252b5132 1999{
0afcef53 2000 struct elf_x86_link_hash_table *htab;
252b5132
RH		 2001 Elf_Internal_Shdr *symtab_hdr;
2002 struct elf_link_hash_entry **sym_hashes;
2003 bfd_vma *local_got_offsets;
67a4f2b7 2004 bfd_vma *local_tlsdesc_gotents;
252b5132 2005 Elf_Internal_Rela *rel;
60f2e42e 2006 Elf_Internal_Rela *wrel;
252b5132 2007 Elf_Internal_Rela *relend;
3348747a 2008 bfd_boolean is_vxworks_tls;
25e762b9 2009 unsigned plt_entry_size;
252b5132 2010
c337a162
L		 2011 /* Skip if check_relocs failed. */
2012 if (input_section->check_relocs_failed)
2013 return FALSE;
2014
0afcef53 2015 htab = elf_x86_hash_table (info, I386_ELF_DATA);
4dfe6ac6
NC		 2016 if (htab == NULL)
2017 return FALSE;
fe53b4a4
L		 2018
2019 BFD_ASSERT (is_x86_elf (input_bfd, htab));
2020
0ffa91dd 2021 symtab_hdr = &elf_symtab_hdr (input_bfd);
252b5132
RH		 2022 sym_hashes = elf_sym_hashes (input_bfd);
2023 local_got_offsets = elf_local_got_offsets (input_bfd);
0afcef53 2024 local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
3348747a
NS		 2025 /* We have to handle relocations in vxworks .tls_vars sections
2026 specially, because the dynamic loader is 'weird'. */
851b6fa1 2027 is_vxworks_tls = (htab->target_os == is_vxworks
07d6d2b8 2028 && bfd_link_pic (info)
3348747a
NS		 2029 && !strcmp (input_section->output_section->name,
2030 ".tls_vars"));
252b5132 2031
0afcef53 2032 _bfd_x86_elf_set_tls_module_base (info);
9f03412a 2033
765e526c 2034 plt_entry_size = htab->plt.plt_entry_size;
25e762b9 2035
60f2e42e 2036 rel = wrel = relocs;
252b5132 2037 relend = relocs + input_section->reloc_count;
60f2e42e 2038 for (; rel < relend; wrel++, rel++)
252b5132 2039 {
419414ea 2040 unsigned int r_type, r_type_tls;
252b5132
RH		 2041 reloc_howto_type *howto;
2042 unsigned long r_symndx;
2043 struct elf_link_hash_entry *h;
0afcef53 2044 struct elf_x86_link_hash_entry *eh;
252b5132
RH		 2045 Elf_Internal_Sym *sym;
2046 asection *sec;
dd7e64d4 2047 bfd_vma off, offplt, plt_offset;
252b5132 2048 bfd_vma relocation;
b34976b6 2049 bfd_boolean unresolved_reloc;
252b5132 2050 bfd_reloc_status_type r;
1b452ec6 2051 unsigned int indx;
13ae64f3 2052 int tls_type;
1788fc08 2053 bfd_vma st_size;
dd7e64d4 2054 asection *resolved_plt;
aec6b87e 2055 bfd_boolean resolved_to_zero;
e133d005 2056 bfd_boolean relative_reloc;
252b5132
RH		 2057
2058 r_type = ELF32_R_TYPE (rel->r_info);
55fd94b0
AM		 2059 if (r_type == R_386_GNU_VTINHERIT
2060 || r_type == R_386_GNU_VTENTRY)
18954b29
L		 2061 {
2062 if (wrel != rel)
2063 *wrel = *rel;
2064 continue;
2065 }
dc47f327 2066
55fd94b0 2067 if ((indx = r_type) >= R_386_standard
13ae64f3
JJ		 2068 && ((indx = r_type - R_386_ext_offset) - R_386_standard
2069 >= R_386_ext - R_386_standard)
2070 && ((indx = r_type - R_386_tls_offset) - R_386_ext
c74be520 2071 >= R_386_ext2 - R_386_ext))
47aeb64c
NC		 2072 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
2073
1b452ec6 2074 howto = elf_howto_table + indx;
252b5132
RH		 2075
2076 r_symndx = ELF32_R_SYM (rel->r_info);
252b5132
RH		 2077 h = NULL;
2078 sym = NULL;
2079 sec = NULL;
b34976b6 2080 unresolved_reloc = FALSE;
252b5132
RH		 2081 if (r_symndx < symtab_hdr->sh_info)
2082 {
2083 sym = local_syms + r_symndx;
2084 sec = local_sections[r_symndx];
2085 relocation = (sec->output_section->vma
2086 + sec->output_offset
2087 + sym->st_value);
1788fc08 2088 st_size = sym->st_size;
ab96bf03
AM		 2089
2090 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION
2091 && ((sec->flags & SEC_MERGE) != 0
0e1862bb 2092 || (bfd_link_relocatable (info)
ab96bf03 2093 && sec->output_offset != 0)))
f8df10f4 2094 {
f8df10f4 2095 bfd_vma addend;
4a335f3d 2096 bfd_byte *where = contents + rel->r_offset;
f8df10f4 2097
4a335f3d 2098 switch (howto->size)
f8df10f4 2099 {
4a335f3d
AM		 2100 case 0:
2101 addend = bfd_get_8 (input_bfd, where);
2102 if (howto->pc_relative)
2103 {
2104 addend = (addend ^ 0x80) - 0x80;
2105 addend += 1;
2106 }
2107 break;
2108 case 1:
2109 addend = bfd_get_16 (input_bfd, where);
2110 if (howto->pc_relative)
2111 {
2112 addend = (addend ^ 0x8000) - 0x8000;
2113 addend += 2;
2114 }
2115 break;
2116 case 2:
2117 addend = bfd_get_32 (input_bfd, where);
2118 if (howto->pc_relative)
2119 {
2120 addend = (addend ^ 0x80000000) - 0x80000000;
2121 addend += 4;
2122 }
2123 break;
2124 default:
2125 abort ();
f8df10f4
JJ		 2126 }
2127
0e1862bb 2128 if (bfd_link_relocatable (info))
ab96bf03
AM		 2129 addend += sec->output_offset;
2130 else
2131 {
2132 asection *msec = sec;
2133 addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec,
2134 addend);
2135 addend -= relocation;
2136 addend += msec->output_section->vma + msec->output_offset;
2137 }
4a335f3d
AM		 2138
2139 switch (howto->size)
2140 {
2141 case 0:
16a10388 2142 /* FIXME: overflow checks. */
4a335f3d
AM		 2143 if (howto->pc_relative)
2144 addend -= 1;
2145 bfd_put_8 (input_bfd, addend, where);
4a335f3d
AM		 2146 break;
2147 case 1:
2148 if (howto->pc_relative)
2149 addend -= 2;
2150 bfd_put_16 (input_bfd, addend, where);
4a335f3d
AM		 2151 break;
2152 case 2:
2153 if (howto->pc_relative)
2154 addend -= 4;
2155 bfd_put_32 (input_bfd, addend, where);
2156 break;
2157 }
f8df10f4 2158 }
0e1862bb 2159 else if (!bfd_link_relocatable (info)
1f85278f 2160 && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc
L		 2161 {
2162 /* Relocate against local STT_GNU_IFUNC symbol. */
0afcef53
L		 2163 h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd, rel,
2164 FALSE);
c25bc9fc
L		 2165 if (h == NULL)
2166 abort ();
2167
23209a78 2168 /* Set STT_GNU_IFUNC symbol value. */
c25bc9fc
L		 2169 h->root.u.def.value = sym->st_value;
2170 h->root.u.def.section = sec;
2171 }
252b5132
RH		 2172 }
2173 else
2174 {
3d540e93 2175 bfd_boolean warned ATTRIBUTE_UNUSED;
62d887d4 2176 bfd_boolean ignored ATTRIBUTE_UNUSED;
ffb2e45b 2177
b2a8e766
AM		 2178 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2179 r_symndx, symtab_hdr, sym_hashes,
2180 h, sec, relocation,
62d887d4 2181 unresolved_reloc, warned, ignored);
1788fc08 2182 st_size = h->size;
252b5132
RH		 2183 }
2184
dbaa2011 2185 if (sec != NULL && discarded_section (sec))
60f2e42e
L		 2186 {
2187 _bfd_clear_contents (howto, input_bfd, input_section,
2188 contents + rel->r_offset);
2189 wrel->r_offset = rel->r_offset;
2190 wrel->r_info = 0;
2191 wrel->r_addend = 0;
2192
2193 /* For ld -r, remove relocations in debug sections against
2194 sections defined in discarded sections. Not done for
2195 eh_frame editing code expects to be present. */
2196 if (bfd_link_relocatable (info)
2197 && (input_section->flags & SEC_DEBUGGING))
2198 wrel--;
2199
2200 continue;
2201 }
9635fe29 2202
0e1862bb 2203 if (bfd_link_relocatable (info))
2d5da473
L		 2204 {
2205 if (wrel != rel)
2206 *wrel = *rel;
2207 continue;
2208 }
ab96bf03 2209
0afcef53 2210 eh = (struct elf_x86_link_hash_entry *) h;
ee2fdd6f 2211
cbe950e9
L		 2212 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2213 it here if it is defined in a non-shared object. */
2214 if (h != NULL
2215 && h->type == STT_GNU_IFUNC
2216 && h->def_regular)
2217 {
ee2fdd6f 2218 asection *gotplt, *base_got;
cbe950e9 2219 bfd_vma plt_index;
4c544807 2220 const char *name;
cbe950e9 2221
97dc35c8
L		 2222 if ((input_section->flags & SEC_ALLOC) == 0)
2223 {
347a8774
L		 2224 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2225 STT_GNU_IFUNC symbol as STT_FUNC. */
2226 if (elf_section_type (input_section) == SHT_NOTE)
2227 goto skip_ifunc;
97dc35c8
L		 2228 /* Dynamic relocs are not propagated for SEC_DEBUGGING
2229 sections because such sections are not SEC_ALLOC and
2230 thus ld.so will not process them. */
2231 if ((input_section->flags & SEC_DEBUGGING) != 0)
0eace210 2232 continue;
97dc35c8
L		 2233 abort ();
2234 }
cbe950e9
L		 2235
2236 /* STT_GNU_IFUNC symbol must go through PLT. */
6de2ae4a 2237 if (htab->elf.splt != NULL)
cbe950e9 2238 {
ee2fdd6f
L		 2239 if (htab->plt_second != NULL)
2240 {
2241 resolved_plt = htab->plt_second;
2242 plt_offset = eh->plt_second.offset;
2243 }
2244 else
2245 {
2246 resolved_plt = htab->elf.splt;
2247 plt_offset = h->plt.offset;
2248 }
6de2ae4a 2249 gotplt = htab->elf.sgotplt;
cbe950e9
L		 2250 }
2251 else
2252 {
ee2fdd6f
L		 2253 resolved_plt = htab->elf.iplt;
2254 plt_offset = h->plt.offset;
6de2ae4a 2255 gotplt = htab->elf.igotplt;
cbe950e9
L		 2256 }
2257
cbe950e9
L		 2258 switch (r_type)
2259 {
2260 default:
233cc9c1 2261 break;
cbe950e9
L		 2262
2263 case R_386_GOT32:
02a86693 2264 case R_386_GOT32X:
6de2ae4a 2265 base_got = htab->elf.sgot;
cbe950e9
L		 2266 off = h->got.offset;
2267
7afd84dc 2268 if (base_got == NULL)
cbe950e9
L		 2269 abort ();
2270
7afd84dc 2271 if (off == (bfd_vma) -1)
cbe950e9 2272 {
7afd84dc
L		 2273 /* We can't use h->got.offset here to save state, or
2274 even just remember the offset, as finish_dynamic_symbol
2275 would use that as offset into .got. */
6bbec505 2276
233cc9c1
L		 2277 if (h->plt.offset == (bfd_vma) -1)
2278 abort ();
2279
6de2ae4a 2280 if (htab->elf.splt != NULL)
7afd84dc 2281 {
f604c2a2 2282 plt_index = (h->plt.offset / plt_entry_size
765e526c 2283 - htab->plt.has_plt0);
7afd84dc 2284 off = (plt_index + 3) * 4;
6de2ae4a 2285 base_got = htab->elf.sgotplt;
7afd84dc 2286 }
cbe950e9
L		 2287 else
2288 {
25e762b9 2289 plt_index = h->plt.offset / plt_entry_size;
7afd84dc 2290 off = plt_index * 4;
6de2ae4a 2291 base_got = htab->elf.igotplt;
7afd84dc
L		 2292 }
2293
2294 if (h->dynindx == -1
2295 || h->forced_local
2296 || info->symbolic)
2297 {
2298 /* This references the local defitionion. We must
2299 initialize this entry in the global offset table.
2300 Since the offset must always be a multiple of 8,
2301 we use the least significant bit to record
2302 whether we have initialized it already.
2303
2304 When doing a dynamic link, we create a .rela.got
2305 relocation entry to initialize the value. This
2306 is done in the finish_dynamic_symbol routine. */
2307 if ((off & 1) != 0)
2308 off &= ~1;
2309 else
2310 {
2311 bfd_put_32 (output_bfd, relocation,
2312 base_got->contents + off);
2313 h->got.offset |= 1;
2314 }
cbe950e9 2315 }
cbe950e9 2316
7afd84dc 2317 relocation = off;
7afd84dc
L		 2318 }
2319 else
ca8c86ef
L		 2320 relocation = (base_got->output_section->vma
2321 + base_got->output_offset + off
2322 - gotplt->output_section->vma
2323 - gotplt->output_offset);
2324
2a568401
L		 2325 if (rel->r_offset > 1
2326 && (*(contents + rel->r_offset - 1) & 0xc7) == 0x5
2327 && *(contents + rel->r_offset - 2) != 0x8d)
712ec279
L		 2328 {
2329 if (bfd_link_pic (info))
2330 goto disallow_got32;
2331
2332 /* Add the GOT base if there is no base register. */
2333 relocation += (gotplt->output_section->vma
2334 + gotplt->output_offset);
2335 }
2336 else if (htab->elf.splt == NULL)
2337 {
2338 /* Adjust for static executables. */
2339 relocation += gotplt->output_offset;
2340 }
0018b0a3 2341
cbe950e9 2342 goto do_relocation;
233cc9c1
L		 2343 }
2344
2345 if (h->plt.offset == (bfd_vma) -1)
2346 {
2347 /* Handle static pointers of STT_GNU_IFUNC symbols. */
2348 if (r_type == R_386_32
2349 && (input_section->flags & SEC_CODE) == 0)
2350 goto do_ifunc_pointer;
2351 goto bad_ifunc_reloc;
2352 }
2353
ee2fdd6f
L		 2354 relocation = (resolved_plt->output_section->vma
2355 + resolved_plt->output_offset + plt_offset);
233cc9c1
L		 2356
2357 switch (r_type)
2358 {
2359 default:
2360bad_ifunc_reloc:
2361 if (h->root.root.string)
2362 name = h->root.root.string;
2363 else
2364 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2365 NULL);
4eca0228 2366 _bfd_error_handler
695344c0 2367 /* xgettext:c-format */
871b3ab2 2368 (_("%pB: relocation %s against STT_GNU_IFUNC "
233cc9c1
L		 2369 "symbol `%s' isn't supported"), input_bfd,
2370 howto->name, name);
2371 bfd_set_error (bfd_error_bad_value);
2372 return FALSE;
2373
2374 case R_386_32:
2375 /* Generate dynamic relcoation only when there is a
2376 non-GOT reference in a shared object. */
2377 if ((bfd_link_pic (info) && h->non_got_ref)
2378 || h->plt.offset == (bfd_vma) -1)
2379 {
2380 Elf_Internal_Rela outrel;
2381 asection *sreloc;
2382 bfd_vma offset;
2383
2384do_ifunc_pointer:
2385 /* Need a dynamic relocation to get the real function
2386 adddress. */
2387 offset = _bfd_elf_section_offset (output_bfd,
2388 info,
2389 input_section,
2390 rel->r_offset);
2391 if (offset == (bfd_vma) -1
2392 || offset == (bfd_vma) -2)
2393 abort ();
2394
2395 outrel.r_offset = (input_section->output_section->vma
2396 + input_section->output_offset
2397 + offset);
2398
cf1070f1 2399 if (POINTER_LOCAL_IFUNC_P (info, h))
233cc9c1 2400 {
871b3ab2 2401 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L		 2402 h->root.root.string,
2403 h->root.u.def.section->owner);
2404
233cc9c1
L		 2405 /* This symbol is resolved locally. */
2406 outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
2407 bfd_put_32 (output_bfd,
2408 (h->root.u.def.value
2409 + h->root.u.def.section->output_section->vma
2410 + h->root.u.def.section->output_offset),
2411 contents + offset);
2412 }
2413 else
2414 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
2415
2416 /* Dynamic relocations are stored in
2417 1. .rel.ifunc section in PIC object.
2418 2. .rel.got section in dynamic executable.
2419 3. .rel.iplt section in static executable. */
2420 if (bfd_link_pic (info))
2421 sreloc = htab->elf.irelifunc;
2422 else if (htab->elf.splt != NULL)
2423 sreloc = htab->elf.srelgot;
2424 else
2425 sreloc = htab->elf.irelplt;
2426 elf_append_rel (output_bfd, sreloc, &outrel);
2427
2428 /* If this reloc is against an external symbol, we
2429 do not want to fiddle with the addend. Otherwise,
2430 we need to include the symbol value so that it
2431 becomes an addend for the dynamic reloc. For an
2432 internal symbol, we have updated addend. */
2433 continue;
2434 }
2435 /* FALLTHROUGH */
2436 case R_386_PC32:
2437 case R_386_PLT32:
2438 goto do_relocation;
cbe950e9
L		 2439
2440 case R_386_GOTOFF:
2441 relocation -= (gotplt->output_section->vma
2442 + gotplt->output_offset);
2443 goto do_relocation;
2444 }
2445 }
2446
347a8774 2447skip_ifunc:
aec6b87e 2448 resolved_to_zero = (eh != NULL
c5bce5c6 2449 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
aec6b87e 2450
252b5132
RH		 2451 switch (r_type)
2452 {
02a86693
L		 2453 case R_386_GOT32X:
2454 /* Avoid optimizing _DYNAMIC since ld.so may use its
2455 link-time address. */
2456 if (h == htab->elf.hdynamic)
2457 goto r_386_got32;
2458
2459 if (bfd_link_pic (info))
2460 {
2461 /* It is OK to convert mov to lea and convert indirect
2462 branch to direct branch. It is OK to convert adc,
2463 add, and, cmp, or, sbb, sub, test, xor only when PIC
2464 is false. */
02e2aef8
L		 2465 unsigned int opcode, addend;
2466 addend = bfd_get_32 (input_bfd, contents + rel->r_offset);
2467 if (addend != 0)
2468 goto r_386_got32;
2469 opcode = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
02a86693
L		 2470 if (opcode != 0x8b && opcode != 0xff)
2471 goto r_386_got32;
2472 }
2473
2474 /* Resolve "mov GOT[(%reg)], %reg",
2475 "call/jmp *GOT[(%reg)]", "test %reg, foo@GOT[(%reg)]"
2476 and "binop foo@GOT[(%reg)], %reg". */
2477 if (h == NULL
2478 || (h->plt.offset == (bfd_vma) -1
2479 && h->got.offset == (bfd_vma) -1)
2480 || htab->elf.sgotplt == NULL)
2481 abort ();
2482
2483 offplt = (htab->elf.sgotplt->output_section->vma
2484 + htab->elf.sgotplt->output_offset);
2485
2486 /* It is relative to .got.plt section. */
2487 if (h->got.offset != (bfd_vma) -1)
32875eb1
L		 2488 /* Use GOT entry. Mask off the least significant bit in
2489 GOT offset which may be set by R_386_GOT32 processing
2490 below. */
02a86693
L		 2491 relocation = (htab->elf.sgot->output_section->vma
2492 + htab->elf.sgot->output_offset
32875eb1 2493 + (h->got.offset & ~1) - offplt);
02a86693
L		 2494 else
2495 /* Use GOTPLT entry. */
f604c2a2 2496 relocation = (h->plt.offset / plt_entry_size
765e526c 2497 - htab->plt.has_plt0 + 3) * 4;
02a86693
L		 2498
2499 if (!bfd_link_pic (info))
2500 {
2501 /* If not PIC, add the .got.plt section address for
a3718e9e 2502 baseless addressing. */
02a86693 2503 unsigned int modrm;
02e2aef8 2504 modrm = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
02a86693
L		 2505 if ((modrm & 0xc7) == 0x5)
2506 relocation += offplt;
2507 }
2508
2509 unresolved_reloc = FALSE;
2510 break;
2511
252b5132 2512 case R_386_GOT32:
02a86693 2513r_386_got32:
252b5132
RH		 2514 /* Relocation is to the entry for this symbol in the global
2515 offset table. */
6de2ae4a 2516 if (htab->elf.sgot == NULL)
ffb2e45b 2517 abort ();
252b5132 2518
e133d005 2519 relative_reloc = FALSE;
252b5132
RH		 2520 if (h != NULL)
2521 {
252b5132 2522 off = h->got.offset;
2eba97c2 2523 if (RESOLVED_LOCALLY_P (info, h, htab))
252b5132 2524 {
2eba97c2
L		 2525 /* We must initialize this entry in the global offset
2526 table. Since the offset must always be a multiple
2527 of 4, we use the least significant bit to record
2528 whether we have initialized it already.
252b5132
RH		 2529
2530 When doing a dynamic link, we create a .rel.got
2531 relocation entry to initialize the value. This
2532 is done in the finish_dynamic_symbol routine. */
2533 if ((off & 1) != 0)
2534 off &= ~1;
2535 else
2536 {
2537 bfd_put_32 (output_bfd, relocation,
6de2ae4a 2538 htab->elf.sgot->contents + off);
252b5132 2539 h->got.offset |= 1;
e133d005 2540
f70656b2 2541 if (GENERATE_RELATIVE_RELOC_P (info, h))
e133d005
L		 2542 {
2543 /* PR ld/21402: If this symbol isn't dynamic
0dc9a308 2544 in PIC, generate R_386_RELATIVE here. */
e133d005
L		 2545 eh->no_finish_dynamic_symbol = 1;
2546 relative_reloc = TRUE;
2547 }
252b5132
RH		 2548 }
2549 }
8c694914 2550 else
b34976b6 2551 unresolved_reloc = FALSE;
252b5132
RH		 2552 }
2553 else
2554 {
ffb2e45b
AM		 2555 if (local_got_offsets == NULL)
2556 abort ();
252b5132
RH		 2557
2558 off = local_got_offsets[r_symndx];
2559
2560 /* The offset must always be a multiple of 4. We use
83be169b
AM		 2561 the least significant bit to record whether we have
2562 already generated the necessary reloc. */
252b5132
RH		 2563 if ((off & 1) != 0)
2564 off &= ~1;
2565 else
2566 {
6725bdbf 2567 bfd_put_32 (output_bfd, relocation,
6de2ae4a 2568 htab->elf.sgot->contents + off);
e133d005 2569 local_got_offsets[r_symndx] |= 1;
252b5132 2570
0e1862bb 2571 if (bfd_link_pic (info))
e133d005 2572 relative_reloc = TRUE;
252b5132 2573 }
252b5132
RH		 2574 }
2575
e133d005
L		 2576 if (relative_reloc)
2577 {
2578 asection *s;
2579 Elf_Internal_Rela outrel;
2580
2581 s = htab->elf.srelgot;
2582 if (s == NULL)
2583 abort ();
2584
2585 outrel.r_offset = (htab->elf.sgot->output_section->vma
2586 + htab->elf.sgot->output_offset
2587 + off);
2588 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
2589 elf_append_rel (output_bfd, s, &outrel);
2590 }
2591
ffb2e45b
AM		 2592 if (off >= (bfd_vma) -2)
2593 abort ();
2594
74d7f0aa
L		 2595 relocation = (htab->elf.sgot->output_section->vma
2596 + htab->elf.sgot->output_offset + off);
2a568401
L		 2597 if (rel->r_offset > 1
2598 && (*(contents + rel->r_offset - 1) & 0xc7) == 0x5
2599 && *(contents + rel->r_offset - 2) != 0x8d)
74d7f0aa
L		 2600 {
2601 if (bfd_link_pic (info))
2602 {
2603 /* For PIC, disallow R_386_GOT32 without a base
2a568401
L		 2604 register, except for "lea foo@GOT, %reg", since
2605 we don't know what the GOT base is. */
74d7f0aa
L		 2606 const char *name;
2607
712ec279 2608disallow_got32:
a5def14f 2609 if (h == NULL || h->root.root.string == NULL)
74d7f0aa
L		 2610 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2611 NULL);
2612 else
2613 name = h->root.root.string;
2614
4eca0228 2615 _bfd_error_handler
695344c0 2616 /* xgettext:c-format */
871b3ab2 2617 (_("%pB: direct GOT relocation %s against `%s'"
63a5468a
AM		 2618 " without base register can not be used"
2619 " when making a shared object"),
712ec279 2620 input_bfd, howto->name, name);
74d7f0aa
L		 2621 bfd_set_error (bfd_error_bad_value);
2622 return FALSE;
2623 }
2624 }
2625 else
2626 {
2627 /* Subtract the .got.plt section address only with a base
2628 register. */
2629 relocation -= (htab->elf.sgotplt->output_section->vma
2630 + htab->elf.sgotplt->output_offset);
2631 }
2632
252b5132
RH		 2633 break;
2634
2635 case R_386_GOTOFF:
2636 /* Relocation is relative to the start of the global offset
2637 table. */
2638
3d949995
L		 2639 /* Check to make sure it isn't a protected function or data
2640 symbol for shared library since it may not be local when
2641 used as function address or with copy relocation. We also
e3c0e327 2642 need to make sure that a symbol is referenced locally. */
0e1862bb 2643 if (!bfd_link_executable (info) && h)
90f487df 2644 {
41bed6dd
L		 2645 if (!h->def_regular)
2646 {
2647 const char *v;
2648
2649 switch (ELF_ST_VISIBILITY (h->other))
2650 {
2651 case STV_HIDDEN:
2652 v = _("hidden symbol");
2653 break;
2654 case STV_INTERNAL:
2655 v = _("internal symbol");
2656 break;
2657 case STV_PROTECTED:
2658 v = _("protected symbol");
2659 break;
2660 default:
2661 v = _("symbol");
2662 break;
2663 }
2664
4eca0228 2665 _bfd_error_handler
695344c0 2666 /* xgettext:c-format */
871b3ab2 2667 (_("%pB: relocation R_386_GOTOFF against undefined %s"
63a5468a 2668 " `%s' can not be used when making a shared object"),
41bed6dd
L		 2669 input_bfd, v, h->root.root.string);
2670 bfd_set_error (bfd_error_bad_value);
2671 return FALSE;
2672 }
6999821f 2673 else if (!SYMBOL_REFERENCES_LOCAL_P (info, h)
3d949995
L		 2674 && (h->type == STT_FUNC
2675 || h->type == STT_OBJECT)
41bed6dd
L		 2676 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2677 {
4eca0228 2678 _bfd_error_handler
695344c0 2679 /* xgettext:c-format */
871b3ab2 2680 (_("%pB: relocation R_386_GOTOFF against protected %s"
63a5468a 2681 " `%s' can not be used when making a shared object"),
3d949995
L		 2682 input_bfd,
2683 h->type == STT_FUNC ? "function" : "data",
2684 h->root.root.string);
41bed6dd
L		 2685 bfd_set_error (bfd_error_bad_value);
2686 return FALSE;
2687 }
90f487df
L		 2688 }
2689
8c37241b
JJ		 2690 /* Note that sgot is not involved in this
2691 calculation. We always want the start of .got.plt. If we
2692 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
252b5132
RH		 2693 permitted by the ABI, we might have to change this
2694 calculation. */
6de2ae4a
L		 2695 relocation -= htab->elf.sgotplt->output_section->vma
2696 + htab->elf.sgotplt->output_offset;
252b5132
RH		 2697 break;
2698
2699 case R_386_GOTPC:
2700 /* Use global offset table as symbol value. */
6de2ae4a
L		 2701 relocation = htab->elf.sgotplt->output_section->vma
2702 + htab->elf.sgotplt->output_offset;
b34976b6 2703 unresolved_reloc = FALSE;
252b5132
RH		 2704 break;
2705
2706 case R_386_PLT32:
2707 /* Relocation is to the entry for this symbol in the
2708 procedure linkage table. */
2709
dd5724d5 2710 /* Resolve a PLT32 reloc against a local symbol directly,
83be169b 2711 without using the procedure linkage table. */
252b5132
RH		 2712 if (h == NULL)
2713 break;
2714
dd7e64d4
L		 2715 if ((h->plt.offset == (bfd_vma) -1
2716 && eh->plt_got.offset == (bfd_vma) -1)
6de2ae4a 2717 || htab->elf.splt == NULL)
252b5132
RH		 2718 {
2719 /* We didn't make a PLT entry for this symbol. This
83be169b
AM		 2720 happens when statically linking PIC code, or when
2721 using -Bsymbolic. */
252b5132
RH		 2722 break;
2723 }
2724
dd7e64d4
L		 2725 if (h->plt.offset != (bfd_vma) -1)
2726 {
ee2fdd6f
L		 2727 if (htab->plt_second != NULL)
2728 {
2729 resolved_plt = htab->plt_second;
2730 plt_offset = eh->plt_second.offset;
2731 }
2732 else
2733 {
2734 resolved_plt = htab->elf.splt;
2735 plt_offset = h->plt.offset;
2736 }
dd7e64d4
L		 2737 }
2738 else
2739 {
2740 resolved_plt = htab->plt_got;
2741 plt_offset = eh->plt_got.offset;
2742 }
2743
2744 relocation = (resolved_plt->output_section->vma
2745 + resolved_plt->output_offset
2746 + plt_offset);
b34976b6 2747 unresolved_reloc = FALSE;
252b5132
RH		 2748 break;
2749
1788fc08 2750 case R_386_SIZE32:
1788fc08
L		 2751 /* Set to symbol size. */
2752 relocation = st_size;
2753 /* Fall through. */
2754
252b5132
RH		 2755 case R_386_32:
2756 case R_386_PC32:
3348747a
NS		 2757 if ((input_section->flags & SEC_ALLOC) == 0
2758 || is_vxworks_tls)
ec338859
AM		 2759 break;
2760
aebcc8ff
L		 2761 if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
2762 FALSE, resolved_to_zero,
2763 (r_type == R_386_PC32)))
252b5132 2764 {
947216bf 2765 Elf_Internal_Rela outrel;
b34976b6 2766 bfd_boolean skip, relocate;
0c715baa 2767 asection *sreloc;
252b5132
RH		 2768
2769 /* When generating a shared object, these relocations
2770 are copied into the output file to be resolved at run
2771 time. */
2772
b34976b6
AM		 2773 skip = FALSE;
2774 relocate = FALSE;
252b5132 2775
c629eae0
JJ		 2776 outrel.r_offset =
2777 _bfd_elf_section_offset (output_bfd, info, input_section,
2778 rel->r_offset);
2779 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 2780 skip = TRUE;
0bb2d96a 2781 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 2782 skip = TRUE, relocate = TRUE;
252b5132
RH		 2783 outrel.r_offset += (input_section->output_section->vma
2784 + input_section->output_offset);
2785
2786 if (skip)
0bb2d96a 2787 memset (&outrel, 0, sizeof outrel);
e74399c4 2788 else if (COPY_INPUT_RELOC_P (info, h, r_type))
0bb2d96a 2789 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
252b5132
RH		 2790 else
2791 {
5a15f56f 2792 /* This symbol is local, or marked to become local. */
b34976b6 2793 relocate = TRUE;
5a15f56f 2794 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
252b5132
RH		 2795 }
2796
cbe950e9 2797 sreloc = elf_section_data (input_section)->sreloc;
e7c33416 2798
62d78908
L		 2799 if (sreloc == NULL || sreloc->contents == NULL)
2800 {
2801 r = bfd_reloc_notsupported;
2802 goto check_relocation_error;
2803 }
0c715baa 2804
59d6ffb2 2805 elf_append_rel (output_bfd, sreloc, &outrel);
252b5132
RH		 2806
2807 /* If this reloc is against an external symbol, we do
2808 not want to fiddle with the addend. Otherwise, we
2809 need to include the symbol value so that it becomes
2810 an addend for the dynamic reloc. */
0f88be7a 2811 if (! relocate)
252b5132
RH		 2812 continue;
2813 }
252b5132
RH		 2814 break;
2815
37e55690 2816 case R_386_TLS_IE:
0e1862bb 2817 if (!bfd_link_executable (info))
37e55690 2818 {
947216bf 2819 Elf_Internal_Rela outrel;
37e55690 2820 asection *sreloc;
37e55690
JJ		 2821
2822 outrel.r_offset = rel->r_offset
2823 + input_section->output_section->vma
2824 + input_section->output_offset;
2825 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
2826 sreloc = elf_section_data (input_section)->sreloc;
2827 if (sreloc == NULL)
2828 abort ();
59d6ffb2 2829 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690
JJ		 2830 }
2831 /* Fall through */
2832
13ae64f3 2833 case R_386_TLS_GD:
67a4f2b7
AO		 2834 case R_386_TLS_GOTDESC:
2835 case R_386_TLS_DESC_CALL:
13ae64f3 2836 case R_386_TLS_IE_32:
37e55690 2837 case R_386_TLS_GOTIE:
13ae64f3
JJ		 2838 tls_type = GOT_UNKNOWN;
2839 if (h == NULL && local_got_offsets)
0afcef53 2840 tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
13ae64f3 2841 else if (h != NULL)
0afcef53 2842 tls_type = elf_x86_hash_entry(h)->tls_type;
37e55690
JJ		 2843 if (tls_type == GOT_TLS_IE)
2844 tls_type = GOT_TLS_IE_NEG;
142411ca 2845
419414ea 2846 r_type_tls = r_type;
142411ca
L		 2847 if (! elf_i386_tls_transition (info, input_bfd,
2848 input_section, contents,
2849 symtab_hdr, sym_hashes,
419414ea 2850 &r_type_tls, tls_type, rel,
bedfd056 2851 relend, h, r_symndx, TRUE))
142411ca 2852 return FALSE;
13ae64f3 2853
419414ea 2854 if (r_type_tls == R_386_TLS_LE_32)
13ae64f3 2855 {
82e51918 2856 BFD_ASSERT (! unresolved_reloc);
419414ea 2857 if (r_type == R_386_TLS_GD)
13ae64f3 2858 {
142411ca 2859 unsigned int type;
13ae64f3
JJ		 2860 bfd_vma roff;
2861
2862 /* GD->LE transition. */
6eaa7fb5 2863 type = *(contents + rel->r_offset - 2);
13ae64f3
JJ		 2864 if (type == 0x04)
2865 {
6eaa7fb5
L		 2866 /* Change
2867 leal foo@tlsgd(,%ebx,1), %eax
2868 call ___tls_get_addr@PLT
2869 into:
2870 movl %gs:0, %eax
2871 subl $foo@tpoff, %eax
13ae64f3 2872 (6 byte form of subl). */
142411ca 2873 roff = rel->r_offset + 5;
13ae64f3
JJ		 2874 }
2875 else
2876 {
6eaa7fb5
L		 2877 /* Change
2878 leal foo@tlsgd(%ebx), %eax
2879 call ___tls_get_addr@PLT
2880 nop
2881 or
2882 leal foo@tlsgd(%reg), %eax
2883 call *___tls_get_addr@GOT(%reg)
2884 which may be converted to
2885 addr32 call ___tls_get_addr
2886 into:
2887 movl %gs:0, %eax; subl $foo@tpoff, %eax
142411ca 2888 (6 byte form of subl). */
142411ca 2889 roff = rel->r_offset + 6;
13ae64f3 2890 }
6eaa7fb5
L		 2891 memcpy (contents + roff - 8,
2892 "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
eb4ff4d6 2893 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
13ae64f3 2894 contents + roff);
6eaa7fb5 2895 /* Skip R_386_PC32, R_386_PLT32 and R_386_GOT32X. */
13ae64f3 2896 rel++;
60f2e42e 2897 wrel++;
13ae64f3
JJ		 2898 continue;
2899 }
419414ea 2900 else if (r_type == R_386_TLS_GOTDESC)
67a4f2b7
AO		 2901 {
2902 /* GDesc -> LE transition.
2903 It's originally something like:
2904 leal x@tlsdesc(%ebx), %eax
2905
2906 leal x@ntpoff, %eax
2907
2908 Registers other than %eax may be set up here. */
2909
142411ca 2910 unsigned int val;
67a4f2b7
AO		 2911 bfd_vma roff;
2912
67a4f2b7 2913 roff = rel->r_offset;
67a4f2b7 2914 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO		 2915
2916 /* Now modify the instruction as appropriate. */
2917 /* aoliva FIXME: remove the above and xor the byte
2918 below with 0x86. */
2919 bfd_put_8 (output_bfd, val ^ 0x86,
2920 contents + roff - 1);
eb4ff4d6 2921 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
67a4f2b7
AO		 2922 contents + roff);
2923 continue;
2924 }
419414ea 2925 else if (r_type == R_386_TLS_DESC_CALL)
67a4f2b7
AO		 2926 {
2927 /* GDesc -> LE transition.
2928 It's originally:
2929 call *(%eax)
2930 Turn it into:
142411ca 2931 xchg %ax,%ax */
67a4f2b7 2932
67a4f2b7 2933 bfd_vma roff;
6bbec505 2934
67a4f2b7 2935 roff = rel->r_offset;
10efb593 2936 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 2937 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
2938 continue;
2939 }
419414ea 2940 else if (r_type == R_386_TLS_IE)
13ae64f3 2941 {
142411ca 2942 unsigned int val;
13ae64f3
JJ		 2943
2944 /* IE->LE transition:
37e55690
JJ		 2945 Originally it can be one of:
2946 movl foo, %eax
2947 movl foo, %reg
2948 addl foo, %reg
2949 We change it into:
2950 movl $foo, %eax
2951 movl $foo, %reg
2952 addl $foo, %reg. */
37e55690 2953 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
37e55690
JJ		 2954 if (val == 0xa1)
2955 {
2956 /* movl foo, %eax. */
55fd94b0
AM		 2957 bfd_put_8 (output_bfd, 0xb8,
2958 contents + rel->r_offset - 1);
37e55690 2959 }
299bf759 2960 else
37e55690 2961 {
142411ca
L		 2962 unsigned int type;
2963
55fd94b0
AM		 2964 type = bfd_get_8 (input_bfd,
2965 contents + rel->r_offset - 2);
299bf759 2966 switch (type)
26e41594 2967 {
299bf759
L		 2968 case 0x8b:
2969 /* movl */
299bf759
L		 2970 bfd_put_8 (output_bfd, 0xc7,
2971 contents + rel->r_offset - 2);
2972 bfd_put_8 (output_bfd,
2973 0xc0 | ((val >> 3) & 7),
2974 contents + rel->r_offset - 1);
2975 break;
2976 case 0x03:
2977 /* addl */
299bf759
L		 2978 bfd_put_8 (output_bfd, 0x81,
2979 contents + rel->r_offset - 2);
2980 bfd_put_8 (output_bfd,
2981 0xc0 | ((val >> 3) & 7),
2982 contents + rel->r_offset - 1);
2983 break;
2984 default:
2985 BFD_FAIL ();
2986 break;
26e41594 2987 }
37e55690 2988 }
eb4ff4d6 2989 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ		 2990 contents + rel->r_offset);
2991 continue;
2992 }
2993 else
2994 {
2995 unsigned int val, type;
2996
2997 /* {IE_32,GOTIE}->LE transition:
2998 Originally it can be one of:
13ae64f3 2999 subl foo(%reg1), %reg2
13ae64f3 3000 movl foo(%reg1), %reg2
37e55690 3001 addl foo(%reg1), %reg2
13ae64f3
JJ		 3002 We change it into:
3003 subl $foo, %reg2
37e55690
JJ		 3004 movl $foo, %reg2 (6 byte form)
3005 addl $foo, %reg2. */
13ae64f3
JJ		 3006 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
3007 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
13ae64f3
JJ		 3008 if (type == 0x8b)
3009 {
3010 /* movl */
13ae64f3
JJ		 3011 bfd_put_8 (output_bfd, 0xc7,
3012 contents + rel->r_offset - 2);
3013 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3014 contents + rel->r_offset - 1);
3015 }
3016 else if (type == 0x2b)
3017 {
3018 /* subl */
13ae64f3
JJ		 3019 bfd_put_8 (output_bfd, 0x81,
3020 contents + rel->r_offset - 2);
3021 bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7),
3022 contents + rel->r_offset - 1);
3023 }
37e55690
JJ		 3024 else if (type == 0x03)
3025 {
3026 /* addl */
3027 bfd_put_8 (output_bfd, 0x81,
3028 contents + rel->r_offset - 2);
3029 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3030 contents + rel->r_offset - 1);
3031 }
13ae64f3
JJ		 3032 else
3033 BFD_FAIL ();
419414ea 3034 if (r_type == R_386_TLS_GOTIE)
eb4ff4d6 3035 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ		 3036 contents + rel->r_offset);
3037 else
eb4ff4d6 3038 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
37e55690 3039 contents + rel->r_offset);
13ae64f3
JJ		 3040 continue;
3041 }
3042 }
3043
6de2ae4a 3044 if (htab->elf.sgot == NULL)
13ae64f3
JJ		 3045 abort ();
3046
3047 if (h != NULL)
67a4f2b7
AO		 3048 {
3049 off = h->got.offset;
0afcef53 3050 offplt = elf_x86_hash_entry (h)->tlsdesc_got;
67a4f2b7 3051 }
13ae64f3
JJ		 3052 else
3053 {
3054 if (local_got_offsets == NULL)
3055 abort ();
3056
3057 off = local_got_offsets[r_symndx];
67a4f2b7 3058 offplt = local_tlsdesc_gotents[r_symndx];
13ae64f3
JJ		 3059 }
3060
3061 if ((off & 1) != 0)
3062 off &= ~1;
26e41594 3063 else
13ae64f3 3064 {
947216bf 3065 Elf_Internal_Rela outrel;
91d6fa6a 3066 int dr_type;
67a4f2b7 3067 asection *sreloc;
13ae64f3 3068
6de2ae4a 3069 if (htab->elf.srelgot == NULL)
13ae64f3
JJ		 3070 abort ();
3071
67a4f2b7
AO		 3072 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3073
3074 if (GOT_TLS_GDESC_P (tls_type))
3075 {
59d6ffb2 3076 bfd_byte *loc;
67a4f2b7
AO		 3077 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC);
3078 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8
6de2ae4a
L		 3079 <= htab->elf.sgotplt->size);
3080 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3081 + htab->elf.sgotplt->output_offset
67a4f2b7
AO		 3082 + offplt
3083 + htab->sgotplt_jump_table_size);
6de2ae4a 3084 sreloc = htab->elf.srelplt;
67a4f2b7 3085 loc = sreloc->contents;
765e526c 3086 loc += (htab->next_tls_desc_index++
5ae0bfb6 3087 * sizeof (Elf32_External_Rel));
67a4f2b7 3088 BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
c3b02097 3089 <= sreloc->contents + sreloc->size);
67a4f2b7
AO		 3090 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3091 if (indx == 0)
3092 {
3093 BFD_ASSERT (! unresolved_reloc);
3094 bfd_put_32 (output_bfd,
0afcef53 3095 relocation - _bfd_x86_elf_dtpoff_base (info),
6de2ae4a 3096 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO		 3097 + htab->sgotplt_jump_table_size + 4);
3098 }
3099 else
3100 {
3101 bfd_put_32 (output_bfd, 0,
6de2ae4a 3102 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO		 3103 + htab->sgotplt_jump_table_size + 4);
3104 }
3105 }
3106
6de2ae4a 3107 sreloc = htab->elf.srelgot;
67a4f2b7 3108
6de2ae4a
L		 3109 outrel.r_offset = (htab->elf.sgot->output_section->vma
3110 + htab->elf.sgot->output_offset + off);
13ae64f3 3111
67a4f2b7 3112 if (GOT_TLS_GD_P (tls_type))
13ae64f3 3113 dr_type = R_386_TLS_DTPMOD32;
67a4f2b7
AO		 3114 else if (GOT_TLS_GDESC_P (tls_type))
3115 goto dr_done;
37e55690
JJ		 3116 else if (tls_type == GOT_TLS_IE_POS)
3117 dr_type = R_386_TLS_TPOFF;
13ae64f3
JJ		 3118 else
3119 dr_type = R_386_TLS_TPOFF32;
67a4f2b7 3120
37e55690 3121 if (dr_type == R_386_TLS_TPOFF && indx == 0)
eb4ff4d6 3122 bfd_put_32 (output_bfd,
0afcef53 3123 relocation - _bfd_x86_elf_dtpoff_base (info),
6de2ae4a 3124 htab->elf.sgot->contents + off);
37e55690 3125 else if (dr_type == R_386_TLS_TPOFF32 && indx == 0)
23209a78 3126 bfd_put_32 (output_bfd,
0afcef53 3127 _bfd_x86_elf_dtpoff_base (info) - relocation,
6de2ae4a 3128 htab->elf.sgot->contents + off);
67a4f2b7 3129 else if (dr_type != R_386_TLS_DESC)
c366c25e 3130 bfd_put_32 (output_bfd, 0,
6de2ae4a 3131 htab->elf.sgot->contents + off);
13ae64f3 3132 outrel.r_info = ELF32_R_INFO (indx, dr_type);
67a4f2b7 3133
59d6ffb2 3134 elf_append_rel (output_bfd, sreloc, &outrel);
13ae64f3 3135
67a4f2b7 3136 if (GOT_TLS_GD_P (tls_type))
13ae64f3
JJ		 3137 {
3138 if (indx == 0)
3139 {
07d6d2b8 3140 BFD_ASSERT (! unresolved_reloc);
13ae64f3 3141 bfd_put_32 (output_bfd,
0afcef53 3142 relocation - _bfd_x86_elf_dtpoff_base (info),
6de2ae4a 3143 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ		 3144 }
3145 else
3146 {
3147 bfd_put_32 (output_bfd, 0,
6de2ae4a 3148 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ		 3149 outrel.r_info = ELF32_R_INFO (indx,
3150 R_386_TLS_DTPOFF32);
3151 outrel.r_offset += 4;
59d6ffb2 3152 elf_append_rel (output_bfd, sreloc, &outrel);
13ae64f3
JJ		 3153 }
3154 }
37e55690
JJ		 3155 else if (tls_type == GOT_TLS_IE_BOTH)
3156 {
3157 bfd_put_32 (output_bfd,
eb4ff4d6 3158 (indx == 0
0afcef53 3159 ? relocation - _bfd_x86_elf_dtpoff_base (info)
eb4ff4d6 3160 : 0),
6de2ae4a 3161 htab->elf.sgot->contents + off + 4);
37e55690
JJ		 3162 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
3163 outrel.r_offset += 4;
59d6ffb2 3164 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690 3165 }
13ae64f3 3166
67a4f2b7 3167 dr_done:
13ae64f3
JJ		 3168 if (h != NULL)
3169 h->got.offset |= 1;
3170 else
3171 local_got_offsets[r_symndx] |= 1;
3172 }
3173
67a4f2b7
AO		 3174 if (off >= (bfd_vma) -2
3175 && ! GOT_TLS_GDESC_P (tls_type))
13ae64f3 3176 abort ();
419414ea
L		 3177 if (r_type_tls == R_386_TLS_GOTDESC
3178 || r_type_tls == R_386_TLS_DESC_CALL)
67a4f2b7
AO		 3179 {
3180 relocation = htab->sgotplt_jump_table_size + offplt;
3181 unresolved_reloc = FALSE;
3182 }
419414ea 3183 else if (r_type_tls == r_type)
13ae64f3 3184 {
6de2ae4a
L		 3185 bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma
3186 + htab->elf.sgotplt->output_offset;
3187 relocation = htab->elf.sgot->output_section->vma
3188 + htab->elf.sgot->output_offset + off - g_o_t;
37e55690
JJ		 3189 if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE)
3190 && tls_type == GOT_TLS_IE_BOTH)
3191 relocation += 4;
3192 if (r_type == R_386_TLS_IE)
8c37241b 3193 relocation += g_o_t;
b34976b6 3194 unresolved_reloc = FALSE;
13ae64f3 3195 }
419414ea 3196 else if (r_type == R_386_TLS_GD)
13ae64f3
JJ		 3197 {
3198 unsigned int val, type;
3199 bfd_vma roff;
3200
3201 /* GD->IE transition. */
6eaa7fb5
L		 3202 type = *(contents + rel->r_offset - 2);
3203 val = *(contents + rel->r_offset - 1);
13ae64f3
JJ		 3204 if (type == 0x04)
3205 {
6eaa7fb5
L		 3206 /* Change
3207 leal foo@tlsgd(,%ebx,1), %eax
3208 call ___tls_get_addr@PLT
3209 into:
3210 movl %gs:0, %eax
3211 subl $foo@gottpoff(%ebx), %eax. */
13ae64f3 3212 val >>= 3;
142411ca 3213 roff = rel->r_offset - 3;
13ae64f3
JJ		 3214 }
3215 else
3216 {
6eaa7fb5
L		 3217 /* Change
3218 leal foo@tlsgd(%ebx), %eax
3219 call ___tls_get_addr@PLT
3220 nop
3221 or
3222 leal foo@tlsgd(%reg), %eax
3223 call *___tls_get_addr@GOT(%reg)
3224 which may be converted to
3225 addr32 call ___tls_get_addr
3226 into:
3227 movl %gs:0, %eax;
3228 subl $foo@gottpoff(%reg), %eax. */
13ae64f3
JJ		 3229 roff = rel->r_offset - 2;
3230 }
3231 memcpy (contents + roff,
3232 "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12);
3233 contents[roff + 7] = 0x80 | (val & 7);
37e55690
JJ		 3234 /* If foo is used only with foo@gotntpoff(%reg) and
3235 foo@indntpoff, but not with foo@gottpoff(%reg), change
3236 subl $foo@gottpoff(%reg), %eax
3237 into:
3238 addl $foo@gotntpoff(%reg), %eax. */
ebcfb3c0
JJ		 3239 if (tls_type == GOT_TLS_IE_POS)
3240 contents[roff + 6] = 0x03;
8c37241b 3241 bfd_put_32 (output_bfd,
6de2ae4a
L		 3242 htab->elf.sgot->output_section->vma
3243 + htab->elf.sgot->output_offset + off
3244 - htab->elf.sgotplt->output_section->vma
3245 - htab->elf.sgotplt->output_offset,
13ae64f3 3246 contents + roff + 8);
6eaa7fb5 3247 /* Skip R_386_PLT32 and R_386_GOT32X. */
13ae64f3 3248 rel++;
60f2e42e 3249 wrel++;
13ae64f3
JJ		 3250 continue;
3251 }
419414ea 3252 else if (r_type == R_386_TLS_GOTDESC)
67a4f2b7
AO		 3253 {
3254 /* GDesc -> IE transition.
3255 It's originally something like:
3256 leal x@tlsdesc(%ebx), %eax
3257
3258 Change it to:
142411ca 3259 movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax
67a4f2b7
AO		 3260 or:
3261 movl x@gottpoff(%ebx), %eax # before negl %eax
3262
3263 Registers other than %eax may be set up here. */
3264
67a4f2b7
AO		 3265 bfd_vma roff;
3266
3267 /* First, make sure it's a leal adding ebx to a 32-bit
3268 offset into any register, although it's probably
3269 almost always going to be eax. */
3270 roff = rel->r_offset;
67a4f2b7
AO		 3271
3272 /* Now modify the instruction as appropriate. */
3273 /* To turn a leal into a movl in the form we use it, it
3274 suffices to change the first byte from 0x8d to 0x8b.
3275 aoliva FIXME: should we decide to keep the leal, all
3276 we have to do is remove the statement below, and
3277 adjust the relaxation of R_386_TLS_DESC_CALL. */
3278 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3279
3280 if (tls_type == GOT_TLS_IE_BOTH)
3281 off += 4;
3282
3283 bfd_put_32 (output_bfd,
6de2ae4a
L		 3284 htab->elf.sgot->output_section->vma
3285 + htab->elf.sgot->output_offset + off
3286 - htab->elf.sgotplt->output_section->vma
3287 - htab->elf.sgotplt->output_offset,
67a4f2b7
AO		 3288 contents + roff);
3289 continue;
3290 }
419414ea 3291 else if (r_type == R_386_TLS_DESC_CALL)
67a4f2b7
AO		 3292 {
3293 /* GDesc -> IE transition.
3294 It's originally:
3295 call *(%eax)
3296
3297 Change it to:
142411ca 3298 xchg %ax,%ax
67a4f2b7
AO		 3299 or
3300 negl %eax
3301 depending on how we transformed the TLS_GOTDESC above.
3302 */
3303
67a4f2b7
AO		 3304 bfd_vma roff;
3305
67a4f2b7 3306 roff = rel->r_offset;
67a4f2b7
AO		 3307
3308 /* Now modify the instruction as appropriate. */
3309 if (tls_type != GOT_TLS_IE_NEG)
3310 {
10efb593
L		 3311 /* xchg %ax,%ax */
3312 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 3313 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3314 }
3315 else
3316 {
3317 /* negl %eax */
3318 bfd_put_8 (output_bfd, 0xf7, contents + roff);
3319 bfd_put_8 (output_bfd, 0xd8, contents + roff + 1);
3320 }
3321
3322 continue;
3323 }
3324 else
3325 BFD_ASSERT (FALSE);
13ae64f3
JJ		 3326 break;
3327
3328 case R_386_TLS_LDM:
142411ca
L		 3329 if (! elf_i386_tls_transition (info, input_bfd,
3330 input_section, contents,
3331 symtab_hdr, sym_hashes,
3332 &r_type, GOT_UNKNOWN, rel,
bedfd056 3333 relend, h, r_symndx, TRUE))
142411ca 3334 return FALSE;
13ae64f3 3335
142411ca
L		 3336 if (r_type != R_386_TLS_LDM)
3337 {
6eaa7fb5
L		 3338 /* LD->LE transition. Change
3339 leal foo@tlsldm(%ebx) %eax
3340 call ___tls_get_addr@PLT
3341 into:
3342 movl %gs:0, %eax
3343 nop
3344 leal 0(%esi,1), %esi
3345 or change
3346 leal foo@tlsldm(%reg) %eax
3347 call *___tls_get_addr@GOT(%reg)
3348 which may be converted to
3349 addr32 call ___tls_get_addr
3350 into:
3351 movl %gs:0, %eax
3352 leal 0(%esi), %esi */
142411ca 3353 BFD_ASSERT (r_type == R_386_TLS_LE_32);
6eaa7fb5
L		 3354 if (*(contents + rel->r_offset + 4) == 0xff
3355 || *(contents + rel->r_offset + 4) == 0x67)
3356 memcpy (contents + rel->r_offset - 2,
3357 "\x65\xa1\0\0\0\0\x8d\xb6\0\0\0", 12);
3358 else
3359 memcpy (contents + rel->r_offset - 2,
3360 "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11);
a3fadc9a 3361 /* Skip R_386_PC32/R_386_PLT32. */
13ae64f3 3362 rel++;
60f2e42e 3363 wrel++;
13ae64f3
JJ		 3364 continue;
3365 }
3366
6de2ae4a 3367 if (htab->elf.sgot == NULL)
13ae64f3
JJ		 3368 abort ();
3369
0afcef53 3370 off = htab->tls_ld_or_ldm_got.offset;
13ae64f3
JJ		 3371 if (off & 1)
3372 off &= ~1;
3373 else
3374 {
947216bf 3375 Elf_Internal_Rela outrel;
13ae64f3 3376
6de2ae4a 3377 if (htab->elf.srelgot == NULL)
13ae64f3
JJ		 3378 abort ();
3379
6de2ae4a
L		 3380 outrel.r_offset = (htab->elf.sgot->output_section->vma
3381 + htab->elf.sgot->output_offset + off);
13ae64f3
JJ		 3382
3383 bfd_put_32 (output_bfd, 0,
6de2ae4a 3384 htab->elf.sgot->contents + off);
13ae64f3 3385 bfd_put_32 (output_bfd, 0,
6de2ae4a 3386 htab->elf.sgot->contents + off + 4);
13ae64f3 3387 outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32);
59d6ffb2 3388 elf_append_rel (output_bfd, htab->elf.srelgot, &outrel);
0afcef53 3389 htab->tls_ld_or_ldm_got.offset |= 1;
13ae64f3 3390 }
6de2ae4a
L		 3391 relocation = htab->elf.sgot->output_section->vma
3392 + htab->elf.sgot->output_offset + off
3393 - htab->elf.sgotplt->output_section->vma
3394 - htab->elf.sgotplt->output_offset;
b34976b6 3395 unresolved_reloc = FALSE;
13ae64f3
JJ		 3396 break;
3397
3398 case R_386_TLS_LDO_32:
0e1862bb
L		 3399 if (!bfd_link_executable (info)
3400 || (input_section->flags & SEC_CODE) == 0)
0afcef53 3401 relocation -= _bfd_x86_elf_dtpoff_base (info);
13ae64f3
JJ		 3402 else
3403 /* When converting LDO to LE, we must negate. */
eb4ff4d6 3404 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ		 3405 break;
3406
3407 case R_386_TLS_LE_32:
13ae64f3 3408 case R_386_TLS_LE:
0e1862bb 3409 if (!bfd_link_executable (info))
37e55690 3410 {
947216bf 3411 Elf_Internal_Rela outrel;
37e55690 3412 asection *sreloc;
37e55690
JJ		 3413
3414 outrel.r_offset = rel->r_offset
3415 + input_section->output_section->vma
3416 + input_section->output_offset;
3417 if (h != NULL && h->dynindx != -1)
3418 indx = h->dynindx;
3419 else
3420 indx = 0;
3421 if (r_type == R_386_TLS_LE_32)
3422 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32);
3423 else
3424 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
3425 sreloc = elf_section_data (input_section)->sreloc;
3426 if (sreloc == NULL)
3427 abort ();
59d6ffb2 3428 elf_append_rel (output_bfd, sreloc, &outrel);
37e55690
JJ		 3429 if (indx)
3430 continue;
3431 else if (r_type == R_386_TLS_LE_32)
0afcef53 3432 relocation = _bfd_x86_elf_dtpoff_base (info) - relocation;
37e55690 3433 else
0afcef53 3434 relocation -= _bfd_x86_elf_dtpoff_base (info);
37e55690
JJ		 3435 }
3436 else if (r_type == R_386_TLS_LE_32)
eb4ff4d6 3437 relocation = elf_i386_tpoff (info, relocation);
37e55690 3438 else
eb4ff4d6 3439 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ		 3440 break;
3441
252b5132
RH		 3442 default:
3443 break;
3444 }
3445
239e1f3a
AM		 3446 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3447 because such sections are not SEC_ALLOC and thus ld.so will
3448 not process them. */
8c694914 3449 if (unresolved_reloc
239e1f3a 3450 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM		 3451 && h->def_dynamic)
3452 && _bfd_elf_section_offset (output_bfd, info, input_section,
3453 rel->r_offset) != (bfd_vma) -1)
6a30718d 3454 {
4eca0228 3455 _bfd_error_handler
695344c0 3456 /* xgettext:c-format */
2dcf00ce 3457 (_("%pB(%pA+%#" PRIx64 "): unresolvable %s relocation against symbol `%s'"),
d003868e
AM		 3458 input_bfd,
3459 input_section,
2dcf00ce 3460 (uint64_t) rel->r_offset,
843fe662 3461 howto->name,
6a30718d 3462 h->root.root.string);
b34976b6 3463 return FALSE;
6a30718d 3464 }
83be169b 3465
cbe950e9 3466do_relocation:
252b5132
RH		 3467 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
3468 contents, rel->r_offset,
55fd94b0 3469 relocation, 0);
252b5132 3470
62d78908 3471check_relocation_error:
cf5c0c5b 3472 if (r != bfd_reloc_ok)
252b5132 3473 {
cf5c0c5b 3474 const char *name;
ffb2e45b 3475
cf5c0c5b
AM		 3476 if (h != NULL)
3477 name = h->root.root.string;
3478 else
3479 {
3480 name = bfd_elf_string_from_elf_section (input_bfd,
3481 symtab_hdr->sh_link,
3482 sym->st_name);
3483 if (name == NULL)
b34976b6 3484 return FALSE;
cf5c0c5b
AM		 3485 if (*name == '\0')
3486 name = bfd_section_name (input_bfd, sec);
3487 }
ffb2e45b 3488
cf5c0c5b 3489 if (r == bfd_reloc_overflow)
1a72702b
AM		 3490 (*info->callbacks->reloc_overflow)
3491 (info, (h ? &h->root : NULL), name, howto->name,
3492 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
cf5c0c5b
AM		 3493 else
3494 {
4eca0228 3495 _bfd_error_handler
695344c0 3496 /* xgettext:c-format */
2dcf00ce 3497 (_("%pB(%pA+%#" PRIx64 "): reloc against `%s': error %d"),
d003868e 3498 input_bfd, input_section,
2dcf00ce 3499 (uint64_t) rel->r_offset, name, (int) r);
b34976b6 3500 return FALSE;
cf5c0c5b 3501 }
252b5132 3502 }
60f2e42e
L		 3503
3504 if (wrel != rel)
3505 *wrel = *rel;
3506 }
3507
3508 if (wrel != rel)
3509 {
3510 Elf_Internal_Shdr *rel_hdr;
3511 size_t deleted = rel - wrel;
3512
3513 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3514 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3515 if (rel_hdr->sh_size == 0)
3516 {
3517 /* It is too late to remove an empty reloc section. Leave
3518 one NONE reloc.
3519 ??? What is wrong with an empty section??? */
3520 rel_hdr->sh_size = rel_hdr->sh_entsize;
3521 deleted -= 1;
3522 }
3523 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3524 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3525 input_section->reloc_count -= deleted;
252b5132
RH		 3526 }
3527
b34976b6 3528 return TRUE;
252b5132
RH		 3529}
3530
3531/* Finish up dynamic symbol handling. We set the contents of various
3532 dynamic sections here. */
3533
b34976b6 3534static bfd_boolean
55fd94b0
AM		 3535elf_i386_finish_dynamic_symbol (bfd *output_bfd,
3536 struct bfd_link_info *info,
3537 struct elf_link_hash_entry *h,
3538 Elf_Internal_Sym *sym)
252b5132 3539{
0afcef53 3540 struct elf_x86_link_hash_table *htab;
25e762b9 3541 unsigned plt_entry_size;
0afcef53 3542 struct elf_x86_link_hash_entry *eh;
aec6b87e 3543 bfd_boolean local_undefweak;
ee2fdd6f 3544 bfd_boolean use_plt_second;
252b5132 3545
0afcef53 3546 htab = elf_x86_hash_table (info, I386_ELF_DATA);
4dfe6ac6
NC		 3547 if (htab == NULL)
3548 return FALSE;
252b5132 3549
765e526c 3550 plt_entry_size = htab->plt.plt_entry_size;
25e762b9 3551
ee2fdd6f
L		 3552 /* Use the second PLT section only if there is .plt section. */
3553 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
3554
0afcef53 3555 eh = (struct elf_x86_link_hash_entry *) h;
e133d005
L		 3556 if (eh->no_finish_dynamic_symbol)
3557 abort ();
dd7e64d4 3558
aec6b87e
L		 3559 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3560 resolved undefined weak symbols in executable so that their
3561 references have value 0 at run-time. */
c5bce5c6 3562 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
aec6b87e 3563
252b5132
RH		 3564 if (h->plt.offset != (bfd_vma) -1)
3565 {
ee2fdd6f 3566 bfd_vma plt_index, plt_offset;
252b5132 3567 bfd_vma got_offset;
947216bf
AM		 3568 Elf_Internal_Rela rel;
3569 bfd_byte *loc;
ee2fdd6f 3570 asection *plt, *resolved_plt, *gotplt, *relplt;
cbe950e9
L		 3571
3572 /* When building a static executable, use .iplt, .igot.plt and
3573 .rel.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 3574 if (htab->elf.splt != NULL)
cbe950e9 3575 {
6de2ae4a
L		 3576 plt = htab->elf.splt;
3577 gotplt = htab->elf.sgotplt;
3578 relplt = htab->elf.srelplt;
cbe950e9
L		 3579 }
3580 else
3581 {
6de2ae4a
L		 3582 plt = htab->elf.iplt;
3583 gotplt = htab->elf.igotplt;
3584 relplt = htab->elf.irelplt;
cbe950e9 3585 }
252b5132 3586
f3180fa9 3587 VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
252b5132
RH		 3588
3589 /* Get the index in the procedure linkage table which
3590 corresponds to this symbol. This is the index of this symbol
3591 in all the symbols for which we are making plt entries. The
cbe950e9 3592 first entry in the procedure linkage table is reserved.
252b5132 3593
cbe950e9 3594 Get the offset into the .got table of the entry that
252b5132 3595 corresponds to this function. Each .got entry is 4 bytes.
cbe950e9 3596 The first three are reserved.
6bbec505 3597
cbe950e9
L		 3598 For static executables, we don't reserve anything. */
3599
6de2ae4a 3600 if (plt == htab->elf.splt)
cbe950e9 3601 {
f604c2a2 3602 got_offset = (h->plt.offset / plt_entry_size
765e526c 3603 - htab->plt.has_plt0);
e1f98742 3604 got_offset = (got_offset + 3) * 4;
cbe950e9
L		 3605 }
3606 else
3607 {
e1f98742
L		 3608 got_offset = h->plt.offset / plt_entry_size;
3609 got_offset = got_offset * 4;
cbe950e9 3610 }
252b5132 3611
f604c2a2
L		 3612 /* Fill in the entry in the procedure linkage table and update
3613 the first slot. */
765e526c 3614 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
f604c2a2 3615 plt_entry_size);
ee2fdd6f
L		 3616
3617 if (use_plt_second)
3618 {
3619 const bfd_byte *plt_entry;
3620 if (bfd_link_pic (info))
765e526c 3621 plt_entry = htab->non_lazy_plt->pic_plt_entry;
ee2fdd6f 3622 else
765e526c 3623 plt_entry = htab->non_lazy_plt->plt_entry;
ee2fdd6f 3624 memcpy (htab->plt_second->contents + eh->plt_second.offset,
765e526c 3625 plt_entry, htab->non_lazy_plt->plt_entry_size);
ee2fdd6f
L		 3626
3627 resolved_plt = htab->plt_second;
3628 plt_offset = eh->plt_second.offset;
3629 }
3630 else
3631 {
3632 resolved_plt = plt;
3633 plt_offset = h->plt.offset;
3634 }
3635
0e1862bb 3636 if (! bfd_link_pic (info))
252b5132 3637 {
252b5132 3638 bfd_put_32 (output_bfd,
cbe950e9
L		 3639 (gotplt->output_section->vma
3640 + gotplt->output_offset
252b5132 3641 + got_offset),
ee2fdd6f 3642 resolved_plt->contents + plt_offset
07d6d2b8 3643 + htab->plt.plt_got_offset);
eac338cf 3644
851b6fa1 3645 if (htab->target_os == is_vxworks)
eac338cf
PB		 3646 {
3647 int s, k, reloc_index;
3648
3649 /* Create the R_386_32 relocation referencing the GOT
3650 for this PLT entry. */
3651
3652 /* S: Current slot number (zero-based). */
765e526c 3653 s = ((h->plt.offset - htab->plt.plt_entry_size)
07d6d2b8 3654 / htab->plt.plt_entry_size);
eac338cf 3655 /* K: Number of relocations for PLTResolve. */
0e1862bb 3656 if (bfd_link_pic (info))
eac338cf
PB		 3657 k = PLTRESOLVE_RELOCS_SHLIB;
3658 else
3659 k = PLTRESOLVE_RELOCS;
3660 /* Skip the PLTresolve relocations, and the relocations for
3661 the other PLT slots. */
3662 reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS;
765e526c 3663 loc = (htab->srelplt2->contents + reloc_index
eac338cf
PB		 3664 * sizeof (Elf32_External_Rel));
3665
ee2fdd6f
L		 3666 rel.r_offset = (plt->output_section->vma
3667 + plt->output_offset
eac338cf 3668 + h->plt.offset + 2),
7325306f 3669 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB		 3670 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
3671
3672 /* Create the R_386_32 relocation referencing the beginning of
3673 the PLT for this GOT entry. */
6de2ae4a
L		 3674 rel.r_offset = (htab->elf.sgotplt->output_section->vma
3675 + htab->elf.sgotplt->output_offset
eac338cf 3676 + got_offset);
7325306f 3677 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
eac338cf 3678 bfd_elf32_swap_reloc_out (output_bfd, &rel,
13ca3149 3679 loc + sizeof (Elf32_External_Rel));
eac338cf 3680 }
252b5132
RH		 3681 }
3682 else
3683 {
252b5132 3684 bfd_put_32 (output_bfd, got_offset,
ee2fdd6f 3685 resolved_plt->contents + plt_offset
07d6d2b8 3686 + htab->plt.plt_got_offset);
252b5132
RH		 3687 }
3688
aec6b87e
L		 3689 /* Fill in the entry in the global offset table. Leave the entry
3690 as zero for undefined weak symbol in PIE. No PLT relocation
3691 against undefined weak symbol in PIE. */
3692 if (!local_undefweak)
cbe950e9 3693 {
765e526c 3694 if (htab->plt.has_plt0)
f604c2a2
L		 3695 bfd_put_32 (output_bfd,
3696 (plt->output_section->vma
3697 + plt->output_offset
3698 + h->plt.offset
765e526c 3699 + htab->lazy_plt->plt_lazy_offset),
f604c2a2 3700 gotplt->contents + got_offset);
252b5132 3701
aec6b87e
L		 3702 /* Fill in the entry in the .rel.plt section. */
3703 rel.r_offset = (gotplt->output_section->vma
3704 + gotplt->output_offset
3705 + got_offset);
cf1070f1 3706 if (PLT_LOCAL_IFUNC_P (info, h))
aec6b87e 3707 {
871b3ab2 3708 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L		 3709 h->root.root.string,
3710 h->root.u.def.section->owner);
3711
aec6b87e
L		 3712 /* If an STT_GNU_IFUNC symbol is locally defined, generate
3713 R_386_IRELATIVE instead of R_386_JUMP_SLOT. Store addend
3714 in the .got.plt section. */
3715 bfd_put_32 (output_bfd,
3716 (h->root.u.def.value
3717 + h->root.u.def.section->output_section->vma
3718 + h->root.u.def.section->output_offset),
3719 gotplt->contents + got_offset);
3720 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
3721 /* R_386_IRELATIVE comes last. */
3722 plt_index = htab->next_irelative_index--;
3723 }
3724 else
3725 {
3726 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
3727 plt_index = htab->next_jump_slot_index++;
3728 }
3729
3730 loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel);
3731 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
3732
f604c2a2
L		 3733 /* Don't fill the second and third slots in PLT entry for
3734 static executables nor without PLT0. */
765e526c 3735 if (plt == htab->elf.splt && htab->plt.has_plt0)
aec6b87e
L		 3736 {
3737 bfd_put_32 (output_bfd,
3738 plt_index * sizeof (Elf32_External_Rel),
3739 plt->contents + h->plt.offset
765e526c 3740 + htab->lazy_plt->plt_reloc_offset);
f604c2a2
L		 3741 bfd_put_32 (output_bfd,
3742 - (h->plt.offset
765e526c 3743 + htab->lazy_plt->plt_plt_offset + 4),
f604c2a2 3744 (plt->contents + h->plt.offset
765e526c 3745 + htab->lazy_plt->plt_plt_offset));
aec6b87e 3746 }
e1f98742 3747 }
dd7e64d4
L		 3748 }
3749 else if (eh->plt_got.offset != (bfd_vma) -1)
3750 {
3751 bfd_vma got_offset, plt_offset;
3752 asection *plt, *got, *gotplt;
3753 const bfd_byte *got_plt_entry;
3754
dd7e64d4
L		 3755 /* Set the entry in the GOT procedure linkage table. */
3756 plt = htab->plt_got;
3757 got = htab->elf.sgot;
3758 gotplt = htab->elf.sgotplt;
3759 got_offset = h->got.offset;
3760
3761 if (got_offset == (bfd_vma) -1
3762 || plt == NULL
3763 || got == NULL
3764 || gotplt == NULL)
3765 abort ();
3766
3767 /* Fill in the entry in the GOT procedure linkage table. */
0e1862bb 3768 if (! bfd_link_pic (info))
252b5132 3769 {
765e526c 3770 got_plt_entry = htab->non_lazy_plt->plt_entry;
dd7e64d4 3771 got_offset += got->output_section->vma + got->output_offset;
252b5132 3772 }
dd7e64d4
L		 3773 else
3774 {
765e526c 3775 got_plt_entry = htab->non_lazy_plt->pic_plt_entry;
dd7e64d4
L		 3776 got_offset += (got->output_section->vma
3777 + got->output_offset
3778 - gotplt->output_section->vma
3779 - gotplt->output_offset);
3780 }
3781
3782 plt_offset = eh->plt_got.offset;
3783 memcpy (plt->contents + plt_offset, got_plt_entry,
765e526c 3784 htab->non_lazy_plt->plt_entry_size);
dd7e64d4 3785 bfd_put_32 (output_bfd, got_offset,
f604c2a2 3786 (plt->contents + plt_offset
765e526c 3787 + htab->non_lazy_plt->plt_got_offset));
dd7e64d4
L		 3788 }
3789
aec6b87e
L		 3790 if (!local_undefweak
3791 && !h->def_regular
dd7e64d4
L		 3792 && (h->plt.offset != (bfd_vma) -1
3793 || eh->plt_got.offset != (bfd_vma) -1))
3794 {
3795 /* Mark the symbol as undefined, rather than as defined in
3796 the .plt section. Leave the value if there were any
3797 relocations where pointer equality matters (this is a clue
3798 for the dynamic linker, to make function pointer
3799 comparisons work between an application and shared
3800 library), otherwise set it to zero. If a function is only
3801 called from a binary, there is no need to slow down
3802 shared libraries because of that. */
3803 sym->st_shndx = SHN_UNDEF;
3804 if (!h->pointer_equality_needed)
3805 sym->st_value = 0;
252b5132
RH		 3806 }
3807
aec6b87e
L		 3808 /* Don't generate dynamic GOT relocation against undefined weak
3809 symbol in executable. */
13ae64f3 3810 if (h->got.offset != (bfd_vma) -1
0afcef53
L		 3811 && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry(h)->tls_type)
3812 && (elf_x86_hash_entry(h)->tls_type & GOT_TLS_IE) == 0
aec6b87e 3813 && !local_undefweak)
252b5132 3814 {
947216bf 3815 Elf_Internal_Rela rel;
233cc9c1 3816 asection *relgot = htab->elf.srelgot;
252b5132
RH		 3817
3818 /* This symbol has an entry in the global offset table. Set it
3819 up. */
3820
6de2ae4a 3821 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
ffb2e45b 3822 abort ();
252b5132 3823
6de2ae4a
L		 3824 rel.r_offset = (htab->elf.sgot->output_section->vma
3825 + htab->elf.sgot->output_offset
dc810e39 3826 + (h->got.offset & ~(bfd_vma) 1));
252b5132 3827
dd5724d5
AM		 3828 /* If this is a static link, or it is a -Bsymbolic link and the
3829 symbol is defined locally or was forced to be local because
3830 of a version file, we just want to emit a RELATIVE reloc.
252b5132
RH		 3831 The entry in the global offset table will already have been
3832 initialized in the relocate_section function. */
710ab287 3833 if (h->def_regular
0018b0a3
L		 3834 && h->type == STT_GNU_IFUNC)
3835 {
233cc9c1
L		 3836 if (h->plt.offset == (bfd_vma) -1)
3837 {
3838 /* STT_GNU_IFUNC is referenced without PLT. */
3839 if (htab->elf.splt == NULL)
3840 {
3841 /* use .rel[a].iplt section to store .got relocations
3842 in static executable. */
3843 relgot = htab->elf.irelplt;
3844 }
6999821f 3845 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
233cc9c1 3846 {
871b3ab2 3847 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L		 3848 h->root.root.string,
3849 h->root.u.def.section->owner);
3850
233cc9c1
L		 3851 bfd_put_32 (output_bfd,
3852 (h->root.u.def.value
3853 + h->root.u.def.section->output_section->vma
3854 + h->root.u.def.section->output_offset),
3855 htab->elf.sgot->contents + h->got.offset);
3856 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
3857 }
3858 else
3859 goto do_glob_dat;
3860 }
3861 else if (bfd_link_pic (info))
710ab287
L		 3862 {
3863 /* Generate R_386_GLOB_DAT. */
3864 goto do_glob_dat;
3865 }
3866 else
3867 {
cd2b2c10 3868 asection *plt;
ee2fdd6f 3869 bfd_vma plt_offset;
cd2b2c10 3870
710ab287
L		 3871 if (!h->pointer_equality_needed)
3872 abort ();
3873
3874 /* For non-shared object, we can't use .got.plt, which
3875 contains the real function addres if we need pointer
3876 equality. We load the GOT entry with the PLT entry. */
ee2fdd6f
L		 3877 if (htab->plt_second != NULL)
3878 {
3879 plt = htab->plt_second;
3880 plt_offset = eh->plt_second.offset;
3881 }
3882 else
3883 {
3884 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
3885 plt_offset = h->plt.offset;
3886 }
710ab287
L		 3887 bfd_put_32 (output_bfd,
3888 (plt->output_section->vma
ee2fdd6f 3889 + plt->output_offset + plt_offset),
6de2ae4a 3890 htab->elf.sgot->contents + h->got.offset);
710ab287
L		 3891 return TRUE;
3892 }
0018b0a3 3893 }
0e1862bb 3894 else if (bfd_link_pic (info)
6999821f 3895 && SYMBOL_REFERENCES_LOCAL_P (info, h))
dd5724d5 3896 {
6725bdbf 3897 BFD_ASSERT((h->got.offset & 1) != 0);
dd5724d5
AM		 3898 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
3899 }
252b5132
RH		 3900 else
3901 {
dd5724d5 3902 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 3903do_glob_dat:
6725bdbf 3904 bfd_put_32 (output_bfd, (bfd_vma) 0,
6de2ae4a 3905 htab->elf.sgot->contents + h->got.offset);
252b5132
RH		 3906 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
3907 }
3908
233cc9c1 3909 elf_append_rel (output_bfd, relgot, &rel);
252b5132
RH		 3910 }
3911
f5385ebf 3912 if (h->needs_copy)
252b5132 3913 {
947216bf 3914 Elf_Internal_Rela rel;
5474d94f 3915 asection *s;
252b5132
RH		 3916
3917 /* This symbol needs a copy reloc. Set it up. */
ff38b4cc 3918 VERIFY_COPY_RELOC (h, htab)
252b5132
RH		 3919
3920 rel.r_offset = (h->root.u.def.value
3921 + h->root.u.def.section->output_section->vma
3922 + h->root.u.def.section->output_offset);
3923 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
afbf7e8e 3924 if (h->root.u.def.section == htab->elf.sdynrelro)
5474d94f
AM		 3925 s = htab->elf.sreldynrelro;
3926 else
3927 s = htab->elf.srelbss;
3928 elf_append_rel (output_bfd, s, &rel);
252b5132
RH		 3929 }
3930
b34976b6 3931 return TRUE;
252b5132
RH		 3932}
3933
c25bc9fc
L		 3934/* Finish up local dynamic symbol handling. We set the contents of
3935 various dynamic sections here. */
3936
3937static bfd_boolean
3938elf_i386_finish_local_dynamic_symbol (void **slot, void *inf)
3939{
3940 struct elf_link_hash_entry *h
3941 = (struct elf_link_hash_entry *) *slot;
3942 struct bfd_link_info *info
23209a78 3943 = (struct bfd_link_info *) inf;
c25bc9fc
L		 3944
3945 return elf_i386_finish_dynamic_symbol (info->output_bfd, info,
3946 h, NULL);
3947}
3948
aec6b87e
L		 3949/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
3950 here since undefined weak symbol may not be dynamic and may not be
3951 called for elf_i386_finish_dynamic_symbol. */
3952
3953static bfd_boolean
3954elf_i386_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
3955 void *inf)
3956{
3957 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
3958 struct bfd_link_info *info = (struct bfd_link_info *) inf;
3959
3960 if (h->root.type != bfd_link_hash_undefweak
3961 || h->dynindx != -1)
3962 return TRUE;
3963
3964 return elf_i386_finish_dynamic_symbol (info->output_bfd,
5f0f0847 3965 info, h, NULL);
aec6b87e
L		 3966}
3967
38701953
AM		 3968/* Used to decide how to sort relocs in an optimal manner for the
3969 dynamic linker, before writing them out. */
3970
3971static enum elf_reloc_type_class
cae1fbbb 3972elf_i386_reloc_type_class (const struct bfd_link_info *info,
7e612e98
AM		 3973 const asection *rel_sec ATTRIBUTE_UNUSED,
3974 const Elf_Internal_Rela *rela)
38701953 3975{
cae1fbbb
L		 3976 bfd *abfd = info->output_bfd;
3977 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
3978 struct elf_link_hash_table *htab = elf_hash_table (info);
cae1fbbb 3979
d9e3b590
L		 3980 if (htab->dynsym != NULL
3981 && htab->dynsym->contents != NULL)
3982 {
3983 /* Check relocation against STT_GNU_IFUNC symbol if there are
07d6d2b8 3984 dynamic symbols. */
d9e3b590 3985 unsigned long r_symndx = ELF32_R_SYM (rela->r_info);
c428ce9d
L		 3986 if (r_symndx != STN_UNDEF)
3987 {
3988 Elf_Internal_Sym sym;
3989 if (!bed->s->swap_symbol_in (abfd,
3990 (htab->dynsym->contents
3991 + r_symndx * sizeof (Elf32_External_Sym)),
3992 0, &sym))
3993 abort ();
d9e3b590 3994
c428ce9d
L		 3995 if (ELF32_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
3996 return reloc_class_ifunc;
3997 }
d9e3b590 3998 }
cae1fbbb 3999
55fd94b0 4000 switch (ELF32_R_TYPE (rela->r_info))
38701953 4001 {
c428ce9d
L		 4002 case R_386_IRELATIVE:
4003 return reloc_class_ifunc;
38701953
AM		 4004 case R_386_RELATIVE:
4005 return reloc_class_relative;
4006 case R_386_JUMP_SLOT:
4007 return reloc_class_plt;
4008 case R_386_COPY:
4009 return reloc_class_copy;
4010 default:
4011 return reloc_class_normal;
4012 }
4013}
4014
252b5132
RH		 4015/* Finish up the dynamic sections. */
4016
b34976b6 4017static bfd_boolean
55fd94b0
AM		 4018elf_i386_finish_dynamic_sections (bfd *output_bfd,
4019 struct bfd_link_info *info)
252b5132 4020{
0afcef53 4021 struct elf_x86_link_hash_table *htab;
252b5132 4022
9577f60b 4023 htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4dfe6ac6
NC		 4024 if (htab == NULL)
4025 return FALSE;
4026
9577f60b
L		 4027 if (!htab->elf.dynamic_sections_created)
4028 return TRUE;
252b5132 4029
9577f60b 4030 if (htab->elf.splt && htab->elf.splt->size > 0)
252b5132 4031 {
9577f60b
L		 4032 /* UnixWare sets the entsize of .plt to 4, although that doesn't
4033 really seem like the right value. */
4034 elf_section_data (htab->elf.splt->output_section)
4035 ->this_hdr.sh_entsize = 4;
252b5132 4036
9577f60b 4037 if (htab->plt.has_plt0)
252b5132 4038 {
9577f60b
L		 4039 /* Fill in the special first entry in the procedure linkage
4040 table. */
9577f60b
L		 4041 memcpy (htab->elf.splt->contents, htab->plt.plt0_entry,
4042 htab->lazy_plt->plt0_entry_size);
4043 memset (htab->elf.splt->contents + htab->lazy_plt->plt0_entry_size,
851b6fa1 4044 htab->plt0_pad_byte,
9577f60b
L		 4045 htab->plt.plt_entry_size - htab->lazy_plt->plt0_entry_size);
4046 if (!bfd_link_pic (info))
252b5132 4047 {
9577f60b
L		 4048 bfd_put_32 (output_bfd,
4049 (htab->elf.sgotplt->output_section->vma
4050 + htab->elf.sgotplt->output_offset
4051 + 4),
4052 htab->elf.splt->contents
4053 + htab->lazy_plt->plt0_got1_offset);
4054 bfd_put_32 (output_bfd,
4055 (htab->elf.sgotplt->output_section->vma
4056 + htab->elf.sgotplt->output_offset
4057 + 8),
4058 htab->elf.splt->contents
4059 + htab->lazy_plt->plt0_got2_offset);
1f78f649 4060
851b6fa1 4061 if (htab->target_os == is_vxworks)
eac338cf 4062 {
9577f60b
L		 4063 Elf_Internal_Rela rel;
4064 int num_plts = (htab->elf.splt->size
4065 / htab->plt.plt_entry_size) - 1;
4066 unsigned char *p;
4067 asection *srelplt2 = htab->srelplt2;
4068
4069 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_
4070 + 4. On IA32 we use REL relocations so the
4071 addend goes in the PLT directly. */
4072 rel.r_offset = (htab->elf.splt->output_section->vma
4073 + htab->elf.splt->output_offset
4074 + htab->lazy_plt->plt0_got1_offset);
4075 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
4076 R_386_32);
4077 bfd_elf32_swap_reloc_out (output_bfd, &rel,
4078 srelplt2->contents);
4079 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_
4080 + 8. */
4081 rel.r_offset = (htab->elf.splt->output_section->vma
4082 + htab->elf.splt->output_offset
4083 + htab->lazy_plt->plt0_got2_offset);
4084 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
4085 R_386_32);
4086 bfd_elf32_swap_reloc_out (output_bfd, &rel,
4087 srelplt2->contents +
4088 sizeof (Elf32_External_Rel));
4089 /* Correct the .rel.plt.unloaded relocations. */
4090 p = srelplt2->contents;
4091 if (bfd_link_pic (info))
4092 p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel);
4093 else
4094 p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel);
eac338cf 4095
9577f60b 4096 for (; num_plts; num_plts--)
1f78f649 4097 {
9577f60b 4098 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
f604c2a2 4099 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
1f78f649 4100 R_386_32);
9577f60b
L		 4101 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4102 p += sizeof (Elf32_External_Rel);
f604c2a2 4103
9577f60b
L		 4104 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
4105 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx,
4106 R_386_32);
4107 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4108 p += sizeof (Elf32_External_Rel);
1f78f649 4109 }
eac338cf
PB		 4110 }
4111 }
252b5132 4112 }
fff53dae
L		 4113 }
4114
aec6b87e
L		 4115 /* Fill PLT entries for undefined weak symbols in PIE. */
4116 if (bfd_link_pie (info))
4117 bfd_hash_traverse (&info->hash->table,
4118 elf_i386_pie_finish_undefweak_symbol,
4119 info);
4120
b34976b6 4121 return TRUE;
252b5132
RH		 4122}
4123
233cc9c1
L		 4124/* Fill PLT/GOT entries and allocate dynamic relocations for local
4125 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4126 It has to be done before elf_link_sort_relocs is called so that
4127 dynamic relocations are properly sorted. */
4128
4129static bfd_boolean
4130elf_i386_output_arch_local_syms
4131 (bfd *output_bfd ATTRIBUTE_UNUSED,
4132 struct bfd_link_info *info,
4133 void *flaginfo ATTRIBUTE_UNUSED,
4134 int (*func) (void *, const char *,
4135 Elf_Internal_Sym *,
4136 asection *,
4137 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4138{
0afcef53
L		 4139 struct elf_x86_link_hash_table *htab
4140 = elf_x86_hash_table (info, I386_ELF_DATA);
233cc9c1
L		 4141 if (htab == NULL)
4142 return FALSE;
4143
4144 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4145 htab_traverse (htab->loc_hash_table,
4146 elf_i386_finish_local_dynamic_symbol,
4147 info);
4148
4149 return TRUE;
4150}
4151
f604c2a2 4152/* Forward declaration. */
765e526c 4153static const struct elf_x86_lazy_plt_layout elf_i386_nacl_plt;
f604c2a2
L		 4154
4155/* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
4156 dynamic relocations. */
4157
4158static long
4159elf_i386_get_synthetic_symtab (bfd *abfd,
4160 long symcount ATTRIBUTE_UNUSED,
4161 asymbol **syms ATTRIBUTE_UNUSED,
4162 long dynsymcount,
4163 asymbol **dynsyms,
4164 asymbol **ret)
4165{
f493882d 4166 long count, i, n;
f604c2a2 4167 int j;
f604c2a2 4168 bfd_byte *plt_contents;
f493882d 4169 long relsize;
765e526c
L		 4170 const struct elf_x86_lazy_plt_layout *lazy_plt;
4171 const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4172 const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4173 const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
f604c2a2
L		 4174 asection *plt;
4175 bfd_vma got_addr;
f493882d
L		 4176 enum elf_x86_plt_type plt_type;
4177 struct elf_x86_plt plts[] =
3972882e 4178 {
f493882d
L		 4179 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4180 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
4181 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4182 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
f604c2a2 4183 };
144bed8d 4184
f604c2a2 4185 *ret = NULL;
144bed8d 4186
f604c2a2
L		 4187 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4188 return 0;
3972882e 4189
f604c2a2
L		 4190 if (dynsymcount <= 0)
4191 return 0;
cca5b8b6 4192
f604c2a2
L		 4193 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4194 if (relsize <= 0)
4195 return -1;
cca5b8b6 4196
f604c2a2
L		 4197 non_lazy_plt = NULL;
4198 /* Silence GCC 6. */
4199 lazy_plt = NULL;
ee2fdd6f
L		 4200 non_lazy_ibt_plt = NULL;
4201 lazy_ibt_plt = NULL;
851b6fa1 4202 switch (get_elf_x86_backend_data (abfd)->target_os)
144bed8d 4203 {
f604c2a2 4204 case is_normal:
3b4c3844 4205 case is_solaris:
f604c2a2 4206 non_lazy_plt = &elf_i386_non_lazy_plt;
ee2fdd6f
L		 4207 lazy_ibt_plt = &elf_i386_lazy_ibt_plt;
4208 non_lazy_ibt_plt = &elf_i386_non_lazy_ibt_plt;
f604c2a2
L		 4209 /* Fall through */
4210 case is_vxworks:
4211 lazy_plt = &elf_i386_lazy_plt;
4212 break;
4213 case is_nacl:
4214 lazy_plt = &elf_i386_nacl_plt;
4215 break;
4216 }
4217
4218 got_addr = 0;
3972882e 4219
f604c2a2
L		 4220 count = 0;
4221 for (j = 0; plts[j].name != NULL; j++)
4222 {
4223 plt = bfd_get_section_by_name (abfd, plts[j].name);
90efb642 4224 if (plt == NULL || plt->size == 0)
6f25f223 4225 continue;
533d0af0 4226
f604c2a2
L		 4227 /* Get the PLT section contents. */
4228 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4229 if (plt_contents == NULL)
4230 break;
4231 if (!bfd_get_section_contents (abfd, (asection *) plt,
4232 plt_contents, 0, plt->size))
4233 {
4234 free (plt_contents);
4235 break;
4236 }
4237
4238 /* Check what kind of PLT it is. */
4239 plt_type = plt_unknown;
90efb642
L		 4240 if (plts[j].type == plt_unknown
4241 && (plt->size >= (lazy_plt->plt0_entry_size
4242 + lazy_plt->plt_entry_size)))
f604c2a2
L		 4243 {
4244 /* Match lazy PLT first. */
4245 if (memcmp (plt_contents, lazy_plt->plt0_entry,
4246 lazy_plt->plt0_got1_offset) == 0)
ee2fdd6f
L		 4247 {
4248 /* The fist entry in the lazy IBT PLT is the same as the
4249 normal lazy PLT. */
4250 if (lazy_ibt_plt != NULL
90efb642 4251 && (memcmp (plt_contents + lazy_ibt_plt->plt0_entry_size,
ee2fdd6f
L		 4252 lazy_ibt_plt->plt_entry,
4253 lazy_ibt_plt->plt_got_offset) == 0))
4254 plt_type = plt_lazy | plt_second;
4255 else
4256 plt_type = plt_lazy;
4257 }
f604c2a2
L		 4258 else if (memcmp (plt_contents, lazy_plt->pic_plt0_entry,
4259 lazy_plt->plt0_got1_offset) == 0)
ee2fdd6f
L		 4260 {
4261 /* The fist entry in the PIC lazy IBT PLT is the same as
4262 the normal PIC lazy PLT. */
4263 if (lazy_ibt_plt != NULL
90efb642 4264 && (memcmp (plt_contents + lazy_ibt_plt->plt0_entry_size,
ee2fdd6f
L		 4265 lazy_ibt_plt->pic_plt_entry,
4266 lazy_ibt_plt->plt_got_offset) == 0))
4267 plt_type = plt_lazy | plt_pic | plt_second;
4268 else
4269 plt_type = plt_lazy | plt_pic;
4270 }
f604c2a2
L		 4271 }
4272
4273 if (non_lazy_plt != NULL
90efb642
L		 4274 && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4275 && plt->size >= non_lazy_plt->plt_entry_size)
f604c2a2
L		 4276 {
4277 /* Match non-lazy PLT. */
4278 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4279 non_lazy_plt->plt_got_offset) == 0)
4280 plt_type = plt_non_lazy;
4281 else if (memcmp (plt_contents, non_lazy_plt->pic_plt_entry,
4282 non_lazy_plt->plt_got_offset) == 0)
4283 plt_type = plt_pic;
4284 }
4285
ee2fdd6f 4286 if ((non_lazy_ibt_plt != NULL)
90efb642
L		 4287 && (plt_type == plt_unknown || plt_type == plt_second)
4288 && plt->size >= non_lazy_ibt_plt->plt_entry_size)
ee2fdd6f
L		 4289 {
4290 if (memcmp (plt_contents,
4291 non_lazy_ibt_plt->plt_entry,
4292 non_lazy_ibt_plt->plt_got_offset) == 0)
4293 {
4294 /* Match IBT PLT. */
4295 plt_type = plt_second;
4296 non_lazy_plt = non_lazy_ibt_plt;
4297 }
4298 else if (memcmp (plt_contents,
4299 non_lazy_ibt_plt->pic_plt_entry,
4300 non_lazy_ibt_plt->plt_got_offset) == 0)
4301 {
4302 /* Match PIC IBT PLT. */
4303 plt_type = plt_second | plt_pic;
4304 non_lazy_plt = non_lazy_ibt_plt;
4305 }
4306 }
4307
f604c2a2 4308 if (plt_type == plt_unknown)
37c0b6ee
L		 4309 {
4310 free (plt_contents);
4311 continue;
4312 }
3972882e 4313
f604c2a2
L		 4314 plts[j].sec = plt;
4315 plts[j].type = plt_type;
ec1f73bb 4316
f604c2a2
L		 4317 if ((plt_type & plt_lazy))
4318 {
4319 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4320 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4321 /* Skip PLT0 in lazy PLT. */
4322 i = 1;
4323 }
4324 else
4325 {
4326 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4327 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4328 i = 0;
4329 }
fca6ae69 4330
ee2fdd6f
L		 4331 /* Skip lazy PLT when the second PLT is used. */
4332 if ((plt_type & (plt_lazy | plt_second))
4333 == (plt_lazy | plt_second))
4334 plts[j].count = 0;
4335 else
4336 {
4337 n = plt->size / plts[j].plt_entry_size;
4338 plts[j].count = n;
4339 count += n - i;
4340 }
f604c2a2
L		 4341
4342 plts[j].contents = plt_contents;
4343
4344 /* The _GLOBAL_OFFSET_TABLE_ address is needed. */
4345 if ((plt_type & plt_pic))
4346 got_addr = (bfd_vma) -1;
144bed8d
L		 4347 }
4348
f493882d
L		 4349 return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4350 got_addr, plts, dynsyms,
4351 ret);
4c45e5c9
JJ		 4352}
4353
f604c2a2
L		 4354/* Set up i386 GNU properties. Return the first relocatable ELF input
4355 with GNU properties if found. Otherwise, return NULL. */
4356
4357static bfd *
4358elf_i386_link_setup_gnu_properties (struct bfd_link_info *info)
4359{
1de031c8 4360 struct elf_x86_init_table init_table;
f604c2a2 4361
851b6fa1 4362 switch (get_elf_x86_backend_data (info->output_bfd)->target_os)
f604c2a2
L		 4363 {
4364 case is_normal:
3b4c3844 4365 case is_solaris:
851b6fa1 4366 init_table.plt0_pad_byte = 0x0;
1de031c8
L		 4367 init_table.lazy_plt = &elf_i386_lazy_plt;
4368 init_table.non_lazy_plt = &elf_i386_non_lazy_plt;
4369 init_table.lazy_ibt_plt = &elf_i386_lazy_ibt_plt;
4370 init_table.non_lazy_ibt_plt = &elf_i386_non_lazy_ibt_plt;
f604c2a2
L		 4371 break;
4372 case is_vxworks:
851b6fa1 4373 init_table.plt0_pad_byte = 0x90;
1de031c8
L		 4374 init_table.lazy_plt = &elf_i386_lazy_plt;
4375 init_table.non_lazy_plt = NULL;
4376 init_table.lazy_ibt_plt = NULL;
4377 init_table.non_lazy_ibt_plt = NULL;
f604c2a2
L		 4378 break;
4379 case is_nacl:
851b6fa1 4380 init_table.plt0_pad_byte = 0x90;
1de031c8
L		 4381 init_table.lazy_plt = &elf_i386_nacl_plt;
4382 init_table.non_lazy_plt = NULL;
4383 init_table.lazy_ibt_plt = NULL;
4384 init_table.non_lazy_ibt_plt = NULL;
f604c2a2
L		 4385 break;
4386 }
4387
1de031c8
L		 4388 init_table.r_info = elf32_r_info;
4389 init_table.r_sym = elf32_r_sym;
7a382c1c 4390
1de031c8 4391 return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
f604c2a2
L		 4392}
4393
6d00b590 4394#define TARGET_LITTLE_SYM i386_elf32_vec
252b5132
RH		 4395#define TARGET_LITTLE_NAME "elf32-i386"
4396#define ELF_ARCH bfd_arch_i386
ae95ffa6 4397#define ELF_TARGET_ID I386_ELF_DATA
252b5132
RH		 4398#define ELF_MACHINE_CODE EM_386
4399#define ELF_MAXPAGESIZE 0x1000
252b5132
RH		 4400
4401#define elf_backend_can_gc_sections 1
51b64d56 4402#define elf_backend_can_refcount 1
252b5132
RH		 4403#define elf_backend_want_got_plt 1
4404#define elf_backend_plt_readonly 1
4405#define elf_backend_want_plt_sym 0
4406#define elf_backend_got_header_size 12
e41b3a13 4407#define elf_backend_plt_alignment 4
64f52338 4408#define elf_backend_dtrel_excludes_plt 1
f7483970 4409#define elf_backend_extern_protected_data 1
bedfd056 4410#define elf_backend_caches_rawsize 1
5474d94f 4411#define elf_backend_want_dynrelro 1
252b5132 4412
8c29f035
AM		 4413/* Support RELA for objdump of prelink objects. */
4414#define elf_info_to_howto elf_i386_info_to_howto_rel
dd5724d5
AM		 4415#define elf_info_to_howto_rel elf_i386_info_to_howto_rel
4416
dd5724d5 4417#define bfd_elf32_bfd_is_local_label_name elf_i386_is_local_label_name
dd5724d5 4418#define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup
13285a1b 4419#define bfd_elf32_bfd_reloc_name_lookup elf_i386_reloc_name_lookup
3972882e 4420#define bfd_elf32_get_synthetic_symtab elf_i386_get_synthetic_symtab
dd5724d5 4421
13285a1b 4422#define elf_backend_relocs_compatible _bfd_elf_relocs_compatible
dd5724d5 4423#define elf_backend_check_relocs elf_i386_check_relocs
f604c2a2 4424#define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
0ac8d2ca 4425#define elf_backend_fake_sections elf_i386_fake_sections
dd5724d5
AM		 4426#define elf_backend_finish_dynamic_sections elf_i386_finish_dynamic_sections
4427#define elf_backend_finish_dynamic_symbol elf_i386_finish_dynamic_symbol
233cc9c1 4428#define elf_backend_output_arch_local_syms elf_i386_output_arch_local_syms
c5fccbec
DJ		 4429#define elf_backend_grok_prstatus elf_i386_grok_prstatus
4430#define elf_backend_grok_psinfo elf_i386_grok_psinfo
db6751f2 4431#define elf_backend_reloc_type_class elf_i386_reloc_type_class
0ac8d2ca 4432#define elf_backend_relocate_section elf_i386_relocate_section
f604c2a2 4433#define elf_backend_setup_gnu_properties elf_i386_link_setup_gnu_properties
9f857535 4434#define elf_backend_hide_symbol _bfd_x86_elf_hide_symbol
dd5724d5 4435
a2f63b2e
MR		 4436#define elf_backend_linux_prpsinfo32_ugid16 TRUE
4437
252b5132 4438#include "elf32-target.h"
2bc3c89a
AM		 4439
4440/* FreeBSD support. */
4441
4442#undef TARGET_LITTLE_SYM
6d00b590 4443#define TARGET_LITTLE_SYM i386_elf32_fbsd_vec
2bc3c89a
AM		 4444#undef TARGET_LITTLE_NAME
4445#define TARGET_LITTLE_NAME "elf32-i386-freebsd"
d1036acb
L		 4446#undef ELF_OSABI
4447#define ELF_OSABI ELFOSABI_FREEBSD
2bc3c89a
AM		 4448
4449/* The kernel recognizes executables as valid only if they carry a
4450 "FreeBSD" label in the ELF header. So we put this label on all
4451 executables and (for simplicity) also all other object files. */
4452
2bc3c89a 4453static void
d8045f23 4454elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info)
2bc3c89a 4455{
78245035 4456 _bfd_elf_post_process_headers (abfd, info);
2bc3c89a 4457
2bc3c89a 4458#ifdef OLD_FREEBSD_ABI_LABEL
cf7363b4
L		 4459 {
4460 /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard. */
4461 Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
4462 memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8);
4463 }
caf47ea6 4464#endif
2bc3c89a
AM		 4465}
4466
4467#undef elf_backend_post_process_headers
d8045f23 4468#define elf_backend_post_process_headers elf_i386_fbsd_post_process_headers
571fe01f
NC		 4469#undef elf32_bed
4470#define elf32_bed elf32_i386_fbsd_bed
2bc3c89a 4471
d8045f23
NC		 4472#undef elf_backend_add_symbol_hook
4473
2bc3c89a 4474#include "elf32-target.h"
eac338cf 4475
a6cc6b3b
RO		 4476/* Solaris 2. */
4477
4478#undef TARGET_LITTLE_SYM
6d00b590 4479#define TARGET_LITTLE_SYM i386_elf32_sol2_vec
a6cc6b3b
RO		 4480#undef TARGET_LITTLE_NAME
4481#define TARGET_LITTLE_NAME "elf32-i386-sol2"
4482
3b4c3844
L		 4483static const struct elf_x86_backend_data elf_i386_solaris_arch_bed =
4484 {
4485 is_solaris /* os */
4486 };
4487
4488#undef elf_backend_arch_data
4489#define elf_backend_arch_data &elf_i386_solaris_arch_bed
4490
914082d1
L		 4491#undef elf_backend_post_process_headers
4492
a6cc6b3b
RO		 4493/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
4494 objects won't be recognized. */
4495#undef ELF_OSABI
4496
4497#undef elf32_bed
4498#define elf32_bed elf32_i386_sol2_bed
4499
7dc98aea
RO		 4500/* The 32-bit static TLS arena size is rounded to the nearest 8-byte
4501 boundary. */
84865015 4502#undef elf_backend_static_tls_alignment
7dc98aea
RO		 4503#define elf_backend_static_tls_alignment 8
4504
a6cc6b3b
RO		 4505/* The Solaris 2 ABI requires a plt symbol on all platforms.
4506
4507 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
4508 File, p.63. */
84865015 4509#undef elf_backend_want_plt_sym
a6cc6b3b
RO		 4510#define elf_backend_want_plt_sym 1
4511
84865015
NC		 4512#undef elf_backend_strtab_flags
4513#define elf_backend_strtab_flags SHF_STRINGS
4514
5522f910 4515/* Called to set the sh_flags, sh_link and sh_info fields of OSECTION which
07d6d2b8 4516 has a type >= SHT_LOOS. Returns TRUE if these fields were initialised
5522f910
NC		 4517 FALSE otherwise. ISECTION is the best guess matching section from the
4518 input bfd IBFD, but it might be NULL. */
4519
84865015 4520static bfd_boolean
5522f910
NC		 4521elf32_i386_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
4522 bfd *obfd ATTRIBUTE_UNUSED,
4523 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
4524 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
84865015
NC		 4525{
4526 /* PR 19938: FIXME: Need to add code for setting the sh_info
5522f910
NC		 4527 and sh_link fields of Solaris specific section types. */
4528 return FALSE;
84865015 4529
5522f910 4530 /* Based upon Oracle Solaris 11.3 Linkers and Libraries Guide, Ch. 13,
84865015
NC		 4531 Object File Format, Table 13-9 ELF sh_link and sh_info Interpretation:
4532
4533http://docs.oracle.com/cd/E53394_01/html/E54813/chapter6-94076.html#scrolltoc
4534
4535 The following values should be set:
07d6d2b8
AM		 4536
4537Type Link Info
84865015
NC		 4538-----------------------------------------------------------------------------
4539SHT_SUNW_ancillary The section header index of 0
07d6d2b8
AM		 4540 [0x6fffffee] the associated string table.
4541
84865015 4542SHT_SUNW_capinfo The section header index of For a dynamic object, the
07d6d2b8
AM		 4543 [0x6ffffff0] the associated symbol table. section header index of
4544 the associated
84865015
NC		 4545 SHT_SUNW_capchain table,
4546 otherwise 0.
4547
4548SHT_SUNW_symsort The section header index of 0
07d6d2b8 4549 [0x6ffffff1] the associated symbol table.
84865015
NC		 4550
4551SHT_SUNW_tlssort The section header index of 0
07d6d2b8
AM		 4552 [0x6ffffff2] the associated symbol table.
4553
4554SHT_SUNW_LDYNSYM The section header index of One greater than the
4555 [0x6ffffff3] the associated string table. symbol table index of the
4556 This index is the same string last local symbol,
84865015 4557 table used by the SHT_DYNSYM STB_LOCAL. Since
07d6d2b8
AM		 4558 section. SHT_SUNW_LDYNSYM only
4559 contains local symbols,
84865015
NC		 4560 sh_info is equivalent to
4561 the number of symbols in
4562 the table.
4563
07d6d2b8
AM		 4564SHT_SUNW_cap If symbol capabilities exist, If any capabilities refer
4565 [0x6ffffff5] the section header index of to named strings, the
4566 the associated section header index of
4567 SHT_SUNW_capinfo table, the associated string
4568 otherwise 0. table, otherwise 0.
84865015 4569
07d6d2b8
AM		 4570SHT_SUNW_move The section header index of 0
4571 [0x6ffffffa] the associated symbol table.
4572
4573SHT_SUNW_COMDAT 0 0
84865015
NC		 4574 [0x6ffffffb]
4575
4576SHT_SUNW_syminfo The section header index of The section header index
07d6d2b8
AM		 4577 [0x6ffffffc] the associated symbol table. of the associated
4578 .dynamic section.
84865015 4579
07d6d2b8
AM		 4580SHT_SUNW_verdef The section header index of The number of version
4581 [0x6ffffffd] the associated string table. definitions within the
4582 section.
84865015
NC		 4583
4584SHT_SUNW_verneed The section header index of The number of version
07d6d2b8
AM		 4585 [0x6ffffffe] the associated string table. dependencies within the
4586 section.
84865015 4587
07d6d2b8
AM		 4588SHT_SUNW_versym The section header index of 0
4589 [0x6fffffff] the associated symbol table. */
84865015
NC		 4590}
4591
5522f910
NC		 4592#undef elf_backend_copy_special_section_fields
4593#define elf_backend_copy_special_section_fields elf32_i386_copy_solaris_special_section_fields
84865015 4594
a6cc6b3b
RO		 4595#include "elf32-target.h"
4596
bf64a951
L		 4597/* Intel MCU support. */
4598
4599static bfd_boolean
4600elf32_iamcu_elf_object_p (bfd *abfd)
4601{
4602 /* Set the right machine number for an IAMCU elf32 file. */
4603 bfd_default_set_arch_mach (abfd, bfd_arch_iamcu, bfd_mach_i386_iamcu);
4604 return TRUE;
4605}
4606
4607#undef TARGET_LITTLE_SYM
4608#define TARGET_LITTLE_SYM iamcu_elf32_vec
4609#undef TARGET_LITTLE_NAME
4610#define TARGET_LITTLE_NAME "elf32-iamcu"
84865015 4611#undef ELF_ARCH
bf64a951
L		 4612#define ELF_ARCH bfd_arch_iamcu
4613
4614#undef ELF_MACHINE_CODE
4615#define ELF_MACHINE_CODE EM_IAMCU
4616
3b4c3844
L		 4617#undef elf_backend_arch_data
4618#define elf_backend_arch_data &elf_i386_arch_bed
4619
bf64a951
L		 4620#undef ELF_OSABI
4621
4622#undef elf32_bed
4623#define elf32_bed elf32_iamcu_bed
4624
4625#undef elf_backend_object_p
4626#define elf_backend_object_p elf32_iamcu_elf_object_p
4627
4628#undef elf_backend_static_tls_alignment
4629
4630#undef elf_backend_want_plt_sym
07d6d2b8 4631#define elf_backend_want_plt_sym 0
bf64a951 4632
84865015 4633#undef elf_backend_strtab_flags
5522f910 4634#undef elf_backend_copy_special_section_fields
84865015 4635
bf64a951
L		 4636#include "elf32-target.h"
4637
4638/* Restore defaults. */
4639#undef ELF_ARCH
4640#define ELF_ARCH bfd_arch_i386
4641#undef ELF_MACHINE_CODE
4642#define ELF_MACHINE_CODE EM_386
4643
a27e4371
RM		 4644/* Native Client support. */
4645
4646#undef TARGET_LITTLE_SYM
6d00b590 4647#define TARGET_LITTLE_SYM i386_elf32_nacl_vec
a27e4371
RM		 4648#undef TARGET_LITTLE_NAME
4649#define TARGET_LITTLE_NAME "elf32-i386-nacl"
4650#undef elf32_bed
4651#define elf32_bed elf32_i386_nacl_bed
4652
4653#undef ELF_MAXPAGESIZE
4654#define ELF_MAXPAGESIZE 0x10000
4655
4656/* Restore defaults. */
4657#undef ELF_OSABI
4658#undef elf_backend_want_plt_sym
4659#define elf_backend_want_plt_sym 0
4660#undef elf_backend_post_process_headers
a27e4371
RM		 4661#undef elf_backend_static_tls_alignment
4662
4663/* NaCl uses substantially different PLT entries for the same effects. */
4664
4665#undef elf_backend_plt_alignment
4666#define elf_backend_plt_alignment 5
4667#define NACL_PLT_ENTRY_SIZE 64
4668#define NACLMASK 0xe0 /* 32-byte alignment mask. */
4669
4670static const bfd_byte elf_i386_nacl_plt0_entry[] =
4671 {
4672 0xff, 0x35, /* pushl contents of address */
07d6d2b8
AM		 4673 0, 0, 0, 0, /* replaced with address of .got + 4. */
4674 0x8b, 0x0d, /* movl contents of address, %ecx */
4675 0, 0, 0, 0, /* replaced with address of .got + 8. */
a27e4371
RM		 4676 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */
4677 0xff, 0xe1 /* jmp *%ecx */
4678 };
4679
4680static const bfd_byte elf_i386_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
4681 {
4682 0x8b, 0x0d, /* movl contents of address, %ecx */
4683 0, 0, 0, 0, /* replaced with GOT slot address. */
4684 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */
4685 0xff, 0xe1, /* jmp *%ecx */
4686
07d6d2b8 4687 /* Pad to the next 32-byte boundary with nop instructions. */
a27e4371
RM		 4688 0x90,
4689 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4690 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4691
4692 /* Lazy GOT entries point here (32-byte aligned). */
4693 0x68, /* pushl immediate */
4694 0, 0, 0, 0, /* replaced with reloc offset. */
4695 0xe9, /* jmp relative */
07d6d2b8 4696 0, 0, 0, 0, /* replaced with offset to .plt. */
a27e4371 4697
07d6d2b8 4698 /* Pad to the next 32-byte boundary with nop instructions. */
a27e4371
RM		 4699 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4700 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4701 0x90, 0x90
4702 };
4703
4704static const bfd_byte
4705elf_i386_nacl_pic_plt0_entry[sizeof (elf_i386_nacl_plt0_entry)] =
4706 {
4707 0xff, 0x73, 0x04, /* pushl 4(%ebx) */
4708 0x8b, 0x4b, 0x08, /* mov 0x8(%ebx), %ecx */
4709 0x83, 0xe1, 0xe0, /* and $NACLMASK, %ecx */
4710 0xff, 0xe1, /* jmp *%ecx */
caa0075c
RM		 4711
4712 /* This is expected to be the same size as elf_i386_nacl_plt0_entry,
4713 so pad to that size with nop instructions. */
4714 0x90, 0x90, 0x90, 0x90, 0x90, 0x90
a27e4371
RM		 4715 };
4716
4717static const bfd_byte elf_i386_nacl_pic_plt_entry[NACL_PLT_ENTRY_SIZE] =
4718 {
07d6d2b8
AM		 4719 0x8b, 0x8b, /* movl offset(%ebx), %ecx */
4720 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
4721 0x83, 0xe1, 0xe0, /* andl $NACLMASK, %ecx */
4722 0xff, 0xe1, /* jmp *%ecx */
a27e4371 4723
07d6d2b8 4724 /* Pad to the next 32-byte boundary with nop instructions. */
a27e4371
RM		 4725 0x90,
4726 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4727 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4728
4729 /* Lazy GOT entries point here (32-byte aligned). */
07d6d2b8
AM		 4730 0x68, /* pushl immediate */
4731 0, 0, 0, 0, /* replaced with offset into relocation table. */
4732 0xe9, /* jmp relative */
4733 0, 0, 0, 0, /* replaced with offset to start of .plt. */
a27e4371 4734
07d6d2b8 4735 /* Pad to the next 32-byte boundary with nop instructions. */
a27e4371
RM		 4736 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4737 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90,
4738 0x90, 0x90
4739 };
4740
4741static const bfd_byte elf_i386_nacl_eh_frame_plt[] =
4742 {
07d6d2b8
AM		 4743#if (PLT_CIE_LENGTH != 20 \
4744 || PLT_FDE_LENGTH != 36 \
4745 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
a27e4371 4746 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
851b6fa1 4747# error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
a27e4371
RM		 4748#endif
4749 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
07d6d2b8
AM		 4750 0, 0, 0, 0, /* CIE ID */
4751 1, /* CIE version */
4752 'z', 'R', 0, /* Augmentation string */
4753 1, /* Code alignment factor */
4754 0x7c, /* Data alignment factor: -4 */
4755 8, /* Return address column */
a27e4371
RM		 4756 1, /* Augmentation size */
4757 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
4758 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */
4759 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */
4760 DW_CFA_nop, DW_CFA_nop,
4761
07d6d2b8 4762 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
a27e4371 4763 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
07d6d2b8
AM		 4764 0, 0, 0, 0, /* R_386_PC32 .plt goes here */
4765 0, 0, 0, 0, /* .plt size goes here */
4766 0, /* Augmentation size */
4767 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */
4768 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
4769 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */
4770 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
4771 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
4772 13, /* Block length */
4773 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */
4774 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */
a27e4371
RM		 4775 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
4776 DW_OP_lit2, DW_OP_shl, DW_OP_plus,
4777 DW_CFA_nop, DW_CFA_nop
4778 };
4779
765e526c 4780static const struct elf_x86_lazy_plt_layout elf_i386_nacl_plt =
a27e4371
RM		 4781 {
4782 elf_i386_nacl_plt0_entry, /* plt0_entry */
4783 sizeof (elf_i386_nacl_plt0_entry), /* plt0_entry_size */
a27e4371
RM		 4784 elf_i386_nacl_plt_entry, /* plt_entry */
4785 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
765e526c
L		 4786 2, /* plt0_got1_offset */
4787 8, /* plt0_got2_offset */
4788 0, /* plt0_got2_insn_end */
a27e4371
RM		 4789 2, /* plt_got_offset */
4790 33, /* plt_reloc_offset */
4791 38, /* plt_plt_offset */
765e526c
L		 4792 0, /* plt_got_insn_size */
4793 0, /* plt_plt_insn_end */
a27e4371
RM		 4794 32, /* plt_lazy_offset */
4795 elf_i386_nacl_pic_plt0_entry, /* pic_plt0_entry */
4796 elf_i386_nacl_pic_plt_entry, /* pic_plt_entry */
4797 elf_i386_nacl_eh_frame_plt, /* eh_frame_plt */
f604c2a2 4798 sizeof (elf_i386_nacl_eh_frame_plt) /* eh_frame_plt_size */
a27e4371
RM		 4799 };
4800
851b6fa1 4801static const struct elf_x86_backend_data elf_i386_nacl_arch_bed =
a27e4371 4802 {
07d6d2b8 4803 is_nacl /* os */
a27e4371
RM		 4804 };
4805
64b384e1
RM		 4806static bfd_boolean
4807elf32_i386_nacl_elf_object_p (bfd *abfd)
4808{
4809 /* Set the right machine number for a NaCl i386 ELF32 file. */
4810 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386_nacl);
4811 return TRUE;
4812}
4813
a27e4371
RM		 4814#undef elf_backend_arch_data
4815#define elf_backend_arch_data &elf_i386_nacl_arch_bed
4816
64b384e1
RM		 4817#undef elf_backend_object_p
4818#define elf_backend_object_p elf32_i386_nacl_elf_object_p
5a68afcf
RM		 4819#undef elf_backend_modify_segment_map
4820#define elf_backend_modify_segment_map nacl_modify_segment_map
4821#undef elf_backend_modify_program_headers
4822#define elf_backend_modify_program_headers nacl_modify_program_headers
887badb3
RM		 4823#undef elf_backend_final_write_processing
4824#define elf_backend_final_write_processing nacl_final_write_processing
5a68afcf 4825
a27e4371
RM		 4826#include "elf32-target.h"
4827
5a68afcf 4828/* Restore defaults. */
64b384e1 4829#undef elf_backend_object_p
5a68afcf
RM		 4830#undef elf_backend_modify_segment_map
4831#undef elf_backend_modify_program_headers
887badb3 4832#undef elf_backend_final_write_processing
5a68afcf 4833
eac338cf
PB		 4834/* VxWorks support. */
4835
4836#undef TARGET_LITTLE_SYM
6d00b590 4837#define TARGET_LITTLE_SYM i386_elf32_vxworks_vec
eac338cf
PB		 4838#undef TARGET_LITTLE_NAME
4839#define TARGET_LITTLE_NAME "elf32-i386-vxworks"
d1036acb 4840#undef ELF_OSABI
1587442d
L		 4841#undef ELF_MAXPAGESIZE
4842#define ELF_MAXPAGESIZE 0x1000
a27e4371
RM		 4843#undef elf_backend_plt_alignment
4844#define elf_backend_plt_alignment 4
eac338cf 4845
851b6fa1 4846static const struct elf_x86_backend_data elf_i386_vxworks_arch_bed =
23209a78 4847 {
07d6d2b8 4848 is_vxworks /* os */
23209a78 4849 };
eac338cf 4850
23209a78
RM		 4851#undef elf_backend_arch_data
4852#define elf_backend_arch_data &elf_i386_vxworks_arch_bed
eac338cf 4853
13285a1b 4854#undef elf_backend_relocs_compatible
eac338cf
PB		 4855#undef elf_backend_add_symbol_hook
4856#define elf_backend_add_symbol_hook \
4857 elf_vxworks_add_symbol_hook
4858#undef elf_backend_link_output_symbol_hook
4859#define elf_backend_link_output_symbol_hook \
9c72ff84 4860 elf_vxworks_link_output_symbol_hook
eac338cf
PB		 4861#undef elf_backend_emit_relocs
4862#define elf_backend_emit_relocs elf_vxworks_emit_relocs
4863#undef elf_backend_final_write_processing
4864#define elf_backend_final_write_processing \
4865 elf_vxworks_final_write_processing
7dc98aea 4866#undef elf_backend_static_tls_alignment
eac338cf
PB		 4867
4868/* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
4869 define it. */
4870#undef elf_backend_want_plt_sym
4871#define elf_backend_want_plt_sym 1
4872
4873#undef elf32_bed
4874#define elf32_bed elf32_i386_vxworks_bed
4875
4876#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 1.800611 seconds and 4 git commands to generate.