/* $OpenBSD: acpimadt.c,v 1.1 2006/11/15 21:39:06 kettenis Exp $ */ /* * Copyright (c) 2006 Mark Kettenis * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice appear in all copies. * * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "ioapic.h" int acpimadt_match(struct device *, void *, void *); void acpimadt_attach(struct device *, struct device *, void *); struct cfattach acpimadt_ca = { sizeof(struct device), acpimadt_match, acpimadt_attach }; struct cfdriver acpimadt_cd = { NULL, "acpimadt", DV_DULL }; void acpimadt_cfg_intr(int, u_int32_t *); int acpimadt_print(void *, const char *); int acpimadt_match(struct device *parent, void *match, void *aux) { struct acpi_attach_args *aaa = aux; struct acpi_table_header *hdr; /* * If we do not have a table, it is not us */ if (aaa->aaa_table == NULL) return (0); /* * If it is an MADT table, we can attach */ hdr = (struct acpi_table_header *)aaa->aaa_table; if (memcmp(hdr->signature, MADT_SIG, sizeof(MADT_SIG) - 1) != 0) return (0); return (1); } struct mp_bus acpimadt_busses[256]; struct mp_bus acpimadt_isa_bus; void acpimadt_cfg_intr(int flags, u_int32_t *redir) { int mpspo = flags & 0x03; /* XXX magic */ int mpstrig = (flags >> 2) & 0x03; /* XXX magic */ *redir &= ~IOAPIC_REDLO_DEL_MASK; switch (mpspo) { case MPS_INTPO_DEF: case MPS_INTPO_ACTHI: *redir &= ~IOAPIC_REDLO_ACTLO; break; case MPS_INTPO_ACTLO: *redir |= IOAPIC_REDLO_ACTLO; break; default: panic("unknown MPS interrupt polarity %d", mpspo); } *redir |= (IOAPIC_REDLO_DEL_LOPRI << IOAPIC_REDLO_DEL_SHIFT); switch (mpstrig) { case MPS_INTTR_LEVEL: *redir |= IOAPIC_REDLO_LEVEL; break; case MPS_INTTR_DEF: case MPS_INTTR_EDGE: *redir &= ~IOAPIC_REDLO_LEVEL; break; default: panic("unknown MPS interrupt trigger %d", mpstrig); } } void acpimadt_attach(struct device *parent, struct device *self, void *aux) { struct device *mainbus = parent->dv_parent; struct acpi_attach_args *aaa = aux; struct acpi_madt *madt = (struct acpi_madt *)aaa->aaa_table; caddr_t addr = (caddr_t)(madt + 1); struct mp_intr_map *map; struct ioapic_softc *apic; int pin; printf(" addr 0x%x", madt->local_apic_address); if (madt->flags & ACPI_APIC_PCAT_COMPAT) printf(": PC-AT compat"); printf("\n"); mp_busses = acpimadt_busses; mp_isa_bus = &acpimadt_isa_bus; lapic_boot_init(madt->local_apic_address); while (addr < (caddr_t)madt + madt->hdr.length) { union acpi_madt_entry *entry = (union acpi_madt_entry *)addr; switch(entry->madt_lapic.apic_type) { case ACPI_MADT_LAPIC: printf("LAPIC: acpi_proc_id %x, apic_id %x, flags 0x%x\n", entry->madt_lapic.acpi_proc_id, entry->madt_lapic.apic_id, entry->madt_lapic.flags); { struct cpu_attach_args caa; if ((entry->madt_lapic.flags & ACPI_PROC_ENABLE) == 0) break; memset(&caa, 0, sizeof(struct cpu_attach_args)); if (entry->madt_lapic.apic_id == 0) caa.cpu_role = CPU_ROLE_BP; else caa.cpu_role = CPU_ROLE_AP; caa.caa_name = "cpu"; caa.cpu_number = entry->madt_lapic.apic_id; caa.cpu_func = &mp_cpu_funcs; extern int cpu_id, cpu_feature; caa.cpu_signature = cpu_id; caa.feature_flags = cpu_feature; config_found(mainbus, &caa, acpimadt_print); } break; case ACPI_MADT_IOAPIC: printf("IOAPIC: acpi_ioapic_id %x, address 0x%x, global_int_base 0x%x\n", entry->madt_ioapic.acpi_ioapic_id, entry->madt_ioapic.address, entry->madt_ioapic.global_int_base); { struct apic_attach_args aaa; memset(&aaa, 0, sizeof(struct apic_attach_args)); aaa.aaa_name = "ioapic"; aaa.apic_id = entry->madt_ioapic.acpi_ioapic_id; aaa.apic_address = entry->madt_ioapic.address; aaa.apic_vecbase = entry->madt_ioapic.global_int_base; config_found(mainbus, &aaa, acpimadt_print); } break; case ACPI_MADT_OVERRIDE: printf("OVERRIDE: bus %x, source %x, global_int %x, flags %x\n", entry->madt_override.bus, entry->madt_override.source, entry->madt_override.global_int, entry->madt_override.flags); pin = entry->madt_override.global_int; apic = ioapic_find_bybase(pin); map = malloc(sizeof (struct mp_intr_map), M_DEVBUF, M_NOWAIT); if (map == NULL) return; memset(map, 0, sizeof *map); map->bus_pin = entry->madt_override.source; map->flags = entry->madt_override.flags; acpimadt_cfg_intr(entry->madt_override.flags, &map->redir); map->ioapic_ih = APIC_INT_VIA_APIC | ((apic->sc_apicid << APIC_INT_APIC_SHIFT) | (pin << APIC_INT_PIN_SHIFT)); apic->sc_pins[pin].ip_map = map; map->next = mp_isa_bus->mb_intrs; mp_isa_bus->mb_intrs = map; break; default: printf("apic_type %x\n", entry->madt_lapic.apic_type); } addr += entry->madt_lapic.length; } for (pin = 0; pin < ICU_LEN; pin++) { apic = ioapic_find_bybase(pin); if (apic->sc_pins[pin].ip_map != NULL) continue; map = malloc(sizeof (struct mp_intr_map), M_DEVBUF, M_NOWAIT); if (map == NULL) return; memset(map, 0, sizeof *map); map->bus_pin = pin; map->redir = (IOAPIC_REDLO_DEL_LOPRI << IOAPIC_REDLO_DEL_SHIFT); map->ioapic_ih = APIC_INT_VIA_APIC | ((apic->sc_apicid << APIC_INT_APIC_SHIFT) | (pin << APIC_INT_PIN_SHIFT)); apic->sc_pins[pin].ip_map = map; map->next = mp_isa_bus->mb_intrs; mp_isa_bus->mb_intrs = map; } } int acpimadt_print(void *aux, const char *pnp) { struct apic_attach_args *aaa = aux; if (pnp) printf("%s at %s:", aaa->aaa_name, pnp); return (UNCONF); }