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