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