lunaix-os/kernel/proc0.c

   1 #include <arch/x86/boot/multiboot.h>
   2 #include <lunaix/common.h>
   3 #include <lunaix/lunistd.h>
   4 #include <lunaix/mm/vmm.h>
   5 #include <lunaix/peripheral/ps2kbd.h>
   6 #include <lunaix/proc.h>
   7 #include <lunaix/spike.h>
   8 #include <lunaix/syscall.h>
   9 #include <lunaix/syslog.h>
  10 #include <stddef.h>
  11
  12 #include <hal/acpi/acpi.h>
  13 #include <hal/apic.h>
  14 #include <hal/ioapic.h>
  15
  16 LOG_MODULE("PROC0")
  17
  18 extern void
  19 _lxinit_main(); /* lxinit.c */
  20
  21 void
  22 init_platform();
  23
  24 void
  25 lock_reserved_memory();
  26
  27 /**
  28  * @brief LunaixOS的零号进程，该进程永远为可执行。
  29  *
  30  * 这主要是为了保证调度器在没有进程可调度时依然有事可做。
  31  *
  32  * 同时，该进程也负责fork出我们的init进程。
  33  *
  34  */
  35 void
  36 __proc0()
  37 {
  38     init_platform();
  39     asm volatile("movw %0, %ax\n"
  40                  "movw %ax, %es\n"
  41                  "movw %ax, %ds\n"
  42                  "movw %ax, %fs\n"
  43                  "movw %ax, %gs\n"
  44                  "pushl %0\n"
  45                  "pushl %1\n"
  46                  "pushl %2\n"
  47                  "pushl %3\n"
  48                  "retf" ::"i"(UDATA_SEG),
  49                  "i"(USTACK_TOP & ~0xf),
  50                  "i"(UCODE_SEG),
  51                  "r"(&&usr));
  52 usr:
  53     if (!fork()) {
  54         asm("jmp _lxinit_main");
  55     }
  56
  57     while (1) {
  58         yield();
  59     }
  60 }
  61
  62 extern uint8_t __kernel_start;            /* link/linker.ld */
  63 extern uint8_t __kernel_end;              /* link/linker.ld */
  64 extern uint8_t __init_hhk_end;            /* link/linker.ld */
  65 extern multiboot_info_t* _k_init_mb_info; /* k_init.c */
  66
  67 void
  68 init_platform()
  69 {
  70     assert_msg(kalloc_init(), "Fail to initialize heap");
  71
  72     size_t hhk_init_pg_count = ((uintptr_t)(&__init_hhk_end)) >> PG_SIZE_BITS;
  73     kprintf(KINFO "[MM] Releaseing %d pages from 0x0.\n", hhk_init_pg_count);
  74
  75     // Fuck it, I will no longer bother this little 1MiB
  76     // I just release 4 pages for my APIC & IOAPIC remappings
  77     for (size_t i = 0; i < 3; i++) {
  78         vmm_unmap_page(KERNEL_PID, (void*)(i << PG_SIZE_BITS));
  79     }
  80
  81     // 锁定所有系统预留页（内存映射IO，ACPI之类的），并且进行1:1映射
  82     lock_reserved_memory();
  83
  84     acpi_init(_k_init_mb_info);
  85     uintptr_t ioapic_addr = acpi_get_context()->madt.ioapic->ioapic_addr;
  86     pmm_mark_page_occupied(
  87       KERNEL_PID, FLOOR(__APIC_BASE_PADDR, PG_SIZE_BITS), 0);
  88     pmm_mark_page_occupied(KERNEL_PID, FLOOR(ioapic_addr, PG_SIZE_BITS), 0);
  89
  90     vmm_set_mapping(KERNEL_PID, APIC_BASE_VADDR, __APIC_BASE_PADDR, PG_PREM_RW);
  91     vmm_set_mapping(KERNEL_PID, IOAPIC_BASE_VADDR, ioapic_addr, PG_PREM_RW);
  92
  93     apic_init();
  94     ioapic_init();
  95     timer_init(SYS_TIMER_FREQUENCY_HZ);
  96     clock_init();
  97     ps2_kbd_init();
  98
  99     syscall_install();
 100
 101     for (size_t i = 256; i < hhk_init_pg_count; i++) {
 102         vmm_unmap_page(KERNEL_PID, (void*)(i << PG_SIZE_BITS));
 103     }
 104 }
 105
 106 void
 107 lock_reserved_memory()
 108 {
 109     multiboot_memory_map_t* mmaps = _k_init_mb_info->mmap_addr;
 110     size_t map_size =
 111       _k_init_mb_info->mmap_length / sizeof(multiboot_memory_map_t);
 112     for (unsigned int i = 0; i < map_size; i++) {
 113         multiboot_memory_map_t mmap = mmaps[i];
 114         if (mmap.type == MULTIBOOT_MEMORY_AVAILABLE) {
 115             continue;
 116         }
 117         uint8_t* pa = PG_ALIGN(mmap.addr_low);
 118         size_t pg_num = CEIL(mmap.len_low, PG_SIZE_BITS);
 119         for (size_t j = 0; j < pg_num; j++) {
 120             vmm_set_mapping(KERNEL_PID,
 121                             (pa + (j << PG_SIZE_BITS)),
 122                             (pa + (j << PG_SIZE_BITS)),
 123                             PG_PREM_R);
 124         }
 125     }
 126 }