x86: Resolve local undefined weak symbol to 0
[binutils-gdb.git] / bfd / elf64-x86-64.c
1 /* X86-64 specific support for ELF
2 Copyright (C) 2000-2017 Free Software Foundation, Inc.
3 Contributed by Jan Hubicka <jh@suse.cz>.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
22 #include "sysdep.h"
23 #include "bfd.h"
24 #include "bfdlink.h"
25 #include "libbfd.h"
26 #include "elf-bfd.h"
27 #include "elf-nacl.h"
28 #include "bfd_stdint.h"
29 #include "objalloc.h"
30 #include "hashtab.h"
31 #include "dwarf2.h"
32 #include "libiberty.h"
33
34 #include "opcode/i386.h"
35 #include "elf/x86-64.h"
36
37 #ifdef CORE_HEADER
38 #include <stdarg.h>
39 #include CORE_HEADER
40 #endif
41
42 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
43 #define MINUS_ONE (~ (bfd_vma) 0)
44
45 /* Since both 32-bit and 64-bit x86-64 encode relocation type in the
46 identical manner, we use ELF32_R_TYPE instead of ELF64_R_TYPE to get
47 relocation type. We also use ELF_ST_TYPE instead of ELF64_ST_TYPE
48 since they are the same. */
49
50 #define ABI_64_P(abfd) \
51 (get_elf_backend_data (abfd)->s->elfclass == ELFCLASS64)
52
53 /* The relocation "howto" table. Order of fields:
54 type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
55 special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset. */
56 static reloc_howto_type x86_64_elf_howto_table[] =
57 {
58 HOWTO(R_X86_64_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
59 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
60 FALSE),
61 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
62 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
63 FALSE),
64 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
65 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
66 TRUE),
67 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
68 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
69 FALSE),
70 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
71 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
72 TRUE),
73 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
74 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
75 FALSE),
76 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
77 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
78 MINUS_ONE, FALSE),
79 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
80 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
81 MINUS_ONE, FALSE),
82 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
83 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
84 MINUS_ONE, FALSE),
85 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
86 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
87 0xffffffff, TRUE),
88 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
89 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
90 FALSE),
91 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
92 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
93 FALSE),
94 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
95 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
96 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
97 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
98 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
99 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
100 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
101 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
102 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
103 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
104 MINUS_ONE, FALSE),
105 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
106 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
107 MINUS_ONE, FALSE),
108 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
109 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
110 MINUS_ONE, FALSE),
111 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
112 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
113 0xffffffff, TRUE),
114 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
115 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
116 0xffffffff, TRUE),
117 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
118 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
119 0xffffffff, FALSE),
120 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
121 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
122 0xffffffff, TRUE),
123 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
124 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
125 0xffffffff, FALSE),
126 HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
127 bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
128 TRUE),
129 HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
130 bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
131 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
132 HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
133 bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
134 FALSE, 0xffffffff, 0xffffffff, TRUE),
135 HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
136 bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
137 FALSE),
138 HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
139 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
140 MINUS_ONE, TRUE),
141 HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
142 bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
143 FALSE, MINUS_ONE, MINUS_ONE, TRUE),
144 HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
145 bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
146 MINUS_ONE, FALSE),
147 HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
148 bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
149 MINUS_ONE, FALSE),
150 HOWTO(R_X86_64_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
151 bfd_elf_generic_reloc, "R_X86_64_SIZE32", FALSE, 0xffffffff, 0xffffffff,
152 FALSE),
153 HOWTO(R_X86_64_SIZE64, 0, 4, 64, FALSE, 0, complain_overflow_unsigned,
154 bfd_elf_generic_reloc, "R_X86_64_SIZE64", FALSE, MINUS_ONE, MINUS_ONE,
155 FALSE),
156 HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
157 complain_overflow_bitfield, bfd_elf_generic_reloc,
158 "R_X86_64_GOTPC32_TLSDESC",
159 FALSE, 0xffffffff, 0xffffffff, TRUE),
160 HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
161 complain_overflow_dont, bfd_elf_generic_reloc,
162 "R_X86_64_TLSDESC_CALL",
163 FALSE, 0, 0, FALSE),
164 HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
165 complain_overflow_bitfield, bfd_elf_generic_reloc,
166 "R_X86_64_TLSDESC",
167 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
168 HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
169 bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
170 MINUS_ONE, FALSE),
171 HOWTO(R_X86_64_RELATIVE64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
172 bfd_elf_generic_reloc, "R_X86_64_RELATIVE64", FALSE, MINUS_ONE,
173 MINUS_ONE, FALSE),
174 HOWTO(R_X86_64_PC32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
175 bfd_elf_generic_reloc, "R_X86_64_PC32_BND", FALSE, 0xffffffff, 0xffffffff,
176 TRUE),
177 HOWTO(R_X86_64_PLT32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
178 bfd_elf_generic_reloc, "R_X86_64_PLT32_BND", FALSE, 0xffffffff, 0xffffffff,
179 TRUE),
180 HOWTO(R_X86_64_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
181 bfd_elf_generic_reloc, "R_X86_64_GOTPCRELX", FALSE, 0xffffffff,
182 0xffffffff, TRUE),
183 HOWTO(R_X86_64_REX_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
184 bfd_elf_generic_reloc, "R_X86_64_REX_GOTPCRELX", FALSE, 0xffffffff,
185 0xffffffff, TRUE),
186
187 /* We have a gap in the reloc numbers here.
188 R_X86_64_standard counts the number up to this point, and
189 R_X86_64_vt_offset is the value to subtract from a reloc type of
190 R_X86_64_GNU_VT* to form an index into this table. */
191 #define R_X86_64_standard (R_X86_64_REX_GOTPCRELX + 1)
192 #define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
193
194 /* GNU extension to record C++ vtable hierarchy. */
195 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
196 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
197
198 /* GNU extension to record C++ vtable member usage. */
199 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
200 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
201 FALSE),
202
203 /* Use complain_overflow_bitfield on R_X86_64_32 for x32. */
204 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
205 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
206 FALSE)
207 };
208
209 #define IS_X86_64_PCREL_TYPE(TYPE) \
210 ( ((TYPE) == R_X86_64_PC8) \
211 || ((TYPE) == R_X86_64_PC16) \
212 || ((TYPE) == R_X86_64_PC32) \
213 || ((TYPE) == R_X86_64_PC32_BND) \
214 || ((TYPE) == R_X86_64_PC64))
215
216 /* Map BFD relocs to the x86_64 elf relocs. */
217 struct elf_reloc_map
218 {
219 bfd_reloc_code_real_type bfd_reloc_val;
220 unsigned char elf_reloc_val;
221 };
222
223 static const struct elf_reloc_map x86_64_reloc_map[] =
224 {
225 { BFD_RELOC_NONE, R_X86_64_NONE, },
226 { BFD_RELOC_64, R_X86_64_64, },
227 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
228 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
229 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
230 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
231 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
232 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
233 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
234 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
235 { BFD_RELOC_32, R_X86_64_32, },
236 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
237 { BFD_RELOC_16, R_X86_64_16, },
238 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
239 { BFD_RELOC_8, R_X86_64_8, },
240 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
241 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
242 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
243 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
244 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
245 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
246 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
247 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
248 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
249 { BFD_RELOC_64_PCREL, R_X86_64_PC64, },
250 { BFD_RELOC_X86_64_GOTOFF64, R_X86_64_GOTOFF64, },
251 { BFD_RELOC_X86_64_GOTPC32, R_X86_64_GOTPC32, },
252 { BFD_RELOC_X86_64_GOT64, R_X86_64_GOT64, },
253 { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
254 { BFD_RELOC_X86_64_GOTPC64, R_X86_64_GOTPC64, },
255 { BFD_RELOC_X86_64_GOTPLT64, R_X86_64_GOTPLT64, },
256 { BFD_RELOC_X86_64_PLTOFF64, R_X86_64_PLTOFF64, },
257 { BFD_RELOC_SIZE32, R_X86_64_SIZE32, },
258 { BFD_RELOC_SIZE64, R_X86_64_SIZE64, },
259 { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
260 { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
261 { BFD_RELOC_X86_64_TLSDESC, R_X86_64_TLSDESC, },
262 { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
263 { BFD_RELOC_X86_64_PC32_BND, R_X86_64_PC32_BND, },
264 { BFD_RELOC_X86_64_PLT32_BND, R_X86_64_PLT32_BND, },
265 { BFD_RELOC_X86_64_GOTPCRELX, R_X86_64_GOTPCRELX, },
266 { BFD_RELOC_X86_64_REX_GOTPCRELX, R_X86_64_REX_GOTPCRELX, },
267 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
268 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
269 };
270
271 static reloc_howto_type *
272 elf_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
273 {
274 unsigned i;
275
276 if (r_type == (unsigned int) R_X86_64_32)
277 {
278 if (ABI_64_P (abfd))
279 i = r_type;
280 else
281 i = ARRAY_SIZE (x86_64_elf_howto_table) - 1;
282 }
283 else if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
284 || r_type >= (unsigned int) R_X86_64_max)
285 {
286 if (r_type >= (unsigned int) R_X86_64_standard)
287 {
288 /* xgettext:c-format */
289 _bfd_error_handler (_("%B: invalid relocation type %d"),
290 abfd, (int) r_type);
291 r_type = R_X86_64_NONE;
292 }
293 i = r_type;
294 }
295 else
296 i = r_type - (unsigned int) R_X86_64_vt_offset;
297 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
298 return &x86_64_elf_howto_table[i];
299 }
300
301 /* Given a BFD reloc type, return a HOWTO structure. */
302 static reloc_howto_type *
303 elf_x86_64_reloc_type_lookup (bfd *abfd,
304 bfd_reloc_code_real_type code)
305 {
306 unsigned int i;
307
308 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
309 i++)
310 {
311 if (x86_64_reloc_map[i].bfd_reloc_val == code)
312 return elf_x86_64_rtype_to_howto (abfd,
313 x86_64_reloc_map[i].elf_reloc_val);
314 }
315 return NULL;
316 }
317
318 static reloc_howto_type *
319 elf_x86_64_reloc_name_lookup (bfd *abfd,
320 const char *r_name)
321 {
322 unsigned int i;
323
324 if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
325 {
326 /* Get x32 R_X86_64_32. */
327 reloc_howto_type *reloc
328 = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
329 BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
330 return reloc;
331 }
332
333 for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
334 if (x86_64_elf_howto_table[i].name != NULL
335 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
336 return &x86_64_elf_howto_table[i];
337
338 return NULL;
339 }
340
341 /* Given an x86_64 ELF reloc type, fill in an arelent structure. */
342
343 static void
344 elf_x86_64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
345 Elf_Internal_Rela *dst)
346 {
347 unsigned r_type;
348
349 r_type = ELF32_R_TYPE (dst->r_info);
350 cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
351 BFD_ASSERT (r_type == cache_ptr->howto->type);
352 }
353 \f
354 /* Support for core dump NOTE sections. */
355 static bfd_boolean
356 elf_x86_64_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
357 {
358 int offset;
359 size_t size;
360
361 switch (note->descsz)
362 {
363 default:
364 return FALSE;
365
366 case 296: /* sizeof(istruct elf_prstatus) on Linux/x32 */
367 /* pr_cursig */
368 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
369
370 /* pr_pid */
371 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
372
373 /* pr_reg */
374 offset = 72;
375 size = 216;
376
377 break;
378
379 case 336: /* sizeof(istruct elf_prstatus) on Linux/x86_64 */
380 /* pr_cursig */
381 elf_tdata (abfd)->core->signal
382 = bfd_get_16 (abfd, note->descdata + 12);
383
384 /* pr_pid */
385 elf_tdata (abfd)->core->lwpid
386 = bfd_get_32 (abfd, note->descdata + 32);
387
388 /* pr_reg */
389 offset = 112;
390 size = 216;
391
392 break;
393 }
394
395 /* Make a ".reg/999" section. */
396 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
397 size, note->descpos + offset);
398 }
399
400 static bfd_boolean
401 elf_x86_64_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
402 {
403 switch (note->descsz)
404 {
405 default:
406 return FALSE;
407
408 case 124: /* sizeof(struct elf_prpsinfo) on Linux/x32 */
409 elf_tdata (abfd)->core->pid
410 = bfd_get_32 (abfd, note->descdata + 12);
411 elf_tdata (abfd)->core->program
412 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
413 elf_tdata (abfd)->core->command
414 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
415 break;
416
417 case 136: /* sizeof(struct elf_prpsinfo) on Linux/x86_64 */
418 elf_tdata (abfd)->core->pid
419 = bfd_get_32 (abfd, note->descdata + 24);
420 elf_tdata (abfd)->core->program
421 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
422 elf_tdata (abfd)->core->command
423 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
424 }
425
426 /* Note that for some reason, a spurious space is tacked
427 onto the end of the args in some (at least one anyway)
428 implementations, so strip it off if it exists. */
429
430 {
431 char *command = elf_tdata (abfd)->core->command;
432 int n = strlen (command);
433
434 if (0 < n && command[n - 1] == ' ')
435 command[n - 1] = '\0';
436 }
437
438 return TRUE;
439 }
440
441 #ifdef CORE_HEADER
442 static char *
443 elf_x86_64_write_core_note (bfd *abfd, char *buf, int *bufsiz,
444 int note_type, ...)
445 {
446 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
447 va_list ap;
448 const char *fname, *psargs;
449 long pid;
450 int cursig;
451 const void *gregs;
452
453 switch (note_type)
454 {
455 default:
456 return NULL;
457
458 case NT_PRPSINFO:
459 va_start (ap, note_type);
460 fname = va_arg (ap, const char *);
461 psargs = va_arg (ap, const char *);
462 va_end (ap);
463
464 if (bed->s->elfclass == ELFCLASS32)
465 {
466 prpsinfo32_t data;
467 memset (&data, 0, sizeof (data));
468 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
469 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
470 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
471 &data, sizeof (data));
472 }
473 else
474 {
475 prpsinfo64_t data;
476 memset (&data, 0, sizeof (data));
477 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
478 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
479 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
480 &data, sizeof (data));
481 }
482 /* NOTREACHED */
483
484 case NT_PRSTATUS:
485 va_start (ap, note_type);
486 pid = va_arg (ap, long);
487 cursig = va_arg (ap, int);
488 gregs = va_arg (ap, const void *);
489 va_end (ap);
490
491 if (bed->s->elfclass == ELFCLASS32)
492 {
493 if (bed->elf_machine_code == EM_X86_64)
494 {
495 prstatusx32_t prstat;
496 memset (&prstat, 0, sizeof (prstat));
497 prstat.pr_pid = pid;
498 prstat.pr_cursig = cursig;
499 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
500 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
501 &prstat, sizeof (prstat));
502 }
503 else
504 {
505 prstatus32_t prstat;
506 memset (&prstat, 0, sizeof (prstat));
507 prstat.pr_pid = pid;
508 prstat.pr_cursig = cursig;
509 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
510 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
511 &prstat, sizeof (prstat));
512 }
513 }
514 else
515 {
516 prstatus64_t prstat;
517 memset (&prstat, 0, sizeof (prstat));
518 prstat.pr_pid = pid;
519 prstat.pr_cursig = cursig;
520 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
521 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
522 &prstat, sizeof (prstat));
523 }
524 }
525 /* NOTREACHED */
526 }
527 #endif
528 \f
529 /* Functions for the x86-64 ELF linker. */
530
531 /* The name of the dynamic interpreter. This is put in the .interp
532 section. */
533
534 #define ELF64_DYNAMIC_INTERPRETER "/lib/ld64.so.1"
535 #define ELF32_DYNAMIC_INTERPRETER "/lib/ldx32.so.1"
536
537 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
538 copying dynamic variables from a shared lib into an app's dynbss
539 section, and instead use a dynamic relocation to point into the
540 shared lib. */
541 #define ELIMINATE_COPY_RELOCS 1
542
543 /* The size in bytes of an entry in the global offset table. */
544
545 #define GOT_ENTRY_SIZE 8
546
547 /* The size in bytes of an entry in the lazy procedure linkage table. */
548
549 #define LAZY_PLT_ENTRY_SIZE 16
550
551 /* The size in bytes of an entry in the non-lazy procedure linkage
552 table. */
553
554 #define NON_LAZY_PLT_ENTRY_SIZE 8
555
556 /* The first entry in a lazy procedure linkage table looks like this.
557 See the SVR4 ABI i386 supplement and the x86-64 ABI to see how this
558 works. */
559
560 static const bfd_byte elf_x86_64_lazy_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
561 {
562 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
563 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
564 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
565 };
566
567 /* Subsequent entries in a lazy procedure linkage table look like this. */
568
569 static const bfd_byte elf_x86_64_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
570 {
571 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
572 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
573 0x68, /* pushq immediate */
574 0, 0, 0, 0, /* replaced with index into relocation table. */
575 0xe9, /* jmp relative */
576 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
577 };
578
579 /* The first entry in a lazy procedure linkage table with BND prefix
580 like this. */
581
582 static const bfd_byte elf_x86_64_lazy_bnd_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
583 {
584 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
585 0xf2, 0xff, 0x25, 16, 0, 0, 0, /* bnd jmpq *GOT+16(%rip) */
586 0x0f, 0x1f, 0 /* nopl (%rax) */
587 };
588
589 /* Subsequent entries for branches with BND prefx in a lazy procedure
590 linkage table look like this. */
591
592 static const bfd_byte elf_x86_64_lazy_bnd_plt_entry[LAZY_PLT_ENTRY_SIZE] =
593 {
594 0x68, 0, 0, 0, 0, /* pushq immediate */
595 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
596 0x0f, 0x1f, 0x44, 0, 0 /* nopl 0(%rax,%rax,1) */
597 };
598
599 /* The first entry in the IBT-enabled lazy procedure linkage table is the
600 the same as the lazy PLT with BND prefix so that bound registers are
601 preserved when control is passed to dynamic linker. Subsequent
602 entries for a IBT-enabled lazy procedure linkage table look like
603 this. */
604
605 static const bfd_byte elf_x86_64_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
606 {
607 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
608 0x68, 0, 0, 0, 0, /* pushq immediate */
609 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
610 0x90 /* nop */
611 };
612
613 /* The first entry in the x32 IBT-enabled lazy procedure linkage table
614 is the the same as the normal lazy PLT. Subsequent entries for an
615 x32 IBT-enabled lazy procedure linkage table look like this. */
616
617 static const bfd_byte elf_x32_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
618 {
619 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
620 0x68, 0, 0, 0, 0, /* pushq immediate */
621 0xe9, 0, 0, 0, 0, /* jmpq relative */
622 0x66, 0x90 /* xchg %ax,%ax */
623 };
624
625 /* Entries in the non-lazey procedure linkage table look like this. */
626
627 static const bfd_byte elf_x86_64_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
628 {
629 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
630 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
631 0x66, 0x90 /* xchg %ax,%ax */
632 };
633
634 /* Entries for branches with BND prefix in the non-lazey procedure
635 linkage table look like this. */
636
637 static const bfd_byte elf_x86_64_non_lazy_bnd_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
638 {
639 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
640 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
641 0x90 /* nop */
642 };
643
644 /* Entries for branches with IBT-enabled in the non-lazey procedure
645 linkage table look like this. They have the same size as the lazy
646 PLT entry. */
647
648 static const bfd_byte elf_x86_64_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
649 {
650 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
651 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
652 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
653 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopl 0x0(%rax,%rax,1) */
654 };
655
656 /* Entries for branches with IBT-enabled in the x32 non-lazey procedure
657 linkage table look like this. They have the same size as the lazy
658 PLT entry. */
659
660 static const bfd_byte elf_x32_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
661 {
662 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
663 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
664 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
665 0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
666 };
667
668 /* .eh_frame covering the lazy .plt section. */
669
670 static const bfd_byte elf_x86_64_eh_frame_lazy_plt[] =
671 {
672 #define PLT_CIE_LENGTH 20
673 #define PLT_FDE_LENGTH 36
674 #define PLT_FDE_START_OFFSET 4 + PLT_CIE_LENGTH + 8
675 #define PLT_FDE_LEN_OFFSET 4 + PLT_CIE_LENGTH + 12
676 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
677 0, 0, 0, 0, /* CIE ID */
678 1, /* CIE version */
679 'z', 'R', 0, /* Augmentation string */
680 1, /* Code alignment factor */
681 0x78, /* Data alignment factor */
682 16, /* Return address column */
683 1, /* Augmentation size */
684 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
685 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
686 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
687 DW_CFA_nop, DW_CFA_nop,
688
689 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
690 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
691 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
692 0, 0, 0, 0, /* .plt size goes here */
693 0, /* Augmentation size */
694 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
695 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
696 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
697 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
698 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
699 11, /* Block length */
700 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
701 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
702 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
703 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
704 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
705 };
706
707 /* .eh_frame covering the lazy BND .plt section. */
708
709 static const bfd_byte elf_x86_64_eh_frame_lazy_bnd_plt[] =
710 {
711 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
712 0, 0, 0, 0, /* CIE ID */
713 1, /* CIE version */
714 'z', 'R', 0, /* Augmentation string */
715 1, /* Code alignment factor */
716 0x78, /* Data alignment factor */
717 16, /* Return address column */
718 1, /* Augmentation size */
719 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
720 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
721 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
722 DW_CFA_nop, DW_CFA_nop,
723
724 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
725 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
726 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
727 0, 0, 0, 0, /* .plt size goes here */
728 0, /* Augmentation size */
729 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
730 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
731 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
732 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
733 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
734 11, /* Block length */
735 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
736 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
737 DW_OP_lit15, DW_OP_and, DW_OP_lit5, DW_OP_ge,
738 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
739 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
740 };
741
742 /* .eh_frame covering the lazy .plt section with IBT-enabled. */
743
744 static const bfd_byte elf_x86_64_eh_frame_lazy_ibt_plt[] =
745 {
746 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
747 0, 0, 0, 0, /* CIE ID */
748 1, /* CIE version */
749 'z', 'R', 0, /* Augmentation string */
750 1, /* Code alignment factor */
751 0x78, /* Data alignment factor */
752 16, /* Return address column */
753 1, /* Augmentation size */
754 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
755 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
756 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
757 DW_CFA_nop, DW_CFA_nop,
758
759 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
760 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
761 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
762 0, 0, 0, 0, /* .plt size goes here */
763 0, /* Augmentation size */
764 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
765 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
766 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
767 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
768 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
769 11, /* Block length */
770 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
771 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
772 DW_OP_lit15, DW_OP_and, DW_OP_lit10, DW_OP_ge,
773 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
774 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
775 };
776
777 /* .eh_frame covering the x32 lazy .plt section with IBT-enabled. */
778
779 static const bfd_byte elf_x32_eh_frame_lazy_ibt_plt[] =
780 {
781 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
782 0, 0, 0, 0, /* CIE ID */
783 1, /* CIE version */
784 'z', 'R', 0, /* Augmentation string */
785 1, /* Code alignment factor */
786 0x78, /* Data alignment factor */
787 16, /* Return address column */
788 1, /* Augmentation size */
789 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
790 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
791 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
792 DW_CFA_nop, DW_CFA_nop,
793
794 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
795 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
796 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
797 0, 0, 0, 0, /* .plt size goes here */
798 0, /* Augmentation size */
799 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
800 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
801 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
802 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
803 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
804 11, /* Block length */
805 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
806 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
807 DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
808 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
809 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
810 };
811
812 /* .eh_frame covering the non-lazy .plt section. */
813
814 static const bfd_byte elf_x86_64_eh_frame_non_lazy_plt[] =
815 {
816 #define PLT_GOT_FDE_LENGTH 20
817 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
818 0, 0, 0, 0, /* CIE ID */
819 1, /* CIE version */
820 'z', 'R', 0, /* Augmentation string */
821 1, /* Code alignment factor */
822 0x78, /* Data alignment factor */
823 16, /* Return address column */
824 1, /* Augmentation size */
825 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
826 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
827 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
828 DW_CFA_nop, DW_CFA_nop,
829
830 PLT_GOT_FDE_LENGTH, 0, 0, 0, /* FDE length */
831 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
832 0, 0, 0, 0, /* the start of non-lazy .plt goes here */
833 0, 0, 0, 0, /* non-lazy .plt size goes here */
834 0, /* Augmentation size */
835 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop,
836 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
837 };
838
839 struct elf_x86_64_lazy_plt_layout
840 {
841 /* Templates for the initial PLT entry and for subsequent entries. */
842 const bfd_byte *plt0_entry;
843 const bfd_byte *plt_entry;
844 unsigned int plt_entry_size; /* Size of each PLT entry. */
845
846 /* Offsets into plt0_entry that are to be replaced with GOT[1] and GOT[2]. */
847 unsigned int plt0_got1_offset;
848 unsigned int plt0_got2_offset;
849
850 /* Offset of the end of the PC-relative instruction containing
851 plt0_got2_offset. */
852 unsigned int plt0_got2_insn_end;
853
854 /* Offsets into plt_entry that are to be replaced with... */
855 unsigned int plt_got_offset; /* ... address of this symbol in .got. */
856 unsigned int plt_reloc_offset; /* ... offset into relocation table. */
857 unsigned int plt_plt_offset; /* ... offset to start of .plt. */
858
859 /* Length of the PC-relative instruction containing plt_got_offset. */
860 unsigned int plt_got_insn_size;
861
862 /* Offset of the end of the PC-relative jump to plt0_entry. */
863 unsigned int plt_plt_insn_end;
864
865 /* Offset into plt_entry where the initial value of the GOT entry points. */
866 unsigned int plt_lazy_offset;
867
868 /* .eh_frame covering the lazy .plt section. */
869 const bfd_byte *eh_frame_plt;
870 unsigned int eh_frame_plt_size;
871 };
872
873 struct elf_x86_64_non_lazy_plt_layout
874 {
875 /* Template for the lazy PLT entries. */
876 const bfd_byte *plt_entry;
877 unsigned int plt_entry_size; /* Size of each PLT entry. */
878
879 /* Offsets into plt_entry that are to be replaced with... */
880 unsigned int plt_got_offset; /* ... address of this symbol in .got. */
881
882 /* Length of the PC-relative instruction containing plt_got_offset. */
883 unsigned int plt_got_insn_size;
884
885 /* .eh_frame covering the non-lazy .plt section. */
886 const bfd_byte *eh_frame_plt;
887 unsigned int eh_frame_plt_size;
888 };
889
890 struct elf_x86_64_plt_layout
891 {
892 /* Template for the PLT entries. */
893 const bfd_byte *plt_entry;
894 unsigned int plt_entry_size; /* Size of each PLT entry. */
895
896 /* 1 has PLT0. */
897 unsigned int has_plt0;
898
899 /* Offsets into plt_entry that are to be replaced with... */
900 unsigned int plt_got_offset; /* ... address of this symbol in .got. */
901
902 /* Length of the PC-relative instruction containing plt_got_offset. */
903 unsigned int plt_got_insn_size;
904
905 /* .eh_frame covering the .plt section. */
906 const bfd_byte *eh_frame_plt;
907 unsigned int eh_frame_plt_size;
908 };
909
910 /* Architecture-specific backend data for x86-64. */
911
912 struct elf_x86_64_backend_data
913 {
914 /* Target system. */
915 enum
916 {
917 is_normal,
918 is_nacl
919 } os;
920 };
921
922 #define get_elf_x86_64_arch_data(bed) \
923 ((const struct elf_x86_64_backend_data *) (bed)->arch_data)
924
925 #define get_elf_x86_64_backend_data(abfd) \
926 get_elf_x86_64_arch_data (get_elf_backend_data (abfd))
927
928 /* These are the standard parameters. */
929 static const struct elf_x86_64_lazy_plt_layout elf_x86_64_lazy_plt =
930 {
931 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
932 elf_x86_64_lazy_plt_entry, /* plt_entry */
933 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
934 2, /* plt0_got1_offset */
935 8, /* plt0_got2_offset */
936 12, /* plt0_got2_insn_end */
937 2, /* plt_got_offset */
938 7, /* plt_reloc_offset */
939 12, /* plt_plt_offset */
940 6, /* plt_got_insn_size */
941 LAZY_PLT_ENTRY_SIZE, /* plt_plt_insn_end */
942 6, /* plt_lazy_offset */
943 elf_x86_64_eh_frame_lazy_plt, /* eh_frame_plt */
944 sizeof (elf_x86_64_eh_frame_lazy_plt) /* eh_frame_plt_size */
945 };
946
947 static const struct elf_x86_64_non_lazy_plt_layout elf_x86_64_non_lazy_plt =
948 {
949 elf_x86_64_non_lazy_plt_entry, /* plt_entry */
950 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
951 2, /* plt_got_offset */
952 6, /* plt_got_insn_size */
953 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
954 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
955 };
956
957 static const struct elf_x86_64_lazy_plt_layout elf_x86_64_lazy_bnd_plt =
958 {
959 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
960 elf_x86_64_lazy_bnd_plt_entry, /* plt_entry */
961 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
962 2, /* plt0_got1_offset */
963 1+8, /* plt0_got2_offset */
964 1+12, /* plt0_got2_insn_end */
965 1+2, /* plt_got_offset */
966 1, /* plt_reloc_offset */
967 7, /* plt_plt_offset */
968 1+6, /* plt_got_insn_size */
969 11, /* plt_plt_insn_end */
970 0, /* plt_lazy_offset */
971 elf_x86_64_eh_frame_lazy_bnd_plt, /* eh_frame_plt */
972 sizeof (elf_x86_64_eh_frame_lazy_bnd_plt) /* eh_frame_plt_size */
973 };
974
975 static const struct elf_x86_64_non_lazy_plt_layout elf_x86_64_non_lazy_bnd_plt =
976 {
977 elf_x86_64_non_lazy_bnd_plt_entry, /* plt_entry */
978 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
979 1+2, /* plt_got_offset */
980 1+6, /* plt_got_insn_size */
981 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
982 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
983 };
984
985 static const struct elf_x86_64_lazy_plt_layout elf_x86_64_lazy_ibt_plt =
986 {
987 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
988 elf_x86_64_lazy_ibt_plt_entry, /* plt_entry */
989 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
990 2, /* plt0_got1_offset */
991 1+8, /* plt0_got2_offset */
992 1+12, /* plt0_got2_insn_end */
993 4+1+2, /* plt_got_offset */
994 4+1, /* plt_reloc_offset */
995 4+1+6, /* plt_plt_offset */
996 4+1+6, /* plt_got_insn_size */
997 4+1+5+5, /* plt_plt_insn_end */
998 0, /* plt_lazy_offset */
999 elf_x86_64_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
1000 sizeof (elf_x86_64_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
1001 };
1002
1003 static const struct elf_x86_64_lazy_plt_layout elf_x32_lazy_ibt_plt =
1004 {
1005 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
1006 elf_x32_lazy_ibt_plt_entry, /* plt_entry */
1007 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
1008 2, /* plt0_got1_offset */
1009 8, /* plt0_got2_offset */
1010 12, /* plt0_got2_insn_end */
1011 4+2, /* plt_got_offset */
1012 4+1, /* plt_reloc_offset */
1013 4+6, /* plt_plt_offset */
1014 4+6, /* plt_got_insn_size */
1015 4+5+5, /* plt_plt_insn_end */
1016 0, /* plt_lazy_offset */
1017 elf_x32_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
1018 sizeof (elf_x32_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
1019 };
1020
1021 static const struct elf_x86_64_non_lazy_plt_layout elf_x86_64_non_lazy_ibt_plt =
1022 {
1023 elf_x86_64_non_lazy_ibt_plt_entry, /* plt_entry */
1024 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
1025 4+1+2, /* plt_got_offset */
1026 4+1+6, /* plt_got_insn_size */
1027 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
1028 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
1029 };
1030
1031 static const struct elf_x86_64_non_lazy_plt_layout elf_x32_non_lazy_ibt_plt =
1032 {
1033 elf_x32_non_lazy_ibt_plt_entry, /* plt_entry */
1034 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
1035 4+2, /* plt_got_offset */
1036 4+6, /* plt_got_insn_size */
1037 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
1038 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
1039 };
1040
1041 static const struct elf_x86_64_backend_data elf_x86_64_arch_bed =
1042 {
1043 is_normal /* os */
1044 };
1045
1046 #define elf_backend_arch_data &elf_x86_64_arch_bed
1047
1048 /* Is a undefined weak symbol which is resolved to 0. Reference to an
1049 undefined weak symbol is resolved to 0 when building executable if
1050 it isn't dynamic and
1051 1. Has non-GOT/non-PLT relocations in text section. Or
1052 2. Has no GOT/PLT relocation.
1053 Local undefined weak symbol is always resolved to 0.
1054 */
1055 #define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, GOT_RELOC, EH) \
1056 ((EH)->elf.root.type == bfd_link_hash_undefweak \
1057 && ((EH)->elf.forced_local \
1058 || (bfd_link_executable (INFO) \
1059 && (elf_x86_64_hash_table (INFO)->interp == NULL \
1060 || !(GOT_RELOC) \
1061 || (EH)->has_non_got_reloc \
1062 || !(INFO)->dynamic_undefined_weak))))
1063
1064 /* x86-64 ELF linker hash entry. */
1065
1066 struct elf_x86_64_link_hash_entry
1067 {
1068 struct elf_link_hash_entry elf;
1069
1070 /* Track dynamic relocs copied for this symbol. */
1071 struct elf_dyn_relocs *dyn_relocs;
1072
1073 #define GOT_UNKNOWN 0
1074 #define GOT_NORMAL 1
1075 #define GOT_TLS_GD 2
1076 #define GOT_TLS_IE 3
1077 #define GOT_TLS_GDESC 4
1078 #define GOT_TLS_GD_BOTH_P(type) \
1079 ((type) == (GOT_TLS_GD | GOT_TLS_GDESC))
1080 #define GOT_TLS_GD_P(type) \
1081 ((type) == GOT_TLS_GD || GOT_TLS_GD_BOTH_P (type))
1082 #define GOT_TLS_GDESC_P(type) \
1083 ((type) == GOT_TLS_GDESC || GOT_TLS_GD_BOTH_P (type))
1084 #define GOT_TLS_GD_ANY_P(type) \
1085 (GOT_TLS_GD_P (type) || GOT_TLS_GDESC_P (type))
1086 unsigned char tls_type;
1087
1088 /* TRUE if a weak symbol with a real definition needs a copy reloc.
1089 When there is a weak symbol with a real definition, the processor
1090 independent code will have arranged for us to see the real
1091 definition first. We need to copy the needs_copy bit from the
1092 real definition and check it when allowing copy reloc in PIE. */
1093 unsigned int needs_copy : 1;
1094
1095 /* TRUE if symbol has GOT or PLT relocations. */
1096 unsigned int has_got_reloc : 1;
1097
1098 /* TRUE if symbol has non-GOT/non-PLT relocations in text sections. */
1099 unsigned int has_non_got_reloc : 1;
1100
1101 /* Don't call finish_dynamic_symbol on this symbol. */
1102 unsigned int no_finish_dynamic_symbol : 1;
1103
1104 /* 0: symbol isn't __tls_get_addr.
1105 1: symbol is __tls_get_addr.
1106 2: symbol is unknown. */
1107 unsigned int tls_get_addr : 2;
1108
1109 /* Reference count of C/C++ function pointer relocations in read-write
1110 section which can be resolved at run-time. */
1111 bfd_signed_vma func_pointer_refcount;
1112
1113 /* Information about the GOT PLT entry. Filled when there are both
1114 GOT and PLT relocations against the same function. */
1115 union gotplt_union plt_got;
1116
1117 /* Information about the second PLT entry. */
1118 union gotplt_union plt_second;
1119
1120 /* Offset of the GOTPLT entry reserved for the TLS descriptor,
1121 starting at the end of the jump table. */
1122 bfd_vma tlsdesc_got;
1123 };
1124
1125 #define elf_x86_64_hash_entry(ent) \
1126 ((struct elf_x86_64_link_hash_entry *)(ent))
1127
1128 struct elf_x86_64_obj_tdata
1129 {
1130 struct elf_obj_tdata root;
1131
1132 /* tls_type for each local got entry. */
1133 char *local_got_tls_type;
1134
1135 /* GOTPLT entries for TLS descriptors. */
1136 bfd_vma *local_tlsdesc_gotent;
1137 };
1138
1139 #define elf_x86_64_tdata(abfd) \
1140 ((struct elf_x86_64_obj_tdata *) (abfd)->tdata.any)
1141
1142 #define elf_x86_64_local_got_tls_type(abfd) \
1143 (elf_x86_64_tdata (abfd)->local_got_tls_type)
1144
1145 #define elf_x86_64_local_tlsdesc_gotent(abfd) \
1146 (elf_x86_64_tdata (abfd)->local_tlsdesc_gotent)
1147
1148 #define is_x86_64_elf(bfd) \
1149 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
1150 && elf_tdata (bfd) != NULL \
1151 && elf_object_id (bfd) == X86_64_ELF_DATA)
1152
1153 static bfd_boolean
1154 elf_x86_64_mkobject (bfd *abfd)
1155 {
1156 return bfd_elf_allocate_object (abfd, sizeof (struct elf_x86_64_obj_tdata),
1157 X86_64_ELF_DATA);
1158 }
1159
1160 /* x86-64 ELF linker hash table. */
1161
1162 struct elf_x86_64_link_hash_table
1163 {
1164 struct elf_link_hash_table elf;
1165
1166 /* Short-cuts to get to dynamic linker sections. */
1167 asection *interp;
1168 asection *plt_eh_frame;
1169 asection *plt_second;
1170 asection *plt_second_eh_frame;
1171 asection *plt_got;
1172 asection *plt_got_eh_frame;
1173
1174 /* Parameters describing PLT generation, lazy or non-lazy. */
1175 struct elf_x86_64_plt_layout plt;
1176
1177 /* Parameters describing lazy PLT generation. */
1178 const struct elf_x86_64_lazy_plt_layout *lazy_plt;
1179
1180 /* Parameters describing non-lazy PLT generation. */
1181 const struct elf_x86_64_non_lazy_plt_layout *non_lazy_plt;
1182
1183 union
1184 {
1185 bfd_signed_vma refcount;
1186 bfd_vma offset;
1187 } tls_ld_got;
1188
1189 /* The amount of space used by the jump slots in the GOT. */
1190 bfd_vma sgotplt_jump_table_size;
1191
1192 /* Small local sym cache. */
1193 struct sym_cache sym_cache;
1194
1195 bfd_vma (*r_info) (bfd_vma, bfd_vma);
1196 bfd_vma (*r_sym) (bfd_vma);
1197 unsigned int pointer_r_type;
1198 const char *dynamic_interpreter;
1199 int dynamic_interpreter_size;
1200
1201 /* _TLS_MODULE_BASE_ symbol. */
1202 struct bfd_link_hash_entry *tls_module_base;
1203
1204 /* Used by local STT_GNU_IFUNC symbols. */
1205 htab_t loc_hash_table;
1206 void * loc_hash_memory;
1207
1208 /* The offset into splt of the PLT entry for the TLS descriptor
1209 resolver. Special values are 0, if not necessary (or not found
1210 to be necessary yet), and -1 if needed but not determined
1211 yet. */
1212 bfd_vma tlsdesc_plt;
1213 /* The offset into sgot of the GOT entry used by the PLT entry
1214 above. */
1215 bfd_vma tlsdesc_got;
1216
1217 /* The index of the next R_X86_64_JUMP_SLOT entry in .rela.plt. */
1218 bfd_vma next_jump_slot_index;
1219 /* The index of the next R_X86_64_IRELATIVE entry in .rela.plt. */
1220 bfd_vma next_irelative_index;
1221
1222 /* TRUE if there are dynamic relocs against IFUNC symbols that apply
1223 to read-only sections. */
1224 bfd_boolean readonly_dynrelocs_against_ifunc;
1225 };
1226
1227 /* Get the x86-64 ELF linker hash table from a link_info structure. */
1228
1229 #define elf_x86_64_hash_table(p) \
1230 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
1231 == X86_64_ELF_DATA ? ((struct elf_x86_64_link_hash_table *) ((p)->hash)) : NULL)
1232
1233 #define elf_x86_64_compute_jump_table_size(htab) \
1234 ((htab)->elf.srelplt->reloc_count * GOT_ENTRY_SIZE)
1235
1236 /* Create an entry in an x86-64 ELF linker hash table. */
1237
1238 static struct bfd_hash_entry *
1239 elf_x86_64_link_hash_newfunc (struct bfd_hash_entry *entry,
1240 struct bfd_hash_table *table,
1241 const char *string)
1242 {
1243 /* Allocate the structure if it has not already been allocated by a
1244 subclass. */
1245 if (entry == NULL)
1246 {
1247 entry = (struct bfd_hash_entry *)
1248 bfd_hash_allocate (table,
1249 sizeof (struct elf_x86_64_link_hash_entry));
1250 if (entry == NULL)
1251 return entry;
1252 }
1253
1254 /* Call the allocation method of the superclass. */
1255 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
1256 if (entry != NULL)
1257 {
1258 struct elf_x86_64_link_hash_entry *eh;
1259
1260 eh = (struct elf_x86_64_link_hash_entry *) entry;
1261 eh->dyn_relocs = NULL;
1262 eh->tls_type = GOT_UNKNOWN;
1263 eh->needs_copy = 0;
1264 eh->has_got_reloc = 0;
1265 eh->has_non_got_reloc = 0;
1266 eh->no_finish_dynamic_symbol = 0;
1267 eh->tls_get_addr = 2;
1268 eh->func_pointer_refcount = 0;
1269 eh->plt_second.offset = (bfd_vma) -1;
1270 eh->plt_got.offset = (bfd_vma) -1;
1271 eh->tlsdesc_got = (bfd_vma) -1;
1272 }
1273
1274 return entry;
1275 }
1276
1277 /* Compute a hash of a local hash entry. We use elf_link_hash_entry
1278 for local symbol so that we can handle local STT_GNU_IFUNC symbols
1279 as global symbol. We reuse indx and dynstr_index for local symbol
1280 hash since they aren't used by global symbols in this backend. */
1281
1282 static hashval_t
1283 elf_x86_64_local_htab_hash (const void *ptr)
1284 {
1285 struct elf_link_hash_entry *h
1286 = (struct elf_link_hash_entry *) ptr;
1287 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
1288 }
1289
1290 /* Compare local hash entries. */
1291
1292 static int
1293 elf_x86_64_local_htab_eq (const void *ptr1, const void *ptr2)
1294 {
1295 struct elf_link_hash_entry *h1
1296 = (struct elf_link_hash_entry *) ptr1;
1297 struct elf_link_hash_entry *h2
1298 = (struct elf_link_hash_entry *) ptr2;
1299
1300 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
1301 }
1302
1303 /* Find and/or create a hash entry for local symbol. */
1304
1305 static struct elf_link_hash_entry *
1306 elf_x86_64_get_local_sym_hash (struct elf_x86_64_link_hash_table *htab,
1307 bfd *abfd, const Elf_Internal_Rela *rel,
1308 bfd_boolean create)
1309 {
1310 struct elf_x86_64_link_hash_entry e, *ret;
1311 asection *sec = abfd->sections;
1312 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
1313 htab->r_sym (rel->r_info));
1314 void **slot;
1315
1316 e.elf.indx = sec->id;
1317 e.elf.dynstr_index = htab->r_sym (rel->r_info);
1318 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
1319 create ? INSERT : NO_INSERT);
1320
1321 if (!slot)
1322 return NULL;
1323
1324 if (*slot)
1325 {
1326 ret = (struct elf_x86_64_link_hash_entry *) *slot;
1327 return &ret->elf;
1328 }
1329
1330 ret = (struct elf_x86_64_link_hash_entry *)
1331 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
1332 sizeof (struct elf_x86_64_link_hash_entry));
1333 if (ret)
1334 {
1335 memset (ret, 0, sizeof (*ret));
1336 ret->elf.indx = sec->id;
1337 ret->elf.dynstr_index = htab->r_sym (rel->r_info);
1338 ret->elf.dynindx = -1;
1339 ret->func_pointer_refcount = 0;
1340 ret->plt_got.offset = (bfd_vma) -1;
1341 *slot = ret;
1342 }
1343 return &ret->elf;
1344 }
1345
1346 /* Destroy an X86-64 ELF linker hash table. */
1347
1348 static void
1349 elf_x86_64_link_hash_table_free (bfd *obfd)
1350 {
1351 struct elf_x86_64_link_hash_table *htab
1352 = (struct elf_x86_64_link_hash_table *) obfd->link.hash;
1353
1354 if (htab->loc_hash_table)
1355 htab_delete (htab->loc_hash_table);
1356 if (htab->loc_hash_memory)
1357 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
1358 _bfd_elf_link_hash_table_free (obfd);
1359 }
1360
1361 /* Create an X86-64 ELF linker hash table. */
1362
1363 static struct bfd_link_hash_table *
1364 elf_x86_64_link_hash_table_create (bfd *abfd)
1365 {
1366 struct elf_x86_64_link_hash_table *ret;
1367 bfd_size_type amt = sizeof (struct elf_x86_64_link_hash_table);
1368
1369 ret = (struct elf_x86_64_link_hash_table *) bfd_zmalloc (amt);
1370 if (ret == NULL)
1371 return NULL;
1372
1373 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
1374 elf_x86_64_link_hash_newfunc,
1375 sizeof (struct elf_x86_64_link_hash_entry),
1376 X86_64_ELF_DATA))
1377 {
1378 free (ret);
1379 return NULL;
1380 }
1381
1382 if (ABI_64_P (abfd))
1383 {
1384 ret->r_info = elf64_r_info;
1385 ret->r_sym = elf64_r_sym;
1386 ret->pointer_r_type = R_X86_64_64;
1387 ret->dynamic_interpreter = ELF64_DYNAMIC_INTERPRETER;
1388 ret->dynamic_interpreter_size = sizeof ELF64_DYNAMIC_INTERPRETER;
1389 }
1390 else
1391 {
1392 ret->r_info = elf32_r_info;
1393 ret->r_sym = elf32_r_sym;
1394 ret->pointer_r_type = R_X86_64_32;
1395 ret->dynamic_interpreter = ELF32_DYNAMIC_INTERPRETER;
1396 ret->dynamic_interpreter_size = sizeof ELF32_DYNAMIC_INTERPRETER;
1397 }
1398
1399 ret->loc_hash_table = htab_try_create (1024,
1400 elf_x86_64_local_htab_hash,
1401 elf_x86_64_local_htab_eq,
1402 NULL);
1403 ret->loc_hash_memory = objalloc_create ();
1404 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1405 {
1406 elf_x86_64_link_hash_table_free (abfd);
1407 return NULL;
1408 }
1409 ret->elf.root.hash_table_free = elf_x86_64_link_hash_table_free;
1410
1411 return &ret->elf.root;
1412 }
1413
1414 /* Copy the extra info we tack onto an elf_link_hash_entry. */
1415
1416 static void
1417 elf_x86_64_copy_indirect_symbol (struct bfd_link_info *info,
1418 struct elf_link_hash_entry *dir,
1419 struct elf_link_hash_entry *ind)
1420 {
1421 struct elf_x86_64_link_hash_entry *edir, *eind;
1422
1423 edir = (struct elf_x86_64_link_hash_entry *) dir;
1424 eind = (struct elf_x86_64_link_hash_entry *) ind;
1425
1426 edir->has_got_reloc |= eind->has_got_reloc;
1427 edir->has_non_got_reloc |= eind->has_non_got_reloc;
1428
1429 if (eind->dyn_relocs != NULL)
1430 {
1431 if (edir->dyn_relocs != NULL)
1432 {
1433 struct elf_dyn_relocs **pp;
1434 struct elf_dyn_relocs *p;
1435
1436 /* Add reloc counts against the indirect sym to the direct sym
1437 list. Merge any entries against the same section. */
1438 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
1439 {
1440 struct elf_dyn_relocs *q;
1441
1442 for (q = edir->dyn_relocs; q != NULL; q = q->next)
1443 if (q->sec == p->sec)
1444 {
1445 q->pc_count += p->pc_count;
1446 q->count += p->count;
1447 *pp = p->next;
1448 break;
1449 }
1450 if (q == NULL)
1451 pp = &p->next;
1452 }
1453 *pp = edir->dyn_relocs;
1454 }
1455
1456 edir->dyn_relocs = eind->dyn_relocs;
1457 eind->dyn_relocs = NULL;
1458 }
1459
1460 if (ind->root.type == bfd_link_hash_indirect
1461 && dir->got.refcount <= 0)
1462 {
1463 edir->tls_type = eind->tls_type;
1464 eind->tls_type = GOT_UNKNOWN;
1465 }
1466
1467 if (ELIMINATE_COPY_RELOCS
1468 && ind->root.type != bfd_link_hash_indirect
1469 && dir->dynamic_adjusted)
1470 {
1471 /* If called to transfer flags for a weakdef during processing
1472 of elf_adjust_dynamic_symbol, don't copy non_got_ref.
1473 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
1474 if (dir->versioned != versioned_hidden)
1475 dir->ref_dynamic |= ind->ref_dynamic;
1476 dir->ref_regular |= ind->ref_regular;
1477 dir->ref_regular_nonweak |= ind->ref_regular_nonweak;
1478 dir->needs_plt |= ind->needs_plt;
1479 dir->pointer_equality_needed |= ind->pointer_equality_needed;
1480 }
1481 else
1482 {
1483 if (eind->func_pointer_refcount > 0)
1484 {
1485 edir->func_pointer_refcount += eind->func_pointer_refcount;
1486 eind->func_pointer_refcount = 0;
1487 }
1488
1489 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
1490 }
1491 }
1492
1493 static bfd_boolean
1494 elf64_x86_64_elf_object_p (bfd *abfd)
1495 {
1496 /* Set the right machine number for an x86-64 elf64 file. */
1497 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
1498 return TRUE;
1499 }
1500
1501 static bfd_boolean
1502 elf32_x86_64_elf_object_p (bfd *abfd)
1503 {
1504 /* Set the right machine number for an x86-64 elf32 file. */
1505 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32);
1506 return TRUE;
1507 }
1508
1509 /* Return TRUE if the TLS access code sequence support transition
1510 from R_TYPE. */
1511
1512 static bfd_boolean
1513 elf_x86_64_check_tls_transition (bfd *abfd,
1514 struct bfd_link_info *info,
1515 asection *sec,
1516 bfd_byte *contents,
1517 Elf_Internal_Shdr *symtab_hdr,
1518 struct elf_link_hash_entry **sym_hashes,
1519 unsigned int r_type,
1520 const Elf_Internal_Rela *rel,
1521 const Elf_Internal_Rela *relend)
1522 {
1523 unsigned int val;
1524 unsigned long r_symndx;
1525 bfd_boolean largepic = FALSE;
1526 struct elf_link_hash_entry *h;
1527 bfd_vma offset;
1528 struct elf_x86_64_link_hash_table *htab;
1529 bfd_byte *call;
1530 bfd_boolean indirect_call, tls_get_addr;
1531
1532 htab = elf_x86_64_hash_table (info);
1533 offset = rel->r_offset;
1534 switch (r_type)
1535 {
1536 case R_X86_64_TLSGD:
1537 case R_X86_64_TLSLD:
1538 if ((rel + 1) >= relend)
1539 return FALSE;
1540
1541 if (r_type == R_X86_64_TLSGD)
1542 {
1543 /* Check transition from GD access model. For 64bit, only
1544 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1545 .word 0x6666; rex64; call __tls_get_addr@PLT
1546 or
1547 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1548 .byte 0x66; rex64
1549 call *__tls_get_addr@GOTPCREL(%rip)
1550 which may be converted to
1551 addr32 call __tls_get_addr
1552 can transit to different access model. For 32bit, only
1553 leaq foo@tlsgd(%rip), %rdi
1554 .word 0x6666; rex64; call __tls_get_addr@PLT
1555 or
1556 leaq foo@tlsgd(%rip), %rdi
1557 .byte 0x66; rex64
1558 call *__tls_get_addr@GOTPCREL(%rip)
1559 which may be converted to
1560 addr32 call __tls_get_addr
1561 can transit to different access model. For largepic,
1562 we also support:
1563 leaq foo@tlsgd(%rip), %rdi
1564 movabsq $__tls_get_addr@pltoff, %rax
1565 addq $r15, %rax
1566 call *%rax
1567 or
1568 leaq foo@tlsgd(%rip), %rdi
1569 movabsq $__tls_get_addr@pltoff, %rax
1570 addq $rbx, %rax
1571 call *%rax */
1572
1573 static const unsigned char leaq[] = { 0x66, 0x48, 0x8d, 0x3d };
1574
1575 if ((offset + 12) > sec->size)
1576 return FALSE;
1577
1578 call = contents + offset + 4;
1579 if (call[0] != 0x66
1580 || !((call[1] == 0x48
1581 && call[2] == 0xff
1582 && call[3] == 0x15)
1583 || (call[1] == 0x48
1584 && call[2] == 0x67
1585 && call[3] == 0xe8)
1586 || (call[1] == 0x66
1587 && call[2] == 0x48
1588 && call[3] == 0xe8)))
1589 {
1590 if (!ABI_64_P (abfd)
1591 || (offset + 19) > sec->size
1592 || offset < 3
1593 || memcmp (call - 7, leaq + 1, 3) != 0
1594 || memcmp (call, "\x48\xb8", 2) != 0
1595 || call[11] != 0x01
1596 || call[13] != 0xff
1597 || call[14] != 0xd0
1598 || !((call[10] == 0x48 && call[12] == 0xd8)
1599 || (call[10] == 0x4c && call[12] == 0xf8)))
1600 return FALSE;
1601 largepic = TRUE;
1602 }
1603 else if (ABI_64_P (abfd))
1604 {
1605 if (offset < 4
1606 || memcmp (contents + offset - 4, leaq, 4) != 0)
1607 return FALSE;
1608 }
1609 else
1610 {
1611 if (offset < 3
1612 || memcmp (contents + offset - 3, leaq + 1, 3) != 0)
1613 return FALSE;
1614 }
1615 indirect_call = call[2] == 0xff;
1616 }
1617 else
1618 {
1619 /* Check transition from LD access model. Only
1620 leaq foo@tlsld(%rip), %rdi;
1621 call __tls_get_addr@PLT
1622 or
1623 leaq foo@tlsld(%rip), %rdi;
1624 call *__tls_get_addr@GOTPCREL(%rip)
1625 which may be converted to
1626 addr32 call __tls_get_addr
1627 can transit to different access model. For largepic
1628 we also support:
1629 leaq foo@tlsld(%rip), %rdi
1630 movabsq $__tls_get_addr@pltoff, %rax
1631 addq $r15, %rax
1632 call *%rax
1633 or
1634 leaq foo@tlsld(%rip), %rdi
1635 movabsq $__tls_get_addr@pltoff, %rax
1636 addq $rbx, %rax
1637 call *%rax */
1638
1639 static const unsigned char lea[] = { 0x48, 0x8d, 0x3d };
1640
1641 if (offset < 3 || (offset + 9) > sec->size)
1642 return FALSE;
1643
1644 if (memcmp (contents + offset - 3, lea, 3) != 0)
1645 return FALSE;
1646
1647 call = contents + offset + 4;
1648 if (!(call[0] == 0xe8
1649 || (call[0] == 0xff && call[1] == 0x15)
1650 || (call[0] == 0x67 && call[1] == 0xe8)))
1651 {
1652 if (!ABI_64_P (abfd)
1653 || (offset + 19) > sec->size
1654 || memcmp (call, "\x48\xb8", 2) != 0
1655 || call[11] != 0x01
1656 || call[13] != 0xff
1657 || call[14] != 0xd0
1658 || !((call[10] == 0x48 && call[12] == 0xd8)
1659 || (call[10] == 0x4c && call[12] == 0xf8)))
1660 return FALSE;
1661 largepic = TRUE;
1662 }
1663 indirect_call = call[0] == 0xff;
1664 }
1665
1666 r_symndx = htab->r_sym (rel[1].r_info);
1667 if (r_symndx < symtab_hdr->sh_info)
1668 return FALSE;
1669
1670 tls_get_addr = FALSE;
1671 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1672 if (h != NULL && h->root.root.string != NULL)
1673 {
1674 struct elf_x86_64_link_hash_entry *eh
1675 = (struct elf_x86_64_link_hash_entry *) h;
1676 tls_get_addr = eh->tls_get_addr == 1;
1677 if (eh->tls_get_addr > 1)
1678 {
1679 /* Use strncmp to check __tls_get_addr since
1680 __tls_get_addr may be versioned. */
1681 if (strncmp (h->root.root.string, "__tls_get_addr", 14)
1682 == 0)
1683 {
1684 eh->tls_get_addr = 1;
1685 tls_get_addr = TRUE;
1686 }
1687 else
1688 eh->tls_get_addr = 0;
1689 }
1690 }
1691
1692 if (!tls_get_addr)
1693 return FALSE;
1694 else if (largepic)
1695 return ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PLTOFF64;
1696 else if (indirect_call)
1697 return ELF32_R_TYPE (rel[1].r_info) == R_X86_64_GOTPCRELX;
1698 else
1699 return (ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PC32
1700 || ELF32_R_TYPE (rel[1].r_info) == R_X86_64_PLT32);
1701
1702 case R_X86_64_GOTTPOFF:
1703 /* Check transition from IE access model:
1704 mov foo@gottpoff(%rip), %reg
1705 add foo@gottpoff(%rip), %reg
1706 */
1707
1708 /* Check REX prefix first. */
1709 if (offset >= 3 && (offset + 4) <= sec->size)
1710 {
1711 val = bfd_get_8 (abfd, contents + offset - 3);
1712 if (val != 0x48 && val != 0x4c)
1713 {
1714 /* X32 may have 0x44 REX prefix or no REX prefix. */
1715 if (ABI_64_P (abfd))
1716 return FALSE;
1717 }
1718 }
1719 else
1720 {
1721 /* X32 may not have any REX prefix. */
1722 if (ABI_64_P (abfd))
1723 return FALSE;
1724 if (offset < 2 || (offset + 3) > sec->size)
1725 return FALSE;
1726 }
1727
1728 val = bfd_get_8 (abfd, contents + offset - 2);
1729 if (val != 0x8b && val != 0x03)
1730 return FALSE;
1731
1732 val = bfd_get_8 (abfd, contents + offset - 1);
1733 return (val & 0xc7) == 5;
1734
1735 case R_X86_64_GOTPC32_TLSDESC:
1736 /* Check transition from GDesc access model:
1737 leaq x@tlsdesc(%rip), %rax
1738
1739 Make sure it's a leaq adding rip to a 32-bit offset
1740 into any register, although it's probably almost always
1741 going to be rax. */
1742
1743 if (offset < 3 || (offset + 4) > sec->size)
1744 return FALSE;
1745
1746 val = bfd_get_8 (abfd, contents + offset - 3);
1747 if ((val & 0xfb) != 0x48)
1748 return FALSE;
1749
1750 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1751 return FALSE;
1752
1753 val = bfd_get_8 (abfd, contents + offset - 1);
1754 return (val & 0xc7) == 0x05;
1755
1756 case R_X86_64_TLSDESC_CALL:
1757 /* Check transition from GDesc access model:
1758 call *x@tlsdesc(%rax)
1759 */
1760 if (offset + 2 <= sec->size)
1761 {
1762 /* Make sure that it's a call *x@tlsdesc(%rax). */
1763 call = contents + offset;
1764 return call[0] == 0xff && call[1] == 0x10;
1765 }
1766
1767 return FALSE;
1768
1769 default:
1770 abort ();
1771 }
1772 }
1773
1774 /* Return TRUE if the TLS access transition is OK or no transition
1775 will be performed. Update R_TYPE if there is a transition. */
1776
1777 static bfd_boolean
1778 elf_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1779 asection *sec, bfd_byte *contents,
1780 Elf_Internal_Shdr *symtab_hdr,
1781 struct elf_link_hash_entry **sym_hashes,
1782 unsigned int *r_type, int tls_type,
1783 const Elf_Internal_Rela *rel,
1784 const Elf_Internal_Rela *relend,
1785 struct elf_link_hash_entry *h,
1786 unsigned long r_symndx,
1787 bfd_boolean from_relocate_section)
1788 {
1789 unsigned int from_type = *r_type;
1790 unsigned int to_type = from_type;
1791 bfd_boolean check = TRUE;
1792
1793 /* Skip TLS transition for functions. */
1794 if (h != NULL
1795 && (h->type == STT_FUNC
1796 || h->type == STT_GNU_IFUNC))
1797 return TRUE;
1798
1799 switch (from_type)
1800 {
1801 case R_X86_64_TLSGD:
1802 case R_X86_64_GOTPC32_TLSDESC:
1803 case R_X86_64_TLSDESC_CALL:
1804 case R_X86_64_GOTTPOFF:
1805 if (bfd_link_executable (info))
1806 {
1807 if (h == NULL)
1808 to_type = R_X86_64_TPOFF32;
1809 else
1810 to_type = R_X86_64_GOTTPOFF;
1811 }
1812
1813 /* When we are called from elf_x86_64_relocate_section, there may
1814 be additional transitions based on TLS_TYPE. */
1815 if (from_relocate_section)
1816 {
1817 unsigned int new_to_type = to_type;
1818
1819 if (bfd_link_executable (info)
1820 && h != NULL
1821 && h->dynindx == -1
1822 && tls_type == GOT_TLS_IE)
1823 new_to_type = R_X86_64_TPOFF32;
1824
1825 if (to_type == R_X86_64_TLSGD
1826 || to_type == R_X86_64_GOTPC32_TLSDESC
1827 || to_type == R_X86_64_TLSDESC_CALL)
1828 {
1829 if (tls_type == GOT_TLS_IE)
1830 new_to_type = R_X86_64_GOTTPOFF;
1831 }
1832
1833 /* We checked the transition before when we were called from
1834 elf_x86_64_check_relocs. We only want to check the new
1835 transition which hasn't been checked before. */
1836 check = new_to_type != to_type && from_type == to_type;
1837 to_type = new_to_type;
1838 }
1839
1840 break;
1841
1842 case R_X86_64_TLSLD:
1843 if (bfd_link_executable (info))
1844 to_type = R_X86_64_TPOFF32;
1845 break;
1846
1847 default:
1848 return TRUE;
1849 }
1850
1851 /* Return TRUE if there is no transition. */
1852 if (from_type == to_type)
1853 return TRUE;
1854
1855 /* Check if the transition can be performed. */
1856 if (check
1857 && ! elf_x86_64_check_tls_transition (abfd, info, sec, contents,
1858 symtab_hdr, sym_hashes,
1859 from_type, rel, relend))
1860 {
1861 reloc_howto_type *from, *to;
1862 const char *name;
1863
1864 from = elf_x86_64_rtype_to_howto (abfd, from_type);
1865 to = elf_x86_64_rtype_to_howto (abfd, to_type);
1866
1867 if (h)
1868 name = h->root.root.string;
1869 else
1870 {
1871 struct elf_x86_64_link_hash_table *htab;
1872
1873 htab = elf_x86_64_hash_table (info);
1874 if (htab == NULL)
1875 name = "*unknown*";
1876 else
1877 {
1878 Elf_Internal_Sym *isym;
1879
1880 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1881 abfd, r_symndx);
1882 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1883 }
1884 }
1885
1886 _bfd_error_handler
1887 /* xgettext:c-format */
1888 (_("%B: TLS transition from %s to %s against `%s' at 0x%lx "
1889 "in section `%A' failed"),
1890 abfd, from->name, to->name, name,
1891 (unsigned long) rel->r_offset, sec);
1892 bfd_set_error (bfd_error_bad_value);
1893 return FALSE;
1894 }
1895
1896 *r_type = to_type;
1897 return TRUE;
1898 }
1899
1900 /* Rename some of the generic section flags to better document how they
1901 are used here. */
1902 #define need_convert_load sec_flg0
1903 #define check_relocs_failed sec_flg1
1904
1905 static bfd_boolean
1906 elf_x86_64_need_pic (bfd *input_bfd, asection *sec,
1907 struct elf_link_hash_entry *h,
1908 Elf_Internal_Shdr *symtab_hdr,
1909 Elf_Internal_Sym *isym,
1910 reloc_howto_type *howto)
1911 {
1912 const char *v = "";
1913 const char *und = "";
1914 const char *pic = "";
1915
1916 const char *name;
1917 if (h)
1918 {
1919 name = h->root.root.string;
1920 switch (ELF_ST_VISIBILITY (h->other))
1921 {
1922 case STV_HIDDEN:
1923 v = _("hidden symbol ");
1924 break;
1925 case STV_INTERNAL:
1926 v = _("internal symbol ");
1927 break;
1928 case STV_PROTECTED:
1929 v = _("protected symbol ");
1930 break;
1931 default:
1932 v = _("symbol ");
1933 pic = _("; recompile with -fPIC");
1934 break;
1935 }
1936
1937 if (!h->def_regular && !h->def_dynamic)
1938 und = _("undefined ");
1939 }
1940 else
1941 {
1942 name = bfd_elf_sym_name (input_bfd, symtab_hdr, isym, NULL);
1943 pic = _("; recompile with -fPIC");
1944 }
1945
1946 /* xgettext:c-format */
1947 _bfd_error_handler (_("%B: relocation %s against %s%s`%s' can "
1948 "not be used when making a shared object%s"),
1949 input_bfd, howto->name, und, v, name, pic);
1950 bfd_set_error (bfd_error_bad_value);
1951 sec->check_relocs_failed = 1;
1952 return FALSE;
1953 }
1954
1955 /* With the local symbol, foo, we convert
1956 mov foo@GOTPCREL(%rip), %reg
1957 to
1958 lea foo(%rip), %reg
1959 and convert
1960 call/jmp *foo@GOTPCREL(%rip)
1961 to
1962 nop call foo/jmp foo nop
1963 When PIC is false, convert
1964 test %reg, foo@GOTPCREL(%rip)
1965 to
1966 test $foo, %reg
1967 and convert
1968 binop foo@GOTPCREL(%rip), %reg
1969 to
1970 binop $foo, %reg
1971 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1972 instructions. */
1973
1974 static bfd_boolean
1975 elf_x86_64_convert_load_reloc (bfd *abfd, asection *sec,
1976 bfd_byte *contents,
1977 Elf_Internal_Rela *irel,
1978 struct elf_link_hash_entry *h,
1979 bfd_boolean *converted,
1980 struct bfd_link_info *link_info)
1981 {
1982 struct elf_x86_64_link_hash_table *htab;
1983 bfd_boolean is_pic;
1984 bfd_boolean require_reloc_pc32;
1985 bfd_boolean relocx;
1986 bfd_boolean to_reloc_pc32;
1987 asection *tsec;
1988 char symtype;
1989 bfd_signed_vma raddend;
1990 unsigned int opcode;
1991 unsigned int modrm;
1992 unsigned int r_type = ELF32_R_TYPE (irel->r_info);
1993 unsigned int r_symndx;
1994 bfd_vma toff;
1995 bfd_vma roff = irel->r_offset;
1996
1997 if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
1998 return TRUE;
1999
2000 raddend = irel->r_addend;
2001 /* Addend for 32-bit PC-relative relocation must be -4. */
2002 if (raddend != -4)
2003 return TRUE;
2004
2005 htab = elf_x86_64_hash_table (link_info);
2006 is_pic = bfd_link_pic (link_info);
2007
2008 relocx = (r_type == R_X86_64_GOTPCRELX
2009 || r_type == R_X86_64_REX_GOTPCRELX);
2010
2011 /* TRUE if we can convert only to R_X86_64_PC32. Enable it for
2012 --no-relax. */
2013 require_reloc_pc32
2014 = link_info->disable_target_specific_optimizations > 1;
2015
2016 r_symndx = htab->r_sym (irel->r_info);
2017
2018 opcode = bfd_get_8 (abfd, contents + roff - 2);
2019
2020 /* Convert mov to lea since it has been done for a while. */
2021 if (opcode != 0x8b)
2022 {
2023 /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
2024 for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
2025 test, xor instructions. */
2026 if (!relocx)
2027 return TRUE;
2028 }
2029
2030 /* We convert only to R_X86_64_PC32:
2031 1. Branch.
2032 2. R_X86_64_GOTPCREL since we can't modify REX byte.
2033 3. require_reloc_pc32 is true.
2034 4. PIC.
2035 */
2036 to_reloc_pc32 = (opcode == 0xff
2037 || !relocx
2038 || require_reloc_pc32
2039 || is_pic);
2040
2041 /* Get the symbol referred to by the reloc. */
2042 if (h == NULL)
2043 {
2044 Elf_Internal_Sym *isym
2045 = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
2046
2047 /* Skip relocation against undefined symbols. */
2048 if (isym->st_shndx == SHN_UNDEF)
2049 return TRUE;
2050
2051 symtype = ELF_ST_TYPE (isym->st_info);
2052
2053 if (isym->st_shndx == SHN_ABS)
2054 tsec = bfd_abs_section_ptr;
2055 else if (isym->st_shndx == SHN_COMMON)
2056 tsec = bfd_com_section_ptr;
2057 else if (isym->st_shndx == SHN_X86_64_LCOMMON)
2058 tsec = &_bfd_elf_large_com_section;
2059 else
2060 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
2061
2062 toff = isym->st_value;
2063 }
2064 else
2065 {
2066 /* Undefined weak symbol is only bound locally in executable
2067 and its reference is resolved as 0 without relocation
2068 overflow. We can only perform this optimization for
2069 GOTPCRELX relocations since we need to modify REX byte.
2070 It is OK convert mov with R_X86_64_GOTPCREL to
2071 R_X86_64_PC32. */
2072 if ((relocx || opcode == 0x8b)
2073 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (link_info,
2074 TRUE,
2075 elf_x86_64_hash_entry (h)))
2076 {
2077 if (opcode == 0xff)
2078 {
2079 /* Skip for branch instructions since R_X86_64_PC32
2080 may overflow. */
2081 if (require_reloc_pc32)
2082 return TRUE;
2083 }
2084 else if (relocx)
2085 {
2086 /* For non-branch instructions, we can convert to
2087 R_X86_64_32/R_X86_64_32S since we know if there
2088 is a REX byte. */
2089 to_reloc_pc32 = FALSE;
2090 }
2091
2092 /* Since we don't know the current PC when PIC is true,
2093 we can't convert to R_X86_64_PC32. */
2094 if (to_reloc_pc32 && is_pic)
2095 return TRUE;
2096
2097 goto convert;
2098 }
2099 /* Avoid optimizing GOTPCREL relocations againt _DYNAMIC since
2100 ld.so may use its link-time address. */
2101 else if (h->start_stop
2102 || ((h->def_regular
2103 || h->root.type == bfd_link_hash_defined
2104 || h->root.type == bfd_link_hash_defweak)
2105 && h != htab->elf.hdynamic
2106 && SYMBOL_REFERENCES_LOCAL (link_info, h)))
2107 {
2108 /* bfd_link_hash_new or bfd_link_hash_undefined is
2109 set by an assignment in a linker script in
2110 bfd_elf_record_link_assignment. start_stop is set
2111 on __start_SECNAME/__stop_SECNAME which mark section
2112 SECNAME. */
2113 if (h->start_stop
2114 || (h->def_regular
2115 && (h->root.type == bfd_link_hash_new
2116 || h->root.type == bfd_link_hash_undefined
2117 || ((h->root.type == bfd_link_hash_defined
2118 || h->root.type == bfd_link_hash_defweak)
2119 && h->root.u.def.section == bfd_und_section_ptr))))
2120 {
2121 /* Skip since R_X86_64_32/R_X86_64_32S may overflow. */
2122 if (require_reloc_pc32)
2123 return TRUE;
2124 goto convert;
2125 }
2126 tsec = h->root.u.def.section;
2127 toff = h->root.u.def.value;
2128 symtype = h->type;
2129 }
2130 else
2131 return TRUE;
2132 }
2133
2134 /* Don't convert GOTPCREL relocation against large section. */
2135 if (elf_section_data (tsec) != NULL
2136 && (elf_section_flags (tsec) & SHF_X86_64_LARGE) != 0)
2137 return TRUE;
2138
2139 /* We can only estimate relocation overflow for R_X86_64_PC32. */
2140 if (!to_reloc_pc32)
2141 goto convert;
2142
2143 if (tsec->sec_info_type == SEC_INFO_TYPE_MERGE)
2144 {
2145 /* At this stage in linking, no SEC_MERGE symbol has been
2146 adjusted, so all references to such symbols need to be
2147 passed through _bfd_merged_section_offset. (Later, in
2148 relocate_section, all SEC_MERGE symbols *except* for
2149 section symbols have been adjusted.)
2150
2151 gas may reduce relocations against symbols in SEC_MERGE
2152 sections to a relocation against the section symbol when
2153 the original addend was zero. When the reloc is against
2154 a section symbol we should include the addend in the
2155 offset passed to _bfd_merged_section_offset, since the
2156 location of interest is the original symbol. On the
2157 other hand, an access to "sym+addend" where "sym" is not
2158 a section symbol should not include the addend; Such an
2159 access is presumed to be an offset from "sym"; The
2160 location of interest is just "sym". */
2161 if (symtype == STT_SECTION)
2162 toff += raddend;
2163
2164 toff = _bfd_merged_section_offset (abfd, &tsec,
2165 elf_section_data (tsec)->sec_info,
2166 toff);
2167
2168 if (symtype != STT_SECTION)
2169 toff += raddend;
2170 }
2171 else
2172 toff += raddend;
2173
2174 /* Don't convert if R_X86_64_PC32 relocation overflows. */
2175 if (tsec->output_section == sec->output_section)
2176 {
2177 if ((toff - roff + 0x80000000) > 0xffffffff)
2178 return TRUE;
2179 }
2180 else
2181 {
2182 bfd_signed_vma distance;
2183
2184 /* At this point, we don't know the load addresses of TSEC
2185 section nor SEC section. We estimate the distrance between
2186 SEC and TSEC. We store the estimated distances in the
2187 compressed_size field of the output section, which is only
2188 used to decompress the compressed input section. */
2189 if (sec->output_section->compressed_size == 0)
2190 {
2191 asection *asect;
2192 bfd_size_type size = 0;
2193 for (asect = link_info->output_bfd->sections;
2194 asect != NULL;
2195 asect = asect->next)
2196 /* Skip debug sections since compressed_size is used to
2197 compress debug sections. */
2198 if ((asect->flags & SEC_DEBUGGING) == 0)
2199 {
2200 asection *i;
2201 for (i = asect->map_head.s;
2202 i != NULL;
2203 i = i->map_head.s)
2204 {
2205 size = align_power (size, i->alignment_power);
2206 size += i->size;
2207 }
2208 asect->compressed_size = size;
2209 }
2210 }
2211
2212 /* Don't convert GOTPCREL relocations if TSEC isn't placed
2213 after SEC. */
2214 distance = (tsec->output_section->compressed_size
2215 - sec->output_section->compressed_size);
2216 if (distance < 0)
2217 return TRUE;
2218
2219 /* Take PT_GNU_RELRO segment into account by adding
2220 maxpagesize. */
2221 if ((toff + distance + get_elf_backend_data (abfd)->maxpagesize
2222 - roff + 0x80000000) > 0xffffffff)
2223 return TRUE;
2224 }
2225
2226 convert:
2227 if (opcode == 0xff)
2228 {
2229 /* We have "call/jmp *foo@GOTPCREL(%rip)". */
2230 unsigned int nop;
2231 unsigned int disp;
2232 bfd_vma nop_offset;
2233
2234 /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
2235 R_X86_64_PC32. */
2236 modrm = bfd_get_8 (abfd, contents + roff - 1);
2237 if (modrm == 0x25)
2238 {
2239 /* Convert to "jmp foo nop". */
2240 modrm = 0xe9;
2241 nop = NOP_OPCODE;
2242 nop_offset = irel->r_offset + 3;
2243 disp = bfd_get_32 (abfd, contents + irel->r_offset);
2244 irel->r_offset -= 1;
2245 bfd_put_32 (abfd, disp, contents + irel->r_offset);
2246 }
2247 else
2248 {
2249 struct elf_x86_64_link_hash_entry *eh
2250 = (struct elf_x86_64_link_hash_entry *) h;
2251
2252 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
2253 is a nop prefix. */
2254 modrm = 0xe8;
2255 /* To support TLS optimization, always use addr32 prefix for
2256 "call *__tls_get_addr@GOTPCREL(%rip)". */
2257 if (eh && eh->tls_get_addr == 1)
2258 {
2259 nop = 0x67;
2260 nop_offset = irel->r_offset - 2;
2261 }
2262 else
2263 {
2264 nop = link_info->call_nop_byte;
2265 if (link_info->call_nop_as_suffix)
2266 {
2267 nop_offset = irel->r_offset + 3;
2268 disp = bfd_get_32 (abfd, contents + irel->r_offset);
2269 irel->r_offset -= 1;
2270 bfd_put_32 (abfd, disp, contents + irel->r_offset);
2271 }
2272 else
2273 nop_offset = irel->r_offset - 2;
2274 }
2275 }
2276 bfd_put_8 (abfd, nop, contents + nop_offset);
2277 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
2278 r_type = R_X86_64_PC32;
2279 }
2280 else
2281 {
2282 unsigned int rex;
2283 unsigned int rex_mask = REX_R;
2284
2285 if (r_type == R_X86_64_REX_GOTPCRELX)
2286 rex = bfd_get_8 (abfd, contents + roff - 3);
2287 else
2288 rex = 0;
2289
2290 if (opcode == 0x8b)
2291 {
2292 if (to_reloc_pc32)
2293 {
2294 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
2295 "lea foo(%rip), %reg". */
2296 opcode = 0x8d;
2297 r_type = R_X86_64_PC32;
2298 }
2299 else
2300 {
2301 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
2302 "mov $foo, %reg". */
2303 opcode = 0xc7;
2304 modrm = bfd_get_8 (abfd, contents + roff - 1);
2305 modrm = 0xc0 | (modrm & 0x38) >> 3;
2306 if ((rex & REX_W) != 0
2307 && ABI_64_P (link_info->output_bfd))
2308 {
2309 /* Keep the REX_W bit in REX byte for LP64. */
2310 r_type = R_X86_64_32S;
2311 goto rewrite_modrm_rex;
2312 }
2313 else
2314 {
2315 /* If the REX_W bit in REX byte isn't needed,
2316 use R_X86_64_32 and clear the W bit to avoid
2317 sign-extend imm32 to imm64. */
2318 r_type = R_X86_64_32;
2319 /* Clear the W bit in REX byte. */
2320 rex_mask |= REX_W;
2321 goto rewrite_modrm_rex;
2322 }
2323 }
2324 }
2325 else
2326 {
2327 /* R_X86_64_PC32 isn't supported. */
2328 if (to_reloc_pc32)
2329 return TRUE;
2330
2331 modrm = bfd_get_8 (abfd, contents + roff - 1);
2332 if (opcode == 0x85)
2333 {
2334 /* Convert "test %reg, foo@GOTPCREL(%rip)" to
2335 "test $foo, %reg". */
2336 modrm = 0xc0 | (modrm & 0x38) >> 3;
2337 opcode = 0xf7;
2338 }
2339 else
2340 {
2341 /* Convert "binop foo@GOTPCREL(%rip), %reg" to
2342 "binop $foo, %reg". */
2343 modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
2344 opcode = 0x81;
2345 }
2346
2347 /* Use R_X86_64_32 with 32-bit operand to avoid relocation
2348 overflow when sign-extending imm32 to imm64. */
2349 r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
2350
2351 rewrite_modrm_rex:
2352 bfd_put_8 (abfd, modrm, contents + roff - 1);
2353
2354 if (rex)
2355 {
2356 /* Move the R bit to the B bit in REX byte. */
2357 rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
2358 bfd_put_8 (abfd, rex, contents + roff - 3);
2359 }
2360
2361 /* No addend for R_X86_64_32/R_X86_64_32S relocations. */
2362 irel->r_addend = 0;
2363 }
2364
2365 bfd_put_8 (abfd, opcode, contents + roff - 2);
2366 }
2367
2368 irel->r_info = htab->r_info (r_symndx, r_type);
2369
2370 *converted = TRUE;
2371
2372 return TRUE;
2373 }
2374
2375 /* Look through the relocs for a section during the first phase, and
2376 calculate needed space in the global offset table, procedure
2377 linkage table, and dynamic reloc sections. */
2378
2379 static bfd_boolean
2380 elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
2381 asection *sec,
2382 const Elf_Internal_Rela *relocs)
2383 {
2384 struct elf_x86_64_link_hash_table *htab;
2385 Elf_Internal_Shdr *symtab_hdr;
2386 struct elf_link_hash_entry **sym_hashes;
2387 const Elf_Internal_Rela *rel;
2388 const Elf_Internal_Rela *rel_end;
2389 asection *sreloc;
2390 bfd_byte *contents;
2391
2392 if (bfd_link_relocatable (info))
2393 return TRUE;
2394
2395 /* Don't do anything special with non-loaded, non-alloced sections.
2396 In particular, any relocs in such sections should not affect GOT
2397 and PLT reference counting (ie. we don't allow them to create GOT
2398 or PLT entries), there's no possibility or desire to optimize TLS
2399 relocs, and there's not much point in propagating relocs to shared
2400 libs that the dynamic linker won't relocate. */
2401 if ((sec->flags & SEC_ALLOC) == 0)
2402 return TRUE;
2403
2404 BFD_ASSERT (is_x86_64_elf (abfd));
2405
2406 htab = elf_x86_64_hash_table (info);
2407 if (htab == NULL)
2408 {
2409 sec->check_relocs_failed = 1;
2410 return FALSE;
2411 }
2412
2413 /* Get the section contents. */
2414 if (elf_section_data (sec)->this_hdr.contents != NULL)
2415 contents = elf_section_data (sec)->this_hdr.contents;
2416 else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
2417 {
2418 sec->check_relocs_failed = 1;
2419 return FALSE;
2420 }
2421
2422 symtab_hdr = &elf_symtab_hdr (abfd);
2423 sym_hashes = elf_sym_hashes (abfd);
2424
2425 sreloc = NULL;
2426
2427 rel_end = relocs + sec->reloc_count;
2428 for (rel = relocs; rel < rel_end; rel++)
2429 {
2430 unsigned int r_type;
2431 unsigned long r_symndx;
2432 struct elf_link_hash_entry *h;
2433 struct elf_x86_64_link_hash_entry *eh;
2434 Elf_Internal_Sym *isym;
2435 const char *name;
2436 bfd_boolean size_reloc;
2437
2438 r_symndx = htab->r_sym (rel->r_info);
2439 r_type = ELF32_R_TYPE (rel->r_info);
2440
2441 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
2442 {
2443 /* xgettext:c-format */
2444 _bfd_error_handler (_("%B: bad symbol index: %d"),
2445 abfd, r_symndx);
2446 goto error_return;
2447 }
2448
2449 if (r_symndx < symtab_hdr->sh_info)
2450 {
2451 /* A local symbol. */
2452 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2453 abfd, r_symndx);
2454 if (isym == NULL)
2455 goto error_return;
2456
2457 /* Check relocation against local STT_GNU_IFUNC symbol. */
2458 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
2459 {
2460 h = elf_x86_64_get_local_sym_hash (htab, abfd, rel,
2461 TRUE);
2462 if (h == NULL)
2463 goto error_return;
2464
2465 /* Fake a STT_GNU_IFUNC symbol. */
2466 h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
2467 isym, NULL);
2468 h->type = STT_GNU_IFUNC;
2469 h->def_regular = 1;
2470 h->ref_regular = 1;
2471 h->forced_local = 1;
2472 h->root.type = bfd_link_hash_defined;
2473 }
2474 else
2475 h = NULL;
2476 }
2477 else
2478 {
2479 isym = NULL;
2480 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2481 while (h->root.type == bfd_link_hash_indirect
2482 || h->root.type == bfd_link_hash_warning)
2483 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2484 }
2485
2486 /* Check invalid x32 relocations. */
2487 if (!ABI_64_P (abfd))
2488 switch (r_type)
2489 {
2490 default:
2491 break;
2492
2493 case R_X86_64_DTPOFF64:
2494 case R_X86_64_TPOFF64:
2495 case R_X86_64_PC64:
2496 case R_X86_64_GOTOFF64:
2497 case R_X86_64_GOT64:
2498 case R_X86_64_GOTPCREL64:
2499 case R_X86_64_GOTPC64:
2500 case R_X86_64_GOTPLT64:
2501 case R_X86_64_PLTOFF64:
2502 {
2503 if (h)
2504 name = h->root.root.string;
2505 else
2506 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
2507 NULL);
2508 _bfd_error_handler
2509 /* xgettext:c-format */
2510 (_("%B: relocation %s against symbol `%s' isn't "
2511 "supported in x32 mode"), abfd,
2512 x86_64_elf_howto_table[r_type].name, name);
2513 bfd_set_error (bfd_error_bad_value);
2514 goto error_return;
2515 }
2516 break;
2517 }
2518
2519 if (h != NULL)
2520 {
2521 /* It is referenced by a non-shared object. */
2522 h->ref_regular = 1;
2523 h->root.non_ir_ref_regular = 1;
2524
2525 if (h->type == STT_GNU_IFUNC)
2526 elf_tdata (info->output_bfd)->has_gnu_symbols
2527 |= elf_gnu_symbol_ifunc;
2528 }
2529
2530 if (! elf_x86_64_tls_transition (info, abfd, sec, contents,
2531 symtab_hdr, sym_hashes,
2532 &r_type, GOT_UNKNOWN,
2533 rel, rel_end, h, r_symndx, FALSE))
2534 goto error_return;
2535
2536 eh = (struct elf_x86_64_link_hash_entry *) h;
2537 switch (r_type)
2538 {
2539 case R_X86_64_TLSLD:
2540 htab->tls_ld_got.refcount += 1;
2541 goto create_got;
2542
2543 case R_X86_64_TPOFF32:
2544 if (!bfd_link_executable (info) && ABI_64_P (abfd))
2545 return elf_x86_64_need_pic (abfd, sec, h, symtab_hdr, isym,
2546 &x86_64_elf_howto_table[r_type]);
2547 if (eh != NULL)
2548 eh->has_got_reloc = 1;
2549 break;
2550
2551 case R_X86_64_GOTTPOFF:
2552 if (!bfd_link_executable (info))
2553 info->flags |= DF_STATIC_TLS;
2554 /* Fall through */
2555
2556 case R_X86_64_GOT32:
2557 case R_X86_64_GOTPCREL:
2558 case R_X86_64_GOTPCRELX:
2559 case R_X86_64_REX_GOTPCRELX:
2560 case R_X86_64_TLSGD:
2561 case R_X86_64_GOT64:
2562 case R_X86_64_GOTPCREL64:
2563 case R_X86_64_GOTPLT64:
2564 case R_X86_64_GOTPC32_TLSDESC:
2565 case R_X86_64_TLSDESC_CALL:
2566 /* This symbol requires a global offset table entry. */
2567 {
2568 int tls_type, old_tls_type;
2569
2570 switch (r_type)
2571 {
2572 default: tls_type = GOT_NORMAL; break;
2573 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
2574 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
2575 case R_X86_64_GOTPC32_TLSDESC:
2576 case R_X86_64_TLSDESC_CALL:
2577 tls_type = GOT_TLS_GDESC; break;
2578 }
2579
2580 if (h != NULL)
2581 {
2582 h->got.refcount += 1;
2583 old_tls_type = eh->tls_type;
2584 }
2585 else
2586 {
2587 bfd_signed_vma *local_got_refcounts;
2588
2589 /* This is a global offset table entry for a local symbol. */
2590 local_got_refcounts = elf_local_got_refcounts (abfd);
2591 if (local_got_refcounts == NULL)
2592 {
2593 bfd_size_type size;
2594
2595 size = symtab_hdr->sh_info;
2596 size *= sizeof (bfd_signed_vma)
2597 + sizeof (bfd_vma) + sizeof (char);
2598 local_got_refcounts = ((bfd_signed_vma *)
2599 bfd_zalloc (abfd, size));
2600 if (local_got_refcounts == NULL)
2601 goto error_return;
2602 elf_local_got_refcounts (abfd) = local_got_refcounts;
2603 elf_x86_64_local_tlsdesc_gotent (abfd)
2604 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
2605 elf_x86_64_local_got_tls_type (abfd)
2606 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
2607 }
2608 local_got_refcounts[r_symndx] += 1;
2609 old_tls_type
2610 = elf_x86_64_local_got_tls_type (abfd) [r_symndx];
2611 }
2612
2613 /* If a TLS symbol is accessed using IE at least once,
2614 there is no point to use dynamic model for it. */
2615 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
2616 && (! GOT_TLS_GD_ANY_P (old_tls_type)
2617 || tls_type != GOT_TLS_IE))
2618 {
2619 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
2620 tls_type = old_tls_type;
2621 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2622 && GOT_TLS_GD_ANY_P (tls_type))
2623 tls_type |= old_tls_type;
2624 else
2625 {
2626 if (h)
2627 name = h->root.root.string;
2628 else
2629 name = bfd_elf_sym_name (abfd, symtab_hdr,
2630 isym, NULL);
2631 _bfd_error_handler
2632 /* xgettext:c-format */
2633 (_("%B: '%s' accessed both as normal and"
2634 " thread local symbol"),
2635 abfd, name);
2636 bfd_set_error (bfd_error_bad_value);
2637 goto error_return;
2638 }
2639 }
2640
2641 if (old_tls_type != tls_type)
2642 {
2643 if (eh != NULL)
2644 eh->tls_type = tls_type;
2645 else
2646 elf_x86_64_local_got_tls_type (abfd) [r_symndx] = tls_type;
2647 }
2648 }
2649 /* Fall through */
2650
2651 case R_X86_64_GOTOFF64:
2652 case R_X86_64_GOTPC32:
2653 case R_X86_64_GOTPC64:
2654 create_got:
2655 if (eh != NULL)
2656 eh->has_got_reloc = 1;
2657 break;
2658
2659 case R_X86_64_PLT32:
2660 case R_X86_64_PLT32_BND:
2661 /* This symbol requires a procedure linkage table entry. We
2662 actually build the entry in adjust_dynamic_symbol,
2663 because this might be a case of linking PIC code which is
2664 never referenced by a dynamic object, in which case we
2665 don't need to generate a procedure linkage table entry
2666 after all. */
2667
2668 /* If this is a local symbol, we resolve it directly without
2669 creating a procedure linkage table entry. */
2670 if (h == NULL)
2671 continue;
2672
2673 eh->has_got_reloc = 1;
2674 h->needs_plt = 1;
2675 h->plt.refcount += 1;
2676 break;
2677
2678 case R_X86_64_PLTOFF64:
2679 /* This tries to form the 'address' of a function relative
2680 to GOT. For global symbols we need a PLT entry. */
2681 if (h != NULL)
2682 {
2683 h->needs_plt = 1;
2684 h->plt.refcount += 1;
2685 }
2686 goto create_got;
2687
2688 case R_X86_64_SIZE32:
2689 case R_X86_64_SIZE64:
2690 size_reloc = TRUE;
2691 goto do_size;
2692
2693 case R_X86_64_32:
2694 if (!ABI_64_P (abfd))
2695 goto pointer;
2696 /* Fall through. */
2697 case R_X86_64_8:
2698 case R_X86_64_16:
2699 case R_X86_64_32S:
2700 /* Check relocation overflow as these relocs may lead to
2701 run-time relocation overflow. Don't error out for
2702 sections we don't care about, such as debug sections or
2703 when relocation overflow check is disabled. */
2704 if (!info->no_reloc_overflow_check
2705 && (bfd_link_pic (info)
2706 || (bfd_link_executable (info)
2707 && h != NULL
2708 && !h->def_regular
2709 && h->def_dynamic
2710 && (sec->flags & SEC_READONLY) == 0)))
2711 return elf_x86_64_need_pic (abfd, sec, h, symtab_hdr, isym,
2712 &x86_64_elf_howto_table[r_type]);
2713 /* Fall through. */
2714
2715 case R_X86_64_PC8:
2716 case R_X86_64_PC16:
2717 case R_X86_64_PC32:
2718 case R_X86_64_PC32_BND:
2719 case R_X86_64_PC64:
2720 case R_X86_64_64:
2721 pointer:
2722 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
2723 eh->has_non_got_reloc = 1;
2724 /* We are called after all symbols have been resolved. Only
2725 relocation against STT_GNU_IFUNC symbol must go through
2726 PLT. */
2727 if (h != NULL
2728 && (bfd_link_executable (info)
2729 || h->type == STT_GNU_IFUNC))
2730 {
2731 /* If this reloc is in a read-only section, we might
2732 need a copy reloc. We can't check reliably at this
2733 stage whether the section is read-only, as input
2734 sections have not yet been mapped to output sections.
2735 Tentatively set the flag for now, and correct in
2736 adjust_dynamic_symbol. */
2737 h->non_got_ref = 1;
2738
2739 /* We may need a .plt entry if the symbol is a function
2740 defined in a shared lib or is a STT_GNU_IFUNC function
2741 referenced from the code or read-only section. */
2742 if (!h->def_regular
2743 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2744 h->plt.refcount += 1;
2745
2746 if (r_type == R_X86_64_PC32)
2747 {
2748 /* Since something like ".long foo - ." may be used
2749 as pointer, make sure that PLT is used if foo is
2750 a function defined in a shared library. */
2751 if ((sec->flags & SEC_CODE) == 0)
2752 h->pointer_equality_needed = 1;
2753 }
2754 else if (r_type != R_X86_64_PC32_BND
2755 && r_type != R_X86_64_PC64)
2756 {
2757 h->pointer_equality_needed = 1;
2758 /* At run-time, R_X86_64_64 can be resolved for both
2759 x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2760 can only be resolved for x32. */
2761 if ((sec->flags & SEC_READONLY) == 0
2762 && (r_type == R_X86_64_64
2763 || (!ABI_64_P (abfd)
2764 && (r_type == R_X86_64_32
2765 || r_type == R_X86_64_32S))))
2766 eh->func_pointer_refcount += 1;
2767 }
2768 }
2769
2770 size_reloc = FALSE;
2771 do_size:
2772 /* If we are creating a shared library, and this is a reloc
2773 against a global symbol, or a non PC relative reloc
2774 against a local symbol, then we need to copy the reloc
2775 into the shared library. However, if we are linking with
2776 -Bsymbolic, we do not need to copy a reloc against a
2777 global symbol which is defined in an object we are
2778 including in the link (i.e., DEF_REGULAR is set). At
2779 this point we have not seen all the input files, so it is
2780 possible that DEF_REGULAR is not set now but will be set
2781 later (it is never cleared). In case of a weak definition,
2782 DEF_REGULAR may be cleared later by a strong definition in
2783 a shared library. We account for that possibility below by
2784 storing information in the relocs_copied field of the hash
2785 table entry. A similar situation occurs when creating
2786 shared libraries and symbol visibility changes render the
2787 symbol local.
2788
2789 If on the other hand, we are creating an executable, we
2790 may need to keep relocations for symbols satisfied by a
2791 dynamic library if we manage to avoid copy relocs for the
2792 symbol.
2793
2794 Generate dynamic pointer relocation against STT_GNU_IFUNC
2795 symbol in the non-code section. */
2796 if ((bfd_link_pic (info)
2797 && (! IS_X86_64_PCREL_TYPE (r_type)
2798 || (h != NULL
2799 && (! (bfd_link_pie (info)
2800 || SYMBOLIC_BIND (info, h))
2801 || h->root.type == bfd_link_hash_defweak
2802 || !h->def_regular))))
2803 || (h != NULL
2804 && h->type == STT_GNU_IFUNC
2805 && r_type == htab->pointer_r_type
2806 && (sec->flags & SEC_CODE) == 0)
2807 || (ELIMINATE_COPY_RELOCS
2808 && !bfd_link_pic (info)
2809 && h != NULL
2810 && (h->root.type == bfd_link_hash_defweak
2811 || !h->def_regular)))
2812 {
2813 struct elf_dyn_relocs *p;
2814 struct elf_dyn_relocs **head;
2815
2816 /* We must copy these reloc types into the output file.
2817 Create a reloc section in dynobj and make room for
2818 this reloc. */
2819 if (sreloc == NULL)
2820 {
2821 sreloc = _bfd_elf_make_dynamic_reloc_section
2822 (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2823 abfd, /*rela?*/ TRUE);
2824
2825 if (sreloc == NULL)
2826 goto error_return;
2827 }
2828
2829 /* If this is a global symbol, we count the number of
2830 relocations we need for this symbol. */
2831 if (h != NULL)
2832 head = &eh->dyn_relocs;
2833 else
2834 {
2835 /* Track dynamic relocs needed for local syms too.
2836 We really need local syms available to do this
2837 easily. Oh well. */
2838 asection *s;
2839 void **vpp;
2840
2841 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2842 abfd, r_symndx);
2843 if (isym == NULL)
2844 goto error_return;
2845
2846 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
2847 if (s == NULL)
2848 s = sec;
2849
2850 /* Beware of type punned pointers vs strict aliasing
2851 rules. */
2852 vpp = &(elf_section_data (s)->local_dynrel);
2853 head = (struct elf_dyn_relocs **)vpp;
2854 }
2855
2856 p = *head;
2857 if (p == NULL || p->sec != sec)
2858 {
2859 bfd_size_type amt = sizeof *p;
2860
2861 p = ((struct elf_dyn_relocs *)
2862 bfd_alloc (htab->elf.dynobj, amt));
2863 if (p == NULL)
2864 goto error_return;
2865 p->next = *head;
2866 *head = p;
2867 p->sec = sec;
2868 p->count = 0;
2869 p->pc_count = 0;
2870 }
2871
2872 p->count += 1;
2873 /* Count size relocation as PC-relative relocation. */
2874 if (IS_X86_64_PCREL_TYPE (r_type) || size_reloc)
2875 p->pc_count += 1;
2876 }
2877 break;
2878
2879 /* This relocation describes the C++ object vtable hierarchy.
2880 Reconstruct it for later use during GC. */
2881 case R_X86_64_GNU_VTINHERIT:
2882 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2883 goto error_return;
2884 break;
2885
2886 /* This relocation describes which C++ vtable entries are actually
2887 used. Record for later use during GC. */
2888 case R_X86_64_GNU_VTENTRY:
2889 BFD_ASSERT (h != NULL);
2890 if (h != NULL
2891 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2892 goto error_return;
2893 break;
2894
2895 default:
2896 break;
2897 }
2898
2899 if ((r_type == R_X86_64_GOTPCREL
2900 || r_type == R_X86_64_GOTPCRELX
2901 || r_type == R_X86_64_REX_GOTPCRELX)
2902 && (h == NULL || h->type != STT_GNU_IFUNC))
2903 sec->need_convert_load = 1;
2904 }
2905
2906 if (elf_section_data (sec)->this_hdr.contents != contents)
2907 {
2908 if (!info->keep_memory)
2909 free (contents);
2910 else
2911 {
2912 /* Cache the section contents for elf_link_input_bfd. */
2913 elf_section_data (sec)->this_hdr.contents = contents;
2914 }
2915 }
2916
2917 return TRUE;
2918
2919 error_return:
2920 if (elf_section_data (sec)->this_hdr.contents != contents)
2921 free (contents);
2922 sec->check_relocs_failed = 1;
2923 return FALSE;
2924 }
2925
2926 /* Return the section that should be marked against GC for a given
2927 relocation. */
2928
2929 static asection *
2930 elf_x86_64_gc_mark_hook (asection *sec,
2931 struct bfd_link_info *info,
2932 Elf_Internal_Rela *rel,
2933 struct elf_link_hash_entry *h,
2934 Elf_Internal_Sym *sym)
2935 {
2936 if (h != NULL)
2937 switch (ELF32_R_TYPE (rel->r_info))
2938 {
2939 case R_X86_64_GNU_VTINHERIT:
2940 case R_X86_64_GNU_VTENTRY:
2941 return NULL;
2942 }
2943
2944 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
2945 }
2946
2947 /* Remove undefined weak symbol from the dynamic symbol table if it
2948 is resolved to 0. */
2949
2950 static bfd_boolean
2951 elf_x86_64_fixup_symbol (struct bfd_link_info *info,
2952 struct elf_link_hash_entry *h)
2953 {
2954 if (h->dynindx != -1
2955 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
2956 elf_x86_64_hash_entry (h)->has_got_reloc,
2957 elf_x86_64_hash_entry (h)))
2958 {
2959 h->dynindx = -1;
2960 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
2961 h->dynstr_index);
2962 }
2963 return TRUE;
2964 }
2965
2966 /* Adjust a symbol defined by a dynamic object and referenced by a
2967 regular object. The current definition is in some section of the
2968 dynamic object, but we're not including those sections. We have to
2969 change the definition to something the rest of the link can
2970 understand. */
2971
2972 static bfd_boolean
2973 elf_x86_64_adjust_dynamic_symbol (struct bfd_link_info *info,
2974 struct elf_link_hash_entry *h)
2975 {
2976 struct elf_x86_64_link_hash_table *htab;
2977 asection *s, *srel;
2978 struct elf_x86_64_link_hash_entry *eh;
2979 struct elf_dyn_relocs *p;
2980
2981 /* STT_GNU_IFUNC symbol must go through PLT. */
2982 if (h->type == STT_GNU_IFUNC)
2983 {
2984 /* All local STT_GNU_IFUNC references must be treate as local
2985 calls via local PLT. */
2986 if (h->ref_regular
2987 && SYMBOL_CALLS_LOCAL (info, h))
2988 {
2989 bfd_size_type pc_count = 0, count = 0;
2990 struct elf_dyn_relocs **pp;
2991
2992 eh = (struct elf_x86_64_link_hash_entry *) h;
2993 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2994 {
2995 pc_count += p->pc_count;
2996 p->count -= p->pc_count;
2997 p->pc_count = 0;
2998 count += p->count;
2999 if (p->count == 0)
3000 *pp = p->next;
3001 else
3002 pp = &p->next;
3003 }
3004
3005 if (pc_count || count)
3006 {
3007 h->non_got_ref = 1;
3008 if (pc_count)
3009 {
3010 /* Increment PLT reference count only for PC-relative
3011 references. */
3012 h->needs_plt = 1;
3013 if (h->plt.refcount <= 0)
3014 h->plt.refcount = 1;
3015 else
3016 h->plt.refcount += 1;
3017 }
3018 }
3019 }
3020
3021 if (h->plt.refcount <= 0)
3022 {
3023 h->plt.offset = (bfd_vma) -1;
3024 h->needs_plt = 0;
3025 }
3026 return TRUE;
3027 }
3028
3029 /* If this is a function, put it in the procedure linkage table. We
3030 will fill in the contents of the procedure linkage table later,
3031 when we know the address of the .got section. */
3032 if (h->type == STT_FUNC
3033 || h->needs_plt)
3034 {
3035 if (h->plt.refcount <= 0
3036 || SYMBOL_CALLS_LOCAL (info, h)
3037 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
3038 && h->root.type == bfd_link_hash_undefweak))
3039 {
3040 /* This case can occur if we saw a PLT32 reloc in an input
3041 file, but the symbol was never referred to by a dynamic
3042 object, or if all references were garbage collected. In
3043 such a case, we don't actually need to build a procedure
3044 linkage table, and we can just do a PC32 reloc instead. */
3045 h->plt.offset = (bfd_vma) -1;
3046 h->needs_plt = 0;
3047 }
3048
3049 return TRUE;
3050 }
3051 else
3052 /* It's possible that we incorrectly decided a .plt reloc was
3053 needed for an R_X86_64_PC32 reloc to a non-function sym in
3054 check_relocs. We can't decide accurately between function and
3055 non-function syms in check-relocs; Objects loaded later in
3056 the link may change h->type. So fix it now. */
3057 h->plt.offset = (bfd_vma) -1;
3058
3059 /* If this is a weak symbol, and there is a real definition, the
3060 processor independent code will have arranged for us to see the
3061 real definition first, and we can just use the same value. */
3062 if (h->u.weakdef != NULL)
3063 {
3064 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
3065 || h->u.weakdef->root.type == bfd_link_hash_defweak);
3066 h->root.u.def.section = h->u.weakdef->root.u.def.section;
3067 h->root.u.def.value = h->u.weakdef->root.u.def.value;
3068 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
3069 {
3070 eh = (struct elf_x86_64_link_hash_entry *) h;
3071 h->non_got_ref = h->u.weakdef->non_got_ref;
3072 eh->needs_copy = h->u.weakdef->needs_copy;
3073 }
3074 return TRUE;
3075 }
3076
3077 /* This is a reference to a symbol defined by a dynamic object which
3078 is not a function. */
3079
3080 /* If we are creating a shared library, we must presume that the
3081 only references to the symbol are via the global offset table.
3082 For such cases we need not do anything here; the relocations will
3083 be handled correctly by relocate_section. */
3084 if (!bfd_link_executable (info))
3085 return TRUE;
3086
3087 /* If there are no references to this symbol that do not use the
3088 GOT, we don't need to generate a copy reloc. */
3089 if (!h->non_got_ref)
3090 return TRUE;
3091
3092 /* If -z nocopyreloc was given, we won't generate them either. */
3093 if (info->nocopyreloc)
3094 {
3095 h->non_got_ref = 0;
3096 return TRUE;
3097 }
3098
3099 if (ELIMINATE_COPY_RELOCS)
3100 {
3101 eh = (struct elf_x86_64_link_hash_entry *) h;
3102 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3103 {
3104 s = p->sec->output_section;
3105 if (s != NULL && (s->flags & SEC_READONLY) != 0)
3106 break;
3107 }
3108
3109 /* If we didn't find any dynamic relocs in read-only sections, then
3110 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
3111 if (p == NULL)
3112 {
3113 h->non_got_ref = 0;
3114 return TRUE;
3115 }
3116 }
3117
3118 /* We must allocate the symbol in our .dynbss section, which will
3119 become part of the .bss section of the executable. There will be
3120 an entry for this symbol in the .dynsym section. The dynamic
3121 object will contain position independent code, so all references
3122 from the dynamic object to this symbol will go through the global
3123 offset table. The dynamic linker will use the .dynsym entry to
3124 determine the address it must put in the global offset table, so
3125 both the dynamic object and the regular object will refer to the
3126 same memory location for the variable. */
3127
3128 htab = elf_x86_64_hash_table (info);
3129 if (htab == NULL)
3130 return FALSE;
3131
3132 /* We must generate a R_X86_64_COPY reloc to tell the dynamic linker
3133 to copy the initial value out of the dynamic object and into the
3134 runtime process image. */
3135 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
3136 {
3137 s = htab->elf.sdynrelro;
3138 srel = htab->elf.sreldynrelro;
3139 }
3140 else
3141 {
3142 s = htab->elf.sdynbss;
3143 srel = htab->elf.srelbss;
3144 }
3145 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
3146 {
3147 const struct elf_backend_data *bed;
3148 bed = get_elf_backend_data (info->output_bfd);
3149 srel->size += bed->s->sizeof_rela;
3150 h->needs_copy = 1;
3151 }
3152
3153 return _bfd_elf_adjust_dynamic_copy (info, h, s);
3154 }
3155
3156 /* Allocate space in .plt, .got and associated reloc sections for
3157 dynamic relocs. */
3158
3159 static bfd_boolean
3160 elf_x86_64_allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
3161 {
3162 struct bfd_link_info *info;
3163 struct elf_x86_64_link_hash_table *htab;
3164 struct elf_x86_64_link_hash_entry *eh;
3165 struct elf_dyn_relocs *p;
3166 const struct elf_backend_data *bed;
3167 unsigned int plt_entry_size;
3168 bfd_boolean resolved_to_zero;
3169
3170 if (h->root.type == bfd_link_hash_indirect)
3171 return TRUE;
3172
3173 eh = (struct elf_x86_64_link_hash_entry *) h;
3174
3175 info = (struct bfd_link_info *) inf;
3176 htab = elf_x86_64_hash_table (info);
3177 if (htab == NULL)
3178 return FALSE;
3179 bed = get_elf_backend_data (info->output_bfd);
3180 plt_entry_size = htab->plt.plt_entry_size;
3181
3182 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
3183 eh->has_got_reloc,
3184 eh);
3185
3186 /* We can't use the GOT PLT if pointer equality is needed since
3187 finish_dynamic_symbol won't clear symbol value and the dynamic
3188 linker won't update the GOT slot. We will get into an infinite
3189 loop at run-time. */
3190 if (htab->plt_got != NULL
3191 && h->type != STT_GNU_IFUNC
3192 && !h->pointer_equality_needed
3193 && h->plt.refcount > 0
3194 && h->got.refcount > 0)
3195 {
3196 /* Don't use the regular PLT if there are both GOT and GOTPLT
3197 reloctions. */
3198 h->plt.offset = (bfd_vma) -1;
3199
3200 /* Use the GOT PLT. */
3201 eh->plt_got.refcount = 1;
3202 }
3203
3204 /* Clear the reference count of function pointer relocations if
3205 symbol isn't a normal function. */
3206 if (h->type != STT_FUNC)
3207 eh->func_pointer_refcount = 0;
3208
3209 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
3210 here if it is defined and referenced in a non-shared object. */
3211 if (h->type == STT_GNU_IFUNC
3212 && h->def_regular)
3213 {
3214 if (_bfd_elf_allocate_ifunc_dyn_relocs (info, h,
3215 &eh->dyn_relocs,
3216 &htab->readonly_dynrelocs_against_ifunc,
3217 plt_entry_size,
3218 (htab->plt.has_plt0
3219 * plt_entry_size),
3220 GOT_ENTRY_SIZE, TRUE))
3221 {
3222 asection *s = htab->plt_second;
3223 if (h->plt.offset != (bfd_vma) -1 && s != NULL)
3224 {
3225 /* Use the second PLT section if it is created. */
3226 eh->plt_second.offset = s->size;
3227
3228 /* Make room for this entry in the second PLT section. */
3229 s->size += htab->non_lazy_plt->plt_entry_size;
3230 }
3231
3232 return TRUE;
3233 }
3234 else
3235 return FALSE;
3236 }
3237 /* Don't create the PLT entry if there are only function pointer
3238 relocations which can be resolved at run-time. */
3239 else if (htab->elf.dynamic_sections_created
3240 && (h->plt.refcount > eh->func_pointer_refcount
3241 || eh->plt_got.refcount > 0))
3242 {
3243 bfd_boolean use_plt_got = eh->plt_got.refcount > 0;
3244
3245 /* Clear the reference count of function pointer relocations
3246 if PLT is used. */
3247 eh->func_pointer_refcount = 0;
3248
3249 /* Make sure this symbol is output as a dynamic symbol.
3250 Undefined weak syms won't yet be marked as dynamic. */
3251 if (h->dynindx == -1
3252 && !h->forced_local
3253 && !resolved_to_zero
3254 && h->root.type == bfd_link_hash_undefweak)
3255 {
3256 if (! bfd_elf_link_record_dynamic_symbol (info, h))
3257 return FALSE;
3258 }
3259
3260 if (bfd_link_pic (info)
3261 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
3262 {
3263 asection *s = htab->elf.splt;
3264 asection *second_s = htab->plt_second;
3265 asection *got_s = htab->plt_got;
3266
3267 /* If this is the first .plt entry, make room for the special
3268 first entry. The .plt section is used by prelink to undo
3269 prelinking for dynamic relocations. */
3270 if (s->size == 0)
3271 s->size = htab->plt.has_plt0 * plt_entry_size;
3272
3273 if (use_plt_got)
3274 eh->plt_got.offset = got_s->size;
3275 else
3276 {
3277 h->plt.offset = s->size;
3278 if (second_s)
3279 eh->plt_second.offset = second_s->size;
3280 }
3281
3282 /* If this symbol is not defined in a regular file, and we are
3283 not generating a shared library, then set the symbol to this
3284 location in the .plt. This is required to make function
3285 pointers compare as equal between the normal executable and
3286 the shared library. */
3287 if (! bfd_link_pic (info)
3288 && !h->def_regular)
3289 {
3290 if (use_plt_got)
3291 {
3292 /* We need to make a call to the entry of the GOT PLT
3293 instead of regular PLT entry. */
3294 h->root.u.def.section = got_s;
3295 h->root.u.def.value = eh->plt_got.offset;
3296 }
3297 else
3298 {
3299 if (second_s)
3300 {
3301 /* We need to make a call to the entry of the
3302 second PLT instead of regular PLT entry. */
3303 h->root.u.def.section = second_s;
3304 h->root.u.def.value = eh->plt_second.offset;
3305 }
3306 else
3307 {
3308 h->root.u.def.section = s;
3309 h->root.u.def.value = h->plt.offset;
3310 }
3311 }
3312 }
3313
3314 /* Make room for this entry. */
3315 if (use_plt_got)
3316 got_s->size += htab->non_lazy_plt->plt_entry_size;
3317 else
3318 {
3319 s->size += plt_entry_size;
3320 if (second_s)
3321 second_s->size += htab->non_lazy_plt->plt_entry_size;
3322
3323 /* We also need to make an entry in the .got.plt section,
3324 which will be placed in the .got section by the linker
3325 script. */
3326 htab->elf.sgotplt->size += GOT_ENTRY_SIZE;
3327
3328 /* There should be no PLT relocation against resolved
3329 undefined weak symbol in executable. */
3330 if (!resolved_to_zero)
3331 {
3332 /* We also need to make an entry in the .rela.plt
3333 section. */
3334 htab->elf.srelplt->size += bed->s->sizeof_rela;
3335 htab->elf.srelplt->reloc_count++;
3336 }
3337 }
3338 }
3339 else
3340 {
3341 eh->plt_got.offset = (bfd_vma) -1;
3342 h->plt.offset = (bfd_vma) -1;
3343 h->needs_plt = 0;
3344 }
3345 }
3346 else
3347 {
3348 eh->plt_got.offset = (bfd_vma) -1;
3349 h->plt.offset = (bfd_vma) -1;
3350 h->needs_plt = 0;
3351 }
3352
3353 eh->tlsdesc_got = (bfd_vma) -1;
3354
3355 /* If R_X86_64_GOTTPOFF symbol is now local to the binary,
3356 make it a R_X86_64_TPOFF32 requiring no GOT entry. */
3357 if (h->got.refcount > 0
3358 && bfd_link_executable (info)
3359 && h->dynindx == -1
3360 && elf_x86_64_hash_entry (h)->tls_type == GOT_TLS_IE)
3361 {
3362 h->got.offset = (bfd_vma) -1;
3363 }
3364 else if (h->got.refcount > 0)
3365 {
3366 asection *s;
3367 bfd_boolean dyn;
3368 int tls_type = elf_x86_64_hash_entry (h)->tls_type;
3369
3370 /* Make sure this symbol is output as a dynamic symbol.
3371 Undefined weak syms won't yet be marked as dynamic. */
3372 if (h->dynindx == -1
3373 && !h->forced_local
3374 && !resolved_to_zero
3375 && h->root.type == bfd_link_hash_undefweak)
3376 {
3377 if (! bfd_elf_link_record_dynamic_symbol (info, h))
3378 return FALSE;
3379 }
3380
3381 if (GOT_TLS_GDESC_P (tls_type))
3382 {
3383 eh->tlsdesc_got = htab->elf.sgotplt->size
3384 - elf_x86_64_compute_jump_table_size (htab);
3385 htab->elf.sgotplt->size += 2 * GOT_ENTRY_SIZE;
3386 h->got.offset = (bfd_vma) -2;
3387 }
3388 if (! GOT_TLS_GDESC_P (tls_type)
3389 || GOT_TLS_GD_P (tls_type))
3390 {
3391 s = htab->elf.sgot;
3392 h->got.offset = s->size;
3393 s->size += GOT_ENTRY_SIZE;
3394 if (GOT_TLS_GD_P (tls_type))
3395 s->size += GOT_ENTRY_SIZE;
3396 }
3397 dyn = htab->elf.dynamic_sections_created;
3398 /* R_X86_64_TLSGD needs one dynamic relocation if local symbol
3399 and two if global. R_X86_64_GOTTPOFF needs one dynamic
3400 relocation. No dynamic relocation against resolved undefined
3401 weak symbol in executable. */
3402 if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
3403 || tls_type == GOT_TLS_IE)
3404 htab->elf.srelgot->size += bed->s->sizeof_rela;
3405 else if (GOT_TLS_GD_P (tls_type))
3406 htab->elf.srelgot->size += 2 * bed->s->sizeof_rela;
3407 else if (! GOT_TLS_GDESC_P (tls_type)
3408 && ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3409 && !resolved_to_zero)
3410 || h->root.type != bfd_link_hash_undefweak)
3411 && (bfd_link_pic (info)
3412 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
3413 htab->elf.srelgot->size += bed->s->sizeof_rela;
3414 if (GOT_TLS_GDESC_P (tls_type))
3415 {
3416 htab->elf.srelplt->size += bed->s->sizeof_rela;
3417 htab->tlsdesc_plt = (bfd_vma) -1;
3418 }
3419 }
3420 else
3421 h->got.offset = (bfd_vma) -1;
3422
3423 if (eh->dyn_relocs == NULL)
3424 return TRUE;
3425
3426 /* In the shared -Bsymbolic case, discard space allocated for
3427 dynamic pc-relative relocs against symbols which turn out to be
3428 defined in regular objects. For the normal shared case, discard
3429 space for pc-relative relocs that have become local due to symbol
3430 visibility changes. */
3431
3432 if (bfd_link_pic (info))
3433 {
3434 /* Relocs that use pc_count are those that appear on a call
3435 insn, or certain REL relocs that can generated via assembly.
3436 We want calls to protected symbols to resolve directly to the
3437 function rather than going via the plt. If people want
3438 function pointer comparisons to work as expected then they
3439 should avoid writing weird assembly. */
3440 if (SYMBOL_CALLS_LOCAL (info, h))
3441 {
3442 struct elf_dyn_relocs **pp;
3443
3444 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
3445 {
3446 p->count -= p->pc_count;
3447 p->pc_count = 0;
3448 if (p->count == 0)
3449 *pp = p->next;
3450 else
3451 pp = &p->next;
3452 }
3453 }
3454
3455 /* Also discard relocs on undefined weak syms with non-default
3456 visibility or in PIE. */
3457 if (eh->dyn_relocs != NULL)
3458 {
3459 if (h->root.type == bfd_link_hash_undefweak)
3460 {
3461 /* Undefined weak symbol is never bound locally in shared
3462 library. */
3463 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
3464 || resolved_to_zero)
3465 eh->dyn_relocs = NULL;
3466 else if (h->dynindx == -1
3467 && ! h->forced_local
3468 && ! bfd_elf_link_record_dynamic_symbol (info, h))
3469 return FALSE;
3470 }
3471 /* For PIE, discard space for pc-relative relocs against
3472 symbols which turn out to need copy relocs. */
3473 else if (bfd_link_executable (info)
3474 && (h->needs_copy || eh->needs_copy)
3475 && h->def_dynamic
3476 && !h->def_regular)
3477 {
3478 struct elf_dyn_relocs **pp;
3479
3480 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
3481 {
3482 if (p->pc_count != 0)
3483 *pp = p->next;
3484 else
3485 pp = &p->next;
3486 }
3487 }
3488 }
3489 }
3490 else if (ELIMINATE_COPY_RELOCS)
3491 {
3492 /* For the non-shared case, discard space for relocs against
3493 symbols which turn out to need copy relocs or are not
3494 dynamic. Keep dynamic relocations for run-time function
3495 pointer initialization. */
3496
3497 if ((!h->non_got_ref
3498 || eh->func_pointer_refcount > 0
3499 || (h->root.type == bfd_link_hash_undefweak
3500 && !resolved_to_zero))
3501 && ((h->def_dynamic
3502 && !h->def_regular)
3503 || (htab->elf.dynamic_sections_created
3504 && (h->root.type == bfd_link_hash_undefweak
3505 || h->root.type == bfd_link_hash_undefined))))
3506 {
3507 /* Make sure this symbol is output as a dynamic symbol.
3508 Undefined weak syms won't yet be marked as dynamic. */
3509 if (h->dynindx == -1
3510 && ! h->forced_local
3511 && ! resolved_to_zero
3512 && h->root.type == bfd_link_hash_undefweak
3513 && ! bfd_elf_link_record_dynamic_symbol (info, h))
3514 return FALSE;
3515
3516 /* If that succeeded, we know we'll be keeping all the
3517 relocs. */
3518 if (h->dynindx != -1)
3519 goto keep;
3520 }
3521
3522 eh->dyn_relocs = NULL;
3523 eh->func_pointer_refcount = 0;
3524
3525 keep: ;
3526 }
3527
3528 /* Finally, allocate space. */
3529 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3530 {
3531 asection * sreloc;
3532
3533 sreloc = elf_section_data (p->sec)->sreloc;
3534
3535 BFD_ASSERT (sreloc != NULL);
3536
3537 sreloc->size += p->count * bed->s->sizeof_rela;
3538 }
3539
3540 return TRUE;
3541 }
3542
3543 /* Allocate space in .plt, .got and associated reloc sections for
3544 local dynamic relocs. */
3545
3546 static bfd_boolean
3547 elf_x86_64_allocate_local_dynrelocs (void **slot, void *inf)
3548 {
3549 struct elf_link_hash_entry *h
3550 = (struct elf_link_hash_entry *) *slot;
3551
3552 if (h->type != STT_GNU_IFUNC
3553 || !h->def_regular
3554 || !h->ref_regular
3555 || !h->forced_local
3556 || h->root.type != bfd_link_hash_defined)
3557 abort ();
3558
3559 return elf_x86_64_allocate_dynrelocs (h, inf);
3560 }
3561
3562 /* Find any dynamic relocs that apply to read-only sections. */
3563
3564 static bfd_boolean
3565 elf_x86_64_readonly_dynrelocs (struct elf_link_hash_entry *h,
3566 void * inf)
3567 {
3568 struct elf_x86_64_link_hash_entry *eh;
3569 struct elf_dyn_relocs *p;
3570
3571 /* Skip local IFUNC symbols. */
3572 if (h->forced_local && h->type == STT_GNU_IFUNC)
3573 return TRUE;
3574
3575 eh = (struct elf_x86_64_link_hash_entry *) h;
3576 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3577 {
3578 asection *s = p->sec->output_section;
3579
3580 if (s != NULL && (s->flags & SEC_READONLY) != 0)
3581 {
3582 struct bfd_link_info *info = (struct bfd_link_info *) inf;
3583
3584 info->flags |= DF_TEXTREL;
3585
3586 if ((info->warn_shared_textrel && bfd_link_pic (info))
3587 || info->error_textrel)
3588 /* xgettext:c-format */
3589 info->callbacks->einfo (_("%P: %B: warning: relocation against `%s' in readonly section `%A'\n"),
3590 p->sec->owner, h->root.root.string,
3591 p->sec);
3592
3593 /* Not an error, just cut short the traversal. */
3594 return FALSE;
3595 }
3596 }
3597 return TRUE;
3598 }
3599
3600 /* Convert load via the GOT slot to load immediate. */
3601
3602 static bfd_boolean
3603 elf_x86_64_convert_load (bfd *abfd, asection *sec,
3604 struct bfd_link_info *link_info)
3605 {
3606 Elf_Internal_Shdr *symtab_hdr;
3607 Elf_Internal_Rela *internal_relocs;
3608 Elf_Internal_Rela *irel, *irelend;
3609 bfd_byte *contents;
3610 struct elf_x86_64_link_hash_table *htab;
3611 bfd_boolean changed;
3612 bfd_signed_vma *local_got_refcounts;
3613
3614 /* Don't even try to convert non-ELF outputs. */
3615 if (!is_elf_hash_table (link_info->hash))
3616 return FALSE;
3617
3618 /* Nothing to do if there is no need or no output. */
3619 if ((sec->flags & (SEC_CODE | SEC_RELOC)) != (SEC_CODE | SEC_RELOC)
3620 || sec->need_convert_load == 0
3621 || bfd_is_abs_section (sec->output_section))
3622 return TRUE;
3623
3624 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3625
3626 /* Load the relocations for this section. */
3627 internal_relocs = (_bfd_elf_link_read_relocs
3628 (abfd, sec, NULL, (Elf_Internal_Rela *) NULL,
3629 link_info->keep_memory));
3630 if (internal_relocs == NULL)
3631 return FALSE;
3632
3633 changed = FALSE;
3634 htab = elf_x86_64_hash_table (link_info);
3635 local_got_refcounts = elf_local_got_refcounts (abfd);
3636
3637 /* Get the section contents. */
3638 if (elf_section_data (sec)->this_hdr.contents != NULL)
3639 contents = elf_section_data (sec)->this_hdr.contents;
3640 else
3641 {
3642 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
3643 goto error_return;
3644 }
3645
3646 irelend = internal_relocs + sec->reloc_count;
3647 for (irel = internal_relocs; irel < irelend; irel++)
3648 {
3649 unsigned int r_type = ELF32_R_TYPE (irel->r_info);
3650 unsigned int r_symndx;
3651 struct elf_link_hash_entry *h;
3652 bfd_boolean converted;
3653
3654 if (r_type != R_X86_64_GOTPCRELX
3655 && r_type != R_X86_64_REX_GOTPCRELX
3656 && r_type != R_X86_64_GOTPCREL)
3657 continue;
3658
3659 r_symndx = htab->r_sym (irel->r_info);
3660 if (r_symndx < symtab_hdr->sh_info)
3661 h = elf_x86_64_get_local_sym_hash (htab, sec->owner,
3662 (const Elf_Internal_Rela *) irel,
3663 FALSE);
3664 else
3665 {
3666 h = elf_sym_hashes (abfd)[r_symndx - symtab_hdr->sh_info];
3667 while (h->root.type == bfd_link_hash_indirect
3668 || h->root.type == bfd_link_hash_warning)
3669 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3670 }
3671
3672 /* STT_GNU_IFUNC must keep GOTPCREL relocations. */
3673 if (h != NULL && h->type == STT_GNU_IFUNC)
3674 continue;
3675
3676 converted = FALSE;
3677 if (!elf_x86_64_convert_load_reloc (abfd, sec, contents, irel, h,
3678 &converted, link_info))
3679 goto error_return;
3680
3681 if (converted)
3682 {
3683 changed = converted;
3684 if (h)
3685 {
3686 if (h->got.refcount > 0)
3687 h->got.refcount -= 1;
3688 }
3689 else
3690 {
3691 if (local_got_refcounts != NULL
3692 && local_got_refcounts[r_symndx] > 0)
3693 local_got_refcounts[r_symndx] -= 1;
3694 }
3695 }
3696 }
3697
3698 if (contents != NULL
3699 && elf_section_data (sec)->this_hdr.contents != contents)
3700 {
3701 if (!changed && !link_info->keep_memory)
3702 free (contents);
3703 else
3704 {
3705 /* Cache the section contents for elf_link_input_bfd. */
3706 elf_section_data (sec)->this_hdr.contents = contents;
3707 }
3708 }
3709
3710 if (elf_section_data (sec)->relocs != internal_relocs)
3711 {
3712 if (!changed)
3713 free (internal_relocs);
3714 else
3715 elf_section_data (sec)->relocs = internal_relocs;
3716 }
3717
3718 return TRUE;
3719
3720 error_return:
3721 if (contents != NULL
3722 && elf_section_data (sec)->this_hdr.contents != contents)
3723 free (contents);
3724 if (internal_relocs != NULL
3725 && elf_section_data (sec)->relocs != internal_relocs)
3726 free (internal_relocs);
3727 return FALSE;
3728 }
3729
3730 /* Set the sizes of the dynamic sections. */
3731
3732 static bfd_boolean
3733 elf_x86_64_size_dynamic_sections (bfd *output_bfd,
3734 struct bfd_link_info *info)
3735 {
3736 struct elf_x86_64_link_hash_table *htab;
3737 bfd *dynobj;
3738 asection *s;
3739 bfd_boolean relocs;
3740 bfd *ibfd;
3741 const struct elf_backend_data *bed;
3742
3743 htab = elf_x86_64_hash_table (info);
3744 if (htab == NULL)
3745 return FALSE;
3746 bed = get_elf_backend_data (output_bfd);
3747
3748 dynobj = htab->elf.dynobj;
3749 if (dynobj == NULL)
3750 abort ();
3751
3752 /* Set up .got offsets for local syms, and space for local dynamic
3753 relocs. */
3754 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
3755 {
3756 bfd_signed_vma *local_got;
3757 bfd_signed_vma *end_local_got;
3758 char *local_tls_type;
3759 bfd_vma *local_tlsdesc_gotent;
3760 bfd_size_type locsymcount;
3761 Elf_Internal_Shdr *symtab_hdr;
3762 asection *srel;
3763
3764 if (! is_x86_64_elf (ibfd))
3765 continue;
3766
3767 for (s = ibfd->sections; s != NULL; s = s->next)
3768 {
3769 struct elf_dyn_relocs *p;
3770
3771 if (!elf_x86_64_convert_load (ibfd, s, info))
3772 return FALSE;
3773
3774 for (p = (struct elf_dyn_relocs *)
3775 (elf_section_data (s)->local_dynrel);
3776 p != NULL;
3777 p = p->next)
3778 {
3779 if (!bfd_is_abs_section (p->sec)
3780 && bfd_is_abs_section (p->sec->output_section))
3781 {
3782 /* Input section has been discarded, either because
3783 it is a copy of a linkonce section or due to
3784 linker script /DISCARD/, so we'll be discarding
3785 the relocs too. */
3786 }
3787 else if (p->count != 0)
3788 {
3789 srel = elf_section_data (p->sec)->sreloc;
3790 srel->size += p->count * bed->s->sizeof_rela;
3791 if ((p->sec->output_section->flags & SEC_READONLY) != 0
3792 && (info->flags & DF_TEXTREL) == 0)
3793 {
3794 info->flags |= DF_TEXTREL;
3795 if ((info->warn_shared_textrel && bfd_link_pic (info))
3796 || info->error_textrel)
3797 /* xgettext:c-format */
3798 info->callbacks->einfo (_("%P: %B: warning: relocation in readonly section `%A'\n"),
3799 p->sec->owner, p->sec);
3800 }
3801 }
3802 }
3803 }
3804
3805 local_got = elf_local_got_refcounts (ibfd);
3806 if (!local_got)
3807 continue;
3808
3809 symtab_hdr = &elf_symtab_hdr (ibfd);
3810 locsymcount = symtab_hdr->sh_info;
3811 end_local_got = local_got + locsymcount;
3812 local_tls_type = elf_x86_64_local_got_tls_type (ibfd);
3813 local_tlsdesc_gotent = elf_x86_64_local_tlsdesc_gotent (ibfd);
3814 s = htab->elf.sgot;
3815 srel = htab->elf.srelgot;
3816 for (; local_got < end_local_got;
3817 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
3818 {
3819 *local_tlsdesc_gotent = (bfd_vma) -1;
3820 if (*local_got > 0)
3821 {
3822 if (GOT_TLS_GDESC_P (*local_tls_type))
3823 {
3824 *local_tlsdesc_gotent = htab->elf.sgotplt->size
3825 - elf_x86_64_compute_jump_table_size (htab);
3826 htab->elf.sgotplt->size += 2 * GOT_ENTRY_SIZE;
3827 *local_got = (bfd_vma) -2;
3828 }
3829 if (! GOT_TLS_GDESC_P (*local_tls_type)
3830 || GOT_TLS_GD_P (*local_tls_type))
3831 {
3832 *local_got = s->size;
3833 s->size += GOT_ENTRY_SIZE;
3834 if (GOT_TLS_GD_P (*local_tls_type))
3835 s->size += GOT_ENTRY_SIZE;
3836 }
3837 if (bfd_link_pic (info)
3838 || GOT_TLS_GD_ANY_P (*local_tls_type)
3839 || *local_tls_type == GOT_TLS_IE)
3840 {
3841 if (GOT_TLS_GDESC_P (*local_tls_type))
3842 {
3843 htab->elf.srelplt->size
3844 += bed->s->sizeof_rela;
3845 htab->tlsdesc_plt = (bfd_vma) -1;
3846 }
3847 if (! GOT_TLS_GDESC_P (*local_tls_type)
3848 || GOT_TLS_GD_P (*local_tls_type))
3849 srel->size += bed->s->sizeof_rela;
3850 }
3851 }
3852 else
3853 *local_got = (bfd_vma) -1;
3854 }
3855 }
3856
3857 if (htab->tls_ld_got.refcount > 0)
3858 {
3859 /* Allocate 2 got entries and 1 dynamic reloc for R_X86_64_TLSLD
3860 relocs. */
3861 htab->tls_ld_got.offset = htab->elf.sgot->size;
3862 htab->elf.sgot->size += 2 * GOT_ENTRY_SIZE;
3863 htab->elf.srelgot->size += bed->s->sizeof_rela;
3864 }
3865 else
3866 htab->tls_ld_got.offset = -1;
3867
3868 /* Allocate global sym .plt and .got entries, and space for global
3869 sym dynamic relocs. */
3870 elf_link_hash_traverse (&htab->elf, elf_x86_64_allocate_dynrelocs,
3871 info);
3872
3873 /* Allocate .plt and .got entries, and space for local symbols. */
3874 htab_traverse (htab->loc_hash_table,
3875 elf_x86_64_allocate_local_dynrelocs,
3876 info);
3877
3878 /* For every jump slot reserved in the sgotplt, reloc_count is
3879 incremented. However, when we reserve space for TLS descriptors,
3880 it's not incremented, so in order to compute the space reserved
3881 for them, it suffices to multiply the reloc count by the jump
3882 slot size.
3883
3884 PR ld/13302: We start next_irelative_index at the end of .rela.plt
3885 so that R_X86_64_IRELATIVE entries come last. */
3886 if (htab->elf.srelplt)
3887 {
3888 htab->sgotplt_jump_table_size
3889 = elf_x86_64_compute_jump_table_size (htab);
3890 htab->next_irelative_index = htab->elf.srelplt->reloc_count - 1;
3891 }
3892 else if (htab->elf.irelplt)
3893 htab->next_irelative_index = htab->elf.irelplt->reloc_count - 1;
3894
3895 if (htab->tlsdesc_plt)
3896 {
3897 /* If we're not using lazy TLS relocations, don't generate the
3898 PLT and GOT entries they require. */
3899 if ((info->flags & DF_BIND_NOW))
3900 htab->tlsdesc_plt = 0;
3901 else
3902 {
3903 htab->tlsdesc_got = htab->elf.sgot->size;
3904 htab->elf.sgot->size += GOT_ENTRY_SIZE;
3905 /* Reserve room for the initial entry.
3906 FIXME: we could probably do away with it in this case. */
3907 if (htab->elf.splt->size == 0)
3908 htab->elf.splt->size = htab->plt.plt_entry_size;
3909 htab->tlsdesc_plt = htab->elf.splt->size;
3910 htab->elf.splt->size += htab->plt.plt_entry_size;
3911 }
3912 }
3913
3914 if (htab->elf.sgotplt)
3915 {
3916 /* Don't allocate .got.plt section if there are no GOT nor PLT
3917 entries and there is no refeence to _GLOBAL_OFFSET_TABLE_. */
3918 if ((htab->elf.hgot == NULL
3919 || !htab->elf.hgot->ref_regular_nonweak)
3920 && (htab->elf.sgotplt->size
3921 == get_elf_backend_data (output_bfd)->got_header_size)
3922 && (htab->elf.splt == NULL
3923 || htab->elf.splt->size == 0)
3924 && (htab->elf.sgot == NULL
3925 || htab->elf.sgot->size == 0)
3926 && (htab->elf.iplt == NULL
3927 || htab->elf.iplt->size == 0)
3928 && (htab->elf.igotplt == NULL
3929 || htab->elf.igotplt->size == 0))
3930 htab->elf.sgotplt->size = 0;
3931 }
3932
3933 if (_bfd_elf_eh_frame_present (info))
3934 {
3935 if (htab->plt_eh_frame != NULL
3936 && htab->elf.splt != NULL
3937 && htab->elf.splt->size != 0
3938 && !bfd_is_abs_section (htab->elf.splt->output_section))
3939 htab->plt_eh_frame->size = htab->plt.eh_frame_plt_size;
3940
3941 if (htab->plt_got_eh_frame != NULL
3942 && htab->plt_got != NULL
3943 && htab->plt_got->size != 0
3944 && !bfd_is_abs_section (htab->plt_got->output_section))
3945 htab->plt_got_eh_frame->size
3946 = htab->non_lazy_plt->eh_frame_plt_size;
3947
3948 /* Unwind info for the second PLT and .plt.got sections are
3949 identical. */
3950 if (htab->plt_second_eh_frame != NULL
3951 && htab->plt_second != NULL
3952 && htab->plt_second->size != 0
3953 && !bfd_is_abs_section (htab->plt_second->output_section))
3954 htab->plt_second_eh_frame->size
3955 = htab->non_lazy_plt->eh_frame_plt_size;
3956 }
3957
3958 /* We now have determined the sizes of the various dynamic sections.
3959 Allocate memory for them. */
3960 relocs = FALSE;
3961 for (s = dynobj->sections; s != NULL; s = s->next)
3962 {
3963 if ((s->flags & SEC_LINKER_CREATED) == 0)
3964 continue;
3965
3966 if (s == htab->elf.splt
3967 || s == htab->elf.sgot
3968 || s == htab->elf.sgotplt
3969 || s == htab->elf.iplt
3970 || s == htab->elf.igotplt
3971 || s == htab->plt_second
3972 || s == htab->plt_got
3973 || s == htab->plt_eh_frame
3974 || s == htab->plt_got_eh_frame
3975 || s == htab->plt_second_eh_frame
3976 || s == htab->elf.sdynbss
3977 || s == htab->elf.sdynrelro)
3978 {
3979 /* Strip this section if we don't need it; see the
3980 comment below. */
3981 }
3982 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
3983 {
3984 if (s->size != 0 && s != htab->elf.srelplt)
3985 relocs = TRUE;
3986
3987 /* We use the reloc_count field as a counter if we need
3988 to copy relocs into the output file. */
3989 if (s != htab->elf.srelplt)
3990 s->reloc_count = 0;
3991 }
3992 else
3993 {
3994 /* It's not one of our sections, so don't allocate space. */
3995 continue;
3996 }
3997
3998 if (s->size == 0)
3999 {
4000 /* If we don't need this section, strip it from the
4001 output file. This is mostly to handle .rela.bss and
4002 .rela.plt. We must create both sections in
4003 create_dynamic_sections, because they must be created
4004 before the linker maps input sections to output
4005 sections. The linker does that before
4006 adjust_dynamic_symbol is called, and it is that
4007 function which decides whether anything needs to go
4008 into these sections. */
4009
4010 s->flags |= SEC_EXCLUDE;
4011 continue;
4012 }
4013
4014 if ((s->flags & SEC_HAS_CONTENTS) == 0)
4015 continue;
4016
4017 /* Allocate memory for the section contents. We use bfd_zalloc
4018 here in case unused entries are not reclaimed before the
4019 section's contents are written out. This should not happen,
4020 but this way if it does, we get a R_X86_64_NONE reloc instead
4021 of garbage. */
4022 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
4023 if (s->contents == NULL)
4024 return FALSE;
4025 }
4026
4027 if (htab->plt_eh_frame != NULL
4028 && htab->plt_eh_frame->contents != NULL)
4029 {
4030 memcpy (htab->plt_eh_frame->contents,
4031 htab->plt.eh_frame_plt, htab->plt_eh_frame->size);
4032 bfd_put_32 (dynobj, htab->elf.splt->size,
4033 htab->plt_eh_frame->contents + PLT_FDE_LEN_OFFSET);
4034 }
4035
4036 if (htab->plt_got_eh_frame != NULL
4037 && htab->plt_got_eh_frame->contents != NULL)
4038 {
4039 memcpy (htab->plt_got_eh_frame->contents,
4040 htab->non_lazy_plt->eh_frame_plt,
4041 htab->plt_got_eh_frame->size);
4042 bfd_put_32 (dynobj, htab->plt_got->size,
4043 (htab->plt_got_eh_frame->contents
4044 + PLT_FDE_LEN_OFFSET));
4045 }
4046
4047 if (htab->plt_second_eh_frame != NULL
4048 && htab->plt_second_eh_frame->contents != NULL)
4049 {
4050 memcpy (htab->plt_second_eh_frame->contents,
4051 htab->non_lazy_plt->eh_frame_plt,
4052 htab->plt_second_eh_frame->size);
4053 bfd_put_32 (dynobj, htab->plt_second->size,
4054 (htab->plt_second_eh_frame->contents
4055 + PLT_FDE_LEN_OFFSET));
4056 }
4057
4058 if (htab->elf.dynamic_sections_created)
4059 {
4060 /* Add some entries to the .dynamic section. We fill in the
4061 values later, in elf_x86_64_finish_dynamic_sections, but we
4062 must add the entries now so that we get the correct size for
4063 the .dynamic section. The DT_DEBUG entry is filled in by the
4064 dynamic linker and used by the debugger. */
4065 #define add_dynamic_entry(TAG, VAL) \
4066 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
4067
4068 if (bfd_link_executable (info))
4069 {
4070 if (!add_dynamic_entry (DT_DEBUG, 0))
4071 return FALSE;
4072 }
4073
4074 if (htab->elf.splt->size != 0)
4075 {
4076 /* DT_PLTGOT is used by prelink even if there is no PLT
4077 relocation. */
4078 if (!add_dynamic_entry (DT_PLTGOT, 0))
4079 return FALSE;
4080 }
4081
4082 if (htab->elf.srelplt->size != 0)
4083 {
4084 if (!add_dynamic_entry (DT_PLTRELSZ, 0)
4085 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
4086 || !add_dynamic_entry (DT_JMPREL, 0))
4087 return FALSE;
4088 }
4089
4090 if (htab->tlsdesc_plt
4091 && (!add_dynamic_entry (DT_TLSDESC_PLT, 0)
4092 || !add_dynamic_entry (DT_TLSDESC_GOT, 0)))
4093 return FALSE;
4094
4095 if (relocs)
4096 {
4097 if (!add_dynamic_entry (DT_RELA, 0)
4098 || !add_dynamic_entry (DT_RELASZ, 0)
4099 || !add_dynamic_entry (DT_RELAENT, bed->s->sizeof_rela))
4100 return FALSE;
4101
4102 /* If any dynamic relocs apply to a read-only section,
4103 then we need a DT_TEXTREL entry. */
4104 if ((info->flags & DF_TEXTREL) == 0)
4105 elf_link_hash_traverse (&htab->elf,
4106 elf_x86_64_readonly_dynrelocs,
4107 info);
4108
4109 if ((info->flags & DF_TEXTREL) != 0)
4110 {
4111 if (htab->readonly_dynrelocs_against_ifunc)
4112 {
4113 info->callbacks->einfo
4114 (_("%P%X: read-only segment has dynamic IFUNC relocations; recompile with -fPIC\n"));
4115 bfd_set_error (bfd_error_bad_value);
4116 return FALSE;
4117 }
4118
4119 if (!add_dynamic_entry (DT_TEXTREL, 0))
4120 return FALSE;
4121 }
4122 }
4123 }
4124 #undef add_dynamic_entry
4125
4126 return TRUE;
4127 }
4128
4129 static bfd_boolean
4130 elf_x86_64_always_size_sections (bfd *output_bfd,
4131 struct bfd_link_info *info)
4132 {
4133 asection *tls_sec = elf_hash_table (info)->tls_sec;
4134
4135 if (tls_sec)
4136 {
4137 struct elf_link_hash_entry *tlsbase;
4138
4139 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
4140 "_TLS_MODULE_BASE_",
4141 FALSE, FALSE, FALSE);
4142
4143 if (tlsbase && tlsbase->type == STT_TLS)
4144 {
4145 struct elf_x86_64_link_hash_table *htab;
4146 struct bfd_link_hash_entry *bh = NULL;
4147 const struct elf_backend_data *bed
4148 = get_elf_backend_data (output_bfd);
4149
4150 htab = elf_x86_64_hash_table (info);
4151 if (htab == NULL)
4152 return FALSE;
4153
4154 if (!(_bfd_generic_link_add_one_symbol
4155 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
4156 tls_sec, 0, NULL, FALSE,
4157 bed->collect, &bh)))
4158 return FALSE;
4159
4160 htab->tls_module_base = bh;
4161
4162 tlsbase = (struct elf_link_hash_entry *)bh;
4163 tlsbase->def_regular = 1;
4164 tlsbase->other = STV_HIDDEN;
4165 tlsbase->root.linker_def = 1;
4166 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
4167 }
4168 }
4169
4170 return TRUE;
4171 }
4172
4173 /* _TLS_MODULE_BASE_ needs to be treated especially when linking
4174 executables. Rather than setting it to the beginning of the TLS
4175 section, we have to set it to the end. This function may be called
4176 multiple times, it is idempotent. */
4177
4178 static void
4179 elf_x86_64_set_tls_module_base (struct bfd_link_info *info)
4180 {
4181 struct elf_x86_64_link_hash_table *htab;
4182 struct bfd_link_hash_entry *base;
4183
4184 if (!bfd_link_executable (info))
4185 return;
4186
4187 htab = elf_x86_64_hash_table (info);
4188 if (htab == NULL)
4189 return;
4190
4191 base = htab->tls_module_base;
4192 if (base == NULL)
4193 return;
4194
4195 base->u.def.value = htab->elf.tls_size;
4196 }
4197
4198 /* Return the base VMA address which should be subtracted from real addresses
4199 when resolving @dtpoff relocation.
4200 This is PT_TLS segment p_vaddr. */
4201
4202 static bfd_vma
4203 elf_x86_64_dtpoff_base (struct bfd_link_info *info)
4204 {
4205 /* If tls_sec is NULL, we should have signalled an error already. */
4206 if (elf_hash_table (info)->tls_sec == NULL)
4207 return 0;
4208 return elf_hash_table (info)->tls_sec->vma;
4209 }
4210
4211 /* Return the relocation value for @tpoff relocation
4212 if STT_TLS virtual address is ADDRESS. */
4213
4214 static bfd_vma
4215 elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
4216 {
4217 struct elf_link_hash_table *htab = elf_hash_table (info);
4218 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
4219 bfd_vma static_tls_size;
4220
4221 /* If tls_segment is NULL, we should have signalled an error already. */
4222 if (htab->tls_sec == NULL)
4223 return 0;
4224
4225 /* Consider special static TLS alignment requirements. */
4226 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
4227 return address - static_tls_size - htab->tls_sec->vma;
4228 }
4229
4230 /* Is the instruction before OFFSET in CONTENTS a 32bit relative
4231 branch? */
4232
4233 static bfd_boolean
4234 is_32bit_relative_branch (bfd_byte *contents, bfd_vma offset)
4235 {
4236 /* Opcode Instruction
4237 0xe8 call
4238 0xe9 jump
4239 0x0f 0x8x conditional jump */
4240 return ((offset > 0
4241 && (contents [offset - 1] == 0xe8
4242 || contents [offset - 1] == 0xe9))
4243 || (offset > 1
4244 && contents [offset - 2] == 0x0f
4245 && (contents [offset - 1] & 0xf0) == 0x80));
4246 }
4247
4248 /* Relocate an x86_64 ELF section. */
4249
4250 static bfd_boolean
4251 elf_x86_64_relocate_section (bfd *output_bfd,
4252 struct bfd_link_info *info,
4253 bfd *input_bfd,
4254 asection *input_section,
4255 bfd_byte *contents,
4256 Elf_Internal_Rela *relocs,
4257 Elf_Internal_Sym *local_syms,
4258 asection **local_sections)
4259 {
4260 struct elf_x86_64_link_hash_table *htab;
4261 Elf_Internal_Shdr *symtab_hdr;
4262 struct elf_link_hash_entry **sym_hashes;
4263 bfd_vma *local_got_offsets;
4264 bfd_vma *local_tlsdesc_gotents;
4265 Elf_Internal_Rela *rel;
4266 Elf_Internal_Rela *wrel;
4267 Elf_Internal_Rela *relend;
4268 unsigned int plt_entry_size;
4269
4270 BFD_ASSERT (is_x86_64_elf (input_bfd));
4271
4272 /* Skip if check_relocs failed. */
4273 if (input_section->check_relocs_failed)
4274 return FALSE;
4275
4276 htab = elf_x86_64_hash_table (info);
4277 if (htab == NULL)
4278 return FALSE;
4279 plt_entry_size = htab->plt.plt_entry_size;
4280 symtab_hdr = &elf_symtab_hdr (input_bfd);
4281 sym_hashes = elf_sym_hashes (input_bfd);
4282 local_got_offsets = elf_local_got_offsets (input_bfd);
4283 local_tlsdesc_gotents = elf_x86_64_local_tlsdesc_gotent (input_bfd);
4284
4285 elf_x86_64_set_tls_module_base (info);
4286
4287 rel = wrel = relocs;
4288 relend = relocs + input_section->reloc_count;
4289 for (; rel < relend; wrel++, rel++)
4290 {
4291 unsigned int r_type;
4292 reloc_howto_type *howto;
4293 unsigned long r_symndx;
4294 struct elf_link_hash_entry *h;
4295 struct elf_x86_64_link_hash_entry *eh;
4296 Elf_Internal_Sym *sym;
4297 asection *sec;
4298 bfd_vma off, offplt, plt_offset;
4299 bfd_vma relocation;
4300 bfd_boolean unresolved_reloc;
4301 bfd_reloc_status_type r;
4302 int tls_type;
4303 asection *base_got, *resolved_plt;
4304 bfd_vma st_size;
4305 bfd_boolean resolved_to_zero;
4306 bfd_boolean relative_reloc;
4307
4308 r_type = ELF32_R_TYPE (rel->r_info);
4309 if (r_type == (int) R_X86_64_GNU_VTINHERIT
4310 || r_type == (int) R_X86_64_GNU_VTENTRY)
4311 {
4312 if (wrel != rel)
4313 *wrel = *rel;
4314 continue;
4315 }
4316
4317 if (r_type >= (int) R_X86_64_standard)
4318 {
4319 _bfd_error_handler
4320 /* xgettext:c-format */
4321 (_("%B: unrecognized relocation (0x%x) in section `%A'"),
4322 input_bfd, r_type, input_section);
4323 bfd_set_error (bfd_error_bad_value);
4324 return FALSE;
4325 }
4326
4327 if (r_type != (int) R_X86_64_32
4328 || ABI_64_P (output_bfd))
4329 howto = x86_64_elf_howto_table + r_type;
4330 else
4331 howto = (x86_64_elf_howto_table
4332 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
4333 r_symndx = htab->r_sym (rel->r_info);
4334 h = NULL;
4335 sym = NULL;
4336 sec = NULL;
4337 unresolved_reloc = FALSE;
4338 if (r_symndx < symtab_hdr->sh_info)
4339 {
4340 sym = local_syms + r_symndx;
4341 sec = local_sections[r_symndx];
4342
4343 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
4344 &sec, rel);
4345 st_size = sym->st_size;
4346
4347 /* Relocate against local STT_GNU_IFUNC symbol. */
4348 if (!bfd_link_relocatable (info)
4349 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
4350 {
4351 h = elf_x86_64_get_local_sym_hash (htab, input_bfd,
4352 rel, FALSE);
4353 if (h == NULL)
4354 abort ();
4355
4356 /* Set STT_GNU_IFUNC symbol value. */
4357 h->root.u.def.value = sym->st_value;
4358 h->root.u.def.section = sec;
4359 }
4360 }
4361 else
4362 {
4363 bfd_boolean warned ATTRIBUTE_UNUSED;
4364 bfd_boolean ignored ATTRIBUTE_UNUSED;
4365
4366 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
4367 r_symndx, symtab_hdr, sym_hashes,
4368 h, sec, relocation,
4369 unresolved_reloc, warned, ignored);
4370 st_size = h->size;
4371 }
4372
4373 if (sec != NULL && discarded_section (sec))
4374 {
4375 _bfd_clear_contents (howto, input_bfd, input_section,
4376 contents + rel->r_offset);
4377 wrel->r_offset = rel->r_offset;
4378 wrel->r_info = 0;
4379 wrel->r_addend = 0;
4380
4381 /* For ld -r, remove relocations in debug sections against
4382 sections defined in discarded sections. Not done for
4383 eh_frame editing code expects to be present. */
4384 if (bfd_link_relocatable (info)
4385 && (input_section->flags & SEC_DEBUGGING))
4386 wrel--;
4387
4388 continue;
4389 }
4390
4391 if (bfd_link_relocatable (info))
4392 {
4393 if (wrel != rel)
4394 *wrel = *rel;
4395 continue;
4396 }
4397
4398 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
4399 {
4400 if (r_type == R_X86_64_64)
4401 {
4402 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
4403 zero-extend it to 64bit if addend is zero. */
4404 r_type = R_X86_64_32;
4405 memset (contents + rel->r_offset + 4, 0, 4);
4406 }
4407 else if (r_type == R_X86_64_SIZE64)
4408 {
4409 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
4410 zero-extend it to 64bit if addend is zero. */
4411 r_type = R_X86_64_SIZE32;
4412 memset (contents + rel->r_offset + 4, 0, 4);
4413 }
4414 }
4415
4416 eh = (struct elf_x86_64_link_hash_entry *) h;
4417
4418 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
4419 it here if it is defined in a non-shared object. */
4420 if (h != NULL
4421 && h->type == STT_GNU_IFUNC
4422 && h->def_regular)
4423 {
4424 bfd_vma plt_index;
4425 const char *name;
4426
4427 if ((input_section->flags & SEC_ALLOC) == 0)
4428 {
4429 /* Dynamic relocs are not propagated for SEC_DEBUGGING
4430 sections because such sections are not SEC_ALLOC and
4431 thus ld.so will not process them. */
4432 if ((input_section->flags & SEC_DEBUGGING) != 0)
4433 continue;
4434 abort ();
4435 }
4436
4437 switch (r_type)
4438 {
4439 default:
4440 break;
4441
4442 case R_X86_64_GOTPCREL:
4443 case R_X86_64_GOTPCRELX:
4444 case R_X86_64_REX_GOTPCRELX:
4445 case R_X86_64_GOTPCREL64:
4446 base_got = htab->elf.sgot;
4447 off = h->got.offset;
4448
4449 if (base_got == NULL)
4450 abort ();
4451
4452 if (off == (bfd_vma) -1)
4453 {
4454 /* We can't use h->got.offset here to save state, or
4455 even just remember the offset, as finish_dynamic_symbol
4456 would use that as offset into .got. */
4457
4458 if (h->plt.offset == (bfd_vma) -1)
4459 abort ();
4460
4461 if (htab->elf.splt != NULL)
4462 {
4463 plt_index = (h->plt.offset / plt_entry_size
4464 - htab->plt.has_plt0);
4465 off = (plt_index + 3) * GOT_ENTRY_SIZE;
4466 base_got = htab->elf.sgotplt;
4467 }
4468 else
4469 {
4470 plt_index = h->plt.offset / plt_entry_size;
4471 off = plt_index * GOT_ENTRY_SIZE;
4472 base_got = htab->elf.igotplt;
4473 }
4474
4475 if (h->dynindx == -1
4476 || h->forced_local
4477 || info->symbolic)
4478 {
4479 /* This references the local defitionion. We must
4480 initialize this entry in the global offset table.
4481 Since the offset must always be a multiple of 8,
4482 we use the least significant bit to record
4483 whether we have initialized it already.
4484
4485 When doing a dynamic link, we create a .rela.got
4486 relocation entry to initialize the value. This
4487 is done in the finish_dynamic_symbol routine. */
4488 if ((off & 1) != 0)
4489 off &= ~1;
4490 else
4491 {
4492 bfd_put_64 (output_bfd, relocation,
4493 base_got->contents + off);
4494 /* Note that this is harmless for the GOTPLT64
4495 case, as -1 | 1 still is -1. */
4496 h->got.offset |= 1;
4497 }
4498 }
4499 }
4500
4501 relocation = (base_got->output_section->vma
4502 + base_got->output_offset + off);
4503
4504 goto do_relocation;
4505 }
4506
4507 if (h->plt.offset == (bfd_vma) -1)
4508 {
4509 /* Handle static pointers of STT_GNU_IFUNC symbols. */
4510 if (r_type == htab->pointer_r_type
4511 && (input_section->flags & SEC_CODE) == 0)
4512 goto do_ifunc_pointer;
4513 goto bad_ifunc_reloc;
4514 }
4515
4516 /* STT_GNU_IFUNC symbol must go through PLT. */
4517 if (htab->elf.splt != NULL)
4518 {
4519 if (htab->plt_second != NULL)
4520 {
4521 resolved_plt = htab->plt_second;
4522 plt_offset = eh->plt_second.offset;
4523 }
4524 else
4525 {
4526 resolved_plt = htab->elf.splt;
4527 plt_offset = h->plt.offset;
4528 }
4529 }
4530 else
4531 {
4532 resolved_plt = htab->elf.iplt;
4533 plt_offset = h->plt.offset;
4534 }
4535
4536 relocation = (resolved_plt->output_section->vma
4537 + resolved_plt->output_offset + plt_offset);
4538
4539 switch (r_type)
4540 {
4541 default:
4542 bad_ifunc_reloc:
4543 if (h->root.root.string)
4544 name = h->root.root.string;
4545 else
4546 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4547 NULL);
4548 _bfd_error_handler
4549 /* xgettext:c-format */
4550 (_("%B: relocation %s against STT_GNU_IFUNC "
4551 "symbol `%s' isn't supported"), input_bfd,
4552 howto->name, name);
4553 bfd_set_error (bfd_error_bad_value);
4554 return FALSE;
4555
4556 case R_X86_64_32S:
4557 if (bfd_link_pic (info))
4558 abort ();
4559 goto do_relocation;
4560
4561 case R_X86_64_32:
4562 if (ABI_64_P (output_bfd))
4563 goto do_relocation;
4564 /* FALLTHROUGH */
4565 case R_X86_64_64:
4566 do_ifunc_pointer:
4567 if (rel->r_addend != 0)
4568 {
4569 if (h->root.root.string)
4570 name = h->root.root.string;
4571 else
4572 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
4573 sym, NULL);
4574 _bfd_error_handler
4575 /* xgettext:c-format */
4576 (_("%B: relocation %s against STT_GNU_IFUNC "
4577 "symbol `%s' has non-zero addend: %d"),
4578 input_bfd, howto->name, name, rel->r_addend);
4579 bfd_set_error (bfd_error_bad_value);
4580 return FALSE;
4581 }
4582
4583 /* Generate dynamic relcoation only when there is a
4584 non-GOT reference in a shared object or there is no
4585 PLT. */
4586 if ((bfd_link_pic (info) && h->non_got_ref)
4587 || h->plt.offset == (bfd_vma) -1)
4588 {
4589 Elf_Internal_Rela outrel;
4590 asection *sreloc;
4591
4592 /* Need a dynamic relocation to get the real function
4593 address. */
4594 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
4595 info,
4596 input_section,
4597 rel->r_offset);
4598 if (outrel.r_offset == (bfd_vma) -1
4599 || outrel.r_offset == (bfd_vma) -2)
4600 abort ();
4601
4602 outrel.r_offset += (input_section->output_section->vma
4603 + input_section->output_offset);
4604
4605 if (h->dynindx == -1
4606 || h->forced_local
4607 || bfd_link_executable (info))
4608 {
4609 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
4610 h->root.root.string,
4611 h->root.u.def.section->owner);
4612
4613 /* This symbol is resolved locally. */
4614 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4615 outrel.r_addend = (h->root.u.def.value
4616 + h->root.u.def.section->output_section->vma
4617 + h->root.u.def.section->output_offset);
4618 }
4619 else
4620 {
4621 outrel.r_info = htab->r_info (h->dynindx, r_type);
4622 outrel.r_addend = 0;
4623 }
4624
4625 /* Dynamic relocations are stored in
4626 1. .rela.ifunc section in PIC object.
4627 2. .rela.got section in dynamic executable.
4628 3. .rela.iplt section in static executable. */
4629 if (bfd_link_pic (info))
4630 sreloc = htab->elf.irelifunc;
4631 else if (htab->elf.splt != NULL)
4632 sreloc = htab->elf.srelgot;
4633 else
4634 sreloc = htab->elf.irelplt;
4635 elf_append_rela (output_bfd, sreloc, &outrel);
4636
4637 /* If this reloc is against an external symbol, we
4638 do not want to fiddle with the addend. Otherwise,
4639 we need to include the symbol value so that it
4640 becomes an addend for the dynamic reloc. For an
4641 internal symbol, we have updated addend. */
4642 continue;
4643 }
4644 /* FALLTHROUGH */
4645 case R_X86_64_PC32:
4646 case R_X86_64_PC32_BND:
4647 case R_X86_64_PC64:
4648 case R_X86_64_PLT32:
4649 case R_X86_64_PLT32_BND:
4650 goto do_relocation;
4651 }
4652 }
4653
4654 resolved_to_zero = (eh != NULL
4655 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
4656 eh->has_got_reloc,
4657 eh));
4658
4659 /* When generating a shared object, the relocations handled here are
4660 copied into the output file to be resolved at run time. */
4661 switch (r_type)
4662 {
4663 case R_X86_64_GOT32:
4664 case R_X86_64_GOT64:
4665 /* Relocation is to the entry for this symbol in the global
4666 offset table. */
4667 case R_X86_64_GOTPCREL:
4668 case R_X86_64_GOTPCRELX:
4669 case R_X86_64_REX_GOTPCRELX:
4670 case R_X86_64_GOTPCREL64:
4671 /* Use global offset table entry as symbol value. */
4672 case R_X86_64_GOTPLT64:
4673 /* This is obsolete and treated the the same as GOT64. */
4674 base_got = htab->elf.sgot;
4675
4676 if (htab->elf.sgot == NULL)
4677 abort ();
4678
4679 relative_reloc = FALSE;
4680 if (h != NULL)
4681 {
4682 bfd_boolean dyn;
4683
4684 off = h->got.offset;
4685 if (h->needs_plt
4686 && h->plt.offset != (bfd_vma)-1
4687 && off == (bfd_vma)-1)
4688 {
4689 /* We can't use h->got.offset here to save
4690 state, or even just remember the offset, as
4691 finish_dynamic_symbol would use that as offset into
4692 .got. */
4693 bfd_vma plt_index = (h->plt.offset / plt_entry_size
4694 - htab->plt.has_plt0);
4695 off = (plt_index + 3) * GOT_ENTRY_SIZE;
4696 base_got = htab->elf.sgotplt;
4697 }
4698
4699 dyn = htab->elf.dynamic_sections_created;
4700
4701 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
4702 || (bfd_link_pic (info)
4703 && SYMBOL_REFERENCES_LOCAL (info, h))
4704 || (ELF_ST_VISIBILITY (h->other)
4705 && h->root.type == bfd_link_hash_undefweak))
4706 {
4707 /* This is actually a static link, or it is a -Bsymbolic
4708 link and the symbol is defined locally, or the symbol
4709 was forced to be local because of a version file. We
4710 must initialize this entry in the global offset table.
4711 Since the offset must always be a multiple of 8, we
4712 use the least significant bit to record whether we
4713 have initialized it already.
4714
4715 When doing a dynamic link, we create a .rela.got
4716 relocation entry to initialize the value. This is
4717 done in the finish_dynamic_symbol routine. */
4718 if ((off & 1) != 0)
4719 off &= ~1;
4720 else
4721 {
4722 bfd_put_64 (output_bfd, relocation,
4723 base_got->contents + off);
4724 /* Note that this is harmless for the GOTPLT64 case,
4725 as -1 | 1 still is -1. */
4726 h->got.offset |= 1;
4727
4728 if (h->dynindx == -1
4729 && !h->forced_local
4730 && h->root.type != bfd_link_hash_undefweak
4731 && bfd_link_pic (info))
4732 {
4733 /* If this symbol isn't dynamic in PIC,
4734 generate R_X86_64_RELATIVE here. */
4735 eh->no_finish_dynamic_symbol = 1;
4736 relative_reloc = TRUE;
4737 }
4738 }
4739 }
4740 else
4741 unresolved_reloc = FALSE;
4742 }
4743 else
4744 {
4745 if (local_got_offsets == NULL)
4746 abort ();
4747
4748 off = local_got_offsets[r_symndx];
4749
4750 /* The offset must always be a multiple of 8. We use
4751 the least significant bit to record whether we have
4752 already generated the necessary reloc. */
4753 if ((off & 1) != 0)
4754 off &= ~1;
4755 else
4756 {
4757 bfd_put_64 (output_bfd, relocation,
4758 base_got->contents + off);
4759 local_got_offsets[r_symndx] |= 1;
4760
4761 if (bfd_link_pic (info))
4762 relative_reloc = TRUE;
4763 }
4764 }
4765
4766 if (relative_reloc)
4767 {
4768 asection *s;
4769 Elf_Internal_Rela outrel;
4770
4771 /* We need to generate a R_X86_64_RELATIVE reloc
4772 for the dynamic linker. */
4773 s = htab->elf.srelgot;
4774 if (s == NULL)
4775 abort ();
4776
4777 outrel.r_offset = (base_got->output_section->vma
4778 + base_got->output_offset
4779 + off);
4780 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
4781 outrel.r_addend = relocation;
4782 elf_append_rela (output_bfd, s, &outrel);
4783 }
4784
4785 if (off >= (bfd_vma) -2)
4786 abort ();
4787
4788 relocation = base_got->output_section->vma
4789 + base_got->output_offset + off;
4790 if (r_type != R_X86_64_GOTPCREL
4791 && r_type != R_X86_64_GOTPCRELX
4792 && r_type != R_X86_64_REX_GOTPCRELX
4793 && r_type != R_X86_64_GOTPCREL64)
4794 relocation -= htab->elf.sgotplt->output_section->vma
4795 - htab->elf.sgotplt->output_offset;
4796
4797 break;
4798
4799 case R_X86_64_GOTOFF64:
4800 /* Relocation is relative to the start of the global offset
4801 table. */
4802
4803 /* Check to make sure it isn't a protected function or data
4804 symbol for shared library since it may not be local when
4805 used as function address or with copy relocation. We also
4806 need to make sure that a symbol is referenced locally. */
4807 if (bfd_link_pic (info) && h)
4808 {
4809 if (!h->def_regular)
4810 {
4811 const char *v;
4812
4813 switch (ELF_ST_VISIBILITY (h->other))
4814 {
4815 case STV_HIDDEN:
4816 v = _("hidden symbol");
4817 break;
4818 case STV_INTERNAL:
4819 v = _("internal symbol");
4820 break;
4821 case STV_PROTECTED:
4822 v = _("protected symbol");
4823 break;
4824 default:
4825 v = _("symbol");
4826 break;
4827 }
4828
4829 _bfd_error_handler
4830 /* xgettext:c-format */
4831 (_("%B: relocation R_X86_64_GOTOFF64 against undefined %s"
4832 " `%s' can not be used when making a shared object"),
4833 input_bfd, v, h->root.root.string);
4834 bfd_set_error (bfd_error_bad_value);
4835 return FALSE;
4836 }
4837 else if (!bfd_link_executable (info)
4838 && !SYMBOL_REFERENCES_LOCAL (info, h)
4839 && (h->type == STT_FUNC
4840 || h->type == STT_OBJECT)
4841 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
4842 {
4843 _bfd_error_handler
4844 /* xgettext:c-format */
4845 (_("%B: relocation R_X86_64_GOTOFF64 against protected %s"
4846 " `%s' can not be used when making a shared object"),
4847 input_bfd,
4848 h->type == STT_FUNC ? "function" : "data",
4849 h->root.root.string);
4850 bfd_set_error (bfd_error_bad_value);
4851 return FALSE;
4852 }
4853 }
4854
4855 /* Note that sgot is not involved in this
4856 calculation. We always want the start of .got.plt. If we
4857 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
4858 permitted by the ABI, we might have to change this
4859 calculation. */
4860 relocation -= htab->elf.sgotplt->output_section->vma
4861 + htab->elf.sgotplt->output_offset;
4862 break;
4863
4864 case R_X86_64_GOTPC32:
4865 case R_X86_64_GOTPC64:
4866 /* Use global offset table as symbol value. */
4867 relocation = htab->elf.sgotplt->output_section->vma
4868 + htab->elf.sgotplt->output_offset;
4869 unresolved_reloc = FALSE;
4870 break;
4871
4872 case R_X86_64_PLTOFF64:
4873 /* Relocation is PLT entry relative to GOT. For local
4874 symbols it's the symbol itself relative to GOT. */
4875 if (h != NULL
4876 /* See PLT32 handling. */
4877 && (h->plt.offset != (bfd_vma) -1
4878 || eh->plt_got.offset != (bfd_vma) -1)
4879 && htab->elf.splt != NULL)
4880 {
4881 if (eh->plt_got.offset != (bfd_vma) -1)
4882 {
4883 /* Use the GOT PLT. */
4884 resolved_plt = htab->plt_got;
4885 plt_offset = eh->plt_got.offset;
4886 }
4887 else if (htab->plt_second != NULL)
4888 {
4889 resolved_plt = htab->plt_second;
4890 plt_offset = eh->plt_second.offset;
4891 }
4892 else
4893 {
4894 resolved_plt = htab->elf.splt;
4895 plt_offset = h->plt.offset;
4896 }
4897
4898 relocation = (resolved_plt->output_section->vma
4899 + resolved_plt->output_offset
4900 + plt_offset);
4901 unresolved_reloc = FALSE;
4902 }
4903
4904 relocation -= htab->elf.sgotplt->output_section->vma
4905 + htab->elf.sgotplt->output_offset;
4906 break;
4907
4908 case R_X86_64_PLT32:
4909 case R_X86_64_PLT32_BND:
4910 /* Relocation is to the entry for this symbol in the
4911 procedure linkage table. */
4912
4913 /* Resolve a PLT32 reloc against a local symbol directly,
4914 without using the procedure linkage table. */
4915 if (h == NULL)
4916 break;
4917
4918 if ((h->plt.offset == (bfd_vma) -1
4919 && eh->plt_got.offset == (bfd_vma) -1)
4920 || htab->elf.splt == NULL)
4921 {
4922 /* We didn't make a PLT entry for this symbol. This
4923 happens when statically linking PIC code, or when
4924 using -Bsymbolic. */
4925 break;
4926 }
4927
4928 if (h->plt.offset != (bfd_vma) -1)
4929 {
4930 if (htab->plt_second != NULL)
4931 {
4932 resolved_plt = htab->plt_second;
4933 plt_offset = eh->plt_second.offset;
4934 }
4935 else
4936 {
4937 resolved_plt = htab->elf.splt;
4938 plt_offset = h->plt.offset;
4939 }
4940 }
4941 else
4942 {
4943 /* Use the GOT PLT. */
4944 resolved_plt = htab->plt_got;
4945 plt_offset = eh->plt_got.offset;
4946 }
4947
4948 relocation = (resolved_plt->output_section->vma
4949 + resolved_plt->output_offset
4950 + plt_offset);
4951 unresolved_reloc = FALSE;
4952 break;
4953
4954 case R_X86_64_SIZE32:
4955 case R_X86_64_SIZE64:
4956 /* Set to symbol size. */
4957 relocation = st_size;
4958 goto direct;
4959
4960 case R_X86_64_PC8:
4961 case R_X86_64_PC16:
4962 case R_X86_64_PC32:
4963 case R_X86_64_PC32_BND:
4964 /* Don't complain about -fPIC if the symbol is undefined when
4965 building executable unless it is unresolved weak symbol. */
4966 if ((input_section->flags & SEC_ALLOC) != 0
4967 && (input_section->flags & SEC_READONLY) != 0
4968 && h != NULL
4969 && ((bfd_link_executable (info)
4970 && h->root.type == bfd_link_hash_undefweak
4971 && !resolved_to_zero)
4972 || (bfd_link_pic (info)
4973 && !(bfd_link_pie (info)
4974 && h->root.type == bfd_link_hash_undefined))))
4975 {
4976 bfd_boolean fail = FALSE;
4977 bfd_boolean branch
4978 = ((r_type == R_X86_64_PC32
4979 || r_type == R_X86_64_PC32_BND)
4980 && is_32bit_relative_branch (contents, rel->r_offset));
4981
4982 if (SYMBOL_REFERENCES_LOCAL (info, h))
4983 {
4984 /* Symbol is referenced locally. Make sure it is
4985 defined locally or for a branch. */
4986 fail = (!(h->def_regular || ELF_COMMON_DEF_P (h))
4987 && !branch);
4988 }
4989 else if (!(bfd_link_pie (info)
4990 && (h->needs_copy || eh->needs_copy)))
4991 {
4992 /* Symbol doesn't need copy reloc and isn't referenced
4993 locally. We only allow branch to symbol with
4994 non-default visibility. */
4995 fail = (!branch
4996 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT);
4997 }
4998
4999 if (fail)
5000 return elf_x86_64_need_pic (input_bfd, input_section,
5001 h, NULL, NULL, howto);
5002 }
5003 /* Fall through. */
5004
5005 case R_X86_64_8:
5006 case R_X86_64_16:
5007 case R_X86_64_32:
5008 case R_X86_64_PC64:
5009 case R_X86_64_64:
5010 /* FIXME: The ABI says the linker should make sure the value is
5011 the same when it's zeroextended to 64 bit. */
5012
5013 direct:
5014 if ((input_section->flags & SEC_ALLOC) == 0)
5015 break;
5016
5017 /* Don't copy a pc-relative relocation into the output file
5018 if the symbol needs copy reloc or the symbol is undefined
5019 when building executable. Copy dynamic function pointer
5020 relocations. Don't generate dynamic relocations against
5021 resolved undefined weak symbols in PIE. */
5022 if ((bfd_link_pic (info)
5023 && !(bfd_link_pie (info)
5024 && h != NULL
5025 && (h->needs_copy
5026 || eh->needs_copy
5027 || h->root.type == bfd_link_hash_undefined)
5028 && (IS_X86_64_PCREL_TYPE (r_type)
5029 || r_type == R_X86_64_SIZE32
5030 || r_type == R_X86_64_SIZE64))
5031 && (h == NULL
5032 || ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5033 && !resolved_to_zero)
5034 || h->root.type != bfd_link_hash_undefweak))
5035 && ((! IS_X86_64_PCREL_TYPE (r_type)
5036 && r_type != R_X86_64_SIZE32
5037 && r_type != R_X86_64_SIZE64)
5038 || ! SYMBOL_CALLS_LOCAL (info, h)))
5039 || (ELIMINATE_COPY_RELOCS
5040 && !bfd_link_pic (info)
5041 && h != NULL
5042 && h->dynindx != -1
5043 && (!h->non_got_ref
5044 || eh->func_pointer_refcount > 0
5045 || (h->root.type == bfd_link_hash_undefweak
5046 && !resolved_to_zero))
5047 && ((h->def_dynamic && !h->def_regular)
5048 /* Undefined weak symbol is bound locally when
5049 PIC is false. */
5050 || h->root.type == bfd_link_hash_undefined)))
5051 {
5052 Elf_Internal_Rela outrel;
5053 bfd_boolean skip, relocate;
5054 asection *sreloc;
5055
5056 /* When generating a shared object, these relocations
5057 are copied into the output file to be resolved at run
5058 time. */
5059 skip = FALSE;
5060 relocate = FALSE;
5061
5062 outrel.r_offset =
5063 _bfd_elf_section_offset (output_bfd, info, input_section,
5064 rel->r_offset);
5065 if (outrel.r_offset == (bfd_vma) -1)
5066 skip = TRUE;
5067 else if (outrel.r_offset == (bfd_vma) -2)
5068 skip = TRUE, relocate = TRUE;
5069
5070 outrel.r_offset += (input_section->output_section->vma
5071 + input_section->output_offset);
5072
5073 if (skip)
5074 memset (&outrel, 0, sizeof outrel);
5075
5076 /* h->dynindx may be -1 if this symbol was marked to
5077 become local. */
5078 else if (h != NULL
5079 && h->dynindx != -1
5080 && (IS_X86_64_PCREL_TYPE (r_type)
5081 || !(bfd_link_executable (info)
5082 || SYMBOLIC_BIND (info, h))
5083 || ! h->def_regular))
5084 {
5085 outrel.r_info = htab->r_info (h->dynindx, r_type);
5086 outrel.r_addend = rel->r_addend;
5087 }
5088 else
5089 {
5090 /* This symbol is local, or marked to become local.
5091 When relocation overflow check is disabled, we
5092 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
5093 if (r_type == htab->pointer_r_type
5094 || (r_type == R_X86_64_32
5095 && info->no_reloc_overflow_check))
5096 {
5097 relocate = TRUE;
5098 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
5099 outrel.r_addend = relocation + rel->r_addend;
5100 }
5101 else if (r_type == R_X86_64_64
5102 && !ABI_64_P (output_bfd))
5103 {
5104 relocate = TRUE;
5105 outrel.r_info = htab->r_info (0,
5106 R_X86_64_RELATIVE64);
5107 outrel.r_addend = relocation + rel->r_addend;
5108 /* Check addend overflow. */
5109 if ((outrel.r_addend & 0x80000000)
5110 != (rel->r_addend & 0x80000000))
5111 {
5112 const char *name;
5113 int addend = rel->r_addend;
5114 if (h && h->root.root.string)
5115 name = h->root.root.string;
5116 else
5117 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
5118 sym, NULL);
5119 if (addend < 0)
5120 _bfd_error_handler
5121 /* xgettext:c-format */
5122 (_("%B: addend -0x%x in relocation %s against "
5123 "symbol `%s' at 0x%lx in section `%A' is "
5124 "out of range"),
5125 input_bfd, addend, howto->name, name,
5126 (unsigned long) rel->r_offset, input_section);
5127 else
5128 _bfd_error_handler
5129 /* xgettext:c-format */
5130 (_("%B: addend 0x%x in relocation %s against "
5131 "symbol `%s' at 0x%lx in section `%A' is "
5132 "out of range"),
5133 input_bfd, addend, howto->name, name,
5134 (unsigned long) rel->r_offset, input_section);
5135 bfd_set_error (bfd_error_bad_value);
5136 return FALSE;
5137 }
5138 }
5139 else
5140 {
5141 long sindx;
5142
5143 if (bfd_is_abs_section (sec))
5144 sindx = 0;
5145 else if (sec == NULL || sec->owner == NULL)
5146 {
5147 bfd_set_error (bfd_error_bad_value);
5148 return FALSE;
5149 }
5150 else
5151 {
5152 asection *osec;
5153
5154 /* We are turning this relocation into one
5155 against a section symbol. It would be
5156 proper to subtract the symbol's value,
5157 osec->vma, from the emitted reloc addend,
5158 but ld.so expects buggy relocs. */
5159 osec = sec->output_section;
5160 sindx = elf_section_data (osec)->dynindx;
5161 if (sindx == 0)
5162 {
5163 asection *oi = htab->elf.text_index_section;
5164 sindx = elf_section_data (oi)->dynindx;
5165 }
5166 BFD_ASSERT (sindx != 0);
5167 }
5168
5169 outrel.r_info = htab->r_info (sindx, r_type);
5170 outrel.r_addend = relocation + rel->r_addend;
5171 }
5172 }
5173
5174 sreloc = elf_section_data (input_section)->sreloc;
5175
5176 if (sreloc == NULL || sreloc->contents == NULL)
5177 {
5178 r = bfd_reloc_notsupported;
5179 goto check_relocation_error;
5180 }
5181
5182 elf_append_rela (output_bfd, sreloc, &outrel);
5183
5184 /* If this reloc is against an external symbol, we do
5185 not want to fiddle with the addend. Otherwise, we
5186 need to include the symbol value so that it becomes
5187 an addend for the dynamic reloc. */
5188 if (! relocate)
5189 continue;
5190 }
5191
5192 break;
5193
5194 case R_X86_64_TLSGD:
5195 case R_X86_64_GOTPC32_TLSDESC:
5196 case R_X86_64_TLSDESC_CALL:
5197 case R_X86_64_GOTTPOFF:
5198 tls_type = GOT_UNKNOWN;
5199 if (h == NULL && local_got_offsets)
5200 tls_type = elf_x86_64_local_got_tls_type (input_bfd) [r_symndx];
5201 else if (h != NULL)
5202 tls_type = elf_x86_64_hash_entry (h)->tls_type;
5203
5204 if (! elf_x86_64_tls_transition (info, input_bfd,
5205 input_section, contents,
5206 symtab_hdr, sym_hashes,
5207 &r_type, tls_type, rel,
5208 relend, h, r_symndx, TRUE))
5209 return FALSE;
5210
5211 if (r_type == R_X86_64_TPOFF32)
5212 {
5213 bfd_vma roff = rel->r_offset;
5214
5215 BFD_ASSERT (! unresolved_reloc);
5216
5217 if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
5218 {
5219 /* GD->LE transition. For 64bit, change
5220 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
5221 .word 0x6666; rex64; call __tls_get_addr@PLT
5222 or
5223 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
5224 .byte 0x66; rex64
5225 call *__tls_get_addr@GOTPCREL(%rip)
5226 which may be converted to
5227 addr32 call __tls_get_addr
5228 into:
5229 movq %fs:0, %rax
5230 leaq foo@tpoff(%rax), %rax
5231 For 32bit, change
5232 leaq foo@tlsgd(%rip), %rdi
5233 .word 0x6666; rex64; call __tls_get_addr@PLT
5234 or
5235 leaq foo@tlsgd(%rip), %rdi
5236 .byte 0x66; rex64
5237 call *__tls_get_addr@GOTPCREL(%rip)
5238 which may be converted to
5239 addr32 call __tls_get_addr
5240 into:
5241 movl %fs:0, %eax
5242 leaq foo@tpoff(%rax), %rax
5243 For largepic, change:
5244 leaq foo@tlsgd(%rip), %rdi
5245 movabsq $__tls_get_addr@pltoff, %rax
5246 addq %r15, %rax
5247 call *%rax
5248 into:
5249 movq %fs:0, %rax
5250 leaq foo@tpoff(%rax), %rax
5251 nopw 0x0(%rax,%rax,1) */
5252 int largepic = 0;
5253 if (ABI_64_P (output_bfd))
5254 {
5255 if (contents[roff + 5] == 0xb8)
5256 {
5257 memcpy (contents + roff - 3,
5258 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
5259 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
5260 largepic = 1;
5261 }
5262 else
5263 memcpy (contents + roff - 4,
5264 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
5265 16);
5266 }
5267 else
5268 memcpy (contents + roff - 3,
5269 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
5270 15);
5271 bfd_put_32 (output_bfd,
5272 elf_x86_64_tpoff (info, relocation),
5273 contents + roff + 8 + largepic);
5274 /* Skip R_X86_64_PC32, R_X86_64_PLT32,
5275 R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64. */
5276 rel++;
5277 wrel++;
5278 continue;
5279 }
5280 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
5281 {
5282 /* GDesc -> LE transition.
5283 It's originally something like:
5284 leaq x@tlsdesc(%rip), %rax
5285
5286 Change it to:
5287 movl $x@tpoff, %rax. */
5288
5289 unsigned int val, type;
5290
5291 type = bfd_get_8 (input_bfd, contents + roff - 3);
5292 val = bfd_get_8 (input_bfd, contents + roff - 1);
5293 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
5294 contents + roff - 3);
5295 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
5296 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
5297 contents + roff - 1);
5298 bfd_put_32 (output_bfd,
5299 elf_x86_64_tpoff (info, relocation),
5300 contents + roff);
5301 continue;
5302 }
5303 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
5304 {
5305 /* GDesc -> LE transition.
5306 It's originally:
5307 call *(%rax)
5308 Turn it into:
5309 xchg %ax,%ax. */
5310 bfd_put_8 (output_bfd, 0x66, contents + roff);
5311 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
5312 continue;
5313 }
5314 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTTPOFF)
5315 {
5316 /* IE->LE transition:
5317 For 64bit, originally it can be one of:
5318 movq foo@gottpoff(%rip), %reg
5319 addq foo@gottpoff(%rip), %reg
5320 We change it into:
5321 movq $foo, %reg
5322 leaq foo(%reg), %reg
5323 addq $foo, %reg.
5324 For 32bit, originally it can be one of:
5325 movq foo@gottpoff(%rip), %reg
5326 addl foo@gottpoff(%rip), %reg
5327 We change it into:
5328 movq $foo, %reg
5329 leal foo(%reg), %reg
5330 addl $foo, %reg. */
5331
5332 unsigned int val, type, reg;
5333
5334 if (roff >= 3)
5335 val = bfd_get_8 (input_bfd, contents + roff - 3);
5336 else
5337 val = 0;
5338 type = bfd_get_8 (input_bfd, contents + roff - 2);
5339 reg = bfd_get_8 (input_bfd, contents + roff - 1);
5340 reg >>= 3;
5341 if (type == 0x8b)
5342 {
5343 /* movq */
5344 if (val == 0x4c)
5345 bfd_put_8 (output_bfd, 0x49,
5346 contents + roff - 3);
5347 else if (!ABI_64_P (output_bfd) && val == 0x44)
5348 bfd_put_8 (output_bfd, 0x41,
5349 contents + roff - 3);
5350 bfd_put_8 (output_bfd, 0xc7,
5351 contents + roff - 2);
5352 bfd_put_8 (output_bfd, 0xc0 | reg,
5353 contents + roff - 1);
5354 }
5355 else if (reg == 4)
5356 {
5357 /* addq/addl -> addq/addl - addressing with %rsp/%r12
5358 is special */
5359 if (val == 0x4c)
5360 bfd_put_8 (output_bfd, 0x49,
5361 contents + roff - 3);
5362 else if (!ABI_64_P (output_bfd) && val == 0x44)
5363 bfd_put_8 (output_bfd, 0x41,
5364 contents + roff - 3);
5365 bfd_put_8 (output_bfd, 0x81,
5366 contents + roff - 2);
5367 bfd_put_8 (output_bfd, 0xc0 | reg,
5368 contents + roff - 1);
5369 }
5370 else
5371 {
5372 /* addq/addl -> leaq/leal */
5373 if (val == 0x4c)
5374 bfd_put_8 (output_bfd, 0x4d,
5375 contents + roff - 3);
5376 else if (!ABI_64_P (output_bfd) && val == 0x44)
5377 bfd_put_8 (output_bfd, 0x45,
5378 contents + roff - 3);
5379 bfd_put_8 (output_bfd, 0x8d,
5380 contents + roff - 2);
5381 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
5382 contents + roff - 1);
5383 }
5384 bfd_put_32 (output_bfd,
5385 elf_x86_64_tpoff (info, relocation),
5386 contents + roff);
5387 continue;
5388 }
5389 else
5390 BFD_ASSERT (FALSE);
5391 }
5392
5393 if (htab->elf.sgot == NULL)
5394 abort ();
5395
5396 if (h != NULL)
5397 {
5398 off = h->got.offset;
5399 offplt = elf_x86_64_hash_entry (h)->tlsdesc_got;
5400 }
5401 else
5402 {
5403 if (local_got_offsets == NULL)
5404 abort ();
5405
5406 off = local_got_offsets[r_symndx];
5407 offplt = local_tlsdesc_gotents[r_symndx];
5408 }
5409
5410 if ((off & 1) != 0)
5411 off &= ~1;
5412 else
5413 {
5414 Elf_Internal_Rela outrel;
5415 int dr_type, indx;
5416 asection *sreloc;
5417
5418 if (htab->elf.srelgot == NULL)
5419 abort ();
5420
5421 indx = h && h->dynindx != -1 ? h->dynindx : 0;
5422
5423 if (GOT_TLS_GDESC_P (tls_type))
5424 {
5425 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
5426 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
5427 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
5428 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
5429 + htab->elf.sgotplt->output_offset
5430 + offplt
5431 + htab->sgotplt_jump_table_size);
5432 sreloc = htab->elf.srelplt;
5433 if (indx == 0)
5434 outrel.r_addend = relocation - elf_x86_64_dtpoff_base (info);
5435 else
5436 outrel.r_addend = 0;
5437 elf_append_rela (output_bfd, sreloc, &outrel);
5438 }
5439
5440 sreloc = htab->elf.srelgot;
5441
5442 outrel.r_offset = (htab->elf.sgot->output_section->vma
5443 + htab->elf.sgot->output_offset + off);
5444
5445 if (GOT_TLS_GD_P (tls_type))
5446 dr_type = R_X86_64_DTPMOD64;
5447 else if (GOT_TLS_GDESC_P (tls_type))
5448 goto dr_done;
5449 else
5450 dr_type = R_X86_64_TPOFF64;
5451
5452 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
5453 outrel.r_addend = 0;
5454 if ((dr_type == R_X86_64_TPOFF64
5455 || dr_type == R_X86_64_TLSDESC) && indx == 0)
5456 outrel.r_addend = relocation - elf_x86_64_dtpoff_base (info);
5457 outrel.r_info = htab->r_info (indx, dr_type);
5458
5459 elf_append_rela (output_bfd, sreloc, &outrel);
5460
5461 if (GOT_TLS_GD_P (tls_type))
5462 {
5463 if (indx == 0)
5464 {
5465 BFD_ASSERT (! unresolved_reloc);
5466 bfd_put_64 (output_bfd,
5467 relocation - elf_x86_64_dtpoff_base (info),
5468 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
5469 }
5470 else
5471 {
5472 bfd_put_64 (output_bfd, 0,
5473 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
5474 outrel.r_info = htab->r_info (indx,
5475 R_X86_64_DTPOFF64);
5476 outrel.r_offset += GOT_ENTRY_SIZE;
5477 elf_append_rela (output_bfd, sreloc,
5478 &outrel);
5479 }
5480 }
5481
5482 dr_done:
5483 if (h != NULL)
5484 h->got.offset |= 1;
5485 else
5486 local_got_offsets[r_symndx] |= 1;
5487 }
5488
5489 if (off >= (bfd_vma) -2
5490 && ! GOT_TLS_GDESC_P (tls_type))
5491 abort ();
5492 if (r_type == ELF32_R_TYPE (rel->r_info))
5493 {
5494 if (r_type == R_X86_64_GOTPC32_TLSDESC
5495 || r_type == R_X86_64_TLSDESC_CALL)
5496 relocation = htab->elf.sgotplt->output_section->vma
5497 + htab->elf.sgotplt->output_offset
5498 + offplt + htab->sgotplt_jump_table_size;
5499 else
5500 relocation = htab->elf.sgot->output_section->vma
5501 + htab->elf.sgot->output_offset + off;
5502 unresolved_reloc = FALSE;
5503 }
5504 else
5505 {
5506 bfd_vma roff = rel->r_offset;
5507
5508 if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSGD)
5509 {
5510 /* GD->IE transition. For 64bit, change
5511 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
5512 .word 0x6666; rex64; call __tls_get_addr@PLT
5513 or
5514 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
5515 .byte 0x66; rex64
5516 call *__tls_get_addr@GOTPCREL(%rip
5517 which may be converted to
5518 addr32 call __tls_get_addr
5519 into:
5520 movq %fs:0, %rax
5521 addq foo@gottpoff(%rip), %rax
5522 For 32bit, change
5523 leaq foo@tlsgd(%rip), %rdi
5524 .word 0x6666; rex64; call __tls_get_addr@PLT
5525 or
5526 leaq foo@tlsgd(%rip), %rdi
5527 .byte 0x66; rex64;
5528 call *__tls_get_addr@GOTPCREL(%rip)
5529 which may be converted to
5530 addr32 call __tls_get_addr
5531 into:
5532 movl %fs:0, %eax
5533 addq foo@gottpoff(%rip), %rax
5534 For largepic, change:
5535 leaq foo@tlsgd(%rip), %rdi
5536 movabsq $__tls_get_addr@pltoff, %rax
5537 addq %r15, %rax
5538 call *%rax
5539 into:
5540 movq %fs:0, %rax
5541 addq foo@gottpoff(%rax), %rax
5542 nopw 0x0(%rax,%rax,1) */
5543 int largepic = 0;
5544 if (ABI_64_P (output_bfd))
5545 {
5546 if (contents[roff + 5] == 0xb8)
5547 {
5548 memcpy (contents + roff - 3,
5549 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
5550 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
5551 largepic = 1;
5552 }
5553 else
5554 memcpy (contents + roff - 4,
5555 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
5556 16);
5557 }
5558 else
5559 memcpy (contents + roff - 3,
5560 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
5561 15);
5562
5563 relocation = (htab->elf.sgot->output_section->vma
5564 + htab->elf.sgot->output_offset + off
5565 - roff
5566 - largepic
5567 - input_section->output_section->vma
5568 - input_section->output_offset
5569 - 12);
5570 bfd_put_32 (output_bfd, relocation,
5571 contents + roff + 8 + largepic);
5572 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
5573 rel++;
5574 wrel++;
5575 continue;
5576 }
5577 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_GOTPC32_TLSDESC)
5578 {
5579 /* GDesc -> IE transition.
5580 It's originally something like:
5581 leaq x@tlsdesc(%rip), %rax
5582
5583 Change it to:
5584 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
5585
5586 /* Now modify the instruction as appropriate. To
5587 turn a leaq into a movq in the form we use it, it
5588 suffices to change the second byte from 0x8d to
5589 0x8b. */
5590 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
5591
5592 bfd_put_32 (output_bfd,
5593 htab->elf.sgot->output_section->vma
5594 + htab->elf.sgot->output_offset + off
5595 - rel->r_offset
5596 - input_section->output_section->vma
5597 - input_section->output_offset
5598 - 4,
5599 contents + roff);
5600 continue;
5601 }
5602 else if (ELF32_R_TYPE (rel->r_info) == R_X86_64_TLSDESC_CALL)
5603 {
5604 /* GDesc -> IE transition.
5605 It's originally:
5606 call *(%rax)
5607
5608 Change it to:
5609 xchg %ax, %ax. */
5610
5611 bfd_put_8 (output_bfd, 0x66, contents + roff);
5612 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
5613 continue;
5614 }
5615 else
5616 BFD_ASSERT (FALSE);
5617 }
5618 break;
5619
5620 case R_X86_64_TLSLD:
5621 if (! elf_x86_64_tls_transition (info, input_bfd,
5622 input_section, contents,
5623 symtab_hdr, sym_hashes,
5624 &r_type, GOT_UNKNOWN, rel,
5625 relend, h, r_symndx, TRUE))
5626 return FALSE;
5627
5628 if (r_type != R_X86_64_TLSLD)
5629 {
5630 /* LD->LE transition:
5631 leaq foo@tlsld(%rip), %rdi
5632 call __tls_get_addr@PLT
5633 For 64bit, we change it into:
5634 .word 0x6666; .byte 0x66; movq %fs:0, %rax
5635 For 32bit, we change it into:
5636 nopl 0x0(%rax); movl %fs:0, %eax
5637 Or
5638 leaq foo@tlsld(%rip), %rdi;
5639 call *__tls_get_addr@GOTPCREL(%rip)
5640 which may be converted to
5641 addr32 call __tls_get_addr
5642 For 64bit, we change it into:
5643 .word 0x6666; .word 0x6666; movq %fs:0, %rax
5644 For 32bit, we change it into:
5645 nopw 0x0(%rax); movl %fs:0, %eax
5646 For largepic, change:
5647 leaq foo@tlsgd(%rip), %rdi
5648 movabsq $__tls_get_addr@pltoff, %rax
5649 addq %rbx, %rax
5650 call *%rax
5651 into
5652 data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
5653 movq %fs:0, %eax */
5654
5655 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
5656 if (ABI_64_P (output_bfd))
5657 {
5658 if (contents[rel->r_offset + 5] == 0xb8)
5659 memcpy (contents + rel->r_offset - 3,
5660 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
5661 "\x64\x48\x8b\x04\x25\0\0\0", 22);
5662 else if (contents[rel->r_offset + 4] == 0xff
5663 || contents[rel->r_offset + 4] == 0x67)
5664 memcpy (contents + rel->r_offset - 3,
5665 "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
5666 13);
5667 else
5668 memcpy (contents + rel->r_offset - 3,
5669 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
5670 }
5671 else
5672 {
5673 if (contents[rel->r_offset + 4] == 0xff)
5674 memcpy (contents + rel->r_offset - 3,
5675 "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
5676 13);
5677 else
5678 memcpy (contents + rel->r_offset - 3,
5679 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
5680 }
5681 /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
5682 and R_X86_64_PLTOFF64. */
5683 rel++;
5684 wrel++;
5685 continue;
5686 }
5687
5688 if (htab->elf.sgot == NULL)
5689 abort ();
5690
5691 off = htab->tls_ld_got.offset;
5692 if (off & 1)
5693 off &= ~1;
5694 else
5695 {
5696 Elf_Internal_Rela outrel;
5697
5698 if (htab->elf.srelgot == NULL)
5699 abort ();
5700
5701 outrel.r_offset = (htab->elf.sgot->output_section->vma
5702 + htab->elf.sgot->output_offset + off);
5703
5704 bfd_put_64 (output_bfd, 0,
5705 htab->elf.sgot->contents + off);
5706 bfd_put_64 (output_bfd, 0,
5707 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
5708 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
5709 outrel.r_addend = 0;
5710 elf_append_rela (output_bfd, htab->elf.srelgot,
5711 &outrel);
5712 htab->tls_ld_got.offset |= 1;
5713 }
5714 relocation = htab->elf.sgot->output_section->vma
5715 + htab->elf.sgot->output_offset + off;
5716 unresolved_reloc = FALSE;
5717 break;
5718
5719 case R_X86_64_DTPOFF32:
5720 if (!bfd_link_executable (info)
5721 || (input_section->flags & SEC_CODE) == 0)
5722 relocation -= elf_x86_64_dtpoff_base (info);
5723 else
5724 relocation = elf_x86_64_tpoff (info, relocation);
5725 break;
5726
5727 case R_X86_64_TPOFF32:
5728 case R_X86_64_TPOFF64:
5729 BFD_ASSERT (bfd_link_executable (info));
5730 relocation = elf_x86_64_tpoff (info, relocation);
5731 break;
5732
5733 case R_X86_64_DTPOFF64:
5734 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
5735 relocation -= elf_x86_64_dtpoff_base (info);
5736 break;
5737
5738 default:
5739 break;
5740 }
5741
5742 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
5743 because such sections are not SEC_ALLOC and thus ld.so will
5744 not process them. */
5745 if (unresolved_reloc
5746 && !((input_section->flags & SEC_DEBUGGING) != 0
5747 && h->def_dynamic)
5748 && _bfd_elf_section_offset (output_bfd, info, input_section,
5749 rel->r_offset) != (bfd_vma) -1)
5750 {
5751 _bfd_error_handler
5752 /* xgettext:c-format */
5753 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
5754 input_bfd,
5755 input_section,
5756 (long) rel->r_offset,
5757 howto->name,
5758 h->root.root.string);
5759 return FALSE;
5760 }
5761
5762 do_relocation:
5763 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
5764 contents, rel->r_offset,
5765 relocation, rel->r_addend);
5766
5767 check_relocation_error:
5768 if (r != bfd_reloc_ok)
5769 {
5770 const char *name;
5771
5772 if (h != NULL)
5773 name = h->root.root.string;
5774 else
5775 {
5776 name = bfd_elf_string_from_elf_section (input_bfd,
5777 symtab_hdr->sh_link,
5778 sym->st_name);
5779 if (name == NULL)
5780 return FALSE;
5781 if (*name == '\0')
5782 name = bfd_section_name (input_bfd, sec);
5783 }
5784
5785 if (r == bfd_reloc_overflow)
5786 (*info->callbacks->reloc_overflow)
5787 (info, (h ? &h->root : NULL), name, howto->name,
5788 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
5789 else
5790 {
5791 _bfd_error_handler
5792 /* xgettext:c-format */
5793 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
5794 input_bfd, input_section,
5795 (long) rel->r_offset, name, (int) r);
5796 return FALSE;
5797 }
5798 }
5799
5800 if (wrel != rel)
5801 *wrel = *rel;
5802 }
5803
5804 if (wrel != rel)
5805 {
5806 Elf_Internal_Shdr *rel_hdr;
5807 size_t deleted = rel - wrel;
5808
5809 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
5810 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5811 if (rel_hdr->sh_size == 0)
5812 {
5813 /* It is too late to remove an empty reloc section. Leave
5814 one NONE reloc.
5815 ??? What is wrong with an empty section??? */
5816 rel_hdr->sh_size = rel_hdr->sh_entsize;
5817 deleted -= 1;
5818 }
5819 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
5820 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
5821 input_section->reloc_count -= deleted;
5822 }
5823
5824 return TRUE;
5825 }
5826
5827 /* Finish up dynamic symbol handling. We set the contents of various
5828 dynamic sections here. */
5829
5830 static bfd_boolean
5831 elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
5832 struct bfd_link_info *info,
5833 struct elf_link_hash_entry *h,
5834 Elf_Internal_Sym *sym)
5835 {
5836 struct elf_x86_64_link_hash_table *htab;
5837 bfd_boolean use_plt_second;
5838 struct elf_x86_64_link_hash_entry *eh;
5839 bfd_boolean local_undefweak;
5840
5841 htab = elf_x86_64_hash_table (info);
5842 if (htab == NULL)
5843 return FALSE;
5844
5845 /* Use the second PLT section only if there is .plt section. */
5846 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
5847
5848 eh = (struct elf_x86_64_link_hash_entry *) h;
5849 if (eh->no_finish_dynamic_symbol)
5850 abort ();
5851
5852 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
5853 resolved undefined weak symbols in executable so that their
5854 references have value 0 at run-time. */
5855 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
5856 eh->has_got_reloc,
5857 eh);
5858
5859 if (h->plt.offset != (bfd_vma) -1)
5860 {
5861 bfd_vma plt_index;
5862 bfd_vma got_offset, plt_offset;
5863 Elf_Internal_Rela rela;
5864 bfd_byte *loc;
5865 asection *plt, *gotplt, *relplt, *resolved_plt;
5866 const struct elf_backend_data *bed;
5867 bfd_vma plt_got_pcrel_offset;
5868
5869 /* When building a static executable, use .iplt, .igot.plt and
5870 .rela.iplt sections for STT_GNU_IFUNC symbols. */
5871 if (htab->elf.splt != NULL)
5872 {
5873 plt = htab->elf.splt;
5874 gotplt = htab->elf.sgotplt;
5875 relplt = htab->elf.srelplt;
5876 }
5877 else
5878 {
5879 plt = htab->elf.iplt;
5880 gotplt = htab->elf.igotplt;
5881 relplt = htab->elf.irelplt;
5882 }
5883
5884 /* This symbol has an entry in the procedure linkage table. Set
5885 it up. */
5886 if ((h->dynindx == -1
5887 && !local_undefweak
5888 && !((h->forced_local || bfd_link_executable (info))
5889 && h->def_regular
5890 && h->type == STT_GNU_IFUNC))
5891 || plt == NULL
5892 || gotplt == NULL
5893 || relplt == NULL)
5894 abort ();
5895
5896 /* Get the index in the procedure linkage table which
5897 corresponds to this symbol. This is the index of this symbol
5898 in all the symbols for which we are making plt entries. The
5899 first entry in the procedure linkage table is reserved.
5900
5901 Get the offset into the .got table of the entry that
5902 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
5903 bytes. The first three are reserved for the dynamic linker.
5904
5905 For static executables, we don't reserve anything. */
5906
5907 if (plt == htab->elf.splt)
5908 {
5909 got_offset = (h->plt.offset / htab->plt.plt_entry_size
5910 - htab->plt.has_plt0);
5911 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
5912 }
5913 else
5914 {
5915 got_offset = h->plt.offset / htab->plt.plt_entry_size;
5916 got_offset = got_offset * GOT_ENTRY_SIZE;
5917 }
5918
5919 /* Fill in the entry in the procedure linkage table. */
5920 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
5921 htab->plt.plt_entry_size);
5922 if (use_plt_second)
5923 {
5924 memcpy (htab->plt_second->contents + eh->plt_second.offset,
5925 htab->non_lazy_plt->plt_entry,
5926 htab->non_lazy_plt->plt_entry_size);
5927
5928 resolved_plt = htab->plt_second;
5929 plt_offset = eh->plt_second.offset;
5930 }
5931 else
5932 {
5933 resolved_plt = plt;
5934 plt_offset = h->plt.offset;
5935 }
5936
5937 /* Insert the relocation positions of the plt section. */
5938
5939 /* Put offset the PC-relative instruction referring to the GOT entry,
5940 subtracting the size of that instruction. */
5941 plt_got_pcrel_offset = (gotplt->output_section->vma
5942 + gotplt->output_offset
5943 + got_offset
5944 - resolved_plt->output_section->vma
5945 - resolved_plt->output_offset
5946 - plt_offset
5947 - htab->plt.plt_got_insn_size);
5948
5949 /* Check PC-relative offset overflow in PLT entry. */
5950 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
5951 /* xgettext:c-format */
5952 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in PLT entry for `%s'\n"),
5953 output_bfd, h->root.root.string);
5954
5955 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
5956 (resolved_plt->contents + plt_offset
5957 + htab->plt.plt_got_offset));
5958
5959 /* Fill in the entry in the global offset table, initially this
5960 points to the second part of the PLT entry. Leave the entry
5961 as zero for undefined weak symbol in PIE. No PLT relocation
5962 against undefined weak symbol in PIE. */
5963 if (!local_undefweak)
5964 {
5965 if (htab->plt.has_plt0)
5966 bfd_put_64 (output_bfd, (plt->output_section->vma
5967 + plt->output_offset
5968 + h->plt.offset
5969 + htab->lazy_plt->plt_lazy_offset),
5970 gotplt->contents + got_offset);
5971
5972 /* Fill in the entry in the .rela.plt section. */
5973 rela.r_offset = (gotplt->output_section->vma
5974 + gotplt->output_offset
5975 + got_offset);
5976 if (h->dynindx == -1
5977 || ((bfd_link_executable (info)
5978 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
5979 && h->def_regular
5980 && h->type == STT_GNU_IFUNC))
5981 {
5982 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
5983 h->root.root.string,
5984 h->root.u.def.section->owner);
5985
5986 /* If an STT_GNU_IFUNC symbol is locally defined, generate
5987 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
5988 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
5989 rela.r_addend = (h->root.u.def.value
5990 + h->root.u.def.section->output_section->vma
5991 + h->root.u.def.section->output_offset);
5992 /* R_X86_64_IRELATIVE comes last. */
5993 plt_index = htab->next_irelative_index--;
5994 }
5995 else
5996 {
5997 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
5998 rela.r_addend = 0;
5999 plt_index = htab->next_jump_slot_index++;
6000 }
6001
6002 /* Don't fill the second and third slots in PLT entry for
6003 static executables nor without PLT0. */
6004 if (plt == htab->elf.splt && htab->plt.has_plt0)
6005 {
6006 bfd_vma plt0_offset
6007 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
6008
6009 /* Put relocation index. */
6010 bfd_put_32 (output_bfd, plt_index,
6011 (plt->contents + h->plt.offset
6012 + htab->lazy_plt->plt_reloc_offset));
6013
6014 /* Put offset for jmp .PLT0 and check for overflow. We don't
6015 check relocation index for overflow since branch displacement
6016 will overflow first. */
6017 if (plt0_offset > 0x80000000)
6018 /* xgettext:c-format */
6019 info->callbacks->einfo (_("%F%B: branch displacement overflow in PLT entry for `%s'\n"),
6020 output_bfd, h->root.root.string);
6021 bfd_put_32 (output_bfd, - plt0_offset,
6022 (plt->contents + h->plt.offset
6023 + htab->lazy_plt->plt_plt_offset));
6024 }
6025
6026 bed = get_elf_backend_data (output_bfd);
6027 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
6028 bed->s->swap_reloca_out (output_bfd, &rela, loc);
6029 }
6030 }
6031 else if (eh->plt_got.offset != (bfd_vma) -1)
6032 {
6033 bfd_vma got_offset, plt_offset;
6034 asection *plt, *got;
6035 bfd_boolean got_after_plt;
6036 int32_t got_pcrel_offset;
6037
6038 /* Set the entry in the GOT procedure linkage table. */
6039 plt = htab->plt_got;
6040 got = htab->elf.sgot;
6041 got_offset = h->got.offset;
6042
6043 if (got_offset == (bfd_vma) -1
6044 || (h->type == STT_GNU_IFUNC && h->def_regular)
6045 || plt == NULL
6046 || got == NULL)
6047 abort ();
6048
6049 /* Use the non-lazy PLT entry template for the GOT PLT since they
6050 are the identical. */
6051 /* Fill in the entry in the GOT procedure linkage table. */
6052 plt_offset = eh->plt_got.offset;
6053 memcpy (plt->contents + plt_offset,
6054 htab->non_lazy_plt->plt_entry,
6055 htab->non_lazy_plt->plt_entry_size);
6056
6057 /* Put offset the PC-relative instruction referring to the GOT
6058 entry, subtracting the size of that instruction. */
6059 got_pcrel_offset = (got->output_section->vma
6060 + got->output_offset
6061 + got_offset
6062 - plt->output_section->vma
6063 - plt->output_offset
6064 - plt_offset
6065 - htab->non_lazy_plt->plt_got_insn_size);
6066
6067 /* Check PC-relative offset overflow in GOT PLT entry. */
6068 got_after_plt = got->output_section->vma > plt->output_section->vma;
6069 if ((got_after_plt && got_pcrel_offset < 0)
6070 || (!got_after_plt && got_pcrel_offset > 0))
6071 /* xgettext:c-format */
6072 info->callbacks->einfo (_("%F%B: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
6073 output_bfd, h->root.root.string);
6074
6075 bfd_put_32 (output_bfd, got_pcrel_offset,
6076 (plt->contents + plt_offset
6077 + htab->non_lazy_plt->plt_got_offset));
6078 }
6079
6080 if (!local_undefweak
6081 && !h->def_regular
6082 && (h->plt.offset != (bfd_vma) -1
6083 || eh->plt_got.offset != (bfd_vma) -1))
6084 {
6085 /* Mark the symbol as undefined, rather than as defined in
6086 the .plt section. Leave the value if there were any
6087 relocations where pointer equality matters (this is a clue
6088 for the dynamic linker, to make function pointer
6089 comparisons work between an application and shared
6090 library), otherwise set it to zero. If a function is only
6091 called from a binary, there is no need to slow down
6092 shared libraries because of that. */
6093 sym->st_shndx = SHN_UNDEF;
6094 if (!h->pointer_equality_needed)
6095 sym->st_value = 0;
6096 }
6097
6098 /* Don't generate dynamic GOT relocation against undefined weak
6099 symbol in executable. */
6100 if (h->got.offset != (bfd_vma) -1
6101 && ! GOT_TLS_GD_ANY_P (elf_x86_64_hash_entry (h)->tls_type)
6102 && elf_x86_64_hash_entry (h)->tls_type != GOT_TLS_IE
6103 && !local_undefweak)
6104 {
6105 Elf_Internal_Rela rela;
6106 asection *relgot = htab->elf.srelgot;
6107
6108 /* This symbol has an entry in the global offset table. Set it
6109 up. */
6110 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
6111 abort ();
6112
6113 rela.r_offset = (htab->elf.sgot->output_section->vma
6114 + htab->elf.sgot->output_offset
6115 + (h->got.offset &~ (bfd_vma) 1));
6116
6117 /* If this is a static link, or it is a -Bsymbolic link and the
6118 symbol is defined locally or was forced to be local because
6119 of a version file, we just want to emit a RELATIVE reloc.
6120 The entry in the global offset table will already have been
6121 initialized in the relocate_section function. */
6122 if (h->def_regular
6123 && h->type == STT_GNU_IFUNC)
6124 {
6125 if (h->plt.offset == (bfd_vma) -1)
6126 {
6127 /* STT_GNU_IFUNC is referenced without PLT. */
6128 if (htab->elf.splt == NULL)
6129 {
6130 /* use .rel[a].iplt section to store .got relocations
6131 in static executable. */
6132 relgot = htab->elf.irelplt;
6133 }
6134 if (SYMBOL_REFERENCES_LOCAL (info, h))
6135 {
6136 info->callbacks->minfo (_("Local IFUNC function `%s' in %B\n"),
6137 output_bfd,
6138 h->root.root.string,
6139 h->root.u.def.section->owner);
6140
6141 rela.r_info = htab->r_info (0,
6142 R_X86_64_IRELATIVE);
6143 rela.r_addend = (h->root.u.def.value
6144 + h->root.u.def.section->output_section->vma
6145 + h->root.u.def.section->output_offset);
6146 }
6147 else
6148 goto do_glob_dat;
6149 }
6150 else if (bfd_link_pic (info))
6151 {
6152 /* Generate R_X86_64_GLOB_DAT. */
6153 goto do_glob_dat;
6154 }
6155 else
6156 {
6157 asection *plt;
6158 bfd_vma plt_offset;
6159
6160 if (!h->pointer_equality_needed)
6161 abort ();
6162
6163 /* For non-shared object, we can't use .got.plt, which
6164 contains the real function addres if we need pointer
6165 equality. We load the GOT entry with the PLT entry. */
6166 if (htab->plt_second != NULL)
6167 {
6168 plt = htab->plt_second;
6169 plt_offset = eh->plt_second.offset;
6170 }
6171 else
6172 {
6173 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
6174 plt_offset = h->plt.offset;
6175 }
6176 bfd_put_64 (output_bfd, (plt->output_section->vma
6177 + plt->output_offset
6178 + plt_offset),
6179 htab->elf.sgot->contents + h->got.offset);
6180 return TRUE;
6181 }
6182 }
6183 else if (bfd_link_pic (info)
6184 && SYMBOL_REFERENCES_LOCAL (info, h))
6185 {
6186 if (!h->def_regular)
6187 return FALSE;
6188 BFD_ASSERT((h->got.offset & 1) != 0);
6189 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
6190 rela.r_addend = (h->root.u.def.value
6191 + h->root.u.def.section->output_section->vma
6192 + h->root.u.def.section->output_offset);
6193 }
6194 else
6195 {
6196 BFD_ASSERT((h->got.offset & 1) == 0);
6197 do_glob_dat:
6198 bfd_put_64 (output_bfd, (bfd_vma) 0,
6199 htab->elf.sgot->contents + h->got.offset);
6200 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
6201 rela.r_addend = 0;
6202 }
6203
6204 elf_append_rela (output_bfd, relgot, &rela);
6205 }
6206
6207 if (h->needs_copy)
6208 {
6209 Elf_Internal_Rela rela;
6210 asection *s;
6211
6212 /* This symbol needs a copy reloc. Set it up. */
6213
6214 if (h->dynindx == -1
6215 || (h->root.type != bfd_link_hash_defined
6216 && h->root.type != bfd_link_hash_defweak)
6217 || htab->elf.srelbss == NULL
6218 || htab->elf.sreldynrelro == NULL)
6219 abort ();
6220
6221 rela.r_offset = (h->root.u.def.value
6222 + h->root.u.def.section->output_section->vma
6223 + h->root.u.def.section->output_offset);
6224 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
6225 rela.r_addend = 0;
6226 if (h->root.u.def.section == htab->elf.sdynrelro)
6227 s = htab->elf.sreldynrelro;
6228 else
6229 s = htab->elf.srelbss;
6230 elf_append_rela (output_bfd, s, &rela);
6231 }
6232
6233 return TRUE;
6234 }
6235
6236 /* Finish up local dynamic symbol handling. We set the contents of
6237 various dynamic sections here. */
6238
6239 static bfd_boolean
6240 elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
6241 {
6242 struct elf_link_hash_entry *h
6243 = (struct elf_link_hash_entry *) *slot;
6244 struct bfd_link_info *info
6245 = (struct bfd_link_info *) inf;
6246
6247 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
6248 info, h, NULL);
6249 }
6250
6251 /* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
6252 here since undefined weak symbol may not be dynamic and may not be
6253 called for elf_x86_64_finish_dynamic_symbol. */
6254
6255 static bfd_boolean
6256 elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
6257 void *inf)
6258 {
6259 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
6260 struct bfd_link_info *info = (struct bfd_link_info *) inf;
6261
6262 if (h->root.type != bfd_link_hash_undefweak
6263 || h->dynindx != -1)
6264 return TRUE;
6265
6266 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
6267 info, h, NULL);
6268 }
6269
6270 /* Used to decide how to sort relocs in an optimal manner for the
6271 dynamic linker, before writing them out. */
6272
6273 static enum elf_reloc_type_class
6274 elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
6275 const asection *rel_sec ATTRIBUTE_UNUSED,
6276 const Elf_Internal_Rela *rela)
6277 {
6278 bfd *abfd = info->output_bfd;
6279 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
6280 struct elf_x86_64_link_hash_table *htab = elf_x86_64_hash_table (info);
6281
6282 if (htab->elf.dynsym != NULL
6283 && htab->elf.dynsym->contents != NULL)
6284 {
6285 /* Check relocation against STT_GNU_IFUNC symbol if there are
6286 dynamic symbols. */
6287 unsigned long r_symndx = htab->r_sym (rela->r_info);
6288 if (r_symndx != STN_UNDEF)
6289 {
6290 Elf_Internal_Sym sym;
6291 if (!bed->s->swap_symbol_in (abfd,
6292 (htab->elf.dynsym->contents
6293 + r_symndx * bed->s->sizeof_sym),
6294 0, &sym))
6295 abort ();
6296
6297 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
6298 return reloc_class_ifunc;
6299 }
6300 }
6301
6302 switch ((int) ELF32_R_TYPE (rela->r_info))
6303 {
6304 case R_X86_64_IRELATIVE:
6305 return reloc_class_ifunc;
6306 case R_X86_64_RELATIVE:
6307 case R_X86_64_RELATIVE64:
6308 return reloc_class_relative;
6309 case R_X86_64_JUMP_SLOT:
6310 return reloc_class_plt;
6311 case R_X86_64_COPY:
6312 return reloc_class_copy;
6313 default:
6314 return reloc_class_normal;
6315 }
6316 }
6317
6318 /* Finish up the dynamic sections. */
6319
6320 static bfd_boolean
6321 elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
6322 struct bfd_link_info *info)
6323 {
6324 struct elf_x86_64_link_hash_table *htab;
6325 bfd *dynobj;
6326 asection *sdyn;
6327
6328 htab = elf_x86_64_hash_table (info);
6329 if (htab == NULL)
6330 return FALSE;
6331
6332 dynobj = htab->elf.dynobj;
6333 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
6334
6335 if (htab->elf.dynamic_sections_created)
6336 {
6337 bfd_byte *dyncon, *dynconend;
6338 const struct elf_backend_data *bed;
6339 bfd_size_type sizeof_dyn;
6340
6341 if (sdyn == NULL || htab->elf.sgot == NULL)
6342 abort ();
6343
6344 bed = get_elf_backend_data (dynobj);
6345 sizeof_dyn = bed->s->sizeof_dyn;
6346 dyncon = sdyn->contents;
6347 dynconend = sdyn->contents + sdyn->size;
6348 for (; dyncon < dynconend; dyncon += sizeof_dyn)
6349 {
6350 Elf_Internal_Dyn dyn;
6351 asection *s;
6352
6353 (*bed->s->swap_dyn_in) (dynobj, dyncon, &dyn);
6354
6355 switch (dyn.d_tag)
6356 {
6357 default:
6358 continue;
6359
6360 case DT_PLTGOT:
6361 s = htab->elf.sgotplt;
6362 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
6363 break;
6364
6365 case DT_JMPREL:
6366 dyn.d_un.d_ptr = htab->elf.srelplt->output_section->vma;
6367 break;
6368
6369 case DT_PLTRELSZ:
6370 s = htab->elf.srelplt->output_section;
6371 dyn.d_un.d_val = s->size;
6372 break;
6373
6374 case DT_TLSDESC_PLT:
6375 s = htab->elf.splt;
6376 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
6377 + htab->tlsdesc_plt;
6378 break;
6379
6380 case DT_TLSDESC_GOT:
6381 s = htab->elf.sgot;
6382 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
6383 + htab->tlsdesc_got;
6384 break;
6385 }
6386
6387 (*bed->s->swap_dyn_out) (output_bfd, &dyn, dyncon);
6388 }
6389
6390 if (htab->elf.splt && htab->elf.splt->size > 0)
6391 {
6392 elf_section_data (htab->elf.splt->output_section)
6393 ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
6394
6395 if (htab->plt.has_plt0)
6396 {
6397 /* Fill in the special first entry in the procedure linkage
6398 table. */
6399 memcpy (htab->elf.splt->contents,
6400 htab->lazy_plt->plt0_entry,
6401 htab->lazy_plt->plt_entry_size);
6402 /* Add offset for pushq GOT+8(%rip), since the instruction
6403 uses 6 bytes subtract this value. */
6404 bfd_put_32 (output_bfd,
6405 (htab->elf.sgotplt->output_section->vma
6406 + htab->elf.sgotplt->output_offset
6407 + 8
6408 - htab->elf.splt->output_section->vma
6409 - htab->elf.splt->output_offset
6410 - 6),
6411 (htab->elf.splt->contents
6412 + htab->lazy_plt->plt0_got1_offset));
6413 /* Add offset for the PC-relative instruction accessing
6414 GOT+16, subtracting the offset to the end of that
6415 instruction. */
6416 bfd_put_32 (output_bfd,
6417 (htab->elf.sgotplt->output_section->vma
6418 + htab->elf.sgotplt->output_offset
6419 + 16
6420 - htab->elf.splt->output_section->vma
6421 - htab->elf.splt->output_offset
6422 - htab->lazy_plt->plt0_got2_insn_end),
6423 (htab->elf.splt->contents
6424 + htab->lazy_plt->plt0_got2_offset));
6425
6426 if (htab->tlsdesc_plt)
6427 {
6428 bfd_put_64 (output_bfd, (bfd_vma) 0,
6429 htab->elf.sgot->contents + htab->tlsdesc_got);
6430
6431 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
6432 htab->lazy_plt->plt0_entry,
6433 htab->lazy_plt->plt_entry_size);
6434
6435 /* Add offset for pushq GOT+8(%rip), since the
6436 instruction uses 6 bytes subtract this value. */
6437 bfd_put_32 (output_bfd,
6438 (htab->elf.sgotplt->output_section->vma
6439 + htab->elf.sgotplt->output_offset
6440 + 8
6441 - htab->elf.splt->output_section->vma
6442 - htab->elf.splt->output_offset
6443 - htab->tlsdesc_plt
6444 - 6),
6445 (htab->elf.splt->contents
6446 + htab->tlsdesc_plt
6447 + htab->lazy_plt->plt0_got1_offset));
6448 /* Add offset for the PC-relative instruction accessing
6449 GOT+TDG, where TDG stands for htab->tlsdesc_got,
6450 subtracting the offset to the end of that
6451 instruction. */
6452 bfd_put_32 (output_bfd,
6453 (htab->elf.sgot->output_section->vma
6454 + htab->elf.sgot->output_offset
6455 + htab->tlsdesc_got
6456 - htab->elf.splt->output_section->vma
6457 - htab->elf.splt->output_offset
6458 - htab->tlsdesc_plt
6459 - htab->lazy_plt->plt0_got2_insn_end),
6460 (htab->elf.splt->contents
6461 + htab->tlsdesc_plt
6462 + htab->lazy_plt->plt0_got2_offset));
6463 }
6464 }
6465 }
6466 }
6467
6468 if (htab->plt_got != NULL && htab->plt_got->size > 0)
6469 elf_section_data (htab->plt_got->output_section)
6470 ->this_hdr.sh_entsize = htab->non_lazy_plt->plt_entry_size;
6471
6472 if (htab->plt_second != NULL && htab->plt_second->size > 0)
6473 elf_section_data (htab->plt_second->output_section)
6474 ->this_hdr.sh_entsize = htab->non_lazy_plt->plt_entry_size;
6475
6476 /* GOT is always created in setup_gnu_properties. But it may not be
6477 needed. */
6478 if (htab->elf.sgotplt && htab->elf.sgotplt->size > 0)
6479 {
6480 if (bfd_is_abs_section (htab->elf.sgotplt->output_section))
6481 {
6482 _bfd_error_handler
6483 (_("discarded output section: `%A'"), htab->elf.sgotplt);
6484 return FALSE;
6485 }
6486
6487 /* Set the first entry in the global offset table to the address of
6488 the dynamic section. */
6489 if (sdyn == NULL)
6490 bfd_put_64 (output_bfd, (bfd_vma) 0, htab->elf.sgotplt->contents);
6491 else
6492 bfd_put_64 (output_bfd,
6493 sdyn->output_section->vma + sdyn->output_offset,
6494 htab->elf.sgotplt->contents);
6495 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
6496 bfd_put_64 (output_bfd, (bfd_vma) 0,
6497 htab->elf.sgotplt->contents + GOT_ENTRY_SIZE);
6498 bfd_put_64 (output_bfd, (bfd_vma) 0,
6499 htab->elf.sgotplt->contents + GOT_ENTRY_SIZE*2);
6500
6501 elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize
6502 = GOT_ENTRY_SIZE;
6503 }
6504
6505 /* Adjust .eh_frame for .plt section. */
6506 if (htab->plt_eh_frame != NULL
6507 && htab->plt_eh_frame->contents != NULL)
6508 {
6509 if (htab->elf.splt != NULL
6510 && htab->elf.splt->size != 0
6511 && (htab->elf.splt->flags & SEC_EXCLUDE) == 0
6512 && htab->elf.splt->output_section != NULL
6513 && htab->plt_eh_frame->output_section != NULL)
6514 {
6515 bfd_vma plt_start = htab->elf.splt->output_section->vma;
6516 bfd_vma eh_frame_start = htab->plt_eh_frame->output_section->vma
6517 + htab->plt_eh_frame->output_offset
6518 + PLT_FDE_START_OFFSET;
6519 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
6520 htab->plt_eh_frame->contents
6521 + PLT_FDE_START_OFFSET);
6522 }
6523 if (htab->plt_eh_frame->sec_info_type == SEC_INFO_TYPE_EH_FRAME)
6524 {
6525 if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
6526 htab->plt_eh_frame,
6527 htab->plt_eh_frame->contents))
6528 return FALSE;
6529 }
6530 }
6531
6532 /* Adjust .eh_frame for .plt.got section. */
6533 if (htab->plt_got_eh_frame != NULL
6534 && htab->plt_got_eh_frame->contents != NULL)
6535 {
6536 if (htab->plt_got != NULL
6537 && htab->plt_got->size != 0
6538 && (htab->plt_got->flags & SEC_EXCLUDE) == 0
6539 && htab->plt_got->output_section != NULL
6540 && htab->plt_got_eh_frame->output_section != NULL)
6541 {
6542 bfd_vma plt_start = htab->plt_got->output_section->vma;
6543 bfd_vma eh_frame_start = htab->plt_got_eh_frame->output_section->vma
6544 + htab->plt_got_eh_frame->output_offset
6545 + PLT_FDE_START_OFFSET;
6546 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
6547 htab->plt_got_eh_frame->contents
6548 + PLT_FDE_START_OFFSET);
6549 }
6550 if (htab->plt_got_eh_frame->sec_info_type == SEC_INFO_TYPE_EH_FRAME)
6551 {
6552 if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
6553 htab->plt_got_eh_frame,
6554 htab->plt_got_eh_frame->contents))
6555 return FALSE;
6556 }
6557 }
6558
6559 /* Adjust .eh_frame for the second PLT section. */
6560 if (htab->plt_second_eh_frame != NULL
6561 && htab->plt_second_eh_frame->contents != NULL)
6562 {
6563 if (htab->plt_second != NULL
6564 && htab->plt_second->size != 0
6565 && (htab->plt_second->flags & SEC_EXCLUDE) == 0
6566 && htab->plt_second->output_section != NULL
6567 && htab->plt_second_eh_frame->output_section != NULL)
6568 {
6569 bfd_vma plt_start = htab->plt_second->output_section->vma;
6570 bfd_vma eh_frame_start
6571 = (htab->plt_second_eh_frame->output_section->vma
6572 + htab->plt_second_eh_frame->output_offset
6573 + PLT_FDE_START_OFFSET);
6574 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start,
6575 htab->plt_second_eh_frame->contents
6576 + PLT_FDE_START_OFFSET);
6577 }
6578 if (htab->plt_second_eh_frame->sec_info_type
6579 == SEC_INFO_TYPE_EH_FRAME)
6580 {
6581 if (! _bfd_elf_write_section_eh_frame (output_bfd, info,
6582 htab->plt_second_eh_frame,
6583 htab->plt_second_eh_frame->contents))
6584 return FALSE;
6585 }
6586 }
6587
6588 if (htab->elf.sgot && htab->elf.sgot->size > 0)
6589 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize
6590 = GOT_ENTRY_SIZE;
6591
6592 /* Fill PLT entries for undefined weak symbols in PIE. */
6593 if (bfd_link_pie (info))
6594 bfd_hash_traverse (&info->hash->table,
6595 elf_x86_64_pie_finish_undefweak_symbol,
6596 info);
6597
6598 return TRUE;
6599 }
6600
6601 /* Fill PLT/GOT entries and allocate dynamic relocations for local
6602 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
6603 It has to be done before elf_link_sort_relocs is called so that
6604 dynamic relocations are properly sorted. */
6605
6606 static bfd_boolean
6607 elf_x86_64_output_arch_local_syms
6608 (bfd *output_bfd ATTRIBUTE_UNUSED,
6609 struct bfd_link_info *info,
6610 void *flaginfo ATTRIBUTE_UNUSED,
6611 int (*func) (void *, const char *,
6612 Elf_Internal_Sym *,
6613 asection *,
6614 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
6615 {
6616 struct elf_x86_64_link_hash_table *htab = elf_x86_64_hash_table (info);
6617 if (htab == NULL)
6618 return FALSE;
6619
6620 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
6621 htab_traverse (htab->loc_hash_table,
6622 elf_x86_64_finish_local_dynamic_symbol,
6623 info);
6624
6625 return TRUE;
6626 }
6627
6628 /* Sort relocs into address order. */
6629
6630 static int
6631 compare_relocs (const void *ap, const void *bp)
6632 {
6633 const arelent *a = * (const arelent **) ap;
6634 const arelent *b = * (const arelent **) bp;
6635
6636 if (a->address > b->address)
6637 return 1;
6638 else if (a->address < b->address)
6639 return -1;
6640 else
6641 return 0;
6642 }
6643
6644 enum elf_x86_64_plt_type
6645 {
6646 plt_non_lazy = 0,
6647 plt_lazy = 1 << 0,
6648 plt_second = 1 << 1,
6649 plt_unknown = -1
6650 };
6651
6652 struct elf_x86_64_plt
6653 {
6654 const char *name;
6655 asection *sec;
6656 bfd_byte *contents;
6657 enum elf_x86_64_plt_type type;
6658 unsigned int plt_got_offset;
6659 unsigned int plt_got_insn_size;
6660 unsigned int plt_entry_size;
6661 long count;
6662 };
6663
6664 /* Forward declaration. */
6665 static const struct elf_x86_64_lazy_plt_layout elf_x86_64_nacl_plt;
6666
6667 /* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
6668 dynamic relocations. */
6669
6670 static long
6671 elf_x86_64_get_synthetic_symtab (bfd *abfd,
6672 long symcount ATTRIBUTE_UNUSED,
6673 asymbol **syms ATTRIBUTE_UNUSED,
6674 long dynsymcount,
6675 asymbol **dynsyms,
6676 asymbol **ret)
6677 {
6678 long size, count, i, n;
6679 int j;
6680 unsigned int plt_got_offset, plt_entry_size, plt_got_insn_size;
6681 asymbol *s;
6682 bfd_byte *plt_contents;
6683 long dynrelcount, relsize;
6684 arelent **dynrelbuf;
6685 const struct elf_x86_64_lazy_plt_layout *lazy_plt;
6686 const struct elf_x86_64_non_lazy_plt_layout *non_lazy_plt;
6687 const struct elf_x86_64_lazy_plt_layout *lazy_bnd_plt;
6688 const struct elf_x86_64_non_lazy_plt_layout *non_lazy_bnd_plt;
6689 const struct elf_x86_64_lazy_plt_layout *lazy_ibt_plt;
6690 const struct elf_x86_64_non_lazy_plt_layout *non_lazy_ibt_plt;
6691 asection *plt;
6692 char *names;
6693 enum elf_x86_64_plt_type plt_type;
6694 struct elf_x86_64_plt plts[] =
6695 {
6696 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
6697 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
6698 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
6699 { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
6700 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
6701 };
6702
6703 *ret = NULL;
6704
6705 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
6706 return 0;
6707
6708 if (dynsymcount <= 0)
6709 return 0;
6710
6711 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
6712 if (relsize <= 0)
6713 return -1;
6714
6715 dynrelbuf = (arelent **) bfd_malloc (relsize);
6716 if (dynrelbuf == NULL)
6717 return -1;
6718
6719 dynrelcount = bfd_canonicalize_dynamic_reloc (abfd, dynrelbuf,
6720 dynsyms);
6721
6722 /* Sort the relocs by address. */
6723 qsort (dynrelbuf, dynrelcount, sizeof (arelent *), compare_relocs);
6724
6725 if (get_elf_x86_64_backend_data (abfd)->os == is_normal)
6726 {
6727 lazy_plt = &elf_x86_64_lazy_plt;
6728 non_lazy_plt = &elf_x86_64_non_lazy_plt;
6729 lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
6730 non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
6731 if (ABI_64_P (abfd))
6732 {
6733 lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
6734 non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
6735 }
6736 else
6737 {
6738 lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
6739 non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
6740 }
6741 }
6742 else
6743 {
6744 lazy_plt = &elf_x86_64_nacl_plt;
6745 non_lazy_plt = NULL;
6746 lazy_bnd_plt = NULL;
6747 non_lazy_bnd_plt = NULL;
6748 lazy_ibt_plt = NULL;
6749 non_lazy_ibt_plt = NULL;
6750 }
6751
6752 count = 0;
6753 for (j = 0; plts[j].name != NULL; j++)
6754 {
6755 plt = bfd_get_section_by_name (abfd, plts[j].name);
6756 if (plt == NULL)
6757 continue;
6758
6759 /* Get the PLT section contents. */
6760 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
6761 if (plt_contents == NULL)
6762 break;
6763 if (!bfd_get_section_contents (abfd, (asection *) plt,
6764 plt_contents, 0, plt->size))
6765 {
6766 free (plt_contents);
6767 break;
6768 }
6769
6770 /* Check what kind of PLT it is. */
6771 plt_type = plt_unknown;
6772 if (plts[j].type == plt_unknown)
6773 {
6774 /* Match lazy PLT first. Need to check the first two
6775 instructions. */
6776 if ((memcmp (plt_contents, lazy_plt->plt0_entry,
6777 lazy_plt->plt0_got1_offset) == 0)
6778 && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
6779 2) == 0))
6780 plt_type = plt_lazy;
6781 else if (lazy_bnd_plt != NULL
6782 && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
6783 lazy_bnd_plt->plt0_got1_offset) == 0)
6784 && (memcmp (plt_contents + 6,
6785 lazy_bnd_plt->plt0_entry + 6, 3) == 0))
6786 {
6787 plt_type = plt_lazy | plt_second;
6788 /* The fist entry in the lazy IBT PLT is the same as the
6789 lazy BND PLT. */
6790 if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
6791 lazy_ibt_plt->plt_entry,
6792 lazy_ibt_plt->plt_got_offset) == 0))
6793 lazy_plt = lazy_ibt_plt;
6794 else
6795 lazy_plt = lazy_bnd_plt;
6796 }
6797 }
6798
6799 if (non_lazy_plt != NULL
6800 && (plt_type == plt_unknown || plt_type == plt_non_lazy))
6801 {
6802 /* Match non-lazy PLT. */
6803 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
6804 non_lazy_plt->plt_got_offset) == 0)
6805 plt_type = plt_non_lazy;
6806 }
6807
6808 if (plt_type == plt_unknown || plt_type == plt_second)
6809 {
6810 if (non_lazy_bnd_plt != NULL
6811 && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
6812 non_lazy_bnd_plt->plt_got_offset) == 0))
6813 {
6814 /* Match BND PLT. */
6815 plt_type = plt_second;
6816 non_lazy_plt = non_lazy_bnd_plt;
6817 }
6818 else if (non_lazy_ibt_plt != NULL
6819 && (memcmp (plt_contents,
6820 non_lazy_ibt_plt->plt_entry,
6821 non_lazy_ibt_plt->plt_got_offset) == 0))
6822 {
6823 /* Match IBT PLT. */
6824 plt_type = plt_second;
6825 non_lazy_plt = non_lazy_ibt_plt;
6826 }
6827 }
6828
6829 if (plt_type == plt_unknown)
6830 continue;
6831
6832 plts[j].sec = plt;
6833 plts[j].type = plt_type;
6834
6835 if ((plt_type & plt_lazy))
6836 {
6837 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
6838 plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
6839 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
6840 /* Skip PLT0 in lazy PLT. */
6841 i = 1;
6842 }
6843 else
6844 {
6845 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
6846 plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
6847 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
6848 i = 0;
6849 }
6850
6851 /* Skip lazy PLT when the second PLT is used. */
6852 if (plt_type == (plt_lazy | plt_second))
6853 plts[j].count = 0;
6854 else
6855 {
6856 n = plt->size / plts[j].plt_entry_size;
6857 plts[j].count = n;
6858 count += n - i;
6859 }
6860
6861 plts[j].contents = plt_contents;
6862 }
6863
6864 size = count * sizeof (asymbol);
6865 s = *ret = (asymbol *) bfd_zmalloc (size);
6866 if (s == NULL)
6867 {
6868 bad_return:
6869 for (j = 0; plts[j].name != NULL; j++)
6870 if (plts[j].contents != NULL)
6871 free (plts[j].contents);
6872 free (dynrelbuf);
6873 return -1;
6874 }
6875
6876 /* Check for each PLT section. */
6877 size = 0;
6878 n = 0;
6879 for (j = 0; plts[j].name != NULL; j++)
6880 if ((plt_contents = plts[j].contents) != NULL)
6881 {
6882 long k;
6883 bfd_vma offset;
6884
6885 plt_got_offset = plts[j].plt_got_offset;
6886 plt_got_insn_size = plts[j].plt_got_insn_size;
6887 plt_entry_size = plts[j].plt_entry_size;
6888
6889 plt = plts[j].sec;
6890
6891 if ((plts[j].type & plt_lazy))
6892 {
6893 /* Skip PLT0 in lazy PLT. */
6894 k = 1;
6895 offset = plt_entry_size;
6896 }
6897 else
6898 {
6899 k = 0;
6900 offset = 0;
6901 }
6902
6903 /* Check each PLT entry against dynamic relocations. */
6904 for (; k < plts[j].count; k++)
6905 {
6906 int off;
6907 bfd_vma got_vma;
6908 long min, max, mid;
6909 arelent *p;
6910
6911 /* Get the PC-relative offset, a signed 32-bit integer. */
6912 off = H_GET_32 (abfd, (plt_contents + offset
6913 + plt_got_offset));
6914 got_vma = plt->vma + offset + off + plt_got_insn_size;
6915
6916 /* Binary search. */
6917 p = dynrelbuf[0];
6918 min = 0;
6919 max = dynrelcount;
6920 while ((min + 1) < max)
6921 {
6922 arelent *r;
6923
6924 mid = (min + max) / 2;
6925 r = dynrelbuf[mid];
6926 if (got_vma > r->address)
6927 min = mid;
6928 else if (got_vma < r->address)
6929 max = mid;
6930 else
6931 {
6932 p = r;
6933 break;
6934 }
6935 }
6936
6937 /* Skip unknown relocation. PR 17512: file: bc9d6cf5. */
6938 if (got_vma == p->address
6939 && p->howto != NULL
6940 && (p->howto->type == R_X86_64_JUMP_SLOT
6941 || p->howto->type == R_X86_64_GLOB_DAT
6942 || p->howto->type == R_X86_64_IRELATIVE))
6943 {
6944 *s = **p->sym_ptr_ptr;
6945 /* Undefined syms won't have BSF_LOCAL or BSF_GLOBAL
6946 set. Since we are defining a symbol, ensure one
6947 of them is set. */
6948 if ((s->flags & BSF_LOCAL) == 0)
6949 s->flags |= BSF_GLOBAL;
6950 s->flags |= BSF_SYNTHETIC;
6951 /* This is no longer a section symbol. */
6952 s->flags &= ~BSF_SECTION_SYM;
6953 s->section = plt;
6954 s->the_bfd = plt->owner;
6955 s->value = offset;
6956 /* Store relocation for later use. */
6957 s->udata.p = p;
6958 /* Add @plt to function name later. */
6959 size += strlen (s->name) + sizeof ("@plt");
6960 if (p->addend != 0)
6961 size += sizeof ("+0x") - 1 + 8 + 8 * ABI_64_P (abfd);
6962 n++;
6963 s++;
6964 }
6965 offset += plt_entry_size;
6966 }
6967 }
6968
6969 /* PLT entries with R_X86_64_TLSDESC relocations are skipped. */
6970 if (n == 0)
6971 goto bad_return;
6972
6973 count = n;
6974
6975 /* Allocate space for @plt suffixes. */
6976 names = (char *) bfd_malloc (size);
6977 if (s == NULL)
6978 goto bad_return;
6979
6980 s = *ret;
6981 for (i = 0; i < count; i++)
6982 {
6983 /* Add @plt to function name. */
6984 arelent *p = (arelent *) s->udata.p;
6985 /* Clear it now. */
6986 s->udata.p = NULL;
6987 size = strlen (s->name);
6988 memcpy (names, s->name, size);
6989 s->name = names;
6990 names += size;
6991 if (p->addend != 0)
6992 {
6993 char buf[30], *a;
6994
6995 memcpy (names, "+0x", sizeof ("+0x") - 1);
6996 names += sizeof ("+0x") - 1;
6997 bfd_sprintf_vma (abfd, buf, p->addend);
6998 for (a = buf; *a == '0'; ++a)
6999 ;
7000 size = strlen (a);
7001 memcpy (names, a, size);
7002 names += size;
7003 }
7004 memcpy (names, "@plt", sizeof ("@plt"));
7005 names += sizeof ("@plt");
7006 s++;
7007 }
7008
7009 for (j = 0; plts[j].name != NULL; j++)
7010 if (plts[j].contents != NULL)
7011 free (plts[j].contents);
7012
7013 free (dynrelbuf);
7014
7015 return count;
7016 }
7017
7018 /* Handle an x86-64 specific section when reading an object file. This
7019 is called when elfcode.h finds a section with an unknown type. */
7020
7021 static bfd_boolean
7022 elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
7023 const char *name, int shindex)
7024 {
7025 if (hdr->sh_type != SHT_X86_64_UNWIND)
7026 return FALSE;
7027
7028 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
7029 return FALSE;
7030
7031 return TRUE;
7032 }
7033
7034 /* Hook called by the linker routine which adds symbols from an object
7035 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
7036 of .bss. */
7037
7038 static bfd_boolean
7039 elf_x86_64_add_symbol_hook (bfd *abfd,
7040 struct bfd_link_info *info ATTRIBUTE_UNUSED,
7041 Elf_Internal_Sym *sym,
7042 const char **namep ATTRIBUTE_UNUSED,
7043 flagword *flagsp ATTRIBUTE_UNUSED,
7044 asection **secp,
7045 bfd_vma *valp)
7046 {
7047 asection *lcomm;
7048
7049 switch (sym->st_shndx)
7050 {
7051 case SHN_X86_64_LCOMMON:
7052 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
7053 if (lcomm == NULL)
7054 {
7055 lcomm = bfd_make_section_with_flags (abfd,
7056 "LARGE_COMMON",
7057 (SEC_ALLOC
7058 | SEC_IS_COMMON
7059 | SEC_LINKER_CREATED));
7060 if (lcomm == NULL)
7061 return FALSE;
7062 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
7063 }
7064 *secp = lcomm;
7065 *valp = sym->st_size;
7066 return TRUE;
7067 }
7068
7069 return TRUE;
7070 }
7071
7072
7073 /* Given a BFD section, try to locate the corresponding ELF section
7074 index. */
7075
7076 static bfd_boolean
7077 elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
7078 asection *sec, int *index_return)
7079 {
7080 if (sec == &_bfd_elf_large_com_section)
7081 {
7082 *index_return = SHN_X86_64_LCOMMON;
7083 return TRUE;
7084 }
7085 return FALSE;
7086 }
7087
7088 /* Process a symbol. */
7089
7090 static void
7091 elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
7092 asymbol *asym)
7093 {
7094 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
7095
7096 switch (elfsym->internal_elf_sym.st_shndx)
7097 {
7098 case SHN_X86_64_LCOMMON:
7099 asym->section = &_bfd_elf_large_com_section;
7100 asym->value = elfsym->internal_elf_sym.st_size;
7101 /* Common symbol doesn't set BSF_GLOBAL. */
7102 asym->flags &= ~BSF_GLOBAL;
7103 break;
7104 }
7105 }
7106
7107 static bfd_boolean
7108 elf_x86_64_common_definition (Elf_Internal_Sym *sym)
7109 {
7110 return (sym->st_shndx == SHN_COMMON
7111 || sym->st_shndx == SHN_X86_64_LCOMMON);
7112 }
7113
7114 static unsigned int
7115 elf_x86_64_common_section_index (asection *sec)
7116 {
7117 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
7118 return SHN_COMMON;
7119 else
7120 return SHN_X86_64_LCOMMON;
7121 }
7122
7123 static asection *
7124 elf_x86_64_common_section (asection *sec)
7125 {
7126 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
7127 return bfd_com_section_ptr;
7128 else
7129 return &_bfd_elf_large_com_section;
7130 }
7131
7132 static bfd_boolean
7133 elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
7134 const Elf_Internal_Sym *sym,
7135 asection **psec,
7136 bfd_boolean newdef,
7137 bfd_boolean olddef,
7138 bfd *oldbfd,
7139 const asection *oldsec)
7140 {
7141 /* A normal common symbol and a large common symbol result in a
7142 normal common symbol. We turn the large common symbol into a
7143 normal one. */
7144 if (!olddef
7145 && h->root.type == bfd_link_hash_common
7146 && !newdef
7147 && bfd_is_com_section (*psec)
7148 && oldsec != *psec)
7149 {
7150 if (sym->st_shndx == SHN_COMMON
7151 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
7152 {
7153 h->root.u.c.p->section
7154 = bfd_make_section_old_way (oldbfd, "COMMON");
7155 h->root.u.c.p->section->flags = SEC_ALLOC;
7156 }
7157 else if (sym->st_shndx == SHN_X86_64_LCOMMON
7158 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
7159 *psec = bfd_com_section_ptr;
7160 }
7161
7162 return TRUE;
7163 }
7164
7165 static int
7166 elf_x86_64_additional_program_headers (bfd *abfd,
7167 struct bfd_link_info *info ATTRIBUTE_UNUSED)
7168 {
7169 asection *s;
7170 int count = 0;
7171
7172 /* Check to see if we need a large readonly segment. */
7173 s = bfd_get_section_by_name (abfd, ".lrodata");
7174 if (s && (s->flags & SEC_LOAD))
7175 count++;
7176
7177 /* Check to see if we need a large data segment. Since .lbss sections
7178 is placed right after the .bss section, there should be no need for
7179 a large data segment just because of .lbss. */
7180 s = bfd_get_section_by_name (abfd, ".ldata");
7181 if (s && (s->flags & SEC_LOAD))
7182 count++;
7183
7184 return count;
7185 }
7186
7187 /* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
7188
7189 static bfd_boolean
7190 elf_x86_64_hash_symbol (struct elf_link_hash_entry *h)
7191 {
7192 if (h->plt.offset != (bfd_vma) -1
7193 && !h->def_regular
7194 && !h->pointer_equality_needed)
7195 return FALSE;
7196
7197 return _bfd_elf_hash_symbol (h);
7198 }
7199
7200 /* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
7201
7202 static bfd_boolean
7203 elf_x86_64_relocs_compatible (const bfd_target *input,
7204 const bfd_target *output)
7205 {
7206 return ((xvec_get_elf_backend_data (input)->s->elfclass
7207 == xvec_get_elf_backend_data (output)->s->elfclass)
7208 && _bfd_elf_relocs_compatible (input, output));
7209 }
7210
7211 /* Parse x86-64 GNU properties. */
7212
7213 static enum elf_property_kind
7214 elf_x86_64_parse_gnu_properties (bfd *abfd, unsigned int type,
7215 bfd_byte *ptr, unsigned int datasz)
7216 {
7217 elf_property *prop;
7218
7219 switch (type)
7220 {
7221 case GNU_PROPERTY_X86_ISA_1_USED:
7222 case GNU_PROPERTY_X86_ISA_1_NEEDED:
7223 case GNU_PROPERTY_X86_FEATURE_1_AND:
7224 if (datasz != 4)
7225 {
7226 _bfd_error_handler
7227 ((type == GNU_PROPERTY_X86_ISA_1_USED
7228 ? _("error: %B: <corrupt x86 ISA used size: 0x%x>")
7229 : (type == GNU_PROPERTY_X86_ISA_1_NEEDED
7230 ? _("error: %B: <corrupt x86 ISA needed size: 0x%x>")
7231 : _("error: %B: <corrupt x86 feature size: 0x%x>"))),
7232 abfd, datasz);
7233 return property_corrupt;
7234 }
7235 prop = _bfd_elf_get_property (abfd, type, datasz);
7236 /* Combine properties of the same type. */
7237 prop->u.number |= bfd_h_get_32 (abfd, ptr);
7238 prop->pr_kind = property_number;
7239 break;
7240
7241 default:
7242 return property_ignored;
7243 }
7244
7245 return property_number;
7246 }
7247
7248 /* Merge x86-64 GNU property BPROP with APROP. If APROP isn't NULL,
7249 return TRUE if APROP is updated. Otherwise, return TRUE if BPROP
7250 should be merged with ABFD. */
7251
7252 static bfd_boolean
7253 elf_x86_64_merge_gnu_properties (struct bfd_link_info *info,
7254 bfd *abfd ATTRIBUTE_UNUSED,
7255 elf_property *aprop,
7256 elf_property *bprop)
7257 {
7258 unsigned int number, features;
7259 bfd_boolean updated = FALSE;
7260 unsigned int pr_type = aprop != NULL ? aprop->pr_type : bprop->pr_type;
7261
7262 switch (pr_type)
7263 {
7264 case GNU_PROPERTY_X86_ISA_1_USED:
7265 case GNU_PROPERTY_X86_ISA_1_NEEDED:
7266 if (aprop != NULL && bprop != NULL)
7267 {
7268 number = aprop->u.number;
7269 aprop->u.number = number | bprop->u.number;
7270 updated = number != (unsigned int) aprop->u.number;
7271 }
7272 else
7273 {
7274 /* Return TRUE if APROP is NULL to indicate that BPROP should
7275 be added to ABFD. */
7276 updated = aprop == NULL;
7277 }
7278 break;
7279
7280 case GNU_PROPERTY_X86_FEATURE_1_AND:
7281 /* Only one of APROP and BPROP can be NULL:
7282 1. APROP & BPROP when both APROP and BPROP aren't NULL.
7283 2. If APROP is NULL, remove x86 feature.
7284 3. Otherwise, do nothing.
7285 */
7286 if (aprop != NULL && bprop != NULL)
7287 {
7288 features = 0;
7289 if (info->ibt)
7290 features = GNU_PROPERTY_X86_FEATURE_1_IBT;
7291 if (info->shstk)
7292 features |= GNU_PROPERTY_X86_FEATURE_1_SHSTK;
7293 number = aprop->u.number;
7294 /* Add GNU_PROPERTY_X86_FEATURE_1_IBT and
7295 GNU_PROPERTY_X86_FEATURE_1_SHSTK. */
7296 aprop->u.number = (number & bprop->u.number) | features;
7297 updated = number != (unsigned int) aprop->u.number;
7298 /* Remove the property if all feature bits are cleared. */
7299 if (aprop->u.number == 0)
7300 aprop->pr_kind = property_remove;
7301 }
7302 else
7303 {
7304 features = 0;
7305 if (info->ibt)
7306 features = GNU_PROPERTY_X86_FEATURE_1_IBT;
7307 if (info->shstk)
7308 features |= GNU_PROPERTY_X86_FEATURE_1_SHSTK;
7309 if (features)
7310 {
7311 /* Add GNU_PROPERTY_X86_FEATURE_1_IBT and
7312 GNU_PROPERTY_X86_FEATURE_1_SHSTK. */
7313 if (aprop != NULL)
7314 {
7315 number = aprop->u.number;
7316 aprop->u.number = number | features;
7317 updated = number != (unsigned int) aprop->u.number;
7318 }
7319 else
7320 {
7321 bprop->u.number |= features;
7322 updated = TRUE;
7323 }
7324 }
7325 else if (aprop != NULL)
7326 {
7327 aprop->pr_kind = property_remove;
7328 updated = TRUE;
7329 }
7330 }
7331 break;
7332
7333 default:
7334 /* Never should happen. */
7335 abort ();
7336 }
7337
7338 return updated;
7339 }
7340
7341 /* Set up x86-64 GNU properties. Return the first relocatable ELF input
7342 with GNU properties if found. Otherwise, return NULL. */
7343
7344 static bfd *
7345 elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
7346 {
7347 bfd_boolean normal_target;
7348 bfd_boolean lazy_plt;
7349 asection *sec, *pltsec;
7350 bfd *dynobj;
7351 bfd_boolean use_ibt_plt;
7352 unsigned int plt_alignment, features;
7353 struct elf_x86_64_link_hash_table *htab;
7354 bfd *pbfd;
7355
7356 features = 0;
7357 if (info->ibt)
7358 features = GNU_PROPERTY_X86_FEATURE_1_IBT;
7359 if (info->shstk)
7360 features |= GNU_PROPERTY_X86_FEATURE_1_SHSTK;
7361 if (features)
7362 {
7363 /* Turn on GNU_PROPERTY_X86_FEATURE_1_IBT and
7364 GNU_PROPERTY_X86_FEATURE_1_SHSTK. */
7365 bfd *ebfd = NULL;
7366 elf_property *prop;
7367
7368 for (pbfd = info->input_bfds;
7369 pbfd != NULL;
7370 pbfd = pbfd->link.next)
7371 if (bfd_get_flavour (pbfd) == bfd_target_elf_flavour
7372 && bfd_count_sections (pbfd) != 0)
7373 {
7374 ebfd = pbfd;
7375
7376 if (elf_properties (pbfd) != NULL)
7377 {
7378 /* Find a normal input file with GNU property note. */
7379 prop = _bfd_elf_get_property (pbfd,
7380 GNU_PROPERTY_X86_FEATURE_1_AND,
7381 4);
7382 /* Add GNU_PROPERTY_X86_FEATURE_1_IBT and
7383 GNU_PROPERTY_X86_FEATURE_1_SHSTK. */
7384 prop->u.number |= features;
7385 prop->pr_kind = property_number;
7386 break;
7387 }
7388 }
7389
7390 if (pbfd == NULL && ebfd != NULL)
7391 {
7392 /* Create GNU_PROPERTY_X86_FEATURE_1_IBT if needed. */
7393 prop = _bfd_elf_get_property (ebfd,
7394 GNU_PROPERTY_X86_FEATURE_1_AND,
7395 4);
7396 prop->u.number = features;
7397 prop->pr_kind = property_number;
7398
7399 sec = bfd_make_section_with_flags (ebfd,
7400 NOTE_GNU_PROPERTY_SECTION_NAME,
7401 (SEC_ALLOC
7402 | SEC_LOAD
7403 | SEC_IN_MEMORY
7404 | SEC_READONLY
7405 | SEC_HAS_CONTENTS
7406 | SEC_DATA));
7407 if (sec == NULL)
7408 info->callbacks->einfo (_("%F: failed to create GNU property section\n"));
7409
7410 if (!bfd_set_section_alignment (ebfd, sec, 2))
7411 goto error_alignment;
7412
7413 elf_section_type (sec) = SHT_NOTE;
7414 }
7415 }
7416
7417 pbfd = _bfd_elf_link_setup_gnu_properties (info);
7418
7419 if (bfd_link_relocatable (info))
7420 return pbfd;
7421
7422 htab = elf_x86_64_hash_table (info);
7423 if (htab == NULL)
7424 return pbfd;
7425
7426 use_ibt_plt = info->ibtplt || info->ibt;
7427 if (!use_ibt_plt && pbfd != NULL)
7428 {
7429 /* Check if GNU_PROPERTY_X86_FEATURE_1_IBT is on. */
7430 elf_property_list *p;
7431
7432 /* The property list is sorted in order of type. */
7433 for (p = elf_properties (pbfd); p; p = p->next)
7434 {
7435 if (GNU_PROPERTY_X86_FEATURE_1_AND == p->property.pr_type)
7436 {
7437 use_ibt_plt = !!(p->property.u.number
7438 & GNU_PROPERTY_X86_FEATURE_1_IBT);
7439 break;
7440 }
7441 else if (GNU_PROPERTY_X86_FEATURE_1_AND < p->property.pr_type)
7442 break;
7443 }
7444 }
7445
7446 dynobj = htab->elf.dynobj;
7447
7448 /* Set htab->elf.dynobj here so that there is no need to check and
7449 set it in check_relocs. */
7450 if (dynobj == NULL)
7451 {
7452 if (pbfd != NULL)
7453 {
7454 htab->elf.dynobj = pbfd;
7455 dynobj = pbfd;
7456 }
7457 else
7458 {
7459 bfd *abfd;
7460
7461 /* Find a normal input file to hold linker created
7462 sections. */
7463 for (abfd = info->input_bfds;
7464 abfd != NULL;
7465 abfd = abfd->link.next)
7466 if ((abfd->flags
7467 & (DYNAMIC | BFD_LINKER_CREATED | BFD_PLUGIN)) == 0)
7468 {
7469 htab->elf.dynobj = abfd;
7470 dynobj = abfd;
7471 break;
7472 }
7473 }
7474 }
7475
7476 /* Even when lazy binding is disabled by "-z now", the PLT0 entry may
7477 still be used with LD_AUDIT or LD_PROFILE if PLT entry is used for
7478 canonical function address. */
7479 htab->plt.has_plt0 = 1;
7480
7481 if (get_elf_x86_64_backend_data (info->output_bfd)->os
7482 == is_normal)
7483 {
7484 if (use_ibt_plt)
7485 {
7486 if (ABI_64_P (dynobj))
7487 {
7488 htab->lazy_plt = &elf_x86_64_lazy_ibt_plt;
7489 htab->non_lazy_plt = &elf_x86_64_non_lazy_ibt_plt;
7490 }
7491 else
7492 {
7493 htab->lazy_plt = &elf_x32_lazy_ibt_plt;
7494 htab->non_lazy_plt = &elf_x32_non_lazy_ibt_plt;
7495 }
7496 }
7497 else if (info->bndplt)
7498 {
7499 htab->lazy_plt = &elf_x86_64_lazy_bnd_plt;
7500 htab->non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
7501 }
7502 else
7503 {
7504 htab->lazy_plt = &elf_x86_64_lazy_plt;
7505 htab->non_lazy_plt = &elf_x86_64_non_lazy_plt;
7506 }
7507 normal_target = TRUE;
7508 }
7509 else
7510 {
7511 htab->lazy_plt = &elf_x86_64_nacl_plt;
7512 htab->non_lazy_plt = NULL;
7513 normal_target = FALSE;
7514 }
7515
7516 pltsec = htab->elf.splt;
7517
7518 /* If the non-lazy PLT is available, use it for all PLT entries if
7519 there are no PLT0 or no .plt section. */
7520 if (htab->non_lazy_plt != NULL
7521 && (!htab->plt.has_plt0 || pltsec == NULL))
7522 {
7523 lazy_plt = FALSE;
7524 htab->plt.plt_entry
7525 = htab->non_lazy_plt->plt_entry;
7526 htab->plt.plt_entry_size
7527 = htab->non_lazy_plt->plt_entry_size;
7528 htab->plt.plt_got_offset
7529 = htab->non_lazy_plt->plt_got_offset;
7530 htab->plt.plt_got_insn_size
7531 = htab->non_lazy_plt->plt_got_insn_size;
7532 htab->plt.eh_frame_plt_size
7533 = htab->non_lazy_plt->eh_frame_plt_size;
7534 htab->plt.eh_frame_plt
7535 = htab->non_lazy_plt->eh_frame_plt;
7536 }
7537 else
7538 {
7539 lazy_plt = TRUE;
7540 htab->plt.plt_entry
7541 = htab->lazy_plt->plt_entry;
7542 htab->plt.plt_entry_size
7543 = htab->lazy_plt->plt_entry_size;
7544 htab->plt.plt_got_offset
7545 = htab->lazy_plt->plt_got_offset;
7546 htab->plt.plt_got_insn_size
7547 = htab->lazy_plt->plt_got_insn_size;
7548 htab->plt.eh_frame_plt_size
7549 = htab->lazy_plt->eh_frame_plt_size;
7550 htab->plt.eh_frame_plt
7551 = htab->lazy_plt->eh_frame_plt;
7552 }
7553
7554 /* Return if there are no normal input files. */
7555 if (dynobj == NULL)
7556 return pbfd;
7557
7558 /* Since create_dynamic_sections isn't always called, but GOT
7559 relocations need GOT relocations, create them here so that we
7560 don't need to do it in check_relocs. */
7561 if (htab->elf.sgot == NULL
7562 && !_bfd_elf_create_got_section (dynobj, info))
7563 info->callbacks->einfo (_("%F: failed to create GOT sections\n"));
7564
7565 /* Align .got and .got.plt sections to their entry size. Do it here
7566 instead of in create_dynamic_sections so that they are always
7567 properly aligned even if create_dynamic_sections isn't called. */
7568 sec = htab->elf.sgot;
7569 if (!bfd_set_section_alignment (dynobj, sec, 3))
7570 {
7571 error_alignment:
7572 info->callbacks->einfo (_("%F%A: failed to align section\n"),
7573 sec);
7574 }
7575
7576 sec = htab->elf.sgotplt;
7577 if (!bfd_set_section_alignment (dynobj, sec, 3))
7578 goto error_alignment;
7579
7580 /* Create the ifunc sections here so that check_relocs can be
7581 simplified. */
7582 if (!_bfd_elf_create_ifunc_sections (dynobj, info))
7583 info->callbacks->einfo (_("%F: failed to create ifunc sections\n"));
7584
7585 plt_alignment = bfd_log2 (htab->plt.plt_entry_size);
7586
7587 if (pltsec != NULL)
7588 {
7589 /* Whe creating executable, set the contents of the .interp
7590 section to the interpreter. */
7591 if (bfd_link_executable (info) && !info->nointerp)
7592 {
7593 asection *s = bfd_get_linker_section (dynobj, ".interp");
7594 if (s == NULL)
7595 abort ();
7596 s->size = htab->dynamic_interpreter_size;
7597 s->contents = (unsigned char *) htab->dynamic_interpreter;
7598 htab->interp = s;
7599 }
7600
7601 /* Don't change PLT section alignment for NaCl since it uses
7602 64-byte PLT entry and sets PLT section alignment to 32
7603 bytes. Don't create additional PLT sections for NaCl. */
7604 if (normal_target)
7605 {
7606 const struct elf_backend_data *bed
7607 = get_elf_backend_data (dynobj);
7608 flagword pltflags = (bed->dynamic_sec_flags
7609 | SEC_ALLOC
7610 | SEC_CODE
7611 | SEC_LOAD
7612 | SEC_READONLY);
7613 unsigned int non_lazy_plt_alignment
7614 = bfd_log2 (htab->non_lazy_plt->plt_entry_size);
7615
7616 sec = pltsec;
7617 if (!bfd_set_section_alignment (sec->owner, sec,
7618 plt_alignment))
7619 goto error_alignment;
7620
7621 /* Create the GOT procedure linkage table. */
7622 sec = bfd_make_section_anyway_with_flags (dynobj,
7623 ".plt.got",
7624 pltflags);
7625 if (sec == NULL)
7626 info->callbacks->einfo (_("%F: failed to create GOT PLT section\n"));
7627
7628 if (!bfd_set_section_alignment (dynobj, sec,
7629 non_lazy_plt_alignment))
7630 goto error_alignment;
7631
7632 htab->plt_got = sec;
7633
7634 if (lazy_plt)
7635 {
7636 sec = NULL;
7637
7638 if (use_ibt_plt)
7639 {
7640 /* Create the second PLT for Intel IBT support. IBT
7641 PLT is supported only for non-NaCl target and is
7642 is needed only for lazy binding. */
7643 sec = bfd_make_section_anyway_with_flags (dynobj,
7644 ".plt.sec",
7645 pltflags);
7646 if (sec == NULL)
7647 info->callbacks->einfo (_("%F: failed to create IBT-enabled PLT section\n"));
7648
7649 if (!bfd_set_section_alignment (dynobj, sec,
7650 plt_alignment))
7651 goto error_alignment;
7652 }
7653 else if (info->bndplt && ABI_64_P (dynobj))
7654 {
7655 /* Create the second PLT for Intel MPX support. MPX
7656 PLT is supported only for non-NaCl target in 64-bit
7657 mode and is needed only for lazy binding. */
7658 sec = bfd_make_section_anyway_with_flags (dynobj,
7659 ".plt.sec",
7660 pltflags);
7661 if (sec == NULL)
7662 info->callbacks->einfo (_("%F: failed to create BND PLT section\n"));
7663
7664 if (!bfd_set_section_alignment (dynobj, sec,
7665 non_lazy_plt_alignment))
7666 goto error_alignment;
7667 }
7668
7669 htab->plt_second = sec;
7670 }
7671 }
7672
7673 if (!info->no_ld_generated_unwind_info)
7674 {
7675 flagword flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY
7676 | SEC_HAS_CONTENTS | SEC_IN_MEMORY
7677 | SEC_LINKER_CREATED);
7678
7679 sec = bfd_make_section_anyway_with_flags (dynobj,
7680 ".eh_frame",
7681 flags);
7682 if (sec == NULL)
7683 info->callbacks->einfo (_("%F: failed to create PLT .eh_frame section\n"));
7684
7685 if (!bfd_set_section_alignment (dynobj, sec,
7686 ABI_64_P (dynobj) ? 3 : 2))
7687 goto error_alignment;
7688
7689 htab->plt_eh_frame = sec;
7690
7691 if (htab->plt_got != NULL)
7692 {
7693 sec = bfd_make_section_anyway_with_flags (dynobj,
7694 ".eh_frame",
7695 flags);
7696 if (sec == NULL)
7697 info->callbacks->einfo (_("%F: failed to create GOT PLT .eh_frame section\n"));
7698
7699 if (!bfd_set_section_alignment (dynobj, sec,
7700 ABI_64_P (dynobj) ? 3 : 2))
7701 goto error_alignment;
7702
7703 htab->plt_got_eh_frame = sec;
7704 }
7705
7706 if (htab->plt_second != NULL)
7707 {
7708 sec = bfd_make_section_anyway_with_flags (dynobj,
7709 ".eh_frame",
7710 flags);
7711 if (sec == NULL)
7712 info->callbacks->einfo (_("%F: failed to create BND PLT .eh_frame section\n"));
7713
7714 if (!bfd_set_section_alignment (dynobj, sec, 3))
7715 goto error_alignment;
7716
7717 htab->plt_second_eh_frame = sec;
7718 }
7719 }
7720 }
7721
7722 if (normal_target)
7723 {
7724 /* The .iplt section is used for IFUNC symbols in static
7725 executables. */
7726 sec = htab->elf.iplt;
7727 if (sec != NULL
7728 && !bfd_set_section_alignment (sec->owner, sec,
7729 plt_alignment))
7730 goto error_alignment;
7731 }
7732
7733 return pbfd;
7734 }
7735
7736 static const struct bfd_elf_special_section
7737 elf_x86_64_special_sections[]=
7738 {
7739 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
7740 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
7741 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
7742 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
7743 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
7744 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
7745 { NULL, 0, 0, 0, 0 }
7746 };
7747
7748 #define TARGET_LITTLE_SYM x86_64_elf64_vec
7749 #define TARGET_LITTLE_NAME "elf64-x86-64"
7750 #define ELF_ARCH bfd_arch_i386
7751 #define ELF_TARGET_ID X86_64_ELF_DATA
7752 #define ELF_MACHINE_CODE EM_X86_64
7753 #define ELF_MAXPAGESIZE 0x200000
7754 #define ELF_MINPAGESIZE 0x1000
7755 #define ELF_COMMONPAGESIZE 0x1000
7756
7757 #define elf_backend_can_gc_sections 1
7758 #define elf_backend_can_refcount 1
7759 #define elf_backend_want_got_plt 1
7760 #define elf_backend_plt_readonly 1
7761 #define elf_backend_want_plt_sym 0
7762 #define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
7763 #define elf_backend_rela_normal 1
7764 #define elf_backend_plt_alignment 4
7765 #define elf_backend_extern_protected_data 1
7766 #define elf_backend_caches_rawsize 1
7767 #define elf_backend_dtrel_excludes_plt 1
7768 #define elf_backend_want_dynrelro 1
7769
7770 #define elf_info_to_howto elf_x86_64_info_to_howto
7771
7772 #define bfd_elf64_bfd_link_hash_table_create \
7773 elf_x86_64_link_hash_table_create
7774 #define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
7775 #define bfd_elf64_bfd_reloc_name_lookup \
7776 elf_x86_64_reloc_name_lookup
7777
7778 #define elf_backend_adjust_dynamic_symbol elf_x86_64_adjust_dynamic_symbol
7779 #define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
7780 #define elf_backend_check_relocs elf_x86_64_check_relocs
7781 #define elf_backend_copy_indirect_symbol elf_x86_64_copy_indirect_symbol
7782 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
7783 #define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
7784 #define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
7785 #define elf_backend_output_arch_local_syms elf_x86_64_output_arch_local_syms
7786 #define elf_backend_gc_mark_hook elf_x86_64_gc_mark_hook
7787 #define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
7788 #define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
7789 #ifdef CORE_HEADER
7790 #define elf_backend_write_core_note elf_x86_64_write_core_note
7791 #endif
7792 #define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
7793 #define elf_backend_relocate_section elf_x86_64_relocate_section
7794 #define elf_backend_size_dynamic_sections elf_x86_64_size_dynamic_sections
7795 #define elf_backend_always_size_sections elf_x86_64_always_size_sections
7796 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
7797 #define elf_backend_object_p elf64_x86_64_elf_object_p
7798 #define bfd_elf64_mkobject elf_x86_64_mkobject
7799 #define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
7800
7801 #define elf_backend_section_from_shdr \
7802 elf_x86_64_section_from_shdr
7803
7804 #define elf_backend_section_from_bfd_section \
7805 elf_x86_64_elf_section_from_bfd_section
7806 #define elf_backend_add_symbol_hook \
7807 elf_x86_64_add_symbol_hook
7808 #define elf_backend_symbol_processing \
7809 elf_x86_64_symbol_processing
7810 #define elf_backend_common_section_index \
7811 elf_x86_64_common_section_index
7812 #define elf_backend_common_section \
7813 elf_x86_64_common_section
7814 #define elf_backend_common_definition \
7815 elf_x86_64_common_definition
7816 #define elf_backend_merge_symbol \
7817 elf_x86_64_merge_symbol
7818 #define elf_backend_special_sections \
7819 elf_x86_64_special_sections
7820 #define elf_backend_additional_program_headers \
7821 elf_x86_64_additional_program_headers
7822 #define elf_backend_hash_symbol \
7823 elf_x86_64_hash_symbol
7824 #define elf_backend_omit_section_dynsym \
7825 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
7826 #define elf_backend_fixup_symbol \
7827 elf_x86_64_fixup_symbol
7828 #define elf_backend_parse_gnu_properties \
7829 elf_x86_64_parse_gnu_properties
7830 #define elf_backend_merge_gnu_properties \
7831 elf_x86_64_merge_gnu_properties
7832 #define elf_backend_setup_gnu_properties \
7833 elf_x86_64_link_setup_gnu_properties
7834
7835 #include "elf64-target.h"
7836
7837 /* CloudABI support. */
7838
7839 #undef TARGET_LITTLE_SYM
7840 #define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
7841 #undef TARGET_LITTLE_NAME
7842 #define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
7843
7844 #undef ELF_OSABI
7845 #define ELF_OSABI ELFOSABI_CLOUDABI
7846
7847 #undef elf64_bed
7848 #define elf64_bed elf64_x86_64_cloudabi_bed
7849
7850 #include "elf64-target.h"
7851
7852 /* FreeBSD support. */
7853
7854 #undef TARGET_LITTLE_SYM
7855 #define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
7856 #undef TARGET_LITTLE_NAME
7857 #define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
7858
7859 #undef ELF_OSABI
7860 #define ELF_OSABI ELFOSABI_FREEBSD
7861
7862 #undef elf64_bed
7863 #define elf64_bed elf64_x86_64_fbsd_bed
7864
7865 #include "elf64-target.h"
7866
7867 /* Solaris 2 support. */
7868
7869 #undef TARGET_LITTLE_SYM
7870 #define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
7871 #undef TARGET_LITTLE_NAME
7872 #define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
7873
7874 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
7875 objects won't be recognized. */
7876 #undef ELF_OSABI
7877
7878 #undef elf64_bed
7879 #define elf64_bed elf64_x86_64_sol2_bed
7880
7881 /* The 64-bit static TLS arena size is rounded to the nearest 16-byte
7882 boundary. */
7883 #undef elf_backend_static_tls_alignment
7884 #define elf_backend_static_tls_alignment 16
7885
7886 /* The Solaris 2 ABI requires a plt symbol on all platforms.
7887
7888 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
7889 File, p.63. */
7890 #undef elf_backend_want_plt_sym
7891 #define elf_backend_want_plt_sym 1
7892
7893 #undef elf_backend_strtab_flags
7894 #define elf_backend_strtab_flags SHF_STRINGS
7895
7896 static bfd_boolean
7897 elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
7898 bfd *obfd ATTRIBUTE_UNUSED,
7899 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
7900 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
7901 {
7902 /* PR 19938: FIXME: Need to add code for setting the sh_info
7903 and sh_link fields of Solaris specific section types. */
7904 return FALSE;
7905 }
7906
7907 #undef elf_backend_copy_special_section_fields
7908 #define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
7909
7910 #include "elf64-target.h"
7911
7912 /* Native Client support. */
7913
7914 static bfd_boolean
7915 elf64_x86_64_nacl_elf_object_p (bfd *abfd)
7916 {
7917 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
7918 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
7919 return TRUE;
7920 }
7921
7922 #undef TARGET_LITTLE_SYM
7923 #define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
7924 #undef TARGET_LITTLE_NAME
7925 #define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
7926 #undef elf64_bed
7927 #define elf64_bed elf64_x86_64_nacl_bed
7928
7929 #undef ELF_MAXPAGESIZE
7930 #undef ELF_MINPAGESIZE
7931 #undef ELF_COMMONPAGESIZE
7932 #define ELF_MAXPAGESIZE 0x10000
7933 #define ELF_MINPAGESIZE 0x10000
7934 #define ELF_COMMONPAGESIZE 0x10000
7935
7936 /* Restore defaults. */
7937 #undef ELF_OSABI
7938 #undef elf_backend_static_tls_alignment
7939 #undef elf_backend_want_plt_sym
7940 #define elf_backend_want_plt_sym 0
7941 #undef elf_backend_strtab_flags
7942 #undef elf_backend_copy_special_section_fields
7943
7944 /* NaCl uses substantially different PLT entries for the same effects. */
7945
7946 #undef elf_backend_plt_alignment
7947 #define elf_backend_plt_alignment 5
7948 #define NACL_PLT_ENTRY_SIZE 64
7949 #define NACLMASK 0xe0 /* 32-byte alignment mask. */
7950
7951 static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
7952 {
7953 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
7954 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
7955 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
7956 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
7957 0x41, 0xff, 0xe3, /* jmpq *%r11 */
7958
7959 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
7960 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
7961
7962 /* 32 bytes of nop to pad out to the standard size. */
7963 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
7964 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
7965 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
7966 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
7967 0x66, /* excess data16 prefix */
7968 0x90 /* nop */
7969 };
7970
7971 static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
7972 {
7973 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
7974 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
7975 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
7976 0x41, 0xff, 0xe3, /* jmpq *%r11 */
7977
7978 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
7979 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
7980 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
7981
7982 /* Lazy GOT entries point here (32-byte aligned). */
7983 0x68, /* pushq immediate */
7984 0, 0, 0, 0, /* replaced with index into relocation table. */
7985 0xe9, /* jmp relative */
7986 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
7987
7988 /* 22 bytes of nop to pad out to the standard size. */
7989 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
7990 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
7991 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
7992 };
7993
7994 /* .eh_frame covering the .plt section. */
7995
7996 static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
7997 {
7998 #if (PLT_CIE_LENGTH != 20 \
7999 || PLT_FDE_LENGTH != 36 \
8000 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
8001 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
8002 # error "Need elf_x86_64_backend_data parameters for eh_frame_plt offsets!"
8003 #endif
8004 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
8005 0, 0, 0, 0, /* CIE ID */
8006 1, /* CIE version */
8007 'z', 'R', 0, /* Augmentation string */
8008 1, /* Code alignment factor */
8009 0x78, /* Data alignment factor */
8010 16, /* Return address column */
8011 1, /* Augmentation size */
8012 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
8013 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
8014 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
8015 DW_CFA_nop, DW_CFA_nop,
8016
8017 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
8018 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
8019 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
8020 0, 0, 0, 0, /* .plt size goes here */
8021 0, /* Augmentation size */
8022 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
8023 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
8024 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
8025 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
8026 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
8027 13, /* Block length */
8028 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
8029 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
8030 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
8031 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
8032 DW_CFA_nop, DW_CFA_nop
8033 };
8034
8035 static const struct elf_x86_64_lazy_plt_layout elf_x86_64_nacl_plt =
8036 {
8037 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
8038 elf_x86_64_nacl_plt_entry, /* plt_entry */
8039 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
8040 2, /* plt0_got1_offset */
8041 9, /* plt0_got2_offset */
8042 13, /* plt0_got2_insn_end */
8043 3, /* plt_got_offset */
8044 33, /* plt_reloc_offset */
8045 38, /* plt_plt_offset */
8046 7, /* plt_got_insn_size */
8047 42, /* plt_plt_insn_end */
8048 32, /* plt_lazy_offset */
8049 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
8050 sizeof (elf_x86_64_nacl_eh_frame_plt) /* eh_frame_plt_size */
8051 };
8052
8053 static const struct elf_x86_64_backend_data elf_x86_64_nacl_arch_bed =
8054 {
8055 is_nacl /* os */
8056 };
8057
8058 #undef elf_backend_arch_data
8059 #define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
8060
8061 #undef elf_backend_object_p
8062 #define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
8063 #undef elf_backend_modify_segment_map
8064 #define elf_backend_modify_segment_map nacl_modify_segment_map
8065 #undef elf_backend_modify_program_headers
8066 #define elf_backend_modify_program_headers nacl_modify_program_headers
8067 #undef elf_backend_final_write_processing
8068 #define elf_backend_final_write_processing nacl_final_write_processing
8069
8070 #include "elf64-target.h"
8071
8072 /* Native Client x32 support. */
8073
8074 static bfd_boolean
8075 elf32_x86_64_nacl_elf_object_p (bfd *abfd)
8076 {
8077 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
8078 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
8079 return TRUE;
8080 }
8081
8082 #undef TARGET_LITTLE_SYM
8083 #define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
8084 #undef TARGET_LITTLE_NAME
8085 #define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
8086 #undef elf32_bed
8087 #define elf32_bed elf32_x86_64_nacl_bed
8088
8089 #define bfd_elf32_bfd_link_hash_table_create \
8090 elf_x86_64_link_hash_table_create
8091 #define bfd_elf32_bfd_reloc_type_lookup \
8092 elf_x86_64_reloc_type_lookup
8093 #define bfd_elf32_bfd_reloc_name_lookup \
8094 elf_x86_64_reloc_name_lookup
8095 #define bfd_elf32_mkobject \
8096 elf_x86_64_mkobject
8097 #define bfd_elf32_get_synthetic_symtab \
8098 elf_x86_64_get_synthetic_symtab
8099
8100 #undef elf_backend_object_p
8101 #define elf_backend_object_p \
8102 elf32_x86_64_nacl_elf_object_p
8103
8104 #undef elf_backend_bfd_from_remote_memory
8105 #define elf_backend_bfd_from_remote_memory \
8106 _bfd_elf32_bfd_from_remote_memory
8107
8108 #undef elf_backend_size_info
8109 #define elf_backend_size_info \
8110 _bfd_elf32_size_info
8111
8112 #include "elf32-target.h"
8113
8114 /* Restore defaults. */
8115 #undef elf_backend_object_p
8116 #define elf_backend_object_p elf64_x86_64_elf_object_p
8117 #undef elf_backend_bfd_from_remote_memory
8118 #undef elf_backend_size_info
8119 #undef elf_backend_modify_segment_map
8120 #undef elf_backend_modify_program_headers
8121 #undef elf_backend_final_write_processing
8122
8123 /* Intel L1OM support. */
8124
8125 static bfd_boolean
8126 elf64_l1om_elf_object_p (bfd *abfd)
8127 {
8128 /* Set the right machine number for an L1OM elf64 file. */
8129 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
8130 return TRUE;
8131 }
8132
8133 #undef TARGET_LITTLE_SYM
8134 #define TARGET_LITTLE_SYM l1om_elf64_vec
8135 #undef TARGET_LITTLE_NAME
8136 #define TARGET_LITTLE_NAME "elf64-l1om"
8137 #undef ELF_ARCH
8138 #define ELF_ARCH bfd_arch_l1om
8139
8140 #undef ELF_MACHINE_CODE
8141 #define ELF_MACHINE_CODE EM_L1OM
8142
8143 #undef ELF_OSABI
8144
8145 #undef elf64_bed
8146 #define elf64_bed elf64_l1om_bed
8147
8148 #undef elf_backend_object_p
8149 #define elf_backend_object_p elf64_l1om_elf_object_p
8150
8151 /* Restore defaults. */
8152 #undef ELF_MAXPAGESIZE
8153 #undef ELF_MINPAGESIZE
8154 #undef ELF_COMMONPAGESIZE
8155 #define ELF_MAXPAGESIZE 0x200000
8156 #define ELF_MINPAGESIZE 0x1000
8157 #define ELF_COMMONPAGESIZE 0x1000
8158 #undef elf_backend_plt_alignment
8159 #define elf_backend_plt_alignment 4
8160 #undef elf_backend_arch_data
8161 #define elf_backend_arch_data &elf_x86_64_arch_bed
8162
8163 #include "elf64-target.h"
8164
8165 /* FreeBSD L1OM support. */
8166
8167 #undef TARGET_LITTLE_SYM
8168 #define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
8169 #undef TARGET_LITTLE_NAME
8170 #define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
8171
8172 #undef ELF_OSABI
8173 #define ELF_OSABI ELFOSABI_FREEBSD
8174
8175 #undef elf64_bed
8176 #define elf64_bed elf64_l1om_fbsd_bed
8177
8178 #include "elf64-target.h"
8179
8180 /* Intel K1OM support. */
8181
8182 static bfd_boolean
8183 elf64_k1om_elf_object_p (bfd *abfd)
8184 {
8185 /* Set the right machine number for an K1OM elf64 file. */
8186 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
8187 return TRUE;
8188 }
8189
8190 #undef TARGET_LITTLE_SYM
8191 #define TARGET_LITTLE_SYM k1om_elf64_vec
8192 #undef TARGET_LITTLE_NAME
8193 #define TARGET_LITTLE_NAME "elf64-k1om"
8194 #undef ELF_ARCH
8195 #define ELF_ARCH bfd_arch_k1om
8196
8197 #undef ELF_MACHINE_CODE
8198 #define ELF_MACHINE_CODE EM_K1OM
8199
8200 #undef ELF_OSABI
8201
8202 #undef elf64_bed
8203 #define elf64_bed elf64_k1om_bed
8204
8205 #undef elf_backend_object_p
8206 #define elf_backend_object_p elf64_k1om_elf_object_p
8207
8208 #undef elf_backend_static_tls_alignment
8209
8210 #undef elf_backend_want_plt_sym
8211 #define elf_backend_want_plt_sym 0
8212
8213 #include "elf64-target.h"
8214
8215 /* FreeBSD K1OM support. */
8216
8217 #undef TARGET_LITTLE_SYM
8218 #define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
8219 #undef TARGET_LITTLE_NAME
8220 #define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
8221
8222 #undef ELF_OSABI
8223 #define ELF_OSABI ELFOSABI_FREEBSD
8224
8225 #undef elf64_bed
8226 #define elf64_bed elf64_k1om_fbsd_bed
8227
8228 #include "elf64-target.h"
8229
8230 /* 32bit x86-64 support. */
8231
8232 #undef TARGET_LITTLE_SYM
8233 #define TARGET_LITTLE_SYM x86_64_elf32_vec
8234 #undef TARGET_LITTLE_NAME
8235 #define TARGET_LITTLE_NAME "elf32-x86-64"
8236 #undef elf32_bed
8237
8238 #undef ELF_ARCH
8239 #define ELF_ARCH bfd_arch_i386
8240
8241 #undef ELF_MACHINE_CODE
8242 #define ELF_MACHINE_CODE EM_X86_64
8243
8244 #undef ELF_OSABI
8245
8246 #undef elf_backend_object_p
8247 #define elf_backend_object_p \
8248 elf32_x86_64_elf_object_p
8249
8250 #undef elf_backend_bfd_from_remote_memory
8251 #define elf_backend_bfd_from_remote_memory \
8252 _bfd_elf32_bfd_from_remote_memory
8253
8254 #undef elf_backend_size_info
8255 #define elf_backend_size_info \
8256 _bfd_elf32_size_info
8257
8258 #include "elf32-target.h"