[net-next-2.6.git] / drivers / acpi / tables.c

/*
 *  acpi_tables.c - ACPI Boot-Time Table Parsing
 *
 *  Copyright (C) 2001 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
 *
 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 *
 */

#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/smp.h>
#include <linux/string.h>
#include <linux/types.h>
#include <linux/irq.h>
#include <linux/errno.h>
#include <linux/acpi.h>
#include <linux/bootmem.h>

#define PREFIX			"ACPI: "

#define ACPI_MAX_TABLES		128

static char *acpi_table_signatures[ACPI_TABLE_COUNT] = {
	[ACPI_TABLE_UNKNOWN] = "????",
	[ACPI_APIC] = "APIC",
	[ACPI_BOOT] = "BOOT",
	[ACPI_DBGP] = "DBGP",
	[ACPI_DSDT] = "DSDT",
	[ACPI_ECDT] = "ECDT",
	[ACPI_ETDT] = "ETDT",
	[ACPI_FADT] = "FACP",
	[ACPI_FACS] = "FACS",
	[ACPI_OEMX] = "OEM",
	[ACPI_PSDT] = "PSDT",
	[ACPI_SBST] = "SBST",
	[ACPI_SLIT] = "SLIT",
	[ACPI_SPCR] = "SPCR",
	[ACPI_SRAT] = "SRAT",
	[ACPI_SSDT] = "SSDT",
	[ACPI_SPMI] = "SPMI",
	[ACPI_HPET] = "HPET",
	[ACPI_MCFG] = "MCFG",
};

static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };

/* System Description Table (RSDT/XSDT) */
struct acpi_table_sdt {
	unsigned long pa;
	enum acpi_table_id id;
	unsigned long size;
} __attribute__ ((packed));

static unsigned long sdt_pa;	/* Physical Address */
static unsigned long sdt_count;	/* Table count */

static struct acpi_table_sdt sdt_entry[ACPI_MAX_TABLES] __initdata;
static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;

void acpi_table_print(struct acpi_table_header *header, unsigned long phys_addr)
{
	char *name = NULL;

	if (!header)
		return;

	/* Some table signatures aren't good table names */

	if (!strncmp((char *)&header->signature,
		     acpi_table_signatures[ACPI_APIC],
		     sizeof(header->signature))) {
		name = "MADT";
	} else if (!strncmp((char *)&header->signature,
			    acpi_table_signatures[ACPI_FADT],
			    sizeof(header->signature))) {
		name = "FADT";
	} else
		name = header->signature;

	printk(KERN_DEBUG PREFIX
	       "%.4s (v%3.3d %6.6s %8.8s 0x%08x %.4s 0x%08x) @ 0x%p\n", name,
	       header->revision, header->oem_id, header->oem_table_id,
	       header->oem_revision, header->asl_compiler_id,
	       header->asl_compiler_revision, (void *)phys_addr);
}

void acpi_table_print_madt_entry(acpi_table_entry_header * header)
{
	if (!header)
		return;

	switch (header->type) {

	case ACPI_MADT_LAPIC:
		{
			struct acpi_table_lapic *p =
			    (struct acpi_table_lapic *)header;
			printk(KERN_INFO PREFIX
			       "LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
			       p->acpi_id, p->id,
			       p->flags.enabled ? "enabled" : "disabled");
		}
		break;

	case ACPI_MADT_IOAPIC:
		{
			struct acpi_table_ioapic *p =
			    (struct acpi_table_ioapic *)header;
			printk(KERN_INFO PREFIX
			       "IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
			       p->id, p->address, p->global_irq_base);
		}
		break;

	case ACPI_MADT_INT_SRC_OVR:
		{
			struct acpi_table_int_src_ovr *p =
			    (struct acpi_table_int_src_ovr *)header;
			printk(KERN_INFO PREFIX
			       "INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
			       p->bus, p->bus_irq, p->global_irq,
			       mps_inti_flags_polarity[p->flags.polarity],
			       mps_inti_flags_trigger[p->flags.trigger]);
			if (p->flags.reserved)
				printk(KERN_INFO PREFIX
				       "INT_SRC_OVR unexpected reserved flags: 0x%x\n",
				       p->flags.reserved);

		}
		break;

	case ACPI_MADT_NMI_SRC:
		{
			struct acpi_table_nmi_src *p =
			    (struct acpi_table_nmi_src *)header;
			printk(KERN_INFO PREFIX
			       "NMI_SRC (%s %s global_irq %d)\n",
			       mps_inti_flags_polarity[p->flags.polarity],
			       mps_inti_flags_trigger[p->flags.trigger],
			       p->global_irq);
		}
		break;

	case ACPI_MADT_LAPIC_NMI:
		{
			struct acpi_table_lapic_nmi *p =
			    (struct acpi_table_lapic_nmi *)header;
			printk(KERN_INFO PREFIX
			       "LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
			       p->acpi_id,
			       mps_inti_flags_polarity[p->flags.polarity],
			       mps_inti_flags_trigger[p->flags.trigger],
			       p->lint);
		}
		break;

	case ACPI_MADT_LAPIC_ADDR_OVR:
		{
			struct acpi_table_lapic_addr_ovr *p =
			    (struct acpi_table_lapic_addr_ovr *)header;
			printk(KERN_INFO PREFIX
			       "LAPIC_ADDR_OVR (address[%p])\n",
			       (void *)(unsigned long)p->address);
		}
		break;

	case ACPI_MADT_IOSAPIC:
		{
			struct acpi_table_iosapic *p =
			    (struct acpi_table_iosapic *)header;
			printk(KERN_INFO PREFIX
			       "IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
			       p->id, (void *)(unsigned long)p->address,
			       p->global_irq_base);
		}
		break;

	case ACPI_MADT_LSAPIC:
		{
			struct acpi_table_lsapic *p =
			    (struct acpi_table_lsapic *)header;
			printk(KERN_INFO PREFIX
			       "LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
			       p->acpi_id, p->id, p->eid,
			       p->flags.enabled ? "enabled" : "disabled");
		}
		break;

	case ACPI_MADT_PLAT_INT_SRC:
		{
			struct acpi_table_plat_int_src *p =
			    (struct acpi_table_plat_int_src *)header;
			printk(KERN_INFO PREFIX
			       "PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
			       mps_inti_flags_polarity[p->flags.polarity],
			       mps_inti_flags_trigger[p->flags.trigger],
			       p->type, p->id, p->eid, p->iosapic_vector,
			       p->global_irq);
		}
		break;

	default:
		printk(KERN_WARNING PREFIX
		       "Found unsupported MADT entry (type = 0x%x)\n",
		       header->type);
		break;
	}
}

static int
acpi_table_compute_checksum(void *table_pointer, unsigned long length)
{
	u8 *p = table_pointer;
	unsigned long remains = length;
	unsigned long sum = 0;

	if (!p || !length)
		return -EINVAL;

	while (remains--)
		sum += *p++;

	return (sum & 0xFF);
}

/*
 * acpi_get_table_header_early()
 * for acpi_blacklisted(), acpi_table_get_sdt()
 */
int __init
acpi_get_table_header_early(enum acpi_table_id id,
			    struct acpi_table_header **header)
{
	unsigned int i;
	enum acpi_table_id temp_id;

	/* DSDT is different from the rest */
	if (id == ACPI_DSDT)
		temp_id = ACPI_FADT;
	else
		temp_id = id;

	/* Locate the table. */

	for (i = 0; i < sdt_count; i++) {
		if (sdt_entry[i].id != temp_id)
			continue;
		*header = (void *)
		    __acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
		if (!*header) {
			printk(KERN_WARNING PREFIX "Unable to map %s\n",
			       acpi_table_signatures[temp_id]);
			return -ENODEV;
		}
		break;
	}

	if (!*header) {
		printk(KERN_WARNING PREFIX "%s not present\n",
		       acpi_table_signatures[id]);
		return -ENODEV;
	}

	/* Map the DSDT header via the pointer in the FADT */
	if (id == ACPI_DSDT) {
		struct fadt_descriptor *fadt =
		    (struct fadt_descriptor *)*header;

		if (fadt->header.revision == 3 && fadt->Xdsdt) {
			*header = (void *)__acpi_map_table(fadt->Xdsdt,
							   sizeof(struct
								  acpi_table_header));
		} else if (fadt->dsdt) {
			*header = (void *)__acpi_map_table(fadt->dsdt,
							   sizeof(struct
								  acpi_table_header));
		} else
			*header = NULL;

		if (!*header) {
			printk(KERN_WARNING PREFIX "Unable to map DSDT\n");
			return -ENODEV;
		}
	}

	return 0;
}

int __init
acpi_table_parse_madt_family(enum acpi_table_id id,
			     unsigned long madt_size,
			     int entry_id,
			     acpi_madt_entry_handler handler,
			     unsigned int max_entries)
{
	void *madt = NULL;
	acpi_table_entry_header *entry;
	unsigned int count = 0;
	unsigned long madt_end;
	unsigned int i;

	if (!handler)
		return -EINVAL;

	/* Locate the MADT (if exists). There should only be one. */

	for (i = 0; i < sdt_count; i++) {
		if (sdt_entry[i].id != id)
			continue;
		madt = (void *)
		    __acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
		if (!madt) {
			printk(KERN_WARNING PREFIX "Unable to map %s\n",
			       acpi_table_signatures[id]);
			return -ENODEV;
		}
		break;
	}

	if (!madt) {
		printk(KERN_WARNING PREFIX "%s not present\n",
		       acpi_table_signatures[id]);
		return -ENODEV;
	}

	madt_end = (unsigned long)madt + sdt_entry[i].size;

	/* Parse all entries looking for a match. */

	entry = (acpi_table_entry_header *)
	    ((unsigned long)madt + madt_size);

	while (((unsigned long)entry) + sizeof(acpi_table_entry_header) <
	       madt_end) {
		if (entry->type == entry_id
		    && (!max_entries || count++ < max_entries))
			if (handler(entry, madt_end))
				return -EINVAL;

		entry = (acpi_table_entry_header *)
		    ((unsigned long)entry + entry->length);
	}
	if (max_entries && count > max_entries) {
		printk(KERN_WARNING PREFIX "[%s:0x%02x] ignored %i entries of "
		       "%i found\n", acpi_table_signatures[id], entry_id,
		       count - max_entries, count);
	}

	return count;
}

int __init
acpi_table_parse_madt(enum acpi_madt_entry_id id,
		      acpi_madt_entry_handler handler, unsigned int max_entries)
{
	return acpi_table_parse_madt_family(ACPI_APIC,
					    sizeof(struct acpi_table_madt), id,
					    handler, max_entries);
}

int __init acpi_table_parse(enum acpi_table_id id, acpi_table_handler handler)
{
	int count = 0;
	unsigned int i = 0;

	if (!handler)
		return -EINVAL;

	for (i = 0; i < sdt_count; i++) {
		if (sdt_entry[i].id != id)
			continue;
		count++;
		if (count == 1)
			handler(sdt_entry[i].pa, sdt_entry[i].size);

		else
			printk(KERN_WARNING PREFIX
			       "%d duplicate %s table ignored.\n", count,
			       acpi_table_signatures[id]);
	}

	return count;
}

static int __init acpi_table_get_sdt(struct acpi_table_rsdp *rsdp)
{
	struct acpi_table_header *header = NULL;
	unsigned int i, id = 0;

	if (!rsdp)
		return -EINVAL;

	/* First check XSDT (but only on ACPI 2.0-compatible systems) */

	if ((rsdp->revision >= 2) && rsdp->xsdt_physical_address) {

		struct acpi_table_xsdt *mapped_xsdt = NULL;

		sdt_pa = rsdp->xsdt_physical_address;

		/* map in just the header */
		header = (struct acpi_table_header *)
		    __acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));

		if (!header) {
			printk(KERN_WARNING PREFIX
			       "Unable to map XSDT header\n");
			return -ENODEV;
		}

		/* remap in the entire table before processing */
		mapped_xsdt = (struct acpi_table_xsdt *)
		    __acpi_map_table(sdt_pa, header->length);
		if (!mapped_xsdt) {
			printk(KERN_WARNING PREFIX "Unable to map XSDT\n");
			return -ENODEV;
		}
		header = &mapped_xsdt->header;

		if (strncmp(header->signature, "XSDT", 4)) {
			printk(KERN_WARNING PREFIX
			       "XSDT signature incorrect\n");
			return -ENODEV;
		}

		if (acpi_table_compute_checksum(header, header->length)) {
			printk(KERN_WARNING PREFIX "Invalid XSDT checksum\n");
			return -ENODEV;
		}

		sdt_count =
		    (header->length - sizeof(struct acpi_table_header)) >> 3;
		if (sdt_count > ACPI_MAX_TABLES) {
			printk(KERN_WARNING PREFIX
			       "Truncated %lu XSDT entries\n",
			       (sdt_count - ACPI_MAX_TABLES));
			sdt_count = ACPI_MAX_TABLES;
		}

		for (i = 0; i < sdt_count; i++)
			sdt_entry[i].pa = (unsigned long)mapped_xsdt->table_offset_entry[i];
	}

	/* Then check RSDT */

	else if (rsdp->rsdt_physical_address) {

		struct acpi_table_rsdt *mapped_rsdt = NULL;

		sdt_pa = rsdp->rsdt_physical_address;

		/* map in just the header */
		header = (struct acpi_table_header *)
		    __acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));
		if (!header) {
			printk(KERN_WARNING PREFIX
			       "Unable to map RSDT header\n");
			return -ENODEV;
		}

		/* remap in the entire table before processing */
		mapped_rsdt = (struct acpi_table_rsdt *)
		    __acpi_map_table(sdt_pa, header->length);
		if (!mapped_rsdt) {
			printk(KERN_WARNING PREFIX "Unable to map RSDT\n");
			return -ENODEV;
		}
		header = &mapped_rsdt->header;

		if (strncmp(header->signature, "RSDT", 4)) {
			printk(KERN_WARNING PREFIX
			       "RSDT signature incorrect\n");
			return -ENODEV;
		}

		if (acpi_table_compute_checksum(header, header->length)) {
			printk(KERN_WARNING PREFIX "Invalid RSDT checksum\n");
			return -ENODEV;
		}

		sdt_count =
		    (header->length - sizeof(struct acpi_table_header)) >> 2;
		if (sdt_count > ACPI_MAX_TABLES) {
			printk(KERN_WARNING PREFIX
			       "Truncated %lu RSDT entries\n",
			       (sdt_count - ACPI_MAX_TABLES));
			sdt_count = ACPI_MAX_TABLES;
		}

		for (i = 0; i < sdt_count; i++)
			sdt_entry[i].pa = (unsigned long)mapped_rsdt->table_offset_entry[i];
	}

	else {
		printk(KERN_WARNING PREFIX
		       "No System Description Table (RSDT/XSDT) specified in RSDP\n");
		return -ENODEV;
	}

	acpi_table_print(header, sdt_pa);

	for (i = 0; i < sdt_count; i++) {

		/* map in just the header */
		header = (struct acpi_table_header *)
		    __acpi_map_table(sdt_entry[i].pa,
				     sizeof(struct acpi_table_header));
		if (!header)
			continue;

		/* remap in the entire table before processing */
		header = (struct acpi_table_header *)
		    __acpi_map_table(sdt_entry[i].pa, header->length);
		if (!header)
			continue;

		acpi_table_print(header, sdt_entry[i].pa);

		if (acpi_table_compute_checksum(header, header->length)) {
			printk(KERN_WARNING "  >>> ERROR: Invalid checksum\n");
			continue;
		}

		sdt_entry[i].size = header->length;

		for (id = 0; id < ACPI_TABLE_COUNT; id++) {
			if (!strncmp((char *)&header->signature,
				     acpi_table_signatures[id],
				     sizeof(header->signature))) {
				sdt_entry[i].id = id;
			}
		}
	}

	/* 
	 * The DSDT is *not* in the RSDT (why not? no idea.) but we want
	 * to print its info, because this is what people usually blacklist
	 * against. Unfortunately, we don't know the phys_addr, so just
	 * print 0. Maybe no one will notice.
	 */
	if (!acpi_get_table_header_early(ACPI_DSDT, &header))
		acpi_table_print(header, 0);

	return 0;
}

/*
 * acpi_table_init()
 *
 * find RSDP, find and checksum SDT/XSDT.
 * checksum all tables, print SDT/XSDT
 * 
 * result: sdt_entry[] is initialized
 */

int __init acpi_table_init(void)
{
	struct acpi_table_rsdp *rsdp = NULL;
	unsigned long rsdp_phys = 0;
	int result = 0;

	/* Locate and map the Root System Description Table (RSDP) */

	rsdp_phys = acpi_find_rsdp();
	if (!rsdp_phys) {
		printk(KERN_ERR PREFIX "Unable to locate RSDP\n");
		return -ENODEV;
	}

	rsdp = (struct acpi_table_rsdp *)__acpi_map_table(rsdp_phys,
		sizeof(struct acpi_table_rsdp));
	if (!rsdp) {
		printk(KERN_WARNING PREFIX "Unable to map RSDP\n");
		return -ENODEV;
	}

	printk(KERN_DEBUG PREFIX
	       "RSDP (v%3.3d %6.6s                                ) @ 0x%p\n",
	       rsdp->revision, rsdp->oem_id, (void *)rsdp_phys);

	if (rsdp->revision < 2)
		result =
		    acpi_table_compute_checksum(rsdp, ACPI_RSDP_REV0_SIZE);
	else
		result =
		    acpi_table_compute_checksum(rsdp, rsdp->length);

	if (result) {
		printk(KERN_WARNING "  >>> ERROR: Invalid checksum\n");
		return -ENODEV;
	}

	/* Locate and map the System Description table (RSDT/XSDT) */

	if (acpi_table_get_sdt(rsdp))
		return -ENODEV;

	acpi_initialize_tables(initial_tables, ACPI_MAX_TABLES, 0);

	return 0;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* acpi_tables.c - ACPI Boot-Time Table Parsing
	3	*
	4	* Copyright (C) 2001 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
	5	*
	6	* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	7	*
	8	* This program is free software; you can redistribute it and/or modify
	9	* it under the terms of the GNU General Public License as published by
	10	* the Free Software Foundation; either version 2 of the License, or
	11	* (at your option) any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU General Public License
	19	* along with this program; if not, write to the Free Software
	20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	21	*
	22	* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	23	*
	24	*/
	25
1da177e4 LT	26	#include <linux/init.h>
	27	#include <linux/kernel.h>
	28	#include <linux/sched.h>
	29	#include <linux/smp.h>
	30	#include <linux/string.h>
	31	#include <linux/types.h>
	32	#include <linux/irq.h>
	33	#include <linux/errno.h>
	34	#include <linux/acpi.h>
	35	#include <linux/bootmem.h>
	36
	37	#define PREFIX "ACPI: "
	38
04348e69	39	#define ACPI_MAX_TABLES 128
1da177e4 LT	40
1da177e4 LT	41	static char *acpi_table_signatures[ACPI_TABLE_COUNT] = {
4be44fcd LB	42	[ACPI_TABLE_UNKNOWN] = "????",
	43	[ACPI_APIC] = "APIC",
	44	[ACPI_BOOT] = "BOOT",
	45	[ACPI_DBGP] = "DBGP",
	46	[ACPI_DSDT] = "DSDT",
	47	[ACPI_ECDT] = "ECDT",
	48	[ACPI_ETDT] = "ETDT",
	49	[ACPI_FADT] = "FACP",
	50	[ACPI_FACS] = "FACS",
	51	[ACPI_OEMX] = "OEM",
	52	[ACPI_PSDT] = "PSDT",
	53	[ACPI_SBST] = "SBST",
	54	[ACPI_SLIT] = "SLIT",
	55	[ACPI_SPCR] = "SPCR",
	56	[ACPI_SRAT] = "SRAT",
	57	[ACPI_SSDT] = "SSDT",
	58	[ACPI_SPMI] = "SPMI",
	59	[ACPI_HPET] = "HPET",
	60	[ACPI_MCFG] = "MCFG",
1da177e4 LT	61	};
	62
	63	static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
	64	static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };
	65
	66	/* System Description Table (RSDT/XSDT) */
	67	struct acpi_table_sdt {
4be44fcd LB	68	unsigned long pa;
	69	enum acpi_table_id id;
	70	unsigned long size;
1da177e4 LT	71	} __attribute__ ((packed));
1da177e4 LT	72
4be44fcd LB	73	static unsigned long sdt_pa; /* Physical Address */
4be44fcd LB	74	static unsigned long sdt_count; /* Table count */
1da177e4	75
04348e69	76	static struct acpi_table_sdt sdt_entry[ACPI_MAX_TABLES] __initdata;
ad71860a	77	static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;
1da177e4	78
4be44fcd	79	void acpi_table_print(struct acpi_table_header *header, unsigned long phys_addr)
1da177e4	80	{
4be44fcd	81	char *name = NULL;
1da177e4 LT	82
	83	if (!header)
	84	return;
	85
	86	/* Some table signatures aren't good table names */
	87
4be44fcd LB	88	if (!strncmp((char *)&header->signature,
	89	acpi_table_signatures[ACPI_APIC],
	90	sizeof(header->signature))) {
1da177e4	91	name = "MADT";
4be44fcd LB	92	} else if (!strncmp((char *)&header->signature,
	93	acpi_table_signatures[ACPI_FADT],
	94	sizeof(header->signature))) {
1da177e4	95	name = "FADT";
4be44fcd	96	} else
1da177e4 LT	97	name = header->signature;
1da177e4 LT	98
4be44fcd LB	99	printk(KERN_DEBUG PREFIX
	100	"%.4s (v%3.3d %6.6s %8.8s 0x%08x %.4s 0x%08x) @ 0x%p\n", name,
	101	header->revision, header->oem_id, header->oem_table_id,
	102	header->oem_revision, header->asl_compiler_id,
	103	header->asl_compiler_revision, (void *)phys_addr);
1da177e4 LT	104	}
1da177e4 LT	105
4be44fcd	106	void acpi_table_print_madt_entry(acpi_table_entry_header * header)
1da177e4 LT	107	{
	108	if (!header)
	109	return;
	110
	111	switch (header->type) {
	112
	113	case ACPI_MADT_LAPIC:
4be44fcd LB	114	{
	115	struct acpi_table_lapic *p =
	116	(struct acpi_table_lapic *)header;
	117	printk(KERN_INFO PREFIX
	118	"LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
	119	p->acpi_id, p->id,
	120	p->flags.enabled ? "enabled" : "disabled");
	121	}
1da177e4 LT	122	break;
	123
	124	case ACPI_MADT_IOAPIC:
4be44fcd LB	125	{
	126	struct acpi_table_ioapic *p =
	127	(struct acpi_table_ioapic *)header;
	128	printk(KERN_INFO PREFIX
	129	"IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
	130	p->id, p->address, p->global_irq_base);
	131	}
1da177e4 LT	132	break;
	133
	134	case ACPI_MADT_INT_SRC_OVR:
4be44fcd LB	135	{
	136	struct acpi_table_int_src_ovr *p =
	137	(struct acpi_table_int_src_ovr *)header;
	138	printk(KERN_INFO PREFIX
	139	"INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
	140	p->bus, p->bus_irq, p->global_irq,
	141	mps_inti_flags_polarity[p->flags.polarity],
	142	mps_inti_flags_trigger[p->flags.trigger]);
	143	if (p->flags.reserved)
	144	printk(KERN_INFO PREFIX
	145	"INT_SRC_OVR unexpected reserved flags: 0x%x\n",
	146	p->flags.reserved);
1da177e4	147
4be44fcd	148	}
1da177e4 LT	149	break;
	150
	151	case ACPI_MADT_NMI_SRC:
4be44fcd LB	152	{
	153	struct acpi_table_nmi_src *p =
	154	(struct acpi_table_nmi_src *)header;
	155	printk(KERN_INFO PREFIX
	156	"NMI_SRC (%s %s global_irq %d)\n",
	157	mps_inti_flags_polarity[p->flags.polarity],
	158	mps_inti_flags_trigger[p->flags.trigger],
	159	p->global_irq);
	160	}
1da177e4 LT	161	break;
	162
	163	case ACPI_MADT_LAPIC_NMI:
4be44fcd LB	164	{
	165	struct acpi_table_lapic_nmi *p =
	166	(struct acpi_table_lapic_nmi *)header;
	167	printk(KERN_INFO PREFIX
	168	"LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
	169	p->acpi_id,
	170	mps_inti_flags_polarity[p->flags.polarity],
	171	mps_inti_flags_trigger[p->flags.trigger],
	172	p->lint);
	173	}
1da177e4 LT	174	break;
	175
	176	case ACPI_MADT_LAPIC_ADDR_OVR:
4be44fcd LB	177	{
	178	struct acpi_table_lapic_addr_ovr *p =
	179	(struct acpi_table_lapic_addr_ovr *)header;
	180	printk(KERN_INFO PREFIX
	181	"LAPIC_ADDR_OVR (address[%p])\n",
	182	(void *)(unsigned long)p->address);
	183	}
1da177e4 LT	184	break;
	185
	186	case ACPI_MADT_IOSAPIC:
4be44fcd LB	187	{
	188	struct acpi_table_iosapic *p =
	189	(struct acpi_table_iosapic *)header;
	190	printk(KERN_INFO PREFIX
	191	"IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
	192	p->id, (void *)(unsigned long)p->address,
	193	p->global_irq_base);
	194	}
1da177e4 LT	195	break;
	196
	197	case ACPI_MADT_LSAPIC:
4be44fcd LB	198	{
	199	struct acpi_table_lsapic *p =
	200	(struct acpi_table_lsapic *)header;
	201	printk(KERN_INFO PREFIX
	202	"LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
	203	p->acpi_id, p->id, p->eid,
	204	p->flags.enabled ? "enabled" : "disabled");
	205	}
1da177e4 LT	206	break;
	207
	208	case ACPI_MADT_PLAT_INT_SRC:
4be44fcd LB	209	{
	210	struct acpi_table_plat_int_src *p =
	211	(struct acpi_table_plat_int_src *)header;
	212	printk(KERN_INFO PREFIX
	213	"PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
	214	mps_inti_flags_polarity[p->flags.polarity],
	215	mps_inti_flags_trigger[p->flags.trigger],
	216	p->type, p->id, p->eid, p->iosapic_vector,
	217	p->global_irq);
	218	}
1da177e4 LT	219	break;
	220
	221	default:
4be44fcd LB	222	printk(KERN_WARNING PREFIX
	223	"Found unsupported MADT entry (type = 0x%x)\n",
	224	header->type);
1da177e4 LT	225	break;
	226	}
	227	}
	228
1da177e4	229	static int
4be44fcd	230	acpi_table_compute_checksum(void *table_pointer, unsigned long length)
1da177e4	231	{
50dd0969	232	u8 *p = table_pointer;
4be44fcd LB	233	unsigned long remains = length;
4be44fcd LB	234	unsigned long sum = 0;
1da177e4 LT	235
	236	if (!p \|\| !length)
	237	return -EINVAL;
	238
	239	while (remains--)
	240	sum += *p++;
	241
	242	return (sum & 0xFF);
	243	}
	244
	245	/*
	246	* acpi_get_table_header_early()
	247	* for acpi_blacklisted(), acpi_table_get_sdt()
	248	*/
	249	int __init
4be44fcd LB	250	acpi_get_table_header_early(enum acpi_table_id id,
4be44fcd LB	251	struct acpi_table_header **header)
1da177e4 LT	252	{
	253	unsigned int i;
	254	enum acpi_table_id temp_id;
	255
	256	/* DSDT is different from the rest */
	257	if (id == ACPI_DSDT)
	258	temp_id = ACPI_FADT;
	259	else
	260	temp_id = id;
	261
	262	/* Locate the table. */
	263
	264	for (i = 0; i < sdt_count; i++) {
	265	if (sdt_entry[i].id != temp_id)
	266	continue;
	267	header = (void )
4be44fcd	268	__acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
1da177e4 LT	269	if (!*header) {
	270	printk(KERN_WARNING PREFIX "Unable to map %s\n",
	271	acpi_table_signatures[temp_id]);
	272	return -ENODEV;
	273	}
	274	break;
	275	}
	276
	277	if (!*header) {
	278	printk(KERN_WARNING PREFIX "%s not present\n",
	279	acpi_table_signatures[id]);
	280	return -ENODEV;
	281	}
	282
	283	/* Map the DSDT header via the pointer in the FADT */
	284	if (id == ACPI_DSDT) {
793c2388 BM	285	struct fadt_descriptor *fadt =
793c2388 BM	286	(struct fadt_descriptor )header;
1da177e4	287
ad71860a	288	if (fadt->header.revision == 3 && fadt->Xdsdt) {
4be44fcd LB	289	header = (void )__acpi_map_table(fadt->Xdsdt,
	290	sizeof(struct
	291	acpi_table_header));
ad71860a AS	292	} else if (fadt->dsdt) {
ad71860a AS	293	header = (void )__acpi_map_table(fadt->dsdt,
4be44fcd LB	294	sizeof(struct
4be44fcd LB	295	acpi_table_header));
1da177e4 LT	296	} else
	297	*header = NULL;
	298
	299	if (!*header) {
	300	printk(KERN_WARNING PREFIX "Unable to map DSDT\n");
	301	return -ENODEV;
	302	}
	303	}
	304
	305	return 0;
	306	}
1da177e4 LT	307
1da177e4 LT	308	int __init
4be44fcd LB	309	acpi_table_parse_madt_family(enum acpi_table_id id,
	310	unsigned long madt_size,
	311	int entry_id,
	312	acpi_madt_entry_handler handler,
	313	unsigned int max_entries)
1da177e4	314	{
4be44fcd LB	315	void *madt = NULL;
	316	acpi_table_entry_header *entry;
	317	unsigned int count = 0;
	318	unsigned long madt_end;
	319	unsigned int i;
1da177e4 LT	320
	321	if (!handler)
	322	return -EINVAL;
	323
	324	/* Locate the MADT (if exists). There should only be one. */
	325
	326	for (i = 0; i < sdt_count; i++) {
	327	if (sdt_entry[i].id != id)
	328	continue;
	329	madt = (void *)
4be44fcd	330	__acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
1da177e4 LT	331	if (!madt) {
	332	printk(KERN_WARNING PREFIX "Unable to map %s\n",
	333	acpi_table_signatures[id]);
	334	return -ENODEV;
	335	}
	336	break;
	337	}
	338
	339	if (!madt) {
	340	printk(KERN_WARNING PREFIX "%s not present\n",
	341	acpi_table_signatures[id]);
	342	return -ENODEV;
	343	}
	344
4be44fcd	345	madt_end = (unsigned long)madt + sdt_entry[i].size;
1da177e4 LT	346
	347	/* Parse all entries looking for a match. */
	348
	349	entry = (acpi_table_entry_header *)
4be44fcd	350	((unsigned long)madt + madt_size);
1da177e4	351
4be44fcd LB	352	while (((unsigned long)entry) + sizeof(acpi_table_entry_header) <
	353	madt_end) {
	354	if (entry->type == entry_id
	355	&& (!max_entries \|\| count++ < max_entries))
1da177e4 LT	356	if (handler(entry, madt_end))
	357	return -EINVAL;
	358
	359	entry = (acpi_table_entry_header *)
4be44fcd	360	((unsigned long)entry + entry->length);
1da177e4 LT	361	}
	362	if (max_entries && count > max_entries) {
	363	printk(KERN_WARNING PREFIX "[%s:0x%02x] ignored %i entries of "
	364	"%i found\n", acpi_table_signatures[id], entry_id,
	365	count - max_entries, count);
	366	}
	367
	368	return count;
	369	}
	370
1da177e4	371	int __init
4be44fcd LB	372	acpi_table_parse_madt(enum acpi_madt_entry_id id,
4be44fcd LB	373	acpi_madt_entry_handler handler, unsigned int max_entries)
1da177e4	374	{
4be44fcd LB	375	return acpi_table_parse_madt_family(ACPI_APIC,
	376	sizeof(struct acpi_table_madt), id,
	377	handler, max_entries);
1da177e4 LT	378	}
1da177e4 LT	379
4be44fcd	380	int __init acpi_table_parse(enum acpi_table_id id, acpi_table_handler handler)
1da177e4	381	{
4be44fcd LB	382	int count = 0;
4be44fcd LB	383	unsigned int i = 0;
1da177e4 LT	384
	385	if (!handler)
	386	return -EINVAL;
	387
	388	for (i = 0; i < sdt_count; i++) {
	389	if (sdt_entry[i].id != id)
	390	continue;
	391	count++;
	392	if (count == 1)
	393	handler(sdt_entry[i].pa, sdt_entry[i].size);
	394
	395	else
4be44fcd LB	396	printk(KERN_WARNING PREFIX
	397	"%d duplicate %s table ignored.\n", count,
	398	acpi_table_signatures[id]);
1da177e4 LT	399	}
	400
	401	return count;
	402	}
	403
4be44fcd	404	static int __init acpi_table_get_sdt(struct acpi_table_rsdp *rsdp)
1da177e4 LT	405	{
1da177e4 LT	406	struct acpi_table_header *header = NULL;
4be44fcd	407	unsigned int i, id = 0;
1da177e4 LT	408
	409	if (!rsdp)
	410	return -EINVAL;
	411
	412	/* First check XSDT (but only on ACPI 2.0-compatible systems) */
	413
ad71860a	414	if ((rsdp->revision >= 2) && rsdp->xsdt_physical_address) {
4be44fcd LB	415
4be44fcd LB	416	struct acpi_table_xsdt *mapped_xsdt = NULL;
1da177e4	417
ad71860a	418	sdt_pa = rsdp->xsdt_physical_address;
1da177e4 LT	419
	420	/* map in just the header */
	421	header = (struct acpi_table_header *)
4be44fcd	422	__acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));
1da177e4 LT	423
1da177e4 LT	424	if (!header) {
4be44fcd LB	425	printk(KERN_WARNING PREFIX
4be44fcd LB	426	"Unable to map XSDT header\n");
1da177e4 LT	427	return -ENODEV;
	428	}
	429
	430	/* remap in the entire table before processing */
	431	mapped_xsdt = (struct acpi_table_xsdt *)
4be44fcd	432	__acpi_map_table(sdt_pa, header->length);
1da177e4 LT	433	if (!mapped_xsdt) {
	434	printk(KERN_WARNING PREFIX "Unable to map XSDT\n");
	435	return -ENODEV;
	436	}
	437	header = &mapped_xsdt->header;
	438
	439	if (strncmp(header->signature, "XSDT", 4)) {
4be44fcd LB	440	printk(KERN_WARNING PREFIX
4be44fcd LB	441	"XSDT signature incorrect\n");
1da177e4 LT	442	return -ENODEV;
	443	}
	444
	445	if (acpi_table_compute_checksum(header, header->length)) {
	446	printk(KERN_WARNING PREFIX "Invalid XSDT checksum\n");
	447	return -ENODEV;
	448	}
	449
4be44fcd LB	450	sdt_count =
4be44fcd LB	451	(header->length - sizeof(struct acpi_table_header)) >> 3;
1da177e4	452	if (sdt_count > ACPI_MAX_TABLES) {
4be44fcd LB	453	printk(KERN_WARNING PREFIX
	454	"Truncated %lu XSDT entries\n",
	455	(sdt_count - ACPI_MAX_TABLES));
1da177e4 LT	456	sdt_count = ACPI_MAX_TABLES;
	457	}
	458
	459	for (i = 0; i < sdt_count; i++)
ad71860a	460	sdt_entry[i].pa = (unsigned long)mapped_xsdt->table_offset_entry[i];
1da177e4 LT	461	}
	462
	463	/* Then check RSDT */
	464
ad71860a	465	else if (rsdp->rsdt_physical_address) {
1da177e4	466
4be44fcd	467	struct acpi_table_rsdt *mapped_rsdt = NULL;
1da177e4	468
ad71860a	469	sdt_pa = rsdp->rsdt_physical_address;
1da177e4 LT	470
	471	/* map in just the header */
	472	header = (struct acpi_table_header *)
4be44fcd	473	__acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));
1da177e4	474	if (!header) {
4be44fcd LB	475	printk(KERN_WARNING PREFIX
4be44fcd LB	476	"Unable to map RSDT header\n");
1da177e4 LT	477	return -ENODEV;
	478	}
	479
	480	/* remap in the entire table before processing */
	481	mapped_rsdt = (struct acpi_table_rsdt *)
4be44fcd	482	__acpi_map_table(sdt_pa, header->length);
1da177e4 LT	483	if (!mapped_rsdt) {
	484	printk(KERN_WARNING PREFIX "Unable to map RSDT\n");
	485	return -ENODEV;
	486	}
	487	header = &mapped_rsdt->header;
	488
	489	if (strncmp(header->signature, "RSDT", 4)) {
4be44fcd LB	490	printk(KERN_WARNING PREFIX
4be44fcd LB	491	"RSDT signature incorrect\n");
1da177e4 LT	492	return -ENODEV;
	493	}
	494
	495	if (acpi_table_compute_checksum(header, header->length)) {
	496	printk(KERN_WARNING PREFIX "Invalid RSDT checksum\n");
	497	return -ENODEV;
	498	}
	499
4be44fcd LB	500	sdt_count =
4be44fcd LB	501	(header->length - sizeof(struct acpi_table_header)) >> 2;
1da177e4	502	if (sdt_count > ACPI_MAX_TABLES) {
4be44fcd LB	503	printk(KERN_WARNING PREFIX
	504	"Truncated %lu RSDT entries\n",
	505	(sdt_count - ACPI_MAX_TABLES));
1da177e4 LT	506	sdt_count = ACPI_MAX_TABLES;
	507	}
	508
	509	for (i = 0; i < sdt_count; i++)
ad71860a	510	sdt_entry[i].pa = (unsigned long)mapped_rsdt->table_offset_entry[i];
1da177e4 LT	511	}
	512
	513	else {
4be44fcd LB	514	printk(KERN_WARNING PREFIX
4be44fcd LB	515	"No System Description Table (RSDT/XSDT) specified in RSDP\n");
1da177e4 LT	516	return -ENODEV;
	517	}
	518
	519	acpi_table_print(header, sdt_pa);
	520
	521	for (i = 0; i < sdt_count; i++) {
	522
	523	/* map in just the header */
	524	header = (struct acpi_table_header *)
4be44fcd LB	525	__acpi_map_table(sdt_entry[i].pa,
4be44fcd LB	526	sizeof(struct acpi_table_header));
1da177e4 LT	527	if (!header)
	528	continue;
	529
	530	/* remap in the entire table before processing */
	531	header = (struct acpi_table_header *)
4be44fcd	532	__acpi_map_table(sdt_entry[i].pa, header->length);
1da177e4 LT	533	if (!header)
1da177e4 LT	534	continue;
4be44fcd	535
1da177e4 LT	536	acpi_table_print(header, sdt_entry[i].pa);
	537
	538	if (acpi_table_compute_checksum(header, header->length)) {
	539	printk(KERN_WARNING " >>> ERROR: Invalid checksum\n");
	540	continue;
	541	}
	542
	543	sdt_entry[i].size = header->length;
	544
	545	for (id = 0; id < ACPI_TABLE_COUNT; id++) {
4be44fcd LB	546	if (!strncmp((char *)&header->signature,
	547	acpi_table_signatures[id],
	548	sizeof(header->signature))) {
1da177e4 LT	549	sdt_entry[i].id = id;
	550	}
	551	}
	552	}
	553
	554	/*
	555	* The DSDT is not in the RSDT (why not? no idea.) but we want
	556	* to print its info, because this is what people usually blacklist
	557	* against. Unfortunately, we don't know the phys_addr, so just
	558	* print 0. Maybe no one will notice.
	559	*/
4be44fcd	560	if (!acpi_get_table_header_early(ACPI_DSDT, &header))
1da177e4 LT	561	acpi_table_print(header, 0);
	562
	563	return 0;
	564	}
	565
	566	/*
	567	* acpi_table_init()
	568	*
	569	* find RSDP, find and checksum SDT/XSDT.
	570	* checksum all tables, print SDT/XSDT
	571	*
	572	* result: sdt_entry[] is initialized
	573	*/
	574
4be44fcd	575	int __init acpi_table_init(void)
1da177e4	576	{
4be44fcd LB	577	struct acpi_table_rsdp *rsdp = NULL;
	578	unsigned long rsdp_phys = 0;
	579	int result = 0;
1da177e4 LT	580
	581	/* Locate and map the Root System Description Table (RSDP) */
	582
	583	rsdp_phys = acpi_find_rsdp();
	584	if (!rsdp_phys) {
	585	printk(KERN_ERR PREFIX "Unable to locate RSDP\n");
	586	return -ENODEV;
	587	}
	588
23dd842c TM	589	rsdp = (struct acpi_table_rsdp *)__acpi_map_table(rsdp_phys,
23dd842c TM	590	sizeof(struct acpi_table_rsdp));
1da177e4 LT	591	if (!rsdp) {
	592	printk(KERN_WARNING PREFIX "Unable to map RSDP\n");
	593	return -ENODEV;
	594	}
	595
4be44fcd LB	596	printk(KERN_DEBUG PREFIX
	597	"RSDP (v%3.3d %6.6s ) @ 0x%p\n",
	598	rsdp->revision, rsdp->oem_id, (void *)rsdp_phys);
1da177e4 LT	599
1da177e4 LT	600	if (rsdp->revision < 2)
4be44fcd	601	result =
ad71860a	602	acpi_table_compute_checksum(rsdp, ACPI_RSDP_REV0_SIZE);
1da177e4	603	else
4be44fcd	604	result =
ad71860a	605	acpi_table_compute_checksum(rsdp, rsdp->length);
1da177e4 LT	606
	607	if (result) {
	608	printk(KERN_WARNING " >>> ERROR: Invalid checksum\n");
	609	return -ENODEV;
	610	}
	611
	612	/* Locate and map the System Description table (RSDT/XSDT) */
	613
	614	if (acpi_table_get_sdt(rsdp))
	615	return -ENODEV;
	616
ad71860a AS	617	acpi_initialize_tables(initial_tables, ACPI_MAX_TABLES, 0);
ad71860a AS	618
1da177e4 LT	619	return 0;
1da177e4 LT	620	}