lunaix-os/kernel/k_init.c

   1 #include <lunaix/common.h>
   2 #include <lunaix/tty/tty.h>
   3
   4 #include <lunaix/device.h>
   5 #include <lunaix/foptions.h>
   6 #include <lunaix/input.h>
   7 #include <lunaix/isrm.h>
   8 #include <lunaix/lxconsole.h>
   9 #include <lunaix/mm/mmio.h>
  10 #include <lunaix/mm/page.h>
  11 #include <lunaix/mm/pmm.h>
  12 #include <lunaix/mm/vmm.h>
  13 #include <lunaix/process.h>
  14 #include <lunaix/sched.h>
  15 #include <lunaix/spike.h>
  16 #include <lunaix/types.h>
  17
  18 #include <arch/x86/boot/multiboot.h>
  19 #include <arch/x86/idt.h>
  20 #include <arch/x86/interrupts.h>
  21
  22 #include <klibc/stdio.h>
  23 #include <klibc/string.h>
  24
  25 extern uint8_t __kernel_start;
  26 extern uint8_t __kernel_end;
  27 extern uint8_t __init_hhk_end;
  28
  29 #define PP_KERN_SHARED (PP_FGSHARED | PP_TKERN)
  30
  31 // Set remotely by kernel/asm/x86/prologue.S
  32 multiboot_info_t* _k_init_mb_info;
  33
  34 x86_page_table* __kernel_ptd;
  35
  36 extern void
  37 __proc0(); /* proc0.c */
  38
  39 void
  40 spawn_proc0();
  41
  42 void
  43 setup_memory(multiboot_memory_map_t* map, size_t map_size);
  44
  45 void
  46 _kernel_pre_init()
  47 {
  48     // interrupts
  49     _init_idt();
  50     isrm_init();
  51     intr_routine_init();
  52
  53     // memory
  54     pmm_init(MEM_1MB + (_k_init_mb_info->mem_upper << 10));
  55     vmm_init();
  56
  57     unsigned int map_size =
  58       _k_init_mb_info->mmap_length / sizeof(multiboot_memory_map_t);
  59
  60     setup_memory((multiboot_memory_map_t*)_k_init_mb_info->mmap_addr, map_size);
  61 }
  62
  63 void
  64 _kernel_init()
  65 {
  66     int errno = 0;
  67
  68     // allocators
  69     cake_init();
  70     valloc_init();
  71
  72     sched_init();
  73
  74     // crt
  75     tty_init(ioremap(VGA_FRAMEBUFFER, PG_SIZE));
  76     tty_set_theme(VGA_COLOR_WHITE, VGA_COLOR_BLACK);
  77
  78     // file system & device subsys
  79     vfs_init();
  80     fsm_init();
  81     input_init();
  82
  83     vfs_export_attributes();
  84
  85     lxconsole_init();
  86
  87     if ((errno = vfs_mount_root("ramfs", NULL))) {
  88         panickf("Fail to mount root. (errno=%d)", errno);
  89     }
  90
  91     vfs_mount("/dev", "devfs", NULL, 0);
  92     vfs_mount("/sys", "twifs", NULL, MNT_RO);
  93     vfs_mount("/task", "taskfs", NULL, MNT_RO);
  94
  95     lxconsole_spawn_ttydev();
  96
  97     syscall_install();
  98
  99     spawn_proc0();
 100 }
 101
 102 /**
 103  * @brief 创建并运行proc0进程
 104  *
 105  */
 106 void
 107 spawn_proc0()
 108 {
 109     struct proc_info* proc0 = alloc_process();
 110
 111     /**
 112      * @brief
 113      * 注意：这里和视频中说的不一样，属于我之后的一点微调。
 114      * 在视频中，spawn_proc0是在_kernel_post_init的末尾才调用的。并且是直接跳转到_proc0
 115      *
 116      * 但是我后来发现，上述的方法会产生竞态条件。这是因为spawn_proc0被调用的时候，时钟中断已经开启，
 117      * 而中断的产生会打乱栈的布局，从而使得下面的上下文设置代码产生未定义行为（Undefined
 118      * Behaviour）。 为了保险起见，有两种办法：
 119      *      1. 在创建proc0进程前关闭中断
 120      *      2. 将_kernel_post_init搬进proc0进程
 121      * （_kernel_post_init已经更名为init_platform）
 122      *
 123      * 目前的解决方案是2
 124      */
 125
 126     proc0->intr_ctx = (isr_param){ .registers = { .ds = KDATA_SEG,
 127                                                   .es = KDATA_SEG,
 128                                                   .fs = KDATA_SEG,
 129                                                   .gs = KDATA_SEG },
 130                                    .cs = KCODE_SEG,
 131                                    .eip = (void*)__proc0,
 132                                    .ss = KDATA_SEG,
 133                                    .eflags = cpu_reflags() };
 134     proc0->parent = proc0;
 135
 136     // 方案1：必须在读取eflags之后禁用。否则当进程被调度时，中断依然是关闭的！
 137     // cpu_disable_interrupt();
 138
 139     /* Ok... 首先fork进我们的零号进程，而后由那里，我们fork进init进程。 */
 140
 141     // 把当前虚拟地址空间（内核）复制一份。
 142     proc0->page_table = vmm_dup_vmspace(proc0->pid);
 143
 144     // 直接切换到新的拷贝，进行配置。
 145     cpu_lcr3(proc0->page_table);
 146
 147     // 为内核创建一个专属栈空间。
 148     for (size_t i = 0; i < (KSTACK_SIZE >> PG_SIZE_BITS); i++) {
 149         uintptr_t pa = pmm_alloc_page(KERNEL_PID, 0);
 150         vmm_set_mapping(PD_REFERENCED,
 151                         KSTACK_START + (i << PG_SIZE_BITS),
 152                         pa,
 153                         PG_PREM_RW,
 154                         VMAP_NULL);
 155     }
 156
 157     // 手动设置进程上下文：用于第一次调度
 158     asm volatile("movl %%esp, %%ebx\n"
 159                  "movl %1, %%esp\n"
 160                  "pushf\n"
 161                  "pushl %2\n"
 162                  "pushl %3\n"
 163                  "pushl $0\n"
 164                  "pushl $0\n"
 165                  "movl %%esp, %0\n"
 166                  "movl %%ebx, %%esp\n"
 167                  : "=m"(proc0->intr_ctx.registers.esp)
 168                  : "i"(KSTACK_TOP), "i"(KCODE_SEG), "r"(proc0->intr_ctx.eip)
 169                  : "%ebx", "memory");
 170
 171     // 加载x87默认配置
 172     asm volatile("fninit\n"
 173                  "fxsave (%%eax)" ::"a"(proc0->fxstate)
 174                  : "memory");
 175
 176     // 向调度器注册进程。
 177     commit_process(proc0);
 178
 179     // 由于时钟中断与APIC未就绪，我们需要手动进行第一次调度。这里也会同时隐式地恢复我们的eflags.IF位
 180     proc0->state = PS_RUNNING;
 181     asm volatile("pushl %0\n"
 182                  "jmp switch_to\n" ::"r"(proc0));
 183
 184     /* Should not return */
 185     assert_msg(0, "Unexpected Return");
 186 }
 187
 188 extern void __usrtext_start;
 189 extern void __usrtext_end;
 190
 191 // 按照 Memory map 标识可用的物理页
 192 void
 193 setup_memory(multiboot_memory_map_t* map, size_t map_size)
 194 {
 195
 196     // First pass, to mark the physical pages
 197     for (unsigned int i = 0; i < map_size; i++) {
 198         multiboot_memory_map_t mmap = map[i];
 199         if (mmap.type == MULTIBOOT_MEMORY_AVAILABLE) {
 200             // 整数向上取整除法
 201             uintptr_t pg = map[i].addr_low + 0x0fffU;
 202             pmm_mark_chunk_free(pg >> PG_SIZE_BITS,
 203                                 map[i].len_low >> PG_SIZE_BITS);
 204         }
 205     }
 206
 207     // 将内核占据的页，包括前1MB，hhk_init 设为已占用
 208     size_t pg_count = V2P(&__kernel_end) >> PG_SIZE_BITS;
 209     pmm_mark_chunk_occupied(KERNEL_PID, 0, pg_count, PP_FGLOCKED);
 210
 211     for (uintptr_t i = &__usrtext_start; i < &__usrtext_end; i += PG_SIZE) {
 212         vmm_set_mapping(PD_REFERENCED, i, V2P(i), PG_PREM_UR, VMAP_NULL);
 213     }
 214
 215     // reserve higher half
 216     for (size_t i = L1_INDEX(KERNEL_MM_BASE); i < 1023; i++) {
 217         assert(vmm_set_mapping(PD_REFERENCED, i << 22, 0, 0, VMAP_NOMAP));
 218     }
 219 }