#define _SYSCALL32
#include "defs.h"
#if defined (__sparcv9)
# include <v9/sys/privregs.h>
#endif
#include <time.h>
#include <sys/types.h>
#include <sys/regset.h>
#include <sys/procfs.h>
#include <fcntl.h>
#include <errno.h>
#include "gdb_string.h"
#include "regcache.h"
#include "inferior.h"
#include "target.h"
#include "command.h"
#include "gdbcore.h"
#include "gregset.h"
static void fetch_core_registers (char *, unsigned, int, CORE_ADDR);
static void
fetch_core_registers (char *core_reg_sect, unsigned core_reg_size, int which,
CORE_ADDR reg_addr)
{
int i;
if (which == 0)
{
prgregset_t prgregset;
if (core_reg_size == sizeof (prgregset_t))
{
memcpy ((char *) &prgregset, core_reg_sect, sizeof (prgregset));
supply_gregset (&prgregset);
}
#if defined (HAVE_PRGREGSET32_T)
else if (core_reg_size == sizeof (prgregset32_t))
{
prgreg32_t *core_gregs;
core_gregs = (prgreg32_t *) core_reg_sect;
for (i = 0; i < NPRGREG; i++)
prgregset[i] = core_gregs[i];
supply_gregset (&prgregset);
}
#endif
else if (core_reg_size == sizeof (struct regs))
{
struct regs *gregs = (struct regs *) core_reg_sect;
*(int *) ®isters[REGISTER_BYTE (0)] = 0;
memcpy (®isters[REGISTER_BYTE (G1_REGNUM)], &gregs->r_g1,
15 * REGISTER_RAW_SIZE (G1_REGNUM));
*(int *) ®isters[REGISTER_BYTE (PS_REGNUM)] = gregs->r_ps;
*(int *) ®isters[REGISTER_BYTE (PC_REGNUM)] = gregs->r_pc;
*(int *) ®isters[REGISTER_BYTE (NPC_REGNUM)] = gregs->r_npc;
*(int *) ®isters[REGISTER_BYTE (Y_REGNUM)] = gregs->r_y;
{
int sp;
sp = *(int *) ®isters[REGISTER_BYTE (SP_REGNUM)];
if (0 != target_read_memory (sp,
®isters[REGISTER_BYTE (L0_REGNUM)],
16 * REGISTER_RAW_SIZE (L0_REGNUM)))
{
warning ("couldn't read input and local registers from core file\n");
}
}
}
else
{
warning ("wrong size gregset struct in core file");
}
}
else if (which == 2)
{
prfpregset_t prfpregset;
if (core_reg_size == sizeof (prfpregset_t))
{
memcpy ((char *) &prfpregset, core_reg_sect, sizeof (prfpregset));
supply_fpregset (&prfpregset);
}
#if defined (HAVE_PRFPREGSET32_T)
else if (core_reg_size == sizeof (prfpregset32_t))
{
prfpregset32_t *core_fpregset;
core_fpregset = (prfpregset32_t *) core_reg_sect;
for (i = 0; i < 16; i++)
prfpregset.pr_fr.pr_dregs[i] = core_fpregset->pr_fr.pr_dregs[i];
while (i < 32)
prfpregset.pr_fr.pr_dregs[i++] = 0;
prfpregset.pr_fsr = core_fpregset->pr_fsr;
prfpregset.pr_qcnt = core_fpregset->pr_qcnt;
prfpregset.pr_q_entrysize = core_fpregset->pr_q_entrysize;
prfpregset.pr_en = core_fpregset->pr_en;
supply_fpregset (&prfpregset);
}
#endif
else if (core_reg_size >= sizeof (struct fpu))
{
struct fpu *fpuregs = (struct fpu *) core_reg_sect;
memcpy (®isters[REGISTER_BYTE (FP0_REGNUM)], &fpuregs->fpu_fr,
sizeof (fpuregs->fpu_fr));
memcpy (®isters[REGISTER_BYTE (FPS_REGNUM)], &fpuregs->fpu_fsr,
sizeof (FPU_FSR_TYPE));
}
else
{
warning ("wrong size fpregset struct in core file");
}
}
}
static struct core_fns solaris_core_fns =
{
bfd_target_elf_flavour,
default_check_format,
default_core_sniffer,
fetch_core_registers,
NULL
};
void
_initialize_core_solaris (void)
{
add_core_fns (&solaris_core_fns);
}