#include "bfd.h"
#include "sysdep.h"
#include "libbfd.h"
#if defined (HOST_HPPABSD)
#include "machine/vmparam.h"
#include <sys/param.h>
#include <sys/dir.h>
#include <signal.h>
#include <machine/reg.h>
#include <sys/user.h>
#include <sys/file.h>
static asection *make_bfd_asection
PARAMS ((bfd *, const char *, flagword, bfd_size_type, file_ptr,
unsigned int));
static const bfd_target *hppabsd_core_core_file_p
PARAMS ((bfd *));
static char *hppabsd_core_core_file_failing_command
PARAMS ((bfd *));
static int hppabsd_core_core_file_failing_signal
PARAMS ((bfd *));
static bfd_boolean hppabsd_core_core_file_matches_executable_p
PARAMS ((bfd *, bfd *));
static void swap_abort
PARAMS ((void));
struct hppabsd_core_struct
{
int sig;
char cmd[MAXCOMLEN + 1];
asection *data_section;
asection *stack_section;
asection *reg_section;
};
#define core_hdr(bfd) ((bfd)->tdata.hppabsd_core_data)
#define core_signal(bfd) (core_hdr(bfd)->sig)
#define core_command(bfd) (core_hdr(bfd)->cmd)
#define core_datasec(bfd) (core_hdr(bfd)->data_section)
#define core_stacksec(bfd) (core_hdr(bfd)->stack_section)
#define core_regsec(bfd) (core_hdr(bfd)->reg_section)
static asection *
make_bfd_asection (abfd, name, flags, _raw_size, offset, alignment_power)
bfd *abfd;
const char *name;
flagword flags;
bfd_size_type _raw_size;
file_ptr offset;
unsigned int alignment_power;
{
asection *asect;
asect = bfd_make_section (abfd, name);
if (!asect)
return NULL;
asect->flags = flags;
asect->_raw_size = _raw_size;
asect->filepos = offset;
asect->alignment_power = alignment_power;
return asect;
}
static const bfd_target *
hppabsd_core_core_file_p (abfd)
bfd *abfd;
{
int val;
struct user u;
struct hppabsd_core_struct *coredata;
int clicksz;
val = bfd_bread ((void *) &u, (bfd_size_type) sizeof u, abfd);
if (val != sizeof u)
{
if (bfd_get_error () != bfd_error_system_call)
bfd_set_error (bfd_error_wrong_format);
return NULL;
}
clicksz = u.u_pcb.pcb_pgsz;
if (clicksz < 0x800
|| clicksz != (clicksz & -clicksz))
{
bfd_set_error (bfd_error_wrong_format);
return NULL;
}
{
FILE *stream = bfd_cache_lookup (abfd);
struct stat statbuf;
if (stream == NULL || fstat (fileno (stream), &statbuf) < 0)
{
bfd_set_error (bfd_error_system_call);
return NULL;
}
if (NBPG * (UPAGES + u.u_dsize + u.u_ssize) > statbuf.st_size)
{
bfd_set_error (bfd_error_file_truncated);
return NULL;
}
if (clicksz * (UPAGES + u.u_dsize + u.u_ssize) < statbuf.st_size)
{
bfd_set_error (bfd_error_wrong_format);
return NULL;
}
}
coredata = (struct hppabsd_core_struct *)
bfd_zalloc (abfd, (bfd_size_type) sizeof (struct hppabsd_core_struct));
if (!coredata)
return NULL;
abfd->tdata.hppabsd_core_data = coredata;
core_stacksec (abfd) = make_bfd_asection (abfd, ".stack",
SEC_ALLOC + SEC_HAS_CONTENTS,
clicksz * u.u_ssize,
NBPG * (USIZE + KSTAKSIZE)
+ clicksz * u.u_dsize, 2);
if (core_stacksec (abfd) == NULL)
goto fail;
core_stacksec (abfd)->vma = USRSTACK;
core_datasec (abfd) = make_bfd_asection (abfd, ".data",
SEC_ALLOC + SEC_LOAD
+ SEC_HAS_CONTENTS,
clicksz * u.u_dsize,
NBPG * (USIZE + KSTAKSIZE), 2);
if (core_datasec (abfd) == NULL)
goto fail;
core_datasec (abfd)->vma = UDATASEG;
core_regsec (abfd) = make_bfd_asection (abfd, ".reg",
SEC_HAS_CONTENTS,
KSTAKSIZE * NBPG,
NBPG * USIZE, 2);
if (core_regsec (abfd) == NULL)
goto fail;
core_regsec (abfd)->vma = 0;
strncpy (core_command (abfd), u.u_comm, MAXCOMLEN + 1);
core_signal (abfd) = u.u_code;
return abfd->xvec;
fail:
bfd_release (abfd, abfd->tdata.any);
abfd->tdata.any = NULL;
bfd_section_list_clear (abfd);
return NULL;
}
static char *
hppabsd_core_core_file_failing_command (abfd)
bfd *abfd;
{
return core_command (abfd);
}
static int
hppabsd_core_core_file_failing_signal (abfd)
bfd *abfd;
{
return core_signal (abfd);
}
static bfd_boolean
hppabsd_core_core_file_matches_executable_p (core_bfd, exec_bfd)
bfd *core_bfd, *exec_bfd;
{
return TRUE;
}
static void
swap_abort ()
{
abort ();
}
#define NO_GET ((bfd_vma (*) PARAMS (( const bfd_byte *))) swap_abort )
#define NO_PUT ((void (*) PARAMS ((bfd_vma, bfd_byte *))) swap_abort )
#define NO_SIGNED_GET \
((bfd_signed_vma (*) PARAMS ((const bfd_byte *))) swap_abort )
const bfd_target hppabsd_core_vec =
{
"hppabsd-core",
bfd_target_unknown_flavour,
BFD_ENDIAN_BIG,
BFD_ENDIAN_BIG,
(HAS_RELOC | EXEC_P |
HAS_LINENO | HAS_DEBUG |
HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
(SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC),
0,
' ',
16,
NO_GET, NO_SIGNED_GET, NO_PUT,
NO_GET, NO_SIGNED_GET, NO_PUT,
NO_GET, NO_SIGNED_GET, NO_PUT,
NO_GET, NO_SIGNED_GET, NO_PUT,
NO_GET, NO_SIGNED_GET, NO_PUT,
NO_GET, NO_SIGNED_GET, NO_PUT,
{
_bfd_dummy_target,
_bfd_dummy_target,
_bfd_dummy_target,
hppabsd_core_core_file_p
},
{
bfd_false, bfd_false,
bfd_false, bfd_false
},
{
bfd_false, bfd_false,
bfd_false, bfd_false
},
BFD_JUMP_TABLE_GENERIC (_bfd_generic),
BFD_JUMP_TABLE_COPY (_bfd_generic),
BFD_JUMP_TABLE_CORE (hppabsd_core),
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
};
#endif