s390x/tcg: introduce and use s390_program_interrupt()
Allows to easily convert more callers of program_interrupt() and to easily introduce new exceptions without forgetting about the cpu state reset. Use s390_program_interrupt() in places where we already had the same pattern. We will later get rid of program_interrupt(). RA != 0 checks are already done behind the scenes. Reviewed-by: Richard Henderson <richard.henderson@linaro.org> Reviewed-by: Thomas Huth <thuth@redhat.com> Signed-off-by: David Hildenbrand <david@redhat.com> Message-Id: <20171130162744.25442-2-david@redhat.com> Signed-off-by: Cornelia Huck <cohuck@redhat.com>
This commit is contained in:
parent
9879003bb8
commit
8d2f850a5a
@ -720,6 +720,8 @@ void s390_io_interrupt(uint16_t subchannel_id, uint16_t subchannel_nr,
|
||||
/* automatically detect the instruction length */
|
||||
#define ILEN_AUTO 0xff
|
||||
void program_interrupt(CPUS390XState *env, uint32_t code, int ilen);
|
||||
void s390_program_interrupt(CPUS390XState *env, uint32_t code, int ilen,
|
||||
uintptr_t ra);
|
||||
/* service interrupts are floating therefore we must not pass an cpustate */
|
||||
void s390_sclp_extint(uint32_t parm);
|
||||
|
||||
|
@ -23,7 +23,6 @@ uint32_t HELPER(msa)(CPUS390XState *env, uint32_t r1, uint32_t r2, uint32_t r3,
|
||||
const uintptr_t ra = GETPC();
|
||||
const uint8_t mod = env->regs[0] & 0x80ULL;
|
||||
const uint8_t fc = env->regs[0] & 0x7fULL;
|
||||
CPUState *cs = CPU(s390_env_get_cpu(env));
|
||||
uint8_t subfunc[16] = { 0 };
|
||||
uint64_t param_addr;
|
||||
int i;
|
||||
@ -35,8 +34,7 @@ uint32_t HELPER(msa)(CPUS390XState *env, uint32_t r1, uint32_t r2, uint32_t r3,
|
||||
case S390_FEAT_TYPE_PCKMO:
|
||||
case S390_FEAT_TYPE_PCC:
|
||||
if (mod) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 4);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 4, ra);
|
||||
return 0;
|
||||
}
|
||||
break;
|
||||
@ -44,8 +42,7 @@ uint32_t HELPER(msa)(CPUS390XState *env, uint32_t r1, uint32_t r2, uint32_t r3,
|
||||
|
||||
s390_get_feat_block(type, subfunc);
|
||||
if (!test_be_bit(fc, subfunc)) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 4);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 4, ra);
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
@ -554,10 +554,7 @@ void s390x_cpu_do_unaligned_access(CPUState *cs, vaddr addr,
|
||||
S390CPU *cpu = S390_CPU(cs);
|
||||
CPUS390XState *env = &cpu->env;
|
||||
|
||||
if (retaddr) {
|
||||
cpu_restore_state(cs, retaddr);
|
||||
}
|
||||
program_interrupt(env, PGM_SPECIFICATION, ILEN_AUTO);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, ILEN_AUTO, retaddr);
|
||||
}
|
||||
|
||||
#endif /* CONFIG_USER_ONLY */
|
||||
|
@ -53,6 +53,19 @@ void program_interrupt(CPUS390XState *env, uint32_t code, int ilen)
|
||||
}
|
||||
}
|
||||
|
||||
void s390_program_interrupt(CPUS390XState *env, uint32_t code, int ilen,
|
||||
uintptr_t ra)
|
||||
{
|
||||
#ifdef CONFIG_TCG
|
||||
S390CPU *cpu = s390_env_get_cpu(env);
|
||||
|
||||
if (tcg_enabled()) {
|
||||
cpu_restore_state(CPU(cpu), ra);
|
||||
}
|
||||
#endif
|
||||
program_interrupt(env, code, ilen);
|
||||
}
|
||||
|
||||
#if !defined(CONFIG_USER_ONLY)
|
||||
static void cpu_inject_service(S390CPU *cpu, uint32_t param)
|
||||
{
|
||||
|
@ -85,9 +85,7 @@ static inline void check_alignment(CPUS390XState *env, uint64_t v,
|
||||
int wordsize, uintptr_t ra)
|
||||
{
|
||||
if (v % wordsize) {
|
||||
CPUState *cs = CPU(s390_env_get_cpu(env));
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 6, ra);
|
||||
}
|
||||
}
|
||||
|
||||
@ -545,8 +543,7 @@ void HELPER(srst)(CPUS390XState *env, uint32_t r1, uint32_t r2)
|
||||
|
||||
/* Bits 32-55 must contain all 0. */
|
||||
if (env->regs[0] & 0xffffff00u) {
|
||||
cpu_restore_state(ENV_GET_CPU(env), ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 6, ra);
|
||||
}
|
||||
|
||||
str = get_address(env, r2);
|
||||
@ -583,8 +580,7 @@ void HELPER(srstu)(CPUS390XState *env, uint32_t r1, uint32_t r2)
|
||||
|
||||
/* Bits 32-47 of R0 must be zero. */
|
||||
if (env->regs[0] & 0xffff0000u) {
|
||||
cpu_restore_state(ENV_GET_CPU(env), ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 6, ra);
|
||||
}
|
||||
|
||||
str = get_address(env, r2);
|
||||
@ -1600,8 +1596,7 @@ static uint32_t do_csst(CPUS390XState *env, uint32_t r3, uint64_t a1,
|
||||
return cc;
|
||||
|
||||
spec_exception:
|
||||
cpu_restore_state(ENV_GET_CPU(env), ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 6, ra);
|
||||
g_assert_not_reached();
|
||||
}
|
||||
|
||||
@ -1865,8 +1860,7 @@ void HELPER(idte)(CPUS390XState *env, uint64_t r1, uint64_t r2, uint32_t m4)
|
||||
uint16_t entries, i, index = 0;
|
||||
|
||||
if (r2 & 0xff000) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 4);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 4, ra);
|
||||
}
|
||||
|
||||
if (!(r2 & 0x800)) {
|
||||
@ -2014,8 +2008,7 @@ uint64_t HELPER(lra)(CPUS390XState *env, uint64_t addr)
|
||||
|
||||
/* XXX incomplete - has more corner cases */
|
||||
if (!(env->psw.mask & PSW_MASK_64) && (addr >> 32)) {
|
||||
cpu_restore_state(cs, GETPC());
|
||||
program_interrupt(env, PGM_SPECIAL_OP, 2);
|
||||
s390_program_interrupt(env, PGM_SPECIAL_OP, 2, GETPC());
|
||||
}
|
||||
|
||||
old_exc = cs->exception_index;
|
||||
@ -2185,7 +2178,6 @@ uint32_t HELPER(mvcos)(CPUS390XState *env, uint64_t dest, uint64_t src,
|
||||
const uint8_t psw_as = (env->psw.mask & PSW_MASK_ASC) >> PSW_SHIFT_ASC;
|
||||
const uint64_t r0 = env->regs[0];
|
||||
const uintptr_t ra = GETPC();
|
||||
CPUState *cs = CPU(s390_env_get_cpu(env));
|
||||
uint8_t dest_key, dest_as, dest_k, dest_a;
|
||||
uint8_t src_key, src_as, src_k, src_a;
|
||||
uint64_t val;
|
||||
@ -2195,8 +2187,7 @@ uint32_t HELPER(mvcos)(CPUS390XState *env, uint64_t dest, uint64_t src,
|
||||
__func__, dest, src, len);
|
||||
|
||||
if (!(env->psw.mask & PSW_MASK_DAT)) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIAL_OP, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIAL_OP, 6, ra);
|
||||
}
|
||||
|
||||
/* OAC (operand access control) for the first operand -> dest */
|
||||
@ -2227,17 +2218,14 @@ uint32_t HELPER(mvcos)(CPUS390XState *env, uint64_t dest, uint64_t src,
|
||||
}
|
||||
|
||||
if (dest_a && dest_as == AS_HOME && (env->psw.mask & PSW_MASK_PSTATE)) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIAL_OP, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIAL_OP, 6, ra);
|
||||
}
|
||||
if (!(env->cregs[0] & CR0_SECONDARY) &&
|
||||
(dest_as == AS_SECONDARY || src_as == AS_SECONDARY)) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_SPECIAL_OP, 6);
|
||||
s390_program_interrupt(env, PGM_SPECIAL_OP, 6, ra);
|
||||
}
|
||||
if (!psw_key_valid(env, dest_key) || !psw_key_valid(env, src_key)) {
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_PRIVILEGED, 6);
|
||||
s390_program_interrupt(env, PGM_PRIVILEGED, 6, ra);
|
||||
}
|
||||
|
||||
len = wrap_length(env, len);
|
||||
@ -2251,8 +2239,7 @@ uint32_t HELPER(mvcos)(CPUS390XState *env, uint64_t dest, uint64_t src,
|
||||
(env->psw.mask & PSW_MASK_PSTATE)) {
|
||||
qemu_log_mask(LOG_UNIMP, "%s: AR-mode and PSTATE support missing\n",
|
||||
__func__);
|
||||
cpu_restore_state(cs, ra);
|
||||
program_interrupt(env, PGM_ADDRESSING, 6);
|
||||
s390_program_interrupt(env, PGM_ADDRESSING, 6, ra);
|
||||
}
|
||||
|
||||
/* FIXME: a) LAP
|
||||
|
@ -519,8 +519,7 @@ uint32_t HELPER(stfle)(CPUS390XState *env, uint64_t addr)
|
||||
int i;
|
||||
|
||||
if (addr & 0x7) {
|
||||
cpu_restore_state(ENV_GET_CPU(env), ra);
|
||||
program_interrupt(env, PGM_SPECIFICATION, 4);
|
||||
s390_program_interrupt(env, PGM_SPECIFICATION, 4, ra);
|
||||
}
|
||||
|
||||
prepare_stfl();
|
||||
|
Loading…
Reference in New Issue
Block a user