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