projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
merge from gcc
[deliverable/binutils-gdb.git] / bfd / elf64-x86-64.c
CommitLineData
8d88c4ca 1/* X86-64 specific support for 64-bit ELF
0ffa91dd 2 Copyright 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
3eb128b2 3 Free Software Foundation, Inc.
8d88c4ca
NC		 4 Contributed by Jan Hubicka <jh@suse.cz>.
5
ae9a127f 6 This file is part of BFD, the Binary File Descriptor library.
8d88c4ca 7
ae9a127f
NC		 8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
cd123cb7 10 the Free Software Foundation; either version 3 of the License, or
ae9a127f 11 (at your option) any later version.
8d88c4ca 12
ae9a127f
NC		 13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
8d88c4ca 17
ae9a127f
NC		 18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
cd123cb7
NC		 20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21 MA 02110-1301, USA. */
8d88c4ca 22
8d88c4ca 23#include "sysdep.h"
3db64b00 24#include "bfd.h"
c434dee6 25#include "bfdlink.h"
8d88c4ca
NC		 26#include "libbfd.h"
27#include "elf-bfd.h"
142411ca 28#include "bfd_stdint.h"
c25bc9fc
L		 29#include "objalloc.h"
30#include "hashtab.h"
8d88c4ca
NC		 31
32#include "elf/x86-64.h"
33
8d88c4ca
NC		 34/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
35#define MINUS_ONE (~ (bfd_vma) 0)
36
37/* The relocation "howto" table. Order of fields:
7b81dfbb
AJ		 38 type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
39 special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset. */
70256ad8
AJ		 40static reloc_howto_type x86_64_elf_howto_table[] =
41{
b34976b6
AM		 42 HOWTO(R_X86_64_NONE, 0, 0, 0, FALSE, 0, complain_overflow_dont,
43 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
44 FALSE),
45 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
46 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
47 FALSE),
48 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
49 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
50 TRUE),
51 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
52 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
53 FALSE),
54 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
55 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
56 TRUE),
57 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
58 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
59 FALSE),
60 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
61 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
62 MINUS_ONE, FALSE),
63 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
64 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
65 MINUS_ONE, FALSE),
66 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
67 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
68 MINUS_ONE, FALSE),
69 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
70 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
71 0xffffffff, TRUE),
72 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
73 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
74 FALSE),
75 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
76 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
77 FALSE),
78 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
79 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
b0360d8c 80 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
b34976b6 81 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
ac2aa337 82 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
b34976b6
AM		 83 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
84 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
85 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
86 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
87 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
88 MINUS_ONE, FALSE),
89 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
90 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
91 MINUS_ONE, FALSE),
92 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
93 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
94 MINUS_ONE, FALSE),
95 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
96 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
97 0xffffffff, TRUE),
98 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
99 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
100 0xffffffff, TRUE),
ac2aa337 101 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
b34976b6
AM		 102 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
103 0xffffffff, FALSE),
104 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
105 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
106 0xffffffff, TRUE),
107 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
108 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
109 0xffffffff, FALSE),
d6ab8113
JB		 110 HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
111 bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
112 TRUE),
113 HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
114 bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
115 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
116 HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
117 bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
118 FALSE, 0xffffffff, 0xffffffff, TRUE),
7b81dfbb
AJ		 119 HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
120 bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
121 FALSE),
122 HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
123 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
124 MINUS_ONE, TRUE),
125 HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
126 bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
127 FALSE, MINUS_ONE, MINUS_ONE, TRUE),
128 HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
129 bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
130 MINUS_ONE, FALSE),
131 HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
132 bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
133 MINUS_ONE, FALSE),
67a4f2b7
AO		 134 EMPTY_HOWTO (32),
135 EMPTY_HOWTO (33),
136 HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
137 complain_overflow_bitfield, bfd_elf_generic_reloc,
138 "R_X86_64_GOTPC32_TLSDESC",
139 FALSE, 0xffffffff, 0xffffffff, TRUE),
140 HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
141 complain_overflow_dont, bfd_elf_generic_reloc,
142 "R_X86_64_TLSDESC_CALL",
143 FALSE, 0, 0, FALSE),
144 HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
145 complain_overflow_bitfield, bfd_elf_generic_reloc,
146 "R_X86_64_TLSDESC",
147 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
cbe950e9
L		 148 HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
149 bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
150 MINUS_ONE, FALSE),
fe4770f4 151
a33d77bc
JB		 152 /* We have a gap in the reloc numbers here.
153 R_X86_64_standard counts the number up to this point, and
154 R_X86_64_vt_offset is the value to subtract from a reloc type of
155 R_X86_64_GNU_VT* to form an index into this table. */
cbe950e9 156#define R_X86_64_standard (R_X86_64_IRELATIVE + 1)
a33d77bc
JB		 157#define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
158
fe4770f4 159/* GNU extension to record C++ vtable hierarchy. */
b34976b6
AM		 160 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
161 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
fe4770f4
AJ		 162
163/* GNU extension to record C++ vtable member usage. */
b34976b6
AM		 164 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
165 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
166 FALSE)
8d88c4ca
NC		 167};
168
d8045f23
NC		 169#define IS_X86_64_PCREL_TYPE(TYPE) \
170 ( ((TYPE) == R_X86_64_PC8) \
171 || ((TYPE) == R_X86_64_PC16) \
172 || ((TYPE) == R_X86_64_PC32) \
173 || ((TYPE) == R_X86_64_PC64))
174
8d88c4ca 175/* Map BFD relocs to the x86_64 elf relocs. */
70256ad8
AJ		 176struct elf_reloc_map
177{
8d88c4ca
NC		 178 bfd_reloc_code_real_type bfd_reloc_val;
179 unsigned char elf_reloc_val;
180};
181
dc810e39 182static const struct elf_reloc_map x86_64_reloc_map[] =
8d88c4ca 183{
70256ad8
AJ		 184 { BFD_RELOC_NONE, R_X86_64_NONE, },
185 { BFD_RELOC_64, R_X86_64_64, },
186 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
187 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
188 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
189 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
190 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
191 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
192 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
193 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
194 { BFD_RELOC_32, R_X86_64_32, },
195 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
196 { BFD_RELOC_16, R_X86_64_16, },
197 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
198 { BFD_RELOC_8, R_X86_64_8, },
199 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
bffbf940
JJ		 200 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
201 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
202 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
203 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
204 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
205 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
206 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
207 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
d6ab8113
JB		 208 { BFD_RELOC_64_PCREL, R_X86_64_PC64, },
209 { BFD_RELOC_X86_64_GOTOFF64, R_X86_64_GOTOFF64, },
210 { BFD_RELOC_X86_64_GOTPC32, R_X86_64_GOTPC32, },
7b81dfbb
AJ		 211 { BFD_RELOC_X86_64_GOT64, R_X86_64_GOT64, },
212 { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
213 { BFD_RELOC_X86_64_GOTPC64, R_X86_64_GOTPC64, },
214 { BFD_RELOC_X86_64_GOTPLT64, R_X86_64_GOTPLT64, },
215 { BFD_RELOC_X86_64_PLTOFF64, R_X86_64_PLTOFF64, },
67a4f2b7
AO		 216 { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
217 { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
218 { BFD_RELOC_X86_64_TLSDESC, R_X86_64_TLSDESC, },
cbe950e9 219 { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
fe4770f4
AJ		 220 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
221 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
8d88c4ca
NC		 222};
223
67a4f2b7
AO		 224static reloc_howto_type *
225elf64_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
226{
227 unsigned i;
228
229 if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
230 || r_type >= (unsigned int) R_X86_64_max)
231 {
232 if (r_type >= (unsigned int) R_X86_64_standard)
233 {
234 (*_bfd_error_handler) (_("%B: invalid relocation type %d"),
235 abfd, (int) r_type);
236 r_type = R_X86_64_NONE;
237 }
238 i = r_type;
239 }
240 else
241 i = r_type - (unsigned int) R_X86_64_vt_offset;
242 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
243 return &x86_64_elf_howto_table[i];
244}
8d88c4ca
NC		 245
246/* Given a BFD reloc type, return a HOWTO structure. */
247static reloc_howto_type *
67a4f2b7 248elf64_x86_64_reloc_type_lookup (bfd *abfd,
27482721 249 bfd_reloc_code_real_type code)
8d88c4ca
NC		 250{
251 unsigned int i;
27482721 252
8d88c4ca
NC		 253 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
254 i++)
255 {
256 if (x86_64_reloc_map[i].bfd_reloc_val == code)
67a4f2b7
AO		 257 return elf64_x86_64_rtype_to_howto (abfd,
258 x86_64_reloc_map[i].elf_reloc_val);
8d88c4ca
NC		 259 }
260 return 0;
261}
262
157090f7
AM		 263static reloc_howto_type *
264elf64_x86_64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
265 const char *r_name)
266{
267 unsigned int i;
268
269 for (i = 0;
270 i < (sizeof (x86_64_elf_howto_table)
271 / sizeof (x86_64_elf_howto_table[0]));
272 i++)
273 if (x86_64_elf_howto_table[i].name != NULL
274 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
275 return &x86_64_elf_howto_table[i];
276
277 return NULL;
278}
279
8d88c4ca 280/* Given an x86_64 ELF reloc type, fill in an arelent structure. */
8da6118f 281
8d88c4ca 282static void
27482721
AJ		 283elf64_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
284 Elf_Internal_Rela *dst)
8d88c4ca 285{
67a4f2b7 286 unsigned r_type;
8d88c4ca
NC		 287
288 r_type = ELF64_R_TYPE (dst->r_info);
67a4f2b7 289 cache_ptr->howto = elf64_x86_64_rtype_to_howto (abfd, r_type);
8d88c4ca
NC		 290 BFD_ASSERT (r_type == cache_ptr->howto->type);
291}
70256ad8 292\f
3bab7989 293/* Support for core dump NOTE sections. */
b34976b6 294static bfd_boolean
27482721 295elf64_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML		 296{
297 int offset;
eea6121a 298 size_t size;
3bab7989
ML		 299
300 switch (note->descsz)
301 {
302 default:
b34976b6 303 return FALSE;
3bab7989
ML		 304
305 case 336: /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
306 /* pr_cursig */
cedb70c5 307 elf_tdata (abfd)->core_signal
3bab7989
ML		 308 = bfd_get_16 (abfd, note->descdata + 12);
309
310 /* pr_pid */
cedb70c5 311 elf_tdata (abfd)->core_pid
3bab7989
ML		 312 = bfd_get_32 (abfd, note->descdata + 32);
313
314 /* pr_reg */
315 offset = 112;
eea6121a 316 size = 216;
3bab7989
ML		 317
318 break;
319 }
320
321 /* Make a ".reg/999" section. */
322 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
eea6121a 323 size, note->descpos + offset);
3bab7989
ML		 324}
325
b34976b6 326static bfd_boolean
27482721 327elf64_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML		 328{
329 switch (note->descsz)
330 {
331 default:
b34976b6 332 return FALSE;
3bab7989
ML		 333
334 case 136: /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
335 elf_tdata (abfd)->core_program
336 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
337 elf_tdata (abfd)->core_command
338 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
339 }
340
341 /* Note that for some reason, a spurious space is tacked
342 onto the end of the args in some (at least one anyway)
343 implementations, so strip it off if it exists. */
344
345 {
346 char *command = elf_tdata (abfd)->core_command;
347 int n = strlen (command);
348
349 if (0 < n && command[n - 1] == ' ')
350 command[n - 1] = '\0';
351 }
352
b34976b6 353 return TRUE;
3bab7989
ML		 354}
355\f
407443a3 356/* Functions for the x86-64 ELF linker. */
70256ad8 357
407443a3 358/* The name of the dynamic interpreter. This is put in the .interp
70256ad8
AJ		 359 section. */
360
407443a3 361#define ELF_DYNAMIC_INTERPRETER "/lib/ld64.so.1"
70256ad8 362
d40d037c
AJ		 363/* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
364 copying dynamic variables from a shared lib into an app's dynbss
365 section, and instead use a dynamic relocation to point into the
366 shared lib. */
367#define ELIMINATE_COPY_RELOCS 1
368
70256ad8
AJ		 369/* The size in bytes of an entry in the global offset table. */
370
371#define GOT_ENTRY_SIZE 8
8d88c4ca 372
70256ad8 373/* The size in bytes of an entry in the procedure linkage table. */
8d88c4ca 374
70256ad8
AJ		 375#define PLT_ENTRY_SIZE 16
376
377/* The first entry in a procedure linkage table looks like this. See the
378 SVR4 ABI i386 supplement and the x86-64 ABI to see how this works. */
379
380static const bfd_byte elf64_x86_64_plt0_entry[PLT_ENTRY_SIZE] =
381{
653165cc
AJ		 382 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
383 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
10efb593 384 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
70256ad8
AJ		 385};
386
387/* Subsequent entries in a procedure linkage table look like this. */
388
389static const bfd_byte elf64_x86_64_plt_entry[PLT_ENTRY_SIZE] =
390{
653165cc 391 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
407443a3 392 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653165cc 393 0x68, /* pushq immediate */
70256ad8
AJ		 394 0, 0, 0, 0, /* replaced with index into relocation table. */
395 0xe9, /* jmp relative */
396 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
397};
398
399/* The x86-64 linker needs to keep track of the number of relocs that
985142a4 400 it decides to copy as dynamic relocs in check_relocs for each symbol.
c434dee6
AJ		 401 This is so that it can later discard them if they are found to be
402 unnecessary. We store the information in a field extending the
403 regular ELF linker hash table. */
70256ad8 404
c434dee6 405struct elf64_x86_64_dyn_relocs
70256ad8
AJ		 406{
407 /* Next section. */
c434dee6
AJ		 408 struct elf64_x86_64_dyn_relocs *next;
409
410 /* The input section of the reloc. */
411 asection *sec;
412
413 /* Total number of relocs copied for the input section. */
70256ad8 414 bfd_size_type count;
c434dee6
AJ		 415
416 /* Number of pc-relative relocs copied for the input section. */
417 bfd_size_type pc_count;
70256ad8
AJ		 418};
419
420/* x86-64 ELF linker hash entry. */
421
422struct elf64_x86_64_link_hash_entry
423{
c434dee6 424 struct elf_link_hash_entry elf;
70256ad8 425
c434dee6
AJ		 426 /* Track dynamic relocs copied for this symbol. */
427 struct elf64_x86_64_dyn_relocs *dyn_relocs;
bffbf940
JJ		 428
429#define GOT_UNKNOWN 0
430#define GOT_NORMAL 1
431#define GOT_TLS_GD 2
432#define GOT_TLS_IE 3
67a4f2b7
AO		 433#define GOT_TLS_GDESC 4
434#define GOT_TLS_GD_BOTH_P(type) \
435 ((type) == (GOT_TLS_GD | GOT_TLS_GDESC))
436#define GOT_TLS_GD_P(type) \
437 ((type) == GOT_TLS_GD || GOT_TLS_GD_BOTH_P (type))
438#define GOT_TLS_GDESC_P(type) \
439 ((type) == GOT_TLS_GDESC || GOT_TLS_GD_BOTH_P (type))
440#define GOT_TLS_GD_ANY_P(type) \
441 (GOT_TLS_GD_P (type) || GOT_TLS_GDESC_P (type))
bffbf940 442 unsigned char tls_type;
67a4f2b7
AO		 443
444 /* Offset of the GOTPLT entry reserved for the TLS descriptor,
445 starting at the end of the jump table. */
446 bfd_vma tlsdesc_got;
bffbf940
JJ		 447};
448
449#define elf64_x86_64_hash_entry(ent) \
450 ((struct elf64_x86_64_link_hash_entry *)(ent))
451
452struct elf64_x86_64_obj_tdata
453{
454 struct elf_obj_tdata root;
455
456 /* tls_type for each local got entry. */
457 char *local_got_tls_type;
67a4f2b7
AO		 458
459 /* GOTPLT entries for TLS descriptors. */
460 bfd_vma *local_tlsdesc_gotent;
70256ad8
AJ		 461};
462
bffbf940
JJ		 463#define elf64_x86_64_tdata(abfd) \
464 ((struct elf64_x86_64_obj_tdata *) (abfd)->tdata.any)
465
466#define elf64_x86_64_local_got_tls_type(abfd) \
467 (elf64_x86_64_tdata (abfd)->local_got_tls_type)
468
67a4f2b7
AO		 469#define elf64_x86_64_local_tlsdesc_gotent(abfd) \
470 (elf64_x86_64_tdata (abfd)->local_tlsdesc_gotent)
bffbf940 471
0ffa91dd
NC		 472#define is_x86_64_elf(bfd) \
473 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
474 && elf_tdata (bfd) != NULL \
475 && elf_object_id (bfd) == X86_64_ELF_TDATA)
476
477static bfd_boolean
478elf64_x86_64_mkobject (bfd *abfd)
479{
480 return bfd_elf_allocate_object (abfd, sizeof (struct elf64_x86_64_obj_tdata),
481 X86_64_ELF_TDATA);
482}
483
c434dee6 484/* x86-64 ELF linker hash table. */
8d88c4ca 485
407443a3
AJ		 486struct elf64_x86_64_link_hash_table
487{
c434dee6 488 struct elf_link_hash_table elf;
70256ad8 489
c434dee6
AJ		 490 /* Short-cuts to get to dynamic linker sections. */
491 asection *sgot;
492 asection *sgotplt;
493 asection *srelgot;
494 asection *splt;
495 asection *srelplt;
496 asection *sdynbss;
497 asection *srelbss;
cbe950e9
L		 498 asection *igotplt;
499 asection *iplt;
500 asection *irelplt;
2a81c24a 501 asection *irelifunc;
70256ad8 502
67a4f2b7
AO		 503 /* The offset into splt of the PLT entry for the TLS descriptor
504 resolver. Special values are 0, if not necessary (or not found
505 to be necessary yet), and -1 if needed but not determined
506 yet. */
507 bfd_vma tlsdesc_plt;
508 /* The offset into sgot of the GOT entry used by the PLT entry
509 above. */
510 bfd_vma tlsdesc_got;
511
bffbf940
JJ		 512 union {
513 bfd_signed_vma refcount;
514 bfd_vma offset;
515 } tls_ld_got;
516
67a4f2b7
AO		 517 /* The amount of space used by the jump slots in the GOT. */
518 bfd_vma sgotplt_jump_table_size;
519
c434dee6
AJ		 520 /* Small local sym to section mapping cache. */
521 struct sym_sec_cache sym_sec;
9f03412a
AO		 522
523 /* _TLS_MODULE_BASE_ symbol. */
524 struct bfd_link_hash_entry *tls_module_base;
c25bc9fc
L		 525
526 /* Used by local STT_GNU_IFUNC symbols. */
527 htab_t loc_hash_table;
528 void *loc_hash_memory;
c434dee6 529};
70256ad8
AJ		 530
531/* Get the x86-64 ELF linker hash table from a link_info structure. */
8d88c4ca
NC		 532
533#define elf64_x86_64_hash_table(p) \
534 ((struct elf64_x86_64_link_hash_table *) ((p)->hash))
535
67a4f2b7
AO		 536#define elf64_x86_64_compute_jump_table_size(htab) \
537 ((htab)->srelplt->reloc_count * GOT_ENTRY_SIZE)
538
407443a3 539/* Create an entry in an x86-64 ELF linker hash table. */
70256ad8
AJ		 540
541static struct bfd_hash_entry *
eb4ff4d6
L		 542elf64_x86_64_link_hash_newfunc (struct bfd_hash_entry *entry,
543 struct bfd_hash_table *table,
544 const char *string)
70256ad8 545{
70256ad8 546 /* Allocate the structure if it has not already been allocated by a
c434dee6
AJ		 547 subclass. */
548 if (entry == NULL)
549 {
550 entry = bfd_hash_allocate (table,
551 sizeof (struct elf64_x86_64_link_hash_entry));
552 if (entry == NULL)
553 return entry;
554 }
70256ad8
AJ		 555
556 /* Call the allocation method of the superclass. */
c434dee6
AJ		 557 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
558 if (entry != NULL)
70256ad8 559 {
c434dee6
AJ		 560 struct elf64_x86_64_link_hash_entry *eh;
561
562 eh = (struct elf64_x86_64_link_hash_entry *) entry;
563 eh->dyn_relocs = NULL;
bffbf940 564 eh->tls_type = GOT_UNKNOWN;
67a4f2b7 565 eh->tlsdesc_got = (bfd_vma) -1;
70256ad8
AJ		 566 }
567
c434dee6 568 return entry;
70256ad8
AJ		 569}
570
c25bc9fc
L		 571static hashval_t
572elf64_x86_64_local_hash (int id, int r_sym)
573{
574 return ((((id & 0xff) << 24) | ((id & 0xff00) << 8))
575 ^ r_sym ^ (id >> 16));
576}
577
578/* Compute a hash of a local hash entry. We use elf_link_hash_entry
579 for local symbol so that we can handle local STT_GNU_IFUNC symbols
580 as global symbol. We reuse indx and dynstr_index for local symbol
581 hash since they aren't used by global symbols in this backend. */
582
583static hashval_t
584elf64_x86_64_local_htab_hash (const void *ptr)
585{
586 struct elf_link_hash_entry *h
587 = (struct elf_link_hash_entry *) ptr;
588 return elf64_x86_64_local_hash (h->indx, h->dynstr_index);
589}
590
591/* Compare local hash entries. */
592
593static int
594elf64_x86_64_local_htab_eq (const void *ptr1, const void *ptr2)
595{
596 struct elf_link_hash_entry *h1
597 = (struct elf_link_hash_entry *) ptr1;
598 struct elf_link_hash_entry *h2
599 = (struct elf_link_hash_entry *) ptr2;
600
601 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
602}
603
604/* Find and/or create a hash entry for local symbol. */
605
606static struct elf_link_hash_entry *
607elf64_x86_64_get_local_sym_hash (struct elf64_x86_64_link_hash_table *htab,
608 bfd *abfd, const Elf_Internal_Rela *rel,
609 bfd_boolean create)
610{
611 struct elf64_x86_64_link_hash_entry e, *ret;
612 asection *sec = abfd->sections;
613 hashval_t h = elf64_x86_64_local_hash (sec->id,
614 ELF64_R_SYM (rel->r_info));
615 void **slot;
616
617 e.elf.indx = sec->id;
618 e.elf.dynstr_index = ELF64_R_SYM (rel->r_info);
619 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
620 create ? INSERT : NO_INSERT);
621
622 if (!slot)
623 return NULL;
624
625 if (*slot)
626 {
627 ret = (struct elf64_x86_64_link_hash_entry *) *slot;
628 return &ret->elf;
629 }
630
631 ret = (struct elf64_x86_64_link_hash_entry *)
632 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
633 sizeof (struct elf64_x86_64_link_hash_entry));
634 if (ret)
635 {
636 memset (ret, 0, sizeof (*ret));
637 ret->elf.indx = sec->id;
638 ret->elf.dynstr_index = ELF64_R_SYM (rel->r_info);
639 ret->elf.dynindx = -1;
640 ret->elf.plt.offset = (bfd_vma) -1;
641 ret->elf.got.offset = (bfd_vma) -1;
642 *slot = ret;
643 }
644 return &ret->elf;
645}
646
8d88c4ca
NC		 647/* Create an X86-64 ELF linker hash table. */
648
649static struct bfd_link_hash_table *
27482721 650elf64_x86_64_link_hash_table_create (bfd *abfd)
8d88c4ca
NC		 651{
652 struct elf64_x86_64_link_hash_table *ret;
dc810e39 653 bfd_size_type amt = sizeof (struct elf64_x86_64_link_hash_table);
8d88c4ca 654
e2d34d7d 655 ret = (struct elf64_x86_64_link_hash_table *) bfd_malloc (amt);
c434dee6 656 if (ret == NULL)
8d88c4ca
NC		 657 return NULL;
658
eb4ff4d6
L		 659 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
660 elf64_x86_64_link_hash_newfunc,
66eb6687 661 sizeof (struct elf64_x86_64_link_hash_entry)))
8d88c4ca 662 {
e2d34d7d 663 free (ret);
8d88c4ca
NC		 664 return NULL;
665 }
666
c434dee6
AJ		 667 ret->sgot = NULL;
668 ret->sgotplt = NULL;
669 ret->srelgot = NULL;
670 ret->splt = NULL;
671 ret->srelplt = NULL;
672 ret->sdynbss = NULL;
673 ret->srelbss = NULL;
cbe950e9
L		 674 ret->igotplt= NULL;
675 ret->iplt = NULL;
676 ret->irelplt= NULL;
2a81c24a 677 ret->irelifunc = NULL;
c434dee6 678 ret->sym_sec.abfd = NULL;
67a4f2b7
AO		 679 ret->tlsdesc_plt = 0;
680 ret->tlsdesc_got = 0;
bffbf940 681 ret->tls_ld_got.refcount = 0;
67a4f2b7 682 ret->sgotplt_jump_table_size = 0;
9f03412a 683 ret->tls_module_base = NULL;
c434dee6 684
c25bc9fc
L		 685 ret->loc_hash_table = htab_try_create (1024,
686 elf64_x86_64_local_htab_hash,
687 elf64_x86_64_local_htab_eq,
688 NULL);
689 ret->loc_hash_memory = objalloc_create ();
690 if (!ret->loc_hash_table || !ret->loc_hash_memory)
691 {
692 free (ret);
693 return NULL;
694 }
695
c434dee6
AJ		 696 return &ret->elf.root;
697}
698
c25bc9fc
L		 699/* Destroy an X86-64 ELF linker hash table. */
700
701static void
702elf64_x86_64_link_hash_table_free (struct bfd_link_hash_table *hash)
703{
704 struct elf64_x86_64_link_hash_table *htab
705 = (struct elf64_x86_64_link_hash_table *) hash;
706
707 if (htab->loc_hash_table)
708 htab_delete (htab->loc_hash_table);
709 if (htab->loc_hash_memory)
710 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
711 _bfd_generic_link_hash_table_free (hash);
712}
713
c434dee6
AJ		 714/* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up
715 shortcuts to them in our hash table. */
716
b34976b6 717static bfd_boolean
eb4ff4d6 718elf64_x86_64_create_got_section (bfd *dynobj, struct bfd_link_info *info)
c434dee6
AJ		 719{
720 struct elf64_x86_64_link_hash_table *htab;
721
722 if (! _bfd_elf_create_got_section (dynobj, info))
b34976b6 723 return FALSE;
c434dee6
AJ		 724
725 htab = elf64_x86_64_hash_table (info);
726 htab->sgot = bfd_get_section_by_name (dynobj, ".got");
727 htab->sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
728 if (!htab->sgot || !htab->sgotplt)
729 abort ();
730
3496cb2a
L		 731 htab->srelgot = bfd_make_section_with_flags (dynobj, ".rela.got",
732 (SEC_ALLOC | SEC_LOAD
733 | SEC_HAS_CONTENTS
734 | SEC_IN_MEMORY
735 | SEC_LINKER_CREATED
736 | SEC_READONLY));
c434dee6 737 if (htab->srelgot == NULL
c434dee6 738 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 3))
b34976b6
AM		 739 return FALSE;
740 return TRUE;
c434dee6
AJ		 741}
742
743/* Create .plt, .rela.plt, .got, .got.plt, .rela.got, .dynbss, and
744 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
745 hash table. */
746
b34976b6 747static bfd_boolean
27482721 748elf64_x86_64_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info)
c434dee6
AJ		 749{
750 struct elf64_x86_64_link_hash_table *htab;
751
752 htab = elf64_x86_64_hash_table (info);
eb4ff4d6 753 if (!htab->sgot && !elf64_x86_64_create_got_section (dynobj, info))
b34976b6 754 return FALSE;
c434dee6
AJ		 755
756 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
b34976b6 757 return FALSE;
c434dee6
AJ		 758
759 htab->splt = bfd_get_section_by_name (dynobj, ".plt");
760 htab->srelplt = bfd_get_section_by_name (dynobj, ".rela.plt");
761 htab->sdynbss = bfd_get_section_by_name (dynobj, ".dynbss");
762 if (!info->shared)
763 htab->srelbss = bfd_get_section_by_name (dynobj, ".rela.bss");
764
765 if (!htab->splt || !htab->srelplt || !htab->sdynbss
766 || (!info->shared && !htab->srelbss))
767 abort ();
768
b34976b6 769 return TRUE;
c434dee6
AJ		 770}
771
772/* Copy the extra info we tack onto an elf_link_hash_entry. */
773
774static void
fcfa13d2 775elf64_x86_64_copy_indirect_symbol (struct bfd_link_info *info,
27482721
AJ		 776 struct elf_link_hash_entry *dir,
777 struct elf_link_hash_entry *ind)
c434dee6
AJ		 778{
779 struct elf64_x86_64_link_hash_entry *edir, *eind;
780
781 edir = (struct elf64_x86_64_link_hash_entry *) dir;
782 eind = (struct elf64_x86_64_link_hash_entry *) ind;
783
784 if (eind->dyn_relocs != NULL)
785 {
786 if (edir->dyn_relocs != NULL)
787 {
788 struct elf64_x86_64_dyn_relocs **pp;
789 struct elf64_x86_64_dyn_relocs *p;
790
fcfa13d2 791 /* Add reloc counts against the indirect sym to the direct sym
c434dee6
AJ		 792 list. Merge any entries against the same section. */
793 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
794 {
795 struct elf64_x86_64_dyn_relocs *q;
796
797 for (q = edir->dyn_relocs; q != NULL; q = q->next)
798 if (q->sec == p->sec)
799 {
800 q->pc_count += p->pc_count;
801 q->count += p->count;
802 *pp = p->next;
803 break;
804 }
805 if (q == NULL)
806 pp = &p->next;
807 }
808 *pp = edir->dyn_relocs;
809 }
810
811 edir->dyn_relocs = eind->dyn_relocs;
812 eind->dyn_relocs = NULL;
813 }
814
bffbf940
JJ		 815 if (ind->root.type == bfd_link_hash_indirect
816 && dir->got.refcount <= 0)
817 {
818 edir->tls_type = eind->tls_type;
819 eind->tls_type = GOT_UNKNOWN;
820 }
821
d40d037c
AJ		 822 if (ELIMINATE_COPY_RELOCS
823 && ind->root.type != bfd_link_hash_indirect
f5385ebf
AM		 824 && dir->dynamic_adjusted)
825 {
826 /* If called to transfer flags for a weakdef during processing
827 of elf_adjust_dynamic_symbol, don't copy non_got_ref.
828 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
829 dir->ref_dynamic |= ind->ref_dynamic;
830 dir->ref_regular |= ind->ref_regular;
831 dir->ref_regular_nonweak |= ind->ref_regular_nonweak;
832 dir->needs_plt |= ind->needs_plt;
833 dir->pointer_equality_needed |= ind->pointer_equality_needed;
834 }
d40d037c 835 else
fcfa13d2 836 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
8d88c4ca
NC		 837}
838
b34976b6 839static bfd_boolean
27482721 840elf64_x86_64_elf_object_p (bfd *abfd)
bffbf940 841{
8d88c4ca
NC		 842 /* Set the right machine number for an x86-64 elf64 file. */
843 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
b34976b6 844 return TRUE;
8d88c4ca
NC		 845}
846
142411ca
L		 847typedef union
848 {
849 unsigned char c[2];
850 uint16_t i;
851 }
852x86_64_opcode16;
853
854typedef union
855 {
856 unsigned char c[4];
857 uint32_t i;
858 }
859x86_64_opcode32;
860
861/* Return TRUE if the TLS access code sequence support transition
862 from R_TYPE. */
863
864static bfd_boolean
865elf64_x86_64_check_tls_transition (bfd *abfd, asection *sec,
866 bfd_byte *contents,
867 Elf_Internal_Shdr *symtab_hdr,
868 struct elf_link_hash_entry **sym_hashes,
869 unsigned int r_type,
870 const Elf_Internal_Rela *rel,
871 const Elf_Internal_Rela *relend)
bffbf940 872{
142411ca
L		 873 unsigned int val;
874 unsigned long r_symndx;
875 struct elf_link_hash_entry *h;
876 bfd_vma offset;
877
878 /* Get the section contents. */
879 if (contents == NULL)
880 {
881 if (elf_section_data (sec)->this_hdr.contents != NULL)
882 contents = elf_section_data (sec)->this_hdr.contents;
883 else
884 {
885 /* FIXME: How to better handle error condition? */
886 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
887 return FALSE;
bffbf940 888
142411ca
L		 889 /* Cache the section contents for elf_link_input_bfd. */
890 elf_section_data (sec)->this_hdr.contents = contents;
891 }
892 }
893
894 offset = rel->r_offset;
bffbf940 895 switch (r_type)
142411ca
L		 896 {
897 case R_X86_64_TLSGD:
898 case R_X86_64_TLSLD:
899 if ((rel + 1) >= relend)
900 return FALSE;
901
902 if (r_type == R_X86_64_TLSGD)
903 {
904 /* Check transition from GD access model. Only
905 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
906 .word 0x6666; rex64; call __tls_get_addr
907 can transit to different access model. */
908
909 static x86_64_opcode32 leaq = { { 0x66, 0x48, 0x8d, 0x3d } },
910 call = { { 0x66, 0x66, 0x48, 0xe8 } };
911 if (offset < 4
912 || (offset + 12) > sec->size
913 || bfd_get_32 (abfd, contents + offset - 4) != leaq.i
914 || bfd_get_32 (abfd, contents + offset + 4) != call.i)
915 return FALSE;
916 }
917 else
918 {
919 /* Check transition from LD access model. Only
920 leaq foo@tlsld(%rip), %rdi;
921 call __tls_get_addr
922 can transit to different access model. */
923
924 static x86_64_opcode32 ld = { { 0x48, 0x8d, 0x3d, 0xe8 } };
925 x86_64_opcode32 op;
926
927 if (offset < 3 || (offset + 9) > sec->size)
928 return FALSE;
929
930 op.i = bfd_get_32 (abfd, contents + offset - 3);
931 op.c[3] = bfd_get_8 (abfd, contents + offset + 4);
932 if (op.i != ld.i)
933 return FALSE;
934 }
935
936 r_symndx = ELF64_R_SYM (rel[1].r_info);
937 if (r_symndx < symtab_hdr->sh_info)
938 return FALSE;
939
940 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
c4fb387b
L		 941 /* Use strncmp to check __tls_get_addr since __tls_get_addr
942 may be versioned. */
142411ca
L		 943 return (h != NULL
944 && h->root.root.string != NULL
945 && (ELF64_R_TYPE (rel[1].r_info) == R_X86_64_PC32
946 || ELF64_R_TYPE (rel[1].r_info) == R_X86_64_PLT32)
c4fb387b
L		 947 && (strncmp (h->root.root.string,
948 "__tls_get_addr", 14) == 0));
142411ca
L		 949
950 case R_X86_64_GOTTPOFF:
951 /* Check transition from IE access model:
952 movq foo@gottpoff(%rip), %reg
953 addq foo@gottpoff(%rip), %reg
954 */
955
956 if (offset < 3 || (offset + 4) > sec->size)
957 return FALSE;
958
959 val = bfd_get_8 (abfd, contents + offset - 3);
960 if (val != 0x48 && val != 0x4c)
961 return FALSE;
962
963 val = bfd_get_8 (abfd, contents + offset - 2);
964 if (val != 0x8b && val != 0x03)
965 return FALSE;
966
967 val = bfd_get_8 (abfd, contents + offset - 1);
968 return (val & 0xc7) == 5;
969
970 case R_X86_64_GOTPC32_TLSDESC:
971 /* Check transition from GDesc access model:
972 leaq x@tlsdesc(%rip), %rax
973
974 Make sure it's a leaq adding rip to a 32-bit offset
975 into any register, although it's probably almost always
976 going to be rax. */
977
978 if (offset < 3 || (offset + 4) > sec->size)
979 return FALSE;
980
981 val = bfd_get_8 (abfd, contents + offset - 3);
982 if ((val & 0xfb) != 0x48)
983 return FALSE;
984
985 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
986 return FALSE;
987
988 val = bfd_get_8 (abfd, contents + offset - 1);
989 return (val & 0xc7) == 0x05;
990
991 case R_X86_64_TLSDESC_CALL:
992 /* Check transition from GDesc access model:
993 call *x@tlsdesc(%rax)
994 */
995 if (offset + 2 <= sec->size)
996 {
997 /* Make sure that it's a call *x@tlsdesc(%rax). */
998 static x86_64_opcode16 call = { { 0xff, 0x10 } };
999 return bfd_get_16 (abfd, contents + offset) == call.i;
1000 }
1001
1002 return FALSE;
1003
1004 default:
1005 abort ();
1006 }
1007}
1008
1009/* Return TRUE if the TLS access transition is OK or no transition
1010 will be performed. Update R_TYPE if there is a transition. */
1011
1012static bfd_boolean
1013elf64_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1014 asection *sec, bfd_byte *contents,
1015 Elf_Internal_Shdr *symtab_hdr,
1016 struct elf_link_hash_entry **sym_hashes,
1017 unsigned int *r_type, int tls_type,
1018 const Elf_Internal_Rela *rel,
1019 const Elf_Internal_Rela *relend,
1020 struct elf_link_hash_entry *h)
1021{
1022 unsigned int from_type = *r_type;
1023 unsigned int to_type = from_type;
1024 bfd_boolean check = TRUE;
1025
1026 switch (from_type)
bffbf940
JJ		 1027 {
1028 case R_X86_64_TLSGD:
67a4f2b7
AO		 1029 case R_X86_64_GOTPC32_TLSDESC:
1030 case R_X86_64_TLSDESC_CALL:
bffbf940 1031 case R_X86_64_GOTTPOFF:
142411ca
L		 1032 if (!info->shared)
1033 {
1034 if (h == NULL)
1035 to_type = R_X86_64_TPOFF32;
1036 else
1037 to_type = R_X86_64_GOTTPOFF;
1038 }
1039
1040 /* When we are called from elf64_x86_64_relocate_section,
1041 CONTENTS isn't NULL and there may be additional transitions
1042 based on TLS_TYPE. */
1043 if (contents != NULL)
1044 {
1045 unsigned int new_to_type = to_type;
1046
1047 if (!info->shared
1048 && h != NULL
1049 && h->dynindx == -1
1050 && tls_type == GOT_TLS_IE)
1051 new_to_type = R_X86_64_TPOFF32;
1052
1053 if (to_type == R_X86_64_TLSGD
1054 || to_type == R_X86_64_GOTPC32_TLSDESC
1055 || to_type == R_X86_64_TLSDESC_CALL)
1056 {
1057 if (tls_type == GOT_TLS_IE)
1058 new_to_type = R_X86_64_GOTTPOFF;
1059 }
1060
1061 /* We checked the transition before when we were called from
1062 elf64_x86_64_check_relocs. We only want to check the new
1063 transition which hasn't been checked before. */
1064 check = new_to_type != to_type && from_type == to_type;
1065 to_type = new_to_type;
1066 }
1067
1068 break;
1069
bffbf940 1070 case R_X86_64_TLSLD:
142411ca
L		 1071 if (!info->shared)
1072 to_type = R_X86_64_TPOFF32;
1073 break;
1074
1075 default:
1076 return TRUE;
bffbf940
JJ		 1077 }
1078
142411ca
L		 1079 /* Return TRUE if there is no transition. */
1080 if (from_type == to_type)
1081 return TRUE;
1082
1083 /* Check if the transition can be performed. */
1084 if (check
1085 && ! elf64_x86_64_check_tls_transition (abfd, sec, contents,
1086 symtab_hdr, sym_hashes,
1087 from_type, rel, relend))
1088 {
2f629d23 1089 reloc_howto_type *from, *to;
142411ca
L		 1090
1091 from = elf64_x86_64_rtype_to_howto (abfd, from_type);
1092 to = elf64_x86_64_rtype_to_howto (abfd, to_type);
1093
1094 (*_bfd_error_handler)
1095 (_("%B: TLS transition from %s to %s against `%s' at 0x%lx "
1096 "in section `%A' failed"),
1097 abfd, sec, from->name, to->name,
1098 h ? h->root.root.string : "a local symbol",
1099 (unsigned long) rel->r_offset);
1100 bfd_set_error (bfd_error_bad_value);
1101 return FALSE;
1102 }
1103
1104 *r_type = to_type;
1105 return TRUE;
bffbf940
JJ		 1106}
1107
70256ad8 1108/* Look through the relocs for a section during the first phase, and
c434dee6
AJ		 1109 calculate needed space in the global offset table, procedure
1110 linkage table, and dynamic reloc sections. */
70256ad8 1111
b34976b6 1112static bfd_boolean
142411ca
L		 1113elf64_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1114 asection *sec,
27482721 1115 const Elf_Internal_Rela *relocs)
70256ad8 1116{
c434dee6 1117 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ		 1118 Elf_Internal_Shdr *symtab_hdr;
1119 struct elf_link_hash_entry **sym_hashes;
70256ad8
AJ		 1120 const Elf_Internal_Rela *rel;
1121 const Elf_Internal_Rela *rel_end;
70256ad8 1122 asection *sreloc;
c25bc9fc 1123 Elf_Internal_Sym *isymbuf;
70256ad8 1124
1049f94e 1125 if (info->relocatable)
b34976b6 1126 return TRUE;
70256ad8 1127
0ffa91dd
NC		 1128 BFD_ASSERT (is_x86_64_elf (abfd));
1129
c434dee6 1130 htab = elf64_x86_64_hash_table (info);
0ffa91dd 1131 symtab_hdr = &elf_symtab_hdr (abfd);
c25bc9fc 1132 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
70256ad8 1133 sym_hashes = elf_sym_hashes (abfd);
70256ad8 1134
c434dee6 1135 sreloc = NULL;
cbe950e9 1136
70256ad8
AJ		 1137 rel_end = relocs + sec->reloc_count;
1138 for (rel = relocs; rel < rel_end; rel++)
1139 {
bffbf940 1140 unsigned int r_type;
70256ad8
AJ		 1141 unsigned long r_symndx;
1142 struct elf_link_hash_entry *h;
1143
1144 r_symndx = ELF64_R_SYM (rel->r_info);
bffbf940 1145 r_type = ELF64_R_TYPE (rel->r_info);
c434dee6
AJ		 1146
1147 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1148 {
d003868e
AM		 1149 (*_bfd_error_handler) (_("%B: bad symbol index: %d"),
1150 abfd, r_symndx);
b34976b6 1151 return FALSE;
c434dee6
AJ		 1152 }
1153
70256ad8 1154 if (r_symndx < symtab_hdr->sh_info)
c25bc9fc
L		 1155 {
1156 /* A local symbol. */
1157 Elf_Internal_Sym *isym;
1158
1159 /* Read this BFD's local symbols. */
1160 if (isymbuf == NULL)
1161 {
1162 if (isymbuf == NULL)
1163 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
1164 symtab_hdr->sh_info, 0,
1165 NULL, NULL, NULL);
1166 if (isymbuf == NULL)
1167 return FALSE;
1168 }
1169
1170 /* Check relocation against local STT_GNU_IFUNC symbol. */
1171 isym = isymbuf + r_symndx;
1172 if (ELF64_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1173 {
1174 h = elf64_x86_64_get_local_sym_hash (htab, abfd, rel,
1175 TRUE);
1176 if (h == NULL)
1177 return FALSE;
1178
1179 /* Fake a STT_GNU_IFUNC symbol. */
1180 h->type = STT_GNU_IFUNC;
1181 h->def_regular = 1;
1182 h->ref_regular = 1;
1183 h->forced_local = 1;
1184 h->root.type = bfd_link_hash_defined;
1185 }
1186 else
1187 h = NULL;
1188 }
70256ad8 1189 else
71cb9464
L		 1190 {
1191 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1192 while (h->root.type == bfd_link_hash_indirect
1193 || h->root.type == bfd_link_hash_warning)
1194 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c25bc9fc 1195 }
cbe950e9 1196
c25bc9fc
L		 1197 if (h != NULL)
1198 {
cbe950e9
L		 1199 /* Create the ifunc sections for static executables. If we
1200 never see an indirect function symbol nor we are building
1201 a static executable, those sections will be empty and
1202 won't appear in output. */
1203 switch (r_type)
1204 {
1205 default:
1206 break;
1207
1208 case R_X86_64_32S:
1209 case R_X86_64_32:
1210 case R_X86_64_64:
1211 case R_X86_64_PC32:
1212 case R_X86_64_PC64:
1213 case R_X86_64_PLT32:
1214 case R_X86_64_GOTPCREL:
1215 case R_X86_64_GOTPCREL64:
2a81c24a 1216 if (htab->irelifunc == NULL && htab->iplt == NULL)
cbe950e9 1217 {
2a81c24a 1218 if (!_bfd_elf_create_ifunc_sections (abfd, info))
cbe950e9
L		 1219 return FALSE;
1220
2a81c24a
L		 1221 if (info->shared)
1222 {
1223 htab->irelifunc = bfd_get_section_by_name (abfd,
1224 ".rela.ifunc");
1225 if (!htab->irelifunc)
1226 abort ();
1227 }
1228 else
1229 {
1230 htab->iplt = bfd_get_section_by_name (abfd, ".iplt");
1231 htab->irelplt = bfd_get_section_by_name (abfd,
1232 ".rela.iplt");
1233 htab->igotplt = bfd_get_section_by_name (abfd,
1234 ".igot.plt");
1235 if (!htab->iplt
1236 || !htab->irelplt
1237 || !htab->igotplt)
1238 abort ();
1239 }
cbe950e9
L		 1240 }
1241 break;
1242 }
1243
1244 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
1245 it here if it is defined in a non-shared object. */
1246 if (h->type == STT_GNU_IFUNC
1247 && h->def_regular)
1248 {
1249 /* It is referenced by a non-shared object. */
1250 h->ref_regular = 1;
1251
1252 /* STT_GNU_IFUNC symbol must go through PLT. */
1253 h->plt.refcount += 1;
1254
1255 /* STT_GNU_IFUNC needs dynamic sections. */
1256 if (htab->elf.dynobj == NULL)
1257 htab->elf.dynobj = abfd;
1258
1259 switch (r_type)
1260 {
048cbda4
L		 1261 default:
1262 (*_bfd_error_handler)
1263 (_("%B: relocation %s against STT_GNU_IFUNC "
1264 "symbol `%s' isn't handled by %s"), abfd,
1265 x86_64_elf_howto_table[r_type].name,
8b7e2992
L		 1266 (h->root.root.string
1267 ? h->root.root.string : "a local symbol"),
048cbda4
L		 1268 __FUNCTION__);
1269 bfd_set_error (bfd_error_bad_value);
1270 return FALSE;
cbe950e9 1271
710ab287
L		 1272 case R_X86_64_64:
1273 h->non_got_ref = 1;
1274 h->pointer_equality_needed = 1;
1275 if (info->shared)
1276 {
1277 struct elf64_x86_64_dyn_relocs *p;
1278 struct elf64_x86_64_dyn_relocs **head;
1279
1280 /* We must copy these reloc types into the output
1281 file. Create a reloc section in dynobj and
1282 make room for this reloc. */
1283 if (sreloc == NULL)
1284 {
1285 if (htab->elf.dynobj == NULL)
1286 htab->elf.dynobj = abfd;
1287
1288 sreloc = _bfd_elf_make_dynamic_reloc_section
1289 (sec, htab->elf.dynobj, 3, abfd, TRUE);
1290
1291 if (sreloc == NULL)
1292 return FALSE;
1293 }
1294
1295 head = &((struct elf64_x86_64_link_hash_entry *) h)->dyn_relocs;
1296 p = *head;
1297 if (p == NULL || p->sec != sec)
1298 {
1299 bfd_size_type amt = sizeof *p;
1300
1301 p = ((struct elf64_x86_64_dyn_relocs *)
1302 bfd_alloc (htab->elf.dynobj, amt));
1303 if (p == NULL)
1304 return FALSE;
1305 p->next = *head;
1306 *head = p;
1307 p->sec = sec;
1308 p->count = 0;
1309 p->pc_count = 0;
1310 }
1311 p->count += 1;
1312 }
1313 break;
1314
cbe950e9
L		 1315 case R_X86_64_32S:
1316 case R_X86_64_32:
cbe950e9
L		 1317 case R_X86_64_PC32:
1318 case R_X86_64_PC64:
1319 h->non_got_ref = 1;
1320 if (r_type != R_X86_64_PC32
1321 && r_type != R_X86_64_PC64)
1322 h->pointer_equality_needed = 1;
1323 break;
1324
1325 case R_X86_64_PLT32:
1326 break;
1327
1328 case R_X86_64_GOTPCREL:
1329 case R_X86_64_GOTPCREL64:
7afd84dc 1330 h->got.refcount += 1;
cbe950e9
L		 1331 if (htab->sgot == NULL
1332 && !elf64_x86_64_create_got_section (htab->elf.dynobj,
1333 info))
1334 return FALSE;
1335 break;
1336 }
1337
1338 continue;
1339 }
71cb9464 1340 }
70256ad8 1341
142411ca
L		 1342 if (! elf64_x86_64_tls_transition (info, abfd, sec, NULL,
1343 symtab_hdr, sym_hashes,
1344 &r_type, GOT_UNKNOWN,
1345 rel, rel_end, h))
1346 return FALSE;
1347
bffbf940 1348 switch (r_type)
70256ad8 1349 {
bffbf940
JJ		 1350 case R_X86_64_TLSLD:
1351 htab->tls_ld_got.refcount += 1;
1352 goto create_got;
1353
1354 case R_X86_64_TPOFF32:
1355 if (info->shared)
70256ad8 1356 {
bffbf940 1357 (*_bfd_error_handler)
d003868e
AM		 1358 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1359 abfd,
6610a52d
L		 1360 x86_64_elf_howto_table[r_type].name,
1361 (h) ? h->root.root.string : "a local symbol");
bffbf940 1362 bfd_set_error (bfd_error_bad_value);
b34976b6 1363 return FALSE;
70256ad8 1364 }
bffbf940 1365 break;
c434dee6 1366
bffbf940
JJ		 1367 case R_X86_64_GOTTPOFF:
1368 if (info->shared)
1369 info->flags |= DF_STATIC_TLS;
1370 /* Fall through */
70256ad8 1371
bffbf940
JJ		 1372 case R_X86_64_GOT32:
1373 case R_X86_64_GOTPCREL:
1374 case R_X86_64_TLSGD:
7b81dfbb
AJ		 1375 case R_X86_64_GOT64:
1376 case R_X86_64_GOTPCREL64:
1377 case R_X86_64_GOTPLT64:
67a4f2b7
AO		 1378 case R_X86_64_GOTPC32_TLSDESC:
1379 case R_X86_64_TLSDESC_CALL:
bffbf940
JJ		 1380 /* This symbol requires a global offset table entry. */
1381 {
1382 int tls_type, old_tls_type;
1383
1384 switch (r_type)
1385 {
1386 default: tls_type = GOT_NORMAL; break;
1387 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
1388 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
67a4f2b7
AO		 1389 case R_X86_64_GOTPC32_TLSDESC:
1390 case R_X86_64_TLSDESC_CALL:
1391 tls_type = GOT_TLS_GDESC; break;
bffbf940
JJ		 1392 }
1393
1394 if (h != NULL)
1395 {
7b81dfbb
AJ		 1396 if (r_type == R_X86_64_GOTPLT64)
1397 {
1398 /* This relocation indicates that we also need
1399 a PLT entry, as this is a function. We don't need
1400 a PLT entry for local symbols. */
1401 h->needs_plt = 1;
1402 h->plt.refcount += 1;
1403 }
bffbf940
JJ		 1404 h->got.refcount += 1;
1405 old_tls_type = elf64_x86_64_hash_entry (h)->tls_type;
1406 }
1407 else
1408 {
1409 bfd_signed_vma *local_got_refcounts;
1410
1411 /* This is a global offset table entry for a local symbol. */
1412 local_got_refcounts = elf_local_got_refcounts (abfd);
1413 if (local_got_refcounts == NULL)
1414 {
1415 bfd_size_type size;
1416
1417 size = symtab_hdr->sh_info;
67a4f2b7
AO		 1418 size *= sizeof (bfd_signed_vma)
1419 + sizeof (bfd_vma) + sizeof (char);
bffbf940
JJ		 1420 local_got_refcounts = ((bfd_signed_vma *)
1421 bfd_zalloc (abfd, size));
1422 if (local_got_refcounts == NULL)
b34976b6 1423 return FALSE;
bffbf940 1424 elf_local_got_refcounts (abfd) = local_got_refcounts;
67a4f2b7
AO		 1425 elf64_x86_64_local_tlsdesc_gotent (abfd)
1426 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
bffbf940 1427 elf64_x86_64_local_got_tls_type (abfd)
67a4f2b7 1428 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
bffbf940
JJ		 1429 }
1430 local_got_refcounts[r_symndx] += 1;
1431 old_tls_type
1432 = elf64_x86_64_local_got_tls_type (abfd) [r_symndx];
1433 }
1434
1435 /* If a TLS symbol is accessed using IE at least once,
1436 there is no point to use dynamic model for it. */
1437 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7
AO		 1438 && (! GOT_TLS_GD_ANY_P (old_tls_type)
1439 || tls_type != GOT_TLS_IE))
bffbf940 1440 {
67a4f2b7 1441 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
bffbf940 1442 tls_type = old_tls_type;
67a4f2b7
AO		 1443 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1444 && GOT_TLS_GD_ANY_P (tls_type))
1445 tls_type |= old_tls_type;
bffbf940
JJ		 1446 else
1447 {
1448 (*_bfd_error_handler)
1f7a4e42 1449 (_("%B: '%s' accessed both as normal and thread local symbol"),
d003868e 1450 abfd, h ? h->root.root.string : "<local>");
b34976b6 1451 return FALSE;
bffbf940
JJ		 1452 }
1453 }
1454
1455 if (old_tls_type != tls_type)
1456 {
1457 if (h != NULL)
1458 elf64_x86_64_hash_entry (h)->tls_type = tls_type;
1459 else
1460 elf64_x86_64_local_got_tls_type (abfd) [r_symndx] = tls_type;
1461 }
1462 }
c434dee6
AJ		 1463 /* Fall through */
1464
d6ab8113
JB		 1465 case R_X86_64_GOTOFF64:
1466 case R_X86_64_GOTPC32:
7b81dfbb 1467 case R_X86_64_GOTPC64:
bffbf940 1468 create_got:
c434dee6
AJ		 1469 if (htab->sgot == NULL)
1470 {
1471 if (htab->elf.dynobj == NULL)
1472 htab->elf.dynobj = abfd;
eb4ff4d6
L		 1473 if (!elf64_x86_64_create_got_section (htab->elf.dynobj,
1474 info))
b34976b6 1475 return FALSE;
c434dee6 1476 }
70256ad8
AJ		 1477 break;
1478
1479 case R_X86_64_PLT32:
1480 /* This symbol requires a procedure linkage table entry. We
407443a3
AJ		 1481 actually build the entry in adjust_dynamic_symbol,
1482 because this might be a case of linking PIC code which is
1483 never referenced by a dynamic object, in which case we
1484 don't need to generate a procedure linkage table entry
1485 after all. */
70256ad8
AJ		 1486
1487 /* If this is a local symbol, we resolve it directly without
407443a3 1488 creating a procedure linkage table entry. */
70256ad8
AJ		 1489 if (h == NULL)
1490 continue;
1491
f5385ebf 1492 h->needs_plt = 1;
51b64d56 1493 h->plt.refcount += 1;
70256ad8
AJ		 1494 break;
1495
7b81dfbb
AJ		 1496 case R_X86_64_PLTOFF64:
1497 /* This tries to form the 'address' of a function relative
1498 to GOT. For global symbols we need a PLT entry. */
1499 if (h != NULL)
1500 {
1501 h->needs_plt = 1;
1502 h->plt.refcount += 1;
1503 }
1504 goto create_got;
1505
cc78d0af
AJ		 1506 case R_X86_64_8:
1507 case R_X86_64_16:
70256ad8
AJ		 1508 case R_X86_64_32:
1509 case R_X86_64_32S:
1b71fb54
AJ		 1510 /* Let's help debug shared library creation. These relocs
1511 cannot be used in shared libs. Don't error out for
1512 sections we don't care about, such as debug sections or
1513 non-constant sections. */
1514 if (info->shared
1515 && (sec->flags & SEC_ALLOC) != 0
1516 && (sec->flags & SEC_READONLY) != 0)
1517 {
1518 (*_bfd_error_handler)
d003868e
AM		 1519 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1520 abfd,
6610a52d
L		 1521 x86_64_elf_howto_table[r_type].name,
1522 (h) ? h->root.root.string : "a local symbol");
1b71fb54 1523 bfd_set_error (bfd_error_bad_value);
b34976b6 1524 return FALSE;
1b71fb54
AJ		 1525 }
1526 /* Fall through. */
1527
c434dee6
AJ		 1528 case R_X86_64_PC8:
1529 case R_X86_64_PC16:
70256ad8 1530 case R_X86_64_PC32:
d6ab8113 1531 case R_X86_64_PC64:
1b71fb54 1532 case R_X86_64_64:
710ab287 1533 if (h != NULL && info->executable)
c434dee6
AJ		 1534 {
1535 /* If this reloc is in a read-only section, we might
1536 need a copy reloc. We can't check reliably at this
1537 stage whether the section is read-only, as input
1538 sections have not yet been mapped to output sections.
1539 Tentatively set the flag for now, and correct in
1540 adjust_dynamic_symbol. */
f5385ebf 1541 h->non_got_ref = 1;
c434dee6
AJ		 1542
1543 /* We may need a .plt entry if the function this reloc
1544 refers to is in a shared lib. */
1545 h->plt.refcount += 1;
d6ab8113 1546 if (r_type != R_X86_64_PC32 && r_type != R_X86_64_PC64)
f5385ebf 1547 h->pointer_equality_needed = 1;
c434dee6 1548 }
70256ad8
AJ		 1549
1550 /* If we are creating a shared library, and this is a reloc
1551 against a global symbol, or a non PC relative reloc
1552 against a local symbol, then we need to copy the reloc
1553 into the shared library. However, if we are linking with
1554 -Bsymbolic, we do not need to copy a reloc against a
1555 global symbol which is defined in an object we are
407443a3 1556 including in the link (i.e., DEF_REGULAR is set). At
70256ad8
AJ		 1557 this point we have not seen all the input files, so it is
1558 possible that DEF_REGULAR is not set now but will be set
c434dee6
AJ		 1559 later (it is never cleared). In case of a weak definition,
1560 DEF_REGULAR may be cleared later by a strong definition in
1561 a shared library. We account for that possibility below by
1562 storing information in the relocs_copied field of the hash
1563 table entry. A similar situation occurs when creating
1564 shared libraries and symbol visibility changes render the
1565 symbol local.
1566
1567 If on the other hand, we are creating an executable, we
1568 may need to keep relocations for symbols satisfied by a
1569 dynamic library if we manage to avoid copy relocs for the
0f88be7a 1570 symbol. */
c434dee6
AJ		 1571 if ((info->shared
1572 && (sec->flags & SEC_ALLOC) != 0
d8045f23 1573 && (! IS_X86_64_PCREL_TYPE (r_type)
c434dee6 1574 || (h != NULL
55255dae 1575 && (! SYMBOLIC_BIND (info, h)
c434dee6 1576 || h->root.type == bfd_link_hash_defweak
f5385ebf 1577 || !h->def_regular))))
d40d037c
AJ		 1578 || (ELIMINATE_COPY_RELOCS
1579 && !info->shared
c434dee6
AJ		 1580 && (sec->flags & SEC_ALLOC) != 0
1581 && h != NULL
1582 && (h->root.type == bfd_link_hash_defweak
0f88be7a 1583 || !h->def_regular)))
70256ad8 1584 {
c434dee6
AJ		 1585 struct elf64_x86_64_dyn_relocs *p;
1586 struct elf64_x86_64_dyn_relocs **head;
1587
1588 /* We must copy these reloc types into the output file.
1589 Create a reloc section in dynobj and make room for
1590 this reloc. */
70256ad8
AJ		 1591 if (sreloc == NULL)
1592 {
c434dee6
AJ		 1593 if (htab->elf.dynobj == NULL)
1594 htab->elf.dynobj = abfd;
1595
83bac4b0
NC		 1596 sreloc = _bfd_elf_make_dynamic_reloc_section
1597 (sec, htab->elf.dynobj, 3, abfd, /*rela?*/ TRUE);
70256ad8 1598
70256ad8 1599 if (sreloc == NULL)
83bac4b0 1600 return FALSE;
70256ad8
AJ		 1601 }
1602
c434dee6
AJ		 1603 /* If this is a global symbol, we count the number of
1604 relocations we need for this symbol. */
1605 if (h != NULL)
70256ad8 1606 {
c434dee6
AJ		 1607 head = &((struct elf64_x86_64_link_hash_entry *) h)->dyn_relocs;
1608 }
1609 else
1610 {
e81d3500 1611 void **vpp;
c434dee6
AJ		 1612 /* Track dynamic relocs needed for local syms too.
1613 We really need local syms available to do this
1614 easily. Oh well. */
1615
1616 asection *s;
1617 s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
1618 sec, r_symndx);
1619 if (s == NULL)
b34976b6 1620 return FALSE;
70256ad8 1621
e81d3500
DD		 1622 /* Beware of type punned pointers vs strict aliasing
1623 rules. */
1624 vpp = &(elf_section_data (s)->local_dynrel);
1625 head = (struct elf64_x86_64_dyn_relocs **)vpp;
c434dee6 1626 }
70256ad8 1627
c434dee6
AJ		 1628 p = *head;
1629 if (p == NULL || p->sec != sec)
1630 {
1631 bfd_size_type amt = sizeof *p;
d8045f23 1632
c434dee6
AJ		 1633 p = ((struct elf64_x86_64_dyn_relocs *)
1634 bfd_alloc (htab->elf.dynobj, amt));
70256ad8 1635 if (p == NULL)
b34976b6 1636 return FALSE;
c434dee6
AJ		 1637 p->next = *head;
1638 *head = p;
1639 p->sec = sec;
1640 p->count = 0;
1641 p->pc_count = 0;
70256ad8 1642 }
c434dee6
AJ		 1643
1644 p->count += 1;
d8045f23 1645 if (IS_X86_64_PCREL_TYPE (r_type))
c434dee6 1646 p->pc_count += 1;
70256ad8
AJ		 1647 }
1648 break;
fe4770f4
AJ		 1649
1650 /* This relocation describes the C++ object vtable hierarchy.
1651 Reconstruct it for later use during GC. */
1652 case R_X86_64_GNU_VTINHERIT:
c152c796 1653 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
b34976b6 1654 return FALSE;
fe4770f4
AJ		 1655 break;
1656
1657 /* This relocation describes which C++ vtable entries are actually
1658 used. Record for later use during GC. */
1659 case R_X86_64_GNU_VTENTRY:
d17e0c6e
JB		 1660 BFD_ASSERT (h != NULL);
1661 if (h != NULL
1662 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
b34976b6 1663 return FALSE;
fe4770f4 1664 break;
c434dee6
AJ		 1665
1666 default:
1667 break;
70256ad8
AJ		 1668 }
1669 }
1670
b34976b6 1671 return TRUE;
70256ad8
AJ		 1672}
1673
1674/* Return the section that should be marked against GC for a given
407443a3 1675 relocation. */
70256ad8
AJ		 1676
1677static asection *
27482721 1678elf64_x86_64_gc_mark_hook (asection *sec,
07adf181 1679 struct bfd_link_info *info,
27482721
AJ		 1680 Elf_Internal_Rela *rel,
1681 struct elf_link_hash_entry *h,
1682 Elf_Internal_Sym *sym)
70256ad8
AJ		 1683{
1684 if (h != NULL)
07adf181
AM		 1685 switch (ELF64_R_TYPE (rel->r_info))
1686 {
1687 case R_X86_64_GNU_VTINHERIT:
1688 case R_X86_64_GNU_VTENTRY:
1689 return NULL;
1690 }
1691
1692 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
70256ad8
AJ		 1693}
1694
407443a3 1695/* Update the got entry reference counts for the section being removed. */
70256ad8 1696
b34976b6 1697static bfd_boolean
27482721 1698elf64_x86_64_gc_sweep_hook (bfd *abfd, struct bfd_link_info *info,
142411ca
L		 1699 asection *sec,
1700 const Elf_Internal_Rela *relocs)
70256ad8
AJ		 1701{
1702 Elf_Internal_Shdr *symtab_hdr;
1703 struct elf_link_hash_entry **sym_hashes;
1704 bfd_signed_vma *local_got_refcounts;
1705 const Elf_Internal_Rela *rel, *relend;
c434dee6 1706
7dda2462
TG		 1707 if (info->relocatable)
1708 return TRUE;
1709
c434dee6 1710 elf_section_data (sec)->local_dynrel = NULL;
70256ad8 1711
0ffa91dd 1712 symtab_hdr = &elf_symtab_hdr (abfd);
70256ad8
AJ		 1713 sym_hashes = elf_sym_hashes (abfd);
1714 local_got_refcounts = elf_local_got_refcounts (abfd);
1715
70256ad8
AJ		 1716 relend = relocs + sec->reloc_count;
1717 for (rel = relocs; rel < relend; rel++)
26e41594
AM		 1718 {
1719 unsigned long r_symndx;
1720 unsigned int r_type;
1721 struct elf_link_hash_entry *h = NULL;
70256ad8 1722
26e41594
AM		 1723 r_symndx = ELF64_R_SYM (rel->r_info);
1724 if (r_symndx >= symtab_hdr->sh_info)
1725 {
1726 struct elf64_x86_64_link_hash_entry *eh;
1727 struct elf64_x86_64_dyn_relocs **pp;
1728 struct elf64_x86_64_dyn_relocs *p;
c434dee6 1729
26e41594 1730 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3eb128b2
AM		 1731 while (h->root.type == bfd_link_hash_indirect
1732 || h->root.type == bfd_link_hash_warning)
1733 h = (struct elf_link_hash_entry *) h->root.u.i.link;
26e41594 1734 eh = (struct elf64_x86_64_link_hash_entry *) h;
c434dee6 1735
26e41594
AM		 1736 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
1737 if (p->sec == sec)
1738 {
1739 /* Everything must go for SEC. */
1740 *pp = p->next;
1741 break;
1742 }
1743 }
c434dee6 1744
26e41594 1745 r_type = ELF64_R_TYPE (rel->r_info);
142411ca
L		 1746 if (! elf64_x86_64_tls_transition (info, abfd, sec, NULL,
1747 symtab_hdr, sym_hashes,
1748 &r_type, GOT_UNKNOWN,
1749 rel, relend, h))
1750 return FALSE;
1751
26e41594
AM		 1752 switch (r_type)
1753 {
1754 case R_X86_64_TLSLD:
1755 if (elf64_x86_64_hash_table (info)->tls_ld_got.refcount > 0)
1756 elf64_x86_64_hash_table (info)->tls_ld_got.refcount -= 1;
1757 break;
c434dee6 1758
26e41594 1759 case R_X86_64_TLSGD:
67a4f2b7
AO		 1760 case R_X86_64_GOTPC32_TLSDESC:
1761 case R_X86_64_TLSDESC_CALL:
26e41594
AM		 1762 case R_X86_64_GOTTPOFF:
1763 case R_X86_64_GOT32:
1764 case R_X86_64_GOTPCREL:
7b81dfbb
AJ		 1765 case R_X86_64_GOT64:
1766 case R_X86_64_GOTPCREL64:
1767 case R_X86_64_GOTPLT64:
26e41594
AM		 1768 if (h != NULL)
1769 {
7b81dfbb
AJ		 1770 if (r_type == R_X86_64_GOTPLT64 && h->plt.refcount > 0)
1771 h->plt.refcount -= 1;
26e41594
AM		 1772 if (h->got.refcount > 0)
1773 h->got.refcount -= 1;
1774 }
1775 else if (local_got_refcounts != NULL)
1776 {
1777 if (local_got_refcounts[r_symndx] > 0)
1778 local_got_refcounts[r_symndx] -= 1;
1779 }
1780 break;
c434dee6 1781
26e41594
AM		 1782 case R_X86_64_8:
1783 case R_X86_64_16:
1784 case R_X86_64_32:
1785 case R_X86_64_64:
1786 case R_X86_64_32S:
1787 case R_X86_64_PC8:
1788 case R_X86_64_PC16:
1789 case R_X86_64_PC32:
d6ab8113 1790 case R_X86_64_PC64:
26e41594
AM		 1791 if (info->shared)
1792 break;
1793 /* Fall thru */
c434dee6 1794
26e41594 1795 case R_X86_64_PLT32:
7b81dfbb 1796 case R_X86_64_PLTOFF64:
26e41594
AM		 1797 if (h != NULL)
1798 {
1799 if (h->plt.refcount > 0)
1800 h->plt.refcount -= 1;
1801 }
1802 break;
70256ad8 1803
26e41594
AM		 1804 default:
1805 break;
1806 }
1807 }
70256ad8 1808
b34976b6 1809 return TRUE;
70256ad8
AJ		 1810}
1811
1812/* Adjust a symbol defined by a dynamic object and referenced by a
1813 regular object. The current definition is in some section of the
1814 dynamic object, but we're not including those sections. We have to
1815 change the definition to something the rest of the link can
407443a3 1816 understand. */
70256ad8 1817
b34976b6 1818static bfd_boolean
27482721
AJ		 1819elf64_x86_64_adjust_dynamic_symbol (struct bfd_link_info *info,
1820 struct elf_link_hash_entry *h)
70256ad8 1821{
c434dee6 1822 struct elf64_x86_64_link_hash_table *htab;
70256ad8 1823 asection *s;
70256ad8 1824
cbe950e9
L		 1825 /* STT_GNU_IFUNC symbol must go through PLT. */
1826 if (h->type == STT_GNU_IFUNC)
1827 {
1828 if (h->plt.refcount <= 0)
1829 {
1830 h->plt.offset = (bfd_vma) -1;
1831 h->needs_plt = 0;
1832 }
1833 return TRUE;
1834 }
1835
70256ad8
AJ		 1836 /* If this is a function, put it in the procedure linkage table. We
1837 will fill in the contents of the procedure linkage table later,
1838 when we know the address of the .got section. */
1839 if (h->type == STT_FUNC
f5385ebf 1840 || h->needs_plt)
70256ad8 1841 {
c434dee6 1842 if (h->plt.refcount <= 0
27482721
AJ		 1843 || SYMBOL_CALLS_LOCAL (info, h)
1844 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
1845 && h->root.type == bfd_link_hash_undefweak))
70256ad8 1846 {
70256ad8
AJ		 1847 /* This case can occur if we saw a PLT32 reloc in an input
1848 file, but the symbol was never referred to by a dynamic
1849 object, or if all references were garbage collected. In
1850 such a case, we don't actually need to build a procedure
1851 linkage table, and we can just do a PC32 reloc instead. */
70256ad8 1852 h->plt.offset = (bfd_vma) -1;
f5385ebf 1853 h->needs_plt = 0;
70256ad8
AJ		 1854 }
1855
b34976b6 1856 return TRUE;
70256ad8 1857 }
bbd7ec4a 1858 else
c434dee6
AJ		 1859 /* It's possible that we incorrectly decided a .plt reloc was
1860 needed for an R_X86_64_PC32 reloc to a non-function sym in
1861 check_relocs. We can't decide accurately between function and
1862 non-function syms in check-relocs; Objects loaded later in
1863 the link may change h->type. So fix it now. */
bbd7ec4a 1864 h->plt.offset = (bfd_vma) -1;
70256ad8
AJ		 1865
1866 /* If this is a weak symbol, and there is a real definition, the
1867 processor independent code will have arranged for us to see the
407443a3 1868 real definition first, and we can just use the same value. */
f6e332e6 1869 if (h->u.weakdef != NULL)
70256ad8 1870 {
f6e332e6
AM		 1871 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
1872 || h->u.weakdef->root.type == bfd_link_hash_defweak);
1873 h->root.u.def.section = h->u.weakdef->root.u.def.section;
1874 h->root.u.def.value = h->u.weakdef->root.u.def.value;
d40d037c 1875 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
f6e332e6 1876 h->non_got_ref = h->u.weakdef->non_got_ref;
b34976b6 1877 return TRUE;
70256ad8
AJ		 1878 }
1879
1880 /* This is a reference to a symbol defined by a dynamic object which
407443a3 1881 is not a function. */
70256ad8
AJ		 1882
1883 /* If we are creating a shared library, we must presume that the
1884 only references to the symbol are via the global offset table.
1885 For such cases we need not do anything here; the relocations will
407443a3 1886 be handled correctly by relocate_section. */
70256ad8 1887 if (info->shared)
b34976b6 1888 return TRUE;
70256ad8
AJ		 1889
1890 /* If there are no references to this symbol that do not use the
1891 GOT, we don't need to generate a copy reloc. */
f5385ebf 1892 if (!h->non_got_ref)
b34976b6 1893 return TRUE;
70256ad8 1894
c434dee6
AJ		 1895 /* If -z nocopyreloc was given, we won't generate them either. */
1896 if (info->nocopyreloc)
1897 {
f5385ebf 1898 h->non_got_ref = 0;
b34976b6 1899 return TRUE;
c434dee6
AJ		 1900 }
1901
d40d037c 1902 if (ELIMINATE_COPY_RELOCS)
c434dee6 1903 {
d40d037c
AJ		 1904 struct elf64_x86_64_link_hash_entry * eh;
1905 struct elf64_x86_64_dyn_relocs *p;
c434dee6 1906
d40d037c
AJ		 1907 eh = (struct elf64_x86_64_link_hash_entry *) h;
1908 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1909 {
1910 s = p->sec->output_section;
1911 if (s != NULL && (s->flags & SEC_READONLY) != 0)
1912 break;
1913 }
1914
1915 /* If we didn't find any dynamic relocs in read-only sections, then
1916 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
1917 if (p == NULL)
1918 {
f5385ebf 1919 h->non_got_ref = 0;
d40d037c
AJ		 1920 return TRUE;
1921 }
c434dee6
AJ		 1922 }
1923
909272ee
AM		 1924 if (h->size == 0)
1925 {
1926 (*_bfd_error_handler) (_("dynamic variable `%s' is zero size"),
1927 h->root.root.string);
1928 return TRUE;
1929 }
1930
70256ad8 1931 /* We must allocate the symbol in our .dynbss section, which will
407443a3 1932 become part of the .bss section of the executable. There will be
70256ad8
AJ		 1933 an entry for this symbol in the .dynsym section. The dynamic
1934 object will contain position independent code, so all references
1935 from the dynamic object to this symbol will go through the global
1936 offset table. The dynamic linker will use the .dynsym entry to
1937 determine the address it must put in the global offset table, so
1938 both the dynamic object and the regular object will refer to the
1939 same memory location for the variable. */
1940
c434dee6 1941 htab = elf64_x86_64_hash_table (info);
70256ad8
AJ		 1942
1943 /* We must generate a R_X86_64_COPY reloc to tell the dynamic linker
1944 to copy the initial value out of the dynamic object and into the
cedb70c5 1945 runtime process image. */
70256ad8
AJ		 1946 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1947 {
eea6121a 1948 htab->srelbss->size += sizeof (Elf64_External_Rela);
f5385ebf 1949 h->needs_copy = 1;
70256ad8
AJ		 1950 }
1951
c434dee6 1952 s = htab->sdynbss;
70256ad8 1953
027297b7 1954 return _bfd_elf_adjust_dynamic_copy (h, s);
70256ad8
AJ		 1955}
1956
c434dee6
AJ		 1957/* Allocate space in .plt, .got and associated reloc sections for
1958 dynamic relocs. */
1959
b34976b6 1960static bfd_boolean
eb4ff4d6 1961elf64_x86_64_allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
c434dee6
AJ		 1962{
1963 struct bfd_link_info *info;
1964 struct elf64_x86_64_link_hash_table *htab;
1965 struct elf64_x86_64_link_hash_entry *eh;
1966 struct elf64_x86_64_dyn_relocs *p;
1967
e92d460e 1968 if (h->root.type == bfd_link_hash_indirect)
b34976b6 1969 return TRUE;
c434dee6 1970
e92d460e
AM		 1971 if (h->root.type == bfd_link_hash_warning)
1972 h = (struct elf_link_hash_entry *) h->root.u.i.link;
cbe950e9 1973 eh = (struct elf64_x86_64_link_hash_entry *) h;
e92d460e 1974
c434dee6
AJ		 1975 info = (struct bfd_link_info *) inf;
1976 htab = elf64_x86_64_hash_table (info);
1977
cbe950e9
L		 1978 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
1979 here if it is defined and referenced in a non-shared object. */
1980 if (h->type == STT_GNU_IFUNC
1981 && h->def_regular)
1982 {
1983 asection *plt, *gotplt, *relplt;
1984
44c4ea11 1985 /* When a shared library references a STT_GNU_IFUNC symbol
188dbb07
L		 1986 defined in executable, the address of the resolved function
1987 may be used. But in non-shared executable, the address of
1988 its .plt slot may be used. Pointer equality may not work
1989 correctly. PIE should be used if pointer equality is
1990 required here. */
44c4ea11
L		 1991 if (!info->shared
1992 && (h->dynindx != -1
1993 || info->export_dynamic)
1994 && h->pointer_equality_needed)
1995 {
1996 info->callbacks->einfo
eba077f2 1997 (_("%F%P: dynamic STT_GNU_IFUNC symbol `%s' with pointer "
44c4ea11
L		 1998 "equality in `%B' can not be used when making an "
1999 "executable; recompile with -fPIE and relink with -pie\n"),
2000 h->root.root.string,
2001 h->root.u.def.section->owner);
2002 bfd_set_error (bfd_error_bad_value);
2003 return FALSE;
2004 }
2005
cbe950e9
L		 2006 /* Return and discard space for dynamic relocations against it if
2007 it is never referenced in a non-shared object. */
2008 if (!h->ref_regular)
2009 {
2010 if (h->plt.refcount > 0
2011 || h->got.refcount > 0)
2012 abort ();
2013 h->got.offset = (bfd_vma) -1;
2014 eh->dyn_relocs = NULL;
2015 return TRUE;
2016 }
2017
cbe950e9
L		 2018 /* When building a static executable, use .iplt, .igot.plt and
2019 .rela.iplt sections for STT_GNU_IFUNC symbols. */
710ab287 2020 if (htab->splt != NULL)
cbe950e9
L		 2021 {
2022 plt = htab->splt;
2023 gotplt = htab->sgotplt;
2024 relplt = htab->srelplt;
2025
2026 /* If this is the first .plt entry, make room for the special
2027 first entry. */
2028 if (plt->size == 0)
2029 plt->size += PLT_ENTRY_SIZE;
2030 }
2031 else
2032 {
2033 plt = htab->iplt;
2034 gotplt = htab->igotplt;
2035 relplt = htab->irelplt;
2036 }
2037
2038 /* Don't update value of STT_GNU_IFUNC symbol to PLT. We need
2039 the original value for R_X86_64_IRELATIVE. */
2040 h->plt.offset = plt->size;
2041
2042 /* Make room for this entry in the .plt/.iplt section. */
2043 plt->size += PLT_ENTRY_SIZE;
2044
2045 /* We also need to make an entry in the .got.plt/.got.iplt
2046 section, which will be placed in the .got section by the
2047 linker script. */
2048 gotplt->size += GOT_ENTRY_SIZE;
2049
2050 /* We also need to make an entry in the .rela.plt/.rela.iplt
2051 section. */
2052 relplt->size += sizeof (Elf64_External_Rela);
2053 relplt->reloc_count++;
2054
710ab287
L		 2055 /* We need dynamic relocation for STT_GNU_IFUNC symbol only
2056 when there is a non-GOT reference in a shared object. */
2057 if (!info->shared
2058 || !h->non_got_ref)
cbe950e9
L		 2059 eh->dyn_relocs = NULL;
2060
710ab287
L		 2061 /* Finally, allocate space. */
2062 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2a81c24a 2063 htab->irelifunc->size += p->count * sizeof (Elf64_External_Rela);
710ab287
L		 2064
2065 /* For STT_GNU_IFUNC symbol, .got.plt has the real function
2066 addres and .got has the PLT entry adddress. We will load
2067 the GOT entry with the PLT entry in finish_dynamic_symbol if
2068 it is used. For branch, it uses .got.plt. For symbol value,
2069 1. Use .got.plt in a shared object if it is forced local or
2070 not dynamic.
2071 2. Use .got.plt in a non-shared object if pointer equality
2072 isn't needed.
44c4ea11
L		 2073 3. Use .got.plt in PIE.
2074 4. Use .got.plt if .got isn't used.
2075 5. Otherwise use .got so that it can be shared among different
710ab287
L		 2076 objects at run-time.
2077 We only need to relocate .got entry in shared object. */
2078 if ((info->shared
2079 && (h->dynindx == -1
2080 || h->forced_local))
2081 || (!info->shared
2082 && !h->pointer_equality_needed)
44c4ea11 2083 || (info->executable && info->shared)
710ab287
L		 2084 || htab->sgot == NULL)
2085 {
2086 /* Use .got.plt. */
2087 h->got.offset = (bfd_vma) -1;
2088 }
2089 else
2090 {
2091 h->got.offset = htab->sgot->size;
2092 htab->sgot->size += GOT_ENTRY_SIZE;
2093 if (info->shared)
2094 htab->srelgot->size += sizeof (Elf64_External_Rela);
0018b0a3 2095 }
710ab287
L		 2096
2097 return TRUE;
cbe950e9
L		 2098 }
2099 else if (htab->elf.dynamic_sections_created
2100 && h->plt.refcount > 0)
c434dee6
AJ		 2101 {
2102 /* Make sure this symbol is output as a dynamic symbol.
2103 Undefined weak syms won't yet be marked as dynamic. */
2104 if (h->dynindx == -1
f5385ebf 2105 && !h->forced_local)
c434dee6 2106 {
c152c796 2107 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2108 return FALSE;
c434dee6
AJ		 2109 }
2110
27482721
AJ		 2111 if (info->shared
2112 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
c434dee6
AJ		 2113 {
2114 asection *s = htab->splt;
2115
2116 /* If this is the first .plt entry, make room for the special
2117 first entry. */
eea6121a
AM		 2118 if (s->size == 0)
2119 s->size += PLT_ENTRY_SIZE;
c434dee6 2120
eea6121a 2121 h->plt.offset = s->size;
c434dee6
AJ		 2122
2123 /* If this symbol is not defined in a regular file, and we are
2124 not generating a shared library, then set the symbol to this
2125 location in the .plt. This is required to make function
2126 pointers compare as equal between the normal executable and
2127 the shared library. */
2128 if (! info->shared
f5385ebf 2129 && !h->def_regular)
c434dee6
AJ		 2130 {
2131 h->root.u.def.section = s;
2132 h->root.u.def.value = h->plt.offset;
2133 }
2134
2135 /* Make room for this entry. */
eea6121a 2136 s->size += PLT_ENTRY_SIZE;
c434dee6
AJ		 2137
2138 /* We also need to make an entry in the .got.plt section, which
2139 will be placed in the .got section by the linker script. */
eea6121a 2140 htab->sgotplt->size += GOT_ENTRY_SIZE;
c434dee6
AJ		 2141
2142 /* We also need to make an entry in the .rela.plt section. */
eea6121a 2143 htab->srelplt->size += sizeof (Elf64_External_Rela);
67a4f2b7 2144 htab->srelplt->reloc_count++;
c434dee6
AJ		 2145 }
2146 else
2147 {
2148 h->plt.offset = (bfd_vma) -1;
f5385ebf 2149 h->needs_plt = 0;
c434dee6
AJ		 2150 }
2151 }
2152 else
2153 {
2154 h->plt.offset = (bfd_vma) -1;
f5385ebf 2155 h->needs_plt = 0;
c434dee6
AJ		 2156 }
2157
67a4f2b7
AO		 2158 eh->tlsdesc_got = (bfd_vma) -1;
2159
bffbf940
JJ		 2160 /* If R_X86_64_GOTTPOFF symbol is now local to the binary,
2161 make it a R_X86_64_TPOFF32 requiring no GOT entry. */
2162 if (h->got.refcount > 0
2163 && !info->shared
2164 && h->dynindx == -1
2165 && elf64_x86_64_hash_entry (h)->tls_type == GOT_TLS_IE)
d8045f23
NC		 2166 {
2167 h->got.offset = (bfd_vma) -1;
2168 }
bffbf940 2169 else if (h->got.refcount > 0)
c434dee6
AJ		 2170 {
2171 asection *s;
b34976b6 2172 bfd_boolean dyn;
bffbf940 2173 int tls_type = elf64_x86_64_hash_entry (h)->tls_type;
c434dee6
AJ		 2174
2175 /* Make sure this symbol is output as a dynamic symbol.
2176 Undefined weak syms won't yet be marked as dynamic. */
2177 if (h->dynindx == -1
f5385ebf 2178 && !h->forced_local)
c434dee6 2179 {
c152c796 2180 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2181 return FALSE;
c434dee6
AJ		 2182 }
2183
67a4f2b7
AO		 2184 if (GOT_TLS_GDESC_P (tls_type))
2185 {
2186 eh->tlsdesc_got = htab->sgotplt->size
2187 - elf64_x86_64_compute_jump_table_size (htab);
2188 htab->sgotplt->size += 2 * GOT_ENTRY_SIZE;
2189 h->got.offset = (bfd_vma) -2;
2190 }
2191 if (! GOT_TLS_GDESC_P (tls_type)
2192 || GOT_TLS_GD_P (tls_type))
2193 {
2194 s = htab->sgot;
2195 h->got.offset = s->size;
2196 s->size += GOT_ENTRY_SIZE;
2197 if (GOT_TLS_GD_P (tls_type))
2198 s->size += GOT_ENTRY_SIZE;
2199 }
c434dee6 2200 dyn = htab->elf.dynamic_sections_created;
bffbf940
JJ		 2201 /* R_X86_64_TLSGD needs one dynamic relocation if local symbol
2202 and two if global.
2203 R_X86_64_GOTTPOFF needs one dynamic relocation. */
67a4f2b7 2204 if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
bffbf940 2205 || tls_type == GOT_TLS_IE)
eea6121a 2206 htab->srelgot->size += sizeof (Elf64_External_Rela);
67a4f2b7 2207 else if (GOT_TLS_GD_P (tls_type))
eea6121a 2208 htab->srelgot->size += 2 * sizeof (Elf64_External_Rela);
67a4f2b7
AO		 2209 else if (! GOT_TLS_GDESC_P (tls_type)
2210 && (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2211 || h->root.type != bfd_link_hash_undefweak)
27482721
AJ		 2212 && (info->shared
2213 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
eea6121a 2214 htab->srelgot->size += sizeof (Elf64_External_Rela);
67a4f2b7
AO		 2215 if (GOT_TLS_GDESC_P (tls_type))
2216 {
2217 htab->srelplt->size += sizeof (Elf64_External_Rela);
2218 htab->tlsdesc_plt = (bfd_vma) -1;
2219 }
c434dee6
AJ		 2220 }
2221 else
2222 h->got.offset = (bfd_vma) -1;
2223
c434dee6 2224 if (eh->dyn_relocs == NULL)
b34976b6 2225 return TRUE;
c434dee6
AJ		 2226
2227 /* In the shared -Bsymbolic case, discard space allocated for
2228 dynamic pc-relative relocs against symbols which turn out to be
2229 defined in regular objects. For the normal shared case, discard
2230 space for pc-relative relocs that have become local due to symbol
2231 visibility changes. */
2232
2233 if (info->shared)
2234 {
27482721
AJ		 2235 /* Relocs that use pc_count are those that appear on a call
2236 insn, or certain REL relocs that can generated via assembly.
2237 We want calls to protected symbols to resolve directly to the
2238 function rather than going via the plt. If people want
2239 function pointer comparisons to work as expected then they
2240 should avoid writing weird assembly. */
2241 if (SYMBOL_CALLS_LOCAL (info, h))
c434dee6
AJ		 2242 {
2243 struct elf64_x86_64_dyn_relocs **pp;
2244
2245 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2246 {
2247 p->count -= p->pc_count;
2248 p->pc_count = 0;
2249 if (p->count == 0)
2250 *pp = p->next;
2251 else
2252 pp = &p->next;
2253 }
2254 }
4e795f50
AM		 2255
2256 /* Also discard relocs on undefined weak syms with non-default
2257 visibility. */
22d606e9 2258 if (eh->dyn_relocs != NULL
4e795f50 2259 && h->root.type == bfd_link_hash_undefweak)
22d606e9
AM		 2260 {
2261 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
2262 eh->dyn_relocs = NULL;
2263
2264 /* Make sure undefined weak symbols are output as a dynamic
2265 symbol in PIEs. */
2266 else if (h->dynindx == -1
d8045f23
NC		 2267 && ! h->forced_local
2268 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2269 return FALSE;
22d606e9 2270 }
cbe950e9 2271
d8045f23 2272 }
d40d037c 2273 else if (ELIMINATE_COPY_RELOCS)
c434dee6
AJ		 2274 {
2275 /* For the non-shared case, discard space for relocs against
2276 symbols which turn out to need copy relocs or are not
2277 dynamic. */
2278
f5385ebf
AM		 2279 if (!h->non_got_ref
2280 && ((h->def_dynamic
2281 && !h->def_regular)
c434dee6
AJ		 2282 || (htab->elf.dynamic_sections_created
2283 && (h->root.type == bfd_link_hash_undefweak
2284 || h->root.type == bfd_link_hash_undefined))))
2285 {
2286 /* Make sure this symbol is output as a dynamic symbol.
2287 Undefined weak syms won't yet be marked as dynamic. */
2288 if (h->dynindx == -1
d8045f23
NC		 2289 && ! h->forced_local
2290 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2291 return FALSE;
c434dee6
AJ		 2292
2293 /* If that succeeded, we know we'll be keeping all the
2294 relocs. */
2295 if (h->dynindx != -1)
2296 goto keep;
2297 }
2298
2299 eh->dyn_relocs = NULL;
2300
2301 keep: ;
2302 }
2303
2304 /* Finally, allocate space. */
2305 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2306 {
e7c33416
NC		 2307 asection * sreloc;
2308
cbe950e9 2309 sreloc = elf_section_data (p->sec)->sreloc;
e7c33416
NC		 2310
2311 BFD_ASSERT (sreloc != NULL);
2312
eea6121a 2313 sreloc->size += p->count * sizeof (Elf64_External_Rela);
c434dee6
AJ		 2314 }
2315
b34976b6 2316 return TRUE;
c434dee6
AJ		 2317}
2318
c25bc9fc
L		 2319/* Allocate space in .plt, .got and associated reloc sections for
2320 local dynamic relocs. */
2321
2322static bfd_boolean
2323elf64_x86_64_allocate_local_dynrelocs (void **slot, void *inf)
2324{
2325 struct elf_link_hash_entry *h
2326 = (struct elf_link_hash_entry *) *slot;
2327
2328 if (h->type != STT_GNU_IFUNC
2329 || !h->def_regular
2330 || !h->ref_regular
2331 || !h->forced_local
2332 || h->root.type != bfd_link_hash_defined)
2333 abort ();
2334
2335 return elf64_x86_64_allocate_dynrelocs (h, inf);
2336}
2337
c434dee6
AJ		 2338/* Find any dynamic relocs that apply to read-only sections. */
2339
b34976b6 2340static bfd_boolean
eb4ff4d6 2341elf64_x86_64_readonly_dynrelocs (struct elf_link_hash_entry *h, void * inf)
c434dee6
AJ		 2342{
2343 struct elf64_x86_64_link_hash_entry *eh;
2344 struct elf64_x86_64_dyn_relocs *p;
2345
e92d460e
AM		 2346 if (h->root.type == bfd_link_hash_warning)
2347 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2348
c434dee6
AJ		 2349 eh = (struct elf64_x86_64_link_hash_entry *) h;
2350 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2351 {
2352 asection *s = p->sec->output_section;
2353
2354 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2355 {
2356 struct bfd_link_info *info = (struct bfd_link_info *) inf;
2357
2358 info->flags |= DF_TEXTREL;
2359
2360 /* Not an error, just cut short the traversal. */
b34976b6 2361 return FALSE;
c434dee6
AJ		 2362 }
2363 }
b34976b6 2364 return TRUE;
c434dee6
AJ		 2365}
2366
70256ad8
AJ		 2367/* Set the sizes of the dynamic sections. */
2368
b34976b6 2369static bfd_boolean
27482721
AJ		 2370elf64_x86_64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
2371 struct bfd_link_info *info)
70256ad8 2372{
c434dee6 2373 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ		 2374 bfd *dynobj;
2375 asection *s;
b34976b6 2376 bfd_boolean relocs;
c434dee6 2377 bfd *ibfd;
70256ad8 2378
c434dee6
AJ		 2379 htab = elf64_x86_64_hash_table (info);
2380 dynobj = htab->elf.dynobj;
2381 if (dynobj == NULL)
2382 abort ();
70256ad8 2383
c434dee6 2384 if (htab->elf.dynamic_sections_created)
70256ad8
AJ		 2385 {
2386 /* Set the contents of the .interp section to the interpreter. */
36af4a4e 2387 if (info->executable)
70256ad8
AJ		 2388 {
2389 s = bfd_get_section_by_name (dynobj, ".interp");
c434dee6
AJ		 2390 if (s == NULL)
2391 abort ();
eea6121a 2392 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
70256ad8
AJ		 2393 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2394 }
2395 }
70256ad8 2396
c434dee6
AJ		 2397 /* Set up .got offsets for local syms, and space for local dynamic
2398 relocs. */
2399 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
70256ad8 2400 {
c434dee6
AJ		 2401 bfd_signed_vma *local_got;
2402 bfd_signed_vma *end_local_got;
bffbf940 2403 char *local_tls_type;
67a4f2b7 2404 bfd_vma *local_tlsdesc_gotent;
c434dee6
AJ		 2405 bfd_size_type locsymcount;
2406 Elf_Internal_Shdr *symtab_hdr;
2407 asection *srel;
70256ad8 2408
0ffa91dd 2409 if (! is_x86_64_elf (ibfd))
70256ad8
AJ		 2410 continue;
2411
c434dee6 2412 for (s = ibfd->sections; s != NULL; s = s->next)
70256ad8 2413 {
c434dee6
AJ		 2414 struct elf64_x86_64_dyn_relocs *p;
2415
e81d3500
DD		 2416 for (p = (struct elf64_x86_64_dyn_relocs *)
2417 (elf_section_data (s)->local_dynrel);
c434dee6
AJ		 2418 p != NULL;
2419 p = p->next)
70256ad8 2420 {
c434dee6
AJ		 2421 if (!bfd_is_abs_section (p->sec)
2422 && bfd_is_abs_section (p->sec->output_section))
2423 {
2424 /* Input section has been discarded, either because
2425 it is a copy of a linkonce section or due to
2426 linker script /DISCARD/, so we'll be discarding
2427 the relocs too. */
2428 }
2429 else if (p->count != 0)
2430 {
2431 srel = elf_section_data (p->sec)->sreloc;
eea6121a 2432 srel->size += p->count * sizeof (Elf64_External_Rela);
c434dee6
AJ		 2433 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2434 info->flags |= DF_TEXTREL;
c434dee6 2435 }
70256ad8
AJ		 2436 }
2437 }
c434dee6
AJ		 2438
2439 local_got = elf_local_got_refcounts (ibfd);
2440 if (!local_got)
2441 continue;
2442
0ffa91dd 2443 symtab_hdr = &elf_symtab_hdr (ibfd);
c434dee6
AJ		 2444 locsymcount = symtab_hdr->sh_info;
2445 end_local_got = local_got + locsymcount;
bffbf940 2446 local_tls_type = elf64_x86_64_local_got_tls_type (ibfd);
67a4f2b7 2447 local_tlsdesc_gotent = elf64_x86_64_local_tlsdesc_gotent (ibfd);
c434dee6
AJ		 2448 s = htab->sgot;
2449 srel = htab->srelgot;
67a4f2b7
AO		 2450 for (; local_got < end_local_got;
2451 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
70256ad8 2452 {
67a4f2b7 2453 *local_tlsdesc_gotent = (bfd_vma) -1;
c434dee6 2454 if (*local_got > 0)
70256ad8 2455 {
67a4f2b7
AO		 2456 if (GOT_TLS_GDESC_P (*local_tls_type))
2457 {
2458 *local_tlsdesc_gotent = htab->sgotplt->size
2459 - elf64_x86_64_compute_jump_table_size (htab);
2460 htab->sgotplt->size += 2 * GOT_ENTRY_SIZE;
2461 *local_got = (bfd_vma) -2;
2462 }
2463 if (! GOT_TLS_GDESC_P (*local_tls_type)
2464 || GOT_TLS_GD_P (*local_tls_type))
2465 {
2466 *local_got = s->size;
2467 s->size += GOT_ENTRY_SIZE;
2468 if (GOT_TLS_GD_P (*local_tls_type))
2469 s->size += GOT_ENTRY_SIZE;
2470 }
bffbf940 2471 if (info->shared
67a4f2b7 2472 || GOT_TLS_GD_ANY_P (*local_tls_type)
bffbf940 2473 || *local_tls_type == GOT_TLS_IE)
67a4f2b7
AO		 2474 {
2475 if (GOT_TLS_GDESC_P (*local_tls_type))
2476 {
2477 htab->srelplt->size += sizeof (Elf64_External_Rela);
2478 htab->tlsdesc_plt = (bfd_vma) -1;
2479 }
2480 if (! GOT_TLS_GDESC_P (*local_tls_type)
2481 || GOT_TLS_GD_P (*local_tls_type))
2482 srel->size += sizeof (Elf64_External_Rela);
2483 }
70256ad8
AJ		 2484 }
2485 else
c434dee6
AJ		 2486 *local_got = (bfd_vma) -1;
2487 }
2488 }
70256ad8 2489
bffbf940
JJ		 2490 if (htab->tls_ld_got.refcount > 0)
2491 {
2492 /* Allocate 2 got entries and 1 dynamic reloc for R_X86_64_TLSLD
2493 relocs. */
eea6121a
AM		 2494 htab->tls_ld_got.offset = htab->sgot->size;
2495 htab->sgot->size += 2 * GOT_ENTRY_SIZE;
2496 htab->srelgot->size += sizeof (Elf64_External_Rela);
bffbf940
JJ		 2497 }
2498 else
2499 htab->tls_ld_got.offset = -1;
2500
c434dee6
AJ		 2501 /* Allocate global sym .plt and .got entries, and space for global
2502 sym dynamic relocs. */
eb4ff4d6
L		 2503 elf_link_hash_traverse (&htab->elf, elf64_x86_64_allocate_dynrelocs,
2504 info);
c434dee6 2505
c25bc9fc
L		 2506 /* Allocate .plt and .got entries, and space for local symbols. */
2507 htab_traverse (htab->loc_hash_table,
2508 elf64_x86_64_allocate_local_dynrelocs,
2509 info);
2510
67a4f2b7
AO		 2511 /* For every jump slot reserved in the sgotplt, reloc_count is
2512 incremented. However, when we reserve space for TLS descriptors,
2513 it's not incremented, so in order to compute the space reserved
2514 for them, it suffices to multiply the reloc count by the jump
2515 slot size. */
2516 if (htab->srelplt)
2517 htab->sgotplt_jump_table_size
2518 = elf64_x86_64_compute_jump_table_size (htab);
2519
2520 if (htab->tlsdesc_plt)
2521 {
2522 /* If we're not using lazy TLS relocations, don't generate the
2523 PLT and GOT entries they require. */
2524 if ((info->flags & DF_BIND_NOW))
2525 htab->tlsdesc_plt = 0;
2526 else
2527 {
2528 htab->tlsdesc_got = htab->sgot->size;
2529 htab->sgot->size += GOT_ENTRY_SIZE;
2530 /* Reserve room for the initial entry.
2531 FIXME: we could probably do away with it in this case. */
2532 if (htab->splt->size == 0)
2533 htab->splt->size += PLT_ENTRY_SIZE;
2534 htab->tlsdesc_plt = htab->splt->size;
2535 htab->splt->size += PLT_ENTRY_SIZE;
2536 }
2537 }
2538
c434dee6
AJ		 2539 /* We now have determined the sizes of the various dynamic sections.
2540 Allocate memory for them. */
b34976b6 2541 relocs = FALSE;
c434dee6
AJ		 2542 for (s = dynobj->sections; s != NULL; s = s->next)
2543 {
2544 if ((s->flags & SEC_LINKER_CREATED) == 0)
2545 continue;
2546
2547 if (s == htab->splt
2548 || s == htab->sgot
75ff4589 2549 || s == htab->sgotplt
cbe950e9
L		 2550 || s == htab->iplt
2551 || s == htab->igotplt
75ff4589 2552 || s == htab->sdynbss)
c434dee6
AJ		 2553 {
2554 /* Strip this section if we don't need it; see the
2555 comment below. */
2556 }
0112cd26 2557 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
c434dee6 2558 {
eea6121a 2559 if (s->size != 0 && s != htab->srelplt)
b34976b6 2560 relocs = TRUE;
c434dee6
AJ		 2561
2562 /* We use the reloc_count field as a counter if we need
2563 to copy relocs into the output file. */
67a4f2b7
AO		 2564 if (s != htab->srelplt)
2565 s->reloc_count = 0;
70256ad8 2566 }
c434dee6 2567 else
70256ad8
AJ		 2568 {
2569 /* It's not one of our sections, so don't allocate space. */
2570 continue;
2571 }
2572
eea6121a 2573 if (s->size == 0)
70256ad8 2574 {
c434dee6
AJ		 2575 /* If we don't need this section, strip it from the
2576 output file. This is mostly to handle .rela.bss and
2577 .rela.plt. We must create both sections in
2578 create_dynamic_sections, because they must be created
2579 before the linker maps input sections to output
2580 sections. The linker does that before
2581 adjust_dynamic_symbol is called, and it is that
2582 function which decides whether anything needs to go
2583 into these sections. */
2584
8423293d 2585 s->flags |= SEC_EXCLUDE;
70256ad8
AJ		 2586 continue;
2587 }
2588
c456f082
AM		 2589 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2590 continue;
2591
70256ad8
AJ		 2592 /* Allocate memory for the section contents. We use bfd_zalloc
2593 here in case unused entries are not reclaimed before the
2594 section's contents are written out. This should not happen,
2595 but this way if it does, we get a R_X86_64_NONE reloc instead
2596 of garbage. */
eea6121a 2597 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
c434dee6 2598 if (s->contents == NULL)
b34976b6 2599 return FALSE;
70256ad8
AJ		 2600 }
2601
c434dee6 2602 if (htab->elf.dynamic_sections_created)
70256ad8
AJ		 2603 {
2604 /* Add some entries to the .dynamic section. We fill in the
2605 values later, in elf64_x86_64_finish_dynamic_sections, but we
2606 must add the entries now so that we get the correct size for
407443a3 2607 the .dynamic section. The DT_DEBUG entry is filled in by the
70256ad8 2608 dynamic linker and used by the debugger. */
dc810e39 2609#define add_dynamic_entry(TAG, VAL) \
5a580b3a 2610 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 2611
36af4a4e 2612 if (info->executable)
70256ad8 2613 {
dc810e39 2614 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 2615 return FALSE;
70256ad8
AJ		 2616 }
2617
eea6121a 2618 if (htab->splt->size != 0)
70256ad8 2619 {
dc810e39
AM		 2620 if (!add_dynamic_entry (DT_PLTGOT, 0)
2621 || !add_dynamic_entry (DT_PLTRELSZ, 0)
2622 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
2623 || !add_dynamic_entry (DT_JMPREL, 0))
b34976b6 2624 return FALSE;
67a4f2b7
AO		 2625
2626 if (htab->tlsdesc_plt
2627 && (!add_dynamic_entry (DT_TLSDESC_PLT, 0)
2628 || !add_dynamic_entry (DT_TLSDESC_GOT, 0)))
2629 return FALSE;
70256ad8
AJ		 2630 }
2631
2632 if (relocs)
2633 {
dc810e39
AM		 2634 if (!add_dynamic_entry (DT_RELA, 0)
2635 || !add_dynamic_entry (DT_RELASZ, 0)
2636 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf64_External_Rela)))
b34976b6 2637 return FALSE;
70256ad8 2638
c434dee6
AJ		 2639 /* If any dynamic relocs apply to a read-only section,
2640 then we need a DT_TEXTREL entry. */
2641 if ((info->flags & DF_TEXTREL) == 0)
eb4ff4d6
L		 2642 elf_link_hash_traverse (&htab->elf,
2643 elf64_x86_64_readonly_dynrelocs,
2644 info);
c434dee6
AJ		 2645
2646 if ((info->flags & DF_TEXTREL) != 0)
2647 {
2648 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 2649 return FALSE;
c434dee6 2650 }
70256ad8
AJ		 2651 }
2652 }
dc810e39 2653#undef add_dynamic_entry
70256ad8 2654
b34976b6 2655 return TRUE;
70256ad8
AJ		 2656}
2657
67a4f2b7
AO		 2658static bfd_boolean
2659elf64_x86_64_always_size_sections (bfd *output_bfd,
2660 struct bfd_link_info *info)
2661{
2662 asection *tls_sec = elf_hash_table (info)->tls_sec;
2663
2664 if (tls_sec)
2665 {
2666 struct elf_link_hash_entry *tlsbase;
2667
2668 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
2669 "_TLS_MODULE_BASE_",
2670 FALSE, FALSE, FALSE);
2671
2672 if (tlsbase && tlsbase->type == STT_TLS)
2673 {
2674 struct bfd_link_hash_entry *bh = NULL;
2675 const struct elf_backend_data *bed
2676 = get_elf_backend_data (output_bfd);
2677
2678 if (!(_bfd_generic_link_add_one_symbol
2679 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
2680 tls_sec, 0, NULL, FALSE,
2681 bed->collect, &bh)))
2682 return FALSE;
9f03412a
AO		 2683
2684 elf64_x86_64_hash_table (info)->tls_module_base = bh;
2685
67a4f2b7
AO		 2686 tlsbase = (struct elf_link_hash_entry *)bh;
2687 tlsbase->def_regular = 1;
2688 tlsbase->other = STV_HIDDEN;
2689 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
2690 }
2691 }
2692
2693 return TRUE;
2694}
2695
9f03412a
AO		 2696/* _TLS_MODULE_BASE_ needs to be treated especially when linking
2697 executables. Rather than setting it to the beginning of the TLS
2698 section, we have to set it to the end. This function may be called
2699 multiple times, it is idempotent. */
2700
2701static void
eb4ff4d6 2702elf64_x86_64_set_tls_module_base (struct bfd_link_info *info)
9f03412a
AO		 2703{
2704 struct bfd_link_hash_entry *base;
2705
2706 if (!info->executable)
2707 return;
2708
2709 base = elf64_x86_64_hash_table (info)->tls_module_base;
2710
2711 if (!base)
2712 return;
2713
2714 base->u.def.value = elf_hash_table (info)->tls_size;
2715}
2716
bffbf940
JJ		 2717/* Return the base VMA address which should be subtracted from real addresses
2718 when resolving @dtpoff relocation.
2719 This is PT_TLS segment p_vaddr. */
2720
2721static bfd_vma
eb4ff4d6 2722elf64_x86_64_dtpoff_base (struct bfd_link_info *info)
bffbf940 2723{
e1918d23
AM		 2724 /* If tls_sec is NULL, we should have signalled an error already. */
2725 if (elf_hash_table (info)->tls_sec == NULL)
bffbf940 2726 return 0;
e1918d23 2727 return elf_hash_table (info)->tls_sec->vma;
bffbf940
JJ		 2728}
2729
2730/* Return the relocation value for @tpoff relocation
2731 if STT_TLS virtual address is ADDRESS. */
2732
2733static bfd_vma
eb4ff4d6 2734elf64_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
bffbf940 2735{
e1918d23 2736 struct elf_link_hash_table *htab = elf_hash_table (info);
bffbf940
JJ		 2737
2738 /* If tls_segment is NULL, we should have signalled an error already. */
e1918d23 2739 if (htab->tls_sec == NULL)
bffbf940 2740 return 0;
e1918d23 2741 return address - htab->tls_size - htab->tls_sec->vma;
bffbf940
JJ		 2742}
2743
90f487df
L		 2744/* Is the instruction before OFFSET in CONTENTS a 32bit relative
2745 branch? */
2746
2747static bfd_boolean
2748is_32bit_relative_branch (bfd_byte *contents, bfd_vma offset)
2749{
2750 /* Opcode Instruction
2751 0xe8 call
2752 0xe9 jump
2753 0x0f 0x8x conditional jump */
2754 return ((offset > 0
2755 && (contents [offset - 1] == 0xe8
2756 || contents [offset - 1] == 0xe9))
2757 || (offset > 1
2758 && contents [offset - 2] == 0x0f
2759 && (contents [offset - 1] & 0xf0) == 0x80));
2760}
2761
8d88c4ca
NC		 2762/* Relocate an x86_64 ELF section. */
2763
b34976b6 2764static bfd_boolean
27482721
AJ		 2765elf64_x86_64_relocate_section (bfd *output_bfd, struct bfd_link_info *info,
2766 bfd *input_bfd, asection *input_section,
2767 bfd_byte *contents, Elf_Internal_Rela *relocs,
2768 Elf_Internal_Sym *local_syms,
2769 asection **local_sections)
8d88c4ca 2770{
c434dee6 2771 struct elf64_x86_64_link_hash_table *htab;
8d88c4ca
NC		 2772 Elf_Internal_Shdr *symtab_hdr;
2773 struct elf_link_hash_entry **sym_hashes;
2774 bfd_vma *local_got_offsets;
67a4f2b7 2775 bfd_vma *local_tlsdesc_gotents;
c434dee6 2776 Elf_Internal_Rela *rel;
8d88c4ca
NC		 2777 Elf_Internal_Rela *relend;
2778
0ffa91dd
NC		 2779 BFD_ASSERT (is_x86_64_elf (input_bfd));
2780
c434dee6 2781 htab = elf64_x86_64_hash_table (info);
0ffa91dd 2782 symtab_hdr = &elf_symtab_hdr (input_bfd);
8d88c4ca
NC		 2783 sym_hashes = elf_sym_hashes (input_bfd);
2784 local_got_offsets = elf_local_got_offsets (input_bfd);
67a4f2b7 2785 local_tlsdesc_gotents = elf64_x86_64_local_tlsdesc_gotent (input_bfd);
8d88c4ca 2786
eb4ff4d6 2787 elf64_x86_64_set_tls_module_base (info);
9f03412a 2788
c434dee6 2789 rel = relocs;
8d88c4ca 2790 relend = relocs + input_section->reloc_count;
c434dee6 2791 for (; rel < relend; rel++)
8d88c4ca 2792 {
bffbf940 2793 unsigned int r_type;
8d88c4ca
NC		 2794 reloc_howto_type *howto;
2795 unsigned long r_symndx;
2796 struct elf_link_hash_entry *h;
2797 Elf_Internal_Sym *sym;
2798 asection *sec;
67a4f2b7 2799 bfd_vma off, offplt;
8d88c4ca 2800 bfd_vma relocation;
b34976b6 2801 bfd_boolean unresolved_reloc;
8d88c4ca 2802 bfd_reloc_status_type r;
bffbf940 2803 int tls_type;
cbe950e9 2804 asection *base_got;
8d88c4ca 2805
c434dee6 2806 r_type = ELF64_R_TYPE (rel->r_info);
fe4770f4
AJ		 2807 if (r_type == (int) R_X86_64_GNU_VTINHERIT
2808 || r_type == (int) R_X86_64_GNU_VTENTRY)
2809 continue;
8d88c4ca 2810
bffbf940 2811 if (r_type >= R_X86_64_max)
8da6118f
KH		 2812 {
2813 bfd_set_error (bfd_error_bad_value);
b34976b6 2814 return FALSE;
8da6118f 2815 }
8d88c4ca 2816
b491616a 2817 howto = x86_64_elf_howto_table + r_type;
c434dee6 2818 r_symndx = ELF64_R_SYM (rel->r_info);
8d88c4ca
NC		 2819 h = NULL;
2820 sym = NULL;
2821 sec = NULL;
b34976b6 2822 unresolved_reloc = FALSE;
8d88c4ca 2823 if (r_symndx < symtab_hdr->sh_info)
8da6118f
KH		 2824 {
2825 sym = local_syms + r_symndx;
2826 sec = local_sections[r_symndx];
c434dee6 2827
c25bc9fc
L		 2828 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2829 &sec, rel);
2830
2831 /* Relocate against local STT_GNU_IFUNC symbol. */
2832 if (ELF64_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2833 {
2834 h = elf64_x86_64_get_local_sym_hash (htab, input_bfd,
2835 rel, FALSE);
2836 if (h == NULL)
2837 abort ();
2838
2839 /* Set STT_GNU_IFUNC symbol value. */
2840 h->root.u.def.value = sym->st_value;
2841 h->root.u.def.section = sec;
2842 }
8da6118f 2843 }
8d88c4ca 2844 else
8da6118f 2845 {
560e09e9 2846 bfd_boolean warned;
c434dee6 2847
b2a8e766
AM		 2848 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2849 r_symndx, symtab_hdr, sym_hashes,
2850 h, sec, relocation,
2851 unresolved_reloc, warned);
8da6118f 2852 }
ab96bf03
AM		 2853
2854 if (sec != NULL && elf_discarded_section (sec))
2855 {
2856 /* For relocs against symbols from removed linkonce sections,
2857 or sections discarded by a linker script, we just want the
2858 section contents zeroed. Avoid any special processing. */
2859 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
2860 rel->r_info = 0;
2861 rel->r_addend = 0;
2862 continue;
2863 }
2864
2865 if (info->relocatable)
2866 continue;
2867
cbe950e9
L		 2868 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2869 it here if it is defined in a non-shared object. */
2870 if (h != NULL
2871 && h->type == STT_GNU_IFUNC
2872 && h->def_regular)
2873 {
2874 asection *plt;
2875 bfd_vma plt_index;
2876
2877 if ((input_section->flags & SEC_ALLOC) == 0
2878 || h->plt.offset == (bfd_vma) -1)
2879 abort ();
2880
2881 /* STT_GNU_IFUNC symbol must go through PLT. */
2882 plt = htab->splt ? htab->splt : htab->iplt;
2883 relocation = (plt->output_section->vma
2884 + plt->output_offset + h->plt.offset);
2885
2886 switch (r_type)
2887 {
2888 default:
2889 (*_bfd_error_handler)
2890 (_("%B: relocation %s against STT_GNU_IFUNC "
2891 "symbol `%s' isn't handled by %s"), input_bfd,
2892 x86_64_elf_howto_table[r_type].name,
637fa7af
L		 2893 (h->root.root.string
2894 ? h->root.root.string : "a local symbol"),
2895 __FUNCTION__);
cbe950e9
L		 2896 bfd_set_error (bfd_error_bad_value);
2897 return FALSE;
2898
2899 case R_X86_64_32S:
710ab287 2900 if (info->shared)
cbe950e9 2901 abort ();
710ab287
L		 2902 goto do_relocation;
2903
2904 case R_X86_64_64:
2905 if (rel->r_addend != 0)
2906 {
2907 (*_bfd_error_handler)
2908 (_("%B: relocation %s against STT_GNU_IFUNC "
2909 "symbol `%s' has non-zero addend: %d"),
2910 input_bfd, x86_64_elf_howto_table[r_type].name,
637fa7af
L		 2911 (h->root.root.string
2912 ? h->root.root.string : "a local symbol"),
2913 rel->r_addend);
710ab287
L		 2914 bfd_set_error (bfd_error_bad_value);
2915 return FALSE;
2916 }
2917
2918 /* Generate dynamic relcoation only when there is a
2919 non-GOF reference in a shared object. */
2920 if (info->shared && h->non_got_ref)
2921 {
2922 Elf_Internal_Rela outrel;
2923 bfd_byte *loc;
2924 asection *sreloc;
2925
c25bc9fc
L		 2926 /* Need a dynamic relocation to get the real function
2927 address. */
710ab287
L		 2928 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2929 info,
2930 input_section,
2931 rel->r_offset);
2932 if (outrel.r_offset == (bfd_vma) -1
2933 || outrel.r_offset == (bfd_vma) -2)
2934 abort ();
2935
2936 outrel.r_offset += (input_section->output_section->vma
2937 + input_section->output_offset);
2938
2939 if (h->dynindx == -1
44c4ea11
L		 2940 || h->forced_local
2941 || info->executable)
710ab287
L		 2942 {
2943 /* This symbol is resolved locally. */
2944 outrel.r_info = ELF64_R_INFO (0, R_X86_64_IRELATIVE);
2945 outrel.r_addend = (h->root.u.def.value
2946 + h->root.u.def.section->output_section->vma
2947 + h->root.u.def.section->output_offset);
2948 }
2949 else
2950 {
2951 outrel.r_info = ELF64_R_INFO (h->dynindx, r_type);
2952 outrel.r_addend = 0;
2953 }
2954
2a81c24a 2955 sreloc = htab->irelifunc;
710ab287
L		 2956 loc = sreloc->contents;
2957 loc += (sreloc->reloc_count++
2958 * sizeof (Elf64_External_Rela));
2959 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
2960
2961 /* If this reloc is against an external symbol, we
2962 do not want to fiddle with the addend. Otherwise,
2963 we need to include the symbol value so that it
2964 becomes an addend for the dynamic reloc. For an
2965 internal symbol, we have updated addend. */
2966 continue;
2967 }
cbe950e9
L		 2968
2969 case R_X86_64_32:
cbe950e9
L		 2970 case R_X86_64_PC32:
2971 case R_X86_64_PC64:
2972 case R_X86_64_PLT32:
2973 goto do_relocation;
2974
2975 case R_X86_64_GOTPCREL:
2976 case R_X86_64_GOTPCREL64:
2977 base_got = htab->sgot;
2978 off = h->got.offset;
2979
7afd84dc 2980 if (base_got == NULL)
cbe950e9
L		 2981 abort ();
2982
7afd84dc 2983 if (off == (bfd_vma) -1)
cbe950e9 2984 {
7afd84dc
L		 2985 /* We can't use h->got.offset here to save state, or
2986 even just remember the offset, as finish_dynamic_symbol
2987 would use that as offset into .got. */
cbe950e9 2988
7afd84dc
L		 2989 if (htab->splt != NULL)
2990 {
2991 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
2992 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2993 base_got = htab->sgotplt;
2994 }
cbe950e9
L		 2995 else
2996 {
7afd84dc
L		 2997 plt_index = h->plt.offset / PLT_ENTRY_SIZE;
2998 off = plt_index * GOT_ENTRY_SIZE;
2999 base_got = htab->igotplt;
3000 }
3001
3002 if (h->dynindx == -1
3003 || h->forced_local
3004 || info->symbolic)
3005 {
3006 /* This references the local defitionion. We must
3007 initialize this entry in the global offset table.
3008 Since the offset must always be a multiple of 8,
3009 we use the least significant bit to record
3010 whether we have initialized it already.
3011
3012 When doing a dynamic link, we create a .rela.got
3013 relocation entry to initialize the value. This
3014 is done in the finish_dynamic_symbol routine. */
3015 if ((off & 1) != 0)
3016 off &= ~1;
3017 else
3018 {
3019 bfd_put_64 (output_bfd, relocation,
3020 base_got->contents + off);
3021 /* Note that this is harmless for the GOTPLT64
3022 case, as -1 | 1 still is -1. */
3023 h->got.offset |= 1;
3024 }
cbe950e9
L		 3025 }
3026 }
3027
3028 relocation = (base_got->output_section->vma
3029 + base_got->output_offset + off);
3030
3031 if (r_type != R_X86_64_GOTPCREL
3032 && r_type != R_X86_64_GOTPCREL64)
3033 {
3034 asection *gotplt;
3035 if (htab->splt != NULL)
3036 gotplt = htab->sgotplt;
3037 else
3038 gotplt = htab->igotplt;
3039 relocation -= (gotplt->output_section->vma
3040 - gotplt->output_offset);
3041 }
3042
3043 goto do_relocation;
3044 }
3045 }
3046
70256ad8
AJ		 3047 /* When generating a shared object, the relocations handled here are
3048 copied into the output file to be resolved at run time. */
3049 switch (r_type)
3050 {
3051 case R_X86_64_GOT32:
7b81dfbb 3052 case R_X86_64_GOT64:
70256ad8
AJ		 3053 /* Relocation is to the entry for this symbol in the global
3054 offset table. */
70256ad8 3055 case R_X86_64_GOTPCREL:
7b81dfbb
AJ		 3056 case R_X86_64_GOTPCREL64:
3057 /* Use global offset table entry as symbol value. */
3058 case R_X86_64_GOTPLT64:
3059 /* This is the same as GOT64 for relocation purposes, but
3060 indicates the existence of a PLT entry. The difficulty is,
3061 that we must calculate the GOT slot offset from the PLT
3062 offset, if this symbol got a PLT entry (it was global).
3063 Additionally if it's computed from the PLT entry, then that
3064 GOT offset is relative to .got.plt, not to .got. */
3065 base_got = htab->sgot;
3066
c434dee6
AJ		 3067 if (htab->sgot == NULL)
3068 abort ();
053579d7 3069
51e0a107 3070 if (h != NULL)
70256ad8 3071 {
b34976b6 3072 bfd_boolean dyn;
c434dee6
AJ		 3073
3074 off = h->got.offset;
7b81dfbb
AJ		 3075 if (h->needs_plt
3076 && h->plt.offset != (bfd_vma)-1
3077 && off == (bfd_vma)-1)
3078 {
3079 /* We can't use h->got.offset here to save
3080 state, or even just remember the offset, as
3081 finish_dynamic_symbol would use that as offset into
3082 .got. */
3083 bfd_vma plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
3084 off = (plt_index + 3) * GOT_ENTRY_SIZE;
3085 base_got = htab->sgotplt;
3086 }
3087
c434dee6 3088 dyn = htab->elf.dynamic_sections_created;
51e0a107 3089
27482721 3090 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
51e0a107 3091 || (info->shared
27482721 3092 && SYMBOL_REFERENCES_LOCAL (info, h))
4bc6e03a
AJ		 3093 || (ELF_ST_VISIBILITY (h->other)
3094 && h->root.type == bfd_link_hash_undefweak))
51e0a107
JH		 3095 {
3096 /* This is actually a static link, or it is a -Bsymbolic
3097 link and the symbol is defined locally, or the symbol
407443a3 3098 was forced to be local because of a version file. We
51e0a107
JH		 3099 must initialize this entry in the global offset table.
3100 Since the offset must always be a multiple of 8, we
3101 use the least significant bit to record whether we
3102 have initialized it already.
3103
3104 When doing a dynamic link, we create a .rela.got
407443a3
AJ		 3105 relocation entry to initialize the value. This is
3106 done in the finish_dynamic_symbol routine. */
51e0a107
JH		 3107 if ((off & 1) != 0)
3108 off &= ~1;
3109 else
3110 {
3111 bfd_put_64 (output_bfd, relocation,
7b81dfbb
AJ		 3112 base_got->contents + off);
3113 /* Note that this is harmless for the GOTPLT64 case,
3114 as -1 | 1 still is -1. */
51e0a107
JH		 3115 h->got.offset |= 1;
3116 }
3117 }
053579d7 3118 else
b34976b6 3119 unresolved_reloc = FALSE;
70256ad8 3120 }
51e0a107
JH		 3121 else
3122 {
c434dee6
AJ		 3123 if (local_got_offsets == NULL)
3124 abort ();
51e0a107
JH		 3125
3126 off = local_got_offsets[r_symndx];
3127
3128 /* The offset must always be a multiple of 8. We use
407443a3
AJ		 3129 the least significant bit to record whether we have
3130 already generated the necessary reloc. */
51e0a107
JH		 3131 if ((off & 1) != 0)
3132 off &= ~1;
3133 else
3134 {
c434dee6 3135 bfd_put_64 (output_bfd, relocation,
7b81dfbb 3136 base_got->contents + off);
51e0a107
JH		 3137
3138 if (info->shared)
3139 {
947216bf 3140 asection *s;
51e0a107 3141 Elf_Internal_Rela outrel;
947216bf 3142 bfd_byte *loc;
70256ad8 3143
51e0a107
JH		 3144 /* We need to generate a R_X86_64_RELATIVE reloc
3145 for the dynamic linker. */
947216bf
AM		 3146 s = htab->srelgot;
3147 if (s == NULL)
c434dee6 3148 abort ();
51e0a107 3149
7b81dfbb
AJ		 3150 outrel.r_offset = (base_got->output_section->vma
3151 + base_got->output_offset
51e0a107
JH		 3152 + off);
3153 outrel.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
3154 outrel.r_addend = relocation;
947216bf
AM		 3155 loc = s->contents;
3156 loc += s->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 3157 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
51e0a107
JH		 3158 }
3159
3160 local_got_offsets[r_symndx] |= 1;
3161 }
51e0a107 3162 }
6a2bda3f 3163
c434dee6
AJ		 3164 if (off >= (bfd_vma) -2)
3165 abort ();
3166
7b81dfbb
AJ		 3167 relocation = base_got->output_section->vma
3168 + base_got->output_offset + off;
3169 if (r_type != R_X86_64_GOTPCREL && r_type != R_X86_64_GOTPCREL64)
8c37241b
JJ		 3170 relocation -= htab->sgotplt->output_section->vma
3171 - htab->sgotplt->output_offset;
c434dee6 3172
70256ad8
AJ		 3173 break;
3174
d6ab8113
JB		 3175 case R_X86_64_GOTOFF64:
3176 /* Relocation is relative to the start of the global offset
3177 table. */
3178
3179 /* Check to make sure it isn't a protected function symbol
3180 for shared library since it may not be local when used
3181 as function address. */
3182 if (info->shared
3183 && h
3184 && h->def_regular
3185 && h->type == STT_FUNC
3186 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
3187 {
3188 (*_bfd_error_handler)
3189 (_("%B: relocation R_X86_64_GOTOFF64 against protected function `%s' can not be used when making a shared object"),
3190 input_bfd, h->root.root.string);
3191 bfd_set_error (bfd_error_bad_value);
3192 return FALSE;
3193 }
3194
3195 /* Note that sgot is not involved in this
3196 calculation. We always want the start of .got.plt. If we
3197 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
3198 permitted by the ABI, we might have to change this
3199 calculation. */
3200 relocation -= htab->sgotplt->output_section->vma
3201 + htab->sgotplt->output_offset;
3202 break;
3203
3204 case R_X86_64_GOTPC32:
7b81dfbb 3205 case R_X86_64_GOTPC64:
d6ab8113
JB		 3206 /* Use global offset table as symbol value. */
3207 relocation = htab->sgotplt->output_section->vma
3208 + htab->sgotplt->output_offset;
3209 unresolved_reloc = FALSE;
3210 break;
7b81dfbb
AJ		 3211
3212 case R_X86_64_PLTOFF64:
3213 /* Relocation is PLT entry relative to GOT. For local
3214 symbols it's the symbol itself relative to GOT. */
3215 if (h != NULL
3216 /* See PLT32 handling. */
3217 && h->plt.offset != (bfd_vma) -1
3218 && htab->splt != NULL)
3219 {
3220 relocation = (htab->splt->output_section->vma
3221 + htab->splt->output_offset
3222 + h->plt.offset);
3223 unresolved_reloc = FALSE;
3224 }
3225
3226 relocation -= htab->sgotplt->output_section->vma
3227 + htab->sgotplt->output_offset;
3228 break;
d6ab8113 3229
70256ad8
AJ		 3230 case R_X86_64_PLT32:
3231 /* Relocation is to the entry for this symbol in the
3232 procedure linkage table. */
3233
3234 /* Resolve a PLT32 reloc against a local symbol directly,
407443a3 3235 without using the procedure linkage table. */
70256ad8
AJ		 3236 if (h == NULL)
3237 break;
3238
c434dee6
AJ		 3239 if (h->plt.offset == (bfd_vma) -1
3240 || htab->splt == NULL)
70256ad8
AJ		 3241 {
3242 /* We didn't make a PLT entry for this symbol. This
407443a3
AJ		 3243 happens when statically linking PIC code, or when
3244 using -Bsymbolic. */
70256ad8
AJ		 3245 break;
3246 }
3247
c434dee6
AJ		 3248 relocation = (htab->splt->output_section->vma
3249 + htab->splt->output_offset
70256ad8 3250 + h->plt.offset);
b34976b6 3251 unresolved_reloc = FALSE;
70256ad8
AJ		 3252 break;
3253
fd8ab9e5
AJ		 3254 case R_X86_64_PC8:
3255 case R_X86_64_PC16:
3256 case R_X86_64_PC32:
6610a52d 3257 if (info->shared
ba3bee0b 3258 && (input_section->flags & SEC_ALLOC) != 0
90f487df 3259 && (input_section->flags & SEC_READONLY) != 0
41bed6dd 3260 && h != NULL)
6610a52d 3261 {
41bed6dd
L		 3262 bfd_boolean fail = FALSE;
3263 bfd_boolean branch
3264 = (r_type == R_X86_64_PC32
3265 && is_32bit_relative_branch (contents, rel->r_offset));
3266
3267 if (SYMBOL_REFERENCES_LOCAL (info, h))
3268 {
3269 /* Symbol is referenced locally. Make sure it is
3270 defined locally or for a branch. */
3271 fail = !h->def_regular && !branch;
3272 }
90f487df 3273 else
41bed6dd
L		 3274 {
3275 /* Symbol isn't referenced locally. We only allow
3276 branch to symbol with non-default visibility. */
3277 fail = (!branch
3278 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT);
3279 }
3280
3281 if (fail)
3282 {
3283 const char *fmt;
3284 const char *v;
3285 const char *pic = "";
3286
3287 switch (ELF_ST_VISIBILITY (h->other))
3288 {
3289 case STV_HIDDEN:
3290 v = _("hidden symbol");
3291 break;
3292 case STV_INTERNAL:
3293 v = _("internal symbol");
3294 break;
3295 case STV_PROTECTED:
3296 v = _("protected symbol");
3297 break;
3298 default:
3299 v = _("symbol");
3300 pic = _("; recompile with -fPIC");
3301 break;
3302 }
3303
3304 if (h->def_regular)
3305 fmt = _("%B: relocation %s against %s `%s' can not be used when making a shared object%s");
3306 else
3307 fmt = _("%B: relocation %s against undefined %s `%s' can not be used when making a shared object%s");
3308
3309 (*_bfd_error_handler) (fmt, input_bfd,
3310 x86_64_elf_howto_table[r_type].name,
3311 v, h->root.root.string, pic);
3312 bfd_set_error (bfd_error_bad_value);
3313 return FALSE;
3314 }
6610a52d
L		 3315 }
3316 /* Fall through. */
3317
70256ad8
AJ		 3318 case R_X86_64_8:
3319 case R_X86_64_16:
3320 case R_X86_64_32:
d6ab8113 3321 case R_X86_64_PC64:
6b3db546 3322 case R_X86_64_64:
80643fbc 3323 /* FIXME: The ABI says the linker should make sure the value is
407443a3 3324 the same when it's zeroextended to 64 bit. */
c434dee6 3325
b1e24c02 3326 if ((input_section->flags & SEC_ALLOC) == 0)
c434dee6
AJ		 3327 break;
3328
3329 if ((info->shared
4bc6e03a
AJ		 3330 && (h == NULL
3331 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3332 || h->root.type != bfd_link_hash_undefweak)
d8045f23
NC		 3333 && (! IS_X86_64_PCREL_TYPE (r_type)
3334 || ! SYMBOL_CALLS_LOCAL (info, h)))
d40d037c
AJ		 3335 || (ELIMINATE_COPY_RELOCS
3336 && !info->shared
c434dee6
AJ		 3337 && h != NULL
3338 && h->dynindx != -1
f5385ebf
AM		 3339 && !h->non_got_ref
3340 && ((h->def_dynamic
3341 && !h->def_regular)
c434dee6 3342 || h->root.type == bfd_link_hash_undefweak
0f88be7a 3343 || h->root.type == bfd_link_hash_undefined)))
70256ad8
AJ		 3344 {
3345 Elf_Internal_Rela outrel;
947216bf 3346 bfd_byte *loc;
b34976b6 3347 bfd_boolean skip, relocate;
c434dee6 3348 asection *sreloc;
70256ad8
AJ		 3349
3350 /* When generating a shared object, these relocations
3351 are copied into the output file to be resolved at run
407443a3 3352 time. */
b34976b6
AM		 3353 skip = FALSE;
3354 relocate = FALSE;
70256ad8 3355
c629eae0
JJ		 3356 outrel.r_offset =
3357 _bfd_elf_section_offset (output_bfd, info, input_section,
c434dee6 3358 rel->r_offset);
c629eae0 3359 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 3360 skip = TRUE;
0fb19cbc 3361 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 3362 skip = TRUE, relocate = TRUE;
70256ad8
AJ		 3363
3364 outrel.r_offset += (input_section->output_section->vma
3365 + input_section->output_offset);
3366
3367 if (skip)
0bb2d96a 3368 memset (&outrel, 0, sizeof outrel);
c434dee6 3369
fd8ab9e5
AJ		 3370 /* h->dynindx may be -1 if this symbol was marked to
3371 become local. */
3372 else if (h != NULL
c434dee6 3373 && h->dynindx != -1
d8045f23
NC		 3374 && (IS_X86_64_PCREL_TYPE (r_type)
3375 || ! info->shared
3376 || ! SYMBOLIC_BIND (info, h)
3377 || ! h->def_regular))
70256ad8 3378 {
70256ad8 3379 outrel.r_info = ELF64_R_INFO (h->dynindx, r_type);
c434dee6 3380 outrel.r_addend = rel->r_addend;
70256ad8
AJ		 3381 }
3382 else
3383 {
c434dee6 3384 /* This symbol is local, or marked to become local. */
607c0e09
AS		 3385 if (r_type == R_X86_64_64)
3386 {
b34976b6 3387 relocate = TRUE;
607c0e09
AS		 3388 outrel.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
3389 outrel.r_addend = relocation + rel->r_addend;
3390 }
3391 else
3392 {
3393 long sindx;
3394
8517fae7 3395 if (bfd_is_abs_section (sec))
607c0e09
AS		 3396 sindx = 0;
3397 else if (sec == NULL || sec->owner == NULL)
3398 {
3399 bfd_set_error (bfd_error_bad_value);
b34976b6 3400 return FALSE;
607c0e09
AS		 3401 }
3402 else
3403 {
3404 asection *osec;
3405
74541ad4
AM		 3406 /* We are turning this relocation into one
3407 against a section symbol. It would be
3408 proper to subtract the symbol's value,
3409 osec->vma, from the emitted reloc addend,
3410 but ld.so expects buggy relocs. */
607c0e09
AS		 3411 osec = sec->output_section;
3412 sindx = elf_section_data (osec)->dynindx;
74541ad4
AM		 3413 if (sindx == 0)
3414 {
3415 asection *oi = htab->elf.text_index_section;
3416 sindx = elf_section_data (oi)->dynindx;
3417 }
3418 BFD_ASSERT (sindx != 0);
607c0e09
AS		 3419 }
3420
3421 outrel.r_info = ELF64_R_INFO (sindx, r_type);
3422 outrel.r_addend = relocation + rel->r_addend;
3423 }
70256ad8
AJ		 3424 }
3425
cbe950e9 3426 sreloc = elf_section_data (input_section)->sreloc;
d8045f23 3427
e7c33416 3428 BFD_ASSERT (sreloc != NULL && sreloc->contents != NULL);
c434dee6 3429
947216bf
AM		 3430 loc = sreloc->contents;
3431 loc += sreloc->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 3432 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
70256ad8
AJ		 3433
3434 /* If this reloc is against an external symbol, we do
3435 not want to fiddle with the addend. Otherwise, we
3436 need to include the symbol value so that it becomes
3437 an addend for the dynamic reloc. */
0f88be7a 3438 if (! relocate)
70256ad8
AJ		 3439 continue;
3440 }
3441
3442 break;
3443
bffbf940 3444 case R_X86_64_TLSGD:
67a4f2b7
AO		 3445 case R_X86_64_GOTPC32_TLSDESC:
3446 case R_X86_64_TLSDESC_CALL:
bffbf940 3447 case R_X86_64_GOTTPOFF:
bffbf940
JJ		 3448 tls_type = GOT_UNKNOWN;
3449 if (h == NULL && local_got_offsets)
3450 tls_type = elf64_x86_64_local_got_tls_type (input_bfd) [r_symndx];
3451 else if (h != NULL)
142411ca
L		 3452 tls_type = elf64_x86_64_hash_entry (h)->tls_type;
3453
3454 if (! elf64_x86_64_tls_transition (info, input_bfd,
3455 input_section, contents,
3456 symtab_hdr, sym_hashes,
3457 &r_type, tls_type, rel,
3458 relend, h))
534a31f6 3459 return FALSE;
bffbf940
JJ		 3460
3461 if (r_type == R_X86_64_TPOFF32)
3462 {
142411ca
L		 3463 bfd_vma roff = rel->r_offset;
3464
bffbf940 3465 BFD_ASSERT (! unresolved_reloc);
142411ca 3466
bffbf940
JJ		 3467 if (ELF64_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
3468 {
bffbf940 3469 /* GD->LE transition.
abcf1d52 3470 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
a3fadc9a 3471 .word 0x6666; rex64; call __tls_get_addr
bffbf940
JJ		 3472 Change it into:
3473 movq %fs:0, %rax
3474 leaq foo@tpoff(%rax), %rax */
142411ca 3475 memcpy (contents + roff - 4,
bffbf940
JJ		 3476 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3477 16);
eb4ff4d6
L		 3478 bfd_put_32 (output_bfd,
3479 elf64_x86_64_tpoff (info, relocation),
142411ca 3480 contents + roff + 8);
a3fadc9a 3481 /* Skip R_X86_64_PC32/R_X86_64_PLT32. */
bffbf940
JJ		 3482 rel++;
3483 continue;
3484 }
67a4f2b7
AO		 3485 else if (ELF64_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
3486 {
3487 /* GDesc -> LE transition.
3488 It's originally something like:
3489 leaq x@tlsdesc(%rip), %rax
3490
3491 Change it to:
3492 movl $x@tpoff, %rax
142411ca 3493 */
67a4f2b7
AO		 3494
3495 unsigned int val, type, type2;
67a4f2b7 3496
67a4f2b7 3497 type = bfd_get_8 (input_bfd, contents + roff - 3);
67a4f2b7 3498 type2 = bfd_get_8 (input_bfd, contents + roff - 2);
67a4f2b7 3499 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO		 3500 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3501 contents + roff - 3);
3502 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3503 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3504 contents + roff - 1);
eb4ff4d6
L		 3505 bfd_put_32 (output_bfd,
3506 elf64_x86_64_tpoff (info, relocation),
67a4f2b7
AO		 3507 contents + roff);
3508 continue;
3509 }
3510 else if (ELF64_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
3511 {
3512 /* GDesc -> LE transition.
3513 It's originally:
3514 call *(%rax)
3515 Turn it into:
142411ca 3516 xchg %ax,%ax. */
10efb593 3517 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 3518 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3519 continue;
3520 }
142411ca 3521 else if (ELF64_R_TYPE (rel->r_info) == R_X86_64_GOTTPOFF)
bffbf940 3522 {
bffbf940
JJ		 3523 /* IE->LE transition:
3524 Originally it can be one of:
3525 movq foo@gottpoff(%rip), %reg
3526 addq foo@gottpoff(%rip), %reg
3527 We change it into:
3528 movq $foo, %reg
3529 leaq foo(%reg), %reg
3530 addq $foo, %reg. */
142411ca
L		 3531
3532 unsigned int val, type, reg;
3533
3534 val = bfd_get_8 (input_bfd, contents + roff - 3);
3535 type = bfd_get_8 (input_bfd, contents + roff - 2);
3536 reg = bfd_get_8 (input_bfd, contents + roff - 1);
bffbf940 3537 reg >>= 3;
bffbf940
JJ		 3538 if (type == 0x8b)
3539 {
3540 /* movq */
3541 if (val == 0x4c)
3542 bfd_put_8 (output_bfd, 0x49,
142411ca 3543 contents + roff - 3);
bffbf940 3544 bfd_put_8 (output_bfd, 0xc7,
142411ca 3545 contents + roff - 2);
bffbf940 3546 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3547 contents + roff - 1);
bffbf940
JJ		 3548 }
3549 else if (reg == 4)
3550 {
3551 /* addq -> addq - addressing with %rsp/%r12 is
3552 special */
3553 if (val == 0x4c)
3554 bfd_put_8 (output_bfd, 0x49,
142411ca 3555 contents + roff - 3);
bffbf940 3556 bfd_put_8 (output_bfd, 0x81,
142411ca 3557 contents + roff - 2);
bffbf940 3558 bfd_put_8 (output_bfd, 0xc0 | reg,
142411ca 3559 contents + roff - 1);
bffbf940
JJ		 3560 }
3561 else
3562 {
3563 /* addq -> leaq */
3564 if (val == 0x4c)
3565 bfd_put_8 (output_bfd, 0x4d,
142411ca 3566 contents + roff - 3);
bffbf940 3567 bfd_put_8 (output_bfd, 0x8d,
142411ca 3568 contents + roff - 2);
bffbf940 3569 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
142411ca 3570 contents + roff - 1);
bffbf940 3571 }
eb4ff4d6
L		 3572 bfd_put_32 (output_bfd,
3573 elf64_x86_64_tpoff (info, relocation),
142411ca 3574 contents + roff);
bffbf940
JJ		 3575 continue;
3576 }
142411ca
L		 3577 else
3578 BFD_ASSERT (FALSE);
bffbf940
JJ		 3579 }
3580
3581 if (htab->sgot == NULL)
3582 abort ();
3583
3584 if (h != NULL)
67a4f2b7
AO		 3585 {
3586 off = h->got.offset;
3587 offplt = elf64_x86_64_hash_entry (h)->tlsdesc_got;
3588 }
bffbf940
JJ		 3589 else
3590 {
3591 if (local_got_offsets == NULL)
3592 abort ();
3593
3594 off = local_got_offsets[r_symndx];
67a4f2b7 3595 offplt = local_tlsdesc_gotents[r_symndx];
bffbf940
JJ		 3596 }
3597
3598 if ((off & 1) != 0)
3599 off &= ~1;
26e41594 3600 else
bffbf940
JJ		 3601 {
3602 Elf_Internal_Rela outrel;
947216bf 3603 bfd_byte *loc;
bffbf940 3604 int dr_type, indx;
67a4f2b7 3605 asection *sreloc;
bffbf940
JJ		 3606
3607 if (htab->srelgot == NULL)
3608 abort ();
3609
67a4f2b7
AO		 3610 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3611
3612 if (GOT_TLS_GDESC_P (tls_type))
3613 {
3614 outrel.r_info = ELF64_R_INFO (indx, R_X86_64_TLSDESC);
3615 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
3616 + 2 * GOT_ENTRY_SIZE <= htab->sgotplt->size);
3617 outrel.r_offset = (htab->sgotplt->output_section->vma
3618 + htab->sgotplt->output_offset
3619 + offplt
3620 + htab->sgotplt_jump_table_size);
3621 sreloc = htab->srelplt;
3622 loc = sreloc->contents;
3623 loc += sreloc->reloc_count++
3624 * sizeof (Elf64_External_Rela);
3625 BFD_ASSERT (loc + sizeof (Elf64_External_Rela)
3626 <= sreloc->contents + sreloc->size);
3627 if (indx == 0)
eb4ff4d6 3628 outrel.r_addend = relocation - elf64_x86_64_dtpoff_base (info);
67a4f2b7
AO		 3629 else
3630 outrel.r_addend = 0;
3631 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
3632 }
3633
3634 sreloc = htab->srelgot;
3635
bffbf940
JJ		 3636 outrel.r_offset = (htab->sgot->output_section->vma
3637 + htab->sgot->output_offset + off);
3638
67a4f2b7 3639 if (GOT_TLS_GD_P (tls_type))
bffbf940 3640 dr_type = R_X86_64_DTPMOD64;
67a4f2b7
AO		 3641 else if (GOT_TLS_GDESC_P (tls_type))
3642 goto dr_done;
bffbf940
JJ		 3643 else
3644 dr_type = R_X86_64_TPOFF64;
3645
3646 bfd_put_64 (output_bfd, 0, htab->sgot->contents + off);
3647 outrel.r_addend = 0;
67a4f2b7
AO		 3648 if ((dr_type == R_X86_64_TPOFF64
3649 || dr_type == R_X86_64_TLSDESC) && indx == 0)
eb4ff4d6 3650 outrel.r_addend = relocation - elf64_x86_64_dtpoff_base (info);
bffbf940
JJ		 3651 outrel.r_info = ELF64_R_INFO (indx, dr_type);
3652
67a4f2b7
AO		 3653 loc = sreloc->contents;
3654 loc += sreloc->reloc_count++ * sizeof (Elf64_External_Rela);
3655 BFD_ASSERT (loc + sizeof (Elf64_External_Rela)
3656 <= sreloc->contents + sreloc->size);
bffbf940
JJ		 3657 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
3658
67a4f2b7 3659 if (GOT_TLS_GD_P (tls_type))
bffbf940
JJ		 3660 {
3661 if (indx == 0)
3662 {
d40d037c 3663 BFD_ASSERT (! unresolved_reloc);
bffbf940 3664 bfd_put_64 (output_bfd,
eb4ff4d6 3665 relocation - elf64_x86_64_dtpoff_base (info),
bffbf940
JJ		 3666 htab->sgot->contents + off + GOT_ENTRY_SIZE);
3667 }
3668 else
3669 {
3670 bfd_put_64 (output_bfd, 0,
3671 htab->sgot->contents + off + GOT_ENTRY_SIZE);
3672 outrel.r_info = ELF64_R_INFO (indx,
3673 R_X86_64_DTPOFF64);
3674 outrel.r_offset += GOT_ENTRY_SIZE;
67a4f2b7 3675 sreloc->reloc_count++;
947216bf 3676 loc += sizeof (Elf64_External_Rela);
67a4f2b7
AO		 3677 BFD_ASSERT (loc + sizeof (Elf64_External_Rela)
3678 <= sreloc->contents + sreloc->size);
947216bf 3679 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
bffbf940
JJ		 3680 }
3681 }
3682
67a4f2b7 3683 dr_done:
bffbf940
JJ		 3684 if (h != NULL)
3685 h->got.offset |= 1;
3686 else
3687 local_got_offsets[r_symndx] |= 1;
3688 }
3689
67a4f2b7
AO		 3690 if (off >= (bfd_vma) -2
3691 && ! GOT_TLS_GDESC_P (tls_type))
bffbf940
JJ		 3692 abort ();
3693 if (r_type == ELF64_R_TYPE (rel->r_info))
3694 {
67a4f2b7
AO		 3695 if (r_type == R_X86_64_GOTPC32_TLSDESC
3696 || r_type == R_X86_64_TLSDESC_CALL)
3697 relocation = htab->sgotplt->output_section->vma
3698 + htab->sgotplt->output_offset
3699 + offplt + htab->sgotplt_jump_table_size;
3700 else
3701 relocation = htab->sgot->output_section->vma
3702 + htab->sgot->output_offset + off;
b34976b6 3703 unresolved_reloc = FALSE;
bffbf940 3704 }
142411ca 3705 else
67a4f2b7 3706 {
142411ca 3707 bfd_vma roff = rel->r_offset;
67a4f2b7 3708
142411ca
L		 3709 if (ELF64_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
3710 {
3711 /* GD->IE transition.
3712 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3713 .word 0x6666; rex64; call __tls_get_addr@plt
3714 Change it into:
3715 movq %fs:0, %rax
3716 addq foo@gottpoff(%rip), %rax */
3717 memcpy (contents + roff - 4,
3718 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3719 16);
3720
3721 relocation = (htab->sgot->output_section->vma
3722 + htab->sgot->output_offset + off
3723 - roff
3724 - input_section->output_section->vma
3725 - input_section->output_offset
3726 - 12);
3727 bfd_put_32 (output_bfd, relocation,
3728 contents + roff + 8);
3729 /* Skip R_X86_64_PLT32. */
3730 rel++;
3731 continue;
3732 }
3733 else if (ELF64_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
3734 {
3735 /* GDesc -> IE transition.
3736 It's originally something like:
3737 leaq x@tlsdesc(%rip), %rax
67a4f2b7 3738
142411ca
L		 3739 Change it to:
3740 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax
3741 */
67a4f2b7 3742
142411ca 3743 unsigned int val, type, type2;
67a4f2b7 3744
142411ca
L		 3745 type = bfd_get_8 (input_bfd, contents + roff - 3);
3746 type2 = bfd_get_8 (input_bfd, contents + roff - 2);
3747 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7 3748
142411ca
L		 3749 /* Now modify the instruction as appropriate. To
3750 turn a leaq into a movq in the form we use it, it
3751 suffices to change the second byte from 0x8d to
3752 0x8b. */
3753 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3754
3755 bfd_put_32 (output_bfd,
3756 htab->sgot->output_section->vma
3757 + htab->sgot->output_offset + off
3758 - rel->r_offset
3759 - input_section->output_section->vma
3760 - input_section->output_offset
3761 - 4,
3762 contents + roff);
3763 continue;
3764 }
3765 else if (ELF64_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
3766 {
3767 /* GDesc -> IE transition.
3768 It's originally:
3769 call *(%rax)
3770
3771 Change it to:
3772 xchg %ax,%ax. */
3773
3774 unsigned int val, type;
3775
3776 type = bfd_get_8 (input_bfd, contents + roff);
3777 val = bfd_get_8 (input_bfd, contents + roff + 1);
3778 bfd_put_8 (output_bfd, 0x66, contents + roff);
3779 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3780 continue;
3781 }
3782 else
3783 BFD_ASSERT (FALSE);
67a4f2b7 3784 }
bffbf940
JJ		 3785 break;
3786
3787 case R_X86_64_TLSLD:
142411ca
L		 3788 if (! elf64_x86_64_tls_transition (info, input_bfd,
3789 input_section, contents,
3790 symtab_hdr, sym_hashes,
3791 &r_type, GOT_UNKNOWN,
3792 rel, relend, h))
3793 return FALSE;
a3fadc9a 3794
142411ca
L		 3795 if (r_type != R_X86_64_TLSLD)
3796 {
bffbf940 3797 /* LD->LE transition:
a3fadc9a 3798 leaq foo@tlsld(%rip), %rdi; call __tls_get_addr.
bffbf940
JJ		 3799 We change it into:
3800 .word 0x6666; .byte 0x66; movl %fs:0, %rax. */
142411ca
L		 3801
3802 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
bffbf940
JJ		 3803 memcpy (contents + rel->r_offset - 3,
3804 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
a3fadc9a 3805 /* Skip R_X86_64_PC32/R_X86_64_PLT32. */
bffbf940
JJ		 3806 rel++;
3807 continue;
3808 }
3809
3810 if (htab->sgot == NULL)
3811 abort ();
3812
3813 off = htab->tls_ld_got.offset;
3814 if (off & 1)
3815 off &= ~1;
3816 else
3817 {
3818 Elf_Internal_Rela outrel;
947216bf 3819 bfd_byte *loc;
bffbf940
JJ		 3820
3821 if (htab->srelgot == NULL)
3822 abort ();
3823
3824 outrel.r_offset = (htab->sgot->output_section->vma
3825 + htab->sgot->output_offset + off);
3826
3827 bfd_put_64 (output_bfd, 0,
3828 htab->sgot->contents + off);
3829 bfd_put_64 (output_bfd, 0,
3830 htab->sgot->contents + off + GOT_ENTRY_SIZE);
3831 outrel.r_info = ELF64_R_INFO (0, R_X86_64_DTPMOD64);
3832 outrel.r_addend = 0;
947216bf
AM		 3833 loc = htab->srelgot->contents;
3834 loc += htab->srelgot->reloc_count++ * sizeof (Elf64_External_Rela);
bffbf940
JJ		 3835 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
3836 htab->tls_ld_got.offset |= 1;
3837 }
3838 relocation = htab->sgot->output_section->vma
3839 + htab->sgot->output_offset + off;
b34976b6 3840 unresolved_reloc = FALSE;
bffbf940
JJ		 3841 break;
3842
3843 case R_X86_64_DTPOFF32:
a45bb67d 3844 if (info->shared || (input_section->flags & SEC_CODE) == 0)
eb4ff4d6 3845 relocation -= elf64_x86_64_dtpoff_base (info);
bffbf940 3846 else
eb4ff4d6 3847 relocation = elf64_x86_64_tpoff (info, relocation);
bffbf940
JJ		 3848 break;
3849
3850 case R_X86_64_TPOFF32:
3851 BFD_ASSERT (! info->shared);
eb4ff4d6 3852 relocation = elf64_x86_64_tpoff (info, relocation);
bffbf940
JJ		 3853 break;
3854
70256ad8
AJ		 3855 default:
3856 break;
3857 }
8d88c4ca 3858
239e1f3a
AM		 3859 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3860 because such sections are not SEC_ALLOC and thus ld.so will
3861 not process them. */
c434dee6 3862 if (unresolved_reloc
239e1f3a 3863 && !((input_section->flags & SEC_DEBUGGING) != 0
f5385ebf 3864 && h->def_dynamic))
c434dee6 3865 (*_bfd_error_handler)
843fe662 3866 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
d003868e
AM		 3867 input_bfd,
3868 input_section,
c434dee6 3869 (long) rel->r_offset,
843fe662 3870 howto->name,
c434dee6
AJ		 3871 h->root.root.string);
3872
cbe950e9 3873do_relocation:
8d88c4ca 3874 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
c434dee6
AJ		 3875 contents, rel->r_offset,
3876 relocation, rel->r_addend);
8d88c4ca
NC		 3877
3878 if (r != bfd_reloc_ok)
8da6118f 3879 {
c434dee6
AJ		 3880 const char *name;
3881
3882 if (h != NULL)
3883 name = h->root.root.string;
3884 else
8da6118f 3885 {
c434dee6
AJ		 3886 name = bfd_elf_string_from_elf_section (input_bfd,
3887 symtab_hdr->sh_link,
3888 sym->st_name);
3889 if (name == NULL)
b34976b6 3890 return FALSE;
c434dee6
AJ		 3891 if (*name == '\0')
3892 name = bfd_section_name (input_bfd, sec);
3893 }
3894
3895 if (r == bfd_reloc_overflow)
3896 {
c434dee6 3897 if (! ((*info->callbacks->reloc_overflow)
dfeffb9f
L		 3898 (info, (h ? &h->root : NULL), name, howto->name,
3899 (bfd_vma) 0, input_bfd, input_section,
3900 rel->r_offset)))
b34976b6 3901 return FALSE;
c434dee6
AJ		 3902 }
3903 else
3904 {
3905 (*_bfd_error_handler)
d003868e
AM		 3906 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
3907 input_bfd, input_section,
c434dee6 3908 (long) rel->r_offset, name, (int) r);
b34976b6 3909 return FALSE;
8da6118f
KH		 3910 }
3911 }
8d88c4ca 3912 }
70256ad8 3913
b34976b6 3914 return TRUE;
70256ad8
AJ		 3915}
3916
3917/* Finish up dynamic symbol handling. We set the contents of various
3918 dynamic sections here. */
3919
b34976b6 3920static bfd_boolean
27482721
AJ		 3921elf64_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3922 struct bfd_link_info *info,
3923 struct elf_link_hash_entry *h,
3924 Elf_Internal_Sym *sym)
70256ad8 3925{
c434dee6 3926 struct elf64_x86_64_link_hash_table *htab;
70256ad8 3927
c434dee6 3928 htab = elf64_x86_64_hash_table (info);
70256ad8
AJ		 3929
3930 if (h->plt.offset != (bfd_vma) -1)
3931 {
70256ad8
AJ		 3932 bfd_vma plt_index;
3933 bfd_vma got_offset;
3934 Elf_Internal_Rela rela;
947216bf 3935 bfd_byte *loc;
cbe950e9
L		 3936 asection *plt, *gotplt, *relplt;
3937
3938 /* When building a static executable, use .iplt, .igot.plt and
3939 .rela.iplt sections for STT_GNU_IFUNC symbols. */
710ab287 3940 if (htab->splt != NULL)
cbe950e9
L		 3941 {
3942 plt = htab->splt;
3943 gotplt = htab->sgotplt;
3944 relplt = htab->srelplt;
3945 }
3946 else
3947 {
3948 plt = htab->iplt;
3949 gotplt = htab->igotplt;
3950 relplt = htab->irelplt;
3951 }
70256ad8
AJ		 3952
3953 /* This symbol has an entry in the procedure linkage table. Set
407443a3 3954 it up. */
cbe950e9
L		 3955 if ((h->dynindx == -1
3956 && !((h->forced_local || info->executable)
3957 && h->def_regular
3958 && h->type == STT_GNU_IFUNC))
3959 || plt == NULL
3960 || gotplt == NULL
3961 || relplt == NULL)
c434dee6 3962 abort ();
70256ad8
AJ		 3963
3964 /* Get the index in the procedure linkage table which
3965 corresponds to this symbol. This is the index of this symbol
3966 in all the symbols for which we are making plt entries. The
cbe950e9
L		 3967 first entry in the procedure linkage table is reserved.
3968
3969 Get the offset into the .got table of the entry that
407443a3 3970 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
cbe950e9
L		 3971 bytes. The first three are reserved for the dynamic linker.
3972
3973 For static executables, we don't reserve anything. */
3974
3975 if (plt == htab->splt)
3976 {
3977 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
3978 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
3979 }
3980 else
3981 {
3982 plt_index = h->plt.offset / PLT_ENTRY_SIZE;
3983 got_offset = plt_index * GOT_ENTRY_SIZE;
3984 }
70256ad8
AJ		 3985
3986 /* Fill in the entry in the procedure linkage table. */
cbe950e9 3987 memcpy (plt->contents + h->plt.offset, elf64_x86_64_plt_entry,
70256ad8
AJ		 3988 PLT_ENTRY_SIZE);
3989
3990 /* Insert the relocation positions of the plt section. The magic
3991 numbers at the end of the statements are the positions of the
3992 relocations in the plt section. */
653165cc
AJ		 3993 /* Put offset for jmp *name@GOTPCREL(%rip), since the
3994 instruction uses 6 bytes, subtract this value. */
3995 bfd_put_32 (output_bfd,
cbe950e9
L		 3996 (gotplt->output_section->vma
3997 + gotplt->output_offset
653165cc 3998 + got_offset
cbe950e9
L		 3999 - plt->output_section->vma
4000 - plt->output_offset
653165cc
AJ		 4001 - h->plt.offset
4002 - 6),
cbe950e9
L		 4003 plt->contents + h->plt.offset + 2);
4004
4005 /* Don't fill PLT entry for static executables. */
4006 if (plt == htab->splt)
4007 {
4008 /* Put relocation index. */
4009 bfd_put_32 (output_bfd, plt_index,
4010 plt->contents + h->plt.offset + 7);
4011 /* Put offset for jmp .PLT0. */
4012 bfd_put_32 (output_bfd, - (h->plt.offset + PLT_ENTRY_SIZE),
4013 plt->contents + h->plt.offset + 12);
4014 }
70256ad8 4015
653165cc
AJ		 4016 /* Fill in the entry in the global offset table, initially this
4017 points to the pushq instruction in the PLT which is at offset 6. */
cbe950e9
L		 4018 bfd_put_64 (output_bfd, (plt->output_section->vma
4019 + plt->output_offset
70256ad8 4020 + h->plt.offset + 6),
cbe950e9 4021 gotplt->contents + got_offset);
70256ad8
AJ		 4022
4023 /* Fill in the entry in the .rela.plt section. */
cbe950e9
L		 4024 rela.r_offset = (gotplt->output_section->vma
4025 + gotplt->output_offset
70256ad8 4026 + got_offset);
cbe950e9
L		 4027 if (h->dynindx == -1
4028 || ((info->executable
4029 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
4030 && h->def_regular
4031 && h->type == STT_GNU_IFUNC))
4032 {
4033 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4034 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
4035 rela.r_info = ELF64_R_INFO (0, R_X86_64_IRELATIVE);
4036 rela.r_addend = (h->root.u.def.value
4037 + h->root.u.def.section->output_section->vma
4038 + h->root.u.def.section->output_offset);
4039 }
4040 else
4041 {
4042 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_JUMP_SLOT);
4043 rela.r_addend = 0;
4044 }
4045 loc = relplt->contents + plt_index * sizeof (Elf64_External_Rela);
c434dee6 4046 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
70256ad8 4047
f5385ebf 4048 if (!h->def_regular)
70256ad8
AJ		 4049 {
4050 /* Mark the symbol as undefined, rather than as defined in
47a9f7b3
JJ		 4051 the .plt section. Leave the value if there were any
4052 relocations where pointer equality matters (this is a clue
c434dee6
AJ		 4053 for the dynamic linker, to make function pointer
4054 comparisons work between an application and shared
47a9f7b3
JJ		 4055 library), otherwise set it to zero. If a function is only
4056 called from a binary, there is no need to slow down
4057 shared libraries because of that. */
70256ad8 4058 sym->st_shndx = SHN_UNDEF;
f5385ebf 4059 if (!h->pointer_equality_needed)
47a9f7b3 4060 sym->st_value = 0;
70256ad8
AJ		 4061 }
4062 }
4063
bffbf940 4064 if (h->got.offset != (bfd_vma) -1
67a4f2b7 4065 && ! GOT_TLS_GD_ANY_P (elf64_x86_64_hash_entry (h)->tls_type)
bffbf940 4066 && elf64_x86_64_hash_entry (h)->tls_type != GOT_TLS_IE)
053579d7 4067 {
053579d7 4068 Elf_Internal_Rela rela;
947216bf 4069 bfd_byte *loc;
053579d7
AJ		 4070
4071 /* This symbol has an entry in the global offset table. Set it
bffbf940 4072 up. */
c434dee6
AJ		 4073 if (htab->sgot == NULL || htab->srelgot == NULL)
4074 abort ();
053579d7 4075
c434dee6
AJ		 4076 rela.r_offset = (htab->sgot->output_section->vma
4077 + htab->sgot->output_offset
dc810e39 4078 + (h->got.offset &~ (bfd_vma) 1));
053579d7
AJ		 4079
4080 /* If this is a static link, or it is a -Bsymbolic link and the
4081 symbol is defined locally or was forced to be local because
4082 of a version file, we just want to emit a RELATIVE reloc.
4083 The entry in the global offset table will already have been
4084 initialized in the relocate_section function. */
710ab287 4085 if (h->def_regular
0018b0a3
L		 4086 && h->type == STT_GNU_IFUNC)
4087 {
710ab287
L		 4088 if (info->shared)
4089 {
4090 /* Generate R_X86_64_GLOB_DAT. */
4091 goto do_glob_dat;
4092 }
4093 else
4094 {
4095 if (!h->pointer_equality_needed)
4096 abort ();
4097
4098 /* For non-shared object, we can't use .got.plt, which
4099 contains the real function addres if we need pointer
4100 equality. We load the GOT entry with the PLT entry. */
4101 asection *plt = htab->splt ? htab->splt : htab->iplt;
4102 bfd_put_64 (output_bfd, (plt->output_section->vma
4103 + plt->output_offset
4104 + h->plt.offset),
4105 htab->sgot->contents + h->got.offset);
4106 return TRUE;
4107 }
0018b0a3
L		 4108 }
4109 else if (info->shared
4110 && SYMBOL_REFERENCES_LOCAL (info, h))
053579d7 4111 {
41bed6dd
L		 4112 if (!h->def_regular)
4113 return FALSE;
cc78d0af 4114 BFD_ASSERT((h->got.offset & 1) != 0);
053579d7
AJ		 4115 rela.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
4116 rela.r_addend = (h->root.u.def.value
4117 + h->root.u.def.section->output_section->vma
4118 + h->root.u.def.section->output_offset);
4119 }
4120 else
4121 {
4122 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 4123do_glob_dat:
c434dee6
AJ		 4124 bfd_put_64 (output_bfd, (bfd_vma) 0,
4125 htab->sgot->contents + h->got.offset);
053579d7
AJ		 4126 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_GLOB_DAT);
4127 rela.r_addend = 0;
4128 }
4129
947216bf
AM		 4130 loc = htab->srelgot->contents;
4131 loc += htab->srelgot->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 4132 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
053579d7
AJ		 4133 }
4134
f5385ebf 4135 if (h->needs_copy)
70256ad8 4136 {
70256ad8 4137 Elf_Internal_Rela rela;
947216bf 4138 bfd_byte *loc;
70256ad8
AJ		 4139
4140 /* This symbol needs a copy reloc. Set it up. */
4141
c434dee6
AJ		 4142 if (h->dynindx == -1
4143 || (h->root.type != bfd_link_hash_defined
4144 && h->root.type != bfd_link_hash_defweak)
4145 || htab->srelbss == NULL)
4146 abort ();
70256ad8
AJ		 4147
4148 rela.r_offset = (h->root.u.def.value
4149 + h->root.u.def.section->output_section->vma
4150 + h->root.u.def.section->output_offset);
4151 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_COPY);
4152 rela.r_addend = 0;
947216bf
AM		 4153 loc = htab->srelbss->contents;
4154 loc += htab->srelbss->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 4155 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
70256ad8
AJ		 4156 }
4157
c25bc9fc
L		 4158 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
4159 be NULL for local symbols. */
4160 if (sym != NULL
4161 && (strcmp (h->root.root.string, "_DYNAMIC") == 0
4162 || h == htab->elf.hgot))
70256ad8
AJ		 4163 sym->st_shndx = SHN_ABS;
4164
b34976b6 4165 return TRUE;
70256ad8
AJ		 4166}
4167
c25bc9fc
L		 4168/* Finish up local dynamic symbol handling. We set the contents of
4169 various dynamic sections here. */
4170
4171static bfd_boolean
4172elf64_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
4173{
4174 struct elf_link_hash_entry *h
4175 = (struct elf_link_hash_entry *) *slot;
4176 struct bfd_link_info *info
4177 = (struct bfd_link_info *) inf;
4178
4179 return elf64_x86_64_finish_dynamic_symbol (info->output_bfd,
4180 info, h, NULL);
4181}
4182
c434dee6
AJ		 4183/* Used to decide how to sort relocs in an optimal manner for the
4184 dynamic linker, before writing them out. */
4185
4186static enum elf_reloc_type_class
27482721 4187elf64_x86_64_reloc_type_class (const Elf_Internal_Rela *rela)
c434dee6
AJ		 4188{
4189 switch ((int) ELF64_R_TYPE (rela->r_info))
4190 {
4191 case R_X86_64_RELATIVE:
4192 return reloc_class_relative;
4193 case R_X86_64_JUMP_SLOT:
4194 return reloc_class_plt;
4195 case R_X86_64_COPY:
4196 return reloc_class_copy;
4197 default:
4198 return reloc_class_normal;
4199 }
4200}
4201
70256ad8
AJ		 4202/* Finish up the dynamic sections. */
4203
b34976b6 4204static bfd_boolean
27482721 4205elf64_x86_64_finish_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
70256ad8 4206{
c434dee6 4207 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ		 4208 bfd *dynobj;
4209 asection *sdyn;
70256ad8 4210
c434dee6
AJ		 4211 htab = elf64_x86_64_hash_table (info);
4212 dynobj = htab->elf.dynobj;
70256ad8
AJ		 4213 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
4214
c434dee6 4215 if (htab->elf.dynamic_sections_created)
70256ad8 4216 {
70256ad8
AJ		 4217 Elf64_External_Dyn *dyncon, *dynconend;
4218
c434dee6
AJ		 4219 if (sdyn == NULL || htab->sgot == NULL)
4220 abort ();
70256ad8
AJ		 4221
4222 dyncon = (Elf64_External_Dyn *) sdyn->contents;
eea6121a 4223 dynconend = (Elf64_External_Dyn *) (sdyn->contents + sdyn->size);
70256ad8
AJ		 4224 for (; dyncon < dynconend; dyncon++)
4225 {
4226 Elf_Internal_Dyn dyn;
70256ad8
AJ		 4227 asection *s;
4228
4229 bfd_elf64_swap_dyn_in (dynobj, dyncon, &dyn);
4230
4231 switch (dyn.d_tag)
4232 {
4233 default:
053579d7 4234 continue;
70256ad8
AJ		 4235
4236 case DT_PLTGOT:
8c37241b
JJ		 4237 s = htab->sgotplt;
4238 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
c434dee6 4239 break;
70256ad8
AJ		 4240
4241 case DT_JMPREL:
c434dee6
AJ		 4242 dyn.d_un.d_ptr = htab->srelplt->output_section->vma;
4243 break;
70256ad8 4244
c434dee6
AJ		 4245 case DT_PLTRELSZ:
4246 s = htab->srelplt->output_section;
eea6121a 4247 dyn.d_un.d_val = s->size;
70256ad8
AJ		 4248 break;
4249
4250 case DT_RELASZ:
c434dee6
AJ		 4251 /* The procedure linkage table relocs (DT_JMPREL) should
4252 not be included in the overall relocs (DT_RELA).
4253 Therefore, we override the DT_RELASZ entry here to
4254 make it not include the JMPREL relocs. Since the
4255 linker script arranges for .rela.plt to follow all
4256 other relocation sections, we don't have to worry
4257 about changing the DT_RELA entry. */
4258 if (htab->srelplt != NULL)
70256ad8 4259 {
c434dee6 4260 s = htab->srelplt->output_section;
eea6121a 4261 dyn.d_un.d_val -= s->size;
70256ad8
AJ		 4262 }
4263 break;
67a4f2b7
AO		 4264
4265 case DT_TLSDESC_PLT:
4266 s = htab->splt;
4267 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
4268 + htab->tlsdesc_plt;
4269 break;
4270
4271 case DT_TLSDESC_GOT:
4272 s = htab->sgot;
4273 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
4274 + htab->tlsdesc_got;
4275 break;
70256ad8 4276 }
c434dee6 4277
70256ad8
AJ		 4278 bfd_elf64_swap_dyn_out (output_bfd, &dyn, dyncon);
4279 }
4280
c434dee6 4281 /* Fill in the special first entry in the procedure linkage table. */
eea6121a 4282 if (htab->splt && htab->splt->size > 0)
70256ad8 4283 {
653165cc 4284 /* Fill in the first entry in the procedure linkage table. */
c434dee6
AJ		 4285 memcpy (htab->splt->contents, elf64_x86_64_plt0_entry,
4286 PLT_ENTRY_SIZE);
653165cc
AJ		 4287 /* Add offset for pushq GOT+8(%rip), since the instruction
4288 uses 6 bytes subtract this value. */
4289 bfd_put_32 (output_bfd,
c434dee6
AJ		 4290 (htab->sgotplt->output_section->vma
4291 + htab->sgotplt->output_offset
653165cc 4292 + 8
c434dee6
AJ		 4293 - htab->splt->output_section->vma
4294 - htab->splt->output_offset
653165cc 4295 - 6),
c434dee6 4296 htab->splt->contents + 2);
653165cc
AJ		 4297 /* Add offset for jmp *GOT+16(%rip). The 12 is the offset to
4298 the end of the instruction. */
4299 bfd_put_32 (output_bfd,
c434dee6
AJ		 4300 (htab->sgotplt->output_section->vma
4301 + htab->sgotplt->output_offset
653165cc 4302 + 16
c434dee6
AJ		 4303 - htab->splt->output_section->vma
4304 - htab->splt->output_offset
653165cc 4305 - 12),
c434dee6 4306 htab->splt->contents + 8);
653165cc 4307
c434dee6
AJ		 4308 elf_section_data (htab->splt->output_section)->this_hdr.sh_entsize =
4309 PLT_ENTRY_SIZE;
67a4f2b7
AO		 4310
4311 if (htab->tlsdesc_plt)
4312 {
4313 bfd_put_64 (output_bfd, (bfd_vma) 0,
4314 htab->sgot->contents + htab->tlsdesc_got);
4315
4316 memcpy (htab->splt->contents + htab->tlsdesc_plt,
4317 elf64_x86_64_plt0_entry,
4318 PLT_ENTRY_SIZE);
4319
4320 /* Add offset for pushq GOT+8(%rip), since the
4321 instruction uses 6 bytes subtract this value. */
4322 bfd_put_32 (output_bfd,
4323 (htab->sgotplt->output_section->vma
4324 + htab->sgotplt->output_offset
4325 + 8
4326 - htab->splt->output_section->vma
4327 - htab->splt->output_offset
4328 - htab->tlsdesc_plt
4329 - 6),
4330 htab->splt->contents + htab->tlsdesc_plt + 2);
4331 /* Add offset for jmp *GOT+TDG(%rip), where TGD stands for
4332 htab->tlsdesc_got. The 12 is the offset to the end of
4333 the instruction. */
4334 bfd_put_32 (output_bfd,
4335 (htab->sgot->output_section->vma
4336 + htab->sgot->output_offset
4337 + htab->tlsdesc_got
4338 - htab->splt->output_section->vma
4339 - htab->splt->output_offset
4340 - htab->tlsdesc_plt
4341 - 12),
4342 htab->splt->contents + htab->tlsdesc_plt + 8);
4343 }
70256ad8 4344 }
70256ad8
AJ		 4345 }
4346
c434dee6 4347 if (htab->sgotplt)
70256ad8 4348 {
c434dee6 4349 /* Fill in the first three entries in the global offset table. */
eea6121a 4350 if (htab->sgotplt->size > 0)
c434dee6
AJ		 4351 {
4352 /* Set the first entry in the global offset table to the address of
4353 the dynamic section. */
4354 if (sdyn == NULL)
4355 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents);
4356 else
4357 bfd_put_64 (output_bfd,
4358 sdyn->output_section->vma + sdyn->output_offset,
4359 htab->sgotplt->contents);
4360 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
4361 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + GOT_ENTRY_SIZE);
4362 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + GOT_ENTRY_SIZE*2);
4363 }
70256ad8 4364
c434dee6
AJ		 4365 elf_section_data (htab->sgotplt->output_section)->this_hdr.sh_entsize =
4366 GOT_ENTRY_SIZE;
4367 }
70256ad8 4368
eea6121a 4369 if (htab->sgot && htab->sgot->size > 0)
8c37241b
JJ		 4370 elf_section_data (htab->sgot->output_section)->this_hdr.sh_entsize
4371 = GOT_ENTRY_SIZE;
4372
c25bc9fc
L		 4373 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4374 htab_traverse (htab->loc_hash_table,
4375 elf64_x86_64_finish_local_dynamic_symbol,
4376 info);
4377
b34976b6 4378 return TRUE;
8d88c4ca
NC		 4379}
4380
4c45e5c9
JJ		 4381/* Return address for Ith PLT stub in section PLT, for relocation REL
4382 or (bfd_vma) -1 if it should not be included. */
4383
4384static bfd_vma
4385elf64_x86_64_plt_sym_val (bfd_vma i, const asection *plt,
4386 const arelent *rel ATTRIBUTE_UNUSED)
4387{
4388 return plt->vma + (i + 1) * PLT_ENTRY_SIZE;
4389}
8df9fc9d 4390
d2b2c203
DJ		 4391/* Handle an x86-64 specific section when reading an object file. This
4392 is called when elfcode.h finds a section with an unknown type. */
4393
4394static bfd_boolean
6dc132d9
L		 4395elf64_x86_64_section_from_shdr (bfd *abfd,
4396 Elf_Internal_Shdr *hdr,
4397 const char *name,
4398 int shindex)
d2b2c203
DJ		 4399{
4400 if (hdr->sh_type != SHT_X86_64_UNWIND)
4401 return FALSE;
4402
6dc132d9 4403 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
d2b2c203
DJ		 4404 return FALSE;
4405
4406 return TRUE;
4407}
4408
3b22753a
L		 4409/* Hook called by the linker routine which adds symbols from an object
4410 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4411 of .bss. */
4412
4413static bfd_boolean
4414elf64_x86_64_add_symbol_hook (bfd *abfd,
d8045f23 4415 struct bfd_link_info *info,
3b22753a
L		 4416 Elf_Internal_Sym *sym,
4417 const char **namep ATTRIBUTE_UNUSED,
4418 flagword *flagsp ATTRIBUTE_UNUSED,
d8045f23
NC		 4419 asection **secp,
4420 bfd_vma *valp)
3b22753a
L		 4421{
4422 asection *lcomm;
4423
4424 switch (sym->st_shndx)
4425 {
4426 case SHN_X86_64_LCOMMON:
4427 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4428 if (lcomm == NULL)
4429 {
4430 lcomm = bfd_make_section_with_flags (abfd,
4431 "LARGE_COMMON",
4432 (SEC_ALLOC
4433 | SEC_IS_COMMON
4434 | SEC_LINKER_CREATED));
4435 if (lcomm == NULL)
4436 return FALSE;
4437 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4438 }
4439 *secp = lcomm;
4440 *valp = sym->st_size;
4441 break;
4442 }
d8045f23
NC		 4443
4444 if (ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
4445 elf_tdata (info->output_bfd)->has_ifunc_symbols = TRUE;
4446
3b22753a
L		 4447 return TRUE;
4448}
4449
4450
4451/* Given a BFD section, try to locate the corresponding ELF section
4452 index. */
4453
4454static bfd_boolean
4455elf64_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4456 asection *sec, int *index)
4457{
4458 if (sec == &_bfd_elf_large_com_section)
4459 {
4460 *index = SHN_X86_64_LCOMMON;
4461 return TRUE;
4462 }
4463 return FALSE;
4464}
4465
4466/* Process a symbol. */
4467
4468static void
4469elf64_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4470 asymbol *asym)
4471{
4472 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4473
4474 switch (elfsym->internal_elf_sym.st_shndx)
4475 {
4476 case SHN_X86_64_LCOMMON:
4477 asym->section = &_bfd_elf_large_com_section;
4478 asym->value = elfsym->internal_elf_sym.st_size;
4479 /* Common symbol doesn't set BSF_GLOBAL. */
4480 asym->flags &= ~BSF_GLOBAL;
4481 break;
4482 }
4483}
4484
4485static bfd_boolean
4486elf64_x86_64_common_definition (Elf_Internal_Sym *sym)
4487{
4488 return (sym->st_shndx == SHN_COMMON
4489 || sym->st_shndx == SHN_X86_64_LCOMMON);
4490}
4491
4492static unsigned int
4493elf64_x86_64_common_section_index (asection *sec)
4494{
4495 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4496 return SHN_COMMON;
4497 else
4498 return SHN_X86_64_LCOMMON;
4499}
4500
4501static asection *
4502elf64_x86_64_common_section (asection *sec)
4503{
4504 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4505 return bfd_com_section_ptr;
4506 else
4507 return &_bfd_elf_large_com_section;
4508}
4509
4510static bfd_boolean
4511elf64_x86_64_merge_symbol (struct bfd_link_info *info ATTRIBUTE_UNUSED,
4512 struct elf_link_hash_entry **sym_hash ATTRIBUTE_UNUSED,
4513 struct elf_link_hash_entry *h,
4514 Elf_Internal_Sym *sym,
00492999 4515 asection **psec,
3b22753a
L		 4516 bfd_vma *pvalue ATTRIBUTE_UNUSED,
4517 unsigned int *pold_alignment ATTRIBUTE_UNUSED,
4518 bfd_boolean *skip ATTRIBUTE_UNUSED,
4519 bfd_boolean *override ATTRIBUTE_UNUSED,
4520 bfd_boolean *type_change_ok ATTRIBUTE_UNUSED,
4521 bfd_boolean *size_change_ok ATTRIBUTE_UNUSED,
4522 bfd_boolean *newdef ATTRIBUTE_UNUSED,
4523 bfd_boolean *newdyn,
4524 bfd_boolean *newdyncommon ATTRIBUTE_UNUSED,
4525 bfd_boolean *newweak ATTRIBUTE_UNUSED,
4526 bfd *abfd ATTRIBUTE_UNUSED,
4527 asection **sec,
4528 bfd_boolean *olddef ATTRIBUTE_UNUSED,
4529 bfd_boolean *olddyn,
4530 bfd_boolean *olddyncommon ATTRIBUTE_UNUSED,
4531 bfd_boolean *oldweak ATTRIBUTE_UNUSED,
00492999 4532 bfd *oldbfd,
3b22753a
L		 4533 asection **oldsec)
4534{
4535 /* A normal common symbol and a large common symbol result in a
00492999
L		 4536 normal common symbol. We turn the large common symbol into a
4537 normal one. */
3b22753a
L		 4538 if (!*olddyn
4539 && h->root.type == bfd_link_hash_common
4540 && !*newdyn
4541 && bfd_is_com_section (*sec)
00492999 4542 && *oldsec != *sec)
3b22753a 4543 {
00492999
L		 4544 if (sym->st_shndx == SHN_COMMON
4545 && (elf_section_flags (*oldsec) & SHF_X86_64_LARGE) != 0)
4546 {
4547 h->root.u.c.p->section
4548 = bfd_make_section_old_way (oldbfd, "COMMON");
4549 h->root.u.c.p->section->flags = SEC_ALLOC;
4550 }
4551 else if (sym->st_shndx == SHN_X86_64_LCOMMON
4552 && (elf_section_flags (*oldsec) & SHF_X86_64_LARGE) == 0)
9a2e389a 4553 *psec = *sec = bfd_com_section_ptr;
3b22753a
L		 4554 }
4555
4556 return TRUE;
4557}
4558
4559static int
a6b96beb
AM		 4560elf64_x86_64_additional_program_headers (bfd *abfd,
4561 struct bfd_link_info *info ATTRIBUTE_UNUSED)
3b22753a
L		 4562{
4563 asection *s;
9a2e389a 4564 int count = 0;
3b22753a
L		 4565
4566 /* Check to see if we need a large readonly segment. */
4567 s = bfd_get_section_by_name (abfd, ".lrodata");
4568 if (s && (s->flags & SEC_LOAD))
4569 count++;
4570
4571 /* Check to see if we need a large data segment. Since .lbss sections
4572 is placed right after the .bss section, there should be no need for
4573 a large data segment just because of .lbss. */
4574 s = bfd_get_section_by_name (abfd, ".ldata");
4575 if (s && (s->flags & SEC_LOAD))
4576 count++;
4577
4578 return count;
4579}
4580
fdc90cb4
JJ		 4581/* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
4582
4583static bfd_boolean
4584elf64_x86_64_hash_symbol (struct elf_link_hash_entry *h)
4585{
4586 if (h->plt.offset != (bfd_vma) -1
4587 && !h->def_regular
4588 && !h->pointer_equality_needed)
4589 return FALSE;
4590
4591 return _bfd_elf_hash_symbol (h);
4592}
4593
9a2e389a 4594static const struct bfd_elf_special_section
3b22753a
L		 4595 elf64_x86_64_special_sections[]=
4596{
0112cd26
NC		 4597 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4598 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4599 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
4600 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4601 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4602 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4603 { NULL, 0, 0, 0, 0 }
3b22753a
L		 4604};
4605
70256ad8
AJ		 4606#define TARGET_LITTLE_SYM bfd_elf64_x86_64_vec
4607#define TARGET_LITTLE_NAME "elf64-x86-64"
4608#define ELF_ARCH bfd_arch_i386
4609#define ELF_MACHINE_CODE EM_X86_64
f7661549 4610#define ELF_MAXPAGESIZE 0x200000
2043964e 4611#define ELF_MINPAGESIZE 0x1000
24718e3b 4612#define ELF_COMMONPAGESIZE 0x1000
70256ad8
AJ		 4613
4614#define elf_backend_can_gc_sections 1
51b64d56 4615#define elf_backend_can_refcount 1
70256ad8
AJ		 4616#define elf_backend_want_got_plt 1
4617#define elf_backend_plt_readonly 1
4618#define elf_backend_want_plt_sym 0
4619#define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
b491616a 4620#define elf_backend_rela_normal 1
70256ad8
AJ		 4621
4622#define elf_info_to_howto elf64_x86_64_info_to_howto
70256ad8 4623
70256ad8
AJ		 4624#define bfd_elf64_bfd_link_hash_table_create \
4625 elf64_x86_64_link_hash_table_create
c25bc9fc
L		 4626#define bfd_elf64_bfd_link_hash_table_free \
4627 elf64_x86_64_link_hash_table_free
407443a3 4628#define bfd_elf64_bfd_reloc_type_lookup elf64_x86_64_reloc_type_lookup
157090f7
AM		 4629#define bfd_elf64_bfd_reloc_name_lookup \
4630 elf64_x86_64_reloc_name_lookup
70256ad8
AJ		 4631
4632#define elf_backend_adjust_dynamic_symbol elf64_x86_64_adjust_dynamic_symbol
13285a1b 4633#define elf_backend_relocs_compatible _bfd_elf_relocs_compatible
70256ad8 4634#define elf_backend_check_relocs elf64_x86_64_check_relocs
c434dee6
AJ		 4635#define elf_backend_copy_indirect_symbol elf64_x86_64_copy_indirect_symbol
4636#define elf_backend_create_dynamic_sections elf64_x86_64_create_dynamic_sections
4637#define elf_backend_finish_dynamic_sections elf64_x86_64_finish_dynamic_sections
70256ad8
AJ		 4638#define elf_backend_finish_dynamic_symbol elf64_x86_64_finish_dynamic_symbol
4639#define elf_backend_gc_mark_hook elf64_x86_64_gc_mark_hook
4640#define elf_backend_gc_sweep_hook elf64_x86_64_gc_sweep_hook
3bab7989
ML		 4641#define elf_backend_grok_prstatus elf64_x86_64_grok_prstatus
4642#define elf_backend_grok_psinfo elf64_x86_64_grok_psinfo
c434dee6 4643#define elf_backend_reloc_type_class elf64_x86_64_reloc_type_class
70256ad8
AJ		 4644#define elf_backend_relocate_section elf64_x86_64_relocate_section
4645#define elf_backend_size_dynamic_sections elf64_x86_64_size_dynamic_sections
67a4f2b7 4646#define elf_backend_always_size_sections elf64_x86_64_always_size_sections
74541ad4 4647#define elf_backend_init_index_section _bfd_elf_init_1_index_section
4c45e5c9 4648#define elf_backend_plt_sym_val elf64_x86_64_plt_sym_val
407443a3 4649#define elf_backend_object_p elf64_x86_64_elf_object_p
bffbf940 4650#define bfd_elf64_mkobject elf64_x86_64_mkobject
8d88c4ca 4651
d2b2c203
DJ		 4652#define elf_backend_section_from_shdr \
4653 elf64_x86_64_section_from_shdr
4654
3b22753a
L		 4655#define elf_backend_section_from_bfd_section \
4656 elf64_x86_64_elf_section_from_bfd_section
4657#define elf_backend_add_symbol_hook \
4658 elf64_x86_64_add_symbol_hook
4659#define elf_backend_symbol_processing \
4660 elf64_x86_64_symbol_processing
4661#define elf_backend_common_section_index \
4662 elf64_x86_64_common_section_index
4663#define elf_backend_common_section \
4664 elf64_x86_64_common_section
4665#define elf_backend_common_definition \
4666 elf64_x86_64_common_definition
4667#define elf_backend_merge_symbol \
4668 elf64_x86_64_merge_symbol
4669#define elf_backend_special_sections \
4670 elf64_x86_64_special_sections
4671#define elf_backend_additional_program_headers \
4672 elf64_x86_64_additional_program_headers
fdc90cb4
JJ		 4673#define elf_backend_hash_symbol \
4674 elf64_x86_64_hash_symbol
3b22753a 4675
d8045f23
NC		 4676#undef elf_backend_post_process_headers
4677#define elf_backend_post_process_headers _bfd_elf_set_osabi
4678
8d88c4ca 4679#include "elf64-target.h"
9d7cbccd
NC		 4680
4681/* FreeBSD support. */
4682
4683#undef TARGET_LITTLE_SYM
4684#define TARGET_LITTLE_SYM bfd_elf64_x86_64_freebsd_vec
4685#undef TARGET_LITTLE_NAME
4686#define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
4687
d1036acb
L		 4688#undef ELF_OSABI
4689#define ELF_OSABI ELFOSABI_FREEBSD
9d7cbccd 4690
9d7cbccd
NC		 4691#undef elf64_bed
4692#define elf64_bed elf64_x86_64_fbsd_bed
4693
4694#include "elf64-target.h"
GDB Binutils - Deliverables
This page took 0.731594 seconds and 4 git commands to generate.