From 2db014b5a73f295f6edbdc2c8400a94ccfc90624 Mon Sep 17 00:00:00 2001 From: Richard Henderson Date: Sat, 1 Sep 2012 14:13:52 -0700 Subject: target-s390: Implement CPSDR Signed-off-by: Richard Henderson --- target-s390x/translate.c | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'target-s390x/translate.c') diff --git a/target-s390x/translate.c b/target-s390x/translate.c index fe88095..2873f7d 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)); -- cgit v1.1