Remove references to ada_name_for_lookup (deleted)
[deliverable/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 */
4eca0228
AM
285 _bfd_error_handler (_("%B: invalid relocation type %d"),
286 abfd, (int) r_type);
67a4f2b7
AO
287 r_type = R_X86_64_NONE;
288 }
289 i = r_type;
290 }
291 else
292 i = r_type - (unsigned int) R_X86_64_vt_offset;
293 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
294 return &x86_64_elf_howto_table[i];
295}
8d88c4ca
NC
296
297/* Given a BFD reloc type, return a HOWTO structure. */
298static reloc_howto_type *
351f65ca
L
299elf_x86_64_reloc_type_lookup (bfd *abfd,
300 bfd_reloc_code_real_type code)
8d88c4ca
NC
301{
302 unsigned int i;
27482721 303
8d88c4ca
NC
304 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
305 i++)
306 {
307 if (x86_64_reloc_map[i].bfd_reloc_val == code)
351f65ca
L
308 return elf_x86_64_rtype_to_howto (abfd,
309 x86_64_reloc_map[i].elf_reloc_val);
8d88c4ca 310 }
5860e3f8 311 return NULL;
8d88c4ca
NC
312}
313
157090f7 314static reloc_howto_type *
d7921315 315elf_x86_64_reloc_name_lookup (bfd *abfd,
351f65ca 316 const char *r_name)
157090f7
AM
317{
318 unsigned int i;
319
d7921315
L
320 if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
321 {
322 /* Get x32 R_X86_64_32. */
323 reloc_howto_type *reloc
324 = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
325 BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
326 return reloc;
327 }
328
329 for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
157090f7
AM
330 if (x86_64_elf_howto_table[i].name != NULL
331 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
332 return &x86_64_elf_howto_table[i];
333
334 return NULL;
335}
336
8d88c4ca 337/* Given an x86_64 ELF reloc type, fill in an arelent structure. */
8da6118f 338
8d88c4ca 339static void
351f65ca
L
340elf_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
341 Elf_Internal_Rela *dst)
8d88c4ca 342{
67a4f2b7 343 unsigned r_type;
8d88c4ca 344
351f65ca 345 r_type = ELF32_R_TYPE (dst->r_info);
78984959
L
346 if (r_type != (unsigned int) R_X86_64_GNU_VTINHERIT
347 && r_type != (unsigned int) R_X86_64_GNU_VTENTRY)
348 r_type &= ~R_X86_64_converted_reloc_bit;
351f65ca 349 cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
262c0a87
NC
350
351 BFD_ASSERT (r_type == cache_ptr->howto->type || cache_ptr->howto->type == R_X86_64_NONE);
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
4c544807
L
1314 if (h)
1315 name = h->root.root.string;
1316 else
1317 {
0afcef53 1318 struct elf_x86_link_hash_table *htab;
4dfe6ac6 1319
0afcef53 1320 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
1321 if (htab == NULL)
1322 name = "*unknown*";
1323 else
1324 {
1325 Elf_Internal_Sym *isym;
1326
1327 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1328 abfd, r_symndx);
1329 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1330 }
4c544807
L
1331 }
1332
4eca0228 1333 _bfd_error_handler
695344c0 1334 /* xgettext:c-format */
d42c267e 1335 (_("%B: TLS transition from %s to %s against `%s' at %#Lx "
142411ca 1336 "in section `%A' failed"),
d42c267e 1337 abfd, from->name, to->name, name, rel->r_offset, sec);
142411ca
L
1338 bfd_set_error (bfd_error_bad_value);
1339 return FALSE;
1340 }
1341
1342 *r_type = to_type;
1343 return TRUE;
bffbf940
JJ
1344}
1345
c1d11331
L
1346/* Rename some of the generic section flags to better document how they
1347 are used here. */
6999821f 1348#define check_relocs_failed sec_flg0
338c190a
L
1349
1350static bfd_boolean
aab921ad
L
1351elf_x86_64_need_pic (struct bfd_link_info *info,
1352 bfd *input_bfd, asection *sec,
338c190a
L
1353 struct elf_link_hash_entry *h,
1354 Elf_Internal_Shdr *symtab_hdr,
1355 Elf_Internal_Sym *isym,
1356 reloc_howto_type *howto)
1357{
1358 const char *v = "";
1359 const char *und = "";
1360 const char *pic = "";
aab921ad 1361 const char *object;
338c190a
L
1362
1363 const char *name;
1364 if (h)
1365 {
1366 name = h->root.root.string;
1367 switch (ELF_ST_VISIBILITY (h->other))
1368 {
1369 case STV_HIDDEN:
1370 v = _("hidden symbol ");
1371 break;
1372 case STV_INTERNAL:
1373 v = _("internal symbol ");
1374 break;
1375 case STV_PROTECTED:
1376 v = _("protected symbol ");
1377 break;
1378 default:
0afcef53 1379 if (((struct elf_x86_link_hash_entry *) h)->def_protected)
a5b4ee94
L
1380 v = _("protected symbol ");
1381 else
1382 v = _("symbol ");
338c190a
L
1383 pic = _("; recompile with -fPIC");
1384 break;
1385 }
1386
1387 if (!h->def_regular && !h->def_dynamic)
1388 und = _("undefined ");
1389 }
1390 else
1391 {
1392 name = bfd_elf_sym_name (input_bfd, symtab_hdr, isym, NULL);
1393 pic = _("; recompile with -fPIC");
1394 }
1395
aab921ad
L
1396 if (bfd_link_dll (info))
1397 object = _("a shared object");
1398 else if (bfd_link_pie (info))
1399 object = _("a PIE object");
1400 else
1401 object = _("a PDE object");
1402
695344c0 1403 /* xgettext:c-format */
4eca0228 1404 _bfd_error_handler (_("%B: relocation %s against %s%s`%s' can "
aab921ad
L
1405 "not be used when making %s%s"),
1406 input_bfd, howto->name, und, v, name,
1407 object, pic);
338c190a
L
1408 bfd_set_error (bfd_error_bad_value);
1409 sec->check_relocs_failed = 1;
1410 return FALSE;
1411}
c1d11331 1412
c175a657
L
1413/* With the local symbol, foo, we convert
1414 mov foo@GOTPCREL(%rip), %reg
1415 to
1416 lea foo(%rip), %reg
1417 and convert
1418 call/jmp *foo@GOTPCREL(%rip)
1419 to
1420 nop call foo/jmp foo nop
1421 When PIC is false, convert
1422 test %reg, foo@GOTPCREL(%rip)
1423 to
1424 test $foo, %reg
1425 and convert
1426 binop foo@GOTPCREL(%rip), %reg
1427 to
1428 binop $foo, %reg
1429 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1430 instructions. */
1431
1432static bfd_boolean
8b43e456 1433elf_x86_64_convert_load_reloc (bfd *abfd,
c175a657 1434 bfd_byte *contents,
6999821f 1435 unsigned int *r_type_p,
c175a657
L
1436 Elf_Internal_Rela *irel,
1437 struct elf_link_hash_entry *h,
1438 bfd_boolean *converted,
1439 struct bfd_link_info *link_info)
1440{
0afcef53 1441 struct elf_x86_link_hash_table *htab;
c175a657 1442 bfd_boolean is_pic;
8b43e456 1443 bfd_boolean no_overflow;
c175a657
L
1444 bfd_boolean relocx;
1445 bfd_boolean to_reloc_pc32;
1446 asection *tsec;
c175a657
L
1447 bfd_signed_vma raddend;
1448 unsigned int opcode;
1449 unsigned int modrm;
6999821f 1450 unsigned int r_type = *r_type_p;
c175a657 1451 unsigned int r_symndx;
c175a657
L
1452 bfd_vma roff = irel->r_offset;
1453
1454 if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
1455 return TRUE;
1456
1457 raddend = irel->r_addend;
1458 /* Addend for 32-bit PC-relative relocation must be -4. */
1459 if (raddend != -4)
1460 return TRUE;
1461
0afcef53 1462 htab = elf_x86_hash_table (link_info, X86_64_ELF_DATA);
c175a657
L
1463 is_pic = bfd_link_pic (link_info);
1464
1465 relocx = (r_type == R_X86_64_GOTPCRELX
1466 || r_type == R_X86_64_REX_GOTPCRELX);
1467
8b43e456
L
1468 /* TRUE if --no-relax is used. */
1469 no_overflow = link_info->disable_target_specific_optimizations > 1;
c175a657
L
1470
1471 r_symndx = htab->r_sym (irel->r_info);
1472
1473 opcode = bfd_get_8 (abfd, contents + roff - 2);
1474
1475 /* Convert mov to lea since it has been done for a while. */
1476 if (opcode != 0x8b)
1477 {
1478 /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
1479 for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
1480 test, xor instructions. */
1481 if (!relocx)
1482 return TRUE;
1483 }
1484
1485 /* We convert only to R_X86_64_PC32:
1486 1. Branch.
1487 2. R_X86_64_GOTPCREL since we can't modify REX byte.
8b43e456 1488 3. no_overflow is true.
c175a657
L
1489 4. PIC.
1490 */
1491 to_reloc_pc32 = (opcode == 0xff
1492 || !relocx
8b43e456 1493 || no_overflow
c175a657
L
1494 || is_pic);
1495
1496 /* Get the symbol referred to by the reloc. */
1497 if (h == NULL)
1498 {
1499 Elf_Internal_Sym *isym
1500 = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
1501
1502 /* Skip relocation against undefined symbols. */
1503 if (isym->st_shndx == SHN_UNDEF)
1504 return TRUE;
1505
c175a657
L
1506 if (isym->st_shndx == SHN_ABS)
1507 tsec = bfd_abs_section_ptr;
1508 else if (isym->st_shndx == SHN_COMMON)
1509 tsec = bfd_com_section_ptr;
1510 else if (isym->st_shndx == SHN_X86_64_LCOMMON)
1511 tsec = &_bfd_elf_large_com_section;
1512 else
1513 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
c175a657
L
1514 }
1515 else
1516 {
1517 /* Undefined weak symbol is only bound locally in executable
1518 and its reference is resolved as 0 without relocation
1519 overflow. We can only perform this optimization for
1520 GOTPCRELX relocations since we need to modify REX byte.
1521 It is OK convert mov with R_X86_64_GOTPCREL to
1522 R_X86_64_PC32. */
0a27fed7
L
1523 bfd_boolean local_ref;
1524 struct elf_x86_link_hash_entry *eh = elf_x86_hash_entry (h);
1525
1526 /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P. */
1527 local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
c175a657 1528 if ((relocx || opcode == 0x8b)
0a27fed7
L
1529 && (h->root.type == bfd_link_hash_undefweak
1530 && !eh->linker_def
1531 && local_ref))
c175a657
L
1532 {
1533 if (opcode == 0xff)
1534 {
1535 /* Skip for branch instructions since R_X86_64_PC32
1536 may overflow. */
8b43e456 1537 if (no_overflow)
c175a657
L
1538 return TRUE;
1539 }
1540 else if (relocx)
1541 {
1542 /* For non-branch instructions, we can convert to
1543 R_X86_64_32/R_X86_64_32S since we know if there
1544 is a REX byte. */
1545 to_reloc_pc32 = FALSE;
1546 }
1547
1548 /* Since we don't know the current PC when PIC is true,
1549 we can't convert to R_X86_64_PC32. */
1550 if (to_reloc_pc32 && is_pic)
1551 return TRUE;
1552
1553 goto convert;
1554 }
1555 /* Avoid optimizing GOTPCREL relocations againt _DYNAMIC since
1556 ld.so may use its link-time address. */
cbd0eecf 1557 else if (h->start_stop
0a27fed7 1558 || eh->linker_def
cbd0eecf
L
1559 || ((h->def_regular
1560 || h->root.type == bfd_link_hash_defined
1561 || h->root.type == bfd_link_hash_defweak)
1562 && h != htab->elf.hdynamic
0a27fed7 1563 && local_ref))
c175a657
L
1564 {
1565 /* bfd_link_hash_new or bfd_link_hash_undefined is
1566 set by an assignment in a linker script in
cbd0eecf
L
1567 bfd_elf_record_link_assignment. start_stop is set
1568 on __start_SECNAME/__stop_SECNAME which mark section
1569 SECNAME. */
1570 if (h->start_stop
0a27fed7 1571 || eh->linker_def
cbd0eecf
L
1572 || (h->def_regular
1573 && (h->root.type == bfd_link_hash_new
1574 || h->root.type == bfd_link_hash_undefined
1575 || ((h->root.type == bfd_link_hash_defined
1576 || h->root.type == bfd_link_hash_defweak)
1577 && h->root.u.def.section == bfd_und_section_ptr))))
c175a657
L
1578 {
1579 /* Skip since R_X86_64_32/R_X86_64_32S may overflow. */
8b43e456 1580 if (no_overflow)
c175a657
L
1581 return TRUE;
1582 goto convert;
1583 }
1584 tsec = h->root.u.def.section;
c175a657
L
1585 }
1586 else
1587 return TRUE;
1588 }
1589
2168b268
L
1590 /* Don't convert GOTPCREL relocation against large section. */
1591 if (elf_section_data (tsec) != NULL
1592 && (elf_section_flags (tsec) & SHF_X86_64_LARGE) != 0)
1593 return TRUE;
1594
8b43e456
L
1595 /* Skip since R_X86_64_PC32/R_X86_64_32/R_X86_64_32S may overflow. */
1596 if (no_overflow)
1597 return TRUE;
c175a657 1598
dc089072 1599convert:
c175a657
L
1600 if (opcode == 0xff)
1601 {
1602 /* We have "call/jmp *foo@GOTPCREL(%rip)". */
1603 unsigned int nop;
1604 unsigned int disp;
1605 bfd_vma nop_offset;
1606
1607 /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
1608 R_X86_64_PC32. */
1609 modrm = bfd_get_8 (abfd, contents + roff - 1);
1610 if (modrm == 0x25)
1611 {
1612 /* Convert to "jmp foo nop". */
1613 modrm = 0xe9;
1614 nop = NOP_OPCODE;
1615 nop_offset = irel->r_offset + 3;
1616 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1617 irel->r_offset -= 1;
1618 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1619 }
1620 else
1621 {
0afcef53
L
1622 struct elf_x86_link_hash_entry *eh
1623 = (struct elf_x86_link_hash_entry *) h;
e2cbcd91 1624
c175a657
L
1625 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
1626 is a nop prefix. */
1627 modrm = 0xe8;
e2cbcd91
L
1628 /* To support TLS optimization, always use addr32 prefix for
1629 "call *__tls_get_addr@GOTPCREL(%rip)". */
1d4af308 1630 if (eh && eh->tls_get_addr)
c175a657 1631 {
e2cbcd91
L
1632 nop = 0x67;
1633 nop_offset = irel->r_offset - 2;
c175a657
L
1634 }
1635 else
e2cbcd91
L
1636 {
1637 nop = link_info->call_nop_byte;
1638 if (link_info->call_nop_as_suffix)
1639 {
1640 nop_offset = irel->r_offset + 3;
1641 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1642 irel->r_offset -= 1;
1643 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1644 }
1645 else
1646 nop_offset = irel->r_offset - 2;
1647 }
c175a657
L
1648 }
1649 bfd_put_8 (abfd, nop, contents + nop_offset);
1650 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1651 r_type = R_X86_64_PC32;
1652 }
1653 else
1654 {
1655 unsigned int rex;
1656 unsigned int rex_mask = REX_R;
1657
1658 if (r_type == R_X86_64_REX_GOTPCRELX)
1659 rex = bfd_get_8 (abfd, contents + roff - 3);
1660 else
1661 rex = 0;
1662
1663 if (opcode == 0x8b)
1664 {
1665 if (to_reloc_pc32)
1666 {
1667 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1668 "lea foo(%rip), %reg". */
1669 opcode = 0x8d;
1670 r_type = R_X86_64_PC32;
1671 }
1672 else
1673 {
1674 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1675 "mov $foo, %reg". */
1676 opcode = 0xc7;
1677 modrm = bfd_get_8 (abfd, contents + roff - 1);
1678 modrm = 0xc0 | (modrm & 0x38) >> 3;
1679 if ((rex & REX_W) != 0
1680 && ABI_64_P (link_info->output_bfd))
1681 {
1682 /* Keep the REX_W bit in REX byte for LP64. */
1683 r_type = R_X86_64_32S;
1684 goto rewrite_modrm_rex;
1685 }
1686 else
1687 {
1688 /* If the REX_W bit in REX byte isn't needed,
1689 use R_X86_64_32 and clear the W bit to avoid
1690 sign-extend imm32 to imm64. */
1691 r_type = R_X86_64_32;
1692 /* Clear the W bit in REX byte. */
1693 rex_mask |= REX_W;
1694 goto rewrite_modrm_rex;
1695 }
1696 }
1697 }
1698 else
1699 {
1700 /* R_X86_64_PC32 isn't supported. */
1701 if (to_reloc_pc32)
1702 return TRUE;
1703
1704 modrm = bfd_get_8 (abfd, contents + roff - 1);
1705 if (opcode == 0x85)
1706 {
1707 /* Convert "test %reg, foo@GOTPCREL(%rip)" to
1708 "test $foo, %reg". */
1709 modrm = 0xc0 | (modrm & 0x38) >> 3;
1710 opcode = 0xf7;
1711 }
1712 else
1713 {
1714 /* Convert "binop foo@GOTPCREL(%rip), %reg" to
1715 "binop $foo, %reg". */
1716 modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
1717 opcode = 0x81;
1718 }
1719
1720 /* Use R_X86_64_32 with 32-bit operand to avoid relocation
1721 overflow when sign-extending imm32 to imm64. */
1722 r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
1723
1724rewrite_modrm_rex:
1725 bfd_put_8 (abfd, modrm, contents + roff - 1);
1726
1727 if (rex)
1728 {
1729 /* Move the R bit to the B bit in REX byte. */
1730 rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
1731 bfd_put_8 (abfd, rex, contents + roff - 3);
1732 }
1733
1734 /* No addend for R_X86_64_32/R_X86_64_32S relocations. */
1735 irel->r_addend = 0;
1736 }
1737
1738 bfd_put_8 (abfd, opcode, contents + roff - 2);
1739 }
1740
6999821f 1741 *r_type_p = r_type;
78984959
L
1742 irel->r_info = htab->r_info (r_symndx,
1743 r_type | R_X86_64_converted_reloc_bit);
c175a657
L
1744
1745 *converted = TRUE;
1746
1747 return TRUE;
1748}
1749
70256ad8 1750/* Look through the relocs for a section during the first phase, and
c434dee6
AJ
1751 calculate needed space in the global offset table, procedure
1752 linkage table, and dynamic reloc sections. */
70256ad8 1753
b34976b6 1754static bfd_boolean
351f65ca
L
1755elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1756 asection *sec,
1757 const Elf_Internal_Rela *relocs)
70256ad8 1758{
0afcef53 1759 struct elf_x86_link_hash_table *htab;
70256ad8
AJ
1760 Elf_Internal_Shdr *symtab_hdr;
1761 struct elf_link_hash_entry **sym_hashes;
70256ad8
AJ
1762 const Elf_Internal_Rela *rel;
1763 const Elf_Internal_Rela *rel_end;
70256ad8 1764 asection *sreloc;
bedfd056 1765 bfd_byte *contents;
5e5e02ae 1766 bfd_boolean converted;
70256ad8 1767
0e1862bb 1768 if (bfd_link_relocatable (info))
b34976b6 1769 return TRUE;
70256ad8 1770
081b1afe
L
1771 /* Don't do anything special with non-loaded, non-alloced sections.
1772 In particular, any relocs in such sections should not affect GOT
1773 and PLT reference counting (ie. we don't allow them to create GOT
1774 or PLT entries), there's no possibility or desire to optimize TLS
1775 relocs, and there's not much point in propagating relocs to shared
1776 libs that the dynamic linker won't relocate. */
1777 if ((sec->flags & SEC_ALLOC) == 0)
1778 return TRUE;
1779
0afcef53 1780 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6 1781 if (htab == NULL)
afd9acee
L
1782 {
1783 sec->check_relocs_failed = 1;
1784 return FALSE;
1785 }
4dfe6ac6 1786
fe53b4a4
L
1787 BFD_ASSERT (is_x86_elf (abfd, htab));
1788
bedfd056
L
1789 /* Get the section contents. */
1790 if (elf_section_data (sec)->this_hdr.contents != NULL)
1791 contents = elf_section_data (sec)->this_hdr.contents;
1792 else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1793 {
1794 sec->check_relocs_failed = 1;
1795 return FALSE;
1796 }
1797
0ffa91dd 1798 symtab_hdr = &elf_symtab_hdr (abfd);
70256ad8 1799 sym_hashes = elf_sym_hashes (abfd);
70256ad8 1800
5e5e02ae
L
1801 converted = FALSE;
1802
c434dee6 1803 sreloc = NULL;
cbe950e9 1804
70256ad8
AJ
1805 rel_end = relocs + sec->reloc_count;
1806 for (rel = relocs; rel < rel_end; rel++)
1807 {
bffbf940 1808 unsigned int r_type;
d42c267e 1809 unsigned int r_symndx;
70256ad8 1810 struct elf_link_hash_entry *h;
0afcef53 1811 struct elf_x86_link_hash_entry *eh;
4c544807
L
1812 Elf_Internal_Sym *isym;
1813 const char *name;
06a6a421 1814 bfd_boolean size_reloc;
6999821f 1815 bfd_boolean converted_reloc;
70256ad8 1816
351f65ca
L
1817 r_symndx = htab->r_sym (rel->r_info);
1818 r_type = ELF32_R_TYPE (rel->r_info);
c434dee6
AJ
1819
1820 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1821 {
695344c0 1822 /* xgettext:c-format */
4eca0228
AM
1823 _bfd_error_handler (_("%B: bad symbol index: %d"),
1824 abfd, r_symndx);
afd9acee 1825 goto error_return;
c434dee6
AJ
1826 }
1827
70256ad8 1828 if (r_symndx < symtab_hdr->sh_info)
c25bc9fc
L
1829 {
1830 /* A local symbol. */
c2e61a4e
L
1831 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1832 abfd, r_symndx);
1833 if (isym == NULL)
afd9acee 1834 goto error_return;
c25bc9fc
L
1835
1836 /* Check relocation against local STT_GNU_IFUNC symbol. */
351f65ca 1837 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
c25bc9fc 1838 {
0afcef53
L
1839 h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel,
1840 TRUE);
c25bc9fc 1841 if (h == NULL)
afd9acee 1842 goto error_return;
6bbec505 1843
c25bc9fc 1844 /* Fake a STT_GNU_IFUNC symbol. */
6322e5c5
L
1845 h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1846 isym, NULL);
c25bc9fc
L
1847 h->type = STT_GNU_IFUNC;
1848 h->def_regular = 1;
1849 h->ref_regular = 1;
1850 h->forced_local = 1;
1851 h->root.type = bfd_link_hash_defined;
1852 }
1853 else
1854 h = NULL;
1855 }
70256ad8 1856 else
71cb9464 1857 {
4c544807 1858 isym = NULL;
71cb9464
L
1859 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1860 while (h->root.type == bfd_link_hash_indirect
1861 || h->root.type == bfd_link_hash_warning)
1862 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c25bc9fc 1863 }
cbe950e9 1864
d1534d16
L
1865 /* Check invalid x32 relocations. */
1866 if (!ABI_64_P (abfd))
1867 switch (r_type)
1868 {
1869 default:
1870 break;
1871
d1534d16
L
1872 case R_X86_64_DTPOFF64:
1873 case R_X86_64_TPOFF64:
1874 case R_X86_64_PC64:
1875 case R_X86_64_GOTOFF64:
1876 case R_X86_64_GOT64:
1877 case R_X86_64_GOTPCREL64:
1878 case R_X86_64_GOTPC64:
1879 case R_X86_64_GOTPLT64:
1880 case R_X86_64_PLTOFF64:
1881 {
1882 if (h)
1883 name = h->root.root.string;
1884 else
1885 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1886 NULL);
4eca0228 1887 _bfd_error_handler
695344c0 1888 /* xgettext:c-format */
d1534d16
L
1889 (_("%B: relocation %s against symbol `%s' isn't "
1890 "supported in x32 mode"), abfd,
1891 x86_64_elf_howto_table[r_type].name, name);
1892 bfd_set_error (bfd_error_bad_value);
afd9acee 1893 goto error_return;
d1534d16
L
1894 }
1895 break;
1896 }
1897
c25bc9fc
L
1898 if (h != NULL)
1899 {
ad1e85de
L
1900 /* It is referenced by a non-shared object. */
1901 h->ref_regular = 1;
13a2df29
L
1902
1903 if (h->type == STT_GNU_IFUNC)
1904 elf_tdata (info->output_bfd)->has_gnu_symbols
1905 |= elf_gnu_symbol_ifunc;
71cb9464 1906 }
70256ad8 1907
6999821f
L
1908 converted_reloc = FALSE;
1909 if ((r_type == R_X86_64_GOTPCREL
1910 || r_type == R_X86_64_GOTPCRELX
1911 || r_type == R_X86_64_REX_GOTPCRELX)
1912 && (h == NULL || h->type != STT_GNU_IFUNC))
1913 {
1914 Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1915 if (!elf_x86_64_convert_load_reloc (abfd, contents, &r_type,
1916 irel, h, &converted_reloc,
1917 info))
1918 goto error_return;
5e5e02ae
L
1919
1920 if (converted_reloc)
1921 converted = TRUE;
6999821f
L
1922 }
1923
bedfd056 1924 if (! elf_x86_64_tls_transition (info, abfd, sec, contents,
351f65ca
L
1925 symtab_hdr, sym_hashes,
1926 &r_type, GOT_UNKNOWN,
bedfd056 1927 rel, rel_end, h, r_symndx, FALSE))
afd9acee 1928 goto error_return;
142411ca 1929
cd048363
L
1930 /* Check if _GLOBAL_OFFSET_TABLE_ is referenced. */
1931 if (h == htab->elf.hgot)
1932 htab->got_referenced = TRUE;
1933
0afcef53 1934 eh = (struct elf_x86_link_hash_entry *) h;
bffbf940 1935 switch (r_type)
70256ad8 1936 {
bffbf940 1937 case R_X86_64_TLSLD:
0f09b4d8 1938 htab->tls_ld_or_ldm_got.refcount = 1;
bffbf940
JJ
1939 goto create_got;
1940
1941 case R_X86_64_TPOFF32:
0e1862bb 1942 if (!bfd_link_executable (info) && ABI_64_P (abfd))
aab921ad 1943 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
338c190a 1944 &x86_64_elf_howto_table[r_type]);
aec6b87e 1945 if (eh != NULL)
98b273dc 1946 eh->zero_undefweak &= 0x2;
bffbf940 1947 break;
c434dee6 1948
bffbf940 1949 case R_X86_64_GOTTPOFF:
0e1862bb 1950 if (!bfd_link_executable (info))
bffbf940
JJ
1951 info->flags |= DF_STATIC_TLS;
1952 /* Fall through */
70256ad8 1953
bffbf940
JJ
1954 case R_X86_64_GOT32:
1955 case R_X86_64_GOTPCREL:
56ceb5b5
L
1956 case R_X86_64_GOTPCRELX:
1957 case R_X86_64_REX_GOTPCRELX:
bffbf940 1958 case R_X86_64_TLSGD:
7b81dfbb
AJ
1959 case R_X86_64_GOT64:
1960 case R_X86_64_GOTPCREL64:
1961 case R_X86_64_GOTPLT64:
67a4f2b7
AO
1962 case R_X86_64_GOTPC32_TLSDESC:
1963 case R_X86_64_TLSDESC_CALL:
bffbf940
JJ
1964 /* This symbol requires a global offset table entry. */
1965 {
1966 int tls_type, old_tls_type;
1967
1968 switch (r_type)
1969 {
1970 default: tls_type = GOT_NORMAL; break;
1971 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
1972 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
67a4f2b7
AO
1973 case R_X86_64_GOTPC32_TLSDESC:
1974 case R_X86_64_TLSDESC_CALL:
1975 tls_type = GOT_TLS_GDESC; break;
bffbf940
JJ
1976 }
1977
1978 if (h != NULL)
1979 {
0f09b4d8 1980 h->got.refcount = 1;
aec6b87e 1981 old_tls_type = eh->tls_type;
bffbf940
JJ
1982 }
1983 else
1984 {
1985 bfd_signed_vma *local_got_refcounts;
1986
1987 /* This is a global offset table entry for a local symbol. */
1988 local_got_refcounts = elf_local_got_refcounts (abfd);
1989 if (local_got_refcounts == NULL)
1990 {
1991 bfd_size_type size;
1992
1993 size = symtab_hdr->sh_info;
67a4f2b7
AO
1994 size *= sizeof (bfd_signed_vma)
1995 + sizeof (bfd_vma) + sizeof (char);
bffbf940
JJ
1996 local_got_refcounts = ((bfd_signed_vma *)
1997 bfd_zalloc (abfd, size));
1998 if (local_got_refcounts == NULL)
afd9acee 1999 goto error_return;
bffbf940 2000 elf_local_got_refcounts (abfd) = local_got_refcounts;
0afcef53 2001 elf_x86_local_tlsdesc_gotent (abfd)
67a4f2b7 2002 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
0afcef53 2003 elf_x86_local_got_tls_type (abfd)
67a4f2b7 2004 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
bffbf940 2005 }
0f09b4d8 2006 local_got_refcounts[r_symndx] = 1;
bffbf940 2007 old_tls_type
0afcef53 2008 = elf_x86_local_got_tls_type (abfd) [r_symndx];
bffbf940
JJ
2009 }
2010
2011 /* If a TLS symbol is accessed using IE at least once,
2012 there is no point to use dynamic model for it. */
2013 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7
AO
2014 && (! GOT_TLS_GD_ANY_P (old_tls_type)
2015 || tls_type != GOT_TLS_IE))
bffbf940 2016 {
67a4f2b7 2017 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
bffbf940 2018 tls_type = old_tls_type;
67a4f2b7
AO
2019 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2020 && GOT_TLS_GD_ANY_P (tls_type))
2021 tls_type |= old_tls_type;
bffbf940
JJ
2022 else
2023 {
09a24cbf 2024 if (h)
4c544807
L
2025 name = h->root.root.string;
2026 else
2027 name = bfd_elf_sym_name (abfd, symtab_hdr,
2028 isym, NULL);
4eca0228 2029 _bfd_error_handler
695344c0 2030 /* xgettext:c-format */
63a5468a
AM
2031 (_("%B: '%s' accessed both as normal and"
2032 " thread local symbol"),
4c544807 2033 abfd, name);
68c4a57e 2034 bfd_set_error (bfd_error_bad_value);
afd9acee 2035 goto error_return;
bffbf940
JJ
2036 }
2037 }
2038
2039 if (old_tls_type != tls_type)
2040 {
aec6b87e
L
2041 if (eh != NULL)
2042 eh->tls_type = tls_type;
bffbf940 2043 else
0afcef53 2044 elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
bffbf940
JJ
2045 }
2046 }
c434dee6
AJ
2047 /* Fall through */
2048
d6ab8113
JB
2049 case R_X86_64_GOTOFF64:
2050 case R_X86_64_GOTPC32:
7b81dfbb 2051 case R_X86_64_GOTPC64:
bffbf940 2052 create_got:
aec6b87e 2053 if (eh != NULL)
98b273dc 2054 eh->zero_undefweak &= 0x2;
70256ad8
AJ
2055 break;
2056
2057 case R_X86_64_PLT32:
c3320543 2058 case R_X86_64_PLT32_BND:
70256ad8 2059 /* This symbol requires a procedure linkage table entry. We
407443a3
AJ
2060 actually build the entry in adjust_dynamic_symbol,
2061 because this might be a case of linking PIC code which is
2062 never referenced by a dynamic object, in which case we
2063 don't need to generate a procedure linkage table entry
2064 after all. */
70256ad8
AJ
2065
2066 /* If this is a local symbol, we resolve it directly without
407443a3 2067 creating a procedure linkage table entry. */
70256ad8
AJ
2068 if (h == NULL)
2069 continue;
2070
98b273dc 2071 eh->zero_undefweak &= 0x2;
f5385ebf 2072 h->needs_plt = 1;
79b0c981 2073 h->plt.refcount = 1;
70256ad8
AJ
2074 break;
2075
7b81dfbb
AJ
2076 case R_X86_64_PLTOFF64:
2077 /* This tries to form the 'address' of a function relative
2078 to GOT. For global symbols we need a PLT entry. */
2079 if (h != NULL)
2080 {
2081 h->needs_plt = 1;
79b0c981 2082 h->plt.refcount = 1;
7b81dfbb
AJ
2083 }
2084 goto create_got;
2085
6a3e1bae
L
2086 case R_X86_64_SIZE32:
2087 case R_X86_64_SIZE64:
06a6a421 2088 size_reloc = TRUE;
6a3e1bae
L
2089 goto do_size;
2090
248775ba
L
2091 case R_X86_64_32:
2092 if (!ABI_64_P (abfd))
2093 goto pointer;
1a0670f3 2094 /* Fall through. */
cc78d0af
AJ
2095 case R_X86_64_8:
2096 case R_X86_64_16:
70256ad8 2097 case R_X86_64_32S:
338c190a
L
2098 /* Check relocation overflow as these relocs may lead to
2099 run-time relocation overflow. Don't error out for
1b71fb54 2100 sections we don't care about, such as debug sections or
338c190a 2101 when relocation overflow check is disabled. */
4c10bbaa 2102 if (!info->no_reloc_overflow_check
6999821f 2103 && !converted_reloc
338c190a
L
2104 && (bfd_link_pic (info)
2105 || (bfd_link_executable (info)
2106 && h != NULL
2107 && !h->def_regular
2108 && h->def_dynamic
081b1afe 2109 && (sec->flags & SEC_READONLY) == 0)))
aab921ad 2110 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
338c190a 2111 &x86_64_elf_howto_table[r_type]);
1b71fb54
AJ
2112 /* Fall through. */
2113
c434dee6
AJ
2114 case R_X86_64_PC8:
2115 case R_X86_64_PC16:
70256ad8 2116 case R_X86_64_PC32:
c3320543 2117 case R_X86_64_PC32_BND:
d6ab8113 2118 case R_X86_64_PC64:
1b71fb54 2119 case R_X86_64_64:
248775ba 2120pointer:
aec6b87e 2121 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
98b273dc 2122 eh->zero_undefweak |= 0x2;
bf52d7c7
L
2123 /* We are called after all symbols have been resolved. Only
2124 relocation against STT_GNU_IFUNC symbol must go through
2125 PLT. */
d1ed1c7d
L
2126 if (h != NULL
2127 && (bfd_link_executable (info)
bf52d7c7 2128 || h->type == STT_GNU_IFUNC))
c434dee6 2129 {
79b0c981 2130 bfd_boolean func_pointer_ref = FALSE;
233cc9c1 2131
5db4f0d3
L
2132 if (r_type == R_X86_64_PC32)
2133 {
2134 /* Since something like ".long foo - ." may be used
2135 as pointer, make sure that PLT is used if foo is
2136 a function defined in a shared library. */
2137 if ((sec->flags & SEC_CODE) == 0)
2138 h->pointer_equality_needed = 1;
2139 }
2140 else if (r_type != R_X86_64_PC32_BND
2141 && r_type != R_X86_64_PC64)
04ebc307
L
2142 {
2143 h->pointer_equality_needed = 1;
2144 /* At run-time, R_X86_64_64 can be resolved for both
2145 x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2146 can only be resolved for x32. */
2147 if ((sec->flags & SEC_READONLY) == 0
2148 && (r_type == R_X86_64_64
2149 || (!ABI_64_P (abfd)
2150 && (r_type == R_X86_64_32
2151 || r_type == R_X86_64_32S))))
79b0c981
L
2152 func_pointer_ref = TRUE;
2153 }
2154
2155 if (!func_pointer_ref)
2156 {
2157 /* If this reloc is in a read-only section, we might
2158 need a copy reloc. We can't check reliably at this
2159 stage whether the section is read-only, as input
2160 sections have not yet been mapped to output sections.
2161 Tentatively set the flag for now, and correct in
2162 adjust_dynamic_symbol. */
2163 h->non_got_ref = 1;
2164
2165 /* We may need a .plt entry if the symbol is a function
2166 defined in a shared lib or is a function referenced
2167 from the code or read-only section. */
2168 if (!h->def_regular
2169 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2170 h->plt.refcount = 1;
04ebc307 2171 }
c434dee6 2172 }
70256ad8 2173
06a6a421 2174 size_reloc = FALSE;
6a3e1bae 2175do_size:
daf1c414
L
2176 if (NEED_DYNAMIC_RELOCATION_P (info, h, sec, r_type,
2177 htab->pointer_r_type))
70256ad8 2178 {
e03a8ed8
L
2179 struct elf_dyn_relocs *p;
2180 struct elf_dyn_relocs **head;
c434dee6
AJ
2181
2182 /* We must copy these reloc types into the output file.
2183 Create a reloc section in dynobj and make room for
2184 this reloc. */
70256ad8
AJ
2185 if (sreloc == NULL)
2186 {
83bac4b0 2187 sreloc = _bfd_elf_make_dynamic_reloc_section
82e96e07
L
2188 (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2189 abfd, /*rela?*/ TRUE);
70256ad8 2190
70256ad8 2191 if (sreloc == NULL)
afd9acee 2192 goto error_return;
70256ad8
AJ
2193 }
2194
c434dee6
AJ
2195 /* If this is a global symbol, we count the number of
2196 relocations we need for this symbol. */
2197 if (h != NULL)
aec6b87e 2198 head = &eh->dyn_relocs;
c434dee6
AJ
2199 else
2200 {
2201 /* Track dynamic relocs needed for local syms too.
2202 We really need local syms available to do this
2203 easily. Oh well. */
c434dee6 2204 asection *s;
87d72d41 2205 void **vpp;
87d72d41
AM
2206
2207 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2208 abfd, r_symndx);
2209 if (isym == NULL)
afd9acee 2210 goto error_return;
87d72d41
AM
2211
2212 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
c434dee6 2213 if (s == NULL)
87d72d41 2214 s = sec;
70256ad8 2215
e81d3500
DD
2216 /* Beware of type punned pointers vs strict aliasing
2217 rules. */
2218 vpp = &(elf_section_data (s)->local_dynrel);
e03a8ed8 2219 head = (struct elf_dyn_relocs **)vpp;
c434dee6 2220 }
70256ad8 2221
c434dee6
AJ
2222 p = *head;
2223 if (p == NULL || p->sec != sec)
2224 {
2225 bfd_size_type amt = sizeof *p;
d8045f23 2226
e03a8ed8 2227 p = ((struct elf_dyn_relocs *)
c434dee6 2228 bfd_alloc (htab->elf.dynobj, amt));
70256ad8 2229 if (p == NULL)
afd9acee 2230 goto error_return;
c434dee6
AJ
2231 p->next = *head;
2232 *head = p;
2233 p->sec = sec;
2234 p->count = 0;
2235 p->pc_count = 0;
70256ad8 2236 }
c434dee6
AJ
2237
2238 p->count += 1;
06a6a421 2239 /* Count size relocation as PC-relative relocation. */
daf1c414 2240 if (X86_PCREL_TYPE_P (r_type) || size_reloc)
c434dee6 2241 p->pc_count += 1;
70256ad8
AJ
2242 }
2243 break;
fe4770f4
AJ
2244
2245 /* This relocation describes the C++ object vtable hierarchy.
2246 Reconstruct it for later use during GC. */
2247 case R_X86_64_GNU_VTINHERIT:
c152c796 2248 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
afd9acee 2249 goto error_return;
fe4770f4
AJ
2250 break;
2251
2252 /* This relocation describes which C++ vtable entries are actually
2253 used. Record for later use during GC. */
2254 case R_X86_64_GNU_VTENTRY:
d17e0c6e
JB
2255 BFD_ASSERT (h != NULL);
2256 if (h != NULL
2257 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
afd9acee 2258 goto error_return;
fe4770f4 2259 break;
c434dee6
AJ
2260
2261 default:
2262 break;
70256ad8
AJ
2263 }
2264 }
2265
bedfd056
L
2266 if (elf_section_data (sec)->this_hdr.contents != contents)
2267 {
5e5e02ae 2268 if (!converted && !info->keep_memory)
bedfd056
L
2269 free (contents);
2270 else
2271 {
5e5e02ae
L
2272 /* Cache the section contents for elf_link_input_bfd if any
2273 load is converted or --no-keep-memory isn't used. */
bedfd056
L
2274 elf_section_data (sec)->this_hdr.contents = contents;
2275 }
2276 }
2277
5e5e02ae
L
2278 /* Cache relocations if any load is converted. */
2279 if (elf_section_data (sec)->relocs != relocs && converted)
2280 elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
2281
b34976b6 2282 return TRUE;
afd9acee
L
2283
2284error_return:
bedfd056
L
2285 if (elf_section_data (sec)->this_hdr.contents != contents)
2286 free (contents);
afd9acee
L
2287 sec->check_relocs_failed = 1;
2288 return FALSE;
70256ad8
AJ
2289}
2290
bffbf940
JJ
2291/* Return the relocation value for @tpoff relocation
2292 if STT_TLS virtual address is ADDRESS. */
2293
2294static bfd_vma
351f65ca 2295elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
bffbf940 2296{
e1918d23 2297 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO
2298 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2299 bfd_vma static_tls_size;
bffbf940
JJ
2300
2301 /* If tls_segment is NULL, we should have signalled an error already. */
e1918d23 2302 if (htab->tls_sec == NULL)
bffbf940 2303 return 0;
7dc98aea
RO
2304
2305 /* Consider special static TLS alignment requirements. */
2306 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2307 return address - static_tls_size - htab->tls_sec->vma;
bffbf940
JJ
2308}
2309
8d88c4ca
NC
2310/* Relocate an x86_64 ELF section. */
2311
b34976b6 2312static bfd_boolean
351f65ca
L
2313elf_x86_64_relocate_section (bfd *output_bfd,
2314 struct bfd_link_info *info,
2315 bfd *input_bfd,
2316 asection *input_section,
2317 bfd_byte *contents,
2318 Elf_Internal_Rela *relocs,
2319 Elf_Internal_Sym *local_syms,
2320 asection **local_sections)
8d88c4ca 2321{
0afcef53 2322 struct elf_x86_link_hash_table *htab;
8d88c4ca
NC
2323 Elf_Internal_Shdr *symtab_hdr;
2324 struct elf_link_hash_entry **sym_hashes;
2325 bfd_vma *local_got_offsets;
67a4f2b7 2326 bfd_vma *local_tlsdesc_gotents;
c434dee6 2327 Elf_Internal_Rela *rel;
60f2e42e 2328 Elf_Internal_Rela *wrel;
8d88c4ca 2329 Elf_Internal_Rela *relend;
38b12349 2330 unsigned int plt_entry_size;
8d88c4ca 2331
338c190a
L
2332 /* Skip if check_relocs failed. */
2333 if (input_section->check_relocs_failed)
2334 return FALSE;
2335
0afcef53 2336 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
2337 if (htab == NULL)
2338 return FALSE;
fe53b4a4
L
2339
2340 BFD_ASSERT (is_x86_elf (input_bfd, htab));
2341
765e526c 2342 plt_entry_size = htab->plt.plt_entry_size;
0ffa91dd 2343 symtab_hdr = &elf_symtab_hdr (input_bfd);
8d88c4ca
NC
2344 sym_hashes = elf_sym_hashes (input_bfd);
2345 local_got_offsets = elf_local_got_offsets (input_bfd);
0afcef53 2346 local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
8d88c4ca 2347
0afcef53 2348 _bfd_x86_elf_set_tls_module_base (info);
9f03412a 2349
60f2e42e 2350 rel = wrel = relocs;
8d88c4ca 2351 relend = relocs + input_section->reloc_count;
60f2e42e 2352 for (; rel < relend; wrel++, rel++)
8d88c4ca 2353 {
419414ea 2354 unsigned int r_type, r_type_tls;
8d88c4ca
NC
2355 reloc_howto_type *howto;
2356 unsigned long r_symndx;
2357 struct elf_link_hash_entry *h;
0afcef53 2358 struct elf_x86_link_hash_entry *eh;
8d88c4ca
NC
2359 Elf_Internal_Sym *sym;
2360 asection *sec;
0ff2b86e 2361 bfd_vma off, offplt, plt_offset;
8d88c4ca 2362 bfd_vma relocation;
b34976b6 2363 bfd_boolean unresolved_reloc;
8d88c4ca 2364 bfd_reloc_status_type r;
bffbf940 2365 int tls_type;
0ff2b86e 2366 asection *base_got, *resolved_plt;
1788fc08 2367 bfd_vma st_size;
aec6b87e 2368 bfd_boolean resolved_to_zero;
9e9821dd 2369 bfd_boolean relative_reloc;
78984959 2370 bfd_boolean converted_reloc;
aebcc8ff 2371 bfd_boolean need_copy_reloc_in_pie;
8d88c4ca 2372
351f65ca 2373 r_type = ELF32_R_TYPE (rel->r_info);
fe4770f4
AJ
2374 if (r_type == (int) R_X86_64_GNU_VTINHERIT
2375 || r_type == (int) R_X86_64_GNU_VTENTRY)
18954b29
L
2376 {
2377 if (wrel != rel)
2378 *wrel = *rel;
2379 continue;
2380 }
8d88c4ca 2381
78984959
L
2382 converted_reloc = (r_type & R_X86_64_converted_reloc_bit) != 0;
2383 r_type &= ~R_X86_64_converted_reloc_bit;
2384
9911c0fc 2385 if (r_type >= (int) R_X86_64_standard)
47aeb64c 2386 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
8d88c4ca 2387
d7921315 2388 if (r_type != (int) R_X86_64_32
eed180f8 2389 || ABI_64_P (output_bfd))
d7921315
L
2390 howto = x86_64_elf_howto_table + r_type;
2391 else
2392 howto = (x86_64_elf_howto_table
2393 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
351f65ca 2394 r_symndx = htab->r_sym (rel->r_info);
8d88c4ca
NC
2395 h = NULL;
2396 sym = NULL;
2397 sec = NULL;
b34976b6 2398 unresolved_reloc = FALSE;
8d88c4ca 2399 if (r_symndx < symtab_hdr->sh_info)
8da6118f
KH
2400 {
2401 sym = local_syms + r_symndx;
2402 sec = local_sections[r_symndx];
c434dee6 2403
c25bc9fc
L
2404 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2405 &sec, rel);
1788fc08 2406 st_size = sym->st_size;
c25bc9fc
L
2407
2408 /* Relocate against local STT_GNU_IFUNC symbol. */
0e1862bb 2409 if (!bfd_link_relocatable (info)
351f65ca 2410 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc 2411 {
0afcef53
L
2412 h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd,
2413 rel, FALSE);
c25bc9fc
L
2414 if (h == NULL)
2415 abort ();
2416
eed180f8 2417 /* Set STT_GNU_IFUNC symbol value. */
c25bc9fc
L
2418 h->root.u.def.value = sym->st_value;
2419 h->root.u.def.section = sec;
2420 }
8da6118f 2421 }
8d88c4ca 2422 else
8da6118f 2423 {
c9736ba0 2424 bfd_boolean warned ATTRIBUTE_UNUSED;
62d887d4 2425 bfd_boolean ignored ATTRIBUTE_UNUSED;
c434dee6 2426
b2a8e766
AM
2427 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2428 r_symndx, symtab_hdr, sym_hashes,
2429 h, sec, relocation,
62d887d4 2430 unresolved_reloc, warned, ignored);
1788fc08 2431 st_size = h->size;
8da6118f 2432 }
ab96bf03 2433
dbaa2011 2434 if (sec != NULL && discarded_section (sec))
60f2e42e
L
2435 {
2436 _bfd_clear_contents (howto, input_bfd, input_section,
2437 contents + rel->r_offset);
2438 wrel->r_offset = rel->r_offset;
2439 wrel->r_info = 0;
2440 wrel->r_addend = 0;
2441
2442 /* For ld -r, remove relocations in debug sections against
2443 sections defined in discarded sections. Not done for
2444 eh_frame editing code expects to be present. */
2445 if (bfd_link_relocatable (info)
2446 && (input_section->flags & SEC_DEBUGGING))
2447 wrel--;
2448
2449 continue;
2450 }
ab96bf03 2451
0e1862bb 2452 if (bfd_link_relocatable (info))
2d5da473
L
2453 {
2454 if (wrel != rel)
2455 *wrel = *rel;
2456 continue;
2457 }
ab96bf03 2458
1788fc08 2459 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
64d25c44 2460 {
1788fc08
L
2461 if (r_type == R_X86_64_64)
2462 {
2463 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
2464 zero-extend it to 64bit if addend is zero. */
2465 r_type = R_X86_64_32;
2466 memset (contents + rel->r_offset + 4, 0, 4);
2467 }
2468 else if (r_type == R_X86_64_SIZE64)
2469 {
2470 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
2471 zero-extend it to 64bit if addend is zero. */
2472 r_type = R_X86_64_SIZE32;
2473 memset (contents + rel->r_offset + 4, 0, 4);
2474 }
64d25c44
L
2475 }
2476
0afcef53 2477 eh = (struct elf_x86_link_hash_entry *) h;
0ff2b86e 2478
cbe950e9
L
2479 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2480 it here if it is defined in a non-shared object. */
2481 if (h != NULL
2482 && h->type == STT_GNU_IFUNC
2483 && h->def_regular)
2484 {
cbe950e9 2485 bfd_vma plt_index;
4c544807 2486 const char *name;
cbe950e9 2487
97dc35c8
L
2488 if ((input_section->flags & SEC_ALLOC) == 0)
2489 {
2490 /* Dynamic relocs are not propagated for SEC_DEBUGGING
2491 sections because such sections are not SEC_ALLOC and
2492 thus ld.so will not process them. */
2493 if ((input_section->flags & SEC_DEBUGGING) != 0)
0eace210 2494 continue;
97dc35c8
L
2495 abort ();
2496 }
233cc9c1
L
2497
2498 switch (r_type)
2499 {
2500 default:
2501 break;
2502
2503 case R_X86_64_GOTPCREL:
2504 case R_X86_64_GOTPCRELX:
2505 case R_X86_64_REX_GOTPCRELX:
2506 case R_X86_64_GOTPCREL64:
2507 base_got = htab->elf.sgot;
2508 off = h->got.offset;
2509
2510 if (base_got == NULL)
2511 abort ();
2512
2513 if (off == (bfd_vma) -1)
2514 {
2515 /* We can't use h->got.offset here to save state, or
2516 even just remember the offset, as finish_dynamic_symbol
2517 would use that as offset into .got. */
2518
2519 if (h->plt.offset == (bfd_vma) -1)
2520 abort ();
2521
2522 if (htab->elf.splt != NULL)
2523 {
38b12349 2524 plt_index = (h->plt.offset / plt_entry_size
765e526c 2525 - htab->plt.has_plt0);
233cc9c1
L
2526 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2527 base_got = htab->elf.sgotplt;
2528 }
2529 else
2530 {
2531 plt_index = h->plt.offset / plt_entry_size;
2532 off = plt_index * GOT_ENTRY_SIZE;
2533 base_got = htab->elf.igotplt;
2534 }
2535
2536 if (h->dynindx == -1
2537 || h->forced_local
2538 || info->symbolic)
2539 {
2540 /* This references the local defitionion. We must
2541 initialize this entry in the global offset table.
2542 Since the offset must always be a multiple of 8,
2543 we use the least significant bit to record
2544 whether we have initialized it already.
2545
2546 When doing a dynamic link, we create a .rela.got
2547 relocation entry to initialize the value. This
2548 is done in the finish_dynamic_symbol routine. */
2549 if ((off & 1) != 0)
2550 off &= ~1;
2551 else
2552 {
2553 bfd_put_64 (output_bfd, relocation,
2554 base_got->contents + off);
2555 /* Note that this is harmless for the GOTPLT64
2556 case, as -1 | 1 still is -1. */
2557 h->got.offset |= 1;
2558 }
2559 }
2560 }
2561
2562 relocation = (base_got->output_section->vma
2563 + base_got->output_offset + off);
2564
2565 goto do_relocation;
2566 }
2567
2568 if (h->plt.offset == (bfd_vma) -1)
2569 {
2570 /* Handle static pointers of STT_GNU_IFUNC symbols. */
2571 if (r_type == htab->pointer_r_type
2572 && (input_section->flags & SEC_CODE) == 0)
2573 goto do_ifunc_pointer;
2574 goto bad_ifunc_reloc;
2575 }
cbe950e9
L
2576
2577 /* STT_GNU_IFUNC symbol must go through PLT. */
0ff2b86e
L
2578 if (htab->elf.splt != NULL)
2579 {
f2c29a16 2580 if (htab->plt_second != NULL)
0ff2b86e 2581 {
f2c29a16
L
2582 resolved_plt = htab->plt_second;
2583 plt_offset = eh->plt_second.offset;
0ff2b86e
L
2584 }
2585 else
2586 {
2587 resolved_plt = htab->elf.splt;
2588 plt_offset = h->plt.offset;
2589 }
2590 }
2591 else
2592 {
2593 resolved_plt = htab->elf.iplt;
2594 plt_offset = h->plt.offset;
2595 }
2596
2597 relocation = (resolved_plt->output_section->vma
2598 + resolved_plt->output_offset + plt_offset);
cbe950e9
L
2599
2600 switch (r_type)
2601 {
2602 default:
233cc9c1 2603bad_ifunc_reloc:
4c544807
L
2604 if (h->root.root.string)
2605 name = h->root.root.string;
2606 else
2607 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2608 NULL);
4eca0228 2609 _bfd_error_handler
695344c0 2610 /* xgettext:c-format */
cbe950e9 2611 (_("%B: relocation %s against STT_GNU_IFUNC "
233cc9c1
L
2612 "symbol `%s' isn't supported"), input_bfd,
2613 howto->name, name);
cbe950e9
L
2614 bfd_set_error (bfd_error_bad_value);
2615 return FALSE;
2616
2617 case R_X86_64_32S:
0e1862bb 2618 if (bfd_link_pic (info))
cbe950e9 2619 abort ();
710ab287
L
2620 goto do_relocation;
2621
248775ba
L
2622 case R_X86_64_32:
2623 if (ABI_64_P (output_bfd))
2624 goto do_relocation;
17672001 2625 /* FALLTHROUGH */
eed180f8 2626 case R_X86_64_64:
233cc9c1 2627do_ifunc_pointer:
710ab287
L
2628 if (rel->r_addend != 0)
2629 {
4c544807
L
2630 if (h->root.root.string)
2631 name = h->root.root.string;
2632 else
2633 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
2634 sym, NULL);
4eca0228 2635 _bfd_error_handler
695344c0 2636 /* xgettext:c-format */
710ab287 2637 (_("%B: relocation %s against STT_GNU_IFUNC "
d42c267e 2638 "symbol `%s' has non-zero addend: %Ld"),
ef77d6af 2639 input_bfd, howto->name, name, rel->r_addend);
710ab287
L
2640 bfd_set_error (bfd_error_bad_value);
2641 return FALSE;
2642 }
2643
2644 /* Generate dynamic relcoation only when there is a
233cc9c1
L
2645 non-GOT reference in a shared object or there is no
2646 PLT. */
2647 if ((bfd_link_pic (info) && h->non_got_ref)
2648 || h->plt.offset == (bfd_vma) -1)
710ab287
L
2649 {
2650 Elf_Internal_Rela outrel;
710ab287
L
2651 asection *sreloc;
2652
c25bc9fc
L
2653 /* Need a dynamic relocation to get the real function
2654 address. */
710ab287
L
2655 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2656 info,
2657 input_section,
2658 rel->r_offset);
2659 if (outrel.r_offset == (bfd_vma) -1
2660 || outrel.r_offset == (bfd_vma) -2)
2661 abort ();
2662
2663 outrel.r_offset += (input_section->output_section->vma
2664 + input_section->output_offset);
2665
cf1070f1 2666 if (POINTER_LOCAL_IFUNC_P (info, h))
710ab287 2667 {
6322e5c5
L
2668 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
2669 h->root.root.string,
2670 h->root.u.def.section->owner);
2671
710ab287 2672 /* This symbol is resolved locally. */
56b8aada
L
2673 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
2674 outrel.r_addend = (h->root.u.def.value
2675 + h->root.u.def.section->output_section->vma
2676 + h->root.u.def.section->output_offset);
710ab287
L
2677 }
2678 else
2679 {
351f65ca 2680 outrel.r_info = htab->r_info (h->dynindx, r_type);
710ab287
L
2681 outrel.r_addend = 0;
2682 }
2683
233cc9c1
L
2684 /* Dynamic relocations are stored in
2685 1. .rela.ifunc section in PIC object.
2686 2. .rela.got section in dynamic executable.
2687 3. .rela.iplt section in static executable. */
2688 if (bfd_link_pic (info))
2689 sreloc = htab->elf.irelifunc;
2690 else if (htab->elf.splt != NULL)
2691 sreloc = htab->elf.srelgot;
2692 else
2693 sreloc = htab->elf.irelplt;
351f65ca 2694 elf_append_rela (output_bfd, sreloc, &outrel);
710ab287
L
2695
2696 /* If this reloc is against an external symbol, we
2697 do not want to fiddle with the addend. Otherwise,
2698 we need to include the symbol value so that it
2699 becomes an addend for the dynamic reloc. For an
2700 internal symbol, we have updated addend. */
56b8aada 2701 continue;
710ab287 2702 }
17672001 2703 /* FALLTHROUGH */
cbe950e9 2704 case R_X86_64_PC32:
c3320543 2705 case R_X86_64_PC32_BND:
cbe950e9
L
2706 case R_X86_64_PC64:
2707 case R_X86_64_PLT32:
c3320543 2708 case R_X86_64_PLT32_BND:
cbe950e9 2709 goto do_relocation;
cbe950e9
L
2710 }
2711 }
2712
aec6b87e 2713 resolved_to_zero = (eh != NULL
c5bce5c6 2714 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
aec6b87e 2715
70256ad8
AJ
2716 /* When generating a shared object, the relocations handled here are
2717 copied into the output file to be resolved at run time. */
2718 switch (r_type)
2719 {
2720 case R_X86_64_GOT32:
7b81dfbb 2721 case R_X86_64_GOT64:
70256ad8
AJ
2722 /* Relocation is to the entry for this symbol in the global
2723 offset table. */
70256ad8 2724 case R_X86_64_GOTPCREL:
56ceb5b5
L
2725 case R_X86_64_GOTPCRELX:
2726 case R_X86_64_REX_GOTPCRELX:
7b81dfbb
AJ
2727 case R_X86_64_GOTPCREL64:
2728 /* Use global offset table entry as symbol value. */
2729 case R_X86_64_GOTPLT64:
de194d85 2730 /* This is obsolete and treated the same as GOT64. */
6de2ae4a 2731 base_got = htab->elf.sgot;
7b81dfbb 2732
6de2ae4a 2733 if (htab->elf.sgot == NULL)
c434dee6 2734 abort ();
053579d7 2735
9e9821dd 2736 relative_reloc = FALSE;
51e0a107 2737 if (h != NULL)
70256ad8 2738 {
c434dee6 2739 off = h->got.offset;
7b81dfbb 2740 if (h->needs_plt
eed180f8 2741 && h->plt.offset != (bfd_vma)-1
7b81dfbb
AJ
2742 && off == (bfd_vma)-1)
2743 {
2744 /* We can't use h->got.offset here to save
2745 state, or even just remember the offset, as
2746 finish_dynamic_symbol would use that as offset into
2747 .got. */
38b12349 2748 bfd_vma plt_index = (h->plt.offset / plt_entry_size
765e526c 2749 - htab->plt.has_plt0);
7b81dfbb 2750 off = (plt_index + 3) * GOT_ENTRY_SIZE;
6de2ae4a 2751 base_got = htab->elf.sgotplt;
7b81dfbb
AJ
2752 }
2753
2eba97c2 2754 if (RESOLVED_LOCALLY_P (info, h, htab))
51e0a107 2755 {
2eba97c2
L
2756 /* We must initialize this entry in the global offset
2757 table. Since the offset must always be a multiple
2758 of 8, we use the least significant bit to record
2759 whether we have initialized it already.
51e0a107
JH
2760
2761 When doing a dynamic link, we create a .rela.got
407443a3
AJ
2762 relocation entry to initialize the value. This is
2763 done in the finish_dynamic_symbol routine. */
51e0a107
JH
2764 if ((off & 1) != 0)
2765 off &= ~1;
2766 else
2767 {
2768 bfd_put_64 (output_bfd, relocation,
7b81dfbb
AJ
2769 base_got->contents + off);
2770 /* Note that this is harmless for the GOTPLT64 case,
eed180f8 2771 as -1 | 1 still is -1. */
51e0a107 2772 h->got.offset |= 1;
9e9821dd 2773
f70656b2 2774 if (GENERATE_RELATIVE_RELOC_P (info, h))
9e9821dd
L
2775 {
2776 /* If this symbol isn't dynamic in PIC,
2777 generate R_X86_64_RELATIVE here. */
2778 eh->no_finish_dynamic_symbol = 1;
2779 relative_reloc = TRUE;
2780 }
51e0a107
JH
2781 }
2782 }
053579d7 2783 else
b34976b6 2784 unresolved_reloc = FALSE;
70256ad8 2785 }
51e0a107
JH
2786 else
2787 {
c434dee6
AJ
2788 if (local_got_offsets == NULL)
2789 abort ();
51e0a107
JH
2790
2791 off = local_got_offsets[r_symndx];
2792
2793 /* The offset must always be a multiple of 8. We use
407443a3
AJ
2794 the least significant bit to record whether we have
2795 already generated the necessary reloc. */
51e0a107
JH
2796 if ((off & 1) != 0)
2797 off &= ~1;
2798 else
2799 {
c434dee6 2800 bfd_put_64 (output_bfd, relocation,
7b81dfbb 2801 base_got->contents + off);
9e9821dd 2802 local_got_offsets[r_symndx] |= 1;
51e0a107 2803
0e1862bb 2804 if (bfd_link_pic (info))
9e9821dd 2805 relative_reloc = TRUE;
51e0a107 2806 }
51e0a107 2807 }
6a2bda3f 2808
9e9821dd
L
2809 if (relative_reloc)
2810 {
2811 asection *s;
2812 Elf_Internal_Rela outrel;
2813
2814 /* We need to generate a R_X86_64_RELATIVE reloc
2815 for the dynamic linker. */
2816 s = htab->elf.srelgot;
2817 if (s == NULL)
2818 abort ();
2819
2820 outrel.r_offset = (base_got->output_section->vma
2821 + base_got->output_offset
2822 + off);
2823 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
2824 outrel.r_addend = relocation;
2825 elf_append_rela (output_bfd, s, &outrel);
2826 }
2827
c434dee6
AJ
2828 if (off >= (bfd_vma) -2)
2829 abort ();
2830
7b81dfbb
AJ
2831 relocation = base_got->output_section->vma
2832 + base_got->output_offset + off;
56ceb5b5
L
2833 if (r_type != R_X86_64_GOTPCREL
2834 && r_type != R_X86_64_GOTPCRELX
2835 && r_type != R_X86_64_REX_GOTPCRELX
2836 && r_type != R_X86_64_GOTPCREL64)
6de2ae4a
L
2837 relocation -= htab->elf.sgotplt->output_section->vma
2838 - htab->elf.sgotplt->output_offset;
c434dee6 2839
70256ad8
AJ
2840 break;
2841
d6ab8113
JB
2842 case R_X86_64_GOTOFF64:
2843 /* Relocation is relative to the start of the global offset
2844 table. */
2845
3d949995
L
2846 /* Check to make sure it isn't a protected function or data
2847 symbol for shared library since it may not be local when
e3c0e327
L
2848 used as function address or with copy relocation. We also
2849 need to make sure that a symbol is referenced locally. */
0e1862bb 2850 if (bfd_link_pic (info) && h)
d6ab8113 2851 {
e3c0e327
L
2852 if (!h->def_regular)
2853 {
2854 const char *v;
2855
2856 switch (ELF_ST_VISIBILITY (h->other))
2857 {
2858 case STV_HIDDEN:
2859 v = _("hidden symbol");
2860 break;
2861 case STV_INTERNAL:
2862 v = _("internal symbol");
2863 break;
2864 case STV_PROTECTED:
2865 v = _("protected symbol");
2866 break;
2867 default:
2868 v = _("symbol");
2869 break;
2870 }
2871
4eca0228 2872 _bfd_error_handler
695344c0 2873 /* xgettext:c-format */
63a5468a
AM
2874 (_("%B: relocation R_X86_64_GOTOFF64 against undefined %s"
2875 " `%s' can not be used when making a shared object"),
e3c0e327
L
2876 input_bfd, v, h->root.root.string);
2877 bfd_set_error (bfd_error_bad_value);
2878 return FALSE;
2879 }
0e1862bb 2880 else if (!bfd_link_executable (info)
6999821f 2881 && !SYMBOL_REFERENCES_LOCAL_P (info, h)
e3c0e327
L
2882 && (h->type == STT_FUNC
2883 || h->type == STT_OBJECT)
2884 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2885 {
4eca0228 2886 _bfd_error_handler
695344c0 2887 /* xgettext:c-format */
63a5468a
AM
2888 (_("%B: relocation R_X86_64_GOTOFF64 against protected %s"
2889 " `%s' can not be used when making a shared object"),
e3c0e327
L
2890 input_bfd,
2891 h->type == STT_FUNC ? "function" : "data",
2892 h->root.root.string);
2893 bfd_set_error (bfd_error_bad_value);
d6ab8113 2894 return FALSE;
e3c0e327 2895 }
d6ab8113
JB
2896 }
2897
2898 /* Note that sgot is not involved in this
2899 calculation. We always want the start of .got.plt. If we
2900 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2901 permitted by the ABI, we might have to change this
2902 calculation. */
6de2ae4a
L
2903 relocation -= htab->elf.sgotplt->output_section->vma
2904 + htab->elf.sgotplt->output_offset;
d6ab8113
JB
2905 break;
2906
2907 case R_X86_64_GOTPC32:
7b81dfbb 2908 case R_X86_64_GOTPC64:
d6ab8113 2909 /* Use global offset table as symbol value. */
6de2ae4a
L
2910 relocation = htab->elf.sgotplt->output_section->vma
2911 + htab->elf.sgotplt->output_offset;
d6ab8113
JB
2912 unresolved_reloc = FALSE;
2913 break;
7b81dfbb
AJ
2914
2915 case R_X86_64_PLTOFF64:
2916 /* Relocation is PLT entry relative to GOT. For local
2917 symbols it's the symbol itself relative to GOT. */
eed180f8 2918 if (h != NULL
7b81dfbb 2919 /* See PLT32 handling. */
9d734efa
L
2920 && (h->plt.offset != (bfd_vma) -1
2921 || eh->plt_got.offset != (bfd_vma) -1)
6de2ae4a 2922 && htab->elf.splt != NULL)
7b81dfbb 2923 {
9d734efa
L
2924 if (eh->plt_got.offset != (bfd_vma) -1)
2925 {
2926 /* Use the GOT PLT. */
2927 resolved_plt = htab->plt_got;
2928 plt_offset = eh->plt_got.offset;
2929 }
f2c29a16 2930 else if (htab->plt_second != NULL)
0ff2b86e 2931 {
f2c29a16
L
2932 resolved_plt = htab->plt_second;
2933 plt_offset = eh->plt_second.offset;
0ff2b86e
L
2934 }
2935 else
2936 {
2937 resolved_plt = htab->elf.splt;
2938 plt_offset = h->plt.offset;
2939 }
2940
2941 relocation = (resolved_plt->output_section->vma
2942 + resolved_plt->output_offset
2943 + plt_offset);
7b81dfbb
AJ
2944 unresolved_reloc = FALSE;
2945 }
2946
6de2ae4a
L
2947 relocation -= htab->elf.sgotplt->output_section->vma
2948 + htab->elf.sgotplt->output_offset;
7b81dfbb 2949 break;
d6ab8113 2950
70256ad8 2951 case R_X86_64_PLT32:
c3320543 2952 case R_X86_64_PLT32_BND:
70256ad8
AJ
2953 /* Relocation is to the entry for this symbol in the
2954 procedure linkage table. */
2955
2956 /* Resolve a PLT32 reloc against a local symbol directly,
407443a3 2957 without using the procedure linkage table. */
70256ad8
AJ
2958 if (h == NULL)
2959 break;
2960
dd7e64d4
L
2961 if ((h->plt.offset == (bfd_vma) -1
2962 && eh->plt_got.offset == (bfd_vma) -1)
6de2ae4a 2963 || htab->elf.splt == NULL)
70256ad8
AJ
2964 {
2965 /* We didn't make a PLT entry for this symbol. This
407443a3
AJ
2966 happens when statically linking PIC code, or when
2967 using -Bsymbolic. */
70256ad8
AJ
2968 break;
2969 }
2970
dd7e64d4 2971 if (h->plt.offset != (bfd_vma) -1)
0ff2b86e 2972 {
f2c29a16 2973 if (htab->plt_second != NULL)
dd7e64d4 2974 {
f2c29a16
L
2975 resolved_plt = htab->plt_second;
2976 plt_offset = eh->plt_second.offset;
dd7e64d4
L
2977 }
2978 else
2979 {
2980 resolved_plt = htab->elf.splt;
2981 plt_offset = h->plt.offset;
2982 }
0ff2b86e
L
2983 }
2984 else
2985 {
dd7e64d4
L
2986 /* Use the GOT PLT. */
2987 resolved_plt = htab->plt_got;
2988 plt_offset = eh->plt_got.offset;
0ff2b86e
L
2989 }
2990
2991 relocation = (resolved_plt->output_section->vma
2992 + resolved_plt->output_offset
2993 + plt_offset);
b34976b6 2994 unresolved_reloc = FALSE;
70256ad8
AJ
2995 break;
2996
1788fc08
L
2997 case R_X86_64_SIZE32:
2998 case R_X86_64_SIZE64:
1788fc08
L
2999 /* Set to symbol size. */
3000 relocation = st_size;
3001 goto direct;
3002
fd8ab9e5
AJ
3003 case R_X86_64_PC8:
3004 case R_X86_64_PC16:
3005 case R_X86_64_PC32:
c3320543 3006 case R_X86_64_PC32_BND:
6333bc0d 3007 /* Don't complain about -fPIC if the symbol is undefined when
bd7ab16b
L
3008 building executable unless it is unresolved weak symbol,
3009 references a dynamic definition in PIE or -z nocopyreloc
3010 is used. */
07d6d2b8 3011 if ((input_section->flags & SEC_ALLOC) != 0
90f487df 3012 && (input_section->flags & SEC_READONLY) != 0
6333bc0d 3013 && h != NULL
aec6b87e 3014 && ((bfd_link_executable (info)
7073b5b9
L
3015 && ((h->root.type == bfd_link_hash_undefweak
3016 && !resolved_to_zero)
bd7ab16b
L
3017 || (bfd_link_pie (info)
3018 && !h->def_regular
3019 && h->def_dynamic)
a5b4ee94
L
3020 || ((info->nocopyreloc
3021 || (eh->def_protected
3022 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
7073b5b9
L
3023 && h->def_dynamic
3024 && !(h->root.u.def.section->flags & SEC_CODE))))
c5bb8910 3025 || bfd_link_dll (info)))
6610a52d 3026 {
41bed6dd 3027 bfd_boolean fail = FALSE;
6999821f 3028 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
41bed6dd
L
3029 {
3030 /* Symbol is referenced locally. Make sure it is
bd7ab16b
L
3031 defined locally. */
3032 fail = !(h->def_regular || ELF_COMMON_DEF_P (h));
41bed6dd 3033 }
aec6b87e 3034 else if (!(bfd_link_pie (info)
bc696fd5 3035 && (h->needs_copy || eh->needs_copy)))
41bed6dd 3036 {
9a926d55 3037 /* Symbol doesn't need copy reloc and isn't referenced
bd7ab16b
L
3038 locally. Address of protected function may not be
3039 reachable at run-time. */
3040 fail = (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3041 || (ELF_ST_VISIBILITY (h->other) == STV_PROTECTED
3042 && h->type == STT_FUNC));
41bed6dd
L
3043 }
3044
3045 if (fail)
aab921ad 3046 return elf_x86_64_need_pic (info, input_bfd, input_section,
338c190a 3047 h, NULL, NULL, howto);
6610a52d
L
3048 }
3049 /* Fall through. */
3050
70256ad8
AJ
3051 case R_X86_64_8:
3052 case R_X86_64_16:
3053 case R_X86_64_32:
d6ab8113 3054 case R_X86_64_PC64:
6b3db546 3055 case R_X86_64_64:
80643fbc 3056 /* FIXME: The ABI says the linker should make sure the value is
407443a3 3057 the same when it's zeroextended to 64 bit. */
c434dee6 3058
1788fc08 3059direct:
b1e24c02 3060 if ((input_section->flags & SEC_ALLOC) == 0)
c434dee6
AJ
3061 break;
3062
aebcc8ff
L
3063 need_copy_reloc_in_pie = (bfd_link_pie (info)
3064 && h != NULL
3065 && (h->needs_copy
3066 || eh->needs_copy
3067 || (h->root.type
3068 == bfd_link_hash_undefined))
3069 && (X86_PCREL_TYPE_P (r_type)
3070 || X86_SIZE_TYPE_P (r_type)));
3071
3072 if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
3073 need_copy_reloc_in_pie,
3074 resolved_to_zero, FALSE))
70256ad8
AJ
3075 {
3076 Elf_Internal_Rela outrel;
b34976b6 3077 bfd_boolean skip, relocate;
c434dee6 3078 asection *sreloc;
70256ad8
AJ
3079
3080 /* When generating a shared object, these relocations
3081 are copied into the output file to be resolved at run
407443a3 3082 time. */
b34976b6
AM
3083 skip = FALSE;
3084 relocate = FALSE;
70256ad8 3085
c629eae0
JJ
3086 outrel.r_offset =
3087 _bfd_elf_section_offset (output_bfd, info, input_section,
c434dee6 3088 rel->r_offset);
c629eae0 3089 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 3090 skip = TRUE;
0fb19cbc 3091 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 3092 skip = TRUE, relocate = TRUE;
70256ad8
AJ
3093
3094 outrel.r_offset += (input_section->output_section->vma
3095 + input_section->output_offset);
3096
3097 if (skip)
0bb2d96a 3098 memset (&outrel, 0, sizeof outrel);
c434dee6 3099
e74399c4 3100 else if (COPY_INPUT_RELOC_P (info, h, r_type))
70256ad8 3101 {
351f65ca 3102 outrel.r_info = htab->r_info (h->dynindx, r_type);
c434dee6 3103 outrel.r_addend = rel->r_addend;
70256ad8
AJ
3104 }
3105 else
3106 {
4c10bbaa
L
3107 /* This symbol is local, or marked to become local.
3108 When relocation overflow check is disabled, we
3109 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
3110 if (r_type == htab->pointer_r_type
3111 || (r_type == R_X86_64_32
3112 && info->no_reloc_overflow_check))
607c0e09 3113 {
b34976b6 3114 relocate = TRUE;
351f65ca 3115 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
607c0e09
AS
3116 outrel.r_addend = relocation + rel->r_addend;
3117 }
64d25c44
L
3118 else if (r_type == R_X86_64_64
3119 && !ABI_64_P (output_bfd))
3120 {
3121 relocate = TRUE;
3122 outrel.r_info = htab->r_info (0,
3123 R_X86_64_RELATIVE64);
3124 outrel.r_addend = relocation + rel->r_addend;
8cf0d2dd
L
3125 /* Check addend overflow. */
3126 if ((outrel.r_addend & 0x80000000)
3127 != (rel->r_addend & 0x80000000))
3128 {
3129 const char *name;
268a8d3a 3130 int addend = rel->r_addend;
8cf0d2dd
L
3131 if (h && h->root.root.string)
3132 name = h->root.root.string;
3133 else
3134 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
3135 sym, NULL);
d42c267e
AM
3136 _bfd_error_handler
3137 /* xgettext:c-format */
3138 (_("%B: addend %s%#x in relocation %s against "
3139 "symbol `%s' at %#Lx in section `%A' is "
3140 "out of range"),
3141 input_bfd, addend < 0 ? "-" : "", addend,
3142 howto->name, name, rel->r_offset, input_section);
8cf0d2dd
L
3143 bfd_set_error (bfd_error_bad_value);
3144 return FALSE;
3145 }
64d25c44 3146 }
607c0e09
AS
3147 else
3148 {
3149 long sindx;
3150
8517fae7 3151 if (bfd_is_abs_section (sec))
607c0e09
AS
3152 sindx = 0;
3153 else if (sec == NULL || sec->owner == NULL)
3154 {
3155 bfd_set_error (bfd_error_bad_value);
b34976b6 3156 return FALSE;
607c0e09
AS
3157 }
3158 else
3159 {
3160 asection *osec;
3161
74541ad4
AM
3162 /* We are turning this relocation into one
3163 against a section symbol. It would be
3164 proper to subtract the symbol's value,
3165 osec->vma, from the emitted reloc addend,
3166 but ld.so expects buggy relocs. */
607c0e09
AS
3167 osec = sec->output_section;
3168 sindx = elf_section_data (osec)->dynindx;
74541ad4
AM
3169 if (sindx == 0)
3170 {
3171 asection *oi = htab->elf.text_index_section;
3172 sindx = elf_section_data (oi)->dynindx;
3173 }
3174 BFD_ASSERT (sindx != 0);
607c0e09
AS
3175 }
3176
351f65ca 3177 outrel.r_info = htab->r_info (sindx, r_type);
607c0e09
AS
3178 outrel.r_addend = relocation + rel->r_addend;
3179 }
70256ad8
AJ
3180 }
3181
cbe950e9 3182 sreloc = elf_section_data (input_section)->sreloc;
d8045f23 3183
62d78908
L
3184 if (sreloc == NULL || sreloc->contents == NULL)
3185 {
3186 r = bfd_reloc_notsupported;
3187 goto check_relocation_error;
3188 }
c434dee6 3189
351f65ca 3190 elf_append_rela (output_bfd, sreloc, &outrel);
70256ad8
AJ
3191
3192 /* If this reloc is against an external symbol, we do
3193 not want to fiddle with the addend. Otherwise, we
3194 need to include the symbol value so that it becomes
3195 an addend for the dynamic reloc. */
0f88be7a 3196 if (! relocate)
70256ad8
AJ
3197 continue;
3198 }
3199
3200 break;
3201
bffbf940 3202 case R_X86_64_TLSGD:
67a4f2b7
AO
3203 case R_X86_64_GOTPC32_TLSDESC:
3204 case R_X86_64_TLSDESC_CALL:
bffbf940 3205 case R_X86_64_GOTTPOFF:
bffbf940
JJ
3206 tls_type = GOT_UNKNOWN;
3207 if (h == NULL && local_got_offsets)
0afcef53 3208 tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
bffbf940 3209 else if (h != NULL)
0afcef53 3210 tls_type = elf_x86_hash_entry (h)->tls_type;
142411ca 3211
419414ea 3212 r_type_tls = r_type;
351f65ca
L
3213 if (! elf_x86_64_tls_transition (info, input_bfd,
3214 input_section, contents,
3215 symtab_hdr, sym_hashes,
419414ea 3216 &r_type_tls, tls_type, rel,
bedfd056 3217 relend, h, r_symndx, TRUE))
534a31f6 3218 return FALSE;
bffbf940 3219
419414ea 3220 if (r_type_tls == R_X86_64_TPOFF32)
bffbf940 3221 {
142411ca
L
3222 bfd_vma roff = rel->r_offset;
3223
bffbf940 3224 BFD_ASSERT (! unresolved_reloc);
142411ca 3225
419414ea 3226 if (r_type == R_X86_64_TLSGD)
bffbf940 3227 {
52bc799a 3228 /* GD->LE transition. For 64bit, change
e2cbcd91
L
3229 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3230 .word 0x6666; rex64; call __tls_get_addr@PLT
3231 or
3232 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3233 .byte 0x66; rex64
3234 call *__tls_get_addr@GOTPCREL(%rip)
3235 which may be converted to
3236 addr32 call __tls_get_addr
52bc799a 3237 into:
e2cbcd91
L
3238 movq %fs:0, %rax
3239 leaq foo@tpoff(%rax), %rax
52bc799a 3240 For 32bit, change
e2cbcd91
L
3241 leaq foo@tlsgd(%rip), %rdi
3242 .word 0x6666; rex64; call __tls_get_addr@PLT
3243 or
3244 leaq foo@tlsgd(%rip), %rdi
3245 .byte 0x66; rex64
3246 call *__tls_get_addr@GOTPCREL(%rip)
3247 which may be converted to
3248 addr32 call __tls_get_addr
52bc799a 3249 into:
e2cbcd91
L
3250 movl %fs:0, %eax
3251 leaq foo@tpoff(%rax), %rax
5c98a14e 3252 For largepic, change:
e2cbcd91
L
3253 leaq foo@tlsgd(%rip), %rdi
3254 movabsq $__tls_get_addr@pltoff, %rax
3255 addq %r15, %rax
3256 call *%rax
5c98a14e 3257 into:
e2cbcd91
L
3258 movq %fs:0, %rax
3259 leaq foo@tpoff(%rax), %rax
3260 nopw 0x0(%rax,%rax,1) */
5c98a14e 3261 int largepic = 0;
e2cbcd91 3262 if (ABI_64_P (output_bfd))
5c98a14e 3263 {
e2cbcd91
L
3264 if (contents[roff + 5] == 0xb8)
3265 {
3266 memcpy (contents + roff - 3,
3267 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
3268 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3269 largepic = 1;
3270 }
3271 else
3272 memcpy (contents + roff - 4,
3273 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3274 16);
5c98a14e 3275 }
52bc799a
L
3276 else
3277 memcpy (contents + roff - 3,
3278 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3279 15);
eb4ff4d6 3280 bfd_put_32 (output_bfd,
351f65ca 3281 elf_x86_64_tpoff (info, relocation),
5c98a14e 3282 contents + roff + 8 + largepic);
e2cbcd91
L
3283 /* Skip R_X86_64_PC32, R_X86_64_PLT32,
3284 R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64. */
bffbf940 3285 rel++;
60f2e42e 3286 wrel++;
bffbf940
JJ
3287 continue;
3288 }
419414ea 3289 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
67a4f2b7
AO
3290 {
3291 /* GDesc -> LE transition.
3292 It's originally something like:
3293 leaq x@tlsdesc(%rip), %rax
3294
3295 Change it to:
c9736ba0 3296 movl $x@tpoff, %rax. */
67a4f2b7 3297
c9736ba0 3298 unsigned int val, type;
67a4f2b7 3299
67a4f2b7 3300 type = bfd_get_8 (input_bfd, contents + roff - 3);
67a4f2b7 3301 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO
3302 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3303 contents + roff - 3);
3304 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3305 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3306 contents + roff - 1);
eb4ff4d6 3307 bfd_put_32 (output_bfd,
351f65ca 3308 elf_x86_64_tpoff (info, relocation),
67a4f2b7
AO
3309 contents + roff);
3310 continue;
3311 }
419414ea 3312 else if (r_type == R_X86_64_TLSDESC_CALL)
67a4f2b7
AO
3313 {
3314 /* GDesc -> LE transition.
3315 It's originally:
3316 call *(%rax)
3317 Turn it into:
142411ca 3318 xchg %ax,%ax. */
10efb593 3319 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO
3320 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3321 continue;
3322 }
419414ea 3323 else if (r_type == R_X86_64_GOTTPOFF)
bffbf940 3324 {
bffbf940 3325 /* IE->LE transition:
cf61b747 3326 For 64bit, originally it can be one of:
bffbf940
JJ
3327 movq foo@gottpoff(%rip), %reg
3328 addq foo@gottpoff(%rip), %reg
3329 We change it into:
3330 movq $foo, %reg
3331 leaq foo(%reg), %reg
cf61b747
L
3332 addq $foo, %reg.
3333 For 32bit, originally it can be one of:
3334 movq foo@gottpoff(%rip), %reg
3335 addl foo@gottpoff(%rip), %reg
3336 We change it into:
3337 movq $foo, %reg
3338 leal foo(%reg), %reg
3339 addl $foo, %reg. */
142411ca
L
3340
3341 unsigned int val, type, reg;
3342
cf61b747
L
3343 if (roff >= 3)
3344 val = bfd_get_8 (input_bfd, contents + roff - 3);
3345 else
3346 val = 0;
142411ca
L
3347 type = bfd_get_8 (input_bfd, contents + roff - 2);
3348 reg = bfd_get_8 (input_bfd, contents + roff - 1);
bffbf940 3349 reg >>= 3;
bffbf940
JJ
3350 if (type == 0x8b)
3351 {
3352 /* movq */
3353 if (val == 0x4c)
3354 bfd_put_8 (output_bfd, 0x49,
142411ca 3355 contents + roff - 3);
4a4c5f25
L
3356 else if (!ABI_64_P (output_bfd) && val == 0x44)
3357 bfd_put_8 (output_bfd, 0x41,
3358 contents + roff - 3);
bffbf940 3359 bfd_put_8 (output_bfd, 0xc7,
142411ca 3360 contents + roff - 2);
bffbf940 3361 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3362 contents + roff - 1);
bffbf940
JJ
3363 }
3364 else if (reg == 4)
3365 {
cf61b747
L
3366 /* addq/addl -> addq/addl - addressing with %rsp/%r12
3367 is special */
bffbf940
JJ
3368 if (val == 0x4c)
3369 bfd_put_8 (output_bfd, 0x49,
142411ca 3370 contents + roff - 3);
4a4c5f25
L
3371 else if (!ABI_64_P (output_bfd) && val == 0x44)
3372 bfd_put_8 (output_bfd, 0x41,
3373 contents + roff - 3);
bffbf940 3374 bfd_put_8 (output_bfd, 0x81,
142411ca 3375 contents + roff - 2);
bffbf940 3376 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3377 contents + roff - 1);
bffbf940
JJ
3378 }
3379 else
3380 {
cf61b747 3381 /* addq/addl -> leaq/leal */
bffbf940
JJ
3382 if (val == 0x4c)
3383 bfd_put_8 (output_bfd, 0x4d,
142411ca 3384 contents + roff - 3);
4a4c5f25
L
3385 else if (!ABI_64_P (output_bfd) && val == 0x44)
3386 bfd_put_8 (output_bfd, 0x45,
3387 contents + roff - 3);
bffbf940 3388 bfd_put_8 (output_bfd, 0x8d,
142411ca 3389 contents + roff - 2);
bffbf940 3390 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
142411ca 3391 contents + roff - 1);
bffbf940 3392 }
eb4ff4d6 3393 bfd_put_32 (output_bfd,
351f65ca 3394 elf_x86_64_tpoff (info, relocation),
142411ca 3395 contents + roff);
bffbf940
JJ
3396 continue;
3397 }
142411ca
L
3398 else
3399 BFD_ASSERT (FALSE);
bffbf940
JJ
3400 }
3401
6de2ae4a 3402 if (htab->elf.sgot == NULL)
bffbf940
JJ
3403 abort ();
3404
3405 if (h != NULL)
67a4f2b7
AO
3406 {
3407 off = h->got.offset;
0afcef53 3408 offplt = elf_x86_hash_entry (h)->tlsdesc_got;
67a4f2b7 3409 }
bffbf940
JJ
3410 else
3411 {
3412 if (local_got_offsets == NULL)
3413 abort ();
3414
3415 off = local_got_offsets[r_symndx];
67a4f2b7 3416 offplt = local_tlsdesc_gotents[r_symndx];
bffbf940
JJ
3417 }
3418
3419 if ((off & 1) != 0)
3420 off &= ~1;
26e41594 3421 else
bffbf940
JJ
3422 {
3423 Elf_Internal_Rela outrel;
bffbf940 3424 int dr_type, indx;
67a4f2b7 3425 asection *sreloc;
bffbf940 3426
6de2ae4a 3427 if (htab->elf.srelgot == NULL)
bffbf940
JJ
3428 abort ();
3429
67a4f2b7
AO
3430 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3431
3432 if (GOT_TLS_GDESC_P (tls_type))
3433 {
351f65ca 3434 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
67a4f2b7 3435 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
6de2ae4a
L
3436 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
3437 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3438 + htab->elf.sgotplt->output_offset
67a4f2b7
AO
3439 + offplt
3440 + htab->sgotplt_jump_table_size);
6de2ae4a 3441 sreloc = htab->elf.srelplt;
67a4f2b7 3442 if (indx == 0)
0afcef53 3443 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
67a4f2b7
AO
3444 else
3445 outrel.r_addend = 0;
351f65ca 3446 elf_append_rela (output_bfd, sreloc, &outrel);
67a4f2b7
AO
3447 }
3448
6de2ae4a 3449 sreloc = htab->elf.srelgot;
67a4f2b7 3450
6de2ae4a
L
3451 outrel.r_offset = (htab->elf.sgot->output_section->vma
3452 + htab->elf.sgot->output_offset + off);
bffbf940 3453
67a4f2b7 3454 if (GOT_TLS_GD_P (tls_type))
bffbf940 3455 dr_type = R_X86_64_DTPMOD64;
67a4f2b7
AO
3456 else if (GOT_TLS_GDESC_P (tls_type))
3457 goto dr_done;
bffbf940
JJ
3458 else
3459 dr_type = R_X86_64_TPOFF64;
3460
6de2ae4a 3461 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
bffbf940 3462 outrel.r_addend = 0;
67a4f2b7
AO
3463 if ((dr_type == R_X86_64_TPOFF64
3464 || dr_type == R_X86_64_TLSDESC) && indx == 0)
0afcef53 3465 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
351f65ca 3466 outrel.r_info = htab->r_info (indx, dr_type);
bffbf940 3467
351f65ca 3468 elf_append_rela (output_bfd, sreloc, &outrel);
bffbf940 3469
67a4f2b7 3470 if (GOT_TLS_GD_P (tls_type))
bffbf940
JJ
3471 {
3472 if (indx == 0)
3473 {
d40d037c 3474 BFD_ASSERT (! unresolved_reloc);
bffbf940 3475 bfd_put_64 (output_bfd,
0afcef53 3476 relocation - _bfd_x86_elf_dtpoff_base (info),
6de2ae4a 3477 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
bffbf940
JJ
3478 }
3479 else
3480 {
3481 bfd_put_64 (output_bfd, 0,
6de2ae4a 3482 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 3483 outrel.r_info = htab->r_info (indx,
bffbf940
JJ
3484 R_X86_64_DTPOFF64);
3485 outrel.r_offset += GOT_ENTRY_SIZE;
351f65ca 3486 elf_append_rela (output_bfd, sreloc,
464d3bd4 3487 &outrel);
bffbf940
JJ
3488 }
3489 }
3490
67a4f2b7 3491 dr_done:
bffbf940
JJ
3492 if (h != NULL)
3493 h->got.offset |= 1;
3494 else
3495 local_got_offsets[r_symndx] |= 1;
3496 }
3497
67a4f2b7
AO
3498 if (off >= (bfd_vma) -2
3499 && ! GOT_TLS_GDESC_P (tls_type))
bffbf940 3500 abort ();
419414ea 3501 if (r_type_tls == r_type)
bffbf940 3502 {
67a4f2b7
AO
3503 if (r_type == R_X86_64_GOTPC32_TLSDESC
3504 || r_type == R_X86_64_TLSDESC_CALL)
6de2ae4a
L
3505 relocation = htab->elf.sgotplt->output_section->vma
3506 + htab->elf.sgotplt->output_offset
67a4f2b7
AO
3507 + offplt + htab->sgotplt_jump_table_size;
3508 else
6de2ae4a
L
3509 relocation = htab->elf.sgot->output_section->vma
3510 + htab->elf.sgot->output_offset + off;
b34976b6 3511 unresolved_reloc = FALSE;
bffbf940 3512 }
142411ca 3513 else
67a4f2b7 3514 {
142411ca 3515 bfd_vma roff = rel->r_offset;
67a4f2b7 3516
419414ea 3517 if (r_type == R_X86_64_TLSGD)
142411ca 3518 {
52bc799a 3519 /* GD->IE transition. For 64bit, change
e2cbcd91
L
3520 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3521 .word 0x6666; rex64; call __tls_get_addr@PLT
3522 or
3523 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3524 .byte 0x66; rex64
3525 call *__tls_get_addr@GOTPCREL(%rip
3526 which may be converted to
3527 addr32 call __tls_get_addr
52bc799a 3528 into:
e2cbcd91
L
3529 movq %fs:0, %rax
3530 addq foo@gottpoff(%rip), %rax
52bc799a 3531 For 32bit, change
e2cbcd91
L
3532 leaq foo@tlsgd(%rip), %rdi
3533 .word 0x6666; rex64; call __tls_get_addr@PLT
3534 or
3535 leaq foo@tlsgd(%rip), %rdi
3536 .byte 0x66; rex64;
3537 call *__tls_get_addr@GOTPCREL(%rip)
3538 which may be converted to
3539 addr32 call __tls_get_addr
52bc799a 3540 into:
e2cbcd91
L
3541 movl %fs:0, %eax
3542 addq foo@gottpoff(%rip), %rax
5c98a14e 3543 For largepic, change:
e2cbcd91
L
3544 leaq foo@tlsgd(%rip), %rdi
3545 movabsq $__tls_get_addr@pltoff, %rax
3546 addq %r15, %rax
3547 call *%rax
5c98a14e 3548 into:
e2cbcd91
L
3549 movq %fs:0, %rax
3550 addq foo@gottpoff(%rax), %rax
3551 nopw 0x0(%rax,%rax,1) */
5c98a14e 3552 int largepic = 0;
e2cbcd91 3553 if (ABI_64_P (output_bfd))
5c98a14e 3554 {
e2cbcd91
L
3555 if (contents[roff + 5] == 0xb8)
3556 {
3557 memcpy (contents + roff - 3,
3558 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
3559 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3560 largepic = 1;
3561 }
3562 else
3563 memcpy (contents + roff - 4,
3564 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3565 16);
5c98a14e 3566 }
52bc799a
L
3567 else
3568 memcpy (contents + roff - 3,
3569 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3570 15);
142411ca 3571
6de2ae4a
L
3572 relocation = (htab->elf.sgot->output_section->vma
3573 + htab->elf.sgot->output_offset + off
142411ca 3574 - roff
5c98a14e 3575 - largepic
142411ca
L
3576 - input_section->output_section->vma
3577 - input_section->output_offset
3578 - 12);
3579 bfd_put_32 (output_bfd, relocation,
5c98a14e
JJ
3580 contents + roff + 8 + largepic);
3581 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
142411ca 3582 rel++;
60f2e42e 3583 wrel++;
142411ca
L
3584 continue;
3585 }
419414ea 3586 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
142411ca
L
3587 {
3588 /* GDesc -> IE transition.
3589 It's originally something like:
3590 leaq x@tlsdesc(%rip), %rax
67a4f2b7 3591
142411ca 3592 Change it to:
c9736ba0 3593 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
67a4f2b7 3594
142411ca
L
3595 /* Now modify the instruction as appropriate. To
3596 turn a leaq into a movq in the form we use it, it
3597 suffices to change the second byte from 0x8d to
3598 0x8b. */
3599 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3600
3601 bfd_put_32 (output_bfd,
6de2ae4a
L
3602 htab->elf.sgot->output_section->vma
3603 + htab->elf.sgot->output_offset + off
142411ca
L
3604 - rel->r_offset
3605 - input_section->output_section->vma
3606 - input_section->output_offset
3607 - 4,
3608 contents + roff);
3609 continue;
3610 }
419414ea 3611 else if (r_type == R_X86_64_TLSDESC_CALL)
142411ca
L
3612 {
3613 /* GDesc -> IE transition.
3614 It's originally:
3615 call *(%rax)
3616
3617 Change it to:
c9736ba0 3618 xchg %ax, %ax. */
142411ca 3619
142411ca
L
3620 bfd_put_8 (output_bfd, 0x66, contents + roff);
3621 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3622 continue;
3623 }
3624 else
3625 BFD_ASSERT (FALSE);
67a4f2b7 3626 }
bffbf940
JJ
3627 break;
3628
3629 case R_X86_64_TLSLD:
351f65ca
L
3630 if (! elf_x86_64_tls_transition (info, input_bfd,
3631 input_section, contents,
3632 symtab_hdr, sym_hashes,
bedfd056
L
3633 &r_type, GOT_UNKNOWN, rel,
3634 relend, h, r_symndx, TRUE))
142411ca 3635 return FALSE;
a3fadc9a 3636
142411ca
L
3637 if (r_type != R_X86_64_TLSLD)
3638 {
bffbf940 3639 /* LD->LE transition:
e2cbcd91
L
3640 leaq foo@tlsld(%rip), %rdi
3641 call __tls_get_addr@PLT
3642 For 64bit, we change it into:
3643 .word 0x6666; .byte 0x66; movq %fs:0, %rax
3644 For 32bit, we change it into:
3645 nopl 0x0(%rax); movl %fs:0, %eax
3646 Or
3647 leaq foo@tlsld(%rip), %rdi;
3648 call *__tls_get_addr@GOTPCREL(%rip)
3649 which may be converted to
3650 addr32 call __tls_get_addr
52bc799a 3651 For 64bit, we change it into:
e2cbcd91 3652 .word 0x6666; .word 0x6666; movq %fs:0, %rax
52bc799a 3653 For 32bit, we change it into:
e2cbcd91 3654 nopw 0x0(%rax); movl %fs:0, %eax
5c98a14e 3655 For largepic, change:
e2cbcd91
L
3656 leaq foo@tlsgd(%rip), %rdi
3657 movabsq $__tls_get_addr@pltoff, %rax
3658 addq %rbx, %rax
3659 call *%rax
3660 into
3661 data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
3662 movq %fs:0, %eax */
142411ca
L
3663
3664 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
e2cbcd91
L
3665 if (ABI_64_P (output_bfd))
3666 {
3667 if (contents[rel->r_offset + 5] == 0xb8)
3668 memcpy (contents + rel->r_offset - 3,
3669 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
3670 "\x64\x48\x8b\x04\x25\0\0\0", 22);
3671 else if (contents[rel->r_offset + 4] == 0xff
3672 || contents[rel->r_offset + 4] == 0x67)
3673 memcpy (contents + rel->r_offset - 3,
3674 "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
3675 13);
3676 else
3677 memcpy (contents + rel->r_offset - 3,
3678 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
3679 }
52bc799a 3680 else
e2cbcd91
L
3681 {
3682 if (contents[rel->r_offset + 4] == 0xff)
3683 memcpy (contents + rel->r_offset - 3,
3684 "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
3685 13);
3686 else
3687 memcpy (contents + rel->r_offset - 3,
3688 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
3689 }
3690 /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
3691 and R_X86_64_PLTOFF64. */
bffbf940 3692 rel++;
60f2e42e 3693 wrel++;
bffbf940
JJ
3694 continue;
3695 }
3696
6de2ae4a 3697 if (htab->elf.sgot == NULL)
bffbf940
JJ
3698 abort ();
3699
0afcef53 3700 off = htab->tls_ld_or_ldm_got.offset;
bffbf940
JJ
3701 if (off & 1)
3702 off &= ~1;
3703 else
3704 {
3705 Elf_Internal_Rela outrel;
bffbf940 3706
6de2ae4a 3707 if (htab->elf.srelgot == NULL)
bffbf940
JJ
3708 abort ();
3709
6de2ae4a
L
3710 outrel.r_offset = (htab->elf.sgot->output_section->vma
3711 + htab->elf.sgot->output_offset + off);
bffbf940
JJ
3712
3713 bfd_put_64 (output_bfd, 0,
6de2ae4a 3714 htab->elf.sgot->contents + off);
bffbf940 3715 bfd_put_64 (output_bfd, 0,
6de2ae4a 3716 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 3717 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
bffbf940 3718 outrel.r_addend = 0;
351f65ca 3719 elf_append_rela (output_bfd, htab->elf.srelgot,
464d3bd4 3720 &outrel);
0afcef53 3721 htab->tls_ld_or_ldm_got.offset |= 1;
bffbf940 3722 }
6de2ae4a
L
3723 relocation = htab->elf.sgot->output_section->vma
3724 + htab->elf.sgot->output_offset + off;
b34976b6 3725 unresolved_reloc = FALSE;
bffbf940
JJ
3726 break;
3727
3728 case R_X86_64_DTPOFF32:
0e1862bb
L
3729 if (!bfd_link_executable (info)
3730 || (input_section->flags & SEC_CODE) == 0)
0afcef53 3731 relocation -= _bfd_x86_elf_dtpoff_base (info);
bffbf940 3732 else
351f65ca 3733 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ
3734 break;
3735
3736 case R_X86_64_TPOFF32:
6769d501 3737 case R_X86_64_TPOFF64:
0e1862bb 3738 BFD_ASSERT (bfd_link_executable (info));
351f65ca 3739 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ
3740 break;
3741
a69ed7f7
L
3742 case R_X86_64_DTPOFF64:
3743 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
0afcef53 3744 relocation -= _bfd_x86_elf_dtpoff_base (info);
a69ed7f7
L
3745 break;
3746
70256ad8
AJ
3747 default:
3748 break;
3749 }
8d88c4ca 3750
239e1f3a
AM
3751 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3752 because such sections are not SEC_ALLOC and thus ld.so will
3753 not process them. */
c434dee6 3754 if (unresolved_reloc
239e1f3a 3755 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM
3756 && h->def_dynamic)
3757 && _bfd_elf_section_offset (output_bfd, info, input_section,
3758 rel->r_offset) != (bfd_vma) -1)
a040981f 3759 {
7073b5b9
L
3760 switch (r_type)
3761 {
3762 case R_X86_64_32S:
a5b4ee94
L
3763 sec = h->root.u.def.section;
3764 if ((info->nocopyreloc
3765 || (eh->def_protected
3766 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
7073b5b9
L
3767 && !(h->root.u.def.section->flags & SEC_CODE))
3768 return elf_x86_64_need_pic (info, input_bfd, input_section,
3769 h, NULL, NULL, howto);
3770 /* Fall through. */
3771
3772 default:
3773 _bfd_error_handler
3774 /* xgettext:c-format */
3775 (_("%B(%A+%#Lx): unresolvable %s relocation against symbol `%s'"),
3776 input_bfd,
3777 input_section,
3778 rel->r_offset,
3779 howto->name,
3780 h->root.root.string);
3781 return FALSE;
3782 }
a040981f 3783 }
c434dee6 3784
cbe950e9 3785do_relocation:
8d88c4ca 3786 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
c434dee6
AJ
3787 contents, rel->r_offset,
3788 relocation, rel->r_addend);
8d88c4ca 3789
62d78908 3790check_relocation_error:
8d88c4ca 3791 if (r != bfd_reloc_ok)
8da6118f 3792 {
c434dee6
AJ
3793 const char *name;
3794
3795 if (h != NULL)
3796 name = h->root.root.string;
3797 else
8da6118f 3798 {
c434dee6
AJ
3799 name = bfd_elf_string_from_elf_section (input_bfd,
3800 symtab_hdr->sh_link,
3801 sym->st_name);
3802 if (name == NULL)
b34976b6 3803 return FALSE;
c434dee6
AJ
3804 if (*name == '\0')
3805 name = bfd_section_name (input_bfd, sec);
3806 }
3807
3808 if (r == bfd_reloc_overflow)
8b43e456 3809 {
78984959 3810 if (converted_reloc)
8b43e456
L
3811 {
3812 info->callbacks->einfo
3813 (_("%F%P: failed to convert GOTPCREL relocation; relink with --no-relax\n"));
3814 return FALSE;
3815 }
3816 (*info->callbacks->reloc_overflow)
3817 (info, (h ? &h->root : NULL), name, howto->name,
3818 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3819 }
c434dee6
AJ
3820 else
3821 {
4eca0228 3822 _bfd_error_handler
695344c0 3823 /* xgettext:c-format */
d42c267e 3824 (_("%B(%A+%#Lx): reloc against `%s': error %d"),
d003868e 3825 input_bfd, input_section,
d42c267e 3826 rel->r_offset, name, (int) r);
b34976b6 3827 return FALSE;
8da6118f
KH
3828 }
3829 }
60f2e42e
L
3830
3831 if (wrel != rel)
3832 *wrel = *rel;
3833 }
3834
3835 if (wrel != rel)
3836 {
3837 Elf_Internal_Shdr *rel_hdr;
3838 size_t deleted = rel - wrel;
3839
3840 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3841 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3842 if (rel_hdr->sh_size == 0)
3843 {
3844 /* It is too late to remove an empty reloc section. Leave
3845 one NONE reloc.
3846 ??? What is wrong with an empty section??? */
3847 rel_hdr->sh_size = rel_hdr->sh_entsize;
3848 deleted -= 1;
3849 }
3850 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3851 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3852 input_section->reloc_count -= deleted;
8d88c4ca 3853 }
70256ad8 3854
b34976b6 3855 return TRUE;
70256ad8
AJ
3856}
3857
3858/* Finish up dynamic symbol handling. We set the contents of various
3859 dynamic sections here. */
3860
b34976b6 3861static bfd_boolean
351f65ca
L
3862elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3863 struct bfd_link_info *info,
3864 struct elf_link_hash_entry *h,
aec6b87e 3865 Elf_Internal_Sym *sym)
70256ad8 3866{
0afcef53 3867 struct elf_x86_link_hash_table *htab;
f2c29a16 3868 bfd_boolean use_plt_second;
0afcef53 3869 struct elf_x86_link_hash_entry *eh;
aec6b87e 3870 bfd_boolean local_undefweak;
70256ad8 3871
0afcef53 3872 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
4dfe6ac6
NC
3873 if (htab == NULL)
3874 return FALSE;
70256ad8 3875
f2c29a16
L
3876 /* Use the second PLT section only if there is .plt section. */
3877 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
0ff2b86e 3878
0afcef53 3879 eh = (struct elf_x86_link_hash_entry *) h;
9e9821dd
L
3880 if (eh->no_finish_dynamic_symbol)
3881 abort ();
dd7e64d4 3882
aec6b87e
L
3883 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3884 resolved undefined weak symbols in executable so that their
3885 references have value 0 at run-time. */
c5bce5c6 3886 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
aec6b87e 3887
70256ad8
AJ
3888 if (h->plt.offset != (bfd_vma) -1)
3889 {
70256ad8 3890 bfd_vma plt_index;
38b12349 3891 bfd_vma got_offset, plt_offset;
70256ad8 3892 Elf_Internal_Rela rela;
947216bf 3893 bfd_byte *loc;
0ff2b86e 3894 asection *plt, *gotplt, *relplt, *resolved_plt;
351f65ca 3895 const struct elf_backend_data *bed;
5974eba6 3896 bfd_vma plt_got_pcrel_offset;
cbe950e9
L
3897
3898 /* When building a static executable, use .iplt, .igot.plt and
3899 .rela.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 3900 if (htab->elf.splt != NULL)
cbe950e9 3901 {
6de2ae4a
L
3902 plt = htab->elf.splt;
3903 gotplt = htab->elf.sgotplt;
3904 relplt = htab->elf.srelplt;
cbe950e9
L
3905 }
3906 else
3907 {
6de2ae4a
L
3908 plt = htab->elf.iplt;
3909 gotplt = htab->elf.igotplt;
3910 relplt = htab->elf.irelplt;
cbe950e9 3911 }
70256ad8 3912
f3180fa9 3913 VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
70256ad8
AJ
3914
3915 /* Get the index in the procedure linkage table which
3916 corresponds to this symbol. This is the index of this symbol
3917 in all the symbols for which we are making plt entries. The
cbe950e9 3918 first entry in the procedure linkage table is reserved.
6bbec505 3919
cbe950e9 3920 Get the offset into the .got table of the entry that
407443a3 3921 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
cbe950e9
L
3922 bytes. The first three are reserved for the dynamic linker.
3923
3924 For static executables, we don't reserve anything. */
3925
6de2ae4a 3926 if (plt == htab->elf.splt)
cbe950e9 3927 {
765e526c
L
3928 got_offset = (h->plt.offset / htab->plt.plt_entry_size
3929 - htab->plt.has_plt0);
e1f98742 3930 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
cbe950e9
L
3931 }
3932 else
3933 {
765e526c 3934 got_offset = h->plt.offset / htab->plt.plt_entry_size;
e1f98742 3935 got_offset = got_offset * GOT_ENTRY_SIZE;
cbe950e9 3936 }
70256ad8 3937
38b12349 3938 /* Fill in the entry in the procedure linkage table. */
765e526c
L
3939 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
3940 htab->plt.plt_entry_size);
f2c29a16 3941 if (use_plt_second)
0ff2b86e 3942 {
f2c29a16 3943 memcpy (htab->plt_second->contents + eh->plt_second.offset,
765e526c
L
3944 htab->non_lazy_plt->plt_entry,
3945 htab->non_lazy_plt->plt_entry_size);
0ff2b86e 3946
f2c29a16
L
3947 resolved_plt = htab->plt_second;
3948 plt_offset = eh->plt_second.offset;
0ff2b86e
L
3949 }
3950 else
3951 {
0ff2b86e
L
3952 resolved_plt = plt;
3953 plt_offset = h->plt.offset;
3954 }
eed180f8
RM
3955
3956 /* Insert the relocation positions of the plt section. */
3957
3958 /* Put offset the PC-relative instruction referring to the GOT entry,
3959 subtracting the size of that instruction. */
ab7fede8
L
3960 plt_got_pcrel_offset = (gotplt->output_section->vma
3961 + gotplt->output_offset
3962 + got_offset
3963 - resolved_plt->output_section->vma
3964 - resolved_plt->output_offset
3965 - plt_offset
765e526c 3966 - htab->plt.plt_got_insn_size);
ab7fede8
L
3967
3968 /* Check PC-relative offset overflow in PLT entry. */
5974eba6 3969 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
695344c0 3970 /* xgettext:c-format */
ab7fede8
L
3971 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in PLT entry for `%s'\n"),
3972 output_bfd, h->root.root.string);
3973
3974 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
38b12349 3975 (resolved_plt->contents + plt_offset
765e526c 3976 + htab->plt.plt_got_offset));
cbe950e9 3977
653165cc 3978 /* Fill in the entry in the global offset table, initially this
aec6b87e
L
3979 points to the second part of the PLT entry. Leave the entry
3980 as zero for undefined weak symbol in PIE. No PLT relocation
3981 against undefined weak symbol in PIE. */
3982 if (!local_undefweak)
cbe950e9 3983 {
765e526c 3984 if (htab->plt.has_plt0)
38b12349
L
3985 bfd_put_64 (output_bfd, (plt->output_section->vma
3986 + plt->output_offset
3987 + h->plt.offset
765e526c 3988 + htab->lazy_plt->plt_lazy_offset),
38b12349 3989 gotplt->contents + got_offset);
aec6b87e
L
3990
3991 /* Fill in the entry in the .rela.plt section. */
3992 rela.r_offset = (gotplt->output_section->vma
3993 + gotplt->output_offset
3994 + got_offset);
cf1070f1 3995 if (PLT_LOCAL_IFUNC_P (info, h))
aec6b87e 3996 {
6322e5c5
L
3997 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
3998 h->root.root.string,
3999 h->root.u.def.section->owner);
4000
aec6b87e
L
4001 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4002 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
4003 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4004 rela.r_addend = (h->root.u.def.value
4005 + h->root.u.def.section->output_section->vma
4006 + h->root.u.def.section->output_offset);
4007 /* R_X86_64_IRELATIVE comes last. */
4008 plt_index = htab->next_irelative_index--;
4009 }
4010 else
4011 {
4012 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
4013 rela.r_addend = 0;
4014 plt_index = htab->next_jump_slot_index++;
4015 }
e1f98742 4016
38b12349
L
4017 /* Don't fill the second and third slots in PLT entry for
4018 static executables nor without PLT0. */
765e526c 4019 if (plt == htab->elf.splt && htab->plt.has_plt0)
aec6b87e 4020 {
38b12349 4021 bfd_vma plt0_offset
765e526c 4022 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
aec6b87e
L
4023
4024 /* Put relocation index. */
4025 bfd_put_32 (output_bfd, plt_index,
4026 (plt->contents + h->plt.offset
765e526c 4027 + htab->lazy_plt->plt_reloc_offset));
aec6b87e
L
4028
4029 /* Put offset for jmp .PLT0 and check for overflow. We don't
4030 check relocation index for overflow since branch displacement
4031 will overflow first. */
4032 if (plt0_offset > 0x80000000)
695344c0 4033 /* xgettext:c-format */
aec6b87e
L
4034 info->callbacks->einfo (_("%F%B: branch displacement overflow in PLT entry for `%s'\n"),
4035 output_bfd, h->root.root.string);
4036 bfd_put_32 (output_bfd, - plt0_offset,
38b12349 4037 (plt->contents + h->plt.offset
765e526c 4038 + htab->lazy_plt->plt_plt_offset));
aec6b87e 4039 }
351f65ca 4040
aec6b87e
L
4041 bed = get_elf_backend_data (output_bfd);
4042 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
4043 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4044 }
dd7e64d4
L
4045 }
4046 else if (eh->plt_got.offset != (bfd_vma) -1)
4047 {
38b12349 4048 bfd_vma got_offset, plt_offset;
dd7e64d4
L
4049 asection *plt, *got;
4050 bfd_boolean got_after_plt;
4051 int32_t got_pcrel_offset;
dd7e64d4
L
4052
4053 /* Set the entry in the GOT procedure linkage table. */
4054 plt = htab->plt_got;
4055 got = htab->elf.sgot;
4056 got_offset = h->got.offset;
4057
4058 if (got_offset == (bfd_vma) -1
e492d2f8 4059 || (h->type == STT_GNU_IFUNC && h->def_regular)
dd7e64d4
L
4060 || plt == NULL
4061 || got == NULL)
4062 abort ();
70256ad8 4063
38b12349 4064 /* Use the non-lazy PLT entry template for the GOT PLT since they
dd7e64d4 4065 are the identical. */
dd7e64d4
L
4066 /* Fill in the entry in the GOT procedure linkage table. */
4067 plt_offset = eh->plt_got.offset;
4068 memcpy (plt->contents + plt_offset,
765e526c
L
4069 htab->non_lazy_plt->plt_entry,
4070 htab->non_lazy_plt->plt_entry_size);
dd7e64d4
L
4071
4072 /* Put offset the PC-relative instruction referring to the GOT
4073 entry, subtracting the size of that instruction. */
4074 got_pcrel_offset = (got->output_section->vma
4075 + got->output_offset
4076 + got_offset
4077 - plt->output_section->vma
4078 - plt->output_offset
4079 - plt_offset
765e526c 4080 - htab->non_lazy_plt->plt_got_insn_size);
dd7e64d4
L
4081
4082 /* Check PC-relative offset overflow in GOT PLT entry. */
4083 got_after_plt = got->output_section->vma > plt->output_section->vma;
4084 if ((got_after_plt && got_pcrel_offset < 0)
4085 || (!got_after_plt && got_pcrel_offset > 0))
695344c0 4086 /* xgettext:c-format */
dd7e64d4
L
4087 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
4088 output_bfd, h->root.root.string);
4089
4090 bfd_put_32 (output_bfd, got_pcrel_offset,
38b12349 4091 (plt->contents + plt_offset
765e526c 4092 + htab->non_lazy_plt->plt_got_offset));
dd7e64d4
L
4093 }
4094
aec6b87e
L
4095 if (!local_undefweak
4096 && !h->def_regular
dd7e64d4
L
4097 && (h->plt.offset != (bfd_vma) -1
4098 || eh->plt_got.offset != (bfd_vma) -1))
4099 {
4100 /* Mark the symbol as undefined, rather than as defined in
4101 the .plt section. Leave the value if there were any
4102 relocations where pointer equality matters (this is a clue
4103 for the dynamic linker, to make function pointer
4104 comparisons work between an application and shared
4105 library), otherwise set it to zero. If a function is only
4106 called from a binary, there is no need to slow down
4107 shared libraries because of that. */
4108 sym->st_shndx = SHN_UNDEF;
4109 if (!h->pointer_equality_needed)
4110 sym->st_value = 0;
70256ad8
AJ
4111 }
4112
aec6b87e
L
4113 /* Don't generate dynamic GOT relocation against undefined weak
4114 symbol in executable. */
bffbf940 4115 if (h->got.offset != (bfd_vma) -1
0afcef53
L
4116 && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry (h)->tls_type)
4117 && elf_x86_hash_entry (h)->tls_type != GOT_TLS_IE
aec6b87e 4118 && !local_undefweak)
053579d7 4119 {
053579d7 4120 Elf_Internal_Rela rela;
233cc9c1 4121 asection *relgot = htab->elf.srelgot;
053579d7
AJ
4122
4123 /* This symbol has an entry in the global offset table. Set it
bffbf940 4124 up. */
6de2ae4a 4125 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
c434dee6 4126 abort ();
053579d7 4127
6de2ae4a
L
4128 rela.r_offset = (htab->elf.sgot->output_section->vma
4129 + htab->elf.sgot->output_offset
dc810e39 4130 + (h->got.offset &~ (bfd_vma) 1));
053579d7
AJ
4131
4132 /* If this is a static link, or it is a -Bsymbolic link and the
4133 symbol is defined locally or was forced to be local because
4134 of a version file, we just want to emit a RELATIVE reloc.
4135 The entry in the global offset table will already have been
4136 initialized in the relocate_section function. */
710ab287 4137 if (h->def_regular
0018b0a3
L
4138 && h->type == STT_GNU_IFUNC)
4139 {
233cc9c1
L
4140 if (h->plt.offset == (bfd_vma) -1)
4141 {
4142 /* STT_GNU_IFUNC is referenced without PLT. */
4143 if (htab->elf.splt == NULL)
4144 {
4145 /* use .rel[a].iplt section to store .got relocations
4146 in static executable. */
4147 relgot = htab->elf.irelplt;
4148 }
6999821f 4149 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
233cc9c1 4150 {
6322e5c5 4151 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
6322e5c5
L
4152 h->root.root.string,
4153 h->root.u.def.section->owner);
4154
233cc9c1
L
4155 rela.r_info = htab->r_info (0,
4156 R_X86_64_IRELATIVE);
4157 rela.r_addend = (h->root.u.def.value
4158 + h->root.u.def.section->output_section->vma
4159 + h->root.u.def.section->output_offset);
4160 }
4161 else
4162 goto do_glob_dat;
4163 }
4164 else if (bfd_link_pic (info))
710ab287
L
4165 {
4166 /* Generate R_X86_64_GLOB_DAT. */
4167 goto do_glob_dat;
4168 }
4169 else
4170 {
90d60710 4171 asection *plt;
aab82f4c 4172 bfd_vma plt_offset;
90d60710 4173
710ab287
L
4174 if (!h->pointer_equality_needed)
4175 abort ();
4176
4177 /* For non-shared object, we can't use .got.plt, which
4178 contains the real function addres if we need pointer
4179 equality. We load the GOT entry with the PLT entry. */
f2c29a16 4180 if (htab->plt_second != NULL)
aab82f4c 4181 {
f2c29a16
L
4182 plt = htab->plt_second;
4183 plt_offset = eh->plt_second.offset;
aab82f4c
L
4184 }
4185 else
4186 {
4187 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4188 plt_offset = h->plt.offset;
4189 }
710ab287
L
4190 bfd_put_64 (output_bfd, (plt->output_section->vma
4191 + plt->output_offset
aab82f4c 4192 + plt_offset),
6de2ae4a 4193 htab->elf.sgot->contents + h->got.offset);
710ab287
L
4194 return TRUE;
4195 }
0018b0a3 4196 }
0e1862bb 4197 else if (bfd_link_pic (info)
6999821f 4198 && SYMBOL_REFERENCES_LOCAL_P (info, h))
053579d7 4199 {
ad71ce8d 4200 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
41bed6dd 4201 return FALSE;
cc78d0af 4202 BFD_ASSERT((h->got.offset & 1) != 0);
351f65ca 4203 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
053579d7
AJ
4204 rela.r_addend = (h->root.u.def.value
4205 + h->root.u.def.section->output_section->vma
4206 + h->root.u.def.section->output_offset);
4207 }
4208 else
4209 {
4210 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 4211do_glob_dat:
c434dee6 4212 bfd_put_64 (output_bfd, (bfd_vma) 0,
6de2ae4a 4213 htab->elf.sgot->contents + h->got.offset);
351f65ca 4214 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
053579d7
AJ
4215 rela.r_addend = 0;
4216 }
4217
233cc9c1 4218 elf_append_rela (output_bfd, relgot, &rela);
053579d7
AJ
4219 }
4220
f5385ebf 4221 if (h->needs_copy)
70256ad8 4222 {
70256ad8 4223 Elf_Internal_Rela rela;
5474d94f 4224 asection *s;
70256ad8
AJ
4225
4226 /* This symbol needs a copy reloc. Set it up. */
ff38b4cc 4227 VERIFY_COPY_RELOC (h, htab)
70256ad8
AJ
4228
4229 rela.r_offset = (h->root.u.def.value
4230 + h->root.u.def.section->output_section->vma
4231 + h->root.u.def.section->output_offset);
351f65ca 4232 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
70256ad8 4233 rela.r_addend = 0;
afbf7e8e 4234 if (h->root.u.def.section == htab->elf.sdynrelro)
5474d94f
AM
4235 s = htab->elf.sreldynrelro;
4236 else
4237 s = htab->elf.srelbss;
4238 elf_append_rela (output_bfd, s, &rela);
70256ad8
AJ
4239 }
4240
b34976b6 4241 return TRUE;
70256ad8
AJ
4242}
4243
c25bc9fc
L
4244/* Finish up local dynamic symbol handling. We set the contents of
4245 various dynamic sections here. */
4246
4247static bfd_boolean
351f65ca 4248elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
c25bc9fc
L
4249{
4250 struct elf_link_hash_entry *h
4251 = (struct elf_link_hash_entry *) *slot;
4252 struct bfd_link_info *info
eed180f8 4253 = (struct bfd_link_info *) inf;
c25bc9fc 4254
351f65ca 4255 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
5f0f0847 4256 info, h, NULL);
c25bc9fc
L
4257}
4258
aec6b87e
L
4259/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4260 here since undefined weak symbol may not be dynamic and may not be
4261 called for elf_x86_64_finish_dynamic_symbol. */
4262
4263static bfd_boolean
4264elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4265 void *inf)
4266{
4267 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4268 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4269
4270 if (h->root.type != bfd_link_hash_undefweak
4271 || h->dynindx != -1)
4272 return TRUE;
4273
4274 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
5f0f0847 4275 info, h, NULL);
aec6b87e
L
4276}
4277
c434dee6
AJ
4278/* Used to decide how to sort relocs in an optimal manner for the
4279 dynamic linker, before writing them out. */
4280
4281static enum elf_reloc_type_class
cae1fbbb 4282elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
7e612e98
AM
4283 const asection *rel_sec ATTRIBUTE_UNUSED,
4284 const Elf_Internal_Rela *rela)
c434dee6 4285{
cae1fbbb
L
4286 bfd *abfd = info->output_bfd;
4287 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
0afcef53
L
4288 struct elf_x86_link_hash_table *htab
4289 = elf_x86_hash_table (info, X86_64_ELF_DATA);
cae1fbbb 4290
d9e3b590
L
4291 if (htab->elf.dynsym != NULL
4292 && htab->elf.dynsym->contents != NULL)
4293 {
4294 /* Check relocation against STT_GNU_IFUNC symbol if there are
07d6d2b8 4295 dynamic symbols. */
d9e3b590 4296 unsigned long r_symndx = htab->r_sym (rela->r_info);
897463b1
L
4297 if (r_symndx != STN_UNDEF)
4298 {
4299 Elf_Internal_Sym sym;
4300 if (!bed->s->swap_symbol_in (abfd,
4301 (htab->elf.dynsym->contents
4302 + r_symndx * bed->s->sizeof_sym),
4303 0, &sym))
4304 abort ();
d9e3b590 4305
897463b1
L
4306 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
4307 return reloc_class_ifunc;
4308 }
d9e3b590 4309 }
cae1fbbb 4310
351f65ca 4311 switch ((int) ELF32_R_TYPE (rela->r_info))
c434dee6 4312 {
c428ce9d
L
4313 case R_X86_64_IRELATIVE:
4314 return reloc_class_ifunc;
c434dee6 4315 case R_X86_64_RELATIVE:
1da80baa 4316 case R_X86_64_RELATIVE64:
c434dee6
AJ
4317 return reloc_class_relative;
4318 case R_X86_64_JUMP_SLOT:
4319 return reloc_class_plt;
4320 case R_X86_64_COPY:
4321 return reloc_class_copy;
4322 default:
4323 return reloc_class_normal;
4324 }
4325}
4326
70256ad8
AJ
4327/* Finish up the dynamic sections. */
4328
b34976b6 4329static bfd_boolean
351f65ca
L
4330elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
4331 struct bfd_link_info *info)
70256ad8 4332{
0afcef53 4333 struct elf_x86_link_hash_table *htab;
70256ad8 4334
9577f60b 4335 htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4dfe6ac6
NC
4336 if (htab == NULL)
4337 return FALSE;
4338
9577f60b
L
4339 if (! htab->elf.dynamic_sections_created)
4340 return TRUE;
70256ad8 4341
9577f60b 4342 if (htab->elf.splt && htab->elf.splt->size > 0)
e41b3a13 4343 {
9577f60b
L
4344 elf_section_data (htab->elf.splt->output_section)
4345 ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
e41b3a13 4346
9577f60b 4347 if (htab->plt.has_plt0)
fff53dae 4348 {
9577f60b
L
4349 /* Fill in the special first entry in the procedure linkage
4350 table. */
4351 memcpy (htab->elf.splt->contents,
4352 htab->lazy_plt->plt0_entry,
4353 htab->lazy_plt->plt0_entry_size);
4354 /* Add offset for pushq GOT+8(%rip), since the instruction
4355 uses 6 bytes subtract this value. */
4356 bfd_put_32 (output_bfd,
4357 (htab->elf.sgotplt->output_section->vma
4358 + htab->elf.sgotplt->output_offset
4359 + 8
4360 - htab->elf.splt->output_section->vma
4361 - htab->elf.splt->output_offset
4362 - 6),
4363 (htab->elf.splt->contents
4364 + htab->lazy_plt->plt0_got1_offset));
4365 /* Add offset for the PC-relative instruction accessing
4366 GOT+16, subtracting the offset to the end of that
4367 instruction. */
4368 bfd_put_32 (output_bfd,
4369 (htab->elf.sgotplt->output_section->vma
4370 + htab->elf.sgotplt->output_offset
4371 + 16
4372 - htab->elf.splt->output_section->vma
4373 - htab->elf.splt->output_offset
4374 - htab->lazy_plt->plt0_got2_insn_end),
4375 (htab->elf.splt->contents
4376 + htab->lazy_plt->plt0_got2_offset));
fff53dae 4377 }
fff53dae 4378
9577f60b 4379 if (htab->tlsdesc_plt)
8361ed4d 4380 {
9577f60b
L
4381 bfd_put_64 (output_bfd, (bfd_vma) 0,
4382 htab->elf.sgot->contents + htab->tlsdesc_got);
4383
4384 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
4385 htab->lazy_plt->plt0_entry,
4386 htab->lazy_plt->plt0_entry_size);
4387
4388 /* Add offset for pushq GOT+8(%rip), since the
4389 instruction uses 6 bytes subtract this value. */
4390 bfd_put_32 (output_bfd,
4391 (htab->elf.sgotplt->output_section->vma
4392 + htab->elf.sgotplt->output_offset
4393 + 8
4394 - htab->elf.splt->output_section->vma
4395 - htab->elf.splt->output_offset
4396 - htab->tlsdesc_plt
4397 - 6),
4398 (htab->elf.splt->contents
4399 + htab->tlsdesc_plt
4400 + htab->lazy_plt->plt0_got1_offset));
4401 /* Add offset for the PC-relative instruction accessing
4402 GOT+TDG, where TDG stands for htab->tlsdesc_got,
4403 subtracting the offset to the end of that
4404 instruction. */
4405 bfd_put_32 (output_bfd,
4406 (htab->elf.sgot->output_section->vma
4407 + htab->elf.sgot->output_offset
4408 + htab->tlsdesc_got
4409 - htab->elf.splt->output_section->vma
4410 - htab->elf.splt->output_offset
4411 - htab->tlsdesc_plt
4412 - htab->lazy_plt->plt0_got2_insn_end),
4413 (htab->elf.splt->contents
4414 + htab->tlsdesc_plt
4415 + htab->lazy_plt->plt0_got2_offset));
8361ed4d
L
4416 }
4417 }
4418
aec6b87e
L
4419 /* Fill PLT entries for undefined weak symbols in PIE. */
4420 if (bfd_link_pie (info))
4421 bfd_hash_traverse (&info->hash->table,
4422 elf_x86_64_pie_finish_undefweak_symbol,
4423 info);
4424
b34976b6 4425 return TRUE;
8d88c4ca
NC
4426}
4427
233cc9c1
L
4428/* Fill PLT/GOT entries and allocate dynamic relocations for local
4429 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4430 It has to be done before elf_link_sort_relocs is called so that
4431 dynamic relocations are properly sorted. */
4432
4433static bfd_boolean
4434elf_x86_64_output_arch_local_syms
4435 (bfd *output_bfd ATTRIBUTE_UNUSED,
4436 struct bfd_link_info *info,
4437 void *flaginfo ATTRIBUTE_UNUSED,
4438 int (*func) (void *, const char *,
4439 Elf_Internal_Sym *,
4440 asection *,
4441 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4442{
0afcef53
L
4443 struct elf_x86_link_hash_table *htab
4444 = elf_x86_hash_table (info, X86_64_ELF_DATA);
233cc9c1
L
4445 if (htab == NULL)
4446 return FALSE;
4447
4448 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4449 htab_traverse (htab->loc_hash_table,
4450 elf_x86_64_finish_local_dynamic_symbol,
4451 info);
4452
4453 return TRUE;
4454}
4455
38b12349 4456/* Forward declaration. */
765e526c 4457static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt;
38b12349
L
4458
4459/* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
4460 dynamic relocations. */
4461
4462static long
4463elf_x86_64_get_synthetic_symtab (bfd *abfd,
4464 long symcount ATTRIBUTE_UNUSED,
4465 asymbol **syms ATTRIBUTE_UNUSED,
4466 long dynsymcount,
4467 asymbol **dynsyms,
4468 asymbol **ret)
4469{
f493882d 4470 long count, i, n;
38b12349 4471 int j;
38b12349 4472 bfd_byte *plt_contents;
f493882d 4473 long relsize;
765e526c
L
4474 const struct elf_x86_lazy_plt_layout *lazy_plt;
4475 const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4476 const struct elf_x86_lazy_plt_layout *lazy_bnd_plt;
4477 const struct elf_x86_non_lazy_plt_layout *non_lazy_bnd_plt;
4478 const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4479 const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
38b12349 4480 asection *plt;
f493882d
L
4481 enum elf_x86_plt_type plt_type;
4482 struct elf_x86_plt plts[] =
144bed8d 4483 {
38b12349
L
4484 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4485 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
f2c29a16
L
4486 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4487 { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
dd9e66ee 4488 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
38b12349 4489 };
144bed8d 4490
38b12349 4491 *ret = NULL;
144bed8d 4492
38b12349
L
4493 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4494 return 0;
144bed8d 4495
38b12349
L
4496 if (dynsymcount <= 0)
4497 return 0;
cca5b8b6 4498
38b12349
L
4499 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4500 if (relsize <= 0)
4501 return -1;
4502
3b4c3844 4503 if (get_elf_x86_backend_data (abfd)->target_os != is_nacl)
144bed8d 4504 {
38b12349
L
4505 lazy_plt = &elf_x86_64_lazy_plt;
4506 non_lazy_plt = &elf_x86_64_non_lazy_plt;
4507 lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
4508 non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
ee2fdd6f
L
4509 if (ABI_64_P (abfd))
4510 {
4511 lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4512 non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4513 }
4514 else
4515 {
4516 lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4517 non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4518 }
38b12349
L
4519 }
4520 else
4521 {
4522 lazy_plt = &elf_x86_64_nacl_plt;
4523 non_lazy_plt = NULL;
4524 lazy_bnd_plt = NULL;
4525 non_lazy_bnd_plt = NULL;
ee2fdd6f
L
4526 lazy_ibt_plt = NULL;
4527 non_lazy_ibt_plt = NULL;
38b12349 4528 }
144bed8d 4529
38b12349
L
4530 count = 0;
4531 for (j = 0; plts[j].name != NULL; j++)
4532 {
4533 plt = bfd_get_section_by_name (abfd, plts[j].name);
90efb642 4534 if (plt == NULL || plt->size == 0)
6f25f223 4535 continue;
533d0af0 4536
38b12349
L
4537 /* Get the PLT section contents. */
4538 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4539 if (plt_contents == NULL)
4540 break;
4541 if (!bfd_get_section_contents (abfd, (asection *) plt,
4542 plt_contents, 0, plt->size))
4543 {
4544 free (plt_contents);
4545 break;
4546 }
144bed8d 4547
38b12349
L
4548 /* Check what kind of PLT it is. */
4549 plt_type = plt_unknown;
90efb642
L
4550 if (plts[j].type == plt_unknown
4551 && (plt->size >= (lazy_plt->plt_entry_size
4552 + lazy_plt->plt_entry_size)))
144bed8d 4553 {
38b12349
L
4554 /* Match lazy PLT first. Need to check the first two
4555 instructions. */
4556 if ((memcmp (plt_contents, lazy_plt->plt0_entry,
4557 lazy_plt->plt0_got1_offset) == 0)
4558 && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
4559 2) == 0))
4560 plt_type = plt_lazy;
4561 else if (lazy_bnd_plt != NULL
4562 && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
4563 lazy_bnd_plt->plt0_got1_offset) == 0)
4564 && (memcmp (plt_contents + 6,
4565 lazy_bnd_plt->plt0_entry + 6, 3) == 0))
ec1f73bb 4566 {
f2c29a16 4567 plt_type = plt_lazy | plt_second;
ee2fdd6f
L
4568 /* The fist entry in the lazy IBT PLT is the same as the
4569 lazy BND PLT. */
4570 if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
4571 lazy_ibt_plt->plt_entry,
4572 lazy_ibt_plt->plt_got_offset) == 0))
4573 lazy_plt = lazy_ibt_plt;
4574 else
4575 lazy_plt = lazy_bnd_plt;
ec1f73bb 4576 }
144bed8d 4577 }
fca6ae69 4578
38b12349 4579 if (non_lazy_plt != NULL
90efb642
L
4580 && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4581 && plt->size >= non_lazy_plt->plt_entry_size)
38b12349
L
4582 {
4583 /* Match non-lazy PLT. */
4584 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4585 non_lazy_plt->plt_got_offset) == 0)
4586 plt_type = plt_non_lazy;
4587 }
4588
ee2fdd6f 4589 if (plt_type == plt_unknown || plt_type == plt_second)
38b12349 4590 {
ee2fdd6f 4591 if (non_lazy_bnd_plt != NULL
90efb642 4592 && plt->size >= non_lazy_bnd_plt->plt_entry_size
ee2fdd6f
L
4593 && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
4594 non_lazy_bnd_plt->plt_got_offset) == 0))
38b12349 4595 {
ee2fdd6f 4596 /* Match BND PLT. */
f2c29a16 4597 plt_type = plt_second;
38b12349
L
4598 non_lazy_plt = non_lazy_bnd_plt;
4599 }
ee2fdd6f 4600 else if (non_lazy_ibt_plt != NULL
90efb642 4601 && plt->size >= non_lazy_ibt_plt->plt_entry_size
ee2fdd6f
L
4602 && (memcmp (plt_contents,
4603 non_lazy_ibt_plt->plt_entry,
4604 non_lazy_ibt_plt->plt_got_offset) == 0))
4605 {
4606 /* Match IBT PLT. */
4607 plt_type = plt_second;
4608 non_lazy_plt = non_lazy_ibt_plt;
4609 }
38b12349
L
4610 }
4611
4612 if (plt_type == plt_unknown)
37c0b6ee
L
4613 {
4614 free (plt_contents);
4615 continue;
4616 }
38b12349
L
4617
4618 plts[j].sec = plt;
4619 plts[j].type = plt_type;
4620
4621 if ((plt_type & plt_lazy))
4622 {
4623 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4624 plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
4625 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4626 /* Skip PLT0 in lazy PLT. */
4627 i = 1;
4628 }
4629 else
4630 {
4631 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4632 plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
4633 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4634 i = 0;
4635 }
4636
f2c29a16
L
4637 /* Skip lazy PLT when the second PLT is used. */
4638 if (plt_type == (plt_lazy | plt_second))
38b12349
L
4639 plts[j].count = 0;
4640 else
4641 {
4642 n = plt->size / plts[j].plt_entry_size;
4643 plts[j].count = n;
4644 count += n - i;
4645 }
4646
4647 plts[j].contents = plt_contents;
144bed8d
L
4648 }
4649
f493882d
L
4650 return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4651 (bfd_vma) 0, plts, dynsyms,
4652 ret);
0ff2b86e
L
4653}
4654
d2b2c203
DJ
4655/* Handle an x86-64 specific section when reading an object file. This
4656 is called when elfcode.h finds a section with an unknown type. */
4657
4658static bfd_boolean
0c723101
L
4659elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
4660 const char *name, int shindex)
d2b2c203
DJ
4661{
4662 if (hdr->sh_type != SHT_X86_64_UNWIND)
4663 return FALSE;
4664
6dc132d9 4665 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
d2b2c203
DJ
4666 return FALSE;
4667
4668 return TRUE;
4669}
4670
3b22753a
L
4671/* Hook called by the linker routine which adds symbols from an object
4672 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4673 of .bss. */
4674
4675static bfd_boolean
351f65ca 4676elf_x86_64_add_symbol_hook (bfd *abfd,
a43942db 4677 struct bfd_link_info *info ATTRIBUTE_UNUSED,
351f65ca
L
4678 Elf_Internal_Sym *sym,
4679 const char **namep ATTRIBUTE_UNUSED,
4680 flagword *flagsp ATTRIBUTE_UNUSED,
4681 asection **secp,
4682 bfd_vma *valp)
3b22753a
L
4683{
4684 asection *lcomm;
4685
4686 switch (sym->st_shndx)
4687 {
4688 case SHN_X86_64_LCOMMON:
4689 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4690 if (lcomm == NULL)
4691 {
4692 lcomm = bfd_make_section_with_flags (abfd,
4693 "LARGE_COMMON",
4694 (SEC_ALLOC
4695 | SEC_IS_COMMON
4696 | SEC_LINKER_CREATED));
4697 if (lcomm == NULL)
4698 return FALSE;
4699 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4700 }
4701 *secp = lcomm;
4702 *valp = sym->st_size;
c35bdf6e 4703 return TRUE;
3b22753a 4704 }
d8045f23 4705
3b22753a
L
4706 return TRUE;
4707}
4708
4709
4710/* Given a BFD section, try to locate the corresponding ELF section
4711 index. */
4712
4713static bfd_boolean
351f65ca
L
4714elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4715 asection *sec, int *index_return)
3b22753a
L
4716{
4717 if (sec == &_bfd_elf_large_com_section)
4718 {
91d6fa6a 4719 *index_return = SHN_X86_64_LCOMMON;
3b22753a
L
4720 return TRUE;
4721 }
4722 return FALSE;
4723}
4724
4725/* Process a symbol. */
4726
4727static void
351f65ca
L
4728elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4729 asymbol *asym)
3b22753a
L
4730{
4731 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4732
4733 switch (elfsym->internal_elf_sym.st_shndx)
4734 {
4735 case SHN_X86_64_LCOMMON:
4736 asym->section = &_bfd_elf_large_com_section;
4737 asym->value = elfsym->internal_elf_sym.st_size;
4738 /* Common symbol doesn't set BSF_GLOBAL. */
4739 asym->flags &= ~BSF_GLOBAL;
4740 break;
4741 }
4742}
4743
4744static bfd_boolean
351f65ca 4745elf_x86_64_common_definition (Elf_Internal_Sym *sym)
3b22753a
L
4746{
4747 return (sym->st_shndx == SHN_COMMON
4748 || sym->st_shndx == SHN_X86_64_LCOMMON);
4749}
4750
4751static unsigned int
351f65ca 4752elf_x86_64_common_section_index (asection *sec)
3b22753a
L
4753{
4754 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4755 return SHN_COMMON;
4756 else
4757 return SHN_X86_64_LCOMMON;
4758}
4759
4760static asection *
351f65ca 4761elf_x86_64_common_section (asection *sec)
3b22753a
L
4762{
4763 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4764 return bfd_com_section_ptr;
4765 else
4766 return &_bfd_elf_large_com_section;
4767}
4768
4769static bfd_boolean
5d13b3b3
AM
4770elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
4771 const Elf_Internal_Sym *sym,
351f65ca 4772 asection **psec,
5d13b3b3
AM
4773 bfd_boolean newdef,
4774 bfd_boolean olddef,
351f65ca 4775 bfd *oldbfd,
5d13b3b3 4776 const asection *oldsec)
3b22753a
L
4777{
4778 /* A normal common symbol and a large common symbol result in a
00492999
L
4779 normal common symbol. We turn the large common symbol into a
4780 normal one. */
5d13b3b3 4781 if (!olddef
3b22753a 4782 && h->root.type == bfd_link_hash_common
5d13b3b3
AM
4783 && !newdef
4784 && bfd_is_com_section (*psec)
4785 && oldsec != *psec)
3b22753a 4786 {
00492999 4787 if (sym->st_shndx == SHN_COMMON
5d13b3b3 4788 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
00492999
L
4789 {
4790 h->root.u.c.p->section
4791 = bfd_make_section_old_way (oldbfd, "COMMON");
4792 h->root.u.c.p->section->flags = SEC_ALLOC;
4793 }
4794 else if (sym->st_shndx == SHN_X86_64_LCOMMON
5d13b3b3
AM
4795 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
4796 *psec = bfd_com_section_ptr;
3b22753a
L
4797 }
4798
4799 return TRUE;
4800}
4801
4802static int
351f65ca
L
4803elf_x86_64_additional_program_headers (bfd *abfd,
4804 struct bfd_link_info *info ATTRIBUTE_UNUSED)
3b22753a
L
4805{
4806 asection *s;
9a2e389a 4807 int count = 0;
3b22753a
L
4808
4809 /* Check to see if we need a large readonly segment. */
4810 s = bfd_get_section_by_name (abfd, ".lrodata");
4811 if (s && (s->flags & SEC_LOAD))
4812 count++;
4813
4814 /* Check to see if we need a large data segment. Since .lbss sections
4815 is placed right after the .bss section, there should be no need for
4816 a large data segment just because of .lbss. */
4817 s = bfd_get_section_by_name (abfd, ".ldata");
4818 if (s && (s->flags & SEC_LOAD))
4819 count++;
4820
4821 return count;
4822}
4823
c543bf9a
L
4824/* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
4825
4826static bfd_boolean
4827elf_x86_64_relocs_compatible (const bfd_target *input,
4828 const bfd_target *output)
4829{
4830 return ((xvec_get_elf_backend_data (input)->s->elfclass
4831 == xvec_get_elf_backend_data (output)->s->elfclass)
4832 && _bfd_elf_relocs_compatible (input, output));
4833}
4834
38b12349
L
4835/* Set up x86-64 GNU properties. Return the first relocatable ELF input
4836 with GNU properties if found. Otherwise, return NULL. */
4837
4838static bfd *
4839elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
4840{
1de031c8 4841 struct elf_x86_init_table init_table;
ee2fdd6f 4842
78984959
L
4843 if ((int) R_X86_64_standard >= (int) R_X86_64_converted_reloc_bit
4844 || (int) R_X86_64_max <= (int) R_X86_64_converted_reloc_bit
4845 || ((int) (R_X86_64_GNU_VTINHERIT | R_X86_64_converted_reloc_bit)
4846 != (int) R_X86_64_GNU_VTINHERIT)
4847 || ((int) (R_X86_64_GNU_VTENTRY | R_X86_64_converted_reloc_bit)
4848 != (int) R_X86_64_GNU_VTENTRY))
4849 abort ();
4850
851b6fa1
L
4851 /* This is unused for x86-64. */
4852 init_table.plt0_pad_byte = 0x90;
4853
3b4c3844 4854 if (get_elf_x86_backend_data (info->output_bfd)->target_os != is_nacl)
73784fa5 4855 {
a6798bab 4856 if (info->bndplt)
ee2fdd6f 4857 {
1de031c8
L
4858 init_table.lazy_plt = &elf_x86_64_lazy_bnd_plt;
4859 init_table.non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
ee2fdd6f
L
4860 }
4861 else
4862 {
1de031c8
L
4863 init_table.lazy_plt = &elf_x86_64_lazy_plt;
4864 init_table.non_lazy_plt = &elf_x86_64_non_lazy_plt;
ee2fdd6f 4865 }
38b12349 4866
a6798bab 4867 if (ABI_64_P (info->output_bfd))
38b12349 4868 {
1de031c8
L
4869 init_table.lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4870 init_table.non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
38b12349
L
4871 }
4872 else
4873 {
1de031c8
L
4874 init_table.lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4875 init_table.non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
38b12349 4876 }
38b12349
L
4877 }
4878 else
4879 {
1de031c8
L
4880 init_table.lazy_plt = &elf_x86_64_nacl_plt;
4881 init_table.non_lazy_plt = NULL;
4882 init_table.lazy_ibt_plt = NULL;
4883 init_table.non_lazy_ibt_plt = NULL;
38b12349
L
4884 }
4885
7a382c1c
L
4886 if (ABI_64_P (info->output_bfd))
4887 {
1de031c8
L
4888 init_table.r_info = elf64_r_info;
4889 init_table.r_sym = elf64_r_sym;
7a382c1c
L
4890 }
4891 else
4892 {
1de031c8
L
4893 init_table.r_info = elf32_r_info;
4894 init_table.r_sym = elf32_r_sym;
7a382c1c
L
4895 }
4896
1de031c8 4897 return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
38b12349
L
4898}
4899
9a2e389a 4900static const struct bfd_elf_special_section
46bed679 4901elf_x86_64_special_sections[]=
3b22753a 4902{
0112cd26
NC
4903 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4904 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4905 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
07d6d2b8 4906 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
0112cd26
NC
4907 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4908 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
07d6d2b8 4909 { NULL, 0, 0, 0, 0 }
3b22753a
L
4910};
4911
6d00b590 4912#define TARGET_LITTLE_SYM x86_64_elf64_vec
70256ad8
AJ
4913#define TARGET_LITTLE_NAME "elf64-x86-64"
4914#define ELF_ARCH bfd_arch_i386
ae95ffa6 4915#define ELF_TARGET_ID X86_64_ELF_DATA
70256ad8 4916#define ELF_MACHINE_CODE EM_X86_64
f7661549 4917#define ELF_MAXPAGESIZE 0x200000
2043964e 4918#define ELF_MINPAGESIZE 0x1000
24718e3b 4919#define ELF_COMMONPAGESIZE 0x1000
70256ad8
AJ
4920
4921#define elf_backend_can_gc_sections 1
51b64d56 4922#define elf_backend_can_refcount 1
70256ad8
AJ
4923#define elf_backend_want_got_plt 1
4924#define elf_backend_plt_readonly 1
4925#define elf_backend_want_plt_sym 0
4926#define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
b491616a 4927#define elf_backend_rela_normal 1
07d6d2b8 4928#define elf_backend_plt_alignment 4
f7483970 4929#define elf_backend_extern_protected_data 1
bedfd056 4930#define elf_backend_caches_rawsize 1
64f52338 4931#define elf_backend_dtrel_excludes_plt 1
5474d94f 4932#define elf_backend_want_dynrelro 1
70256ad8 4933
351f65ca 4934#define elf_info_to_howto elf_x86_64_info_to_howto
70256ad8 4935
351f65ca 4936#define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
157090f7 4937#define bfd_elf64_bfd_reloc_name_lookup \
351f65ca 4938 elf_x86_64_reloc_name_lookup
70256ad8 4939
c543bf9a 4940#define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
351f65ca 4941#define elf_backend_check_relocs elf_x86_64_check_relocs
38b12349 4942#define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
351f65ca
L
4943#define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
4944#define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
233cc9c1 4945#define elf_backend_output_arch_local_syms elf_x86_64_output_arch_local_syms
351f65ca
L
4946#define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
4947#define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
8fd79e71
L
4948#ifdef CORE_HEADER
4949#define elf_backend_write_core_note elf_x86_64_write_core_note
4950#endif
351f65ca
L
4951#define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
4952#define elf_backend_relocate_section elf_x86_64_relocate_section
74541ad4 4953#define elf_backend_init_index_section _bfd_elf_init_1_index_section
407443a3 4954#define elf_backend_object_p elf64_x86_64_elf_object_p
0ff2b86e 4955#define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
8d88c4ca 4956
d2b2c203 4957#define elf_backend_section_from_shdr \
351f65ca 4958 elf_x86_64_section_from_shdr
d2b2c203 4959
3b22753a 4960#define elf_backend_section_from_bfd_section \
351f65ca 4961 elf_x86_64_elf_section_from_bfd_section
3b22753a 4962#define elf_backend_add_symbol_hook \
351f65ca 4963 elf_x86_64_add_symbol_hook
3b22753a 4964#define elf_backend_symbol_processing \
351f65ca 4965 elf_x86_64_symbol_processing
3b22753a 4966#define elf_backend_common_section_index \
351f65ca 4967 elf_x86_64_common_section_index
3b22753a 4968#define elf_backend_common_section \
351f65ca 4969 elf_x86_64_common_section
3b22753a 4970#define elf_backend_common_definition \
351f65ca 4971 elf_x86_64_common_definition
3b22753a 4972#define elf_backend_merge_symbol \
351f65ca 4973 elf_x86_64_merge_symbol
3b22753a 4974#define elf_backend_special_sections \
351f65ca 4975 elf_x86_64_special_sections
3b22753a 4976#define elf_backend_additional_program_headers \
351f65ca 4977 elf_x86_64_additional_program_headers
38b12349 4978#define elf_backend_setup_gnu_properties \
9f857535
L
4979 elf_x86_64_link_setup_gnu_properties
4980#define elf_backend_hide_symbol \
4981 _bfd_x86_elf_hide_symbol
3b22753a 4982
8d88c4ca 4983#include "elf64-target.h"
9d7cbccd 4984
6036f486
ES
4985/* CloudABI support. */
4986
07d6d2b8 4987#undef TARGET_LITTLE_SYM
6036f486 4988#define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
07d6d2b8 4989#undef TARGET_LITTLE_NAME
6036f486
ES
4990#define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
4991
4992#undef ELF_OSABI
4993#define ELF_OSABI ELFOSABI_CLOUDABI
4994
07d6d2b8 4995#undef elf64_bed
6036f486
ES
4996#define elf64_bed elf64_x86_64_cloudabi_bed
4997
4998#include "elf64-target.h"
4999
9d7cbccd
NC
5000/* FreeBSD support. */
5001
07d6d2b8 5002#undef TARGET_LITTLE_SYM
6d00b590 5003#define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
07d6d2b8 5004#undef TARGET_LITTLE_NAME
9d7cbccd
NC
5005#define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
5006
d1036acb
L
5007#undef ELF_OSABI
5008#define ELF_OSABI ELFOSABI_FREEBSD
9d7cbccd 5009
07d6d2b8 5010#undef elf64_bed
9d7cbccd
NC
5011#define elf64_bed elf64_x86_64_fbsd_bed
5012
5013#include "elf64-target.h"
8a9036a4 5014
a6cc6b3b
RO
5015/* Solaris 2 support. */
5016
5017#undef TARGET_LITTLE_SYM
6d00b590 5018#define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
a6cc6b3b
RO
5019#undef TARGET_LITTLE_NAME
5020#define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
5021
3b4c3844
L
5022static const struct elf_x86_backend_data elf_x86_64_solaris_arch_bed =
5023 {
5024 is_solaris /* os */
5025 };
5026
5027#undef elf_backend_arch_data
5028#define elf_backend_arch_data &elf_x86_64_solaris_arch_bed
5029
a6cc6b3b
RO
5030/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
5031 objects won't be recognized. */
5032#undef ELF_OSABI
5033
5034#undef elf64_bed
5035#define elf64_bed elf64_x86_64_sol2_bed
5036
7dc98aea
RO
5037/* The 64-bit static TLS arena size is rounded to the nearest 16-byte
5038 boundary. */
84865015 5039#undef elf_backend_static_tls_alignment
7dc98aea
RO
5040#define elf_backend_static_tls_alignment 16
5041
a6cc6b3b
RO
5042/* The Solaris 2 ABI requires a plt symbol on all platforms.
5043
5044 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
5045 File, p.63. */
84865015 5046#undef elf_backend_want_plt_sym
a6cc6b3b
RO
5047#define elf_backend_want_plt_sym 1
5048
84865015
NC
5049#undef elf_backend_strtab_flags
5050#define elf_backend_strtab_flags SHF_STRINGS
5051
5052static bfd_boolean
5522f910
NC
5053elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
5054 bfd *obfd ATTRIBUTE_UNUSED,
5055 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
5056 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
84865015
NC
5057{
5058 /* PR 19938: FIXME: Need to add code for setting the sh_info
5059 and sh_link fields of Solaris specific section types. */
5060 return FALSE;
5061}
5062
5522f910
NC
5063#undef elf_backend_copy_special_section_fields
5064#define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
84865015 5065
a6cc6b3b
RO
5066#include "elf64-target.h"
5067
8059fb19
RM
5068/* Native Client support. */
5069
64b384e1
RM
5070static bfd_boolean
5071elf64_x86_64_nacl_elf_object_p (bfd *abfd)
5072{
5073 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
5074 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
5075 return TRUE;
5076}
5077
8059fb19 5078#undef TARGET_LITTLE_SYM
6d00b590 5079#define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
8059fb19
RM
5080#undef TARGET_LITTLE_NAME
5081#define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
5082#undef elf64_bed
5083#define elf64_bed elf64_x86_64_nacl_bed
5084
5085#undef ELF_MAXPAGESIZE
5086#undef ELF_MINPAGESIZE
5087#undef ELF_COMMONPAGESIZE
5088#define ELF_MAXPAGESIZE 0x10000
5089#define ELF_MINPAGESIZE 0x10000
5090#define ELF_COMMONPAGESIZE 0x10000
5091
5092/* Restore defaults. */
5093#undef ELF_OSABI
5094#undef elf_backend_static_tls_alignment
5095#undef elf_backend_want_plt_sym
5096#define elf_backend_want_plt_sym 0
84865015 5097#undef elf_backend_strtab_flags
5522f910 5098#undef elf_backend_copy_special_section_fields
8059fb19
RM
5099
5100/* NaCl uses substantially different PLT entries for the same effects. */
5101
5102#undef elf_backend_plt_alignment
5103#define elf_backend_plt_alignment 5
5104#define NACL_PLT_ENTRY_SIZE 64
5105#define NACLMASK 0xe0 /* 32-byte alignment mask. */
5106
5107static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
5108 {
07d6d2b8 5109 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
8059fb19 5110 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
07d6d2b8
AM
5111 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5112 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5113 0x41, 0xff, 0xe3, /* jmpq *%r11 */
8059fb19 5114
ea2d813e 5115 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
70cc877f 5116 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
ea2d813e
RM
5117
5118 /* 32 bytes of nop to pad out to the standard size. */
3ddf1bdd 5119 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5120 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
3ddf1bdd 5121 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5122 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
07d6d2b8
AM
5123 0x66, /* excess data16 prefix */
5124 0x90 /* nop */
8059fb19
RM
5125 };
5126
5127static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
5128 {
5129 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
07d6d2b8
AM
5130 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5131 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5132 0x41, 0xff, 0xe3, /* jmpq *%r11 */
8059fb19
RM
5133
5134 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
3ddf1bdd 5135 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19
RM
5136 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5137
5138 /* Lazy GOT entries point here (32-byte aligned). */
07d6d2b8
AM
5139 0x68, /* pushq immediate */
5140 0, 0, 0, 0, /* replaced with index into relocation table. */
5141 0xe9, /* jmp relative */
5142 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
8059fb19 5143
07d6d2b8 5144 /* 22 bytes of nop to pad out to the standard size. */
3ddf1bdd 5145 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
8059fb19 5146 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
07d6d2b8 5147 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
8059fb19
RM
5148 };
5149
5150/* .eh_frame covering the .plt section. */
5151
5152static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
5153 {
07d6d2b8
AM
5154#if (PLT_CIE_LENGTH != 20 \
5155 || PLT_FDE_LENGTH != 36 \
5156 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
8059fb19 5157 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
851b6fa1 5158# error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
8059fb19
RM
5159#endif
5160 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
5161 0, 0, 0, 0, /* CIE ID */
5162 1, /* CIE version */
07d6d2b8 5163 'z', 'R', 0, /* Augmentation string */
8059fb19 5164 1, /* Code alignment factor */
07d6d2b8 5165 0x78, /* Data alignment factor */
8059fb19
RM
5166 16, /* Return address column */
5167 1, /* Augmentation size */
5168 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
5169 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
5170 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
5171 DW_CFA_nop, DW_CFA_nop,
5172
5173 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
5174 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
5175 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
5176 0, 0, 0, 0, /* .plt size goes here */
5177 0, /* Augmentation size */
5178 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
5179 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
5180 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
5181 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
5182 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
5183 13, /* Block length */
5184 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
5185 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
5186 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
5187 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
5188 DW_CFA_nop, DW_CFA_nop
5189 };
5190
765e526c 5191static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt =
8059fb19 5192 {
07d6d2b8
AM
5193 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
5194 NACL_PLT_ENTRY_SIZE, /* plt0_entry_size */
5195 elf_x86_64_nacl_plt_entry, /* plt_entry */
5196 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
5197 2, /* plt0_got1_offset */
5198 9, /* plt0_got2_offset */
5199 13, /* plt0_got2_insn_end */
5200 3, /* plt_got_offset */
5201 33, /* plt_reloc_offset */
5202 38, /* plt_plt_offset */
5203 7, /* plt_got_insn_size */
5204 42, /* plt_plt_insn_end */
5205 32, /* plt_lazy_offset */
5206 elf_x86_64_nacl_plt0_entry, /* pic_plt0_entry */
5207 elf_x86_64_nacl_plt_entry, /* pic_plt_entry */
5208 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
38b12349
L
5209 sizeof (elf_x86_64_nacl_eh_frame_plt) /* eh_frame_plt_size */
5210 };
5211
851b6fa1 5212static const struct elf_x86_backend_data elf_x86_64_nacl_arch_bed =
38b12349 5213 {
07d6d2b8 5214 is_nacl /* os */
8059fb19
RM
5215 };
5216
5217#undef elf_backend_arch_data
5218#define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
5219
64b384e1
RM
5220#undef elf_backend_object_p
5221#define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
5a68afcf
RM
5222#undef elf_backend_modify_segment_map
5223#define elf_backend_modify_segment_map nacl_modify_segment_map
5224#undef elf_backend_modify_program_headers
5225#define elf_backend_modify_program_headers nacl_modify_program_headers
887badb3
RM
5226#undef elf_backend_final_write_processing
5227#define elf_backend_final_write_processing nacl_final_write_processing
5a68afcf 5228
8059fb19
RM
5229#include "elf64-target.h"
5230
5231/* Native Client x32 support. */
5232
64b384e1
RM
5233static bfd_boolean
5234elf32_x86_64_nacl_elf_object_p (bfd *abfd)
5235{
5236 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
5237 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
5238 return TRUE;
5239}
5240
07d6d2b8 5241#undef TARGET_LITTLE_SYM
6d00b590 5242#define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
07d6d2b8 5243#undef TARGET_LITTLE_NAME
8059fb19
RM
5244#define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
5245#undef elf32_bed
5246#define elf32_bed elf32_x86_64_nacl_bed
5247
8059fb19
RM
5248#define bfd_elf32_bfd_reloc_type_lookup \
5249 elf_x86_64_reloc_type_lookup
5250#define bfd_elf32_bfd_reloc_name_lookup \
5251 elf_x86_64_reloc_name_lookup
b7365e5d
L
5252#define bfd_elf32_get_synthetic_symtab \
5253 elf_x86_64_get_synthetic_symtab
8059fb19
RM
5254
5255#undef elf_backend_object_p
5256#define elf_backend_object_p \
64b384e1 5257 elf32_x86_64_nacl_elf_object_p
8059fb19
RM
5258
5259#undef elf_backend_bfd_from_remote_memory
5260#define elf_backend_bfd_from_remote_memory \
5261 _bfd_elf32_bfd_from_remote_memory
5262
5263#undef elf_backend_size_info
5264#define elf_backend_size_info \
5265 _bfd_elf32_size_info
5266
5267#include "elf32-target.h"
5268
5269/* Restore defaults. */
5a68afcf 5270#undef elf_backend_object_p
8059fb19 5271#define elf_backend_object_p elf64_x86_64_elf_object_p
5a68afcf
RM
5272#undef elf_backend_bfd_from_remote_memory
5273#undef elf_backend_size_info
5274#undef elf_backend_modify_segment_map
5275#undef elf_backend_modify_program_headers
887badb3 5276#undef elf_backend_final_write_processing
8059fb19 5277
8a9036a4
L
5278/* Intel L1OM support. */
5279
5280static bfd_boolean
5281elf64_l1om_elf_object_p (bfd *abfd)
5282{
5283 /* Set the right machine number for an L1OM elf64 file. */
5284 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
5285 return TRUE;
5286}
5287
5288#undef TARGET_LITTLE_SYM
6d00b590 5289#define TARGET_LITTLE_SYM l1om_elf64_vec
8a9036a4
L
5290#undef TARGET_LITTLE_NAME
5291#define TARGET_LITTLE_NAME "elf64-l1om"
5292#undef ELF_ARCH
5293#define ELF_ARCH bfd_arch_l1om
5294
5295#undef ELF_MACHINE_CODE
5296#define ELF_MACHINE_CODE EM_L1OM
5297
5298#undef ELF_OSABI
5299
5300#undef elf64_bed
5301#define elf64_bed elf64_l1om_bed
5302
5303#undef elf_backend_object_p
5304#define elf_backend_object_p elf64_l1om_elf_object_p
5305
8059fb19
RM
5306/* Restore defaults. */
5307#undef ELF_MAXPAGESIZE
5308#undef ELF_MINPAGESIZE
5309#undef ELF_COMMONPAGESIZE
5310#define ELF_MAXPAGESIZE 0x200000
5311#define ELF_MINPAGESIZE 0x1000
5312#define ELF_COMMONPAGESIZE 0x1000
5313#undef elf_backend_plt_alignment
5314#define elf_backend_plt_alignment 4
5315#undef elf_backend_arch_data
5316#define elf_backend_arch_data &elf_x86_64_arch_bed
1a0c107f 5317
8a9036a4
L
5318#include "elf64-target.h"
5319
5320/* FreeBSD L1OM support. */
5321
5322#undef TARGET_LITTLE_SYM
6d00b590 5323#define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
8a9036a4
L
5324#undef TARGET_LITTLE_NAME
5325#define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
5326
5327#undef ELF_OSABI
5328#define ELF_OSABI ELFOSABI_FREEBSD
5329
5330#undef elf64_bed
5331#define elf64_bed elf64_l1om_fbsd_bed
5332
8a9036a4 5333#include "elf64-target.h"
351f65ca 5334
7a9068fe
L
5335/* Intel K1OM support. */
5336
5337static bfd_boolean
5338elf64_k1om_elf_object_p (bfd *abfd)
5339{
5340 /* Set the right machine number for an K1OM elf64 file. */
5341 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
5342 return TRUE;
5343}
5344
5345#undef TARGET_LITTLE_SYM
6d00b590 5346#define TARGET_LITTLE_SYM k1om_elf64_vec
7a9068fe
L
5347#undef TARGET_LITTLE_NAME
5348#define TARGET_LITTLE_NAME "elf64-k1om"
5349#undef ELF_ARCH
5350#define ELF_ARCH bfd_arch_k1om
5351
5352#undef ELF_MACHINE_CODE
5353#define ELF_MACHINE_CODE EM_K1OM
5354
5355#undef ELF_OSABI
5356
5357#undef elf64_bed
5358#define elf64_bed elf64_k1om_bed
5359
5360#undef elf_backend_object_p
5361#define elf_backend_object_p elf64_k1om_elf_object_p
5362
5363#undef elf_backend_static_tls_alignment
5364
5365#undef elf_backend_want_plt_sym
5366#define elf_backend_want_plt_sym 0
5367
5368#include "elf64-target.h"
5369
5370/* FreeBSD K1OM support. */
5371
5372#undef TARGET_LITTLE_SYM
6d00b590 5373#define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
7a9068fe
L
5374#undef TARGET_LITTLE_NAME
5375#define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
5376
5377#undef ELF_OSABI
5378#define ELF_OSABI ELFOSABI_FREEBSD
5379
5380#undef elf64_bed
5381#define elf64_bed elf64_k1om_fbsd_bed
5382
5383#include "elf64-target.h"
5384
351f65ca
L
5385/* 32bit x86-64 support. */
5386
351f65ca 5387#undef TARGET_LITTLE_SYM
6d00b590 5388#define TARGET_LITTLE_SYM x86_64_elf32_vec
351f65ca
L
5389#undef TARGET_LITTLE_NAME
5390#define TARGET_LITTLE_NAME "elf32-x86-64"
8059fb19 5391#undef elf32_bed
351f65ca
L
5392
5393#undef ELF_ARCH
5394#define ELF_ARCH bfd_arch_i386
5395
5396#undef ELF_MACHINE_CODE
5397#define ELF_MACHINE_CODE EM_X86_64
5398
351f65ca
L
5399#undef ELF_OSABI
5400
351f65ca
L
5401#undef elf_backend_object_p
5402#define elf_backend_object_p \
5403 elf32_x86_64_elf_object_p
5404
5405#undef elf_backend_bfd_from_remote_memory
5406#define elf_backend_bfd_from_remote_memory \
5407 _bfd_elf32_bfd_from_remote_memory
5408
5409#undef elf_backend_size_info
5410#define elf_backend_size_info \
5411 _bfd_elf32_size_info
5412
5413#include "elf32-target.h"
This page took 1.574445 seconds and 4 git commands to generate.