X-Git-Url: http://v3vee.org/palacios/gitweb/gitweb.cgi?a=blobdiff_plain;f=palacios%2Fsrc%2Fpalacios%2Fvmm_paging.c;h=edcab7746e6f29ecb467c4799fd2823ab0c2d5ac;hb=436d82be19d03d68da09711b3a77a185698f15a3;hp=08320770764d783dffeed81d38394c938db7f9ac;hpb=0c51b09942d51a3b355728526333ad3f3895131d;p=palacios.git diff --git a/palacios/src/palacios/vmm_paging.c b/palacios/src/palacios/vmm_paging.c index 0832077..edcab77 100644 --- a/palacios/src/palacios/vmm_paging.c +++ b/palacios/src/palacios/vmm_paging.c @@ -25,12 +25,14 @@ - - +#define USE_VMM_PAGING_DEBUG +// All of the debug functions defined in vmm_paging.h are implemented in this file +#include "vmm_paging_debug.h" +#undef USE_VMM_PAGING_DEBUG -void delete_page_tables_pde32(pde32_t * pde) { - int i;//, j; +void delete_page_tables_32(pde32_t * pde) { + int i; if (pde == NULL) { return; @@ -42,13 +44,6 @@ void delete_page_tables_pde32(pde32_t * pde) { PrintDebug("PTE base addr %x \n", pde[i].pt_base_addr); pte32_t * pte = (pte32_t *)((addr_t)(uint_t)(pde[i].pt_base_addr << PAGE_POWER)); - /* - for (j = 0; (j < MAX_PTE32_ENTRIES); j++) { - if ((pte[j].present)) { - os_hooks->free_page((void *)(pte[j].page_base_addr << PAGE_POWER)); - } - } - */ PrintDebug("Deleting PTE %d (%p)\n", i, pte); V3_FreePage(pte); } @@ -58,105 +53,880 @@ void delete_page_tables_pde32(pde32_t * pde) { V3_FreePage(V3_PAddr(pde)); } +void delete_page_tables_32PAE(pdpe32pae_t * pdpe) { + PrintError("Unimplemented function\n"); +} + +void delete_page_tables_64(pml4e64_t * pml4) { + PrintError("Unimplemented function\n"); +} + + +int v3_translate_guest_pt_32(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, addr_t * paddr) { + addr_t guest_pde_pa = CR3_TO_PDE32_PA(guest_cr3); + pde32_t * guest_pde = 0; + addr_t guest_pte_pa = 0; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t*)&guest_pde) == -1) { + PrintError("Could not get virtual address of Guest PDE32 (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + switch (pde32_lookup(guest_pde, vaddr, &guest_pte_pa)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = guest_pte_pa; + return 0; + case PT_ENTRY_PAGE: + { + pte32_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t*)&guest_pte) == -1) { + PrintError("Could not get virtual address of Guest PTE32 (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + if (pte32_lookup(guest_pte, vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } + + return 0; + } + } + + // should never get here + return -1; +} + + +int v3_translate_guest_pt_32pae(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, addr_t * paddr) { + addr_t guest_pdpe_pa = CR3_TO_PDPE32PAE_PA(guest_cr3); + pdpe32pae_t * guest_pdpe = 0; + addr_t guest_pde_pa = 0; + + if (guest_pa_to_host_va(info, guest_pdpe_pa, (addr_t*)&guest_pdpe) == -1) { + PrintError("Could not get virtual address of Guest PDPE32PAE (PA=%p)\n", + (void *)guest_pdpe_pa); + return -1; + } + + switch (pdpe32pae_lookup(guest_pdpe, vaddr, &guest_pde_pa)) + { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_PAGE: + { + pde32pae_t * guest_pde = NULL; + addr_t guest_pte_pa = 0; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t *)&guest_pde) == -1) { + PrintError("Could not get virtual Address of Guest PDE32PAE (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + switch (pde32pae_lookup(guest_pde, vaddr, &guest_pte_pa)) + { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = guest_pte_pa; + return 0; + case PT_ENTRY_PAGE: + { + pte32pae_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t *)&guest_pte) == -1) { + PrintError("Could not get virtual Address of Guest PTE32PAE (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + if (pte32pae_lookup(guest_pte, vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } + + return 0; + } + } + } + default: + return -1; + } + // should never get here + return -1; +} +int v3_translate_guest_pt_64(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, addr_t * paddr) { + addr_t guest_pml4_pa = CR3_TO_PML4E64_PA(guest_cr3); + pml4e64_t * guest_pmle = 0; + addr_t guest_pdpe_pa = 0; + if (guest_pa_to_host_va(info, guest_pml4_pa, (addr_t*)&guest_pmle) == -1) { + PrintError("Could not get virtual address of Guest PML4E64 (PA=%p)\n", + (void *)guest_pml4_pa); + return -1; + } + + switch (pml4e64_lookup(guest_pmle, vaddr, &guest_pdpe_pa)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_PAGE: + { + pdpe64_t * guest_pdp = NULL; + addr_t guest_pde_pa = 0; + + if (guest_pa_to_host_va(info, guest_pdpe_pa, (addr_t *)&guest_pdp) == -1) { + PrintError("Could not get virtual address of Guest PDPE64 (PA=%p)\n", + (void *)guest_pdpe_pa); + return -1; + } -int pt32_lookup(pde32_t * pd, addr_t vaddr, addr_t * paddr) { - addr_t pde_entry; - pde32_entry_type_t pde_entry_type; + switch (pdpe64_lookup(guest_pdp, vaddr, &guest_pde_pa)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = 0; + PrintError("1 Gigabyte Pages not supported\n"); + return -1; + case PT_ENTRY_PAGE: + { + pde64_t * guest_pde = NULL; + addr_t guest_pte_pa = 0; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t *)&guest_pde) == -1) { + PrintError("Could not get virtual address of guest PDE64 (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } - if (pd == 0) { + switch (pde64_lookup(guest_pde, vaddr, &guest_pte_pa)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = guest_pte_pa; + return 0; + case PT_ENTRY_PAGE: + { + pte64_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t *)&guest_pte) == -1) { + PrintError("Could not get virtual address of guest PTE64 (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + if (pte64_lookup(guest_pte, vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } + + return 0; + } + } + } + } + } + default: return -1; } - pde_entry_type = pde32_lookup(pd, vaddr, &pde_entry); + // should never get here + return -1; +} + - if (pde_entry_type == PDE32_ENTRY_PTE32) { - return pte32_lookup((pte32_t *)pde_entry, vaddr, paddr); - } else if (pde_entry_type == PDE32_ENTRY_LARGE_PAGE) { - *paddr = pde_entry; + +int v3_translate_host_pt_32(v3_reg_t host_cr3, addr_t vaddr, addr_t * paddr) { + pde32_t * host_pde = (pde32_t *)CR3_TO_PDE32_VA(host_cr3); + pte32_t * host_pte = 0; + + switch (pde32_lookup(host_pde, vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = (addr_t)host_pte; + return 0; + case PT_ENTRY_PAGE: + if (pte32_lookup(V3_VAddr(host_pte), vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } return 0; } + + // should never get here + return -1; +} + + +int v3_translate_host_pt_32pae(v3_reg_t host_cr3, addr_t vaddr, addr_t * paddr) { + pdpe32pae_t * host_pdpe = (pdpe32pae_t *)CR3_TO_PDPE32PAE_VA(host_cr3); + pde32pae_t * host_pde = NULL; + pte32pae_t * host_pte = NULL; + + switch (pdpe32pae_lookup(host_pdpe, vaddr, (addr_t *)&host_pde)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_PAGE: + switch (pde32pae_lookup(V3_VAddr(host_pde), vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = (addr_t)host_pte; + return 0; + case PT_ENTRY_PAGE: + if (pte32pae_lookup(V3_VAddr(host_pte), vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } + return 0; + } + default: + return -1; + } + // should never get here return -1; } +int v3_translate_host_pt_64(v3_reg_t host_cr3, addr_t vaddr, addr_t * paddr) { + pml4e64_t * host_pmle = (pml4e64_t *)CR3_TO_PML4E64_VA(host_cr3); + pdpe64_t * host_pdpe = NULL; + pde64_t * host_pde = NULL; + pte64_t * host_pte = NULL; + + switch(pml4e64_lookup(host_pmle, vaddr, (addr_t *)&host_pdpe)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_PAGE: + switch(pdpe64_lookup(V3_VAddr(host_pdpe), vaddr, (addr_t *)&host_pde)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = 0; + PrintError("1 Gigabyte Pages not supported\n"); + return -1; + case PT_ENTRY_PAGE: + switch (pde64_lookup(V3_VAddr(host_pde), vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_NOT_PRESENT: + *paddr = 0; + return -1; + case PT_ENTRY_LARGE_PAGE: + *paddr = (addr_t)host_pte; + return 0; + case PT_ENTRY_PAGE: + if (pte64_lookup(V3_VAddr(host_pte), vaddr, paddr) == PT_ENTRY_NOT_PRESENT) { + return -1; + } + return 0; + } + } + default: + return -1; + } + + // should never get here + return -1; +} + + + -/* We can't do a full lookup because we don't know what context the page tables are in... - * The entry addresses could be pointing to either guest physical memory or host physical memory - * Instead we just return the entry address, and a flag to show if it points to a pte or a large page... + +/* + * PAGE TABLE LOOKUP FUNCTIONS + * + * + * The value of entry is a return type: + * Page not present: *entry = 0 + * Large Page: *entry = translated physical address (byte granularity) + * PTE entry: *entry is the address of the PTE Page */ -pde32_entry_type_t pde32_lookup(pde32_t * pd, addr_t addr, addr_t * entry) { + +/** + * + * 32 bit Page Table lookup functions + * + **/ + +pt_entry_type_t pde32_lookup(pde32_t * pd, addr_t addr, addr_t * entry) { pde32_t * pde_entry = &(pd[PDE32_INDEX(addr)]); if (!pde_entry->present) { *entry = 0; - return PDE32_ENTRY_NOT_PRESENT; - } else { + return PT_ENTRY_NOT_PRESENT; + } else if (pde_entry->large_page) { + pde32_4MB_t * large_pde = (pde32_4MB_t *)pde_entry; - if (pde_entry->large_page) { - pde32_4MB_t * large_pde = (pde32_4MB_t *)pde_entry; + *entry = BASE_TO_PAGE_ADDR_4MB(large_pde->page_base_addr); + *entry += PAGE_OFFSET_4MB(addr); - *entry = PDE32_4MB_T_ADDR(*large_pde); - *entry += PD32_4MB_PAGE_OFFSET(addr); - return PDE32_ENTRY_LARGE_PAGE; - } else { - *entry = PDE32_T_ADDR(*pde_entry); - return PDE32_ENTRY_PTE32; - } - } - return PDE32_ENTRY_NOT_PRESENT; + return PT_ENTRY_LARGE_PAGE; + } else { + *entry = BASE_TO_PAGE_ADDR(pde_entry->pt_base_addr); + return PT_ENTRY_PAGE; + } } /* Takes a virtual addr (addr) and returns the physical addr (entry) as defined in the page table */ -int pte32_lookup(pte32_t * pt, addr_t addr, addr_t * entry) { +pt_entry_type_t pte32_lookup(pte32_t * pt, addr_t addr, addr_t * entry) { pte32_t * pte_entry = &(pt[PTE32_INDEX(addr)]); if (!pte_entry->present) { *entry = 0; - PrintDebug("Lookup at non present page (index=%d)\n", PTE32_INDEX(addr)); + // PrintDebug("Lookup at non present page (index=%d)\n", PTE32_INDEX(addr)); + return PT_ENTRY_NOT_PRESENT; + } else { + *entry = BASE_TO_PAGE_ADDR(pte_entry->page_base_addr) + PAGE_OFFSET(addr); + return PT_ENTRY_PAGE; + } + +} + + + +/** + * + * 32 bit PAE Page Table lookup functions + * + **/ +pt_entry_type_t pdpe32pae_lookup(pdpe32pae_t * pdp, addr_t addr, addr_t * entry) { + pdpe32pae_t * pdpe_entry = &(pdp[PDPE32PAE_INDEX(addr)]); + + if (!pdpe_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else { + *entry = BASE_TO_PAGE_ADDR(pdpe_entry->pd_base_addr); + return PT_ENTRY_PAGE; + } +} + +pt_entry_type_t pde32pae_lookup(pde32pae_t * pd, addr_t addr, addr_t * entry) { + pde32pae_t * pde_entry = &(pd[PDE32PAE_INDEX(addr)]); + + if (!pde_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else if (pde_entry->large_page) { + pde32pae_2MB_t * large_pde = (pde32pae_2MB_t *)pde_entry; + + *entry = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + *entry += PAGE_OFFSET_2MB(addr); + + return PT_ENTRY_LARGE_PAGE; + } else { + *entry = BASE_TO_PAGE_ADDR(pde_entry->pt_base_addr); + return PT_ENTRY_PAGE; + } +} + +pt_entry_type_t pte32pae_lookup(pte32pae_t * pt, addr_t addr, addr_t * entry) { + pte32pae_t * pte_entry = &(pt[PTE32PAE_INDEX(addr)]); + + if (!pte_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else { + *entry = BASE_TO_PAGE_ADDR(pte_entry->page_base_addr) + PAGE_OFFSET(addr); + return PT_ENTRY_PAGE; + } +} + + + +/** + * + * 64 bit Page Table lookup functions + * + **/ +pt_entry_type_t pml4e64_lookup(pml4e64_t * pml, addr_t addr, addr_t * entry) { + pml4e64_t * pml_entry = &(pml[PML4E64_INDEX(addr)]); + + if (!pml_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else { + *entry = BASE_TO_PAGE_ADDR(pml_entry->pdp_base_addr); + return PT_ENTRY_PAGE; + } +} + +pt_entry_type_t pdpe64_lookup(pdpe64_t * pdp, addr_t addr, addr_t * entry) { + pdpe64_t * pdpe_entry = &(pdp[PDPE64_INDEX(addr)]); + + if (!pdpe_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else if (pdpe_entry->large_page) { + PrintError("1 Gigabyte pages not supported\n"); + V3_ASSERT(0); return -1; } else { - *entry = PTE32_T_ADDR(*pte_entry) + PT32_PAGE_OFFSET(addr); + *entry = BASE_TO_PAGE_ADDR(pdpe_entry->pd_base_addr); + return PT_ENTRY_PAGE; + } +} + +pt_entry_type_t pde64_lookup(pde64_t * pd, addr_t addr, addr_t * entry) { + pde64_t * pde_entry = &(pd[PDE64_INDEX(addr)]); + + if (!pde_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else if (pde_entry->large_page) { + pde64_2MB_t * large_pde = (pde64_2MB_t *)pde_entry; + + *entry = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + *entry += PAGE_OFFSET_2MB(addr); + + return PT_ENTRY_LARGE_PAGE; + } else { + *entry = BASE_TO_PAGE_ADDR(pde_entry->pt_base_addr); + return PT_ENTRY_PAGE; + } +} + +pt_entry_type_t pte64_lookup(pte64_t * pt, addr_t addr, addr_t * entry) { + pte64_t * pte_entry = &(pt[PTE64_INDEX(addr)]); + + if (!pte_entry->present) { + *entry = 0; + return PT_ENTRY_NOT_PRESENT; + } else { + *entry = BASE_TO_PAGE_ADDR(pte_entry->page_base_addr) + PAGE_OFFSET(addr); + return PT_ENTRY_PAGE; + } +} + + + + + + + + +/* + * + * Page Table Access Checks + * + */ + + + + + + +int v3_check_host_pt_32(v3_reg_t host_cr3, addr_t vaddr, pf_error_t access_type, pt_access_status_t * access_status) { + pde32_t * host_pde = (pde32_t *)CR3_TO_PDE32_VA(host_cr3); + pte32_t * host_pte = 0; + + int pt_level = 2; + + // Check accessibility of PDE + *access_status = v3_can_access_pde32(host_pde, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde32_lookup(host_pde, vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pte32(V3_VAddr(host_pte), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + return 0; + default: + return -1; + } + + // should never get here + return -1; +} + +int v3_check_host_pt_32pae(v3_reg_t host_cr3, addr_t vaddr, pf_error_t access_type, pt_access_status_t * access_status) { + pdpe32pae_t * host_pdpe = (pdpe32pae_t *)CR3_TO_PDPE32PAE_VA(host_cr3); + pde32pae_t * host_pde = NULL; + pte32pae_t * host_pte = NULL; + int pt_level = 3; + + *access_status = v3_can_access_pdpe32pae(host_pdpe, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pdpe32pae_lookup(host_pdpe, vaddr, (addr_t *)&host_pde)) { + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pde32pae(V3_VAddr(host_pde), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde32pae_lookup(V3_VAddr(host_pde), vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pte32pae(V3_VAddr(host_pte), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + return 0; + default: + return -1; + } + default: + return -1; } + // should never get here return -1; } -pt_access_status_t can_access_pde32(pde32_t * pde, addr_t addr, pf_error_t access_type) { - pde32_t * entry = &pde[PDE32_INDEX(addr)]; +int v3_check_host_pt_64(v3_reg_t host_cr3, addr_t vaddr, pf_error_t access_type, pt_access_status_t * access_status) { + pml4e64_t * host_pmle = (pml4e64_t *)CR3_TO_PML4E64_VA(host_cr3); + pdpe64_t * host_pdpe = NULL; + pde64_t * host_pde = NULL; + pte64_t * host_pte = NULL; + int pt_level = 4; - if (entry->present == 0) { - return PT_ENTRY_NOT_PRESENT; - } else if ((entry->writable == 0) && (access_type.write == 1)) { - return PT_WRITE_ERROR; - } else if ((entry->user_page == 0) && (access_type.user == 1)) { - // Check CR0.WP? - return PT_USER_ERROR; + + *access_status = v3_can_access_pml4e64(host_pmle, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; } - return PT_ACCESS_OK; + pt_level--; + + switch(pml4e64_lookup(host_pmle, vaddr, (addr_t *)&host_pdpe)) { + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pdpe64(V3_VAddr(host_pdpe), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch(pdpe64_lookup(V3_VAddr(host_pdpe), vaddr, (addr_t *)&host_pde)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pde64(V3_VAddr(host_pde), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde64_lookup(V3_VAddr(host_pde), vaddr, (addr_t *)&host_pte)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + *access_status = v3_can_access_pte64(V3_VAddr(host_pte), vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + return 0; + default: + return -1; + } + default: + return -1; + } + default: + return -1; + } + + // should never get here + return -1; } -pt_access_status_t can_access_pte32(pte32_t * pte, addr_t addr, pf_error_t access_type) { - pte32_t * entry = &pte[PTE32_INDEX(addr)]; - if (entry->present == 0) { - return PT_ENTRY_NOT_PRESENT; - } else if ((entry->writable == 0) && (access_type.write == 1)) { - return PT_WRITE_ERROR; - } else if ((entry->user_page == 0) && (access_type.user == 1)) { + + +int v3_check_guest_pt_32(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, + pf_error_t access_type, pt_access_status_t * access_status) { + addr_t guest_pde_pa = CR3_TO_PDE32_PA(guest_cr3); + pde32_t * guest_pde = NULL; + addr_t guest_pte_pa = 0; + int pt_level = 2; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t*)&guest_pde) == -1) { + PrintError("Could not get virtual address of Guest PDE32 (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + + // Check accessibility of PDE + *access_status = v3_can_access_pde32(guest_pde, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde32_lookup(guest_pde, vaddr, &guest_pte_pa)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + { + pte32_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t*)&guest_pte) == -1) { + PrintError("Could not get virtual address of Guest PTE32 (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + *access_status = v3_can_access_pte32(guest_pte, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + return 0; + } + default: + return -1; + } + + // should never get here + return -1; +} + + + + + +int v3_check_guest_pt_32pae(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, + pf_error_t access_type, pt_access_status_t * access_status) { + addr_t guest_pdpe_pa = CR3_TO_PDPE32PAE_PA(guest_cr3); + pdpe32pae_t * guest_pdpe = NULL; + addr_t guest_pde_pa = 0; + int pt_level = 3; + + if (guest_pa_to_host_va(info, guest_pdpe_pa, (addr_t*)&guest_pdpe) == -1) { + PrintError("Could not get virtual address of Guest PDPE32PAE (PA=%p)\n", + (void *)guest_pdpe_pa); + return -1; + } + + *access_status = v3_can_access_pdpe32pae(guest_pdpe, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pdpe32pae_lookup(guest_pdpe, vaddr, &guest_pde_pa)) { + case PT_ENTRY_PAGE: + { + pde32pae_t * guest_pde = NULL; + addr_t guest_pte_pa = 0; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t *)&guest_pde) == -1) { + PrintError("Could not get virtual Address of Guest PDE32PAE (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + *access_status = v3_can_access_pde32pae(guest_pde, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde32pae_lookup(guest_pde, vaddr, &guest_pte_pa)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + { + pte32pae_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t *)&guest_pte) == -1) { + PrintError("Could not get virtual Address of Guest PTE32PAE (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + *access_status = v3_can_access_pte32pae(guest_pte, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + return 0; + } + default: + return -1; + } + } + default: + return -1; + } + + // should never get here + return -1; +} + + + pte64_t * guest_pte = NULL; + +int v3_check_guest_pt_64(struct guest_info * info, v3_reg_t guest_cr3, addr_t vaddr, + pf_error_t access_type, pt_access_status_t * access_status) { + addr_t guest_pml4_pa = CR3_TO_PML4E64_PA(guest_cr3); + pml4e64_t * guest_pmle = NULL; + addr_t guest_pdpe_pa = 0; + int pt_level = 4; + + if (guest_pa_to_host_va(info, guest_pml4_pa, (addr_t*)&guest_pmle) == -1) { + PrintError("Could not get virtual address of Guest PML4E64 (PA=%p)\n", + (void *)guest_pml4_pa); + return -1; + } + + *access_status = v3_can_access_pml4e64(guest_pmle, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch(pml4e64_lookup(guest_pmle, vaddr, &guest_pdpe_pa)) { + case PT_ENTRY_PAGE: + { + pdpe64_t * guest_pdp = NULL; + addr_t guest_pde_pa = 0; + + if (guest_pa_to_host_va(info, guest_pdpe_pa, (addr_t *)&guest_pdp) == -1) { + PrintError("Could not get virtual address of Guest PDPE64 (PA=%p)\n", + (void *)guest_pdpe_pa); + return -1; + } + + *access_status = v3_can_access_pdpe64(guest_pdp, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch(pdpe64_lookup(guest_pdp, vaddr, &guest_pde_pa)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + { + pde64_t * guest_pde = NULL; + addr_t guest_pte_pa = 0; + + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t *)&guest_pde) == -1) { + PrintError("Could not get virtual address of guest PDE64 (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + *access_status = v3_can_access_pde64(guest_pde, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + pt_level--; + + switch (pde64_lookup(guest_pde, vaddr, &guest_pte_pa)) { + case PT_ENTRY_LARGE_PAGE: + return 0; + case PT_ENTRY_PAGE: + { + pte64_t * guest_pte = NULL; + + if (guest_pa_to_host_va(info, guest_pte_pa, (addr_t *)&guest_pte) == -1) { + PrintError("Could not get virtual address of guest PTE64 (PA=%p)\n", + (void *)guest_pte_pa); + return -1; + } + + *access_status = v3_can_access_pte64(guest_pte, vaddr, access_type); + + if (*access_status != PT_ACCESS_OK) { + return pt_level; + } + + return 0; + } + default: + return -1; + } + } + default: + return -1; + } + } + default: + return -1; + } + + // should never get here + return -1; +} + + + + + +static pt_access_status_t can_access_pt_entry(gen_pt_t * pt, pf_error_t access_type) { + if (pt->present == 0) { + return PT_ACCESS_NOT_PRESENT; + } else if ((pt->writable == 0) && (access_type.write == 1)) { + return PT_ACCESS_WRITE_ERROR; + } else if ((pt->user_page == 0) && (access_type.user == 1)) { // Check CR0.WP? - return PT_USER_ERROR; + return PT_ACCESS_USER_ERROR; } return PT_ACCESS_OK; @@ -164,12 +934,75 @@ pt_access_status_t can_access_pte32(pte32_t * pte, addr_t addr, pf_error_t acces +/* + * 32 bit access checks + */ +pt_access_status_t inline v3_can_access_pde32(pde32_t * pde, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pde[PDE32_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pte32(pte32_t * pte, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pte[PTE32_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + + +/* + * 32 bit PAE access checks + */ +pt_access_status_t inline v3_can_access_pdpe32pae(pdpe32pae_t * pdpe, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pdpe[PDPE32PAE_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pde32pae(pde32pae_t * pde, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pde[PDE32PAE_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pte32pae(pte32pae_t * pte, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pte[PTE32PAE_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +/* + * 64 Bit access checks + */ +pt_access_status_t inline v3_can_access_pml4e64(pml4e64_t * pmle, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pmle[PML4E64_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pdpe64(pdpe64_t * pdpe, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pdpe[PDPE64_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pde64(pde64_t * pde, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pde[PDE32_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + +pt_access_status_t inline v3_can_access_pte64(pte64_t * pte, addr_t addr, pf_error_t access_type) { + gen_pt_t * entry = (gen_pt_t *)&pte[PTE64_INDEX(addr)]; + return can_access_pt_entry(entry, access_type); +} + + + + + + + + + /* We generate a page table to correspond to a given memory layout * pulling pages from the mem_list when necessary * If there are any gaps in the layout, we add them as unmapped pages */ -pde32_t * create_passthrough_pde32_pts(struct guest_info * guest_info) { +pde32_t * create_passthrough_pts_32(struct guest_info * guest_info) { addr_t current_page_addr = 0; int i, j; struct shadow_map * map = &(guest_info->mem_map); @@ -253,7 +1086,7 @@ pde32_t * create_passthrough_pde32_pts(struct guest_info * guest_info) { pde[i].large_page = 0; pde[i].global_page = 0; pde[i].vmm_info = 0; - pde[i].pt_base_addr = PAGE_ALIGNED_ADDR((addr_t)V3_PAddr(pte)); + pde[i].pt_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pte)); } } @@ -262,6 +1095,147 @@ pde32_t * create_passthrough_pde32_pts(struct guest_info * guest_info) { } +/* We generate a page table to correspond to a given memory layout + * pulling pages from the mem_list when necessary + * If there are any gaps in the layout, we add them as unmapped pages + */ +pdpe32pae_t * create_passthrough_pts_32PAE(struct guest_info * guest_info) { + addr_t current_page_addr = 0; + int i, j, k; + struct shadow_map * map = &(guest_info->mem_map); + + pdpe32pae_t * pdpe = V3_VAddr(V3_AllocPages(1)); + memset(pdpe, 0, PAGE_SIZE); + + for (i = 0; i < MAX_PDPE32PAE_ENTRIES; i++) { + int pde_present = 0; + pde32pae_t * pde = V3_VAddr(V3_AllocPages(1)); + + for (j = 0; j < MAX_PDE32PAE_ENTRIES; j++) { + + + int pte_present = 0; + pte32pae_t * pte = V3_VAddr(V3_AllocPages(1)); + + + for (k = 0; k < MAX_PTE32PAE_ENTRIES; k++) { + struct shadow_region * region = get_shadow_region_by_addr(map, current_page_addr); + + if (!region || + (region->host_type == HOST_REGION_HOOK) || + (region->host_type == HOST_REGION_UNALLOCATED) || + (region->host_type == HOST_REGION_MEMORY_MAPPED_DEVICE) || + (region->host_type == HOST_REGION_REMOTE) || + (region->host_type == HOST_REGION_SWAPPED)) { + pte[k].present = 0; + pte[k].writable = 0; + pte[k].user_page = 0; + pte[k].write_through = 0; + pte[k].cache_disable = 0; + pte[k].accessed = 0; + pte[k].dirty = 0; + pte[k].pte_attr = 0; + pte[k].global_page = 0; + pte[k].vmm_info = 0; + pte[k].page_base_addr = 0; + pte[k].rsvd = 0; + } else { + addr_t host_addr; + pte[k].present = 1; + pte[k].writable = 1; + pte[k].user_page = 1; + pte[k].write_through = 0; + pte[k].cache_disable = 0; + pte[k].accessed = 0; + pte[k].dirty = 0; + pte[k].pte_attr = 0; + pte[k].global_page = 0; + pte[k].vmm_info = 0; + + if (guest_pa_to_host_pa(guest_info, current_page_addr, &host_addr) == -1) { + // BIG ERROR + // PANIC + return NULL; + } + + pte[k].page_base_addr = host_addr >> 12; + pte[k].rsvd = 0; + + pte_present = 1; + } + + current_page_addr += PAGE_SIZE; + } + + if (pte_present == 0) { + V3_FreePage(V3_PAddr(pte)); + + pde[j].present = 0; + pde[j].writable = 0; + pde[j].user_page = 0; + pde[j].write_through = 0; + pde[j].cache_disable = 0; + pde[j].accessed = 0; + pde[j].avail = 0; + pde[j].large_page = 0; + pde[j].global_page = 0; + pde[j].vmm_info = 0; + pde[j].pt_base_addr = 0; + pde[j].rsvd = 0; + } else { + pde[j].present = 1; + pde[j].writable = 1; + pde[j].user_page = 1; + pde[j].write_through = 0; + pde[j].cache_disable = 0; + pde[j].accessed = 0; + pde[j].avail = 0; + pde[j].large_page = 0; + pde[j].global_page = 0; + pde[j].vmm_info = 0; + pde[j].pt_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pte)); + pde[j].rsvd = 0; + + pde_present = 1; + } + + } + + if (pde_present == 0) { + V3_FreePage(V3_PAddr(pde)); + + pdpe[i].present = 0; + pdpe[i].rsvd = 0; + pdpe[i].write_through = 0; + pdpe[i].cache_disable = 0; + pdpe[i].accessed = 0; + pdpe[i].avail = 0; + pdpe[i].rsvd2 = 0; + pdpe[i].vmm_info = 0; + pdpe[i].pd_base_addr = 0; + pdpe[i].rsvd3 = 0; + } else { + pdpe[i].present = 1; + pdpe[i].rsvd = 0; + pdpe[i].write_through = 0; + pdpe[i].cache_disable = 0; + pdpe[i].accessed = 0; + pdpe[i].avail = 0; + pdpe[i].rsvd2 = 0; + pdpe[i].vmm_info = 0; + pdpe[i].pd_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pde)); + pdpe[i].rsvd3 = 0; + } + + } + + + return pdpe; +} + + + + pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { @@ -275,7 +1249,7 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { int pdpe_present = 0; pdpe64_t * pdpe = V3_VAddr(V3_AllocPages(1)); - for (j = 0; j < 1; j++) { + for (j = 0; j < 20; j++) { int pde_present = 0; pde64_t * pde = V3_VAddr(V3_AllocPages(1)); @@ -325,7 +1299,7 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { return NULL; } - pte[m].page_base_addr = PTE64_BASE_ADDR(host_addr); + pte[m].page_base_addr = PAGE_BASE_ADDR(host_addr); //PrintPTE64(current_page_addr, &(pte[m])); @@ -347,7 +1321,7 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { pde[k].write_through = 0; pde[k].cache_disable = 0; pde[k].accessed = 0; - pde[k].reserved = 0; + pde[k].avail = 0; pde[k].large_page = 0; //pde[k].global_page = 0; pde[k].vmm_info = 0; @@ -359,11 +1333,11 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { pde[k].write_through = 0; pde[k].cache_disable = 0; pde[k].accessed = 0; - pde[k].reserved = 0; + pde[k].avail = 0; pde[k].large_page = 0; //pde[k].global_page = 0; pde[k].vmm_info = 0; - pde[k].pt_base_addr = PAGE_ALIGNED_ADDR((addr_t)V3_PAddr(pte)); + pde[k].pt_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pte)); pde_present = 1; } @@ -378,7 +1352,7 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { pdpe[j].write_through = 0; pdpe[j].cache_disable = 0; pdpe[j].accessed = 0; - pdpe[j].reserved = 0; + pdpe[j].avail = 0; pdpe[j].large_page = 0; //pdpe[j].global_page = 0; pdpe[j].vmm_info = 0; @@ -390,11 +1364,11 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { pdpe[j].write_through = 0; pdpe[j].cache_disable = 0; pdpe[j].accessed = 0; - pdpe[j].reserved = 0; + pdpe[j].avail = 0; pdpe[j].large_page = 0; //pdpe[j].global_page = 0; pdpe[j].vmm_info = 0; - pdpe[j].pd_base_addr = PAGE_ALIGNED_ADDR((addr_t)V3_PAddr(pde)); + pdpe[j].pd_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pde)); pdpe_present = 1; @@ -429,7 +1403,7 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { //pml[i].large_page = 0; //pml[i].global_page = 0; pml[i].vmm_info = 0; - pml[i].pdp_base_addr = PAGE_ALIGNED_ADDR((addr_t)V3_PAddr(pdpe)); + pml[i].pdp_base_addr = PAGE_BASE_ADDR((addr_t)V3_PAddr(pdpe)); } } @@ -437,124 +1411,475 @@ pml4e64_t * create_passthrough_pts_64(struct guest_info * info) { } +int v3_walk_guest_pt_32(struct guest_info * info, v3_reg_t guest_cr3, + int (*callback)(int level, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + addr_t guest_pde_pa = CR3_TO_PDE32_PA(guest_cr3); + pde32_t * guest_pde = NULL; + int i, j; + if (!callback) { + PrintError("Call back was not specified\n"); + return -1; + } + if (guest_pa_to_host_va(info, guest_pde_pa, (addr_t *)&guest_pde) == -1) { + PrintError("Could not get virtual address of Guest PDE32 (PA=%p)\n", + (void *)guest_pde_pa); + return -1; + } + + callback(PAGE_PD32, (addr_t)guest_pde, guest_pde_pa, private_data); -void PrintPDE32(addr_t virtual_address, pde32_t * pde) -{ - PrintDebug("PDE %p -> %p : present=%x, writable=%x, user=%x, wt=%x, cd=%x, accessed=%x, reserved=%x, largePages=%x, globalPage=%x, kernelInfo=%x\n", - (void *)virtual_address, - (void *)(addr_t) (pde->pt_base_addr << PAGE_POWER), - pde->present, - pde->writable, - pde->user_page, - pde->write_through, - pde->cache_disable, - pde->accessed, - pde->reserved, - pde->large_page, - pde->global_page, - pde->vmm_info); + for (i = 0; i < MAX_PDE32_ENTRIES; i++) { + if (guest_pde[i].present) { + if (guest_pde[i].large_page) { + pde32_4MB_t * large_pde = (pde32_4MB_t *)&(guest_pde[i]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_4MB(large_pde->page_base_addr); + addr_t large_page_va = 0; + + if (guest_pa_to_host_va(info, large_page_pa, &large_page_va) == -1) { + PrintError("Could not get virtual address of Guest 4MB Page (PA=%p)\n", + (void *)large_page_pa); + return -1; + } + + callback(PAGE_4MB, large_page_va, large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(guest_pde[i].pt_base_addr); + pte32_t * tmp_pte = NULL; + + if (guest_pa_to_host_va(info, pte_pa, (addr_t *)&tmp_pte) == -1) { + PrintError("Could not get virtual address of Guest PTE32 (PA=%p)\n", + (void *)pte_pa); + return -1; + } + + callback(PAGE_PT32, (addr_t)tmp_pte, pte_pa, private_data); + + for (j = 0; j < MAX_PTE32_ENTRIES; j++) { + if (tmp_pte[j].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[j].page_base_addr); + addr_t page_va = 0; + + if (guest_pa_to_host_va(info, page_pa, &page_va) == -1) { + PrintError("Could not get virtual address of Guest 4KB Page (PA=%p)\n", + (void *)page_pa); + return -1; + } + + callback(PAGE_4KB, page_va, page_pa, private_data); + } + } + } + } + } + return 0; } + +int v3_walk_guest_pt_32pae(struct guest_info * info, v3_reg_t guest_cr3, + int (*callback)(int level, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + addr_t guest_pdpe_pa = CR3_TO_PDPE32PAE_PA(guest_cr3); + pdpe32pae_t * guest_pdpe = NULL; + int i, j, k; + + if (!callback) { + PrintError("Call back was not specified\n"); + return -1; + } + + if (guest_pa_to_host_va(info, guest_pdpe_pa, (addr_t *)&guest_pdpe) == -1) { + PrintError("Could not get virtual address of Guest PDPE32PAE (PA=%p)\n", + (void *)guest_pdpe_pa); + return -1; + } + -void PrintPTE32(addr_t virtual_address, pte32_t * pte) -{ - PrintDebug("PTE %p -> %p : present=%x, writable=%x, user=%x, wt=%x, cd=%x, accessed=%x, dirty=%x, pteAttribute=%x, globalPage=%x, vmm_info=%x\n", - (void *)virtual_address, - (void*)(addr_t)(pte->page_base_addr << PAGE_POWER), - pte->present, - pte->writable, - pte->user_page, - pte->write_through, - pte->cache_disable, - pte->accessed, - pte->dirty, - pte->pte_attr, - pte->global_page, - pte->vmm_info); -} - - -void PrintPDE64(addr_t virtual_address, pde64_t * pde) -{ - PrintDebug("PDE64 %p -> %p : present=%x, writable=%x, user=%x, wt=%x, cd=%x, accessed=%x, reserved=%x, largePages=%x, globalPage=%x, kernelInfo=%x\n", - (void *)virtual_address, - (void *)(addr_t) (pde->pt_base_addr << PAGE_POWER), - pde->present, - pde->writable, - pde->user_page, - pde->write_through, - pde->cache_disable, - pde->accessed, - pde->reserved, - pde->large_page, - 0,//pde->global_page, - pde->vmm_info); + + callback(PAGE_PDP32PAE, (addr_t)guest_pdpe, guest_pdpe_pa, private_data); + + for (i = 0; i < MAX_PDPE32PAE_ENTRIES; i++) { + if (guest_pdpe[i].present) { + addr_t pde_pa = BASE_TO_PAGE_ADDR(guest_pdpe[i].pd_base_addr); + pde32pae_t * tmp_pde = NULL; + + if (guest_pa_to_host_va(info, pde_pa, (addr_t *)&tmp_pde) == -1) { + PrintError("Could not get virtual address of Guest PDE32PAE (PA=%p)\n", + (void *)pde_pa); + return -1; + } + + callback(PAGE_PD32PAE, (addr_t)tmp_pde, pde_pa, private_data); + + for (j = 0; j < MAX_PDE32PAE_ENTRIES; j++) { + if (tmp_pde[j].present) { + if (tmp_pde[j].large_page) { + pde32pae_2MB_t * large_pde = (pde32pae_2MB_t *)&(tmp_pde[j]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + addr_t large_page_va = 0; + + if (guest_pa_to_host_va(info, large_page_pa, &large_page_va) == -1) { + PrintError("Could not get virtual address of Guest 2MB Page (PA=%p)\n", + (void *)large_page_pa); + return -1; + } + + callback(PAGE_2MB, large_page_va, large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(tmp_pde[j].pt_base_addr); + pte32pae_t * tmp_pte = NULL; + + if (guest_pa_to_host_va(info, pte_pa, (addr_t *)&tmp_pte) == -1) { + PrintError("Could not get virtual address of Guest PTE32PAE (PA=%p)\n", + (void *)pte_pa); + return -1; + } + + callback(PAGE_PT32PAE, (addr_t)tmp_pte, pte_pa, private_data); + + for (k = 0; k < MAX_PTE32PAE_ENTRIES; k++) { + if (tmp_pte[k].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[k].page_base_addr); + addr_t page_va = 0; + + if (guest_pa_to_host_va(info, page_pa, &page_va) == -1) { + PrintError("Could not get virtual address of Guest 4KB Page (PA=%p)\n", + (void *)page_pa); + return -1; + } + + callback(PAGE_4KB, page_va, page_pa, private_data); + } + } + } + } + } + } + } + return 0; } - -void PrintPTE64(addr_t virtual_address, pte64_t * pte) -{ - PrintDebug("PTE64 %p -> %p : present=%x, writable=%x, user=%x, wt=%x, cd=%x, accessed=%x, dirty=%x, pteAttribute=%x, globalPage=%x, vmm_info=%x\n", - (void *)virtual_address, - (void*)(addr_t)(pte->page_base_addr << PAGE_POWER), - pte->present, - pte->writable, - pte->user_page, - pte->write_through, - pte->cache_disable, - pte->accessed, - pte->dirty, - pte->pte_attr, - pte->global_page, - pte->vmm_info); + + + +int v3_walk_guest_pt_64(struct guest_info * info, v3_reg_t guest_cr3, + int (*callback)(int level, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + addr_t guest_pml_pa = CR3_TO_PML4E64_PA(guest_cr3); + pml4e64_t * guest_pml = NULL; + int i, j, k, m; + + if (!callback) { + PrintError("Call back was not specified\n"); + return -1; + } + + if (guest_pa_to_host_va(info, guest_pml_pa, (addr_t *)&guest_pml) == -1) { + PrintError("Could not get virtual address of Guest PML464 (PA=%p)\n", + (void *)guest_pml); + return -1; + } + + + callback(PAGE_PML464, (addr_t)guest_pml, guest_pml_pa, private_data); + + for (i = 0; i < MAX_PML4E64_ENTRIES; i++) { + if (guest_pml[i].present) { + addr_t pdpe_pa = BASE_TO_PAGE_ADDR(guest_pml[i].pdp_base_addr); + pdpe64_t * tmp_pdpe = NULL; + + + if (guest_pa_to_host_va(info, pdpe_pa, (addr_t *)&tmp_pdpe) == -1) { + PrintError("Could not get virtual address of Guest PDPE64 (PA=%p)\n", + (void *)pdpe_pa); + return -1; + } + + callback(PAGE_PDP64, (addr_t)tmp_pdpe, pdpe_pa, private_data); + + for (j = 0; j < MAX_PDPE64_ENTRIES; j++) { + if (tmp_pdpe[j].present) { + if (tmp_pdpe[j].large_page) { + pdpe64_1GB_t * large_pdpe = (pdpe64_1GB_t *)&(tmp_pdpe[j]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_1GB(large_pdpe->page_base_addr); + addr_t large_page_va = 0; + + if (guest_pa_to_host_va(info, large_page_pa, &large_page_va) == -1) { + PrintError("Could not get virtual address of Guest 1GB page (PA=%p)\n", + (void *)large_page_pa); + return -1; + } + + callback(PAGE_1GB, (addr_t)large_page_va, large_page_pa, private_data); + + } else { + addr_t pde_pa = BASE_TO_PAGE_ADDR(tmp_pdpe[j].pd_base_addr); + pde64_t * tmp_pde = NULL; + + if (guest_pa_to_host_va(info, pde_pa, (addr_t *)&tmp_pde) == -1) { + PrintError("Could not get virtual address of Guest PDE64 (PA=%p)\n", + (void *)pde_pa); + return -1; + } + + callback(PAGE_PD64, (addr_t)tmp_pde, pde_pa, private_data); + + for (k = 0; k < MAX_PDE64_ENTRIES; k++) { + if (tmp_pde[k].present) { + if (tmp_pde[k].large_page) { + pde64_2MB_t * large_pde = (pde64_2MB_t *)&(tmp_pde[k]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + addr_t large_page_va = 0; + + if (guest_pa_to_host_va(info, large_page_pa, &large_page_va) == -1) { + PrintError("Could not get virtual address of Guest 2MB page (PA=%p)\n", + (void *)large_page_pa); + return -1; + } + + callback(PAGE_2MB, large_page_va, large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(tmp_pde[k].pt_base_addr); + pte64_t * tmp_pte = NULL; + + if (guest_pa_to_host_va(info, pte_pa, (addr_t *)&tmp_pte) == -1) { + PrintError("Could not get virtual address of Guest PTE64 (PA=%p)\n", + (void *)pte_pa); + return -1; + } + + callback(PAGE_PT64, (addr_t)tmp_pte, pte_pa, private_data); + + for (m = 0; m < MAX_PTE64_ENTRIES; m++) { + if (tmp_pte[m].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[m].page_base_addr); + addr_t page_va = 0; + + if (guest_pa_to_host_va(info, page_pa, &page_va) == -1) { + PrintError("Could not get virtual address of Guest 4KB Page (PA=%p)\n", + (void *)page_pa); + return -1; + } + + callback(PAGE_4KB, page_va, page_pa, private_data); + } + } + } + } + } + } + } + } + } + } + return 0; } - +int v3_walk_host_pt_32(v3_reg_t host_cr3, + int (*callback)(int level, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + pde32_t * host_pde = (pde32_t *)CR3_TO_PDE32_VA(host_cr3); + addr_t pde_pa = CR3_TO_PDE32_PA(host_cr3); + int i, j; + if (!callback) { + PrintError("Call back was not specified\n"); + return -1; + } + callback(PAGE_PD32, (addr_t)host_pde, pde_pa, private_data); + for (i = 0; i < MAX_PDE32_ENTRIES; i++) { + if (host_pde[i].present) { + if (host_pde[i].large_page) { + pde32_4MB_t * large_pde = (pde32_4MB_t *)&(host_pde[i]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_4MB(large_pde->page_base_addr); -void PrintPD32(pde32_t * pde) -{ - int i; + callback(PAGE_4MB, (addr_t)V3_VAddr((void *)large_page_pa), large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(host_pde[i].pt_base_addr); + pte32_t * tmp_pte = (pte32_t *)V3_VAddr((void *)pte_pa); - PrintDebug("Page Directory at %p:\n", pde); - for (i = 0; (i < MAX_PDE32_ENTRIES); i++) { - if ( pde[i].present) { - PrintPDE32((addr_t)(PAGE_SIZE * MAX_PTE32_ENTRIES * i), &(pde[i])); + callback(PAGE_PT32, (addr_t)tmp_pte, pte_pa, private_data); + + for (j = 0; j < MAX_PTE32_ENTRIES; j++) { + if (tmp_pte[j].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[j].page_base_addr); + callback(PAGE_4KB, (addr_t)V3_VAddr((void *)page_pa), page_pa, private_data); + } + } + } } } + return 0; } + + + -void PrintPT32(addr_t starting_address, pte32_t * pte) -{ - int i; - PrintDebug("Page Table at %p:\n", pte); - for (i = 0; (i < MAX_PTE32_ENTRIES) ; i++) { - if (pte[i].present) { - PrintPTE32(starting_address + (PAGE_SIZE * i), &(pte[i])); +int v3_walk_host_pt_32pae(v3_reg_t host_cr3, + void (*callback)(page_type_t type, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + pdpe32pae_t * host_pdpe = (pdpe32pae_t *)CR3_TO_PDPE32PAE_VA(host_cr3); + addr_t pdpe_pa = CR3_TO_PDPE32PAE_PA(host_cr3); + int i, j, k; + + if (!callback) { + PrintError("Callback was not specified\n"); + return -1; + } + + callback(PAGE_PDP32PAE, (addr_t)host_pdpe, pdpe_pa, private_data); + + for (i = 0; i < MAX_PDPE32PAE_ENTRIES; i++) { + if (host_pdpe[i].present) { + addr_t pde_pa = BASE_TO_PAGE_ADDR(host_pdpe[i].pd_base_addr); + pde32pae_t * tmp_pde = (pde32pae_t *)V3_VAddr((void *)pde_pa); + + callback(PAGE_PD32PAE, (addr_t)tmp_pde, pde_pa, private_data); + + for (j = 0; j < MAX_PDE32PAE_ENTRIES; j++) { + if (tmp_pde[j].present) { + + if (tmp_pde[j].large_page) { + pde32pae_2MB_t * large_pde = (pde32pae_2MB_t *)&(tmp_pde[j]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + + callback(PAGE_2MB, (addr_t)V3_VAddr((void *)large_page_pa), large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(tmp_pde[j].pt_base_addr); + pte32pae_t * tmp_pte = (pte32pae_t *)V3_VAddr((void *)pte_pa); + + callback(PAGE_PT32PAE, (addr_t)tmp_pte, pte_pa, private_data); + + for (k = 0; k < MAX_PTE32PAE_ENTRIES; k++) { + if (tmp_pte[k].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[k].page_base_addr); + callback(PAGE_4KB, (addr_t)V3_VAddr((void *)page_pa), page_pa, private_data); + } + } + } + } + } } } + return 0; } + +int v3_walk_host_pt_64(v3_reg_t host_cr3, + void (*callback)(page_type_t type, addr_t page_ptr, addr_t page_pa, void * private_data), + void * private_data) { + pml4e64_t * host_pml = (pml4e64_t *)CR3_TO_PML4E64_VA(host_cr3); + addr_t pml_pa = CR3_TO_PML4E64_PA(host_cr3); + int i, j, k, m; + if (!callback) { + PrintError("Callback was not specified\n"); + return -1; + } + callback(PAGE_PML464, (addr_t)host_pml, pml_pa, private_data); + for (i = 0; i < MAX_PML4E64_ENTRIES; i++) { + if (host_pml[i].present) { + addr_t pdpe_pa = BASE_TO_PAGE_ADDR(host_pml[i].pdp_base_addr); + pdpe64_t * tmp_pdpe = (pdpe64_t *)V3_VAddr((void *)pdpe_pa); -void PrintDebugPageTables(pde32_t * pde) -{ - int i; - - PrintDebug("Dumping the pages starting with the pde page at %p\n", pde); + callback(PAGE_PDP64, (addr_t)tmp_pdpe, pdpe_pa, private_data); - for (i = 0; (i < MAX_PDE32_ENTRIES); i++) { - if (pde[i].present) { - PrintPDE32((addr_t)(PAGE_SIZE * MAX_PTE32_ENTRIES * i), &(pde[i])); - PrintPT32((addr_t)(PAGE_SIZE * MAX_PTE32_ENTRIES * i), (pte32_t *)V3_VAddr((void *)(addr_t)(pde[i].pt_base_addr << PAGE_POWER))); + for (j = 0; j < MAX_PDPE64_ENTRIES; j++) { + if (tmp_pdpe[j].present) { + if (tmp_pdpe[j].large_page) { + pdpe64_1GB_t * large_pdp = (pdpe64_1GB_t *)&(tmp_pdpe[j]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_1GB(large_pdp->page_base_addr); + + callback(PAGE_1GB, (addr_t)V3_VAddr((void *)large_page_pa), large_page_pa, private_data); + } else { + addr_t pde_pa = BASE_TO_PAGE_ADDR(tmp_pdpe[j].pd_base_addr); + pde64_t * tmp_pde = (pde64_t *)V3_VAddr((void *)pde_pa); + + callback(PAGE_PD64, (addr_t)tmp_pde, pde_pa, private_data); + + for (k = 0; k < MAX_PDE64_ENTRIES; k++) { + if (tmp_pde[k].present) { + if (tmp_pde[k].large_page) { + pde64_2MB_t * large_pde = (pde64_2MB_t *)&(tmp_pde[k]); + addr_t large_page_pa = BASE_TO_PAGE_ADDR_2MB(large_pde->page_base_addr); + + callback(PAGE_2MB, (addr_t)V3_VAddr((void *)large_page_pa), large_page_pa, private_data); + } else { + addr_t pte_pa = BASE_TO_PAGE_ADDR(tmp_pde[k].pt_base_addr); + pte64_t * tmp_pte = (pte64_t *)V3_VAddr((void *)pte_pa); + + callback(PAGE_PT64, (addr_t)tmp_pte, pte_pa, private_data); + + for (m = 0; m < MAX_PTE64_ENTRIES; m++) { + if (tmp_pte[m].present) { + addr_t page_pa = BASE_TO_PAGE_ADDR(tmp_pte[m].page_base_addr); + callback(PAGE_4KB, (addr_t)V3_VAddr((void *)page_pa), page_pa, private_data); + } + } + } + } + } + } + } + } } } + return 0; +} + + + +static const uchar_t PAGE_4KB_STR[] = "4KB_PAGE"; +static const uchar_t PAGE_2MB_STR[] = "2MB_PAGE"; +static const uchar_t PAGE_4MB_STR[] = "4MB_PAGE"; +static const uchar_t PAGE_1GB_STR[] = "1GB_PAGE"; +static const uchar_t PAGE_PT32_STR[] = "32 Bit PT"; +static const uchar_t PAGE_PD32_STR[] = "32 Bit PD"; +static const uchar_t PAGE_PDP32PAE_STR[] = "32 Bit PAE PDP"; +static const uchar_t PAGE_PD32PAE_STR[] = "32 Bit PAE PD"; +static const uchar_t PAGE_PT32PAE_STR[] = "32 Bit PAE PT"; +static const uchar_t PAGE_PML464_STR[] = "64 Bit PML4"; +static const uchar_t PAGE_PDP64_STR[] = "64 Bit PDP"; +static const uchar_t PAGE_PD64_STR[] = "64 Bit PD"; +static const uchar_t PAGE_PT64_STR[] = "64 Bit PT"; + + +const uchar_t * v3_page_type_to_str(page_type_t type) { + switch (type) { + case PAGE_4KB: + return PAGE_4KB_STR; + case PAGE_2MB: + return PAGE_2MB_STR; + case PAGE_4MB: + return PAGE_4MB_STR; + case PAGE_1GB: + return PAGE_1GB_STR; + case PAGE_PT32: + return PAGE_PT32_STR; + case PAGE_PD32: + return PAGE_PD32_STR; + case PAGE_PDP32PAE: + return PAGE_PDP32PAE_STR; + case PAGE_PD32PAE: + return PAGE_PD32PAE_STR; + case PAGE_PT32PAE: + return PAGE_PT32PAE_STR; + case PAGE_PML464: + return PAGE_PML464_STR; + case PAGE_PDP64: + return PAGE_PDP64_STR; + case PAGE_PD64: + return PAGE_PD64_STR; + case PAGE_PT64: + return PAGE_PT64_STR; + default: + return NULL; + } } -