projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
[ARC] Fix typo in extension instruction name.
[deliverable/binutils-gdb.git] / bfd / elf64-x86-64.c
CommitLineData
351f65ca 1/* X86-64 specific support for ELF
6f2750fe 2 Copyright (C) 2000-2016 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
8d88c4ca 22#include "sysdep.h"
3db64b00 23#include "bfd.h"
c434dee6 24#include "bfdlink.h"
8d88c4ca
NC		 25#include "libbfd.h"
26#include "elf-bfd.h"
5a68afcf 27#include "elf-nacl.h"
142411ca 28#include "bfd_stdint.h"
c25bc9fc
L		 29#include "objalloc.h"
30#include "hashtab.h"
e41b3a13 31#include "dwarf2.h"
d7921315 32#include "libiberty.h"
8d88c4ca 33
56ceb5b5 34#include "opcode/i386.h"
8d88c4ca
NC		 35#include "elf/x86-64.h"
36
8fd79e71
L		 37#ifdef CORE_HEADER
38#include <stdarg.h>
39#include CORE_HEADER
40#endif
41
8d88c4ca
NC		 42/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
43#define MINUS_ONE (~ (bfd_vma) 0)
44
351f65ca
L		 45/* Since both 32-bit and 64-bit x86-64 encode relocation type in the
46 identical manner, we use ELF32_R_TYPE instead of ELF64_R_TYPE to get
47 relocation type. We also use ELF_ST_TYPE instead of ELF64_ST_TYPE
48 since they are the same. */
49
50#define ABI_64_P(abfd) \
51 (get_elf_backend_data (abfd)->s->elfclass == ELFCLASS64)
52
8d88c4ca 53/* The relocation "howto" table. Order of fields:
7b81dfbb
AJ		 54 type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
55 special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset. */
70256ad8
AJ		 56static reloc_howto_type x86_64_elf_howto_table[] =
57{
6346d5ca 58 HOWTO(R_X86_64_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
b34976b6
AM		 59 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
60 FALSE),
61 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
62 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
63 FALSE),
64 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
65 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
66 TRUE),
67 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
68 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
69 FALSE),
70 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
71 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
72 TRUE),
73 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
74 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
75 FALSE),
76 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
77 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
78 MINUS_ONE, FALSE),
79 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
80 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
81 MINUS_ONE, FALSE),
82 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
83 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
84 MINUS_ONE, FALSE),
85 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
86 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
87 0xffffffff, TRUE),
88 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
89 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
90 FALSE),
91 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
92 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
93 FALSE),
94 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
95 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
b0360d8c 96 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
b34976b6 97 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
ac2aa337 98 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
b34976b6
AM		 99 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
100 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
101 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
102 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
103 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
104 MINUS_ONE, FALSE),
105 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
106 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
107 MINUS_ONE, FALSE),
108 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
109 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
110 MINUS_ONE, FALSE),
111 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
112 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
113 0xffffffff, TRUE),
114 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
115 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
116 0xffffffff, TRUE),
ac2aa337 117 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
b34976b6
AM		 118 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
119 0xffffffff, FALSE),
120 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
121 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
122 0xffffffff, TRUE),
123 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
124 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
125 0xffffffff, FALSE),
d6ab8113
JB		 126 HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
127 bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
128 TRUE),
129 HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
130 bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
131 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
132 HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
133 bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
134 FALSE, 0xffffffff, 0xffffffff, TRUE),
7b81dfbb
AJ		 135 HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
136 bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
137 FALSE),
138 HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
139 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
140 MINUS_ONE, TRUE),
141 HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
142 bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
143 FALSE, MINUS_ONE, MINUS_ONE, TRUE),
144 HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
145 bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
146 MINUS_ONE, FALSE),
147 HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
148 bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
149 MINUS_ONE, FALSE),
1788fc08
L		 150 HOWTO(R_X86_64_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
151 bfd_elf_generic_reloc, "R_X86_64_SIZE32", FALSE, 0xffffffff, 0xffffffff,
152 FALSE),
153 HOWTO(R_X86_64_SIZE64, 0, 4, 64, FALSE, 0, complain_overflow_unsigned,
154 bfd_elf_generic_reloc, "R_X86_64_SIZE64", FALSE, MINUS_ONE, MINUS_ONE,
155 FALSE),
67a4f2b7
AO		 156 HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
157 complain_overflow_bitfield, bfd_elf_generic_reloc,
158 "R_X86_64_GOTPC32_TLSDESC",
159 FALSE, 0xffffffff, 0xffffffff, TRUE),
160 HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
161 complain_overflow_dont, bfd_elf_generic_reloc,
162 "R_X86_64_TLSDESC_CALL",
163 FALSE, 0, 0, FALSE),
164 HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
165 complain_overflow_bitfield, bfd_elf_generic_reloc,
166 "R_X86_64_TLSDESC",
167 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
cbe950e9
L		 168 HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
169 bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
170 MINUS_ONE, FALSE),
64d25c44
L		 171 HOWTO(R_X86_64_RELATIVE64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
172 bfd_elf_generic_reloc, "R_X86_64_RELATIVE64", FALSE, MINUS_ONE,
173 MINUS_ONE, FALSE),
c3320543
L		 174 HOWTO(R_X86_64_PC32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
175 bfd_elf_generic_reloc, "R_X86_64_PC32_BND", FALSE, 0xffffffff, 0xffffffff,
176 TRUE),
177 HOWTO(R_X86_64_PLT32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
178 bfd_elf_generic_reloc, "R_X86_64_PLT32_BND", FALSE, 0xffffffff, 0xffffffff,
179 TRUE),
56ceb5b5
L		 180 HOWTO(R_X86_64_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
181 bfd_elf_generic_reloc, "R_X86_64_GOTPCRELX", FALSE, 0xffffffff,
182 0xffffffff, TRUE),
183 HOWTO(R_X86_64_REX_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
184 bfd_elf_generic_reloc, "R_X86_64_REX_GOTPCRELX", FALSE, 0xffffffff,
185 0xffffffff, TRUE),
fe4770f4 186
a33d77bc
JB		 187 /* We have a gap in the reloc numbers here.
188 R_X86_64_standard counts the number up to this point, and
189 R_X86_64_vt_offset is the value to subtract from a reloc type of
190 R_X86_64_GNU_VT* to form an index into this table. */
56ceb5b5 191#define R_X86_64_standard (R_X86_64_REX_GOTPCRELX + 1)
a33d77bc
JB		 192#define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
193
fe4770f4 194/* GNU extension to record C++ vtable hierarchy. */
b34976b6
AM		 195 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
196 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
fe4770f4
AJ		 197
198/* GNU extension to record C++ vtable member usage. */
b34976b6
AM		 199 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
200 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
d7921315
L		 201 FALSE),
202
203/* Use complain_overflow_bitfield on R_X86_64_32 for x32. */
204 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
205 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
206 FALSE)
8d88c4ca
NC		 207};
208
d8045f23
NC		 209#define IS_X86_64_PCREL_TYPE(TYPE) \
210 ( ((TYPE) == R_X86_64_PC8) \
211 || ((TYPE) == R_X86_64_PC16) \
212 || ((TYPE) == R_X86_64_PC32) \
c3320543 213 || ((TYPE) == R_X86_64_PC32_BND) \
d8045f23
NC		 214 || ((TYPE) == R_X86_64_PC64))
215
8d88c4ca 216/* Map BFD relocs to the x86_64 elf relocs. */
70256ad8
AJ		 217struct elf_reloc_map
218{
8d88c4ca
NC		 219 bfd_reloc_code_real_type bfd_reloc_val;
220 unsigned char elf_reloc_val;
221};
222
dc810e39 223static const struct elf_reloc_map x86_64_reloc_map[] =
8d88c4ca 224{
70256ad8
AJ		 225 { BFD_RELOC_NONE, R_X86_64_NONE, },
226 { BFD_RELOC_64, R_X86_64_64, },
227 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
228 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
229 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
230 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
231 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
232 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
233 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
234 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
235 { BFD_RELOC_32, R_X86_64_32, },
236 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
237 { BFD_RELOC_16, R_X86_64_16, },
238 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
239 { BFD_RELOC_8, R_X86_64_8, },
240 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
bffbf940
JJ		 241 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
242 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
243 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
244 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
245 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
246 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
247 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
248 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
d6ab8113
JB		 249 { BFD_RELOC_64_PCREL, R_X86_64_PC64, },
250 { BFD_RELOC_X86_64_GOTOFF64, R_X86_64_GOTOFF64, },
251 { BFD_RELOC_X86_64_GOTPC32, R_X86_64_GOTPC32, },
7b81dfbb
AJ		 252 { BFD_RELOC_X86_64_GOT64, R_X86_64_GOT64, },
253 { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
254 { BFD_RELOC_X86_64_GOTPC64, R_X86_64_GOTPC64, },
255 { BFD_RELOC_X86_64_GOTPLT64, R_X86_64_GOTPLT64, },
256 { BFD_RELOC_X86_64_PLTOFF64, R_X86_64_PLTOFF64, },
1788fc08
L		 257 { BFD_RELOC_SIZE32, R_X86_64_SIZE32, },
258 { BFD_RELOC_SIZE64, R_X86_64_SIZE64, },
67a4f2b7
AO		 259 { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
260 { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
261 { BFD_RELOC_X86_64_TLSDESC, R_X86_64_TLSDESC, },
cbe950e9 262 { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
56ceb5b5
L		 263 { BFD_RELOC_X86_64_PC32_BND, R_X86_64_PC32_BND, },
264 { BFD_RELOC_X86_64_PLT32_BND, R_X86_64_PLT32_BND, },
265 { BFD_RELOC_X86_64_GOTPCRELX, R_X86_64_GOTPCRELX, },
266 { BFD_RELOC_X86_64_REX_GOTPCRELX, R_X86_64_REX_GOTPCRELX, },
fe4770f4
AJ		 267 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
268 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
8d88c4ca
NC		 269};
270
67a4f2b7 271static reloc_howto_type *
351f65ca 272elf_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
67a4f2b7
AO		 273{
274 unsigned i;
275
d7921315
L		 276 if (r_type == (unsigned int) R_X86_64_32)
277 {
278 if (ABI_64_P (abfd))
279 i = r_type;
280 else
281 i = ARRAY_SIZE (x86_64_elf_howto_table) - 1;
282 }
283 else if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
284 || r_type >= (unsigned int) R_X86_64_max)
67a4f2b7
AO		 285 {
286 if (r_type >= (unsigned int) R_X86_64_standard)
287 {
288 (*_bfd_error_handler) (_("%B: invalid relocation type %d"),
289 abfd, (int) r_type);
290 r_type = R_X86_64_NONE;
291 }
292 i = r_type;
293 }
294 else
295 i = r_type - (unsigned int) R_X86_64_vt_offset;
296 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
297 return &x86_64_elf_howto_table[i];
298}
8d88c4ca
NC		 299
300/* Given a BFD reloc type, return a HOWTO structure. */
301static reloc_howto_type *
351f65ca
L		 302elf_x86_64_reloc_type_lookup (bfd *abfd,
303 bfd_reloc_code_real_type code)
8d88c4ca
NC		 304{
305 unsigned int i;
27482721 306
8d88c4ca
NC		 307 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
308 i++)
309 {
310 if (x86_64_reloc_map[i].bfd_reloc_val == code)
351f65ca
L		 311 return elf_x86_64_rtype_to_howto (abfd,
312 x86_64_reloc_map[i].elf_reloc_val);
8d88c4ca 313 }
5860e3f8 314 return NULL;
8d88c4ca
NC		 315}
316
157090f7 317static reloc_howto_type *
d7921315 318elf_x86_64_reloc_name_lookup (bfd *abfd,
351f65ca 319 const char *r_name)
157090f7
AM		 320{
321 unsigned int i;
322
d7921315
L		 323 if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
324 {
325 /* Get x32 R_X86_64_32. */
326 reloc_howto_type *reloc
327 = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
328 BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
329 return reloc;
330 }
331
332 for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
157090f7
AM		 333 if (x86_64_elf_howto_table[i].name != NULL
334 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
335 return &x86_64_elf_howto_table[i];
336
337 return NULL;
338}
339
8d88c4ca 340/* Given an x86_64 ELF reloc type, fill in an arelent structure. */
8da6118f 341
8d88c4ca 342static void
351f65ca
L		 343elf_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
344 Elf_Internal_Rela *dst)
8d88c4ca 345{
67a4f2b7 346 unsigned r_type;
8d88c4ca 347
351f65ca
L		 348 r_type = ELF32_R_TYPE (dst->r_info);
349 cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
8d88c4ca
NC		 350 BFD_ASSERT (r_type == cache_ptr->howto->type);
351}
70256ad8 352\f
3bab7989 353/* Support for core dump NOTE sections. */
b34976b6 354static bfd_boolean
351f65ca 355elf_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML		 356{
357 int offset;
eea6121a 358 size_t size;
3bab7989
ML		 359
360 switch (note->descsz)
361 {
362 default:
b34976b6 363 return FALSE;
3bab7989 364
bcd823f1
L		 365 case 296: /* sizeof(istruct elf_prstatus) on Linux/x32 */
366 /* pr_cursig */
228e534f 367 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
bcd823f1
L		 368
369 /* pr_pid */
228e534f 370 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
bcd823f1
L		 371
372 /* pr_reg */
373 offset = 72;
374 size = 216;
375
376 break;
377
3bab7989
ML		 378 case 336: /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
379 /* pr_cursig */
228e534f 380 elf_tdata (abfd)->core->signal
3bab7989
ML		 381 = bfd_get_16 (abfd, note->descdata + 12);
382
383 /* pr_pid */
228e534f 384 elf_tdata (abfd)->core->lwpid
3bab7989
ML		 385 = bfd_get_32 (abfd, note->descdata + 32);
386
387 /* pr_reg */
388 offset = 112;
eea6121a 389 size = 216;
3bab7989
ML		 390
391 break;
392 }
393
394 /* Make a ".reg/999" section. */
395 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
eea6121a 396 size, note->descpos + offset);
3bab7989
ML		 397}
398
b34976b6 399static bfd_boolean
351f65ca 400elf_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML		 401{
402 switch (note->descsz)
403 {
404 default:
b34976b6 405 return FALSE;
3bab7989 406
bcd823f1 407 case 124: /* sizeof(struct elf_prpsinfo) on Linux/x32 */
228e534f 408 elf_tdata (abfd)->core->pid
bcd823f1 409 = bfd_get_32 (abfd, note->descdata + 12);
228e534f 410 elf_tdata (abfd)->core->program
bcd823f1 411 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
228e534f 412 elf_tdata (abfd)->core->command
bcd823f1
L		 413 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
414 break;
415
3bab7989 416 case 136: /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
228e534f 417 elf_tdata (abfd)->core->pid
261b8d08 418 = bfd_get_32 (abfd, note->descdata + 24);
228e534f 419 elf_tdata (abfd)->core->program
3bab7989 420 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
228e534f 421 elf_tdata (abfd)->core->command
3bab7989
ML		 422 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
423 }
424
425 /* Note that for some reason, a spurious space is tacked
426 onto the end of the args in some (at least one anyway)
427 implementations, so strip it off if it exists. */
428
429 {
228e534f 430 char *command = elf_tdata (abfd)->core->command;
3bab7989
ML		 431 int n = strlen (command);
432
433 if (0 < n && command[n - 1] == ' ')
434 command[n - 1] = '\0';
435 }
436
b34976b6 437 return TRUE;
3bab7989 438}
8fd79e71
L		 439
440#ifdef CORE_HEADER
441static char *
442elf_x86_64_write_core_note (bfd *abfd, char *buf, int *bufsiz,
443 int note_type, ...)
444{
445 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
8fd79e71
L		 446 va_list ap;
447 const char *fname, *psargs;
448 long pid;
449 int cursig;
450 const void *gregs;
451
452 switch (note_type)
453 {
454 default:
455 return NULL;
456
457 case NT_PRPSINFO:
458 va_start (ap, note_type);
459 fname = va_arg (ap, const char *);
460 psargs = va_arg (ap, const char *);
461 va_end (ap);
462
463 if (bed->s->elfclass == ELFCLASS32)
464 {
465 prpsinfo32_t data;
466 memset (&data, 0, sizeof (data));
467 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
468 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
e85c6a70
JK		 469 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
470 &data, sizeof (data));
8fd79e71
L		 471 }
472 else
473 {
b1bd052d 474 prpsinfo64_t data;
8fd79e71
L		 475 memset (&data, 0, sizeof (data));
476 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
477 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
e85c6a70
JK		 478 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
479 &data, sizeof (data));
8fd79e71 480 }
e85c6a70 481 /* NOTREACHED */
8fd79e71
L		 482
483 case NT_PRSTATUS:
484 va_start (ap, note_type);
485 pid = va_arg (ap, long);
486 cursig = va_arg (ap, int);
487 gregs = va_arg (ap, const void *);
488 va_end (ap);
489
490 if (bed->s->elfclass == ELFCLASS32)
491 {
492 if (bed->elf_machine_code == EM_X86_64)
493 {
494 prstatusx32_t prstat;
495 memset (&prstat, 0, sizeof (prstat));
496 prstat.pr_pid = pid;
497 prstat.pr_cursig = cursig;
498 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK		 499 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
500 &prstat, sizeof (prstat));
8fd79e71
L		 501 }
502 else
503 {
504 prstatus32_t prstat;
505 memset (&prstat, 0, sizeof (prstat));
506 prstat.pr_pid = pid;
507 prstat.pr_cursig = cursig;
508 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK		 509 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
510 &prstat, sizeof (prstat));
8fd79e71
L		 511 }
512 }
513 else
514 {
b1bd052d 515 prstatus64_t prstat;
8fd79e71
L		 516 memset (&prstat, 0, sizeof (prstat));
517 prstat.pr_pid = pid;
518 prstat.pr_cursig = cursig;
519 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
e85c6a70
JK		 520 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
521 &prstat, sizeof (prstat));
8fd79e71 522 }
8fd79e71 523 }
e85c6a70 524 /* NOTREACHED */
8fd79e71
L		 525}
526#endif
3bab7989 527\f
407443a3 528/* Functions for the x86-64 ELF linker. */
70256ad8 529
407443a3 530/* The name of the dynamic interpreter. This is put in the .interp
70256ad8
AJ		 531 section. */
532
351f65ca 533#define ELF64_DYNAMIC_INTERPRETER "/lib/ld64.so.1"
eec9dd95 534#define ELF32_DYNAMIC_INTERPRETER "/lib/ldx32.so.1"
70256ad8 535
d40d037c
AJ		 536/* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
537 copying dynamic variables from a shared lib into an app's dynbss
538 section, and instead use a dynamic relocation to point into the
539 shared lib. */
540#define ELIMINATE_COPY_RELOCS 1
541
70256ad8
AJ		 542/* The size in bytes of an entry in the global offset table. */
543
544#define GOT_ENTRY_SIZE 8
8d88c4ca 545
70256ad8 546/* The size in bytes of an entry in the procedure linkage table. */
8d88c4ca 547
70256ad8
AJ		 548#define PLT_ENTRY_SIZE 16
549
550/* The first entry in a procedure linkage table looks like this. See the
551 SVR4 ABI i386 supplement and the x86-64 ABI to see how this works. */
552
351f65ca 553static const bfd_byte elf_x86_64_plt0_entry[PLT_ENTRY_SIZE] =
70256ad8 554{
653165cc
AJ		 555 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
556 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
10efb593 557 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
70256ad8
AJ		 558};
559
560/* Subsequent entries in a procedure linkage table look like this. */
561
351f65ca 562static const bfd_byte elf_x86_64_plt_entry[PLT_ENTRY_SIZE] =
70256ad8 563{
653165cc 564 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
407443a3 565 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653165cc 566 0x68, /* pushq immediate */
70256ad8
AJ		 567 0, 0, 0, 0, /* replaced with index into relocation table. */
568 0xe9, /* jmp relative */
569 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
570};
571
0ff2b86e
L		 572/* The first entry in a procedure linkage table with BND relocations
573 like this. */
574
575static const bfd_byte elf_x86_64_bnd_plt0_entry[PLT_ENTRY_SIZE] =
576{
577 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
578 0xf2, 0xff, 0x25, 16, 0, 0, 0, /* bnd jmpq *GOT+16(%rip) */
579 0x0f, 0x1f, 0 /* nopl (%rax) */
580};
581
582/* Subsequent entries for legacy branches in a procedure linkage table
583 with BND relocations look like this. */
584
585static const bfd_byte elf_x86_64_legacy_plt_entry[PLT_ENTRY_SIZE] =
586{
587 0x68, 0, 0, 0, 0, /* pushq immediate */
588 0xe9, 0, 0, 0, 0, /* jmpq relative */
589 0x66, 0x0f, 0x1f, 0x44, 0, 0 /* nopw (%rax,%rax,1) */
590};
591
592/* Subsequent entries for branches with BND prefx in a procedure linkage
593 table with BND relocations look like this. */
594
595static const bfd_byte elf_x86_64_bnd_plt_entry[PLT_ENTRY_SIZE] =
596{
597 0x68, 0, 0, 0, 0, /* pushq immediate */
598 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
599 0x0f, 0x1f, 0x44, 0, 0 /* nopl 0(%rax,%rax,1) */
600};
601
602/* Entries for legacy branches in the second procedure linkage table
603 look like this. */
604
605static const bfd_byte elf_x86_64_legacy_plt2_entry[8] =
606{
607 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
608 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
609 0x66, 0x90 /* xchg %ax,%ax */
610};
611
612/* Entries for branches with BND prefix in the second procedure linkage
613 table look like this. */
614
615static const bfd_byte elf_x86_64_bnd_plt2_entry[8] =
616{
617 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
618 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
619 0x90 /* nop */
620};
621
e41b3a13
JJ		 622/* .eh_frame covering the .plt section. */
623
624static const bfd_byte elf_x86_64_eh_frame_plt[] =
625{
626#define PLT_CIE_LENGTH 20
627#define PLT_FDE_LENGTH 36
628#define PLT_FDE_START_OFFSET 4 + PLT_CIE_LENGTH + 8
629#define PLT_FDE_LEN_OFFSET 4 + PLT_CIE_LENGTH + 12
630 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
631 0, 0, 0, 0, /* CIE ID */
632 1, /* CIE version */
633 'z', 'R', 0, /* Augmentation string */
634 1, /* Code alignment factor */
635 0x78, /* Data alignment factor */
636 16, /* Return address column */
637 1, /* Augmentation size */
638 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
639 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
640 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
641 DW_CFA_nop, DW_CFA_nop,
642
643 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
644 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
645 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
646 0, 0, 0, 0, /* .plt size goes here */
647 0, /* Augmentation size */
648 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
649 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
650 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
651 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
652 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
653 11, /* Block length */
654 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
655 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
656 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
657 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
658 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
659};
660
eed180f8
RM		 661/* Architecture-specific backend data for x86-64. */
662
663struct elf_x86_64_backend_data
664{
665 /* Templates for the initial PLT entry and for subsequent entries. */
666 const bfd_byte *plt0_entry;
667 const bfd_byte *plt_entry;
668 unsigned int plt_entry_size; /* Size of each PLT entry. */
669
670 /* Offsets into plt0_entry that are to be replaced with GOT[1] and GOT[2]. */
671 unsigned int plt0_got1_offset;
672 unsigned int plt0_got2_offset;
673
674 /* Offset of the end of the PC-relative instruction containing
675 plt0_got2_offset. */
676 unsigned int plt0_got2_insn_end;
677
678 /* Offsets into plt_entry that are to be replaced with... */
679 unsigned int plt_got_offset; /* ... address of this symbol in .got. */
680 unsigned int plt_reloc_offset; /* ... offset into relocation table. */
681 unsigned int plt_plt_offset; /* ... offset to start of .plt. */
682
683 /* Length of the PC-relative instruction containing plt_got_offset. */
684 unsigned int plt_got_insn_size;
685
686 /* Offset of the end of the PC-relative jump to plt0_entry. */
687 unsigned int plt_plt_insn_end;
688
689 /* Offset into plt_entry where the initial value of the GOT entry points. */
690 unsigned int plt_lazy_offset;
691
692 /* .eh_frame covering the .plt section. */
693 const bfd_byte *eh_frame_plt;
694 unsigned int eh_frame_plt_size;
695};
696
f8222080
L		 697#define get_elf_x86_64_arch_data(bed) \
698 ((const struct elf_x86_64_backend_data *) (bed)->arch_data)
699
eed180f8 700#define get_elf_x86_64_backend_data(abfd) \
f8222080 701 get_elf_x86_64_arch_data (get_elf_backend_data (abfd))
eed180f8
RM		 702
703#define GET_PLT_ENTRY_SIZE(abfd) \
704 get_elf_x86_64_backend_data (abfd)->plt_entry_size
705
706/* These are the standard parameters. */
707static const struct elf_x86_64_backend_data elf_x86_64_arch_bed =
708 {
709 elf_x86_64_plt0_entry, /* plt0_entry */
710 elf_x86_64_plt_entry, /* plt_entry */
711 sizeof (elf_x86_64_plt_entry), /* plt_entry_size */
712 2, /* plt0_got1_offset */
713 8, /* plt0_got2_offset */
714 12, /* plt0_got2_insn_end */
715 2, /* plt_got_offset */
716 7, /* plt_reloc_offset */
717 12, /* plt_plt_offset */
718 6, /* plt_got_insn_size */
719 PLT_ENTRY_SIZE, /* plt_plt_insn_end */
720 6, /* plt_lazy_offset */
721 elf_x86_64_eh_frame_plt, /* eh_frame_plt */
722 sizeof (elf_x86_64_eh_frame_plt), /* eh_frame_plt_size */
723 };
724
0ff2b86e
L		 725static const struct elf_x86_64_backend_data elf_x86_64_bnd_arch_bed =
726 {
727 elf_x86_64_bnd_plt0_entry, /* plt0_entry */
728 elf_x86_64_bnd_plt_entry, /* plt_entry */
729 sizeof (elf_x86_64_bnd_plt_entry), /* plt_entry_size */
730 2, /* plt0_got1_offset */
731 1+8, /* plt0_got2_offset */
732 1+12, /* plt0_got2_insn_end */
733 1+2, /* plt_got_offset */
734 1, /* plt_reloc_offset */
735 7, /* plt_plt_offset */
736 1+6, /* plt_got_insn_size */
737 11, /* plt_plt_insn_end */
738 0, /* plt_lazy_offset */
739 elf_x86_64_eh_frame_plt, /* eh_frame_plt */
740 sizeof (elf_x86_64_eh_frame_plt), /* eh_frame_plt_size */
741 };
742
eed180f8
RM		 743#define elf_backend_arch_data &elf_x86_64_arch_bed
744
aec6b87e
L		 745/* Is a undefined weak symbol which is resolved to 0. Reference to an
746 undefined weak symbol is resolved to 0 when building executable if
747 it isn't dynamic and
748 1. Has non-GOT/non-PLT relocations in text section. Or
749 2. Has no GOT/PLT relocation.
750 */
751#define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, EH) \
752 ((EH)->elf.root.type == bfd_link_hash_undefweak \
753 && bfd_link_executable (INFO) \
754 && (elf_x86_64_hash_table (INFO)->interp == NULL \
755 || !(EH)->has_got_reloc \
756 || (EH)->has_non_got_reloc \
757 || !(INFO)->dynamic_undefined_weak))
758
70256ad8
AJ		 759/* x86-64 ELF linker hash entry. */
760
351f65ca 761struct elf_x86_64_link_hash_entry
70256ad8 762{
c434dee6 763 struct elf_link_hash_entry elf;
70256ad8 764
c434dee6 765 /* Track dynamic relocs copied for this symbol. */
e03a8ed8 766 struct elf_dyn_relocs *dyn_relocs;
bffbf940
JJ		 767
768#define GOT_UNKNOWN 0
769#define GOT_NORMAL 1
770#define GOT_TLS_GD 2
771#define GOT_TLS_IE 3
67a4f2b7
AO		 772#define GOT_TLS_GDESC 4
773#define GOT_TLS_GD_BOTH_P(type) \
774 ((type) == (GOT_TLS_GD | GOT_TLS_GDESC))
775#define GOT_TLS_GD_P(type) \
776 ((type) == GOT_TLS_GD || GOT_TLS_GD_BOTH_P (type))
777#define GOT_TLS_GDESC_P(type) \
778 ((type) == GOT_TLS_GDESC || GOT_TLS_GD_BOTH_P (type))
779#define GOT_TLS_GD_ANY_P(type) \
780 (GOT_TLS_GD_P (type) || GOT_TLS_GDESC_P (type))
bffbf940 781 unsigned char tls_type;
67a4f2b7 782
bc696fd5
L		 783 /* TRUE if a weak symbol with a real definition needs a copy reloc.
784 When there is a weak symbol with a real definition, the processor
785 independent code will have arranged for us to see the real
786 definition first. We need to copy the needs_copy bit from the
787 real definition and check it when allowing copy reloc in PIE. */
788 unsigned int needs_copy : 1;
789
0ff2b86e 790 /* TRUE if symbol has at least one BND relocation. */
bc696fd5 791 unsigned int has_bnd_reloc : 1;
0ff2b86e 792
aec6b87e
L		 793 /* TRUE if symbol has GOT or PLT relocations. */
794 unsigned int has_got_reloc : 1;
795
796 /* TRUE if symbol has non-GOT/non-PLT relocations in text sections. */
797 unsigned int has_non_got_reloc : 1;
798
04ebc307
L		 799 /* Reference count of C/C++ function pointer relocations in read-write
800 section which can be resolved at run-time. */
801 bfd_signed_vma func_pointer_refcount;
802
dd7e64d4
L		 803 /* Information about the GOT PLT entry. Filled when there are both
804 GOT and PLT relocations against the same function. */
805 union gotplt_union plt_got;
806
0ff2b86e
L		 807 /* Information about the second PLT entry. Filled when has_bnd_reloc is
808 set. */
809 union gotplt_union plt_bnd;
810
67a4f2b7
AO		 811 /* Offset of the GOTPLT entry reserved for the TLS descriptor,
812 starting at the end of the jump table. */
813 bfd_vma tlsdesc_got;
bffbf940
JJ		 814};
815
351f65ca
L		 816#define elf_x86_64_hash_entry(ent) \
817 ((struct elf_x86_64_link_hash_entry *)(ent))
bffbf940 818
351f65ca 819struct elf_x86_64_obj_tdata
bffbf940
JJ		 820{
821 struct elf_obj_tdata root;
822
823 /* tls_type for each local got entry. */
824 char *local_got_tls_type;
67a4f2b7
AO		 825
826 /* GOTPLT entries for TLS descriptors. */
827 bfd_vma *local_tlsdesc_gotent;
70256ad8
AJ		 828};
829
351f65ca
L		 830#define elf_x86_64_tdata(abfd) \
831 ((struct elf_x86_64_obj_tdata *) (abfd)->tdata.any)
bffbf940 832
351f65ca
L		 833#define elf_x86_64_local_got_tls_type(abfd) \
834 (elf_x86_64_tdata (abfd)->local_got_tls_type)
bffbf940 835
351f65ca
L		 836#define elf_x86_64_local_tlsdesc_gotent(abfd) \
837 (elf_x86_64_tdata (abfd)->local_tlsdesc_gotent)
bffbf940 838
0ffa91dd
NC		 839#define is_x86_64_elf(bfd) \
840 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
841 && elf_tdata (bfd) != NULL \
4dfe6ac6 842 && elf_object_id (bfd) == X86_64_ELF_DATA)
0ffa91dd
NC		 843
844static bfd_boolean
351f65ca 845elf_x86_64_mkobject (bfd *abfd)
0ffa91dd 846{
351f65ca 847 return bfd_elf_allocate_object (abfd, sizeof (struct elf_x86_64_obj_tdata),
4dfe6ac6 848 X86_64_ELF_DATA);
0ffa91dd
NC		 849}
850
c434dee6 851/* x86-64 ELF linker hash table. */
8d88c4ca 852
351f65ca 853struct elf_x86_64_link_hash_table
407443a3 854{
c434dee6 855 struct elf_link_hash_table elf;
70256ad8 856
c434dee6 857 /* Short-cuts to get to dynamic linker sections. */
aec6b87e 858 asection *interp;
c434dee6
AJ		 859 asection *sdynbss;
860 asection *srelbss;
e41b3a13 861 asection *plt_eh_frame;
0ff2b86e 862 asection *plt_bnd;
dd7e64d4 863 asection *plt_got;
70256ad8 864
4dfe6ac6
NC		 865 union
866 {
bffbf940
JJ		 867 bfd_signed_vma refcount;
868 bfd_vma offset;
869 } tls_ld_got;
870
67a4f2b7
AO		 871 /* The amount of space used by the jump slots in the GOT. */
872 bfd_vma sgotplt_jump_table_size;
873
87d72d41
AM		 874 /* Small local sym cache. */
875 struct sym_cache sym_cache;
9f03412a 876
351f65ca
L		 877 bfd_vma (*r_info) (bfd_vma, bfd_vma);
878 bfd_vma (*r_sym) (bfd_vma);
248775ba 879 unsigned int pointer_r_type;
351f65ca
L		 880 const char *dynamic_interpreter;
881 int dynamic_interpreter_size;
882
9f03412a
AO		 883 /* _TLS_MODULE_BASE_ symbol. */
884 struct bfd_link_hash_entry *tls_module_base;
c25bc9fc
L		 885
886 /* Used by local STT_GNU_IFUNC symbols. */
887 htab_t loc_hash_table;
4dfe6ac6
NC		 888 void * loc_hash_memory;
889
890 /* The offset into splt of the PLT entry for the TLS descriptor
891 resolver. Special values are 0, if not necessary (or not found
892 to be necessary yet), and -1 if needed but not determined
893 yet. */
894 bfd_vma tlsdesc_plt;
895 /* The offset into sgot of the GOT entry used by the PLT entry
896 above. */
897 bfd_vma tlsdesc_got;
e1f98742
L		 898
899 /* The index of the next R_X86_64_JUMP_SLOT entry in .rela.plt. */
900 bfd_vma next_jump_slot_index;
901 /* The index of the next R_X86_64_IRELATIVE entry in .rela.plt. */
902 bfd_vma next_irelative_index;
c434dee6 903};
70256ad8
AJ		 904
905/* Get the x86-64 ELF linker hash table from a link_info structure. */
8d88c4ca 906
351f65ca 907#define elf_x86_64_hash_table(p) \
4dfe6ac6 908 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
351f65ca 909 == X86_64_ELF_DATA ? ((struct elf_x86_64_link_hash_table *) ((p)->hash)) : NULL)
8d88c4ca 910
351f65ca 911#define elf_x86_64_compute_jump_table_size(htab) \
6de2ae4a 912 ((htab)->elf.srelplt->reloc_count * GOT_ENTRY_SIZE)
67a4f2b7 913
407443a3 914/* Create an entry in an x86-64 ELF linker hash table. */
70256ad8
AJ		 915
916static struct bfd_hash_entry *
351f65ca
L		 917elf_x86_64_link_hash_newfunc (struct bfd_hash_entry *entry,
918 struct bfd_hash_table *table,
919 const char *string)
70256ad8 920{
70256ad8 921 /* Allocate the structure if it has not already been allocated by a
c434dee6
AJ		 922 subclass. */
923 if (entry == NULL)
924 {
a50b1753 925 entry = (struct bfd_hash_entry *)
eed180f8
RM		 926 bfd_hash_allocate (table,
927 sizeof (struct elf_x86_64_link_hash_entry));
c434dee6
AJ		 928 if (entry == NULL)
929 return entry;
930 }
70256ad8
AJ		 931
932 /* Call the allocation method of the superclass. */
c434dee6
AJ		 933 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
934 if (entry != NULL)
70256ad8 935 {
351f65ca 936 struct elf_x86_64_link_hash_entry *eh;
c434dee6 937
351f65ca 938 eh = (struct elf_x86_64_link_hash_entry *) entry;
c434dee6 939 eh->dyn_relocs = NULL;
bffbf940 940 eh->tls_type = GOT_UNKNOWN;
bc696fd5
L		 941 eh->needs_copy = 0;
942 eh->has_bnd_reloc = 0;
aec6b87e
L		 943 eh->has_got_reloc = 0;
944 eh->has_non_got_reloc = 0;
04ebc307 945 eh->func_pointer_refcount = 0;
0ff2b86e 946 eh->plt_bnd.offset = (bfd_vma) -1;
dd7e64d4 947 eh->plt_got.offset = (bfd_vma) -1;
67a4f2b7 948 eh->tlsdesc_got = (bfd_vma) -1;
70256ad8
AJ		 949 }
950
c434dee6 951 return entry;
70256ad8
AJ		 952}
953
c25bc9fc
L		 954/* Compute a hash of a local hash entry. We use elf_link_hash_entry
955 for local symbol so that we can handle local STT_GNU_IFUNC symbols
956 as global symbol. We reuse indx and dynstr_index for local symbol
957 hash since they aren't used by global symbols in this backend. */
958
959static hashval_t
351f65ca 960elf_x86_64_local_htab_hash (const void *ptr)
c25bc9fc
L		 961{
962 struct elf_link_hash_entry *h
963 = (struct elf_link_hash_entry *) ptr;
d2149d72 964 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
c25bc9fc
L		 965}
966
967/* Compare local hash entries. */
968
969static int
351f65ca 970elf_x86_64_local_htab_eq (const void *ptr1, const void *ptr2)
c25bc9fc
L		 971{
972 struct elf_link_hash_entry *h1
973 = (struct elf_link_hash_entry *) ptr1;
974 struct elf_link_hash_entry *h2
975 = (struct elf_link_hash_entry *) ptr2;
976
977 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
978}
979
980/* Find and/or create a hash entry for local symbol. */
981
982static struct elf_link_hash_entry *
351f65ca
L		 983elf_x86_64_get_local_sym_hash (struct elf_x86_64_link_hash_table *htab,
984 bfd *abfd, const Elf_Internal_Rela *rel,
985 bfd_boolean create)
c25bc9fc 986{
351f65ca 987 struct elf_x86_64_link_hash_entry e, *ret;
c25bc9fc 988 asection *sec = abfd->sections;
d2149d72 989 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
351f65ca 990 htab->r_sym (rel->r_info));
c25bc9fc
L		 991 void **slot;
992
993 e.elf.indx = sec->id;
351f65ca 994 e.elf.dynstr_index = htab->r_sym (rel->r_info);
c25bc9fc
L		 995 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
996 create ? INSERT : NO_INSERT);
997
998 if (!slot)
999 return NULL;
1000
1001 if (*slot)
1002 {
351f65ca 1003 ret = (struct elf_x86_64_link_hash_entry *) *slot;
c25bc9fc
L		 1004 return &ret->elf;
1005 }
1006
351f65ca 1007 ret = (struct elf_x86_64_link_hash_entry *)
c25bc9fc 1008 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
351f65ca 1009 sizeof (struct elf_x86_64_link_hash_entry));
c25bc9fc
L		 1010 if (ret)
1011 {
1012 memset (ret, 0, sizeof (*ret));
1013 ret->elf.indx = sec->id;
351f65ca 1014 ret->elf.dynstr_index = htab->r_sym (rel->r_info);
c25bc9fc 1015 ret->elf.dynindx = -1;
04ebc307 1016 ret->func_pointer_refcount = 0;
dd7e64d4 1017 ret->plt_got.offset = (bfd_vma) -1;
c25bc9fc
L		 1018 *slot = ret;
1019 }
1020 return &ret->elf;
1021}
1022
68faa637
AM		 1023/* Destroy an X86-64 ELF linker hash table. */
1024
1025static void
d495ab0d 1026elf_x86_64_link_hash_table_free (bfd *obfd)
68faa637
AM		 1027{
1028 struct elf_x86_64_link_hash_table *htab
d495ab0d 1029 = (struct elf_x86_64_link_hash_table *) obfd->link.hash;
68faa637
AM		 1030
1031 if (htab->loc_hash_table)
1032 htab_delete (htab->loc_hash_table);
1033 if (htab->loc_hash_memory)
1034 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
d495ab0d 1035 _bfd_elf_link_hash_table_free (obfd);
68faa637
AM		 1036}
1037
8d88c4ca
NC		 1038/* Create an X86-64 ELF linker hash table. */
1039
1040static struct bfd_link_hash_table *
351f65ca 1041elf_x86_64_link_hash_table_create (bfd *abfd)
8d88c4ca 1042{
351f65ca
L		 1043 struct elf_x86_64_link_hash_table *ret;
1044 bfd_size_type amt = sizeof (struct elf_x86_64_link_hash_table);
8d88c4ca 1045
7bf52ea2 1046 ret = (struct elf_x86_64_link_hash_table *) bfd_zmalloc (amt);
c434dee6 1047 if (ret == NULL)
8d88c4ca
NC		 1048 return NULL;
1049
eb4ff4d6 1050 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
351f65ca
L		 1051 elf_x86_64_link_hash_newfunc,
1052 sizeof (struct elf_x86_64_link_hash_entry),
4dfe6ac6 1053 X86_64_ELF_DATA))
8d88c4ca 1054 {
e2d34d7d 1055 free (ret);
8d88c4ca
NC		 1056 return NULL;
1057 }
1058
351f65ca
L		 1059 if (ABI_64_P (abfd))
1060 {
1061 ret->r_info = elf64_r_info;
1062 ret->r_sym = elf64_r_sym;
248775ba 1063 ret->pointer_r_type = R_X86_64_64;
351f65ca
L		 1064 ret->dynamic_interpreter = ELF64_DYNAMIC_INTERPRETER;
1065 ret->dynamic_interpreter_size = sizeof ELF64_DYNAMIC_INTERPRETER;
1066 }
1067 else
1068 {
1069 ret->r_info = elf32_r_info;
1070 ret->r_sym = elf32_r_sym;
248775ba 1071 ret->pointer_r_type = R_X86_64_32;
351f65ca
L		 1072 ret->dynamic_interpreter = ELF32_DYNAMIC_INTERPRETER;
1073 ret->dynamic_interpreter_size = sizeof ELF32_DYNAMIC_INTERPRETER;
1074 }
1075
c25bc9fc 1076 ret->loc_hash_table = htab_try_create (1024,
351f65ca
L		 1077 elf_x86_64_local_htab_hash,
1078 elf_x86_64_local_htab_eq,
c25bc9fc
L		 1079 NULL);
1080 ret->loc_hash_memory = objalloc_create ();
1081 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1082 {
d495ab0d 1083 elf_x86_64_link_hash_table_free (abfd);
c25bc9fc
L		 1084 return NULL;
1085 }
d495ab0d 1086 ret->elf.root.hash_table_free = elf_x86_64_link_hash_table_free;
c25bc9fc 1087
c434dee6
AJ		 1088 return &ret->elf.root;
1089}
1090
c434dee6
AJ		 1091/* Create .plt, .rela.plt, .got, .got.plt, .rela.got, .dynbss, and
1092 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
1093 hash table. */
1094
b34976b6 1095static bfd_boolean
351f65ca
L		 1096elf_x86_64_create_dynamic_sections (bfd *dynobj,
1097 struct bfd_link_info *info)
c434dee6 1098{
351f65ca 1099 struct elf_x86_64_link_hash_table *htab;
c434dee6 1100
c434dee6 1101 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
b34976b6 1102 return FALSE;
c434dee6 1103
351f65ca 1104 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 1105 if (htab == NULL)
1106 return FALSE;
1107
3d4d4302 1108 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss");
9a926d55 1109 if (!htab->sdynbss)
c434dee6
AJ		 1110 abort ();
1111
0e1862bb 1112 if (bfd_link_executable (info))
9a926d55
L		 1113 {
1114 /* Always allow copy relocs for building executables. */
9d157cb9 1115 asection *s = bfd_get_linker_section (dynobj, ".rela.bss");
9a926d55
L		 1116 if (s == NULL)
1117 {
1118 const struct elf_backend_data *bed = get_elf_backend_data (dynobj);
1119 s = bfd_make_section_anyway_with_flags (dynobj,
1120 ".rela.bss",
1121 (bed->dynamic_sec_flags
1122 | SEC_READONLY));
1123 if (s == NULL
1124 || ! bfd_set_section_alignment (dynobj, s,
1125 bed->s->log_file_align))
1126 return FALSE;
1127 }
1128 htab->srelbss = s;
1129 }
1130
e41b3a13 1131 if (!info->no_ld_generated_unwind_info
2fe0fd06 1132 && htab->plt_eh_frame == NULL
e4de50d4 1133 && htab->elf.splt != NULL)
e41b3a13 1134 {
bbf96e4e
L		 1135 flagword flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY
1136 | SEC_HAS_CONTENTS | SEC_IN_MEMORY
1137 | SEC_LINKER_CREATED);
e41b3a13 1138 htab->plt_eh_frame
bbf96e4e 1139 = bfd_make_section_anyway_with_flags (dynobj, ".eh_frame", flags);
e41b3a13
JJ		 1140 if (htab->plt_eh_frame == NULL
1141 || !bfd_set_section_alignment (dynobj, htab->plt_eh_frame, 3))
1142 return FALSE;
e41b3a13 1143 }
b34976b6 1144 return TRUE;
c434dee6
AJ		 1145}
1146
1147/* Copy the extra info we tack onto an elf_link_hash_entry. */
1148
1149static void
351f65ca
L		 1150elf_x86_64_copy_indirect_symbol (struct bfd_link_info *info,
1151 struct elf_link_hash_entry *dir,
1152 struct elf_link_hash_entry *ind)
c434dee6 1153{
351f65ca 1154 struct elf_x86_64_link_hash_entry *edir, *eind;
c434dee6 1155
351f65ca
L		 1156 edir = (struct elf_x86_64_link_hash_entry *) dir;
1157 eind = (struct elf_x86_64_link_hash_entry *) ind;
c434dee6 1158
0ff2b86e
L		 1159 if (!edir->has_bnd_reloc)
1160 edir->has_bnd_reloc = eind->has_bnd_reloc;
1161
aec6b87e
L		 1162 if (!edir->has_got_reloc)
1163 edir->has_got_reloc = eind->has_got_reloc;
1164
1165 if (!edir->has_non_got_reloc)
1166 edir->has_non_got_reloc = eind->has_non_got_reloc;
1167
c434dee6
AJ		 1168 if (eind->dyn_relocs != NULL)
1169 {
1170 if (edir->dyn_relocs != NULL)
1171 {
e03a8ed8
L		 1172 struct elf_dyn_relocs **pp;
1173 struct elf_dyn_relocs *p;
c434dee6 1174
fcfa13d2 1175 /* Add reloc counts against the indirect sym to the direct sym
c434dee6
AJ		 1176 list. Merge any entries against the same section. */
1177 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
1178 {
e03a8ed8 1179 struct elf_dyn_relocs *q;
c434dee6
AJ		 1180
1181 for (q = edir->dyn_relocs; q != NULL; q = q->next)
1182 if (q->sec == p->sec)
1183 {
1184 q->pc_count += p->pc_count;
1185 q->count += p->count;
1186 *pp = p->next;
1187 break;
1188 }
1189 if (q == NULL)
1190 pp = &p->next;
1191 }
1192 *pp = edir->dyn_relocs;
1193 }
1194
1195 edir->dyn_relocs = eind->dyn_relocs;
1196 eind->dyn_relocs = NULL;
1197 }
1198
bffbf940
JJ		 1199 if (ind->root.type == bfd_link_hash_indirect
1200 && dir->got.refcount <= 0)
1201 {
1202 edir->tls_type = eind->tls_type;
1203 eind->tls_type = GOT_UNKNOWN;
1204 }
1205
d40d037c
AJ		 1206 if (ELIMINATE_COPY_RELOCS
1207 && ind->root.type != bfd_link_hash_indirect
f5385ebf
AM		 1208 && dir->dynamic_adjusted)
1209 {
1210 /* If called to transfer flags for a weakdef during processing
1211 of elf_adjust_dynamic_symbol, don't copy non_got_ref.
1212 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
1213 dir->ref_dynamic |= ind->ref_dynamic;
1214 dir->ref_regular |= ind->ref_regular;
1215 dir->ref_regular_nonweak |= ind->ref_regular_nonweak;
1216 dir->needs_plt |= ind->needs_plt;
1217 dir->pointer_equality_needed |= ind->pointer_equality_needed;
1218 }
d40d037c 1219 else
04ebc307
L		 1220 {
1221 if (eind->func_pointer_refcount > 0)
1222 {
1223 edir->func_pointer_refcount += eind->func_pointer_refcount;
1224 eind->func_pointer_refcount = 0;
1225 }
1226
1227 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
1228 }
8d88c4ca
NC		 1229}
1230
b34976b6 1231static bfd_boolean
27482721 1232elf64_x86_64_elf_object_p (bfd *abfd)
bffbf940 1233{
8d88c4ca
NC		 1234 /* Set the right machine number for an x86-64 elf64 file. */
1235 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
b34976b6 1236 return TRUE;
8d88c4ca
NC		 1237}
1238
8059fb19
RM		 1239static bfd_boolean
1240elf32_x86_64_elf_object_p (bfd *abfd)
1241{
1242 /* Set the right machine number for an x86-64 elf32 file. */
1243 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32);
1244 return TRUE;
1245}
1246
142411ca
L		 1247/* Return TRUE if the TLS access code sequence support transition
1248 from R_TYPE. */
1249
1250static bfd_boolean
351f65ca
L		 1251elf_x86_64_check_tls_transition (bfd *abfd,
1252 struct bfd_link_info *info,
1253 asection *sec,
1254 bfd_byte *contents,
1255 Elf_Internal_Shdr *symtab_hdr,
1256 struct elf_link_hash_entry **sym_hashes,
1257 unsigned int r_type,
1258 const Elf_Internal_Rela *rel,
1259 const Elf_Internal_Rela *relend)
bffbf940 1260{
142411ca
L		 1261 unsigned int val;
1262 unsigned long r_symndx;
5c98a14e 1263 bfd_boolean largepic = FALSE;
142411ca
L		 1264 struct elf_link_hash_entry *h;
1265 bfd_vma offset;
351f65ca 1266 struct elf_x86_64_link_hash_table *htab;
142411ca
L		 1267
1268 /* Get the section contents. */
1269 if (contents == NULL)
1270 {
1271 if (elf_section_data (sec)->this_hdr.contents != NULL)
1272 contents = elf_section_data (sec)->this_hdr.contents;
1273 else
1274 {
1275 /* FIXME: How to better handle error condition? */
1276 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1277 return FALSE;
bffbf940 1278
142411ca
L		 1279 /* Cache the section contents for elf_link_input_bfd. */
1280 elf_section_data (sec)->this_hdr.contents = contents;
1281 }
1282 }
1283
351f65ca 1284 htab = elf_x86_64_hash_table (info);
142411ca 1285 offset = rel->r_offset;
bffbf940 1286 switch (r_type)
142411ca
L		 1287 {
1288 case R_X86_64_TLSGD:
1289 case R_X86_64_TLSLD:
1290 if ((rel + 1) >= relend)
1291 return FALSE;
1292
1293 if (r_type == R_X86_64_TLSGD)
1294 {
52bc799a 1295 /* Check transition from GD access model. For 64bit, only
142411ca
L		 1296 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1297 .word 0x6666; rex64; call __tls_get_addr
52bc799a
L		 1298 can transit to different access model. For 32bit, only
1299 leaq foo@tlsgd(%rip), %rdi
1300 .word 0x6666; rex64; call __tls_get_addr
5c98a14e
JJ		 1301 can transit to different access model. For largepic
1302 we also support:
1303 leaq foo@tlsgd(%rip), %rdi
1304 movabsq $__tls_get_addr@pltoff, %rax
1305 addq $rbx, %rax
1306 call *%rax. */
142411ca 1307
fa289a5f
AM		 1308 static const unsigned char call[] = { 0x66, 0x66, 0x48, 0xe8 };
1309 static const unsigned char leaq[] = { 0x66, 0x48, 0x8d, 0x3d };
1310
5c98a14e 1311 if ((offset + 12) > sec->size)
142411ca 1312 return FALSE;
52bc799a 1313
5c98a14e
JJ		 1314 if (memcmp (contents + offset + 4, call, 4) != 0)
1315 {
1316 if (!ABI_64_P (abfd)
1317 || (offset + 19) > sec->size
1318 || offset < 3
1319 || memcmp (contents + offset - 3, leaq + 1, 3) != 0
1320 || memcmp (contents + offset + 4, "\x48\xb8", 2) != 0
1321 || memcmp (contents + offset + 14, "\x48\x01\xd8\xff\xd0", 5)
1322 != 0)
1323 return FALSE;
1324 largepic = TRUE;
1325 }
1326 else if (ABI_64_P (abfd))
52bc799a 1327 {
52bc799a 1328 if (offset < 4
fa289a5f 1329 || memcmp (contents + offset - 4, leaq, 4) != 0)
52bc799a
L		 1330 return FALSE;
1331 }
1332 else
1333 {
52bc799a 1334 if (offset < 3
fa289a5f 1335 || memcmp (contents + offset - 3, leaq + 1, 3) != 0)
52bc799a
L		 1336 return FALSE;
1337 }
142411ca
L		 1338 }
1339 else
1340 {
1341 /* Check transition from LD access model. Only
1342 leaq foo@tlsld(%rip), %rdi;
1343 call __tls_get_addr
5c98a14e
JJ		 1344 can transit to different access model. For largepic
1345 we also support:
1346 leaq foo@tlsld(%rip), %rdi
1347 movabsq $__tls_get_addr@pltoff, %rax
1348 addq $rbx, %rax
1349 call *%rax. */
142411ca 1350
fa289a5f 1351 static const unsigned char lea[] = { 0x48, 0x8d, 0x3d };
142411ca
L		 1352
1353 if (offset < 3 || (offset + 9) > sec->size)
1354 return FALSE;
1355
5c98a14e 1356 if (memcmp (contents + offset - 3, lea, 3) != 0)
142411ca 1357 return FALSE;
5c98a14e
JJ		 1358
1359 if (0xe8 != *(contents + offset + 4))
1360 {
1361 if (!ABI_64_P (abfd)
1362 || (offset + 19) > sec->size
1363 || memcmp (contents + offset + 4, "\x48\xb8", 2) != 0
1364 || memcmp (contents + offset + 14, "\x48\x01\xd8\xff\xd0", 5)
1365 != 0)
1366 return FALSE;
1367 largepic = TRUE;
1368 }
142411ca
L		 1369 }
1370
351f65ca 1371 r_symndx = htab->r_sym (rel[1].r_info);
142411ca
L		 1372 if (r_symndx < symtab_hdr->sh_info)
1373 return FALSE;
1374
1375 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
c4fb387b 1376 /* Use strncmp to check __tls_get_addr since __tls_get_addr
eed180f8 1377 may be versioned. */
142411ca
L		 1378 return (h != NULL
1379 && h->root.root.string != NULL
5c98a14e
JJ		 1380 && (largepic
1381 ? ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PLTOFF64
1382 : (ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PC32
1383 || ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PLT32))
c4fb387b
L		 1384 && (strncmp (h->root.root.string,
1385 "__tls_get_addr", 14) == 0));
142411ca
L		 1386
1387 case R_X86_64_GOTTPOFF:
1388 /* Check transition from IE access model:
4a4c5f25
L		 1389 mov foo@gottpoff(%rip), %reg
1390 add foo@gottpoff(%rip), %reg
142411ca
L		 1391 */
1392
4a4c5f25
L		 1393 /* Check REX prefix first. */
1394 if (offset >= 3 && (offset + 4) <= sec->size)
1395 {
1396 val = bfd_get_8 (abfd, contents + offset - 3);
1397 if (val != 0x48 && val != 0x4c)
1398 {
1399 /* X32 may have 0x44 REX prefix or no REX prefix. */
1400 if (ABI_64_P (abfd))
1401 return FALSE;
1402 }
1403 }
1404 else
1405 {
1406 /* X32 may not have any REX prefix. */
1407 if (ABI_64_P (abfd))
1408 return FALSE;
1409 if (offset < 2 || (offset + 3) > sec->size)
1410 return FALSE;
1411 }
142411ca
L		 1412
1413 val = bfd_get_8 (abfd, contents + offset - 2);
1414 if (val != 0x8b && val != 0x03)
1415 return FALSE;
1416
1417 val = bfd_get_8 (abfd, contents + offset - 1);
1418 return (val & 0xc7) == 5;
1419
1420 case R_X86_64_GOTPC32_TLSDESC:
1421 /* Check transition from GDesc access model:
1422 leaq x@tlsdesc(%rip), %rax
1423
1424 Make sure it's a leaq adding rip to a 32-bit offset
1425 into any register, although it's probably almost always
1426 going to be rax. */
1427
1428 if (offset < 3 || (offset + 4) > sec->size)
1429 return FALSE;
1430
1431 val = bfd_get_8 (abfd, contents + offset - 3);
1432 if ((val & 0xfb) != 0x48)
1433 return FALSE;
1434
1435 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1436 return FALSE;
1437
1438 val = bfd_get_8 (abfd, contents + offset - 1);
1439 return (val & 0xc7) == 0x05;
1440
1441 case R_X86_64_TLSDESC_CALL:
1442 /* Check transition from GDesc access model:
1443 call *x@tlsdesc(%rax)
1444 */
1445 if (offset + 2 <= sec->size)
1446 {
1447 /* Make sure that it's a call *x@tlsdesc(%rax). */
fa289a5f
AM		 1448 static const unsigned char call[] = { 0xff, 0x10 };
1449 return memcmp (contents + offset, call, 2) == 0;
142411ca
L		 1450 }
1451
1452 return FALSE;
1453
1454 default:
1455 abort ();
1456 }
1457}
1458
1459/* Return TRUE if the TLS access transition is OK or no transition
1460 will be performed. Update R_TYPE if there is a transition. */
1461
1462static bfd_boolean
351f65ca
L		 1463elf_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1464 asection *sec, bfd_byte *contents,
1465 Elf_Internal_Shdr *symtab_hdr,
1466 struct elf_link_hash_entry **sym_hashes,
1467 unsigned int *r_type, int tls_type,
1468 const Elf_Internal_Rela *rel,
1469 const Elf_Internal_Rela *relend,
1470 struct elf_link_hash_entry *h,
1471 unsigned long r_symndx)
142411ca
L		 1472{
1473 unsigned int from_type = *r_type;
1474 unsigned int to_type = from_type;
1475 bfd_boolean check = TRUE;
1476
bb1cb422
L		 1477 /* Skip TLS transition for functions. */
1478 if (h != NULL
1479 && (h->type == STT_FUNC
1480 || h->type == STT_GNU_IFUNC))
1481 return TRUE;
1482
142411ca 1483 switch (from_type)
bffbf940
JJ		 1484 {
1485 case R_X86_64_TLSGD:
67a4f2b7
AO		 1486 case R_X86_64_GOTPC32_TLSDESC:
1487 case R_X86_64_TLSDESC_CALL:
bffbf940 1488 case R_X86_64_GOTTPOFF:
0e1862bb 1489 if (bfd_link_executable (info))
142411ca
L		 1490 {
1491 if (h == NULL)
1492 to_type = R_X86_64_TPOFF32;
1493 else
1494 to_type = R_X86_64_GOTTPOFF;
1495 }
1496
351f65ca 1497 /* When we are called from elf_x86_64_relocate_section,
142411ca
L		 1498 CONTENTS isn't NULL and there may be additional transitions
1499 based on TLS_TYPE. */
1500 if (contents != NULL)
1501 {
1502 unsigned int new_to_type = to_type;
1503
0e1862bb 1504 if (bfd_link_executable (info)
142411ca
L		 1505 && h != NULL
1506 && h->dynindx == -1
1507 && tls_type == GOT_TLS_IE)
1508 new_to_type = R_X86_64_TPOFF32;
1509
1510 if (to_type == R_X86_64_TLSGD
1511 || to_type == R_X86_64_GOTPC32_TLSDESC
1512 || to_type == R_X86_64_TLSDESC_CALL)
1513 {
1514 if (tls_type == GOT_TLS_IE)
1515 new_to_type = R_X86_64_GOTTPOFF;
1516 }
1517
1518 /* We checked the transition before when we were called from
351f65ca 1519 elf_x86_64_check_relocs. We only want to check the new
142411ca
L		 1520 transition which hasn't been checked before. */
1521 check = new_to_type != to_type && from_type == to_type;
1522 to_type = new_to_type;
1523 }
1524
1525 break;
1526
bffbf940 1527 case R_X86_64_TLSLD:
0e1862bb 1528 if (bfd_link_executable (info))
142411ca
L		 1529 to_type = R_X86_64_TPOFF32;
1530 break;
1531
1532 default:
1533 return TRUE;
bffbf940
JJ		 1534 }
1535
142411ca
L		 1536 /* Return TRUE if there is no transition. */
1537 if (from_type == to_type)
1538 return TRUE;
1539
1540 /* Check if the transition can be performed. */
1541 if (check
351f65ca
L		 1542 && ! elf_x86_64_check_tls_transition (abfd, info, sec, contents,
1543 symtab_hdr, sym_hashes,
1544 from_type, rel, relend))
142411ca 1545 {
2f629d23 1546 reloc_howto_type *from, *to;
4c544807 1547 const char *name;
142411ca 1548
351f65ca
L		 1549 from = elf_x86_64_rtype_to_howto (abfd, from_type);
1550 to = elf_x86_64_rtype_to_howto (abfd, to_type);
142411ca 1551
4c544807
L		 1552 if (h)
1553 name = h->root.root.string;
1554 else
1555 {
351f65ca 1556 struct elf_x86_64_link_hash_table *htab;
4dfe6ac6 1557
351f65ca 1558 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 1559 if (htab == NULL)
1560 name = "*unknown*";
1561 else
1562 {
1563 Elf_Internal_Sym *isym;
1564
1565 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1566 abfd, r_symndx);
1567 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1568 }
4c544807
L		 1569 }
1570
142411ca
L		 1571 (*_bfd_error_handler)
1572 (_("%B: TLS transition from %s to %s against `%s' at 0x%lx "
1573 "in section `%A' failed"),
4c544807 1574 abfd, sec, from->name, to->name, name,
142411ca
L		 1575 (unsigned long) rel->r_offset);
1576 bfd_set_error (bfd_error_bad_value);
1577 return FALSE;
1578 }
1579
1580 *r_type = to_type;
1581 return TRUE;
bffbf940
JJ		 1582}
1583
c1d11331
L		 1584/* Rename some of the generic section flags to better document how they
1585 are used here. */
56ceb5b5 1586#define need_convert_load sec_flg0
c1d11331 1587
70256ad8 1588/* Look through the relocs for a section during the first phase, and
c434dee6
AJ		 1589 calculate needed space in the global offset table, procedure
1590 linkage table, and dynamic reloc sections. */
70256ad8 1591
b34976b6 1592static bfd_boolean
351f65ca
L		 1593elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1594 asection *sec,
1595 const Elf_Internal_Rela *relocs)
70256ad8 1596{
351f65ca 1597 struct elf_x86_64_link_hash_table *htab;
70256ad8
AJ		 1598 Elf_Internal_Shdr *symtab_hdr;
1599 struct elf_link_hash_entry **sym_hashes;
70256ad8
AJ		 1600 const Elf_Internal_Rela *rel;
1601 const Elf_Internal_Rela *rel_end;
70256ad8 1602 asection *sreloc;
dd7e64d4 1603 bfd_boolean use_plt_got;
70256ad8 1604
0e1862bb 1605 if (bfd_link_relocatable (info))
b34976b6 1606 return TRUE;
70256ad8 1607
0ffa91dd
NC		 1608 BFD_ASSERT (is_x86_64_elf (abfd));
1609
351f65ca 1610 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 1611 if (htab == NULL)
1612 return FALSE;
1613
dd7e64d4
L		 1614 use_plt_got = get_elf_x86_64_backend_data (abfd) == &elf_x86_64_arch_bed;
1615
0ffa91dd 1616 symtab_hdr = &elf_symtab_hdr (abfd);
70256ad8 1617 sym_hashes = elf_sym_hashes (abfd);
70256ad8 1618
c434dee6 1619 sreloc = NULL;
cbe950e9 1620
70256ad8
AJ		 1621 rel_end = relocs + sec->reloc_count;
1622 for (rel = relocs; rel < rel_end; rel++)
1623 {
bffbf940 1624 unsigned int r_type;
70256ad8
AJ		 1625 unsigned long r_symndx;
1626 struct elf_link_hash_entry *h;
aec6b87e 1627 struct elf_x86_64_link_hash_entry *eh;
4c544807
L		 1628 Elf_Internal_Sym *isym;
1629 const char *name;
06a6a421 1630 bfd_boolean size_reloc;
70256ad8 1631
351f65ca
L		 1632 r_symndx = htab->r_sym (rel->r_info);
1633 r_type = ELF32_R_TYPE (rel->r_info);
c434dee6
AJ		 1634
1635 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1636 {
d003868e
AM		 1637 (*_bfd_error_handler) (_("%B: bad symbol index: %d"),
1638 abfd, r_symndx);
b34976b6 1639 return FALSE;
c434dee6
AJ		 1640 }
1641
70256ad8 1642 if (r_symndx < symtab_hdr->sh_info)
c25bc9fc
L		 1643 {
1644 /* A local symbol. */
c2e61a4e
L		 1645 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1646 abfd, r_symndx);
1647 if (isym == NULL)
1648 return FALSE;
c25bc9fc
L		 1649
1650 /* Check relocation against local STT_GNU_IFUNC symbol. */
351f65ca 1651 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
c25bc9fc 1652 {
351f65ca
L		 1653 h = elf_x86_64_get_local_sym_hash (htab, abfd, rel,
1654 TRUE);
c25bc9fc 1655 if (h == NULL)
c2e61a4e 1656 return FALSE;
6bbec505 1657
c25bc9fc
L		 1658 /* Fake a STT_GNU_IFUNC symbol. */
1659 h->type = STT_GNU_IFUNC;
1660 h->def_regular = 1;
1661 h->ref_regular = 1;
1662 h->forced_local = 1;
1663 h->root.type = bfd_link_hash_defined;
1664 }
1665 else
1666 h = NULL;
1667 }
70256ad8 1668 else
71cb9464 1669 {
4c544807 1670 isym = NULL;
71cb9464
L		 1671 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1672 while (h->root.type == bfd_link_hash_indirect
1673 || h->root.type == bfd_link_hash_warning)
1674 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c25bc9fc 1675 }
cbe950e9 1676
d1534d16
L		 1677 /* Check invalid x32 relocations. */
1678 if (!ABI_64_P (abfd))
1679 switch (r_type)
1680 {
1681 default:
1682 break;
1683
d1534d16
L		 1684 case R_X86_64_DTPOFF64:
1685 case R_X86_64_TPOFF64:
1686 case R_X86_64_PC64:
1687 case R_X86_64_GOTOFF64:
1688 case R_X86_64_GOT64:
1689 case R_X86_64_GOTPCREL64:
1690 case R_X86_64_GOTPC64:
1691 case R_X86_64_GOTPLT64:
1692 case R_X86_64_PLTOFF64:
1693 {
1694 if (h)
1695 name = h->root.root.string;
1696 else
1697 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1698 NULL);
1699 (*_bfd_error_handler)
1700 (_("%B: relocation %s against symbol `%s' isn't "
1701 "supported in x32 mode"), abfd,
1702 x86_64_elf_howto_table[r_type].name, name);
1703 bfd_set_error (bfd_error_bad_value);
1704 return FALSE;
1705 }
1706 break;
1707 }
1708
c25bc9fc
L		 1709 if (h != NULL)
1710 {
cbe950e9
L		 1711 /* Create the ifunc sections for static executables. If we
1712 never see an indirect function symbol nor we are building
1713 a static executable, those sections will be empty and
1714 won't appear in output. */
1715 switch (r_type)
1716 {
1717 default:
1718 break;
1719
0ff2b86e
L		 1720 case R_X86_64_PC32_BND:
1721 case R_X86_64_PLT32_BND:
d258b828
IZ		 1722 case R_X86_64_PC32:
1723 case R_X86_64_PLT32:
1724 case R_X86_64_32:
1725 case R_X86_64_64:
0ff2b86e
L		 1726 /* MPX PLT is supported only if elf_x86_64_arch_bed
1727 is used in 64-bit mode. */
1728 if (ABI_64_P (abfd)
d258b828
IZ		 1729 && info->bndplt
1730 && (get_elf_x86_64_backend_data (abfd)
1731 == &elf_x86_64_arch_bed))
0ff2b86e 1732 {
bc696fd5 1733 elf_x86_64_hash_entry (h)->has_bnd_reloc = 1;
0ff2b86e
L		 1734
1735 /* Create the second PLT for Intel MPX support. */
1736 if (htab->plt_bnd == NULL)
1737 {
1738 unsigned int plt_bnd_align;
1739 const struct elf_backend_data *bed;
1740
1741 bed = get_elf_backend_data (info->output_bfd);
6db50b4c
L		 1742 BFD_ASSERT (sizeof (elf_x86_64_bnd_plt2_entry) == 8
1743 && (sizeof (elf_x86_64_bnd_plt2_entry)
1744 == sizeof (elf_x86_64_legacy_plt2_entry)));
1745 plt_bnd_align = 3;
0ff2b86e
L		 1746
1747 if (htab->elf.dynobj == NULL)
1748 htab->elf.dynobj = abfd;
1749 htab->plt_bnd
1750 = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
1751 ".plt.bnd",
1752 (bed->dynamic_sec_flags
1753 | SEC_ALLOC
1754 | SEC_CODE
1755 | SEC_LOAD
1756 | SEC_READONLY));
1757 if (htab->plt_bnd == NULL
1758 || !bfd_set_section_alignment (htab->elf.dynobj,
1759 htab->plt_bnd,
1760 plt_bnd_align))
1761 return FALSE;
1762 }
1763 }
1764
cbe950e9 1765 case R_X86_64_32S:
cbe950e9 1766 case R_X86_64_PC64:
cbe950e9 1767 case R_X86_64_GOTPCREL:
56ceb5b5
L		 1768 case R_X86_64_GOTPCRELX:
1769 case R_X86_64_REX_GOTPCRELX:
cbe950e9 1770 case R_X86_64_GOTPCREL64:
9d4057ee
AM		 1771 if (htab->elf.dynobj == NULL)
1772 htab->elf.dynobj = abfd;
1773 if (!_bfd_elf_create_ifunc_sections (htab->elf.dynobj, info))
c2e61a4e 1774 return FALSE;
cbe950e9
L		 1775 break;
1776 }
1777
ad1e85de
L		 1778 /* It is referenced by a non-shared object. */
1779 h->ref_regular = 1;
61315175 1780 h->root.non_ir_ref = 1;
13a2df29
L		 1781
1782 if (h->type == STT_GNU_IFUNC)
1783 elf_tdata (info->output_bfd)->has_gnu_symbols
1784 |= elf_gnu_symbol_ifunc;
71cb9464 1785 }
70256ad8 1786
351f65ca
L		 1787 if (! elf_x86_64_tls_transition (info, abfd, sec, NULL,
1788 symtab_hdr, sym_hashes,
1789 &r_type, GOT_UNKNOWN,
1790 rel, rel_end, h, r_symndx))
c2e61a4e 1791 return FALSE;
142411ca 1792
aec6b87e 1793 eh = (struct elf_x86_64_link_hash_entry *) h;
bffbf940 1794 switch (r_type)
70256ad8 1795 {
bffbf940
JJ		 1796 case R_X86_64_TLSLD:
1797 htab->tls_ld_got.refcount += 1;
1798 goto create_got;
1799
1800 case R_X86_64_TPOFF32:
0e1862bb 1801 if (!bfd_link_executable (info) && ABI_64_P (abfd))
70256ad8 1802 {
09a24cbf 1803 if (h)
4c544807
L		 1804 name = h->root.root.string;
1805 else
1806 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1807 NULL);
bffbf940 1808 (*_bfd_error_handler)
d003868e
AM		 1809 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1810 abfd,
4c544807 1811 x86_64_elf_howto_table[r_type].name, name);
bffbf940 1812 bfd_set_error (bfd_error_bad_value);
c2e61a4e 1813 return FALSE;
70256ad8 1814 }
aec6b87e
L		 1815 if (eh != NULL)
1816 eh->has_got_reloc = 1;
bffbf940 1817 break;
c434dee6 1818
bffbf940 1819 case R_X86_64_GOTTPOFF:
0e1862bb 1820 if (!bfd_link_executable (info))
bffbf940
JJ		 1821 info->flags |= DF_STATIC_TLS;
1822 /* Fall through */
70256ad8 1823
bffbf940
JJ		 1824 case R_X86_64_GOT32:
1825 case R_X86_64_GOTPCREL:
56ceb5b5
L		 1826 case R_X86_64_GOTPCRELX:
1827 case R_X86_64_REX_GOTPCRELX:
bffbf940 1828 case R_X86_64_TLSGD:
7b81dfbb
AJ		 1829 case R_X86_64_GOT64:
1830 case R_X86_64_GOTPCREL64:
1831 case R_X86_64_GOTPLT64:
67a4f2b7
AO		 1832 case R_X86_64_GOTPC32_TLSDESC:
1833 case R_X86_64_TLSDESC_CALL:
bffbf940
JJ		 1834 /* This symbol requires a global offset table entry. */
1835 {
1836 int tls_type, old_tls_type;
1837
1838 switch (r_type)
1839 {
1840 default: tls_type = GOT_NORMAL; break;
1841 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
1842 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
67a4f2b7
AO		 1843 case R_X86_64_GOTPC32_TLSDESC:
1844 case R_X86_64_TLSDESC_CALL:
1845 tls_type = GOT_TLS_GDESC; break;
bffbf940
JJ		 1846 }
1847
1848 if (h != NULL)
1849 {
1850 h->got.refcount += 1;
aec6b87e 1851 old_tls_type = eh->tls_type;
bffbf940
JJ		 1852 }
1853 else
1854 {
1855 bfd_signed_vma *local_got_refcounts;
1856
1857 /* This is a global offset table entry for a local symbol. */
1858 local_got_refcounts = elf_local_got_refcounts (abfd);
1859 if (local_got_refcounts == NULL)
1860 {
1861 bfd_size_type size;
1862
1863 size = symtab_hdr->sh_info;
67a4f2b7
AO		 1864 size *= sizeof (bfd_signed_vma)
1865 + sizeof (bfd_vma) + sizeof (char);
bffbf940
JJ		 1866 local_got_refcounts = ((bfd_signed_vma *)
1867 bfd_zalloc (abfd, size));
1868 if (local_got_refcounts == NULL)
c2e61a4e 1869 return FALSE;
bffbf940 1870 elf_local_got_refcounts (abfd) = local_got_refcounts;
351f65ca 1871 elf_x86_64_local_tlsdesc_gotent (abfd)
67a4f2b7 1872 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
351f65ca 1873 elf_x86_64_local_got_tls_type (abfd)
67a4f2b7 1874 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
bffbf940
JJ		 1875 }
1876 local_got_refcounts[r_symndx] += 1;
1877 old_tls_type
351f65ca 1878 = elf_x86_64_local_got_tls_type (abfd) [r_symndx];
bffbf940
JJ		 1879 }
1880
1881 /* If a TLS symbol is accessed using IE at least once,
1882 there is no point to use dynamic model for it. */
1883 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7
AO		 1884 && (! GOT_TLS_GD_ANY_P (old_tls_type)
1885 || tls_type != GOT_TLS_IE))
bffbf940 1886 {
67a4f2b7 1887 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
bffbf940 1888 tls_type = old_tls_type;
67a4f2b7
AO		 1889 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1890 && GOT_TLS_GD_ANY_P (tls_type))
1891 tls_type |= old_tls_type;
bffbf940
JJ		 1892 else
1893 {
09a24cbf 1894 if (h)
4c544807
L		 1895 name = h->root.root.string;
1896 else
1897 name = bfd_elf_sym_name (abfd, symtab_hdr,
1898 isym, NULL);
bffbf940 1899 (*_bfd_error_handler)
1f7a4e42 1900 (_("%B: '%s' accessed both as normal and thread local symbol"),
4c544807 1901 abfd, name);
68c4a57e 1902 bfd_set_error (bfd_error_bad_value);
c2e61a4e 1903 return FALSE;
bffbf940
JJ		 1904 }
1905 }
1906
1907 if (old_tls_type != tls_type)
1908 {
aec6b87e
L		 1909 if (eh != NULL)
1910 eh->tls_type = tls_type;
bffbf940 1911 else
351f65ca 1912 elf_x86_64_local_got_tls_type (abfd) [r_symndx] = tls_type;
bffbf940
JJ		 1913 }
1914 }
c434dee6
AJ		 1915 /* Fall through */
1916
d6ab8113
JB		 1917 case R_X86_64_GOTOFF64:
1918 case R_X86_64_GOTPC32:
7b81dfbb 1919 case R_X86_64_GOTPC64:
bffbf940 1920 create_got:
aec6b87e
L		 1921 if (eh != NULL)
1922 eh->has_got_reloc = 1;
6de2ae4a 1923 if (htab->elf.sgot == NULL)
c434dee6
AJ		 1924 {
1925 if (htab->elf.dynobj == NULL)
1926 htab->elf.dynobj = abfd;
6de2ae4a
L		 1927 if (!_bfd_elf_create_got_section (htab->elf.dynobj,
1928 info))
c2e61a4e 1929 return FALSE;
c434dee6 1930 }
70256ad8
AJ		 1931 break;
1932
1933 case R_X86_64_PLT32:
c3320543 1934 case R_X86_64_PLT32_BND:
70256ad8 1935 /* This symbol requires a procedure linkage table entry. We
407443a3
AJ		 1936 actually build the entry in adjust_dynamic_symbol,
1937 because this might be a case of linking PIC code which is
1938 never referenced by a dynamic object, in which case we
1939 don't need to generate a procedure linkage table entry
1940 after all. */
70256ad8
AJ		 1941
1942 /* If this is a local symbol, we resolve it directly without
407443a3 1943 creating a procedure linkage table entry. */
70256ad8
AJ		 1944 if (h == NULL)
1945 continue;
1946
aec6b87e 1947 eh->has_got_reloc = 1;
f5385ebf 1948 h->needs_plt = 1;
51b64d56 1949 h->plt.refcount += 1;
70256ad8
AJ		 1950 break;
1951
7b81dfbb
AJ		 1952 case R_X86_64_PLTOFF64:
1953 /* This tries to form the 'address' of a function relative
1954 to GOT. For global symbols we need a PLT entry. */
1955 if (h != NULL)
1956 {
1957 h->needs_plt = 1;
1958 h->plt.refcount += 1;
1959 }
1960 goto create_got;
1961
6a3e1bae
L		 1962 case R_X86_64_SIZE32:
1963 case R_X86_64_SIZE64:
06a6a421 1964 size_reloc = TRUE;
6a3e1bae
L		 1965 goto do_size;
1966
248775ba
L		 1967 case R_X86_64_32:
1968 if (!ABI_64_P (abfd))
1969 goto pointer;
cc78d0af
AJ		 1970 case R_X86_64_8:
1971 case R_X86_64_16:
70256ad8 1972 case R_X86_64_32S:
1b71fb54
AJ		 1973 /* Let's help debug shared library creation. These relocs
1974 cannot be used in shared libs. Don't error out for
1975 sections we don't care about, such as debug sections or
4c10bbaa
L		 1976 non-constant sections, or when relocation overflow check
1977 is disabled. */
1978 if (!info->no_reloc_overflow_check
1979 && bfd_link_pic (info)
1b71fb54
AJ		 1980 && (sec->flags & SEC_ALLOC) != 0
1981 && (sec->flags & SEC_READONLY) != 0)
1982 {
09a24cbf 1983 if (h)
4c544807
L		 1984 name = h->root.root.string;
1985 else
1986 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1b71fb54 1987 (*_bfd_error_handler)
d003868e 1988 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
4c544807 1989 abfd, x86_64_elf_howto_table[r_type].name, name);
1b71fb54 1990 bfd_set_error (bfd_error_bad_value);
c2e61a4e 1991 return FALSE;
1b71fb54
AJ		 1992 }
1993 /* Fall through. */
1994
c434dee6
AJ		 1995 case R_X86_64_PC8:
1996 case R_X86_64_PC16:
70256ad8 1997 case R_X86_64_PC32:
c3320543 1998 case R_X86_64_PC32_BND:
d6ab8113 1999 case R_X86_64_PC64:
1b71fb54 2000 case R_X86_64_64:
248775ba 2001pointer:
aec6b87e
L		 2002 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
2003 eh->has_non_got_reloc = 1;
d1ed1c7d
L		 2004 /* STT_GNU_IFUNC symbol must go through PLT even if it is
2005 locally defined and undefined symbol may turn out to be
2006 a STT_GNU_IFUNC symbol later. */
2007 if (h != NULL
2008 && (bfd_link_executable (info)
2009 || ((h->type == STT_GNU_IFUNC
2010 || h->root.type == bfd_link_hash_undefweak
2011 || h->root.type == bfd_link_hash_undefined)
2012 && SYMBOLIC_BIND (info, h))))
c434dee6
AJ		 2013 {
2014 /* If this reloc is in a read-only section, we might
2015 need a copy reloc. We can't check reliably at this
2016 stage whether the section is read-only, as input
2017 sections have not yet been mapped to output sections.
2018 Tentatively set the flag for now, and correct in
2019 adjust_dynamic_symbol. */
f5385ebf 2020 h->non_got_ref = 1;
c434dee6
AJ		 2021
2022 /* We may need a .plt entry if the function this reloc
2023 refers to is in a shared lib. */
2024 h->plt.refcount += 1;
5db4f0d3
L		 2025 if (r_type == R_X86_64_PC32)
2026 {
2027 /* Since something like ".long foo - ." may be used
2028 as pointer, make sure that PLT is used if foo is
2029 a function defined in a shared library. */
2030 if ((sec->flags & SEC_CODE) == 0)
2031 h->pointer_equality_needed = 1;
2032 }
2033 else if (r_type != R_X86_64_PC32_BND
2034 && r_type != R_X86_64_PC64)
04ebc307
L		 2035 {
2036 h->pointer_equality_needed = 1;
2037 /* At run-time, R_X86_64_64 can be resolved for both
2038 x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2039 can only be resolved for x32. */
2040 if ((sec->flags & SEC_READONLY) == 0
2041 && (r_type == R_X86_64_64
2042 || (!ABI_64_P (abfd)
2043 && (r_type == R_X86_64_32
2044 || r_type == R_X86_64_32S))))
aec6b87e 2045 eh->func_pointer_refcount += 1;
04ebc307 2046 }
c434dee6 2047 }
70256ad8 2048
06a6a421 2049 size_reloc = FALSE;
6a3e1bae 2050do_size:
70256ad8
AJ		 2051 /* If we are creating a shared library, and this is a reloc
2052 against a global symbol, or a non PC relative reloc
2053 against a local symbol, then we need to copy the reloc
2054 into the shared library. However, if we are linking with
2055 -Bsymbolic, we do not need to copy a reloc against a
2056 global symbol which is defined in an object we are
407443a3 2057 including in the link (i.e., DEF_REGULAR is set). At
70256ad8
AJ		 2058 this point we have not seen all the input files, so it is
2059 possible that DEF_REGULAR is not set now but will be set
c434dee6
AJ		 2060 later (it is never cleared). In case of a weak definition,
2061 DEF_REGULAR may be cleared later by a strong definition in
2062 a shared library. We account for that possibility below by
2063 storing information in the relocs_copied field of the hash
2064 table entry. A similar situation occurs when creating
2065 shared libraries and symbol visibility changes render the
31c0ebfe 2066 symbol local.
c434dee6
AJ		 2067
2068 If on the other hand, we are creating an executable, we
2069 may need to keep relocations for symbols satisfied by a
2070 dynamic library if we manage to avoid copy relocs for the
0f88be7a 2071 symbol. */
0e1862bb 2072 if ((bfd_link_pic (info)
c434dee6 2073 && (sec->flags & SEC_ALLOC) != 0
d8045f23 2074 && (! IS_X86_64_PCREL_TYPE (r_type)
c434dee6 2075 || (h != NULL
4e0c91e4
L		 2076 && (! (bfd_link_pie (info)
2077 || SYMBOLIC_BIND (info, h))
c434dee6 2078 || h->root.type == bfd_link_hash_defweak
f5385ebf 2079 || !h->def_regular))))
d40d037c 2080 || (ELIMINATE_COPY_RELOCS
0e1862bb 2081 && !bfd_link_pic (info)
c434dee6
AJ		 2082 && (sec->flags & SEC_ALLOC) != 0
2083 && h != NULL
2084 && (h->root.type == bfd_link_hash_defweak
0f88be7a 2085 || !h->def_regular)))
70256ad8 2086 {
e03a8ed8
L		 2087 struct elf_dyn_relocs *p;
2088 struct elf_dyn_relocs **head;
c434dee6
AJ		 2089
2090 /* We must copy these reloc types into the output file.
2091 Create a reloc section in dynobj and make room for
2092 this reloc. */
70256ad8
AJ		 2093 if (sreloc == NULL)
2094 {
c434dee6
AJ		 2095 if (htab->elf.dynobj == NULL)
2096 htab->elf.dynobj = abfd;
2097
83bac4b0 2098 sreloc = _bfd_elf_make_dynamic_reloc_section
82e96e07
L		 2099 (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2100 abfd, /*rela?*/ TRUE);
70256ad8 2101
70256ad8 2102 if (sreloc == NULL)
c2e61a4e 2103 return FALSE;
70256ad8
AJ		 2104 }
2105
c434dee6
AJ		 2106 /* If this is a global symbol, we count the number of
2107 relocations we need for this symbol. */
2108 if (h != NULL)
aec6b87e 2109 head = &eh->dyn_relocs;
c434dee6
AJ		 2110 else
2111 {
2112 /* Track dynamic relocs needed for local syms too.
2113 We really need local syms available to do this
2114 easily. Oh well. */
c434dee6 2115 asection *s;
87d72d41 2116 void **vpp;
87d72d41
AM		 2117
2118 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2119 abfd, r_symndx);
2120 if (isym == NULL)
2121 return FALSE;
2122
2123 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
c434dee6 2124 if (s == NULL)
87d72d41 2125 s = sec;
70256ad8 2126
e81d3500
DD		 2127 /* Beware of type punned pointers vs strict aliasing
2128 rules. */
2129 vpp = &(elf_section_data (s)->local_dynrel);
e03a8ed8 2130 head = (struct elf_dyn_relocs **)vpp;
c434dee6 2131 }
70256ad8 2132
c434dee6
AJ		 2133 p = *head;
2134 if (p == NULL || p->sec != sec)
2135 {
2136 bfd_size_type amt = sizeof *p;
d8045f23 2137
e03a8ed8 2138 p = ((struct elf_dyn_relocs *)
c434dee6 2139 bfd_alloc (htab->elf.dynobj, amt));
70256ad8 2140 if (p == NULL)
c2e61a4e 2141 return FALSE;
c434dee6
AJ		 2142 p->next = *head;
2143 *head = p;
2144 p->sec = sec;
2145 p->count = 0;
2146 p->pc_count = 0;
70256ad8 2147 }
c434dee6
AJ		 2148
2149 p->count += 1;
06a6a421
L		 2150 /* Count size relocation as PC-relative relocation. */
2151 if (IS_X86_64_PCREL_TYPE (r_type) || size_reloc)
c434dee6 2152 p->pc_count += 1;
70256ad8
AJ		 2153 }
2154 break;
fe4770f4
AJ		 2155
2156 /* This relocation describes the C++ object vtable hierarchy.
2157 Reconstruct it for later use during GC. */
2158 case R_X86_64_GNU_VTINHERIT:
c152c796 2159 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
c2e61a4e 2160 return FALSE;
fe4770f4
AJ		 2161 break;
2162
2163 /* This relocation describes which C++ vtable entries are actually
2164 used. Record for later use during GC. */
2165 case R_X86_64_GNU_VTENTRY:
d17e0c6e
JB		 2166 BFD_ASSERT (h != NULL);
2167 if (h != NULL
2168 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
c2e61a4e 2169 return FALSE;
fe4770f4 2170 break;
c434dee6
AJ		 2171
2172 default:
2173 break;
70256ad8 2174 }
dd7e64d4
L		 2175
2176 if (use_plt_got
2177 && h != NULL
2178 && h->plt.refcount > 0
8ded2ddc
L		 2179 && (((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
2180 || h->got.refcount > 0)
dd7e64d4
L		 2181 && htab->plt_got == NULL)
2182 {
2183 /* Create the GOT procedure linkage table. */
2184 unsigned int plt_got_align;
2185 const struct elf_backend_data *bed;
2186
2187 bed = get_elf_backend_data (info->output_bfd);
2188 BFD_ASSERT (sizeof (elf_x86_64_legacy_plt2_entry) == 8
2189 && (sizeof (elf_x86_64_bnd_plt2_entry)
2190 == sizeof (elf_x86_64_legacy_plt2_entry)));
2191 plt_got_align = 3;
2192
2193 if (htab->elf.dynobj == NULL)
2194 htab->elf.dynobj = abfd;
2195 htab->plt_got
2196 = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
2197 ".plt.got",
2198 (bed->dynamic_sec_flags
2199 | SEC_ALLOC
2200 | SEC_CODE
2201 | SEC_LOAD
2202 | SEC_READONLY));
2203 if (htab->plt_got == NULL
2204 || !bfd_set_section_alignment (htab->elf.dynobj,
2205 htab->plt_got,
2206 plt_got_align))
2207 return FALSE;
2208 }
c1d11331 2209
56ceb5b5
L		 2210 if ((r_type == R_X86_64_GOTPCREL
2211 || r_type == R_X86_64_GOTPCRELX
2212 || r_type == R_X86_64_REX_GOTPCRELX)
c1d11331 2213 && (h == NULL || h->type != STT_GNU_IFUNC))
56ceb5b5 2214 sec->need_convert_load = 1;
70256ad8
AJ		 2215 }
2216
b34976b6 2217 return TRUE;
70256ad8
AJ		 2218}
2219
2220/* Return the section that should be marked against GC for a given
407443a3 2221 relocation. */
70256ad8
AJ		 2222
2223static asection *
351f65ca
L		 2224elf_x86_64_gc_mark_hook (asection *sec,
2225 struct bfd_link_info *info,
2226 Elf_Internal_Rela *rel,
2227 struct elf_link_hash_entry *h,
2228 Elf_Internal_Sym *sym)
70256ad8
AJ		 2229{
2230 if (h != NULL)
351f65ca 2231 switch (ELF32_R_TYPE (rel->r_info))
07adf181
AM		 2232 {
2233 case R_X86_64_GNU_VTINHERIT:
2234 case R_X86_64_GNU_VTENTRY:
2235 return NULL;
2236 }
2237
2238 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
70256ad8
AJ		 2239}
2240
407443a3 2241/* Update the got entry reference counts for the section being removed. */
70256ad8 2242
b34976b6 2243static bfd_boolean
351f65ca
L		 2244elf_x86_64_gc_sweep_hook (bfd *abfd, struct bfd_link_info *info,
2245 asection *sec,
2246 const Elf_Internal_Rela *relocs)
70256ad8 2247{
351f65ca 2248 struct elf_x86_64_link_hash_table *htab;
70256ad8
AJ		 2249 Elf_Internal_Shdr *symtab_hdr;
2250 struct elf_link_hash_entry **sym_hashes;
2251 bfd_signed_vma *local_got_refcounts;
2252 const Elf_Internal_Rela *rel, *relend;
c434dee6 2253
0e1862bb 2254 if (bfd_link_relocatable (info))
7dda2462
TG		 2255 return TRUE;
2256
351f65ca 2257 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 2258 if (htab == NULL)
2259 return FALSE;
2260
c434dee6 2261 elf_section_data (sec)->local_dynrel = NULL;
70256ad8 2262
0ffa91dd 2263 symtab_hdr = &elf_symtab_hdr (abfd);
70256ad8
AJ		 2264 sym_hashes = elf_sym_hashes (abfd);
2265 local_got_refcounts = elf_local_got_refcounts (abfd);
2266
351f65ca 2267 htab = elf_x86_64_hash_table (info);
70256ad8
AJ		 2268 relend = relocs + sec->reloc_count;
2269 for (rel = relocs; rel < relend; rel++)
26e41594
AM		 2270 {
2271 unsigned long r_symndx;
2272 unsigned int r_type;
2273 struct elf_link_hash_entry *h = NULL;
04ebc307 2274 bfd_boolean pointer_reloc;
70256ad8 2275
351f65ca 2276 r_symndx = htab->r_sym (rel->r_info);
26e41594
AM		 2277 if (r_symndx >= symtab_hdr->sh_info)
2278 {
26e41594 2279 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3eb128b2
AM		 2280 while (h->root.type == bfd_link_hash_indirect
2281 || h->root.type == bfd_link_hash_warning)
2282 h = (struct elf_link_hash_entry *) h->root.u.i.link;
26e41594 2283 }
bb1cb422
L		 2284 else
2285 {
2286 /* A local symbol. */
2287 Elf_Internal_Sym *isym;
2288
2289 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2290 abfd, r_symndx);
2291
2292 /* Check relocation against local STT_GNU_IFUNC symbol. */
2293 if (isym != NULL
82e96e07 2294 && ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
bb1cb422 2295 {
351f65ca 2296 h = elf_x86_64_get_local_sym_hash (htab, abfd, rel, FALSE);
bb1cb422
L		 2297 if (h == NULL)
2298 abort ();
2299 }
2300 }
c434dee6 2301
3db2e7dd
L		 2302 if (h)
2303 {
2304 struct elf_x86_64_link_hash_entry *eh;
2305 struct elf_dyn_relocs **pp;
2306 struct elf_dyn_relocs *p;
2307
2308 eh = (struct elf_x86_64_link_hash_entry *) h;
2309
2310 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
2311 if (p->sec == sec)
2312 {
2313 /* Everything must go for SEC. */
2314 *pp = p->next;
2315 break;
2316 }
2317 }
2318
351f65ca
L		 2319 r_type = ELF32_R_TYPE (rel->r_info);
2320 if (! elf_x86_64_tls_transition (info, abfd, sec, NULL,
2321 symtab_hdr, sym_hashes,
2322 &r_type, GOT_UNKNOWN,
2323 rel, relend, h, r_symndx))
142411ca
L		 2324 return FALSE;
2325
04ebc307 2326 pointer_reloc = FALSE;
26e41594
AM		 2327 switch (r_type)
2328 {
2329 case R_X86_64_TLSLD:
4dfe6ac6
NC		 2330 if (htab->tls_ld_got.refcount > 0)
2331 htab->tls_ld_got.refcount -= 1;
26e41594 2332 break;
c434dee6 2333
26e41594 2334 case R_X86_64_TLSGD:
67a4f2b7
AO		 2335 case R_X86_64_GOTPC32_TLSDESC:
2336 case R_X86_64_TLSDESC_CALL:
26e41594
AM		 2337 case R_X86_64_GOTTPOFF:
2338 case R_X86_64_GOT32:
2339 case R_X86_64_GOTPCREL:
56ceb5b5
L		 2340 case R_X86_64_GOTPCRELX:
2341 case R_X86_64_REX_GOTPCRELX:
7b81dfbb
AJ		 2342 case R_X86_64_GOT64:
2343 case R_X86_64_GOTPCREL64:
2344 case R_X86_64_GOTPLT64:
26e41594
AM		 2345 if (h != NULL)
2346 {
2347 if (h->got.refcount > 0)
2348 h->got.refcount -= 1;
bb1cb422
L		 2349 if (h->type == STT_GNU_IFUNC)
2350 {
2351 if (h->plt.refcount > 0)
2352 h->plt.refcount -= 1;
2353 }
26e41594
AM		 2354 }
2355 else if (local_got_refcounts != NULL)
2356 {
2357 if (local_got_refcounts[r_symndx] > 0)
2358 local_got_refcounts[r_symndx] -= 1;
2359 }
2360 break;
c434dee6 2361
26e41594 2362 case R_X86_64_32:
26e41594 2363 case R_X86_64_32S:
04ebc307
L		 2364 pointer_reloc = !ABI_64_P (abfd);
2365 goto pointer;
2366
2367 case R_X86_64_64:
2368 pointer_reloc = TRUE;
2369 case R_X86_64_8:
2370 case R_X86_64_16:
26e41594
AM		 2371 case R_X86_64_PC8:
2372 case R_X86_64_PC16:
2373 case R_X86_64_PC32:
c3320543 2374 case R_X86_64_PC32_BND:
d6ab8113 2375 case R_X86_64_PC64:
1788fc08
L		 2376 case R_X86_64_SIZE32:
2377 case R_X86_64_SIZE64:
04ebc307 2378pointer:
0e1862bb 2379 if (bfd_link_pic (info)
3db2e7dd 2380 && (h == NULL || h->type != STT_GNU_IFUNC))
26e41594
AM		 2381 break;
2382 /* Fall thru */
c434dee6 2383
26e41594 2384 case R_X86_64_PLT32:
c3320543 2385 case R_X86_64_PLT32_BND:
7b81dfbb 2386 case R_X86_64_PLTOFF64:
26e41594
AM		 2387 if (h != NULL)
2388 {
2389 if (h->plt.refcount > 0)
2390 h->plt.refcount -= 1;
04ebc307
L		 2391 if (pointer_reloc && (sec->flags & SEC_READONLY) == 0)
2392 {
2393 struct elf_x86_64_link_hash_entry *eh
2394 = (struct elf_x86_64_link_hash_entry *) h;
2395 if (eh->func_pointer_refcount > 0)
2396 eh->func_pointer_refcount -= 1;
2397 }
26e41594
AM		 2398 }
2399 break;
70256ad8 2400
26e41594
AM		 2401 default:
2402 break;
2403 }
2404 }
70256ad8 2405
b34976b6 2406 return TRUE;
70256ad8
AJ		 2407}
2408
aec6b87e
L		 2409/* Remove undefined weak symbol from the dynamic symbol table if it
2410 is resolved to 0. */
2411
2412static bfd_boolean
2413elf_x86_64_fixup_symbol (struct bfd_link_info *info,
2414 struct elf_link_hash_entry *h)
2415{
2416 if (h->dynindx != -1
2417 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
2418 elf_x86_64_hash_entry (h)))
2419 {
2420 h->dynindx = -1;
2421 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
2422 h->dynstr_index);
2423 }
2424 return TRUE;
2425}
2426
70256ad8
AJ		 2427/* Adjust a symbol defined by a dynamic object and referenced by a
2428 regular object. The current definition is in some section of the
2429 dynamic object, but we're not including those sections. We have to
2430 change the definition to something the rest of the link can
407443a3 2431 understand. */
70256ad8 2432
b34976b6 2433static bfd_boolean
351f65ca
L		 2434elf_x86_64_adjust_dynamic_symbol (struct bfd_link_info *info,
2435 struct elf_link_hash_entry *h)
70256ad8 2436{
351f65ca 2437 struct elf_x86_64_link_hash_table *htab;
70256ad8 2438 asection *s;
5ca5bb35
L		 2439 struct elf_x86_64_link_hash_entry *eh;
2440 struct elf_dyn_relocs *p;
70256ad8 2441
cbe950e9
L		 2442 /* STT_GNU_IFUNC symbol must go through PLT. */
2443 if (h->type == STT_GNU_IFUNC)
2444 {
73bcf233
L		 2445 /* All local STT_GNU_IFUNC references must be treate as local
2446 calls via local PLT. */
5ca5bb35
L		 2447 if (h->ref_regular
2448 && SYMBOL_CALLS_LOCAL (info, h))
2449 {
73bcf233 2450 bfd_size_type pc_count = 0, count = 0;
5ca5bb35
L		 2451 struct elf_dyn_relocs **pp;
2452
2453 eh = (struct elf_x86_64_link_hash_entry *) h;
2454 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2455 {
2456 pc_count += p->pc_count;
2457 p->count -= p->pc_count;
2458 p->pc_count = 0;
73bcf233 2459 count += p->count;
5ca5bb35
L		 2460 if (p->count == 0)
2461 *pp = p->next;
2462 else
2463 pp = &p->next;
2464 }
2465
73bcf233 2466 if (pc_count || count)
5ca5bb35
L		 2467 {
2468 h->needs_plt = 1;
5ca5bb35 2469 h->non_got_ref = 1;
a5479e5f
L		 2470 if (h->plt.refcount <= 0)
2471 h->plt.refcount = 1;
2472 else
2473 h->plt.refcount += 1;
5ca5bb35
L		 2474 }
2475 }
2476
cbe950e9
L		 2477 if (h->plt.refcount <= 0)
2478 {
2479 h->plt.offset = (bfd_vma) -1;
2480 h->needs_plt = 0;
2481 }
2482 return TRUE;
2483 }
2484
70256ad8
AJ		 2485 /* If this is a function, put it in the procedure linkage table. We
2486 will fill in the contents of the procedure linkage table later,
2487 when we know the address of the .got section. */
2488 if (h->type == STT_FUNC
f5385ebf 2489 || h->needs_plt)
70256ad8 2490 {
c434dee6 2491 if (h->plt.refcount <= 0
27482721
AJ		 2492 || SYMBOL_CALLS_LOCAL (info, h)
2493 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2494 && h->root.type == bfd_link_hash_undefweak))
70256ad8 2495 {
70256ad8
AJ		 2496 /* This case can occur if we saw a PLT32 reloc in an input
2497 file, but the symbol was never referred to by a dynamic
2498 object, or if all references were garbage collected. In
2499 such a case, we don't actually need to build a procedure
2500 linkage table, and we can just do a PC32 reloc instead. */
70256ad8 2501 h->plt.offset = (bfd_vma) -1;
f5385ebf 2502 h->needs_plt = 0;
70256ad8
AJ		 2503 }
2504
b34976b6 2505 return TRUE;
70256ad8 2506 }
bbd7ec4a 2507 else
c434dee6
AJ		 2508 /* It's possible that we incorrectly decided a .plt reloc was
2509 needed for an R_X86_64_PC32 reloc to a non-function sym in
2510 check_relocs. We can't decide accurately between function and
2511 non-function syms in check-relocs; Objects loaded later in
2512 the link may change h->type. So fix it now. */
bbd7ec4a 2513 h->plt.offset = (bfd_vma) -1;
70256ad8
AJ		 2514
2515 /* If this is a weak symbol, and there is a real definition, the
2516 processor independent code will have arranged for us to see the
407443a3 2517 real definition first, and we can just use the same value. */
f6e332e6 2518 if (h->u.weakdef != NULL)
70256ad8 2519 {
f6e332e6
AM		 2520 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2521 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2522 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2523 h->root.u.def.value = h->u.weakdef->root.u.def.value;
d40d037c 2524 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
bc696fd5
L		 2525 {
2526 eh = (struct elf_x86_64_link_hash_entry *) h;
2527 h->non_got_ref = h->u.weakdef->non_got_ref;
2528 eh->needs_copy = h->u.weakdef->needs_copy;
2529 }
b34976b6 2530 return TRUE;
70256ad8
AJ		 2531 }
2532
2533 /* This is a reference to a symbol defined by a dynamic object which
407443a3 2534 is not a function. */
70256ad8
AJ		 2535
2536 /* If we are creating a shared library, we must presume that the
2537 only references to the symbol are via the global offset table.
2538 For such cases we need not do anything here; the relocations will
407443a3 2539 be handled correctly by relocate_section. */
0e1862bb 2540 if (!bfd_link_executable (info))
b34976b6 2541 return TRUE;
70256ad8
AJ		 2542
2543 /* If there are no references to this symbol that do not use the
2544 GOT, we don't need to generate a copy reloc. */
f5385ebf 2545 if (!h->non_got_ref)
b34976b6 2546 return TRUE;
70256ad8 2547
c434dee6
AJ		 2548 /* If -z nocopyreloc was given, we won't generate them either. */
2549 if (info->nocopyreloc)
2550 {
f5385ebf 2551 h->non_got_ref = 0;
b34976b6 2552 return TRUE;
c434dee6
AJ		 2553 }
2554
31c0ebfe 2555 if (ELIMINATE_COPY_RELOCS)
c434dee6 2556 {
351f65ca 2557 eh = (struct elf_x86_64_link_hash_entry *) h;
d40d037c
AJ		 2558 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2559 {
2560 s = p->sec->output_section;
2561 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2562 break;
2563 }
2564
2565 /* If we didn't find any dynamic relocs in read-only sections, then
2566 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2567 if (p == NULL)
2568 {
f5385ebf 2569 h->non_got_ref = 0;
d40d037c
AJ		 2570 return TRUE;
2571 }
c434dee6
AJ		 2572 }
2573
70256ad8 2574 /* We must allocate the symbol in our .dynbss section, which will
407443a3 2575 become part of the .bss section of the executable. There will be
70256ad8
AJ		 2576 an entry for this symbol in the .dynsym section. The dynamic
2577 object will contain position independent code, so all references
2578 from the dynamic object to this symbol will go through the global
2579 offset table. The dynamic linker will use the .dynsym entry to
2580 determine the address it must put in the global offset table, so
2581 both the dynamic object and the regular object will refer to the
2582 same memory location for the variable. */
2583
351f65ca 2584 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 2585 if (htab == NULL)
2586 return FALSE;
70256ad8
AJ		 2587
2588 /* We must generate a R_X86_64_COPY reloc to tell the dynamic linker
2589 to copy the initial value out of the dynamic object and into the
cedb70c5 2590 runtime process image. */
1d7e9d18 2591 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
70256ad8 2592 {
351f65ca
L		 2593 const struct elf_backend_data *bed;
2594 bed = get_elf_backend_data (info->output_bfd);
2595 htab->srelbss->size += bed->s->sizeof_rela;
f5385ebf 2596 h->needs_copy = 1;
70256ad8
AJ		 2597 }
2598
c434dee6 2599 s = htab->sdynbss;
70256ad8 2600
6cabe1ea 2601 return _bfd_elf_adjust_dynamic_copy (info, h, s);
70256ad8
AJ		 2602}
2603
c434dee6
AJ		 2604/* Allocate space in .plt, .got and associated reloc sections for
2605 dynamic relocs. */
2606
b34976b6 2607static bfd_boolean
351f65ca 2608elf_x86_64_allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
c434dee6
AJ		 2609{
2610 struct bfd_link_info *info;
351f65ca
L		 2611 struct elf_x86_64_link_hash_table *htab;
2612 struct elf_x86_64_link_hash_entry *eh;
e03a8ed8 2613 struct elf_dyn_relocs *p;
351f65ca 2614 const struct elf_backend_data *bed;
eed180f8 2615 unsigned int plt_entry_size;
aec6b87e 2616 bfd_boolean resolved_to_zero;
c434dee6 2617
e92d460e 2618 if (h->root.type == bfd_link_hash_indirect)
b34976b6 2619 return TRUE;
c434dee6 2620
351f65ca 2621 eh = (struct elf_x86_64_link_hash_entry *) h;
e92d460e 2622
c434dee6 2623 info = (struct bfd_link_info *) inf;
351f65ca 2624 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 2625 if (htab == NULL)
2626 return FALSE;
351f65ca 2627 bed = get_elf_backend_data (info->output_bfd);
eed180f8 2628 plt_entry_size = GET_PLT_ENTRY_SIZE (info->output_bfd);
c434dee6 2629
aec6b87e
L		 2630 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
2631
dd7e64d4
L		 2632 /* We can't use the GOT PLT if pointer equality is needed since
2633 finish_dynamic_symbol won't clear symbol value and the dynamic
2634 linker won't update the GOT slot. We will get into an infinite
2635 loop at run-time. */
2636 if (htab->plt_got != NULL
2637 && h->type != STT_GNU_IFUNC
2638 && !h->pointer_equality_needed
2639 && h->plt.refcount > 0
2640 && h->got.refcount > 0)
2641 {
2642 /* Don't use the regular PLT if there are both GOT and GOTPLT
2643 reloctions. */
2644 h->plt.offset = (bfd_vma) -1;
2645
2646 /* Use the GOT PLT. */
2647 eh->plt_got.refcount = 1;
2648 }
2649
04ebc307
L		 2650 /* Clear the reference count of function pointer relocations if
2651 symbol isn't a normal function. */
2652 if (h->type != STT_FUNC)
2653 eh->func_pointer_refcount = 0;
2654
cbe950e9
L		 2655 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
2656 here if it is defined and referenced in a non-shared object. */
2657 if (h->type == STT_GNU_IFUNC
2658 && h->def_regular)
0ff2b86e
L		 2659 {
2660 if (_bfd_elf_allocate_ifunc_dyn_relocs (info, h,
2661 &eh->dyn_relocs,
2662 plt_entry_size,
2663 plt_entry_size,
2664 GOT_ENTRY_SIZE))
2665 {
2666 asection *s = htab->plt_bnd;
2667 if (h->plt.offset != (bfd_vma) -1 && s != NULL)
2668 {
2669 /* Use the .plt.bnd section if it is created. */
2670 eh->plt_bnd.offset = s->size;
2671
2672 /* Make room for this entry in the .plt.bnd section. */
2673 s->size += sizeof (elf_x86_64_legacy_plt2_entry);
2674 }
2675
2676 return TRUE;
2677 }
2678 else
2679 return FALSE;
2680 }
04ebc307
L		 2681 /* Don't create the PLT entry if there are only function pointer
2682 relocations which can be resolved at run-time. */
cbe950e9 2683 else if (htab->elf.dynamic_sections_created
04ebc307
L		 2684 && (h->plt.refcount > eh->func_pointer_refcount
2685 || eh->plt_got.refcount > 0))
c434dee6 2686 {
25070364
L		 2687 bfd_boolean use_plt_got;
2688
04ebc307
L		 2689 /* Clear the reference count of function pointer relocations
2690 if PLT is used. */
2691 eh->func_pointer_refcount = 0;
2692
8ded2ddc 2693 if ((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed)
25070364
L		 2694 {
2695 /* Don't use the regular PLT for DF_BIND_NOW. */
2696 h->plt.offset = (bfd_vma) -1;
2697
2698 /* Use the GOT PLT. */
2699 h->got.refcount = 1;
2700 eh->plt_got.refcount = 1;
2701 }
2702
2703 use_plt_got = eh->plt_got.refcount > 0;
dd7e64d4 2704
c434dee6
AJ		 2705 /* Make sure this symbol is output as a dynamic symbol.
2706 Undefined weak syms won't yet be marked as dynamic. */
2707 if (h->dynindx == -1
aec6b87e
L		 2708 && !h->forced_local
2709 && !resolved_to_zero)
c434dee6 2710 {
c152c796 2711 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2712 return FALSE;
c434dee6
AJ		 2713 }
2714
0e1862bb 2715 if (bfd_link_pic (info)
27482721 2716 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
c434dee6 2717 {
6de2ae4a 2718 asection *s = htab->elf.splt;
0ff2b86e 2719 asection *bnd_s = htab->plt_bnd;
dd7e64d4 2720 asection *got_s = htab->plt_got;
c434dee6 2721
7c1e8d3e
L		 2722 /* If this is the first .plt entry, make room for the special
2723 first entry. The .plt section is used by prelink to undo
2724 prelinking for dynamic relocations. */
2725 if (s->size == 0)
2726 s->size = plt_entry_size;
2727
dd7e64d4
L		 2728 if (use_plt_got)
2729 eh->plt_got.offset = got_s->size;
2730 else
2731 {
2732 h->plt.offset = s->size;
2733 if (bnd_s)
2734 eh->plt_bnd.offset = bnd_s->size;
2735 }
c434dee6
AJ		 2736
2737 /* If this symbol is not defined in a regular file, and we are
2738 not generating a shared library, then set the symbol to this
2739 location in the .plt. This is required to make function
2740 pointers compare as equal between the normal executable and
2741 the shared library. */
0e1862bb 2742 if (! bfd_link_pic (info)
f5385ebf 2743 && !h->def_regular)
c434dee6 2744 {
dd7e64d4 2745 if (use_plt_got)
0ff2b86e 2746 {
dd7e64d4
L		 2747 /* We need to make a call to the entry of the GOT PLT
2748 instead of regular PLT entry. */
2749 h->root.u.def.section = got_s;
2750 h->root.u.def.value = eh->plt_got.offset;
0ff2b86e
L		 2751 }
2752 else
2753 {
dd7e64d4
L		 2754 if (bnd_s)
2755 {
2756 /* We need to make a call to the entry of the second
2757 PLT instead of regular PLT entry. */
2758 h->root.u.def.section = bnd_s;
2759 h->root.u.def.value = eh->plt_bnd.offset;
2760 }
2761 else
2762 {
2763 h->root.u.def.section = s;
2764 h->root.u.def.value = h->plt.offset;
2765 }
0ff2b86e 2766 }
c434dee6
AJ		 2767 }
2768
2769 /* Make room for this entry. */
dd7e64d4
L		 2770 if (use_plt_got)
2771 got_s->size += sizeof (elf_x86_64_legacy_plt2_entry);
2772 else
2773 {
2774 s->size += plt_entry_size;
2775 if (bnd_s)
2776 bnd_s->size += sizeof (elf_x86_64_legacy_plt2_entry);
c434dee6 2777
dd7e64d4
L		 2778 /* We also need to make an entry in the .got.plt section,
2779 which will be placed in the .got section by the linker
2780 script. */
2781 htab->elf.sgotplt->size += GOT_ENTRY_SIZE;
c434dee6 2782
aec6b87e
L		 2783 /* There should be no PLT relocation against resolved
2784 undefined weak symbol in executable. */
2785 if (!resolved_to_zero)
2786 {
2787 /* We also need to make an entry in the .rela.plt
2788 section. */
2789 htab->elf.srelplt->size += bed->s->sizeof_rela;
2790 htab->elf.srelplt->reloc_count++;
2791 }
dd7e64d4 2792 }
c434dee6
AJ		 2793 }
2794 else
2795 {
13f42277 2796 eh->plt_got.offset = (bfd_vma) -1;
c434dee6 2797 h->plt.offset = (bfd_vma) -1;
f5385ebf 2798 h->needs_plt = 0;
c434dee6
AJ		 2799 }
2800 }
2801 else
2802 {
13f42277 2803 eh->plt_got.offset = (bfd_vma) -1;
c434dee6 2804 h->plt.offset = (bfd_vma) -1;
f5385ebf 2805 h->needs_plt = 0;
c434dee6
AJ		 2806 }
2807
67a4f2b7
AO		 2808 eh->tlsdesc_got = (bfd_vma) -1;
2809
bffbf940
JJ		 2810 /* If R_X86_64_GOTTPOFF symbol is now local to the binary,
2811 make it a R_X86_64_TPOFF32 requiring no GOT entry. */
2812 if (h->got.refcount > 0
0e1862bb 2813 && bfd_link_executable (info)
bffbf940 2814 && h->dynindx == -1
351f65ca 2815 && elf_x86_64_hash_entry (h)->tls_type == GOT_TLS_IE)
d8045f23
NC		 2816 {
2817 h->got.offset = (bfd_vma) -1;
2818 }
bffbf940 2819 else if (h->got.refcount > 0)
c434dee6
AJ		 2820 {
2821 asection *s;
b34976b6 2822 bfd_boolean dyn;
351f65ca 2823 int tls_type = elf_x86_64_hash_entry (h)->tls_type;
c434dee6
AJ		 2824
2825 /* Make sure this symbol is output as a dynamic symbol.
2826 Undefined weak syms won't yet be marked as dynamic. */
2827 if (h->dynindx == -1
aec6b87e
L		 2828 && !h->forced_local
2829 && !resolved_to_zero)
c434dee6 2830 {
c152c796 2831 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2832 return FALSE;
c434dee6
AJ		 2833 }
2834
67a4f2b7
AO		 2835 if (GOT_TLS_GDESC_P (tls_type))
2836 {
6de2ae4a 2837 eh->tlsdesc_got = htab->elf.sgotplt->size
351f65ca 2838 - elf_x86_64_compute_jump_table_size (htab);
6de2ae4a 2839 htab->elf.sgotplt->size += 2 * GOT_ENTRY_SIZE;
67a4f2b7
AO		 2840 h->got.offset = (bfd_vma) -2;
2841 }
2842 if (! GOT_TLS_GDESC_P (tls_type)
2843 || GOT_TLS_GD_P (tls_type))
2844 {
6de2ae4a 2845 s = htab->elf.sgot;
67a4f2b7
AO		 2846 h->got.offset = s->size;
2847 s->size += GOT_ENTRY_SIZE;
2848 if (GOT_TLS_GD_P (tls_type))
2849 s->size += GOT_ENTRY_SIZE;
2850 }
c434dee6 2851 dyn = htab->elf.dynamic_sections_created;
bffbf940 2852 /* R_X86_64_TLSGD needs one dynamic relocation if local symbol
aec6b87e
L		 2853 and two if global. R_X86_64_GOTTPOFF needs one dynamic
2854 relocation. No dynamic relocation against resolved undefined
2855 weak symbol in executable. */
67a4f2b7 2856 if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
bffbf940 2857 || tls_type == GOT_TLS_IE)
351f65ca 2858 htab->elf.srelgot->size += bed->s->sizeof_rela;
67a4f2b7 2859 else if (GOT_TLS_GD_P (tls_type))
351f65ca 2860 htab->elf.srelgot->size += 2 * bed->s->sizeof_rela;
67a4f2b7 2861 else if (! GOT_TLS_GDESC_P (tls_type)
aec6b87e
L		 2862 && ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2863 && !resolved_to_zero)
67a4f2b7 2864 || h->root.type != bfd_link_hash_undefweak)
0e1862bb 2865 && (bfd_link_pic (info)
27482721 2866 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
351f65ca 2867 htab->elf.srelgot->size += bed->s->sizeof_rela;
67a4f2b7
AO		 2868 if (GOT_TLS_GDESC_P (tls_type))
2869 {
351f65ca 2870 htab->elf.srelplt->size += bed->s->sizeof_rela;
67a4f2b7
AO		 2871 htab->tlsdesc_plt = (bfd_vma) -1;
2872 }
c434dee6
AJ		 2873 }
2874 else
2875 h->got.offset = (bfd_vma) -1;
2876
c434dee6 2877 if (eh->dyn_relocs == NULL)
b34976b6 2878 return TRUE;
c434dee6
AJ		 2879
2880 /* In the shared -Bsymbolic case, discard space allocated for
2881 dynamic pc-relative relocs against symbols which turn out to be
2882 defined in regular objects. For the normal shared case, discard
2883 space for pc-relative relocs that have become local due to symbol
2884 visibility changes. */
2885
0e1862bb 2886 if (bfd_link_pic (info))
c434dee6 2887 {
27482721
AJ		 2888 /* Relocs that use pc_count are those that appear on a call
2889 insn, or certain REL relocs that can generated via assembly.
2890 We want calls to protected symbols to resolve directly to the
2891 function rather than going via the plt. If people want
2892 function pointer comparisons to work as expected then they
2893 should avoid writing weird assembly. */
2894 if (SYMBOL_CALLS_LOCAL (info, h))
c434dee6 2895 {
e03a8ed8 2896 struct elf_dyn_relocs **pp;
c434dee6
AJ		 2897
2898 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2899 {
c3ce498c
L		 2900 p->count -= p->pc_count;
2901 p->pc_count = 0;
c434dee6
AJ		 2902 if (p->count == 0)
2903 *pp = p->next;
2904 else
2905 pp = &p->next;
2906 }
2907 }
4e795f50
AM		 2908
2909 /* Also discard relocs on undefined weak syms with non-default
aec6b87e 2910 visibility or in PIE. */
31c0ebfe 2911 if (eh->dyn_relocs != NULL)
22d606e9 2912 {
31c0ebfe
L		 2913 if (h->root.type == bfd_link_hash_undefweak)
2914 {
aec6b87e
L		 2915 /* Undefined weak symbol is never bound locally in shared
2916 library. */
2917 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2918 || resolved_to_zero)
31c0ebfe 2919 eh->dyn_relocs = NULL;
31c0ebfe
L		 2920 else if (h->dynindx == -1
2921 && ! h->forced_local
2922 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2923 return FALSE;
2924 }
9d1d54d5
L		 2925 /* For PIE, discard space for pc-relative relocs against
2926 symbols which turn out to need copy relocs. */
0e1862bb 2927 else if (bfd_link_executable (info)
bc696fd5 2928 && (h->needs_copy || eh->needs_copy)
31c0ebfe
L		 2929 && h->def_dynamic
2930 && !h->def_regular)
9d1d54d5
L		 2931 {
2932 struct elf_dyn_relocs **pp;
2933
2934 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2935 {
2936 if (p->pc_count != 0)
2937 *pp = p->next;
2938 else
2939 pp = &p->next;
2940 }
2941 }
22d606e9 2942 }
d8045f23 2943 }
d40d037c 2944 else if (ELIMINATE_COPY_RELOCS)
c434dee6
AJ		 2945 {
2946 /* For the non-shared case, discard space for relocs against
2947 symbols which turn out to need copy relocs or are not
04ebc307
L		 2948 dynamic. Keep dynamic relocations for run-time function
2949 pointer initialization. */
c434dee6 2950
aec6b87e
L		 2951 if ((!h->non_got_ref
2952 || eh->func_pointer_refcount > 0
2953 || (h->root.type == bfd_link_hash_undefweak
2954 && !resolved_to_zero))
f5385ebf
AM		 2955 && ((h->def_dynamic
2956 && !h->def_regular)
c434dee6
AJ		 2957 || (htab->elf.dynamic_sections_created
2958 && (h->root.type == bfd_link_hash_undefweak
2959 || h->root.type == bfd_link_hash_undefined))))
2960 {
2961 /* Make sure this symbol is output as a dynamic symbol.
2962 Undefined weak syms won't yet be marked as dynamic. */
2963 if (h->dynindx == -1
d8045f23 2964 && ! h->forced_local
aec6b87e 2965 && ! resolved_to_zero
d8045f23
NC		 2966 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2967 return FALSE;
c434dee6
AJ		 2968
2969 /* If that succeeded, we know we'll be keeping all the
2970 relocs. */
2971 if (h->dynindx != -1)
2972 goto keep;
2973 }
2974
2975 eh->dyn_relocs = NULL;
04ebc307 2976 eh->func_pointer_refcount = 0;
c434dee6
AJ		 2977
2978 keep: ;
2979 }
2980
2981 /* Finally, allocate space. */
2982 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2983 {
e7c33416
NC		 2984 asection * sreloc;
2985
cbe950e9 2986 sreloc = elf_section_data (p->sec)->sreloc;
e7c33416
NC		 2987
2988 BFD_ASSERT (sreloc != NULL);
2989
351f65ca 2990 sreloc->size += p->count * bed->s->sizeof_rela;
c434dee6
AJ		 2991 }
2992
b34976b6 2993 return TRUE;
c434dee6
AJ		 2994}
2995
c25bc9fc
L		 2996/* Allocate space in .plt, .got and associated reloc sections for
2997 local dynamic relocs. */
2998
2999static bfd_boolean
351f65ca 3000elf_x86_64_allocate_local_dynrelocs (void **slot, void *inf)
c25bc9fc
L		 3001{
3002 struct elf_link_hash_entry *h
3003 = (struct elf_link_hash_entry *) *slot;
3004
3005 if (h->type != STT_GNU_IFUNC
3006 || !h->def_regular
3007 || !h->ref_regular
3008 || !h->forced_local
3009 || h->root.type != bfd_link_hash_defined)
3010 abort ();
3011
351f65ca 3012 return elf_x86_64_allocate_dynrelocs (h, inf);
c25bc9fc
L		 3013}
3014
c434dee6
AJ		 3015/* Find any dynamic relocs that apply to read-only sections. */
3016
b34976b6 3017static bfd_boolean
351f65ca
L		 3018elf_x86_64_readonly_dynrelocs (struct elf_link_hash_entry *h,
3019 void * inf)
c434dee6 3020{
351f65ca 3021 struct elf_x86_64_link_hash_entry *eh;
e03a8ed8 3022 struct elf_dyn_relocs *p;
c434dee6 3023
aa715242
L		 3024 /* Skip local IFUNC symbols. */
3025 if (h->forced_local && h->type == STT_GNU_IFUNC)
3026 return TRUE;
3027
351f65ca 3028 eh = (struct elf_x86_64_link_hash_entry *) h;
c434dee6
AJ		 3029 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3030 {
3031 asection *s = p->sec->output_section;
3032
3033 if (s != NULL && (s->flags & SEC_READONLY) != 0)
3034 {
3035 struct bfd_link_info *info = (struct bfd_link_info *) inf;
3036
3037 info->flags |= DF_TEXTREL;
3038
0e1862bb 3039 if ((info->warn_shared_textrel && bfd_link_pic (info))
1952c5cd
L		 3040 || info->error_textrel)
3041 info->callbacks->einfo (_("%P: %B: warning: relocation against `%s' in readonly section `%A'\n"),
b70321a2
L		 3042 p->sec->owner, h->root.root.string,
3043 p->sec);
3044
c434dee6 3045 /* Not an error, just cut short the traversal. */
b34976b6 3046 return FALSE;
c434dee6
AJ		 3047 }
3048 }
b34976b6 3049 return TRUE;
c434dee6
AJ		 3050}
3051
56ceb5b5 3052/* With the local symbol, foo, we convert
daa67607
L		 3053 mov foo@GOTPCREL(%rip), %reg
3054 to
3055 lea foo(%rip), %reg
56ceb5b5
L		 3056 and convert
3057 call/jmp *foo@GOTPCREL(%rip)
3058 to
3059 nop call foo/jmp foo nop
3060 When PIC is false, convert
3061 test %reg, foo@GOTPCREL(%rip)
3062 to
3063 test $foo, %reg
3064 and convert
3065 binop foo@GOTPCREL(%rip), %reg
3066 to
3067 binop $foo, %reg
3068 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
3069 instructions. */
daa67607
L		 3070
3071static bfd_boolean
56ceb5b5
L		 3072elf_x86_64_convert_load (bfd *abfd, asection *sec,
3073 struct bfd_link_info *link_info)
daa67607
L		 3074{
3075 Elf_Internal_Shdr *symtab_hdr;
3076 Elf_Internal_Rela *internal_relocs;
3077 Elf_Internal_Rela *irel, *irelend;
3078 bfd_byte *contents;
3079 struct elf_x86_64_link_hash_table *htab;
3080 bfd_boolean changed_contents;
3081 bfd_boolean changed_relocs;
3082 bfd_signed_vma *local_got_refcounts;
59cab532 3083 bfd_vma maxpagesize;
bae420ef
L		 3084 bfd_boolean is_pic;
3085 bfd_boolean require_reloc_pc32;
daa67607
L		 3086
3087 /* Don't even try to convert non-ELF outputs. */
3088 if (!is_elf_hash_table (link_info->hash))
3089 return FALSE;
3090
c1d11331 3091 /* Nothing to do if there is no need or no output. */
daa67607 3092 if ((sec->flags & (SEC_CODE | SEC_RELOC)) != (SEC_CODE | SEC_RELOC)
56ceb5b5 3093 || sec->need_convert_load == 0
c8831961 3094 || bfd_is_abs_section (sec->output_section))
daa67607
L		 3095 return TRUE;
3096
3097 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3098
3099 /* Load the relocations for this section. */
3100 internal_relocs = (_bfd_elf_link_read_relocs
3101 (abfd, sec, NULL, (Elf_Internal_Rela *) NULL,
3102 link_info->keep_memory));
3103 if (internal_relocs == NULL)
3104 return FALSE;
3105
3106 htab = elf_x86_64_hash_table (link_info);
3107 changed_contents = FALSE;
3108 changed_relocs = FALSE;
3109 local_got_refcounts = elf_local_got_refcounts (abfd);
59cab532 3110 maxpagesize = get_elf_backend_data (abfd)->maxpagesize;
daa67607
L		 3111
3112 /* Get the section contents. */
3113 if (elf_section_data (sec)->this_hdr.contents != NULL)
3114 contents = elf_section_data (sec)->this_hdr.contents;
3115 else
3116 {
3117 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
3118 goto error_return;
3119 }
3120
bae420ef
L		 3121 is_pic = bfd_link_pic (link_info);
3122
3123 /* TRUE if we can convert only to R_X86_64_PC32. Enable it for
3124 --no-relax. */
3125 require_reloc_pc32
3126 = link_info->disable_target_specific_optimizations > 1;
3127
daa67607
L		 3128 irelend = internal_relocs + sec->reloc_count;
3129 for (irel = internal_relocs; irel < irelend; irel++)
3130 {
3131 unsigned int r_type = ELF32_R_TYPE (irel->r_info);
3132 unsigned int r_symndx = htab->r_sym (irel->r_info);
3133 unsigned int indx;
3134 struct elf_link_hash_entry *h;
59cab532
L		 3135 asection *tsec;
3136 char symtype;
3137 bfd_vma toff, roff;
56ceb5b5 3138 bfd_signed_vma raddend;
dfc87947 3139 unsigned int opcode;
56ceb5b5 3140 unsigned int modrm;
bae420ef
L		 3141 bfd_boolean relocx;
3142 bfd_boolean to_reloc_pc32;
daa67607 3143
bae420ef
L		 3144 relocx = (r_type == R_X86_64_GOTPCRELX
3145 || r_type == R_X86_64_REX_GOTPCRELX);
3146 if (!relocx && r_type != R_X86_64_GOTPCREL)
daa67607
L		 3147 continue;
3148
59cab532 3149 roff = irel->r_offset;
56ceb5b5
L		 3150 if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
3151 continue;
59cab532 3152
56ceb5b5
L		 3153 raddend = irel->r_addend;
3154 /* Addend for 32-bit PC-relative relocation must be -4. */
3155 if (raddend != -4)
dfc87947
L		 3156 continue;
3157
3158 opcode = bfd_get_8 (abfd, contents + roff - 2);
3159
bae420ef 3160 /* Convert mov to lea since it has been done for a while. */
dfc87947 3161 if (opcode != 0x8b)
56ceb5b5
L		 3162 {
3163 /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
bae420ef
L		 3164 for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
3165 test, xor instructions. */
3166 if (!relocx)
56ceb5b5 3167 continue;
56ceb5b5 3168 }
59cab532 3169
bae420ef
L		 3170 /* We convert only to R_X86_64_PC32:
3171 1. Branch.
3172 2. R_X86_64_GOTPCREL since we can't modify REX byte.
3173 3. require_reloc_pc32 is true.
3174 4. PIC.
3175 */
3176 to_reloc_pc32 = (opcode == 0xff
3177 || !relocx
3178 || require_reloc_pc32
3179 || is_pic);
3180
daa67607
L		 3181 /* Get the symbol referred to by the reloc. */
3182 if (r_symndx < symtab_hdr->sh_info)
3183 {
3184 Elf_Internal_Sym *isym;
3185
3186 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
3187 abfd, r_symndx);
3188
59cab532
L		 3189 symtype = ELF_ST_TYPE (isym->st_info);
3190
56ceb5b5
L		 3191 /* STT_GNU_IFUNC must keep GOTPCREL relocations and skip
3192 relocation against undefined symbols. */
77697d41
L		 3193 if (symtype == STT_GNU_IFUNC || isym->st_shndx == SHN_UNDEF)
3194 continue;
59cab532 3195
77697d41
L		 3196 if (isym->st_shndx == SHN_ABS)
3197 tsec = bfd_abs_section_ptr;
3198 else if (isym->st_shndx == SHN_COMMON)
3199 tsec = bfd_com_section_ptr;
3200 else if (isym->st_shndx == SHN_X86_64_LCOMMON)
3201 tsec = &_bfd_elf_large_com_section;
3202 else
3203 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
3204
3205 h = NULL;
3206 toff = isym->st_value;
59cab532
L		 3207 }
3208 else
3209 {
3210 indx = r_symndx - symtab_hdr->sh_info;
3211 h = elf_sym_hashes (abfd)[indx];
3212 BFD_ASSERT (h != NULL);
3213
3214 while (h->root.type == bfd_link_hash_indirect
3215 || h->root.type == bfd_link_hash_warning)
3216 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3217
56ceb5b5
L		 3218 /* STT_GNU_IFUNC must keep GOTPCREL relocations. We also
3219 avoid optimizing GOTPCREL relocations againt _DYNAMIC
3220 since ld.so may use its link-time address. */
bae420ef
L		 3221 if (h->type == STT_GNU_IFUNC)
3222 continue;
3223
3224 /* Undefined weak symbol is only bound locally in executable
3225 and its reference is resolved as 0 without relocation
3226 overflow. We can only perform this optimization for
3227 GOTPCRELX relocations since we need to modify REX byte.
3228 It is OK convert mov with R_X86_64_GOTPCREL to
3229 R_X86_64_PC32. */
3230 if ((relocx || opcode == 0x8b)
3231 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (link_info,
3232 elf_x86_64_hash_entry (h)))
3233 {
3234 if (opcode == 0xff)
3235 {
3236 /* Skip for branch instructions since R_X86_64_PC32
3237 may overflow. */
3238 if (require_reloc_pc32)
3239 continue;
3240 }
3241 else if (relocx)
3242 {
3243 /* For non-branch instructions, we can convert to
3244 R_X86_64_32/R_X86_64_32S since we know if there
3245 is a REX byte. */
3246 to_reloc_pc32 = FALSE;
3247 }
3248
3249 /* Since we don't know the current PC when PIC is true,
3250 we can't convert to R_X86_64_PC32. */
3251 if (to_reloc_pc32 && is_pic)
3252 continue;
3253
3254 goto convert;
3255 }
3256 else if ((h->def_regular
3257 || h->root.type == bfd_link_hash_defined
3258 || h->root.type == bfd_link_hash_defweak)
3259 && h != htab->elf.hdynamic
3260 && SYMBOL_REFERENCES_LOCAL (link_info, h))
7b7e7f1d 3261 {
ead3d542 3262 /* bfd_link_hash_new or bfd_link_hash_undefined is
bae420ef
L		 3263 set by an assignment in a linker script in
3264 bfd_elf_record_link_assignment. */
ead3d542
L		 3265 if (h->def_regular
3266 && (h->root.type == bfd_link_hash_new
3267 || h->root.type == bfd_link_hash_undefined))
bae420ef
L		 3268 {
3269 /* Skip since R_X86_64_32/R_X86_64_32S may overflow. */
3270 if (require_reloc_pc32)
3271 continue;
3272 goto convert;
3273 }
7b7e7f1d
L		 3274 tsec = h->root.u.def.section;
3275 toff = h->root.u.def.value;
3276 symtype = h->type;
3277 }
77697d41
L		 3278 else
3279 continue;
59cab532
L		 3280 }
3281
bae420ef
L		 3282 /* We can only estimate relocation overflow for R_X86_64_PC32. */
3283 if (!to_reloc_pc32)
3284 goto convert;
3285
59cab532
L		 3286 if (tsec->sec_info_type == SEC_INFO_TYPE_MERGE)
3287 {
3288 /* At this stage in linking, no SEC_MERGE symbol has been
3289 adjusted, so all references to such symbols need to be
3290 passed through _bfd_merged_section_offset. (Later, in
3291 relocate_section, all SEC_MERGE symbols *except* for
3292 section symbols have been adjusted.)
3293
3294 gas may reduce relocations against symbols in SEC_MERGE
3295 sections to a relocation against the section symbol when
3296 the original addend was zero. When the reloc is against
3297 a section symbol we should include the addend in the
3298 offset passed to _bfd_merged_section_offset, since the
3299 location of interest is the original symbol. On the
3300 other hand, an access to "sym+addend" where "sym" is not
3301 a section symbol should not include the addend; Such an
3302 access is presumed to be an offset from "sym"; The
3303 location of interest is just "sym". */
3304 if (symtype == STT_SECTION)
56ceb5b5 3305 toff += raddend;
59cab532
L		 3306
3307 toff = _bfd_merged_section_offset (abfd, &tsec,
3308 elf_section_data (tsec)->sec_info,
3309 toff);
3310
3311 if (symtype != STT_SECTION)
56ceb5b5 3312 toff += raddend;
59cab532
L		 3313 }
3314 else
56ceb5b5 3315 toff += raddend;
59cab532
L		 3316
3317 /* Don't convert if R_X86_64_PC32 relocation overflows. */
3318 if (tsec->output_section == sec->output_section)
3319 {
3320 if ((toff - roff + 0x80000000) > 0xffffffff)
3321 continue;
3322 }
3323 else
3324 {
4a539596 3325 bfd_signed_vma distance;
59cab532
L		 3326
3327 /* At this point, we don't know the load addresses of TSEC
3328 section nor SEC section. We estimate the distrance between
fb06f1c0 3329 SEC and TSEC. We store the estimated distances in the
4a539596
L		 3330 compressed_size field of the output section, which is only
3331 used to decompress the compressed input section. */
3332 if (sec->output_section->compressed_size == 0)
59cab532 3333 {
4a539596
L		 3334 asection *asect;
3335 bfd_size_type size = 0;
3336 for (asect = link_info->output_bfd->sections;
3337 asect != NULL;
3338 asect = asect->next)
59cab532 3339 {
4a539596
L		 3340 asection *i;
3341 for (i = asect->map_head.s;
3342 i != NULL;
3343 i = i->map_head.s)
3344 {
3345 size = align_power (size, i->alignment_power);
3346 size += i->size;
3347 }
3348 asect->compressed_size = size;
59cab532 3349 }
daa67607 3350 }
59cab532 3351
56ceb5b5
L		 3352 /* Don't convert GOTPCREL relocations if TSEC isn't placed
3353 after SEC. */
4a539596
L		 3354 distance = (tsec->output_section->compressed_size
3355 - sec->output_section->compressed_size);
3356 if (distance < 0)
59cab532
L		 3357 continue;
3358
3359 /* Take PT_GNU_RELRO segment into account by adding
3360 maxpagesize. */
4a539596 3361 if ((toff + distance + maxpagesize - roff + 0x80000000)
59cab532
L		 3362 > 0xffffffff)
3363 continue;
daa67607
L		 3364 }
3365
7b7e7f1d 3366convert:
56ceb5b5
L		 3367 if (opcode == 0xff)
3368 {
3369 /* We have "call/jmp *foo@GOTPCREL(%rip)". */
3370 unsigned int nop;
caa65211 3371 unsigned int disp;
56ceb5b5
L		 3372 bfd_vma nop_offset;
3373
3374 /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
3375 R_X86_64_PC32. */
3376 modrm = bfd_get_8 (abfd, contents + roff - 1);
3377 if (modrm == 0x25)
3378 {
56ceb5b5
L		 3379 /* Convert to "jmp foo nop". */
3380 modrm = 0xe9;
3381 nop = NOP_OPCODE;
3382 nop_offset = irel->r_offset + 3;
3383 disp = bfd_get_32 (abfd, contents + irel->r_offset);
3384 irel->r_offset -= 1;
3385 bfd_put_32 (abfd, disp, contents + irel->r_offset);
3386 }
3387 else
3388 {
3389 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
3390 is a nop prefix. */
3391 modrm = 0xe8;
caa65211
L		 3392 nop = link_info->call_nop_byte;
3393 if (link_info->call_nop_as_suffix)
3394 {
3395 nop_offset = irel->r_offset + 3;
3396 disp = bfd_get_32 (abfd, contents + irel->r_offset);
3397 irel->r_offset -= 1;
3398 bfd_put_32 (abfd, disp, contents + irel->r_offset);
3399 }
3400 else
3401 nop_offset = irel->r_offset - 2;
56ceb5b5
L		 3402 }
3403 bfd_put_8 (abfd, nop, contents + nop_offset);
3404 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
3405 r_type = R_X86_64_PC32;
3406 }
3407 else
3408 {
bae420ef
L		 3409 unsigned int rex;
3410 unsigned int rex_mask = REX_R;
3411
3412 if (r_type == R_X86_64_REX_GOTPCRELX)
3413 rex = bfd_get_8 (abfd, contents + roff - 3);
3414 else
3415 rex = 0;
3416
56ceb5b5
L		 3417 if (opcode == 0x8b)
3418 {
bae420ef
L		 3419 if (to_reloc_pc32)
3420 {
3421 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
3422 "lea foo(%rip), %reg". */
3423 opcode = 0x8d;
3424 r_type = R_X86_64_PC32;
3425 }
3426 else
3427 {
3428 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
3429 "mov $foo, %reg". */
3430 opcode = 0xc7;
3431 modrm = bfd_get_8 (abfd, contents + roff - 1);
3432 modrm = 0xc0 | (modrm & 0x38) >> 3;
3433 if ((rex & REX_W) != 0
3434 && ABI_64_P (link_info->output_bfd))
3435 {
3436 /* Keep the REX_W bit in REX byte for LP64. */
3437 r_type = R_X86_64_32S;
3438 goto rewrite_modrm_rex;
3439 }
3440 else
3441 {
3442 /* If the REX_W bit in REX byte isn't needed,
3443 use R_X86_64_32 and clear the W bit to avoid
3444 sign-extend imm32 to imm64. */
3445 r_type = R_X86_64_32;
3446 /* Clear the W bit in REX byte. */
3447 rex_mask |= REX_W;
3448 goto rewrite_modrm_rex;
3449 }
3450 }
56ceb5b5
L		 3451 }
3452 else
3453 {
bae420ef
L		 3454 /* R_X86_64_PC32 isn't supported. */
3455 if (to_reloc_pc32)
3456 continue;
3457
56ceb5b5
L		 3458 modrm = bfd_get_8 (abfd, contents + roff - 1);
3459 if (opcode == 0x85)
3460 {
3461 /* Convert "test %reg, foo@GOTPCREL(%rip)" to
3462 "test $foo, %reg". */
3463 modrm = 0xc0 | (modrm & 0x38) >> 3;
3464 opcode = 0xf7;
3465 }
3466 else
3467 {
3468 /* Convert "binop foo@GOTPCREL(%rip), %reg" to
3469 "binop $foo, %reg". */
3470 modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
3471 opcode = 0x81;
3472 }
bae420ef
L		 3473
3474 /* Use R_X86_64_32 with 32-bit operand to avoid relocation
3475 overflow when sign-extending imm32 to imm64. */
3476 r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
3477
3478rewrite_modrm_rex:
56ceb5b5
L		 3479 bfd_put_8 (abfd, modrm, contents + roff - 1);
3480
bae420ef 3481 if (rex)
56ceb5b5
L		 3482 {
3483 /* Move the R bit to the B bit in REX byte. */
bae420ef 3484 rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
56ceb5b5
L		 3485 bfd_put_8 (abfd, rex, contents + roff - 3);
3486 }
bae420ef
L		 3487
3488 /* No addend for R_X86_64_32/R_X86_64_32S relocations. */
56ceb5b5 3489 irel->r_addend = 0;
56ceb5b5
L		 3490 }
3491
3492 bfd_put_8 (abfd, opcode, contents + roff - 2);
3493 }
3494
3495 irel->r_info = htab->r_info (r_symndx, r_type);
59cab532
L		 3496 changed_contents = TRUE;
3497 changed_relocs = TRUE;
3498
77697d41 3499 if (h)
59cab532 3500 {
77697d41
L		 3501 if (h->got.refcount > 0)
3502 h->got.refcount -= 1;
59cab532
L		 3503 }
3504 else
daa67607 3505 {
77697d41
L		 3506 if (local_got_refcounts != NULL
3507 && local_got_refcounts[r_symndx] > 0)
3508 local_got_refcounts[r_symndx] -= 1;
daa67607
L		 3509 }
3510 }
3511
3512 if (contents != NULL
3513 && elf_section_data (sec)->this_hdr.contents != contents)
3514 {
3515 if (!changed_contents && !link_info->keep_memory)
3516 free (contents);
3517 else
3518 {
3519 /* Cache the section contents for elf_link_input_bfd. */
3520 elf_section_data (sec)->this_hdr.contents = contents;
3521 }
3522 }
3523
3524 if (elf_section_data (sec)->relocs != internal_relocs)
3525 {
3526 if (!changed_relocs)
3527 free (internal_relocs);
3528 else
3529 elf_section_data (sec)->relocs = internal_relocs;
3530 }
3531
3532 return TRUE;
3533
3534 error_return:
3535 if (contents != NULL
3536 && elf_section_data (sec)->this_hdr.contents != contents)
3537 free (contents);
3538 if (internal_relocs != NULL
3539 && elf_section_data (sec)->relocs != internal_relocs)
3540 free (internal_relocs);
3541 return FALSE;
3542}
3543
70256ad8
AJ		 3544/* Set the sizes of the dynamic sections. */
3545
b34976b6 3546static bfd_boolean
351f65ca
L		 3547elf_x86_64_size_dynamic_sections (bfd *output_bfd,
3548 struct bfd_link_info *info)
70256ad8 3549{
351f65ca 3550 struct elf_x86_64_link_hash_table *htab;
70256ad8
AJ		 3551 bfd *dynobj;
3552 asection *s;
b34976b6 3553 bfd_boolean relocs;
c434dee6 3554 bfd *ibfd;
351f65ca 3555 const struct elf_backend_data *bed;
70256ad8 3556
351f65ca 3557 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 3558 if (htab == NULL)
3559 return FALSE;
351f65ca 3560 bed = get_elf_backend_data (output_bfd);
4dfe6ac6 3561
c434dee6
AJ		 3562 dynobj = htab->elf.dynobj;
3563 if (dynobj == NULL)
3564 abort ();
70256ad8 3565
c434dee6 3566 if (htab->elf.dynamic_sections_created)
70256ad8
AJ		 3567 {
3568 /* Set the contents of the .interp section to the interpreter. */
9b8b325a 3569 if (bfd_link_executable (info) && !info->nointerp)
70256ad8 3570 {
3d4d4302 3571 s = bfd_get_linker_section (dynobj, ".interp");
c434dee6
AJ		 3572 if (s == NULL)
3573 abort ();
351f65ca
L		 3574 s->size = htab->dynamic_interpreter_size;
3575 s->contents = (unsigned char *) htab->dynamic_interpreter;
aec6b87e 3576 htab->interp = s;
70256ad8
AJ		 3577 }
3578 }
70256ad8 3579
c434dee6
AJ		 3580 /* Set up .got offsets for local syms, and space for local dynamic
3581 relocs. */
c72f2fb2 3582 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
70256ad8 3583 {
c434dee6
AJ		 3584 bfd_signed_vma *local_got;
3585 bfd_signed_vma *end_local_got;
bffbf940 3586 char *local_tls_type;
67a4f2b7 3587 bfd_vma *local_tlsdesc_gotent;
c434dee6
AJ		 3588 bfd_size_type locsymcount;
3589 Elf_Internal_Shdr *symtab_hdr;
3590 asection *srel;
70256ad8 3591
0ffa91dd 3592 if (! is_x86_64_elf (ibfd))
70256ad8
AJ		 3593 continue;
3594
c434dee6 3595 for (s = ibfd->sections; s != NULL; s = s->next)
70256ad8 3596 {
e03a8ed8 3597 struct elf_dyn_relocs *p;
c434dee6 3598
56ceb5b5 3599 if (!elf_x86_64_convert_load (ibfd, s, info))
daa67607
L		 3600 return FALSE;
3601
e03a8ed8 3602 for (p = (struct elf_dyn_relocs *)
e81d3500 3603 (elf_section_data (s)->local_dynrel);
c434dee6
AJ		 3604 p != NULL;
3605 p = p->next)
70256ad8 3606 {
c434dee6
AJ		 3607 if (!bfd_is_abs_section (p->sec)
3608 && bfd_is_abs_section (p->sec->output_section))
3609 {
3610 /* Input section has been discarded, either because
3611 it is a copy of a linkonce section or due to
3612 linker script /DISCARD/, so we'll be discarding
3613 the relocs too. */
3614 }
3615 else if (p->count != 0)
3616 {
3617 srel = elf_section_data (p->sec)->sreloc;
351f65ca 3618 srel->size += p->count * bed->s->sizeof_rela;
4b819e1f
L		 3619 if ((p->sec->output_section->flags & SEC_READONLY) != 0
3620 && (info->flags & DF_TEXTREL) == 0)
b70321a2
L		 3621 {
3622 info->flags |= DF_TEXTREL;
0e1862bb 3623 if ((info->warn_shared_textrel && bfd_link_pic (info))
1952c5cd
L		 3624 || info->error_textrel)
3625 info->callbacks->einfo (_("%P: %B: warning: relocation in readonly section `%A'\n"),
b70321a2 3626 p->sec->owner, p->sec);
b70321a2 3627 }
c434dee6 3628 }
70256ad8
AJ		 3629 }
3630 }
c434dee6
AJ		 3631
3632 local_got = elf_local_got_refcounts (ibfd);
3633 if (!local_got)
3634 continue;
3635
0ffa91dd 3636 symtab_hdr = &elf_symtab_hdr (ibfd);
c434dee6
AJ		 3637 locsymcount = symtab_hdr->sh_info;
3638 end_local_got = local_got + locsymcount;
351f65ca
L		 3639 local_tls_type = elf_x86_64_local_got_tls_type (ibfd);
3640 local_tlsdesc_gotent = elf_x86_64_local_tlsdesc_gotent (ibfd);
6de2ae4a
L		 3641 s = htab->elf.sgot;
3642 srel = htab->elf.srelgot;
67a4f2b7
AO		 3643 for (; local_got < end_local_got;
3644 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
70256ad8 3645 {
67a4f2b7 3646 *local_tlsdesc_gotent = (bfd_vma) -1;
c434dee6 3647 if (*local_got > 0)
70256ad8 3648 {
67a4f2b7
AO		 3649 if (GOT_TLS_GDESC_P (*local_tls_type))
3650 {
6de2ae4a 3651 *local_tlsdesc_gotent = htab->elf.sgotplt->size
351f65ca 3652 - elf_x86_64_compute_jump_table_size (htab);
6de2ae4a 3653 htab->elf.sgotplt->size += 2 * GOT_ENTRY_SIZE;
67a4f2b7
AO		 3654 *local_got = (bfd_vma) -2;
3655 }
3656 if (! GOT_TLS_GDESC_P (*local_tls_type)
3657 || GOT_TLS_GD_P (*local_tls_type))
3658 {
3659 *local_got = s->size;
3660 s->size += GOT_ENTRY_SIZE;
3661 if (GOT_TLS_GD_P (*local_tls_type))
3662 s->size += GOT_ENTRY_SIZE;
3663 }
0e1862bb 3664 if (bfd_link_pic (info)
67a4f2b7 3665 || GOT_TLS_GD_ANY_P (*local_tls_type)
bffbf940 3666 || *local_tls_type == GOT_TLS_IE)
67a4f2b7
AO		 3667 {
3668 if (GOT_TLS_GDESC_P (*local_tls_type))
3669 {
6de2ae4a 3670 htab->elf.srelplt->size
351f65ca 3671 += bed->s->sizeof_rela;
67a4f2b7
AO		 3672 htab->tlsdesc_plt = (bfd_vma) -1;
3673 }
3674 if (! GOT_TLS_GDESC_P (*local_tls_type)
3675 || GOT_TLS_GD_P (*local_tls_type))
351f65ca 3676 srel->size += bed->s->sizeof_rela;
67a4f2b7 3677 }
70256ad8
AJ		 3678 }
3679 else
c434dee6
AJ		 3680 *local_got = (bfd_vma) -1;
3681 }
3682 }
70256ad8 3683
bffbf940
JJ		 3684 if (htab->tls_ld_got.refcount > 0)
3685 {
3686 /* Allocate 2 got entries and 1 dynamic reloc for R_X86_64_TLSLD
3687 relocs. */
6de2ae4a
L		 3688 htab->tls_ld_got.offset = htab->elf.sgot->size;
3689 htab->elf.sgot->size += 2 * GOT_ENTRY_SIZE;
351f65ca 3690 htab->elf.srelgot->size += bed->s->sizeof_rela;
bffbf940
JJ		 3691 }
3692 else
3693 htab->tls_ld_got.offset = -1;
3694
c434dee6
AJ		 3695 /* Allocate global sym .plt and .got entries, and space for global
3696 sym dynamic relocs. */
351f65ca 3697 elf_link_hash_traverse (&htab->elf, elf_x86_64_allocate_dynrelocs,
eb4ff4d6 3698 info);
c434dee6 3699
c25bc9fc
L		 3700 /* Allocate .plt and .got entries, and space for local symbols. */
3701 htab_traverse (htab->loc_hash_table,
351f65ca 3702 elf_x86_64_allocate_local_dynrelocs,
c25bc9fc
L		 3703 info);
3704
67a4f2b7
AO		 3705 /* For every jump slot reserved in the sgotplt, reloc_count is
3706 incremented. However, when we reserve space for TLS descriptors,
3707 it's not incremented, so in order to compute the space reserved
3708 for them, it suffices to multiply the reloc count by the jump
e1f98742
L		 3709 slot size.
3710
3711 PR ld/13302: We start next_irelative_index at the end of .rela.plt
3712 so that R_X86_64_IRELATIVE entries come last. */
6de2ae4a 3713 if (htab->elf.srelplt)
e1f98742
L		 3714 {
3715 htab->sgotplt_jump_table_size
3716 = elf_x86_64_compute_jump_table_size (htab);
3717 htab->next_irelative_index = htab->elf.srelplt->reloc_count - 1;
3718 }
3719 else if (htab->elf.irelplt)
3720 htab->next_irelative_index = htab->elf.irelplt->reloc_count - 1;
67a4f2b7
AO		 3721
3722 if (htab->tlsdesc_plt)
3723 {
3724 /* If we're not using lazy TLS relocations, don't generate the
3725 PLT and GOT entries they require. */
3726 if ((info->flags & DF_BIND_NOW))
3727 htab->tlsdesc_plt = 0;
3728 else
3729 {
6de2ae4a
L		 3730 htab->tlsdesc_got = htab->elf.sgot->size;
3731 htab->elf.sgot->size += GOT_ENTRY_SIZE;
67a4f2b7
AO		 3732 /* Reserve room for the initial entry.
3733 FIXME: we could probably do away with it in this case. */
6de2ae4a 3734 if (htab->elf.splt->size == 0)
eed180f8 3735 htab->elf.splt->size += GET_PLT_ENTRY_SIZE (output_bfd);
6de2ae4a 3736 htab->tlsdesc_plt = htab->elf.splt->size;
eed180f8 3737 htab->elf.splt->size += GET_PLT_ENTRY_SIZE (output_bfd);
67a4f2b7
AO		 3738 }
3739 }
3740
a7b16ceb
L		 3741 if (htab->elf.sgotplt)
3742 {
3743 /* Don't allocate .got.plt section if there are no GOT nor PLT
eed180f8 3744 entries and there is no refeence to _GLOBAL_OFFSET_TABLE_. */
9d4b2dba
L		 3745 if ((htab->elf.hgot == NULL
3746 || !htab->elf.hgot->ref_regular_nonweak)
e28df02b
L		 3747 && (htab->elf.sgotplt->size
3748 == get_elf_backend_data (output_bfd)->got_header_size)
a7b16ceb
L		 3749 && (htab->elf.splt == NULL
3750 || htab->elf.splt->size == 0)
3751 && (htab->elf.sgot == NULL
3752 || htab->elf.sgot->size == 0)
3753 && (htab->elf.iplt == NULL
3754 || htab->elf.iplt->size == 0)
3755 && (htab->elf.igotplt == NULL
3756 || htab->elf.igotplt->size == 0))
3757 htab->elf.sgotplt->size = 0;
3758 }
3759
9a2a56cc
AM		 3760 if (htab->plt_eh_frame != NULL
3761 && htab->elf.splt != NULL
3762 && htab->elf.splt->size != 0
3763 && !bfd_is_abs_section (htab->elf.splt->output_section)
3764 && _bfd_elf_eh_frame_present (info))
3765 {
3766 const struct elf_x86_64_backend_data *arch_data
f8222080 3767 = get_elf_x86_64_arch_data (bed);
9a2a56cc
AM		 3768 htab->plt_eh_frame->size = arch_data->eh_frame_plt_size;
3769 }
3770
c434dee6
AJ		 3771 /* We now have determined the sizes of the various dynamic sections.
3772 Allocate memory for them. */
b34976b6 3773 relocs = FALSE;
c434dee6
AJ		 3774 for (s = dynobj->sections; s != NULL; s = s->next)
3775 {
3776 if ((s->flags & SEC_LINKER_CREATED) == 0)
3777 continue;
3778
6de2ae4a
L		 3779 if (s == htab->elf.splt
3780 || s == htab->elf.sgot
3781 || s == htab->elf.sgotplt
3782 || s == htab->elf.iplt
3783 || s == htab->elf.igotplt
0ff2b86e 3784 || s == htab->plt_bnd
dd7e64d4 3785 || s == htab->plt_got
9a2a56cc 3786 || s == htab->plt_eh_frame
75ff4589 3787 || s == htab->sdynbss)
c434dee6
AJ		 3788 {
3789 /* Strip this section if we don't need it; see the
3790 comment below. */
3791 }
0112cd26 3792 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
c434dee6 3793 {
6de2ae4a 3794 if (s->size != 0 && s != htab->elf.srelplt)
b34976b6 3795 relocs = TRUE;
c434dee6
AJ		 3796
3797 /* We use the reloc_count field as a counter if we need
3798 to copy relocs into the output file. */
6de2ae4a 3799 if (s != htab->elf.srelplt)
67a4f2b7 3800 s->reloc_count = 0;
70256ad8 3801 }
c434dee6 3802 else
70256ad8
AJ		 3803 {
3804 /* It's not one of our sections, so don't allocate space. */
3805 continue;
3806 }
3807
eea6121a 3808 if (s->size == 0)
70256ad8 3809 {
c434dee6
AJ		 3810 /* If we don't need this section, strip it from the
3811 output file. This is mostly to handle .rela.bss and
3812 .rela.plt. We must create both sections in
3813 create_dynamic_sections, because they must be created
3814 before the linker maps input sections to output
3815 sections. The linker does that before
3816 adjust_dynamic_symbol is called, and it is that
3817 function which decides whether anything needs to go
3818 into these sections. */
3819
8423293d 3820 s->flags |= SEC_EXCLUDE;
70256ad8
AJ		 3821 continue;
3822 }
3823
c456f082
AM		 3824 if ((s->flags & SEC_HAS_CONTENTS) == 0)
3825 continue;
3826
70256ad8
AJ		 3827 /* Allocate memory for the section contents. We use bfd_zalloc
3828 here in case unused entries are not reclaimed before the
3829 section's contents are written out. This should not happen,
3830 but this way if it does, we get a R_X86_64_NONE reloc instead
3831 of garbage. */
eea6121a 3832 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
c434dee6 3833 if (s->contents == NULL)
b34976b6 3834 return FALSE;
70256ad8
AJ		 3835 }
3836
e41b3a13 3837 if (htab->plt_eh_frame != NULL
9a2a56cc
AM		 3838 && htab->plt_eh_frame->contents != NULL)
3839 {
3840 const struct elf_x86_64_backend_data *arch_data
f8222080 3841 = get_elf_x86_64_arch_data (bed);
9a2a56cc
AM		 3842
3843 memcpy (htab->plt_eh_frame->contents,
3844 arch_data->eh_frame_plt, htab->plt_eh_frame->size);
3845 bfd_put_32 (dynobj, htab->elf.splt->size,
3846 htab->plt_eh_frame->contents + PLT_FDE_LEN_OFFSET);
3847 }
e41b3a13 3848
c434dee6 3849 if (htab->elf.dynamic_sections_created)
70256ad8
AJ		 3850 {
3851 /* Add some entries to the .dynamic section. We fill in the
351f65ca 3852 values later, in elf_x86_64_finish_dynamic_sections, but we
70256ad8 3853 must add the entries now so that we get the correct size for
407443a3 3854 the .dynamic section. The DT_DEBUG entry is filled in by the
70256ad8 3855 dynamic linker and used by the debugger. */
dc810e39 3856#define add_dynamic_entry(TAG, VAL) \
5a580b3a 3857 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 3858
0e1862bb 3859 if (bfd_link_executable (info))
70256ad8 3860 {
dc810e39 3861 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 3862 return FALSE;
70256ad8
AJ		 3863 }
3864
6de2ae4a 3865 if (htab->elf.splt->size != 0)
70256ad8 3866 {
7c1e8d3e
L		 3867 /* DT_PLTGOT is used by prelink even if there is no PLT
3868 relocation. */
3869 if (!add_dynamic_entry (DT_PLTGOT, 0))
b34976b6 3870 return FALSE;
67a4f2b7 3871
7c1e8d3e
L		 3872 if (htab->elf.srelplt->size != 0)
3873 {
3874 if (!add_dynamic_entry (DT_PLTRELSZ, 0)
3875 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3876 || !add_dynamic_entry (DT_JMPREL, 0))
3877 return FALSE;
3878 }
3879
67a4f2b7
AO		 3880 if (htab->tlsdesc_plt
3881 && (!add_dynamic_entry (DT_TLSDESC_PLT, 0)
3882 || !add_dynamic_entry (DT_TLSDESC_GOT, 0)))
3883 return FALSE;
70256ad8
AJ		 3884 }
3885
3886 if (relocs)
3887 {
dc810e39
AM		 3888 if (!add_dynamic_entry (DT_RELA, 0)
3889 || !add_dynamic_entry (DT_RELASZ, 0)
351f65ca 3890 || !add_dynamic_entry (DT_RELAENT, bed->s->sizeof_rela))
b34976b6 3891 return FALSE;
70256ad8 3892
c434dee6
AJ		 3893 /* If any dynamic relocs apply to a read-only section,
3894 then we need a DT_TEXTREL entry. */
3895 if ((info->flags & DF_TEXTREL) == 0)
eed180f8 3896 elf_link_hash_traverse (&htab->elf,
351f65ca 3897 elf_x86_64_readonly_dynrelocs,
eb4ff4d6 3898 info);
c434dee6
AJ		 3899
3900 if ((info->flags & DF_TEXTREL) != 0)
3901 {
8efa2874
L		 3902 if ((elf_tdata (output_bfd)->has_gnu_symbols
3903 & elf_gnu_symbol_ifunc) == elf_gnu_symbol_ifunc)
3904 {
3905 info->callbacks->einfo
3906 (_("%P%X: read-only segment has dynamic IFUNC relocations; recompile with -fPIC\n"));
3907 bfd_set_error (bfd_error_bad_value);
3908 return FALSE;
3909 }
3910
c434dee6 3911 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 3912 return FALSE;
c434dee6 3913 }
70256ad8
AJ		 3914 }
3915 }
dc810e39 3916#undef add_dynamic_entry
70256ad8 3917
b34976b6 3918 return TRUE;
70256ad8
AJ		 3919}
3920
67a4f2b7 3921static bfd_boolean
351f65ca
L		 3922elf_x86_64_always_size_sections (bfd *output_bfd,
3923 struct bfd_link_info *info)
67a4f2b7
AO		 3924{
3925 asection *tls_sec = elf_hash_table (info)->tls_sec;
3926
3927 if (tls_sec)
3928 {
3929 struct elf_link_hash_entry *tlsbase;
3930
3931 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
3932 "_TLS_MODULE_BASE_",
3933 FALSE, FALSE, FALSE);
3934
3935 if (tlsbase && tlsbase->type == STT_TLS)
3936 {
351f65ca 3937 struct elf_x86_64_link_hash_table *htab;
67a4f2b7
AO		 3938 struct bfd_link_hash_entry *bh = NULL;
3939 const struct elf_backend_data *bed
3940 = get_elf_backend_data (output_bfd);
3941
351f65ca 3942 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 3943 if (htab == NULL)
3944 return FALSE;
3945
67a4f2b7
AO		 3946 if (!(_bfd_generic_link_add_one_symbol
3947 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
3948 tls_sec, 0, NULL, FALSE,
3949 bed->collect, &bh)))
3950 return FALSE;
9f03412a 3951
4dfe6ac6 3952 htab->tls_module_base = bh;
9f03412a 3953
67a4f2b7
AO		 3954 tlsbase = (struct elf_link_hash_entry *)bh;
3955 tlsbase->def_regular = 1;
3956 tlsbase->other = STV_HIDDEN;
576fa883 3957 tlsbase->root.linker_def = 1;
67a4f2b7
AO		 3958 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
3959 }
3960 }
3961
3962 return TRUE;
3963}
3964
9f03412a
AO		 3965/* _TLS_MODULE_BASE_ needs to be treated especially when linking
3966 executables. Rather than setting it to the beginning of the TLS
3967 section, we have to set it to the end. This function may be called
3968 multiple times, it is idempotent. */
3969
3970static void
351f65ca 3971elf_x86_64_set_tls_module_base (struct bfd_link_info *info)
9f03412a 3972{
351f65ca 3973 struct elf_x86_64_link_hash_table *htab;
9f03412a
AO		 3974 struct bfd_link_hash_entry *base;
3975
0e1862bb 3976 if (!bfd_link_executable (info))
9f03412a
AO		 3977 return;
3978
351f65ca 3979 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 3980 if (htab == NULL)
3981 return;
9f03412a 3982
4dfe6ac6
NC		 3983 base = htab->tls_module_base;
3984 if (base == NULL)
9f03412a
AO		 3985 return;
3986
4dfe6ac6 3987 base->u.def.value = htab->elf.tls_size;
9f03412a
AO		 3988}
3989
bffbf940
JJ		 3990/* Return the base VMA address which should be subtracted from real addresses
3991 when resolving @dtpoff relocation.
3992 This is PT_TLS segment p_vaddr. */
3993
3994static bfd_vma
351f65ca 3995elf_x86_64_dtpoff_base (struct bfd_link_info *info)
bffbf940 3996{
e1918d23
AM		 3997 /* If tls_sec is NULL, we should have signalled an error already. */
3998 if (elf_hash_table (info)->tls_sec == NULL)
bffbf940 3999 return 0;
e1918d23 4000 return elf_hash_table (info)->tls_sec->vma;
bffbf940
JJ		 4001}
4002
4003/* Return the relocation value for @tpoff relocation
4004 if STT_TLS virtual address is ADDRESS. */
4005
4006static bfd_vma
351f65ca 4007elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
bffbf940 4008{
e1918d23 4009 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO		 4010 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
4011 bfd_vma static_tls_size;
bffbf940
JJ		 4012
4013 /* If tls_segment is NULL, we should have signalled an error already. */
e1918d23 4014 if (htab->tls_sec == NULL)
bffbf940 4015 return 0;
7dc98aea
RO		 4016
4017 /* Consider special static TLS alignment requirements. */
4018 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
4019 return address - static_tls_size - htab->tls_sec->vma;
bffbf940
JJ		 4020}
4021
90f487df
L		 4022/* Is the instruction before OFFSET in CONTENTS a 32bit relative
4023 branch? */
4024
4025static bfd_boolean
4026is_32bit_relative_branch (bfd_byte *contents, bfd_vma offset)
4027{
4028 /* Opcode Instruction
4029 0xe8 call
4030 0xe9 jump
4031 0x0f 0x8x conditional jump */
4032 return ((offset > 0
4033 && (contents [offset - 1] == 0xe8
4034 || contents [offset - 1] == 0xe9))
4035 || (offset > 1
4036 && contents [offset - 2] == 0x0f
4037 && (contents [offset - 1] & 0xf0) == 0x80));
4038}
4039
ef77d6af
L		 4040static bfd_boolean
4041elf_x86_64_need_pic (bfd *input_bfd, struct elf_link_hash_entry *h,
4042 reloc_howto_type *howto)
4043{
4044 const char *fmt;
4045 const char *v;
4046 const char *pic = "";
4047
4048 switch (ELF_ST_VISIBILITY (h->other))
4049 {
4050 case STV_HIDDEN:
4051 v = _("hidden symbol");
4052 break;
4053 case STV_INTERNAL:
4054 v = _("internal symbol");
4055 break;
4056 case STV_PROTECTED:
4057 v = _("protected symbol");
4058 break;
4059 default:
4060 v = _("symbol");
4061 pic = _("; recompile with -fPIC");
4062 break;
4063 }
4064
4065 if (h->def_regular)
4066 fmt = _("%B: relocation %s against %s `%s' can not be used when making a shared object%s");
4067 else
4068 fmt = _("%B: relocation %s against undefined %s `%s' can not be used when making a shared object%s");
4069
4070 (*_bfd_error_handler) (fmt, input_bfd, howto->name,
4071 v, h->root.root.string, pic);
4072 bfd_set_error (bfd_error_bad_value);
4073 return FALSE;
4074}
4075
8d88c4ca
NC		 4076/* Relocate an x86_64 ELF section. */
4077
b34976b6 4078static bfd_boolean
351f65ca
L		 4079elf_x86_64_relocate_section (bfd *output_bfd,
4080 struct bfd_link_info *info,
4081 bfd *input_bfd,
4082 asection *input_section,
4083 bfd_byte *contents,
4084 Elf_Internal_Rela *relocs,
4085 Elf_Internal_Sym *local_syms,
4086 asection **local_sections)
8d88c4ca 4087{
351f65ca 4088 struct elf_x86_64_link_hash_table *htab;
8d88c4ca
NC		 4089 Elf_Internal_Shdr *symtab_hdr;
4090 struct elf_link_hash_entry **sym_hashes;
4091 bfd_vma *local_got_offsets;
67a4f2b7 4092 bfd_vma *local_tlsdesc_gotents;
c434dee6 4093 Elf_Internal_Rela *rel;
60f2e42e 4094 Elf_Internal_Rela *wrel;
8d88c4ca 4095 Elf_Internal_Rela *relend;
eed180f8 4096 const unsigned int plt_entry_size = GET_PLT_ENTRY_SIZE (info->output_bfd);
8d88c4ca 4097
0ffa91dd
NC		 4098 BFD_ASSERT (is_x86_64_elf (input_bfd));
4099
351f65ca 4100 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 4101 if (htab == NULL)
4102 return FALSE;
0ffa91dd 4103 symtab_hdr = &elf_symtab_hdr (input_bfd);
8d88c4ca
NC		 4104 sym_hashes = elf_sym_hashes (input_bfd);
4105 local_got_offsets = elf_local_got_offsets (input_bfd);
351f65ca 4106 local_tlsdesc_gotents = elf_x86_64_local_tlsdesc_gotent (input_bfd);
8d88c4ca 4107
351f65ca 4108 elf_x86_64_set_tls_module_base (info);
9f03412a 4109
60f2e42e 4110 rel = wrel = relocs;
8d88c4ca 4111 relend = relocs + input_section->reloc_count;
60f2e42e 4112 for (; rel < relend; wrel++, rel++)
8d88c4ca 4113 {
bffbf940 4114 unsigned int r_type;
8d88c4ca
NC		 4115 reloc_howto_type *howto;
4116 unsigned long r_symndx;
4117 struct elf_link_hash_entry *h;
0ff2b86e 4118 struct elf_x86_64_link_hash_entry *eh;
8d88c4ca
NC		 4119 Elf_Internal_Sym *sym;
4120 asection *sec;
0ff2b86e 4121 bfd_vma off, offplt, plt_offset;
8d88c4ca 4122 bfd_vma relocation;
b34976b6 4123 bfd_boolean unresolved_reloc;
8d88c4ca 4124 bfd_reloc_status_type r;
bffbf940 4125 int tls_type;
0ff2b86e 4126 asection *base_got, *resolved_plt;
1788fc08 4127 bfd_vma st_size;
aec6b87e 4128 bfd_boolean resolved_to_zero;
8d88c4ca 4129
351f65ca 4130 r_type = ELF32_R_TYPE (rel->r_info);
fe4770f4
AJ		 4131 if (r_type == (int) R_X86_64_GNU_VTINHERIT
4132 || r_type == (int) R_X86_64_GNU_VTENTRY)
18954b29
L		 4133 {
4134 if (wrel != rel)
4135 *wrel = *rel;
4136 continue;
4137 }
8d88c4ca 4138
9911c0fc 4139 if (r_type >= (int) R_X86_64_standard)
8da6118f 4140 {
9911c0fc
L		 4141 (*_bfd_error_handler)
4142 (_("%B: unrecognized relocation (0x%x) in section `%A'"),
4143 input_bfd, input_section, r_type);
8da6118f 4144 bfd_set_error (bfd_error_bad_value);
b34976b6 4145 return FALSE;
8da6118f 4146 }
8d88c4ca 4147
d7921315 4148 if (r_type != (int) R_X86_64_32
eed180f8 4149 || ABI_64_P (output_bfd))
d7921315
L		 4150 howto = x86_64_elf_howto_table + r_type;
4151 else
4152 howto = (x86_64_elf_howto_table
4153 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
351f65ca 4154 r_symndx = htab->r_sym (rel->r_info);
8d88c4ca
NC		 4155 h = NULL;
4156 sym = NULL;
4157 sec = NULL;
b34976b6 4158 unresolved_reloc = FALSE;
8d88c4ca 4159 if (r_symndx < symtab_hdr->sh_info)
8da6118f
KH		 4160 {
4161 sym = local_syms + r_symndx;
4162 sec = local_sections[r_symndx];
c434dee6 4163
c25bc9fc
L		 4164 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
4165 &sec, rel);
1788fc08 4166 st_size = sym->st_size;
c25bc9fc
L		 4167
4168 /* Relocate against local STT_GNU_IFUNC symbol. */
0e1862bb 4169 if (!bfd_link_relocatable (info)
351f65ca 4170 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc 4171 {
351f65ca
L		 4172 h = elf_x86_64_get_local_sym_hash (htab, input_bfd,
4173 rel, FALSE);
c25bc9fc
L		 4174 if (h == NULL)
4175 abort ();
4176
eed180f8 4177 /* Set STT_GNU_IFUNC symbol value. */
c25bc9fc
L		 4178 h->root.u.def.value = sym->st_value;
4179 h->root.u.def.section = sec;
4180 }
8da6118f 4181 }
8d88c4ca 4182 else
8da6118f 4183 {
c9736ba0 4184 bfd_boolean warned ATTRIBUTE_UNUSED;
62d887d4 4185 bfd_boolean ignored ATTRIBUTE_UNUSED;
c434dee6 4186
b2a8e766
AM		 4187 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
4188 r_symndx, symtab_hdr, sym_hashes,
4189 h, sec, relocation,
62d887d4 4190 unresolved_reloc, warned, ignored);
1788fc08 4191 st_size = h->size;
8da6118f 4192 }
ab96bf03 4193
dbaa2011 4194 if (sec != NULL && discarded_section (sec))
60f2e42e
L		 4195 {
4196 _bfd_clear_contents (howto, input_bfd, input_section,
4197 contents + rel->r_offset);
4198 wrel->r_offset = rel->r_offset;
4199 wrel->r_info = 0;
4200 wrel->r_addend = 0;
4201
4202 /* For ld -r, remove relocations in debug sections against
4203 sections defined in discarded sections. Not done for
4204 eh_frame editing code expects to be present. */
4205 if (bfd_link_relocatable (info)
4206 && (input_section->flags & SEC_DEBUGGING))
4207 wrel--;
4208
4209 continue;
4210 }
ab96bf03 4211
0e1862bb 4212 if (bfd_link_relocatable (info))
2d5da473
L		 4213 {
4214 if (wrel != rel)
4215 *wrel = *rel;
4216 continue;
4217 }
ab96bf03 4218
1788fc08 4219 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
64d25c44 4220 {
1788fc08
L		 4221 if (r_type == R_X86_64_64)
4222 {
4223 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
4224 zero-extend it to 64bit if addend is zero. */
4225 r_type = R_X86_64_32;
4226 memset (contents + rel->r_offset + 4, 0, 4);
4227 }
4228 else if (r_type == R_X86_64_SIZE64)
4229 {
4230 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
4231 zero-extend it to 64bit if addend is zero. */
4232 r_type = R_X86_64_SIZE32;
4233 memset (contents + rel->r_offset + 4, 0, 4);
4234 }
64d25c44
L		 4235 }
4236
0ff2b86e
L		 4237 eh = (struct elf_x86_64_link_hash_entry *) h;
4238
cbe950e9
L		 4239 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
4240 it here if it is defined in a non-shared object. */
4241 if (h != NULL
4242 && h->type == STT_GNU_IFUNC
4243 && h->def_regular)
4244 {
cbe950e9 4245 bfd_vma plt_index;
4c544807 4246 const char *name;
cbe950e9 4247
97dc35c8
L		 4248 if ((input_section->flags & SEC_ALLOC) == 0)
4249 {
4250 /* Dynamic relocs are not propagated for SEC_DEBUGGING
4251 sections because such sections are not SEC_ALLOC and
4252 thus ld.so will not process them. */
4253 if ((input_section->flags & SEC_DEBUGGING) != 0)
0eace210 4254 continue;
97dc35c8
L		 4255 abort ();
4256 }
4257 else if (h->plt.offset == (bfd_vma) -1)
cbe950e9
L		 4258 abort ();
4259
4260 /* STT_GNU_IFUNC symbol must go through PLT. */
0ff2b86e
L		 4261 if (htab->elf.splt != NULL)
4262 {
4263 if (htab->plt_bnd != NULL)
4264 {
4265 resolved_plt = htab->plt_bnd;
4266 plt_offset = eh->plt_bnd.offset;
4267 }
4268 else
4269 {
4270 resolved_plt = htab->elf.splt;
4271 plt_offset = h->plt.offset;
4272 }
4273 }
4274 else
4275 {
4276 resolved_plt = htab->elf.iplt;
4277 plt_offset = h->plt.offset;
4278 }
4279
4280 relocation = (resolved_plt->output_section->vma
4281 + resolved_plt->output_offset + plt_offset);
cbe950e9
L		 4282
4283 switch (r_type)
4284 {
4285 default:
4c544807
L		 4286 if (h->root.root.string)
4287 name = h->root.root.string;
4288 else
4289 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4290 NULL);
cbe950e9
L		 4291 (*_bfd_error_handler)
4292 (_("%B: relocation %s against STT_GNU_IFUNC "
4293 "symbol `%s' isn't handled by %s"), input_bfd,
ef77d6af 4294 howto->name, name, __FUNCTION__);
cbe950e9
L		 4295 bfd_set_error (bfd_error_bad_value);
4296 return FALSE;
4297
4298 case R_X86_64_32S:
0e1862bb 4299 if (bfd_link_pic (info))
cbe950e9 4300 abort ();
710ab287
L		 4301 goto do_relocation;
4302
248775ba
L		 4303 case R_X86_64_32:
4304 if (ABI_64_P (output_bfd))
4305 goto do_relocation;
17672001 4306 /* FALLTHROUGH */
eed180f8 4307 case R_X86_64_64:
710ab287
L		 4308 if (rel->r_addend != 0)
4309 {
4c544807
L		 4310 if (h->root.root.string)
4311 name = h->root.root.string;
4312 else
4313 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
4314 sym, NULL);
710ab287
L		 4315 (*_bfd_error_handler)
4316 (_("%B: relocation %s against STT_GNU_IFUNC "
4317 "symbol `%s' has non-zero addend: %d"),
ef77d6af 4318 input_bfd, howto->name, name, rel->r_addend);
710ab287
L		 4319 bfd_set_error (bfd_error_bad_value);
4320 return FALSE;
4321 }
4322
4323 /* Generate dynamic relcoation only when there is a
c293fa49 4324 non-GOT reference in a shared object. */
0e1862bb 4325 if (bfd_link_pic (info) && h->non_got_ref)
710ab287
L		 4326 {
4327 Elf_Internal_Rela outrel;
710ab287
L		 4328 asection *sreloc;
4329
c25bc9fc
L		 4330 /* Need a dynamic relocation to get the real function
4331 address. */
710ab287
L		 4332 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
4333 info,
4334 input_section,
4335 rel->r_offset);
4336 if (outrel.r_offset == (bfd_vma) -1
4337 || outrel.r_offset == (bfd_vma) -2)
4338 abort ();
4339
4340 outrel.r_offset += (input_section->output_section->vma
4341 + input_section->output_offset);
4342
4343 if (h->dynindx == -1
44c4ea11 4344 || h->forced_local
0e1862bb 4345 || bfd_link_executable (info))
710ab287
L		 4346 {
4347 /* This symbol is resolved locally. */
56b8aada
L		 4348 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4349 outrel.r_addend = (h->root.u.def.value
4350 + h->root.u.def.section->output_section->vma
4351 + h->root.u.def.section->output_offset);
710ab287
L		 4352 }
4353 else
4354 {
351f65ca 4355 outrel.r_info = htab->r_info (h->dynindx, r_type);
710ab287
L		 4356 outrel.r_addend = 0;
4357 }
4358
6de2ae4a 4359 sreloc = htab->elf.irelifunc;
351f65ca 4360 elf_append_rela (output_bfd, sreloc, &outrel);
710ab287
L		 4361
4362 /* If this reloc is against an external symbol, we
4363 do not want to fiddle with the addend. Otherwise,
4364 we need to include the symbol value so that it
4365 becomes an addend for the dynamic reloc. For an
4366 internal symbol, we have updated addend. */
56b8aada 4367 continue;
710ab287 4368 }
17672001 4369 /* FALLTHROUGH */
cbe950e9 4370 case R_X86_64_PC32:
c3320543 4371 case R_X86_64_PC32_BND:
cbe950e9
L		 4372 case R_X86_64_PC64:
4373 case R_X86_64_PLT32:
c3320543 4374 case R_X86_64_PLT32_BND:
cbe950e9
L		 4375 goto do_relocation;
4376
4377 case R_X86_64_GOTPCREL:
56ceb5b5
L		 4378 case R_X86_64_GOTPCRELX:
4379 case R_X86_64_REX_GOTPCRELX:
cbe950e9 4380 case R_X86_64_GOTPCREL64:
6de2ae4a 4381 base_got = htab->elf.sgot;
cbe950e9
L		 4382 off = h->got.offset;
4383
7afd84dc 4384 if (base_got == NULL)
cbe950e9
L		 4385 abort ();
4386
7afd84dc 4387 if (off == (bfd_vma) -1)
cbe950e9 4388 {
7afd84dc
L		 4389 /* We can't use h->got.offset here to save state, or
4390 even just remember the offset, as finish_dynamic_symbol
4391 would use that as offset into .got. */
cbe950e9 4392
6de2ae4a 4393 if (htab->elf.splt != NULL)
7afd84dc 4394 {
eed180f8 4395 plt_index = h->plt.offset / plt_entry_size - 1;
7afd84dc 4396 off = (plt_index + 3) * GOT_ENTRY_SIZE;
6de2ae4a 4397 base_got = htab->elf.sgotplt;
7afd84dc 4398 }
cbe950e9
L		 4399 else
4400 {
eed180f8 4401 plt_index = h->plt.offset / plt_entry_size;
7afd84dc 4402 off = plt_index * GOT_ENTRY_SIZE;
6de2ae4a 4403 base_got = htab->elf.igotplt;
7afd84dc
L		 4404 }
4405
4406 if (h->dynindx == -1
4407 || h->forced_local
4408 || info->symbolic)
4409 {
eed180f8 4410 /* This references the local defitionion. We must
7afd84dc 4411 initialize this entry in the global offset table.
eed180f8 4412 Since the offset must always be a multiple of 8,
7afd84dc
L		 4413 we use the least significant bit to record
4414 whether we have initialized it already.
4415
4416 When doing a dynamic link, we create a .rela.got
4417 relocation entry to initialize the value. This
4418 is done in the finish_dynamic_symbol routine. */
4419 if ((off & 1) != 0)
4420 off &= ~1;
4421 else
4422 {
4423 bfd_put_64 (output_bfd, relocation,
4424 base_got->contents + off);
4425 /* Note that this is harmless for the GOTPLT64
4426 case, as -1 | 1 still is -1. */
4427 h->got.offset |= 1;
4428 }
cbe950e9
L		 4429 }
4430 }
4431
4432 relocation = (base_got->output_section->vma
4433 + base_got->output_offset + off);
4434
cbe950e9
L		 4435 goto do_relocation;
4436 }
4437 }
4438
aec6b87e
L		 4439 resolved_to_zero = (eh != NULL
4440 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
4441
70256ad8
AJ		 4442 /* When generating a shared object, the relocations handled here are
4443 copied into the output file to be resolved at run time. */
4444 switch (r_type)
4445 {
4446 case R_X86_64_GOT32:
7b81dfbb 4447 case R_X86_64_GOT64:
70256ad8
AJ		 4448 /* Relocation is to the entry for this symbol in the global
4449 offset table. */
70256ad8 4450 case R_X86_64_GOTPCREL:
56ceb5b5
L		 4451 case R_X86_64_GOTPCRELX:
4452 case R_X86_64_REX_GOTPCRELX:
7b81dfbb
AJ		 4453 case R_X86_64_GOTPCREL64:
4454 /* Use global offset table entry as symbol value. */
4455 case R_X86_64_GOTPLT64:
553d1284 4456 /* This is obsolete and treated the the same as GOT64. */
6de2ae4a 4457 base_got = htab->elf.sgot;
7b81dfbb 4458
6de2ae4a 4459 if (htab->elf.sgot == NULL)
c434dee6 4460 abort ();
053579d7 4461
51e0a107 4462 if (h != NULL)
70256ad8 4463 {
b34976b6 4464 bfd_boolean dyn;
c434dee6
AJ		 4465
4466 off = h->got.offset;
7b81dfbb 4467 if (h->needs_plt
eed180f8 4468 && h->plt.offset != (bfd_vma)-1
7b81dfbb
AJ		 4469 && off == (bfd_vma)-1)
4470 {
4471 /* We can't use h->got.offset here to save
4472 state, or even just remember the offset, as
4473 finish_dynamic_symbol would use that as offset into
4474 .got. */
eed180f8 4475 bfd_vma plt_index = h->plt.offset / plt_entry_size - 1;
7b81dfbb 4476 off = (plt_index + 3) * GOT_ENTRY_SIZE;
6de2ae4a 4477 base_got = htab->elf.sgotplt;
7b81dfbb
AJ		 4478 }
4479
c434dee6 4480 dyn = htab->elf.dynamic_sections_created;
51e0a107 4481
0e1862bb
L		 4482 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
4483 || (bfd_link_pic (info)
27482721 4484 && SYMBOL_REFERENCES_LOCAL (info, h))
4bc6e03a
AJ		 4485 || (ELF_ST_VISIBILITY (h->other)
4486 && h->root.type == bfd_link_hash_undefweak))
51e0a107
JH		 4487 {
4488 /* This is actually a static link, or it is a -Bsymbolic
4489 link and the symbol is defined locally, or the symbol
407443a3 4490 was forced to be local because of a version file. We
51e0a107
JH		 4491 must initialize this entry in the global offset table.
4492 Since the offset must always be a multiple of 8, we
4493 use the least significant bit to record whether we
4494 have initialized it already.
4495
4496 When doing a dynamic link, we create a .rela.got
407443a3
AJ		 4497 relocation entry to initialize the value. This is
4498 done in the finish_dynamic_symbol routine. */
51e0a107
JH		 4499 if ((off & 1) != 0)
4500 off &= ~1;
4501 else
4502 {
4503 bfd_put_64 (output_bfd, relocation,
7b81dfbb
AJ		 4504 base_got->contents + off);
4505 /* Note that this is harmless for the GOTPLT64 case,
eed180f8 4506 as -1 | 1 still is -1. */
51e0a107
JH		 4507 h->got.offset |= 1;
4508 }
4509 }
053579d7 4510 else
b34976b6 4511 unresolved_reloc = FALSE;
70256ad8 4512 }
51e0a107
JH		 4513 else
4514 {
c434dee6
AJ		 4515 if (local_got_offsets == NULL)
4516 abort ();
51e0a107
JH		 4517
4518 off = local_got_offsets[r_symndx];
4519
4520 /* The offset must always be a multiple of 8. We use
407443a3
AJ		 4521 the least significant bit to record whether we have
4522 already generated the necessary reloc. */
51e0a107
JH		 4523 if ((off & 1) != 0)
4524 off &= ~1;
4525 else
4526 {
c434dee6 4527 bfd_put_64 (output_bfd, relocation,
7b81dfbb 4528 base_got->contents + off);
51e0a107 4529
0e1862bb 4530 if (bfd_link_pic (info))
51e0a107 4531 {
947216bf 4532 asection *s;
51e0a107 4533 Elf_Internal_Rela outrel;
70256ad8 4534
51e0a107
JH		 4535 /* We need to generate a R_X86_64_RELATIVE reloc
4536 for the dynamic linker. */
6de2ae4a 4537 s = htab->elf.srelgot;
947216bf 4538 if (s == NULL)
c434dee6 4539 abort ();
51e0a107 4540
7b81dfbb
AJ		 4541 outrel.r_offset = (base_got->output_section->vma
4542 + base_got->output_offset
51e0a107 4543 + off);
351f65ca 4544 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
51e0a107 4545 outrel.r_addend = relocation;
351f65ca 4546 elf_append_rela (output_bfd, s, &outrel);
51e0a107
JH		 4547 }
4548
4549 local_got_offsets[r_symndx] |= 1;
4550 }
51e0a107 4551 }
6a2bda3f 4552
c434dee6
AJ		 4553 if (off >= (bfd_vma) -2)
4554 abort ();
4555
7b81dfbb
AJ		 4556 relocation = base_got->output_section->vma
4557 + base_got->output_offset + off;
56ceb5b5
L		 4558 if (r_type != R_X86_64_GOTPCREL
4559 && r_type != R_X86_64_GOTPCRELX
4560 && r_type != R_X86_64_REX_GOTPCRELX
4561 && r_type != R_X86_64_GOTPCREL64)
6de2ae4a
L		 4562 relocation -= htab->elf.sgotplt->output_section->vma
4563 - htab->elf.sgotplt->output_offset;
c434dee6 4564
70256ad8
AJ		 4565 break;
4566
d6ab8113
JB		 4567 case R_X86_64_GOTOFF64:
4568 /* Relocation is relative to the start of the global offset
4569 table. */
4570
3d949995
L		 4571 /* Check to make sure it isn't a protected function or data
4572 symbol for shared library since it may not be local when
e3c0e327
L		 4573 used as function address or with copy relocation. We also
4574 need to make sure that a symbol is referenced locally. */
0e1862bb 4575 if (bfd_link_pic (info) && h)
d6ab8113 4576 {
e3c0e327
L		 4577 if (!h->def_regular)
4578 {
4579 const char *v;
4580
4581 switch (ELF_ST_VISIBILITY (h->other))
4582 {
4583 case STV_HIDDEN:
4584 v = _("hidden symbol");
4585 break;
4586 case STV_INTERNAL:
4587 v = _("internal symbol");
4588 break;
4589 case STV_PROTECTED:
4590 v = _("protected symbol");
4591 break;
4592 default:
4593 v = _("symbol");
4594 break;
4595 }
4596
4597 (*_bfd_error_handler)
4598 (_("%B: relocation R_X86_64_GOTOFF64 against undefined %s `%s' can not be used when making a shared object"),
4599 input_bfd, v, h->root.root.string);
4600 bfd_set_error (bfd_error_bad_value);
4601 return FALSE;
4602 }
0e1862bb 4603 else if (!bfd_link_executable (info)
e3c0e327
L		 4604 && !SYMBOL_REFERENCES_LOCAL (info, h)
4605 && (h->type == STT_FUNC
4606 || h->type == STT_OBJECT)
4607 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
4608 {
4609 (*_bfd_error_handler)
4610 (_("%B: relocation R_X86_64_GOTOFF64 against protected %s `%s' can not be used when making a shared object"),
4611 input_bfd,
4612 h->type == STT_FUNC ? "function" : "data",
4613 h->root.root.string);
4614 bfd_set_error (bfd_error_bad_value);
d6ab8113 4615 return FALSE;
e3c0e327 4616 }
d6ab8113
JB		 4617 }
4618
4619 /* Note that sgot is not involved in this
4620 calculation. We always want the start of .got.plt. If we
4621 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
4622 permitted by the ABI, we might have to change this
4623 calculation. */
6de2ae4a
L		 4624 relocation -= htab->elf.sgotplt->output_section->vma
4625 + htab->elf.sgotplt->output_offset;
d6ab8113
JB		 4626 break;
4627
4628 case R_X86_64_GOTPC32:
7b81dfbb 4629 case R_X86_64_GOTPC64:
d6ab8113 4630 /* Use global offset table as symbol value. */
6de2ae4a
L		 4631 relocation = htab->elf.sgotplt->output_section->vma
4632 + htab->elf.sgotplt->output_offset;
d6ab8113
JB		 4633 unresolved_reloc = FALSE;
4634 break;
7b81dfbb
AJ		 4635
4636 case R_X86_64_PLTOFF64:
4637 /* Relocation is PLT entry relative to GOT. For local
4638 symbols it's the symbol itself relative to GOT. */
eed180f8 4639 if (h != NULL
7b81dfbb
AJ		 4640 /* See PLT32 handling. */
4641 && h->plt.offset != (bfd_vma) -1
6de2ae4a 4642 && htab->elf.splt != NULL)
7b81dfbb 4643 {
0ff2b86e
L		 4644 if (htab->plt_bnd != NULL)
4645 {
4646 resolved_plt = htab->plt_bnd;
4647 plt_offset = eh->plt_bnd.offset;
4648 }
4649 else
4650 {
4651 resolved_plt = htab->elf.splt;
4652 plt_offset = h->plt.offset;
4653 }
4654
4655 relocation = (resolved_plt->output_section->vma
4656 + resolved_plt->output_offset
4657 + plt_offset);
7b81dfbb
AJ		 4658 unresolved_reloc = FALSE;
4659 }
4660
6de2ae4a
L		 4661 relocation -= htab->elf.sgotplt->output_section->vma
4662 + htab->elf.sgotplt->output_offset;
7b81dfbb 4663 break;
d6ab8113 4664
70256ad8 4665 case R_X86_64_PLT32:
c3320543 4666 case R_X86_64_PLT32_BND:
70256ad8
AJ		 4667 /* Relocation is to the entry for this symbol in the
4668 procedure linkage table. */
4669
4670 /* Resolve a PLT32 reloc against a local symbol directly,
407443a3 4671 without using the procedure linkage table. */
70256ad8
AJ		 4672 if (h == NULL)
4673 break;
4674
dd7e64d4
L		 4675 if ((h->plt.offset == (bfd_vma) -1
4676 && eh->plt_got.offset == (bfd_vma) -1)
6de2ae4a 4677 || htab->elf.splt == NULL)
70256ad8
AJ		 4678 {
4679 /* We didn't make a PLT entry for this symbol. This
407443a3
AJ		 4680 happens when statically linking PIC code, or when
4681 using -Bsymbolic. */
70256ad8
AJ		 4682 break;
4683 }
4684
dd7e64d4 4685 if (h->plt.offset != (bfd_vma) -1)
0ff2b86e 4686 {
dd7e64d4
L		 4687 if (htab->plt_bnd != NULL)
4688 {
4689 resolved_plt = htab->plt_bnd;
4690 plt_offset = eh->plt_bnd.offset;
4691 }
4692 else
4693 {
4694 resolved_plt = htab->elf.splt;
4695 plt_offset = h->plt.offset;
4696 }
0ff2b86e
L		 4697 }
4698 else
4699 {
dd7e64d4
L		 4700 /* Use the GOT PLT. */
4701 resolved_plt = htab->plt_got;
4702 plt_offset = eh->plt_got.offset;
0ff2b86e
L		 4703 }
4704
4705 relocation = (resolved_plt->output_section->vma
4706 + resolved_plt->output_offset
4707 + plt_offset);
b34976b6 4708 unresolved_reloc = FALSE;
70256ad8
AJ		 4709 break;
4710
1788fc08
L		 4711 case R_X86_64_SIZE32:
4712 case R_X86_64_SIZE64:
1788fc08
L		 4713 /* Set to symbol size. */
4714 relocation = st_size;
4715 goto direct;
4716
fd8ab9e5
AJ		 4717 case R_X86_64_PC8:
4718 case R_X86_64_PC16:
4719 case R_X86_64_PC32:
c3320543 4720 case R_X86_64_PC32_BND:
6333bc0d 4721 /* Don't complain about -fPIC if the symbol is undefined when
aec6b87e
L		 4722 building executable unless it is unresolved weak symbol. */
4723 if ((input_section->flags & SEC_ALLOC) != 0
90f487df 4724 && (input_section->flags & SEC_READONLY) != 0
6333bc0d 4725 && h != NULL
aec6b87e
L		 4726 && ((bfd_link_executable (info)
4727 && h->root.type == bfd_link_hash_undefweak
4728 && !resolved_to_zero)
4729 || (bfd_link_pic (info)
4730 && !(bfd_link_pie (info)
4731 && h->root.type == bfd_link_hash_undefined))))
6610a52d 4732 {
41bed6dd
L		 4733 bfd_boolean fail = FALSE;
4734 bfd_boolean branch
c3320543
L		 4735 = ((r_type == R_X86_64_PC32
4736 || r_type == R_X86_64_PC32_BND)
41bed6dd
L		 4737 && is_32bit_relative_branch (contents, rel->r_offset));
4738
4739 if (SYMBOL_REFERENCES_LOCAL (info, h))
4740 {
4741 /* Symbol is referenced locally. Make sure it is
4742 defined locally or for a branch. */
4743 fail = !h->def_regular && !branch;
4744 }
aec6b87e 4745 else if (!(bfd_link_pie (info)
bc696fd5 4746 && (h->needs_copy || eh->needs_copy)))
41bed6dd 4747 {
9a926d55
L		 4748 /* Symbol doesn't need copy reloc and isn't referenced
4749 locally. We only allow branch to symbol with
4750 non-default visibility. */
41bed6dd
L		 4751 fail = (!branch
4752 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT);
4753 }
4754
4755 if (fail)
ef77d6af 4756 return elf_x86_64_need_pic (input_bfd, h, howto);
6610a52d
L		 4757 }
4758 /* Fall through. */
4759
70256ad8
AJ		 4760 case R_X86_64_8:
4761 case R_X86_64_16:
4762 case R_X86_64_32:
d6ab8113 4763 case R_X86_64_PC64:
6b3db546 4764 case R_X86_64_64:
80643fbc 4765 /* FIXME: The ABI says the linker should make sure the value is
407443a3 4766 the same when it's zeroextended to 64 bit. */
c434dee6 4767
1788fc08 4768direct:
b1e24c02 4769 if ((input_section->flags & SEC_ALLOC) == 0)
c434dee6
AJ		 4770 break;
4771
9a926d55 4772 /* Don't copy a pc-relative relocation into the output file
6333bc0d 4773 if the symbol needs copy reloc or the symbol is undefined
04ebc307 4774 when building executable. Copy dynamic function pointer
aec6b87e
L		 4775 relocations. Don't generate dynamic relocations against
4776 resolved undefined weak symbols in PIE. */
0e1862bb 4777 if ((bfd_link_pic (info)
aec6b87e 4778 && !(bfd_link_pie (info)
fd9edc90 4779 && h != NULL
6333bc0d
L		 4780 && (h->needs_copy
4781 || eh->needs_copy
4782 || h->root.type == bfd_link_hash_undefined)
9a926d55 4783 && IS_X86_64_PCREL_TYPE (r_type))
4bc6e03a 4784 && (h == NULL
aec6b87e
L		 4785 || ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4786 && !resolved_to_zero)
4787 || h->root.type != bfd_link_hash_undefweak))
1788fc08
L		 4788 && ((! IS_X86_64_PCREL_TYPE (r_type)
4789 && r_type != R_X86_64_SIZE32
4790 && r_type != R_X86_64_SIZE64)
d8045f23 4791 || ! SYMBOL_CALLS_LOCAL (info, h)))
d40d037c 4792 || (ELIMINATE_COPY_RELOCS
0e1862bb 4793 && !bfd_link_pic (info)
c434dee6
AJ		 4794 && h != NULL
4795 && h->dynindx != -1
aec6b87e
L		 4796 && (!h->non_got_ref
4797 || eh->func_pointer_refcount > 0
4798 || (h->root.type == bfd_link_hash_undefweak
4799 && !resolved_to_zero))
bae420ef
L		 4800 && ((h->def_dynamic && !h->def_regular)
4801 /* Undefined weak symbol is bound locally when
4802 PIC is false. */
0f88be7a 4803 || h->root.type == bfd_link_hash_undefined)))
70256ad8
AJ		 4804 {
4805 Elf_Internal_Rela outrel;
b34976b6 4806 bfd_boolean skip, relocate;
c434dee6 4807 asection *sreloc;
70256ad8
AJ		 4808
4809 /* When generating a shared object, these relocations
4810 are copied into the output file to be resolved at run
407443a3 4811 time. */
b34976b6
AM		 4812 skip = FALSE;
4813 relocate = FALSE;
70256ad8 4814
c629eae0
JJ		 4815 outrel.r_offset =
4816 _bfd_elf_section_offset (output_bfd, info, input_section,
c434dee6 4817 rel->r_offset);
c629eae0 4818 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 4819 skip = TRUE;
0fb19cbc 4820 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 4821 skip = TRUE, relocate = TRUE;
70256ad8
AJ		 4822
4823 outrel.r_offset += (input_section->output_section->vma
4824 + input_section->output_offset);
4825
4826 if (skip)
0bb2d96a 4827 memset (&outrel, 0, sizeof outrel);
c434dee6 4828
fd8ab9e5
AJ		 4829 /* h->dynindx may be -1 if this symbol was marked to
4830 become local. */
4831 else if (h != NULL
c434dee6 4832 && h->dynindx != -1
d8045f23 4833 && (IS_X86_64_PCREL_TYPE (r_type)
4e0c91e4
L		 4834 || !(bfd_link_executable (info)
4835 || SYMBOLIC_BIND (info, h))
d8045f23 4836 || ! h->def_regular))
70256ad8 4837 {
aec6b87e
L		 4838 if ((r_type != R_X86_64_PC64 && r_type != R_X86_64_64)
4839 && bfd_link_executable (info)
4840 && h->root.type == bfd_link_hash_undefweak
4841 && !resolved_to_zero)
4842 return elf_x86_64_need_pic (input_bfd, h, howto);
351f65ca 4843 outrel.r_info = htab->r_info (h->dynindx, r_type);
c434dee6 4844 outrel.r_addend = rel->r_addend;
70256ad8
AJ		 4845 }
4846 else
4847 {
4c10bbaa
L		 4848 /* This symbol is local, or marked to become local.
4849 When relocation overflow check is disabled, we
4850 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
4851 if (r_type == htab->pointer_r_type
4852 || (r_type == R_X86_64_32
4853 && info->no_reloc_overflow_check))
607c0e09 4854 {
b34976b6 4855 relocate = TRUE;
351f65ca 4856 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
607c0e09
AS		 4857 outrel.r_addend = relocation + rel->r_addend;
4858 }
64d25c44
L		 4859 else if (r_type == R_X86_64_64
4860 && !ABI_64_P (output_bfd))
4861 {
4862 relocate = TRUE;
4863 outrel.r_info = htab->r_info (0,
4864 R_X86_64_RELATIVE64);
4865 outrel.r_addend = relocation + rel->r_addend;
8cf0d2dd
L		 4866 /* Check addend overflow. */
4867 if ((outrel.r_addend & 0x80000000)
4868 != (rel->r_addend & 0x80000000))
4869 {
4870 const char *name;
268a8d3a 4871 int addend = rel->r_addend;
8cf0d2dd
L		 4872 if (h && h->root.root.string)
4873 name = h->root.root.string;
4874 else
4875 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
4876 sym, NULL);
6f2c9068
L		 4877 if (addend < 0)
4878 (*_bfd_error_handler)
268a8d3a 4879 (_("%B: addend -0x%x in relocation %s against "
6f2c9068
L		 4880 "symbol `%s' at 0x%lx in section `%A' is "
4881 "out of range"),
4882 input_bfd, input_section, addend,
ef77d6af
L		 4883 howto->name, name,
4884 (unsigned long) rel->r_offset);
6f2c9068
L		 4885 else
4886 (*_bfd_error_handler)
268a8d3a 4887 (_("%B: addend 0x%x in relocation %s against "
6f2c9068
L		 4888 "symbol `%s' at 0x%lx in section `%A' is "
4889 "out of range"),
4890 input_bfd, input_section, addend,
ef77d6af
L		 4891 howto->name, name,
4892 (unsigned long) rel->r_offset);
8cf0d2dd
L		 4893 bfd_set_error (bfd_error_bad_value);
4894 return FALSE;
4895 }
64d25c44 4896 }
607c0e09
AS		 4897 else
4898 {
4899 long sindx;
4900
8517fae7 4901 if (bfd_is_abs_section (sec))
607c0e09
AS		 4902 sindx = 0;
4903 else if (sec == NULL || sec->owner == NULL)
4904 {
4905 bfd_set_error (bfd_error_bad_value);
b34976b6 4906 return FALSE;
607c0e09
AS		 4907 }
4908 else
4909 {
4910 asection *osec;
4911
74541ad4
AM		 4912 /* We are turning this relocation into one
4913 against a section symbol. It would be
4914 proper to subtract the symbol's value,
4915 osec->vma, from the emitted reloc addend,
4916 but ld.so expects buggy relocs. */
607c0e09
AS		 4917 osec = sec->output_section;
4918 sindx = elf_section_data (osec)->dynindx;
74541ad4
AM		 4919 if (sindx == 0)
4920 {
4921 asection *oi = htab->elf.text_index_section;
4922 sindx = elf_section_data (oi)->dynindx;
4923 }
4924 BFD_ASSERT (sindx != 0);
607c0e09
AS		 4925 }
4926
351f65ca 4927 outrel.r_info = htab->r_info (sindx, r_type);
607c0e09
AS		 4928 outrel.r_addend = relocation + rel->r_addend;
4929 }
70256ad8
AJ		 4930 }
4931
cbe950e9 4932 sreloc = elf_section_data (input_section)->sreloc;
d8045f23 4933
62d78908
L		 4934 if (sreloc == NULL || sreloc->contents == NULL)
4935 {
4936 r = bfd_reloc_notsupported;
4937 goto check_relocation_error;
4938 }
c434dee6 4939
351f65ca 4940 elf_append_rela (output_bfd, sreloc, &outrel);
70256ad8
AJ		 4941
4942 /* If this reloc is against an external symbol, we do
4943 not want to fiddle with the addend. Otherwise, we
4944 need to include the symbol value so that it becomes
4945 an addend for the dynamic reloc. */
0f88be7a 4946 if (! relocate)
70256ad8
AJ		 4947 continue;
4948 }
4949
4950 break;
4951
bffbf940 4952 case R_X86_64_TLSGD:
67a4f2b7
AO		 4953 case R_X86_64_GOTPC32_TLSDESC:
4954 case R_X86_64_TLSDESC_CALL:
bffbf940 4955 case R_X86_64_GOTTPOFF:
bffbf940
JJ		 4956 tls_type = GOT_UNKNOWN;
4957 if (h == NULL && local_got_offsets)
351f65ca 4958 tls_type = elf_x86_64_local_got_tls_type (input_bfd) [r_symndx];
bffbf940 4959 else if (h != NULL)
351f65ca 4960 tls_type = elf_x86_64_hash_entry (h)->tls_type;
142411ca 4961
351f65ca
L		 4962 if (! elf_x86_64_tls_transition (info, input_bfd,
4963 input_section, contents,
4964 symtab_hdr, sym_hashes,
4965 &r_type, tls_type, rel,
4966 relend, h, r_symndx))
534a31f6 4967 return FALSE;
bffbf940
JJ		 4968
4969 if (r_type == R_X86_64_TPOFF32)
4970 {
142411ca
L		 4971 bfd_vma roff = rel->r_offset;
4972
bffbf940 4973 BFD_ASSERT (! unresolved_reloc);
142411ca 4974
351f65ca 4975 if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
bffbf940 4976 {
52bc799a 4977 /* GD->LE transition. For 64bit, change
abcf1d52 4978 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
a3fadc9a 4979 .word 0x6666; rex64; call __tls_get_addr
52bc799a 4980 into:
bffbf940 4981 movq %fs:0, %rax
52bc799a
L		 4982 leaq foo@tpoff(%rax), %rax
4983 For 32bit, change
4984 leaq foo@tlsgd(%rip), %rdi
4985 .word 0x6666; rex64; call __tls_get_addr
4986 into:
4987 movl %fs:0, %eax
5c98a14e
JJ		 4988 leaq foo@tpoff(%rax), %rax
4989 For largepic, change:
4990 leaq foo@tlsgd(%rip), %rdi
4991 movabsq $__tls_get_addr@pltoff, %rax
4992 addq %rbx, %rax
4993 call *%rax
4994 into:
4995 movq %fs:0, %rax
4996 leaq foo@tpoff(%rax), %rax
4997 nopw 0x0(%rax,%rax,1) */
4998 int largepic = 0;
4999 if (ABI_64_P (output_bfd)
5000 && contents[roff + 5] == (bfd_byte) '\xb8')
5001 {
5002 memcpy (contents + roff - 3,
5003 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
5004 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
5005 largepic = 1;
5006 }
5007 else if (ABI_64_P (output_bfd))
52bc799a
L		 5008 memcpy (contents + roff - 4,
5009 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
5010 16);
5011 else
5012 memcpy (contents + roff - 3,
5013 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
5014 15);
eb4ff4d6 5015 bfd_put_32 (output_bfd,
351f65ca 5016 elf_x86_64_tpoff (info, relocation),
5c98a14e
JJ		 5017 contents + roff + 8 + largepic);
5018 /* Skip R_X86_64_PC32/R_X86_64_PLT32/R_X86_64_PLTOFF64. */
bffbf940 5019 rel++;
60f2e42e 5020 wrel++;
bffbf940
JJ		 5021 continue;
5022 }
351f65ca 5023 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
67a4f2b7
AO		 5024 {
5025 /* GDesc -> LE transition.
5026 It's originally something like:
5027 leaq x@tlsdesc(%rip), %rax
5028
5029 Change it to:
c9736ba0 5030 movl $x@tpoff, %rax. */
67a4f2b7 5031
c9736ba0 5032 unsigned int val, type;
67a4f2b7 5033
67a4f2b7 5034 type = bfd_get_8 (input_bfd, contents + roff - 3);
67a4f2b7 5035 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO		 5036 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
5037 contents + roff - 3);
5038 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
5039 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
5040 contents + roff - 1);
eb4ff4d6 5041 bfd_put_32 (output_bfd,
351f65ca 5042 elf_x86_64_tpoff (info, relocation),
67a4f2b7
AO		 5043 contents + roff);
5044 continue;
5045 }
351f65ca 5046 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
67a4f2b7
AO		 5047 {
5048 /* GDesc -> LE transition.
5049 It's originally:
5050 call *(%rax)
5051 Turn it into:
142411ca 5052 xchg %ax,%ax. */
10efb593 5053 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 5054 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
5055 continue;
5056 }
351f65ca 5057 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTTPOFF)
bffbf940 5058 {
bffbf940 5059 /* IE->LE transition:
cf61b747 5060 For 64bit, originally it can be one of:
bffbf940
JJ		 5061 movq foo@gottpoff(%rip), %reg
5062 addq foo@gottpoff(%rip), %reg
5063 We change it into:
5064 movq $foo, %reg
5065 leaq foo(%reg), %reg
cf61b747
L		 5066 addq $foo, %reg.
5067 For 32bit, originally it can be one of:
5068 movq foo@gottpoff(%rip), %reg
5069 addl foo@gottpoff(%rip), %reg
5070 We change it into:
5071 movq $foo, %reg
5072 leal foo(%reg), %reg
5073 addl $foo, %reg. */
142411ca
L		 5074
5075 unsigned int val, type, reg;
5076
cf61b747
L		 5077 if (roff >= 3)
5078 val = bfd_get_8 (input_bfd, contents + roff - 3);
5079 else
5080 val = 0;
142411ca
L		 5081 type = bfd_get_8 (input_bfd, contents + roff - 2);
5082 reg = bfd_get_8 (input_bfd, contents + roff - 1);
bffbf940 5083 reg >>= 3;
bffbf940
JJ		 5084 if (type == 0x8b)
5085 {
5086 /* movq */
5087 if (val == 0x4c)
5088 bfd_put_8 (output_bfd, 0x49,
142411ca 5089 contents + roff - 3);
4a4c5f25
L		 5090 else if (!ABI_64_P (output_bfd) && val == 0x44)
5091 bfd_put_8 (output_bfd, 0x41,
5092 contents + roff - 3);
bffbf940 5093 bfd_put_8 (output_bfd, 0xc7,
142411ca 5094 contents + roff - 2);
bffbf940 5095 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 5096 contents + roff - 1);
bffbf940
JJ		 5097 }
5098 else if (reg == 4)
5099 {
cf61b747
L		 5100 /* addq/addl -> addq/addl - addressing with %rsp/%r12
5101 is special */
bffbf940
JJ		 5102 if (val == 0x4c)
5103 bfd_put_8 (output_bfd, 0x49,
142411ca 5104 contents + roff - 3);
4a4c5f25
L		 5105 else if (!ABI_64_P (output_bfd) && val == 0x44)
5106 bfd_put_8 (output_bfd, 0x41,
5107 contents + roff - 3);
bffbf940 5108 bfd_put_8 (output_bfd, 0x81,
142411ca 5109 contents + roff - 2);
bffbf940 5110 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 5111 contents + roff - 1);
bffbf940
JJ		 5112 }
5113 else
5114 {
cf61b747 5115 /* addq/addl -> leaq/leal */
bffbf940
JJ		 5116 if (val == 0x4c)
5117 bfd_put_8 (output_bfd, 0x4d,
142411ca 5118 contents + roff - 3);
4a4c5f25
L		 5119 else if (!ABI_64_P (output_bfd) && val == 0x44)
5120 bfd_put_8 (output_bfd, 0x45,
5121 contents + roff - 3);
bffbf940 5122 bfd_put_8 (output_bfd, 0x8d,
142411ca 5123 contents + roff - 2);
bffbf940 5124 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
142411ca 5125 contents + roff - 1);
bffbf940 5126 }
eb4ff4d6 5127 bfd_put_32 (output_bfd,
351f65ca 5128 elf_x86_64_tpoff (info, relocation),
142411ca 5129 contents + roff);
bffbf940
JJ		 5130 continue;
5131 }
142411ca
L		 5132 else
5133 BFD_ASSERT (FALSE);
bffbf940
JJ		 5134 }
5135
6de2ae4a 5136 if (htab->elf.sgot == NULL)
bffbf940
JJ		 5137 abort ();
5138
5139 if (h != NULL)
67a4f2b7
AO		 5140 {
5141 off = h->got.offset;
351f65ca 5142 offplt = elf_x86_64_hash_entry (h)->tlsdesc_got;
67a4f2b7 5143 }
bffbf940
JJ		 5144 else
5145 {
5146 if (local_got_offsets == NULL)
5147 abort ();
5148
5149 off = local_got_offsets[r_symndx];
67a4f2b7 5150 offplt = local_tlsdesc_gotents[r_symndx];
bffbf940
JJ		 5151 }
5152
5153 if ((off & 1) != 0)
5154 off &= ~1;
26e41594 5155 else
bffbf940
JJ		 5156 {
5157 Elf_Internal_Rela outrel;
bffbf940 5158 int dr_type, indx;
67a4f2b7 5159 asection *sreloc;
bffbf940 5160
6de2ae4a 5161 if (htab->elf.srelgot == NULL)
bffbf940
JJ		 5162 abort ();
5163
67a4f2b7
AO		 5164 indx = h && h->dynindx != -1 ? h->dynindx : 0;
5165
5166 if (GOT_TLS_GDESC_P (tls_type))
5167 {
351f65ca 5168 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
67a4f2b7 5169 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
6de2ae4a
L		 5170 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
5171 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
5172 + htab->elf.sgotplt->output_offset
67a4f2b7
AO		 5173 + offplt
5174 + htab->sgotplt_jump_table_size);
6de2ae4a 5175 sreloc = htab->elf.srelplt;
67a4f2b7 5176 if (indx == 0)
351f65ca 5177 outrel.r_addend = relocation - elf_x86_64_dtpoff_base (info);
67a4f2b7
AO		 5178 else
5179 outrel.r_addend = 0;
351f65ca 5180 elf_append_rela (output_bfd, sreloc, &outrel);
67a4f2b7
AO		 5181 }
5182
6de2ae4a 5183 sreloc = htab->elf.srelgot;
67a4f2b7 5184
6de2ae4a
L		 5185 outrel.r_offset = (htab->elf.sgot->output_section->vma
5186 + htab->elf.sgot->output_offset + off);
bffbf940 5187
67a4f2b7 5188 if (GOT_TLS_GD_P (tls_type))
bffbf940 5189 dr_type = R_X86_64_DTPMOD64;
67a4f2b7
AO		 5190 else if (GOT_TLS_GDESC_P (tls_type))
5191 goto dr_done;
bffbf940
JJ		 5192 else
5193 dr_type = R_X86_64_TPOFF64;
5194
6de2ae4a 5195 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
bffbf940 5196 outrel.r_addend = 0;
67a4f2b7
AO		 5197 if ((dr_type == R_X86_64_TPOFF64
5198 || dr_type == R_X86_64_TLSDESC) && indx == 0)
351f65ca
L		 5199 outrel.r_addend = relocation - elf_x86_64_dtpoff_base (info);
5200 outrel.r_info = htab->r_info (indx, dr_type);
bffbf940 5201
351f65ca 5202 elf_append_rela (output_bfd, sreloc, &outrel);
bffbf940 5203
67a4f2b7 5204 if (GOT_TLS_GD_P (tls_type))
bffbf940
JJ		 5205 {
5206 if (indx == 0)
5207 {
d40d037c 5208 BFD_ASSERT (! unresolved_reloc);
bffbf940 5209 bfd_put_64 (output_bfd,
351f65ca 5210 relocation - elf_x86_64_dtpoff_base (info),
6de2ae4a 5211 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
bffbf940
JJ		 5212 }
5213 else
5214 {
5215 bfd_put_64 (output_bfd, 0,
6de2ae4a 5216 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 5217 outrel.r_info = htab->r_info (indx,
bffbf940
JJ		 5218 R_X86_64_DTPOFF64);
5219 outrel.r_offset += GOT_ENTRY_SIZE;
351f65ca 5220 elf_append_rela (output_bfd, sreloc,
464d3bd4 5221 &outrel);
bffbf940
JJ		 5222 }
5223 }
5224
67a4f2b7 5225 dr_done:
bffbf940
JJ		 5226 if (h != NULL)
5227 h->got.offset |= 1;
5228 else
5229 local_got_offsets[r_symndx] |= 1;
5230 }
5231
67a4f2b7
AO		 5232 if (off >= (bfd_vma) -2
5233 && ! GOT_TLS_GDESC_P (tls_type))
bffbf940 5234 abort ();
351f65ca 5235 if (r_type == ELF32_R_TYPE (rel->r_info))
bffbf940 5236 {
67a4f2b7
AO		 5237 if (r_type == R_X86_64_GOTPC32_TLSDESC
5238 || r_type == R_X86_64_TLSDESC_CALL)
6de2ae4a
L		 5239 relocation = htab->elf.sgotplt->output_section->vma
5240 + htab->elf.sgotplt->output_offset
67a4f2b7
AO		 5241 + offplt + htab->sgotplt_jump_table_size;
5242 else
6de2ae4a
L		 5243 relocation = htab->elf.sgot->output_section->vma
5244 + htab->elf.sgot->output_offset + off;
b34976b6 5245 unresolved_reloc = FALSE;
bffbf940 5246 }
142411ca 5247 else
67a4f2b7 5248 {
142411ca 5249 bfd_vma roff = rel->r_offset;
67a4f2b7 5250
351f65ca 5251 if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
142411ca 5252 {
52bc799a 5253 /* GD->IE transition. For 64bit, change
142411ca
L		 5254 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
5255 .word 0x6666; rex64; call __tls_get_addr@plt
52bc799a 5256 into:
142411ca 5257 movq %fs:0, %rax
52bc799a
L		 5258 addq foo@gottpoff(%rip), %rax
5259 For 32bit, change
5260 leaq foo@tlsgd(%rip), %rdi
5261 .word 0x6666; rex64; call __tls_get_addr@plt
5262 into:
5263 movl %fs:0, %eax
5c98a14e
JJ		 5264 addq foo@gottpoff(%rip), %rax
5265 For largepic, change:
5266 leaq foo@tlsgd(%rip), %rdi
5267 movabsq $__tls_get_addr@pltoff, %rax
5268 addq %rbx, %rax
5269 call *%rax
5270 into:
5271 movq %fs:0, %rax
5272 addq foo@gottpoff(%rax), %rax
5273 nopw 0x0(%rax,%rax,1) */
5274 int largepic = 0;
5275 if (ABI_64_P (output_bfd)
5276 && contents[roff + 5] == (bfd_byte) '\xb8')
5277 {
5278 memcpy (contents + roff - 3,
5279 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
5280 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
5281 largepic = 1;
5282 }
5283 else if (ABI_64_P (output_bfd))
52bc799a
L		 5284 memcpy (contents + roff - 4,
5285 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
5286 16);
5287 else
5288 memcpy (contents + roff - 3,
5289 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
5290 15);
142411ca 5291
6de2ae4a
L		 5292 relocation = (htab->elf.sgot->output_section->vma
5293 + htab->elf.sgot->output_offset + off
142411ca 5294 - roff
5c98a14e 5295 - largepic
142411ca
L		 5296 - input_section->output_section->vma
5297 - input_section->output_offset
5298 - 12);
5299 bfd_put_32 (output_bfd, relocation,
5c98a14e
JJ		 5300 contents + roff + 8 + largepic);
5301 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
142411ca 5302 rel++;
60f2e42e 5303 wrel++;
142411ca
L		 5304 continue;
5305 }
351f65ca 5306 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
142411ca
L		 5307 {
5308 /* GDesc -> IE transition.
5309 It's originally something like:
5310 leaq x@tlsdesc(%rip), %rax
67a4f2b7 5311
142411ca 5312 Change it to:
c9736ba0 5313 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
67a4f2b7 5314
142411ca
L		 5315 /* Now modify the instruction as appropriate. To
5316 turn a leaq into a movq in the form we use it, it
5317 suffices to change the second byte from 0x8d to
5318 0x8b. */
5319 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
5320
5321 bfd_put_32 (output_bfd,
6de2ae4a
L		 5322 htab->elf.sgot->output_section->vma
5323 + htab->elf.sgot->output_offset + off
142411ca
L		 5324 - rel->r_offset
5325 - input_section->output_section->vma
5326 - input_section->output_offset
5327 - 4,
5328 contents + roff);
5329 continue;
5330 }
351f65ca 5331 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
142411ca
L		 5332 {
5333 /* GDesc -> IE transition.
5334 It's originally:
5335 call *(%rax)
5336
5337 Change it to:
c9736ba0 5338 xchg %ax, %ax. */
142411ca 5339
142411ca
L		 5340 bfd_put_8 (output_bfd, 0x66, contents + roff);
5341 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
5342 continue;
5343 }
5344 else
5345 BFD_ASSERT (FALSE);
67a4f2b7 5346 }
bffbf940
JJ		 5347 break;
5348
5349 case R_X86_64_TLSLD:
351f65ca
L		 5350 if (! elf_x86_64_tls_transition (info, input_bfd,
5351 input_section, contents,
5352 symtab_hdr, sym_hashes,
5353 &r_type, GOT_UNKNOWN,
5354 rel, relend, h, r_symndx))
142411ca 5355 return FALSE;
a3fadc9a 5356
142411ca
L		 5357 if (r_type != R_X86_64_TLSLD)
5358 {
bffbf940 5359 /* LD->LE transition:
a3fadc9a 5360 leaq foo@tlsld(%rip), %rdi; call __tls_get_addr.
52bc799a
L		 5361 For 64bit, we change it into:
5362 .word 0x6666; .byte 0x66; movq %fs:0, %rax.
5363 For 32bit, we change it into:
5c98a14e
JJ		 5364 nopl 0x0(%rax); movl %fs:0, %eax.
5365 For largepic, change:
5366 leaq foo@tlsgd(%rip), %rdi
5367 movabsq $__tls_get_addr@pltoff, %rax
5368 addq %rbx, %rax
5369 call *%rax
5370 into:
5371 data32 data32 data32 nopw %cs:0x0(%rax,%rax,1)
5372 movq %fs:0, %eax */
142411ca
L		 5373
5374 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
5c98a14e
JJ		 5375 if (ABI_64_P (output_bfd)
5376 && contents[rel->r_offset + 5] == (bfd_byte) '\xb8')
5377 memcpy (contents + rel->r_offset - 3,
5378 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
5379 "\x64\x48\x8b\x04\x25\0\0\0", 22);
5380 else if (ABI_64_P (output_bfd))
52bc799a
L		 5381 memcpy (contents + rel->r_offset - 3,
5382 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
5383 else
5384 memcpy (contents + rel->r_offset - 3,
5385 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
5c98a14e 5386 /* Skip R_X86_64_PC32/R_X86_64_PLT32/R_X86_64_PLTOFF64. */
bffbf940 5387 rel++;
60f2e42e 5388 wrel++;
bffbf940
JJ		 5389 continue;
5390 }
5391
6de2ae4a 5392 if (htab->elf.sgot == NULL)
bffbf940
JJ		 5393 abort ();
5394
5395 off = htab->tls_ld_got.offset;
5396 if (off & 1)
5397 off &= ~1;
5398 else
5399 {
5400 Elf_Internal_Rela outrel;
bffbf940 5401
6de2ae4a 5402 if (htab->elf.srelgot == NULL)
bffbf940
JJ		 5403 abort ();
5404
6de2ae4a
L		 5405 outrel.r_offset = (htab->elf.sgot->output_section->vma
5406 + htab->elf.sgot->output_offset + off);
bffbf940
JJ		 5407
5408 bfd_put_64 (output_bfd, 0,
6de2ae4a 5409 htab->elf.sgot->contents + off);
bffbf940 5410 bfd_put_64 (output_bfd, 0,
6de2ae4a 5411 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
351f65ca 5412 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
bffbf940 5413 outrel.r_addend = 0;
351f65ca 5414 elf_append_rela (output_bfd, htab->elf.srelgot,
464d3bd4 5415 &outrel);
bffbf940
JJ		 5416 htab->tls_ld_got.offset |= 1;
5417 }
6de2ae4a
L		 5418 relocation = htab->elf.sgot->output_section->vma
5419 + htab->elf.sgot->output_offset + off;
b34976b6 5420 unresolved_reloc = FALSE;
bffbf940
JJ		 5421 break;
5422
5423 case R_X86_64_DTPOFF32:
0e1862bb
L		 5424 if (!bfd_link_executable (info)
5425 || (input_section->flags & SEC_CODE) == 0)
351f65ca 5426 relocation -= elf_x86_64_dtpoff_base (info);
bffbf940 5427 else
351f65ca 5428 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ		 5429 break;
5430
5431 case R_X86_64_TPOFF32:
6769d501 5432 case R_X86_64_TPOFF64:
0e1862bb 5433 BFD_ASSERT (bfd_link_executable (info));
351f65ca 5434 relocation = elf_x86_64_tpoff (info, relocation);
bffbf940
JJ		 5435 break;
5436
a69ed7f7
L		 5437 case R_X86_64_DTPOFF64:
5438 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
5439 relocation -= elf_x86_64_dtpoff_base (info);
5440 break;
5441
70256ad8
AJ		 5442 default:
5443 break;
5444 }
8d88c4ca 5445
239e1f3a
AM		 5446 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
5447 because such sections are not SEC_ALLOC and thus ld.so will
5448 not process them. */
c434dee6 5449 if (unresolved_reloc
239e1f3a 5450 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM		 5451 && h->def_dynamic)
5452 && _bfd_elf_section_offset (output_bfd, info, input_section,
5453 rel->r_offset) != (bfd_vma) -1)
a040981f
L		 5454 {
5455 (*_bfd_error_handler)
5456 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
5457 input_bfd,
5458 input_section,
5459 (long) rel->r_offset,
5460 howto->name,
5461 h->root.root.string);
5462 return FALSE;
5463 }
c434dee6 5464
cbe950e9 5465do_relocation:
8d88c4ca 5466 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
c434dee6
AJ		 5467 contents, rel->r_offset,
5468 relocation, rel->r_addend);
8d88c4ca 5469
62d78908 5470check_relocation_error:
8d88c4ca 5471 if (r != bfd_reloc_ok)
8da6118f 5472 {
c434dee6
AJ		 5473 const char *name;
5474
5475 if (h != NULL)
5476 name = h->root.root.string;
5477 else
8da6118f 5478 {
c434dee6
AJ		 5479 name = bfd_elf_string_from_elf_section (input_bfd,
5480 symtab_hdr->sh_link,
5481 sym->st_name);
5482 if (name == NULL)
b34976b6 5483 return FALSE;
c434dee6
AJ		 5484 if (*name == '\0')
5485 name = bfd_section_name (input_bfd, sec);
5486 }
5487
5488 if (r == bfd_reloc_overflow)
5489 {
c434dee6 5490 if (! ((*info->callbacks->reloc_overflow)
dfeffb9f
L		 5491 (info, (h ? &h->root : NULL), name, howto->name,
5492 (bfd_vma) 0, input_bfd, input_section,
5493 rel->r_offset)))
b34976b6 5494 return FALSE;
c434dee6
AJ		 5495 }
5496 else
5497 {
5498 (*_bfd_error_handler)
bb95161d 5499 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
d003868e 5500 input_bfd, input_section,
c434dee6 5501 (long) rel->r_offset, name, (int) r);
b34976b6 5502 return FALSE;
8da6118f
KH		 5503 }
5504 }
60f2e42e
L		 5505
5506 if (wrel != rel)
5507 *wrel = *rel;
5508 }
5509
5510 if (wrel != rel)
5511 {
5512 Elf_Internal_Shdr *rel_hdr;
5513 size_t deleted = rel - wrel;
5514
5515 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
5516 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5517 if (rel_hdr->sh_size == 0)
5518 {
5519 /* It is too late to remove an empty reloc section. Leave
5520 one NONE reloc.
5521 ??? What is wrong with an empty section??? */
5522 rel_hdr->sh_size = rel_hdr->sh_entsize;
5523 deleted -= 1;
5524 }
5525 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
5526 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5527 input_section->reloc_count -= deleted;
8d88c4ca 5528 }
70256ad8 5529
b34976b6 5530 return TRUE;
70256ad8
AJ		 5531}
5532
5533/* Finish up dynamic symbol handling. We set the contents of various
5534 dynamic sections here. */
5535
b34976b6 5536static bfd_boolean
351f65ca
L		 5537elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
5538 struct bfd_link_info *info,
5539 struct elf_link_hash_entry *h,
aec6b87e 5540 Elf_Internal_Sym *sym)
70256ad8 5541{
351f65ca 5542 struct elf_x86_64_link_hash_table *htab;
0ff2b86e
L		 5543 const struct elf_x86_64_backend_data *abed;
5544 bfd_boolean use_plt_bnd;
dd7e64d4 5545 struct elf_x86_64_link_hash_entry *eh;
aec6b87e 5546 bfd_boolean local_undefweak;
70256ad8 5547
351f65ca 5548 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 5549 if (htab == NULL)
5550 return FALSE;
70256ad8 5551
0ff2b86e
L		 5552 /* Use MPX backend data in case of BND relocation. Use .plt_bnd
5553 section only if there is .plt section. */
5554 use_plt_bnd = htab->elf.splt != NULL && htab->plt_bnd != NULL;
5555 abed = (use_plt_bnd
5556 ? &elf_x86_64_bnd_arch_bed
5557 : get_elf_x86_64_backend_data (output_bfd));
5558
dd7e64d4
L		 5559 eh = (struct elf_x86_64_link_hash_entry *) h;
5560
aec6b87e
L		 5561 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
5562 resolved undefined weak symbols in executable so that their
5563 references have value 0 at run-time. */
5564 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
5565
70256ad8
AJ		 5566 if (h->plt.offset != (bfd_vma) -1)
5567 {
70256ad8 5568 bfd_vma plt_index;
0ff2b86e
L		 5569 bfd_vma got_offset, plt_offset, plt_plt_offset, plt_got_offset;
5570 bfd_vma plt_plt_insn_end, plt_got_insn_size;
70256ad8 5571 Elf_Internal_Rela rela;
947216bf 5572 bfd_byte *loc;
0ff2b86e 5573 asection *plt, *gotplt, *relplt, *resolved_plt;
351f65ca 5574 const struct elf_backend_data *bed;
5974eba6 5575 bfd_vma plt_got_pcrel_offset;
cbe950e9
L		 5576
5577 /* When building a static executable, use .iplt, .igot.plt and
5578 .rela.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 5579 if (htab->elf.splt != NULL)
cbe950e9 5580 {
6de2ae4a
L		 5581 plt = htab->elf.splt;
5582 gotplt = htab->elf.sgotplt;
5583 relplt = htab->elf.srelplt;
cbe950e9
L		 5584 }
5585 else
5586 {
6de2ae4a
L		 5587 plt = htab->elf.iplt;
5588 gotplt = htab->elf.igotplt;
5589 relplt = htab->elf.irelplt;
cbe950e9 5590 }
70256ad8
AJ		 5591
5592 /* This symbol has an entry in the procedure linkage table. Set
407443a3 5593 it up. */
cbe950e9 5594 if ((h->dynindx == -1
aec6b87e 5595 && !local_undefweak
0e1862bb 5596 && !((h->forced_local || bfd_link_executable (info))
cbe950e9
L		 5597 && h->def_regular
5598 && h->type == STT_GNU_IFUNC))
5599 || plt == NULL
5600 || gotplt == NULL
5601 || relplt == NULL)
cec7f46a 5602 abort ();
70256ad8
AJ		 5603
5604 /* Get the index in the procedure linkage table which
5605 corresponds to this symbol. This is the index of this symbol
5606 in all the symbols for which we are making plt entries. The
cbe950e9 5607 first entry in the procedure linkage table is reserved.
6bbec505 5608
cbe950e9 5609 Get the offset into the .got table of the entry that
407443a3 5610 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
cbe950e9
L		 5611 bytes. The first three are reserved for the dynamic linker.
5612
5613 For static executables, we don't reserve anything. */
5614
6de2ae4a 5615 if (plt == htab->elf.splt)
cbe950e9 5616 {
eed180f8 5617 got_offset = h->plt.offset / abed->plt_entry_size - 1;
e1f98742 5618 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
cbe950e9
L		 5619 }
5620 else
5621 {
eed180f8 5622 got_offset = h->plt.offset / abed->plt_entry_size;
e1f98742 5623 got_offset = got_offset * GOT_ENTRY_SIZE;
cbe950e9 5624 }
70256ad8 5625
0ff2b86e
L		 5626 plt_plt_insn_end = abed->plt_plt_insn_end;
5627 plt_plt_offset = abed->plt_plt_offset;
5628 plt_got_insn_size = abed->plt_got_insn_size;
5629 plt_got_offset = abed->plt_got_offset;
5630 if (use_plt_bnd)
5631 {
5632 /* Use the second PLT with BND relocations. */
5633 const bfd_byte *plt_entry, *plt2_entry;
0ff2b86e
L		 5634
5635 if (eh->has_bnd_reloc)
5636 {
5637 plt_entry = elf_x86_64_bnd_plt_entry;
5638 plt2_entry = elf_x86_64_bnd_plt2_entry;
5639 }
5640 else
5641 {
5642 plt_entry = elf_x86_64_legacy_plt_entry;
5643 plt2_entry = elf_x86_64_legacy_plt2_entry;
5644
5645 /* Subtract 1 since there is no BND prefix. */
5646 plt_plt_insn_end -= 1;
5647 plt_plt_offset -= 1;
5648 plt_got_insn_size -= 1;
5649 plt_got_offset -= 1;
5650 }
5651
5652 BFD_ASSERT (sizeof (elf_x86_64_bnd_plt_entry)
5653 == sizeof (elf_x86_64_legacy_plt_entry));
5654
5655 /* Fill in the entry in the procedure linkage table. */
5656 memcpy (plt->contents + h->plt.offset,
5657 plt_entry, sizeof (elf_x86_64_legacy_plt_entry));
5658 /* Fill in the entry in the second PLT. */
5659 memcpy (htab->plt_bnd->contents + eh->plt_bnd.offset,
5660 plt2_entry, sizeof (elf_x86_64_legacy_plt2_entry));
5661
5662 resolved_plt = htab->plt_bnd;
5663 plt_offset = eh->plt_bnd.offset;
5664 }
5665 else
5666 {
5667 /* Fill in the entry in the procedure linkage table. */
5668 memcpy (plt->contents + h->plt.offset, abed->plt_entry,
5669 abed->plt_entry_size);
5670
5671 resolved_plt = plt;
5672 plt_offset = h->plt.offset;
5673 }
eed180f8
RM		 5674
5675 /* Insert the relocation positions of the plt section. */
5676
5677 /* Put offset the PC-relative instruction referring to the GOT entry,
5678 subtracting the size of that instruction. */
ab7fede8
L		 5679 plt_got_pcrel_offset = (gotplt->output_section->vma
5680 + gotplt->output_offset
5681 + got_offset
5682 - resolved_plt->output_section->vma
5683 - resolved_plt->output_offset
5684 - plt_offset
5685 - plt_got_insn_size);
5686
5687 /* Check PC-relative offset overflow in PLT entry. */
5974eba6 5688 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
ab7fede8
L		 5689 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in PLT entry for `%s'\n"),
5690 output_bfd, h->root.root.string);
5691
5692 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
0ff2b86e 5693 resolved_plt->contents + plt_offset + plt_got_offset);
cbe950e9 5694
653165cc 5695 /* Fill in the entry in the global offset table, initially this
aec6b87e
L		 5696 points to the second part of the PLT entry. Leave the entry
5697 as zero for undefined weak symbol in PIE. No PLT relocation
5698 against undefined weak symbol in PIE. */
5699 if (!local_undefweak)
cbe950e9 5700 {
aec6b87e
L		 5701 bfd_put_64 (output_bfd, (plt->output_section->vma
5702 + plt->output_offset
5703 + h->plt.offset
5704 + abed->plt_lazy_offset),
5705 gotplt->contents + got_offset);
5706
5707 /* Fill in the entry in the .rela.plt section. */
5708 rela.r_offset = (gotplt->output_section->vma
5709 + gotplt->output_offset
5710 + got_offset);
5711 if (h->dynindx == -1
5712 || ((bfd_link_executable (info)
5713 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
5714 && h->def_regular
5715 && h->type == STT_GNU_IFUNC))
5716 {
5717 /* If an STT_GNU_IFUNC symbol is locally defined, generate
5718 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
5719 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
5720 rela.r_addend = (h->root.u.def.value
5721 + h->root.u.def.section->output_section->vma
5722 + h->root.u.def.section->output_offset);
5723 /* R_X86_64_IRELATIVE comes last. */
5724 plt_index = htab->next_irelative_index--;
5725 }
5726 else
5727 {
5728 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
5729 rela.r_addend = 0;
5730 plt_index = htab->next_jump_slot_index++;
5731 }
e1f98742 5732
aec6b87e
L		 5733 /* Don't fill PLT entry for static executables. */
5734 if (plt == htab->elf.splt)
5735 {
5736 bfd_vma plt0_offset = h->plt.offset + plt_plt_insn_end;
5737
5738 /* Put relocation index. */
5739 bfd_put_32 (output_bfd, plt_index,
5740 (plt->contents + h->plt.offset
5741 + abed->plt_reloc_offset));
5742
5743 /* Put offset for jmp .PLT0 and check for overflow. We don't
5744 check relocation index for overflow since branch displacement
5745 will overflow first. */
5746 if (plt0_offset > 0x80000000)
5747 info->callbacks->einfo (_("%F%B: branch displacement overflow in PLT entry for `%s'\n"),
5748 output_bfd, h->root.root.string);
5749 bfd_put_32 (output_bfd, - plt0_offset,
5750 plt->contents + h->plt.offset + plt_plt_offset);
5751 }
351f65ca 5752
aec6b87e
L		 5753 bed = get_elf_backend_data (output_bfd);
5754 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
5755 bed->s->swap_reloca_out (output_bfd, &rela, loc);
5756 }
dd7e64d4
L		 5757 }
5758 else if (eh->plt_got.offset != (bfd_vma) -1)
5759 {
5760 bfd_vma got_offset, plt_offset, plt_got_offset, plt_got_insn_size;
5761 asection *plt, *got;
5762 bfd_boolean got_after_plt;
5763 int32_t got_pcrel_offset;
5764 const bfd_byte *got_plt_entry;
5765
5766 /* Set the entry in the GOT procedure linkage table. */
5767 plt = htab->plt_got;
5768 got = htab->elf.sgot;
5769 got_offset = h->got.offset;
5770
5771 if (got_offset == (bfd_vma) -1
5772 || h->type == STT_GNU_IFUNC
5773 || plt == NULL
5774 || got == NULL)
5775 abort ();
70256ad8 5776
dd7e64d4
L		 5777 /* Use the second PLT entry template for the GOT PLT since they
5778 are the identical. */
5779 plt_got_insn_size = elf_x86_64_bnd_arch_bed.plt_got_insn_size;
5780 plt_got_offset = elf_x86_64_bnd_arch_bed.plt_got_offset;
5781 if (eh->has_bnd_reloc)
5782 got_plt_entry = elf_x86_64_bnd_plt2_entry;
5783 else
70256ad8 5784 {
dd7e64d4
L		 5785 got_plt_entry = elf_x86_64_legacy_plt2_entry;
5786
5787 /* Subtract 1 since there is no BND prefix. */
5788 plt_got_insn_size -= 1;
5789 plt_got_offset -= 1;
70256ad8 5790 }
dd7e64d4
L		 5791
5792 /* Fill in the entry in the GOT procedure linkage table. */
5793 plt_offset = eh->plt_got.offset;
5794 memcpy (plt->contents + plt_offset,
5795 got_plt_entry, sizeof (elf_x86_64_legacy_plt2_entry));
5796
5797 /* Put offset the PC-relative instruction referring to the GOT
5798 entry, subtracting the size of that instruction. */
5799 got_pcrel_offset = (got->output_section->vma
5800 + got->output_offset
5801 + got_offset
5802 - plt->output_section->vma
5803 - plt->output_offset
5804 - plt_offset
5805 - plt_got_insn_size);
5806
5807 /* Check PC-relative offset overflow in GOT PLT entry. */
5808 got_after_plt = got->output_section->vma > plt->output_section->vma;
5809 if ((got_after_plt && got_pcrel_offset < 0)
5810 || (!got_after_plt && got_pcrel_offset > 0))
5811 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
5812 output_bfd, h->root.root.string);
5813
5814 bfd_put_32 (output_bfd, got_pcrel_offset,
5815 plt->contents + plt_offset + plt_got_offset);
5816 }
5817
aec6b87e
L		 5818 if (!local_undefweak
5819 && !h->def_regular
dd7e64d4
L		 5820 && (h->plt.offset != (bfd_vma) -1
5821 || eh->plt_got.offset != (bfd_vma) -1))
5822 {
5823 /* Mark the symbol as undefined, rather than as defined in
5824 the .plt section. Leave the value if there were any
5825 relocations where pointer equality matters (this is a clue
5826 for the dynamic linker, to make function pointer
5827 comparisons work between an application and shared
5828 library), otherwise set it to zero. If a function is only
5829 called from a binary, there is no need to slow down
5830 shared libraries because of that. */
5831 sym->st_shndx = SHN_UNDEF;
5832 if (!h->pointer_equality_needed)
5833 sym->st_value = 0;
70256ad8
AJ		 5834 }
5835
aec6b87e
L		 5836 /* Don't generate dynamic GOT relocation against undefined weak
5837 symbol in executable. */
bffbf940 5838 if (h->got.offset != (bfd_vma) -1
351f65ca 5839 && ! GOT_TLS_GD_ANY_P (elf_x86_64_hash_entry (h)->tls_type)
aec6b87e
L		 5840 && elf_x86_64_hash_entry (h)->tls_type != GOT_TLS_IE
5841 && !local_undefweak)
053579d7 5842 {
053579d7
AJ		 5843 Elf_Internal_Rela rela;
5844
5845 /* This symbol has an entry in the global offset table. Set it
bffbf940 5846 up. */
6de2ae4a 5847 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
c434dee6 5848 abort ();
053579d7 5849
6de2ae4a
L		 5850 rela.r_offset = (htab->elf.sgot->output_section->vma
5851 + htab->elf.sgot->output_offset
dc810e39 5852 + (h->got.offset &~ (bfd_vma) 1));
053579d7
AJ		 5853
5854 /* If this is a static link, or it is a -Bsymbolic link and the
5855 symbol is defined locally or was forced to be local because
5856 of a version file, we just want to emit a RELATIVE reloc.
5857 The entry in the global offset table will already have been
5858 initialized in the relocate_section function. */
710ab287 5859 if (h->def_regular
0018b0a3
L		 5860 && h->type == STT_GNU_IFUNC)
5861 {
0e1862bb 5862 if (bfd_link_pic (info))
710ab287
L		 5863 {
5864 /* Generate R_X86_64_GLOB_DAT. */
5865 goto do_glob_dat;
5866 }
5867 else
5868 {
90d60710
L		 5869 asection *plt;
5870
710ab287
L		 5871 if (!h->pointer_equality_needed)
5872 abort ();
5873
5874 /* For non-shared object, we can't use .got.plt, which
5875 contains the real function addres if we need pointer
5876 equality. We load the GOT entry with the PLT entry. */
90d60710 5877 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
710ab287
L		 5878 bfd_put_64 (output_bfd, (plt->output_section->vma
5879 + plt->output_offset
5880 + h->plt.offset),
6de2ae4a 5881 htab->elf.sgot->contents + h->got.offset);
710ab287
L		 5882 return TRUE;
5883 }
0018b0a3 5884 }
0e1862bb 5885 else if (bfd_link_pic (info)
0018b0a3 5886 && SYMBOL_REFERENCES_LOCAL (info, h))
053579d7 5887 {
41bed6dd
L		 5888 if (!h->def_regular)
5889 return FALSE;
cc78d0af 5890 BFD_ASSERT((h->got.offset & 1) != 0);
351f65ca 5891 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
053579d7
AJ		 5892 rela.r_addend = (h->root.u.def.value
5893 + h->root.u.def.section->output_section->vma
5894 + h->root.u.def.section->output_offset);
5895 }
5896 else
5897 {
5898 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 5899do_glob_dat:
c434dee6 5900 bfd_put_64 (output_bfd, (bfd_vma) 0,
6de2ae4a 5901 htab->elf.sgot->contents + h->got.offset);
351f65ca 5902 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
053579d7
AJ		 5903 rela.r_addend = 0;
5904 }
5905
351f65ca 5906 elf_append_rela (output_bfd, htab->elf.srelgot, &rela);
053579d7
AJ		 5907 }
5908
f5385ebf 5909 if (h->needs_copy)
70256ad8 5910 {
70256ad8
AJ		 5911 Elf_Internal_Rela rela;
5912
5913 /* This symbol needs a copy reloc. Set it up. */
5914
c434dee6
AJ		 5915 if (h->dynindx == -1
5916 || (h->root.type != bfd_link_hash_defined
5917 && h->root.type != bfd_link_hash_defweak)
5918 || htab->srelbss == NULL)
5919 abort ();
70256ad8
AJ		 5920
5921 rela.r_offset = (h->root.u.def.value
5922 + h->root.u.def.section->output_section->vma
5923 + h->root.u.def.section->output_offset);
351f65ca 5924 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
70256ad8 5925 rela.r_addend = 0;
351f65ca 5926 elf_append_rela (output_bfd, htab->srelbss, &rela);
70256ad8
AJ		 5927 }
5928
b34976b6 5929 return TRUE;
70256ad8
AJ		 5930}
5931
c25bc9fc
L		 5932/* Finish up local dynamic symbol handling. We set the contents of
5933 various dynamic sections here. */
5934
5935static bfd_boolean
351f65ca 5936elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
c25bc9fc
L		 5937{
5938 struct elf_link_hash_entry *h
5939 = (struct elf_link_hash_entry *) *slot;
5940 struct bfd_link_info *info
eed180f8 5941 = (struct bfd_link_info *) inf;
c25bc9fc 5942
351f65ca 5943 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
c25bc9fc
L		 5944 info, h, NULL);
5945}
5946
aec6b87e
L		 5947/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
5948 here since undefined weak symbol may not be dynamic and may not be
5949 called for elf_x86_64_finish_dynamic_symbol. */
5950
5951static bfd_boolean
5952elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
5953 void *inf)
5954{
5955 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
5956 struct bfd_link_info *info = (struct bfd_link_info *) inf;
5957
5958 if (h->root.type != bfd_link_hash_undefweak
5959 || h->dynindx != -1)
5960 return TRUE;
5961
5962 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
5963 info, h, NULL);
5964}
5965
c434dee6
AJ		 5966/* Used to decide how to sort relocs in an optimal manner for the
5967 dynamic linker, before writing them out. */
5968
5969static enum elf_reloc_type_class
cae1fbbb 5970elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
7e612e98
AM		 5971 const asection *rel_sec ATTRIBUTE_UNUSED,
5972 const Elf_Internal_Rela *rela)
c434dee6 5973{
cae1fbbb
L		 5974 bfd *abfd = info->output_bfd;
5975 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
5976 struct elf_x86_64_link_hash_table *htab = elf_x86_64_hash_table (info);
cae1fbbb 5977
d9e3b590
L		 5978 if (htab->elf.dynsym != NULL
5979 && htab->elf.dynsym->contents != NULL)
5980 {
5981 /* Check relocation against STT_GNU_IFUNC symbol if there are
5982 dynamic symbols. */
5983 unsigned long r_symndx = htab->r_sym (rela->r_info);
5984 Elf_Internal_Sym sym;
5985 if (!bed->s->swap_symbol_in (abfd,
5986 (htab->elf.dynsym->contents
5987 + r_symndx * bed->s->sizeof_sym),
5988 0, &sym))
5989 abort ();
5990
5991 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
5992 return reloc_class_ifunc;
5993 }
cae1fbbb 5994
351f65ca 5995 switch ((int) ELF32_R_TYPE (rela->r_info))
c434dee6
AJ		 5996 {
5997 case R_X86_64_RELATIVE:
1da80baa 5998 case R_X86_64_RELATIVE64:
c434dee6
AJ		 5999 return reloc_class_relative;
6000 case R_X86_64_JUMP_SLOT:
6001 return reloc_class_plt;
6002 case R_X86_64_COPY:
6003 return reloc_class_copy;
6004 default:
6005 return reloc_class_normal;
6006 }
6007}
6008
70256ad8
AJ		 6009/* Finish up the dynamic sections. */
6010
b34976b6 6011static bfd_boolean
351f65ca
L		 6012elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
6013 struct bfd_link_info *info)
70256ad8 6014{
351f65ca 6015 struct elf_x86_64_link_hash_table *htab;
70256ad8
AJ		 6016 bfd *dynobj;
6017 asection *sdyn;
0ff2b86e 6018 const struct elf_x86_64_backend_data *abed;
70256ad8 6019
351f65ca 6020 htab = elf_x86_64_hash_table (info);
4dfe6ac6
NC		 6021 if (htab == NULL)
6022 return FALSE;
6023
0ff2b86e
L		 6024 /* Use MPX backend data in case of BND relocation. Use .plt_bnd
6025 section only if there is .plt section. */
6026 abed = (htab->elf.splt != NULL && htab->plt_bnd != NULL
6027 ? &elf_x86_64_bnd_arch_bed
6028 : get_elf_x86_64_backend_data (output_bfd));
6029
c434dee6 6030 dynobj = htab->elf.dynobj;
3d4d4302 6031 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
70256ad8 6032
c434dee6 6033 if (htab->elf.dynamic_sections_created)
70256ad8 6034 {
82e96e07
L		 6035 bfd_byte *dyncon, *dynconend;
6036 const struct elf_backend_data *bed;
6037 bfd_size_type sizeof_dyn;
70256ad8 6038
6de2ae4a 6039 if (sdyn == NULL || htab->elf.sgot == NULL)
c434dee6 6040 abort ();
70256ad8 6041
82e96e07
L		 6042 bed = get_elf_backend_data (dynobj);
6043 sizeof_dyn = bed->s->sizeof_dyn;
6044 dyncon = sdyn->contents;
6045 dynconend = sdyn->contents + sdyn->size;
6046 for (; dyncon < dynconend; dyncon += sizeof_dyn)
70256ad8
AJ		 6047 {
6048 Elf_Internal_Dyn dyn;
70256ad8
AJ		 6049 asection *s;
6050
82e96e07 6051 (*bed->s->swap_dyn_in) (dynobj, dyncon, &dyn);
70256ad8
AJ		 6052
6053 switch (dyn.d_tag)
6054 {
6055 default:
053579d7 6056 continue;
70256ad8
AJ		 6057
6058 case DT_PLTGOT:
6de2ae4a 6059 s = htab->elf.sgotplt;
8c37241b 6060 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
c434dee6 6061 break;
70256ad8
AJ		 6062
6063 case DT_JMPREL:
6de2ae4a 6064 dyn.d_un.d_ptr = htab->elf.srelplt->output_section->vma;
c434dee6 6065 break;
70256ad8 6066
c434dee6 6067 case DT_PLTRELSZ:
6de2ae4a 6068 s = htab->elf.srelplt->output_section;
eea6121a 6069 dyn.d_un.d_val = s->size;
70256ad8
AJ		 6070 break;
6071
6072 case DT_RELASZ:
c434dee6
AJ		 6073 /* The procedure linkage table relocs (DT_JMPREL) should
6074 not be included in the overall relocs (DT_RELA).
6075 Therefore, we override the DT_RELASZ entry here to
6076 make it not include the JMPREL relocs. Since the
6077 linker script arranges for .rela.plt to follow all
6078 other relocation sections, we don't have to worry
6079 about changing the DT_RELA entry. */
6de2ae4a 6080 if (htab->elf.srelplt != NULL)
70256ad8 6081 {
6de2ae4a 6082 s = htab->elf.srelplt->output_section;
eea6121a 6083 dyn.d_un.d_val -= s->size;
70256ad8
AJ		 6084 }
6085 break;
67a4f2b7
AO		 6086
6087 case DT_TLSDESC_PLT:
6de2ae4a 6088 s = htab->elf.splt;
67a4f2b7
AO		 6089 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
6090 + htab->tlsdesc_plt;
6091 break;
6092
6093 case DT_TLSDESC_GOT:
6de2ae4a 6094 s = htab->elf.sgot;
67a4f2b7
AO		 6095 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
6096 + htab->tlsdesc_got;
6097 break;
70256ad8 6098 }
c434dee6 6099
82e96e07 6100 (*bed->s->swap_dyn_out) (output_bfd, &dyn, dyncon);
70256ad8
AJ		 6101 }
6102
c434dee6 6103 /* Fill in the special first entry in the procedure linkage table. */
6de2ae4a 6104 if (htab->elf.splt && htab->elf.splt->size > 0)
70256ad8 6105 {
653165cc 6106 /* Fill in the first entry in the procedure linkage table. */
eed180f8
RM		 6107 memcpy (htab->elf.splt->contents,
6108 abed->plt0_entry, abed->plt_entry_size);
653165cc
AJ		 6109 /* Add offset for pushq GOT+8(%rip), since the instruction
6110 uses 6 bytes subtract this value. */
6111 bfd_put_32 (output_bfd,
6de2ae4a
L		 6112 (htab->elf.sgotplt->output_section->vma
6113 + htab->elf.sgotplt->output_offset
653165cc 6114 + 8
6de2ae4a
L		 6115 - htab->elf.splt->output_section->vma
6116 - htab->elf.splt->output_offset
653165cc 6117 - 6),
eed180f8
RM		 6118 htab->elf.splt->contents + abed->plt0_got1_offset);
6119 /* Add offset for the PC-relative instruction accessing GOT+16,
6120 subtracting the offset to the end of that instruction. */
653165cc 6121 bfd_put_32 (output_bfd,
6de2ae4a
L		 6122 (htab->elf.sgotplt->output_section->vma
6123 + htab->elf.sgotplt->output_offset
653165cc 6124 + 16
6de2ae4a
L		 6125 - htab->elf.splt->output_section->vma
6126 - htab->elf.splt->output_offset
eed180f8
RM		 6127 - abed->plt0_got2_insn_end),
6128 htab->elf.splt->contents + abed->plt0_got2_offset);
653165cc 6129
eed180f8
RM		 6130 elf_section_data (htab->elf.splt->output_section)
6131 ->this_hdr.sh_entsize = abed->plt_entry_size;
67a4f2b7
AO		 6132
6133 if (htab->tlsdesc_plt)
6134 {
6135 bfd_put_64 (output_bfd, (bfd_vma) 0,
6de2ae4a 6136 htab->elf.sgot->contents + htab->tlsdesc_got);
67a4f2b7 6137
6de2ae4a 6138 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
eed180f8 6139 abed->plt0_entry, abed->plt_entry_size);
67a4f2b7
AO		 6140
6141 /* Add offset for pushq GOT+8(%rip), since the
6142 instruction uses 6 bytes subtract this value. */
6143 bfd_put_32 (output_bfd,
6de2ae4a
L		 6144 (htab->elf.sgotplt->output_section->vma
6145 + htab->elf.sgotplt->output_offset
67a4f2b7 6146 + 8
6de2ae4a
L		 6147 - htab->elf.splt->output_section->vma
6148 - htab->elf.splt->output_offset
67a4f2b7
AO		 6149 - htab->tlsdesc_plt
6150 - 6),
eed180f8
RM		 6151 htab->elf.splt->contents
6152 + htab->tlsdesc_plt + abed->plt0_got1_offset);
6153 /* Add offset for the PC-relative instruction accessing GOT+TDG,
6154 where TGD stands for htab->tlsdesc_got, subtracting the offset
6155 to the end of that instruction. */
67a4f2b7 6156 bfd_put_32 (output_bfd,
6de2ae4a
L		 6157 (htab->elf.sgot->output_section->vma
6158 + htab->elf.sgot->output_offset
67a4f2b7 6159 + htab->tlsdesc_got
6de2ae4a
L		 6160 - htab->elf.splt->output_section->vma
6161 - htab->elf.splt->output_offset
67a4f2b7 6162 - htab->tlsdesc_plt
eed180f8
RM		 6163 - abed->plt0_got2_insn_end),
6164 htab->elf.splt->contents
6165 + htab->tlsdesc_plt + abed->plt0_got2_offset);
67a4f2b7 6166 }
70256ad8 6167 }
70256ad8
AJ		 6168 }
6169
0ff2b86e
L		 6170 if (htab->plt_bnd != NULL)
6171 elf_section_data (htab->plt_bnd->output_section)
6172 ->this_hdr.sh_entsize = sizeof (elf_x86_64_bnd_plt2_entry);
6173
6de2ae4a 6174 if (htab->elf.sgotplt)
70256ad8 6175 {
56d4289c
L		 6176 if (bfd_is_abs_section (htab->elf.sgotplt->output_section))
6177 {
6178 (*_bfd_error_handler)
6179 (_("discarded output section: `%A'"), htab->elf.sgotplt);
6180 return FALSE;
6181 }
6182
c434dee6 6183 /* Fill in the first three entries in the global offset table. */
6de2ae4a 6184 if (htab->elf.sgotplt->size > 0)
c434dee6
AJ		 6185 {
6186 /* Set the first entry in the global offset table to the address of
6187 the dynamic section. */
6188 if (sdyn == NULL)
6de2ae4a 6189 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->elf.sgotplt->contents);
c434dee6
AJ		 6190 else
6191 bfd_put_64 (output_bfd,
6192 sdyn->output_section->vma + sdyn->output_offset,
6de2ae4a 6193 htab->elf.sgotplt->contents);
c434dee6 6194 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
6de2ae4a
L		 6195 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->elf.sgotplt->contents + GOT_ENTRY_SIZE);
6196 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->elf.sgotplt->contents + GOT_ENTRY_SIZE*2);
c434dee6 6197 }
70256ad8 6198
6de2ae4a 6199 elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize =
c434dee6
AJ		 6200 GOT_ENTRY_SIZE;
6201 }
70256ad8 6202
e41b3a13 6203 /* Adjust .eh_frame for .plt section. */
9a2a56cc
AM		 6204 if (htab->plt_eh_frame != NULL
6205 && htab->plt_eh_frame->contents != NULL)
e41b3a13
JJ		 6206 {
6207 if (htab->elf.splt != NULL
6208 && htab->elf.splt->size != 0
6209 && (htab->elf.splt->flags & SEC_EXCLUDE) == 0
6210 && htab->elf.splt->output_section != NULL
6211 && htab->plt_eh_frame->output_section != NULL)
6212 {
6213 bfd_vma plt_start = htab->elf.splt->output_section->vma;
6214 bfd_vma eh_frame_start = htab->plt_eh_frame->output_section->vma
6215 + htab->plt_eh_frame->output_offset
6216 + PLT_FDE_START_OFFSET;
6217 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
6218 htab->plt_eh_frame->contents
6219 + PLT_FDE_START_OFFSET);
6220 }
dbaa2011 6221 if (htab->plt_eh_frame->sec_info_type == SEC_INFO_TYPE_EH_FRAME)
e41b3a13
JJ		 6222 {
6223 if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
6224 htab->plt_eh_frame,
6225 htab->plt_eh_frame->contents))
6226 return FALSE;
6227 }
6228 }
6229
6de2ae4a
L		 6230 if (htab->elf.sgot && htab->elf.sgot->size > 0)
6231 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize
8c37241b
JJ		 6232 = GOT_ENTRY_SIZE;
6233
c25bc9fc
L		 6234 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
6235 htab_traverse (htab->loc_hash_table,
351f65ca 6236 elf_x86_64_finish_local_dynamic_symbol,
c25bc9fc
L		 6237 info);
6238
aec6b87e
L		 6239 /* Fill PLT entries for undefined weak symbols in PIE. */
6240 if (bfd_link_pie (info))
6241 bfd_hash_traverse (&info->hash->table,
6242 elf_x86_64_pie_finish_undefweak_symbol,
6243 info);
6244
b34976b6 6245 return TRUE;
8d88c4ca
NC		 6246}
6247
3972882e 6248/* Return an array of PLT entry symbol values. */
4c45e5c9 6249
3972882e
L		 6250static bfd_vma *
6251elf_x86_64_get_plt_sym_val (bfd *abfd, asymbol **dynsyms, asection *plt,
6252 asection *relplt)
4c45e5c9 6253{
3972882e
L		 6254 bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
6255 arelent *p;
6256 long count, i;
6257 bfd_vma *plt_sym_val;
144bed8d 6258 bfd_vma plt_offset;
3972882e
L		 6259 bfd_byte *plt_contents;
6260 const struct elf_x86_64_backend_data *bed;
6261 Elf_Internal_Shdr *hdr;
6262 asection *plt_bnd;
144bed8d 6263
3972882e
L		 6264 /* Get the .plt section contents. PLT passed down may point to the
6265 .plt.bnd section. Make sure that PLT always points to the .plt
6266 section. */
6267 plt_bnd = bfd_get_section_by_name (abfd, ".plt.bnd");
6268 if (plt_bnd)
6269 {
6270 if (plt != plt_bnd)
6271 abort ();
6272 plt = bfd_get_section_by_name (abfd, ".plt");
6273 if (plt == NULL)
6274 abort ();
6275 bed = &elf_x86_64_bnd_arch_bed;
6276 }
6277 else
6278 bed = get_elf_x86_64_backend_data (abfd);
cca5b8b6 6279
3972882e
L		 6280 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
6281 if (plt_contents == NULL)
6282 return NULL;
6283 if (!bfd_get_section_contents (abfd, (asection *) plt,
6284 plt_contents, 0, plt->size))
144bed8d 6285 {
3972882e
L		 6286bad_return:
6287 free (plt_contents);
6288 return NULL;
144bed8d
L		 6289 }
6290
3972882e
L		 6291 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
6292 if (! (*slurp_relocs) (abfd, relplt, dynsyms, TRUE))
6293 goto bad_return;
144bed8d 6294
3972882e
L		 6295 hdr = &elf_section_data (relplt)->this_hdr;
6296 count = relplt->size / hdr->sh_entsize;
144bed8d 6297
3972882e
L		 6298 plt_sym_val = (bfd_vma *) bfd_malloc (sizeof (bfd_vma) * count);
6299 if (plt_sym_val == NULL)
6300 goto bad_return;
cca5b8b6 6301
35181b3e 6302 for (i = 0; i < count; i++)
3972882e 6303 plt_sym_val[i] = -1;
cca5b8b6 6304
3972882e
L		 6305 plt_offset = bed->plt_entry_size;
6306 p = relplt->relocation;
6307 for (i = 0; i < count; i++, p++)
144bed8d 6308 {
3972882e 6309 long reloc_index;
144bed8d 6310
6f25f223 6311 /* Skip unknown relocation. */
533d0af0 6312 if (p->howto == NULL)
6f25f223 6313 continue;
533d0af0 6314
3972882e
L		 6315 if (p->howto->type != R_X86_64_JUMP_SLOT
6316 && p->howto->type != R_X86_64_IRELATIVE)
6317 continue;
144bed8d 6318
3972882e
L		 6319 reloc_index = H_GET_32 (abfd, (plt_contents + plt_offset
6320 + bed->plt_reloc_offset));
ec1f73bb 6321 if (reloc_index < count)
144bed8d 6322 {
ec1f73bb
AM		 6323 if (plt_bnd)
6324 {
6325 /* This is the index in .plt section. */
6326 long plt_index = plt_offset / bed->plt_entry_size;
6327 /* Store VMA + the offset in .plt.bnd section. */
6328 plt_sym_val[reloc_index] =
6329 (plt_bnd->vma
6330 + (plt_index - 1) * sizeof (elf_x86_64_legacy_plt2_entry));
6331 }
6332 else
6333 plt_sym_val[reloc_index] = plt->vma + plt_offset;
144bed8d
L		 6334 }
6335 plt_offset += bed->plt_entry_size;
fca6ae69
L		 6336
6337 /* PR binutils/18437: Skip extra relocations in the .rela.plt
6338 section. */
6339 if (plt_offset >= plt->size)
6340 break;
144bed8d
L		 6341 }
6342
3972882e
L		 6343 free (plt_contents);
6344
6345 return plt_sym_val;
4c45e5c9 6346}
8df9fc9d 6347
0ff2b86e
L		 6348/* Similar to _bfd_elf_get_synthetic_symtab, with .plt.bnd section
6349 support. */
6350
6351static long
6352elf_x86_64_get_synthetic_symtab (bfd *abfd,
6353 long symcount,
6354 asymbol **syms,
6355 long dynsymcount,
6356 asymbol **dynsyms,
6357 asymbol **ret)
6358{
3972882e
L		 6359 /* Pass the .plt.bnd section to _bfd_elf_ifunc_get_synthetic_symtab
6360 as PLT if it exists. */
6361 asection *plt = bfd_get_section_by_name (abfd, ".plt.bnd");
0ff2b86e 6362 if (plt == NULL)
3972882e
L		 6363 plt = bfd_get_section_by_name (abfd, ".plt");
6364 return _bfd_elf_ifunc_get_synthetic_symtab (abfd, symcount, syms,
6365 dynsymcount, dynsyms, ret,
6366 plt,
6367 elf_x86_64_get_plt_sym_val);
0ff2b86e
L		 6368}
6369
d2b2c203
DJ		 6370/* Handle an x86-64 specific section when reading an object file. This
6371 is called when elfcode.h finds a section with an unknown type. */
6372
6373static bfd_boolean
0c723101
L		 6374elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
6375 const char *name, int shindex)
d2b2c203
DJ		 6376{
6377 if (hdr->sh_type != SHT_X86_64_UNWIND)
6378 return FALSE;
6379
6dc132d9 6380 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
d2b2c203
DJ		 6381 return FALSE;
6382
6383 return TRUE;
6384}
6385
3b22753a
L		 6386/* Hook called by the linker routine which adds symbols from an object
6387 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
6388 of .bss. */
6389
6390static bfd_boolean
351f65ca
L		 6391elf_x86_64_add_symbol_hook (bfd *abfd,
6392 struct bfd_link_info *info,
6393 Elf_Internal_Sym *sym,
6394 const char **namep ATTRIBUTE_UNUSED,
6395 flagword *flagsp ATTRIBUTE_UNUSED,
6396 asection **secp,
6397 bfd_vma *valp)
3b22753a
L		 6398{
6399 asection *lcomm;
6400
6401 switch (sym->st_shndx)
6402 {
6403 case SHN_X86_64_LCOMMON:
6404 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
6405 if (lcomm == NULL)
6406 {
6407 lcomm = bfd_make_section_with_flags (abfd,
6408 "LARGE_COMMON",
6409 (SEC_ALLOC
6410 | SEC_IS_COMMON
6411 | SEC_LINKER_CREATED));
6412 if (lcomm == NULL)
6413 return FALSE;
6414 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
6415 }
6416 *secp = lcomm;
6417 *valp = sym->st_size;
c35bdf6e 6418 return TRUE;
3b22753a 6419 }
d8045f23 6420
13a2df29 6421 if (ELF_ST_BIND (sym->st_info) == STB_GNU_UNIQUE
f1885d1e
AM		 6422 && (abfd->flags & DYNAMIC) == 0
6423 && bfd_get_flavour (info->output_bfd) == bfd_target_elf_flavour)
13a2df29
L		 6424 elf_tdata (info->output_bfd)->has_gnu_symbols
6425 |= elf_gnu_symbol_unique;
d8045f23 6426
3b22753a
L		 6427 return TRUE;
6428}
6429
6430
6431/* Given a BFD section, try to locate the corresponding ELF section
6432 index. */
6433
6434static bfd_boolean
351f65ca
L		 6435elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
6436 asection *sec, int *index_return)
3b22753a
L		 6437{
6438 if (sec == &_bfd_elf_large_com_section)
6439 {
91d6fa6a 6440 *index_return = SHN_X86_64_LCOMMON;
3b22753a
L		 6441 return TRUE;
6442 }
6443 return FALSE;
6444}
6445
6446/* Process a symbol. */
6447
6448static void
351f65ca
L		 6449elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
6450 asymbol *asym)
3b22753a
L		 6451{
6452 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
6453
6454 switch (elfsym->internal_elf_sym.st_shndx)
6455 {
6456 case SHN_X86_64_LCOMMON:
6457 asym->section = &_bfd_elf_large_com_section;
6458 asym->value = elfsym->internal_elf_sym.st_size;
6459 /* Common symbol doesn't set BSF_GLOBAL. */
6460 asym->flags &= ~BSF_GLOBAL;
6461 break;
6462 }
6463}
6464
6465static bfd_boolean
351f65ca 6466elf_x86_64_common_definition (Elf_Internal_Sym *sym)
3b22753a
L		 6467{
6468 return (sym->st_shndx == SHN_COMMON
6469 || sym->st_shndx == SHN_X86_64_LCOMMON);
6470}
6471
6472static unsigned int
351f65ca 6473elf_x86_64_common_section_index (asection *sec)
3b22753a
L		 6474{
6475 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
6476 return SHN_COMMON;
6477 else
6478 return SHN_X86_64_LCOMMON;
6479}
6480
6481static asection *
351f65ca 6482elf_x86_64_common_section (asection *sec)
3b22753a
L		 6483{
6484 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
6485 return bfd_com_section_ptr;
6486 else
6487 return &_bfd_elf_large_com_section;
6488}
6489
6490static bfd_boolean
5d13b3b3
AM		 6491elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
6492 const Elf_Internal_Sym *sym,
351f65ca 6493 asection **psec,
5d13b3b3
AM		 6494 bfd_boolean newdef,
6495 bfd_boolean olddef,
351f65ca 6496 bfd *oldbfd,
5d13b3b3 6497 const asection *oldsec)
3b22753a
L		 6498{
6499 /* A normal common symbol and a large common symbol result in a
00492999
L		 6500 normal common symbol. We turn the large common symbol into a
6501 normal one. */
5d13b3b3 6502 if (!olddef
3b22753a 6503 && h->root.type == bfd_link_hash_common
5d13b3b3
AM		 6504 && !newdef
6505 && bfd_is_com_section (*psec)
6506 && oldsec != *psec)
3b22753a 6507 {
00492999 6508 if (sym->st_shndx == SHN_COMMON
5d13b3b3 6509 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
00492999
L		 6510 {
6511 h->root.u.c.p->section
6512 = bfd_make_section_old_way (oldbfd, "COMMON");
6513 h->root.u.c.p->section->flags = SEC_ALLOC;
6514 }
6515 else if (sym->st_shndx == SHN_X86_64_LCOMMON
5d13b3b3
AM		 6516 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
6517 *psec = bfd_com_section_ptr;
3b22753a
L		 6518 }
6519
6520 return TRUE;
6521}
6522
6523static int
351f65ca
L		 6524elf_x86_64_additional_program_headers (bfd *abfd,
6525 struct bfd_link_info *info ATTRIBUTE_UNUSED)
3b22753a
L		 6526{
6527 asection *s;
9a2e389a 6528 int count = 0;
3b22753a
L		 6529
6530 /* Check to see if we need a large readonly segment. */
6531 s = bfd_get_section_by_name (abfd, ".lrodata");
6532 if (s && (s->flags & SEC_LOAD))
6533 count++;
6534
6535 /* Check to see if we need a large data segment. Since .lbss sections
6536 is placed right after the .bss section, there should be no need for
6537 a large data segment just because of .lbss. */
6538 s = bfd_get_section_by_name (abfd, ".ldata");
6539 if (s && (s->flags & SEC_LOAD))
6540 count++;
6541
6542 return count;
6543}
6544
fdc90cb4
JJ		 6545/* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
6546
6547static bfd_boolean
351f65ca 6548elf_x86_64_hash_symbol (struct elf_link_hash_entry *h)
fdc90cb4
JJ		 6549{
6550 if (h->plt.offset != (bfd_vma) -1
6551 && !h->def_regular
6552 && !h->pointer_equality_needed)
6553 return FALSE;
6554
6555 return _bfd_elf_hash_symbol (h);
6556}
6557
c543bf9a
L		 6558/* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
6559
6560static bfd_boolean
6561elf_x86_64_relocs_compatible (const bfd_target *input,
6562 const bfd_target *output)
6563{
6564 return ((xvec_get_elf_backend_data (input)->s->elfclass
6565 == xvec_get_elf_backend_data (output)->s->elfclass)
6566 && _bfd_elf_relocs_compatible (input, output));
6567}
6568
9a2e389a 6569static const struct bfd_elf_special_section
351f65ca 6570 elf_x86_64_special_sections[]=
3b22753a 6571{
0112cd26
NC		 6572 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
6573 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
6574 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
6575 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
6576 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
6577 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
6578 { NULL, 0, 0, 0, 0 }
3b22753a
L		 6579};
6580
6d00b590 6581#define TARGET_LITTLE_SYM x86_64_elf64_vec
70256ad8
AJ		 6582#define TARGET_LITTLE_NAME "elf64-x86-64"
6583#define ELF_ARCH bfd_arch_i386
ae95ffa6 6584#define ELF_TARGET_ID X86_64_ELF_DATA
70256ad8 6585#define ELF_MACHINE_CODE EM_X86_64
f7661549 6586#define ELF_MAXPAGESIZE 0x200000
2043964e 6587#define ELF_MINPAGESIZE 0x1000
24718e3b 6588#define ELF_COMMONPAGESIZE 0x1000
70256ad8
AJ		 6589
6590#define elf_backend_can_gc_sections 1
51b64d56 6591#define elf_backend_can_refcount 1
70256ad8
AJ		 6592#define elf_backend_want_got_plt 1
6593#define elf_backend_plt_readonly 1
6594#define elf_backend_want_plt_sym 0
6595#define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
b491616a 6596#define elf_backend_rela_normal 1
e41b3a13 6597#define elf_backend_plt_alignment 4
f7483970 6598#define elf_backend_extern_protected_data 1
70256ad8 6599
351f65ca 6600#define elf_info_to_howto elf_x86_64_info_to_howto
70256ad8 6601
70256ad8 6602#define bfd_elf64_bfd_link_hash_table_create \
351f65ca 6603 elf_x86_64_link_hash_table_create
351f65ca 6604#define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
157090f7 6605#define bfd_elf64_bfd_reloc_name_lookup \
351f65ca 6606 elf_x86_64_reloc_name_lookup
70256ad8 6607
351f65ca 6608#define elf_backend_adjust_dynamic_symbol elf_x86_64_adjust_dynamic_symbol
c543bf9a 6609#define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
351f65ca
L		 6610#define elf_backend_check_relocs elf_x86_64_check_relocs
6611#define elf_backend_copy_indirect_symbol elf_x86_64_copy_indirect_symbol
6612#define elf_backend_create_dynamic_sections elf_x86_64_create_dynamic_sections
6613#define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
6614#define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
6615#define elf_backend_gc_mark_hook elf_x86_64_gc_mark_hook
6616#define elf_backend_gc_sweep_hook elf_x86_64_gc_sweep_hook
6617#define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
6618#define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
8fd79e71
L		 6619#ifdef CORE_HEADER
6620#define elf_backend_write_core_note elf_x86_64_write_core_note
6621#endif
351f65ca
L		 6622#define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
6623#define elf_backend_relocate_section elf_x86_64_relocate_section
6624#define elf_backend_size_dynamic_sections elf_x86_64_size_dynamic_sections
6625#define elf_backend_always_size_sections elf_x86_64_always_size_sections
74541ad4 6626#define elf_backend_init_index_section _bfd_elf_init_1_index_section
407443a3 6627#define elf_backend_object_p elf64_x86_64_elf_object_p
351f65ca 6628#define bfd_elf64_mkobject elf_x86_64_mkobject
0ff2b86e 6629#define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
8d88c4ca 6630
d2b2c203 6631#define elf_backend_section_from_shdr \
351f65ca 6632 elf_x86_64_section_from_shdr
d2b2c203 6633
3b22753a 6634#define elf_backend_section_from_bfd_section \
351f65ca 6635 elf_x86_64_elf_section_from_bfd_section
3b22753a 6636#define elf_backend_add_symbol_hook \
351f65ca 6637 elf_x86_64_add_symbol_hook
3b22753a 6638#define elf_backend_symbol_processing \
351f65ca 6639 elf_x86_64_symbol_processing
3b22753a 6640#define elf_backend_common_section_index \
351f65ca 6641 elf_x86_64_common_section_index
3b22753a 6642#define elf_backend_common_section \
351f65ca 6643 elf_x86_64_common_section
3b22753a 6644#define elf_backend_common_definition \
351f65ca 6645 elf_x86_64_common_definition
3b22753a 6646#define elf_backend_merge_symbol \
351f65ca 6647 elf_x86_64_merge_symbol
3b22753a 6648#define elf_backend_special_sections \
351f65ca 6649 elf_x86_64_special_sections
3b22753a 6650#define elf_backend_additional_program_headers \
351f65ca 6651 elf_x86_64_additional_program_headers
fdc90cb4 6652#define elf_backend_hash_symbol \
351f65ca 6653 elf_x86_64_hash_symbol
8f79b794
L		 6654#define elf_backend_omit_section_dynsym \
6655 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
aec6b87e
L		 6656#define elf_backend_fixup_symbol \
6657 elf_x86_64_fixup_symbol
3b22753a 6658
8d88c4ca 6659#include "elf64-target.h"
9d7cbccd 6660
6036f486
ES		 6661/* CloudABI support. */
6662
6663#undef TARGET_LITTLE_SYM
6664#define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
6665#undef TARGET_LITTLE_NAME
6666#define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
6667
6668#undef ELF_OSABI
6669#define ELF_OSABI ELFOSABI_CLOUDABI
6670
6671#undef elf64_bed
6672#define elf64_bed elf64_x86_64_cloudabi_bed
6673
6674#include "elf64-target.h"
6675
9d7cbccd
NC		 6676/* FreeBSD support. */
6677
6678#undef TARGET_LITTLE_SYM
6d00b590 6679#define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
9d7cbccd
NC		 6680#undef TARGET_LITTLE_NAME
6681#define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
6682
d1036acb
L		 6683#undef ELF_OSABI
6684#define ELF_OSABI ELFOSABI_FREEBSD
9d7cbccd 6685
9d7cbccd
NC		 6686#undef elf64_bed
6687#define elf64_bed elf64_x86_64_fbsd_bed
6688
6689#include "elf64-target.h"
8a9036a4 6690
a6cc6b3b
RO		 6691/* Solaris 2 support. */
6692
6693#undef TARGET_LITTLE_SYM
6d00b590 6694#define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
a6cc6b3b
RO		 6695#undef TARGET_LITTLE_NAME
6696#define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
6697
6698/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
6699 objects won't be recognized. */
6700#undef ELF_OSABI
6701
6702#undef elf64_bed
6703#define elf64_bed elf64_x86_64_sol2_bed
6704
7dc98aea
RO		 6705/* The 64-bit static TLS arena size is rounded to the nearest 16-byte
6706 boundary. */
6707#undef elf_backend_static_tls_alignment
6708#define elf_backend_static_tls_alignment 16
6709
a6cc6b3b
RO		 6710/* The Solaris 2 ABI requires a plt symbol on all platforms.
6711
6712 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
6713 File, p.63. */
6714#undef elf_backend_want_plt_sym
6715#define elf_backend_want_plt_sym 1
6716
6717#include "elf64-target.h"
6718
8059fb19
RM		 6719/* Native Client support. */
6720
64b384e1
RM		 6721static bfd_boolean
6722elf64_x86_64_nacl_elf_object_p (bfd *abfd)
6723{
6724 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
6725 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
6726 return TRUE;
6727}
6728
8059fb19 6729#undef TARGET_LITTLE_SYM
6d00b590 6730#define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
8059fb19
RM		 6731#undef TARGET_LITTLE_NAME
6732#define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
6733#undef elf64_bed
6734#define elf64_bed elf64_x86_64_nacl_bed
6735
6736#undef ELF_MAXPAGESIZE
6737#undef ELF_MINPAGESIZE
6738#undef ELF_COMMONPAGESIZE
6739#define ELF_MAXPAGESIZE 0x10000
6740#define ELF_MINPAGESIZE 0x10000
6741#define ELF_COMMONPAGESIZE 0x10000
6742
6743/* Restore defaults. */
6744#undef ELF_OSABI
6745#undef elf_backend_static_tls_alignment
6746#undef elf_backend_want_plt_sym
6747#define elf_backend_want_plt_sym 0
6748
6749/* NaCl uses substantially different PLT entries for the same effects. */
6750
6751#undef elf_backend_plt_alignment
6752#define elf_backend_plt_alignment 5
6753#define NACL_PLT_ENTRY_SIZE 64
6754#define NACLMASK 0xe0 /* 32-byte alignment mask. */
6755
6756static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
6757 {
6758 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
6759 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
6760 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
6761 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
6762 0x41, 0xff, 0xe3, /* jmpq *%r11 */
6763
ea2d813e 6764 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
70cc877f 6765 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
ea2d813e
RM		 6766
6767 /* 32 bytes of nop to pad out to the standard size. */
8059fb19
RM		 6768 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data32 prefixes */
6769 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
6770 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data32 prefixes */
6771 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
ea2d813e
RM		 6772 0x66, /* excess data32 prefix */
6773 0x90 /* nop */
8059fb19
RM		 6774 };
6775
6776static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
6777 {
6778 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
6779 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
6780 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
6781 0x41, 0xff, 0xe3, /* jmpq *%r11 */
6782
6783 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
6784 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data32 prefixes */
6785 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
6786
6787 /* Lazy GOT entries point here (32-byte aligned). */
6788 0x68, /* pushq immediate */
6789 0, 0, 0, 0, /* replaced with index into relocation table. */
6790 0xe9, /* jmp relative */
6791 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
6792
6793 /* 22 bytes of nop to pad out to the standard size. */
6794 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data32 prefixes */
6795 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
6796 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
6797 };
6798
6799/* .eh_frame covering the .plt section. */
6800
6801static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
6802 {
6803#if (PLT_CIE_LENGTH != 20 \
6804 || PLT_FDE_LENGTH != 36 \
6805 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
6806 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
6807# error "Need elf_x86_64_backend_data parameters for eh_frame_plt offsets!"
6808#endif
6809 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
6810 0, 0, 0, 0, /* CIE ID */
6811 1, /* CIE version */
6812 'z', 'R', 0, /* Augmentation string */
6813 1, /* Code alignment factor */
6814 0x78, /* Data alignment factor */
6815 16, /* Return address column */
6816 1, /* Augmentation size */
6817 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
6818 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
6819 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
6820 DW_CFA_nop, DW_CFA_nop,
6821
6822 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
6823 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
6824 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
6825 0, 0, 0, 0, /* .plt size goes here */
6826 0, /* Augmentation size */
6827 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
6828 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
6829 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
6830 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
6831 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
6832 13, /* Block length */
6833 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
6834 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
6835 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
6836 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
6837 DW_CFA_nop, DW_CFA_nop
6838 };
6839
6840static const struct elf_x86_64_backend_data elf_x86_64_nacl_arch_bed =
6841 {
6842 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
6843 elf_x86_64_nacl_plt_entry, /* plt_entry */
6844 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
6845 2, /* plt0_got1_offset */
6846 9, /* plt0_got2_offset */
6847 13, /* plt0_got2_insn_end */
6848 3, /* plt_got_offset */
6849 33, /* plt_reloc_offset */
6850 38, /* plt_plt_offset */
6851 7, /* plt_got_insn_size */
6852 42, /* plt_plt_insn_end */
6853 32, /* plt_lazy_offset */
6854 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
6855 sizeof (elf_x86_64_nacl_eh_frame_plt), /* eh_frame_plt_size */
6856 };
6857
6858#undef elf_backend_arch_data
6859#define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
6860
64b384e1
RM		 6861#undef elf_backend_object_p
6862#define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
5a68afcf
RM		 6863#undef elf_backend_modify_segment_map
6864#define elf_backend_modify_segment_map nacl_modify_segment_map
6865#undef elf_backend_modify_program_headers
6866#define elf_backend_modify_program_headers nacl_modify_program_headers
887badb3
RM		 6867#undef elf_backend_final_write_processing
6868#define elf_backend_final_write_processing nacl_final_write_processing
5a68afcf 6869
8059fb19
RM		 6870#include "elf64-target.h"
6871
6872/* Native Client x32 support. */
6873
64b384e1
RM		 6874static bfd_boolean
6875elf32_x86_64_nacl_elf_object_p (bfd *abfd)
6876{
6877 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
6878 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
6879 return TRUE;
6880}
6881
8059fb19 6882#undef TARGET_LITTLE_SYM
6d00b590 6883#define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
8059fb19
RM		 6884#undef TARGET_LITTLE_NAME
6885#define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
6886#undef elf32_bed
6887#define elf32_bed elf32_x86_64_nacl_bed
6888
6889#define bfd_elf32_bfd_link_hash_table_create \
6890 elf_x86_64_link_hash_table_create
8059fb19
RM		 6891#define bfd_elf32_bfd_reloc_type_lookup \
6892 elf_x86_64_reloc_type_lookup
6893#define bfd_elf32_bfd_reloc_name_lookup \
6894 elf_x86_64_reloc_name_lookup
6895#define bfd_elf32_mkobject \
6896 elf_x86_64_mkobject
b7365e5d
L		 6897#define bfd_elf32_get_synthetic_symtab \
6898 elf_x86_64_get_synthetic_symtab
8059fb19
RM		 6899
6900#undef elf_backend_object_p
6901#define elf_backend_object_p \
64b384e1 6902 elf32_x86_64_nacl_elf_object_p
8059fb19
RM		 6903
6904#undef elf_backend_bfd_from_remote_memory
6905#define elf_backend_bfd_from_remote_memory \
6906 _bfd_elf32_bfd_from_remote_memory
6907
6908#undef elf_backend_size_info
6909#define elf_backend_size_info \
6910 _bfd_elf32_size_info
6911
6912#include "elf32-target.h"
6913
6914/* Restore defaults. */
5a68afcf 6915#undef elf_backend_object_p
8059fb19 6916#define elf_backend_object_p elf64_x86_64_elf_object_p
5a68afcf
RM		 6917#undef elf_backend_bfd_from_remote_memory
6918#undef elf_backend_size_info
6919#undef elf_backend_modify_segment_map
6920#undef elf_backend_modify_program_headers
887badb3 6921#undef elf_backend_final_write_processing
8059fb19 6922
8a9036a4
L		 6923/* Intel L1OM support. */
6924
6925static bfd_boolean
6926elf64_l1om_elf_object_p (bfd *abfd)
6927{
6928 /* Set the right machine number for an L1OM elf64 file. */
6929 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
6930 return TRUE;
6931}
6932
6933#undef TARGET_LITTLE_SYM
6d00b590 6934#define TARGET_LITTLE_SYM l1om_elf64_vec
8a9036a4
L		 6935#undef TARGET_LITTLE_NAME
6936#define TARGET_LITTLE_NAME "elf64-l1om"
6937#undef ELF_ARCH
6938#define ELF_ARCH bfd_arch_l1om
6939
6940#undef ELF_MACHINE_CODE
6941#define ELF_MACHINE_CODE EM_L1OM
6942
6943#undef ELF_OSABI
6944
6945#undef elf64_bed
6946#define elf64_bed elf64_l1om_bed
6947
6948#undef elf_backend_object_p
6949#define elf_backend_object_p elf64_l1om_elf_object_p
6950
8059fb19
RM		 6951/* Restore defaults. */
6952#undef ELF_MAXPAGESIZE
6953#undef ELF_MINPAGESIZE
6954#undef ELF_COMMONPAGESIZE
6955#define ELF_MAXPAGESIZE 0x200000
6956#define ELF_MINPAGESIZE 0x1000
6957#define ELF_COMMONPAGESIZE 0x1000
6958#undef elf_backend_plt_alignment
6959#define elf_backend_plt_alignment 4
6960#undef elf_backend_arch_data
6961#define elf_backend_arch_data &elf_x86_64_arch_bed
1a0c107f 6962
8a9036a4
L		 6963#include "elf64-target.h"
6964
6965/* FreeBSD L1OM support. */
6966
6967#undef TARGET_LITTLE_SYM
6d00b590 6968#define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
8a9036a4
L		 6969#undef TARGET_LITTLE_NAME
6970#define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
6971
6972#undef ELF_OSABI
6973#define ELF_OSABI ELFOSABI_FREEBSD
6974
6975#undef elf64_bed
6976#define elf64_bed elf64_l1om_fbsd_bed
6977
8a9036a4 6978#include "elf64-target.h"
351f65ca 6979
7a9068fe
L		 6980/* Intel K1OM support. */
6981
6982static bfd_boolean
6983elf64_k1om_elf_object_p (bfd *abfd)
6984{
6985 /* Set the right machine number for an K1OM elf64 file. */
6986 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
6987 return TRUE;
6988}
6989
6990#undef TARGET_LITTLE_SYM
6d00b590 6991#define TARGET_LITTLE_SYM k1om_elf64_vec
7a9068fe
L		 6992#undef TARGET_LITTLE_NAME
6993#define TARGET_LITTLE_NAME "elf64-k1om"
6994#undef ELF_ARCH
6995#define ELF_ARCH bfd_arch_k1om
6996
6997#undef ELF_MACHINE_CODE
6998#define ELF_MACHINE_CODE EM_K1OM
6999
7000#undef ELF_OSABI
7001
7002#undef elf64_bed
7003#define elf64_bed elf64_k1om_bed
7004
7005#undef elf_backend_object_p
7006#define elf_backend_object_p elf64_k1om_elf_object_p
7007
7008#undef elf_backend_static_tls_alignment
7009
7010#undef elf_backend_want_plt_sym
7011#define elf_backend_want_plt_sym 0
7012
7013#include "elf64-target.h"
7014
7015/* FreeBSD K1OM support. */
7016
7017#undef TARGET_LITTLE_SYM
6d00b590 7018#define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
7a9068fe
L		 7019#undef TARGET_LITTLE_NAME
7020#define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
7021
7022#undef ELF_OSABI
7023#define ELF_OSABI ELFOSABI_FREEBSD
7024
7025#undef elf64_bed
7026#define elf64_bed elf64_k1om_fbsd_bed
7027
7028#include "elf64-target.h"
7029
351f65ca
L		 7030/* 32bit x86-64 support. */
7031
351f65ca 7032#undef TARGET_LITTLE_SYM
6d00b590 7033#define TARGET_LITTLE_SYM x86_64_elf32_vec
351f65ca
L		 7034#undef TARGET_LITTLE_NAME
7035#define TARGET_LITTLE_NAME "elf32-x86-64"
8059fb19 7036#undef elf32_bed
351f65ca
L		 7037
7038#undef ELF_ARCH
7039#define ELF_ARCH bfd_arch_i386
7040
7041#undef ELF_MACHINE_CODE
7042#define ELF_MACHINE_CODE EM_X86_64
7043
351f65ca
L		 7044#undef ELF_OSABI
7045
351f65ca
L		 7046#undef elf_backend_object_p
7047#define elf_backend_object_p \
7048 elf32_x86_64_elf_object_p
7049
7050#undef elf_backend_bfd_from_remote_memory
7051#define elf_backend_bfd_from_remote_memory \
7052 _bfd_elf32_bfd_from_remote_memory
7053
7054#undef elf_backend_size_info
7055#define elf_backend_size_info \
7056 _bfd_elf32_size_info
7057
7058#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 1.355995 seconds and 4 git commands to generate.