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