Commit a9de75a0 authored by David Hildenbrand's avatar David Hildenbrand Committed by Cornelia Huck
Browse files

s390x/tcg: wire up SET CHANNEL MONITOR



Let's just wire it up like KVM.

Reviewed-by: default avatarRichard Henderson <richard.henderson@linaro.org>
Signed-off-by: default avatarDavid Hildenbrand <david@redhat.com>
Message-Id: <20171208160207.26494-10-david@redhat.com>
Signed-off-by: default avatarCornelia Huck <cohuck@redhat.com>
parent 86c34633
Loading
Loading
Loading
Loading
+1 −0
Original line number Diff line number Diff line
@@ -166,6 +166,7 @@ DEF_HELPER_3(msch, void, env, i64, i64)
DEF_HELPER_2(rchp, void, env, i64)
DEF_HELPER_2(rsch, void, env, i64)
DEF_HELPER_2(sal, void, env, i64)
DEF_HELPER_4(schm, void, env, i64, i64, i64)
DEF_HELPER_3(ssch, void, env, i64, i64)
DEF_HELPER_2(stcrw, void, env, i64)
DEF_HELPER_3(stsch, void, env, i64, i64)
+1 −0
Original line number Diff line number Diff line
@@ -1055,6 +1055,7 @@
    C(0xb23b, RCHP,    S,     Z,   0, 0, 0, 0, rchp, 0)
    C(0xb238, RSCH,    S,     Z,   0, 0, 0, 0, rsch, 0)
    C(0xb237, SAL,     S,     Z,   0, 0, 0, 0, sal, 0)
    C(0xb23c, SCHM,    S,     Z,   0, insn, 0, 0, schm, 0)
    C(0xb233, SSCH,    S,     Z,   0, insn, 0, 0, ssch, 0)
    C(0xb239, STCRW,   S,     Z,   0, insn, 0, 0, stcrw, 0)
    C(0xb234, STSCH,   S,     Z,   0, insn, 0, 0, stsch, 0)
+9 −0
Original line number Diff line number Diff line
@@ -386,6 +386,15 @@ void HELPER(sal)(CPUS390XState *env, uint64_t r1)
    qemu_mutex_unlock_iothread();
}

void HELPER(schm)(CPUS390XState *env, uint64_t r1, uint64_t r2, uint64_t inst)
{
    S390CPU *cpu = s390_env_get_cpu(env);

    qemu_mutex_lock_iothread();
    ioinst_handle_schm(cpu, r1, r2, inst >> 16, GETPC());
    qemu_mutex_unlock_iothread();
}

void HELPER(ssch)(CPUS390XState *env, uint64_t r1, uint64_t inst)
{
    S390CPU *cpu = s390_env_get_cpu(env);
+7 −0
Original line number Diff line number Diff line
@@ -4125,6 +4125,13 @@ static ExitStatus op_sal(DisasContext *s, DisasOps *o)
    return NO_EXIT;
}

static ExitStatus op_schm(DisasContext *s, DisasOps *o)
{
    check_privileged(s);
    gen_helper_schm(cpu_env, regs[1], regs[2], o->in2);
    return NO_EXIT;
}

static ExitStatus op_ssch(DisasContext *s, DisasOps *o)
{
    check_privileged(s);