git.oblomov.eu Git - linux-2.6/blob - 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-2008 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 #include <linux/ctype.h>
  31
  32 #include <scsi/scsi.h>
  33 #include <scsi/scsi_device.h>
  34 #include <scsi/scsi_host.h>
  35 #include <scsi/scsi_transport_fc.h>
  36
  37 #include "lpfc_hw.h"
  38 #include "lpfc_sli.h"
  39 #include "lpfc_disc.h"
  40 #include "lpfc_scsi.h"
  41 #include "lpfc.h"
  42 #include "lpfc_logmsg.h"
  43 #include "lpfc_crtn.h"
  44 #include "lpfc_vport.h"
  45 #include "lpfc_version.h"
  46
  47 static int lpfc_parse_vpd(struct lpfc_hba *, uint8_t *, int);
  48 static void lpfc_get_hba_model_desc(struct lpfc_hba *, uint8_t *, uint8_t *);
  49 static int lpfc_post_rcv_buf(struct lpfc_hba *);
  50
  51 static struct scsi_transport_template *lpfc_transport_template = NULL;
  52 static struct scsi_transport_template *lpfc_vport_transport_template = NULL;
  53 static DEFINE_IDR(lpfc_hba_index);
  54
  55 /************************************************************************/
  56 /*                                                                      */
  57 /*    lpfc_config_port_prep                                             */
  58 /*    This routine will do LPFC initialization prior to the             */
  59 /*    CONFIG_PORT mailbox command. This will be initialized             */
  60 /*    as a SLI layer callback routine.                                  */
  61 /*    This routine returns 0 on success or -ERESTART if it wants        */
  62 /*    the SLI layer to reset the HBA and try again. Any                 */
  63 /*    other return value indicates an error.                            */
  64 /*                                                                      */
  65 /************************************************************************/
  66 int
  67 lpfc_config_port_prep(struct lpfc_hba *phba)
  68 {
  69         lpfc_vpd_t *vp = &phba->vpd;
  70         int i = 0, rc;
  71         LPFC_MBOXQ_t *pmb;
  72         MAILBOX_t *mb;
  73         char *lpfc_vpd_data = NULL;
  74         uint16_t offset = 0;
  75         static char licensed[56] =
  76                     "key unlock for use with gnu public licensed code only\0";
  77         static int init_key = 1;
  78
  79         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  80         if (!pmb) {
  81                 phba->link_state = LPFC_HBA_ERROR;
  82                 return -ENOMEM;
  83         }
  84
  85         mb = &pmb->mb;
  86         phba->link_state = LPFC_INIT_MBX_CMDS;
  87
  88         if (lpfc_is_LC_HBA(phba->pcidev->device)) {
  89                 if (init_key) {
  90                         uint32_t *ptext = (uint32_t *) licensed;
  91
  92                         for (i = 0; i < 56; i += sizeof (uint32_t), ptext++)
  93                                 *ptext = cpu_to_be32(*ptext);
  94                         init_key = 0;
  95                 }
  96
  97                 lpfc_read_nv(phba, pmb);
  98                 memset((char*)mb->un.varRDnvp.rsvd3, 0,
  99                         sizeof (mb->un.varRDnvp.rsvd3));
 100                 memcpy((char*)mb->un.varRDnvp.rsvd3, licensed,
 101                          sizeof (licensed));
 102
 103                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 104
 105                 if (rc != MBX_SUCCESS) {
 106                         lpfc_printf_log(phba, KERN_ERR, LOG_MBOX,
 107                                         "0324 Config Port initialization "
 108                                         "error, mbxCmd x%x READ_NVPARM, "
 109                                         "mbxStatus x%x\n",
 110                                         mb->mbxCommand, mb->mbxStatus);
 111                         mempool_free(pmb, phba->mbox_mem_pool);
 112                         return -ERESTART;
 113                 }
 114                 memcpy(phba->wwnn, (char *)mb->un.varRDnvp.nodename,
 115                        sizeof(phba->wwnn));
 116                 memcpy(phba->wwpn, (char *)mb->un.varRDnvp.portname,
 117                        sizeof(phba->wwpn));
 118         }
 119
 120         phba->sli3_options = 0x0;
 121
 122         /* Setup and issue mailbox READ REV command */
 123         lpfc_read_rev(phba, pmb);
 124         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 125         if (rc != MBX_SUCCESS) {
 126                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 127                                 "0439 Adapter failed to init, mbxCmd x%x "
 128                                 "READ_REV, mbxStatus x%x\n",
 129                                 mb->mbxCommand, mb->mbxStatus);
 130                 mempool_free( pmb, phba->mbox_mem_pool);
 131                 return -ERESTART;
 132         }
 133
 134
 135         /*
 136          * The value of rr must be 1 since the driver set the cv field to 1.
 137          * This setting requires the FW to set all revision fields.
 138          */
 139         if (mb->un.varRdRev.rr == 0) {
 140                 vp->rev.rBit = 0;
 141                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 142                                 "0440 Adapter failed to init, READ_REV has "
 143                                 "missing revision information.\n");
 144                 mempool_free(pmb, phba->mbox_mem_pool);
 145                 return -ERESTART;
 146         }
 147
 148         if (phba->sli_rev == 3 && !mb->un.varRdRev.v3rsp)
 149                 return -EINVAL;
 150
 151         /* Save information as VPD data */
 152         vp->rev.rBit = 1;
 153         memcpy(&vp->sli3Feat, &mb->un.varRdRev.sli3Feat, sizeof(uint32_t));
 154         vp->rev.sli1FwRev = mb->un.varRdRev.sli1FwRev;
 155         memcpy(vp->rev.sli1FwName, (char*) mb->un.varRdRev.sli1FwName, 16);
 156         vp->rev.sli2FwRev = mb->un.varRdRev.sli2FwRev;
 157         memcpy(vp->rev.sli2FwName, (char *) mb->un.varRdRev.sli2FwName, 16);
 158         vp->rev.biuRev = mb->un.varRdRev.biuRev;
 159         vp->rev.smRev = mb->un.varRdRev.smRev;
 160         vp->rev.smFwRev = mb->un.varRdRev.un.smFwRev;
 161         vp->rev.endecRev = mb->un.varRdRev.endecRev;
 162         vp->rev.fcphHigh = mb->un.varRdRev.fcphHigh;
 163         vp->rev.fcphLow = mb->un.varRdRev.fcphLow;
 164         vp->rev.feaLevelHigh = mb->un.varRdRev.feaLevelHigh;
 165         vp->rev.feaLevelLow = mb->un.varRdRev.feaLevelLow;
 166         vp->rev.postKernRev = mb->un.varRdRev.postKernRev;
 167         vp->rev.opFwRev = mb->un.varRdRev.opFwRev;
 168
 169         /* If the sli feature level is less then 9, we must
 170          * tear down all RPIs and VPIs on link down if NPIV
 171          * is enabled.
 172          */
 173         if (vp->rev.feaLevelHigh < 9)
 174                 phba->sli3_options |= LPFC_SLI3_VPORT_TEARDOWN;
 175
 176         if (lpfc_is_LC_HBA(phba->pcidev->device))
 177                 memcpy(phba->RandomData, (char *)&mb->un.varWords[24],
 178                                                 sizeof (phba->RandomData));
 179
 180         /* Get adapter VPD information */
 181         pmb->context2 = kmalloc(DMP_RSP_SIZE, GFP_KERNEL);
 182         if (!pmb->context2)
 183                 goto out_free_mbox;
 184         lpfc_vpd_data = kmalloc(DMP_VPD_SIZE, GFP_KERNEL);
 185         if (!lpfc_vpd_data)
 186                 goto out_free_context2;
 187
 188         do {
 189                 lpfc_dump_mem(phba, pmb, offset);
 190                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
 191
 192                 if (rc != MBX_SUCCESS) {
 193                         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
 194                                         "0441 VPD not present on adapter, "
 195                                         "mbxCmd x%x DUMP VPD, mbxStatus x%x\n",
 196                                         mb->mbxCommand, mb->mbxStatus);
 197                         mb->un.varDmp.word_cnt = 0;
 198                 }
 199                 if (mb->un.varDmp.word_cnt > DMP_VPD_SIZE - offset)
 200                         mb->un.varDmp.word_cnt = DMP_VPD_SIZE - offset;
 201                 lpfc_sli_pcimem_bcopy(pmb->context2, lpfc_vpd_data + offset,
 202                                       mb->un.varDmp.word_cnt);
 203                 offset += mb->un.varDmp.word_cnt;
 204         } while (mb->un.varDmp.word_cnt && offset < DMP_VPD_SIZE);
 205         lpfc_parse_vpd(phba, lpfc_vpd_data, offset);
 206
 207         kfree(lpfc_vpd_data);
 208 out_free_context2:
 209         kfree(pmb->context2);
 210 out_free_mbox:
 211         mempool_free(pmb, phba->mbox_mem_pool);
 212         return 0;
 213 }
 214
 215 /* Completion handler for config async event mailbox command. */
 216 static void
 217 lpfc_config_async_cmpl(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmboxq)
 218 {
 219         if (pmboxq->mb.mbxStatus == MBX_SUCCESS)
 220                 phba->temp_sensor_support = 1;
 221         else
 222                 phba->temp_sensor_support = 0;
 223         mempool_free(pmboxq, phba->mbox_mem_pool);
 224         return;
 225 }
 226
 227 /************************************************************************/
 228 /*                                                                      */
 229 /*    lpfc_config_port_post                                             */
 230 /*    This routine will do LPFC initialization after the                */
 231 /*    CONFIG_PORT mailbox command. This will be initialized             */
 232 /*    as a SLI layer callback routine.                                  */
 233 /*    This routine returns 0 on success. Any other return value         */
 234 /*    indicates an error.                                               */
 235 /*                                                                      */
 236 /************************************************************************/
 237 int
 238 lpfc_config_port_post(struct lpfc_hba *phba)
 239 {
 240         struct lpfc_vport *vport = phba->pport;
 241         LPFC_MBOXQ_t *pmb;
 242         MAILBOX_t *mb;
 243         struct lpfc_dmabuf *mp;
 244         struct lpfc_sli *psli = &phba->sli;
 245         uint32_t status, timeout;
 246         int i, j;
 247         int rc;
 248
 249         spin_lock_irq(&phba->hbalock);
 250         /*
 251          * If the Config port completed correctly the HBA is not
 252          * over heated any more.
 253          */
 254         if (phba->over_temp_state == HBA_OVER_TEMP)
 255                 phba->over_temp_state = HBA_NORMAL_TEMP;
 256         spin_unlock_irq(&phba->hbalock);
 257
 258         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
 259         if (!pmb) {
 260                 phba->link_state = LPFC_HBA_ERROR;
 261                 return -ENOMEM;
 262         }
 263         mb = &pmb->mb;
 264
 265         /* Get login parameters for NID.  */
 266         lpfc_read_sparam(phba, pmb, 0);
 267         pmb->vport = vport;
 268         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
 269                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 270                                 "0448 Adapter failed init, mbxCmd x%x "
 271                                 "READ_SPARM mbxStatus x%x\n",
 272                                 mb->mbxCommand, mb->mbxStatus);
 273                 phba->link_state = LPFC_HBA_ERROR;
 274                 mp = (struct lpfc_dmabuf *) pmb->context1;
 275                 mempool_free( pmb, phba->mbox_mem_pool);
 276                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
 277                 kfree(mp);
 278                 return -EIO;
 279         }
 280
 281         mp = (struct lpfc_dmabuf *) pmb->context1;
 282
 283         memcpy(&vport->fc_sparam, mp->virt, sizeof (struct serv_parm));
 284         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 285         kfree(mp);
 286         pmb->context1 = NULL;
 287
 288         if (phba->cfg_soft_wwnn)
 289                 u64_to_wwn(phba->cfg_soft_wwnn,
 290                            vport->fc_sparam.nodeName.u.wwn);
 291         if (phba->cfg_soft_wwpn)
 292                 u64_to_wwn(phba->cfg_soft_wwpn,
 293                            vport->fc_sparam.portName.u.wwn);
 294         memcpy(&vport->fc_nodename, &vport->fc_sparam.nodeName,
 295                sizeof (struct lpfc_name));
 296         memcpy(&vport->fc_portname, &vport->fc_sparam.portName,
 297                sizeof (struct lpfc_name));
 298         /* If no serial number in VPD data, use low 6 bytes of WWNN */
 299         /* This should be consolidated into parse_vpd ? - mr */
 300         if (phba->SerialNumber[0] == 0) {
 301                 uint8_t *outptr;
 302
 303                 outptr = &vport->fc_nodename.u.s.IEEE[0];
 304                 for (i = 0; i < 12; i++) {
 305                         status = *outptr++;
 306                         j = ((status & 0xf0) >> 4);
 307                         if (j <= 9)
 308                                 phba->SerialNumber[i] =
 309                                     (char)((uint8_t) 0x30 + (uint8_t) j);
 310                         else
 311                                 phba->SerialNumber[i] =
 312                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
 313                         i++;
 314                         j = (status & 0xf);
 315                         if (j <= 9)
 316                                 phba->SerialNumber[i] =
 317                                     (char)((uint8_t) 0x30 + (uint8_t) j);
 318                         else
 319                                 phba->SerialNumber[i] =
 320                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
 321                 }
 322         }
 323
 324         lpfc_read_config(phba, pmb);
 325         pmb->vport = vport;
 326         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
 327                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 328                                 "0453 Adapter failed to init, mbxCmd x%x "
 329                                 "READ_CONFIG, mbxStatus x%x\n",
 330                                 mb->mbxCommand, mb->mbxStatus);
 331                 phba->link_state = LPFC_HBA_ERROR;
 332                 mempool_free( pmb, phba->mbox_mem_pool);
 333                 return -EIO;
 334         }
 335
 336         /* Reset the DFT_HBA_Q_DEPTH to the max xri  */
 337         if (phba->cfg_hba_queue_depth > (mb->un.varRdConfig.max_xri+1))
 338                 phba->cfg_hba_queue_depth =
 339                         mb->un.varRdConfig.max_xri + 1;
 340
 341         phba->lmt = mb->un.varRdConfig.lmt;
 342
 343         /* Get the default values for Model Name and Description */
 344         lpfc_get_hba_model_desc(phba, phba->ModelName, phba->ModelDesc);
 345
 346         if ((phba->cfg_link_speed > LINK_SPEED_10G)
 347             || ((phba->cfg_link_speed == LINK_SPEED_1G)
 348                 && !(phba->lmt & LMT_1Gb))
 349             || ((phba->cfg_link_speed == LINK_SPEED_2G)
 350                 && !(phba->lmt & LMT_2Gb))
 351             || ((phba->cfg_link_speed == LINK_SPEED_4G)
 352                 && !(phba->lmt & LMT_4Gb))
 353             || ((phba->cfg_link_speed == LINK_SPEED_8G)
 354                 && !(phba->lmt & LMT_8Gb))
 355             || ((phba->cfg_link_speed == LINK_SPEED_10G)
 356                 && !(phba->lmt & LMT_10Gb))) {
 357                 /* Reset link speed to auto */
 358                 lpfc_printf_log(phba, KERN_WARNING, LOG_LINK_EVENT,
 359                         "1302 Invalid speed for this board: "
 360                         "Reset link speed to auto: x%x\n",
 361                         phba->cfg_link_speed);
 362                         phba->cfg_link_speed = LINK_SPEED_AUTO;
 363         }
 364
 365         phba->link_state = LPFC_LINK_DOWN;
 366
 367         /* Only process IOCBs on ELS ring till hba_state is READY */
 368         if (psli->ring[psli->extra_ring].cmdringaddr)
 369                 psli->ring[psli->extra_ring].flag |= LPFC_STOP_IOCB_EVENT;
 370         if (psli->ring[psli->fcp_ring].cmdringaddr)
 371                 psli->ring[psli->fcp_ring].flag |= LPFC_STOP_IOCB_EVENT;
 372         if (psli->ring[psli->next_ring].cmdringaddr)
 373                 psli->ring[psli->next_ring].flag |= LPFC_STOP_IOCB_EVENT;
 374
 375         /* Post receive buffers for desired rings */
 376         if (phba->sli_rev != 3)
 377                 lpfc_post_rcv_buf(phba);
 378
 379         /* Enable appropriate host interrupts */
 380         spin_lock_irq(&phba->hbalock);
 381         status = readl(phba->HCregaddr);
 382         status |= HC_MBINT_ENA | HC_ERINT_ENA | HC_LAINT_ENA;
 383         if (psli->num_rings > 0)
 384                 status |= HC_R0INT_ENA;
 385         if (psli->num_rings > 1)
 386                 status |= HC_R1INT_ENA;
 387         if (psli->num_rings > 2)
 388                 status |= HC_R2INT_ENA;
 389         if (psli->num_rings > 3)
 390                 status |= HC_R3INT_ENA;
 391
 392         if ((phba->cfg_poll & ENABLE_FCP_RING_POLLING) &&
 393             (phba->cfg_poll & DISABLE_FCP_RING_INT))
 394                 status &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
 395
 396         writel(status, phba->HCregaddr);
 397         readl(phba->HCregaddr); /* flush */
 398         spin_unlock_irq(&phba->hbalock);
 399
 400         /*
 401          * Setup the ring 0 (els)  timeout handler
 402          */
 403         timeout = phba->fc_ratov << 1;
 404         mod_timer(&vport->els_tmofunc, jiffies + HZ * timeout);
 405         mod_timer(&phba->hb_tmofunc, jiffies + HZ * LPFC_HB_MBOX_INTERVAL);
 406         phba->hb_outstanding = 0;
 407         phba->last_completion_time = jiffies;
 408
 409         lpfc_init_link(phba, pmb, phba->cfg_topology, phba->cfg_link_speed);
 410         pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
 411         pmb->vport = vport;
 412         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
 413         lpfc_set_loopback_flag(phba);
 414         if (rc != MBX_SUCCESS) {
 415                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 416                                 "0454 Adapter failed to init, mbxCmd x%x "
 417                                 "INIT_LINK, mbxStatus x%x\n",
 418                                 mb->mbxCommand, mb->mbxStatus);
 419
 420                 /* Clear all interrupt enable conditions */
 421                 writel(0, phba->HCregaddr);
 422                 readl(phba->HCregaddr); /* flush */
 423                 /* Clear all pending interrupts */
 424                 writel(0xffffffff, phba->HAregaddr);
 425                 readl(phba->HAregaddr); /* flush */
 426
 427                 phba->link_state = LPFC_HBA_ERROR;
 428                 if (rc != MBX_BUSY)
 429                         mempool_free(pmb, phba->mbox_mem_pool);
 430                 return -EIO;
 431         }
 432         /* MBOX buffer will be freed in mbox compl */
 433         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
 434         lpfc_config_async(phba, pmb, LPFC_ELS_RING);
 435         pmb->mbox_cmpl = lpfc_config_async_cmpl;
 436         pmb->vport = phba->pport;
 437         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
 438
 439         if ((rc != MBX_BUSY) && (rc != MBX_SUCCESS)) {
 440                 lpfc_printf_log(phba,
 441                                 KERN_ERR,
 442                                 LOG_INIT,
 443                                 "0456 Adapter failed to issue "
 444                                 "ASYNCEVT_ENABLE mbox status x%x \n.",
 445                                 rc);
 446                 mempool_free(pmb, phba->mbox_mem_pool);
 447         }
 448         return (0);
 449 }
 450
 451 /************************************************************************/
 452 /*                                                                      */
 453 /*    lpfc_hba_down_prep                                                */
 454 /*    This routine will do LPFC uninitialization before the             */
 455 /*    HBA is reset when bringing down the SLI Layer. This will be       */
 456 /*    initialized as a SLI layer callback routine.                      */
 457 /*    This routine returns 0 on success. Any other return value         */
 458 /*    indicates an error.                                               */
 459 /*                                                                      */
 460 /************************************************************************/
 461 int
 462 lpfc_hba_down_prep(struct lpfc_hba *phba)
 463 {
 464         struct lpfc_vport **vports;
 465         int i;
 466         /* Disable interrupts */
 467         writel(0, phba->HCregaddr);
 468         readl(phba->HCregaddr); /* flush */
 469
 470         if (phba->pport->load_flag & FC_UNLOADING)
 471                 lpfc_cleanup_discovery_resources(phba->pport);
 472         else {
 473                 vports = lpfc_create_vport_work_array(phba);
 474                 if (vports != NULL)
 475                         for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++)
 476                                 lpfc_cleanup_discovery_resources(vports[i]);
 477                 lpfc_destroy_vport_work_array(phba, vports);
 478         }
 479         return 0;
 480 }
 481
 482 /************************************************************************/
 483 /*                                                                      */
 484 /*    lpfc_hba_down_post                                                */
 485 /*    This routine will do uninitialization after the HBA is reset      */
 486 /*    when bringing down the SLI Layer.                                 */
 487 /*    This routine returns 0 on success. Any other return value         */
 488 /*    indicates an error.                                               */
 489 /*                                                                      */
 490 /************************************************************************/
 491 int
 492 lpfc_hba_down_post(struct lpfc_hba *phba)
 493 {
 494         struct lpfc_sli *psli = &phba->sli;
 495         struct lpfc_sli_ring *pring;
 496         struct lpfc_dmabuf *mp, *next_mp;
 497         struct lpfc_iocbq *iocb;
 498         IOCB_t *cmd = NULL;
 499         LIST_HEAD(completions);
 500         int i;
 501
 502         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED)
 503                 lpfc_sli_hbqbuf_free_all(phba);
 504         else {
 505                 /* Cleanup preposted buffers on the ELS ring */
 506                 pring = &psli->ring[LPFC_ELS_RING];
 507                 list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
 508                         list_del(&mp->list);
 509                         pring->postbufq_cnt--;
 510                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 511                         kfree(mp);
 512                 }
 513         }
 514
 515         spin_lock_irq(&phba->hbalock);
 516         for (i = 0; i < psli->num_rings; i++) {
 517                 pring = &psli->ring[i];
 518
 519                 /* At this point in time the HBA is either reset or DOA. Either
 520                  * way, nothing should be on txcmplq as it will NEVER complete.
 521                  */
 522                 list_splice_init(&pring->txcmplq, &completions);
 523                 pring->txcmplq_cnt = 0;
 524                 spin_unlock_irq(&phba->hbalock);
 525
 526                 while (!list_empty(&completions)) {
 527                         iocb = list_get_first(&completions, struct lpfc_iocbq,
 528                                 list);
 529                         cmd = &iocb->iocb;
 530                         list_del_init(&iocb->list);
 531
 532                         if (!iocb->iocb_cmpl)
 533                                 lpfc_sli_release_iocbq(phba, iocb);
 534                         else {
 535                                 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
 536                                 cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
 537                                 (iocb->iocb_cmpl) (phba, iocb, iocb);
 538                         }
 539                 }
 540
 541                 lpfc_sli_abort_iocb_ring(phba, pring);
 542                 spin_lock_irq(&phba->hbalock);
 543         }
 544         spin_unlock_irq(&phba->hbalock);
 545
 546         return 0;
 547 }
 548
 549 /* HBA heart beat timeout handler */
 550 static void
 551 lpfc_hb_timeout(unsigned long ptr)
 552 {
 553         struct lpfc_hba *phba;
 554         unsigned long iflag;
 555
 556         phba = (struct lpfc_hba *)ptr;
 557         spin_lock_irqsave(&phba->pport->work_port_lock, iflag);
 558         if (!(phba->pport->work_port_events & WORKER_HB_TMO))
 559                 phba->pport->work_port_events |= WORKER_HB_TMO;
 560         spin_unlock_irqrestore(&phba->pport->work_port_lock, iflag);
 561
 562         if (phba->work_wait)
 563                 wake_up(phba->work_wait);
 564         return;
 565 }
 566
 567 static void
 568 lpfc_hb_mbox_cmpl(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmboxq)
 569 {
 570         unsigned long drvr_flag;
 571
 572         spin_lock_irqsave(&phba->hbalock, drvr_flag);
 573         phba->hb_outstanding = 0;
 574         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
 575
 576         mempool_free(pmboxq, phba->mbox_mem_pool);
 577         if (!(phba->pport->fc_flag & FC_OFFLINE_MODE) &&
 578                 !(phba->link_state == LPFC_HBA_ERROR) &&
 579                 !(phba->pport->load_flag & FC_UNLOADING))
 580                 mod_timer(&phba->hb_tmofunc,
 581                         jiffies + HZ * LPFC_HB_MBOX_INTERVAL);
 582         return;
 583 }
 584
 585 void
 586 lpfc_hb_timeout_handler(struct lpfc_hba *phba)
 587 {
 588         LPFC_MBOXQ_t *pmboxq;
 589         struct lpfc_dmabuf *buf_ptr;
 590         int retval;
 591         struct lpfc_sli *psli = &phba->sli;
 592         LIST_HEAD(completions);
 593
 594         if ((phba->link_state == LPFC_HBA_ERROR) ||
 595                 (phba->pport->load_flag & FC_UNLOADING) ||
 596                 (phba->pport->fc_flag & FC_OFFLINE_MODE))
 597                 return;
 598
 599         spin_lock_irq(&phba->pport->work_port_lock);
 600         /* If the timer is already canceled do nothing */
 601         if (!(phba->pport->work_port_events & WORKER_HB_TMO)) {
 602                 spin_unlock_irq(&phba->pport->work_port_lock);
 603                 return;
 604         }
 605
 606         if (time_after(phba->last_completion_time + LPFC_HB_MBOX_INTERVAL * HZ,
 607                 jiffies)) {
 608                 spin_unlock_irq(&phba->pport->work_port_lock);
 609                 if (!phba->hb_outstanding)
 610                         mod_timer(&phba->hb_tmofunc,
 611                                 jiffies + HZ * LPFC_HB_MBOX_INTERVAL);
 612                 else
 613                         mod_timer(&phba->hb_tmofunc,
 614                                 jiffies + HZ * LPFC_HB_MBOX_TIMEOUT);
 615                 return;
 616         }
 617         spin_unlock_irq(&phba->pport->work_port_lock);
 618
 619         if (phba->elsbuf_cnt &&
 620                 (phba->elsbuf_cnt == phba->elsbuf_prev_cnt)) {
 621                 spin_lock_irq(&phba->hbalock);
 622                 list_splice_init(&phba->elsbuf, &completions);
 623                 phba->elsbuf_cnt = 0;
 624                 phba->elsbuf_prev_cnt = 0;
 625                 spin_unlock_irq(&phba->hbalock);
 626
 627                 while (!list_empty(&completions)) {
 628                         list_remove_head(&completions, buf_ptr,
 629                                 struct lpfc_dmabuf, list);
 630                         lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
 631                         kfree(buf_ptr);
 632                 }
 633         }
 634         phba->elsbuf_prev_cnt = phba->elsbuf_cnt;
 635
 636         /* If there is no heart beat outstanding, issue a heartbeat command */
 637         if (phba->cfg_enable_hba_heartbeat) {
 638                 if (!phba->hb_outstanding) {
 639                         pmboxq = mempool_alloc(phba->mbox_mem_pool,GFP_KERNEL);
 640                         if (!pmboxq) {
 641                                 mod_timer(&phba->hb_tmofunc,
 642                                           jiffies + HZ * LPFC_HB_MBOX_INTERVAL);
 643                                 return;
 644                         }
 645
 646                         lpfc_heart_beat(phba, pmboxq);
 647                         pmboxq->mbox_cmpl = lpfc_hb_mbox_cmpl;
 648                         pmboxq->vport = phba->pport;
 649                         retval = lpfc_sli_issue_mbox(phba, pmboxq, MBX_NOWAIT);
 650
 651                         if (retval != MBX_BUSY && retval != MBX_SUCCESS) {
 652                                 mempool_free(pmboxq, phba->mbox_mem_pool);
 653                                 mod_timer(&phba->hb_tmofunc,
 654                                           jiffies + HZ * LPFC_HB_MBOX_INTERVAL);
 655                                 return;
 656                         }
 657                         mod_timer(&phba->hb_tmofunc,
 658                                   jiffies + HZ * LPFC_HB_MBOX_TIMEOUT);
 659                         phba->hb_outstanding = 1;
 660                         return;
 661                 } else {
 662                         /*
 663                         * If heart beat timeout called with hb_outstanding set
 664                         * we need to take the HBA offline.
 665                         */
 666                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 667                                         "0459 Adapter heartbeat failure, "
 668                                         "taking this port offline.\n");
 669
 670                         spin_lock_irq(&phba->hbalock);
 671                         psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
 672                         spin_unlock_irq(&phba->hbalock);
 673
 674                         lpfc_offline_prep(phba);
 675                         lpfc_offline(phba);
 676                         lpfc_unblock_mgmt_io(phba);
 677                         phba->link_state = LPFC_HBA_ERROR;
 678                         lpfc_hba_down_post(phba);
 679                 }
 680         }
 681 }
 682
 683 static void
 684 lpfc_offline_eratt(struct lpfc_hba *phba)
 685 {
 686         struct lpfc_sli   *psli = &phba->sli;
 687
 688         spin_lock_irq(&phba->hbalock);
 689         psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
 690         spin_unlock_irq(&phba->hbalock);
 691         lpfc_offline_prep(phba);
 692
 693         lpfc_offline(phba);
 694         lpfc_reset_barrier(phba);
 695         lpfc_sli_brdreset(phba);
 696         lpfc_hba_down_post(phba);
 697         lpfc_sli_brdready(phba, HS_MBRDY);
 698         lpfc_unblock_mgmt_io(phba);
 699         phba->link_state = LPFC_HBA_ERROR;
 700         return;
 701 }
 702
 703 /************************************************************************/
 704 /*                                                                      */
 705 /*    lpfc_handle_eratt                                                 */
 706 /*    This routine will handle processing a Host Attention              */
 707 /*    Error Status event. This will be initialized                      */
 708 /*    as a SLI layer callback routine.                                  */
 709 /*                                                                      */
 710 /************************************************************************/
 711 void
 712 lpfc_handle_eratt(struct lpfc_hba *phba)
 713 {
 714         struct lpfc_vport *vport = phba->pport;
 715         struct lpfc_sli   *psli = &phba->sli;
 716         struct lpfc_sli_ring  *pring;
 717         struct lpfc_vport **vports;
 718         uint32_t event_data;
 719         unsigned long temperature;
 720         struct temp_event temp_event_data;
 721         struct Scsi_Host  *shost;
 722         int i;
 723
 724         /* If the pci channel is offline, ignore possible errors,
 725          * since we cannot communicate with the pci card anyway. */
 726         if (pci_channel_offline(phba->pcidev))
 727                 return;
 728         /* If resets are disabled then leave the HBA alone and return */
 729         if (!phba->cfg_enable_hba_reset)
 730                 return;
 731
 732         if (phba->work_hs & HS_FFER6 ||
 733             phba->work_hs & HS_FFER5) {
 734                 /* Re-establishing Link */
 735                 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
 736                                 "1301 Re-establishing Link "
 737                                 "Data: x%x x%x x%x\n",
 738                                 phba->work_hs,
 739                                 phba->work_status[0], phba->work_status[1]);
 740                 vports = lpfc_create_vport_work_array(phba);
 741                 if (vports != NULL)
 742                         for(i = 0;
 743                             i <= phba->max_vpi && vports[i] != NULL;
 744                             i++){
 745                                 shost = lpfc_shost_from_vport(vports[i]);
 746                                 spin_lock_irq(shost->host_lock);
 747                                 vports[i]->fc_flag |= FC_ESTABLISH_LINK;
 748                                 spin_unlock_irq(shost->host_lock);
 749                         }
 750                 lpfc_destroy_vport_work_array(phba, vports);
 751                 spin_lock_irq(&phba->hbalock);
 752                 psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
 753                 spin_unlock_irq(&phba->hbalock);
 754
 755                 /*
 756                 * Firmware stops when it triggled erratt with HS_FFER6.
 757                 * That could cause the I/Os dropped by the firmware.
 758                 * Error iocb (I/O) on txcmplq and let the SCSI layer
 759                 * retry it after re-establishing link.
 760                 */
 761                 pring = &psli->ring[psli->fcp_ring];
 762                 lpfc_sli_abort_iocb_ring(phba, pring);
 763
 764
 765                 /*
 766                  * There was a firmware error.  Take the hba offline and then
 767                  * attempt to restart it.
 768                  */
 769                 lpfc_offline_prep(phba);
 770                 lpfc_offline(phba);
 771                 lpfc_sli_brdrestart(phba);
 772                 if (lpfc_online(phba) == 0) {   /* Initialize the HBA */
 773                         mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
 774                         lpfc_unblock_mgmt_io(phba);
 775                         return;
 776                 }
 777                 lpfc_unblock_mgmt_io(phba);
 778         } else if (phba->work_hs & HS_CRIT_TEMP) {
 779                 temperature = readl(phba->MBslimaddr + TEMPERATURE_OFFSET);
 780                 temp_event_data.event_type = FC_REG_TEMPERATURE_EVENT;
 781                 temp_event_data.event_code = LPFC_CRIT_TEMP;
 782                 temp_event_data.data = (uint32_t)temperature;
 783
 784                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 785                                 "0459 Adapter maximum temperature exceeded "
 786                                 "(%ld), taking this port offline "
 787                                 "Data: x%x x%x x%x\n",
 788                                 temperature, phba->work_hs,
 789                                 phba->work_status[0], phba->work_status[1]);
 790
 791                 shost = lpfc_shost_from_vport(phba->pport);
 792                 fc_host_post_vendor_event(shost, fc_get_event_number(),
 793                                           sizeof(temp_event_data),
 794                                           (char *) &temp_event_data,
 795                                           SCSI_NL_VID_TYPE_PCI
 796                                           | PCI_VENDOR_ID_EMULEX);
 797
 798                 spin_lock_irq(&phba->hbalock);
 799                 phba->over_temp_state = HBA_OVER_TEMP;
 800                 spin_unlock_irq(&phba->hbalock);
 801                 lpfc_offline_eratt(phba);
 802
 803         } else {
 804                 /* The if clause above forces this code path when the status
 805                  * failure is a value other than FFER6.  Do not call the offline
 806                  *  twice. This is the adapter hardware error path.
 807                  */
 808                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
 809                                 "0457 Adapter Hardware Error "
 810                                 "Data: x%x x%x x%x\n",
 811                                 phba->work_hs,
 812                                 phba->work_status[0], phba->work_status[1]);
 813
 814                 event_data = FC_REG_DUMP_EVENT;
 815                 shost = lpfc_shost_from_vport(vport);
 816                 fc_host_post_vendor_event(shost, fc_get_event_number(),
 817                                 sizeof(event_data), (char *) &event_data,
 818                                 SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
 819
 820                 lpfc_offline_eratt(phba);
 821         }
 822 }
 823
 824 /************************************************************************/
 825 /*                                                                      */
 826 /*    lpfc_handle_latt                                                  */
 827 /*    This routine will handle processing a Host Attention              */
 828 /*    Link Status event. This will be initialized                       */
 829 /*    as a SLI layer callback routine.                                  */
 830 /*                                                                      */
 831 /************************************************************************/
 832 void
 833 lpfc_handle_latt(struct lpfc_hba *phba)
 834 {
 835         struct lpfc_vport *vport = phba->pport;
 836         struct lpfc_sli   *psli = &phba->sli;
 837         LPFC_MBOXQ_t *pmb;
 838         volatile uint32_t control;
 839         struct lpfc_dmabuf *mp;
 840         int rc = 0;
 841
 842         pmb = (LPFC_MBOXQ_t *)mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
 843         if (!pmb) {
 844                 rc = 1;
 845                 goto lpfc_handle_latt_err_exit;
 846         }
 847
 848         mp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
 849         if (!mp) {
 850                 rc = 2;
 851                 goto lpfc_handle_latt_free_pmb;
 852         }
 853
 854         mp->virt = lpfc_mbuf_alloc(phba, 0, &mp->phys);
 855         if (!mp->virt) {
 856                 rc = 3;
 857                 goto lpfc_handle_latt_free_mp;
 858         }
 859
 860         /* Cleanup any outstanding ELS commands */
 861         lpfc_els_flush_all_cmd(phba);
 862
 863         psli->slistat.link_event++;
 864         lpfc_read_la(phba, pmb, mp);
 865         pmb->mbox_cmpl = lpfc_mbx_cmpl_read_la;
 866         pmb->vport = vport;
 867         rc = lpfc_sli_issue_mbox (phba, pmb, MBX_NOWAIT);
 868         if (rc == MBX_NOT_FINISHED) {
 869                 rc = 4;
 870                 goto lpfc_handle_latt_free_mbuf;
 871         }
 872
 873         /* Clear Link Attention in HA REG */
 874         spin_lock_irq(&phba->hbalock);
 875         writel(HA_LATT, phba->HAregaddr);
 876         readl(phba->HAregaddr); /* flush */
 877         spin_unlock_irq(&phba->hbalock);
 878
 879         return;
 880
 881 lpfc_handle_latt_free_mbuf:
 882         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 883 lpfc_handle_latt_free_mp:
 884         kfree(mp);
 885 lpfc_handle_latt_free_pmb:
 886         mempool_free(pmb, phba->mbox_mem_pool);
 887 lpfc_handle_latt_err_exit:
 888         /* Enable Link attention interrupts */
 889         spin_lock_irq(&phba->hbalock);
 890         psli->sli_flag |= LPFC_PROCESS_LA;
 891         control = readl(phba->HCregaddr);
 892         control |= HC_LAINT_ENA;
 893         writel(control, phba->HCregaddr);
 894         readl(phba->HCregaddr); /* flush */
 895
 896         /* Clear Link Attention in HA REG */
 897         writel(HA_LATT, phba->HAregaddr);
 898         readl(phba->HAregaddr); /* flush */
 899         spin_unlock_irq(&phba->hbalock);
 900         lpfc_linkdown(phba);
 901         phba->link_state = LPFC_HBA_ERROR;
 902
 903         lpfc_printf_log(phba, KERN_ERR, LOG_MBOX,
 904                      "0300 LATT: Cannot issue READ_LA: Data:%d\n", rc);
 905
 906         return;
 907 }
 908
 909 /************************************************************************/
 910 /*                                                                      */
 911 /*   lpfc_parse_vpd                                                     */
 912 /*   This routine will parse the VPD data                               */
 913 /*                                                                      */
 914 /************************************************************************/
 915 static int
 916 lpfc_parse_vpd(struct lpfc_hba *phba, uint8_t *vpd, int len)
 917 {
 918         uint8_t lenlo, lenhi;
 919         int Length;
 920         int i, j;
 921         int finished = 0;
 922         int index = 0;
 923
 924         if (!vpd)
 925                 return 0;
 926
 927         /* Vital Product */
 928         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
 929                         "0455 Vital Product Data: x%x x%x x%x x%x\n",
 930                         (uint32_t) vpd[0], (uint32_t) vpd[1], (uint32_t) vpd[2],
 931                         (uint32_t) vpd[3]);
 932         while (!finished && (index < (len - 4))) {
 933                 switch (vpd[index]) {
 934                 case 0x82:
 935                 case 0x91:
 936                         index += 1;
 937                         lenlo = vpd[index];
 938                         index += 1;
 939                         lenhi = vpd[index];
 940                         index += 1;
 941                         i = ((((unsigned short)lenhi) << 8) + lenlo);
 942                         index += i;
 943                         break;
 944                 case 0x90:
 945                         index += 1;
 946                         lenlo = vpd[index];
 947                         index += 1;
 948                         lenhi = vpd[index];
 949                         index += 1;
 950                         Length = ((((unsigned short)lenhi) << 8) + lenlo);
 951                         if (Length > len - index)
 952                                 Length = len - index;
 953                         while (Length > 0) {
 954                         /* Look for Serial Number */
 955                         if ((vpd[index] == 'S') && (vpd[index+1] == 'N')) {
 956                                 index += 2;
 957                                 i = vpd[index];
 958                                 index += 1;
 959                                 j = 0;
 960                                 Length -= (3+i);
 961                                 while(i--) {
 962                                         phba->SerialNumber[j++] = vpd[index++];
 963                                         if (j == 31)
 964                                                 break;
 965                                 }
 966                                 phba->SerialNumber[j] = 0;
 967                                 continue;
 968                         }
 969                         else if ((vpd[index] == 'V') && (vpd[index+1] == '1')) {
 970                                 phba->vpd_flag |= VPD_MODEL_DESC;
 971                                 index += 2;
 972                                 i = vpd[index];
 973                                 index += 1;
 974                                 j = 0;
 975                                 Length -= (3+i);
 976                                 while(i--) {
 977                                         phba->ModelDesc[j++] = vpd[index++];
 978                                         if (j == 255)
 979                                                 break;
 980                                 }
 981                                 phba->ModelDesc[j] = 0;
 982                                 continue;
 983                         }
 984                         else if ((vpd[index] == 'V') && (vpd[index+1] == '2')) {
 985                                 phba->vpd_flag |= VPD_MODEL_NAME;
 986                                 index += 2;
 987                                 i = vpd[index];
 988                                 index += 1;
 989                                 j = 0;
 990                                 Length -= (3+i);
 991                                 while(i--) {
 992                                         phba->ModelName[j++] = vpd[index++];
 993                                         if (j == 79)
 994                                                 break;
 995                                 }
 996                                 phba->ModelName[j] = 0;
 997                                 continue;
 998                         }
 999                         else if ((vpd[index] == 'V') && (vpd[index+1] == '3')) {
1000                                 phba->vpd_flag |= VPD_PROGRAM_TYPE;
1001                                 index += 2;
1002                                 i = vpd[index];
1003                                 index += 1;
1004                                 j = 0;
1005                                 Length -= (3+i);
1006                                 while(i--) {
1007                                         phba->ProgramType[j++] = vpd[index++];
1008                                         if (j == 255)
1009                                                 break;
1010                                 }
1011                                 phba->ProgramType[j] = 0;
1012                                 continue;
1013                         }
1014                         else if ((vpd[index] == 'V') && (vpd[index+1] == '4')) {
1015                                 phba->vpd_flag |= VPD_PORT;
1016                                 index += 2;
1017                                 i = vpd[index];
1018                                 index += 1;
1019                                 j = 0;
1020                                 Length -= (3+i);
1021                                 while(i--) {
1022                                 phba->Port[j++] = vpd[index++];
1023                                 if (j == 19)
1024                                         break;
1025                                 }
1026                                 phba->Port[j] = 0;
1027                                 continue;
1028                         }
1029                         else {
1030                                 index += 2;
1031                                 i = vpd[index];
1032                                 index += 1;
1033                                 index += i;
1034                                 Length -= (3 + i);
1035                         }
1036                 }
1037                 finished = 0;
1038                 break;
1039                 case 0x78:
1040                         finished = 1;
1041                         break;
1042                 default:
1043                         index ++;
1044                         break;
1045                 }
1046         }
1047
1048         return(1);
1049 }
1050
1051 static void
1052 lpfc_get_hba_model_desc(struct lpfc_hba *phba, uint8_t *mdp, uint8_t *descp)
1053 {
1054         lpfc_vpd_t *vp;
1055         uint16_t dev_id = phba->pcidev->device;
1056         int max_speed;
1057         struct {
1058                 char * name;
1059                 int    max_speed;
1060                 char * bus;
1061         } m = {"<Unknown>", 0, ""};
1062
1063         if (mdp && mdp[0] != '\0'
1064                 && descp && descp[0] != '\0')
1065                 return;
1066
1067         if (phba->lmt & LMT_10Gb)
1068                 max_speed = 10;
1069         else if (phba->lmt & LMT_8Gb)
1070                 max_speed = 8;
1071         else if (phba->lmt & LMT_4Gb)
1072                 max_speed = 4;
1073         else if (phba->lmt & LMT_2Gb)
1074                 max_speed = 2;
1075         else
1076                 max_speed = 1;
1077
1078         vp = &phba->vpd;
1079
1080         switch (dev_id) {
1081         case PCI_DEVICE_ID_FIREFLY:
1082                 m = (typeof(m)){"LP6000", max_speed, "PCI"};
1083                 break;
1084         case PCI_DEVICE_ID_SUPERFLY:
1085                 if (vp->rev.biuRev >= 1 && vp->rev.biuRev <= 3)
1086                         m = (typeof(m)){"LP7000", max_speed,  "PCI"};
1087                 else
1088                         m = (typeof(m)){"LP7000E", max_speed, "PCI"};
1089                 break;
1090         case PCI_DEVICE_ID_DRAGONFLY:
1091                 m = (typeof(m)){"LP8000", max_speed, "PCI"};
1092                 break;
1093         case PCI_DEVICE_ID_CENTAUR:
1094                 if (FC_JEDEC_ID(vp->rev.biuRev) == CENTAUR_2G_JEDEC_ID)
1095                         m = (typeof(m)){"LP9002", max_speed, "PCI"};
1096                 else
1097                         m = (typeof(m)){"LP9000", max_speed, "PCI"};
1098                 break;
1099         case PCI_DEVICE_ID_RFLY:
1100                 m = (typeof(m)){"LP952", max_speed, "PCI"};
1101                 break;
1102         case PCI_DEVICE_ID_PEGASUS:
1103                 m = (typeof(m)){"LP9802", max_speed, "PCI-X"};
1104                 break;
1105         case PCI_DEVICE_ID_THOR:
1106                 m = (typeof(m)){"LP10000", max_speed, "PCI-X"};
1107                 break;
1108         case PCI_DEVICE_ID_VIPER:
1109                 m = (typeof(m)){"LPX1000", max_speed,  "PCI-X"};
1110                 break;
1111         case PCI_DEVICE_ID_PFLY:
1112                 m = (typeof(m)){"LP982", max_speed, "PCI-X"};
1113                 break;
1114         case PCI_DEVICE_ID_TFLY:
1115                 m = (typeof(m)){"LP1050", max_speed, "PCI-X"};
1116                 break;
1117         case PCI_DEVICE_ID_HELIOS:
1118                 m = (typeof(m)){"LP11000", max_speed, "PCI-X2"};
1119                 break;
1120         case PCI_DEVICE_ID_HELIOS_SCSP:
1121                 m = (typeof(m)){"LP11000-SP", max_speed, "PCI-X2"};
1122                 break;
1123         case PCI_DEVICE_ID_HELIOS_DCSP:
1124                 m = (typeof(m)){"LP11002-SP", max_speed, "PCI-X2"};
1125                 break;
1126         case PCI_DEVICE_ID_NEPTUNE:
1127                 m = (typeof(m)){"LPe1000", max_speed, "PCIe"};
1128                 break;
1129         case PCI_DEVICE_ID_NEPTUNE_SCSP:
1130                 m = (typeof(m)){"LPe1000-SP", max_speed, "PCIe"};
1131                 break;
1132         case PCI_DEVICE_ID_NEPTUNE_DCSP:
1133                 m = (typeof(m)){"LPe1002-SP", max_speed, "PCIe"};
1134                 break;
1135         case PCI_DEVICE_ID_BMID:
1136                 m = (typeof(m)){"LP1150", max_speed, "PCI-X2"};
1137                 break;
1138         case PCI_DEVICE_ID_BSMB:
1139                 m = (typeof(m)){"LP111", max_speed, "PCI-X2"};
1140                 break;
1141         case PCI_DEVICE_ID_ZEPHYR:
1142                 m = (typeof(m)){"LPe11000", max_speed, "PCIe"};
1143                 break;
1144         case PCI_DEVICE_ID_ZEPHYR_SCSP:
1145                 m = (typeof(m)){"LPe11000", max_speed, "PCIe"};
1146                 break;
1147         case PCI_DEVICE_ID_ZEPHYR_DCSP:
1148                 m = (typeof(m)){"LPe11002-SP", max_speed, "PCIe"};
1149                 break;
1150         case PCI_DEVICE_ID_ZMID:
1151                 m = (typeof(m)){"LPe1150", max_speed, "PCIe"};
1152                 break;
1153         case PCI_DEVICE_ID_ZSMB:
1154                 m = (typeof(m)){"LPe111", max_speed, "PCIe"};
1155                 break;
1156         case PCI_DEVICE_ID_LP101:
1157                 m = (typeof(m)){"LP101", max_speed, "PCI-X"};
1158                 break;
1159         case PCI_DEVICE_ID_LP10000S:
1160                 m = (typeof(m)){"LP10000-S", max_speed, "PCI"};
1161                 break;
1162         case PCI_DEVICE_ID_LP11000S:
1163                 m = (typeof(m)){"LP11000-S", max_speed,
1164                         "PCI-X2"};
1165                 break;
1166         case PCI_DEVICE_ID_LPE11000S:
1167                 m = (typeof(m)){"LPe11000-S", max_speed,
1168                         "PCIe"};
1169                 break;
1170         case PCI_DEVICE_ID_SAT:
1171                 m = (typeof(m)){"LPe12000", max_speed, "PCIe"};
1172                 break;
1173         case PCI_DEVICE_ID_SAT_MID:
1174                 m = (typeof(m)){"LPe1250", max_speed, "PCIe"};
1175                 break;
1176         case PCI_DEVICE_ID_SAT_SMB:
1177                 m = (typeof(m)){"LPe121", max_speed, "PCIe"};
1178                 break;
1179         case PCI_DEVICE_ID_SAT_DCSP:
1180                 m = (typeof(m)){"LPe12002-SP", max_speed, "PCIe"};
1181                 break;
1182         case PCI_DEVICE_ID_SAT_SCSP:
1183                 m = (typeof(m)){"LPe12000-SP", max_speed, "PCIe"};
1184                 break;
1185         case PCI_DEVICE_ID_SAT_S:
1186                 m = (typeof(m)){"LPe12000-S", max_speed, "PCIe"};
1187                 break;
1188         default:
1189                 m = (typeof(m)){ NULL };
1190                 break;
1191         }
1192
1193         if (mdp && mdp[0] == '\0')
1194                 snprintf(mdp, 79,"%s", m.name);
1195         if (descp && descp[0] == '\0')
1196                 snprintf(descp, 255,
1197                          "Emulex %s %dGb %s Fibre Channel Adapter",
1198                          m.name, m.max_speed, m.bus);
1199 }
1200
1201 /**************************************************/
1202 /*   lpfc_post_buffer                             */
1203 /*                                                */
1204 /*   This routine will post count buffers to the  */
1205 /*   ring with the QUE_RING_BUF_CN command. This  */
1206 /*   allows 3 buffers / command to be posted.     */
1207 /*   Returns the number of buffers NOT posted.    */
1208 /**************************************************/
1209 int
1210 lpfc_post_buffer(struct lpfc_hba *phba, struct lpfc_sli_ring *pring, int cnt,
1211                  int type)
1212 {
1213         IOCB_t *icmd;
1214         struct lpfc_iocbq *iocb;
1215         struct lpfc_dmabuf *mp1, *mp2;
1216
1217         cnt += pring->missbufcnt;
1218
1219         /* While there are buffers to post */
1220         while (cnt > 0) {
1221                 /* Allocate buffer for  command iocb */
1222                 iocb = lpfc_sli_get_iocbq(phba);
1223                 if (iocb == NULL) {
1224                         pring->missbufcnt = cnt;
1225                         return cnt;
1226                 }
1227                 icmd = &iocb->iocb;
1228
1229                 /* 2 buffers can be posted per command */
1230                 /* Allocate buffer to post */
1231                 mp1 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
1232                 if (mp1)
1233                     mp1->virt = lpfc_mbuf_alloc(phba, MEM_PRI, &mp1->phys);
1234                 if (!mp1 || !mp1->virt) {
1235                         kfree(mp1);
1236                         lpfc_sli_release_iocbq(phba, iocb);
1237                         pring->missbufcnt = cnt;
1238                         return cnt;
1239                 }
1240
1241                 INIT_LIST_HEAD(&mp1->list);
1242                 /* Allocate buffer to post */
1243                 if (cnt > 1) {
1244                         mp2 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
1245                         if (mp2)
1246                                 mp2->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
1247                                                             &mp2->phys);
1248                         if (!mp2 || !mp2->virt) {
1249                                 kfree(mp2);
1250                                 lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
1251                                 kfree(mp1);
1252                                 lpfc_sli_release_iocbq(phba, iocb);
1253                                 pring->missbufcnt = cnt;
1254                                 return cnt;
1255                         }
1256
1257                         INIT_LIST_HEAD(&mp2->list);
1258                 } else {
1259                         mp2 = NULL;
1260                 }
1261
1262                 icmd->un.cont64[0].addrHigh = putPaddrHigh(mp1->phys);
1263                 icmd->un.cont64[0].addrLow = putPaddrLow(mp1->phys);
1264                 icmd->un.cont64[0].tus.f.bdeSize = FCELSSIZE;
1265                 icmd->ulpBdeCount = 1;
1266                 cnt--;
1267                 if (mp2) {
1268                         icmd->un.cont64[1].addrHigh = putPaddrHigh(mp2->phys);
1269                         icmd->un.cont64[1].addrLow = putPaddrLow(mp2->phys);
1270                         icmd->un.cont64[1].tus.f.bdeSize = FCELSSIZE;
1271                         cnt--;
1272                         icmd->ulpBdeCount = 2;
1273                 }
1274
1275                 icmd->ulpCommand = CMD_QUE_RING_BUF64_CN;
1276                 icmd->ulpLe = 1;
1277
1278                 if (lpfc_sli_issue_iocb(phba, pring, iocb, 0) == IOCB_ERROR) {
1279                         lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
1280                         kfree(mp1);
1281                         cnt++;
1282                         if (mp2) {
1283                                 lpfc_mbuf_free(phba, mp2->virt, mp2->phys);
1284                                 kfree(mp2);
1285                                 cnt++;
1286                         }
1287                         lpfc_sli_release_iocbq(phba, iocb);
1288                         pring->missbufcnt = cnt;
1289                         return cnt;
1290                 }
1291                 lpfc_sli_ringpostbuf_put(phba, pring, mp1);
1292                 if (mp2)
1293                         lpfc_sli_ringpostbuf_put(phba, pring, mp2);
1294         }
1295         pring->missbufcnt = 0;
1296         return 0;
1297 }
1298
1299 /************************************************************************/
1300 /*                                                                      */
1301 /*   lpfc_post_rcv_buf                                                  */
1302 /*   This routine post initial rcv buffers to the configured rings      */
1303 /*                                                                      */
1304 /************************************************************************/
1305 static int
1306 lpfc_post_rcv_buf(struct lpfc_hba *phba)
1307 {
1308         struct lpfc_sli *psli = &phba->sli;
1309
1310         /* Ring 0, ELS / CT buffers */
1311         lpfc_post_buffer(phba, &psli->ring[LPFC_ELS_RING], LPFC_BUF_RING0, 1);
1312         /* Ring 2 - FCP no buffers needed */
1313
1314         return 0;
1315 }
1316
1317 #define S(N,V) (((V)<<(N))|((V)>>(32-(N))))
1318
1319 /************************************************************************/
1320 /*                                                                      */
1321 /*   lpfc_sha_init                                                      */
1322 /*                                                                      */
1323 /************************************************************************/
1324 static void
1325 lpfc_sha_init(uint32_t * HashResultPointer)
1326 {
1327         HashResultPointer[0] = 0x67452301;
1328         HashResultPointer[1] = 0xEFCDAB89;
1329         HashResultPointer[2] = 0x98BADCFE;
1330         HashResultPointer[3] = 0x10325476;
1331         HashResultPointer[4] = 0xC3D2E1F0;
1332 }
1333
1334 /************************************************************************/
1335 /*                                                                      */
1336 /*   lpfc_sha_iterate                                                   */
1337 /*                                                                      */
1338 /************************************************************************/
1339 static void
1340 lpfc_sha_iterate(uint32_t * HashResultPointer, uint32_t * HashWorkingPointer)
1341 {
1342         int t;
1343         uint32_t TEMP;
1344         uint32_t A, B, C, D, E;
1345         t = 16;
1346         do {
1347                 HashWorkingPointer[t] =
1348                     S(1,
1349                       HashWorkingPointer[t - 3] ^ HashWorkingPointer[t -
1350                                                                      8] ^
1351                       HashWorkingPointer[t - 14] ^ HashWorkingPointer[t - 16]);
1352         } while (++t <= 79);
1353         t = 0;
1354         A = HashResultPointer[0];
1355         B = HashResultPointer[1];
1356         C = HashResultPointer[2];
1357         D = HashResultPointer[3];
1358         E = HashResultPointer[4];
1359
1360         do {
1361                 if (t < 20) {
1362                         TEMP = ((B & C) | ((~B) & D)) + 0x5A827999;
1363                 } else if (t < 40) {
1364                         TEMP = (B ^ C ^ D) + 0x6ED9EBA1;
1365                 } else if (t < 60) {
1366                         TEMP = ((B & C) | (B & D) | (C & D)) + 0x8F1BBCDC;
1367                 } else {
1368                         TEMP = (B ^ C ^ D) + 0xCA62C1D6;
1369                 }
1370                 TEMP += S(5, A) + E + HashWorkingPointer[t];
1371                 E = D;
1372                 D = C;
1373                 C = S(30, B);
1374                 B = A;
1375                 A = TEMP;
1376         } while (++t <= 79);
1377
1378         HashResultPointer[0] += A;
1379         HashResultPointer[1] += B;
1380         HashResultPointer[2] += C;
1381         HashResultPointer[3] += D;
1382         HashResultPointer[4] += E;
1383
1384 }
1385
1386 /************************************************************************/
1387 /*                                                                      */
1388 /*   lpfc_challenge_key                                                 */
1389 /*                                                                      */
1390 /************************************************************************/
1391 static void
1392 lpfc_challenge_key(uint32_t * RandomChallenge, uint32_t * HashWorking)
1393 {
1394         *HashWorking = (*RandomChallenge ^ *HashWorking);
1395 }
1396
1397 /************************************************************************/
1398 /*                                                                      */
1399 /*   lpfc_hba_init                                                      */
1400 /*                                                                      */
1401 /************************************************************************/
1402 void
1403 lpfc_hba_init(struct lpfc_hba *phba, uint32_t *hbainit)
1404 {
1405         int t;
1406         uint32_t *HashWorking;
1407         uint32_t *pwwnn = (uint32_t *) phba->wwnn;
1408
1409         HashWorking = kcalloc(80, sizeof(uint32_t), GFP_KERNEL);
1410         if (!HashWorking)
1411                 return;
1412
1413         HashWorking[0] = HashWorking[78] = *pwwnn++;
1414         HashWorking[1] = HashWorking[79] = *pwwnn;
1415
1416         for (t = 0; t < 7; t++)
1417                 lpfc_challenge_key(phba->RandomData + t, HashWorking + t);
1418
1419         lpfc_sha_init(hbainit);
1420         lpfc_sha_iterate(hbainit, HashWorking);
1421         kfree(HashWorking);
1422 }
1423
1424 void
1425 lpfc_cleanup(struct lpfc_vport *vport)
1426 {
1427         struct lpfc_hba   *phba = vport->phba;
1428         struct lpfc_nodelist *ndlp, *next_ndlp;
1429         int i = 0;
1430
1431         if (phba->link_state > LPFC_LINK_DOWN)
1432                 lpfc_port_link_failure(vport);
1433
1434         list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
1435                 if (!NLP_CHK_NODE_ACT(ndlp)) {
1436                         ndlp = lpfc_enable_node(vport, ndlp,
1437                                                 NLP_STE_UNUSED_NODE);
1438                         if (!ndlp)
1439                                 continue;
1440                         spin_lock_irq(&phba->ndlp_lock);
1441                         NLP_SET_FREE_REQ(ndlp);
1442                         spin_unlock_irq(&phba->ndlp_lock);
1443                         /* Trigger the release of the ndlp memory */
1444                         lpfc_nlp_put(ndlp);
1445                         continue;
1446                 }
1447                 spin_lock_irq(&phba->ndlp_lock);
1448                 if (NLP_CHK_FREE_REQ(ndlp)) {
1449                         /* The ndlp should not be in memory free mode already */
1450                         spin_unlock_irq(&phba->ndlp_lock);
1451                         continue;
1452                 } else
1453                         /* Indicate request for freeing ndlp memory */
1454                         NLP_SET_FREE_REQ(ndlp);
1455                 spin_unlock_irq(&phba->ndlp_lock);
1456
1457                 if (ndlp->nlp_type & NLP_FABRIC)
1458                         lpfc_disc_state_machine(vport, ndlp, NULL,
1459                                         NLP_EVT_DEVICE_RECOVERY);
1460
1461                 lpfc_disc_state_machine(vport, ndlp, NULL,
1462                                              NLP_EVT_DEVICE_RM);
1463         }
1464
1465         /* At this point, ALL ndlp's should be gone
1466          * because of the previous NLP_EVT_DEVICE_RM.
1467          * Lets wait for this to happen, if needed.
1468          */
1469         while (!list_empty(&vport->fc_nodes)) {
1470
1471                 if (i++ > 3000) {
1472                         lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
1473                                 "0233 Nodelist not empty\n");
1474                         list_for_each_entry_safe(ndlp, next_ndlp,
1475                                                 &vport->fc_nodes, nlp_listp) {
1476                                 lpfc_printf_vlog(ndlp->vport, KERN_ERR,
1477                                                 LOG_NODE,
1478                                                 "0282: did:x%x ndlp:x%p "
1479                                                 "usgmap:x%x refcnt:%d\n",
1480                                                 ndlp->nlp_DID, (void *)ndlp,
1481                                                 ndlp->nlp_usg_map,
1482                                                 atomic_read(
1483                                                         &ndlp->kref.refcount));
1484                         }
1485                         break;
1486                 }
1487
1488                 /* Wait for any activity on ndlps to settle */
1489                 msleep(10);
1490         }
1491         return;
1492 }
1493
1494 static void
1495 lpfc_establish_link_tmo(unsigned long ptr)
1496 {
1497         struct lpfc_hba   *phba = (struct lpfc_hba *) ptr;
1498         struct lpfc_vport **vports;
1499         unsigned long iflag;
1500         int i;
1501
1502         /* Re-establishing Link, timer expired */
1503         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1504                         "1300 Re-establishing Link, timer expired "
1505                         "Data: x%x x%x\n",
1506                         phba->pport->fc_flag, phba->pport->port_state);
1507         vports = lpfc_create_vport_work_array(phba);
1508         if (vports != NULL)
1509                 for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++) {
1510                         struct Scsi_Host *shost;
1511                         shost = lpfc_shost_from_vport(vports[i]);
1512                         spin_lock_irqsave(shost->host_lock, iflag);
1513                         vports[i]->fc_flag &= ~FC_ESTABLISH_LINK;
1514                         spin_unlock_irqrestore(shost->host_lock, iflag);
1515                 }
1516         lpfc_destroy_vport_work_array(phba, vports);
1517 }
1518
1519 void
1520 lpfc_stop_vport_timers(struct lpfc_vport *vport)
1521 {
1522         del_timer_sync(&vport->els_tmofunc);
1523         del_timer_sync(&vport->fc_fdmitmo);
1524         lpfc_can_disctmo(vport);
1525         return;
1526 }
1527
1528 static void
1529 lpfc_stop_phba_timers(struct lpfc_hba *phba)
1530 {
1531         del_timer_sync(&phba->fcp_poll_timer);
1532         del_timer_sync(&phba->fc_estabtmo);
1533         lpfc_stop_vport_timers(phba->pport);
1534         del_timer_sync(&phba->sli.mbox_tmo);
1535         del_timer_sync(&phba->fabric_block_timer);
1536         phba->hb_outstanding = 0;
1537         del_timer_sync(&phba->hb_tmofunc);
1538         return;
1539 }
1540
1541 static void
1542 lpfc_block_mgmt_io(struct lpfc_hba * phba)
1543 {
1544         unsigned long iflag;
1545
1546         spin_lock_irqsave(&phba->hbalock, iflag);
1547         phba->sli.sli_flag |= LPFC_BLOCK_MGMT_IO;
1548         spin_unlock_irqrestore(&phba->hbalock, iflag);
1549 }
1550
1551 int
1552 lpfc_online(struct lpfc_hba *phba)
1553 {
1554         struct lpfc_vport *vport = phba->pport;
1555         struct lpfc_vport **vports;
1556         int i;
1557
1558         if (!phba)
1559                 return 0;
1560
1561         if (!(vport->fc_flag & FC_OFFLINE_MODE))
1562                 return 0;
1563
1564         lpfc_printf_log(phba, KERN_WARNING, LOG_INIT,
1565                         "0458 Bring Adapter online\n");
1566
1567         lpfc_block_mgmt_io(phba);
1568
1569         if (!lpfc_sli_queue_setup(phba)) {
1570                 lpfc_unblock_mgmt_io(phba);
1571                 return 1;
1572         }
1573
1574         if (lpfc_sli_hba_setup(phba)) { /* Initialize the HBA */
1575                 lpfc_unblock_mgmt_io(phba);
1576                 return 1;
1577         }
1578
1579         vports = lpfc_create_vport_work_array(phba);
1580         if (vports != NULL)
1581                 for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++) {
1582                         struct Scsi_Host *shost;
1583                         shost = lpfc_shost_from_vport(vports[i]);
1584                         spin_lock_irq(shost->host_lock);
1585                         vports[i]->fc_flag &= ~FC_OFFLINE_MODE;
1586                         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
1587                                 vports[i]->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
1588                         spin_unlock_irq(shost->host_lock);
1589                 }
1590                 lpfc_destroy_vport_work_array(phba, vports);
1591
1592         lpfc_unblock_mgmt_io(phba);
1593         return 0;
1594 }
1595
1596 void
1597 lpfc_unblock_mgmt_io(struct lpfc_hba * phba)
1598 {
1599         unsigned long iflag;
1600
1601         spin_lock_irqsave(&phba->hbalock, iflag);
1602         phba->sli.sli_flag &= ~LPFC_BLOCK_MGMT_IO;
1603         spin_unlock_irqrestore(&phba->hbalock, iflag);
1604 }
1605
1606 void
1607 lpfc_offline_prep(struct lpfc_hba * phba)
1608 {
1609         struct lpfc_vport *vport = phba->pport;
1610         struct lpfc_nodelist  *ndlp, *next_ndlp;
1611         struct lpfc_vport **vports;
1612         int i;
1613
1614         if (vport->fc_flag & FC_OFFLINE_MODE)
1615                 return;
1616
1617         lpfc_block_mgmt_io(phba);
1618
1619         lpfc_linkdown(phba);
1620
1621         /* Issue an unreg_login to all nodes on all vports */
1622         vports = lpfc_create_vport_work_array(phba);
1623         if (vports != NULL) {
1624                 for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++) {
1625                         struct Scsi_Host *shost;
1626
1627                         if (vports[i]->load_flag & FC_UNLOADING)
1628                                 continue;
1629                         shost = lpfc_shost_from_vport(vports[i]);
1630                         list_for_each_entry_safe(ndlp, next_ndlp,
1631                                                  &vports[i]->fc_nodes,
1632                                                  nlp_listp) {
1633                                 if (!NLP_CHK_NODE_ACT(ndlp))
1634                                         continue;
1635                                 if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
1636                                         continue;
1637                                 if (ndlp->nlp_type & NLP_FABRIC) {
1638                                         lpfc_disc_state_machine(vports[i], ndlp,
1639                                                 NULL, NLP_EVT_DEVICE_RECOVERY);
1640                                         lpfc_disc_state_machine(vports[i], ndlp,
1641                                                 NULL, NLP_EVT_DEVICE_RM);
1642                                 }
1643                                 spin_lock_irq(shost->host_lock);
1644                                 ndlp->nlp_flag &= ~NLP_NPR_ADISC;
1645                                 spin_unlock_irq(shost->host_lock);
1646                                 lpfc_unreg_rpi(vports[i], ndlp);
1647                         }
1648                 }
1649         }
1650         lpfc_destroy_vport_work_array(phba, vports);
1651
1652         lpfc_sli_flush_mbox_queue(phba);
1653 }
1654
1655 void
1656 lpfc_offline(struct lpfc_hba *phba)
1657 {
1658         struct Scsi_Host  *shost;
1659         struct lpfc_vport **vports;
1660         int i;
1661
1662         if (phba->pport->fc_flag & FC_OFFLINE_MODE)
1663                 return;
1664
1665         /* stop all timers associated with this hba */
1666         lpfc_stop_phba_timers(phba);
1667         vports = lpfc_create_vport_work_array(phba);
1668         if (vports != NULL)
1669                 for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++)
1670                         lpfc_stop_vport_timers(vports[i]);
1671         lpfc_destroy_vport_work_array(phba, vports);
1672         lpfc_printf_log(phba, KERN_WARNING, LOG_INIT,
1673                         "0460 Bring Adapter offline\n");
1674         /* Bring down the SLI Layer and cleanup.  The HBA is offline
1675            now.  */
1676         lpfc_sli_hba_down(phba);
1677         spin_lock_irq(&phba->hbalock);
1678         phba->work_ha = 0;
1679         spin_unlock_irq(&phba->hbalock);
1680         vports = lpfc_create_vport_work_array(phba);
1681         if (vports != NULL)
1682                 for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++) {
1683                         shost = lpfc_shost_from_vport(vports[i]);
1684                         spin_lock_irq(shost->host_lock);
1685                         vports[i]->work_port_events = 0;
1686                         vports[i]->fc_flag |= FC_OFFLINE_MODE;
1687                         spin_unlock_irq(shost->host_lock);
1688                 }
1689         lpfc_destroy_vport_work_array(phba, vports);
1690 }
1691
1692 /******************************************************************************
1693 * Function name: lpfc_scsi_free
1694 *
1695 * Description: Called from lpfc_pci_remove_one free internal driver resources
1696 *
1697 ******************************************************************************/
1698 static int
1699 lpfc_scsi_free(struct lpfc_hba *phba)
1700 {
1701         struct lpfc_scsi_buf *sb, *sb_next;
1702         struct lpfc_iocbq *io, *io_next;
1703
1704         spin_lock_irq(&phba->hbalock);
1705         /* Release all the lpfc_scsi_bufs maintained by this host. */
1706         list_for_each_entry_safe(sb, sb_next, &phba->lpfc_scsi_buf_list, list) {
1707                 list_del(&sb->list);
1708                 pci_pool_free(phba->lpfc_scsi_dma_buf_pool, sb->data,
1709                               sb->dma_handle);
1710                 kfree(sb);
1711                 phba->total_scsi_bufs--;
1712         }
1713
1714         /* Release all the lpfc_iocbq entries maintained by this host. */
1715         list_for_each_entry_safe(io, io_next, &phba->lpfc_iocb_list, list) {
1716                 list_del(&io->list);
1717                 kfree(io);
1718                 phba->total_iocbq_bufs--;
1719         }
1720
1721         spin_unlock_irq(&phba->hbalock);
1722
1723         return 0;
1724 }
1725
1726 struct lpfc_vport *
1727 lpfc_create_port(struct lpfc_hba *phba, int instance, struct device *dev)
1728 {
1729         struct lpfc_vport *vport;
1730         struct Scsi_Host  *shost;
1731         int error = 0;
1732
1733         if (dev != &phba->pcidev->dev)
1734                 shost = scsi_host_alloc(&lpfc_vport_template,
1735                                         sizeof(struct lpfc_vport));
1736         else
1737                 shost = scsi_host_alloc(&lpfc_template,
1738                                         sizeof(struct lpfc_vport));
1739         if (!shost)
1740                 goto out;
1741
1742         vport = (struct lpfc_vport *) shost->hostdata;
1743         vport->phba = phba;
1744         vport->load_flag |= FC_LOADING;
1745         vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
1746         vport->fc_rscn_flush = 0;
1747
1748         lpfc_get_vport_cfgparam(vport);
1749         shost->unique_id = instance;
1750         shost->max_id = LPFC_MAX_TARGET;
1751         shost->max_lun = vport->cfg_max_luns;
1752         shost->this_id = -1;
1753         shost->max_cmd_len = 16;
1754         /*
1755          * Set initial can_queue value since 0 is no longer supported and
1756          * scsi_add_host will fail. This will be adjusted later based on the
1757          * max xri value determined in hba setup.
1758          */
1759         shost->can_queue = phba->cfg_hba_queue_depth - 10;
1760         if (dev != &phba->pcidev->dev) {
1761                 shost->transportt = lpfc_vport_transport_template;
1762                 vport->port_type = LPFC_NPIV_PORT;
1763         } else {
1764                 shost->transportt = lpfc_transport_template;
1765                 vport->port_type = LPFC_PHYSICAL_PORT;
1766         }
1767
1768         /* Initialize all internally managed lists. */
1769         INIT_LIST_HEAD(&vport->fc_nodes);
1770         spin_lock_init(&vport->work_port_lock);
1771
1772         init_timer(&vport->fc_disctmo);
1773         vport->fc_disctmo.function = lpfc_disc_timeout;
1774         vport->fc_disctmo.data = (unsigned long)vport;
1775
1776         init_timer(&vport->fc_fdmitmo);
1777         vport->fc_fdmitmo.function = lpfc_fdmi_tmo;
1778         vport->fc_fdmitmo.data = (unsigned long)vport;
1779
1780         init_timer(&vport->els_tmofunc);
1781         vport->els_tmofunc.function = lpfc_els_timeout;
1782         vport->els_tmofunc.data = (unsigned long)vport;
1783
1784         error = scsi_add_host(shost, dev);
1785         if (error)
1786                 goto out_put_shost;
1787
1788         spin_lock_irq(&phba->hbalock);
1789         list_add_tail(&vport->listentry, &phba->port_list);
1790         spin_unlock_irq(&phba->hbalock);
1791         return vport;
1792
1793 out_put_shost:
1794         scsi_host_put(shost);
1795 out:
1796         return NULL;
1797 }
1798
1799 void
1800 destroy_port(struct lpfc_vport *vport)
1801 {
1802         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1803         struct lpfc_hba  *phba = vport->phba;
1804
1805         kfree(vport->vname);
1806
1807         lpfc_debugfs_terminate(vport);
1808         fc_remove_host(shost);
1809         scsi_remove_host(shost);
1810
1811         spin_lock_irq(&phba->hbalock);
1812         list_del_init(&vport->listentry);
1813         spin_unlock_irq(&phba->hbalock);
1814
1815         lpfc_cleanup(vport);
1816         return;
1817 }
1818
1819 int
1820 lpfc_get_instance(void)
1821 {
1822         int instance = 0;
1823
1824         /* Assign an unused number */
1825         if (!idr_pre_get(&lpfc_hba_index, GFP_KERNEL))
1826                 return -1;
1827         if (idr_get_new(&lpfc_hba_index, NULL, &instance))
1828                 return -1;
1829         return instance;
1830 }
1831
1832 /*
1833  * Note: there is no scan_start function as adapter initialization
1834  * will have asynchronously kicked off the link initialization.
1835  */
1836
1837 int lpfc_scan_finished(struct Scsi_Host *shost, unsigned long time)
1838 {
1839         struct lpfc_vport *vport = (struct lpfc_vport *) shost->hostdata;
1840         struct lpfc_hba   *phba = vport->phba;
1841         int stat = 0;
1842
1843         spin_lock_irq(shost->host_lock);
1844
1845         if (vport->load_flag & FC_UNLOADING) {
1846                 stat = 1;
1847                 goto finished;
1848         }
1849         if (time >= 30 * HZ) {
1850                 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
1851                                 "0461 Scanning longer than 30 "
1852                                 "seconds.  Continuing initialization\n");
1853                 stat = 1;
1854                 goto finished;
1855         }
1856         if (time >= 15 * HZ && phba->link_state <= LPFC_LINK_DOWN) {
1857                 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
1858                                 "0465 Link down longer than 15 "
1859                                 "seconds.  Continuing initialization\n");
1860                 stat = 1;
1861                 goto finished;
1862         }
1863
1864         if (vport->port_state != LPFC_VPORT_READY)
1865                 goto finished;
1866         if (vport->num_disc_nodes || vport->fc_prli_sent)
1867                 goto finished;
1868         if (vport->fc_map_cnt == 0 && time < 2 * HZ)
1869                 goto finished;
1870         if ((phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE) != 0)
1871                 goto finished;
1872
1873         stat = 1;
1874
1875 finished:
1876         spin_unlock_irq(shost->host_lock);
1877         return stat;
1878 }
1879
1880 void lpfc_host_attrib_init(struct Scsi_Host *shost)
1881 {
1882         struct lpfc_vport *vport = (struct lpfc_vport *) shost->hostdata;
1883         struct lpfc_hba   *phba = vport->phba;
1884         /*
1885          * Set fixed host attributes.  Must done after lpfc_sli_hba_setup().
1886          */
1887
1888         fc_host_node_name(shost) = wwn_to_u64(vport->fc_nodename.u.wwn);
1889         fc_host_port_name(shost) = wwn_to_u64(vport->fc_portname.u.wwn);
1890         fc_host_supported_classes(shost) = FC_COS_CLASS3;
1891
1892         memset(fc_host_supported_fc4s(shost), 0,
1893                sizeof(fc_host_supported_fc4s(shost)));
1894         fc_host_supported_fc4s(shost)[2] = 1;
1895         fc_host_supported_fc4s(shost)[7] = 1;
1896
1897         lpfc_vport_symbolic_node_name(vport, fc_host_symbolic_name(shost),
1898                                  sizeof fc_host_symbolic_name(shost));
1899
1900         fc_host_supported_speeds(shost) = 0;
1901         if (phba->lmt & LMT_10Gb)
1902                 fc_host_supported_speeds(shost) |= FC_PORTSPEED_10GBIT;
1903         if (phba->lmt & LMT_8Gb)
1904                 fc_host_supported_speeds(shost) |= FC_PORTSPEED_8GBIT;
1905         if (phba->lmt & LMT_4Gb)
1906                 fc_host_supported_speeds(shost) |= FC_PORTSPEED_4GBIT;
1907         if (phba->lmt & LMT_2Gb)
1908                 fc_host_supported_speeds(shost) |= FC_PORTSPEED_2GBIT;
1909         if (phba->lmt & LMT_1Gb)
1910                 fc_host_supported_speeds(shost) |= FC_PORTSPEED_1GBIT;
1911
1912         fc_host_maxframe_size(shost) =
1913                 (((uint32_t) vport->fc_sparam.cmn.bbRcvSizeMsb & 0x0F) << 8) |
1914                 (uint32_t) vport->fc_sparam.cmn.bbRcvSizeLsb;
1915
1916         /* This value is also unchanging */
1917         memset(fc_host_active_fc4s(shost), 0,
1918                sizeof(fc_host_active_fc4s(shost)));
1919         fc_host_active_fc4s(shost)[2] = 1;
1920         fc_host_active_fc4s(shost)[7] = 1;
1921
1922         fc_host_max_npiv_vports(shost) = phba->max_vpi;
1923         spin_lock_irq(shost->host_lock);
1924         vport->load_flag &= ~FC_LOADING;
1925         spin_unlock_irq(shost->host_lock);
1926 }
1927
1928 static int
1929 lpfc_enable_msix(struct lpfc_hba *phba)
1930 {
1931         int error;
1932
1933         phba->msix_entries[0].entry = 0;
1934         phba->msix_entries[0].vector = 0;
1935
1936         error = pci_enable_msix(phba->pcidev, phba->msix_entries,
1937                                 ARRAY_SIZE(phba->msix_entries));
1938         if (error) {
1939                 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
1940                                 "0420 Enable MSI-X failed (%d), continuing "
1941                                 "with MSI\n", error);
1942                 pci_disable_msix(phba->pcidev);
1943                 return error;
1944         }
1945
1946         error = request_irq(phba->msix_entries[0].vector, lpfc_intr_handler, 0,
1947                             LPFC_DRIVER_NAME, phba);
1948         if (error) {
1949                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
1950                                 "0421 MSI-X request_irq failed (%d), "
1951                                 "continuing with MSI\n", error);
1952                 pci_disable_msix(phba->pcidev);
1953         }
1954         return error;
1955 }
1956
1957 static void
1958 lpfc_disable_msix(struct lpfc_hba *phba)
1959 {
1960         free_irq(phba->msix_entries[0].vector, phba);
1961         pci_disable_msix(phba->pcidev);
1962 }
1963
1964 static int __devinit
1965 lpfc_pci_probe_one(struct pci_dev *pdev, const struct pci_device_id *pid)
1966 {
1967         struct lpfc_vport *vport = NULL;
1968         struct lpfc_hba   *phba;
1969         struct lpfc_sli   *psli;
1970         struct lpfc_iocbq *iocbq_entry = NULL, *iocbq_next = NULL;
1971         struct Scsi_Host  *shost = NULL;
1972         void *ptr;
1973         unsigned long bar0map_len, bar2map_len;
1974         int error = -ENODEV, retval;
1975         int  i, hbq_count;
1976         uint16_t iotag;
1977         int bars = pci_select_bars(pdev, IORESOURCE_MEM);
1978
1979         if (pci_enable_device_mem(pdev))
1980                 goto out;
1981         if (pci_request_selected_regions(pdev, bars, LPFC_DRIVER_NAME))
1982                 goto out_disable_device;
1983
1984         phba = kzalloc(sizeof (struct lpfc_hba), GFP_KERNEL);
1985         if (!phba)
1986                 goto out_release_regions;
1987
1988         spin_lock_init(&phba->hbalock);
1989
1990         /* Initialize ndlp management spinlock */
1991         spin_lock_init(&phba->ndlp_lock);
1992
1993         phba->pcidev = pdev;
1994
1995         /* Assign an unused board number */
1996         if ((phba->brd_no = lpfc_get_instance()) < 0)
1997                 goto out_free_phba;
1998
1999         INIT_LIST_HEAD(&phba->port_list);
2000         /*
2001          * Get all the module params for configuring this host and then
2002          * establish the host.
2003          */
2004         lpfc_get_cfgparam(phba);
2005         phba->max_vpi = LPFC_MAX_VPI;
2006
2007         /* Initialize timers used by driver */
2008         init_timer(&phba->fc_estabtmo);
2009         phba->fc_estabtmo.function = lpfc_establish_link_tmo;
2010         phba->fc_estabtmo.data = (unsigned long)phba;
2011
2012         init_timer(&phba->hb_tmofunc);
2013         phba->hb_tmofunc.function = lpfc_hb_timeout;
2014         phba->hb_tmofunc.data = (unsigned long)phba;
2015
2016         psli = &phba->sli;
2017         init_timer(&psli->mbox_tmo);
2018         psli->mbox_tmo.function = lpfc_mbox_timeout;
2019         psli->mbox_tmo.data = (unsigned long) phba;
2020         init_timer(&phba->fcp_poll_timer);
2021         phba->fcp_poll_timer.function = lpfc_poll_timeout;
2022         phba->fcp_poll_timer.data = (unsigned long) phba;
2023         init_timer(&phba->fabric_block_timer);
2024         phba->fabric_block_timer.function = lpfc_fabric_block_timeout;
2025         phba->fabric_block_timer.data = (unsigned long) phba;
2026
2027         pci_set_master(pdev);
2028         pci_try_set_mwi(pdev);
2029
2030         if (pci_set_dma_mask(phba->pcidev, DMA_64BIT_MASK) != 0)
2031                 if (pci_set_dma_mask(phba->pcidev, DMA_32BIT_MASK) != 0)
2032                         goto out_idr_remove;
2033
2034         /*
2035          * Get the bus address of Bar0 and Bar2 and the number of bytes
2036          * required by each mapping.
2037          */
2038         phba->pci_bar0_map = pci_resource_start(phba->pcidev, 0);
2039         bar0map_len        = pci_resource_len(phba->pcidev, 0);
2040
2041         phba->pci_bar2_map = pci_resource_start(phba->pcidev, 2);
2042         bar2map_len        = pci_resource_len(phba->pcidev, 2);
2043
2044         /* Map HBA SLIM to a kernel virtual address. */
2045         phba->slim_memmap_p      = ioremap(phba->pci_bar0_map, bar0map_len);
2046         if (!phba->slim_memmap_p) {
2047                 error = -ENODEV;
2048                 dev_printk(KERN_ERR, &pdev->dev,
2049                            "ioremap failed for SLIM memory.\n");
2050                 goto out_idr_remove;
2051         }
2052
2053         /* Map HBA Control Registers to a kernel virtual address. */
2054         phba->ctrl_regs_memmap_p = ioremap(phba->pci_bar2_map, bar2map_len);
2055         if (!phba->ctrl_regs_memmap_p) {
2056                 error = -ENODEV;
2057                 dev_printk(KERN_ERR, &pdev->dev,
2058                            "ioremap failed for HBA control registers.\n");
2059                 goto out_iounmap_slim;
2060         }
2061
2062         /* Allocate memory for SLI-2 structures */
2063         phba->slim2p = dma_alloc_coherent(&phba->pcidev->dev, SLI2_SLIM_SIZE,
2064                                           &phba->slim2p_mapping, GFP_KERNEL);
2065         if (!phba->slim2p)
2066                 goto out_iounmap;
2067
2068         memset(phba->slim2p, 0, SLI2_SLIM_SIZE);
2069
2070         phba->hbqslimp.virt = dma_alloc_coherent(&phba->pcidev->dev,
2071                                                  lpfc_sli_hbq_size(),
2072                                                  &phba->hbqslimp.phys,
2073                                                  GFP_KERNEL);
2074         if (!phba->hbqslimp.virt)
2075                 goto out_free_slim;
2076
2077         hbq_count = lpfc_sli_hbq_count();
2078         ptr = phba->hbqslimp.virt;
2079         for (i = 0; i < hbq_count; ++i) {
2080                 phba->hbqs[i].hbq_virt = ptr;
2081                 INIT_LIST_HEAD(&phba->hbqs[i].hbq_buffer_list);
2082                 ptr += (lpfc_hbq_defs[i]->entry_count *
2083                         sizeof(struct lpfc_hbq_entry));
2084         }
2085         phba->hbqs[LPFC_ELS_HBQ].hbq_alloc_buffer = lpfc_els_hbq_alloc;
2086         phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer  = lpfc_els_hbq_free;
2087
2088         memset(phba->hbqslimp.virt, 0, lpfc_sli_hbq_size());
2089
2090         INIT_LIST_HEAD(&phba->hbqbuf_in_list);
2091
2092         /* Initialize the SLI Layer to run with lpfc HBAs. */
2093         lpfc_sli_setup(phba);
2094         lpfc_sli_queue_setup(phba);
2095
2096         retval = lpfc_mem_alloc(phba);
2097         if (retval) {
2098                 error = retval;
2099                 goto out_free_hbqslimp;
2100         }
2101
2102         /* Initialize and populate the iocb list per host.  */
2103         INIT_LIST_HEAD(&phba->lpfc_iocb_list);
2104         for (i = 0; i < LPFC_IOCB_LIST_CNT; i++) {
2105                 iocbq_entry = kzalloc(sizeof(struct lpfc_iocbq), GFP_KERNEL);
2106                 if (iocbq_entry == NULL) {
2107                         printk(KERN_ERR "%s: only allocated %d iocbs of "
2108                                 "expected %d count. Unloading driver.\n",
2109                                 __FUNCTION__, i, LPFC_IOCB_LIST_CNT);
2110                         error = -ENOMEM;
2111                         goto out_free_iocbq;
2112                 }
2113
2114                 iotag = lpfc_sli_next_iotag(phba, iocbq_entry);
2115                 if (iotag == 0) {
2116                         kfree (iocbq_entry);
2117                         printk(KERN_ERR "%s: failed to allocate IOTAG. "
2118                                "Unloading driver.\n",
2119                                 __FUNCTION__);
2120                         error = -ENOMEM;
2121                         goto out_free_iocbq;
2122                 }
2123
2124                 spin_lock_irq(&phba->hbalock);
2125                 list_add(&iocbq_entry->list, &phba->lpfc_iocb_list);
2126                 phba->total_iocbq_bufs++;
2127                 spin_unlock_irq(&phba->hbalock);
2128         }
2129
2130         /* Initialize HBA structure */
2131         phba->fc_edtov = FF_DEF_EDTOV;
2132         phba->fc_ratov = FF_DEF_RATOV;
2133         phba->fc_altov = FF_DEF_ALTOV;
2134         phba->fc_arbtov = FF_DEF_ARBTOV;
2135
2136         INIT_LIST_HEAD(&phba->work_list);
2137         phba->work_ha_mask = (HA_ERATT|HA_MBATT|HA_LATT);
2138         phba->work_ha_mask |= (HA_RXMASK << (LPFC_ELS_RING * 4));
2139
2140         /* Startup the kernel thread for this host adapter. */
2141         phba->worker_thread = kthread_run(lpfc_do_work, phba,
2142                                        "lpfc_worker_%d", phba->brd_no);
2143         if (IS_ERR(phba->worker_thread)) {
2144                 error = PTR_ERR(phba->worker_thread);
2145                 goto out_free_iocbq;
2146         }
2147
2148         /* Initialize the list of scsi buffers used by driver for scsi IO. */
2149         spin_lock_init(&phba->scsi_buf_list_lock);
2150         INIT_LIST_HEAD(&phba->lpfc_scsi_buf_list);
2151
2152         /* Initialize list of fabric iocbs */
2153         INIT_LIST_HEAD(&phba->fabric_iocb_list);
2154
2155         /* Initialize list to save ELS buffers */
2156         INIT_LIST_HEAD(&phba->elsbuf);
2157
2158         vport = lpfc_create_port(phba, phba->brd_no, &phba->pcidev->dev);
2159         if (!vport)
2160                 goto out_kthread_stop;
2161
2162         shost = lpfc_shost_from_vport(vport);
2163         phba->pport = vport;
2164         lpfc_debugfs_initialize(vport);
2165
2166         pci_set_drvdata(pdev, shost);
2167         phba->intr_type = NONE;
2168
2169         if (phba->cfg_use_msi == 2) {
2170                 error = lpfc_enable_msix(phba);
2171                 if (!error)
2172                         phba->intr_type = MSIX;
2173         }
2174
2175         /* Fallback to MSI if MSI-X initialization failed */
2176         if (phba->cfg_use_msi >= 1 && phba->intr_type == NONE) {
2177                 retval = pci_enable_msi(phba->pcidev);
2178                 if (!retval)
2179                         phba->intr_type = MSI;
2180                 else
2181                         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
2182                                         "0452 Enable MSI failed, continuing "
2183                                         "with IRQ\n");
2184         }
2185
2186         /* MSI-X is the only case the doesn't need to call request_irq */
2187         if (phba->intr_type != MSIX) {
2188                 retval = request_irq(phba->pcidev->irq, lpfc_intr_handler,
2189                                      IRQF_SHARED, LPFC_DRIVER_NAME, phba);
2190                 if (retval) {
2191                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT, "0451 Enable "
2192                                         "interrupt handler failed\n");
2193                         error = retval;
2194                         goto out_disable_msi;
2195                 } else if (phba->intr_type != MSI)
2196                         phba->intr_type = INTx;
2197         }
2198
2199         phba->MBslimaddr = phba->slim_memmap_p;
2200         phba->HAregaddr = phba->ctrl_regs_memmap_p + HA_REG_OFFSET;
2201         phba->CAregaddr = phba->ctrl_regs_memmap_p + CA_REG_OFFSET;
2202         phba->HSregaddr = phba->ctrl_regs_memmap_p + HS_REG_OFFSET;
2203         phba->HCregaddr = phba->ctrl_regs_memmap_p + HC_REG_OFFSET;
2204
2205         if (lpfc_alloc_sysfs_attr(vport)) {
2206                 error = -ENOMEM;
2207                 goto out_free_irq;
2208         }
2209
2210         if (lpfc_sli_hba_setup(phba)) {
2211                 error = -ENODEV;
2212                 goto out_remove_device;
2213         }
2214
2215         /*
2216          * hba setup may have changed the hba_queue_depth so we need to adjust
2217          * the value of can_queue.
2218          */
2219         shost->can_queue = phba->cfg_hba_queue_depth - 10;
2220
2221         lpfc_host_attrib_init(shost);
2222
2223         if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
2224                 spin_lock_irq(shost->host_lock);
2225                 lpfc_poll_start_timer(phba);
2226                 spin_unlock_irq(shost->host_lock);
2227         }
2228
2229         scsi_scan_host(shost);
2230
2231         return 0;
2232
2233 out_remove_device:
2234         lpfc_free_sysfs_attr(vport);
2235         spin_lock_irq(shost->host_lock);
2236         vport->load_flag |= FC_UNLOADING;
2237         spin_unlock_irq(shost->host_lock);
2238 out_free_irq:
2239         lpfc_stop_phba_timers(phba);
2240         phba->pport->work_port_events = 0;
2241
2242         if (phba->intr_type == MSIX)
2243                 lpfc_disable_msix(phba);
2244         else
2245                 free_irq(phba->pcidev->irq, phba);
2246
2247 out_disable_msi:
2248         if (phba->intr_type == MSI)
2249                 pci_disable_msi(phba->pcidev);
2250         destroy_port(vport);
2251 out_kthread_stop:
2252         kthread_stop(phba->worker_thread);
2253 out_free_iocbq:
2254         list_for_each_entry_safe(iocbq_entry, iocbq_next,
2255                                                 &phba->lpfc_iocb_list, list) {
2256                 kfree(iocbq_entry);
2257                 phba->total_iocbq_bufs--;
2258         }
2259         lpfc_mem_free(phba);
2260 out_free_hbqslimp:
2261         dma_free_coherent(&pdev->dev, lpfc_sli_hbq_size(), phba->hbqslimp.virt,
2262                           phba->hbqslimp.phys);
2263 out_free_slim:
2264         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE, phba->slim2p,
2265                                                         phba->slim2p_mapping);
2266 out_iounmap:
2267         iounmap(phba->ctrl_regs_memmap_p);
2268 out_iounmap_slim:
2269         iounmap(phba->slim_memmap_p);
2270 out_idr_remove:
2271         idr_remove(&lpfc_hba_index, phba->brd_no);
2272 out_free_phba:
2273         kfree(phba);
2274 out_release_regions:
2275         pci_release_selected_regions(pdev, bars);
2276 out_disable_device:
2277         pci_disable_device(pdev);
2278 out:
2279         pci_set_drvdata(pdev, NULL);
2280         if (shost)
2281                 scsi_host_put(shost);
2282         return error;
2283 }
2284
2285 static void __devexit
2286 lpfc_pci_remove_one(struct pci_dev *pdev)
2287 {
2288         struct Scsi_Host  *shost = pci_get_drvdata(pdev);
2289         struct lpfc_vport *vport = (struct lpfc_vport *) shost->hostdata;
2290         struct lpfc_hba   *phba = vport->phba;
2291         int bars = pci_select_bars(pdev, IORESOURCE_MEM);
2292
2293         spin_lock_irq(&phba->hbalock);
2294         vport->load_flag |= FC_UNLOADING;
2295         spin_unlock_irq(&phba->hbalock);
2296
2297         kfree(vport->vname);
2298         lpfc_free_sysfs_attr(vport);
2299
2300         kthread_stop(phba->worker_thread);
2301
2302         fc_remove_host(shost);
2303         scsi_remove_host(shost);
2304         lpfc_cleanup(vport);
2305
2306         /*
2307          * Bring down the SLI Layer. This step disable all interrupts,
2308          * clears the rings, discards all mailbox commands, and resets
2309          * the HBA.
2310          */
2311         lpfc_sli_hba_down(phba);
2312         lpfc_sli_brdrestart(phba);
2313
2314         lpfc_stop_phba_timers(phba);
2315         spin_lock_irq(&phba->hbalock);
2316         list_del_init(&vport->listentry);
2317         spin_unlock_irq(&phba->hbalock);
2318
2319         lpfc_debugfs_terminate(vport);
2320
2321         if (phba->intr_type == MSIX)
2322                 lpfc_disable_msix(phba);
2323         else {
2324                 free_irq(phba->pcidev->irq, phba);
2325                 if (phba->intr_type == MSI)
2326                         pci_disable_msi(phba->pcidev);
2327         }
2328
2329         pci_set_drvdata(pdev, NULL);
2330         scsi_host_put(shost);
2331
2332         /*
2333          * Call scsi_free before mem_free since scsi bufs are released to their
2334          * corresponding pools here.
2335          */
2336         lpfc_scsi_free(phba);
2337         lpfc_mem_free(phba);
2338
2339         dma_free_coherent(&pdev->dev, lpfc_sli_hbq_size(), phba->hbqslimp.virt,
2340                           phba->hbqslimp.phys);
2341
2342         /* Free resources associated with SLI2 interface */
2343         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE,
2344                           phba->slim2p, phba->slim2p_mapping);
2345
2346         /* unmap adapter SLIM and Control Registers */
2347         iounmap(phba->ctrl_regs_memmap_p);
2348         iounmap(phba->slim_memmap_p);
2349
2350         idr_remove(&lpfc_hba_index, phba->brd_no);
2351
2352         kfree(phba);
2353
2354         pci_release_selected_regions(pdev, bars);
2355         pci_disable_device(pdev);
2356 }
2357
2358 /**
2359  * lpfc_io_error_detected - called when PCI error is detected
2360  * @pdev: Pointer to PCI device
2361  * @state: The current pci conneection state
2362  *
2363  * This function is called after a PCI bus error affecting
2364  * this device has been detected.
2365  */
2366 static pci_ers_result_t lpfc_io_error_detected(struct pci_dev *pdev,
2367                                 pci_channel_state_t state)
2368 {
2369         struct Scsi_Host *shost = pci_get_drvdata(pdev);
2370         struct lpfc_hba *phba = ((struct lpfc_vport *)shost->hostdata)->phba;
2371         struct lpfc_sli *psli = &phba->sli;
2372         struct lpfc_sli_ring  *pring;
2373
2374         if (state == pci_channel_io_perm_failure)
2375                 return PCI_ERS_RESULT_DISCONNECT;
2376
2377         pci_disable_device(pdev);
2378         /*
2379          * There may be I/Os dropped by the firmware.
2380          * Error iocb (I/O) on txcmplq and let the SCSI layer
2381          * retry it after re-establishing link.
2382          */
2383         pring = &psli->ring[psli->fcp_ring];
2384         lpfc_sli_abort_iocb_ring(phba, pring);
2385
2386         if (phba->intr_type == MSIX)
2387                 lpfc_disable_msix(phba);
2388         else {
2389                 free_irq(phba->pcidev->irq, phba);
2390                 if (phba->intr_type == MSI)
2391                         pci_disable_msi(phba->pcidev);
2392         }
2393
2394         /* Request a slot reset. */
2395         return PCI_ERS_RESULT_NEED_RESET;
2396 }
2397
2398 /**
2399  * lpfc_io_slot_reset - called after the pci bus has been reset.
2400  * @pdev: Pointer to PCI device
2401  *
2402  * Restart the card from scratch, as if from a cold-boot.
2403  */
2404 static pci_ers_result_t lpfc_io_slot_reset(struct pci_dev *pdev)
2405 {
2406         struct Scsi_Host *shost = pci_get_drvdata(pdev);
2407         struct lpfc_hba *phba = ((struct lpfc_vport *)shost->hostdata)->phba;
2408         struct lpfc_sli *psli = &phba->sli;
2409
2410         dev_printk(KERN_INFO, &pdev->dev, "recovering from a slot reset.\n");
2411         if (pci_enable_device_mem(pdev)) {
2412                 printk(KERN_ERR "lpfc: Cannot re-enable "
2413                         "PCI device after reset.\n");
2414                 return PCI_ERS_RESULT_DISCONNECT;
2415         }
2416
2417         pci_set_master(pdev);
2418
2419         /* Re-establishing Link */
2420         spin_lock_irq(shost->host_lock);
2421         phba->pport->fc_flag |= FC_ESTABLISH_LINK;
2422         spin_unlock_irq(shost->host_lock);
2423
2424         spin_lock_irq(&phba->hbalock);
2425         psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
2426         spin_unlock_irq(&phba->hbalock);
2427
2428
2429         /* Take device offline; this will perform cleanup */
2430         lpfc_offline(phba);
2431         lpfc_sli_brdrestart(phba);
2432
2433         return PCI_ERS_RESULT_RECOVERED;
2434 }
2435
2436 /**
2437  * lpfc_io_resume - called when traffic can start flowing again.
2438  * @pdev: Pointer to PCI device
2439  *
2440  * This callback is called when the error recovery driver tells us that
2441  * its OK to resume normal operation.
2442  */
2443 static void lpfc_io_resume(struct pci_dev *pdev)
2444 {
2445         struct Scsi_Host *shost = pci_get_drvdata(pdev);
2446         struct lpfc_hba *phba = ((struct lpfc_vport *)shost->hostdata)->phba;
2447
2448         if (lpfc_online(phba) == 0) {
2449                 mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
2450         }
2451 }
2452
2453 static struct pci_device_id lpfc_id_table[] = {
2454         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_VIPER,
2455                 PCI_ANY_ID, PCI_ANY_ID, },
2456         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_FIREFLY,
2457                 PCI_ANY_ID, PCI_ANY_ID, },
2458         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_THOR,
2459                 PCI_ANY_ID, PCI_ANY_ID, },
2460         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PEGASUS,
2461                 PCI_ANY_ID, PCI_ANY_ID, },
2462         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_CENTAUR,
2463                 PCI_ANY_ID, PCI_ANY_ID, },
2464         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_DRAGONFLY,
2465                 PCI_ANY_ID, PCI_ANY_ID, },
2466         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SUPERFLY,
2467                 PCI_ANY_ID, PCI_ANY_ID, },
2468         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_RFLY,
2469                 PCI_ANY_ID, PCI_ANY_ID, },
2470         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PFLY,
2471                 PCI_ANY_ID, PCI_ANY_ID, },
2472         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE,
2473                 PCI_ANY_ID, PCI_ANY_ID, },
2474         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_SCSP,
2475                 PCI_ANY_ID, PCI_ANY_ID, },
2476         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_DCSP,
2477                 PCI_ANY_ID, PCI_ANY_ID, },
2478         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS,
2479                 PCI_ANY_ID, PCI_ANY_ID, },
2480         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_SCSP,
2481                 PCI_ANY_ID, PCI_ANY_ID, },
2482         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_DCSP,
2483                 PCI_ANY_ID, PCI_ANY_ID, },
2484         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BMID,
2485                 PCI_ANY_ID, PCI_ANY_ID, },
2486         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BSMB,
2487                 PCI_ANY_ID, PCI_ANY_ID, },
2488         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR,
2489                 PCI_ANY_ID, PCI_ANY_ID, },
2490         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_SCSP,
2491                 PCI_ANY_ID, PCI_ANY_ID, },
2492         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_DCSP,
2493                 PCI_ANY_ID, PCI_ANY_ID, },
2494         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZMID,
2495                 PCI_ANY_ID, PCI_ANY_ID, },
2496         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZSMB,
2497                 PCI_ANY_ID, PCI_ANY_ID, },
2498         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_TFLY,
2499                 PCI_ANY_ID, PCI_ANY_ID, },
2500         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP101,
2501                 PCI_ANY_ID, PCI_ANY_ID, },
2502         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP10000S,
2503                 PCI_ANY_ID, PCI_ANY_ID, },
2504         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP11000S,
2505                 PCI_ANY_ID, PCI_ANY_ID, },
2506         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LPE11000S,
2507                 PCI_ANY_ID, PCI_ANY_ID, },
2508         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT,
2509                 PCI_ANY_ID, PCI_ANY_ID, },
2510         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT_MID,
2511                 PCI_ANY_ID, PCI_ANY_ID, },
2512         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT_SMB,
2513                 PCI_ANY_ID, PCI_ANY_ID, },
2514         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT_DCSP,
2515                 PCI_ANY_ID, PCI_ANY_ID, },
2516         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT_SCSP,
2517                 PCI_ANY_ID, PCI_ANY_ID, },
2518         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SAT_S,
2519                 PCI_ANY_ID, PCI_ANY_ID, },
2520         { 0 }
2521 };
2522
2523 MODULE_DEVICE_TABLE(pci, lpfc_id_table);
2524
2525 static struct pci_error_handlers lpfc_err_handler = {
2526         .error_detected = lpfc_io_error_detected,
2527         .slot_reset = lpfc_io_slot_reset,
2528         .resume = lpfc_io_resume,
2529 };
2530
2531 static struct pci_driver lpfc_driver = {
2532         .name           = LPFC_DRIVER_NAME,
2533         .id_table       = lpfc_id_table,
2534         .probe          = lpfc_pci_probe_one,
2535         .remove         = __devexit_p(lpfc_pci_remove_one),
2536         .err_handler    = &lpfc_err_handler,
2537 };
2538
2539 static int __init
2540 lpfc_init(void)
2541 {
2542         int error = 0;
2543
2544         printk(LPFC_MODULE_DESC "\n");
2545         printk(LPFC_COPYRIGHT "\n");
2546
2547         if (lpfc_enable_npiv) {
2548                 lpfc_transport_functions.vport_create = lpfc_vport_create;
2549                 lpfc_transport_functions.vport_delete = lpfc_vport_delete;
2550         }
2551         lpfc_transport_template =
2552                                 fc_attach_transport(&lpfc_transport_functions);
2553         if (lpfc_transport_template == NULL)
2554                 return -ENOMEM;
2555         if (lpfc_enable_npiv) {
2556                 lpfc_vport_transport_template =
2557                         fc_attach_transport(&lpfc_vport_transport_functions);
2558                 if (lpfc_vport_transport_template == NULL) {
2559                         fc_release_transport(lpfc_transport_template);
2560                         return -ENOMEM;
2561                 }
2562         }
2563         error = pci_register_driver(&lpfc_driver);
2564         if (error) {
2565                 fc_release_transport(lpfc_transport_template);
2566                 fc_release_transport(lpfc_vport_transport_template);
2567         }
2568
2569         return error;
2570 }
2571
2572 static void __exit
2573 lpfc_exit(void)
2574 {
2575         pci_unregister_driver(&lpfc_driver);
2576         fc_release_transport(lpfc_transport_template);
2577         if (lpfc_enable_npiv)
2578                 fc_release_transport(lpfc_vport_transport_template);
2579 }
2580
2581 module_init(lpfc_init);
2582 module_exit(lpfc_exit);
2583 MODULE_LICENSE("GPL");
2584 MODULE_DESCRIPTION(LPFC_MODULE_DESC);
2585 MODULE_AUTHOR("Emulex Corporation - tech.support@emulex.com");
2586 MODULE_VERSION("0:" LPFC_DRIVER_VERSION);