312 lines
8.1 KiB
C
312 lines
8.1 KiB
C
/*
|
|
* writing ELF notes for ppc{64,} arch
|
|
*
|
|
*
|
|
* Copyright IBM, Corp. 2013
|
|
*
|
|
* Authors:
|
|
* Aneesh Kumar K.V <aneesh.kumar@linux.vnet.ibm.com>
|
|
*
|
|
* This work is licensed under the terms of the GNU GPL, version 2. See
|
|
* the COPYING file in the top-level directory.
|
|
*
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "cpu.h"
|
|
#include "elf.h"
|
|
#include "sysemu/dump.h"
|
|
#include "sysemu/kvm.h"
|
|
#include "exec/helper-proto.h"
|
|
|
|
#ifdef TARGET_PPC64
|
|
#define ELFCLASS ELFCLASS64
|
|
#define cpu_to_dump_reg cpu_to_dump64
|
|
typedef uint64_t reg_t;
|
|
typedef Elf64_Nhdr Elf_Nhdr;
|
|
#else
|
|
#define ELFCLASS ELFCLASS32
|
|
#define cpu_to_dump_reg cpu_to_dump32
|
|
typedef uint32_t reg_t;
|
|
typedef Elf32_Nhdr Elf_Nhdr;
|
|
#endif /* TARGET_PPC64 */
|
|
|
|
struct PPCUserRegStruct {
|
|
reg_t gpr[32];
|
|
reg_t nip;
|
|
reg_t msr;
|
|
reg_t orig_gpr3;
|
|
reg_t ctr;
|
|
reg_t link;
|
|
reg_t xer;
|
|
reg_t ccr;
|
|
reg_t softe;
|
|
reg_t trap;
|
|
reg_t dar;
|
|
reg_t dsisr;
|
|
reg_t result;
|
|
} QEMU_PACKED;
|
|
|
|
struct PPCElfPrstatus {
|
|
char pad1[112];
|
|
struct PPCUserRegStruct pr_reg;
|
|
char pad2[40];
|
|
} QEMU_PACKED;
|
|
|
|
|
|
struct PPCElfFpregset {
|
|
uint64_t fpr[32];
|
|
reg_t fpscr;
|
|
} QEMU_PACKED;
|
|
|
|
|
|
struct PPCElfVmxregset {
|
|
ppc_avr_t avr[32];
|
|
ppc_avr_t vscr;
|
|
union {
|
|
ppc_avr_t unused;
|
|
uint32_t value;
|
|
} vrsave;
|
|
} QEMU_PACKED;
|
|
|
|
struct PPCElfVsxregset {
|
|
uint64_t vsr[32];
|
|
} QEMU_PACKED;
|
|
|
|
struct PPCElfSperegset {
|
|
uint32_t evr[32];
|
|
uint64_t spe_acc;
|
|
uint32_t spe_fscr;
|
|
} QEMU_PACKED;
|
|
|
|
typedef struct noteStruct {
|
|
Elf_Nhdr hdr;
|
|
char name[5];
|
|
char pad3[3];
|
|
union {
|
|
struct PPCElfPrstatus prstatus;
|
|
struct PPCElfFpregset fpregset;
|
|
struct PPCElfVmxregset vmxregset;
|
|
struct PPCElfVsxregset vsxregset;
|
|
struct PPCElfSperegset speregset;
|
|
} contents;
|
|
} QEMU_PACKED Note;
|
|
|
|
typedef struct NoteFuncArg {
|
|
Note note;
|
|
DumpState *state;
|
|
} NoteFuncArg;
|
|
|
|
static void ppc_write_elf_prstatus(NoteFuncArg *arg, PowerPCCPU *cpu)
|
|
{
|
|
int i;
|
|
reg_t cr;
|
|
struct PPCElfPrstatus *prstatus;
|
|
struct PPCUserRegStruct *reg;
|
|
Note *note = &arg->note;
|
|
DumpState *s = arg->state;
|
|
|
|
note->hdr.n_type = cpu_to_dump32(s, NT_PRSTATUS);
|
|
|
|
prstatus = ¬e->contents.prstatus;
|
|
memset(prstatus, 0, sizeof(*prstatus));
|
|
reg = &prstatus->pr_reg;
|
|
|
|
for (i = 0; i < 32; i++) {
|
|
reg->gpr[i] = cpu_to_dump_reg(s, cpu->env.gpr[i]);
|
|
}
|
|
reg->nip = cpu_to_dump_reg(s, cpu->env.nip);
|
|
reg->msr = cpu_to_dump_reg(s, cpu->env.msr);
|
|
reg->ctr = cpu_to_dump_reg(s, cpu->env.ctr);
|
|
reg->link = cpu_to_dump_reg(s, cpu->env.lr);
|
|
reg->xer = cpu_to_dump_reg(s, cpu_read_xer(&cpu->env));
|
|
|
|
cr = 0;
|
|
for (i = 0; i < 8; i++) {
|
|
cr |= (cpu->env.crf[i] & 15) << (4 * (7 - i));
|
|
}
|
|
reg->ccr = cpu_to_dump_reg(s, cr);
|
|
}
|
|
|
|
static void ppc_write_elf_fpregset(NoteFuncArg *arg, PowerPCCPU *cpu)
|
|
{
|
|
int i;
|
|
struct PPCElfFpregset *fpregset;
|
|
Note *note = &arg->note;
|
|
DumpState *s = arg->state;
|
|
|
|
note->hdr.n_type = cpu_to_dump32(s, NT_PRFPREG);
|
|
|
|
fpregset = ¬e->contents.fpregset;
|
|
memset(fpregset, 0, sizeof(*fpregset));
|
|
|
|
for (i = 0; i < 32; i++) {
|
|
uint64_t *fpr = cpu_fpr_ptr(&cpu->env, i);
|
|
fpregset->fpr[i] = cpu_to_dump64(s, *fpr);
|
|
}
|
|
fpregset->fpscr = cpu_to_dump_reg(s, cpu->env.fpscr);
|
|
}
|
|
|
|
static void ppc_write_elf_vmxregset(NoteFuncArg *arg, PowerPCCPU *cpu)
|
|
{
|
|
int i;
|
|
struct PPCElfVmxregset *vmxregset;
|
|
Note *note = &arg->note;
|
|
DumpState *s = arg->state;
|
|
|
|
note->hdr.n_type = cpu_to_dump32(s, NT_PPC_VMX);
|
|
vmxregset = ¬e->contents.vmxregset;
|
|
memset(vmxregset, 0, sizeof(*vmxregset));
|
|
|
|
for (i = 0; i < 32; i++) {
|
|
bool needs_byteswap;
|
|
ppc_avr_t *avr = cpu_avr_ptr(&cpu->env, i);
|
|
|
|
#ifdef HOST_WORDS_BIGENDIAN
|
|
needs_byteswap = s->dump_info.d_endian == ELFDATA2LSB;
|
|
#else
|
|
needs_byteswap = s->dump_info.d_endian == ELFDATA2MSB;
|
|
#endif
|
|
|
|
if (needs_byteswap) {
|
|
vmxregset->avr[i].u64[0] = bswap64(avr->u64[1]);
|
|
vmxregset->avr[i].u64[1] = bswap64(avr->u64[0]);
|
|
} else {
|
|
vmxregset->avr[i].u64[0] = avr->u64[0];
|
|
vmxregset->avr[i].u64[1] = avr->u64[1];
|
|
}
|
|
}
|
|
vmxregset->vscr.u32[3] = cpu_to_dump32(s, helper_mfvscr(&cpu->env));
|
|
}
|
|
|
|
static void ppc_write_elf_vsxregset(NoteFuncArg *arg, PowerPCCPU *cpu)
|
|
{
|
|
int i;
|
|
struct PPCElfVsxregset *vsxregset;
|
|
Note *note = &arg->note;
|
|
DumpState *s = arg->state;
|
|
|
|
note->hdr.n_type = cpu_to_dump32(s, NT_PPC_VSX);
|
|
vsxregset = ¬e->contents.vsxregset;
|
|
memset(vsxregset, 0, sizeof(*vsxregset));
|
|
|
|
for (i = 0; i < 32; i++) {
|
|
uint64_t *vsrl = cpu_vsrl_ptr(&cpu->env, i);
|
|
vsxregset->vsr[i] = cpu_to_dump64(s, *vsrl);
|
|
}
|
|
}
|
|
|
|
static void ppc_write_elf_speregset(NoteFuncArg *arg, PowerPCCPU *cpu)
|
|
{
|
|
struct PPCElfSperegset *speregset;
|
|
Note *note = &arg->note;
|
|
DumpState *s = arg->state;
|
|
|
|
note->hdr.n_type = cpu_to_dump32(s, NT_PPC_SPE);
|
|
speregset = ¬e->contents.speregset;
|
|
memset(speregset, 0, sizeof(*speregset));
|
|
|
|
speregset->spe_acc = cpu_to_dump64(s, cpu->env.spe_acc);
|
|
speregset->spe_fscr = cpu_to_dump32(s, cpu->env.spe_fscr);
|
|
}
|
|
|
|
static const struct NoteFuncDescStruct {
|
|
int contents_size;
|
|
void (*note_contents_func)(NoteFuncArg *arg, PowerPCCPU *cpu);
|
|
} note_func[] = {
|
|
{sizeof_field(Note, contents.prstatus), ppc_write_elf_prstatus},
|
|
{sizeof_field(Note, contents.fpregset), ppc_write_elf_fpregset},
|
|
{sizeof_field(Note, contents.vmxregset), ppc_write_elf_vmxregset},
|
|
{sizeof_field(Note, contents.vsxregset), ppc_write_elf_vsxregset},
|
|
{sizeof_field(Note, contents.speregset), ppc_write_elf_speregset},
|
|
{ 0, NULL}
|
|
};
|
|
|
|
typedef struct NoteFuncDescStruct NoteFuncDesc;
|
|
|
|
int cpu_get_dump_info(ArchDumpInfo *info,
|
|
const struct GuestPhysBlockList *guest_phys_blocks)
|
|
{
|
|
PowerPCCPU *cpu;
|
|
PowerPCCPUClass *pcc;
|
|
|
|
if (first_cpu == NULL) {
|
|
return -1;
|
|
}
|
|
|
|
cpu = POWERPC_CPU(first_cpu);
|
|
pcc = POWERPC_CPU_GET_CLASS(cpu);
|
|
|
|
info->d_machine = PPC_ELF_MACHINE;
|
|
info->d_class = ELFCLASS;
|
|
|
|
if ((*pcc->interrupts_big_endian)(cpu)) {
|
|
info->d_endian = ELFDATA2MSB;
|
|
} else {
|
|
info->d_endian = ELFDATA2LSB;
|
|
}
|
|
/* 64KB is the max page size for pseries kernel */
|
|
if (strncmp(object_get_typename(qdev_get_machine()),
|
|
"pseries-", 8) == 0) {
|
|
info->page_size = (1U << 16);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
ssize_t cpu_get_note_size(int class, int machine, int nr_cpus)
|
|
{
|
|
int name_size = 8; /* "CORE" or "QEMU" rounded */
|
|
size_t elf_note_size = 0;
|
|
int note_head_size;
|
|
const NoteFuncDesc *nf;
|
|
|
|
note_head_size = sizeof(Elf_Nhdr);
|
|
for (nf = note_func; nf->note_contents_func; nf++) {
|
|
elf_note_size = elf_note_size + note_head_size + name_size +
|
|
nf->contents_size;
|
|
}
|
|
|
|
return (elf_note_size) * nr_cpus;
|
|
}
|
|
|
|
static int ppc_write_all_elf_notes(const char *note_name,
|
|
WriteCoreDumpFunction f,
|
|
PowerPCCPU *cpu, int id,
|
|
void *opaque)
|
|
{
|
|
NoteFuncArg arg = { .state = opaque };
|
|
int ret = -1;
|
|
int note_size;
|
|
const NoteFuncDesc *nf;
|
|
|
|
for (nf = note_func; nf->note_contents_func; nf++) {
|
|
arg.note.hdr.n_namesz = cpu_to_dump32(opaque, sizeof(arg.note.name));
|
|
arg.note.hdr.n_descsz = cpu_to_dump32(opaque, nf->contents_size);
|
|
strncpy(arg.note.name, note_name, sizeof(arg.note.name));
|
|
|
|
(*nf->note_contents_func)(&arg, cpu);
|
|
|
|
note_size =
|
|
sizeof(arg.note) - sizeof(arg.note.contents) + nf->contents_size;
|
|
ret = f(&arg.note, note_size, opaque);
|
|
if (ret < 0) {
|
|
return -1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int ppc64_cpu_write_elf64_note(WriteCoreDumpFunction f, CPUState *cs,
|
|
int cpuid, void *opaque)
|
|
{
|
|
PowerPCCPU *cpu = POWERPC_CPU(cs);
|
|
return ppc_write_all_elf_notes("CORE", f, cpu, cpuid, opaque);
|
|
}
|
|
|
|
int ppc32_cpu_write_elf32_note(WriteCoreDumpFunction f, CPUState *cs,
|
|
int cpuid, void *opaque)
|
|
{
|
|
PowerPCCPU *cpu = POWERPC_CPU(cs);
|
|
return ppc_write_all_elf_notes("CORE", f, cpu, cpuid, opaque);
|
|
}
|