[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Qemu-devel] [PATCH v2 04/33] target/s390x: Use unwind data for helper_o
From: |
Richard Henderson |
Subject: |
[Qemu-devel] [PATCH v2 04/33] target/s390x: Use unwind data for helper_oc |
Date: |
Wed, 24 May 2017 12:22:17 -0700 |
Signed-off-by: Richard Henderson <address@hidden>
---
target/s390x/mem_helper.c | 31 ++++++++++++++++++-------------
target/s390x/translate.c | 1 -
2 files changed, 18 insertions(+), 14 deletions(-)
diff --git a/target/s390x/mem_helper.c b/target/s390x/mem_helper.c
index 7d6133b..b4b50d1 100644
--- a/target/s390x/mem_helper.c
+++ b/target/s390x/mem_helper.c
@@ -171,23 +171,28 @@ uint32_t HELPER(xc)(CPUS390XState *env, uint32_t l,
uint64_t dest,
}
/* or on array */
-uint32_t HELPER(oc)(CPUS390XState *env, uint32_t l, uint64_t dest,
- uint64_t src)
+static uint32_t do_helper_oc(CPUS390XState *env, uint32_t l, uint64_t dest,
+ uint64_t src, uintptr_t ra)
{
- int i;
- unsigned char x;
- uint32_t cc = 0;
+ uint32_t i;
+ uint8_t c = 0;
HELPER_LOG("%s l %d dest %" PRIx64 " src %" PRIx64 "\n",
__func__, l, dest, src);
+
for (i = 0; i <= l; i++) {
- x = cpu_ldub_data(env, dest + i) | cpu_ldub_data(env, src + i);
- if (x) {
- cc = 1;
- }
- cpu_stb_data(env, dest + i, x);
+ uint8_t x = cpu_ldub_data_ra(env, src + i, ra);
+ x |= cpu_ldub_data_ra(env, dest + i, ra);
+ c |= x;
+ cpu_stb_data_ra(env, dest + i, x, ra);
}
- return cc;
+ return c != 0;
+}
+
+uint32_t HELPER(oc)(CPUS390XState *env, uint32_t l, uint64_t dest,
+ uint64_t src)
+{
+ return do_helper_oc(env, l, dest, src, GETPC());
}
/* memmove */
@@ -1226,8 +1231,8 @@ uint32_t HELPER(ex)(CPUS390XState *env, uint32_t cc,
uint64_t v1,
get_address(env, 0, b2, d2));
break;
case 0x600:
- cc = helper_oc(env, l, get_address(env, 0, b1, d1),
- get_address(env, 0, b2, d2));
+ cc = do_helper_oc(env, l, get_address(env, 0, b1, d1),
+ get_address(env, 0, b2, d2), 0);
break;
case 0x700:
cc = helper_xc(env, l, get_address(env, 0, b1, d1),
diff --git a/target/s390x/translate.c b/target/s390x/translate.c
index 7e4cc6c..db86b70 100644
--- a/target/s390x/translate.c
+++ b/target/s390x/translate.c
@@ -3077,7 +3077,6 @@ static ExitStatus op_negf128(DisasContext *s, DisasOps *o)
static ExitStatus op_oc(DisasContext *s, DisasOps *o)
{
TCGv_i32 l = tcg_const_i32(get_field(s->fields, l1));
- potential_page_fault(s);
gen_helper_oc(cc_op, cpu_env, l, o->addr1, o->in2);
tcg_temp_free_i32(l);
set_cc_static(s);
--
2.9.4
- [Qemu-devel] [PATCH v2 00/33] target/s390x unwind patches, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 02/33] target/s390x: Move helper_ex to end of file, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 03/33] target/s390x: Use unwind data for helper_nc, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 01/33] target/s390x: Use cpu_loop_exit_restore for tlb_fill, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 04/33] target/s390x: Use unwind data for helper_oc,
Richard Henderson <=
- [Qemu-devel] [PATCH v2 05/33] target/s390x: Use unwind data for helper_xc, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 06/33] target/s390x: Use unwind data for helper_mvc, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 07/33] target/s390x: Use unwind data for helper_clc, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 08/33] target/s390x: Use unwind data for helper_clm, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 09/33] target/s390x: Use unwind data for helper_srst, Richard Henderson, 2017/05/24
- [Qemu-devel] [PATCH v2 10/33] target/s390x: Use unwind data for helper_clst, Richard Henderson, 2017/05/24