1 /* BFD back end for SCO5 core files (U-area and raw sections)
2 Copyright 1998, 1999, 2000 Free Software Foundation, Inc.
3 Written by Jouke Numan <jnuman@hiscom.nl>
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 2 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
24 #include "libaout.h" /* BFD a.out internal data structures */
27 #include <sys/types.h>
28 #include <sys/param.h>
32 #include <sys/user.h> /* After a.out.h */
33 #include <sys/paccess.h>
34 #include <sys/region.h>
36 struct sco5_core_struct
41 /* forward declarations */
44 make_bfd_asection PARAMS ((bfd *, const char *, flagword, bfd_size_type,
46 static asymbol *sco5_core_make_empty_symbol PARAMS ((bfd *));
47 static struct user *read_uarea PARAMS ((bfd *, int));
48 const bfd_target *sco5_core_file_p PARAMS ((bfd *abfd));
49 char *sco5_core_file_failing_command PARAMS ((bfd *abfd));
50 int sco5_core_file_failing_signal PARAMS ((bfd *abfd));
51 boolean sco5_core_file_matches_executable_p PARAMS ((bfd *core_bfd,
53 static void swap_abort PARAMS ((void));
56 make_bfd_asection (abfd, name, flags, _raw_size, vma, filepos)
60 bfd_size_type _raw_size;
66 asect = bfd_make_section_anyway (abfd, name);
70 asect->_raw_size = _raw_size;
72 asect->filepos = filepos;
73 asect->alignment_power = 2;
79 sco5_core_make_empty_symbol (abfd)
82 asymbol *new = (asymbol *) bfd_zalloc (abfd, sizeof (asymbol));
89 read_uarea(abfd, filepos)
94 struct sco5_core_struct *rawptr;
96 rawptr = ((struct sco5_core_struct *)
97 bfd_zmalloc (sizeof (struct sco5_core_struct)));
101 abfd->tdata.sco5_core_data = rawptr;
103 if ((bfd_seek (abfd, filepos, SEEK_SET) != 0)
104 || (bfd_read ((void *)&rawptr->u, 1, sizeof rawptr->u, abfd)
105 != sizeof rawptr->u))
107 bfd_set_error (bfd_error_wrong_format);
111 /* Sanity check perhaps??? */
112 if (rawptr->u.u_dsize > 0x1000000) /* Remember, it's in pages... */
114 bfd_set_error (bfd_error_wrong_format);
117 if (rawptr->u.u_ssize > 0x1000000)
119 bfd_set_error (bfd_error_wrong_format);
127 sco5_core_file_p (abfd)
130 int coffset_siz, val, nsecs, cheadoffs;
133 struct coreoffsets coffsets;
134 struct coresecthead chead;
138 /* Read coreoffsets region at end of core (see core(FP)) */
141 FILE *stream = bfd_cache_lookup (abfd);
145 if (fstat (fileno (stream), &statbuf) < 0)
147 bfd_set_error (bfd_error_system_call);
150 coresize = statbuf.st_size;
152 /* Last long in core is sizeof struct coreoffsets, read it */
153 if ((bfd_seek (abfd, coresize-sizeof coffset_siz, SEEK_SET) != 0)
154 || (bfd_read ((void *)&coffset_siz, 1, sizeof coffset_siz, abfd)
155 != sizeof coffset_siz) )
157 bfd_set_error (bfd_error_wrong_format);
161 /* Use it to seek start of coreoffsets region, read it and determine
163 if ((bfd_seek (abfd, coresize-coffset_siz, SEEK_SET) != 0)
164 || (bfd_read ((void *)&coffsets, 1, sizeof coffsets, abfd)
166 || ((coffsets.u_info != 1) && (coffsets.u_info != C_VERSION)))
168 bfd_set_error (bfd_error_wrong_format);
172 if (coffsets.u_info == 1)
174 /* Old version, no section heads, read info from user struct */
176 u = read_uarea(abfd, coffsets.u_user);
180 if (!make_bfd_asection (abfd, ".reg", SEC_HAS_CONTENTS,
181 (bfd_size_type) coffsets.u_usize,
182 0 - (bfd_vma) u->u_ar0,
183 (file_ptr) coffsets.u_user))
186 if (!make_bfd_asection (abfd, ".data",
187 SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS,
188 ((bfd_size_type) u->u_exdata.ux_dsize
189 + u->u_exdata.ux_bsize),
190 (bfd_vma) u->u_exdata.ux_datorg,
191 (file_ptr) coffsets.u_data))
194 if (!make_bfd_asection (abfd, ".stack",
195 SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS,
196 (bfd_size_type) u->u_ssize * NBPC,
198 (file_ptr) coffsets.u_stack))
201 return abfd->xvec; /* Done for version 1 */
204 /* Immediately before coreoffsets region is a long with offset in core
205 to first coresecthead (CORES_OFFSETS), the long before this is the
206 number of section heads in the list. Read both longs and read the
207 coresecthead and check its validity */
210 coresize - coffset_siz - 2 * sizeof coffset_siz,
212 || (bfd_read ((void *)&nsecs, 1, sizeof nsecs, abfd) != sizeof nsecs)
213 || (bfd_read ((void *)&cheadoffs, 1, sizeof cheadoffs, abfd)
215 || (bfd_seek (abfd, cheadoffs, SEEK_SET) != 0)
216 || (bfd_read ((void *)&chead, 1, sizeof chead, abfd) != sizeof chead)
217 || (chead.cs_stype != CORES_OFFSETS)
218 || (chead.cs_x.csx_magic != COREMAGIC_NUMBER))
220 bfd_set_error (bfd_error_wrong_format);
224 /* OK, we believe you. You're a core file (sure, sure). */
226 /* Now loop over all regions and map them */
227 nsecs--; /* We've seen CORES_OFFSETS already */
228 for (; nsecs; nsecs--)
230 if ((bfd_seek (abfd, chead.cs_hseek, SEEK_SET) != 0)
231 || bfd_read ((void *)&chead, 1, sizeof chead, abfd) != sizeof chead)
233 bfd_set_error (bfd_error_wrong_format);
237 switch (chead.cs_stype)
239 case CORES_MAGIC: /* Core header, check magic */
240 if (chead.cs_x.csx_magic != COREMAGIC_NUMBER)
242 bfd_set_error (bfd_error_wrong_format);
246 nsecs++; /* MAGIC not in section cnt!*/
248 case CORES_UAREA: /* U-area, read in tdata */
249 u = read_uarea(abfd, chead.cs_sseek);
253 /* This is tricky. As the "register section", we give them
254 the entire upage and stack. u.u_ar0 points to where
255 "register 0" is stored. There are two tricks with this,
256 though. One is that the rest of the registers might be
257 at positive or negative (or both) displacements from
258 *u_ar0. The other is that u_ar0 is sometimes an absolute
259 address in kernel memory, and on other systems it is an
260 offset from the beginning of the `struct user'.
262 As a practical matter, we don't know where the registers
263 actually are, so we have to pass the whole area to GDB.
264 We encode the value of u_ar0 by setting the .regs section
265 up so that its virtual memory address 0 is at the place
266 pointed to by u_ar0 (by setting the vma of the start of
267 the section to -u_ar0). GDB uses this info to locate the
268 regs, using minor trickery to get around the
269 offset-or-absolute-addr problem. */
271 chead.cs_vaddr = 0 - (bfd_vma) u->u_ar0;
274 flags = SEC_HAS_CONTENTS;
277 case CORES_PREGION: /* A program region, map it */
278 switch (chead.cs_x.csx_preg.csxp_rtyp)
281 secname = ".data"; /* Data region. */
284 secname = ".stack"; /* Stack region. */
287 secname = ".shmem"; /* Shared memory */
290 secname = ".libdat"; /* Shared library data */
293 secname = ".virt86"; /* Virtual 8086 mode */
296 secname = ".mmfile"; /* Memory mapped file */
299 secname = ".Xdat0"; /* XENIX data region, virtual 0 */
304 flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
306 case CORES_PROC: /* struct proc */
307 case CORES_ITIMER: /* interval timers */
308 case CORES_SCOUTSNAME: /* struct scoutsname */
309 secname = NULL; /* Ignore these */
312 (*_bfd_error_handler) ("Unhandled SCO core file section type %d\n",
318 && !make_bfd_asection (abfd, secname, flags,
319 (bfd_size_type) chead.cs_vsize,
320 (bfd_vma) chead.cs_vaddr,
321 (file_ptr) chead.cs_sseek))
331 sco5_core_file_failing_command (abfd)
334 char *com = abfd->tdata.sco5_core_data->u.u_comm;
343 sco5_core_file_failing_signal (ignore_abfd)
346 return ((ignore_abfd->tdata.sco5_core_data->u.u_sysabort != 0)
347 ? ignore_abfd->tdata.sco5_core_data->u.u_sysabort
353 sco5_core_file_matches_executable_p (core_bfd, exec_bfd)
354 bfd *core_bfd, *exec_bfd;
356 return true; /* FIXME, We have no way of telling at this point */
359 #define sco5_core_get_symtab_upper_bound _bfd_nosymbols_get_symtab_upper_bound
360 #define sco5_core_get_symtab _bfd_nosymbols_get_symtab
361 #define sco5_core_print_symbol _bfd_nosymbols_print_symbol
362 #define sco5_core_get_symbol_info _bfd_nosymbols_get_symbol_info
363 #define sco5_core_bfd_is_local_label_name _bfd_nosymbols_bfd_is_local_label_name
364 #define sco5_core_get_lineno _bfd_nosymbols_get_lineno
365 #define sco5_core_find_nearest_line _bfd_nosymbols_find_nearest_line
366 #define sco5_core_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
367 #define sco5_core_read_minisymbols _bfd_nosymbols_read_minisymbols
368 #define sco5_core_minisymbol_to_symbol _bfd_nosymbols_minisymbol_to_symbol
370 /* If somebody calls any byte-swapping routines, shoot them. */
374 abort (); /* This way doesn't require any declaration for ANSI to fuck up */
376 #define NO_GET ((bfd_vma (*) PARAMS (( const bfd_byte *))) swap_abort )
377 #define NO_PUT ((void (*) PARAMS ((bfd_vma, bfd_byte *))) swap_abort )
378 #define NO_SIGNED_GET \
379 ((bfd_signed_vma (*) PARAMS ((const bfd_byte *))) swap_abort )
381 const bfd_target sco5_core_vec =
384 bfd_target_unknown_flavour,
385 BFD_ENDIAN_LITTLE, /* target byte order */
386 BFD_ENDIAN_LITTLE, /* target headers byte order */
387 (HAS_RELOC | EXEC_P | /* object flags */
388 HAS_LINENO | HAS_DEBUG |
389 HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
390 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
391 0, /* symbol prefix */
392 ' ', /* ar_pad_char */
393 16, /* ar_max_namelen */
394 NO_GET, NO_SIGNED_GET, NO_PUT, /* 64 bit data */
395 NO_GET, NO_SIGNED_GET, NO_PUT, /* 32 bit data */
396 NO_GET, NO_SIGNED_GET, NO_PUT, /* 16 bit data */
397 NO_GET, NO_SIGNED_GET, NO_PUT, /* 64 bit hdrs */
398 NO_GET, NO_SIGNED_GET, NO_PUT, /* 32 bit hdrs */
399 NO_GET, NO_SIGNED_GET, NO_PUT, /* 16 bit hdrs */
401 { /* bfd_check_format */
402 _bfd_dummy_target, /* unknown format */
403 _bfd_dummy_target, /* object file */
404 _bfd_dummy_target, /* archive */
405 sco5_core_file_p /* a core file */
407 { /* bfd_set_format */
408 bfd_false, bfd_false,
411 { /* bfd_write_contents */
412 bfd_false, bfd_false,
416 BFD_JUMP_TABLE_GENERIC (_bfd_generic),
417 BFD_JUMP_TABLE_COPY (_bfd_generic),
418 BFD_JUMP_TABLE_CORE (sco5),
419 BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
420 BFD_JUMP_TABLE_SYMBOLS (sco5_core),
421 BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
422 BFD_JUMP_TABLE_WRITE (_bfd_generic),
423 BFD_JUMP_TABLE_LINK (_bfd_nolink),
424 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
428 (PTR) 0 /* backend_data */