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