* bfd.c (bfd_archive_filename): New function.
[binutils-gdb.git] / bfd / elf32-i386.c
1 /* Intel 80386/80486-specific support for 32-bit ELF
2 Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001
3 Free Software Foundation, Inc.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
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
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
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.
16
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
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20
21 #include "bfd.h"
22 #include "sysdep.h"
23 #include "bfdlink.h"
24 #include "libbfd.h"
25 #include "elf-bfd.h"
26
27 static reloc_howto_type *elf_i386_reloc_type_lookup
28 PARAMS ((bfd *, bfd_reloc_code_real_type));
29 static void elf_i386_info_to_howto
30 PARAMS ((bfd *, arelent *, Elf32_Internal_Rela *));
31 static void elf_i386_info_to_howto_rel
32 PARAMS ((bfd *, arelent *, Elf32_Internal_Rel *));
33 static boolean elf_i386_is_local_label_name PARAMS ((bfd *, const char *));
34 static struct bfd_hash_entry *elf_i386_link_hash_newfunc
35 PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
36 static struct bfd_link_hash_table *elf_i386_link_hash_table_create
37 PARAMS ((bfd *));
38 static boolean create_got_section PARAMS((bfd *, struct bfd_link_info *));
39 static boolean elf_i386_create_dynamic_sections
40 PARAMS((bfd *, struct bfd_link_info *));
41 static boolean elf_i386_check_relocs
42 PARAMS ((bfd *, struct bfd_link_info *, asection *,
43 const Elf_Internal_Rela *));
44 static asection *elf_i386_gc_mark_hook
45 PARAMS ((bfd *, struct bfd_link_info *, Elf_Internal_Rela *,
46 struct elf_link_hash_entry *, Elf_Internal_Sym *));
47 static boolean elf_i386_gc_sweep_hook
48 PARAMS ((bfd *, struct bfd_link_info *, asection *,
49 const Elf_Internal_Rela *));
50 static boolean elf_i386_adjust_dynamic_symbol
51 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *));
52 static boolean allocate_plt_and_got_and_discard_relocs
53 PARAMS ((struct elf_link_hash_entry *, PTR));
54 static boolean elf_i386_size_dynamic_sections
55 PARAMS ((bfd *, struct bfd_link_info *));
56 static boolean elf_i386_relocate_section
57 PARAMS ((bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *,
58 Elf_Internal_Rela *, Elf_Internal_Sym *, asection **));
59 static boolean elf_i386_finish_dynamic_symbol
60 PARAMS ((bfd *, struct bfd_link_info *, struct elf_link_hash_entry *,
61 Elf_Internal_Sym *));
62 static boolean elf_i386_finish_dynamic_sections
63 PARAMS ((bfd *, struct bfd_link_info *));
64 static boolean elf_i386_fake_sections
65 PARAMS ((bfd *, Elf32_Internal_Shdr *, asection *));
66 static enum elf_reloc_type_class elf_i386_reloc_type_class PARAMS ((int));
67 static boolean elf_i386_grok_prstatus
68 PARAMS ((bfd *abfd, Elf_Internal_Note *note));
69 static boolean elf_i386_grok_psinfo
70 PARAMS ((bfd *abfd, Elf_Internal_Note *note));
71
72 #define USE_REL 1 /* 386 uses REL relocations instead of RELA */
73
74 #include "elf/i386.h"
75
76 static reloc_howto_type elf_howto_table[]=
77 {
78 HOWTO(R_386_NONE, 0, 0, 0, false, 0, complain_overflow_bitfield,
79 bfd_elf_generic_reloc, "R_386_NONE",
80 true, 0x00000000, 0x00000000, false),
81 HOWTO(R_386_32, 0, 2, 32, false, 0, complain_overflow_bitfield,
82 bfd_elf_generic_reloc, "R_386_32",
83 true, 0xffffffff, 0xffffffff, false),
84 HOWTO(R_386_PC32, 0, 2, 32, true, 0, complain_overflow_bitfield,
85 bfd_elf_generic_reloc, "R_386_PC32",
86 true, 0xffffffff, 0xffffffff, true),
87 HOWTO(R_386_GOT32, 0, 2, 32, false, 0, complain_overflow_bitfield,
88 bfd_elf_generic_reloc, "R_386_GOT32",
89 true, 0xffffffff, 0xffffffff, false),
90 HOWTO(R_386_PLT32, 0, 2, 32, true, 0, complain_overflow_bitfield,
91 bfd_elf_generic_reloc, "R_386_PLT32",
92 true, 0xffffffff, 0xffffffff, true),
93 HOWTO(R_386_COPY, 0, 2, 32, false, 0, complain_overflow_bitfield,
94 bfd_elf_generic_reloc, "R_386_COPY",
95 true, 0xffffffff, 0xffffffff, false),
96 HOWTO(R_386_GLOB_DAT, 0, 2, 32, false, 0, complain_overflow_bitfield,
97 bfd_elf_generic_reloc, "R_386_GLOB_DAT",
98 true, 0xffffffff, 0xffffffff, false),
99 HOWTO(R_386_JUMP_SLOT, 0, 2, 32, false, 0, complain_overflow_bitfield,
100 bfd_elf_generic_reloc, "R_386_JUMP_SLOT",
101 true, 0xffffffff, 0xffffffff, false),
102 HOWTO(R_386_RELATIVE, 0, 2, 32, false, 0, complain_overflow_bitfield,
103 bfd_elf_generic_reloc, "R_386_RELATIVE",
104 true, 0xffffffff, 0xffffffff, false),
105 HOWTO(R_386_GOTOFF, 0, 2, 32, false, 0, complain_overflow_bitfield,
106 bfd_elf_generic_reloc, "R_386_GOTOFF",
107 true, 0xffffffff, 0xffffffff, false),
108 HOWTO(R_386_GOTPC, 0, 2, 32, true, 0, complain_overflow_bitfield,
109 bfd_elf_generic_reloc, "R_386_GOTPC",
110 true, 0xffffffff, 0xffffffff, true),
111
112 /* We have a gap in the reloc numbers here.
113 R_386_standard counts the number up to this point, and
114 R_386_ext_offset is the value to subtract from a reloc type of
115 R_386_16 thru R_386_PC8 to form an index into this table. */
116 #define R_386_standard ((unsigned int) R_386_GOTPC + 1)
117 #define R_386_ext_offset ((unsigned int) R_386_16 - R_386_standard)
118
119 /* The remaining relocs are a GNU extension. */
120 HOWTO(R_386_16, 0, 1, 16, false, 0, complain_overflow_bitfield,
121 bfd_elf_generic_reloc, "R_386_16",
122 true, 0xffff, 0xffff, false),
123 HOWTO(R_386_PC16, 0, 1, 16, true, 0, complain_overflow_bitfield,
124 bfd_elf_generic_reloc, "R_386_PC16",
125 true, 0xffff, 0xffff, true),
126 HOWTO(R_386_8, 0, 0, 8, false, 0, complain_overflow_bitfield,
127 bfd_elf_generic_reloc, "R_386_8",
128 true, 0xff, 0xff, false),
129 HOWTO(R_386_PC8, 0, 0, 8, true, 0, complain_overflow_signed,
130 bfd_elf_generic_reloc, "R_386_PC8",
131 true, 0xff, 0xff, true),
132
133 /* Another gap. */
134 #define R_386_ext ((unsigned int) R_386_PC8 + 1 - R_386_ext_offset)
135 #define R_386_vt_offset ((unsigned int) R_386_GNU_VTINHERIT - R_386_ext)
136
137 /* GNU extension to record C++ vtable hierarchy. */
138 HOWTO (R_386_GNU_VTINHERIT, /* type */
139 0, /* rightshift */
140 2, /* size (0 = byte, 1 = short, 2 = long) */
141 0, /* bitsize */
142 false, /* pc_relative */
143 0, /* bitpos */
144 complain_overflow_dont, /* complain_on_overflow */
145 NULL, /* special_function */
146 "R_386_GNU_VTINHERIT", /* name */
147 false, /* partial_inplace */
148 0, /* src_mask */
149 0, /* dst_mask */
150 false),
151
152 /* GNU extension to record C++ vtable member usage. */
153 HOWTO (R_386_GNU_VTENTRY, /* type */
154 0, /* rightshift */
155 2, /* size (0 = byte, 1 = short, 2 = long) */
156 0, /* bitsize */
157 false, /* pc_relative */
158 0, /* bitpos */
159 complain_overflow_dont, /* complain_on_overflow */
160 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
161 "R_386_GNU_VTENTRY", /* name */
162 false, /* partial_inplace */
163 0, /* src_mask */
164 0, /* dst_mask */
165 false)
166
167 #define R_386_vt ((unsigned int) R_386_GNU_VTENTRY + 1 - R_386_vt_offset)
168
169 };
170
171 #ifdef DEBUG_GEN_RELOC
172 #define TRACE(str) fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str)
173 #else
174 #define TRACE(str)
175 #endif
176
177 static reloc_howto_type *
178 elf_i386_reloc_type_lookup (abfd, code)
179 bfd *abfd ATTRIBUTE_UNUSED;
180 bfd_reloc_code_real_type code;
181 {
182 switch (code)
183 {
184 case BFD_RELOC_NONE:
185 TRACE ("BFD_RELOC_NONE");
186 return &elf_howto_table[(unsigned int) R_386_NONE ];
187
188 case BFD_RELOC_32:
189 TRACE ("BFD_RELOC_32");
190 return &elf_howto_table[(unsigned int) R_386_32 ];
191
192 case BFD_RELOC_CTOR:
193 TRACE ("BFD_RELOC_CTOR");
194 return &elf_howto_table[(unsigned int) R_386_32 ];
195
196 case BFD_RELOC_32_PCREL:
197 TRACE ("BFD_RELOC_PC32");
198 return &elf_howto_table[(unsigned int) R_386_PC32 ];
199
200 case BFD_RELOC_386_GOT32:
201 TRACE ("BFD_RELOC_386_GOT32");
202 return &elf_howto_table[(unsigned int) R_386_GOT32 ];
203
204 case BFD_RELOC_386_PLT32:
205 TRACE ("BFD_RELOC_386_PLT32");
206 return &elf_howto_table[(unsigned int) R_386_PLT32 ];
207
208 case BFD_RELOC_386_COPY:
209 TRACE ("BFD_RELOC_386_COPY");
210 return &elf_howto_table[(unsigned int) R_386_COPY ];
211
212 case BFD_RELOC_386_GLOB_DAT:
213 TRACE ("BFD_RELOC_386_GLOB_DAT");
214 return &elf_howto_table[(unsigned int) R_386_GLOB_DAT ];
215
216 case BFD_RELOC_386_JUMP_SLOT:
217 TRACE ("BFD_RELOC_386_JUMP_SLOT");
218 return &elf_howto_table[(unsigned int) R_386_JUMP_SLOT ];
219
220 case BFD_RELOC_386_RELATIVE:
221 TRACE ("BFD_RELOC_386_RELATIVE");
222 return &elf_howto_table[(unsigned int) R_386_RELATIVE ];
223
224 case BFD_RELOC_386_GOTOFF:
225 TRACE ("BFD_RELOC_386_GOTOFF");
226 return &elf_howto_table[(unsigned int) R_386_GOTOFF ];
227
228 case BFD_RELOC_386_GOTPC:
229 TRACE ("BFD_RELOC_386_GOTPC");
230 return &elf_howto_table[(unsigned int) R_386_GOTPC ];
231
232 /* The remaining relocs are a GNU extension. */
233 case BFD_RELOC_16:
234 TRACE ("BFD_RELOC_16");
235 return &elf_howto_table[(unsigned int) R_386_16 - R_386_ext_offset];
236
237 case BFD_RELOC_16_PCREL:
238 TRACE ("BFD_RELOC_16_PCREL");
239 return &elf_howto_table[(unsigned int) R_386_PC16 - R_386_ext_offset];
240
241 case BFD_RELOC_8:
242 TRACE ("BFD_RELOC_8");
243 return &elf_howto_table[(unsigned int) R_386_8 - R_386_ext_offset];
244
245 case BFD_RELOC_8_PCREL:
246 TRACE ("BFD_RELOC_8_PCREL");
247 return &elf_howto_table[(unsigned int) R_386_PC8 - R_386_ext_offset];
248
249 case BFD_RELOC_VTABLE_INHERIT:
250 TRACE ("BFD_RELOC_VTABLE_INHERIT");
251 return &elf_howto_table[(unsigned int) R_386_GNU_VTINHERIT
252 - R_386_vt_offset];
253
254 case BFD_RELOC_VTABLE_ENTRY:
255 TRACE ("BFD_RELOC_VTABLE_ENTRY");
256 return &elf_howto_table[(unsigned int) R_386_GNU_VTENTRY
257 - R_386_vt_offset];
258
259 default:
260 break;
261 }
262
263 TRACE ("Unknown");
264 return 0;
265 }
266
267 static void
268 elf_i386_info_to_howto (abfd, cache_ptr, dst)
269 bfd *abfd ATTRIBUTE_UNUSED;
270 arelent *cache_ptr ATTRIBUTE_UNUSED;
271 Elf32_Internal_Rela *dst ATTRIBUTE_UNUSED;
272 {
273 abort ();
274 }
275
276 static void
277 elf_i386_info_to_howto_rel (abfd, cache_ptr, dst)
278 bfd *abfd ATTRIBUTE_UNUSED;
279 arelent *cache_ptr;
280 Elf32_Internal_Rel *dst;
281 {
282 unsigned int r_type = ELF32_R_TYPE (dst->r_info);
283 unsigned int indx;
284
285 if ((indx = r_type) >= R_386_standard
286 && ((indx = r_type - R_386_ext_offset) - R_386_standard
287 >= R_386_ext - R_386_standard)
288 && ((indx = r_type - R_386_vt_offset) - R_386_ext
289 >= R_386_vt - R_386_ext))
290 {
291 (*_bfd_error_handler) (_("%s: invalid relocation type %d"),
292 bfd_archive_filename (abfd), (int) r_type);
293 indx = (unsigned int) R_386_NONE;
294 }
295 cache_ptr->howto = &elf_howto_table[indx];
296 }
297
298 /* Return whether a symbol name implies a local label. The UnixWare
299 2.1 cc generates temporary symbols that start with .X, so we
300 recognize them here. FIXME: do other SVR4 compilers also use .X?.
301 If so, we should move the .X recognition into
302 _bfd_elf_is_local_label_name. */
303
304 static boolean
305 elf_i386_is_local_label_name (abfd, name)
306 bfd *abfd;
307 const char *name;
308 {
309 if (name[0] == '.' && name[1] == 'X')
310 return true;
311
312 return _bfd_elf_is_local_label_name (abfd, name);
313 }
314 \f
315 /* Functions for the i386 ELF linker. */
316
317 /* The name of the dynamic interpreter. This is put in the .interp
318 section. */
319
320 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
321
322 /* The size in bytes of an entry in the procedure linkage table. */
323
324 #define PLT_ENTRY_SIZE 16
325
326 /* The first entry in an absolute procedure linkage table looks like
327 this. See the SVR4 ABI i386 supplement to see how this works. */
328
329 static const bfd_byte elf_i386_plt0_entry[PLT_ENTRY_SIZE] =
330 {
331 0xff, 0x35, /* pushl contents of address */
332 0, 0, 0, 0, /* replaced with address of .got + 4. */
333 0xff, 0x25, /* jmp indirect */
334 0, 0, 0, 0, /* replaced with address of .got + 8. */
335 0, 0, 0, 0 /* pad out to 16 bytes. */
336 };
337
338 /* Subsequent entries in an absolute procedure linkage table look like
339 this. */
340
341 static const bfd_byte elf_i386_plt_entry[PLT_ENTRY_SIZE] =
342 {
343 0xff, 0x25, /* jmp indirect */
344 0, 0, 0, 0, /* replaced with address of this symbol in .got. */
345 0x68, /* pushl immediate */
346 0, 0, 0, 0, /* replaced with offset into relocation table. */
347 0xe9, /* jmp relative */
348 0, 0, 0, 0 /* replaced with offset to start of .plt. */
349 };
350
351 /* The first entry in a PIC procedure linkage table look like this. */
352
353 static const bfd_byte elf_i386_pic_plt0_entry[PLT_ENTRY_SIZE] =
354 {
355 0xff, 0xb3, 4, 0, 0, 0, /* pushl 4(%ebx) */
356 0xff, 0xa3, 8, 0, 0, 0, /* jmp *8(%ebx) */
357 0, 0, 0, 0 /* pad out to 16 bytes. */
358 };
359
360 /* Subsequent entries in a PIC procedure linkage table look like this. */
361
362 static const bfd_byte elf_i386_pic_plt_entry[PLT_ENTRY_SIZE] =
363 {
364 0xff, 0xa3, /* jmp *offset(%ebx) */
365 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
366 0x68, /* pushl immediate */
367 0, 0, 0, 0, /* replaced with offset into relocation table. */
368 0xe9, /* jmp relative */
369 0, 0, 0, 0 /* replaced with offset to start of .plt. */
370 };
371
372 /* The i386 linker needs to keep track of the number of relocs that it
373 decides to copy as dynamic relocs in check_relocs for each symbol.
374 This is so that it can later discard them if they are found to be
375 unnecessary. We store the information in a field extending the
376 regular ELF linker hash table. */
377
378 struct elf_i386_dyn_relocs
379 {
380 /* Next section. */
381 struct elf_i386_dyn_relocs *next;
382 /* A section in dynobj. */
383 asection *section;
384 /* Number of relocs copied in this section. */
385 bfd_size_type count;
386 };
387
388 /* i386 ELF linker hash entry. */
389
390 struct elf_i386_link_hash_entry
391 {
392 struct elf_link_hash_entry root;
393
394 /* Number of PC relative relocs copied for this symbol. */
395 struct elf_i386_dyn_relocs *dyn_relocs;
396 };
397
398 /* i386 ELF linker hash table. */
399
400 struct elf_i386_link_hash_table
401 {
402 struct elf_link_hash_table root;
403
404 /* Short-cuts to get to dynamic linker sections. */
405 asection *sgot;
406 asection *sgotplt;
407 asection *srelgot;
408 asection *splt;
409 asection *srelplt;
410 asection *sdynbss;
411 asection *srelbss;
412 };
413
414 /* Get the i386 ELF linker hash table from a link_info structure. */
415
416 #define elf_i386_hash_table(p) \
417 ((struct elf_i386_link_hash_table *) ((p)->hash))
418
419 /* Create an entry in an i386 ELF linker hash table. */
420
421 static struct bfd_hash_entry *
422 elf_i386_link_hash_newfunc (entry, table, string)
423 struct bfd_hash_entry *entry;
424 struct bfd_hash_table *table;
425 const char *string;
426 {
427 struct elf_i386_link_hash_entry *ret =
428 (struct elf_i386_link_hash_entry *) entry;
429
430 /* Allocate the structure if it has not already been allocated by a
431 subclass. */
432 if (ret == (struct elf_i386_link_hash_entry *) NULL)
433 ret = ((struct elf_i386_link_hash_entry *)
434 bfd_hash_allocate (table,
435 sizeof (struct elf_i386_link_hash_entry)));
436 if (ret == (struct elf_i386_link_hash_entry *) NULL)
437 return (struct bfd_hash_entry *) ret;
438
439 /* Call the allocation method of the superclass. */
440 ret = ((struct elf_i386_link_hash_entry *)
441 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
442 table, string));
443 if (ret != (struct elf_i386_link_hash_entry *) NULL)
444 {
445 ret->dyn_relocs = NULL;
446 }
447
448 return (struct bfd_hash_entry *) ret;
449 }
450
451 /* Create an i386 ELF linker hash table. */
452
453 static struct bfd_link_hash_table *
454 elf_i386_link_hash_table_create (abfd)
455 bfd *abfd;
456 {
457 struct elf_i386_link_hash_table *ret;
458 bfd_size_type amt = sizeof (struct elf_i386_link_hash_table);
459
460 ret = (struct elf_i386_link_hash_table *) bfd_alloc (abfd, amt);
461 if (ret == (struct elf_i386_link_hash_table *) NULL)
462 return NULL;
463
464 if (! _bfd_elf_link_hash_table_init (&ret->root, abfd,
465 elf_i386_link_hash_newfunc))
466 {
467 bfd_release (abfd, ret);
468 return NULL;
469 }
470
471 ret->sgot = NULL;
472 ret->sgotplt = NULL;
473 ret->srelgot = NULL;
474 ret->splt = NULL;
475 ret->srelplt = NULL;
476 ret->sdynbss = NULL;
477 ret->srelbss = NULL;
478
479 return &ret->root.root;
480 }
481
482 /* Create .got, .gotplt, and .rel.got sections in DYNOBJ, and set up
483 shortcuts to them in our hash table. */
484
485 static boolean
486 create_got_section (dynobj, info)
487 bfd *dynobj;
488 struct bfd_link_info *info;
489 {
490 struct elf_i386_link_hash_table *htab;
491
492 if (! _bfd_elf_create_got_section (dynobj, info))
493 return false;
494
495 htab = elf_i386_hash_table (info);
496 htab->sgot = bfd_get_section_by_name (dynobj, ".got");
497 htab->sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
498 if (!htab->sgot || !htab->sgotplt)
499 abort ();
500
501 htab->srelgot = bfd_make_section (dynobj, ".rel.got");
502 if (htab->srelgot == NULL
503 || ! bfd_set_section_flags (dynobj, htab->srelgot,
504 (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
505 | SEC_IN_MEMORY | SEC_LINKER_CREATED
506 | SEC_READONLY))
507 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 2))
508 return false;
509 return true;
510 }
511
512 /* Create .plt, .rel.plt, .got, .got.plt, .rel.got, .dynbss, and
513 .rel.bss sections in DYNOBJ, and set up shortcuts to them in our
514 hash table. */
515
516 static boolean
517 elf_i386_create_dynamic_sections (dynobj, info)
518 bfd *dynobj;
519 struct bfd_link_info *info;
520 {
521 struct elf_i386_link_hash_table *htab;
522
523 htab = elf_i386_hash_table (info);
524 if (!htab->sgot && !create_got_section (dynobj, info))
525 return false;
526
527 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
528 return false;
529
530 htab->splt = bfd_get_section_by_name (dynobj, ".plt");
531 htab->srelplt = bfd_get_section_by_name (dynobj, ".rel.plt");
532 htab->sdynbss = bfd_get_section_by_name (dynobj, ".dynbss");
533 if (!info->shared)
534 htab->srelbss = bfd_get_section_by_name (dynobj, ".rel.bss");
535
536 if (!htab->splt || !htab->srelplt || !htab->sdynbss
537 || (!info->shared && !htab->srelbss))
538 abort ();
539
540 return true;
541 }
542
543 /* Look through the relocs for a section during the first phase, and
544 allocate space in the global offset table or procedure linkage
545 table. */
546
547 static boolean
548 elf_i386_check_relocs (abfd, info, sec, relocs)
549 bfd *abfd;
550 struct bfd_link_info *info;
551 asection *sec;
552 const Elf_Internal_Rela *relocs;
553 {
554 struct elf_i386_link_hash_table *htab;
555 bfd *dynobj;
556 Elf_Internal_Shdr *symtab_hdr;
557 struct elf_link_hash_entry **sym_hashes;
558 bfd_signed_vma *local_got_refcounts;
559 const Elf_Internal_Rela *rel;
560 const Elf_Internal_Rela *rel_end;
561 asection *sreloc;
562
563 if (info->relocateable)
564 return true;
565
566 htab = elf_i386_hash_table (info);
567 dynobj = htab->root.dynobj;
568 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
569 sym_hashes = elf_sym_hashes (abfd);
570 local_got_refcounts = elf_local_got_refcounts (abfd);
571
572 sreloc = NULL;
573
574 rel_end = relocs + sec->reloc_count;
575 for (rel = relocs; rel < rel_end; rel++)
576 {
577 unsigned long r_symndx;
578 struct elf_link_hash_entry *h;
579
580 r_symndx = ELF32_R_SYM (rel->r_info);
581
582 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
583 {
584 (*_bfd_error_handler) (_("%s: bad symbol index: %d"),
585 bfd_archive_filename (abfd),
586 r_symndx);
587 return false;
588 }
589
590 if (r_symndx < symtab_hdr->sh_info)
591 h = NULL;
592 else
593 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
594
595 /* Some relocs require a global offset table. */
596 if (htab->sgot == NULL)
597 {
598 switch (ELF32_R_TYPE (rel->r_info))
599 {
600 case R_386_GOT32:
601 case R_386_GOTOFF:
602 case R_386_GOTPC:
603 if (dynobj == NULL)
604 htab->root.dynobj = dynobj = abfd;
605 if (!create_got_section (dynobj, info))
606 return false;
607 break;
608
609 default:
610 break;
611 }
612 }
613
614 switch (ELF32_R_TYPE (rel->r_info))
615 {
616 case R_386_GOT32:
617 /* This symbol requires a global offset table entry. */
618 if (h != NULL)
619 {
620 if (h->got.refcount == -1)
621 h->got.refcount = 1;
622 else
623 h->got.refcount += 1;
624 }
625 else
626 {
627 /* This is a global offset table entry for a local symbol. */
628 if (local_got_refcounts == NULL)
629 {
630 bfd_size_type size;
631
632 size = symtab_hdr->sh_info;
633 size *= sizeof (bfd_signed_vma);
634 local_got_refcounts = ((bfd_signed_vma *)
635 bfd_alloc (abfd, size));
636 if (local_got_refcounts == NULL)
637 return false;
638 elf_local_got_refcounts (abfd) = local_got_refcounts;
639 memset (local_got_refcounts, -1, (size_t) size);
640 }
641 if (local_got_refcounts[r_symndx] == -1)
642 local_got_refcounts[r_symndx] = 1;
643 else
644 local_got_refcounts[r_symndx] += 1;
645 }
646 break;
647
648 case R_386_PLT32:
649 /* This symbol requires a procedure linkage table entry. We
650 actually build the entry in adjust_dynamic_symbol,
651 because this might be a case of linking PIC code which is
652 never referenced by a dynamic object, in which case we
653 don't need to generate a procedure linkage table entry
654 after all. */
655
656 /* If this is a local symbol, we resolve it directly without
657 creating a procedure linkage table entry. */
658 if (h == NULL)
659 continue;
660
661 if (h->plt.refcount == -1)
662 {
663 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
664 h->plt.refcount = 1;
665 }
666 else
667 h->plt.refcount += 1;
668 break;
669
670 case R_386_32:
671 case R_386_PC32:
672 if (h != NULL && !info->shared)
673 {
674 /* If this reloc is in a read-only section, we might
675 need a copy reloc. */
676 if ((sec->flags & SEC_READONLY) != 0)
677 h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
678
679 /* We may need a .plt entry if the function this reloc
680 refers to is in a shared lib. */
681 if (h->plt.refcount == -1)
682 h->plt.refcount = 1;
683 else
684 h->plt.refcount += 1;
685 }
686
687 /* If we are creating a shared library, and this is a reloc
688 against a global symbol, or a non PC relative reloc
689 against a local symbol, then we need to copy the reloc
690 into the shared library. However, if we are linking with
691 -Bsymbolic, we do not need to copy a reloc against a
692 global symbol which is defined in an object we are
693 including in the link (i.e., DEF_REGULAR is set). At
694 this point we have not seen all the input files, so it is
695 possible that DEF_REGULAR is not set now but will be set
696 later (it is never cleared). In case of a weak definition,
697 DEF_REGULAR may be cleared later by a strong definition in
698 a shared library. We account for that possibility below by
699 storing information in the relocs_copied field of the hash
700 table entry. A similar situation occurs when creating
701 shared libraries and symbol visibility changes render the
702 symbol local.
703
704 If on the other hand, we are creating an executable, we
705 may need to keep relocations for symbols satisfied by a
706 dynamic library if we manage to avoid copy relocs for the
707 symbol. */
708 if ((info->shared
709 && (sec->flags & SEC_ALLOC) != 0
710 && (ELF32_R_TYPE (rel->r_info) != R_386_PC32
711 || (h != NULL
712 && (! info->symbolic
713 || h->root.type == bfd_link_hash_defweak
714 || (h->elf_link_hash_flags
715 & ELF_LINK_HASH_DEF_REGULAR) == 0))))
716 || (!info->shared
717 && (sec->flags & SEC_ALLOC) != 0
718 && h != NULL
719 && (h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
720 && (h->root.type == bfd_link_hash_defweak
721 || (h->elf_link_hash_flags
722 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
723 {
724 /* We must copy these reloc types into the output file.
725 Create a reloc section in dynobj and make room for
726 this reloc. */
727 if (dynobj == NULL)
728 htab->root.dynobj = dynobj = abfd;
729
730 if (sreloc == NULL)
731 {
732 const char *name;
733
734 name = (bfd_elf_string_from_elf_section
735 (abfd,
736 elf_elfheader (abfd)->e_shstrndx,
737 elf_section_data (sec)->rel_hdr.sh_name));
738 if (name == NULL)
739 return false;
740
741 if (strncmp (name, ".rel", 4) != 0
742 || strcmp (bfd_get_section_name (abfd, sec),
743 name + 4) != 0)
744 {
745 (*_bfd_error_handler) (_("%s: bad relocation section name `%s\'"),
746 bfd_archive_filename (abfd),
747 name);
748 }
749
750 sreloc = bfd_get_section_by_name (dynobj, name);
751 if (sreloc == NULL)
752 {
753 flagword flags;
754
755 sreloc = bfd_make_section (dynobj, name);
756 flags = (SEC_HAS_CONTENTS | SEC_READONLY
757 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
758 if ((sec->flags & SEC_ALLOC) != 0)
759 flags |= SEC_ALLOC | SEC_LOAD;
760 if (sreloc == NULL
761 || ! bfd_set_section_flags (dynobj, sreloc, flags)
762 || ! bfd_set_section_alignment (dynobj, sreloc, 2))
763 return false;
764 }
765 if (sec->flags & SEC_READONLY)
766 info->flags |= DF_TEXTREL;
767 }
768
769 sreloc->_raw_size += sizeof (Elf32_External_Rel);
770
771 /* If this is a global symbol, we count the number of PC
772 relative relocations we have entered for this symbol,
773 so that we can discard them later as necessary. Note
774 that this function is only called if we are using an
775 elf_i386 linker hash table, which means that h is
776 really a pointer to an elf_i386_link_hash_entry. */
777 if (!info->shared
778 || (h != NULL
779 && ELF32_R_TYPE (rel->r_info) == R_386_PC32))
780 {
781 struct elf_i386_link_hash_entry *eh;
782 struct elf_i386_dyn_relocs *p;
783
784 eh = (struct elf_i386_link_hash_entry *) h;
785
786 for (p = eh->dyn_relocs; p != NULL; p = p->next)
787 if (p->section == sreloc)
788 break;
789
790 if (p == NULL)
791 {
792 p = ((struct elf_i386_dyn_relocs *)
793 bfd_alloc (dynobj, (bfd_size_type) sizeof *p));
794 if (p == NULL)
795 return false;
796 p->next = eh->dyn_relocs;
797 eh->dyn_relocs = p;
798 p->section = sreloc;
799 p->count = 0;
800 }
801
802 ++p->count;
803 }
804 }
805
806 break;
807
808 /* This relocation describes the C++ object vtable hierarchy.
809 Reconstruct it for later use during GC. */
810 case R_386_GNU_VTINHERIT:
811 if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
812 return false;
813 break;
814
815 /* This relocation describes which C++ vtable entries are actually
816 used. Record for later use during GC. */
817 case R_386_GNU_VTENTRY:
818 if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_offset))
819 return false;
820 break;
821
822 default:
823 break;
824 }
825 }
826
827 return true;
828 }
829
830 /* Return the section that should be marked against GC for a given
831 relocation. */
832
833 static asection *
834 elf_i386_gc_mark_hook (abfd, info, rel, h, sym)
835 bfd *abfd;
836 struct bfd_link_info *info ATTRIBUTE_UNUSED;
837 Elf_Internal_Rela *rel;
838 struct elf_link_hash_entry *h;
839 Elf_Internal_Sym *sym;
840 {
841 if (h != NULL)
842 {
843 switch (ELF32_R_TYPE (rel->r_info))
844 {
845 case R_386_GNU_VTINHERIT:
846 case R_386_GNU_VTENTRY:
847 break;
848
849 default:
850 switch (h->root.type)
851 {
852 case bfd_link_hash_defined:
853 case bfd_link_hash_defweak:
854 return h->root.u.def.section;
855
856 case bfd_link_hash_common:
857 return h->root.u.c.p->section;
858
859 default:
860 break;
861 }
862 }
863 }
864 else
865 {
866 if (!(elf_bad_symtab (abfd)
867 && ELF_ST_BIND (sym->st_info) != STB_LOCAL)
868 && ! ((sym->st_shndx <= 0 || sym->st_shndx >= SHN_LORESERVE)
869 && sym->st_shndx != SHN_COMMON))
870 {
871 return bfd_section_from_elf_index (abfd, sym->st_shndx);
872 }
873 }
874
875 return NULL;
876 }
877
878 /* Update the got entry reference counts for the section being removed. */
879
880 static boolean
881 elf_i386_gc_sweep_hook (abfd, info, sec, relocs)
882 bfd *abfd;
883 struct bfd_link_info *info;
884 asection *sec;
885 const Elf_Internal_Rela *relocs;
886 {
887 Elf_Internal_Shdr *symtab_hdr;
888 struct elf_link_hash_entry **sym_hashes;
889 bfd_signed_vma *local_got_refcounts;
890 const Elf_Internal_Rela *rel, *relend;
891 unsigned long r_symndx;
892 struct elf_link_hash_entry *h;
893 bfd *dynobj;
894
895 dynobj = elf_hash_table (info)->dynobj;
896 if (dynobj == NULL)
897 return true;
898
899 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
900 sym_hashes = elf_sym_hashes (abfd);
901 local_got_refcounts = elf_local_got_refcounts (abfd);
902
903 relend = relocs + sec->reloc_count;
904 for (rel = relocs; rel < relend; rel++)
905 switch (ELF32_R_TYPE (rel->r_info))
906 {
907 case R_386_GOT32:
908 case R_386_GOTOFF:
909 case R_386_GOTPC:
910 r_symndx = ELF32_R_SYM (rel->r_info);
911 if (r_symndx >= symtab_hdr->sh_info)
912 {
913 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
914 if (h->got.refcount > 0)
915 h->got.refcount -= 1;
916 }
917 else if (local_got_refcounts != NULL)
918 {
919 if (local_got_refcounts[r_symndx] > 0)
920 local_got_refcounts[r_symndx] -= 1;
921 }
922 break;
923
924 case R_386_32:
925 case R_386_PC32:
926 if (info->shared)
927 break;
928 /* Fall through. */
929
930 case R_386_PLT32:
931 r_symndx = ELF32_R_SYM (rel->r_info);
932 if (r_symndx >= symtab_hdr->sh_info)
933 {
934 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
935 if (h->plt.refcount > 0)
936 h->plt.refcount -= 1;
937 }
938 break;
939
940 default:
941 break;
942 }
943
944 return true;
945 }
946
947 /* Adjust a symbol defined by a dynamic object and referenced by a
948 regular object. The current definition is in some section of the
949 dynamic object, but we're not including those sections. We have to
950 change the definition to something the rest of the link can
951 understand. */
952
953 static boolean
954 elf_i386_adjust_dynamic_symbol (info, h)
955 struct bfd_link_info *info;
956 struct elf_link_hash_entry *h;
957 {
958 struct elf_i386_link_hash_table *htab;
959 bfd *dynobj;
960 asection *s;
961 unsigned int power_of_two;
962
963 htab = elf_i386_hash_table (info);
964 dynobj = htab->root.dynobj;
965
966 /* If this is a function, put it in the procedure linkage table. We
967 will fill in the contents of the procedure linkage table later,
968 when we know the address of the .got section. */
969 if (h->type == STT_FUNC
970 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
971 {
972 if (h->plt.refcount <= 0
973 || (! info->shared
974 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
975 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0))
976 {
977 /* This case can occur if we saw a PLT32 reloc in an input
978 file, but the symbol was never referred to by a dynamic
979 object, or if all references were garbage collected. In
980 such a case, we don't actually need to build a procedure
981 linkage table, and we can just do a PC32 reloc instead. */
982 h->plt.refcount = (bfd_vma) -1;
983 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
984 }
985
986 return true;
987 }
988 else
989 /* It's possible that we incorrectly decided a .plt reloc was
990 needed for an R_386_PC32 reloc to a non-function sym in
991 check_relocs. We can't decide accurately between function and
992 non-function syms in check-relocs; Objects loaded later in
993 the link may change h->type. So fix it now. */
994 h->plt.refcount = (bfd_vma) -1;
995
996 /* If this is a weak symbol, and there is a real definition, the
997 processor independent code will have arranged for us to see the
998 real definition first, and we can just use the same value. */
999 if (h->weakdef != NULL)
1000 {
1001 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1002 || h->weakdef->root.type == bfd_link_hash_defweak);
1003 h->root.u.def.section = h->weakdef->root.u.def.section;
1004 h->root.u.def.value = h->weakdef->root.u.def.value;
1005 return true;
1006 }
1007
1008 /* This is a reference to a symbol defined by a dynamic object which
1009 is not a function. */
1010
1011 /* If we are creating a shared library, we must presume that the
1012 only references to the symbol are via the global offset table.
1013 For such cases we need not do anything here; the relocations will
1014 be handled correctly by relocate_section. */
1015 if (info->shared)
1016 return true;
1017
1018 /* If there are no references to this symbol that do not use the
1019 GOT, we don't need to generate a copy reloc. */
1020 if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
1021 return true;
1022
1023 /* We must allocate the symbol in our .dynbss section, which will
1024 become part of the .bss section of the executable. There will be
1025 an entry for this symbol in the .dynsym section. The dynamic
1026 object will contain position independent code, so all references
1027 from the dynamic object to this symbol will go through the global
1028 offset table. The dynamic linker will use the .dynsym entry to
1029 determine the address it must put in the global offset table, so
1030 both the dynamic object and the regular object will refer to the
1031 same memory location for the variable. */
1032
1033 s = htab->sdynbss;
1034 if (s == NULL)
1035 abort ();
1036
1037 /* We must generate a R_386_COPY reloc to tell the dynamic linker to
1038 copy the initial value out of the dynamic object and into the
1039 runtime process image. We need to remember the offset into the
1040 .rel.bss section we are going to use. */
1041 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1042 {
1043 asection *srel;
1044
1045 srel = htab->srelbss;
1046 if (srel == NULL)
1047 abort ();
1048 srel->_raw_size += sizeof (Elf32_External_Rel);
1049 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1050 }
1051
1052 /* We need to figure out the alignment required for this symbol. I
1053 have no idea how ELF linkers handle this. */
1054 power_of_two = bfd_log2 (h->size);
1055 if (power_of_two > 3)
1056 power_of_two = 3;
1057
1058 /* Apply the required alignment. */
1059 s->_raw_size = BFD_ALIGN (s->_raw_size,
1060 (bfd_size_type) (1 << power_of_two));
1061 if (power_of_two > bfd_get_section_alignment (dynobj, s))
1062 {
1063 if (! bfd_set_section_alignment (dynobj, s, power_of_two))
1064 return false;
1065 }
1066
1067 /* Define the symbol as being at this point in the section. */
1068 h->root.u.def.section = s;
1069 h->root.u.def.value = s->_raw_size;
1070
1071 /* Increment the section size to make room for the symbol. */
1072 s->_raw_size += h->size;
1073
1074 return true;
1075 }
1076
1077 /* This is the condition under which elf_i386_finish_dynamic_symbol
1078 will be called from elflink.h. If elflink.h doesn't call our
1079 finish_dynamic_symbol routine, we'll need to do something about
1080 initializing any .plt and .got entries in elf_i386_relocate_section. */
1081 #define WILL_CALL_FINISH_DYNAMIC_SYMBOL(DYN, INFO, H) \
1082 ((DYN) \
1083 && ((INFO)->shared \
1084 || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0) \
1085 && ((H)->dynindx != -1 \
1086 || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0))
1087
1088 /* Allocate space in .plt, .got and associated reloc sections for
1089 global syms. Also discards space allocated for relocs in the
1090 check_relocs function that we subsequently have found to be
1091 unneeded. */
1092
1093 static boolean
1094 allocate_plt_and_got_and_discard_relocs (h, inf)
1095 struct elf_link_hash_entry *h;
1096 PTR inf;
1097 {
1098 struct bfd_link_info *info;
1099 struct elf_i386_link_hash_table *htab;
1100 asection *s;
1101 struct elf_i386_link_hash_entry *eh;
1102
1103 if (h->root.type == bfd_link_hash_indirect
1104 || h->root.type == bfd_link_hash_warning)
1105 return true;
1106
1107 info = (struct bfd_link_info *) inf;
1108 htab = elf_i386_hash_table (info);
1109
1110 if (htab->root.dynamic_sections_created
1111 && h->plt.refcount > 0)
1112 {
1113 /* Make sure this symbol is output as a dynamic symbol.
1114 Undefined weak syms won't yet be marked as dynamic. */
1115 if (h->dynindx == -1
1116 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1117 {
1118 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1119 return false;
1120 }
1121
1122 s = htab->splt;
1123 if (s == NULL)
1124 abort ();
1125
1126 /* If this is the first .plt entry, make room for the special
1127 first entry. */
1128 if (s->_raw_size == 0)
1129 s->_raw_size += PLT_ENTRY_SIZE;
1130
1131 h->plt.offset = s->_raw_size;
1132
1133 /* If this symbol is not defined in a regular file, and we are
1134 not generating a shared library, then set the symbol to this
1135 location in the .plt. This is required to make function
1136 pointers compare as equal between the normal executable and
1137 the shared library. */
1138 if (! info->shared
1139 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1140 {
1141 h->root.u.def.section = s;
1142 h->root.u.def.value = h->plt.offset;
1143 }
1144
1145 /* Make room for this entry. */
1146 s->_raw_size += PLT_ENTRY_SIZE;
1147
1148 /* We also need to make an entry in the .got.plt section, which
1149 will be placed in the .got section by the linker script. */
1150 s = htab->sgotplt;
1151 if (s == NULL)
1152 abort ();
1153 s->_raw_size += 4;
1154
1155 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, info, h))
1156 {
1157 /* We also need to make an entry in the .rel.plt section. */
1158 s = htab->srelplt;
1159 if (s == NULL)
1160 abort ();
1161 s->_raw_size += sizeof (Elf32_External_Rel);
1162 }
1163 }
1164 else
1165 {
1166 h->plt.offset = (bfd_vma) -1;
1167 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
1168 }
1169
1170 if (h->got.refcount > 0)
1171 {
1172 boolean dyn;
1173
1174 /* Make sure this symbol is output as a dynamic symbol.
1175 Undefined weak syms won't yet be marked as dynamic. */
1176 if (h->dynindx == -1
1177 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1178 {
1179 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1180 return false;
1181 }
1182
1183 s = htab->sgot;
1184 h->got.offset = s->_raw_size;
1185 s->_raw_size += 4;
1186 dyn = htab->root.dynamic_sections_created;
1187 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info, h))
1188 htab->srelgot->_raw_size += sizeof (Elf32_External_Rel);
1189 }
1190 else
1191 h->got.offset = (bfd_vma) -1;
1192
1193 /* In the shared -Bsymbolic case, discard space allocated for
1194 dynamic relocs against symbols which turn out to be defined
1195 in regular objects. For the normal shared case, discard space
1196 for relocs that have become local due to symbol visibility
1197 changes. For the non-shared case, discard space for symbols
1198 which turn out to need copy relocs or are not dynamic. */
1199
1200 eh = (struct elf_i386_link_hash_entry *) h;
1201 if (eh->dyn_relocs == NULL)
1202 return true;
1203
1204 if (!info->shared
1205 && (h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
1206 && (((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1207 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1208 || (htab->root.dynamic_sections_created
1209 && (h->root.type == bfd_link_hash_undefweak
1210 || h->root.type == bfd_link_hash_undefined))))
1211 {
1212 /* Make sure this symbol is output as a dynamic symbol.
1213 Undefined weak syms won't yet be marked as dynamic. */
1214 if (h->dynindx == -1
1215 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
1216 {
1217 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1218 return false;
1219 }
1220
1221 /* If that succeeded, we know we'll be keeping all the relocs. */
1222 if (h->dynindx != -1)
1223 return true;
1224 }
1225
1226 if (!info->shared
1227 || ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0
1228 && ((h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0
1229 || info->symbolic)))
1230 {
1231 struct elf_i386_dyn_relocs *c;
1232
1233 for (c = eh->dyn_relocs; c != NULL; c = c->next)
1234 c->section->_raw_size -= c->count * sizeof (Elf32_External_Rel);
1235 }
1236
1237 return true;
1238 }
1239
1240 /* Set the sizes of the dynamic sections. */
1241
1242 static boolean
1243 elf_i386_size_dynamic_sections (output_bfd, info)
1244 bfd *output_bfd ATTRIBUTE_UNUSED;
1245 struct bfd_link_info *info;
1246 {
1247 struct elf_i386_link_hash_table *htab;
1248 bfd *dynobj;
1249 asection *s;
1250 boolean relocs;
1251 bfd *i;
1252
1253 htab = elf_i386_hash_table (info);
1254 dynobj = htab->root.dynobj;
1255 if (dynobj == NULL)
1256 abort ();
1257
1258 if (htab->root.dynamic_sections_created)
1259 {
1260 /* Set the contents of the .interp section to the interpreter. */
1261 if (! info->shared)
1262 {
1263 s = bfd_get_section_by_name (dynobj, ".interp");
1264 if (s == NULL)
1265 abort ();
1266 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
1267 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1268 }
1269 }
1270
1271 /* Set up .got offsets for local syms. */
1272 for (i = info->input_bfds; i; i = i->link_next)
1273 {
1274 bfd_signed_vma *local_got;
1275 bfd_signed_vma *end_local_got;
1276 bfd_size_type locsymcount;
1277 Elf_Internal_Shdr *symtab_hdr;
1278 asection *srel;
1279
1280 if (bfd_get_flavour (i) != bfd_target_elf_flavour)
1281 continue;
1282
1283 local_got = elf_local_got_refcounts (i);
1284 if (!local_got)
1285 continue;
1286
1287 symtab_hdr = &elf_tdata (i)->symtab_hdr;
1288 locsymcount = symtab_hdr->sh_info;
1289 end_local_got = local_got + locsymcount;
1290 s = htab->sgot;
1291 srel = htab->srelgot;
1292 for (; local_got < end_local_got; ++local_got)
1293 {
1294 if (*local_got > 0)
1295 {
1296 *local_got = s->_raw_size;
1297 s->_raw_size += 4;
1298 if (info->shared)
1299 srel->_raw_size += sizeof (Elf32_External_Rel);
1300 }
1301 else
1302 *local_got = (bfd_vma) -1;
1303 }
1304 }
1305
1306 /* Allocate global sym .plt and .got entries. Also discard all
1307 unneeded relocs. */
1308 elf_link_hash_traverse (&htab->root,
1309 allocate_plt_and_got_and_discard_relocs,
1310 (PTR) info);
1311
1312 /* We now have determined the sizes of the various dynamic sections.
1313 Allocate memory for them. */
1314 relocs = false;
1315 for (s = dynobj->sections; s != NULL; s = s->next)
1316 {
1317 if ((s->flags & SEC_LINKER_CREATED) == 0)
1318 continue;
1319
1320 if (s == htab->splt
1321 || s == htab->sgot
1322 || s == htab->sgotplt)
1323 {
1324 /* Strip this section if we don't need it; see the
1325 comment below. */
1326 }
1327 else if (strncmp (bfd_get_section_name (dynobj, s), ".rel", 4) == 0)
1328 {
1329 if (s->_raw_size == 0)
1330 {
1331 /* If we don't need this section, strip it from the
1332 output file. This is mostly to handle .rel.bss and
1333 .rel.plt. We must create both sections in
1334 create_dynamic_sections, because they must be created
1335 before the linker maps input sections to output
1336 sections. The linker does that before
1337 adjust_dynamic_symbol is called, and it is that
1338 function which decides whether anything needs to go
1339 into these sections. */
1340 }
1341 else
1342 {
1343 if (s != htab->srelplt)
1344 relocs = true;
1345
1346 /* We use the reloc_count field as a counter if we need
1347 to copy relocs into the output file. */
1348 s->reloc_count = 0;
1349 }
1350 }
1351 else
1352 {
1353 /* It's not one of our sections, so don't allocate space. */
1354 continue;
1355 }
1356
1357 if (s->_raw_size == 0)
1358 {
1359 _bfd_strip_section_from_output (info, s);
1360 continue;
1361 }
1362
1363 /* Allocate memory for the section contents. We use bfd_zalloc
1364 here in case unused entries are not reclaimed before the
1365 section's contents are written out. This should not happen,
1366 but this way if it does, we get a R_386_NONE reloc instead
1367 of garbage. */
1368 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
1369 if (s->contents == NULL)
1370 return false;
1371 }
1372
1373 if (htab->root.dynamic_sections_created)
1374 {
1375 /* Add some entries to the .dynamic section. We fill in the
1376 values later, in elf_i386_finish_dynamic_sections, but we
1377 must add the entries now so that we get the correct size for
1378 the .dynamic section. The DT_DEBUG entry is filled in by the
1379 dynamic linker and used by the debugger. */
1380 #define add_dynamic_entry(TAG, VAL) \
1381 bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
1382
1383 if (! info->shared)
1384 {
1385 if (!add_dynamic_entry (DT_DEBUG, 0))
1386 return false;
1387 }
1388
1389 if (htab->splt->_raw_size != 0)
1390 {
1391 if (!add_dynamic_entry (DT_PLTGOT, 0)
1392 || !add_dynamic_entry (DT_PLTRELSZ, 0)
1393 || !add_dynamic_entry (DT_PLTREL, DT_REL)
1394 || !add_dynamic_entry (DT_JMPREL, 0))
1395 return false;
1396 }
1397
1398 if (relocs)
1399 {
1400 if (!add_dynamic_entry (DT_REL, 0)
1401 || !add_dynamic_entry (DT_RELSZ, 0)
1402 || !add_dynamic_entry (DT_RELENT, sizeof (Elf32_External_Rel)))
1403 return false;
1404 }
1405
1406 if ((info->flags & DF_TEXTREL) != 0)
1407 {
1408 if (!add_dynamic_entry (DT_TEXTREL, 0))
1409 return false;
1410 }
1411 }
1412 #undef add_dynamic_entry
1413
1414 return true;
1415 }
1416
1417 /* Relocate an i386 ELF section. */
1418
1419 static boolean
1420 elf_i386_relocate_section (output_bfd, info, input_bfd, input_section,
1421 contents, relocs, local_syms, local_sections)
1422 bfd *output_bfd;
1423 struct bfd_link_info *info;
1424 bfd *input_bfd;
1425 asection *input_section;
1426 bfd_byte *contents;
1427 Elf_Internal_Rela *relocs;
1428 Elf_Internal_Sym *local_syms;
1429 asection **local_sections;
1430 {
1431 struct elf_i386_link_hash_table *htab;
1432 bfd *dynobj;
1433 Elf_Internal_Shdr *symtab_hdr;
1434 struct elf_link_hash_entry **sym_hashes;
1435 bfd_vma *local_got_offsets;
1436 asection *sreloc;
1437 Elf_Internal_Rela *rel;
1438 Elf_Internal_Rela *relend;
1439
1440 htab = elf_i386_hash_table (info);
1441 dynobj = htab->root.dynobj;
1442 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1443 sym_hashes = elf_sym_hashes (input_bfd);
1444 local_got_offsets = elf_local_got_offsets (input_bfd);
1445
1446 sreloc = NULL;
1447 rel = relocs;
1448 relend = relocs + input_section->reloc_count;
1449 for (; rel < relend; rel++)
1450 {
1451 int r_type;
1452 reloc_howto_type *howto;
1453 unsigned long r_symndx;
1454 struct elf_link_hash_entry *h;
1455 Elf_Internal_Sym *sym;
1456 asection *sec;
1457 bfd_vma off;
1458 bfd_vma relocation;
1459 boolean unresolved_reloc;
1460 bfd_reloc_status_type r;
1461 unsigned int indx;
1462
1463 r_type = ELF32_R_TYPE (rel->r_info);
1464 if (r_type == (int) R_386_GNU_VTINHERIT
1465 || r_type == (int) R_386_GNU_VTENTRY)
1466 continue;
1467
1468 if ((indx = (unsigned) r_type) >= R_386_standard
1469 && ((indx = (unsigned) r_type - R_386_ext_offset) - R_386_standard
1470 >= R_386_ext - R_386_standard))
1471 {
1472 bfd_set_error (bfd_error_bad_value);
1473 return false;
1474 }
1475 howto = elf_howto_table + indx;
1476
1477 r_symndx = ELF32_R_SYM (rel->r_info);
1478
1479 if (info->relocateable)
1480 {
1481 /* This is a relocateable link. We don't have to change
1482 anything, unless the reloc is against a section symbol,
1483 in which case we have to adjust according to where the
1484 section symbol winds up in the output section. */
1485 if (r_symndx < symtab_hdr->sh_info)
1486 {
1487 sym = local_syms + r_symndx;
1488 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1489 {
1490 bfd_vma val;
1491
1492 sec = local_sections[r_symndx];
1493 val = bfd_get_32 (input_bfd, contents + rel->r_offset);
1494 val += sec->output_offset + sym->st_value;
1495 bfd_put_32 (input_bfd, val, contents + rel->r_offset);
1496 }
1497 }
1498
1499 continue;
1500 }
1501
1502 /* This is a final link. */
1503 h = NULL;
1504 sym = NULL;
1505 sec = NULL;
1506 unresolved_reloc = false;
1507 if (r_symndx < symtab_hdr->sh_info)
1508 {
1509 sym = local_syms + r_symndx;
1510 sec = local_sections[r_symndx];
1511 relocation = (sec->output_section->vma
1512 + sec->output_offset
1513 + sym->st_value);
1514 }
1515 else
1516 {
1517 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1518 while (h->root.type == bfd_link_hash_indirect
1519 || h->root.type == bfd_link_hash_warning)
1520 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1521
1522 relocation = 0;
1523 if (h->root.type == bfd_link_hash_defined
1524 || h->root.type == bfd_link_hash_defweak)
1525 {
1526 sec = h->root.u.def.section;
1527 if (sec->output_section == NULL)
1528 /* Set a flag that will be cleared later if we find a
1529 relocation value for this symbol. output_section
1530 is typically NULL for symbols satisfied by a shared
1531 library. */
1532 unresolved_reloc = true;
1533 else
1534 relocation = (h->root.u.def.value
1535 + sec->output_section->vma
1536 + sec->output_offset);
1537 }
1538 else if (h->root.type == bfd_link_hash_undefweak)
1539 ;
1540 else if (info->shared
1541 && (!info->symbolic || info->allow_shlib_undefined)
1542 && !info->no_undefined
1543 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
1544 ;
1545 else
1546 {
1547 if (! ((*info->callbacks->undefined_symbol)
1548 (info, h->root.root.string, input_bfd,
1549 input_section, rel->r_offset,
1550 (!info->shared || info->no_undefined
1551 || ELF_ST_VISIBILITY (h->other)))))
1552 return false;
1553 }
1554 }
1555
1556 switch (r_type)
1557 {
1558 case R_386_GOT32:
1559 /* Relocation is to the entry for this symbol in the global
1560 offset table. */
1561 if (htab->sgot == NULL)
1562 abort ();
1563
1564 if (h != NULL)
1565 {
1566 boolean dyn;
1567
1568 off = h->got.offset;
1569 dyn = htab->root.dynamic_sections_created;
1570 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info, h)
1571 || (info->shared
1572 && (info->symbolic
1573 || h->dynindx == -1
1574 || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
1575 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
1576 {
1577 /* This is actually a static link, or it is a
1578 -Bsymbolic link and the symbol is defined
1579 locally, or the symbol was forced to be local
1580 because of a version file. We must initialize
1581 this entry in the global offset table. Since the
1582 offset must always be a multiple of 4, we use the
1583 least significant bit to record whether we have
1584 initialized it already.
1585
1586 When doing a dynamic link, we create a .rel.got
1587 relocation entry to initialize the value. This
1588 is done in the finish_dynamic_symbol routine. */
1589 if ((off & 1) != 0)
1590 off &= ~1;
1591 else
1592 {
1593 bfd_put_32 (output_bfd, relocation,
1594 htab->sgot->contents + off);
1595 h->got.offset |= 1;
1596 }
1597 }
1598 else
1599 unresolved_reloc = false;
1600 }
1601 else
1602 {
1603 if (local_got_offsets == NULL)
1604 abort ();
1605
1606 off = local_got_offsets[r_symndx];
1607
1608 /* The offset must always be a multiple of 4. We use
1609 the least significant bit to record whether we have
1610 already generated the necessary reloc. */
1611 if ((off & 1) != 0)
1612 off &= ~1;
1613 else
1614 {
1615 bfd_put_32 (output_bfd, relocation,
1616 htab->sgot->contents + off);
1617
1618 if (info->shared)
1619 {
1620 asection *srelgot;
1621 Elf_Internal_Rel outrel;
1622
1623 srelgot = htab->srelgot;
1624 if (srelgot == NULL)
1625 abort ();
1626
1627 outrel.r_offset = (htab->sgot->output_section->vma
1628 + htab->sgot->output_offset
1629 + off);
1630 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1631 bfd_elf32_swap_reloc_out (output_bfd, &outrel,
1632 (((Elf32_External_Rel *)
1633 srelgot->contents)
1634 + srelgot->reloc_count));
1635 ++srelgot->reloc_count;
1636 }
1637
1638 local_got_offsets[r_symndx] |= 1;
1639 }
1640 }
1641
1642 if (off >= (bfd_vma) -2)
1643 abort ();
1644
1645 relocation = htab->sgot->output_offset + off;
1646 break;
1647
1648 case R_386_GOTOFF:
1649 /* Relocation is relative to the start of the global offset
1650 table. */
1651
1652 /* Note that sgot->output_offset is not involved in this
1653 calculation. We always want the start of .got. If we
1654 defined _GLOBAL_OFFSET_TABLE in a different way, as is
1655 permitted by the ABI, we might have to change this
1656 calculation. */
1657 relocation -= htab->sgot->output_section->vma;
1658 break;
1659
1660 case R_386_GOTPC:
1661 /* Use global offset table as symbol value. */
1662 relocation = htab->sgot->output_section->vma;
1663 unresolved_reloc = false;
1664 break;
1665
1666 case R_386_PLT32:
1667 /* Relocation is to the entry for this symbol in the
1668 procedure linkage table. */
1669
1670 /* Resolve a PLT32 reloc against a local symbol directly,
1671 without using the procedure linkage table. */
1672 if (h == NULL)
1673 break;
1674
1675 if (h->plt.offset == (bfd_vma) -1
1676 || htab->splt == NULL)
1677 {
1678 /* We didn't make a PLT entry for this symbol. This
1679 happens when statically linking PIC code, or when
1680 using -Bsymbolic. */
1681 break;
1682 }
1683
1684 relocation = (htab->splt->output_section->vma
1685 + htab->splt->output_offset
1686 + h->plt.offset);
1687 unresolved_reloc = false;
1688 break;
1689
1690 case R_386_32:
1691 case R_386_PC32:
1692 if ((info->shared
1693 && (input_section->flags & SEC_ALLOC) != 0
1694 && (r_type != R_386_PC32
1695 || (h != NULL
1696 && h->dynindx != -1
1697 && (! info->symbolic
1698 || (h->elf_link_hash_flags
1699 & ELF_LINK_HASH_DEF_REGULAR) == 0))))
1700 || (!info->shared
1701 && (input_section->flags & SEC_ALLOC) != 0
1702 && h != NULL
1703 && h->dynindx != -1
1704 && (h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
1705 && (((h->elf_link_hash_flags
1706 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1707 && (h->elf_link_hash_flags
1708 & ELF_LINK_HASH_DEF_REGULAR) == 0)
1709 || h->root.type == bfd_link_hash_undefweak
1710 || h->root.type == bfd_link_hash_undefined)))
1711 {
1712 Elf_Internal_Rel outrel;
1713 boolean skip, relocate;
1714
1715 /* When generating a shared object, these relocations
1716 are copied into the output file to be resolved at run
1717 time. */
1718
1719 if (sreloc == NULL)
1720 {
1721 const char *name;
1722
1723 name = (bfd_elf_string_from_elf_section
1724 (input_bfd,
1725 elf_elfheader (input_bfd)->e_shstrndx,
1726 elf_section_data (input_section)->rel_hdr.sh_name));
1727 if (name == NULL)
1728 return false;
1729
1730 if (strncmp (name, ".rel", 4) != 0
1731 || strcmp (bfd_get_section_name (input_bfd,
1732 input_section),
1733 name + 4) != 0)
1734 {
1735 (*_bfd_error_handler)
1736 (_("%s: bad relocation section name `%s\'"),
1737 bfd_archive_filename (input_bfd), name);
1738 return false;
1739 }
1740
1741 sreloc = bfd_get_section_by_name (dynobj, name);
1742 if (sreloc == NULL)
1743 abort ();
1744 }
1745
1746 skip = false;
1747
1748 if (elf_section_data (input_section)->stab_info == NULL)
1749 outrel.r_offset = rel->r_offset;
1750 else
1751 {
1752 off = (_bfd_stab_section_offset
1753 (output_bfd, htab->root.stab_info, input_section,
1754 &elf_section_data (input_section)->stab_info,
1755 rel->r_offset));
1756 if (off == (bfd_vma) -1)
1757 skip = true;
1758 outrel.r_offset = off;
1759 }
1760
1761 outrel.r_offset += (input_section->output_section->vma
1762 + input_section->output_offset);
1763
1764 if (skip)
1765 {
1766 memset (&outrel, 0, sizeof outrel);
1767 relocate = false;
1768 }
1769 else if (h != NULL
1770 && h->dynindx != -1
1771 && (r_type == R_386_PC32
1772 || !info->shared
1773 || !info->symbolic
1774 || (h->elf_link_hash_flags
1775 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1776
1777 {
1778 relocate = false;
1779 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1780 }
1781 else
1782 {
1783 /* This symbol is local, or marked to become local. */
1784 relocate = true;
1785 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1786 }
1787
1788 bfd_elf32_swap_reloc_out (output_bfd, &outrel,
1789 (((Elf32_External_Rel *)
1790 sreloc->contents)
1791 + sreloc->reloc_count));
1792 ++sreloc->reloc_count;
1793
1794 /* If this reloc is against an external symbol, we do
1795 not want to fiddle with the addend. Otherwise, we
1796 need to include the symbol value so that it becomes
1797 an addend for the dynamic reloc. */
1798 if (! relocate)
1799 continue;
1800 }
1801
1802 break;
1803
1804 default:
1805 break;
1806 }
1807
1808 /* FIXME: Why do we allow debugging sections to escape this error?
1809 More importantly, why do we not emit dynamic relocs for
1810 R_386_32 above in debugging sections (which are ! SEC_ALLOC)?
1811 If we had emitted the dynamic reloc, we could remove the
1812 fudge here. */
1813 if (unresolved_reloc
1814 && !(info->shared
1815 && (input_section->flags & SEC_DEBUGGING) != 0
1816 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
1817 (*_bfd_error_handler)
1818 (_("%s(%s+0x%lx): unresolvable relocation against symbol `%s'"),
1819 bfd_archive_filename (input_bfd),
1820 bfd_get_section_name (input_bfd, input_section),
1821 (long) rel->r_offset,
1822 h->root.root.string);
1823
1824 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
1825 contents, rel->r_offset,
1826 relocation, (bfd_vma) 0);
1827
1828 switch (r)
1829 {
1830 case bfd_reloc_ok:
1831 break;
1832
1833 case bfd_reloc_overflow:
1834 {
1835 const char *name;
1836
1837 if (h != NULL)
1838 name = h->root.root.string;
1839 else
1840 {
1841 name = bfd_elf_string_from_elf_section (input_bfd,
1842 symtab_hdr->sh_link,
1843 sym->st_name);
1844 if (name == NULL)
1845 return false;
1846 if (*name == '\0')
1847 name = bfd_section_name (input_bfd, sec);
1848 }
1849 if (! ((*info->callbacks->reloc_overflow)
1850 (info, name, howto->name, (bfd_vma) 0,
1851 input_bfd, input_section, rel->r_offset)))
1852 return false;
1853 }
1854 break;
1855
1856 default:
1857 case bfd_reloc_outofrange:
1858 abort ();
1859 break;
1860 }
1861 }
1862
1863 return true;
1864 }
1865
1866 /* Finish up dynamic symbol handling. We set the contents of various
1867 dynamic sections here. */
1868
1869 static boolean
1870 elf_i386_finish_dynamic_symbol (output_bfd, info, h, sym)
1871 bfd *output_bfd;
1872 struct bfd_link_info *info;
1873 struct elf_link_hash_entry *h;
1874 Elf_Internal_Sym *sym;
1875 {
1876 struct elf_i386_link_hash_table *htab;
1877 bfd *dynobj;
1878
1879 htab = elf_i386_hash_table (info);
1880 dynobj = htab->root.dynobj;
1881
1882 if (h->plt.offset != (bfd_vma) -1)
1883 {
1884 bfd_vma plt_index;
1885 bfd_vma got_offset;
1886 Elf_Internal_Rel rel;
1887
1888 /* This symbol has an entry in the procedure linkage table. Set
1889 it up. */
1890
1891 if (h->dynindx == -1
1892 || htab->splt == NULL
1893 || htab->sgotplt == NULL
1894 || htab->srelplt == NULL)
1895 abort ();
1896
1897 /* Get the index in the procedure linkage table which
1898 corresponds to this symbol. This is the index of this symbol
1899 in all the symbols for which we are making plt entries. The
1900 first entry in the procedure linkage table is reserved. */
1901 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1902
1903 /* Get the offset into the .got table of the entry that
1904 corresponds to this function. Each .got entry is 4 bytes.
1905 The first three are reserved. */
1906 got_offset = (plt_index + 3) * 4;
1907
1908 /* Fill in the entry in the procedure linkage table. */
1909 if (! info->shared)
1910 {
1911 memcpy (htab->splt->contents + h->plt.offset, elf_i386_plt_entry,
1912 PLT_ENTRY_SIZE);
1913 bfd_put_32 (output_bfd,
1914 (htab->sgotplt->output_section->vma
1915 + htab->sgotplt->output_offset
1916 + got_offset),
1917 htab->splt->contents + h->plt.offset + 2);
1918 }
1919 else
1920 {
1921 memcpy (htab->splt->contents + h->plt.offset, elf_i386_pic_plt_entry,
1922 PLT_ENTRY_SIZE);
1923 bfd_put_32 (output_bfd, got_offset,
1924 htab->splt->contents + h->plt.offset + 2);
1925 }
1926
1927 bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rel),
1928 htab->splt->contents + h->plt.offset + 7);
1929 bfd_put_32 (output_bfd, - (h->plt.offset + PLT_ENTRY_SIZE),
1930 htab->splt->contents + h->plt.offset + 12);
1931
1932 /* Fill in the entry in the global offset table. */
1933 bfd_put_32 (output_bfd,
1934 (htab->splt->output_section->vma
1935 + htab->splt->output_offset
1936 + h->plt.offset
1937 + 6),
1938 htab->sgotplt->contents + got_offset);
1939
1940 /* Fill in the entry in the .rel.plt section. */
1941 rel.r_offset = (htab->sgotplt->output_section->vma
1942 + htab->sgotplt->output_offset
1943 + got_offset);
1944 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
1945 bfd_elf32_swap_reloc_out (output_bfd, &rel,
1946 ((Elf32_External_Rel *) htab->srelplt->contents
1947 + plt_index));
1948
1949 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1950 {
1951 /* Mark the symbol as undefined, rather than as defined in
1952 the .plt section. Leave the value alone. */
1953 sym->st_shndx = SHN_UNDEF;
1954 }
1955 }
1956
1957 if (h->got.offset != (bfd_vma) -1)
1958 {
1959 Elf_Internal_Rel rel;
1960
1961 /* This symbol has an entry in the global offset table. Set it
1962 up. */
1963
1964 if (htab->sgot == NULL || htab->srelgot == NULL)
1965 abort ();
1966
1967 rel.r_offset = (htab->sgot->output_section->vma
1968 + htab->sgot->output_offset
1969 + (h->got.offset & ~(bfd_vma) 1));
1970
1971 /* If this is a static link, or it is a -Bsymbolic link and the
1972 symbol is defined locally or was forced to be local because
1973 of a version file, we just want to emit a RELATIVE reloc.
1974 The entry in the global offset table will already have been
1975 initialized in the relocate_section function. */
1976 if (info->shared
1977 && (info->symbolic
1978 || h->dynindx == -1
1979 || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
1980 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
1981 {
1982 BFD_ASSERT((h->got.offset & 1) != 0);
1983 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1984 }
1985 else
1986 {
1987 BFD_ASSERT((h->got.offset & 1) == 0);
1988 bfd_put_32 (output_bfd, (bfd_vma) 0,
1989 htab->sgot->contents + h->got.offset);
1990 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
1991 }
1992
1993 bfd_elf32_swap_reloc_out (output_bfd, &rel,
1994 ((Elf32_External_Rel *) htab->srelgot->contents
1995 + htab->srelgot->reloc_count));
1996 ++htab->srelgot->reloc_count;
1997 }
1998
1999 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
2000 {
2001 Elf_Internal_Rel rel;
2002
2003 /* This symbol needs a copy reloc. Set it up. */
2004
2005 if (h->dynindx == -1
2006 || (h->root.type != bfd_link_hash_defined
2007 && h->root.type != bfd_link_hash_defweak)
2008 || htab->srelbss == NULL)
2009 abort ();
2010
2011 rel.r_offset = (h->root.u.def.value
2012 + h->root.u.def.section->output_section->vma
2013 + h->root.u.def.section->output_offset);
2014 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
2015 bfd_elf32_swap_reloc_out (output_bfd, &rel,
2016 ((Elf32_External_Rel *) htab->srelbss->contents
2017 + htab->srelbss->reloc_count));
2018 ++htab->srelbss->reloc_count;
2019 }
2020
2021 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2022 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2023 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2024 sym->st_shndx = SHN_ABS;
2025
2026 return true;
2027 }
2028
2029 /* Finish up the dynamic sections. */
2030
2031 static boolean
2032 elf_i386_finish_dynamic_sections (output_bfd, info)
2033 bfd *output_bfd;
2034 struct bfd_link_info *info;
2035 {
2036 struct elf_i386_link_hash_table *htab;
2037 bfd *dynobj;
2038 asection *sdyn;
2039
2040 htab = elf_i386_hash_table (info);
2041 dynobj = htab->root.dynobj;
2042 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2043
2044 if (htab->root.dynamic_sections_created)
2045 {
2046 Elf32_External_Dyn *dyncon, *dynconend;
2047
2048 if (sdyn == NULL || htab->sgot == NULL)
2049 abort ();
2050
2051 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2052 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
2053 for (; dyncon < dynconend; dyncon++)
2054 {
2055 Elf_Internal_Dyn dyn;
2056
2057 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
2058
2059 switch (dyn.d_tag)
2060 {
2061 default:
2062 break;
2063
2064 case DT_PLTGOT:
2065 dyn.d_un.d_ptr = htab->sgot->output_section->vma;
2066 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2067 break;
2068
2069 case DT_JMPREL:
2070 dyn.d_un.d_ptr = htab->srelplt->output_section->vma;
2071 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2072 break;
2073
2074 case DT_PLTRELSZ:
2075 if (htab->srelplt->output_section->_cooked_size != 0)
2076 dyn.d_un.d_val = htab->srelplt->output_section->_cooked_size;
2077 else
2078 dyn.d_un.d_val = htab->srelplt->output_section->_raw_size;
2079 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2080 break;
2081
2082 case DT_RELSZ:
2083 /* My reading of the SVR4 ABI indicates that the
2084 procedure linkage table relocs (DT_JMPREL) should be
2085 included in the overall relocs (DT_REL). This is
2086 what Solaris does. However, UnixWare can not handle
2087 that case. Therefore, we override the DT_RELSZ entry
2088 here to make it not include the JMPREL relocs. Since
2089 the linker script arranges for .rel.plt to follow all
2090 other relocation sections, we don't have to worry
2091 about changing the DT_REL entry. */
2092 if (htab->srelplt != NULL)
2093 {
2094 if (htab->srelplt->output_section->_cooked_size != 0)
2095 dyn.d_un.d_val -= htab->srelplt->output_section->_cooked_size;
2096 else
2097 dyn.d_un.d_val -= htab->srelplt->output_section->_raw_size;
2098 }
2099 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2100 break;
2101 }
2102 }
2103
2104 /* Fill in the first entry in the procedure linkage table. */
2105 if (htab->splt && htab->splt->_raw_size > 0)
2106 {
2107 if (info->shared)
2108 memcpy (htab->splt->contents,
2109 elf_i386_pic_plt0_entry, PLT_ENTRY_SIZE);
2110 else
2111 {
2112 memcpy (htab->splt->contents,
2113 elf_i386_plt0_entry, PLT_ENTRY_SIZE);
2114 bfd_put_32 (output_bfd,
2115 (htab->sgotplt->output_section->vma
2116 + htab->sgotplt->output_offset
2117 + 4),
2118 htab->splt->contents + 2);
2119 bfd_put_32 (output_bfd,
2120 (htab->sgotplt->output_section->vma
2121 + htab->sgotplt->output_offset
2122 + 8),
2123 htab->splt->contents + 8);
2124 }
2125
2126 /* UnixWare sets the entsize of .plt to 4, although that doesn't
2127 really seem like the right value. */
2128 elf_section_data (htab->splt->output_section)
2129 ->this_hdr.sh_entsize = 4;
2130 }
2131 }
2132
2133 if (htab->sgotplt)
2134 {
2135 /* Fill in the first three entries in the global offset table. */
2136 if (htab->sgotplt->_raw_size > 0)
2137 {
2138 bfd_put_32 (output_bfd,
2139 (sdyn == NULL ? (bfd_vma) 0
2140 : sdyn->output_section->vma + sdyn->output_offset),
2141 htab->sgotplt->contents);
2142 bfd_put_32 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + 4);
2143 bfd_put_32 (output_bfd, (bfd_vma) 0, htab->sgotplt->contents + 8);
2144 }
2145
2146 elf_section_data (htab->sgotplt->output_section)->this_hdr.sh_entsize = 4;
2147 }
2148 return true;
2149 }
2150
2151 /* Set the correct type for an x86 ELF section. We do this by the
2152 section name, which is a hack, but ought to work. */
2153
2154 static boolean
2155 elf_i386_fake_sections (abfd, hdr, sec)
2156 bfd *abfd ATTRIBUTE_UNUSED;
2157 Elf32_Internal_Shdr *hdr;
2158 asection *sec;
2159 {
2160 register const char *name;
2161
2162 name = bfd_get_section_name (abfd, sec);
2163
2164 if (strcmp (name, ".reloc") == 0)
2165 /*
2166 * This is an ugly, but unfortunately necessary hack that is
2167 * needed when producing EFI binaries on x86. It tells
2168 * elf.c:elf_fake_sections() not to consider ".reloc" as a section
2169 * containing ELF relocation info. We need this hack in order to
2170 * be able to generate ELF binaries that can be translated into
2171 * EFI applications (which are essentially COFF objects). Those
2172 * files contain a COFF ".reloc" section inside an ELFNN object,
2173 * which would normally cause BFD to segfault because it would
2174 * attempt to interpret this section as containing relocation
2175 * entries for section "oc". With this hack enabled, ".reloc"
2176 * will be treated as a normal data section, which will avoid the
2177 * segfault. However, you won't be able to create an ELFNN binary
2178 * with a section named "oc" that needs relocations, but that's
2179 * the kind of ugly side-effects you get when detecting section
2180 * types based on their names... In practice, this limitation is
2181 * unlikely to bite.
2182 */
2183 hdr->sh_type = SHT_PROGBITS;
2184
2185 return true;
2186 }
2187
2188 static enum elf_reloc_type_class
2189 elf_i386_reloc_type_class (type)
2190 int type;
2191 {
2192 switch (type)
2193 {
2194 case R_386_RELATIVE:
2195 return reloc_class_relative;
2196 case R_386_JUMP_SLOT:
2197 return reloc_class_plt;
2198 case R_386_COPY:
2199 return reloc_class_copy;
2200 default:
2201 return reloc_class_normal;
2202 }
2203 }
2204
2205 /* Support for core dump NOTE sections */
2206 static boolean
2207 elf_i386_grok_prstatus (abfd, note)
2208 bfd *abfd;
2209 Elf_Internal_Note *note;
2210 {
2211 int offset;
2212 size_t raw_size;
2213
2214 switch (note->descsz)
2215 {
2216 default:
2217 return false;
2218
2219 case 144: /* Linux/i386 */
2220 /* pr_cursig */
2221 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2222
2223 /* pr_pid */
2224 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
2225
2226 /* pr_reg */
2227 offset = 72;
2228 raw_size = 68;
2229
2230 break;
2231 }
2232
2233 /* Make a ".reg/999" section. */
2234 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2235 raw_size, note->descpos + offset);
2236 }
2237
2238 static boolean
2239 elf_i386_grok_psinfo (abfd, note)
2240 bfd *abfd;
2241 Elf_Internal_Note *note;
2242 {
2243 switch (note->descsz)
2244 {
2245 default:
2246 return false;
2247
2248 case 128: /* Linux/MIPS elf_prpsinfo */
2249 elf_tdata (abfd)->core_program
2250 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
2251 elf_tdata (abfd)->core_command
2252 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
2253 }
2254
2255 /* Note that for some reason, a spurious space is tacked
2256 onto the end of the args in some (at least one anyway)
2257 implementations, so strip it off if it exists. */
2258
2259 {
2260 char *command = elf_tdata (abfd)->core_command;
2261 int n = strlen (command);
2262
2263 if (0 < n && command[n - 1] == ' ')
2264 command[n - 1] = '\0';
2265 }
2266
2267 return true;
2268 }
2269
2270 #define TARGET_LITTLE_SYM bfd_elf32_i386_vec
2271 #define TARGET_LITTLE_NAME "elf32-i386"
2272 #define ELF_ARCH bfd_arch_i386
2273 #define ELF_MACHINE_CODE EM_386
2274 #define ELF_MAXPAGESIZE 0x1000
2275
2276 #define elf_backend_can_gc_sections 1
2277 #define elf_backend_want_got_plt 1
2278 #define elf_backend_plt_readonly 1
2279 #define elf_backend_want_plt_sym 0
2280 #define elf_backend_got_header_size 12
2281 #define elf_backend_plt_header_size PLT_ENTRY_SIZE
2282
2283 #define elf_info_to_howto elf_i386_info_to_howto
2284 #define elf_info_to_howto_rel elf_i386_info_to_howto_rel
2285
2286 #define bfd_elf32_bfd_is_local_label_name elf_i386_is_local_label_name
2287 #define bfd_elf32_bfd_link_hash_table_create elf_i386_link_hash_table_create
2288 #define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup
2289
2290 #define elf_backend_adjust_dynamic_symbol elf_i386_adjust_dynamic_symbol
2291 #define elf_backend_check_relocs elf_i386_check_relocs
2292 #define elf_backend_create_dynamic_sections elf_i386_create_dynamic_sections
2293 #define elf_backend_finish_dynamic_sections elf_i386_finish_dynamic_sections
2294 #define elf_backend_finish_dynamic_symbol elf_i386_finish_dynamic_symbol
2295 #define elf_backend_gc_mark_hook elf_i386_gc_mark_hook
2296 #define elf_backend_gc_sweep_hook elf_i386_gc_sweep_hook
2297 #define elf_backend_relocate_section elf_i386_relocate_section
2298 #define elf_backend_size_dynamic_sections elf_i386_size_dynamic_sections
2299 #define elf_backend_fake_sections elf_i386_fake_sections
2300 #define elf_backend_grok_prstatus elf_i386_grok_prstatus
2301 #define elf_backend_grok_psinfo elf_i386_grok_psinfo
2302 #define elf_backend_reloc_type_class elf_i386_reloc_type_class
2303
2304 #include "elf32-target.h"