Commit | Line | Data |
---|---|---|
fac41780 | 1 | /* BFD back-end for HP/Intel IA-64 COFF files. |
7898deda | 2 | Copyright 1999, 2000, 2001 Free Software Foundation, Inc. |
fac41780 JW |
3 | Contributed by David Mosberger <davidm@hpl.hp.com> |
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 "libbfd.h" | |
fac41780 | 24 | #include "coff/ia64.h" |
fac41780 | 25 | #include "coff/internal.h" |
fac41780 | 26 | #include "coff/pe.h" |
fac41780 JW |
27 | #include "libcoff.h" |
28 | ||
29 | #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (2) | |
30 | /* The page size is a guess based on ELF. */ | |
31 | ||
32 | #define COFF_PAGE_SIZE 0x1000 | |
33 | ||
5fcfd273 | 34 | static reloc_howto_type howto_table[] = |
fac41780 | 35 | { |
64bf6ae6 | 36 | EMPTY_HOWTO (0), |
fac41780 JW |
37 | }; |
38 | ||
39 | #define BADMAG(x) IA64BADMAG(x) | |
40 | #define IA64 1 /* Customize coffcode.h */ | |
41 | ||
cbff5e0d | 42 | #ifdef COFF_WITH_pep |
fac41780 | 43 | # undef AOUTSZ |
cbff5e0d DD |
44 | # define AOUTSZ PEPAOUTSZ |
45 | # define PEAOUTHDR PEPAOUTHDR | |
fac41780 JW |
46 | #endif |
47 | ||
48 | #define RTYPE2HOWTO(cache_ptr, dst) \ | |
49 | (cache_ptr)->howto = howto_table + (dst)->r_type; | |
50 | ||
51 | #ifdef COFF_WITH_PE | |
52 | /* Return true if this relocation should | |
5fcfd273 | 53 | appear in the output .reloc section. */ |
fac41780 JW |
54 | |
55 | static boolean | |
56 | in_reloc_p(abfd, howto) | |
64bf6ae6 JW |
57 | bfd * abfd ATTRIBUTE_UNUSED; |
58 | reloc_howto_type *howto ATTRIBUTE_UNUSED; | |
fac41780 | 59 | { |
5fcfd273 KH |
60 | return 0; /* We don't do relocs for now... */ |
61 | } | |
fac41780 JW |
62 | #endif |
63 | ||
64 | #include "coffcode.h" | |
65 | ||
66 | static const bfd_target * | |
67 | ia64coff_object_p (abfd) | |
68 | bfd *abfd; | |
69 | { | |
70 | #ifdef COFF_IMAGE_WITH_PE | |
71 | /* We need to hack badly to handle a PE image correctly. In PE | |
72 | images created by the GNU linker, the offset to the COFF header | |
73 | is always the size. However, this is not the case in images | |
74 | generated by other PE linkers. The PE format stores a four byte | |
75 | offset to the PE signature just before the COFF header at | |
76 | location 0x3c of the file. We pick up that offset, verify that | |
77 | the PE signature is there, and then set ourselves up to read in | |
78 | the COFF header. */ | |
79 | { | |
80 | bfd_byte ext_offset[4]; | |
81 | file_ptr offset; | |
82 | bfd_byte ext_signature[4]; | |
83 | unsigned long signature; | |
84 | ||
85 | if (bfd_seek (abfd, 0x3c, SEEK_SET) != 0 | |
86 | || bfd_read (ext_offset, 1, 4, abfd) != 4) | |
87 | { | |
88 | if (bfd_get_error () != bfd_error_system_call) | |
89 | bfd_set_error (bfd_error_wrong_format); | |
90 | return NULL; | |
91 | } | |
92 | offset = bfd_h_get_32 (abfd, ext_offset); | |
93 | if (bfd_seek (abfd, offset, SEEK_SET) != 0 | |
94 | || bfd_read (ext_signature, 1, 4, abfd) != 4) | |
95 | { | |
96 | if (bfd_get_error () != bfd_error_system_call) | |
97 | bfd_set_error (bfd_error_wrong_format); | |
98 | return NULL; | |
99 | } | |
100 | signature = bfd_h_get_32 (abfd, ext_signature); | |
101 | ||
102 | if (signature != 0x4550) | |
103 | { | |
104 | bfd_set_error (bfd_error_wrong_format); | |
105 | return NULL; | |
106 | } | |
107 | ||
108 | /* Here is the hack. coff_object_p wants to read filhsz bytes to | |
109 | pick up the COFF header. We adjust so that that will work. 20 | |
110 | is the size of the COFF filehdr. */ | |
111 | ||
112 | if (bfd_seek (abfd, | |
113 | (bfd_tell (abfd) | |
114 | - bfd_coff_filhsz (abfd) | |
115 | + 20), | |
116 | SEEK_SET) | |
117 | != 0) | |
118 | { | |
119 | if (bfd_get_error () != bfd_error_system_call) | |
120 | bfd_set_error (bfd_error_wrong_format); | |
121 | return NULL; | |
122 | } | |
123 | } | |
124 | #endif | |
125 | ||
126 | return coff_object_p (abfd); | |
127 | } | |
128 | ||
129 | const bfd_target | |
130 | #ifdef TARGET_SYM | |
131 | TARGET_SYM = | |
132 | #else | |
133 | ia64coff_vec = | |
134 | #endif | |
135 | { | |
136 | #ifdef TARGET_NAME | |
137 | TARGET_NAME, | |
138 | #else | |
139 | "coff-ia64", /* name */ | |
140 | #endif | |
141 | bfd_target_coff_flavour, | |
142 | BFD_ENDIAN_LITTLE, /* data byte order is little */ | |
143 | BFD_ENDIAN_LITTLE, /* header byte order is little */ | |
144 | ||
145 | (HAS_RELOC | EXEC_P | /* object flags */ | |
146 | HAS_LINENO | HAS_DEBUG | | |
147 | HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED), | |
148 | ||
149 | #ifndef COFF_WITH_PE | |
150 | (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC /* section flags */ | |
151 | | SEC_CODE | SEC_DATA), | |
152 | #else | |
153 | (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC /* section flags */ | |
154 | | SEC_CODE | SEC_DATA | |
155 | | SEC_LINK_ONCE | SEC_LINK_DUPLICATES), | |
156 | #endif | |
157 | ||
158 | #ifdef TARGET_UNDERSCORE | |
159 | TARGET_UNDERSCORE, /* leading underscore */ | |
160 | #else | |
161 | 0, /* leading underscore */ | |
162 | #endif | |
163 | '/', /* ar_pad_char */ | |
164 | 15, /* ar_max_namelen */ | |
165 | ||
166 | bfd_getl64, bfd_getl_signed_64, bfd_putl64, | |
167 | bfd_getl32, bfd_getl_signed_32, bfd_putl32, | |
168 | bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */ | |
169 | bfd_getl64, bfd_getl_signed_64, bfd_putl64, | |
170 | bfd_getl32, bfd_getl_signed_32, bfd_putl32, | |
171 | bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */ | |
172 | ||
5fcfd273 | 173 | /* Note that we allow an object file to be treated as a core file as well. */ |
fac41780 JW |
174 | {_bfd_dummy_target, ia64coff_object_p, /* bfd_check_format */ |
175 | bfd_generic_archive_p, ia64coff_object_p}, | |
176 | {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */ | |
177 | bfd_false}, | |
178 | {bfd_false, coff_write_object_contents, /* bfd_write_contents */ | |
179 | _bfd_write_archive_contents, bfd_false}, | |
180 | ||
181 | BFD_JUMP_TABLE_GENERIC (coff), | |
182 | BFD_JUMP_TABLE_COPY (coff), | |
183 | BFD_JUMP_TABLE_CORE (_bfd_nocore), | |
184 | BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff), | |
185 | BFD_JUMP_TABLE_SYMBOLS (coff), | |
186 | BFD_JUMP_TABLE_RELOCS (coff), | |
187 | BFD_JUMP_TABLE_WRITE (coff), | |
188 | BFD_JUMP_TABLE_LINK (coff), | |
189 | BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic), | |
190 | ||
191 | NULL, | |
192 | ||
193 | COFF_SWAP_TABLE | |
194 | }; |