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