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