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