[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Qemu-devel] [PATCH 053/147] target-s390: Convert SHIFT DOUBLE
From: |
Richard Henderson |
Subject: |
[Qemu-devel] [PATCH 053/147] target-s390: Convert SHIFT DOUBLE |
Date: |
Thu, 27 Sep 2012 16:44:51 -0700 |
Signed-off-by: Richard Henderson <address@hidden>
---
target-s390x/insn-data.def | 8 ++++++++
target-s390x/translate.c | 30 ------------------------------
2 files changed, 8 insertions(+), 30 deletions(-)
diff --git a/target-s390x/insn-data.def b/target-s390x/insn-data.def
index 6020e04..50a1764 100644
--- a/target-s390x/insn-data.def
+++ b/target-s390x/insn-data.def
@@ -335,6 +335,14 @@
C(0x8800, SRL, RS_a, Z, r1_32u, sh32, new, r1_32, srl, 0)
C(0xebde, SRLK, RSY_a, DO, r3_32u, sh32, new, r1_32, srl, 0)
C(0xeb0c, SRLG, RSY_a, Z, r3_o, sh64, r1, 0, srl, 0)
+/* SHIFT LEFT DOUBLE */
+ D(0x8f00, SLDA, RS_a, Z, r1_D32, sh64, new, r1_D32, sla, 0, 31)
+/* SHIFT LEFT DOUBLE LOGICAL */
+ C(0x8d00, SLDL, RS_a, Z, r1_D32, sh64, new, r1_D32, sll, 0)
+/* SHIFT RIGHT DOUBLE */
+ C(0x8e00, SRDA, RS_a, Z, r1_D32, sh64, new, r1_D32, sra, s64)
+/* SHIFT RIGHT DOUBLE LOGICAL */
+ C(0x8c00, SRDL, RS_a, Z, r1_D32, sh64, new, r1_D32, srl, 0)
/* STORE */
C(0x5000, ST, RX_a, Z, r1_o, a2, 0, 0, st32, 0)
diff --git a/target-s390x/translate.c b/target-s390x/translate.c
index 848bb26..12fa278 100644
--- a/target-s390x/translate.c
+++ b/target-s390x/translate.c
@@ -2288,36 +2288,6 @@ static void disas_s390_insn(CPUS390XState *env,
DisasContext *s)
LOG_DISAS("opc 0x%x\n", opc);
switch (opc) {
- case 0x8c: /* SRDL R1,D2(B2) [RS] */
- case 0x8d: /* SLDL R1,D2(B2) [RS] */
- case 0x8e: /* SRDA R1,D2(B2) [RS] */
- insn = ld_code4(env, s->pc);
- decode_rs(s, insn, &r1, &r3, &b2, &d2);
- tmp = get_address(s, 0, b2, d2); /* shift */
- tmp2 = tcg_temp_new_i64();
- tmp32_1 = load_reg32(r1);
- tmp32_2 = load_reg32(r1 + 1);
- tcg_gen_concat_i32_i64(tmp2, tmp32_2, tmp32_1); /* operand */
- switch (opc) {
- case 0x8c:
- tcg_gen_shr_i64(tmp2, tmp2, tmp);
- break;
- case 0x8d:
- tcg_gen_shl_i64(tmp2, tmp2, tmp);
- break;
- case 0x8e:
- tcg_gen_sar_i64(tmp2, tmp2, tmp);
- set_cc_s64(s, tmp2);
- break;
- }
- tcg_gen_shri_i64(tmp, tmp2, 32);
- tcg_gen_trunc_i64_i32(tmp32_1, tmp);
- store_reg32(r1, tmp32_1);
- tcg_gen_trunc_i64_i32(tmp32_2, tmp2);
- store_reg32(r1 + 1, tmp32_2);
- tcg_temp_free_i64(tmp);
- tcg_temp_free_i64(tmp2);
- break;
case 0x98: /* LM R1,R3,D2(B2) [RS] */
case 0x90: /* STM R1,R3,D2(B2) [RS] */
insn = ld_code4(env, s->pc);
--
1.7.11.4
- [Qemu-devel] [PATCH 044/147] target-s390: Cleanup cc computation helpers, (continued)
- [Qemu-devel] [PATCH 044/147] target-s390: Cleanup cc computation helpers, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 045/147] target-s390: Convert INSERT CHARACTERS UNDER MASK, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 046/147] target-s390: Convert EXECUTE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 047/147] target-s390: Convert FP STORE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 048/147] target-s390: Convert CONVERT TO DECIMAL, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 049/147] target-s390: Convert SET SYSTEM MASK, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 050/147] target-s390: Convert LOAD PSW, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 051/147] target-s390: Convert DIAGNOSE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 024/147] target-s390: Convert LOAD, LOAD LOGICAL, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 052/147] target-s390: Convert SHIFT, ROTATE SINGLE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 053/147] target-s390: Convert SHIFT DOUBLE,
Richard Henderson <=
- [Qemu-devel] [PATCH 054/147] target-s390: Convert LOAD, STORE MULTIPLE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 055/147] target-s390: Convert MOVE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 056/147] target-s390: Convert NI, XI, OI, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 057/147] target-s390: Convert STNSM, STOSM, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 058/147] target-s390: Convert LAM, STAM, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 059/147] target-s390: Convert CLCLE, MVCLE, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 060/147] target-s390: Convert MVC, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 061/147] target-s390: Convert NC, XC, OC, TR, UNPK, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 062/147] target-s390: Convert CLC, Richard Henderson, 2012/09/27
- [Qemu-devel] [PATCH 063/147] target-s390: Convert MVCP, MVCS, Richard Henderson, 2012/09/27