76daa3
From 74e6cfa9bd85097641f64c4c1621dc312bd2815a Mon Sep 17 00:00:00 2001
76daa3
From: Paolo Bonzini <pbonzini@redhat.com>
76daa3
Date: Thu, 20 Apr 2017 14:51:33 +0200
76daa3
Subject: [PATCH 05/23] hmp: gpa2hva and gpa2hpa hostaddr command
76daa3
76daa3
RH-Author: Paolo Bonzini <pbonzini@redhat.com>
76daa3
Message-id: <20170420145133.24785-1-pbonzini@redhat.com>
76daa3
Patchwork-id: 74808
76daa3
O-Subject: [RHEL7.4 qemu-kvm-rhev PATCH] hmp: gpa2hva and gpa2hpa hostaddr command
76daa3
Bugzilla: 1432295
76daa3
RH-Acked-by: Stefan Hajnoczi <stefanha@redhat.com>
76daa3
RH-Acked-by: Dr. David Alan Gilbert <dgilbert@redhat.com>
76daa3
RH-Acked-by: Markus Armbruster <armbru@redhat.com>
76daa3
76daa3
These commands are useful when testing machine-check passthrough.
76daa3
gpa2hva is useful to inject a MADV_HWPOISON madvise from gdb, while
76daa3
gpa2hpa is useful to inject an error with the mce-inject kernel
76daa3
module.
76daa3
76daa3
Signed-off-by: Paolo Bonzini <pbonzini@redhat.com>
76daa3
(cherry-picked from e9628441df3a7aa0ee83601a0cc9111b91e2319a)
76daa3
76daa3
Signed-off-by: Miroslav Rezanina <mrezanin@redhat.com>
76daa3
---
76daa3
 hmp-commands.hx |  32 ++++++++++++++++++
76daa3
 monitor.c       | 101 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
76daa3
 2 files changed, 133 insertions(+)
76daa3
76daa3
diff --git a/hmp-commands.hx b/hmp-commands.hx
76daa3
index 9a9ff0f..f8b2b1c 100644
76daa3
--- a/hmp-commands.hx
76daa3
+++ b/hmp-commands.hx
76daa3
@@ -540,6 +540,38 @@ Dump 80 16 bit values at the start of the video memory.
76daa3
 ETEXI
76daa3
 
76daa3
     {
76daa3
+        .name       = "gpa2hva",
76daa3
+        .args_type  = "addr:l",
76daa3
+        .params     = "addr",
76daa3
+        .help       = "print the host virtual address corresponding to a guest physical address",
76daa3
+        .cmd        = hmp_gpa2hva,
76daa3
+    },
76daa3
+
76daa3
+STEXI
76daa3
+@item gpa2hva @var{addr}
76daa3
+@findex gpa2hva
76daa3
+Print the host virtual address at which the guest's physical address @var{addr}
76daa3
+is mapped.
76daa3
+ETEXI
76daa3
+
76daa3
+#ifdef CONFIG_LINUX
76daa3
+    {
76daa3
+        .name       = "gpa2hpa",
76daa3
+        .args_type  = "addr:l",
76daa3
+        .params     = "addr",
76daa3
+        .help       = "print the host physical address corresponding to a guest physical address",
76daa3
+        .cmd        = hmp_gpa2hpa,
76daa3
+    },
76daa3
+#endif
76daa3
+
76daa3
+STEXI
76daa3
+@item gpa2hpa @var{addr}
76daa3
+@findex gpa2hpa
76daa3
+Print the host physical address at which the guest's physical address @var{addr}
76daa3
+is mapped.
76daa3
+ETEXI
76daa3
+
76daa3
+    {
76daa3
         .name       = "p|print",
76daa3
         .args_type  = "fmt:/,val:l",
76daa3
         .params     = "/fmt expr",
76daa3
diff --git a/monitor.c b/monitor.c
76daa3
index fbcd058..896d669 100644
76daa3
--- a/monitor.c
76daa3
+++ b/monitor.c
76daa3
@@ -1423,6 +1423,107 @@ static void hmp_physical_memory_dump(Monitor *mon, const QDict *qdict)
76daa3
     memory_dump(mon, count, format, size, addr, 1);
76daa3
 }
76daa3
 
76daa3
+static void *gpa2hva(MemoryRegion **p_mr, hwaddr addr, Error **errp)
76daa3
+{
76daa3
+    MemoryRegionSection mrs = memory_region_find(get_system_memory(),
76daa3
+                                                 addr, 1);
76daa3
+
76daa3
+    if (!mrs.mr) {
76daa3
+        error_setg(errp, "No memory is mapped at address 0x%" HWADDR_PRIx, addr);
76daa3
+        return NULL;
76daa3
+    }
76daa3
+
76daa3
+    if (!memory_region_is_ram(mrs.mr) && !memory_region_is_romd(mrs.mr)) {
76daa3
+        error_setg(errp, "Memory at address 0x%" HWADDR_PRIx "is not RAM", addr);
76daa3
+        memory_region_unref(mrs.mr);
76daa3
+        return NULL;
76daa3
+    }
76daa3
+
76daa3
+    *p_mr = mrs.mr;
76daa3
+    return qemu_map_ram_ptr(mrs.mr->ram_block, mrs.offset_within_region);
76daa3
+}
76daa3
+
76daa3
+static void hmp_gpa2hva(Monitor *mon, const QDict *qdict)
76daa3
+{
76daa3
+    hwaddr addr = qdict_get_int(qdict, "addr");
76daa3
+    Error *local_err = NULL;
76daa3
+    MemoryRegion *mr = NULL;
76daa3
+    void *ptr;
76daa3
+
76daa3
+    ptr = gpa2hva(&mr, addr, &local_err);
76daa3
+    if (local_err) {
76daa3
+        error_report_err(local_err);
76daa3
+        return;
76daa3
+    }
76daa3
+
76daa3
+    monitor_printf(mon, "Host virtual address for 0x%" HWADDR_PRIx
76daa3
+                   " (%s) is %p\n",
76daa3
+                   addr, mr->name, ptr);
76daa3
+
76daa3
+    memory_region_unref(mr);
76daa3
+}
76daa3
+
76daa3
+#ifdef CONFIG_LINUX
76daa3
+static uint64_t vtop(void *ptr, Error **errp)
76daa3
+{
76daa3
+    uint64_t pinfo;
76daa3
+    uint64_t ret = -1;
76daa3
+    uintptr_t addr = (uintptr_t) ptr;
76daa3
+    uintptr_t pagesize = getpagesize();
76daa3
+    off_t offset = addr / pagesize * sizeof(pinfo);
76daa3
+    int fd;
76daa3
+
76daa3
+    fd = open("/proc/self/pagemap", O_RDONLY);
76daa3
+    if (fd == -1) {
76daa3
+        error_setg_errno(errp, errno, "Cannot open /proc/self/pagemap");
76daa3
+        return -1;
76daa3
+    }
76daa3
+
76daa3
+    /* Force copy-on-write if necessary.  */
76daa3
+    atomic_add((uint8_t *)ptr, 0);
76daa3
+
76daa3
+    if (pread(fd, &pinfo, sizeof(pinfo), offset) != sizeof(pinfo)) {
76daa3
+        error_setg_errno(errp, errno, "Cannot read pagemap");
76daa3
+        goto out;
76daa3
+    }
76daa3
+    if ((pinfo & (1ull << 63)) == 0) {
76daa3
+        error_setg(errp, "Page not present");
76daa3
+        goto out;
76daa3
+    }
76daa3
+    ret = ((pinfo & 0x007fffffffffffffull) * pagesize) | (addr & (pagesize - 1));
76daa3
+
76daa3
+out:
76daa3
+    close(fd);
76daa3
+    return ret;
76daa3
+}
76daa3
+
76daa3
+static void hmp_gpa2hpa(Monitor *mon, const QDict *qdict)
76daa3
+{
76daa3
+    hwaddr addr = qdict_get_int(qdict, "addr");
76daa3
+    Error *local_err = NULL;
76daa3
+    MemoryRegion *mr = NULL;
76daa3
+    void *ptr;
76daa3
+    uint64_t physaddr;
76daa3
+
76daa3
+    ptr = gpa2hva(&mr, addr, &local_err);
76daa3
+    if (local_err) {
76daa3
+        error_report_err(local_err);
76daa3
+        return;
76daa3
+    }
76daa3
+
76daa3
+    physaddr = vtop(ptr, &local_err);
76daa3
+    if (local_err) {
76daa3
+        error_report_err(local_err);
76daa3
+    } else {
76daa3
+        monitor_printf(mon, "Host physical address for 0x%" HWADDR_PRIx
76daa3
+                       " (%s) is 0x%" PRIx64 "\n",
76daa3
+                       addr, mr->name, (uint64_t) physaddr);
76daa3
+    }
76daa3
+
76daa3
+    memory_region_unref(mr);
76daa3
+}
76daa3
+#endif
76daa3
+
76daa3
 static void do_print(Monitor *mon, const QDict *qdict)
76daa3
 {
76daa3
     int format = qdict_get_int(qdict, "format");
76daa3
-- 
76daa3
1.8.3.1
76daa3