]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf64-x86-64.c
ppc: Fix warning messages when IBM and IEEE long double are mixed
[thirdparty/binutils-gdb.git] / bfd / elf64-x86-64.c
CommitLineData
351f65ca 1/* X86-64 specific support for ELF
219d1afa 2 Copyright (C) 2000-2018 Free Software Foundation, Inc.
8d88c4ca
NC
3 Contributed by Jan Hubicka <jh@suse.cz>.
4
ae9a127f 5 This file is part of BFD, the Binary File Descriptor library.
8d88c4ca 6
ae9a127f
NC
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
cd123cb7 9 the Free Software Foundation; either version 3 of the License, or
ae9a127f 10 (at your option) any later version.
8d88c4ca 11
ae9a127f
NC
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
8d88c4ca 16
ae9a127f
NC
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
cd123cb7
NC
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
8d88c4ca 21
0afcef53 22#include "elfxx-x86.h"
5a68afcf 23#include "elf-nacl.h"
e41b3a13 24#include "dwarf2.h"
d7921315 25#include "libiberty.h"
8d88c4ca 26
56ceb5b5 27#include "opcode/i386.h"
8d88c4ca
NC
28#include "elf/x86-64.h"
29
8fd79e71
L
30#ifdef CORE_HEADER
31#include <stdarg.h>
32#include CORE_HEADER
33#endif
34
8d88c4ca
NC
35/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
36#define MINUS_ONE (~ (bfd_vma) 0)
37
351f65ca
L
38/* Since both 32-bit and 64-bit x86-64 encode relocation type in the
39 identical manner, we use ELF32_R_TYPE instead of ELF64_R_TYPE to get
40 relocation type. We also use ELF_ST_TYPE instead of ELF64_ST_TYPE
41 since they are the same. */
42
8d88c4ca 43/* The relocation "howto" table. Order of fields:
7b81dfbb
AJ
44 type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
45 special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset. */
70256ad8
AJ
46static reloc_howto_type x86_64_elf_howto_table[] =
47{
6346d5ca 48 HOWTO(R_X86_64_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
b34976b6
AM
49 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
50 FALSE),
51 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
52 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
53 FALSE),
54 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
55 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
56 TRUE),
57 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
58 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
59 FALSE),
60 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
61 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
62 TRUE),
63 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
64 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
65 FALSE),
66 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
67 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
68 MINUS_ONE, FALSE),
69 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
70 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
71 MINUS_ONE, FALSE),
72 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
73 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
74 MINUS_ONE, FALSE),
75 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
76 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
77 0xffffffff, TRUE),
78 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
79 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
80 FALSE),
81 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
82 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
83 FALSE),
84 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
85 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
b0360d8c 86 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
b34976b6 87 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
ac2aa337 88 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
b34976b6
AM
89 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
90 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
91 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
92 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
93 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
94 MINUS_ONE, FALSE),
95 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
96 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
97 MINUS_ONE, FALSE),
98 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
99 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
100 MINUS_ONE, FALSE),
101 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
102 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
103 0xffffffff, TRUE),
104 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
105 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
106 0xffffffff, TRUE),
ac2aa337 107 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
b34976b6
AM
108 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
109 0xffffffff, FALSE),
110 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
111 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
112 0xffffffff, TRUE),
113 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
114 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
115 0xffffffff, FALSE),
d6ab8113
JB
116 HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
117 bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
118 TRUE),
119 HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
120 bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
121 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
122 HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
123 bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
124 FALSE, 0xffffffff, 0xffffffff, TRUE),
7b81dfbb
AJ
125 HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
126 bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
127 FALSE),
128 HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
129 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
130 MINUS_ONE, TRUE),
131 HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
132 bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
133 FALSE, MINUS_ONE, MINUS_ONE, TRUE),
134 HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
135 bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
136 MINUS_ONE, FALSE),
137 HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
138 bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
139 MINUS_ONE, FALSE),
1788fc08
L
140 HOWTO(R_X86_64_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
141 bfd_elf_generic_reloc, "R_X86_64_SIZE32", FALSE, 0xffffffff, 0xffffffff,
142 FALSE),
143 HOWTO(R_X86_64_SIZE64, 0, 4, 64, FALSE, 0, complain_overflow_unsigned,
144 bfd_elf_generic_reloc, "R_X86_64_SIZE64", FALSE, MINUS_ONE, MINUS_ONE,
145 FALSE),
67a4f2b7
AO
146 HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
147 complain_overflow_bitfield, bfd_elf_generic_reloc,
148 "R_X86_64_GOTPC32_TLSDESC",
149 FALSE, 0xffffffff, 0xffffffff, TRUE),
150 HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
151 complain_overflow_dont, bfd_elf_generic_reloc,
152 "R_X86_64_TLSDESC_CALL",
153 FALSE, 0, 0, FALSE),
154 HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
155 complain_overflow_bitfield, bfd_elf_generic_reloc,
156 "R_X86_64_TLSDESC",
157 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
cbe950e9
L
158 HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
159 bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
160 MINUS_ONE, FALSE),
64d25c44
L
161 HOWTO(R_X86_64_RELATIVE64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
162 bfd_elf_generic_reloc, "R_X86_64_RELATIVE64", FALSE, MINUS_ONE,
163 MINUS_ONE, FALSE),
c3320543
L
164 HOWTO(R_X86_64_PC32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
165 bfd_elf_generic_reloc, "R_X86_64_PC32_BND", FALSE, 0xffffffff, 0xffffffff,
166 TRUE),
167 HOWTO(R_X86_64_PLT32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
168 bfd_elf_generic_reloc, "R_X86_64_PLT32_BND", FALSE, 0xffffffff, 0xffffffff,
169 TRUE),
56ceb5b5
L
170 HOWTO(R_X86_64_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
171 bfd_elf_generic_reloc, "R_X86_64_GOTPCRELX", FALSE, 0xffffffff,
172 0xffffffff, TRUE),
173 HOWTO(R_X86_64_REX_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
174 bfd_elf_generic_reloc, "R_X86_64_REX_GOTPCRELX", FALSE, 0xffffffff,
175 0xffffffff, TRUE),
fe4770f4 176
a33d77bc
JB
177 /* We have a gap in the reloc numbers here.
178 R_X86_64_standard counts the number up to this point, and
179 R_X86_64_vt_offset is the value to subtract from a reloc type of
180 R_X86_64_GNU_VT* to form an index into this table. */
56ceb5b5 181#define R_X86_64_standard (R_X86_64_REX_GOTPCRELX + 1)
a33d77bc
JB
182#define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
183
fe4770f4 184/* GNU extension to record C++ vtable hierarchy. */
b34976b6
AM
185 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
186 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
fe4770f4
AJ
187
188/* GNU extension to record C++ vtable member usage. */
b34976b6
AM
189 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
190 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
d7921315
L
191 FALSE),
192
193/* Use complain_overflow_bitfield on R_X86_64_32 for x32. */
194 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
195 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
196 FALSE)
8d88c4ca
NC
197};
198
78984959
L
199/* Set if a relocation is converted from a GOTPCREL relocation. */
200#define R_X86_64_converted_reloc_bit (1 << 7)
201
daf1c414 202#define X86_PCREL_TYPE_P(TYPE) \
d8045f23
NC
203 ( ((TYPE) == R_X86_64_PC8) \
204 || ((TYPE) == R_X86_64_PC16) \
205 || ((TYPE) == R_X86_64_PC32) \
c3320543 206 || ((TYPE) == R_X86_64_PC32_BND) \
d8045f23
NC
207 || ((TYPE) == R_X86_64_PC64))
208
aebcc8ff
L
209#define X86_SIZE_TYPE_P(TYPE) \
210 ((TYPE) == R_X86_64_SIZE32 || (TYPE) == R_X86_64_SIZE64)
211
8d88c4ca 212/* Map BFD relocs to the x86_64 elf relocs. */
70256ad8
AJ
213struct elf_reloc_map
214{
8d88c4ca
NC
215 bfd_reloc_code_real_type bfd_reloc_val;
216 unsigned char elf_reloc_val;
217};
218
dc810e39 219static const struct elf_reloc_map x86_64_reloc_map[] =
8d88c4ca 220{
70256ad8
AJ
221 { BFD_RELOC_NONE, R_X86_64_NONE, },
222 { BFD_RELOC_64, R_X86_64_64, },
223 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
224 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
225 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
226 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
227 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
228 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
229 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
230 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
231 { BFD_RELOC_32, R_X86_64_32, },
232 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
233 { BFD_RELOC_16, R_X86_64_16, },
234 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
235 { BFD_RELOC_8, R_X86_64_8, },
236 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
bffbf940
JJ
237 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
238 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
239 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
240 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
241 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
242 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
243 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
244 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
d6ab8113
JB
245 { BFD_RELOC_64_PCREL, R_X86_64_PC64, },
246 { BFD_RELOC_X86_64_GOTOFF64, R_X86_64_GOTOFF64, },
247 { BFD_RELOC_X86_64_GOTPC32, R_X86_64_GOTPC32, },
7b81dfbb
AJ
248 { BFD_RELOC_X86_64_GOT64, R_X86_64_GOT64, },
249 { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
250 { BFD_RELOC_X86_64_GOTPC64, R_X86_64_GOTPC64, },
251 { BFD_RELOC_X86_64_GOTPLT64, R_X86_64_GOTPLT64, },
252 { BFD_RELOC_X86_64_PLTOFF64, R_X86_64_PLTOFF64, },
1788fc08
L
253 { BFD_RELOC_SIZE32, R_X86_64_SIZE32, },
254 { BFD_RELOC_SIZE64, R_X86_64_SIZE64, },
67a4f2b7
AO
255 { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
256 { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
257 { BFD_RELOC_X86_64_TLSDESC, R_X86_64_TLSDESC, },
cbe950e9 258 { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
56ceb5b5
L
259 { BFD_RELOC_X86_64_PC32_BND, R_X86_64_PC32_BND, },
260 { BFD_RELOC_X86_64_PLT32_BND, R_X86_64_PLT32_BND, },
261 { BFD_RELOC_X86_64_GOTPCRELX, R_X86_64_GOTPCRELX, },
262 { BFD_RELOC_X86_64_REX_GOTPCRELX, R_X86_64_REX_GOTPCRELX, },
fe4770f4
AJ
263 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
264 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
8d88c4ca
NC
265};
266
67a4f2b7 267static reloc_howto_type *
351f65ca 268elf_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
67a4f2b7
AO
269{
270 unsigned i;
271
d7921315
L
272 if (r_type == (unsigned int) R_X86_64_32)
273 {
274 if (ABI_64_P (abfd))
275 i = r_type;
276 else
277 i = ARRAY_SIZE (x86_64_elf_howto_table) - 1;
278 }
279 else if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
280 || r_type >= (unsigned int) R_X86_64_max)
67a4f2b7
AO
281 {
282 if (r_type >= (unsigned int) R_X86_64_standard)
283 {
695344c0 284 /* xgettext:c-format */
0aa13fee
AM
285 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
286 abfd, r_type);
f3185997
NC
287 bfd_set_error (bfd_error_bad_value);
288 return NULL;
67a4f2b7
AO
289 }
290 i = r_type;
291 }
292 else
293 i = r_type - (unsigned int) R_X86_64_vt_offset;
294 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
295 return &x86_64_elf_howto_table[i];
296}
8d88c4ca
NC
297
298/* Given a BFD reloc type, return a HOWTO structure. */
299static reloc_howto_type *
351f65ca
L
300elf_x86_64_reloc_type_lookup (bfd *abfd,
301 bfd_reloc_code_real_type code)
8d88c4ca
NC
302{
303 unsigned int i;
27482721 304
8d88c4ca
NC
305 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
306 i++)
307 {
308 if (x86_64_reloc_map[i].bfd_reloc_val == code)
351f65ca
L
309 return elf_x86_64_rtype_to_howto (abfd,
310 x86_64_reloc_map[i].elf_reloc_val);
8d88c4ca 311 }
5860e3f8 312 return NULL;
8d88c4ca
NC
313}
314
157090f7 315static reloc_howto_type *
d7921315 316elf_x86_64_reloc_name_lookup (bfd *abfd,
351f65ca 317 const char *r_name)
157090f7
AM
318{
319 unsigned int i;
320
d7921315
L
321 if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
322 {
323 /* Get x32 R_X86_64_32. */
324 reloc_howto_type *reloc
325 = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
326 BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
327 return reloc;
328 }
329
330 for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
157090f7
AM
331 if (x86_64_elf_howto_table[i].name != NULL
332 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
333 return &x86_64_elf_howto_table[i];
334
335 return NULL;
336}
337
8d88c4ca 338/* Given an x86_64 ELF reloc type, fill in an arelent structure. */
8da6118f 339
f3185997
NC
340static bfd_boolean
341elf_x86_64_info_to_howto (bfd *abfd, arelent *cache_ptr,
351f65ca 342 Elf_Internal_Rela *dst)
8d88c4ca 343{
67a4f2b7 344 unsigned r_type;
8d88c4ca 345
351f65ca
L
346 r_type = ELF32_R_TYPE (dst->r_info);
347 cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
f3185997
NC
348 if (cache_ptr->howto == NULL)
349 return FALSE;
262c0a87 350 BFD_ASSERT (r_type == cache_ptr->howto->type || cache_ptr->howto->type == R_X86_64_NONE);
f3185997 351 return TRUE;
8d88c4ca 352}
70256ad8 353\f
3bab7989 354/* Support for core dump NOTE sections. */
b34976b6 355static bfd_boolean
351f65ca 356elf_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML
357{
358 int offset;
eea6121a 359 size_t size;
3bab7989
ML
360
361 switch (note->descsz)
362 {
363 default:
b34976b6 364 return FALSE;
3bab7989 365
bcd823f1
L
366 case 296: /* sizeof(istruct elf_prstatus) on Linux/x32 */
367 /* pr_cursig */
228e534f 368 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
bcd823f1
L
369
370 /* pr_pid */
228e534f 371 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
bcd823f1
L
372
373 /* pr_reg */
374 offset = 72;
375 size = 216;
376
377 break;
378
3bab7989
ML
379 case 336: /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
380 /* pr_cursig */
228e534f 381 elf_tdata (abfd)->core->signal
3bab7989
ML
382 = bfd_get_16 (abfd, note->descdata + 12);
383
384 /* pr_pid */
228e534f 385 elf_tdata (abfd)->core->lwpid
3bab7989
ML
386 = bfd_get_32 (abfd, note->descdata + 32);
387
388 /* pr_reg */
389 offset = 112;
eea6121a 390 size = 216;
3bab7989
ML
391
392 break;
393 }
394
395 /* Make a ".reg/999" section. */
396 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
eea6121a 397 size, note->descpos + offset);
3bab7989
ML
398}
399
b34976b6 400static bfd_boolean
351f65ca 401elf_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML
402{
403 switch (note->descsz)
404 {
405 default:
b34976b6 406 return FALSE;
3bab7989 407
bcd823f1 408 case 124: /* sizeof(struct elf_prpsinfo) on Linux/x32 */
228e534f 409 elf_tdata (abfd)->core->pid
bcd823f1 410 = bfd_get_32 (abfd, note->descdata + 12);
228e534f 411 elf_tdata (abfd)->core->program
bcd823f1 412 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
228e534f 413 elf_tdata (abfd)->core->command
bcd823f1
L
414 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
415 break;
416
3bab7989 417 case 136: /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
228e534f 418 elf_tdata (abfd)->core->pid
261b8d08 419 = bfd_get_32 (abfd, note->descdata + 24);
228e534f 420 elf_tdata (abfd)->core->program
3bab7989 421 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
228e534f 422 elf_tdata (abfd)->core->command
3bab7989
ML
423 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
424 }
425
426 /* Note that for some reason, a spurious space is tacked
427 onto the end of the args in some (at least one anyway)
428 implementations, so strip it off if it exists. */
429
430 {
228e534f 431 char *command = elf_tdata (abfd)->core->command;
3bab7989
ML
432 int n = strlen (command);
433
434 if (0 < n && command[n - 1] == ' ')
435 command[n - 1] = '\0';
436 }
437
b34976b6 438 return TRUE;
3bab7989 439}
8fd79e71
L
440
441#ifdef CORE_HEADER
442static char *
443elf_x86_64_write_core_note (bfd *abfd, char *buf, int *bufsiz,
444 int note_type, ...)
445{
446 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
8fd79e71
L
447 va_list ap;
448 const char *fname, *psargs;
449 long pid;
450 int cursig;
451 const void *gregs;
452
453 switch (note_type)
454 {
455 default:
456 return NULL;
457
458 case NT_PRPSINFO:
459 va_start (ap, note_type);
460 fname = va_arg (ap, const char *);
461 psargs = va_arg (ap, const char *);
462 va_end (ap);
463
464 if (bed->s->elfclass == ELFCLASS32)
465 {
466 prpsinfo32_t data;
467 memset (&data, 0, sizeof (data));
468 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
469 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
e85c6a70
JK
470 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
471 &data, sizeof (data));
8fd79e71
L
472 }
473 else
474 {
b1bd052d 475 prpsinfo64_t data;
8fd79e71
L
476 memset (&data, 0, sizeof (data));
477 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
478 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
e85c6a70
JK
479 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
480 &data, sizeof (data));
8fd79e71 481 }
e85c6a70 482 /* NOTREACHED */
8fd79e71
L
483
484 case NT_PRSTATUS:
485 va_start (ap, note_type);
486 pid = va_arg (ap, long);
487 cursig = va_arg (ap, int);
488 gregs = va_arg (ap, const void *);
489 va_end (ap);
490
491 if (bed->s->elfclass == ELFCLASS32)
492 {
493 if (bed->elf_machine_code == EM_X86_64)
494 {
495 prstatusx32_t prstat;
496 memset (&prstat, 0, sizeof (prstat));
497 prstat.pr_pid = pid;
498 prstat.pr_cursig = cursig;
499 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK
500 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
501 &prstat, sizeof (prstat));
8fd79e71
L
502 }
503 else
504 {
505 prstatus32_t prstat;
506 memset (&prstat, 0, sizeof (prstat));
507 prstat.pr_pid = pid;
508 prstat.pr_cursig = cursig;
509 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK
510 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
511 &prstat, sizeof (prstat));
8fd79e71
L
512 }
513 }
514 else
515 {
b1bd052d 516 prstatus64_t prstat;
8fd79e71
L
517 memset (&prstat, 0, sizeof (prstat));
518 prstat.pr_pid = pid;
519 prstat.pr_cursig = cursig;
520 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK
521 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
522 &prstat, sizeof (prstat));
8fd79e71 523 }
8fd79e71 524 }
e85c6a70 525 /* NOTREACHED */
8fd79e71
L
526}
527#endif
3bab7989 528\f
407443a3 529/* Functions for the x86-64 ELF linker. */
70256ad8 530
70256ad8
AJ
531/* The size in bytes of an entry in the global offset table. */
532
533#define GOT_ENTRY_SIZE 8
8d88c4ca 534
38b12349 535/* The size in bytes of an entry in the lazy procedure linkage table. */
8d88c4ca 536
38b12349 537#define LAZY_PLT_ENTRY_SIZE 16
70256ad8 538
38b12349
L
539/* The size in bytes of an entry in the non-lazy procedure linkage
540 table. */
70256ad8 541
38b12349
L
542#define NON_LAZY_PLT_ENTRY_SIZE 8
543
544/* The first entry in a lazy procedure linkage table looks like this.
545 See the SVR4 ABI i386 supplement and the x86-64 ABI to see how this
546 works. */
547
548static const bfd_byte elf_x86_64_lazy_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
70256ad8 549{
653165cc
AJ
550 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
551 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
10efb593 552 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
70256ad8
AJ
553};
554
38b12349 555/* Subsequent entries in a lazy procedure linkage table look like this. */
70256ad8 556
38b12349 557static const bfd_byte elf_x86_64_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
70256ad8 558{
653165cc 559 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
407443a3 560 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653165cc 561 0x68, /* pushq immediate */
70256ad8
AJ
562 0, 0, 0, 0, /* replaced with index into relocation table. */
563 0xe9, /* jmp relative */
564 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
565};
566
38b12349 567/* The first entry in a lazy procedure linkage table with BND prefix
0ff2b86e
L
568 like this. */
569
38b12349 570static const bfd_byte elf_x86_64_lazy_bnd_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
0ff2b86e 571{
07d6d2b8 572 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
0ff2b86e 573 0xf2, 0xff, 0x25, 16, 0, 0, 0, /* bnd jmpq *GOT+16(%rip) */
07d6d2b8 574 0x0f, 0x1f, 0 /* nopl (%rax) */
0ff2b86e
L
575};
576
38b12349
L
577/* Subsequent entries for branches with BND prefx in a lazy procedure
578 linkage table look like this. */
0ff2b86e 579
38b12349 580static const bfd_byte elf_x86_64_lazy_bnd_plt_entry[LAZY_PLT_ENTRY_SIZE] =
0ff2b86e 581{
07d6d2b8
AM
582 0x68, 0, 0, 0, 0, /* pushq immediate */
583 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
584 0x0f, 0x1f, 0x44, 0, 0 /* nopl 0(%rax,%rax,1) */
0ff2b86e
L
585};
586
ee2fdd6f
L
587/* The first entry in the IBT-enabled lazy procedure linkage table is the
588 the same as the lazy PLT with BND prefix so that bound registers are
589 preserved when control is passed to dynamic linker. Subsequent
590 entries for a IBT-enabled lazy procedure linkage table look like
591 this. */
592
593static const bfd_byte elf_x86_64_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
594{
07d6d2b8
AM
595 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
596 0x68, 0, 0, 0, 0, /* pushq immediate */
597 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
598 0x90 /* nop */
ee2fdd6f
L
599};
600
601/* The first entry in the x32 IBT-enabled lazy procedure linkage table
de194d85 602 is the same as the normal lazy PLT. Subsequent entries for an
ee2fdd6f
L
603 x32 IBT-enabled lazy procedure linkage table look like this. */
604
605static const bfd_byte elf_x32_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
606{
07d6d2b8
AM
607 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
608 0x68, 0, 0, 0, 0, /* pushq immediate */
609 0xe9, 0, 0, 0, 0, /* jmpq relative */
610 0x66, 0x90 /* xchg %ax,%ax */
ee2fdd6f
L
611};
612
38b12349 613/* Entries in the non-lazey procedure linkage table look like this. */
0ff2b86e 614
38b12349 615static const bfd_byte elf_x86_64_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
0ff2b86e 616{
07d6d2b8
AM
617 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
618 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
619 0x66, 0x90 /* xchg %ax,%ax */
0ff2b86e
L
620};
621
38b12349
L
622/* Entries for branches with BND prefix in the non-lazey procedure
623 linkage table look like this. */
0ff2b86e 624
38b12349 625static const bfd_byte elf_x86_64_non_lazy_bnd_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
0ff2b86e 626{
07d6d2b8
AM
627 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
628 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
629 0x90 /* nop */
0ff2b86e
L
630};
631
ee2fdd6f
L
632/* Entries for branches with IBT-enabled in the non-lazey procedure
633 linkage table look like this. They have the same size as the lazy
634 PLT entry. */
635
636static const bfd_byte elf_x86_64_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
637{
07d6d2b8
AM
638 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
639 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
ee2fdd6f 640 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
07d6d2b8 641 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopl 0x0(%rax,%rax,1) */
ee2fdd6f
L
642};
643
644/* Entries for branches with IBT-enabled in the x32 non-lazey procedure
645 linkage table look like this. They have the same size as the lazy
646 PLT entry. */
647
648static const bfd_byte elf_x32_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
649{
07d6d2b8
AM
650 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
651 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
ee2fdd6f
L
652 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653 0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
654};
655
38b12349 656/* .eh_frame covering the lazy .plt section. */
e41b3a13 657
38b12349 658static const bfd_byte elf_x86_64_eh_frame_lazy_plt[] =
e41b3a13 659{
e41b3a13
JJ
660 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
661 0, 0, 0, 0, /* CIE ID */
662 1, /* CIE version */
663 'z', 'R', 0, /* Augmentation string */
664 1, /* Code alignment factor */
665 0x78, /* Data alignment factor */
666 16, /* Return address column */
667 1, /* Augmentation size */
668 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
669 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
670 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
671 DW_CFA_nop, DW_CFA_nop,
672
673 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
674 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
675 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
676 0, 0, 0, 0, /* .plt size goes here */
677 0, /* Augmentation size */
678 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
679 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
680 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
681 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
682 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
683 11, /* Block length */
684 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
685 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
686 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
687 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
688 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
689};
690
38b12349 691/* .eh_frame covering the lazy BND .plt section. */
9e659176 692
38b12349 693static const bfd_byte elf_x86_64_eh_frame_lazy_bnd_plt[] =
9e659176
L
694{
695 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
696 0, 0, 0, 0, /* CIE ID */
697 1, /* CIE version */
698 'z', 'R', 0, /* Augmentation string */
699 1, /* Code alignment factor */
700 0x78, /* Data alignment factor */
701 16, /* Return address column */
702 1, /* Augmentation size */
703 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
704 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
705 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
706 DW_CFA_nop, DW_CFA_nop,
707
708 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
709 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
710 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
711 0, 0, 0, 0, /* .plt size goes here */
712 0, /* Augmentation size */
713 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
714 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
715 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
716 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
717 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
718 11, /* Block length */
719 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
720 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
721 DW_OP_lit15, DW_OP_and, DW_OP_lit5, DW_OP_ge,
722 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
723 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
724};
725
ee2fdd6f
L
726/* .eh_frame covering the lazy .plt section with IBT-enabled. */
727
728static const bfd_byte elf_x86_64_eh_frame_lazy_ibt_plt[] =
729{
730 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
731 0, 0, 0, 0, /* CIE ID */
732 1, /* CIE version */
733 'z', 'R', 0, /* Augmentation string */
734 1, /* Code alignment factor */
735 0x78, /* Data alignment factor */
736 16, /* Return address column */
737 1, /* Augmentation size */
738 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
739 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
740 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
741 DW_CFA_nop, DW_CFA_nop,
742
743 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
744 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
745 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
746 0, 0, 0, 0, /* .plt size goes here */
747 0, /* Augmentation size */
748 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
749 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
750 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
751 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
752 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
753 11, /* Block length */
754 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
755 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
756 DW_OP_lit15, DW_OP_and, DW_OP_lit10, DW_OP_ge,
757 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
758 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
759};
760
761/* .eh_frame covering the x32 lazy .plt section with IBT-enabled. */
762
763static const bfd_byte elf_x32_eh_frame_lazy_ibt_plt[] =
764{
765 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
766 0, 0, 0, 0, /* CIE ID */
767 1, /* CIE version */
768 'z', 'R', 0, /* Augmentation string */
769 1, /* Code alignment factor */
770 0x78, /* Data alignment factor */
771 16, /* Return address column */
772 1, /* Augmentation size */
773 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
774 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
775 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
776 DW_CFA_nop, DW_CFA_nop,
777
778 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
779 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
780 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
781 0, 0, 0, 0, /* .plt size goes here */
782 0, /* Augmentation size */
783 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
784 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
785 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
786 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
787 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
788 11, /* Block length */
789 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
790 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
791 DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
792 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
793 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
794};
795
38b12349 796/* .eh_frame covering the non-lazy .plt section. */
fff53dae 797
38b12349 798static const bfd_byte elf_x86_64_eh_frame_non_lazy_plt[] =
fff53dae
L
799{
800#define PLT_GOT_FDE_LENGTH 20
801 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
802 0, 0, 0, 0, /* CIE ID */
803 1, /* CIE version */
804 'z', 'R', 0, /* Augmentation string */
805 1, /* Code alignment factor */
806 0x78, /* Data alignment factor */
807 16, /* Return address column */
808 1, /* Augmentation size */
809 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
810 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
811 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
812 DW_CFA_nop, DW_CFA_nop,
813
814 PLT_GOT_FDE_LENGTH, 0, 0, 0, /* FDE length */
815 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
38b12349
L
816 0, 0, 0, 0, /* the start of non-lazy .plt goes here */
817 0, 0, 0, 0, /* non-lazy .plt size goes here */
fff53dae
L
818 0, /* Augmentation size */
819 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop,
820 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
821};
822
eed180f8 823/* These are the standard parameters. */
765e526c 824static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_plt =
eed180f8 825 {
07d6d2b8
AM
826 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
827 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
828 elf_x86_64_lazy_plt_entry, /* plt_entry */
829 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
830 2, /* plt0_got1_offset */
831 8, /* plt0_got2_offset */
832 12, /* plt0_got2_insn_end */
833 2, /* plt_got_offset */
834 7, /* plt_reloc_offset */
835 12, /* plt_plt_offset */
836 6, /* plt_got_insn_size */
837 LAZY_PLT_ENTRY_SIZE, /* plt_plt_insn_end */
838 6, /* plt_lazy_offset */
839 elf_x86_64_lazy_plt0_entry, /* pic_plt0_entry */
840 elf_x86_64_lazy_plt_entry, /* pic_plt_entry */
841 elf_x86_64_eh_frame_lazy_plt, /* eh_frame_plt */
38b12349
L
842 sizeof (elf_x86_64_eh_frame_lazy_plt) /* eh_frame_plt_size */
843 };
844
765e526c 845static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_plt =
38b12349 846 {
07d6d2b8
AM
847 elf_x86_64_non_lazy_plt_entry, /* plt_entry */
848 elf_x86_64_non_lazy_plt_entry, /* pic_plt_entry */
849 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
850 2, /* plt_got_offset */
851 6, /* plt_got_insn_size */
852 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
38b12349 853 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
eed180f8
RM
854 };
855
765e526c 856static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_bnd_plt =
0ff2b86e 857 {
07d6d2b8
AM
858 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
859 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
860 elf_x86_64_lazy_bnd_plt_entry, /* plt_entry */
861 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
862 2, /* plt0_got1_offset */
863 1+8, /* plt0_got2_offset */
864 1+12, /* plt0_got2_insn_end */
865 1+2, /* plt_got_offset */
866 1, /* plt_reloc_offset */
867 7, /* plt_plt_offset */
868 1+6, /* plt_got_insn_size */
869 11, /* plt_plt_insn_end */
870 0, /* plt_lazy_offset */
871 elf_x86_64_lazy_bnd_plt0_entry, /* pic_plt0_entry */
872 elf_x86_64_lazy_bnd_plt_entry, /* pic_plt_entry */
873 elf_x86_64_eh_frame_lazy_bnd_plt, /* eh_frame_plt */
38b12349
L
874 sizeof (elf_x86_64_eh_frame_lazy_bnd_plt) /* eh_frame_plt_size */
875 };
876
765e526c 877static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_bnd_plt =
38b12349 878 {
07d6d2b8
AM
879 elf_x86_64_non_lazy_bnd_plt_entry, /* plt_entry */
880 elf_x86_64_non_lazy_bnd_plt_entry, /* pic_plt_entry */
881 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
882 1+2, /* plt_got_offset */
883 1+6, /* plt_got_insn_size */
884 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
38b12349
L
885 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
886 };
887
765e526c 888static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_ibt_plt =
ee2fdd6f 889 {
07d6d2b8
AM
890 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
891 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
892 elf_x86_64_lazy_ibt_plt_entry, /* plt_entry */
893 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
894 2, /* plt0_got1_offset */
895 1+8, /* plt0_got2_offset */
896 1+12, /* plt0_got2_insn_end */
897 4+1+2, /* plt_got_offset */
898 4+1, /* plt_reloc_offset */
899 4+1+6, /* plt_plt_offset */
900 4+1+6, /* plt_got_insn_size */
901 4+1+5+5, /* plt_plt_insn_end */
902 0, /* plt_lazy_offset */
903 elf_x86_64_lazy_bnd_plt0_entry, /* pic_plt0_entry */
904 elf_x86_64_lazy_ibt_plt_entry, /* pic_plt_entry */
905 elf_x86_64_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
ee2fdd6f
L
906 sizeof (elf_x86_64_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
907 };
908
765e526c 909static const struct elf_x86_lazy_plt_layout elf_x32_lazy_ibt_plt =
ee2fdd6f 910 {
07d6d2b8
AM
911 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
912 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
913 elf_x32_lazy_ibt_plt_entry, /* plt_entry */
914 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
915 2, /* plt0_got1_offset */
916 8, /* plt0_got2_offset */
917 12, /* plt0_got2_insn_end */
918 4+2, /* plt_got_offset */
919 4+1, /* plt_reloc_offset */
920 4+6, /* plt_plt_offset */
921 4+6, /* plt_got_insn_size */
922 4+5+5, /* plt_plt_insn_end */
923 0, /* plt_lazy_offset */
924 elf_x86_64_lazy_plt0_entry, /* pic_plt0_entry */
925 elf_x32_lazy_ibt_plt_entry, /* pic_plt_entry */
926 elf_x32_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
ee2fdd6f
L
927 sizeof (elf_x32_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
928 };
929
765e526c 930static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_ibt_plt =
ee2fdd6f 931 {
07d6d2b8
AM
932 elf_x86_64_non_lazy_ibt_plt_entry, /* plt_entry */
933 elf_x86_64_non_lazy_ibt_plt_entry, /* pic_plt_entry */
934 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
935 4+1+2, /* plt_got_offset */
936 4+1+6, /* plt_got_insn_size */
937 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
ee2fdd6f
L
938 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
939 };
940
765e526c 941static const struct elf_x86_non_lazy_plt_layout elf_x32_non_lazy_ibt_plt =
ee2fdd6f 942 {
07d6d2b8
AM
943 elf_x32_non_lazy_ibt_plt_entry, /* plt_entry */
944 elf_x32_non_lazy_ibt_plt_entry, /* pic_plt_entry */
945 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
946 4+2, /* plt_got_offset */
947 4+6, /* plt_got_insn_size */
948 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
ee2fdd6f
L
949 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
950 };
951
851b6fa1 952static const struct elf_x86_backend_data elf_x86_64_arch_bed =
38b12349 953 {
07d6d2b8 954 is_normal /* os */
0ff2b86e
L
955 };
956
eed180f8
RM
957#define elf_backend_arch_data &elf_x86_64_arch_bed
958
b34976b6 959static bfd_boolean
27482721 960elf64_x86_64_elf_object_p (bfd *abfd)
bffbf940 961{
8d88c4ca
NC
962 /* Set the right machine number for an x86-64 elf64 file. */
963 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
b34976b6 964 return TRUE;
8d88c4ca
NC
965}
966
8059fb19
RM
967static bfd_boolean
968elf32_x86_64_elf_object_p (bfd *abfd)
969{
970 /* Set the right machine number for an x86-64 elf32 file. */
971 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32);
972 return TRUE;
973}
974
142411ca
L
975/* Return TRUE if the TLS access code sequence support transition
976 from R_TYPE. */
977
978static bfd_boolean
351f65ca
L
979elf_x86_64_check_tls_transition (bfd *abfd,
980 struct bfd_link_info *info,
981 asection *sec,
982 bfd_byte *contents,
983 Elf_Internal_Shdr *symtab_hdr,
984 struct elf_link_hash_entry **sym_hashes,
985 unsigned int r_type,
986 const Elf_Internal_Rela *rel,
987 const Elf_Internal_Rela *relend)
bffbf940 988{
142411ca
L
989 unsigned int val;
990 unsigned long r_symndx;
5c98a14e 991 bfd_boolean largepic = FALSE;
142411ca
L
992 struct elf_link_hash_entry *h;
993 bfd_vma offset;
0afcef53 994 struct elf_x86_link_hash_table *htab;
e2cbcd91 995 bfd_byte *call;
1d4af308 996 bfd_boolean indirect_call;
142411ca 997
0afcef53 998 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
142411ca 999 offset = rel->r_offset;
bffbf940 1000 switch (r_type)
142411ca
L
1001 {
1002 case R_X86_64_TLSGD:
1003 case R_X86_64_TLSLD:
1004 if ((rel + 1) >= relend)
1005 return FALSE;
1006
1007 if (r_type == R_X86_64_TLSGD)
1008 {
52bc799a 1009 /* Check transition from GD access model. For 64bit, only
142411ca 1010 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
e2cbcd91
L
1011 .word 0x6666; rex64; call __tls_get_addr@PLT
1012 or
1013 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1014 .byte 0x66; rex64
1015 call *__tls_get_addr@GOTPCREL(%rip)
1016 which may be converted to
1017 addr32 call __tls_get_addr
52bc799a
L
1018 can transit to different access model. For 32bit, only
1019 leaq foo@tlsgd(%rip), %rdi
e2cbcd91
L
1020 .word 0x6666; rex64; call __tls_get_addr@PLT
1021 or
1022 leaq foo@tlsgd(%rip), %rdi
1023 .byte 0x66; rex64
1024 call *__tls_get_addr@GOTPCREL(%rip)
1025 which may be converted to
1026 addr32 call __tls_get_addr
1027 can transit to different access model. For largepic,
5c98a14e 1028 we also support:
07d6d2b8
AM
1029 leaq foo@tlsgd(%rip), %rdi
1030 movabsq $__tls_get_addr@pltoff, %rax
1031 addq $r15, %rax
1032 call *%rax
e2cbcd91 1033 or
07d6d2b8
AM
1034 leaq foo@tlsgd(%rip), %rdi
1035 movabsq $__tls_get_addr@pltoff, %rax
1036 addq $rbx, %rax
1037 call *%rax */
142411ca 1038
fa289a5f
AM
1039 static const unsigned char leaq[] = { 0x66, 0x48, 0x8d, 0x3d };
1040
5c98a14e 1041 if ((offset + 12) > sec->size)
142411ca 1042 return FALSE;
52bc799a 1043
e2cbcd91
L
1044 call = contents + offset + 4;
1045 if (call[0] != 0x66
1046 || !((call[1] == 0x48
1047 && call[2] == 0xff
1048 && call[3] == 0x15)
1049 || (call[1] == 0x48
1050 && call[2] == 0x67
1051 && call[3] == 0xe8)
1052 || (call[1] == 0x66
1053 && call[2] == 0x48
1054 && call[3] == 0xe8)))
5c98a14e
JJ
1055 {
1056 if (!ABI_64_P (abfd)
1057 || (offset + 19) > sec->size
1058 || offset < 3
e2cbcd91
L
1059 || memcmp (call - 7, leaq + 1, 3) != 0
1060 || memcmp (call, "\x48\xb8", 2) != 0
1061 || call[11] != 0x01
1062 || call[13] != 0xff
1063 || call[14] != 0xd0
1064 || !((call[10] == 0x48 && call[12] == 0xd8)
1065 || (call[10] == 0x4c && call[12] == 0xf8)))
5c98a14e
JJ
1066 return FALSE;
1067 largepic = TRUE;
1068 }
1069 else if (ABI_64_P (abfd))
52bc799a 1070 {
52bc799a 1071 if (offset < 4
fa289a5f 1072 || memcmp (contents + offset - 4, leaq, 4) != 0)
52bc799a
L
1073 return FALSE;
1074 }
1075 else
1076 {
52bc799a 1077 if (offset < 3
fa289a5f 1078 || memcmp (contents + offset - 3, leaq + 1, 3) != 0)
52bc799a
L
1079 return FALSE;
1080 }
e2cbcd91 1081 indirect_call = call[2] == 0xff;
142411ca
L
1082 }
1083 else
1084 {
1085 /* Check transition from LD access model. Only
1086 leaq foo@tlsld(%rip), %rdi;
e2cbcd91 1087 call __tls_get_addr@PLT
07d6d2b8 1088 or
e2cbcd91
L
1089 leaq foo@tlsld(%rip), %rdi;
1090 call *__tls_get_addr@GOTPCREL(%rip)
1091 which may be converted to
1092 addr32 call __tls_get_addr
5c98a14e
JJ
1093 can transit to different access model. For largepic
1094 we also support:
07d6d2b8
AM
1095 leaq foo@tlsld(%rip), %rdi
1096 movabsq $__tls_get_addr@pltoff, %rax
1097 addq $r15, %rax
1098 call *%rax
e2cbcd91 1099 or
07d6d2b8
AM
1100 leaq foo@tlsld(%rip), %rdi
1101 movabsq $__tls_get_addr@pltoff, %rax
1102 addq $rbx, %rax
1103 call *%rax */
142411ca 1104
fa289a5f 1105 static const unsigned char lea[] = { 0x48, 0x8d, 0x3d };
142411ca
L
1106
1107 if (offset < 3 || (offset + 9) > sec->size)
1108 return FALSE;
1109
5c98a14e 1110 if (memcmp (contents + offset - 3, lea, 3) != 0)
142411ca 1111 return FALSE;
5c98a14e 1112
e2cbcd91
L
1113 call = contents + offset + 4;
1114 if (!(call[0] == 0xe8
1115 || (call[0] == 0xff && call[1] == 0x15)
1116 || (call[0] == 0x67 && call[1] == 0xe8)))
5c98a14e
JJ
1117 {
1118 if (!ABI_64_P (abfd)
1119 || (offset + 19) > sec->size
e2cbcd91
L
1120 || memcmp (call, "\x48\xb8", 2) != 0
1121 || call[11] != 0x01
1122 || call[13] != 0xff
1123 || call[14] != 0xd0
1124 || !((call[10] == 0x48 && call[12] == 0xd8)
1125 || (call[10] == 0x4c && call[12] == 0xf8)))
5c98a14e
JJ
1126 return FALSE;
1127 largepic = TRUE;
1128 }
e2cbcd91 1129 indirect_call = call[0] == 0xff;
142411ca
L
1130 }
1131
351f65ca 1132 r_symndx = htab->r_sym (rel[1].r_info);
142411ca
L
1133 if (r_symndx < symtab_hdr->sh_info)
1134 return FALSE;
1135
1136 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1d4af308 1137 if (h == NULL
0afcef53 1138 || !((struct elf_x86_link_hash_entry *) h)->tls_get_addr)
e2cbcd91 1139 return FALSE;
e2cbcd91 1140 else
78984959
L
1141 {
1142 r_type = (ELF32_R_TYPE (rel[1].r_info)
1143 & ~R_X86_64_converted_reloc_bit);
1144 if (largepic)
1145 return r_type == R_X86_64_PLTOFF64;
1146 else if (indirect_call)
1147 return r_type == R_X86_64_GOTPCRELX;
1148 else
1149 return (r_type == R_X86_64_PC32 || r_type == R_X86_64_PLT32);
1150 }
142411ca
L
1151
1152 case R_X86_64_GOTTPOFF:
1153 /* Check transition from IE access model:
4a4c5f25
L
1154 mov foo@gottpoff(%rip), %reg
1155 add foo@gottpoff(%rip), %reg
142411ca
L
1156 */
1157
4a4c5f25
L
1158 /* Check REX prefix first. */
1159 if (offset >= 3 && (offset + 4) <= sec->size)
1160 {
1161 val = bfd_get_8 (abfd, contents + offset - 3);
1162 if (val != 0x48 && val != 0x4c)
1163 {
1164 /* X32 may have 0x44 REX prefix or no REX prefix. */
1165 if (ABI_64_P (abfd))
1166 return FALSE;
1167 }
1168 }
1169 else
1170 {
1171 /* X32 may not have any REX prefix. */
1172 if (ABI_64_P (abfd))
1173 return FALSE;
1174 if (offset < 2 || (offset + 3) > sec->size)
1175 return FALSE;
1176 }
142411ca
L
1177
1178 val = bfd_get_8 (abfd, contents + offset - 2);
1179 if (val != 0x8b && val != 0x03)
1180 return FALSE;
1181
1182 val = bfd_get_8 (abfd, contents + offset - 1);
1183 return (val & 0xc7) == 5;
1184
1185 case R_X86_64_GOTPC32_TLSDESC:
1186 /* Check transition from GDesc access model:
1187 leaq x@tlsdesc(%rip), %rax
1188
1189 Make sure it's a leaq adding rip to a 32-bit offset
1190 into any register, although it's probably almost always
1191 going to be rax. */
1192
1193 if (offset < 3 || (offset + 4) > sec->size)
1194 return FALSE;
1195
1196 val = bfd_get_8 (abfd, contents + offset - 3);
1197 if ((val & 0xfb) != 0x48)
1198 return FALSE;
1199
1200 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1201 return FALSE;
1202
1203 val = bfd_get_8 (abfd, contents + offset - 1);
1204 return (val & 0xc7) == 0x05;
1205
1206 case R_X86_64_TLSDESC_CALL:
1207 /* Check transition from GDesc access model:
1208 call *x@tlsdesc(%rax)
1209 */
1210 if (offset + 2 <= sec->size)
1211 {
1212 /* Make sure that it's a call *x@tlsdesc(%rax). */
e2cbcd91
L
1213 call = contents + offset;
1214 return call[0] == 0xff && call[1] == 0x10;
142411ca
L
1215 }
1216
1217 return FALSE;
1218
1219 default:
1220 abort ();
1221 }
1222}
1223
1224/* Return TRUE if the TLS access transition is OK or no transition
1225 will be performed. Update R_TYPE if there is a transition. */
1226
1227static bfd_boolean
351f65ca
L
1228elf_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1229 asection *sec, bfd_byte *contents,
1230 Elf_Internal_Shdr *symtab_hdr,
1231 struct elf_link_hash_entry **sym_hashes,
1232 unsigned int *r_type, int tls_type,
1233 const Elf_Internal_Rela *rel,
1234 const Elf_Internal_Rela *relend,
1235 struct elf_link_hash_entry *h,
bedfd056
L
1236 unsigned long r_symndx,
1237 bfd_boolean from_relocate_section)
142411ca
L
1238{
1239 unsigned int from_type = *r_type;
1240 unsigned int to_type = from_type;
1241 bfd_boolean check = TRUE;
1242
bb1cb422
L
1243 /* Skip TLS transition for functions. */
1244 if (h != NULL
1245 && (h->type == STT_FUNC
1246 || h->type == STT_GNU_IFUNC))
1247 return TRUE;
1248
142411ca 1249 switch (from_type)
bffbf940
JJ
1250 {
1251 case R_X86_64_TLSGD:
67a4f2b7
AO
1252 case R_X86_64_GOTPC32_TLSDESC:
1253 case R_X86_64_TLSDESC_CALL:
bffbf940 1254 case R_X86_64_GOTTPOFF:
0e1862bb 1255 if (bfd_link_executable (info))
142411ca
L
1256 {
1257 if (h == NULL)
1258 to_type = R_X86_64_TPOFF32;
1259 else
1260 to_type = R_X86_64_GOTTPOFF;
1261 }
1262
bedfd056
L
1263 /* When we are called from elf_x86_64_relocate_section, there may
1264 be additional transitions based on TLS_TYPE. */
1265 if (from_relocate_section)
142411ca
L
1266 {
1267 unsigned int new_to_type = to_type;
1268
51537393 1269 if (TLS_TRANSITION_IE_TO_LE_P (info, h, tls_type))
142411ca
L
1270 new_to_type = R_X86_64_TPOFF32;
1271
1272 if (to_type == R_X86_64_TLSGD
1273 || to_type == R_X86_64_GOTPC32_TLSDESC
1274 || to_type == R_X86_64_TLSDESC_CALL)
1275 {
1276 if (tls_type == GOT_TLS_IE)
1277 new_to_type = R_X86_64_GOTTPOFF;
1278 }
1279
1280 /* We checked the transition before when we were called from
351f65ca 1281 elf_x86_64_check_relocs. We only want to check the new
142411ca
L
1282 transition which hasn't been checked before. */
1283 check = new_to_type != to_type && from_type == to_type;
1284 to_type = new_to_type;
1285 }
1286
1287 break;
1288
bffbf940 1289 case R_X86_64_TLSLD:
0e1862bb 1290 if (bfd_link_executable (info))
142411ca
L
1291 to_type = R_X86_64_TPOFF32;
1292 break;
1293
1294 default:
1295 return TRUE;
bffbf940
JJ
1296 }
1297
142411ca
L
1298 /* Return TRUE if there is no transition. */
1299 if (from_type == to_type)
1300 return TRUE;
1301
1302 /* Check if the transition can be performed. */
1303 if (check
351f65ca
L
1304 && ! elf_x86_64_check_tls_transition (abfd, info, sec, contents,
1305 symtab_hdr, sym_hashes,
1306 from_type, rel, relend))
142411ca 1307 {
2f629d23 1308 reloc_howto_type *from, *to;
4c544807 1309 const char *name;
142411ca 1310
351f65ca
L
1311 from = elf_x86_64_rtype_to_howto (abfd, from_type);
1312 to = elf_x86_64_rtype_to_howto (abfd, to_type);
142411ca 1313
f3185997
NC
1314 if (from == NULL || to == NULL)
1315 return FALSE;
1316
4c544807
L
1317 if (h)
1318 name = h->root.root.string;
1319 else
1320 {
0afcef53 1321 struct elf_x86_link_hash_table *htab;
4dfe6ac6 1322
0afcef53 1323 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
1324 if (htab == NULL)
1325 name = "*unknown*";
1326 else
1327 {
1328 Elf_Internal_Sym *isym;
1329
1330 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1331 abfd, r_symndx);
1332 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1333 }
4c544807
L
1334 }
1335
4eca0228 1336 _bfd_error_handler
695344c0 1337 /* xgettext:c-format */
2dcf00ce
AM
1338 (_("%pB: TLS transition from %s to %s against `%s' at %#" PRIx64
1339 " in section `%pA' failed"),
1340 abfd, from->name, to->name, name, (uint64_t) rel->r_offset, sec);
142411ca
L
1341 bfd_set_error (bfd_error_bad_value);
1342 return FALSE;
1343 }
1344
1345 *r_type = to_type;
1346 return TRUE;
bffbf940
JJ
1347}
1348
c1d11331
L
1349/* Rename some of the generic section flags to better document how they
1350 are used here. */
6999821f 1351#define check_relocs_failed sec_flg0
338c190a
L
1352
1353static bfd_boolean
aab921ad
L
1354elf_x86_64_need_pic (struct bfd_link_info *info,
1355 bfd *input_bfd, asection *sec,
338c190a
L
1356 struct elf_link_hash_entry *h,
1357 Elf_Internal_Shdr *symtab_hdr,
1358 Elf_Internal_Sym *isym,
1359 reloc_howto_type *howto)
1360{
1361 const char *v = "";
1362 const char *und = "";
1363 const char *pic = "";
aab921ad 1364 const char *object;
338c190a
L
1365
1366 const char *name;
1367 if (h)
1368 {
1369 name = h->root.root.string;
1370 switch (ELF_ST_VISIBILITY (h->other))
1371 {
1372 case STV_HIDDEN:
1373 v = _("hidden symbol ");
1374 break;
1375 case STV_INTERNAL:
1376 v = _("internal symbol ");
1377 break;
1378 case STV_PROTECTED:
1379 v = _("protected symbol ");
1380 break;
1381 default:
0afcef53 1382 if (((struct elf_x86_link_hash_entry *) h)->def_protected)
a5b4ee94
L
1383 v = _("protected symbol ");
1384 else
1385 v = _("symbol ");
338c190a
L
1386 pic = _("; recompile with -fPIC");
1387 break;
1388 }
1389
1390 if (!h->def_regular && !h->def_dynamic)
1391 und = _("undefined ");
1392 }
1393 else
1394 {
1395 name = bfd_elf_sym_name (input_bfd, symtab_hdr, isym, NULL);
1396 pic = _("; recompile with -fPIC");
1397 }
1398
aab921ad
L
1399 if (bfd_link_dll (info))
1400 object = _("a shared object");
1401 else if (bfd_link_pie (info))
1402 object = _("a PIE object");
1403 else
1404 object = _("a PDE object");
1405
695344c0 1406 /* xgettext:c-format */
871b3ab2 1407 _bfd_error_handler (_("%pB: relocation %s against %s%s`%s' can "
aab921ad
L
1408 "not be used when making %s%s"),
1409 input_bfd, howto->name, und, v, name,
1410 object, pic);
338c190a
L
1411 bfd_set_error (bfd_error_bad_value);
1412 sec->check_relocs_failed = 1;
1413 return FALSE;
1414}
c1d11331 1415
c175a657
L
1416/* With the local symbol, foo, we convert
1417 mov foo@GOTPCREL(%rip), %reg
1418 to
1419 lea foo(%rip), %reg
1420 and convert
1421 call/jmp *foo@GOTPCREL(%rip)
1422 to
1423 nop call foo/jmp foo nop
1424 When PIC is false, convert
1425 test %reg, foo@GOTPCREL(%rip)
1426 to
1427 test $foo, %reg
1428 and convert
1429 binop foo@GOTPCREL(%rip), %reg
1430 to
1431 binop $foo, %reg
1432 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1433 instructions. */
1434
1435static bfd_boolean
8b43e456 1436elf_x86_64_convert_load_reloc (bfd *abfd,
c175a657 1437 bfd_byte *contents,
6999821f 1438 unsigned int *r_type_p,
c175a657
L
1439 Elf_Internal_Rela *irel,
1440 struct elf_link_hash_entry *h,
1441 bfd_boolean *converted,
1442 struct bfd_link_info *link_info)
1443{
0afcef53 1444 struct elf_x86_link_hash_table *htab;
c175a657 1445 bfd_boolean is_pic;
8b43e456 1446 bfd_boolean no_overflow;
c175a657
L
1447 bfd_boolean relocx;
1448 bfd_boolean to_reloc_pc32;
1449 asection *tsec;
c175a657
L
1450 bfd_signed_vma raddend;
1451 unsigned int opcode;
1452 unsigned int modrm;
6999821f 1453 unsigned int r_type = *r_type_p;
c175a657 1454 unsigned int r_symndx;
c175a657
L
1455 bfd_vma roff = irel->r_offset;
1456
1457 if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
1458 return TRUE;
1459
1460 raddend = irel->r_addend;
1461 /* Addend for 32-bit PC-relative relocation must be -4. */
1462 if (raddend != -4)
1463 return TRUE;
1464
0afcef53 1465 htab = elf_x86_hash_table (link_info, X86_64_ELF_DATA);
c175a657
L
1466 is_pic = bfd_link_pic (link_info);
1467
1468 relocx = (r_type == R_X86_64_GOTPCRELX
1469 || r_type == R_X86_64_REX_GOTPCRELX);
1470
8b43e456
L
1471 /* TRUE if --no-relax is used. */
1472 no_overflow = link_info->disable_target_specific_optimizations > 1;
c175a657
L
1473
1474 r_symndx = htab->r_sym (irel->r_info);
1475
1476 opcode = bfd_get_8 (abfd, contents + roff - 2);
1477
1478 /* Convert mov to lea since it has been done for a while. */
1479 if (opcode != 0x8b)
1480 {
1481 /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
1482 for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
1483 test, xor instructions. */
1484 if (!relocx)
1485 return TRUE;
1486 }
1487
1488 /* We convert only to R_X86_64_PC32:
1489 1. Branch.
1490 2. R_X86_64_GOTPCREL since we can't modify REX byte.
8b43e456 1491 3. no_overflow is true.
c175a657
L
1492 4. PIC.
1493 */
1494 to_reloc_pc32 = (opcode == 0xff
1495 || !relocx
8b43e456 1496 || no_overflow
c175a657
L
1497 || is_pic);
1498
1499 /* Get the symbol referred to by the reloc. */
1500 if (h == NULL)
1501 {
1502 Elf_Internal_Sym *isym
1503 = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
1504
1505 /* Skip relocation against undefined symbols. */
1506 if (isym->st_shndx == SHN_UNDEF)
1507 return TRUE;
1508
c175a657
L
1509 if (isym->st_shndx == SHN_ABS)
1510 tsec = bfd_abs_section_ptr;
1511 else if (isym->st_shndx == SHN_COMMON)
1512 tsec = bfd_com_section_ptr;
1513 else if (isym->st_shndx == SHN_X86_64_LCOMMON)
1514 tsec = &_bfd_elf_large_com_section;
1515 else
1516 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
c175a657
L
1517 }
1518 else
1519 {
1520 /* Undefined weak symbol is only bound locally in executable
1521 and its reference is resolved as 0 without relocation
1522 overflow. We can only perform this optimization for
1523 GOTPCRELX relocations since we need to modify REX byte.
1524 It is OK convert mov with R_X86_64_GOTPCREL to
1525 R_X86_64_PC32. */
0a27fed7
L
1526 bfd_boolean local_ref;
1527 struct elf_x86_link_hash_entry *eh = elf_x86_hash_entry (h);
1528
1529 /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P. */
1530 local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
c175a657 1531 if ((relocx || opcode == 0x8b)
0a27fed7
L
1532 && (h->root.type == bfd_link_hash_undefweak
1533 && !eh->linker_def
1534 && local_ref))
c175a657
L
1535 {
1536 if (opcode == 0xff)
1537 {
1538 /* Skip for branch instructions since R_X86_64_PC32
1539 may overflow. */
8b43e456 1540 if (no_overflow)
c175a657
L
1541 return TRUE;
1542 }
1543 else if (relocx)
1544 {
1545 /* For non-branch instructions, we can convert to
1546 R_X86_64_32/R_X86_64_32S since we know if there
1547 is a REX byte. */
1548 to_reloc_pc32 = FALSE;
1549 }
1550
1551 /* Since we don't know the current PC when PIC is true,
1552 we can't convert to R_X86_64_PC32. */
1553 if (to_reloc_pc32 && is_pic)
1554 return TRUE;
1555
1556 goto convert;
1557 }
1558 /* Avoid optimizing GOTPCREL relocations againt _DYNAMIC since
1559 ld.so may use its link-time address. */
cbd0eecf 1560 else if (h->start_stop
0a27fed7 1561 || eh->linker_def
cbd0eecf
L
1562 || ((h->def_regular
1563 || h->root.type == bfd_link_hash_defined
1564 || h->root.type == bfd_link_hash_defweak)
1565 && h != htab->elf.hdynamic
0a27fed7 1566 && local_ref))
c175a657
L
1567 {
1568 /* bfd_link_hash_new or bfd_link_hash_undefined is
1569 set by an assignment in a linker script in
cbd0eecf
L
1570 bfd_elf_record_link_assignment. start_stop is set
1571 on __start_SECNAME/__stop_SECNAME which mark section
1572 SECNAME. */
1573 if (h->start_stop
0a27fed7 1574 || eh->linker_def
cbd0eecf
L
1575 || (h->def_regular
1576 && (h->root.type == bfd_link_hash_new
1577 || h->root.type == bfd_link_hash_undefined
1578 || ((h->root.type == bfd_link_hash_defined
1579 || h->root.type == bfd_link_hash_defweak)
1580 && h->root.u.def.section == bfd_und_section_ptr))))
c175a657
L
1581 {
1582 /* Skip since R_X86_64_32/R_X86_64_32S may overflow. */
8b43e456 1583 if (no_overflow)
c175a657
L
1584 return TRUE;
1585 goto convert;
1586 }
1587 tsec = h->root.u.def.section;
c175a657
L
1588 }
1589 else
1590 return TRUE;
1591 }
1592
2168b268
L
1593 /* Don't convert GOTPCREL relocation against large section. */
1594 if (elf_section_data (tsec) != NULL
1595 && (elf_section_flags (tsec) & SHF_X86_64_LARGE) != 0)
1596 return TRUE;
1597
8b43e456
L
1598 /* Skip since R_X86_64_PC32/R_X86_64_32/R_X86_64_32S may overflow. */
1599 if (no_overflow)
1600 return TRUE;
c175a657 1601
dc089072 1602convert:
c175a657
L
1603 if (opcode == 0xff)
1604 {
1605 /* We have "call/jmp *foo@GOTPCREL(%rip)". */
1606 unsigned int nop;
1607 unsigned int disp;
1608 bfd_vma nop_offset;
1609
1610 /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
1611 R_X86_64_PC32. */
1612 modrm = bfd_get_8 (abfd, contents + roff - 1);
1613 if (modrm == 0x25)
1614 {
1615 /* Convert to "jmp foo nop". */
1616 modrm = 0xe9;
1617 nop = NOP_OPCODE;
1618 nop_offset = irel->r_offset + 3;
1619 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1620 irel->r_offset -= 1;
1621 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1622 }
1623 else
1624 {
0afcef53
L
1625 struct elf_x86_link_hash_entry *eh
1626 = (struct elf_x86_link_hash_entry *) h;
e2cbcd91 1627
c175a657
L
1628 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
1629 is a nop prefix. */
1630 modrm = 0xe8;
e2cbcd91
L
1631 /* To support TLS optimization, always use addr32 prefix for
1632 "call *__tls_get_addr@GOTPCREL(%rip)". */
1d4af308 1633 if (eh && eh->tls_get_addr)
c175a657 1634 {
e2cbcd91
L
1635 nop = 0x67;
1636 nop_offset = irel->r_offset - 2;
c175a657
L
1637 }
1638 else
e2cbcd91
L
1639 {
1640 nop = link_info->call_nop_byte;
1641 if (link_info->call_nop_as_suffix)
1642 {
1643 nop_offset = irel->r_offset + 3;
1644 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1645 irel->r_offset -= 1;
1646 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1647 }
1648 else
1649 nop_offset = irel->r_offset - 2;
1650 }
c175a657
L
1651 }
1652 bfd_put_8 (abfd, nop, contents + nop_offset);
1653 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1654 r_type = R_X86_64_PC32;
1655 }
1656 else
1657 {
1658 unsigned int rex;
1659 unsigned int rex_mask = REX_R;
1660
1661 if (r_type == R_X86_64_REX_GOTPCRELX)
1662 rex = bfd_get_8 (abfd, contents + roff - 3);
1663 else
1664 rex = 0;
1665
1666 if (opcode == 0x8b)
1667 {
1668 if (to_reloc_pc32)
1669 {
1670 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1671 "lea foo(%rip), %reg". */
1672 opcode = 0x8d;
1673 r_type = R_X86_64_PC32;
1674 }
1675 else
1676 {
1677 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1678 "mov $foo, %reg". */
1679 opcode = 0xc7;
1680 modrm = bfd_get_8 (abfd, contents + roff - 1);
1681 modrm = 0xc0 | (modrm & 0x38) >> 3;
1682 if ((rex & REX_W) != 0
1683 && ABI_64_P (link_info->output_bfd))
1684 {
1685 /* Keep the REX_W bit in REX byte for LP64. */
1686 r_type = R_X86_64_32S;
1687 goto rewrite_modrm_rex;
1688 }
1689 else
1690 {
1691 /* If the REX_W bit in REX byte isn't needed,
1692 use R_X86_64_32 and clear the W bit to avoid
1693 sign-extend imm32 to imm64. */
1694 r_type = R_X86_64_32;
1695 /* Clear the W bit in REX byte. */
1696 rex_mask |= REX_W;
1697 goto rewrite_modrm_rex;
1698 }
1699 }
1700 }
1701 else
1702 {
1703 /* R_X86_64_PC32 isn't supported. */
1704 if (to_reloc_pc32)
1705 return TRUE;
1706
1707 modrm = bfd_get_8 (abfd, contents + roff - 1);
1708 if (opcode == 0x85)
1709 {
1710 /* Convert "test %reg, foo@GOTPCREL(%rip)" to
1711 "test $foo, %reg". */
1712 modrm = 0xc0 | (modrm & 0x38) >> 3;
1713 opcode = 0xf7;
1714 }
1715 else
1716 {
1717 /* Convert "binop foo@GOTPCREL(%rip), %reg" to
1718 "binop $foo, %reg". */
1719 modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
1720 opcode = 0x81;
1721 }
1722
1723 /* Use R_X86_64_32 with 32-bit operand to avoid relocation
1724 overflow when sign-extending imm32 to imm64. */
1725 r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
1726
1727rewrite_modrm_rex:
1728 bfd_put_8 (abfd, modrm, contents + roff - 1);
1729
1730 if (rex)
1731 {
1732 /* Move the R bit to the B bit in REX byte. */
1733 rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
1734 bfd_put_8 (abfd, rex, contents + roff - 3);
1735 }
1736
1737 /* No addend for R_X86_64_32/R_X86_64_32S relocations. */
1738 irel->r_addend = 0;
1739 }
1740
1741 bfd_put_8 (abfd, opcode, contents + roff - 2);
1742 }
1743
6999821f 1744 *r_type_p = r_type;
78984959
L
1745 irel->r_info = htab->r_info (r_symndx,
1746 r_type | R_X86_64_converted_reloc_bit);
c175a657
L
1747
1748 *converted = TRUE;
1749
1750 return TRUE;
1751}
1752
70256ad8 1753/* Look through the relocs for a section during the first phase, and
c434dee6
AJ
1754 calculate needed space in the global offset table, procedure
1755 linkage table, and dynamic reloc sections. */
70256ad8 1756
b34976b6 1757static bfd_boolean
351f65ca
L
1758elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1759 asection *sec,
1760 const Elf_Internal_Rela *relocs)
70256ad8 1761{
0afcef53 1762 struct elf_x86_link_hash_table *htab;
70256ad8
AJ
1763 Elf_Internal_Shdr *symtab_hdr;
1764 struct elf_link_hash_entry **sym_hashes;
70256ad8
AJ
1765 const Elf_Internal_Rela *rel;
1766 const Elf_Internal_Rela *rel_end;
70256ad8 1767 asection *sreloc;
bedfd056 1768 bfd_byte *contents;
5e5e02ae 1769 bfd_boolean converted;
70256ad8 1770
0e1862bb 1771 if (bfd_link_relocatable (info))
b34976b6 1772 return TRUE;
70256ad8 1773
081b1afe
L
1774 /* Don't do anything special with non-loaded, non-alloced sections.
1775 In particular, any relocs in such sections should not affect GOT
1776 and PLT reference counting (ie. we don't allow them to create GOT
1777 or PLT entries), there's no possibility or desire to optimize TLS
1778 relocs, and there's not much point in propagating relocs to shared
1779 libs that the dynamic linker won't relocate. */
1780 if ((sec->flags & SEC_ALLOC) == 0)
1781 return TRUE;
1782
0afcef53 1783 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6 1784 if (htab == NULL)
afd9acee
L
1785 {
1786 sec->check_relocs_failed = 1;
1787 return FALSE;
1788 }
4dfe6ac6 1789
fe53b4a4
L
1790 BFD_ASSERT (is_x86_elf (abfd, htab));
1791
bedfd056
L
1792 /* Get the section contents. */
1793 if (elf_section_data (sec)->this_hdr.contents != NULL)
1794 contents = elf_section_data (sec)->this_hdr.contents;
1795 else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1796 {
1797 sec->check_relocs_failed = 1;
1798 return FALSE;
1799 }
1800
0ffa91dd 1801 symtab_hdr = &elf_symtab_hdr (abfd);
70256ad8 1802 sym_hashes = elf_sym_hashes (abfd);
70256ad8 1803
5e5e02ae
L
1804 converted = FALSE;
1805
c434dee6 1806 sreloc = NULL;
cbe950e9 1807
70256ad8
AJ
1808 rel_end = relocs + sec->reloc_count;
1809 for (rel = relocs; rel < rel_end; rel++)
1810 {
bffbf940 1811 unsigned int r_type;
d42c267e 1812 unsigned int r_symndx;
70256ad8 1813 struct elf_link_hash_entry *h;
0afcef53 1814 struct elf_x86_link_hash_entry *eh;
4c544807
L
1815 Elf_Internal_Sym *isym;
1816 const char *name;
06a6a421 1817 bfd_boolean size_reloc;
6999821f 1818 bfd_boolean converted_reloc;
70256ad8 1819
351f65ca
L
1820 r_symndx = htab->r_sym (rel->r_info);
1821 r_type = ELF32_R_TYPE (rel->r_info);
c434dee6
AJ
1822
1823 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1824 {
695344c0 1825 /* xgettext:c-format */
871b3ab2 1826 _bfd_error_handler (_("%pB: bad symbol index: %d"),
4eca0228 1827 abfd, r_symndx);
afd9acee 1828 goto error_return;
c434dee6
AJ
1829 }
1830
70256ad8 1831 if (r_symndx < symtab_hdr->sh_info)
c25bc9fc
L
1832 {
1833 /* A local symbol. */
c2e61a4e
L
1834 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1835 abfd, r_symndx);
1836 if (isym == NULL)
afd9acee 1837 goto error_return;
c25bc9fc
L
1838
1839 /* Check relocation against local STT_GNU_IFUNC symbol. */
351f65ca 1840 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
c25bc9fc 1841 {
0afcef53
L
1842 h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel,
1843 TRUE);
c25bc9fc 1844 if (h == NULL)
afd9acee 1845 goto error_return;
6bbec505 1846
c25bc9fc 1847 /* Fake a STT_GNU_IFUNC symbol. */
6322e5c5
L
1848 h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1849 isym, NULL);
c25bc9fc
L
1850 h->type = STT_GNU_IFUNC;
1851 h->def_regular = 1;
1852 h->ref_regular = 1;
1853 h->forced_local = 1;
1854 h->root.type = bfd_link_hash_defined;
1855 }
1856 else
1857 h = NULL;
1858 }
70256ad8 1859 else
71cb9464 1860 {
4c544807 1861 isym = NULL;
71cb9464
L
1862 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1863 while (h->root.type == bfd_link_hash_indirect
1864 || h->root.type == bfd_link_hash_warning)
1865 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c25bc9fc 1866 }
cbe950e9 1867
d1534d16
L
1868 /* Check invalid x32 relocations. */
1869 if (!ABI_64_P (abfd))
1870 switch (r_type)
1871 {
1872 default:
1873 break;
1874
d1534d16
L
1875 case R_X86_64_DTPOFF64:
1876 case R_X86_64_TPOFF64:
1877 case R_X86_64_PC64:
1878 case R_X86_64_GOTOFF64:
1879 case R_X86_64_GOT64:
1880 case R_X86_64_GOTPCREL64:
1881 case R_X86_64_GOTPC64:
1882 case R_X86_64_GOTPLT64:
1883 case R_X86_64_PLTOFF64:
1884 {
1885 if (h)
1886 name = h->root.root.string;
1887 else
1888 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1889 NULL);
4eca0228 1890 _bfd_error_handler
695344c0 1891 /* xgettext:c-format */
871b3ab2 1892 (_("%pB: relocation %s against symbol `%s' isn't "
d1534d16
L
1893 "supported in x32 mode"), abfd,
1894 x86_64_elf_howto_table[r_type].name, name);
1895 bfd_set_error (bfd_error_bad_value);
afd9acee 1896 goto error_return;
d1534d16
L
1897 }
1898 break;
1899 }
1900
c25bc9fc
L
1901 if (h != NULL)
1902 {
ad1e85de
L
1903 /* It is referenced by a non-shared object. */
1904 h->ref_regular = 1;
13a2df29
L
1905
1906 if (h->type == STT_GNU_IFUNC)
1907 elf_tdata (info->output_bfd)->has_gnu_symbols
1908 |= elf_gnu_symbol_ifunc;
71cb9464 1909 }
70256ad8 1910
6999821f
L
1911 converted_reloc = FALSE;
1912 if ((r_type == R_X86_64_GOTPCREL
1913 || r_type == R_X86_64_GOTPCRELX
1914 || r_type == R_X86_64_REX_GOTPCRELX)
1915 && (h == NULL || h->type != STT_GNU_IFUNC))
1916 {
1917 Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1918 if (!elf_x86_64_convert_load_reloc (abfd, contents, &r_type,
1919 irel, h, &converted_reloc,
1920 info))
1921 goto error_return;
5e5e02ae
L
1922
1923 if (converted_reloc)
1924 converted = TRUE;
6999821f
L
1925 }
1926
bedfd056 1927 if (! elf_x86_64_tls_transition (info, abfd, sec, contents,
351f65ca
L
1928 symtab_hdr, sym_hashes,
1929 &r_type, GOT_UNKNOWN,
bedfd056 1930 rel, rel_end, h, r_symndx, FALSE))
afd9acee 1931 goto error_return;
142411ca 1932
cd048363
L
1933 /* Check if _GLOBAL_OFFSET_TABLE_ is referenced. */
1934 if (h == htab->elf.hgot)
1935 htab->got_referenced = TRUE;
1936
0afcef53 1937 eh = (struct elf_x86_link_hash_entry *) h;
bffbf940 1938 switch (r_type)
70256ad8 1939 {
bffbf940 1940 case R_X86_64_TLSLD:
0f09b4d8 1941 htab->tls_ld_or_ldm_got.refcount = 1;
bffbf940
JJ
1942 goto create_got;
1943
1944 case R_X86_64_TPOFF32:
0e1862bb 1945 if (!bfd_link_executable (info) && ABI_64_P (abfd))
aab921ad 1946 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
338c190a 1947 &x86_64_elf_howto_table[r_type]);
aec6b87e 1948 if (eh != NULL)
98b273dc 1949 eh->zero_undefweak &= 0x2;
bffbf940 1950 break;
c434dee6 1951
bffbf940 1952 case R_X86_64_GOTTPOFF:
0e1862bb 1953 if (!bfd_link_executable (info))
bffbf940
JJ
1954 info->flags |= DF_STATIC_TLS;
1955 /* Fall through */
70256ad8 1956
bffbf940
JJ
1957 case R_X86_64_GOT32:
1958 case R_X86_64_GOTPCREL:
56ceb5b5
L
1959 case R_X86_64_GOTPCRELX:
1960 case R_X86_64_REX_GOTPCRELX:
bffbf940 1961 case R_X86_64_TLSGD:
7b81dfbb
AJ
1962 case R_X86_64_GOT64:
1963 case R_X86_64_GOTPCREL64:
1964 case R_X86_64_GOTPLT64:
67a4f2b7
AO
1965 case R_X86_64_GOTPC32_TLSDESC:
1966 case R_X86_64_TLSDESC_CALL:
bffbf940
JJ
1967 /* This symbol requires a global offset table entry. */
1968 {
1969 int tls_type, old_tls_type;
1970
1971 switch (r_type)
1972 {
1973 default: tls_type = GOT_NORMAL; break;
1974 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
1975 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
67a4f2b7
AO
1976 case R_X86_64_GOTPC32_TLSDESC:
1977 case R_X86_64_TLSDESC_CALL:
1978 tls_type = GOT_TLS_GDESC; break;
bffbf940
JJ
1979 }
1980
1981 if (h != NULL)
1982 {
0f09b4d8 1983 h->got.refcount = 1;
aec6b87e 1984 old_tls_type = eh->tls_type;
bffbf940
JJ
1985 }
1986 else
1987 {
1988 bfd_signed_vma *local_got_refcounts;
1989
1990 /* This is a global offset table entry for a local symbol. */
1991 local_got_refcounts = elf_local_got_refcounts (abfd);
1992 if (local_got_refcounts == NULL)
1993 {
1994 bfd_size_type size;
1995
1996 size = symtab_hdr->sh_info;
67a4f2b7
AO
1997 size *= sizeof (bfd_signed_vma)
1998 + sizeof (bfd_vma) + sizeof (char);
bffbf940
JJ
1999 local_got_refcounts = ((bfd_signed_vma *)
2000 bfd_zalloc (abfd, size));
2001 if (local_got_refcounts == NULL)
afd9acee 2002 goto error_return;
bffbf940 2003 elf_local_got_refcounts (abfd) = local_got_refcounts;
0afcef53 2004 elf_x86_local_tlsdesc_gotent (abfd)
67a4f2b7 2005 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
0afcef53 2006 elf_x86_local_got_tls_type (abfd)
67a4f2b7 2007 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
bffbf940 2008 }
0f09b4d8 2009 local_got_refcounts[r_symndx] = 1;
bffbf940 2010 old_tls_type
0afcef53 2011 = elf_x86_local_got_tls_type (abfd) [r_symndx];
bffbf940
JJ
2012 }
2013
2014 /* If a TLS symbol is accessed using IE at least once,
2015 there is no point to use dynamic model for it. */
2016 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7
AO
2017 && (! GOT_TLS_GD_ANY_P (old_tls_type)
2018 || tls_type != GOT_TLS_IE))
bffbf940 2019 {
67a4f2b7 2020 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
bffbf940 2021 tls_type = old_tls_type;
67a4f2b7
AO
2022 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2023 && GOT_TLS_GD_ANY_P (tls_type))
2024 tls_type |= old_tls_type;
bffbf940
JJ
2025 else
2026 {
09a24cbf 2027 if (h)
4c544807
L
2028 name = h->root.root.string;
2029 else
2030 name = bfd_elf_sym_name (abfd, symtab_hdr,
2031 isym, NULL);
4eca0228 2032 _bfd_error_handler
695344c0 2033 /* xgettext:c-format */
871b3ab2 2034 (_("%pB: '%s' accessed both as normal and"
63a5468a 2035 " thread local symbol"),
4c544807 2036 abfd, name);
68c4a57e 2037 bfd_set_error (bfd_error_bad_value);
afd9acee 2038 goto error_return;
bffbf940
JJ
2039 }
2040 }
2041
2042 if (old_tls_type != tls_type)
2043 {
aec6b87e
L
2044 if (eh != NULL)
2045 eh->tls_type = tls_type;
bffbf940 2046 else
0afcef53 2047 elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
bffbf940
JJ
2048 }
2049 }
c434dee6
AJ
2050 /* Fall through */
2051
d6ab8113
JB
2052 case R_X86_64_GOTOFF64:
2053 case R_X86_64_GOTPC32:
7b81dfbb 2054 case R_X86_64_GOTPC64:
bffbf940 2055 create_got:
aec6b87e 2056 if (eh != NULL)
98b273dc 2057 eh->zero_undefweak &= 0x2;
70256ad8
AJ
2058 break;
2059
2060 case R_X86_64_PLT32:
c3320543 2061 case R_X86_64_PLT32_BND:
70256ad8 2062 /* This symbol requires a procedure linkage table entry. We
407443a3
AJ
2063 actually build the entry in adjust_dynamic_symbol,
2064 because this might be a case of linking PIC code which is
2065 never referenced by a dynamic object, in which case we
2066 don't need to generate a procedure linkage table entry
2067 after all. */
70256ad8
AJ
2068
2069 /* If this is a local symbol, we resolve it directly without
407443a3 2070 creating a procedure linkage table entry. */
70256ad8
AJ
2071 if (h == NULL)
2072 continue;
2073
98b273dc 2074 eh->zero_undefweak &= 0x2;
f5385ebf 2075 h->needs_plt = 1;
79b0c981 2076 h->plt.refcount = 1;
70256ad8
AJ
2077 break;
2078
7b81dfbb
AJ
2079 case R_X86_64_PLTOFF64:
2080 /* This tries to form the 'address' of a function relative
2081 to GOT. For global symbols we need a PLT entry. */
2082 if (h != NULL)
2083 {
2084 h->needs_plt = 1;
79b0c981 2085 h->plt.refcount = 1;
7b81dfbb
AJ
2086 }
2087 goto create_got;
2088
6a3e1bae
L
2089 case R_X86_64_SIZE32:
2090 case R_X86_64_SIZE64:
06a6a421 2091 size_reloc = TRUE;
6a3e1bae
L
2092 goto do_size;
2093
248775ba
L
2094 case R_X86_64_32:
2095 if (!ABI_64_P (abfd))
2096 goto pointer;
1a0670f3 2097 /* Fall through. */
cc78d0af
AJ
2098 case R_X86_64_8:
2099 case R_X86_64_16:
70256ad8 2100 case R_X86_64_32S:
338c190a
L
2101 /* Check relocation overflow as these relocs may lead to
2102 run-time relocation overflow. Don't error out for
1b71fb54 2103 sections we don't care about, such as debug sections or
338c190a 2104 when relocation overflow check is disabled. */
4c10bbaa 2105 if (!info->no_reloc_overflow_check
6999821f 2106 && !converted_reloc
338c190a
L
2107 && (bfd_link_pic (info)
2108 || (bfd_link_executable (info)
2109 && h != NULL
2110 && !h->def_regular
2111 && h->def_dynamic
081b1afe 2112 && (sec->flags & SEC_READONLY) == 0)))
aab921ad 2113 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
338c190a 2114 &x86_64_elf_howto_table[r_type]);
1b71fb54
AJ
2115 /* Fall through. */
2116
c434dee6
AJ
2117 case R_X86_64_PC8:
2118 case R_X86_64_PC16:
70256ad8 2119 case R_X86_64_PC32:
c3320543 2120 case R_X86_64_PC32_BND:
d6ab8113 2121 case R_X86_64_PC64:
1b71fb54 2122 case R_X86_64_64:
248775ba 2123pointer:
aec6b87e 2124 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
98b273dc 2125 eh->zero_undefweak |= 0x2;
bf52d7c7
L
2126 /* We are called after all symbols have been resolved. Only
2127 relocation against STT_GNU_IFUNC symbol must go through
2128 PLT. */
d1ed1c7d
L
2129 if (h != NULL
2130 && (bfd_link_executable (info)
bf52d7c7 2131 || h->type == STT_GNU_IFUNC))
c434dee6 2132 {
79b0c981 2133 bfd_boolean func_pointer_ref = FALSE;
233cc9c1 2134
5db4f0d3
L
2135 if (r_type == R_X86_64_PC32)
2136 {
2137 /* Since something like ".long foo - ." may be used
2138 as pointer, make sure that PLT is used if foo is
2139 a function defined in a shared library. */
2140 if ((sec->flags & SEC_CODE) == 0)
451875b4
L
2141 {
2142 h->pointer_equality_needed = 1;
2143 if (bfd_link_pie (info)
2144 && h->type == STT_FUNC
2145 && !h->def_regular
2146 && h->def_dynamic)
2147 {
2148 h->needs_plt = 1;
2149 h->plt.refcount = 1;
2150 }
2151 }
5db4f0d3
L
2152 }
2153 else if (r_type != R_X86_64_PC32_BND
2154 && r_type != R_X86_64_PC64)
04ebc307
L
2155 {
2156 h->pointer_equality_needed = 1;
2157 /* At run-time, R_X86_64_64 can be resolved for both
2158 x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2159 can only be resolved for x32. */
2160 if ((sec->flags & SEC_READONLY) == 0
2161 && (r_type == R_X86_64_64
2162 || (!ABI_64_P (abfd)
2163 && (r_type == R_X86_64_32
2164 || r_type == R_X86_64_32S))))
79b0c981
L
2165 func_pointer_ref = TRUE;
2166 }
2167
2168 if (!func_pointer_ref)
2169 {
2170 /* If this reloc is in a read-only section, we might
2171 need a copy reloc. We can't check reliably at this
2172 stage whether the section is read-only, as input
2173 sections have not yet been mapped to output sections.
2174 Tentatively set the flag for now, and correct in
2175 adjust_dynamic_symbol. */
2176 h->non_got_ref = 1;
2177
2178 /* We may need a .plt entry if the symbol is a function
2179 defined in a shared lib or is a function referenced
2180 from the code or read-only section. */
2181 if (!h->def_regular
2182 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2183 h->plt.refcount = 1;
04ebc307 2184 }
c434dee6 2185 }
70256ad8 2186
06a6a421 2187 size_reloc = FALSE;
6a3e1bae 2188do_size:
451875b4 2189 if (NEED_DYNAMIC_RELOCATION_P (info, TRUE, h, sec, r_type,
daf1c414 2190 htab->pointer_r_type))
70256ad8 2191 {
e03a8ed8
L
2192 struct elf_dyn_relocs *p;
2193 struct elf_dyn_relocs **head;
c434dee6
AJ
2194
2195 /* We must copy these reloc types into the output file.
2196 Create a reloc section in dynobj and make room for
2197 this reloc. */
70256ad8
AJ
2198 if (sreloc == NULL)
2199 {
83bac4b0 2200 sreloc = _bfd_elf_make_dynamic_reloc_section
82e96e07
L
2201 (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2202 abfd, /*rela?*/ TRUE);
70256ad8 2203
70256ad8 2204 if (sreloc == NULL)
afd9acee 2205 goto error_return;
70256ad8
AJ
2206 }
2207
c434dee6
AJ
2208 /* If this is a global symbol, we count the number of
2209 relocations we need for this symbol. */
2210 if (h != NULL)
aec6b87e 2211 head = &eh->dyn_relocs;
c434dee6
AJ
2212 else
2213 {
2214 /* Track dynamic relocs needed for local syms too.
2215 We really need local syms available to do this
2216 easily. Oh well. */
c434dee6 2217 asection *s;
87d72d41 2218 void **vpp;
87d72d41
AM
2219
2220 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2221 abfd, r_symndx);
2222 if (isym == NULL)
afd9acee 2223 goto error_return;
87d72d41
AM
2224
2225 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
c434dee6 2226 if (s == NULL)
87d72d41 2227 s = sec;
70256ad8 2228
e81d3500
DD
2229 /* Beware of type punned pointers vs strict aliasing
2230 rules. */
2231 vpp = &(elf_section_data (s)->local_dynrel);
e03a8ed8 2232 head = (struct elf_dyn_relocs **)vpp;
c434dee6 2233 }
70256ad8 2234
c434dee6
AJ
2235 p = *head;
2236 if (p == NULL || p->sec != sec)
2237 {
2238 bfd_size_type amt = sizeof *p;
d8045f23 2239
e03a8ed8 2240 p = ((struct elf_dyn_relocs *)
c434dee6 2241 bfd_alloc (htab->elf.dynobj, amt));
70256ad8 2242 if (p == NULL)
afd9acee 2243 goto error_return;
c434dee6
AJ
2244 p->next = *head;
2245 *head = p;
2246 p->sec = sec;
2247 p->count = 0;
2248 p->pc_count = 0;
70256ad8 2249 }
c434dee6
AJ
2250
2251 p->count += 1;
06a6a421 2252 /* Count size relocation as PC-relative relocation. */
daf1c414 2253 if (X86_PCREL_TYPE_P (r_type) || size_reloc)
c434dee6 2254 p->pc_count += 1;
70256ad8
AJ
2255 }
2256 break;
fe4770f4
AJ
2257
2258 /* This relocation describes the C++ object vtable hierarchy.
2259 Reconstruct it for later use during GC. */
2260 case R_X86_64_GNU_VTINHERIT:
c152c796 2261 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
afd9acee 2262 goto error_return;
fe4770f4
AJ
2263 break;
2264
2265 /* This relocation describes which C++ vtable entries are actually
2266 used. Record for later use during GC. */
2267 case R_X86_64_GNU_VTENTRY:
d17e0c6e
JB
2268 BFD_ASSERT (h != NULL);
2269 if (h != NULL
2270 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
afd9acee 2271 goto error_return;
fe4770f4 2272 break;
c434dee6
AJ
2273
2274 default:
2275 break;
70256ad8
AJ
2276 }
2277 }
2278
bedfd056
L
2279 if (elf_section_data (sec)->this_hdr.contents != contents)
2280 {
5e5e02ae 2281 if (!converted && !info->keep_memory)
bedfd056
L
2282 free (contents);
2283 else
2284 {
5e5e02ae
L
2285 /* Cache the section contents for elf_link_input_bfd if any
2286 load is converted or --no-keep-memory isn't used. */
bedfd056
L
2287 elf_section_data (sec)->this_hdr.contents = contents;
2288 }
2289 }
2290
5e5e02ae
L
2291 /* Cache relocations if any load is converted. */
2292 if (elf_section_data (sec)->relocs != relocs && converted)
2293 elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
2294
b34976b6 2295 return TRUE;
afd9acee
L
2296
2297error_return:
bedfd056
L
2298 if (elf_section_data (sec)->this_hdr.contents != contents)
2299 free (contents);
afd9acee
L
2300 sec->check_relocs_failed = 1;
2301 return FALSE;
70256ad8
AJ
2302}
2303
bffbf940
JJ
2304/* Return the relocation value for @tpoff relocation
2305 if STT_TLS virtual address is ADDRESS. */
2306
2307static bfd_vma
351f65ca 2308elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
bffbf940 2309{
e1918d23 2310 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO
2311 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2312 bfd_vma static_tls_size;
bffbf940
JJ
2313
2314 /* If tls_segment is NULL, we should have signalled an error already. */
e1918d23 2315 if (htab->tls_sec == NULL)
bffbf940 2316 return 0;
7dc98aea
RO
2317
2318 /* Consider special static TLS alignment requirements. */
2319 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2320 return address - static_tls_size - htab->tls_sec->vma;
bffbf940
JJ
2321}
2322
8d88c4ca
NC
2323/* Relocate an x86_64 ELF section. */
2324
b34976b6 2325static bfd_boolean
351f65ca
L
2326elf_x86_64_relocate_section (bfd *output_bfd,
2327 struct bfd_link_info *info,
2328 bfd *input_bfd,
2329 asection *input_section,
2330 bfd_byte *contents,
2331 Elf_Internal_Rela *relocs,
2332 Elf_Internal_Sym *local_syms,
2333 asection **local_sections)
8d88c4ca 2334{
0afcef53 2335 struct elf_x86_link_hash_table *htab;
8d88c4ca
NC
2336 Elf_Internal_Shdr *symtab_hdr;
2337 struct elf_link_hash_entry **sym_hashes;
2338 bfd_vma *local_got_offsets;
67a4f2b7 2339 bfd_vma *local_tlsdesc_gotents;
c434dee6 2340 Elf_Internal_Rela *rel;
60f2e42e 2341 Elf_Internal_Rela *wrel;
8d88c4ca 2342 Elf_Internal_Rela *relend;
38b12349 2343 unsigned int plt_entry_size;
8d88c4ca 2344
338c190a
L
2345 /* Skip if check_relocs failed. */
2346 if (input_section->check_relocs_failed)
2347 return FALSE;
2348
0afcef53 2349 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
2350 if (htab == NULL)
2351 return FALSE;
fe53b4a4
L
2352
2353 BFD_ASSERT (is_x86_elf (input_bfd, htab));
2354
765e526c 2355 plt_entry_size = htab->plt.plt_entry_size;
0ffa91dd 2356 symtab_hdr = &elf_symtab_hdr (input_bfd);
8d88c4ca
NC
2357 sym_hashes = elf_sym_hashes (input_bfd);
2358 local_got_offsets = elf_local_got_offsets (input_bfd);
0afcef53 2359 local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
8d88c4ca 2360
0afcef53 2361 _bfd_x86_elf_set_tls_module_base (info);
9f03412a 2362
60f2e42e 2363 rel = wrel = relocs;
8d88c4ca 2364 relend = relocs + input_section->reloc_count;
60f2e42e 2365 for (; rel < relend; wrel++, rel++)
8d88c4ca 2366 {
419414ea 2367 unsigned int r_type, r_type_tls;
8d88c4ca
NC
2368 reloc_howto_type *howto;
2369 unsigned long r_symndx;
2370 struct elf_link_hash_entry *h;
0afcef53 2371 struct elf_x86_link_hash_entry *eh;
8d88c4ca
NC
2372 Elf_Internal_Sym *sym;
2373 asection *sec;
0ff2b86e 2374 bfd_vma off, offplt, plt_offset;
8d88c4ca 2375 bfd_vma relocation;
b34976b6 2376 bfd_boolean unresolved_reloc;
8d88c4ca 2377 bfd_reloc_status_type r;
bffbf940 2378 int tls_type;
0ff2b86e 2379 asection *base_got, *resolved_plt;
1788fc08 2380 bfd_vma st_size;
aec6b87e 2381 bfd_boolean resolved_to_zero;
9e9821dd 2382 bfd_boolean relative_reloc;
78984959 2383 bfd_boolean converted_reloc;
aebcc8ff 2384 bfd_boolean need_copy_reloc_in_pie;
8d88c4ca 2385
351f65ca 2386 r_type = ELF32_R_TYPE (rel->r_info);
fe4770f4
AJ
2387 if (r_type == (int) R_X86_64_GNU_VTINHERIT
2388 || r_type == (int) R_X86_64_GNU_VTENTRY)
18954b29
L
2389 {
2390 if (wrel != rel)
2391 *wrel = *rel;
2392 continue;
2393 }
8d88c4ca 2394
78984959
L
2395 converted_reloc = (r_type & R_X86_64_converted_reloc_bit) != 0;
2396 r_type &= ~R_X86_64_converted_reloc_bit;
2397
9911c0fc 2398 if (r_type >= (int) R_X86_64_standard)
47aeb64c 2399 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
8d88c4ca 2400
d7921315 2401 if (r_type != (int) R_X86_64_32
eed180f8 2402 || ABI_64_P (output_bfd))
d7921315
L
2403 howto = x86_64_elf_howto_table + r_type;
2404 else
2405 howto = (x86_64_elf_howto_table
2406 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
351f65ca 2407 r_symndx = htab->r_sym (rel->r_info);
8d88c4ca
NC
2408 h = NULL;
2409 sym = NULL;
2410 sec = NULL;
b34976b6 2411 unresolved_reloc = FALSE;
8d88c4ca 2412 if (r_symndx < symtab_hdr->sh_info)
8da6118f
KH
2413 {
2414 sym = local_syms + r_symndx;
2415 sec = local_sections[r_symndx];
c434dee6 2416
c25bc9fc
L
2417 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2418 &sec, rel);
1788fc08 2419 st_size = sym->st_size;
c25bc9fc
L
2420
2421 /* Relocate against local STT_GNU_IFUNC symbol. */
0e1862bb 2422 if (!bfd_link_relocatable (info)
351f65ca 2423 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc 2424 {
0afcef53
L
2425 h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd,
2426 rel, FALSE);
c25bc9fc
L
2427 if (h == NULL)
2428 abort ();
2429
eed180f8 2430 /* Set STT_GNU_IFUNC symbol value. */
c25bc9fc
L
2431 h->root.u.def.value = sym->st_value;
2432 h->root.u.def.section = sec;
2433 }
8da6118f 2434 }
8d88c4ca 2435 else
8da6118f 2436 {
c9736ba0 2437 bfd_boolean warned ATTRIBUTE_UNUSED;
62d887d4 2438 bfd_boolean ignored ATTRIBUTE_UNUSED;
c434dee6 2439
b2a8e766
AM
2440 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2441 r_symndx, symtab_hdr, sym_hashes,
2442 h, sec, relocation,
62d887d4 2443 unresolved_reloc, warned, ignored);
1788fc08 2444 st_size = h->size;
8da6118f 2445 }
ab96bf03 2446
dbaa2011 2447 if (sec != NULL && discarded_section (sec))
60f2e42e
L
2448 {
2449 _bfd_clear_contents (howto, input_bfd, input_section,
2450 contents + rel->r_offset);
2451 wrel->r_offset = rel->r_offset;
2452 wrel->r_info = 0;
2453 wrel->r_addend = 0;
2454
2455 /* For ld -r, remove relocations in debug sections against
2456 sections defined in discarded sections. Not done for
2457 eh_frame editing code expects to be present. */
2458 if (bfd_link_relocatable (info)
2459 && (input_section->flags & SEC_DEBUGGING))
2460 wrel--;
2461
2462 continue;
2463 }
ab96bf03 2464
0e1862bb 2465 if (bfd_link_relocatable (info))
2d5da473
L
2466 {
2467 if (wrel != rel)
2468 *wrel = *rel;
2469 continue;
2470 }
ab96bf03 2471
1788fc08 2472 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
64d25c44 2473 {
1788fc08
L
2474 if (r_type == R_X86_64_64)
2475 {
2476 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
2477 zero-extend it to 64bit if addend is zero. */
2478 r_type = R_X86_64_32;
2479 memset (contents + rel->r_offset + 4, 0, 4);
2480 }
2481 else if (r_type == R_X86_64_SIZE64)
2482 {
2483 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
2484 zero-extend it to 64bit if addend is zero. */
2485 r_type = R_X86_64_SIZE32;
2486 memset (contents + rel->r_offset + 4, 0, 4);
2487 }
64d25c44
L
2488 }
2489
0afcef53 2490 eh = (struct elf_x86_link_hash_entry *) h;
0ff2b86e 2491
cbe950e9
L
2492 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2493 it here if it is defined in a non-shared object. */
2494 if (h != NULL
2495 && h->type == STT_GNU_IFUNC
2496 && h->def_regular)
2497 {
cbe950e9 2498 bfd_vma plt_index;
4c544807 2499 const char *name;
cbe950e9 2500
97dc35c8
L
2501 if ((input_section->flags & SEC_ALLOC) == 0)
2502 {
347a8774
L
2503 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2504 STT_GNU_IFUNC symbol as STT_FUNC. */
2505 if (elf_section_type (input_section) == SHT_NOTE)
2506 goto skip_ifunc;
97dc35c8
L
2507 /* Dynamic relocs are not propagated for SEC_DEBUGGING
2508 sections because such sections are not SEC_ALLOC and
2509 thus ld.so will not process them. */
2510 if ((input_section->flags & SEC_DEBUGGING) != 0)
0eace210 2511 continue;
97dc35c8
L
2512 abort ();
2513 }
233cc9c1
L
2514
2515 switch (r_type)
2516 {
2517 default:
2518 break;
2519
2520 case R_X86_64_GOTPCREL:
2521 case R_X86_64_GOTPCRELX:
2522 case R_X86_64_REX_GOTPCRELX:
2523 case R_X86_64_GOTPCREL64:
2524 base_got = htab->elf.sgot;
2525 off = h->got.offset;
2526
2527 if (base_got == NULL)
2528 abort ();
2529
2530 if (off == (bfd_vma) -1)
2531 {
2532 /* We can't use h->got.offset here to save state, or
2533 even just remember the offset, as finish_dynamic_symbol
2534 would use that as offset into .got. */
2535
2536 if (h->plt.offset == (bfd_vma) -1)
2537 abort ();
2538
2539 if (htab->elf.splt != NULL)
2540 {
38b12349 2541 plt_index = (h->plt.offset / plt_entry_size
765e526c 2542 - htab->plt.has_plt0);
233cc9c1
L
2543 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2544 base_got = htab->elf.sgotplt;
2545 }
2546 else
2547 {
2548 plt_index = h->plt.offset / plt_entry_size;
2549 off = plt_index * GOT_ENTRY_SIZE;
2550 base_got = htab->elf.igotplt;
2551 }
2552
2553 if (h->dynindx == -1
2554 || h->forced_local
2555 || info->symbolic)
2556 {
2557 /* This references the local defitionion. We must
2558 initialize this entry in the global offset table.
2559 Since the offset must always be a multiple of 8,
2560 we use the least significant bit to record
2561 whether we have initialized it already.
2562
2563 When doing a dynamic link, we create a .rela.got
2564 relocation entry to initialize the value. This
2565 is done in the finish_dynamic_symbol routine. */
2566 if ((off & 1) != 0)
2567 off &= ~1;
2568 else
2569 {
2570 bfd_put_64 (output_bfd, relocation,
2571 base_got->contents + off);
2572 /* Note that this is harmless for the GOTPLT64
2573 case, as -1 | 1 still is -1. */
2574 h->got.offset |= 1;
2575 }
2576 }
2577 }
2578
2579 relocation = (base_got->output_section->vma
2580 + base_got->output_offset + off);
2581
2582 goto do_relocation;
2583 }
2584
2585 if (h->plt.offset == (bfd_vma) -1)
2586 {
2587 /* Handle static pointers of STT_GNU_IFUNC symbols. */
2588 if (r_type == htab->pointer_r_type
2589 && (input_section->flags & SEC_CODE) == 0)
2590 goto do_ifunc_pointer;
2591 goto bad_ifunc_reloc;
2592 }
cbe950e9
L
2593
2594 /* STT_GNU_IFUNC symbol must go through PLT. */
0ff2b86e
L
2595 if (htab->elf.splt != NULL)
2596 {
f2c29a16 2597 if (htab->plt_second != NULL)
0ff2b86e 2598 {
f2c29a16
L
2599 resolved_plt = htab->plt_second;
2600 plt_offset = eh->plt_second.offset;
0ff2b86e
L
2601 }
2602 else
2603 {
2604 resolved_plt = htab->elf.splt;
2605 plt_offset = h->plt.offset;
2606 }
2607 }
2608 else
2609 {
2610 resolved_plt = htab->elf.iplt;
2611 plt_offset = h->plt.offset;
2612 }
2613
2614 relocation = (resolved_plt->output_section->vma
2615 + resolved_plt->output_offset + plt_offset);
cbe950e9
L
2616
2617 switch (r_type)
2618 {
2619 default:
233cc9c1 2620bad_ifunc_reloc:
4c544807
L
2621 if (h->root.root.string)
2622 name = h->root.root.string;
2623 else
2624 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2625 NULL);
4eca0228 2626 _bfd_error_handler
695344c0 2627 /* xgettext:c-format */
871b3ab2 2628 (_("%pB: relocation %s against STT_GNU_IFUNC "
233cc9c1
L
2629 "symbol `%s' isn't supported"), input_bfd,
2630 howto->name, name);
cbe950e9
L
2631 bfd_set_error (bfd_error_bad_value);
2632 return FALSE;
2633
2634 case R_X86_64_32S:
0e1862bb 2635 if (bfd_link_pic (info))
cbe950e9 2636 abort ();
710ab287
L
2637 goto do_relocation;
2638
248775ba
L
2639 case R_X86_64_32:
2640 if (ABI_64_P (output_bfd))
2641 goto do_relocation;
17672001 2642 /* FALLTHROUGH */
eed180f8 2643 case R_X86_64_64:
233cc9c1 2644do_ifunc_pointer:
710ab287
L
2645 if (rel->r_addend != 0)
2646 {
4c544807
L
2647 if (h->root.root.string)
2648 name = h->root.root.string;
2649 else
2650 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
2651 sym, NULL);
4eca0228 2652 _bfd_error_handler
695344c0 2653 /* xgettext:c-format */
871b3ab2 2654 (_("%pB: relocation %s against STT_GNU_IFUNC "
2dcf00ce
AM
2655 "symbol `%s' has non-zero addend: %" PRId64),
2656 input_bfd, howto->name, name, (int64_t) rel->r_addend);
710ab287
L
2657 bfd_set_error (bfd_error_bad_value);
2658 return FALSE;
2659 }
2660
2661 /* Generate dynamic relcoation only when there is a
233cc9c1
L
2662 non-GOT reference in a shared object or there is no
2663 PLT. */
2664 if ((bfd_link_pic (info) && h->non_got_ref)
2665 || h->plt.offset == (bfd_vma) -1)
710ab287
L
2666 {
2667 Elf_Internal_Rela outrel;
710ab287
L
2668 asection *sreloc;
2669
c25bc9fc
L
2670 /* Need a dynamic relocation to get the real function
2671 address. */
710ab287
L
2672 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2673 info,
2674 input_section,
2675 rel->r_offset);
2676 if (outrel.r_offset == (bfd_vma) -1
2677 || outrel.r_offset == (bfd_vma) -2)
2678 abort ();
2679
2680 outrel.r_offset += (input_section->output_section->vma
2681 + input_section->output_offset);
2682
cf1070f1 2683 if (POINTER_LOCAL_IFUNC_P (info, h))
710ab287 2684 {
871b3ab2 2685 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L
2686 h->root.root.string,
2687 h->root.u.def.section->owner);
2688
710ab287 2689 /* This symbol is resolved locally. */
56b8aada
L
2690 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
2691 outrel.r_addend = (h->root.u.def.value
2692 + h->root.u.def.section->output_section->vma
2693 + h->root.u.def.section->output_offset);
710ab287
L
2694 }
2695 else
2696 {
351f65ca 2697 outrel.r_info = htab->r_info (h->dynindx, r_type);
710ab287
L
2698 outrel.r_addend = 0;
2699 }
2700
233cc9c1
L
2701 /* Dynamic relocations are stored in
2702 1. .rela.ifunc section in PIC object.
2703 2. .rela.got section in dynamic executable.
2704 3. .rela.iplt section in static executable. */
2705 if (bfd_link_pic (info))
2706 sreloc = htab->elf.irelifunc;
2707 else if (htab->elf.splt != NULL)
2708 sreloc = htab->elf.srelgot;
2709 else
2710 sreloc = htab->elf.irelplt;
351f65ca 2711 elf_append_rela (output_bfd, sreloc, &outrel);
710ab287
L
2712
2713 /* If this reloc is against an external symbol, we
2714 do not want to fiddle with the addend. Otherwise,
2715 we need to include the symbol value so that it
2716 becomes an addend for the dynamic reloc. For an
2717 internal symbol, we have updated addend. */
56b8aada 2718 continue;
710ab287 2719 }
17672001 2720 /* FALLTHROUGH */
cbe950e9 2721 case R_X86_64_PC32:
c3320543 2722 case R_X86_64_PC32_BND:
cbe950e9
L
2723 case R_X86_64_PC64:
2724 case R_X86_64_PLT32:
c3320543 2725 case R_X86_64_PLT32_BND:
cbe950e9 2726 goto do_relocation;
cbe950e9
L
2727 }
2728 }
2729
347a8774 2730skip_ifunc:
aec6b87e 2731 resolved_to_zero = (eh != NULL
c5bce5c6 2732 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
aec6b87e 2733
70256ad8
AJ
2734 /* When generating a shared object, the relocations handled here are
2735 copied into the output file to be resolved at run time. */
2736 switch (r_type)
2737 {
2738 case R_X86_64_GOT32:
7b81dfbb 2739 case R_X86_64_GOT64:
70256ad8
AJ
2740 /* Relocation is to the entry for this symbol in the global
2741 offset table. */
70256ad8 2742 case R_X86_64_GOTPCREL:
56ceb5b5
L
2743 case R_X86_64_GOTPCRELX:
2744 case R_X86_64_REX_GOTPCRELX:
7b81dfbb
AJ
2745 case R_X86_64_GOTPCREL64:
2746 /* Use global offset table entry as symbol value. */
2747 case R_X86_64_GOTPLT64:
de194d85 2748 /* This is obsolete and treated the same as GOT64. */
6de2ae4a 2749 base_got = htab->elf.sgot;
7b81dfbb 2750
6de2ae4a 2751 if (htab->elf.sgot == NULL)
c434dee6 2752 abort ();
053579d7 2753
9e9821dd 2754 relative_reloc = FALSE;
51e0a107 2755 if (h != NULL)
70256ad8 2756 {
c434dee6 2757 off = h->got.offset;
7b81dfbb 2758 if (h->needs_plt
eed180f8 2759 && h->plt.offset != (bfd_vma)-1
7b81dfbb
AJ
2760 && off == (bfd_vma)-1)
2761 {
2762 /* We can't use h->got.offset here to save
2763 state, or even just remember the offset, as
2764 finish_dynamic_symbol would use that as offset into
2765 .got. */
38b12349 2766 bfd_vma plt_index = (h->plt.offset / plt_entry_size
765e526c 2767 - htab->plt.has_plt0);
7b81dfbb 2768 off = (plt_index + 3) * GOT_ENTRY_SIZE;
6de2ae4a 2769 base_got = htab->elf.sgotplt;
7b81dfbb
AJ
2770 }
2771
2eba97c2 2772 if (RESOLVED_LOCALLY_P (info, h, htab))
51e0a107 2773 {
2eba97c2
L
2774 /* We must initialize this entry in the global offset
2775 table. Since the offset must always be a multiple
2776 of 8, we use the least significant bit to record
2777 whether we have initialized it already.
51e0a107
JH
2778
2779 When doing a dynamic link, we create a .rela.got
407443a3
AJ
2780 relocation entry to initialize the value. This is
2781 done in the finish_dynamic_symbol routine. */
51e0a107
JH
2782 if ((off & 1) != 0)
2783 off &= ~1;
2784 else
2785 {
2786 bfd_put_64 (output_bfd, relocation,
7b81dfbb
AJ
2787 base_got->contents + off);
2788 /* Note that this is harmless for the GOTPLT64 case,
eed180f8 2789 as -1 | 1 still is -1. */
51e0a107 2790 h->got.offset |= 1;
9e9821dd 2791
f70656b2 2792 if (GENERATE_RELATIVE_RELOC_P (info, h))
9e9821dd
L
2793 {
2794 /* If this symbol isn't dynamic in PIC,
2795 generate R_X86_64_RELATIVE here. */
2796 eh->no_finish_dynamic_symbol = 1;
2797 relative_reloc = TRUE;
2798 }
51e0a107
JH
2799 }
2800 }
053579d7 2801 else
b34976b6 2802 unresolved_reloc = FALSE;
70256ad8 2803 }
51e0a107
JH
2804 else
2805 {
c434dee6
AJ
2806 if (local_got_offsets == NULL)
2807 abort ();
51e0a107
JH
2808
2809 off = local_got_offsets[r_symndx];
2810
2811 /* The offset must always be a multiple of 8. We use
407443a3
AJ
2812 the least significant bit to record whether we have
2813 already generated the necessary reloc. */
51e0a107
JH
2814 if ((off & 1) != 0)
2815 off &= ~1;
2816 else
2817 {
c434dee6 2818 bfd_put_64 (output_bfd, relocation,
7b81dfbb 2819 base_got->contents + off);
9e9821dd 2820 local_got_offsets[r_symndx] |= 1;
51e0a107 2821
0e1862bb 2822 if (bfd_link_pic (info))
9e9821dd 2823 relative_reloc = TRUE;
51e0a107 2824 }
51e0a107 2825 }
6a2bda3f 2826
9e9821dd
L
2827 if (relative_reloc)
2828 {
2829 asection *s;
2830 Elf_Internal_Rela outrel;
2831
2832 /* We need to generate a R_X86_64_RELATIVE reloc
2833 for the dynamic linker. */
2834 s = htab->elf.srelgot;
2835 if (s == NULL)
2836 abort ();
2837
2838 outrel.r_offset = (base_got->output_section->vma
2839 + base_got->output_offset
2840 + off);
2841 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
2842 outrel.r_addend = relocation;
2843 elf_append_rela (output_bfd, s, &outrel);
2844 }
2845
c434dee6
AJ
2846 if (off >= (bfd_vma) -2)
2847 abort ();
2848
7b81dfbb
AJ
2849 relocation = base_got->output_section->vma
2850 + base_got->output_offset + off;
56ceb5b5
L
2851 if (r_type != R_X86_64_GOTPCREL
2852 && r_type != R_X86_64_GOTPCRELX
2853 && r_type != R_X86_64_REX_GOTPCRELX
2854 && r_type != R_X86_64_GOTPCREL64)
6de2ae4a
L
2855 relocation -= htab->elf.sgotplt->output_section->vma
2856 - htab->elf.sgotplt->output_offset;
c434dee6 2857
70256ad8
AJ
2858 break;
2859
d6ab8113
JB
2860 case R_X86_64_GOTOFF64:
2861 /* Relocation is relative to the start of the global offset
2862 table. */
2863
3d949995
L
2864 /* Check to make sure it isn't a protected function or data
2865 symbol for shared library since it may not be local when
e3c0e327
L
2866 used as function address or with copy relocation. We also
2867 need to make sure that a symbol is referenced locally. */
0e1862bb 2868 if (bfd_link_pic (info) && h)
d6ab8113 2869 {
e3c0e327
L
2870 if (!h->def_regular)
2871 {
2872 const char *v;
2873
2874 switch (ELF_ST_VISIBILITY (h->other))
2875 {
2876 case STV_HIDDEN:
2877 v = _("hidden symbol");
2878 break;
2879 case STV_INTERNAL:
2880 v = _("internal symbol");
2881 break;
2882 case STV_PROTECTED:
2883 v = _("protected symbol");
2884 break;
2885 default:
2886 v = _("symbol");
2887 break;
2888 }
2889
4eca0228 2890 _bfd_error_handler
695344c0 2891 /* xgettext:c-format */
871b3ab2 2892 (_("%pB: relocation R_X86_64_GOTOFF64 against undefined %s"
63a5468a 2893 " `%s' can not be used when making a shared object"),
e3c0e327
L
2894 input_bfd, v, h->root.root.string);
2895 bfd_set_error (bfd_error_bad_value);
2896 return FALSE;
2897 }
0e1862bb 2898 else if (!bfd_link_executable (info)
6999821f 2899 && !SYMBOL_REFERENCES_LOCAL_P (info, h)
e3c0e327
L
2900 && (h->type == STT_FUNC
2901 || h->type == STT_OBJECT)
2902 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2903 {
4eca0228 2904 _bfd_error_handler
695344c0 2905 /* xgettext:c-format */
871b3ab2 2906 (_("%pB: relocation R_X86_64_GOTOFF64 against protected %s"
63a5468a 2907 " `%s' can not be used when making a shared object"),
e3c0e327
L
2908 input_bfd,
2909 h->type == STT_FUNC ? "function" : "data",
2910 h->root.root.string);
2911 bfd_set_error (bfd_error_bad_value);
d6ab8113 2912 return FALSE;
e3c0e327 2913 }
d6ab8113
JB
2914 }
2915
2916 /* Note that sgot is not involved in this
2917 calculation. We always want the start of .got.plt. If we
2918 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2919 permitted by the ABI, we might have to change this
2920 calculation. */
6de2ae4a
L
2921 relocation -= htab->elf.sgotplt->output_section->vma
2922 + htab->elf.sgotplt->output_offset;
d6ab8113
JB
2923 break;
2924
2925 case R_X86_64_GOTPC32:
7b81dfbb 2926 case R_X86_64_GOTPC64:
d6ab8113 2927 /* Use global offset table as symbol value. */
6de2ae4a
L
2928 relocation = htab->elf.sgotplt->output_section->vma
2929 + htab->elf.sgotplt->output_offset;
d6ab8113
JB
2930 unresolved_reloc = FALSE;
2931 break;
7b81dfbb
AJ
2932
2933 case R_X86_64_PLTOFF64:
2934 /* Relocation is PLT entry relative to GOT. For local
2935 symbols it's the symbol itself relative to GOT. */
eed180f8 2936 if (h != NULL
7b81dfbb 2937 /* See PLT32 handling. */
9d734efa
L
2938 && (h->plt.offset != (bfd_vma) -1
2939 || eh->plt_got.offset != (bfd_vma) -1)
6de2ae4a 2940 && htab->elf.splt != NULL)
7b81dfbb 2941 {
9d734efa
L
2942 if (eh->plt_got.offset != (bfd_vma) -1)
2943 {
2944 /* Use the GOT PLT. */
2945 resolved_plt = htab->plt_got;
2946 plt_offset = eh->plt_got.offset;
2947 }
f2c29a16 2948 else if (htab->plt_second != NULL)
0ff2b86e 2949 {
f2c29a16
L
2950 resolved_plt = htab->plt_second;
2951 plt_offset = eh->plt_second.offset;
0ff2b86e
L
2952 }
2953 else
2954 {
2955 resolved_plt = htab->elf.splt;
2956 plt_offset = h->plt.offset;
2957 }
2958
2959 relocation = (resolved_plt->output_section->vma
2960 + resolved_plt->output_offset
2961 + plt_offset);
7b81dfbb
AJ
2962 unresolved_reloc = FALSE;
2963 }
2964
6de2ae4a
L
2965 relocation -= htab->elf.sgotplt->output_section->vma
2966 + htab->elf.sgotplt->output_offset;
7b81dfbb 2967 break;
d6ab8113 2968
70256ad8 2969 case R_X86_64_PLT32:
c3320543 2970 case R_X86_64_PLT32_BND:
70256ad8
AJ
2971 /* Relocation is to the entry for this symbol in the
2972 procedure linkage table. */
2973
2974 /* Resolve a PLT32 reloc against a local symbol directly,
407443a3 2975 without using the procedure linkage table. */
70256ad8
AJ
2976 if (h == NULL)
2977 break;
2978
dd7e64d4
L
2979 if ((h->plt.offset == (bfd_vma) -1
2980 && eh->plt_got.offset == (bfd_vma) -1)
6de2ae4a 2981 || htab->elf.splt == NULL)
70256ad8
AJ
2982 {
2983 /* We didn't make a PLT entry for this symbol. This
407443a3
AJ
2984 happens when statically linking PIC code, or when
2985 using -Bsymbolic. */
70256ad8
AJ
2986 break;
2987 }
2988
451875b4 2989use_plt:
dd7e64d4 2990 if (h->plt.offset != (bfd_vma) -1)
0ff2b86e 2991 {
f2c29a16 2992 if (htab->plt_second != NULL)
dd7e64d4 2993 {
f2c29a16
L
2994 resolved_plt = htab->plt_second;
2995 plt_offset = eh->plt_second.offset;
dd7e64d4
L
2996 }
2997 else
2998 {
2999 resolved_plt = htab->elf.splt;
3000 plt_offset = h->plt.offset;
3001 }
0ff2b86e
L
3002 }
3003 else
3004 {
dd7e64d4
L
3005 /* Use the GOT PLT. */
3006 resolved_plt = htab->plt_got;
3007 plt_offset = eh->plt_got.offset;
0ff2b86e
L
3008 }
3009
3010 relocation = (resolved_plt->output_section->vma
3011 + resolved_plt->output_offset
3012 + plt_offset);
b34976b6 3013 unresolved_reloc = FALSE;
70256ad8
AJ
3014 break;
3015
1788fc08
L
3016 case R_X86_64_SIZE32:
3017 case R_X86_64_SIZE64:
1788fc08
L
3018 /* Set to symbol size. */
3019 relocation = st_size;
3020 goto direct;
3021
fd8ab9e5
AJ
3022 case R_X86_64_PC8:
3023 case R_X86_64_PC16:
3024 case R_X86_64_PC32:
c3320543 3025 case R_X86_64_PC32_BND:
6333bc0d 3026 /* Don't complain about -fPIC if the symbol is undefined when
bd7ab16b
L
3027 building executable unless it is unresolved weak symbol,
3028 references a dynamic definition in PIE or -z nocopyreloc
3029 is used. */
07d6d2b8 3030 if ((input_section->flags & SEC_ALLOC) != 0
90f487df 3031 && (input_section->flags & SEC_READONLY) != 0
6333bc0d 3032 && h != NULL
aec6b87e 3033 && ((bfd_link_executable (info)
7073b5b9
L
3034 && ((h->root.type == bfd_link_hash_undefweak
3035 && !resolved_to_zero)
bd7ab16b
L
3036 || (bfd_link_pie (info)
3037 && !h->def_regular
3038 && h->def_dynamic)
a5b4ee94
L
3039 || ((info->nocopyreloc
3040 || (eh->def_protected
3041 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
7073b5b9
L
3042 && h->def_dynamic
3043 && !(h->root.u.def.section->flags & SEC_CODE))))
c5bb8910 3044 || bfd_link_dll (info)))
6610a52d 3045 {
41bed6dd 3046 bfd_boolean fail = FALSE;
6999821f 3047 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
41bed6dd
L
3048 {
3049 /* Symbol is referenced locally. Make sure it is
bd7ab16b
L
3050 defined locally. */
3051 fail = !(h->def_regular || ELF_COMMON_DEF_P (h));
41bed6dd 3052 }
aec6b87e 3053 else if (!(bfd_link_pie (info)
bc696fd5 3054 && (h->needs_copy || eh->needs_copy)))
41bed6dd 3055 {
9a926d55 3056 /* Symbol doesn't need copy reloc and isn't referenced
bd7ab16b
L
3057 locally. Address of protected function may not be
3058 reachable at run-time. */
3059 fail = (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3060 || (ELF_ST_VISIBILITY (h->other) == STV_PROTECTED
3061 && h->type == STT_FUNC));
41bed6dd
L
3062 }
3063
3064 if (fail)
aab921ad 3065 return elf_x86_64_need_pic (info, input_bfd, input_section,
338c190a 3066 h, NULL, NULL, howto);
6610a52d 3067 }
451875b4
L
3068 /* Since x86-64 has PC-relative PLT, we can use PLT in PIE
3069 as function address. */
3070 else if (h != NULL
3071 && (input_section->flags & SEC_CODE) == 0
3072 && bfd_link_pie (info)
3073 && h->type == STT_FUNC
3074 && !h->def_regular
3075 && h->def_dynamic)
3076 goto use_plt;
6610a52d
L
3077 /* Fall through. */
3078
70256ad8
AJ
3079 case R_X86_64_8:
3080 case R_X86_64_16:
3081 case R_X86_64_32:
d6ab8113 3082 case R_X86_64_PC64:
6b3db546 3083 case R_X86_64_64:
80643fbc 3084 /* FIXME: The ABI says the linker should make sure the value is
407443a3 3085 the same when it's zeroextended to 64 bit. */
c434dee6 3086
1788fc08 3087direct:
b1e24c02 3088 if ((input_section->flags & SEC_ALLOC) == 0)
c434dee6
AJ
3089 break;
3090
aebcc8ff
L
3091 need_copy_reloc_in_pie = (bfd_link_pie (info)
3092 && h != NULL
3093 && (h->needs_copy
3094 || eh->needs_copy
3095 || (h->root.type
3096 == bfd_link_hash_undefined))
3097 && (X86_PCREL_TYPE_P (r_type)
3098 || X86_SIZE_TYPE_P (r_type)));
3099
3100 if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
3101 need_copy_reloc_in_pie,
3102 resolved_to_zero, FALSE))
70256ad8
AJ
3103 {
3104 Elf_Internal_Rela outrel;
b34976b6 3105 bfd_boolean skip, relocate;
c434dee6 3106 asection *sreloc;
70256ad8
AJ
3107
3108 /* When generating a shared object, these relocations
3109 are copied into the output file to be resolved at run
407443a3 3110 time. */
b34976b6
AM
3111 skip = FALSE;
3112 relocate = FALSE;
70256ad8 3113
c629eae0
JJ
3114 outrel.r_offset =
3115 _bfd_elf_section_offset (output_bfd, info, input_section,
c434dee6 3116 rel->r_offset);
c629eae0 3117 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 3118 skip = TRUE;
0fb19cbc 3119 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 3120 skip = TRUE, relocate = TRUE;
70256ad8
AJ
3121
3122 outrel.r_offset += (input_section->output_section->vma
3123 + input_section->output_offset);
3124
3125 if (skip)
0bb2d96a 3126 memset (&outrel, 0, sizeof outrel);
c434dee6 3127
e74399c4 3128 else if (COPY_INPUT_RELOC_P (info, h, r_type))
70256ad8 3129 {
351f65ca 3130 outrel.r_info = htab->r_info (h->dynindx, r_type);
c434dee6 3131 outrel.r_addend = rel->r_addend;
70256ad8
AJ
3132 }
3133 else
3134 {
4c10bbaa
L
3135 /* This symbol is local, or marked to become local.
3136 When relocation overflow check is disabled, we
3137 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
3138 if (r_type == htab->pointer_r_type
3139 || (r_type == R_X86_64_32
3140 && info->no_reloc_overflow_check))
607c0e09 3141 {
b34976b6 3142 relocate = TRUE;
351f65ca 3143 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
607c0e09
AS
3144 outrel.r_addend = relocation + rel->r_addend;
3145 }
64d25c44
L
3146 else if (r_type == R_X86_64_64
3147 && !ABI_64_P (output_bfd))
3148 {
3149 relocate = TRUE;
3150 outrel.r_info = htab->r_info (0,
3151 R_X86_64_RELATIVE64);
3152 outrel.r_addend = relocation + rel->r_addend;
8cf0d2dd
L
3153 /* Check addend overflow. */
3154 if ((outrel.r_addend & 0x80000000)
3155 != (rel->r_addend & 0x80000000))
3156 {
3157 const char *name;
268a8d3a 3158 int addend = rel->r_addend;
8cf0d2dd
L
3159 if (h && h->root.root.string)
3160 name = h->root.root.string;
3161 else
3162 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
3163 sym, NULL);
d42c267e
AM
3164 _bfd_error_handler
3165 /* xgettext:c-format */
871b3ab2 3166 (_("%pB: addend %s%#x in relocation %s against "
2dcf00ce
AM
3167 "symbol `%s' at %#" PRIx64
3168 " in section `%pA' is out of range"),
d42c267e 3169 input_bfd, addend < 0 ? "-" : "", addend,
2dcf00ce
AM
3170 howto->name, name, (uint64_t) rel->r_offset,
3171 input_section);
8cf0d2dd
L
3172 bfd_set_error (bfd_error_bad_value);
3173 return FALSE;
3174 }
64d25c44 3175 }
607c0e09
AS
3176 else
3177 {
3178 long sindx;
3179
8517fae7 3180 if (bfd_is_abs_section (sec))
607c0e09
AS
3181 sindx = 0;
3182 else if (sec == NULL || sec->owner == NULL)
3183 {
3184 bfd_set_error (bfd_error_bad_value);
b34976b6 3185 return FALSE;
607c0e09
AS
3186 }
3187 else
3188 {
3189 asection *osec;
3190
74541ad4
AM
3191 /* We are turning this relocation into one
3192 against a section symbol. It would be
3193 proper to subtract the symbol's value,
3194 osec->vma, from the emitted reloc addend,
3195 but ld.so expects buggy relocs. */
607c0e09
AS
3196 osec = sec->output_section;
3197 sindx = elf_section_data (osec)->dynindx;
74541ad4
AM
3198 if (sindx == 0)
3199 {
3200 asection *oi = htab->elf.text_index_section;
3201 sindx = elf_section_data (oi)->dynindx;
3202 }
3203 BFD_ASSERT (sindx != 0);
607c0e09
AS
3204 }
3205
351f65ca 3206 outrel.r_info = htab->r_info (sindx, r_type);
607c0e09
AS
3207 outrel.r_addend = relocation + rel->r_addend;
3208 }
70256ad8
AJ
3209 }
3210
cbe950e9 3211 sreloc = elf_section_data (input_section)->sreloc;
d8045f23 3212
62d78908
L
3213 if (sreloc == NULL || sreloc->contents == NULL)
3214 {
3215 r = bfd_reloc_notsupported;
3216 goto check_relocation_error;
3217 }
c434dee6 3218
351f65ca 3219 elf_append_rela (output_bfd, sreloc, &outrel);
70256ad8
AJ
3220
3221 /* If this reloc is against an external symbol, we do
3222 not want to fiddle with the addend. Otherwise, we
3223 need to include the symbol value so that it becomes
3224 an addend for the dynamic reloc. */
0f88be7a 3225 if (! relocate)
70256ad8
AJ
3226 continue;
3227 }
3228
3229 break;
3230
bffbf940 3231 case R_X86_64_TLSGD:
67a4f2b7
AO
3232 case R_X86_64_GOTPC32_TLSDESC:
3233 case R_X86_64_TLSDESC_CALL:
bffbf940 3234 case R_X86_64_GOTTPOFF:
bffbf940
JJ
3235 tls_type = GOT_UNKNOWN;
3236 if (h == NULL && local_got_offsets)
0afcef53 3237 tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
bffbf940 3238 else if (h != NULL)
0afcef53 3239 tls_type = elf_x86_hash_entry (h)->tls_type;
142411ca 3240
419414ea 3241 r_type_tls = r_type;
351f65ca
L
3242 if (! elf_x86_64_tls_transition (info, input_bfd,
3243 input_section, contents,
3244 symtab_hdr, sym_hashes,
419414ea 3245 &r_type_tls, tls_type, rel,
bedfd056 3246 relend, h, r_symndx, TRUE))
534a31f6 3247 return FALSE;
bffbf940 3248
419414ea 3249 if (r_type_tls == R_X86_64_TPOFF32)
bffbf940 3250 {
142411ca
L
3251 bfd_vma roff = rel->r_offset;
3252
bffbf940 3253 BFD_ASSERT (! unresolved_reloc);
142411ca 3254
419414ea 3255 if (r_type == R_X86_64_TLSGD)
bffbf940 3256 {
52bc799a 3257 /* GD->LE transition. For 64bit, change
e2cbcd91
L
3258 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3259 .word 0x6666; rex64; call __tls_get_addr@PLT
3260 or
3261 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3262 .byte 0x66; rex64
3263 call *__tls_get_addr@GOTPCREL(%rip)
3264 which may be converted to
3265 addr32 call __tls_get_addr
52bc799a 3266 into:
e2cbcd91
L
3267 movq %fs:0, %rax
3268 leaq foo@tpoff(%rax), %rax
52bc799a 3269 For 32bit, change
e2cbcd91
L
3270 leaq foo@tlsgd(%rip), %rdi
3271 .word 0x6666; rex64; call __tls_get_addr@PLT
3272 or
3273 leaq foo@tlsgd(%rip), %rdi
3274 .byte 0x66; rex64
3275 call *__tls_get_addr@GOTPCREL(%rip)
3276 which may be converted to
3277 addr32 call __tls_get_addr
52bc799a 3278 into:
e2cbcd91
L
3279 movl %fs:0, %eax
3280 leaq foo@tpoff(%rax), %rax
5c98a14e 3281 For largepic, change:
e2cbcd91
L
3282 leaq foo@tlsgd(%rip), %rdi
3283 movabsq $__tls_get_addr@pltoff, %rax
3284 addq %r15, %rax
3285 call *%rax
5c98a14e 3286 into:
e2cbcd91
L
3287 movq %fs:0, %rax
3288 leaq foo@tpoff(%rax), %rax
3289 nopw 0x0(%rax,%rax,1) */
5c98a14e 3290 int largepic = 0;
e2cbcd91 3291 if (ABI_64_P (output_bfd))
5c98a14e 3292 {
e2cbcd91
L
3293 if (contents[roff + 5] == 0xb8)
3294 {
3295 memcpy (contents + roff - 3,
3296 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
3297 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3298 largepic = 1;
3299 }
3300 else
3301 memcpy (contents + roff - 4,
3302 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3303 16);
5c98a14e 3304 }
52bc799a
L
3305 else
3306 memcpy (contents + roff - 3,
3307 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3308 15);
eb4ff4d6 3309 bfd_put_32 (output_bfd,
351f65ca 3310 elf_x86_64_tpoff (info, relocation),
5c98a14e 3311 contents + roff + 8 + largepic);
e2cbcd91
L
3312 /* Skip R_X86_64_PC32, R_X86_64_PLT32,
3313 R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64. */
bffbf940 3314 rel++;
60f2e42e 3315 wrel++;
bffbf940
JJ
3316 continue;
3317 }
419414ea 3318 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
67a4f2b7
AO
3319 {
3320 /* GDesc -> LE transition.
3321 It's originally something like:
3322 leaq x@tlsdesc(%rip), %rax
3323
3324 Change it to:
c9736ba0 3325 movl $x@tpoff, %rax. */
67a4f2b7 3326
c9736ba0 3327 unsigned int val, type;
67a4f2b7 3328
67a4f2b7 3329 type = bfd_get_8 (input_bfd, contents + roff - 3);
67a4f2b7 3330 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO
3331 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3332 contents + roff - 3);
3333 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3334 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3335 contents + roff - 1);
eb4ff4d6 3336 bfd_put_32 (output_bfd,
351f65ca 3337 elf_x86_64_tpoff (info, relocation),
67a4f2b7
AO
3338 contents + roff);
3339 continue;
3340 }
419414ea 3341 else if (r_type == R_X86_64_TLSDESC_CALL)
67a4f2b7
AO
3342 {
3343 /* GDesc -> LE transition.
3344 It's originally:
3345 call *(%rax)
3346 Turn it into:
142411ca 3347 xchg %ax,%ax. */
10efb593 3348 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO
3349 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3350 continue;
3351 }
419414ea 3352 else if (r_type == R_X86_64_GOTTPOFF)
bffbf940 3353 {
bffbf940 3354 /* IE->LE transition:
cf61b747 3355 For 64bit, originally it can be one of:
bffbf940
JJ
3356 movq foo@gottpoff(%rip), %reg
3357 addq foo@gottpoff(%rip), %reg
3358 We change it into:
3359 movq $foo, %reg
3360 leaq foo(%reg), %reg
cf61b747
L
3361 addq $foo, %reg.
3362 For 32bit, originally it can be one of:
3363 movq foo@gottpoff(%rip), %reg
3364 addl foo@gottpoff(%rip), %reg
3365 We change it into:
3366 movq $foo, %reg
3367 leal foo(%reg), %reg
3368 addl $foo, %reg. */
142411ca
L
3369
3370 unsigned int val, type, reg;
3371
cf61b747
L
3372 if (roff >= 3)
3373 val = bfd_get_8 (input_bfd, contents + roff - 3);
3374 else
3375 val = 0;
142411ca
L
3376 type = bfd_get_8 (input_bfd, contents + roff - 2);
3377 reg = bfd_get_8 (input_bfd, contents + roff - 1);
bffbf940 3378 reg >>= 3;
bffbf940
JJ
3379 if (type == 0x8b)
3380 {
3381 /* movq */
3382 if (val == 0x4c)
3383 bfd_put_8 (output_bfd, 0x49,
142411ca 3384 contents + roff - 3);
4a4c5f25
L
3385 else if (!ABI_64_P (output_bfd) && val == 0x44)
3386 bfd_put_8 (output_bfd, 0x41,
3387 contents + roff - 3);
bffbf940 3388 bfd_put_8 (output_bfd, 0xc7,
142411ca 3389 contents + roff - 2);
bffbf940 3390 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3391 contents + roff - 1);
bffbf940
JJ
3392 }
3393 else if (reg == 4)
3394 {
cf61b747
L
3395 /* addq/addl -> addq/addl - addressing with %rsp/%r12
3396 is special */
bffbf940
JJ
3397 if (val == 0x4c)
3398 bfd_put_8 (output_bfd, 0x49,
142411ca 3399 contents + roff - 3);
4a4c5f25
L
3400 else if (!ABI_64_P (output_bfd) && val == 0x44)
3401 bfd_put_8 (output_bfd, 0x41,
3402 contents + roff - 3);
bffbf940 3403 bfd_put_8 (output_bfd, 0x81,
142411ca 3404 contents + roff - 2);
bffbf940 3405 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3406 contents + roff - 1);
bffbf940
JJ
3407 }
3408 else
3409 {
cf61b747 3410 /* addq/addl -> leaq/leal */
bffbf940
JJ
3411 if (val == 0x4c)
3412 bfd_put_8 (output_bfd, 0x4d,
142411ca 3413 contents + roff - 3);
4a4c5f25
L
3414 else if (!ABI_64_P (output_bfd) && val == 0x44)
3415 bfd_put_8 (output_bfd, 0x45,
3416 contents + roff - 3);
bffbf940 3417 bfd_put_8 (output_bfd, 0x8d,
142411ca 3418 contents + roff - 2);
bffbf940 3419 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
142411ca 3420 contents + roff - 1);
bffbf940 3421 }
eb4ff4d6 3422 bfd_put_32 (output_bfd,
351f65ca 3423 elf_x86_64_tpoff (info, relocation),
142411ca 3424 contents + roff);
bffbf940
JJ
3425 continue;
3426 }
142411ca
L
3427 else
3428 BFD_ASSERT (FALSE);
bffbf940
JJ
3429 }
3430
6de2ae4a 3431 if (htab->elf.sgot == NULL)
bffbf940
JJ
3432 abort ();
3433
3434 if (h != NULL)
67a4f2b7
AO
3435 {
3436 off = h->got.offset;
0afcef53 3437 offplt = elf_x86_hash_entry (h)->tlsdesc_got;
67a4f2b7 3438 }
bffbf940
JJ
3439 else
3440 {
3441 if (local_got_offsets == NULL)
3442 abort ();
3443
3444 off = local_got_offsets[r_symndx];
67a4f2b7 3445 offplt = local_tlsdesc_gotents[r_symndx];
bffbf940
JJ
3446 }
3447
3448 if ((off & 1) != 0)
3449 off &= ~1;
26e41594 3450 else
bffbf940
JJ
3451 {
3452 Elf_Internal_Rela outrel;
bffbf940 3453 int dr_type, indx;
67a4f2b7 3454 asection *sreloc;
bffbf940 3455
6de2ae4a 3456 if (htab->elf.srelgot == NULL)
bffbf940
JJ
3457 abort ();
3458
67a4f2b7
AO
3459 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3460
3461 if (GOT_TLS_GDESC_P (tls_type))
3462 {
351f65ca 3463 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
67a4f2b7 3464 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
6de2ae4a
L
3465 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
3466 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3467 + htab->elf.sgotplt->output_offset
67a4f2b7
AO
3468 + offplt
3469 + htab->sgotplt_jump_table_size);
6de2ae4a 3470 sreloc = htab->elf.srelplt;
67a4f2b7 3471 if (indx == 0)
0afcef53 3472 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
67a4f2b7
AO
3473 else
3474 outrel.r_addend = 0;
351f65ca 3475 elf_append_rela (output_bfd, sreloc, &outrel);
67a4f2b7
AO
3476 }
3477
6de2ae4a 3478 sreloc = htab->elf.srelgot;
67a4f2b7 3479
6de2ae4a
L
3480 outrel.r_offset = (htab->elf.sgot->output_section->vma
3481 + htab->elf.sgot->output_offset + off);
bffbf940 3482
67a4f2b7 3483 if (GOT_TLS_GD_P (tls_type))
bffbf940 3484 dr_type = R_X86_64_DTPMOD64;
67a4f2b7
AO
3485 else if (GOT_TLS_GDESC_P (tls_type))
3486 goto dr_done;
bffbf940
JJ
3487 else
3488 dr_type = R_X86_64_TPOFF64;
3489
6de2ae4a 3490 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
bffbf940 3491 outrel.r_addend = 0;
67a4f2b7
AO
3492 if ((dr_type == R_X86_64_TPOFF64
3493 || dr_type == R_X86_64_TLSDESC) && indx == 0)
0afcef53 3494 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
351f65ca 3495 outrel.r_info = htab->r_info (indx, dr_type);
bffbf940 3496
351f65ca 3497 elf_append_rela (output_bfd, sreloc, &outrel);
bffbf940 3498
67a4f2b7 3499 if (GOT_TLS_GD_P (tls_type))
bffbf940
JJ
3500 {
3501 if (indx == 0)
3502 {
d40d037c 3503 BFD_ASSERT (! unresolved_reloc);
bffbf940 3504 bfd_put_64 (output_bfd,
0afcef53 3505 relocation - _bfd_x86_elf_dtpoff_base (info),
6de2ae4a 3506 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
bffbf940
JJ
3507 }
3508 else
3509 {
3510 bfd_put_64 (output_bfd, 0,
6de2ae4a 3511 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 3512 outrel.r_info = htab->r_info (indx,
bffbf940
JJ
3513 R_X86_64_DTPOFF64);
3514 outrel.r_offset += GOT_ENTRY_SIZE;
351f65ca 3515 elf_append_rela (output_bfd, sreloc,
464d3bd4 3516 &outrel);
bffbf940
JJ
3517 }
3518 }
3519
67a4f2b7 3520 dr_done:
bffbf940
JJ
3521 if (h != NULL)
3522 h->got.offset |= 1;
3523 else
3524 local_got_offsets[r_symndx] |= 1;
3525 }
3526
67a4f2b7
AO
3527 if (off >= (bfd_vma) -2
3528 && ! GOT_TLS_GDESC_P (tls_type))
bffbf940 3529 abort ();
419414ea 3530 if (r_type_tls == r_type)
bffbf940 3531 {
67a4f2b7
AO
3532 if (r_type == R_X86_64_GOTPC32_TLSDESC
3533 || r_type == R_X86_64_TLSDESC_CALL)
6de2ae4a
L
3534 relocation = htab->elf.sgotplt->output_section->vma
3535 + htab->elf.sgotplt->output_offset
67a4f2b7
AO
3536 + offplt + htab->sgotplt_jump_table_size;
3537 else
6de2ae4a
L
3538 relocation = htab->elf.sgot->output_section->vma
3539 + htab->elf.sgot->output_offset + off;
b34976b6 3540 unresolved_reloc = FALSE;
bffbf940 3541 }
142411ca 3542 else
67a4f2b7 3543 {
142411ca 3544 bfd_vma roff = rel->r_offset;
67a4f2b7 3545
419414ea 3546 if (r_type == R_X86_64_TLSGD)
142411ca 3547 {
52bc799a 3548 /* GD->IE transition. For 64bit, change
e2cbcd91
L
3549 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3550 .word 0x6666; rex64; call __tls_get_addr@PLT
3551 or
3552 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3553 .byte 0x66; rex64
3554 call *__tls_get_addr@GOTPCREL(%rip
3555 which may be converted to
3556 addr32 call __tls_get_addr
52bc799a 3557 into:
e2cbcd91
L
3558 movq %fs:0, %rax
3559 addq foo@gottpoff(%rip), %rax
52bc799a 3560 For 32bit, change
e2cbcd91
L
3561 leaq foo@tlsgd(%rip), %rdi
3562 .word 0x6666; rex64; call __tls_get_addr@PLT
3563 or
3564 leaq foo@tlsgd(%rip), %rdi
3565 .byte 0x66; rex64;
3566 call *__tls_get_addr@GOTPCREL(%rip)
3567 which may be converted to
3568 addr32 call __tls_get_addr
52bc799a 3569 into:
e2cbcd91
L
3570 movl %fs:0, %eax
3571 addq foo@gottpoff(%rip), %rax
5c98a14e 3572 For largepic, change:
e2cbcd91
L
3573 leaq foo@tlsgd(%rip), %rdi
3574 movabsq $__tls_get_addr@pltoff, %rax
3575 addq %r15, %rax
3576 call *%rax
5c98a14e 3577 into:
e2cbcd91
L
3578 movq %fs:0, %rax
3579 addq foo@gottpoff(%rax), %rax
3580 nopw 0x0(%rax,%rax,1) */
5c98a14e 3581 int largepic = 0;
e2cbcd91 3582 if (ABI_64_P (output_bfd))
5c98a14e 3583 {
e2cbcd91
L
3584 if (contents[roff + 5] == 0xb8)
3585 {
3586 memcpy (contents + roff - 3,
3587 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
3588 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3589 largepic = 1;
3590 }
3591 else
3592 memcpy (contents + roff - 4,
3593 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3594 16);
5c98a14e 3595 }
52bc799a
L
3596 else
3597 memcpy (contents + roff - 3,
3598 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3599 15);
142411ca 3600
6de2ae4a
L
3601 relocation = (htab->elf.sgot->output_section->vma
3602 + htab->elf.sgot->output_offset + off
142411ca 3603 - roff
5c98a14e 3604 - largepic
142411ca
L
3605 - input_section->output_section->vma
3606 - input_section->output_offset
3607 - 12);
3608 bfd_put_32 (output_bfd, relocation,
5c98a14e
JJ
3609 contents + roff + 8 + largepic);
3610 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
142411ca 3611 rel++;
60f2e42e 3612 wrel++;
142411ca
L
3613 continue;
3614 }
419414ea 3615 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
142411ca
L
3616 {
3617 /* GDesc -> IE transition.
3618 It's originally something like:
3619 leaq x@tlsdesc(%rip), %rax
67a4f2b7 3620
142411ca 3621 Change it to:
c9736ba0 3622 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
67a4f2b7 3623
142411ca
L
3624 /* Now modify the instruction as appropriate. To
3625 turn a leaq into a movq in the form we use it, it
3626 suffices to change the second byte from 0x8d to
3627 0x8b. */
3628 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3629
3630 bfd_put_32 (output_bfd,
6de2ae4a
L
3631 htab->elf.sgot->output_section->vma
3632 + htab->elf.sgot->output_offset + off
142411ca
L
3633 - rel->r_offset
3634 - input_section->output_section->vma
3635 - input_section->output_offset
3636 - 4,
3637 contents + roff);
3638 continue;
3639 }
419414ea 3640 else if (r_type == R_X86_64_TLSDESC_CALL)
142411ca
L
3641 {
3642 /* GDesc -> IE transition.
3643 It's originally:
3644 call *(%rax)
3645
3646 Change it to:
c9736ba0 3647 xchg %ax, %ax. */
142411ca 3648
142411ca
L
3649 bfd_put_8 (output_bfd, 0x66, contents + roff);
3650 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3651 continue;
3652 }
3653 else
3654 BFD_ASSERT (FALSE);
67a4f2b7 3655 }
bffbf940
JJ
3656 break;
3657
3658 case R_X86_64_TLSLD:
351f65ca
L
3659 if (! elf_x86_64_tls_transition (info, input_bfd,
3660 input_section, contents,
3661 symtab_hdr, sym_hashes,
bedfd056
L
3662 &r_type, GOT_UNKNOWN, rel,
3663 relend, h, r_symndx, TRUE))
142411ca 3664 return FALSE;
a3fadc9a 3665
142411ca
L
3666 if (r_type != R_X86_64_TLSLD)
3667 {
bffbf940 3668 /* LD->LE transition:
e2cbcd91
L
3669 leaq foo@tlsld(%rip), %rdi
3670 call __tls_get_addr@PLT
3671 For 64bit, we change it into:
3672 .word 0x6666; .byte 0x66; movq %fs:0, %rax
3673 For 32bit, we change it into:
3674 nopl 0x0(%rax); movl %fs:0, %eax
3675 Or
3676 leaq foo@tlsld(%rip), %rdi;
3677 call *__tls_get_addr@GOTPCREL(%rip)
3678 which may be converted to
3679 addr32 call __tls_get_addr
52bc799a 3680 For 64bit, we change it into:
e2cbcd91 3681 .word 0x6666; .word 0x6666; movq %fs:0, %rax
52bc799a 3682 For 32bit, we change it into:
e2cbcd91 3683 nopw 0x0(%rax); movl %fs:0, %eax
5c98a14e 3684 For largepic, change:
e2cbcd91
L
3685 leaq foo@tlsgd(%rip), %rdi
3686 movabsq $__tls_get_addr@pltoff, %rax
3687 addq %rbx, %rax
3688 call *%rax
3689 into
3690 data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
3691 movq %fs:0, %eax */
142411ca
L
3692
3693 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
e2cbcd91
L
3694 if (ABI_64_P (output_bfd))
3695 {
3696 if (contents[rel->r_offset + 5] == 0xb8)
3697 memcpy (contents + rel->r_offset - 3,
3698 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
3699 "\x64\x48\x8b\x04\x25\0\0\0", 22);
3700 else if (contents[rel->r_offset + 4] == 0xff
3701 || contents[rel->r_offset + 4] == 0x67)
3702 memcpy (contents + rel->r_offset - 3,
3703 "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
3704 13);
3705 else
3706 memcpy (contents + rel->r_offset - 3,
3707 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
3708 }
52bc799a 3709 else
e2cbcd91
L
3710 {
3711 if (contents[rel->r_offset + 4] == 0xff)
3712 memcpy (contents + rel->r_offset - 3,
3713 "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
3714 13);
3715 else
3716 memcpy (contents + rel->r_offset - 3,
3717 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
3718 }
3719 /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
3720 and R_X86_64_PLTOFF64. */
bffbf940 3721 rel++;
60f2e42e 3722 wrel++;
bffbf940
JJ
3723 continue;
3724 }
3725
6de2ae4a 3726 if (htab->elf.sgot == NULL)
bffbf940
JJ
3727 abort ();
3728
0afcef53 3729 off = htab->tls_ld_or_ldm_got.offset;
bffbf940
JJ
3730 if (off & 1)
3731 off &= ~1;
3732 else
3733 {
3734 Elf_Internal_Rela outrel;
bffbf940 3735
6de2ae4a 3736 if (htab->elf.srelgot == NULL)
bffbf940
JJ
3737 abort ();
3738
6de2ae4a
L
3739 outrel.r_offset = (htab->elf.sgot->output_section->vma
3740 + htab->elf.sgot->output_offset + off);
bffbf940
JJ
3741
3742 bfd_put_64 (output_bfd, 0,
6de2ae4a 3743 htab->elf.sgot->contents + off);
bffbf940 3744 bfd_put_64 (output_bfd, 0,
6de2ae4a 3745 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 3746 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
bffbf940 3747 outrel.r_addend = 0;
351f65ca 3748 elf_append_rela (output_bfd, htab->elf.srelgot,
464d3bd4 3749 &outrel);
0afcef53 3750 htab->tls_ld_or_ldm_got.offset |= 1;
bffbf940 3751 }
6de2ae4a
L
3752 relocation = htab->elf.sgot->output_section->vma
3753 + htab->elf.sgot->output_offset + off;
b34976b6 3754 unresolved_reloc = FALSE;
bffbf940
JJ
3755 break;
3756
3757 case R_X86_64_DTPOFF32:
0e1862bb
L
3758 if (!bfd_link_executable (info)
3759 || (input_section->flags & SEC_CODE) == 0)
0afcef53 3760 relocation -= _bfd_x86_elf_dtpoff_base (info);
bffbf940 3761 else
351f65ca 3762 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ
3763 break;
3764
3765 case R_X86_64_TPOFF32:
6769d501 3766 case R_X86_64_TPOFF64:
0e1862bb 3767 BFD_ASSERT (bfd_link_executable (info));
351f65ca 3768 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ
3769 break;
3770
a69ed7f7
L
3771 case R_X86_64_DTPOFF64:
3772 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
0afcef53 3773 relocation -= _bfd_x86_elf_dtpoff_base (info);
a69ed7f7
L
3774 break;
3775
70256ad8
AJ
3776 default:
3777 break;
3778 }
8d88c4ca 3779
239e1f3a
AM
3780 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3781 because such sections are not SEC_ALLOC and thus ld.so will
3782 not process them. */
c434dee6 3783 if (unresolved_reloc
239e1f3a 3784 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM
3785 && h->def_dynamic)
3786 && _bfd_elf_section_offset (output_bfd, info, input_section,
3787 rel->r_offset) != (bfd_vma) -1)
a040981f 3788 {
7073b5b9
L
3789 switch (r_type)
3790 {
3791 case R_X86_64_32S:
a5b4ee94
L
3792 sec = h->root.u.def.section;
3793 if ((info->nocopyreloc
3794 || (eh->def_protected
3795 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
7073b5b9
L
3796 && !(h->root.u.def.section->flags & SEC_CODE))
3797 return elf_x86_64_need_pic (info, input_bfd, input_section,
3798 h, NULL, NULL, howto);
3799 /* Fall through. */
3800
3801 default:
3802 _bfd_error_handler
3803 /* xgettext:c-format */
2dcf00ce
AM
3804 (_("%pB(%pA+%#" PRIx64 "): "
3805 "unresolvable %s relocation against symbol `%s'"),
7073b5b9
L
3806 input_bfd,
3807 input_section,
2dcf00ce 3808 (uint64_t) rel->r_offset,
7073b5b9
L
3809 howto->name,
3810 h->root.root.string);
3811 return FALSE;
3812 }
a040981f 3813 }
c434dee6 3814
cbe950e9 3815do_relocation:
8d88c4ca 3816 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
c434dee6
AJ
3817 contents, rel->r_offset,
3818 relocation, rel->r_addend);
8d88c4ca 3819
62d78908 3820check_relocation_error:
8d88c4ca 3821 if (r != bfd_reloc_ok)
8da6118f 3822 {
c434dee6
AJ
3823 const char *name;
3824
3825 if (h != NULL)
3826 name = h->root.root.string;
3827 else
8da6118f 3828 {
c434dee6
AJ
3829 name = bfd_elf_string_from_elf_section (input_bfd,
3830 symtab_hdr->sh_link,
3831 sym->st_name);
3832 if (name == NULL)
b34976b6 3833 return FALSE;
c434dee6
AJ
3834 if (*name == '\0')
3835 name = bfd_section_name (input_bfd, sec);
3836 }
3837
3838 if (r == bfd_reloc_overflow)
8b43e456 3839 {
78984959 3840 if (converted_reloc)
8b43e456
L
3841 {
3842 info->callbacks->einfo
3843 (_("%F%P: failed to convert GOTPCREL relocation; relink with --no-relax\n"));
3844 return FALSE;
3845 }
3846 (*info->callbacks->reloc_overflow)
3847 (info, (h ? &h->root : NULL), name, howto->name,
3848 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3849 }
c434dee6
AJ
3850 else
3851 {
4eca0228 3852 _bfd_error_handler
695344c0 3853 /* xgettext:c-format */
2dcf00ce 3854 (_("%pB(%pA+%#" PRIx64 "): reloc against `%s': error %d"),
d003868e 3855 input_bfd, input_section,
2dcf00ce 3856 (uint64_t) rel->r_offset, name, (int) r);
b34976b6 3857 return FALSE;
8da6118f
KH
3858 }
3859 }
60f2e42e
L
3860
3861 if (wrel != rel)
3862 *wrel = *rel;
3863 }
3864
3865 if (wrel != rel)
3866 {
3867 Elf_Internal_Shdr *rel_hdr;
3868 size_t deleted = rel - wrel;
3869
3870 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3871 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3872 if (rel_hdr->sh_size == 0)
3873 {
3874 /* It is too late to remove an empty reloc section. Leave
3875 one NONE reloc.
3876 ??? What is wrong with an empty section??? */
3877 rel_hdr->sh_size = rel_hdr->sh_entsize;
3878 deleted -= 1;
3879 }
3880 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3881 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3882 input_section->reloc_count -= deleted;
8d88c4ca 3883 }
70256ad8 3884
b34976b6 3885 return TRUE;
70256ad8
AJ
3886}
3887
3888/* Finish up dynamic symbol handling. We set the contents of various
3889 dynamic sections here. */
3890
b34976b6 3891static bfd_boolean
351f65ca
L
3892elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3893 struct bfd_link_info *info,
3894 struct elf_link_hash_entry *h,
aec6b87e 3895 Elf_Internal_Sym *sym)
70256ad8 3896{
0afcef53 3897 struct elf_x86_link_hash_table *htab;
f2c29a16 3898 bfd_boolean use_plt_second;
0afcef53 3899 struct elf_x86_link_hash_entry *eh;
aec6b87e 3900 bfd_boolean local_undefweak;
70256ad8 3901
0afcef53 3902 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
3903 if (htab == NULL)
3904 return FALSE;
70256ad8 3905
f2c29a16
L
3906 /* Use the second PLT section only if there is .plt section. */
3907 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
0ff2b86e 3908
0afcef53 3909 eh = (struct elf_x86_link_hash_entry *) h;
9e9821dd
L
3910 if (eh->no_finish_dynamic_symbol)
3911 abort ();
dd7e64d4 3912
aec6b87e
L
3913 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3914 resolved undefined weak symbols in executable so that their
3915 references have value 0 at run-time. */
c5bce5c6 3916 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
aec6b87e 3917
70256ad8
AJ
3918 if (h->plt.offset != (bfd_vma) -1)
3919 {
70256ad8 3920 bfd_vma plt_index;
38b12349 3921 bfd_vma got_offset, plt_offset;
70256ad8 3922 Elf_Internal_Rela rela;
947216bf 3923 bfd_byte *loc;
0ff2b86e 3924 asection *plt, *gotplt, *relplt, *resolved_plt;
351f65ca 3925 const struct elf_backend_data *bed;
5974eba6 3926 bfd_vma plt_got_pcrel_offset;
cbe950e9
L
3927
3928 /* When building a static executable, use .iplt, .igot.plt and
3929 .rela.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 3930 if (htab->elf.splt != NULL)
cbe950e9 3931 {
6de2ae4a
L
3932 plt = htab->elf.splt;
3933 gotplt = htab->elf.sgotplt;
3934 relplt = htab->elf.srelplt;
cbe950e9
L
3935 }
3936 else
3937 {
6de2ae4a
L
3938 plt = htab->elf.iplt;
3939 gotplt = htab->elf.igotplt;
3940 relplt = htab->elf.irelplt;
cbe950e9 3941 }
70256ad8 3942
f3180fa9 3943 VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
70256ad8
AJ
3944
3945 /* Get the index in the procedure linkage table which
3946 corresponds to this symbol. This is the index of this symbol
3947 in all the symbols for which we are making plt entries. The
cbe950e9 3948 first entry in the procedure linkage table is reserved.
6bbec505 3949
cbe950e9 3950 Get the offset into the .got table of the entry that
407443a3 3951 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
cbe950e9
L
3952 bytes. The first three are reserved for the dynamic linker.
3953
3954 For static executables, we don't reserve anything. */
3955
6de2ae4a 3956 if (plt == htab->elf.splt)
cbe950e9 3957 {
765e526c
L
3958 got_offset = (h->plt.offset / htab->plt.plt_entry_size
3959 - htab->plt.has_plt0);
e1f98742 3960 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
cbe950e9
L
3961 }
3962 else
3963 {
765e526c 3964 got_offset = h->plt.offset / htab->plt.plt_entry_size;
e1f98742 3965 got_offset = got_offset * GOT_ENTRY_SIZE;
cbe950e9 3966 }
70256ad8 3967
38b12349 3968 /* Fill in the entry in the procedure linkage table. */
765e526c
L
3969 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
3970 htab->plt.plt_entry_size);
f2c29a16 3971 if (use_plt_second)
0ff2b86e 3972 {
f2c29a16 3973 memcpy (htab->plt_second->contents + eh->plt_second.offset,
765e526c
L
3974 htab->non_lazy_plt->plt_entry,
3975 htab->non_lazy_plt->plt_entry_size);
0ff2b86e 3976
f2c29a16
L
3977 resolved_plt = htab->plt_second;
3978 plt_offset = eh->plt_second.offset;
0ff2b86e
L
3979 }
3980 else
3981 {
0ff2b86e
L
3982 resolved_plt = plt;
3983 plt_offset = h->plt.offset;
3984 }
eed180f8
RM
3985
3986 /* Insert the relocation positions of the plt section. */
3987
3988 /* Put offset the PC-relative instruction referring to the GOT entry,
3989 subtracting the size of that instruction. */
ab7fede8
L
3990 plt_got_pcrel_offset = (gotplt->output_section->vma
3991 + gotplt->output_offset
3992 + got_offset
3993 - resolved_plt->output_section->vma
3994 - resolved_plt->output_offset
3995 - plt_offset
765e526c 3996 - htab->plt.plt_got_insn_size);
ab7fede8
L
3997
3998 /* Check PC-relative offset overflow in PLT entry. */
5974eba6 3999 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
695344c0 4000 /* xgettext:c-format */
871b3ab2 4001 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in PLT entry for `%s'\n"),
ab7fede8
L
4002 output_bfd, h->root.root.string);
4003
4004 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
38b12349 4005 (resolved_plt->contents + plt_offset
765e526c 4006 + htab->plt.plt_got_offset));
cbe950e9 4007
653165cc 4008 /* Fill in the entry in the global offset table, initially this
aec6b87e
L
4009 points to the second part of the PLT entry. Leave the entry
4010 as zero for undefined weak symbol in PIE. No PLT relocation
4011 against undefined weak symbol in PIE. */
4012 if (!local_undefweak)
cbe950e9 4013 {
765e526c 4014 if (htab->plt.has_plt0)
38b12349
L
4015 bfd_put_64 (output_bfd, (plt->output_section->vma
4016 + plt->output_offset
4017 + h->plt.offset
765e526c 4018 + htab->lazy_plt->plt_lazy_offset),
38b12349 4019 gotplt->contents + got_offset);
aec6b87e
L
4020
4021 /* Fill in the entry in the .rela.plt section. */
4022 rela.r_offset = (gotplt->output_section->vma
4023 + gotplt->output_offset
4024 + got_offset);
cf1070f1 4025 if (PLT_LOCAL_IFUNC_P (info, h))
aec6b87e 4026 {
871b3ab2 4027 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L
4028 h->root.root.string,
4029 h->root.u.def.section->owner);
4030
aec6b87e
L
4031 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4032 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
4033 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4034 rela.r_addend = (h->root.u.def.value
4035 + h->root.u.def.section->output_section->vma
4036 + h->root.u.def.section->output_offset);
4037 /* R_X86_64_IRELATIVE comes last. */
4038 plt_index = htab->next_irelative_index--;
4039 }
4040 else
4041 {
4042 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
4043 rela.r_addend = 0;
4044 plt_index = htab->next_jump_slot_index++;
4045 }
e1f98742 4046
38b12349
L
4047 /* Don't fill the second and third slots in PLT entry for
4048 static executables nor without PLT0. */
765e526c 4049 if (plt == htab->elf.splt && htab->plt.has_plt0)
aec6b87e 4050 {
38b12349 4051 bfd_vma plt0_offset
765e526c 4052 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
aec6b87e
L
4053
4054 /* Put relocation index. */
4055 bfd_put_32 (output_bfd, plt_index,
4056 (plt->contents + h->plt.offset
765e526c 4057 + htab->lazy_plt->plt_reloc_offset));
aec6b87e
L
4058
4059 /* Put offset for jmp .PLT0 and check for overflow. We don't
4060 check relocation index for overflow since branch displacement
4061 will overflow first. */
4062 if (plt0_offset > 0x80000000)
695344c0 4063 /* xgettext:c-format */
871b3ab2 4064 info->callbacks->einfo (_("%F%pB: branch displacement overflow in PLT entry for `%s'\n"),
aec6b87e
L
4065 output_bfd, h->root.root.string);
4066 bfd_put_32 (output_bfd, - plt0_offset,
38b12349 4067 (plt->contents + h->plt.offset
765e526c 4068 + htab->lazy_plt->plt_plt_offset));
aec6b87e 4069 }
351f65ca 4070
aec6b87e
L
4071 bed = get_elf_backend_data (output_bfd);
4072 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
4073 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4074 }
dd7e64d4
L
4075 }
4076 else if (eh->plt_got.offset != (bfd_vma) -1)
4077 {
38b12349 4078 bfd_vma got_offset, plt_offset;
dd7e64d4
L
4079 asection *plt, *got;
4080 bfd_boolean got_after_plt;
4081 int32_t got_pcrel_offset;
dd7e64d4
L
4082
4083 /* Set the entry in the GOT procedure linkage table. */
4084 plt = htab->plt_got;
4085 got = htab->elf.sgot;
4086 got_offset = h->got.offset;
4087
4088 if (got_offset == (bfd_vma) -1
e492d2f8 4089 || (h->type == STT_GNU_IFUNC && h->def_regular)
dd7e64d4
L
4090 || plt == NULL
4091 || got == NULL)
4092 abort ();
70256ad8 4093
38b12349 4094 /* Use the non-lazy PLT entry template for the GOT PLT since they
dd7e64d4 4095 are the identical. */
dd7e64d4
L
4096 /* Fill in the entry in the GOT procedure linkage table. */
4097 plt_offset = eh->plt_got.offset;
4098 memcpy (plt->contents + plt_offset,
765e526c
L
4099 htab->non_lazy_plt->plt_entry,
4100 htab->non_lazy_plt->plt_entry_size);
dd7e64d4
L
4101
4102 /* Put offset the PC-relative instruction referring to the GOT
4103 entry, subtracting the size of that instruction. */
4104 got_pcrel_offset = (got->output_section->vma
4105 + got->output_offset
4106 + got_offset
4107 - plt->output_section->vma
4108 - plt->output_offset
4109 - plt_offset
765e526c 4110 - htab->non_lazy_plt->plt_got_insn_size);
dd7e64d4
L
4111
4112 /* Check PC-relative offset overflow in GOT PLT entry. */
4113 got_after_plt = got->output_section->vma > plt->output_section->vma;
4114 if ((got_after_plt && got_pcrel_offset < 0)
4115 || (!got_after_plt && got_pcrel_offset > 0))
695344c0 4116 /* xgettext:c-format */
871b3ab2 4117 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
dd7e64d4
L
4118 output_bfd, h->root.root.string);
4119
4120 bfd_put_32 (output_bfd, got_pcrel_offset,
38b12349 4121 (plt->contents + plt_offset
765e526c 4122 + htab->non_lazy_plt->plt_got_offset));
dd7e64d4
L
4123 }
4124
aec6b87e
L
4125 if (!local_undefweak
4126 && !h->def_regular
dd7e64d4
L
4127 && (h->plt.offset != (bfd_vma) -1
4128 || eh->plt_got.offset != (bfd_vma) -1))
4129 {
4130 /* Mark the symbol as undefined, rather than as defined in
4131 the .plt section. Leave the value if there were any
4132 relocations where pointer equality matters (this is a clue
4133 for the dynamic linker, to make function pointer
4134 comparisons work between an application and shared
4135 library), otherwise set it to zero. If a function is only
4136 called from a binary, there is no need to slow down
4137 shared libraries because of that. */
4138 sym->st_shndx = SHN_UNDEF;
4139 if (!h->pointer_equality_needed)
4140 sym->st_value = 0;
70256ad8
AJ
4141 }
4142
aec6b87e
L
4143 /* Don't generate dynamic GOT relocation against undefined weak
4144 symbol in executable. */
bffbf940 4145 if (h->got.offset != (bfd_vma) -1
0afcef53
L
4146 && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry (h)->tls_type)
4147 && elf_x86_hash_entry (h)->tls_type != GOT_TLS_IE
aec6b87e 4148 && !local_undefweak)
053579d7 4149 {
053579d7 4150 Elf_Internal_Rela rela;
233cc9c1 4151 asection *relgot = htab->elf.srelgot;
053579d7
AJ
4152
4153 /* This symbol has an entry in the global offset table. Set it
bffbf940 4154 up. */
6de2ae4a 4155 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
c434dee6 4156 abort ();
053579d7 4157
6de2ae4a
L
4158 rela.r_offset = (htab->elf.sgot->output_section->vma
4159 + htab->elf.sgot->output_offset
dc810e39 4160 + (h->got.offset &~ (bfd_vma) 1));
053579d7
AJ
4161
4162 /* If this is a static link, or it is a -Bsymbolic link and the
4163 symbol is defined locally or was forced to be local because
4164 of a version file, we just want to emit a RELATIVE reloc.
4165 The entry in the global offset table will already have been
4166 initialized in the relocate_section function. */
710ab287 4167 if (h->def_regular
0018b0a3
L
4168 && h->type == STT_GNU_IFUNC)
4169 {
233cc9c1
L
4170 if (h->plt.offset == (bfd_vma) -1)
4171 {
4172 /* STT_GNU_IFUNC is referenced without PLT. */
4173 if (htab->elf.splt == NULL)
4174 {
4175 /* use .rel[a].iplt section to store .got relocations
4176 in static executable. */
4177 relgot = htab->elf.irelplt;
4178 }
6999821f 4179 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
233cc9c1 4180 {
871b3ab2 4181 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
6322e5c5
L
4182 h->root.root.string,
4183 h->root.u.def.section->owner);
4184
233cc9c1
L
4185 rela.r_info = htab->r_info (0,
4186 R_X86_64_IRELATIVE);
4187 rela.r_addend = (h->root.u.def.value
4188 + h->root.u.def.section->output_section->vma
4189 + h->root.u.def.section->output_offset);
4190 }
4191 else
4192 goto do_glob_dat;
4193 }
4194 else if (bfd_link_pic (info))
710ab287
L
4195 {
4196 /* Generate R_X86_64_GLOB_DAT. */
4197 goto do_glob_dat;
4198 }
4199 else
4200 {
90d60710 4201 asection *plt;
aab82f4c 4202 bfd_vma plt_offset;
90d60710 4203
710ab287
L
4204 if (!h->pointer_equality_needed)
4205 abort ();
4206
4207 /* For non-shared object, we can't use .got.plt, which
4208 contains the real function addres if we need pointer
4209 equality. We load the GOT entry with the PLT entry. */
f2c29a16 4210 if (htab->plt_second != NULL)
aab82f4c 4211 {
f2c29a16
L
4212 plt = htab->plt_second;
4213 plt_offset = eh->plt_second.offset;
aab82f4c
L
4214 }
4215 else
4216 {
4217 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4218 plt_offset = h->plt.offset;
4219 }
710ab287
L
4220 bfd_put_64 (output_bfd, (plt->output_section->vma
4221 + plt->output_offset
aab82f4c 4222 + plt_offset),
6de2ae4a 4223 htab->elf.sgot->contents + h->got.offset);
710ab287
L
4224 return TRUE;
4225 }
0018b0a3 4226 }
0e1862bb 4227 else if (bfd_link_pic (info)
6999821f 4228 && SYMBOL_REFERENCES_LOCAL_P (info, h))
053579d7 4229 {
ad71ce8d 4230 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
41bed6dd 4231 return FALSE;
cc78d0af 4232 BFD_ASSERT((h->got.offset & 1) != 0);
351f65ca 4233 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
053579d7
AJ
4234 rela.r_addend = (h->root.u.def.value
4235 + h->root.u.def.section->output_section->vma
4236 + h->root.u.def.section->output_offset);
4237 }
4238 else
4239 {
4240 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 4241do_glob_dat:
c434dee6 4242 bfd_put_64 (output_bfd, (bfd_vma) 0,
6de2ae4a 4243 htab->elf.sgot->contents + h->got.offset);
351f65ca 4244 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
053579d7
AJ
4245 rela.r_addend = 0;
4246 }
4247
233cc9c1 4248 elf_append_rela (output_bfd, relgot, &rela);
053579d7
AJ
4249 }
4250
f5385ebf 4251 if (h->needs_copy)
70256ad8 4252 {
70256ad8 4253 Elf_Internal_Rela rela;
5474d94f 4254 asection *s;
70256ad8
AJ
4255
4256 /* This symbol needs a copy reloc. Set it up. */
ff38b4cc 4257 VERIFY_COPY_RELOC (h, htab)
70256ad8
AJ
4258
4259 rela.r_offset = (h->root.u.def.value
4260 + h->root.u.def.section->output_section->vma
4261 + h->root.u.def.section->output_offset);
351f65ca 4262 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
70256ad8 4263 rela.r_addend = 0;
afbf7e8e 4264 if (h->root.u.def.section == htab->elf.sdynrelro)
5474d94f
AM
4265 s = htab->elf.sreldynrelro;
4266 else
4267 s = htab->elf.srelbss;
4268 elf_append_rela (output_bfd, s, &rela);
70256ad8
AJ
4269 }
4270
b34976b6 4271 return TRUE;
70256ad8
AJ
4272}
4273
c25bc9fc
L
4274/* Finish up local dynamic symbol handling. We set the contents of
4275 various dynamic sections here. */
4276
4277static bfd_boolean
351f65ca 4278elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
c25bc9fc
L
4279{
4280 struct elf_link_hash_entry *h
4281 = (struct elf_link_hash_entry *) *slot;
4282 struct bfd_link_info *info
eed180f8 4283 = (struct bfd_link_info *) inf;
c25bc9fc 4284
351f65ca 4285 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
5f0f0847 4286 info, h, NULL);
c25bc9fc
L
4287}
4288
aec6b87e
L
4289/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4290 here since undefined weak symbol may not be dynamic and may not be
4291 called for elf_x86_64_finish_dynamic_symbol. */
4292
4293static bfd_boolean
4294elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4295 void *inf)
4296{
4297 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4298 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4299
4300 if (h->root.type != bfd_link_hash_undefweak
4301 || h->dynindx != -1)
4302 return TRUE;
4303
4304 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
5f0f0847 4305 info, h, NULL);
aec6b87e
L
4306}
4307
c434dee6
AJ
4308/* Used to decide how to sort relocs in an optimal manner for the
4309 dynamic linker, before writing them out. */
4310
4311static enum elf_reloc_type_class
cae1fbbb 4312elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
7e612e98
AM
4313 const asection *rel_sec ATTRIBUTE_UNUSED,
4314 const Elf_Internal_Rela *rela)
c434dee6 4315{
cae1fbbb
L
4316 bfd *abfd = info->output_bfd;
4317 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
0afcef53
L
4318 struct elf_x86_link_hash_table *htab
4319 = elf_x86_hash_table (info, X86_64_ELF_DATA);
cae1fbbb 4320
d9e3b590
L
4321 if (htab->elf.dynsym != NULL
4322 && htab->elf.dynsym->contents != NULL)
4323 {
4324 /* Check relocation against STT_GNU_IFUNC symbol if there are
07d6d2b8 4325 dynamic symbols. */
d9e3b590 4326 unsigned long r_symndx = htab->r_sym (rela->r_info);
897463b1
L
4327 if (r_symndx != STN_UNDEF)
4328 {
4329 Elf_Internal_Sym sym;
4330 if (!bed->s->swap_symbol_in (abfd,
4331 (htab->elf.dynsym->contents
4332 + r_symndx * bed->s->sizeof_sym),
4333 0, &sym))
4334 abort ();
d9e3b590 4335
897463b1
L
4336 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
4337 return reloc_class_ifunc;
4338 }
d9e3b590 4339 }
cae1fbbb 4340
351f65ca 4341 switch ((int) ELF32_R_TYPE (rela->r_info))
c434dee6 4342 {
c428ce9d
L
4343 case R_X86_64_IRELATIVE:
4344 return reloc_class_ifunc;
c434dee6 4345 case R_X86_64_RELATIVE:
1da80baa 4346 case R_X86_64_RELATIVE64:
c434dee6
AJ
4347 return reloc_class_relative;
4348 case R_X86_64_JUMP_SLOT:
4349 return reloc_class_plt;
4350 case R_X86_64_COPY:
4351 return reloc_class_copy;
4352 default:
4353 return reloc_class_normal;
4354 }
4355}
4356
70256ad8
AJ
4357/* Finish up the dynamic sections. */
4358
b34976b6 4359static bfd_boolean
351f65ca
L
4360elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
4361 struct bfd_link_info *info)
70256ad8 4362{
0afcef53 4363 struct elf_x86_link_hash_table *htab;
70256ad8 4364
9577f60b 4365 htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4dfe6ac6
NC
4366 if (htab == NULL)
4367 return FALSE;
4368
9577f60b
L
4369 if (! htab->elf.dynamic_sections_created)
4370 return TRUE;
70256ad8 4371
9577f60b 4372 if (htab->elf.splt && htab->elf.splt->size > 0)
e41b3a13 4373 {
9577f60b
L
4374 elf_section_data (htab->elf.splt->output_section)
4375 ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
e41b3a13 4376
9577f60b 4377 if (htab->plt.has_plt0)
fff53dae 4378 {
9577f60b
L
4379 /* Fill in the special first entry in the procedure linkage
4380 table. */
4381 memcpy (htab->elf.splt->contents,
4382 htab->lazy_plt->plt0_entry,
4383 htab->lazy_plt->plt0_entry_size);
4384 /* Add offset for pushq GOT+8(%rip), since the instruction
4385 uses 6 bytes subtract this value. */
4386 bfd_put_32 (output_bfd,
4387 (htab->elf.sgotplt->output_section->vma
4388 + htab->elf.sgotplt->output_offset
4389 + 8
4390 - htab->elf.splt->output_section->vma
4391 - htab->elf.splt->output_offset
4392 - 6),
4393 (htab->elf.splt->contents
4394 + htab->lazy_plt->plt0_got1_offset));
4395 /* Add offset for the PC-relative instruction accessing
4396 GOT+16, subtracting the offset to the end of that
4397 instruction. */
4398 bfd_put_32 (output_bfd,
4399 (htab->elf.sgotplt->output_section->vma
4400 + htab->elf.sgotplt->output_offset
4401 + 16
4402 - htab->elf.splt->output_section->vma
4403 - htab->elf.splt->output_offset
4404 - htab->lazy_plt->plt0_got2_insn_end),
4405 (htab->elf.splt->contents
4406 + htab->lazy_plt->plt0_got2_offset));
fff53dae 4407 }
fff53dae 4408
9577f60b 4409 if (htab->tlsdesc_plt)
8361ed4d 4410 {
bf54968b
L
4411 /* The TLSDESC entry in a lazy procedure linkage table. */
4412 static const bfd_byte tlsdesc_plt_entry[LAZY_PLT_ENTRY_SIZE] =
4413 {
4414 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
4415 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
4416 0xff, 0x25, 16, 0, 0, 0 /* jmpq *GOT+TDG(%rip) */
4417 };
4418
9577f60b
L
4419 bfd_put_64 (output_bfd, (bfd_vma) 0,
4420 htab->elf.sgot->contents + htab->tlsdesc_got);
4421
4422 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
bf54968b 4423 tlsdesc_plt_entry, LAZY_PLT_ENTRY_SIZE);
9577f60b 4424
bf54968b
L
4425 /* Add offset for pushq GOT+8(%rip), since ENDBR64 uses 4
4426 bytes and the instruction uses 6 bytes, subtract these
4427 values. */
9577f60b
L
4428 bfd_put_32 (output_bfd,
4429 (htab->elf.sgotplt->output_section->vma
4430 + htab->elf.sgotplt->output_offset
4431 + 8
4432 - htab->elf.splt->output_section->vma
4433 - htab->elf.splt->output_offset
4434 - htab->tlsdesc_plt
bf54968b 4435 - 4 - 6),
9577f60b
L
4436 (htab->elf.splt->contents
4437 + htab->tlsdesc_plt
bf54968b
L
4438 + 4 + 2));
4439 /* Add offset for indirect branch via GOT+TDG, where TDG
4440 stands for htab->tlsdesc_got, subtracting the offset
4441 to the end of that instruction. */
9577f60b
L
4442 bfd_put_32 (output_bfd,
4443 (htab->elf.sgot->output_section->vma
4444 + htab->elf.sgot->output_offset
4445 + htab->tlsdesc_got
4446 - htab->elf.splt->output_section->vma
4447 - htab->elf.splt->output_offset
4448 - htab->tlsdesc_plt
bf54968b 4449 - 4 - 6 - 6),
9577f60b 4450 (htab->elf.splt->contents
bf54968b 4451 + htab->tlsdesc_plt + 4 + 6 + 2));
8361ed4d
L
4452 }
4453 }
4454
aec6b87e
L
4455 /* Fill PLT entries for undefined weak symbols in PIE. */
4456 if (bfd_link_pie (info))
4457 bfd_hash_traverse (&info->hash->table,
4458 elf_x86_64_pie_finish_undefweak_symbol,
4459 info);
4460
b34976b6 4461 return TRUE;
8d88c4ca
NC
4462}
4463
233cc9c1
L
4464/* Fill PLT/GOT entries and allocate dynamic relocations for local
4465 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4466 It has to be done before elf_link_sort_relocs is called so that
4467 dynamic relocations are properly sorted. */
4468
4469static bfd_boolean
4470elf_x86_64_output_arch_local_syms
4471 (bfd *output_bfd ATTRIBUTE_UNUSED,
4472 struct bfd_link_info *info,
4473 void *flaginfo ATTRIBUTE_UNUSED,
4474 int (*func) (void *, const char *,
4475 Elf_Internal_Sym *,
4476 asection *,
4477 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4478{
0afcef53
L
4479 struct elf_x86_link_hash_table *htab
4480 = elf_x86_hash_table (info, X86_64_ELF_DATA);
233cc9c1
L
4481 if (htab == NULL)
4482 return FALSE;
4483
4484 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4485 htab_traverse (htab->loc_hash_table,
4486 elf_x86_64_finish_local_dynamic_symbol,
4487 info);
4488
4489 return TRUE;
4490}
4491
38b12349 4492/* Forward declaration. */
765e526c 4493static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt;
38b12349
L
4494
4495/* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
4496 dynamic relocations. */
4497
4498static long
4499elf_x86_64_get_synthetic_symtab (bfd *abfd,
4500 long symcount ATTRIBUTE_UNUSED,
4501 asymbol **syms ATTRIBUTE_UNUSED,
4502 long dynsymcount,
4503 asymbol **dynsyms,
4504 asymbol **ret)
4505{
f493882d 4506 long count, i, n;
38b12349 4507 int j;
38b12349 4508 bfd_byte *plt_contents;
f493882d 4509 long relsize;
765e526c
L
4510 const struct elf_x86_lazy_plt_layout *lazy_plt;
4511 const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4512 const struct elf_x86_lazy_plt_layout *lazy_bnd_plt;
4513 const struct elf_x86_non_lazy_plt_layout *non_lazy_bnd_plt;
4514 const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4515 const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
38b12349 4516 asection *plt;
f493882d
L
4517 enum elf_x86_plt_type plt_type;
4518 struct elf_x86_plt plts[] =
144bed8d 4519 {
38b12349
L
4520 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4521 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
f2c29a16
L
4522 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4523 { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
dd9e66ee 4524 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
38b12349 4525 };
144bed8d 4526
38b12349 4527 *ret = NULL;
144bed8d 4528
38b12349
L
4529 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4530 return 0;
144bed8d 4531
38b12349
L
4532 if (dynsymcount <= 0)
4533 return 0;
cca5b8b6 4534
38b12349
L
4535 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4536 if (relsize <= 0)
4537 return -1;
4538
3b4c3844 4539 if (get_elf_x86_backend_data (abfd)->target_os != is_nacl)
144bed8d 4540 {
38b12349
L
4541 lazy_plt = &elf_x86_64_lazy_plt;
4542 non_lazy_plt = &elf_x86_64_non_lazy_plt;
4543 lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
4544 non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
ee2fdd6f
L
4545 if (ABI_64_P (abfd))
4546 {
4547 lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4548 non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4549 }
4550 else
4551 {
4552 lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4553 non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4554 }
38b12349
L
4555 }
4556 else
4557 {
4558 lazy_plt = &elf_x86_64_nacl_plt;
4559 non_lazy_plt = NULL;
4560 lazy_bnd_plt = NULL;
4561 non_lazy_bnd_plt = NULL;
ee2fdd6f
L
4562 lazy_ibt_plt = NULL;
4563 non_lazy_ibt_plt = NULL;
38b12349 4564 }
144bed8d 4565
38b12349
L
4566 count = 0;
4567 for (j = 0; plts[j].name != NULL; j++)
4568 {
4569 plt = bfd_get_section_by_name (abfd, plts[j].name);
90efb642 4570 if (plt == NULL || plt->size == 0)
6f25f223 4571 continue;
533d0af0 4572
38b12349
L
4573 /* Get the PLT section contents. */
4574 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4575 if (plt_contents == NULL)
4576 break;
4577 if (!bfd_get_section_contents (abfd, (asection *) plt,
4578 plt_contents, 0, plt->size))
4579 {
4580 free (plt_contents);
4581 break;
4582 }
144bed8d 4583
38b12349
L
4584 /* Check what kind of PLT it is. */
4585 plt_type = plt_unknown;
90efb642
L
4586 if (plts[j].type == plt_unknown
4587 && (plt->size >= (lazy_plt->plt_entry_size
4588 + lazy_plt->plt_entry_size)))
144bed8d 4589 {
38b12349
L
4590 /* Match lazy PLT first. Need to check the first two
4591 instructions. */
4592 if ((memcmp (plt_contents, lazy_plt->plt0_entry,
4593 lazy_plt->plt0_got1_offset) == 0)
4594 && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
4595 2) == 0))
4596 plt_type = plt_lazy;
4597 else if (lazy_bnd_plt != NULL
4598 && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
4599 lazy_bnd_plt->plt0_got1_offset) == 0)
4600 && (memcmp (plt_contents + 6,
4601 lazy_bnd_plt->plt0_entry + 6, 3) == 0))
ec1f73bb 4602 {
f2c29a16 4603 plt_type = plt_lazy | plt_second;
ee2fdd6f
L
4604 /* The fist entry in the lazy IBT PLT is the same as the
4605 lazy BND PLT. */
4606 if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
4607 lazy_ibt_plt->plt_entry,
4608 lazy_ibt_plt->plt_got_offset) == 0))
4609 lazy_plt = lazy_ibt_plt;
4610 else
4611 lazy_plt = lazy_bnd_plt;
ec1f73bb 4612 }
144bed8d 4613 }
fca6ae69 4614
38b12349 4615 if (non_lazy_plt != NULL
90efb642
L
4616 && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4617 && plt->size >= non_lazy_plt->plt_entry_size)
38b12349
L
4618 {
4619 /* Match non-lazy PLT. */
4620 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4621 non_lazy_plt->plt_got_offset) == 0)
4622 plt_type = plt_non_lazy;
4623 }
4624
ee2fdd6f 4625 if (plt_type == plt_unknown || plt_type == plt_second)
38b12349 4626 {
ee2fdd6f 4627 if (non_lazy_bnd_plt != NULL
90efb642 4628 && plt->size >= non_lazy_bnd_plt->plt_entry_size
ee2fdd6f
L
4629 && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
4630 non_lazy_bnd_plt->plt_got_offset) == 0))
38b12349 4631 {
ee2fdd6f 4632 /* Match BND PLT. */
f2c29a16 4633 plt_type = plt_second;
38b12349
L
4634 non_lazy_plt = non_lazy_bnd_plt;
4635 }
ee2fdd6f 4636 else if (non_lazy_ibt_plt != NULL
90efb642 4637 && plt->size >= non_lazy_ibt_plt->plt_entry_size
ee2fdd6f
L
4638 && (memcmp (plt_contents,
4639 non_lazy_ibt_plt->plt_entry,
4640 non_lazy_ibt_plt->plt_got_offset) == 0))
4641 {
4642 /* Match IBT PLT. */
4643 plt_type = plt_second;
4644 non_lazy_plt = non_lazy_ibt_plt;
4645 }
38b12349
L
4646 }
4647
4648 if (plt_type == plt_unknown)
37c0b6ee
L
4649 {
4650 free (plt_contents);
4651 continue;
4652 }
38b12349
L
4653
4654 plts[j].sec = plt;
4655 plts[j].type = plt_type;
4656
4657 if ((plt_type & plt_lazy))
4658 {
4659 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4660 plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
4661 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4662 /* Skip PLT0 in lazy PLT. */
4663 i = 1;
4664 }
4665 else
4666 {
4667 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4668 plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
4669 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4670 i = 0;
4671 }
4672
f2c29a16
L
4673 /* Skip lazy PLT when the second PLT is used. */
4674 if (plt_type == (plt_lazy | plt_second))
38b12349
L
4675 plts[j].count = 0;
4676 else
4677 {
4678 n = plt->size / plts[j].plt_entry_size;
4679 plts[j].count = n;
4680 count += n - i;
4681 }
4682
4683 plts[j].contents = plt_contents;
144bed8d
L
4684 }
4685
f493882d
L
4686 return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4687 (bfd_vma) 0, plts, dynsyms,
4688 ret);
0ff2b86e
L
4689}
4690
d2b2c203
DJ
4691/* Handle an x86-64 specific section when reading an object file. This
4692 is called when elfcode.h finds a section with an unknown type. */
4693
4694static bfd_boolean
0c723101
L
4695elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
4696 const char *name, int shindex)
d2b2c203
DJ
4697{
4698 if (hdr->sh_type != SHT_X86_64_UNWIND)
4699 return FALSE;
4700
6dc132d9 4701 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
d2b2c203
DJ
4702 return FALSE;
4703
4704 return TRUE;
4705}
4706
3b22753a
L
4707/* Hook called by the linker routine which adds symbols from an object
4708 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4709 of .bss. */
4710
4711static bfd_boolean
351f65ca 4712elf_x86_64_add_symbol_hook (bfd *abfd,
a43942db 4713 struct bfd_link_info *info ATTRIBUTE_UNUSED,
351f65ca
L
4714 Elf_Internal_Sym *sym,
4715 const char **namep ATTRIBUTE_UNUSED,
4716 flagword *flagsp ATTRIBUTE_UNUSED,
4717 asection **secp,
4718 bfd_vma *valp)
3b22753a
L
4719{
4720 asection *lcomm;
4721
4722 switch (sym->st_shndx)
4723 {
4724 case SHN_X86_64_LCOMMON:
4725 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4726 if (lcomm == NULL)
4727 {
4728 lcomm = bfd_make_section_with_flags (abfd,
4729 "LARGE_COMMON",
4730 (SEC_ALLOC
4731 | SEC_IS_COMMON
4732 | SEC_LINKER_CREATED));
4733 if (lcomm == NULL)
4734 return FALSE;
4735 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4736 }
4737 *secp = lcomm;
4738 *valp = sym->st_size;
c35bdf6e 4739 return TRUE;
3b22753a 4740 }
d8045f23 4741
3b22753a
L
4742 return TRUE;
4743}
4744
4745
4746/* Given a BFD section, try to locate the corresponding ELF section
4747 index. */
4748
4749static bfd_boolean
351f65ca
L
4750elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4751 asection *sec, int *index_return)
3b22753a
L
4752{
4753 if (sec == &_bfd_elf_large_com_section)
4754 {
91d6fa6a 4755 *index_return = SHN_X86_64_LCOMMON;
3b22753a
L
4756 return TRUE;
4757 }
4758 return FALSE;
4759}
4760
4761/* Process a symbol. */
4762
4763static void
351f65ca
L
4764elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4765 asymbol *asym)
3b22753a
L
4766{
4767 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4768
4769 switch (elfsym->internal_elf_sym.st_shndx)
4770 {
4771 case SHN_X86_64_LCOMMON:
4772 asym->section = &_bfd_elf_large_com_section;
4773 asym->value = elfsym->internal_elf_sym.st_size;
4774 /* Common symbol doesn't set BSF_GLOBAL. */
4775 asym->flags &= ~BSF_GLOBAL;
4776 break;
4777 }
4778}
4779
4780static bfd_boolean
351f65ca 4781elf_x86_64_common_definition (Elf_Internal_Sym *sym)
3b22753a
L
4782{
4783 return (sym->st_shndx == SHN_COMMON
4784 || sym->st_shndx == SHN_X86_64_LCOMMON);
4785}
4786
4787static unsigned int
351f65ca 4788elf_x86_64_common_section_index (asection *sec)
3b22753a
L
4789{
4790 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4791 return SHN_COMMON;
4792 else
4793 return SHN_X86_64_LCOMMON;
4794}
4795
4796static asection *
351f65ca 4797elf_x86_64_common_section (asection *sec)
3b22753a
L
4798{
4799 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4800 return bfd_com_section_ptr;
4801 else
4802 return &_bfd_elf_large_com_section;
4803}
4804
4805static bfd_boolean
5d13b3b3
AM
4806elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
4807 const Elf_Internal_Sym *sym,
351f65ca 4808 asection **psec,
5d13b3b3
AM
4809 bfd_boolean newdef,
4810 bfd_boolean olddef,
351f65ca 4811 bfd *oldbfd,
5d13b3b3 4812 const asection *oldsec)
3b22753a
L
4813{
4814 /* A normal common symbol and a large common symbol result in a
00492999
L
4815 normal common symbol. We turn the large common symbol into a
4816 normal one. */
5d13b3b3 4817 if (!olddef
3b22753a 4818 && h->root.type == bfd_link_hash_common
5d13b3b3
AM
4819 && !newdef
4820 && bfd_is_com_section (*psec)
4821 && oldsec != *psec)
3b22753a 4822 {
00492999 4823 if (sym->st_shndx == SHN_COMMON
5d13b3b3 4824 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
00492999
L
4825 {
4826 h->root.u.c.p->section
4827 = bfd_make_section_old_way (oldbfd, "COMMON");
4828 h->root.u.c.p->section->flags = SEC_ALLOC;
4829 }
4830 else if (sym->st_shndx == SHN_X86_64_LCOMMON
5d13b3b3
AM
4831 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
4832 *psec = bfd_com_section_ptr;
3b22753a
L
4833 }
4834
4835 return TRUE;
4836}
4837
4838static int
351f65ca
L
4839elf_x86_64_additional_program_headers (bfd *abfd,
4840 struct bfd_link_info *info ATTRIBUTE_UNUSED)
3b22753a
L
4841{
4842 asection *s;
9a2e389a 4843 int count = 0;
3b22753a
L
4844
4845 /* Check to see if we need a large readonly segment. */
4846 s = bfd_get_section_by_name (abfd, ".lrodata");
4847 if (s && (s->flags & SEC_LOAD))
4848 count++;
4849
4850 /* Check to see if we need a large data segment. Since .lbss sections
4851 is placed right after the .bss section, there should be no need for
4852 a large data segment just because of .lbss. */
4853 s = bfd_get_section_by_name (abfd, ".ldata");
4854 if (s && (s->flags & SEC_LOAD))
4855 count++;
4856
4857 return count;
4858}
4859
c543bf9a
L
4860/* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
4861
4862static bfd_boolean
4863elf_x86_64_relocs_compatible (const bfd_target *input,
4864 const bfd_target *output)
4865{
4866 return ((xvec_get_elf_backend_data (input)->s->elfclass
4867 == xvec_get_elf_backend_data (output)->s->elfclass)
4868 && _bfd_elf_relocs_compatible (input, output));
4869}
4870
38b12349
L
4871/* Set up x86-64 GNU properties. Return the first relocatable ELF input
4872 with GNU properties if found. Otherwise, return NULL. */
4873
4874static bfd *
4875elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
4876{
1de031c8 4877 struct elf_x86_init_table init_table;
ee2fdd6f 4878
78984959
L
4879 if ((int) R_X86_64_standard >= (int) R_X86_64_converted_reloc_bit
4880 || (int) R_X86_64_max <= (int) R_X86_64_converted_reloc_bit
4881 || ((int) (R_X86_64_GNU_VTINHERIT | R_X86_64_converted_reloc_bit)
4882 != (int) R_X86_64_GNU_VTINHERIT)
4883 || ((int) (R_X86_64_GNU_VTENTRY | R_X86_64_converted_reloc_bit)
4884 != (int) R_X86_64_GNU_VTENTRY))
4885 abort ();
4886
851b6fa1
L
4887 /* This is unused for x86-64. */
4888 init_table.plt0_pad_byte = 0x90;
4889
3b4c3844 4890 if (get_elf_x86_backend_data (info->output_bfd)->target_os != is_nacl)
73784fa5 4891 {
a6798bab 4892 if (info->bndplt)
ee2fdd6f 4893 {
1de031c8
L
4894 init_table.lazy_plt = &elf_x86_64_lazy_bnd_plt;
4895 init_table.non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
ee2fdd6f
L
4896 }
4897 else
4898 {
1de031c8
L
4899 init_table.lazy_plt = &elf_x86_64_lazy_plt;
4900 init_table.non_lazy_plt = &elf_x86_64_non_lazy_plt;
ee2fdd6f 4901 }
38b12349 4902
a6798bab 4903 if (ABI_64_P (info->output_bfd))
38b12349 4904 {
1de031c8
L
4905 init_table.lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4906 init_table.non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
38b12349
L
4907 }
4908 else
4909 {
1de031c8
L
4910 init_table.lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4911 init_table.non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
38b12349 4912 }
38b12349
L
4913 }
4914 else
4915 {
1de031c8
L
4916 init_table.lazy_plt = &elf_x86_64_nacl_plt;
4917 init_table.non_lazy_plt = NULL;
4918 init_table.lazy_ibt_plt = NULL;
4919 init_table.non_lazy_ibt_plt = NULL;
38b12349
L
4920 }
4921
7a382c1c
L
4922 if (ABI_64_P (info->output_bfd))
4923 {
1de031c8
L
4924 init_table.r_info = elf64_r_info;
4925 init_table.r_sym = elf64_r_sym;
7a382c1c
L
4926 }
4927 else
4928 {
1de031c8
L
4929 init_table.r_info = elf32_r_info;
4930 init_table.r_sym = elf32_r_sym;
7a382c1c
L
4931 }
4932
1de031c8 4933 return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
38b12349
L
4934}
4935
9a2e389a 4936static const struct bfd_elf_special_section
46bed679 4937elf_x86_64_special_sections[]=
3b22753a 4938{
0112cd26
NC
4939 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4940 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4941 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
07d6d2b8 4942 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
0112cd26
NC
4943 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4944 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
07d6d2b8 4945 { NULL, 0, 0, 0, 0 }
3b22753a
L
4946};
4947
6d00b590 4948#define TARGET_LITTLE_SYM x86_64_elf64_vec
70256ad8
AJ
4949#define TARGET_LITTLE_NAME "elf64-x86-64"
4950#define ELF_ARCH bfd_arch_i386
ae95ffa6 4951#define ELF_TARGET_ID X86_64_ELF_DATA
70256ad8 4952#define ELF_MACHINE_CODE EM_X86_64
f6aec96d
L
4953#if DEFAULT_LD_Z_SEPARATE_CODE
4954# define ELF_MAXPAGESIZE 0x1000
4955#else
4956# define ELF_MAXPAGESIZE 0x200000
4957#endif
2043964e 4958#define ELF_MINPAGESIZE 0x1000
24718e3b 4959#define ELF_COMMONPAGESIZE 0x1000
70256ad8
AJ
4960
4961#define elf_backend_can_gc_sections 1
51b64d56 4962#define elf_backend_can_refcount 1
70256ad8
AJ
4963#define elf_backend_want_got_plt 1
4964#define elf_backend_plt_readonly 1
4965#define elf_backend_want_plt_sym 0
4966#define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
b491616a 4967#define elf_backend_rela_normal 1
07d6d2b8 4968#define elf_backend_plt_alignment 4
f7483970 4969#define elf_backend_extern_protected_data 1
bedfd056 4970#define elf_backend_caches_rawsize 1
64f52338 4971#define elf_backend_dtrel_excludes_plt 1
5474d94f 4972#define elf_backend_want_dynrelro 1
70256ad8 4973
351f65ca 4974#define elf_info_to_howto elf_x86_64_info_to_howto
70256ad8 4975
351f65ca 4976#define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
157090f7 4977#define bfd_elf64_bfd_reloc_name_lookup \
351f65ca 4978 elf_x86_64_reloc_name_lookup
70256ad8 4979
c543bf9a 4980#define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
351f65ca 4981#define elf_backend_check_relocs elf_x86_64_check_relocs
38b12349 4982#define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
351f65ca
L
4983#define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
4984#define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
233cc9c1 4985#define elf_backend_output_arch_local_syms elf_x86_64_output_arch_local_syms
351f65ca
L
4986#define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
4987#define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
8fd79e71
L
4988#ifdef CORE_HEADER
4989#define elf_backend_write_core_note elf_x86_64_write_core_note
4990#endif
351f65ca
L
4991#define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
4992#define elf_backend_relocate_section elf_x86_64_relocate_section
74541ad4 4993#define elf_backend_init_index_section _bfd_elf_init_1_index_section
407443a3 4994#define elf_backend_object_p elf64_x86_64_elf_object_p
0ff2b86e 4995#define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
8d88c4ca 4996
d2b2c203 4997#define elf_backend_section_from_shdr \
351f65ca 4998 elf_x86_64_section_from_shdr
d2b2c203 4999
3b22753a 5000#define elf_backend_section_from_bfd_section \
351f65ca 5001 elf_x86_64_elf_section_from_bfd_section
3b22753a 5002#define elf_backend_add_symbol_hook \
351f65ca 5003 elf_x86_64_add_symbol_hook
3b22753a 5004#define elf_backend_symbol_processing \
351f65ca 5005 elf_x86_64_symbol_processing
3b22753a 5006#define elf_backend_common_section_index \
351f65ca 5007 elf_x86_64_common_section_index
3b22753a 5008#define elf_backend_common_section \
351f65ca 5009 elf_x86_64_common_section
3b22753a 5010#define elf_backend_common_definition \
351f65ca 5011 elf_x86_64_common_definition
3b22753a 5012#define elf_backend_merge_symbol \
351f65ca 5013 elf_x86_64_merge_symbol
3b22753a 5014#define elf_backend_special_sections \
351f65ca 5015 elf_x86_64_special_sections
3b22753a 5016#define elf_backend_additional_program_headers \
351f65ca 5017 elf_x86_64_additional_program_headers
38b12349 5018#define elf_backend_setup_gnu_properties \
9f857535
L
5019 elf_x86_64_link_setup_gnu_properties
5020#define elf_backend_hide_symbol \
5021 _bfd_x86_elf_hide_symbol
3b22753a 5022
8f56f7a2
L
5023#undef elf64_bed
5024#define elf64_bed elf64_x86_64_bed
5025
8d88c4ca 5026#include "elf64-target.h"
9d7cbccd 5027
6036f486
ES
5028/* CloudABI support. */
5029
07d6d2b8 5030#undef TARGET_LITTLE_SYM
6036f486 5031#define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
07d6d2b8 5032#undef TARGET_LITTLE_NAME
6036f486
ES
5033#define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
5034
5035#undef ELF_OSABI
5036#define ELF_OSABI ELFOSABI_CLOUDABI
5037
07d6d2b8 5038#undef elf64_bed
6036f486
ES
5039#define elf64_bed elf64_x86_64_cloudabi_bed
5040
5041#include "elf64-target.h"
5042
9d7cbccd
NC
5043/* FreeBSD support. */
5044
07d6d2b8 5045#undef TARGET_LITTLE_SYM
6d00b590 5046#define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
07d6d2b8 5047#undef TARGET_LITTLE_NAME
9d7cbccd
NC
5048#define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
5049
d1036acb
L
5050#undef ELF_OSABI
5051#define ELF_OSABI ELFOSABI_FREEBSD
9d7cbccd 5052
07d6d2b8 5053#undef elf64_bed
9d7cbccd
NC
5054#define elf64_bed elf64_x86_64_fbsd_bed
5055
5056#include "elf64-target.h"
8a9036a4 5057
a6cc6b3b
RO
5058/* Solaris 2 support. */
5059
5060#undef TARGET_LITTLE_SYM
6d00b590 5061#define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
a6cc6b3b
RO
5062#undef TARGET_LITTLE_NAME
5063#define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
5064
3b4c3844
L
5065static const struct elf_x86_backend_data elf_x86_64_solaris_arch_bed =
5066 {
5067 is_solaris /* os */
5068 };
5069
5070#undef elf_backend_arch_data
5071#define elf_backend_arch_data &elf_x86_64_solaris_arch_bed
5072
a6cc6b3b
RO
5073/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
5074 objects won't be recognized. */
5075#undef ELF_OSABI
5076
5077#undef elf64_bed
5078#define elf64_bed elf64_x86_64_sol2_bed
5079
7dc98aea
RO
5080/* The 64-bit static TLS arena size is rounded to the nearest 16-byte
5081 boundary. */
84865015 5082#undef elf_backend_static_tls_alignment
7dc98aea
RO
5083#define elf_backend_static_tls_alignment 16
5084
a6cc6b3b
RO
5085/* The Solaris 2 ABI requires a plt symbol on all platforms.
5086
5087 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
5088 File, p.63. */
84865015 5089#undef elf_backend_want_plt_sym
a6cc6b3b
RO
5090#define elf_backend_want_plt_sym 1
5091
84865015
NC
5092#undef elf_backend_strtab_flags
5093#define elf_backend_strtab_flags SHF_STRINGS
5094
5095static bfd_boolean
5522f910
NC
5096elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
5097 bfd *obfd ATTRIBUTE_UNUSED,
5098 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
5099 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
84865015
NC
5100{
5101 /* PR 19938: FIXME: Need to add code for setting the sh_info
5102 and sh_link fields of Solaris specific section types. */
5103 return FALSE;
5104}
5105
5522f910
NC
5106#undef elf_backend_copy_special_section_fields
5107#define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
84865015 5108
a6cc6b3b
RO
5109#include "elf64-target.h"
5110
8059fb19
RM
5111/* Native Client support. */
5112
64b384e1
RM
5113static bfd_boolean
5114elf64_x86_64_nacl_elf_object_p (bfd *abfd)
5115{
5116 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
5117 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
5118 return TRUE;
5119}
5120
8059fb19 5121#undef TARGET_LITTLE_SYM
6d00b590 5122#define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
8059fb19
RM
5123#undef TARGET_LITTLE_NAME
5124#define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
5125#undef elf64_bed
5126#define elf64_bed elf64_x86_64_nacl_bed
5127
5128#undef ELF_MAXPAGESIZE
5129#undef ELF_MINPAGESIZE
5130#undef ELF_COMMONPAGESIZE
5131#define ELF_MAXPAGESIZE 0x10000
5132#define ELF_MINPAGESIZE 0x10000
5133#define ELF_COMMONPAGESIZE 0x10000
5134
5135/* Restore defaults. */
5136#undef ELF_OSABI
5137#undef elf_backend_static_tls_alignment
5138#undef elf_backend_want_plt_sym
5139#define elf_backend_want_plt_sym 0
84865015 5140#undef elf_backend_strtab_flags
5522f910 5141#undef elf_backend_copy_special_section_fields
8059fb19
RM
5142
5143/* NaCl uses substantially different PLT entries for the same effects. */
5144
5145#undef elf_backend_plt_alignment
5146#define elf_backend_plt_alignment 5
5147#define NACL_PLT_ENTRY_SIZE 64
5148#define NACLMASK 0xe0 /* 32-byte alignment mask. */
5149
5150static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
5151 {
07d6d2b8 5152 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
8059fb19 5153 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
07d6d2b8
AM
5154 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5155 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5156 0x41, 0xff, 0xe3, /* jmpq *%r11 */
8059fb19 5157
ea2d813e 5158 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
70cc877f 5159 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
ea2d813e
RM
5160
5161 /* 32 bytes of nop to pad out to the standard size. */
3ddf1bdd 5162 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5163 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
3ddf1bdd 5164 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5165 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
07d6d2b8
AM
5166 0x66, /* excess data16 prefix */
5167 0x90 /* nop */
8059fb19
RM
5168 };
5169
5170static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
5171 {
5172 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
07d6d2b8
AM
5173 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5174 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5175 0x41, 0xff, 0xe3, /* jmpq *%r11 */
8059fb19
RM
5176
5177 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
3ddf1bdd 5178 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19
RM
5179 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5180
5181 /* Lazy GOT entries point here (32-byte aligned). */
07d6d2b8
AM
5182 0x68, /* pushq immediate */
5183 0, 0, 0, 0, /* replaced with index into relocation table. */
5184 0xe9, /* jmp relative */
5185 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
8059fb19 5186
07d6d2b8 5187 /* 22 bytes of nop to pad out to the standard size. */
3ddf1bdd 5188 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5189 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
07d6d2b8 5190 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
8059fb19
RM
5191 };
5192
5193/* .eh_frame covering the .plt section. */
5194
5195static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
5196 {
07d6d2b8
AM
5197#if (PLT_CIE_LENGTH != 20 \
5198 || PLT_FDE_LENGTH != 36 \
5199 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
8059fb19 5200 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
851b6fa1 5201# error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
8059fb19
RM
5202#endif
5203 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
5204 0, 0, 0, 0, /* CIE ID */
5205 1, /* CIE version */
07d6d2b8 5206 'z', 'R', 0, /* Augmentation string */
8059fb19 5207 1, /* Code alignment factor */
07d6d2b8 5208 0x78, /* Data alignment factor */
8059fb19
RM
5209 16, /* Return address column */
5210 1, /* Augmentation size */
5211 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
5212 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
5213 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
5214 DW_CFA_nop, DW_CFA_nop,
5215
5216 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
5217 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
5218 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
5219 0, 0, 0, 0, /* .plt size goes here */
5220 0, /* Augmentation size */
5221 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
5222 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
5223 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
5224 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
5225 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
5226 13, /* Block length */
5227 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
5228 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
5229 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
5230 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
5231 DW_CFA_nop, DW_CFA_nop
5232 };
5233
765e526c 5234static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt =
8059fb19 5235 {
07d6d2b8
AM
5236 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
5237 NACL_PLT_ENTRY_SIZE, /* plt0_entry_size */
5238 elf_x86_64_nacl_plt_entry, /* plt_entry */
5239 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
5240 2, /* plt0_got1_offset */
5241 9, /* plt0_got2_offset */
5242 13, /* plt0_got2_insn_end */
5243 3, /* plt_got_offset */
5244 33, /* plt_reloc_offset */
5245 38, /* plt_plt_offset */
5246 7, /* plt_got_insn_size */
5247 42, /* plt_plt_insn_end */
5248 32, /* plt_lazy_offset */
5249 elf_x86_64_nacl_plt0_entry, /* pic_plt0_entry */
5250 elf_x86_64_nacl_plt_entry, /* pic_plt_entry */
5251 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
38b12349
L
5252 sizeof (elf_x86_64_nacl_eh_frame_plt) /* eh_frame_plt_size */
5253 };
5254
851b6fa1 5255static const struct elf_x86_backend_data elf_x86_64_nacl_arch_bed =
38b12349 5256 {
07d6d2b8 5257 is_nacl /* os */
8059fb19
RM
5258 };
5259
5260#undef elf_backend_arch_data
5261#define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
5262
64b384e1
RM
5263#undef elf_backend_object_p
5264#define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
5a68afcf
RM
5265#undef elf_backend_modify_segment_map
5266#define elf_backend_modify_segment_map nacl_modify_segment_map
5267#undef elf_backend_modify_program_headers
5268#define elf_backend_modify_program_headers nacl_modify_program_headers
887badb3
RM
5269#undef elf_backend_final_write_processing
5270#define elf_backend_final_write_processing nacl_final_write_processing
5a68afcf 5271
8059fb19
RM
5272#include "elf64-target.h"
5273
5274/* Native Client x32 support. */
5275
64b384e1
RM
5276static bfd_boolean
5277elf32_x86_64_nacl_elf_object_p (bfd *abfd)
5278{
5279 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
5280 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
5281 return TRUE;
5282}
5283
07d6d2b8 5284#undef TARGET_LITTLE_SYM
6d00b590 5285#define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
07d6d2b8 5286#undef TARGET_LITTLE_NAME
8059fb19
RM
5287#define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
5288#undef elf32_bed
5289#define elf32_bed elf32_x86_64_nacl_bed
5290
8059fb19
RM
5291#define bfd_elf32_bfd_reloc_type_lookup \
5292 elf_x86_64_reloc_type_lookup
5293#define bfd_elf32_bfd_reloc_name_lookup \
5294 elf_x86_64_reloc_name_lookup
b7365e5d
L
5295#define bfd_elf32_get_synthetic_symtab \
5296 elf_x86_64_get_synthetic_symtab
8059fb19
RM
5297
5298#undef elf_backend_object_p
5299#define elf_backend_object_p \
64b384e1 5300 elf32_x86_64_nacl_elf_object_p
8059fb19
RM
5301
5302#undef elf_backend_bfd_from_remote_memory
5303#define elf_backend_bfd_from_remote_memory \
5304 _bfd_elf32_bfd_from_remote_memory
5305
5306#undef elf_backend_size_info
5307#define elf_backend_size_info \
5308 _bfd_elf32_size_info
5309
8f56f7a2
L
5310#undef elf32_bed
5311#define elf32_bed elf32_x86_64_bed
5312
8059fb19
RM
5313#include "elf32-target.h"
5314
5315/* Restore defaults. */
5a68afcf 5316#undef elf_backend_object_p
8059fb19 5317#define elf_backend_object_p elf64_x86_64_elf_object_p
5a68afcf
RM
5318#undef elf_backend_bfd_from_remote_memory
5319#undef elf_backend_size_info
5320#undef elf_backend_modify_segment_map
5321#undef elf_backend_modify_program_headers
887badb3 5322#undef elf_backend_final_write_processing
8059fb19 5323
8a9036a4
L
5324/* Intel L1OM support. */
5325
5326static bfd_boolean
5327elf64_l1om_elf_object_p (bfd *abfd)
5328{
5329 /* Set the right machine number for an L1OM elf64 file. */
5330 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
5331 return TRUE;
5332}
5333
5334#undef TARGET_LITTLE_SYM
6d00b590 5335#define TARGET_LITTLE_SYM l1om_elf64_vec
8a9036a4
L
5336#undef TARGET_LITTLE_NAME
5337#define TARGET_LITTLE_NAME "elf64-l1om"
5338#undef ELF_ARCH
5339#define ELF_ARCH bfd_arch_l1om
5340
5341#undef ELF_MACHINE_CODE
5342#define ELF_MACHINE_CODE EM_L1OM
5343
5344#undef ELF_OSABI
5345
5346#undef elf64_bed
5347#define elf64_bed elf64_l1om_bed
5348
5349#undef elf_backend_object_p
5350#define elf_backend_object_p elf64_l1om_elf_object_p
5351
8059fb19
RM
5352/* Restore defaults. */
5353#undef ELF_MAXPAGESIZE
5354#undef ELF_MINPAGESIZE
5355#undef ELF_COMMONPAGESIZE
f6aec96d
L
5356#if DEFAULT_LD_Z_SEPARATE_CODE
5357# define ELF_MAXPAGESIZE 0x1000
5358#else
5359# define ELF_MAXPAGESIZE 0x200000
5360#endif
8059fb19
RM
5361#define ELF_MINPAGESIZE 0x1000
5362#define ELF_COMMONPAGESIZE 0x1000
5363#undef elf_backend_plt_alignment
5364#define elf_backend_plt_alignment 4
5365#undef elf_backend_arch_data
5366#define elf_backend_arch_data &elf_x86_64_arch_bed
1a0c107f 5367
8a9036a4
L
5368#include "elf64-target.h"
5369
5370/* FreeBSD L1OM support. */
5371
5372#undef TARGET_LITTLE_SYM
6d00b590 5373#define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
8a9036a4
L
5374#undef TARGET_LITTLE_NAME
5375#define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
5376
5377#undef ELF_OSABI
5378#define ELF_OSABI ELFOSABI_FREEBSD
5379
5380#undef elf64_bed
5381#define elf64_bed elf64_l1om_fbsd_bed
5382
8a9036a4 5383#include "elf64-target.h"
351f65ca 5384
7a9068fe
L
5385/* Intel K1OM support. */
5386
5387static bfd_boolean
5388elf64_k1om_elf_object_p (bfd *abfd)
5389{
5390 /* Set the right machine number for an K1OM elf64 file. */
5391 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
5392 return TRUE;
5393}
5394
5395#undef TARGET_LITTLE_SYM
6d00b590 5396#define TARGET_LITTLE_SYM k1om_elf64_vec
7a9068fe
L
5397#undef TARGET_LITTLE_NAME
5398#define TARGET_LITTLE_NAME "elf64-k1om"
5399#undef ELF_ARCH
5400#define ELF_ARCH bfd_arch_k1om
5401
5402#undef ELF_MACHINE_CODE
5403#define ELF_MACHINE_CODE EM_K1OM
5404
5405#undef ELF_OSABI
5406
5407#undef elf64_bed
5408#define elf64_bed elf64_k1om_bed
5409
5410#undef elf_backend_object_p
5411#define elf_backend_object_p elf64_k1om_elf_object_p
5412
5413#undef elf_backend_static_tls_alignment
5414
5415#undef elf_backend_want_plt_sym
5416#define elf_backend_want_plt_sym 0
5417
5418#include "elf64-target.h"
5419
5420/* FreeBSD K1OM support. */
5421
5422#undef TARGET_LITTLE_SYM
6d00b590 5423#define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
7a9068fe
L
5424#undef TARGET_LITTLE_NAME
5425#define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
5426
5427#undef ELF_OSABI
5428#define ELF_OSABI ELFOSABI_FREEBSD
5429
5430#undef elf64_bed
5431#define elf64_bed elf64_k1om_fbsd_bed
5432
5433#include "elf64-target.h"
5434
351f65ca
L
5435/* 32bit x86-64 support. */
5436
351f65ca 5437#undef TARGET_LITTLE_SYM
6d00b590 5438#define TARGET_LITTLE_SYM x86_64_elf32_vec
351f65ca
L
5439#undef TARGET_LITTLE_NAME
5440#define TARGET_LITTLE_NAME "elf32-x86-64"
8059fb19 5441#undef elf32_bed
351f65ca
L
5442
5443#undef ELF_ARCH
5444#define ELF_ARCH bfd_arch_i386
5445
5446#undef ELF_MACHINE_CODE
5447#define ELF_MACHINE_CODE EM_X86_64
5448
351f65ca
L
5449#undef ELF_OSABI
5450
351f65ca
L
5451#undef elf_backend_object_p
5452#define elf_backend_object_p \
5453 elf32_x86_64_elf_object_p
5454
5455#undef elf_backend_bfd_from_remote_memory
5456#define elf_backend_bfd_from_remote_memory \
5457 _bfd_elf32_bfd_from_remote_memory
5458
5459#undef elf_backend_size_info
5460#define elf_backend_size_info \
5461 _bfd_elf32_size_info
5462
5463#include "elf32-target.h"