]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf32-i386.c
Fixed exported names, removed a bad define
[thirdparty/binutils-gdb.git] / bfd / elf32-i386.c
CommitLineData
e4b6b3e7 1/* Intel 80386/80486-specific support for 32-bit ELF
30dc85f1 2 Copyright 1993, 1994, 1995 Free Software Foundation, Inc.
e4b6b3e7
ILT
3
4This file is part of BFD, the Binary File Descriptor library.
5
6This program is free software; you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation; either version 2 of the License, or
9(at your option) any later version.
10
11This program is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with this program; if not, write to the Free Software
943fbd5b 18Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
e4b6b3e7 19
e4b6b3e7
ILT
20#include "bfd.h"
21#include "sysdep.h"
013dec1a 22#include "bfdlink.h"
e4b6b3e7 23#include "libbfd.h"
3b3f7625 24#include "elf-bfd.h"
e4b6b3e7 25
30dc85f1 26static reloc_howto_type *elf_i386_reloc_type_lookup
013dec1a
ILT
27 PARAMS ((bfd *, bfd_reloc_code_real_type));
28static void elf_i386_info_to_howto
29 PARAMS ((bfd *, arelent *, Elf32_Internal_Rela *));
30static void elf_i386_info_to_howto_rel
31 PARAMS ((bfd *, arelent *, Elf32_Internal_Rel *));
eb4267a3
ILT
32static boolean elf_i386_check_relocs
33 PARAMS ((bfd *, struct bfd_link_info *, asection *,
34 const Elf_Internal_Rela *));
013dec1a
ILT
35static boolean elf_i386_adjust_dynamic_symbol
36 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *));
013dec1a
ILT
37static boolean elf_i386_size_dynamic_sections
38 PARAMS ((bfd *, struct bfd_link_info *));
39static boolean elf_i386_relocate_section
40 PARAMS ((bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *,
eb4267a3 41 Elf_Internal_Rela *, Elf_Internal_Sym *, asection **));
013dec1a
ILT
42static boolean elf_i386_finish_dynamic_symbol
43 PARAMS ((bfd *, struct bfd_link_info *, struct elf_link_hash_entry *,
44 Elf_Internal_Sym *));
45static boolean elf_i386_finish_dynamic_sections
46 PARAMS ((bfd *, struct bfd_link_info *));
47
e4b6b3e7
ILT
48#define USE_REL 1 /* 386 uses REL relocations instead of RELA */
49
50enum reloc_type
51 {
52 R_386_NONE = 0,
68241b2b
ILT
53 R_386_32,
54 R_386_PC32,
55 R_386_GOT32,
56 R_386_PLT32,
e4b6b3e7 57 R_386_COPY,
68241b2b
ILT
58 R_386_GLOB_DAT,
59 R_386_JUMP_SLOT,
e4b6b3e7 60 R_386_RELATIVE,
68241b2b
ILT
61 R_386_GOTOFF,
62 R_386_GOTPC,
e4b6b3e7
ILT
63 R_386_max
64 };
65
66#if 0
67static CONST char *CONST reloc_type_names[] =
68{
69 "R_386_NONE",
68241b2b
ILT
70 "R_386_32",
71 "R_386_PC32",
72 "R_386_GOT32",
73 "R_386_PLT32",
e4b6b3e7 74 "R_386_COPY",
68241b2b
ILT
75 "R_386_GLOB_DAT",
76 "R_386_JUMP_SLOT",
e4b6b3e7 77 "R_386_RELATIVE",
68241b2b
ILT
78 "R_386_GOTOFF",
79 "R_386_GOTPC",
e4b6b3e7
ILT
80};
81#endif
82
e4b6b3e7
ILT
83static reloc_howto_type elf_howto_table[]=
84{
68241b2b
ILT
85 HOWTO(R_386_NONE, 0,0, 0,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_NONE", true,0x00000000,0x00000000,false),
86 HOWTO(R_386_32, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_32", true,0xffffffff,0xffffffff,false),
87 HOWTO(R_386_PC32, 0,2,32,true, 0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_PC32", true,0xffffffff,0xffffffff,true),
88 HOWTO(R_386_GOT32, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_GOT32", true,0xffffffff,0xffffffff,false),
eb4267a3 89 HOWTO(R_386_PLT32, 0,2,32,true,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_PLT32", true,0xffffffff,0xffffffff,true),
68241b2b
ILT
90 HOWTO(R_386_COPY, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_COPY", true,0xffffffff,0xffffffff,false),
91 HOWTO(R_386_GLOB_DAT, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_GLOB_DAT", true,0xffffffff,0xffffffff,false),
92 HOWTO(R_386_JUMP_SLOT, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_JUMP_SLOT",true,0xffffffff,0xffffffff,false),
93 HOWTO(R_386_RELATIVE, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_RELATIVE", true,0xffffffff,0xffffffff,false),
94 HOWTO(R_386_GOTOFF, 0,2,32,false,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_GOTOFF", true,0xffffffff,0xffffffff,false),
eb4267a3 95 HOWTO(R_386_GOTPC, 0,2,32,true,0,complain_overflow_bitfield, bfd_elf_generic_reloc,"R_386_GOTPC", true,0xffffffff,0xffffffff,true),
e4b6b3e7
ILT
96};
97
98#ifdef DEBUG_GEN_RELOC
99#define TRACE(str) fprintf (stderr, "i386 bfd reloc lookup %d (%s)\n", code, str)
100#else
101#define TRACE(str)
102#endif
103
30dc85f1 104static reloc_howto_type *
013dec1a
ILT
105elf_i386_reloc_type_lookup (abfd, code)
106 bfd *abfd;
107 bfd_reloc_code_real_type code;
e4b6b3e7
ILT
108{
109 switch (code)
110 {
111 case BFD_RELOC_NONE:
112 TRACE ("BFD_RELOC_NONE");
113 return &elf_howto_table[ (int)R_386_NONE ];
114
115 case BFD_RELOC_32:
116 TRACE ("BFD_RELOC_32");
117 return &elf_howto_table[ (int)R_386_32 ];
118
119 case BFD_RELOC_32_PCREL:
120 TRACE ("BFD_RELOC_PC32");
121 return &elf_howto_table[ (int)R_386_PC32 ];
122
68241b2b
ILT
123 case BFD_RELOC_386_GOT32:
124 TRACE ("BFD_RELOC_386_GOT32");
125 return &elf_howto_table[ (int)R_386_GOT32 ];
126
127 case BFD_RELOC_386_PLT32:
128 TRACE ("BFD_RELOC_386_PLT32");
129 return &elf_howto_table[ (int)R_386_PLT32 ];
130
131 case BFD_RELOC_386_COPY:
132 TRACE ("BFD_RELOC_386_COPY");
133 return &elf_howto_table[ (int)R_386_COPY ];
134
135 case BFD_RELOC_386_GLOB_DAT:
136 TRACE ("BFD_RELOC_386_GLOB_DAT");
137 return &elf_howto_table[ (int)R_386_GLOB_DAT ];
138
139 case BFD_RELOC_386_JUMP_SLOT:
140 TRACE ("BFD_RELOC_386_JUMP_SLOT");
141 return &elf_howto_table[ (int)R_386_JUMP_SLOT ];
142
143 case BFD_RELOC_386_RELATIVE:
144 TRACE ("BFD_RELOC_386_RELATIVE");
145 return &elf_howto_table[ (int)R_386_RELATIVE ];
146
147 case BFD_RELOC_386_GOTOFF:
148 TRACE ("BFD_RELOC_386_GOTOFF");
149 return &elf_howto_table[ (int)R_386_GOTOFF ];
150
151 case BFD_RELOC_386_GOTPC:
152 TRACE ("BFD_RELOC_386_GOTPC");
153 return &elf_howto_table[ (int)R_386_GOTPC ];
154
e4b6b3e7 155 default:
68241b2b 156 break;
e4b6b3e7
ILT
157 }
158
159 TRACE ("Unknown");
160 return 0;
161}
162
163static void
013dec1a
ILT
164elf_i386_info_to_howto (abfd, cache_ptr, dst)
165 bfd *abfd;
166 arelent *cache_ptr;
167 Elf32_Internal_Rela *dst;
e4b6b3e7 168{
68241b2b 169 BFD_ASSERT (ELF32_R_TYPE(dst->r_info) < (unsigned int) R_386_max);
e4b6b3e7
ILT
170
171 cache_ptr->howto = &elf_howto_table[ELF32_R_TYPE(dst->r_info)];
172}
173
174static void
013dec1a
ILT
175elf_i386_info_to_howto_rel (abfd, cache_ptr, dst)
176 bfd *abfd;
177 arelent *cache_ptr;
178 Elf32_Internal_Rel *dst;
e4b6b3e7 179{
68241b2b 180 BFD_ASSERT (ELF32_R_TYPE(dst->r_info) < (unsigned int) R_386_max);
e4b6b3e7
ILT
181
182 cache_ptr->howto = &elf_howto_table[ELF32_R_TYPE(dst->r_info)];
183}
013dec1a
ILT
184\f
185/* Functions for the i386 ELF linker. */
186
187/* The name of the dynamic interpreter. This is put in the .interp
188 section. */
189
190#define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
191
192/* The size in bytes of an entry in the procedure linkage table. */
193
194#define PLT_ENTRY_SIZE 16
195
196/* The first entry in an absolute procedure linkage table looks like
197 this. See the SVR4 ABI i386 supplement to see how this works. */
198
89f7a04c 199static const bfd_byte elf_i386_plt0_entry[PLT_ENTRY_SIZE] =
013dec1a
ILT
200{
201 0xff, 0x35, /* pushl contents of address */
202 0, 0, 0, 0, /* replaced with address of .got + 4. */
203 0xff, 0x25, /* jmp indirect */
204 0, 0, 0, 0, /* replaced with address of .got + 8. */
205 0, 0, 0, 0 /* pad out to 16 bytes. */
206};
207
208/* Subsequent entries in an absolute procedure linkage table look like
209 this. */
210
89f7a04c 211static const bfd_byte elf_i386_plt_entry[PLT_ENTRY_SIZE] =
013dec1a
ILT
212{
213 0xff, 0x25, /* jmp indirect */
214 0, 0, 0, 0, /* replaced with address of this symbol in .got. */
215 0x68, /* pushl immediate */
216 0, 0, 0, 0, /* replaced with offset into relocation table. */
217 0xe9, /* jmp relative */
218 0, 0, 0, 0 /* replaced with offset to start of .plt. */
219};
220
eb4267a3
ILT
221/* The first entry in a PIC procedure linkage table look like this. */
222
89f7a04c 223static const bfd_byte elf_i386_pic_plt0_entry[PLT_ENTRY_SIZE] =
eb4267a3
ILT
224{
225 0xff, 0xb3, 4, 0, 0, 0, /* pushl 4(%ebx) */
226 0xff, 0xa3, 8, 0, 0, 0, /* jmp *8(%ebx) */
227 0, 0, 0, 0 /* pad out to 16 bytes. */
228};
229
230/* Subsequent entries in a PIC procedure linkage table look like this. */
231
89f7a04c 232static const bfd_byte elf_i386_pic_plt_entry[PLT_ENTRY_SIZE] =
eb4267a3
ILT
233{
234 0xff, 0xa3, /* jmp *offset(%ebx) */
235 0, 0, 0, 0, /* replaced with offset of this symbol in .got. */
236 0x68, /* pushl immediate */
237 0, 0, 0, 0, /* replaced with offset into relocation table. */
238 0xe9, /* jmp relative */
239 0, 0, 0, 0 /* replaced with offset to start of .plt. */
240};
241
eb4267a3
ILT
242/* Look through the relocs for a section during the first phase, and
243 allocate space in the global offset table or procedure linkage
244 table. */
245
246static boolean
247elf_i386_check_relocs (abfd, info, sec, relocs)
248 bfd *abfd;
249 struct bfd_link_info *info;
250 asection *sec;
251 const Elf_Internal_Rela *relocs;
252{
253 bfd *dynobj;
254 Elf_Internal_Shdr *symtab_hdr;
255 struct elf_link_hash_entry **sym_hashes;
256 bfd_vma *local_got_offsets;
257 const Elf_Internal_Rela *rel;
258 const Elf_Internal_Rela *rel_end;
259 asection *sgot;
260 asection *srelgot;
eb4267a3
ILT
261 asection *sreloc;
262
263 if (info->relocateable)
264 return true;
265
266 dynobj = elf_hash_table (info)->dynobj;
267 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
268 sym_hashes = elf_sym_hashes (abfd);
269 local_got_offsets = elf_local_got_offsets (abfd);
270
271 sgot = NULL;
272 srelgot = NULL;
eb4267a3
ILT
273 sreloc = NULL;
274
275 rel_end = relocs + sec->reloc_count;
276 for (rel = relocs; rel < rel_end; rel++)
277 {
3b3f7625 278 unsigned long r_symndx;
eb4267a3
ILT
279 struct elf_link_hash_entry *h;
280
281 r_symndx = ELF32_R_SYM (rel->r_info);
282
283 if (r_symndx < symtab_hdr->sh_info)
284 h = NULL;
285 else
286 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
287
12662be4 288 /* Some relocs require a global offset table. */
eb4267a3
ILT
289 if (dynobj == NULL)
290 {
291 switch (ELF32_R_TYPE (rel->r_info))
292 {
293 case R_386_GOT32:
eb4267a3
ILT
294 case R_386_GOTOFF:
295 case R_386_GOTPC:
296 elf_hash_table (info)->dynobj = dynobj = abfd;
ede4eed4 297 if (! _bfd_elf_create_got_section (dynobj, info))
eb4267a3
ILT
298 return false;
299 break;
300
301 default:
302 break;
303 }
304 }
305
306 switch (ELF32_R_TYPE (rel->r_info))
307 {
308 case R_386_GOT32:
309 /* This symbol requires a global offset table entry. */
310
311 if (sgot == NULL)
312 {
313 sgot = bfd_get_section_by_name (dynobj, ".got");
12662be4
ILT
314 BFD_ASSERT (sgot != NULL);
315 }
316
317 if (srelgot == NULL
318 && (h != NULL || info->shared))
319 {
eb4267a3
ILT
320 srelgot = bfd_get_section_by_name (dynobj, ".rel.got");
321 if (srelgot == NULL)
322 {
323 srelgot = bfd_make_section (dynobj, ".rel.got");
324 if (srelgot == NULL
325 || ! bfd_set_section_flags (dynobj, srelgot,
326 (SEC_ALLOC
327 | SEC_LOAD
328 | SEC_HAS_CONTENTS
329 | SEC_IN_MEMORY
330 | SEC_READONLY))
331 || ! bfd_set_section_alignment (dynobj, srelgot, 2))
332 return false;
333 }
eb4267a3
ILT
334 }
335
336 if (h != NULL)
337 {
338 if (h->got_offset != (bfd_vma) -1)
339 {
340 /* We have already allocated space in the .got. */
341 break;
342 }
343 h->got_offset = sgot->_raw_size;
344
345 /* Make sure this symbol is output as a dynamic symbol. */
346 if (h->dynindx == -1)
347 {
348 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
349 return false;
350 }
12662be4
ILT
351
352 srelgot->_raw_size += sizeof (Elf32_External_Rel);
eb4267a3
ILT
353 }
354 else
355 {
356 /* This is a global offset table entry for a local
357 symbol. */
358 if (local_got_offsets == NULL)
359 {
360 size_t size;
3b3f7625 361 register unsigned int i;
eb4267a3
ILT
362
363 size = symtab_hdr->sh_info * sizeof (bfd_vma);
364 local_got_offsets = (bfd_vma *) bfd_alloc (abfd, size);
365 if (local_got_offsets == NULL)
3c38b3df 366 return false;
eb4267a3
ILT
367 elf_local_got_offsets (abfd) = local_got_offsets;
368 for (i = 0; i < symtab_hdr->sh_info; i++)
369 local_got_offsets[i] = (bfd_vma) -1;
370 }
371 if (local_got_offsets[r_symndx] != (bfd_vma) -1)
372 {
373 /* We have already allocated space in the .got. */
374 break;
375 }
376 local_got_offsets[r_symndx] = sgot->_raw_size;
12662be4
ILT
377
378 if (info->shared)
379 {
380 /* If we are generating a shared object, we need to
381 output a R_386_RELATIVE reloc so that the dynamic
382 linker can adjust this GOT entry. */
383 srelgot->_raw_size += sizeof (Elf32_External_Rel);
384 }
eb4267a3
ILT
385 }
386
387 sgot->_raw_size += 4;
eb4267a3
ILT
388
389 break;
390
391 case R_386_PLT32:
12662be4
ILT
392 /* This symbol requires a procedure linkage table entry. We
393 actually build the entry in adjust_dynamic_symbol,
394 because this might be a case of linking PIC code without
395 linking in any dynamic objects, in which case we don't
396 need to generate a procedure linkage table after all. */
eb4267a3
ILT
397
398 /* If this is a local symbol, we resolve it directly without
399 creating a procedure linkage table entry. */
400 if (h == NULL)
401 continue;
402
eb4267a3
ILT
403 /* Make sure this symbol is output as a dynamic symbol. */
404 if (h->dynindx == -1)
405 {
406 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
407 return false;
408 }
409
12662be4 410 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
eb4267a3
ILT
411
412 break;
413
414 case R_386_32:
415 case R_386_PC32:
416 if (info->shared
452a5efb 417 && (sec->flags & SEC_ALLOC) != 0
3b3f7625 418 && (ELF32_R_TYPE (rel->r_info) != R_386_PC32 || h != NULL))
eb4267a3 419 {
14cac507
ILT
420 /* When creating a shared object, we must copy these
421 reloc types into the output file. We create a reloc
422 section in dynobj and make room for this reloc. */
eb4267a3
ILT
423 if (sreloc == NULL)
424 {
425 const char *name;
426
ede4eed4 427 name = (bfd_elf_string_from_elf_section
eb4267a3
ILT
428 (abfd,
429 elf_elfheader (abfd)->e_shstrndx,
430 elf_section_data (sec)->rel_hdr.sh_name));
431 if (name == NULL)
432 return false;
433
434 BFD_ASSERT (strncmp (name, ".rel", 4) == 0
435 && strcmp (bfd_get_section_name (abfd, sec),
436 name + 4) == 0);
437
438 sreloc = bfd_get_section_by_name (dynobj, name);
439 if (sreloc == NULL)
440 {
441 sreloc = bfd_make_section (dynobj, name);
442 if (sreloc == NULL
443 || ! bfd_set_section_flags (dynobj, sreloc,
444 (SEC_ALLOC
445 | SEC_LOAD
446 | SEC_HAS_CONTENTS
447 | SEC_IN_MEMORY
448 | SEC_READONLY))
449 || ! bfd_set_section_alignment (dynobj, sreloc, 2))
450 return false;
451 }
452 }
453
454 sreloc->_raw_size += sizeof (Elf32_External_Rel);
455 }
456
457 break;
458
459 default:
460 break;
461 }
462 }
013dec1a
ILT
463
464 return true;
465}
466
467/* Adjust a symbol defined by a dynamic object and referenced by a
468 regular object. The current definition is in some section of the
469 dynamic object, but we're not including those sections. We have to
470 change the definition to something the rest of the link can
471 understand. */
472
473static boolean
474elf_i386_adjust_dynamic_symbol (info, h)
475 struct bfd_link_info *info;
476 struct elf_link_hash_entry *h;
477{
478 bfd *dynobj;
479 asection *s;
480 unsigned int power_of_two;
013dec1a
ILT
481
482 dynobj = elf_hash_table (info)->dynobj;
483
484 /* Make sure we know what is going on here. */
3004a68c
ILT
485 BFD_ASSERT (dynobj != NULL
486 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
452a5efb 487 || h->weakdef != NULL
3004a68c
ILT
488 || ((h->elf_link_hash_flags
489 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
490 && (h->elf_link_hash_flags
491 & ELF_LINK_HASH_REF_REGULAR) != 0
492 && (h->elf_link_hash_flags
493 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
013dec1a
ILT
494
495 /* If this is a function, put it in the procedure linkage table. We
496 will fill in the contents of the procedure linkage table later,
497 when we know the address of the .got section. */
12662be4
ILT
498 if (h->type == STT_FUNC
499 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
013dec1a 500 {
12662be4
ILT
501 if (! elf_hash_table (info)->dynamic_sections_created)
502 {
503 /* This case can occur if we saw a PLT32 reloc in an input
504 file, but none of the input files were dynamic objects.
505 In such a case, we don't actually need to build a
506 procedure linkage table, and we can just do a PC32 reloc
507 instead. */
508 BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
509 return true;
510 }
511
013dec1a
ILT
512 s = bfd_get_section_by_name (dynobj, ".plt");
513 BFD_ASSERT (s != NULL);
514
12662be4
ILT
515 /* If this is the first .plt entry, make room for the special
516 first entry. */
517 if (s->_raw_size == 0)
518 s->_raw_size += PLT_ENTRY_SIZE;
013dec1a 519
9b09a015
ILT
520 /* If this symbol is not defined in a regular file, and we are
521 not generating a shared library, then set the symbol to this
522 location in the .plt. This is required to make function
523 pointers compare as equal between the normal executable and
524 the shared library. */
525 if (! info->shared
526 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
14cac507
ILT
527 {
528 h->root.u.def.section = s;
529 h->root.u.def.value = s->_raw_size;
530 }
013dec1a 531
12662be4 532 h->plt_offset = s->_raw_size;
013dec1a 533
12662be4
ILT
534 /* Make room for this entry. */
535 s->_raw_size += PLT_ENTRY_SIZE;
013dec1a 536
12662be4
ILT
537 /* We also need to make an entry in the .got.plt section, which
538 will be placed in the .got section by the linker script. */
013dec1a 539
12662be4
ILT
540 s = bfd_get_section_by_name (dynobj, ".got.plt");
541 BFD_ASSERT (s != NULL);
542 s->_raw_size += 4;
013dec1a 543
12662be4 544 /* We also need to make an entry in the .rel.plt section. */
eb4267a3 545
12662be4
ILT
546 s = bfd_get_section_by_name (dynobj, ".rel.plt");
547 BFD_ASSERT (s != NULL);
548 s->_raw_size += sizeof (Elf32_External_Rel);
013dec1a
ILT
549
550 return true;
551 }
552
553 /* If this is a weak symbol, and there is a real definition, the
554 processor independent code will have arranged for us to see the
555 real definition first, and we can just use the same value. */
556 if (h->weakdef != NULL)
557 {
30dc85f1
ILT
558 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
559 || h->weakdef->root.type == bfd_link_hash_defweak);
013dec1a
ILT
560 h->root.u.def.section = h->weakdef->root.u.def.section;
561 h->root.u.def.value = h->weakdef->root.u.def.value;
013dec1a
ILT
562 return true;
563 }
564
565 /* This is a reference to a symbol defined by a dynamic object which
eb4267a3
ILT
566 is not a function. */
567
568 /* If we are creating a shared library, we must presume that the
569 only references to the symbol are via the global offset table.
570 For such cases we need not do anything here; the relocations will
571 be handled correctly by relocate_section. */
572 if (info->shared)
573 return true;
574
575 /* We must allocate the symbol in our .dynbss section, which will
576 become part of the .bss section of the executable. There will be
577 an entry for this symbol in the .dynsym section. The dynamic
578 object will contain position independent code, so all references
579 from the dynamic object to this symbol will go through the global
580 offset table. The dynamic linker will use the .dynsym entry to
581 determine the address it must put in the global offset table, so
582 both the dynamic object and the regular object will refer to the
583 same memory location for the variable. */
013dec1a
ILT
584
585 s = bfd_get_section_by_name (dynobj, ".dynbss");
586 BFD_ASSERT (s != NULL);
587
588 /* If the symbol is currently defined in the .bss section of the
589 dynamic object, then it is OK to simply initialize it to zero.
590 If the symbol is in some other section, we must generate a
591 R_386_COPY reloc to tell the dynamic linker to copy the initial
592 value out of the dynamic object and into the runtime process
593 image. We need to remember the offset into the .rel.bss section
7c6da9ca 594 we are going to use. */
eb4267a3 595 if ((h->root.u.def.section->flags & SEC_LOAD) != 0)
013dec1a
ILT
596 {
597 asection *srel;
598
599 srel = bfd_get_section_by_name (dynobj, ".rel.bss");
600 BFD_ASSERT (srel != NULL);
013dec1a 601 srel->_raw_size += sizeof (Elf32_External_Rel);
eb4267a3 602 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
013dec1a
ILT
603 }
604
605 /* We need to figure out the alignment required for this symbol. I
606 have no idea how ELF linkers handle this. */
7c6da9ca
ILT
607 power_of_two = bfd_log2 (h->size);
608 if (power_of_two > 3)
609 power_of_two = 3;
013dec1a
ILT
610
611 /* Apply the required alignment. */
7c6da9ca
ILT
612 s->_raw_size = BFD_ALIGN (s->_raw_size,
613 (bfd_size_type) (1 << power_of_two));
013dec1a
ILT
614 if (power_of_two > bfd_get_section_alignment (dynobj, s))
615 {
616 if (! bfd_set_section_alignment (dynobj, s, power_of_two))
617 return false;
618 }
619
620 /* Define the symbol as being at this point in the section. */
621 h->root.u.def.section = s;
622 h->root.u.def.value = s->_raw_size;
623
624 /* Increment the section size to make room for the symbol. */
625 s->_raw_size += h->size;
626
627 return true;
628}
629
013dec1a
ILT
630/* Set the sizes of the dynamic sections. */
631
632static boolean
633elf_i386_size_dynamic_sections (output_bfd, info)
634 bfd *output_bfd;
635 struct bfd_link_info *info;
636{
637 bfd *dynobj;
638 asection *s;
eb4267a3
ILT
639 boolean plt;
640 boolean relocs;
641 boolean reltext;
013dec1a
ILT
642
643 dynobj = elf_hash_table (info)->dynobj;
644 BFD_ASSERT (dynobj != NULL);
645
12662be4 646 if (elf_hash_table (info)->dynamic_sections_created)
8af74670 647 {
12662be4
ILT
648 /* Set the contents of the .interp section to the interpreter. */
649 if (! info->shared)
650 {
651 s = bfd_get_section_by_name (dynobj, ".interp");
652 BFD_ASSERT (s != NULL);
653 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
654 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
655 }
656 }
657 else
658 {
659 /* We may have created entries in the .rel.got section.
660 However, if we are not creating the dynamic sections, we will
661 not actually use these entries. Reset the size of .rel.got,
662 which will cause it to get stripped from the output file
663 below. */
664 s = bfd_get_section_by_name (dynobj, ".rel.got");
665 if (s != NULL)
666 s->_raw_size = 0;
8af74670 667 }
013dec1a 668
eb4267a3
ILT
669 /* The check_relocs and adjust_dynamic_symbol entry points have
670 determined the sizes of the various dynamic sections. Allocate
671 memory for them. */
672 plt = false;
673 relocs = false;
674 reltext = false;
675 for (s = dynobj->sections; s != NULL; s = s->next)
676 {
677 const char *name;
678 boolean strip;
679
680 if ((s->flags & SEC_IN_MEMORY) == 0)
681 continue;
682
683 /* It's OK to base decisions on the section name, because none
684 of the dynobj section names depend upon the input files. */
685 name = bfd_get_section_name (dynobj, s);
686
687 strip = false;
688
689 if (strcmp (name, ".plt") == 0)
690 {
691 if (s->_raw_size == 0)
692 {
693 /* Strip this section if we don't need it; see the
694 comment below. */
695 strip = true;
696 }
697 else
698 {
699 /* Remember whether there is a PLT. */
700 plt = true;
701 }
702 }
703 else if (strncmp (name, ".rel", 4) == 0)
704 {
705 if (s->_raw_size == 0)
706 {
707 /* If we don't need this section, strip it from the
708 output file. This is mostly to handle .rel.bss and
709 .rel.plt. We must create both sections in
710 create_dynamic_sections, because they must be created
711 before the linker maps input sections to output
712 sections. The linker does that before
713 adjust_dynamic_symbol is called, and it is that
714 function which decides whether anything needs to go
715 into these sections. */
716 strip = true;
717 }
718 else
719 {
720 asection *target;
721
722 /* Remember whether there are any reloc sections other
723 than .rel.plt. */
724 if (strcmp (name, ".rel.plt") != 0)
3c38b3df
ILT
725 {
726 relocs = true;
727
728 /* If this relocation section applies to a read only
729 section, then we probably need a DT_TEXTREL
730 entry. The entries in the .rel.plt section
731 really apply to the .got section, which we
732 created ourselves and so know is not readonly. */
733 target = bfd_get_section_by_name (output_bfd, name + 4);
734 if (target != NULL
735 && (target->flags & SEC_READONLY) != 0)
736 reltext = true;
737 }
eb4267a3
ILT
738
739 /* We use the reloc_count field as a counter if we need
740 to copy relocs into the output file. */
741 s->reloc_count = 0;
742 }
743 }
744 else if (strncmp (name, ".got", 4) != 0)
745 {
746 /* It's not one of our sections, so don't allocate space. */
747 continue;
748 }
749
750 if (strip)
751 {
752 asection **spp;
753
754 for (spp = &s->output_section->owner->sections;
755 *spp != s->output_section;
756 spp = &(*spp)->next)
757 ;
758 *spp = s->output_section->next;
759 --s->output_section->owner->section_count;
760
761 continue;
762 }
013dec1a 763
eb4267a3
ILT
764 /* Allocate memory for the section contents. */
765 s->contents = (bfd_byte *) bfd_alloc (dynobj, s->_raw_size);
766 if (s->contents == NULL && s->_raw_size != 0)
3c38b3df 767 return false;
eb4267a3
ILT
768 }
769
12662be4 770 if (elf_hash_table (info)->dynamic_sections_created)
eb4267a3 771 {
12662be4
ILT
772 /* Add some entries to the .dynamic section. We fill in the
773 values later, in elf_i386_finish_dynamic_sections, but we
774 must add the entries now so that we get the correct size for
775 the .dynamic section. The DT_DEBUG entry is filled in by the
776 dynamic linker and used by the debugger. */
777 if (! info->shared)
778 {
779 if (! bfd_elf32_add_dynamic_entry (info, DT_DEBUG, 0))
780 return false;
781 }
013dec1a 782
12662be4
ILT
783 if (plt)
784 {
785 if (! bfd_elf32_add_dynamic_entry (info, DT_PLTGOT, 0)
786 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTRELSZ, 0)
787 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTREL, DT_REL)
788 || ! bfd_elf32_add_dynamic_entry (info, DT_JMPREL, 0))
789 return false;
790 }
013dec1a 791
12662be4
ILT
792 if (relocs)
793 {
794 if (! bfd_elf32_add_dynamic_entry (info, DT_REL, 0)
795 || ! bfd_elf32_add_dynamic_entry (info, DT_RELSZ, 0)
796 || ! bfd_elf32_add_dynamic_entry (info, DT_RELENT,
797 sizeof (Elf32_External_Rel)))
798 return false;
799 }
013dec1a 800
12662be4
ILT
801 if (reltext)
802 {
803 if (! bfd_elf32_add_dynamic_entry (info, DT_TEXTREL, 0))
804 return false;
805 }
eb4267a3
ILT
806 }
807
013dec1a
ILT
808 return true;
809}
810
811/* Relocate an i386 ELF section. */
812
813static boolean
814elf_i386_relocate_section (output_bfd, info, input_bfd, input_section,
eb4267a3 815 contents, relocs, local_syms, local_sections)
013dec1a
ILT
816 bfd *output_bfd;
817 struct bfd_link_info *info;
818 bfd *input_bfd;
819 asection *input_section;
820 bfd_byte *contents;
821 Elf_Internal_Rela *relocs;
822 Elf_Internal_Sym *local_syms;
823 asection **local_sections;
824{
eb4267a3 825 bfd *dynobj;
013dec1a 826 Elf_Internal_Shdr *symtab_hdr;
eb4267a3
ILT
827 struct elf_link_hash_entry **sym_hashes;
828 bfd_vma *local_got_offsets;
829 asection *sgot;
830 asection *splt;
831 asection *sreloc;
013dec1a
ILT
832 Elf_Internal_Rela *rel;
833 Elf_Internal_Rela *relend;
834
eb4267a3 835 dynobj = elf_hash_table (info)->dynobj;
013dec1a 836 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
eb4267a3
ILT
837 sym_hashes = elf_sym_hashes (input_bfd);
838 local_got_offsets = elf_local_got_offsets (input_bfd);
839
840 sgot = NULL;
841 splt = NULL;
842 sreloc = NULL;
013dec1a
ILT
843
844 rel = relocs;
845 relend = relocs + input_section->reloc_count;
846 for (; rel < relend; rel++)
847 {
848 int r_type;
82b1edf7 849 reloc_howto_type *howto;
3b3f7625 850 unsigned long r_symndx;
013dec1a
ILT
851 struct elf_link_hash_entry *h;
852 Elf_Internal_Sym *sym;
853 asection *sec;
854 bfd_vma relocation;
855 bfd_reloc_status_type r;
856
857 r_type = ELF32_R_TYPE (rel->r_info);
858 if (r_type < 0 || r_type >= (int) R_386_max)
859 {
860 bfd_set_error (bfd_error_bad_value);
861 return false;
862 }
863 howto = elf_howto_table + r_type;
864
865 r_symndx = ELF32_R_SYM (rel->r_info);
866
867 if (info->relocateable)
868 {
869 /* This is a relocateable link. We don't have to change
870 anything, unless the reloc is against a section symbol,
871 in which case we have to adjust according to where the
872 section symbol winds up in the output section. */
873 if (r_symndx < symtab_hdr->sh_info)
874 {
875 sym = local_syms + r_symndx;
876 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
877 {
878 bfd_vma val;
879
880 sec = local_sections[r_symndx];
881 val = bfd_get_32 (input_bfd, contents + rel->r_offset);
882 val += sec->output_offset + sym->st_value;
883 bfd_put_32 (input_bfd, val, contents + rel->r_offset);
884 }
885 }
886
887 continue;
888 }
889
890 /* This is a final link. */
891 h = NULL;
892 sym = NULL;
893 sec = NULL;
894 if (r_symndx < symtab_hdr->sh_info)
895 {
896 sym = local_syms + r_symndx;
897 sec = local_sections[r_symndx];
898 relocation = (sec->output_section->vma
899 + sec->output_offset
900 + sym->st_value);
901 }
902 else
903 {
eb4267a3 904 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
30dc85f1
ILT
905 if (h->root.type == bfd_link_hash_defined
906 || h->root.type == bfd_link_hash_defweak)
013dec1a
ILT
907 {
908 sec = h->root.u.def.section;
9b09a015
ILT
909 if (r_type == R_386_GOTPC
910 || (r_type == R_386_PLT32
911 && h->plt_offset != (bfd_vma) -1)
912 || (r_type == R_386_GOT32
452a5efb
ILT
913 && elf_hash_table (info)->dynamic_sections_created
914 && (! info->shared
915 || ! info->symbolic
916 || (h->elf_link_hash_flags
917 & ELF_LINK_HASH_DEF_REGULAR) == 0))
9b09a015
ILT
918 || (info->shared
919 && (r_type == R_386_32
920 || r_type == R_386_PC32)
921 && (input_section->flags & SEC_ALLOC) != 0))
922 {
923 /* In these cases, we don't need the relocation
924 value. We check specially because in some
925 obscure cases sec->output_section will be NULL. */
926 relocation = 0;
927 }
928 else
929 relocation = (h->root.u.def.value
930 + sec->output_section->vma
931 + sec->output_offset);
013dec1a 932 }
30dc85f1 933 else if (h->root.type == bfd_link_hash_undefweak)
013dec1a 934 relocation = 0;
452a5efb 935 else if (info->shared && !info->symbolic)
eb4267a3 936 relocation = 0;
013dec1a
ILT
937 else
938 {
939 if (! ((*info->callbacks->undefined_symbol)
940 (info, h->root.root.string, input_bfd,
941 input_section, rel->r_offset)))
942 return false;
943 relocation = 0;
944 }
945 }
946
eb4267a3
ILT
947 switch (r_type)
948 {
949 case R_386_GOT32:
950 /* Relocation is to the entry for this symbol in the global
951 offset table. */
952 if (sgot == NULL)
953 {
954 sgot = bfd_get_section_by_name (dynobj, ".got");
955 BFD_ASSERT (sgot != NULL);
956 }
957
958 if (h != NULL)
959 {
12662be4
ILT
960 bfd_vma off;
961
962 off = h->got_offset;
963 BFD_ASSERT (off != (bfd_vma) -1);
964
452a5efb
ILT
965 if (! elf_hash_table (info)->dynamic_sections_created
966 || (info->shared
967 && info->symbolic
968 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
12662be4 969 {
452a5efb
ILT
970 /* This is actually a static link, or it is a
971 -Bsymbolic link and the symbol is defined
972 locally. We must initialize this entry in the
973 global offset table. Since the offset must
974 always be a multiple of 4, we use the least
975 significant bit to record whether we have
976 initialized it already.
12662be4
ILT
977
978 When doing a dynamic link, we create a .rel.got
979 relocation entry to initialize the value. This
980 is done in the finish_dynamic_symbol routine. */
981 if ((off & 1) != 0)
982 off &= ~1;
983 else
984 {
985 bfd_put_32 (output_bfd, relocation,
986 sgot->contents + off);
987 h->got_offset |= 1;
988 }
989 }
990
991 relocation = sgot->output_offset + off;
eb4267a3
ILT
992 }
993 else
994 {
995 bfd_vma off;
996
997 BFD_ASSERT (local_got_offsets != NULL
998 && local_got_offsets[r_symndx] != (bfd_vma) -1);
999
1000 off = local_got_offsets[r_symndx];
1001
1002 /* The offset must always be a multiple of 4. We use
1003 the least significant bit to record whether we have
1004 already generated the necessary reloc. */
1005 if ((off & 1) != 0)
1006 off &= ~1;
1007 else
1008 {
eb4267a3
ILT
1009 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
1010
12662be4
ILT
1011 if (info->shared)
1012 {
1013 asection *srelgot;
1014 Elf_Internal_Rel outrel;
1015
1016 srelgot = bfd_get_section_by_name (dynobj, ".rel.got");
1017 BFD_ASSERT (srelgot != NULL);
1018
1019 outrel.r_offset = (sgot->output_section->vma
1020 + sgot->output_offset
1021 + off);
1022 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1023 bfd_elf32_swap_reloc_out (output_bfd, &outrel,
1024 (((Elf32_External_Rel *)
1025 srelgot->contents)
1026 + srelgot->reloc_count));
1027 ++srelgot->reloc_count;
1028 }
eb4267a3
ILT
1029
1030 local_got_offsets[r_symndx] |= 1;
1031 }
1032
1033 relocation = sgot->output_offset + off;
1034 }
1035
1036 break;
1037
1038 case R_386_GOTOFF:
1039 /* Relocation is relative to the start of the global offset
1040 table. */
1041
1042 if (sgot == NULL)
1043 {
1044 sgot = bfd_get_section_by_name (dynobj, ".got");
1045 BFD_ASSERT (sgot != NULL);
1046 }
1047
1048 /* Note that sgot->output_offset is not involved in this
1049 calculation. We always want the start of .got. If we
1050 defined _GLOBAL_OFFSET_TABLE in a different way, as is
1051 permitted by the ABI, we might have to change this
1052 calculation. */
1053 relocation -= sgot->output_section->vma;
1054
1055 break;
1056
1057 case R_386_GOTPC:
1058 /* Use global offset table as symbol value. */
1059
1060 if (sgot == NULL)
1061 {
1062 sgot = bfd_get_section_by_name (dynobj, ".got");
1063 BFD_ASSERT (sgot != NULL);
1064 }
1065
1066 relocation = sgot->output_section->vma;
1067
1068 break;
1069
1070 case R_386_PLT32:
1071 /* Relocation is to the entry for this symbol in the
1072 procedure linkage table. */
1073
1074 /* Resolve a PLT32 reloc again a local symbol directly,
1075 without using the procedure linkage table. */
1076 if (h == NULL)
1077 break;
1078
12662be4
ILT
1079 if (h->plt_offset == (bfd_vma) -1)
1080 {
1081 /* We didn't make a PLT entry for this symbol. This
452a5efb
ILT
1082 happens when statically linking PIC code, or when
1083 using -Bsymbolic. */
12662be4
ILT
1084 break;
1085 }
1086
eb4267a3
ILT
1087 if (splt == NULL)
1088 {
1089 splt = bfd_get_section_by_name (dynobj, ".plt");
1090 BFD_ASSERT (splt != NULL);
1091 }
1092
eb4267a3
ILT
1093 relocation = (splt->output_section->vma
1094 + splt->output_offset
1095 + h->plt_offset);
1096
1097 break;
1098
1099 case R_386_32:
1100 case R_386_PC32:
1101 if (info->shared
1d5d75e9
ILT
1102 && (input_section->flags & SEC_ALLOC) != 0
1103 && (r_type != R_386_PC32 || h != NULL))
eb4267a3
ILT
1104 {
1105 Elf_Internal_Rel outrel;
1106
1107 /* When generating a shared object, these relocations
1108 are copied into the output file to be resolved at run
1109 time. */
1110
1111 if (sreloc == NULL)
1112 {
1d5d75e9
ILT
1113 const char *name;
1114
1115 name = (bfd_elf_string_from_elf_section
eb4267a3
ILT
1116 (input_bfd,
1117 elf_elfheader (input_bfd)->e_shstrndx,
1118 elf_section_data (input_section)->rel_hdr.sh_name));
1d5d75e9 1119 if (name == NULL)
eb4267a3
ILT
1120 return false;
1121
1d5d75e9 1122 BFD_ASSERT (strncmp (name, ".rel", 4) == 0
eb4267a3
ILT
1123 && strcmp (bfd_get_section_name (input_bfd,
1124 input_section),
1d5d75e9 1125 name + 4) == 0);
eb4267a3 1126
1d5d75e9 1127 sreloc = bfd_get_section_by_name (dynobj, name);
eb4267a3
ILT
1128 BFD_ASSERT (sreloc != NULL);
1129 }
1130
1131 outrel.r_offset = (rel->r_offset
1132 + input_section->output_section->vma
1133 + input_section->output_offset);
1134 if (r_type == R_386_PC32)
1135 {
1d5d75e9
ILT
1136 BFD_ASSERT (h != NULL && h->dynindx != -1);
1137 outrel.r_info = ELF32_R_INFO (h->dynindx, R_386_PC32);
eb4267a3
ILT
1138 }
1139 else
1140 {
1141 if (h == NULL)
1142 outrel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1143 else
1144 {
3b3f7625 1145 BFD_ASSERT (h->dynindx != -1);
eb4267a3
ILT
1146 outrel.r_info = ELF32_R_INFO (h->dynindx, R_386_32);
1147 }
1148 }
1149
1150 bfd_elf32_swap_reloc_out (output_bfd, &outrel,
1151 (((Elf32_External_Rel *)
1152 sreloc->contents)
1153 + sreloc->reloc_count));
1154 ++sreloc->reloc_count;
1155
1156 /* If this reloc is against an external symbol, we do
1157 not want to fiddle with the addend. Otherwise, we
1158 need to include the symbol value so that it becomes
1159 an addend for the dynamic reloc. */
1160 if (h != NULL)
1161 continue;
1162 }
1163
1164 break;
1165
1166 default:
1167 break;
1168 }
1169
013dec1a
ILT
1170 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
1171 contents, rel->r_offset,
1172 relocation, (bfd_vma) 0);
1173
1174 if (r != bfd_reloc_ok)
1175 {
1176 switch (r)
1177 {
1178 default:
1179 case bfd_reloc_outofrange:
1180 abort ();
1181 case bfd_reloc_overflow:
1182 {
1183 const char *name;
1184
1185 if (h != NULL)
1186 name = h->root.root.string;
1187 else
1188 {
ede4eed4
KR
1189 name = bfd_elf_string_from_elf_section (input_bfd,
1190 symtab_hdr->sh_link,
1191 sym->st_name);
013dec1a
ILT
1192 if (name == NULL)
1193 return false;
1194 if (*name == '\0')
1195 name = bfd_section_name (input_bfd, sec);
1196 }
1197 if (! ((*info->callbacks->reloc_overflow)
1198 (info, name, howto->name, (bfd_vma) 0,
1199 input_bfd, input_section, rel->r_offset)))
1200 return false;
1201 }
1202 break;
1203 }
1204 }
1205 }
1206
1207 return true;
1208}
1209
1210/* Finish up dynamic symbol handling. We set the contents of various
1211 dynamic sections here. */
1212
1213static boolean
1214elf_i386_finish_dynamic_symbol (output_bfd, info, h, sym)
1215 bfd *output_bfd;
1216 struct bfd_link_info *info;
1217 struct elf_link_hash_entry *h;
1218 Elf_Internal_Sym *sym;
1219{
eb4267a3 1220 bfd *dynobj;
013dec1a 1221
eb4267a3 1222 dynobj = elf_hash_table (info)->dynobj;
013dec1a 1223
eb4267a3 1224 if (h->plt_offset != (bfd_vma) -1)
013dec1a
ILT
1225 {
1226 asection *splt;
1227 asection *sgot;
1228 asection *srel;
1229 bfd_vma plt_index;
1230 bfd_vma got_offset;
1231 Elf_Internal_Rel rel;
1232
eb4267a3
ILT
1233 /* This symbol has an entry in the procedure linkage table. Set
1234 it up. */
013dec1a 1235
eb4267a3
ILT
1236 BFD_ASSERT (h->dynindx != -1);
1237
1238 splt = bfd_get_section_by_name (dynobj, ".plt");
1239 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
1240 srel = bfd_get_section_by_name (dynobj, ".rel.plt");
1241 BFD_ASSERT (splt != NULL && sgot != NULL && srel != NULL);
013dec1a
ILT
1242
1243 /* Get the index in the procedure linkage table which
1244 corresponds to this symbol. This is the index of this symbol
1245 in all the symbols for which we are making plt entries. The
1246 first entry in the procedure linkage table is reserved. */
eb4267a3 1247 plt_index = h->plt_offset / PLT_ENTRY_SIZE - 1;
013dec1a
ILT
1248
1249 /* Get the offset into the .got table of the entry that
1250 corresponds to this function. Each .got entry is 4 bytes.
1251 The first three are reserved. */
1252 got_offset = (plt_index + 3) * 4;
1253
1254 /* Fill in the entry in the procedure linkage table. */
eb4267a3
ILT
1255 if (! info->shared)
1256 {
1257 memcpy (splt->contents + h->plt_offset, elf_i386_plt_entry,
1258 PLT_ENTRY_SIZE);
1259 bfd_put_32 (output_bfd,
1260 (sgot->output_section->vma
1261 + sgot->output_offset
1262 + got_offset),
1263 splt->contents + h->plt_offset + 2);
1264 }
1265 else
1266 {
1267 memcpy (splt->contents + h->plt_offset, elf_i386_pic_plt_entry,
1268 PLT_ENTRY_SIZE);
1269 bfd_put_32 (output_bfd, got_offset,
1270 splt->contents + h->plt_offset + 2);
1271 }
1272
013dec1a 1273 bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rel),
eb4267a3
ILT
1274 splt->contents + h->plt_offset + 7);
1275 bfd_put_32 (output_bfd, - (h->plt_offset + PLT_ENTRY_SIZE),
1276 splt->contents + h->plt_offset + 12);
013dec1a
ILT
1277
1278 /* Fill in the entry in the global offset table. */
1279 bfd_put_32 (output_bfd,
1280 (splt->output_section->vma
1281 + splt->output_offset
eb4267a3 1282 + h->plt_offset
013dec1a
ILT
1283 + 6),
1284 sgot->contents + got_offset);
1285
1286 /* Fill in the entry in the .rel.plt section. */
1287 rel.r_offset = (sgot->output_section->vma
1288 + sgot->output_offset
1289 + got_offset);
1290 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_JUMP_SLOT);
1291 bfd_elf32_swap_reloc_out (output_bfd, &rel,
1292 ((Elf32_External_Rel *) srel->contents
1293 + plt_index));
1294
eb4267a3
ILT
1295 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1296 {
1297 /* Mark the symbol as undefined, rather than as defined in
1298 the .plt section. Leave the value alone. */
1299 sym->st_shndx = SHN_UNDEF;
1300 }
013dec1a 1301 }
eb4267a3
ILT
1302
1303 if (h->got_offset != (bfd_vma) -1)
013dec1a 1304 {
eb4267a3
ILT
1305 asection *sgot;
1306 asection *srel;
1307 Elf_Internal_Rel rel;
013dec1a 1308
eb4267a3
ILT
1309 /* This symbol has an entry in the global offset table. Set it
1310 up. */
1311
1312 BFD_ASSERT (h->dynindx != -1);
013dec1a 1313
eb4267a3
ILT
1314 sgot = bfd_get_section_by_name (dynobj, ".got");
1315 srel = bfd_get_section_by_name (dynobj, ".rel.got");
1316 BFD_ASSERT (sgot != NULL && srel != NULL);
1317
eb4267a3
ILT
1318 rel.r_offset = (sgot->output_section->vma
1319 + sgot->output_offset
452a5efb
ILT
1320 + (h->got_offset &~ 1));
1321
1322 /* If this is a -Bsymbolic link, and the symbol is defined
1323 locally, we just want to emit a RELATIVE reloc. The entry in
1324 the global offset table will already have been initialized in
1325 the relocate_section function. */
1326 if (info->shared
1327 && info->symbolic
1328 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
1329 rel.r_info = ELF32_R_INFO (0, R_386_RELATIVE);
1330 else
1331 {
1332 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got_offset);
1333 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_GLOB_DAT);
1334 }
1335
eb4267a3
ILT
1336 bfd_elf32_swap_reloc_out (output_bfd, &rel,
1337 ((Elf32_External_Rel *) srel->contents
1338 + srel->reloc_count));
1339 ++srel->reloc_count;
1340 }
1341
1342 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
1343 {
1344 asection *s;
1345 Elf_Internal_Rel rel;
1346
1347 /* This symbol needs a copy reloc. Set it up. */
1348
1349 BFD_ASSERT (h->dynindx != -1
30dc85f1
ILT
1350 && (h->root.type == bfd_link_hash_defined
1351 || h->root.type == bfd_link_hash_defweak));
eb4267a3
ILT
1352
1353 s = bfd_get_section_by_name (h->root.u.def.section->owner,
1354 ".rel.bss");
1355 BFD_ASSERT (s != NULL);
1356
1357 rel.r_offset = (h->root.u.def.value
1358 + h->root.u.def.section->output_section->vma
1359 + h->root.u.def.section->output_offset);
1360 rel.r_info = ELF32_R_INFO (h->dynindx, R_386_COPY);
1361 bfd_elf32_swap_reloc_out (output_bfd, &rel,
1362 ((Elf32_External_Rel *) s->contents
1363 + s->reloc_count));
1364 ++s->reloc_count;
013dec1a
ILT
1365 }
1366
eb4267a3
ILT
1367 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
1368 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
1369 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1370 sym->st_shndx = SHN_ABS;
1371
013dec1a
ILT
1372 return true;
1373}
1374
1375/* Finish up the dynamic sections. */
1376
1377static boolean
1378elf_i386_finish_dynamic_sections (output_bfd, info)
1379 bfd *output_bfd;
1380 struct bfd_link_info *info;
1381{
eb4267a3 1382 bfd *dynobj;
013dec1a
ILT
1383 asection *sgot;
1384 asection *sdyn;
013dec1a 1385
eb4267a3
ILT
1386 dynobj = elf_hash_table (info)->dynobj;
1387
eb4267a3 1388 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
12662be4 1389 BFD_ASSERT (sgot != NULL);
eb4267a3 1390 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
013dec1a 1391
12662be4 1392 if (elf_hash_table (info)->dynamic_sections_created)
013dec1a 1393 {
12662be4
ILT
1394 asection *splt;
1395 Elf32_External_Dyn *dyncon, *dynconend;
013dec1a 1396
12662be4
ILT
1397 splt = bfd_get_section_by_name (dynobj, ".plt");
1398 BFD_ASSERT (splt != NULL && sdyn != NULL);
013dec1a 1399
12662be4
ILT
1400 dyncon = (Elf32_External_Dyn *) sdyn->contents;
1401 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
1402 for (; dyncon < dynconend; dyncon++)
013dec1a 1403 {
12662be4
ILT
1404 Elf_Internal_Dyn dyn;
1405 const char *name;
1406 asection *s;
eb4267a3 1407
12662be4 1408 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
eb4267a3 1409
12662be4 1410 switch (dyn.d_tag)
013dec1a 1411 {
12662be4
ILT
1412 default:
1413 break;
1414
1415 case DT_PLTGOT:
1416 name = ".got";
1417 goto get_vma;
1418 case DT_JMPREL:
1419 name = ".rel.plt";
1420 get_vma:
1421 s = bfd_get_section_by_name (output_bfd, name);
1422 BFD_ASSERT (s != NULL);
1423 dyn.d_un.d_ptr = s->vma;
1424 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1425 break;
1426
1427 case DT_PLTRELSZ:
1428 s = bfd_get_section_by_name (output_bfd, ".rel.plt");
1429 BFD_ASSERT (s != NULL);
013dec1a 1430 if (s->_cooked_size != 0)
12662be4 1431 dyn.d_un.d_val = s->_cooked_size;
013dec1a 1432 else
12662be4
ILT
1433 dyn.d_un.d_val = s->_raw_size;
1434 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1435 break;
1436
1437 case DT_RELSZ:
1438 /* My reading of the SVR4 ABI indicates that the
1439 procedure linkage table relocs (DT_JMPREL) should be
1440 included in the overall relocs (DT_REL). This is
1441 what Solaris does. However, UnixWare can not handle
1442 that case. Therefore, we override the DT_RELSZ entry
1443 here to make it not include the JMPREL relocs. Since
1444 the linker script arranges for .rel.plt to follow all
1445 other relocation sections, we don't have to worry
1446 about changing the DT_REL entry. */
1447 s = bfd_get_section_by_name (output_bfd, ".rel.plt");
1448 if (s != NULL)
1449 {
1450 if (s->_cooked_size != 0)
1451 dyn.d_un.d_val -= s->_cooked_size;
1452 else
1453 dyn.d_un.d_val -= s->_raw_size;
1454 }
1455 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1456 break;
013dec1a 1457 }
013dec1a 1458 }
013dec1a 1459
12662be4
ILT
1460 /* Fill in the first entry in the procedure linkage table. */
1461 if (splt->_raw_size > 0)
eb4267a3 1462 {
12662be4
ILT
1463 if (info->shared)
1464 memcpy (splt->contents, elf_i386_pic_plt0_entry, PLT_ENTRY_SIZE);
1465 else
1466 {
1467 memcpy (splt->contents, elf_i386_plt0_entry, PLT_ENTRY_SIZE);
1468 bfd_put_32 (output_bfd,
1469 sgot->output_section->vma + sgot->output_offset + 4,
1470 splt->contents + 2);
1471 bfd_put_32 (output_bfd,
1472 sgot->output_section->vma + sgot->output_offset + 8,
1473 splt->contents + 8);
1474 }
eb4267a3 1475 }
12662be4
ILT
1476
1477 /* UnixWare sets the entsize of .plt to 4, although that doesn't
1478 really seem like the right value. */
1479 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
013dec1a
ILT
1480 }
1481
1482 /* Fill in the first three entries in the global offset table. */
1483 if (sgot->_raw_size > 0)
1484 {
12662be4
ILT
1485 if (sdyn == NULL)
1486 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
1487 else
1488 bfd_put_32 (output_bfd,
1489 sdyn->output_section->vma + sdyn->output_offset,
1490 sgot->contents);
013dec1a
ILT
1491 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
1492 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
1493 }
1494
1495 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
1496
013dec1a
ILT
1497 return true;
1498}
e4b6b3e7
ILT
1499
1500#define TARGET_LITTLE_SYM bfd_elf32_i386_vec
1501#define TARGET_LITTLE_NAME "elf32-i386"
1502#define ELF_ARCH bfd_arch_i386
68241b2b 1503#define ELF_MACHINE_CODE EM_386
e4b6b3e7
ILT
1504#define elf_info_to_howto elf_i386_info_to_howto
1505#define elf_info_to_howto_rel elf_i386_info_to_howto_rel
1506#define bfd_elf32_bfd_reloc_type_lookup elf_i386_reloc_type_lookup
68241b2b 1507#define ELF_MAXPAGESIZE 0x1000
013dec1a 1508#define elf_backend_create_dynamic_sections \
ede4eed4 1509 _bfd_elf_create_dynamic_sections
eb4267a3 1510#define elf_backend_check_relocs elf_i386_check_relocs
013dec1a
ILT
1511#define elf_backend_adjust_dynamic_symbol \
1512 elf_i386_adjust_dynamic_symbol
1513#define elf_backend_size_dynamic_sections \
1514 elf_i386_size_dynamic_sections
1515#define elf_backend_relocate_section elf_i386_relocate_section
1516#define elf_backend_finish_dynamic_symbol \
1517 elf_i386_finish_dynamic_symbol
1518#define elf_backend_finish_dynamic_sections \
1519 elf_i386_finish_dynamic_sections
ede4eed4 1520#define elf_backend_want_got_plt 1
3b3f7625 1521#define elf_backend_plt_readonly 1
ede4eed4 1522#define elf_backend_want_plt_sym 0
e4b6b3e7
ILT
1523
1524#include "elf32-target.h"