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