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