[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Qemu-devel] [PATCH 050/126] target-s390: Convert STNSM, STOSM
From: |
Richard Henderson |
Subject: |
[Qemu-devel] [PATCH 050/126] target-s390: Convert STNSM, STOSM |
Date: |
Sun, 9 Sep 2012 14:05:08 -0700 |
Signed-off-by: Richard Henderson <address@hidden>
---
target-s390x/insn-data.def | 4 ++++
target-s390x/translate.c | 37 +++++++++++++++++++------------------
2 files changed, 23 insertions(+), 18 deletions(-)
diff --git a/target-s390x/insn-data.def b/target-s390x/insn-data.def
index 84ca631..52f44e0 100644
--- a/target-s390x/insn-data.def
+++ b/target-s390x/insn-data.def
@@ -444,4 +444,8 @@
C(0x010e, SAM64, E, Z, 0, 0, 0, 0, 0, 0)
/* SET SYSTEM MASK */
C(0x8000, SSM, S, Z, 0, m2_8u, 0, 0, ssm, 0)
+/* STORE THEN AND SYSTEM MASK */
+ C(0xac00, STNSM, SI, Z, la1, 0, new, m1_8, stnsm, 0)
+/* STORE THEN OR SYSTEM MASK */
+ C(0xad00, STOSM, SI, Z, la1, 0, new, m1_8, stosm, 0)
#endif /* CONFIG_USER_ONLY */
diff --git a/target-s390x/translate.c b/target-s390x/translate.c
index 4ddd77f..295caec 100644
--- a/target-s390x/translate.c
+++ b/target-s390x/translate.c
@@ -2219,7 +2219,7 @@ static void disas_s390_insn(DisasContext *s)
TCGv_i32 tmp32_1, tmp32_2;
unsigned char opc;
uint64_t insn;
- int op, r1, r2, r3, d1, d2, x2, b1, b2, i2, r1b;
+ int op, r1, r2, r3, d1, d2, x2, b1, b2, r1b;
TCGv_i32 vl;
opc = cpu_ldub_code(cpu_single_env, s->pc);
@@ -2277,23 +2277,6 @@ static void disas_s390_insn(DisasContext *s)
tcg_temp_free_i32(tmp32_2);
break;
#ifndef CONFIG_USER_ONLY
- case 0xac: /* STNSM D1(B1),I2 [SI] */
- case 0xad: /* STOSM D1(B1),I2 [SI] */
- check_privileged(s);
- insn = ld_code4(s->pc);
- tmp = decode_si(s, insn, &i2, &b1, &d1);
- tmp2 = tcg_temp_new_i64();
- tcg_gen_shri_i64(tmp2, psw_mask, 56);
- tcg_gen_qemu_st8(tmp2, tmp, get_mem_index(s));
- if (opc == 0xac) {
- tcg_gen_andi_i64(psw_mask, psw_mask,
- ((uint64_t)i2 << 56) | 0x00ffffffffffffffULL);
- } else {
- tcg_gen_ori_i64(psw_mask, psw_mask, (uint64_t)i2 << 56);
- }
- tcg_temp_free_i64(tmp);
- tcg_temp_free_i64(tmp2);
- break;
case 0xae: /* SIGP R1,R3,D2(B2) [RS] */
check_privileged(s);
insn = ld_code4(s->pc);
@@ -3420,6 +3403,24 @@ static ExitStatus op_ssm(DisasContext *s, DisasOps *o)
tcg_gen_deposit_i64(psw_mask, psw_mask, o->in2, 56, 8);
return NO_EXIT;
}
+
+static ExitStatus op_stnsm(DisasContext *s, DisasOps *o)
+{
+ uint64_t i2 = get_field(s->fields, i2);
+ check_privileged(s);
+ tcg_gen_shri_i64(o->out, psw_mask, 56);
+ tcg_gen_andi_i64(psw_mask, psw_mask, (i2 << 56) | 0x00ffffffffffffffull);
+ return NO_EXIT;
+}
+
+static ExitStatus op_stosm(DisasContext *s, DisasOps *o)
+{
+ uint64_t i2 = get_field(s->fields, i2);
+ check_privileged(s);
+ tcg_gen_shri_i64(o->out, psw_mask, 56);
+ tcg_gen_ori_i64(psw_mask, psw_mask, i2 << 56);
+ return NO_EXIT;
+}
#endif
static ExitStatus op_st8(DisasContext *s, DisasOps *o)
--
1.7.11.4
- [Qemu-devel] [PATCH 092/126] target-s390: Convert SPT, STPT, (continued)
- [Qemu-devel] [PATCH 092/126] target-s390: Convert SPT, STPT, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 084/126] target-s390: Convert EAR, SAR, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 083/126] target-s390: Convert CKSM, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 094/126] target-s390: Convert PTLB, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 080/126] target-s390: Convert FLOGR, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 046/126] target-s390: Convert SHIFT DOUBLE, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 069/126] target-s390: Convert FP ADD, COMPARE, LOAD TEST/ROUND/LENGTHENED, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 082/126] target-s390: Convert IPM, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 073/126] target-s390: Convert MULTIPLY AND ADD, SUBTRACT, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 081/126] target-s390: Convert LFPC, SFPC, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 050/126] target-s390: Convert STNSM, STOSM,
Richard Henderson <=
- [Qemu-devel] [PATCH 072/126] target-s390: Convert FP MULTIPLY, Richard Henderson, 2012/09/09
- [Qemu-devel] [PATCH 061/126] target-s390: Convert COMPARE AND SWAP, Richard Henderson, 2012/09/09
- Re: [Qemu-devel] [PATCH 000/126] Rewrite s390x translator, Alexander Graf, 2012/09/18