projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Error for mismatched powerpc ABI tags
[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 BFD_ASSERT (is_x86_elf (input_bfd, htab));
2393
2394 plt_entry_size = htab->plt.plt_entry_size;
2395 symtab_hdr = &elf_symtab_hdr (input_bfd);
2396 sym_hashes = elf_sym_hashes (input_bfd);
2397 local_got_offsets = elf_local_got_offsets (input_bfd);
2398 local_tlsdesc_gotents = elf_x86_local_tlsdesc_gotent (input_bfd);
2399
2400 _bfd_x86_elf_set_tls_module_base (info);
2401
2402 rel = wrel = relocs;
2403 relend = relocs + input_section->reloc_count;
2404 for (; rel < relend; wrel++, rel++)
2405 {
2406 unsigned int r_type, r_type_tls;
2407 reloc_howto_type *howto;
2408 unsigned long r_symndx;
2409 struct elf_link_hash_entry *h;
2410 struct elf_x86_link_hash_entry *eh;
2411 Elf_Internal_Sym *sym;
2412 asection *sec;
2413 bfd_vma off, offplt, plt_offset;
2414 bfd_vma relocation;
2415 bfd_boolean unresolved_reloc;
2416 bfd_reloc_status_type r;
2417 int tls_type;
2418 asection *base_got, *resolved_plt;
2419 bfd_vma st_size;
2420 bfd_boolean resolved_to_zero;
2421 bfd_boolean relative_reloc;
2422 bfd_boolean converted_reloc;
2423 bfd_boolean need_copy_reloc_in_pie;
2424
2425 r_type = ELF32_R_TYPE (rel->r_info);
2426 if (r_type == (int) R_X86_64_GNU_VTINHERIT
2427 || r_type == (int) R_X86_64_GNU_VTENTRY)
2428 {
2429 if (wrel != rel)
2430 *wrel = *rel;
2431 continue;
2432 }
2433
2434 r_symndx = htab->r_sym (rel->r_info);
2435 converted_reloc = (r_type & R_X86_64_converted_reloc_bit) != 0;
2436 if (converted_reloc)
2437 {
2438 r_type &= ~R_X86_64_converted_reloc_bit;
2439 rel->r_info = htab->r_info (r_symndx, r_type);
2440 }
2441
2442 if (r_type >= (int) R_X86_64_standard)
2443 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
2444
2445 if (r_type != (int) R_X86_64_32
2446 || ABI_64_P (output_bfd))
2447 howto = x86_64_elf_howto_table + r_type;
2448 else
2449 howto = (x86_64_elf_howto_table
2450 + ARRAY_SIZE (x86_64_elf_howto_table) - 1);
2451 h = NULL;
2452 sym = NULL;
2453 sec = NULL;
2454 unresolved_reloc = FALSE;
2455 if (r_symndx < symtab_hdr->sh_info)
2456 {
2457 sym = local_syms + r_symndx;
2458 sec = local_sections[r_symndx];
2459
2460 relocation = _bfd_elf_rela_local_sym (output_bfd, sym,
2461 &sec, rel);
2462 st_size = sym->st_size;
2463
2464 /* Relocate against local STT_GNU_IFUNC symbol. */
2465 if (!bfd_link_relocatable (info)
2466 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2467 {
2468 h = _bfd_elf_x86_get_local_sym_hash (htab, input_bfd,
2469 rel, FALSE);
2470 if (h == NULL)
2471 abort ();
2472
2473 /* Set STT_GNU_IFUNC symbol value. */
2474 h->root.u.def.value = sym->st_value;
2475 h->root.u.def.section = sec;
2476 }
2477 }
2478 else
2479 {
2480 bfd_boolean warned ATTRIBUTE_UNUSED;
2481 bfd_boolean ignored ATTRIBUTE_UNUSED;
2482
2483 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2484 r_symndx, symtab_hdr, sym_hashes,
2485 h, sec, relocation,
2486 unresolved_reloc, warned, ignored);
2487 st_size = h->size;
2488 }
2489
2490 if (sec != NULL && discarded_section (sec))
2491 {
2492 _bfd_clear_contents (howto, input_bfd, input_section,
2493 contents + rel->r_offset);
2494 wrel->r_offset = rel->r_offset;
2495 wrel->r_info = 0;
2496 wrel->r_addend = 0;
2497
2498 /* For ld -r, remove relocations in debug sections against
2499 sections defined in discarded sections. Not done for
2500 eh_frame editing code expects to be present. */
2501 if (bfd_link_relocatable (info)
2502 && (input_section->flags & SEC_DEBUGGING))
2503 wrel--;
2504
2505 continue;
2506 }
2507
2508 if (bfd_link_relocatable (info))
2509 {
2510 if (wrel != rel)
2511 *wrel = *rel;
2512 continue;
2513 }
2514
2515 if (rel->r_addend == 0 && !ABI_64_P (output_bfd))
2516 {
2517 if (r_type == R_X86_64_64)
2518 {
2519 /* For x32, treat R_X86_64_64 like R_X86_64_32 and
2520 zero-extend it to 64bit if addend is zero. */
2521 r_type = R_X86_64_32;
2522 memset (contents + rel->r_offset + 4, 0, 4);
2523 }
2524 else if (r_type == R_X86_64_SIZE64)
2525 {
2526 /* For x32, treat R_X86_64_SIZE64 like R_X86_64_SIZE32 and
2527 zero-extend it to 64bit if addend is zero. */
2528 r_type = R_X86_64_SIZE32;
2529 memset (contents + rel->r_offset + 4, 0, 4);
2530 }
2531 }
2532
2533 eh = (struct elf_x86_link_hash_entry *) h;
2534
2535 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
2536 it here if it is defined in a non-shared object. */
2537 if (h != NULL
2538 && h->type == STT_GNU_IFUNC
2539 && h->def_regular)
2540 {
2541 bfd_vma plt_index;
2542 const char *name;
2543
2544 if ((input_section->flags & SEC_ALLOC) == 0)
2545 {
2546 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2547 STT_GNU_IFUNC symbol as STT_FUNC. */
2548 if (elf_section_type (input_section) == SHT_NOTE)
2549 goto skip_ifunc;
2550 /* Dynamic relocs are not propagated for SEC_DEBUGGING
2551 sections because such sections are not SEC_ALLOC and
2552 thus ld.so will not process them. */
2553 if ((input_section->flags & SEC_DEBUGGING) != 0)
2554 continue;
2555 abort ();
2556 }
2557
2558 switch (r_type)
2559 {
2560 default:
2561 break;
2562
2563 case R_X86_64_GOTPCREL:
2564 case R_X86_64_GOTPCRELX:
2565 case R_X86_64_REX_GOTPCRELX:
2566 case R_X86_64_GOTPCREL64:
2567 base_got = htab->elf.sgot;
2568 off = h->got.offset;
2569
2570 if (base_got == NULL)
2571 abort ();
2572
2573 if (off == (bfd_vma) -1)
2574 {
2575 /* We can't use h->got.offset here to save state, or
2576 even just remember the offset, as finish_dynamic_symbol
2577 would use that as offset into .got. */
2578
2579 if (h->plt.offset == (bfd_vma) -1)
2580 abort ();
2581
2582 if (htab->elf.splt != NULL)
2583 {
2584 plt_index = (h->plt.offset / plt_entry_size
2585 - htab->plt.has_plt0);
2586 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2587 base_got = htab->elf.sgotplt;
2588 }
2589 else
2590 {
2591 plt_index = h->plt.offset / plt_entry_size;
2592 off = plt_index * GOT_ENTRY_SIZE;
2593 base_got = htab->elf.igotplt;
2594 }
2595
2596 if (h->dynindx == -1
2597 || h->forced_local
2598 || info->symbolic)
2599 {
2600 /* This references the local defitionion. We must
2601 initialize this entry in the global offset table.
2602 Since the offset must always be a multiple of 8,
2603 we use the least significant bit to record
2604 whether we have initialized it already.
2605
2606 When doing a dynamic link, we create a .rela.got
2607 relocation entry to initialize the value. This
2608 is done in the finish_dynamic_symbol routine. */
2609 if ((off & 1) != 0)
2610 off &= ~1;
2611 else
2612 {
2613 bfd_put_64 (output_bfd, relocation,
2614 base_got->contents + off);
2615 /* Note that this is harmless for the GOTPLT64
2616 case, as -1 | 1 still is -1. */
2617 h->got.offset |= 1;
2618 }
2619 }
2620 }
2621
2622 relocation = (base_got->output_section->vma
2623 + base_got->output_offset + off);
2624
2625 goto do_relocation;
2626 }
2627
2628 if (h->plt.offset == (bfd_vma) -1)
2629 {
2630 /* Handle static pointers of STT_GNU_IFUNC symbols. */
2631 if (r_type == htab->pointer_r_type
2632 && (input_section->flags & SEC_CODE) == 0)
2633 goto do_ifunc_pointer;
2634 goto bad_ifunc_reloc;
2635 }
2636
2637 /* STT_GNU_IFUNC symbol must go through PLT. */
2638 if (htab->elf.splt != NULL)
2639 {
2640 if (htab->plt_second != NULL)
2641 {
2642 resolved_plt = htab->plt_second;
2643 plt_offset = eh->plt_second.offset;
2644 }
2645 else
2646 {
2647 resolved_plt = htab->elf.splt;
2648 plt_offset = h->plt.offset;
2649 }
2650 }
2651 else
2652 {
2653 resolved_plt = htab->elf.iplt;
2654 plt_offset = h->plt.offset;
2655 }
2656
2657 relocation = (resolved_plt->output_section->vma
2658 + resolved_plt->output_offset + plt_offset);
2659
2660 switch (r_type)
2661 {
2662 default:
2663 bad_ifunc_reloc:
2664 if (h->root.root.string)
2665 name = h->root.root.string;
2666 else
2667 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
2668 NULL);
2669 _bfd_error_handler
2670 /* xgettext:c-format */
2671 (_("%pB: relocation %s against STT_GNU_IFUNC "
2672 "symbol `%s' isn't supported"), input_bfd,
2673 howto->name, name);
2674 bfd_set_error (bfd_error_bad_value);
2675 return FALSE;
2676
2677 case R_X86_64_32S:
2678 if (bfd_link_pic (info))
2679 abort ();
2680 goto do_relocation;
2681
2682 case R_X86_64_32:
2683 if (ABI_64_P (output_bfd))
2684 goto do_relocation;
2685 /* FALLTHROUGH */
2686 case R_X86_64_64:
2687 do_ifunc_pointer:
2688 if (rel->r_addend != 0)
2689 {
2690 if (h->root.root.string)
2691 name = h->root.root.string;
2692 else
2693 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
2694 sym, NULL);
2695 _bfd_error_handler
2696 /* xgettext:c-format */
2697 (_("%pB: relocation %s against STT_GNU_IFUNC "
2698 "symbol `%s' has non-zero addend: %" PRId64),
2699 input_bfd, howto->name, name, (int64_t) rel->r_addend);
2700 bfd_set_error (bfd_error_bad_value);
2701 return FALSE;
2702 }
2703
2704 /* Generate dynamic relcoation only when there is a
2705 non-GOT reference in a shared object or there is no
2706 PLT. */
2707 if ((bfd_link_pic (info) && h->non_got_ref)
2708 || h->plt.offset == (bfd_vma) -1)
2709 {
2710 Elf_Internal_Rela outrel;
2711 asection *sreloc;
2712
2713 /* Need a dynamic relocation to get the real function
2714 address. */
2715 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
2716 info,
2717 input_section,
2718 rel->r_offset);
2719 if (outrel.r_offset == (bfd_vma) -1
2720 || outrel.r_offset == (bfd_vma) -2)
2721 abort ();
2722
2723 outrel.r_offset += (input_section->output_section->vma
2724 + input_section->output_offset);
2725
2726 if (POINTER_LOCAL_IFUNC_P (info, h))
2727 {
2728 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
2729 h->root.root.string,
2730 h->root.u.def.section->owner);
2731
2732 /* This symbol is resolved locally. */
2733 outrel.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
2734 outrel.r_addend = (h->root.u.def.value
2735 + h->root.u.def.section->output_section->vma
2736 + h->root.u.def.section->output_offset);
2737 }
2738 else
2739 {
2740 outrel.r_info = htab->r_info (h->dynindx, r_type);
2741 outrel.r_addend = 0;
2742 }
2743
2744 /* Dynamic relocations are stored in
2745 1. .rela.ifunc section in PIC object.
2746 2. .rela.got section in dynamic executable.
2747 3. .rela.iplt section in static executable. */
2748 if (bfd_link_pic (info))
2749 sreloc = htab->elf.irelifunc;
2750 else if (htab->elf.splt != NULL)
2751 sreloc = htab->elf.srelgot;
2752 else
2753 sreloc = htab->elf.irelplt;
2754 elf_append_rela (output_bfd, sreloc, &outrel);
2755
2756 /* If this reloc is against an external symbol, we
2757 do not want to fiddle with the addend. Otherwise,
2758 we need to include the symbol value so that it
2759 becomes an addend for the dynamic reloc. For an
2760 internal symbol, we have updated addend. */
2761 continue;
2762 }
2763 /* FALLTHROUGH */
2764 case R_X86_64_PC32:
2765 case R_X86_64_PC32_BND:
2766 case R_X86_64_PC64:
2767 case R_X86_64_PLT32:
2768 case R_X86_64_PLT32_BND:
2769 goto do_relocation;
2770 }
2771 }
2772
2773 skip_ifunc:
2774 resolved_to_zero = (eh != NULL
2775 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh));
2776
2777 /* When generating a shared object, the relocations handled here are
2778 copied into the output file to be resolved at run time. */
2779 switch (r_type)
2780 {
2781 case R_X86_64_GOT32:
2782 case R_X86_64_GOT64:
2783 /* Relocation is to the entry for this symbol in the global
2784 offset table. */
2785 case R_X86_64_GOTPCREL:
2786 case R_X86_64_GOTPCRELX:
2787 case R_X86_64_REX_GOTPCRELX:
2788 case R_X86_64_GOTPCREL64:
2789 /* Use global offset table entry as symbol value. */
2790 case R_X86_64_GOTPLT64:
2791 /* This is obsolete and treated the same as GOT64. */
2792 base_got = htab->elf.sgot;
2793
2794 if (htab->elf.sgot == NULL)
2795 abort ();
2796
2797 relative_reloc = FALSE;
2798 if (h != NULL)
2799 {
2800 off = h->got.offset;
2801 if (h->needs_plt
2802 && h->plt.offset != (bfd_vma)-1
2803 && off == (bfd_vma)-1)
2804 {
2805 /* We can't use h->got.offset here to save
2806 state, or even just remember the offset, as
2807 finish_dynamic_symbol would use that as offset into
2808 .got. */
2809 bfd_vma plt_index = (h->plt.offset / plt_entry_size
2810 - htab->plt.has_plt0);
2811 off = (plt_index + 3) * GOT_ENTRY_SIZE;
2812 base_got = htab->elf.sgotplt;
2813 }
2814
2815 if (RESOLVED_LOCALLY_P (info, h, htab))
2816 {
2817 /* We must initialize this entry in the global offset
2818 table. Since the offset must always be a multiple
2819 of 8, we use the least significant bit to record
2820 whether we have initialized it already.
2821
2822 When doing a dynamic link, we create a .rela.got
2823 relocation entry to initialize the value. This is
2824 done in the finish_dynamic_symbol routine. */
2825 if ((off & 1) != 0)
2826 off &= ~1;
2827 else
2828 {
2829 bfd_put_64 (output_bfd, relocation,
2830 base_got->contents + off);
2831 /* Note that this is harmless for the GOTPLT64 case,
2832 as -1 | 1 still is -1. */
2833 h->got.offset |= 1;
2834
2835 if (GENERATE_RELATIVE_RELOC_P (info, h))
2836 {
2837 /* If this symbol isn't dynamic in PIC,
2838 generate R_X86_64_RELATIVE here. */
2839 eh->no_finish_dynamic_symbol = 1;
2840 relative_reloc = TRUE;
2841 }
2842 }
2843 }
2844 else
2845 unresolved_reloc = FALSE;
2846 }
2847 else
2848 {
2849 if (local_got_offsets == NULL)
2850 abort ();
2851
2852 off = local_got_offsets[r_symndx];
2853
2854 /* The offset must always be a multiple of 8. We use
2855 the least significant bit to record whether we have
2856 already generated the necessary reloc. */
2857 if ((off & 1) != 0)
2858 off &= ~1;
2859 else
2860 {
2861 bfd_put_64 (output_bfd, relocation,
2862 base_got->contents + off);
2863 local_got_offsets[r_symndx] |= 1;
2864
2865 if (bfd_link_pic (info))
2866 relative_reloc = TRUE;
2867 }
2868 }
2869
2870 if (relative_reloc)
2871 {
2872 asection *s;
2873 Elf_Internal_Rela outrel;
2874
2875 /* We need to generate a R_X86_64_RELATIVE reloc
2876 for the dynamic linker. */
2877 s = htab->elf.srelgot;
2878 if (s == NULL)
2879 abort ();
2880
2881 outrel.r_offset = (base_got->output_section->vma
2882 + base_got->output_offset
2883 + off);
2884 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
2885 outrel.r_addend = relocation;
2886 elf_append_rela (output_bfd, s, &outrel);
2887 }
2888
2889 if (off >= (bfd_vma) -2)
2890 abort ();
2891
2892 relocation = base_got->output_section->vma
2893 + base_got->output_offset + off;
2894 if (r_type != R_X86_64_GOTPCREL
2895 && r_type != R_X86_64_GOTPCRELX
2896 && r_type != R_X86_64_REX_GOTPCRELX
2897 && r_type != R_X86_64_GOTPCREL64)
2898 relocation -= htab->elf.sgotplt->output_section->vma
2899 - htab->elf.sgotplt->output_offset;
2900
2901 break;
2902
2903 case R_X86_64_GOTOFF64:
2904 /* Relocation is relative to the start of the global offset
2905 table. */
2906
2907 /* Check to make sure it isn't a protected function or data
2908 symbol for shared library since it may not be local when
2909 used as function address or with copy relocation. We also
2910 need to make sure that a symbol is referenced locally. */
2911 if (bfd_link_pic (info) && h)
2912 {
2913 if (!h->def_regular)
2914 {
2915 const char *v;
2916
2917 switch (ELF_ST_VISIBILITY (h->other))
2918 {
2919 case STV_HIDDEN:
2920 v = _("hidden symbol");
2921 break;
2922 case STV_INTERNAL:
2923 v = _("internal symbol");
2924 break;
2925 case STV_PROTECTED:
2926 v = _("protected symbol");
2927 break;
2928 default:
2929 v = _("symbol");
2930 break;
2931 }
2932
2933 _bfd_error_handler
2934 /* xgettext:c-format */
2935 (_("%pB: relocation R_X86_64_GOTOFF64 against undefined %s"
2936 " `%s' can not be used when making a shared object"),
2937 input_bfd, v, h->root.root.string);
2938 bfd_set_error (bfd_error_bad_value);
2939 return FALSE;
2940 }
2941 else if (!bfd_link_executable (info)
2942 && !SYMBOL_REFERENCES_LOCAL_P (info, h)
2943 && (h->type == STT_FUNC
2944 || h->type == STT_OBJECT)
2945 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
2946 {
2947 _bfd_error_handler
2948 /* xgettext:c-format */
2949 (_("%pB: relocation R_X86_64_GOTOFF64 against protected %s"
2950 " `%s' can not be used when making a shared object"),
2951 input_bfd,
2952 h->type == STT_FUNC ? "function" : "data",
2953 h->root.root.string);
2954 bfd_set_error (bfd_error_bad_value);
2955 return FALSE;
2956 }
2957 }
2958
2959 /* Note that sgot is not involved in this
2960 calculation. We always want the start of .got.plt. If we
2961 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
2962 permitted by the ABI, we might have to change this
2963 calculation. */
2964 relocation -= htab->elf.sgotplt->output_section->vma
2965 + htab->elf.sgotplt->output_offset;
2966 break;
2967
2968 case R_X86_64_GOTPC32:
2969 case R_X86_64_GOTPC64:
2970 /* Use global offset table as symbol value. */
2971 relocation = htab->elf.sgotplt->output_section->vma
2972 + htab->elf.sgotplt->output_offset;
2973 unresolved_reloc = FALSE;
2974 break;
2975
2976 case R_X86_64_PLTOFF64:
2977 /* Relocation is PLT entry relative to GOT. For local
2978 symbols it's the symbol itself relative to GOT. */
2979 if (h != NULL
2980 /* See PLT32 handling. */
2981 && (h->plt.offset != (bfd_vma) -1
2982 || eh->plt_got.offset != (bfd_vma) -1)
2983 && htab->elf.splt != NULL)
2984 {
2985 if (eh->plt_got.offset != (bfd_vma) -1)
2986 {
2987 /* Use the GOT PLT. */
2988 resolved_plt = htab->plt_got;
2989 plt_offset = eh->plt_got.offset;
2990 }
2991 else if (htab->plt_second != NULL)
2992 {
2993 resolved_plt = htab->plt_second;
2994 plt_offset = eh->plt_second.offset;
2995 }
2996 else
2997 {
2998 resolved_plt = htab->elf.splt;
2999 plt_offset = h->plt.offset;
3000 }
3001
3002 relocation = (resolved_plt->output_section->vma
3003 + resolved_plt->output_offset
3004 + plt_offset);
3005 unresolved_reloc = FALSE;
3006 }
3007
3008 relocation -= htab->elf.sgotplt->output_section->vma
3009 + htab->elf.sgotplt->output_offset;
3010 break;
3011
3012 case R_X86_64_PLT32:
3013 case R_X86_64_PLT32_BND:
3014 /* Relocation is to the entry for this symbol in the
3015 procedure linkage table. */
3016
3017 /* Resolve a PLT32 reloc against a local symbol directly,
3018 without using the procedure linkage table. */
3019 if (h == NULL)
3020 break;
3021
3022 if ((h->plt.offset == (bfd_vma) -1
3023 && eh->plt_got.offset == (bfd_vma) -1)
3024 || htab->elf.splt == NULL)
3025 {
3026 /* We didn't make a PLT entry for this symbol. This
3027 happens when statically linking PIC code, or when
3028 using -Bsymbolic. */
3029 break;
3030 }
3031
3032 use_plt:
3033 if (h->plt.offset != (bfd_vma) -1)
3034 {
3035 if (htab->plt_second != NULL)
3036 {
3037 resolved_plt = htab->plt_second;
3038 plt_offset = eh->plt_second.offset;
3039 }
3040 else
3041 {
3042 resolved_plt = htab->elf.splt;
3043 plt_offset = h->plt.offset;
3044 }
3045 }
3046 else
3047 {
3048 /* Use the GOT PLT. */
3049 resolved_plt = htab->plt_got;
3050 plt_offset = eh->plt_got.offset;
3051 }
3052
3053 relocation = (resolved_plt->output_section->vma
3054 + resolved_plt->output_offset
3055 + plt_offset);
3056 unresolved_reloc = FALSE;
3057 break;
3058
3059 case R_X86_64_SIZE32:
3060 case R_X86_64_SIZE64:
3061 /* Set to symbol size. */
3062 relocation = st_size;
3063 goto direct;
3064
3065 case R_X86_64_PC8:
3066 case R_X86_64_PC16:
3067 case R_X86_64_PC32:
3068 case R_X86_64_PC32_BND:
3069 /* Don't complain about -fPIC if the symbol is undefined when
3070 building executable unless it is unresolved weak symbol,
3071 references a dynamic definition in PIE or -z nocopyreloc
3072 is used. */
3073 if ((input_section->flags & SEC_ALLOC) != 0
3074 && (input_section->flags & SEC_READONLY) != 0
3075 && h != NULL
3076 && ((bfd_link_executable (info)
3077 && ((h->root.type == bfd_link_hash_undefweak
3078 && !resolved_to_zero)
3079 || (bfd_link_pie (info)
3080 && !h->def_regular
3081 && h->def_dynamic)
3082 || ((info->nocopyreloc
3083 || (eh->def_protected
3084 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3085 && h->def_dynamic
3086 && !(h->root.u.def.section->flags & SEC_CODE))))
3087 || bfd_link_dll (info)))
3088 {
3089 bfd_boolean fail = FALSE;
3090 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
3091 {
3092 /* Symbol is referenced locally. Make sure it is
3093 defined locally. */
3094 fail = !(h->def_regular || ELF_COMMON_DEF_P (h));
3095 }
3096 else if (!(bfd_link_pie (info)
3097 && (h->needs_copy || eh->needs_copy)))
3098 {
3099 /* Symbol doesn't need copy reloc and isn't referenced
3100 locally. Address of protected function may not be
3101 reachable at run-time. */
3102 fail = (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3103 || (ELF_ST_VISIBILITY (h->other) == STV_PROTECTED
3104 && h->type == STT_FUNC));
3105 }
3106
3107 if (fail)
3108 return elf_x86_64_need_pic (info, input_bfd, input_section,
3109 h, NULL, NULL, howto);
3110 }
3111 /* Since x86-64 has PC-relative PLT, we can use PLT in PIE
3112 as function address. */
3113 else if (h != NULL
3114 && (input_section->flags & SEC_CODE) == 0
3115 && bfd_link_pie (info)
3116 && h->type == STT_FUNC
3117 && !h->def_regular
3118 && h->def_dynamic)
3119 goto use_plt;
3120 /* Fall through. */
3121
3122 case R_X86_64_8:
3123 case R_X86_64_16:
3124 case R_X86_64_32:
3125 case R_X86_64_PC64:
3126 case R_X86_64_64:
3127 /* FIXME: The ABI says the linker should make sure the value is
3128 the same when it's zeroextended to 64 bit. */
3129
3130 direct:
3131 if ((input_section->flags & SEC_ALLOC) == 0)
3132 break;
3133
3134 need_copy_reloc_in_pie = (bfd_link_pie (info)
3135 && h != NULL
3136 && (h->needs_copy
3137 || eh->needs_copy
3138 || (h->root.type
3139 == bfd_link_hash_undefined))
3140 && (X86_PCREL_TYPE_P (r_type)
3141 || X86_SIZE_TYPE_P (r_type)));
3142
3143 if (GENERATE_DYNAMIC_RELOCATION_P (info, eh, r_type,
3144 need_copy_reloc_in_pie,
3145 resolved_to_zero, FALSE))
3146 {
3147 Elf_Internal_Rela outrel;
3148 bfd_boolean skip, relocate;
3149 asection *sreloc;
3150
3151 /* When generating a shared object, these relocations
3152 are copied into the output file to be resolved at run
3153 time. */
3154 skip = FALSE;
3155 relocate = FALSE;
3156
3157 outrel.r_offset =
3158 _bfd_elf_section_offset (output_bfd, info, input_section,
3159 rel->r_offset);
3160 if (outrel.r_offset == (bfd_vma) -1)
3161 skip = TRUE;
3162 else if (outrel.r_offset == (bfd_vma) -2)
3163 skip = TRUE, relocate = TRUE;
3164
3165 outrel.r_offset += (input_section->output_section->vma
3166 + input_section->output_offset);
3167
3168 if (skip)
3169 memset (&outrel, 0, sizeof outrel);
3170
3171 else if (COPY_INPUT_RELOC_P (info, h, r_type))
3172 {
3173 outrel.r_info = htab->r_info (h->dynindx, r_type);
3174 outrel.r_addend = rel->r_addend;
3175 }
3176 else
3177 {
3178 /* This symbol is local, or marked to become local.
3179 When relocation overflow check is disabled, we
3180 convert R_X86_64_32 to dynamic R_X86_64_RELATIVE. */
3181 if (r_type == htab->pointer_r_type
3182 || (r_type == R_X86_64_32
3183 && info->no_reloc_overflow_check))
3184 {
3185 relocate = TRUE;
3186 outrel.r_info = htab->r_info (0, R_X86_64_RELATIVE);
3187 outrel.r_addend = relocation + rel->r_addend;
3188 }
3189 else if (r_type == R_X86_64_64
3190 && !ABI_64_P (output_bfd))
3191 {
3192 relocate = TRUE;
3193 outrel.r_info = htab->r_info (0,
3194 R_X86_64_RELATIVE64);
3195 outrel.r_addend = relocation + rel->r_addend;
3196 /* Check addend overflow. */
3197 if ((outrel.r_addend & 0x80000000)
3198 != (rel->r_addend & 0x80000000))
3199 {
3200 const char *name;
3201 int addend = rel->r_addend;
3202 if (h && h->root.root.string)
3203 name = h->root.root.string;
3204 else
3205 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
3206 sym, NULL);
3207 _bfd_error_handler
3208 /* xgettext:c-format */
3209 (_("%pB: addend %s%#x in relocation %s against "
3210 "symbol `%s' at %#" PRIx64
3211 " in section `%pA' is out of range"),
3212 input_bfd, addend < 0 ? "-" : "", addend,
3213 howto->name, name, (uint64_t) rel->r_offset,
3214 input_section);
3215 bfd_set_error (bfd_error_bad_value);
3216 return FALSE;
3217 }
3218 }
3219 else
3220 {
3221 long sindx;
3222
3223 if (bfd_is_abs_section (sec))
3224 sindx = 0;
3225 else if (sec == NULL || sec->owner == NULL)
3226 {
3227 bfd_set_error (bfd_error_bad_value);
3228 return FALSE;
3229 }
3230 else
3231 {
3232 asection *osec;
3233
3234 /* We are turning this relocation into one
3235 against a section symbol. It would be
3236 proper to subtract the symbol's value,
3237 osec->vma, from the emitted reloc addend,
3238 but ld.so expects buggy relocs. */
3239 osec = sec->output_section;
3240 sindx = elf_section_data (osec)->dynindx;
3241 if (sindx == 0)
3242 {
3243 asection *oi = htab->elf.text_index_section;
3244 sindx = elf_section_data (oi)->dynindx;
3245 }
3246 BFD_ASSERT (sindx != 0);
3247 }
3248
3249 outrel.r_info = htab->r_info (sindx, r_type);
3250 outrel.r_addend = relocation + rel->r_addend;
3251 }
3252 }
3253
3254 sreloc = elf_section_data (input_section)->sreloc;
3255
3256 if (sreloc == NULL || sreloc->contents == NULL)
3257 {
3258 r = bfd_reloc_notsupported;
3259 goto check_relocation_error;
3260 }
3261
3262 elf_append_rela (output_bfd, sreloc, &outrel);
3263
3264 /* If this reloc is against an external symbol, we do
3265 not want to fiddle with the addend. Otherwise, we
3266 need to include the symbol value so that it becomes
3267 an addend for the dynamic reloc. */
3268 if (! relocate)
3269 continue;
3270 }
3271
3272 break;
3273
3274 case R_X86_64_TLSGD:
3275 case R_X86_64_GOTPC32_TLSDESC:
3276 case R_X86_64_TLSDESC_CALL:
3277 case R_X86_64_GOTTPOFF:
3278 tls_type = GOT_UNKNOWN;
3279 if (h == NULL && local_got_offsets)
3280 tls_type = elf_x86_local_got_tls_type (input_bfd) [r_symndx];
3281 else if (h != NULL)
3282 tls_type = elf_x86_hash_entry (h)->tls_type;
3283
3284 r_type_tls = r_type;
3285 if (! elf_x86_64_tls_transition (info, input_bfd,
3286 input_section, contents,
3287 symtab_hdr, sym_hashes,
3288 &r_type_tls, tls_type, rel,
3289 relend, h, r_symndx, TRUE))
3290 return FALSE;
3291
3292 if (r_type_tls == R_X86_64_TPOFF32)
3293 {
3294 bfd_vma roff = rel->r_offset;
3295
3296 BFD_ASSERT (! unresolved_reloc);
3297
3298 if (r_type == R_X86_64_TLSGD)
3299 {
3300 /* GD->LE transition. For 64bit, change
3301 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3302 .word 0x6666; rex64; call __tls_get_addr@PLT
3303 or
3304 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3305 .byte 0x66; rex64
3306 call *__tls_get_addr@GOTPCREL(%rip)
3307 which may be converted to
3308 addr32 call __tls_get_addr
3309 into:
3310 movq %fs:0, %rax
3311 leaq foo@tpoff(%rax), %rax
3312 For 32bit, change
3313 leaq foo@tlsgd(%rip), %rdi
3314 .word 0x6666; rex64; call __tls_get_addr@PLT
3315 or
3316 leaq foo@tlsgd(%rip), %rdi
3317 .byte 0x66; rex64
3318 call *__tls_get_addr@GOTPCREL(%rip)
3319 which may be converted to
3320 addr32 call __tls_get_addr
3321 into:
3322 movl %fs:0, %eax
3323 leaq foo@tpoff(%rax), %rax
3324 For largepic, change:
3325 leaq foo@tlsgd(%rip), %rdi
3326 movabsq $__tls_get_addr@pltoff, %rax
3327 addq %r15, %rax
3328 call *%rax
3329 into:
3330 movq %fs:0, %rax
3331 leaq foo@tpoff(%rax), %rax
3332 nopw 0x0(%rax,%rax,1) */
3333 int largepic = 0;
3334 if (ABI_64_P (output_bfd))
3335 {
3336 if (contents[roff + 5] == 0xb8)
3337 {
3338 memcpy (contents + roff - 3,
3339 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80"
3340 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3341 largepic = 1;
3342 }
3343 else
3344 memcpy (contents + roff - 4,
3345 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3346 16);
3347 }
3348 else
3349 memcpy (contents + roff - 3,
3350 "\x64\x8b\x04\x25\0\0\0\0\x48\x8d\x80\0\0\0",
3351 15);
3352 bfd_put_32 (output_bfd,
3353 elf_x86_64_tpoff (info, relocation),
3354 contents + roff + 8 + largepic);
3355 /* Skip R_X86_64_PC32, R_X86_64_PLT32,
3356 R_X86_64_GOTPCRELX and R_X86_64_PLTOFF64. */
3357 rel++;
3358 wrel++;
3359 continue;
3360 }
3361 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3362 {
3363 /* GDesc -> LE transition.
3364 It's originally something like:
3365 leaq x@tlsdesc(%rip), %rax
3366
3367 Change it to:
3368 movl $x@tpoff, %rax. */
3369
3370 unsigned int val, type;
3371
3372 type = bfd_get_8 (input_bfd, contents + roff - 3);
3373 val = bfd_get_8 (input_bfd, contents + roff - 1);
3374 bfd_put_8 (output_bfd, 0x48 | ((type >> 2) & 1),
3375 contents + roff - 3);
3376 bfd_put_8 (output_bfd, 0xc7, contents + roff - 2);
3377 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3378 contents + roff - 1);
3379 bfd_put_32 (output_bfd,
3380 elf_x86_64_tpoff (info, relocation),
3381 contents + roff);
3382 continue;
3383 }
3384 else if (r_type == R_X86_64_TLSDESC_CALL)
3385 {
3386 /* GDesc -> LE transition.
3387 It's originally:
3388 call *(%rax)
3389 Turn it into:
3390 xchg %ax,%ax. */
3391 bfd_put_8 (output_bfd, 0x66, contents + roff);
3392 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3393 continue;
3394 }
3395 else if (r_type == R_X86_64_GOTTPOFF)
3396 {
3397 /* IE->LE transition:
3398 For 64bit, originally it can be one of:
3399 movq foo@gottpoff(%rip), %reg
3400 addq foo@gottpoff(%rip), %reg
3401 We change it into:
3402 movq $foo, %reg
3403 leaq foo(%reg), %reg
3404 addq $foo, %reg.
3405 For 32bit, originally it can be one of:
3406 movq foo@gottpoff(%rip), %reg
3407 addl foo@gottpoff(%rip), %reg
3408 We change it into:
3409 movq $foo, %reg
3410 leal foo(%reg), %reg
3411 addl $foo, %reg. */
3412
3413 unsigned int val, type, reg;
3414
3415 if (roff >= 3)
3416 val = bfd_get_8 (input_bfd, contents + roff - 3);
3417 else
3418 val = 0;
3419 type = bfd_get_8 (input_bfd, contents + roff - 2);
3420 reg = bfd_get_8 (input_bfd, contents + roff - 1);
3421 reg >>= 3;
3422 if (type == 0x8b)
3423 {
3424 /* movq */
3425 if (val == 0x4c)
3426 bfd_put_8 (output_bfd, 0x49,
3427 contents + roff - 3);
3428 else if (!ABI_64_P (output_bfd) && val == 0x44)
3429 bfd_put_8 (output_bfd, 0x41,
3430 contents + roff - 3);
3431 bfd_put_8 (output_bfd, 0xc7,
3432 contents + roff - 2);
3433 bfd_put_8 (output_bfd, 0xc0 | reg,
3434 contents + roff - 1);
3435 }
3436 else if (reg == 4)
3437 {
3438 /* addq/addl -> addq/addl - addressing with %rsp/%r12
3439 is special */
3440 if (val == 0x4c)
3441 bfd_put_8 (output_bfd, 0x49,
3442 contents + roff - 3);
3443 else if (!ABI_64_P (output_bfd) && val == 0x44)
3444 bfd_put_8 (output_bfd, 0x41,
3445 contents + roff - 3);
3446 bfd_put_8 (output_bfd, 0x81,
3447 contents + roff - 2);
3448 bfd_put_8 (output_bfd, 0xc0 | reg,
3449 contents + roff - 1);
3450 }
3451 else
3452 {
3453 /* addq/addl -> leaq/leal */
3454 if (val == 0x4c)
3455 bfd_put_8 (output_bfd, 0x4d,
3456 contents + roff - 3);
3457 else if (!ABI_64_P (output_bfd) && val == 0x44)
3458 bfd_put_8 (output_bfd, 0x45,
3459 contents + roff - 3);
3460 bfd_put_8 (output_bfd, 0x8d,
3461 contents + roff - 2);
3462 bfd_put_8 (output_bfd, 0x80 | reg | (reg << 3),
3463 contents + roff - 1);
3464 }
3465 bfd_put_32 (output_bfd,
3466 elf_x86_64_tpoff (info, relocation),
3467 contents + roff);
3468 continue;
3469 }
3470 else
3471 BFD_ASSERT (FALSE);
3472 }
3473
3474 if (htab->elf.sgot == NULL)
3475 abort ();
3476
3477 if (h != NULL)
3478 {
3479 off = h->got.offset;
3480 offplt = elf_x86_hash_entry (h)->tlsdesc_got;
3481 }
3482 else
3483 {
3484 if (local_got_offsets == NULL)
3485 abort ();
3486
3487 off = local_got_offsets[r_symndx];
3488 offplt = local_tlsdesc_gotents[r_symndx];
3489 }
3490
3491 if ((off & 1) != 0)
3492 off &= ~1;
3493 else
3494 {
3495 Elf_Internal_Rela outrel;
3496 int dr_type, indx;
3497 asection *sreloc;
3498
3499 if (htab->elf.srelgot == NULL)
3500 abort ();
3501
3502 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3503
3504 if (GOT_TLS_GDESC_P (tls_type))
3505 {
3506 outrel.r_info = htab->r_info (indx, R_X86_64_TLSDESC);
3507 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt
3508 + 2 * GOT_ENTRY_SIZE <= htab->elf.sgotplt->size);
3509 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3510 + htab->elf.sgotplt->output_offset
3511 + offplt
3512 + htab->sgotplt_jump_table_size);
3513 sreloc = htab->elf.srelplt;
3514 if (indx == 0)
3515 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3516 else
3517 outrel.r_addend = 0;
3518 elf_append_rela (output_bfd, sreloc, &outrel);
3519 }
3520
3521 sreloc = htab->elf.srelgot;
3522
3523 outrel.r_offset = (htab->elf.sgot->output_section->vma
3524 + htab->elf.sgot->output_offset + off);
3525
3526 if (GOT_TLS_GD_P (tls_type))
3527 dr_type = R_X86_64_DTPMOD64;
3528 else if (GOT_TLS_GDESC_P (tls_type))
3529 goto dr_done;
3530 else
3531 dr_type = R_X86_64_TPOFF64;
3532
3533 bfd_put_64 (output_bfd, 0, htab->elf.sgot->contents + off);
3534 outrel.r_addend = 0;
3535 if ((dr_type == R_X86_64_TPOFF64
3536 || dr_type == R_X86_64_TLSDESC) && indx == 0)
3537 outrel.r_addend = relocation - _bfd_x86_elf_dtpoff_base (info);
3538 outrel.r_info = htab->r_info (indx, dr_type);
3539
3540 elf_append_rela (output_bfd, sreloc, &outrel);
3541
3542 if (GOT_TLS_GD_P (tls_type))
3543 {
3544 if (indx == 0)
3545 {
3546 BFD_ASSERT (! unresolved_reloc);
3547 bfd_put_64 (output_bfd,
3548 relocation - _bfd_x86_elf_dtpoff_base (info),
3549 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3550 }
3551 else
3552 {
3553 bfd_put_64 (output_bfd, 0,
3554 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3555 outrel.r_info = htab->r_info (indx,
3556 R_X86_64_DTPOFF64);
3557 outrel.r_offset += GOT_ENTRY_SIZE;
3558 elf_append_rela (output_bfd, sreloc,
3559 &outrel);
3560 }
3561 }
3562
3563 dr_done:
3564 if (h != NULL)
3565 h->got.offset |= 1;
3566 else
3567 local_got_offsets[r_symndx] |= 1;
3568 }
3569
3570 if (off >= (bfd_vma) -2
3571 && ! GOT_TLS_GDESC_P (tls_type))
3572 abort ();
3573 if (r_type_tls == r_type)
3574 {
3575 if (r_type == R_X86_64_GOTPC32_TLSDESC
3576 || r_type == R_X86_64_TLSDESC_CALL)
3577 relocation = htab->elf.sgotplt->output_section->vma
3578 + htab->elf.sgotplt->output_offset
3579 + offplt + htab->sgotplt_jump_table_size;
3580 else
3581 relocation = htab->elf.sgot->output_section->vma
3582 + htab->elf.sgot->output_offset + off;
3583 unresolved_reloc = FALSE;
3584 }
3585 else
3586 {
3587 bfd_vma roff = rel->r_offset;
3588
3589 if (r_type == R_X86_64_TLSGD)
3590 {
3591 /* GD->IE transition. For 64bit, change
3592 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3593 .word 0x6666; rex64; call __tls_get_addr@PLT
3594 or
3595 .byte 0x66; leaq foo@tlsgd(%rip), %rdi
3596 .byte 0x66; rex64
3597 call *__tls_get_addr@GOTPCREL(%rip
3598 which may be converted to
3599 addr32 call __tls_get_addr
3600 into:
3601 movq %fs:0, %rax
3602 addq foo@gottpoff(%rip), %rax
3603 For 32bit, change
3604 leaq foo@tlsgd(%rip), %rdi
3605 .word 0x6666; rex64; call __tls_get_addr@PLT
3606 or
3607 leaq foo@tlsgd(%rip), %rdi
3608 .byte 0x66; rex64;
3609 call *__tls_get_addr@GOTPCREL(%rip)
3610 which may be converted to
3611 addr32 call __tls_get_addr
3612 into:
3613 movl %fs:0, %eax
3614 addq foo@gottpoff(%rip), %rax
3615 For largepic, change:
3616 leaq foo@tlsgd(%rip), %rdi
3617 movabsq $__tls_get_addr@pltoff, %rax
3618 addq %r15, %rax
3619 call *%rax
3620 into:
3621 movq %fs:0, %rax
3622 addq foo@gottpoff(%rax), %rax
3623 nopw 0x0(%rax,%rax,1) */
3624 int largepic = 0;
3625 if (ABI_64_P (output_bfd))
3626 {
3627 if (contents[roff + 5] == 0xb8)
3628 {
3629 memcpy (contents + roff - 3,
3630 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05"
3631 "\0\0\0\0\x66\x0f\x1f\x44\0", 22);
3632 largepic = 1;
3633 }
3634 else
3635 memcpy (contents + roff - 4,
3636 "\x64\x48\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3637 16);
3638 }
3639 else
3640 memcpy (contents + roff - 3,
3641 "\x64\x8b\x04\x25\0\0\0\0\x48\x03\x05\0\0\0",
3642 15);
3643
3644 relocation = (htab->elf.sgot->output_section->vma
3645 + htab->elf.sgot->output_offset + off
3646 - roff
3647 - largepic
3648 - input_section->output_section->vma
3649 - input_section->output_offset
3650 - 12);
3651 bfd_put_32 (output_bfd, relocation,
3652 contents + roff + 8 + largepic);
3653 /* Skip R_X86_64_PLT32/R_X86_64_PLTOFF64. */
3654 rel++;
3655 wrel++;
3656 continue;
3657 }
3658 else if (r_type == R_X86_64_GOTPC32_TLSDESC)
3659 {
3660 /* GDesc -> IE transition.
3661 It's originally something like:
3662 leaq x@tlsdesc(%rip), %rax
3663
3664 Change it to:
3665 movq x@gottpoff(%rip), %rax # before xchg %ax,%ax. */
3666
3667 /* Now modify the instruction as appropriate. To
3668 turn a leaq into a movq in the form we use it, it
3669 suffices to change the second byte from 0x8d to
3670 0x8b. */
3671 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3672
3673 bfd_put_32 (output_bfd,
3674 htab->elf.sgot->output_section->vma
3675 + htab->elf.sgot->output_offset + off
3676 - rel->r_offset
3677 - input_section->output_section->vma
3678 - input_section->output_offset
3679 - 4,
3680 contents + roff);
3681 continue;
3682 }
3683 else if (r_type == R_X86_64_TLSDESC_CALL)
3684 {
3685 /* GDesc -> IE transition.
3686 It's originally:
3687 call *(%rax)
3688
3689 Change it to:
3690 xchg %ax, %ax. */
3691
3692 bfd_put_8 (output_bfd, 0x66, contents + roff);
3693 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3694 continue;
3695 }
3696 else
3697 BFD_ASSERT (FALSE);
3698 }
3699 break;
3700
3701 case R_X86_64_TLSLD:
3702 if (! elf_x86_64_tls_transition (info, input_bfd,
3703 input_section, contents,
3704 symtab_hdr, sym_hashes,
3705 &r_type, GOT_UNKNOWN, rel,
3706 relend, h, r_symndx, TRUE))
3707 return FALSE;
3708
3709 if (r_type != R_X86_64_TLSLD)
3710 {
3711 /* LD->LE transition:
3712 leaq foo@tlsld(%rip), %rdi
3713 call __tls_get_addr@PLT
3714 For 64bit, we change it into:
3715 .word 0x6666; .byte 0x66; movq %fs:0, %rax
3716 For 32bit, we change it into:
3717 nopl 0x0(%rax); movl %fs:0, %eax
3718 Or
3719 leaq foo@tlsld(%rip), %rdi;
3720 call *__tls_get_addr@GOTPCREL(%rip)
3721 which may be converted to
3722 addr32 call __tls_get_addr
3723 For 64bit, we change it into:
3724 .word 0x6666; .word 0x6666; movq %fs:0, %rax
3725 For 32bit, we change it into:
3726 nopw 0x0(%rax); movl %fs:0, %eax
3727 For largepic, change:
3728 leaq foo@tlsgd(%rip), %rdi
3729 movabsq $__tls_get_addr@pltoff, %rax
3730 addq %rbx, %rax
3731 call *%rax
3732 into
3733 data16 data16 data16 nopw %cs:0x0(%rax,%rax,1)
3734 movq %fs:0, %eax */
3735
3736 BFD_ASSERT (r_type == R_X86_64_TPOFF32);
3737 if (ABI_64_P (output_bfd))
3738 {
3739 if (contents[rel->r_offset + 5] == 0xb8)
3740 memcpy (contents + rel->r_offset - 3,
3741 "\x66\x66\x66\x66\x2e\x0f\x1f\x84\0\0\0\0\0"
3742 "\x64\x48\x8b\x04\x25\0\0\0", 22);
3743 else if (contents[rel->r_offset + 4] == 0xff
3744 || contents[rel->r_offset + 4] == 0x67)
3745 memcpy (contents + rel->r_offset - 3,
3746 "\x66\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0",
3747 13);
3748 else
3749 memcpy (contents + rel->r_offset - 3,
3750 "\x66\x66\x66\x64\x48\x8b\x04\x25\0\0\0", 12);
3751 }
3752 else
3753 {
3754 if (contents[rel->r_offset + 4] == 0xff)
3755 memcpy (contents + rel->r_offset - 3,
3756 "\x66\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0",
3757 13);
3758 else
3759 memcpy (contents + rel->r_offset - 3,
3760 "\x0f\x1f\x40\x00\x64\x8b\x04\x25\0\0\0", 12);
3761 }
3762 /* Skip R_X86_64_PC32, R_X86_64_PLT32, R_X86_64_GOTPCRELX
3763 and R_X86_64_PLTOFF64. */
3764 rel++;
3765 wrel++;
3766 continue;
3767 }
3768
3769 if (htab->elf.sgot == NULL)
3770 abort ();
3771
3772 off = htab->tls_ld_or_ldm_got.offset;
3773 if (off & 1)
3774 off &= ~1;
3775 else
3776 {
3777 Elf_Internal_Rela outrel;
3778
3779 if (htab->elf.srelgot == NULL)
3780 abort ();
3781
3782 outrel.r_offset = (htab->elf.sgot->output_section->vma
3783 + htab->elf.sgot->output_offset + off);
3784
3785 bfd_put_64 (output_bfd, 0,
3786 htab->elf.sgot->contents + off);
3787 bfd_put_64 (output_bfd, 0,
3788 htab->elf.sgot->contents + off + GOT_ENTRY_SIZE);
3789 outrel.r_info = htab->r_info (0, R_X86_64_DTPMOD64);
3790 outrel.r_addend = 0;
3791 elf_append_rela (output_bfd, htab->elf.srelgot,
3792 &outrel);
3793 htab->tls_ld_or_ldm_got.offset |= 1;
3794 }
3795 relocation = htab->elf.sgot->output_section->vma
3796 + htab->elf.sgot->output_offset + off;
3797 unresolved_reloc = FALSE;
3798 break;
3799
3800 case R_X86_64_DTPOFF32:
3801 if (!bfd_link_executable (info)
3802 || (input_section->flags & SEC_CODE) == 0)
3803 relocation -= _bfd_x86_elf_dtpoff_base (info);
3804 else
3805 relocation = elf_x86_64_tpoff (info, relocation);
3806 break;
3807
3808 case R_X86_64_TPOFF32:
3809 case R_X86_64_TPOFF64:
3810 BFD_ASSERT (bfd_link_executable (info));
3811 relocation = elf_x86_64_tpoff (info, relocation);
3812 break;
3813
3814 case R_X86_64_DTPOFF64:
3815 BFD_ASSERT ((input_section->flags & SEC_CODE) == 0);
3816 relocation -= _bfd_x86_elf_dtpoff_base (info);
3817 break;
3818
3819 default:
3820 break;
3821 }
3822
3823 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3824 because such sections are not SEC_ALLOC and thus ld.so will
3825 not process them. */
3826 if (unresolved_reloc
3827 && !((input_section->flags & SEC_DEBUGGING) != 0
3828 && h->def_dynamic)
3829 && _bfd_elf_section_offset (output_bfd, info, input_section,
3830 rel->r_offset) != (bfd_vma) -1)
3831 {
3832 switch (r_type)
3833 {
3834 case R_X86_64_32S:
3835 sec = h->root.u.def.section;
3836 if ((info->nocopyreloc
3837 || (eh->def_protected
3838 && elf_has_no_copy_on_protected (h->root.u.def.section->owner)))
3839 && !(h->root.u.def.section->flags & SEC_CODE))
3840 return elf_x86_64_need_pic (info, input_bfd, input_section,
3841 h, NULL, NULL, howto);
3842 /* Fall through. */
3843
3844 default:
3845 _bfd_error_handler
3846 /* xgettext:c-format */
3847 (_("%pB(%pA+%#" PRIx64 "): "
3848 "unresolvable %s relocation against symbol `%s'"),
3849 input_bfd,
3850 input_section,
3851 (uint64_t) rel->r_offset,
3852 howto->name,
3853 h->root.root.string);
3854 return FALSE;
3855 }
3856 }
3857
3858 do_relocation:
3859 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
3860 contents, rel->r_offset,
3861 relocation, rel->r_addend);
3862
3863 check_relocation_error:
3864 if (r != bfd_reloc_ok)
3865 {
3866 const char *name;
3867
3868 if (h != NULL)
3869 name = h->root.root.string;
3870 else
3871 {
3872 name = bfd_elf_string_from_elf_section (input_bfd,
3873 symtab_hdr->sh_link,
3874 sym->st_name);
3875 if (name == NULL)
3876 return FALSE;
3877 if (*name == '\0')
3878 name = bfd_section_name (input_bfd, sec);
3879 }
3880
3881 if (r == bfd_reloc_overflow)
3882 {
3883 if (converted_reloc)
3884 {
3885 info->callbacks->einfo
3886 (_("%F%P: failed to convert GOTPCREL relocation; relink with --no-relax\n"));
3887 return FALSE;
3888 }
3889 (*info->callbacks->reloc_overflow)
3890 (info, (h ? &h->root : NULL), name, howto->name,
3891 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3892 }
3893 else
3894 {
3895 _bfd_error_handler
3896 /* xgettext:c-format */
3897 (_("%pB(%pA+%#" PRIx64 "): reloc against `%s': error %d"),
3898 input_bfd, input_section,
3899 (uint64_t) rel->r_offset, name, (int) r);
3900 return FALSE;
3901 }
3902 }
3903
3904 if (wrel != rel)
3905 *wrel = *rel;
3906 }
3907
3908 if (wrel != rel)
3909 {
3910 Elf_Internal_Shdr *rel_hdr;
3911 size_t deleted = rel - wrel;
3912
3913 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section);
3914 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3915 if (rel_hdr->sh_size == 0)
3916 {
3917 /* It is too late to remove an empty reloc section. Leave
3918 one NONE reloc.
3919 ??? What is wrong with an empty section??? */
3920 rel_hdr->sh_size = rel_hdr->sh_entsize;
3921 deleted -= 1;
3922 }
3923 rel_hdr = _bfd_elf_single_rel_hdr (input_section);
3924 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted;
3925 input_section->reloc_count -= deleted;
3926 }
3927
3928 return TRUE;
3929 }
3930
3931 /* Finish up dynamic symbol handling. We set the contents of various
3932 dynamic sections here. */
3933
3934 static bfd_boolean
3935 elf_x86_64_finish_dynamic_symbol (bfd *output_bfd,
3936 struct bfd_link_info *info,
3937 struct elf_link_hash_entry *h,
3938 Elf_Internal_Sym *sym)
3939 {
3940 struct elf_x86_link_hash_table *htab;
3941 bfd_boolean use_plt_second;
3942 struct elf_x86_link_hash_entry *eh;
3943 bfd_boolean local_undefweak;
3944
3945 htab = elf_x86_hash_table (info, X86_64_ELF_DATA);
3946 if (htab == NULL)
3947 return FALSE;
3948
3949 /* Use the second PLT section only if there is .plt section. */
3950 use_plt_second = htab->elf.splt != NULL && htab->plt_second != NULL;
3951
3952 eh = (struct elf_x86_link_hash_entry *) h;
3953 if (eh->no_finish_dynamic_symbol)
3954 abort ();
3955
3956 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
3957 resolved undefined weak symbols in executable so that their
3958 references have value 0 at run-time. */
3959 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
3960
3961 if (h->plt.offset != (bfd_vma) -1)
3962 {
3963 bfd_vma plt_index;
3964 bfd_vma got_offset, plt_offset;
3965 Elf_Internal_Rela rela;
3966 bfd_byte *loc;
3967 asection *plt, *gotplt, *relplt, *resolved_plt;
3968 const struct elf_backend_data *bed;
3969 bfd_vma plt_got_pcrel_offset;
3970
3971 /* When building a static executable, use .iplt, .igot.plt and
3972 .rela.iplt sections for STT_GNU_IFUNC symbols. */
3973 if (htab->elf.splt != NULL)
3974 {
3975 plt = htab->elf.splt;
3976 gotplt = htab->elf.sgotplt;
3977 relplt = htab->elf.srelplt;
3978 }
3979 else
3980 {
3981 plt = htab->elf.iplt;
3982 gotplt = htab->elf.igotplt;
3983 relplt = htab->elf.irelplt;
3984 }
3985
3986 VERIFY_PLT_ENTRY (info, h, plt, gotplt, relplt, local_undefweak)
3987
3988 /* Get the index in the procedure linkage table which
3989 corresponds to this symbol. This is the index of this symbol
3990 in all the symbols for which we are making plt entries. The
3991 first entry in the procedure linkage table is reserved.
3992
3993 Get the offset into the .got table of the entry that
3994 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
3995 bytes. The first three are reserved for the dynamic linker.
3996
3997 For static executables, we don't reserve anything. */
3998
3999 if (plt == htab->elf.splt)
4000 {
4001 got_offset = (h->plt.offset / htab->plt.plt_entry_size
4002 - htab->plt.has_plt0);
4003 got_offset = (got_offset + 3) * GOT_ENTRY_SIZE;
4004 }
4005 else
4006 {
4007 got_offset = h->plt.offset / htab->plt.plt_entry_size;
4008 got_offset = got_offset * GOT_ENTRY_SIZE;
4009 }
4010
4011 /* Fill in the entry in the procedure linkage table. */
4012 memcpy (plt->contents + h->plt.offset, htab->plt.plt_entry,
4013 htab->plt.plt_entry_size);
4014 if (use_plt_second)
4015 {
4016 memcpy (htab->plt_second->contents + eh->plt_second.offset,
4017 htab->non_lazy_plt->plt_entry,
4018 htab->non_lazy_plt->plt_entry_size);
4019
4020 resolved_plt = htab->plt_second;
4021 plt_offset = eh->plt_second.offset;
4022 }
4023 else
4024 {
4025 resolved_plt = plt;
4026 plt_offset = h->plt.offset;
4027 }
4028
4029 /* Insert the relocation positions of the plt section. */
4030
4031 /* Put offset the PC-relative instruction referring to the GOT entry,
4032 subtracting the size of that instruction. */
4033 plt_got_pcrel_offset = (gotplt->output_section->vma
4034 + gotplt->output_offset
4035 + got_offset
4036 - resolved_plt->output_section->vma
4037 - resolved_plt->output_offset
4038 - plt_offset
4039 - htab->plt.plt_got_insn_size);
4040
4041 /* Check PC-relative offset overflow in PLT entry. */
4042 if ((plt_got_pcrel_offset + 0x80000000) > 0xffffffff)
4043 /* xgettext:c-format */
4044 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in PLT entry for `%s'\n"),
4045 output_bfd, h->root.root.string);
4046
4047 bfd_put_32 (output_bfd, plt_got_pcrel_offset,
4048 (resolved_plt->contents + plt_offset
4049 + htab->plt.plt_got_offset));
4050
4051 /* Fill in the entry in the global offset table, initially this
4052 points to the second part of the PLT entry. Leave the entry
4053 as zero for undefined weak symbol in PIE. No PLT relocation
4054 against undefined weak symbol in PIE. */
4055 if (!local_undefweak)
4056 {
4057 if (htab->plt.has_plt0)
4058 bfd_put_64 (output_bfd, (plt->output_section->vma
4059 + plt->output_offset
4060 + h->plt.offset
4061 + htab->lazy_plt->plt_lazy_offset),
4062 gotplt->contents + got_offset);
4063
4064 /* Fill in the entry in the .rela.plt section. */
4065 rela.r_offset = (gotplt->output_section->vma
4066 + gotplt->output_offset
4067 + got_offset);
4068 if (PLT_LOCAL_IFUNC_P (info, h))
4069 {
4070 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
4071 h->root.root.string,
4072 h->root.u.def.section->owner);
4073
4074 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4075 R_X86_64_IRELATIVE instead of R_X86_64_JUMP_SLOT. */
4076 rela.r_info = htab->r_info (0, R_X86_64_IRELATIVE);
4077 rela.r_addend = (h->root.u.def.value
4078 + h->root.u.def.section->output_section->vma
4079 + h->root.u.def.section->output_offset);
4080 /* R_X86_64_IRELATIVE comes last. */
4081 plt_index = htab->next_irelative_index--;
4082 }
4083 else
4084 {
4085 rela.r_info = htab->r_info (h->dynindx, R_X86_64_JUMP_SLOT);
4086 rela.r_addend = 0;
4087 plt_index = htab->next_jump_slot_index++;
4088 }
4089
4090 /* Don't fill the second and third slots in PLT entry for
4091 static executables nor without PLT0. */
4092 if (plt == htab->elf.splt && htab->plt.has_plt0)
4093 {
4094 bfd_vma plt0_offset
4095 = h->plt.offset + htab->lazy_plt->plt_plt_insn_end;
4096
4097 /* Put relocation index. */
4098 bfd_put_32 (output_bfd, plt_index,
4099 (plt->contents + h->plt.offset
4100 + htab->lazy_plt->plt_reloc_offset));
4101
4102 /* Put offset for jmp .PLT0 and check for overflow. We don't
4103 check relocation index for overflow since branch displacement
4104 will overflow first. */
4105 if (plt0_offset > 0x80000000)
4106 /* xgettext:c-format */
4107 info->callbacks->einfo (_("%F%pB: branch displacement overflow in PLT entry for `%s'\n"),
4108 output_bfd, h->root.root.string);
4109 bfd_put_32 (output_bfd, - plt0_offset,
4110 (plt->contents + h->plt.offset
4111 + htab->lazy_plt->plt_plt_offset));
4112 }
4113
4114 bed = get_elf_backend_data (output_bfd);
4115 loc = relplt->contents + plt_index * bed->s->sizeof_rela;
4116 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4117 }
4118 }
4119 else if (eh->plt_got.offset != (bfd_vma) -1)
4120 {
4121 bfd_vma got_offset, plt_offset;
4122 asection *plt, *got;
4123 bfd_boolean got_after_plt;
4124 int32_t got_pcrel_offset;
4125
4126 /* Set the entry in the GOT procedure linkage table. */
4127 plt = htab->plt_got;
4128 got = htab->elf.sgot;
4129 got_offset = h->got.offset;
4130
4131 if (got_offset == (bfd_vma) -1
4132 || (h->type == STT_GNU_IFUNC && h->def_regular)
4133 || plt == NULL
4134 || got == NULL)
4135 abort ();
4136
4137 /* Use the non-lazy PLT entry template for the GOT PLT since they
4138 are the identical. */
4139 /* Fill in the entry in the GOT procedure linkage table. */
4140 plt_offset = eh->plt_got.offset;
4141 memcpy (plt->contents + plt_offset,
4142 htab->non_lazy_plt->plt_entry,
4143 htab->non_lazy_plt->plt_entry_size);
4144
4145 /* Put offset the PC-relative instruction referring to the GOT
4146 entry, subtracting the size of that instruction. */
4147 got_pcrel_offset = (got->output_section->vma
4148 + got->output_offset
4149 + got_offset
4150 - plt->output_section->vma
4151 - plt->output_offset
4152 - plt_offset
4153 - htab->non_lazy_plt->plt_got_insn_size);
4154
4155 /* Check PC-relative offset overflow in GOT PLT entry. */
4156 got_after_plt = got->output_section->vma > plt->output_section->vma;
4157 if ((got_after_plt && got_pcrel_offset < 0)
4158 || (!got_after_plt && got_pcrel_offset > 0))
4159 /* xgettext:c-format */
4160 info->callbacks->einfo (_("%F%pB: PC-relative offset overflow in GOT PLT entry for `%s'\n"),
4161 output_bfd, h->root.root.string);
4162
4163 bfd_put_32 (output_bfd, got_pcrel_offset,
4164 (plt->contents + plt_offset
4165 + htab->non_lazy_plt->plt_got_offset));
4166 }
4167
4168 if (!local_undefweak
4169 && !h->def_regular
4170 && (h->plt.offset != (bfd_vma) -1
4171 || eh->plt_got.offset != (bfd_vma) -1))
4172 {
4173 /* Mark the symbol as undefined, rather than as defined in
4174 the .plt section. Leave the value if there were any
4175 relocations where pointer equality matters (this is a clue
4176 for the dynamic linker, to make function pointer
4177 comparisons work between an application and shared
4178 library), otherwise set it to zero. If a function is only
4179 called from a binary, there is no need to slow down
4180 shared libraries because of that. */
4181 sym->st_shndx = SHN_UNDEF;
4182 if (!h->pointer_equality_needed)
4183 sym->st_value = 0;
4184 }
4185
4186 _bfd_x86_elf_link_fixup_ifunc_symbol (info, htab, h, sym);
4187
4188 /* Don't generate dynamic GOT relocation against undefined weak
4189 symbol in executable. */
4190 if (h->got.offset != (bfd_vma) -1
4191 && ! GOT_TLS_GD_ANY_P (elf_x86_hash_entry (h)->tls_type)
4192 && elf_x86_hash_entry (h)->tls_type != GOT_TLS_IE
4193 && !local_undefweak)
4194 {
4195 Elf_Internal_Rela rela;
4196 asection *relgot = htab->elf.srelgot;
4197
4198 /* This symbol has an entry in the global offset table. Set it
4199 up. */
4200 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
4201 abort ();
4202
4203 rela.r_offset = (htab->elf.sgot->output_section->vma
4204 + htab->elf.sgot->output_offset
4205 + (h->got.offset &~ (bfd_vma) 1));
4206
4207 /* If this is a static link, or it is a -Bsymbolic link and the
4208 symbol is defined locally or was forced to be local because
4209 of a version file, we just want to emit a RELATIVE reloc.
4210 The entry in the global offset table will already have been
4211 initialized in the relocate_section function. */
4212 if (h->def_regular
4213 && h->type == STT_GNU_IFUNC)
4214 {
4215 if (h->plt.offset == (bfd_vma) -1)
4216 {
4217 /* STT_GNU_IFUNC is referenced without PLT. */
4218 if (htab->elf.splt == NULL)
4219 {
4220 /* use .rel[a].iplt section to store .got relocations
4221 in static executable. */
4222 relgot = htab->elf.irelplt;
4223 }
4224 if (SYMBOL_REFERENCES_LOCAL_P (info, h))
4225 {
4226 info->callbacks->minfo (_("Local IFUNC function `%s' in %pB\n"),
4227 h->root.root.string,
4228 h->root.u.def.section->owner);
4229
4230 rela.r_info = htab->r_info (0,
4231 R_X86_64_IRELATIVE);
4232 rela.r_addend = (h->root.u.def.value
4233 + h->root.u.def.section->output_section->vma
4234 + h->root.u.def.section->output_offset);
4235 }
4236 else
4237 goto do_glob_dat;
4238 }
4239 else if (bfd_link_pic (info))
4240 {
4241 /* Generate R_X86_64_GLOB_DAT. */
4242 goto do_glob_dat;
4243 }
4244 else
4245 {
4246 asection *plt;
4247 bfd_vma plt_offset;
4248
4249 if (!h->pointer_equality_needed)
4250 abort ();
4251
4252 /* For non-shared object, we can't use .got.plt, which
4253 contains the real function addres if we need pointer
4254 equality. We load the GOT entry with the PLT entry. */
4255 if (htab->plt_second != NULL)
4256 {
4257 plt = htab->plt_second;
4258 plt_offset = eh->plt_second.offset;
4259 }
4260 else
4261 {
4262 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4263 plt_offset = h->plt.offset;
4264 }
4265 bfd_put_64 (output_bfd, (plt->output_section->vma
4266 + plt->output_offset
4267 + plt_offset),
4268 htab->elf.sgot->contents + h->got.offset);
4269 return TRUE;
4270 }
4271 }
4272 else if (bfd_link_pic (info)
4273 && SYMBOL_REFERENCES_LOCAL_P (info, h))
4274 {
4275 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
4276 return FALSE;
4277 BFD_ASSERT((h->got.offset & 1) != 0);
4278 rela.r_info = htab->r_info (0, R_X86_64_RELATIVE);
4279 rela.r_addend = (h->root.u.def.value
4280 + h->root.u.def.section->output_section->vma
4281 + h->root.u.def.section->output_offset);
4282 }
4283 else
4284 {
4285 BFD_ASSERT((h->got.offset & 1) == 0);
4286 do_glob_dat:
4287 bfd_put_64 (output_bfd, (bfd_vma) 0,
4288 htab->elf.sgot->contents + h->got.offset);
4289 rela.r_info = htab->r_info (h->dynindx, R_X86_64_GLOB_DAT);
4290 rela.r_addend = 0;
4291 }
4292
4293 elf_append_rela (output_bfd, relgot, &rela);
4294 }
4295
4296 if (h->needs_copy)
4297 {
4298 Elf_Internal_Rela rela;
4299 asection *s;
4300
4301 /* This symbol needs a copy reloc. Set it up. */
4302 VERIFY_COPY_RELOC (h, htab)
4303
4304 rela.r_offset = (h->root.u.def.value
4305 + h->root.u.def.section->output_section->vma
4306 + h->root.u.def.section->output_offset);
4307 rela.r_info = htab->r_info (h->dynindx, R_X86_64_COPY);
4308 rela.r_addend = 0;
4309 if (h->root.u.def.section == htab->elf.sdynrelro)
4310 s = htab->elf.sreldynrelro;
4311 else
4312 s = htab->elf.srelbss;
4313 elf_append_rela (output_bfd, s, &rela);
4314 }
4315
4316 return TRUE;
4317 }
4318
4319 /* Finish up local dynamic symbol handling. We set the contents of
4320 various dynamic sections here. */
4321
4322 static bfd_boolean
4323 elf_x86_64_finish_local_dynamic_symbol (void **slot, void *inf)
4324 {
4325 struct elf_link_hash_entry *h
4326 = (struct elf_link_hash_entry *) *slot;
4327 struct bfd_link_info *info
4328 = (struct bfd_link_info *) inf;
4329
4330 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4331 info, h, NULL);
4332 }
4333
4334 /* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4335 here since undefined weak symbol may not be dynamic and may not be
4336 called for elf_x86_64_finish_dynamic_symbol. */
4337
4338 static bfd_boolean
4339 elf_x86_64_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4340 void *inf)
4341 {
4342 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4343 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4344
4345 if (h->root.type != bfd_link_hash_undefweak
4346 || h->dynindx != -1)
4347 return TRUE;
4348
4349 return elf_x86_64_finish_dynamic_symbol (info->output_bfd,
4350 info, h, NULL);
4351 }
4352
4353 /* Used to decide how to sort relocs in an optimal manner for the
4354 dynamic linker, before writing them out. */
4355
4356 static enum elf_reloc_type_class
4357 elf_x86_64_reloc_type_class (const struct bfd_link_info *info,
4358 const asection *rel_sec ATTRIBUTE_UNUSED,
4359 const Elf_Internal_Rela *rela)
4360 {
4361 bfd *abfd = info->output_bfd;
4362 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
4363 struct elf_x86_link_hash_table *htab
4364 = elf_x86_hash_table (info, X86_64_ELF_DATA);
4365
4366 if (htab->elf.dynsym != NULL
4367 && htab->elf.dynsym->contents != NULL)
4368 {
4369 /* Check relocation against STT_GNU_IFUNC symbol if there are
4370 dynamic symbols. */
4371 unsigned long r_symndx = htab->r_sym (rela->r_info);
4372 if (r_symndx != STN_UNDEF)
4373 {
4374 Elf_Internal_Sym sym;
4375 if (!bed->s->swap_symbol_in (abfd,
4376 (htab->elf.dynsym->contents
4377 + r_symndx * bed->s->sizeof_sym),
4378 0, &sym))
4379 abort ();
4380
4381 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
4382 return reloc_class_ifunc;
4383 }
4384 }
4385
4386 switch ((int) ELF32_R_TYPE (rela->r_info))
4387 {
4388 case R_X86_64_IRELATIVE:
4389 return reloc_class_ifunc;
4390 case R_X86_64_RELATIVE:
4391 case R_X86_64_RELATIVE64:
4392 return reloc_class_relative;
4393 case R_X86_64_JUMP_SLOT:
4394 return reloc_class_plt;
4395 case R_X86_64_COPY:
4396 return reloc_class_copy;
4397 default:
4398 return reloc_class_normal;
4399 }
4400 }
4401
4402 /* Finish up the dynamic sections. */
4403
4404 static bfd_boolean
4405 elf_x86_64_finish_dynamic_sections (bfd *output_bfd,
4406 struct bfd_link_info *info)
4407 {
4408 struct elf_x86_link_hash_table *htab;
4409
4410 htab = _bfd_x86_elf_finish_dynamic_sections (output_bfd, info);
4411 if (htab == NULL)
4412 return FALSE;
4413
4414 if (! htab->elf.dynamic_sections_created)
4415 return TRUE;
4416
4417 if (htab->elf.splt && htab->elf.splt->size > 0)
4418 {
4419 elf_section_data (htab->elf.splt->output_section)
4420 ->this_hdr.sh_entsize = htab->plt.plt_entry_size;
4421
4422 if (htab->plt.has_plt0)
4423 {
4424 /* Fill in the special first entry in the procedure linkage
4425 table. */
4426 memcpy (htab->elf.splt->contents,
4427 htab->lazy_plt->plt0_entry,
4428 htab->lazy_plt->plt0_entry_size);
4429 /* Add offset for pushq GOT+8(%rip), since the instruction
4430 uses 6 bytes subtract this value. */
4431 bfd_put_32 (output_bfd,
4432 (htab->elf.sgotplt->output_section->vma
4433 + htab->elf.sgotplt->output_offset
4434 + 8
4435 - htab->elf.splt->output_section->vma
4436 - htab->elf.splt->output_offset
4437 - 6),
4438 (htab->elf.splt->contents
4439 + htab->lazy_plt->plt0_got1_offset));
4440 /* Add offset for the PC-relative instruction accessing
4441 GOT+16, subtracting the offset to the end of that
4442 instruction. */
4443 bfd_put_32 (output_bfd,
4444 (htab->elf.sgotplt->output_section->vma
4445 + htab->elf.sgotplt->output_offset
4446 + 16
4447 - htab->elf.splt->output_section->vma
4448 - htab->elf.splt->output_offset
4449 - htab->lazy_plt->plt0_got2_insn_end),
4450 (htab->elf.splt->contents
4451 + htab->lazy_plt->plt0_got2_offset));
4452 }
4453
4454 if (htab->tlsdesc_plt)
4455 {
4456 bfd_put_64 (output_bfd, (bfd_vma) 0,
4457 htab->elf.sgot->contents + htab->tlsdesc_got);
4458
4459 memcpy (htab->elf.splt->contents + htab->tlsdesc_plt,
4460 htab->lazy_plt->plt_tlsdesc_entry,
4461 htab->lazy_plt->plt_tlsdesc_entry_size);
4462
4463 /* Add offset for pushq GOT+8(%rip), since ENDBR64 uses 4
4464 bytes and the instruction uses 6 bytes, subtract these
4465 values. */
4466 bfd_put_32 (output_bfd,
4467 (htab->elf.sgotplt->output_section->vma
4468 + htab->elf.sgotplt->output_offset
4469 + 8
4470 - htab->elf.splt->output_section->vma
4471 - htab->elf.splt->output_offset
4472 - htab->tlsdesc_plt
4473 - htab->lazy_plt->plt_tlsdesc_got1_insn_end),
4474 (htab->elf.splt->contents
4475 + htab->tlsdesc_plt
4476 + htab->lazy_plt->plt_tlsdesc_got1_offset));
4477 /* Add offset for indirect branch via GOT+TDG, where TDG
4478 stands for htab->tlsdesc_got, subtracting the offset
4479 to the end of that instruction. */
4480 bfd_put_32 (output_bfd,
4481 (htab->elf.sgot->output_section->vma
4482 + htab->elf.sgot->output_offset
4483 + htab->tlsdesc_got
4484 - htab->elf.splt->output_section->vma
4485 - htab->elf.splt->output_offset
4486 - htab->tlsdesc_plt
4487 - htab->lazy_plt->plt_tlsdesc_got2_insn_end),
4488 (htab->elf.splt->contents
4489 + htab->tlsdesc_plt
4490 + htab->lazy_plt->plt_tlsdesc_got2_offset));
4491 }
4492 }
4493
4494 /* Fill PLT entries for undefined weak symbols in PIE. */
4495 if (bfd_link_pie (info))
4496 bfd_hash_traverse (&info->hash->table,
4497 elf_x86_64_pie_finish_undefweak_symbol,
4498 info);
4499
4500 return TRUE;
4501 }
4502
4503 /* Fill PLT/GOT entries and allocate dynamic relocations for local
4504 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table.
4505 It has to be done before elf_link_sort_relocs is called so that
4506 dynamic relocations are properly sorted. */
4507
4508 static bfd_boolean
4509 elf_x86_64_output_arch_local_syms
4510 (bfd *output_bfd ATTRIBUTE_UNUSED,
4511 struct bfd_link_info *info,
4512 void *flaginfo ATTRIBUTE_UNUSED,
4513 int (*func) (void *, const char *,
4514 Elf_Internal_Sym *,
4515 asection *,
4516 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED)
4517 {
4518 struct elf_x86_link_hash_table *htab
4519 = elf_x86_hash_table (info, X86_64_ELF_DATA);
4520 if (htab == NULL)
4521 return FALSE;
4522
4523 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4524 htab_traverse (htab->loc_hash_table,
4525 elf_x86_64_finish_local_dynamic_symbol,
4526 info);
4527
4528 return TRUE;
4529 }
4530
4531 /* Forward declaration. */
4532 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt;
4533
4534 /* Similar to _bfd_elf_get_synthetic_symtab. Support PLTs with all
4535 dynamic relocations. */
4536
4537 static long
4538 elf_x86_64_get_synthetic_symtab (bfd *abfd,
4539 long symcount ATTRIBUTE_UNUSED,
4540 asymbol **syms ATTRIBUTE_UNUSED,
4541 long dynsymcount,
4542 asymbol **dynsyms,
4543 asymbol **ret)
4544 {
4545 long count, i, n;
4546 int j;
4547 bfd_byte *plt_contents;
4548 long relsize;
4549 const struct elf_x86_lazy_plt_layout *lazy_plt;
4550 const struct elf_x86_non_lazy_plt_layout *non_lazy_plt;
4551 const struct elf_x86_lazy_plt_layout *lazy_bnd_plt;
4552 const struct elf_x86_non_lazy_plt_layout *non_lazy_bnd_plt;
4553 const struct elf_x86_lazy_plt_layout *lazy_ibt_plt;
4554 const struct elf_x86_non_lazy_plt_layout *non_lazy_ibt_plt;
4555 asection *plt;
4556 enum elf_x86_plt_type plt_type;
4557 struct elf_x86_plt plts[] =
4558 {
4559 { ".plt", NULL, NULL, plt_unknown, 0, 0, 0, 0 },
4560 { ".plt.got", NULL, NULL, plt_non_lazy, 0, 0, 0, 0 },
4561 { ".plt.sec", NULL, NULL, plt_second, 0, 0, 0, 0 },
4562 { ".plt.bnd", NULL, NULL, plt_second, 0, 0, 0, 0 },
4563 { NULL, NULL, NULL, plt_non_lazy, 0, 0, 0, 0 }
4564 };
4565
4566 *ret = NULL;
4567
4568 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
4569 return 0;
4570
4571 if (dynsymcount <= 0)
4572 return 0;
4573
4574 relsize = bfd_get_dynamic_reloc_upper_bound (abfd);
4575 if (relsize <= 0)
4576 return -1;
4577
4578 if (get_elf_x86_backend_data (abfd)->target_os != is_nacl)
4579 {
4580 lazy_plt = &elf_x86_64_lazy_plt;
4581 non_lazy_plt = &elf_x86_64_non_lazy_plt;
4582 lazy_bnd_plt = &elf_x86_64_lazy_bnd_plt;
4583 non_lazy_bnd_plt = &elf_x86_64_non_lazy_bnd_plt;
4584 if (ABI_64_P (abfd))
4585 {
4586 lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4587 non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4588 }
4589 else
4590 {
4591 lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4592 non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4593 }
4594 }
4595 else
4596 {
4597 lazy_plt = &elf_x86_64_nacl_plt;
4598 non_lazy_plt = NULL;
4599 lazy_bnd_plt = NULL;
4600 non_lazy_bnd_plt = NULL;
4601 lazy_ibt_plt = NULL;
4602 non_lazy_ibt_plt = NULL;
4603 }
4604
4605 count = 0;
4606 for (j = 0; plts[j].name != NULL; j++)
4607 {
4608 plt = bfd_get_section_by_name (abfd, plts[j].name);
4609 if (plt == NULL || plt->size == 0)
4610 continue;
4611
4612 /* Get the PLT section contents. */
4613 plt_contents = (bfd_byte *) bfd_malloc (plt->size);
4614 if (plt_contents == NULL)
4615 break;
4616 if (!bfd_get_section_contents (abfd, (asection *) plt,
4617 plt_contents, 0, plt->size))
4618 {
4619 free (plt_contents);
4620 break;
4621 }
4622
4623 /* Check what kind of PLT it is. */
4624 plt_type = plt_unknown;
4625 if (plts[j].type == plt_unknown
4626 && (plt->size >= (lazy_plt->plt_entry_size
4627 + lazy_plt->plt_entry_size)))
4628 {
4629 /* Match lazy PLT first. Need to check the first two
4630 instructions. */
4631 if ((memcmp (plt_contents, lazy_plt->plt0_entry,
4632 lazy_plt->plt0_got1_offset) == 0)
4633 && (memcmp (plt_contents + 6, lazy_plt->plt0_entry + 6,
4634 2) == 0))
4635 plt_type = plt_lazy;
4636 else if (lazy_bnd_plt != NULL
4637 && (memcmp (plt_contents, lazy_bnd_plt->plt0_entry,
4638 lazy_bnd_plt->plt0_got1_offset) == 0)
4639 && (memcmp (plt_contents + 6,
4640 lazy_bnd_plt->plt0_entry + 6, 3) == 0))
4641 {
4642 plt_type = plt_lazy | plt_second;
4643 /* The fist entry in the lazy IBT PLT is the same as the
4644 lazy BND PLT. */
4645 if ((memcmp (plt_contents + lazy_ibt_plt->plt_entry_size,
4646 lazy_ibt_plt->plt_entry,
4647 lazy_ibt_plt->plt_got_offset) == 0))
4648 lazy_plt = lazy_ibt_plt;
4649 else
4650 lazy_plt = lazy_bnd_plt;
4651 }
4652 }
4653
4654 if (non_lazy_plt != NULL
4655 && (plt_type == plt_unknown || plt_type == plt_non_lazy)
4656 && plt->size >= non_lazy_plt->plt_entry_size)
4657 {
4658 /* Match non-lazy PLT. */
4659 if (memcmp (plt_contents, non_lazy_plt->plt_entry,
4660 non_lazy_plt->plt_got_offset) == 0)
4661 plt_type = plt_non_lazy;
4662 }
4663
4664 if (plt_type == plt_unknown || plt_type == plt_second)
4665 {
4666 if (non_lazy_bnd_plt != NULL
4667 && plt->size >= non_lazy_bnd_plt->plt_entry_size
4668 && (memcmp (plt_contents, non_lazy_bnd_plt->plt_entry,
4669 non_lazy_bnd_plt->plt_got_offset) == 0))
4670 {
4671 /* Match BND PLT. */
4672 plt_type = plt_second;
4673 non_lazy_plt = non_lazy_bnd_plt;
4674 }
4675 else if (non_lazy_ibt_plt != NULL
4676 && plt->size >= non_lazy_ibt_plt->plt_entry_size
4677 && (memcmp (plt_contents,
4678 non_lazy_ibt_plt->plt_entry,
4679 non_lazy_ibt_plt->plt_got_offset) == 0))
4680 {
4681 /* Match IBT PLT. */
4682 plt_type = plt_second;
4683 non_lazy_plt = non_lazy_ibt_plt;
4684 }
4685 }
4686
4687 if (plt_type == plt_unknown)
4688 {
4689 free (plt_contents);
4690 continue;
4691 }
4692
4693 plts[j].sec = plt;
4694 plts[j].type = plt_type;
4695
4696 if ((plt_type & plt_lazy))
4697 {
4698 plts[j].plt_got_offset = lazy_plt->plt_got_offset;
4699 plts[j].plt_got_insn_size = lazy_plt->plt_got_insn_size;
4700 plts[j].plt_entry_size = lazy_plt->plt_entry_size;
4701 /* Skip PLT0 in lazy PLT. */
4702 i = 1;
4703 }
4704 else
4705 {
4706 plts[j].plt_got_offset = non_lazy_plt->plt_got_offset;
4707 plts[j].plt_got_insn_size = non_lazy_plt->plt_got_insn_size;
4708 plts[j].plt_entry_size = non_lazy_plt->plt_entry_size;
4709 i = 0;
4710 }
4711
4712 /* Skip lazy PLT when the second PLT is used. */
4713 if (plt_type == (plt_lazy | plt_second))
4714 plts[j].count = 0;
4715 else
4716 {
4717 n = plt->size / plts[j].plt_entry_size;
4718 plts[j].count = n;
4719 count += n - i;
4720 }
4721
4722 plts[j].contents = plt_contents;
4723 }
4724
4725 return _bfd_x86_elf_get_synthetic_symtab (abfd, count, relsize,
4726 (bfd_vma) 0, plts, dynsyms,
4727 ret);
4728 }
4729
4730 /* Handle an x86-64 specific section when reading an object file. This
4731 is called when elfcode.h finds a section with an unknown type. */
4732
4733 static bfd_boolean
4734 elf_x86_64_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr,
4735 const char *name, int shindex)
4736 {
4737 if (hdr->sh_type != SHT_X86_64_UNWIND)
4738 return FALSE;
4739
4740 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
4741 return FALSE;
4742
4743 return TRUE;
4744 }
4745
4746 /* Hook called by the linker routine which adds symbols from an object
4747 file. We use it to put SHN_X86_64_LCOMMON items in .lbss, instead
4748 of .bss. */
4749
4750 static bfd_boolean
4751 elf_x86_64_add_symbol_hook (bfd *abfd,
4752 struct bfd_link_info *info ATTRIBUTE_UNUSED,
4753 Elf_Internal_Sym *sym,
4754 const char **namep ATTRIBUTE_UNUSED,
4755 flagword *flagsp ATTRIBUTE_UNUSED,
4756 asection **secp,
4757 bfd_vma *valp)
4758 {
4759 asection *lcomm;
4760
4761 switch (sym->st_shndx)
4762 {
4763 case SHN_X86_64_LCOMMON:
4764 lcomm = bfd_get_section_by_name (abfd, "LARGE_COMMON");
4765 if (lcomm == NULL)
4766 {
4767 lcomm = bfd_make_section_with_flags (abfd,
4768 "LARGE_COMMON",
4769 (SEC_ALLOC
4770 | SEC_IS_COMMON
4771 | SEC_LINKER_CREATED));
4772 if (lcomm == NULL)
4773 return FALSE;
4774 elf_section_flags (lcomm) |= SHF_X86_64_LARGE;
4775 }
4776 *secp = lcomm;
4777 *valp = sym->st_size;
4778 return TRUE;
4779 }
4780
4781 return TRUE;
4782 }
4783
4784
4785 /* Given a BFD section, try to locate the corresponding ELF section
4786 index. */
4787
4788 static bfd_boolean
4789 elf_x86_64_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
4790 asection *sec, int *index_return)
4791 {
4792 if (sec == &_bfd_elf_large_com_section)
4793 {
4794 *index_return = SHN_X86_64_LCOMMON;
4795 return TRUE;
4796 }
4797 return FALSE;
4798 }
4799
4800 /* Process a symbol. */
4801
4802 static void
4803 elf_x86_64_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4804 asymbol *asym)
4805 {
4806 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
4807
4808 switch (elfsym->internal_elf_sym.st_shndx)
4809 {
4810 case SHN_X86_64_LCOMMON:
4811 asym->section = &_bfd_elf_large_com_section;
4812 asym->value = elfsym->internal_elf_sym.st_size;
4813 /* Common symbol doesn't set BSF_GLOBAL. */
4814 asym->flags &= ~BSF_GLOBAL;
4815 break;
4816 }
4817 }
4818
4819 static bfd_boolean
4820 elf_x86_64_common_definition (Elf_Internal_Sym *sym)
4821 {
4822 return (sym->st_shndx == SHN_COMMON
4823 || sym->st_shndx == SHN_X86_64_LCOMMON);
4824 }
4825
4826 static unsigned int
4827 elf_x86_64_common_section_index (asection *sec)
4828 {
4829 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4830 return SHN_COMMON;
4831 else
4832 return SHN_X86_64_LCOMMON;
4833 }
4834
4835 static asection *
4836 elf_x86_64_common_section (asection *sec)
4837 {
4838 if ((elf_section_flags (sec) & SHF_X86_64_LARGE) == 0)
4839 return bfd_com_section_ptr;
4840 else
4841 return &_bfd_elf_large_com_section;
4842 }
4843
4844 static bfd_boolean
4845 elf_x86_64_merge_symbol (struct elf_link_hash_entry *h,
4846 const Elf_Internal_Sym *sym,
4847 asection **psec,
4848 bfd_boolean newdef,
4849 bfd_boolean olddef,
4850 bfd *oldbfd,
4851 const asection *oldsec)
4852 {
4853 /* A normal common symbol and a large common symbol result in a
4854 normal common symbol. We turn the large common symbol into a
4855 normal one. */
4856 if (!olddef
4857 && h->root.type == bfd_link_hash_common
4858 && !newdef
4859 && bfd_is_com_section (*psec)
4860 && oldsec != *psec)
4861 {
4862 if (sym->st_shndx == SHN_COMMON
4863 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) != 0)
4864 {
4865 h->root.u.c.p->section
4866 = bfd_make_section_old_way (oldbfd, "COMMON");
4867 h->root.u.c.p->section->flags = SEC_ALLOC;
4868 }
4869 else if (sym->st_shndx == SHN_X86_64_LCOMMON
4870 && (elf_section_flags (oldsec) & SHF_X86_64_LARGE) == 0)
4871 *psec = bfd_com_section_ptr;
4872 }
4873
4874 return TRUE;
4875 }
4876
4877 static int
4878 elf_x86_64_additional_program_headers (bfd *abfd,
4879 struct bfd_link_info *info ATTRIBUTE_UNUSED)
4880 {
4881 asection *s;
4882 int count = 0;
4883
4884 /* Check to see if we need a large readonly segment. */
4885 s = bfd_get_section_by_name (abfd, ".lrodata");
4886 if (s && (s->flags & SEC_LOAD))
4887 count++;
4888
4889 /* Check to see if we need a large data segment. Since .lbss sections
4890 is placed right after the .bss section, there should be no need for
4891 a large data segment just because of .lbss. */
4892 s = bfd_get_section_by_name (abfd, ".ldata");
4893 if (s && (s->flags & SEC_LOAD))
4894 count++;
4895
4896 return count;
4897 }
4898
4899 /* Return TRUE iff relocations for INPUT are compatible with OUTPUT. */
4900
4901 static bfd_boolean
4902 elf_x86_64_relocs_compatible (const bfd_target *input,
4903 const bfd_target *output)
4904 {
4905 return ((xvec_get_elf_backend_data (input)->s->elfclass
4906 == xvec_get_elf_backend_data (output)->s->elfclass)
4907 && _bfd_elf_relocs_compatible (input, output));
4908 }
4909
4910 /* Set up x86-64 GNU properties. Return the first relocatable ELF input
4911 with GNU properties if found. Otherwise, return NULL. */
4912
4913 static bfd *
4914 elf_x86_64_link_setup_gnu_properties (struct bfd_link_info *info)
4915 {
4916 struct elf_x86_init_table init_table;
4917
4918 if ((int) R_X86_64_standard >= (int) R_X86_64_converted_reloc_bit
4919 || (int) R_X86_64_max <= (int) R_X86_64_converted_reloc_bit
4920 || ((int) (R_X86_64_GNU_VTINHERIT | R_X86_64_converted_reloc_bit)
4921 != (int) R_X86_64_GNU_VTINHERIT)
4922 || ((int) (R_X86_64_GNU_VTENTRY | R_X86_64_converted_reloc_bit)
4923 != (int) R_X86_64_GNU_VTENTRY))
4924 abort ();
4925
4926 /* This is unused for x86-64. */
4927 init_table.plt0_pad_byte = 0x90;
4928
4929 if (get_elf_x86_backend_data (info->output_bfd)->target_os != is_nacl)
4930 {
4931 if (info->bndplt)
4932 {
4933 init_table.lazy_plt = &elf_x86_64_lazy_bnd_plt;
4934 init_table.non_lazy_plt = &elf_x86_64_non_lazy_bnd_plt;
4935 }
4936 else
4937 {
4938 init_table.lazy_plt = &elf_x86_64_lazy_plt;
4939 init_table.non_lazy_plt = &elf_x86_64_non_lazy_plt;
4940 }
4941
4942 if (ABI_64_P (info->output_bfd))
4943 {
4944 init_table.lazy_ibt_plt = &elf_x86_64_lazy_ibt_plt;
4945 init_table.non_lazy_ibt_plt = &elf_x86_64_non_lazy_ibt_plt;
4946 }
4947 else
4948 {
4949 init_table.lazy_ibt_plt = &elf_x32_lazy_ibt_plt;
4950 init_table.non_lazy_ibt_plt = &elf_x32_non_lazy_ibt_plt;
4951 }
4952 }
4953 else
4954 {
4955 init_table.lazy_plt = &elf_x86_64_nacl_plt;
4956 init_table.non_lazy_plt = NULL;
4957 init_table.lazy_ibt_plt = NULL;
4958 init_table.non_lazy_ibt_plt = NULL;
4959 }
4960
4961 if (ABI_64_P (info->output_bfd))
4962 {
4963 init_table.r_info = elf64_r_info;
4964 init_table.r_sym = elf64_r_sym;
4965 }
4966 else
4967 {
4968 init_table.r_info = elf32_r_info;
4969 init_table.r_sym = elf32_r_sym;
4970 }
4971
4972 return _bfd_x86_elf_link_setup_gnu_properties (info, &init_table);
4973 }
4974
4975 static const struct bfd_elf_special_section
4976 elf_x86_64_special_sections[]=
4977 {
4978 { STRING_COMMA_LEN (".gnu.linkonce.lb"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4979 { STRING_COMMA_LEN (".gnu.linkonce.lr"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4980 { STRING_COMMA_LEN (".gnu.linkonce.lt"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR + SHF_X86_64_LARGE},
4981 { STRING_COMMA_LEN (".lbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4982 { STRING_COMMA_LEN (".ldata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_X86_64_LARGE},
4983 { STRING_COMMA_LEN (".lrodata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_X86_64_LARGE},
4984 { NULL, 0, 0, 0, 0 }
4985 };
4986
4987 #define TARGET_LITTLE_SYM x86_64_elf64_vec
4988 #define TARGET_LITTLE_NAME "elf64-x86-64"
4989 #define ELF_ARCH bfd_arch_i386
4990 #define ELF_TARGET_ID X86_64_ELF_DATA
4991 #define ELF_MACHINE_CODE EM_X86_64
4992 #if DEFAULT_LD_Z_SEPARATE_CODE
4993 # define ELF_MAXPAGESIZE 0x1000
4994 #else
4995 # define ELF_MAXPAGESIZE 0x200000
4996 #endif
4997 #define ELF_MINPAGESIZE 0x1000
4998 #define ELF_COMMONPAGESIZE 0x1000
4999
5000 #define elf_backend_can_gc_sections 1
5001 #define elf_backend_can_refcount 1
5002 #define elf_backend_want_got_plt 1
5003 #define elf_backend_plt_readonly 1
5004 #define elf_backend_want_plt_sym 0
5005 #define elf_backend_got_header_size (GOT_ENTRY_SIZE*3)
5006 #define elf_backend_rela_normal 1
5007 #define elf_backend_plt_alignment 4
5008 #define elf_backend_extern_protected_data 1
5009 #define elf_backend_caches_rawsize 1
5010 #define elf_backend_dtrel_excludes_plt 1
5011 #define elf_backend_want_dynrelro 1
5012
5013 #define elf_info_to_howto elf_x86_64_info_to_howto
5014
5015 #define bfd_elf64_bfd_reloc_type_lookup elf_x86_64_reloc_type_lookup
5016 #define bfd_elf64_bfd_reloc_name_lookup \
5017 elf_x86_64_reloc_name_lookup
5018
5019 #define elf_backend_relocs_compatible elf_x86_64_relocs_compatible
5020 #define elf_backend_check_relocs elf_x86_64_check_relocs
5021 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
5022 #define elf_backend_finish_dynamic_sections elf_x86_64_finish_dynamic_sections
5023 #define elf_backend_finish_dynamic_symbol elf_x86_64_finish_dynamic_symbol
5024 #define elf_backend_output_arch_local_syms elf_x86_64_output_arch_local_syms
5025 #define elf_backend_grok_prstatus elf_x86_64_grok_prstatus
5026 #define elf_backend_grok_psinfo elf_x86_64_grok_psinfo
5027 #ifdef CORE_HEADER
5028 #define elf_backend_write_core_note elf_x86_64_write_core_note
5029 #endif
5030 #define elf_backend_reloc_type_class elf_x86_64_reloc_type_class
5031 #define elf_backend_relocate_section elf_x86_64_relocate_section
5032 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
5033 #define elf_backend_object_p elf64_x86_64_elf_object_p
5034 #define bfd_elf64_get_synthetic_symtab elf_x86_64_get_synthetic_symtab
5035
5036 #define elf_backend_section_from_shdr \
5037 elf_x86_64_section_from_shdr
5038
5039 #define elf_backend_section_from_bfd_section \
5040 elf_x86_64_elf_section_from_bfd_section
5041 #define elf_backend_add_symbol_hook \
5042 elf_x86_64_add_symbol_hook
5043 #define elf_backend_symbol_processing \
5044 elf_x86_64_symbol_processing
5045 #define elf_backend_common_section_index \
5046 elf_x86_64_common_section_index
5047 #define elf_backend_common_section \
5048 elf_x86_64_common_section
5049 #define elf_backend_common_definition \
5050 elf_x86_64_common_definition
5051 #define elf_backend_merge_symbol \
5052 elf_x86_64_merge_symbol
5053 #define elf_backend_special_sections \
5054 elf_x86_64_special_sections
5055 #define elf_backend_additional_program_headers \
5056 elf_x86_64_additional_program_headers
5057 #define elf_backend_setup_gnu_properties \
5058 elf_x86_64_link_setup_gnu_properties
5059 #define elf_backend_hide_symbol \
5060 _bfd_x86_elf_hide_symbol
5061
5062 #undef elf64_bed
5063 #define elf64_bed elf64_x86_64_bed
5064
5065 #include "elf64-target.h"
5066
5067 /* CloudABI support. */
5068
5069 #undef TARGET_LITTLE_SYM
5070 #define TARGET_LITTLE_SYM x86_64_elf64_cloudabi_vec
5071 #undef TARGET_LITTLE_NAME
5072 #define TARGET_LITTLE_NAME "elf64-x86-64-cloudabi"
5073
5074 #undef ELF_OSABI
5075 #define ELF_OSABI ELFOSABI_CLOUDABI
5076
5077 #undef elf64_bed
5078 #define elf64_bed elf64_x86_64_cloudabi_bed
5079
5080 #include "elf64-target.h"
5081
5082 /* FreeBSD support. */
5083
5084 #undef TARGET_LITTLE_SYM
5085 #define TARGET_LITTLE_SYM x86_64_elf64_fbsd_vec
5086 #undef TARGET_LITTLE_NAME
5087 #define TARGET_LITTLE_NAME "elf64-x86-64-freebsd"
5088
5089 #undef ELF_OSABI
5090 #define ELF_OSABI ELFOSABI_FREEBSD
5091
5092 #undef elf64_bed
5093 #define elf64_bed elf64_x86_64_fbsd_bed
5094
5095 #include "elf64-target.h"
5096
5097 /* Solaris 2 support. */
5098
5099 #undef TARGET_LITTLE_SYM
5100 #define TARGET_LITTLE_SYM x86_64_elf64_sol2_vec
5101 #undef TARGET_LITTLE_NAME
5102 #define TARGET_LITTLE_NAME "elf64-x86-64-sol2"
5103
5104 static const struct elf_x86_backend_data elf_x86_64_solaris_arch_bed =
5105 {
5106 is_solaris /* os */
5107 };
5108
5109 #undef elf_backend_arch_data
5110 #define elf_backend_arch_data &elf_x86_64_solaris_arch_bed
5111
5112 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
5113 objects won't be recognized. */
5114 #undef ELF_OSABI
5115
5116 #undef elf64_bed
5117 #define elf64_bed elf64_x86_64_sol2_bed
5118
5119 /* The 64-bit static TLS arena size is rounded to the nearest 16-byte
5120 boundary. */
5121 #undef elf_backend_static_tls_alignment
5122 #define elf_backend_static_tls_alignment 16
5123
5124 /* The Solaris 2 ABI requires a plt symbol on all platforms.
5125
5126 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
5127 File, p.63. */
5128 #undef elf_backend_want_plt_sym
5129 #define elf_backend_want_plt_sym 1
5130
5131 #undef elf_backend_strtab_flags
5132 #define elf_backend_strtab_flags SHF_STRINGS
5133
5134 static bfd_boolean
5135 elf64_x86_64_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
5136 bfd *obfd ATTRIBUTE_UNUSED,
5137 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
5138 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
5139 {
5140 /* PR 19938: FIXME: Need to add code for setting the sh_info
5141 and sh_link fields of Solaris specific section types. */
5142 return FALSE;
5143 }
5144
5145 #undef elf_backend_copy_special_section_fields
5146 #define elf_backend_copy_special_section_fields elf64_x86_64_copy_solaris_special_section_fields
5147
5148 #include "elf64-target.h"
5149
5150 /* Native Client support. */
5151
5152 static bfd_boolean
5153 elf64_x86_64_nacl_elf_object_p (bfd *abfd)
5154 {
5155 /* Set the right machine number for a NaCl x86-64 ELF64 file. */
5156 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64_nacl);
5157 return TRUE;
5158 }
5159
5160 #undef TARGET_LITTLE_SYM
5161 #define TARGET_LITTLE_SYM x86_64_elf64_nacl_vec
5162 #undef TARGET_LITTLE_NAME
5163 #define TARGET_LITTLE_NAME "elf64-x86-64-nacl"
5164 #undef elf64_bed
5165 #define elf64_bed elf64_x86_64_nacl_bed
5166
5167 #undef ELF_MAXPAGESIZE
5168 #undef ELF_MINPAGESIZE
5169 #undef ELF_COMMONPAGESIZE
5170 #define ELF_MAXPAGESIZE 0x10000
5171 #define ELF_MINPAGESIZE 0x10000
5172 #define ELF_COMMONPAGESIZE 0x10000
5173
5174 /* Restore defaults. */
5175 #undef ELF_OSABI
5176 #undef elf_backend_static_tls_alignment
5177 #undef elf_backend_want_plt_sym
5178 #define elf_backend_want_plt_sym 0
5179 #undef elf_backend_strtab_flags
5180 #undef elf_backend_copy_special_section_fields
5181
5182 /* NaCl uses substantially different PLT entries for the same effects. */
5183
5184 #undef elf_backend_plt_alignment
5185 #define elf_backend_plt_alignment 5
5186 #define NACL_PLT_ENTRY_SIZE 64
5187 #define NACLMASK 0xe0 /* 32-byte alignment mask. */
5188
5189 static const bfd_byte elf_x86_64_nacl_plt0_entry[NACL_PLT_ENTRY_SIZE] =
5190 {
5191 0xff, 0x35, 8, 0, 0, 0, /* pushq GOT+8(%rip) */
5192 0x4c, 0x8b, 0x1d, 16, 0, 0, 0, /* mov GOT+16(%rip), %r11 */
5193 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5194 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5195 0x41, 0xff, 0xe3, /* jmpq *%r11 */
5196
5197 /* 9-byte nop sequence to pad out to the next 32-byte boundary. */
5198 0x66, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw 0x0(%rax,%rax,1) */
5199
5200 /* 32 bytes of nop to pad out to the standard size. */
5201 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5202 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5203 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5204 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5205 0x66, /* excess data16 prefix */
5206 0x90 /* nop */
5207 };
5208
5209 static const bfd_byte elf_x86_64_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] =
5210 {
5211 0x4c, 0x8b, 0x1d, 0, 0, 0, 0, /* mov name@GOTPCREL(%rip),%r11 */
5212 0x41, 0x83, 0xe3, NACLMASK, /* and $-32, %r11d */
5213 0x4d, 0x01, 0xfb, /* add %r15, %r11 */
5214 0x41, 0xff, 0xe3, /* jmpq *%r11 */
5215
5216 /* 15-byte nop sequence to pad out to the next 32-byte boundary. */
5217 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5218 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5219
5220 /* Lazy GOT entries point here (32-byte aligned). */
5221 0x68, /* pushq immediate */
5222 0, 0, 0, 0, /* replaced with index into relocation table. */
5223 0xe9, /* jmp relative */
5224 0, 0, 0, 0, /* replaced with offset to start of .plt0. */
5225
5226 /* 22 bytes of nop to pad out to the standard size. */
5227 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, /* excess data16 prefixes */
5228 0x2e, 0x0f, 0x1f, 0x84, 0, 0, 0, 0, 0, /* nopw %cs:0x0(%rax,%rax,1) */
5229 0x0f, 0x1f, 0x80, 0, 0, 0, 0, /* nopl 0x0(%rax) */
5230 };
5231
5232 /* .eh_frame covering the .plt section. */
5233
5234 static const bfd_byte elf_x86_64_nacl_eh_frame_plt[] =
5235 {
5236 #if (PLT_CIE_LENGTH != 20 \
5237 || PLT_FDE_LENGTH != 36 \
5238 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \
5239 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12)
5240 # error "Need elf_x86_backend_data parameters for eh_frame_plt offsets!"
5241 #endif
5242 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */
5243 0, 0, 0, 0, /* CIE ID */
5244 1, /* CIE version */
5245 'z', 'R', 0, /* Augmentation string */
5246 1, /* Code alignment factor */
5247 0x78, /* Data alignment factor */
5248 16, /* Return address column */
5249 1, /* Augmentation size */
5250 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */
5251 DW_CFA_def_cfa, 7, 8, /* DW_CFA_def_cfa: r7 (rsp) ofs 8 */
5252 DW_CFA_offset + 16, 1, /* DW_CFA_offset: r16 (rip) at cfa-8 */
5253 DW_CFA_nop, DW_CFA_nop,
5254
5255 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */
5256 PLT_CIE_LENGTH + 8, 0, 0, 0,/* CIE pointer */
5257 0, 0, 0, 0, /* R_X86_64_PC32 .plt goes here */
5258 0, 0, 0, 0, /* .plt size goes here */
5259 0, /* Augmentation size */
5260 DW_CFA_def_cfa_offset, 16, /* DW_CFA_def_cfa_offset: 16 */
5261 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */
5262 DW_CFA_def_cfa_offset, 24, /* DW_CFA_def_cfa_offset: 24 */
5263 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */
5264 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */
5265 13, /* Block length */
5266 DW_OP_breg7, 8, /* DW_OP_breg7 (rsp): 8 */
5267 DW_OP_breg16, 0, /* DW_OP_breg16 (rip): 0 */
5268 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge,
5269 DW_OP_lit3, DW_OP_shl, DW_OP_plus,
5270 DW_CFA_nop, DW_CFA_nop
5271 };
5272
5273 static const struct elf_x86_lazy_plt_layout elf_x86_64_nacl_plt =
5274 {
5275 elf_x86_64_nacl_plt0_entry, /* plt0_entry */
5276 NACL_PLT_ENTRY_SIZE, /* plt0_entry_size */
5277 elf_x86_64_nacl_plt_entry, /* plt_entry */
5278 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */
5279 elf_x86_64_nacl_plt0_entry, /* plt_tlsdesc_entry */
5280 NACL_PLT_ENTRY_SIZE, /* plt_tlsdesc_entry_size */
5281 2, /* plt_tlsdesc_got1_offset */
5282 9, /* plt_tlsdesc_got2_offset */
5283 6, /* plt_tlsdesc_got1_insn_end */
5284 13, /* plt_tlsdesc_got2_insn_end */
5285 2, /* plt0_got1_offset */
5286 9, /* plt0_got2_offset */
5287 13, /* plt0_got2_insn_end */
5288 3, /* plt_got_offset */
5289 33, /* plt_reloc_offset */
5290 38, /* plt_plt_offset */
5291 7, /* plt_got_insn_size */
5292 42, /* plt_plt_insn_end */
5293 32, /* plt_lazy_offset */
5294 elf_x86_64_nacl_plt0_entry, /* pic_plt0_entry */
5295 elf_x86_64_nacl_plt_entry, /* pic_plt_entry */
5296 elf_x86_64_nacl_eh_frame_plt, /* eh_frame_plt */
5297 sizeof (elf_x86_64_nacl_eh_frame_plt) /* eh_frame_plt_size */
5298 };
5299
5300 static const struct elf_x86_backend_data elf_x86_64_nacl_arch_bed =
5301 {
5302 is_nacl /* os */
5303 };
5304
5305 #undef elf_backend_arch_data
5306 #define elf_backend_arch_data &elf_x86_64_nacl_arch_bed
5307
5308 #undef elf_backend_object_p
5309 #define elf_backend_object_p elf64_x86_64_nacl_elf_object_p
5310 #undef elf_backend_modify_segment_map
5311 #define elf_backend_modify_segment_map nacl_modify_segment_map
5312 #undef elf_backend_modify_program_headers
5313 #define elf_backend_modify_program_headers nacl_modify_program_headers
5314 #undef elf_backend_final_write_processing
5315 #define elf_backend_final_write_processing nacl_final_write_processing
5316
5317 #include "elf64-target.h"
5318
5319 /* Native Client x32 support. */
5320
5321 static bfd_boolean
5322 elf32_x86_64_nacl_elf_object_p (bfd *abfd)
5323 {
5324 /* Set the right machine number for a NaCl x86-64 ELF32 file. */
5325 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x64_32_nacl);
5326 return TRUE;
5327 }
5328
5329 #undef TARGET_LITTLE_SYM
5330 #define TARGET_LITTLE_SYM x86_64_elf32_nacl_vec
5331 #undef TARGET_LITTLE_NAME
5332 #define TARGET_LITTLE_NAME "elf32-x86-64-nacl"
5333 #undef elf32_bed
5334 #define elf32_bed elf32_x86_64_nacl_bed
5335
5336 #define bfd_elf32_bfd_reloc_type_lookup \
5337 elf_x86_64_reloc_type_lookup
5338 #define bfd_elf32_bfd_reloc_name_lookup \
5339 elf_x86_64_reloc_name_lookup
5340 #define bfd_elf32_get_synthetic_symtab \
5341 elf_x86_64_get_synthetic_symtab
5342
5343 #undef elf_backend_object_p
5344 #define elf_backend_object_p \
5345 elf32_x86_64_nacl_elf_object_p
5346
5347 #undef elf_backend_bfd_from_remote_memory
5348 #define elf_backend_bfd_from_remote_memory \
5349 _bfd_elf32_bfd_from_remote_memory
5350
5351 #undef elf_backend_size_info
5352 #define elf_backend_size_info \
5353 _bfd_elf32_size_info
5354
5355 #undef elf32_bed
5356 #define elf32_bed elf32_x86_64_bed
5357
5358 #include "elf32-target.h"
5359
5360 /* Restore defaults. */
5361 #undef elf_backend_object_p
5362 #define elf_backend_object_p elf64_x86_64_elf_object_p
5363 #undef elf_backend_bfd_from_remote_memory
5364 #undef elf_backend_size_info
5365 #undef elf_backend_modify_segment_map
5366 #undef elf_backend_modify_program_headers
5367 #undef elf_backend_final_write_processing
5368
5369 /* Intel L1OM support. */
5370
5371 static bfd_boolean
5372 elf64_l1om_elf_object_p (bfd *abfd)
5373 {
5374 /* Set the right machine number for an L1OM elf64 file. */
5375 bfd_default_set_arch_mach (abfd, bfd_arch_l1om, bfd_mach_l1om);
5376 return TRUE;
5377 }
5378
5379 #undef TARGET_LITTLE_SYM
5380 #define TARGET_LITTLE_SYM l1om_elf64_vec
5381 #undef TARGET_LITTLE_NAME
5382 #define TARGET_LITTLE_NAME "elf64-l1om"
5383 #undef ELF_ARCH
5384 #define ELF_ARCH bfd_arch_l1om
5385
5386 #undef ELF_MACHINE_CODE
5387 #define ELF_MACHINE_CODE EM_L1OM
5388
5389 #undef ELF_OSABI
5390
5391 #undef elf64_bed
5392 #define elf64_bed elf64_l1om_bed
5393
5394 #undef elf_backend_object_p
5395 #define elf_backend_object_p elf64_l1om_elf_object_p
5396
5397 /* Restore defaults. */
5398 #undef ELF_MAXPAGESIZE
5399 #undef ELF_MINPAGESIZE
5400 #undef ELF_COMMONPAGESIZE
5401 #if DEFAULT_LD_Z_SEPARATE_CODE
5402 # define ELF_MAXPAGESIZE 0x1000
5403 #else
5404 # define ELF_MAXPAGESIZE 0x200000
5405 #endif
5406 #define ELF_MINPAGESIZE 0x1000
5407 #define ELF_COMMONPAGESIZE 0x1000
5408 #undef elf_backend_plt_alignment
5409 #define elf_backend_plt_alignment 4
5410 #undef elf_backend_arch_data
5411 #define elf_backend_arch_data &elf_x86_64_arch_bed
5412
5413 #include "elf64-target.h"
5414
5415 /* FreeBSD L1OM support. */
5416
5417 #undef TARGET_LITTLE_SYM
5418 #define TARGET_LITTLE_SYM l1om_elf64_fbsd_vec
5419 #undef TARGET_LITTLE_NAME
5420 #define TARGET_LITTLE_NAME "elf64-l1om-freebsd"
5421
5422 #undef ELF_OSABI
5423 #define ELF_OSABI ELFOSABI_FREEBSD
5424
5425 #undef elf64_bed
5426 #define elf64_bed elf64_l1om_fbsd_bed
5427
5428 #include "elf64-target.h"
5429
5430 /* Intel K1OM support. */
5431
5432 static bfd_boolean
5433 elf64_k1om_elf_object_p (bfd *abfd)
5434 {
5435 /* Set the right machine number for an K1OM elf64 file. */
5436 bfd_default_set_arch_mach (abfd, bfd_arch_k1om, bfd_mach_k1om);
5437 return TRUE;
5438 }
5439
5440 #undef TARGET_LITTLE_SYM
5441 #define TARGET_LITTLE_SYM k1om_elf64_vec
5442 #undef TARGET_LITTLE_NAME
5443 #define TARGET_LITTLE_NAME "elf64-k1om"
5444 #undef ELF_ARCH
5445 #define ELF_ARCH bfd_arch_k1om
5446
5447 #undef ELF_MACHINE_CODE
5448 #define ELF_MACHINE_CODE EM_K1OM
5449
5450 #undef ELF_OSABI
5451
5452 #undef elf64_bed
5453 #define elf64_bed elf64_k1om_bed
5454
5455 #undef elf_backend_object_p
5456 #define elf_backend_object_p elf64_k1om_elf_object_p
5457
5458 #undef elf_backend_static_tls_alignment
5459
5460 #undef elf_backend_want_plt_sym
5461 #define elf_backend_want_plt_sym 0
5462
5463 #include "elf64-target.h"
5464
5465 /* FreeBSD K1OM support. */
5466
5467 #undef TARGET_LITTLE_SYM
5468 #define TARGET_LITTLE_SYM k1om_elf64_fbsd_vec
5469 #undef TARGET_LITTLE_NAME
5470 #define TARGET_LITTLE_NAME "elf64-k1om-freebsd"
5471
5472 #undef ELF_OSABI
5473 #define ELF_OSABI ELFOSABI_FREEBSD
5474
5475 #undef elf64_bed
5476 #define elf64_bed elf64_k1om_fbsd_bed
5477
5478 #include "elf64-target.h"
5479
5480 /* 32bit x86-64 support. */
5481
5482 #undef TARGET_LITTLE_SYM
5483 #define TARGET_LITTLE_SYM x86_64_elf32_vec
5484 #undef TARGET_LITTLE_NAME
5485 #define TARGET_LITTLE_NAME "elf32-x86-64"
5486 #undef elf32_bed
5487
5488 #undef ELF_ARCH
5489 #define ELF_ARCH bfd_arch_i386
5490
5491 #undef ELF_MACHINE_CODE
5492 #define ELF_MACHINE_CODE EM_X86_64
5493
5494 #undef ELF_OSABI
5495
5496 #undef elf_backend_object_p
5497 #define elf_backend_object_p \
5498 elf32_x86_64_elf_object_p
5499
5500 #undef elf_backend_bfd_from_remote_memory
5501 #define elf_backend_bfd_from_remote_memory \
5502 _bfd_elf32_bfd_from_remote_memory
5503
5504 #undef elf_backend_size_info
5505 #define elf_backend_size_info \
5506 _bfd_elf32_size_info
5507
5508 #include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.189442 seconds and 4 git commands to generate.