1 /* Intel 80386/80486-specific support for 32-bit ELF 2 Copyright (C) 1993-2016 Free Software Foundation, Inc. 3 4 This file is part of BFD, the Binary File Descriptor library. 5 6 This program is free software; you can redistribute it and/or modify 7 it under the terms of the GNU General Public License as published by 8 the Free Software Foundation; either version 3 of the License, or 9 (at your option) any later version. 10 11 This program is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 GNU General Public License for more details. 15 16 You should have received a copy of the GNU General Public License 17 along with this program; if not, write to the Free Software 18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 19 MA 02110-1301, USA. */ 20 21 #include "sysdep.h" 22 #include "bfd.h" 23 #include "bfdlink.h" 24 #include "libbfd.h" 25 #include "elf-bfd.h" 26 #include "elf-nacl.h" 27 #include "elf-vxworks.h" 28 #include "bfd_stdint.h" 29 #include "objalloc.h" 30 #include "hashtab.h" 31 #include "dwarf2.h" 32 #include "opcode/i386.h" 33 34 /* 386 uses REL relocations instead of RELA. */ 35 #define USE_REL 1 36 37 #include "elf/i386.h" 38 39 static reloc_howto_type elf_howto_table[]= 40 { 41 HOWTO(R_386_NONE, 0, 3, 0, FALSE, 0, complain_overflow_dont, 42 bfd_elf_generic_reloc, "R_386_NONE", 43 TRUE, 0x00000000, 0x00000000, FALSE), 44 HOWTO(R_386_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 45 bfd_elf_generic_reloc, "R_386_32", 46 TRUE, 0xffffffff, 0xffffffff, FALSE), 47 HOWTO(R_386_PC32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield, 48 bfd_elf_generic_reloc, "R_386_PC32", 49 TRUE, 0xffffffff, 0xffffffff, TRUE), 50 HOWTO(R_386_GOT32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 51 bfd_elf_generic_reloc, "R_386_GOT32", 52 TRUE, 0xffffffff, 0xffffffff, FALSE), 53 HOWTO(R_386_PLT32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield, 54 bfd_elf_generic_reloc, "R_386_PLT32", 55 TRUE, 0xffffffff, 0xffffffff, TRUE), 56 HOWTO(R_386_COPY, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 57 bfd_elf_generic_reloc, "R_386_COPY", 58 TRUE, 0xffffffff, 0xffffffff, FALSE), 59 HOWTO(R_386_GLOB_DAT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 60 bfd_elf_generic_reloc, "R_386_GLOB_DAT", 61 TRUE, 0xffffffff, 0xffffffff, FALSE), 62 HOWTO(R_386_JUMP_SLOT, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 63 bfd_elf_generic_reloc, "R_386_JUMP_SLOT", 64 TRUE, 0xffffffff, 0xffffffff, FALSE), 65 HOWTO(R_386_RELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 66 bfd_elf_generic_reloc, "R_386_RELATIVE", 67 TRUE, 0xffffffff, 0xffffffff, FALSE), 68 HOWTO(R_386_GOTOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 69 bfd_elf_generic_reloc, "R_386_GOTOFF", 70 TRUE, 0xffffffff, 0xffffffff, FALSE), 71 HOWTO(R_386_GOTPC, 0, 2, 32, TRUE, 0, complain_overflow_bitfield, 72 bfd_elf_generic_reloc, "R_386_GOTPC", 73 TRUE, 0xffffffff, 0xffffffff, TRUE), 74 75 /* We have a gap in the reloc numbers here. 76 R_386_standard counts the number up to this point, and 77 R_386_ext_offset is the value to subtract from a reloc type of 78 R_386_16 thru R_386_PC8 to form an index into this table. */ 79 #define R_386_standard (R_386_GOTPC + 1) 80 #define R_386_ext_offset (R_386_TLS_TPOFF - R_386_standard) 81 82 /* These relocs are a GNU extension. */ 83 HOWTO(R_386_TLS_TPOFF, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 84 bfd_elf_generic_reloc, "R_386_TLS_TPOFF", 85 TRUE, 0xffffffff, 0xffffffff, FALSE), 86 HOWTO(R_386_TLS_IE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 87 bfd_elf_generic_reloc, "R_386_TLS_IE", 88 TRUE, 0xffffffff, 0xffffffff, FALSE), 89 HOWTO(R_386_TLS_GOTIE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 90 bfd_elf_generic_reloc, "R_386_TLS_GOTIE", 91 TRUE, 0xffffffff, 0xffffffff, FALSE), 92 HOWTO(R_386_TLS_LE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 93 bfd_elf_generic_reloc, "R_386_TLS_LE", 94 TRUE, 0xffffffff, 0xffffffff, FALSE), 95 HOWTO(R_386_TLS_GD, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 96 bfd_elf_generic_reloc, "R_386_TLS_GD", 97 TRUE, 0xffffffff, 0xffffffff, FALSE), 98 HOWTO(R_386_TLS_LDM, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 99 bfd_elf_generic_reloc, "R_386_TLS_LDM", 100 TRUE, 0xffffffff, 0xffffffff, FALSE), 101 HOWTO(R_386_16, 0, 1, 16, FALSE, 0, complain_overflow_bitfield, 102 bfd_elf_generic_reloc, "R_386_16", 103 TRUE, 0xffff, 0xffff, FALSE), 104 HOWTO(R_386_PC16, 0, 1, 16, TRUE, 0, complain_overflow_bitfield, 105 bfd_elf_generic_reloc, "R_386_PC16", 106 TRUE, 0xffff, 0xffff, TRUE), 107 HOWTO(R_386_8, 0, 0, 8, FALSE, 0, complain_overflow_bitfield, 108 bfd_elf_generic_reloc, "R_386_8", 109 TRUE, 0xff, 0xff, FALSE), 110 HOWTO(R_386_PC8, 0, 0, 8, TRUE, 0, complain_overflow_signed, 111 bfd_elf_generic_reloc, "R_386_PC8", 112 TRUE, 0xff, 0xff, TRUE), 113 114 #define R_386_ext (R_386_PC8 + 1 - R_386_ext_offset) 115 #define R_386_tls_offset (R_386_TLS_LDO_32 - R_386_ext) 116 /* These are common with Solaris TLS implementation. */ 117 HOWTO(R_386_TLS_LDO_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 118 bfd_elf_generic_reloc, "R_386_TLS_LDO_32", 119 TRUE, 0xffffffff, 0xffffffff, FALSE), 120 HOWTO(R_386_TLS_IE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 121 bfd_elf_generic_reloc, "R_386_TLS_IE_32", 122 TRUE, 0xffffffff, 0xffffffff, FALSE), 123 HOWTO(R_386_TLS_LE_32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 124 bfd_elf_generic_reloc, "R_386_TLS_LE_32", 125 TRUE, 0xffffffff, 0xffffffff, FALSE), 126 HOWTO(R_386_TLS_DTPMOD32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 127 bfd_elf_generic_reloc, "R_386_TLS_DTPMOD32", 128 TRUE, 0xffffffff, 0xffffffff, FALSE), 129 HOWTO(R_386_TLS_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 130 bfd_elf_generic_reloc, "R_386_TLS_DTPOFF32", 131 TRUE, 0xffffffff, 0xffffffff, FALSE), 132 HOWTO(R_386_TLS_TPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 133 bfd_elf_generic_reloc, "R_386_TLS_TPOFF32", 134 TRUE, 0xffffffff, 0xffffffff, FALSE), 135 HOWTO(R_386_SIZE32, 0, 2, 32, FALSE, 0, complain_overflow_unsigned, 136 bfd_elf_generic_reloc, "R_386_SIZE32", 137 TRUE, 0xffffffff, 0xffffffff, FALSE), 138 HOWTO(R_386_TLS_GOTDESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 139 bfd_elf_generic_reloc, "R_386_TLS_GOTDESC", 140 TRUE, 0xffffffff, 0xffffffff, FALSE), 141 HOWTO(R_386_TLS_DESC_CALL, 0, 0, 0, FALSE, 0, complain_overflow_dont, 142 bfd_elf_generic_reloc, "R_386_TLS_DESC_CALL", 143 FALSE, 0, 0, FALSE), 144 HOWTO(R_386_TLS_DESC, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 145 bfd_elf_generic_reloc, "R_386_TLS_DESC", 146 TRUE, 0xffffffff, 0xffffffff, FALSE), 147 HOWTO(R_386_IRELATIVE, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 148 bfd_elf_generic_reloc, "R_386_IRELATIVE", 149 TRUE, 0xffffffff, 0xffffffff, FALSE), 150 HOWTO(R_386_GOT32X, 0, 2, 32, FALSE, 0, complain_overflow_bitfield, 151 bfd_elf_generic_reloc, "R_386_GOT32X", 152 TRUE, 0xffffffff, 0xffffffff, FALSE), 153 154 /* Another gap. */ 155 #define R_386_ext2 (R_386_GOT32X + 1 - R_386_tls_offset) 156 #define R_386_vt_offset (R_386_GNU_VTINHERIT - R_386_ext2) 157 158 /* GNU extension to record C++ vtable hierarchy. */ 159 HOWTO (R_386_GNU_VTINHERIT, /* type */ 160 0, /* rightshift */ 161 2, /* size (0 = byte, 1 = short, 2 = long) */ 162 0, /* bitsize */ 163 FALSE, /* pc_relative */ 164 0, /* bitpos */ 165 complain_overflow_dont, /* complain_on_overflow */ 166 NULL, /* special_function */ 167 "R_386_GNU_VTINHERIT", /* name */ 168 FALSE, /* partial_inplace */ 169 0, /* src_mask */ 170 0, /* dst_mask */ 171 FALSE), /* pcrel_offset */ 172 173 /* GNU extension to record C++ vtable member usage. */ 174 HOWTO (R_386_GNU_VTENTRY, /* type */ 175 0, /* rightshift */ 176 2, /* size (0 = byte, 1 = short, 2 = long) */ 177 0, /* bitsize */ 178 FALSE, /* pc_relative */ 179 0, /* bitpos */ 180 complain_overflow_dont, /* complain_on_overflow */ 181 _bfd_elf_rel_vtable_reloc_fn, /* special_function */ 182 "R_386_GNU_VTENTRY", /* name */ 183 FALSE, /* partial_inplace */ 184 0, /* src_mask */ 185 0, /* dst_mask */ 186 FALSE) /* pcrel_offset */ 187 188 #define R_386_vt (R_386_GNU_VTENTRY + 1 - R_386_vt_offset) 189 190 }; 191 192 #ifdef DEBUG_GEN_RELOC 193 #define TRACE(str) \ 194 fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str) 195 #else 196 #define TRACE(str) 197 #endif 198 199 static reloc_howto_type * 200 elf_i386_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED, 201 bfd_reloc_code_real_type code) 202 { 203 switch (code) 204 { 205 case BFD_RELOC_NONE: 206 TRACE ("BFD_RELOC_NONE"); 207 return &elf_howto_table[R_386_NONE]; 208 209 case BFD_RELOC_32: 210 TRACE ("BFD_RELOC_32"); 211 return &elf_howto_table[R_386_32]; 212 213 case BFD_RELOC_CTOR: 214 TRACE ("BFD_RELOC_CTOR"); 215 return &elf_howto_table[R_386_32]; 216 217 case BFD_RELOC_32_PCREL: 218 TRACE ("BFD_RELOC_PC32"); 219 return &elf_howto_table[R_386_PC32]; 220 221 case BFD_RELOC_386_GOT32: 222 TRACE ("BFD_RELOC_386_GOT32"); 223 return &elf_howto_table[R_386_GOT32]; 224 225 case BFD_RELOC_386_PLT32: 226 TRACE ("BFD_RELOC_386_PLT32"); 227 return &elf_howto_table[R_386_PLT32]; 228 229 case BFD_RELOC_386_COPY: 230 TRACE ("BFD_RELOC_386_COPY"); 231 return &elf_howto_table[R_386_COPY]; 232 233 case BFD_RELOC_386_GLOB_DAT: 234 TRACE ("BFD_RELOC_386_GLOB_DAT"); 235 return &elf_howto_table[R_386_GLOB_DAT]; 236 237 case BFD_RELOC_386_JUMP_SLOT: 238 TRACE ("BFD_RELOC_386_JUMP_SLOT"); 239 return &elf_howto_table[R_386_JUMP_SLOT]; 240 241 case BFD_RELOC_386_RELATIVE: 242 TRACE ("BFD_RELOC_386_RELATIVE"); 243 return &elf_howto_table[R_386_RELATIVE]; 244 245 case BFD_RELOC_386_GOTOFF: 246 TRACE ("BFD_RELOC_386_GOTOFF"); 247 return &elf_howto_table[R_386_GOTOFF]; 248 249 case BFD_RELOC_386_GOTPC: 250 TRACE ("BFD_RELOC_386_GOTPC"); 251 return &elf_howto_table[R_386_GOTPC]; 252 253 /* These relocs are a GNU extension. */ 254 case BFD_RELOC_386_TLS_TPOFF: 255 TRACE ("BFD_RELOC_386_TLS_TPOFF"); 256 return &elf_howto_table[R_386_TLS_TPOFF - R_386_ext_offset]; 257 258 case BFD_RELOC_386_TLS_IE: 259 TRACE ("BFD_RELOC_386_TLS_IE"); 260 return &elf_howto_table[R_386_TLS_IE - R_386_ext_offset]; 261 262 case BFD_RELOC_386_TLS_GOTIE: 263 TRACE ("BFD_RELOC_386_TLS_GOTIE"); 264 return &elf_howto_table[R_386_TLS_GOTIE - R_386_ext_offset]; 265 266 case BFD_RELOC_386_TLS_LE: 267 TRACE ("BFD_RELOC_386_TLS_LE"); 268 return &elf_howto_table[R_386_TLS_LE - R_386_ext_offset]; 269 270 case BFD_RELOC_386_TLS_GD: 271 TRACE ("BFD_RELOC_386_TLS_GD"); 272 return &elf_howto_table[R_386_TLS_GD - R_386_ext_offset]; 273 274 case BFD_RELOC_386_TLS_LDM: 275 TRACE ("BFD_RELOC_386_TLS_LDM"); 276 return &elf_howto_table[R_386_TLS_LDM - R_386_ext_offset]; 277 278 case BFD_RELOC_16: 279 TRACE ("BFD_RELOC_16"); 280 return &elf_howto_table[R_386_16 - R_386_ext_offset]; 281 282 case BFD_RELOC_16_PCREL: 283 TRACE ("BFD_RELOC_16_PCREL"); 284 return &elf_howto_table[R_386_PC16 - R_386_ext_offset]; 285 286 case BFD_RELOC_8: 287 TRACE ("BFD_RELOC_8"); 288 return &elf_howto_table[R_386_8 - R_386_ext_offset]; 289 290 case BFD_RELOC_8_PCREL: 291 TRACE ("BFD_RELOC_8_PCREL"); 292 return &elf_howto_table[R_386_PC8 - R_386_ext_offset]; 293 294 /* Common with Sun TLS implementation. */ 295 case BFD_RELOC_386_TLS_LDO_32: 296 TRACE ("BFD_RELOC_386_TLS_LDO_32"); 297 return &elf_howto_table[R_386_TLS_LDO_32 - R_386_tls_offset]; 298 299 case BFD_RELOC_386_TLS_IE_32: 300 TRACE ("BFD_RELOC_386_TLS_IE_32"); 301 return &elf_howto_table[R_386_TLS_IE_32 - R_386_tls_offset]; 302 303 case BFD_RELOC_386_TLS_LE_32: 304 TRACE ("BFD_RELOC_386_TLS_LE_32"); 305 return &elf_howto_table[R_386_TLS_LE_32 - R_386_tls_offset]; 306 307 case BFD_RELOC_386_TLS_DTPMOD32: 308 TRACE ("BFD_RELOC_386_TLS_DTPMOD32"); 309 return &elf_howto_table[R_386_TLS_DTPMOD32 - R_386_tls_offset]; 310 311 case BFD_RELOC_386_TLS_DTPOFF32: 312 TRACE ("BFD_RELOC_386_TLS_DTPOFF32"); 313 return &elf_howto_table[R_386_TLS_DTPOFF32 - R_386_tls_offset]; 314 315 case BFD_RELOC_386_TLS_TPOFF32: 316 TRACE ("BFD_RELOC_386_TLS_TPOFF32"); 317 return &elf_howto_table[R_386_TLS_TPOFF32 - R_386_tls_offset]; 318 319 case BFD_RELOC_SIZE32: 320 TRACE ("BFD_RELOC_SIZE32"); 321 return &elf_howto_table[R_386_SIZE32 - R_386_tls_offset]; 322 323 case BFD_RELOC_386_TLS_GOTDESC: 324 TRACE ("BFD_RELOC_386_TLS_GOTDESC"); 325 return &elf_howto_table[R_386_TLS_GOTDESC - R_386_tls_offset]; 326 327 case BFD_RELOC_386_TLS_DESC_CALL: 328 TRACE ("BFD_RELOC_386_TLS_DESC_CALL"); 329 return &elf_howto_table[R_386_TLS_DESC_CALL - R_386_tls_offset]; 330 331 case BFD_RELOC_386_TLS_DESC: 332 TRACE ("BFD_RELOC_386_TLS_DESC"); 333 return &elf_howto_table[R_386_TLS_DESC - R_386_tls_offset]; 334 335 case BFD_RELOC_386_IRELATIVE: 336 TRACE ("BFD_RELOC_386_IRELATIVE"); 337 return &elf_howto_table[R_386_IRELATIVE - R_386_tls_offset]; 338 339 case BFD_RELOC_386_GOT32X: 340 TRACE ("BFD_RELOC_386_GOT32X"); 341 return &elf_howto_table[R_386_GOT32X - R_386_tls_offset]; 342 343 case BFD_RELOC_VTABLE_INHERIT: 344 TRACE ("BFD_RELOC_VTABLE_INHERIT"); 345 return &elf_howto_table[R_386_GNU_VTINHERIT - R_386_vt_offset]; 346 347 case BFD_RELOC_VTABLE_ENTRY: 348 TRACE ("BFD_RELOC_VTABLE_ENTRY"); 349 return &elf_howto_table[R_386_GNU_VTENTRY - R_386_vt_offset]; 350 351 default: 352 break; 353 } 354 355 TRACE ("Unknown"); 356 return 0; 357 } 358 359 static reloc_howto_type * 360 elf_i386_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 361 const char *r_name) 362 { 363 unsigned int i; 364 365 for (i = 0; i < sizeof (elf_howto_table) / sizeof (elf_howto_table[0]); i++) 366 if (elf_howto_table[i].name != NULL 367 && strcasecmp (elf_howto_table[i].name, r_name) == 0) 368 return &elf_howto_table[i]; 369 370 return NULL; 371 } 372 373 static reloc_howto_type * 374 elf_i386_rtype_to_howto (bfd *abfd, unsigned r_type) 375 { 376 unsigned int indx; 377 378 if ((indx = r_type) >= R_386_standard 379 && ((indx = r_type - R_386_ext_offset) - R_386_standard 380 >= R_386_ext - R_386_standard) 381 && ((indx = r_type - R_386_tls_offset) - R_386_ext 382 >= R_386_ext2 - R_386_ext) 383 && ((indx = r_type - R_386_vt_offset) - R_386_ext2 384 >= R_386_vt - R_386_ext2)) 385 { 386 (*_bfd_error_handler) (_("%B: invalid relocation type %d"), 387 abfd, (int) r_type); 388 indx = R_386_NONE; 389 } 390 /* PR 17512: file: 0f67f69d. */ 391 if (elf_howto_table [indx].type != r_type) 392 return NULL; 393 return &elf_howto_table[indx]; 394 } 395 396 static void 397 elf_i386_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED, 398 arelent *cache_ptr, 399 Elf_Internal_Rela *dst) 400 { 401 unsigned int r_type = ELF32_R_TYPE (dst->r_info); 402 cache_ptr->howto = elf_i386_rtype_to_howto (abfd, r_type); 403 } 404 405 /* Return whether a symbol name implies a local label. The UnixWare 406 2.1 cc generates temporary symbols that start with .X, so we 407 recognize them here. FIXME: do other SVR4 compilers also use .X?. 408 If so, we should move the .X recognition into 409 _bfd_elf_is_local_label_name. */ 410 411 static bfd_boolean 412 elf_i386_is_local_label_name (bfd *abfd, const char *name) 413 { 414 if (name[0] == '.' && name[1] == 'X') 415 return TRUE; 416 417 return _bfd_elf_is_local_label_name (abfd, name); 418 } 419 420 /* Support for core dump NOTE sections. */ 421 422 static bfd_boolean 423 elf_i386_grok_prstatus (bfd *abfd, Elf_Internal_Note *note) 424 { 425 int offset; 426 size_t size; 427 428 if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0) 429 { 430 int pr_version = bfd_get_32 (abfd, note->descdata); 431 432 if (pr_version != 1) 433 return FALSE; 434 435 /* pr_cursig */ 436 elf_tdata (abfd)->core->signal = bfd_get_32 (abfd, note->descdata + 20); 437 438 /* pr_pid */ 439 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24); 440 441 /* pr_reg */ 442 offset = 28; 443 size = bfd_get_32 (abfd, note->descdata + 8); 444 } 445 else 446 { 447 switch (note->descsz) 448 { 449 default: 450 return FALSE; 451 452 case 144: /* Linux/i386 */ 453 /* pr_cursig */ 454 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12); 455 456 /* pr_pid */ 457 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24); 458 459 /* pr_reg */ 460 offset = 72; 461 size = 68; 462 463 break; 464 } 465 } 466 467 /* Make a ".reg/999" section. */ 468 return _bfd_elfcore_make_pseudosection (abfd, ".reg", 469 size, note->descpos + offset); 470 } 471 472 static bfd_boolean 473 elf_i386_grok_psinfo (bfd *abfd, Elf_Internal_Note *note) 474 { 475 if (note->namesz == 8 && strcmp (note->namedata, "FreeBSD") == 0) 476 { 477 int pr_version = bfd_get_32 (abfd, note->descdata); 478 479 if (pr_version != 1) 480 return FALSE; 481 482 elf_tdata (abfd)->core->program 483 = _bfd_elfcore_strndup (abfd, note->descdata + 8, 17); 484 elf_tdata (abfd)->core->command 485 = _bfd_elfcore_strndup (abfd, note->descdata + 25, 81); 486 } 487 else 488 { 489 switch (note->descsz) 490 { 491 default: 492 return FALSE; 493 494 case 124: /* Linux/i386 elf_prpsinfo. */ 495 elf_tdata (abfd)->core->pid 496 = bfd_get_32 (abfd, note->descdata + 12); 497 elf_tdata (abfd)->core->program 498 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16); 499 elf_tdata (abfd)->core->command 500 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80); 501 } 502 } 503 504 /* Note that for some reason, a spurious space is tacked 505 onto the end of the args in some (at least one anyway) 506 implementations, so strip it off if it exists. */ 507 { 508 char *command = elf_tdata (abfd)->core->command; 509 int n = strlen (command); 510 511 if (0 < n && command[n - 1] == ' ') 512 command[n - 1] = '\0'; 513 } 514 515 return TRUE; 516 } 517 518 /* Functions for the i386 ELF linker. 519 520 In order to gain some understanding of code in this file without 521 knowing all the intricate details of the linker, note the 522 following: 523 524 Functions named elf_i386_* are called by external routines, other 525 functions are only called locally. elf_i386_* functions appear 526 in this file more or less in the order in which they are called 527 from external routines. eg. elf_i386_check_relocs is called 528 early in the link process, elf_i386_finish_dynamic_sections is 529 one of the last functions. */ 530 531 532 /* The name of the dynamic interpreter. This is put in the .interp 533 section. */ 534 535 #define ELF_DYNAMIC_INTERPRETER "/libexec/ld.elf_so" 536 537 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid 538 copying dynamic variables from a shared lib into an app's dynbss 539 section, and instead use a dynamic relocation to point into the 540 shared lib. */ 541 #define ELIMINATE_COPY_RELOCS 1 542 543 /* The size in bytes of an entry in the procedure linkage table. */ 544 545 #define PLT_ENTRY_SIZE 16 546 547 /* The first entry in an absolute procedure linkage table looks like 548 this. See the SVR4 ABI i386 supplement to see how this works. 549 Will be padded to PLT_ENTRY_SIZE with htab->plt0_pad_byte. */ 550 551 static const bfd_byte elf_i386_plt0_entry[12] = 552 { 553 0xff, 0x35, /* pushl contents of address */ 554 0, 0, 0, 0, /* replaced with address of .got + 4. */ 555 0xff, 0x25, /* jmp indirect */ 556 0, 0, 0, 0 /* replaced with address of .got + 8. */ 557 }; 558 559 /* Subsequent entries in an absolute procedure linkage table look like 560 this. */ 561 562 static const bfd_byte elf_i386_plt_entry[PLT_ENTRY_SIZE] = 563 { 564 0xff, 0x25, /* jmp indirect */ 565 0, 0, 0, 0, /* replaced with address of this symbol in .got. */ 566 0x68, /* pushl immediate */ 567 0, 0, 0, 0, /* replaced with offset into relocation table. */ 568 0xe9, /* jmp relative */ 569 0, 0, 0, 0 /* replaced with offset to start of .plt. */ 570 }; 571 572 /* The first entry in a PIC procedure linkage table look like this. 573 Will be padded to PLT_ENTRY_SIZE with htab->plt0_pad_byte. */ 574 575 static const bfd_byte elf_i386_pic_plt0_entry[12] = 576 { 577 0xff, 0xb3, 4, 0, 0, 0, /* pushl 4(%ebx) */ 578 0xff, 0xa3, 8, 0, 0, 0 /* jmp *8(%ebx) */ 579 }; 580 581 /* Subsequent entries in a PIC procedure linkage table look like this. */ 582 583 static const bfd_byte elf_i386_pic_plt_entry[PLT_ENTRY_SIZE] = 584 { 585 0xff, 0xa3, /* jmp *offset(%ebx) */ 586 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */ 587 0x68, /* pushl immediate */ 588 0, 0, 0, 0, /* replaced with offset into relocation table. */ 589 0xe9, /* jmp relative */ 590 0, 0, 0, 0 /* replaced with offset to start of .plt. */ 591 }; 592 593 /* Entries in the GOT procedure linkage table look like this. */ 594 595 static const bfd_byte elf_i386_got_plt_entry[8] = 596 { 597 0xff, 0x25, /* jmp indirect */ 598 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */ 599 0x66, 0x90 /* xchg %ax,%ax */ 600 }; 601 602 /* Entries in the PIC GOT procedure linkage table look like this. */ 603 604 static const bfd_byte elf_i386_pic_got_plt_entry[8] = 605 { 606 0xff, 0xa3, /* jmp *offset(%ebx) */ 607 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */ 608 0x66, 0x90 /* xchg %ax,%ax */ 609 }; 610 611 /* .eh_frame covering the .plt section. */ 612 613 static const bfd_byte elf_i386_eh_frame_plt[] = 614 { 615 #define PLT_CIE_LENGTH 20 616 #define PLT_FDE_LENGTH 36 617 #define PLT_FDE_START_OFFSET 4 + PLT_CIE_LENGTH + 8 618 #define PLT_FDE_LEN_OFFSET 4 + PLT_CIE_LENGTH + 12 619 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */ 620 0, 0, 0, 0, /* CIE ID */ 621 1, /* CIE version */ 622 'z', 'R', 0, /* Augmentation string */ 623 1, /* Code alignment factor */ 624 0x7c, /* Data alignment factor */ 625 8, /* Return address column */ 626 1, /* Augmentation size */ 627 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */ 628 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */ 629 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */ 630 DW_CFA_nop, DW_CFA_nop, 631 632 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */ 633 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */ 634 0, 0, 0, 0, /* R_386_PC32 .plt goes here */ 635 0, 0, 0, 0, /* .plt size goes here */ 636 0, /* Augmentation size */ 637 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */ 638 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */ 639 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */ 640 DW_CFA_advance_loc + 10, /* DW_CFA_advance_loc: 10 to __PLT__+16 */ 641 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */ 642 11, /* Block length */ 643 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */ 644 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */ 645 DW_OP_lit15, DW_OP_and, DW_OP_lit11, DW_OP_ge, 646 DW_OP_lit2, DW_OP_shl, DW_OP_plus, 647 DW_CFA_nop, DW_CFA_nop, DW_CFA_nop, DW_CFA_nop 648 }; 649 650 struct elf_i386_plt_layout 651 { 652 /* The first entry in an absolute procedure linkage table looks like this. */ 653 const bfd_byte *plt0_entry; 654 unsigned int plt0_entry_size; 655 656 /* Offsets into plt0_entry that are to be replaced with GOT[1] and GOT[2]. */ 657 unsigned int plt0_got1_offset; 658 unsigned int plt0_got2_offset; 659 660 /* Later entries in an absolute procedure linkage table look like this. */ 661 const bfd_byte *plt_entry; 662 unsigned int plt_entry_size; 663 664 /* Offsets into plt_entry that are to be replaced with... */ 665 unsigned int plt_got_offset; /* ... address of this symbol in .got. */ 666 unsigned int plt_reloc_offset; /* ... offset into relocation table. */ 667 unsigned int plt_plt_offset; /* ... offset to start of .plt. */ 668 669 /* Offset into plt_entry where the initial value of the GOT entry points. */ 670 unsigned int plt_lazy_offset; 671 672 /* The first entry in a PIC procedure linkage table looks like this. */ 673 const bfd_byte *pic_plt0_entry; 674 675 /* Subsequent entries in a PIC procedure linkage table look like this. */ 676 const bfd_byte *pic_plt_entry; 677 678 /* .eh_frame covering the .plt section. */ 679 const bfd_byte *eh_frame_plt; 680 unsigned int eh_frame_plt_size; 681 }; 682 683 #define GET_PLT_ENTRY_SIZE(abfd) \ 684 get_elf_i386_backend_data (abfd)->plt->plt_entry_size 685 686 /* These are the standard parameters. */ 687 static const struct elf_i386_plt_layout elf_i386_plt = 688 { 689 elf_i386_plt0_entry, /* plt0_entry */ 690 sizeof (elf_i386_plt0_entry), /* plt0_entry_size */ 691 2, /* plt0_got1_offset */ 692 8, /* plt0_got2_offset */ 693 elf_i386_plt_entry, /* plt_entry */ 694 PLT_ENTRY_SIZE, /* plt_entry_size */ 695 2, /* plt_got_offset */ 696 7, /* plt_reloc_offset */ 697 12, /* plt_plt_offset */ 698 6, /* plt_lazy_offset */ 699 elf_i386_pic_plt0_entry, /* pic_plt0_entry */ 700 elf_i386_pic_plt_entry, /* pic_plt_entry */ 701 elf_i386_eh_frame_plt, /* eh_frame_plt */ 702 sizeof (elf_i386_eh_frame_plt), /* eh_frame_plt_size */ 703 }; 704 705 706 /* On VxWorks, the .rel.plt.unloaded section has absolute relocations 707 for the PLTResolve stub and then for each PLT entry. */ 708 #define PLTRESOLVE_RELOCS_SHLIB 0 709 #define PLTRESOLVE_RELOCS 2 710 #define PLT_NON_JUMP_SLOT_RELOCS 2 711 712 /* Architecture-specific backend data for i386. */ 713 714 struct elf_i386_backend_data 715 { 716 /* Parameters describing PLT generation. */ 717 const struct elf_i386_plt_layout *plt; 718 719 /* Value used to fill the unused bytes of the first PLT entry. */ 720 bfd_byte plt0_pad_byte; 721 722 /* True if the target system is VxWorks. */ 723 int is_vxworks; 724 }; 725 726 #define get_elf_i386_backend_data(abfd) \ 727 ((const struct elf_i386_backend_data *) \ 728 get_elf_backend_data (abfd)->arch_data) 729 730 /* These are the standard parameters. */ 731 static const struct elf_i386_backend_data elf_i386_arch_bed = 732 { 733 &elf_i386_plt, /* plt */ 734 0, /* plt0_pad_byte */ 735 0, /* is_vxworks */ 736 }; 737 738 #define elf_backend_arch_data &elf_i386_arch_bed 739 740 /* Is a undefined weak symbol which is resolved to 0. Reference to an 741 undefined weak symbol is resolved to 0 when building executable if 742 it isn't dynamic and 743 1. Has non-GOT/non-PLT relocations in text section. Or 744 2. Has no GOT/PLT relocation. 745 */ 746 #define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, GOT_RELOC, EH) \ 747 ((EH)->elf.root.type == bfd_link_hash_undefweak \ 748 && bfd_link_executable (INFO) \ 749 && (elf_i386_hash_table (INFO)->interp == NULL \ 750 || !(GOT_RELOC) \ 751 || (EH)->has_non_got_reloc \ 752 || !(INFO)->dynamic_undefined_weak)) 753 754 /* i386 ELF linker hash entry. */ 755 756 struct elf_i386_link_hash_entry 757 { 758 struct elf_link_hash_entry elf; 759 760 /* Track dynamic relocs copied for this symbol. */ 761 struct elf_dyn_relocs *dyn_relocs; 762 763 #define GOT_UNKNOWN 0 764 #define GOT_NORMAL 1 765 #define GOT_TLS_GD 2 766 #define GOT_TLS_IE 4 767 #define GOT_TLS_IE_POS 5 768 #define GOT_TLS_IE_NEG 6 769 #define GOT_TLS_IE_BOTH 7 770 #define GOT_TLS_GDESC 8 771 #define GOT_TLS_GD_BOTH_P(type) \ 772 ((type) == (GOT_TLS_GD | GOT_TLS_GDESC)) 773 #define GOT_TLS_GD_P(type) \ 774 ((type) == GOT_TLS_GD || GOT_TLS_GD_BOTH_P (type)) 775 #define GOT_TLS_GDESC_P(type) \ 776 ((type) == GOT_TLS_GDESC || GOT_TLS_GD_BOTH_P (type)) 777 #define GOT_TLS_GD_ANY_P(type) \ 778 (GOT_TLS_GD_P (type) || GOT_TLS_GDESC_P (type)) 779 unsigned char tls_type; 780 781 /* Symbol is referenced by R_386_GOTOFF relocation. */ 782 unsigned int gotoff_ref : 1; 783 784 /* Symbol has GOT or PLT relocations. */ 785 unsigned int has_got_reloc : 1; 786 787 /* Symbol has non-GOT/non-PLT relocations in text sections. */ 788 unsigned int has_non_got_reloc : 1; 789 790 /* 0: symbol isn't ___tls_get_addr. 791 1: symbol is ___tls_get_addr. 792 2: symbol is unknown. */ 793 unsigned int tls_get_addr : 2; 794 795 /* Reference count of C/C++ function pointer relocations in read-write 796 section which can be resolved at run-time. */ 797 bfd_signed_vma func_pointer_refcount; 798 799 /* Information about the GOT PLT entry. Filled when there are both 800 GOT and PLT relocations against the same function. */ 801 union gotplt_union plt_got; 802 803 /* Offset of the GOTPLT entry reserved for the TLS descriptor, 804 starting at the end of the jump table. */ 805 bfd_vma tlsdesc_got; 806 }; 807 808 #define elf_i386_hash_entry(ent) ((struct elf_i386_link_hash_entry *)(ent)) 809 810 struct elf_i386_obj_tdata 811 { 812 struct elf_obj_tdata root; 813 814 /* tls_type for each local got entry. */ 815 char *local_got_tls_type; 816 817 /* GOTPLT entries for TLS descriptors. */ 818 bfd_vma *local_tlsdesc_gotent; 819 }; 820 821 #define elf_i386_tdata(abfd) \ 822 ((struct elf_i386_obj_tdata *) (abfd)->tdata.any) 823 824 #define elf_i386_local_got_tls_type(abfd) \ 825 (elf_i386_tdata (abfd)->local_got_tls_type) 826 827 #define elf_i386_local_tlsdesc_gotent(abfd) \ 828 (elf_i386_tdata (abfd)->local_tlsdesc_gotent) 829 830 #define is_i386_elf(bfd) \ 831 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \ 832 && elf_tdata (bfd) != NULL \ 833 && elf_object_id (bfd) == I386_ELF_DATA) 834 835 static bfd_boolean 836 elf_i386_mkobject (bfd *abfd) 837 { 838 return bfd_elf_allocate_object (abfd, sizeof (struct elf_i386_obj_tdata), 839 I386_ELF_DATA); 840 } 841 842 /* i386 ELF linker hash table. */ 843 844 struct elf_i386_link_hash_table 845 { 846 struct elf_link_hash_table elf; 847 848 /* Short-cuts to get to dynamic linker sections. */ 849 asection *interp; 850 asection *sdynbss; 851 asection *srelbss; 852 asection *plt_eh_frame; 853 asection *plt_got; 854 855 union 856 { 857 bfd_signed_vma refcount; 858 bfd_vma offset; 859 } tls_ldm_got; 860 861 /* The amount of space used by the reserved portion of the sgotplt 862 section, plus whatever space is used by the jump slots. */ 863 bfd_vma sgotplt_jump_table_size; 864 865 /* Small local sym cache. */ 866 struct sym_cache sym_cache; 867 868 /* _TLS_MODULE_BASE_ symbol. */ 869 struct bfd_link_hash_entry *tls_module_base; 870 871 /* Used by local STT_GNU_IFUNC symbols. */ 872 htab_t loc_hash_table; 873 void * loc_hash_memory; 874 875 /* The (unloaded but important) .rel.plt.unloaded section on VxWorks. */ 876 asection *srelplt2; 877 878 /* The index of the next unused R_386_TLS_DESC slot in .rel.plt. */ 879 bfd_vma next_tls_desc_index; 880 881 /* The index of the next unused R_386_JUMP_SLOT slot in .rel.plt. */ 882 bfd_vma next_jump_slot_index; 883 884 /* The index of the next unused R_386_IRELATIVE slot in .rel.plt. */ 885 bfd_vma next_irelative_index; 886 887 /* TRUE if there are dynamic relocs against IFUNC symbols that apply 888 to read-only sections. */ 889 bfd_boolean readonly_dynrelocs_against_ifunc; 890 }; 891 892 /* Get the i386 ELF linker hash table from a link_info structure. */ 893 894 #define elf_i386_hash_table(p) \ 895 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \ 896 == I386_ELF_DATA ? ((struct elf_i386_link_hash_table *) ((p)->hash)) : NULL) 897 898 #define elf_i386_compute_jump_table_size(htab) \ 899 ((htab)->elf.srelplt->reloc_count * 4) 900 901 /* Create an entry in an i386 ELF linker hash table. */ 902 903 static struct bfd_hash_entry * 904 elf_i386_link_hash_newfunc (struct bfd_hash_entry *entry, 905 struct bfd_hash_table *table, 906 const char *string) 907 { 908 /* Allocate the structure if it has not already been allocated by a 909 subclass. */ 910 if (entry == NULL) 911 { 912 entry = (struct bfd_hash_entry *) 913 bfd_hash_allocate (table, sizeof (struct elf_i386_link_hash_entry)); 914 if (entry == NULL) 915 return entry; 916 } 917 918 /* Call the allocation method of the superclass. */ 919 entry = _bfd_elf_link_hash_newfunc (entry, table, string); 920 if (entry != NULL) 921 { 922 struct elf_i386_link_hash_entry *eh; 923 924 eh = (struct elf_i386_link_hash_entry *) entry; 925 eh->dyn_relocs = NULL; 926 eh->tls_type = GOT_UNKNOWN; 927 eh->gotoff_ref = 0; 928 eh->has_got_reloc = 0; 929 eh->has_non_got_reloc = 0; 930 eh->tls_get_addr = 2; 931 eh->func_pointer_refcount = 0; 932 eh->plt_got.offset = (bfd_vma) -1; 933 eh->tlsdesc_got = (bfd_vma) -1; 934 } 935 936 return entry; 937 } 938 939 /* Compute a hash of a local hash entry. We use elf_link_hash_entry 940 for local symbol so that we can handle local STT_GNU_IFUNC symbols 941 as global symbol. We reuse indx and dynstr_index for local symbol 942 hash since they aren't used by global symbols in this backend. */ 943 944 static hashval_t 945 elf_i386_local_htab_hash (const void *ptr) 946 { 947 struct elf_link_hash_entry *h 948 = (struct elf_link_hash_entry *) ptr; 949 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index); 950 } 951 952 /* Compare local hash entries. */ 953 954 static int 955 elf_i386_local_htab_eq (const void *ptr1, const void *ptr2) 956 { 957 struct elf_link_hash_entry *h1 958 = (struct elf_link_hash_entry *) ptr1; 959 struct elf_link_hash_entry *h2 960 = (struct elf_link_hash_entry *) ptr2; 961 962 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index; 963 } 964 965 /* Find and/or create a hash entry for local symbol. */ 966 967 static struct elf_link_hash_entry * 968 elf_i386_get_local_sym_hash (struct elf_i386_link_hash_table *htab, 969 bfd *abfd, const Elf_Internal_Rela *rel, 970 bfd_boolean create) 971 { 972 struct elf_i386_link_hash_entry e, *ret; 973 asection *sec = abfd->sections; 974 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id, 975 ELF32_R_SYM (rel->r_info)); 976 void **slot; 977 978 e.elf.indx = sec->id; 979 e.elf.dynstr_index = ELF32_R_SYM (rel->r_info); 980 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h, 981 create ? INSERT : NO_INSERT); 982 983 if (!slot) 984 return NULL; 985 986 if (*slot) 987 { 988 ret = (struct elf_i386_link_hash_entry *) *slot; 989 return &ret->elf; 990 } 991 992 ret = (struct elf_i386_link_hash_entry *) 993 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory, 994 sizeof (struct elf_i386_link_hash_entry)); 995 if (ret) 996 { 997 memset (ret, 0, sizeof (*ret)); 998 ret->elf.indx = sec->id; 999 ret->elf.dynstr_index = ELF32_R_SYM (rel->r_info); 1000 ret->elf.dynindx = -1; 1001 ret->func_pointer_refcount = 0; 1002 ret->plt_got.offset = (bfd_vma) -1; 1003 *slot = ret; 1004 } 1005 return &ret->elf; 1006 } 1007 1008 /* Destroy an i386 ELF linker hash table. */ 1009 1010 static void 1011 elf_i386_link_hash_table_free (bfd *obfd) 1012 { 1013 struct elf_i386_link_hash_table *htab 1014 = (struct elf_i386_link_hash_table *) obfd->link.hash; 1015 1016 if (htab->loc_hash_table) 1017 htab_delete (htab->loc_hash_table); 1018 if (htab->loc_hash_memory) 1019 objalloc_free ((struct objalloc *) htab->loc_hash_memory); 1020 _bfd_elf_link_hash_table_free (obfd); 1021 } 1022 1023 /* Create an i386 ELF linker hash table. */ 1024 1025 static struct bfd_link_hash_table * 1026 elf_i386_link_hash_table_create (bfd *abfd) 1027 { 1028 struct elf_i386_link_hash_table *ret; 1029 bfd_size_type amt = sizeof (struct elf_i386_link_hash_table); 1030 1031 ret = (struct elf_i386_link_hash_table *) bfd_zmalloc (amt); 1032 if (ret == NULL) 1033 return NULL; 1034 1035 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, 1036 elf_i386_link_hash_newfunc, 1037 sizeof (struct elf_i386_link_hash_entry), 1038 I386_ELF_DATA)) 1039 { 1040 free (ret); 1041 return NULL; 1042 } 1043 1044 ret->loc_hash_table = htab_try_create (1024, 1045 elf_i386_local_htab_hash, 1046 elf_i386_local_htab_eq, 1047 NULL); 1048 ret->loc_hash_memory = objalloc_create (); 1049 if (!ret->loc_hash_table || !ret->loc_hash_memory) 1050 { 1051 elf_i386_link_hash_table_free (abfd); 1052 return NULL; 1053 } 1054 ret->elf.root.hash_table_free = elf_i386_link_hash_table_free; 1055 1056 return &ret->elf.root; 1057 } 1058 1059 /* Create .plt, .rel.plt, .got, .got.plt, .rel.got, .dynbss, and 1060 .rel.bss sections in DYNOBJ, and set up shortcuts to them in our 1061 hash table. */ 1062 1063 static bfd_boolean 1064 elf_i386_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info) 1065 { 1066 struct elf_i386_link_hash_table *htab; 1067 1068 if (!_bfd_elf_create_dynamic_sections (dynobj, info)) 1069 return FALSE; 1070 1071 htab = elf_i386_hash_table (info); 1072 if (htab == NULL) 1073 return FALSE; 1074 1075 /* Set the contents of the .interp section to the interpreter. */ 1076 if (bfd_link_executable (info) && !info->nointerp) 1077 { 1078 asection *s = bfd_get_linker_section (dynobj, ".interp"); 1079 if (s == NULL) 1080 abort (); 1081 s->size = sizeof ELF_DYNAMIC_INTERPRETER; 1082 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER; 1083 htab->interp = s; 1084 } 1085 1086 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss"); 1087 if (!htab->sdynbss) 1088 abort (); 1089 1090 if (bfd_link_executable (info)) 1091 { 1092 /* Always allow copy relocs for building executables. */ 1093 asection *s = bfd_get_linker_section (dynobj, ".rel.bss"); 1094 if (s == NULL) 1095 { 1096 const struct elf_backend_data *bed = get_elf_backend_data (dynobj); 1097 s = bfd_make_section_anyway_with_flags (dynobj, 1098 ".rel.bss", 1099 (bed->dynamic_sec_flags 1100 | SEC_READONLY)); 1101 if (s == NULL 1102 || ! bfd_set_section_alignment (dynobj, s, 1103 bed->s->log_file_align)) 1104 return FALSE; 1105 } 1106 htab->srelbss = s; 1107 } 1108 1109 if (get_elf_i386_backend_data (dynobj)->is_vxworks 1110 && !elf_vxworks_create_dynamic_sections (dynobj, info, 1111 &htab->srelplt2)) 1112 return FALSE; 1113 1114 if (!info->no_ld_generated_unwind_info 1115 && htab->plt_eh_frame == NULL 1116 && htab->elf.splt != NULL) 1117 { 1118 flagword flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY 1119 | SEC_HAS_CONTENTS | SEC_IN_MEMORY 1120 | SEC_LINKER_CREATED); 1121 htab->plt_eh_frame 1122 = bfd_make_section_anyway_with_flags (dynobj, ".eh_frame", flags); 1123 if (htab->plt_eh_frame == NULL 1124 || !bfd_set_section_alignment (dynobj, htab->plt_eh_frame, 2)) 1125 return FALSE; 1126 } 1127 1128 return TRUE; 1129 } 1130 1131 /* Copy the extra info we tack onto an elf_link_hash_entry. */ 1132 1133 static void 1134 elf_i386_copy_indirect_symbol (struct bfd_link_info *info, 1135 struct elf_link_hash_entry *dir, 1136 struct elf_link_hash_entry *ind) 1137 { 1138 struct elf_i386_link_hash_entry *edir, *eind; 1139 1140 edir = (struct elf_i386_link_hash_entry *) dir; 1141 eind = (struct elf_i386_link_hash_entry *) ind; 1142 1143 if (eind->dyn_relocs != NULL) 1144 { 1145 if (edir->dyn_relocs != NULL) 1146 { 1147 struct elf_dyn_relocs **pp; 1148 struct elf_dyn_relocs *p; 1149 1150 /* Add reloc counts against the indirect sym to the direct sym 1151 list. Merge any entries against the same section. */ 1152 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; ) 1153 { 1154 struct elf_dyn_relocs *q; 1155 1156 for (q = edir->dyn_relocs; q != NULL; q = q->next) 1157 if (q->sec == p->sec) 1158 { 1159 q->pc_count += p->pc_count; 1160 q->count += p->count; 1161 *pp = p->next; 1162 break; 1163 } 1164 if (q == NULL) 1165 pp = &p->next; 1166 } 1167 *pp = edir->dyn_relocs; 1168 } 1169 1170 edir->dyn_relocs = eind->dyn_relocs; 1171 eind->dyn_relocs = NULL; 1172 } 1173 1174 if (ind->root.type == bfd_link_hash_indirect 1175 && dir->got.refcount <= 0) 1176 { 1177 edir->tls_type = eind->tls_type; 1178 eind->tls_type = GOT_UNKNOWN; 1179 } 1180 1181 /* Copy gotoff_ref so that elf_i386_adjust_dynamic_symbol will 1182 generate a R_386_COPY reloc. */ 1183 edir->gotoff_ref |= eind->gotoff_ref; 1184 1185 edir->has_got_reloc |= eind->has_got_reloc; 1186 edir->has_non_got_reloc |= eind->has_non_got_reloc; 1187 1188 if (ELIMINATE_COPY_RELOCS 1189 && ind->root.type != bfd_link_hash_indirect 1190 && dir->dynamic_adjusted) 1191 { 1192 /* If called to transfer flags for a weakdef during processing 1193 of elf_adjust_dynamic_symbol, don't copy non_got_ref. 1194 We clear it ourselves for ELIMINATE_COPY_RELOCS. */ 1195 dir->ref_dynamic |= ind->ref_dynamic; 1196 dir->ref_regular |= ind->ref_regular; 1197 dir->ref_regular_nonweak |= ind->ref_regular_nonweak; 1198 dir->needs_plt |= ind->needs_plt; 1199 dir->pointer_equality_needed |= ind->pointer_equality_needed; 1200 } 1201 else 1202 { 1203 if (eind->func_pointer_refcount > 0) 1204 { 1205 edir->func_pointer_refcount += eind->func_pointer_refcount; 1206 eind->func_pointer_refcount = 0; 1207 } 1208 1209 _bfd_elf_link_hash_copy_indirect (info, dir, ind); 1210 } 1211 } 1212 1213 /* Return TRUE if the TLS access code sequence support transition 1214 from R_TYPE. */ 1215 1216 static bfd_boolean 1217 elf_i386_check_tls_transition (asection *sec, 1218 bfd_byte *contents, 1219 Elf_Internal_Shdr *symtab_hdr, 1220 struct elf_link_hash_entry **sym_hashes, 1221 unsigned int r_type, 1222 const Elf_Internal_Rela *rel, 1223 const Elf_Internal_Rela *relend) 1224 { 1225 unsigned int val, type, reg; 1226 unsigned long r_symndx; 1227 struct elf_link_hash_entry *h; 1228 bfd_vma offset; 1229 bfd_byte *call; 1230 bfd_boolean indirect_call, tls_get_addr; 1231 1232 offset = rel->r_offset; 1233 switch (r_type) 1234 { 1235 case R_386_TLS_GD: 1236 case R_386_TLS_LDM: 1237 if (offset < 2 || (rel + 1) >= relend) 1238 return FALSE; 1239 1240 indirect_call = FALSE; 1241 call = contents + offset + 4; 1242 val = *(call - 5); 1243 type = *(call - 6); 1244 if (r_type == R_386_TLS_GD) 1245 { 1246 /* Check transition from GD access model. Only 1247 leal foo@tlsgd(,%ebx,1), %eax 1248 call ___tls_get_addr@PLT 1249 or 1250 leal foo@tlsgd(%ebx) %eax 1251 call ___tls_get_addr@PLT 1252 nop 1253 or 1254 leal foo@tlsgd(%reg), %eax 1255 call *___tls_get_addr@GOT(%reg) 1256 which may be converted to 1257 addr32 call ___tls_get_addr 1258 can transit to different access model. */ 1259 if ((offset + 10) > sec->size 1260 || (type != 0x8d && type != 0x04)) 1261 return FALSE; 1262 1263 if (type == 0x04) 1264 { 1265 /* leal foo@tlsgd(,%ebx,1), %eax 1266 call ___tls_get_addr@PLT */ 1267 if (offset < 3) 1268 return FALSE; 1269 1270 if (*(call - 7) != 0x8d 1271 || val != 0x1d 1272 || call[0] != 0xe8) 1273 return FALSE; 1274 } 1275 else 1276 { 1277 /* This must be 1278 leal foo@tlsgd(%ebx), %eax 1279 call ___tls_get_addr@PLT 1280 nop 1281 or 1282 leal foo@tlsgd(%reg), %eax 1283 call *___tls_get_addr@GOT(%reg) 1284 which may be converted to 1285 addr32 call ___tls_get_addr 1286 1287 %eax can't be used as the GOT base register since it 1288 is used to pass parameter to ___tls_get_addr. */ 1289 reg = val & 7; 1290 if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0) 1291 return FALSE; 1292 1293 indirect_call = call[0] == 0xff; 1294 if (!(reg == 3 && call[0] == 0xe8 && call[5] == 0x90) 1295 && !(call[0] == 0x67 && call[1] == 0xe8) 1296 && !(indirect_call 1297 && (call[1] & 0xf8) == 0x90 1298 && (call[1] & 0x7) == reg)) 1299 return FALSE; 1300 } 1301 } 1302 else 1303 { 1304 /* Check transition from LD access model. Only 1305 leal foo@tlsldm(%ebx), %eax 1306 call ___tls_get_addr@PLT 1307 or 1308 leal foo@tlsldm(%reg), %eax 1309 call *___tls_get_addr@GOT(%reg) 1310 which may be converted to 1311 addr32 call ___tls_get_addr 1312 can transit to different access model. */ 1313 if (type != 0x8d || (offset + 9) > sec->size) 1314 return FALSE; 1315 1316 /* %eax can't be used as the GOT base register since it is 1317 used to pass parameter to ___tls_get_addr. */ 1318 reg = val & 7; 1319 if ((val & 0xf8) != 0x80 || reg == 4 || reg == 0) 1320 return FALSE; 1321 1322 indirect_call = call[0] == 0xff; 1323 if (!(reg == 3 && call[0] == 0xe8) 1324 && !(call[0] == 0x67 && call[1] == 0xe8) 1325 && !(indirect_call 1326 && (call[1] & 0xf8) == 0x90 1327 && (call[1] & 0x7) == reg)) 1328 return FALSE; 1329 } 1330 1331 r_symndx = ELF32_R_SYM (rel[1].r_info); 1332 if (r_symndx < symtab_hdr->sh_info) 1333 return FALSE; 1334 1335 tls_get_addr = FALSE; 1336 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 1337 if (h != NULL && h->root.root.string != NULL) 1338 { 1339 struct elf_i386_link_hash_entry *eh 1340 = (struct elf_i386_link_hash_entry *) h; 1341 tls_get_addr = eh->tls_get_addr == 1; 1342 if (eh->tls_get_addr > 1) 1343 { 1344 /* Use strncmp to check ___tls_get_addr since 1345 ___tls_get_addr may be versioned. */ 1346 if (strncmp (h->root.root.string, "___tls_get_addr", 15) 1347 == 0) 1348 { 1349 eh->tls_get_addr = 1; 1350 tls_get_addr = TRUE; 1351 } 1352 else 1353 eh->tls_get_addr = 0; 1354 } 1355 } 1356 1357 if (!tls_get_addr) 1358 return FALSE; 1359 else if (indirect_call) 1360 return (ELF32_R_TYPE (rel[1].r_info) == R_386_GOT32X); 1361 else 1362 return (ELF32_R_TYPE (rel[1].r_info) == R_386_PC32 1363 || ELF32_R_TYPE (rel[1].r_info) == R_386_PLT32); 1364 1365 case R_386_TLS_IE: 1366 /* Check transition from IE access model: 1367 movl foo@indntpoff(%rip), %eax 1368 movl foo@indntpoff(%rip), %reg 1369 addl foo@indntpoff(%rip), %reg 1370 */ 1371 1372 if (offset < 1 || (offset + 4) > sec->size) 1373 return FALSE; 1374 1375 /* Check "movl foo@tpoff(%rip), %eax" first. */ 1376 val = bfd_get_8 (abfd, contents + offset - 1); 1377 if (val == 0xa1) 1378 return TRUE; 1379 1380 if (offset < 2) 1381 return FALSE; 1382 1383 /* Check movl|addl foo@tpoff(%rip), %reg. */ 1384 type = bfd_get_8 (abfd, contents + offset - 2); 1385 return ((type == 0x8b || type == 0x03) 1386 && (val & 0xc7) == 0x05); 1387 1388 case R_386_TLS_GOTIE: 1389 case R_386_TLS_IE_32: 1390 /* Check transition from {IE_32,GOTIE} access model: 1391 subl foo@{tpoff,gontoff}(%reg1), %reg2 1392 movl foo@{tpoff,gontoff}(%reg1), %reg2 1393 addl foo@{tpoff,gontoff}(%reg1), %reg2 1394 */ 1395 1396 if (offset < 2 || (offset + 4) > sec->size) 1397 return FALSE; 1398 1399 val = bfd_get_8 (abfd, contents + offset - 1); 1400 if ((val & 0xc0) != 0x80 || (val & 7) == 4) 1401 return FALSE; 1402 1403 type = bfd_get_8 (abfd, contents + offset - 2); 1404 return type == 0x8b || type == 0x2b || type == 0x03; 1405 1406 case R_386_TLS_GOTDESC: 1407 /* Check transition from GDesc access model: 1408 leal x@tlsdesc(%ebx), %eax 1409 1410 Make sure it's a leal adding ebx to a 32-bit offset 1411 into any register, although it's probably almost always 1412 going to be eax. */ 1413 1414 if (offset < 2 || (offset + 4) > sec->size) 1415 return FALSE; 1416 1417 if (bfd_get_8 (abfd, contents + offset - 2) != 0x8d) 1418 return FALSE; 1419 1420 val = bfd_get_8 (abfd, contents + offset - 1); 1421 return (val & 0xc7) == 0x83; 1422 1423 case R_386_TLS_DESC_CALL: 1424 /* Check transition from GDesc access model: 1425 call *x@tlsdesc(%eax) 1426 */ 1427 if (offset + 2 <= sec->size) 1428 { 1429 /* Make sure that it's a call *x@tlsdesc(%eax). */ 1430 call = contents + offset; 1431 return call[0] == 0xff && call[1] == 0x10; 1432 } 1433 1434 return FALSE; 1435 1436 default: 1437 abort (); 1438 } 1439 } 1440 1441 /* Return TRUE if the TLS access transition is OK or no transition 1442 will be performed. Update R_TYPE if there is a transition. */ 1443 1444 static bfd_boolean 1445 elf_i386_tls_transition (struct bfd_link_info *info, bfd *abfd, 1446 asection *sec, bfd_byte *contents, 1447 Elf_Internal_Shdr *symtab_hdr, 1448 struct elf_link_hash_entry **sym_hashes, 1449 unsigned int *r_type, int tls_type, 1450 const Elf_Internal_Rela *rel, 1451 const Elf_Internal_Rela *relend, 1452 struct elf_link_hash_entry *h, 1453 unsigned long r_symndx, 1454 bfd_boolean from_relocate_section) 1455 { 1456 unsigned int from_type = *r_type; 1457 unsigned int to_type = from_type; 1458 bfd_boolean check = TRUE; 1459 1460 /* Skip TLS transition for functions. */ 1461 if (h != NULL 1462 && (h->type == STT_FUNC 1463 || h->type == STT_GNU_IFUNC)) 1464 return TRUE; 1465 1466 switch (from_type) 1467 { 1468 case R_386_TLS_GD: 1469 case R_386_TLS_GOTDESC: 1470 case R_386_TLS_DESC_CALL: 1471 case R_386_TLS_IE_32: 1472 case R_386_TLS_IE: 1473 case R_386_TLS_GOTIE: 1474 if (bfd_link_executable (info)) 1475 { 1476 if (h == NULL) 1477 to_type = R_386_TLS_LE_32; 1478 else if (from_type != R_386_TLS_IE 1479 && from_type != R_386_TLS_GOTIE) 1480 to_type = R_386_TLS_IE_32; 1481 } 1482 1483 /* When we are called from elf_i386_relocate_section, there may 1484 be additional transitions based on TLS_TYPE. */ 1485 if (from_relocate_section) 1486 { 1487 unsigned int new_to_type = to_type; 1488 1489 if (bfd_link_executable (info) 1490 && h != NULL 1491 && h->dynindx == -1 1492 && (tls_type & GOT_TLS_IE)) 1493 new_to_type = R_386_TLS_LE_32; 1494 1495 if (to_type == R_386_TLS_GD 1496 || to_type == R_386_TLS_GOTDESC 1497 || to_type == R_386_TLS_DESC_CALL) 1498 { 1499 if (tls_type == GOT_TLS_IE_POS) 1500 new_to_type = R_386_TLS_GOTIE; 1501 else if (tls_type & GOT_TLS_IE) 1502 new_to_type = R_386_TLS_IE_32; 1503 } 1504 1505 /* We checked the transition before when we were called from 1506 elf_i386_check_relocs. We only want to check the new 1507 transition which hasn't been checked before. */ 1508 check = new_to_type != to_type && from_type == to_type; 1509 to_type = new_to_type; 1510 } 1511 1512 break; 1513 1514 case R_386_TLS_LDM: 1515 if (bfd_link_executable (info)) 1516 to_type = R_386_TLS_LE_32; 1517 break; 1518 1519 default: 1520 return TRUE; 1521 } 1522 1523 /* Return TRUE if there is no transition. */ 1524 if (from_type == to_type) 1525 return TRUE; 1526 1527 /* Check if the transition can be performed. */ 1528 if (check 1529 && ! elf_i386_check_tls_transition (sec, contents, 1530 symtab_hdr, sym_hashes, 1531 from_type, rel, relend)) 1532 { 1533 reloc_howto_type *from, *to; 1534 const char *name; 1535 1536 from = elf_i386_rtype_to_howto (abfd, from_type); 1537 to = elf_i386_rtype_to_howto (abfd, to_type); 1538 1539 if (h) 1540 name = h->root.root.string; 1541 else 1542 { 1543 struct elf_i386_link_hash_table *htab; 1544 1545 htab = elf_i386_hash_table (info); 1546 if (htab == NULL) 1547 name = "*unknown*"; 1548 else 1549 { 1550 Elf_Internal_Sym *isym; 1551 1552 isym = bfd_sym_from_r_symndx (&htab->sym_cache, 1553 abfd, r_symndx); 1554 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL); 1555 } 1556 } 1557 1558 (*_bfd_error_handler) 1559 (_("%B: TLS transition from %s to %s against `%s' at 0x%lx " 1560 "in section `%A' failed"), 1561 abfd, sec, from->name, to->name, name, 1562 (unsigned long) rel->r_offset); 1563 bfd_set_error (bfd_error_bad_value); 1564 return FALSE; 1565 } 1566 1567 *r_type = to_type; 1568 return TRUE; 1569 } 1570 1571 /* With the local symbol, foo, we convert 1572 mov foo@GOT[(%reg1)], %reg2 1573 to 1574 lea foo[@GOTOFF(%reg1)], %reg2 1575 and convert 1576 call/jmp *foo@GOT[(%reg)] 1577 to 1578 nop call foo/jmp foo nop 1579 When PIC is false, convert 1580 test %reg1, foo@GOT[(%reg2)] 1581 to 1582 test $foo, %reg1 1583 and convert 1584 binop foo@GOT[(%reg1)], %reg2 1585 to 1586 binop $foo, %reg2 1587 where binop is one of adc, add, and, cmp, or, sbb, sub, xor 1588 instructions. */ 1589 1590 static 1591 bfd_boolean 1592 elf_i386_convert_load_reloc (bfd *abfd, Elf_Internal_Shdr *symtab_hdr, 1593 bfd_byte *contents, 1594 Elf_Internal_Rela *irel, 1595 struct elf_link_hash_entry *h, 1596 bfd_boolean *converted, 1597 struct bfd_link_info *link_info) 1598 { 1599 struct elf_i386_link_hash_table *htab; 1600 unsigned int opcode; 1601 unsigned int modrm; 1602 bfd_boolean baseless; 1603 Elf_Internal_Sym *isym; 1604 unsigned int addend; 1605 unsigned int nop; 1606 bfd_vma nop_offset; 1607 bfd_boolean is_pic; 1608 bfd_boolean to_reloc_32; 1609 unsigned int r_type; 1610 unsigned int r_symndx; 1611 bfd_vma roff = irel->r_offset; 1612 1613 if (roff < 2) 1614 return TRUE; 1615 1616 /* Addend for R_386_GOT32X relocations must be 0. */ 1617 addend = bfd_get_32 (abfd, contents + roff); 1618 if (addend != 0) 1619 return TRUE; 1620 1621 htab = elf_i386_hash_table (link_info); 1622 is_pic = bfd_link_pic (link_info); 1623 1624 r_type = ELF32_R_TYPE (irel->r_info); 1625 r_symndx = ELF32_R_SYM (irel->r_info); 1626 1627 modrm = bfd_get_8 (abfd, contents + roff - 1); 1628 baseless = (modrm & 0xc7) == 0x5; 1629 1630 if (baseless && is_pic) 1631 { 1632 /* For PIC, disallow R_386_GOT32X without a base register 1633 since we don't know what the GOT base is. */ 1634 const char *name; 1635 1636 if (h == NULL) 1637 { 1638 isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, 1639 r_symndx); 1640 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL); 1641 } 1642 else 1643 name = h->root.root.string; 1644 1645 (*_bfd_error_handler) 1646 (_("%B: direct GOT relocation R_386_GOT32X against `%s' without base register can not be used when making a shared object"), 1647 abfd, name); 1648 return FALSE; 1649 } 1650 1651 opcode = bfd_get_8 (abfd, contents + roff - 2); 1652 1653 /* Convert to R_386_32 if PIC is false or there is no base 1654 register. */ 1655 to_reloc_32 = !is_pic || baseless; 1656 1657 /* Try to convert R_386_GOT32X. Get the symbol referred to by the 1658 reloc. */ 1659 if (h == NULL) 1660 { 1661 if (opcode == 0x0ff) 1662 /* Convert "call/jmp *foo@GOT[(%reg)]". */ 1663 goto convert_branch; 1664 else 1665 /* Convert "mov foo@GOT[(%reg1)], %reg2", 1666 "test %reg1, foo@GOT(%reg2)" and 1667 "binop foo@GOT[(%reg1)], %reg2". */ 1668 goto convert_load; 1669 } 1670 1671 /* Undefined weak symbol is only bound locally in executable 1672 and its reference is resolved as 0. */ 1673 if (UNDEFINED_WEAK_RESOLVED_TO_ZERO (link_info, TRUE, 1674 elf_i386_hash_entry (h))) 1675 { 1676 if (opcode == 0xff) 1677 { 1678 /* No direct branch to 0 for PIC. */ 1679 if (is_pic) 1680 return TRUE; 1681 else 1682 goto convert_branch; 1683 } 1684 else 1685 { 1686 /* We can convert load of address 0 to R_386_32. */ 1687 to_reloc_32 = TRUE; 1688 goto convert_load; 1689 } 1690 } 1691 1692 if (opcode == 0xff) 1693 { 1694 /* We have "call/jmp *foo@GOT[(%reg)]". */ 1695 if ((h->root.type == bfd_link_hash_defined 1696 || h->root.type == bfd_link_hash_defweak) 1697 && SYMBOL_REFERENCES_LOCAL (link_info, h)) 1698 { 1699 /* The function is locally defined. */ 1700 convert_branch: 1701 /* Convert R_386_GOT32X to R_386_PC32. */ 1702 if (modrm == 0x15 || (modrm & 0xf8) == 0x90) 1703 { 1704 struct elf_i386_link_hash_entry *eh 1705 = (struct elf_i386_link_hash_entry *) h; 1706 1707 /* Convert to "nop call foo". ADDR_PREFIX_OPCODE 1708 is a nop prefix. */ 1709 modrm = 0xe8; 1710 /* To support TLS optimization, always use addr32 prefix 1711 for "call *___tls_get_addr@GOT(%reg)". */ 1712 if (eh && eh->tls_get_addr == 1) 1713 { 1714 nop = 0x67; 1715 nop_offset = irel->r_offset - 2; 1716 } 1717 else 1718 { 1719 nop = link_info->call_nop_byte; 1720 if (link_info->call_nop_as_suffix) 1721 { 1722 nop_offset = roff + 3; 1723 irel->r_offset -= 1; 1724 } 1725 else 1726 nop_offset = roff - 2; 1727 } 1728 } 1729 else 1730 { 1731 /* Convert to "jmp foo nop". */ 1732 modrm = 0xe9; 1733 nop = NOP_OPCODE; 1734 nop_offset = roff + 3; 1735 irel->r_offset -= 1; 1736 } 1737 1738 bfd_put_8 (abfd, nop, contents + nop_offset); 1739 bfd_put_8 (abfd, modrm, contents + irel->r_offset - 1); 1740 /* When converting to PC-relative relocation, we 1741 need to adjust addend by -4. */ 1742 bfd_put_32 (abfd, -4, contents + irel->r_offset); 1743 irel->r_info = ELF32_R_INFO (r_symndx, R_386_PC32); 1744 1745 *converted = TRUE; 1746 } 1747 } 1748 else 1749 { 1750 /* We have "mov foo@GOT[(%re1g)], %reg2", 1751 "test %reg1, foo@GOT(%reg2)" and 1752 "binop foo@GOT[(%reg1)], %reg2". 1753 1754 Avoid optimizing _DYNAMIC since ld.so may use its 1755 link-time address. */ 1756 if (h == htab->elf.hdynamic) 1757 return TRUE; 1758 1759 /* def_regular is set by an assignment in a linker script in 1760 bfd_elf_record_link_assignment. */ 1761 if ((h->def_regular 1762 || h->root.type == bfd_link_hash_defined 1763 || h->root.type == bfd_link_hash_defweak) 1764 && SYMBOL_REFERENCES_LOCAL (link_info, h)) 1765 { 1766 convert_load: 1767 if (opcode == 0x8b) 1768 { 1769 if (to_reloc_32) 1770 { 1771 /* Convert "mov foo@GOT[(%reg1)], %reg2" to 1772 "mov $foo, %reg2" with R_386_32. */ 1773 r_type = R_386_32; 1774 modrm = 0xc0 | (modrm & 0x38) >> 3; 1775 bfd_put_8 (abfd, modrm, contents + roff - 1); 1776 opcode = 0xc7; 1777 } 1778 else 1779 { 1780 /* Convert "mov foo@GOT(%reg1), %reg2" to 1781 "lea foo@GOTOFF(%reg1), %reg2". */ 1782 r_type = R_386_GOTOFF; 1783 opcode = 0x8d; 1784 } 1785 } 1786 else 1787 { 1788 /* Only R_386_32 is supported. */ 1789 if (!to_reloc_32) 1790 return TRUE; 1791 1792 if (opcode == 0x85) 1793 { 1794 /* Convert "test %reg1, foo@GOT(%reg2)" to 1795 "test $foo, %reg1". */ 1796 modrm = 0xc0 | (modrm & 0x38) >> 3; 1797 opcode = 0xf7; 1798 } 1799 else 1800 { 1801 /* Convert "binop foo@GOT(%reg1), %reg2" to 1802 "binop $foo, %reg2". */ 1803 modrm = (0xc0 1804 | (modrm & 0x38) >> 3 1805 | (opcode & 0x3c)); 1806 opcode = 0x81; 1807 } 1808 bfd_put_8 (abfd, modrm, contents + roff - 1); 1809 r_type = R_386_32; 1810 } 1811 1812 bfd_put_8 (abfd, opcode, contents + roff - 2); 1813 irel->r_info = ELF32_R_INFO (r_symndx, r_type); 1814 1815 *converted = TRUE; 1816 } 1817 } 1818 1819 return TRUE; 1820 } 1821 1822 /* Rename some of the generic section flags to better document how they 1823 are used here. */ 1824 #define need_convert_load sec_flg0 1825 #define check_relocs_failed sec_flg1 1826 1827 /* Look through the relocs for a section during the first phase, and 1828 calculate needed space in the global offset table, procedure linkage 1829 table, and dynamic reloc sections. */ 1830 1831 static bfd_boolean 1832 elf_i386_check_relocs (bfd *abfd, 1833 struct bfd_link_info *info, 1834 asection *sec, 1835 const Elf_Internal_Rela *relocs) 1836 { 1837 struct elf_i386_link_hash_table *htab; 1838 Elf_Internal_Shdr *symtab_hdr; 1839 struct elf_link_hash_entry **sym_hashes; 1840 const Elf_Internal_Rela *rel; 1841 const Elf_Internal_Rela *rel_end; 1842 asection *sreloc; 1843 bfd_byte *contents; 1844 bfd_boolean use_plt_got; 1845 1846 if (bfd_link_relocatable (info)) 1847 return TRUE; 1848 1849 /* Don't do anything special with non-loaded, non-alloced sections. 1850 In particular, any relocs in such sections should not affect GOT 1851 and PLT reference counting (ie. we don't allow them to create GOT 1852 or PLT entries), there's no possibility or desire to optimize TLS 1853 relocs, and there's not much point in propagating relocs to shared 1854 libs that the dynamic linker won't relocate. */ 1855 if ((sec->flags & SEC_ALLOC) == 0) 1856 return TRUE; 1857 1858 BFD_ASSERT (is_i386_elf (abfd)); 1859 1860 htab = elf_i386_hash_table (info); 1861 if (htab == NULL) 1862 { 1863 sec->check_relocs_failed = 1; 1864 return FALSE; 1865 } 1866 1867 /* Get the section contents. */ 1868 if (elf_section_data (sec)->this_hdr.contents != NULL) 1869 contents = elf_section_data (sec)->this_hdr.contents; 1870 else if (!bfd_malloc_and_get_section (abfd, sec, &contents)) 1871 { 1872 sec->check_relocs_failed = 1; 1873 return FALSE; 1874 } 1875 1876 use_plt_got = (!get_elf_i386_backend_data (abfd)->is_vxworks 1877 && (get_elf_i386_backend_data (abfd) 1878 == &elf_i386_arch_bed)); 1879 1880 symtab_hdr = &elf_symtab_hdr (abfd); 1881 sym_hashes = elf_sym_hashes (abfd); 1882 1883 sreloc = NULL; 1884 1885 rel_end = relocs + sec->reloc_count; 1886 for (rel = relocs; rel < rel_end; rel++) 1887 { 1888 unsigned int r_type; 1889 unsigned long r_symndx; 1890 struct elf_link_hash_entry *h; 1891 struct elf_i386_link_hash_entry *eh; 1892 Elf_Internal_Sym *isym; 1893 const char *name; 1894 bfd_boolean size_reloc; 1895 1896 r_symndx = ELF32_R_SYM (rel->r_info); 1897 r_type = ELF32_R_TYPE (rel->r_info); 1898 1899 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr)) 1900 { 1901 (*_bfd_error_handler) (_("%B: bad symbol index: %d"), 1902 abfd, 1903 r_symndx); 1904 goto error_return; 1905 } 1906 1907 if (r_symndx < symtab_hdr->sh_info) 1908 { 1909 /* A local symbol. */ 1910 isym = bfd_sym_from_r_symndx (&htab->sym_cache, 1911 abfd, r_symndx); 1912 if (isym == NULL) 1913 goto error_return; 1914 1915 /* Check relocation against local STT_GNU_IFUNC symbol. */ 1916 if (ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC) 1917 { 1918 h = elf_i386_get_local_sym_hash (htab, abfd, rel, TRUE); 1919 if (h == NULL) 1920 goto error_return; 1921 1922 /* Fake a STT_GNU_IFUNC symbol. */ 1923 h->type = STT_GNU_IFUNC; 1924 h->def_regular = 1; 1925 h->ref_regular = 1; 1926 h->forced_local = 1; 1927 h->root.type = bfd_link_hash_defined; 1928 } 1929 else 1930 h = NULL; 1931 } 1932 else 1933 { 1934 isym = NULL; 1935 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 1936 while (h->root.type == bfd_link_hash_indirect 1937 || h->root.type == bfd_link_hash_warning) 1938 h = (struct elf_link_hash_entry *) h->root.u.i.link; 1939 } 1940 1941 eh = (struct elf_i386_link_hash_entry *) h; 1942 if (h != NULL) 1943 { 1944 switch (r_type) 1945 { 1946 default: 1947 break; 1948 1949 case R_386_GOTOFF: 1950 eh->gotoff_ref = 1; 1951 case R_386_32: 1952 case R_386_PC32: 1953 case R_386_PLT32: 1954 case R_386_GOT32: 1955 case R_386_GOT32X: 1956 if (htab->elf.dynobj == NULL) 1957 htab->elf.dynobj = abfd; 1958 /* Create the ifunc sections for static executables. */ 1959 if (h->type == STT_GNU_IFUNC 1960 && !_bfd_elf_create_ifunc_sections (htab->elf.dynobj, 1961 info)) 1962 goto error_return; 1963 break; 1964 } 1965 1966 /* It is referenced by a non-shared object. */ 1967 h->ref_regular = 1; 1968 h->root.non_ir_ref = 1; 1969 1970 if (h->type == STT_GNU_IFUNC) 1971 elf_tdata (info->output_bfd)->has_gnu_symbols 1972 |= elf_gnu_symbol_ifunc; 1973 } 1974 1975 if (! elf_i386_tls_transition (info, abfd, sec, contents, 1976 symtab_hdr, sym_hashes, 1977 &r_type, GOT_UNKNOWN, 1978 rel, rel_end, h, r_symndx, FALSE)) 1979 goto error_return; 1980 1981 switch (r_type) 1982 { 1983 case R_386_TLS_LDM: 1984 htab->tls_ldm_got.refcount += 1; 1985 goto create_got; 1986 1987 case R_386_PLT32: 1988 /* This symbol requires a procedure linkage table entry. We 1989 actually build the entry in adjust_dynamic_symbol, 1990 because this might be a case of linking PIC code which is 1991 never referenced by a dynamic object, in which case we 1992 don't need to generate a procedure linkage table entry 1993 after all. */ 1994 1995 /* If this is a local symbol, we resolve it directly without 1996 creating a procedure linkage table entry. */ 1997 if (h == NULL) 1998 continue; 1999 2000 eh->has_got_reloc = 1; 2001 h->needs_plt = 1; 2002 h->plt.refcount += 1; 2003 break; 2004 2005 case R_386_SIZE32: 2006 size_reloc = TRUE; 2007 goto do_size; 2008 2009 case R_386_TLS_IE_32: 2010 case R_386_TLS_IE: 2011 case R_386_TLS_GOTIE: 2012 if (!bfd_link_executable (info)) 2013 info->flags |= DF_STATIC_TLS; 2014 /* Fall through */ 2015 2016 case R_386_GOT32: 2017 case R_386_GOT32X: 2018 case R_386_TLS_GD: 2019 case R_386_TLS_GOTDESC: 2020 case R_386_TLS_DESC_CALL: 2021 /* This symbol requires a global offset table entry. */ 2022 { 2023 int tls_type, old_tls_type; 2024 2025 switch (r_type) 2026 { 2027 default: 2028 case R_386_GOT32: 2029 case R_386_GOT32X: 2030 tls_type = GOT_NORMAL; 2031 break; 2032 case R_386_TLS_GD: tls_type = GOT_TLS_GD; break; 2033 case R_386_TLS_GOTDESC: 2034 case R_386_TLS_DESC_CALL: 2035 tls_type = GOT_TLS_GDESC; break; 2036 case R_386_TLS_IE_32: 2037 if (ELF32_R_TYPE (rel->r_info) == r_type) 2038 tls_type = GOT_TLS_IE_NEG; 2039 else 2040 /* If this is a GD->IE transition, we may use either of 2041 R_386_TLS_TPOFF and R_386_TLS_TPOFF32. */ 2042 tls_type = GOT_TLS_IE; 2043 break; 2044 case R_386_TLS_IE: 2045 case R_386_TLS_GOTIE: 2046 tls_type = GOT_TLS_IE_POS; break; 2047 } 2048 2049 if (h != NULL) 2050 { 2051 h->got.refcount += 1; 2052 old_tls_type = elf_i386_hash_entry(h)->tls_type; 2053 } 2054 else 2055 { 2056 bfd_signed_vma *local_got_refcounts; 2057 2058 /* This is a global offset table entry for a local symbol. */ 2059 local_got_refcounts = elf_local_got_refcounts (abfd); 2060 if (local_got_refcounts == NULL) 2061 { 2062 bfd_size_type size; 2063 2064 size = symtab_hdr->sh_info; 2065 size *= (sizeof (bfd_signed_vma) 2066 + sizeof (bfd_vma) + sizeof(char)); 2067 local_got_refcounts = (bfd_signed_vma *) 2068 bfd_zalloc (abfd, size); 2069 if (local_got_refcounts == NULL) 2070 goto error_return; 2071 elf_local_got_refcounts (abfd) = local_got_refcounts; 2072 elf_i386_local_tlsdesc_gotent (abfd) 2073 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info); 2074 elf_i386_local_got_tls_type (abfd) 2075 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info); 2076 } 2077 local_got_refcounts[r_symndx] += 1; 2078 old_tls_type = elf_i386_local_got_tls_type (abfd) [r_symndx]; 2079 } 2080 2081 if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE)) 2082 tls_type |= old_tls_type; 2083 /* If a TLS symbol is accessed using IE at least once, 2084 there is no point to use dynamic model for it. */ 2085 else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN 2086 && (! GOT_TLS_GD_ANY_P (old_tls_type) 2087 || (tls_type & GOT_TLS_IE) == 0)) 2088 { 2089 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type)) 2090 tls_type = old_tls_type; 2091 else if (GOT_TLS_GD_ANY_P (old_tls_type) 2092 && GOT_TLS_GD_ANY_P (tls_type)) 2093 tls_type |= old_tls_type; 2094 else 2095 { 2096 if (h) 2097 name = h->root.root.string; 2098 else 2099 name = bfd_elf_sym_name (abfd, symtab_hdr, isym, 2100 NULL); 2101 (*_bfd_error_handler) 2102 (_("%B: `%s' accessed both as normal and " 2103 "thread local symbol"), 2104 abfd, name); 2105 bfd_set_error (bfd_error_bad_value); 2106 goto error_return; 2107 } 2108 } 2109 2110 if (old_tls_type != tls_type) 2111 { 2112 if (h != NULL) 2113 elf_i386_hash_entry (h)->tls_type = tls_type; 2114 else 2115 elf_i386_local_got_tls_type (abfd) [r_symndx] = tls_type; 2116 } 2117 } 2118 /* Fall through */ 2119 2120 case R_386_GOTOFF: 2121 case R_386_GOTPC: 2122 create_got: 2123 if (htab->elf.sgot == NULL) 2124 { 2125 if (htab->elf.dynobj == NULL) 2126 htab->elf.dynobj = abfd; 2127 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info)) 2128 goto error_return; 2129 } 2130 if (r_type != R_386_TLS_IE) 2131 { 2132 if (eh != NULL) 2133 eh->has_got_reloc = 1; 2134 break; 2135 } 2136 /* Fall through */ 2137 2138 case R_386_TLS_LE_32: 2139 case R_386_TLS_LE: 2140 if (eh != NULL) 2141 eh->has_got_reloc = 1; 2142 if (bfd_link_executable (info)) 2143 break; 2144 info->flags |= DF_STATIC_TLS; 2145 goto do_relocation; 2146 2147 case R_386_32: 2148 case R_386_PC32: 2149 if (eh != NULL && (sec->flags & SEC_CODE) != 0) 2150 eh->has_non_got_reloc = 1; 2151 do_relocation: 2152 /* We are called after all symbols have been resolved. Only 2153 relocation against STT_GNU_IFUNC symbol must go through 2154 PLT. */ 2155 if (h != NULL 2156 && (bfd_link_executable (info) 2157 || h->type == STT_GNU_IFUNC)) 2158 { 2159 /* If this reloc is in a read-only section, we might 2160 need a copy reloc. We can't check reliably at this 2161 stage whether the section is read-only, as input 2162 sections have not yet been mapped to output sections. 2163 Tentatively set the flag for now, and correct in 2164 adjust_dynamic_symbol. */ 2165 h->non_got_ref = 1; 2166 2167 /* We may need a .plt entry if the symbol is a function 2168 defined in a shared lib or is a STT_GNU_IFUNC function 2169 referenced from the code or read-only section. */ 2170 if (!h->def_regular 2171 || (sec->flags & (SEC_CODE | SEC_READONLY)) != 0) 2172 h->plt.refcount += 1; 2173 2174 if (r_type == R_386_PC32) 2175 { 2176 /* Since something like ".long foo - ." may be used 2177 as pointer, make sure that PLT is used if foo is 2178 a function defined in a shared library. */ 2179 if ((sec->flags & SEC_CODE) == 0) 2180 h->pointer_equality_needed = 1; 2181 } 2182 else 2183 { 2184 h->pointer_equality_needed = 1; 2185 /* R_386_32 can be resolved at run-time. */ 2186 if (r_type == R_386_32 2187 && (sec->flags & SEC_READONLY) == 0) 2188 eh->func_pointer_refcount += 1; 2189 } 2190 } 2191 2192 size_reloc = FALSE; 2193 do_size: 2194 /* If we are creating a shared library, and this is a reloc 2195 against a global symbol, or a non PC relative reloc 2196 against a local symbol, then we need to copy the reloc 2197 into the shared library. However, if we are linking with 2198 -Bsymbolic, we do not need to copy a reloc against a 2199 global symbol which is defined in an object we are 2200 including in the link (i.e., DEF_REGULAR is set). At 2201 this point we have not seen all the input files, so it is 2202 possible that DEF_REGULAR is not set now but will be set 2203 later (it is never cleared). In case of a weak definition, 2204 DEF_REGULAR may be cleared later by a strong definition in 2205 a shared library. We account for that possibility below by 2206 storing information in the relocs_copied field of the hash 2207 table entry. A similar situation occurs when creating 2208 shared libraries and symbol visibility changes render the 2209 symbol local. 2210 2211 If on the other hand, we are creating an executable, we 2212 may need to keep relocations for symbols satisfied by a 2213 dynamic library if we manage to avoid copy relocs for the 2214 symbol. 2215 2216 Generate dynamic pointer relocation against STT_GNU_IFUNC 2217 symbol in the non-code section. */ 2218 if ((bfd_link_pic (info) 2219 && (r_type != R_386_PC32 2220 || (h != NULL 2221 && (! (bfd_link_pie (info) 2222 || SYMBOLIC_BIND (info, h)) 2223 || h->root.type == bfd_link_hash_defweak 2224 || !h->def_regular)))) 2225 || (h != NULL 2226 && h->type == STT_GNU_IFUNC 2227 && r_type == R_386_32 2228 && (sec->flags & SEC_CODE) == 0) 2229 || (ELIMINATE_COPY_RELOCS 2230 && !bfd_link_pic (info) 2231 && h != NULL 2232 && (h->root.type == bfd_link_hash_defweak 2233 || !h->def_regular))) 2234 { 2235 struct elf_dyn_relocs *p; 2236 struct elf_dyn_relocs **head; 2237 2238 /* We must copy these reloc types into the output file. 2239 Create a reloc section in dynobj and make room for 2240 this reloc. */ 2241 if (sreloc == NULL) 2242 { 2243 if (htab->elf.dynobj == NULL) 2244 htab->elf.dynobj = abfd; 2245 2246 sreloc = _bfd_elf_make_dynamic_reloc_section 2247 (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE); 2248 2249 if (sreloc == NULL) 2250 goto error_return; 2251 } 2252 2253 /* If this is a global symbol, we count the number of 2254 relocations we need for this symbol. */ 2255 if (h != NULL) 2256 { 2257 head = &eh->dyn_relocs; 2258 } 2259 else 2260 { 2261 /* Track dynamic relocs needed for local syms too. 2262 We really need local syms available to do this 2263 easily. Oh well. */ 2264 void **vpp; 2265 asection *s; 2266 2267 isym = bfd_sym_from_r_symndx (&htab->sym_cache, 2268 abfd, r_symndx); 2269 if (isym == NULL) 2270 goto error_return; 2271 2272 s = bfd_section_from_elf_index (abfd, isym->st_shndx); 2273 if (s == NULL) 2274 s = sec; 2275 2276 vpp = &elf_section_data (s)->local_dynrel; 2277 head = (struct elf_dyn_relocs **)vpp; 2278 } 2279 2280 p = *head; 2281 if (p == NULL || p->sec != sec) 2282 { 2283 bfd_size_type amt = sizeof *p; 2284 p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj, 2285 amt); 2286 if (p == NULL) 2287 goto error_return; 2288 p->next = *head; 2289 *head = p; 2290 p->sec = sec; 2291 p->count = 0; 2292 p->pc_count = 0; 2293 } 2294 2295 p->count += 1; 2296 /* Count size relocation as PC-relative relocation. */ 2297 if (r_type == R_386_PC32 || size_reloc) 2298 p->pc_count += 1; 2299 } 2300 break; 2301 2302 /* This relocation describes the C++ object vtable hierarchy. 2303 Reconstruct it for later use during GC. */ 2304 case R_386_GNU_VTINHERIT: 2305 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset)) 2306 goto error_return; 2307 break; 2308 2309 /* This relocation describes which C++ vtable entries are actually 2310 used. Record for later use during GC. */ 2311 case R_386_GNU_VTENTRY: 2312 BFD_ASSERT (h != NULL); 2313 if (h != NULL 2314 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset)) 2315 goto error_return; 2316 break; 2317 2318 default: 2319 break; 2320 } 2321 2322 if (use_plt_got 2323 && h != NULL 2324 && h->plt.refcount > 0 2325 && (((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed) 2326 || h->got.refcount > 0) 2327 && htab->plt_got == NULL) 2328 { 2329 /* Create the GOT procedure linkage table. */ 2330 unsigned int plt_got_align; 2331 const struct elf_backend_data *bed; 2332 2333 bed = get_elf_backend_data (info->output_bfd); 2334 BFD_ASSERT (sizeof (elf_i386_got_plt_entry) == 8 2335 && (sizeof (elf_i386_got_plt_entry) 2336 == sizeof (elf_i386_pic_got_plt_entry))); 2337 plt_got_align = 3; 2338 2339 if (htab->elf.dynobj == NULL) 2340 htab->elf.dynobj = abfd; 2341 htab->plt_got 2342 = bfd_make_section_anyway_with_flags (htab->elf.dynobj, 2343 ".plt.got", 2344 (bed->dynamic_sec_flags 2345 | SEC_ALLOC 2346 | SEC_CODE 2347 | SEC_LOAD 2348 | SEC_READONLY)); 2349 if (htab->plt_got == NULL 2350 || !bfd_set_section_alignment (htab->elf.dynobj, 2351 htab->plt_got, 2352 plt_got_align)) 2353 goto error_return; 2354 } 2355 2356 if (r_type == R_386_GOT32X 2357 && (h == NULL || h->type != STT_GNU_IFUNC)) 2358 sec->need_convert_load = 1; 2359 } 2360 2361 if (elf_section_data (sec)->this_hdr.contents != contents) 2362 { 2363 if (!info->keep_memory) 2364 free (contents); 2365 else 2366 { 2367 /* Cache the section contents for elf_link_input_bfd. */ 2368 elf_section_data (sec)->this_hdr.contents = contents; 2369 } 2370 } 2371 2372 return TRUE; 2373 2374 error_return: 2375 if (elf_section_data (sec)->this_hdr.contents != contents) 2376 free (contents); 2377 sec->check_relocs_failed = 1; 2378 return FALSE; 2379 } 2380 2381 /* Return the section that should be marked against GC for a given 2382 relocation. */ 2383 2384 static asection * 2385 elf_i386_gc_mark_hook (asection *sec, 2386 struct bfd_link_info *info, 2387 Elf_Internal_Rela *rel, 2388 struct elf_link_hash_entry *h, 2389 Elf_Internal_Sym *sym) 2390 { 2391 if (h != NULL) 2392 switch (ELF32_R_TYPE (rel->r_info)) 2393 { 2394 case R_386_GNU_VTINHERIT: 2395 case R_386_GNU_VTENTRY: 2396 return NULL; 2397 } 2398 2399 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym); 2400 } 2401 2402 /* Remove undefined weak symbol from the dynamic symbol table if it 2403 is resolved to 0. */ 2404 2405 static bfd_boolean 2406 elf_i386_fixup_symbol (struct bfd_link_info *info, 2407 struct elf_link_hash_entry *h) 2408 { 2409 if (h->dynindx != -1 2410 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, 2411 elf_i386_hash_entry (h)->has_got_reloc, 2412 elf_i386_hash_entry (h))) 2413 { 2414 h->dynindx = -1; 2415 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr, 2416 h->dynstr_index); 2417 } 2418 return TRUE; 2419 } 2420 2421 /* Adjust a symbol defined by a dynamic object and referenced by a 2422 regular object. The current definition is in some section of the 2423 dynamic object, but we're not including those sections. We have to 2424 change the definition to something the rest of the link can 2425 understand. */ 2426 2427 static bfd_boolean 2428 elf_i386_adjust_dynamic_symbol (struct bfd_link_info *info, 2429 struct elf_link_hash_entry *h) 2430 { 2431 struct elf_i386_link_hash_table *htab; 2432 asection *s; 2433 struct elf_i386_link_hash_entry *eh; 2434 struct elf_dyn_relocs *p; 2435 2436 /* STT_GNU_IFUNC symbol must go through PLT. */ 2437 if (h->type == STT_GNU_IFUNC) 2438 { 2439 /* All local STT_GNU_IFUNC references must be treate as local 2440 calls via local PLT. */ 2441 if (h->ref_regular 2442 && SYMBOL_CALLS_LOCAL (info, h)) 2443 { 2444 bfd_size_type pc_count = 0, count = 0; 2445 struct elf_dyn_relocs **pp; 2446 2447 eh = (struct elf_i386_link_hash_entry *) h; 2448 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; ) 2449 { 2450 pc_count += p->pc_count; 2451 p->count -= p->pc_count; 2452 p->pc_count = 0; 2453 count += p->count; 2454 if (p->count == 0) 2455 *pp = p->next; 2456 else 2457 pp = &p->next; 2458 } 2459 2460 if (pc_count || count) 2461 { 2462 h->non_got_ref = 1; 2463 if (pc_count) 2464 { 2465 /* Increment PLT reference count only for PC-relative 2466 references. */ 2467 h->needs_plt = 1; 2468 if (h->plt.refcount <= 0) 2469 h->plt.refcount = 1; 2470 else 2471 h->plt.refcount += 1; 2472 } 2473 } 2474 } 2475 2476 if (h->plt.refcount <= 0) 2477 { 2478 h->plt.offset = (bfd_vma) -1; 2479 h->needs_plt = 0; 2480 } 2481 return TRUE; 2482 } 2483 2484 /* If this is a function, put it in the procedure linkage table. We 2485 will fill in the contents of the procedure linkage table later, 2486 when we know the address of the .got section. */ 2487 if (h->type == STT_FUNC 2488 || h->needs_plt) 2489 { 2490 if (h->plt.refcount <= 0 2491 || SYMBOL_CALLS_LOCAL (info, h) 2492 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT 2493 && h->root.type == bfd_link_hash_undefweak)) 2494 { 2495 /* This case can occur if we saw a PLT32 reloc in an input 2496 file, but the symbol was never referred to by a dynamic 2497 object, or if all references were garbage collected. In 2498 such a case, we don't actually need to build a procedure 2499 linkage table, and we can just do a PC32 reloc instead. */ 2500 h->plt.offset = (bfd_vma) -1; 2501 h->needs_plt = 0; 2502 } 2503 2504 return TRUE; 2505 } 2506 else 2507 /* It's possible that we incorrectly decided a .plt reloc was 2508 needed for an R_386_PC32 reloc to a non-function sym in 2509 check_relocs. We can't decide accurately between function and 2510 non-function syms in check-relocs; Objects loaded later in 2511 the link may change h->type. So fix it now. */ 2512 h->plt.offset = (bfd_vma) -1; 2513 2514 /* If this is a weak symbol, and there is a real definition, the 2515 processor independent code will have arranged for us to see the 2516 real definition first, and we can just use the same value. */ 2517 if (h->u.weakdef != NULL) 2518 { 2519 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined 2520 || h->u.weakdef->root.type == bfd_link_hash_defweak); 2521 h->root.u.def.section = h->u.weakdef->root.u.def.section; 2522 h->root.u.def.value = h->u.weakdef->root.u.def.value; 2523 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc) 2524 h->non_got_ref = h->u.weakdef->non_got_ref; 2525 return TRUE; 2526 } 2527 2528 /* This is a reference to a symbol defined by a dynamic object which 2529 is not a function. */ 2530 2531 /* If we are creating a shared library, we must presume that the 2532 only references to the symbol are via the global offset table. 2533 For such cases we need not do anything here; the relocations will 2534 be handled correctly by relocate_section. */ 2535 if (!bfd_link_executable (info)) 2536 return TRUE; 2537 2538 /* If there are no references to this symbol that do not use the 2539 GOT nor R_386_GOTOFF relocation, we don't need to generate a copy 2540 reloc. */ 2541 eh = (struct elf_i386_link_hash_entry *) h; 2542 if (!h->non_got_ref && !eh->gotoff_ref) 2543 return TRUE; 2544 2545 /* If -z nocopyreloc was given, we won't generate them either. */ 2546 if (info->nocopyreloc) 2547 { 2548 h->non_got_ref = 0; 2549 return TRUE; 2550 } 2551 2552 htab = elf_i386_hash_table (info); 2553 if (htab == NULL) 2554 return FALSE; 2555 2556 /* If there aren't any dynamic relocs in read-only sections nor 2557 R_386_GOTOFF relocation, then we can keep the dynamic relocs and 2558 avoid the copy reloc. This doesn't work on VxWorks, where we can 2559 not have dynamic relocations (other than copy and jump slot 2560 relocations) in an executable. */ 2561 if (ELIMINATE_COPY_RELOCS 2562 && !eh->gotoff_ref 2563 && !get_elf_i386_backend_data (info->output_bfd)->is_vxworks) 2564 { 2565 for (p = eh->dyn_relocs; p != NULL; p = p->next) 2566 { 2567 s = p->sec->output_section; 2568 if (s != NULL && (s->flags & SEC_READONLY) != 0) 2569 break; 2570 } 2571 2572 if (p == NULL) 2573 { 2574 h->non_got_ref = 0; 2575 return TRUE; 2576 } 2577 } 2578 2579 /* We must allocate the symbol in our .dynbss section, which will 2580 become part of the .bss section of the executable. There will be 2581 an entry for this symbol in the .dynsym section. The dynamic 2582 object will contain position independent code, so all references 2583 from the dynamic object to this symbol will go through the global 2584 offset table. The dynamic linker will use the .dynsym entry to 2585 determine the address it must put in the global offset table, so 2586 both the dynamic object and the regular object will refer to the 2587 same memory location for the variable. */ 2588 2589 /* We must generate a R_386_COPY reloc to tell the dynamic linker to 2590 copy the initial value out of the dynamic object and into the 2591 runtime process image. */ 2592 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0) 2593 { 2594 htab->srelbss->size += sizeof (Elf32_External_Rel); 2595 h->needs_copy = 1; 2596 } 2597 2598 s = htab->sdynbss; 2599 2600 return _bfd_elf_adjust_dynamic_copy (info, h, s); 2601 } 2602 2603 /* Allocate space in .plt, .got and associated reloc sections for 2604 dynamic relocs. */ 2605 2606 static bfd_boolean 2607 elf_i386_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf) 2608 { 2609 struct bfd_link_info *info; 2610 struct elf_i386_link_hash_table *htab; 2611 struct elf_i386_link_hash_entry *eh; 2612 struct elf_dyn_relocs *p; 2613 unsigned plt_entry_size; 2614 bfd_boolean resolved_to_zero; 2615 2616 if (h->root.type == bfd_link_hash_indirect) 2617 return TRUE; 2618 2619 eh = (struct elf_i386_link_hash_entry *) h; 2620 2621 info = (struct bfd_link_info *) inf; 2622 htab = elf_i386_hash_table (info); 2623 if (htab == NULL) 2624 return FALSE; 2625 2626 plt_entry_size = GET_PLT_ENTRY_SIZE (info->output_bfd); 2627 2628 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, 2629 eh->has_got_reloc, 2630 eh); 2631 2632 /* Clear the reference count of function pointer relocations if 2633 symbol isn't a normal function. */ 2634 if (h->type != STT_FUNC) 2635 eh->func_pointer_refcount = 0; 2636 2637 /* We can't use the GOT PLT if pointer equality is needed since 2638 finish_dynamic_symbol won't clear symbol value and the dynamic 2639 linker won't update the GOT slot. We will get into an infinite 2640 loop at run-time. */ 2641 if (htab->plt_got != NULL 2642 && h->type != STT_GNU_IFUNC 2643 && !h->pointer_equality_needed 2644 && h->plt.refcount > 0 2645 && h->got.refcount > 0) 2646 { 2647 /* Don't use the regular PLT if there are both GOT and GOTPLT 2648 reloctions. */ 2649 h->plt.offset = (bfd_vma) -1; 2650 2651 /* Use the GOT PLT. */ 2652 eh->plt_got.refcount = 1; 2653 } 2654 2655 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it 2656 here if it is defined and referenced in a non-shared object. */ 2657 if (h->type == STT_GNU_IFUNC 2658 && h->def_regular) 2659 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h, &eh->dyn_relocs, 2660 &htab->readonly_dynrelocs_against_ifunc, 2661 plt_entry_size, 2662 plt_entry_size, 4, TRUE); 2663 /* Don't create the PLT entry if there are only function pointer 2664 relocations which can be resolved at run-time. */ 2665 else if (htab->elf.dynamic_sections_created 2666 && (h->plt.refcount > eh->func_pointer_refcount 2667 || eh->plt_got.refcount > 0)) 2668 { 2669 bfd_boolean use_plt_got; 2670 2671 /* Clear the reference count of function pointer relocations 2672 if PLT is used. */ 2673 eh->func_pointer_refcount = 0; 2674 2675 if ((info->flags & DF_BIND_NOW) && !h->pointer_equality_needed) 2676 { 2677 /* Don't use the regular PLT for DF_BIND_NOW. */ 2678 h->plt.offset = (bfd_vma) -1; 2679 2680 /* Use the GOT PLT. */ 2681 h->got.refcount = 1; 2682 eh->plt_got.refcount = 1; 2683 } 2684 2685 use_plt_got = eh->plt_got.refcount > 0; 2686 2687 /* Make sure this symbol is output as a dynamic symbol. 2688 Undefined weak syms won't yet be marked as dynamic. */ 2689 if (h->dynindx == -1 2690 && !h->forced_local 2691 && !resolved_to_zero) 2692 { 2693 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2694 return FALSE; 2695 } 2696 2697 if (bfd_link_pic (info) 2698 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h)) 2699 { 2700 asection *s = htab->elf.splt; 2701 asection *got_s = htab->plt_got; 2702 2703 /* If this is the first .plt entry, make room for the special 2704 first entry. The .plt section is used by prelink to undo 2705 prelinking for dynamic relocations. */ 2706 if (s->size == 0) 2707 s->size = plt_entry_size; 2708 2709 if (use_plt_got) 2710 eh->plt_got.offset = got_s->size; 2711 else 2712 h->plt.offset = s->size; 2713 2714 /* If this symbol is not defined in a regular file, and we are 2715 not generating a shared library, then set the symbol to this 2716 location in the .plt. This is required to make function 2717 pointers compare as equal between the normal executable and 2718 the shared library. */ 2719 if (! bfd_link_pic (info) 2720 && !h->def_regular) 2721 { 2722 if (use_plt_got) 2723 { 2724 /* We need to make a call to the entry of the GOT PLT 2725 instead of regular PLT entry. */ 2726 h->root.u.def.section = got_s; 2727 h->root.u.def.value = eh->plt_got.offset; 2728 } 2729 else 2730 { 2731 h->root.u.def.section = s; 2732 h->root.u.def.value = h->plt.offset; 2733 } 2734 } 2735 2736 /* Make room for this entry. */ 2737 if (use_plt_got) 2738 got_s->size += sizeof (elf_i386_got_plt_entry); 2739 else 2740 { 2741 s->size += plt_entry_size; 2742 2743 /* We also need to make an entry in the .got.plt section, 2744 which will be placed in the .got section by the linker 2745 script. */ 2746 htab->elf.sgotplt->size += 4; 2747 2748 /* There should be no PLT relocation against resolved 2749 undefined weak symbol in executable. */ 2750 if (!resolved_to_zero) 2751 { 2752 /* We also need to make an entry in the .rel.plt 2753 section. */ 2754 htab->elf.srelplt->size += sizeof (Elf32_External_Rel); 2755 htab->elf.srelplt->reloc_count++; 2756 } 2757 } 2758 2759 if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks 2760 && !bfd_link_pic (info)) 2761 { 2762 /* VxWorks has a second set of relocations for each PLT entry 2763 in executables. They go in a separate relocation section, 2764 which is processed by the kernel loader. */ 2765 2766 /* There are two relocations for the initial PLT entry: an 2767 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 4 and an 2768 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 8. */ 2769 2770 if (h->plt.offset == plt_entry_size) 2771 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2); 2772 2773 /* There are two extra relocations for each subsequent PLT entry: 2774 an R_386_32 relocation for the GOT entry, and an R_386_32 2775 relocation for the PLT entry. */ 2776 2777 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2); 2778 } 2779 } 2780 else 2781 { 2782 eh->plt_got.offset = (bfd_vma) -1; 2783 h->plt.offset = (bfd_vma) -1; 2784 h->needs_plt = 0; 2785 } 2786 } 2787 else 2788 { 2789 eh->plt_got.offset = (bfd_vma) -1; 2790 h->plt.offset = (bfd_vma) -1; 2791 h->needs_plt = 0; 2792 } 2793 2794 eh->tlsdesc_got = (bfd_vma) -1; 2795 2796 /* If R_386_TLS_{IE_32,IE,GOTIE} symbol is now local to the binary, 2797 make it a R_386_TLS_LE_32 requiring no TLS entry. */ 2798 if (h->got.refcount > 0 2799 && bfd_link_executable (info) 2800 && h->dynindx == -1 2801 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE)) 2802 h->got.offset = (bfd_vma) -1; 2803 else if (h->got.refcount > 0) 2804 { 2805 asection *s; 2806 bfd_boolean dyn; 2807 int tls_type = elf_i386_hash_entry(h)->tls_type; 2808 2809 /* Make sure this symbol is output as a dynamic symbol. 2810 Undefined weak syms won't yet be marked as dynamic. */ 2811 if (h->dynindx == -1 2812 && !h->forced_local 2813 && !resolved_to_zero) 2814 { 2815 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2816 return FALSE; 2817 } 2818 2819 s = htab->elf.sgot; 2820 if (GOT_TLS_GDESC_P (tls_type)) 2821 { 2822 eh->tlsdesc_got = htab->elf.sgotplt->size 2823 - elf_i386_compute_jump_table_size (htab); 2824 htab->elf.sgotplt->size += 8; 2825 h->got.offset = (bfd_vma) -2; 2826 } 2827 if (! GOT_TLS_GDESC_P (tls_type) 2828 || GOT_TLS_GD_P (tls_type)) 2829 { 2830 h->got.offset = s->size; 2831 s->size += 4; 2832 /* R_386_TLS_GD needs 2 consecutive GOT slots. */ 2833 if (GOT_TLS_GD_P (tls_type) || tls_type == GOT_TLS_IE_BOTH) 2834 s->size += 4; 2835 } 2836 dyn = htab->elf.dynamic_sections_created; 2837 /* R_386_TLS_IE_32 needs one dynamic relocation, 2838 R_386_TLS_IE resp. R_386_TLS_GOTIE needs one dynamic relocation, 2839 (but if both R_386_TLS_IE_32 and R_386_TLS_IE is present, we 2840 need two), R_386_TLS_GD needs one if local symbol and two if 2841 global. No dynamic relocation against resolved undefined weak 2842 symbol in executable. */ 2843 if (tls_type == GOT_TLS_IE_BOTH) 2844 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel); 2845 else if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1) 2846 || (tls_type & GOT_TLS_IE)) 2847 htab->elf.srelgot->size += sizeof (Elf32_External_Rel); 2848 else if (GOT_TLS_GD_P (tls_type)) 2849 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel); 2850 else if (! GOT_TLS_GDESC_P (tls_type) 2851 && ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 2852 && !resolved_to_zero) 2853 || h->root.type != bfd_link_hash_undefweak) 2854 && (bfd_link_pic (info) 2855 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h))) 2856 htab->elf.srelgot->size += sizeof (Elf32_External_Rel); 2857 if (GOT_TLS_GDESC_P (tls_type)) 2858 htab->elf.srelplt->size += sizeof (Elf32_External_Rel); 2859 } 2860 else 2861 h->got.offset = (bfd_vma) -1; 2862 2863 if (eh->dyn_relocs == NULL) 2864 return TRUE; 2865 2866 /* In the shared -Bsymbolic case, discard space allocated for 2867 dynamic pc-relative relocs against symbols which turn out to be 2868 defined in regular objects. For the normal shared case, discard 2869 space for pc-relative relocs that have become local due to symbol 2870 visibility changes. */ 2871 2872 if (bfd_link_pic (info)) 2873 { 2874 /* The only reloc that uses pc_count is R_386_PC32, which will 2875 appear on a call or on something like ".long foo - .". We 2876 want calls to protected symbols to resolve directly to the 2877 function rather than going via the plt. If people want 2878 function pointer comparisons to work as expected then they 2879 should avoid writing assembly like ".long foo - .". */ 2880 if (SYMBOL_CALLS_LOCAL (info, h)) 2881 { 2882 struct elf_dyn_relocs **pp; 2883 2884 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; ) 2885 { 2886 p->count -= p->pc_count; 2887 p->pc_count = 0; 2888 if (p->count == 0) 2889 *pp = p->next; 2890 else 2891 pp = &p->next; 2892 } 2893 } 2894 2895 if (get_elf_i386_backend_data (info->output_bfd)->is_vxworks) 2896 { 2897 struct elf_dyn_relocs **pp; 2898 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; ) 2899 { 2900 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0) 2901 *pp = p->next; 2902 else 2903 pp = &p->next; 2904 } 2905 } 2906 2907 /* Also discard relocs on undefined weak syms with non-default 2908 visibility or in PIE. */ 2909 if (eh->dyn_relocs != NULL 2910 && h->root.type == bfd_link_hash_undefweak) 2911 { 2912 /* Undefined weak symbol is never bound locally in shared 2913 library. */ 2914 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT 2915 || resolved_to_zero) 2916 { 2917 if (h->non_got_ref) 2918 { 2919 /* Keep dynamic non-GOT/non-PLT relocation so that we 2920 can branch to 0 without PLT. */ 2921 struct elf_dyn_relocs **pp; 2922 2923 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; ) 2924 if (p->pc_count == 0) 2925 *pp = p->next; 2926 else 2927 { 2928 /* Remove non-R_386_PC32 relocation. */ 2929 p->count = p->pc_count; 2930 pp = &p->next; 2931 } 2932 2933 if (eh->dyn_relocs != NULL) 2934 { 2935 /* Make sure undefined weak symbols are output 2936 as dynamic symbols in PIEs for dynamic non-GOT 2937 non-PLT reloations. */ 2938 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2939 return FALSE; 2940 } 2941 } 2942 else 2943 eh->dyn_relocs = NULL; 2944 } 2945 else if (h->dynindx == -1 2946 && !h->forced_local) 2947 { 2948 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2949 return FALSE; 2950 } 2951 } 2952 } 2953 else if (ELIMINATE_COPY_RELOCS) 2954 { 2955 /* For the non-shared case, discard space for relocs against 2956 symbols which turn out to need copy relocs or are not 2957 dynamic. Keep dynamic relocations for run-time function 2958 pointer initialization. */ 2959 2960 if ((!h->non_got_ref 2961 || eh->func_pointer_refcount > 0 2962 || (h->root.type == bfd_link_hash_undefweak 2963 && !resolved_to_zero)) 2964 && ((h->def_dynamic 2965 && !h->def_regular) 2966 || (htab->elf.dynamic_sections_created 2967 && (h->root.type == bfd_link_hash_undefweak 2968 || h->root.type == bfd_link_hash_undefined)))) 2969 { 2970 /* Make sure this symbol is output as a dynamic symbol. 2971 Undefined weak syms won't yet be marked as dynamic. */ 2972 if (h->dynindx == -1 2973 && !h->forced_local 2974 && !resolved_to_zero) 2975 { 2976 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2977 return FALSE; 2978 } 2979 2980 /* If that succeeded, we know we'll be keeping all the 2981 relocs. */ 2982 if (h->dynindx != -1) 2983 goto keep; 2984 } 2985 2986 eh->dyn_relocs = NULL; 2987 eh->func_pointer_refcount = 0; 2988 2989 keep: ; 2990 } 2991 2992 /* Finally, allocate space. */ 2993 for (p = eh->dyn_relocs; p != NULL; p = p->next) 2994 { 2995 asection *sreloc; 2996 2997 sreloc = elf_section_data (p->sec)->sreloc; 2998 2999 BFD_ASSERT (sreloc != NULL); 3000 sreloc->size += p->count * sizeof (Elf32_External_Rel); 3001 } 3002 3003 return TRUE; 3004 } 3005 3006 /* Allocate space in .plt, .got and associated reloc sections for 3007 local dynamic relocs. */ 3008 3009 static bfd_boolean 3010 elf_i386_allocate_local_dynrelocs (void **slot, void *inf) 3011 { 3012 struct elf_link_hash_entry *h 3013 = (struct elf_link_hash_entry *) *slot; 3014 3015 if (h->type != STT_GNU_IFUNC 3016 || !h->def_regular 3017 || !h->ref_regular 3018 || !h->forced_local 3019 || h->root.type != bfd_link_hash_defined) 3020 abort (); 3021 3022 return elf_i386_allocate_dynrelocs (h, inf); 3023 } 3024 3025 /* Find any dynamic relocs that apply to read-only sections. */ 3026 3027 static bfd_boolean 3028 elf_i386_readonly_dynrelocs (struct elf_link_hash_entry *h, void *inf) 3029 { 3030 struct elf_i386_link_hash_entry *eh; 3031 struct elf_dyn_relocs *p; 3032 3033 /* Skip local IFUNC symbols. */ 3034 if (h->forced_local && h->type == STT_GNU_IFUNC) 3035 return TRUE; 3036 3037 eh = (struct elf_i386_link_hash_entry *) h; 3038 for (p = eh->dyn_relocs; p != NULL; p = p->next) 3039 { 3040 asection *s = p->sec->output_section; 3041 3042 if (s != NULL && (s->flags & SEC_READONLY) != 0) 3043 { 3044 struct bfd_link_info *info = (struct bfd_link_info *) inf; 3045 if (info->warn_shared_textrel) 3046 (*_bfd_error_handler) 3047 (_("warning: dynamic relocation to `%s' in readonly section `%s'"), 3048 h->root.root.string, s->name); 3049 info->flags |= DF_TEXTREL; 3050 3051 if ((info->warn_shared_textrel && bfd_link_pic (info)) 3052 || info->error_textrel) 3053 info->callbacks->einfo (_("%P: %B: warning: relocation against `%s' in readonly section `%A'\n"), 3054 p->sec->owner, h->root.root.string, 3055 p->sec); 3056 3057 /* Not an error, just cut short the traversal. */ 3058 return FALSE; 3059 } 3060 } 3061 return TRUE; 3062 } 3063 3064 /* Convert load via the GOT slot to load immediate. */ 3065 3066 static bfd_boolean 3067 elf_i386_convert_load (bfd *abfd, asection *sec, 3068 struct bfd_link_info *link_info) 3069 { 3070 struct elf_i386_link_hash_table *htab; 3071 Elf_Internal_Shdr *symtab_hdr; 3072 Elf_Internal_Rela *internal_relocs; 3073 Elf_Internal_Rela *irel, *irelend; 3074 bfd_byte *contents; 3075 bfd_boolean changed; 3076 bfd_signed_vma *local_got_refcounts; 3077 3078 /* Don't even try to convert non-ELF outputs. */ 3079 if (!is_elf_hash_table (link_info->hash)) 3080 return FALSE; 3081 3082 /* Nothing to do if there is no need or no output. */ 3083 if ((sec->flags & (SEC_CODE | SEC_RELOC)) != (SEC_CODE | SEC_RELOC) 3084 || sec->need_convert_load == 0 3085 || bfd_is_abs_section (sec->output_section)) 3086 return TRUE; 3087 3088 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 3089 3090 /* Load the relocations for this section. */ 3091 internal_relocs = (_bfd_elf_link_read_relocs 3092 (abfd, sec, NULL, (Elf_Internal_Rela *) NULL, 3093 link_info->keep_memory)); 3094 if (internal_relocs == NULL) 3095 return FALSE; 3096 3097 changed = FALSE; 3098 htab = elf_i386_hash_table (link_info); 3099 local_got_refcounts = elf_local_got_refcounts (abfd); 3100 3101 /* Get the section contents. */ 3102 if (elf_section_data (sec)->this_hdr.contents != NULL) 3103 contents = elf_section_data (sec)->this_hdr.contents; 3104 else 3105 { 3106 if (!bfd_malloc_and_get_section (abfd, sec, &contents)) 3107 goto error_return; 3108 } 3109 3110 irelend = internal_relocs + sec->reloc_count; 3111 for (irel = internal_relocs; irel < irelend; irel++) 3112 { 3113 unsigned int r_type = ELF32_R_TYPE (irel->r_info); 3114 unsigned int r_symndx; 3115 struct elf_link_hash_entry *h; 3116 bfd_boolean converted; 3117 3118 /* Don't convert R_386_GOT32 since we can't tell if it is applied 3119 to "mov $foo@GOT, %reg" which isn't a load via GOT. */ 3120 if (r_type != R_386_GOT32X) 3121 continue; 3122 3123 r_symndx = ELF32_R_SYM (irel->r_info); 3124 if (r_symndx < symtab_hdr->sh_info) 3125 h = elf_i386_get_local_sym_hash (htab, sec->owner, 3126 (const Elf_Internal_Rela *) irel, 3127 FALSE); 3128 else 3129 { 3130 h = elf_sym_hashes (abfd)[r_symndx - symtab_hdr->sh_info]; 3131 while (h->root.type == bfd_link_hash_indirect 3132 || h->root.type == bfd_link_hash_warning) 3133 h = (struct elf_link_hash_entry *) h->root.u.i.link; 3134 } 3135 3136 /* STT_GNU_IFUNC must keep GOT32 relocations. */ 3137 if (h != NULL && h->type == STT_GNU_IFUNC) 3138 continue; 3139 3140 converted = FALSE; 3141 if (!elf_i386_convert_load_reloc (abfd, symtab_hdr, contents, 3142 irel, h, &converted, link_info)) 3143 goto error_return; 3144 3145 if (converted) 3146 { 3147 changed = converted; 3148 if (h) 3149 { 3150 if (h->got.refcount > 0) 3151 h->got.refcount -= 1; 3152 } 3153 else 3154 { 3155 if (local_got_refcounts != NULL 3156 && local_got_refcounts[r_symndx] > 0) 3157 local_got_refcounts[r_symndx] -= 1; 3158 } 3159 } 3160 } 3161 3162 if (contents != NULL 3163 && elf_section_data (sec)->this_hdr.contents != contents) 3164 { 3165 if (!changed && !link_info->keep_memory) 3166 free (contents); 3167 else 3168 { 3169 /* Cache the section contents for elf_link_input_bfd. */ 3170 elf_section_data (sec)->this_hdr.contents = contents; 3171 } 3172 } 3173 3174 if (elf_section_data (sec)->relocs != internal_relocs) 3175 { 3176 if (!changed) 3177 free (internal_relocs); 3178 else 3179 elf_section_data (sec)->relocs = internal_relocs; 3180 } 3181 3182 return TRUE; 3183 3184 error_return: 3185 if (contents != NULL 3186 && elf_section_data (sec)->this_hdr.contents != contents) 3187 free (contents); 3188 if (internal_relocs != NULL 3189 && elf_section_data (sec)->relocs != internal_relocs) 3190 free (internal_relocs); 3191 return FALSE; 3192 } 3193 3194 /* Set the sizes of the dynamic sections. */ 3195 3196 static bfd_boolean 3197 elf_i386_size_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info) 3198 { 3199 struct elf_i386_link_hash_table *htab; 3200 bfd *dynobj; 3201 asection *s; 3202 bfd_boolean relocs; 3203 bfd *ibfd; 3204 3205 htab = elf_i386_hash_table (info); 3206 if (htab == NULL) 3207 return FALSE; 3208 dynobj = htab->elf.dynobj; 3209 if (dynobj == NULL) 3210 abort (); 3211 3212 /* Set up .got offsets for local syms, and space for local dynamic 3213 relocs. */ 3214 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 3215 { 3216 bfd_signed_vma *local_got; 3217 bfd_signed_vma *end_local_got; 3218 char *local_tls_type; 3219 bfd_vma *local_tlsdesc_gotent; 3220 bfd_size_type locsymcount; 3221 Elf_Internal_Shdr *symtab_hdr; 3222 asection *srel; 3223 3224 if (! is_i386_elf (ibfd)) 3225 continue; 3226 3227 for (s = ibfd->sections; s != NULL; s = s->next) 3228 { 3229 struct elf_dyn_relocs *p; 3230 3231 if (!elf_i386_convert_load (ibfd, s, info)) 3232 return FALSE; 3233 3234 for (p = ((struct elf_dyn_relocs *) 3235 elf_section_data (s)->local_dynrel); 3236 p != NULL; 3237 p = p->next) 3238 { 3239 if (!bfd_is_abs_section (p->sec) 3240 && bfd_is_abs_section (p->sec->output_section)) 3241 { 3242 /* Input section has been discarded, either because 3243 it is a copy of a linkonce section or due to 3244 linker script /DISCARD/, so we'll be discarding 3245 the relocs too. */ 3246 } 3247 else if (get_elf_i386_backend_data (output_bfd)->is_vxworks 3248 && strcmp (p->sec->output_section->name, 3249 ".tls_vars") == 0) 3250 { 3251 /* Relocations in vxworks .tls_vars sections are 3252 handled specially by the loader. */ 3253 } 3254 else if (p->count != 0) 3255 { 3256 srel = elf_section_data (p->sec)->sreloc; 3257 srel->size += p->count * sizeof (Elf32_External_Rel); 3258 if ((p->sec->output_section->flags & SEC_READONLY) != 0 3259 && (info->flags & DF_TEXTREL) == 0) 3260 { 3261 info->flags |= DF_TEXTREL; 3262 if ((info->warn_shared_textrel && bfd_link_pic (info)) 3263 || info->error_textrel) 3264 info->callbacks->einfo (_("%P: %B: warning: relocation in readonly section `%A'\n"), 3265 p->sec->owner, p->sec); 3266 } 3267 } 3268 } 3269 } 3270 3271 local_got = elf_local_got_refcounts (ibfd); 3272 if (!local_got) 3273 continue; 3274 3275 symtab_hdr = &elf_symtab_hdr (ibfd); 3276 locsymcount = symtab_hdr->sh_info; 3277 end_local_got = local_got + locsymcount; 3278 local_tls_type = elf_i386_local_got_tls_type (ibfd); 3279 local_tlsdesc_gotent = elf_i386_local_tlsdesc_gotent (ibfd); 3280 s = htab->elf.sgot; 3281 srel = htab->elf.srelgot; 3282 for (; local_got < end_local_got; 3283 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent) 3284 { 3285 *local_tlsdesc_gotent = (bfd_vma) -1; 3286 if (*local_got > 0) 3287 { 3288 if (GOT_TLS_GDESC_P (*local_tls_type)) 3289 { 3290 *local_tlsdesc_gotent = htab->elf.sgotplt->size 3291 - elf_i386_compute_jump_table_size (htab); 3292 htab->elf.sgotplt->size += 8; 3293 *local_got = (bfd_vma) -2; 3294 } 3295 if (! GOT_TLS_GDESC_P (*local_tls_type) 3296 || GOT_TLS_GD_P (*local_tls_type)) 3297 { 3298 *local_got = s->size; 3299 s->size += 4; 3300 if (GOT_TLS_GD_P (*local_tls_type) 3301 || *local_tls_type == GOT_TLS_IE_BOTH) 3302 s->size += 4; 3303 } 3304 if (bfd_link_pic (info) 3305 || GOT_TLS_GD_ANY_P (*local_tls_type) 3306 || (*local_tls_type & GOT_TLS_IE)) 3307 { 3308 if (*local_tls_type == GOT_TLS_IE_BOTH) 3309 srel->size += 2 * sizeof (Elf32_External_Rel); 3310 else if (GOT_TLS_GD_P (*local_tls_type) 3311 || ! GOT_TLS_GDESC_P (*local_tls_type)) 3312 srel->size += sizeof (Elf32_External_Rel); 3313 if (GOT_TLS_GDESC_P (*local_tls_type)) 3314 htab->elf.srelplt->size += sizeof (Elf32_External_Rel); 3315 } 3316 } 3317 else 3318 *local_got = (bfd_vma) -1; 3319 } 3320 } 3321 3322 if (htab->tls_ldm_got.refcount > 0) 3323 { 3324 /* Allocate 2 got entries and 1 dynamic reloc for R_386_TLS_LDM 3325 relocs. */ 3326 htab->tls_ldm_got.offset = htab->elf.sgot->size; 3327 htab->elf.sgot->size += 8; 3328 htab->elf.srelgot->size += sizeof (Elf32_External_Rel); 3329 } 3330 else 3331 htab->tls_ldm_got.offset = -1; 3332 3333 /* Allocate global sym .plt and .got entries, and space for global 3334 sym dynamic relocs. */ 3335 elf_link_hash_traverse (&htab->elf, elf_i386_allocate_dynrelocs, info); 3336 3337 /* Allocate .plt and .got entries, and space for local symbols. */ 3338 htab_traverse (htab->loc_hash_table, 3339 elf_i386_allocate_local_dynrelocs, 3340 info); 3341 3342 /* For every jump slot reserved in the sgotplt, reloc_count is 3343 incremented. However, when we reserve space for TLS descriptors, 3344 it's not incremented, so in order to compute the space reserved 3345 for them, it suffices to multiply the reloc count by the jump 3346 slot size. 3347 3348 PR ld/13302: We start next_irelative_index at the end of .rela.plt 3349 so that R_386_IRELATIVE entries come last. */ 3350 if (htab->elf.srelplt) 3351 { 3352 htab->next_tls_desc_index = htab->elf.srelplt->reloc_count; 3353 htab->sgotplt_jump_table_size = htab->next_tls_desc_index * 4; 3354 htab->next_irelative_index = htab->elf.srelplt->reloc_count - 1; 3355 } 3356 else if (htab->elf.irelplt) 3357 htab->next_irelative_index = htab->elf.irelplt->reloc_count - 1; 3358 3359 3360 if (htab->elf.sgotplt) 3361 { 3362 /* Don't allocate .got.plt section if there are no GOT nor PLT 3363 entries and there is no reference to _GLOBAL_OFFSET_TABLE_. */ 3364 if ((htab->elf.hgot == NULL 3365 || !htab->elf.hgot->ref_regular_nonweak) 3366 && (htab->elf.sgotplt->size 3367 == get_elf_backend_data (output_bfd)->got_header_size) 3368 && (htab->elf.splt == NULL 3369 || htab->elf.splt->size == 0) 3370 && (htab->elf.sgot == NULL 3371 || htab->elf.sgot->size == 0) 3372 && (htab->elf.iplt == NULL 3373 || htab->elf.iplt->size == 0) 3374 && (htab->elf.igotplt == NULL 3375 || htab->elf.igotplt->size == 0)) 3376 htab->elf.sgotplt->size = 0; 3377 } 3378 3379 3380 if (htab->plt_eh_frame != NULL 3381 && htab->elf.splt != NULL 3382 && htab->elf.splt->size != 0 3383 && !bfd_is_abs_section (htab->elf.splt->output_section) 3384 && _bfd_elf_eh_frame_present (info)) 3385 htab->plt_eh_frame->size = sizeof (elf_i386_eh_frame_plt); 3386 3387 /* We now have determined the sizes of the various dynamic sections. 3388 Allocate memory for them. */ 3389 relocs = FALSE; 3390 for (s = dynobj->sections; s != NULL; s = s->next) 3391 { 3392 bfd_boolean strip_section = TRUE; 3393 3394 if ((s->flags & SEC_LINKER_CREATED) == 0) 3395 continue; 3396 3397 if (s == htab->elf.splt 3398 || s == htab->elf.sgot) 3399 { 3400 /* Strip this section if we don't need it; see the 3401 comment below. */ 3402 /* We'd like to strip these sections if they aren't needed, but if 3403 we've exported dynamic symbols from them we must leave them. 3404 It's too late to tell BFD to get rid of the symbols. */ 3405 3406 if (htab->elf.hplt != NULL) 3407 strip_section = FALSE; 3408 } 3409 else if (s == htab->elf.sgotplt 3410 || s == htab->elf.iplt 3411 || s == htab->elf.igotplt 3412 || s == htab->plt_got 3413 || s == htab->plt_eh_frame 3414 || s == htab->sdynbss) 3415 { 3416 /* Strip these too. */ 3417 } 3418 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rel")) 3419 { 3420 if (s->size != 0 3421 && s != htab->elf.srelplt 3422 && s != htab->srelplt2) 3423 relocs = TRUE; 3424 3425 /* We use the reloc_count field as a counter if we need 3426 to copy relocs into the output file. */ 3427 s->reloc_count = 0; 3428 } 3429 else 3430 { 3431 /* It's not one of our sections, so don't allocate space. */ 3432 continue; 3433 } 3434 3435 if (s->size == 0) 3436 { 3437 /* If we don't need this section, strip it from the 3438 output file. This is mostly to handle .rel.bss and 3439 .rel.plt. We must create both sections in 3440 create_dynamic_sections, because they must be created 3441 before the linker maps input sections to output 3442 sections. The linker does that before 3443 adjust_dynamic_symbol is called, and it is that 3444 function which decides whether anything needs to go 3445 into these sections. */ 3446 if (strip_section) 3447 s->flags |= SEC_EXCLUDE; 3448 continue; 3449 } 3450 3451 if ((s->flags & SEC_HAS_CONTENTS) == 0) 3452 continue; 3453 3454 /* Allocate memory for the section contents. We use bfd_zalloc 3455 here in case unused entries are not reclaimed before the 3456 section's contents are written out. This should not happen, 3457 but this way if it does, we get a R_386_NONE reloc instead 3458 of garbage. */ 3459 s->contents = (unsigned char *) bfd_zalloc (dynobj, s->size); 3460 if (s->contents == NULL) 3461 return FALSE; 3462 } 3463 3464 if (htab->plt_eh_frame != NULL 3465 && htab->plt_eh_frame->contents != NULL) 3466 { 3467 memcpy (htab->plt_eh_frame->contents, elf_i386_eh_frame_plt, 3468 sizeof (elf_i386_eh_frame_plt)); 3469 bfd_put_32 (dynobj, htab->elf.splt->size, 3470 htab->plt_eh_frame->contents + PLT_FDE_LEN_OFFSET); 3471 } 3472 3473 if (htab->elf.dynamic_sections_created) 3474 { 3475 /* Add some entries to the .dynamic section. We fill in the 3476 values later, in elf_i386_finish_dynamic_sections, but we 3477 must add the entries now so that we get the correct size for 3478 the .dynamic section. The DT_DEBUG entry is filled in by the 3479 dynamic linker and used by the debugger. */ 3480 #define add_dynamic_entry(TAG, VAL) \ 3481 _bfd_elf_add_dynamic_entry (info, TAG, VAL) 3482 3483 if (bfd_link_executable (info)) 3484 { 3485 if (!add_dynamic_entry (DT_DEBUG, 0)) 3486 return FALSE; 3487 } 3488 3489 if (htab->elf.splt->size != 0) 3490 { 3491 /* DT_PLTGOT is used by prelink even if there is no PLT 3492 relocation. */ 3493 if (!add_dynamic_entry (DT_PLTGOT, 0)) 3494 return FALSE; 3495 3496 if (htab->elf.srelplt->size != 0) 3497 { 3498 if (!add_dynamic_entry (DT_PLTRELSZ, 0) 3499 || !add_dynamic_entry (DT_PLTREL, DT_REL) 3500 || !add_dynamic_entry (DT_JMPREL, 0)) 3501 return FALSE; 3502 } 3503 } 3504 3505 if (relocs) 3506 { 3507 if (!add_dynamic_entry (DT_REL, 0) 3508 || !add_dynamic_entry (DT_RELSZ, 0) 3509 || !add_dynamic_entry (DT_RELENT, sizeof (Elf32_External_Rel))) 3510 return FALSE; 3511 3512 /* If any dynamic relocs apply to a read-only section, 3513 then we need a DT_TEXTREL entry. */ 3514 if ((info->flags & DF_TEXTREL) == 0) 3515 elf_link_hash_traverse (&htab->elf, 3516 elf_i386_readonly_dynrelocs, info); 3517 3518 if ((info->flags & DF_TEXTREL) != 0) 3519 { 3520 if (htab->readonly_dynrelocs_against_ifunc) 3521 { 3522 info->callbacks->einfo 3523 (_("%P%X: read-only segment has dynamic IFUNC relocations; recompile with -fPIC\n")); 3524 bfd_set_error (bfd_error_bad_value); 3525 return FALSE; 3526 } 3527 3528 if (!add_dynamic_entry (DT_TEXTREL, 0)) 3529 return FALSE; 3530 } 3531 } 3532 if (get_elf_i386_backend_data (output_bfd)->is_vxworks 3533 && !elf_vxworks_add_dynamic_entries (output_bfd, info)) 3534 return FALSE; 3535 } 3536 #undef add_dynamic_entry 3537 3538 return TRUE; 3539 } 3540 3541 static bfd_boolean 3542 elf_i386_always_size_sections (bfd *output_bfd, 3543 struct bfd_link_info *info) 3544 { 3545 asection *tls_sec = elf_hash_table (info)->tls_sec; 3546 3547 if (tls_sec) 3548 { 3549 struct elf_link_hash_entry *tlsbase; 3550 3551 tlsbase = elf_link_hash_lookup (elf_hash_table (info), 3552 "_TLS_MODULE_BASE_", 3553 FALSE, FALSE, FALSE); 3554 3555 if (tlsbase && tlsbase->type == STT_TLS) 3556 { 3557 struct elf_i386_link_hash_table *htab; 3558 struct bfd_link_hash_entry *bh = NULL; 3559 const struct elf_backend_data *bed 3560 = get_elf_backend_data (output_bfd); 3561 3562 htab = elf_i386_hash_table (info); 3563 if (htab == NULL) 3564 return FALSE; 3565 3566 if (!(_bfd_generic_link_add_one_symbol 3567 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL, 3568 tls_sec, 0, NULL, FALSE, 3569 bed->collect, &bh))) 3570 return FALSE; 3571 3572 htab->tls_module_base = bh; 3573 3574 tlsbase = (struct elf_link_hash_entry *)bh; 3575 tlsbase->def_regular = 1; 3576 tlsbase->other = STV_HIDDEN; 3577 tlsbase->root.linker_def = 1; 3578 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE); 3579 } 3580 } 3581 3582 return TRUE; 3583 } 3584 3585 /* Set the correct type for an x86 ELF section. We do this by the 3586 section name, which is a hack, but ought to work. */ 3587 3588 static bfd_boolean 3589 elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED, 3590 Elf_Internal_Shdr *hdr, 3591 asection *sec) 3592 { 3593 const char *name; 3594 3595 name = bfd_get_section_name (abfd, sec); 3596 3597 /* This is an ugly, but unfortunately necessary hack that is 3598 needed when producing EFI binaries on x86. It tells 3599 elf.c:elf_fake_sections() not to consider ".reloc" as a section 3600 containing ELF relocation info. We need this hack in order to 3601 be able to generate ELF binaries that can be translated into 3602 EFI applications (which are essentially COFF objects). Those 3603 files contain a COFF ".reloc" section inside an ELFNN object, 3604 which would normally cause BFD to segfault because it would 3605 attempt to interpret this section as containing relocation 3606 entries for section "oc". With this hack enabled, ".reloc" 3607 will be treated as a normal data section, which will avoid the 3608 segfault. However, you won't be able to create an ELFNN binary 3609 with a section named "oc" that needs relocations, but that's 3610 the kind of ugly side-effects you get when detecting section 3611 types based on their names... In practice, this limitation is 3612 unlikely to bite. */ 3613 if (strcmp (name, ".reloc") == 0) 3614 hdr->sh_type = SHT_PROGBITS; 3615 3616 return TRUE; 3617 } 3618 3619 /* _TLS_MODULE_BASE_ needs to be treated especially when linking 3620 executables. Rather than setting it to the beginning of the TLS 3621 section, we have to set it to the end. This function may be called 3622 multiple times, it is idempotent. */ 3623 3624 static void 3625 elf_i386_set_tls_module_base (struct bfd_link_info *info) 3626 { 3627 struct elf_i386_link_hash_table *htab; 3628 struct bfd_link_hash_entry *base; 3629 3630 if (!bfd_link_executable (info)) 3631 return; 3632 3633 htab = elf_i386_hash_table (info); 3634 if (htab == NULL) 3635 return; 3636 3637 base = htab->tls_module_base; 3638 if (base == NULL) 3639 return; 3640 3641 base->u.def.value = htab->elf.tls_size; 3642 } 3643 3644 /* Return the base VMA address which should be subtracted from real addresses 3645 when resolving @dtpoff relocation. 3646 This is PT_TLS segment p_vaddr. */ 3647 3648 static bfd_vma 3649 elf_i386_dtpoff_base (struct bfd_link_info *info) 3650 { 3651 /* If tls_sec is NULL, we should have signalled an error already. */ 3652 if (elf_hash_table (info)->tls_sec == NULL) 3653 return 0; 3654 return elf_hash_table (info)->tls_sec->vma; 3655 } 3656 3657 /* Return the relocation value for @tpoff relocation 3658 if STT_TLS virtual address is ADDRESS. */ 3659 3660 static bfd_vma 3661 elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address) 3662 { 3663 struct elf_link_hash_table *htab = elf_hash_table (info); 3664 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd); 3665 bfd_vma static_tls_size; 3666 3667 /* If tls_sec is NULL, we should have signalled an error already. */ 3668 if (htab->tls_sec == NULL) 3669 return 0; 3670 3671 /* Consider special static TLS alignment requirements. */ 3672 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment); 3673 return static_tls_size + htab->tls_sec->vma - address; 3674 } 3675 3676 /* Relocate an i386 ELF section. */ 3677 3678 static bfd_boolean 3679 elf_i386_relocate_section (bfd *output_bfd, 3680 struct bfd_link_info *info, 3681 bfd *input_bfd, 3682 asection *input_section, 3683 bfd_byte *contents, 3684 Elf_Internal_Rela *relocs, 3685 Elf_Internal_Sym *local_syms, 3686 asection **local_sections) 3687 { 3688 struct elf_i386_link_hash_table *htab; 3689 Elf_Internal_Shdr *symtab_hdr; 3690 struct elf_link_hash_entry **sym_hashes; 3691 bfd_vma *local_got_offsets; 3692 bfd_vma *local_tlsdesc_gotents; 3693 Elf_Internal_Rela *rel; 3694 Elf_Internal_Rela *wrel; 3695 Elf_Internal_Rela *relend; 3696 bfd_boolean is_vxworks_tls; 3697 unsigned plt_entry_size; 3698 3699 BFD_ASSERT (is_i386_elf (input_bfd)); 3700 3701 /* Skip if check_relocs failed. */ 3702 if (input_section->check_relocs_failed) 3703 return FALSE; 3704 3705 htab = elf_i386_hash_table (info); 3706 if (htab == NULL) 3707 return FALSE; 3708 symtab_hdr = &elf_symtab_hdr (input_bfd); 3709 sym_hashes = elf_sym_hashes (input_bfd); 3710 local_got_offsets = elf_local_got_offsets (input_bfd); 3711 local_tlsdesc_gotents = elf_i386_local_tlsdesc_gotent (input_bfd); 3712 /* We have to handle relocations in vxworks .tls_vars sections 3713 specially, because the dynamic loader is 'weird'. */ 3714 is_vxworks_tls = (get_elf_i386_backend_data (output_bfd)->is_vxworks 3715 && bfd_link_pic (info) 3716 && !strcmp (input_section->output_section->name, 3717 ".tls_vars")); 3718 3719 elf_i386_set_tls_module_base (info); 3720 3721 plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd); 3722 3723 rel = wrel = relocs; 3724 relend = relocs + input_section->reloc_count; 3725 for (; rel < relend; wrel++, rel++) 3726 { 3727 unsigned int r_type; 3728 reloc_howto_type *howto; 3729 unsigned long r_symndx; 3730 struct elf_link_hash_entry *h; 3731 struct elf_i386_link_hash_entry *eh; 3732 Elf_Internal_Sym *sym; 3733 asection *sec; 3734 bfd_vma off, offplt, plt_offset; 3735 bfd_vma relocation; 3736 bfd_boolean unresolved_reloc; 3737 bfd_reloc_status_type r; 3738 unsigned int indx; 3739 int tls_type; 3740 bfd_vma st_size; 3741 asection *resolved_plt; 3742 bfd_boolean resolved_to_zero; 3743 3744 r_type = ELF32_R_TYPE (rel->r_info); 3745 if (r_type == R_386_GNU_VTINHERIT 3746 || r_type == R_386_GNU_VTENTRY) 3747 { 3748 if (wrel != rel) 3749 *wrel = *rel; 3750 continue; 3751 } 3752 3753 if ((indx = r_type) >= R_386_standard 3754 && ((indx = r_type - R_386_ext_offset) - R_386_standard 3755 >= R_386_ext - R_386_standard) 3756 && ((indx = r_type - R_386_tls_offset) - R_386_ext 3757 >= R_386_ext2 - R_386_ext)) 3758 { 3759 (*_bfd_error_handler) 3760 (_("%B: unrecognized relocation (0x%x) in section `%A'"), 3761 input_bfd, input_section, r_type); 3762 bfd_set_error (bfd_error_bad_value); 3763 return FALSE; 3764 } 3765 howto = elf_howto_table + indx; 3766 3767 r_symndx = ELF32_R_SYM (rel->r_info); 3768 h = NULL; 3769 sym = NULL; 3770 sec = NULL; 3771 unresolved_reloc = FALSE; 3772 if (r_symndx < symtab_hdr->sh_info) 3773 { 3774 sym = local_syms + r_symndx; 3775 sec = local_sections[r_symndx]; 3776 relocation = (sec->output_section->vma 3777 + sec->output_offset 3778 + sym->st_value); 3779 st_size = sym->st_size; 3780 3781 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION 3782 && ((sec->flags & SEC_MERGE) != 0 3783 || (bfd_link_relocatable (info) 3784 && sec->output_offset != 0))) 3785 { 3786 bfd_vma addend; 3787 bfd_byte *where = contents + rel->r_offset; 3788 3789 switch (howto->size) 3790 { 3791 case 0: 3792 addend = bfd_get_8 (input_bfd, where); 3793 if (howto->pc_relative) 3794 { 3795 addend = (addend ^ 0x80) - 0x80; 3796 addend += 1; 3797 } 3798 break; 3799 case 1: 3800 addend = bfd_get_16 (input_bfd, where); 3801 if (howto->pc_relative) 3802 { 3803 addend = (addend ^ 0x8000) - 0x8000; 3804 addend += 2; 3805 } 3806 break; 3807 case 2: 3808 addend = bfd_get_32 (input_bfd, where); 3809 if (howto->pc_relative) 3810 { 3811 addend = (addend ^ 0x80000000) - 0x80000000; 3812 addend += 4; 3813 } 3814 break; 3815 default: 3816 abort (); 3817 } 3818 3819 if (bfd_link_relocatable (info)) 3820 addend += sec->output_offset; 3821 else 3822 { 3823 asection *msec = sec; 3824 addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec, 3825 addend); 3826 addend -= relocation; 3827 addend += msec->output_section->vma + msec->output_offset; 3828 } 3829 3830 switch (howto->size) 3831 { 3832 case 0: 3833 /* FIXME: overflow checks. */ 3834 if (howto->pc_relative) 3835 addend -= 1; 3836 bfd_put_8 (input_bfd, addend, where); 3837 break; 3838 case 1: 3839 if (howto->pc_relative) 3840 addend -= 2; 3841 bfd_put_16 (input_bfd, addend, where); 3842 break; 3843 case 2: 3844 if (howto->pc_relative) 3845 addend -= 4; 3846 bfd_put_32 (input_bfd, addend, where); 3847 break; 3848 } 3849 } 3850 else if (!bfd_link_relocatable (info) 3851 && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC) 3852 { 3853 /* Relocate against local STT_GNU_IFUNC symbol. */ 3854 h = elf_i386_get_local_sym_hash (htab, input_bfd, rel, 3855 FALSE); 3856 if (h == NULL) 3857 abort (); 3858 3859 /* Set STT_GNU_IFUNC symbol value. */ 3860 h->root.u.def.value = sym->st_value; 3861 h->root.u.def.section = sec; 3862 } 3863 } 3864 else 3865 { 3866 bfd_boolean warned ATTRIBUTE_UNUSED; 3867 bfd_boolean ignored ATTRIBUTE_UNUSED; 3868 3869 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel, 3870 r_symndx, symtab_hdr, sym_hashes, 3871 h, sec, relocation, 3872 unresolved_reloc, warned, ignored); 3873 st_size = h->size; 3874 } 3875 3876 if (sec != NULL && discarded_section (sec)) 3877 { 3878 _bfd_clear_contents (howto, input_bfd, input_section, 3879 contents + rel->r_offset); 3880 wrel->r_offset = rel->r_offset; 3881 wrel->r_info = 0; 3882 wrel->r_addend = 0; 3883 3884 /* For ld -r, remove relocations in debug sections against 3885 sections defined in discarded sections. Not done for 3886 eh_frame editing code expects to be present. */ 3887 if (bfd_link_relocatable (info) 3888 && (input_section->flags & SEC_DEBUGGING)) 3889 wrel--; 3890 3891 continue; 3892 } 3893 3894 if (bfd_link_relocatable (info)) 3895 { 3896 if (wrel != rel) 3897 *wrel = *rel; 3898 continue; 3899 } 3900 3901 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle 3902 it here if it is defined in a non-shared object. */ 3903 if (h != NULL 3904 && h->type == STT_GNU_IFUNC 3905 && h->def_regular) 3906 { 3907 asection *plt, *gotplt, *base_got; 3908 bfd_vma plt_index; 3909 const char *name; 3910 3911 if ((input_section->flags & SEC_ALLOC) == 0) 3912 { 3913 /* Dynamic relocs are not propagated for SEC_DEBUGGING 3914 sections because such sections are not SEC_ALLOC and 3915 thus ld.so will not process them. */ 3916 if ((input_section->flags & SEC_DEBUGGING) != 0) 3917 continue; 3918 abort (); 3919 } 3920 3921 /* STT_GNU_IFUNC symbol must go through PLT. */ 3922 if (htab->elf.splt != NULL) 3923 { 3924 plt = htab->elf.splt; 3925 gotplt = htab->elf.sgotplt; 3926 } 3927 else 3928 { 3929 plt = htab->elf.iplt; 3930 gotplt = htab->elf.igotplt; 3931 } 3932 3933 switch (r_type) 3934 { 3935 default: 3936 break; 3937 3938 case R_386_GOT32: 3939 case R_386_GOT32X: 3940 base_got = htab->elf.sgot; 3941 off = h->got.offset; 3942 3943 if (base_got == NULL) 3944 abort (); 3945 3946 if (off == (bfd_vma) -1) 3947 { 3948 /* We can't use h->got.offset here to save state, or 3949 even just remember the offset, as finish_dynamic_symbol 3950 would use that as offset into .got. */ 3951 3952 if (h->plt.offset == (bfd_vma) -1) 3953 abort (); 3954 3955 if (htab->elf.splt != NULL) 3956 { 3957 plt_index = h->plt.offset / plt_entry_size - 1; 3958 off = (plt_index + 3) * 4; 3959 base_got = htab->elf.sgotplt; 3960 } 3961 else 3962 { 3963 plt_index = h->plt.offset / plt_entry_size; 3964 off = plt_index * 4; 3965 base_got = htab->elf.igotplt; 3966 } 3967 3968 if (h->dynindx == -1 3969 || h->forced_local 3970 || info->symbolic) 3971 { 3972 /* This references the local defitionion. We must 3973 initialize this entry in the global offset table. 3974 Since the offset must always be a multiple of 8, 3975 we use the least significant bit to record 3976 whether we have initialized it already. 3977 3978 When doing a dynamic link, we create a .rela.got 3979 relocation entry to initialize the value. This 3980 is done in the finish_dynamic_symbol routine. */ 3981 if ((off & 1) != 0) 3982 off &= ~1; 3983 else 3984 { 3985 bfd_put_32 (output_bfd, relocation, 3986 base_got->contents + off); 3987 h->got.offset |= 1; 3988 } 3989 } 3990 3991 relocation = off; 3992 } 3993 else 3994 relocation = (base_got->output_section->vma 3995 + base_got->output_offset + off 3996 - gotplt->output_section->vma 3997 - gotplt->output_offset); 3998 3999 if ((*(contents + rel->r_offset - 1) & 0xc7) == 0x5) 4000 { 4001 if (bfd_link_pic (info)) 4002 goto disallow_got32; 4003 4004 /* Add the GOT base if there is no base register. */ 4005 relocation += (gotplt->output_section->vma 4006 + gotplt->output_offset); 4007 } 4008 else if (htab->elf.splt == NULL) 4009 { 4010 /* Adjust for static executables. */ 4011 relocation += gotplt->output_offset; 4012 } 4013 4014 goto do_relocation; 4015 } 4016 4017 if (h->plt.offset == (bfd_vma) -1) 4018 { 4019 /* Handle static pointers of STT_GNU_IFUNC symbols. */ 4020 if (r_type == R_386_32 4021 && (input_section->flags & SEC_CODE) == 0) 4022 goto do_ifunc_pointer; 4023 goto bad_ifunc_reloc; 4024 } 4025 4026 relocation = (plt->output_section->vma 4027 + plt->output_offset + h->plt.offset); 4028 4029 switch (r_type) 4030 { 4031 default: 4032 bad_ifunc_reloc: 4033 if (h->root.root.string) 4034 name = h->root.root.string; 4035 else 4036 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, 4037 NULL); 4038 (*_bfd_error_handler) 4039 (_("%B: relocation %s against STT_GNU_IFUNC " 4040 "symbol `%s' isn't supported"), input_bfd, 4041 howto->name, name); 4042 bfd_set_error (bfd_error_bad_value); 4043 return FALSE; 4044 4045 case R_386_32: 4046 /* Generate dynamic relcoation only when there is a 4047 non-GOT reference in a shared object. */ 4048 if ((bfd_link_pic (info) && h->non_got_ref) 4049 || h->plt.offset == (bfd_vma) -1) 4050 { 4051 Elf_Internal_Rela outrel; 4052 asection *sreloc; 4053 bfd_vma offset; 4054 4055 do_ifunc_pointer: 4056 /* Need a dynamic relocation to get the real function 4057 adddress. */ 4058 offset = _bfd_elf_section_offset (output_bfd, 4059 info, 4060 input_section, 4061 rel->r_offset); 4062 if (offset == (bfd_vma) -1 4063 || offset == (bfd_vma) -2) 4064 abort (); 4065 4066 outrel.r_offset = (input_section->output_section->vma 4067 + input_section->output_offset 4068 + offset); 4069 4070 if (h->dynindx == -1 4071 || h->forced_local 4072 || bfd_link_executable (info)) 4073 { 4074 /* This symbol is resolved locally. */ 4075 outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE); 4076 bfd_put_32 (output_bfd, 4077 (h->root.u.def.value 4078 + h->root.u.def.section->output_section->vma 4079 + h->root.u.def.section->output_offset), 4080 contents + offset); 4081 } 4082 else 4083 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type); 4084 4085 /* Dynamic relocations are stored in 4086 1. .rel.ifunc section in PIC object. 4087 2. .rel.got section in dynamic executable. 4088 3. .rel.iplt section in static executable. */ 4089 if (bfd_link_pic (info)) 4090 sreloc = htab->elf.irelifunc; 4091 else if (htab->elf.splt != NULL) 4092 sreloc = htab->elf.srelgot; 4093 else 4094 sreloc = htab->elf.irelplt; 4095 elf_append_rel (output_bfd, sreloc, &outrel); 4096 4097 /* If this reloc is against an external symbol, we 4098 do not want to fiddle with the addend. Otherwise, 4099 we need to include the symbol value so that it 4100 becomes an addend for the dynamic reloc. For an 4101 internal symbol, we have updated addend. */ 4102 continue; 4103 } 4104 /* FALLTHROUGH */ 4105 case R_386_PC32: 4106 case R_386_PLT32: 4107 goto do_relocation; 4108 4109 case R_386_GOTOFF: 4110 relocation -= (gotplt->output_section->vma 4111 + gotplt->output_offset); 4112 goto do_relocation; 4113 } 4114 } 4115 4116 eh = (struct elf_i386_link_hash_entry *) h; 4117 resolved_to_zero = (eh != NULL 4118 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, 4119 eh->has_got_reloc, 4120 eh)); 4121 4122 switch (r_type) 4123 { 4124 case R_386_GOT32X: 4125 /* Avoid optimizing _DYNAMIC since ld.so may use its 4126 link-time address. */ 4127 if (h == htab->elf.hdynamic) 4128 goto r_386_got32; 4129 4130 if (bfd_link_pic (info)) 4131 { 4132 /* It is OK to convert mov to lea and convert indirect 4133 branch to direct branch. It is OK to convert adc, 4134 add, and, cmp, or, sbb, sub, test, xor only when PIC 4135 is false. */ 4136 unsigned int opcode, addend; 4137 addend = bfd_get_32 (input_bfd, contents + rel->r_offset); 4138 if (addend != 0) 4139 goto r_386_got32; 4140 opcode = bfd_get_8 (input_bfd, contents + rel->r_offset - 2); 4141 if (opcode != 0x8b && opcode != 0xff) 4142 goto r_386_got32; 4143 } 4144 4145 /* Resolve "mov GOT[(%reg)], %reg", 4146 "call/jmp *GOT[(%reg)]", "test %reg, foo@GOT[(%reg)]" 4147 and "binop foo@GOT[(%reg)], %reg". */ 4148 if (h == NULL 4149 || (h->plt.offset == (bfd_vma) -1 4150 && h->got.offset == (bfd_vma) -1) 4151 || htab->elf.sgotplt == NULL) 4152 abort (); 4153 4154 offplt = (htab->elf.sgotplt->output_section->vma 4155 + htab->elf.sgotplt->output_offset); 4156 4157 /* It is relative to .got.plt section. */ 4158 if (h->got.offset != (bfd_vma) -1) 4159 /* Use GOT entry. Mask off the least significant bit in 4160 GOT offset which may be set by R_386_GOT32 processing 4161 below. */ 4162 relocation = (htab->elf.sgot->output_section->vma 4163 + htab->elf.sgot->output_offset 4164 + (h->got.offset & ~1) - offplt); 4165 else 4166 /* Use GOTPLT entry. */ 4167 relocation = (h->plt.offset / plt_entry_size - 1 + 3) * 4; 4168 4169 if (!bfd_link_pic (info)) 4170 { 4171 /* If not PIC, add the .got.plt section address for 4172 baseless addressing. */ 4173 unsigned int modrm; 4174 modrm = bfd_get_8 (input_bfd, contents + rel->r_offset - 1); 4175 if ((modrm & 0xc7) == 0x5) 4176 relocation += offplt; 4177 } 4178 4179 unresolved_reloc = FALSE; 4180 break; 4181 4182 case R_386_GOT32: 4183 r_386_got32: 4184 /* Relocation is to the entry for this symbol in the global 4185 offset table. */ 4186 if (htab->elf.sgot == NULL) 4187 abort (); 4188 4189 if (h != NULL) 4190 { 4191 bfd_boolean dyn; 4192 4193 off = h->got.offset; 4194 dyn = htab->elf.dynamic_sections_created; 4195 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 4196 bfd_link_pic (info), 4197 h) 4198 || (bfd_link_pic (info) 4199 && SYMBOL_REFERENCES_LOCAL (info, h)) 4200 || (ELF_ST_VISIBILITY (h->other) 4201 && h->root.type == bfd_link_hash_undefweak)) 4202 { 4203 /* This is actually a static link, or it is a 4204 -Bsymbolic link and the symbol is defined 4205 locally, or the symbol was forced to be local 4206 because of a version file. We must initialize 4207 this entry in the global offset table. Since the 4208 offset must always be a multiple of 4, we use the 4209 least significant bit to record whether we have 4210 initialized it already. 4211 4212 When doing a dynamic link, we create a .rel.got 4213 relocation entry to initialize the value. This 4214 is done in the finish_dynamic_symbol routine. */ 4215 if ((off & 1) != 0) 4216 off &= ~1; 4217 else 4218 { 4219 bfd_put_32 (output_bfd, relocation, 4220 htab->elf.sgot->contents + off); 4221 h->got.offset |= 1; 4222 } 4223 } 4224 else 4225 unresolved_reloc = FALSE; 4226 } 4227 else 4228 { 4229 if (local_got_offsets == NULL) 4230 abort (); 4231 4232 off = local_got_offsets[r_symndx]; 4233 4234 /* The offset must always be a multiple of 4. We use 4235 the least significant bit to record whether we have 4236 already generated the necessary reloc. */ 4237 if ((off & 1) != 0) 4238 off &= ~1; 4239 else 4240 { 4241 bfd_put_32 (output_bfd, relocation, 4242 htab->elf.sgot->contents + off); 4243 4244 if (bfd_link_pic (info)) 4245 { 4246 asection *s; 4247 Elf_Internal_Rela outrel; 4248 4249 s = htab->elf.srelgot; 4250 if (s == NULL) 4251 abort (); 4252 4253 outrel.r_offset = (htab->elf.sgot->output_section->vma 4254 + htab->elf.sgot->output_offset 4255 + off); 4256 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE); 4257 elf_append_rel (output_bfd, s, &outrel); 4258 } 4259 4260 local_got_offsets[r_symndx] |= 1; 4261 } 4262 } 4263 4264 if (off >= (bfd_vma) -2) 4265 abort (); 4266 4267 relocation = (htab->elf.sgot->output_section->vma 4268 + htab->elf.sgot->output_offset + off); 4269 if ((*(contents + rel->r_offset - 1) & 0xc7) == 0x5) 4270 { 4271 if (bfd_link_pic (info)) 4272 { 4273 /* For PIC, disallow R_386_GOT32 without a base 4274 register since we don't know what the GOT base 4275 is. */ 4276 const char *name; 4277 4278 disallow_got32: 4279 if (h == NULL) 4280 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, 4281 NULL); 4282 else 4283 name = h->root.root.string; 4284 4285 (*_bfd_error_handler) 4286 (_("%B: direct GOT relocation %s against `%s' without base register can not be used when making a shared object"), 4287 input_bfd, howto->name, name); 4288 bfd_set_error (bfd_error_bad_value); 4289 return FALSE; 4290 } 4291 } 4292 else 4293 { 4294 /* Subtract the .got.plt section address only with a base 4295 register. */ 4296 relocation -= (htab->elf.sgotplt->output_section->vma 4297 + htab->elf.sgotplt->output_offset); 4298 } 4299 4300 break; 4301 4302 case R_386_GOTOFF: 4303 /* Relocation is relative to the start of the global offset 4304 table. */ 4305 4306 /* Check to make sure it isn't a protected function or data 4307 symbol for shared library since it may not be local when 4308 used as function address or with copy relocation. We also 4309 need to make sure that a symbol is referenced locally. */ 4310 if (!bfd_link_executable (info) && h) 4311 { 4312 if (!h->def_regular) 4313 { 4314 const char *v; 4315 4316 switch (ELF_ST_VISIBILITY (h->other)) 4317 { 4318 case STV_HIDDEN: 4319 v = _("hidden symbol"); 4320 break; 4321 case STV_INTERNAL: 4322 v = _("internal symbol"); 4323 break; 4324 case STV_PROTECTED: 4325 v = _("protected symbol"); 4326 break; 4327 default: 4328 v = _("symbol"); 4329 break; 4330 } 4331 4332 (*_bfd_error_handler) 4333 (_("%B: relocation R_386_GOTOFF against undefined %s `%s' can not be used when making a shared object"), 4334 input_bfd, v, h->root.root.string); 4335 bfd_set_error (bfd_error_bad_value); 4336 return FALSE; 4337 } 4338 else if (!SYMBOL_REFERENCES_LOCAL (info, h) 4339 && (h->type == STT_FUNC 4340 || h->type == STT_OBJECT) 4341 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED) 4342 { 4343 (*_bfd_error_handler) 4344 (_("%B: relocation R_386_GOTOFF against protected %s `%s' can not be used when making a shared object"), 4345 input_bfd, 4346 h->type == STT_FUNC ? "function" : "data", 4347 h->root.root.string); 4348 bfd_set_error (bfd_error_bad_value); 4349 return FALSE; 4350 } 4351 } 4352 4353 /* Note that sgot is not involved in this 4354 calculation. We always want the start of .got.plt. If we 4355 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is 4356 permitted by the ABI, we might have to change this 4357 calculation. */ 4358 relocation -= htab->elf.sgotplt->output_section->vma 4359 + htab->elf.sgotplt->output_offset; 4360 break; 4361 4362 case R_386_GOTPC: 4363 /* Use global offset table as symbol value. */ 4364 relocation = htab->elf.sgotplt->output_section->vma 4365 + htab->elf.sgotplt->output_offset; 4366 unresolved_reloc = FALSE; 4367 break; 4368 4369 case R_386_PLT32: 4370 /* Relocation is to the entry for this symbol in the 4371 procedure linkage table. */ 4372 4373 /* Resolve a PLT32 reloc against a local symbol directly, 4374 without using the procedure linkage table. */ 4375 if (h == NULL) 4376 break; 4377 4378 if ((h->plt.offset == (bfd_vma) -1 4379 && eh->plt_got.offset == (bfd_vma) -1) 4380 || htab->elf.splt == NULL) 4381 { 4382 /* We didn't make a PLT entry for this symbol. This 4383 happens when statically linking PIC code, or when 4384 using -Bsymbolic. */ 4385 break; 4386 } 4387 4388 if (h->plt.offset != (bfd_vma) -1) 4389 { 4390 resolved_plt = htab->elf.splt; 4391 plt_offset = h->plt.offset; 4392 } 4393 else 4394 { 4395 resolved_plt = htab->plt_got; 4396 plt_offset = eh->plt_got.offset; 4397 } 4398 4399 relocation = (resolved_plt->output_section->vma 4400 + resolved_plt->output_offset 4401 + plt_offset); 4402 unresolved_reloc = FALSE; 4403 break; 4404 4405 case R_386_SIZE32: 4406 /* Set to symbol size. */ 4407 relocation = st_size; 4408 /* Fall through. */ 4409 4410 case R_386_32: 4411 case R_386_PC32: 4412 if ((input_section->flags & SEC_ALLOC) == 0 4413 || is_vxworks_tls) 4414 break; 4415 4416 /* Copy dynamic function pointer relocations. Don't generate 4417 dynamic relocations against resolved undefined weak symbols 4418 in PIE, except for R_386_PC32. */ 4419 if ((bfd_link_pic (info) 4420 && (h == NULL 4421 || ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 4422 && (!resolved_to_zero 4423 || r_type == R_386_PC32)) 4424 || h->root.type != bfd_link_hash_undefweak)) 4425 && ((r_type != R_386_PC32 && r_type != R_386_SIZE32) 4426 || !SYMBOL_CALLS_LOCAL (info, h))) 4427 || (ELIMINATE_COPY_RELOCS 4428 && !bfd_link_pic (info) 4429 && h != NULL 4430 && h->dynindx != -1 4431 && (!h->non_got_ref 4432 || eh->func_pointer_refcount > 0 4433 || (h->root.type == bfd_link_hash_undefweak 4434 && !resolved_to_zero)) 4435 && ((h->def_dynamic && !h->def_regular) 4436 /* Undefined weak symbol is bound locally when 4437 PIC is false. */ 4438 || h->root.type == bfd_link_hash_undefweak))) 4439 { 4440 Elf_Internal_Rela outrel; 4441 bfd_boolean skip, relocate; 4442 asection *sreloc; 4443 4444 /* When generating a shared object, these relocations 4445 are copied into the output file to be resolved at run 4446 time. */ 4447 4448 skip = FALSE; 4449 relocate = FALSE; 4450 4451 outrel.r_offset = 4452 _bfd_elf_section_offset (output_bfd, info, input_section, 4453 rel->r_offset); 4454 if (outrel.r_offset == (bfd_vma) -1) 4455 skip = TRUE; 4456 else if (outrel.r_offset == (bfd_vma) -2) 4457 skip = TRUE, relocate = TRUE; 4458 outrel.r_offset += (input_section->output_section->vma 4459 + input_section->output_offset); 4460 4461 if (skip) 4462 memset (&outrel, 0, sizeof outrel); 4463 else if (h != NULL 4464 && h->dynindx != -1 4465 && (r_type == R_386_PC32 4466 || !(bfd_link_executable (info) 4467 || SYMBOLIC_BIND (info, h)) 4468 || !h->def_regular)) 4469 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type); 4470 else 4471 { 4472 /* This symbol is local, or marked to become local. */ 4473 relocate = TRUE; 4474 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE); 4475 } 4476 4477 sreloc = elf_section_data (input_section)->sreloc; 4478 4479 if (sreloc == NULL || sreloc->contents == NULL) 4480 { 4481 r = bfd_reloc_notsupported; 4482 goto check_relocation_error; 4483 } 4484 4485 elf_append_rel (output_bfd, sreloc, &outrel); 4486 4487 /* If this reloc is against an external symbol, we do 4488 not want to fiddle with the addend. Otherwise, we 4489 need to include the symbol value so that it becomes 4490 an addend for the dynamic reloc. */ 4491 if (! relocate) 4492 continue; 4493 } 4494 break; 4495 4496 case R_386_TLS_IE: 4497 if (!bfd_link_executable (info)) 4498 { 4499 Elf_Internal_Rela outrel; 4500 asection *sreloc; 4501 4502 outrel.r_offset = rel->r_offset 4503 + input_section->output_section->vma 4504 + input_section->output_offset; 4505 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE); 4506 sreloc = elf_section_data (input_section)->sreloc; 4507 if (sreloc == NULL) 4508 abort (); 4509 elf_append_rel (output_bfd, sreloc, &outrel); 4510 } 4511 /* Fall through */ 4512 4513 case R_386_TLS_GD: 4514 case R_386_TLS_GOTDESC: 4515 case R_386_TLS_DESC_CALL: 4516 case R_386_TLS_IE_32: 4517 case R_386_TLS_GOTIE: 4518 tls_type = GOT_UNKNOWN; 4519 if (h == NULL && local_got_offsets) 4520 tls_type = elf_i386_local_got_tls_type (input_bfd) [r_symndx]; 4521 else if (h != NULL) 4522 tls_type = elf_i386_hash_entry(h)->tls_type; 4523 if (tls_type == GOT_TLS_IE) 4524 tls_type = GOT_TLS_IE_NEG; 4525 4526 if (! elf_i386_tls_transition (info, input_bfd, 4527 input_section, contents, 4528 symtab_hdr, sym_hashes, 4529 &r_type, tls_type, rel, 4530 relend, h, r_symndx, TRUE)) 4531 return FALSE; 4532 4533 if (r_type == R_386_TLS_LE_32) 4534 { 4535 BFD_ASSERT (! unresolved_reloc); 4536 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD) 4537 { 4538 unsigned int type; 4539 bfd_vma roff; 4540 4541 /* GD->LE transition. */ 4542 type = *(contents + rel->r_offset - 2); 4543 if (type == 0x04) 4544 { 4545 /* Change 4546 leal foo@tlsgd(,%ebx,1), %eax 4547 call ___tls_get_addr@PLT 4548 into: 4549 movl %gs:0, %eax 4550 subl $foo@tpoff, %eax 4551 (6 byte form of subl). */ 4552 roff = rel->r_offset + 5; 4553 } 4554 else 4555 { 4556 /* Change 4557 leal foo@tlsgd(%ebx), %eax 4558 call ___tls_get_addr@PLT 4559 nop 4560 or 4561 leal foo@tlsgd(%reg), %eax 4562 call *___tls_get_addr@GOT(%reg) 4563 which may be converted to 4564 addr32 call ___tls_get_addr 4565 into: 4566 movl %gs:0, %eax; subl $foo@tpoff, %eax 4567 (6 byte form of subl). */ 4568 roff = rel->r_offset + 6; 4569 } 4570 memcpy (contents + roff - 8, 4571 "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12); 4572 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation), 4573 contents + roff); 4574 /* Skip R_386_PC32, R_386_PLT32 and R_386_GOT32X. */ 4575 rel++; 4576 wrel++; 4577 continue; 4578 } 4579 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC) 4580 { 4581 /* GDesc -> LE transition. 4582 It's originally something like: 4583 leal x@tlsdesc(%ebx), %eax 4584 4585 leal x@ntpoff, %eax 4586 4587 Registers other than %eax may be set up here. */ 4588 4589 unsigned int val; 4590 bfd_vma roff; 4591 4592 roff = rel->r_offset; 4593 val = bfd_get_8 (input_bfd, contents + roff - 1); 4594 4595 /* Now modify the instruction as appropriate. */ 4596 /* aoliva FIXME: remove the above and xor the byte 4597 below with 0x86. */ 4598 bfd_put_8 (output_bfd, val ^ 0x86, 4599 contents + roff - 1); 4600 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation), 4601 contents + roff); 4602 continue; 4603 } 4604 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL) 4605 { 4606 /* GDesc -> LE transition. 4607 It's originally: 4608 call *(%eax) 4609 Turn it into: 4610 xchg %ax,%ax */ 4611 4612 bfd_vma roff; 4613 4614 roff = rel->r_offset; 4615 bfd_put_8 (output_bfd, 0x66, contents + roff); 4616 bfd_put_8 (output_bfd, 0x90, contents + roff + 1); 4617 continue; 4618 } 4619 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_IE) 4620 { 4621 unsigned int val; 4622 4623 /* IE->LE transition: 4624 Originally it can be one of: 4625 movl foo, %eax 4626 movl foo, %reg 4627 addl foo, %reg 4628 We change it into: 4629 movl $foo, %eax 4630 movl $foo, %reg 4631 addl $foo, %reg. */ 4632 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1); 4633 if (val == 0xa1) 4634 { 4635 /* movl foo, %eax. */ 4636 bfd_put_8 (output_bfd, 0xb8, 4637 contents + rel->r_offset - 1); 4638 } 4639 else 4640 { 4641 unsigned int type; 4642 4643 type = bfd_get_8 (input_bfd, 4644 contents + rel->r_offset - 2); 4645 switch (type) 4646 { 4647 case 0x8b: 4648 /* movl */ 4649 bfd_put_8 (output_bfd, 0xc7, 4650 contents + rel->r_offset - 2); 4651 bfd_put_8 (output_bfd, 4652 0xc0 | ((val >> 3) & 7), 4653 contents + rel->r_offset - 1); 4654 break; 4655 case 0x03: 4656 /* addl */ 4657 bfd_put_8 (output_bfd, 0x81, 4658 contents + rel->r_offset - 2); 4659 bfd_put_8 (output_bfd, 4660 0xc0 | ((val >> 3) & 7), 4661 contents + rel->r_offset - 1); 4662 break; 4663 default: 4664 BFD_FAIL (); 4665 break; 4666 } 4667 } 4668 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation), 4669 contents + rel->r_offset); 4670 continue; 4671 } 4672 else 4673 { 4674 unsigned int val, type; 4675 4676 /* {IE_32,GOTIE}->LE transition: 4677 Originally it can be one of: 4678 subl foo(%reg1), %reg2 4679 movl foo(%reg1), %reg2 4680 addl foo(%reg1), %reg2 4681 We change it into: 4682 subl $foo, %reg2 4683 movl $foo, %reg2 (6 byte form) 4684 addl $foo, %reg2. */ 4685 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2); 4686 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1); 4687 if (type == 0x8b) 4688 { 4689 /* movl */ 4690 bfd_put_8 (output_bfd, 0xc7, 4691 contents + rel->r_offset - 2); 4692 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7), 4693 contents + rel->r_offset - 1); 4694 } 4695 else if (type == 0x2b) 4696 { 4697 /* subl */ 4698 bfd_put_8 (output_bfd, 0x81, 4699 contents + rel->r_offset - 2); 4700 bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7), 4701 contents + rel->r_offset - 1); 4702 } 4703 else if (type == 0x03) 4704 { 4705 /* addl */ 4706 bfd_put_8 (output_bfd, 0x81, 4707 contents + rel->r_offset - 2); 4708 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7), 4709 contents + rel->r_offset - 1); 4710 } 4711 else 4712 BFD_FAIL (); 4713 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTIE) 4714 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation), 4715 contents + rel->r_offset); 4716 else 4717 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation), 4718 contents + rel->r_offset); 4719 continue; 4720 } 4721 } 4722 4723 if (htab->elf.sgot == NULL) 4724 abort (); 4725 4726 if (h != NULL) 4727 { 4728 off = h->got.offset; 4729 offplt = elf_i386_hash_entry (h)->tlsdesc_got; 4730 } 4731 else 4732 { 4733 if (local_got_offsets == NULL) 4734 abort (); 4735 4736 off = local_got_offsets[r_symndx]; 4737 offplt = local_tlsdesc_gotents[r_symndx]; 4738 } 4739 4740 if ((off & 1) != 0) 4741 off &= ~1; 4742 else 4743 { 4744 Elf_Internal_Rela outrel; 4745 int dr_type; 4746 asection *sreloc; 4747 4748 if (htab->elf.srelgot == NULL) 4749 abort (); 4750 4751 indx = h && h->dynindx != -1 ? h->dynindx : 0; 4752 4753 if (GOT_TLS_GDESC_P (tls_type)) 4754 { 4755 bfd_byte *loc; 4756 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC); 4757 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8 4758 <= htab->elf.sgotplt->size); 4759 outrel.r_offset = (htab->elf.sgotplt->output_section->vma 4760 + htab->elf.sgotplt->output_offset 4761 + offplt 4762 + htab->sgotplt_jump_table_size); 4763 sreloc = htab->elf.srelplt; 4764 loc = sreloc->contents; 4765 loc += (htab->next_tls_desc_index++ 4766 * sizeof (Elf32_External_Rel)); 4767 BFD_ASSERT (loc + sizeof (Elf32_External_Rel) 4768 <= sreloc->contents + sreloc->size); 4769 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc); 4770 if (indx == 0) 4771 { 4772 BFD_ASSERT (! unresolved_reloc); 4773 bfd_put_32 (output_bfd, 4774 relocation - elf_i386_dtpoff_base (info), 4775 htab->elf.sgotplt->contents + offplt 4776 + htab->sgotplt_jump_table_size + 4); 4777 } 4778 else 4779 { 4780 bfd_put_32 (output_bfd, 0, 4781 htab->elf.sgotplt->contents + offplt 4782 + htab->sgotplt_jump_table_size + 4); 4783 } 4784 } 4785 4786 sreloc = htab->elf.srelgot; 4787 4788 outrel.r_offset = (htab->elf.sgot->output_section->vma 4789 + htab->elf.sgot->output_offset + off); 4790 4791 if (GOT_TLS_GD_P (tls_type)) 4792 dr_type = R_386_TLS_DTPMOD32; 4793 else if (GOT_TLS_GDESC_P (tls_type)) 4794 goto dr_done; 4795 else if (tls_type == GOT_TLS_IE_POS) 4796 dr_type = R_386_TLS_TPOFF; 4797 else 4798 dr_type = R_386_TLS_TPOFF32; 4799 4800 if (dr_type == R_386_TLS_TPOFF && indx == 0) 4801 bfd_put_32 (output_bfd, 4802 relocation - elf_i386_dtpoff_base (info), 4803 htab->elf.sgot->contents + off); 4804 else if (dr_type == R_386_TLS_TPOFF32 && indx == 0) 4805 bfd_put_32 (output_bfd, 4806 elf_i386_dtpoff_base (info) - relocation, 4807 htab->elf.sgot->contents + off); 4808 else if (dr_type != R_386_TLS_DESC) 4809 bfd_put_32 (output_bfd, 0, 4810 htab->elf.sgot->contents + off); 4811 outrel.r_info = ELF32_R_INFO (indx, dr_type); 4812 4813 elf_append_rel (output_bfd, sreloc, &outrel); 4814 4815 if (GOT_TLS_GD_P (tls_type)) 4816 { 4817 if (indx == 0) 4818 { 4819 BFD_ASSERT (! unresolved_reloc); 4820 bfd_put_32 (output_bfd, 4821 relocation - elf_i386_dtpoff_base (info), 4822 htab->elf.sgot->contents + off + 4); 4823 } 4824 else 4825 { 4826 bfd_put_32 (output_bfd, 0, 4827 htab->elf.sgot->contents + off + 4); 4828 outrel.r_info = ELF32_R_INFO (indx, 4829 R_386_TLS_DTPOFF32); 4830 outrel.r_offset += 4; 4831 elf_append_rel (output_bfd, sreloc, &outrel); 4832 } 4833 } 4834 else if (tls_type == GOT_TLS_IE_BOTH) 4835 { 4836 bfd_put_32 (output_bfd, 4837 (indx == 0 4838 ? relocation - elf_i386_dtpoff_base (info) 4839 : 0), 4840 htab->elf.sgot->contents + off + 4); 4841 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF); 4842 outrel.r_offset += 4; 4843 elf_append_rel (output_bfd, sreloc, &outrel); 4844 } 4845 4846 dr_done: 4847 if (h != NULL) 4848 h->got.offset |= 1; 4849 else 4850 local_got_offsets[r_symndx] |= 1; 4851 } 4852 4853 if (off >= (bfd_vma) -2 4854 && ! GOT_TLS_GDESC_P (tls_type)) 4855 abort (); 4856 if (r_type == R_386_TLS_GOTDESC 4857 || r_type == R_386_TLS_DESC_CALL) 4858 { 4859 relocation = htab->sgotplt_jump_table_size + offplt; 4860 unresolved_reloc = FALSE; 4861 } 4862 else if (r_type == ELF32_R_TYPE (rel->r_info)) 4863 { 4864 bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma 4865 + htab->elf.sgotplt->output_offset; 4866 relocation = htab->elf.sgot->output_section->vma 4867 + htab->elf.sgot->output_offset + off - g_o_t; 4868 if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE) 4869 && tls_type == GOT_TLS_IE_BOTH) 4870 relocation += 4; 4871 if (r_type == R_386_TLS_IE) 4872 relocation += g_o_t; 4873 unresolved_reloc = FALSE; 4874 } 4875 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD) 4876 { 4877 unsigned int val, type; 4878 bfd_vma roff; 4879 4880 /* GD->IE transition. */ 4881 type = *(contents + rel->r_offset - 2); 4882 val = *(contents + rel->r_offset - 1); 4883 if (type == 0x04) 4884 { 4885 /* Change 4886 leal foo@tlsgd(,%ebx,1), %eax 4887 call ___tls_get_addr@PLT 4888 into: 4889 movl %gs:0, %eax 4890 subl $foo@gottpoff(%ebx), %eax. */ 4891 val >>= 3; 4892 roff = rel->r_offset - 3; 4893 } 4894 else 4895 { 4896 /* Change 4897 leal foo@tlsgd(%ebx), %eax 4898 call ___tls_get_addr@PLT 4899 nop 4900 or 4901 leal foo@tlsgd(%reg), %eax 4902 call *___tls_get_addr@GOT(%reg) 4903 which may be converted to 4904 addr32 call ___tls_get_addr 4905 into: 4906 movl %gs:0, %eax; 4907 subl $foo@gottpoff(%reg), %eax. */ 4908 roff = rel->r_offset - 2; 4909 } 4910 memcpy (contents + roff, 4911 "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12); 4912 contents[roff + 7] = 0x80 | (val & 7); 4913 /* If foo is used only with foo@gotntpoff(%reg) and 4914 foo@indntpoff, but not with foo@gottpoff(%reg), change 4915 subl $foo@gottpoff(%reg), %eax 4916 into: 4917 addl $foo@gotntpoff(%reg), %eax. */ 4918 if (tls_type == GOT_TLS_IE_POS) 4919 contents[roff + 6] = 0x03; 4920 bfd_put_32 (output_bfd, 4921 htab->elf.sgot->output_section->vma 4922 + htab->elf.sgot->output_offset + off 4923 - htab->elf.sgotplt->output_section->vma 4924 - htab->elf.sgotplt->output_offset, 4925 contents + roff + 8); 4926 /* Skip R_386_PLT32 and R_386_GOT32X. */ 4927 rel++; 4928 wrel++; 4929 continue; 4930 } 4931 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC) 4932 { 4933 /* GDesc -> IE transition. 4934 It's originally something like: 4935 leal x@tlsdesc(%ebx), %eax 4936 4937 Change it to: 4938 movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax 4939 or: 4940 movl x@gottpoff(%ebx), %eax # before negl %eax 4941 4942 Registers other than %eax may be set up here. */ 4943 4944 bfd_vma roff; 4945 4946 /* First, make sure it's a leal adding ebx to a 32-bit 4947 offset into any register, although it's probably 4948 almost always going to be eax. */ 4949 roff = rel->r_offset; 4950 4951 /* Now modify the instruction as appropriate. */ 4952 /* To turn a leal into a movl in the form we use it, it 4953 suffices to change the first byte from 0x8d to 0x8b. 4954 aoliva FIXME: should we decide to keep the leal, all 4955 we have to do is remove the statement below, and 4956 adjust the relaxation of R_386_TLS_DESC_CALL. */ 4957 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2); 4958 4959 if (tls_type == GOT_TLS_IE_BOTH) 4960 off += 4; 4961 4962 bfd_put_32 (output_bfd, 4963 htab->elf.sgot->output_section->vma 4964 + htab->elf.sgot->output_offset + off 4965 - htab->elf.sgotplt->output_section->vma 4966 - htab->elf.sgotplt->output_offset, 4967 contents + roff); 4968 continue; 4969 } 4970 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL) 4971 { 4972 /* GDesc -> IE transition. 4973 It's originally: 4974 call *(%eax) 4975 4976 Change it to: 4977 xchg %ax,%ax 4978 or 4979 negl %eax 4980 depending on how we transformed the TLS_GOTDESC above. 4981 */ 4982 4983 bfd_vma roff; 4984 4985 roff = rel->r_offset; 4986 4987 /* Now modify the instruction as appropriate. */ 4988 if (tls_type != GOT_TLS_IE_NEG) 4989 { 4990 /* xchg %ax,%ax */ 4991 bfd_put_8 (output_bfd, 0x66, contents + roff); 4992 bfd_put_8 (output_bfd, 0x90, contents + roff + 1); 4993 } 4994 else 4995 { 4996 /* negl %eax */ 4997 bfd_put_8 (output_bfd, 0xf7, contents + roff); 4998 bfd_put_8 (output_bfd, 0xd8, contents + roff + 1); 4999 } 5000 5001 continue; 5002 } 5003 else 5004 BFD_ASSERT (FALSE); 5005 break; 5006 5007 case R_386_TLS_LDM: 5008 if (! elf_i386_tls_transition (info, input_bfd, 5009 input_section, contents, 5010 symtab_hdr, sym_hashes, 5011 &r_type, GOT_UNKNOWN, rel, 5012 relend, h, r_symndx, TRUE)) 5013 return FALSE; 5014 5015 if (r_type != R_386_TLS_LDM) 5016 { 5017 /* LD->LE transition. Change 5018 leal foo@tlsldm(%ebx) %eax 5019 call ___tls_get_addr@PLT 5020 into: 5021 movl %gs:0, %eax 5022 nop 5023 leal 0(%esi,1), %esi 5024 or change 5025 leal foo@tlsldm(%reg) %eax 5026 call *___tls_get_addr@GOT(%reg) 5027 which may be converted to 5028 addr32 call ___tls_get_addr 5029 into: 5030 movl %gs:0, %eax 5031 leal 0(%esi), %esi */ 5032 BFD_ASSERT (r_type == R_386_TLS_LE_32); 5033 if (*(contents + rel->r_offset + 4) == 0xff 5034 || *(contents + rel->r_offset + 4) == 0x67) 5035 memcpy (contents + rel->r_offset - 2, 5036 "\x65\xa1\0\0\0\0\x8d\xb6\0\0\0", 12); 5037 else 5038 memcpy (contents + rel->r_offset - 2, 5039 "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11); 5040 /* Skip R_386_PC32/R_386_PLT32. */ 5041 rel++; 5042 wrel++; 5043 continue; 5044 } 5045 5046 if (htab->elf.sgot == NULL) 5047 abort (); 5048 5049 off = htab->tls_ldm_got.offset; 5050 if (off & 1) 5051 off &= ~1; 5052 else 5053 { 5054 Elf_Internal_Rela outrel; 5055 5056 if (htab->elf.srelgot == NULL) 5057 abort (); 5058 5059 outrel.r_offset = (htab->elf.sgot->output_section->vma 5060 + htab->elf.sgot->output_offset + off); 5061 5062 bfd_put_32 (output_bfd, 0, 5063 htab->elf.sgot->contents + off); 5064 bfd_put_32 (output_bfd, 0, 5065 htab->elf.sgot->contents + off + 4); 5066 outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32); 5067 elf_append_rel (output_bfd, htab->elf.srelgot, &outrel); 5068 htab->tls_ldm_got.offset |= 1; 5069 } 5070 relocation = htab->elf.sgot->output_section->vma 5071 + htab->elf.sgot->output_offset + off 5072 - htab->elf.sgotplt->output_section->vma 5073 - htab->elf.sgotplt->output_offset; 5074 unresolved_reloc = FALSE; 5075 break; 5076 5077 case R_386_TLS_LDO_32: 5078 if (!bfd_link_executable (info) 5079 || (input_section->flags & SEC_CODE) == 0) 5080 relocation -= elf_i386_dtpoff_base (info); 5081 else 5082 /* When converting LDO to LE, we must negate. */ 5083 relocation = -elf_i386_tpoff (info, relocation); 5084 break; 5085 5086 case R_386_TLS_LE_32: 5087 case R_386_TLS_LE: 5088 if (!bfd_link_executable (info)) 5089 { 5090 Elf_Internal_Rela outrel; 5091 asection *sreloc; 5092 5093 outrel.r_offset = rel->r_offset 5094 + input_section->output_section->vma 5095 + input_section->output_offset; 5096 if (h != NULL && h->dynindx != -1) 5097 indx = h->dynindx; 5098 else 5099 indx = 0; 5100 if (r_type == R_386_TLS_LE_32) 5101 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32); 5102 else 5103 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF); 5104 sreloc = elf_section_data (input_section)->sreloc; 5105 if (sreloc == NULL) 5106 abort (); 5107 elf_append_rel (output_bfd, sreloc, &outrel); 5108 if (indx) 5109 continue; 5110 else if (r_type == R_386_TLS_LE_32) 5111 relocation = elf_i386_dtpoff_base (info) - relocation; 5112 else 5113 relocation -= elf_i386_dtpoff_base (info); 5114 } 5115 else if (r_type == R_386_TLS_LE_32) 5116 relocation = elf_i386_tpoff (info, relocation); 5117 else 5118 relocation = -elf_i386_tpoff (info, relocation); 5119 break; 5120 5121 default: 5122 break; 5123 } 5124 5125 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections 5126 because such sections are not SEC_ALLOC and thus ld.so will 5127 not process them. */ 5128 if (unresolved_reloc 5129 && !((input_section->flags & SEC_DEBUGGING) != 0 5130 && h->def_dynamic) 5131 && _bfd_elf_section_offset (output_bfd, info, input_section, 5132 rel->r_offset) != (bfd_vma) -1) 5133 { 5134 (*_bfd_error_handler) 5135 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"), 5136 input_bfd, 5137 input_section, 5138 (long) rel->r_offset, 5139 howto->name, 5140 h->root.root.string); 5141 return FALSE; 5142 } 5143 5144 do_relocation: 5145 r = _bfd_final_link_relocate (howto, input_bfd, input_section, 5146 contents, rel->r_offset, 5147 relocation, 0); 5148 5149 check_relocation_error: 5150 if (r != bfd_reloc_ok) 5151 { 5152 const char *name; 5153 5154 if (h != NULL) 5155 name = h->root.root.string; 5156 else 5157 { 5158 name = bfd_elf_string_from_elf_section (input_bfd, 5159 symtab_hdr->sh_link, 5160 sym->st_name); 5161 if (name == NULL) 5162 return FALSE; 5163 if (*name == '\0') 5164 name = bfd_section_name (input_bfd, sec); 5165 } 5166 5167 if (r == bfd_reloc_overflow) 5168 (*info->callbacks->reloc_overflow) 5169 (info, (h ? &h->root : NULL), name, howto->name, 5170 (bfd_vma) 0, input_bfd, input_section, rel->r_offset); 5171 else 5172 { 5173 (*_bfd_error_handler) 5174 (_("%B(%A+0x%lx): reloc against `%s': error %d"), 5175 input_bfd, input_section, 5176 (long) rel->r_offset, name, (int) r); 5177 return FALSE; 5178 } 5179 } 5180 5181 if (wrel != rel) 5182 *wrel = *rel; 5183 } 5184 5185 if (wrel != rel) 5186 { 5187 Elf_Internal_Shdr *rel_hdr; 5188 size_t deleted = rel - wrel; 5189 5190 rel_hdr = _bfd_elf_single_rel_hdr (input_section->output_section); 5191 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted; 5192 if (rel_hdr->sh_size == 0) 5193 { 5194 /* It is too late to remove an empty reloc section. Leave 5195 one NONE reloc. 5196 ??? What is wrong with an empty section??? */ 5197 rel_hdr->sh_size = rel_hdr->sh_entsize; 5198 deleted -= 1; 5199 } 5200 rel_hdr = _bfd_elf_single_rel_hdr (input_section); 5201 rel_hdr->sh_size -= rel_hdr->sh_entsize * deleted; 5202 input_section->reloc_count -= deleted; 5203 } 5204 5205 return TRUE; 5206 } 5207 5208 /* Finish up dynamic symbol handling. We set the contents of various 5209 dynamic sections here. */ 5210 5211 static bfd_boolean 5212 elf_i386_finish_dynamic_symbol (bfd *output_bfd, 5213 struct bfd_link_info *info, 5214 struct elf_link_hash_entry *h, 5215 Elf_Internal_Sym *sym) 5216 { 5217 struct elf_i386_link_hash_table *htab; 5218 unsigned plt_entry_size; 5219 const struct elf_i386_backend_data *abed; 5220 struct elf_i386_link_hash_entry *eh; 5221 bfd_boolean local_undefweak; 5222 5223 htab = elf_i386_hash_table (info); 5224 if (htab == NULL) 5225 return FALSE; 5226 5227 abed = get_elf_i386_backend_data (output_bfd); 5228 plt_entry_size = GET_PLT_ENTRY_SIZE (output_bfd); 5229 5230 eh = (struct elf_i386_link_hash_entry *) h; 5231 5232 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for 5233 resolved undefined weak symbols in executable so that their 5234 references have value 0 at run-time. */ 5235 local_undefweak = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, 5236 eh->has_got_reloc, 5237 eh); 5238 5239 if (h->plt.offset != (bfd_vma) -1) 5240 { 5241 bfd_vma plt_index; 5242 bfd_vma got_offset; 5243 Elf_Internal_Rela rel; 5244 bfd_byte *loc; 5245 asection *plt, *gotplt, *relplt; 5246 5247 /* When building a static executable, use .iplt, .igot.plt and 5248 .rel.iplt sections for STT_GNU_IFUNC symbols. */ 5249 if (htab->elf.splt != NULL) 5250 { 5251 plt = htab->elf.splt; 5252 gotplt = htab->elf.sgotplt; 5253 relplt = htab->elf.srelplt; 5254 } 5255 else 5256 { 5257 plt = htab->elf.iplt; 5258 gotplt = htab->elf.igotplt; 5259 relplt = htab->elf.irelplt; 5260 } 5261 5262 /* This symbol has an entry in the procedure linkage table. Set 5263 it up. */ 5264 5265 if ((h->dynindx == -1 5266 && !local_undefweak 5267 && !((h->forced_local || bfd_link_executable (info)) 5268 && h->def_regular 5269 && h->type == STT_GNU_IFUNC)) 5270 || plt == NULL 5271 || gotplt == NULL 5272 || relplt == NULL) 5273 abort (); 5274 5275 /* Get the index in the procedure linkage table which 5276 corresponds to this symbol. This is the index of this symbol 5277 in all the symbols for which we are making plt entries. The 5278 first entry in the procedure linkage table is reserved. 5279 5280 Get the offset into the .got table of the entry that 5281 corresponds to this function. Each .got entry is 4 bytes. 5282 The first three are reserved. 5283 5284 For static executables, we don't reserve anything. */ 5285 5286 if (plt == htab->elf.splt) 5287 { 5288 got_offset = h->plt.offset / plt_entry_size - 1; 5289 got_offset = (got_offset + 3) * 4; 5290 } 5291 else 5292 { 5293 got_offset = h->plt.offset / plt_entry_size; 5294 got_offset = got_offset * 4; 5295 } 5296 5297 /* Fill in the entry in the procedure linkage table. */ 5298 if (! bfd_link_pic (info)) 5299 { 5300 memcpy (plt->contents + h->plt.offset, abed->plt->plt_entry, 5301 abed->plt->plt_entry_size); 5302 bfd_put_32 (output_bfd, 5303 (gotplt->output_section->vma 5304 + gotplt->output_offset 5305 + got_offset), 5306 plt->contents + h->plt.offset 5307 + abed->plt->plt_got_offset); 5308 5309 if (abed->is_vxworks) 5310 { 5311 int s, k, reloc_index; 5312 5313 /* Create the R_386_32 relocation referencing the GOT 5314 for this PLT entry. */ 5315 5316 /* S: Current slot number (zero-based). */ 5317 s = ((h->plt.offset - abed->plt->plt_entry_size) 5318 / abed->plt->plt_entry_size); 5319 /* K: Number of relocations for PLTResolve. */ 5320 if (bfd_link_pic (info)) 5321 k = PLTRESOLVE_RELOCS_SHLIB; 5322 else 5323 k = PLTRESOLVE_RELOCS; 5324 /* Skip the PLTresolve relocations, and the relocations for 5325 the other PLT slots. */ 5326 reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS; 5327 loc = (htab->srelplt2->contents + reloc_index 5328 * sizeof (Elf32_External_Rel)); 5329 5330 rel.r_offset = (htab->elf.splt->output_section->vma 5331 + htab->elf.splt->output_offset 5332 + h->plt.offset + 2), 5333 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32); 5334 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc); 5335 5336 /* Create the R_386_32 relocation referencing the beginning of 5337 the PLT for this GOT entry. */ 5338 rel.r_offset = (htab->elf.sgotplt->output_section->vma 5339 + htab->elf.sgotplt->output_offset 5340 + got_offset); 5341 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32); 5342 bfd_elf32_swap_reloc_out (output_bfd, &rel, 5343 loc + sizeof (Elf32_External_Rel)); 5344 } 5345 } 5346 else 5347 { 5348 memcpy (plt->contents + h->plt.offset, abed->plt->pic_plt_entry, 5349 abed->plt->plt_entry_size); 5350 bfd_put_32 (output_bfd, got_offset, 5351 plt->contents + h->plt.offset 5352 + abed->plt->plt_got_offset); 5353 } 5354 5355 /* Fill in the entry in the global offset table. Leave the entry 5356 as zero for undefined weak symbol in PIE. No PLT relocation 5357 against undefined weak symbol in PIE. */ 5358 if (!local_undefweak) 5359 { 5360 bfd_put_32 (output_bfd, 5361 (plt->output_section->vma 5362 + plt->output_offset 5363 + h->plt.offset 5364 + abed->plt->plt_lazy_offset), 5365 gotplt->contents + got_offset); 5366 5367 /* Fill in the entry in the .rel.plt section. */ 5368 rel.r_offset = (gotplt->output_section->vma 5369 + gotplt->output_offset 5370 + got_offset); 5371 if (h->dynindx == -1 5372 || ((bfd_link_executable (info) 5373 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT) 5374 && h->def_regular 5375 && h->type == STT_GNU_IFUNC)) 5376 { 5377 /* If an STT_GNU_IFUNC symbol is locally defined, generate 5378 R_386_IRELATIVE instead of R_386_JUMP_SLOT. Store addend 5379 in the .got.plt section. */ 5380 bfd_put_32 (output_bfd, 5381 (h->root.u.def.value 5382 + h->root.u.def.section->output_section->vma 5383 + h->root.u.def.section->output_offset), 5384 gotplt->contents + got_offset); 5385 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE); 5386 /* R_386_IRELATIVE comes last. */ 5387 plt_index = htab->next_irelative_index--; 5388 } 5389 else 5390 { 5391 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT); 5392 plt_index = htab->next_jump_slot_index++; 5393 } 5394 5395 loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel); 5396 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc); 5397 5398 /* Don't fill PLT entry for static executables. */ 5399 if (plt == htab->elf.splt) 5400 { 5401 bfd_put_32 (output_bfd, 5402 plt_index * sizeof (Elf32_External_Rel), 5403 plt->contents + h->plt.offset 5404 + abed->plt->plt_reloc_offset); 5405 bfd_put_32 (output_bfd, - (h->plt.offset 5406 + abed->plt->plt_plt_offset + 4), 5407 plt->contents + h->plt.offset 5408 + abed->plt->plt_plt_offset); 5409 } 5410 } 5411 } 5412 else if (eh->plt_got.offset != (bfd_vma) -1) 5413 { 5414 bfd_vma got_offset, plt_offset; 5415 asection *plt, *got, *gotplt; 5416 const bfd_byte *got_plt_entry; 5417 5418 /* Offset of displacement of the indirect jump. */ 5419 bfd_vma plt_got_offset = 2; 5420 5421 /* Set the entry in the GOT procedure linkage table. */ 5422 plt = htab->plt_got; 5423 got = htab->elf.sgot; 5424 gotplt = htab->elf.sgotplt; 5425 got_offset = h->got.offset; 5426 5427 if (got_offset == (bfd_vma) -1 5428 || plt == NULL 5429 || got == NULL 5430 || gotplt == NULL) 5431 abort (); 5432 5433 /* Fill in the entry in the GOT procedure linkage table. */ 5434 if (! bfd_link_pic (info)) 5435 { 5436 got_plt_entry = elf_i386_got_plt_entry; 5437 got_offset += got->output_section->vma + got->output_offset; 5438 } 5439 else 5440 { 5441 got_plt_entry = elf_i386_pic_got_plt_entry; 5442 got_offset += (got->output_section->vma 5443 + got->output_offset 5444 - gotplt->output_section->vma 5445 - gotplt->output_offset); 5446 } 5447 5448 plt_offset = eh->plt_got.offset; 5449 memcpy (plt->contents + plt_offset, got_plt_entry, 5450 sizeof (elf_i386_got_plt_entry)); 5451 bfd_put_32 (output_bfd, got_offset, 5452 plt->contents + plt_offset + plt_got_offset); 5453 } 5454 5455 if (!local_undefweak 5456 && !h->def_regular 5457 && (h->plt.offset != (bfd_vma) -1 5458 || eh->plt_got.offset != (bfd_vma) -1)) 5459 { 5460 /* Mark the symbol as undefined, rather than as defined in 5461 the .plt section. Leave the value if there were any 5462 relocations where pointer equality matters (this is a clue 5463 for the dynamic linker, to make function pointer 5464 comparisons work between an application and shared 5465 library), otherwise set it to zero. If a function is only 5466 called from a binary, there is no need to slow down 5467 shared libraries because of that. */ 5468 sym->st_shndx = SHN_UNDEF; 5469 if (!h->pointer_equality_needed) 5470 sym->st_value = 0; 5471 } 5472 5473 /* Don't generate dynamic GOT relocation against undefined weak 5474 symbol in executable. */ 5475 if (h->got.offset != (bfd_vma) -1 5476 && ! GOT_TLS_GD_ANY_P (elf_i386_hash_entry(h)->tls_type) 5477 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE) == 0 5478 && !local_undefweak) 5479 { 5480 Elf_Internal_Rela rel; 5481 asection *relgot = htab->elf.srelgot; 5482 5483 /* This symbol has an entry in the global offset table. Set it 5484 up. */ 5485 5486 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL) 5487 abort (); 5488 5489 rel.r_offset = (htab->elf.sgot->output_section->vma 5490 + htab->elf.sgot->output_offset 5491 + (h->got.offset & ~(bfd_vma) 1)); 5492 5493 /* If this is a static link, or it is a -Bsymbolic link and the 5494 symbol is defined locally or was forced to be local because 5495 of a version file, we just want to emit a RELATIVE reloc. 5496 The entry in the global offset table will already have been 5497 initialized in the relocate_section function. */ 5498 if (h->def_regular 5499 && h->type == STT_GNU_IFUNC) 5500 { 5501 if (h->plt.offset == (bfd_vma) -1) 5502 { 5503 /* STT_GNU_IFUNC is referenced without PLT. */ 5504 if (htab->elf.splt == NULL) 5505 { 5506 /* use .rel[a].iplt section to store .got relocations 5507 in static executable. */ 5508 relgot = htab->elf.irelplt; 5509 } 5510 if (SYMBOL_REFERENCES_LOCAL (info, h)) 5511 { 5512 bfd_put_32 (output_bfd, 5513 (h->root.u.def.value 5514 + h->root.u.def.section->output_section->vma 5515 + h->root.u.def.section->output_offset), 5516 htab->elf.sgot->contents + h->got.offset); 5517 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE); 5518 } 5519 else 5520 goto do_glob_dat; 5521 } 5522 else if (bfd_link_pic (info)) 5523 { 5524 /* Generate R_386_GLOB_DAT. */ 5525 goto do_glob_dat; 5526 } 5527 else 5528 { 5529 asection *plt; 5530 5531 if (!h->pointer_equality_needed) 5532 abort (); 5533 5534 /* For non-shared object, we can't use .got.plt, which 5535 contains the real function addres if we need pointer 5536 equality. We load the GOT entry with the PLT entry. */ 5537 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt; 5538 bfd_put_32 (output_bfd, 5539 (plt->output_section->vma 5540 + plt->output_offset + h->plt.offset), 5541 htab->elf.sgot->contents + h->got.offset); 5542 return TRUE; 5543 } 5544 } 5545 else if (bfd_link_pic (info) 5546 && SYMBOL_REFERENCES_LOCAL (info, h)) 5547 { 5548 BFD_ASSERT((h->got.offset & 1) != 0); 5549 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE); 5550 } 5551 else 5552 { 5553 BFD_ASSERT((h->got.offset & 1) == 0); 5554 do_glob_dat: 5555 bfd_put_32 (output_bfd, (bfd_vma) 0, 5556 htab->elf.sgot->contents + h->got.offset); 5557 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT); 5558 } 5559 5560 elf_append_rel (output_bfd, relgot, &rel); 5561 } 5562 5563 if (h->needs_copy) 5564 { 5565 Elf_Internal_Rela rel; 5566 5567 /* This symbol needs a copy reloc. Set it up. */ 5568 5569 if (h->dynindx == -1 5570 || (h->root.type != bfd_link_hash_defined 5571 && h->root.type != bfd_link_hash_defweak) 5572 || htab->srelbss == NULL) 5573 abort (); 5574 5575 rel.r_offset = (h->root.u.def.value 5576 + h->root.u.def.section->output_section->vma 5577 + h->root.u.def.section->output_offset); 5578 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY); 5579 elf_append_rel (output_bfd, htab->srelbss, &rel); 5580 } 5581 5582 return TRUE; 5583 } 5584 5585 /* Finish up local dynamic symbol handling. We set the contents of 5586 various dynamic sections here. */ 5587 5588 static bfd_boolean 5589 elf_i386_finish_local_dynamic_symbol (void **slot, void *inf) 5590 { 5591 struct elf_link_hash_entry *h 5592 = (struct elf_link_hash_entry *) *slot; 5593 struct bfd_link_info *info 5594 = (struct bfd_link_info *) inf; 5595 5596 return elf_i386_finish_dynamic_symbol (info->output_bfd, info, 5597 h, NULL); 5598 } 5599 5600 /* Finish up undefined weak symbol handling in PIE. Fill its PLT entry 5601 here since undefined weak symbol may not be dynamic and may not be 5602 called for elf_i386_finish_dynamic_symbol. */ 5603 5604 static bfd_boolean 5605 elf_i386_pie_finish_undefweak_symbol (struct bfd_hash_entry *bh, 5606 void *inf) 5607 { 5608 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh; 5609 struct bfd_link_info *info = (struct bfd_link_info *) inf; 5610 5611 if (h->root.type != bfd_link_hash_undefweak 5612 || h->dynindx != -1) 5613 return TRUE; 5614 5615 return elf_i386_finish_dynamic_symbol (info->output_bfd, 5616 info, h, NULL); 5617 } 5618 5619 /* Used to decide how to sort relocs in an optimal manner for the 5620 dynamic linker, before writing them out. */ 5621 5622 static enum elf_reloc_type_class 5623 elf_i386_reloc_type_class (const struct bfd_link_info *info, 5624 const asection *rel_sec ATTRIBUTE_UNUSED, 5625 const Elf_Internal_Rela *rela) 5626 { 5627 bfd *abfd = info->output_bfd; 5628 const struct elf_backend_data *bed = get_elf_backend_data (abfd); 5629 struct elf_link_hash_table *htab = elf_hash_table (info); 5630 5631 if (htab->dynsym != NULL 5632 && htab->dynsym->contents != NULL) 5633 { 5634 /* Check relocation against STT_GNU_IFUNC symbol if there are 5635 dynamic symbols. */ 5636 unsigned long r_symndx = ELF32_R_SYM (rela->r_info); 5637 if (r_symndx != STN_UNDEF) 5638 { 5639 Elf_Internal_Sym sym; 5640 if (!bed->s->swap_symbol_in (abfd, 5641 (htab->dynsym->contents 5642 + r_symndx * sizeof (Elf32_External_Sym)), 5643 0, &sym)) 5644 abort (); 5645 5646 if (ELF32_ST_TYPE (sym.st_info) == STT_GNU_IFUNC) 5647 return reloc_class_ifunc; 5648 } 5649 } 5650 5651 switch (ELF32_R_TYPE (rela->r_info)) 5652 { 5653 case R_386_IRELATIVE: 5654 return reloc_class_ifunc; 5655 case R_386_RELATIVE: 5656 return reloc_class_relative; 5657 case R_386_JUMP_SLOT: 5658 return reloc_class_plt; 5659 case R_386_COPY: 5660 return reloc_class_copy; 5661 default: 5662 return reloc_class_normal; 5663 } 5664 } 5665 5666 /* Finish up the dynamic sections. */ 5667 5668 static bfd_boolean 5669 elf_i386_finish_dynamic_sections (bfd *output_bfd, 5670 struct bfd_link_info *info) 5671 { 5672 struct elf_i386_link_hash_table *htab; 5673 bfd *dynobj; 5674 asection *sdyn; 5675 const struct elf_i386_backend_data *abed; 5676 5677 htab = elf_i386_hash_table (info); 5678 if (htab == NULL) 5679 return FALSE; 5680 5681 dynobj = htab->elf.dynobj; 5682 sdyn = bfd_get_linker_section (dynobj, ".dynamic"); 5683 abed = get_elf_i386_backend_data (output_bfd); 5684 5685 if (htab->elf.dynamic_sections_created) 5686 { 5687 Elf32_External_Dyn *dyncon, *dynconend; 5688 5689 if (sdyn == NULL || htab->elf.sgot == NULL) 5690 abort (); 5691 5692 dyncon = (Elf32_External_Dyn *) sdyn->contents; 5693 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size); 5694 for (; dyncon < dynconend; dyncon++) 5695 { 5696 Elf_Internal_Dyn dyn; 5697 asection *s; 5698 5699 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn); 5700 5701 switch (dyn.d_tag) 5702 { 5703 default: 5704 if (abed->is_vxworks 5705 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn)) 5706 break; 5707 continue; 5708 5709 case DT_PLTGOT: 5710 s = htab->elf.sgotplt; 5711 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset; 5712 break; 5713 5714 case DT_JMPREL: 5715 s = htab->elf.srelplt; 5716 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset; 5717 break; 5718 5719 case DT_PLTRELSZ: 5720 s = htab->elf.srelplt; 5721 dyn.d_un.d_val = s->size; 5722 break; 5723 5724 case DT_RELSZ: 5725 /* My reading of the SVR4 ABI indicates that the 5726 procedure linkage table relocs (DT_JMPREL) should be 5727 included in the overall relocs (DT_REL). This is 5728 what Solaris does. However, UnixWare can not handle 5729 that case. Therefore, we override the DT_RELSZ entry 5730 here to make it not include the JMPREL relocs. */ 5731 s = htab->elf.srelplt; 5732 if (s == NULL) 5733 continue; 5734 dyn.d_un.d_val -= s->size; 5735 break; 5736 5737 case DT_REL: 5738 /* We may not be using the standard ELF linker script. 5739 If .rel.plt is the first .rel section, we adjust 5740 DT_REL to not include it. */ 5741 s = htab->elf.srelplt; 5742 if (s == NULL) 5743 continue; 5744 if (dyn.d_un.d_ptr != s->output_section->vma + s->output_offset) 5745 continue; 5746 dyn.d_un.d_ptr += s->size; 5747 break; 5748 } 5749 5750 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon); 5751 } 5752 5753 /* Fill in the first entry in the procedure linkage table. */ 5754 if (htab->elf.splt && htab->elf.splt->size > 0) 5755 { 5756 if (bfd_link_pic (info)) 5757 { 5758 memcpy (htab->elf.splt->contents, abed->plt->pic_plt0_entry, 5759 abed->plt->plt0_entry_size); 5760 memset (htab->elf.splt->contents + abed->plt->plt0_entry_size, 5761 abed->plt0_pad_byte, 5762 abed->plt->plt_entry_size - abed->plt->plt0_entry_size); 5763 } 5764 else 5765 { 5766 memcpy (htab->elf.splt->contents, abed->plt->plt0_entry, 5767 abed->plt->plt0_entry_size); 5768 memset (htab->elf.splt->contents + abed->plt->plt0_entry_size, 5769 abed->plt0_pad_byte, 5770 abed->plt->plt_entry_size - abed->plt->plt0_entry_size); 5771 bfd_put_32 (output_bfd, 5772 (htab->elf.sgotplt->output_section->vma 5773 + htab->elf.sgotplt->output_offset 5774 + 4), 5775 htab->elf.splt->contents 5776 + abed->plt->plt0_got1_offset); 5777 bfd_put_32 (output_bfd, 5778 (htab->elf.sgotplt->output_section->vma 5779 + htab->elf.sgotplt->output_offset 5780 + 8), 5781 htab->elf.splt->contents 5782 + abed->plt->plt0_got2_offset); 5783 5784 if (abed->is_vxworks) 5785 { 5786 Elf_Internal_Rela rel; 5787 5788 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 4. 5789 On IA32 we use REL relocations so the addend goes in 5790 the PLT directly. */ 5791 rel.r_offset = (htab->elf.splt->output_section->vma 5792 + htab->elf.splt->output_offset 5793 + abed->plt->plt0_got1_offset); 5794 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32); 5795 bfd_elf32_swap_reloc_out (output_bfd, &rel, 5796 htab->srelplt2->contents); 5797 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 8. */ 5798 rel.r_offset = (htab->elf.splt->output_section->vma 5799 + htab->elf.splt->output_offset 5800 + abed->plt->plt0_got2_offset); 5801 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32); 5802 bfd_elf32_swap_reloc_out (output_bfd, &rel, 5803 htab->srelplt2->contents + 5804 sizeof (Elf32_External_Rel)); 5805 } 5806 } 5807 5808 /* UnixWare sets the entsize of .plt to 4, although that doesn't 5809 really seem like the right value. */ 5810 elf_section_data (htab->elf.splt->output_section) 5811 ->this_hdr.sh_entsize = 4; 5812 5813 /* Correct the .rel.plt.unloaded relocations. */ 5814 if (abed->is_vxworks && !bfd_link_pic (info)) 5815 { 5816 int num_plts = (htab->elf.splt->size 5817 / abed->plt->plt_entry_size) - 1; 5818 unsigned char *p; 5819 5820 p = htab->srelplt2->contents; 5821 if (bfd_link_pic (info)) 5822 p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel); 5823 else 5824 p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel); 5825 5826 for (; num_plts; num_plts--) 5827 { 5828 Elf_Internal_Rela rel; 5829 bfd_elf32_swap_reloc_in (output_bfd, p, &rel); 5830 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32); 5831 bfd_elf32_swap_reloc_out (output_bfd, &rel, p); 5832 p += sizeof (Elf32_External_Rel); 5833 5834 bfd_elf32_swap_reloc_in (output_bfd, p, &rel); 5835 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32); 5836 bfd_elf32_swap_reloc_out (output_bfd, &rel, p); 5837 p += sizeof (Elf32_External_Rel); 5838 } 5839 } 5840 } 5841 } 5842 5843 if (htab->elf.sgotplt) 5844 { 5845 if (bfd_is_abs_section (htab->elf.sgotplt->output_section)) 5846 { 5847 (*_bfd_error_handler) 5848 (_("discarded output section: `%A'"), htab->elf.sgotplt); 5849 return FALSE; 5850 } 5851 5852 /* Fill in the first three entries in the global offset table. */ 5853 if (htab->elf.sgotplt->size > 0) 5854 { 5855 bfd_put_32 (output_bfd, 5856 (sdyn == NULL ? 0 5857 : sdyn->output_section->vma + sdyn->output_offset), 5858 htab->elf.sgotplt->contents); 5859 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 4); 5860 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 8); 5861 } 5862 5863 elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize = 4; 5864 } 5865 5866 /* Adjust .eh_frame for .plt section. */ 5867 if (htab->plt_eh_frame != NULL 5868 && htab->plt_eh_frame->contents != NULL) 5869 { 5870 if (htab->elf.splt != NULL 5871 && htab->elf.splt->size != 0 5872 && (htab->elf.splt->flags & SEC_EXCLUDE) == 0 5873 && htab->elf.splt->output_section != NULL 5874 && htab->plt_eh_frame->output_section != NULL) 5875 { 5876 bfd_vma plt_start = htab->elf.splt->output_section->vma; 5877 bfd_vma eh_frame_start = htab->plt_eh_frame->output_section->vma 5878 + htab->plt_eh_frame->output_offset 5879 + PLT_FDE_START_OFFSET; 5880 bfd_put_signed_32 (dynobj, plt_start - eh_frame_start, 5881 htab->plt_eh_frame->contents 5882 + PLT_FDE_START_OFFSET); 5883 } 5884 if (htab->plt_eh_frame->sec_info_type 5885 == SEC_INFO_TYPE_EH_FRAME) 5886 { 5887 if (! _bfd_elf_write_section_eh_frame (output_bfd, info, 5888 htab->plt_eh_frame, 5889 htab->plt_eh_frame->contents)) 5890 return FALSE; 5891 } 5892 } 5893 5894 if (htab->elf.sgot && htab->elf.sgot->size > 0) 5895 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize = 4; 5896 5897 /* Fill PLT entries for undefined weak symbols in PIE. */ 5898 if (bfd_link_pie (info)) 5899 bfd_hash_traverse (&info->hash->table, 5900 elf_i386_pie_finish_undefweak_symbol, 5901 info); 5902 5903 return TRUE; 5904 } 5905 5906 /* Fill PLT/GOT entries and allocate dynamic relocations for local 5907 STT_GNU_IFUNC symbols, which aren't in the ELF linker hash table. 5908 It has to be done before elf_link_sort_relocs is called so that 5909 dynamic relocations are properly sorted. */ 5910 5911 static bfd_boolean 5912 elf_i386_output_arch_local_syms 5913 (bfd *output_bfd ATTRIBUTE_UNUSED, 5914 struct bfd_link_info *info, 5915 void *flaginfo ATTRIBUTE_UNUSED, 5916 int (*func) (void *, const char *, 5917 Elf_Internal_Sym *, 5918 asection *, 5919 struct elf_link_hash_entry *) ATTRIBUTE_UNUSED) 5920 { 5921 struct elf_i386_link_hash_table *htab = elf_i386_hash_table (info); 5922 if (htab == NULL) 5923 return FALSE; 5924 5925 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */ 5926 htab_traverse (htab->loc_hash_table, 5927 elf_i386_finish_local_dynamic_symbol, 5928 info); 5929 5930 return TRUE; 5931 } 5932 5933 /* Return an array of PLT entry symbol values. */ 5934 5935 static bfd_vma * 5936 elf_i386_get_plt_sym_val (bfd *abfd, asymbol **dynsyms, asection *plt, 5937 asection *relplt) 5938 { 5939 bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean); 5940 arelent *p; 5941 long count, i; 5942 bfd_vma *plt_sym_val; 5943 bfd_vma plt_offset; 5944 bfd_byte *plt_contents; 5945 const struct elf_i386_backend_data *bed 5946 = get_elf_i386_backend_data (abfd); 5947 Elf_Internal_Shdr *hdr; 5948 5949 /* Get the .plt section contents. */ 5950 plt_contents = (bfd_byte *) bfd_malloc (plt->size); 5951 if (plt_contents == NULL) 5952 return NULL; 5953 if (!bfd_get_section_contents (abfd, (asection *) plt, 5954 plt_contents, 0, plt->size)) 5955 { 5956 bad_return: 5957 free (plt_contents); 5958 return NULL; 5959 } 5960 5961 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table; 5962 if (! (*slurp_relocs) (abfd, relplt, dynsyms, TRUE)) 5963 goto bad_return; 5964 5965 hdr = &elf_section_data (relplt)->this_hdr; 5966 count = relplt->size / hdr->sh_entsize; 5967 5968 plt_sym_val = (bfd_vma *) bfd_malloc (sizeof (bfd_vma) * count); 5969 if (plt_sym_val == NULL) 5970 goto bad_return; 5971 5972 for (i = 0; i < count; i++) 5973 plt_sym_val[i] = -1; 5974 5975 plt_offset = bed->plt->plt_entry_size; 5976 p = relplt->relocation; 5977 for (i = 0; i < count; i++, p++) 5978 { 5979 long reloc_index; 5980 5981 /* Skip unknown relocation. PR 17512: file: bc9d6cf5. */ 5982 if (p->howto == NULL) 5983 continue; 5984 5985 if (p->howto->type != R_386_JUMP_SLOT 5986 && p->howto->type != R_386_IRELATIVE) 5987 continue; 5988 5989 reloc_index = H_GET_32 (abfd, (plt_contents + plt_offset 5990 + bed->plt->plt_reloc_offset)); 5991 reloc_index /= sizeof (Elf32_External_Rel); 5992 if (reloc_index < count) 5993 plt_sym_val[reloc_index] = plt->vma + plt_offset; 5994 5995 plt_offset += bed->plt->plt_entry_size; 5996 5997 /* PR binutils/18437: Skip extra relocations in the .rel.plt 5998 section. */ 5999 if (plt_offset >= plt->size) 6000 break; 6001 } 6002 6003 free (plt_contents); 6004 6005 return plt_sym_val; 6006 } 6007 6008 /* Similar to _bfd_elf_get_synthetic_symtab. */ 6009 6010 static long 6011 elf_i386_get_synthetic_symtab (bfd *abfd, 6012 long symcount, 6013 asymbol **syms, 6014 long dynsymcount, 6015 asymbol **dynsyms, 6016 asymbol **ret) 6017 { 6018 asection *plt = bfd_get_section_by_name (abfd, ".plt"); 6019 return _bfd_elf_ifunc_get_synthetic_symtab (abfd, symcount, syms, 6020 dynsymcount, dynsyms, ret, 6021 plt, 6022 elf_i386_get_plt_sym_val); 6023 } 6024 6025 /* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */ 6026 6027 static bfd_boolean 6028 elf_i386_hash_symbol (struct elf_link_hash_entry *h) 6029 { 6030 if (h->plt.offset != (bfd_vma) -1 6031 && !h->def_regular 6032 && !h->pointer_equality_needed) 6033 return FALSE; 6034 6035 return _bfd_elf_hash_symbol (h); 6036 } 6037 6038 #define TARGET_LITTLE_SYM i386_elf32_vec 6039 #define TARGET_LITTLE_NAME "elf32-i386" 6040 #define ELF_ARCH bfd_arch_i386 6041 #define ELF_TARGET_ID I386_ELF_DATA 6042 #define ELF_MACHINE_CODE EM_386 6043 #define ELF_MAXPAGESIZE 0x1000 6044 6045 #define elf_backend_can_gc_sections 1 6046 #define elf_backend_can_refcount 1 6047 #define elf_backend_want_got_plt 1 6048 #define elf_backend_plt_readonly 1 6049 #define elf_backend_want_plt_sym 0 6050 #define elf_backend_got_header_size 12 6051 #define elf_backend_plt_alignment 4 6052 #define elf_backend_extern_protected_data 1 6053 #define elf_backend_caches_rawsize 1 6054 6055 /* Support RELA for objdump of prelink objects. */ 6056 #define elf_info_to_howto elf_i386_info_to_howto_rel 6057 #define elf_info_to_howto_rel elf_i386_info_to_howto_rel 6058 6059 #define bfd_elf32_mkobject elf_i386_mkobject 6060 6061 #define bfd_elf32_bfd_is_local_label_name elf_i386_is_local_label_name 6062 #define bfd_elf32_bfd_link_hash_table_create elf_i386_link_hash_table_create 6063 #define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup 6064 #define bfd_elf32_bfd_reloc_name_lookup elf_i386_reloc_name_lookup 6065 #define bfd_elf32_get_synthetic_symtab elf_i386_get_synthetic_symtab 6066 6067 #define elf_backend_adjust_dynamic_symbol elf_i386_adjust_dynamic_symbol 6068 #define elf_backend_relocs_compatible _bfd_elf_relocs_compatible 6069 #define elf_backend_check_relocs elf_i386_check_relocs 6070 #define elf_backend_copy_indirect_symbol elf_i386_copy_indirect_symbol 6071 #define elf_backend_create_dynamic_sections elf_i386_create_dynamic_sections 6072 #define elf_backend_fake_sections elf_i386_fake_sections 6073 #define elf_backend_finish_dynamic_sections elf_i386_finish_dynamic_sections 6074 #define elf_backend_finish_dynamic_symbol elf_i386_finish_dynamic_symbol 6075 #define elf_backend_output_arch_local_syms elf_i386_output_arch_local_syms 6076 #define elf_backend_gc_mark_hook elf_i386_gc_mark_hook 6077 #define elf_backend_grok_prstatus elf_i386_grok_prstatus 6078 #define elf_backend_grok_psinfo elf_i386_grok_psinfo 6079 #define elf_backend_reloc_type_class elf_i386_reloc_type_class 6080 #define elf_backend_relocate_section elf_i386_relocate_section 6081 #define elf_backend_size_dynamic_sections elf_i386_size_dynamic_sections 6082 #define elf_backend_always_size_sections elf_i386_always_size_sections 6083 #define elf_backend_omit_section_dynsym \ 6084 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true) 6085 #define elf_backend_hash_symbol elf_i386_hash_symbol 6086 #define elf_backend_fixup_symbol elf_i386_fixup_symbol 6087 6088 #include "elf32-target.h" 6089 6090 /* FreeBSD support. */ 6091 6092 #undef TARGET_LITTLE_SYM 6093 #define TARGET_LITTLE_SYM i386_elf32_fbsd_vec 6094 #undef TARGET_LITTLE_NAME 6095 #define TARGET_LITTLE_NAME "elf32-i386-freebsd" 6096 #undef ELF_OSABI 6097 #define ELF_OSABI ELFOSABI_FREEBSD 6098 6099 /* The kernel recognizes executables as valid only if they carry a 6100 "FreeBSD" label in the ELF header. So we put this label on all 6101 executables and (for simplicity) also all other object files. */ 6102 6103 static void 6104 elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info) 6105 { 6106 _bfd_elf_post_process_headers (abfd, info); 6107 6108 #ifdef OLD_FREEBSD_ABI_LABEL 6109 { 6110 /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard. */ 6111 Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd); 6112 memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8); 6113 } 6114 #endif 6115 } 6116 6117 #undef elf_backend_post_process_headers 6118 #define elf_backend_post_process_headers elf_i386_fbsd_post_process_headers 6119 #undef elf32_bed 6120 #define elf32_bed elf32_i386_fbsd_bed 6121 6122 #undef elf_backend_add_symbol_hook 6123 6124 #include "elf32-target.h" 6125 6126 /* Solaris 2. */ 6127 6128 #undef TARGET_LITTLE_SYM 6129 #define TARGET_LITTLE_SYM i386_elf32_sol2_vec 6130 #undef TARGET_LITTLE_NAME 6131 #define TARGET_LITTLE_NAME "elf32-i386-sol2" 6132 6133 #undef elf_backend_post_process_headers 6134 6135 /* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE 6136 objects won't be recognized. */ 6137 #undef ELF_OSABI 6138 6139 #undef elf32_bed 6140 #define elf32_bed elf32_i386_sol2_bed 6141 6142 /* The 32-bit static TLS arena size is rounded to the nearest 8-byte 6143 boundary. */ 6144 #undef elf_backend_static_tls_alignment 6145 #define elf_backend_static_tls_alignment 8 6146 6147 /* The Solaris 2 ABI requires a plt symbol on all platforms. 6148 6149 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output 6150 File, p.63. */ 6151 #undef elf_backend_want_plt_sym 6152 #define elf_backend_want_plt_sym 1 6153 6154 #undef elf_backend_strtab_flags 6155 #define elf_backend_strtab_flags SHF_STRINGS 6156 6157 /* Called to set the sh_flags, sh_link and sh_info fields of OSECTION which 6158 has a type >= SHT_LOOS. Returns TRUE if these fields were initialised 6159 FALSE otherwise. ISECTION is the best guess matching section from the 6160 input bfd IBFD, but it might be NULL. */ 6161 6162 static bfd_boolean 6163 elf32_i386_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED, 6164 bfd *obfd ATTRIBUTE_UNUSED, 6165 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED, 6166 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED) 6167 { 6168 /* PR 19938: FIXME: Need to add code for setting the sh_info 6169 and sh_link fields of Solaris specific section types. */ 6170 return FALSE; 6171 6172 /* Based upon Oracle Solaris 11.3 Linkers and Libraries Guide, Ch. 13, 6173 Object File Format, Table 13-9 ELF sh_link and sh_info Interpretation: 6174 6175 http://docs.oracle.com/cd/E53394_01/html/E54813/chapter6-94076.html#scrolltoc 6176 6177 The following values should be set: 6178 6179 Type Link Info 6180 ----------------------------------------------------------------------------- 6181 SHT_SUNW_ancillary The section header index of 0 6182 [0x6fffffee] the associated string table. 6183 6184 SHT_SUNW_capinfo The section header index of For a dynamic object, the 6185 [0x6ffffff0] the associated symbol table. section header index of 6186 the associated 6187 SHT_SUNW_capchain table, 6188 otherwise 0. 6189 6190 SHT_SUNW_symsort The section header index of 0 6191 [0x6ffffff1] the associated symbol table. 6192 6193 SHT_SUNW_tlssort The section header index of 0 6194 [0x6ffffff2] the associated symbol table. 6195 6196 SHT_SUNW_LDYNSYM The section header index of One greater than the 6197 [0x6ffffff3] the associated string table. symbol table index of the 6198 This index is the same string last local symbol, 6199 table used by the SHT_DYNSYM STB_LOCAL. Since 6200 section. SHT_SUNW_LDYNSYM only 6201 contains local symbols, 6202 sh_info is equivalent to 6203 the number of symbols in 6204 the table. 6205 6206 SHT_SUNW_cap If symbol capabilities exist, If any capabilities refer 6207 [0x6ffffff5] the section header index of to named strings, the 6208 the associated section header index of 6209 SHT_SUNW_capinfo table, the associated string 6210 otherwise 0. table, otherwise 0. 6211 6212 SHT_SUNW_move The section header index of 0 6213 [0x6ffffffa] the associated symbol table. 6214 6215 SHT_SUNW_COMDAT 0 0 6216 [0x6ffffffb] 6217 6218 SHT_SUNW_syminfo The section header index of The section header index 6219 [0x6ffffffc] the associated symbol table. of the associated 6220 .dynamic section. 6221 6222 SHT_SUNW_verdef The section header index of The number of version 6223 [0x6ffffffd] the associated string table. definitions within the 6224 section. 6225 6226 SHT_SUNW_verneed The section header index of The number of version 6227 [0x6ffffffe] the associated string table. dependencies within the 6228 section. 6229 6230 SHT_SUNW_versym The section header index of 0 6231 [0x6fffffff] the associated symbol table. */ 6232 } 6233 6234 #undef elf_backend_copy_special_section_fields 6235 #define elf_backend_copy_special_section_fields elf32_i386_copy_solaris_special_section_fields 6236 6237 #include "elf32-target.h" 6238 6239 /* Intel MCU support. */ 6240 6241 static bfd_boolean 6242 elf32_iamcu_elf_object_p (bfd *abfd) 6243 { 6244 /* Set the right machine number for an IAMCU elf32 file. */ 6245 bfd_default_set_arch_mach (abfd, bfd_arch_iamcu, bfd_mach_i386_iamcu); 6246 return TRUE; 6247 } 6248 6249 #undef TARGET_LITTLE_SYM 6250 #define TARGET_LITTLE_SYM iamcu_elf32_vec 6251 #undef TARGET_LITTLE_NAME 6252 #define TARGET_LITTLE_NAME "elf32-iamcu" 6253 #undef ELF_ARCH 6254 #define ELF_ARCH bfd_arch_iamcu 6255 6256 #undef ELF_MACHINE_CODE 6257 #define ELF_MACHINE_CODE EM_IAMCU 6258 6259 #undef ELF_OSABI 6260 6261 #undef elf32_bed 6262 #define elf32_bed elf32_iamcu_bed 6263 6264 #undef elf_backend_object_p 6265 #define elf_backend_object_p elf32_iamcu_elf_object_p 6266 6267 #undef elf_backend_static_tls_alignment 6268 6269 #undef elf_backend_want_plt_sym 6270 #define elf_backend_want_plt_sym 0 6271 6272 #undef elf_backend_strtab_flags 6273 #undef elf_backend_copy_special_section_fields 6274 6275 #include "elf32-target.h" 6276 6277 /* Restore defaults. */ 6278 #undef ELF_ARCH 6279 #define ELF_ARCH bfd_arch_i386 6280 #undef ELF_MACHINE_CODE 6281 #define ELF_MACHINE_CODE EM_386 6282 6283 /* Native Client support. */ 6284 6285 #undef TARGET_LITTLE_SYM 6286 #define TARGET_LITTLE_SYM i386_elf32_nacl_vec 6287 #undef TARGET_LITTLE_NAME 6288 #define TARGET_LITTLE_NAME "elf32-i386-nacl" 6289 #undef elf32_bed 6290 #define elf32_bed elf32_i386_nacl_bed 6291 6292 #undef ELF_MAXPAGESIZE 6293 #define ELF_MAXPAGESIZE 0x10000 6294 6295 /* Restore defaults. */ 6296 #undef ELF_OSABI 6297 #undef elf_backend_want_plt_sym 6298 #define elf_backend_want_plt_sym 0 6299 #undef elf_backend_post_process_headers 6300 #undef elf_backend_static_tls_alignment 6301 6302 /* NaCl uses substantially different PLT entries for the same effects. */ 6303 6304 #undef elf_backend_plt_alignment 6305 #define elf_backend_plt_alignment 5 6306 #define NACL_PLT_ENTRY_SIZE 64 6307 #define NACLMASK 0xe0 /* 32-byte alignment mask. */ 6308 6309 static const bfd_byte elf_i386_nacl_plt0_entry[] = 6310 { 6311 0xff, 0x35, /* pushl contents of address */ 6312 0, 0, 0, 0, /* replaced with address of .got + 4. */ 6313 0x8b, 0x0d, /* movl contents of address, %ecx */ 6314 0, 0, 0, 0, /* replaced with address of .got + 8. */ 6315 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */ 6316 0xff, 0xe1 /* jmp *%ecx */ 6317 }; 6318 6319 static const bfd_byte elf_i386_nacl_plt_entry[NACL_PLT_ENTRY_SIZE] = 6320 { 6321 0x8b, 0x0d, /* movl contents of address, %ecx */ 6322 0, 0, 0, 0, /* replaced with GOT slot address. */ 6323 0x83, 0xe1, NACLMASK, /* andl $NACLMASK, %ecx */ 6324 0xff, 0xe1, /* jmp *%ecx */ 6325 6326 /* Pad to the next 32-byte boundary with nop instructions. */ 6327 0x90, 6328 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6329 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6330 6331 /* Lazy GOT entries point here (32-byte aligned). */ 6332 0x68, /* pushl immediate */ 6333 0, 0, 0, 0, /* replaced with reloc offset. */ 6334 0xe9, /* jmp relative */ 6335 0, 0, 0, 0, /* replaced with offset to .plt. */ 6336 6337 /* Pad to the next 32-byte boundary with nop instructions. */ 6338 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6339 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6340 0x90, 0x90 6341 }; 6342 6343 static const bfd_byte 6344 elf_i386_nacl_pic_plt0_entry[sizeof (elf_i386_nacl_plt0_entry)] = 6345 { 6346 0xff, 0x73, 0x04, /* pushl 4(%ebx) */ 6347 0x8b, 0x4b, 0x08, /* mov 0x8(%ebx), %ecx */ 6348 0x83, 0xe1, 0xe0, /* and $NACLMASK, %ecx */ 6349 0xff, 0xe1, /* jmp *%ecx */ 6350 6351 /* This is expected to be the same size as elf_i386_nacl_plt0_entry, 6352 so pad to that size with nop instructions. */ 6353 0x90, 0x90, 0x90, 0x90, 0x90, 0x90 6354 }; 6355 6356 static const bfd_byte elf_i386_nacl_pic_plt_entry[NACL_PLT_ENTRY_SIZE] = 6357 { 6358 0x8b, 0x8b, /* movl offset(%ebx), %ecx */ 6359 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */ 6360 0x83, 0xe1, 0xe0, /* andl $NACLMASK, %ecx */ 6361 0xff, 0xe1, /* jmp *%ecx */ 6362 6363 /* Pad to the next 32-byte boundary with nop instructions. */ 6364 0x90, 6365 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6366 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6367 6368 /* Lazy GOT entries point here (32-byte aligned). */ 6369 0x68, /* pushl immediate */ 6370 0, 0, 0, 0, /* replaced with offset into relocation table. */ 6371 0xe9, /* jmp relative */ 6372 0, 0, 0, 0, /* replaced with offset to start of .plt. */ 6373 6374 /* Pad to the next 32-byte boundary with nop instructions. */ 6375 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6376 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 6377 0x90, 0x90 6378 }; 6379 6380 static const bfd_byte elf_i386_nacl_eh_frame_plt[] = 6381 { 6382 #if (PLT_CIE_LENGTH != 20 \ 6383 || PLT_FDE_LENGTH != 36 \ 6384 || PLT_FDE_START_OFFSET != 4 + PLT_CIE_LENGTH + 8 \ 6385 || PLT_FDE_LEN_OFFSET != 4 + PLT_CIE_LENGTH + 12) 6386 # error "Need elf_i386_backend_data parameters for eh_frame_plt offsets!" 6387 #endif 6388 PLT_CIE_LENGTH, 0, 0, 0, /* CIE length */ 6389 0, 0, 0, 0, /* CIE ID */ 6390 1, /* CIE version */ 6391 'z', 'R', 0, /* Augmentation string */ 6392 1, /* Code alignment factor */ 6393 0x7c, /* Data alignment factor: -4 */ 6394 8, /* Return address column */ 6395 1, /* Augmentation size */ 6396 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding */ 6397 DW_CFA_def_cfa, 4, 4, /* DW_CFA_def_cfa: r4 (esp) ofs 4 */ 6398 DW_CFA_offset + 8, 1, /* DW_CFA_offset: r8 (eip) at cfa-4 */ 6399 DW_CFA_nop, DW_CFA_nop, 6400 6401 PLT_FDE_LENGTH, 0, 0, 0, /* FDE length */ 6402 PLT_CIE_LENGTH + 8, 0, 0, 0, /* CIE pointer */ 6403 0, 0, 0, 0, /* R_386_PC32 .plt goes here */ 6404 0, 0, 0, 0, /* .plt size goes here */ 6405 0, /* Augmentation size */ 6406 DW_CFA_def_cfa_offset, 8, /* DW_CFA_def_cfa_offset: 8 */ 6407 DW_CFA_advance_loc + 6, /* DW_CFA_advance_loc: 6 to __PLT__+6 */ 6408 DW_CFA_def_cfa_offset, 12, /* DW_CFA_def_cfa_offset: 12 */ 6409 DW_CFA_advance_loc + 58, /* DW_CFA_advance_loc: 58 to __PLT__+64 */ 6410 DW_CFA_def_cfa_expression, /* DW_CFA_def_cfa_expression */ 6411 13, /* Block length */ 6412 DW_OP_breg4, 4, /* DW_OP_breg4 (esp): 4 */ 6413 DW_OP_breg8, 0, /* DW_OP_breg8 (eip): 0 */ 6414 DW_OP_const1u, 63, DW_OP_and, DW_OP_const1u, 37, DW_OP_ge, 6415 DW_OP_lit2, DW_OP_shl, DW_OP_plus, 6416 DW_CFA_nop, DW_CFA_nop 6417 }; 6418 6419 static const struct elf_i386_plt_layout elf_i386_nacl_plt = 6420 { 6421 elf_i386_nacl_plt0_entry, /* plt0_entry */ 6422 sizeof (elf_i386_nacl_plt0_entry), /* plt0_entry_size */ 6423 2, /* plt0_got1_offset */ 6424 8, /* plt0_got2_offset */ 6425 elf_i386_nacl_plt_entry, /* plt_entry */ 6426 NACL_PLT_ENTRY_SIZE, /* plt_entry_size */ 6427 2, /* plt_got_offset */ 6428 33, /* plt_reloc_offset */ 6429 38, /* plt_plt_offset */ 6430 32, /* plt_lazy_offset */ 6431 elf_i386_nacl_pic_plt0_entry, /* pic_plt0_entry */ 6432 elf_i386_nacl_pic_plt_entry, /* pic_plt_entry */ 6433 elf_i386_nacl_eh_frame_plt, /* eh_frame_plt */ 6434 sizeof (elf_i386_nacl_eh_frame_plt),/* eh_frame_plt_size */ 6435 }; 6436 6437 static const struct elf_i386_backend_data elf_i386_nacl_arch_bed = 6438 { 6439 &elf_i386_nacl_plt, /* plt */ 6440 0x90, /* plt0_pad_byte: nop insn */ 6441 0, /* is_vxworks */ 6442 }; 6443 6444 static bfd_boolean 6445 elf32_i386_nacl_elf_object_p (bfd *abfd) 6446 { 6447 /* Set the right machine number for a NaCl i386 ELF32 file. */ 6448 bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386_nacl); 6449 return TRUE; 6450 } 6451 6452 #undef elf_backend_arch_data 6453 #define elf_backend_arch_data &elf_i386_nacl_arch_bed 6454 6455 #undef elf_backend_object_p 6456 #define elf_backend_object_p elf32_i386_nacl_elf_object_p 6457 #undef elf_backend_modify_segment_map 6458 #define elf_backend_modify_segment_map nacl_modify_segment_map 6459 #undef elf_backend_modify_program_headers 6460 #define elf_backend_modify_program_headers nacl_modify_program_headers 6461 #undef elf_backend_final_write_processing 6462 #define elf_backend_final_write_processing nacl_final_write_processing 6463 6464 #include "elf32-target.h" 6465 6466 /* Restore defaults. */ 6467 #undef elf_backend_object_p 6468 #undef elf_backend_modify_segment_map 6469 #undef elf_backend_modify_program_headers 6470 #undef elf_backend_final_write_processing 6471 6472 /* VxWorks support. */ 6473 6474 #undef TARGET_LITTLE_SYM 6475 #define TARGET_LITTLE_SYM i386_elf32_vxworks_vec 6476 #undef TARGET_LITTLE_NAME 6477 #define TARGET_LITTLE_NAME "elf32-i386-vxworks" 6478 #undef ELF_OSABI 6479 #undef elf_backend_plt_alignment 6480 #define elf_backend_plt_alignment 4 6481 6482 static const struct elf_i386_backend_data elf_i386_vxworks_arch_bed = 6483 { 6484 &elf_i386_plt, /* plt */ 6485 0x90, /* plt0_pad_byte */ 6486 1, /* is_vxworks */ 6487 }; 6488 6489 #undef elf_backend_arch_data 6490 #define elf_backend_arch_data &elf_i386_vxworks_arch_bed 6491 6492 #undef elf_backend_relocs_compatible 6493 #undef elf_backend_add_symbol_hook 6494 #define elf_backend_add_symbol_hook \ 6495 elf_vxworks_add_symbol_hook 6496 #undef elf_backend_link_output_symbol_hook 6497 #define elf_backend_link_output_symbol_hook \ 6498 elf_vxworks_link_output_symbol_hook 6499 #undef elf_backend_emit_relocs 6500 #define elf_backend_emit_relocs elf_vxworks_emit_relocs 6501 #undef elf_backend_final_write_processing 6502 #define elf_backend_final_write_processing \ 6503 elf_vxworks_final_write_processing 6504 #undef elf_backend_static_tls_alignment 6505 6506 /* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so 6507 define it. */ 6508 #undef elf_backend_want_plt_sym 6509 #define elf_backend_want_plt_sym 1 6510 6511 #undef elf32_bed 6512 #define elf32_bed elf32_i386_vxworks_bed 6513 6514 #include "elf32-target.h" 6515