From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([208.118.235.92]:35954) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1THP4Z-0001sa-Ty for qemu-devel@nongnu.org; Thu, 27 Sep 2012 21:08:56 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1THP4Z-0001lg-19 for qemu-devel@nongnu.org; Thu, 27 Sep 2012 21:08:55 -0400 Received: from mail-pb0-f45.google.com ([209.85.160.45]:47091) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1THP4Y-0001lZ-RK for qemu-devel@nongnu.org; Thu, 27 Sep 2012 21:08:54 -0400 Received: by pbbrp2 with SMTP id rp2so4394569pbb.4 for ; Thu, 27 Sep 2012 18:08:54 -0700 (PDT) Sender: Richard Henderson From: Richard Henderson Date: Thu, 27 Sep 2012 18:08:51 -0700 Message-Id: <1348794531-28408-1-git-send-email-rth@twiddle.net> In-Reply-To: <1348785610-23418-1-git-send-email-rth@twiddle.net> References: <1348785610-23418-1-git-send-email-rth@twiddle.net> Subject: [Qemu-devel] [PATCH 132/147] target-s390: Implement CPSDR List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , To: qemu-devel@nongnu.org Cc: Alexander Graf Signed-off-by: Richard Henderson --- target-s390x/insn-data.def | 3 +++ target-s390x/translate.c | 16 ++++++++++++++++ 2 files changed, 19 insertions(+) diff --git a/target-s390x/insn-data.def b/target-s390x/insn-data.def index 49e4a44..b023911 100644 --- a/target-s390x/insn-data.def +++ b/target-s390x/insn-data.def @@ -104,6 +104,9 @@ /* CHECKSUM */ C(0xb241, CKSM, RRE, Z, r1_o, ra2, new, r1_32, cksm, 0) +/* COPY SIGN */ + C(0xb372, CPSDR, RRF_b, FPSSH, f3_o, f2_o, f1, 0, cps, 0) + /* COMPARE */ C(0x1900, CR, RR_a, Z, r1_o, r2_o, 0, 0, 0, cmps32) C(0x5900, C, RX_a, Z, r1_o, m2_32s, 0, 0, 0, cmps32) diff --git a/target-s390x/translate.c b/target-s390x/translate.c index 6c23729..d30e98d 100644 --- a/target-s390x/translate.c +++ b/target-s390x/translate.c @@ -1719,6 +1719,16 @@ static ExitStatus op_clst(DisasContext *s, DisasOps *o) return NO_EXIT; } +static ExitStatus op_cps(DisasContext *s, DisasOps *o) +{ + TCGv_i64 t = tcg_temp_new_i64(); + tcg_gen_andi_i64(t, o->in1, 0x8000000000000000ull); + tcg_gen_andi_i64(o->out, o->in2, 0x7fffffffffffffffull); + tcg_gen_or_i64(o->out, o->out, t); + tcg_temp_free_i64(t); + return NO_EXIT; +} + static ExitStatus op_cs(DisasContext *s, DisasOps *o) { int r3 = get_field(s->fields, r3); @@ -3801,6 +3811,12 @@ static void in1_x1_o(DisasContext *s, DisasFields *f, DisasOps *o) o->g_out = o->g_out2 = true; } +static void in1_f3_o(DisasContext *s, DisasFields *f, DisasOps *o) +{ + o->in1 = fregs[get_field(f, r3)]; + o->g_in1 = true; +} + static void in1_la1(DisasContext *s, DisasFields *f, DisasOps *o) { o->addr1 = get_address(s, 0, get_field(f, b1), get_field(f, d1)); -- 1.7.11.4