[deliverable/linux.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 *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };

static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;

void acpi_table_print_madt_entry(struct acpi_subtable_header * header)
{
	if (!header)
		return;

	switch (header->type) {

	case ACPI_MADT_TYPE_LOCAL_APIC:
		{
			struct acpi_madt_local_apic *p =
			    (struct acpi_madt_local_apic *)header;
			printk(KERN_INFO PREFIX
			       "LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
			       p->processor_id, p->id,
			       (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
		}
		break;

	case ACPI_MADT_TYPE_IO_APIC:
		{
			struct acpi_madt_io_apic *p =
			    (struct acpi_madt_io_apic *)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_TYPE_INTERRUPT_OVERRIDE:
		{
			struct acpi_madt_interrupt_override *p =
			    (struct acpi_madt_interrupt_override *)header;
			printk(KERN_INFO PREFIX
			       "INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
			       p->bus, p->source_irq, p->global_irq,
			       mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
			       mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2]);
			if (p->inti_flags  &
			    ~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK))
				printk(KERN_INFO PREFIX
				       "INT_SRC_OVR unexpected reserved flags: 0x%x\n",
				       p->inti_flags  &
					~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK));

		}
		break;

	case ACPI_MADT_TYPE_NMI_SOURCE:
		{
			struct acpi_madt_nmi_source *p =
			    (struct acpi_madt_nmi_source *)header;
			printk(KERN_INFO PREFIX
			       "NMI_SRC (%s %s global_irq %d)\n",
			       mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
			       mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
			       p->global_irq);
		}
		break;

	case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
		{
			struct acpi_madt_local_apic_nmi *p =
			    (struct acpi_madt_local_apic_nmi *)header;
			printk(KERN_INFO PREFIX
			       "LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
			       p->processor_id,
			       mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK	],
			       mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
			       p->lint);
		}
		break;

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

	case ACPI_MADT_TYPE_IO_SAPIC:
		{
			struct acpi_madt_io_sapic *p =
			    (struct acpi_madt_io_sapic *)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_TYPE_LOCAL_SAPIC:
		{
			struct acpi_madt_local_sapic *p =
			    (struct acpi_madt_local_sapic *)header;
			printk(KERN_INFO PREFIX
			       "LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
			       p->processor_id, p->id, p->eid,
			       (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
		}
		break;

	case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
		{
			struct acpi_madt_interrupt_source *p =
			    (struct acpi_madt_interrupt_source *)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->inti_flags & ACPI_MADT_POLARITY_MASK],
			       mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
			       p->type, p->id, p->eid, p->io_sapic_vector,
			       p->global_irq);
		}
		break;

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


int __init
acpi_table_parse_madt_family(char *id,
			     unsigned long madt_size,
			     int entry_id,
			     acpi_table_entry_handler handler,
			     unsigned int max_entries)
{
	struct acpi_table_header *madt = NULL;
	struct acpi_subtable_header *entry;
	unsigned int count = 0;
	unsigned long madt_end;

	if (!handler)
		return -EINVAL;

	/* Locate the MADT (if exists). There should only be one. */
	acpi_get_table(id, 0, &madt);

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

	madt_end = (unsigned long)madt + madt->length;

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

	entry = (struct acpi_subtable_header *)
	    ((unsigned long)madt + madt_size);

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

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

	return count;
}

int __init
acpi_table_parse_madt(enum acpi_madt_type id,
		      acpi_table_entry_handler handler, unsigned int max_entries)
{
	return acpi_table_parse_madt_family(ACPI_SIG_MADT,
					    sizeof(struct acpi_table_madt), id,
					    handler, max_entries);
}

/**
 * acpi_table_parse - find table with @id, run @handler on it
 *
 * @id: table id to find
 * @handler: handler to run
 *
 * Scan the ACPI System Descriptor Table (STD) for a table matching @id,
 * run @handler on it.  Return 0 if table found, return on if not.
 */
int __init acpi_table_parse(char *id, acpi_table_handler handler)
{
	struct acpi_table_header *table = NULL;
	if (!handler)
		return -EINVAL;

	acpi_get_table(id, 0, &table);
	if (table) {
		handler(table);
		return 0;
	} else
		return 1;
}

/*
 * 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)
{
	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	40
1da177e4 LT	41	static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
	42	static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };
	43
ad71860a	44	static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;
1da177e4	45
5f3b1a8b	46	void acpi_table_print_madt_entry(struct acpi_subtable_header * header)
1da177e4 LT	47	{
	48	if (!header)
	49	return;
	50
	51	switch (header->type) {
	52
5f3b1a8b	53	case ACPI_MADT_TYPE_LOCAL_APIC:
4be44fcd	54	{
5f3b1a8b AS	55	struct acpi_madt_local_apic *p =
5f3b1a8b AS	56	(struct acpi_madt_local_apic *)header;
4be44fcd LB	57	printk(KERN_INFO PREFIX
4be44fcd LB	58	"LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
5f3b1a8b AS	59	p->processor_id, p->id,
5f3b1a8b AS	60	(p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
4be44fcd	61	}
1da177e4 LT	62	break;
1da177e4 LT	63
5f3b1a8b	64	case ACPI_MADT_TYPE_IO_APIC:
4be44fcd	65	{
5f3b1a8b AS	66	struct acpi_madt_io_apic *p =
5f3b1a8b AS	67	(struct acpi_madt_io_apic *)header;
4be44fcd LB	68	printk(KERN_INFO PREFIX
	69	"IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
	70	p->id, p->address, p->global_irq_base);
	71	}
1da177e4 LT	72	break;
1da177e4 LT	73
5f3b1a8b	74	case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
4be44fcd	75	{
5f3b1a8b AS	76	struct acpi_madt_interrupt_override *p =
5f3b1a8b AS	77	(struct acpi_madt_interrupt_override *)header;
4be44fcd LB	78	printk(KERN_INFO PREFIX
4be44fcd LB	79	"INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
5f3b1a8b AS	80	p->bus, p->source_irq, p->global_irq,
	81	mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
	82	mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2]);
	83	if (p->inti_flags &
	84	~(ACPI_MADT_POLARITY_MASK \| ACPI_MADT_TRIGGER_MASK))
4be44fcd LB	85	printk(KERN_INFO PREFIX
4be44fcd LB	86	"INT_SRC_OVR unexpected reserved flags: 0x%x\n",
5f3b1a8b AS	87	p->inti_flags &
5f3b1a8b AS	88	~(ACPI_MADT_POLARITY_MASK \| ACPI_MADT_TRIGGER_MASK));
1da177e4	89
4be44fcd	90	}
1da177e4 LT	91	break;
1da177e4 LT	92
5f3b1a8b	93	case ACPI_MADT_TYPE_NMI_SOURCE:
4be44fcd	94	{
5f3b1a8b AS	95	struct acpi_madt_nmi_source *p =
5f3b1a8b AS	96	(struct acpi_madt_nmi_source *)header;
4be44fcd LB	97	printk(KERN_INFO PREFIX
4be44fcd LB	98	"NMI_SRC (%s %s global_irq %d)\n",
5f3b1a8b AS	99	mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
5f3b1a8b AS	100	mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
4be44fcd LB	101	p->global_irq);
4be44fcd LB	102	}
1da177e4 LT	103	break;
1da177e4 LT	104
5f3b1a8b	105	case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
4be44fcd	106	{
5f3b1a8b AS	107	struct acpi_madt_local_apic_nmi *p =
5f3b1a8b AS	108	(struct acpi_madt_local_apic_nmi *)header;
4be44fcd LB	109	printk(KERN_INFO PREFIX
4be44fcd LB	110	"LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
5f3b1a8b AS	111	p->processor_id,
	112	mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK ],
	113	mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
4be44fcd LB	114	p->lint);
4be44fcd LB	115	}
1da177e4 LT	116	break;
1da177e4 LT	117
5f3b1a8b	118	case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
4be44fcd	119	{
5f3b1a8b AS	120	struct acpi_madt_local_apic_override *p =
5f3b1a8b AS	121	(struct acpi_madt_local_apic_override *)header;
4be44fcd LB	122	printk(KERN_INFO PREFIX
	123	"LAPIC_ADDR_OVR (address[%p])\n",
	124	(void *)(unsigned long)p->address);
	125	}
1da177e4 LT	126	break;
1da177e4 LT	127
5f3b1a8b	128	case ACPI_MADT_TYPE_IO_SAPIC:
4be44fcd	129	{
5f3b1a8b AS	130	struct acpi_madt_io_sapic *p =
5f3b1a8b AS	131	(struct acpi_madt_io_sapic *)header;
4be44fcd LB	132	printk(KERN_INFO PREFIX
	133	"IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
	134	p->id, (void *)(unsigned long)p->address,
	135	p->global_irq_base);
	136	}
1da177e4 LT	137	break;
1da177e4 LT	138
5f3b1a8b	139	case ACPI_MADT_TYPE_LOCAL_SAPIC:
4be44fcd	140	{
5f3b1a8b AS	141	struct acpi_madt_local_sapic *p =
5f3b1a8b AS	142	(struct acpi_madt_local_sapic *)header;
4be44fcd LB	143	printk(KERN_INFO PREFIX
4be44fcd LB	144	"LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
5f3b1a8b AS	145	p->processor_id, p->id, p->eid,
5f3b1a8b AS	146	(p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
4be44fcd	147	}
1da177e4 LT	148	break;
1da177e4 LT	149
5f3b1a8b	150	case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
4be44fcd	151	{
5f3b1a8b AS	152	struct acpi_madt_interrupt_source *p =
5f3b1a8b AS	153	(struct acpi_madt_interrupt_source *)header;
4be44fcd LB	154	printk(KERN_INFO PREFIX
4be44fcd LB	155	"PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
5f3b1a8b AS	156	mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
	157	mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
	158	p->type, p->id, p->eid, p->io_sapic_vector,
4be44fcd LB	159	p->global_irq);
4be44fcd LB	160	}
1da177e4 LT	161	break;
	162
	163	default:
4be44fcd LB	164	printk(KERN_WARNING PREFIX
	165	"Found unsupported MADT entry (type = 0x%x)\n",
	166	header->type);
1da177e4 LT	167	break;
	168	}
	169	}
	170
1da177e4 LT	171
1da177e4 LT	172	int __init
ceb6c468	173	acpi_table_parse_madt_family(char *id,
4be44fcd LB	174	unsigned long madt_size,
4be44fcd LB	175	int entry_id,
5a8765a8	176	acpi_table_entry_handler handler,
4be44fcd	177	unsigned int max_entries)
1da177e4	178	{
ceb6c468	179	struct acpi_table_header *madt = NULL;
5f3b1a8b	180	struct acpi_subtable_header *entry;
4be44fcd LB	181	unsigned int count = 0;
4be44fcd LB	182	unsigned long madt_end;
1da177e4 LT	183
	184	if (!handler)
	185	return -EINVAL;
	186
	187	/* Locate the MADT (if exists). There should only be one. */
ceb6c468	188	acpi_get_table(id, 0, &madt);
1da177e4 LT	189
1da177e4 LT	190	if (!madt) {
ceb6c468	191	printk(KERN_WARNING PREFIX "%4.4s not present\n", id);
1da177e4 LT	192	return -ENODEV;
	193	}
	194
ceb6c468	195	madt_end = (unsigned long)madt + madt->length;
1da177e4 LT	196
	197	/* Parse all entries looking for a match. */
	198
5f3b1a8b	199	entry = (struct acpi_subtable_header *)
4be44fcd	200	((unsigned long)madt + madt_size);
1da177e4	201
5f3b1a8b	202	while (((unsigned long)entry) + sizeof(struct acpi_subtable_header) <
4be44fcd LB	203	madt_end) {
	204	if (entry->type == entry_id
	205	&& (!max_entries \|\| count++ < max_entries))
1da177e4 LT	206	if (handler(entry, madt_end))
	207	return -EINVAL;
	208
5f3b1a8b	209	entry = (struct acpi_subtable_header *)
4be44fcd	210	((unsigned long)entry + entry->length);
1da177e4 LT	211	}
1da177e4 LT	212	if (max_entries && count > max_entries) {
ceb6c468 AS	213	printk(KERN_WARNING PREFIX "[%4.4s:0x%02x] ignored %i entries of "
ceb6c468 AS	214	"%i found\n", id, entry_id, count - max_entries, count);
1da177e4 LT	215	}
	216
	217	return count;
	218	}
	219
1da177e4	220	int __init
5f3b1a8b	221	acpi_table_parse_madt(enum acpi_madt_type id,
5a8765a8	222	acpi_table_entry_handler handler, unsigned int max_entries)
1da177e4	223	{
5f3b1a8b	224	return acpi_table_parse_madt_family(ACPI_SIG_MADT,
4be44fcd LB	225	sizeof(struct acpi_table_madt), id,
4be44fcd LB	226	handler, max_entries);
1da177e4 LT	227	}
1da177e4 LT	228
7f8f97c3 LB	229	/**
	230	* acpi_table_parse - find table with @id, run @handler on it
	231	*
	232	* @id: table id to find
	233	* @handler: handler to run
	234	*
	235	* Scan the ACPI System Descriptor Table (STD) for a table matching @id,
	236	* run @handler on it. Return 0 if table found, return on if not.
	237	*/
ceb6c468	238	int __init acpi_table_parse(char *id, acpi_table_handler handler)
1da177e4	239	{
ceb6c468	240	struct acpi_table_header *table = NULL;
1da177e4 LT	241	if (!handler)
	242	return -EINVAL;
	243
ceb6c468 AS	244	acpi_get_table(id, 0, &table);
	245	if (table) {
	246	handler(table);
ceb6c468	247	return 0;
7f8f97c3 LB	248	} else
7f8f97c3 LB	249	return 1;
1da177e4 LT	250	}
	251
	252	/*
	253	* acpi_table_init()
	254	*
	255	* find RSDP, find and checksum SDT/XSDT.
	256	* checksum all tables, print SDT/XSDT
5f3b1a8b	257	*
1da177e4 LT	258	* result: sdt_entry[] is initialized
	259	*/
	260
5f3b1a8b	261
4be44fcd	262	int __init acpi_table_init(void)
1da177e4	263	{
ad71860a	264	acpi_initialize_tables(initial_tables, ACPI_MAX_TABLES, 0);
1da177e4 LT	265	return 0;
1da177e4 LT	266	}