[net-next-2.6.git] / drivers / scsi / libsas / sas_host_smp.c

/*
 * Serial Attached SCSI (SAS) Expander discovery and configuration
 *
 * Copyright (C) 2007 James E.J. Bottomley
 *		<James.Bottomley@HansenPartnership.com>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; version 2 only.
 */
#include <linux/scatterlist.h>
#include <linux/blkdev.h>
#include <linux/slab.h>

#include "sas_internal.h"

#include <scsi/scsi_transport.h>
#include <scsi/scsi_transport_sas.h>
#include "../scsi_sas_internal.h"

static void sas_host_smp_discover(struct sas_ha_struct *sas_ha, u8 *resp_data,
				  u8 phy_id)
{
	struct sas_phy *phy;
	struct sas_rphy *rphy;

	if (phy_id >= sas_ha->num_phys) {
		resp_data[2] = SMP_RESP_NO_PHY;
		return;
	}
	resp_data[2] = SMP_RESP_FUNC_ACC;

	phy = sas_ha->sas_phy[phy_id]->phy;
	resp_data[9] = phy_id;
	resp_data[13] = phy->negotiated_linkrate;
	memcpy(resp_data + 16, sas_ha->sas_addr, SAS_ADDR_SIZE);
	memcpy(resp_data + 24, sas_ha->sas_phy[phy_id]->attached_sas_addr,
	       SAS_ADDR_SIZE);
	resp_data[40] = (phy->minimum_linkrate << 4) |
		phy->minimum_linkrate_hw;
	resp_data[41] = (phy->maximum_linkrate << 4) |
		phy->maximum_linkrate_hw;

	if (!sas_ha->sas_phy[phy_id]->port ||
	    !sas_ha->sas_phy[phy_id]->port->port_dev)
		return;

	rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
	resp_data[12] = rphy->identify.device_type << 4;
	resp_data[14] = rphy->identify.initiator_port_protocols;
	resp_data[15] = rphy->identify.target_port_protocols;
}

static void sas_report_phy_sata(struct sas_ha_struct *sas_ha, u8 *resp_data,
				u8 phy_id)
{
	struct sas_rphy *rphy;
	struct dev_to_host_fis *fis;
	int i;

	if (phy_id >= sas_ha->num_phys) {
		resp_data[2] = SMP_RESP_NO_PHY;
		return;
	}

	resp_data[2] = SMP_RESP_PHY_NO_SATA;

	if (!sas_ha->sas_phy[phy_id]->port)
		return;

	rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
	fis = (struct dev_to_host_fis *)
		sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd;
	if (rphy->identify.target_port_protocols != SAS_PROTOCOL_SATA)
		return;

	resp_data[2] = SMP_RESP_FUNC_ACC;
	resp_data[9] = phy_id;
	memcpy(resp_data + 16, sas_ha->sas_phy[phy_id]->attached_sas_addr,
	       SAS_ADDR_SIZE);

	/* check to see if we have a valid d2h fis */
	if (fis->fis_type != 0x34)
		return;

	/* the d2h fis is required by the standard to be in LE format */
	for (i = 0; i < 20; i += 4) {
		u8 *dst = resp_data + 24 + i, *src =
			&sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd[i];
		dst[0] = src[3];
		dst[1] = src[2];
		dst[2] = src[1];
		dst[3] = src[0];
	}
}

static void sas_phy_control(struct sas_ha_struct *sas_ha, u8 phy_id,
			    u8 phy_op, enum sas_linkrate min,
			    enum sas_linkrate max, u8 *resp_data)
{
	struct sas_internal *i =
		to_sas_internal(sas_ha->core.shost->transportt);
	struct sas_phy_linkrates rates;

	if (phy_id >= sas_ha->num_phys) {
		resp_data[2] = SMP_RESP_NO_PHY;
		return;
	}
	switch (phy_op) {
	case PHY_FUNC_NOP:
	case PHY_FUNC_LINK_RESET:
	case PHY_FUNC_HARD_RESET:
	case PHY_FUNC_DISABLE:
	case PHY_FUNC_CLEAR_ERROR_LOG:
	case PHY_FUNC_CLEAR_AFFIL:
	case PHY_FUNC_TX_SATA_PS_SIGNAL:
		break;

	default:
		resp_data[2] = SMP_RESP_PHY_UNK_OP;
		return;
	}

	rates.minimum_linkrate = min;
	rates.maximum_linkrate = max;

	if (i->dft->lldd_control_phy(sas_ha->sas_phy[phy_id], phy_op, &rates))
		resp_data[2] = SMP_RESP_FUNC_FAILED;
	else
		resp_data[2] = SMP_RESP_FUNC_ACC;
}

int sas_smp_host_handler(struct Scsi_Host *shost, struct request *req,
			 struct request *rsp)
{
	u8 *req_data = NULL, *resp_data = NULL, *buf;
	struct sas_ha_struct *sas_ha = SHOST_TO_SAS_HA(shost);
	int error = -EINVAL;

	/* eight is the minimum size for request and response frames */
	if (blk_rq_bytes(req) < 8 || blk_rq_bytes(rsp) < 8)
		goto out;

	if (bio_offset(req->bio) + blk_rq_bytes(req) > PAGE_SIZE ||
	    bio_offset(rsp->bio) + blk_rq_bytes(rsp) > PAGE_SIZE) {
		shost_printk(KERN_ERR, shost,
			"SMP request/response frame crosses page boundary");
		goto out;
	}

	req_data = kzalloc(blk_rq_bytes(req), GFP_KERNEL);

	/* make sure frame can always be built ... we copy
	 * back only the requested length */
	resp_data = kzalloc(max(blk_rq_bytes(rsp), 128U), GFP_KERNEL);

	if (!req_data || !resp_data) {
		error = -ENOMEM;
		goto out;
	}

	local_irq_disable();
	buf = kmap_atomic(bio_page(req->bio), KM_USER0) + bio_offset(req->bio);
	memcpy(req_data, buf, blk_rq_bytes(req));
	kunmap_atomic(buf - bio_offset(req->bio), KM_USER0);
	local_irq_enable();

	if (req_data[0] != SMP_REQUEST)
		goto out;

	/* always succeeds ... even if we can't process the request
	 * the result is in the response frame */
	error = 0;

	/* set up default don't know response */
	resp_data[0] = SMP_RESPONSE;
	resp_data[1] = req_data[1];
	resp_data[2] = SMP_RESP_FUNC_UNK;

	switch (req_data[1]) {
	case SMP_REPORT_GENERAL:
		req->resid_len -= 8;
		rsp->resid_len -= 32;
		resp_data[2] = SMP_RESP_FUNC_ACC;
		resp_data[9] = sas_ha->num_phys;
		break;

	case SMP_REPORT_MANUF_INFO:
		req->resid_len -= 8;
		rsp->resid_len -= 64;
		resp_data[2] = SMP_RESP_FUNC_ACC;
		memcpy(resp_data + 12, shost->hostt->name,
		       SAS_EXPANDER_VENDOR_ID_LEN);
		memcpy(resp_data + 20, "libsas virt phy",
		       SAS_EXPANDER_PRODUCT_ID_LEN);
		break;

	case SMP_READ_GPIO_REG:
		/* FIXME: need GPIO support in the transport class */
		break;

	case SMP_DISCOVER:
		req->resid_len -= 16;
		if ((int)req->resid_len < 0) {
			req->resid_len = 0;
			error = -EINVAL;
			goto out;
		}
		rsp->resid_len -= 56;
		sas_host_smp_discover(sas_ha, resp_data, req_data[9]);
		break;

	case SMP_REPORT_PHY_ERR_LOG:
		/* FIXME: could implement this with additional
		 * libsas callbacks providing the HW supports it */
		break;

	case SMP_REPORT_PHY_SATA:
		req->resid_len -= 16;
		if ((int)req->resid_len < 0) {
			req->resid_len = 0;
			error = -EINVAL;
			goto out;
		}
		rsp->resid_len -= 60;
		sas_report_phy_sata(sas_ha, resp_data, req_data[9]);
		break;

	case SMP_REPORT_ROUTE_INFO:
		/* Can't implement; hosts have no routes */
		break;

	case SMP_WRITE_GPIO_REG:
		/* FIXME: need GPIO support in the transport class */
		break;

	case SMP_CONF_ROUTE_INFO:
		/* Can't implement; hosts have no routes */
		break;

	case SMP_PHY_CONTROL:
		req->resid_len -= 44;
		if ((int)req->resid_len < 0) {
			req->resid_len = 0;
			error = -EINVAL;
			goto out;
		}
		rsp->resid_len -= 8;
		sas_phy_control(sas_ha, req_data[9], req_data[10],
				req_data[32] >> 4, req_data[33] >> 4,
				resp_data);
		break;

	case SMP_PHY_TEST_FUNCTION:
		/* FIXME: should this be implemented? */
		break;

	default:
		/* probably a 2.0 function */
		break;
	}

	local_irq_disable();
	buf = kmap_atomic(bio_page(rsp->bio), KM_USER0) + bio_offset(rsp->bio);
	memcpy(buf, resp_data, blk_rq_bytes(rsp));
	flush_kernel_dcache_page(bio_page(rsp->bio));
	kunmap_atomic(buf - bio_offset(rsp->bio), KM_USER0);
	local_irq_enable();

 out:
	kfree(req_data);
	kfree(resp_data);
	return error;
}
Commit	Line	Data
b98e66fa JB	1	/*
	2	* Serial Attached SCSI (SAS) Expander discovery and configuration
	3	*
	4	* Copyright (C) 2007 James E.J. Bottomley
	5	* <James.Bottomley@HansenPartnership.com>
	6	*
	7	* This program is free software; you can redistribute it and/or
	8	* modify it under the terms of the GNU General Public License as
	9	* published by the Free Software Foundation; version 2 only.
	10	*/
	11	#include <linux/scatterlist.h>
	12	#include <linux/blkdev.h>
5a0e3ad6	13	#include <linux/slab.h>
b98e66fa JB	14
	15	#include "sas_internal.h"
	16
	17	#include <scsi/scsi_transport.h>
	18	#include <scsi/scsi_transport_sas.h>
	19	#include "../scsi_sas_internal.h"
	20
	21	static void sas_host_smp_discover(struct sas_ha_struct sas_ha, u8 resp_data,
	22	u8 phy_id)
	23	{
	24	struct sas_phy *phy;
	25	struct sas_rphy *rphy;
	26
	27	if (phy_id >= sas_ha->num_phys) {
	28	resp_data[2] = SMP_RESP_NO_PHY;
	29	return;
	30	}
	31	resp_data[2] = SMP_RESP_FUNC_ACC;
	32
	33	phy = sas_ha->sas_phy[phy_id]->phy;
	34	resp_data[9] = phy_id;
	35	resp_data[13] = phy->negotiated_linkrate;
	36	memcpy(resp_data + 16, sas_ha->sas_addr, SAS_ADDR_SIZE);
	37	memcpy(resp_data + 24, sas_ha->sas_phy[phy_id]->attached_sas_addr,
	38	SAS_ADDR_SIZE);
	39	resp_data[40] = (phy->minimum_linkrate << 4) \|
	40	phy->minimum_linkrate_hw;
	41	resp_data[41] = (phy->maximum_linkrate << 4) \|
	42	phy->maximum_linkrate_hw;
	43
	44	if (!sas_ha->sas_phy[phy_id]->port \|\|
	45	!sas_ha->sas_phy[phy_id]->port->port_dev)
	46	return;
	47
	48	rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
	49	resp_data[12] = rphy->identify.device_type << 4;
	50	resp_data[14] = rphy->identify.initiator_port_protocols;
	51	resp_data[15] = rphy->identify.target_port_protocols;
	52	}
	53
	54	static void sas_report_phy_sata(struct sas_ha_struct sas_ha, u8 resp_data,
	55	u8 phy_id)
	56	{
	57	struct sas_rphy *rphy;
	58	struct dev_to_host_fis *fis;
	59	int i;
	60
	61	if (phy_id >= sas_ha->num_phys) {
	62	resp_data[2] = SMP_RESP_NO_PHY;
	63	return;
	64	}
	65
	66	resp_data[2] = SMP_RESP_PHY_NO_SATA;
	67
	68	if (!sas_ha->sas_phy[phy_id]->port)
	69	return;
	70
	71	rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
	72	fis = (struct dev_to_host_fis *)
	73	sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd;
	74	if (rphy->identify.target_port_protocols != SAS_PROTOCOL_SATA)
	75	return;
	76
	77	resp_data[2] = SMP_RESP_FUNC_ACC;
78	resp_data[9] = phy_id;
79	memcpy(resp_data + 16, sas_ha->sas_phy[phy_id]->attached_sas_addr,
80	SAS_ADDR_SIZE);
81
82	/* check to see if we have a valid d2h fis */
83	if (fis->fis_type != 0x34)
84	return;
85
86	/* the d2h fis is required by the standard to be in LE format */
87	for (i = 0; i < 20; i += 4) {
88	u8 dst = resp_data + 24 + i, src =
89	&sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd[i];
90	dst[0] = src[3];
91	dst[1] = src[2];
92	dst[2] = src[1];
93	dst[3] = src[0];
94	}
95	}
96
97	static void sas_phy_control(struct sas_ha_struct *sas_ha, u8 phy_id,
98	u8 phy_op, enum sas_linkrate min,
99	enum sas_linkrate max, u8 *resp_data)
100	{
101	struct sas_internal *i =
102	to_sas_internal(sas_ha->core.shost->transportt);
103	struct sas_phy_linkrates rates;
104
105	if (phy_id >= sas_ha->num_phys) {
106	resp_data[2] = SMP_RESP_NO_PHY;
107	return;
108	}
109	switch (phy_op) {
110	case PHY_FUNC_NOP:
111	case PHY_FUNC_LINK_RESET:
112	case PHY_FUNC_HARD_RESET:
113	case PHY_FUNC_DISABLE:
114	case PHY_FUNC_CLEAR_ERROR_LOG:
115	case PHY_FUNC_CLEAR_AFFIL:
116	case PHY_FUNC_TX_SATA_PS_SIGNAL:
117	break;
118
119	default:
120	resp_data[2] = SMP_RESP_PHY_UNK_OP;
121	return;
122	}
123
124	rates.minimum_linkrate = min;
125	rates.maximum_linkrate = max;
126
127	if (i->dft->lldd_control_phy(sas_ha->sas_phy[phy_id], phy_op, &rates))
128	resp_data[2] = SMP_RESP_FUNC_FAILED;
129	else
130	resp_data[2] = SMP_RESP_FUNC_ACC;
131	}
132
133	int sas_smp_host_handler(struct Scsi_Host shost, struct request req,
134	struct request *rsp)
135	{
136	u8 req_data = NULL, resp_data = NULL, *buf;
137	struct sas_ha_struct *sas_ha = SHOST_TO_SAS_HA(shost);
c3a4d78c	138	int error = -EINVAL;
b98e66fa JB	139
b98e66fa JB	140	/* eight is the minimum size for request and response frames */
b0790410	141	if (blk_rq_bytes(req) < 8 \|\| blk_rq_bytes(rsp) < 8)
b98e66fa JB	142	goto out;
b98e66fa JB	143
b0790410 TH	144	if (bio_offset(req->bio) + blk_rq_bytes(req) > PAGE_SIZE \|\|
b0790410 TH	145	bio_offset(rsp->bio) + blk_rq_bytes(rsp) > PAGE_SIZE) {
b98e66fa JB	146	shost_printk(KERN_ERR, shost,
	147	"SMP request/response frame crosses page boundary");
	148	goto out;
	149	}
	150
b0790410	151	req_data = kzalloc(blk_rq_bytes(req), GFP_KERNEL);
b98e66fa JB	152
	153	/* make sure frame can always be built ... we copy
	154	* back only the requested length */
b0790410	155	resp_data = kzalloc(max(blk_rq_bytes(rsp), 128U), GFP_KERNEL);
b98e66fa JB	156
	157	if (!req_data \|\| !resp_data) {
	158	error = -ENOMEM;
	159	goto out;
	160	}
	161
	162	local_irq_disable();
	163	buf = kmap_atomic(bio_page(req->bio), KM_USER0) + bio_offset(req->bio);
b0790410	164	memcpy(req_data, buf, blk_rq_bytes(req));
b98e66fa JB	165	kunmap_atomic(buf - bio_offset(req->bio), KM_USER0);
	166	local_irq_enable();
	167
	168	if (req_data[0] != SMP_REQUEST)
	169	goto out;
	170
	171	/* always succeeds ... even if we can't process the request
	172	* the result is in the response frame */
	173	error = 0;
	174
	175	/* set up default don't know response */
	176	resp_data[0] = SMP_RESPONSE;
	177	resp_data[1] = req_data[1];
	178	resp_data[2] = SMP_RESP_FUNC_UNK;
	179
	180	switch (req_data[1]) {
	181	case SMP_REPORT_GENERAL:
c3a4d78c TH	182	req->resid_len -= 8;
c3a4d78c TH	183	rsp->resid_len -= 32;
b98e66fa JB	184	resp_data[2] = SMP_RESP_FUNC_ACC;
	185	resp_data[9] = sas_ha->num_phys;
	186	break;
	187
	188	case SMP_REPORT_MANUF_INFO:
c3a4d78c TH	189	req->resid_len -= 8;
c3a4d78c TH	190	rsp->resid_len -= 64;
b98e66fa JB	191	resp_data[2] = SMP_RESP_FUNC_ACC;
	192	memcpy(resp_data + 12, shost->hostt->name,
	193	SAS_EXPANDER_VENDOR_ID_LEN);
	194	memcpy(resp_data + 20, "libsas virt phy",
	195	SAS_EXPANDER_PRODUCT_ID_LEN);
	196	break;
	197
	198	case SMP_READ_GPIO_REG:
	199	/* FIXME: need GPIO support in the transport class */
	200	break;
	201
	202	case SMP_DISCOVER:
c3a4d78c TH	203	req->resid_len -= 16;
	204	if ((int)req->resid_len < 0) {
	205	req->resid_len = 0;
b98e66fa JB	206	error = -EINVAL;
	207	goto out;
	208	}
c3a4d78c	209	rsp->resid_len -= 56;
b98e66fa JB	210	sas_host_smp_discover(sas_ha, resp_data, req_data[9]);
	211	break;
	212
	213	case SMP_REPORT_PHY_ERR_LOG:
	214	/* FIXME: could implement this with additional
	215	* libsas callbacks providing the HW supports it */
	216	break;
	217
	218	case SMP_REPORT_PHY_SATA:
c3a4d78c TH	219	req->resid_len -= 16;
	220	if ((int)req->resid_len < 0) {
	221	req->resid_len = 0;
b98e66fa JB	222	error = -EINVAL;
	223	goto out;
	224	}
c3a4d78c	225	rsp->resid_len -= 60;
b98e66fa JB	226	sas_report_phy_sata(sas_ha, resp_data, req_data[9]);
	227	break;
	228
	229	case SMP_REPORT_ROUTE_INFO:
	230	/* Can't implement; hosts have no routes */
	231	break;
	232
	233	case SMP_WRITE_GPIO_REG:
	234	/* FIXME: need GPIO support in the transport class */
	235	break;
	236
	237	case SMP_CONF_ROUTE_INFO:
	238	/* Can't implement; hosts have no routes */
	239	break;
	240
	241	case SMP_PHY_CONTROL:
c3a4d78c TH	242	req->resid_len -= 44;
	243	if ((int)req->resid_len < 0) {
	244	req->resid_len = 0;
b98e66fa JB	245	error = -EINVAL;
	246	goto out;
	247	}
c3a4d78c	248	rsp->resid_len -= 8;
b98e66fa JB	249	sas_phy_control(sas_ha, req_data[9], req_data[10],
	250	req_data[32] >> 4, req_data[33] >> 4,
	251	resp_data);
	252	break;
	253
	254	case SMP_PHY_TEST_FUNCTION:
	255	/* FIXME: should this be implemented? */
	256	break;
	257
	258	default:
	259	/* probably a 2.0 function */
	260	break;
	261	}
	262
	263	local_irq_disable();
	264	buf = kmap_atomic(bio_page(rsp->bio), KM_USER0) + bio_offset(rsp->bio);
b0790410	265	memcpy(buf, resp_data, blk_rq_bytes(rsp));
b98e66fa JB	266	flush_kernel_dcache_page(bio_page(rsp->bio));
	267	kunmap_atomic(buf - bio_offset(rsp->bio), KM_USER0);
	268	local_irq_enable();
b98e66fa JB	269
	270	out:
	271	kfree(req_data);
	272	kfree(resp_data);
	273	return error;
	274	}