| 0,0 → 1,626 |
|---|
| |
| #include <linux/types.h> |
| #include <linux/string.h> |
| #include <linux/bug.h> |
| #include <linux/module.h> |
| #include <linux/ctype.h> |
| #include <linux/dmi.h> |
| #include <syscall.h> |
| |
| #define pr_debug dbgprintf |
| #define pr_info printf |
| |
| static void *dmi_alloc(unsigned len) |
| { |
| return malloc(len); |
| }; |
| |
| /* |
| * DMI stands for "Desktop Management Interface". It is part |
| * of and an antecedent to, SMBIOS, which stands for System |
| * Management BIOS. See further: http://www.dmtf.org/standards |
| */ |
| static const char dmi_empty_string[] = " "; |
| |
| static u16 dmi_ver; |
| /* |
| * Catch too early calls to dmi_check_system(): |
| */ |
| static int dmi_initialized; |
| |
| /* DMI system identification string used during boot */ |
| static char dmi_ids_string[128]; |
| |
| static struct dmi_memdev_info { |
| const char *device; |
| const char *bank; |
| u16 handle; |
| } *dmi_memdev; |
| static int dmi_memdev_nr; |
| |
| static const char * __init dmi_string_nosave(const struct dmi_header *dm, u8 s) |
| { |
| const u8 *bp = ((u8 *) dm) + dm->length; |
| |
| if (s) { |
| s--; |
| while (s > 0 && *bp) { |
| bp += strlen(bp) + 1; |
| s--; |
| } |
| |
| if (*bp != 0) { |
| size_t len = strlen(bp)+1; |
| size_t cmp_len = len > 8 ? 8 : len; |
| |
| if (!memcmp(bp, dmi_empty_string, cmp_len)) |
| return dmi_empty_string; |
| return bp; |
| } |
| } |
| |
| return ""; |
| } |
| |
| static const char * __init dmi_string(const struct dmi_header *dm, u8 s) |
| { |
| const char *bp = dmi_string_nosave(dm, s); |
| char *str; |
| size_t len; |
| |
| if (bp == dmi_empty_string) |
| return dmi_empty_string; |
| |
| len = strlen(bp) + 1; |
| str = dmi_alloc(len); |
| if (str != NULL) |
| strcpy(str, bp); |
| |
| return str; |
| } |
| |
| /* |
| * We have to be cautious here. We have seen BIOSes with DMI pointers |
| * pointing to completely the wrong place for example |
| */ |
| static void dmi_table(u8 *buf, int len, int num, |
| void (*decode)(const struct dmi_header *, void *), |
| void *private_data) |
| { |
| u8 *data = buf; |
| int i = 0; |
| |
| /* |
| * 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 (formatted 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, private_data); |
| data += 2; |
| i++; |
| } |
| } |
| |
| static u32 dmi_base; |
| static u16 dmi_len; |
| static u16 dmi_num; |
| |
| static int __init dmi_walk_early(void (*decode)(const struct dmi_header *, |
| void *)) |
| { |
| u8 *buf; |
| |
| buf = (u8*)MapIoMem(dmi_base, dmi_len, PG_SW); |
| if (buf == NULL) |
| return -1; |
| |
| dmi_table(buf, dmi_len, dmi_num, decode, NULL); |
| |
| FreeKernelSpace(buf); |
| |
| return 0; |
| } |
| |
| static int __init dmi_checksum(const u8 *buf, u8 len) |
| { |
| u8 sum = 0; |
| int a; |
| |
| for (a = 0; a < len; a++) |
| sum += buf[a]; |
| |
| return sum == 0; |
| } |
| |
| static const 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; |
| const 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_00 = 0; |
| if (d[i] != 0xFF) |
| is_ff = 0; |
| } |
| |
| if (is_ff || is_00) |
| return; |
| |
| s = dmi_alloc(16*2+4+1); |
| if (!s) |
| return; |
| |
| /* |
| * As of version 2.6 of the SMBIOS specification, the first 3 fields of |
| * the UUID are supposed to be little-endian encoded. The specification |
| * says that this is the defacto standard. |
| */ |
| if (dmi_ver >= 0x0206) |
| sprintf(s, "%pUL", d); |
| else |
| sprintf(s, "%pUB", d); |
| |
| 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_one_device(int type, const char *name) |
| { |
| struct dmi_device *dev; |
| |
| /* No duplicate device */ |
| if (dmi_find_device(type, name, NULL)) |
| return; |
| |
| dev = dmi_alloc(sizeof(*dev) + strlen(name) + 1); |
| if (!dev) |
| return; |
| |
| dev->type = type; |
| strcpy((char *)(dev + 1), name); |
| dev->name = (char *)(dev + 1); |
| dev->device_data = NULL; |
| list_add(&dev->list, &dmi_devices); |
| } |
| |
| static void __init dmi_save_devices(const struct dmi_header *dm) |
| { |
| int i, count = (dm->length - sizeof(struct dmi_header)) / 2; |
| |
| for (i = 0; i < count; i++) { |
| const char *d = (char *)(dm + 1) + (i * 2); |
| |
| /* Skip disabled device */ |
| if ((*d & 0x80) == 0) |
| continue; |
| |
| dmi_save_one_device(*d & 0x7f, dmi_string_nosave(dm, *(d + 1))); |
| } |
| } |
| |
| 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++) { |
| const char *devname = dmi_string(dm, i); |
| |
| if (devname == dmi_empty_string) |
| continue; |
| |
| dev = dmi_alloc(sizeof(*dev)); |
| if (!dev) |
| break; |
| |
| dev->type = DMI_DEV_TYPE_OEM_STRING; |
| dev->name = devname; |
| 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) |
| return; |
| |
| memcpy(data, dm, dm->length); |
| |
| dev = dmi_alloc(sizeof(*dev)); |
| if (!dev) |
| return; |
| |
| dev->type = DMI_DEV_TYPE_IPMI; |
| dev->name = "IPMI controller"; |
| dev->device_data = data; |
| |
| list_add_tail(&dev->list, &dmi_devices); |
| } |
| |
| static void __init dmi_save_dev_onboard(int instance, int segment, int bus, |
| int devfn, const char *name) |
| { |
| struct dmi_dev_onboard *onboard_dev; |
| |
| onboard_dev = dmi_alloc(sizeof(*onboard_dev) + strlen(name) + 1); |
| if (!onboard_dev) |
| return; |
| |
| onboard_dev->instance = instance; |
| onboard_dev->segment = segment; |
| onboard_dev->bus = bus; |
| onboard_dev->devfn = devfn; |
| |
| strcpy((char *)&onboard_dev[1], name); |
| onboard_dev->dev.type = DMI_DEV_TYPE_DEV_ONBOARD; |
| onboard_dev->dev.name = (char *)&onboard_dev[1]; |
| onboard_dev->dev.device_data = onboard_dev; |
| |
| list_add(&onboard_dev->dev.list, &dmi_devices); |
| } |
| |
| static void __init dmi_save_extended_devices(const struct dmi_header *dm) |
| { |
| const u8 *d = (u8 *) dm + 5; |
| |
| /* Skip disabled device */ |
| if ((*d & 0x80) == 0) |
| return; |
| |
| dmi_save_dev_onboard(*(d+1), *(u16 *)(d+2), *(d+4), *(d+5), |
| dmi_string_nosave(dm, *(d-1))); |
| dmi_save_one_device(*d & 0x7f, dmi_string_nosave(dm, *(d - 1))); |
| |
| } |
| |
| /* |
| * 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, void *dummy) |
| { |
| 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); |
| break; |
| case 41: /* Onboard Devices Extended Information */ |
| dmi_save_extended_devices(dm); |
| } |
| } |
| |
| static int __init print_filtered(char *buf, size_t len, const char *info) |
| { |
| int c = 0; |
| const char *p; |
| |
| if (!info) |
| return c; |
| |
| for (p = info; *p; p++) |
| if (isprint(*p)) |
| c += scnprintf(buf + c, len - c, "%c", *p); |
| else |
| c += scnprintf(buf + c, len - c, "\\x%02x", *p & 0xff); |
| return c; |
| } |
| |
| static void __init dmi_format_ids(char *buf, size_t len) |
| { |
| int c = 0; |
| const char *board; /* Board Name is optional */ |
| |
| c += print_filtered(buf + c, len - c, |
| dmi_get_system_info(DMI_SYS_VENDOR)); |
| c += scnprintf(buf + c, len - c, " "); |
| c += print_filtered(buf + c, len - c, |
| dmi_get_system_info(DMI_PRODUCT_NAME)); |
| |
| board = dmi_get_system_info(DMI_BOARD_NAME); |
| if (board) { |
| c += scnprintf(buf + c, len - c, "/"); |
| c += print_filtered(buf + c, len - c, board); |
| } |
| c += scnprintf(buf + c, len - c, ", BIOS "); |
| c += print_filtered(buf + c, len - c, |
| dmi_get_system_info(DMI_BIOS_VERSION)); |
| c += scnprintf(buf + c, len - c, " "); |
| c += print_filtered(buf + c, len - c, |
| dmi_get_system_info(DMI_BIOS_DATE)); |
| } |
| |
| /* |
| * Check for DMI/SMBIOS headers in the system firmware image. Any |
| * SMBIOS header must start 16 bytes before the DMI header, so take a |
| * 32 byte buffer and check for DMI at offset 16 and SMBIOS at offset |
| * 0. If the DMI header is present, set dmi_ver accordingly (SMBIOS |
| * takes precedence) and return 0. Otherwise return 1. |
| */ |
| static int __init dmi_present(const u8 *buf) |
| { |
| int smbios_ver; |
| |
| if (memcmp(buf, "_SM_", 4) == 0 && |
| buf[5] < 32 && dmi_checksum(buf, buf[5])) { |
| smbios_ver = (buf[6] << 8) + buf[7]; |
| |
| /* Some BIOS report weird SMBIOS version, fix that up */ |
| switch (smbios_ver) { |
| case 0x021F: |
| case 0x0221: |
| pr_debug("SMBIOS version fixup(2.%d->2.%d)\n", |
| smbios_ver & 0xFF, 3); |
| smbios_ver = 0x0203; |
| break; |
| case 0x0233: |
| pr_debug("SMBIOS version fixup(2.%d->2.%d)\n", 51, 6); |
| smbios_ver = 0x0206; |
| break; |
| } |
| } else { |
| smbios_ver = 0; |
| } |
| |
| buf += 16; |
| |
| if (memcmp(buf, "_DMI_", 5) == 0 && dmi_checksum(buf, 15)) { |
| dmi_num = (buf[13] << 8) | buf[12]; |
| dmi_len = (buf[7] << 8) | buf[6]; |
| dmi_base = (buf[11] << 24) | (buf[10] << 16) | |
| (buf[9] << 8) | buf[8]; |
| |
| if (dmi_walk_early(dmi_decode) == 0) { |
| if (smbios_ver) { |
| dmi_ver = smbios_ver; |
| pr_info("SMBIOS %d.%d present.\n", |
| dmi_ver >> 8, dmi_ver & 0xFF); |
| } else { |
| dmi_ver = (buf[14] & 0xF0) << 4 | |
| (buf[14] & 0x0F); |
| pr_info("Legacy DMI %d.%d present.\n", |
| dmi_ver >> 8, dmi_ver & 0xFF); |
| } |
| dmi_format_ids(dmi_ids_string, sizeof(dmi_ids_string)); |
| printk(KERN_DEBUG "DMI: %s\n", dmi_ids_string); |
| return 0; |
| } |
| } |
| |
| return 1; |
| } |
| |
| void __init dmi_scan_machine(void) |
| { |
| char __iomem *p, *q; |
| char buf[32]; |
| |
| |
| |
| p = (char*)0x800F0000; |
| |
| /* |
| * Iterate over all possible DMI header addresses q. |
| * Maintain the 32 bytes around q in buf. On the |
| * first iteration, substitute zero for the |
| * out-of-range bytes so there is no chance of falsely |
| * detecting an SMBIOS header. |
| */ |
| memset(buf, 0, 16); |
| for (q = p; q < p + 0x10000; q += 16) { |
| memcpy(buf + 16, q, 16); |
| if (!dmi_present(buf)) { |
| dmi_available = 1; |
| goto out; |
| } |
| memcpy(buf, buf + 16, 16); |
| } |
| error: |
| pr_info("DMI not present or invalid.\n"); |
| out: |
| dmi_initialized = 1; |
| } |
| |
| /** |
| /** |
| * dmi_matches - check if dmi_system_id structure matches system DMI data |
| * @dmi: pointer to the dmi_system_id structure to check |
| */ |
| static bool dmi_matches(const struct dmi_system_id *dmi) |
| { |
| int i; |
| |
| WARN(!dmi_initialized, KERN_ERR "dmi check: not initialized yet.\n"); |
| |
| for (i = 0; i < ARRAY_SIZE(dmi->matches); i++) { |
| int s = dmi->matches[i].slot; |
| if (s == DMI_NONE) |
| break; |
| if (dmi_ident[s]) { |
| if (!dmi->matches[i].exact_match && |
| strstr(dmi_ident[s], dmi->matches[i].substr)) |
| continue; |
| else if (dmi->matches[i].exact_match && |
| !strcmp(dmi_ident[s], dmi->matches[i].substr)) |
| continue; |
| } |
| |
| /* No match */ |
| return false; |
| } |
| return true; |
| } |
| |
| /** |
| * dmi_is_end_of_table - check for end-of-table marker |
| * @dmi: pointer to the dmi_system_id structure to check |
| */ |
| static bool dmi_is_end_of_table(const struct dmi_system_id *dmi) |
| { |
| return dmi->matches[0].slot == DMI_NONE; |
| } |
| |
| /** |
| * 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 count = 0; |
| const struct dmi_system_id *d; |
| |
| for (d = list; !dmi_is_end_of_table(d); d++) |
| if (dmi_matches(d)) { |
| count++; |
| if (d->callback && d->callback(d)) |
| break; |
| } |
| |
| 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_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); |