PR23980, assertion fail
[deliverable/binutils-gdb.git] / bfd / elf64-x86-64.c
1 /* X86-64 specific support for ELF
2 Copyright (C) 2000-2018 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 "elfxx-x86.h"
23 #include "elf-nacl.h"
24 #include "dwarf2.h"
25 #include "libiberty.h"
26
27 #include "opcode/i386.h"
28 #include "elf/x86-64.h"
29
30 #ifdef CORE_HEADER
31 #include <stdarg.h>
32 #include CORE_HEADER
33 #endif
34
35 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
36 #define MINUS_ONE (~ (bfd_vma) 0)
37
38 /* Since both 32-bit and 64-bit x86-64 encode relocation type in the
39 identical manner, we use ELF32_R_TYPE instead of ELF64_R_TYPE to get
40 relocation type. We also use ELF_ST_TYPE instead of ELF64_ST_TYPE
41 since they are the same. */
42
43 /* The relocation "howto" table. Order of fields:
44 type, rightshift, size, bitsize, pc_relative, bitpos, complain_on_overflow,
45 special_function, name, partial_inplace, src_mask, dst_mask, pcrel_offset. */
46 static reloc_howto_type x86_64_elf_howto_table[] =
47 {
48 HOWTO(R_X86_64_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont,
49 bfd_elf_generic_reloc, "R_X86_64_NONE", FALSE, 0x00000000, 0x00000000,
50 FALSE),
51 HOWTO(R_X86_64_64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
52 bfd_elf_generic_reloc, "R_X86_64_64", FALSE, MINUS_ONE, MINUS_ONE,
53 FALSE),
54 HOWTO(R_X86_64_PC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
55 bfd_elf_generic_reloc, "R_X86_64_PC32", FALSE, 0xffffffff, 0xffffffff,
56 TRUE),
57 HOWTO(R_X86_64_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
58 bfd_elf_generic_reloc, "R_X86_64_GOT32", FALSE, 0xffffffff, 0xffffffff,
59 FALSE),
60 HOWTO(R_X86_64_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
61 bfd_elf_generic_reloc, "R_X86_64_PLT32", FALSE, 0xffffffff, 0xffffffff,
62 TRUE),
63 HOWTO(R_X86_64_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
64 bfd_elf_generic_reloc, "R_X86_64_COPY", FALSE, 0xffffffff, 0xffffffff,
65 FALSE),
66 HOWTO(R_X86_64_GLOB_DAT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
67 bfd_elf_generic_reloc, "R_X86_64_GLOB_DAT", FALSE, MINUS_ONE,
68 MINUS_ONE, FALSE),
69 HOWTO(R_X86_64_JUMP_SLOT, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
70 bfd_elf_generic_reloc, "R_X86_64_JUMP_SLOT", FALSE, MINUS_ONE,
71 MINUS_ONE, FALSE),
72 HOWTO(R_X86_64_RELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
73 bfd_elf_generic_reloc, "R_X86_64_RELATIVE", FALSE, MINUS_ONE,
74 MINUS_ONE, FALSE),
75 HOWTO(R_X86_64_GOTPCREL, 0, 2, 32, TRUE, 0, complain_overflow_signed,
76 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL", FALSE, 0xffffffff,
77 0xffffffff, TRUE),
78 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
79 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
80 FALSE),
81 HOWTO(R_X86_64_32S, 0, 2, 32, FALSE, 0, complain_overflow_signed,
82 bfd_elf_generic_reloc, "R_X86_64_32S", FALSE, 0xffffffff, 0xffffffff,
83 FALSE),
84 HOWTO(R_X86_64_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield,
85 bfd_elf_generic_reloc, "R_X86_64_16", FALSE, 0xffff, 0xffff, FALSE),
86 HOWTO(R_X86_64_PC16,0, 1, 16, TRUE, 0, complain_overflow_bitfield,
87 bfd_elf_generic_reloc, "R_X86_64_PC16", FALSE, 0xffff, 0xffff, TRUE),
88 HOWTO(R_X86_64_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield,
89 bfd_elf_generic_reloc, "R_X86_64_8", FALSE, 0xff, 0xff, FALSE),
90 HOWTO(R_X86_64_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed,
91 bfd_elf_generic_reloc, "R_X86_64_PC8", FALSE, 0xff, 0xff, TRUE),
92 HOWTO(R_X86_64_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
93 bfd_elf_generic_reloc, "R_X86_64_DTPMOD64", FALSE, MINUS_ONE,
94 MINUS_ONE, FALSE),
95 HOWTO(R_X86_64_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
96 bfd_elf_generic_reloc, "R_X86_64_DTPOFF64", FALSE, MINUS_ONE,
97 MINUS_ONE, FALSE),
98 HOWTO(R_X86_64_TPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
99 bfd_elf_generic_reloc, "R_X86_64_TPOFF64", FALSE, MINUS_ONE,
100 MINUS_ONE, FALSE),
101 HOWTO(R_X86_64_TLSGD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
102 bfd_elf_generic_reloc, "R_X86_64_TLSGD", FALSE, 0xffffffff,
103 0xffffffff, TRUE),
104 HOWTO(R_X86_64_TLSLD, 0, 2, 32, TRUE, 0, complain_overflow_signed,
105 bfd_elf_generic_reloc, "R_X86_64_TLSLD", FALSE, 0xffffffff,
106 0xffffffff, TRUE),
107 HOWTO(R_X86_64_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
108 bfd_elf_generic_reloc, "R_X86_64_DTPOFF32", FALSE, 0xffffffff,
109 0xffffffff, FALSE),
110 HOWTO(R_X86_64_GOTTPOFF, 0, 2, 32, TRUE, 0, complain_overflow_signed,
111 bfd_elf_generic_reloc, "R_X86_64_GOTTPOFF", FALSE, 0xffffffff,
112 0xffffffff, TRUE),
113 HOWTO(R_X86_64_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_signed,
114 bfd_elf_generic_reloc, "R_X86_64_TPOFF32", FALSE, 0xffffffff,
115 0xffffffff, FALSE),
116 HOWTO(R_X86_64_PC64, 0, 4, 64, TRUE, 0, complain_overflow_bitfield,
117 bfd_elf_generic_reloc, "R_X86_64_PC64", FALSE, MINUS_ONE, MINUS_ONE,
118 TRUE),
119 HOWTO(R_X86_64_GOTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
120 bfd_elf_generic_reloc, "R_X86_64_GOTOFF64",
121 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
122 HOWTO(R_X86_64_GOTPC32, 0, 2, 32, TRUE, 0, complain_overflow_signed,
123 bfd_elf_generic_reloc, "R_X86_64_GOTPC32",
124 FALSE, 0xffffffff, 0xffffffff, TRUE),
125 HOWTO(R_X86_64_GOT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
126 bfd_elf_generic_reloc, "R_X86_64_GOT64", FALSE, MINUS_ONE, MINUS_ONE,
127 FALSE),
128 HOWTO(R_X86_64_GOTPCREL64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
129 bfd_elf_generic_reloc, "R_X86_64_GOTPCREL64", FALSE, MINUS_ONE,
130 MINUS_ONE, TRUE),
131 HOWTO(R_X86_64_GOTPC64, 0, 4, 64, TRUE, 0, complain_overflow_signed,
132 bfd_elf_generic_reloc, "R_X86_64_GOTPC64",
133 FALSE, MINUS_ONE, MINUS_ONE, TRUE),
134 HOWTO(R_X86_64_GOTPLT64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
135 bfd_elf_generic_reloc, "R_X86_64_GOTPLT64", FALSE, MINUS_ONE,
136 MINUS_ONE, FALSE),
137 HOWTO(R_X86_64_PLTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_signed,
138 bfd_elf_generic_reloc, "R_X86_64_PLTOFF64", FALSE, MINUS_ONE,
139 MINUS_ONE, FALSE),
140 HOWTO(R_X86_64_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned,
141 bfd_elf_generic_reloc, "R_X86_64_SIZE32", FALSE, 0xffffffff, 0xffffffff,
142 FALSE),
143 HOWTO(R_X86_64_SIZE64, 0, 4, 64, FALSE, 0, complain_overflow_unsigned,
144 bfd_elf_generic_reloc, "R_X86_64_SIZE64", FALSE, MINUS_ONE, MINUS_ONE,
145 FALSE),
146 HOWTO(R_X86_64_GOTPC32_TLSDESC, 0, 2, 32, TRUE, 0,
147 complain_overflow_bitfield, bfd_elf_generic_reloc,
148 "R_X86_64_GOTPC32_TLSDESC",
149 FALSE, 0xffffffff, 0xffffffff, TRUE),
150 HOWTO(R_X86_64_TLSDESC_CALL, 0, 0, 0, FALSE, 0,
151 complain_overflow_dont, bfd_elf_generic_reloc,
152 "R_X86_64_TLSDESC_CALL",
153 FALSE, 0, 0, FALSE),
154 HOWTO(R_X86_64_TLSDESC, 0, 4, 64, FALSE, 0,
155 complain_overflow_bitfield, bfd_elf_generic_reloc,
156 "R_X86_64_TLSDESC",
157 FALSE, MINUS_ONE, MINUS_ONE, FALSE),
158 HOWTO(R_X86_64_IRELATIVE, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
159 bfd_elf_generic_reloc, "R_X86_64_IRELATIVE", FALSE, MINUS_ONE,
160 MINUS_ONE, FALSE),
161 HOWTO(R_X86_64_RELATIVE64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
162 bfd_elf_generic_reloc, "R_X86_64_RELATIVE64", FALSE, MINUS_ONE,
163 MINUS_ONE, FALSE),
164 HOWTO(R_X86_64_PC32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
165 bfd_elf_generic_reloc, "R_X86_64_PC32_BND", FALSE, 0xffffffff, 0xffffffff,
166 TRUE),
167 HOWTO(R_X86_64_PLT32_BND, 0, 2, 32, TRUE, 0, complain_overflow_signed,
168 bfd_elf_generic_reloc, "R_X86_64_PLT32_BND", FALSE, 0xffffffff, 0xffffffff,
169 TRUE),
170 HOWTO(R_X86_64_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
171 bfd_elf_generic_reloc, "R_X86_64_GOTPCRELX", FALSE, 0xffffffff,
172 0xffffffff, TRUE),
173 HOWTO(R_X86_64_REX_GOTPCRELX, 0, 2, 32, TRUE, 0, complain_overflow_signed,
174 bfd_elf_generic_reloc, "R_X86_64_REX_GOTPCRELX", FALSE, 0xffffffff,
175 0xffffffff, TRUE),
176
177 /* We have a gap in the reloc numbers here.
178 R_X86_64_standard counts the number up to this point, and
179 R_X86_64_vt_offset is the value to subtract from a reloc type of
180 R_X86_64_GNU_VT* to form an index into this table. */
181 #define R_X86_64_standard (R_X86_64_REX_GOTPCRELX + 1)
182 #define R_X86_64_vt_offset (R_X86_64_GNU_VTINHERIT - R_X86_64_standard)
183
184 /* GNU extension to record C++ vtable hierarchy. */
185 HOWTO (R_X86_64_GNU_VTINHERIT, 0, 4, 0, FALSE, 0, complain_overflow_dont,
186 NULL, "R_X86_64_GNU_VTINHERIT", FALSE, 0, 0, FALSE),
187
188 /* GNU extension to record C++ vtable member usage. */
189 HOWTO (R_X86_64_GNU_VTENTRY, 0, 4, 0, FALSE, 0, complain_overflow_dont,
190 _bfd_elf_rel_vtable_reloc_fn, "R_X86_64_GNU_VTENTRY", FALSE, 0, 0,
191 FALSE),
192
193 /* Use complain_overflow_bitfield on R_X86_64_32 for x32. */
194 HOWTO(R_X86_64_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
195 bfd_elf_generic_reloc, "R_X86_64_32", FALSE, 0xffffffff, 0xffffffff,
196 FALSE)
197 };
198
199 /* Set if a relocation is converted from a GOTPCREL relocation. */
200 #define R_X86_64_converted_reloc_bit (1 << 7)
201
202 #define X86_PCREL_TYPE_P(TYPE) \
203 ( ((TYPE) == R_X86_64_PC8) \
204 || ((TYPE) == R_X86_64_PC16) \
205 || ((TYPE) == R_X86_64_PC32) \
206 || ((TYPE) == R_X86_64_PC32_BND) \
207 || ((TYPE) == R_X86_64_PC64))
208
209 #define X86_SIZE_TYPE_P(TYPE) \
210 ((TYPE) == R_X86_64_SIZE32 || (TYPE) == R_X86_64_SIZE64)
211
212 /* Map BFD relocs to the x86_64 elf relocs. */
213 struct elf_reloc_map
214 {
215 bfd_reloc_code_real_type bfd_reloc_val;
216 unsigned char elf_reloc_val;
217 };
218
219 static const struct elf_reloc_map x86_64_reloc_map[] =
220 {
221 { BFD_RELOC_NONE, R_X86_64_NONE, },
222 { BFD_RELOC_64, R_X86_64_64, },
223 { BFD_RELOC_32_PCREL, R_X86_64_PC32, },
224 { BFD_RELOC_X86_64_GOT32, R_X86_64_GOT32,},
225 { BFD_RELOC_X86_64_PLT32, R_X86_64_PLT32,},
226 { BFD_RELOC_X86_64_COPY, R_X86_64_COPY, },
227 { BFD_RELOC_X86_64_GLOB_DAT, R_X86_64_GLOB_DAT, },
228 { BFD_RELOC_X86_64_JUMP_SLOT, R_X86_64_JUMP_SLOT, },
229 { BFD_RELOC_X86_64_RELATIVE, R_X86_64_RELATIVE, },
230 { BFD_RELOC_X86_64_GOTPCREL, R_X86_64_GOTPCREL, },
231 { BFD_RELOC_32, R_X86_64_32, },
232 { BFD_RELOC_X86_64_32S, R_X86_64_32S, },
233 { BFD_RELOC_16, R_X86_64_16, },
234 { BFD_RELOC_16_PCREL, R_X86_64_PC16, },
235 { BFD_RELOC_8, R_X86_64_8, },
236 { BFD_RELOC_8_PCREL, R_X86_64_PC8, },
237 { BFD_RELOC_X86_64_DTPMOD64, R_X86_64_DTPMOD64, },
238 { BFD_RELOC_X86_64_DTPOFF64, R_X86_64_DTPOFF64, },
239 { BFD_RELOC_X86_64_TPOFF64, R_X86_64_TPOFF64, },
240 { BFD_RELOC_X86_64_TLSGD, R_X86_64_TLSGD, },
241 { BFD_RELOC_X86_64_TLSLD, R_X86_64_TLSLD, },
242 { BFD_RELOC_X86_64_DTPOFF32, R_X86_64_DTPOFF32, },
243 { BFD_RELOC_X86_64_GOTTPOFF, R_X86_64_GOTTPOFF, },
244 { BFD_RELOC_X86_64_TPOFF32, R_X86_64_TPOFF32, },
245 { BFD_RELOC_64_PCREL, R_X86_64_PC64, },
246 { BFD_RELOC_X86_64_GOTOFF64, R_X86_64_GOTOFF64, },
247 { BFD_RELOC_X86_64_GOTPC32, R_X86_64_GOTPC32, },
248 { BFD_RELOC_X86_64_GOT64, R_X86_64_GOT64, },
249 { BFD_RELOC_X86_64_GOTPCREL64,R_X86_64_GOTPCREL64, },
250 { BFD_RELOC_X86_64_GOTPC64, R_X86_64_GOTPC64, },
251 { BFD_RELOC_X86_64_GOTPLT64, R_X86_64_GOTPLT64, },
252 { BFD_RELOC_X86_64_PLTOFF64, R_X86_64_PLTOFF64, },
253 { BFD_RELOC_SIZE32, R_X86_64_SIZE32, },
254 { BFD_RELOC_SIZE64, R_X86_64_SIZE64, },
255 { BFD_RELOC_X86_64_GOTPC32_TLSDESC, R_X86_64_GOTPC32_TLSDESC, },
256 { BFD_RELOC_X86_64_TLSDESC_CALL, R_X86_64_TLSDESC_CALL, },
257 { BFD_RELOC_X86_64_TLSDESC, R_X86_64_TLSDESC, },
258 { BFD_RELOC_X86_64_IRELATIVE, R_X86_64_IRELATIVE, },
259 { BFD_RELOC_X86_64_PC32_BND, R_X86_64_PC32_BND, },
260 { BFD_RELOC_X86_64_PLT32_BND, R_X86_64_PLT32_BND, },
261 { BFD_RELOC_X86_64_GOTPCRELX, R_X86_64_GOTPCRELX, },
262 { BFD_RELOC_X86_64_REX_GOTPCRELX, R_X86_64_REX_GOTPCRELX, },
263 { BFD_RELOC_VTABLE_INHERIT, R_X86_64_GNU_VTINHERIT, },
264 { BFD_RELOC_VTABLE_ENTRY, R_X86_64_GNU_VTENTRY, },
265 };
266
267 static reloc_howto_type *
268 elf_x86_64_rtype_to_howto (bfd *abfd, unsigned r_type)
269 {
270 unsigned i;
271
272 if (r_type == (unsigned int) R_X86_64_32)
273 {
274 if (ABI_64_P (abfd))
275 i = r_type;
276 else
277 i = ARRAY_SIZE (x86_64_elf_howto_table) - 1;
278 }
279 else if (r_type < (unsigned int) R_X86_64_GNU_VTINHERIT
280 || r_type >= (unsigned int) R_X86_64_max)
281 {
282 if (r_type >= (unsigned int) R_X86_64_standard)
283 {
284 /* xgettext:c-format */
285 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
286 abfd, r_type);
287 bfd_set_error (bfd_error_bad_value);
288 return NULL;
289 }
290 i = r_type;
291 }
292 else
293 i = r_type - (unsigned int) R_X86_64_vt_offset;
294 BFD_ASSERT (x86_64_elf_howto_table[i].type == r_type);
295 return &x86_64_elf_howto_table[i];
296 }
297
298 /* Given a BFD reloc type, return a HOWTO structure. */
299 static reloc_howto_type *
300 elf_x86_64_reloc_type_lookup (bfd *abfd,
301 bfd_reloc_code_real_type code)
302 {
303 unsigned int i;
304
305 for (i = 0; i < sizeof (x86_64_reloc_map) / sizeof (struct elf_reloc_map);
306 i++)
307 {
308 if (x86_64_reloc_map[i].bfd_reloc_val == code)
309 return elf_x86_64_rtype_to_howto (abfd,
310 x86_64_reloc_map[i].elf_reloc_val);
311 }
312 return NULL;
313 }
314
315 static reloc_howto_type *
316 elf_x86_64_reloc_name_lookup (bfd *abfd,
317 const char *r_name)
318 {
319 unsigned int i;
320
321 if (!ABI_64_P (abfd) && strcasecmp (r_name, "R_X86_64_32") == 0)
322 {
323 /* Get x32 R_X86_64_32. */
324 reloc_howto_type *reloc
325 = &x86_64_elf_howto_table[ARRAY_SIZE (x86_64_elf_howto_table) - 1];
326 BFD_ASSERT (reloc->type == (unsigned int) R_X86_64_32);
327 return reloc;
328 }
329
330 for (i = 0; i < ARRAY_SIZE (x86_64_elf_howto_table); i++)
331 if (x86_64_elf_howto_table[i].name != NULL
332 && strcasecmp (x86_64_elf_howto_table[i].name, r_name) == 0)
333 return &x86_64_elf_howto_table[i];
334
335 return NULL;
336 }
337
338 /* Given an x86_64 ELF reloc type, fill in an arelent structure. */
339
340 static bfd_boolean
341 elf_x86_64_info_to_howto (bfd *abfd, arelent *cache_ptr,
342 Elf_Internal_Rela *dst)
343 {
344 unsigned r_type;
345
346 r_type = ELF32_R_TYPE (dst->r_info);
347 cache_ptr->howto = elf_x86_64_rtype_to_howto (abfd, r_type);
348 if (cache_ptr->howto == NULL)
349 return FALSE;
350 BFD_ASSERT (r_type == cache_ptr->howto->type || cache_ptr->howto->type == R_X86_64_NONE);
351 return TRUE;
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 # if GCC_VERSION >= 8000
443 # pragma GCC diagnostic push
444 # pragma GCC diagnostic ignored "-Wstringop-truncation"
445 # endif
446 static char *
447 elf_x86_64_write_core_note (bfd *abfd, char *buf, int *bufsiz,
448 int note_type, ...)
449 {
450 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
451 va_list ap;
452 const char *fname, *psargs;
453 long pid;
454 int cursig;
455 const void *gregs;
456
457 switch (note_type)
458 {
459 default:
460 return NULL;
461
462 case NT_PRPSINFO:
463 va_start (ap, note_type);
464 fname = va_arg (ap, const char *);
465 psargs = va_arg (ap, const char *);
466 va_end (ap);
467
468 if (bed->s->elfclass == ELFCLASS32)
469 {
470 prpsinfo32_t data;
471 memset (&data, 0, sizeof (data));
472 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
473 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
474 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
475 &data, sizeof (data));
476 }
477 else
478 {
479 prpsinfo64_t data;
480 memset (&data, 0, sizeof (data));
481 strncpy (data.pr_fname, fname, sizeof (data.pr_fname));
482 strncpy (data.pr_psargs, psargs, sizeof (data.pr_psargs));
483 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
484 &data, sizeof (data));
485 }
486 /* NOTREACHED */
487
488 case NT_PRSTATUS:
489 va_start (ap, note_type);
490 pid = va_arg (ap, long);
491 cursig = va_arg (ap, int);
492 gregs = va_arg (ap, const void *);
493 va_end (ap);
494
495 if (bed->s->elfclass == ELFCLASS32)
496 {
497 if (bed->elf_machine_code == EM_X86_64)
498 {
499 prstatusx32_t prstat;
500 memset (&prstat, 0, sizeof (prstat));
501 prstat.pr_pid = pid;
502 prstat.pr_cursig = cursig;
503 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
504 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
505 &prstat, sizeof (prstat));
506 }
507 else
508 {
509 prstatus32_t prstat;
510 memset (&prstat, 0, sizeof (prstat));
511 prstat.pr_pid = pid;
512 prstat.pr_cursig = cursig;
513 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
514 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
515 &prstat, sizeof (prstat));
516 }
517 }
518 else
519 {
520 prstatus64_t prstat;
521 memset (&prstat, 0, sizeof (prstat));
522 prstat.pr_pid = pid;
523 prstat.pr_cursig = cursig;
524 memcpy (&prstat.pr_reg, gregs, sizeof (prstat.pr_reg));
525 return elfcore_write_note (abfd, buf, bufsiz, "CORE", note_type,
526 &prstat, sizeof (prstat));
527 }
528 }
529 /* NOTREACHED */
530 }
531 # if GCC_VERSION >= 8000
532 # pragma GCC diagnostic pop
533 # endif
534 #endif
535 \f
536 /* Functions for the x86-64 ELF linker. */
537
538 /* The size in bytes of an entry in the global offset table. */
539
540 #define GOT_ENTRY_SIZE 8
541
542 /* The size in bytes of an entry in the lazy procedure linkage table. */
543
544 #define LAZY_PLT_ENTRY_SIZE 16
545
546 /* The size in bytes of an entry in the non-lazy procedure linkage
547 table. */
548
549 #define NON_LAZY_PLT_ENTRY_SIZE 8
550
551 /* The first entry in a lazy procedure linkage table looks like this.
552 See the SVR4 ABI i386 supplement and the x86-64 ABI to see how this
553 works. */
554
555 static const bfd_byte elf_x86_64_lazy_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
556 {
557 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
558 0xff, 0x25, 16, 0, 0, 0, /* jmpq *GOT+16(%rip) */
559 0x0f, 0x1f, 0x40, 0x00 /* nopl 0(%rax) */
560 };
561
562 /* Subsequent entries in a lazy procedure linkage table look like this. */
563
564 static const bfd_byte elf_x86_64_lazy_plt_entry[LAZY_PLT_ENTRY_SIZE] =
565 {
566 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
567 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
568 0x68, /* pushq immediate */
569 0, 0, 0, 0, /* replaced with index into relocation table. */
570 0xe9, /* jmp relative */
571 0, 0, 0, 0 /* replaced with offset to start of .plt0. */
572 };
573
574 /* The first entry in a lazy procedure linkage table with BND prefix
575 like this. */
576
577 static const bfd_byte elf_x86_64_lazy_bnd_plt0_entry[LAZY_PLT_ENTRY_SIZE] =
578 {
579 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
580 0xf2, 0xff, 0x25, 16, 0, 0, 0, /* bnd jmpq *GOT+16(%rip) */
581 0x0f, 0x1f, 0 /* nopl (%rax) */
582 };
583
584 /* Subsequent entries for branches with BND prefx in a lazy procedure
585 linkage table look like this. */
586
587 static const bfd_byte elf_x86_64_lazy_bnd_plt_entry[LAZY_PLT_ENTRY_SIZE] =
588 {
589 0x68, 0, 0, 0, 0, /* pushq immediate */
590 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
591 0x0f, 0x1f, 0x44, 0, 0 /* nopl 0(%rax,%rax,1) */
592 };
593
594 /* The first entry in the IBT-enabled lazy procedure linkage table is the
595 the same as the lazy PLT with BND prefix so that bound registers are
596 preserved when control is passed to dynamic linker. Subsequent
597 entries for a IBT-enabled lazy procedure linkage table look like
598 this. */
599
600 static const bfd_byte elf_x86_64_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
601 {
602 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
603 0x68, 0, 0, 0, 0, /* pushq immediate */
604 0xf2, 0xe9, 0, 0, 0, 0, /* bnd jmpq relative */
605 0x90 /* nop */
606 };
607
608 /* The first entry in the x32 IBT-enabled lazy procedure linkage table
609 is the same as the normal lazy PLT. Subsequent entries for an
610 x32 IBT-enabled lazy procedure linkage table look like this. */
611
612 static const bfd_byte elf_x32_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
613 {
614 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
615 0x68, 0, 0, 0, 0, /* pushq immediate */
616 0xe9, 0, 0, 0, 0, /* jmpq relative */
617 0x66, 0x90 /* xchg %ax,%ax */
618 };
619
620 /* Entries in the non-lazey procedure linkage table look like this. */
621
622 static const bfd_byte elf_x86_64_non_lazy_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
623 {
624 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
625 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
626 0x66, 0x90 /* xchg %ax,%ax */
627 };
628
629 /* Entries for branches with BND prefix in the non-lazey procedure
630 linkage table look like this. */
631
632 static const bfd_byte elf_x86_64_non_lazy_bnd_plt_entry[NON_LAZY_PLT_ENTRY_SIZE] =
633 {
634 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
635 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
636 0x90 /* nop */
637 };
638
639 /* Entries for branches with IBT-enabled in the non-lazey procedure
640 linkage table look like this. They have the same size as the lazy
641 PLT entry. */
642
643 static const bfd_byte elf_x86_64_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
644 {
645 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
646 0xf2, 0xff, 0x25, /* bnd jmpq *name@GOTPC(%rip) */
647 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
648 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopl 0x0(%rax,%rax,1) */
649 };
650
651 /* Entries for branches with IBT-enabled in the x32 non-lazey procedure
652 linkage table look like this. They have the same size as the lazy
653 PLT entry. */
654
655 static const bfd_byte elf_x32_non_lazy_ibt_plt_entry[LAZY_PLT_ENTRY_SIZE] =
656 {
657 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
658 0xff, 0x25, /* jmpq *name@GOTPC(%rip) */
659 0, 0, 0, 0, /* replaced with offset to this symbol in .got. */
660 0x66, 0x0f, 0x1f, 0x44, 0x00, 0x00 /* nopw 0x0(%rax,%rax,1) */
661 };
662
663 /* The TLSDESC entry in a lazy procedure linkage table. */
664 static const bfd_byte elf_x86_64_tlsdesc_plt_entry[LAZY_PLT_ENTRY_SIZE] =
665 {
666 0xf3, 0x0f, 0x1e, 0xfa, /* endbr64 */
667 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
668 0xff, 0x25, 16, 0, 0, 0 /* jmpq *GOT+TDG(%rip) */
669 };
670
671 /* .eh_frame covering the lazy .plt section. */
672
673 static const bfd_byte elf_x86_64_eh_frame_lazy_plt[] =
674 {
675 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
676 0, 0, 0, 0, /* CIE ID */
677 1, /* CIE version */
678 'z', 'R', 0, /* Augmentation string */
679 1, /* Code alignment factor */
680 0x78, /* Data alignment factor */
681 16, /* Return address column */
682 1, /* Augmentation size */
683 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
684 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
685 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
686 DW_CFA_nop, DW_CFA_nop,
687
688 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
689 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
690 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
691 0, 0, 0, 0, /* .plt size goes here */
692 0, /* Augmentation size */
693 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
694 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
695 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
696 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
697 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
698 11, /* Block length */
699 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
700 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
701 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge,
702 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
703 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
704 };
705
706 /* .eh_frame covering the lazy BND .plt section. */
707
708 static const bfd_byte elf_x86_64_eh_frame_lazy_bnd_plt[] =
709 {
710 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
711 0, 0, 0, 0, /* CIE ID */
712 1, /* CIE version */
713 'z', 'R', 0, /* Augmentation string */
714 1, /* Code alignment factor */
715 0x78, /* Data alignment factor */
716 16, /* Return address column */
717 1, /* Augmentation size */
718 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
719 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
720 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
721 DW_CFA_nop, DW_CFA_nop,
722
723 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
724 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
725 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
726 0, 0, 0, 0, /* .plt size goes here */
727 0, /* Augmentation size */
728 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
729 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
730 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
731 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
732 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
733 11, /* Block length */
734 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
735 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
736 DW_OP_lit15, DW_OP_and, DW_OP_lit5, DW_OP_ge,
737 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
738 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
739 };
740
741 /* .eh_frame covering the lazy .plt section with IBT-enabled. */
742
743 static const bfd_byte elf_x86_64_eh_frame_lazy_ibt_plt[] =
744 {
745 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
746 0, 0, 0, 0, /* CIE ID */
747 1, /* CIE version */
748 'z', 'R', 0, /* Augmentation string */
749 1, /* Code alignment factor */
750 0x78, /* Data alignment factor */
751 16, /* Return address column */
752 1, /* Augmentation size */
753 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
754 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
755 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
756 DW_CFA_nop, DW_CFA_nop,
757
758 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
759 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
760 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
761 0, 0, 0, 0, /* .plt size goes here */
762 0, /* Augmentation size */
763 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
764 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
765 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
766 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
767 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
768 11, /* Block length */
769 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
770 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
771 DW_OP_lit15, DW_OP_and, DW_OP_lit10, DW_OP_ge,
772 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
773 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
774 };
775
776 /* .eh_frame covering the x32 lazy .plt section with IBT-enabled. */
777
778 static const bfd_byte elf_x32_eh_frame_lazy_ibt_plt[] =
779 {
780 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
781 0, 0, 0, 0, /* CIE ID */
782 1, /* CIE version */
783 'z', 'R', 0, /* Augmentation string */
784 1, /* Code alignment factor */
785 0x78, /* Data alignment factor */
786 16, /* Return address column */
787 1, /* Augmentation size */
788 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
789 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
790 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
791 DW_CFA_nop, DW_CFA_nop,
792
793 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
794 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
795 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
796 0, 0, 0, 0, /* .plt size goes here */
797 0, /* Augmentation size */
798 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
799 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
800 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
801 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */
802 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
803 11, /* Block length */
804 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
805 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
806 DW_OP_lit15, DW_OP_and, DW_OP_lit9, DW_OP_ge,
807 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
808 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
809 };
810
811 /* .eh_frame covering the non-lazy .plt section. */
812
813 static const bfd_byte elf_x86_64_eh_frame_non_lazy_plt[] =
814 {
815 #define PLT_GOT_FDE_LENGTH 20
816 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
817 0, 0, 0, 0, /* CIE ID */
818 1, /* CIE version */
819 'z', 'R', 0, /* Augmentation string */
820 1, /* Code alignment factor */
821 0x78, /* Data alignment factor */
822 16, /* Return address column */
823 1, /* Augmentation size */
824 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
825 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
826 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
827 DW_CFA_nop, DW_CFA_nop,
828
829 PLT_GOT_FDE_LENGTH, 0, 0, 0, /* FDE length */
830 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */
831 0, 0, 0, 0, /* the start of non-lazy .plt goes here */
832 0, 0, 0, 0, /* non-lazy .plt size goes here */
833 0, /* Augmentation size */
834 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop,
835 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop
836 };
837
838 /* These are the standard parameters. */
839 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_plt =
840 {
841 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
842 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
843 elf_x86_64_lazy_plt_entry, /* plt_entry */
844 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
845 elf_x86_64_tlsdesc_plt_entry, /* plt_tlsdesc_entry */
846 LAZY_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
847 6, /* plt_tlsdesc_got1_offset */
848 12, /* plt_tlsdesc_got2_offset */
849 10, /* plt_tlsdesc_got1_insn_end */
850 16, /* plt_tlsdesc_got2_insn_end */
851 2, /* plt0_got1_offset */
852 8, /* plt0_got2_offset */
853 12, /* plt0_got2_insn_end */
854 2, /* plt_got_offset */
855 7, /* plt_reloc_offset */
856 12, /* plt_plt_offset */
857 6, /* plt_got_insn_size */
858 LAZY_PLT_ENTRY_SIZE, /* plt_plt_insn_end */
859 6, /* plt_lazy_offset */
860 elf_x86_64_lazy_plt0_entry, /* pic_plt0_entry */
861 elf_x86_64_lazy_plt_entry, /* pic_plt_entry */
862 elf_x86_64_eh_frame_lazy_plt, /* eh_frame_plt */
863 sizeof (elf_x86_64_eh_frame_lazy_plt) /* eh_frame_plt_size */
864 };
865
866 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_plt =
867 {
868 elf_x86_64_non_lazy_plt_entry, /* plt_entry */
869 elf_x86_64_non_lazy_plt_entry, /* pic_plt_entry */
870 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
871 2, /* plt_got_offset */
872 6, /* plt_got_insn_size */
873 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
874 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
875 };
876
877 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_bnd_plt =
878 {
879 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
880 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
881 elf_x86_64_lazy_bnd_plt_entry, /* plt_entry */
882 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
883 elf_x86_64_tlsdesc_plt_entry, /* plt_tlsdesc_entry */
884 LAZY_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
885 6, /* plt_tlsdesc_got1_offset */
886 12, /* plt_tlsdesc_got2_offset */
887 10, /* plt_tlsdesc_got1_insn_end */
888 16, /* plt_tlsdesc_got2_insn_end */
889 2, /* plt0_got1_offset */
890 1+8, /* plt0_got2_offset */
891 1+12, /* plt0_got2_insn_end */
892 1+2, /* plt_got_offset */
893 1, /* plt_reloc_offset */
894 7, /* plt_plt_offset */
895 1+6, /* plt_got_insn_size */
896 11, /* plt_plt_insn_end */
897 0, /* plt_lazy_offset */
898 elf_x86_64_lazy_bnd_plt0_entry, /* pic_plt0_entry */
899 elf_x86_64_lazy_bnd_plt_entry, /* pic_plt_entry */
900 elf_x86_64_eh_frame_lazy_bnd_plt, /* eh_frame_plt */
901 sizeof (elf_x86_64_eh_frame_lazy_bnd_plt) /* eh_frame_plt_size */
902 };
903
904 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_bnd_plt =
905 {
906 elf_x86_64_non_lazy_bnd_plt_entry, /* plt_entry */
907 elf_x86_64_non_lazy_bnd_plt_entry, /* pic_plt_entry */
908 NON_LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
909 1+2, /* plt_got_offset */
910 1+6, /* plt_got_insn_size */
911 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
912 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
913 };
914
915 static const struct elf_x86_lazy_plt_layout elf_x86_64_lazy_ibt_plt =
916 {
917 elf_x86_64_lazy_bnd_plt0_entry, /* plt0_entry */
918 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
919 elf_x86_64_lazy_ibt_plt_entry, /* plt_entry */
920 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
921 elf_x86_64_tlsdesc_plt_entry, /* plt_tlsdesc_entry */
922 LAZY_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
923 6, /* plt_tlsdesc_got1_offset */
924 12, /* plt_tlsdesc_got2_offset */
925 10, /* plt_tlsdesc_got1_insn_end */
926 16, /* plt_tlsdesc_got2_insn_end */
927 2, /* plt0_got1_offset */
928 1+8, /* plt0_got2_offset */
929 1+12, /* plt0_got2_insn_end */
930 4+1+2, /* plt_got_offset */
931 4+1, /* plt_reloc_offset */
932 4+1+6, /* plt_plt_offset */
933 4+1+6, /* plt_got_insn_size */
934 4+1+5+5, /* plt_plt_insn_end */
935 0, /* plt_lazy_offset */
936 elf_x86_64_lazy_bnd_plt0_entry, /* pic_plt0_entry */
937 elf_x86_64_lazy_ibt_plt_entry, /* pic_plt_entry */
938 elf_x86_64_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
939 sizeof (elf_x86_64_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
940 };
941
942 static const struct elf_x86_lazy_plt_layout elf_x32_lazy_ibt_plt =
943 {
944 elf_x86_64_lazy_plt0_entry, /* plt0_entry */
945 LAZY_PLT_ENTRY_SIZE, /* plt0_entry_size */
946 elf_x32_lazy_ibt_plt_entry, /* plt_entry */
947 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
948 elf_x86_64_tlsdesc_plt_entry, /* plt_tlsdesc_entry */
949 LAZY_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
950 6, /* plt_tlsdesc_got1_offset */
951 12, /* plt_tlsdesc_got2_offset */
952 10, /* plt_tlsdesc_got1_insn_end */
953 16, /* plt_tlsdesc_got2_insn_end */
954 2, /* plt0_got1_offset */
955 8, /* plt0_got2_offset */
956 12, /* plt0_got2_insn_end */
957 4+2, /* plt_got_offset */
958 4+1, /* plt_reloc_offset */
959 4+6, /* plt_plt_offset */
960 4+6, /* plt_got_insn_size */
961 4+5+5, /* plt_plt_insn_end */
962 0, /* plt_lazy_offset */
963 elf_x86_64_lazy_plt0_entry, /* pic_plt0_entry */
964 elf_x32_lazy_ibt_plt_entry, /* pic_plt_entry */
965 elf_x32_eh_frame_lazy_ibt_plt, /* eh_frame_plt */
966 sizeof (elf_x32_eh_frame_lazy_ibt_plt) /* eh_frame_plt_size */
967 };
968
969 static const struct elf_x86_non_lazy_plt_layout elf_x86_64_non_lazy_ibt_plt =
970 {
971 elf_x86_64_non_lazy_ibt_plt_entry, /* plt_entry */
972 elf_x86_64_non_lazy_ibt_plt_entry, /* pic_plt_entry */
973 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
974 4+1+2, /* plt_got_offset */
975 4+1+6, /* plt_got_insn_size */
976 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
977 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
978 };
979
980 static const struct elf_x86_non_lazy_plt_layout elf_x32_non_lazy_ibt_plt =
981 {
982 elf_x32_non_lazy_ibt_plt_entry, /* plt_entry */
983 elf_x32_non_lazy_ibt_plt_entry, /* pic_plt_entry */
984 LAZY_PLT_ENTRY_SIZE, /* plt_entry_size */
985 4+2, /* plt_got_offset */
986 4+6, /* plt_got_insn_size */
987 elf_x86_64_eh_frame_non_lazy_plt, /* eh_frame_plt */
988 sizeof (elf_x86_64_eh_frame_non_lazy_plt) /* eh_frame_plt_size */
989 };
990
991 static const struct elf_x86_backend_data elf_x86_64_arch_bed =
992 {
993 is_normal /* os */
994 };
995
996 #define elf_backend_arch_data &elf_x86_64_arch_bed
997
998 static bfd_boolean
999 elf64_x86_64_elf_object_p (bfd *abfd)
1000 {
1001 /* Set the right machine number for an x86-64 elf64 file. */
1002 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
1003 return TRUE;
1004 }
1005
1006 static bfd_boolean
1007 elf32_x86_64_elf_object_p (bfd *abfd)
1008 {
1009 /* Set the right machine number for an x86-64 elf32 file. */
1010 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32);
1011 return TRUE;
1012 }
1013
1014 /* Return TRUE if the TLS access code sequence support transition
1015 from R_TYPE. */
1016
1017 static bfd_boolean
1018 elf_x86_64_check_tls_transition (bfd *abfd,
1019 struct bfd_link_info *info,
1020 asection *sec,
1021 bfd_byte *contents,
1022 Elf_Internal_Shdr *symtab_hdr,
1023 struct elf_link_hash_entry **sym_hashes,
1024 unsigned int r_type,
1025 const Elf_Internal_Rela *rel,
1026 const Elf_Internal_Rela *relend)
1027 {
1028 unsigned int val;
1029 unsigned long r_symndx;
1030 bfd_boolean largepic = FALSE;
1031 struct elf_link_hash_entry *h;
1032 bfd_vma offset;
1033 struct elf_x86_link_hash_table *htab;
1034 bfd_byte *call;
1035 bfd_boolean indirect_call;
1036
1037 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1038 offset = rel->r_offset;
1039 switch (r_type)
1040 {
1041 case R_X86_64_TLSGD:
1042 case R_X86_64_TLSLD:
1043 if ((rel + 1) >= relend)
1044 return FALSE;
1045
1046 if (r_type == R_X86_64_TLSGD)
1047 {
1048 /* Check transition from GD access model. For 64bit, only
1049 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1050 .word 0x6666; rex64; call __tls_get_addr@PLT
1051 or
1052 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
1053 .byte 0x66; rex64
1054 call *__tls_get_addr@GOTPCREL(%rip)
1055 which may be converted to
1056 addr32 call __tls_get_addr
1057 can transit to different access model. For 32bit, only
1058 leaq foo@tlsgd(%rip), %rdi
1059 .word 0x6666; rex64; call __tls_get_addr@PLT
1060 or
1061 leaq foo@tlsgd(%rip), %rdi
1062 .byte 0x66; rex64
1063 call *__tls_get_addr@GOTPCREL(%rip)
1064 which may be converted to
1065 addr32 call __tls_get_addr
1066 can transit to different access model. For largepic,
1067 we also support:
1068 leaq foo@tlsgd(%rip), %rdi
1069 movabsq $__tls_get_addr@pltoff, %rax
1070 addq $r15, %rax
1071 call *%rax
1072 or
1073 leaq foo@tlsgd(%rip), %rdi
1074 movabsq $__tls_get_addr@pltoff, %rax
1075 addq $rbx, %rax
1076 call *%rax */
1077
1078 static const unsigned char leaq[] = { 0x66, 0x48, 0x8d, 0x3d };
1079
1080 if ((offset + 12) > sec->size)
1081 return FALSE;
1082
1083 call = contents + offset + 4;
1084 if (call[0] != 0x66
1085 || !((call[1] == 0x48
1086 && call[2] == 0xff
1087 && call[3] == 0x15)
1088 || (call[1] == 0x48
1089 && call[2] == 0x67
1090 && call[3] == 0xe8)
1091 || (call[1] == 0x66
1092 && call[2] == 0x48
1093 && call[3] == 0xe8)))
1094 {
1095 if (!ABI_64_P (abfd)
1096 || (offset + 19) > sec->size
1097 || offset < 3
1098 || memcmp (call - 7, leaq + 1, 3) != 0
1099 || memcmp (call, "\x48\xb8", 2) != 0
1100 || call[11] != 0x01
1101 || call[13] != 0xff
1102 || call[14] != 0xd0
1103 || !((call[10] == 0x48 && call[12] == 0xd8)
1104 || (call[10] == 0x4c && call[12] == 0xf8)))
1105 return FALSE;
1106 largepic = TRUE;
1107 }
1108 else if (ABI_64_P (abfd))
1109 {
1110 if (offset < 4
1111 || memcmp (contents + offset - 4, leaq, 4) != 0)
1112 return FALSE;
1113 }
1114 else
1115 {
1116 if (offset < 3
1117 || memcmp (contents + offset - 3, leaq + 1, 3) != 0)
1118 return FALSE;
1119 }
1120 indirect_call = call[2] == 0xff;
1121 }
1122 else
1123 {
1124 /* Check transition from LD access model. Only
1125 leaq foo@tlsld(%rip), %rdi;
1126 call __tls_get_addr@PLT
1127 or
1128 leaq foo@tlsld(%rip), %rdi;
1129 call *__tls_get_addr@GOTPCREL(%rip)
1130 which may be converted to
1131 addr32 call __tls_get_addr
1132 can transit to different access model. For largepic
1133 we also support:
1134 leaq foo@tlsld(%rip), %rdi
1135 movabsq $__tls_get_addr@pltoff, %rax
1136 addq $r15, %rax
1137 call *%rax
1138 or
1139 leaq foo@tlsld(%rip), %rdi
1140 movabsq $__tls_get_addr@pltoff, %rax
1141 addq $rbx, %rax
1142 call *%rax */
1143
1144 static const unsigned char lea[] = { 0x48, 0x8d, 0x3d };
1145
1146 if (offset < 3 || (offset + 9) > sec->size)
1147 return FALSE;
1148
1149 if (memcmp (contents + offset - 3, lea, 3) != 0)
1150 return FALSE;
1151
1152 call = contents + offset + 4;
1153 if (!(call[0] == 0xe8
1154 || (call[0] == 0xff && call[1] == 0x15)
1155 || (call[0] == 0x67 && call[1] == 0xe8)))
1156 {
1157 if (!ABI_64_P (abfd)
1158 || (offset + 19) > sec->size
1159 || memcmp (call, "\x48\xb8", 2) != 0
1160 || call[11] != 0x01
1161 || call[13] != 0xff
1162 || call[14] != 0xd0
1163 || !((call[10] == 0x48 && call[12] == 0xd8)
1164 || (call[10] == 0x4c && call[12] == 0xf8)))
1165 return FALSE;
1166 largepic = TRUE;
1167 }
1168 indirect_call = call[0] == 0xff;
1169 }
1170
1171 r_symndx = htab->r_sym (rel[1].r_info);
1172 if (r_symndx < symtab_hdr->sh_info)
1173 return FALSE;
1174
1175 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1176 if (h == NULL
1177 || !((struct elf_x86_link_hash_entry *) h)->tls_get_addr)
1178 return FALSE;
1179 else
1180 {
1181 r_type = (ELF32_R_TYPE (rel[1].r_info)
1182 & ~R_X86_64_converted_reloc_bit);
1183 if (largepic)
1184 return r_type == R_X86_64_PLTOFF64;
1185 else if (indirect_call)
1186 return r_type == R_X86_64_GOTPCRELX;
1187 else
1188 return (r_type == R_X86_64_PC32 || r_type == R_X86_64_PLT32);
1189 }
1190
1191 case R_X86_64_GOTTPOFF:
1192 /* Check transition from IE access model:
1193 mov foo@gottpoff(%rip), %reg
1194 add foo@gottpoff(%rip), %reg
1195 */
1196
1197 /* Check REX prefix first. */
1198 if (offset >= 3 && (offset + 4) <= sec->size)
1199 {
1200 val = bfd_get_8 (abfd, contents + offset - 3);
1201 if (val != 0x48 && val != 0x4c)
1202 {
1203 /* X32 may have 0x44 REX prefix or no REX prefix. */
1204 if (ABI_64_P (abfd))
1205 return FALSE;
1206 }
1207 }
1208 else
1209 {
1210 /* X32 may not have any REX prefix. */
1211 if (ABI_64_P (abfd))
1212 return FALSE;
1213 if (offset < 2 || (offset + 3) > sec->size)
1214 return FALSE;
1215 }
1216
1217 val = bfd_get_8 (abfd, contents + offset - 2);
1218 if (val != 0x8b && val != 0x03)
1219 return FALSE;
1220
1221 val = bfd_get_8 (abfd, contents + offset - 1);
1222 return (val & 0xc7) == 5;
1223
1224 case R_X86_64_GOTPC32_TLSDESC:
1225 /* Check transition from GDesc access model:
1226 leaq x@tlsdesc(%rip), %rax
1227
1228 Make sure it's a leaq adding rip to a 32-bit offset
1229 into any register, although it's probably almost always
1230 going to be rax. */
1231
1232 if (offset < 3 || (offset + 4) > sec->size)
1233 return FALSE;
1234
1235 val = bfd_get_8 (abfd, contents + offset - 3);
1236 if ((val & 0xfb) != 0x48)
1237 return FALSE;
1238
1239 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d)
1240 return FALSE;
1241
1242 val = bfd_get_8 (abfd, contents + offset - 1);
1243 return (val & 0xc7) == 0x05;
1244
1245 case R_X86_64_TLSDESC_CALL:
1246 /* Check transition from GDesc access model:
1247 call *x@tlsdesc(%rax)
1248 */
1249 if (offset + 2 <= sec->size)
1250 {
1251 /* Make sure that it's a call *x@tlsdesc(%rax). */
1252 call = contents + offset;
1253 return call[0] == 0xff && call[1] == 0x10;
1254 }
1255
1256 return FALSE;
1257
1258 default:
1259 abort ();
1260 }
1261 }
1262
1263 /* Return TRUE if the TLS access transition is OK or no transition
1264 will be performed. Update R_TYPE if there is a transition. */
1265
1266 static bfd_boolean
1267 elf_x86_64_tls_transition (struct bfd_link_info *info, bfd *abfd,
1268 asection *sec, bfd_byte *contents,
1269 Elf_Internal_Shdr *symtab_hdr,
1270 struct elf_link_hash_entry **sym_hashes,
1271 unsigned int *r_type, int tls_type,
1272 const Elf_Internal_Rela *rel,
1273 const Elf_Internal_Rela *relend,
1274 struct elf_link_hash_entry *h,
1275 unsigned long r_symndx,
1276 bfd_boolean from_relocate_section)
1277 {
1278 unsigned int from_type = *r_type;
1279 unsigned int to_type = from_type;
1280 bfd_boolean check = TRUE;
1281
1282 /* Skip TLS transition for functions. */
1283 if (h != NULL
1284 && (h->type == STT_FUNC
1285 || h->type == STT_GNU_IFUNC))
1286 return TRUE;
1287
1288 switch (from_type)
1289 {
1290 case R_X86_64_TLSGD:
1291 case R_X86_64_GOTPC32_TLSDESC:
1292 case R_X86_64_TLSDESC_CALL:
1293 case R_X86_64_GOTTPOFF:
1294 if (bfd_link_executable (info))
1295 {
1296 if (h == NULL)
1297 to_type = R_X86_64_TPOFF32;
1298 else
1299 to_type = R_X86_64_GOTTPOFF;
1300 }
1301
1302 /* When we are called from elf_x86_64_relocate_section, there may
1303 be additional transitions based on TLS_TYPE. */
1304 if (from_relocate_section)
1305 {
1306 unsigned int new_to_type = to_type;
1307
1308 if (TLS_TRANSITION_IE_TO_LE_P (info, h, tls_type))
1309 new_to_type = R_X86_64_TPOFF32;
1310
1311 if (to_type == R_X86_64_TLSGD
1312 || to_type == R_X86_64_GOTPC32_TLSDESC
1313 || to_type == R_X86_64_TLSDESC_CALL)
1314 {
1315 if (tls_type == GOT_TLS_IE)
1316 new_to_type = R_X86_64_GOTTPOFF;
1317 }
1318
1319 /* We checked the transition before when we were called from
1320 elf_x86_64_check_relocs. We only want to check the new
1321 transition which hasn't been checked before. */
1322 check = new_to_type != to_type && from_type == to_type;
1323 to_type = new_to_type;
1324 }
1325
1326 break;
1327
1328 case R_X86_64_TLSLD:
1329 if (bfd_link_executable (info))
1330 to_type = R_X86_64_TPOFF32;
1331 break;
1332
1333 default:
1334 return TRUE;
1335 }
1336
1337 /* Return TRUE if there is no transition. */
1338 if (from_type == to_type)
1339 return TRUE;
1340
1341 /* Check if the transition can be performed. */
1342 if (check
1343 && ! elf_x86_64_check_tls_transition (abfd, info, sec, contents,
1344 symtab_hdr, sym_hashes,
1345 from_type, rel, relend))
1346 {
1347 reloc_howto_type *from, *to;
1348 const char *name;
1349
1350 from = elf_x86_64_rtype_to_howto (abfd, from_type);
1351 to = elf_x86_64_rtype_to_howto (abfd, to_type);
1352
1353 if (from == NULL || to == NULL)
1354 return FALSE;
1355
1356 if (h)
1357 name = h->root.root.string;
1358 else
1359 {
1360 struct elf_x86_link_hash_table *htab;
1361
1362 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1363 if (htab == NULL)
1364 name = "*unknown*";
1365 else
1366 {
1367 Elf_Internal_Sym *isym;
1368
1369 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1370 abfd, r_symndx);
1371 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL);
1372 }
1373 }
1374
1375 _bfd_error_handler
1376 /* xgettext:c-format */
1377 (_("%pB: TLS transition from %s to %s against `%s' at %#" PRIx64
1378 " in section `%pA' failed"),
1379 abfd, from->name, to->name, name, (uint64_t) rel->r_offset, sec);
1380 bfd_set_error (bfd_error_bad_value);
1381 return FALSE;
1382 }
1383
1384 *r_type = to_type;
1385 return TRUE;
1386 }
1387
1388 /* Rename some of the generic section flags to better document how they
1389 are used here. */
1390 #define check_relocs_failed sec_flg0
1391
1392 static bfd_boolean
1393 elf_x86_64_need_pic (struct bfd_link_info *info,
1394 bfd *input_bfd, asection *sec,
1395 struct elf_link_hash_entry *h,
1396 Elf_Internal_Shdr *symtab_hdr,
1397 Elf_Internal_Sym *isym,
1398 reloc_howto_type *howto)
1399 {
1400 const char *v = "";
1401 const char *und = "";
1402 const char *pic = "";
1403 const char *object;
1404
1405 const char *name;
1406 if (h)
1407 {
1408 name = h->root.root.string;
1409 switch (ELF_ST_VISIBILITY (h->other))
1410 {
1411 case STV_HIDDEN:
1412 v = _("hidden symbol ");
1413 break;
1414 case STV_INTERNAL:
1415 v = _("internal symbol ");
1416 break;
1417 case STV_PROTECTED:
1418 v = _("protected symbol ");
1419 break;
1420 default:
1421 if (((struct elf_x86_link_hash_entry *) h)->def_protected)
1422 v = _("protected symbol ");
1423 else
1424 v = _("symbol ");
1425 pic = _("; recompile with -fPIC");
1426 break;
1427 }
1428
1429 if (!h->def_regular && !h->def_dynamic)
1430 und = _("undefined ");
1431 }
1432 else
1433 {
1434 name = bfd_elf_sym_name (input_bfd, symtab_hdr, isym, NULL);
1435 pic = _("; recompile with -fPIC");
1436 }
1437
1438 if (bfd_link_dll (info))
1439 object = _("a shared object");
1440 else if (bfd_link_pie (info))
1441 object = _("a PIE object");
1442 else
1443 object = _("a PDE object");
1444
1445 /* xgettext:c-format */
1446 _bfd_error_handler (_("%pB: relocation %s against %s%s`%s' can "
1447 "not be used when making %s%s"),
1448 input_bfd, howto->name, und, v, name,
1449 object, pic);
1450 bfd_set_error (bfd_error_bad_value);
1451 sec->check_relocs_failed = 1;
1452 return FALSE;
1453 }
1454
1455 /* With the local symbol, foo, we convert
1456 mov foo@GOTPCREL(%rip), %reg
1457 to
1458 lea foo(%rip), %reg
1459 and convert
1460 call/jmp *foo@GOTPCREL(%rip)
1461 to
1462 nop call foo/jmp foo nop
1463 When PIC is false, convert
1464 test %reg, foo@GOTPCREL(%rip)
1465 to
1466 test $foo, %reg
1467 and convert
1468 binop foo@GOTPCREL(%rip), %reg
1469 to
1470 binop $foo, %reg
1471 where binop is one of adc, add, and, cmp, or, sbb, sub, xor
1472 instructions. */
1473
1474 static bfd_boolean
1475 elf_x86_64_convert_load_reloc (bfd *abfd,
1476 bfd_byte *contents,
1477 unsigned int *r_type_p,
1478 Elf_Internal_Rela *irel,
1479 struct elf_link_hash_entry *h,
1480 bfd_boolean *converted,
1481 struct bfd_link_info *link_info)
1482 {
1483 struct elf_x86_link_hash_table *htab;
1484 bfd_boolean is_pic;
1485 bfd_boolean no_overflow;
1486 bfd_boolean relocx;
1487 bfd_boolean to_reloc_pc32;
1488 asection *tsec;
1489 bfd_signed_vma raddend;
1490 unsigned int opcode;
1491 unsigned int modrm;
1492 unsigned int r_type = *r_type_p;
1493 unsigned int r_symndx;
1494 bfd_vma roff = irel->r_offset;
1495
1496 if (roff < (r_type == R_X86_64_REX_GOTPCRELX ? 3 : 2))
1497 return TRUE;
1498
1499 raddend = irel->r_addend;
1500 /* Addend for 32-bit PC-relative relocation must be -4. */
1501 if (raddend != -4)
1502 return TRUE;
1503
1504 htab = elf_x86_hash_table (link_info, X86_64_ELF_DATA);
1505 is_pic = bfd_link_pic (link_info);
1506
1507 relocx = (r_type == R_X86_64_GOTPCRELX
1508 || r_type == R_X86_64_REX_GOTPCRELX);
1509
1510 /* TRUE if --no-relax is used. */
1511 no_overflow = link_info->disable_target_specific_optimizations > 1;
1512
1513 r_symndx = htab->r_sym (irel->r_info);
1514
1515 opcode = bfd_get_8 (abfd, contents + roff - 2);
1516
1517 /* Convert mov to lea since it has been done for a while. */
1518 if (opcode != 0x8b)
1519 {
1520 /* Only convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX
1521 for call, jmp or one of adc, add, and, cmp, or, sbb, sub,
1522 test, xor instructions. */
1523 if (!relocx)
1524 return TRUE;
1525 }
1526
1527 /* We convert only to R_X86_64_PC32:
1528 1. Branch.
1529 2. R_X86_64_GOTPCREL since we can't modify REX byte.
1530 3. no_overflow is true.
1531 4. PIC.
1532 */
1533 to_reloc_pc32 = (opcode == 0xff
1534 || !relocx
1535 || no_overflow
1536 || is_pic);
1537
1538 /* Get the symbol referred to by the reloc. */
1539 if (h == NULL)
1540 {
1541 Elf_Internal_Sym *isym
1542 = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
1543
1544 /* Skip relocation against undefined symbols. */
1545 if (isym->st_shndx == SHN_UNDEF)
1546 return TRUE;
1547
1548 if (isym->st_shndx == SHN_ABS)
1549 tsec = bfd_abs_section_ptr;
1550 else if (isym->st_shndx == SHN_COMMON)
1551 tsec = bfd_com_section_ptr;
1552 else if (isym->st_shndx == SHN_X86_64_LCOMMON)
1553 tsec = &_bfd_elf_large_com_section;
1554 else
1555 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
1556 }
1557 else
1558 {
1559 /* Undefined weak symbol is only bound locally in executable
1560 and its reference is resolved as 0 without relocation
1561 overflow. We can only perform this optimization for
1562 GOTPCRELX relocations since we need to modify REX byte.
1563 It is OK convert mov with R_X86_64_GOTPCREL to
1564 R_X86_64_PC32. */
1565 bfd_boolean local_ref;
1566 struct elf_x86_link_hash_entry *eh = elf_x86_hash_entry (h);
1567
1568 /* NB: Also set linker_def via SYMBOL_REFERENCES_LOCAL_P. */
1569 local_ref = SYMBOL_REFERENCES_LOCAL_P (link_info, h);
1570 if ((relocx || opcode == 0x8b)
1571 && (h->root.type == bfd_link_hash_undefweak
1572 && !eh->linker_def
1573 && local_ref))
1574 {
1575 if (opcode == 0xff)
1576 {
1577 /* Skip for branch instructions since R_X86_64_PC32
1578 may overflow. */
1579 if (no_overflow)
1580 return TRUE;
1581 }
1582 else if (relocx)
1583 {
1584 /* For non-branch instructions, we can convert to
1585 R_X86_64_32/R_X86_64_32S since we know if there
1586 is a REX byte. */
1587 to_reloc_pc32 = FALSE;
1588 }
1589
1590 /* Since we don't know the current PC when PIC is true,
1591 we can't convert to R_X86_64_PC32. */
1592 if (to_reloc_pc32 && is_pic)
1593 return TRUE;
1594
1595 goto convert;
1596 }
1597 /* Avoid optimizing GOTPCREL relocations againt _DYNAMIC since
1598 ld.so may use its link-time address. */
1599 else if (h->start_stop
1600 || eh->linker_def
1601 || ((h->def_regular
1602 || h->root.type == bfd_link_hash_defined
1603 || h->root.type == bfd_link_hash_defweak)
1604 && h != htab->elf.hdynamic
1605 && local_ref))
1606 {
1607 /* bfd_link_hash_new or bfd_link_hash_undefined is
1608 set by an assignment in a linker script in
1609 bfd_elf_record_link_assignment. start_stop is set
1610 on __start_SECNAME/__stop_SECNAME which mark section
1611 SECNAME. */
1612 if (h->start_stop
1613 || eh->linker_def
1614 || (h->def_regular
1615 && (h->root.type == bfd_link_hash_new
1616 || h->root.type == bfd_link_hash_undefined
1617 || ((h->root.type == bfd_link_hash_defined
1618 || h->root.type == bfd_link_hash_defweak)
1619 && h->root.u.def.section == bfd_und_section_ptr))))
1620 {
1621 /* Skip since R_X86_64_32/R_X86_64_32S may overflow. */
1622 if (no_overflow)
1623 return TRUE;
1624 goto convert;
1625 }
1626 tsec = h->root.u.def.section;
1627 }
1628 else
1629 return TRUE;
1630 }
1631
1632 /* Don't convert GOTPCREL relocation against large section. */
1633 if (elf_section_data (tsec) != NULL
1634 && (elf_section_flags (tsec) & SHF_X86_64_LARGE) != 0)
1635 return TRUE;
1636
1637 /* Skip since R_X86_64_PC32/R_X86_64_32/R_X86_64_32S may overflow. */
1638 if (no_overflow)
1639 return TRUE;
1640
1641 convert:
1642 if (opcode == 0xff)
1643 {
1644 /* We have "call/jmp *foo@GOTPCREL(%rip)". */
1645 unsigned int nop;
1646 unsigned int disp;
1647 bfd_vma nop_offset;
1648
1649 /* Convert R_X86_64_GOTPCRELX and R_X86_64_REX_GOTPCRELX to
1650 R_X86_64_PC32. */
1651 modrm = bfd_get_8 (abfd, contents + roff - 1);
1652 if (modrm == 0x25)
1653 {
1654 /* Convert to "jmp foo nop". */
1655 modrm = 0xe9;
1656 nop = NOP_OPCODE;
1657 nop_offset = irel->r_offset + 3;
1658 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1659 irel->r_offset -= 1;
1660 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1661 }
1662 else
1663 {
1664 struct elf_x86_link_hash_entry *eh
1665 = (struct elf_x86_link_hash_entry *) h;
1666
1667 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE
1668 is a nop prefix. */
1669 modrm = 0xe8;
1670 /* To support TLS optimization, always use addr32 prefix for
1671 "call *__tls_get_addr@GOTPCREL(%rip)". */
1672 if (eh && eh->tls_get_addr)
1673 {
1674 nop = 0x67;
1675 nop_offset = irel->r_offset - 2;
1676 }
1677 else
1678 {
1679 nop = link_info->call_nop_byte;
1680 if (link_info->call_nop_as_suffix)
1681 {
1682 nop_offset = irel->r_offset + 3;
1683 disp = bfd_get_32 (abfd, contents + irel->r_offset);
1684 irel->r_offset -= 1;
1685 bfd_put_32 (abfd, disp, contents + irel->r_offset);
1686 }
1687 else
1688 nop_offset = irel->r_offset - 2;
1689 }
1690 }
1691 bfd_put_8 (abfd, nop, contents + nop_offset);
1692 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1);
1693 r_type = R_X86_64_PC32;
1694 }
1695 else
1696 {
1697 unsigned int rex;
1698 unsigned int rex_mask = REX_R;
1699
1700 if (r_type == R_X86_64_REX_GOTPCRELX)
1701 rex = bfd_get_8 (abfd, contents + roff - 3);
1702 else
1703 rex = 0;
1704
1705 if (opcode == 0x8b)
1706 {
1707 if (to_reloc_pc32)
1708 {
1709 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1710 "lea foo(%rip), %reg". */
1711 opcode = 0x8d;
1712 r_type = R_X86_64_PC32;
1713 }
1714 else
1715 {
1716 /* Convert "mov foo@GOTPCREL(%rip), %reg" to
1717 "mov $foo, %reg". */
1718 opcode = 0xc7;
1719 modrm = bfd_get_8 (abfd, contents + roff - 1);
1720 modrm = 0xc0 | (modrm & 0x38) >> 3;
1721 if ((rex & REX_W) != 0
1722 && ABI_64_P (link_info->output_bfd))
1723 {
1724 /* Keep the REX_W bit in REX byte for LP64. */
1725 r_type = R_X86_64_32S;
1726 goto rewrite_modrm_rex;
1727 }
1728 else
1729 {
1730 /* If the REX_W bit in REX byte isn't needed,
1731 use R_X86_64_32 and clear the W bit to avoid
1732 sign-extend imm32 to imm64. */
1733 r_type = R_X86_64_32;
1734 /* Clear the W bit in REX byte. */
1735 rex_mask |= REX_W;
1736 goto rewrite_modrm_rex;
1737 }
1738 }
1739 }
1740 else
1741 {
1742 /* R_X86_64_PC32 isn't supported. */
1743 if (to_reloc_pc32)
1744 return TRUE;
1745
1746 modrm = bfd_get_8 (abfd, contents + roff - 1);
1747 if (opcode == 0x85)
1748 {
1749 /* Convert "test %reg, foo@GOTPCREL(%rip)" to
1750 "test $foo, %reg". */
1751 modrm = 0xc0 | (modrm & 0x38) >> 3;
1752 opcode = 0xf7;
1753 }
1754 else
1755 {
1756 /* Convert "binop foo@GOTPCREL(%rip), %reg" to
1757 "binop $foo, %reg". */
1758 modrm = 0xc0 | (modrm & 0x38) >> 3 | (opcode & 0x3c);
1759 opcode = 0x81;
1760 }
1761
1762 /* Use R_X86_64_32 with 32-bit operand to avoid relocation
1763 overflow when sign-extending imm32 to imm64. */
1764 r_type = (rex & REX_W) != 0 ? R_X86_64_32S : R_X86_64_32;
1765
1766 rewrite_modrm_rex:
1767 bfd_put_8 (abfd, modrm, contents + roff - 1);
1768
1769 if (rex)
1770 {
1771 /* Move the R bit to the B bit in REX byte. */
1772 rex = (rex & ~rex_mask) | (rex & REX_R) >> 2;
1773 bfd_put_8 (abfd, rex, contents + roff - 3);
1774 }
1775
1776 /* No addend for R_X86_64_32/R_X86_64_32S relocations. */
1777 irel->r_addend = 0;
1778 }
1779
1780 bfd_put_8 (abfd, opcode, contents + roff - 2);
1781 }
1782
1783 *r_type_p = r_type;
1784 irel->r_info = htab->r_info (r_symndx,
1785 r_type | R_X86_64_converted_reloc_bit);
1786
1787 *converted = TRUE;
1788
1789 return TRUE;
1790 }
1791
1792 /* Look through the relocs for a section during the first phase, and
1793 calculate needed space in the global offset table, procedure
1794 linkage table, and dynamic reloc sections. */
1795
1796 static bfd_boolean
1797 elf_x86_64_check_relocs (bfd *abfd, struct bfd_link_info *info,
1798 asection *sec,
1799 const Elf_Internal_Rela *relocs)
1800 {
1801 struct elf_x86_link_hash_table *htab;
1802 Elf_Internal_Shdr *symtab_hdr;
1803 struct elf_link_hash_entry **sym_hashes;
1804 const Elf_Internal_Rela *rel;
1805 const Elf_Internal_Rela *rel_end;
1806 asection *sreloc;
1807 bfd_byte *contents;
1808 bfd_boolean converted;
1809
1810 if (bfd_link_relocatable (info))
1811 return TRUE;
1812
1813 /* Don't do anything special with non-loaded, non-alloced sections.
1814 In particular, any relocs in such sections should not affect GOT
1815 and PLT reference counting (ie. we don't allow them to create GOT
1816 or PLT entries), there's no possibility or desire to optimize TLS
1817 relocs, and there's not much point in propagating relocs to shared
1818 libs that the dynamic linker won't relocate. */
1819 if ((sec->flags & SEC_ALLOC) == 0)
1820 return TRUE;
1821
1822 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
1823 if (htab == NULL)
1824 {
1825 sec->check_relocs_failed = 1;
1826 return FALSE;
1827 }
1828
1829 BFD_ASSERT (is_x86_elf (abfd, htab));
1830
1831 /* Get the section contents. */
1832 if (elf_section_data (sec)->this_hdr.contents != NULL)
1833 contents = elf_section_data (sec)->this_hdr.contents;
1834 else if (!bfd_malloc_and_get_section (abfd, sec, &contents))
1835 {
1836 sec->check_relocs_failed = 1;
1837 return FALSE;
1838 }
1839
1840 symtab_hdr = &elf_symtab_hdr (abfd);
1841 sym_hashes = elf_sym_hashes (abfd);
1842
1843 converted = FALSE;
1844
1845 sreloc = NULL;
1846
1847 rel_end = relocs + sec->reloc_count;
1848 for (rel = relocs; rel < rel_end; rel++)
1849 {
1850 unsigned int r_type;
1851 unsigned int r_symndx;
1852 struct elf_link_hash_entry *h;
1853 struct elf_x86_link_hash_entry *eh;
1854 Elf_Internal_Sym *isym;
1855 const char *name;
1856 bfd_boolean size_reloc;
1857 bfd_boolean converted_reloc;
1858
1859 r_symndx = htab->r_sym (rel->r_info);
1860 r_type = ELF32_R_TYPE (rel->r_info);
1861
1862 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1863 {
1864 /* xgettext:c-format */
1865 _bfd_error_handler (_("%pB: bad symbol index: %d"),
1866 abfd, r_symndx);
1867 goto error_return;
1868 }
1869
1870 if (r_symndx < symtab_hdr->sh_info)
1871 {
1872 /* A local symbol. */
1873 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1874 abfd, r_symndx);
1875 if (isym == NULL)
1876 goto error_return;
1877
1878 /* Check relocation against local STT_GNU_IFUNC symbol. */
1879 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1880 {
1881 h = _bfd_elf_x86_get_local_sym_hash (htab, abfd, rel,
1882 TRUE);
1883 if (h == NULL)
1884 goto error_return;
1885
1886 /* Fake a STT_GNU_IFUNC symbol. */
1887 h->root.root.string = bfd_elf_sym_name (abfd, symtab_hdr,
1888 isym, NULL);
1889 h->type = STT_GNU_IFUNC;
1890 h->def_regular = 1;
1891 h->ref_regular = 1;
1892 h->forced_local = 1;
1893 h->root.type = bfd_link_hash_defined;
1894 }
1895 else
1896 h = NULL;
1897 }
1898 else
1899 {
1900 isym = NULL;
1901 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1902 while (h->root.type == bfd_link_hash_indirect
1903 || h->root.type == bfd_link_hash_warning)
1904 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1905 }
1906
1907 /* Check invalid x32 relocations. */
1908 if (!ABI_64_P (abfd))
1909 switch (r_type)
1910 {
1911 default:
1912 break;
1913
1914 case R_X86_64_DTPOFF64:
1915 case R_X86_64_TPOFF64:
1916 case R_X86_64_PC64:
1917 case R_X86_64_GOTOFF64:
1918 case R_X86_64_GOT64:
1919 case R_X86_64_GOTPCREL64:
1920 case R_X86_64_GOTPC64:
1921 case R_X86_64_GOTPLT64:
1922 case R_X86_64_PLTOFF64:
1923 {
1924 if (h)
1925 name = h->root.root.string;
1926 else
1927 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1928 NULL);
1929 _bfd_error_handler
1930 /* xgettext:c-format */
1931 (_("%pB: relocation %s against symbol `%s' isn't "
1932 "supported in x32 mode"), abfd,
1933 x86_64_elf_howto_table[r_type].name, name);
1934 bfd_set_error (bfd_error_bad_value);
1935 goto error_return;
1936 }
1937 break;
1938 }
1939
1940 if (h != NULL)
1941 {
1942 /* It is referenced by a non-shared object. */
1943 h->ref_regular = 1;
1944
1945 if (h->type == STT_GNU_IFUNC)
1946 elf_tdata (info->output_bfd)->has_gnu_symbols
1947 |= elf_gnu_symbol_ifunc;
1948 }
1949
1950 converted_reloc = FALSE;
1951 if ((r_type == R_X86_64_GOTPCREL
1952 || r_type == R_X86_64_GOTPCRELX
1953 || r_type == R_X86_64_REX_GOTPCRELX)
1954 && (h == NULL || h->type != STT_GNU_IFUNC))
1955 {
1956 Elf_Internal_Rela *irel = (Elf_Internal_Rela *) rel;
1957 if (!elf_x86_64_convert_load_reloc (abfd, contents, &r_type,
1958 irel, h, &converted_reloc,
1959 info))
1960 goto error_return;
1961
1962 if (converted_reloc)
1963 converted = TRUE;
1964 }
1965
1966 if (! elf_x86_64_tls_transition (info, abfd, sec, contents,
1967 symtab_hdr, sym_hashes,
1968 &r_type, GOT_UNKNOWN,
1969 rel, rel_end, h, r_symndx, FALSE))
1970 goto error_return;
1971
1972 /* Check if _GLOBAL_OFFSET_TABLE_ is referenced. */
1973 if (h == htab->elf.hgot)
1974 htab->got_referenced = TRUE;
1975
1976 eh = (struct elf_x86_link_hash_entry *) h;
1977 switch (r_type)
1978 {
1979 case R_X86_64_TLSLD:
1980 htab->tls_ld_or_ldm_got.refcount = 1;
1981 goto create_got;
1982
1983 case R_X86_64_TPOFF32:
1984 if (!bfd_link_executable (info) && ABI_64_P (abfd))
1985 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
1986 &x86_64_elf_howto_table[r_type]);
1987 if (eh != NULL)
1988 eh->zero_undefweak &= 0x2;
1989 break;
1990
1991 case R_X86_64_GOTTPOFF:
1992 if (!bfd_link_executable (info))
1993 info->flags |= DF_STATIC_TLS;
1994 /* Fall through */
1995
1996 case R_X86_64_GOT32:
1997 case R_X86_64_GOTPCREL:
1998 case R_X86_64_GOTPCRELX:
1999 case R_X86_64_REX_GOTPCRELX:
2000 case R_X86_64_TLSGD:
2001 case R_X86_64_GOT64:
2002 case R_X86_64_GOTPCREL64:
2003 case R_X86_64_GOTPLT64:
2004 case R_X86_64_GOTPC32_TLSDESC:
2005 case R_X86_64_TLSDESC_CALL:
2006 /* This symbol requires a global offset table entry. */
2007 {
2008 int tls_type, old_tls_type;
2009
2010 switch (r_type)
2011 {
2012 default: tls_type = GOT_NORMAL; break;
2013 case R_X86_64_TLSGD: tls_type = GOT_TLS_GD; break;
2014 case R_X86_64_GOTTPOFF: tls_type = GOT_TLS_IE; break;
2015 case R_X86_64_GOTPC32_TLSDESC:
2016 case R_X86_64_TLSDESC_CALL:
2017 tls_type = GOT_TLS_GDESC; break;
2018 }
2019
2020 if (h != NULL)
2021 {
2022 h->got.refcount = 1;
2023 old_tls_type = eh->tls_type;
2024 }
2025 else
2026 {
2027 bfd_signed_vma *local_got_refcounts;
2028
2029 /* This is a global offset table entry for a local symbol. */
2030 local_got_refcounts = elf_local_got_refcounts (abfd);
2031 if (local_got_refcounts == NULL)
2032 {
2033 bfd_size_type size;
2034
2035 size = symtab_hdr->sh_info;
2036 size *= sizeof (bfd_signed_vma)
2037 + sizeof (bfd_vma) + sizeof (char);
2038 local_got_refcounts = ((bfd_signed_vma *)
2039 bfd_zalloc (abfd, size));
2040 if (local_got_refcounts == NULL)
2041 goto error_return;
2042 elf_local_got_refcounts (abfd) = local_got_refcounts;
2043 elf_x86_local_tlsdesc_gotent (abfd)
2044 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
2045 elf_x86_local_got_tls_type (abfd)
2046 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
2047 }
2048 local_got_refcounts[r_symndx] = 1;
2049 old_tls_type
2050 = elf_x86_local_got_tls_type (abfd) [r_symndx];
2051 }
2052
2053 /* If a TLS symbol is accessed using IE at least once,
2054 there is no point to use dynamic model for it. */
2055 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
2056 && (! GOT_TLS_GD_ANY_P (old_tls_type)
2057 || tls_type != GOT_TLS_IE))
2058 {
2059 if (old_tls_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (tls_type))
2060 tls_type = old_tls_type;
2061 else if (GOT_TLS_GD_ANY_P (old_tls_type)
2062 && GOT_TLS_GD_ANY_P (tls_type))
2063 tls_type |= old_tls_type;
2064 else
2065 {
2066 if (h)
2067 name = h->root.root.string;
2068 else
2069 name = bfd_elf_sym_name (abfd, symtab_hdr,
2070 isym, NULL);
2071 _bfd_error_handler
2072 /* xgettext:c-format */
2073 (_("%pB: '%s' accessed both as normal and"
2074 " thread local symbol"),
2075 abfd, name);
2076 bfd_set_error (bfd_error_bad_value);
2077 goto error_return;
2078 }
2079 }
2080
2081 if (old_tls_type != tls_type)
2082 {
2083 if (eh != NULL)
2084 eh->tls_type = tls_type;
2085 else
2086 elf_x86_local_got_tls_type (abfd) [r_symndx] = tls_type;
2087 }
2088 }
2089 /* Fall through */
2090
2091 case R_X86_64_GOTOFF64:
2092 case R_X86_64_GOTPC32:
2093 case R_X86_64_GOTPC64:
2094 create_got:
2095 if (eh != NULL)
2096 eh->zero_undefweak &= 0x2;
2097 break;
2098
2099 case R_X86_64_PLT32:
2100 case R_X86_64_PLT32_BND:
2101 /* This symbol requires a procedure linkage table entry. We
2102 actually build the entry in adjust_dynamic_symbol,
2103 because this might be a case of linking PIC code which is
2104 never referenced by a dynamic object, in which case we
2105 don't need to generate a procedure linkage table entry
2106 after all. */
2107
2108 /* If this is a local symbol, we resolve it directly without
2109 creating a procedure linkage table entry. */
2110 if (h == NULL)
2111 continue;
2112
2113 eh->zero_undefweak &= 0x2;
2114 h->needs_plt = 1;
2115 h->plt.refcount = 1;
2116 break;
2117
2118 case R_X86_64_PLTOFF64:
2119 /* This tries to form the 'address' of a function relative
2120 to GOT. For global symbols we need a PLT entry. */
2121 if (h != NULL)
2122 {
2123 h->needs_plt = 1;
2124 h->plt.refcount = 1;
2125 }
2126 goto create_got;
2127
2128 case R_X86_64_SIZE32:
2129 case R_X86_64_SIZE64:
2130 size_reloc = TRUE;
2131 goto do_size;
2132
2133 case R_X86_64_32:
2134 if (!ABI_64_P (abfd))
2135 goto pointer;
2136 /* Fall through. */
2137 case R_X86_64_8:
2138 case R_X86_64_16:
2139 case R_X86_64_32S:
2140 /* Check relocation overflow as these relocs may lead to
2141 run-time relocation overflow. Don't error out for
2142 sections we don't care about, such as debug sections or
2143 when relocation overflow check is disabled. */
2144 if (!info->no_reloc_overflow_check
2145 && !converted_reloc
2146 && (bfd_link_pic (info)
2147 || (bfd_link_executable (info)
2148 && h != NULL
2149 && !h->def_regular
2150 && h->def_dynamic
2151 && (sec->flags & SEC_READONLY) == 0)))
2152 return elf_x86_64_need_pic (info, abfd, sec, h, symtab_hdr, isym,
2153 &x86_64_elf_howto_table[r_type]);
2154 /* Fall through. */
2155
2156 case R_X86_64_PC8:
2157 case R_X86_64_PC16:
2158 case R_X86_64_PC32:
2159 case R_X86_64_PC32_BND:
2160 case R_X86_64_PC64:
2161 case R_X86_64_64:
2162 pointer:
2163 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
2164 eh->zero_undefweak |= 0x2;
2165 /* We are called after all symbols have been resolved. Only
2166 relocation against STT_GNU_IFUNC symbol must go through
2167 PLT. */
2168 if (h != NULL
2169 && (bfd_link_executable (info)
2170 || h->type == STT_GNU_IFUNC))
2171 {
2172 bfd_boolean func_pointer_ref = FALSE;
2173
2174 if (r_type == R_X86_64_PC32)
2175 {
2176 /* Since something like ".long foo - ." may be used
2177 as pointer, make sure that PLT is used if foo is
2178 a function defined in a shared library. */
2179 if ((sec->flags & SEC_CODE) == 0)
2180 {
2181 h->pointer_equality_needed = 1;
2182 if (bfd_link_pie (info)
2183 && h->type == STT_FUNC
2184 && !h->def_regular
2185 && h->def_dynamic)
2186 {
2187 h->needs_plt = 1;
2188 h->plt.refcount = 1;
2189 }
2190 }
2191 }
2192 else if (r_type != R_X86_64_PC32_BND
2193 && r_type != R_X86_64_PC64)
2194 {
2195 h->pointer_equality_needed = 1;
2196 /* At run-time, R_X86_64_64 can be resolved for both
2197 x86-64 and x32. But R_X86_64_32 and R_X86_64_32S
2198 can only be resolved for x32. */
2199 if ((sec->flags & SEC_READONLY) == 0
2200 && (r_type == R_X86_64_64
2201 || (!ABI_64_P (abfd)
2202 && (r_type == R_X86_64_32
2203 || r_type == R_X86_64_32S))))
2204 func_pointer_ref = TRUE;
2205 }
2206
2207 if (!func_pointer_ref)
2208 {
2209 /* If this reloc is in a read-only section, we might
2210 need a copy reloc. We can't check reliably at this
2211 stage whether the section is read-only, as input
2212 sections have not yet been mapped to output sections.
2213 Tentatively set the flag for now, and correct in
2214 adjust_dynamic_symbol. */
2215 h->non_got_ref = 1;
2216
2217 /* We may need a .plt entry if the symbol is a function
2218 defined in a shared lib or is a function referenced
2219 from the code or read-only section. */
2220 if (!h->def_regular
2221 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0)
2222 h->plt.refcount = 1;
2223 }
2224 }
2225
2226 size_reloc = FALSE;
2227 do_size:
2228 if (NEED_DYNAMIC_RELOCATION_P (info, TRUE, h, sec, r_type,
2229 htab->pointer_r_type))
2230 {
2231 struct elf_dyn_relocs *p;
2232 struct elf_dyn_relocs **head;
2233
2234 /* We must copy these reloc types into the output file.
2235 Create a reloc section in dynobj and make room for
2236 this reloc. */
2237 if (sreloc == NULL)
2238 {
2239 sreloc = _bfd_elf_make_dynamic_reloc_section
2240 (sec, htab->elf.dynobj, ABI_64_P (abfd) ? 3 : 2,
2241 abfd, /*rela?*/ TRUE);
2242
2243 if (sreloc == NULL)
2244 goto error_return;
2245 }
2246
2247 /* If this is a global symbol, we count the number of
2248 relocations we need for this symbol. */
2249 if (h != NULL)
2250 head = &eh->dyn_relocs;
2251 else
2252 {
2253 /* Track dynamic relocs needed for local syms too.
2254 We really need local syms available to do this
2255 easily. Oh well. */
2256 asection *s;
2257 void **vpp;
2258
2259 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
2260 abfd, r_symndx);
2261 if (isym == NULL)
2262 goto error_return;
2263
2264 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
2265 if (s == NULL)
2266 s = sec;
2267
2268 /* Beware of type punned pointers vs strict aliasing
2269 rules. */
2270 vpp = &(elf_section_data (s)->local_dynrel);
2271 head = (struct elf_dyn_relocs **)vpp;
2272 }
2273
2274 p = *head;
2275 if (p == NULL || p->sec != sec)
2276 {
2277 bfd_size_type amt = sizeof *p;
2278
2279 p = ((struct elf_dyn_relocs *)
2280 bfd_alloc (htab->elf.dynobj, amt));
2281 if (p == NULL)
2282 goto error_return;
2283 p->next = *head;
2284 *head = p;
2285 p->sec = sec;
2286 p->count = 0;
2287 p->pc_count = 0;
2288 }
2289
2290 p->count += 1;
2291 /* Count size relocation as PC-relative relocation. */
2292 if (X86_PCREL_TYPE_P (r_type) || size_reloc)
2293 p->pc_count += 1;
2294 }
2295 break;
2296
2297 /* This relocation describes the C++ object vtable hierarchy.
2298 Reconstruct it for later use during GC. */
2299 case R_X86_64_GNU_VTINHERIT:
2300 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2301 goto error_return;
2302 break;
2303
2304 /* This relocation describes which C++ vtable entries are actually
2305 used. Record for later use during GC. */
2306 case R_X86_64_GNU_VTENTRY:
2307 BFD_ASSERT (h != NULL);
2308 if (h != NULL
2309 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2310 goto error_return;
2311 break;
2312
2313 default:
2314 break;
2315 }
2316 }
2317
2318 if (elf_section_data (sec)->this_hdr.contents != contents)
2319 {
2320 if (!converted && !info->keep_memory)
2321 free (contents);
2322 else
2323 {
2324 /* Cache the section contents for elf_link_input_bfd if any
2325 load is converted or --no-keep-memory isn't used. */
2326 elf_section_data (sec)->this_hdr.contents = contents;
2327 }
2328 }
2329
2330 /* Cache relocations if any load is converted. */
2331 if (elf_section_data (sec)->relocs != relocs && converted)
2332 elf_section_data (sec)->relocs = (Elf_Internal_Rela *) relocs;
2333
2334 return TRUE;
2335
2336 error_return:
2337 if (elf_section_data (sec)->this_hdr.contents != contents)
2338 free (contents);
2339 sec->check_relocs_failed = 1;
2340 return FALSE;
2341 }
2342
2343 /* Return the relocation value for @tpoff relocation
2344 if STT_TLS virtual address is ADDRESS. */
2345
2346 static bfd_vma
2347 elf_x86_64_tpoff (struct bfd_link_info *info, bfd_vma address)
2348 {
2349 struct elf_link_hash_table *htab = elf_hash_table (info);
2350 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2351 bfd_vma static_tls_size;
2352
2353 /* If tls_segment is NULL, we should have signalled an error already. */
2354 if (htab->tls_sec == NULL)
2355 return 0;
2356
2357 /* Consider special static TLS alignment requirements. */
2358 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2359 return address - static_tls_size - htab->tls_sec->vma;
2360 }
2361
2362 /* Relocate an x86_64 ELF section. */
2363
2364 static bfd_boolean
2365 elf_x86_64_relocate_section (bfd *output_bfd,
2366 struct bfd_link_info *info,
2367 bfd *input_bfd,
2368 asection *input_section,
2369 bfd_byte *contents,
2370 Elf_Internal_Rela *relocs,
2371 Elf_Internal_Sym *local_syms,
2372 asection **local_sections)
2373 {
2374 struct elf_x86_link_hash_table *htab;
2375 Elf_Internal_Shdr *symtab_hdr;
2376 struct elf_link_hash_entry **sym_hashes;
2377 bfd_vma *local_got_offsets;
2378 bfd_vma *local_tlsdesc_gotents;
2379 Elf_Internal_Rela *rel;
2380 Elf_Internal_Rela *wrel;
2381 Elf_Internal_Rela *relend;
2382 unsigned int plt_entry_size;
2383
2384 /* Skip if check_relocs failed. */
2385 if (input_section->check_relocs_failed)
2386 return FALSE;
2387
2388 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
2389 if (htab == NULL)
2390 return FALSE;
2391
2392 if (!is_x86_elf (input_bfd, htab))
2393 {
2394 bfd_set_error (bfd_error_wrong_format);
2395 return FALSE;
2396 }
2397
2398 plt_entry_size = htab->plt.plt_entry_size;
2399 symtab_hdr = &elf_symtab_hdr (input_bfd);
2400 sym_hashes = elf_sym_hashes (input_bfd);
2401 local_got_offsets = elf_local_got_offsets (input_bfd);
2402 local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
2403
2404 _bfd_x86_elf_set_tls_module_base (info);
2405
2406 rel = wrel = relocs;
2407 relend = relocs + input_section->reloc_count;
2408 for (; rel < relend; wrel++, rel++)
2409 {
2410 unsigned int r_type, r_type_tls;
2411 reloc_howto_type *howto;
2412 unsigned long r_symndx;
2413 struct elf_link_hash_entry *h;
2414 struct elf_x86_link_hash_entry *eh;
2415 Elf_Internal_Sym *sym;
2416 asection *sec;
2417 bfd_vma off, offplt, plt_offset;
2418 bfd_vma relocation;
2419 bfd_boolean unresolved_reloc;
2420 bfd_reloc_status_type r;
2421 int tls_type;
2422 asection *base_got, *resolved_plt;
2423 bfd_vma st_size;
2424 bfd_boolean resolved_to_zero;
2425 bfd_boolean relative_reloc;
2426 bfd_boolean converted_reloc;
2427 bfd_boolean need_copy_reloc_in_pie;
2428
2429 r_type = ELF32_R_TYPE (rel->r_info);
2430 if (r_type == (int) R_X86_64_GNU_VTINHERIT
2431 || r_type == (int) R_X86_64_GNU_VTENTRY)
2432 {
2433 if (wrel != rel)
2434 *wrel = *rel;
2435 continue;
2436 }
2437
2438 r_symndx = htab->r_sym (rel->r_info);
2439 converted_reloc = (r_type & R_X86_64_converted_reloc_bit) != 0;
2440 if (converted_reloc)
2441 {
2442 r_type &= ~R_X86_64_converted_reloc_bit;
2443 rel->r_info = htab->r_info (r_symndx, r_type);
2444 }
2445
2446 if (r_type >= (int) R_X86_64_standard)
2447 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
2448
2449 if (r_type != (int) R_X86_64_32
2450 || ABI_64_P (output_bfd))
2451 howto = x86_64_elf_howto_table + r_type;
2452 else
2453 howto = (x86_64_elf_howto_table
2454 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
2455 h = NULL;
2456 sym = NULL;
2457 sec = NULL;
2458 unresolved_reloc = FALSE;
2459 if (r_symndx < symtab_hdr->sh_info)
2460 {
2461 sym = local_syms + r_symndx;
2462 sec = local_sections[r_symndx];
2463
2464 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2465 &sec, rel);
2466 st_size = sym->st_size;
2467
2468 /* Relocate against local STT_GNU_IFUNC symbol. */
2469 if (!bfd_link_relocatable (info)
2470 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2471 {
2472 h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd,
2473 rel, FALSE);
2474 if (h == NULL)
2475 abort ();
2476
2477 /* Set STT_GNU_IFUNC symbol value. */
2478 h->root.u.def.value = sym->st_value;
2479 h->root.u.def.section = sec;
2480 }
2481 }
2482 else
2483 {
2484 bfd_boolean warned ATTRIBUTE_UNUSED;
2485 bfd_boolean ignored ATTRIBUTE_UNUSED;
2486
2487 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2488 r_symndx, symtab_hdr, sym_hashes,
2489 h, sec, relocation,
2490 unresolved_reloc, warned, ignored);
2491 st_size = h->size;
2492 }
2493
2494 if (sec != NULL && discarded_section (sec))
2495 {
2496 _bfd_clear_contents (howto, input_bfd, input_section,
2497 contents, rel->r_offset);
2498 wrel->r_offset = rel->r_offset;
2499 wrel->r_info = 0;
2500 wrel->r_addend = 0;
2501
2502 /* For ld -r, remove relocations in debug sections against
2503 sections defined in discarded sections. Not done for
2504 eh_frame editing code expects to be present. */
2505 if (bfd_link_relocatable (info)
2506 && (input_section->flags & SEC_DEBUGGING))
2507 wrel--;
2508
2509 continue;
2510 }
2511
2512 if (bfd_link_relocatable (info))
2513 {
2514 if (wrel != rel)
2515 *wrel = *rel;
2516 continue;
2517 }
2518
2519 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
2520 {
2521 if (r_type == R_X86_64_64)
2522 {
2523 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
2524 zero-extend it to 64bit if addend is zero. */
2525 r_type = R_X86_64_32;
2526 memset (contents + rel->r_offset + 4, 0, 4);
2527 }
2528 else if (r_type == R_X86_64_SIZE64)
2529 {
2530 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
2531 zero-extend it to 64bit if addend is zero. */
2532 r_type = R_X86_64_SIZE32;
2533 memset (contents + rel->r_offset + 4, 0, 4);
2534 }
2535 }
2536
2537 eh = (struct elf_x86_link_hash_entry *) h;
2538
2539 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2540 it here if it is defined in a non-shared object. */
2541 if (h != NULL
2542 && h->type == STT_GNU_IFUNC
2543 && h->def_regular)
2544 {
2545 bfd_vma plt_index;
2546 const char *name;
2547
2548 if ((input_section->flags & SEC_ALLOC) == 0)
2549 {
2550 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2551 STT_GNU_IFUNC symbol as STT_FUNC. */
2552 if (elf_section_type (input_section) == SHT_NOTE)
2553 goto skip_ifunc;
2554 /* Dynamic relocs are not propagated for SEC_DEBUGGING
2555 sections because such sections are not SEC_ALLOC and
2556 thus ld.so will not process them. */
2557 if ((input_section->flags & SEC_DEBUGGING) != 0)
2558 continue;
2559 abort ();
2560 }
2561
2562 switch (r_type)
2563 {
2564 default:
2565 break;
2566
2567 case R_X86_64_GOTPCREL:
2568 case R_X86_64_GOTPCRELX:
2569 case R_X86_64_REX_GOTPCRELX:
2570 case R_X86_64_GOTPCREL64:
2571 base_got = htab->elf.sgot;
2572 off = h->got.offset;
2573
2574 if (base_got == NULL)
2575 abort ();
2576
2577 if (off == (bfd_vma) -1)
2578 {
2579 /* We can't use h->got.offset here to save state, or
2580 even just remember the offset, as finish_dynamic_symbol
2581 would use that as offset into .got. */
2582
2583 if (h->plt.offset == (bfd_vma) -1)
2584 abort ();
2585
2586 if (htab->elf.splt != NULL)
2587 {
2588 plt_index = (h->plt.offset / plt_entry_size
2589 - htab->plt.has_plt0);
2590 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2591 base_got = htab->elf.sgotplt;
2592 }
2593 else
2594 {
2595 plt_index = h->plt.offset / plt_entry_size;
2596 off = plt_index * GOT_ENTRY_SIZE;
2597 base_got = htab->elf.igotplt;
2598 }
2599
2600 if (h->dynindx == -1
2601 || h->forced_local
2602 || info->symbolic)
2603 {
2604 /* This references the local defitionion. We must
2605 initialize this entry in the global offset table.
2606 Since the offset must always be a multiple of 8,
2607 we use the least significant bit to record
2608 whether we have initialized it already.
2609
2610 When doing a dynamic link, we create a .rela.got
2611 relocation entry to initialize the value. This
2612 is done in the finish_dynamic_symbol routine. */
2613 if ((off & 1) != 0)
2614 off &= ~1;
2615 else
2616 {
2617 bfd_put_64 (output_bfd, relocation,
2618 base_got->contents + off);
2619 /* Note that this is harmless for the GOTPLT64
2620 case, as -1 | 1 still is -1. */
2621 h->got.offset |= 1;
2622 }
2623 }
2624 }
2625
2626 relocation = (base_got->output_section->vma
2627 + base_got->output_offset + off);
2628
2629 goto do_relocation;
2630 }
2631
2632 if (h->plt.offset == (bfd_vma) -1)
2633 {
2634 /* Handle static pointers of STT_GNU_IFUNC symbols. */
2635 if (r_type == htab->pointer_r_type
2636 && (input_section->flags & SEC_CODE) == 0)
2637 goto do_ifunc_pointer;
2638 goto bad_ifunc_reloc;
2639 }
2640
2641 /* STT_GNU_IFUNC symbol must go through PLT. */
2642 if (htab->elf.splt != NULL)
2643 {
2644 if (htab->plt_second != NULL)
2645 {
2646 resolved_plt = htab->plt_second;
2647 plt_offset = eh->plt_second.offset;
2648 }
2649 else
2650 {
2651 resolved_plt = htab->elf.splt;
2652 plt_offset = h->plt.offset;
2653 }
2654 }
2655 else
2656 {
2657 resolved_plt = htab->elf.iplt;
2658 plt_offset = h->plt.offset;
2659 }
2660
2661 relocation = (resolved_plt->output_section->vma
2662 + resolved_plt->output_offset + plt_offset);
2663
2664 switch (r_type)
2665 {
2666 default:
2667 bad_ifunc_reloc:
2668 if (h->root.root.string)
2669 name = h->root.root.string;
2670 else
2671 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2672 NULL);
2673 _bfd_error_handler
2674 /* xgettext:c-format */
2675 (_("%pB: relocation %s against STT_GNU_IFUNC "
2676 "symbol `%s' isn't supported"), input_bfd,
2677 howto->name, name);
2678 bfd_set_error (bfd_error_bad_value);
2679 return FALSE;
2680
2681 case R_X86_64_32S:
2682 if (bfd_link_pic (info))
2683 abort ();
2684 goto do_relocation;
2685
2686 case R_X86_64_32:
2687 if (ABI_64_P (output_bfd))
2688 goto do_relocation;
2689 /* FALLTHROUGH */
2690 case R_X86_64_64:
2691 do_ifunc_pointer:
2692 if (rel->r_addend != 0)
2693 {
2694 if (h->root.root.string)
2695 name = h->root.root.string;
2696 else
2697 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
2698 sym, NULL);
2699 _bfd_error_handler
2700 /* xgettext:c-format */
2701 (_("%pB: relocation %s against STT_GNU_IFUNC "
2702 "symbol `%s' has non-zero addend: %" PRId64),
2703 input_bfd, howto->name, name, (int64_t) rel->r_addend);
2704 bfd_set_error (bfd_error_bad_value);
2705 return FALSE;
2706 }
2707
2708 /* Generate dynamic relcoation only when there is a
2709 non-GOT reference in a shared object or there is no
2710 PLT. */
2711 if ((bfd_link_pic (info) && h->non_got_ref)
2712 || h->plt.offset == (bfd_vma) -1)
2713 {
2714 Elf_Internal_Rela outrel;
2715 asection *sreloc;
2716
2717 /* Need a dynamic relocation to get the real function
2718 address. */
2719 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2720 info,
2721 input_section,
2722 rel->r_offset);
2723 if (outrel.r_offset == (bfd_vma) -1
2724 || outrel.r_offset == (bfd_vma) -2)
2725 abort ();
2726
2727 outrel.r_offset += (input_section->output_section->vma
2728 + input_section->output_offset);
2729
2730 if (POINTER_LOCAL_IFUNC_P (info, h))
2731 {
2732 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
2733 h->root.root.string,
2734 h->root.u.def.section->owner);
2735
2736 /* This symbol is resolved locally. */
2737 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
2738 outrel.r_addend = (h->root.u.def.value
2739 + h->root.u.def.section->output_section->vma
2740 + h->root.u.def.section->output_offset);
2741 }
2742 else
2743 {
2744 outrel.r_info = htab->r_info (h->dynindx, r_type);
2745 outrel.r_addend = 0;
2746 }
2747
2748 /* Dynamic relocations are stored in
2749 1. .rela.ifunc section in PIC object.
2750 2. .rela.got section in dynamic executable.
2751 3. .rela.iplt section in static executable. */
2752 if (bfd_link_pic (info))
2753 sreloc = htab->elf.irelifunc;
2754 else if (htab->elf.splt != NULL)
2755 sreloc = htab->elf.srelgot;
2756 else
2757 sreloc = htab->elf.irelplt;
2758 elf_append_rela (output_bfd, sreloc, &outrel);
2759
2760 /* If this reloc is against an external symbol, we
2761 do not want to fiddle with the addend. Otherwise,
2762 we need to include the symbol value so that it
2763 becomes an addend for the dynamic reloc. For an
2764 internal symbol, we have updated addend. */
2765 continue;
2766 }
2767 /* FALLTHROUGH */
2768 case R_X86_64_PC32:
2769 case R_X86_64_PC32_BND:
2770 case R_X86_64_PC64:
2771 case R_X86_64_PLT32:
2772 case R_X86_64_PLT32_BND:
2773 goto do_relocation;
2774 }
2775 }
2776
2777 skip_ifunc:
2778 resolved_to_zero = (eh != NULL
2779 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
2780
2781 /* When generating a shared object, the relocations handled here are
2782 copied into the output file to be resolved at run time. */
2783 switch (r_type)
2784 {
2785 case R_X86_64_GOT32:
2786 case R_X86_64_GOT64:
2787 /* Relocation is to the entry for this symbol in the global
2788 offset table. */
2789 case R_X86_64_GOTPCREL:
2790 case R_X86_64_GOTPCRELX:
2791 case R_X86_64_REX_GOTPCRELX:
2792 case R_X86_64_GOTPCREL64:
2793 /* Use global offset table entry as symbol value. */
2794 case R_X86_64_GOTPLT64:
2795 /* This is obsolete and treated the same as GOT64. */
2796 base_got = htab->elf.sgot;
2797
2798 if (htab->elf.sgot == NULL)
2799 abort ();
2800
2801 relative_reloc = FALSE;
2802 if (h != NULL)
2803 {
2804 off = h->got.offset;
2805 if (h->needs_plt
2806 && h->plt.offset != (bfd_vma)-1
2807 && off == (bfd_vma)-1)
2808 {
2809 /* We can't use h->got.offset here to save
2810 state, or even just remember the offset, as
2811 finish_dynamic_symbol would use that as offset into
2812 .got. */
2813 bfd_vma plt_index = (h->plt.offset / plt_entry_size
2814 - htab->plt.has_plt0);
2815 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2816 base_got = htab->elf.sgotplt;
2817 }
2818
2819 if (RESOLVED_LOCALLY_P (info, h, htab))
2820 {
2821 /* We must initialize this entry in the global offset
2822 table. Since the offset must always be a multiple
2823 of 8, we use the least significant bit to record
2824 whether we have initialized it already.
2825
2826 When doing a dynamic link, we create a .rela.got
2827 relocation entry to initialize the value. This is
2828 done in the finish_dynamic_symbol routine. */
2829 if ((off & 1) != 0)
2830 off &= ~1;
2831 else
2832 {
2833 bfd_put_64 (output_bfd, relocation,
2834 base_got->contents + off);
2835 /* Note that this is harmless for the GOTPLT64 case,
2836 as -1 | 1 still is -1. */
2837 h->got.offset |= 1;
2838
2839 if (GENERATE_RELATIVE_RELOC_P (info, h))
2840 {
2841 /* If this symbol isn't dynamic in PIC,
2842 generate R_X86_64_RELATIVE here. */
2843 eh->no_finish_dynamic_symbol = 1;
2844 relative_reloc = TRUE;
2845 }
2846 }
2847 }
2848 else
2849 unresolved_reloc = FALSE;
2850 }
2851 else
2852 {
2853 if (local_got_offsets == NULL)
2854 abort ();
2855
2856 off = local_got_offsets[r_symndx];
2857
2858 /* The offset must always be a multiple of 8. We use
2859 the least significant bit to record whether we have
2860 already generated the necessary reloc. */
2861 if ((off & 1) != 0)
2862 off &= ~1;
2863 else
2864 {
2865 bfd_put_64 (output_bfd, relocation,
2866 base_got->contents + off);
2867 local_got_offsets[r_symndx] |= 1;
2868
2869 if (bfd_link_pic (info))
2870 relative_reloc = TRUE;
2871 }
2872 }
2873
2874 if (relative_reloc)
2875 {
2876 asection *s;
2877 Elf_Internal_Rela outrel;
2878
2879 /* We need to generate a R_X86_64_RELATIVE reloc
2880 for the dynamic linker. */
2881 s = htab->elf.srelgot;
2882 if (s == NULL)
2883 abort ();
2884
2885 outrel.r_offset = (base_got->output_section->vma
2886 + base_got->output_offset
2887 + off);
2888 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
2889 outrel.r_addend = relocation;
2890 elf_append_rela (output_bfd, s, &outrel);
2891 }
2892
2893 if (off >= (bfd_vma) -2)
2894 abort ();
2895
2896 relocation = base_got->output_section->vma
2897 + base_got->output_offset + off;
2898 if (r_type != R_X86_64_GOTPCREL
2899 && r_type != R_X86_64_GOTPCRELX
2900 && r_type != R_X86_64_REX_GOTPCRELX
2901 && r_type != R_X86_64_GOTPCREL64)
2902 relocation -= htab->elf.sgotplt->output_section->vma
2903 - htab->elf.sgotplt->output_offset;
2904
2905 break;
2906
2907 case R_X86_64_GOTOFF64:
2908 /* Relocation is relative to the start of the global offset
2909 table. */
2910
2911 /* Check to make sure it isn't a protected function or data
2912 symbol for shared library since it may not be local when
2913 used as function address or with copy relocation. We also
2914 need to make sure that a symbol is referenced locally. */
2915 if (bfd_link_pic (info) && h)
2916 {
2917 if (!h->def_regular)
2918 {
2919 const char *v;
2920
2921 switch (ELF_ST_VISIBILITY (h->other))
2922 {
2923 case STV_HIDDEN:
2924 v = _("hidden symbol");
2925 break;
2926 case STV_INTERNAL:
2927 v = _("internal symbol");
2928 break;
2929 case STV_PROTECTED:
2930 v = _("protected symbol");
2931 break;
2932 default:
2933 v = _("symbol");
2934 break;
2935 }
2936
2937 _bfd_error_handler
2938 /* xgettext:c-format */
2939 (_("%pB: relocation R_X86_64_GOTOFF64 against undefined %s"
2940 " `%s' can not be used when making a shared object"),
2941 input_bfd, v, h->root.root.string);
2942 bfd_set_error (bfd_error_bad_value);
2943 return FALSE;
2944 }
2945 else if (!bfd_link_executable (info)
2946 && !SYMBOL_REFERENCES_LOCAL_P (info, h)
2947 && (h->type == STT_FUNC
2948 || h->type == STT_OBJECT)
2949 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2950 {
2951 _bfd_error_handler
2952 /* xgettext:c-format */
2953 (_("%pB: relocation R_X86_64_GOTOFF64 against protected %s"
2954 " `%s' can not be used when making a shared object"),
2955 input_bfd,
2956 h->type == STT_FUNC ? "function" : "data",
2957 h->root.root.string);
2958 bfd_set_error (bfd_error_bad_value);
2959 return FALSE;
2960 }
2961 }
2962
2963 /* Note that sgot is not involved in this
2964 calculation. We always want the start of .got.plt. If we
2965 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2966 permitted by the ABI, we might have to change this
2967 calculation. */
2968 relocation -= htab->elf.sgotplt->output_section->vma
2969 + htab->elf.sgotplt->output_offset;
2970 break;
2971
2972 case R_X86_64_GOTPC32:
2973 case R_X86_64_GOTPC64:
2974 /* Use global offset table as symbol value. */
2975 relocation = htab->elf.sgotplt->output_section->vma
2976 + htab->elf.sgotplt->output_offset;
2977 unresolved_reloc = FALSE;
2978 break;
2979
2980 case R_X86_64_PLTOFF64:
2981 /* Relocation is PLT entry relative to GOT. For local
2982 symbols it's the symbol itself relative to GOT. */
2983 if (h != NULL
2984 /* See PLT32 handling. */
2985 && (h->plt.offset != (bfd_vma) -1
2986 || eh->plt_got.offset != (bfd_vma) -1)
2987 && htab->elf.splt != NULL)
2988 {
2989 if (eh->plt_got.offset != (bfd_vma) -1)
2990 {
2991 /* Use the GOT PLT. */
2992 resolved_plt = htab->plt_got;
2993 plt_offset = eh->plt_got.offset;
2994 }
2995 else if (htab->plt_second != NULL)
2996 {
2997 resolved_plt = htab->plt_second;
2998 plt_offset = eh->plt_second.offset;
2999 }
3000 else
3001 {
3002 resolved_plt = htab->elf.splt;
3003 plt_offset = h->plt.offset;
3004 }
3005
3006 relocation = (resolved_plt->output_section->vma
3007 + resolved_plt->output_offset
3008 + plt_offset);
3009 unresolved_reloc = FALSE;
3010 }
3011
3012 relocation -= htab->elf.sgotplt->output_section->vma
3013 + htab->elf.sgotplt->output_offset;
3014 break;
3015
3016 case R_X86_64_PLT32:
3017 case R_X86_64_PLT32_BND:
3018 /* Relocation is to the entry for this symbol in the
3019 procedure linkage table. */
3020
3021 /* Resolve a PLT32 reloc against a local symbol directly,
3022 without using the procedure linkage table. */
3023 if (h == NULL)
3024 break;
3025
3026 if ((h->plt.offset == (bfd_vma) -1
3027 && eh->plt_got.offset == (bfd_vma) -1)
3028 || htab->elf.splt == NULL)
3029 {
3030 /* We didn't make a PLT entry for this symbol. This
3031 happens when statically linking PIC code, or when
3032 using -Bsymbolic. */
3033 break;
3034 }
3035
3036 use_plt:
3037 if (h->plt.offset != (bfd_vma) -1)
3038 {
3039 if (htab->plt_second != NULL)
3040 {
3041 resolved_plt = htab->plt_second;
3042 plt_offset = eh->plt_second.offset;
3043 }
3044 else
3045 {
3046 resolved_plt = htab->elf.splt;
3047 plt_offset = h->plt.offset;
3048 }
3049 }
3050 else
3051 {
3052 /* Use the GOT PLT. */
3053 resolved_plt = htab->plt_got;
3054 plt_offset = eh->plt_got.offset;
3055 }
3056
3057 relocation = (resolved_plt->output_section->vma
3058 + resolved_plt->output_offset
3059 + plt_offset);
3060 unresolved_reloc = FALSE;
3061 break;
3062
3063 case R_X86_64_SIZE32:
3064 case R_X86_64_SIZE64:
3065 /* Set to symbol size. */
3066 relocation = st_size;
3067 goto direct;
3068
3069 case R_X86_64_PC8:
3070 case R_X86_64_PC16:
3071 case R_X86_64_PC32:
3072 case R_X86_64_PC32_BND:
3073 /* Don't complain about -fPIC if the symbol is undefined when
3074 building executable unless it is unresolved weak symbol,
3075 references a dynamic definition in PIE or -z nocopyreloc
3076 is used. */
3077 if ((input_section->flags & SEC_ALLOC) != 0
3078 && (input_section->flags & SEC_READONLY) != 0
3079 && h != NULL
3080 && ((bfd_link_executable (info)
3081 && ((h->root.type == bfd_link_hash_undefweak
3082 && !resolved_to_zero)
3083 || (bfd_link_pie (info)
3084 && !h->def_regular
3085 && h->def_dynamic)
3086 || ((info->nocopyreloc
3087 || (eh->def_protected
3088 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3089 && h->def_dynamic
3090 && !(h->root.u.def.section->flags & SEC_CODE))))
3091 || bfd_link_dll (info)))
3092 {
3093 bfd_boolean fail = FALSE;
3094 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
3095 {
3096 /* Symbol is referenced locally. Make sure it is
3097 defined locally. */
3098 fail = !(h->def_regular || ELF_COMMON_DEF_P (h));
3099 }
3100 else if (!(bfd_link_pie (info)
3101 && (h->needs_copy || eh->needs_copy)))
3102 {
3103 /* Symbol doesn't need copy reloc and isn't referenced
3104 locally. Address of protected function may not be
3105 reachable at run-time. */
3106 fail = (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3107 || (ELF_ST_VISIBILITY (h->other) == STV_PROTECTED
3108 && h->type == STT_FUNC));
3109 }
3110
3111 if (fail)
3112 return elf_x86_64_need_pic (info, input_bfd, input_section,
3113 h, NULL, NULL, howto);
3114 }
3115 /* Since x86-64 has PC-relative PLT, we can use PLT in PIE
3116 as function address. */
3117 else if (h != NULL
3118 && (input_section->flags & SEC_CODE) == 0
3119 && bfd_link_pie (info)
3120 && h->type == STT_FUNC
3121 && !h->def_regular
3122 && h->def_dynamic)
3123 goto use_plt;
3124 /* Fall through. */
3125
3126 case R_X86_64_8:
3127 case R_X86_64_16:
3128 case R_X86_64_32:
3129 case R_X86_64_PC64:
3130 case R_X86_64_64:
3131 /* FIXME: The ABI says the linker should make sure the value is
3132 the same when it's zeroextended to 64 bit. */
3133
3134 direct:
3135 if ((input_section->flags & SEC_ALLOC) == 0)
3136 break;
3137
3138 need_copy_reloc_in_pie = (bfd_link_pie (info)
3139 && h != NULL
3140 && (h->needs_copy
3141 || eh->needs_copy
3142 || (h->root.type
3143 == bfd_link_hash_undefined))
3144 && (X86_PCREL_TYPE_P (r_type)
3145 || X86_SIZE_TYPE_P (r_type)));
3146
3147 if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
3148 need_copy_reloc_in_pie,
3149 resolved_to_zero, FALSE))
3150 {
3151 Elf_Internal_Rela outrel;
3152 bfd_boolean skip, relocate;
3153 asection *sreloc;
3154
3155 /* When generating a shared object, these relocations
3156 are copied into the output file to be resolved at run
3157 time. */
3158 skip = FALSE;
3159 relocate = FALSE;
3160
3161 outrel.r_offset =
3162 _bfd_elf_section_offset (output_bfd, info, input_section,
3163 rel->r_offset);
3164 if (outrel.r_offset == (bfd_vma) -1)
3165 skip = TRUE;
3166 else if (outrel.r_offset == (bfd_vma) -2)
3167 skip = TRUE, relocate = TRUE;
3168
3169 outrel.r_offset += (input_section->output_section->vma
3170 + input_section->output_offset);
3171
3172 if (skip)
3173 memset (&outrel, 0, sizeof outrel);
3174
3175 else if (COPY_INPUT_RELOC_P (info, h, r_type))
3176 {
3177 outrel.r_info = htab->r_info (h->dynindx, r_type);
3178 outrel.r_addend = rel->r_addend;
3179 }
3180 else
3181 {
3182 /* This symbol is local, or marked to become local.
3183 When relocation overflow check is disabled, we
3184 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
3185 if (r_type == htab->pointer_r_type
3186 || (r_type == R_X86_64_32
3187 && info->no_reloc_overflow_check))
3188 {
3189 relocate = TRUE;
3190 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
3191 outrel.r_addend = relocation + rel->r_addend;
3192 }
3193 else if (r_type == R_X86_64_64
3194 && !ABI_64_P (output_bfd))
3195 {
3196 relocate = TRUE;
3197 outrel.r_info = htab->r_info (0,
3198 R_X86_64_RELATIVE64);
3199 outrel.r_addend = relocation + rel->r_addend;
3200 /* Check addend overflow. */
3201 if ((outrel.r_addend & 0x80000000)
3202 != (rel->r_addend & 0x80000000))
3203 {
3204 const char *name;
3205 int addend = rel->r_addend;
3206 if (h && h->root.root.string)
3207 name = h->root.root.string;
3208 else
3209 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
3210 sym, NULL);
3211 _bfd_error_handler
3212 /* xgettext:c-format */
3213 (_("%pB: addend %s%#x in relocation %s against "
3214 "symbol `%s' at %#" PRIx64
3215 " in section `%pA' is out of range"),
3216 input_bfd, addend < 0 ? "-" : "", addend,
3217 howto->name, name, (uint64_t) rel->r_offset,
3218 input_section);
3219 bfd_set_error (bfd_error_bad_value);
3220 return FALSE;
3221 }
3222 }
3223 else
3224 {
3225 long sindx;
3226
3227 if (bfd_is_abs_section (sec))
3228 sindx = 0;
3229 else if (sec == NULL || sec->owner == NULL)
3230 {
3231 bfd_set_error (bfd_error_bad_value);
3232 return FALSE;
3233 }
3234 else
3235 {
3236 asection *osec;
3237
3238 /* We are turning this relocation into one
3239 against a section symbol. It would be
3240 proper to subtract the symbol's value,
3241 osec->vma, from the emitted reloc addend,
3242 but ld.so expects buggy relocs. */
3243 osec = sec->output_section;
3244 sindx = elf_section_data (osec)->dynindx;
3245 if (sindx == 0)
3246 {
3247 asection *oi = htab->elf.text_index_section;
3248 sindx = elf_section_data (oi)->dynindx;
3249 }
3250 BFD_ASSERT (sindx != 0);
3251 }
3252
3253 outrel.r_info = htab->r_info (sindx, r_type);
3254 outrel.r_addend = relocation + rel->r_addend;
3255 }
3256 }
3257
3258 sreloc = elf_section_data (input_section)->sreloc;
3259
3260 if (sreloc == NULL || sreloc->contents == NULL)
3261 {
3262 r = bfd_reloc_notsupported;
3263 goto check_relocation_error;
3264 }
3265
3266 elf_append_rela (output_bfd, sreloc, &outrel);
3267
3268 /* If this reloc is against an external symbol, we do
3269 not want to fiddle with the addend. Otherwise, we
3270 need to include the symbol value so that it becomes
3271 an addend for the dynamic reloc. */
3272 if (! relocate)
3273 continue;
3274 }
3275
3276 break;
3277
3278 case R_X86_64_TLSGD:
3279 case R_X86_64_GOTPC32_TLSDESC:
3280 case R_X86_64_TLSDESC_CALL:
3281 case R_X86_64_GOTTPOFF:
3282 tls_type = GOT_UNKNOWN;
3283 if (h == NULL && local_got_offsets)
3284 tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
3285 else if (h != NULL)
3286 tls_type = elf_x86_hash_entry (h)->tls_type;
3287
3288 r_type_tls = r_type;
3289 if (! elf_x86_64_tls_transition (info, input_bfd,
3290 input_section, contents,
3291 symtab_hdr, sym_hashes,
3292 &r_type_tls, tls_type, rel,
3293 relend, h, r_symndx, TRUE))
3294 return FALSE;
3295
3296 if (r_type_tls == R_X86_64_TPOFF32)
3297 {
3298 bfd_vma roff = rel->r_offset;
3299
3300 BFD_ASSERT (! unresolved_reloc);
3301
3302 if (r_type == R_X86_64_TLSGD)
3303 {
3304 /* GD->LE transition. For 64bit, change
3305 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3306 .word 0x6666; rex64; call __tls_get_addr@PLT
3307 or
3308 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3309 .byte 0x66; rex64
3310 call *__tls_get_addr@GOTPCREL(%rip)
3311 which may be converted to
3312 addr32 call __tls_get_addr
3313 into:
3314 movq %fs:0, %rax
3315 leaq foo@tpoff(%rax), %rax
3316 For 32bit, change
3317 leaq foo@tlsgd(%rip), %rdi
3318 .word 0x6666; rex64; call __tls_get_addr@PLT
3319 or
3320 leaq foo@tlsgd(%rip), %rdi
3321 .byte 0x66; rex64
3322 call *__tls_get_addr@GOTPCREL(%rip)
3323 which may be converted to
3324 addr32 call __tls_get_addr
3325 into:
3326 movl %fs:0, %eax
3327 leaq foo@tpoff(%rax), %rax
3328 For largepic, change:
3329 leaq foo@tlsgd(%rip), %rdi
3330 movabsq $__tls_get_addr@pltoff, %rax
3331 addq %r15, %rax
3332 call *%rax
3333 into:
3334 movq %fs:0, %rax
3335 leaq foo@tpoff(%rax), %rax
3336 nopw 0x0(%rax,%rax,1) */
3337 int largepic = 0;
3338 if (ABI_64_P (output_bfd))
3339 {
3340 if (contents[roff + 5] == 0xb8)
3341 {
3342 memcpy (contents + roff - 3,
3343 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
3344 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3345 largepic = 1;
3346 }
3347 else
3348 memcpy (contents + roff - 4,
3349 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3350 16);
3351 }
3352 else
3353 memcpy (contents + roff - 3,
3354 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3355 15);
3356 bfd_put_32 (output_bfd,
3357 elf_x86_64_tpoff (info, relocation),
3358 contents + roff + 8 + largepic);
3359 /* Skip R_X86_64_PC32, R_X86_64_PLT32,
3360 R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64. */
3361 rel++;
3362 wrel++;
3363 continue;
3364 }
3365 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3366 {
3367 /* GDesc -> LE transition.
3368 It's originally something like:
3369 leaq x@tlsdesc(%rip), %rax
3370
3371 Change it to:
3372 movl $x@tpoff, %rax. */
3373
3374 unsigned int val, type;
3375
3376 type = bfd_get_8 (input_bfd, contents + roff - 3);
3377 val = bfd_get_8 (input_bfd, contents + roff - 1);
3378 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3379 contents + roff - 3);
3380 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3381 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3382 contents + roff - 1);
3383 bfd_put_32 (output_bfd,
3384 elf_x86_64_tpoff (info, relocation),
3385 contents + roff);
3386 continue;
3387 }
3388 else if (r_type == R_X86_64_TLSDESC_CALL)
3389 {
3390 /* GDesc -> LE transition.
3391 It's originally:
3392 call *(%rax)
3393 Turn it into:
3394 xchg %ax,%ax. */
3395 bfd_put_8 (output_bfd, 0x66, contents + roff);
3396 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3397 continue;
3398 }
3399 else if (r_type == R_X86_64_GOTTPOFF)
3400 {
3401 /* IE->LE transition:
3402 For 64bit, originally it can be one of:
3403 movq foo@gottpoff(%rip), %reg
3404 addq foo@gottpoff(%rip), %reg
3405 We change it into:
3406 movq $foo, %reg
3407 leaq foo(%reg), %reg
3408 addq $foo, %reg.
3409 For 32bit, originally it can be one of:
3410 movq foo@gottpoff(%rip), %reg
3411 addl foo@gottpoff(%rip), %reg
3412 We change it into:
3413 movq $foo, %reg
3414 leal foo(%reg), %reg
3415 addl $foo, %reg. */
3416
3417 unsigned int val, type, reg;
3418
3419 if (roff >= 3)
3420 val = bfd_get_8 (input_bfd, contents + roff - 3);
3421 else
3422 val = 0;
3423 type = bfd_get_8 (input_bfd, contents + roff - 2);
3424 reg = bfd_get_8 (input_bfd, contents + roff - 1);
3425 reg >>= 3;
3426 if (type == 0x8b)
3427 {
3428 /* movq */
3429 if (val == 0x4c)
3430 bfd_put_8 (output_bfd, 0x49,
3431 contents + roff - 3);
3432 else if (!ABI_64_P (output_bfd) && val == 0x44)
3433 bfd_put_8 (output_bfd, 0x41,
3434 contents + roff - 3);
3435 bfd_put_8 (output_bfd, 0xc7,
3436 contents + roff - 2);
3437 bfd_put_8 (output_bfd, 0xc0 | reg,
3438 contents + roff - 1);
3439 }
3440 else if (reg == 4)
3441 {
3442 /* addq/addl -> addq/addl - addressing with %rsp/%r12
3443 is special */
3444 if (val == 0x4c)
3445 bfd_put_8 (output_bfd, 0x49,
3446 contents + roff - 3);
3447 else if (!ABI_64_P (output_bfd) && val == 0x44)
3448 bfd_put_8 (output_bfd, 0x41,
3449 contents + roff - 3);
3450 bfd_put_8 (output_bfd, 0x81,
3451 contents + roff - 2);
3452 bfd_put_8 (output_bfd, 0xc0 | reg,
3453 contents + roff - 1);
3454 }
3455 else
3456 {
3457 /* addq/addl -> leaq/leal */
3458 if (val == 0x4c)
3459 bfd_put_8 (output_bfd, 0x4d,
3460 contents + roff - 3);
3461 else if (!ABI_64_P (output_bfd) && val == 0x44)
3462 bfd_put_8 (output_bfd, 0x45,
3463 contents + roff - 3);
3464 bfd_put_8 (output_bfd, 0x8d,
3465 contents + roff - 2);
3466 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
3467 contents + roff - 1);
3468 }
3469 bfd_put_32 (output_bfd,
3470 elf_x86_64_tpoff (info, relocation),
3471 contents + roff);
3472 continue;
3473 }
3474 else
3475 BFD_ASSERT (FALSE);
3476 }
3477
3478 if (htab->elf.sgot == NULL)
3479 abort ();
3480
3481 if (h != NULL)
3482 {
3483 off = h->got.offset;
3484 offplt = elf_x86_hash_entry (h)->tlsdesc_got;
3485 }
3486 else
3487 {
3488 if (local_got_offsets == NULL)
3489 abort ();
3490
3491 off = local_got_offsets[r_symndx];
3492 offplt = local_tlsdesc_gotents[r_symndx];
3493 }
3494
3495 if ((off & 1) != 0)
3496 off &= ~1;
3497 else
3498 {
3499 Elf_Internal_Rela outrel;
3500 int dr_type, indx;
3501 asection *sreloc;
3502
3503 if (htab->elf.srelgot == NULL)
3504 abort ();
3505
3506 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3507
3508 if (GOT_TLS_GDESC_P (tls_type))
3509 {
3510 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
3511 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
3512 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
3513 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3514 + htab->elf.sgotplt->output_offset
3515 + offplt
3516 + htab->sgotplt_jump_table_size);
3517 sreloc = htab->elf.srelplt;
3518 if (indx == 0)
3519 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3520 else
3521 outrel.r_addend = 0;
3522 elf_append_rela (output_bfd, sreloc, &outrel);
3523 }
3524
3525 sreloc = htab->elf.srelgot;
3526
3527 outrel.r_offset = (htab->elf.sgot->output_section->vma
3528 + htab->elf.sgot->output_offset + off);
3529
3530 if (GOT_TLS_GD_P (tls_type))
3531 dr_type = R_X86_64_DTPMOD64;
3532 else if (GOT_TLS_GDESC_P (tls_type))
3533 goto dr_done;
3534 else
3535 dr_type = R_X86_64_TPOFF64;
3536
3537 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
3538 outrel.r_addend = 0;
3539 if ((dr_type == R_X86_64_TPOFF64
3540 || dr_type == R_X86_64_TLSDESC) && indx == 0)
3541 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3542 outrel.r_info = htab->r_info (indx, dr_type);
3543
3544 elf_append_rela (output_bfd, sreloc, &outrel);
3545
3546 if (GOT_TLS_GD_P (tls_type))
3547 {
3548 if (indx == 0)
3549 {
3550 BFD_ASSERT (! unresolved_reloc);
3551 bfd_put_64 (output_bfd,
3552 relocation - _bfd_x86_elf_dtpoff_base (info),
3553 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3554 }
3555 else
3556 {
3557 bfd_put_64 (output_bfd, 0,
3558 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3559 outrel.r_info = htab->r_info (indx,
3560 R_X86_64_DTPOFF64);
3561 outrel.r_offset += GOT_ENTRY_SIZE;
3562 elf_append_rela (output_bfd, sreloc,
3563 &outrel);
3564 }
3565 }
3566
3567 dr_done:
3568 if (h != NULL)
3569 h->got.offset |= 1;
3570 else
3571 local_got_offsets[r_symndx] |= 1;
3572 }
3573
3574 if (off >= (bfd_vma) -2
3575 && ! GOT_TLS_GDESC_P (tls_type))
3576 abort ();
3577 if (r_type_tls == r_type)
3578 {
3579 if (r_type == R_X86_64_GOTPC32_TLSDESC
3580 || r_type == R_X86_64_TLSDESC_CALL)
3581 relocation = htab->elf.sgotplt->output_section->vma
3582 + htab->elf.sgotplt->output_offset
3583 + offplt + htab->sgotplt_jump_table_size;
3584 else
3585 relocation = htab->elf.sgot->output_section->vma
3586 + htab->elf.sgot->output_offset + off;
3587 unresolved_reloc = FALSE;
3588 }
3589 else
3590 {
3591 bfd_vma roff = rel->r_offset;
3592
3593 if (r_type == R_X86_64_TLSGD)
3594 {
3595 /* GD->IE transition. For 64bit, change
3596 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3597 .word 0x6666; rex64; call __tls_get_addr@PLT
3598 or
3599 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3600 .byte 0x66; rex64
3601 call *__tls_get_addr@GOTPCREL(%rip
3602 which may be converted to
3603 addr32 call __tls_get_addr
3604 into:
3605 movq %fs:0, %rax
3606 addq foo@gottpoff(%rip), %rax
3607 For 32bit, change
3608 leaq foo@tlsgd(%rip), %rdi
3609 .word 0x6666; rex64; call __tls_get_addr@PLT
3610 or
3611 leaq foo@tlsgd(%rip), %rdi
3612 .byte 0x66; rex64;
3613 call *__tls_get_addr@GOTPCREL(%rip)
3614 which may be converted to
3615 addr32 call __tls_get_addr
3616 into:
3617 movl %fs:0, %eax
3618 addq foo@gottpoff(%rip), %rax
3619 For largepic, change:
3620 leaq foo@tlsgd(%rip), %rdi
3621 movabsq $__tls_get_addr@pltoff, %rax
3622 addq %r15, %rax
3623 call *%rax
3624 into:
3625 movq %fs:0, %rax
3626 addq foo@gottpoff(%rax), %rax
3627 nopw 0x0(%rax,%rax,1) */
3628 int largepic = 0;
3629 if (ABI_64_P (output_bfd))
3630 {
3631 if (contents[roff + 5] == 0xb8)
3632 {
3633 memcpy (contents + roff - 3,
3634 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
3635 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3636 largepic = 1;
3637 }
3638 else
3639 memcpy (contents + roff - 4,
3640 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3641 16);
3642 }
3643 else
3644 memcpy (contents + roff - 3,
3645 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3646 15);
3647
3648 relocation = (htab->elf.sgot->output_section->vma
3649 + htab->elf.sgot->output_offset + off
3650 - roff
3651 - largepic
3652 - input_section->output_section->vma
3653 - input_section->output_offset
3654 - 12);
3655 bfd_put_32 (output_bfd, relocation,
3656 contents + roff + 8 + largepic);
3657 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
3658 rel++;
3659 wrel++;
3660 continue;
3661 }
3662 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3663 {
3664 /* GDesc -> IE transition.
3665 It's originally something like:
3666 leaq x@tlsdesc(%rip), %rax
3667
3668 Change it to:
3669 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
3670
3671 /* Now modify the instruction as appropriate. To
3672 turn a leaq into a movq in the form we use it, it
3673 suffices to change the second byte from 0x8d to
3674 0x8b. */
3675 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3676
3677 bfd_put_32 (output_bfd,
3678 htab->elf.sgot->output_section->vma
3679 + htab->elf.sgot->output_offset + off
3680 - rel->r_offset
3681 - input_section->output_section->vma
3682 - input_section->output_offset
3683 - 4,
3684 contents + roff);
3685 continue;
3686 }
3687 else if (r_type == R_X86_64_TLSDESC_CALL)
3688 {
3689 /* GDesc -> IE transition.
3690 It's originally:
3691 call *(%rax)
3692
3693 Change it to:
3694 xchg %ax, %ax. */
3695
3696 bfd_put_8 (output_bfd, 0x66, contents + roff);
3697 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3698 continue;
3699 }
3700 else
3701 BFD_ASSERT (FALSE);
3702 }
3703 break;
3704
3705 case R_X86_64_TLSLD:
3706 if (! elf_x86_64_tls_transition (info, input_bfd,
3707 input_section, contents,
3708 symtab_hdr, sym_hashes,
3709 &r_type, GOT_UNKNOWN, rel,
3710 relend, h, r_symndx, TRUE))
3711 return FALSE;
3712
3713 if (r_type != R_X86_64_TLSLD)
3714 {
3715 /* LD->LE transition:
3716 leaq foo@tlsld(%rip), %rdi
3717 call __tls_get_addr@PLT
3718 For 64bit, we change it into:
3719 .word 0x6666; .byte 0x66; movq %fs:0, %rax
3720 For 32bit, we change it into:
3721 nopl 0x0(%rax); movl %fs:0, %eax
3722 Or
3723 leaq foo@tlsld(%rip), %rdi;
3724 call *__tls_get_addr@GOTPCREL(%rip)
3725 which may be converted to
3726 addr32 call __tls_get_addr
3727 For 64bit, we change it into:
3728 .word 0x6666; .word 0x6666; movq %fs:0, %rax
3729 For 32bit, we change it into:
3730 nopw 0x0(%rax); movl %fs:0, %eax
3731 For largepic, change:
3732 leaq foo@tlsgd(%rip), %rdi
3733 movabsq $__tls_get_addr@pltoff, %rax
3734 addq %rbx, %rax
3735 call *%rax
3736 into
3737 data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
3738 movq %fs:0, %eax */
3739
3740 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
3741 if (ABI_64_P (output_bfd))
3742 {
3743 if (contents[rel->r_offset + 5] == 0xb8)
3744 memcpy (contents + rel->r_offset - 3,
3745 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
3746 "\x64\x48\x8b\x04\x25\0\0\0", 22);
3747 else if (contents[rel->r_offset + 4] == 0xff
3748 || contents[rel->r_offset + 4] == 0x67)
3749 memcpy (contents + rel->r_offset - 3,
3750 "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
3751 13);
3752 else
3753 memcpy (contents + rel->r_offset - 3,
3754 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
3755 }
3756 else
3757 {
3758 if (contents[rel->r_offset + 4] == 0xff)
3759 memcpy (contents + rel->r_offset - 3,
3760 "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
3761 13);
3762 else
3763 memcpy (contents + rel->r_offset - 3,
3764 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
3765 }
3766 /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
3767 and R_X86_64_PLTOFF64. */
3768 rel++;
3769 wrel++;
3770 continue;
3771 }
3772
3773 if (htab->elf.sgot == NULL)
3774 abort ();
3775
3776 off = htab->tls_ld_or_ldm_got.offset;
3777 if (off & 1)
3778 off &= ~1;
3779 else
3780 {
3781 Elf_Internal_Rela outrel;
3782
3783 if (htab->elf.srelgot == NULL)
3784 abort ();
3785
3786 outrel.r_offset = (htab->elf.sgot->output_section->vma
3787 + htab->elf.sgot->output_offset + off);
3788
3789 bfd_put_64 (output_bfd, 0,
3790 htab->elf.sgot->contents + off);
3791 bfd_put_64 (output_bfd, 0,
3792 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3793 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
3794 outrel.r_addend = 0;
3795 elf_append_rela (output_bfd, htab->elf.srelgot,
3796 &outrel);
3797 htab->tls_ld_or_ldm_got.offset |= 1;
3798 }
3799 relocation = htab->elf.sgot->output_section->vma
3800 + htab->elf.sgot->output_offset + off;
3801 unresolved_reloc = FALSE;
3802 break;
3803
3804 case R_X86_64_DTPOFF32:
3805 if (!bfd_link_executable (info)
3806 || (input_section->flags & SEC_CODE) == 0)
3807 relocation -= _bfd_x86_elf_dtpoff_base (info);
3808 else
3809 relocation = elf_x86_64_tpoff (info, relocation);
3810 break;
3811
3812 case R_X86_64_TPOFF32:
3813 case R_X86_64_TPOFF64:
3814 BFD_ASSERT (bfd_link_executable (info));
3815 relocation = elf_x86_64_tpoff (info, relocation);
3816 break;
3817
3818 case R_X86_64_DTPOFF64:
3819 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
3820 relocation -= _bfd_x86_elf_dtpoff_base (info);
3821 break;
3822
3823 default:
3824 break;
3825 }
3826
3827 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3828 because such sections are not SEC_ALLOC and thus ld.so will
3829 not process them. */
3830 if (unresolved_reloc
3831 && !((input_section->flags & SEC_DEBUGGING) != 0
3832 && h->def_dynamic)
3833 && _bfd_elf_section_offset (output_bfd, info, input_section,
3834 rel->r_offset) != (bfd_vma) -1)
3835 {
3836 switch (r_type)
3837 {
3838 case R_X86_64_32S:
3839 sec = h->root.u.def.section;
3840 if ((info->nocopyreloc
3841 || (eh->def_protected
3842 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3843 && !(h->root.u.def.section->flags & SEC_CODE))
3844 return elf_x86_64_need_pic (info, input_bfd, input_section,
3845 h, NULL, NULL, howto);
3846 /* Fall through. */
3847
3848 default:
3849 _bfd_error_handler
3850 /* xgettext:c-format */
3851 (_("%pB(%pA+%#" PRIx64 "): "
3852 "unresolvable %s relocation against symbol `%s'"),
3853 input_bfd,
3854 input_section,
3855 (uint64_t) rel->r_offset,
3856 howto->name,
3857 h->root.root.string);
3858 return FALSE;
3859 }
3860 }
3861
3862 do_relocation:
3863 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
3864 contents, rel->r_offset,
3865 relocation, rel->r_addend);
3866
3867 check_relocation_error:
3868 if (r != bfd_reloc_ok)
3869 {
3870 const char *name;
3871
3872 if (h != NULL)
3873 name = h->root.root.string;
3874 else
3875 {
3876 name = bfd_elf_string_from_elf_section (input_bfd,
3877 symtab_hdr->sh_link,
3878 sym->st_name);
3879 if (name == NULL)
3880 return FALSE;
3881 if (*name == '\0')
3882 name = bfd_section_name (input_bfd, sec);
3883 }
3884
3885 if (r == bfd_reloc_overflow)
3886 {
3887 if (converted_reloc)
3888 {
3889 info->callbacks->einfo
3890 (_("%F%P: failed to convert GOTPCREL relocation; relink with --no-relax\n"));
3891 return FALSE;
3892 }
3893 (*info->callbacks->reloc_overflow)
3894 (info, (h ? &h->root : NULL), name, howto->name,
3895 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3896 }
3897 else
3898 {
3899 _bfd_error_handler
3900 /* xgettext:c-format */
3901 (_("%pB(%pA+%#" PRIx64 "): reloc against `%s': error %d"),
3902 input_bfd, input_section,
3903 (uint64_t) rel->r_offset, name, (int) r);
3904 return FALSE;
3905 }
3906 }
3907
3908 if (wrel != rel)
3909 *wrel = *rel;
3910 }
3911
3912 if (wrel != rel)
3913 {
3914 Elf_Internal_Shdr *rel_hdr;
3915 size_t deleted = rel - wrel;
3916
3917 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3918 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3919 if (rel_hdr->sh_size == 0)
3920 {
3921 /* It is too late to remove an empty reloc section. Leave
3922 one NONE reloc.
3923 ??? What is wrong with an empty section??? */
3924 rel_hdr->sh_size = rel_hdr->sh_entsize;
3925 deleted -= 1;
3926 }
3927 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3928 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3929 input_section->reloc_count -= deleted;
3930 }
3931
3932 return TRUE;
3933 }
3934
3935 /* Finish up dynamic symbol handling. We set the contents of various
3936 dynamic sections here. */
3937
3938 static bfd_boolean
3939 elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3940 struct bfd_link_info *info,
3941 struct elf_link_hash_entry *h,
3942 Elf_Internal_Sym *sym)
3943 {
3944 struct elf_x86_link_hash_table *htab;
3945 bfd_boolean use_plt_second;
3946 struct elf_x86_link_hash_entry *eh;
3947 bfd_boolean local_undefweak;
3948
3949 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
3950 if (htab == NULL)
3951 return FALSE;
3952
3953 /* Use the second PLT section only if there is .plt section. */
3954 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
3955
3956 eh = (struct elf_x86_link_hash_entry *) h;
3957 if (eh->no_finish_dynamic_symbol)
3958 abort ();
3959
3960 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3961 resolved undefined weak symbols in executable so that their
3962 references have value 0 at run-time. */
3963 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
3964
3965 if (h->plt.offset != (bfd_vma) -1)
3966 {
3967 bfd_vma plt_index;
3968 bfd_vma got_offset, plt_offset;
3969 Elf_Internal_Rela rela;
3970 bfd_byte *loc;
3971 asection *plt, *gotplt, *relplt, *resolved_plt;
3972 const struct elf_backend_data *bed;
3973 bfd_vma plt_got_pcrel_offset;
3974
3975 /* When building a static executable, use .iplt, .igot.plt and
3976 .rela.iplt sections for STT_GNU_IFUNC symbols. */
3977 if (htab->elf.splt != NULL)
3978 {
3979 plt = htab->elf.splt;
3980 gotplt = htab->elf.sgotplt;
3981 relplt = htab->elf.srelplt;
3982 }
3983 else
3984 {
3985 plt = htab->elf.iplt;
3986 gotplt = htab->elf.igotplt;
3987 relplt = htab->elf.irelplt;
3988 }
3989
3990 VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
3991
3992 /* Get the index in the procedure linkage table which
3993 corresponds to this symbol. This is the index of this symbol
3994 in all the symbols for which we are making plt entries. The
3995 first entry in the procedure linkage table is reserved.
3996
3997 Get the offset into the .got table of the entry that
3998 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
3999 bytes. The first three are reserved for the dynamic linker.
4000
4001 For static executables, we don't reserve anything. */
4002
4003 if (plt == htab->elf.splt)
4004 {
4005 got_offset = (h->plt.offset / htab->plt.plt_entry_size
4006 - htab->plt.has_plt0);
4007 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
4008 }
4009 else
4010 {
4011 got_offset = h->plt.offset / htab->plt.plt_entry_size;
4012 got_offset = got_offset * GOT_ENTRY_SIZE;
4013 }
4014
4015 /* Fill in the entry in the procedure linkage table. */
4016 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
4017 htab->plt.plt_entry_size);
4018 if (use_plt_second)
4019 {
4020 memcpy (htab->plt_second->contents + eh->plt_second.offset,
4021 htab->non_lazy_plt->plt_entry,
4022 htab->non_lazy_plt->plt_entry_size);
4023
4024 resolved_plt = htab->plt_second;
4025 plt_offset = eh->plt_second.offset;
4026 }
4027 else
4028 {
4029 resolved_plt = plt;
4030 plt_offset = h->plt.offset;
4031 }
4032
4033 /* Insert the relocation positions of the plt section. */
4034
4035 /* Put offset the PC-relative instruction referring to the GOT entry,
4036 subtracting the size of that instruction. */
4037 plt_got_pcrel_offset = (gotplt->output_section->vma
4038 + gotplt->output_offset
4039 + got_offset
4040 - resolved_plt->output_section->vma
4041 - resolved_plt->output_offset
4042 - plt_offset
4043 - htab->plt.plt_got_insn_size);
4044
4045 /* Check PC-relative offset overflow in PLT entry. */
4046 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
4047 /* xgettext:c-format */
4048 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in PLT entry for `%s'\n"),
4049 output_bfd, h->root.root.string);
4050
4051 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
4052 (resolved_plt->contents + plt_offset
4053 + htab->plt.plt_got_offset));
4054
4055 /* Fill in the entry in the global offset table, initially this
4056 points to the second part of the PLT entry. Leave the entry
4057 as zero for undefined weak symbol in PIE. No PLT relocation
4058 against undefined weak symbol in PIE. */
4059 if (!local_undefweak)
4060 {
4061 if (htab->plt.has_plt0)
4062 bfd_put_64 (output_bfd, (plt->output_section->vma
4063 + plt->output_offset
4064 + h->plt.offset
4065 + htab->lazy_plt->plt_lazy_offset),
4066 gotplt->contents + got_offset);
4067
4068 /* Fill in the entry in the .rela.plt section. */
4069 rela.r_offset = (gotplt->output_section->vma
4070 + gotplt->output_offset
4071 + got_offset);
4072 if (PLT_LOCAL_IFUNC_P (info, h))
4073 {
4074 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
4075 h->root.root.string,
4076 h->root.u.def.section->owner);
4077
4078 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4079 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
4080 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4081 rela.r_addend = (h->root.u.def.value
4082 + h->root.u.def.section->output_section->vma
4083 + h->root.u.def.section->output_offset);
4084 /* R_X86_64_IRELATIVE comes last. */
4085 plt_index = htab->next_irelative_index--;
4086 }
4087 else
4088 {
4089 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
4090 rela.r_addend = 0;
4091 plt_index = htab->next_jump_slot_index++;
4092 }
4093
4094 /* Don't fill the second and third slots in PLT entry for
4095 static executables nor without PLT0. */
4096 if (plt == htab->elf.splt && htab->plt.has_plt0)
4097 {
4098 bfd_vma plt0_offset
4099 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
4100
4101 /* Put relocation index. */
4102 bfd_put_32 (output_bfd, plt_index,
4103 (plt->contents + h->plt.offset
4104 + htab->lazy_plt->plt_reloc_offset));
4105
4106 /* Put offset for jmp .PLT0 and check for overflow. We don't
4107 check relocation index for overflow since branch displacement
4108 will overflow first. */
4109 if (plt0_offset > 0x80000000)
4110 /* xgettext:c-format */
4111 info->callbacks->einfo (_("%F%pB: branch displacement overflow in PLT entry for `%s'\n"),
4112 output_bfd, h->root.root.string);
4113 bfd_put_32 (output_bfd, - plt0_offset,
4114 (plt->contents + h->plt.offset
4115 + htab->lazy_plt->plt_plt_offset));
4116 }
4117
4118 bed = get_elf_backend_data (output_bfd);
4119 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
4120 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4121 }
4122 }
4123 else if (eh->plt_got.offset != (bfd_vma) -1)
4124 {
4125 bfd_vma got_offset, plt_offset;
4126 asection *plt, *got;
4127 bfd_boolean got_after_plt;
4128 int32_t got_pcrel_offset;
4129
4130 /* Set the entry in the GOT procedure linkage table. */
4131 plt = htab->plt_got;
4132 got = htab->elf.sgot;
4133 got_offset = h->got.offset;
4134
4135 if (got_offset == (bfd_vma) -1
4136 || (h->type == STT_GNU_IFUNC && h->def_regular)
4137 || plt == NULL
4138 || got == NULL)
4139 abort ();
4140
4141 /* Use the non-lazy PLT entry template for the GOT PLT since they
4142 are the identical. */
4143 /* Fill in the entry in the GOT procedure linkage table. */
4144 plt_offset = eh->plt_got.offset;
4145 memcpy (plt->contents + plt_offset,
4146 htab->non_lazy_plt->plt_entry,
4147 htab->non_lazy_plt->plt_entry_size);
4148
4149 /* Put offset the PC-relative instruction referring to the GOT
4150 entry, subtracting the size of that instruction. */
4151 got_pcrel_offset = (got->output_section->vma
4152 + got->output_offset
4153 + got_offset
4154 - plt->output_section->vma
4155 - plt->output_offset
4156 - plt_offset
4157 - htab->non_lazy_plt->plt_got_insn_size);
4158
4159 /* Check PC-relative offset overflow in GOT PLT entry. */
4160 got_after_plt = got->output_section->vma > plt->output_section->vma;
4161 if ((got_after_plt && got_pcrel_offset < 0)
4162 || (!got_after_plt && got_pcrel_offset > 0))
4163 /* xgettext:c-format */
4164 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
4165 output_bfd, h->root.root.string);
4166
4167 bfd_put_32 (output_bfd, got_pcrel_offset,
4168 (plt->contents + plt_offset
4169 + htab->non_lazy_plt->plt_got_offset));
4170 }
4171
4172 if (!local_undefweak
4173 && !h->def_regular
4174 && (h->plt.offset != (bfd_vma) -1
4175 || eh->plt_got.offset != (bfd_vma) -1))
4176 {
4177 /* Mark the symbol as undefined, rather than as defined in
4178 the .plt section. Leave the value if there were any
4179 relocations where pointer equality matters (this is a clue
4180 for the dynamic linker, to make function pointer
4181 comparisons work between an application and shared
4182 library), otherwise set it to zero. If a function is only
4183 called from a binary, there is no need to slow down
4184 shared libraries because of that. */
4185 sym->st_shndx = SHN_UNDEF;
4186 if (!h->pointer_equality_needed)
4187 sym->st_value = 0;
4188 }
4189
4190 _bfd_x86_elf_link_fixup_ifunc_symbol (info, htab, h, sym);
4191
4192 /* Don't generate dynamic GOT relocation against undefined weak
4193 symbol in executable. */
4194 if (h->got.offset != (bfd_vma) -1
4195 && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry (h)->tls_type)
4196 && elf_x86_hash_entry (h)->tls_type != GOT_TLS_IE
4197 && !local_undefweak)
4198 {
4199 Elf_Internal_Rela rela;
4200 asection *relgot = htab->elf.srelgot;
4201
4202 /* This symbol has an entry in the global offset table. Set it
4203 up. */
4204 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
4205 abort ();
4206
4207 rela.r_offset = (htab->elf.sgot->output_section->vma
4208 + htab->elf.sgot->output_offset
4209 + (h->got.offset &~ (bfd_vma) 1));
4210
4211 /* If this is a static link, or it is a -Bsymbolic link and the
4212 symbol is defined locally or was forced to be local because
4213 of a version file, we just want to emit a RELATIVE reloc.
4214 The entry in the global offset table will already have been
4215 initialized in the relocate_section function. */
4216 if (h->def_regular
4217 && h->type == STT_GNU_IFUNC)
4218 {
4219 if (h->plt.offset == (bfd_vma) -1)
4220 {
4221 /* STT_GNU_IFUNC is referenced without PLT. */
4222 if (htab->elf.splt == NULL)
4223 {
4224 /* use .rel[a].iplt section to store .got relocations
4225 in static executable. */
4226 relgot = htab->elf.irelplt;
4227 }
4228 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
4229 {
4230 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
4231 h->root.root.string,
4232 h->root.u.def.section->owner);
4233
4234 rela.r_info = htab->r_info (0,
4235 R_X86_64_IRELATIVE);
4236 rela.r_addend = (h->root.u.def.value
4237 + h->root.u.def.section->output_section->vma
4238 + h->root.u.def.section->output_offset);
4239 }
4240 else
4241 goto do_glob_dat;
4242 }
4243 else if (bfd_link_pic (info))
4244 {
4245 /* Generate R_X86_64_GLOB_DAT. */
4246 goto do_glob_dat;
4247 }
4248 else
4249 {
4250 asection *plt;
4251 bfd_vma plt_offset;
4252
4253 if (!h->pointer_equality_needed)
4254 abort ();
4255
4256 /* For non-shared object, we can't use .got.plt, which
4257 contains the real function addres if we need pointer
4258 equality. We load the GOT entry with the PLT entry. */
4259 if (htab->plt_second != NULL)
4260 {
4261 plt = htab->plt_second;
4262 plt_offset = eh->plt_second.offset;
4263 }
4264 else
4265 {
4266 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4267 plt_offset = h->plt.offset;
4268 }
4269 bfd_put_64 (output_bfd, (plt->output_section->vma
4270 + plt->output_offset
4271 + plt_offset),
4272 htab->elf.sgot->contents + h->got.offset);
4273 return TRUE;
4274 }
4275 }
4276 else if (bfd_link_pic (info)
4277 && SYMBOL_REFERENCES_LOCAL_P (info, h))
4278 {
4279 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
4280 return FALSE;
4281 BFD_ASSERT((h->got.offset & 1) != 0);
4282 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
4283 rela.r_addend = (h->root.u.def.value
4284 + h->root.u.def.section->output_section->vma
4285 + h->root.u.def.section->output_offset);
4286 }
4287 else
4288 {
4289 BFD_ASSERT((h->got.offset & 1) == 0);
4290 do_glob_dat:
4291 bfd_put_64 (output_bfd, (bfd_vma) 0,
4292 htab->elf.sgot->contents + h->got.offset);
4293 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
4294 rela.r_addend = 0;
4295 }
4296
4297 elf_append_rela (output_bfd, relgot, &rela);
4298 }
4299
4300 if (h->needs_copy)
4301 {
4302 Elf_Internal_Rela rela;
4303 asection *s;
4304
4305 /* This symbol needs a copy reloc. Set it up. */
4306 VERIFY_COPY_RELOC (h, htab)
4307
4308 rela.r_offset = (h->root.u.def.value
4309 + h->root.u.def.section->output_section->vma
4310 + h->root.u.def.section->output_offset);
4311 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
4312 rela.r_addend = 0;
4313 if (h->root.u.def.section == htab->elf.sdynrelro)
4314 s = htab->elf.sreldynrelro;
4315 else
4316 s = htab->elf.srelbss;
4317 elf_append_rela (output_bfd, s, &rela);
4318 }
4319
4320 return TRUE;
4321 }
4322
4323 /* Finish up local dynamic symbol handling. We set the contents of
4324 various dynamic sections here. */
4325
4326 static bfd_boolean
4327 elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
4328 {
4329 struct elf_link_hash_entry *h
4330 = (struct elf_link_hash_entry *) *slot;
4331 struct bfd_link_info *info
4332 = (struct bfd_link_info *) inf;
4333
4334 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4335 info, h, NULL);
4336 }
4337
4338 /* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4339 here since undefined weak symbol may not be dynamic and may not be
4340 called for elf_x86_64_finish_dynamic_symbol. */
4341
4342 static bfd_boolean
4343 elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4344 void *inf)
4345 {
4346 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4347 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4348
4349 if (h->root.type != bfd_link_hash_undefweak
4350 || h->dynindx != -1)
4351 return TRUE;
4352
4353 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4354 info, h, NULL);
4355 }
4356
4357 /* Used to decide how to sort relocs in an optimal manner for the
4358 dynamic linker, before writing them out. */
4359
4360 static enum elf_reloc_type_class
4361 elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
4362 const asection *rel_sec ATTRIBUTE_UNUSED,
4363 const Elf_Internal_Rela *rela)
4364 {
4365 bfd *abfd = info->output_bfd;
4366 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
4367 struct elf_x86_link_hash_table *htab
4368 = elf_x86_hash_table (info, X86_64_ELF_DATA);
4369
4370 if (htab->elf.dynsym != NULL
4371 && htab->elf.dynsym->contents != NULL)
4372 {
4373 /* Check relocation against STT_GNU_IFUNC symbol if there are
4374 dynamic symbols. */
4375 unsigned long r_symndx = htab->r_sym (rela->r_info);
4376 if (r_symndx != STN_UNDEF)
4377 {
4378 Elf_Internal_Sym sym;
4379 if (!bed->s->swap_symbol_in (abfd,
4380 (htab->elf.dynsym->contents
4381 + r_symndx * bed->s->sizeof_sym),
4382 0, &sym))
4383 abort ();
4384
4385 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
4386 return reloc_class_ifunc;
4387 }
4388 }
4389
4390 switch ((int) ELF32_R_TYPE (rela->r_info))
4391 {
4392 case R_X86_64_IRELATIVE:
4393 return reloc_class_ifunc;
4394 case R_X86_64_RELATIVE:
4395 case R_X86_64_RELATIVE64:
4396 return reloc_class_relative;
4397 case R_X86_64_JUMP_SLOT:
4398 return reloc_class_plt;
4399 case R_X86_64_COPY:
4400 return reloc_class_copy;
4401 default:
4402 return reloc_class_normal;
4403 }
4404 }
4405
4406 /* Finish up the dynamic sections. */
4407
4408 static bfd_boolean
4409 elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
4410 struct bfd_link_info *info)
4411 {
4412 struct elf_x86_link_hash_table *htab;
4413
4414 htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4415 if (htab == NULL)
4416 return FALSE;
4417
4418 if (! htab->elf.dynamic_sections_created)
4419 return TRUE;
4420
4421 if (htab->elf.splt && htab->elf.splt->size > 0)
4422 {
4423 elf_section_data (htab->elf.splt->output_section)
4424 ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
4425
4426 if (htab->plt.has_plt0)
4427 {
4428 /* Fill in the special first entry in the procedure linkage
4429 table. */
4430 memcpy (htab->elf.splt->contents,
4431 htab->lazy_plt->plt0_entry,
4432 htab->lazy_plt->plt0_entry_size);
4433 /* Add offset for pushq GOT+8(%rip), since the instruction
4434 uses 6 bytes subtract this value. */
4435 bfd_put_32 (output_bfd,
4436 (htab->elf.sgotplt->output_section->vma
4437 + htab->elf.sgotplt->output_offset
4438 + 8
4439 - htab->elf.splt->output_section->vma
4440 - htab->elf.splt->output_offset
4441 - 6),
4442 (htab->elf.splt->contents
4443 + htab->lazy_plt->plt0_got1_offset));
4444 /* Add offset for the PC-relative instruction accessing
4445 GOT+16, subtracting the offset to the end of that
4446 instruction. */
4447 bfd_put_32 (output_bfd,
4448 (htab->elf.sgotplt->output_section->vma
4449 + htab->elf.sgotplt->output_offset
4450 + 16
4451 - htab->elf.splt->output_section->vma
4452 - htab->elf.splt->output_offset
4453 - htab->lazy_plt->plt0_got2_insn_end),
4454 (htab->elf.splt->contents
4455 + htab->lazy_plt->plt0_got2_offset));
4456 }
4457
4458 if (htab->tlsdesc_plt)
4459 {
4460 bfd_put_64 (output_bfd, (bfd_vma) 0,
4461 htab->elf.sgot->contents + htab->tlsdesc_got);
4462
4463 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
4464 htab->lazy_plt->plt_tlsdesc_entry,
4465 htab->lazy_plt->plt_tlsdesc_entry_size);
4466
4467 /* Add offset for pushq GOT+8(%rip), since ENDBR64 uses 4
4468 bytes and the instruction uses 6 bytes, subtract these
4469 values. */
4470 bfd_put_32 (output_bfd,
4471 (htab->elf.sgotplt->output_section->vma
4472 + htab->elf.sgotplt->output_offset
4473 + 8
4474 - htab->elf.splt->output_section->vma
4475 - htab->elf.splt->output_offset
4476 - htab->tlsdesc_plt
4477 - htab->lazy_plt->plt_tlsdesc_got1_insn_end),
4478 (htab->elf.splt->contents
4479 + htab->tlsdesc_plt
4480 + htab->lazy_plt->plt_tlsdesc_got1_offset));
4481 /* Add offset for indirect branch via GOT+TDG, where TDG
4482 stands for htab->tlsdesc_got, subtracting the offset
4483 to the end of that instruction. */
4484 bfd_put_32 (output_bfd,
4485 (htab->elf.sgot->output_section->vma
4486 + htab->elf.sgot->output_offset
4487 + htab->tlsdesc_got
4488 - htab->elf.splt->output_section->vma
4489 - htab->elf.splt->output_offset
4490 - htab->tlsdesc_plt
4491 - htab->lazy_plt->plt_tlsdesc_got2_insn_end),
4492 (htab->elf.splt->contents
4493 + htab->tlsdesc_plt
4494 + htab->lazy_plt->plt_tlsdesc_got2_offset));
4495 }
4496 }
4497
4498 /* Fill PLT entries for undefined weak symbols in PIE. */
4499 if (bfd_link_pie (info))
4500 bfd_hash_traverse (&info->hash->table,
4501 elf_x86_64_pie_finish_undefweak_symbol,
4502 info);
4503
4504 return TRUE;
4505 }
4506
4507 /* Fill PLT/GOT entries and allocate dynamic relocations for local
4508 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4509 It has to be done before elf_link_sort_relocs is called so that
4510 dynamic relocations are properly sorted. */
4511
4512 static bfd_boolean
4513 elf_x86_64_output_arch_local_syms
4514 (bfd *output_bfd ATTRIBUTE_UNUSED,
4515 struct bfd_link_info *info,
4516 void *flaginfo ATTRIBUTE_UNUSED,
4517 int (*func) (void *, const char *,
4518 Elf_Internal_Sym *,
4519 asection *,
4520 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4521 {
4522 struct elf_x86_link_hash_table *htab
4523 = elf_x86_hash_table (info, X86_64_ELF_DATA);
4524 if (htab == NULL)
4525 return FALSE;
4526
4527 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4528 htab_traverse (htab->loc_hash_table,
4529 elf_x86_64_finish_local_dynamic_symbol,
4530 info);
4531
4532 return TRUE;
4533 }
4534
4535 /* Forward declaration. */
4536 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt;
4537
4538 /* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
4539 dynamic relocations. */
4540
4541 static long
4542 elf_x86_64_get_synthetic_symtab (bfd *abfd,
4543 long symcount ATTRIBUTE_UNUSED,
4544 asymbol **syms ATTRIBUTE_UNUSED,
4545 long dynsymcount,
4546 asymbol **dynsyms,
4547 asymbol **ret)
4548 {
4549 long count, i, n;
4550 int j;
4551 bfd_byte *plt_contents;
4552 long relsize;
4553 const struct elf_x86_lazy_plt_layout *lazy_plt;
4554 const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4555 const struct elf_x86_lazy_plt_layout *lazy_bnd_plt;
4556 const struct elf_x86_non_lazy_plt_layout *non_lazy_bnd_plt;
4557 const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4558 const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
4559 asection *plt;
4560 enum elf_x86_plt_type plt_type;
4561 struct elf_x86_plt plts[] =
4562 {
4563 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4564 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
4565 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4566 { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
4567 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
4568 };
4569
4570 *ret = NULL;
4571
4572 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4573 return 0;
4574
4575 if (dynsymcount <= 0)
4576 return 0;
4577
4578 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4579 if (relsize <= 0)
4580 return -1;
4581
4582 if (get_elf_x86_backend_data (abfd)->target_os != is_nacl)
4583 {
4584 lazy_plt = &elf_x86_64_lazy_plt;
4585 non_lazy_plt = &elf_x86_64_non_lazy_plt;
4586 lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
4587 non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
4588 if (ABI_64_P (abfd))
4589 {
4590 lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4591 non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4592 }
4593 else
4594 {
4595 lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4596 non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4597 }
4598 }
4599 else
4600 {
4601 lazy_plt = &elf_x86_64_nacl_plt;
4602 non_lazy_plt = NULL;
4603 lazy_bnd_plt = NULL;
4604 non_lazy_bnd_plt = NULL;
4605 lazy_ibt_plt = NULL;
4606 non_lazy_ibt_plt = NULL;
4607 }
4608
4609 count = 0;
4610 for (j = 0; plts[j].name != NULL; j++)
4611 {
4612 plt = bfd_get_section_by_name (abfd, plts[j].name);
4613 if (plt == NULL || plt->size == 0)
4614 continue;
4615
4616 /* Get the PLT section contents. */
4617 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4618 if (plt_contents == NULL)
4619 break;
4620 if (!bfd_get_section_contents (abfd, (asection *) plt,
4621 plt_contents, 0, plt->size))
4622 {
4623 free (plt_contents);
4624 break;
4625 }
4626
4627 /* Check what kind of PLT it is. */
4628 plt_type = plt_unknown;
4629 if (plts[j].type == plt_unknown
4630 && (plt->size >= (lazy_plt->plt_entry_size
4631 + lazy_plt->plt_entry_size)))
4632 {
4633 /* Match lazy PLT first. Need to check the first two
4634 instructions. */
4635 if ((memcmp (plt_contents, lazy_plt->plt0_entry,
4636 lazy_plt->plt0_got1_offset) == 0)
4637 && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
4638 2) == 0))
4639 plt_type = plt_lazy;
4640 else if (lazy_bnd_plt != NULL
4641 && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
4642 lazy_bnd_plt->plt0_got1_offset) == 0)
4643 && (memcmp (plt_contents + 6,
4644 lazy_bnd_plt->plt0_entry + 6, 3) == 0))
4645 {
4646 plt_type = plt_lazy | plt_second;
4647 /* The fist entry in the lazy IBT PLT is the same as the
4648 lazy BND PLT. */
4649 if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
4650 lazy_ibt_plt->plt_entry,
4651 lazy_ibt_plt->plt_got_offset) == 0))
4652 lazy_plt = lazy_ibt_plt;
4653 else
4654 lazy_plt = lazy_bnd_plt;
4655 }
4656 }
4657
4658 if (non_lazy_plt != NULL
4659 && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4660 && plt->size >= non_lazy_plt->plt_entry_size)
4661 {
4662 /* Match non-lazy PLT. */
4663 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4664 non_lazy_plt->plt_got_offset) == 0)
4665 plt_type = plt_non_lazy;
4666 }
4667
4668 if (plt_type == plt_unknown || plt_type == plt_second)
4669 {
4670 if (non_lazy_bnd_plt != NULL
4671 && plt->size >= non_lazy_bnd_plt->plt_entry_size
4672 && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
4673 non_lazy_bnd_plt->plt_got_offset) == 0))
4674 {
4675 /* Match BND PLT. */
4676 plt_type = plt_second;
4677 non_lazy_plt = non_lazy_bnd_plt;
4678 }
4679 else if (non_lazy_ibt_plt != NULL
4680 && plt->size >= non_lazy_ibt_plt->plt_entry_size
4681 && (memcmp (plt_contents,
4682 non_lazy_ibt_plt->plt_entry,
4683 non_lazy_ibt_plt->plt_got_offset) == 0))
4684 {
4685 /* Match IBT PLT. */
4686 plt_type = plt_second;
4687 non_lazy_plt = non_lazy_ibt_plt;
4688 }
4689 }
4690
4691 if (plt_type == plt_unknown)
4692 {
4693 free (plt_contents);
4694 continue;
4695 }
4696
4697 plts[j].sec = plt;
4698 plts[j].type = plt_type;
4699
4700 if ((plt_type & plt_lazy))
4701 {
4702 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4703 plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
4704 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4705 /* Skip PLT0 in lazy PLT. */
4706 i = 1;
4707 }
4708 else
4709 {
4710 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4711 plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
4712 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4713 i = 0;
4714 }
4715
4716 /* Skip lazy PLT when the second PLT is used. */
4717 if (plt_type == (plt_lazy | plt_second))
4718 plts[j].count = 0;
4719 else
4720 {
4721 n = plt->size / plts[j].plt_entry_size;
4722 plts[j].count = n;
4723 count += n - i;
4724 }
4725
4726 plts[j].contents = plt_contents;
4727 }
4728
4729 return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4730 (bfd_vma) 0, plts, dynsyms,
4731 ret);
4732 }
4733
4734 /* Handle an x86-64 specific section when reading an object file. This
4735 is called when elfcode.h finds a section with an unknown type. */
4736
4737 static bfd_boolean
4738 elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
4739 const char *name, int shindex)
4740 {
4741 if (hdr->sh_type != SHT_X86_64_UNWIND)
4742 return FALSE;
4743
4744 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
4745 return FALSE;
4746
4747 return TRUE;
4748 }
4749
4750 /* Hook called by the linker routine which adds symbols from an object
4751 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4752 of .bss. */
4753
4754 static bfd_boolean
4755 elf_x86_64_add_symbol_hook (bfd *abfd,
4756 struct bfd_link_info *info ATTRIBUTE_UNUSED,
4757 Elf_Internal_Sym *sym,
4758 const char **namep ATTRIBUTE_UNUSED,
4759 flagword *flagsp ATTRIBUTE_UNUSED,
4760 asection **secp,
4761 bfd_vma *valp)
4762 {
4763 asection *lcomm;
4764
4765 switch (sym->st_shndx)
4766 {
4767 case SHN_X86_64_LCOMMON:
4768 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4769 if (lcomm == NULL)
4770 {
4771 lcomm = bfd_make_section_with_flags (abfd,
4772 "LARGE_COMMON",
4773 (SEC_ALLOC
4774 | SEC_IS_COMMON
4775 | SEC_LINKER_CREATED));
4776 if (lcomm == NULL)
4777 return FALSE;
4778 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4779 }
4780 *secp = lcomm;
4781 *valp = sym->st_size;
4782 return TRUE;
4783 }
4784
4785 return TRUE;
4786 }
4787
4788
4789 /* Given a BFD section, try to locate the corresponding ELF section
4790 index. */
4791
4792 static bfd_boolean
4793 elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4794 asection *sec, int *index_return)
4795 {
4796 if (sec == &_bfd_elf_large_com_section)
4797 {
4798 *index_return = SHN_X86_64_LCOMMON;
4799 return TRUE;
4800 }
4801 return FALSE;
4802 }
4803
4804 /* Process a symbol. */
4805
4806 static void
4807 elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4808 asymbol *asym)
4809 {
4810 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4811
4812 switch (elfsym->internal_elf_sym.st_shndx)
4813 {
4814 case SHN_X86_64_LCOMMON:
4815 asym->section = &_bfd_elf_large_com_section;
4816 asym->value = elfsym->internal_elf_sym.st_size;
4817 /* Common symbol doesn't set BSF_GLOBAL. */
4818 asym->flags &= ~BSF_GLOBAL;
4819 break;
4820 }
4821 }
4822
4823 static bfd_boolean
4824 elf_x86_64_common_definition (Elf_Internal_Sym *sym)
4825 {
4826 return (sym->st_shndx == SHN_COMMON
4827 || sym->st_shndx == SHN_X86_64_LCOMMON);
4828 }
4829
4830 static unsigned int
4831 elf_x86_64_common_section_index (asection *sec)
4832 {
4833 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4834 return SHN_COMMON;
4835 else
4836 return SHN_X86_64_LCOMMON;
4837 }
4838
4839 static asection *
4840 elf_x86_64_common_section (asection *sec)
4841 {
4842 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4843 return bfd_com_section_ptr;
4844 else
4845 return &_bfd_elf_large_com_section;
4846 }
4847
4848 static bfd_boolean
4849 elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
4850 const Elf_Internal_Sym *sym,
4851 asection **psec,
4852 bfd_boolean newdef,
4853 bfd_boolean olddef,
4854 bfd *oldbfd,
4855 const asection *oldsec)
4856 {
4857 /* A normal common symbol and a large common symbol result in a
4858 normal common symbol. We turn the large common symbol into a
4859 normal one. */
4860 if (!olddef
4861 && h->root.type == bfd_link_hash_common
4862 && !newdef
4863 && bfd_is_com_section (*psec)
4864 && oldsec != *psec)
4865 {
4866 if (sym->st_shndx == SHN_COMMON
4867 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
4868 {
4869 h->root.u.c.p->section
4870 = bfd_make_section_old_way (oldbfd, "COMMON");
4871 h->root.u.c.p->section->flags = SEC_ALLOC;
4872 }
4873 else if (sym->st_shndx == SHN_X86_64_LCOMMON
4874 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
4875 *psec = bfd_com_section_ptr;
4876 }
4877
4878 return TRUE;
4879 }
4880
4881 static int
4882 elf_x86_64_additional_program_headers (bfd *abfd,
4883 struct bfd_link_info *info ATTRIBUTE_UNUSED)
4884 {
4885 asection *s;
4886 int count = 0;
4887
4888 /* Check to see if we need a large readonly segment. */
4889 s = bfd_get_section_by_name (abfd, ".lrodata");
4890 if (s && (s->flags & SEC_LOAD))
4891 count++;
4892
4893 /* Check to see if we need a large data segment. Since .lbss sections
4894 is placed right after the .bss section, there should be no need for
4895 a large data segment just because of .lbss. */
4896 s = bfd_get_section_by_name (abfd, ".ldata");
4897 if (s && (s->flags & SEC_LOAD))
4898 count++;
4899
4900 return count;
4901 }
4902
4903 /* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
4904
4905 static bfd_boolean
4906 elf_x86_64_relocs_compatible (const bfd_target *input,
4907 const bfd_target *output)
4908 {
4909 return ((xvec_get_elf_backend_data (input)->s->elfclass
4910 == xvec_get_elf_backend_data (output)->s->elfclass)
4911 && _bfd_elf_relocs_compatible (input, output));
4912 }
4913
4914 /* Set up x86-64 GNU properties. Return the first relocatable ELF input
4915 with GNU properties if found. Otherwise, return NULL. */
4916
4917 static bfd *
4918 elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
4919 {
4920 struct elf_x86_init_table init_table;
4921
4922 if ((int) R_X86_64_standard >= (int) R_X86_64_converted_reloc_bit
4923 || (int) R_X86_64_max <= (int) R_X86_64_converted_reloc_bit
4924 || ((int) (R_X86_64_GNU_VTINHERIT | R_X86_64_converted_reloc_bit)
4925 != (int) R_X86_64_GNU_VTINHERIT)
4926 || ((int) (R_X86_64_GNU_VTENTRY | R_X86_64_converted_reloc_bit)
4927 != (int) R_X86_64_GNU_VTENTRY))
4928 abort ();
4929
4930 /* This is unused for x86-64. */
4931 init_table.plt0_pad_byte = 0x90;
4932
4933 if (get_elf_x86_backend_data (info->output_bfd)->target_os != is_nacl)
4934 {
4935 if (info->bndplt)
4936 {
4937 init_table.lazy_plt = &elf_x86_64_lazy_bnd_plt;
4938 init_table.non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
4939 }
4940 else
4941 {
4942 init_table.lazy_plt = &elf_x86_64_lazy_plt;
4943 init_table.non_lazy_plt = &elf_x86_64_non_lazy_plt;
4944 }
4945
4946 if (ABI_64_P (info->output_bfd))
4947 {
4948 init_table.lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4949 init_table.non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4950 }
4951 else
4952 {
4953 init_table.lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4954 init_table.non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4955 }
4956 }
4957 else
4958 {
4959 init_table.lazy_plt = &elf_x86_64_nacl_plt;
4960 init_table.non_lazy_plt = NULL;
4961 init_table.lazy_ibt_plt = NULL;
4962 init_table.non_lazy_ibt_plt = NULL;
4963 }
4964
4965 if (ABI_64_P (info->output_bfd))
4966 {
4967 init_table.r_info = elf64_r_info;
4968 init_table.r_sym = elf64_r_sym;
4969 }
4970 else
4971 {
4972 init_table.r_info = elf32_r_info;
4973 init_table.r_sym = elf32_r_sym;
4974 }
4975
4976 return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
4977 }
4978
4979 static const struct bfd_elf_special_section
4980 elf_x86_64_special_sections[]=
4981 {
4982 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4983 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4984 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
4985 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4986 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4987 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4988 { NULL, 0, 0, 0, 0 }
4989 };
4990
4991 #define TARGET_LITTLE_SYM x86_64_elf64_vec
4992 #define TARGET_LITTLE_NAME "elf64-x86-64"
4993 #define ELF_ARCH bfd_arch_i386
4994 #define ELF_TARGET_ID X86_64_ELF_DATA
4995 #define ELF_MACHINE_CODE EM_X86_64
4996 #if DEFAULT_LD_Z_SEPARATE_CODE
4997 # define ELF_MAXPAGESIZE 0x1000
4998 #else
4999 # define ELF_MAXPAGESIZE 0x200000
5000 #endif
5001 #define ELF_MINPAGESIZE 0x1000
5002 #define ELF_COMMONPAGESIZE 0x1000
5003
5004 #define elf_backend_can_gc_sections 1
5005 #define elf_backend_can_refcount 1
5006 #define elf_backend_want_got_plt 1
5007 #define elf_backend_plt_readonly 1
5008 #define elf_backend_want_plt_sym 0
5009 #define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
5010 #define elf_backend_rela_normal 1
5011 #define elf_backend_plt_alignment 4
5012 #define elf_backend_extern_protected_data 1
5013 #define elf_backend_caches_rawsize 1
5014 #define elf_backend_dtrel_excludes_plt 1
5015 #define elf_backend_want_dynrelro 1
5016
5017 #define elf_info_to_howto elf_x86_64_info_to_howto
5018
5019 #define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
5020 #define bfd_elf64_bfd_reloc_name_lookup \
5021 elf_x86_64_reloc_name_lookup
5022
5023 #define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
5024 #define elf_backend_check_relocs elf_x86_64_check_relocs
5025 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
5026 #define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
5027 #define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
5028 #define elf_backend_output_arch_local_syms elf_x86_64_output_arch_local_syms
5029 #define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
5030 #define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
5031 #ifdef CORE_HEADER
5032 #define elf_backend_write_core_note elf_x86_64_write_core_note
5033 #endif
5034 #define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
5035 #define elf_backend_relocate_section elf_x86_64_relocate_section
5036 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
5037 #define elf_backend_object_p elf64_x86_64_elf_object_p
5038 #define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
5039
5040 #define elf_backend_section_from_shdr \
5041 elf_x86_64_section_from_shdr
5042
5043 #define elf_backend_section_from_bfd_section \
5044 elf_x86_64_elf_section_from_bfd_section
5045 #define elf_backend_add_symbol_hook \
5046 elf_x86_64_add_symbol_hook
5047 #define elf_backend_symbol_processing \
5048 elf_x86_64_symbol_processing
5049 #define elf_backend_common_section_index \
5050 elf_x86_64_common_section_index
5051 #define elf_backend_common_section \
5052 elf_x86_64_common_section
5053 #define elf_backend_common_definition \
5054 elf_x86_64_common_definition
5055 #define elf_backend_merge_symbol \
5056 elf_x86_64_merge_symbol
5057 #define elf_backend_special_sections \
5058 elf_x86_64_special_sections
5059 #define elf_backend_additional_program_headers \
5060 elf_x86_64_additional_program_headers
5061 #define elf_backend_setup_gnu_properties \
5062 elf_x86_64_link_setup_gnu_properties
5063 #define elf_backend_hide_symbol \
5064 _bfd_x86_elf_hide_symbol
5065
5066 #undef elf64_bed
5067 #define elf64_bed elf64_x86_64_bed
5068
5069 #include "elf64-target.h"
5070
5071 /* CloudABI support. */
5072
5073 #undef TARGET_LITTLE_SYM
5074 #define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
5075 #undef TARGET_LITTLE_NAME
5076 #define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
5077
5078 #undef ELF_OSABI
5079 #define ELF_OSABI ELFOSABI_CLOUDABI
5080
5081 #undef elf64_bed
5082 #define elf64_bed elf64_x86_64_cloudabi_bed
5083
5084 #include "elf64-target.h"
5085
5086 /* FreeBSD support. */
5087
5088 #undef TARGET_LITTLE_SYM
5089 #define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
5090 #undef TARGET_LITTLE_NAME
5091 #define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
5092
5093 #undef ELF_OSABI
5094 #define ELF_OSABI ELFOSABI_FREEBSD
5095
5096 #undef elf64_bed
5097 #define elf64_bed elf64_x86_64_fbsd_bed
5098
5099 #include "elf64-target.h"
5100
5101 /* Solaris 2 support. */
5102
5103 #undef TARGET_LITTLE_SYM
5104 #define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
5105 #undef TARGET_LITTLE_NAME
5106 #define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
5107
5108 static const struct elf_x86_backend_data elf_x86_64_solaris_arch_bed =
5109 {
5110 is_solaris /* os */
5111 };
5112
5113 #undef elf_backend_arch_data
5114 #define elf_backend_arch_data &elf_x86_64_solaris_arch_bed
5115
5116 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
5117 objects won't be recognized. */
5118 #undef ELF_OSABI
5119
5120 #undef elf64_bed
5121 #define elf64_bed elf64_x86_64_sol2_bed
5122
5123 /* The 64-bit static TLS arena size is rounded to the nearest 16-byte
5124 boundary. */
5125 #undef elf_backend_static_tls_alignment
5126 #define elf_backend_static_tls_alignment 16
5127
5128 /* The Solaris 2 ABI requires a plt symbol on all platforms.
5129
5130 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
5131 File, p.63. */
5132 #undef elf_backend_want_plt_sym
5133 #define elf_backend_want_plt_sym 1
5134
5135 #undef elf_backend_strtab_flags
5136 #define elf_backend_strtab_flags SHF_STRINGS
5137
5138 static bfd_boolean
5139 elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
5140 bfd *obfd ATTRIBUTE_UNUSED,
5141 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
5142 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
5143 {
5144 /* PR 19938: FIXME: Need to add code for setting the sh_info
5145 and sh_link fields of Solaris specific section types. */
5146 return FALSE;
5147 }
5148
5149 #undef elf_backend_copy_special_section_fields
5150 #define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
5151
5152 #include "elf64-target.h"
5153
5154 /* Native Client support. */
5155
5156 static bfd_boolean
5157 elf64_x86_64_nacl_elf_object_p (bfd *abfd)
5158 {
5159 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
5160 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
5161 return TRUE;
5162 }
5163
5164 #undef TARGET_LITTLE_SYM
5165 #define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
5166 #undef TARGET_LITTLE_NAME
5167 #define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
5168 #undef elf64_bed
5169 #define elf64_bed elf64_x86_64_nacl_bed
5170
5171 #undef ELF_MAXPAGESIZE
5172 #undef ELF_MINPAGESIZE
5173 #undef ELF_COMMONPAGESIZE
5174 #define ELF_MAXPAGESIZE 0x10000
5175 #define ELF_MINPAGESIZE 0x10000
5176 #define ELF_COMMONPAGESIZE 0x10000
5177
5178 /* Restore defaults. */
5179 #undef ELF_OSABI
5180 #undef elf_backend_static_tls_alignment
5181 #undef elf_backend_want_plt_sym
5182 #define elf_backend_want_plt_sym 0
5183 #undef elf_backend_strtab_flags
5184 #undef elf_backend_copy_special_section_fields
5185
5186 /* NaCl uses substantially different PLT entries for the same effects. */
5187
5188 #undef elf_backend_plt_alignment
5189 #define elf_backend_plt_alignment 5
5190 #define NACL_PLT_ENTRY_SIZE 64
5191 #define NACLMASK 0xe0 /* 32-byte alignment mask. */
5192
5193 static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
5194 {
5195 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
5196 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
5197 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5198 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5199 0x41, 0xff, 0xe3, /* jmpq *%r11 */
5200
5201 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
5202 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
5203
5204 /* 32 bytes of nop to pad out to the standard size. */
5205 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5206 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5207 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5208 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5209 0x66, /* excess data16 prefix */
5210 0x90 /* nop */
5211 };
5212
5213 static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
5214 {
5215 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
5216 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5217 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5218 0x41, 0xff, 0xe3, /* jmpq *%r11 */
5219
5220 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
5221 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5222 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5223
5224 /* Lazy GOT entries point here (32-byte aligned). */
5225 0x68, /* pushq immediate */
5226 0, 0, 0, 0, /* replaced with index into relocation table. */
5227 0xe9, /* jmp relative */
5228 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
5229
5230 /* 22 bytes of nop to pad out to the standard size. */
5231 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5232 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5233 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
5234 };
5235
5236 /* .eh_frame covering the .plt section. */
5237
5238 static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
5239 {
5240 #if (PLT_CIE_LENGTH != 20 \
5241 || PLT_FDE_LENGTH != 36 \
5242 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
5243 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
5244 # error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
5245 #endif
5246 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
5247 0, 0, 0, 0, /* CIE ID */
5248 1, /* CIE version */
5249 'z', 'R', 0, /* Augmentation string */
5250 1, /* Code alignment factor */
5251 0x78, /* Data alignment factor */
5252 16, /* Return address column */
5253 1, /* Augmentation size */
5254 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
5255 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
5256 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
5257 DW_CFA_nop, DW_CFA_nop,
5258
5259 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
5260 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
5261 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
5262 0, 0, 0, 0, /* .plt size goes here */
5263 0, /* Augmentation size */
5264 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
5265 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
5266 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
5267 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
5268 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
5269 13, /* Block length */
5270 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
5271 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
5272 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
5273 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
5274 DW_CFA_nop, DW_CFA_nop
5275 };
5276
5277 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt =
5278 {
5279 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
5280 NACL_PLT_ENTRY_SIZE, /* plt0_entry_size */
5281 elf_x86_64_nacl_plt_entry, /* plt_entry */
5282 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
5283 elf_x86_64_nacl_plt0_entry, /* plt_tlsdesc_entry */
5284 NACL_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
5285 2, /* plt_tlsdesc_got1_offset */
5286 9, /* plt_tlsdesc_got2_offset */
5287 6, /* plt_tlsdesc_got1_insn_end */
5288 13, /* plt_tlsdesc_got2_insn_end */
5289 2, /* plt0_got1_offset */
5290 9, /* plt0_got2_offset */
5291 13, /* plt0_got2_insn_end */
5292 3, /* plt_got_offset */
5293 33, /* plt_reloc_offset */
5294 38, /* plt_plt_offset */
5295 7, /* plt_got_insn_size */
5296 42, /* plt_plt_insn_end */
5297 32, /* plt_lazy_offset */
5298 elf_x86_64_nacl_plt0_entry, /* pic_plt0_entry */
5299 elf_x86_64_nacl_plt_entry, /* pic_plt_entry */
5300 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
5301 sizeof (elf_x86_64_nacl_eh_frame_plt) /* eh_frame_plt_size */
5302 };
5303
5304 static const struct elf_x86_backend_data elf_x86_64_nacl_arch_bed =
5305 {
5306 is_nacl /* os */
5307 };
5308
5309 #undef elf_backend_arch_data
5310 #define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
5311
5312 #undef elf_backend_object_p
5313 #define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
5314 #undef elf_backend_modify_segment_map
5315 #define elf_backend_modify_segment_map nacl_modify_segment_map
5316 #undef elf_backend_modify_program_headers
5317 #define elf_backend_modify_program_headers nacl_modify_program_headers
5318 #undef elf_backend_final_write_processing
5319 #define elf_backend_final_write_processing nacl_final_write_processing
5320
5321 #include "elf64-target.h"
5322
5323 /* Native Client x32 support. */
5324
5325 static bfd_boolean
5326 elf32_x86_64_nacl_elf_object_p (bfd *abfd)
5327 {
5328 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
5329 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
5330 return TRUE;
5331 }
5332
5333 #undef TARGET_LITTLE_SYM
5334 #define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
5335 #undef TARGET_LITTLE_NAME
5336 #define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
5337 #undef elf32_bed
5338 #define elf32_bed elf32_x86_64_nacl_bed
5339
5340 #define bfd_elf32_bfd_reloc_type_lookup \
5341 elf_x86_64_reloc_type_lookup
5342 #define bfd_elf32_bfd_reloc_name_lookup \
5343 elf_x86_64_reloc_name_lookup
5344 #define bfd_elf32_get_synthetic_symtab \
5345 elf_x86_64_get_synthetic_symtab
5346
5347 #undef elf_backend_object_p
5348 #define elf_backend_object_p \
5349 elf32_x86_64_nacl_elf_object_p
5350
5351 #undef elf_backend_bfd_from_remote_memory
5352 #define elf_backend_bfd_from_remote_memory \
5353 _bfd_elf32_bfd_from_remote_memory
5354
5355 #undef elf_backend_size_info
5356 #define elf_backend_size_info \
5357 _bfd_elf32_size_info
5358
5359 #undef elf32_bed
5360 #define elf32_bed elf32_x86_64_bed
5361
5362 #include "elf32-target.h"
5363
5364 /* Restore defaults. */
5365 #undef elf_backend_object_p
5366 #define elf_backend_object_p elf64_x86_64_elf_object_p
5367 #undef elf_backend_bfd_from_remote_memory
5368 #undef elf_backend_size_info
5369 #undef elf_backend_modify_segment_map
5370 #undef elf_backend_modify_program_headers
5371 #undef elf_backend_final_write_processing
5372
5373 /* Intel L1OM support. */
5374
5375 static bfd_boolean
5376 elf64_l1om_elf_object_p (bfd *abfd)
5377 {
5378 /* Set the right machine number for an L1OM elf64 file. */
5379 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
5380 return TRUE;
5381 }
5382
5383 #undef TARGET_LITTLE_SYM
5384 #define TARGET_LITTLE_SYM l1om_elf64_vec
5385 #undef TARGET_LITTLE_NAME
5386 #define TARGET_LITTLE_NAME "elf64-l1om"
5387 #undef ELF_ARCH
5388 #define ELF_ARCH bfd_arch_l1om
5389
5390 #undef ELF_MACHINE_CODE
5391 #define ELF_MACHINE_CODE EM_L1OM
5392
5393 #undef ELF_OSABI
5394
5395 #undef elf64_bed
5396 #define elf64_bed elf64_l1om_bed
5397
5398 #undef elf_backend_object_p
5399 #define elf_backend_object_p elf64_l1om_elf_object_p
5400
5401 /* Restore defaults. */
5402 #undef ELF_MAXPAGESIZE
5403 #undef ELF_MINPAGESIZE
5404 #undef ELF_COMMONPAGESIZE
5405 #if DEFAULT_LD_Z_SEPARATE_CODE
5406 # define ELF_MAXPAGESIZE 0x1000
5407 #else
5408 # define ELF_MAXPAGESIZE 0x200000
5409 #endif
5410 #define ELF_MINPAGESIZE 0x1000
5411 #define ELF_COMMONPAGESIZE 0x1000
5412 #undef elf_backend_plt_alignment
5413 #define elf_backend_plt_alignment 4
5414 #undef elf_backend_arch_data
5415 #define elf_backend_arch_data &elf_x86_64_arch_bed
5416
5417 #include "elf64-target.h"
5418
5419 /* FreeBSD L1OM support. */
5420
5421 #undef TARGET_LITTLE_SYM
5422 #define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
5423 #undef TARGET_LITTLE_NAME
5424 #define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
5425
5426 #undef ELF_OSABI
5427 #define ELF_OSABI ELFOSABI_FREEBSD
5428
5429 #undef elf64_bed
5430 #define elf64_bed elf64_l1om_fbsd_bed
5431
5432 #include "elf64-target.h"
5433
5434 /* Intel K1OM support. */
5435
5436 static bfd_boolean
5437 elf64_k1om_elf_object_p (bfd *abfd)
5438 {
5439 /* Set the right machine number for an K1OM elf64 file. */
5440 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
5441 return TRUE;
5442 }
5443
5444 #undef TARGET_LITTLE_SYM
5445 #define TARGET_LITTLE_SYM k1om_elf64_vec
5446 #undef TARGET_LITTLE_NAME
5447 #define TARGET_LITTLE_NAME "elf64-k1om"
5448 #undef ELF_ARCH
5449 #define ELF_ARCH bfd_arch_k1om
5450
5451 #undef ELF_MACHINE_CODE
5452 #define ELF_MACHINE_CODE EM_K1OM
5453
5454 #undef ELF_OSABI
5455
5456 #undef elf64_bed
5457 #define elf64_bed elf64_k1om_bed
5458
5459 #undef elf_backend_object_p
5460 #define elf_backend_object_p elf64_k1om_elf_object_p
5461
5462 #undef elf_backend_static_tls_alignment
5463
5464 #undef elf_backend_want_plt_sym
5465 #define elf_backend_want_plt_sym 0
5466
5467 #include "elf64-target.h"
5468
5469 /* FreeBSD K1OM support. */
5470
5471 #undef TARGET_LITTLE_SYM
5472 #define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
5473 #undef TARGET_LITTLE_NAME
5474 #define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
5475
5476 #undef ELF_OSABI
5477 #define ELF_OSABI ELFOSABI_FREEBSD
5478
5479 #undef elf64_bed
5480 #define elf64_bed elf64_k1om_fbsd_bed
5481
5482 #include "elf64-target.h"
5483
5484 /* 32bit x86-64 support. */
5485
5486 #undef TARGET_LITTLE_SYM
5487 #define TARGET_LITTLE_SYM x86_64_elf32_vec
5488 #undef TARGET_LITTLE_NAME
5489 #define TARGET_LITTLE_NAME "elf32-x86-64"
5490 #undef elf32_bed
5491
5492 #undef ELF_ARCH
5493 #define ELF_ARCH bfd_arch_i386
5494
5495 #undef ELF_MACHINE_CODE
5496 #define ELF_MACHINE_CODE EM_X86_64
5497
5498 #undef ELF_OSABI
5499
5500 #undef elf_backend_object_p
5501 #define elf_backend_object_p \
5502 elf32_x86_64_elf_object_p
5503
5504 #undef elf_backend_bfd_from_remote_memory
5505 #define elf_backend_bfd_from_remote_memory \
5506 _bfd_elf32_bfd_from_remote_memory
5507
5508 #undef elf_backend_size_info
5509 #define elf_backend_size_info \
5510 _bfd_elf32_size_info
5511
5512 #include "elf32-target.h"
This page took 0.148307 seconds and 5 git commands to generate.