2 * Intel(R) Matrix Storage Manager hardware and firmware support routines
4 * Copyright (C) 2008 Intel Corporation
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.
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
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.
20 #include "platform-intel.h"
21 #include "probe_roms.h"
29 #include <sys/types.h>
33 static int devpath_to_ll(const char *dev_path, const char *entry,
34 unsigned long long *val);
36 static void free_sys_dev(struct sys_dev **list)
39 struct sys_dev *next = (*list)->next;
48 struct sys_dev *find_driver_devices(const char *bus, const char *driver)
50 /* search sysfs for devices driven by 'driver' */
56 struct sys_dev *head = NULL;
57 struct sys_dev *list = NULL;
58 struct sys_dev *vmd = NULL;
59 enum sys_dev_type type;
60 unsigned long long dev_id;
61 unsigned long long class;
63 if (strcmp(driver, "isci") == 0)
65 else if (strcmp(driver, "ahci") == 0)
67 else if (strcmp(driver, "nvme") == 0) {
68 /* if looking for nvme devs, first look for vmd */
69 vmd = find_driver_devices("pci", "vmd");
71 } else if (strcmp(driver, "vmd") == 0)
74 type = SYS_DEV_UNKNOWN;
76 sprintf(path, "/sys/bus/%s/drivers/%s", bus, driver);
77 driver_dir = opendir(path);
83 for (de = readdir(driver_dir); de; de = readdir(driver_dir)) {
87 /* is 'de' a device? check that the 'subsystem' link exists and
88 * that its target matches 'bus'
90 sprintf(path, "/sys/bus/%s/drivers/%s/%s/subsystem",
91 bus, driver, de->d_name);
92 n = readlink(path, link, sizeof(link));
93 if (n < 0 || n >= (int)sizeof(link))
96 c = strrchr(link, '/');
99 if (strncmp(bus, c+1, strlen(bus)) != 0)
102 sprintf(path, "/sys/bus/%s/drivers/%s/%s",
103 bus, driver, de->d_name);
105 /* if searching for nvme - skip vmd connected one */
106 if (type == SYS_DEV_NVME) {
108 char *rp = realpath(path, NULL);
109 for (dev = vmd; dev; dev = dev->next) {
110 if ((strncmp(dev->path, rp, strlen(dev->path)) == 0))
116 /* if it's not Intel device or mark as VMD connected - skip it. */
117 if (devpath_to_vendor(path) != 0x8086 || skip == 1)
120 if (devpath_to_ll(path, "device", &dev_id) != 0)
123 if (devpath_to_ll(path, "class", &class) != 0)
127 * Each VMD device (domain) adds separate PCI bus, it is better
128 * to store path as a path to that bus (easier further
129 * determination which NVMe dev is connected to this particular
132 if (type == SYS_DEV_VMD) {
133 sprintf(path, "/sys/bus/%s/drivers/%s/%s/domain/device",
134 bus, driver, de->d_name);
136 p = realpath(path, NULL);
138 pr_err("Unable to get real path for '%s'\n", path);
142 /* start / add list entry */
144 head = xmalloc(sizeof(*head));
147 list->next = xmalloc(sizeof(*head));
156 list->dev_id = (__u16) dev_id;
157 list->class = (__u32) class;
162 if ((list->pci_id = strrchr(list->path, '/')) != NULL)
165 closedir(driver_dir);
177 static struct sys_dev *intel_devices=NULL;
178 static time_t valid_time = 0;
180 struct sys_dev *device_by_id(__u16 device_id)
182 struct sys_dev *iter;
184 for (iter = intel_devices; iter != NULL; iter = iter->next)
185 if (iter->dev_id == device_id)
190 struct sys_dev *device_by_id_and_path(__u16 device_id, const char *path)
192 struct sys_dev *iter;
194 for (iter = intel_devices; iter != NULL; iter = iter->next)
195 if ((iter->dev_id == device_id) && strstr(iter->path, path))
200 static int devpath_to_ll(const char *dev_path, const char *entry, unsigned long long *val)
202 char path[strlen(dev_path) + strlen(entry) + 2];
206 sprintf(path, "%s/%s", dev_path, entry);
208 fd = open(path, O_RDONLY);
211 n = sysfs_fd_get_ll(fd, val);
216 __u16 devpath_to_vendor(const char *dev_path)
218 char path[strlen(dev_path) + strlen("/vendor") + 1];
224 sprintf(path, "%s/vendor", dev_path);
226 fd = open(path, O_RDONLY);
230 n = read(fd, vendor, sizeof(vendor));
231 if (n == sizeof(vendor)) {
232 vendor[n - 1] = '\0';
233 id = strtoul(vendor, NULL, 16);
240 struct sys_dev *find_intel_devices(void)
242 struct sys_dev *ahci, *isci, *nvme;
244 if (valid_time > time(0) - 10)
245 return intel_devices;
248 free_sys_dev(&intel_devices);
250 isci = find_driver_devices("pci", "isci");
251 ahci = find_driver_devices("pci", "ahci");
252 /* Searching for NVMe will return list of NVMe and VMD controllers */
253 nvme = find_driver_devices("pci", "nvme");
255 if (!isci && !ahci) {
259 struct sys_dev *elem = ahci;
264 struct sys_dev *elem = ahci;
272 intel_devices = ahci;
273 valid_time = time(0);
274 return intel_devices;
278 * PCI Expansion ROM Data Structure Format */
279 struct pciExpDataStructFormat {
284 __u16 pciDataStructLen;
285 __u8 pciDataStructRev;
286 } __attribute__ ((packed));
288 struct orom_entry *orom_entries;
290 const struct orom_entry *get_orom_entry_by_device_id(__u16 dev_id)
292 struct orom_entry *entry;
293 struct devid_list *devid;
295 for (entry = orom_entries; entry; entry = entry->next) {
296 for (devid = entry->devid_list; devid; devid = devid->next) {
297 if (devid->devid == dev_id)
305 const struct imsm_orom *get_orom_by_device_id(__u16 dev_id)
307 const struct orom_entry *entry = get_orom_entry_by_device_id(dev_id);
315 static struct orom_entry *add_orom(const struct imsm_orom *orom)
317 struct orom_entry *list;
318 struct orom_entry *prev = NULL;
320 for (list = orom_entries; list; prev = list, list = list->next)
323 list = xmalloc(sizeof(struct orom_entry));
325 list->devid_list = NULL;
336 static void add_orom_device_id(struct orom_entry *entry, __u16 dev_id)
338 struct devid_list *list;
339 struct devid_list *prev = NULL;
341 for (list = entry->devid_list; list; prev = list, list = list->next) {
342 if (list->devid == dev_id)
345 list = xmalloc(sizeof(struct devid_list));
346 list->devid = dev_id;
350 entry->devid_list = list;
355 static int scan(const void *start, const void *end, const void *data)
358 const struct imsm_orom *imsm_mem = NULL;
359 int len = (end - start);
360 struct pciExpDataStructFormat *ptr= (struct pciExpDataStructFormat *)data;
362 if (data + 0x18 > end) {
363 dprintf("cannot find pciExpDataStruct \n");
367 dprintf("ptr->vendorID: %lx __le16_to_cpu(ptr->deviceID): %lx \n",
368 (ulong) __le16_to_cpu(ptr->vendorID),
369 (ulong) __le16_to_cpu(ptr->deviceID));
371 if (__le16_to_cpu(ptr->vendorID) != 0x8086)
374 for (offset = 0; offset < len; offset += 4) {
375 const void *mem = start + offset;
377 if ((memcmp(mem, IMSM_OROM_SIGNATURE, 4) == 0)) {
386 struct orom_entry *orom = add_orom(imsm_mem);
388 /* only PciDataStructure with revision 3 and above supports devices list. */
389 if (ptr->pciDataStructRev >= 3 && ptr->devListOffset) {
390 const __u16 *dev_list = (void *)ptr + ptr->devListOffset;
393 for (i = 0; dev_list[i] != 0; i++)
394 add_orom_device_id(orom, dev_list[i]);
396 add_orom_device_id(orom, __le16_to_cpu(ptr->deviceID));
402 const struct imsm_orom *imsm_platform_test(struct sys_dev *hba)
404 struct imsm_orom orom = {
405 .signature = IMSM_OROM_SIGNATURE,
406 .rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
407 IMSM_OROM_RLC_RAID10 | IMSM_OROM_RLC_RAID5,
408 .sss = IMSM_OROM_SSS_4kB | IMSM_OROM_SSS_8kB |
409 IMSM_OROM_SSS_16kB | IMSM_OROM_SSS_32kB |
410 IMSM_OROM_SSS_64kB | IMSM_OROM_SSS_128kB |
411 IMSM_OROM_SSS_256kB | IMSM_OROM_SSS_512kB |
412 IMSM_OROM_SSS_1MB | IMSM_OROM_SSS_2MB,
413 .dpa = IMSM_OROM_DISKS_PER_ARRAY,
414 .tds = IMSM_OROM_TOTAL_DISKS,
415 .vpa = IMSM_OROM_VOLUMES_PER_ARRAY,
416 .vphba = IMSM_OROM_VOLUMES_PER_HBA
418 orom.attr = orom.rlc | IMSM_OROM_ATTR_ChecksumVerify;
420 if (check_env("IMSM_TEST_OROM_NORAID5")) {
421 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
422 IMSM_OROM_RLC_RAID10;
424 if (check_env("IMSM_TEST_AHCI_EFI_NORAID5") && (hba->type == SYS_DEV_SAS)) {
425 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
426 IMSM_OROM_RLC_RAID10;
428 if (check_env("IMSM_TEST_SCU_EFI_NORAID5") && (hba->type == SYS_DEV_SATA)) {
429 orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
430 IMSM_OROM_RLC_RAID10;
433 struct orom_entry *ret = add_orom(&orom);
435 add_orom_device_id(ret, hba->dev_id);
440 static const struct imsm_orom *find_imsm_hba_orom(struct sys_dev *hba)
444 if (check_env("IMSM_TEST_OROM"))
445 return imsm_platform_test(hba);
447 /* return empty OROM capabilities in EFI test mode */
448 if (check_env("IMSM_TEST_AHCI_EFI") || check_env("IMSM_TEST_SCU_EFI"))
451 find_intel_devices();
453 if (intel_devices == NULL)
456 /* scan option-rom memory looking for an imsm signature */
457 if (check_env("IMSM_SAFE_OROM_SCAN"))
461 if (probe_roms_init(align) != 0)
464 /* ignore return value - True is returned if both adapater roms are found */
465 scan_adapter_roms(scan);
468 return get_orom_by_device_id(hba->dev_id);
471 #define GUID_STR_MAX 37 /* according to GUID format:
472 * xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx" */
474 #define EFI_GUID(a, b, c, d0, d1, d2, d3, d4, d5, d6, d7) \
476 {{ (a) & 0xff, ((a) >> 8) & 0xff, ((a) >> 16) & 0xff, ((a) >> 24) & 0xff, \
477 (b) & 0xff, ((b) >> 8) & 0xff, \
478 (c) & 0xff, ((c) >> 8) & 0xff, \
479 (d0), (d1), (d2), (d3), (d4), (d5), (d6), (d7) }})
481 #define SYS_EFI_VAR_PATH "/sys/firmware/efi/vars"
482 #define SYS_EFIVARS_PATH "/sys/firmware/efi/efivars"
483 #define SCU_PROP "RstScuV"
484 #define AHCI_PROP "RstSataV"
485 #define AHCI_SSATA_PROP "RstsSatV"
486 #define AHCI_CSATA_PROP "RstCSatV"
487 #define VMD_PROP "RstUefiV"
489 #define VENDOR_GUID \
490 EFI_GUID(0x193dfefa, 0xa445, 0x4302, 0x99, 0xd8, 0xef, 0x3a, 0xad, 0x1a, 0x04, 0xc6)
492 #define PCI_CLASS_RAID_CNTRL 0x010400
494 static int read_efi_var(void *buffer, ssize_t buf_size, char *variable_name, struct efi_guid guid)
497 char buf[GUID_STR_MAX];
501 snprintf(path, PATH_MAX, "%s/%s-%s", SYS_EFIVARS_PATH, variable_name, guid_str(buf, guid));
503 fd = open(path, O_RDONLY);
507 /* read the variable attributes and ignore it */
508 n = read(fd, buf, sizeof(__u32));
514 /* read the variable data */
515 n = read(fd, buffer, buf_size);
523 static int read_efi_variable(void *buffer, ssize_t buf_size, char *variable_name, struct efi_guid guid)
526 char buf[GUID_STR_MAX];
528 ssize_t n, var_data_len;
530 /* Try to read the variable using the new efivarfs interface first.
531 * If that fails, fall back to the old sysfs-efivars interface. */
532 if (!read_efi_var(buffer, buf_size, variable_name, guid))
535 snprintf(path, PATH_MAX, "%s/%s-%s/size", SYS_EFI_VAR_PATH, variable_name, guid_str(buf, guid));
537 dprintf("EFI VAR: path=%s\n", path);
538 /* get size of variable data */
539 dfd = open(path, O_RDONLY);
543 n = read(dfd, &buf, sizeof(buf));
550 var_data_len = strtoul(buf, NULL, 16);
551 if ((errno == ERANGE && (var_data_len == LONG_MAX))
552 || (errno != 0 && var_data_len == 0))
556 snprintf(path, PATH_MAX, "%s/%s-%s/data", SYS_EFI_VAR_PATH, variable_name, guid_str(buf, guid));
558 dprintf("EFI VAR: path=%s\n", path);
559 dfd = open(path, O_RDONLY);
563 n = read(dfd, buffer, buf_size);
565 if (n != var_data_len || n < buf_size) {
572 const struct imsm_orom *find_imsm_efi(struct sys_dev *hba)
574 struct imsm_orom orom;
575 struct orom_entry *ret;
578 if (check_env("IMSM_TEST_AHCI_EFI") || check_env("IMSM_TEST_SCU_EFI"))
579 return imsm_platform_test(hba);
581 /* OROM test is set, return that there is no EFI capabilities */
582 if (check_env("IMSM_TEST_OROM"))
585 if (hba->type == SYS_DEV_SATA && hba->class != PCI_CLASS_RAID_CNTRL)
588 err = read_efi_variable(&orom, sizeof(orom), hba->type == SYS_DEV_SAS ? SCU_PROP : AHCI_PROP, VENDOR_GUID);
590 /* try to read variable for second AHCI controller */
591 if (err && hba->type == SYS_DEV_SATA)
592 err = read_efi_variable(&orom, sizeof(orom), AHCI_SSATA_PROP, VENDOR_GUID);
594 /* try to read variable for combined AHCI controllers */
595 if (err && hba->type == SYS_DEV_SATA) {
596 static struct orom_entry *csata;
598 err = read_efi_variable(&orom, sizeof(orom), AHCI_CSATA_PROP, VENDOR_GUID);
601 csata = add_orom(&orom);
602 add_orom_device_id(csata, hba->dev_id);
603 csata->type = hba->type;
608 if (hba->type == SYS_DEV_VMD) {
609 err = read_efi_variable(&orom, sizeof(orom), VMD_PROP, VENDOR_GUID);
615 ret = add_orom(&orom);
616 add_orom_device_id(ret, hba->dev_id);
617 ret->type = hba->type;
622 const struct imsm_orom *find_imsm_nvme(struct sys_dev *hba)
624 static struct orom_entry *nvme_orom;
626 if (hba->type != SYS_DEV_NVME)
630 struct imsm_orom nvme_orom_compat = {
631 .signature = IMSM_NVME_OROM_COMPAT_SIGNATURE,
632 .rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
633 IMSM_OROM_RLC_RAID10 | IMSM_OROM_RLC_RAID5,
634 .sss = IMSM_OROM_SSS_4kB | IMSM_OROM_SSS_8kB |
635 IMSM_OROM_SSS_16kB | IMSM_OROM_SSS_32kB |
636 IMSM_OROM_SSS_64kB | IMSM_OROM_SSS_128kB,
637 .dpa = IMSM_OROM_DISKS_PER_ARRAY_NVME,
638 .tds = IMSM_OROM_TOTAL_DISKS_NVME,
639 .vpa = IMSM_OROM_VOLUMES_PER_ARRAY,
640 .vphba = IMSM_OROM_TOTAL_DISKS_NVME / 2 * IMSM_OROM_VOLUMES_PER_ARRAY,
641 .attr = IMSM_OROM_ATTR_2TB | IMSM_OROM_ATTR_2TB_DISK,
642 .driver_features = IMSM_OROM_CAPABILITIES_EnterpriseSystem
644 nvme_orom = add_orom(&nvme_orom_compat);
646 add_orom_device_id(nvme_orom, hba->dev_id);
647 nvme_orom->type = SYS_DEV_NVME;
648 return &nvme_orom->orom;
651 const struct imsm_orom *find_imsm_capability(struct sys_dev *hba)
653 const struct imsm_orom *cap = get_orom_by_device_id(hba->dev_id);
658 if (hba->type == SYS_DEV_NVME)
659 return find_imsm_nvme(hba);
660 if ((cap = find_imsm_efi(hba)) != NULL)
662 if ((cap = find_imsm_hba_orom(hba)) != NULL)
668 char *devt_to_devpath(dev_t dev)
672 sprintf(device, "/sys/dev/block/%d:%d/device", major(dev), minor(dev));
673 return realpath(device, NULL);
676 char *diskfd_to_devpath(int fd)
678 /* return the device path for a disk, return NULL on error or fd
679 * refers to a partition
683 if (fstat(fd, &st) != 0)
685 if (!S_ISBLK(st.st_mode))
688 return devt_to_devpath(st.st_rdev);
691 int path_attached_to_hba(const char *disk_path, const char *hba_path)
695 if (check_env("IMSM_TEST_AHCI_DEV") ||
696 check_env("IMSM_TEST_SCU_DEV")) {
700 if (!disk_path || !hba_path)
702 dprintf("hba: %s - disk: %s\n", hba_path, disk_path);
703 if (strncmp(disk_path, hba_path, strlen(hba_path)) == 0)
711 int devt_attached_to_hba(dev_t dev, const char *hba_path)
713 char *disk_path = devt_to_devpath(dev);
714 int rc = path_attached_to_hba(disk_path, hba_path);
722 int disk_attached_to_hba(int fd, const char *hba_path)
724 char *disk_path = diskfd_to_devpath(fd);
725 int rc = path_attached_to_hba(disk_path, hba_path);
733 char *vmd_domain_to_controller(struct sys_dev *hba, char *buf)
742 if (hba->type != SYS_DEV_VMD)
745 dir = opendir("/sys/bus/pci/drivers/vmd");
749 for (ent = readdir(dir); ent; ent = readdir(dir)) {
750 sprintf(path, "/sys/bus/pci/drivers/vmd/%s/domain/device",
753 if (!realpath(path, buf))
756 if (strncmp(buf, hba->path, strlen(buf)) == 0) {
757 sprintf(path, "/sys/bus/pci/drivers/vmd/%s", ent->d_name);
759 return realpath(path, buf);