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