2011-12-16 Shinichiro Hamaji <shinichiro.hamaji@gmail.com>
[binutils.git] / bfd / coff-x86_64.c
blobd8a8a2e6c604dcb75d43e05130646188f2ab8844
1 /* BFD back-end for AMD 64 COFF files.
2 Copyright 2006, 2007, 2008, 2009, 2010, 2011
3 Free Software Foundation, Inc.
5 This file is part of BFD, the Binary File Descriptor library.
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 3 of the License, or
10 (at your option) any later version.
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.
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., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA.
22 Written by Kai Tietz, OneVision Software GmbH&CoKg. */
24 #ifndef COFF_WITH_pex64
25 #define COFF_WITH_pex64
26 #endif
28 /* Note we have to make sure not to include headers twice.
29 Not all headers are wrapped in #ifdef guards, so we define
30 PEI_HEADERS to prevent double including here. */
31 #ifndef PEI_HEADERS
32 #include "sysdep.h"
33 #include "bfd.h"
34 #include "libbfd.h"
35 #include "coff/x86_64.h"
36 #include "coff/internal.h"
37 #include "coff/pe.h"
38 #include "libcoff.h"
39 #include "libiberty.h"
40 #endif
42 #define BADMAG(x) AMD64BADMAG(x)
44 #ifdef COFF_WITH_pex64
45 # undef AOUTSZ
46 # define AOUTSZ PEPAOUTSZ
47 # define PEAOUTHDR PEPAOUTHDR
48 #endif
50 #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (2)
52 /* The page size is a guess based on ELF. */
54 #define COFF_PAGE_SIZE 0x1000
56 /* For some reason when using AMD COFF the value stored in the .text
57 section for a reference to a common symbol is the value itself plus
58 any desired offset. Ian Taylor, Cygnus Support. */
60 /* If we are producing relocatable output, we need to do some
61 adjustments to the object file that are not done by the
62 bfd_perform_relocation function. This function is called by every
63 reloc type to make any required adjustments. */
65 static bfd_reloc_status_type
66 coff_amd64_reloc (bfd *abfd,
67 arelent *reloc_entry,
68 asymbol *symbol,
69 void * data,
70 asection *input_section ATTRIBUTE_UNUSED,
71 bfd *output_bfd,
72 char **error_message ATTRIBUTE_UNUSED)
74 symvalue diff;
76 #if !defined(COFF_WITH_PE)
77 if (output_bfd == NULL)
78 return bfd_reloc_continue;
79 #endif
81 if (bfd_is_com_section (symbol->section))
83 #if !defined(COFF_WITH_PE)
84 /* We are relocating a common symbol. The current value in the
85 object file is ORIG + OFFSET, where ORIG is the value of the
86 common symbol as seen by the object file when it was compiled
87 (this may be zero if the symbol was undefined) and OFFSET is
88 the offset into the common symbol (normally zero, but may be
89 non-zero when referring to a field in a common structure).
90 ORIG is the negative of reloc_entry->addend, which is set by
91 the CALC_ADDEND macro below. We want to replace the value in
92 the object file with NEW + OFFSET, where NEW is the value of
93 the common symbol which we are going to put in the final
94 object file. NEW is symbol->value. */
95 diff = symbol->value + reloc_entry->addend;
96 #else
97 /* In PE mode, we do not offset the common symbol. */
98 diff = reloc_entry->addend;
99 #endif
101 else
103 /* For some reason bfd_perform_relocation always effectively
104 ignores the addend for a COFF target when producing
105 relocatable output. This seems to be always wrong for 386
106 COFF, so we handle the addend here instead. */
107 #if defined(COFF_WITH_PE)
108 if (output_bfd == NULL)
110 reloc_howto_type *howto = reloc_entry->howto;
112 /* Although PC relative relocations are very similar between
113 PE and non-PE formats, but they are off by 1 << howto->size
114 bytes. For the external relocation, PE is very different
115 from others. See md_apply_fix3 () in gas/config/tc-amd64.c.
116 When we link PE and non-PE object files together to
117 generate a non-PE executable, we have to compensate it
118 here. */
119 if(howto->pc_relative && howto->pcrel_offset)
120 diff = -(1 << howto->size);
121 else if(symbol->flags & BSF_WEAK)
122 diff = reloc_entry->addend - symbol->value;
123 else
124 diff = -reloc_entry->addend;
126 else
127 #endif
128 diff = reloc_entry->addend;
131 #if defined(COFF_WITH_PE)
132 /* FIXME: How should this case be handled? */
133 if (reloc_entry->howto->type == R_AMD64_IMAGEBASE
134 && output_bfd != NULL
135 && bfd_get_flavour (output_bfd) == bfd_target_coff_flavour)
136 diff -= pe_data (output_bfd)->pe_opthdr.ImageBase;
137 #endif
139 #define DOIT(x) \
140 x = ((x & ~howto->dst_mask) | (((x & howto->src_mask) + diff) & howto->dst_mask))
142 if (diff != 0)
144 reloc_howto_type *howto = reloc_entry->howto;
145 unsigned char *addr = (unsigned char *) data + reloc_entry->address;
147 switch (howto->size)
149 case 0:
151 char x = bfd_get_8 (abfd, addr);
152 DOIT (x);
153 bfd_put_8 (abfd, x, addr);
155 break;
157 case 1:
159 short x = bfd_get_16 (abfd, addr);
160 DOIT (x);
161 bfd_put_16 (abfd, (bfd_vma) x, addr);
163 break;
165 case 2:
167 long x = bfd_get_32 (abfd, addr);
168 DOIT (x);
169 bfd_put_32 (abfd, (bfd_vma) x, addr);
171 break;
172 case 4:
174 long long x = bfd_get_64 (abfd, addr);
175 DOIT (x);
176 bfd_put_64 (abfd, (bfd_vma) x, addr);
178 break;
180 default:
181 abort ();
185 /* Now let bfd_perform_relocation finish everything up. */
186 return bfd_reloc_continue;
189 #if defined(COFF_WITH_PE)
190 /* Return TRUE if this relocation should appear in the output .reloc
191 section. */
193 static bfd_boolean
194 in_reloc_p (bfd *abfd ATTRIBUTE_UNUSED, reloc_howto_type *howto)
196 return ! howto->pc_relative && howto->type != R_AMD64_IMAGEBASE
197 && howto->type != R_AMD64_SECREL;
199 #endif /* COFF_WITH_PE */
201 #ifndef PCRELOFFSET
202 #define PCRELOFFSET TRUE
203 #endif
205 static reloc_howto_type howto_table[] =
207 EMPTY_HOWTO (0),
208 HOWTO (R_AMD64_DIR64, /* type 1*/
209 0, /* rightshift */
210 4, /* size (0 = byte, 1 = short, 2 = long, 4 = long long) */
211 64, /* bitsize */
212 FALSE, /* pc_relative */
213 0, /* bitpos */
214 complain_overflow_bitfield, /* complain_on_overflow */
215 coff_amd64_reloc, /* special_function */
216 "R_X86_64_64", /* name */
217 TRUE, /* partial_inplace */
218 0xffffffffffffffffll, /* src_mask */
219 0xffffffffffffffffll, /* dst_mask */
220 TRUE), /* pcrel_offset */
221 HOWTO (R_AMD64_DIR32, /* type 2 */
222 0, /* rightshift */
223 2, /* size (0 = byte, 1 = short, 2 = long) */
224 32, /* bitsize */
225 FALSE, /* pc_relative */
226 0, /* bitpos */
227 complain_overflow_bitfield, /* complain_on_overflow */
228 coff_amd64_reloc, /* special_function */
229 "R_X86_64_32", /* name */
230 TRUE, /* partial_inplace */
231 0xffffffff, /* src_mask */
232 0xffffffff, /* dst_mask */
233 TRUE), /* pcrel_offset */
234 /* PE IMAGE_REL_AMD64_ADDR32NB relocation (3). */
235 HOWTO (R_AMD64_IMAGEBASE, /* type */
236 0, /* rightshift */
237 2, /* size (0 = byte, 1 = short, 2 = long) */
238 32, /* bitsize */
239 FALSE, /* pc_relative */
240 0, /* bitpos */
241 complain_overflow_bitfield, /* complain_on_overflow */
242 coff_amd64_reloc, /* special_function */
243 "rva32", /* name */
244 TRUE, /* partial_inplace */
245 0xffffffff, /* src_mask */
246 0xffffffff, /* dst_mask */
247 FALSE), /* pcrel_offset */
248 /* 32-bit longword PC relative relocation (4). */
249 HOWTO (R_AMD64_PCRLONG, /* type 4 */
250 0, /* rightshift */
251 2, /* size (0 = byte, 1 = short, 2 = long) */
252 32, /* bitsize */
253 TRUE, /* pc_relative */
254 0, /* bitpos */
255 complain_overflow_signed, /* complain_on_overflow */
256 coff_amd64_reloc, /* special_function */
257 "R_X86_64_PC32", /* name */
258 TRUE, /* partial_inplace */
259 0xffffffff, /* src_mask */
260 0xffffffff, /* dst_mask */
261 PCRELOFFSET), /* pcrel_offset */
263 HOWTO (R_AMD64_PCRLONG_1, /* type 5 */
264 0, /* rightshift */
265 2, /* size (0 = byte, 1 = short, 2 = long) */
266 32, /* bitsize */
267 TRUE, /* pc_relative */
268 0, /* bitpos */
269 complain_overflow_signed, /* complain_on_overflow */
270 coff_amd64_reloc, /* special_function */
271 "DISP32+1", /* name */
272 TRUE, /* partial_inplace */
273 0xffffffff, /* src_mask */
274 0xffffffff, /* dst_mask */
275 PCRELOFFSET), /* pcrel_offset */
276 HOWTO (R_AMD64_PCRLONG_2, /* type 6 */
277 0, /* rightshift */
278 2, /* size (0 = byte, 1 = short, 2 = long) */
279 32, /* bitsize */
280 TRUE, /* pc_relative */
281 0, /* bitpos */
282 complain_overflow_signed, /* complain_on_overflow */
283 coff_amd64_reloc, /* special_function */
284 "DISP32+2", /* name */
285 TRUE, /* partial_inplace */
286 0xffffffff, /* src_mask */
287 0xffffffff, /* dst_mask */
288 PCRELOFFSET), /* pcrel_offset */
289 HOWTO (R_AMD64_PCRLONG_3, /* type 7 */
290 0, /* rightshift */
291 2, /* size (0 = byte, 1 = short, 2 = long) */
292 32, /* bitsize */
293 TRUE, /* pc_relative */
294 0, /* bitpos */
295 complain_overflow_signed, /* complain_on_overflow */
296 coff_amd64_reloc, /* special_function */
297 "DISP32+3", /* name */
298 TRUE, /* partial_inplace */
299 0xffffffff, /* src_mask */
300 0xffffffff, /* dst_mask */
301 PCRELOFFSET), /* pcrel_offset */
302 HOWTO (R_AMD64_PCRLONG_4, /* type 8 */
303 0, /* rightshift */
304 2, /* size (0 = byte, 1 = short, 2 = long) */
305 32, /* bitsize */
306 TRUE, /* pc_relative */
307 0, /* bitpos */
308 complain_overflow_signed, /* complain_on_overflow */
309 coff_amd64_reloc, /* special_function */
310 "DISP32+4", /* name */
311 TRUE, /* partial_inplace */
312 0xffffffff, /* src_mask */
313 0xffffffff, /* dst_mask */
314 PCRELOFFSET), /* pcrel_offset */
315 HOWTO (R_AMD64_PCRLONG_5, /* type 9 */
316 0, /* rightshift */
317 2, /* size (0 = byte, 1 = short, 2 = long) */
318 32, /* bitsize */
319 TRUE, /* pc_relative */
320 0, /* bitpos */
321 complain_overflow_signed, /* complain_on_overflow */
322 coff_amd64_reloc, /* special_function */
323 "DISP32+5", /* name */
324 TRUE, /* partial_inplace */
325 0xffffffff, /* src_mask */
326 0xffffffff, /* dst_mask */
327 PCRELOFFSET), /* pcrel_offset */
328 EMPTY_HOWTO (10), /* R_AMD64_SECTION 10 */
329 #if defined(COFF_WITH_PE)
330 /* 32-bit longword section relative relocation (11). */
331 HOWTO (R_AMD64_SECREL, /* type */
332 0, /* rightshift */
333 2, /* size (0 = byte, 1 = short, 2 = long) */
334 32, /* bitsize */
335 FALSE, /* pc_relative */
336 0, /* bitpos */
337 complain_overflow_bitfield, /* complain_on_overflow */
338 coff_amd64_reloc, /* special_function */
339 "secrel32", /* name */
340 TRUE, /* partial_inplace */
341 0xffffffff, /* src_mask */
342 0xffffffff, /* dst_mask */
343 TRUE), /* pcrel_offset */
344 #else
345 EMPTY_HOWTO (11),
346 #endif
347 EMPTY_HOWTO (12),
348 EMPTY_HOWTO (13),
349 #ifndef DONT_EXTEND_AMD64
350 HOWTO (R_AMD64_PCRQUAD,
351 0, /* rightshift */
352 4, /* size (0 = byte, 1 = short, 2 = long) */
353 64, /* bitsize */
354 TRUE, /* pc_relative */
355 0, /* bitpos */
356 complain_overflow_signed, /* complain_on_overflow */
357 coff_amd64_reloc, /* special_function */
358 "R_X86_64_PC64", /* name */
359 TRUE, /* partial_inplace */
360 0xffffffffffffffffll, /* src_mask */
361 0xffffffffffffffffll, /* dst_mask */
362 PCRELOFFSET), /* pcrel_offset */
363 #else
364 EMPTY_HOWTO (14),
365 #endif
366 /* Byte relocation (15). */
367 HOWTO (R_RELBYTE, /* type */
368 0, /* rightshift */
369 0, /* size (0 = byte, 1 = short, 2 = long) */
370 8, /* bitsize */
371 FALSE, /* pc_relative */
372 0, /* bitpos */
373 complain_overflow_bitfield, /* complain_on_overflow */
374 coff_amd64_reloc, /* special_function */
375 "R_X86_64_8", /* name */
376 TRUE, /* partial_inplace */
377 0x000000ff, /* src_mask */
378 0x000000ff, /* dst_mask */
379 PCRELOFFSET), /* pcrel_offset */
380 /* 16-bit word relocation (16). */
381 HOWTO (R_RELWORD, /* type */
382 0, /* rightshift */
383 1, /* size (0 = byte, 1 = short, 2 = long) */
384 16, /* bitsize */
385 FALSE, /* pc_relative */
386 0, /* bitpos */
387 complain_overflow_bitfield, /* complain_on_overflow */
388 coff_amd64_reloc, /* special_function */
389 "R_X86_64_16", /* name */
390 TRUE, /* partial_inplace */
391 0x0000ffff, /* src_mask */
392 0x0000ffff, /* dst_mask */
393 PCRELOFFSET), /* pcrel_offset */
394 /* 32-bit longword relocation (17). */
395 HOWTO (R_RELLONG, /* type */
396 0, /* rightshift */
397 2, /* size (0 = byte, 1 = short, 2 = long) */
398 32, /* bitsize */
399 FALSE, /* pc_relative */
400 0, /* bitpos */
401 complain_overflow_bitfield, /* complain_on_overflow */
402 coff_amd64_reloc, /* special_function */
403 "R_X86_64_32S", /* name */
404 TRUE, /* partial_inplace */
405 0xffffffff, /* src_mask */
406 0xffffffff, /* dst_mask */
407 PCRELOFFSET), /* pcrel_offset */
408 /* Byte PC relative relocation (18). */
409 HOWTO (R_PCRBYTE, /* type */
410 0, /* rightshift */
411 0, /* size (0 = byte, 1 = short, 2 = long) */
412 8, /* bitsize */
413 TRUE, /* pc_relative */
414 0, /* bitpos */
415 complain_overflow_signed, /* complain_on_overflow */
416 coff_amd64_reloc, /* special_function */
417 "R_X86_64_PC8", /* name */
418 TRUE, /* partial_inplace */
419 0x000000ff, /* src_mask */
420 0x000000ff, /* dst_mask */
421 PCRELOFFSET), /* pcrel_offset */
422 /* 16-bit word PC relative relocation (19). */
423 HOWTO (R_PCRWORD, /* type */
424 0, /* rightshift */
425 1, /* size (0 = byte, 1 = short, 2 = long) */
426 16, /* bitsize */
427 TRUE, /* pc_relative */
428 0, /* bitpos */
429 complain_overflow_signed, /* complain_on_overflow */
430 coff_amd64_reloc, /* special_function */
431 "R_X86_64_PC16", /* name */
432 TRUE, /* partial_inplace */
433 0x0000ffff, /* src_mask */
434 0x0000ffff, /* dst_mask */
435 PCRELOFFSET), /* pcrel_offset */
436 /* 32-bit longword PC relative relocation (20). */
437 HOWTO (R_PCRLONG, /* type */
438 0, /* rightshift */
439 2, /* size (0 = byte, 1 = short, 2 = long) */
440 32, /* bitsize */
441 TRUE, /* pc_relative */
442 0, /* bitpos */
443 complain_overflow_signed, /* complain_on_overflow */
444 coff_amd64_reloc, /* special_function */
445 "R_X86_64_PC32", /* name */
446 TRUE, /* partial_inplace */
447 0xffffffff, /* src_mask */
448 0xffffffff, /* dst_mask */
449 PCRELOFFSET) /* pcrel_offset */
452 /* Turn a howto into a reloc nunmber */
454 #define SELECT_RELOC(x,howto) { x.r_type = howto->type; }
455 #define I386 1 /* Customize coffcode.h */
456 #define AMD64 1
458 #define RTYPE2HOWTO(cache_ptr, dst) \
459 ((cache_ptr)->howto = \
460 ((dst)->r_type < ARRAY_SIZE (howto_table)) \
461 ? howto_table + (dst)->r_type \
462 : NULL)
464 /* For 386 COFF a STYP_NOLOAD | STYP_BSS section is part of a shared
465 library. On some other COFF targets STYP_BSS is normally
466 STYP_NOLOAD. */
467 #define BSS_NOLOAD_IS_SHARED_LIBRARY
469 /* Compute the addend of a reloc. If the reloc is to a common symbol,
470 the object file contains the value of the common symbol. By the
471 time this is called, the linker may be using a different symbol
472 from a different object file with a different value. Therefore, we
473 hack wildly to locate the original symbol from this file so that we
474 can make the correct adjustment. This macro sets coffsym to the
475 symbol from the original file, and uses it to set the addend value
476 correctly. If this is not a common symbol, the usual addend
477 calculation is done, except that an additional tweak is needed for
478 PC relative relocs.
479 FIXME: This macro refers to symbols and asect; these are from the
480 calling function, not the macro arguments. */
482 #define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \
484 coff_symbol_type *coffsym = NULL; \
486 if (ptr && bfd_asymbol_bfd (ptr) != abfd) \
487 coffsym = (obj_symbols (abfd) \
488 + (cache_ptr->sym_ptr_ptr - symbols)); \
489 else if (ptr) \
490 coffsym = coff_symbol_from (abfd, ptr); \
492 if (coffsym != NULL \
493 && coffsym->native->u.syment.n_scnum == 0) \
494 cache_ptr->addend = - coffsym->native->u.syment.n_value; \
495 else if (ptr && bfd_asymbol_bfd (ptr) == abfd \
496 && ptr->section != NULL) \
497 cache_ptr->addend = - (ptr->section->vma + ptr->value); \
498 else \
499 cache_ptr->addend = 0; \
500 if (ptr && howto_table[reloc.r_type].pc_relative) \
501 cache_ptr->addend += asect->vma; \
504 /* We use the special COFF backend linker. For normal AMD64 COFF, we
505 can use the generic relocate_section routine. For PE, we need our
506 own routine. */
508 #if !defined(COFF_WITH_PE)
510 #define coff_relocate_section _bfd_coff_generic_relocate_section
512 #else /* COFF_WITH_PE */
514 /* The PE relocate section routine. The only difference between this
515 and the regular routine is that we don't want to do anything for a
516 relocatable link. */
518 static bfd_boolean
519 coff_pe_amd64_relocate_section (bfd *output_bfd,
520 struct bfd_link_info *info,
521 bfd *input_bfd,
522 asection *input_section,
523 bfd_byte *contents,
524 struct internal_reloc *relocs,
525 struct internal_syment *syms,
526 asection **sections)
528 if (info->relocatable)
529 return TRUE;
531 return _bfd_coff_generic_relocate_section (output_bfd, info, input_bfd,input_section, contents,relocs, syms, sections);
534 #define coff_relocate_section coff_pe_amd64_relocate_section
536 #endif /* COFF_WITH_PE */
538 /* Convert an rtype to howto for the COFF backend linker. */
540 static reloc_howto_type *
541 coff_amd64_rtype_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
542 asection *sec,
543 struct internal_reloc *rel,
544 struct coff_link_hash_entry *h,
545 struct internal_syment *sym,
546 bfd_vma *addendp)
548 reloc_howto_type *howto;
550 if (rel->r_type >= ARRAY_SIZE (howto_table))
552 bfd_set_error (bfd_error_bad_value);
553 return NULL;
555 howto = howto_table + rel->r_type;
557 #if defined(COFF_WITH_PE)
558 /* Cancel out code in _bfd_coff_generic_relocate_section. */
559 *addendp = 0;
560 if (rel->r_type >= R_AMD64_PCRLONG_1 && rel->r_type <= R_AMD64_PCRLONG_5)
562 *addendp -= (bfd_vma)(rel->r_type - R_AMD64_PCRLONG);
563 rel->r_type = R_AMD64_PCRLONG;
565 #endif
567 if (howto->pc_relative)
568 *addendp += sec->vma;
570 if (sym != NULL && sym->n_scnum == 0 && sym->n_value != 0)
572 /* This is a common symbol. The section contents include the
573 size (sym->n_value) as an addend. The relocate_section
574 function will be adding in the final value of the symbol. We
575 need to subtract out the current size in order to get the
576 correct result. */
577 BFD_ASSERT (h != NULL);
579 #if !defined(COFF_WITH_PE)
580 /* I think we *do* want to bypass this. If we don't, I have
581 seen some data parameters get the wrong relocation address.
582 If I link two versions with and without this section bypassed
583 and then do a binary comparison, the addresses which are
584 different can be looked up in the map. The case in which
585 this section has been bypassed has addresses which correspond
586 to values I can find in the map. */
587 *addendp -= sym->n_value;
588 #endif
591 #if !defined(COFF_WITH_PE)
592 /* If the output symbol is common (in which case this must be a
593 relocatable link), we need to add in the final size of the
594 common symbol. */
595 if (h != NULL && h->root.type == bfd_link_hash_common)
596 *addendp += h->root.u.c.size;
597 #endif
599 #if defined(COFF_WITH_PE)
600 if (howto->pc_relative)
602 *addendp -= 4;
604 /* If the symbol is defined, then the generic code is going to
605 add back the symbol value in order to cancel out an
606 adjustment it made to the addend. However, we set the addend
607 to 0 at the start of this function. We need to adjust here,
608 to avoid the adjustment the generic code will make. FIXME:
609 This is getting a bit hackish. */
610 if (sym != NULL && sym->n_scnum != 0)
611 *addendp -= sym->n_value;
614 if (rel->r_type == R_AMD64_IMAGEBASE
615 && (bfd_get_flavour (sec->output_section->owner) == bfd_target_coff_flavour))
616 *addendp -= pe_data (sec->output_section->owner)->pe_opthdr.ImageBase;
618 if (rel->r_type == R_AMD64_SECREL)
620 bfd_vma osect_vma;
622 if (h && (h->type == bfd_link_hash_defined || h->type == bfd_link_hash_defweak))
623 osect_vma = h->root.u.def.section->output_section->vma;
624 else
626 asection *s;
627 int i;
629 /* Sigh, the only way to get the section to offset against
630 is to find it the hard way. */
631 for (s = abfd->sections, i = 1; i < sym->n_scnum; i++)
632 s = s->next;
634 osect_vma = s->output_section->vma;
637 *addendp -= osect_vma;
639 #endif
641 return howto;
644 #define coff_bfd_reloc_type_lookup coff_amd64_reloc_type_lookup
645 #define coff_bfd_reloc_name_lookup coff_amd64_reloc_name_lookup
647 static reloc_howto_type *
648 coff_amd64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED, bfd_reloc_code_real_type code)
650 switch (code)
652 case BFD_RELOC_RVA:
653 return howto_table + R_AMD64_IMAGEBASE;
654 case BFD_RELOC_32:
655 return howto_table + R_AMD64_DIR32;
656 case BFD_RELOC_64:
657 return howto_table + R_AMD64_DIR64;
658 case BFD_RELOC_64_PCREL:
659 #ifndef DONT_EXTEND_AMD64
660 return howto_table + R_AMD64_PCRQUAD;
661 #else
662 /* Fall through. */
663 #endif
664 case BFD_RELOC_32_PCREL:
665 return howto_table + R_AMD64_PCRLONG;
666 case BFD_RELOC_X86_64_32S:
667 return howto_table + R_RELLONG;
668 case BFD_RELOC_16:
669 return howto_table + R_RELWORD;
670 case BFD_RELOC_16_PCREL:
671 return howto_table + R_PCRWORD;
672 case BFD_RELOC_8:
673 return howto_table + R_RELBYTE;
674 case BFD_RELOC_8_PCREL:
675 return howto_table + R_PCRBYTE;
676 #if defined(COFF_WITH_PE)
677 case BFD_RELOC_32_SECREL:
678 return howto_table + R_AMD64_SECREL;
679 #endif
680 default:
681 BFD_FAIL ();
682 return 0;
686 static reloc_howto_type *
687 coff_amd64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
688 const char *r_name)
690 unsigned int i;
692 for (i = 0; i < sizeof (howto_table) / sizeof (howto_table[0]); i++)
693 if (howto_table[i].name != NULL
694 && strcasecmp (howto_table[i].name, r_name) == 0)
695 return &howto_table[i];
697 return NULL;
700 #define coff_rtype_to_howto coff_amd64_rtype_to_howto
702 #ifdef TARGET_UNDERSCORE
704 /* If amd64 gcc uses underscores for symbol names, then it does not use
705 a leading dot for local labels, so if TARGET_UNDERSCORE is defined
706 we treat all symbols starting with L as local. */
708 static bfd_boolean
709 coff_amd64_is_local_label_name (bfd *abfd, const char *name)
711 if (name[0] == 'L')
712 return TRUE;
714 return _bfd_coff_is_local_label_name (abfd, name);
717 #define coff_bfd_is_local_label_name coff_amd64_is_local_label_name
719 #endif /* TARGET_UNDERSCORE */
721 #ifndef bfd_pe_print_pdata
722 #define bfd_pe_print_pdata NULL
723 #endif
725 #include "coffcode.h"
727 #ifdef PE
728 #define amd64coff_object_p pe_bfd_object_p
729 #else
730 #define amd64coff_object_p coff_object_p
731 #endif
733 const bfd_target
734 #ifdef TARGET_SYM
735 TARGET_SYM =
736 #else
737 x86_64coff_vec =
738 #endif
740 #ifdef TARGET_NAME
741 TARGET_NAME,
742 #else
743 "coff-x86-64", /* Name. */
744 #endif
745 bfd_target_coff_flavour,
746 BFD_ENDIAN_LITTLE, /* Data byte order is little. */
747 BFD_ENDIAN_LITTLE, /* Header byte order is little. */
749 (HAS_RELOC | EXEC_P | /* Object flags. */
750 HAS_LINENO | HAS_DEBUG |
751 HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
753 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC /* Section flags. */
754 #if defined(COFF_WITH_PE)
755 | SEC_LINK_ONCE | SEC_LINK_DUPLICATES | SEC_READONLY
756 #endif
757 | SEC_CODE | SEC_DATA),
759 #ifdef TARGET_UNDERSCORE
760 TARGET_UNDERSCORE, /* Leading underscore. */
761 #else
762 0, /* Leading underscore. */
763 #endif
764 '/', /* Ar_pad_char. */
765 15, /* Ar_max_namelen. */
766 0, /* match priority. */
768 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
769 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
770 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* Data. */
771 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
772 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
773 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* Hdrs. */
775 /* Note that we allow an object file to be treated as a core file as well. */
776 { _bfd_dummy_target, amd64coff_object_p, /* BFD_check_format. */
777 bfd_generic_archive_p, amd64coff_object_p },
778 { bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format. */
779 bfd_false },
780 { bfd_false, coff_write_object_contents, /* bfd_write_contents. */
781 _bfd_write_archive_contents, bfd_false },
783 BFD_JUMP_TABLE_GENERIC (coff),
784 BFD_JUMP_TABLE_COPY (coff),
785 BFD_JUMP_TABLE_CORE (_bfd_nocore),
786 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
787 BFD_JUMP_TABLE_SYMBOLS (coff),
788 BFD_JUMP_TABLE_RELOCS (coff),
789 BFD_JUMP_TABLE_WRITE (coff),
790 BFD_JUMP_TABLE_LINK (coff),
791 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
793 NULL,
795 COFF_SWAP_TABLE