great check-in message:
[coreboot.git] / src / arch / i386 / boot / acpi.c
index ca9b66f7443a333ca7547dedd4efc80cc7b6a783..e1734d80e7cc1f4ca8dcc33cbbc972d47d6b0bde 100644 (file)
@@ -1,28 +1,32 @@
 /*
  * LinuxBIOS ACPI Table support
  * written by Stefan Reinauer <stepan@openbios.org>
- * (C) 2004 SUSE LINUX AG
+ *  (C) 2004 SUSE LINUX AG
+ *  (C) 2005 Stefan Reinauer
+ *
+ * ACPI FADT, FACS, and DSDT table support added by 
+ * Nick Barker <nick.barker9@btinternet.com>, and those portions
+ *  (C) Copyright 2004 Nick Barker
+ *
+ * Copyright 2005 ADVANCED MICRO DEVICES, INC. All Rights Reserved.
+ * 2005.9 yhlu add SRAT table generation
+ */
+
+/* 
+ * Each system port implementing ACPI has to provide two functions:
+ * 
+ *   write_acpi_tables()
+ *   acpi_dump_apics()
+ *   
+ * See AMD Solo, Island Aruma or Via Epia-M port for more details.
  */
 
 #include <console/console.h>
 #include <string.h>
 #include <arch/acpi.h>
+#include <device/pci.h>
 
-#define RSDP_SIG              "RSD PTR "  /* RSDT Pointer signature */
-#define RSDP_NAME             "RSDP"
-
-#define RSDT_NAME             "RSDT"
-#define HPET_NAME             "HPET"
-#define MADT_NAME             "APIC"
-
-#define RSDT_TABLE            "RSDT    "
-#define HPET_TABLE            "AMD64   "
-#define MADT_TABLE            "MADT    "
-
-#define OEM_ID                "LXBIOS"
-#define ASLC                  "NONE"
-
-static u8 acpi_checksum(u8 *table, u32 length)
+u8 acpi_checksum(u8 *table, u32 length)
 {
        u8 ret=0;
        while (length--) {
@@ -36,29 +40,33 @@ static u8 acpi_checksum(u8 *table, u32 length)
  * add an acpi table to rsdt structure, and recalculate checksum
  */
 
-static void acpi_add_table(acpi_rsdt_t *rsdt, void *table)
+void acpi_add_table(acpi_rsdt_t *rsdt, void *table)
 {
        int i;
-
-       for (i=0; i<8; i++) {
+       
+       int entries_num = sizeof(rsdt->entry)/sizeof(rsdt->entry[0]);
+       
+       for (i=0; i<entries_num; i++) {
                if(rsdt->entry[i]==0) {
                        rsdt->entry[i]=(u32)table;
+                       /* fix length to stop kernel winging about invalid entries */
+                       rsdt->header.length = sizeof(acpi_header_t) + (sizeof(u32) * (i+1));
                        /* fix checksum */
                        /* hope this won't get optimized away */
                        rsdt->header.checksum=0;
                        rsdt->header.checksum=acpi_checksum((u8 *)rsdt,
                                        rsdt->header.length);
                        
-                       printk_debug("ACPI: added table %d/8\n",i+1);
+                       printk_debug("ACPI: added table %d/%d Length now %d\n",i+1, entries_num, rsdt->header.length);
                        return;
                }
        }
 
-       printk_warning("ACPI: could not ACPI table. failed.\n");
+       printk_warning("ACPI: could not add ACPI table to RSDT. failed.\n");
 }
 
 
-static int acpi_create_madt_lapic(acpi_madt_lapic_t *lapic, u8 cpu, u8 apic)
+int acpi_create_madt_lapic(acpi_madt_lapic_t *lapic, u8 cpu, u8 apic)
 {
        lapic->type=0;
        lapic->length=sizeof(acpi_madt_lapic_t);
@@ -70,12 +78,12 @@ static int acpi_create_madt_lapic(acpi_madt_lapic_t *lapic, u8 cpu, u8 apic)
        return(lapic->length);
 }
 
-static int acpi_create_madt_ioapic(acpi_madt_ioapic_t *ioapic, u8 id, u32 addr
+int acpi_create_madt_ioapic(acpi_madt_ioapic_t *ioapic, u8 id, u32 addr,u32 gsi_base
 {
        ioapic->type=1;
        ioapic->length=sizeof(acpi_madt_ioapic_t);
        ioapic->reserved=0x00;
-       ioapic->gsi_base=0x00000000;
+       ioapic->gsi_base=gsi_base;
        
        ioapic->ioapic_id=id;
        ioapic->ioapic_addr=addr;
@@ -83,13 +91,11 @@ static int acpi_create_madt_ioapic(acpi_madt_ioapic_t *ioapic, u8 id, u32 addr)
        return(ioapic->length);
 }
 
-static int acpi_create_madt_irqoverride(acpi_madt_irqoverride_t *irqoverride,
+int acpi_create_madt_irqoverride(acpi_madt_irqoverride_t *irqoverride,
                u8 bus, u8 source, u32 gsirq, u16 flags)
 {
        irqoverride->type=2;
        irqoverride->length=sizeof(acpi_madt_irqoverride_t);
-       irqoverride->flags=0x0001;
-       
        irqoverride->bus=bus;
        irqoverride->source=source;
        irqoverride->gsirq=gsirq;
@@ -98,7 +104,7 @@ static int acpi_create_madt_irqoverride(acpi_madt_irqoverride_t *irqoverride,
        return(irqoverride->length);
 }
 
-static int acpi_create_madt_lapic_nmi(acpi_madt_lapic_nmi_t *lapic_nmi, u8 cpu,
+int acpi_create_madt_lapic_nmi(acpi_madt_lapic_nmi_t *lapic_nmi, u8 cpu,
                u16 flags, u8 lint)
 {
        lapic_nmi->type=4;
@@ -111,10 +117,10 @@ static int acpi_create_madt_lapic_nmi(acpi_madt_lapic_nmi_t *lapic_nmi, u8 cpu,
        return(lapic_nmi->length);
 }
 
-static void acpi_create_madt(acpi_madt_t *madt)
+void acpi_create_madt(acpi_madt_t *madt)
 {
 #define LOCAL_APIC_ADDR        0xfee00000ULL
-#define IO_APIC_ADDR   0xfec00000UL
+       
        acpi_header_t *header=&(madt->header);
        unsigned long current=(unsigned long)madt+sizeof(acpi_madt_t);
        
@@ -131,26 +137,98 @@ static void acpi_create_madt(acpi_madt_t *madt)
 
        madt->lapic_addr= LOCAL_APIC_ADDR;
        madt->flags     = 0x1; /* PCAT_COMPAT */
-       
-       /* create all subtables for 1p */
-       current += acpi_create_madt_lapic((acpi_madt_lapic_t *)current, 0, 0);
-       current += acpi_create_madt_ioapic((acpi_madt_ioapic_t *)current, 2,
-                       IO_APIC_ADDR);
-       current += acpi_create_madt_irqoverride( (acpi_madt_irqoverride_t *)
-                       current, 0, 0, 2, 1 /* active high */);
-       current += acpi_create_madt_irqoverride( (acpi_madt_irqoverride_t *)
-                       current, 0, 9, 9, 0xf /* active low, level triggered */);
-       current += acpi_create_madt_lapic_nmi( (acpi_madt_lapic_nmi_t *)
-                       current, 0, 5, 1);
 
+       current = acpi_fill_madt(current);
+       
        /* recalculate length */
        header->length= current - (unsigned long)madt;
        
        header->checksum        = acpi_checksum((void *)madt, header->length);
 }
 
+int acpi_create_srat_lapic(acpi_srat_lapic_t *lapic, u8 node, u8 apic)
+{
+        lapic->type=0;
+        lapic->length=sizeof(acpi_srat_lapic_t);
+        lapic->flags=1;
+
+        lapic->proximity_domain_7_0 = node;
+        lapic->apic_id=apic;
+
+        return(lapic->length);
+}
+
+int acpi_create_srat_mem(acpi_srat_mem_t *mem, u8 node, u32 basek,u32 sizek, u32 flags)
+{
+        mem->type=1;
+        mem->length=sizeof(acpi_srat_mem_t);
+
+        mem->base_address_low = (basek<<10);
+       mem->base_address_high = (basek>>(32-10));
+
+        mem->length_low = (sizek<<10);
+        mem->length_high = (sizek>>(32-10));
+
+        mem->proximity_domain = node;
+
+       mem->flags = flags; 
+
+        return(mem->length);
+}
+
+void acpi_create_srat(acpi_srat_t *srat)
+{
+
+        acpi_header_t *header=&(srat->header);
+        unsigned long current=(unsigned long)srat+sizeof(acpi_srat_t);
+
+        memset((void *)srat, 0, sizeof(acpi_srat_t));
+
+        /* fill out header fields */
+        memcpy(header->signature, SRAT_NAME, 4);
+        memcpy(header->oem_id, OEM_ID, 6);
+        memcpy(header->oem_table_id, SRAT_TABLE, 8);
+        memcpy(header->asl_compiler_id, ASLC, 4);
+
+        header->length = sizeof(acpi_srat_t);
+        header->revision = 1;
+
+        srat->resv     = 0x1; /* BACK COMP */
+
+        current = acpi_fill_srat(current);
+
+        /* recalculate length */
+        header->length= current - (unsigned long)srat;
+
+        header->checksum        = acpi_checksum((void *)srat, header->length);
+}
+
+void acpi_create_slit(acpi_slit_t *slit)
+{
+
+        acpi_header_t *header=&(slit->header);
+        unsigned long current=(unsigned long)slit+sizeof(acpi_slit_t);
+
+        memset((void *)slit, 0, sizeof(acpi_slit_t));
+
+        /* fill out header fields */
+        memcpy(header->signature, SLIT_NAME, 4);
+        memcpy(header->oem_id, OEM_ID, 6);
+        memcpy(header->oem_table_id, SLIT_TABLE, 8);
+        memcpy(header->asl_compiler_id, ASLC, 4);
+
+        header->length = sizeof(acpi_slit_t);
+        header->revision = 1;
+
+//        current = acpi_fill_slit(current);
+
+        /* recalculate length */
+        header->length= current - (unsigned long)slit;
 
-static void acpi_create_hpet(acpi_hpet_t *hpet)
+        header->checksum        = acpi_checksum((void *)slit, header->length);
+}
+
+void acpi_create_hpet(acpi_hpet_t *hpet)
 {
 #define HPET_ADDR  0xfed00000ULL
        acpi_header_t *header=&(hpet->header);
@@ -181,7 +259,22 @@ static void acpi_create_hpet(acpi_hpet_t *hpet)
        header->checksum        = acpi_checksum((void *)hpet, sizeof(acpi_hpet_t));
 }
 
-static void acpi_write_rsdt(acpi_rsdt_t *rsdt)
+void acpi_create_facs(acpi_facs_t *facs)
+{
+       memset( (void *)facs,0, sizeof(acpi_facs_t));
+
+       memcpy(facs->signature,"FACS",4);
+       facs->length = sizeof(acpi_facs_t);
+       facs->hardware_signature = 0;
+       facs->firmware_waking_vector = 0;
+       facs->global_lock = 0;
+       facs->flags = 0;
+       facs->x_firmware_waking_vector_l = 0;
+       facs->x_firmware_waking_vector_h = 0;
+       facs->version = 1;
+}
+
+void acpi_write_rsdt(acpi_rsdt_t *rsdt)
 { 
        acpi_header_t *header=&(rsdt->header);
        
@@ -203,7 +296,7 @@ static void acpi_write_rsdt(acpi_rsdt_t *rsdt)
        header->checksum        = acpi_checksum((void *)rsdt, sizeof(acpi_rsdt_t));
 }
 
-static void acpi_write_rsdp(acpi_rsdp_t *rsdp, acpi_rsdt_t *rsdt)
+void acpi_write_rsdp(acpi_rsdp_t *rsdp, acpi_rsdt_t *rsdt)
 {
        memcpy(rsdp->signature, RSDP_SIG, 8);
        memcpy(rsdp->oem_id, OEM_ID, 6);
@@ -212,58 +305,6 @@ static void acpi_write_rsdp(acpi_rsdp_t *rsdp, acpi_rsdt_t *rsdt)
        rsdp->rsdt_address      = (u32)rsdt;
        rsdp->checksum          = acpi_checksum((void *)rsdp, 20);
        rsdp->ext_checksum      = acpi_checksum((void *)rsdp, sizeof(acpi_rsdp_t));
-       
 }
 
-unsigned long write_acpi_tables(unsigned long start)
-{
-       unsigned long current;
-       acpi_rsdp_t *rsdp;
-       acpi_rsdt_t *rsdt;
-       acpi_hpet_t *hpet;
-       acpi_madt_t *madt;
-       
-       /* Align ACPI tables to 16byte */
-       start   = ( start + 0x0f ) & -0x10;
-       current = start;
-       
-       printk_info("ACPI: Writing ACPI tables at %lx...\n", start);
-
-       /* We need at least an RSDP and an RSDT Table */
-       rsdp = (acpi_rsdp_t *) current;
-       current += sizeof(acpi_rsdp_t);
-       rsdt = (acpi_rsdt_t *) current;
-       current += sizeof(acpi_rsdt_t);
-
-       /* clear all table memory */
-       memset((void *)start, 0, current - start);
-       
-       acpi_write_rsdp(rsdp, rsdt);
-       acpi_write_rsdt(rsdt);
-       
-       /*
-        * We explicitly add these tables later on:
-        */
-#define HAVE_ACPI_HPET
-#ifdef HAVE_ACPI_HPET
-       printk_debug("ACPI:    * HPET\n");
-
-       hpet = (acpi_hpet_t *) current;
-       current += sizeof(acpi_hpet_t);
-       acpi_create_hpet(hpet);
-       acpi_add_table(rsdt,hpet);
-
-       /* If we want to use HPET Timers Linux wants an MADT */
-       printk_debug("ACPI:    * MADT\n");
-
-       madt = (acpi_madt_t *) current;
-       acpi_create_madt(madt);
-       current+=madt->header.length;
-       acpi_add_table(rsdt,madt);
-
-
-#endif
-       printk_info("ACPI: done.\n");
-       return current;
-}