git.oblomov.eu Git - linux-2.6/blob - 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 = (fcp_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 = (fcp_cmnd **)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                         if (SCpnt->use_sg)
 432                                 dma_unmap_sg(fc->dev, (struct scatterlist *)SCpnt->request_buffer,
 433                                                 SCpnt->use_sg,
 434                                                 SCpnt->sc_data_direction);
 435                         else
 436                                 dma_unmap_single(fc->dev, fcmd->data, SCpnt->request_bufflen,
 437                                                  SCpnt->sc_data_direction);
 438                 }
 439                 break;
 440         default:
 441                 host_status=DID_ERROR; /* FIXME */
 442                 FCD(("Wrong FC status %d for token %d\n", status, token))
 443                 break;
 444         }
 445
 446         if (status_byte(rsp_status) == QUEUE_FULL) {
 447                 printk ("%s: (%d,%d) Received rsp_status 0x%x\n", fc->name, SCpnt->device->channel, SCpnt->device->id, rsp_status);
 448         }
 449
 450         SCpnt->result = (host_status << 16) | (rsp_status & 0xff);
 451 #ifdef FCDEBUG
 452         if (host_status || SCpnt->result || rsp_status) printk("FC: host_status %d, packet status %d\n",
 453                         host_status, SCpnt->result);
 454 #endif
 455         SCpnt->done = fcmd->done;
 456         fcmd->done=NULL;
 457         clear_bit(token, fc->scsi_bitmap);
 458         fc->scsi_free++;
 459         FCD(("Calling scsi_done with %08x\n", SCpnt->result))
 460         SCpnt->scsi_done(SCpnt);
 461 }
 462
 463 void fcp_receive_solicited(fc_channel *fc, int proto, int token, int status, fc_hdr *fch)
 464 {
 465         int magic;
 466         FCD(("receive_solicited %d %d %d\n", proto, token, status))
 467         switch (proto) {
 468         case TYPE_SCSI_FCP:
 469                 fcp_scsi_receive(fc, token, status, fch); break;
 470         case TYPE_EXTENDED_LS:
 471         case PROTO_REPORT_AL_MAP:
 472                 magic = 0;
 473                 if (fc->ls)
 474                         magic = ((ls *)(fc->ls))->magic;
 475                 if (magic == LSMAGIC) {
 476                         ls *l = (ls *)fc->ls;
 477                         int i = (token >= l->count) ? token - l->count : token;
 478
 479                         /* Let's be sure */
 480                         if ((unsigned)i < l->count && l->fcmds[i].fc == fc) {
 481                                 if (proto == TYPE_EXTENDED_LS)
 482                                         fcp_login_done(fc, token, status);
 483                                 else
 484                                         fcp_report_map_done(fc, token, status);
 485                                 break;
 486                         }
 487                 }
 488                 FCD(("fc %p fc->ls %p fc->cmd_slots %p\n", fc, fc->ls, fc->cmd_slots))
 489                 if (proto == TYPE_EXTENDED_LS && !fc->ls && fc->cmd_slots) {
 490                         fcp_cmnd *fcmd;
 491
 492                         fcmd = fc->cmd_slots[token];
 493                         if (fcmd && fcmd->ls && ((ls *)(fcmd->ls))->magic == LSEMAGIC) {
 494                                 lse *l = (lse *)fcmd->ls;
 495
 496                                 l->status = status;
 497                                 up (&l->sem);
 498                         }
 499                 }
 500                 break;
 501         case PROTO_OFFLINE:
 502                 if (fc->ls && ((lso *)(fc->ls))->magic == LSOMAGIC) {
 503                         lso *l = (lso *)fc->ls;
 504
 505                         if ((unsigned)token < l->count && l->fcmds[token].fc == fc) {
 506                                 /* Wow, OFFLINE response arrived :) */
 507                                 FCD(("OFFLINE Response arrived\n"))
 508                                 fc->state = FC_STATE_OFFLINE;
 509                                 if (atomic_dec_and_test (&l->todo))
 510                                         up(&l->sem);
 511                         }
 512                 }
 513                 break;
 514
 515         default:
 516                 break;
 517         }
 518 }
 519
 520 void fcp_state_change(fc_channel *fc, int state)
 521 {
 522         FCD(("state_change %d %d\n", state, fc->state))
 523         if (state == FC_STATE_ONLINE && fc->state == FC_STATE_MAYBEOFFLINE)
 524                 fc->state = FC_STATE_UNINITED;
 525         else if (state == FC_STATE_ONLINE)
 526                 printk (KERN_WARNING "%s: state change to ONLINE\n", fc->name);
 527         else
 528                 printk (KERN_ERR "%s: state change to OFFLINE\n", fc->name);
 529 }
 530
 531 int fcp_initialize(fc_channel *fcchain, int count)
 532 {
 533         fc_channel *fc;
 534         fcp_cmnd *fcmd;
 535         int i, retry, ret;
 536         ls *l;
 537
 538         FCND(("fcp_inititialize %08lx\n", (long)fcp_init))
 539         FCND(("fc_channels %08lx\n", (long)fc_channels))
 540         FCND((" SID %d DID %d\n", fcchain->sid, fcchain->did))
 541         l = kzalloc(sizeof (ls) + count, GFP_KERNEL);
 542         if (!l) {
 543                 printk ("FC: Cannot allocate memory for initialization\n");
 544                 return -ENOMEM;
 545         }
 546         l->magic = LSMAGIC;
 547         l->count = count;
 548         FCND(("FCP Init for %d channels\n", count))
 549         init_MUTEX_LOCKED(&l->sem);
 550         init_timer(&l->timer);
 551         l->timer.function = fcp_login_timeout;
 552         l->timer.data = (unsigned long)l;
 553         atomic_set (&l->todo, count);
 554         l->logi = kzalloc (count * 3 * sizeof(logi), GFP_KERNEL);
 555         l->fcmds = kzalloc (count * sizeof(fcp_cmnd), GFP_KERNEL);
 556         if (!l->logi || !l->fcmds) {
 557                 kfree (l->logi);
 558                 kfree (l->fcmds);
 559                 kfree (l);
 560                 printk ("FC: Cannot allocate DMA memory for initialization\n");
 561                 return -ENOMEM;
 562         }
 563         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
 564                 fc->state = FC_STATE_UNINITED;
 565                 fc->rst_pkt = NULL;     /* kmalloc when first used */
 566         }
 567         /* First try if we are in a AL topology */
 568         FCND(("Initializing REPORT_MAP packets\n"))
 569         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
 570                 fcmd = l->fcmds + i;
 571                 fc->login = fcmd;
 572                 fc->ls = (void *)l;
 573                 /* Assumes sizeof(fc_al_posmap) < 3 * sizeof(logi), which is true */
 574                 fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi),
 575                                             DMA_BIDIRECTIONAL);
 576                 fcmd->proto = PROTO_REPORT_AL_MAP;
 577                 fcmd->token = i;
 578                 fcmd->fc = fc;
 579         }
 580         for (retry = 0; retry < 8; retry++) {
 581                 int nqueued = 0;
 582                 FCND(("Sending REPORT_MAP/FLOGI/PLOGI packets\n"))
 583                 for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
 584                         if (fc->state == FC_STATE_ONLINE || fc->state == FC_STATE_OFFLINE)
 585                                 continue;
 586                         disable_irq(fc->irq);
 587                         if (fc->state == FC_STATE_MAYBEOFFLINE) {
 588                                 if (!l->grace[i]) {
 589                                         l->grace[i]++;
 590                                         FCD(("Grace\n"))
 591                                 } else {
 592                                         fc->state = FC_STATE_OFFLINE;
 593                                         enable_irq(fc->irq);
 594                                         dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
 595                                         if (atomic_dec_and_test (&l->todo))
 596                                                 goto all_done;
 597                                 }
 598                         }
 599                         ret = fc->hw_enque (fc, fc->login);
 600                         enable_irq(fc->irq);
 601                         if (!ret) {
 602                                 nqueued++;
 603                                 continue;
 604                         }
 605                         if (ret == -ENOSYS && fc->login->proto == PROTO_REPORT_AL_MAP) {
 606                                 /* Oh yes, this card handles Point-to-Point only, so let's try that. */
 607                                 fc_hdr *fch;
 608
 609                                 FCD(("SID %d DID %d\n", fc->sid, fc->did))
 610                                 fcmd = l->fcmds + i;
 611                                 dma_unmap_single(fc->dev, fcmd->cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
 612                                 fch = &fcmd->fch;
 613                                 FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, FS_FABRIC_F_PORT);
 614                                 FILL_FCHDR_SID(fch, 0);
 615                                 FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);
 616                                 FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);
 617                                 FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);
 618                                 fch->param = 0;
 619                                 l->logi [3 * i].code = LS_FLOGI;
 620                                 fcmd->cmd = dma_map_single (fc->dev, l->logi + 3 * i, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
 621                                 fcmd->rsp = fcmd->cmd + sizeof(logi);
 622                                 fcmd->cmdlen = sizeof(logi);
 623                                 fcmd->rsplen = sizeof(logi);
 624                                 fcmd->data = (dma_addr_t)NULL;
 625                                 fcmd->class = FC_CLASS_SIMPLE;
 626                                 fcmd->proto = TYPE_EXTENDED_LS;
 627                         } else
 628                                 printk ("FC: Cannot enque FLOGI/REPORT_MAP packet on %s\n", fc->name);
 629                 }
 630
 631                 if (nqueued) {
 632                         l->timer.expires = jiffies + 5 * HZ;
 633                         add_timer(&l->timer);
 634
 635                         down(&l->sem);
 636                         if (!atomic_read(&l->todo)) {
 637                                 FCND(("All channels answered in time\n"))
 638                                 break; /* All fc channels have answered us */
 639                         }
 640                 }
 641         }
 642 all_done:
 643         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
 644                 fc->ls = NULL;
 645                 switch (fc->state) {
 646                 case FC_STATE_ONLINE: break;
 647                 case FC_STATE_OFFLINE: break;
 648                 default: dma_unmap_single (fc->dev, l->fcmds[i].cmd, 3 * sizeof(logi), DMA_BIDIRECTIONAL);
 649                         break;
 650                 }
 651         }
 652         del_timer(&l->timer);
 653         kfree (l->logi);
 654         kfree (l->fcmds);
 655         kfree (l);
 656         return 0;
 657 }
 658
 659 int fcp_forceoffline(fc_channel *fcchain, int count)
 660 {
 661         fc_channel *fc;
 662         fcp_cmnd *fcmd;
 663         int i, ret;
 664         lso l;
 665
 666         memset (&l, 0, sizeof(lso));
 667         l.count = count;
 668         l.magic = LSOMAGIC;
 669         FCND(("FCP Force Offline for %d channels\n", count))
 670         init_MUTEX_LOCKED(&l.sem);
 671         init_timer(&l.timer);
 672         l.timer.function = fcp_login_timeout;
 673         l.timer.data = (unsigned long)&l;
 674         atomic_set (&l.todo, count);
 675         l.fcmds = kzalloc (count * sizeof(fcp_cmnd), GFP_KERNEL);
 676         if (!l.fcmds) {
 677                 printk ("FC: Cannot allocate memory for forcing offline\n");
 678                 return -ENOMEM;
 679         }
 680         FCND(("Initializing OFFLINE packets\n"))
 681         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++) {
 682                 fc->state = FC_STATE_UNINITED;
 683                 fcmd = l.fcmds + i;
 684                 fc->login = fcmd;
 685                 fc->ls = (void *)&l;
 686                 fcmd->did = fc->did;
 687                 fcmd->class = FC_CLASS_OFFLINE;
 688                 fcmd->proto = PROTO_OFFLINE;
 689                 fcmd->token = i;
 690                 fcmd->fc = fc;
 691                 disable_irq(fc->irq);
 692                 ret = fc->hw_enque (fc, fc->login);
 693                 enable_irq(fc->irq);
 694                 if (ret) printk ("FC: Cannot enque OFFLINE packet on %s\n", fc->name);
 695         }
 696
 697         l.timer.expires = jiffies + 5 * HZ;
 698         add_timer(&l.timer);
 699         down(&l.sem);
 700         del_timer(&l.timer);
 701
 702         for (fc = fcchain, i = 0; fc && i < count; fc = fc->next, i++)
 703                 fc->ls = NULL;
 704         kfree (l.fcmds);
 705         return 0;
 706 }
 707
 708 int fcp_init(fc_channel *fcchain)
 709 {
 710         fc_channel *fc;
 711         int count=0;
 712         int ret;
 713
 714         for (fc = fcchain; fc; fc = fc->next) {
 715                 fc->fcp_register = fcp_register;
 716                 count++;
 717         }
 718
 719         ret = fcp_initialize (fcchain, count);
 720         if (ret)
 721                 return ret;
 722
 723         if (!fc_channels)
 724                 fc_channels = fcchain;
 725         else {
 726                 for (fc = fc_channels; fc->next; fc = fc->next);
 727                 fc->next = fcchain;
 728         }
 729         return ret;
 730 }
 731
 732 void fcp_release(fc_channel *fcchain, int count)  /* count must > 0 */
 733 {
 734         fc_channel *fc;
 735         fc_channel *fcx;
 736
 737         for (fc = fcchain; --count && fc->next; fc = fc->next);
 738         if (count) {
 739                 printk("FC: nothing to release\n");
 740                 return;
 741         }
 742
 743         if (fc_channels == fcchain)
 744                 fc_channels = fc->next;
 745         else {
 746                 for (fcx = fc_channels; fcx->next != fcchain; fcx = fcx->next);
 747                 fcx->next = fc->next;
 748         }
 749         fc->next = NULL;
 750
 751         /*
 752          *  We've just grabbed fcchain out of the fc_channel list
 753          *  and zero-terminated it, while destroying the count.
 754          *
 755          *  Freeing the fc's is the low level driver's responsibility.
 756          */
 757 }
 758
 759
 760 static void fcp_scsi_done(struct scsi_cmnd *SCpnt)
 761 {
 762         if (FCP_CMND(SCpnt)->done)
 763                 FCP_CMND(SCpnt)->done(SCpnt);
 764 }
 765
 766 static int fcp_scsi_queue_it(fc_channel *fc, struct scsi_cmnd *SCpnt,
 767                              fcp_cmnd *fcmd, int prepare)
 768 {
 769         long i;
 770         fcp_cmd *cmd;
 771         u32 fcp_cntl;
 772         if (prepare) {
 773                 i = find_first_zero_bit (fc->scsi_bitmap, fc->scsi_bitmap_end);
 774                 set_bit (i, fc->scsi_bitmap);
 775                 fcmd->token = i;
 776                 cmd = fc->scsi_cmd_pool + i;
 777
 778                 if (fc->encode_addr (SCpnt, cmd->fcp_addr, fc, fcmd)) {
 779                         /* Invalid channel/id/lun and couldn't map it into fcp_addr */
 780                         clear_bit (i, fc->scsi_bitmap);
 781                         SCpnt->result = (DID_BAD_TARGET << 16);
 782                         SCpnt->scsi_done(SCpnt);
 783                         return 0;
 784                 }
 785                 fc->scsi_free--;
 786                 fc->cmd_slots[fcmd->token] = fcmd;
 787
 788                 if (SCpnt->device->tagged_supported) {
 789                         if (jiffies - fc->ages[SCpnt->device->channel * fc->targets + SCpnt->device->id] > (5 * 60 * HZ)) {
 790                                 fc->ages[SCpnt->device->channel * fc->targets + SCpnt->device->id] = jiffies;
 791                                 fcp_cntl = FCP_CNTL_QTYPE_ORDERED;
 792                         } else
 793                                 fcp_cntl = FCP_CNTL_QTYPE_SIMPLE;
 794                 } else
 795                         fcp_cntl = FCP_CNTL_QTYPE_UNTAGGED;
 796                 if (!SCpnt->request_bufflen && !SCpnt->use_sg) {
 797                         cmd->fcp_cntl = fcp_cntl;
 798                         fcmd->data = (dma_addr_t)NULL;
 799                 } else {
 800                         switch (SCpnt->cmnd[0]) {
 801                         case WRITE_6:
 802                         case WRITE_10:
 803                         case WRITE_12:
 804                                 cmd->fcp_cntl = (FCP_CNTL_WRITE | fcp_cntl); break;
 805                         default:
 806                                 cmd->fcp_cntl = (FCP_CNTL_READ | fcp_cntl); break;
 807                         }
 808                         if (!SCpnt->use_sg) {
 809                                 cmd->fcp_data_len = SCpnt->request_bufflen;
 810                                 fcmd->data = dma_map_single (fc->dev, (char *)SCpnt->request_buffer,
 811                                                              SCpnt->request_bufflen,
 812                                                              SCpnt->sc_data_direction);
 813                         } else {
 814                                 struct scatterlist *sg = (struct scatterlist *)SCpnt->request_buffer;
 815                                 int nents;
 816
 817                                 FCD(("XXX: Use_sg %d %d\n", SCpnt->use_sg, sg->length))
 818                                 nents = dma_map_sg (fc->dev, sg, SCpnt->use_sg,
 819                                                     SCpnt->sc_data_direction);
 820                                 if (nents > 1) printk ("%s: SG for nents %d (use_sg %d) not handled yet\n", fc->name, nents, SCpnt->use_sg);
 821                                 fcmd->data = sg_dma_address(sg);
 822                                 cmd->fcp_data_len = sg_dma_len(sg);
 823                         }
 824                 }
 825                 memcpy (cmd->fcp_cdb, SCpnt->cmnd, SCpnt->cmd_len);
 826                 memset (cmd->fcp_cdb+SCpnt->cmd_len, 0, sizeof(cmd->fcp_cdb)-SCpnt->cmd_len);
 827                 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)))
 828         }
 829         FCD(("Trying to enque %p\n", fcmd))
 830         if (!fc->scsi_que) {
 831                 if (!fc->hw_enque (fc, fcmd)) {
 832                         FCD(("hw_enque succeeded for %p\n", fcmd))
 833                         return 0;
 834                 }
 835         }
 836         FCD(("Putting into que1 %p\n", fcmd))
 837         fcp_scsi_insert_queue (fc, fcmd);
 838         return 0;
 839 }
 840
 841 int fcp_scsi_queuecommand(struct scsi_cmnd *SCpnt,
 842                           void (* done)(struct scsi_cmnd *))
 843 {
 844         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
 845         fc_channel *fc = FC_SCMND(SCpnt);
 846
 847         FCD(("Entering SCSI queuecommand %p\n", fcmd))
 848         if (SCpnt->done != fcp_scsi_done) {
 849                 fcmd->done = SCpnt->done;
 850                 SCpnt->done = fcp_scsi_done;
 851                 SCpnt->scsi_done = done;
 852                 fcmd->proto = TYPE_SCSI_FCP;
 853                 if (!fc->scsi_free) {
 854                         FCD(("FC: !scsi_free, putting cmd on ML queue\n"))
 855 #if (FCP_SCSI_USE_NEW_EH_CODE == 0)
 856                         printk("fcp_scsi_queue_command: queue full, losing cmd, bad\n");
 857 #endif
 858                         return 1;
 859                 }
 860                 return fcp_scsi_queue_it(fc, SCpnt, fcmd, 1);
 861         }
 862         return fcp_scsi_queue_it(fc, SCpnt, fcmd, 0);
 863 }
 864
 865 void fcp_queue_empty(fc_channel *fc)
 866 {
 867         fcp_cmnd *fcmd;
 868
 869         FCD(("Queue empty\n"))
 870         while ((fcmd = fc->scsi_que)) {
 871                 /* The hw told us we can try again queue some packet */
 872                 if (fc->hw_enque (fc, fcmd))
 873                         break;
 874                 fcp_scsi_remove_queue (fc, fcmd);
 875         }
 876 }
 877
 878 int fcp_scsi_abort(struct scsi_cmnd *SCpnt)
 879 {
 880         /* Internal bookkeeping only. Lose 1 cmd_slots slot. */
 881         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
 882         fc_channel *fc = FC_SCMND(SCpnt);
 883
 884         /*
 885          * We react to abort requests by simply forgetting
 886          * about the command and pretending everything's sweet.
 887          * This may or may not be silly. We can't, however,
 888          * immediately reuse the command's cmd_slots slot,
 889          * as its result may arrive later and we cannot
 890          * check whether it is the aborted one, can't we?
 891          *
 892          * Therefore, after the first few aborts are done,
 893          * we tell the scsi error handler to do something clever.
 894          * It will eventually call host reset, refreshing
 895          * cmd_slots for us.
 896          *
 897          * There is a theoretical chance that we sometimes allow
 898          * more than can_queue packets to the jungle this way,
 899          * but the worst outcome possible is a series of
 900          * more aborts and eventually the dev_reset catharsis.
 901          */
 902
 903         if (++fc->abort_count < (fc->can_queue >> 1)) {
 904                 SCpnt->result = DID_ABORT;
 905                 fcmd->done(SCpnt);
 906                 printk("FC: soft abort\n");
 907                 return SUCCESS;
 908         } else {
 909                 printk("FC: hard abort refused\n");
 910                 return FAILED;
 911         }
 912 }
 913
 914 #if 0
 915 void fcp_scsi_reset_done(struct scsi_cmnd *SCpnt)
 916 {
 917         fc_channel *fc = FC_SCMND(SCpnt);
 918
 919         fc->rst_pkt->eh_state = SCSI_STATE_FINISHED;
 920         up(fc->rst_pkt->device->host->eh_action);
 921 }
 922 #endif
 923
 924 #define FCP_RESET_TIMEOUT (2*HZ)
 925
 926 int fcp_scsi_dev_reset(struct scsi_cmnd *SCpnt)
 927 {
 928 #if 0 /* broken junk, but if davem wants to compile this driver, let him.. */
 929         unsigned long flags;
 930         fcp_cmd *cmd;
 931         fcp_cmnd *fcmd;
 932         fc_channel *fc = FC_SCMND(SCpnt);
 933         DECLARE_MUTEX_LOCKED(sem);
 934
 935         if (!fc->rst_pkt) {
 936                 fc->rst_pkt = (struct scsi_cmnd *) kmalloc(sizeof(SCpnt), GFP_KERNEL);
 937                 if (!fc->rst_pkt) return FAILED;
 938
 939                 fcmd = FCP_CMND(fc->rst_pkt);
 940
 941
 942                 fcmd->token = 0;
 943                 cmd = fc->scsi_cmd_pool + 0;
 944                 FCD(("Preparing rst packet\n"))
 945                 fc->encode_addr (SCpnt, cmd->fcp_addr, fc, fcmd);
 946                 fc->rst_pkt->device = SCpnt->device;
 947                 fc->rst_pkt->cmd_len = 0;
 948
 949                 fc->cmd_slots[0] = fcmd;
 950
 951                 cmd->fcp_cntl = FCP_CNTL_QTYPE_ORDERED | FCP_CNTL_RESET;
 952                 fcmd->data = (dma_addr_t)NULL;
 953                 fcmd->proto = TYPE_SCSI_FCP;
 954
 955                 memcpy (cmd->fcp_cdb, SCpnt->cmnd, SCpnt->cmd_len);
 956                 memset (cmd->fcp_cdb+SCpnt->cmd_len, 0, sizeof(cmd->fcp_cdb)-SCpnt->cmd_len);
 957                 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)))
 958         } else {
 959                 fcmd = FCP_CMND(fc->rst_pkt);
 960                 if (fc->rst_pkt->eh_state == SCSI_STATE_QUEUED)
 961                         return FAILED; /* or SUCCESS. Only these */
 962         }
 963         fc->rst_pkt->done = NULL;
 964
 965
 966         fc->rst_pkt->eh_state = SCSI_STATE_QUEUED;
 967         init_timer(&fc->rst_pkt->eh_timeout);
 968         fc->rst_pkt->eh_timeout.data = (unsigned long) fc->rst_pkt;
 969         fc->rst_pkt->eh_timeout.expires = jiffies + FCP_RESET_TIMEOUT;
 970         fc->rst_pkt->eh_timeout.function = (void (*)(unsigned long))fcp_scsi_reset_done;
 971
 972         add_timer(&fc->rst_pkt->eh_timeout);
 973
 974         /*
 975          * Set up the semaphore so we wait for the command to complete.
 976          */
 977
 978         fc->rst_pkt->device->host->eh_action = &sem;
 979
 980         fc->rst_pkt->done = fcp_scsi_reset_done;
 981
 982         spin_lock_irqsave(SCpnt->device->host->host_lock, flags);
 983         fcp_scsi_queue_it(fc, fc->rst_pkt, fcmd, 0);
 984         spin_unlock_irqrestore(SCpnt->device->host->host_lock, flags);
 985
 986         down(&sem);
 987
 988         fc->rst_pkt->device->host->eh_action = NULL;
 989         del_timer(&fc->rst_pkt->eh_timeout);
 990
 991         /*
 992          * See if timeout.  If so, tell the host to forget about it.
 993          * In other words, we don't want a callback any more.
 994          */
 995         if (fc->rst_pkt->eh_state == SCSI_STATE_TIMEOUT ) {
 996                 fc->rst_pkt->eh_state = SCSI_STATE_UNUSED;
 997                 return FAILED;
 998         }
 999         fc->rst_pkt->eh_state = SCSI_STATE_UNUSED;
1000 #endif
1001         return SUCCESS;
1002 }
1003
1004 static int __fcp_scsi_host_reset(struct scsi_cmnd *SCpnt)
1005 {
1006         fc_channel *fc = FC_SCMND(SCpnt);
1007         fcp_cmnd *fcmd = FCP_CMND(SCpnt);
1008         int i;
1009
1010         printk ("FC: host reset\n");
1011
1012         for (i=0; i < fc->can_queue; i++) {
1013                 if (fc->cmd_slots[i] && SCpnt->result != DID_ABORT) {
1014                         SCpnt->result = DID_RESET;
1015                         fcmd->done(SCpnt);
1016                         fc->cmd_slots[i] = NULL;
1017                 }
1018         }
1019         fc->reset(fc);
1020         fc->abort_count = 0;
1021         if (fcp_initialize(fc, 1)) return SUCCESS;
1022         else return FAILED;
1023 }
1024
1025 int fcp_scsi_host_reset(struct scsi_cmnd *SCpnt)
1026 {
1027         unsigned long flags;
1028         int rc;
1029
1030         spin_lock_irqsave(SCpnt->device->host->host_lock, flags);
1031         rc = __fcp_scsi_host_reset(SCpnt);
1032         spin_unlock_irqrestore(SCpnt->device->host->host_lock, flags);
1033
1034         return rc;
1035 }
1036
1037 static int fcp_els_queue_it(fc_channel *fc, fcp_cmnd *fcmd)
1038 {
1039         long i;
1040
1041         i = find_first_zero_bit (fc->scsi_bitmap, fc->scsi_bitmap_end);
1042         set_bit (i, fc->scsi_bitmap);
1043         fcmd->token = i;
1044         fc->scsi_free--;
1045         fc->cmd_slots[fcmd->token] = fcmd;
1046         return fcp_scsi_queue_it(fc, NULL, fcmd, 0);
1047 }
1048
1049 static int fc_do_els(fc_channel *fc, unsigned int alpa, void *data, int len)
1050 {
1051         fcp_cmnd _fcmd, *fcmd;
1052         fc_hdr *fch;
1053         lse l;
1054         int i;
1055
1056         fcmd = &_fcmd;
1057         memset(fcmd, 0, sizeof(fcp_cmnd));
1058         FCD(("PLOGI SID %d DID %d\n", fc->sid, alpa))
1059         fch = &fcmd->fch;
1060         FILL_FCHDR_RCTL_DID(fch, R_CTL_ELS_REQ, alpa);
1061         FILL_FCHDR_SID(fch, fc->sid);
1062         FILL_FCHDR_TYPE_FCTL(fch, TYPE_EXTENDED_LS, F_CTL_FIRST_SEQ | F_CTL_SEQ_INITIATIVE);
1063         FILL_FCHDR_SEQ_DF_SEQ(fch, 0, 0, 0);
1064         FILL_FCHDR_OXRX(fch, 0xffff, 0xffff);
1065         fch->param = 0;
1066         fcmd->cmd = dma_map_single (fc->dev, data, 2 * len, DMA_BIDIRECTIONAL);
1067         fcmd->rsp = fcmd->cmd + len;
1068         fcmd->cmdlen = len;
1069         fcmd->rsplen = len;
1070         fcmd->data = (dma_addr_t)NULL;
1071         fcmd->fc = fc;
1072         fcmd->class = FC_CLASS_SIMPLE;
1073         fcmd->proto = TYPE_EXTENDED_LS;
1074
1075         memset (&l, 0, sizeof(lse));
1076         l.magic = LSEMAGIC;
1077         init_MUTEX_LOCKED(&l.sem);
1078         l.timer.function = fcp_login_timeout;
1079         l.timer.data = (unsigned long)&l;
1080         l.status = FC_STATUS_TIMED_OUT;
1081         fcmd->ls = (void *)&l;
1082
1083         disable_irq(fc->irq);
1084         fcp_els_queue_it(fc, fcmd);
1085         enable_irq(fc->irq);
1086
1087         for (i = 0;;) {
1088                 l.timer.expires = jiffies + 5 * HZ;
1089                 add_timer(&l.timer);
1090                 down(&l.sem);
1091                 del_timer(&l.timer);
1092                 if (l.status != FC_STATUS_TIMED_OUT) break;
1093                 if (++i == 3) break;
1094                 disable_irq(fc->irq);
1095                 fcp_scsi_queue_it(fc, NULL, fcmd, 0);
1096                 enable_irq(fc->irq);
1097         }
1098
1099         clear_bit(fcmd->token, fc->scsi_bitmap);
1100         fc->scsi_free++;
1101         dma_unmap_single (fc->dev, fcmd->cmd, 2 * len, DMA_BIDIRECTIONAL);
1102         return l.status;
1103 }
1104
1105 int fc_do_plogi(fc_channel *fc, unsigned char alpa, fc_wwn *node, fc_wwn *nport)
1106 {
1107         logi *l;
1108         int status;
1109
1110         l = (logi *)kzalloc(2 * sizeof(logi), GFP_KERNEL);
1111         if (!l) return -ENOMEM;
1112         l->code = LS_PLOGI;
1113         memcpy (&l->nport_wwn, &fc->wwn_nport, sizeof(fc_wwn));
1114         memcpy (&l->node_wwn, &fc->wwn_node, sizeof(fc_wwn));
1115         memcpy (&l->common, fc->common_svc, sizeof(common_svc_parm));
1116         memcpy (&l->class1, fc->class_svcs, 3*sizeof(svc_parm));
1117         status = fc_do_els(fc, alpa, l, sizeof(logi));
1118         if (status == FC_STATUS_OK) {
1119                 if (l[1].code == LS_ACC) {
1120 #ifdef FCDEBUG
1121                         u32 *u = (u32 *)&l[1].nport_wwn;
1122                         FCD(("AL-PA %02x: Port WWN %08x%08x Node WWN %08x%08x\n", alpa,
1123                                 u[0], u[1], u[2], u[3]))
1124 #endif
1125                         memcpy(nport, &l[1].nport_wwn, sizeof(fc_wwn));
1126                         memcpy(node, &l[1].node_wwn, sizeof(fc_wwn));
1127                 } else
1128                         status = FC_STATUS_BAD_RSP;
1129         }
1130         kfree(l);
1131         return status;
1132 }
1133
1134 typedef struct {
1135         unsigned int code;
1136         unsigned params[4];
1137 } prli;
1138
1139 int fc_do_prli(fc_channel *fc, unsigned char alpa)
1140 {
1141         prli *p;
1142         int status;
1143
1144         p = (prli *)kzalloc(2 * sizeof(prli), GFP_KERNEL);
1145         if (!p) return -ENOMEM;
1146         p->code = LS_PRLI;
1147         p->params[0] = 0x08002000;
1148         p->params[3] = 0x00000022;
1149         status = fc_do_els(fc, alpa, p, sizeof(prli));
1150         if (status == FC_STATUS_OK && p[1].code != LS_PRLI_ACC && p[1].code != LS_ACC)
1151                 status = FC_STATUS_BAD_RSP;
1152         kfree(p);
1153         return status;
1154 }
1155
1156 MODULE_LICENSE("GPL");
1157