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