[GitHub/mt8127/android_kernel_alcatel_ttab.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(struct dmi_header *dm, u8 s)
{
	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)(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) {
		struct dmi_header *dm = (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(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(struct dmi_header *dm, int slot, int string)
{
	char *p, *d = (char*) dm;

	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(struct dmi_header *dm, int slot, int index)
{
	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(struct dmi_header *dm, int slot, int index)
{
	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(struct dmi_header *dm)
{
	int i, count = (dm->length - sizeof(struct dmi_header)) / 2;
	struct dmi_device *dev;

	for (i = 0; i < count; i++) {
		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(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(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(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(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(struct dmi_system_id *list)
{
	int i, count = 0;
	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.
 */
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(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.
 */
struct dmi_device * dmi_find_device(int type, const char *name,
				    struct dmi_device *from)
{
	struct list_head *d, *head = from ? &from->list : &dmi_devices;

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