mirror of https://gitee.com/openkylin/qemu.git
target/s390x: Use unwind data for helper_lctl
Reviewed-by: Thomas Huth <thuth@redhat.com> Reviewed-by: Aurelien Jarno <aurelien@aurel32.net> Signed-off-by: Richard Henderson <rth@twiddle.net>
This commit is contained in:
parent
97ae2149af
commit
1b642a732c
|
@ -878,18 +878,19 @@ void HELPER(lctlg)(CPUS390XState *env, uint32_t r1, uint64_t a2, uint32_t r3)
|
|||
|
||||
void HELPER(lctl)(CPUS390XState *env, uint32_t r1, uint64_t a2, uint32_t r3)
|
||||
{
|
||||
uintptr_t ra = GETPC();
|
||||
S390CPU *cpu = s390_env_get_cpu(env);
|
||||
bool PERchanged = false;
|
||||
int i;
|
||||
uint64_t src = a2;
|
||||
uint32_t val;
|
||||
uint32_t i;
|
||||
|
||||
for (i = r1;; i = (i + 1) % 16) {
|
||||
val = cpu_ldl_data(env, src);
|
||||
uint32_t val = cpu_ldl_data_ra(env, src, ra);
|
||||
if ((uint32_t)env->cregs[i] != val && i >= 9 && i <= 11) {
|
||||
PERchanged = true;
|
||||
}
|
||||
env->cregs[i] = (env->cregs[i] & 0xFFFFFFFF00000000ULL) | val;
|
||||
env->cregs[i] = deposit64(env->cregs[i], 0, 32, val);
|
||||
HELPER_LOG("load ctl %d from 0x%" PRIx64 " == 0x%x\n", i, src, val);
|
||||
src += sizeof(uint32_t);
|
||||
|
||||
if (i == r3) {
|
||||
|
|
|
@ -2545,7 +2545,6 @@ static ExitStatus op_lctl(DisasContext *s, DisasOps *o)
|
|||
TCGv_i32 r1 = tcg_const_i32(get_field(s->fields, r1));
|
||||
TCGv_i32 r3 = tcg_const_i32(get_field(s->fields, r3));
|
||||
check_privileged(s);
|
||||
potential_page_fault(s);
|
||||
gen_helper_lctl(cpu_env, r1, o->in2, r3);
|
||||
tcg_temp_free_i32(r1);
|
||||
tcg_temp_free_i32(r3);
|
||||
|
|
Loading…
Reference in New Issue