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