X-Git-Url: http://v3vee.org/palacios/gitweb/gitweb.cgi?p=palacios.git;a=blobdiff_plain;f=palacios%2Fsrc%2Fpalacios%2Fvmx_io.c;h=0f841e4f61728f593b4eeef243b1ea985edaf695;hp=2f2596d11303c46afeb9e9401a6dccab3feae533;hb=61597ea2c5ccace036d8a65e429e32b8f8a7ed4a;hpb=f3eb8bbb7c58c98b03797f2188e6c1d2a7610c15

diff --git a/palacios/src/palacios/vmx_io.c b/palacios/src/palacios/vmx_io.c
index 2f2596d..0f841e4 100644
--- a/palacios/src/palacios/vmx_io.c
+++ b/palacios/src/palacios/vmx_io.c
@@ -1,3 +1,21 @@
+/*
+ * This file is part of the Palacios Virtual Machine Monitor developed
+ * by the V3VEE Project with funding from the United States National 
+ * Science Foundation and the Department of Energy.  
+ *
+ * The V3VEE Project is a joint project between Northwestern University
+ * and the University of New Mexico.  You can find out more at 
+ * http://www.v3vee.org
+ *
+ * Copyright (c) 2008, Andy Gocke <agocke@gmail.com>
+ * Copyright (c) 2008, The V3VEE Project <http://www.v3vee.org> 
+ * All rights reserved.
+ *
+ * Author: Andy Gocke <agocke@gmail.com>
+ *
+ * This is free software.  You are permitted to use,
+ * redistribute, and modify it as specified in the file "V3VEE_LICENSE".
+ */
 
 #include <palacios/vmx_io.h>
 #include <palacios/vmm_io.h>
@@ -5,6 +23,15 @@
 #include <palacios/vmx_lowlevel.h>
 #include <palacios/vmm.h>
 #include <palacios/vmx_handler.h>
+#include <palacios/vmm_ctrl_regs.h>
+#include <palacios/vm_guest_mem.h>
+#include <palacios/vmm_decoder.h>
+
+#ifndef CONFIG_DEBUG_IO
+#undef PrintDebug
+#define PrintDebug(fmt, args...)
+#endif
+
 
 /* Same as SVM */
 static int update_map(struct guest_info * info, uint16_t port, int hook_read, int hook_write)
@@ -32,34 +59,34 @@ int v3_init_vmx_io_map(struct guest_info * info)
     return 0;
 }
 
-int v3_handle_vmx_io_in(struct guest_info * info)
-{
+int v3_handle_vmx_io_in(struct guest_info * info) {
     ulong_t exit_qual;
+    uint32_t instr_length = 0;
 
     vmcs_read(VMCS_EXIT_QUAL, &exit_qual);
 
     struct vmexit_io_qual * io_qual = (struct vmexit_io_qual *)&exit_qual;
 
-    struct v3_io_hook * hook = v3_get_io_hook(info,io_qual->port);
+    struct v3_io_hook * hook = v3_get_io_hook(info, io_qual->port);
     int read_size = 0;
 
-    if(hook == NULL) {
+    if (hook == NULL) {
         PrintError("Hook not present for IN on port %x\n", io_qual->port);
         return -1;
     }
 
-    read_size = 1<<(io_qual->access_size);
+    read_size = io_qual->access_size + 1;
 
     PrintDebug("IN of %d bytes on port %d (0x%x)\n", read_size, io_qual->port, io_qual->port);
 
-    if(hook->read(io_qual->port, &(info->vm_regs.rax), read_size, hook->priv_data) != read_size) {
+    if (hook->read(io_qual->port, &(info->vm_regs.rax), read_size, hook->priv_data) != read_size) {
         PrintError("Read failure for IN on port %x\n", io_qual->port);
         return -1;
     }
 
-    uint32_t instr_length = 0;
 
-    if(vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_length) != VMX_SUCCESS) {
+
+    if (vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_length) != VMX_SUCCESS) {
         PrintError("Could not read instruction length\n");
         return -1;
     }
@@ -71,12 +98,74 @@ int v3_handle_vmx_io_in(struct guest_info * info)
 
 int v3_handle_vmx_io_ins(struct guest_info * info)
 {
-    PrintDebug("INS not implemented\n");
-    return -1;
+    ulong_t exit_qual;
+
+    vmcs_read(VMCS_EXIT_QUAL, &exit_qual);
+
+    struct vmexit_io_qual * io_qual = (struct vmexit_io_qual *)&exit_qual;
+    struct v3_io_hook * hook = v3_get_io_hook(info, io_qual->port);
+    int read_size;
+    addr_t guest_va;
+    addr_t host_addr;
+    int rdi_change;
+    ulong_t rep_num = 1;
+
+    if(hook == NULL) {
+        PrintError("Hook not present for INS on port 0x%x\n", io_qual->port);
+        return -1;
+    }
+
+    PrintDebug("INS on port 0x%x\n", io_qual->port);
+
+    read_size = io_qual->access_size + 1;
+
+    if (io_qual->rep) {
+        rep_num = info->vm_regs.rcx & get_gpr_mask(info);
+    }
+    
+    if ( ((struct rflags *)&(info->ctrl_regs.rflags))->df ) {
+        rdi_change = -read_size;
+    } else {
+        rdi_change = read_size;
+    }
+
+    PrintDebug("INS size=%d for %ld steps\n", read_size, rep_num);
+
+    vmcs_read(VMCS_GUEST_LINEAR_ADDR, &guest_va);
+
+    if (guest_va_to_host_va(info, guest_va, &host_addr) == -1) {
+        PrintError("Could not convert Guest VA to host VA\n");
+        return -1;
+    }
+
+    do {
+        if (hook->read(io_qual->port, (char *)host_addr, read_size, hook->priv_data) != read_size) {
+            PrintError("Read Failure for INS on port 0x%x\n", io_qual->port);
+            return -1;
+        }
+
+        host_addr += rdi_change;
+        info->vm_regs.rdi += rdi_change;
+
+        if (io_qual->rep) {
+            --info->vm_regs.rcx;
+        }
+        --rep_num;
+
+    } while (rep_num > 0);
+
+    int instr_len = 0;
+
+    vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_len);
+
+    info->rip += instr_len;
+
+    return 0;
 }
 
-int v3_handle_vmx_io_out(struct guest_info * info)
-{
+
+
+int v3_handle_vmx_io_out(struct guest_info * info) {
     ulong_t exit_qual;
 
     vmcs_read(VMCS_EXIT_QUAL, &exit_qual);
@@ -85,24 +174,24 @@ int v3_handle_vmx_io_out(struct guest_info * info)
 
     struct v3_io_hook * hook = v3_get_io_hook(info, io_qual->port);
 
-    if(hook == NULL) {
+    if (hook == NULL) {
         PrintError("Hook not present for out on port %x\n", io_qual->port);
         return -1;
     }
 
-    int write_size = 1<<(io_qual->access_size);
+    int write_size = io_qual->access_size + 1;
     
     PrintDebug("OUT of %d bytes on port %d (0x%x)\n", write_size, io_qual->port, io_qual->port);
 
 
-    if(hook->write(io_qual->port, &(info->vm_regs.rax), write_size, hook->priv_data) != write_size) {
+    if (hook->write(io_qual->port, &(info->vm_regs.rax), write_size, hook->priv_data) != write_size) {
         PrintError("Write failure for out on port %x\n",io_qual->port);
         return -1;
     }
 
     uint32_t instr_length = 0;
 
-    if(vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_length) != VMX_SUCCESS) {
+    if (vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_length) != VMX_SUCCESS) {
         PrintError("Could not read instruction length\n");
         return -1;
     } 
@@ -112,14 +201,72 @@ int v3_handle_vmx_io_out(struct guest_info * info)
     return 0;
 }
 
-int v3_handle_vmx_io_outs(struct guest_info * info)
-{
+
+
+int v3_handle_vmx_io_outs(struct guest_info * info) {
     ulong_t exit_qual;
 
     vmcs_read(VMCS_EXIT_QUAL, &exit_qual);
 
     struct vmexit_io_qual * io_qual = (struct vmexit_io_qual *)&exit_qual;
+    struct v3_io_hook * hook = v3_get_io_hook(info, io_qual->port);
+    int write_size;
+    addr_t guest_va;
+    addr_t host_addr;
+    int rsi_change;
+    ulong_t rep_num = 1;
+
+    if (hook == NULL) {
+        PrintError("Hook not present for OUTS on port 0x%x\n", io_qual->port);
+        return -1;
+    }
+
+    PrintDebug("OUTS on port 0x%x\n", io_qual->port);
+
+    write_size = io_qual->access_size + 1;
+
+    if (io_qual->rep) {
+        // Grab the address sized bits of rcx
+        rep_num = info->vm_regs.rcx & get_gpr_mask(info);
+    }
 
-    PrintDebug("OUTS on port %d, (0x%x)\n", io_qual->port, io_qual->port);
-    return -1;
+    if ( ((struct rflags *)&(info->ctrl_regs.rflags))->df ) {
+        rsi_change = -write_size;
+    } else {
+        rsi_change = write_size;
+    }
+
+    vmcs_read(VMCS_GUEST_LINEAR_ADDR, &guest_va);
+
+    PrintDebug("OUTS size=%d for %ld steps\n", write_size, rep_num);
+
+    if (guest_va_to_host_va(info, guest_va, &host_addr) == -1) {
+        PrintError("Could not convert guest VA to host VA\n");
+        return -1;
+    }
+
+    do {
+       if (hook->write(io_qual->port, (char *)host_addr, write_size, hook->priv_data) != write_size) {
+           PrintError("Read failure for INS on port 0x%x\n", io_qual->port);
+           return -1;
+       }
+
+       host_addr += rsi_change;
+       info->vm_regs.rsi += rsi_change;
+
+       if (io_qual->rep) {
+           --info->vm_regs.rcx;
+       }
+       --rep_num;
+
+    } while (rep_num > 0);
+
+    int instr_len = 0;
+
+    vmcs_read(VMCS_EXIT_INSTR_LEN, &instr_len);
+
+    info->rip += instr_len;
+
+    return 0;
 }
+