target/s390x: Split out helper_per_store_real
Split the PER handling for store-to-real-address into its own helper function, conditionally called when PER is enabled, just as we do for per_branch and per_ifetch. Signed-off-by: Richard Henderson <richard.henderson@linaro.org> Message-Id: <20191211203614.15611-2-richard.henderson@linaro.org> Reviewed-by: David Hildenbrand <david@redhat.com> Signed-off-by: Cornelia Huck <cohuck@redhat.com>
This commit is contained in:
parent
aceeaa69d2
commit
ebed683c4e
|
@ -331,6 +331,7 @@ DEF_HELPER_FLAGS_3(sturg, TCG_CALL_NO_WG, void, env, i64, i64)
|
|||
DEF_HELPER_1(per_check_exception, void, env)
|
||||
DEF_HELPER_FLAGS_3(per_branch, TCG_CALL_NO_RWG, void, env, i64, i64)
|
||||
DEF_HELPER_FLAGS_2(per_ifetch, TCG_CALL_NO_RWG, void, env, i64)
|
||||
DEF_HELPER_FLAGS_1(per_store_real, TCG_CALL_NO_RWG, void, env)
|
||||
DEF_HELPER_FLAGS_1(stfl, TCG_CALL_NO_RWG, void, env)
|
||||
|
||||
DEF_HELPER_2(xsch, void, env, i64)
|
||||
|
|
|
@ -2344,27 +2344,11 @@ uint64_t HELPER(lurag)(CPUS390XState *env, uint64_t addr)
|
|||
void HELPER(stura)(CPUS390XState *env, uint64_t addr, uint64_t v1)
|
||||
{
|
||||
cpu_stl_real_ra(env, wrap_address(env, addr), (uint32_t)v1, GETPC());
|
||||
|
||||
if ((env->psw.mask & PSW_MASK_PER) &&
|
||||
(env->cregs[9] & PER_CR9_EVENT_STORE) &&
|
||||
(env->cregs[9] & PER_CR9_EVENT_STORE_REAL)) {
|
||||
/* PSW is saved just before calling the helper. */
|
||||
env->per_address = env->psw.addr;
|
||||
env->per_perc_atmid = PER_CODE_EVENT_STORE_REAL | get_per_atmid(env);
|
||||
}
|
||||
}
|
||||
|
||||
void HELPER(sturg)(CPUS390XState *env, uint64_t addr, uint64_t v1)
|
||||
{
|
||||
cpu_stq_real_ra(env, wrap_address(env, addr), v1, GETPC());
|
||||
|
||||
if ((env->psw.mask & PSW_MASK_PER) &&
|
||||
(env->cregs[9] & PER_CR9_EVENT_STORE) &&
|
||||
(env->cregs[9] & PER_CR9_EVENT_STORE_REAL)) {
|
||||
/* PSW is saved just before calling the helper. */
|
||||
env->per_address = env->psw.addr;
|
||||
env->per_perc_atmid = PER_CODE_EVENT_STORE_REAL | get_per_atmid(env);
|
||||
}
|
||||
}
|
||||
|
||||
/* load real address */
|
||||
|
|
|
@ -620,6 +620,16 @@ void HELPER(per_ifetch)(CPUS390XState *env, uint64_t addr)
|
|||
}
|
||||
}
|
||||
}
|
||||
|
||||
void HELPER(per_store_real)(CPUS390XState *env)
|
||||
{
|
||||
if ((env->cregs[9] & PER_CR9_EVENT_STORE) &&
|
||||
(env->cregs[9] & PER_CR9_EVENT_STORE_REAL)) {
|
||||
/* PSW is saved just before calling the helper. */
|
||||
env->per_address = env->psw.addr;
|
||||
env->per_perc_atmid = PER_CODE_EVENT_STORE_REAL | get_per_atmid(env);
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
static uint8_t stfl_bytes[2048];
|
||||
|
|
|
@ -4507,12 +4507,20 @@ static DisasJumpType op_stnosm(DisasContext *s, DisasOps *o)
|
|||
static DisasJumpType op_stura(DisasContext *s, DisasOps *o)
|
||||
{
|
||||
gen_helper_stura(cpu_env, o->in2, o->in1);
|
||||
if (s->base.tb->flags & FLAG_MASK_PER) {
|
||||
update_psw_addr(s);
|
||||
gen_helper_per_store_real(cpu_env);
|
||||
}
|
||||
return DISAS_NEXT;
|
||||
}
|
||||
|
||||
static DisasJumpType op_sturg(DisasContext *s, DisasOps *o)
|
||||
{
|
||||
gen_helper_sturg(cpu_env, o->in2, o->in1);
|
||||
if (s->base.tb->flags & FLAG_MASK_PER) {
|
||||
update_psw_addr(s);
|
||||
gen_helper_per_store_real(cpu_env);
|
||||
}
|
||||
return DISAS_NEXT;
|
||||
}
|
||||
#endif
|
||||
|
|
Loading…
Reference in a new issue