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