1 /* BFD back-end for Irix core files.
2 Copyright 1993, 1994, 1996, 1999, 2001, 2002
3 Free Software Foundation, Inc.
4 Written by Stu Grossman, Cygnus Support.
5 Converted to back-end form by Ian Lance Taylor, Cygnus Support
7 This file is part of BFD, the Binary File Descriptor library.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23 /* This file can only be compiled on systems which use Irix style core
24 files (namely, Irix 4 and Irix 5, so far). */
34 struct sgi_core_struct
37 char cmd
[CORE_NAMESIZE
];
40 #define core_hdr(bfd) ((bfd)->tdata.sgi_core_data)
41 #define core_signal(bfd) (core_hdr(bfd)->sig)
42 #define core_command(bfd) (core_hdr(bfd)->cmd)
44 static asection
*make_bfd_asection
45 PARAMS ((bfd
*, const char *, flagword
, bfd_size_type
, bfd_vma
, file_ptr
));
46 static const bfd_target
*irix_core_core_file_p
PARAMS ((bfd
*));
47 static char *irix_core_core_file_failing_command
PARAMS ((bfd
*));
48 static int irix_core_core_file_failing_signal
PARAMS ((bfd
*));
49 static boolean irix_core_core_file_matches_executable_p
50 PARAMS ((bfd
*, bfd
*));
51 static asymbol
*irix_core_make_empty_symbol
PARAMS ((bfd
*));
52 static void swap_abort
PARAMS ((void));
55 make_bfd_asection (abfd
, name
, flags
, _raw_size
, vma
, filepos
)
59 bfd_size_type _raw_size
;
65 asect
= bfd_make_section_anyway (abfd
, name
);
70 asect
->_raw_size
= _raw_size
;
72 asect
->filepos
= filepos
;
73 asect
->alignment_power
= 4;
78 static const bfd_target
*
79 irix_core_core_file_p (abfd
)
85 struct coreout coreout
;
86 struct idesc
*idg
, *idf
, *ids
;
89 val
= bfd_bread ((PTR
) &coreout
, (bfd_size_type
) sizeof coreout
, abfd
);
90 if (val
!= sizeof coreout
)
92 if (bfd_get_error () != bfd_error_system_call
)
93 bfd_set_error (bfd_error_wrong_format
);
98 #define CORE_MAGICN32 CORE_MAGIC
100 if ((coreout
.c_magic
!= CORE_MAGIC
&& coreout
.c_magic
!= CORE_MAGICN32
)
101 || coreout
.c_version
!= CORE_VERSION1
)
104 amt
= sizeof (struct sgi_core_struct
);
105 core_hdr (abfd
) = (struct sgi_core_struct
*) bfd_zalloc (abfd
, amt
);
106 if (!core_hdr (abfd
))
109 strncpy (core_command (abfd
), coreout
.c_name
, CORE_NAMESIZE
);
110 core_signal (abfd
) = coreout
.c_sigcause
;
112 if (bfd_seek (abfd
, coreout
.c_vmapoffset
, SEEK_SET
) != 0)
115 for (i
= 0; i
< coreout
.c_nvmap
; i
++)
119 val
= bfd_bread ((PTR
) &vmap
, (bfd_size_type
) sizeof vmap
, abfd
);
120 if (val
!= sizeof vmap
)
133 secname
= ".mapfile";
140 /* A file offset of zero means that the section is not contained
142 if (vmap
.v_offset
== 0)
145 if (!make_bfd_asection (abfd
, secname
,
146 SEC_ALLOC
+SEC_LOAD
+SEC_HAS_CONTENTS
,
153 /* Make sure that the regs are contiguous within the core file. */
155 idg
= &coreout
.c_idesc
[I_GPREGS
];
156 idf
= &coreout
.c_idesc
[I_FPREGS
];
157 ids
= &coreout
.c_idesc
[I_SPECREGS
];
159 if (idg
->i_offset
+ idg
->i_len
!= idf
->i_offset
160 || idf
->i_offset
+ idf
->i_len
!= ids
->i_offset
)
161 goto fail
; /* Can't deal with non-contig regs */
163 if (bfd_seek (abfd
, idg
->i_offset
, SEEK_SET
) != 0)
166 if (!make_bfd_asection (abfd
, ".reg",
168 idg
->i_len
+ idf
->i_len
+ ids
->i_len
,
173 /* OK, we believe you. You're a core file (sure, sure). */
174 bfd_default_set_arch_mach (abfd
, bfd_arch_mips
, 0);
179 bfd_release (abfd
, core_hdr (abfd
));
180 core_hdr (abfd
) = NULL
;
181 bfd_section_list_clear (abfd
);
186 irix_core_core_file_failing_command (abfd
)
189 return core_command (abfd
);
193 irix_core_core_file_failing_signal (abfd
)
196 return core_signal (abfd
);
200 irix_core_core_file_matches_executable_p (core_bfd
, exec_bfd
)
201 bfd
*core_bfd
, *exec_bfd
;
203 return true; /* XXX - FIXME */
207 irix_core_make_empty_symbol (abfd
)
210 bfd_size_type amt
= sizeof (asymbol
);
211 asymbol
*new = (asymbol
*) bfd_zalloc (abfd
, amt
);
217 #define irix_core_get_symtab_upper_bound _bfd_nosymbols_get_symtab_upper_bound
218 #define irix_core_get_symtab _bfd_nosymbols_get_symtab
219 #define irix_core_print_symbol _bfd_nosymbols_print_symbol
220 #define irix_core_get_symbol_info _bfd_nosymbols_get_symbol_info
221 #define irix_core_bfd_is_local_label_name \
222 _bfd_nosymbols_bfd_is_local_label_name
223 #define irix_core_get_lineno _bfd_nosymbols_get_lineno
224 #define irix_core_find_nearest_line _bfd_nosymbols_find_nearest_line
225 #define irix_core_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
226 #define irix_core_read_minisymbols _bfd_nosymbols_read_minisymbols
227 #define irix_core_minisymbol_to_symbol _bfd_nosymbols_minisymbol_to_symbol
229 /* If somebody calls any byte-swapping routines, shoot them. */
233 abort(); /* This way doesn't require any declaration for ANSI to fuck up */
235 #define NO_GET ((bfd_vma (*) PARAMS (( const bfd_byte *))) swap_abort )
236 #define NO_PUT ((void (*) PARAMS ((bfd_vma, bfd_byte *))) swap_abort )
237 #define NO_SIGNED_GET \
238 ((bfd_signed_vma (*) PARAMS ((const bfd_byte *))) swap_abort )
240 const bfd_target irix_core_vec
=
243 bfd_target_unknown_flavour
,
244 BFD_ENDIAN_BIG
, /* target byte order */
245 BFD_ENDIAN_BIG
, /* target headers byte order */
246 (HAS_RELOC
| EXEC_P
| /* object flags */
247 HAS_LINENO
| HAS_DEBUG
|
248 HAS_SYMS
| HAS_LOCALS
| WP_TEXT
| D_PAGED
),
249 (SEC_HAS_CONTENTS
| SEC_ALLOC
| SEC_LOAD
| SEC_RELOC
), /* section flags */
250 0, /* symbol prefix */
251 ' ', /* ar_pad_char */
252 16, /* ar_max_namelen */
253 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 64 bit data */
254 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 32 bit data */
255 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 16 bit data */
256 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 64 bit hdrs */
257 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 32 bit hdrs */
258 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 16 bit hdrs */
260 { /* bfd_check_format */
261 _bfd_dummy_target
, /* unknown format */
262 _bfd_dummy_target
, /* object file */
263 _bfd_dummy_target
, /* archive */
264 irix_core_core_file_p
/* a core file */
266 { /* bfd_set_format */
267 bfd_false
, bfd_false
,
270 { /* bfd_write_contents */
271 bfd_false
, bfd_false
,
275 BFD_JUMP_TABLE_GENERIC (_bfd_generic
),
276 BFD_JUMP_TABLE_COPY (_bfd_generic
),
277 BFD_JUMP_TABLE_CORE (irix_core
),
278 BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive
),
279 BFD_JUMP_TABLE_SYMBOLS (irix_core
),
280 BFD_JUMP_TABLE_RELOCS (_bfd_norelocs
),
281 BFD_JUMP_TABLE_WRITE (_bfd_generic
),
282 BFD_JUMP_TABLE_LINK (_bfd_nolink
),
283 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic
),
287 (PTR
) 0 /* backend_data */
290 #endif /* IRIX_CORE */