WebSVN – HelenOS-historic – Blame – /kernel/trunk/genarch/src/acpi/madt.c

Rev	Author	Line No.	Line
33	jermar	1	/*
		2	* Copyright (C) 2005 Jakub Jermar
		3	* All rights reserved.
		4	*
		5	* Redistribution and use in source and binary forms, with or without
		6	* modification, are permitted provided that the following conditions
		7	* are met:
		8	*
		9	* - Redistributions of source code must retain the above copyright
		10	* notice, this list of conditions and the following disclaimer.
		11	* - Redistributions in binary form must reproduce the above copyright
		12	* notice, this list of conditions and the following disclaimer in the
		13	* documentation and/or other materials provided with the distribution.
		14	* - The name of the author may not be used to endorse or promote products
		15	* derived from this software without specific prior written permission.
		16	*
		17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
		18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
		19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
		20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
		21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
		22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
		23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
		24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
		25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
		26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
		27	*/
		28
34	jermar	29	#include <arch/types.h>
129	jermar	30	#include <typedefs.h>
33	jermar	31	#include <arch/acpi/acpi.h>
		32	#include <arch/acpi/madt.h>
34	jermar	33	#include <arch/smp/apic.h>
129	jermar	34	#include <arch/smp/smp.h>
127	jermar	35	#include <panic.h>
129	jermar	36	#include <debug.h>
		37	#include <config.h>
195	vana	38	#include <print.h>
310	bondari	39	#include <mm/heap.h>
		40	#include <memstr.h>
331	bondari	41	#include <sort.h>
33	jermar	42
		43	struct acpi_madt *acpi_madt = NULL;
34	jermar	44
		45	#ifdef __SMP__
		46
310	bondari	47	static void madt_l_apic_entry(struct madt_l_apic *la, __u32 index);
		48	static void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index);
331	bondari	49	static int madt_cmp(void * a, void * b);
127	jermar	50
		51	struct madt_l_apic *madt_l_apic_entries = NULL;
		52	struct madt_io_apic *madt_io_apic_entries = NULL;
		53
310	bondari	54	__u32 madt_l_apic_entry_index = 0;
		55	__u32 madt_io_apic_entry_index = 0;
127	jermar	56	int madt_l_apic_entry_cnt = 0;
		57	int madt_io_apic_entry_cnt = 0;
		58
310	bondari	59	struct madt_apic_header * * madt_entries_index = NULL;
		60	int madt_entries_index_cnt = 0;
		61
34	jermar	62	char *entry[] = {
		63	"L_APIC",
		64	"IO_APIC",
		65	"INTR_SRC_OVRD",
		66	"NMI_SRC",
		67	"L_APIC_NMI",
		68	"L_APIC_ADDR_OVRD",
		69	"IO_SAPIC",
		70	"L_SAPIC",
		71	"PLATFORM_INTR_SRC"
		72	};
		73
129	jermar	74	/*
		75	* ACPI MADT Implementation of SMP configuration interface.
		76	*/
		77	static count_t madt_cpu_count(void);
		78	static bool madt_cpu_enabled(index_t i);
		79	static bool madt_cpu_bootstrap(index_t i);
		80	static __u8 madt_cpu_apic_id(index_t i);
		81
		82	struct smp_config_operations madt_config_operations = {
		83	.cpu_count = madt_cpu_count,
		84	.cpu_enabled = madt_cpu_enabled,
		85	.cpu_bootstrap = madt_cpu_bootstrap,
		86	.cpu_apic_id = madt_cpu_apic_id
		87	};
		88
		89	static count_t madt_cpu_count(void)
		90	{
		91	return madt_l_apic_entry_cnt;
		92	}
		93
		94	static bool madt_cpu_enabled(index_t i)
		95	{
		96	ASSERT(i < madt_l_apic_entry_cnt);
310	bondari	97	return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->flags & 0x1;
		98
129	jermar	99	}
		100
		101	static bool madt_cpu_bootstrap(index_t i)
		102	{
		103	ASSERT(i < madt_l_apic_entry_cnt);
310	bondari	104	return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id == l_apic_id();
129	jermar	105	}
		106
		107	static __u8 madt_cpu_apic_id(index_t i)
		108	{
		109	ASSERT(i < madt_l_apic_entry_cnt);
310	bondari	110	return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id;
129	jermar	111	}
		112
331	bondari	113	int madt_cmp(void * a, void * b)
		114	{
		115	return
		116	(((struct madt_apic_header ) a)->type > ((struct madt_apic_header ) b)->type) ?
		117	1 :
		118	((((struct madt_apic_header ) a)->type < ((struct madt_apic_header ) b)->type) ? -1 : 0);
		119	}
		120
34	jermar	121	void acpi_madt_parse(void)
		122	{
331	bondari	123
		124
34	jermar	125	struct madt_apic_header end = (struct madt_apic_header ) (((__u8 *) acpi_madt) + acpi_madt->header.length);
310	bondari	126	struct madt_apic_header *h;
311	bondari	127
		128	l_apic = (__u32 *) (__native) acpi_madt->l_apic_address;
34	jermar	129
310	bondari	130	/* calculate madt entries */
		131	for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header ) (((__u8 ) h) + h->length)) {
		132	madt_entries_index_cnt++;
		133	}
		134	printf("MADT: Found %d entries\n", madt_entries_index_cnt);
127	jermar	135
310	bondari	136	/* create madt apic entries index array */
		137	madt_entries_index = (struct madt_apic_header * ) malloc(madt_entries_index_cnt sizeof(struct madt_apic_header * *));
34	jermar	138
310	bondari	139	__u32 index = 0;
		140
		141	for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header ) (((__u8 ) h) + h->length)) {
		142	madt_entries_index[index++] = h;
		143	}
		144
		145
331	bondari	146	/* Quicksort MADT index structure */
		147	qsort(madt_entries_index, madt_entries_index_cnt, sizeof(__address), &madt_cmp);
310	bondari	148
		149	/* Parse MADT entries */
		150	for (index = 0; index < madt_entries_index_cnt - 1; index++) {
		151	h = madt_entries_index[index];
34	jermar	152	switch (h->type) {
		153	case MADT_L_APIC:
310	bondari	154	madt_l_apic_entry((struct madt_l_apic *) h, index);
127	jermar	155	break;
34	jermar	156	case MADT_IO_APIC:
310	bondari	157	madt_io_apic_entry((struct madt_io_apic *) h, index);
127	jermar	158	break;
34	jermar	159	case MADT_INTR_SRC_OVRD:
		160	case MADT_NMI_SRC:
		161	case MADT_L_APIC_NMI:
		162	case MADT_L_APIC_ADDR_OVRD:
		163	case MADT_IO_SAPIC:
		164	case MADT_L_SAPIC:
		165	case MADT_PLATFORM_INTR_SRC:
		166	printf("MADT: skipping %s entry (type=%d)\n", entry[h->type], h->type);
		167	break;
		168
		169	default:
		170	if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) {
		171	printf("MADT: skipping reserved entry (type=%d)\n", h->type);
		172	}
		173	if (h->type >= MADT_RESERVED_OEM_BEGIN) {
		174	printf("MADT: skipping OEM entry (type=%d)\n", h->type);
		175	}
		176	break;
		177	}
310	bondari	178
		179
34	jermar	180	}
310	bondari	181
34	jermar	182
129	jermar	183	if (madt_l_apic_entry_cnt)
		184	config.cpu_count = madt_l_apic_entry_cnt;
34	jermar	185	}
127	jermar	186
310	bondari	187
		188	void madt_l_apic_entry(struct madt_l_apic *la, __u32 index)
127	jermar	189	{
310	bondari	190	if (!madt_l_apic_entry_cnt++) {
		191	madt_l_apic_entry_index = index;
		192	}
127	jermar	193
		194	if (!(la->flags & 0x1)) {
		195	/* Processor is unusable, skip it. */
		196	return;
		197	}
		198
		199	apic_id_mask \|= 1<<la->apic_id;
		200	}
		201
310	bondari	202	void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index)
127	jermar	203	{
		204	if (!madt_io_apic_entry_cnt++) {
310	bondari	205	/* remember index of the first io apic entry */
		206	madt_io_apic_entry_index = index;
268	palkovsky	207	io_apic = (__u32 *) (__native) ioa->io_apic_address;
310	bondari	208	} else {
127	jermar	209	/* currently not supported */
		210	return;
		211	}
		212	}
		213
		214
34	jermar	215	#endif /* __SMP__ */

Subversion Repositories HelenOS-historic

(root)/kernel/trunk/genarch/src/acpi/madt.c @ 1780 – Rev 331