Because they are supposed to remain const. Signed-off-by: Marc-André Lureau <marcandre.lureau@redhat.com> Message-Id: <20181114132931.22624-1-marcandre.lureau@redhat.com> Signed-off-by: Paolo Bonzini <pbonzini@redhat.com>
184 lines
5.4 KiB
C
184 lines
5.4 KiB
C
/*
|
|
* HPPA interrupt helper routines
|
|
*
|
|
* Copyright (c) 2017 Richard Henderson
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library 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
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "qemu-common.h"
|
|
#include "cpu.h"
|
|
#include "hw/hw.h"
|
|
#include "hw/boards.h"
|
|
#include "migration/cpu.h"
|
|
|
|
#if TARGET_REGISTER_BITS == 64
|
|
#define qemu_put_betr qemu_put_be64
|
|
#define qemu_get_betr qemu_get_be64
|
|
#define VMSTATE_UINTTL_V(_f, _s, _v) \
|
|
VMSTATE_UINT64_V(_f, _s, _v)
|
|
#define VMSTATE_UINTTL_ARRAY_V(_f, _s, _n, _v) \
|
|
VMSTATE_UINT64_ARRAY_V(_f, _s, _n, _v)
|
|
#else
|
|
#define qemu_put_betr qemu_put_be32
|
|
#define qemu_get_betr qemu_get_be32
|
|
#define VMSTATE_UINTTR_V(_f, _s, _v) \
|
|
VMSTATE_UINT32_V(_f, _s, _v)
|
|
#define VMSTATE_UINTTR_ARRAY_V(_f, _s, _n, _v) \
|
|
VMSTATE_UINT32_ARRAY_V(_f, _s, _n, _v)
|
|
#endif
|
|
|
|
#define VMSTATE_UINTTR(_f, _s) \
|
|
VMSTATE_UINTTR_V(_f, _s, 0)
|
|
#define VMSTATE_UINTTR_ARRAY(_f, _s, _n) \
|
|
VMSTATE_UINTTR_ARRAY_V(_f, _s, _n, 0)
|
|
|
|
|
|
static int get_psw(QEMUFile *f, void *opaque, size_t size,
|
|
const VMStateField *field)
|
|
{
|
|
CPUHPPAState *env = opaque;
|
|
cpu_hppa_put_psw(env, qemu_get_betr(f));
|
|
return 0;
|
|
}
|
|
|
|
static int put_psw(QEMUFile *f, void *opaque, size_t size,
|
|
const VMStateField *field, QJSON *vmdesc)
|
|
{
|
|
CPUHPPAState *env = opaque;
|
|
qemu_put_betr(f, cpu_hppa_get_psw(env));
|
|
return 0;
|
|
}
|
|
|
|
static const VMStateInfo vmstate_psw = {
|
|
.name = "psw",
|
|
.get = get_psw,
|
|
.put = put_psw,
|
|
};
|
|
|
|
/* FIXME: Use the PA2.0 format, which is a superset of the PA1.1 format. */
|
|
static int get_tlb(QEMUFile *f, void *opaque, size_t size,
|
|
const VMStateField *field)
|
|
{
|
|
hppa_tlb_entry *ent = opaque;
|
|
uint32_t val;
|
|
|
|
memset(ent, 0, sizeof(*ent));
|
|
|
|
ent->va_b = qemu_get_be64(f);
|
|
ent->pa = qemu_get_betr(f);
|
|
val = qemu_get_be32(f);
|
|
|
|
ent->entry_valid = extract32(val, 0, 1);
|
|
ent->access_id = extract32(val, 1, 18);
|
|
ent->u = extract32(val, 19, 1);
|
|
ent->ar_pl2 = extract32(val, 20, 2);
|
|
ent->ar_pl1 = extract32(val, 22, 2);
|
|
ent->ar_type = extract32(val, 24, 3);
|
|
ent->b = extract32(val, 27, 1);
|
|
ent->d = extract32(val, 28, 1);
|
|
ent->t = extract32(val, 29, 1);
|
|
|
|
ent->va_e = ent->va_b + TARGET_PAGE_SIZE - 1;
|
|
return 0;
|
|
}
|
|
|
|
static int put_tlb(QEMUFile *f, void *opaque, size_t size,
|
|
const VMStateField *field, QJSON *vmdesc)
|
|
{
|
|
hppa_tlb_entry *ent = opaque;
|
|
uint32_t val = 0;
|
|
|
|
if (ent->entry_valid) {
|
|
val = 1;
|
|
val = deposit32(val, 1, 18, ent->access_id);
|
|
val = deposit32(val, 19, 1, ent->u);
|
|
val = deposit32(val, 20, 2, ent->ar_pl2);
|
|
val = deposit32(val, 22, 2, ent->ar_pl1);
|
|
val = deposit32(val, 24, 3, ent->ar_type);
|
|
val = deposit32(val, 27, 1, ent->b);
|
|
val = deposit32(val, 28, 1, ent->d);
|
|
val = deposit32(val, 29, 1, ent->t);
|
|
}
|
|
|
|
qemu_put_be64(f, ent->va_b);
|
|
qemu_put_betr(f, ent->pa);
|
|
qemu_put_be32(f, val);
|
|
return 0;
|
|
}
|
|
|
|
static const VMStateInfo vmstate_tlb = {
|
|
.name = "tlb entry",
|
|
.get = get_tlb,
|
|
.put = put_tlb,
|
|
};
|
|
|
|
static VMStateField vmstate_env_fields[] = {
|
|
VMSTATE_UINTTR_ARRAY(gr, CPUHPPAState, 32),
|
|
VMSTATE_UINT64_ARRAY(fr, CPUHPPAState, 32),
|
|
VMSTATE_UINT64_ARRAY(sr, CPUHPPAState, 8),
|
|
VMSTATE_UINTTR_ARRAY(cr, CPUHPPAState, 32),
|
|
VMSTATE_UINTTR_ARRAY(cr_back, CPUHPPAState, 2),
|
|
VMSTATE_UINTTR_ARRAY(shadow, CPUHPPAState, 7),
|
|
|
|
/* Save the architecture value of the psw, not the internally
|
|
expanded version. Since this architecture value does not
|
|
exist in memory to be stored, this requires a but of hoop
|
|
jumping. We want OFFSET=0 so that we effectively pass ENV
|
|
to the helper functions, and we need to fill in the name by
|
|
hand since there's no field of that name. */
|
|
{
|
|
.name = "psw",
|
|
.version_id = 0,
|
|
.size = sizeof(uint64_t),
|
|
.info = &vmstate_psw,
|
|
.flags = VMS_SINGLE,
|
|
.offset = 0
|
|
},
|
|
|
|
VMSTATE_UINTTR(iaoq_f, CPUHPPAState),
|
|
VMSTATE_UINTTR(iaoq_b, CPUHPPAState),
|
|
VMSTATE_UINT64(iasq_f, CPUHPPAState),
|
|
VMSTATE_UINT64(iasq_b, CPUHPPAState),
|
|
|
|
VMSTATE_UINT32(fr0_shadow, CPUHPPAState),
|
|
|
|
VMSTATE_ARRAY(tlb, CPUHPPAState, ARRAY_SIZE(((CPUHPPAState *)0)->tlb),
|
|
0, vmstate_tlb, hppa_tlb_entry),
|
|
VMSTATE_UINT32(tlb_last, CPUHPPAState),
|
|
|
|
VMSTATE_END_OF_LIST()
|
|
};
|
|
|
|
static const VMStateDescription vmstate_env = {
|
|
.name = "env",
|
|
.version_id = 1,
|
|
.minimum_version_id = 1,
|
|
.fields = vmstate_env_fields,
|
|
};
|
|
|
|
static VMStateField vmstate_cpu_fields[] = {
|
|
VMSTATE_CPU(),
|
|
VMSTATE_STRUCT(env, HPPACPU, 1, vmstate_env, CPUHPPAState),
|
|
VMSTATE_END_OF_LIST()
|
|
};
|
|
|
|
const VMStateDescription vmstate_hppa_cpu = {
|
|
.name = "cpu",
|
|
.version_id = 1,
|
|
.minimum_version_id = 1,
|
|
.fields = vmstate_cpu_fields,
|
|
};
|