]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf64-x86-64.c
bfd/
[thirdparty/binutils-gdb.git] / bfd / elf64-x86-64.c
CommitLineData
8d88c4ca 1/* X86-64 specific support for 64-bit ELF
b2a8e766 2 Copyright 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
8d88c4ca
NC
3 Contributed by Jan Hubicka <jh@suse.cz>.
4
ae9a127f 5 This file is part of BFD, the Binary File Descriptor library.
8d88c4ca 6
ae9a127f
NC
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
8d88c4ca 11
ae9a127f
NC
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
8d88c4ca 16
ae9a127f
NC
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
8d88c4ca
NC
20
21#include "bfd.h"
22#include "sysdep.h"
c434dee6 23#include "bfdlink.h"
8d88c4ca
NC
24#include "libbfd.h"
25#include "elf-bfd.h"
26
27#include "elf/x86-64.h"
28
8d88c4ca
NC
29/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
30#define MINUS_ONE (~ (bfd_vma) 0)
31
32/* The relocation "howto" table. Order of fields:
407443a3
AJ
33 type, size, bitsize, pc_relative, complain_on_overflow,
34 special_function, name, partial_inplace, src_mask, dst_pack, pcrel_offset. */
70256ad8
AJ
35static reloc_howto_type x86_64_elf_howto_table[] =
36{
b34976b6
AM
37 HOWTO(R_X86_64_NONE, 0, 0, 0, FALSE, 0, complain_overflow_dont,
38 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
39 FALSE),
40 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
41 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
42 FALSE),
43 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
44 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
45 TRUE),
46 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
47 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
48 FALSE),
49 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
50 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
51 TRUE),
52 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
53 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
54 FALSE),
55 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
56 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
57 MINUS_ONE, FALSE),
58 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
59 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
60 MINUS_ONE, FALSE),
61 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
62 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
63 MINUS_ONE, FALSE),
64 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
65 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
66 0xffffffff, TRUE),
67 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
68 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
69 FALSE),
70 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
71 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
72 FALSE),
73 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
74 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
75 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
76 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
77 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_signed,
78 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
79 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
80 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
81 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
82 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
83 MINUS_ONE, FALSE),
84 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
85 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
86 MINUS_ONE, FALSE),
87 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
88 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
89 MINUS_ONE, FALSE),
90 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
91 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
92 0xffffffff, TRUE),
93 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
94 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
95 0xffffffff, TRUE),
96 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
97 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
98 0xffffffff, FALSE),
99 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
100 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
101 0xffffffff, TRUE),
102 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
103 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
104 0xffffffff, FALSE),
fe4770f4
AJ
105
106/* GNU extension to record C++ vtable hierarchy. */
b34976b6
AM
107 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
108 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
fe4770f4
AJ
109
110/* GNU extension to record C++ vtable member usage. */
b34976b6
AM
111 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
112 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
113 FALSE)
8d88c4ca
NC
114};
115
116/* Map BFD relocs to the x86_64 elf relocs. */
70256ad8
AJ
117struct elf_reloc_map
118{
8d88c4ca
NC
119 bfd_reloc_code_real_type bfd_reloc_val;
120 unsigned char elf_reloc_val;
121};
122
dc810e39 123static const struct elf_reloc_map x86_64_reloc_map[] =
8d88c4ca 124{
70256ad8
AJ
125 { BFD_RELOC_NONE, R_X86_64_NONE, },
126 { BFD_RELOC_64, R_X86_64_64, },
127 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
128 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
129 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
130 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
131 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
132 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
133 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
134 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
135 { BFD_RELOC_32, R_X86_64_32, },
136 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
137 { BFD_RELOC_16, R_X86_64_16, },
138 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
139 { BFD_RELOC_8, R_X86_64_8, },
140 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
bffbf940
JJ
141 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
142 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
143 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
144 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
145 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
146 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
147 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
148 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
fe4770f4
AJ
149 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
150 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
8d88c4ca
NC
151};
152
8d88c4ca
NC
153
154/* Given a BFD reloc type, return a HOWTO structure. */
155static reloc_howto_type *
27482721
AJ
156elf64_x86_64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
157 bfd_reloc_code_real_type code)
8d88c4ca
NC
158{
159 unsigned int i;
27482721 160
8d88c4ca
NC
161 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
162 i++)
163 {
164 if (x86_64_reloc_map[i].bfd_reloc_val == code)
ffaef159 165 return &x86_64_elf_howto_table[i];
8d88c4ca
NC
166 }
167 return 0;
168}
169
8d88c4ca 170/* Given an x86_64 ELF reloc type, fill in an arelent structure. */
8da6118f 171
8d88c4ca 172static void
27482721
AJ
173elf64_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
174 Elf_Internal_Rela *dst)
8d88c4ca 175{
fe4770f4 176 unsigned r_type, i;
8d88c4ca
NC
177
178 r_type = ELF64_R_TYPE (dst->r_info);
fe4770f4
AJ
179 if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT)
180 {
bffbf940 181 BFD_ASSERT (r_type <= (unsigned int) R_X86_64_TPOFF32);
fe4770f4
AJ
182 i = r_type;
183 }
184 else
185 {
186 BFD_ASSERT (r_type < (unsigned int) R_X86_64_max);
bffbf940 187 i = r_type - ((unsigned int) R_X86_64_GNU_VTINHERIT - R_X86_64_TPOFF32 - 1);
fe4770f4
AJ
188 }
189 cache_ptr->howto = &x86_64_elf_howto_table[i];
8d88c4ca
NC
190 BFD_ASSERT (r_type == cache_ptr->howto->type);
191}
70256ad8 192\f
3bab7989 193/* Support for core dump NOTE sections. */
b34976b6 194static bfd_boolean
27482721 195elf64_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML
196{
197 int offset;
eea6121a 198 size_t size;
3bab7989
ML
199
200 switch (note->descsz)
201 {
202 default:
b34976b6 203 return FALSE;
3bab7989
ML
204
205 case 336: /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
206 /* pr_cursig */
cedb70c5 207 elf_tdata (abfd)->core_signal
3bab7989
ML
208 = bfd_get_16 (abfd, note->descdata + 12);
209
210 /* pr_pid */
cedb70c5 211 elf_tdata (abfd)->core_pid
3bab7989
ML
212 = bfd_get_32 (abfd, note->descdata + 32);
213
214 /* pr_reg */
215 offset = 112;
eea6121a 216 size = 216;
3bab7989
ML
217
218 break;
219 }
220
221 /* Make a ".reg/999" section. */
222 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
eea6121a 223 size, note->descpos + offset);
3bab7989
ML
224}
225
b34976b6 226static bfd_boolean
27482721 227elf64_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
3bab7989
ML
228{
229 switch (note->descsz)
230 {
231 default:
b34976b6 232 return FALSE;
3bab7989
ML
233
234 case 136: /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
235 elf_tdata (abfd)->core_program
236 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
237 elf_tdata (abfd)->core_command
238 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
239 }
240
241 /* Note that for some reason, a spurious space is tacked
242 onto the end of the args in some (at least one anyway)
243 implementations, so strip it off if it exists. */
244
245 {
246 char *command = elf_tdata (abfd)->core_command;
247 int n = strlen (command);
248
249 if (0 < n && command[n - 1] == ' ')
250 command[n - 1] = '\0';
251 }
252
b34976b6 253 return TRUE;
3bab7989
ML
254}
255\f
407443a3 256/* Functions for the x86-64 ELF linker. */
70256ad8 257
407443a3 258/* The name of the dynamic interpreter. This is put in the .interp
70256ad8
AJ
259 section. */
260
407443a3 261#define ELF_DYNAMIC_INTERPRETER "/lib/ld64.so.1"
70256ad8 262
d40d037c
AJ
263/* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
264 copying dynamic variables from a shared lib into an app's dynbss
265 section, and instead use a dynamic relocation to point into the
266 shared lib. */
267#define ELIMINATE_COPY_RELOCS 1
268
70256ad8
AJ
269/* The size in bytes of an entry in the global offset table. */
270
271#define GOT_ENTRY_SIZE 8
8d88c4ca 272
70256ad8 273/* The size in bytes of an entry in the procedure linkage table. */
8d88c4ca 274
70256ad8
AJ
275#define PLT_ENTRY_SIZE 16
276
277/* The first entry in a procedure linkage table looks like this. See the
278 SVR4 ABI i386 supplement and the x86-64 ABI to see how this works. */
279
280static const bfd_byte elf64_x86_64_plt0_entry[PLT_ENTRY_SIZE] =
281{
653165cc
AJ
282 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
283 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
284 0x90, 0x90, 0x90, 0x90 /* pad out to 16 bytes with nops. */
70256ad8
AJ
285};
286
287/* Subsequent entries in a procedure linkage table look like this. */
288
289static const bfd_byte elf64_x86_64_plt_entry[PLT_ENTRY_SIZE] =
290{
653165cc 291 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
407443a3 292 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653165cc 293 0x68, /* pushq immediate */
70256ad8
AJ
294 0, 0, 0, 0, /* replaced with index into relocation table. */
295 0xe9, /* jmp relative */
296 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
297};
298
299/* The x86-64 linker needs to keep track of the number of relocs that
985142a4 300 it decides to copy as dynamic relocs in check_relocs for each symbol.
c434dee6
AJ
301 This is so that it can later discard them if they are found to be
302 unnecessary. We store the information in a field extending the
303 regular ELF linker hash table. */
70256ad8 304
c434dee6 305struct elf64_x86_64_dyn_relocs
70256ad8
AJ
306{
307 /* Next section. */
c434dee6
AJ
308 struct elf64_x86_64_dyn_relocs *next;
309
310 /* The input section of the reloc. */
311 asection *sec;
312
313 /* Total number of relocs copied for the input section. */
70256ad8 314 bfd_size_type count;
c434dee6
AJ
315
316 /* Number of pc-relative relocs copied for the input section. */
317 bfd_size_type pc_count;
70256ad8
AJ
318};
319
320/* x86-64 ELF linker hash entry. */
321
322struct elf64_x86_64_link_hash_entry
323{
c434dee6 324 struct elf_link_hash_entry elf;
70256ad8 325
c434dee6
AJ
326 /* Track dynamic relocs copied for this symbol. */
327 struct elf64_x86_64_dyn_relocs *dyn_relocs;
bffbf940
JJ
328
329#define GOT_UNKNOWN 0
330#define GOT_NORMAL 1
331#define GOT_TLS_GD 2
332#define GOT_TLS_IE 3
333 unsigned char tls_type;
334};
335
336#define elf64_x86_64_hash_entry(ent) \
337 ((struct elf64_x86_64_link_hash_entry *)(ent))
338
339struct elf64_x86_64_obj_tdata
340{
341 struct elf_obj_tdata root;
342
343 /* tls_type for each local got entry. */
344 char *local_got_tls_type;
70256ad8
AJ
345};
346
bffbf940
JJ
347#define elf64_x86_64_tdata(abfd) \
348 ((struct elf64_x86_64_obj_tdata *) (abfd)->tdata.any)
349
350#define elf64_x86_64_local_got_tls_type(abfd) \
351 (elf64_x86_64_tdata (abfd)->local_got_tls_type)
352
353
c434dee6 354/* x86-64 ELF linker hash table. */
8d88c4ca 355
407443a3
AJ
356struct elf64_x86_64_link_hash_table
357{
c434dee6 358 struct elf_link_hash_table elf;
70256ad8 359
c434dee6
AJ
360 /* Short-cuts to get to dynamic linker sections. */
361 asection *sgot;
362 asection *sgotplt;
363 asection *srelgot;
364 asection *splt;
365 asection *srelplt;
366 asection *sdynbss;
367 asection *srelbss;
70256ad8 368
bffbf940
JJ
369 union {
370 bfd_signed_vma refcount;
371 bfd_vma offset;
372 } tls_ld_got;
373
c434dee6
AJ
374 /* Small local sym to section mapping cache. */
375 struct sym_sec_cache sym_sec;
376};
70256ad8
AJ
377
378/* Get the x86-64 ELF linker hash table from a link_info structure. */
8d88c4ca
NC
379
380#define elf64_x86_64_hash_table(p) \
381 ((struct elf64_x86_64_link_hash_table *) ((p)->hash))
382
407443a3 383/* Create an entry in an x86-64 ELF linker hash table. */
70256ad8
AJ
384
385static struct bfd_hash_entry *
27482721
AJ
386link_hash_newfunc (struct bfd_hash_entry *entry, struct bfd_hash_table *table,
387 const char *string)
70256ad8 388{
70256ad8 389 /* Allocate the structure if it has not already been allocated by a
c434dee6
AJ
390 subclass. */
391 if (entry == NULL)
392 {
393 entry = bfd_hash_allocate (table,
394 sizeof (struct elf64_x86_64_link_hash_entry));
395 if (entry == NULL)
396 return entry;
397 }
70256ad8
AJ
398
399 /* Call the allocation method of the superclass. */
c434dee6
AJ
400 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
401 if (entry != NULL)
70256ad8 402 {
c434dee6
AJ
403 struct elf64_x86_64_link_hash_entry *eh;
404
405 eh = (struct elf64_x86_64_link_hash_entry *) entry;
406 eh->dyn_relocs = NULL;
bffbf940 407 eh->tls_type = GOT_UNKNOWN;
70256ad8
AJ
408 }
409
c434dee6 410 return entry;
70256ad8
AJ
411}
412
8d88c4ca
NC
413/* Create an X86-64 ELF linker hash table. */
414
415static struct bfd_link_hash_table *
27482721 416elf64_x86_64_link_hash_table_create (bfd *abfd)
8d88c4ca
NC
417{
418 struct elf64_x86_64_link_hash_table *ret;
dc810e39 419 bfd_size_type amt = sizeof (struct elf64_x86_64_link_hash_table);
8d88c4ca 420
e2d34d7d 421 ret = (struct elf64_x86_64_link_hash_table *) bfd_malloc (amt);
c434dee6 422 if (ret == NULL)
8d88c4ca
NC
423 return NULL;
424
c434dee6 425 if (! _bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc))
8d88c4ca 426 {
e2d34d7d 427 free (ret);
8d88c4ca
NC
428 return NULL;
429 }
430
c434dee6
AJ
431 ret->sgot = NULL;
432 ret->sgotplt = NULL;
433 ret->srelgot = NULL;
434 ret->splt = NULL;
435 ret->srelplt = NULL;
436 ret->sdynbss = NULL;
437 ret->srelbss = NULL;
438 ret->sym_sec.abfd = NULL;
bffbf940 439 ret->tls_ld_got.refcount = 0;
c434dee6
AJ
440
441 return &ret->elf.root;
442}
443
444/* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up
445 shortcuts to them in our hash table. */
446
b34976b6 447static bfd_boolean
27482721 448create_got_section (bfd *dynobj, struct bfd_link_info *info)
c434dee6
AJ
449{
450 struct elf64_x86_64_link_hash_table *htab;
451
452 if (! _bfd_elf_create_got_section (dynobj, info))
b34976b6 453 return FALSE;
c434dee6
AJ
454
455 htab = elf64_x86_64_hash_table (info);
456 htab->sgot = bfd_get_section_by_name (dynobj, ".got");
457 htab->sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
458 if (!htab->sgot || !htab->sgotplt)
459 abort ();
460
461 htab->srelgot = bfd_make_section (dynobj, ".rela.got");
462 if (htab->srelgot == NULL
463 || ! bfd_set_section_flags (dynobj, htab->srelgot,
464 (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
465 | SEC_IN_MEMORY | SEC_LINKER_CREATED
466 | SEC_READONLY))
467 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 3))
b34976b6
AM
468 return FALSE;
469 return TRUE;
c434dee6
AJ
470}
471
472/* Create .plt, .rela.plt, .got, .got.plt, .rela.got, .dynbss, and
473 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
474 hash table. */
475
b34976b6 476static bfd_boolean
27482721 477elf64_x86_64_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info)
c434dee6
AJ
478{
479 struct elf64_x86_64_link_hash_table *htab;
480
481 htab = elf64_x86_64_hash_table (info);
482 if (!htab->sgot && !create_got_section (dynobj, info))
b34976b6 483 return FALSE;
c434dee6
AJ
484
485 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
b34976b6 486 return FALSE;
c434dee6
AJ
487
488 htab->splt = bfd_get_section_by_name (dynobj, ".plt");
489 htab->srelplt = bfd_get_section_by_name (dynobj, ".rela.plt");
490 htab->sdynbss = bfd_get_section_by_name (dynobj, ".dynbss");
491 if (!info->shared)
492 htab->srelbss = bfd_get_section_by_name (dynobj, ".rela.bss");
493
494 if (!htab->splt || !htab->srelplt || !htab->sdynbss
495 || (!info->shared && !htab->srelbss))
496 abort ();
497
b34976b6 498 return TRUE;
c434dee6
AJ
499}
500
501/* Copy the extra info we tack onto an elf_link_hash_entry. */
502
503static void
9c5bfbb7 504elf64_x86_64_copy_indirect_symbol (const struct elf_backend_data *bed,
27482721
AJ
505 struct elf_link_hash_entry *dir,
506 struct elf_link_hash_entry *ind)
c434dee6
AJ
507{
508 struct elf64_x86_64_link_hash_entry *edir, *eind;
509
510 edir = (struct elf64_x86_64_link_hash_entry *) dir;
511 eind = (struct elf64_x86_64_link_hash_entry *) ind;
512
513 if (eind->dyn_relocs != NULL)
514 {
515 if (edir->dyn_relocs != NULL)
516 {
517 struct elf64_x86_64_dyn_relocs **pp;
518 struct elf64_x86_64_dyn_relocs *p;
519
520 if (ind->root.type == bfd_link_hash_indirect)
521 abort ();
522
523 /* Add reloc counts against the weak sym to the strong sym
524 list. Merge any entries against the same section. */
525 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
526 {
527 struct elf64_x86_64_dyn_relocs *q;
528
529 for (q = edir->dyn_relocs; q != NULL; q = q->next)
530 if (q->sec == p->sec)
531 {
532 q->pc_count += p->pc_count;
533 q->count += p->count;
534 *pp = p->next;
535 break;
536 }
537 if (q == NULL)
538 pp = &p->next;
539 }
540 *pp = edir->dyn_relocs;
541 }
542
543 edir->dyn_relocs = eind->dyn_relocs;
544 eind->dyn_relocs = NULL;
545 }
546
bffbf940
JJ
547 if (ind->root.type == bfd_link_hash_indirect
548 && dir->got.refcount <= 0)
549 {
550 edir->tls_type = eind->tls_type;
551 eind->tls_type = GOT_UNKNOWN;
552 }
553
d40d037c
AJ
554 if (ELIMINATE_COPY_RELOCS
555 && ind->root.type != bfd_link_hash_indirect
556 && (dir->elf_link_hash_flags & ELF_LINK_HASH_DYNAMIC_ADJUSTED) != 0)
557 /* If called to transfer flags for a weakdef during processing
558 of elf_adjust_dynamic_symbol, don't copy ELF_LINK_NON_GOT_REF.
559 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
560 dir->elf_link_hash_flags |=
561 (ind->elf_link_hash_flags & (ELF_LINK_HASH_REF_DYNAMIC
562 | ELF_LINK_HASH_REF_REGULAR
3addb0a9 563 | ELF_LINK_HASH_REF_REGULAR_NONWEAK
47a9f7b3
JJ
564 | ELF_LINK_HASH_NEEDS_PLT
565 | ELF_LINK_POINTER_EQUALITY_NEEDED));
d40d037c
AJ
566 else
567 _bfd_elf_link_hash_copy_indirect (bed, dir, ind);
8d88c4ca
NC
568}
569
b34976b6 570static bfd_boolean
27482721 571elf64_x86_64_mkobject (bfd *abfd)
8d88c4ca 572{
bffbf940
JJ
573 bfd_size_type amt = sizeof (struct elf64_x86_64_obj_tdata);
574 abfd->tdata.any = bfd_zalloc (abfd, amt);
575 if (abfd->tdata.any == NULL)
b34976b6
AM
576 return FALSE;
577 return TRUE;
bffbf940
JJ
578}
579
b34976b6 580static bfd_boolean
27482721 581elf64_x86_64_elf_object_p (bfd *abfd)
bffbf940 582{
8d88c4ca
NC
583 /* Set the right machine number for an x86-64 elf64 file. */
584 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
b34976b6 585 return TRUE;
8d88c4ca
NC
586}
587
bffbf940 588static int
27482721 589elf64_x86_64_tls_transition (struct bfd_link_info *info, int r_type, int is_local)
bffbf940
JJ
590{
591 if (info->shared)
592 return r_type;
593
594 switch (r_type)
595 {
596 case R_X86_64_TLSGD:
597 case R_X86_64_GOTTPOFF:
598 if (is_local)
599 return R_X86_64_TPOFF32;
600 return R_X86_64_GOTTPOFF;
601 case R_X86_64_TLSLD:
602 return R_X86_64_TPOFF32;
603 }
604
605 return r_type;
606}
607
70256ad8 608/* Look through the relocs for a section during the first phase, and
c434dee6
AJ
609 calculate needed space in the global offset table, procedure
610 linkage table, and dynamic reloc sections. */
70256ad8 611
b34976b6 612static bfd_boolean
27482721
AJ
613elf64_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info, asection *sec,
614 const Elf_Internal_Rela *relocs)
70256ad8 615{
c434dee6 616 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ
617 Elf_Internal_Shdr *symtab_hdr;
618 struct elf_link_hash_entry **sym_hashes;
70256ad8
AJ
619 const Elf_Internal_Rela *rel;
620 const Elf_Internal_Rela *rel_end;
70256ad8
AJ
621 asection *sreloc;
622
1049f94e 623 if (info->relocatable)
b34976b6 624 return TRUE;
70256ad8 625
c434dee6 626 htab = elf64_x86_64_hash_table (info);
70256ad8
AJ
627 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
628 sym_hashes = elf_sym_hashes (abfd);
70256ad8 629
c434dee6
AJ
630 sreloc = NULL;
631
70256ad8
AJ
632 rel_end = relocs + sec->reloc_count;
633 for (rel = relocs; rel < rel_end; rel++)
634 {
bffbf940 635 unsigned int r_type;
70256ad8
AJ
636 unsigned long r_symndx;
637 struct elf_link_hash_entry *h;
638
639 r_symndx = ELF64_R_SYM (rel->r_info);
bffbf940 640 r_type = ELF64_R_TYPE (rel->r_info);
c434dee6
AJ
641
642 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
643 {
d003868e
AM
644 (*_bfd_error_handler) (_("%B: bad symbol index: %d"),
645 abfd, r_symndx);
b34976b6 646 return FALSE;
c434dee6
AJ
647 }
648
70256ad8
AJ
649 if (r_symndx < symtab_hdr->sh_info)
650 h = NULL;
651 else
652 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
653
bffbf940
JJ
654 r_type = elf64_x86_64_tls_transition (info, r_type, h == NULL);
655 switch (r_type)
70256ad8 656 {
bffbf940
JJ
657 case R_X86_64_TLSLD:
658 htab->tls_ld_got.refcount += 1;
659 goto create_got;
660
661 case R_X86_64_TPOFF32:
662 if (info->shared)
70256ad8 663 {
bffbf940 664 (*_bfd_error_handler)
d003868e
AM
665 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
666 abfd,
6610a52d
L
667 x86_64_elf_howto_table[r_type].name,
668 (h) ? h->root.root.string : "a local symbol");
bffbf940 669 bfd_set_error (bfd_error_bad_value);
b34976b6 670 return FALSE;
70256ad8 671 }
bffbf940 672 break;
c434dee6 673
bffbf940
JJ
674 case R_X86_64_GOTTPOFF:
675 if (info->shared)
676 info->flags |= DF_STATIC_TLS;
677 /* Fall through */
70256ad8 678
bffbf940
JJ
679 case R_X86_64_GOT32:
680 case R_X86_64_GOTPCREL:
681 case R_X86_64_TLSGD:
682 /* This symbol requires a global offset table entry. */
683 {
684 int tls_type, old_tls_type;
685
686 switch (r_type)
687 {
688 default: tls_type = GOT_NORMAL; break;
689 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
690 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
691 }
692
693 if (h != NULL)
694 {
695 h->got.refcount += 1;
696 old_tls_type = elf64_x86_64_hash_entry (h)->tls_type;
697 }
698 else
699 {
700 bfd_signed_vma *local_got_refcounts;
701
702 /* This is a global offset table entry for a local symbol. */
703 local_got_refcounts = elf_local_got_refcounts (abfd);
704 if (local_got_refcounts == NULL)
705 {
706 bfd_size_type size;
707
708 size = symtab_hdr->sh_info;
709 size *= sizeof (bfd_signed_vma) + sizeof (char);
710 local_got_refcounts = ((bfd_signed_vma *)
711 bfd_zalloc (abfd, size));
712 if (local_got_refcounts == NULL)
b34976b6 713 return FALSE;
bffbf940
JJ
714 elf_local_got_refcounts (abfd) = local_got_refcounts;
715 elf64_x86_64_local_got_tls_type (abfd)
716 = (char *) (local_got_refcounts + symtab_hdr->sh_info);
717 }
718 local_got_refcounts[r_symndx] += 1;
719 old_tls_type
720 = elf64_x86_64_local_got_tls_type (abfd) [r_symndx];
721 }
722
723 /* If a TLS symbol is accessed using IE at least once,
724 there is no point to use dynamic model for it. */
725 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
726 && (old_tls_type != GOT_TLS_GD || tls_type != GOT_TLS_IE))
727 {
728 if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
729 tls_type = old_tls_type;
730 else
731 {
732 (*_bfd_error_handler)
d003868e
AM
733 (_("%B: %s' accessed both as normal and thread local symbol"),
734 abfd, h ? h->root.root.string : "<local>");
b34976b6 735 return FALSE;
bffbf940
JJ
736 }
737 }
738
739 if (old_tls_type != tls_type)
740 {
741 if (h != NULL)
742 elf64_x86_64_hash_entry (h)->tls_type = tls_type;
743 else
744 elf64_x86_64_local_got_tls_type (abfd) [r_symndx] = tls_type;
745 }
746 }
c434dee6
AJ
747 /* Fall through */
748
749 //case R_X86_64_GOTPCREL:
bffbf940 750 create_got:
c434dee6
AJ
751 if (htab->sgot == NULL)
752 {
753 if (htab->elf.dynobj == NULL)
754 htab->elf.dynobj = abfd;
755 if (!create_got_section (htab->elf.dynobj, info))
b34976b6 756 return FALSE;
c434dee6 757 }
70256ad8
AJ
758 break;
759
760 case R_X86_64_PLT32:
761 /* This symbol requires a procedure linkage table entry. We
407443a3
AJ
762 actually build the entry in adjust_dynamic_symbol,
763 because this might be a case of linking PIC code which is
764 never referenced by a dynamic object, in which case we
765 don't need to generate a procedure linkage table entry
766 after all. */
70256ad8
AJ
767
768 /* If this is a local symbol, we resolve it directly without
407443a3 769 creating a procedure linkage table entry. */
70256ad8
AJ
770 if (h == NULL)
771 continue;
772
cc78d0af 773 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
51b64d56 774 h->plt.refcount += 1;
70256ad8
AJ
775 break;
776
cc78d0af
AJ
777 case R_X86_64_8:
778 case R_X86_64_16:
70256ad8
AJ
779 case R_X86_64_32:
780 case R_X86_64_32S:
1b71fb54
AJ
781 /* Let's help debug shared library creation. These relocs
782 cannot be used in shared libs. Don't error out for
783 sections we don't care about, such as debug sections or
784 non-constant sections. */
785 if (info->shared
786 && (sec->flags & SEC_ALLOC) != 0
787 && (sec->flags & SEC_READONLY) != 0)
788 {
789 (*_bfd_error_handler)
d003868e
AM
790 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
791 abfd,
6610a52d
L
792 x86_64_elf_howto_table[r_type].name,
793 (h) ? h->root.root.string : "a local symbol");
1b71fb54 794 bfd_set_error (bfd_error_bad_value);
b34976b6 795 return FALSE;
1b71fb54
AJ
796 }
797 /* Fall through. */
798
c434dee6
AJ
799 case R_X86_64_PC8:
800 case R_X86_64_PC16:
70256ad8 801 case R_X86_64_PC32:
1b71fb54 802 case R_X86_64_64:
c434dee6
AJ
803 if (h != NULL && !info->shared)
804 {
805 /* If this reloc is in a read-only section, we might
806 need a copy reloc. We can't check reliably at this
807 stage whether the section is read-only, as input
808 sections have not yet been mapped to output sections.
809 Tentatively set the flag for now, and correct in
810 adjust_dynamic_symbol. */
811 h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
812
813 /* We may need a .plt entry if the function this reloc
814 refers to is in a shared lib. */
815 h->plt.refcount += 1;
47a9f7b3
JJ
816 if (r_type != R_X86_64_PC32)
817 h->elf_link_hash_flags |= ELF_LINK_POINTER_EQUALITY_NEEDED;
c434dee6 818 }
70256ad8
AJ
819
820 /* If we are creating a shared library, and this is a reloc
821 against a global symbol, or a non PC relative reloc
822 against a local symbol, then we need to copy the reloc
823 into the shared library. However, if we are linking with
824 -Bsymbolic, we do not need to copy a reloc against a
825 global symbol which is defined in an object we are
407443a3 826 including in the link (i.e., DEF_REGULAR is set). At
70256ad8
AJ
827 this point we have not seen all the input files, so it is
828 possible that DEF_REGULAR is not set now but will be set
c434dee6
AJ
829 later (it is never cleared). In case of a weak definition,
830 DEF_REGULAR may be cleared later by a strong definition in
831 a shared library. We account for that possibility below by
832 storing information in the relocs_copied field of the hash
833 table entry. A similar situation occurs when creating
834 shared libraries and symbol visibility changes render the
835 symbol local.
836
837 If on the other hand, we are creating an executable, we
838 may need to keep relocations for symbols satisfied by a
839 dynamic library if we manage to avoid copy relocs for the
840 symbol. */
841 if ((info->shared
842 && (sec->flags & SEC_ALLOC) != 0
bffbf940
JJ
843 && (((r_type != R_X86_64_PC8)
844 && (r_type != R_X86_64_PC16)
845 && (r_type != R_X86_64_PC32))
c434dee6
AJ
846 || (h != NULL
847 && (! info->symbolic
848 || h->root.type == bfd_link_hash_defweak
849 || (h->elf_link_hash_flags
850 & ELF_LINK_HASH_DEF_REGULAR) == 0))))
d40d037c
AJ
851 || (ELIMINATE_COPY_RELOCS
852 && !info->shared
c434dee6
AJ
853 && (sec->flags & SEC_ALLOC) != 0
854 && h != NULL
855 && (h->root.type == bfd_link_hash_defweak
856 || (h->elf_link_hash_flags
857 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
70256ad8 858 {
c434dee6
AJ
859 struct elf64_x86_64_dyn_relocs *p;
860 struct elf64_x86_64_dyn_relocs **head;
861
862 /* We must copy these reloc types into the output file.
863 Create a reloc section in dynobj and make room for
864 this reloc. */
70256ad8
AJ
865 if (sreloc == NULL)
866 {
867 const char *name;
c434dee6 868 bfd *dynobj;
70256ad8
AJ
869
870 name = (bfd_elf_string_from_elf_section
871 (abfd,
872 elf_elfheader (abfd)->e_shstrndx,
873 elf_section_data (sec)->rel_hdr.sh_name));
874 if (name == NULL)
b34976b6 875 return FALSE;
70256ad8 876
c434dee6
AJ
877 if (strncmp (name, ".rela", 5) != 0
878 || strcmp (bfd_get_section_name (abfd, sec),
879 name + 5) != 0)
880 {
881 (*_bfd_error_handler)
d003868e
AM
882 (_("%B: bad relocation section name `%s\'"),
883 abfd, name);
c434dee6
AJ
884 }
885
886 if (htab->elf.dynobj == NULL)
887 htab->elf.dynobj = abfd;
888
889 dynobj = htab->elf.dynobj;
70256ad8
AJ
890
891 sreloc = bfd_get_section_by_name (dynobj, name);
892 if (sreloc == NULL)
893 {
894 flagword flags;
895
896 sreloc = bfd_make_section (dynobj, name);
897 flags = (SEC_HAS_CONTENTS | SEC_READONLY
898 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
899 if ((sec->flags & SEC_ALLOC) != 0)
900 flags |= SEC_ALLOC | SEC_LOAD;
901 if (sreloc == NULL
902 || ! bfd_set_section_flags (dynobj, sreloc, flags)
cc78d0af 903 || ! bfd_set_section_alignment (dynobj, sreloc, 3))
b34976b6 904 return FALSE;
70256ad8 905 }
c434dee6 906 elf_section_data (sec)->sreloc = sreloc;
70256ad8
AJ
907 }
908
c434dee6
AJ
909 /* If this is a global symbol, we count the number of
910 relocations we need for this symbol. */
911 if (h != NULL)
70256ad8 912 {
c434dee6
AJ
913 head = &((struct elf64_x86_64_link_hash_entry *) h)->dyn_relocs;
914 }
915 else
916 {
917 /* Track dynamic relocs needed for local syms too.
918 We really need local syms available to do this
919 easily. Oh well. */
920
921 asection *s;
922 s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
923 sec, r_symndx);
924 if (s == NULL)
b34976b6 925 return FALSE;
70256ad8 926
c434dee6
AJ
927 head = ((struct elf64_x86_64_dyn_relocs **)
928 &elf_section_data (s)->local_dynrel);
929 }
70256ad8 930
c434dee6
AJ
931 p = *head;
932 if (p == NULL || p->sec != sec)
933 {
934 bfd_size_type amt = sizeof *p;
935 p = ((struct elf64_x86_64_dyn_relocs *)
936 bfd_alloc (htab->elf.dynobj, amt));
70256ad8 937 if (p == NULL)
b34976b6 938 return FALSE;
c434dee6
AJ
939 p->next = *head;
940 *head = p;
941 p->sec = sec;
942 p->count = 0;
943 p->pc_count = 0;
70256ad8 944 }
c434dee6
AJ
945
946 p->count += 1;
bffbf940
JJ
947 if (r_type == R_X86_64_PC8
948 || r_type == R_X86_64_PC16
949 || r_type == R_X86_64_PC32)
c434dee6 950 p->pc_count += 1;
70256ad8
AJ
951 }
952 break;
fe4770f4
AJ
953
954 /* This relocation describes the C++ object vtable hierarchy.
955 Reconstruct it for later use during GC. */
956 case R_X86_64_GNU_VTINHERIT:
c152c796 957 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
b34976b6 958 return FALSE;
fe4770f4
AJ
959 break;
960
961 /* This relocation describes which C++ vtable entries are actually
962 used. Record for later use during GC. */
963 case R_X86_64_GNU_VTENTRY:
c152c796 964 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
b34976b6 965 return FALSE;
fe4770f4 966 break;
c434dee6
AJ
967
968 default:
969 break;
70256ad8
AJ
970 }
971 }
972
b34976b6 973 return TRUE;
70256ad8
AJ
974}
975
976/* Return the section that should be marked against GC for a given
407443a3 977 relocation. */
70256ad8
AJ
978
979static asection *
27482721
AJ
980elf64_x86_64_gc_mark_hook (asection *sec,
981 struct bfd_link_info *info ATTRIBUTE_UNUSED,
982 Elf_Internal_Rela *rel,
983 struct elf_link_hash_entry *h,
984 Elf_Internal_Sym *sym)
70256ad8
AJ
985{
986 if (h != NULL)
987 {
fe4770f4 988 switch (ELF64_R_TYPE (rel->r_info))
70256ad8 989 {
fe4770f4
AJ
990 case R_X86_64_GNU_VTINHERIT:
991 case R_X86_64_GNU_VTENTRY:
992 break;
70256ad8
AJ
993
994 default:
fe4770f4
AJ
995 switch (h->root.type)
996 {
997 case bfd_link_hash_defined:
998 case bfd_link_hash_defweak:
999 return h->root.u.def.section;
1000
1001 case bfd_link_hash_common:
1002 return h->root.u.c.p->section;
1003
1004 default:
1005 break;
1006 }
70256ad8
AJ
1007 }
1008 }
1009 else
1e2f5b6e 1010 return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
70256ad8
AJ
1011
1012 return NULL;
1013}
1014
407443a3 1015/* Update the got entry reference counts for the section being removed. */
70256ad8 1016
b34976b6 1017static bfd_boolean
27482721
AJ
1018elf64_x86_64_gc_sweep_hook (bfd *abfd, struct bfd_link_info *info,
1019 asection *sec, const Elf_Internal_Rela *relocs)
70256ad8
AJ
1020{
1021 Elf_Internal_Shdr *symtab_hdr;
1022 struct elf_link_hash_entry **sym_hashes;
1023 bfd_signed_vma *local_got_refcounts;
1024 const Elf_Internal_Rela *rel, *relend;
c434dee6
AJ
1025
1026 elf_section_data (sec)->local_dynrel = NULL;
70256ad8
AJ
1027
1028 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1029 sym_hashes = elf_sym_hashes (abfd);
1030 local_got_refcounts = elf_local_got_refcounts (abfd);
1031
70256ad8
AJ
1032 relend = relocs + sec->reloc_count;
1033 for (rel = relocs; rel < relend; rel++)
26e41594
AM
1034 {
1035 unsigned long r_symndx;
1036 unsigned int r_type;
1037 struct elf_link_hash_entry *h = NULL;
70256ad8 1038
26e41594
AM
1039 r_symndx = ELF64_R_SYM (rel->r_info);
1040 if (r_symndx >= symtab_hdr->sh_info)
1041 {
1042 struct elf64_x86_64_link_hash_entry *eh;
1043 struct elf64_x86_64_dyn_relocs **pp;
1044 struct elf64_x86_64_dyn_relocs *p;
c434dee6 1045
26e41594
AM
1046 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1047 eh = (struct elf64_x86_64_link_hash_entry *) h;
c434dee6 1048
26e41594
AM
1049 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
1050 if (p->sec == sec)
1051 {
1052 /* Everything must go for SEC. */
1053 *pp = p->next;
1054 break;
1055 }
1056 }
c434dee6 1057
26e41594
AM
1058 r_type = ELF64_R_TYPE (rel->r_info);
1059 r_type = elf64_x86_64_tls_transition (info, r_type, h != NULL);
1060 switch (r_type)
1061 {
1062 case R_X86_64_TLSLD:
1063 if (elf64_x86_64_hash_table (info)->tls_ld_got.refcount > 0)
1064 elf64_x86_64_hash_table (info)->tls_ld_got.refcount -= 1;
1065 break;
c434dee6 1066
26e41594
AM
1067 case R_X86_64_TLSGD:
1068 case R_X86_64_GOTTPOFF:
1069 case R_X86_64_GOT32:
1070 case R_X86_64_GOTPCREL:
1071 if (h != NULL)
1072 {
1073 if (h->got.refcount > 0)
1074 h->got.refcount -= 1;
1075 }
1076 else if (local_got_refcounts != NULL)
1077 {
1078 if (local_got_refcounts[r_symndx] > 0)
1079 local_got_refcounts[r_symndx] -= 1;
1080 }
1081 break;
c434dee6 1082
26e41594
AM
1083 case R_X86_64_8:
1084 case R_X86_64_16:
1085 case R_X86_64_32:
1086 case R_X86_64_64:
1087 case R_X86_64_32S:
1088 case R_X86_64_PC8:
1089 case R_X86_64_PC16:
1090 case R_X86_64_PC32:
1091 if (info->shared)
1092 break;
1093 /* Fall thru */
c434dee6 1094
26e41594
AM
1095 case R_X86_64_PLT32:
1096 if (h != NULL)
1097 {
1098 if (h->plt.refcount > 0)
1099 h->plt.refcount -= 1;
1100 }
1101 break;
70256ad8 1102
26e41594
AM
1103 default:
1104 break;
1105 }
1106 }
70256ad8 1107
b34976b6 1108 return TRUE;
70256ad8
AJ
1109}
1110
1111/* Adjust a symbol defined by a dynamic object and referenced by a
1112 regular object. The current definition is in some section of the
1113 dynamic object, but we're not including those sections. We have to
1114 change the definition to something the rest of the link can
407443a3 1115 understand. */
70256ad8 1116
b34976b6 1117static bfd_boolean
27482721
AJ
1118elf64_x86_64_adjust_dynamic_symbol (struct bfd_link_info *info,
1119 struct elf_link_hash_entry *h)
70256ad8 1120{
c434dee6 1121 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ
1122 asection *s;
1123 unsigned int power_of_two;
1124
70256ad8
AJ
1125 /* If this is a function, put it in the procedure linkage table. We
1126 will fill in the contents of the procedure linkage table later,
1127 when we know the address of the .got section. */
1128 if (h->type == STT_FUNC
1129 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
1130 {
c434dee6 1131 if (h->plt.refcount <= 0
27482721
AJ
1132 || SYMBOL_CALLS_LOCAL (info, h)
1133 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
1134 && h->root.type == bfd_link_hash_undefweak))
70256ad8 1135 {
70256ad8
AJ
1136 /* This case can occur if we saw a PLT32 reloc in an input
1137 file, but the symbol was never referred to by a dynamic
1138 object, or if all references were garbage collected. In
1139 such a case, we don't actually need to build a procedure
1140 linkage table, and we can just do a PC32 reloc instead. */
70256ad8
AJ
1141 h->plt.offset = (bfd_vma) -1;
1142 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
70256ad8
AJ
1143 }
1144
b34976b6 1145 return TRUE;
70256ad8 1146 }
bbd7ec4a 1147 else
c434dee6
AJ
1148 /* It's possible that we incorrectly decided a .plt reloc was
1149 needed for an R_X86_64_PC32 reloc to a non-function sym in
1150 check_relocs. We can't decide accurately between function and
1151 non-function syms in check-relocs; Objects loaded later in
1152 the link may change h->type. So fix it now. */
bbd7ec4a 1153 h->plt.offset = (bfd_vma) -1;
70256ad8
AJ
1154
1155 /* If this is a weak symbol, and there is a real definition, the
1156 processor independent code will have arranged for us to see the
407443a3 1157 real definition first, and we can just use the same value. */
70256ad8
AJ
1158 if (h->weakdef != NULL)
1159 {
1160 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1161 || h->weakdef->root.type == bfd_link_hash_defweak);
1162 h->root.u.def.section = h->weakdef->root.u.def.section;
1163 h->root.u.def.value = h->weakdef->root.u.def.value;
d40d037c
AJ
1164 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
1165 h->elf_link_hash_flags
1166 = ((h->elf_link_hash_flags & ~ELF_LINK_NON_GOT_REF)
1167 | (h->weakdef->elf_link_hash_flags & ELF_LINK_NON_GOT_REF));
b34976b6 1168 return TRUE;
70256ad8
AJ
1169 }
1170
1171 /* This is a reference to a symbol defined by a dynamic object which
407443a3 1172 is not a function. */
70256ad8
AJ
1173
1174 /* If we are creating a shared library, we must presume that the
1175 only references to the symbol are via the global offset table.
1176 For such cases we need not do anything here; the relocations will
407443a3 1177 be handled correctly by relocate_section. */
70256ad8 1178 if (info->shared)
b34976b6 1179 return TRUE;
70256ad8
AJ
1180
1181 /* If there are no references to this symbol that do not use the
1182 GOT, we don't need to generate a copy reloc. */
1183 if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
b34976b6 1184 return TRUE;
70256ad8 1185
c434dee6
AJ
1186 /* If -z nocopyreloc was given, we won't generate them either. */
1187 if (info->nocopyreloc)
1188 {
1189 h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
b34976b6 1190 return TRUE;
c434dee6
AJ
1191 }
1192
d40d037c 1193 if (ELIMINATE_COPY_RELOCS)
c434dee6 1194 {
d40d037c
AJ
1195 struct elf64_x86_64_link_hash_entry * eh;
1196 struct elf64_x86_64_dyn_relocs *p;
c434dee6 1197
d40d037c
AJ
1198 eh = (struct elf64_x86_64_link_hash_entry *) h;
1199 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1200 {
1201 s = p->sec->output_section;
1202 if (s != NULL && (s->flags & SEC_READONLY) != 0)
1203 break;
1204 }
1205
1206 /* If we didn't find any dynamic relocs in read-only sections, then
1207 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
1208 if (p == NULL)
1209 {
1210 h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
1211 return TRUE;
1212 }
c434dee6
AJ
1213 }
1214
70256ad8 1215 /* We must allocate the symbol in our .dynbss section, which will
407443a3 1216 become part of the .bss section of the executable. There will be
70256ad8
AJ
1217 an entry for this symbol in the .dynsym section. The dynamic
1218 object will contain position independent code, so all references
1219 from the dynamic object to this symbol will go through the global
1220 offset table. The dynamic linker will use the .dynsym entry to
1221 determine the address it must put in the global offset table, so
1222 both the dynamic object and the regular object will refer to the
1223 same memory location for the variable. */
1224
c434dee6 1225 htab = elf64_x86_64_hash_table (info);
70256ad8
AJ
1226
1227 /* We must generate a R_X86_64_COPY reloc to tell the dynamic linker
1228 to copy the initial value out of the dynamic object and into the
cedb70c5 1229 runtime process image. */
70256ad8
AJ
1230 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1231 {
eea6121a 1232 htab->srelbss->size += sizeof (Elf64_External_Rela);
70256ad8
AJ
1233 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1234 }
1235
1236 /* We need to figure out the alignment required for this symbol. I
407443a3 1237 have no idea how ELF linkers handle this. 16-bytes is the size
70256ad8
AJ
1238 of the largest type that requires hard alignment -- long double. */
1239 /* FIXME: This is VERY ugly. Should be fixed for all architectures using
1240 this construct. */
1241 power_of_two = bfd_log2 (h->size);
1242 if (power_of_two > 4)
1243 power_of_two = 4;
1244
1245 /* Apply the required alignment. */
c434dee6 1246 s = htab->sdynbss;
eea6121a 1247 s->size = BFD_ALIGN (s->size, (bfd_size_type) (1 << power_of_two));
c434dee6 1248 if (power_of_two > bfd_get_section_alignment (htab->elf.dynobj, s))
70256ad8 1249 {
c434dee6 1250 if (! bfd_set_section_alignment (htab->elf.dynobj, s, power_of_two))
b34976b6 1251 return FALSE;
70256ad8
AJ
1252 }
1253
1254 /* Define the symbol as being at this point in the section. */
1255 h->root.u.def.section = s;
eea6121a 1256 h->root.u.def.value = s->size;
70256ad8
AJ
1257
1258 /* Increment the section size to make room for the symbol. */
eea6121a 1259 s->size += h->size;
70256ad8 1260
b34976b6 1261 return TRUE;
70256ad8
AJ
1262}
1263
c434dee6
AJ
1264/* Allocate space in .plt, .got and associated reloc sections for
1265 dynamic relocs. */
1266
b34976b6 1267static bfd_boolean
27482721 1268allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
c434dee6
AJ
1269{
1270 struct bfd_link_info *info;
1271 struct elf64_x86_64_link_hash_table *htab;
1272 struct elf64_x86_64_link_hash_entry *eh;
1273 struct elf64_x86_64_dyn_relocs *p;
1274
e92d460e 1275 if (h->root.type == bfd_link_hash_indirect)
b34976b6 1276 return TRUE;
c434dee6 1277
e92d460e
AM
1278 if (h->root.type == bfd_link_hash_warning)
1279 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1280
c434dee6
AJ
1281 info = (struct bfd_link_info *) inf;
1282 htab = elf64_x86_64_hash_table (info);
1283
1284 if (htab->elf.dynamic_sections_created
27482721 1285 && h->plt.refcount > 0)
c434dee6
AJ
1286 {
1287 /* Make sure this symbol is output as a dynamic symbol.
1288 Undefined weak syms won't yet be marked as dynamic. */
1289 if (h->dynindx == -1
1290 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1291 {
c152c796 1292 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 1293 return FALSE;
c434dee6
AJ
1294 }
1295
27482721
AJ
1296 if (info->shared
1297 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
c434dee6
AJ
1298 {
1299 asection *s = htab->splt;
1300
1301 /* If this is the first .plt entry, make room for the special
1302 first entry. */
eea6121a
AM
1303 if (s->size == 0)
1304 s->size += PLT_ENTRY_SIZE;
c434dee6 1305
eea6121a 1306 h->plt.offset = s->size;
c434dee6
AJ
1307
1308 /* If this symbol is not defined in a regular file, and we are
1309 not generating a shared library, then set the symbol to this
1310 location in the .plt. This is required to make function
1311 pointers compare as equal between the normal executable and
1312 the shared library. */
1313 if (! info->shared
1314 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1315 {
1316 h->root.u.def.section = s;
1317 h->root.u.def.value = h->plt.offset;
1318 }
1319
1320 /* Make room for this entry. */
eea6121a 1321 s->size += PLT_ENTRY_SIZE;
c434dee6
AJ
1322
1323 /* We also need to make an entry in the .got.plt section, which
1324 will be placed in the .got section by the linker script. */
eea6121a 1325 htab->sgotplt->size += GOT_ENTRY_SIZE;
c434dee6
AJ
1326
1327 /* We also need to make an entry in the .rela.plt section. */
eea6121a 1328 htab->srelplt->size += sizeof (Elf64_External_Rela);
c434dee6
AJ
1329 }
1330 else
1331 {
1332 h->plt.offset = (bfd_vma) -1;
1333 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
1334 }
1335 }
1336 else
1337 {
1338 h->plt.offset = (bfd_vma) -1;
1339 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
1340 }
1341
bffbf940
JJ
1342 /* If R_X86_64_GOTTPOFF symbol is now local to the binary,
1343 make it a R_X86_64_TPOFF32 requiring no GOT entry. */
1344 if (h->got.refcount > 0
1345 && !info->shared
1346 && h->dynindx == -1
1347 && elf64_x86_64_hash_entry (h)->tls_type == GOT_TLS_IE)
1348 h->got.offset = (bfd_vma) -1;
1349 else if (h->got.refcount > 0)
c434dee6
AJ
1350 {
1351 asection *s;
b34976b6 1352 bfd_boolean dyn;
bffbf940 1353 int tls_type = elf64_x86_64_hash_entry (h)->tls_type;
c434dee6
AJ
1354
1355 /* Make sure this symbol is output as a dynamic symbol.
1356 Undefined weak syms won't yet be marked as dynamic. */
1357 if (h->dynindx == -1
1358 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1359 {
c152c796 1360 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 1361 return FALSE;
c434dee6
AJ
1362 }
1363
1364 s = htab->sgot;
eea6121a
AM
1365 h->got.offset = s->size;
1366 s->size += GOT_ENTRY_SIZE;
bffbf940
JJ
1367 /* R_X86_64_TLSGD needs 2 consecutive GOT slots. */
1368 if (tls_type == GOT_TLS_GD)
eea6121a 1369 s->size += GOT_ENTRY_SIZE;
c434dee6 1370 dyn = htab->elf.dynamic_sections_created;
bffbf940
JJ
1371 /* R_X86_64_TLSGD needs one dynamic relocation if local symbol
1372 and two if global.
1373 R_X86_64_GOTTPOFF needs one dynamic relocation. */
1374 if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
1375 || tls_type == GOT_TLS_IE)
eea6121a 1376 htab->srelgot->size += sizeof (Elf64_External_Rela);
bffbf940 1377 else if (tls_type == GOT_TLS_GD)
eea6121a 1378 htab->srelgot->size += 2 * sizeof (Elf64_External_Rela);
4bc6e03a
AJ
1379 else if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1380 || h->root.type != bfd_link_hash_undefweak)
27482721
AJ
1381 && (info->shared
1382 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
eea6121a 1383 htab->srelgot->size += sizeof (Elf64_External_Rela);
c434dee6
AJ
1384 }
1385 else
1386 h->got.offset = (bfd_vma) -1;
1387
1388 eh = (struct elf64_x86_64_link_hash_entry *) h;
1389 if (eh->dyn_relocs == NULL)
b34976b6 1390 return TRUE;
c434dee6
AJ
1391
1392 /* In the shared -Bsymbolic case, discard space allocated for
1393 dynamic pc-relative relocs against symbols which turn out to be
1394 defined in regular objects. For the normal shared case, discard
1395 space for pc-relative relocs that have become local due to symbol
1396 visibility changes. */
1397
1398 if (info->shared)
1399 {
27482721
AJ
1400 /* Relocs that use pc_count are those that appear on a call
1401 insn, or certain REL relocs that can generated via assembly.
1402 We want calls to protected symbols to resolve directly to the
1403 function rather than going via the plt. If people want
1404 function pointer comparisons to work as expected then they
1405 should avoid writing weird assembly. */
1406 if (SYMBOL_CALLS_LOCAL (info, h))
c434dee6
AJ
1407 {
1408 struct elf64_x86_64_dyn_relocs **pp;
1409
1410 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
1411 {
1412 p->count -= p->pc_count;
1413 p->pc_count = 0;
1414 if (p->count == 0)
1415 *pp = p->next;
1416 else
1417 pp = &p->next;
1418 }
1419 }
4e795f50
AM
1420
1421 /* Also discard relocs on undefined weak syms with non-default
1422 visibility. */
1423 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
1424 && h->root.type == bfd_link_hash_undefweak)
1425 eh->dyn_relocs = NULL;
c434dee6 1426 }
d40d037c 1427 else if (ELIMINATE_COPY_RELOCS)
c434dee6
AJ
1428 {
1429 /* For the non-shared case, discard space for relocs against
1430 symbols which turn out to need copy relocs or are not
1431 dynamic. */
1432
1433 if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
1434 && (((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1435 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1436 || (htab->elf.dynamic_sections_created
1437 && (h->root.type == bfd_link_hash_undefweak
1438 || h->root.type == bfd_link_hash_undefined))))
1439 {
1440 /* Make sure this symbol is output as a dynamic symbol.
1441 Undefined weak syms won't yet be marked as dynamic. */
1442 if (h->dynindx == -1
1443 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1444 {
c152c796 1445 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 1446 return FALSE;
c434dee6
AJ
1447 }
1448
1449 /* If that succeeded, we know we'll be keeping all the
1450 relocs. */
1451 if (h->dynindx != -1)
1452 goto keep;
1453 }
1454
1455 eh->dyn_relocs = NULL;
1456
1457 keep: ;
1458 }
1459
1460 /* Finally, allocate space. */
1461 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1462 {
1463 asection *sreloc = elf_section_data (p->sec)->sreloc;
eea6121a 1464 sreloc->size += p->count * sizeof (Elf64_External_Rela);
c434dee6
AJ
1465 }
1466
b34976b6 1467 return TRUE;
c434dee6
AJ
1468}
1469
1470/* Find any dynamic relocs that apply to read-only sections. */
1471
b34976b6 1472static bfd_boolean
27482721 1473readonly_dynrelocs (struct elf_link_hash_entry *h, void * inf)
c434dee6
AJ
1474{
1475 struct elf64_x86_64_link_hash_entry *eh;
1476 struct elf64_x86_64_dyn_relocs *p;
1477
e92d460e
AM
1478 if (h->root.type == bfd_link_hash_warning)
1479 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1480
c434dee6
AJ
1481 eh = (struct elf64_x86_64_link_hash_entry *) h;
1482 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1483 {
1484 asection *s = p->sec->output_section;
1485
1486 if (s != NULL && (s->flags & SEC_READONLY) != 0)
1487 {
1488 struct bfd_link_info *info = (struct bfd_link_info *) inf;
1489
1490 info->flags |= DF_TEXTREL;
1491
1492 /* Not an error, just cut short the traversal. */
b34976b6 1493 return FALSE;
c434dee6
AJ
1494 }
1495 }
b34976b6 1496 return TRUE;
c434dee6
AJ
1497}
1498
70256ad8
AJ
1499/* Set the sizes of the dynamic sections. */
1500
b34976b6 1501static bfd_boolean
27482721
AJ
1502elf64_x86_64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
1503 struct bfd_link_info *info)
70256ad8 1504{
c434dee6 1505 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ
1506 bfd *dynobj;
1507 asection *s;
b34976b6 1508 bfd_boolean relocs;
c434dee6 1509 bfd *ibfd;
70256ad8 1510
c434dee6
AJ
1511 htab = elf64_x86_64_hash_table (info);
1512 dynobj = htab->elf.dynobj;
1513 if (dynobj == NULL)
1514 abort ();
70256ad8 1515
c434dee6 1516 if (htab->elf.dynamic_sections_created)
70256ad8
AJ
1517 {
1518 /* Set the contents of the .interp section to the interpreter. */
36af4a4e 1519 if (info->executable)
70256ad8
AJ
1520 {
1521 s = bfd_get_section_by_name (dynobj, ".interp");
c434dee6
AJ
1522 if (s == NULL)
1523 abort ();
eea6121a 1524 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
70256ad8
AJ
1525 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1526 }
1527 }
70256ad8 1528
c434dee6
AJ
1529 /* Set up .got offsets for local syms, and space for local dynamic
1530 relocs. */
1531 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
70256ad8 1532 {
c434dee6
AJ
1533 bfd_signed_vma *local_got;
1534 bfd_signed_vma *end_local_got;
bffbf940 1535 char *local_tls_type;
c434dee6
AJ
1536 bfd_size_type locsymcount;
1537 Elf_Internal_Shdr *symtab_hdr;
1538 asection *srel;
70256ad8 1539
c434dee6 1540 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
70256ad8
AJ
1541 continue;
1542
c434dee6 1543 for (s = ibfd->sections; s != NULL; s = s->next)
70256ad8 1544 {
c434dee6
AJ
1545 struct elf64_x86_64_dyn_relocs *p;
1546
1547 for (p = *((struct elf64_x86_64_dyn_relocs **)
1548 &elf_section_data (s)->local_dynrel);
1549 p != NULL;
1550 p = p->next)
70256ad8 1551 {
c434dee6
AJ
1552 if (!bfd_is_abs_section (p->sec)
1553 && bfd_is_abs_section (p->sec->output_section))
1554 {
1555 /* Input section has been discarded, either because
1556 it is a copy of a linkonce section or due to
1557 linker script /DISCARD/, so we'll be discarding
1558 the relocs too. */
1559 }
1560 else if (p->count != 0)
1561 {
1562 srel = elf_section_data (p->sec)->sreloc;
eea6121a 1563 srel->size += p->count * sizeof (Elf64_External_Rela);
c434dee6
AJ
1564 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
1565 info->flags |= DF_TEXTREL;
1566
1567 }
70256ad8
AJ
1568 }
1569 }
c434dee6
AJ
1570
1571 local_got = elf_local_got_refcounts (ibfd);
1572 if (!local_got)
1573 continue;
1574
1575 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
1576 locsymcount = symtab_hdr->sh_info;
1577 end_local_got = local_got + locsymcount;
bffbf940 1578 local_tls_type = elf64_x86_64_local_got_tls_type (ibfd);
c434dee6
AJ
1579 s = htab->sgot;
1580 srel = htab->srelgot;
bffbf940 1581 for (; local_got < end_local_got; ++local_got, ++local_tls_type)
70256ad8 1582 {
c434dee6 1583 if (*local_got > 0)
70256ad8 1584 {
eea6121a
AM
1585 *local_got = s->size;
1586 s->size += GOT_ENTRY_SIZE;
bffbf940 1587 if (*local_tls_type == GOT_TLS_GD)
eea6121a 1588 s->size += GOT_ENTRY_SIZE;
bffbf940
JJ
1589 if (info->shared
1590 || *local_tls_type == GOT_TLS_GD
1591 || *local_tls_type == GOT_TLS_IE)
eea6121a 1592 srel->size += sizeof (Elf64_External_Rela);
70256ad8
AJ
1593 }
1594 else
c434dee6
AJ
1595 *local_got = (bfd_vma) -1;
1596 }
1597 }
70256ad8 1598
bffbf940
JJ
1599 if (htab->tls_ld_got.refcount > 0)
1600 {
1601 /* Allocate 2 got entries and 1 dynamic reloc for R_X86_64_TLSLD
1602 relocs. */
eea6121a
AM
1603 htab->tls_ld_got.offset = htab->sgot->size;
1604 htab->sgot->size += 2 * GOT_ENTRY_SIZE;
1605 htab->srelgot->size += sizeof (Elf64_External_Rela);
bffbf940
JJ
1606 }
1607 else
1608 htab->tls_ld_got.offset = -1;
1609
c434dee6
AJ
1610 /* Allocate global sym .plt and .got entries, and space for global
1611 sym dynamic relocs. */
1612 elf_link_hash_traverse (&htab->elf, allocate_dynrelocs, (PTR) info);
1613
1614 /* We now have determined the sizes of the various dynamic sections.
1615 Allocate memory for them. */
b34976b6 1616 relocs = FALSE;
c434dee6
AJ
1617 for (s = dynobj->sections; s != NULL; s = s->next)
1618 {
1619 if ((s->flags & SEC_LINKER_CREATED) == 0)
1620 continue;
1621
1622 if (s == htab->splt
1623 || s == htab->sgot
1624 || s == htab->sgotplt)
1625 {
1626 /* Strip this section if we don't need it; see the
1627 comment below. */
1628 }
1629 else if (strncmp (bfd_get_section_name (dynobj, s), ".rela", 5) == 0)
1630 {
eea6121a 1631 if (s->size != 0 && s != htab->srelplt)
b34976b6 1632 relocs = TRUE;
c434dee6
AJ
1633
1634 /* We use the reloc_count field as a counter if we need
1635 to copy relocs into the output file. */
1636 s->reloc_count = 0;
70256ad8 1637 }
c434dee6 1638 else
70256ad8
AJ
1639 {
1640 /* It's not one of our sections, so don't allocate space. */
1641 continue;
1642 }
1643
eea6121a 1644 if (s->size == 0)
70256ad8 1645 {
c434dee6
AJ
1646 /* If we don't need this section, strip it from the
1647 output file. This is mostly to handle .rela.bss and
1648 .rela.plt. We must create both sections in
1649 create_dynamic_sections, because they must be created
1650 before the linker maps input sections to output
1651 sections. The linker does that before
1652 adjust_dynamic_symbol is called, and it is that
1653 function which decides whether anything needs to go
1654 into these sections. */
1655
70256ad8
AJ
1656 _bfd_strip_section_from_output (info, s);
1657 continue;
1658 }
1659
1660 /* Allocate memory for the section contents. We use bfd_zalloc
1661 here in case unused entries are not reclaimed before the
1662 section's contents are written out. This should not happen,
1663 but this way if it does, we get a R_X86_64_NONE reloc instead
1664 of garbage. */
eea6121a 1665 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
c434dee6 1666 if (s->contents == NULL)
b34976b6 1667 return FALSE;
70256ad8
AJ
1668 }
1669
c434dee6 1670 if (htab->elf.dynamic_sections_created)
70256ad8
AJ
1671 {
1672 /* Add some entries to the .dynamic section. We fill in the
1673 values later, in elf64_x86_64_finish_dynamic_sections, but we
1674 must add the entries now so that we get the correct size for
407443a3 1675 the .dynamic section. The DT_DEBUG entry is filled in by the
70256ad8 1676 dynamic linker and used by the debugger. */
dc810e39 1677#define add_dynamic_entry(TAG, VAL) \
5a580b3a 1678 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 1679
36af4a4e 1680 if (info->executable)
70256ad8 1681 {
dc810e39 1682 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 1683 return FALSE;
70256ad8
AJ
1684 }
1685
eea6121a 1686 if (htab->splt->size != 0)
70256ad8 1687 {
dc810e39
AM
1688 if (!add_dynamic_entry (DT_PLTGOT, 0)
1689 || !add_dynamic_entry (DT_PLTRELSZ, 0)
1690 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
1691 || !add_dynamic_entry (DT_JMPREL, 0))
b34976b6 1692 return FALSE;
70256ad8
AJ
1693 }
1694
1695 if (relocs)
1696 {
dc810e39
AM
1697 if (!add_dynamic_entry (DT_RELA, 0)
1698 || !add_dynamic_entry (DT_RELASZ, 0)
1699 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf64_External_Rela)))
b34976b6 1700 return FALSE;
70256ad8 1701
c434dee6
AJ
1702 /* If any dynamic relocs apply to a read-only section,
1703 then we need a DT_TEXTREL entry. */
1704 if ((info->flags & DF_TEXTREL) == 0)
1705 elf_link_hash_traverse (&htab->elf, readonly_dynrelocs,
1706 (PTR) info);
1707
1708 if ((info->flags & DF_TEXTREL) != 0)
1709 {
1710 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 1711 return FALSE;
c434dee6 1712 }
70256ad8
AJ
1713 }
1714 }
dc810e39 1715#undef add_dynamic_entry
70256ad8 1716
b34976b6 1717 return TRUE;
70256ad8
AJ
1718}
1719
bffbf940
JJ
1720/* Return the base VMA address which should be subtracted from real addresses
1721 when resolving @dtpoff relocation.
1722 This is PT_TLS segment p_vaddr. */
1723
1724static bfd_vma
27482721 1725dtpoff_base (struct bfd_link_info *info)
bffbf940 1726{
e1918d23
AM
1727 /* If tls_sec is NULL, we should have signalled an error already. */
1728 if (elf_hash_table (info)->tls_sec == NULL)
bffbf940 1729 return 0;
e1918d23 1730 return elf_hash_table (info)->tls_sec->vma;
bffbf940
JJ
1731}
1732
1733/* Return the relocation value for @tpoff relocation
1734 if STT_TLS virtual address is ADDRESS. */
1735
1736static bfd_vma
27482721 1737tpoff (struct bfd_link_info *info, bfd_vma address)
bffbf940 1738{
e1918d23 1739 struct elf_link_hash_table *htab = elf_hash_table (info);
bffbf940
JJ
1740
1741 /* If tls_segment is NULL, we should have signalled an error already. */
e1918d23 1742 if (htab->tls_sec == NULL)
bffbf940 1743 return 0;
e1918d23 1744 return address - htab->tls_size - htab->tls_sec->vma;
bffbf940
JJ
1745}
1746
8d88c4ca
NC
1747/* Relocate an x86_64 ELF section. */
1748
b34976b6 1749static bfd_boolean
27482721
AJ
1750elf64_x86_64_relocate_section (bfd *output_bfd, struct bfd_link_info *info,
1751 bfd *input_bfd, asection *input_section,
1752 bfd_byte *contents, Elf_Internal_Rela *relocs,
1753 Elf_Internal_Sym *local_syms,
1754 asection **local_sections)
8d88c4ca 1755{
c434dee6 1756 struct elf64_x86_64_link_hash_table *htab;
8d88c4ca
NC
1757 Elf_Internal_Shdr *symtab_hdr;
1758 struct elf_link_hash_entry **sym_hashes;
1759 bfd_vma *local_got_offsets;
c434dee6 1760 Elf_Internal_Rela *rel;
8d88c4ca
NC
1761 Elf_Internal_Rela *relend;
1762
1049f94e 1763 if (info->relocatable)
b34976b6 1764 return TRUE;
b491616a 1765
c434dee6 1766 htab = elf64_x86_64_hash_table (info);
8d88c4ca
NC
1767 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1768 sym_hashes = elf_sym_hashes (input_bfd);
1769 local_got_offsets = elf_local_got_offsets (input_bfd);
1770
c434dee6 1771 rel = relocs;
8d88c4ca 1772 relend = relocs + input_section->reloc_count;
c434dee6 1773 for (; rel < relend; rel++)
8d88c4ca 1774 {
bffbf940 1775 unsigned int r_type;
8d88c4ca
NC
1776 reloc_howto_type *howto;
1777 unsigned long r_symndx;
1778 struct elf_link_hash_entry *h;
1779 Elf_Internal_Sym *sym;
1780 asection *sec;
c434dee6 1781 bfd_vma off;
8d88c4ca 1782 bfd_vma relocation;
b34976b6 1783 bfd_boolean unresolved_reloc;
8d88c4ca 1784 bfd_reloc_status_type r;
bffbf940 1785 int tls_type;
8d88c4ca 1786
c434dee6 1787 r_type = ELF64_R_TYPE (rel->r_info);
fe4770f4
AJ
1788 if (r_type == (int) R_X86_64_GNU_VTINHERIT
1789 || r_type == (int) R_X86_64_GNU_VTENTRY)
1790 continue;
8d88c4ca 1791
bffbf940 1792 if (r_type >= R_X86_64_max)
8da6118f
KH
1793 {
1794 bfd_set_error (bfd_error_bad_value);
b34976b6 1795 return FALSE;
8da6118f 1796 }
8d88c4ca 1797
b491616a 1798 howto = x86_64_elf_howto_table + r_type;
c434dee6 1799 r_symndx = ELF64_R_SYM (rel->r_info);
8d88c4ca
NC
1800 h = NULL;
1801 sym = NULL;
1802 sec = NULL;
b34976b6 1803 unresolved_reloc = FALSE;
8d88c4ca 1804 if (r_symndx < symtab_hdr->sh_info)
8da6118f
KH
1805 {
1806 sym = local_syms + r_symndx;
1807 sec = local_sections[r_symndx];
c434dee6 1808
8517fae7 1809 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
8da6118f 1810 }
8d88c4ca 1811 else
8da6118f 1812 {
560e09e9 1813 bfd_boolean warned;
c434dee6 1814
b2a8e766
AM
1815 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1816 r_symndx, symtab_hdr, sym_hashes,
1817 h, sec, relocation,
1818 unresolved_reloc, warned);
8da6118f 1819 }
70256ad8
AJ
1820 /* When generating a shared object, the relocations handled here are
1821 copied into the output file to be resolved at run time. */
1822 switch (r_type)
1823 {
1824 case R_X86_64_GOT32:
1825 /* Relocation is to the entry for this symbol in the global
1826 offset table. */
70256ad8
AJ
1827 case R_X86_64_GOTPCREL:
1828 /* Use global offset table as symbol value. */
c434dee6
AJ
1829 if (htab->sgot == NULL)
1830 abort ();
053579d7 1831
51e0a107 1832 if (h != NULL)
70256ad8 1833 {
b34976b6 1834 bfd_boolean dyn;
c434dee6
AJ
1835
1836 off = h->got.offset;
1837 dyn = htab->elf.dynamic_sections_created;
51e0a107 1838
27482721 1839 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
51e0a107 1840 || (info->shared
27482721 1841 && SYMBOL_REFERENCES_LOCAL (info, h))
4bc6e03a
AJ
1842 || (ELF_ST_VISIBILITY (h->other)
1843 && h->root.type == bfd_link_hash_undefweak))
51e0a107
JH
1844 {
1845 /* This is actually a static link, or it is a -Bsymbolic
1846 link and the symbol is defined locally, or the symbol
407443a3 1847 was forced to be local because of a version file. We
51e0a107
JH
1848 must initialize this entry in the global offset table.
1849 Since the offset must always be a multiple of 8, we
1850 use the least significant bit to record whether we
1851 have initialized it already.
1852
1853 When doing a dynamic link, we create a .rela.got
407443a3
AJ
1854 relocation entry to initialize the value. This is
1855 done in the finish_dynamic_symbol routine. */
51e0a107
JH
1856 if ((off & 1) != 0)
1857 off &= ~1;
1858 else
1859 {
1860 bfd_put_64 (output_bfd, relocation,
c434dee6 1861 htab->sgot->contents + off);
51e0a107
JH
1862 h->got.offset |= 1;
1863 }
1864 }
053579d7 1865 else
b34976b6 1866 unresolved_reloc = FALSE;
70256ad8 1867 }
51e0a107
JH
1868 else
1869 {
c434dee6
AJ
1870 if (local_got_offsets == NULL)
1871 abort ();
51e0a107
JH
1872
1873 off = local_got_offsets[r_symndx];
1874
1875 /* The offset must always be a multiple of 8. We use
407443a3
AJ
1876 the least significant bit to record whether we have
1877 already generated the necessary reloc. */
51e0a107
JH
1878 if ((off & 1) != 0)
1879 off &= ~1;
1880 else
1881 {
c434dee6
AJ
1882 bfd_put_64 (output_bfd, relocation,
1883 htab->sgot->contents + off);
51e0a107
JH
1884
1885 if (info->shared)
1886 {
947216bf 1887 asection *s;
51e0a107 1888 Elf_Internal_Rela outrel;
947216bf 1889 bfd_byte *loc;
70256ad8 1890
51e0a107
JH
1891 /* We need to generate a R_X86_64_RELATIVE reloc
1892 for the dynamic linker. */
947216bf
AM
1893 s = htab->srelgot;
1894 if (s == NULL)
c434dee6 1895 abort ();
51e0a107 1896
c434dee6
AJ
1897 outrel.r_offset = (htab->sgot->output_section->vma
1898 + htab->sgot->output_offset
51e0a107
JH
1899 + off);
1900 outrel.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
1901 outrel.r_addend = relocation;
947216bf
AM
1902 loc = s->contents;
1903 loc += s->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 1904 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
51e0a107
JH
1905 }
1906
1907 local_got_offsets[r_symndx] |= 1;
1908 }
51e0a107 1909 }
6a2bda3f 1910
c434dee6
AJ
1911 if (off >= (bfd_vma) -2)
1912 abort ();
1913
8c37241b
JJ
1914 relocation = htab->sgot->output_section->vma
1915 + htab->sgot->output_offset + off;
1916 if (r_type != R_X86_64_GOTPCREL)
1917 relocation -= htab->sgotplt->output_section->vma
1918 - htab->sgotplt->output_offset;
c434dee6 1919
70256ad8
AJ
1920 break;
1921
1922 case R_X86_64_PLT32:
1923 /* Relocation is to the entry for this symbol in the
1924 procedure linkage table. */
1925
1926 /* Resolve a PLT32 reloc against a local symbol directly,
407443a3 1927 without using the procedure linkage table. */
70256ad8
AJ
1928 if (h == NULL)
1929 break;
1930
c434dee6
AJ
1931 if (h->plt.offset == (bfd_vma) -1
1932 || htab->splt == NULL)
70256ad8
AJ
1933 {
1934 /* We didn't make a PLT entry for this symbol. This
407443a3
AJ
1935 happens when statically linking PIC code, or when
1936 using -Bsymbolic. */
70256ad8
AJ
1937 break;
1938 }
1939
c434dee6
AJ
1940 relocation = (htab->splt->output_section->vma
1941 + htab->splt->output_offset
70256ad8 1942 + h->plt.offset);
b34976b6 1943 unresolved_reloc = FALSE;
70256ad8
AJ
1944 break;
1945
fd8ab9e5
AJ
1946 case R_X86_64_PC8:
1947 case R_X86_64_PC16:
1948 case R_X86_64_PC32:
6610a52d
L
1949 if (info->shared
1950 && !SYMBOL_REFERENCES_LOCAL (info, h)
ba3bee0b
JJ
1951 && (input_section->flags & SEC_ALLOC) != 0
1952 && (input_section->flags & SEC_READONLY) != 0)
6610a52d
L
1953 {
1954 (*_bfd_error_handler)
d003868e
AM
1955 (_("%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1956 input_bfd,
6610a52d
L
1957 x86_64_elf_howto_table[r_type].name,
1958 (h) ? h->root.root.string : "a local symbol");
1959 bfd_set_error (bfd_error_bad_value);
1960 return FALSE;
1961 }
1962 /* Fall through. */
1963
70256ad8
AJ
1964 case R_X86_64_8:
1965 case R_X86_64_16:
1966 case R_X86_64_32:
6b3db546 1967 case R_X86_64_64:
80643fbc 1968 /* FIXME: The ABI says the linker should make sure the value is
407443a3 1969 the same when it's zeroextended to 64 bit. */
c434dee6
AJ
1970
1971 /* r_symndx will be zero only for relocs against symbols
1972 from removed linkonce sections, or sections discarded by
1973 a linker script. */
1974 if (r_symndx == 0
1975 || (input_section->flags & SEC_ALLOC) == 0)
1976 break;
1977
1978 if ((info->shared
4bc6e03a
AJ
1979 && (h == NULL
1980 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1981 || h->root.type != bfd_link_hash_undefweak)
c434dee6
AJ
1982 && ((r_type != R_X86_64_PC8
1983 && r_type != R_X86_64_PC16
1984 && r_type != R_X86_64_PC32)
f6c52c13 1985 || !SYMBOL_CALLS_LOCAL (info, h)))
d40d037c
AJ
1986 || (ELIMINATE_COPY_RELOCS
1987 && !info->shared
c434dee6
AJ
1988 && h != NULL
1989 && h->dynindx != -1
1990 && (h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
1991 && (((h->elf_link_hash_flags
1992 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1993 && (h->elf_link_hash_flags
1994 & ELF_LINK_HASH_DEF_REGULAR) == 0)
1995 || h->root.type == bfd_link_hash_undefweak
1996 || h->root.type == bfd_link_hash_undefined)))
70256ad8
AJ
1997 {
1998 Elf_Internal_Rela outrel;
947216bf 1999 bfd_byte *loc;
b34976b6 2000 bfd_boolean skip, relocate;
c434dee6 2001 asection *sreloc;
70256ad8
AJ
2002
2003 /* When generating a shared object, these relocations
2004 are copied into the output file to be resolved at run
407443a3 2005 time. */
b34976b6
AM
2006 skip = FALSE;
2007 relocate = FALSE;
70256ad8 2008
c629eae0
JJ
2009 outrel.r_offset =
2010 _bfd_elf_section_offset (output_bfd, info, input_section,
c434dee6 2011 rel->r_offset);
c629eae0 2012 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 2013 skip = TRUE;
0fb19cbc 2014 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 2015 skip = TRUE, relocate = TRUE;
70256ad8
AJ
2016
2017 outrel.r_offset += (input_section->output_section->vma
2018 + input_section->output_offset);
2019
2020 if (skip)
0bb2d96a 2021 memset (&outrel, 0, sizeof outrel);
c434dee6 2022
fd8ab9e5
AJ
2023 /* h->dynindx may be -1 if this symbol was marked to
2024 become local. */
2025 else if (h != NULL
c434dee6
AJ
2026 && h->dynindx != -1
2027 && (r_type == R_X86_64_PC8
2028 || r_type == R_X86_64_PC16
2029 || r_type == R_X86_64_PC32
2030 || !info->shared
2031 || !info->symbolic
fd8ab9e5
AJ
2032 || (h->elf_link_hash_flags
2033 & ELF_LINK_HASH_DEF_REGULAR) == 0))
70256ad8 2034 {
70256ad8 2035 outrel.r_info = ELF64_R_INFO (h->dynindx, r_type);
c434dee6 2036 outrel.r_addend = rel->r_addend;
70256ad8
AJ
2037 }
2038 else
2039 {
c434dee6 2040 /* This symbol is local, or marked to become local. */
607c0e09
AS
2041 if (r_type == R_X86_64_64)
2042 {
b34976b6 2043 relocate = TRUE;
607c0e09
AS
2044 outrel.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
2045 outrel.r_addend = relocation + rel->r_addend;
2046 }
2047 else
2048 {
2049 long sindx;
2050
8517fae7 2051 if (bfd_is_abs_section (sec))
607c0e09
AS
2052 sindx = 0;
2053 else if (sec == NULL || sec->owner == NULL)
2054 {
2055 bfd_set_error (bfd_error_bad_value);
b34976b6 2056 return FALSE;
607c0e09
AS
2057 }
2058 else
2059 {
2060 asection *osec;
2061
2062 osec = sec->output_section;
2063 sindx = elf_section_data (osec)->dynindx;
2064 BFD_ASSERT (sindx > 0);
2065 }
2066
2067 outrel.r_info = ELF64_R_INFO (sindx, r_type);
2068 outrel.r_addend = relocation + rel->r_addend;
2069 }
70256ad8
AJ
2070 }
2071
c434dee6
AJ
2072 sreloc = elf_section_data (input_section)->sreloc;
2073 if (sreloc == NULL)
2074 abort ();
2075
947216bf
AM
2076 loc = sreloc->contents;
2077 loc += sreloc->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 2078 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
70256ad8
AJ
2079
2080 /* If this reloc is against an external symbol, we do
2081 not want to fiddle with the addend. Otherwise, we
2082 need to include the symbol value so that it becomes
2083 an addend for the dynamic reloc. */
2084 if (! relocate)
2085 continue;
2086 }
2087
2088 break;
2089
bffbf940
JJ
2090 case R_X86_64_TLSGD:
2091 case R_X86_64_GOTTPOFF:
2092 r_type = elf64_x86_64_tls_transition (info, r_type, h == NULL);
2093 tls_type = GOT_UNKNOWN;
2094 if (h == NULL && local_got_offsets)
2095 tls_type = elf64_x86_64_local_got_tls_type (input_bfd) [r_symndx];
2096 else if (h != NULL)
2097 {
2098 tls_type = elf64_x86_64_hash_entry (h)->tls_type;
2099 if (!info->shared && h->dynindx == -1 && tls_type == GOT_TLS_IE)
2100 r_type = R_X86_64_TPOFF32;
2101 }
2102 if (r_type == R_X86_64_TLSGD)
2103 {
2104 if (tls_type == GOT_TLS_IE)
2105 r_type = R_X86_64_GOTTPOFF;
2106 }
2107
2108 if (r_type == R_X86_64_TPOFF32)
2109 {
2110 BFD_ASSERT (! unresolved_reloc);
2111 if (ELF64_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
2112 {
2113 unsigned int i;
abcf1d52
JJ
2114 static unsigned char tlsgd[8]
2115 = { 0x66, 0x48, 0x8d, 0x3d, 0x66, 0x66, 0x48, 0xe8 };
bffbf940
JJ
2116
2117 /* GD->LE transition.
abcf1d52
JJ
2118 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
2119 .word 0x6666; rex64; call __tls_get_addr@plt
bffbf940
JJ
2120 Change it into:
2121 movq %fs:0, %rax
2122 leaq foo@tpoff(%rax), %rax */
abcf1d52
JJ
2123 BFD_ASSERT (rel->r_offset >= 4);
2124 for (i = 0; i < 4; i++)
bffbf940 2125 BFD_ASSERT (bfd_get_8 (input_bfd,
abcf1d52 2126 contents + rel->r_offset - 4 + i)
bffbf940 2127 == tlsgd[i]);
eea6121a 2128 BFD_ASSERT (rel->r_offset + 12 <= input_section->size);
abcf1d52
JJ
2129 for (i = 0; i < 4; i++)
2130 BFD_ASSERT (bfd_get_8 (input_bfd,
2131 contents + rel->r_offset + 4 + i)
2132 == tlsgd[i+4]);
bffbf940
JJ
2133 BFD_ASSERT (rel + 1 < relend);
2134 BFD_ASSERT (ELF64_R_TYPE (rel[1].r_info) == R_X86_64_PLT32);
abcf1d52 2135 memcpy (contents + rel->r_offset - 4,
bffbf940
JJ
2136 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
2137 16);
2138 bfd_put_32 (output_bfd, tpoff (info, relocation),
abcf1d52 2139 contents + rel->r_offset + 8);
bffbf940
JJ
2140 /* Skip R_X86_64_PLT32. */
2141 rel++;
2142 continue;
2143 }
2144 else
2145 {
2146 unsigned int val, type, reg;
2147
2148 /* IE->LE transition:
2149 Originally it can be one of:
2150 movq foo@gottpoff(%rip), %reg
2151 addq foo@gottpoff(%rip), %reg
2152 We change it into:
2153 movq $foo, %reg
2154 leaq foo(%reg), %reg
2155 addq $foo, %reg. */
2156 BFD_ASSERT (rel->r_offset >= 3);
2157 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 3);
2158 BFD_ASSERT (val == 0x48 || val == 0x4c);
2159 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
2160 BFD_ASSERT (type == 0x8b || type == 0x03);
2161 reg = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
2162 BFD_ASSERT ((reg & 0xc7) == 5);
2163 reg >>= 3;
eea6121a 2164 BFD_ASSERT (rel->r_offset + 4 <= input_section->size);
bffbf940
JJ
2165 if (type == 0x8b)
2166 {
2167 /* movq */
2168 if (val == 0x4c)
2169 bfd_put_8 (output_bfd, 0x49,
2170 contents + rel->r_offset - 3);
2171 bfd_put_8 (output_bfd, 0xc7,
2172 contents + rel->r_offset - 2);
2173 bfd_put_8 (output_bfd, 0xc0 | reg,
2174 contents + rel->r_offset - 1);
2175 }
2176 else if (reg == 4)
2177 {
2178 /* addq -> addq - addressing with %rsp/%r12 is
2179 special */
2180 if (val == 0x4c)
2181 bfd_put_8 (output_bfd, 0x49,
2182 contents + rel->r_offset - 3);
2183 bfd_put_8 (output_bfd, 0x81,
2184 contents + rel->r_offset - 2);
2185 bfd_put_8 (output_bfd, 0xc0 | reg,
2186 contents + rel->r_offset - 1);
2187 }
2188 else
2189 {
2190 /* addq -> leaq */
2191 if (val == 0x4c)
2192 bfd_put_8 (output_bfd, 0x4d,
2193 contents + rel->r_offset - 3);
2194 bfd_put_8 (output_bfd, 0x8d,
2195 contents + rel->r_offset - 2);
2196 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
2197 contents + rel->r_offset - 1);
2198 }
2199 bfd_put_32 (output_bfd, tpoff (info, relocation),
2200 contents + rel->r_offset);
2201 continue;
2202 }
2203 }
2204
2205 if (htab->sgot == NULL)
2206 abort ();
2207
2208 if (h != NULL)
2209 off = h->got.offset;
2210 else
2211 {
2212 if (local_got_offsets == NULL)
2213 abort ();
2214
2215 off = local_got_offsets[r_symndx];
2216 }
2217
2218 if ((off & 1) != 0)
2219 off &= ~1;
26e41594 2220 else
bffbf940
JJ
2221 {
2222 Elf_Internal_Rela outrel;
947216bf 2223 bfd_byte *loc;
bffbf940
JJ
2224 int dr_type, indx;
2225
2226 if (htab->srelgot == NULL)
2227 abort ();
2228
2229 outrel.r_offset = (htab->sgot->output_section->vma
2230 + htab->sgot->output_offset + off);
2231
2232 indx = h && h->dynindx != -1 ? h->dynindx : 0;
2233 if (r_type == R_X86_64_TLSGD)
2234 dr_type = R_X86_64_DTPMOD64;
2235 else
2236 dr_type = R_X86_64_TPOFF64;
2237
2238 bfd_put_64 (output_bfd, 0, htab->sgot->contents + off);
2239 outrel.r_addend = 0;
2240 if (dr_type == R_X86_64_TPOFF64 && indx == 0)
2241 outrel.r_addend = relocation - dtpoff_base (info);
2242 outrel.r_info = ELF64_R_INFO (indx, dr_type);
2243
947216bf
AM
2244 loc = htab->srelgot->contents;
2245 loc += htab->srelgot->reloc_count++ * sizeof (Elf64_External_Rela);
bffbf940
JJ
2246 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
2247
2248 if (r_type == R_X86_64_TLSGD)
2249 {
2250 if (indx == 0)
2251 {
d40d037c 2252 BFD_ASSERT (! unresolved_reloc);
bffbf940
JJ
2253 bfd_put_64 (output_bfd,
2254 relocation - dtpoff_base (info),
2255 htab->sgot->contents + off + GOT_ENTRY_SIZE);
2256 }
2257 else
2258 {
2259 bfd_put_64 (output_bfd, 0,
2260 htab->sgot->contents + off + GOT_ENTRY_SIZE);
2261 outrel.r_info = ELF64_R_INFO (indx,
2262 R_X86_64_DTPOFF64);
2263 outrel.r_offset += GOT_ENTRY_SIZE;
2264 htab->srelgot->reloc_count++;
947216bf
AM
2265 loc += sizeof (Elf64_External_Rela);
2266 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
bffbf940
JJ
2267 }
2268 }
2269
2270 if (h != NULL)
2271 h->got.offset |= 1;
2272 else
2273 local_got_offsets[r_symndx] |= 1;
2274 }
2275
2276 if (off >= (bfd_vma) -2)
2277 abort ();
2278 if (r_type == ELF64_R_TYPE (rel->r_info))
2279 {
2280 relocation = htab->sgot->output_section->vma
2281 + htab->sgot->output_offset + off;
b34976b6 2282 unresolved_reloc = FALSE;
bffbf940
JJ
2283 }
2284 else
2285 {
2286 unsigned int i;
abcf1d52
JJ
2287 static unsigned char tlsgd[8]
2288 = { 0x66, 0x48, 0x8d, 0x3d, 0x66, 0x66, 0x48, 0xe8 };
bffbf940
JJ
2289
2290 /* GD->IE transition.
abcf1d52
JJ
2291 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
2292 .word 0x6666; rex64; call __tls_get_addr@plt
bffbf940
JJ
2293 Change it into:
2294 movq %fs:0, %rax
2295 addq foo@gottpoff(%rip), %rax */
abcf1d52
JJ
2296 BFD_ASSERT (rel->r_offset >= 4);
2297 for (i = 0; i < 4; i++)
26e41594 2298 BFD_ASSERT (bfd_get_8 (input_bfd,
abcf1d52 2299 contents + rel->r_offset - 4 + i)
bffbf940 2300 == tlsgd[i]);
eea6121a 2301 BFD_ASSERT (rel->r_offset + 12 <= input_section->size);
abcf1d52 2302 for (i = 0; i < 4; i++)
26e41594 2303 BFD_ASSERT (bfd_get_8 (input_bfd,
abcf1d52
JJ
2304 contents + rel->r_offset + 4 + i)
2305 == tlsgd[i+4]);
bffbf940
JJ
2306 BFD_ASSERT (rel + 1 < relend);
2307 BFD_ASSERT (ELF64_R_TYPE (rel[1].r_info) == R_X86_64_PLT32);
abcf1d52 2308 memcpy (contents + rel->r_offset - 4,
bffbf940
JJ
2309 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
2310 16);
2311
2312 relocation = (htab->sgot->output_section->vma
2313 + htab->sgot->output_offset + off
2314 - rel->r_offset
2315 - input_section->output_section->vma
2316 - input_section->output_offset
abcf1d52 2317 - 12);
bffbf940 2318 bfd_put_32 (output_bfd, relocation,
abcf1d52 2319 contents + rel->r_offset + 8);
bffbf940
JJ
2320 /* Skip R_X86_64_PLT32. */
2321 rel++;
2322 continue;
2323 }
2324 break;
2325
2326 case R_X86_64_TLSLD:
2327 if (! info->shared)
2328 {
2329 /* LD->LE transition:
2330 Ensure it is:
2331 leaq foo@tlsld(%rip), %rdi; call __tls_get_addr@plt.
2332 We change it into:
2333 .word 0x6666; .byte 0x66; movl %fs:0, %rax. */
2334 BFD_ASSERT (rel->r_offset >= 3);
2335 BFD_ASSERT (bfd_get_8 (input_bfd, contents + rel->r_offset - 3)
2336 == 0x48);
2337 BFD_ASSERT (bfd_get_8 (input_bfd, contents + rel->r_offset - 2)
2338 == 0x8d);
2339 BFD_ASSERT (bfd_get_8 (input_bfd, contents + rel->r_offset - 1)
2340 == 0x3d);
eea6121a 2341 BFD_ASSERT (rel->r_offset + 9 <= input_section->size);
bffbf940
JJ
2342 BFD_ASSERT (bfd_get_8 (input_bfd, contents + rel->r_offset + 4)
2343 == 0xe8);
2344 BFD_ASSERT (rel + 1 < relend);
2345 BFD_ASSERT (ELF64_R_TYPE (rel[1].r_info) == R_X86_64_PLT32);
2346 memcpy (contents + rel->r_offset - 3,
2347 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
2348 /* Skip R_X86_64_PLT32. */
2349 rel++;
2350 continue;
2351 }
2352
2353 if (htab->sgot == NULL)
2354 abort ();
2355
2356 off = htab->tls_ld_got.offset;
2357 if (off & 1)
2358 off &= ~1;
2359 else
2360 {
2361 Elf_Internal_Rela outrel;
947216bf 2362 bfd_byte *loc;
bffbf940
JJ
2363
2364 if (htab->srelgot == NULL)
2365 abort ();
2366
2367 outrel.r_offset = (htab->sgot->output_section->vma
2368 + htab->sgot->output_offset + off);
2369
2370 bfd_put_64 (output_bfd, 0,
2371 htab->sgot->contents + off);
2372 bfd_put_64 (output_bfd, 0,
2373 htab->sgot->contents + off + GOT_ENTRY_SIZE);
2374 outrel.r_info = ELF64_R_INFO (0, R_X86_64_DTPMOD64);
2375 outrel.r_addend = 0;
947216bf
AM
2376 loc = htab->srelgot->contents;
2377 loc += htab->srelgot->reloc_count++ * sizeof (Elf64_External_Rela);
bffbf940
JJ
2378 bfd_elf64_swap_reloca_out (output_bfd, &outrel, loc);
2379 htab->tls_ld_got.offset |= 1;
2380 }
2381 relocation = htab->sgot->output_section->vma
2382 + htab->sgot->output_offset + off;
b34976b6 2383 unresolved_reloc = FALSE;
bffbf940
JJ
2384 break;
2385
2386 case R_X86_64_DTPOFF32:
a45bb67d 2387 if (info->shared || (input_section->flags & SEC_CODE) == 0)
bffbf940
JJ
2388 relocation -= dtpoff_base (info);
2389 else
2390 relocation = tpoff (info, relocation);
2391 break;
2392
2393 case R_X86_64_TPOFF32:
2394 BFD_ASSERT (! info->shared);
2395 relocation = tpoff (info, relocation);
2396 break;
2397
70256ad8
AJ
2398 default:
2399 break;
2400 }
8d88c4ca 2401
239e1f3a
AM
2402 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
2403 because such sections are not SEC_ALLOC and thus ld.so will
2404 not process them. */
c434dee6 2405 if (unresolved_reloc
239e1f3a 2406 && !((input_section->flags & SEC_DEBUGGING) != 0
c434dee6
AJ
2407 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
2408 (*_bfd_error_handler)
d003868e
AM
2409 (_("%B(%A+0x%lx): unresolvable relocation against symbol `%s'"),
2410 input_bfd,
2411 input_section,
c434dee6
AJ
2412 (long) rel->r_offset,
2413 h->root.root.string);
2414
8d88c4ca 2415 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
c434dee6
AJ
2416 contents, rel->r_offset,
2417 relocation, rel->r_addend);
8d88c4ca
NC
2418
2419 if (r != bfd_reloc_ok)
8da6118f 2420 {
c434dee6
AJ
2421 const char *name;
2422
2423 if (h != NULL)
2424 name = h->root.root.string;
2425 else
8da6118f 2426 {
c434dee6
AJ
2427 name = bfd_elf_string_from_elf_section (input_bfd,
2428 symtab_hdr->sh_link,
2429 sym->st_name);
2430 if (name == NULL)
b34976b6 2431 return FALSE;
c434dee6
AJ
2432 if (*name == '\0')
2433 name = bfd_section_name (input_bfd, sec);
2434 }
2435
2436 if (r == bfd_reloc_overflow)
2437 {
3ffa5234
AM
2438 if (h != NULL
2439 && h->root.type == bfd_link_hash_undefweak
2440 && howto->pc_relative)
2441 /* Ignore reloc overflow on branches to undefweak syms. */
2442 continue;
c434dee6
AJ
2443
2444 if (! ((*info->callbacks->reloc_overflow)
2445 (info, name, howto->name, (bfd_vma) 0,
2446 input_bfd, input_section, rel->r_offset)))
b34976b6 2447 return FALSE;
c434dee6
AJ
2448 }
2449 else
2450 {
2451 (*_bfd_error_handler)
d003868e
AM
2452 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
2453 input_bfd, input_section,
c434dee6 2454 (long) rel->r_offset, name, (int) r);
b34976b6 2455 return FALSE;
8da6118f
KH
2456 }
2457 }
8d88c4ca 2458 }
70256ad8 2459
b34976b6 2460 return TRUE;
70256ad8
AJ
2461}
2462
2463/* Finish up dynamic symbol handling. We set the contents of various
2464 dynamic sections here. */
2465
b34976b6 2466static bfd_boolean
27482721
AJ
2467elf64_x86_64_finish_dynamic_symbol (bfd *output_bfd,
2468 struct bfd_link_info *info,
2469 struct elf_link_hash_entry *h,
2470 Elf_Internal_Sym *sym)
70256ad8 2471{
c434dee6 2472 struct elf64_x86_64_link_hash_table *htab;
70256ad8 2473
c434dee6 2474 htab = elf64_x86_64_hash_table (info);
70256ad8
AJ
2475
2476 if (h->plt.offset != (bfd_vma) -1)
2477 {
70256ad8
AJ
2478 bfd_vma plt_index;
2479 bfd_vma got_offset;
2480 Elf_Internal_Rela rela;
947216bf 2481 bfd_byte *loc;
70256ad8
AJ
2482
2483 /* This symbol has an entry in the procedure linkage table. Set
407443a3 2484 it up. */
c434dee6
AJ
2485 if (h->dynindx == -1
2486 || htab->splt == NULL
2487 || htab->sgotplt == NULL
2488 || htab->srelplt == NULL)
2489 abort ();
70256ad8
AJ
2490
2491 /* Get the index in the procedure linkage table which
2492 corresponds to this symbol. This is the index of this symbol
2493 in all the symbols for which we are making plt entries. The
2494 first entry in the procedure linkage table is reserved. */
2495 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
2496
2497 /* Get the offset into the .got table of the entry that
407443a3 2498 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
fe4770f4 2499 bytes. The first three are reserved for the dynamic linker. */
70256ad8
AJ
2500 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
2501
2502 /* Fill in the entry in the procedure linkage table. */
c434dee6 2503 memcpy (htab->splt->contents + h->plt.offset, elf64_x86_64_plt_entry,
70256ad8
AJ
2504 PLT_ENTRY_SIZE);
2505
2506 /* Insert the relocation positions of the plt section. The magic
2507 numbers at the end of the statements are the positions of the
2508 relocations in the plt section. */
653165cc
AJ
2509 /* Put offset for jmp *name@GOTPCREL(%rip), since the
2510 instruction uses 6 bytes, subtract this value. */
2511 bfd_put_32 (output_bfd,
c434dee6
AJ
2512 (htab->sgotplt->output_section->vma
2513 + htab->sgotplt->output_offset
653165cc 2514 + got_offset
c434dee6
AJ
2515 - htab->splt->output_section->vma
2516 - htab->splt->output_offset
653165cc
AJ
2517 - h->plt.offset
2518 - 6),
c434dee6 2519 htab->splt->contents + h->plt.offset + 2);
653165cc
AJ
2520 /* Put relocation index. */
2521 bfd_put_32 (output_bfd, plt_index,
c434dee6 2522 htab->splt->contents + h->plt.offset + 7);
653165cc
AJ
2523 /* Put offset for jmp .PLT0. */
2524 bfd_put_32 (output_bfd, - (h->plt.offset + PLT_ENTRY_SIZE),
c434dee6 2525 htab->splt->contents + h->plt.offset + 12);
70256ad8 2526
653165cc
AJ
2527 /* Fill in the entry in the global offset table, initially this
2528 points to the pushq instruction in the PLT which is at offset 6. */
c434dee6
AJ
2529 bfd_put_64 (output_bfd, (htab->splt->output_section->vma
2530 + htab->splt->output_offset
70256ad8 2531 + h->plt.offset + 6),
c434dee6 2532 htab->sgotplt->contents + got_offset);
70256ad8
AJ
2533
2534 /* Fill in the entry in the .rela.plt section. */
c434dee6
AJ
2535 rela.r_offset = (htab->sgotplt->output_section->vma
2536 + htab->sgotplt->output_offset
70256ad8
AJ
2537 + got_offset);
2538 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_JUMP_SLOT);
2539 rela.r_addend = 0;
947216bf 2540 loc = htab->srelplt->contents + plt_index * sizeof (Elf64_External_Rela);
c434dee6 2541 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
70256ad8
AJ
2542
2543 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
2544 {
2545 /* Mark the symbol as undefined, rather than as defined in
47a9f7b3
JJ
2546 the .plt section. Leave the value if there were any
2547 relocations where pointer equality matters (this is a clue
c434dee6
AJ
2548 for the dynamic linker, to make function pointer
2549 comparisons work between an application and shared
47a9f7b3
JJ
2550 library), otherwise set it to zero. If a function is only
2551 called from a binary, there is no need to slow down
2552 shared libraries because of that. */
70256ad8 2553 sym->st_shndx = SHN_UNDEF;
47a9f7b3
JJ
2554 if ((h->elf_link_hash_flags & ELF_LINK_POINTER_EQUALITY_NEEDED) == 0)
2555 sym->st_value = 0;
70256ad8
AJ
2556 }
2557 }
2558
bffbf940
JJ
2559 if (h->got.offset != (bfd_vma) -1
2560 && elf64_x86_64_hash_entry (h)->tls_type != GOT_TLS_GD
2561 && elf64_x86_64_hash_entry (h)->tls_type != GOT_TLS_IE)
053579d7 2562 {
053579d7 2563 Elf_Internal_Rela rela;
947216bf 2564 bfd_byte *loc;
053579d7
AJ
2565
2566 /* This symbol has an entry in the global offset table. Set it
bffbf940 2567 up. */
c434dee6
AJ
2568 if (htab->sgot == NULL || htab->srelgot == NULL)
2569 abort ();
053579d7 2570
c434dee6
AJ
2571 rela.r_offset = (htab->sgot->output_section->vma
2572 + htab->sgot->output_offset
dc810e39 2573 + (h->got.offset &~ (bfd_vma) 1));
053579d7
AJ
2574
2575 /* If this is a static link, or it is a -Bsymbolic link and the
2576 symbol is defined locally or was forced to be local because
2577 of a version file, we just want to emit a RELATIVE reloc.
2578 The entry in the global offset table will already have been
2579 initialized in the relocate_section function. */
c434dee6 2580 if (info->shared
27482721 2581 && SYMBOL_REFERENCES_LOCAL (info, h))
053579d7 2582 {
cc78d0af 2583 BFD_ASSERT((h->got.offset & 1) != 0);
053579d7
AJ
2584 rela.r_info = ELF64_R_INFO (0, R_X86_64_RELATIVE);
2585 rela.r_addend = (h->root.u.def.value
2586 + h->root.u.def.section->output_section->vma
2587 + h->root.u.def.section->output_offset);
2588 }
2589 else
2590 {
2591 BFD_ASSERT((h->got.offset & 1) == 0);
c434dee6
AJ
2592 bfd_put_64 (output_bfd, (bfd_vma) 0,
2593 htab->sgot->contents + h->got.offset);
053579d7
AJ
2594 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_GLOB_DAT);
2595 rela.r_addend = 0;
2596 }
2597
947216bf
AM
2598 loc = htab->srelgot->contents;
2599 loc += htab->srelgot->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 2600 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
053579d7
AJ
2601 }
2602
70256ad8
AJ
2603 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
2604 {
70256ad8 2605 Elf_Internal_Rela rela;
947216bf 2606 bfd_byte *loc;
70256ad8
AJ
2607
2608 /* This symbol needs a copy reloc. Set it up. */
2609
c434dee6
AJ
2610 if (h->dynindx == -1
2611 || (h->root.type != bfd_link_hash_defined
2612 && h->root.type != bfd_link_hash_defweak)
2613 || htab->srelbss == NULL)
2614 abort ();
70256ad8
AJ
2615
2616 rela.r_offset = (h->root.u.def.value
2617 + h->root.u.def.section->output_section->vma
2618 + h->root.u.def.section->output_offset);
2619 rela.r_info = ELF64_R_INFO (h->dynindx, R_X86_64_COPY);
2620 rela.r_addend = 0;
947216bf
AM
2621 loc = htab->srelbss->contents;
2622 loc += htab->srelbss->reloc_count++ * sizeof (Elf64_External_Rela);
c434dee6 2623 bfd_elf64_swap_reloca_out (output_bfd, &rela, loc);
70256ad8
AJ
2624 }
2625
2626 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2627 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2628 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2629 sym->st_shndx = SHN_ABS;
2630
b34976b6 2631 return TRUE;
70256ad8
AJ
2632}
2633
c434dee6
AJ
2634/* Used to decide how to sort relocs in an optimal manner for the
2635 dynamic linker, before writing them out. */
2636
2637static enum elf_reloc_type_class
27482721 2638elf64_x86_64_reloc_type_class (const Elf_Internal_Rela *rela)
c434dee6
AJ
2639{
2640 switch ((int) ELF64_R_TYPE (rela->r_info))
2641 {
2642 case R_X86_64_RELATIVE:
2643 return reloc_class_relative;
2644 case R_X86_64_JUMP_SLOT:
2645 return reloc_class_plt;
2646 case R_X86_64_COPY:
2647 return reloc_class_copy;
2648 default:
2649 return reloc_class_normal;
2650 }
2651}
2652
70256ad8
AJ
2653/* Finish up the dynamic sections. */
2654
b34976b6 2655static bfd_boolean
27482721 2656elf64_x86_64_finish_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
70256ad8 2657{
c434dee6 2658 struct elf64_x86_64_link_hash_table *htab;
70256ad8
AJ
2659 bfd *dynobj;
2660 asection *sdyn;
70256ad8 2661
c434dee6
AJ
2662 htab = elf64_x86_64_hash_table (info);
2663 dynobj = htab->elf.dynobj;
70256ad8
AJ
2664 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2665
c434dee6 2666 if (htab->elf.dynamic_sections_created)
70256ad8 2667 {
70256ad8
AJ
2668 Elf64_External_Dyn *dyncon, *dynconend;
2669
c434dee6
AJ
2670 if (sdyn == NULL || htab->sgot == NULL)
2671 abort ();
70256ad8
AJ
2672
2673 dyncon = (Elf64_External_Dyn *) sdyn->contents;
eea6121a 2674 dynconend = (Elf64_External_Dyn *) (sdyn->contents + sdyn->size);
70256ad8
AJ
2675 for (; dyncon < dynconend; dyncon++)
2676 {
2677 Elf_Internal_Dyn dyn;
70256ad8
AJ
2678 asection *s;
2679
2680 bfd_elf64_swap_dyn_in (dynobj, dyncon, &dyn);
2681
2682 switch (dyn.d_tag)
2683 {
2684 default:
053579d7 2685 continue;
70256ad8
AJ
2686
2687 case DT_PLTGOT:
8c37241b
JJ
2688 s = htab->sgotplt;
2689 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
c434dee6 2690 break;
70256ad8
AJ
2691
2692 case DT_JMPREL:
c434dee6
AJ
2693 dyn.d_un.d_ptr = htab->srelplt->output_section->vma;
2694 break;
70256ad8 2695
c434dee6
AJ
2696 case DT_PLTRELSZ:
2697 s = htab->srelplt->output_section;
eea6121a 2698 dyn.d_un.d_val = s->size;
70256ad8
AJ
2699 break;
2700
2701 case DT_RELASZ:
c434dee6
AJ
2702 /* The procedure linkage table relocs (DT_JMPREL) should
2703 not be included in the overall relocs (DT_RELA).
2704 Therefore, we override the DT_RELASZ entry here to
2705 make it not include the JMPREL relocs. Since the
2706 linker script arranges for .rela.plt to follow all
2707 other relocation sections, we don't have to worry
2708 about changing the DT_RELA entry. */
2709 if (htab->srelplt != NULL)
70256ad8 2710 {
c434dee6 2711 s = htab->srelplt->output_section;
eea6121a 2712 dyn.d_un.d_val -= s->size;
70256ad8
AJ
2713 }
2714 break;
70256ad8 2715 }
c434dee6 2716
70256ad8
AJ
2717 bfd_elf64_swap_dyn_out (output_bfd, &dyn, dyncon);
2718 }
2719
c434dee6 2720 /* Fill in the special first entry in the procedure linkage table. */
eea6121a 2721 if (htab->splt && htab->splt->size > 0)
70256ad8 2722 {
653165cc 2723 /* Fill in the first entry in the procedure linkage table. */
c434dee6
AJ
2724 memcpy (htab->splt->contents, elf64_x86_64_plt0_entry,
2725 PLT_ENTRY_SIZE);
653165cc
AJ
2726 /* Add offset for pushq GOT+8(%rip), since the instruction
2727 uses 6 bytes subtract this value. */
2728 bfd_put_32 (output_bfd,
c434dee6
AJ
2729 (htab->sgotplt->output_section->vma
2730 + htab->sgotplt->output_offset
653165cc 2731 + 8
c434dee6
AJ
2732 - htab->splt->output_section->vma
2733 - htab->splt->output_offset
653165cc 2734 - 6),
c434dee6 2735 htab->splt->contents + 2);
653165cc
AJ
2736 /* Add offset for jmp *GOT+16(%rip). The 12 is the offset to
2737 the end of the instruction. */
2738 bfd_put_32 (output_bfd,
c434dee6
AJ
2739 (htab->sgotplt->output_section->vma
2740 + htab->sgotplt->output_offset
653165cc 2741 + 16
c434dee6
AJ
2742 - htab->splt->output_section->vma
2743 - htab->splt->output_offset
653165cc 2744 - 12),
c434dee6 2745 htab->splt->contents + 8);
653165cc 2746
c434dee6
AJ
2747 elf_section_data (htab->splt->output_section)->this_hdr.sh_entsize =
2748 PLT_ENTRY_SIZE;
70256ad8 2749 }
70256ad8
AJ
2750 }
2751
c434dee6 2752 if (htab->sgotplt)
70256ad8 2753 {
c434dee6 2754 /* Fill in the first three entries in the global offset table. */
eea6121a 2755 if (htab->sgotplt->size > 0)
c434dee6
AJ
2756 {
2757 /* Set the first entry in the global offset table to the address of
2758 the dynamic section. */
2759 if (sdyn == NULL)
2760 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents);
2761 else
2762 bfd_put_64 (output_bfd,
2763 sdyn->output_section->vma + sdyn->output_offset,
2764 htab->sgotplt->contents);
2765 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
2766 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + GOT_ENTRY_SIZE);
2767 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + GOT_ENTRY_SIZE*2);
2768 }
70256ad8 2769
c434dee6
AJ
2770 elf_section_data (htab->sgotplt->output_section)->this_hdr.sh_entsize =
2771 GOT_ENTRY_SIZE;
2772 }
70256ad8 2773
eea6121a 2774 if (htab->sgot && htab->sgot->size > 0)
8c37241b
JJ
2775 elf_section_data (htab->sgot->output_section)->this_hdr.sh_entsize
2776 = GOT_ENTRY_SIZE;
2777
b34976b6 2778 return TRUE;
8d88c4ca
NC
2779}
2780
4c45e5c9
JJ
2781/* Return address for Ith PLT stub in section PLT, for relocation REL
2782 or (bfd_vma) -1 if it should not be included. */
2783
2784static bfd_vma
2785elf64_x86_64_plt_sym_val (bfd_vma i, const asection *plt,
2786 const arelent *rel ATTRIBUTE_UNUSED)
2787{
2788 return plt->vma + (i + 1) * PLT_ENTRY_SIZE;
2789}
8df9fc9d 2790
70256ad8
AJ
2791#define TARGET_LITTLE_SYM bfd_elf64_x86_64_vec
2792#define TARGET_LITTLE_NAME "elf64-x86-64"
2793#define ELF_ARCH bfd_arch_i386
2794#define ELF_MACHINE_CODE EM_X86_64
2795#define ELF_MAXPAGESIZE 0x100000
2796
2797#define elf_backend_can_gc_sections 1
51b64d56 2798#define elf_backend_can_refcount 1
70256ad8
AJ
2799#define elf_backend_want_got_plt 1
2800#define elf_backend_plt_readonly 1
2801#define elf_backend_want_plt_sym 0
2802#define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
b491616a 2803#define elf_backend_rela_normal 1
70256ad8
AJ
2804
2805#define elf_info_to_howto elf64_x86_64_info_to_howto
70256ad8 2806
70256ad8
AJ
2807#define bfd_elf64_bfd_link_hash_table_create \
2808 elf64_x86_64_link_hash_table_create
407443a3 2809#define bfd_elf64_bfd_reloc_type_lookup elf64_x86_64_reloc_type_lookup
70256ad8
AJ
2810
2811#define elf_backend_adjust_dynamic_symbol elf64_x86_64_adjust_dynamic_symbol
2812#define elf_backend_check_relocs elf64_x86_64_check_relocs
c434dee6
AJ
2813#define elf_backend_copy_indirect_symbol elf64_x86_64_copy_indirect_symbol
2814#define elf_backend_create_dynamic_sections elf64_x86_64_create_dynamic_sections
2815#define elf_backend_finish_dynamic_sections elf64_x86_64_finish_dynamic_sections
70256ad8
AJ
2816#define elf_backend_finish_dynamic_symbol elf64_x86_64_finish_dynamic_symbol
2817#define elf_backend_gc_mark_hook elf64_x86_64_gc_mark_hook
2818#define elf_backend_gc_sweep_hook elf64_x86_64_gc_sweep_hook
3bab7989
ML
2819#define elf_backend_grok_prstatus elf64_x86_64_grok_prstatus
2820#define elf_backend_grok_psinfo elf64_x86_64_grok_psinfo
c434dee6 2821#define elf_backend_reloc_type_class elf64_x86_64_reloc_type_class
70256ad8
AJ
2822#define elf_backend_relocate_section elf64_x86_64_relocate_section
2823#define elf_backend_size_dynamic_sections elf64_x86_64_size_dynamic_sections
4c45e5c9 2824#define elf_backend_plt_sym_val elf64_x86_64_plt_sym_val
407443a3 2825#define elf_backend_object_p elf64_x86_64_elf_object_p
bffbf940 2826#define bfd_elf64_mkobject elf64_x86_64_mkobject
8d88c4ca
NC
2827
2828#include "elf64-target.h"