lunaix-os/hal/acpi/acpi.c

   1 #include <hal/acpi/acpi.h>
   2
   3 #include <lunaix/mm/valloc.h>
   4 #include <lunaix/spike.h>
   5 #include <lunaix/syslog.h>
   6
   7 #include <klibc/string.h>
   8
   9 #include "parser/parser.h"
  10
  11 static acpi_context* ctx = NULL;
  12
  13 LOG_MODULE("ACPI")
  14
  15 int
  16 acpi_rsdp_validate(acpi_rsdp_t* rsdp);
  17
  18 acpi_rsdp_t*
  19 acpi_locate_rsdp();
  20
  21 int
  22 acpi_init()
  23 {
  24     acpi_rsdp_t* rsdp = acpi_locate_rsdp();
  25
  26     assert_msg(rsdp, "Fail to locate ACPI_RSDP");
  27     assert_msg(acpi_rsdp_validate(rsdp), "Invalid ACPI_RSDP (checksum failed)");
  28
  29     acpi_rsdt_t* rsdt = rsdp->rsdt;
  30
  31     ctx = vzalloc(sizeof(acpi_context));
  32     assert_msg(ctx, "Fail to create ACPI context");
  33
  34     strncpy(ctx->oem_id, rsdt->header.oem_id, 6);
  35     ctx->oem_id[6] = '\0';
  36
  37     size_t entry_n = (rsdt->header.length - sizeof(acpi_sdthdr_t)) >> 2;
  38     for (size_t i = 0; i < entry_n; i++) {
  39         acpi_sdthdr_t* sdthdr =
  40           (acpi_sdthdr_t*)((acpi_apic_t**)&(rsdt->entry))[i];
  41         switch (sdthdr->signature) {
  42             case ACPI_MADT_SIG:
  43                 kprintf(KINFO "MADT: %p\n", sdthdr);
  44                 madt_parse((acpi_madt_t*)sdthdr, ctx);
  45                 break;
  46             case ACPI_FADT_SIG:
  47                 // FADT just a plain structure, no need to parse.
  48                 kprintf(KINFO "FADT: %p\n", sdthdr);
  49                 ctx->fadt = *(acpi_fadt_t*)sdthdr;
  50                 break;
  51             case ACPI_MCFG_SIG:
  52                 kprintf(KINFO "MCFG: %p\n", sdthdr);
  53                 mcfg_parse(sdthdr, ctx);
  54                 break;
  55             default:
  56                 break;
  57         }
  58     }
  59
  60     kprintf(KINFO "ACPI: %s\n", ctx->oem_id);
  61
  62     return 0;
  63 }
  64
  65 acpi_context*
  66 acpi_get_context()
  67 {
  68     assert_msg(ctx, "ACPI is not initialized");
  69     return ctx;
  70 }
  71
  72 int
  73 acpi_rsdp_validate(acpi_rsdp_t* rsdp)
  74 {
  75     u8_t sum = 0;
  76     u8_t* rsdp_ptr = (u8_t*)rsdp;
  77     for (size_t i = 0; i < 20; i++) {
  78         sum += *(rsdp_ptr + i);
  79     }
  80
  81     return sum == 0;
  82 }
  83
  84 u8_t
  85 acpi_gsimap(u8_t old_irq)
  86 {
  87     if (old_irq >= 24) {
  88         return old_irq;
  89     }
  90     acpi_intso_t* int_override = ctx->madt.irq_exception[old_irq];
  91     return int_override ? (u8_t)int_override->gsi : old_irq;
  92 }
  93
  94 #define VIRTUAL_BOX_PROBLEM
  95
  96 acpi_rsdp_t*
  97 acpi_locate_rsdp()
  98 {
  99     acpi_rsdp_t* rsdp = NULL;
 100
 101     ptr_t mem_start = 0x4000;
 102     for (; mem_start < 0x100000; mem_start += 16) {
 103         u32_t sig_low = *((u32_t*)mem_start);
 104         // XXX: do we need to compare this as well?
 105         // u32_t sig_high = *((u32_t*)(mem_start+j) + 1);
 106
 107         if (sig_low == ACPI_RSDP_SIG_L) {
 108             rsdp = (acpi_rsdp_t*)mem_start;
 109             break;
 110         }
 111     }
 112
 113     return rsdp;
 114 }