]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf32-i386.c
projects / thirdparty / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
*** empty log message ***
[thirdparty/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:
6de2ae4a 1379 if (!_bfd_elf_create_ifunc_sections (abfd, info))
c2e61a4e 1380 return FALSE;
cbe950e9
L		 1381 break;
1382 }
1383
1384 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
1385 it here if it is defined in a non-shared object. */
1386 if (h->type == STT_GNU_IFUNC
1387 && h->def_regular)
1388 {
1389 /* It is referenced by a non-shared object. */
1390 h->ref_regular = 1;
7ae26bc1 1391 h->needs_plt = 1;
6bbec505 1392
cbe950e9
L		 1393 /* STT_GNU_IFUNC symbol must go through PLT. */
1394 h->plt.refcount += 1;
1395
1396 /* STT_GNU_IFUNC needs dynamic sections. */
1397 if (htab->elf.dynobj == NULL)
1398 htab->elf.dynobj = abfd;
1399
1400 switch (r_type)
1401 {
048cbda4 1402 default:
4c544807
L		 1403 if (h->root.root.string)
1404 name = h->root.root.string;
1405 else
1406 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1407 NULL);
048cbda4
L		 1408 (*_bfd_error_handler)
1409 (_("%B: relocation %s against STT_GNU_IFUNC "
1410 "symbol `%s' isn't handled by %s"), abfd,
1411 elf_howto_table[r_type].name,
4c544807 1412 name, __FUNCTION__);
048cbda4 1413 bfd_set_error (bfd_error_bad_value);
c2e61a4e 1414 return FALSE;
cbe950e9
L		 1415
1416 case R_386_32:
710ab287
L		 1417 h->non_got_ref = 1;
1418 h->pointer_equality_needed = 1;
1419 if (info->shared)
1420 {
710ab287
L		 1421 /* We must copy these reloc types into the
1422 output file. Create a reloc section in
1423 dynobj and make room for this reloc. */
e03a8ed8
L		 1424 sreloc = _bfd_elf_create_ifunc_dyn_reloc
1425 (abfd, info, sec, sreloc,
1426 &((struct elf_i386_link_hash_entry *) h)->dyn_relocs);
710ab287 1427 if (sreloc == NULL)
c2e61a4e 1428 return FALSE;
710ab287
L		 1429 }
1430 break;
1431
cbe950e9
L		 1432 case R_386_PC32:
1433 h->non_got_ref = 1;
cbe950e9
L		 1434 break;
1435
1436 case R_386_PLT32:
1437 break;
1438
1439 case R_386_GOT32:
1440 case R_386_GOTOFF:
7afd84dc 1441 h->got.refcount += 1;
6de2ae4a
L		 1442 if (htab->elf.sgot == NULL
1443 && !_bfd_elf_create_got_section (htab->elf.dynobj,
cbe950e9 1444 info))
c2e61a4e 1445 return FALSE;
cbe950e9
L		 1446 break;
1447 }
1448
1449 continue;
1450 }
71cb9464 1451 }
252b5132 1452
142411ca
L		 1453 if (! elf_i386_tls_transition (info, abfd, sec, NULL,
1454 symtab_hdr, sym_hashes,
1455 &r_type, GOT_UNKNOWN,
4c544807 1456 rel, rel_end, h, r_symndx))
c2e61a4e 1457 return FALSE;
13ae64f3
JJ		 1458
1459 switch (r_type)
252b5132 1460 {
37e55690
JJ		 1461 case R_386_TLS_LDM:
1462 htab->tls_ldm_got.refcount += 1;
1463 goto create_got;
1464
1465 case R_386_PLT32:
1466 /* This symbol requires a procedure linkage table entry. We
1467 actually build the entry in adjust_dynamic_symbol,
1468 because this might be a case of linking PIC code which is
1469 never referenced by a dynamic object, in which case we
1470 don't need to generate a procedure linkage table entry
1471 after all. */
1472
1473 /* If this is a local symbol, we resolve it directly without
1474 creating a procedure linkage table entry. */
1475 if (h == NULL)
1476 continue;
1477
f5385ebf 1478 h->needs_plt = 1;
37e55690
JJ		 1479 h->plt.refcount += 1;
1480 break;
1481
13ae64f3 1482 case R_386_TLS_IE_32:
37e55690
JJ		 1483 case R_386_TLS_IE:
1484 case R_386_TLS_GOTIE:
1d85728f 1485 if (!info->executable)
13ae64f3 1486 info->flags |= DF_STATIC_TLS;
37e55690
JJ		 1487 /* Fall through */
1488
252b5132 1489 case R_386_GOT32:
13ae64f3 1490 case R_386_TLS_GD:
67a4f2b7
AO		 1491 case R_386_TLS_GOTDESC:
1492 case R_386_TLS_DESC_CALL:
252b5132 1493 /* This symbol requires a global offset table entry. */
13ae64f3
JJ		 1494 {
1495 int tls_type, old_tls_type;
1496
1497 switch (r_type)
1498 {
1499 default:
1500 case R_386_GOT32: tls_type = GOT_NORMAL; break;
1501 case R_386_TLS_GD: tls_type = GOT_TLS_GD; break;
67a4f2b7
AO		 1502 case R_386_TLS_GOTDESC:
1503 case R_386_TLS_DESC_CALL:
1504 tls_type = GOT_TLS_GDESC; break;
37e55690
JJ		 1505 case R_386_TLS_IE_32:
1506 if (ELF32_R_TYPE (rel->r_info) == r_type)
1507 tls_type = GOT_TLS_IE_NEG;
1508 else
ebcfb3c0
JJ		 1509 /* If this is a GD->IE transition, we may use either of
1510 R_386_TLS_TPOFF and R_386_TLS_TPOFF32. */
37e55690
JJ		 1511 tls_type = GOT_TLS_IE;
1512 break;
1513 case R_386_TLS_IE:
1514 case R_386_TLS_GOTIE:
1515 tls_type = GOT_TLS_IE_POS; break;
13ae64f3
JJ		 1516 }
1517
1518 if (h != NULL)
1519 {
1520 h->got.refcount += 1;
1521 old_tls_type = elf_i386_hash_entry(h)->tls_type;
1522 }
1523 else
1524 {
1525 bfd_signed_vma *local_got_refcounts;
1526
1527 /* This is a global offset table entry for a local symbol. */
1528 local_got_refcounts = elf_local_got_refcounts (abfd);
1529 if (local_got_refcounts == NULL)
1530 {
1531 bfd_size_type size;
1532
1533 size = symtab_hdr->sh_info;
67a4f2b7
AO		 1534 size *= (sizeof (bfd_signed_vma)
1535 + sizeof (bfd_vma) + sizeof(char));
a50b1753
NC		 1536 local_got_refcounts = (bfd_signed_vma *)
1537 bfd_zalloc (abfd, size);
13ae64f3 1538 if (local_got_refcounts == NULL)
c2e61a4e 1539 return FALSE;
13ae64f3 1540 elf_local_got_refcounts (abfd) = local_got_refcounts;
67a4f2b7
AO		 1541 elf_i386_local_tlsdesc_gotent (abfd)
1542 = (bfd_vma *) (local_got_refcounts + symtab_hdr->sh_info);
13ae64f3 1543 elf_i386_local_got_tls_type (abfd)
67a4f2b7 1544 = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
13ae64f3
JJ		 1545 }
1546 local_got_refcounts[r_symndx] += 1;
1547 old_tls_type = elf_i386_local_got_tls_type (abfd) [r_symndx];
1548 }
1549
37e55690
JJ		 1550 if ((old_tls_type & GOT_TLS_IE) && (tls_type & GOT_TLS_IE))
1551 tls_type |= old_tls_type;
13ae64f3
JJ		 1552 /* If a TLS symbol is accessed using IE at least once,
1553 there is no point to use dynamic model for it. */
ebcfb3c0 1554 else if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
67a4f2b7 1555 && (! GOT_TLS_GD_ANY_P (old_tls_type)
37e55690 1556 || (tls_type & GOT_TLS_IE) == 0))
13ae64f3 1557 {
67a4f2b7 1558 if ((old_tls_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (tls_type))
37e55690 1559 tls_type = old_tls_type;
67a4f2b7
AO		 1560 else if (GOT_TLS_GD_ANY_P (old_tls_type)
1561 && GOT_TLS_GD_ANY_P (tls_type))
1562 tls_type |= old_tls_type;
13ae64f3
JJ		 1563 else
1564 {
09a24cbf 1565 if (h)
4c544807
L		 1566 name = h->root.root.string;
1567 else
1568 name = bfd_elf_sym_name (abfd, symtab_hdr, isym,
1569 NULL);
13ae64f3 1570 (*_bfd_error_handler)
d003868e 1571 (_("%B: `%s' accessed both as normal and "
55fd94b0 1572 "thread local symbol"),
4c544807 1573 abfd, name);
c2e61a4e 1574 return FALSE;
13ae64f3
JJ		 1575 }
1576 }
1577
1578 if (old_tls_type != tls_type)
1579 {
1580 if (h != NULL)
1581 elf_i386_hash_entry (h)->tls_type = tls_type;
1582 else
1583 elf_i386_local_got_tls_type (abfd) [r_symndx] = tls_type;
1584 }
1585 }
0ac8d2ca
AM		 1586 /* Fall through */
1587
1588 case R_386_GOTOFF:
1589 case R_386_GOTPC:
13ae64f3 1590 create_got:
6de2ae4a 1591 if (htab->elf.sgot == NULL)
0ac8d2ca
AM		 1592 {
1593 if (htab->elf.dynobj == NULL)
1594 htab->elf.dynobj = abfd;
6de2ae4a 1595 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
c2e61a4e 1596 return FALSE;
0ac8d2ca 1597 }
37e55690
JJ		 1598 if (r_type != R_386_TLS_IE)
1599 break;
1600 /* Fall through */
252b5132 1601
37e55690
JJ		 1602 case R_386_TLS_LE_32:
1603 case R_386_TLS_LE:
1d85728f 1604 if (info->executable)
37e55690 1605 break;
bffbf940 1606 info->flags |= DF_STATIC_TLS;
b34976b6 1607 /* Fall through */
252b5132
RH		 1608
1609 case R_386_32:
1610 case R_386_PC32:
710ab287 1611 if (h != NULL && info->executable)
6725bdbf 1612 {
12d0ee4a 1613 /* If this reloc is in a read-only section, we might
ebe50bae
AM		 1614 need a copy reloc. We can't check reliably at this
1615 stage whether the section is read-only, as input
1616 sections have not yet been mapped to output sections.
1617 Tentatively set the flag for now, and correct in
1618 adjust_dynamic_symbol. */
f5385ebf 1619 h->non_got_ref = 1;
12d0ee4a
AM		 1620
1621 /* We may need a .plt entry if the function this reloc
1622 refers to is in a shared lib. */
51b64d56 1623 h->plt.refcount += 1;
c6585bbb 1624 if (r_type != R_386_PC32)
f5385ebf 1625 h->pointer_equality_needed = 1;
6725bdbf 1626 }
7843f00e 1627
252b5132 1628 /* If we are creating a shared library, and this is a reloc
f69da49f
AM		 1629 against a global symbol, or a non PC relative reloc
1630 against a local symbol, then we need to copy the reloc
1631 into the shared library. However, if we are linking with
1632 -Bsymbolic, we do not need to copy a reloc against a
1633 global symbol which is defined in an object we are
1634 including in the link (i.e., DEF_REGULAR is set). At
1635 this point we have not seen all the input files, so it is
1636 possible that DEF_REGULAR is not set now but will be set
1f655a09
L		 1637 later (it is never cleared). In case of a weak definition,
1638 DEF_REGULAR may be cleared later by a strong definition in
ebe50bae 1639 a shared library. We account for that possibility below by
1f655a09
L		 1640 storing information in the relocs_copied field of the hash
1641 table entry. A similar situation occurs when creating
1642 shared libraries and symbol visibility changes render the
12d0ee4a 1643 symbol local.
56882138 1644
12d0ee4a
AM		 1645 If on the other hand, we are creating an executable, we
1646 may need to keep relocations for symbols satisfied by a
1647 dynamic library if we manage to avoid copy relocs for the
1648 symbol. */
1649 if ((info->shared
1650 && (sec->flags & SEC_ALLOC) != 0
13ae64f3 1651 && (r_type != R_386_PC32
12d0ee4a 1652 || (h != NULL
55255dae 1653 && (! SYMBOLIC_BIND (info, h)
12d0ee4a 1654 || h->root.type == bfd_link_hash_defweak
f5385ebf 1655 || !h->def_regular))))
a23b6845
AM		 1656 || (ELIMINATE_COPY_RELOCS
1657 && !info->shared
12d0ee4a
AM		 1658 && (sec->flags & SEC_ALLOC) != 0
1659 && h != NULL
12d0ee4a 1660 && (h->root.type == bfd_link_hash_defweak
0f88be7a 1661 || !h->def_regular)))
252b5132 1662 {
e03a8ed8
L		 1663 struct elf_dyn_relocs *p;
1664 struct elf_dyn_relocs **head;
ec338859 1665
12d0ee4a
AM		 1666 /* We must copy these reloc types into the output file.
1667 Create a reloc section in dynobj and make room for
1668 this reloc. */
252b5132
RH		 1669 if (sreloc == NULL)
1670 {
0ac8d2ca
AM		 1671 if (htab->elf.dynobj == NULL)
1672 htab->elf.dynobj = abfd;
1673
83bac4b0
NC		 1674 sreloc = _bfd_elf_make_dynamic_reloc_section
1675 (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ FALSE);
1676
252b5132 1677 if (sreloc == NULL)
c2e61a4e 1678 return FALSE;
252b5132
RH		 1679 }
1680
0c715baa
AM		 1681 /* If this is a global symbol, we count the number of
1682 relocations we need for this symbol. */
1683 if (h != NULL)
252b5132 1684 {
ec338859 1685 head = &((struct elf_i386_link_hash_entry *) h)->dyn_relocs;
0c715baa
AM		 1686 }
1687 else
1688 {
ec338859
AM		 1689 /* Track dynamic relocs needed for local syms too.
1690 We really need local syms available to do this
1691 easily. Oh well. */
87d72d41 1692 void **vpp;
ec338859 1693 asection *s;
87d72d41
AM		 1694
1695 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1696 abfd, r_symndx);
1697 if (isym == NULL)
1698 return FALSE;
1699
1700 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
ec338859 1701 if (s == NULL)
87d72d41 1702 s = sec;
ec338859 1703
e81d3500 1704 vpp = &elf_section_data (s)->local_dynrel;
e03a8ed8 1705 head = (struct elf_dyn_relocs **)vpp;
ec338859
AM		 1706 }
1707
1708 p = *head;
1709 if (p == NULL || p->sec != sec)
1710 {
1711 bfd_size_type amt = sizeof *p;
a50b1753
NC		 1712 p = (struct elf_dyn_relocs *) bfd_alloc (htab->elf.dynobj,
1713 amt);
ec338859 1714 if (p == NULL)
c2e61a4e 1715 return FALSE;
ec338859
AM		 1716 p->next = *head;
1717 *head = p;
1718 p->sec = sec;
1719 p->count = 0;
1720 p->pc_count = 0;
252b5132 1721 }
ec338859
AM		 1722
1723 p->count += 1;
13ae64f3 1724 if (r_type == R_386_PC32)
ec338859 1725 p->pc_count += 1;
252b5132 1726 }
252b5132
RH		 1727 break;
1728
1729 /* This relocation describes the C++ object vtable hierarchy.
1730 Reconstruct it for later use during GC. */
1731 case R_386_GNU_VTINHERIT:
d17e0c6e 1732 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
c2e61a4e 1733 return FALSE;
252b5132
RH		 1734 break;
1735
1736 /* This relocation describes which C++ vtable entries are actually
1737 used. Record for later use during GC. */
1738 case R_386_GNU_VTENTRY:
c6aa130f
MS		 1739 BFD_ASSERT (h != NULL);
1740 if (h != NULL
1741 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
c2e61a4e 1742 return FALSE;
252b5132
RH		 1743 break;
1744
1745 default:
1746 break;
1747 }
1748 }
1749
b34976b6 1750 return TRUE;
252b5132
RH		 1751}
1752
1753/* Return the section that should be marked against GC for a given
1754 relocation. */
1755
1756static asection *
55fd94b0 1757elf_i386_gc_mark_hook (asection *sec,
07adf181 1758 struct bfd_link_info *info,
55fd94b0
AM		 1759 Elf_Internal_Rela *rel,
1760 struct elf_link_hash_entry *h,
1761 Elf_Internal_Sym *sym)
252b5132
RH		 1762{
1763 if (h != NULL)
07adf181
AM		 1764 switch (ELF32_R_TYPE (rel->r_info))
1765 {
1766 case R_386_GNU_VTINHERIT:
1767 case R_386_GNU_VTENTRY:
1768 return NULL;
1769 }
1770
1771 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
252b5132
RH		 1772}
1773
1774/* Update the got entry reference counts for the section being removed. */
1775
b34976b6 1776static bfd_boolean
55fd94b0
AM		 1777elf_i386_gc_sweep_hook (bfd *abfd,
1778 struct bfd_link_info *info,
1779 asection *sec,
1780 const Elf_Internal_Rela *relocs)
252b5132 1781{
4dfe6ac6 1782 struct elf_i386_link_hash_table *htab;
dd5724d5
AM		 1783 Elf_Internal_Shdr *symtab_hdr;
1784 struct elf_link_hash_entry **sym_hashes;
1785 bfd_signed_vma *local_got_refcounts;
1786 const Elf_Internal_Rela *rel, *relend;
dd5724d5 1787
7dda2462
TG		 1788 if (info->relocatable)
1789 return TRUE;
1790
4dfe6ac6
NC		 1791 htab = elf_i386_hash_table (info);
1792 if (htab == NULL)
1793 return FALSE;
1794
ec338859 1795 elf_section_data (sec)->local_dynrel = NULL;
dd5724d5 1796
0ffa91dd 1797 symtab_hdr = &elf_symtab_hdr (abfd);
6725bdbf
AM		 1798 sym_hashes = elf_sym_hashes (abfd);
1799 local_got_refcounts = elf_local_got_refcounts (abfd);
dd5724d5
AM		 1800
1801 relend = relocs + sec->reloc_count;
1802 for (rel = relocs; rel < relend; rel++)
26e41594
AM		 1803 {
1804 unsigned long r_symndx;
1805 unsigned int r_type;
1806 struct elf_link_hash_entry *h = NULL;
37e55690 1807
26e41594
AM		 1808 r_symndx = ELF32_R_SYM (rel->r_info);
1809 if (r_symndx >= symtab_hdr->sh_info)
1810 {
26e41594 1811 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3eb128b2
AM		 1812 while (h->root.type == bfd_link_hash_indirect
1813 || h->root.type == bfd_link_hash_warning)
1814 h = (struct elf_link_hash_entry *) h->root.u.i.link;
26e41594 1815 }
bb1cb422
L		 1816 else
1817 {
1818 /* A local symbol. */
1819 Elf_Internal_Sym *isym;
1820
1821 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1822 abfd, r_symndx);
1823
1824 /* Check relocation against local STT_GNU_IFUNC symbol. */
1825 if (isym != NULL
1826 && ELF32_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1827 {
1828 h = elf_i386_get_local_sym_hash (htab, abfd, rel, FALSE);
1829 if (h == NULL)
1830 abort ();
1831 }
1832 }
0c715baa 1833
3db2e7dd
L		 1834 if (h)
1835 {
1836 struct elf_i386_link_hash_entry *eh;
1837 struct elf_dyn_relocs **pp;
1838 struct elf_dyn_relocs *p;
1839
1840 eh = (struct elf_i386_link_hash_entry *) h;
1841 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
1842 if (p->sec == sec)
1843 {
1844 /* Everything must go for SEC. */
1845 *pp = p->next;
1846 break;
1847 }
1848 }
1849
26e41594 1850 r_type = ELF32_R_TYPE (rel->r_info);
142411ca
L		 1851 if (! elf_i386_tls_transition (info, abfd, sec, NULL,
1852 symtab_hdr, sym_hashes,
1853 &r_type, GOT_UNKNOWN,
4c544807 1854 rel, relend, h, r_symndx))
142411ca
L		 1855 return FALSE;
1856
26e41594
AM		 1857 switch (r_type)
1858 {
1859 case R_386_TLS_LDM:
4dfe6ac6
NC		 1860 if (htab->tls_ldm_got.refcount > 0)
1861 htab->tls_ldm_got.refcount -= 1;
26e41594 1862 break;
0c715baa 1863
26e41594 1864 case R_386_TLS_GD:
67a4f2b7
AO		 1865 case R_386_TLS_GOTDESC:
1866 case R_386_TLS_DESC_CALL:
26e41594
AM		 1867 case R_386_TLS_IE_32:
1868 case R_386_TLS_IE:
1869 case R_386_TLS_GOTIE:
1870 case R_386_GOT32:
1871 if (h != NULL)
1872 {
1873 if (h->got.refcount > 0)
1874 h->got.refcount -= 1;
bb1cb422
L		 1875 if (h->type == STT_GNU_IFUNC)
1876 {
1877 if (h->plt.refcount > 0)
1878 h->plt.refcount -= 1;
1879 }
26e41594
AM		 1880 }
1881 else if (local_got_refcounts != NULL)
1882 {
1883 if (local_got_refcounts[r_symndx] > 0)
1884 local_got_refcounts[r_symndx] -= 1;
1885 }
1886 break;
0c715baa 1887
26e41594
AM		 1888 case R_386_32:
1889 case R_386_PC32:
3db2e7dd
L		 1890 if (info->shared
1891 && (h == NULL || h->type != STT_GNU_IFUNC))
26e41594
AM		 1892 break;
1893 /* Fall through */
6725bdbf 1894
26e41594
AM		 1895 case R_386_PLT32:
1896 if (h != NULL)
1897 {
1898 if (h->plt.refcount > 0)
1899 h->plt.refcount -= 1;
1900 }
1901 break;
dd5724d5 1902
bb1cb422
L		 1903 case R_386_GOTOFF:
1904 if (h != NULL && h->type == STT_GNU_IFUNC)
1905 {
1906 if (h->got.refcount > 0)
1907 h->got.refcount -= 1;
1908 if (h->plt.refcount > 0)
1909 h->plt.refcount -= 1;
1910 }
1911 break;
1912
26e41594
AM		 1913 default:
1914 break;
1915 }
1916 }
252b5132 1917
b34976b6 1918 return TRUE;
252b5132
RH		 1919}
1920
1921/* Adjust a symbol defined by a dynamic object and referenced by a
1922 regular object. The current definition is in some section of the
1923 dynamic object, but we're not including those sections. We have to
1924 change the definition to something the rest of the link can
1925 understand. */
1926
b34976b6 1927static bfd_boolean
55fd94b0
AM		 1928elf_i386_adjust_dynamic_symbol (struct bfd_link_info *info,
1929 struct elf_link_hash_entry *h)
252b5132 1930{
6725bdbf 1931 struct elf_i386_link_hash_table *htab;
252b5132 1932 asection *s;
252b5132 1933
cbe950e9
L		 1934 /* STT_GNU_IFUNC symbol must go through PLT. */
1935 if (h->type == STT_GNU_IFUNC)
1936 {
1937 if (h->plt.refcount <= 0)
1938 {
1939 h->plt.offset = (bfd_vma) -1;
1940 h->needs_plt = 0;
1941 }
1942 return TRUE;
1943 }
1944
252b5132
RH		 1945 /* If this is a function, put it in the procedure linkage table. We
1946 will fill in the contents of the procedure linkage table later,
1947 when we know the address of the .got section. */
1948 if (h->type == STT_FUNC
f5385ebf 1949 || h->needs_plt)
252b5132 1950 {
6725bdbf 1951 if (h->plt.refcount <= 0
9c7a29a3
AM		 1952 || SYMBOL_CALLS_LOCAL (info, h)
1953 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
1954 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH		 1955 {
1956 /* This case can occur if we saw a PLT32 reloc in an input
dd5724d5
AM		 1957 file, but the symbol was never referred to by a dynamic
1958 object, or if all references were garbage collected. In
1959 such a case, we don't actually need to build a procedure
1960 linkage table, and we can just do a PC32 reloc instead. */
bbd7ec4a 1961 h->plt.offset = (bfd_vma) -1;
f5385ebf 1962 h->needs_plt = 0;
252b5132
RH		 1963 }
1964
b34976b6 1965 return TRUE;
252b5132 1966 }
6725bdbf
AM		 1967 else
1968 /* It's possible that we incorrectly decided a .plt reloc was
1969 needed for an R_386_PC32 reloc to a non-function sym in
1970 check_relocs. We can't decide accurately between function and
1971 non-function syms in check-relocs; Objects loaded later in
1972 the link may change h->type. So fix it now. */
bbd7ec4a 1973 h->plt.offset = (bfd_vma) -1;
252b5132
RH		 1974
1975 /* If this is a weak symbol, and there is a real definition, the
1976 processor independent code will have arranged for us to see the
1977 real definition first, and we can just use the same value. */
f6e332e6 1978 if (h->u.weakdef != NULL)
252b5132 1979 {
f6e332e6
AM		 1980 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
1981 || h->u.weakdef->root.type == bfd_link_hash_defweak);
1982 h->root.u.def.section = h->u.weakdef->root.u.def.section;
1983 h->root.u.def.value = h->u.weakdef->root.u.def.value;
a23b6845 1984 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
f6e332e6 1985 h->non_got_ref = h->u.weakdef->non_got_ref;
b34976b6 1986 return TRUE;
252b5132
RH		 1987 }
1988
1989 /* This is a reference to a symbol defined by a dynamic object which
1990 is not a function. */
1991
1992 /* If we are creating a shared library, we must presume that the
1993 only references to the symbol are via the global offset table.
1994 For such cases we need not do anything here; the relocations will
1995 be handled correctly by relocate_section. */
1996 if (info->shared)
b34976b6 1997 return TRUE;
252b5132 1998
7843f00e
ILT		 1999 /* If there are no references to this symbol that do not use the
2000 GOT, we don't need to generate a copy reloc. */
f5385ebf 2001 if (!h->non_got_ref)
b34976b6 2002 return TRUE;
7843f00e 2003
8bd621d8
AM		 2004 /* If -z nocopyreloc was given, we won't generate them either. */
2005 if (info->nocopyreloc)
2006 {
f5385ebf 2007 h->non_got_ref = 0;
b34976b6 2008 return TRUE;
8bd621d8
AM		 2009 }
2010
643796e3 2011 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 2012 if (htab == NULL)
2013 return FALSE;
643796e3
DJ		 2014
2015 /* If there aren't any dynamic relocs in read-only sections, then
2016 we can keep the dynamic relocs and avoid the copy reloc. This
2017 doesn't work on VxWorks, where we can not have dynamic relocations
2018 (other than copy and jump slot relocations) in an executable. */
2019 if (ELIMINATE_COPY_RELOCS && !htab->is_vxworks)
ebe50bae 2020 {
a23b6845 2021 struct elf_i386_link_hash_entry * eh;
e03a8ed8 2022 struct elf_dyn_relocs *p;
ebe50bae 2023
a23b6845
AM		 2024 eh = (struct elf_i386_link_hash_entry *) h;
2025 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2026 {
2027 s = p->sec->output_section;
2028 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2029 break;
2030 }
2031
a23b6845
AM		 2032 if (p == NULL)
2033 {
f5385ebf 2034 h->non_got_ref = 0;
a23b6845
AM		 2035 return TRUE;
2036 }
ebe50bae
AM		 2037 }
2038
909272ee
AM		 2039 if (h->size == 0)
2040 {
2041 (*_bfd_error_handler) (_("dynamic variable `%s' is zero size"),
2042 h->root.root.string);
2043 return TRUE;
2044 }
2045
252b5132
RH		 2046 /* We must allocate the symbol in our .dynbss section, which will
2047 become part of the .bss section of the executable. There will be
2048 an entry for this symbol in the .dynsym section. The dynamic
2049 object will contain position independent code, so all references
2050 from the dynamic object to this symbol will go through the global
2051 offset table. The dynamic linker will use the .dynsym entry to
2052 determine the address it must put in the global offset table, so
2053 both the dynamic object and the regular object will refer to the
2054 same memory location for the variable. */
2055
252b5132
RH		 2056 /* We must generate a R_386_COPY reloc to tell the dynamic linker to
2057 copy the initial value out of the dynamic object and into the
0ac8d2ca 2058 runtime process image. */
252b5132
RH		 2059 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2060 {
eea6121a 2061 htab->srelbss->size += sizeof (Elf32_External_Rel);
f5385ebf 2062 h->needs_copy = 1;
252b5132
RH		 2063 }
2064
0ac8d2ca 2065 s = htab->sdynbss;
252b5132 2066
027297b7 2067 return _bfd_elf_adjust_dynamic_copy (h, s);
252b5132
RH		 2068}
2069
6725bdbf 2070/* Allocate space in .plt, .got and associated reloc sections for
0c715baa 2071 dynamic relocs. */
6725bdbf 2072
b34976b6 2073static bfd_boolean
eb4ff4d6 2074elf_i386_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
6725bdbf
AM		 2075{
2076 struct bfd_link_info *info;
2077 struct elf_i386_link_hash_table *htab;
5a15f56f 2078 struct elf_i386_link_hash_entry *eh;
e03a8ed8 2079 struct elf_dyn_relocs *p;
6725bdbf 2080
e92d460e 2081 if (h->root.type == bfd_link_hash_indirect)
b34976b6 2082 return TRUE;
6725bdbf 2083
e92d460e
AM		 2084 if (h->root.type == bfd_link_hash_warning)
2085 /* When warning symbols are created, they **replace** the "real"
2086 entry in the hash table, thus we never get to see the real
2087 symbol in a hash traversal. So look at it now. */
2088 h = (struct elf_link_hash_entry *) h->root.u.i.link;
cbe950e9 2089 eh = (struct elf_i386_link_hash_entry *) h;
e92d460e 2090
6725bdbf
AM		 2091 info = (struct bfd_link_info *) inf;
2092 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 2093 if (htab == NULL)
2094 return FALSE;
6725bdbf 2095
cbe950e9
L		 2096 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
2097 here if it is defined and referenced in a non-shared object. */
2098 if (h->type == STT_GNU_IFUNC
2099 && h->def_regular)
e03a8ed8
L		 2100 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
2101 &eh->dyn_relocs,
2102 PLT_ENTRY_SIZE, 4);
cbe950e9
L		 2103 else if (htab->elf.dynamic_sections_created
2104 && h->plt.refcount > 0)
6725bdbf 2105 {
5a15f56f
AM		 2106 /* Make sure this symbol is output as a dynamic symbol.
2107 Undefined weak syms won't yet be marked as dynamic. */
2108 if (h->dynindx == -1
f5385ebf 2109 && !h->forced_local)
5a15f56f 2110 {
c152c796 2111 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2112 return FALSE;
5a15f56f
AM		 2113 }
2114
4e795f50
AM		 2115 if (info->shared
2116 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
ced53ee5 2117 {
6de2ae4a 2118 asection *s = htab->elf.splt;
6725bdbf 2119
ced53ee5
AM		 2120 /* If this is the first .plt entry, make room for the special
2121 first entry. */
eea6121a
AM		 2122 if (s->size == 0)
2123 s->size += PLT_ENTRY_SIZE;
6725bdbf 2124
eea6121a 2125 h->plt.offset = s->size;
6725bdbf 2126
ced53ee5
AM		 2127 /* If this symbol is not defined in a regular file, and we are
2128 not generating a shared library, then set the symbol to this
2129 location in the .plt. This is required to make function
2130 pointers compare as equal between the normal executable and
2131 the shared library. */
2132 if (! info->shared
f5385ebf 2133 && !h->def_regular)
ced53ee5
AM		 2134 {
2135 h->root.u.def.section = s;
2136 h->root.u.def.value = h->plt.offset;
2137 }
6725bdbf 2138
ced53ee5 2139 /* Make room for this entry. */
eea6121a 2140 s->size += PLT_ENTRY_SIZE;
6725bdbf 2141
ced53ee5
AM		 2142 /* We also need to make an entry in the .got.plt section, which
2143 will be placed in the .got section by the linker script. */
6de2ae4a 2144 htab->elf.sgotplt->size += 4;
6725bdbf 2145
6725bdbf 2146 /* We also need to make an entry in the .rel.plt section. */
6de2ae4a 2147 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
5ae0bfb6 2148 htab->next_tls_desc_index++;
eac338cf
PB		 2149
2150 if (htab->is_vxworks && !info->shared)
2151 {
2152 /* VxWorks has a second set of relocations for each PLT entry
2153 in executables. They go in a separate relocation section,
2154 which is processed by the kernel loader. */
2155
2156 /* There are two relocations for the initial PLT entry: an
2157 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 4 and an
2158 R_386_32 relocation for _GLOBAL_OFFSET_TABLE_ + 8. */
2159
2160 if (h->plt.offset == PLT_ENTRY_SIZE)
2161 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2162
2163 /* There are two extra relocations for each subsequent PLT entry:
2164 an R_386_32 relocation for the GOT entry, and an R_386_32
2165 relocation for the PLT entry. */
2166
2167 htab->srelplt2->size += (sizeof (Elf32_External_Rel) * 2);
2168 }
6725bdbf 2169 }
ced53ee5
AM		 2170 else
2171 {
51b64d56 2172 h->plt.offset = (bfd_vma) -1;
f5385ebf 2173 h->needs_plt = 0;
ced53ee5 2174 }
6725bdbf
AM		 2175 }
2176 else
2177 {
51b64d56 2178 h->plt.offset = (bfd_vma) -1;
f5385ebf 2179 h->needs_plt = 0;
6725bdbf
AM		 2180 }
2181
67a4f2b7
AO		 2182 eh->tlsdesc_got = (bfd_vma) -1;
2183
37e55690 2184 /* If R_386_TLS_{IE_32,IE,GOTIE} symbol is now local to the binary,
13ae64f3
JJ		 2185 make it a R_386_TLS_LE_32 requiring no TLS entry. */
2186 if (h->got.refcount > 0
1d85728f 2187 && info->executable
13ae64f3 2188 && h->dynindx == -1
37e55690 2189 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE))
cedb70c5 2190 h->got.offset = (bfd_vma) -1;
13ae64f3 2191 else if (h->got.refcount > 0)
6725bdbf 2192 {
0ac8d2ca 2193 asection *s;
b34976b6 2194 bfd_boolean dyn;
13ae64f3 2195 int tls_type = elf_i386_hash_entry(h)->tls_type;
6725bdbf 2196
5a15f56f
AM		 2197 /* Make sure this symbol is output as a dynamic symbol.
2198 Undefined weak syms won't yet be marked as dynamic. */
2199 if (h->dynindx == -1
f5385ebf 2200 && !h->forced_local)
5a15f56f 2201 {
c152c796 2202 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2203 return FALSE;
5a15f56f
AM		 2204 }
2205
6de2ae4a 2206 s = htab->elf.sgot;
67a4f2b7
AO		 2207 if (GOT_TLS_GDESC_P (tls_type))
2208 {
6de2ae4a 2209 eh->tlsdesc_got = htab->elf.sgotplt->size
67a4f2b7 2210 - elf_i386_compute_jump_table_size (htab);
6de2ae4a 2211 htab->elf.sgotplt->size += 8;
67a4f2b7
AO		 2212 h->got.offset = (bfd_vma) -2;
2213 }
2214 if (! GOT_TLS_GDESC_P (tls_type)
2215 || GOT_TLS_GD_P (tls_type))
2216 {
2217 h->got.offset = s->size;
2218 s->size += 4;
2219 /* R_386_TLS_GD needs 2 consecutive GOT slots. */
2220 if (GOT_TLS_GD_P (tls_type) || tls_type == GOT_TLS_IE_BOTH)
2221 s->size += 4;
2222 }
ebe50bae 2223 dyn = htab->elf.dynamic_sections_created;
13ae64f3 2224 /* R_386_TLS_IE_32 needs one dynamic relocation,
37e55690
JJ		 2225 R_386_TLS_IE resp. R_386_TLS_GOTIE needs one dynamic relocation,
2226 (but if both R_386_TLS_IE_32 and R_386_TLS_IE is present, we
2227 need two), R_386_TLS_GD needs one if local symbol and two if
2228 global. */
2229 if (tls_type == GOT_TLS_IE_BOTH)
6de2ae4a 2230 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7 2231 else if ((GOT_TLS_GD_P (tls_type) && h->dynindx == -1)
37e55690 2232 || (tls_type & GOT_TLS_IE))
6de2ae4a 2233 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
67a4f2b7 2234 else if (GOT_TLS_GD_P (tls_type))
6de2ae4a 2235 htab->elf.srelgot->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7
AO		 2236 else if (! GOT_TLS_GDESC_P (tls_type)
2237 && (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2238 || h->root.type != bfd_link_hash_undefweak)
ef5aade5
L		 2239 && (info->shared
2240 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
6de2ae4a 2241 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
67a4f2b7 2242 if (GOT_TLS_GDESC_P (tls_type))
6de2ae4a 2243 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
6725bdbf
AM		 2244 }
2245 else
51b64d56 2246 h->got.offset = (bfd_vma) -1;
6725bdbf 2247
5a15f56f 2248 if (eh->dyn_relocs == NULL)
b34976b6 2249 return TRUE;
5a15f56f 2250
0c715baa
AM		 2251 /* In the shared -Bsymbolic case, discard space allocated for
2252 dynamic pc-relative relocs against symbols which turn out to be
2253 defined in regular objects. For the normal shared case, discard
0ac8d2ca
AM		 2254 space for pc-relative relocs that have become local due to symbol
2255 visibility changes. */
0c715baa
AM		 2256
2257 if (info->shared)
5a15f56f 2258 {
09695f56
AM		 2259 /* The only reloc that uses pc_count is R_386_PC32, which will
2260 appear on a call or on something like ".long foo - .". We
2261 want calls to protected symbols to resolve directly to the
2262 function rather than going via the plt. If people want
2263 function pointer comparisons to work as expected then they
2264 should avoid writing assembly like ".long foo - .". */
2265 if (SYMBOL_CALLS_LOCAL (info, h))
5a15f56f 2266 {
e03a8ed8 2267 struct elf_dyn_relocs **pp;
0c715baa
AM		 2268
2269 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2270 {
2271 p->count -= p->pc_count;
2272 p->pc_count = 0;
2273 if (p->count == 0)
2274 *pp = p->next;
2275 else
2276 pp = &p->next;
2277 }
5a15f56f 2278 }
4e795f50 2279
3348747a
NS		 2280 if (htab->is_vxworks)
2281 {
e03a8ed8 2282 struct elf_dyn_relocs **pp;
3348747a
NS		 2283 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2284 {
2285 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2286 *pp = p->next;
2287 else
2288 pp = &p->next;
2289 }
2290 }
2291
4e795f50 2292 /* Also discard relocs on undefined weak syms with non-default
3348747a 2293 visibility. */
22d606e9 2294 if (eh->dyn_relocs != NULL
4e795f50 2295 && h->root.type == bfd_link_hash_undefweak)
22d606e9
AM		 2296 {
2297 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
2298 eh->dyn_relocs = NULL;
2299
2300 /* Make sure undefined weak symbols are output as a dynamic
2301 symbol in PIEs. */
2302 else if (h->dynindx == -1
2303 && !h->forced_local)
2304 {
2305 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2306 return FALSE;
2307 }
2308 }
0c715baa 2309 }
a23b6845 2310 else if (ELIMINATE_COPY_RELOCS)
0c715baa
AM		 2311 {
2312 /* For the non-shared case, discard space for relocs against
2313 symbols which turn out to need copy relocs or are not
2314 dynamic. */
2315
f5385ebf
AM		 2316 if (!h->non_got_ref
2317 && ((h->def_dynamic
2318 && !h->def_regular)
ebe50bae 2319 || (htab->elf.dynamic_sections_created
0c715baa
AM		 2320 && (h->root.type == bfd_link_hash_undefweak
2321 || h->root.type == bfd_link_hash_undefined))))
2322 {
2323 /* Make sure this symbol is output as a dynamic symbol.
2324 Undefined weak syms won't yet be marked as dynamic. */
2325 if (h->dynindx == -1
f5385ebf 2326 && !h->forced_local)
0c715baa 2327 {
c152c796 2328 if (! bfd_elf_link_record_dynamic_symbol (info, h))
b34976b6 2329 return FALSE;
0c715baa 2330 }
5a15f56f 2331
0c715baa
AM		 2332 /* If that succeeded, we know we'll be keeping all the
2333 relocs. */
2334 if (h->dynindx != -1)
2335 goto keep;
2336 }
2337
2338 eh->dyn_relocs = NULL;
2339
ec338859 2340 keep: ;
5a15f56f
AM		 2341 }
2342
0c715baa
AM		 2343 /* Finally, allocate space. */
2344 for (p = eh->dyn_relocs; p != NULL; p = p->next)
12d0ee4a 2345 {
e7c33416
NC		 2346 asection *sreloc;
2347
cbe950e9 2348 sreloc = elf_section_data (p->sec)->sreloc;
e7c33416
NC		 2349
2350 BFD_ASSERT (sreloc != NULL);
eea6121a 2351 sreloc->size += p->count * sizeof (Elf32_External_Rel);
12d0ee4a
AM		 2352 }
2353
b34976b6 2354 return TRUE;
6725bdbf
AM		 2355}
2356
c25bc9fc
L		 2357/* Allocate space in .plt, .got and associated reloc sections for
2358 local dynamic relocs. */
2359
2360static bfd_boolean
2361elf_i386_allocate_local_dynrelocs (void **slot, void *inf)
2362{
2363 struct elf_link_hash_entry *h
2364 = (struct elf_link_hash_entry *) *slot;
2365
2366 if (h->type != STT_GNU_IFUNC
2367 || !h->def_regular
2368 || !h->ref_regular
2369 || !h->forced_local
2370 || h->root.type != bfd_link_hash_defined)
2371 abort ();
2372
2373 return elf_i386_allocate_dynrelocs (h, inf);
2374}
2375
0c715baa
AM		 2376/* Find any dynamic relocs that apply to read-only sections. */
2377
b34976b6 2378static bfd_boolean
eb4ff4d6 2379elf_i386_readonly_dynrelocs (struct elf_link_hash_entry *h, void *inf)
0c715baa
AM		 2380{
2381 struct elf_i386_link_hash_entry *eh;
e03a8ed8 2382 struct elf_dyn_relocs *p;
0c715baa 2383
e92d460e
AM		 2384 if (h->root.type == bfd_link_hash_warning)
2385 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2386
aa715242
L		 2387 /* Skip local IFUNC symbols. */
2388 if (h->forced_local && h->type == STT_GNU_IFUNC)
2389 return TRUE;
2390
0c715baa
AM		 2391 eh = (struct elf_i386_link_hash_entry *) h;
2392 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2393 {
2394 asection *s = p->sec->output_section;
2395
2396 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2397 {
2398 struct bfd_link_info *info = (struct bfd_link_info *) inf;
2399
2400 info->flags |= DF_TEXTREL;
2401
2402 /* Not an error, just cut short the traversal. */
b34976b6 2403 return FALSE;
0c715baa
AM		 2404 }
2405 }
b34976b6 2406 return TRUE;
0c715baa
AM		 2407}
2408
252b5132
RH		 2409/* Set the sizes of the dynamic sections. */
2410
b34976b6 2411static bfd_boolean
55fd94b0
AM		 2412elf_i386_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
2413 struct bfd_link_info *info)
252b5132 2414{
6725bdbf 2415 struct elf_i386_link_hash_table *htab;
252b5132
RH		 2416 bfd *dynobj;
2417 asection *s;
b34976b6 2418 bfd_boolean relocs;
0c715baa 2419 bfd *ibfd;
252b5132 2420
6725bdbf 2421 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 2422 if (htab == NULL)
2423 return FALSE;
ebe50bae 2424 dynobj = htab->elf.dynobj;
ffb2e45b
AM		 2425 if (dynobj == NULL)
2426 abort ();
252b5132 2427
ebe50bae 2428 if (htab->elf.dynamic_sections_created)
252b5132
RH		 2429 {
2430 /* Set the contents of the .interp section to the interpreter. */
36af4a4e 2431 if (info->executable)
252b5132
RH		 2432 {
2433 s = bfd_get_section_by_name (dynobj, ".interp");
ffb2e45b
AM		 2434 if (s == NULL)
2435 abort ();
eea6121a 2436 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
252b5132
RH		 2437 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2438 }
161d71a6 2439 }
6725bdbf 2440
0c715baa
AM		 2441 /* Set up .got offsets for local syms, and space for local dynamic
2442 relocs. */
2443 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
161d71a6
L		 2444 {
2445 bfd_signed_vma *local_got;
2446 bfd_signed_vma *end_local_got;
13ae64f3 2447 char *local_tls_type;
67a4f2b7 2448 bfd_vma *local_tlsdesc_gotent;
161d71a6
L		 2449 bfd_size_type locsymcount;
2450 Elf_Internal_Shdr *symtab_hdr;
2451 asection *srel;
6725bdbf 2452
0ffa91dd 2453 if (! is_i386_elf (ibfd))
161d71a6 2454 continue;
6725bdbf 2455
0c715baa
AM		 2456 for (s = ibfd->sections; s != NULL; s = s->next)
2457 {
e03a8ed8 2458 struct elf_dyn_relocs *p;
0c715baa 2459
e03a8ed8 2460 for (p = ((struct elf_dyn_relocs *)
e81d3500 2461 elf_section_data (s)->local_dynrel);
ec338859
AM		 2462 p != NULL;
2463 p = p->next)
0c715baa 2464 {
ec338859
AM		 2465 if (!bfd_is_abs_section (p->sec)
2466 && bfd_is_abs_section (p->sec->output_section))
2467 {
2468 /* Input section has been discarded, either because
2469 it is a copy of a linkonce section or due to
2470 linker script /DISCARD/, so we'll be discarding
2471 the relocs too. */
2472 }
3348747a
NS		 2473 else if (htab->is_vxworks
2474 && strcmp (p->sec->output_section->name,
2475 ".tls_vars") == 0)
2476 {
2477 /* Relocations in vxworks .tls_vars sections are
2478 handled specially by the loader. */
2479 }
248866a8 2480 else if (p->count != 0)
ec338859
AM		 2481 {
2482 srel = elf_section_data (p->sec)->sreloc;
eea6121a 2483 srel->size += p->count * sizeof (Elf32_External_Rel);
248866a8
AM		 2484 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2485 info->flags |= DF_TEXTREL;
ec338859 2486 }
0c715baa
AM		 2487 }
2488 }
2489
2490 local_got = elf_local_got_refcounts (ibfd);
161d71a6
L		 2491 if (!local_got)
2492 continue;
6725bdbf 2493
0ffa91dd 2494 symtab_hdr = &elf_symtab_hdr (ibfd);
161d71a6
L		 2495 locsymcount = symtab_hdr->sh_info;
2496 end_local_got = local_got + locsymcount;
13ae64f3 2497 local_tls_type = elf_i386_local_got_tls_type (ibfd);
67a4f2b7 2498 local_tlsdesc_gotent = elf_i386_local_tlsdesc_gotent (ibfd);
6de2ae4a
L		 2499 s = htab->elf.sgot;
2500 srel = htab->elf.srelgot;
67a4f2b7
AO		 2501 for (; local_got < end_local_got;
2502 ++local_got, ++local_tls_type, ++local_tlsdesc_gotent)
161d71a6 2503 {
67a4f2b7 2504 *local_tlsdesc_gotent = (bfd_vma) -1;
161d71a6 2505 if (*local_got > 0)
6725bdbf 2506 {
67a4f2b7
AO		 2507 if (GOT_TLS_GDESC_P (*local_tls_type))
2508 {
6de2ae4a 2509 *local_tlsdesc_gotent = htab->elf.sgotplt->size
67a4f2b7 2510 - elf_i386_compute_jump_table_size (htab);
6de2ae4a 2511 htab->elf.sgotplt->size += 8;
67a4f2b7
AO		 2512 *local_got = (bfd_vma) -2;
2513 }
2514 if (! GOT_TLS_GDESC_P (*local_tls_type)
2515 || GOT_TLS_GD_P (*local_tls_type))
2516 {
2517 *local_got = s->size;
2518 s->size += 4;
2519 if (GOT_TLS_GD_P (*local_tls_type)
2520 || *local_tls_type == GOT_TLS_IE_BOTH)
2521 s->size += 4;
2522 }
13ae64f3 2523 if (info->shared
67a4f2b7 2524 || GOT_TLS_GD_ANY_P (*local_tls_type)
37e55690
JJ		 2525 || (*local_tls_type & GOT_TLS_IE))
2526 {
2527 if (*local_tls_type == GOT_TLS_IE_BOTH)
eea6121a 2528 srel->size += 2 * sizeof (Elf32_External_Rel);
67a4f2b7
AO		 2529 else if (GOT_TLS_GD_P (*local_tls_type)
2530 || ! GOT_TLS_GDESC_P (*local_tls_type))
eea6121a 2531 srel->size += sizeof (Elf32_External_Rel);
67a4f2b7 2532 if (GOT_TLS_GDESC_P (*local_tls_type))
6de2ae4a 2533 htab->elf.srelplt->size += sizeof (Elf32_External_Rel);
37e55690 2534 }
6725bdbf 2535 }
161d71a6
L		 2536 else
2537 *local_got = (bfd_vma) -1;
6725bdbf 2538 }
252b5132 2539 }
6725bdbf 2540
13ae64f3
JJ		 2541 if (htab->tls_ldm_got.refcount > 0)
2542 {
2543 /* Allocate 2 got entries and 1 dynamic reloc for R_386_TLS_LDM
2544 relocs. */
6de2ae4a
L		 2545 htab->tls_ldm_got.offset = htab->elf.sgot->size;
2546 htab->elf.sgot->size += 8;
2547 htab->elf.srelgot->size += sizeof (Elf32_External_Rel);
13ae64f3
JJ		 2548 }
2549 else
2550 htab->tls_ldm_got.offset = -1;
2551
0c715baa
AM		 2552 /* Allocate global sym .plt and .got entries, and space for global
2553 sym dynamic relocs. */
eb4ff4d6 2554 elf_link_hash_traverse (&htab->elf, elf_i386_allocate_dynrelocs, info);
252b5132 2555
c25bc9fc
L		 2556 /* Allocate .plt and .got entries, and space for local symbols. */
2557 htab_traverse (htab->loc_hash_table,
2558 elf_i386_allocate_local_dynrelocs,
2559 info);
2560
67a4f2b7
AO		 2561 /* For every jump slot reserved in the sgotplt, reloc_count is
2562 incremented. However, when we reserve space for TLS descriptors,
2563 it's not incremented, so in order to compute the space reserved
2564 for them, it suffices to multiply the reloc count by the jump
2565 slot size. */
6de2ae4a 2566 if (htab->elf.srelplt)
5ae0bfb6 2567 htab->sgotplt_jump_table_size = htab->next_tls_desc_index * 4;
67a4f2b7 2568
a7b16ceb
L		 2569 if (htab->elf.sgotplt)
2570 {
e28df02b
L		 2571 struct elf_link_hash_entry *got;
2572 got = elf_link_hash_lookup (elf_hash_table (info),
2573 "_GLOBAL_OFFSET_TABLE_",
2574 FALSE, FALSE, FALSE);
2575
a7b16ceb 2576 /* Don't allocate .got.plt section if there are no GOT nor PLT
e28df02b
L		 2577 entries and there is no refeence to _GLOBAL_OFFSET_TABLE_. */
2578 if ((got == NULL
2579 || !got->ref_regular_nonweak)
2580 && (htab->elf.sgotplt->size
2581 == get_elf_backend_data (output_bfd)->got_header_size)
a7b16ceb
L		 2582 && (htab->elf.splt == NULL
2583 || htab->elf.splt->size == 0)
2584 && (htab->elf.sgot == NULL
2585 || htab->elf.sgot->size == 0)
2586 && (htab->elf.iplt == NULL
2587 || htab->elf.iplt->size == 0)
2588 && (htab->elf.igotplt == NULL
2589 || htab->elf.igotplt->size == 0))
2590 htab->elf.sgotplt->size = 0;
2591 }
2592
5a15f56f
AM		 2593 /* We now have determined the sizes of the various dynamic sections.
2594 Allocate memory for them. */
b34976b6 2595 relocs = FALSE;
252b5132
RH		 2596 for (s = dynobj->sections; s != NULL; s = s->next)
2597 {
eac338cf
PB		 2598 bfd_boolean strip_section = TRUE;
2599
252b5132
RH		 2600 if ((s->flags & SEC_LINKER_CREATED) == 0)
2601 continue;
2602
6de2ae4a
L		 2603 if (s == htab->elf.splt
2604 || s == htab->elf.sgot
2605 || s == htab->elf.sgotplt
2606 || s == htab->elf.iplt
2607 || s == htab->elf.igotplt
75ff4589 2608 || s == htab->sdynbss)
252b5132 2609 {
6725bdbf
AM		 2610 /* Strip this section if we don't need it; see the
2611 comment below. */
eac338cf
PB		 2612 /* We'd like to strip these sections if they aren't needed, but if
2613 we've exported dynamic symbols from them we must leave them.
2614 It's too late to tell BFD to get rid of the symbols. */
2615
7325306f 2616 if (htab->elf.hplt != NULL)
eac338cf 2617 strip_section = FALSE;
252b5132 2618 }
0112cd26 2619 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rel"))
252b5132 2620 {
6de2ae4a
L		 2621 if (s->size != 0
2622 && s != htab->elf.srelplt
2623 && s != htab->srelplt2)
b34976b6 2624 relocs = TRUE;
252b5132 2625
0ac8d2ca
AM		 2626 /* We use the reloc_count field as a counter if we need
2627 to copy relocs into the output file. */
5ae0bfb6 2628 s->reloc_count = 0;
252b5132 2629 }
6725bdbf 2630 else
252b5132
RH		 2631 {
2632 /* It's not one of our sections, so don't allocate space. */
2633 continue;
2634 }
2635
c456f082 2636 if (s->size == 0)
252b5132 2637 {
0ac8d2ca
AM		 2638 /* If we don't need this section, strip it from the
2639 output file. This is mostly to handle .rel.bss and
2640 .rel.plt. We must create both sections in
2641 create_dynamic_sections, because they must be created
2642 before the linker maps input sections to output
2643 sections. The linker does that before
2644 adjust_dynamic_symbol is called, and it is that
2645 function which decides whether anything needs to go
2646 into these sections. */
c456f082
AM		 2647 if (strip_section)
2648 s->flags |= SEC_EXCLUDE;
252b5132
RH		 2649 continue;
2650 }
2651
c456f082
AM		 2652 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2653 continue;
2654
f69da49f
AM		 2655 /* Allocate memory for the section contents. We use bfd_zalloc
2656 here in case unused entries are not reclaimed before the
2657 section's contents are written out. This should not happen,
2658 but this way if it does, we get a R_386_NONE reloc instead
2659 of garbage. */
a50b1753 2660 s->contents = (unsigned char *) bfd_zalloc (dynobj, s->size);
6725bdbf 2661 if (s->contents == NULL)
b34976b6 2662 return FALSE;
252b5132
RH		 2663 }
2664
ebe50bae 2665 if (htab->elf.dynamic_sections_created)
252b5132
RH		 2666 {
2667 /* Add some entries to the .dynamic section. We fill in the
2668 values later, in elf_i386_finish_dynamic_sections, but we
2669 must add the entries now so that we get the correct size for
2670 the .dynamic section. The DT_DEBUG entry is filled in by the
2671 dynamic linker and used by the debugger. */
dc810e39 2672#define add_dynamic_entry(TAG, VAL) \
5a580b3a 2673 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 2674
36af4a4e 2675 if (info->executable)
252b5132 2676 {
dc810e39 2677 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 2678 return FALSE;
252b5132
RH		 2679 }
2680
6de2ae4a 2681 if (htab->elf.splt->size != 0)
252b5132 2682 {
dc810e39
AM		 2683 if (!add_dynamic_entry (DT_PLTGOT, 0)
2684 || !add_dynamic_entry (DT_PLTRELSZ, 0)
2685 || !add_dynamic_entry (DT_PLTREL, DT_REL)
2686 || !add_dynamic_entry (DT_JMPREL, 0))
b34976b6 2687 return FALSE;
252b5132
RH		 2688 }
2689
2690 if (relocs)
2691 {
dc810e39
AM		 2692 if (!add_dynamic_entry (DT_REL, 0)
2693 || !add_dynamic_entry (DT_RELSZ, 0)
2694 || !add_dynamic_entry (DT_RELENT, sizeof (Elf32_External_Rel)))
b34976b6 2695 return FALSE;
252b5132 2696
0c715baa
AM		 2697 /* If any dynamic relocs apply to a read-only section,
2698 then we need a DT_TEXTREL entry. */
248866a8 2699 if ((info->flags & DF_TEXTREL) == 0)
eb4ff4d6
L		 2700 elf_link_hash_traverse (&htab->elf,
2701 elf_i386_readonly_dynrelocs, info);
0c715baa
AM		 2702
2703 if ((info->flags & DF_TEXTREL) != 0)
2704 {
2705 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 2706 return FALSE;
0c715baa 2707 }
252b5132 2708 }
7a2b07ff
NS		 2709 if (htab->is_vxworks
2710 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
2711 return FALSE;
252b5132 2712 }
dc810e39 2713#undef add_dynamic_entry
252b5132 2714
b34976b6 2715 return TRUE;
252b5132
RH		 2716}
2717
67a4f2b7
AO		 2718static bfd_boolean
2719elf_i386_always_size_sections (bfd *output_bfd,
2720 struct bfd_link_info *info)
2721{
2722 asection *tls_sec = elf_hash_table (info)->tls_sec;
2723
2724 if (tls_sec)
2725 {
2726 struct elf_link_hash_entry *tlsbase;
2727
2728 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
2729 "_TLS_MODULE_BASE_",
2730 FALSE, FALSE, FALSE);
2731
2732 if (tlsbase && tlsbase->type == STT_TLS)
2733 {
4dfe6ac6 2734 struct elf_i386_link_hash_table *htab;
67a4f2b7
AO		 2735 struct bfd_link_hash_entry *bh = NULL;
2736 const struct elf_backend_data *bed
2737 = get_elf_backend_data (output_bfd);
2738
4dfe6ac6
NC		 2739 htab = elf_i386_hash_table (info);
2740 if (htab == NULL)
2741 return FALSE;
2742
67a4f2b7
AO		 2743 if (!(_bfd_generic_link_add_one_symbol
2744 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
2745 tls_sec, 0, NULL, FALSE,
2746 bed->collect, &bh)))
2747 return FALSE;
9f03412a 2748
4dfe6ac6 2749 htab->tls_module_base = bh;
9f03412a 2750
67a4f2b7
AO		 2751 tlsbase = (struct elf_link_hash_entry *)bh;
2752 tlsbase->def_regular = 1;
2753 tlsbase->other = STV_HIDDEN;
2754 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
2755 }
2756 }
2757
2758 return TRUE;
2759}
2760
38701953
AM		 2761/* Set the correct type for an x86 ELF section. We do this by the
2762 section name, which is a hack, but ought to work. */
2763
b34976b6 2764static bfd_boolean
55fd94b0
AM		 2765elf_i386_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
2766 Elf_Internal_Shdr *hdr,
2767 asection *sec)
38701953 2768{
91d6fa6a 2769 const char *name;
38701953
AM		 2770
2771 name = bfd_get_section_name (abfd, sec);
2772
2773 /* This is an ugly, but unfortunately necessary hack that is
2774 needed when producing EFI binaries on x86. It tells
2775 elf.c:elf_fake_sections() not to consider ".reloc" as a section
2776 containing ELF relocation info. We need this hack in order to
2777 be able to generate ELF binaries that can be translated into
2778 EFI applications (which are essentially COFF objects). Those
2779 files contain a COFF ".reloc" section inside an ELFNN object,
2780 which would normally cause BFD to segfault because it would
2781 attempt to interpret this section as containing relocation
2782 entries for section "oc". With this hack enabled, ".reloc"
2783 will be treated as a normal data section, which will avoid the
2784 segfault. However, you won't be able to create an ELFNN binary
2785 with a section named "oc" that needs relocations, but that's
2786 the kind of ugly side-effects you get when detecting section
2787 types based on their names... In practice, this limitation is
2788 unlikely to bite. */
2789 if (strcmp (name, ".reloc") == 0)
2790 hdr->sh_type = SHT_PROGBITS;
2791
b34976b6 2792 return TRUE;
38701953
AM		 2793}
2794
9f03412a
AO		 2795/* _TLS_MODULE_BASE_ needs to be treated especially when linking
2796 executables. Rather than setting it to the beginning of the TLS
2797 section, we have to set it to the end. This function may be called
2798 multiple times, it is idempotent. */
2799
2800static void
eb4ff4d6 2801elf_i386_set_tls_module_base (struct bfd_link_info *info)
9f03412a 2802{
4dfe6ac6 2803 struct elf_i386_link_hash_table *htab;
9f03412a
AO		 2804 struct bfd_link_hash_entry *base;
2805
2806 if (!info->executable)
2807 return;
2808
4dfe6ac6
NC		 2809 htab = elf_i386_hash_table (info);
2810 if (htab == NULL)
2811 return;
9f03412a 2812
4dfe6ac6
NC		 2813 base = htab->tls_module_base;
2814 if (base == NULL)
9f03412a
AO		 2815 return;
2816
4dfe6ac6 2817 base->u.def.value = htab->elf.tls_size;
9f03412a
AO		 2818}
2819
13ae64f3
JJ		 2820/* Return the base VMA address which should be subtracted from real addresses
2821 when resolving @dtpoff relocation.
2822 This is PT_TLS segment p_vaddr. */
2823
2824static bfd_vma
eb4ff4d6 2825elf_i386_dtpoff_base (struct bfd_link_info *info)
13ae64f3 2826{
e1918d23
AM		 2827 /* If tls_sec is NULL, we should have signalled an error already. */
2828 if (elf_hash_table (info)->tls_sec == NULL)
6a30718d 2829 return 0;
e1918d23 2830 return elf_hash_table (info)->tls_sec->vma;
13ae64f3
JJ		 2831}
2832
2833/* Return the relocation value for @tpoff relocation
2834 if STT_TLS virtual address is ADDRESS. */
2835
2836static bfd_vma
eb4ff4d6 2837elf_i386_tpoff (struct bfd_link_info *info, bfd_vma address)
13ae64f3 2838{
e1918d23 2839 struct elf_link_hash_table *htab = elf_hash_table (info);
7dc98aea
RO		 2840 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2841 bfd_vma static_tls_size;
13ae64f3 2842
e1918d23
AM		 2843 /* If tls_sec is NULL, we should have signalled an error already. */
2844 if (htab->tls_sec == NULL)
6a30718d 2845 return 0;
7dc98aea
RO		 2846
2847 /* Consider special static TLS alignment requirements. */
2848 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2849 return static_tls_size + htab->tls_sec->vma - address;
13ae64f3
JJ		 2850}
2851
252b5132
RH		 2852/* Relocate an i386 ELF section. */
2853
b34976b6 2854static bfd_boolean
55fd94b0
AM		 2855elf_i386_relocate_section (bfd *output_bfd,
2856 struct bfd_link_info *info,
2857 bfd *input_bfd,
2858 asection *input_section,
2859 bfd_byte *contents,
2860 Elf_Internal_Rela *relocs,
2861 Elf_Internal_Sym *local_syms,
2862 asection **local_sections)
252b5132 2863{
6725bdbf 2864 struct elf_i386_link_hash_table *htab;
252b5132
RH		 2865 Elf_Internal_Shdr *symtab_hdr;
2866 struct elf_link_hash_entry **sym_hashes;
2867 bfd_vma *local_got_offsets;
67a4f2b7 2868 bfd_vma *local_tlsdesc_gotents;
252b5132
RH		 2869 Elf_Internal_Rela *rel;
2870 Elf_Internal_Rela *relend;
3348747a 2871 bfd_boolean is_vxworks_tls;
252b5132 2872
0ffa91dd 2873 BFD_ASSERT (is_i386_elf (input_bfd));
6bbec505 2874
6725bdbf 2875 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 2876 if (htab == NULL)
2877 return FALSE;
0ffa91dd 2878 symtab_hdr = &elf_symtab_hdr (input_bfd);
252b5132
RH		 2879 sym_hashes = elf_sym_hashes (input_bfd);
2880 local_got_offsets = elf_local_got_offsets (input_bfd);
67a4f2b7 2881 local_tlsdesc_gotents = elf_i386_local_tlsdesc_gotent (input_bfd);
3348747a
NS		 2882 /* We have to handle relocations in vxworks .tls_vars sections
2883 specially, because the dynamic loader is 'weird'. */
2884 is_vxworks_tls = (htab->is_vxworks && info->shared
2885 && !strcmp (input_section->output_section->name,
2886 ".tls_vars"));
252b5132 2887
eb4ff4d6 2888 elf_i386_set_tls_module_base (info);
9f03412a 2889
252b5132
RH		 2890 rel = relocs;
2891 relend = relocs + input_section->reloc_count;
2892 for (; rel < relend; rel++)
2893 {
13ae64f3 2894 unsigned int r_type;
252b5132
RH		 2895 reloc_howto_type *howto;
2896 unsigned long r_symndx;
2897 struct elf_link_hash_entry *h;
2898 Elf_Internal_Sym *sym;
2899 asection *sec;
67a4f2b7 2900 bfd_vma off, offplt;
252b5132 2901 bfd_vma relocation;
b34976b6 2902 bfd_boolean unresolved_reloc;
252b5132 2903 bfd_reloc_status_type r;
1b452ec6 2904 unsigned int indx;
13ae64f3 2905 int tls_type;
252b5132
RH		 2906
2907 r_type = ELF32_R_TYPE (rel->r_info);
55fd94b0
AM		 2908 if (r_type == R_386_GNU_VTINHERIT
2909 || r_type == R_386_GNU_VTENTRY)
252b5132 2910 continue;
dc47f327 2911
55fd94b0 2912 if ((indx = r_type) >= R_386_standard
13ae64f3
JJ		 2913 && ((indx = r_type - R_386_ext_offset) - R_386_standard
2914 >= R_386_ext - R_386_standard)
2915 && ((indx = r_type - R_386_tls_offset) - R_386_ext
cbe950e9 2916 >= R_386_irelative - R_386_ext))
252b5132 2917 {
6ba842b6 2918 (*_bfd_error_handler)
d003868e
AM		 2919 (_("%B: unrecognized relocation (0x%x) in section `%A'"),
2920 input_bfd, input_section, r_type);
252b5132 2921 bfd_set_error (bfd_error_bad_value);
b34976b6 2922 return FALSE;
252b5132 2923 }
1b452ec6 2924 howto = elf_howto_table + indx;
252b5132
RH		 2925
2926 r_symndx = ELF32_R_SYM (rel->r_info);
252b5132
RH		 2927 h = NULL;
2928 sym = NULL;
2929 sec = NULL;
b34976b6 2930 unresolved_reloc = FALSE;
252b5132
RH		 2931 if (r_symndx < symtab_hdr->sh_info)
2932 {
2933 sym = local_syms + r_symndx;
2934 sec = local_sections[r_symndx];
2935 relocation = (sec->output_section->vma
2936 + sec->output_offset
2937 + sym->st_value);
ab96bf03
AM		 2938
2939 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION
2940 && ((sec->flags & SEC_MERGE) != 0
2941 || (info->relocatable
2942 && sec->output_offset != 0)))
f8df10f4 2943 {
f8df10f4 2944 bfd_vma addend;
4a335f3d 2945 bfd_byte *where = contents + rel->r_offset;
f8df10f4 2946
4a335f3d 2947 switch (howto->size)
f8df10f4 2948 {
4a335f3d
AM		 2949 case 0:
2950 addend = bfd_get_8 (input_bfd, where);
2951 if (howto->pc_relative)
2952 {
2953 addend = (addend ^ 0x80) - 0x80;
2954 addend += 1;
2955 }
2956 break;
2957 case 1:
2958 addend = bfd_get_16 (input_bfd, where);
2959 if (howto->pc_relative)
2960 {
2961 addend = (addend ^ 0x8000) - 0x8000;
2962 addend += 2;
2963 }
2964 break;
2965 case 2:
2966 addend = bfd_get_32 (input_bfd, where);
2967 if (howto->pc_relative)
2968 {
2969 addend = (addend ^ 0x80000000) - 0x80000000;
2970 addend += 4;
2971 }
2972 break;
2973 default:
2974 abort ();
f8df10f4
JJ		 2975 }
2976
ab96bf03
AM		 2977 if (info->relocatable)
2978 addend += sec->output_offset;
2979 else
2980 {
2981 asection *msec = sec;
2982 addend = _bfd_elf_rel_local_sym (output_bfd, sym, &msec,
2983 addend);
2984 addend -= relocation;
2985 addend += msec->output_section->vma + msec->output_offset;
2986 }
4a335f3d
AM		 2987
2988 switch (howto->size)
2989 {
2990 case 0:
16a10388 2991 /* FIXME: overflow checks. */
4a335f3d
AM		 2992 if (howto->pc_relative)
2993 addend -= 1;
2994 bfd_put_8 (input_bfd, addend, where);
4a335f3d
AM		 2995 break;
2996 case 1:
2997 if (howto->pc_relative)
2998 addend -= 2;
2999 bfd_put_16 (input_bfd, addend, where);
4a335f3d
AM		 3000 break;
3001 case 2:
3002 if (howto->pc_relative)
3003 addend -= 4;
3004 bfd_put_32 (input_bfd, addend, where);
3005 break;
3006 }
f8df10f4 3007 }
1f85278f
L		 3008 else if (!info->relocatable
3009 && ELF32_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
c25bc9fc
L		 3010 {
3011 /* Relocate against local STT_GNU_IFUNC symbol. */
9fff0c39
L		 3012 h = elf_i386_get_local_sym_hash (htab, input_bfd, rel,
3013 FALSE);
c25bc9fc
L		 3014 if (h == NULL)
3015 abort ();
3016
3017 /* Set STT_GNU_IFUNC symbol value. */
3018 h->root.u.def.value = sym->st_value;
3019 h->root.u.def.section = sec;
3020 }
252b5132
RH		 3021 }
3022 else
3023 {
3d540e93 3024 bfd_boolean warned ATTRIBUTE_UNUSED;
ffb2e45b 3025
b2a8e766
AM		 3026 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
3027 r_symndx, symtab_hdr, sym_hashes,
3028 h, sec, relocation,
3029 unresolved_reloc, warned);
252b5132
RH		 3030 }
3031
ab96bf03 3032 if (sec != NULL && elf_discarded_section (sec))
0672748a
L		 3033 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
3034 rel, relend, howto, contents);
9635fe29 3035
ab96bf03
AM		 3036 if (info->relocatable)
3037 continue;
3038
cbe950e9
L		 3039 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
3040 it here if it is defined in a non-shared object. */
3041 if (h != NULL
3042 && h->type == STT_GNU_IFUNC
3043 && h->def_regular)
3044 {
3045 asection *plt, *gotplt, *base_got;
3046 bfd_vma plt_index;
4c544807 3047 const char *name;
cbe950e9
L		 3048
3049 if ((input_section->flags & SEC_ALLOC) == 0
3050 || h->plt.offset == (bfd_vma) -1)
3051 abort ();
3052
3053 /* STT_GNU_IFUNC symbol must go through PLT. */
6de2ae4a 3054 if (htab->elf.splt != NULL)
cbe950e9 3055 {
6de2ae4a
L		 3056 plt = htab->elf.splt;
3057 gotplt = htab->elf.sgotplt;
cbe950e9
L		 3058 }
3059 else
3060 {
6de2ae4a
L		 3061 plt = htab->elf.iplt;
3062 gotplt = htab->elf.igotplt;
cbe950e9
L		 3063 }
3064
3065 relocation = (plt->output_section->vma
3066 + plt->output_offset + h->plt.offset);
3067
3068 switch (r_type)
3069 {
3070 default:
4c544807
L		 3071 if (h->root.root.string)
3072 name = h->root.root.string;
3073 else
3074 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
3075 NULL);
cbe950e9
L		 3076 (*_bfd_error_handler)
3077 (_("%B: relocation %s against STT_GNU_IFUNC "
3078 "symbol `%s' isn't handled by %s"), input_bfd,
3079 elf_howto_table[r_type].name,
4c544807 3080 name, __FUNCTION__);
cbe950e9
L		 3081 bfd_set_error (bfd_error_bad_value);
3082 return FALSE;
3083
3084 case R_386_32:
710ab287
L		 3085 /* Generate dynamic relcoation only when there is a
3086 non-GOF reference in a shared object. */
3087 if (info->shared && h->non_got_ref)
3088 {
3089 Elf_Internal_Rela outrel;
3090 bfd_byte *loc;
3091 asection *sreloc;
3092 bfd_vma offset;
3093
c25bc9fc
L		 3094 /* Need a dynamic relocation to get the real function
3095 adddress. */
710ab287
L		 3096 offset = _bfd_elf_section_offset (output_bfd,
3097 info,
3098 input_section,
3099 rel->r_offset);
3100 if (offset == (bfd_vma) -1
3101 || offset == (bfd_vma) -2)
3102 abort ();
3103
3104 outrel.r_offset = (input_section->output_section->vma
3105 + input_section->output_offset
3106 + offset);
3107
3108 if (h->dynindx == -1
44c4ea11
L		 3109 || h->forced_local
3110 || info->executable)
710ab287
L		 3111 {
3112 /* This symbol is resolved locally. */
3113 outrel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
3114 bfd_put_32 (output_bfd,
3115 (h->root.u.def.value
3116 + h->root.u.def.section->output_section->vma
3117 + h->root.u.def.section->output_offset),
3118 contents + offset);
3119 }
3120 else
3121 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
3122
6de2ae4a 3123 sreloc = htab->elf.irelifunc;
710ab287
L		 3124 loc = sreloc->contents;
3125 loc += (sreloc->reloc_count++
3126 * sizeof (Elf32_External_Rel));
3127 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3128
3129 /* If this reloc is against an external symbol, we
3130 do not want to fiddle with the addend. Otherwise,
3131 we need to include the symbol value so that it
3132 becomes an addend for the dynamic reloc. For an
3133 internal symbol, we have updated addend. */
3134 continue;
3135 }
d59a60e9 3136 /* FALLTHROUGH */
cbe950e9
L		 3137 case R_386_PC32:
3138 case R_386_PLT32:
3139 goto do_relocation;
3140
3141 case R_386_GOT32:
6de2ae4a 3142 base_got = htab->elf.sgot;
cbe950e9
L		 3143 off = h->got.offset;
3144
7afd84dc 3145 if (base_got == NULL)
cbe950e9
L		 3146 abort ();
3147
7afd84dc 3148 if (off == (bfd_vma) -1)
cbe950e9 3149 {
7afd84dc
L		 3150 /* We can't use h->got.offset here to save state, or
3151 even just remember the offset, as finish_dynamic_symbol
3152 would use that as offset into .got. */
6bbec505 3153
6de2ae4a 3154 if (htab->elf.splt != NULL)
7afd84dc
L		 3155 {
3156 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
3157 off = (plt_index + 3) * 4;
6de2ae4a 3158 base_got = htab->elf.sgotplt;
7afd84dc 3159 }
cbe950e9
L		 3160 else
3161 {
7afd84dc
L		 3162 plt_index = h->plt.offset / PLT_ENTRY_SIZE;
3163 off = plt_index * 4;
6de2ae4a 3164 base_got = htab->elf.igotplt;
7afd84dc
L		 3165 }
3166
3167 if (h->dynindx == -1
3168 || h->forced_local
3169 || info->symbolic)
3170 {
3171 /* This references the local defitionion. We must
3172 initialize this entry in the global offset table.
3173 Since the offset must always be a multiple of 8,
3174 we use the least significant bit to record
3175 whether we have initialized it already.
3176
3177 When doing a dynamic link, we create a .rela.got
3178 relocation entry to initialize the value. This
3179 is done in the finish_dynamic_symbol routine. */
3180 if ((off & 1) != 0)
3181 off &= ~1;
3182 else
3183 {
3184 bfd_put_32 (output_bfd, relocation,
3185 base_got->contents + off);
3186 h->got.offset |= 1;
3187 }
cbe950e9 3188 }
cbe950e9 3189
7afd84dc 3190 relocation = off;
cbe950e9 3191
7afd84dc 3192 /* Adjust for static executables. */
6de2ae4a 3193 if (htab->elf.splt == NULL)
7afd84dc
L		 3194 relocation += gotplt->output_offset;
3195 }
3196 else
0018b0a3
L		 3197 {
3198 relocation = (base_got->output_section->vma
3199 + base_got->output_offset + off
3200 - gotplt->output_section->vma
3201 - gotplt->output_offset);
3202 /* Adjust for static executables. */
6de2ae4a 3203 if (htab->elf.splt == NULL)
0018b0a3
L		 3204 relocation += gotplt->output_offset;
3205 }
3206
cbe950e9
L		 3207 goto do_relocation;
3208
3209 case R_386_GOTOFF:
3210 relocation -= (gotplt->output_section->vma
3211 + gotplt->output_offset);
3212 goto do_relocation;
3213 }
3214 }
3215
252b5132
RH		 3216 switch (r_type)
3217 {
3218 case R_386_GOT32:
3219 /* Relocation is to the entry for this symbol in the global
3220 offset table. */
6de2ae4a 3221 if (htab->elf.sgot == NULL)
ffb2e45b 3222 abort ();
252b5132
RH		 3223
3224 if (h != NULL)
3225 {
b34976b6 3226 bfd_boolean dyn;
252b5132
RH		 3227
3228 off = h->got.offset;
ebe50bae 3229 dyn = htab->elf.dynamic_sections_created;
26e41594 3230 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
252b5132 3231 || (info->shared
586119b3 3232 && SYMBOL_REFERENCES_LOCAL (info, h))
ef5aade5
L		 3233 || (ELF_ST_VISIBILITY (h->other)
3234 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH		 3235 {
3236 /* This is actually a static link, or it is a
3237 -Bsymbolic link and the symbol is defined
3238 locally, or the symbol was forced to be local
3239 because of a version file. We must initialize
3240 this entry in the global offset table. Since the
3241 offset must always be a multiple of 4, we use the
3242 least significant bit to record whether we have
3243 initialized it already.
3244
3245 When doing a dynamic link, we create a .rel.got
3246 relocation entry to initialize the value. This
3247 is done in the finish_dynamic_symbol routine. */
3248 if ((off & 1) != 0)
3249 off &= ~1;
3250 else
3251 {
3252 bfd_put_32 (output_bfd, relocation,
6de2ae4a 3253 htab->elf.sgot->contents + off);
252b5132
RH		 3254 h->got.offset |= 1;
3255 }
3256 }
8c694914 3257 else
b34976b6 3258 unresolved_reloc = FALSE;
252b5132
RH		 3259 }
3260 else
3261 {
ffb2e45b
AM		 3262 if (local_got_offsets == NULL)
3263 abort ();
252b5132
RH		 3264
3265 off = local_got_offsets[r_symndx];
3266
3267 /* The offset must always be a multiple of 4. We use
83be169b
AM		 3268 the least significant bit to record whether we have
3269 already generated the necessary reloc. */
252b5132
RH		 3270 if ((off & 1) != 0)
3271 off &= ~1;
3272 else
3273 {
6725bdbf 3274 bfd_put_32 (output_bfd, relocation,
6de2ae4a 3275 htab->elf.sgot->contents + off);
252b5132
RH		 3276
3277 if (info->shared)
3278 {
947216bf
AM		 3279 asection *s;
3280 Elf_Internal_Rela outrel;
3281 bfd_byte *loc;
252b5132 3282
6de2ae4a 3283 s = htab->elf.srelgot;
947216bf 3284 if (s == NULL)
ffb2e45b 3285 abort ();
252b5132 3286
6de2ae4a
L		 3287 outrel.r_offset = (htab->elf.sgot->output_section->vma
3288 + htab->elf.sgot->output_offset
252b5132
RH		 3289 + off);
3290 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
947216bf
AM		 3291 loc = s->contents;
3292 loc += s->reloc_count++ * sizeof (Elf32_External_Rel);
0ac8d2ca 3293 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
252b5132
RH		 3294 }
3295
3296 local_got_offsets[r_symndx] |= 1;
3297 }
252b5132
RH		 3298 }
3299
ffb2e45b
AM		 3300 if (off >= (bfd_vma) -2)
3301 abort ();
3302
6de2ae4a
L		 3303 relocation = htab->elf.sgot->output_section->vma
3304 + htab->elf.sgot->output_offset + off
3305 - htab->elf.sgotplt->output_section->vma
3306 - htab->elf.sgotplt->output_offset;
252b5132
RH		 3307 break;
3308
3309 case R_386_GOTOFF:
3310 /* Relocation is relative to the start of the global offset
3311 table. */
3312
90f487df
L		 3313 /* Check to make sure it isn't a protected function symbol
3314 for shared library since it may not be local when used
41bed6dd
L		 3315 as function address. We also need to make sure that a
3316 symbol is defined locally. */
3317 if (info->shared && h)
90f487df 3318 {
41bed6dd
L		 3319 if (!h->def_regular)
3320 {
3321 const char *v;
3322
3323 switch (ELF_ST_VISIBILITY (h->other))
3324 {
3325 case STV_HIDDEN:
3326 v = _("hidden symbol");
3327 break;
3328 case STV_INTERNAL:
3329 v = _("internal symbol");
3330 break;
3331 case STV_PROTECTED:
3332 v = _("protected symbol");
3333 break;
3334 default:
3335 v = _("symbol");
3336 break;
3337 }
3338
3339 (*_bfd_error_handler)
3340 (_("%B: relocation R_386_GOTOFF against undefined %s `%s' can not be used when making a shared object"),
3341 input_bfd, v, h->root.root.string);
3342 bfd_set_error (bfd_error_bad_value);
3343 return FALSE;
3344 }
3345 else if (!info->executable
3346 && h->type == STT_FUNC
3347 && ELF_ST_VISIBILITY (h->other) == STV_PROTECTED)
3348 {
3349 (*_bfd_error_handler)
3350 (_("%B: relocation R_386_GOTOFF against protected function `%s' can not be used when making a shared object"),
3351 input_bfd, h->root.root.string);
3352 bfd_set_error (bfd_error_bad_value);
3353 return FALSE;
3354 }
90f487df
L		 3355 }
3356
8c37241b
JJ		 3357 /* Note that sgot is not involved in this
3358 calculation. We always want the start of .got.plt. If we
3359 defined _GLOBAL_OFFSET_TABLE_ in a different way, as is
252b5132
RH		 3360 permitted by the ABI, we might have to change this
3361 calculation. */
6de2ae4a
L		 3362 relocation -= htab->elf.sgotplt->output_section->vma
3363 + htab->elf.sgotplt->output_offset;
252b5132
RH		 3364 break;
3365
3366 case R_386_GOTPC:
3367 /* Use global offset table as symbol value. */
6de2ae4a
L		 3368 relocation = htab->elf.sgotplt->output_section->vma
3369 + htab->elf.sgotplt->output_offset;
b34976b6 3370 unresolved_reloc = FALSE;
252b5132
RH		 3371 break;
3372
3373 case R_386_PLT32:
3374 /* Relocation is to the entry for this symbol in the
3375 procedure linkage table. */
3376
dd5724d5 3377 /* Resolve a PLT32 reloc against a local symbol directly,
83be169b 3378 without using the procedure linkage table. */
252b5132
RH		 3379 if (h == NULL)
3380 break;
3381
dd5724d5 3382 if (h->plt.offset == (bfd_vma) -1
6de2ae4a 3383 || htab->elf.splt == NULL)
252b5132
RH		 3384 {
3385 /* We didn't make a PLT entry for this symbol. This
83be169b
AM		 3386 happens when statically linking PIC code, or when
3387 using -Bsymbolic. */
252b5132
RH		 3388 break;
3389 }
3390
6de2ae4a
L		 3391 relocation = (htab->elf.splt->output_section->vma
3392 + htab->elf.splt->output_offset
252b5132 3393 + h->plt.offset);
b34976b6 3394 unresolved_reloc = FALSE;
252b5132
RH		 3395 break;
3396
3397 case R_386_32:
3398 case R_386_PC32:
3348747a
NS		 3399 if ((input_section->flags & SEC_ALLOC) == 0
3400 || is_vxworks_tls)
ec338859
AM		 3401 break;
3402
12d0ee4a 3403 if ((info->shared
ef5aade5
L		 3404 && (h == NULL
3405 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3406 || h->root.type != bfd_link_hash_undefweak)
12d0ee4a 3407 && (r_type != R_386_PC32
f6c52c13 3408 || !SYMBOL_CALLS_LOCAL (info, h)))
a23b6845
AM		 3409 || (ELIMINATE_COPY_RELOCS
3410 && !info->shared
12d0ee4a
AM		 3411 && h != NULL
3412 && h->dynindx != -1
f5385ebf
AM		 3413 && !h->non_got_ref
3414 && ((h->def_dynamic
3415 && !h->def_regular)
28d0b90e 3416 || h->root.type == bfd_link_hash_undefweak
0f88be7a 3417 || h->root.type == bfd_link_hash_undefined)))
252b5132 3418 {
947216bf
AM		 3419 Elf_Internal_Rela outrel;
3420 bfd_byte *loc;
b34976b6 3421 bfd_boolean skip, relocate;
0c715baa 3422 asection *sreloc;
252b5132
RH		 3423
3424 /* When generating a shared object, these relocations
3425 are copied into the output file to be resolved at run
3426 time. */
3427
b34976b6
AM		 3428 skip = FALSE;
3429 relocate = FALSE;
252b5132 3430
c629eae0
JJ		 3431 outrel.r_offset =
3432 _bfd_elf_section_offset (output_bfd, info, input_section,
3433 rel->r_offset);
3434 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 3435 skip = TRUE;
0bb2d96a 3436 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 3437 skip = TRUE, relocate = TRUE;
252b5132
RH		 3438 outrel.r_offset += (input_section->output_section->vma
3439 + input_section->output_offset);
3440
3441 if (skip)
0bb2d96a 3442 memset (&outrel, 0, sizeof outrel);
5a15f56f
AM		 3443 else if (h != NULL
3444 && h->dynindx != -1
3445 && (r_type == R_386_PC32
3446 || !info->shared
55255dae 3447 || !SYMBOLIC_BIND (info, h)
f5385ebf 3448 || !h->def_regular))
0bb2d96a 3449 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
252b5132
RH		 3450 else
3451 {
5a15f56f 3452 /* This symbol is local, or marked to become local. */
b34976b6 3453 relocate = TRUE;
5a15f56f 3454 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
252b5132
RH		 3455 }
3456
cbe950e9 3457 sreloc = elf_section_data (input_section)->sreloc;
e7c33416 3458
62d78908
L		 3459 if (sreloc == NULL || sreloc->contents == NULL)
3460 {
3461 r = bfd_reloc_notsupported;
3462 goto check_relocation_error;
3463 }
0c715baa 3464
947216bf
AM		 3465 loc = sreloc->contents;
3466 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rel);
e7c33416 3467
0c715baa 3468 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
252b5132
RH		 3469
3470 /* If this reloc is against an external symbol, we do
3471 not want to fiddle with the addend. Otherwise, we
3472 need to include the symbol value so that it becomes
3473 an addend for the dynamic reloc. */
0f88be7a 3474 if (! relocate)
252b5132
RH		 3475 continue;
3476 }
252b5132
RH		 3477 break;
3478
37e55690 3479 case R_386_TLS_IE:
1d85728f 3480 if (!info->executable)
37e55690 3481 {
947216bf
AM		 3482 Elf_Internal_Rela outrel;
3483 bfd_byte *loc;
37e55690 3484 asection *sreloc;
37e55690
JJ		 3485
3486 outrel.r_offset = rel->r_offset
3487 + input_section->output_section->vma
3488 + input_section->output_offset;
3489 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
3490 sreloc = elf_section_data (input_section)->sreloc;
3491 if (sreloc == NULL)
3492 abort ();
947216bf
AM		 3493 loc = sreloc->contents;
3494 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rel);
37e55690
JJ		 3495 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3496 }
3497 /* Fall through */
3498
13ae64f3 3499 case R_386_TLS_GD:
67a4f2b7
AO		 3500 case R_386_TLS_GOTDESC:
3501 case R_386_TLS_DESC_CALL:
13ae64f3 3502 case R_386_TLS_IE_32:
37e55690 3503 case R_386_TLS_GOTIE:
13ae64f3
JJ		 3504 tls_type = GOT_UNKNOWN;
3505 if (h == NULL && local_got_offsets)
3506 tls_type = elf_i386_local_got_tls_type (input_bfd) [r_symndx];
3507 else if (h != NULL)
142411ca 3508 tls_type = elf_i386_hash_entry(h)->tls_type;
37e55690
JJ		 3509 if (tls_type == GOT_TLS_IE)
3510 tls_type = GOT_TLS_IE_NEG;
142411ca
L		 3511
3512 if (! elf_i386_tls_transition (info, input_bfd,
3513 input_section, contents,
3514 symtab_hdr, sym_hashes,
3515 &r_type, tls_type, rel,
4c544807 3516 relend, h, r_symndx))
142411ca 3517 return FALSE;
13ae64f3
JJ		 3518
3519 if (r_type == R_386_TLS_LE_32)
3520 {
82e51918 3521 BFD_ASSERT (! unresolved_reloc);
13ae64f3
JJ		 3522 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
3523 {
142411ca 3524 unsigned int type;
13ae64f3
JJ		 3525 bfd_vma roff;
3526
3527 /* GD->LE transition. */
13ae64f3 3528 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
13ae64f3
JJ		 3529 if (type == 0x04)
3530 {
3531 /* leal foo(,%reg,1), %eax; call ___tls_get_addr
3532 Change it into:
3533 movl %gs:0, %eax; subl $foo@tpoff, %eax
3534 (6 byte form of subl). */
13ae64f3
JJ		 3535 memcpy (contents + rel->r_offset - 3,
3536 "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
142411ca 3537 roff = rel->r_offset + 5;
13ae64f3
JJ		 3538 }
3539 else
3540 {
142411ca
L		 3541 /* leal foo(%reg), %eax; call ___tls_get_addr; nop
3542 Change it into:
3543 movl %gs:0, %eax; subl $foo@tpoff, %eax
3544 (6 byte form of subl). */
3545 memcpy (contents + rel->r_offset - 2,
3546 "\x65\xa1\0\0\0\0\x81\xe8\0\0\0", 12);
3547 roff = rel->r_offset + 6;
13ae64f3 3548 }
eb4ff4d6 3549 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
13ae64f3 3550 contents + roff);
a3fadc9a 3551 /* Skip R_386_PC32/R_386_PLT32. */
13ae64f3
JJ		 3552 rel++;
3553 continue;
3554 }
67a4f2b7
AO		 3555 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
3556 {
3557 /* GDesc -> LE transition.
3558 It's originally something like:
3559 leal x@tlsdesc(%ebx), %eax
3560
3561 leal x@ntpoff, %eax
3562
3563 Registers other than %eax may be set up here. */
3564
142411ca 3565 unsigned int val;
67a4f2b7
AO		 3566 bfd_vma roff;
3567
67a4f2b7 3568 roff = rel->r_offset;
67a4f2b7 3569 val = bfd_get_8 (input_bfd, contents + roff - 1);
67a4f2b7
AO		 3570
3571 /* Now modify the instruction as appropriate. */
3572 /* aoliva FIXME: remove the above and xor the byte
3573 below with 0x86. */
3574 bfd_put_8 (output_bfd, val ^ 0x86,
3575 contents + roff - 1);
eb4ff4d6 3576 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
67a4f2b7
AO		 3577 contents + roff);
3578 continue;
3579 }
3580 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
3581 {
3582 /* GDesc -> LE transition.
3583 It's originally:
3584 call *(%eax)
3585 Turn it into:
142411ca 3586 xchg %ax,%ax */
67a4f2b7 3587
67a4f2b7 3588 bfd_vma roff;
6bbec505 3589
67a4f2b7 3590 roff = rel->r_offset;
10efb593 3591 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 3592 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3593 continue;
3594 }
37e55690 3595 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_IE)
13ae64f3 3596 {
142411ca 3597 unsigned int val;
13ae64f3
JJ		 3598
3599 /* IE->LE transition:
37e55690
JJ		 3600 Originally it can be one of:
3601 movl foo, %eax
3602 movl foo, %reg
3603 addl foo, %reg
3604 We change it into:
3605 movl $foo, %eax
3606 movl $foo, %reg
3607 addl $foo, %reg. */
37e55690 3608 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
37e55690
JJ		 3609 if (val == 0xa1)
3610 {
3611 /* movl foo, %eax. */
55fd94b0
AM		 3612 bfd_put_8 (output_bfd, 0xb8,
3613 contents + rel->r_offset - 1);
37e55690 3614 }
299bf759 3615 else
37e55690 3616 {
142411ca
L		 3617 unsigned int type;
3618
55fd94b0
AM		 3619 type = bfd_get_8 (input_bfd,
3620 contents + rel->r_offset - 2);
299bf759 3621 switch (type)
26e41594 3622 {
299bf759
L		 3623 case 0x8b:
3624 /* movl */
299bf759
L		 3625 bfd_put_8 (output_bfd, 0xc7,
3626 contents + rel->r_offset - 2);
3627 bfd_put_8 (output_bfd,
3628 0xc0 | ((val >> 3) & 7),
3629 contents + rel->r_offset - 1);
3630 break;
3631 case 0x03:
3632 /* addl */
299bf759
L		 3633 bfd_put_8 (output_bfd, 0x81,
3634 contents + rel->r_offset - 2);
3635 bfd_put_8 (output_bfd,
3636 0xc0 | ((val >> 3) & 7),
3637 contents + rel->r_offset - 1);
3638 break;
3639 default:
3640 BFD_FAIL ();
3641 break;
26e41594 3642 }
37e55690 3643 }
eb4ff4d6 3644 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ		 3645 contents + rel->r_offset);
3646 continue;
3647 }
3648 else
3649 {
3650 unsigned int val, type;
3651
3652 /* {IE_32,GOTIE}->LE transition:
3653 Originally it can be one of:
13ae64f3 3654 subl foo(%reg1), %reg2
13ae64f3 3655 movl foo(%reg1), %reg2
37e55690 3656 addl foo(%reg1), %reg2
13ae64f3
JJ		 3657 We change it into:
3658 subl $foo, %reg2
37e55690
JJ		 3659 movl $foo, %reg2 (6 byte form)
3660 addl $foo, %reg2. */
13ae64f3
JJ		 3661 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
3662 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
13ae64f3
JJ		 3663 if (type == 0x8b)
3664 {
3665 /* movl */
13ae64f3
JJ		 3666 bfd_put_8 (output_bfd, 0xc7,
3667 contents + rel->r_offset - 2);
3668 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3669 contents + rel->r_offset - 1);
3670 }
3671 else if (type == 0x2b)
3672 {
3673 /* subl */
13ae64f3
JJ		 3674 bfd_put_8 (output_bfd, 0x81,
3675 contents + rel->r_offset - 2);
3676 bfd_put_8 (output_bfd, 0xe8 | ((val >> 3) & 7),
3677 contents + rel->r_offset - 1);
3678 }
37e55690
JJ		 3679 else if (type == 0x03)
3680 {
3681 /* addl */
3682 bfd_put_8 (output_bfd, 0x81,
3683 contents + rel->r_offset - 2);
3684 bfd_put_8 (output_bfd, 0xc0 | ((val >> 3) & 7),
3685 contents + rel->r_offset - 1);
3686 }
13ae64f3
JJ		 3687 else
3688 BFD_FAIL ();
37e55690 3689 if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTIE)
eb4ff4d6 3690 bfd_put_32 (output_bfd, -elf_i386_tpoff (info, relocation),
37e55690
JJ		 3691 contents + rel->r_offset);
3692 else
eb4ff4d6 3693 bfd_put_32 (output_bfd, elf_i386_tpoff (info, relocation),
37e55690 3694 contents + rel->r_offset);
13ae64f3
JJ		 3695 continue;
3696 }
3697 }
3698
6de2ae4a 3699 if (htab->elf.sgot == NULL)
13ae64f3
JJ		 3700 abort ();
3701
3702 if (h != NULL)
67a4f2b7
AO		 3703 {
3704 off = h->got.offset;
3705 offplt = elf_i386_hash_entry (h)->tlsdesc_got;
3706 }
13ae64f3
JJ		 3707 else
3708 {
3709 if (local_got_offsets == NULL)
3710 abort ();
3711
3712 off = local_got_offsets[r_symndx];
67a4f2b7 3713 offplt = local_tlsdesc_gotents[r_symndx];
13ae64f3
JJ		 3714 }
3715
3716 if ((off & 1) != 0)
3717 off &= ~1;
26e41594 3718 else
13ae64f3 3719 {
947216bf
AM		 3720 Elf_Internal_Rela outrel;
3721 bfd_byte *loc;
91d6fa6a 3722 int dr_type;
67a4f2b7 3723 asection *sreloc;
13ae64f3 3724
6de2ae4a 3725 if (htab->elf.srelgot == NULL)
13ae64f3
JJ		 3726 abort ();
3727
67a4f2b7
AO		 3728 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3729
3730 if (GOT_TLS_GDESC_P (tls_type))
3731 {
3732 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_DESC);
3733 BFD_ASSERT (htab->sgotplt_jump_table_size + offplt + 8
6de2ae4a
L		 3734 <= htab->elf.sgotplt->size);
3735 outrel.r_offset = (htab->elf.sgotplt->output_section->vma
3736 + htab->elf.sgotplt->output_offset
67a4f2b7
AO		 3737 + offplt
3738 + htab->sgotplt_jump_table_size);
6de2ae4a 3739 sreloc = htab->elf.srelplt;
67a4f2b7 3740 loc = sreloc->contents;
5ae0bfb6
RS		 3741 loc += (htab->next_tls_desc_index++
3742 * sizeof (Elf32_External_Rel));
67a4f2b7
AO		 3743 BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
3744 <= sreloc->contents + sreloc->size);
3745 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3746 if (indx == 0)
3747 {
3748 BFD_ASSERT (! unresolved_reloc);
3749 bfd_put_32 (output_bfd,
eb4ff4d6 3750 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 3751 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO		 3752 + htab->sgotplt_jump_table_size + 4);
3753 }
3754 else
3755 {
3756 bfd_put_32 (output_bfd, 0,
6de2ae4a 3757 htab->elf.sgotplt->contents + offplt
67a4f2b7
AO		 3758 + htab->sgotplt_jump_table_size + 4);
3759 }
3760 }
3761
6de2ae4a 3762 sreloc = htab->elf.srelgot;
67a4f2b7 3763
6de2ae4a
L		 3764 outrel.r_offset = (htab->elf.sgot->output_section->vma
3765 + htab->elf.sgot->output_offset + off);
13ae64f3 3766
67a4f2b7 3767 if (GOT_TLS_GD_P (tls_type))
13ae64f3 3768 dr_type = R_386_TLS_DTPMOD32;
67a4f2b7
AO		 3769 else if (GOT_TLS_GDESC_P (tls_type))
3770 goto dr_done;
37e55690
JJ		 3771 else if (tls_type == GOT_TLS_IE_POS)
3772 dr_type = R_386_TLS_TPOFF;
13ae64f3
JJ		 3773 else
3774 dr_type = R_386_TLS_TPOFF32;
67a4f2b7 3775
37e55690 3776 if (dr_type == R_386_TLS_TPOFF && indx == 0)
eb4ff4d6
L		 3777 bfd_put_32 (output_bfd,
3778 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 3779 htab->elf.sgot->contents + off);
37e55690 3780 else if (dr_type == R_386_TLS_TPOFF32 && indx == 0)
eb4ff4d6
L		 3781 bfd_put_32 (output_bfd,
3782 elf_i386_dtpoff_base (info) - relocation,
6de2ae4a 3783 htab->elf.sgot->contents + off);
67a4f2b7 3784 else if (dr_type != R_386_TLS_DESC)
c366c25e 3785 bfd_put_32 (output_bfd, 0,
6de2ae4a 3786 htab->elf.sgot->contents + off);
13ae64f3 3787 outrel.r_info = ELF32_R_INFO (indx, dr_type);
67a4f2b7
AO		 3788
3789 loc = sreloc->contents;
3790 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rel);
3791 BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
3792 <= sreloc->contents + sreloc->size);
13ae64f3
JJ		 3793 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3794
67a4f2b7 3795 if (GOT_TLS_GD_P (tls_type))
13ae64f3
JJ		 3796 {
3797 if (indx == 0)
3798 {
82e51918 3799 BFD_ASSERT (! unresolved_reloc);
13ae64f3 3800 bfd_put_32 (output_bfd,
eb4ff4d6 3801 relocation - elf_i386_dtpoff_base (info),
6de2ae4a 3802 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ		 3803 }
3804 else
3805 {
3806 bfd_put_32 (output_bfd, 0,
6de2ae4a 3807 htab->elf.sgot->contents + off + 4);
13ae64f3
JJ		 3808 outrel.r_info = ELF32_R_INFO (indx,
3809 R_386_TLS_DTPOFF32);
3810 outrel.r_offset += 4;
67a4f2b7 3811 sreloc->reloc_count++;
947216bf 3812 loc += sizeof (Elf32_External_Rel);
67a4f2b7
AO		 3813 BFD_ASSERT (loc + sizeof (Elf32_External_Rel)
3814 <= sreloc->contents + sreloc->size);
947216bf 3815 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
13ae64f3
JJ		 3816 }
3817 }
37e55690
JJ		 3818 else if (tls_type == GOT_TLS_IE_BOTH)
3819 {
3820 bfd_put_32 (output_bfd,
eb4ff4d6
L		 3821 (indx == 0
3822 ? relocation - elf_i386_dtpoff_base (info)
3823 : 0),
6de2ae4a 3824 htab->elf.sgot->contents + off + 4);
37e55690
JJ		 3825 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
3826 outrel.r_offset += 4;
67a4f2b7 3827 sreloc->reloc_count++;
947216bf 3828 loc += sizeof (Elf32_External_Rel);
37e55690
JJ		 3829 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
3830 }
13ae64f3 3831
67a4f2b7 3832 dr_done:
13ae64f3
JJ		 3833 if (h != NULL)
3834 h->got.offset |= 1;
3835 else
3836 local_got_offsets[r_symndx] |= 1;
3837 }
3838
67a4f2b7
AO		 3839 if (off >= (bfd_vma) -2
3840 && ! GOT_TLS_GDESC_P (tls_type))
13ae64f3 3841 abort ();
67a4f2b7
AO		 3842 if (r_type == R_386_TLS_GOTDESC
3843 || r_type == R_386_TLS_DESC_CALL)
3844 {
3845 relocation = htab->sgotplt_jump_table_size + offplt;
3846 unresolved_reloc = FALSE;
3847 }
3848 else if (r_type == ELF32_R_TYPE (rel->r_info))
13ae64f3 3849 {
6de2ae4a
L		 3850 bfd_vma g_o_t = htab->elf.sgotplt->output_section->vma
3851 + htab->elf.sgotplt->output_offset;
3852 relocation = htab->elf.sgot->output_section->vma
3853 + htab->elf.sgot->output_offset + off - g_o_t;
37e55690
JJ		 3854 if ((r_type == R_386_TLS_IE || r_type == R_386_TLS_GOTIE)
3855 && tls_type == GOT_TLS_IE_BOTH)
3856 relocation += 4;
3857 if (r_type == R_386_TLS_IE)
8c37241b 3858 relocation += g_o_t;
b34976b6 3859 unresolved_reloc = FALSE;
13ae64f3 3860 }
67a4f2b7 3861 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GD)
13ae64f3
JJ		 3862 {
3863 unsigned int val, type;
3864 bfd_vma roff;
3865
3866 /* GD->IE transition. */
13ae64f3 3867 type = bfd_get_8 (input_bfd, contents + rel->r_offset - 2);
13ae64f3
JJ		 3868 val = bfd_get_8 (input_bfd, contents + rel->r_offset - 1);
3869 if (type == 0x04)
3870 {
3871 /* leal foo(,%reg,1), %eax; call ___tls_get_addr
3872 Change it into:
3873 movl %gs:0, %eax; subl $foo@gottpoff(%reg), %eax. */
13ae64f3 3874 val >>= 3;
142411ca 3875 roff = rel->r_offset - 3;
13ae64f3
JJ		 3876 }
3877 else
3878 {
3879 /* leal foo(%reg), %eax; call ___tls_get_addr; nop
3880 Change it into:
3881 movl %gs:0, %eax; subl $foo@gottpoff(%reg), %eax. */
13ae64f3
JJ		 3882 roff = rel->r_offset - 2;
3883 }
3884 memcpy (contents + roff,
3885 "\x65\xa1\0\0\0\0\x2b\x80\0\0\0", 12);
3886 contents[roff + 7] = 0x80 | (val & 7);
37e55690
JJ		 3887 /* If foo is used only with foo@gotntpoff(%reg) and
3888 foo@indntpoff, but not with foo@gottpoff(%reg), change
3889 subl $foo@gottpoff(%reg), %eax
3890 into:
3891 addl $foo@gotntpoff(%reg), %eax. */
ebcfb3c0
JJ		 3892 if (tls_type == GOT_TLS_IE_POS)
3893 contents[roff + 6] = 0x03;
8c37241b 3894 bfd_put_32 (output_bfd,
6de2ae4a
L		 3895 htab->elf.sgot->output_section->vma
3896 + htab->elf.sgot->output_offset + off
3897 - htab->elf.sgotplt->output_section->vma
3898 - htab->elf.sgotplt->output_offset,
13ae64f3
JJ		 3899 contents + roff + 8);
3900 /* Skip R_386_PLT32. */
3901 rel++;
3902 continue;
3903 }
67a4f2b7
AO		 3904 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_GOTDESC)
3905 {
3906 /* GDesc -> IE transition.
3907 It's originally something like:
3908 leal x@tlsdesc(%ebx), %eax
3909
3910 Change it to:
142411ca 3911 movl x@gotntpoff(%ebx), %eax # before xchg %ax,%ax
67a4f2b7
AO		 3912 or:
3913 movl x@gottpoff(%ebx), %eax # before negl %eax
3914
3915 Registers other than %eax may be set up here. */
3916
67a4f2b7
AO		 3917 bfd_vma roff;
3918
3919 /* First, make sure it's a leal adding ebx to a 32-bit
3920 offset into any register, although it's probably
3921 almost always going to be eax. */
3922 roff = rel->r_offset;
67a4f2b7
AO		 3923
3924 /* Now modify the instruction as appropriate. */
3925 /* To turn a leal into a movl in the form we use it, it
3926 suffices to change the first byte from 0x8d to 0x8b.
3927 aoliva FIXME: should we decide to keep the leal, all
3928 we have to do is remove the statement below, and
3929 adjust the relaxation of R_386_TLS_DESC_CALL. */
3930 bfd_put_8 (output_bfd, 0x8b, contents + roff - 2);
3931
3932 if (tls_type == GOT_TLS_IE_BOTH)
3933 off += 4;
3934
3935 bfd_put_32 (output_bfd,
6de2ae4a
L		 3936 htab->elf.sgot->output_section->vma
3937 + htab->elf.sgot->output_offset + off
3938 - htab->elf.sgotplt->output_section->vma
3939 - htab->elf.sgotplt->output_offset,
67a4f2b7
AO		 3940 contents + roff);
3941 continue;
3942 }
3943 else if (ELF32_R_TYPE (rel->r_info) == R_386_TLS_DESC_CALL)
3944 {
3945 /* GDesc -> IE transition.
3946 It's originally:
3947 call *(%eax)
3948
3949 Change it to:
142411ca 3950 xchg %ax,%ax
67a4f2b7
AO		 3951 or
3952 negl %eax
3953 depending on how we transformed the TLS_GOTDESC above.
3954 */
3955
67a4f2b7
AO		 3956 bfd_vma roff;
3957
67a4f2b7 3958 roff = rel->r_offset;
67a4f2b7
AO		 3959
3960 /* Now modify the instruction as appropriate. */
3961 if (tls_type != GOT_TLS_IE_NEG)
3962 {
10efb593
L		 3963 /* xchg %ax,%ax */
3964 bfd_put_8 (output_bfd, 0x66, contents + roff);
67a4f2b7
AO		 3965 bfd_put_8 (output_bfd, 0x90, contents + roff + 1);
3966 }
3967 else
3968 {
3969 /* negl %eax */
3970 bfd_put_8 (output_bfd, 0xf7, contents + roff);
3971 bfd_put_8 (output_bfd, 0xd8, contents + roff + 1);
3972 }
3973
3974 continue;
3975 }
3976 else
3977 BFD_ASSERT (FALSE);
13ae64f3
JJ		 3978 break;
3979
3980 case R_386_TLS_LDM:
142411ca
L		 3981 if (! elf_i386_tls_transition (info, input_bfd,
3982 input_section, contents,
3983 symtab_hdr, sym_hashes,
3984 &r_type, GOT_UNKNOWN, rel,
4c544807 3985 relend, h, r_symndx))
142411ca 3986 return FALSE;
13ae64f3 3987
142411ca
L		 3988 if (r_type != R_386_TLS_LDM)
3989 {
13ae64f3 3990 /* LD->LE transition:
13ae64f3
JJ		 3991 leal foo(%reg), %eax; call ___tls_get_addr.
3992 We change it into:
3993 movl %gs:0, %eax; nop; leal 0(%esi,1), %esi. */
142411ca 3994 BFD_ASSERT (r_type == R_386_TLS_LE_32);
13ae64f3
JJ		 3995 memcpy (contents + rel->r_offset - 2,
3996 "\x65\xa1\0\0\0\0\x90\x8d\x74\x26", 11);
a3fadc9a 3997 /* Skip R_386_PC32/R_386_PLT32. */
13ae64f3
JJ		 3998 rel++;
3999 continue;
4000 }
4001
6de2ae4a 4002 if (htab->elf.sgot == NULL)
13ae64f3
JJ		 4003 abort ();
4004
4005 off = htab->tls_ldm_got.offset;
4006 if (off & 1)
4007 off &= ~1;
4008 else
4009 {
947216bf
AM		 4010 Elf_Internal_Rela outrel;
4011 bfd_byte *loc;
13ae64f3 4012
6de2ae4a 4013 if (htab->elf.srelgot == NULL)
13ae64f3
JJ		 4014 abort ();
4015
6de2ae4a
L		 4016 outrel.r_offset = (htab->elf.sgot->output_section->vma
4017 + htab->elf.sgot->output_offset + off);
13ae64f3
JJ		 4018
4019 bfd_put_32 (output_bfd, 0,
6de2ae4a 4020 htab->elf.sgot->contents + off);
13ae64f3 4021 bfd_put_32 (output_bfd, 0,
6de2ae4a 4022 htab->elf.sgot->contents + off + 4);
13ae64f3 4023 outrel.r_info = ELF32_R_INFO (0, R_386_TLS_DTPMOD32);
6de2ae4a
L		 4024 loc = htab->elf.srelgot->contents;
4025 loc += htab->elf.srelgot->reloc_count++ * sizeof (Elf32_External_Rel);
13ae64f3
JJ		 4026 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
4027 htab->tls_ldm_got.offset |= 1;
4028 }
6de2ae4a
L		 4029 relocation = htab->elf.sgot->output_section->vma
4030 + htab->elf.sgot->output_offset + off
4031 - htab->elf.sgotplt->output_section->vma
4032 - htab->elf.sgotplt->output_offset;
b34976b6 4033 unresolved_reloc = FALSE;
13ae64f3
JJ		 4034 break;
4035
4036 case R_386_TLS_LDO_32:
959b0961 4037 if (!info->executable || (input_section->flags & SEC_CODE) == 0)
eb4ff4d6 4038 relocation -= elf_i386_dtpoff_base (info);
13ae64f3
JJ		 4039 else
4040 /* When converting LDO to LE, we must negate. */
eb4ff4d6 4041 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ		 4042 break;
4043
4044 case R_386_TLS_LE_32:
13ae64f3 4045 case R_386_TLS_LE:
1d85728f 4046 if (!info->executable)
37e55690 4047 {
947216bf 4048 Elf_Internal_Rela outrel;
37e55690 4049 asection *sreloc;
947216bf 4050 bfd_byte *loc;
37e55690
JJ		 4051
4052 outrel.r_offset = rel->r_offset
4053 + input_section->output_section->vma
4054 + input_section->output_offset;
4055 if (h != NULL && h->dynindx != -1)
4056 indx = h->dynindx;
4057 else
4058 indx = 0;
4059 if (r_type == R_386_TLS_LE_32)
4060 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF32);
4061 else
4062 outrel.r_info = ELF32_R_INFO (indx, R_386_TLS_TPOFF);
4063 sreloc = elf_section_data (input_section)->sreloc;
4064 if (sreloc == NULL)
4065 abort ();
947216bf
AM		 4066 loc = sreloc->contents;
4067 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rel);
37e55690
JJ		 4068 bfd_elf32_swap_reloc_out (output_bfd, &outrel, loc);
4069 if (indx)
4070 continue;
4071 else if (r_type == R_386_TLS_LE_32)
eb4ff4d6 4072 relocation = elf_i386_dtpoff_base (info) - relocation;
37e55690 4073 else
eb4ff4d6 4074 relocation -= elf_i386_dtpoff_base (info);
37e55690
JJ		 4075 }
4076 else if (r_type == R_386_TLS_LE_32)
eb4ff4d6 4077 relocation = elf_i386_tpoff (info, relocation);
37e55690 4078 else
eb4ff4d6 4079 relocation = -elf_i386_tpoff (info, relocation);
13ae64f3
JJ		 4080 break;
4081
252b5132
RH		 4082 default:
4083 break;
4084 }
4085
239e1f3a
AM		 4086 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
4087 because such sections are not SEC_ALLOC and thus ld.so will
4088 not process them. */
8c694914 4089 if (unresolved_reloc
239e1f3a 4090 && !((input_section->flags & SEC_DEBUGGING) != 0
f5385ebf 4091 && h->def_dynamic))
6a30718d
JJ		 4092 {
4093 (*_bfd_error_handler)
843fe662 4094 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
d003868e
AM		 4095 input_bfd,
4096 input_section,
6a30718d 4097 (long) rel->r_offset,
843fe662 4098 howto->name,
6a30718d 4099 h->root.root.string);
b34976b6 4100 return FALSE;
6a30718d 4101 }
83be169b 4102
cbe950e9 4103do_relocation:
252b5132
RH		 4104 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4105 contents, rel->r_offset,
55fd94b0 4106 relocation, 0);
252b5132 4107
62d78908 4108check_relocation_error:
cf5c0c5b 4109 if (r != bfd_reloc_ok)
252b5132 4110 {
cf5c0c5b 4111 const char *name;
ffb2e45b 4112
cf5c0c5b
AM		 4113 if (h != NULL)
4114 name = h->root.root.string;
4115 else
4116 {
4117 name = bfd_elf_string_from_elf_section (input_bfd,
4118 symtab_hdr->sh_link,
4119 sym->st_name);
4120 if (name == NULL)
b34976b6 4121 return FALSE;
cf5c0c5b
AM		 4122 if (*name == '\0')
4123 name = bfd_section_name (input_bfd, sec);
4124 }
ffb2e45b 4125
cf5c0c5b
AM		 4126 if (r == bfd_reloc_overflow)
4127 {
cf5c0c5b 4128 if (! ((*info->callbacks->reloc_overflow)
dfeffb9f
L		 4129 (info, (h ? &h->root : NULL), name, howto->name,
4130 (bfd_vma) 0, input_bfd, input_section,
4131 rel->r_offset)))
b34976b6 4132 return FALSE;
cf5c0c5b
AM		 4133 }
4134 else
4135 {
4136 (*_bfd_error_handler)
d003868e
AM		 4137 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
4138 input_bfd, input_section,
cf5c0c5b 4139 (long) rel->r_offset, name, (int) r);
b34976b6 4140 return FALSE;
cf5c0c5b 4141 }
252b5132
RH		 4142 }
4143 }
4144
b34976b6 4145 return TRUE;
252b5132
RH		 4146}
4147
4148/* Finish up dynamic symbol handling. We set the contents of various
4149 dynamic sections here. */
4150
b34976b6 4151static bfd_boolean
55fd94b0
AM		 4152elf_i386_finish_dynamic_symbol (bfd *output_bfd,
4153 struct bfd_link_info *info,
4154 struct elf_link_hash_entry *h,
4155 Elf_Internal_Sym *sym)
252b5132 4156{
6725bdbf 4157 struct elf_i386_link_hash_table *htab;
252b5132 4158
6725bdbf 4159 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 4160 if (htab == NULL)
4161 return FALSE;
252b5132
RH		 4162
4163 if (h->plt.offset != (bfd_vma) -1)
4164 {
252b5132
RH		 4165 bfd_vma plt_index;
4166 bfd_vma got_offset;
947216bf
AM		 4167 Elf_Internal_Rela rel;
4168 bfd_byte *loc;
cbe950e9
L		 4169 asection *plt, *gotplt, *relplt;
4170
4171 /* When building a static executable, use .iplt, .igot.plt and
4172 .rel.iplt sections for STT_GNU_IFUNC symbols. */
6de2ae4a 4173 if (htab->elf.splt != NULL)
cbe950e9 4174 {
6de2ae4a
L		 4175 plt = htab->elf.splt;
4176 gotplt = htab->elf.sgotplt;
4177 relplt = htab->elf.srelplt;
cbe950e9
L		 4178 }
4179 else
4180 {
6de2ae4a
L		 4181 plt = htab->elf.iplt;
4182 gotplt = htab->elf.igotplt;
4183 relplt = htab->elf.irelplt;
cbe950e9 4184 }
252b5132
RH		 4185
4186 /* This symbol has an entry in the procedure linkage table. Set
4187 it up. */
4188
cbe950e9
L		 4189 if ((h->dynindx == -1
4190 && !((h->forced_local || info->executable)
4191 && h->def_regular
4192 && h->type == STT_GNU_IFUNC))
4193 || plt == NULL
4194 || gotplt == NULL
4195 || relplt == NULL)
f6df62c8 4196 return FALSE;
252b5132
RH		 4197
4198 /* Get the index in the procedure linkage table which
4199 corresponds to this symbol. This is the index of this symbol
4200 in all the symbols for which we are making plt entries. The
cbe950e9 4201 first entry in the procedure linkage table is reserved.
252b5132 4202
cbe950e9 4203 Get the offset into the .got table of the entry that
252b5132 4204 corresponds to this function. Each .got entry is 4 bytes.
cbe950e9 4205 The first three are reserved.
6bbec505 4206
cbe950e9
L		 4207 For static executables, we don't reserve anything. */
4208
6de2ae4a 4209 if (plt == htab->elf.splt)
cbe950e9
L		 4210 {
4211 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
4212 got_offset = (plt_index + 3) * 4;
4213 }
4214 else
4215 {
4216 plt_index = h->plt.offset / PLT_ENTRY_SIZE;
4217 got_offset = plt_index * 4;
4218 }
252b5132
RH		 4219
4220 /* Fill in the entry in the procedure linkage table. */
4221 if (! info->shared)
4222 {
cbe950e9 4223 memcpy (plt->contents + h->plt.offset, elf_i386_plt_entry,
252b5132
RH		 4224 PLT_ENTRY_SIZE);
4225 bfd_put_32 (output_bfd,
cbe950e9
L		 4226 (gotplt->output_section->vma
4227 + gotplt->output_offset
252b5132 4228 + got_offset),
cbe950e9 4229 plt->contents + h->plt.offset + 2);
eac338cf
PB		 4230
4231 if (htab->is_vxworks)
4232 {
4233 int s, k, reloc_index;
4234
4235 /* Create the R_386_32 relocation referencing the GOT
4236 for this PLT entry. */
4237
4238 /* S: Current slot number (zero-based). */
4239 s = (h->plt.offset - PLT_ENTRY_SIZE) / PLT_ENTRY_SIZE;
4240 /* K: Number of relocations for PLTResolve. */
4241 if (info->shared)
4242 k = PLTRESOLVE_RELOCS_SHLIB;
4243 else
4244 k = PLTRESOLVE_RELOCS;
4245 /* Skip the PLTresolve relocations, and the relocations for
4246 the other PLT slots. */
4247 reloc_index = k + s * PLT_NON_JUMP_SLOT_RELOCS;
4248 loc = (htab->srelplt2->contents + reloc_index
4249 * sizeof (Elf32_External_Rel));
4250
6de2ae4a
L		 4251 rel.r_offset = (htab->elf.splt->output_section->vma
4252 + htab->elf.splt->output_offset
eac338cf 4253 + h->plt.offset + 2),
7325306f 4254 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB		 4255 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4256
4257 /* Create the R_386_32 relocation referencing the beginning of
4258 the PLT for this GOT entry. */
6de2ae4a
L		 4259 rel.r_offset = (htab->elf.sgotplt->output_section->vma
4260 + htab->elf.sgotplt->output_offset
eac338cf 4261 + got_offset);
7325306f 4262 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
eac338cf
PB		 4263 bfd_elf32_swap_reloc_out (output_bfd, &rel,
4264 loc + sizeof (Elf32_External_Rel));
4265 }
252b5132
RH		 4266 }
4267 else
4268 {
cbe950e9 4269 memcpy (plt->contents + h->plt.offset, elf_i386_pic_plt_entry,
252b5132
RH		 4270 PLT_ENTRY_SIZE);
4271 bfd_put_32 (output_bfd, got_offset,
cbe950e9 4272 plt->contents + h->plt.offset + 2);
252b5132
RH		 4273 }
4274
cbe950e9 4275 /* Don't fill PLT entry for static executables. */
6de2ae4a 4276 if (plt == htab->elf.splt)
cbe950e9
L		 4277 {
4278 bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rel),
4279 plt->contents + h->plt.offset + 7);
4280 bfd_put_32 (output_bfd, - (h->plt.offset + PLT_ENTRY_SIZE),
4281 plt->contents + h->plt.offset + 12);
4282 }
252b5132
RH		 4283
4284 /* Fill in the entry in the global offset table. */
4285 bfd_put_32 (output_bfd,
cbe950e9
L		 4286 (plt->output_section->vma
4287 + plt->output_offset
252b5132
RH		 4288 + h->plt.offset
4289 + 6),
cbe950e9 4290 gotplt->contents + got_offset);
252b5132
RH		 4291
4292 /* Fill in the entry in the .rel.plt section. */
cbe950e9
L		 4293 rel.r_offset = (gotplt->output_section->vma
4294 + gotplt->output_offset
252b5132 4295 + got_offset);
cbe950e9
L		 4296 if (h->dynindx == -1
4297 || ((info->executable
4298 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
4299 && h->def_regular
4300 && h->type == STT_GNU_IFUNC))
4301 {
4302 /* If an STT_GNU_IFUNC symbol is locally defined, generate
4303 R_386_IRELATIVE instead of R_386_JUMP_SLOT. Store addend
4304 in the .got.plt section. */
4305 bfd_put_32 (output_bfd,
4306 (h->root.u.def.value
4307 + h->root.u.def.section->output_section->vma
4308 + h->root.u.def.section->output_offset),
4309 gotplt->contents + got_offset);
4310 rel.r_info = ELF32_R_INFO (0, R_386_IRELATIVE);
4311 }
4312 else
4313 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
4314 loc = relplt->contents + plt_index * sizeof (Elf32_External_Rel);
0ac8d2ca 4315 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
252b5132 4316
f5385ebf 4317 if (!h->def_regular)
252b5132
RH		 4318 {
4319 /* Mark the symbol as undefined, rather than as defined in
c6585bbb
JJ		 4320 the .plt section. Leave the value if there were any
4321 relocations where pointer equality matters (this is a clue
51b64d56
AM		 4322 for the dynamic linker, to make function pointer
4323 comparisons work between an application and shared
c6585bbb
JJ		 4324 library), otherwise set it to zero. If a function is only
4325 called from a binary, there is no need to slow down
4326 shared libraries because of that. */
252b5132 4327 sym->st_shndx = SHN_UNDEF;
f5385ebf 4328 if (!h->pointer_equality_needed)
c6585bbb 4329 sym->st_value = 0;
252b5132
RH		 4330 }
4331 }
4332
13ae64f3 4333 if (h->got.offset != (bfd_vma) -1
67a4f2b7 4334 && ! GOT_TLS_GD_ANY_P (elf_i386_hash_entry(h)->tls_type)
37e55690 4335 && (elf_i386_hash_entry(h)->tls_type & GOT_TLS_IE) == 0)
252b5132 4336 {
947216bf
AM		 4337 Elf_Internal_Rela rel;
4338 bfd_byte *loc;
252b5132
RH		 4339
4340 /* This symbol has an entry in the global offset table. Set it
4341 up. */
4342
6de2ae4a 4343 if (htab->elf.sgot == NULL || htab->elf.srelgot == NULL)
ffb2e45b 4344 abort ();
252b5132 4345
6de2ae4a
L		 4346 rel.r_offset = (htab->elf.sgot->output_section->vma
4347 + htab->elf.sgot->output_offset
dc810e39 4348 + (h->got.offset & ~(bfd_vma) 1));
252b5132 4349
dd5724d5
AM		 4350 /* If this is a static link, or it is a -Bsymbolic link and the
4351 symbol is defined locally or was forced to be local because
4352 of a version file, we just want to emit a RELATIVE reloc.
252b5132
RH		 4353 The entry in the global offset table will already have been
4354 initialized in the relocate_section function. */
710ab287 4355 if (h->def_regular
0018b0a3
L		 4356 && h->type == STT_GNU_IFUNC)
4357 {
710ab287
L		 4358 if (info->shared)
4359 {
4360 /* Generate R_386_GLOB_DAT. */
4361 goto do_glob_dat;
4362 }
4363 else
4364 {
cd2b2c10
L		 4365 asection *plt;
4366
710ab287
L		 4367 if (!h->pointer_equality_needed)
4368 abort ();
4369
4370 /* For non-shared object, we can't use .got.plt, which
4371 contains the real function addres if we need pointer
4372 equality. We load the GOT entry with the PLT entry. */
cd2b2c10 4373 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
710ab287
L		 4374 bfd_put_32 (output_bfd,
4375 (plt->output_section->vma
4376 + plt->output_offset + h->plt.offset),
6de2ae4a 4377 htab->elf.sgot->contents + h->got.offset);
710ab287
L		 4378 return TRUE;
4379 }
0018b0a3
L		 4380 }
4381 else if (info->shared
4382 && SYMBOL_REFERENCES_LOCAL (info, h))
dd5724d5 4383 {
6725bdbf 4384 BFD_ASSERT((h->got.offset & 1) != 0);
dd5724d5
AM		 4385 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
4386 }
252b5132
RH		 4387 else
4388 {
dd5724d5 4389 BFD_ASSERT((h->got.offset & 1) == 0);
710ab287 4390do_glob_dat:
6725bdbf 4391 bfd_put_32 (output_bfd, (bfd_vma) 0,
6de2ae4a 4392 htab->elf.sgot->contents + h->got.offset);
252b5132
RH		 4393 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
4394 }
4395
6de2ae4a
L		 4396 loc = htab->elf.srelgot->contents;
4397 loc += htab->elf.srelgot->reloc_count++ * sizeof (Elf32_External_Rel);
0ac8d2ca 4398 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
252b5132
RH		 4399 }
4400
f5385ebf 4401 if (h->needs_copy)
252b5132 4402 {
947216bf
AM		 4403 Elf_Internal_Rela rel;
4404 bfd_byte *loc;
252b5132
RH		 4405
4406 /* This symbol needs a copy reloc. Set it up. */
4407
ffb2e45b
AM		 4408 if (h->dynindx == -1
4409 || (h->root.type != bfd_link_hash_defined
4410 && h->root.type != bfd_link_hash_defweak)
4411 || htab->srelbss == NULL)
4412 abort ();
252b5132
RH		 4413
4414 rel.r_offset = (h->root.u.def.value
4415 + h->root.u.def.section->output_section->vma
4416 + h->root.u.def.section->output_offset);
4417 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
947216bf
AM		 4418 loc = htab->srelbss->contents;
4419 loc += htab->srelbss->reloc_count++ * sizeof (Elf32_External_Rel);
0ac8d2ca 4420 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
252b5132
RH		 4421 }
4422
c25bc9fc
L		 4423 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
4424 be NULL for local symbols.
4425
eac338cf
PB		 4426 On VxWorks, the _GLOBAL_OFFSET_TABLE_ symbol is not absolute: it
4427 is relative to the ".got" section. */
c25bc9fc
L		 4428 if (sym != NULL
4429 && (strcmp (h->root.root.string, "_DYNAMIC") == 0
4430 || (!htab->is_vxworks && h == htab->elf.hgot)))
252b5132
RH		 4431 sym->st_shndx = SHN_ABS;
4432
b34976b6 4433 return TRUE;
252b5132
RH		 4434}
4435
c25bc9fc
L		 4436/* Finish up local dynamic symbol handling. We set the contents of
4437 various dynamic sections here. */
4438
4439static bfd_boolean
4440elf_i386_finish_local_dynamic_symbol (void **slot, void *inf)
4441{
4442 struct elf_link_hash_entry *h
4443 = (struct elf_link_hash_entry *) *slot;
4444 struct bfd_link_info *info
4445 = (struct bfd_link_info *) inf;
4446
4447 return elf_i386_finish_dynamic_symbol (info->output_bfd, info,
4448 h, NULL);
4449}
4450
38701953
AM		 4451/* Used to decide how to sort relocs in an optimal manner for the
4452 dynamic linker, before writing them out. */
4453
4454static enum elf_reloc_type_class
55fd94b0 4455elf_i386_reloc_type_class (const Elf_Internal_Rela *rela)
38701953 4456{
55fd94b0 4457 switch (ELF32_R_TYPE (rela->r_info))
38701953
AM		 4458 {
4459 case R_386_RELATIVE:
4460 return reloc_class_relative;
4461 case R_386_JUMP_SLOT:
4462 return reloc_class_plt;
4463 case R_386_COPY:
4464 return reloc_class_copy;
4465 default:
4466 return reloc_class_normal;
4467 }
4468}
4469
252b5132
RH		 4470/* Finish up the dynamic sections. */
4471
b34976b6 4472static bfd_boolean
55fd94b0
AM		 4473elf_i386_finish_dynamic_sections (bfd *output_bfd,
4474 struct bfd_link_info *info)
252b5132 4475{
6725bdbf 4476 struct elf_i386_link_hash_table *htab;
252b5132 4477 bfd *dynobj;
252b5132
RH		 4478 asection *sdyn;
4479
6725bdbf 4480 htab = elf_i386_hash_table (info);
4dfe6ac6
NC		 4481 if (htab == NULL)
4482 return FALSE;
4483
ebe50bae 4484 dynobj = htab->elf.dynobj;
252b5132
RH		 4485 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
4486
ebe50bae 4487 if (htab->elf.dynamic_sections_created)
252b5132 4488 {
252b5132
RH		 4489 Elf32_External_Dyn *dyncon, *dynconend;
4490
6de2ae4a 4491 if (sdyn == NULL || htab->elf.sgot == NULL)
ffb2e45b 4492 abort ();
252b5132
RH		 4493
4494 dyncon = (Elf32_External_Dyn *) sdyn->contents;
eea6121a 4495 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
252b5132
RH		 4496 for (; dyncon < dynconend; dyncon++)
4497 {
4498 Elf_Internal_Dyn dyn;
51b64d56 4499 asection *s;
252b5132
RH		 4500
4501 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
4502
4503 switch (dyn.d_tag)
4504 {
4505 default:
7a2b07ff
NS		 4506 if (htab->is_vxworks
4507 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
4508 break;
0ac8d2ca 4509 continue;
252b5132
RH		 4510
4511 case DT_PLTGOT:
6de2ae4a 4512 s = htab->elf.sgotplt;
8c37241b 4513 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
6725bdbf
AM		 4514 break;
4515
252b5132 4516 case DT_JMPREL:
6de2ae4a 4517 s = htab->elf.srelplt;
6348e046 4518 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
252b5132
RH		 4519 break;
4520
4521 case DT_PLTRELSZ:
6de2ae4a 4522 s = htab->elf.srelplt;
eea6121a 4523 dyn.d_un.d_val = s->size;
252b5132
RH		 4524 break;
4525
4526 case DT_RELSZ:
4527 /* My reading of the SVR4 ABI indicates that the
4528 procedure linkage table relocs (DT_JMPREL) should be
4529 included in the overall relocs (DT_REL). This is
4530 what Solaris does. However, UnixWare can not handle
4531 that case. Therefore, we override the DT_RELSZ entry
6348e046 4532 here to make it not include the JMPREL relocs. */
6de2ae4a 4533 s = htab->elf.srelplt;
6348e046
AM		 4534 if (s == NULL)
4535 continue;
eea6121a 4536 dyn.d_un.d_val -= s->size;
6348e046
AM		 4537 break;
4538
4539 case DT_REL:
4540 /* We may not be using the standard ELF linker script.
4541 If .rel.plt is the first .rel section, we adjust
4542 DT_REL to not include it. */
6de2ae4a 4543 s = htab->elf.srelplt;
6348e046
AM		 4544 if (s == NULL)
4545 continue;
4546 if (dyn.d_un.d_ptr != s->output_section->vma + s->output_offset)
4547 continue;
eea6121a 4548 dyn.d_un.d_ptr += s->size;
252b5132
RH		 4549 break;
4550 }
0ac8d2ca
AM		 4551
4552 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
252b5132
RH		 4553 }
4554
4555 /* Fill in the first entry in the procedure linkage table. */
6de2ae4a 4556 if (htab->elf.splt && htab->elf.splt->size > 0)
252b5132
RH		 4557 {
4558 if (info->shared)
eac338cf 4559 {
6de2ae4a 4560 memcpy (htab->elf.splt->contents, elf_i386_pic_plt0_entry,
eac338cf 4561 sizeof (elf_i386_pic_plt0_entry));
6de2ae4a 4562 memset (htab->elf.splt->contents + sizeof (elf_i386_pic_plt0_entry),
eac338cf
PB		 4563 htab->plt0_pad_byte,
4564 PLT_ENTRY_SIZE - sizeof (elf_i386_pic_plt0_entry));
4565 }
252b5132
RH		 4566 else
4567 {
6de2ae4a 4568 memcpy (htab->elf.splt->contents, elf_i386_plt0_entry,
eac338cf 4569 sizeof(elf_i386_plt0_entry));
6de2ae4a 4570 memset (htab->elf.splt->contents + sizeof (elf_i386_plt0_entry),
eac338cf
PB		 4571 htab->plt0_pad_byte,
4572 PLT_ENTRY_SIZE - sizeof (elf_i386_plt0_entry));
252b5132 4573 bfd_put_32 (output_bfd,
6de2ae4a
L		 4574 (htab->elf.sgotplt->output_section->vma
4575 + htab->elf.sgotplt->output_offset
6725bdbf 4576 + 4),
6de2ae4a 4577 htab->elf.splt->contents + 2);
252b5132 4578 bfd_put_32 (output_bfd,
6de2ae4a
L		 4579 (htab->elf.sgotplt->output_section->vma
4580 + htab->elf.sgotplt->output_offset
6725bdbf 4581 + 8),
6de2ae4a 4582 htab->elf.splt->contents + 8);
eac338cf
PB		 4583
4584 if (htab->is_vxworks)
4585 {
4586 Elf_Internal_Rela rel;
7325306f 4587
eac338cf
PB		 4588 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 4.
4589 On IA32 we use REL relocations so the addend goes in
4590 the PLT directly. */
6de2ae4a
L		 4591 rel.r_offset = (htab->elf.splt->output_section->vma
4592 + htab->elf.splt->output_offset
eac338cf 4593 + 2);
7325306f 4594 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB		 4595 bfd_elf32_swap_reloc_out (output_bfd, &rel,
4596 htab->srelplt2->contents);
4597 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_ + 8. */
6de2ae4a
L		 4598 rel.r_offset = (htab->elf.splt->output_section->vma
4599 + htab->elf.splt->output_offset
eac338cf 4600 + 8);
7325306f 4601 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB		 4602 bfd_elf32_swap_reloc_out (output_bfd, &rel,
4603 htab->srelplt2->contents +
4604 sizeof (Elf32_External_Rel));
4605 }
252b5132
RH		 4606 }
4607
4608 /* UnixWare sets the entsize of .plt to 4, although that doesn't
4609 really seem like the right value. */
6de2ae4a 4610 elf_section_data (htab->elf.splt->output_section)
6725bdbf 4611 ->this_hdr.sh_entsize = 4;
eac338cf
PB		 4612
4613 /* Correct the .rel.plt.unloaded relocations. */
4614 if (htab->is_vxworks && !info->shared)
4615 {
6de2ae4a 4616 int num_plts = (htab->elf.splt->size / PLT_ENTRY_SIZE) - 1;
4c9b0de6 4617 unsigned char *p;
eac338cf
PB		 4618
4619 p = htab->srelplt2->contents;
4620 if (info->shared)
4621 p += PLTRESOLVE_RELOCS_SHLIB * sizeof (Elf32_External_Rel);
4622 else
4623 p += PLTRESOLVE_RELOCS * sizeof (Elf32_External_Rel);
4624
4625 for (; num_plts; num_plts--)
4626 {
4627 Elf_Internal_Rela rel;
4628 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
7325306f 4629 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_386_32);
eac338cf
PB		 4630 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4631 p += sizeof (Elf32_External_Rel);
4632
4633 bfd_elf32_swap_reloc_in (output_bfd, p, &rel);
7325306f 4634 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_386_32);
eac338cf
PB		 4635 bfd_elf32_swap_reloc_out (output_bfd, &rel, p);
4636 p += sizeof (Elf32_External_Rel);
4637 }
4638 }
252b5132
RH		 4639 }
4640 }
4641
6de2ae4a 4642 if (htab->elf.sgotplt)
252b5132 4643 {
56d4289c
L		 4644 if (bfd_is_abs_section (htab->elf.sgotplt->output_section))
4645 {
4646 (*_bfd_error_handler)
4647 (_("discarded output section: `%A'"), htab->elf.sgotplt);
4648 return FALSE;
4649 }
4650
12d0ee4a 4651 /* Fill in the first three entries in the global offset table. */
6de2ae4a 4652 if (htab->elf.sgotplt->size > 0)
12d0ee4a
AM		 4653 {
4654 bfd_put_32 (output_bfd,
55fd94b0 4655 (sdyn == NULL ? 0
12d0ee4a 4656 : sdyn->output_section->vma + sdyn->output_offset),
6de2ae4a
L		 4657 htab->elf.sgotplt->contents);
4658 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 4);
4659 bfd_put_32 (output_bfd, 0, htab->elf.sgotplt->contents + 8);
12d0ee4a 4660 }
252b5132 4661
6de2ae4a 4662 elf_section_data (htab->elf.sgotplt->output_section)->this_hdr.sh_entsize = 4;
12d0ee4a 4663 }
8c37241b 4664
6de2ae4a
L		 4665 if (htab->elf.sgot && htab->elf.sgot->size > 0)
4666 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize = 4;
8c37241b 4667
c25bc9fc
L		 4668 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4669 htab_traverse (htab->loc_hash_table,
4670 elf_i386_finish_local_dynamic_symbol,
4671 info);
4672
b34976b6 4673 return TRUE;
252b5132
RH		 4674}
4675
4c45e5c9
JJ		 4676/* Return address for Ith PLT stub in section PLT, for relocation REL
4677 or (bfd_vma) -1 if it should not be included. */
4678
4679static bfd_vma
4680elf_i386_plt_sym_val (bfd_vma i, const asection *plt,
4681 const arelent *rel ATTRIBUTE_UNUSED)
4682{
4683 return plt->vma + (i + 1) * PLT_ENTRY_SIZE;
4684}
4685
fdc90cb4
JJ		 4686/* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
4687
4688static bfd_boolean
4689elf_i386_hash_symbol (struct elf_link_hash_entry *h)
4690{
4691 if (h->plt.offset != (bfd_vma) -1
4692 && !h->def_regular
4693 && !h->pointer_equality_needed)
4694 return FALSE;
4695
4696 return _bfd_elf_hash_symbol (h);
4697}
4c45e5c9 4698
d8045f23
NC		 4699/* Hook called by the linker routine which adds symbols from an object
4700 file. */
4701
4702static bfd_boolean
c16153ae 4703elf_i386_add_symbol_hook (bfd * abfd,
d8045f23
NC		 4704 struct bfd_link_info * info ATTRIBUTE_UNUSED,
4705 Elf_Internal_Sym * sym,
4706 const char ** namep ATTRIBUTE_UNUSED,
4707 flagword * flagsp ATTRIBUTE_UNUSED,
4708 asection ** secp ATTRIBUTE_UNUSED,
4709 bfd_vma * valp ATTRIBUTE_UNUSED)
4710{
c16153ae 4711 if ((abfd->flags & DYNAMIC) == 0
f64b2e8d
NC		 4712 && (ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC
4713 || ELF_ST_BIND (sym->st_info) == STB_GNU_UNIQUE))
4714 elf_tdata (info->output_bfd)->has_gnu_symbols = TRUE;
d8045f23
NC		 4715
4716 return TRUE;
4717}
4718
252b5132
RH		 4719#define TARGET_LITTLE_SYM bfd_elf32_i386_vec
4720#define TARGET_LITTLE_NAME "elf32-i386"
4721#define ELF_ARCH bfd_arch_i386
ae95ffa6 4722#define ELF_TARGET_ID I386_ELF_DATA
252b5132
RH		 4723#define ELF_MACHINE_CODE EM_386
4724#define ELF_MAXPAGESIZE 0x1000
252b5132
RH		 4725
4726#define elf_backend_can_gc_sections 1
51b64d56 4727#define elf_backend_can_refcount 1
252b5132
RH		 4728#define elf_backend_want_got_plt 1
4729#define elf_backend_plt_readonly 1
4730#define elf_backend_want_plt_sym 0
4731#define elf_backend_got_header_size 12
252b5132 4732
8c29f035
AM		 4733/* Support RELA for objdump of prelink objects. */
4734#define elf_info_to_howto elf_i386_info_to_howto_rel
dd5724d5
AM		 4735#define elf_info_to_howto_rel elf_i386_info_to_howto_rel
4736
13ae64f3 4737#define bfd_elf32_mkobject elf_i386_mkobject
13ae64f3 4738
dd5724d5
AM		 4739#define bfd_elf32_bfd_is_local_label_name elf_i386_is_local_label_name
4740#define bfd_elf32_bfd_link_hash_table_create elf_i386_link_hash_table_create
c25bc9fc 4741#define bfd_elf32_bfd_link_hash_table_free elf_i386_link_hash_table_free
dd5724d5 4742#define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup
13285a1b 4743#define bfd_elf32_bfd_reloc_name_lookup elf_i386_reloc_name_lookup
dd5724d5
AM		 4744
4745#define elf_backend_adjust_dynamic_symbol elf_i386_adjust_dynamic_symbol
13285a1b 4746#define elf_backend_relocs_compatible _bfd_elf_relocs_compatible
dd5724d5 4747#define elf_backend_check_relocs elf_i386_check_relocs
0ac8d2ca 4748#define elf_backend_copy_indirect_symbol elf_i386_copy_indirect_symbol
6725bdbf 4749#define elf_backend_create_dynamic_sections elf_i386_create_dynamic_sections
0ac8d2ca 4750#define elf_backend_fake_sections elf_i386_fake_sections
dd5724d5
AM		 4751#define elf_backend_finish_dynamic_sections elf_i386_finish_dynamic_sections
4752#define elf_backend_finish_dynamic_symbol elf_i386_finish_dynamic_symbol
4753#define elf_backend_gc_mark_hook elf_i386_gc_mark_hook
4754#define elf_backend_gc_sweep_hook elf_i386_gc_sweep_hook
c5fccbec
DJ		 4755#define elf_backend_grok_prstatus elf_i386_grok_prstatus
4756#define elf_backend_grok_psinfo elf_i386_grok_psinfo
db6751f2 4757#define elf_backend_reloc_type_class elf_i386_reloc_type_class
0ac8d2ca
AM		 4758#define elf_backend_relocate_section elf_i386_relocate_section
4759#define elf_backend_size_dynamic_sections elf_i386_size_dynamic_sections
67a4f2b7 4760#define elf_backend_always_size_sections elf_i386_always_size_sections
74541ad4
AM		 4761#define elf_backend_omit_section_dynsym \
4762 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
4c45e5c9 4763#define elf_backend_plt_sym_val elf_i386_plt_sym_val
fdc90cb4 4764#define elf_backend_hash_symbol elf_i386_hash_symbol
d8045f23
NC		 4765#define elf_backend_add_symbol_hook elf_i386_add_symbol_hook
4766#undef elf_backend_post_process_headers
4767#define elf_backend_post_process_headers _bfd_elf_set_osabi
dd5724d5 4768
252b5132 4769#include "elf32-target.h"
2bc3c89a
AM		 4770
4771/* FreeBSD support. */
4772
4773#undef TARGET_LITTLE_SYM
4774#define TARGET_LITTLE_SYM bfd_elf32_i386_freebsd_vec
4775#undef TARGET_LITTLE_NAME
4776#define TARGET_LITTLE_NAME "elf32-i386-freebsd"
d1036acb
L		 4777#undef ELF_OSABI
4778#define ELF_OSABI ELFOSABI_FREEBSD
2bc3c89a
AM		 4779
4780/* The kernel recognizes executables as valid only if they carry a
4781 "FreeBSD" label in the ELF header. So we put this label on all
4782 executables and (for simplicity) also all other object files. */
4783
2bc3c89a 4784static void
d8045f23 4785elf_i386_fbsd_post_process_headers (bfd *abfd, struct bfd_link_info *info)
2bc3c89a 4786{
d8045f23 4787 _bfd_elf_set_osabi (abfd, info);
2bc3c89a 4788
2bc3c89a
AM		 4789#ifdef OLD_FREEBSD_ABI_LABEL
4790 /* The ABI label supported by FreeBSD <= 4.0 is quite nonstandard. */
4791 memcpy (&i_ehdrp->e_ident[EI_ABIVERSION], "FreeBSD", 8);
caf47ea6 4792#endif
2bc3c89a
AM		 4793}
4794
4795#undef elf_backend_post_process_headers
d8045f23 4796#define elf_backend_post_process_headers elf_i386_fbsd_post_process_headers
571fe01f
NC		 4797#undef elf32_bed
4798#define elf32_bed elf32_i386_fbsd_bed
2bc3c89a 4799
d8045f23
NC		 4800#undef elf_backend_add_symbol_hook
4801
2bc3c89a 4802#include "elf32-target.h"
eac338cf 4803
a6cc6b3b
RO		 4804/* Solaris 2. */
4805
4806#undef TARGET_LITTLE_SYM
4807#define TARGET_LITTLE_SYM bfd_elf32_i386_sol2_vec
4808#undef TARGET_LITTLE_NAME
4809#define TARGET_LITTLE_NAME "elf32-i386-sol2"
4810
4811/* Restore default: we cannot use ELFOSABI_SOLARIS, otherwise ELFOSABI_NONE
4812 objects won't be recognized. */
4813#undef ELF_OSABI
4814
4815#undef elf32_bed
4816#define elf32_bed elf32_i386_sol2_bed
4817
7dc98aea
RO		 4818/* The 32-bit static TLS arena size is rounded to the nearest 8-byte
4819 boundary. */
4820#undef elf_backend_static_tls_alignment
4821#define elf_backend_static_tls_alignment 8
4822
a6cc6b3b
RO		 4823/* The Solaris 2 ABI requires a plt symbol on all platforms.
4824
4825 Cf. Linker and Libraries Guide, Ch. 2, Link-Editor, Generating the Output
4826 File, p.63. */
4827#undef elf_backend_want_plt_sym
4828#define elf_backend_want_plt_sym 1
4829
4830#include "elf32-target.h"
4831
eac338cf
PB		 4832/* VxWorks support. */
4833
4834#undef TARGET_LITTLE_SYM
4835#define TARGET_LITTLE_SYM bfd_elf32_i386_vxworks_vec
4836#undef TARGET_LITTLE_NAME
4837#define TARGET_LITTLE_NAME "elf32-i386-vxworks"
d1036acb 4838#undef ELF_OSABI
eac338cf
PB		 4839
4840/* Like elf_i386_link_hash_table_create but with tweaks for VxWorks. */
4841
4842static struct bfd_link_hash_table *
4843elf_i386_vxworks_link_hash_table_create (bfd *abfd)
4844{
4845 struct bfd_link_hash_table *ret;
4846 struct elf_i386_link_hash_table *htab;
4847
4848 ret = elf_i386_link_hash_table_create (abfd);
4849 if (ret)
4850 {
4851 htab = (struct elf_i386_link_hash_table *) ret;
4852 htab->is_vxworks = 1;
4853 htab->plt0_pad_byte = 0x90;
4854 }
4855
4856 return ret;
4857}
4858
4859
13285a1b
AM		 4860#undef elf_backend_relocs_compatible
4861#undef elf_backend_post_process_headers
eac338cf
PB		 4862#undef bfd_elf32_bfd_link_hash_table_create
4863#define bfd_elf32_bfd_link_hash_table_create \
4864 elf_i386_vxworks_link_hash_table_create
4865#undef elf_backend_add_symbol_hook
4866#define elf_backend_add_symbol_hook \
4867 elf_vxworks_add_symbol_hook
4868#undef elf_backend_link_output_symbol_hook
4869#define elf_backend_link_output_symbol_hook \
9c72ff84 4870 elf_vxworks_link_output_symbol_hook
eac338cf
PB		 4871#undef elf_backend_emit_relocs
4872#define elf_backend_emit_relocs elf_vxworks_emit_relocs
4873#undef elf_backend_final_write_processing
4874#define elf_backend_final_write_processing \
4875 elf_vxworks_final_write_processing
7dc98aea 4876#undef elf_backend_static_tls_alignment
eac338cf
PB		 4877
4878/* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
4879 define it. */
4880#undef elf_backend_want_plt_sym
4881#define elf_backend_want_plt_sym 1
4882
4883#undef elf32_bed
4884#define elf32_bed elf32_i386_vxworks_bed
4885
4886#include "elf32-target.h"
A mirror of the official binutils-gdb repository