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