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