patch-2.1.81 linux/drivers/scsi/pluto.c

• Lines: 314
• Date: Wed Jan 21 17:04:39 1998
• Orig file: v2.1.80/linux/drivers/scsi/pluto.c
• Orig date: Wed Dec 31 16:00:00 1969

diff -u --recursive --new-file v2.1.80/linux/drivers/scsi/pluto.c linux/drivers/scsi/pluto.c
@@ -0,0 +1,313 @@
+/* pluto.c: SparcSTORAGE Array SCSI host adapter driver.
+ *
+ * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
+ */
+
+#include <linux/kernel.h>
+#include <linux/delay.h>
+#include <linux/types.h>
+#include <linux/string.h>
+#include <linux/malloc.h>
+#include <linux/blk.h>
+#include <linux/proc_fs.h>
+#include <linux/stat.h>
+#include <linux/init.h>
+
+#include <asm/irq.h>
+
+#include "scsi.h"
+#include "hosts.h"
+#include "../fc4/fcp_scsi.h"
+#include "pluto.h"
+
+#include <linux/module.h>
+
+/* #define PLUTO_DEBUG */
+
+#define pluto_printk printk ("PLUTO %s: ", fc->name); printk
+
+#ifdef PLUTO_DEBUG
+#define PLD(x)  pluto_printk x;
+#define PLND(x) printk ("PLUTO: "); printk x;
+#else
+#define PLD(x)
+#define PLND(x)
+#endif
+
+struct proc_dir_entry proc_scsi_pluto = {
+	PROC_SCSI_PLUTO, 5, "pluto",
+	S_IFDIR | S_IRUGO | S_IXUGO, 2
+};
+
+static struct ctrl_inquiry {
+	struct Scsi_Host host;
+	struct pluto pluto;
+	Scsi_Cmnd cmd;
+	char inquiry[256];
+	fc_channel *fc;
+} *fcs __initdata;
+static int fcscount __initdata;
+static atomic_t fcss __initdata;
+static struct timer_list fc_timer __initdata = { 0 };
+struct semaphore fc_sem __initdata = MUTEX_LOCKED;
+
+static int pluto_encode_addr(Scsi_Cmnd *SCpnt, u16 *addr);
+
+__initfunc(static void pluto_detect_timeout(unsigned long data))
+{
+	PLND(("Timeout\n"))
+	up(&fc_sem);
+}
+
+__initfunc(static void pluto_detect_done(Scsi_Cmnd *SCpnt))
+{
+	/* Do nothing */
+}
+
+__initfunc(static void pluto_detect_scsi_done(Scsi_Cmnd *SCpnt))
+{
+	SCpnt->request.rq_status = RQ_SCSI_DONE;
+	PLND(("Detect done %08lx\n", (long)SCpnt))
+	if (atomic_dec_and_test (&fcss))
+		up(&fc_sem);
+}
+
+static void pluto_select_queue_depths(struct Scsi_Host *host, Scsi_Device *devlist)
+{
+	Scsi_Device *device;
+	
+	for (device = devlist; device; device = device->next) {
+		if (device->host != host) continue;
+		if (device->tagged_supported)
+			device->queue_depth = /* 254 */ 8;
+		else
+			device->queue_depth = 2;
+	}
+}
+
+/* Detect all SSAs attached to the machine.
+   To be fast, do it on all online FC channels at the same time. */
+__initfunc(int pluto_detect(Scsi_Host_Template *tpnt))
+{
+	int i, retry, nplutos;
+	fc_channel *fc;
+	Scsi_Device dev;
+
+	tpnt->proc_dir = &proc_scsi_pluto;
+	fcscount = 0;
+	for_each_online_fc_channel(fc)
+		fcscount++;
+	PLND(("%d channels online\n", fcscount))
+	if (!fcscount)
+		return 0;
+	fcs = (struct ctrl_inquiry *) scsi_init_malloc (sizeof (struct ctrl_inquiry) * fcscount, GFP_DMA);
+	if (!fcs) {
+		printk ("PLUTO: Not enough memory to probe\n");
+		return 0;
+	}
+	
+	memset (fcs, 0, sizeof (struct ctrl_inquiry) * fcscount);
+	memset (&dev, 0, sizeof(dev));
+	atomic_set (&fcss, fcscount);
+	fc_timer.function = pluto_detect_timeout;
+	
+	i = 0;
+	for_each_online_fc_channel(fc) {
+		Scsi_Cmnd *SCpnt;
+		struct Scsi_Host *host;
+		struct pluto *pluto;
+		
+		if (i == fcscount) break;
+		
+		PLD(("trying to find SSA\n"))
+
+		/* If this is already registered to some other SCSI host, then it cannot be pluto */
+		if (fc->scsi_name[0]) continue;
+		memcpy (fc->scsi_name, "SSA", 4);
+		
+		fcs[i].fc = fc;
+		
+		fc->can_queue = PLUTO_CAN_QUEUE;
+		fc->rsp_size = 64;
+		fc->encode_addr = pluto_encode_addr;
+		
+		fc->fcp_register(fc, TYPE_SCSI_FCP, 0);
+	
+		SCpnt = &(fcs[i].cmd);
+		host = &(fcs[i].host);
+		pluto = (struct pluto *)host->hostdata;
+		
+		pluto->fc = fc;
+	
+		SCpnt->host = host;
+		SCpnt->cmnd[0] = INQUIRY;
+		SCpnt->cmnd[4] = 255;
+		
+		/* FC layer requires this, so that SCpnt->device->tagged_supported is initially 0 */
+		SCpnt->device = &dev;
+		
+		SCpnt->cmd_len = COMMAND_SIZE(INQUIRY);
+	
+		SCpnt->request.rq_status = RQ_SCSI_BUSY;
+		
+		SCpnt->done = pluto_detect_done;
+		SCpnt->bufflen = 256;
+		SCpnt->buffer = fcs[i].inquiry;
+		SCpnt->request_bufflen = 256;
+		SCpnt->request_buffer = fcs[i].inquiry;
+		PLD(("set up %d %08lx\n", i, (long)SCpnt))
+		i++;
+	}
+	
+	for (retry = 0; retry < 5; retry++) {
+		for (i = 0; i < fcscount; i++) {
+			if (!fcs[i].fc) break;
+			if (fcs[i].cmd.request.rq_status != RQ_SCSI_DONE) {
+				disable_irq(fcs[i].fc->irq);
+				PLND(("queuecommand %d %d\n", retry, i))
+				fcp_scsi_queuecommand (&(fcs[i].cmd), 
+					pluto_detect_scsi_done);
+				enable_irq(fcs[i].fc->irq);
+			}
+		}
+	    
+		fc_timer.expires = jiffies + 10 * HZ;
+		add_timer(&fc_timer);
+		
+		down(&fc_sem);
+		PLND(("Woken up\n"))
+		if (!atomic_read(&fcss))
+			break; /* All fc channels have answered us */
+	}
+	del_timer(&fc_timer);
+
+	PLND(("Finished search\n"))
+	for (i = 0, nplutos = 0; i < fcscount; i++) {
+		Scsi_Cmnd *SCpnt;
+		
+		if (!(fc = fcs[i].fc)) break;
+	
+		SCpnt = &(fcs[i].cmd);
+		
+		/* Let FC mid-level free allocated resources */
+		SCpnt->done (SCpnt);
+		
+		if (!SCpnt->result) {
+			struct pluto_inquiry *inq;
+			struct pluto *pluto;
+			struct Scsi_Host *host;
+			
+			inq = (struct pluto_inquiry *)fcs[i].inquiry;
+
+			if ((inq->dtype & 0x1f) == TYPE_PROCESSOR &&
+			    !strncmp (inq->vendor_id, "SUN", 3) &&
+			    !strncmp (inq->product_id, "SSA", 3)) {
+				char *p;
+				long *ages;
+				
+				ages = kmalloc (((inq->channels + 1) * inq->targets) * sizeof(long), GFP_KERNEL);
+				if (!ages) continue;
+				
+				host = scsi_register (tpnt, sizeof (struct pluto));
+				if (!host) panic ("Cannot register PLUTO host\n");
+				
+				nplutos++;
+				
+				pluto = (struct pluto *)host->hostdata;
+				
+				host->max_id = inq->targets;
+				host->max_channel = inq->channels;
+				host->irq = fc->irq;
+				
+				host->select_queue_depths = pluto_select_queue_depths;
+				
+				fc->channels = inq->channels + 1;
+				fc->targets = inq->targets;
+				fc->ages = ages;
+				memset (ages, 0, ((inq->channels + 1) * inq->targets) * sizeof(long));
+				
+				pluto->fc = fc;
+				memcpy (pluto->rev_str, inq->revision, 4);
+				pluto->rev_str[4] = 0;
+				p = strchr (pluto->rev_str, ' ');
+				if (p) *p = 0;
+				memcpy (pluto->fw_rev_str, inq->fw_revision, 4);
+				pluto->fw_rev_str[4] = 0;
+				p = strchr (pluto->fw_rev_str, ' ');
+				if (p) *p = 0;
+				memcpy (pluto->serial_str, inq->serial, 12);
+				pluto->serial_str[12] = 0;
+				p = strchr (pluto->serial_str, ' ');
+				if (p) *p = 0;
+				
+				PLD(("Found SSA rev %s fw rev %s serial %s %dx%d\n", pluto->rev_str, pluto->fw_rev_str, pluto->serial_str, host->max_channel, host->max_id))
+			} else
+				fc->fcp_register(fc, TYPE_SCSI_FCP, 1);
+		} else
+			fc->fcp_register(fc, TYPE_SCSI_FCP, 1);
+	}
+	scsi_init_free((char *)fcs, sizeof (struct ctrl_inquiry) * fcscount);
+	if (nplutos)
+		printk ("PLUTO: Total of %d SparcSTORAGE Arrays found\n", nplutos);
+	return nplutos;
+}
+
+int pluto_release(struct Scsi_Host *host)
+{
+	struct pluto *pluto = (struct pluto *)host->hostdata;
+	fc_channel *fc = pluto->fc;
+	
+	fc->fcp_register(fc, TYPE_SCSI_FCP, 1);
+	kfree (fc->ages);
+	return 0;
+}
+
+const char *pluto_info(struct Scsi_Host *host)
+{
+	static char buf[80];
+	struct pluto *pluto = (struct pluto *) host->hostdata;
+
+	sprintf(buf, "SUN SparcSTORAGE Array %s fw %s serial %s %dx%d on %s",
+		pluto->rev_str, pluto->fw_rev_str, pluto->serial_str,
+		host->max_channel, host->max_id, pluto->fc->name);
+	return buf;
+}
+
+/* SSA uses this FC4S addressing:
+   switch (addr[0])
+   {
+   case 0: CONTROLLER - All of addr[1]..addr[3] has to be 0
+   case 1: SINGLE DISK - addr[1] channel, addr[2] id, addr[3] 0
+   case 2: DISK GROUP - ???
+   }
+   
+   So that SCSI mid-layer can access to these, we reserve
+   channel 0 id 0 lun 0 for CONTROLLER
+   and channels 1 .. max_channel are normal single disks.
+ */
+static int pluto_encode_addr(Scsi_Cmnd *SCpnt, u16 *addr)
+{
+	PLND(("encode addr %d %d %d\n", SCpnt->channel, SCpnt->target, SCpnt->cmnd[1] & 0xe0))
+	/* We don't support LUNs */
+	if (SCpnt->cmnd[1] & 0xe0) return -EINVAL;
+	if (!SCpnt->channel) {
+		if (SCpnt->target) return -EINVAL;
+		memset (addr, 0, 4 * sizeof(u16));
+	} else {
+		addr[0] = 1;
+		addr[1] = SCpnt->channel - 1;
+		addr[2] = SCpnt->target;
+		addr[3] = 0;
+	}
+	PLND(("trying %04x%04x%04x%04x\n", addr[0], addr[1], addr[2], addr[3]))
+	return 0;
+}
+
+#ifdef MODULE
+
+Scsi_Host_Template driver_template = PLUTO;
+
+#include "scsi_module.c"
+
+EXPORT_NO_SYMBOLS;
+#endif /* MODULE */