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