[SCSI] mpt fusion: fix two potential mem leaks
[linux-2.6] / drivers / fc4 / fc.c
1 /* fc.c: Generic Fibre Channel and FC4 SCSI driver.
2  *
3  * Copyright (C) 1997,1998,1999 Jakub Jelinek (jj@ultra.linux.cz)
4  * Copyright (C) 1997,1998 Jirka Hanika (geo@ff.cuni.cz)
5  *
6  * There are two kinds of Fibre Channel adapters used in Linux. Either
7  * the adapter is "smart" and does all FC bookkeeping by itself and
8  * just presents a standard SCSI interface to the operating system
9  * (that's e.g. the case with Qlogic FC cards), or leaves most of the FC
10  * bookkeeping to the OS (e.g. soc, socal). Drivers for the former adapters
11  * will look like normal SCSI drivers (with the exception of max_id will be
12  * usually 127), the latter on the other side allows SCSI, IP over FC and other
13  * protocols. This driver tree is for the latter adapters.
14  *
15  * This file should support both Point-to-Point and Arbitrated Loop topologies.
16  *
17  * Sources:
18  *      Fibre Channel Physical & Signaling Interface (FC-PH), dpANS, 1994
19  *      dpANS Fibre Channel Protocol for SCSI (X3.269-199X), Rev. 012, 1995
20  *      Fibre Channel Arbitrated Loop (FC-AL), Rev. 4.5, 1995
21  *      Fibre Channel Private Loop SCSI Direct Attach (FC-PLDA), Rev. 2.1, 1997
22  */
23
24 #include <linux/module.h>
25 #include <linux/kernel.h>
26 #include <linux/jiffies.h>
27 #include <linux/types.h>
28 #include <linux/fcntl.h>
29 #include <linux/interrupt.h>
30 #include <linux/ptrace.h>
31 #include <linux/ioport.h>
32 #include <linux/in.h>
33 #include <linux/slab.h>
34 #include <linux/string.h>
35 #include <linux/init.h>
36
37 #include <asm/pgtable.h>
38 #include <asm/irq.h>
39 #include <asm/semaphore.h>
40 #include "fcp_impl.h"
41 #include <scsi/scsi_host.h>
42
43 /* #define FCDEBUG */
44
45 #define fc_printk printk ("%s: ", fc->name); printk 
46
47 #ifdef FCDEBUG
48 #define FCD(x)  fc_printk x;
49 #define FCND(x) printk ("FC: "); printk x;
50 #else
51 #define FCD(x)
52 #define FCND(x)
53 #endif
54
55 #ifdef __sparc__
56 #define dma_alloc_consistent(d,s,p) sbus_alloc_consistent(d,s,p)
57 #define dma_free_consistent(d,s,v,h) sbus_free_consistent(d,s,v,h)
58 #define dma_map_single(d,v,s,dir) sbus_map_single(d,v,s,dir)
59 #define dma_unmap_single(d,h,s,dir) sbus_unmap_single(d,h,s,dir)
60 #define dma_map_sg(d,s,n,dir) sbus_map_sg(d,s,n,dir)
61 #define dma_unmap_sg(d,s,n,dir) sbus_unmap_sg(d,s,n,dir)
62 #else
63 #define dma_alloc_consistent(d,s,p) pci_alloc_consistent(d,s,p)
64 #define dma_free_consistent(d,s,v,h) pci_free_consistent(d,s,v,h)
65 #define dma_map_single(d,v,s,dir) pci_map_single(d,v,s,dir)
66 #define dma_unmap_single(d,h,s,dir) pci_unmap_single(d,h,s,dir)
67 #define dma_map_sg(d,s,n,dir) pci_map_sg(d,s,n,dir)
68 #define dma_unmap_sg(d,s,n,dir) pci_unmap_sg(d,s,n,dir)
69 #endif                                                         
70
71 #define FCP_CMND(SCpnt) ((fcp_cmnd *)&(SCpnt->SCp))
72 #define FC_SCMND(SCpnt) ((fc_channel *)(SCpnt->device->host->hostdata[0]))
73 #define SC_FCMND(fcmnd) ((struct scsi_cmnd *)((long)fcmnd - (long)&(((struct scsi_cmnd *)0)->SCp)))
74
75 static int fcp_scsi_queue_it(fc_channel *, struct scsi_cmnd *, fcp_cmnd *, int);
76 void fcp_queue_empty(fc_channel *);
77
78 static void fcp_scsi_insert_queue (fc_channel *fc, fcp_cmnd *fcmd)
79 {
80         if (!fc->scsi_que) {
81                 fc->scsi_que = fcmd;
82                 fcmd->next = fcmd;
83                 fcmd->prev = fcmd;
84         } else {
85                 fc->scsi_que->prev->next = fcmd;
86                 fcmd->prev = fc->scsi_que->prev;
87                 fc->scsi_que->prev = fcmd;
88                 fcmd->next = fc->scsi_que;
89         }
90 }
91
92 static void fcp_scsi_remove_queue (fc_channel *fc, fcp_cmnd *fcmd)
93 {
94         if (fcmd == fcmd->next) {
95                 fc->scsi_que = NULL;
96                 return;
97         }
98         if (fcmd == fc->scsi_que)
99                 fc->scsi_que = fcmd->next;
100         fcmd->prev->next = fcmd->next;
101         fcmd->next->prev = fcmd->prev;
102 }
103
104 fc_channel *fc_channels = NULL;
105
106 #define LSMAGIC 620829043
107 typedef struct {
108         /* Must be first */
109         struct semaphore sem;
110         int magic;
111         int count;
112         logi *logi;
113         fcp_cmnd *fcmds;
114         atomic_t todo;
115         struct timer_list timer;
116         unsigned char grace[0];
117 } ls;
118
119 #define LSOMAGIC 654907799
120 typedef struct {
121         /* Must be first */
122         struct semaphore sem;
123         int magic;
124         int count;
125         fcp_cmnd *fcmds;
126         atomic_t todo;
127         struct timer_list timer;
128 } lso;
129
130 #define LSEMAGIC 84482456
131 typedef struct {
132         /* Must be first */
133         struct semaphore sem;
134         int magic;
135         int status;
136         struct timer_list timer;
137 } lse;
138
139 static void fcp_login_timeout(unsigned long data)
140 {
141         ls *l = (ls *)data;
142         FCND(("Login timeout\n"))
143         up(&l->sem);
144 }
145
146 static void fcp_login_done(fc_channel *fc, int i, int status)
147 {
148         fcp_cmnd *fcmd;
149         logi *plogi;
150         fc_hdr *fch;
151         ls *l = (ls *)fc->ls;
152         
153         FCD(("Login done %d %d\n", i, status))
154         if (i < l->count) {
155                 if (fc->state == FC_STATE_FPORT_OK) {
156                         FCD(("Additional FPORT_OK received with status %d\n", status))
157                         return;
158                 }
159                 switch (status) {
160                 case FC_STATUS_OK: /* Oh, we found a fabric */
161                 case FC_STATUS_P_RJT: /* Oh, we haven't found any */
162                         fc->state = FC_STATE_FPORT_OK;
163                         fcmd = l->fcmds + i;
164                         plogi = l->logi + 3 * i;
165                         dma_unmap_single (fc->dev, fcmd->cmd, 3 * sizeof(logi),
166                                           DMA_BIDIRECTIONAL);
167                         plogi->code = LS_PLOGI;
168                         memcpy (&plogi->nport_wwn, &fc->wwn_nport, sizeof(fc_wwn));
169                         memcpy (&plogi->node_wwn, &fc->wwn_node, sizeof(fc_wwn));
170                         memcpy (&plogi->common, fc->common_svc, sizeof(common_svc_parm));
171                         memcpy (&plogi->class1, fc->class_svcs, 3*sizeof(svc_parm));
172                         fch = &fcmd->fch;
173                         fcmd->token += l->count;
174                         FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, fc->did);
175                         FILL_FCHDR_SID(fch, fc->sid);
176 #ifdef FCDEBUG
177                         {
178                                 int i;
179                                 unsigned *x = (unsigned *)plogi;
180                                 printk ("logi: ");
181                                 for (i = 0; i < 21; i++)
182                                         printk ("%08x ", x[i]);
183                                 printk ("\n");
184                         }
185 #endif                  
186                         fcmd->cmd = dma_map_single (fc->dev, plogi, 3 * sizeof(logi),
187                                                     DMA_BIDIRECTIONAL);
188                         fcmd->rsp = fcmd->cmd + 2 * sizeof(logi);
189                         if (fc->hw_enque (fc, fcmd))
190                                 printk ("FC: Cannot enque PLOGI packet on %s\n", fc->name);
191                         break;
192                 case FC_STATUS_ERR_OFFLINE:
193                         fc->state = FC_STATE_MAYBEOFFLINE;
194                         FCD (("FC is offline %d\n", l->grace[i]))
195                         break;
196                 default:
197                         printk ("FLOGI failed for %s with status %d\n", fc->name, status);
198                         /* Do some sort of error recovery here */
199                         break;
200                 }
201         } else {
202                 i -= l->count;
203                 if (fc->state != FC_STATE_FPORT_OK) {
204                         FCD(("Unexpected N-PORT rsp received"))
205                         return;
206                 }
207                 switch (status) {
208                 case FC_STATUS_OK:
209                         plogi = l->logi + 3 * i;
210                         dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),
211                                           DMA_BIDIRECTIONAL);
212                         if (!fc->wwn_dest.lo && !fc->wwn_dest.hi) {
213                                 memcpy (&fc->wwn_dest, &plogi[1].node_wwn, sizeof(fc_wwn)); 
214                                 FCD(("Dest WWN %08x%08x\n", *(u32 *)&fc->wwn_dest, fc->wwn_dest.lo))
215                         } else if (fc->wwn_dest.lo != plogi[1].node_wwn.lo ||
216                                    fc->wwn_dest.hi != plogi[1].node_wwn.hi) {
217                                 printk ("%s: mismatch in wwns. Got %08x%08x, expected %08x%08x\n",
218                                         fc->name,
219                                         *(u32 *)&plogi[1].node_wwn, plogi[1].node_wwn.lo,
220                                         *(u32 *)&fc->wwn_dest, fc->wwn_dest.lo);
221                         }
222                         fc->state = FC_STATE_ONLINE;
223                         printk ("%s: ONLINE\n", fc->name);
224                         if (atomic_dec_and_test (&l->todo))
225                                 up(&l->sem);
226                         break;
227                 case FC_STATUS_ERR_OFFLINE:
228                         fc->state = FC_STATE_OFFLINE;
229                         dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),
230                                           DMA_BIDIRECTIONAL);
231                         printk ("%s: FC is offline\n", fc->name);
232                         if (atomic_dec_and_test (&l->todo))
233                                 up(&l->sem);
234                         break;
235                 default:
236                         printk ("PLOGI failed for %s with status %d\n", fc->name, status);
237                         /* Do some sort of error recovery here */
238                         break;
239                 }
240         }
241 }
242
243 static void fcp_report_map_done(fc_channel *fc, int i, int status)
244 {
245         fcp_cmnd *fcmd;
246         fc_hdr *fch;
247         unsigned char j;
248         ls *l = (ls *)fc->ls;
249         fc_al_posmap *p;
250         
251         FCD(("Report map done %d %d\n", i, status))
252         switch (status) {
253         case FC_STATUS_OK: /* Ok, let's have a fun on a loop */
254                 dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi),
255                                   DMA_BIDIRECTIONAL);
256                 p = (fc_al_posmap *)(l->logi + 3 * i);
257 #ifdef FCDEBUG
258                 {
259                 u32 *u = (u32 *)p;
260                 FCD(("%08x\n", u[0]))
261                 u ++;
262                 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]))
263                 }
264 #endif          
265                 if ((p->magic & 0xffff0000) != FC_AL_LILP || !p->len) {
266                         printk ("FC: Bad magic from REPORT_AL_MAP on %s - %08x\n", fc->name, p->magic);
267                         fc->state = FC_STATE_OFFLINE;
268                 } else {
269                         fc->posmap = kzalloc(sizeof(fcp_posmap)+p->len, GFP_KERNEL);
270                         if (!fc->posmap) {
271                                 printk("FC: Not enough memory, offlining channel\n");
272                                 fc->state = FC_STATE_OFFLINE;
273                         } else {
274                                 int k;
275                                 /* FIXME: This is where SOCAL transfers our AL-PA.
276                                    Keep it here till we found out what other cards do... */
277                                 fc->sid = (p->magic & 0xff);
278                                 for (i = 0; i < p->len; i++)
279                                         if (p->alpa[i] == fc->sid)
280                                                 break;
281                                 k = p->len;
282                                 if (i == p->len)
283                                         i = 0;
284                                 else {
285                                         p->len--;
286                                         i++;
287                                 }
288                                 fc->posmap->len = p->len;
289                                 for (j = 0; j < p->len; j++) {
290                                         if (i == k) i = 0;
291                                         fc->posmap->list[j] = p->alpa[i++];
292                                 }
293                                 fc->state = FC_STATE_ONLINE;
294                         }
295                 }
296                 printk ("%s: ONLINE\n", fc->name);
297                 if (atomic_dec_and_test (&l->todo))
298                         up(&l->sem);
299                 break;
300         case FC_STATUS_POINTTOPOINT: /* We're Point-to-Point, no AL... */
301                 FCD(("SID %d DID %d\n", fc->sid, fc->did))
302                 fcmd = l->fcmds + i;
303                 dma_unmap_single(fc->dev, fcmd->cmd, 3 * sizeof(logi),
304                                  DMA_BIDIRECTIONAL);
305                 fch = &fcmd->fch;
306                 memset(l->logi + 3 * i, 0, 3 * sizeof(logi));
307                 FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, FS_FABRIC_F_PORT);
308                 FILL_FCHDR_SID(fch, 0);
309                 FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);
310                 FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);
311                 FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);
312                 fch->param = 0;
313                 l->logi [3 * i].code = LS_FLOGI;
314                 fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi),
315                                             DMA_BIDIRECTIONAL);
316                 fcmd->rsp = fcmd->cmd + sizeof(logi);
317                 fcmd->cmdlen = sizeof(logi);
318                 fcmd->rsplen = sizeof(logi);
319                 fcmd->data = (dma_addr_t)NULL;
320                 fcmd->class = FC_CLASS_SIMPLE;
321                 fcmd->proto = TYPE_EXTENDED_LS;
322                 if (fc->hw_enque (fc, fcmd))
323                         printk ("FC: Cannot enque FLOGI packet on %s\n", fc->name);
324                 break;
325         case FC_STATUS_ERR_OFFLINE:
326                 fc->state = FC_STATE_MAYBEOFFLINE;
327                 FCD (("FC is offline %d\n", l->grace[i]))
328                 break;
329         default:
330                 printk ("FLOGI failed for %s with status %d\n", fc->name, status);
331                 /* Do some sort of error recovery here */
332                 break;
333         }
334 }
335
336 void fcp_register(fc_channel *fc, u8 type, int unregister)
337 {
338         int size, i;
339         int slots = (fc->can_queue * 3) >> 1;
340
341         FCND(("Going to %sregister\n", unregister ? "un" : ""))
342
343         if (type == TYPE_SCSI_FCP) {
344                 if (!unregister) {
345                         fc->scsi_cmd_pool = (fcp_cmd *)
346                                 dma_alloc_consistent (fc->dev,
347                                                       slots * (sizeof (fcp_cmd) + fc->rsp_size),
348                                                       &fc->dma_scsi_cmd);
349                         fc->scsi_rsp_pool = (char *)(fc->scsi_cmd_pool + slots);
350                         fc->dma_scsi_rsp = fc->dma_scsi_cmd + slots * sizeof (fcp_cmd);
351                         fc->scsi_bitmap_end = (slots + 63) & ~63;
352                         size = fc->scsi_bitmap_end / 8;
353                         fc->scsi_bitmap = kzalloc (size, GFP_KERNEL);
354                         set_bit (0, fc->scsi_bitmap);
355                         for (i = fc->can_queue; i < fc->scsi_bitmap_end; i++)
356                                 set_bit (i, fc->scsi_bitmap);
357                         fc->scsi_free = fc->can_queue;
358                         fc->cmd_slots = kzalloc(slots * sizeof(fcp_cmnd*), GFP_KERNEL);
359                         fc->abort_count = 0;
360                 } else {
361                         fc->scsi_name[0] = 0;
362                         kfree (fc->scsi_bitmap);
363                         kfree (fc->cmd_slots);
364                         FCND(("Unregistering\n"));
365 #if 0
366                         if (fc->rst_pkt) {
367                                 if (fc->rst_pkt->eh_state == SCSI_STATE_UNUSED)
368                                         kfree(fc->rst_pkt);
369                                 else {
370                                         /* Can't happen. Some memory would be lost. */
371                                         printk("FC: Reset in progress. Now?!");
372                                 }
373                         }
374 #endif
375                         FCND(("Unregistered\n"));
376                 }
377         } else
378                 printk ("FC: %segistering unknown type %02x\n", unregister ? "Unr" : "R", type);
379 }
380
381 static void fcp_scsi_done(struct scsi_cmnd *SCpnt);
382
383 static inline void fcp_scsi_receive(fc_channel *fc, int token, int status, fc_hdr *fch)
384 {
385         fcp_cmnd *fcmd;
386         fcp_rsp  *rsp;
387         int host_status;
388         struct scsi_cmnd *SCpnt;
389         int sense_len;
390         int rsp_status;
391
392         fcmd = fc->cmd_slots[token];
393         if (!fcmd) return;
394         rsp = (fcp_rsp *) (fc->scsi_rsp_pool + fc->rsp_size * token);
395         SCpnt = SC_FCMND(fcmd);
396
397         if (SCpnt->done != fcp_scsi_done)
398                 return;
399
400         rsp_status = rsp->fcp_status;
401         FCD(("rsp_status %08x status %08x\n", rsp_status, status))
402         switch (status) {
403         case FC_STATUS_OK:
404                 host_status=DID_OK;
405                 
406                 if (rsp_status & FCP_STATUS_RESID) {
407 #ifdef FCDEBUG
408                         FCD(("Resid %d\n", rsp->fcp_resid))
409                         {
410                                 fcp_cmd *cmd = fc->scsi_cmd_pool + token;
411                                 int i;
412                                 
413                                 printk ("Command ");
414                                 for (i = 0; i < sizeof(fcp_cmd); i+=4)
415                                         printk ("%08x ", *(u32 *)(((char *)cmd)+i));
416                                 printk ("\nResponse ");
417                                 for (i = 0; i < fc->rsp_size; i+=4)
418                                         printk ("%08x ", *(u32 *)(((char *)rsp)+i));
419                                 printk ("\n");
420                         }
421 #endif                  
422                 }
423
424                 if (rsp_status & FCP_STATUS_SENSE_LEN) {
425                         sense_len = rsp->fcp_sense_len;
426                         if (sense_len > sizeof(SCpnt->sense_buffer)) sense_len = sizeof(SCpnt->sense_buffer);
427                         memcpy(SCpnt->sense_buffer, ((char *)(rsp+1)), sense_len);
428                 }
429                 
430                 if (fcmd->data)
431                         dma_unmap_sg(fc->dev, scsi_sglist(SCpnt),
432                                      scsi_sg_count(SCpnt),
433                                      SCpnt->sc_data_direction);
434                 break;
435         default:
436                 host_status=DID_ERROR; /* FIXME */
437                 FCD(("Wrong FC status %d for token %d\n", status, token))
438                 break;
439         }
440
441         if (status_byte(rsp_status) == QUEUE_FULL) {
442                 printk ("%s: (%d,%d) Received rsp_status 0x%x\n", fc->name, SCpnt->device->channel, SCpnt->device->id, rsp_status);
443         }       
444         
445         SCpnt->result = (host_status << 16) | (rsp_status & 0xff);
446 #ifdef FCDEBUG  
447         if (host_status || SCpnt->result || rsp_status) printk("FC: host_status %d, packet status %d\n",
448                         host_status, SCpnt->result);
449 #endif
450         SCpnt->done = fcmd->done;
451         fcmd->done=NULL;
452         clear_bit(token, fc->scsi_bitmap);
453         fc->scsi_free++;
454         FCD(("Calling scsi_done with %08x\n", SCpnt->result))
455         SCpnt->scsi_done(SCpnt);
456 }
457
458 void fcp_receive_solicited(fc_channel *fc, int proto, int token, int status, fc_hdr *fch)
459 {
460         int magic;
461         FCD(("receive_solicited %d %d %d\n", proto, token, status))
462         switch (proto) {
463         case TYPE_SCSI_FCP:
464                 fcp_scsi_receive(fc, token, status, fch); break;
465         case TYPE_EXTENDED_LS:
466         case PROTO_REPORT_AL_MAP:
467                 magic = 0;
468                 if (fc->ls)
469                         magic = ((ls *)(fc->ls))->magic;
470                 if (magic == LSMAGIC) {
471                         ls *l = (ls *)fc->ls;
472                         int i = (token >= l->count) ? token - l->count : token;
473
474                         /* Let's be sure */
475                         if ((unsigned)i < l->count && l->fcmds[i].fc == fc) {
476                                 if (proto == TYPE_EXTENDED_LS)
477                                         fcp_login_done(fc, token, status);
478                                 else
479                                         fcp_report_map_done(fc, token, status);
480                                 break;
481                         }
482                 }
483                 FCD(("fc %p fc->ls %p fc->cmd_slots %p\n", fc, fc->ls, fc->cmd_slots))
484                 if (proto == TYPE_EXTENDED_LS && !fc->ls && fc->cmd_slots) {
485                         fcp_cmnd *fcmd;
486                         
487                         fcmd = fc->cmd_slots[token];
488                         if (fcmd && fcmd->ls && ((ls *)(fcmd->ls))->magic == LSEMAGIC) {
489                                 lse *l = (lse *)fcmd->ls;
490                                 
491                                 l->status = status;
492                                 up (&l->sem);
493                         }
494                 }
495                 break;
496         case PROTO_OFFLINE:
497                 if (fc->ls && ((lso *)(fc->ls))->magic == LSOMAGIC) {
498                         lso *l = (lso *)fc->ls;
499
500                         if ((unsigned)token < l->count && l->fcmds[token].fc == fc) {
501                                 /* Wow, OFFLINE response arrived :) */
502                                 FCD(("OFFLINE Response arrived\n"))
503                                 fc->state = FC_STATE_OFFLINE;
504                                 if (atomic_dec_and_test (&l->todo))
505                                         up(&l->sem);
506                         }
507                 }
508                 break;
509                 
510         default:
511                 break;
512         }
513 }
514
515 void fcp_state_change(fc_channel *fc, int state)
516 {
517         FCD(("state_change %d %d\n", state, fc->state))
518         if (state == FC_STATE_ONLINE && fc->state == FC_STATE_MAYBEOFFLINE)
519                 fc->state = FC_STATE_UNINITED;
520         else if (state == FC_STATE_ONLINE)
521                 printk (KERN_WARNING "%s: state change to ONLINE\n", fc->name);
522         else
523                 printk (KERN_ERR "%s: state change to OFFLINE\n", fc->name);
524 }
525
526 int fcp_initialize(fc_channel *fcchain, int count)
527 {
528         fc_channel *fc;
529         fcp_cmnd *fcmd;
530         int i, retry, ret;
531         ls *l;
532
533         FCND(("fcp_inititialize %08lx\n", (long)fcp_init))
534         FCND(("fc_channels %08lx\n", (long)fc_channels))
535         FCND((" SID %d DID %d\n", fcchain->sid, fcchain->did))
536         l = kzalloc(sizeof (ls) + count, GFP_KERNEL);
537         if (!l) {
538                 printk ("FC: Cannot allocate memory for initialization\n");
539                 return -ENOMEM;
540         }
541         l->magic = LSMAGIC;
542         l->count = count;
543         FCND(("FCP Init for %d channels\n", count))
544         init_MUTEX_LOCKED(&l->sem);
545         init_timer(&l->timer);
546         l->timer.function = fcp_login_timeout;
547         l->timer.data = (unsigned long)l;
548         atomic_set (&l->todo, count);
549         l->logi = kzalloc (count * 3 * sizeof(logi), GFP_KERNEL);
550         l->fcmds = kzalloc (count * sizeof(fcp_cmnd), GFP_KERNEL);
551         if (!l->logi || !l->fcmds) {
552                 kfree (l->logi);
553                 kfree (l->fcmds);
554                 kfree (l);
555                 printk ("FC: Cannot allocate DMA memory for initialization\n");
556                 return -ENOMEM;
557         }
558         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
559                 fc->state = FC_STATE_UNINITED;
560                 fc->rst_pkt = NULL;     /* kmalloc when first used */
561         }
562         /* First try if we are in a AL topology */
563         FCND(("Initializing REPORT_MAP packets\n"))
564         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
565                 fcmd = l->fcmds + i;
566                 fc->login = fcmd;
567                 fc->ls = (void *)l;
568                 /* Assumes sizeof(fc_al_posmap) < 3 * sizeof(logi), which is true */
569                 fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi),
570                                             DMA_BIDIRECTIONAL);
571                 fcmd->proto = PROTO_REPORT_AL_MAP;
572                 fcmd->token = i;
573                 fcmd->fc = fc;
574         }
575         for (retry = 0; retry < 8; retry++) {
576                 int nqueued = 0;
577                 FCND(("Sending REPORT_MAP/FLOGI/PLOGI packets\n"))
578                 for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
579                         if (fc->state == FC_STATE_ONLINE || fc->state == FC_STATE_OFFLINE)
580                                 continue;
581                         disable_irq(fc->irq);
582                         if (fc->state == FC_STATE_MAYBEOFFLINE) {
583                                 if (!l->grace[i]) {
584                                         l->grace[i]++;
585                                         FCD(("Grace\n"))
586                                 } else {
587                                         fc->state = FC_STATE_OFFLINE;
588                                         enable_irq(fc->irq);
589                                         dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
590                                         if (atomic_dec_and_test (&l->todo))
591                                                 goto all_done;
592                                 }
593                         }
594                         ret = fc->hw_enque (fc, fc->login);
595                         enable_irq(fc->irq);
596                         if (!ret) {
597                                 nqueued++;
598                                 continue;
599                         }
600                         if (ret == -ENOSYS && fc->login->proto == PROTO_REPORT_AL_MAP) {
601                                 /* Oh yes, this card handles Point-to-Point only, so let's try that. */
602                                 fc_hdr *fch;
603
604                                 FCD(("SID %d DID %d\n", fc->sid, fc->did))
605                                 fcmd = l->fcmds + i;
606                                 dma_unmap_single(fc->dev, fcmd->cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
607                                 fch = &fcmd->fch;
608                                 FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, FS_FABRIC_F_PORT);
609                                 FILL_FCHDR_SID(fch, 0);
610                                 FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);
611                                 FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);
612                                 FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);
613                                 fch->param = 0;
614                                 l->logi [3 * i].code = LS_FLOGI;
615                                 fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
616                                 fcmd->rsp = fcmd->cmd + sizeof(logi);
617                                 fcmd->cmdlen = sizeof(logi);
618                                 fcmd->rsplen = sizeof(logi);
619                                 fcmd->data = (dma_addr_t)NULL;
620                                 fcmd->class = FC_CLASS_SIMPLE;
621                                 fcmd->proto = TYPE_EXTENDED_LS;
622                         } else
623                                 printk ("FC: Cannot enque FLOGI/REPORT_MAP packet on %s\n", fc->name);
624                 }
625                 
626                 if (nqueued) {
627                         l->timer.expires = jiffies + 5 * HZ;
628                         add_timer(&l->timer);
629
630                         down(&l->sem);
631                         if (!atomic_read(&l->todo)) {
632                                 FCND(("All channels answered in time\n"))
633                                 break; /* All fc channels have answered us */
634                         }
635                 }
636         }
637 all_done:
638         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
639                 fc->ls = NULL;
640                 switch (fc->state) {
641                 case FC_STATE_ONLINE: break;
642                 case FC_STATE_OFFLINE: break;
643                 default: dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
644                         break;
645                 }
646         }
647         del_timer(&l->timer);
648         kfree (l->logi);
649         kfree (l->fcmds);
650         kfree (l);
651         return 0;
652 }
653
654 int fcp_forceoffline(fc_channel *fcchain, int count)
655 {
656         fc_channel *fc;
657         fcp_cmnd *fcmd;
658         int i, ret;
659         lso l;
660
661         memset (&l, 0, sizeof(lso));
662         l.count = count;
663         l.magic = LSOMAGIC;
664         FCND(("FCP Force Offline for %d channels\n", count))
665         init_MUTEX_LOCKED(&l.sem);
666         init_timer(&l.timer);
667         l.timer.function = fcp_login_timeout;
668         l.timer.data = (unsigned long)&l;
669         atomic_set (&l.todo, count);
670         l.fcmds = kzalloc (count * sizeof(fcp_cmnd), GFP_KERNEL);
671         if (!l.fcmds) {
672                 printk ("FC: Cannot allocate memory for forcing offline\n");
673                 return -ENOMEM;
674         }
675         FCND(("Initializing OFFLINE packets\n"))
676         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
677                 fc->state = FC_STATE_UNINITED;
678                 fcmd = l.fcmds + i;
679                 fc->login = fcmd;
680                 fc->ls = (void *)&l;
681                 fcmd->did = fc->did;
682                 fcmd->class = FC_CLASS_OFFLINE;
683                 fcmd->proto = PROTO_OFFLINE;
684                 fcmd->token = i;
685                 fcmd->fc = fc;
686                 disable_irq(fc->irq);
687                 ret = fc->hw_enque (fc, fc->login);
688                 enable_irq(fc->irq);
689                 if (ret) printk ("FC: Cannot enque OFFLINE packet on %s\n", fc->name);
690         }
691                 
692         l.timer.expires = jiffies + 5 * HZ;
693         add_timer(&l.timer);
694         down(&l.sem);
695         del_timer(&l.timer);
696         
697         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++)
698                 fc->ls = NULL;
699         kfree (l.fcmds);
700         return 0;
701 }
702
703 int fcp_init(fc_channel *fcchain)
704 {
705         fc_channel *fc;
706         int count=0;
707         int ret;
708         
709         for (fc = fcchain; fc; fc = fc->next) {
710                 fc->fcp_register = fcp_register;
711                 count++;
712         }
713
714         ret = fcp_initialize (fcchain, count);
715         if (ret)
716                 return ret;
717                 
718         if (!fc_channels)
719                 fc_channels = fcchain;
720         else {
721                 for (fc = fc_channels; fc->next; fc = fc->next);
722                 fc->next = fcchain;
723         }
724         return ret;
725 }
726
727 void fcp_release(fc_channel *fcchain, int count)  /* count must > 0 */
728 {
729         fc_channel *fc;
730         fc_channel *fcx;
731
732         for (fc = fcchain; --count && fc->next; fc = fc->next);
733         if (count) {
734                 printk("FC: nothing to release\n");
735                 return;
736         }
737         
738         if (fc_channels == fcchain)
739                 fc_channels = fc->next;
740         else {
741                 for (fcx = fc_channels; fcx->next != fcchain; fcx = fcx->next);
742                 fcx->next = fc->next;
743         }
744         fc->next = NULL;
745
746         /*
747          *  We've just grabbed fcchain out of the fc_channel list
748          *  and zero-terminated it, while destroying the count.
749          *
750          *  Freeing the fc's is the low level driver's responsibility.
751          */
752 }
753
754
755 static void fcp_scsi_done(struct scsi_cmnd *SCpnt)
756 {
757         if (FCP_CMND(SCpnt)->done)
758                 FCP_CMND(SCpnt)->done(SCpnt);
759 }
760
761 static int fcp_scsi_queue_it(fc_channel *fc, struct scsi_cmnd *SCpnt,
762                              fcp_cmnd *fcmd, int prepare)
763 {
764         long i;
765         fcp_cmd *cmd;
766         u32 fcp_cntl;
767         if (prepare) {
768                 i = find_first_zero_bit (fc->scsi_bitmap, fc->scsi_bitmap_end);
769                 set_bit (i, fc->scsi_bitmap);
770                 fcmd->token = i;
771                 cmd = fc->scsi_cmd_pool + i;
772
773                 if (fc->encode_addr (SCpnt, cmd->fcp_addr, fc, fcmd)) {
774                         /* Invalid channel/id/lun and couldn't map it into fcp_addr */
775                         clear_bit (i, fc->scsi_bitmap);
776                         SCpnt->result = (DID_BAD_TARGET << 16);
777                         SCpnt->scsi_done(SCpnt);
778                         return 0;
779                 }
780                 fc->scsi_free--;
781                 fc->cmd_slots[fcmd->token] = fcmd;
782
783                 if (SCpnt->device->tagged_supported) {
784                         if (jiffies - fc->ages[SCpnt->device->channel * fc->targets + SCpnt->device->id] > (5 * 60 * HZ)) {
785                                 fc->ages[SCpnt->device->channel * fc->targets + SCpnt->device->id] = jiffies;
786                                 fcp_cntl = FCP_CNTL_QTYPE_ORDERED;
787                         } else
788                                 fcp_cntl = FCP_CNTL_QTYPE_SIMPLE;
789                 } else
790                         fcp_cntl = FCP_CNTL_QTYPE_UNTAGGED;
791
792                 if (!scsi_bufflen(SCpnt)) {
793                         cmd->fcp_cntl = fcp_cntl;
794                         fcmd->data = (dma_addr_t)NULL;
795                 } else {
796                         struct scatterlist *sg;
797                         int nents;
798
799                         switch (SCpnt->cmnd[0]) {
800                         case WRITE_6:
801                         case WRITE_10:
802                         case WRITE_12:
803                                 cmd->fcp_cntl = (FCP_CNTL_WRITE | fcp_cntl); break;
804                         default:
805                                 cmd->fcp_cntl = (FCP_CNTL_READ | fcp_cntl); break;
806                         }
807
808                         sg = scsi_sglist(SCpnt);
809                         nents = dma_map_sg(fc->dev, sg, scsi_sg_count(SCpnt),
810                                            SCpnt->sc_data_direction);
811                         fcmd->data = sg_dma_address(sg);
812                         cmd->fcp_data_len = sg_dma_len(sg);
813                 }
814                 memcpy (cmd->fcp_cdb, SCpnt->cmnd, SCpnt->cmd_len);
815                 memset (cmd->fcp_cdb+SCpnt->cmd_len, 0, sizeof(cmd->fcp_cdb)-SCpnt->cmd_len);
816                 FCD(("XXX: %04x.%04x.%04x.%04x - %08x%08x%08x\n", cmd->fcp_addr[0], cmd->fcp_addr[1], cmd->fcp_addr[2], cmd->fcp_addr[3], *(u32 *)SCpnt->cmnd, *(u32 *)(SCpnt->cmnd+4), *(u32 *)(SCpnt->cmnd+8)))
817         }
818         FCD(("Trying to enque %p\n", fcmd))
819         if (!fc->scsi_que) {
820                 if (!fc->hw_enque (fc, fcmd)) {
821                         FCD(("hw_enque succeeded for %p\n", fcmd))
822                         return 0;
823                 }
824         }
825         FCD(("Putting into que1 %p\n", fcmd))
826         fcp_scsi_insert_queue (fc, fcmd);
827         return 0;
828 }
829
830 int fcp_scsi_queuecommand(struct scsi_cmnd *SCpnt,
831                           void (* done)(struct scsi_cmnd *))
832 {
833         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
834         fc_channel *fc = FC_SCMND(SCpnt);
835         
836         FCD(("Entering SCSI queuecommand %p\n", fcmd))
837         if (SCpnt->done != fcp_scsi_done) {
838                 fcmd->done = SCpnt->done;
839                 SCpnt->done = fcp_scsi_done;
840                 SCpnt->scsi_done = done;
841                 fcmd->proto = TYPE_SCSI_FCP;
842                 if (!fc->scsi_free) {
843                         FCD(("FC: !scsi_free, putting cmd on ML queue\n"))
844 #if (FCP_SCSI_USE_NEW_EH_CODE == 0)
845                         printk("fcp_scsi_queue_command: queue full, losing cmd, bad\n");
846 #endif
847                         return 1;
848                 }
849                 return fcp_scsi_queue_it(fc, SCpnt, fcmd, 1);
850         }
851         return fcp_scsi_queue_it(fc, SCpnt, fcmd, 0);
852 }
853
854 void fcp_queue_empty(fc_channel *fc)
855 {
856         fcp_cmnd *fcmd;
857         
858         FCD(("Queue empty\n"))
859         while ((fcmd = fc->scsi_que)) {
860                 /* The hw told us we can try again queue some packet */
861                 if (fc->hw_enque (fc, fcmd))
862                         break;
863                 fcp_scsi_remove_queue (fc, fcmd);
864         }
865 }
866
867 int fcp_scsi_abort(struct scsi_cmnd *SCpnt)
868 {
869         /* Internal bookkeeping only. Lose 1 cmd_slots slot. */
870         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
871         fc_channel *fc = FC_SCMND(SCpnt);
872         
873         /*
874          * We react to abort requests by simply forgetting
875          * about the command and pretending everything's sweet.
876          * This may or may not be silly. We can't, however,
877          * immediately reuse the command's cmd_slots slot,
878          * as its result may arrive later and we cannot
879          * check whether it is the aborted one, can't we?
880          *
881          * Therefore, after the first few aborts are done,
882          * we tell the scsi error handler to do something clever.
883          * It will eventually call host reset, refreshing
884          * cmd_slots for us.
885          *
886          * There is a theoretical chance that we sometimes allow
887          * more than can_queue packets to the jungle this way,
888          * but the worst outcome possible is a series of
889          * more aborts and eventually the dev_reset catharsis.
890          */
891
892         if (++fc->abort_count < (fc->can_queue >> 1)) {
893                 SCpnt->result = DID_ABORT;
894                 fcmd->done(SCpnt);
895                 printk("FC: soft abort\n");
896                 return SUCCESS;
897         } else {
898                 printk("FC: hard abort refused\n");
899                 return FAILED;
900         }
901 }
902
903 #if 0
904 void fcp_scsi_reset_done(struct scsi_cmnd *SCpnt)
905 {
906         fc_channel *fc = FC_SCMND(SCpnt);
907
908         fc->rst_pkt->eh_state = SCSI_STATE_FINISHED;
909         up(fc->rst_pkt->device->host->eh_action);
910 }
911 #endif
912
913 #define FCP_RESET_TIMEOUT (2*HZ)
914
915 int fcp_scsi_dev_reset(struct scsi_cmnd *SCpnt)
916 {
917 #if 0 /* broken junk, but if davem wants to compile this driver, let him.. */
918         unsigned long flags;
919         fcp_cmd *cmd;
920         fcp_cmnd *fcmd;
921         fc_channel *fc = FC_SCMND(SCpnt);
922         DECLARE_MUTEX_LOCKED(sem);
923
924         if (!fc->rst_pkt) {
925                 fc->rst_pkt = kmalloc(sizeof(SCpnt), GFP_KERNEL);
926                 if (!fc->rst_pkt) return FAILED;
927                 
928                 fcmd = FCP_CMND(fc->rst_pkt);
929
930
931                 fcmd->token = 0;
932                 cmd = fc->scsi_cmd_pool + 0;
933                 FCD(("Preparing rst packet\n"))
934                 fc->encode_addr (SCpnt, cmd->fcp_addr, fc, fcmd);
935                 fc->rst_pkt->device = SCpnt->device;
936                 fc->rst_pkt->cmd_len = 0;
937                 
938                 fc->cmd_slots[0] = fcmd;
939
940                 cmd->fcp_cntl = FCP_CNTL_QTYPE_ORDERED | FCP_CNTL_RESET;
941                 fcmd->data = (dma_addr_t)NULL;
942                 fcmd->proto = TYPE_SCSI_FCP;
943
944                 memcpy (cmd->fcp_cdb, SCpnt->cmnd, SCpnt->cmd_len);
945                 memset (cmd->fcp_cdb+SCpnt->cmd_len, 0, sizeof(cmd->fcp_cdb)-SCpnt->cmd_len);
946                 FCD(("XXX: %04x.%04x.%04x.%04x - %08x%08x%08x\n", cmd->fcp_addr[0], cmd->fcp_addr[1], cmd->fcp_addr[2], cmd->fcp_addr[3], *(u32 *)SCpnt->cmnd, *(u32 *)(SCpnt->cmnd+4), *(u32 *)(SCpnt->cmnd+8)))
947         } else {
948                 fcmd = FCP_CMND(fc->rst_pkt);
949                 if (fc->rst_pkt->eh_state == SCSI_STATE_QUEUED)
950                         return FAILED; /* or SUCCESS. Only these */
951         }
952         fc->rst_pkt->done = NULL;
953
954
955         fc->rst_pkt->eh_state = SCSI_STATE_QUEUED;
956         init_timer(&fc->rst_pkt->eh_timeout);
957         fc->rst_pkt->eh_timeout.data = (unsigned long) fc->rst_pkt;
958         fc->rst_pkt->eh_timeout.expires = jiffies + FCP_RESET_TIMEOUT;
959         fc->rst_pkt->eh_timeout.function = (void (*)(unsigned long))fcp_scsi_reset_done;
960
961         add_timer(&fc->rst_pkt->eh_timeout);
962
963         /*
964          * Set up the semaphore so we wait for the command to complete.
965          */
966
967         fc->rst_pkt->device->host->eh_action = &sem;
968
969         fc->rst_pkt->done = fcp_scsi_reset_done;
970
971         spin_lock_irqsave(SCpnt->device->host->host_lock, flags);
972         fcp_scsi_queue_it(fc, fc->rst_pkt, fcmd, 0);
973         spin_unlock_irqrestore(SCpnt->device->host->host_lock, flags);
974         
975         down(&sem);
976
977         fc->rst_pkt->device->host->eh_action = NULL;
978         del_timer(&fc->rst_pkt->eh_timeout);
979
980         /*
981          * See if timeout.  If so, tell the host to forget about it.
982          * In other words, we don't want a callback any more.
983          */
984         if (fc->rst_pkt->eh_state == SCSI_STATE_TIMEOUT ) {
985                 fc->rst_pkt->eh_state = SCSI_STATE_UNUSED;
986                 return FAILED;
987         }
988         fc->rst_pkt->eh_state = SCSI_STATE_UNUSED;
989 #endif
990         return SUCCESS;
991 }
992
993 static int __fcp_scsi_host_reset(struct scsi_cmnd *SCpnt)
994 {
995         fc_channel *fc = FC_SCMND(SCpnt);
996         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
997         int i;
998
999         printk ("FC: host reset\n");
1000
1001         for (i=0; i < fc->can_queue; i++) {
1002                 if (fc->cmd_slots[i] && SCpnt->result != DID_ABORT) {
1003                         SCpnt->result = DID_RESET;
1004                         fcmd->done(SCpnt);
1005                         fc->cmd_slots[i] = NULL;
1006                 }
1007         }
1008         fc->reset(fc);
1009         fc->abort_count = 0;
1010         if (fcp_initialize(fc, 1)) return SUCCESS;
1011         else return FAILED;
1012 }
1013
1014 int fcp_scsi_host_reset(struct scsi_cmnd *SCpnt)
1015 {
1016         unsigned long flags;
1017         int rc;
1018
1019         spin_lock_irqsave(SCpnt->device->host->host_lock, flags);
1020         rc = __fcp_scsi_host_reset(SCpnt);
1021         spin_unlock_irqrestore(SCpnt->device->host->host_lock, flags);
1022
1023         return rc;
1024 }
1025
1026 static int fcp_els_queue_it(fc_channel *fc, fcp_cmnd *fcmd)
1027 {
1028         long i;
1029
1030         i = find_first_zero_bit (fc->scsi_bitmap, fc->scsi_bitmap_end);
1031         set_bit (i, fc->scsi_bitmap);
1032         fcmd->token = i;
1033         fc->scsi_free--;
1034         fc->cmd_slots[fcmd->token] = fcmd;
1035         return fcp_scsi_queue_it(fc, NULL, fcmd, 0);
1036 }
1037
1038 static int fc_do_els(fc_channel *fc, unsigned int alpa, void *data, int len)
1039 {
1040         fcp_cmnd _fcmd, *fcmd;
1041         fc_hdr *fch;
1042         lse l;
1043         int i;
1044
1045         fcmd = &_fcmd;
1046         memset(fcmd, 0, sizeof(fcp_cmnd));
1047         FCD(("PLOGI SID %d DID %d\n", fc->sid, alpa))
1048         fch = &fcmd->fch;
1049         FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, alpa);
1050         FILL_FCHDR_SID(fch, fc->sid);
1051         FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);
1052         FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);
1053         FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);
1054         fch->param = 0;
1055         fcmd->cmd = dma_map_single (fc->dev, data, 2 * len, DMA_BIDIRECTIONAL);
1056         fcmd->rsp = fcmd->cmd + len;
1057         fcmd->cmdlen = len;
1058         fcmd->rsplen = len;
1059         fcmd->data = (dma_addr_t)NULL;
1060         fcmd->fc = fc;
1061         fcmd->class = FC_CLASS_SIMPLE;
1062         fcmd->proto = TYPE_EXTENDED_LS;
1063         
1064         memset (&l, 0, sizeof(lse));
1065         l.magic = LSEMAGIC;
1066         init_MUTEX_LOCKED(&l.sem);
1067         l.timer.function = fcp_login_timeout;
1068         l.timer.data = (unsigned long)&l;
1069         l.status = FC_STATUS_TIMED_OUT;
1070         fcmd->ls = (void *)&l;
1071
1072         disable_irq(fc->irq);   
1073         fcp_els_queue_it(fc, fcmd);
1074         enable_irq(fc->irq);
1075
1076         for (i = 0;;) {
1077                 l.timer.expires = jiffies + 5 * HZ;
1078                 add_timer(&l.timer);
1079                 down(&l.sem);
1080                 del_timer(&l.timer);
1081                 if (l.status != FC_STATUS_TIMED_OUT) break;
1082                 if (++i == 3) break;
1083                 disable_irq(fc->irq);
1084                 fcp_scsi_queue_it(fc, NULL, fcmd, 0);
1085                 enable_irq(fc->irq);
1086         }
1087         
1088         clear_bit(fcmd->token, fc->scsi_bitmap);
1089         fc->scsi_free++;
1090         dma_unmap_single (fc->dev, fcmd->cmd, 2 * len, DMA_BIDIRECTIONAL);
1091         return l.status;
1092 }
1093
1094 int fc_do_plogi(fc_channel *fc, unsigned char alpa, fc_wwn *node, fc_wwn *nport)
1095 {
1096         logi *l;
1097         int status;
1098
1099         l = kzalloc(2 * sizeof(logi), GFP_KERNEL);
1100         if (!l) return -ENOMEM;
1101         l->code = LS_PLOGI;
1102         memcpy (&l->nport_wwn, &fc->wwn_nport, sizeof(fc_wwn));
1103         memcpy (&l->node_wwn, &fc->wwn_node, sizeof(fc_wwn));
1104         memcpy (&l->common, fc->common_svc, sizeof(common_svc_parm));
1105         memcpy (&l->class1, fc->class_svcs, 3*sizeof(svc_parm));
1106         status = fc_do_els(fc, alpa, l, sizeof(logi));
1107         if (status == FC_STATUS_OK) {
1108                 if (l[1].code == LS_ACC) {
1109 #ifdef FCDEBUG
1110                         u32 *u = (u32 *)&l[1].nport_wwn;
1111                         FCD(("AL-PA %02x: Port WWN %08x%08x Node WWN %08x%08x\n", alpa, 
1112                                 u[0], u[1], u[2], u[3]))
1113 #endif
1114                         memcpy(nport, &l[1].nport_wwn, sizeof(fc_wwn));
1115                         memcpy(node, &l[1].node_wwn, sizeof(fc_wwn));
1116                 } else
1117                         status = FC_STATUS_BAD_RSP;
1118         }
1119         kfree(l);
1120         return status;
1121 }
1122
1123 typedef struct {
1124         unsigned int code;
1125         unsigned params[4];
1126 } prli;
1127
1128 int fc_do_prli(fc_channel *fc, unsigned char alpa)
1129 {
1130         prli *p;
1131         int status;
1132
1133         p = kzalloc(2 * sizeof(prli), GFP_KERNEL);
1134         if (!p) return -ENOMEM;
1135         p->code = LS_PRLI;
1136         p->params[0] = 0x08002000;
1137         p->params[3] = 0x00000022;
1138         status = fc_do_els(fc, alpa, p, sizeof(prli));
1139         if (status == FC_STATUS_OK && p[1].code != LS_PRLI_ACC && p[1].code != LS_ACC)
1140                 status = FC_STATUS_BAD_RSP;
1141         kfree(p);
1142         return status;
1143 }
1144
1145 MODULE_LICENSE("GPL");
1146