drivers/scsi/lpfc/lpfc_init.c

   1 /*******************************************************************
   2  * This file is part of the Emulex Linux Device Driver for         *
   3  * Fibre Channel Host Bus Adapters.                                *
   4  * Copyright (C) 2004-2006 Emulex.  All rights reserved.           *
   5  * EMULEX and SLI are trademarks of Emulex.                        *
   6  * www.emulex.com                                                  *
   7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
   8  *                                                                 *
   9  * This program is free software; you can redistribute it and/or   *
  10  * modify it under the terms of version 2 of the GNU General       *
  11  * Public License as published by the Free Software Foundation.    *
  12  * This program is distributed in the hope that it will be useful. *
  13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
  14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
  15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
  16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
  17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
  18  * more details, a copy of which can be found in the file COPYING  *
  19  * included with this package.                                     *
  20  *******************************************************************/
  21
  22 #include <linux/blkdev.h>
  23 #include <linux/delay.h>
  24 #include <linux/dma-mapping.h>
  25 #include <linux/idr.h>
  26 #include <linux/interrupt.h>
  27 #include <linux/kthread.h>
  28 #include <linux/pci.h>
  29 #include <linux/spinlock.h>
  30
  31 #include <scsi/scsi.h>
  32 #include <scsi/scsi_device.h>
  33 #include <scsi/scsi_host.h>
  34 #include <scsi/scsi_transport_fc.h>
  35
  36 #include "lpfc_hw.h"
  37 #include "lpfc_sli.h"
  38 #include "lpfc_disc.h"
  39 #include "lpfc_scsi.h"
  40 #include "lpfc.h"
  41 #include "lpfc_logmsg.h"
  42 #include "lpfc_crtn.h"
  43 #include "lpfc_version.h"
  44
  45 static int lpfc_parse_vpd(struct lpfc_hba *, uint8_t *, int);
  46 static void lpfc_get_hba_model_desc(struct lpfc_hba *, uint8_t *, uint8_t *);
  47 static int lpfc_post_rcv_buf(struct lpfc_hba *);
  48
  49 static struct scsi_transport_template *lpfc_transport_template = NULL;
  50 static DEFINE_IDR(lpfc_hba_index);
  51
  52 /************************************************************************/
  53 /*                                                                      */
  54 /*    lpfc_config_port_prep                                             */
  55 /*    This routine will do LPFC initialization prior to the             */
  56 /*    CONFIG_PORT mailbox command. This will be initialized             */
  57 /*    as a SLI layer callback routine.                                  */
  58 /*    This routine returns 0 on success or -ERESTART if it wants        */
  59 /*    the SLI layer to reset the HBA and try again. Any                 */
  60 /*    other return value indicates an error.                            */
  61 /*                                                                      */
  62 /************************************************************************/
  63 int
  64 lpfc_config_port_prep(struct lpfc_hba * phba)
  65 {
  66         lpfc_vpd_t *vp = &phba->vpd;
  67         int i = 0, rc;
  68         LPFC_MBOXQ_t *pmb;
  69         MAILBOX_t *mb;
  70         char *lpfc_vpd_data = NULL;
  71         uint16_t offset = 0;
  72         static char licensed[56] =
  73                     "key unlock for use with gnu public licensed code only\0";
  74
  75         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  76         if (!pmb) {
  77                 phba->hba_state = LPFC_HBA_ERROR;
  78                 return -ENOMEM;
  79         }
  80
  81         mb = &pmb->mb;
  82         phba->hba_state = LPFC_INIT_MBX_CMDS;
  83
  84         if (lpfc_is_LC_HBA(phba->pcidev->device)) {
  85                 uint32_t *ptext = (uint32_t *) licensed;
  86
  87                 for (i = 0; i < 56; i += sizeof (uint32_t), ptext++)
  88                         *ptext = cpu_to_be32(*ptext);
  89
  90                 lpfc_read_nv(phba, pmb);
  91                 memset((char*)mb->un.varRDnvp.rsvd3, 0,
  92                         sizeof (mb->un.varRDnvp.rsvd3));
  93                 memcpy((char*)mb->un.varRDnvp.rsvd3, licensed,
  94                          sizeof (licensed));
  95
  96                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
  97
  98                 if (rc != MBX_SUCCESS) {
  99                         lpfc_printf_log(phba,
 100                                         KERN_ERR,
 101                                         LOG_MBOX,
 102                                         "%d:0324 Config Port initialization "
 103                                         "error, mbxCmd x%x READ_NVPARM, "
 104                                         "mbxStatus x%x\n",
 105                                         phba->brd_no,
 106                                         mb->mbxCommand, mb->mbxStatus);
 107                         mempool_free(pmb, phba->mbox_mem_pool);
 108                         return -ERESTART;
 109                 }
 110                 memcpy(phba->wwnn, (char *)mb->un.varRDnvp.nodename,
 111                        sizeof (mb->un.varRDnvp.nodename));
 112         }
 113
 114         /* Setup and issue mailbox READ REV command */
 115         lpfc_read_rev(phba, pmb);
 116         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 117         if (rc != MBX_SUCCESS) {
 118                 lpfc_printf_log(phba,
 119                                 KERN_ERR,
 120                                 LOG_INIT,
 121                                 "%d:0439 Adapter failed to init, mbxCmd x%x "
 122                                 "READ_REV, mbxStatus x%x\n",
 123                                 phba->brd_no,
 124                                 mb->mbxCommand, mb->mbxStatus);
 125                 mempool_free( pmb, phba->mbox_mem_pool);
 126                 return -ERESTART;
 127         }
 128
 129         /*
 130          * The value of rr must be 1 since the driver set the cv field to 1.
 131          * This setting requires the FW to set all revision fields.
 132          */
 133         if (mb->un.varRdRev.rr == 0) {
 134                 vp->rev.rBit = 0;
 135                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 136                                 "%d:0440 Adapter failed to init, READ_REV has "
 137                                 "missing revision information.\n",
 138                                 phba->brd_no);
 139                 mempool_free(pmb, phba->mbox_mem_pool);
 140                 return -ERESTART;
 141         }
 142
 143         /* Save information as VPD data */
 144         vp->rev.rBit = 1;
 145         vp->rev.sli1FwRev = mb->un.varRdRev.sli1FwRev;
 146         memcpy(vp->rev.sli1FwName, (char*) mb->un.varRdRev.sli1FwName, 16);
 147         vp->rev.sli2FwRev = mb->un.varRdRev.sli2FwRev;
 148         memcpy(vp->rev.sli2FwName, (char *) mb->un.varRdRev.sli2FwName, 16);
 149         vp->rev.biuRev = mb->un.varRdRev.biuRev;
 150         vp->rev.smRev = mb->un.varRdRev.smRev;
 151         vp->rev.smFwRev = mb->un.varRdRev.un.smFwRev;
 152         vp->rev.endecRev = mb->un.varRdRev.endecRev;
 153         vp->rev.fcphHigh = mb->un.varRdRev.fcphHigh;
 154         vp->rev.fcphLow = mb->un.varRdRev.fcphLow;
 155         vp->rev.feaLevelHigh = mb->un.varRdRev.feaLevelHigh;
 156         vp->rev.feaLevelLow = mb->un.varRdRev.feaLevelLow;
 157         vp->rev.postKernRev = mb->un.varRdRev.postKernRev;
 158         vp->rev.opFwRev = mb->un.varRdRev.opFwRev;
 159
 160         if (lpfc_is_LC_HBA(phba->pcidev->device))
 161                 memcpy(phba->RandomData, (char *)&mb->un.varWords[24],
 162                                                 sizeof (phba->RandomData));
 163
 164         /* Get adapter VPD information */
 165         pmb->context2 = kmalloc(DMP_RSP_SIZE, GFP_KERNEL);
 166         if (!pmb->context2)
 167                 goto out_free_mbox;
 168         lpfc_vpd_data = kmalloc(DMP_VPD_SIZE, GFP_KERNEL);
 169         if (!lpfc_vpd_data)
 170                 goto out_free_context2;
 171
 172         do {
 173                 lpfc_dump_mem(phba, pmb, offset);
 174                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 175
 176                 if (rc != MBX_SUCCESS) {
 177                         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
 178                                         "%d:0441 VPD not present on adapter, "
 179                                         "mbxCmd x%x DUMP VPD, mbxStatus x%x\n",
 180                                         phba->brd_no,
 181                                         mb->mbxCommand, mb->mbxStatus);
 182                         mb->un.varDmp.word_cnt = 0;
 183                 }
 184                 if (mb->un.varDmp.word_cnt > DMP_VPD_SIZE - offset)
 185                         mb->un.varDmp.word_cnt = DMP_VPD_SIZE - offset;
 186                 lpfc_sli_pcimem_bcopy(pmb->context2, lpfc_vpd_data + offset,
 187                                                         mb->un.varDmp.word_cnt);
 188                 offset += mb->un.varDmp.word_cnt;
 189         } while (mb->un.varDmp.word_cnt && offset < DMP_VPD_SIZE);
 190         lpfc_parse_vpd(phba, lpfc_vpd_data, offset);
 191
 192         kfree(lpfc_vpd_data);
 193 out_free_context2:
 194         kfree(pmb->context2);
 195 out_free_mbox:
 196         mempool_free(pmb, phba->mbox_mem_pool);
 197         return 0;
 198 }
 199
 200 /************************************************************************/
 201 /*                                                                      */
 202 /*    lpfc_config_port_post                                             */
 203 /*    This routine will do LPFC initialization after the                */
 204 /*    CONFIG_PORT mailbox command. This will be initialized             */
 205 /*    as a SLI layer callback routine.                                  */
 206 /*    This routine returns 0 on success. Any other return value         */
 207 /*    indicates an error.                                               */
 208 /*                                                                      */
 209 /************************************************************************/
 210 int
 211 lpfc_config_port_post(struct lpfc_hba * phba)
 212 {
 213         LPFC_MBOXQ_t *pmb;
 214         MAILBOX_t *mb;
 215         struct lpfc_dmabuf *mp;
 216         struct lpfc_sli *psli = &phba->sli;
 217         uint32_t status, timeout;
 218         int i, j, rc;
 219
 220         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
 221         if (!pmb) {
 222                 phba->hba_state = LPFC_HBA_ERROR;
 223                 return -ENOMEM;
 224         }
 225         mb = &pmb->mb;
 226
 227         lpfc_config_link(phba, pmb);
 228         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 229         if (rc != MBX_SUCCESS) {
 230                 lpfc_printf_log(phba,
 231                                 KERN_ERR,
 232                                 LOG_INIT,
 233                                 "%d:0447 Adapter failed init, mbxCmd x%x "
 234                                 "CONFIG_LINK mbxStatus x%x\n",
 235                                 phba->brd_no,
 236                                 mb->mbxCommand, mb->mbxStatus);
 237                 phba->hba_state = LPFC_HBA_ERROR;
 238                 mempool_free( pmb, phba->mbox_mem_pool);
 239                 return -EIO;
 240         }
 241
 242         /* Get login parameters for NID.  */
 243         lpfc_read_sparam(phba, pmb);
 244         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
 245                 lpfc_printf_log(phba,
 246                                 KERN_ERR,
 247                                 LOG_INIT,
 248                                 "%d:0448 Adapter failed init, mbxCmd x%x "
 249                                 "READ_SPARM mbxStatus x%x\n",
 250                                 phba->brd_no,
 251                                 mb->mbxCommand, mb->mbxStatus);
 252                 phba->hba_state = LPFC_HBA_ERROR;
 253                 mp = (struct lpfc_dmabuf *) pmb->context1;
 254                 mempool_free( pmb, phba->mbox_mem_pool);
 255                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
 256                 kfree(mp);
 257                 return -EIO;
 258         }
 259
 260         mp = (struct lpfc_dmabuf *) pmb->context1;
 261
 262         memcpy(&phba->fc_sparam, mp->virt, sizeof (struct serv_parm));
 263         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 264         kfree(mp);
 265         pmb->context1 = NULL;
 266
 267         memcpy(&phba->fc_nodename, &phba->fc_sparam.nodeName,
 268                sizeof (struct lpfc_name));
 269         memcpy(&phba->fc_portname, &phba->fc_sparam.portName,
 270                sizeof (struct lpfc_name));
 271         /* If no serial number in VPD data, use low 6 bytes of WWNN */
 272         /* This should be consolidated into parse_vpd ? - mr */
 273         if (phba->SerialNumber[0] == 0) {
 274                 uint8_t *outptr;
 275
 276                 outptr = &phba->fc_nodename.u.s.IEEE[0];
 277                 for (i = 0; i < 12; i++) {
 278                         status = *outptr++;
 279                         j = ((status & 0xf0) >> 4);
 280                         if (j <= 9)
 281                                 phba->SerialNumber[i] =
 282                                     (char)((uint8_t) 0x30 + (uint8_t) j);
 283                         else
 284                                 phba->SerialNumber[i] =
 285                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
 286                         i++;
 287                         j = (status & 0xf);
 288                         if (j <= 9)
 289                                 phba->SerialNumber[i] =
 290                                     (char)((uint8_t) 0x30 + (uint8_t) j);
 291                         else
 292                                 phba->SerialNumber[i] =
 293                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
 294                 }
 295         }
 296
 297         /* This should turn on DELAYED ABTS for ELS timeouts */
 298         lpfc_set_slim(phba, pmb, 0x052198, 0x1);
 299         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
 300                 phba->hba_state = LPFC_HBA_ERROR;
 301                 mempool_free( pmb, phba->mbox_mem_pool);
 302                 return -EIO;
 303         }
 304
 305
 306         lpfc_read_config(phba, pmb);
 307         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
 308                 lpfc_printf_log(phba,
 309                                 KERN_ERR,
 310                                 LOG_INIT,
 311                                 "%d:0453 Adapter failed to init, mbxCmd x%x "
 312                                 "READ_CONFIG, mbxStatus x%x\n",
 313                                 phba->brd_no,
 314                                 mb->mbxCommand, mb->mbxStatus);
 315                 phba->hba_state = LPFC_HBA_ERROR;
 316                 mempool_free( pmb, phba->mbox_mem_pool);
 317                 return -EIO;
 318         }
 319
 320         /* Reset the DFT_HBA_Q_DEPTH to the max xri  */
 321         if (phba->cfg_hba_queue_depth > (mb->un.varRdConfig.max_xri+1))
 322                 phba->cfg_hba_queue_depth =
 323                         mb->un.varRdConfig.max_xri + 1;
 324
 325         phba->lmt = mb->un.varRdConfig.lmt;
 326
 327         /* Get the default values for Model Name and Description */
 328         lpfc_get_hba_model_desc(phba, phba->ModelName, phba->ModelDesc);
 329
 330         if ((phba->cfg_link_speed > LINK_SPEED_10G)
 331             || ((phba->cfg_link_speed == LINK_SPEED_1G)
 332                 && !(phba->lmt & LMT_1Gb))
 333             || ((phba->cfg_link_speed == LINK_SPEED_2G)
 334                 && !(phba->lmt & LMT_2Gb))
 335             || ((phba->cfg_link_speed == LINK_SPEED_4G)
 336                 && !(phba->lmt & LMT_4Gb))
 337             || ((phba->cfg_link_speed == LINK_SPEED_8G)
 338                 && !(phba->lmt & LMT_8Gb))
 339             || ((phba->cfg_link_speed == LINK_SPEED_10G)
 340                 && !(phba->lmt & LMT_10Gb))) {
 341                 /* Reset link speed to auto */
 342                 lpfc_printf_log(phba,
 343                         KERN_WARNING,
 344                         LOG_LINK_EVENT,
 345                         "%d:1302 Invalid speed for this board: "
 346                         "Reset link speed to auto: x%x\n",
 347                         phba->brd_no,
 348                         phba->cfg_link_speed);
 349                         phba->cfg_link_speed = LINK_SPEED_AUTO;
 350         }
 351
 352         phba->hba_state = LPFC_LINK_DOWN;
 353
 354         /* Only process IOCBs on ring 0 till hba_state is READY */
 355         if (psli->ring[psli->ip_ring].cmdringaddr)
 356                 psli->ring[psli->ip_ring].flag |= LPFC_STOP_IOCB_EVENT;
 357         if (psli->ring[psli->fcp_ring].cmdringaddr)
 358                 psli->ring[psli->fcp_ring].flag |= LPFC_STOP_IOCB_EVENT;
 359         if (psli->ring[psli->next_ring].cmdringaddr)
 360                 psli->ring[psli->next_ring].flag |= LPFC_STOP_IOCB_EVENT;
 361
 362         /* Post receive buffers for desired rings */
 363         lpfc_post_rcv_buf(phba);
 364
 365         /* Enable appropriate host interrupts */
 366         spin_lock_irq(phba->host->host_lock);
 367         status = readl(phba->HCregaddr);
 368         status |= HC_MBINT_ENA | HC_ERINT_ENA | HC_LAINT_ENA;
 369         if (psli->num_rings > 0)
 370                 status |= HC_R0INT_ENA;
 371         if (psli->num_rings > 1)
 372                 status |= HC_R1INT_ENA;
 373         if (psli->num_rings > 2)
 374                 status |= HC_R2INT_ENA;
 375         if (psli->num_rings > 3)
 376                 status |= HC_R3INT_ENA;
 377
 378         if ((phba->cfg_poll & ENABLE_FCP_RING_POLLING) &&
 379             (phba->cfg_poll & DISABLE_FCP_RING_INT))
 380                 status &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
 381
 382         writel(status, phba->HCregaddr);
 383         readl(phba->HCregaddr); /* flush */
 384         spin_unlock_irq(phba->host->host_lock);
 385
 386         /*
 387          * Setup the ring 0 (els)  timeout handler
 388          */
 389         timeout = phba->fc_ratov << 1;
 390         phba->els_tmofunc.expires = jiffies + HZ * timeout;
 391         add_timer(&phba->els_tmofunc);
 392
 393         lpfc_init_link(phba, pmb, phba->cfg_topology, phba->cfg_link_speed);
 394         pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
 395         if (lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT) != MBX_SUCCESS) {
 396                 lpfc_printf_log(phba,
 397                                 KERN_ERR,
 398                                 LOG_INIT,
 399                                 "%d:0454 Adapter failed to init, mbxCmd x%x "
 400                                 "INIT_LINK, mbxStatus x%x\n",
 401                                 phba->brd_no,
 402                                 mb->mbxCommand, mb->mbxStatus);
 403
 404                 /* Clear all interrupt enable conditions */
 405                 writel(0, phba->HCregaddr);
 406                 readl(phba->HCregaddr); /* flush */
 407                 /* Clear all pending interrupts */
 408                 writel(0xffffffff, phba->HAregaddr);
 409                 readl(phba->HAregaddr); /* flush */
 410
 411                 phba->hba_state = LPFC_HBA_ERROR;
 412                 mempool_free(pmb, phba->mbox_mem_pool);
 413                 return -EIO;
 414         }
 415         /* MBOX buffer will be freed in mbox compl */
 416
 417         i = 0;
 418         while ((phba->hba_state != LPFC_HBA_READY) ||
 419                (phba->num_disc_nodes) || (phba->fc_prli_sent) ||
 420                ((phba->fc_map_cnt == 0) && (i<2)) ||
 421                (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE)) {
 422                 /* Check every second for 30 retries. */
 423                 i++;
 424                 if (i > 30) {
 425                         break;
 426                 }
 427                 if ((i >= 15) && (phba->hba_state <= LPFC_LINK_DOWN)) {
 428                         /* The link is down.  Set linkdown timeout */
 429                         break;
 430                 }
 431
 432                 /* Delay for 1 second to give discovery time to complete. */
 433                 msleep(1000);
 434
 435         }
 436
 437         /* Since num_disc_nodes keys off of PLOGI, delay a bit to let
 438          * any potential PRLIs to flush thru the SLI sub-system.
 439          */
 440         msleep(50);
 441
 442         return (0);
 443 }
 444
 445 /************************************************************************/
 446 /*                                                                      */
 447 /*    lpfc_hba_down_prep                                                */
 448 /*    This routine will do LPFC uninitialization before the             */
 449 /*    HBA is reset when bringing down the SLI Layer. This will be       */
 450 /*    initialized as a SLI layer callback routine.                      */
 451 /*    This routine returns 0 on success. Any other return value         */
 452 /*    indicates an error.                                               */
 453 /*                                                                      */
 454 /************************************************************************/
 455 int
 456 lpfc_hba_down_prep(struct lpfc_hba * phba)
 457 {
 458         /* Disable interrupts */
 459         writel(0, phba->HCregaddr);
 460         readl(phba->HCregaddr); /* flush */
 461
 462         /* Cleanup potential discovery resources */
 463         lpfc_els_flush_rscn(phba);
 464         lpfc_els_flush_cmd(phba);
 465         lpfc_disc_flush_list(phba);
 466
 467         /* Disable SLI2 since we disabled interrupts */
 468         phba->sli.sli_flag &= ~LPFC_SLI2_ACTIVE;
 469         return (0);
 470 }
 471
 472 /************************************************************************/
 473 /*                                                                      */
 474 /*    lpfc_hba_down_post                                                */
 475 /*    This routine will do uninitialization after the HBA is reset      */
 476 /*    when bringing down the SLI Layer.                                 */
 477 /*    This routine returns 0 on success. Any other return value         */
 478 /*    indicates an error.                                               */
 479 /*                                                                      */
 480 /************************************************************************/
 481 int
 482 lpfc_hba_down_post(struct lpfc_hba * phba)
 483 {
 484         struct lpfc_sli *psli = &phba->sli;
 485         struct lpfc_sli_ring *pring;
 486         struct lpfc_dmabuf *mp, *next_mp;
 487         int i;
 488
 489         /* Cleanup preposted buffers on the ELS ring */
 490         pring = &psli->ring[LPFC_ELS_RING];
 491         list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
 492                 list_del(&mp->list);
 493                 pring->postbufq_cnt--;
 494                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
 495                 kfree(mp);
 496         }
 497
 498         for (i = 0; i < psli->num_rings; i++) {
 499                 pring = &psli->ring[i];
 500                 lpfc_sli_abort_iocb_ring(phba, pring);
 501         }
 502
 503         return 0;
 504 }
 505
 506 /************************************************************************/
 507 /*                                                                      */
 508 /*    lpfc_handle_eratt                                                 */
 509 /*    This routine will handle processing a Host Attention              */
 510 /*    Error Status event. This will be initialized                      */
 511 /*    as a SLI layer callback routine.                                  */
 512 /*                                                                      */
 513 /************************************************************************/
 514 void
 515 lpfc_handle_eratt(struct lpfc_hba * phba)
 516 {
 517         struct lpfc_sli *psli = &phba->sli;
 518         struct lpfc_sli_ring  *pring;
 519
 520         if (phba->work_hs & HS_FFER6) {
 521                 /* Re-establishing Link */
 522                 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
 523                                 "%d:1301 Re-establishing Link "
 524                                 "Data: x%x x%x x%x\n",
 525                                 phba->brd_no, phba->work_hs,
 526                                 phba->work_status[0], phba->work_status[1]);
 527                 spin_lock_irq(phba->host->host_lock);
 528                 phba->fc_flag |= FC_ESTABLISH_LINK;
 529                 spin_unlock_irq(phba->host->host_lock);
 530
 531                 /*
 532                 * Firmware stops when it triggled erratt with HS_FFER6.
 533                 * That could cause the I/Os dropped by the firmware.
 534                 * Error iocb (I/O) on txcmplq and let the SCSI layer
 535                 * retry it after re-establishing link.
 536                 */
 537                 pring = &psli->ring[psli->fcp_ring];
 538                 lpfc_sli_abort_iocb_ring(phba, pring);
 539
 540
 541                 /*
 542                  * There was a firmware error.  Take the hba offline and then
 543                  * attempt to restart it.
 544                  */
 545                 lpfc_offline(phba);
 546                 lpfc_sli_brdrestart(phba);
 547                 if (lpfc_online(phba) == 0) {   /* Initialize the HBA */
 548                         mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
 549                         return;
 550                 }
 551         } else {
 552                 /* The if clause above forces this code path when the status
 553                  * failure is a value other than FFER6.  Do not call the offline
 554                  *  twice. This is the adapter hardware error path.
 555                  */
 556                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 557                                 "%d:0457 Adapter Hardware Error "
 558                                 "Data: x%x x%x x%x\n",
 559                                 phba->brd_no, phba->work_hs,
 560                                 phba->work_status[0], phba->work_status[1]);
 561
 562                 lpfc_offline(phba);
 563                 phba->hba_state = LPFC_HBA_ERROR;
 564                 lpfc_hba_down_post(phba);
 565         }
 566 }
 567
 568 /************************************************************************/
 569 /*                                                                      */
 570 /*    lpfc_handle_latt                                                  */
 571 /*    This routine will handle processing a Host Attention              */
 572 /*    Link Status event. This will be initialized                       */
 573 /*    as a SLI layer callback routine.                                  */
 574 /*                                                                      */
 575 /************************************************************************/
 576 void
 577 lpfc_handle_latt(struct lpfc_hba * phba)
 578 {
 579         struct lpfc_sli *psli = &phba->sli;
 580         LPFC_MBOXQ_t *pmb;
 581         volatile uint32_t control;
 582         struct lpfc_dmabuf *mp;
 583         int rc = -ENOMEM;
 584
 585         pmb = (LPFC_MBOXQ_t *)mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
 586         if (!pmb)
 587                 goto lpfc_handle_latt_err_exit;
 588
 589         mp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
 590         if (!mp)
 591                 goto lpfc_handle_latt_free_pmb;
 592
 593         mp->virt = lpfc_mbuf_alloc(phba, 0, &mp->phys);
 594         if (!mp->virt)
 595                 goto lpfc_handle_latt_free_mp;
 596
 597         rc = -EIO;
 598
 599         /* Cleanup any outstanding ELS commands */
 600         lpfc_els_flush_cmd(phba);
 601
 602         psli->slistat.link_event++;
 603         lpfc_read_la(phba, pmb, mp);
 604         pmb->mbox_cmpl = lpfc_mbx_cmpl_read_la;
 605         rc = lpfc_sli_issue_mbox (phba, pmb, (MBX_NOWAIT | MBX_STOP_IOCB));
 606         if (rc == MBX_NOT_FINISHED)
 607                 goto lpfc_handle_latt_free_mp;
 608
 609         /* Clear Link Attention in HA REG */
 610         spin_lock_irq(phba->host->host_lock);
 611         writel(HA_LATT, phba->HAregaddr);
 612         readl(phba->HAregaddr); /* flush */
 613         spin_unlock_irq(phba->host->host_lock);
 614
 615         return;
 616
 617 lpfc_handle_latt_free_mp:
 618         kfree(mp);
 619 lpfc_handle_latt_free_pmb:
 620         kfree(pmb);
 621 lpfc_handle_latt_err_exit:
 622         /* Enable Link attention interrupts */
 623         spin_lock_irq(phba->host->host_lock);
 624         psli->sli_flag |= LPFC_PROCESS_LA;
 625         control = readl(phba->HCregaddr);
 626         control |= HC_LAINT_ENA;
 627         writel(control, phba->HCregaddr);
 628         readl(phba->HCregaddr); /* flush */
 629
 630         /* Clear Link Attention in HA REG */
 631         writel(HA_LATT, phba->HAregaddr);
 632         readl(phba->HAregaddr); /* flush */
 633         spin_unlock_irq(phba->host->host_lock);
 634         lpfc_linkdown(phba);
 635         phba->hba_state = LPFC_HBA_ERROR;
 636
 637         /* The other case is an error from issue_mbox */
 638         if (rc == -ENOMEM)
 639                 lpfc_printf_log(phba,
 640                                 KERN_WARNING,
 641                                 LOG_MBOX,
 642                                 "%d:0300 READ_LA: no buffers\n",
 643                                 phba->brd_no);
 644
 645         return;
 646 }
 647
 648 /************************************************************************/
 649 /*                                                                      */
 650 /*   lpfc_parse_vpd                                                     */
 651 /*   This routine will parse the VPD data                               */
 652 /*                                                                      */
 653 /************************************************************************/
 654 static int
 655 lpfc_parse_vpd(struct lpfc_hba * phba, uint8_t * vpd, int len)
 656 {
 657         uint8_t lenlo, lenhi;
 658         uint32_t Length;
 659         int i, j;
 660         int finished = 0;
 661         int index = 0;
 662
 663         if (!vpd)
 664                 return 0;
 665
 666         /* Vital Product */
 667         lpfc_printf_log(phba,
 668                         KERN_INFO,
 669                         LOG_INIT,
 670                         "%d:0455 Vital Product Data: x%x x%x x%x x%x\n",
 671                         phba->brd_no,
 672                         (uint32_t) vpd[0], (uint32_t) vpd[1], (uint32_t) vpd[2],
 673                         (uint32_t) vpd[3]);
 674         while (!finished && (index < (len - 4))) {
 675                 switch (vpd[index]) {
 676                 case 0x82:
 677                 case 0x91:
 678                         index += 1;
 679                         lenlo = vpd[index];
 680                         index += 1;
 681                         lenhi = vpd[index];
 682                         index += 1;
 683                         i = ((((unsigned short)lenhi) << 8) + lenlo);
 684                         index += i;
 685                         break;
 686                 case 0x90:
 687                         index += 1;
 688                         lenlo = vpd[index];
 689                         index += 1;
 690                         lenhi = vpd[index];
 691                         index += 1;
 692                         Length = ((((unsigned short)lenhi) << 8) + lenlo);
 693                         if (Length > len - index)
 694                                 Length = len - index;
 695                         while (Length > 0) {
 696                         /* Look for Serial Number */
 697                         if ((vpd[index] == 'S') && (vpd[index+1] == 'N')) {
 698                                 index += 2;
 699                                 i = vpd[index];
 700                                 index += 1;
 701                                 j = 0;
 702                                 Length -= (3+i);
 703                                 while(i--) {
 704                                         phba->SerialNumber[j++] = vpd[index++];
 705                                         if (j == 31)
 706                                                 break;
 707                                 }
 708                                 phba->SerialNumber[j] = 0;
 709                                 continue;
 710                         }
 711                         else if ((vpd[index] == 'V') && (vpd[index+1] == '1')) {
 712                                 phba->vpd_flag |= VPD_MODEL_DESC;
 713                                 index += 2;
 714                                 i = vpd[index];
 715                                 index += 1;
 716                                 j = 0;
 717                                 Length -= (3+i);
 718                                 while(i--) {
 719                                         phba->ModelDesc[j++] = vpd[index++];
 720                                         if (j == 255)
 721                                                 break;
 722                                 }
 723                                 phba->ModelDesc[j] = 0;
 724                                 continue;
 725                         }
 726                         else if ((vpd[index] == 'V') && (vpd[index+1] == '2')) {
 727                                 phba->vpd_flag |= VPD_MODEL_NAME;
 728                                 index += 2;
 729                                 i = vpd[index];
 730                                 index += 1;
 731                                 j = 0;
 732                                 Length -= (3+i);
 733                                 while(i--) {
 734                                         phba->ModelName[j++] = vpd[index++];
 735                                         if (j == 79)
 736                                                 break;
 737                                 }
 738                                 phba->ModelName[j] = 0;
 739                                 continue;
 740                         }
 741                         else if ((vpd[index] == 'V') && (vpd[index+1] == '3')) {
 742                                 phba->vpd_flag |= VPD_PROGRAM_TYPE;
 743                                 index += 2;
 744                                 i = vpd[index];
 745                                 index += 1;
 746                                 j = 0;
 747                                 Length -= (3+i);
 748                                 while(i--) {
 749                                         phba->ProgramType[j++] = vpd[index++];
 750                                         if (j == 255)
 751                                                 break;
 752                                 }
 753                                 phba->ProgramType[j] = 0;
 754                                 continue;
 755                         }
 756                         else if ((vpd[index] == 'V') && (vpd[index+1] == '4')) {
 757                                 phba->vpd_flag |= VPD_PORT;
 758                                 index += 2;
 759                                 i = vpd[index];
 760                                 index += 1;
 761                                 j = 0;
 762                                 Length -= (3+i);
 763                                 while(i--) {
 764                                 phba->Port[j++] = vpd[index++];
 765                                 if (j == 19)
 766                                         break;
 767                                 }
 768                                 phba->Port[j] = 0;
 769                                 continue;
 770                         }
 771                         else {
 772                                 index += 2;
 773                                 i = vpd[index];
 774                                 index += 1;
 775                                 index += i;
 776                                 Length -= (3 + i);
 777                         }
 778                 }
 779                 finished = 0;
 780                 break;
 781                 case 0x78:
 782                         finished = 1;
 783                         break;
 784                 default:
 785                         index ++;
 786                         break;
 787                 }
 788         }
 789
 790         return(1);
 791 }
 792
 793 static void
 794 lpfc_get_hba_model_desc(struct lpfc_hba * phba, uint8_t * mdp, uint8_t * descp)
 795 {
 796         lpfc_vpd_t *vp;
 797         uint16_t dev_id = phba->pcidev->device;
 798         uint16_t dev_subid = phba->pcidev->subsystem_device;
 799         uint8_t hdrtype;
 800         int max_speed;
 801         char * ports;
 802         struct {
 803                 char * name;
 804                 int    max_speed;
 805                 char * ports;
 806                 char * bus;
 807         } m;
 808
 809         pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
 810         ports = (hdrtype == 0x80) ? "2-port " : "";
 811         if (mdp && mdp[0] != '\0'
 812                 && descp && descp[0] != '\0')
 813                 return;
 814
 815         if (phba->lmt & LMT_10Gb)
 816                 max_speed = 10;
 817         else if (phba->lmt & LMT_8Gb)
 818                 max_speed = 8;
 819         else if (phba->lmt & LMT_4Gb)
 820                 max_speed = 4;
 821         else if (phba->lmt & LMT_2Gb)
 822                 max_speed = 2;
 823         else
 824                 max_speed = 1;
 825
 826         vp = &phba->vpd;
 827
 828         switch (dev_id) {
 829         case PCI_DEVICE_ID_FIREFLY:
 830                 m = (typeof(m)){"LP6000", max_speed, "", "PCI"};
 831                 break;
 832         case PCI_DEVICE_ID_SUPERFLY:
 833                 if (vp->rev.biuRev >= 1 && vp->rev.biuRev <= 3)
 834                         m = (typeof(m)){"LP7000", max_speed, "", "PCI"};
 835                 else
 836                         m = (typeof(m)){"LP7000E", max_speed, "", "PCI"};
 837                 break;
 838         case PCI_DEVICE_ID_DRAGONFLY:
 839                 m = (typeof(m)){"LP8000", max_speed, "", "PCI"};
 840                 break;
 841         case PCI_DEVICE_ID_CENTAUR:
 842                 if (FC_JEDEC_ID(vp->rev.biuRev) == CENTAUR_2G_JEDEC_ID)
 843                         m = (typeof(m)){"LP9002", max_speed, "", "PCI"};
 844                 else
 845                         m = (typeof(m)){"LP9000", max_speed, "", "PCI"};
 846                 break;
 847         case PCI_DEVICE_ID_RFLY:
 848                 m = (typeof(m)){"LP952", max_speed, "", "PCI"};
 849                 break;
 850         case PCI_DEVICE_ID_PEGASUS:
 851                 m = (typeof(m)){"LP9802", max_speed, "", "PCI-X"};
 852                 break;
 853         case PCI_DEVICE_ID_THOR:
 854                 if (hdrtype == 0x80)
 855                         m = (typeof(m)){"LP10000DC",
 856                                         max_speed, ports, "PCI-X"};
 857                 else
 858                         m = (typeof(m)){"LP10000",
 859                                         max_speed, ports, "PCI-X"};
 860                 break;
 861         case PCI_DEVICE_ID_VIPER:
 862                 m = (typeof(m)){"LPX1000", max_speed, "", "PCI-X"};
 863                 break;
 864         case PCI_DEVICE_ID_PFLY:
 865                 m = (typeof(m)){"LP982", max_speed, "", "PCI-X"};
 866                 break;
 867         case PCI_DEVICE_ID_TFLY:
 868                 if (hdrtype == 0x80)
 869                         m = (typeof(m)){"LP1050DC", max_speed, ports, "PCI-X"};
 870                 else
 871                         m = (typeof(m)){"LP1050", max_speed, ports, "PCI-X"};
 872                 break;
 873         case PCI_DEVICE_ID_HELIOS:
 874                 if (hdrtype == 0x80)
 875                         m = (typeof(m)){"LP11002", max_speed, ports, "PCI-X2"};
 876                 else
 877                         m = (typeof(m)){"LP11000", max_speed, ports, "PCI-X2"};
 878                 break;
 879         case PCI_DEVICE_ID_HELIOS_SCSP:
 880                 m = (typeof(m)){"LP11000-SP", max_speed, ports, "PCI-X2"};
 881                 break;
 882         case PCI_DEVICE_ID_HELIOS_DCSP:
 883                 m = (typeof(m)){"LP11002-SP", max_speed, ports, "PCI-X2"};
 884                 break;
 885         case PCI_DEVICE_ID_NEPTUNE:
 886                 if (hdrtype == 0x80)
 887                         m = (typeof(m)){"LPe1002", max_speed, ports, "PCIe"};
 888                 else
 889                         m = (typeof(m)){"LPe1000", max_speed, ports, "PCIe"};
 890                 break;
 891         case PCI_DEVICE_ID_NEPTUNE_SCSP:
 892                 m = (typeof(m)){"LPe1000-SP", max_speed, ports, "PCIe"};
 893                 break;
 894         case PCI_DEVICE_ID_NEPTUNE_DCSP:
 895                 m = (typeof(m)){"LPe1002-SP", max_speed, ports, "PCIe"};
 896                 break;
 897         case PCI_DEVICE_ID_BMID:
 898                 m = (typeof(m)){"LP1150", max_speed, ports, "PCI-X2"};
 899                 break;
 900         case PCI_DEVICE_ID_BSMB:
 901                 m = (typeof(m)){"LP111", max_speed, ports, "PCI-X2"};
 902                 break;
 903         case PCI_DEVICE_ID_ZEPHYR:
 904                 if (hdrtype == 0x80)
 905                         m = (typeof(m)){"LPe11002", max_speed, ports, "PCIe"};
 906                 else
 907                         m = (typeof(m)){"LPe11000", max_speed, ports, "PCIe"};
 908                 break;
 909         case PCI_DEVICE_ID_ZEPHYR_SCSP:
 910                 m = (typeof(m)){"LPe11000", max_speed, ports, "PCIe"};
 911                 break;
 912         case PCI_DEVICE_ID_ZEPHYR_DCSP:
 913                 m = (typeof(m)){"LPe11002-SP", max_speed, ports, "PCIe"};
 914                 break;
 915         case PCI_DEVICE_ID_ZMID:
 916                 m = (typeof(m)){"LPe1150", max_speed, ports, "PCIe"};
 917                 break;
 918         case PCI_DEVICE_ID_ZSMB:
 919                 m = (typeof(m)){"LPe111", max_speed, ports, "PCIe"};
 920                 break;
 921         case PCI_DEVICE_ID_LP101:
 922                 m = (typeof(m)){"LP101", max_speed, ports, "PCI-X"};
 923                 break;
 924         case PCI_DEVICE_ID_LP10000S:
 925                 m = (typeof(m)){"LP10000-S", max_speed, ports, "PCI"};
 926                 break;
 927         case PCI_DEVICE_ID_LP11000S:
 928         case PCI_DEVICE_ID_LPE11000S:
 929                 switch (dev_subid) {
 930                 case PCI_SUBSYSTEM_ID_LP11000S:
 931                         m = (typeof(m)){"LP11000-S", max_speed,
 932                                         ports, "PCI-X2"};
 933                         break;
 934                 case PCI_SUBSYSTEM_ID_LP11002S:
 935                         m = (typeof(m)){"LP11002-S", max_speed,
 936                                         ports, "PCI-X2"};
 937                         break;
 938                 case PCI_SUBSYSTEM_ID_LPE11000S:
 939                         m = (typeof(m)){"LPe11000-S", max_speed,
 940                                         ports, "PCIe"};
 941                         break;
 942                 case PCI_SUBSYSTEM_ID_LPE11002S:
 943                         m = (typeof(m)){"LPe11002-S", max_speed,
 944                                         ports, "PCIe"};
 945                         break;
 946                 case PCI_SUBSYSTEM_ID_LPE11010S:
 947                         m = (typeof(m)){"LPe11010-S", max_speed,
 948                                         "10-port ", "PCIe"};
 949                         break;
 950                 default:
 951                         break;
 952                 }
 953                 break;
 954         default:
 955                 break;
 956         }
 957
 958         if (mdp && mdp[0] == '\0')
 959                 snprintf(mdp, 79,"%s", m.name);
 960         if (descp && descp[0] == '\0')
 961                 snprintf(descp, 255,
 962                          "Emulex %s %dGb %s%s Fibre Channel Adapter",
 963                          m.name, m.max_speed, m.ports, m.bus);
 964 }
 965
 966 /**************************************************/
 967 /*   lpfc_post_buffer                             */
 968 /*                                                */
 969 /*   This routine will post count buffers to the  */
 970 /*   ring with the QUE_RING_BUF_CN command. This  */
 971 /*   allows 3 buffers / command to be posted.     */
 972 /*   Returns the number of buffers NOT posted.    */
 973 /**************************************************/
 974 int
 975 lpfc_post_buffer(struct lpfc_hba * phba, struct lpfc_sli_ring * pring, int cnt,
 976                  int type)
 977 {
 978         IOCB_t *icmd;
 979         struct lpfc_iocbq *iocb;
 980         struct lpfc_dmabuf *mp1, *mp2;
 981
 982         cnt += pring->missbufcnt;
 983
 984         /* While there are buffers to post */
 985         while (cnt > 0) {
 986                 /* Allocate buffer for  command iocb */
 987                 spin_lock_irq(phba->host->host_lock);
 988                 iocb = lpfc_sli_get_iocbq(phba);
 989                 spin_unlock_irq(phba->host->host_lock);
 990                 if (iocb == NULL) {
 991                         pring->missbufcnt = cnt;
 992                         return cnt;
 993                 }
 994                 icmd = &iocb->iocb;
 995
 996                 /* 2 buffers can be posted per command */
 997                 /* Allocate buffer to post */
 998                 mp1 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
 999                 if (mp1)
1000                     mp1->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
1001                                                 &mp1->phys);
1002                 if (mp1 == 0 || mp1->virt == 0) {
1003                         kfree(mp1);
1004                         spin_lock_irq(phba->host->host_lock);
1005                         lpfc_sli_release_iocbq(phba, iocb);
1006                         spin_unlock_irq(phba->host->host_lock);
1007                         pring->missbufcnt = cnt;
1008                         return cnt;
1009                 }
1010
1011                 INIT_LIST_HEAD(&mp1->list);
1012                 /* Allocate buffer to post */
1013                 if (cnt > 1) {
1014                         mp2 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
1015                         if (mp2)
1016                                 mp2->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
1017                                                             &mp2->phys);
1018                         if (mp2 == 0 || mp2->virt == 0) {
1019                                 kfree(mp2);
1020                                 lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
1021                                 kfree(mp1);
1022                                 spin_lock_irq(phba->host->host_lock);
1023                                 lpfc_sli_release_iocbq(phba, iocb);
1024                                 spin_unlock_irq(phba->host->host_lock);
1025                                 pring->missbufcnt = cnt;
1026                                 return cnt;
1027                         }
1028
1029                         INIT_LIST_HEAD(&mp2->list);
1030                 } else {
1031                         mp2 = NULL;
1032                 }
1033
1034                 icmd->un.cont64[0].addrHigh = putPaddrHigh(mp1->phys);
1035                 icmd->un.cont64[0].addrLow = putPaddrLow(mp1->phys);
1036                 icmd->un.cont64[0].tus.f.bdeSize = FCELSSIZE;
1037                 icmd->ulpBdeCount = 1;
1038                 cnt--;
1039                 if (mp2) {
1040                         icmd->un.cont64[1].addrHigh = putPaddrHigh(mp2->phys);
1041                         icmd->un.cont64[1].addrLow = putPaddrLow(mp2->phys);
1042                         icmd->un.cont64[1].tus.f.bdeSize = FCELSSIZE;
1043                         cnt--;
1044                         icmd->ulpBdeCount = 2;
1045                 }
1046
1047                 icmd->ulpCommand = CMD_QUE_RING_BUF64_CN;
1048                 icmd->ulpLe = 1;
1049
1050                 spin_lock_irq(phba->host->host_lock);
1051                 if (lpfc_sli_issue_iocb(phba, pring, iocb, 0) == IOCB_ERROR) {
1052                         lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
1053                         kfree(mp1);
1054                         cnt++;
1055                         if (mp2) {
1056                                 lpfc_mbuf_free(phba, mp2->virt, mp2->phys);
1057                                 kfree(mp2);
1058                                 cnt++;
1059                         }
1060                         lpfc_sli_release_iocbq(phba, iocb);
1061                         pring->missbufcnt = cnt;
1062                         spin_unlock_irq(phba->host->host_lock);
1063                         return cnt;
1064                 }
1065                 spin_unlock_irq(phba->host->host_lock);
1066                 lpfc_sli_ringpostbuf_put(phba, pring, mp1);
1067                 if (mp2) {
1068                         lpfc_sli_ringpostbuf_put(phba, pring, mp2);
1069                 }
1070         }
1071         pring->missbufcnt = 0;
1072         return 0;
1073 }
1074
1075 /************************************************************************/
1076 /*                                                                      */
1077 /*   lpfc_post_rcv_buf                                                  */
1078 /*   This routine post initial rcv buffers to the configured rings      */
1079 /*                                                                      */
1080 /************************************************************************/
1081 static int
1082 lpfc_post_rcv_buf(struct lpfc_hba * phba)
1083 {
1084         struct lpfc_sli *psli = &phba->sli;
1085
1086         /* Ring 0, ELS / CT buffers */
1087         lpfc_post_buffer(phba, &psli->ring[LPFC_ELS_RING], LPFC_BUF_RING0, 1);
1088         /* Ring 2 - FCP no buffers needed */
1089
1090         return 0;
1091 }
1092
1093 #define S(N,V) (((V)<<(N))|((V)>>(32-(N))))
1094
1095 /************************************************************************/
1096 /*                                                                      */
1097 /*   lpfc_sha_init                                                      */
1098 /*                                                                      */
1099 /************************************************************************/
1100 static void
1101 lpfc_sha_init(uint32_t * HashResultPointer)
1102 {
1103         HashResultPointer[0] = 0x67452301;
1104         HashResultPointer[1] = 0xEFCDAB89;
1105         HashResultPointer[2] = 0x98BADCFE;
1106         HashResultPointer[3] = 0x10325476;
1107         HashResultPointer[4] = 0xC3D2E1F0;
1108 }
1109
1110 /************************************************************************/
1111 /*                                                                      */
1112 /*   lpfc_sha_iterate                                                   */
1113 /*                                                                      */
1114 /************************************************************************/
1115 static void
1116 lpfc_sha_iterate(uint32_t * HashResultPointer, uint32_t * HashWorkingPointer)
1117 {
1118         int t;
1119         uint32_t TEMP;
1120         uint32_t A, B, C, D, E;
1121         t = 16;
1122         do {
1123                 HashWorkingPointer[t] =
1124                     S(1,
1125                       HashWorkingPointer[t - 3] ^ HashWorkingPointer[t -
1126                                                                      8] ^
1127                       HashWorkingPointer[t - 14] ^ HashWorkingPointer[t - 16]);
1128         } while (++t <= 79);
1129         t = 0;
1130         A = HashResultPointer[0];
1131         B = HashResultPointer[1];
1132         C = HashResultPointer[2];
1133         D = HashResultPointer[3];
1134         E = HashResultPointer[4];
1135
1136         do {
1137                 if (t < 20) {
1138                         TEMP = ((B & C) | ((~B) & D)) + 0x5A827999;
1139                 } else if (t < 40) {
1140                         TEMP = (B ^ C ^ D) + 0x6ED9EBA1;
1141                 } else if (t < 60) {
1142                         TEMP = ((B & C) | (B & D) | (C & D)) + 0x8F1BBCDC;
1143                 } else {
1144                         TEMP = (B ^ C ^ D) + 0xCA62C1D6;
1145                 }
1146                 TEMP += S(5, A) + E + HashWorkingPointer[t];
1147                 E = D;
1148                 D = C;
1149                 C = S(30, B);
1150                 B = A;
1151                 A = TEMP;
1152         } while (++t <= 79);
1153
1154         HashResultPointer[0] += A;
1155         HashResultPointer[1] += B;
1156         HashResultPointer[2] += C;
1157         HashResultPointer[3] += D;
1158         HashResultPointer[4] += E;
1159
1160 }
1161
1162 /************************************************************************/
1163 /*                                                                      */
1164 /*   lpfc_challenge_key                                                 */
1165 /*                                                                      */
1166 /************************************************************************/
1167 static void
1168 lpfc_challenge_key(uint32_t * RandomChallenge, uint32_t * HashWorking)
1169 {
1170         *HashWorking = (*RandomChallenge ^ *HashWorking);
1171 }
1172
1173 /************************************************************************/
1174 /*                                                                      */
1175 /*   lpfc_hba_init                                                      */
1176 /*                                                                      */
1177 /************************************************************************/
1178 void
1179 lpfc_hba_init(struct lpfc_hba *phba, uint32_t *hbainit)
1180 {
1181         int t;
1182         uint32_t *HashWorking;
1183         uint32_t *pwwnn = phba->wwnn;
1184
1185         HashWorking = kmalloc(80 * sizeof(uint32_t), GFP_KERNEL);
1186         if (!HashWorking)
1187                 return;
1188
1189         memset(HashWorking, 0, (80 * sizeof(uint32_t)));
1190         HashWorking[0] = HashWorking[78] = *pwwnn++;
1191         HashWorking[1] = HashWorking[79] = *pwwnn;
1192
1193         for (t = 0; t < 7; t++)
1194                 lpfc_challenge_key(phba->RandomData + t, HashWorking + t);
1195
1196         lpfc_sha_init(hbainit);
1197         lpfc_sha_iterate(hbainit, HashWorking);
1198         kfree(HashWorking);
1199 }
1200
1201 static void
1202 lpfc_cleanup(struct lpfc_hba * phba, uint32_t save_bind)
1203 {
1204         struct lpfc_nodelist *ndlp, *next_ndlp;
1205
1206         /* clean up phba - lpfc specific */
1207         lpfc_can_disctmo(phba);
1208         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpunmap_list,
1209                                 nlp_listp) {
1210                 lpfc_nlp_remove(phba, ndlp);
1211         }
1212
1213         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpmap_list,
1214                                  nlp_listp) {
1215                 lpfc_nlp_remove(phba, ndlp);
1216         }
1217
1218         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_unused_list,
1219                                 nlp_listp) {
1220                 lpfc_nlp_list(phba, ndlp, NLP_NO_LIST);
1221         }
1222
1223         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_plogi_list,
1224                                 nlp_listp) {
1225                 lpfc_nlp_remove(phba, ndlp);
1226         }
1227
1228         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_adisc_list,
1229                                 nlp_listp) {
1230                 lpfc_nlp_remove(phba, ndlp);
1231         }
1232
1233         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_reglogin_list,
1234                                 nlp_listp) {
1235                 lpfc_nlp_remove(phba, ndlp);
1236         }
1237
1238         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_prli_list,
1239                                 nlp_listp) {
1240                 lpfc_nlp_remove(phba, ndlp);
1241         }
1242
1243         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_npr_list,
1244                                 nlp_listp) {
1245                 lpfc_nlp_remove(phba, ndlp);
1246         }
1247
1248         INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1249         INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1250         INIT_LIST_HEAD(&phba->fc_unused_list);
1251         INIT_LIST_HEAD(&phba->fc_plogi_list);
1252         INIT_LIST_HEAD(&phba->fc_adisc_list);
1253         INIT_LIST_HEAD(&phba->fc_reglogin_list);
1254         INIT_LIST_HEAD(&phba->fc_prli_list);
1255         INIT_LIST_HEAD(&phba->fc_npr_list);
1256
1257         phba->fc_map_cnt   = 0;
1258         phba->fc_unmap_cnt = 0;
1259         phba->fc_plogi_cnt = 0;
1260         phba->fc_adisc_cnt = 0;
1261         phba->fc_reglogin_cnt = 0;
1262         phba->fc_prli_cnt  = 0;
1263         phba->fc_npr_cnt   = 0;
1264         phba->fc_unused_cnt= 0;
1265         return;
1266 }
1267
1268 static void
1269 lpfc_establish_link_tmo(unsigned long ptr)
1270 {
1271         struct lpfc_hba *phba = (struct lpfc_hba *)ptr;
1272         unsigned long iflag;
1273
1274
1275         /* Re-establishing Link, timer expired */
1276         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1277                         "%d:1300 Re-establishing Link, timer expired "
1278                         "Data: x%x x%x\n",
1279                         phba->brd_no, phba->fc_flag, phba->hba_state);
1280         spin_lock_irqsave(phba->host->host_lock, iflag);
1281         phba->fc_flag &= ~FC_ESTABLISH_LINK;
1282         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1283 }
1284
1285 static int
1286 lpfc_stop_timer(struct lpfc_hba * phba)
1287 {
1288         struct lpfc_sli *psli = &phba->sli;
1289
1290         /* Instead of a timer, this has been converted to a
1291          * deferred procedding list.
1292          */
1293         while (!list_empty(&phba->freebufList)) {
1294
1295                 struct lpfc_dmabuf *mp = NULL;
1296
1297                 list_remove_head((&phba->freebufList), mp,
1298                                  struct lpfc_dmabuf, list);
1299                 if (mp) {
1300                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
1301                         kfree(mp);
1302                 }
1303         }
1304
1305         del_timer_sync(&phba->fcp_poll_timer);
1306         del_timer_sync(&phba->fc_estabtmo);
1307         del_timer_sync(&phba->fc_disctmo);
1308         del_timer_sync(&phba->fc_fdmitmo);
1309         del_timer_sync(&phba->els_tmofunc);
1310         psli = &phba->sli;
1311         del_timer_sync(&psli->mbox_tmo);
1312         return(1);
1313 }
1314
1315 int
1316 lpfc_online(struct lpfc_hba * phba)
1317 {
1318         if (!phba)
1319                 return 0;
1320
1321         if (!(phba->fc_flag & FC_OFFLINE_MODE))
1322                 return 0;
1323
1324         lpfc_printf_log(phba,
1325                        KERN_WARNING,
1326                        LOG_INIT,
1327                        "%d:0458 Bring Adapter online\n",
1328                        phba->brd_no);
1329
1330         if (!lpfc_sli_queue_setup(phba))
1331                 return 1;
1332
1333         if (lpfc_sli_hba_setup(phba))   /* Initialize the HBA */
1334                 return 1;
1335
1336         spin_lock_irq(phba->host->host_lock);
1337         phba->fc_flag &= ~FC_OFFLINE_MODE;
1338         spin_unlock_irq(phba->host->host_lock);
1339
1340         return 0;
1341 }
1342
1343 int
1344 lpfc_offline(struct lpfc_hba * phba)
1345 {
1346         struct lpfc_sli_ring *pring;
1347         struct lpfc_sli *psli;
1348         unsigned long iflag;
1349         int i = 0;
1350
1351         if (!phba)
1352                 return 0;
1353
1354         if (phba->fc_flag & FC_OFFLINE_MODE)
1355                 return 0;
1356
1357         psli = &phba->sli;
1358         pring = &psli->ring[psli->fcp_ring];
1359
1360         lpfc_linkdown(phba);
1361
1362         /* The linkdown event takes 30 seconds to timeout. */
1363         while (pring->txcmplq_cnt) {
1364                 mdelay(10);
1365                 if (i++ > 3000)
1366                         break;
1367         }
1368
1369         /* stop all timers associated with this hba */
1370         lpfc_stop_timer(phba);
1371         phba->work_hba_events = 0;
1372
1373         lpfc_printf_log(phba,
1374                        KERN_WARNING,
1375                        LOG_INIT,
1376                        "%d:0460 Bring Adapter offline\n",
1377                        phba->brd_no);
1378
1379         /* Bring down the SLI Layer and cleanup.  The HBA is offline
1380            now.  */
1381         lpfc_sli_hba_down(phba);
1382         lpfc_cleanup(phba, 1);
1383         spin_lock_irqsave(phba->host->host_lock, iflag);
1384         phba->fc_flag |= FC_OFFLINE_MODE;
1385         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1386         return 0;
1387 }
1388
1389 /******************************************************************************
1390 * Function name: lpfc_scsi_free
1391 *
1392 * Description: Called from lpfc_pci_remove_one free internal driver resources
1393 *
1394 ******************************************************************************/
1395 static int
1396 lpfc_scsi_free(struct lpfc_hba * phba)
1397 {
1398         struct lpfc_scsi_buf *sb, *sb_next;
1399         struct lpfc_iocbq *io, *io_next;
1400
1401         spin_lock_irq(phba->host->host_lock);
1402         /* Release all the lpfc_scsi_bufs maintained by this host. */
1403         list_for_each_entry_safe(sb, sb_next, &phba->lpfc_scsi_buf_list, list) {
1404                 list_del(&sb->list);
1405                 pci_pool_free(phba->lpfc_scsi_dma_buf_pool, sb->data,
1406                                                                 sb->dma_handle);
1407                 kfree(sb);
1408                 phba->total_scsi_bufs--;
1409         }
1410
1411         /* Release all the lpfc_iocbq entries maintained by this host. */
1412         list_for_each_entry_safe(io, io_next, &phba->lpfc_iocb_list, list) {
1413                 list_del(&io->list);
1414                 kfree(io);
1415                 phba->total_iocbq_bufs--;
1416         }
1417
1418         spin_unlock_irq(phba->host->host_lock);
1419
1420         return 0;
1421 }
1422
1423
1424 static int __devinit
1425 lpfc_pci_probe_one(struct pci_dev *pdev, const struct pci_device_id *pid)
1426 {
1427         struct Scsi_Host *host;
1428         struct lpfc_hba  *phba;
1429         struct lpfc_sli  *psli;
1430         struct lpfc_iocbq *iocbq_entry = NULL, *iocbq_next = NULL;
1431         unsigned long bar0map_len, bar2map_len;
1432         int error = -ENODEV, retval;
1433         int i;
1434         uint16_t iotag;
1435
1436         if (pci_enable_device(pdev))
1437                 goto out;
1438         if (pci_request_regions(pdev, LPFC_DRIVER_NAME))
1439                 goto out_disable_device;
1440
1441         host = scsi_host_alloc(&lpfc_template, sizeof (struct lpfc_hba));
1442         if (!host)
1443                 goto out_release_regions;
1444
1445         phba = (struct lpfc_hba*)host->hostdata;
1446         memset(phba, 0, sizeof (struct lpfc_hba));
1447         phba->host = host;
1448
1449         phba->fc_flag |= FC_LOADING;
1450         phba->pcidev = pdev;
1451
1452         /* Assign an unused board number */
1453         if (!idr_pre_get(&lpfc_hba_index, GFP_KERNEL))
1454                 goto out_put_host;
1455
1456         error = idr_get_new(&lpfc_hba_index, NULL, &phba->brd_no);
1457         if (error)
1458                 goto out_put_host;
1459
1460         host->unique_id = phba->brd_no;
1461         init_MUTEX(&phba->hba_can_block);
1462         INIT_LIST_HEAD(&phba->ctrspbuflist);
1463         INIT_LIST_HEAD(&phba->rnidrspbuflist);
1464         INIT_LIST_HEAD(&phba->freebufList);
1465
1466         /* Initialize timers used by driver */
1467         init_timer(&phba->fc_estabtmo);
1468         phba->fc_estabtmo.function = lpfc_establish_link_tmo;
1469         phba->fc_estabtmo.data = (unsigned long)phba;
1470         init_timer(&phba->fc_disctmo);
1471         phba->fc_disctmo.function = lpfc_disc_timeout;
1472         phba->fc_disctmo.data = (unsigned long)phba;
1473
1474         init_timer(&phba->fc_fdmitmo);
1475         phba->fc_fdmitmo.function = lpfc_fdmi_tmo;
1476         phba->fc_fdmitmo.data = (unsigned long)phba;
1477         init_timer(&phba->els_tmofunc);
1478         phba->els_tmofunc.function = lpfc_els_timeout;
1479         phba->els_tmofunc.data = (unsigned long)phba;
1480         psli = &phba->sli;
1481         init_timer(&psli->mbox_tmo);
1482         psli->mbox_tmo.function = lpfc_mbox_timeout;
1483         psli->mbox_tmo.data = (unsigned long)phba;
1484
1485         init_timer(&phba->fcp_poll_timer);
1486         phba->fcp_poll_timer.function = lpfc_poll_timeout;
1487         phba->fcp_poll_timer.data = (unsigned long)phba;
1488
1489         /*
1490          * Get all the module params for configuring this host and then
1491          * establish the host parameters.
1492          */
1493         lpfc_get_cfgparam(phba);
1494
1495         host->max_id = LPFC_MAX_TARGET;
1496         host->max_lun = phba->cfg_max_luns;
1497         host->this_id = -1;
1498
1499         /* Initialize all internally managed lists. */
1500         INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1501         INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1502         INIT_LIST_HEAD(&phba->fc_unused_list);
1503         INIT_LIST_HEAD(&phba->fc_plogi_list);
1504         INIT_LIST_HEAD(&phba->fc_adisc_list);
1505         INIT_LIST_HEAD(&phba->fc_reglogin_list);
1506         INIT_LIST_HEAD(&phba->fc_prli_list);
1507         INIT_LIST_HEAD(&phba->fc_npr_list);
1508
1509
1510         pci_set_master(pdev);
1511         retval = pci_set_mwi(pdev);
1512         if (retval)
1513                 dev_printk(KERN_WARNING, &pdev->dev,
1514                            "Warning: pci_set_mwi returned %d\n", retval);
1515
1516         if (pci_set_dma_mask(phba->pcidev, DMA_64BIT_MASK) != 0)
1517                 if (pci_set_dma_mask(phba->pcidev, DMA_32BIT_MASK) != 0)
1518                         goto out_idr_remove;
1519
1520         /*
1521          * Get the bus address of Bar0 and Bar2 and the number of bytes
1522          * required by each mapping.
1523          */
1524         phba->pci_bar0_map = pci_resource_start(phba->pcidev, 0);
1525         bar0map_len        = pci_resource_len(phba->pcidev, 0);
1526
1527         phba->pci_bar2_map = pci_resource_start(phba->pcidev, 2);
1528         bar2map_len        = pci_resource_len(phba->pcidev, 2);
1529
1530         /* Map HBA SLIM to a kernel virtual address. */
1531         phba->slim_memmap_p      = ioremap(phba->pci_bar0_map, bar0map_len);
1532         if (!phba->slim_memmap_p) {
1533                 error = -ENODEV;
1534                 dev_printk(KERN_ERR, &pdev->dev,
1535                            "ioremap failed for SLIM memory.\n");
1536                 goto out_idr_remove;
1537         }
1538
1539         /* Map HBA Control Registers to a kernel virtual address. */
1540         phba->ctrl_regs_memmap_p = ioremap(phba->pci_bar2_map, bar2map_len);
1541         if (!phba->ctrl_regs_memmap_p) {
1542                 error = -ENODEV;
1543                 dev_printk(KERN_ERR, &pdev->dev,
1544                            "ioremap failed for HBA control registers.\n");
1545                 goto out_iounmap_slim;
1546         }
1547
1548         /* Allocate memory for SLI-2 structures */
1549         phba->slim2p = dma_alloc_coherent(&phba->pcidev->dev, SLI2_SLIM_SIZE,
1550                                           &phba->slim2p_mapping, GFP_KERNEL);
1551         if (!phba->slim2p)
1552                 goto out_iounmap;
1553
1554         memset(phba->slim2p, 0, SLI2_SLIM_SIZE);
1555
1556         /* Initialize the SLI Layer to run with lpfc HBAs. */
1557         lpfc_sli_setup(phba);
1558         lpfc_sli_queue_setup(phba);
1559
1560         error = lpfc_mem_alloc(phba);
1561         if (error)
1562                 goto out_free_slim;
1563
1564         /* Initialize and populate the iocb list per host.  */
1565         INIT_LIST_HEAD(&phba->lpfc_iocb_list);
1566         for (i = 0; i < LPFC_IOCB_LIST_CNT; i++) {
1567                 iocbq_entry = kmalloc(sizeof(struct lpfc_iocbq), GFP_KERNEL);
1568                 if (iocbq_entry == NULL) {
1569                         printk(KERN_ERR "%s: only allocated %d iocbs of "
1570                                 "expected %d count. Unloading driver.\n",
1571                                 __FUNCTION__, i, LPFC_IOCB_LIST_CNT);
1572                         error = -ENOMEM;
1573                         goto out_free_iocbq;
1574                 }
1575
1576                 memset(iocbq_entry, 0, sizeof(struct lpfc_iocbq));
1577                 iotag = lpfc_sli_next_iotag(phba, iocbq_entry);
1578                 if (iotag == 0) {
1579                         kfree (iocbq_entry);
1580                         printk(KERN_ERR "%s: failed to allocate IOTAG. "
1581                                "Unloading driver.\n",
1582                                 __FUNCTION__);
1583                         error = -ENOMEM;
1584                         goto out_free_iocbq;
1585                 }
1586                 spin_lock_irq(phba->host->host_lock);
1587                 list_add(&iocbq_entry->list, &phba->lpfc_iocb_list);
1588                 phba->total_iocbq_bufs++;
1589                 spin_unlock_irq(phba->host->host_lock);
1590         }
1591
1592         /* Initialize HBA structure */
1593         phba->fc_edtov = FF_DEF_EDTOV;
1594         phba->fc_ratov = FF_DEF_RATOV;
1595         phba->fc_altov = FF_DEF_ALTOV;
1596         phba->fc_arbtov = FF_DEF_ARBTOV;
1597
1598         INIT_LIST_HEAD(&phba->work_list);
1599         phba->work_ha_mask = (HA_ERATT|HA_MBATT|HA_LATT);
1600         phba->work_ha_mask |= (HA_RXMASK << (LPFC_ELS_RING * 4));
1601
1602         /* Startup the kernel thread for this host adapter. */
1603         phba->worker_thread = kthread_run(lpfc_do_work, phba,
1604                                        "lpfc_worker_%d", phba->brd_no);
1605         if (IS_ERR(phba->worker_thread)) {
1606                 error = PTR_ERR(phba->worker_thread);
1607                 goto out_free_iocbq;
1608         }
1609
1610         /* We can rely on a queue depth attribute only after SLI HBA setup */
1611         host->can_queue = phba->cfg_hba_queue_depth - 10;
1612
1613         /* Tell the midlayer we support 16 byte commands */
1614         host->max_cmd_len = 16;
1615
1616         /* Initialize the list of scsi buffers used by driver for scsi IO. */
1617         spin_lock_init(&phba->scsi_buf_list_lock);
1618         INIT_LIST_HEAD(&phba->lpfc_scsi_buf_list);
1619
1620         host->transportt = lpfc_transport_template;
1621         pci_set_drvdata(pdev, host);
1622         error = scsi_add_host(host, &pdev->dev);
1623         if (error)
1624                 goto out_kthread_stop;
1625
1626         error = lpfc_alloc_sysfs_attr(phba);
1627         if (error)
1628                 goto out_kthread_stop;
1629
1630         error = request_irq(phba->pcidev->irq, lpfc_intr_handler, SA_SHIRQ,
1631                                                         LPFC_DRIVER_NAME, phba);
1632         if (error) {
1633                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
1634                         "%d:0451 Enable interrupt handler failed\n",
1635                         phba->brd_no);
1636                 goto out_free_sysfs_attr;
1637         }
1638         phba->MBslimaddr = phba->slim_memmap_p;
1639         phba->HAregaddr = phba->ctrl_regs_memmap_p + HA_REG_OFFSET;
1640         phba->CAregaddr = phba->ctrl_regs_memmap_p + CA_REG_OFFSET;
1641         phba->HSregaddr = phba->ctrl_regs_memmap_p + HS_REG_OFFSET;
1642         phba->HCregaddr = phba->ctrl_regs_memmap_p + HC_REG_OFFSET;
1643
1644         error = lpfc_sli_hba_setup(phba);
1645         if (error)
1646                 goto out_free_irq;
1647
1648         if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
1649                 spin_lock_irq(phba->host->host_lock);
1650                 lpfc_poll_start_timer(phba);
1651                 spin_unlock_irq(phba->host->host_lock);
1652         }
1653
1654         /*
1655          * set fixed host attributes
1656          * Must done after lpfc_sli_hba_setup()
1657          */
1658
1659         fc_host_node_name(host) = wwn_to_u64(phba->fc_nodename.u.wwn);
1660         fc_host_port_name(host) = wwn_to_u64(phba->fc_portname.u.wwn);
1661         fc_host_supported_classes(host) = FC_COS_CLASS3;
1662
1663         memset(fc_host_supported_fc4s(host), 0,
1664                 sizeof(fc_host_supported_fc4s(host)));
1665         fc_host_supported_fc4s(host)[2] = 1;
1666         fc_host_supported_fc4s(host)[7] = 1;
1667
1668         lpfc_get_hba_sym_node_name(phba, fc_host_symbolic_name(host));
1669
1670         fc_host_supported_speeds(host) = 0;
1671         if (phba->lmt & LMT_10Gb)
1672                 fc_host_supported_speeds(host) |= FC_PORTSPEED_10GBIT;
1673         if (phba->lmt & LMT_4Gb)
1674                 fc_host_supported_speeds(host) |= FC_PORTSPEED_4GBIT;
1675         if (phba->lmt & LMT_2Gb)
1676                 fc_host_supported_speeds(host) |= FC_PORTSPEED_2GBIT;
1677         if (phba->lmt & LMT_1Gb)
1678                 fc_host_supported_speeds(host) |= FC_PORTSPEED_1GBIT;
1679
1680         fc_host_maxframe_size(host) =
1681                 ((((uint32_t) phba->fc_sparam.cmn.bbRcvSizeMsb & 0x0F) << 8) |
1682                  (uint32_t) phba->fc_sparam.cmn.bbRcvSizeLsb);
1683
1684         /* This value is also unchanging */
1685         memset(fc_host_active_fc4s(host), 0,
1686                 sizeof(fc_host_active_fc4s(host)));
1687         fc_host_active_fc4s(host)[2] = 1;
1688         fc_host_active_fc4s(host)[7] = 1;
1689
1690         spin_lock_irq(phba->host->host_lock);
1691         phba->fc_flag &= ~FC_LOADING;
1692         spin_unlock_irq(phba->host->host_lock);
1693         return 0;
1694
1695 out_free_irq:
1696         lpfc_stop_timer(phba);
1697         phba->work_hba_events = 0;
1698         free_irq(phba->pcidev->irq, phba);
1699 out_free_sysfs_attr:
1700         lpfc_free_sysfs_attr(phba);
1701 out_kthread_stop:
1702         kthread_stop(phba->worker_thread);
1703 out_free_iocbq:
1704         list_for_each_entry_safe(iocbq_entry, iocbq_next,
1705                                                 &phba->lpfc_iocb_list, list) {
1706                 spin_lock_irq(phba->host->host_lock);
1707                 kfree(iocbq_entry);
1708                 phba->total_iocbq_bufs--;
1709                 spin_unlock_irq(phba->host->host_lock);
1710         }
1711         lpfc_mem_free(phba);
1712 out_free_slim:
1713         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE, phba->slim2p,
1714                                                         phba->slim2p_mapping);
1715 out_iounmap:
1716         iounmap(phba->ctrl_regs_memmap_p);
1717 out_iounmap_slim:
1718         iounmap(phba->slim_memmap_p);
1719 out_idr_remove:
1720         idr_remove(&lpfc_hba_index, phba->brd_no);
1721 out_put_host:
1722         scsi_host_put(host);
1723 out_release_regions:
1724         pci_release_regions(pdev);
1725 out_disable_device:
1726         pci_disable_device(pdev);
1727 out:
1728         return error;
1729 }
1730
1731 static void __devexit
1732 lpfc_pci_remove_one(struct pci_dev *pdev)
1733 {
1734         struct Scsi_Host   *host = pci_get_drvdata(pdev);
1735         struct lpfc_hba    *phba = (struct lpfc_hba *)host->hostdata;
1736         unsigned long iflag;
1737
1738         lpfc_free_sysfs_attr(phba);
1739
1740         spin_lock_irqsave(phba->host->host_lock, iflag);
1741         phba->fc_flag |= FC_UNLOADING;
1742
1743         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1744
1745         fc_remove_host(phba->host);
1746         scsi_remove_host(phba->host);
1747
1748         kthread_stop(phba->worker_thread);
1749
1750         /*
1751          * Bring down the SLI Layer. This step disable all interrupts,
1752          * clears the rings, discards all mailbox commands, and resets
1753          * the HBA.
1754          */
1755         lpfc_sli_hba_down(phba);
1756         lpfc_sli_brdrestart(phba);
1757
1758         /* Release the irq reservation */
1759         free_irq(phba->pcidev->irq, phba);
1760
1761         lpfc_cleanup(phba, 0);
1762         lpfc_stop_timer(phba);
1763         phba->work_hba_events = 0;
1764
1765         /*
1766          * Call scsi_free before mem_free since scsi bufs are released to their
1767          * corresponding pools here.
1768          */
1769         lpfc_scsi_free(phba);
1770         lpfc_mem_free(phba);
1771
1772         /* Free resources associated with SLI2 interface */
1773         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE,
1774                           phba->slim2p, phba->slim2p_mapping);
1775
1776         /* unmap adapter SLIM and Control Registers */
1777         iounmap(phba->ctrl_regs_memmap_p);
1778         iounmap(phba->slim_memmap_p);
1779
1780         pci_release_regions(phba->pcidev);
1781         pci_disable_device(phba->pcidev);
1782
1783         idr_remove(&lpfc_hba_index, phba->brd_no);
1784         scsi_host_put(phba->host);
1785
1786         pci_set_drvdata(pdev, NULL);
1787 }
1788
1789 static struct pci_device_id lpfc_id_table[] = {
1790         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_VIPER,
1791                 PCI_ANY_ID, PCI_ANY_ID, },
1792         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_FIREFLY,
1793                 PCI_ANY_ID, PCI_ANY_ID, },
1794         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_THOR,
1795                 PCI_ANY_ID, PCI_ANY_ID, },
1796         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PEGASUS,
1797                 PCI_ANY_ID, PCI_ANY_ID, },
1798         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_CENTAUR,
1799                 PCI_ANY_ID, PCI_ANY_ID, },
1800         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_DRAGONFLY,
1801                 PCI_ANY_ID, PCI_ANY_ID, },
1802         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SUPERFLY,
1803                 PCI_ANY_ID, PCI_ANY_ID, },
1804         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_RFLY,
1805                 PCI_ANY_ID, PCI_ANY_ID, },
1806         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PFLY,
1807                 PCI_ANY_ID, PCI_ANY_ID, },
1808         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE,
1809                 PCI_ANY_ID, PCI_ANY_ID, },
1810         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_SCSP,
1811                 PCI_ANY_ID, PCI_ANY_ID, },
1812         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_DCSP,
1813                 PCI_ANY_ID, PCI_ANY_ID, },
1814         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS,
1815                 PCI_ANY_ID, PCI_ANY_ID, },
1816         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_SCSP,
1817                 PCI_ANY_ID, PCI_ANY_ID, },
1818         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_DCSP,
1819                 PCI_ANY_ID, PCI_ANY_ID, },
1820         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BMID,
1821                 PCI_ANY_ID, PCI_ANY_ID, },
1822         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BSMB,
1823                 PCI_ANY_ID, PCI_ANY_ID, },
1824         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR,
1825                 PCI_ANY_ID, PCI_ANY_ID, },
1826         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_SCSP,
1827                 PCI_ANY_ID, PCI_ANY_ID, },
1828         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_DCSP,
1829                 PCI_ANY_ID, PCI_ANY_ID, },
1830         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZMID,
1831                 PCI_ANY_ID, PCI_ANY_ID, },
1832         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZSMB,
1833                 PCI_ANY_ID, PCI_ANY_ID, },
1834         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_TFLY,
1835                 PCI_ANY_ID, PCI_ANY_ID, },
1836         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP101,
1837                 PCI_ANY_ID, PCI_ANY_ID, },
1838         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP10000S,
1839                 PCI_ANY_ID, PCI_ANY_ID, },
1840         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP11000S,
1841                 PCI_ANY_ID, PCI_ANY_ID, },
1842         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LPE11000S,
1843                 PCI_ANY_ID, PCI_ANY_ID, },
1844         { 0 }
1845 };
1846
1847 MODULE_DEVICE_TABLE(pci, lpfc_id_table);
1848
1849 static struct pci_driver lpfc_driver = {
1850         .name           = LPFC_DRIVER_NAME,
1851         .id_table       = lpfc_id_table,
1852         .probe          = lpfc_pci_probe_one,
1853         .remove         = __devexit_p(lpfc_pci_remove_one),
1854 };
1855
1856 static int __init
1857 lpfc_init(void)
1858 {
1859         int error = 0;
1860
1861         printk(LPFC_MODULE_DESC "\n");
1862         printk(LPFC_COPYRIGHT "\n");
1863
1864         lpfc_transport_template =
1865                                 fc_attach_transport(&lpfc_transport_functions);
1866         if (!lpfc_transport_template)
1867                 return -ENOMEM;
1868         error = pci_register_driver(&lpfc_driver);
1869         if (error)
1870                 fc_release_transport(lpfc_transport_template);
1871
1872         return error;
1873 }
1874
1875 static void __exit
1876 lpfc_exit(void)
1877 {
1878         pci_unregister_driver(&lpfc_driver);
1879         fc_release_transport(lpfc_transport_template);
1880 }
1881
1882 module_init(lpfc_init);
1883 module_exit(lpfc_exit);
1884 MODULE_LICENSE("GPL");
1885 MODULE_DESCRIPTION(LPFC_MODULE_DESC);
1886 MODULE_AUTHOR("Emulex Corporation - tech.support@emulex.com");
1887 MODULE_VERSION("0:" LPFC_DRIVER_VERSION);