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