-/* Northwestern University */
-/* (c) 2008, Jack Lange <jarusl@cs.northwestern.edu> */
+ /*
+ * 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, Jack Lange <jarusl@cs.northwestern.edu>
+ * Copyright (c) 2008, The V3VEE Project <http://www.v3vee.org>
+ * All rights reserved.
+ *
+ * Author: Jack Lange <jarusl@cs.northwestern.edu>
+ *
+ * This is free software. You are permitted to use,
+ * redistribute, and modify it as specified in the file "V3VEE_LICENSE".
+ */
#include <palacios/vmm_config.h>
#include <palacios/vmm.h>
#include <palacios/vmm_debug.h>
+#include <palacios/vmm_msr.h>
+#include <palacios/vmm_decoder.h>
+#include <palacios/vmm_telemetry.h>
+#include <palacios/vmm_mem.h>
+#include <palacios/vmm_hypercall.h>
+#include <palacios/vmm_dev_mgr.h>
+#include <palacios/vmm_cpuid.h>
+#include <palacios/vmm_xml.h>
+#include <palacios/vmm_io.h>
+#include <palacios/vmm_msr.h>
+#include <palacios/vmm_sprintf.h>
+
+
+#ifdef V3_CONFIG_SWAPPING
+#include <palacios/vmm_swapping.h>
+#endif
+
+#ifdef V3_CONFIG_MULTIBOOT
+#include <palacios/vmm_multiboot.h>
+#endif
+
+#ifdef V3_CONFIG_HVM
+#include <palacios/vmm_hvm.h>
+#endif
+
+#include <palacios/vmm_host_events.h>
+#include <palacios/vmm_perftune.h>
+
+#include "vmm_config_class.h"
+
+
+/* The Palacios cookie encodes "v3vee" followed by a
+ 3 byte version code. There are currently two versions:
+
+ \0\0\0 => original (no checksum)
+ \0\0\1 => checksum
+*/
+#define COOKIE_LEN 8
+#define COOKIE_V0 "v3vee\0\0\0"
+#define COOKIE_V1 "v3vee\0\0\1"
+
+// This is used to access the configuration file index table
+struct file_hdr_v0 {
+ uint32_t index;
+ uint32_t size;
+ uint64_t offset;
+};
+
+struct file_hdr_v1 {
+ uint32_t index;
+ uint32_t size;
+ uint64_t offset;
+ ulong_t hash;
+};
+
+struct file_idx_table_v0 {
+ uint64_t num_files;
+ struct file_hdr_v0 hdrs[0];
+};
-#include <devices/serial.h>
-#include <devices/keyboard.h>
-#include <devices/8259a.h>
-#include <devices/8254.h>
-#include <devices/nvram.h>
-#include <devices/generic.h>
+struct file_idx_table_v1 {
+ uint64_t num_files;
+ struct file_hdr_v1 hdrs[0];
+};
-static int mem_test_read(addr_t guest_addr, void * dst, uint_t length, void * priv_data) {
- int foo = 20;
+static int setup_memory_map(struct v3_vm_info * vm, v3_cfg_tree_t * cfg);
+static int setup_extensions(struct v3_vm_info * vm, v3_cfg_tree_t * cfg);
+static int setup_devices(struct v3_vm_info * vm, v3_cfg_tree_t * cfg);
- memcpy(dst, &foo, length);
- PrintDebug("Passthrough mem read returning: %d (length=%d)\n", foo + (guest_addr & 0xfff), length);
- return length;
+
+char * v3_cfg_val(v3_cfg_tree_t * tree, char * tag) {
+ char * attrib = (char *)v3_xml_attr(tree, tag);
+ v3_cfg_tree_t * child_entry = v3_xml_child(tree, tag);
+ char * val = NULL;
+
+ if ((child_entry != NULL) && (attrib != NULL)) {
+ PrintError(VM_NONE, VCORE_NONE, "Duplicate Configuration parameters present for %s\n", tag);
+ return NULL;
+ }
+
+ if (attrib == NULL) {
+ val = v3_xml_txt(child_entry);
+
+ if ( val[0] == 0 )
+ val = NULL;
+ } else {
+ val = attrib;
+ }
+
+ return val;
}
-static int passthrough_mem_read(addr_t guest_addr, void * dst, uint_t length, void * priv_data) {
- memcpy(dst, (void*)guest_addr, length);
- return length;
+v3_cfg_tree_t * v3_cfg_subtree(v3_cfg_tree_t * tree, char * tag) {
+ return v3_xml_child(tree, tag);
}
-static int passthrough_mem_write(addr_t guest_addr, void * src, uint_t length, void * priv_data) {
- memcpy((void*)guest_addr, src, length);
- return length;
+v3_cfg_tree_t * v3_cfg_next_branch(v3_cfg_tree_t * tree) {
+ return v3_xml_next(tree);
}
-/*static int IO_Read(ushort_t port, void * dst, uint_t length, void * priv_data) {
- struct guest_info * info = priv_data;
- ulong_t tsc_spread = 0;
- ullong_t exit_tsc = 0;
+struct v3_cfg_file * v3_cfg_get_file(struct v3_vm_info * vm, char * tag) {
+ struct v3_cfg_file * file = NULL;
-
- *(ulong_t *)(&exit_tsc) = info->vm_regs.rbx;
- *(ulong_t *)((&exit_tsc) + 4) = info->vm_regs.rcx;
- tsc_spread = info->exit_tsc - exit_tsc;
-
- PrintError("IOREAD tsc diff = %lu\n",tsc_spread);
- info->rip += 3;
+ file = (struct v3_cfg_file *)v3_htable_search(vm->cfg_data->file_table, (addr_t)tag);
+
+ return file;
+}
- return 1;
+static uint_t file_hash_fn(addr_t key) {
+ char * name = (char *)key;
+ return v3_hash_buffer((uchar_t *)name, strlen(name));
}
-*/
-int config_guest(struct guest_info * info, void * config_ptr) {
-
- struct guest_mem_layout * layout = (struct guest_mem_layout *)config_ptr;
- extern v3_cpu_arch_t v3_cpu_type;
- void * region_start;
- int i;
-
-
- v3_init_time(info);
- init_shadow_map(info);
-
- if (v3_cpu_type == V3_SVM_REV3_CPU) {
- info->shdw_pg_mode = NESTED_PAGING;
- } else {
- init_shadow_page_state(info);
- info->shdw_pg_mode = SHADOW_PAGING;
- }
-
- info->cpu_mode = REAL;
- info->mem_mode = PHYSICAL_MEM;
-
-
- init_vmm_io_map(info);
- init_interrupt_state(info);
-
- dev_mgr_init(info);
+static int file_eq_fn(addr_t key1, addr_t key2) {
+ char * name1 = (char *)key1;
+ char * name2 = (char *)key2;
- init_emulator(info);
-
-
- // SerialPrint("Guest Mem Dump at 0x%x\n", 0x100000);
- //PrintDebugMemDump((unsigned char *)(0x100000), 261 * 1024);
- if (layout->magic != MAGIC_CODE) {
-
- PrintDebug("Layout Magic Mismatch (0x%x)\n", layout->magic);
- return -1;
- }
-
- PrintDebug("%d layout regions\n", layout->num_regions);
-
- region_start = (void *)&(layout->regions[layout->num_regions]);
-
- PrintDebug("region start = 0x%x\n", region_start);
-
- for (i = 0; i < layout->num_regions; i++) {
- struct layout_region * reg = &(layout->regions[i]);
- uint_t num_pages = (reg->length / PAGE_SIZE) + ((reg->length % PAGE_SIZE) ? 1 : 0);
- void * guest_mem = V3_AllocPages(num_pages);
-
- PrintDebug("Layout Region %d bytes\n", reg->length);
- memcpy(guest_mem, region_start, reg->length);
-
- PrintDebugMemDump((unsigned char *)(guest_mem), 16);
-
- add_shadow_region_passthrough(info, reg->final_addr, reg->final_addr + (num_pages * PAGE_SIZE), (addr_t)guest_mem);
-
- PrintDebug("Adding Shadow Region (0x%x-0x%x) -> 0x%x\n", reg->final_addr, reg->final_addr + (num_pages * PAGE_SIZE), guest_mem);
-
- region_start += reg->length;
- }
-
- //
- add_shadow_region_passthrough(info, 0x0, 0xa0000, (addr_t)V3_AllocPages(160));
-
- if (1) {
- add_shadow_region_passthrough(info, 0xa0000, 0xc0000, 0xa0000);
- } else {
- hook_guest_mem(info, 0xa0000, 0xc0000, passthrough_mem_read, passthrough_mem_write, NULL);
- }
-
- // TEMP
- //add_shadow_region_passthrough(info, 0xc0000, 0xc8000, 0xc0000);
-
- if (1) {
- add_shadow_region_passthrough(info, 0xc7000, 0xc8000, (addr_t)V3_AllocPages(1));
- if (add_shadow_region_passthrough(info, 0xc8000, 0xf0000, (addr_t)V3_AllocPages(40)) == -1) {
- PrintDebug("Error adding shadow region\n");
- }
- } else {
- add_shadow_region_passthrough(info, 0xc0000, 0xc8000, 0xc0000);
- add_shadow_region_passthrough(info, 0xc8000, 0xf0000, 0xc8000);
- }
-
-
- if (1) {
- add_shadow_region_passthrough(info, 0x100000, 0x1000000, (addr_t)V3_AllocPages(4096));
- } else {
- /* MEMORY HOOK TEST */
- add_shadow_region_passthrough(info, 0x100000, 0xa00000, (addr_t)V3_AllocPages(2304));
- hook_guest_mem(info, 0xa00000, 0xa01000, mem_test_read, passthrough_mem_write, NULL);
- add_shadow_region_passthrough(info, 0xa01000, 0x1000000, (addr_t)V3_AllocPages(1791));
- }
-
- add_shadow_region_passthrough(info, 0x1000000, 0x8000000, (addr_t)V3_AllocPages(32768));
-
- // test - give linux accesss to PCI space - PAD
- add_shadow_region_passthrough(info, 0xc0000000,0xffffffff,0xc0000000);
-
-
- print_shadow_map(&(info->mem_map));
-
-
- {
+ return (strcmp(name1, name2) == 0);
+}
+
+static struct v3_config * parse_config(void * cfg_blob) {
+ struct v3_config * cfg = NULL;
+ int offset = 0;
+ uint_t xml_len = 0;
+ struct file_idx_table_v0 * files_v0 = NULL;
+ struct file_idx_table_v1 * files_v1 = NULL;
+ v3_cfg_tree_t * file_tree = NULL;
+ int version=-1;
+
+ V3_Print(VM_NONE, VCORE_NONE, "cfg data at %p\n", cfg_blob);
+
+ if (memcmp(cfg_blob, COOKIE_V0, COOKIE_LEN) == 0) {
+ version = 0;
+ } else if (memcmp(cfg_blob, COOKIE_V1, COOKIE_LEN) == 0) {
+ version = 1;
+ } else {
+ PrintError(VM_NONE, VCORE_NONE, "Invalid Configuration Header Or Unknown Version\n");
+ return NULL;
+ }
+
+ V3_Print(VM_NONE, VCORE_NONE, "Handling Palacios Image Format, Version 0x%x\n",version);
+
+ offset += COOKIE_LEN;
+
+ cfg = (struct v3_config *)V3_Malloc(sizeof(struct v3_config));
+
+ if (!cfg) {
+ PrintError(VM_NONE, VCORE_NONE, "Unable to allocate while parsing\n");
+ return NULL;
+ }
+
+ memset(cfg, 0, sizeof(struct v3_config));
+
+ cfg->blob = cfg_blob;
+ INIT_LIST_HEAD(&(cfg->file_list));
+ cfg->file_table = v3_create_htable(0, file_hash_fn, file_eq_fn);
+
+ if (!(cfg->file_table)) {
+ PrintError(VM_NONE, VCORE_NONE, "Unable to allocate hash table while parsing\n");
+ V3_Free(cfg);
+ return NULL;
+ }
- struct vm_device * nvram = create_nvram();
- //struct vm_device * timer = create_timer();
- struct vm_device * pic = create_pic();
- struct vm_device * keyboard = create_keyboard();
- struct vm_device * pit = create_pit();
- //struct vm_device * serial = create_serial();
+ xml_len = *(uint32_t *)(cfg_blob + offset);
+ offset += 4;
+
+ cfg->cfg = (v3_cfg_tree_t *)v3_xml_parse((uint8_t *)(cfg_blob + offset));
+ offset += xml_len;
+
+ offset += 8;
+
+ // This is hideous, but the file formats are still very close
+ if (version==0) {
+ files_v0 = (struct file_idx_table_v0 *)(cfg_blob + offset);
+ V3_Print(VM_NONE, VCORE_NONE, "Number of files in cfg: %d\n", (uint32_t)(files_v0->num_files));
+ } else {
+ files_v1 = (struct file_idx_table_v1 *)(cfg_blob + offset);
+ V3_Print(VM_NONE, VCORE_NONE, "Number of files in cfg: %d\n", (uint32_t)(files_v1->num_files));
+ }
+
+
+ file_tree = v3_cfg_subtree(v3_cfg_subtree(cfg->cfg, "files"), "file");
+
+ while (file_tree) {
+ char * id = v3_cfg_val(file_tree, "id");
+ char * index = v3_cfg_val(file_tree, "index");
+ int idx = atoi(index);
+ struct v3_cfg_file * file = NULL;
+
+ file = (struct v3_cfg_file *)V3_Malloc(sizeof(struct v3_cfg_file));
+
+ if (!file) {
+ PrintError(VM_NONE, VCORE_NONE, "Could not allocate file structure\n");
+ v3_free_htable(cfg->file_table,0,0);
+ V3_Free(cfg);
+ return NULL;
+ }
+
+ V3_Print(VM_NONE, VCORE_NONE, "File index=%d id=%s\n", idx, id);
+
+ strncpy(file->tag, id, V3_MAX_TAG_LEN);
+ file->tag[V3_MAX_TAG_LEN-1] = 0 ;
+
+ if (version==0) {
+ struct file_hdr_v0 * hdr = &(files_v0->hdrs[idx]);
+
+ file->size = hdr->size;
+ file->data = cfg_blob + hdr->offset;
+ file->hash = 0;
+
+ V3_Print(VM_NONE, VCORE_NONE, "Storing file data offset = %d, size=%d\n", (uint32_t)hdr->offset, hdr->size);
+ V3_Print(VM_NONE, VCORE_NONE, "file data at %p\n", file->data);
+
+ } else if (version==1) {
+ struct file_hdr_v1 * hdr = &(files_v1->hdrs[idx]);
+ unsigned long hash;
+
+ file->size = hdr->size;
+ file->data = cfg_blob + hdr->offset;
+ file->hash = hdr->hash;
+
+ V3_Print(VM_NONE, VCORE_NONE, "Storing file data offset = %d, size=%d\n", (uint32_t)hdr->offset, hdr->size);
+ V3_Print(VM_NONE, VCORE_NONE, "file data at %p\n", file->data);
+ V3_Print(VM_NONE, VCORE_NONE, "Checking file data integrity...\n");
+ if ((hash = v3_hash_buffer(file->data, file->size)) != file->hash) {
+ PrintError(VM_NONE, VCORE_NONE, "File data corrupted! (orig hash=0x%lx, new=0x%lx\n",
+ file->hash, hash);
+ return NULL;
+ }
+ V3_Print(VM_NONE, VCORE_NONE, "File data OK\n");
+
+ }
+
+
+ list_add( &(file->file_node), &(cfg->file_list));
+
+ V3_Print(VM_NONE, VCORE_NONE, "Keying file to name\n");
+ v3_htable_insert(cfg->file_table, (addr_t)(file->tag), (addr_t)(file));
+
+ V3_Print(VM_NONE, VCORE_NONE, "Iterating to next file\n");
+
+ file_tree = v3_cfg_next_branch(file_tree);
+ }
+
+ V3_Print(VM_NONE, VCORE_NONE, "Configuration parsed successfully\n");
+
+ return cfg;
+}
+
+
+static inline uint32_t get_alignment(char * align_str) {
+ // default is 4KB alignment
+ uint32_t alignment = PAGE_SIZE_4KB;
+
+ if (align_str != NULL) {
+ if (strcasecmp(align_str, "2MB") == 0) {
+ alignment = PAGE_SIZE_2MB;
+ } else if (strcasecmp(align_str, "4MB") == 0) {
+ alignment = PAGE_SIZE_4MB;
+ }
+ }
+#ifndef V3_CONFIG_ALIGNED_PG_ALLOC
+ if (alignment != PAGE_SIZE_4KB) {
+ PrintError(VM_NONE, VCORE_NONE, "Aligned page allocations are not supported in this host (requested alignment=%d)\n", alignment);
+ PrintError(VM_NONE, VCORE_NONE, "Ignoring alignment request\n");
+ alignment = PAGE_SIZE_4KB;
+ }
+#endif
+
+ return alignment;
+}
+
+
+
+static int pre_config_vm(struct v3_vm_info * vm, v3_cfg_tree_t * vm_cfg) {
+ char * memory_str = v3_cfg_val(vm_cfg, "memory");
+ char * schedule_hz_str = v3_cfg_val(vm_cfg, "schedule_hz");
+ char * vm_class = v3_cfg_val(vm_cfg, "class");
+ char * align_str = v3_cfg_val(v3_cfg_subtree(vm_cfg, "memory"), "alignment");
+ uint32_t sched_hz = 100; // set the schedule frequency to 100 HZ
+
+
+ if (!memory_str) {
+ PrintError(VM_NONE, VCORE_NONE, "Memory is a required configuration parameter\n");
+ return -1;
+ }
-#define GENERIC 1
+ PrintDebug(VM_NONE, VCORE_NONE, "Memory=%s\n", memory_str);
+ if (align_str) {
+ PrintDebug(VM_NONE, VCORE_NONE, "Alignment=%s\n", align_str);
+ } else {
+ PrintDebug(VM_NONE, VCORE_NONE, "Alignment defaulted to 4KB.\n");
+ }
+
+ // Amount of ram the Guest will have, always in MB
+ vm->mem_size = (addr_t)atoi(memory_str) * 1024 * 1024;
+ vm->mem_align = get_alignment(align_str);
+
+ // set up defaults for memory management for threads associated
+ // with this VM
+ vm->resource_control.pg_alignment=vm->mem_align;
+ vm->resource_control.pg_node_id=-1;
-#if GENERIC
- generic_port_range_type range[] = {
-#if 1
- // Make the DMA controller invisible
-
- {0x00, 0x07, GENERIC_PRINT_AND_IGNORE}, // DMA 1 channels 0,1,2,3 (address, counter)
- {0xc0, 0xc7, GENERIC_PRINT_AND_IGNORE}, // DMA 2 channels 4,5,6,7 (address, counter)
- {0x87, 0x87, GENERIC_PRINT_AND_IGNORE}, // DMA 1 channel 0 page register
- {0x83, 0x83, GENERIC_PRINT_AND_IGNORE}, // DMA 1 channel 1 page register
- {0x81, 0x81, GENERIC_PRINT_AND_IGNORE}, // DMA 1 channel 2 page register
- {0x82, 0x82, GENERIC_PRINT_AND_IGNORE}, // DMA 1 channel 3 page register
- {0x8f, 0x8f, GENERIC_PRINT_AND_IGNORE}, // DMA 2 channel 4 page register
- {0x8b, 0x8b, GENERIC_PRINT_AND_IGNORE}, // DMA 2 channel 5 page register
- {0x89, 0x89, GENERIC_PRINT_AND_IGNORE}, // DMA 2 channel 6 page register
- {0x8a, 0x8a, GENERIC_PRINT_AND_IGNORE}, // DMA 2 channel 7 page register
- {0x08, 0x0f, GENERIC_PRINT_AND_IGNORE}, // DMA 1 misc registers (csr, req, smask,mode,clearff,reset,enable,mmask)
- {0xd0, 0xde, GENERIC_PRINT_AND_IGNORE}, // DMA 2 misc registers
+#ifdef V3_CONFIG_SWAPPING
+ if (v3_init_swapping_vm(vm,vm_cfg)) {
+ PrintError(vm,VCORE_NONE,"Unable to initialize swapping correctly\n");
+ return -1;
+ }
+ if (vm->swap_state.enable_swapping) {
+ PrintDebug(vm,VCORE_NONE,"Swapping enabled\n");
+ } else {
+ PrintDebug(vm,VCORE_NONE,"Swapping disabled\n");
+ }
+#endif
+
+ PrintDebug(VM_NONE, VCORE_NONE, "Alignment for %lu bytes of memory computed as 0x%x\n", vm->mem_size, vm->mem_align);
+
+ if (strcasecmp(vm_class, "PC") == 0) {
+ vm->vm_class = V3_PC_VM;
+ } else {
+ PrintError(VM_NONE, VCORE_NONE, "Invalid VM class\n");
+ return -1;
+ }
+
+#ifdef V3_CONFIG_TELEMETRY
+ {
+ char * telemetry = v3_cfg_val(vm_cfg, "telemetry");
+
+ // This should go first, because other subsystems will depend on the guest_info flag
+ if ((telemetry) && (strcasecmp(telemetry, "enable") == 0)) {
+ vm->enable_telemetry = 1;
+ } else {
+ vm->enable_telemetry = 0;
+ }
+ }
#endif
-
-#if 1
- // Make the Serial ports invisible
+ if (v3_init_vm(vm) == -1) {
+ PrintError(VM_NONE, VCORE_NONE, "Failed to initialize VM\n");
+ return -1;
+ }
- {0x3f8, 0x3f8+7, GENERIC_PRINT_AND_IGNORE}, // COM 1
- {0x2f8, 0x2f8+7, GENERIC_PRINT_AND_IGNORE}, // COM 2
- {0x3e8, 0x3e8+7, GENERIC_PRINT_AND_IGNORE}, // COM 3
- {0x2e8, 0x2e8+7, GENERIC_PRINT_AND_IGNORE}, // COM 4
+#ifdef V3_CONFIG_MULTIBOOT
+ if (v3_init_multiboot_vm(vm,vm_cfg)) {
+ PrintError(vm,VCORE_NONE,"Cannot initialize Multiboot for VM\n");
+ return -1;
+ }
+#endif
+#ifdef V3_CONFIG_HVM
+ if (v3_init_hvm_vm(vm,vm_cfg)) {
+ PrintError(vm,VCORE_NONE,"Cannot initialize HVM for VM\n");
+ return -1;
+ }
#endif
+ if (schedule_hz_str) {
+ sched_hz = atoi(schedule_hz_str);
+ }
+
+ PrintDebug(VM_NONE, VCORE_NONE, "CPU_KHZ = %d, schedule_freq=%p\n", V3_CPU_KHZ(),
+ (void *)(addr_t)sched_hz);
+
+ vm->yield_cycle_period = (V3_CPU_KHZ() * 1000) / sched_hz;
+
+ return 0;
+}
+
+
+static int determine_paging_mode(struct guest_info * info, v3_cfg_tree_t * core_cfg) {
+ extern v3_cpu_arch_t v3_mach_type;
+
+ v3_cfg_tree_t * vm_tree = info->vm_info->cfg_data->cfg;
+ v3_cfg_tree_t * pg_tree = v3_cfg_subtree(vm_tree, "paging");
+ char * pg_mode = v3_cfg_val(pg_tree, "mode");
+
+ PrintDebug(info->vm_info, info, "Paging mode specified as %s\n", pg_mode);
+
+ if (pg_mode) {
+ if ((strcasecmp(pg_mode, "nested") == 0)) {
+ // we assume symmetric cores, so if core 0 has nested paging they all do
+ if ((v3_mach_type == V3_SVM_REV3_CPU) ||
+ (v3_mach_type == V3_VMX_EPT_CPU) ||
+ (v3_mach_type == V3_VMX_EPT_UG_CPU)) {
+
+ V3_Print(info->vm_info, info, "Setting paging mode to NESTED\n");
+ info->shdw_pg_mode = NESTED_PAGING;
+ } else {
+ PrintError(info->vm_info, info, "Nested paging not supported on this hardware. Defaulting to shadow paging\n");
+ info->shdw_pg_mode = SHADOW_PAGING;
+ }
+ } else if ((strcasecmp(pg_mode, "shadow") == 0)) {
+ V3_Print(info->vm_info, info, "Setting paging mode to SHADOW\n");
+ info->shdw_pg_mode = SHADOW_PAGING;
+ } else {
+ PrintError(info->vm_info, info, "Invalid paging mode (%s) specified in configuration. Defaulting to shadow paging\n", pg_mode);
+ info->shdw_pg_mode = SHADOW_PAGING;
+ }
+ } else {
+ V3_Print(info->vm_info, info, "No paging type specified in configuration. Defaulting to shadow paging\n");
+ info->shdw_pg_mode = SHADOW_PAGING;
+ }
+
+
+ if (v3_cfg_val(pg_tree, "large_pages") != NULL) {
+ if (strcasecmp(v3_cfg_val(pg_tree, "large_pages"), "true") == 0) {
+ info->use_large_pages = 1;
+ PrintDebug(info->vm_info, info, "Use of large pages in memory virtualization enabled.\n");
+ }
+ }
+ return 0;
+}
-#if 1
- // Make the PCI bus invisible (at least it's configuration)
+static int pre_config_core(struct guest_info * info, v3_cfg_tree_t * core_cfg) {
+ if (determine_paging_mode(info, core_cfg) != 0) {
+ return -1;
+ }
+
+ if (v3_init_core(info) == -1) {
+ PrintError(info->vm_info, info, "Error Initializing Core\n");
+ return -1;
+ }
- {0xcf8, 0xcf8, GENERIC_PRINT_AND_IGNORE}, // PCI Config Address
- {0xcfc, 0xcfc, GENERIC_PRINT_AND_IGNORE}, // PCI Config Data
+#ifdef V3_CONFIG_MULTIBOOT
+ if (v3_init_multiboot_core(info)) {
+ PrintError(info->vm_info, info, "Error Initializing Multiboot Core\n");
+ return -1;
+ }
+#endif
+#ifdef V3_CONFIG_HVM
+ if (v3_init_hvm_core(info)) {
+ PrintError(info->vm_info, info, "Error Initializing HVM Core\n");
+ return -1;
+ }
#endif
+
+ if (info->vm_info->vm_class == V3_PC_VM) {
+ if (pre_config_pc_core(info, core_cfg) == -1) {
+ PrintError(info->vm_info, info, "PC Post configuration failure\n");
+ return -1;
+ }
+ } else {
+ PrintError(info->vm_info, info, "Invalid VM Class\n");
+ return -1;
+ }
+
+ return 0;
+}
+
+
+
+static int post_config_vm(struct v3_vm_info * vm, v3_cfg_tree_t * cfg) {
+
+
+
+ // Configure the memory map for the guest
+ if (setup_memory_map(vm, cfg) == -1) {
+ PrintError(vm, VCORE_NONE,"Setting up guest memory map failed...\n");
+ return -1;
+ }
+
+
+ if (vm->vm_class == V3_PC_VM) {
+ if (post_config_pc(vm, cfg) == -1) {
+ PrintError(vm, VCORE_NONE,"PC Post configuration failure\n");
+ return -1;
+ }
+ } else {
+ PrintError(vm, VCORE_NONE,"Invalid VM Class\n");
+ return -1;
+ }
+
+
+
+ // Initialize fw_cfg state for VMM<->VM SEABIOS communication
+ if (v3_fw_cfg_init(vm) == -1) {
+ PrintError(vm, VCORE_NONE, "Error initializing Firmware Config (fw_cfg) state\n");
+ return -1;
+ }
+
+ /*
+ * Initialize configured devices
+ */
+ if (setup_devices(vm, cfg) == -1) {
+ PrintError(vm, VCORE_NONE,"Failed to setup devices\n");
+ return -1;
+ }
+
+
+ // v3_print_io_map(info);
+ v3_print_msr_map(vm);
+
+
+
+
+ /*
+ * Initialize configured extensions
+ */
+ if (setup_extensions(vm, cfg) == -1) {
+ PrintError(vm, VCORE_NONE,"Failed to setup extensions\n");
+ return -1;
+ }
+
+ if (v3_setup_performance_tuning(vm, cfg) == -1) {
+ PrintError(vm, VCORE_NONE,"Failed to configure performance tuning parameters\n");
+ return -1;
+ }
+
+
+ vm->run_state = VM_STOPPED;
+
+ return 0;
+}
+
+
+
+static int post_config_core(struct guest_info * info, v3_cfg_tree_t * cfg) {
+
-#if 1
+ if (v3_init_core_extensions(info) == -1) {
+ PrintError(info->vm_info, info, "Error intializing extension core states\n");
+ return -1;
+ }
- // Monitor the IDE controllers (very slow)
+ if (info->vm_info->vm_class == V3_PC_VM) {
+ if (post_config_pc_core(info, cfg) == -1) {
+ PrintError(info->vm_info, info, "PC Post configuration failure\n");
+ return -1;
+ }
+ } else {
+ PrintError(info->vm_info, info, "Invalid VM Class\n");
+ return -1;
+ }
- {0x170, 0x178, GENERIC_PRINT_AND_PASSTHROUGH}, // IDE 1
- {0x376, 0x377, GENERIC_PRINT_AND_PASSTHROUGH}, // IDE 1
- {0x1f0, 0x1f8, GENERIC_PRINT_AND_PASSTHROUGH}, // IDE 0
- {0x3f6, 0x3f7, GENERIC_PRINT_AND_PASSTHROUGH}, // IDE 0
-#endif
-
-#if 0
+ return 0;
+}
- // Make the floppy controllers invisible
- {0x3f0, 0x3f2, GENERIC_PRINT_AND_IGNORE}, // Primary floppy controller (base,statusa/statusb,DOR)
- {0x3f4, 0x3f5, GENERIC_PRINT_AND_IGNORE}, // Primary floppy controller (mainstat/datarate,data)
- {0x3f7, 0x3f7, GENERIC_PRINT_AND_IGNORE}, // Primary floppy controller (DIR)
- {0x370, 0x372, GENERIC_PRINT_AND_IGNORE}, // Secondary floppy controller (base,statusa/statusb,DOR)
- {0x374, 0x375, GENERIC_PRINT_AND_IGNORE}, // Secondary floppy controller (mainstat/datarate,data)
- {0x377, 0x377, GENERIC_PRINT_AND_IGNORE}, // Secondary floppy controller (DIR)
-
-#endif
-#if 1
+static struct v3_vm_info * allocate_guest(int num_cores) {
+ int guest_state_size = sizeof(struct v3_vm_info) + (sizeof(struct guest_info) * num_cores);
+ struct v3_vm_info * vm = V3_Malloc(guest_state_size);
- // Make the parallel port invisible
-
- {0x378, 0x37f, GENERIC_PRINT_AND_IGNORE},
+ if (!vm) {
+ PrintError(VM_NONE, VCORE_NONE, "Unable to allocate space for guest data structures\n");
+ return NULL;
+ }
-#endif
+ int i = 0;
-#if 1
+ memset(vm, 0, guest_state_size);
- // Monitor graphics card operations
+ vm->num_cores = num_cores;
- {0x3b0, 0x3bb, GENERIC_PRINT_AND_PASSTHROUGH},
- {0x3c0, 0x3df, GENERIC_PRINT_AND_PASSTHROUGH},
-
-#endif
+ for (i = 0; i < num_cores; i++) {
+ vm->cores[i].core_run_state = CORE_INVALID;
+ }
+ vm->run_state = VM_INVALID;
-#if 1
- // Make the ISA PNP features invisible
+ return vm;
+}
- {0x274, 0x277, GENERIC_PRINT_AND_IGNORE},
- {0x279, 0x279, GENERIC_PRINT_AND_IGNORE},
- {0xa79, 0xa79, GENERIC_PRINT_AND_IGNORE},
-#endif
+/*
+
+*/
-#if 1
- // Monitor any network card (realtek ne2000) operations
- {0xc100, 0xc1ff, GENERIC_PRINT_AND_PASSTHROUGH},
-#endif
+struct v3_vm_info * v3_config_guest(void * cfg_blob, void * priv_data) {
+ extern v3_cpu_arch_t v3_mach_type;
+ struct v3_config * cfg_data = NULL;
+ struct v3_vm_info * vm = NULL;
+ int num_cores = 0;
+ int i = 0;
+ v3_cfg_tree_t * cores_cfg = NULL;
+ v3_cfg_tree_t * per_core_cfg = NULL;
-#if 1
- // Make any Bus master ide controller invisible
-
- {0xc000, 0xc00f, GENERIC_PRINT_AND_IGNORE},
-#endif
+ if (v3_mach_type == V3_INVALID_CPU) {
+ PrintError(VM_NONE, VCORE_NONE, "Configuring guest on invalid CPU\n");
+ return NULL;
+ }
- // {0x378, 0x400, GENERIC_PRINT_AND_IGNORE}
-
- {0,0,0}, // sentinal - must be last
-
- };
-
+ cfg_data = parse_config(cfg_blob);
- struct vm_device * generic = create_generic(range, NULL, NULL);
-
-#endif
-
- v3_attach_device(info, nvram);
- //v3_attach_device(info, timer);
- v3_attach_device(info, pic);
- v3_attach_device(info, pit);
- v3_attach_device(info, keyboard);
- // v3_attach_device(info, serial);
+ if (!cfg_data) {
+ PrintError(VM_NONE, VCORE_NONE, "Could not parse configuration\n");
+ return NULL;
+ }
-#if GENERIC
- // Important that this be attached last!
- v3_attach_device(info, generic);
-
-#endif
-
- PrintDebugDevMgr(info);
- }
-
- // give keyboard interrupts to vm
- // no longer needed since we have a keyboard device
- //hook_irq(&vm_info, 1);
-
-#if 1
- // give floppy controller to vm
- v3_hook_irq_for_guest_injection(info, 6);
-#endif
-
-#if 1
- //primary ide
- v3_hook_irq_for_guest_injection(info, 14);
-
- // secondary ide
- v3_hook_irq_for_guest_injection(info, 15);
+
+ cores_cfg = v3_cfg_subtree(cfg_data->cfg, "cores");
+
+ if (!cores_cfg) {
+ PrintError(VM_NONE, VCORE_NONE, "Could not find core configuration (new config format required)\n");
+ return NULL;
+ }
+
+ num_cores = atoi(v3_cfg_val(cores_cfg, "count"));
+ if (num_cores == 0) {
+ PrintError(VM_NONE, VCORE_NONE, "No cores specified in configuration\n");
+ return NULL;
+ }
+
+ V3_Print(VM_NONE, VCORE_NONE, "Configuring %d cores\n", num_cores);
+
+ vm = allocate_guest(num_cores);
+
+ if (!vm) {
+ PrintError(VM_NONE, VCORE_NONE, "Could not allocate %d core guest\n", num_cores);
+ return NULL;
+ }
+
+#ifdef V3_CONFIG_CACHEPART
+ // Need to initialize cache management and resource control
+ // as early as possible so that allocations are done accordingly
+ if (v3_init_cachepart_vm(vm,cfg_data->cfg)) {
+ PrintError(VM_NONE, VCORE_NONE, "Could not initialize cache partioning\n");
+ V3_Free(vm);
+ return NULL;
+ }
#endif
-
- //v3_hook_io_port(info, 1234, &IO_Read, NULL, info);
+ vm->host_priv_data = priv_data;
+
+ vm->cfg_data = cfg_data;
+
+ V3_Print(vm, VCORE_NONE, "Preconfiguration\n");
+
+ if (pre_config_vm(vm, vm->cfg_data->cfg) == -1) {
+ PrintError(vm, VCORE_NONE, "Error in preconfiguration, attempting to free\n");
+ vm->run_state=VM_ERROR;
+ v3_free_vm(vm);
+ return NULL;
+ }
+
+ V3_Print(vm, VCORE_NONE, "Per core configuration\n");
+ per_core_cfg = v3_cfg_subtree(cores_cfg, "core");
+
+ // per core configuration
+ for (i = 0; i < vm->num_cores; i++) {
+ struct guest_info * info = &(vm->cores[i]);
+
+ info->vcpu_id = i;
+ info->vm_info = vm;
+ info->core_cfg_data = per_core_cfg;
+
+ if (pre_config_core(info, per_core_cfg) == -1) {
+ PrintError(vm, VCORE_NONE, "Error in core %d preconfiguration, attempting to free guest\n", i);
+ vm->run_state=VM_ERROR;
+ v3_free_vm(vm);
+ return NULL;
+ }
+
+
+ per_core_cfg = v3_cfg_next_branch(per_core_cfg);
+ }
+
- info->rip = 0xfff0;
- info->vm_regs.rsp = 0x0;
-
+ V3_Print(vm, VCORE_NONE, "Post Configuration\n");
- return 0;
+ if (post_config_vm(vm, vm->cfg_data->cfg) == -1) {
+ PrintError(vm, VCORE_NONE, "Error in postconfiguration, attempting to free guest\n");
+ vm->run_state=VM_ERROR;
+ v3_free_vm(vm);
+ return NULL;
+ }
+
+
+ per_core_cfg = v3_cfg_subtree(cores_cfg, "core");
+
+ // per core configuration
+ for (i = 0; i < vm->num_cores; i++) {
+ struct guest_info * info = &(vm->cores[i]);
+
+ post_config_core(info, per_core_cfg);
+
+ per_core_cfg = v3_cfg_next_branch(per_core_cfg);
+ }
+
+ V3_Print(vm, VCORE_NONE, "Configuration successfull\n");
+
+ return vm;
}
+int v3_free_config(struct v3_vm_info * vm) {
+
+ v3_free_htable(vm->cfg_data->file_table, 1, 0);
+ v3_xml_free(vm->cfg_data->cfg);
+ V3_Free(vm->cfg_data);
+ return 0;
+}
+static int setup_memory_map(struct v3_vm_info * vm, v3_cfg_tree_t * cfg) {
+ v3_cfg_tree_t * mem_region = v3_cfg_subtree(v3_cfg_subtree(cfg, "memmap"), "region");
+ while (mem_region) {
+ addr_t start_addr = atox(v3_cfg_val(mem_region, "start"));
+ addr_t end_addr = atox(v3_cfg_val(mem_region, "end"));
+ addr_t host_addr = atox(v3_cfg_val(mem_region, "host_addr"));
+
+ if (v3_add_shadow_mem(vm, V3_MEM_CORE_ANY, start_addr, end_addr, host_addr) == -1) {
+ PrintError(vm, VCORE_NONE,"Could not map memory region: %p-%p => %p\n",
+ (void *)start_addr, (void *)end_addr, (void *)host_addr);
+ return -1;
+ }
+ mem_region = v3_cfg_next_branch(mem_region);
+ }
+ return 0;
+}
+static int setup_extensions(struct v3_vm_info * vm, v3_cfg_tree_t * cfg) {
+ v3_cfg_tree_t * extension = v3_cfg_subtree(v3_cfg_subtree(cfg, "extensions"), "extension");
+ while (extension) {
+ char * ext_name = v3_cfg_val(extension, "name");
+ if (!ext_name) {
+ PrintError(vm, VCORE_NONE, "Extension has no name\n");
+ return -1;
+ }
+ V3_Print(vm, VCORE_NONE, "Configuring extension %s\n", ext_name);
+ if (v3_add_extension(vm, ext_name, extension) == -1) {
+ PrintError(vm, VCORE_NONE, "Error adding extension %s\n", ext_name);
+ return -1;
+ }
+ extension = v3_cfg_next_branch(extension);
+ }
+
+ return 0;
+}
-#if 0
+static int setup_devices(struct v3_vm_info * vm, v3_cfg_tree_t * cfg) {
+ v3_cfg_tree_t * device = v3_cfg_subtree(v3_cfg_subtree(cfg, "devices"), "device");
- if (0) {
-
- // add_shared_mem_range(&(vm_info.mem_layout), 0, 0x800000, 0x10000);
- // add_shared_mem_range(&(vm_info.mem_layout), 0, 0x1000000, 0);
-
- rip = (ulong_t)(void*)&BuzzVM;
- // rip -= 0x10000;
- // rip = (addr_t)(void*)&exit_test;
- // rip -= 0x2000;
- vm_info.rip = rip;
- rsp = (addr_t)Alloc_Page();
-
- vm_info.vm_regs.rsp = (rsp +4092 );// - 0x2000;
-
-
- } else if (0) {
- //add_shared_mem_range(&(vm_info.mem_layout), 0x0, 0x1000, 0x100000);
- // add_shared_mem_range(&(vm_info.mem_layout), 0x0, 0x100000, 0x0);
-
- /*
- shadow_region_t *ent = Malloc(sizeof(shadow_region_t));;
- init_shadow_region_physical(ent,0,0x100000,GUEST_REGION_PHYSICAL_MEMORY,
- 0x100000, HOST_REGION_PHYSICAL_MEMORY);
- add_shadow_region(&(vm_info.mem_map),ent);
- */
-
- add_shadow_region_passthrough(&vm_info, 0x0, 0x100000, 0x100000);
-
- v3_hook_io_port(&vm_info, 0x61, &IO_Read, &IO_Write, NULL);
- v3_hook_io_port(&vm_info, 0x05, &IO_Read, &IO_Write_to_Serial, NULL);
-
-
-
- /*
- vm_info.cr0 = 0;
- vm_info.cs.base=0xf000;
- vm_info.cs.limit=0xffff;
- */
- //vm_info.rip = 0xfff0;
-
- vm_info.rip = 0;
- vm_info.vm_regs.rsp = 0x0;
- } else {
-
+ while (device) {
+ char * dev_class = v3_cfg_val(device, "class");
+
+ V3_Print(vm, VCORE_NONE, "configuring device %s\n", dev_class);
+
+ if (v3_create_device(vm, dev_class, device) == -1) {
+ PrintError(vm, VCORE_NONE, "Error creating device %s\n", dev_class);
+ return -1;
+ }
+
+ device = v3_cfg_next_branch(device);
}
-#endif
+ v3_print_dev_mgr(vm);
+
+ return 0;
+}
+
+
+
