[thirdparty/mdadm.git] / platform-intel.c

/*
 * Intel(R) Matrix Storage Manager hardware and firmware support routines
 *
 * Copyright (C) 2008 Intel Corporation
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms and conditions of the GNU General Public License,
 * version 2, as published by the Free Software Foundation.
 *
 * This program is distributed in the hope it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
 * more details.
 *
 * You should have received a copy of the GNU General Public License along with
 * this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
 */
#include "mdadm.h"
#include "platform-intel.h"
#include "probe_roms.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <dirent.h>
#include <fcntl.h>
#include <sys/mman.h>
#include <sys/types.h>
#include <sys/stat.h>

void free_sys_dev(struct sys_dev **list)
{
	while (*list) {
		struct sys_dev *next = (*list)->next;

		if ((*list)->path)
			free((*list)->path);
		free(*list);
		*list = next;
	}
}

struct sys_dev *find_driver_devices(const char *bus, const char *driver)
{
	/* search sysfs for devices driven by 'driver' */
	char path[292];
	char link[256];
	char *c;
	DIR *driver_dir;
	struct dirent *de;
	struct sys_dev *head = NULL;
	struct sys_dev *list = NULL;
	enum sys_dev_type type;

	if (strcmp(driver, "isci") == 0)
		type = SYS_DEV_SAS;
	else if (strcmp(driver, "ahci") == 0)
		type = SYS_DEV_SATA;
	else
		type = SYS_DEV_UNKNOWN;

	sprintf(path, "/sys/bus/%s/drivers/%s", bus, driver);
	driver_dir = opendir(path);
	if (!driver_dir)
		return NULL;
	for (de = readdir(driver_dir); de; de = readdir(driver_dir)) {
		int n;

		/* is 'de' a device? check that the 'subsystem' link exists and
		 * that its target matches 'bus'
		 */
		sprintf(path, "/sys/bus/%s/drivers/%s/%s/subsystem",
			bus, driver, de->d_name);
		n = readlink(path, link, sizeof(link));
		if (n < 0 || n >= (int)sizeof(link))
			continue;
		link[n] = '\0';
		c = strrchr(link, '/');
		if (!c)
			continue;
		if (strncmp(bus, c+1, strlen(bus)) != 0)
			continue;

		sprintf(path, "/sys/bus/%s/drivers/%s/%s",
			bus, driver, de->d_name);

		/* if it's not Intel device skip it. */
		if (devpath_to_vendor(path) != 0x8086)
			continue;

		/* start / add list entry */
		if (!head) {
			head = malloc(sizeof(*head));
			list = head;
		} else {
			list->next = malloc(sizeof(*head));
			list = list->next;
		}

		if (!list) {
			free_sys_dev(&head);
			break;
		}

		list->type = type;
		list->path = canonicalize_file_name(path);
		list->next = NULL;
		if ((list->pci_id = strrchr(list->path, '/')) != NULL)
			list->pci_id++;
	}
	closedir(driver_dir);
	return head;
}

__u16 devpath_to_vendor(const char *dev_path)
{
	char path[strlen(dev_path) + strlen("/vendor") + 1];
	char vendor[7];
	int fd;
	__u16 id = 0xffff;
	int n;

	sprintf(path, "%s/vendor", dev_path);

	fd = open(path, O_RDONLY);
	if (fd < 0)
		return 0xffff;

	n = read(fd, vendor, sizeof(vendor));
	if (n == sizeof(vendor)) {
		vendor[n - 1] = '\0';
		id = strtoul(vendor, NULL, 16);
	}
	close(fd);

	return id;
}

struct sys_dev *find_intel_devices(void)
{
	struct sys_dev *ahci, *isci;

	isci = find_driver_devices("pci", "isci");
	ahci = find_driver_devices("pci", "ahci");

	if (!ahci) {
		ahci = isci;
	} else {
		struct sys_dev *elem = ahci;
		while (elem->next)
			elem = elem->next;
		elem->next = isci;
	}
	return ahci;
}

static int platform_has_intel_devices(void)
{
	struct sys_dev *devices;
	devices = find_intel_devices();
	if (devices) {
		free_sys_dev(&devices);
		return 1;
	}
	return 0;
}

/*
 * PCI Expansion ROM Data Structure Format
 */
struct pciExpDataStructFormat {
	__u8  ver[4];
	__u16 vendorID;
	__u16 deviceID;
} __attribute__ ((packed));

static struct imsm_orom imsm_orom;
static int scan(const void *start, const void *end, const void *data)
{
	int offset;
	const struct imsm_orom *imsm_mem;
	int len = (end - start);
	struct pciExpDataStructFormat *ptr= (struct pciExpDataStructFormat *)data;

	dprintf("ptr->vendorID: %lx __le16_to_cpu(ptr->deviceID): %lx \n",
		(ulong) __le16_to_cpu(ptr->vendorID),
		(ulong) __le16_to_cpu(ptr->deviceID));

	if (!((__le16_to_cpu(ptr->vendorID) == 0x8086) &&
	      (__le16_to_cpu(ptr->deviceID) == 0x2822)))
		return 0;

	for (offset = 0; offset < len; offset += 4) {
		imsm_mem = start + offset;
		if (memcmp(imsm_mem->signature, "$VER", 4) == 0) {
			imsm_orom = *imsm_mem;
			return 1;
		}
	}
	return 0;
}

const struct imsm_orom *find_imsm_orom(void)
{
	static int populated = 0;
	unsigned long align;

	/* it's static data so we only need to read it once */
	if (populated)
		return &imsm_orom;

	if (check_env("IMSM_TEST_OROM")) {
		memset(&imsm_orom, 0, sizeof(imsm_orom));
		imsm_orom.rlc = IMSM_OROM_RLC_RAID0 | IMSM_OROM_RLC_RAID1 |
				IMSM_OROM_RLC_RAID10 | IMSM_OROM_RLC_RAID5;
		imsm_orom.sss = IMSM_OROM_SSS_4kB | IMSM_OROM_SSS_8kB |
				IMSM_OROM_SSS_16kB | IMSM_OROM_SSS_32kB |
				IMSM_OROM_SSS_64kB | IMSM_OROM_SSS_128kB |
				IMSM_OROM_SSS_256kB | IMSM_OROM_SSS_512kB |
				IMSM_OROM_SSS_1MB | IMSM_OROM_SSS_2MB;
		imsm_orom.dpa = 6;
		imsm_orom.tds = 6;
		imsm_orom.vpa = 2;
		imsm_orom.vphba = 4;
		imsm_orom.attr = imsm_orom.rlc | IMSM_OROM_ATTR_ChecksumVerify;
		populated = 1;
		return &imsm_orom;
	}

	if (!platform_has_intel_devices())
		return NULL;

	/* scan option-rom memory looking for an imsm signature */
	if (check_env("IMSM_SAFE_OROM_SCAN"))
		align = 2048;
	else
		align = 512;
	if (probe_roms_init(align) != 0)
		return NULL;
	probe_roms();
	populated = scan_adapter_roms(scan);
	probe_roms_exit();

	if (populated)
		return &imsm_orom;
	return NULL;
}

char *devt_to_devpath(dev_t dev)
{
	char device[46];

	sprintf(device, "/sys/dev/block/%d:%d/device", major(dev), minor(dev));
	return canonicalize_file_name(device);
}

char *diskfd_to_devpath(int fd)
{
	/* return the device path for a disk, return NULL on error or fd
	 * refers to a partition
	 */
	struct stat st;

	if (fstat(fd, &st) != 0)
		return NULL;
	if (!S_ISBLK(st.st_mode))
		return NULL;

	return devt_to_devpath(st.st_rdev);
}

int path_attached_to_hba(const char *disk_path, const char *hba_path)
{
	int rc;

	if (!disk_path || !hba_path)
		return 0;
	dprintf("hba: %s - disk: %s\n", hba_path, disk_path);
	if (strncmp(disk_path, hba_path, strlen(hba_path)) == 0)
		rc = 1;
	else
		rc = 0;

	return rc;
}

int devt_attached_to_hba(dev_t dev, const char *hba_path)
{
	char *disk_path = devt_to_devpath(dev);
	int rc = path_attached_to_hba(disk_path, hba_path);

	if (disk_path)
		free(disk_path);

	return rc;
}

int disk_attached_to_hba(int fd, const char *hba_path)
{
	char *disk_path = diskfd_to_devpath(fd);
	int rc = path_attached_to_hba(disk_path, hba_path);

	if (disk_path)
		free(disk_path);

	return rc;
}
Commit	Line	Data
b390f610 DW	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
	32	void free_sys_dev(struct sys_dev **list)
	33	{
	34	while (*list) {
	35	struct sys_dev next = (list)->next;
	36
	37	if ((*list)->path)
	38	free((*list)->path);
	39	free(*list);
	40	*list = next;
	41	}
	42	}
	43
	44	struct sys_dev find_driver_devices(const char bus, const char *driver)
	45	{
	46	/* search sysfs for devices driven by 'driver' */
5dbb8c8d	47	char path[292];
b390f610 DW	48	char link[256];
	49	char *c;
	50	DIR *driver_dir;
	51	struct dirent *de;
	52	struct sys_dev *head = NULL;
	53	struct sys_dev *list = NULL;
a8e5382a LM	54	enum sys_dev_type type;
	55
	56	if (strcmp(driver, "isci") == 0)
	57	type = SYS_DEV_SAS;
	58	else if (strcmp(driver, "ahci") == 0)
	59	type = SYS_DEV_SATA;
	60	else
	61	type = SYS_DEV_UNKNOWN;
b390f610 DW	62
	63	sprintf(path, "/sys/bus/%s/drivers/%s", bus, driver);
	64	driver_dir = opendir(path);
	65	if (!driver_dir)
	66	return NULL;
	67	for (de = readdir(driver_dir); de; de = readdir(driver_dir)) {
5a1920f2 AW	68	int n;
5a1920f2 AW	69
b390f610 DW	70	/* is 'de' a device? check that the 'subsystem' link exists and
	71	* that its target matches 'bus'
	72	*/
	73	sprintf(path, "/sys/bus/%s/drivers/%s/%s/subsystem",
	74	bus, driver, de->d_name);
5a1920f2	75	n = readlink(path, link, sizeof(link));
f21e18ca	76	if (n < 0 \|\| n >= (int)sizeof(link))
b390f610	77	continue;
5a1920f2	78	link[n] = '\0';
b390f610 DW	79	c = strrchr(link, '/');
	80	if (!c)
	81	continue;
	82	if (strncmp(bus, c+1, strlen(bus)) != 0)
	83	continue;
	84
a8e5382a LM	85	sprintf(path, "/sys/bus/%s/drivers/%s/%s",
	86	bus, driver, de->d_name);
	87
	88	/* if it's not Intel device skip it. */
	89	if (devpath_to_vendor(path) != 0x8086)
	90	continue;
	91
b390f610 DW	92	/* start / add list entry */
	93	if (!head) {
	94	head = malloc(sizeof(*head));
	95	list = head;
	96	} else {
	97	list->next = malloc(sizeof(*head));
	98	list = list->next;
	99	}
	100
	101	if (!list) {
	102	free_sys_dev(&head);
	103	break;
	104	}
	105
a8e5382a	106	list->type = type;
b390f610 DW	107	list->path = canonicalize_file_name(path);
b390f610 DW	108	list->next = NULL;
a8e5382a LM	109	if ((list->pci_id = strrchr(list->path, '/')) != NULL)
a8e5382a LM	110	list->pci_id++;
b390f610	111	}
2a17c77b	112	closedir(driver_dir);
b390f610 DW	113	return head;
	114	}
	115
	116	__u16 devpath_to_vendor(const char *dev_path)
	117	{
	118	char path[strlen(dev_path) + strlen("/vendor") + 1];
	119	char vendor[7];
	120	int fd;
	121	__u16 id = 0xffff;
	122	int n;
	123
	124	sprintf(path, "%s/vendor", dev_path);
	125
	126	fd = open(path, O_RDONLY);
	127	if (fd < 0)
	128	return 0xffff;
	129
	130	n = read(fd, vendor, sizeof(vendor));
	131	if (n == sizeof(vendor)) {
	132	vendor[n - 1] = '\0';
	133	id = strtoul(vendor, NULL, 16);
	134	}
	135	close(fd);
	136
	137	return id;
	138	}
	139
a8e5382a	140	struct sys_dev *find_intel_devices(void)
b390f610	141	{
a8e5382a LM	142	struct sys_dev ahci, isci;
	143
	144	isci = find_driver_devices("pci", "isci");
	145	ahci = find_driver_devices("pci", "ahci");
	146
	147	if (!ahci) {
	148	ahci = isci;
	149	} else {
	150	struct sys_dev *elem = ahci;
	151	while (elem->next)
	152	elem = elem->next;
	153	elem->next = isci;
	154	}
	155	return ahci;
b390f610 DW	156	}
b390f610 DW	157
a8e5382a LM	158	static int platform_has_intel_devices(void)
	159	{
	160	struct sys_dev *devices;
	161	devices = find_intel_devices();
	162	if (devices) {
	163	free_sys_dev(&devices);
	164	return 1;
	165	}
	166	return 0;
	167	}
b390f610	168
3c8bfb5d LM	169	/*
	170	* PCI Expansion ROM Data Structure Format
	171	*/
	172	struct pciExpDataStructFormat {
	173	__u8 ver[4];
	174	__u16 vendorID;
	175	__u16 deviceID;
	176	} __attribute__ ((packed));
	177
b390f610	178	static struct imsm_orom imsm_orom;
3c8bfb5d	179	static int scan(const void start, const void end, const void *data)
b390f610 DW	180	{
	181	int offset;
	182	const struct imsm_orom *imsm_mem;
	183	int len = (end - start);
3c8bfb5d LM	184	struct pciExpDataStructFormat ptr= (struct pciExpDataStructFormat )data;
	185
	186	dprintf("ptr->vendorID: %lx __le16_to_cpu(ptr->deviceID): %lx \n",
	187	(ulong) __le16_to_cpu(ptr->vendorID),
	188	(ulong) __le16_to_cpu(ptr->deviceID));
	189
	190	if (!((__le16_to_cpu(ptr->vendorID) == 0x8086) &&
	191	(__le16_to_cpu(ptr->deviceID) == 0x2822)))
	192	return 0;
b390f610 DW	193
	194	for (offset = 0; offset < len; offset += 4) {
	195	imsm_mem = start + offset;
	196	if (memcmp(imsm_mem->signature, "$VER", 4) == 0) {
	197	imsm_orom = *imsm_mem;
	198	return 1;
	199	}
	200	}
b390f610 DW	201	return 0;
	202	}
	203
	204	const struct imsm_orom *find_imsm_orom(void)
	205	{
	206	static int populated = 0;
969c2555	207	unsigned long align;
b390f610 DW	208
	209	/* it's static data so we only need to read it once */
	210	if (populated)
	211	return &imsm_orom;
	212
cceebc67 DW	213	if (check_env("IMSM_TEST_OROM")) {
	214	memset(&imsm_orom, 0, sizeof(imsm_orom));
	215	imsm_orom.rlc = IMSM_OROM_RLC_RAID0 \| IMSM_OROM_RLC_RAID1 \|
	216	IMSM_OROM_RLC_RAID10 \| IMSM_OROM_RLC_RAID5;
	217	imsm_orom.sss = IMSM_OROM_SSS_4kB \| IMSM_OROM_SSS_8kB \|
	218	IMSM_OROM_SSS_16kB \| IMSM_OROM_SSS_32kB \|
	219	IMSM_OROM_SSS_64kB \| IMSM_OROM_SSS_128kB \|
	220	IMSM_OROM_SSS_256kB \| IMSM_OROM_SSS_512kB \|
	221	IMSM_OROM_SSS_1MB \| IMSM_OROM_SSS_2MB;
	222	imsm_orom.dpa = 6;
	223	imsm_orom.tds = 6;
	224	imsm_orom.vpa = 2;
	225	imsm_orom.vphba = 4;
	226	imsm_orom.attr = imsm_orom.rlc \| IMSM_OROM_ATTR_ChecksumVerify;
	227	populated = 1;
	228	return &imsm_orom;
	229	}
	230
a8e5382a	231	if (!platform_has_intel_devices())
b390f610 DW	232	return NULL;
	233
	234	/* scan option-rom memory looking for an imsm signature */
969c2555 DW	235	if (check_env("IMSM_SAFE_OROM_SCAN"))
	236	align = 2048;
	237	else
	238	align = 512;
	239	if (probe_roms_init(align) != 0)
b390f610 DW	240	return NULL;
	241	probe_roms();
	242	populated = scan_adapter_roms(scan);
	243	probe_roms_exit();
	244
	245	if (populated)
	246	return &imsm_orom;
	247	return NULL;
	248	}
25921536 DW	249
	250	char *devt_to_devpath(dev_t dev)
	251	{
37f0e1e0	252	char device[46];
25921536 DW	253
	254	sprintf(device, "/sys/dev/block/%d:%d/device", major(dev), minor(dev));
	255	return canonicalize_file_name(device);
	256	}
	257
a8e5382a	258	char *diskfd_to_devpath(int fd)
25921536 DW	259	{
	260	/* return the device path for a disk, return NULL on error or fd
	261	* refers to a partition
	262	*/
	263	struct stat st;
	264
	265	if (fstat(fd, &st) != 0)
	266	return NULL;
	267	if (!S_ISBLK(st.st_mode))
	268	return NULL;
	269
	270	return devt_to_devpath(st.st_rdev);
	271	}
	272
	273	int path_attached_to_hba(const char disk_path, const char hba_path)
	274	{
	275	int rc;
	276
	277	if (!disk_path \|\| !hba_path)
	278	return 0;
a8e5382a	279	dprintf("hba: %s - disk: %s\n", hba_path, disk_path);
25921536 DW	280	if (strncmp(disk_path, hba_path, strlen(hba_path)) == 0)
	281	rc = 1;
	282	else
	283	rc = 0;
	284
	285	return rc;
	286	}
	287
	288	int devt_attached_to_hba(dev_t dev, const char *hba_path)
	289	{
	290	char *disk_path = devt_to_devpath(dev);
	291	int rc = path_attached_to_hba(disk_path, hba_path);
	292
	293	if (disk_path)
	294	free(disk_path);
	295
	296	return rc;
	297	}
	298
	299	int disk_attached_to_hba(int fd, const char *hba_path)
	300	{
	301	char *disk_path = diskfd_to_devpath(fd);
	302	int rc = path_attached_to_hba(disk_path, hba_path);
	303
	304	if (disk_path)
	305	free(disk_path);
	306
	307	return rc;
	308	}