target-s390: Implement LURA, LURAG, STURG

Signed-off-by: Richard Henderson <rth@twiddle.net>
author: Richard Henderson <rth@twiddle.net> 2013-09-20 13:04:28 -0700
committer: Richard Henderson <rth@twiddle.net> 2015-02-03 12:06:37 -0800
commit: 9c3fd85b142f244ac1900b9da02f2d733d03c1b1 (patch)
tree: 3c07676839ac6e7fb672011593c4d15279f51ed3 /target-s390x/mem_helper.c
parent: 81822c2f42e0c3d7bf36f6eec92941de33ed92b8 (diff)
download: qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.zip
qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.gz
qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.bz2
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)
 {
author	Richard Henderson <rth@twiddle.net>	2013-09-20 13:04:28 -0700
committer	Richard Henderson <rth@twiddle.net>	2015-02-03 12:06:37 -0800
commit	9c3fd85b142f244ac1900b9da02f2d733d03c1b1 (patch)
tree	3c07676839ac6e7fb672011593c4d15279f51ed3 /target-s390x/mem_helper.c
parent	81822c2f42e0c3d7bf36f6eec92941de33ed92b8 (diff)
download	qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.zip qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.gz qemu-9c3fd85b142f244ac1900b9da02f2d733d03c1b1.tar.bz2