summaryrefslogtreecommitdiffstats
path: root/binutils-2.17/bfd/sco5-core.c
diff options
context:
space:
mode:
Diffstat (limited to 'binutils-2.17/bfd/sco5-core.c')
-rw-r--r--binutils-2.17/bfd/sco5-core.c409
1 files changed, 0 insertions, 409 deletions
diff --git a/binutils-2.17/bfd/sco5-core.c b/binutils-2.17/bfd/sco5-core.c
deleted file mode 100644
index 9a06b883..00000000
--- a/binutils-2.17/bfd/sco5-core.c
+++ /dev/null
@@ -1,409 +0,0 @@
-/* BFD back end for SCO5 core files (U-area and raw sections)
- Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
- Free Software Foundation, Inc.
- Written by Jouke Numan <jnuman@hiscom.nl>
-
-This file is part of BFD, the Binary File Descriptor library.
-
-This program is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
-
-#include "bfd.h"
-#include "sysdep.h"
-#include "libbfd.h"
-#include "libaout.h" /* BFD a.out internal data structures */
-
-#include <stdio.h>
-#include <sys/types.h>
-#include <sys/param.h>
-#include <sys/dir.h>
-#include <signal.h>
-
-#include <sys/user.h> /* After a.out.h */
-#ifdef SCO5_CORE
-#include <sys/paccess.h>
-#include <sys/region.h>
-#endif
-
-struct sco5_core_struct
-{
- struct user u;
-};
-
-/* forward declarations */
-
-static asection *make_bfd_asection
- PARAMS ((bfd *, const char *, flagword, bfd_size_type, bfd_vma, file_ptr));
-static struct user *read_uarea PARAMS ((bfd *, int));
-const bfd_target *sco5_core_file_p PARAMS ((bfd *abfd));
-char *sco5_core_file_failing_command PARAMS ((bfd *abfd));
-int sco5_core_file_failing_signal PARAMS ((bfd *abfd));
-#define sco5_core_file_matches_executable_p generic_core_file_matches_executable_p
-static void swap_abort PARAMS ((void));
-
-static asection *
-make_bfd_asection (abfd, name, flags, size, vma, filepos)
- bfd *abfd;
- const char *name;
- flagword flags;
- bfd_size_type size;
- bfd_vma vma;
- file_ptr filepos;
-{
- asection *asect;
-
- asect = bfd_make_section_anyway (abfd, name);
- if (!asect)
- return NULL;
- asect->flags = flags;
- asect->size = size;
- asect->vma = vma;
- asect->filepos = filepos;
- asect->alignment_power = 2;
-
- return asect;
-}
-
-static struct user *
-read_uarea(abfd, filepos)
- bfd *abfd;
- int filepos;
-
-{
- struct sco5_core_struct *rawptr;
- bfd_size_type amt = sizeof (struct sco5_core_struct);
-
- rawptr = (struct sco5_core_struct *) bfd_zmalloc (amt);
- if (rawptr == NULL)
- return NULL;
-
- abfd->tdata.sco5_core_data = rawptr;
-
- if (bfd_seek (abfd, (file_ptr) filepos, SEEK_SET) != 0
- || bfd_bread ((void *) &rawptr->u, (bfd_size_type) sizeof rawptr->u,
- abfd) != sizeof rawptr->u)
- {
- bfd_set_error (bfd_error_wrong_format);
- return NULL;
- }
-
- /* Sanity check perhaps??? */
- if (rawptr->u.u_dsize > 0x1000000) /* Remember, it's in pages... */
- {
- bfd_set_error (bfd_error_wrong_format);
- return NULL;
- }
- if (rawptr->u.u_ssize > 0x1000000)
- {
- bfd_set_error (bfd_error_wrong_format);
- return NULL;
- }
- return &rawptr->u;
-}
-
-const bfd_target *
-sco5_core_file_p (abfd)
- bfd *abfd;
-{
- int coffset_siz, val, nsecs, cheadoffs;
- int coresize;
- struct user *u;
- struct coreoffsets coffsets;
- struct coresecthead chead;
- char *secname;
- flagword flags;
-
- /* Read coreoffsets region at end of core (see core(FP)). */
-
- {
- struct stat statbuf;
-
- if (bfd_stat (abfd, &statbuf) < 0)
- return NULL;
-
- coresize = statbuf.st_size;
- }
- /* Last long in core is sizeof struct coreoffsets, read it */
- if ((bfd_seek (abfd, (file_ptr) (coresize - sizeof coffset_siz),
- SEEK_SET) != 0)
- || bfd_bread ((void *) &coffset_siz, (bfd_size_type) sizeof coffset_siz,
- abfd) != sizeof coffset_siz)
- {
- bfd_set_error (bfd_error_wrong_format);
- return NULL;
- }
-
- /* Use it to seek start of coreoffsets region, read it and determine
- validity */
- if ((bfd_seek (abfd, (file_ptr) (coresize - coffset_siz), SEEK_SET) != 0)
- || (bfd_bread ((void *) &coffsets, (bfd_size_type) sizeof coffsets, abfd)
- != sizeof coffsets)
- || ((coffsets.u_info != 1) && (coffsets.u_info != C_VERSION)))
- {
- bfd_set_error (bfd_error_wrong_format);
- return NULL;
- }
-
- if (coffsets.u_info == 1)
- {
- /* Old version, no section heads, read info from user struct */
-
- u = read_uarea (abfd, coffsets.u_user);
- if (! u)
- goto fail;
-
- if (!make_bfd_asection (abfd, ".reg", SEC_HAS_CONTENTS,
- (bfd_size_type) coffsets.u_usize,
- 0 - (bfd_vma) u->u_ar0,
- (file_ptr) coffsets.u_user))
- goto fail;
-
- if (!make_bfd_asection (abfd, ".data",
- SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS,
- ((bfd_size_type) u->u_exdata.ux_dsize
- + u->u_exdata.ux_bsize),
- (bfd_vma) u->u_exdata.ux_datorg,
- (file_ptr) coffsets.u_data))
- goto fail;
-
- if (!make_bfd_asection (abfd, ".stack",
- SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS,
- (bfd_size_type) u->u_ssize * NBPC,
- (bfd_vma) u->u_sub,
- (file_ptr) coffsets.u_stack))
- goto fail;
-
- return abfd->xvec; /* Done for version 1 */
- }
-
- /* Immediately before coreoffsets region is a long with offset in core
- to first coresecthead (CORES_OFFSETS), the long before this is the
- number of section heads in the list. Read both longs and read the
- coresecthead and check its validity */
-
- if ((bfd_seek (abfd,
- (file_ptr) (coresize - coffset_siz - 2 * sizeof coffset_siz),
- SEEK_SET) != 0)
- || (bfd_bread ((void *) &nsecs, (bfd_size_type) sizeof nsecs, abfd)
- != sizeof nsecs)
- || (bfd_bread ((void *) &cheadoffs, (bfd_size_type) sizeof cheadoffs,
- abfd) != sizeof cheadoffs)
- || (bfd_seek (abfd, (file_ptr) cheadoffs, SEEK_SET) != 0)
- || (bfd_bread ((void *) &chead, (bfd_size_type) sizeof chead, abfd)
- != sizeof chead)
- || (chead.cs_stype != CORES_OFFSETS)
- || (chead.cs_x.csx_magic != COREMAGIC_NUMBER))
- {
- bfd_set_error (bfd_error_wrong_format);
- goto fail;
- }
-
- /* OK, we believe you. You're a core file (sure, sure). */
-
- /* Now loop over all regions and map them */
- nsecs--; /* We've seen CORES_OFFSETS already */
- for (; nsecs; nsecs--)
- {
- if ((bfd_seek (abfd, (file_ptr) chead.cs_hseek, SEEK_SET) != 0)
- || (bfd_bread ((void *) &chead, (bfd_size_type) sizeof chead, abfd)
- != sizeof chead))
- {
- bfd_set_error (bfd_error_wrong_format);
- goto fail;
- }
-
- switch (chead.cs_stype)
- {
- case CORES_MAGIC: /* Core header, check magic */
- if (chead.cs_x.csx_magic != COREMAGIC_NUMBER)
- {
- bfd_set_error (bfd_error_wrong_format);
- goto fail;
- }
- secname = NULL;
- nsecs++; /* MAGIC not in section cnt!*/
- break;
- case CORES_UAREA: /* U-area, read in tdata */
- u = read_uarea (abfd, chead.cs_sseek);
- if (! u)
- goto fail;
-
- /* This is tricky. As the "register section", we give them
- the entire upage and stack. u.u_ar0 points to where
- "register 0" is stored. There are two tricks with this,
- though. One is that the rest of the registers might be
- at positive or negative (or both) displacements from
- *u_ar0. The other is that u_ar0 is sometimes an absolute
- address in kernel memory, and on other systems it is an
- offset from the beginning of the `struct user'.
-
- As a practical matter, we don't know where the registers
- actually are, so we have to pass the whole area to GDB.
- We encode the value of u_ar0 by setting the .regs section
- up so that its virtual memory address 0 is at the place
- pointed to by u_ar0 (by setting the vma of the start of
- the section to -u_ar0). GDB uses this info to locate the
- regs, using minor trickery to get around the
- offset-or-absolute-addr problem. */
-
- chead.cs_vaddr = 0 - (bfd_vma) u->u_ar0;
-
- secname = ".reg";
- flags = SEC_HAS_CONTENTS;
-
- break;
- case CORES_PREGION: /* A program region, map it */
- switch (chead.cs_x.csx_preg.csxp_rtyp)
- {
- case PT_DATA:
- secname = ".data"; /* Data region. */
- break;
- case PT_STACK:
- secname = ".stack"; /* Stack region. */
- break;
- case PT_SHMEM:
- secname = ".shmem"; /* Shared memory */
- break;
- case PT_LIBDAT:
- secname = ".libdat"; /* Shared library data */
- break;
- case PT_V86:
- secname = ".virt86"; /* Virtual 8086 mode */
- break;
- case PT_SHFIL:
- secname = ".mmfile"; /* Memory mapped file */
- break;
- case PT_XDATA0:
- secname = ".Xdat0"; /* XENIX data region, virtual 0 */
- break;
- default:
- secname = "";
- }
- flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
- break;
- case CORES_PROC: /* struct proc */
- case CORES_ITIMER: /* interval timers */
- case CORES_SCOUTSNAME: /* struct scoutsname */
- secname = NULL; /* Ignore these */
- break;
- default:
- (*_bfd_error_handler) ("Unhandled SCO core file section type %d\n",
- chead.cs_stype);
- continue;
- }
-
- if (secname
- && !make_bfd_asection (abfd, secname, flags,
- (bfd_size_type) chead.cs_vsize,
- (bfd_vma) chead.cs_vaddr,
- (file_ptr) chead.cs_sseek))
- goto fail;
-
- }
-
- return abfd->xvec;
-
- fail:
- if (abfd->tdata.any)
- {
- bfd_release (abfd, abfd->tdata.any);
- abfd->tdata.any = NULL;
- }
- bfd_section_list_clear (abfd);
- return NULL;
-}
-
-char *
-sco5_core_file_failing_command (abfd)
- bfd *abfd;
-{
- char *com = abfd->tdata.sco5_core_data->u.u_comm;
- if (*com)
- return com;
- else
- return NULL;
-}
-
-int
-sco5_core_file_failing_signal (ignore_abfd)
- bfd *ignore_abfd;
-{
- return ((ignore_abfd->tdata.sco5_core_data->u.u_sysabort != 0)
- ? ignore_abfd->tdata.sco5_core_data->u.u_sysabort
- : -1);
-}
-
-/* If somebody calls any byte-swapping routines, shoot them. */
-static void
-swap_abort ()
-{
- abort (); /* This way doesn't require any declaration for ANSI to fuck up */
-}
-
-#define NO_GET ((bfd_vma (*) (const void *)) swap_abort)
-#define NO_PUT ((void (*) (bfd_vma, void *)) swap_abort)
-#define NO_GETS ((bfd_signed_vma (*) (const void *)) swap_abort)
-#define NO_GET64 ((bfd_uint64_t (*) (const void *)) swap_abort)
-#define NO_PUT64 ((void (*) (bfd_uint64_t, void *)) swap_abort)
-#define NO_GETS64 ((bfd_int64_t (*) (const void *)) swap_abort)
-
-const bfd_target sco5_core_vec =
- {
- "sco5-core",
- bfd_target_unknown_flavour,
- BFD_ENDIAN_LITTLE, /* target byte order */
- BFD_ENDIAN_LITTLE, /* target headers byte order */
- (HAS_RELOC | EXEC_P | /* object flags */
- HAS_LINENO | HAS_DEBUG |
- HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
- (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
- 0, /* symbol prefix */
- ' ', /* ar_pad_char */
- 16, /* ar_max_namelen */
- NO_GET64, NO_GETS64, NO_PUT64, /* 64 bit data */
- NO_GET, NO_GETS, NO_PUT, /* 32 bit data */
- NO_GET, NO_GETS, NO_PUT, /* 16 bit data */
- NO_GET64, NO_GETS64, NO_PUT64, /* 64 bit hdrs */
- NO_GET, NO_GETS, NO_PUT, /* 32 bit hdrs */
- NO_GET, NO_GETS, NO_PUT, /* 16 bit hdrs */
-
- { /* bfd_check_format */
- _bfd_dummy_target, /* unknown format */
- _bfd_dummy_target, /* object file */
- _bfd_dummy_target, /* archive */
- sco5_core_file_p /* a core file */
- },
- { /* bfd_set_format */
- bfd_false, bfd_false,
- bfd_false, bfd_false
- },
- { /* bfd_write_contents */
- bfd_false, bfd_false,
- bfd_false, bfd_false
- },
-
- BFD_JUMP_TABLE_GENERIC (_bfd_generic),
- BFD_JUMP_TABLE_COPY (_bfd_generic),
- BFD_JUMP_TABLE_CORE (sco5),
- BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
- BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
- BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
- BFD_JUMP_TABLE_WRITE (_bfd_generic),
- BFD_JUMP_TABLE_LINK (_bfd_nolink),
- BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
-
- NULL,
-
- (PTR) 0 /* backend_data */
- };
generated by cgit v1.2.3 (git 2.25.1) at 2024-04-25 13:58:02 +0000