1 /* BFD back-end for HP/Intel IA-64 COFF files.
2 Copyright (C) 1999-2024 Free Software Foundation, Inc.
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 3 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., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
22 #include "sysdep.h"
23 #include "bfd.h"
24 #include "libbfd.h"
25 #include "coff/ia64.h"
26 #include "coff/internal.h"
27 #include "coff/pe.h"
28 #include "libcoff.h"
29
30 #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (2)
31
32 /* Windows ia64 uses 8K page size. */
33 #define COFF_PAGE_SIZE 0x2000
34
35 static reloc_howto_type howto_table[] =
36 {
37 EMPTY_HOWTO (0),
38 };
39
40 #define BADMAG(x) IA64BADMAG(x)
41 #define IA64 1 /* Customize coffcode.h */
42
43 #ifdef COFF_WITH_pep
44 # undef AOUTSZ
45 # define AOUTSZ PEPAOUTSZ
46 # define PEAOUTHDR PEPAOUTHDR
47 #endif
48
49 #define RTYPE2HOWTO(cache_ptr, dst) \
50 (cache_ptr)->howto = howto_table;
51
52 #ifdef COFF_WITH_PE
53 /* Return TRUE if this relocation should
54 appear in the output .reloc section. */
55
56 static bool
in_reloc_p(bfd * abfd ATTRIBUTE_UNUSED,reloc_howto_type * howto ATTRIBUTE_UNUSED)57 in_reloc_p (bfd * abfd ATTRIBUTE_UNUSED,
58 reloc_howto_type *howto ATTRIBUTE_UNUSED)
59 {
60 return false; /* We don't do relocs for now... */
61 }
62 #endif
63
64 #ifndef bfd_pe_print_pdata
65 #define bfd_pe_print_pdata NULL
66 #endif
67
68 #include "coffcode.h"
69
70 static bfd_cleanup
ia64coff_object_p(bfd * abfd)71 ia64coff_object_p (bfd *abfd)
72 {
73 #ifdef COFF_IMAGE_WITH_PE
74 {
75 struct external_DOS_hdr dos_hdr;
76 struct external_PEI_IMAGE_hdr image_hdr;
77 file_ptr offset;
78
79 if (bfd_seek (abfd, 0, SEEK_SET) != 0
80 || (bfd_read (&dos_hdr, sizeof (dos_hdr), abfd) != sizeof (dos_hdr)))
81 {
82 if (bfd_get_error () != bfd_error_system_call)
83 bfd_set_error (bfd_error_wrong_format);
84 return NULL;
85 }
86
87 /* There are really two magic numbers involved; the magic number
88 that says this is a NT executable (PEI) and the magic number
89 that determines the architecture. The former is IMAGE_DOS_SIGNATURE,
90 stored in the e_magic field. The latter is stored in the
91 f_magic field. If the NT magic number isn't valid, the
92 architecture magic number could be mimicked by some other
93 field (specifically, the number of relocs in section 3). Since
94 this routine can only be called correctly for a PEI file, check
95 the e_magic number here, and, if it doesn't match, clobber the
96 f_magic number so that we don't get a false match. */
97 if (H_GET_16 (abfd, dos_hdr.e_magic) != IMAGE_DOS_SIGNATURE)
98 {
99 bfd_set_error (bfd_error_wrong_format);
100 return NULL;
101 }
102
103 offset = H_GET_32 (abfd, dos_hdr.e_lfanew);
104 if (bfd_seek (abfd, offset, SEEK_SET) != 0
105 || (bfd_read (&image_hdr, sizeof (image_hdr), abfd)
106 != sizeof (image_hdr)))
107 {
108 if (bfd_get_error () != bfd_error_system_call)
109 bfd_set_error (bfd_error_wrong_format);
110 return NULL;
111 }
112
113 if (H_GET_32 (abfd, image_hdr.nt_signature)
114 != 0x4550)
115 {
116 bfd_set_error (bfd_error_wrong_format);
117 return NULL;
118 }
119
120 /* Here is the hack. coff_object_p wants to read filhsz bytes to
121 pick up the COFF header for PE, see "struct external_PEI_filehdr"
122 in include/coff/pe.h. We adjust so that that will work. */
123 if (bfd_seek (abfd, offset - sizeof (dos_hdr), SEEK_SET) != 0)
124 {
125 if (bfd_get_error () != bfd_error_system_call)
126 bfd_set_error (bfd_error_wrong_format);
127 return NULL;
128 }
129 }
130 #endif
131
132 return coff_object_p (abfd);
133 }
134
135 const bfd_target
136 #ifdef TARGET_SYM
137 TARGET_SYM =
138 #else
139 ia64coff_vec =
140 #endif
141 {
142 #ifdef TARGET_NAME
143 TARGET_NAME,
144 #else
145 "coff-ia64", /* name */
146 #endif
147 bfd_target_coff_flavour,
148 BFD_ENDIAN_LITTLE, /* data byte order is little */
149 BFD_ENDIAN_LITTLE, /* header byte order is little */
150
151 (HAS_RELOC | EXEC_P /* object flags */
152 | HAS_LINENO | HAS_DEBUG
153 | HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
154
155 #ifndef COFF_WITH_PE
156 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC /* section flags */
157 | SEC_CODE | SEC_DATA),
158 #else
159 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC /* section flags */
160 | SEC_CODE | SEC_DATA
161 | SEC_LINK_ONCE | SEC_LINK_DUPLICATES),
162 #endif
163
164 #ifdef TARGET_UNDERSCORE
165 TARGET_UNDERSCORE, /* leading underscore */
166 #else
167 0, /* leading underscore */
168 #endif
169 '/', /* ar_pad_char */
170 15, /* ar_max_namelen */
171 0, /* match priority. */
172 TARGET_KEEP_UNUSED_SECTION_SYMBOLS, /* keep unused section symbols. */
173
174 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
175 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
176 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
177 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
178 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
179 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
180
181 /* Note that we allow an object file to be treated as a core file as well. */
182 { /* bfd_check_format */
183 _bfd_dummy_target,
184 ia64coff_object_p,
185 bfd_generic_archive_p,
186 ia64coff_object_p
187 },
188 { /* bfd_set_format */
189 _bfd_bool_bfd_false_error,
190 coff_mkobject,
191 _bfd_generic_mkarchive,
192 _bfd_bool_bfd_false_error
193 },
194 { /* bfd_write_contents */
195 _bfd_bool_bfd_false_error,
196 coff_write_object_contents,
197 _bfd_write_archive_contents,
198 _bfd_bool_bfd_false_error
199 },
200
201 BFD_JUMP_TABLE_GENERIC (coff),
202 BFD_JUMP_TABLE_COPY (coff),
203 BFD_JUMP_TABLE_CORE (_bfd_nocore),
204 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
205 BFD_JUMP_TABLE_SYMBOLS (coff),
206 BFD_JUMP_TABLE_RELOCS (coff),
207 BFD_JUMP_TABLE_WRITE (coff),
208 BFD_JUMP_TABLE_LINK (coff),
209 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
210
211 NULL,
212
213 COFF_SWAP_TABLE
214 };
215