]> git.ipfire.org Git - thirdparty/mdadm.git/blob - platform-intel.c
mdadm: don't show cluster name once the bitmap is cleared
[thirdparty/mdadm.git] / platform-intel.c
1 /*
2 * Intel(R) Matrix Storage Manager hardware and firmware support routines
3 *
4 * Copyright (C) 2008 Intel Corporation
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms and conditions of the GNU General Public License,
8 * version 2, as published by the Free Software Foundation.
9 *
10 * This program is distributed in the hope it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
13 * more details.
14 *
15 * You should have received a copy of the GNU General Public License along with
16 * this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19 #include "mdadm.h"
20 #include "platform-intel.h"
21 #include "probe_roms.h"
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <unistd.h>
26 #include <dirent.h>
27 #include <fcntl.h>
28 #include <sys/mman.h>
29 #include <sys/types.h>
30 #include <sys/stat.h>
31 #include <limits.h>
32
33 static int devpath_to_ll(const char *dev_path, const char *entry,
34 unsigned long long *val);
35
36 static __u16 devpath_to_vendor(const char *dev_path);
37
38 static void free_sys_dev(struct sys_dev **list)
39 {
40 while (*list) {
41 struct sys_dev *next = (*list)->next;
42
43 if ((*list)->path)
44 free((*list)->path);
45 free(*list);
46 *list = next;
47 }
48 }
49
50 struct sys_dev *find_driver_devices(const char *bus, const char *driver)
51 {
52 /* search sysfs for devices driven by 'driver' */
53 char path[292];
54 char link[256];
55 char *c;
56 DIR *driver_dir;
57 struct dirent *de;
58 struct sys_dev *head = NULL;
59 struct sys_dev *list = NULL;
60 enum sys_dev_type type;
61 unsigned long long dev_id;
62 unsigned long long class;
63
64 if (strcmp(driver, "isci") == 0)
65 type = SYS_DEV_SAS;
66 else if (strcmp(driver, "ahci") == 0)
67 type = SYS_DEV_SATA;
68 else if (strcmp(driver, "nvme") == 0)
69 type = SYS_DEV_NVME;
70 else
71 type = SYS_DEV_UNKNOWN;
72
73 sprintf(path, "/sys/bus/%s/drivers/%s", bus, driver);
74 driver_dir = opendir(path);
75 if (!driver_dir)
76 return NULL;
77 for (de = readdir(driver_dir); de; de = readdir(driver_dir)) {
78 int n;
79
80 /* is 'de' a device? check that the 'subsystem' link exists and
81 * that its target matches 'bus'
82 */
83 sprintf(path, "/sys/bus/%s/drivers/%s/%s/subsystem",
84 bus, driver, de->d_name);
85 n = readlink(path, link, sizeof(link));
86 if (n < 0 || n >= (int)sizeof(link))
87 continue;
88 link[n] = '\0';
89 c = strrchr(link, '/');
90 if (!c)
91 continue;
92 if (strncmp(bus, c+1, strlen(bus)) != 0)
93 continue;
94
95 sprintf(path, "/sys/bus/%s/drivers/%s/%s",
96 bus, driver, de->d_name);
97
98 /* if it's not Intel device skip it. */
99 if (devpath_to_vendor(path) != 0x8086)
100 continue;
101
102 if (devpath_to_ll(path, "device", &dev_id) != 0)
103 continue;
104
105 if (devpath_to_ll(path, "class", &class) != 0)
106 continue;
107
108 /* start / add list entry */
109 if (!head) {
110 head = xmalloc(sizeof(*head));
111 list = head;
112 } else {
113 list->next = xmalloc(sizeof(*head));
114 list = list->next;
115 }
116
117 if (!list) {
118 free_sys_dev(&head);
119 break;
120 }
121
122 list->dev_id = (__u16) dev_id;
123 list->class = (__u32) class;
124 list->type = type;
125 list->path = realpath(path, NULL);
126 list->next = NULL;
127 if ((list->pci_id = strrchr(list->path, '/')) != NULL)
128 list->pci_id++;
129 }
130 closedir(driver_dir);
131 return head;
132 }
133
134 static struct sys_dev *intel_devices=NULL;
135 static time_t valid_time = 0;
136
137 struct sys_dev *device_by_id(__u16 device_id)
138 {
139 struct sys_dev *iter;
140
141 for (iter = intel_devices; iter != NULL; iter = iter->next)
142 if (iter->dev_id == device_id)
143 return iter;
144 return NULL;
145 }
146
147 static int devpath_to_ll(const char *dev_path, const char *entry, unsigned long long *val)
148 {
149 char path[strlen(dev_path) + strlen(entry) + 2];
150 int fd;
151 int n;
152
153 sprintf(path, "%s/%s", dev_path, entry);
154
155 fd = open(path, O_RDONLY);
156 if (fd < 0)
157 return -1;
158 n = sysfs_fd_get_ll(fd, val);
159 close(fd);
160 return n;
161 }
162
163 static __u16 devpath_to_vendor(const char *dev_path)
164 {
165 char path[strlen(dev_path) + strlen("/vendor") + 1];
166 char vendor[7];
167 int fd;
168 __u16 id = 0xffff;
169 int n;
170
171 sprintf(path, "%s/vendor", dev_path);
172
173 fd = open(path, O_RDONLY);
174 if (fd < 0)
175 return 0xffff;
176
177 n = read(fd, vendor, sizeof(vendor));
178 if (n == sizeof(vendor)) {
179 vendor[n - 1] = '\0';
180 id = strtoul(vendor, NULL, 16);
181 }
182 close(fd);
183
184 return id;
185 }
186
187 struct sys_dev *find_intel_devices(void)
188 {
189 struct sys_dev *ahci, *isci, *nvme;
190
191 if (valid_time > time(0) - 10)
192 return intel_devices;
193
194 if (intel_devices)
195 free_sys_dev(&intel_devices);
196
197 isci = find_driver_devices("pci", "isci");
198 ahci = find_driver_devices("pci", "ahci");
199 nvme = find_driver_devices("pci", "nvme");
200
201 if (!isci && !ahci) {
202 ahci = nvme;
203 } else if (!ahci) {
204 ahci = isci;
205 struct sys_dev *elem = ahci;
206 while (elem->next)
207 elem = elem->next;
208 elem->next = nvme;
209 } else {
210 struct sys_dev *elem = ahci;
211 while (elem->next)
212 elem = elem->next;
213 elem->next = isci;
214 while (elem->next)
215 elem = elem->next;
216 elem->next = nvme;
217 }
218 intel_devices = ahci;
219 valid_time = time(0);
220 return intel_devices;
221 }
222
223 /*
224 * PCI Expansion ROM Data Structure Format */
225 struct pciExpDataStructFormat {
226 __u8 ver[4];
227 __u16 vendorID;
228 __u16 deviceID;
229 __u16 devListOffset;
230 __u16 pciDataStructLen;
231 __u8 pciDataStructRev;
232 } __attribute__ ((packed));
233
234 struct orom_entry *orom_entries;
235
236 const struct orom_entry *get_orom_entry_by_device_id(__u16 dev_id)
237 {
238 struct orom_entry *entry;
239 struct devid_list *devid;
240
241 for (entry = orom_entries; entry; entry = entry->next) {
242 for (devid = entry->devid_list; devid; devid = devid->next) {
243 if (devid->devid == dev_id)
244 return entry;
245 }
246 }
247
248 return NULL;
249 }
250
251 const struct imsm_orom *get_orom_by_device_id(__u16 dev_id)
252 {
253 const struct orom_entry *entry = get_orom_entry_by_device_id(dev_id);
254
255 if (entry)
256 return &entry->orom;
257
258 return NULL;
259 }
260
261 static struct orom_entry *add_orom(const struct imsm_orom *orom)
262 {
263 struct orom_entry *list;
264 struct orom_entry *prev = NULL;
265
266 for (list = orom_entries; list; prev = list, list = list->next)
267 ;
268
269 list = xmalloc(sizeof(struct orom_entry));
270 list->orom = *orom;
271 list->devid_list = NULL;
272 list->next = NULL;
273
274 if (prev == NULL)
275 orom_entries = list;
276 else
277 prev->next = list;
278
279 return list;
280 }
281
282 static void add_orom_device_id(struct orom_entry *entry, __u16 dev_id)
283 {
284 struct devid_list *list;
285 struct devid_list *prev = NULL;
286
287 for (list = entry->devid_list; list; prev = list, list = list->next) {
288 if (list->devid == dev_id)
289 return;
290 }
291 list = xmalloc(sizeof(struct devid_list));
292 list->devid = dev_id;
293 list->next = NULL;
294
295 if (prev == NULL)
296 entry->devid_list = list;
297 else
298 prev->next = list;
299 }
300
301 static int scan(const void *start, const void *end, const void *data)
302 {
303 int offset;
304 const struct imsm_orom *imsm_mem = NULL;
305 int len = (end - start);
306 struct pciExpDataStructFormat *ptr= (struct pciExpDataStructFormat *)data;
307
308 if (data + 0x18 > end) {
309 dprintf("cannot find pciExpDataStruct \n");
310 return 0;
311 }
312
313 dprintf("ptr->vendorID: %lx __le16_to_cpu(ptr->deviceID): %lx \n",
314 (ulong) __le16_to_cpu(ptr->vendorID),
315 (ulong) __le16_to_cpu(ptr->deviceID));
316
317 if (__le16_to_cpu(ptr->vendorID) != 0x8086)
318 return 0;
319
320 for (offset = 0; offset < len; offset += 4) {
321 const void *mem = start + offset;
322
323 if ((memcmp(mem, IMSM_OROM_SIGNATURE, 4) == 0)) {
324 imsm_mem = mem;
325 break;
326 }
327 }
328
329 if (!imsm_mem)
330 return 0;
331
332 struct orom_entry *orom = add_orom(imsm_mem);
333
334 /* only PciDataStructure with revision 3 and above supports devices list. */
335 if (ptr->pciDataStructRev >= 3 && ptr->devListOffset) {
336 const __u16 *dev_list = (void *)ptr + ptr->devListOffset;
337 int i;
338
339 for (i = 0; dev_list[i] != 0; i++)
340 add_orom_device_id(orom, dev_list[i]);
341 } else {
342 add_orom_device_id(orom, __le16_to_cpu(ptr->deviceID));
343 }
344
345 return 0;
346 }
347
348 const struct imsm_orom *imsm_platform_test(struct sys_dev *hba)
349 {
350 struct imsm_orom orom = {
351 .signature = IMSM_OROM_SIGNATURE,
352 .rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
353 IMSM_OROM_RLC_RAID10 | IMSM_OROM_RLC_RAID5,
354 .sss = IMSM_OROM_SSS_4kB | IMSM_OROM_SSS_8kB |
355 IMSM_OROM_SSS_16kB | IMSM_OROM_SSS_32kB |
356 IMSM_OROM_SSS_64kB | IMSM_OROM_SSS_128kB |
357 IMSM_OROM_SSS_256kB | IMSM_OROM_SSS_512kB |
358 IMSM_OROM_SSS_1MB | IMSM_OROM_SSS_2MB,
359 .dpa = IMSM_OROM_DISKS_PER_ARRAY,
360 .tds = IMSM_OROM_TOTAL_DISKS,
361 .vpa = IMSM_OROM_VOLUMES_PER_ARRAY,
362 .vphba = IMSM_OROM_VOLUMES_PER_HBA
363 };
364 orom.attr = orom.rlc | IMSM_OROM_ATTR_ChecksumVerify;
365
366 if (check_env("IMSM_TEST_OROM_NORAID5")) {
367 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
368 IMSM_OROM_RLC_RAID10;
369 }
370 if (check_env("IMSM_TEST_AHCI_EFI_NORAID5") && (hba->type == SYS_DEV_SAS)) {
371 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
372 IMSM_OROM_RLC_RAID10;
373 }
374 if (check_env("IMSM_TEST_SCU_EFI_NORAID5") && (hba->type == SYS_DEV_SATA)) {
375 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
376 IMSM_OROM_RLC_RAID10;
377 }
378
379 struct orom_entry *ret = add_orom(&orom);
380
381 add_orom_device_id(ret, hba->dev_id);
382
383 return &ret->orom;
384 }
385
386 static const struct imsm_orom *find_imsm_hba_orom(struct sys_dev *hba)
387 {
388 unsigned long align;
389
390 if (check_env("IMSM_TEST_OROM"))
391 return imsm_platform_test(hba);
392
393 /* return empty OROM capabilities in EFI test mode */
394 if (check_env("IMSM_TEST_AHCI_EFI") || check_env("IMSM_TEST_SCU_EFI"))
395 return NULL;
396
397 find_intel_devices();
398
399 if (intel_devices == NULL)
400 return NULL;
401
402 /* scan option-rom memory looking for an imsm signature */
403 if (check_env("IMSM_SAFE_OROM_SCAN"))
404 align = 2048;
405 else
406 align = 512;
407 if (probe_roms_init(align) != 0)
408 return NULL;
409 probe_roms();
410 /* ignore return value - True is returned if both adapater roms are found */
411 scan_adapter_roms(scan);
412 probe_roms_exit();
413
414 return get_orom_by_device_id(hba->dev_id);
415 }
416
417 #define GUID_STR_MAX 37 /* according to GUID format:
418 * xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx" */
419
420 #define EFI_GUID(a, b, c, d0, d1, d2, d3, d4, d5, d6, d7) \
421 ((struct efi_guid) \
422 {{ (a) & 0xff, ((a) >> 8) & 0xff, ((a) >> 16) & 0xff, ((a) >> 24) & 0xff, \
423 (b) & 0xff, ((b) >> 8) & 0xff, \
424 (c) & 0xff, ((c) >> 8) & 0xff, \
425 (d0), (d1), (d2), (d3), (d4), (d5), (d6), (d7) }})
426
427 #define SYS_EFI_VAR_PATH "/sys/firmware/efi/vars"
428 #define SYS_EFIVARS_PATH "/sys/firmware/efi/efivars"
429 #define SCU_PROP "RstScuV"
430 #define AHCI_PROP "RstSataV"
431 #define AHCI_SSATA_PROP "RstsSatV"
432 #define AHCI_CSATA_PROP "RstCSatV"
433
434 #define VENDOR_GUID \
435 EFI_GUID(0x193dfefa, 0xa445, 0x4302, 0x99, 0xd8, 0xef, 0x3a, 0xad, 0x1a, 0x04, 0xc6)
436
437 #define PCI_CLASS_RAID_CNTRL 0x010400
438
439 static int read_efi_var(void *buffer, ssize_t buf_size, char *variable_name, struct efi_guid guid)
440 {
441 char path[PATH_MAX];
442 char buf[GUID_STR_MAX];
443 int fd;
444 ssize_t n;
445
446 snprintf(path, PATH_MAX, "%s/%s-%s", SYS_EFIVARS_PATH, variable_name, guid_str(buf, guid));
447
448 fd = open(path, O_RDONLY);
449 if (fd < 0)
450 return 1;
451
452 /* read the variable attributes and ignore it */
453 n = read(fd, buf, sizeof(__u32));
454 if (n < 0) {
455 close(fd);
456 return 1;
457 }
458
459 /* read the variable data */
460 n = read(fd, buffer, buf_size);
461 close(fd);
462 if (n < buf_size)
463 return 1;
464
465 return 0;
466 }
467
468 static int read_efi_variable(void *buffer, ssize_t buf_size, char *variable_name, struct efi_guid guid)
469 {
470 char path[PATH_MAX];
471 char buf[GUID_STR_MAX];
472 int dfd;
473 ssize_t n, var_data_len;
474
475 /* Try to read the variable using the new efivarfs interface first.
476 * If that fails, fall back to the old sysfs-efivars interface. */
477 if (!read_efi_var(buffer, buf_size, variable_name, guid))
478 return 0;
479
480 snprintf(path, PATH_MAX, "%s/%s-%s/size", SYS_EFI_VAR_PATH, variable_name, guid_str(buf, guid));
481
482 dprintf("EFI VAR: path=%s\n", path);
483 /* get size of variable data */
484 dfd = open(path, O_RDONLY);
485 if (dfd < 0)
486 return 1;
487
488 n = read(dfd, &buf, sizeof(buf));
489 close(dfd);
490 if (n < 0)
491 return 1;
492 buf[n] = '\0';
493
494 errno = 0;
495 var_data_len = strtoul(buf, NULL, 16);
496 if ((errno == ERANGE && (var_data_len == LONG_MAX))
497 || (errno != 0 && var_data_len == 0))
498 return 1;
499
500 /* get data */
501 snprintf(path, PATH_MAX, "%s/%s-%s/data", SYS_EFI_VAR_PATH, variable_name, guid_str(buf, guid));
502
503 dprintf("EFI VAR: path=%s\n", path);
504 dfd = open(path, O_RDONLY);
505 if (dfd < 0)
506 return 1;
507
508 n = read(dfd, buffer, buf_size);
509 close(dfd);
510 if (n != var_data_len || n < buf_size) {
511 return 1;
512 }
513
514 return 0;
515 }
516
517 const struct imsm_orom *find_imsm_efi(struct sys_dev *hba)
518 {
519 struct imsm_orom orom;
520 struct orom_entry *ret;
521 int err;
522
523 if (check_env("IMSM_TEST_AHCI_EFI") || check_env("IMSM_TEST_SCU_EFI"))
524 return imsm_platform_test(hba);
525
526 /* OROM test is set, return that there is no EFI capabilities */
527 if (check_env("IMSM_TEST_OROM"))
528 return NULL;
529
530 if (hba->type == SYS_DEV_SATA && hba->class != PCI_CLASS_RAID_CNTRL)
531 return NULL;
532
533 err = read_efi_variable(&orom, sizeof(orom), hba->type == SYS_DEV_SAS ? SCU_PROP : AHCI_PROP, VENDOR_GUID);
534
535 /* try to read variable for second AHCI controller */
536 if (err && hba->type == SYS_DEV_SATA)
537 err = read_efi_variable(&orom, sizeof(orom), AHCI_SSATA_PROP, VENDOR_GUID);
538
539 /* try to read variable for combined AHCI controllers */
540 if (err && hba->type == SYS_DEV_SATA) {
541 static struct orom_entry *csata;
542
543 err = read_efi_variable(&orom, sizeof(orom), AHCI_CSATA_PROP, VENDOR_GUID);
544 if (!err) {
545 if (!csata)
546 csata = add_orom(&orom);
547 add_orom_device_id(csata, hba->dev_id);
548 return &csata->orom;
549 }
550 }
551
552 if (err)
553 return NULL;
554
555 ret = add_orom(&orom);
556 add_orom_device_id(ret, hba->dev_id);
557
558 return &ret->orom;
559 }
560
561 const struct imsm_orom *find_imsm_nvme(struct sys_dev *hba)
562 {
563 static struct orom_entry *nvme_orom;
564
565 if (hba->type != SYS_DEV_NVME)
566 return NULL;
567
568 if (!nvme_orom) {
569 struct imsm_orom nvme_orom_compat = {
570 .signature = IMSM_NVME_OROM_COMPAT_SIGNATURE,
571 .rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
572 IMSM_OROM_RLC_RAID10 | IMSM_OROM_RLC_RAID5,
573 .sss = IMSM_OROM_SSS_4kB | IMSM_OROM_SSS_8kB |
574 IMSM_OROM_SSS_16kB | IMSM_OROM_SSS_32kB |
575 IMSM_OROM_SSS_64kB | IMSM_OROM_SSS_128kB,
576 .dpa = IMSM_OROM_DISKS_PER_ARRAY_NVME,
577 .tds = IMSM_OROM_TOTAL_DISKS_NVME,
578 .vpa = IMSM_OROM_VOLUMES_PER_ARRAY,
579 .vphba = IMSM_OROM_TOTAL_DISKS_NVME / 2 * IMSM_OROM_VOLUMES_PER_ARRAY,
580 .attr = IMSM_OROM_ATTR_2TB | IMSM_OROM_ATTR_2TB_DISK,
581 .driver_features = IMSM_OROM_CAPABILITIES_EnterpriseSystem
582 };
583 nvme_orom = add_orom(&nvme_orom_compat);
584 }
585 add_orom_device_id(nvme_orom, hba->dev_id);
586 return &nvme_orom->orom;
587 }
588
589 const struct imsm_orom *find_imsm_capability(struct sys_dev *hba)
590 {
591 const struct imsm_orom *cap = get_orom_by_device_id(hba->dev_id);
592
593 if (cap)
594 return cap;
595
596 if (hba->type == SYS_DEV_NVME)
597 return find_imsm_nvme(hba);
598 if ((cap = find_imsm_efi(hba)) != NULL)
599 return cap;
600 if ((cap = find_imsm_hba_orom(hba)) != NULL)
601 return cap;
602
603 return NULL;
604 }
605
606 char *devt_to_devpath(dev_t dev)
607 {
608 char device[46];
609
610 sprintf(device, "/sys/dev/block/%d:%d/device", major(dev), minor(dev));
611 return realpath(device, NULL);
612 }
613
614 char *diskfd_to_devpath(int fd)
615 {
616 /* return the device path for a disk, return NULL on error or fd
617 * refers to a partition
618 */
619 struct stat st;
620
621 if (fstat(fd, &st) != 0)
622 return NULL;
623 if (!S_ISBLK(st.st_mode))
624 return NULL;
625
626 return devt_to_devpath(st.st_rdev);
627 }
628
629 int path_attached_to_hba(const char *disk_path, const char *hba_path)
630 {
631 int rc;
632
633 if (check_env("IMSM_TEST_AHCI_DEV") ||
634 check_env("IMSM_TEST_SCU_DEV")) {
635 return 1;
636 }
637
638 if (!disk_path || !hba_path)
639 return 0;
640 dprintf("hba: %s - disk: %s\n", hba_path, disk_path);
641 if (strncmp(disk_path, hba_path, strlen(hba_path)) == 0)
642 rc = 1;
643 else
644 rc = 0;
645
646 return rc;
647 }
648
649 int devt_attached_to_hba(dev_t dev, const char *hba_path)
650 {
651 char *disk_path = devt_to_devpath(dev);
652 int rc = path_attached_to_hba(disk_path, hba_path);
653
654 if (disk_path)
655 free(disk_path);
656
657 return rc;
658 }
659
660 int disk_attached_to_hba(int fd, const char *hba_path)
661 {
662 char *disk_path = diskfd_to_devpath(fd);
663 int rc = path_attached_to_hba(disk_path, hba_path);
664
665 if (disk_path)
666 free(disk_path);
667
668 return rc;
669 }