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