[linux-2.6-block.git] / drivers / firmware / dmi_scan.c

#include <linux/types.h>
#include <linux/string.h>
#include <linux/init.h>
#include <linux/module.h>
#include <linux/dmi.h>
#include <linux/efi.h>
#include <linux/bootmem.h>
#include <linux/slab.h>
#include <asm/dmi.h>

static char * __init dmi_string(const struct dmi_header *dm, u8 s)
{
	const u8 *bp = ((u8 *) dm) + dm->length;
	char *str = "";

	if (s) {
		s--;
		while (s > 0 && *bp) {
			bp += strlen(bp) + 1;
			s--;
		}

		if (*bp != 0) {
			str = dmi_alloc(strlen(bp) + 1);
			if (str != NULL)
				strcpy(str, bp);
			else
				printk(KERN_ERR "dmi_string: out of memory.\n");
		}
	}

	return str;
}

/*
 *	We have to be cautious here. We have seen BIOSes with DMI pointers
 *	pointing to completely the wrong place for example
 */
static int __init dmi_table(u32 base, int len, int num,
			    void (*decode)(const struct dmi_header *))
{
	u8 *buf, *data;
	int i = 0;

	buf = dmi_ioremap(base, len);
	if (buf == NULL)
		return -1;

	data = buf;

	/*
	 *	Stop when we see all the items the table claimed to have
	 *	OR we run off the end of the table (also happens)
	 */
	while ((i < num) && (data - buf + sizeof(struct dmi_header)) <= len) {
		const struct dmi_header *dm = (const struct dmi_header *)data;

		/*
		 *  We want to know the total length (formated area and strings)
		 *  before decoding to make sure we won't run off the table in
		 *  dmi_decode or dmi_string
		 */
		data += dm->length;
		while ((data - buf < len - 1) && (data[0] || data[1]))
			data++;
		if (data - buf < len - 1)
			decode(dm);
		data += 2;
		i++;
	}
	dmi_iounmap(buf, len);
	return 0;
}

static int __init dmi_checksum(const u8 *buf)
{
	u8 sum = 0;
	int a;

	for (a = 0; a < 15; a++)
		sum += buf[a];

	return sum == 0;
}

static char *dmi_ident[DMI_STRING_MAX];
static LIST_HEAD(dmi_devices);
int dmi_available;

/*
 *	Save a DMI string
 */
static void __init dmi_save_ident(const struct dmi_header *dm, int slot, int string)
{
	const char *d = (const char*) dm;
	char *p;

	if (dmi_ident[slot])
		return;

	p = dmi_string(dm, d[string]);
	if (p == NULL)
		return;

	dmi_ident[slot] = p;
}

static void __init dmi_save_uuid(const struct dmi_header *dm, int slot, int index)
{
	const u8 *d = (u8*) dm + index;
	char *s;
	int is_ff = 1, is_00 = 1, i;

	if (dmi_ident[slot])
		return;

	for (i = 0; i < 16 && (is_ff || is_00); i++) {
		if(d[i] != 0x00) is_ff = 0;
		if(d[i] != 0xFF) is_00 = 0;
	}

	if (is_ff || is_00)
		return;

	s = dmi_alloc(16*2+4+1);
	if (!s)
		return;

	sprintf(s,
		"%02X%02X%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X%02X%02X%02X%02X",
		d[0], d[1], d[2], d[3], d[4], d[5], d[6], d[7],
		d[8], d[9], d[10], d[11], d[12], d[13], d[14], d[15]);

        dmi_ident[slot] = s;
}

static void __init dmi_save_type(const struct dmi_header *dm, int slot, int index)
{
	const u8 *d = (u8*) dm + index;
	char *s;

	if (dmi_ident[slot])
		return;

	s = dmi_alloc(4);
	if (!s)
		return;

	sprintf(s, "%u", *d & 0x7F);
	dmi_ident[slot] = s;
}

static void __init dmi_save_devices(const struct dmi_header *dm)
{
	int i, count = (dm->length - sizeof(struct dmi_header)) / 2;
	struct dmi_device *dev;

	for (i = 0; i < count; i++) {
		const char *d = (char *)(dm + 1) + (i * 2);

		/* Skip disabled device */
		if ((*d & 0x80) == 0)
			continue;

		dev = dmi_alloc(sizeof(*dev));
		if (!dev) {
			printk(KERN_ERR "dmi_save_devices: out of memory.\n");
			break;
		}

		dev->type = *d++ & 0x7f;
		dev->name = dmi_string(dm, *d);
		dev->device_data = NULL;
		list_add(&dev->list, &dmi_devices);
	}
}

static void __init dmi_save_oem_strings_devices(const struct dmi_header *dm)
{
	int i, count = *(u8 *)(dm + 1);
	struct dmi_device *dev;

	for (i = 1; i <= count; i++) {
		dev = dmi_alloc(sizeof(*dev));
		if (!dev) {
			printk(KERN_ERR
			   "dmi_save_oem_strings_devices: out of memory.\n");
			break;
		}

		dev->type = DMI_DEV_TYPE_OEM_STRING;
		dev->name = dmi_string(dm, i);
		dev->device_data = NULL;

		list_add(&dev->list, &dmi_devices);
	}
}

static void __init dmi_save_ipmi_device(const struct dmi_header *dm)
{
	struct dmi_device *dev;
	void * data;

	data = dmi_alloc(dm->length);
	if (data == NULL) {
		printk(KERN_ERR "dmi_save_ipmi_device: out of memory.\n");
		return;
	}

	memcpy(data, dm, dm->length);

	dev = dmi_alloc(sizeof(*dev));
	if (!dev) {
		printk(KERN_ERR "dmi_save_ipmi_device: out of memory.\n");
		return;
	}

	dev->type = DMI_DEV_TYPE_IPMI;
	dev->name = "IPMI controller";
	dev->device_data = data;

	list_add(&dev->list, &dmi_devices);
}

/*
 *	Process a DMI table entry. Right now all we care about are the BIOS
 *	and machine entries. For 2.5 we should pull the smbus controller info
 *	out of here.
 */
static void __init dmi_decode(const struct dmi_header *dm)
{
	switch(dm->type) {
	case 0:		/* BIOS Information */
		dmi_save_ident(dm, DMI_BIOS_VENDOR, 4);
		dmi_save_ident(dm, DMI_BIOS_VERSION, 5);
		dmi_save_ident(dm, DMI_BIOS_DATE, 8);
		break;
	case 1:		/* System Information */
		dmi_save_ident(dm, DMI_SYS_VENDOR, 4);
		dmi_save_ident(dm, DMI_PRODUCT_NAME, 5);
		dmi_save_ident(dm, DMI_PRODUCT_VERSION, 6);
		dmi_save_ident(dm, DMI_PRODUCT_SERIAL, 7);
		dmi_save_uuid(dm, DMI_PRODUCT_UUID, 8);
		break;
	case 2:		/* Base Board Information */
		dmi_save_ident(dm, DMI_BOARD_VENDOR, 4);
		dmi_save_ident(dm, DMI_BOARD_NAME, 5);
		dmi_save_ident(dm, DMI_BOARD_VERSION, 6);
		dmi_save_ident(dm, DMI_BOARD_SERIAL, 7);
		dmi_save_ident(dm, DMI_BOARD_ASSET_TAG, 8);
		break;
	case 3:		/* Chassis Information */
		dmi_save_ident(dm, DMI_CHASSIS_VENDOR, 4);
		dmi_save_type(dm, DMI_CHASSIS_TYPE, 5);
		dmi_save_ident(dm, DMI_CHASSIS_VERSION, 6);
		dmi_save_ident(dm, DMI_CHASSIS_SERIAL, 7);
		dmi_save_ident(dm, DMI_CHASSIS_ASSET_TAG, 8);
		break;
	case 10:	/* Onboard Devices Information */
		dmi_save_devices(dm);
		break;
	case 11:	/* OEM Strings */
		dmi_save_oem_strings_devices(dm);
		break;
	case 38:	/* IPMI Device Information */
		dmi_save_ipmi_device(dm);
	}
}

static int __init dmi_present(const char __iomem *p)
{
	u8 buf[15];

	memcpy_fromio(buf, p, 15);
	if ((memcmp(buf, "_DMI_", 5) == 0) && dmi_checksum(buf)) {
		u16 num = (buf[13] << 8) | buf[12];
		u16 len = (buf[7] << 8) | buf[6];
		u32 base = (buf[11] << 24) | (buf[10] << 16) |
			(buf[9] << 8) | buf[8];

		/*
		 * DMI version 0.0 means that the real version is taken from
		 * the SMBIOS version, which we don't know at this point.
		 */
		if (buf[14] != 0)
			printk(KERN_INFO "DMI %d.%d present.\n",
			       buf[14] >> 4, buf[14] & 0xF);
		else
			printk(KERN_INFO "DMI present.\n");
		if (dmi_table(base,len, num, dmi_decode) == 0)
			return 0;
	}
	return 1;
}

void __init dmi_scan_machine(void)
{
	char __iomem *p, *q;
	int rc;

	if (efi_enabled) {
		if (efi.smbios == EFI_INVALID_TABLE_ADDR)
			goto out;

		/* This is called as a core_initcall() because it isn't
		 * needed during early boot.  This also means we can
		 * iounmap the space when we're done with it.
		 */
		p = dmi_ioremap(efi.smbios, 32);
		if (p == NULL)
			goto out;

		rc = dmi_present(p + 0x10); /* offset of _DMI_ string */
		dmi_iounmap(p, 32);
		if (!rc) {
			dmi_available = 1;
			return;
		}
	}
	else {
		/*
		 * no iounmap() for that ioremap(); it would be a no-op, but
		 * it's so early in setup that sucker gets confused into doing
		 * what it shouldn't if we actually call it.
		 */
		p = dmi_ioremap(0xF0000, 0x10000);
		if (p == NULL)
			goto out;

		for (q = p; q < p + 0x10000; q += 16) {
			rc = dmi_present(q);
			if (!rc) {
				dmi_available = 1;
				return;
			}
		}
	}
 out:	printk(KERN_INFO "DMI not present or invalid.\n");
}

/**
 *	dmi_check_system - check system DMI data
 *	@list: array of dmi_system_id structures to match against
 *		All non-null elements of the list must match
 *		their slot's (field index's) data (i.e., each
 *		list string must be a substring of the specified
 *		DMI slot's string data) to be considered a
 *		successful match.
 *
 *	Walk the blacklist table running matching functions until someone
 *	returns non zero or we hit the end. Callback function is called for
 *	each successful match. Returns the number of matches.
 */
int dmi_check_system(const struct dmi_system_id *list)
{
	int i, count = 0;
	const struct dmi_system_id *d = list;

	while (d->ident) {
		for (i = 0; i < ARRAY_SIZE(d->matches); i++) {
			int s = d->matches[i].slot;
			if (s == DMI_NONE)
				continue;
			if (dmi_ident[s] && strstr(dmi_ident[s], d->matches[i].substr))
				continue;
			/* No match */
			goto fail;
		}
		count++;
		if (d->callback && d->callback(d))
			break;
fail:		d++;
	}

	return count;
}
EXPORT_SYMBOL(dmi_check_system);

/**
 *	dmi_get_system_info - return DMI data value
 *	@field: data index (see enum dmi_field)
 *
 *	Returns one DMI data value, can be used to perform
 *	complex DMI data checks.
 */
const char *dmi_get_system_info(int field)
{
	return dmi_ident[field];
}
EXPORT_SYMBOL(dmi_get_system_info);


/**
 *	dmi_name_in_vendors - Check if string is anywhere in the DMI vendor information.
 *	@str: 	Case sensitive Name
 */
int dmi_name_in_vendors(const char *str)
{
	static int fields[] = { DMI_BIOS_VENDOR, DMI_BIOS_VERSION, DMI_SYS_VENDOR,
				DMI_PRODUCT_NAME, DMI_PRODUCT_VERSION, DMI_BOARD_VENDOR,
				DMI_BOARD_NAME, DMI_BOARD_VERSION, DMI_NONE };
	int i;
	for (i = 0; fields[i] != DMI_NONE; i++) {
		int f = fields[i];
		if (dmi_ident[f] && strstr(dmi_ident[f], str))
			return 1;
	}
	return 0;
}
EXPORT_SYMBOL(dmi_name_in_vendors);

/**
 *	dmi_find_device - find onboard device by type/name
 *	@type: device type or %DMI_DEV_TYPE_ANY to match all device types
 *	@name: device name string or %NULL to match all
 *	@from: previous device found in search, or %NULL for new search.
 *
 *	Iterates through the list of known onboard devices. If a device is
 *	found with a matching @vendor and @device, a pointer to its device
 *	structure is returned.  Otherwise, %NULL is returned.
 *	A new search is initiated by passing %NULL as the @from argument.
 *	If @from is not %NULL, searches continue from next device.
 */
const struct dmi_device * dmi_find_device(int type, const char *name,
				    const struct dmi_device *from)
{
	const struct list_head *head = from ? &from->list : &dmi_devices;
	struct list_head *d;

	for(d = head->next; d != &dmi_devices; d = d->next) {
		const struct dmi_device *dev =
			list_entry(d, struct dmi_device, list);

		if (((type == DMI_DEV_TYPE_ANY) || (dev->type == type)) &&
		    ((name == NULL) || (strcmp(dev->name, name) == 0)))
			return dev;
	}

	return NULL;
}
EXPORT_SYMBOL(dmi_find_device);

/**
 *	dmi_get_year - Return year of a DMI date
 *	@field:	data index (like dmi_get_system_info)
 *
 *	Returns -1 when the field doesn't exist. 0 when it is broken.
 */
int dmi_get_year(int field)
{
	int year;
	const char *s = dmi_get_system_info(field);

	if (!s)
		return -1;
	if (*s == '\0')
		return 0;
	s = strrchr(s, '/');
	if (!s)
		return 0;

	s += 1;
	year = simple_strtoul(s, NULL, 0);
	if (year && year < 100) {	/* 2-digit year */
		year += 1900;
		if (year < 1996)	/* no dates < spec 1.0 */
			year += 100;
	}

	return year;
}
Commit	Line	Data
1da177e4	1	#include <linux/types.h>
1da177e4 LT	2	#include <linux/string.h>
	3	#include <linux/init.h>
	4	#include <linux/module.h>
1da177e4	5	#include <linux/dmi.h>
3ed3bce8	6	#include <linux/efi.h>
1da177e4	7	#include <linux/bootmem.h>
e9928674	8	#include <linux/slab.h>
f2d3efed	9	#include <asm/dmi.h>
1da177e4	10
1855256c	11	static char * __init dmi_string(const struct dmi_header *dm, u8 s)
1da177e4	12	{
1855256c	13	const u8 bp = ((u8 ) dm) + dm->length;
c3c7120d	14	char *str = "";
1249c513	15
c3c7120d	16	if (s) {
1da177e4	17	s--;
c3c7120d AP	18	while (s > 0 && *bp) {
	19	bp += strlen(bp) + 1;
	20	s--;
	21	}
	22
	23	if (*bp != 0) {
e9928674	24	str = dmi_alloc(strlen(bp) + 1);
c3c7120d AP	25	if (str != NULL)
	26	strcpy(str, bp);
	27	else
	28	printk(KERN_ERR "dmi_string: out of memory.\n");
	29	}
4f705ae3	30	}
c3c7120d AP	31
c3c7120d AP	32	return str;
1da177e4 LT	33	}
	34
	35	/*
	36	* We have to be cautious here. We have seen BIOSes with DMI pointers
	37	* pointing to completely the wrong place for example
	38	*/
1249c513	39	static int __init dmi_table(u32 base, int len, int num,
1855256c	40	void (decode)(const struct dmi_header ))
1da177e4	41	{
1249c513 AP	42	u8 buf, data;
1249c513 AP	43	int i = 0;
4f705ae3	44
e9928674	45	buf = dmi_ioremap(base, len);
1249c513	46	if (buf == NULL)
1da177e4 LT	47	return -1;
	48
	49	data = buf;
	50
	51	/*
4f705ae3 BH	52	* Stop when we see all the items the table claimed to have
	53	* OR we run off the end of the table (also happens)
	54	*/
1249c513	55	while ((i < num) && (data - buf + sizeof(struct dmi_header)) <= len) {
1855256c JG	56	const struct dmi_header dm = (const struct dmi_header )data;
1855256c JG	57
1da177e4 LT	58	/*
	59	* We want to know the total length (formated area and strings)
	60	* before decoding to make sure we won't run off the table in
	61	* dmi_decode or dmi_string
	62	*/
1249c513 AP	63	data += dm->length;
1249c513 AP	64	while ((data - buf < len - 1) && (data[0] \|\| data[1]))
1da177e4	65	data++;
1249c513	66	if (data - buf < len - 1)
1da177e4	67	decode(dm);
1249c513	68	data += 2;
1da177e4 LT	69	i++;
1da177e4 LT	70	}
e9928674	71	dmi_iounmap(buf, len);
1da177e4 LT	72	return 0;
	73	}
	74
1855256c	75	static int __init dmi_checksum(const u8 *buf)
1da177e4	76	{
1249c513	77	u8 sum = 0;
1da177e4	78	int a;
4f705ae3	79
1249c513 AP	80	for (a = 0; a < 15; a++)
	81	sum += buf[a];
	82
	83	return sum == 0;
1da177e4 LT	84	}
1da177e4 LT	85
1da177e4	86	static char *dmi_ident[DMI_STRING_MAX];
ebad6a42	87	static LIST_HEAD(dmi_devices);
4f5c791a	88	int dmi_available;
1da177e4 LT	89
	90	/*
	91	* Save a DMI string
	92	*/
1855256c	93	static void __init dmi_save_ident(const struct dmi_header *dm, int slot, int string)
1da177e4	94	{
1855256c JG	95	const char d = (const char) dm;
1855256c JG	96	char *p;
1249c513	97
1da177e4 LT	98	if (dmi_ident[slot])
1da177e4 LT	99	return;
1249c513	100
c3c7120d AP	101	p = dmi_string(dm, d[string]);
	102	if (p == NULL)
	103	return;
	104
	105	dmi_ident[slot] = p;
1da177e4 LT	106	}
1da177e4 LT	107
1855256c	108	static void __init dmi_save_uuid(const struct dmi_header *dm, int slot, int index)
4f5c791a	109	{
1855256c	110	const u8 d = (u8) dm + index;
4f5c791a LP	111	char *s;
	112	int is_ff = 1, is_00 = 1, i;
	113
	114	if (dmi_ident[slot])
	115	return;
	116
	117	for (i = 0; i < 16 && (is_ff \|\| is_00); i++) {
	118	if(d[i] != 0x00) is_ff = 0;
	119	if(d[i] != 0xFF) is_00 = 0;
	120	}
	121
	122	if (is_ff \|\| is_00)
	123	return;
	124
	125	s = dmi_alloc(16*2+4+1);
	126	if (!s)
	127	return;
	128
	129	sprintf(s,
	130	"%02X%02X%02X%02X-%02X%02X-%02X%02X-%02X%02X-%02X%02X%02X%02X%02X%02X",
	131	d[0], d[1], d[2], d[3], d[4], d[5], d[6], d[7],
	132	d[8], d[9], d[10], d[11], d[12], d[13], d[14], d[15]);
	133
	134	dmi_ident[slot] = s;
	135	}
	136
1855256c	137	static void __init dmi_save_type(const struct dmi_header *dm, int slot, int index)
4f5c791a	138	{
1855256c	139	const u8 d = (u8) dm + index;
4f5c791a LP	140	char *s;
	141
	142	if (dmi_ident[slot])
	143	return;
	144
	145	s = dmi_alloc(4);
	146	if (!s)
	147	return;
	148
	149	sprintf(s, "%u", *d & 0x7F);
	150	dmi_ident[slot] = s;
	151	}
	152
1855256c	153	static void __init dmi_save_devices(const struct dmi_header *dm)
ebad6a42 AP	154	{
	155	int i, count = (dm->length - sizeof(struct dmi_header)) / 2;
	156	struct dmi_device *dev;
	157
	158	for (i = 0; i < count; i++) {
1855256c	159	const char d = (char )(dm + 1) + (i * 2);
ebad6a42 AP	160
	161	/* Skip disabled device */
	162	if ((*d & 0x80) == 0)
	163	continue;
	164
e9928674	165	dev = dmi_alloc(sizeof(*dev));
ebad6a42 AP	166	if (!dev) {
	167	printk(KERN_ERR "dmi_save_devices: out of memory.\n");
	168	break;
	169	}
	170
	171	dev->type = *d++ & 0x7f;
	172	dev->name = dmi_string(dm, *d);
	173	dev->device_data = NULL;
2e0c1f6c SM	174	list_add(&dev->list, &dmi_devices);
	175	}
	176	}
	177
1855256c	178	static void __init dmi_save_oem_strings_devices(const struct dmi_header *dm)
2e0c1f6c SM	179	{
	180	int i, count = (u8 )(dm + 1);
	181	struct dmi_device *dev;
	182
	183	for (i = 1; i <= count; i++) {
	184	dev = dmi_alloc(sizeof(*dev));
	185	if (!dev) {
	186	printk(KERN_ERR
	187	"dmi_save_oem_strings_devices: out of memory.\n");
	188	break;
	189	}
	190
	191	dev->type = DMI_DEV_TYPE_OEM_STRING;
	192	dev->name = dmi_string(dm, i);
	193	dev->device_data = NULL;
ebad6a42 AP	194
	195	list_add(&dev->list, &dmi_devices);
	196	}
	197	}
	198
1855256c	199	static void __init dmi_save_ipmi_device(const struct dmi_header *dm)
ebad6a42 AP	200	{
	201	struct dmi_device *dev;
	202	void * data;
	203
e9928674	204	data = dmi_alloc(dm->length);
ebad6a42 AP	205	if (data == NULL) {
	206	printk(KERN_ERR "dmi_save_ipmi_device: out of memory.\n");
	207	return;
	208	}
	209
	210	memcpy(data, dm, dm->length);
	211
e9928674	212	dev = dmi_alloc(sizeof(*dev));
ebad6a42 AP	213	if (!dev) {
	214	printk(KERN_ERR "dmi_save_ipmi_device: out of memory.\n");
	215	return;
	216	}
	217
	218	dev->type = DMI_DEV_TYPE_IPMI;
	219	dev->name = "IPMI controller";
	220	dev->device_data = data;
	221
	222	list_add(&dev->list, &dmi_devices);
	223	}
	224
1da177e4 LT	225	/*
	226	* Process a DMI table entry. Right now all we care about are the BIOS
	227	* and machine entries. For 2.5 we should pull the smbus controller info
	228	* out of here.
	229	*/
1855256c	230	static void __init dmi_decode(const struct dmi_header *dm)
1da177e4	231	{
1249c513	232	switch(dm->type) {
ebad6a42	233	case 0: /* BIOS Information */
1249c513	234	dmi_save_ident(dm, DMI_BIOS_VENDOR, 4);
1249c513	235	dmi_save_ident(dm, DMI_BIOS_VERSION, 5);
1249c513 AP	236	dmi_save_ident(dm, DMI_BIOS_DATE, 8);
1249c513 AP	237	break;
ebad6a42	238	case 1: /* System Information */
1249c513	239	dmi_save_ident(dm, DMI_SYS_VENDOR, 4);
1249c513	240	dmi_save_ident(dm, DMI_PRODUCT_NAME, 5);
1249c513	241	dmi_save_ident(dm, DMI_PRODUCT_VERSION, 6);
1249c513	242	dmi_save_ident(dm, DMI_PRODUCT_SERIAL, 7);
4f5c791a	243	dmi_save_uuid(dm, DMI_PRODUCT_UUID, 8);
1249c513	244	break;
ebad6a42	245	case 2: /* Base Board Information */
1249c513	246	dmi_save_ident(dm, DMI_BOARD_VENDOR, 4);
1249c513	247	dmi_save_ident(dm, DMI_BOARD_NAME, 5);
1249c513	248	dmi_save_ident(dm, DMI_BOARD_VERSION, 6);
4f5c791a LP	249	dmi_save_ident(dm, DMI_BOARD_SERIAL, 7);
	250	dmi_save_ident(dm, DMI_BOARD_ASSET_TAG, 8);
	251	break;
	252	case 3: /* Chassis Information */
	253	dmi_save_ident(dm, DMI_CHASSIS_VENDOR, 4);
	254	dmi_save_type(dm, DMI_CHASSIS_TYPE, 5);
	255	dmi_save_ident(dm, DMI_CHASSIS_VERSION, 6);
	256	dmi_save_ident(dm, DMI_CHASSIS_SERIAL, 7);
	257	dmi_save_ident(dm, DMI_CHASSIS_ASSET_TAG, 8);
1249c513	258	break;
ebad6a42 AP	259	case 10: /* Onboard Devices Information */
	260	dmi_save_devices(dm);
	261	break;
2e0c1f6c SM	262	case 11: /* OEM Strings */
	263	dmi_save_oem_strings_devices(dm);
	264	break;
ebad6a42 AP	265	case 38: /* IPMI Device Information */
ebad6a42 AP	266	dmi_save_ipmi_device(dm);
1da177e4 LT	267	}
	268	}
	269
1855256c	270	static int __init dmi_present(const char __iomem *p)
1da177e4	271	{
61e032fa	272	u8 buf[15];
1855256c	273
3ed3bce8 MD	274	memcpy_fromio(buf, p, 15);
	275	if ((memcmp(buf, "_DMI_", 5) == 0) && dmi_checksum(buf)) {
	276	u16 num = (buf[13] << 8) \| buf[12];
	277	u16 len = (buf[7] << 8) \| buf[6];
	278	u32 base = (buf[11] << 24) \| (buf[10] << 16) \|
	279	(buf[9] << 8) \| buf[8];
61e032fa	280
3ed3bce8 MD	281	/*
	282	* DMI version 0.0 means that the real version is taken from
	283	* the SMBIOS version, which we don't know at this point.
	284	*/
	285	if (buf[14] != 0)
	286	printk(KERN_INFO "DMI %d.%d present.\n",
	287	buf[14] >> 4, buf[14] & 0xF);
	288	else
	289	printk(KERN_INFO "DMI present.\n");
	290	if (dmi_table(base,len, num, dmi_decode) == 0)
	291	return 0;
	292	}
	293	return 1;
	294	}
61e032fa	295
3ed3bce8 MD	296	void __init dmi_scan_machine(void)
	297	{
	298	char __iomem p, q;
	299	int rc;
	300
	301	if (efi_enabled) {
b2c99e3c	302	if (efi.smbios == EFI_INVALID_TABLE_ADDR)
3ed3bce8 MD	303	goto out;
3ed3bce8 MD	304
4f5c791a LP	305	/* This is called as a core_initcall() because it isn't
	306	* needed during early boot. This also means we can
	307	* iounmap the space when we're done with it.
	308	*/
b2c99e3c	309	p = dmi_ioremap(efi.smbios, 32);
3ed3bce8 MD	310	if (p == NULL)
	311	goto out;
	312
	313	rc = dmi_present(p + 0x10); /* offset of _DMI_ string */
23dd842c	314	dmi_iounmap(p, 32);
4f5c791a LP	315	if (!rc) {
4f5c791a LP	316	dmi_available = 1;
3ed3bce8	317	return;
4f5c791a	318	}
3ed3bce8 MD	319	}
	320	else {
	321	/*
	322	* no iounmap() for that ioremap(); it would be a no-op, but
	323	* it's so early in setup that sucker gets confused into doing
	324	* what it shouldn't if we actually call it.
	325	*/
	326	p = dmi_ioremap(0xF0000, 0x10000);
	327	if (p == NULL)
	328	goto out;
	329
	330	for (q = p; q < p + 0x10000; q += 16) {
	331	rc = dmi_present(q);
4f5c791a LP	332	if (!rc) {
4f5c791a LP	333	dmi_available = 1;
61e032fa	334	return;
4f5c791a	335	}
61e032fa AP	336	}
61e032fa AP	337	}
3ed3bce8	338	out: printk(KERN_INFO "DMI not present or invalid.\n");
1da177e4 LT	339	}
1da177e4 LT	340
1da177e4 LT	341	/**
	342	* dmi_check_system - check system DMI data
	343	* @list: array of dmi_system_id structures to match against
b0ef371e RD	344	* All non-null elements of the list must match
	345	* their slot's (field index's) data (i.e., each
	346	* list string must be a substring of the specified
	347	* DMI slot's string data) to be considered a
	348	* successful match.
1da177e4 LT	349	*
	350	* Walk the blacklist table running matching functions until someone
	351	* returns non zero or we hit the end. Callback function is called for
b0ef371e	352	* each successful match. Returns the number of matches.
1da177e4	353	*/
1855256c	354	int dmi_check_system(const struct dmi_system_id *list)
1da177e4 LT	355	{
1da177e4 LT	356	int i, count = 0;
1855256c	357	const struct dmi_system_id *d = list;
1da177e4 LT	358
	359	while (d->ident) {
	360	for (i = 0; i < ARRAY_SIZE(d->matches); i++) {
	361	int s = d->matches[i].slot;
	362	if (s == DMI_NONE)
	363	continue;
	364	if (dmi_ident[s] && strstr(dmi_ident[s], d->matches[i].substr))
	365	continue;
	366	/* No match */
	367	goto fail;
	368	}
640e8033	369	count++;
1da177e4 LT	370	if (d->callback && d->callback(d))
1da177e4 LT	371	break;
1da177e4 LT	372	fail: d++;
	373	}
	374
	375	return count;
	376	}
1da177e4 LT	377	EXPORT_SYMBOL(dmi_check_system);
	378
	379	/**
	380	* dmi_get_system_info - return DMI data value
b0ef371e	381	* @field: data index (see enum dmi_field)
1da177e4 LT	382	*
	383	* Returns one DMI data value, can be used to perform
	384	* complex DMI data checks.
	385	*/
1855256c	386	const char *dmi_get_system_info(int field)
1da177e4 LT	387	{
	388	return dmi_ident[field];
	389	}
e70c9d5e	390	EXPORT_SYMBOL(dmi_get_system_info);
ebad6a42	391
a1bae672 AK	392
	393	/**
	394	* dmi_name_in_vendors - Check if string is anywhere in the DMI vendor information.
	395	* @str: Case sensitive Name
	396	*/
1855256c	397	int dmi_name_in_vendors(const char *str)
a1bae672 AK	398	{
	399	static int fields[] = { DMI_BIOS_VENDOR, DMI_BIOS_VERSION, DMI_SYS_VENDOR,
	400	DMI_PRODUCT_NAME, DMI_PRODUCT_VERSION, DMI_BOARD_VENDOR,
	401	DMI_BOARD_NAME, DMI_BOARD_VERSION, DMI_NONE };
	402	int i;
	403	for (i = 0; fields[i] != DMI_NONE; i++) {
	404	int f = fields[i];
	405	if (dmi_ident[f] && strstr(dmi_ident[f], str))
	406	return 1;
	407	}
	408	return 0;
	409	}
	410	EXPORT_SYMBOL(dmi_name_in_vendors);
	411
ebad6a42 AP	412	/**
	413	* dmi_find_device - find onboard device by type/name
	414	* @type: device type or %DMI_DEV_TYPE_ANY to match all device types
b0ef371e	415	* @name: device name string or %NULL to match all
ebad6a42 AP	416	* @from: previous device found in search, or %NULL for new search.
	417	*
	418	* Iterates through the list of known onboard devices. If a device is
	419	* found with a matching @vendor and @device, a pointer to its device
	420	* structure is returned. Otherwise, %NULL is returned.
b0ef371e	421	* A new search is initiated by passing %NULL as the @from argument.
ebad6a42 AP	422	* If @from is not %NULL, searches continue from next device.
ebad6a42 AP	423	*/
1855256c JG	424	const struct dmi_device * dmi_find_device(int type, const char *name,
1855256c JG	425	const struct dmi_device *from)
ebad6a42	426	{
1855256c JG	427	const struct list_head *head = from ? &from->list : &dmi_devices;
1855256c JG	428	struct list_head *d;
ebad6a42 AP	429
ebad6a42 AP	430	for(d = head->next; d != &dmi_devices; d = d->next) {
1855256c JG	431	const struct dmi_device *dev =
1855256c JG	432	list_entry(d, struct dmi_device, list);
ebad6a42 AP	433
	434	if (((type == DMI_DEV_TYPE_ANY) \|\| (dev->type == type)) &&
	435	((name == NULL) \|\| (strcmp(dev->name, name) == 0)))
	436	return dev;
	437	}
	438
	439	return NULL;
	440	}
	441	EXPORT_SYMBOL(dmi_find_device);
f083a329 AK	442
	443	/**
	444	* dmi_get_year - Return year of a DMI date
	445	* @field: data index (like dmi_get_system_info)
	446	*
	447	* Returns -1 when the field doesn't exist. 0 when it is broken.
	448	*/
	449	int dmi_get_year(int field)
	450	{
	451	int year;
1855256c	452	const char *s = dmi_get_system_info(field);
f083a329 AK	453
	454	if (!s)
	455	return -1;
	456	if (*s == '\0')
	457	return 0;
	458	s = strrchr(s, '/');
	459	if (!s)
	460	return 0;
	461
	462	s += 1;
	463	year = simple_strtoul(s, NULL, 0);
	464	if (year && year < 100) { /* 2-digit year */
	465	year += 1900;
	466	if (year < 1996) /* no dates < spec 1.0 */
	467	year += 100;
	468	}
	469
	470	return year;
	471	}
4f5c791a	472