/* fc.c: Generic Fibre Channel and FC4 SCSI driver. * * Copyright (C) 1997,1998,1999 Jakub Jelinek (jj@ultra.linux.cz) * Copyright (C) 1997,1998 Jirka Hanika (geo@ff.cuni.cz) * * There are two kinds of Fibre Channel adapters used in Linux. Either * the adapter is "smart" and does all FC bookkeeping by itself and * just presents a standard SCSI interface to the operating system * (that's e.g. the case with Qlogic FC cards), or leaves most of the FC * bookkeeping to the OS (e.g. soc, socal). Drivers for the former adapters * will look like normal SCSI drivers (with the exception of max_id will be * usually 127), the latter on the other side allows SCSI, IP over FC and other * protocols. This driver tree is for the latter adapters. * * This file should support both Point-to-Point and Arbitrated Loop topologies. * * Sources: *	Fibre Channel Physical & Signaling Interface (FC-PH), dpANS, 1994 *	dpANS Fibre Channel Protocol for SCSI (X3.269-199X), Rev. 012, 1995 *	Fibre Channel Arbitrated Loop (FC-AL), Rev. 4.5, 1995 *	Fibre Channel Private Loop SCSI Direct Attach (FC-PLDA), Rev. 2.1, 1997 */ #include <linux/module.h>#include <linux/kernel.h>#include <linux/jiffies.h>#include <linux/types.h>#include <linux/fcntl.h>#include <linux/interrupt.h>#include <linux/ptrace.h>#include <linux/ioport.h>#include <linux/in.h>#include <linux/slab.h>#include <linux/string.h>#include <linux/init.h> #include <asm/pgtable.h>#include <asm/irq.h>#include <asm/semaphore.h>#include "fcp_impl.h"#include <scsi/scsi_host.h> /* #define FCDEBUG */ #define fc_printk printk ("%s: ", fc->name); printk  #ifdef FCDEBUG#define FCD(x)  fc_printk x;#define FCND(x)	printk ("FC: "); printk x;#else#define FCD(x)#define FCND(x)#endif #ifdef __sparc__#define dma_alloc_consistent(d,s,p) sbus_alloc_consistent(d,s,p)#define dma_free_consistent(d,s,v,h) sbus_free_consistent(d,s,v,h)#define dma_map_single(d,v,s,dir) sbus_map_single(d,v,s,dir)#define dma_unmap_single(d,h,s,dir) sbus_unmap_single(d,h,s,dir)#define dma_map_sg(d,s,n,dir) sbus_map_sg(d,s,n,dir)#define dma_unmap_sg(d,s,n,dir) sbus_unmap_sg(d,s,n,dir)#else#define dma_alloc_consistent(d,s,p) pci_alloc_consistent(d,s,p)#define dma_free_consistent(d,s,v,h) pci_free_consistent(d,s,v,h)#define dma_map_single(d,v,s,dir) pci_map_single(d,v,s,dir)#define dma_unmap_single(d,h,s,dir) pci_unmap_single(d,h,s,dir)#define dma_map_sg(d,s,n,dir) pci_map_sg(d,s,n,dir)#define dma_unmap_sg(d,s,n,dir) pci_unmap_sg(d,s,n,dir)#endif							        #define FCP_CMND(SCpnt) ((fcp_cmnd *)&(SCpnt->SCp))#define FC_SCMND(SCpnt) ((fc_channel *)(SCpnt->device->host->hostdata[0]))#define SC_FCMND(fcmnd)	((struct scsi_cmnd *)((long)fcmnd - (long)&(((struct scsi_cmnd *)0)->SCp))) static int fcp_scsi_queue_it(fc_channel *, struct scsi_cmnd *, fcp_cmnd *, int);void fcp_queue_empty(fc_channel *); static void fcp_scsi_insert_queue (fc_channel *fc, fcp_cmnd *fcmd){	if (!fc->scsi_que) {		fc->scsi_que = fcmd;		fcmd->next = fcmd;		fcmd->prev = fcmd;	} else {		fc->scsi_que->prev->next = fcmd;		fcmd->prev = fc->scsi_que->prev;		fc->scsi_que->prev = fcmd;		fcmd->next = fc->scsi_que;	}} static void fcp_scsi_remove_queue (fc_channel *fc, fcp_cmnd *fcmd){	if (fcmd == fcmd->next) {		fc->scsi_que = NULL;		return;	}	if (fcmd == fc->scsi_que)		fc->scsi_que = fcmd->next;	fcmd->prev->next = fcmd->next;	fcmd->next->prev = fcmd->prev;} fc_channel *fc_channels = NULL; #define LSMAGIC	620829043typedef struct {	/* Must be first */	struct semaphore sem;	int magic;	int count;	logi *logi;	fcp_cmnd *fcmds;	atomic_t todo;	struct timer_list timer;	unsigned char grace[0];} ls; #define LSOMAGIC 654907799typedef struct {	/* Must be first */	struct semaphore sem;	int magic;	int count;	fcp_cmnd *fcmds;	atomic_t todo;	struct timer_list timer;} lso; #define LSEMAGIC 84482456typedef struct {	/* Must be first */	struct semaphore sem;	int magic;	int status;	struct timer_list timer;} lse; static void fcp_login_timeout(unsigned long data){	ls *l = (ls *)data;	FCND(("Login timeout\n"))	up(&l->sem);} static void fcp_login_done(fc_channel *fc, int i, int status){	fcp_cmnd *fcmd;	logi *plogi;	fc_hdr *fch;	ls *l = (ls *)fc->ls;		FCD(("Login done %d %d\n", i, status))	if (i < l->count) {		if (fc->state == FC_STATE_FPORT_OK) {			FCD(("Additional FPORT_OK received with status %d\n", status))			return;		}		switch (status) {		case FC_STATUS_OK: /* Oh, we found a fabric */		case FC_STATUS_P_RJT: /* Oh, we haven't found any */			fc->state = FC_STATE_FPORT_OK;			fcmd = l->fcmds + i;			plogi = l->logi + 3 * i;			dma_unmap_single (fc->dev, fcmd->cmd, 3 * sizeof(logi),					  DMA_BIDIRECTIONAL);			plogi->code = LS_PLOGI;			memcpy (&plogi->nport_wwn, &fc->wwn_nport, sizeof(fc_wwn));			memcpy (&plogi->node_wwn, &fc->wwn_node, sizeof(fc_wwn));			memcpy (&plogi->common, fc->common_svc, sizeof(common_svc_parm));			memcpy (&plogi->class1, fc->class_svcs, 3*sizeof(svc_parm));			fch = &fcmd->fch;			fcmd->token += l->count;			FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, fc->did);			FILL_FCHDR_SID(fch, fc->sid);#ifdef FCDEBUG			{				int i;				unsigned *x = (unsigned *)plogi;				printk ("logi: ");				for (i = 0; i < 21; i++)					printk ("%08x ", x[i]);				printk ("\n");			}#endif						fcmd->cmd = dma_map_single (fc->dev, plogi, 3 * sizeof(logi),						    DMA_BIDIRECTIONAL);			fcmd->rsp = fcmd->cmd + 2 * sizeof(logi);			if (fc->hw_enque (fc, fcmd))				printk ("FC: Cannot enque PLOGI packet on %s\n", fc->name);			break;		case FC_STATUS_ERR_OFFLINE:			fc->state = FC_STATE_MAYBEOFFLINE;			FCD (("FC is offline %d\n", l->grace[i]))			break;		default:			printk ("FLOGI failed for %s with status %d\n", fc->name, status);			/* Do some sort of error recovery here */			break;		}	} else {		i -= l->count;		if (fc->state != FC_STATE_FPORT_OK) {			FCD(("Unexpected N-PORT rsp received"))			return;		}		switch (status) {		case FC_STATUS_OK:			plogi = l->logi + 3 * i;			dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),					  DMA_BIDIRECTIONAL);			if (!fc->wwn_dest.lo && !fc->wwn_dest.hi) {				memcpy (&fc->wwn_dest, &plogi[1].node_wwn, sizeof(fc_wwn)); 				FCD(("Dest WWN %08x%08x\n", *(u32 *)&fc->wwn_dest, fc->wwn_dest.lo))			} else if (fc->wwn_dest.lo != plogi[1].node_wwn.lo ||				   fc->wwn_dest.hi != plogi[1].node_wwn.hi) {				printk ("%s: mismatch in wwns. Got %08x%08x, expected %08x%08x\n",					fc->name,					*(u32 *)&plogi[1].node_wwn, plogi[1].node_wwn.lo,					*(u32 *)&fc->wwn_dest, fc->wwn_dest.lo);			}			fc->state = FC_STATE_ONLINE;			printk ("%s: ONLINE\n", fc->name);			if (atomic_dec_and_test (&l->todo))				up(&l->sem);			break;		case FC_STATUS_ERR_OFFLINE:			fc->state = FC_STATE_OFFLINE;			dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),					  DMA_BIDIRECTIONAL);			printk ("%s: FC is offline\n", fc->name);			if (atomic_dec_and_test (&l->todo))				up(&l->sem);			break;		default:			printk ("PLOGI failed for %s with status %d\n", fc->name, status);			/* Do some sort of error recovery here */			break;		}	}} static void fcp_report_map_done(fc_channel *fc, int i, int status){	fcp_cmnd *fcmd;	fc_hdr *fch;	unsigned char j;	ls *l = (ls *)fc->ls;	fc_al_posmap *p;		FCD(("Report map done %d %d\n", i, status))	switch (status) {	case FC_STATUS_OK: /* Ok, let's have a fun on a loop */		dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),				  DMA_BIDIRECTIONAL);		p = (fc_al_posmap *)(l->logi + 3 * i);#ifdef FCDEBUG		{		u32 *u = (u32 *)p;		FCD(("%08x\n", u[0]))		u ++;		FCD(("%08x.%08x.%08x.%08x.%08x.%08x.%08x.%08x\n", u[0],u[1],u[2],u[3],u[4],u[5],u[6],u[7]))		}#endif				if ((p->magic & 0xffff0000) != FC_AL_LILP || !p->len) {			printk ("FC: Bad magic from REPORT_AL_MAP on %s - %08x\n", fc->name, p->magic);			fc->state = FC_STATE_OFFLINE;		} else {			fc->posmap = kzalloc(sizeof(fcp_posmap)+p->len, GFP_KERNEL);			if (!fc->posmap) {				printk("FC: Not enough memory, offlining channel\n");				fc->state = FC_STATE_OFFLINE;			} else {				int k;				/* FIXME: This is where SOCAL transfers our AL-PA.				   Keep it here till we found out what other cards do... */				fc->sid = (p->magic & 0xff);				for (i = 0; i < p->len; i++)					if (p->alpa[i] == fc->sid)						break;				k = p->len;				if (i == p->len)					i = 0;				else {					p->len--;					i++;				}				fc->posmap->len = p->len;				for (j = 0; j < p->len; j++) {					if (i == k) i = 0;					fc->posmap->list[j] = p->alpa[i++];				}				fc->state = FC_STATE_ONLINE;			}		}		printk ("%s: ONLINE\n", fc->name);		if (atomic_dec_and_test (&l->todo))			up(&l->sem);		break;	case FC_STATUS_POINTTOPOINT: /* We're Point-to-Point, no AL... */		FCD(("SID %d DID %d\n", fc->sid, fc->did))		fcmd = l->fcmds + i;		dma_unmap_single(fc->dev, fcmd->cmd, 3 * sizeof(logi),				 DMA_BIDIRECTIONAL);		fch = &fcmd->fch;		memset(l->logi + 3 * i, 0, 3 * sizeof(logi));		FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, FS_FABRIC_F_PORT);		FILL_FCHDR_SID(fch, 0);		FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);		FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);		FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);		fch->param = 0;		l->logi [3 * i].code = LS_FLOGI;		fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi),					    DMA_BIDIRECTIONAL);		fcmd->rsp = fcmd->cmd + sizeof(logi);		fcmd->cmdlen = sizeof(logi);		fcmd->rsplen = sizeof(logi);		fcmd->data = (dma_addr_t)NULL;		fcmd->class = FC_CLASS_SIMPLE;		fcmd->proto = TYPE_EXTENDED_LS;		if (fc->hw_enque (fc, fcmd))			printk ("FC: Cannot enque FLOGI packet on %s\n", fc->name);		break;	case FC_STATUS_ERR_OFFLINE:		fc->state = FC_STATE_MAYBEOFFLINE;		FCD (("FC is offline %d\n", l->grace[i]))		break;	default:		printk ("FLOGI failed for %s with status %d\n", fc->name, status);		/* Do some sort of error recovery here */		break;	}} void fcp_register(fc_channel *fc, u8 type, int unregister){	int size, i;	int slots = (fc->can_queue * 3) >> 1; 	FCND(("Going to %sregister\n", unregister ? "un" : "")) 	if (type == TYPE_SCSI_FCP) {		if (!unregister) {			fc->scsi_cmd_pool = (fcp_cmd *)				dma_alloc_consistent (fc->dev,						      slots * (sizeof (fcp_cmd) + fc->rsp_size),						      &fc->dma_scsi_cmd);			fc->scsi_rsp_pool = (char *)(fc->scsi_cmd_pool + slots);			fc->dma_scsi_rsp = fc->dma_scsi_cmd + slots * sizeof (fcp_cmd);			fc->scsi_bitmap_end = (slots + 63) & ~63;			size = fc->scsi_bitmap_end / 8;			fc->scsi_bitmap = kzalloc (size, GFP_KERNEL);			set_bit (0, fc->scsi_bitmap);			for (i = fc->can_queue; i < fc->scsi_bitmap_end; i++)				set_bit (i, fc->scsi_bitmap);			fc->scsi_free = fc->can_queue;			fc->cmd_slots = kzalloc(slots * sizeof(fcp_cmnd*), GFP_KERNEL);			fc->abort_count = 0;		} else {			fc->scsi_name[0] = 0;			kfree (fc->scsi_bitmap);			kfree (fc->cmd_slots);			FCND(("Unregistering\n"));#if 0			if (fc->rst_pkt) {				if (fc->rst_pkt->eh_state == SCSI_STATE_UNUSED)					kfree(fc->rst_pkt);				else {					/* Can't happen. Some memory would be lost. */					printk("FC: Reset in progress. Now?!");				}			}#endif			FCND(("Unregistered\n"));		}	} else		printk ("FC: %segistering unknown type %02x\n", unregister ? "Unr" : "R", type);} static void fcp_scsi_done(struct scsi_cmnd *SCpnt); static inline void fcp_scsi_receive(fc_channel *fc, int token, int status, fc_hdr *fch){	fcp_cmnd *fcmd;	fcp_rsp  *rsp;	int host_status;	struct scsi_cmnd *SCpnt;	int sense_len;	int rsp_status; 	fcmd = fc->cmd_slots[token];	if (!fcmd) return;	rsp = (fcp_rsp *) (fc->scsi_rsp_pool + fc->rsp_size * token);	SCpnt = SC_FCMND(fcmd); 	if (SCpnt->done != fcp_scsi_done)		return; 	rsp_status = rsp->fcp_status;	FCD(("rsp_status %08x status %08x\n", rsp_status, status))	switch (status) {	case FC_STATUS_OK:		host_status=DID_OK;				if (rsp_status & FCP_STATUS_RESID) {#ifdef FCDEBUG			FCD(("Resid %d\n", rsp->fcp_resid))			{				fcp_cmd *cmd = fc->scsi_cmd_pool + token;				int i;								printk ("Command ");				for (i = 0; i < sizeof(fcp_cmd); i+=4)					printk ("%08x ", *(u32 *)(((char *)cmd)+i));				printk ("\nResponse ");				for (i = 0; i < fc->rsp_size; i+=4)					printk ("%08x ", *(u32 *)(((char *)rsp)+i));				printk ("\n");			}#endif					} 		if (rsp_status & FCP_STATUS_SENSE_LEN) {			sense_len = rsp->fcp_sense_len;			if (sense_len > sizeof(SCpnt->sense_buffer)) sense_len = sizeof(SCpnt->sense_buffer);			memcpy(SCpnt->sense_buffer, ((char *)(rsp+1)), sense_len);		}				if (fcmd->data) {			if (SCpnt->use_sg)				dma_unmap_sg(fc->dev, (struct scatterlist *)SCpnt->request_buffer,						SCpnt->use_sg,						SCpnt->sc_data_direction);			else				dma_unmap_single(fc->dev, fcmd->data, SCpnt->request_bufflen,						 SCpnt->sc_data_direction);		}		break;	default:		host_status=DID_ERROR; /* FIXME */		FCD(("Wrong FC status %d for token %d\n", status, token))		break;	} 	if (status_byte(rsp_status) == QUEUE_FULL) {		printk ("%s: (%d,%d) Received rsp_status 0x%x\n", fc->name, SCpnt->device->channel, SCpnt->device->id, rsp_status);	}			SCpnt->result = (host_status << 16) | (rsp_status & 0xff);#ifdef FCDEBUG		if (host_status || SCpnt->result || rsp_status) printk("FC: host_status %d, packet status %d\n",			host_status, SCpnt->result);#endif	SCpnt->done = fcmd->done;	fcmd->done=NULL;	clear_bit(token, fc->scsi_bitmap);	fc->scsi_free++;	FCD(("Calling scsi_done with %08x\n", SCpnt->result))	SCpnt->scsi_done(SCpnt);} void fcp_receive_solicited(fc_channel *fc, int proto, int token, int status, fc_hdr *fch){	int magic;	FCD(("receive_solicited %d %d %d\n", proto, token, status))	switch (proto) {	case TYPE_SCSI_FCP:		fcp_scsi_receive(fc, token, status, fch); break;	case TYPE_EXTENDED_LS:	case PROTO_REPORT_AL_MAP:		magic = 0;		if (fc->ls)			magic = ((ls *)(fc->ls))->magic;		if (magic == LSMAGIC) {			ls *l = (ls *)fc->ls;			int i = (token >= l->count) ? token - l->count : token; 			/* Let's be sure */			if ((unsigned)i < l->count && l->fcmds[i].fc == fc) {				if (proto == TYPE_EXTENDED_LS)					fcp_login_done(fc, token, status);				else					fcp_report_map_done(fc, token, status);				break;			}		}		FCD(("fc %p fc->ls %p fc->cmd_slots %p\n", fc, fc->ls, fc->cmd_slots))		if (proto == TYPE_EXTENDED_LS && !fc->ls && fc->cmd_slots) {			fcp_cmnd *fcmd;						fcmd = fc->cmd_slots[token];			if (fcmd && fcmd->ls && ((ls *)(fcmd->ls))->magic == LSEMAGIC) {				lse *l = (lse *)fcmd->ls;								l->status = status;				up (&l->sem);			}		}		break;

Lines 1–500 of 1157. Load more