refactor: vmm_set_map has option to ignore existed mapping.

[lunaix-os.git] / lunaix-os / kernel / asm / x86 / pfault.c

diff --git a/lunaix-os/kernel/asm/x86/pfault.c b/lunaix-os/kernel/asm/x86/pfault.c
index f07c74faa54cc4f5afdaa4acd44a88f97195b4de..15f11eeb5bdf82615a83bd94d79cf12bb96e934a 100644 (file)
--- a/lunaix-os/kernel/asm/x86/pfault.c
+++ b/lunaix-os/kernel/asm/x86/pfault.c
@@ -1,62 +1,113 @@
 #include <arch/x86/interrupts.h>
 #include <arch/x86/interrupts.h>

-#include <lunaix/mm/pmm.h>
+#include <lunaix/common.h>

 #include <lunaix/mm/mm.h>
 #include <lunaix/mm/mm.h>

+#include <lunaix/mm/pmm.h>

 #include <lunaix/mm/region.h>
 #include <lunaix/mm/vmm.h>
 #include <lunaix/mm/region.h>
 #include <lunaix/mm/vmm.h>

-#include <lunaix/common.h>
-#include <lunaix/syslog.h>
-#include <lunaix/status.h>

 #include <lunaix/sched.h>
 #include <lunaix/sched.h>

+#include <lunaix/status.h>
+#include <lunaix/syslog.h>

 
 

-static void kprintf(const char* fmt, ...) { va_list args; va_start(args, fmt); __kprintf("PFAULT", fmt, args); va_end(args); }
+static void
+kprintf(const char* fmt, ...)
+{
+    va_list args;
+    va_start(args, fmt);
+    __kprintf("PFAULT", fmt, args);
+    va_end(args);
+}
+
+extern void
+__print_panic_msg(const char* msg, const isr_param* param);

 
 

-extern void __print_panic_msg(const char* msg, const isr_param* param);
+extern void __kernel_heap_start;

 
 void
 
 void

-intr_routine_page_fault (const isr_param* param) 
+intr_routine_page_fault(const isr_param* param)

 {
     uintptr_t ptr = cpu_rcr2();
     if (!ptr) {
         goto segv_term;
     }
 
 {
     uintptr_t ptr = cpu_rcr2();
     if (!ptr) {
         goto segv_term;
     }
 

-    struct mm_region* hit_region = region_get(__current, ptr);
+    v_mapping mapping;
+    if (!vmm_lookup(ptr, &mapping)) {
+        goto segv_term;
+    }

 
 

-    if (!hit_region) {
-        // Into the void...
+    if (!SEL_RPL(param->cs)) {
+        // 如果是内核页错误……
+        if (do_kernel(&mapping)) {
+            return;
+        }

         goto segv_term;
     }
 
         goto segv_term;
     }
 

-    if (param->eip == ptr && !(hit_region->attr & REGION_EXEC)) {
-        // Attempt to execute non-executable page
+    struct mm_region* hit_region = region_get(__current, ptr);
+
+    if (!hit_region) {
+        // Into the void...

         goto segv_term;
     }
 
         goto segv_term;
     }
 

-    x86_pte_t* pte = CURPROC_PTE(ptr >> 12);
+    x86_pte_t* pte = PTE_MOUNTED(PD_REFERENCED, ptr >> 12);

     if (*pte & PG_PRESENT) {
     if (*pte & PG_PRESENT) {

-        if ((hit_region->attr & REGION_PERM_MASK) == (REGION_RSHARED | REGION_READ)) {
+        if ((hit_region->attr & REGION_PERM_MASK) ==
+            (REGION_RSHARED | REGION_READ)) {

             // normal page fault, do COW
             // normal page fault, do COW

-                uintptr_t pa = (uintptr_t)vmm_dup_page(__current->pid, PG_ENTRY_ADDR(*pte));
-                pmm_free_page(__current->pid, *pte & ~0xFFF);
-                *pte = (*pte & 0xFFF) | pa | PG_WRITE;
-                return;
+            cpu_invplg(pte);
+            uintptr_t pa =
+              (uintptr_t)vmm_dup_page(__current->pid, PG_ENTRY_ADDR(*pte));
+            pmm_free_page(__current->pid, *pte & ~0xFFF);
+            *pte = (*pte & 0xFFF) | pa | PG_WRITE;
+            return;

         }
         }

-        else {
-            // impossible cases or accessing privileged page
-            goto segv_term;
-        }
-    } else {
-        if (!(*pte)) {
-            // Invalid location
-            goto segv_term;
-        }
-        // page not present, bring it from disk or somewhere else
-        __print_panic_msg("WIP page fault route", param);
-        while (1);
+        // impossible cases or accessing privileged page
+        goto segv_term;

     }
 
     }
 

+    if (!(*pte)) {
+        // Invalid location
+        goto segv_term;
+    }
+    uintptr_t loc = *pte & ~0xfff;
+    // a writable page, not present, pte attr is not null
+    //   and no indication of cached page -> a new page need to be alloc
+    if ((hit_region->attr & REGION_WRITE) && (*pte & 0xfff) && !loc) {
+        cpu_invplg(pte);
+        uintptr_t pa = pmm_alloc_page(__current->pid, 0);
+        *pte = *pte | pa | PG_PRESENT;
+        return;
+    }
+    // page not present, bring it from disk or somewhere else
+    __print_panic_msg("WIP page fault route", param);
+    while (1)
+        ;
+

 segv_term:
 segv_term:

-    kprintf(KERROR "(pid: %d) Segmentation fault on %p\n", __current->pid, ptr);
+    kprintf(KERROR "(pid: %d) Segmentation fault on %p (%p:%p)\n",
+            __current->pid,
+            ptr,
+            param->cs,
+            param->eip);

     terminate_proc(LXSEGFAULT);
     // should not reach
     terminate_proc(LXSEGFAULT);
     // should not reach

+}
+
+int
+do_kernel(v_mapping* mapping)
+{
+    uintptr_t addr = mapping->va;
+    if (addr >= &__kernel_heap_start && addr < L2_BASE_VADDR) {
+        // This is kernel heap page
+        uintptr_t pa = pmm_alloc_page(KERNEL_PID, 0);
+        *mapping->pte = (*mapping->pte & 0xfff) | pa | PG_PRESENT;
+        cpu_invplg(mapping->pte);
+        cpu_invplg(addr);
+        goto done;
+    }
+
+    return 0;
+done:
+    return 1;

 }
\ No newline at end of file
 }
\ No newline at end of file