refactor: clean up the virtual memory mappings

[lunaix-os.git] / lunaix-os / kernel / sched.c

diff --git a/lunaix-os/kernel/sched.c b/lunaix-os/kernel/sched.c
index 5081ccf83ed6c6d03b6ad194ff2e7b2b6c3132a4..9061e8032c156bcdd61d7c5b30df2b73e66e4dba 100644 (file)
--- a/lunaix-os/kernel/sched.c
+++ b/lunaix-os/kernel/sched.c
@@ -4,8 +4,10 @@
 #include <hal/apic.h>
 #include <hal/cpu.h>
 
 #include <hal/apic.h>
 #include <hal/cpu.h>
 

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

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

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

 #include <lunaix/mm/vmm.h>
 #include <lunaix/process.h>
 #include <lunaix/sched.h>
 #include <lunaix/mm/vmm.h>
 #include <lunaix/process.h>
 #include <lunaix/sched.h>


@@ -15,7 +17,8 @@
 #include <lunaix/syscall.h>
 #include <lunaix/syslog.h>
 
 #include <lunaix/syscall.h>
 #include <lunaix/syslog.h>
 

-#define MAX_PROCESS 512
+#define PROC_TABLE_SIZE 8192
+#define MAX_PROCESS (PROC_TABLE_SIZE / sizeof(uintptr_t))

 
 volatile struct proc_info* __current;
 
 
 volatile struct proc_info* __current;
 


@@ -23,20 +26,25 @@ struct proc_info dummy;
 
 struct scheduler sched_ctx;
 
 
 struct scheduler sched_ctx;
 

+struct cake_pile* proc_pile;
+

 LOG_MODULE("SCHED")
 
 void
 sched_init()
 {
 LOG_MODULE("SCHED")
 
 void
 sched_init()
 {

-    size_t pg_size = ROUNDUP(sizeof(struct proc_info) * MAX_PROCESS, 0x1000);
+    // size_t pg_size = ROUNDUP(sizeof(struct proc_info) * MAX_PROCESS, 0x1000);

 
 

-    for (size_t i = 0; i <= pg_size; i += 4096) {
-        uintptr_t pa = pmm_alloc_page(KERNEL_PID, PP_FGPERSIST);
-        vmm_set_mapping(
-          PD_REFERENCED, PROC_START + i, pa, PG_PREM_RW, VMAP_NULL);
-    }
+    // for (size_t i = 0; i <= pg_size; i += 4096) {
+    //     uintptr_t pa = pmm_alloc_page(KERNEL_PID, PP_FGPERSIST);
+    //     vmm_set_mapping(
+    //       PD_REFERENCED, PROC_START + i, pa, PG_PREM_RW, VMAP_NULL);
+    // }
+
+    proc_pile = cake_new_pile("proc", sizeof(struct proc_info), 1, 0);
+    cake_set_constructor(proc_pile, cake_ctor_zeroing);

 
 

-    sched_ctx = (struct scheduler){ ._procs = (struct proc_info*)PROC_START,
+    sched_ctx = (struct scheduler){ ._procs = vzalloc(PROC_TABLE_SIZE),

                                     .ptable_len = 0,
                                     .procs_index = 0 };
 }
                                     .ptable_len = 0,
                                     .procs_index = 0 };
 }


@@ -59,7 +67,8 @@ run(struct proc_info* proc)
     apic_done_servicing();
 
     asm volatile("pushl %0\n"
     apic_done_servicing();
 
     asm volatile("pushl %0\n"

-                 "jmp switch_to\n" ::"r"(proc)); // kernel/asm/x86/interrupt.S
+                 "jmp switch_to\n" ::"r"(proc)
+                 : "memory"); // kernel/asm/x86/interrupt.S

 }
 
 int
 }
 
 int


@@ -78,7 +87,7 @@ can_schedule(struct proc_info* proc)
 void
 check_sleepers()
 {
 void
 check_sleepers()
 {

-    struct proc_info* leader = &sched_ctx._procs[0];
+    struct proc_info* leader = sched_ctx._procs[0];

     struct proc_info *pos, *n;
     time_t now = clock_systime();
     llist_for_each(pos, n, &leader->sleep.sleepers, sleep.sleepers)
     struct proc_info *pos, *n;
     time_t now = clock_systime();
     llist_for_each(pos, n, &leader->sleep.sleepers, sleep.sleepers)


@@ -92,7 +101,7 @@ check_sleepers()
 
         if (wtime && now >= wtime) {
             pos->sleep.wakeup_time = 0;
 
         if (wtime && now >= wtime) {
             pos->sleep.wakeup_time = 0;

-            pos->state = PS_STOPPED;
+            pos->state = PS_READY;

         }
 
         if (atime && now >= atime) {
         }
 
         if (atime && now >= atime) {


@@ -121,7 +130,7 @@ schedule()
     int ptr = prev_ptr;
 
     if (!(__current->state & ~PS_RUNNING)) {
     int ptr = prev_ptr;
 
     if (!(__current->state & ~PS_RUNNING)) {

-        __current->state = PS_STOPPED;
+        __current->state = PS_READY;

     }
 
     check_sleepers();
     }
 
     check_sleepers();


@@ -130,8 +139,8 @@ schedule()
 redo:
     do {
         ptr = (ptr + 1) % sched_ctx.ptable_len;
 redo:
     do {
         ptr = (ptr + 1) % sched_ctx.ptable_len;

-        next = &sched_ctx._procs[ptr];
-    } while (next->state != PS_STOPPED && ptr != prev_ptr);
+        next = sched_ctx._procs[ptr];
+    } while (!next || (next->state != PS_READY && ptr != prev_ptr));

 
     sched_ctx.procs_index = ptr;
 
 
     sched_ctx.procs_index = ptr;
 


@@ -143,6 +152,13 @@ redo:
     run(next);
 }
 
     run(next);
 }
 

+void
+sched_yieldk()
+{
+    cpu_enable_interrupt();
+    cpu_int(LUNAIX_SCHED);
+}
+

 __DEFINE_LXSYSCALL1(unsigned int, sleep, unsigned int, seconds)
 {
     if (!seconds) {
 __DEFINE_LXSYSCALL1(unsigned int, sleep, unsigned int, seconds)
 {
     if (!seconds) {


@@ -153,9 +169,9 @@ __DEFINE_LXSYSCALL1(unsigned int, sleep, unsigned int, seconds)
         return (__current->sleep.wakeup_time - clock_systime()) / 1000U;
     }
 
         return (__current->sleep.wakeup_time - clock_systime()) / 1000U;
     }
 

+    struct proc_info* root_proc = sched_ctx._procs[0];

     __current->sleep.wakeup_time = clock_systime() + seconds * 1000;
     __current->sleep.wakeup_time = clock_systime() + seconds * 1000;

-    llist_append(&sched_ctx._procs[0].sleep.sleepers,
-                 &__current->sleep.sleepers);
+    llist_append(&root_proc->sleep.sleepers, &__current->sleep.sleepers);

 
     __current->intr_ctx.registers.eax = seconds;
     __current->state = PS_BLOCKED;
 
     __current->intr_ctx.registers.eax = seconds;
     __current->state = PS_BLOCKED;


@@ -169,9 +185,9 @@ __DEFINE_LXSYSCALL1(unsigned int, alarm, unsigned int, seconds)
 
     __current->sleep.alarm_time = seconds ? now + seconds * 1000 : 0;
 
 
     __current->sleep.alarm_time = seconds ? now + seconds * 1000 : 0;
 

+    struct proc_info* root_proc = sched_ctx._procs[0];

     if (llist_empty(&__current->sleep.sleepers)) {
     if (llist_empty(&__current->sleep.sleepers)) {

-        llist_append(&sched_ctx._procs[0].sleep.sleepers,
-                     &__current->sleep.sleepers);
+        llist_append(&root_proc->sleep.sleepers, &__current->sleep.sleepers);

     }
 
     return prev_ddl ? (prev_ddl - now) / 1000 : 0;
     }
 
     return prev_ddl ? (prev_ddl - now) / 1000 : 0;


@@ -201,6 +217,11 @@ __DEFINE_LXSYSCALL3(pid_t, waitpid, pid_t, pid, int*, status, int, options)
     return _wait(pid, status, options);
 }
 
     return _wait(pid, status, options);
 }
 

+__DEFINE_LXSYSCALL(int, geterrno)
+{
+    return __current->k_status;
+}
+

 pid_t
 _wait(pid_t wpid, int* status, int options)
 {
 pid_t
 _wait(pid_t wpid, int* status, int options)
 {


@@ -212,7 +233,6 @@ _wait(pid_t wpid, int* status, int options)
     }
 
     wpid = wpid ? wpid : -__current->pgid;
     }
 
     wpid = wpid ? wpid : -__current->pgid;

-    cpu_enable_interrupt();

 repeat:
     llist_for_each(proc, n, &__current->children, siblings)
     {
 repeat:
     llist_for_each(proc, n, &__current->children, siblings)
     {


@@ -221,7 +241,7 @@ repeat:
                 status_flags |= PEXITTERM;
                 goto done;
             }
                 status_flags |= PEXITTERM;
                 goto done;
             }

-            if (proc->state == PS_STOPPED && (options & WUNTRACED)) {
+            if (proc->state == PS_READY && (options & WUNTRACED)) {

                 status_flags |= PEXITSTOP;
                 goto done;
             }
                 status_flags |= PEXITSTOP;
                 goto done;
             }


@@ -231,11 +251,10 @@ repeat:
         return 0;
     }
     // 放弃当前的运行机会
         return 0;
     }
     // 放弃当前的运行机会

-    sched_yield();
+    sched_yieldk();

     goto repeat;
 
 done:
     goto repeat;
 
 done:

-    cpu_disable_interrupt();

     status_flags |= PEXITSIG * (proc->sig_inprogress != 0);
     if (status) {
         *status = proc->exit_code | status_flags;
     status_flags |= PEXITSIG * (proc->sig_inprogress != 0);
     if (status) {
         *status = proc->exit_code | status_flags;


@@ -247,8 +266,7 @@ struct proc_info*
 alloc_process()
 {
     pid_t i = 0;
 alloc_process()
 {
     pid_t i = 0;

-    for (; i < sched_ctx.ptable_len && sched_ctx._procs[i].state != PS_DESTROY;
-         i++)
+    for (; i < sched_ctx.ptable_len && sched_ctx._procs[i]; i++)

         ;
 
     if (i == MAX_PROCESS) {
         ;
 
     if (i == MAX_PROCESS) {


@@ -259,18 +277,21 @@ alloc_process()
         sched_ctx.ptable_len++;
     }
 
         sched_ctx.ptable_len++;
     }
 

-    struct proc_info* proc = &sched_ctx._procs[i];
-    memset(proc, 0, sizeof(*proc));
+    struct proc_info* proc = cake_grab(proc_pile);

 
     proc->state = PS_CREATED;
     proc->pid = i;
     proc->created = clock_systime();
     proc->pgid = proc->pid;
 
     proc->state = PS_CREATED;
     proc->pid = i;
     proc->created = clock_systime();
     proc->pgid = proc->pid;

+    proc->fdtable = vzalloc(sizeof(struct v_fdtable));

 
 

-    llist_init_head(&proc->mm.regions);
+    llist_init_head(&proc->mm.regions.head);

     llist_init_head(&proc->children);
     llist_init_head(&proc->grp_member);
     llist_init_head(&proc->sleep.sleepers);
     llist_init_head(&proc->children);
     llist_init_head(&proc->grp_member);
     llist_init_head(&proc->sleep.sleepers);

+    waitq_init(&proc->waitqueue);
+
+    sched_ctx._procs[i] = proc;

 
     return proc;
 }
 
     return proc;
 }


@@ -278,21 +299,21 @@ alloc_process()
 void
 commit_process(struct proc_info* process)
 {
 void
 commit_process(struct proc_info* process)
 {

-    assert(process == &sched_ctx._procs[process->pid]);
+    assert(process == sched_ctx._procs[process->pid]);

 
     if (process->state != PS_CREATED) {
 
     if (process->state != PS_CREATED) {

-        __current->k_status = LXINVL;
+        __current->k_status = EINVAL;

         return;
     }
 
     // every process is the child of first process (pid=1)
     if (!process->parent) {
         return;
     }
 
     // every process is the child of first process (pid=1)
     if (!process->parent) {

-        process->parent = &sched_ctx._procs[1];
+        process->parent = sched_ctx._procs[1];

     }
 
     llist_append(&process->parent->children, &process->siblings);
 
     }
 
     llist_append(&process->parent->children, &process->siblings);
 

-    process->state = PS_STOPPED;
+    process->state = PS_READY;

 }
 
 // from <kernel/process.c>
 }
 
 // from <kernel/process.c>


@@ -304,17 +325,26 @@ destroy_process(pid_t pid)
 {
     int index = pid;
     if (index <= 0 || index > sched_ctx.ptable_len) {
 {
     int index = pid;
     if (index <= 0 || index > sched_ctx.ptable_len) {

-        __current->k_status = LXINVLDPID;
+        __current->k_status = EINVAL;

         return;
     }
         return;
     }

-    struct proc_info* proc = &sched_ctx._procs[index];
-    proc->state = PS_DESTROY;
+    struct proc_info* proc = sched_ctx._procs[index];
+    sched_ctx._procs[index] = 0;
+

     llist_delete(&proc->siblings);
 
     llist_delete(&proc->siblings);
 

+    for (size_t i = 0; i < VFS_MAX_FD; i++) {
+        struct v_fd* fd = proc->fdtable->fds[i];
+        if (fd)
+            vfs_close(fd->file);
+    }
+
+    vfree(proc->fdtable);
+

     struct mm_region *pos, *n;
     llist_for_each(pos, n, &proc->mm.regions.head, head)
     {
     struct mm_region *pos, *n;
     llist_for_each(pos, n, &proc->mm.regions.head, head)
     {

-        lxfree(pos);
+        vfree(pos);

     }
 
     vmm_mount_pd(PD_MOUNT_1, proc->page_table);
     }
 
     vmm_mount_pd(PD_MOUNT_1, proc->page_table);


@@ -323,6 +353,8 @@ destroy_process(pid_t pid)
 
     vmm_unmount_pd(PD_MOUNT_1);
 
 
     vmm_unmount_pd(PD_MOUNT_1);
 

+    cake_release(proc_pile, proc);
+

     return pid;
 }
 
     return pid;
 }
 


@@ -342,7 +374,7 @@ get_process(pid_t pid)
     if (index < 0 || index > sched_ctx.ptable_len) {
         return NULL;
     }
     if (index < 0 || index > sched_ctx.ptable_len) {
         return NULL;
     }

-    return &sched_ctx._procs[index];
+    return sched_ctx._procs[index];

 }
 
 int
 }
 
 int


@@ -352,7 +384,7 @@ orphaned_proc(pid_t pid)
         return 0;
     if (pid >= sched_ctx.ptable_len)
         return 0;
         return 0;
     if (pid >= sched_ctx.ptable_len)
         return 0;

-    struct proc_info* proc = &sched_ctx._procs[pid];
+    struct proc_info* proc = sched_ctx._procs[pid];

     struct proc_info* parent = proc->parent;
 
     // 如果其父进程的状态是terminated 或 destroy中的一种
     struct proc_info* parent = proc->parent;
 
     // 如果其父进程的状态是terminated 或 destroy中的一种