aboutsummaryrefslogtreecommitdiff
path: root/target-s390x/mem_helper.c
diff options
context:
space:
mode:
authorRichard Henderson <rth@twiddle.net>2013-09-20 13:04:28 -0700
committerRichard Henderson <rth@twiddle.net>2015-02-03 12:06:37 -0800
commit9c3fd85b142f244ac1900b9da02f2d733d03c1b1 (patch)
tree3c07676839ac6e7fb672011593c4d15279f51ed3 /target-s390x/mem_helper.c
parent81822c2f42e0c3d7bf36f6eec92941de33ed92b8 (diff)
downloadqemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.zip
qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.gz
qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.bz2
target-s390: Implement LURA, LURAG, STURG
Signed-off-by: Richard Henderson <rth@twiddle.net>
Diffstat (limited to 'target-s390x/mem_helper.c')
-rw-r--r--target-s390x/mem_helper.c22
1 files changed, 22 insertions, 0 deletions
diff --git a/target-s390x/mem_helper.c b/target-s390x/mem_helper.c
index 4736b7b..53bb629 100644
--- a/target-s390x/mem_helper.c
+++ b/target-s390x/mem_helper.c
@@ -1034,6 +1034,21 @@ void HELPER(ptlb)(CPUS390XState *env)
tlb_flush(CPU(cpu), 1);
}
+/* load using real address */
+uint64_t HELPER(lura)(CPUS390XState *env, uint64_t addr)
+{
+ CPUState *cs = CPU(s390_env_get_cpu(env));
+
+ return (uint32_t)ldl_phys(cs->as, get_address(env, 0, 0, addr));
+}
+
+uint64_t HELPER(lurag)(CPUS390XState *env, uint64_t addr)
+{
+ CPUState *cs = CPU(s390_env_get_cpu(env));
+
+ return ldq_phys(cs->as, get_address(env, 0, 0, addr));
+}
+
/* store using real address */
void HELPER(stura)(CPUS390XState *env, uint64_t addr, uint64_t v1)
{
@@ -1042,6 +1057,13 @@ void HELPER(stura)(CPUS390XState *env, uint64_t addr, uint64_t v1)
stl_phys(cs->as, get_address(env, 0, 0, addr), (uint32_t)v1);
}
+void HELPER(sturg)(CPUS390XState *env, uint64_t addr, uint64_t v1)
+{
+ CPUState *cs = CPU(s390_env_get_cpu(env));
+
+ stq_phys(cs->as, get_address(env, 0, 0, addr), v1);
+}
+
/* load real address */
uint64_t HELPER(lra)(CPUS390XState *env, uint64_t addr)
{