[SCSI] lpfc: Fix for "command completion for iotax x?? not found"
[safe/jmp/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-2005 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 *);
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
75         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
76         if (!pmb) {
77                 phba->hba_state = LPFC_HBA_ERROR;
78                 return -ENOMEM;
79         }
80
81         mb = &pmb->mb;
82         phba->hba_state = LPFC_INIT_MBX_CMDS;
83
84         if (lpfc_is_LC_HBA(phba->pcidev->device)) {
85                 uint32_t *ptext = (uint32_t *) licensed;
86
87                 for (i = 0; i < 56; i += sizeof (uint32_t), ptext++)
88                         *ptext = cpu_to_be32(*ptext);
89
90                 lpfc_read_nv(phba, pmb);
91                 memset((char*)mb->un.varRDnvp.rsvd3, 0,
92                         sizeof (mb->un.varRDnvp.rsvd3));
93                 memcpy((char*)mb->un.varRDnvp.rsvd3, licensed,
94                          sizeof (licensed));
95
96                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
97
98                 if (rc != MBX_SUCCESS) {
99                         lpfc_printf_log(phba,
100                                         KERN_ERR,
101                                         LOG_MBOX,
102                                         "%d:0324 Config Port initialization "
103                                         "error, mbxCmd x%x READ_NVPARM, "
104                                         "mbxStatus x%x\n",
105                                         phba->brd_no,
106                                         mb->mbxCommand, mb->mbxStatus);
107                         mempool_free(pmb, phba->mbox_mem_pool);
108                         return -ERESTART;
109                 }
110                 memcpy(phba->wwnn, (char *)mb->un.varRDnvp.nodename,
111                        sizeof (mb->un.varRDnvp.nodename));
112         }
113
114         /* Setup and issue mailbox READ REV command */
115         lpfc_read_rev(phba, pmb);
116         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
117         if (rc != MBX_SUCCESS) {
118                 lpfc_printf_log(phba,
119                                 KERN_ERR,
120                                 LOG_INIT,
121                                 "%d:0439 Adapter failed to init, mbxCmd x%x "
122                                 "READ_REV, mbxStatus x%x\n",
123                                 phba->brd_no,
124                                 mb->mbxCommand, mb->mbxStatus);
125                 mempool_free( pmb, phba->mbox_mem_pool);
126                 return -ERESTART;
127         }
128
129         /* The HBA's current state is provided by the ProgType and rr fields.
130          * Read and check the value of these fields before continuing to config
131          * this port.
132          */
133         if (mb->un.varRdRev.rr == 0 || mb->un.varRdRev.un.b.ProgType != 2) {
134                 /* Old firmware */
135                 vp->rev.rBit = 0;
136                 lpfc_printf_log(phba,
137                                 KERN_ERR,
138                                 LOG_INIT,
139                                 "%d:0440 Adapter failed to init, mbxCmd x%x "
140                                 "READ_REV detected outdated firmware"
141                                 "Data: x%x\n",
142                                 phba->brd_no,
143                                 mb->mbxCommand, 0);
144                 mempool_free(pmb, phba->mbox_mem_pool);
145                 return -ERESTART;
146         } else {
147                 vp->rev.rBit = 1;
148                 vp->rev.sli1FwRev = mb->un.varRdRev.sli1FwRev;
149                 memcpy(vp->rev.sli1FwName,
150                         (char*)mb->un.varRdRev.sli1FwName, 16);
151                 vp->rev.sli2FwRev = mb->un.varRdRev.sli2FwRev;
152                 memcpy(vp->rev.sli2FwName,
153                                         (char *)mb->un.varRdRev.sli2FwName, 16);
154         }
155
156         /* Save information as VPD data */
157         vp->rev.biuRev = mb->un.varRdRev.biuRev;
158         vp->rev.smRev = mb->un.varRdRev.smRev;
159         vp->rev.smFwRev = mb->un.varRdRev.un.smFwRev;
160         vp->rev.endecRev = mb->un.varRdRev.endecRev;
161         vp->rev.fcphHigh = mb->un.varRdRev.fcphHigh;
162         vp->rev.fcphLow = mb->un.varRdRev.fcphLow;
163         vp->rev.feaLevelHigh = mb->un.varRdRev.feaLevelHigh;
164         vp->rev.feaLevelLow = mb->un.varRdRev.feaLevelLow;
165         vp->rev.postKernRev = mb->un.varRdRev.postKernRev;
166         vp->rev.opFwRev = mb->un.varRdRev.opFwRev;
167
168         if (lpfc_is_LC_HBA(phba->pcidev->device))
169                 memcpy(phba->RandomData, (char *)&mb->un.varWords[24],
170                                                 sizeof (phba->RandomData));
171
172         /* Get the default values for Model Name and Description */
173         lpfc_get_hba_model_desc(phba, phba->ModelName, phba->ModelDesc);
174
175         /* Get adapter VPD information */
176         pmb->context2 = kmalloc(DMP_RSP_SIZE, GFP_KERNEL);
177         if (!pmb->context2)
178                 goto out_free_mbox;
179         lpfc_vpd_data = kmalloc(DMP_VPD_SIZE, GFP_KERNEL);
180         if (!lpfc_vpd_data)
181                 goto out_free_context2;
182
183         do {
184                 lpfc_dump_mem(phba, pmb, offset);
185                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
186
187                 if (rc != MBX_SUCCESS) {
188                         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
189                                         "%d:0441 VPD not present on adapter, "
190                                         "mbxCmd x%x DUMP VPD, mbxStatus x%x\n",
191                                         phba->brd_no,
192                                         mb->mbxCommand, mb->mbxStatus);
193                         kfree(lpfc_vpd_data);
194                         lpfc_vpd_data = NULL;
195                         break;
196                 }
197
198                 lpfc_sli_pcimem_bcopy(pmb->context2, lpfc_vpd_data + offset,
199                                                         mb->un.varDmp.word_cnt);
200                 offset += mb->un.varDmp.word_cnt;
201         } while (mb->un.varDmp.word_cnt);
202         lpfc_parse_vpd(phba, lpfc_vpd_data);
203
204         kfree(lpfc_vpd_data);
205 out_free_context2:
206         kfree(pmb->context2);
207 out_free_mbox:
208         mempool_free(pmb, phba->mbox_mem_pool);
209         return 0;
210 }
211
212 /************************************************************************/
213 /*                                                                      */
214 /*    lpfc_config_port_post                                             */
215 /*    This routine will do LPFC initialization after the                */
216 /*    CONFIG_PORT mailbox command. This will be initialized             */
217 /*    as a SLI layer callback routine.                                  */
218 /*    This routine returns 0 on success. Any other return value         */
219 /*    indicates an error.                                               */
220 /*                                                                      */
221 /************************************************************************/
222 int
223 lpfc_config_port_post(struct lpfc_hba * phba)
224 {
225         LPFC_MBOXQ_t *pmb;
226         MAILBOX_t *mb;
227         struct lpfc_dmabuf *mp;
228         struct lpfc_sli *psli = &phba->sli;
229         uint32_t status, timeout;
230         int i, j, rc;
231
232         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
233         if (!pmb) {
234                 phba->hba_state = LPFC_HBA_ERROR;
235                 return -ENOMEM;
236         }
237         mb = &pmb->mb;
238
239         lpfc_config_link(phba, pmb);
240         rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
241         if (rc != MBX_SUCCESS) {
242                 lpfc_printf_log(phba,
243                                 KERN_ERR,
244                                 LOG_INIT,
245                                 "%d:0447 Adapter failed init, mbxCmd x%x "
246                                 "CONFIG_LINK mbxStatus x%x\n",
247                                 phba->brd_no,
248                                 mb->mbxCommand, mb->mbxStatus);
249                 phba->hba_state = LPFC_HBA_ERROR;
250                 mempool_free( pmb, phba->mbox_mem_pool);
251                 return -EIO;
252         }
253
254         /* Get login parameters for NID.  */
255         lpfc_read_sparam(phba, pmb);
256         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
257                 lpfc_printf_log(phba,
258                                 KERN_ERR,
259                                 LOG_INIT,
260                                 "%d:0448 Adapter failed init, mbxCmd x%x "
261                                 "READ_SPARM mbxStatus x%x\n",
262                                 phba->brd_no,
263                                 mb->mbxCommand, mb->mbxStatus);
264                 phba->hba_state = LPFC_HBA_ERROR;
265                 mp = (struct lpfc_dmabuf *) pmb->context1;
266                 mempool_free( pmb, phba->mbox_mem_pool);
267                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
268                 kfree(mp);
269                 return -EIO;
270         }
271
272         mp = (struct lpfc_dmabuf *) pmb->context1;
273
274         memcpy(&phba->fc_sparam, mp->virt, sizeof (struct serv_parm));
275         lpfc_mbuf_free(phba, mp->virt, mp->phys);
276         kfree(mp);
277         pmb->context1 = NULL;
278
279         memcpy(&phba->fc_nodename, &phba->fc_sparam.nodeName,
280                sizeof (struct lpfc_name));
281         memcpy(&phba->fc_portname, &phba->fc_sparam.portName,
282                sizeof (struct lpfc_name));
283         /* If no serial number in VPD data, use low 6 bytes of WWNN */
284         /* This should be consolidated into parse_vpd ? - mr */
285         if (phba->SerialNumber[0] == 0) {
286                 uint8_t *outptr;
287
288                 outptr = &phba->fc_nodename.u.s.IEEE[0];
289                 for (i = 0; i < 12; i++) {
290                         status = *outptr++;
291                         j = ((status & 0xf0) >> 4);
292                         if (j <= 9)
293                                 phba->SerialNumber[i] =
294                                     (char)((uint8_t) 0x30 + (uint8_t) j);
295                         else
296                                 phba->SerialNumber[i] =
297                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
298                         i++;
299                         j = (status & 0xf);
300                         if (j <= 9)
301                                 phba->SerialNumber[i] =
302                                     (char)((uint8_t) 0x30 + (uint8_t) j);
303                         else
304                                 phba->SerialNumber[i] =
305                                     (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
306                 }
307         }
308
309         /* This should turn on DELAYED ABTS for ELS timeouts */
310         lpfc_set_slim(phba, pmb, 0x052198, 0x1);
311         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
312                 phba->hba_state = LPFC_HBA_ERROR;
313                 mempool_free( pmb, phba->mbox_mem_pool);
314                 return -EIO;
315         }
316
317
318         lpfc_read_config(phba, pmb);
319         if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
320                 lpfc_printf_log(phba,
321                                 KERN_ERR,
322                                 LOG_INIT,
323                                 "%d:0453 Adapter failed to init, mbxCmd x%x "
324                                 "READ_CONFIG, mbxStatus x%x\n",
325                                 phba->brd_no,
326                                 mb->mbxCommand, mb->mbxStatus);
327                 phba->hba_state = LPFC_HBA_ERROR;
328                 mempool_free( pmb, phba->mbox_mem_pool);
329                 return -EIO;
330         }
331
332         /* Reset the DFT_HBA_Q_DEPTH to the max xri  */
333         if (phba->cfg_hba_queue_depth > (mb->un.varRdConfig.max_xri+1))
334                 phba->cfg_hba_queue_depth =
335                         mb->un.varRdConfig.max_xri + 1;
336
337         phba->lmt = mb->un.varRdConfig.lmt;
338         /* HBA is not 4GB capable, or HBA is not 2GB capable,
339         don't let link speed ask for it */
340         if ((((phba->lmt & LMT_4250_10bit) != LMT_4250_10bit) &&
341                 (phba->cfg_link_speed > LINK_SPEED_2G)) ||
342                 (((phba->lmt & LMT_2125_10bit) != LMT_2125_10bit) &&
343                 (phba->cfg_link_speed > LINK_SPEED_1G))) {
344                 /* Reset link speed to auto. 1G/2GB HBA cfg'd for 4G */
345                 lpfc_printf_log(phba,
346                         KERN_WARNING,
347                         LOG_LINK_EVENT,
348                         "%d:1302 Invalid speed for this board: "
349                         "Reset link speed to auto: x%x\n",
350                         phba->brd_no,
351                         phba->cfg_link_speed);
352                         phba->cfg_link_speed = LINK_SPEED_AUTO;
353         }
354
355         phba->hba_state = LPFC_LINK_DOWN;
356
357         /* Only process IOCBs on ring 0 till hba_state is READY */
358         if (psli->ring[psli->ip_ring].cmdringaddr)
359                 psli->ring[psli->ip_ring].flag |= LPFC_STOP_IOCB_EVENT;
360         if (psli->ring[psli->fcp_ring].cmdringaddr)
361                 psli->ring[psli->fcp_ring].flag |= LPFC_STOP_IOCB_EVENT;
362         if (psli->ring[psli->next_ring].cmdringaddr)
363                 psli->ring[psli->next_ring].flag |= LPFC_STOP_IOCB_EVENT;
364
365         /* Post receive buffers for desired rings */
366         lpfc_post_rcv_buf(phba);
367
368         /* Enable appropriate host interrupts */
369         spin_lock_irq(phba->host->host_lock);
370         status = readl(phba->HCregaddr);
371         status |= HC_MBINT_ENA | HC_ERINT_ENA | HC_LAINT_ENA;
372         if (psli->num_rings > 0)
373                 status |= HC_R0INT_ENA;
374         if (psli->num_rings > 1)
375                 status |= HC_R1INT_ENA;
376         if (psli->num_rings > 2)
377                 status |= HC_R2INT_ENA;
378         if (psli->num_rings > 3)
379                 status |= HC_R3INT_ENA;
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         phba->els_tmofunc.expires = jiffies + HZ * timeout;
390         add_timer(&phba->els_tmofunc);
391
392         lpfc_init_link(phba, pmb, phba->cfg_topology, phba->cfg_link_speed);
393         pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
394         if (lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT) != MBX_SUCCESS) {
395                 lpfc_printf_log(phba,
396                                 KERN_ERR,
397                                 LOG_INIT,
398                                 "%d:0454 Adapter failed to init, mbxCmd x%x "
399                                 "INIT_LINK, mbxStatus x%x\n",
400                                 phba->brd_no,
401                                 mb->mbxCommand, mb->mbxStatus);
402
403                 /* Clear all interrupt enable conditions */
404                 writel(0, phba->HCregaddr);
405                 readl(phba->HCregaddr); /* flush */
406                 /* Clear all pending interrupts */
407                 writel(0xffffffff, phba->HAregaddr);
408                 readl(phba->HAregaddr); /* flush */
409
410                 phba->hba_state = LPFC_HBA_ERROR;
411                 mempool_free(pmb, phba->mbox_mem_pool);
412                 return -EIO;
413         }
414         /* MBOX buffer will be freed in mbox compl */
415
416         i = 0;
417         while ((phba->hba_state != LPFC_HBA_READY) ||
418                (phba->num_disc_nodes) || (phba->fc_prli_sent) ||
419                ((phba->fc_map_cnt == 0) && (i<2)) ||
420                (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE)) {
421                 /* Check every second for 30 retries. */
422                 i++;
423                 if (i > 30) {
424                         break;
425                 }
426                 if ((i >= 15) && (phba->hba_state <= LPFC_LINK_DOWN)) {
427                         /* The link is down.  Set linkdown timeout */
428                         break;
429                 }
430
431                 /* Delay for 1 second to give discovery time to complete. */
432                 msleep(1000);
433
434         }
435
436         /* Since num_disc_nodes keys off of PLOGI, delay a bit to let
437          * any potential PRLIs to flush thru the SLI sub-system.
438          */
439         msleep(50);
440
441         return (0);
442 }
443
444 /************************************************************************/
445 /*                                                                      */
446 /*    lpfc_hba_down_prep                                                */
447 /*    This routine will do LPFC uninitialization before the             */
448 /*    HBA is reset when bringing down the SLI Layer. This will be       */
449 /*    initialized as a SLI layer callback routine.                      */
450 /*    This routine returns 0 on success. Any other return value         */
451 /*    indicates an error.                                               */
452 /*                                                                      */
453 /************************************************************************/
454 int
455 lpfc_hba_down_prep(struct lpfc_hba * phba)
456 {
457         /* Disable interrupts */
458         writel(0, phba->HCregaddr);
459         readl(phba->HCregaddr); /* flush */
460
461         /* Cleanup potential discovery resources */
462         lpfc_els_flush_rscn(phba);
463         lpfc_els_flush_cmd(phba);
464         lpfc_disc_flush_list(phba);
465
466         return (0);
467 }
468
469 /************************************************************************/
470 /*                                                                      */
471 /*    lpfc_handle_eratt                                                 */
472 /*    This routine will handle processing a Host Attention              */
473 /*    Error Status event. This will be initialized                      */
474 /*    as a SLI layer callback routine.                                  */
475 /*                                                                      */
476 /************************************************************************/
477 void
478 lpfc_handle_eratt(struct lpfc_hba * phba)
479 {
480         struct lpfc_sli *psli = &phba->sli;
481         struct lpfc_sli_ring  *pring;
482
483         /*
484          * If a reset is sent to the HBA restore PCI configuration registers.
485          */
486         if ( phba->hba_state == LPFC_INIT_START ) {
487                 mdelay(1);
488                 readl(phba->HCregaddr); /* flush */
489                 writel(0, phba->HCregaddr);
490                 readl(phba->HCregaddr); /* flush */
491
492                 /* Restore PCI cmd register */
493                 pci_write_config_word(phba->pcidev,
494                                       PCI_COMMAND, phba->pci_cfg_value);
495         }
496
497         if (phba->work_hs & HS_FFER6) {
498                 /* Re-establishing Link */
499                 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
500                                 "%d:1301 Re-establishing Link "
501                                 "Data: x%x x%x x%x\n",
502                                 phba->brd_no, phba->work_hs,
503                                 phba->work_status[0], phba->work_status[1]);
504                 spin_lock_irq(phba->host->host_lock);
505                 phba->fc_flag |= FC_ESTABLISH_LINK;
506                 spin_unlock_irq(phba->host->host_lock);
507
508                 /*
509                 * Firmware stops when it triggled erratt with HS_FFER6.
510                 * That could cause the I/Os dropped by the firmware.
511                 * Error iocb (I/O) on txcmplq and let the SCSI layer
512                 * retry it after re-establishing link.
513                 */
514                 pring = &psli->ring[psli->fcp_ring];
515                 lpfc_sli_abort_iocb_ring(phba, pring);
516
517
518                 /*
519                  * There was a firmware error.  Take the hba offline and then
520                  * attempt to restart it.
521                  */
522                 lpfc_offline(phba);
523                 if (lpfc_online(phba) == 0) {   /* Initialize the HBA */
524                         mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
525                         return;
526                 }
527         } else {
528                 /* The if clause above forces this code path when the status
529                  * failure is a value other than FFER6.  Do not call the offline
530                  *  twice. This is the adapter hardware error path.
531                  */
532                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
533                                 "%d:0457 Adapter Hardware Error "
534                                 "Data: x%x x%x x%x\n",
535                                 phba->brd_no, phba->work_hs,
536                                 phba->work_status[0], phba->work_status[1]);
537
538                 lpfc_offline(phba);
539
540         }
541 }
542
543 /************************************************************************/
544 /*                                                                      */
545 /*    lpfc_handle_latt                                                  */
546 /*    This routine will handle processing a Host Attention              */
547 /*    Link Status event. This will be initialized                       */
548 /*    as a SLI layer callback routine.                                  */
549 /*                                                                      */
550 /************************************************************************/
551 void
552 lpfc_handle_latt(struct lpfc_hba * phba)
553 {
554         struct lpfc_sli *psli = &phba->sli;
555         LPFC_MBOXQ_t *pmb;
556         volatile uint32_t control;
557         struct lpfc_dmabuf *mp;
558         int rc = -ENOMEM;
559
560         pmb = (LPFC_MBOXQ_t *)mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
561         if (!pmb)
562                 goto lpfc_handle_latt_err_exit;
563
564         mp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
565         if (!mp)
566                 goto lpfc_handle_latt_free_pmb;
567
568         mp->virt = lpfc_mbuf_alloc(phba, 0, &mp->phys);
569         if (!mp->virt)
570                 goto lpfc_handle_latt_free_mp;
571
572         rc = -EIO;
573
574
575         psli->slistat.link_event++;
576         lpfc_read_la(phba, pmb, mp);
577         pmb->mbox_cmpl = lpfc_mbx_cmpl_read_la;
578         rc = lpfc_sli_issue_mbox (phba, pmb, (MBX_NOWAIT | MBX_STOP_IOCB));
579         if (rc == MBX_NOT_FINISHED)
580                 goto lpfc_handle_latt_free_mp;
581
582         /* Clear Link Attention in HA REG */
583         spin_lock_irq(phba->host->host_lock);
584         writel(HA_LATT, phba->HAregaddr);
585         readl(phba->HAregaddr); /* flush */
586         spin_unlock_irq(phba->host->host_lock);
587
588         return;
589
590 lpfc_handle_latt_free_mp:
591         kfree(mp);
592 lpfc_handle_latt_free_pmb:
593         kfree(pmb);
594 lpfc_handle_latt_err_exit:
595         /* Enable Link attention interrupts */
596         spin_lock_irq(phba->host->host_lock);
597         psli->sli_flag |= LPFC_PROCESS_LA;
598         control = readl(phba->HCregaddr);
599         control |= HC_LAINT_ENA;
600         writel(control, phba->HCregaddr);
601         readl(phba->HCregaddr); /* flush */
602
603         /* Clear Link Attention in HA REG */
604         writel(HA_LATT, phba->HAregaddr);
605         readl(phba->HAregaddr); /* flush */
606         spin_unlock_irq(phba->host->host_lock);
607         lpfc_linkdown(phba);
608         phba->hba_state = LPFC_HBA_ERROR;
609
610         /* The other case is an error from issue_mbox */
611         if (rc == -ENOMEM)
612                 lpfc_printf_log(phba,
613                                 KERN_WARNING,
614                                 LOG_MBOX,
615                                 "%d:0300 READ_LA: no buffers\n",
616                                 phba->brd_no);
617
618         return;
619 }
620
621 /************************************************************************/
622 /*                                                                      */
623 /*   lpfc_parse_vpd                                                     */
624 /*   This routine will parse the VPD data                               */
625 /*                                                                      */
626 /************************************************************************/
627 static int
628 lpfc_parse_vpd(struct lpfc_hba * phba, uint8_t * vpd)
629 {
630         uint8_t lenlo, lenhi;
631         uint32_t Length;
632         int i, j;
633         int finished = 0;
634         int index = 0;
635
636         if (!vpd)
637                 return 0;
638
639         /* Vital Product */
640         lpfc_printf_log(phba,
641                         KERN_INFO,
642                         LOG_INIT,
643                         "%d:0455 Vital Product Data: x%x x%x x%x x%x\n",
644                         phba->brd_no,
645                         (uint32_t) vpd[0], (uint32_t) vpd[1], (uint32_t) vpd[2],
646                         (uint32_t) vpd[3]);
647         do {
648                 switch (vpd[index]) {
649                 case 0x82:
650                         index += 1;
651                         lenlo = vpd[index];
652                         index += 1;
653                         lenhi = vpd[index];
654                         index += 1;
655                         i = ((((unsigned short)lenhi) << 8) + lenlo);
656                         index += i;
657                         break;
658                 case 0x90:
659                         index += 1;
660                         lenlo = vpd[index];
661                         index += 1;
662                         lenhi = vpd[index];
663                         index += 1;
664                         Length = ((((unsigned short)lenhi) << 8) + lenlo);
665
666                         while (Length > 0) {
667                         /* Look for Serial Number */
668                         if ((vpd[index] == 'S') && (vpd[index+1] == 'N')) {
669                                 index += 2;
670                                 i = vpd[index];
671                                 index += 1;
672                                 j = 0;
673                                 Length -= (3+i);
674                                 while(i--) {
675                                         phba->SerialNumber[j++] = vpd[index++];
676                                         if (j == 31)
677                                                 break;
678                                 }
679                                 phba->SerialNumber[j] = 0;
680                                 continue;
681                         }
682                         else if ((vpd[index] == 'V') && (vpd[index+1] == '1')) {
683                                 phba->vpd_flag |= VPD_MODEL_DESC;
684                                 index += 2;
685                                 i = vpd[index];
686                                 index += 1;
687                                 j = 0;
688                                 Length -= (3+i);
689                                 while(i--) {
690                                         phba->ModelDesc[j++] = vpd[index++];
691                                         if (j == 255)
692                                                 break;
693                                 }
694                                 phba->ModelDesc[j] = 0;
695                                 continue;
696                         }
697                         else if ((vpd[index] == 'V') && (vpd[index+1] == '2')) {
698                                 phba->vpd_flag |= VPD_MODEL_NAME;
699                                 index += 2;
700                                 i = vpd[index];
701                                 index += 1;
702                                 j = 0;
703                                 Length -= (3+i);
704                                 while(i--) {
705                                         phba->ModelName[j++] = vpd[index++];
706                                         if (j == 79)
707                                                 break;
708                                 }
709                                 phba->ModelName[j] = 0;
710                                 continue;
711                         }
712                         else if ((vpd[index] == 'V') && (vpd[index+1] == '3')) {
713                                 phba->vpd_flag |= VPD_PROGRAM_TYPE;
714                                 index += 2;
715                                 i = vpd[index];
716                                 index += 1;
717                                 j = 0;
718                                 Length -= (3+i);
719                                 while(i--) {
720                                         phba->ProgramType[j++] = vpd[index++];
721                                         if (j == 255)
722                                                 break;
723                                 }
724                                 phba->ProgramType[j] = 0;
725                                 continue;
726                         }
727                         else if ((vpd[index] == 'V') && (vpd[index+1] == '4')) {
728                                 phba->vpd_flag |= VPD_PORT;
729                                 index += 2;
730                                 i = vpd[index];
731                                 index += 1;
732                                 j = 0;
733                                 Length -= (3+i);
734                                 while(i--) {
735                                 phba->Port[j++] = vpd[index++];
736                                 if (j == 19)
737                                         break;
738                                 }
739                                 phba->Port[j] = 0;
740                                 continue;
741                         }
742                         else {
743                                 index += 2;
744                                 i = vpd[index];
745                                 index += 1;
746                                 index += i;
747                                 Length -= (3 + i);
748                         }
749                 }
750                 finished = 0;
751                 break;
752                 case 0x78:
753                         finished = 1;
754                         break;
755                 default:
756                         index ++;
757                         break;
758                 }
759         } while (!finished && (index < 108));
760
761         return(1);
762 }
763
764 static void
765 lpfc_get_hba_model_desc(struct lpfc_hba * phba, uint8_t * mdp, uint8_t * descp)
766 {
767         lpfc_vpd_t *vp;
768         uint32_t id;
769         uint8_t hdrtype;
770         char str[16];
771
772         vp = &phba->vpd;
773         pci_read_config_dword(phba->pcidev, PCI_VENDOR_ID, &id);
774         pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
775
776         switch ((id >> 16) & 0xffff) {
777         case PCI_DEVICE_ID_FIREFLY:
778                 strcpy(str, "LP6000 1");
779                 break;
780         case PCI_DEVICE_ID_SUPERFLY:
781                 if (vp->rev.biuRev >= 1 && vp->rev.biuRev <= 3)
782                         strcpy(str, "LP7000 1");
783                 else
784                         strcpy(str, "LP7000E 1");
785                 break;
786         case PCI_DEVICE_ID_DRAGONFLY:
787                 strcpy(str, "LP8000 1");
788                 break;
789         case PCI_DEVICE_ID_CENTAUR:
790                 if (FC_JEDEC_ID(vp->rev.biuRev) == CENTAUR_2G_JEDEC_ID)
791                         strcpy(str, "LP9002 2");
792                 else
793                         strcpy(str, "LP9000 1");
794                 break;
795         case PCI_DEVICE_ID_RFLY:
796                 strcpy(str, "LP952 2");
797                 break;
798         case PCI_DEVICE_ID_PEGASUS:
799                 strcpy(str, "LP9802 2");
800                 break;
801         case PCI_DEVICE_ID_THOR:
802                 if (hdrtype == 0x80)
803                         strcpy(str, "LP10000DC 2");
804                 else
805                         strcpy(str, "LP10000 2");
806                 break;
807         case PCI_DEVICE_ID_VIPER:
808                 strcpy(str, "LPX1000 10");
809                 break;
810         case PCI_DEVICE_ID_PFLY:
811                 strcpy(str, "LP982 2");
812                 break;
813         case PCI_DEVICE_ID_TFLY:
814                 if (hdrtype == 0x80)
815                         strcpy(str, "LP1050DC 2");
816                 else
817                         strcpy(str, "LP1050 2");
818                 break;
819         case PCI_DEVICE_ID_HELIOS:
820                 if (hdrtype == 0x80)
821                         strcpy(str, "LP11002 4");
822                 else
823                         strcpy(str, "LP11000 4");
824                 break;
825         case PCI_DEVICE_ID_BMID:
826                 strcpy(str, "LP1150 4");
827                 break;
828         case PCI_DEVICE_ID_BSMB:
829                 strcpy(str, "LP111 4");
830                 break;
831         case PCI_DEVICE_ID_ZEPHYR:
832                 if (hdrtype == 0x80)
833                         strcpy(str, "LPe11002 4");
834                 else
835                         strcpy(str, "LPe11000 4");
836                 break;
837         case PCI_DEVICE_ID_ZMID:
838                 strcpy(str, "LPe1150 4");
839                 break;
840         case PCI_DEVICE_ID_ZSMB:
841                 strcpy(str, "LPe111 4");
842                 break;
843         case PCI_DEVICE_ID_LP101:
844                 strcpy(str, "LP101 2");
845                 break;
846         case PCI_DEVICE_ID_LP10000S:
847                 strcpy(str, "LP10000-S 2");
848                 break;
849         default:
850                 memset(str, 0, 16);
851                 break;
852         }
853         if (mdp)
854                 sscanf(str, "%s", mdp);
855         if (descp)
856                 sprintf(descp, "Emulex LightPulse %s Gigabit PCI Fibre "
857                         "Channel Adapter", str);
858 }
859
860 /**************************************************/
861 /*   lpfc_post_buffer                             */
862 /*                                                */
863 /*   This routine will post count buffers to the  */
864 /*   ring with the QUE_RING_BUF_CN command. This  */
865 /*   allows 3 buffers / command to be posted.     */
866 /*   Returns the number of buffers NOT posted.    */
867 /**************************************************/
868 int
869 lpfc_post_buffer(struct lpfc_hba * phba, struct lpfc_sli_ring * pring, int cnt,
870                  int type)
871 {
872         IOCB_t *icmd;
873         struct list_head *lpfc_iocb_list = &phba->lpfc_iocb_list;
874         struct lpfc_iocbq *iocb = NULL;
875         struct lpfc_dmabuf *mp1, *mp2;
876
877         cnt += pring->missbufcnt;
878
879         /* While there are buffers to post */
880         while (cnt > 0) {
881                 /* Allocate buffer for  command iocb */
882                 spin_lock_irq(phba->host->host_lock);
883                 list_remove_head(lpfc_iocb_list, iocb, struct lpfc_iocbq, list);
884                 spin_unlock_irq(phba->host->host_lock);
885                 if (iocb == NULL) {
886                         pring->missbufcnt = cnt;
887                         return cnt;
888                 }
889                 icmd = &iocb->iocb;
890
891                 /* 2 buffers can be posted per command */
892                 /* Allocate buffer to post */
893                 mp1 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
894                 if (mp1)
895                     mp1->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
896                                                 &mp1->phys);
897                 if (mp1 == 0 || mp1->virt == 0) {
898                         if (mp1)
899                                 kfree(mp1);
900                         spin_lock_irq(phba->host->host_lock);
901                         lpfc_sli_release_iocbq(phba, iocb);
902                         spin_unlock_irq(phba->host->host_lock);
903                         pring->missbufcnt = cnt;
904                         return cnt;
905                 }
906
907                 INIT_LIST_HEAD(&mp1->list);
908                 /* Allocate buffer to post */
909                 if (cnt > 1) {
910                         mp2 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
911                         if (mp2)
912                                 mp2->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
913                                                             &mp2->phys);
914                         if (mp2 == 0 || mp2->virt == 0) {
915                                 if (mp2)
916                                         kfree(mp2);
917                                 lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
918                                 kfree(mp1);
919                                 spin_lock_irq(phba->host->host_lock);
920                                 lpfc_sli_release_iocbq(phba, iocb);
921                                 spin_unlock_irq(phba->host->host_lock);
922                                 pring->missbufcnt = cnt;
923                                 return cnt;
924                         }
925
926                         INIT_LIST_HEAD(&mp2->list);
927                 } else {
928                         mp2 = NULL;
929                 }
930
931                 icmd->un.cont64[0].addrHigh = putPaddrHigh(mp1->phys);
932                 icmd->un.cont64[0].addrLow = putPaddrLow(mp1->phys);
933                 icmd->un.cont64[0].tus.f.bdeSize = FCELSSIZE;
934                 icmd->ulpBdeCount = 1;
935                 cnt--;
936                 if (mp2) {
937                         icmd->un.cont64[1].addrHigh = putPaddrHigh(mp2->phys);
938                         icmd->un.cont64[1].addrLow = putPaddrLow(mp2->phys);
939                         icmd->un.cont64[1].tus.f.bdeSize = FCELSSIZE;
940                         cnt--;
941                         icmd->ulpBdeCount = 2;
942                 }
943
944                 icmd->ulpCommand = CMD_QUE_RING_BUF64_CN;
945                 icmd->ulpLe = 1;
946
947                 spin_lock_irq(phba->host->host_lock);
948                 if (lpfc_sli_issue_iocb(phba, pring, iocb, 0) == IOCB_ERROR) {
949                         lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
950                         kfree(mp1);
951                         cnt++;
952                         if (mp2) {
953                                 lpfc_mbuf_free(phba, mp2->virt, mp2->phys);
954                                 kfree(mp2);
955                                 cnt++;
956                         }
957                         lpfc_sli_release_iocbq(phba, iocb);
958                         pring->missbufcnt = cnt;
959                         spin_unlock_irq(phba->host->host_lock);
960                         return cnt;
961                 }
962                 spin_unlock_irq(phba->host->host_lock);
963                 lpfc_sli_ringpostbuf_put(phba, pring, mp1);
964                 if (mp2) {
965                         lpfc_sli_ringpostbuf_put(phba, pring, mp2);
966                 }
967         }
968         pring->missbufcnt = 0;
969         return 0;
970 }
971
972 /************************************************************************/
973 /*                                                                      */
974 /*   lpfc_post_rcv_buf                                                  */
975 /*   This routine post initial rcv buffers to the configured rings      */
976 /*                                                                      */
977 /************************************************************************/
978 static int
979 lpfc_post_rcv_buf(struct lpfc_hba * phba)
980 {
981         struct lpfc_sli *psli = &phba->sli;
982
983         /* Ring 0, ELS / CT buffers */
984         lpfc_post_buffer(phba, &psli->ring[LPFC_ELS_RING], LPFC_BUF_RING0, 1);
985         /* Ring 2 - FCP no buffers needed */
986
987         return 0;
988 }
989
990 #define S(N,V) (((V)<<(N))|((V)>>(32-(N))))
991
992 /************************************************************************/
993 /*                                                                      */
994 /*   lpfc_sha_init                                                      */
995 /*                                                                      */
996 /************************************************************************/
997 static void
998 lpfc_sha_init(uint32_t * HashResultPointer)
999 {
1000         HashResultPointer[0] = 0x67452301;
1001         HashResultPointer[1] = 0xEFCDAB89;
1002         HashResultPointer[2] = 0x98BADCFE;
1003         HashResultPointer[3] = 0x10325476;
1004         HashResultPointer[4] = 0xC3D2E1F0;
1005 }
1006
1007 /************************************************************************/
1008 /*                                                                      */
1009 /*   lpfc_sha_iterate                                                   */
1010 /*                                                                      */
1011 /************************************************************************/
1012 static void
1013 lpfc_sha_iterate(uint32_t * HashResultPointer, uint32_t * HashWorkingPointer)
1014 {
1015         int t;
1016         uint32_t TEMP;
1017         uint32_t A, B, C, D, E;
1018         t = 16;
1019         do {
1020                 HashWorkingPointer[t] =
1021                     S(1,
1022                       HashWorkingPointer[t - 3] ^ HashWorkingPointer[t -
1023                                                                      8] ^
1024                       HashWorkingPointer[t - 14] ^ HashWorkingPointer[t - 16]);
1025         } while (++t <= 79);
1026         t = 0;
1027         A = HashResultPointer[0];
1028         B = HashResultPointer[1];
1029         C = HashResultPointer[2];
1030         D = HashResultPointer[3];
1031         E = HashResultPointer[4];
1032
1033         do {
1034                 if (t < 20) {
1035                         TEMP = ((B & C) | ((~B) & D)) + 0x5A827999;
1036                 } else if (t < 40) {
1037                         TEMP = (B ^ C ^ D) + 0x6ED9EBA1;
1038                 } else if (t < 60) {
1039                         TEMP = ((B & C) | (B & D) | (C & D)) + 0x8F1BBCDC;
1040                 } else {
1041                         TEMP = (B ^ C ^ D) + 0xCA62C1D6;
1042                 }
1043                 TEMP += S(5, A) + E + HashWorkingPointer[t];
1044                 E = D;
1045                 D = C;
1046                 C = S(30, B);
1047                 B = A;
1048                 A = TEMP;
1049         } while (++t <= 79);
1050
1051         HashResultPointer[0] += A;
1052         HashResultPointer[1] += B;
1053         HashResultPointer[2] += C;
1054         HashResultPointer[3] += D;
1055         HashResultPointer[4] += E;
1056
1057 }
1058
1059 /************************************************************************/
1060 /*                                                                      */
1061 /*   lpfc_challenge_key                                                 */
1062 /*                                                                      */
1063 /************************************************************************/
1064 static void
1065 lpfc_challenge_key(uint32_t * RandomChallenge, uint32_t * HashWorking)
1066 {
1067         *HashWorking = (*RandomChallenge ^ *HashWorking);
1068 }
1069
1070 /************************************************************************/
1071 /*                                                                      */
1072 /*   lpfc_hba_init                                                      */
1073 /*                                                                      */
1074 /************************************************************************/
1075 void
1076 lpfc_hba_init(struct lpfc_hba *phba, uint32_t *hbainit)
1077 {
1078         int t;
1079         uint32_t *HashWorking;
1080         uint32_t *pwwnn = phba->wwnn;
1081
1082         HashWorking = kmalloc(80 * sizeof(uint32_t), GFP_KERNEL);
1083         if (!HashWorking)
1084                 return;
1085
1086         memset(HashWorking, 0, (80 * sizeof(uint32_t)));
1087         HashWorking[0] = HashWorking[78] = *pwwnn++;
1088         HashWorking[1] = HashWorking[79] = *pwwnn;
1089
1090         for (t = 0; t < 7; t++)
1091                 lpfc_challenge_key(phba->RandomData + t, HashWorking + t);
1092
1093         lpfc_sha_init(hbainit);
1094         lpfc_sha_iterate(hbainit, HashWorking);
1095         kfree(HashWorking);
1096 }
1097
1098 static void
1099 lpfc_cleanup(struct lpfc_hba * phba, uint32_t save_bind)
1100 {
1101         struct lpfc_nodelist *ndlp, *next_ndlp;
1102
1103         /* clean up phba - lpfc specific */
1104         lpfc_can_disctmo(phba);
1105         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpunmap_list,
1106                                 nlp_listp) {
1107                 lpfc_nlp_remove(phba, ndlp);
1108         }
1109
1110         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpmap_list,
1111                                  nlp_listp) {
1112                 lpfc_nlp_remove(phba, ndlp);
1113         }
1114
1115         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_unused_list,
1116                                 nlp_listp) {
1117                 lpfc_nlp_list(phba, ndlp, NLP_NO_LIST);
1118         }
1119
1120         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_plogi_list,
1121                                 nlp_listp) {
1122                 lpfc_nlp_remove(phba, ndlp);
1123         }
1124
1125         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_adisc_list,
1126                                 nlp_listp) {
1127                 lpfc_nlp_remove(phba, ndlp);
1128         }
1129
1130         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_reglogin_list,
1131                                 nlp_listp) {
1132                 lpfc_nlp_remove(phba, ndlp);
1133         }
1134
1135         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_prli_list,
1136                                 nlp_listp) {
1137                 lpfc_nlp_remove(phba, ndlp);
1138         }
1139
1140         list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_npr_list,
1141                                 nlp_listp) {
1142                 lpfc_nlp_remove(phba, ndlp);
1143         }
1144
1145         INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1146         INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1147         INIT_LIST_HEAD(&phba->fc_unused_list);
1148         INIT_LIST_HEAD(&phba->fc_plogi_list);
1149         INIT_LIST_HEAD(&phba->fc_adisc_list);
1150         INIT_LIST_HEAD(&phba->fc_reglogin_list);
1151         INIT_LIST_HEAD(&phba->fc_prli_list);
1152         INIT_LIST_HEAD(&phba->fc_npr_list);
1153
1154         phba->fc_map_cnt   = 0;
1155         phba->fc_unmap_cnt = 0;
1156         phba->fc_plogi_cnt = 0;
1157         phba->fc_adisc_cnt = 0;
1158         phba->fc_reglogin_cnt = 0;
1159         phba->fc_prli_cnt  = 0;
1160         phba->fc_npr_cnt   = 0;
1161         phba->fc_unused_cnt= 0;
1162         return;
1163 }
1164
1165 static void
1166 lpfc_establish_link_tmo(unsigned long ptr)
1167 {
1168         struct lpfc_hba *phba = (struct lpfc_hba *)ptr;
1169         unsigned long iflag;
1170
1171
1172         /* Re-establishing Link, timer expired */
1173         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1174                         "%d:1300 Re-establishing Link, timer expired "
1175                         "Data: x%x x%x\n",
1176                         phba->brd_no, phba->fc_flag, phba->hba_state);
1177         spin_lock_irqsave(phba->host->host_lock, iflag);
1178         phba->fc_flag &= ~FC_ESTABLISH_LINK;
1179         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1180 }
1181
1182 static int
1183 lpfc_stop_timer(struct lpfc_hba * phba)
1184 {
1185         struct lpfc_sli *psli = &phba->sli;
1186
1187         /* Instead of a timer, this has been converted to a
1188          * deferred procedding list.
1189          */
1190         while (!list_empty(&phba->freebufList)) {
1191
1192                 struct lpfc_dmabuf *mp = NULL;
1193
1194                 list_remove_head((&phba->freebufList), mp,
1195                                  struct lpfc_dmabuf, list);
1196                 if (mp) {
1197                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
1198                         kfree(mp);
1199                 }
1200         }
1201
1202         del_timer_sync(&phba->fc_estabtmo);
1203         del_timer_sync(&phba->fc_disctmo);
1204         del_timer_sync(&phba->fc_fdmitmo);
1205         del_timer_sync(&phba->els_tmofunc);
1206         psli = &phba->sli;
1207         del_timer_sync(&psli->mbox_tmo);
1208         return(1);
1209 }
1210
1211 int
1212 lpfc_online(struct lpfc_hba * phba)
1213 {
1214         if (!phba)
1215                 return 0;
1216
1217         if (!(phba->fc_flag & FC_OFFLINE_MODE))
1218                 return 0;
1219
1220         lpfc_printf_log(phba,
1221                        KERN_WARNING,
1222                        LOG_INIT,
1223                        "%d:0458 Bring Adapter online\n",
1224                        phba->brd_no);
1225
1226         if (!lpfc_sli_queue_setup(phba))
1227                 return 1;
1228
1229         if (lpfc_sli_hba_setup(phba))   /* Initialize the HBA */
1230                 return 1;
1231
1232         spin_lock_irq(phba->host->host_lock);
1233         phba->fc_flag &= ~FC_OFFLINE_MODE;
1234         spin_unlock_irq(phba->host->host_lock);
1235
1236         return 0;
1237 }
1238
1239 int
1240 lpfc_offline(struct lpfc_hba * phba)
1241 {
1242         struct lpfc_sli_ring *pring;
1243         struct lpfc_sli *psli;
1244         unsigned long iflag;
1245         int i = 0;
1246
1247         if (!phba)
1248                 return 0;
1249
1250         if (phba->fc_flag & FC_OFFLINE_MODE)
1251                 return 0;
1252
1253         psli = &phba->sli;
1254         pring = &psli->ring[psli->fcp_ring];
1255
1256         lpfc_linkdown(phba);
1257
1258         /* The linkdown event takes 30 seconds to timeout. */
1259         while (pring->txcmplq_cnt) {
1260                 mdelay(10);
1261                 if (i++ > 3000)
1262                         break;
1263         }
1264
1265         /* stop all timers associated with this hba */
1266         lpfc_stop_timer(phba);
1267         phba->work_hba_events = 0;
1268
1269         lpfc_printf_log(phba,
1270                        KERN_WARNING,
1271                        LOG_INIT,
1272                        "%d:0460 Bring Adapter offline\n",
1273                        phba->brd_no);
1274
1275         /* Bring down the SLI Layer and cleanup.  The HBA is offline
1276            now.  */
1277         lpfc_sli_hba_down(phba);
1278         lpfc_cleanup(phba, 1);
1279         spin_lock_irqsave(phba->host->host_lock, iflag);
1280         phba->fc_flag |= FC_OFFLINE_MODE;
1281         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1282         return 0;
1283 }
1284
1285 /******************************************************************************
1286 * Function name: lpfc_scsi_free
1287 *
1288 * Description: Called from lpfc_pci_remove_one free internal driver resources
1289 *
1290 ******************************************************************************/
1291 static int
1292 lpfc_scsi_free(struct lpfc_hba * phba)
1293 {
1294         struct lpfc_scsi_buf *sb, *sb_next;
1295         struct lpfc_iocbq *io, *io_next;
1296
1297         spin_lock_irq(phba->host->host_lock);
1298         /* Release all the lpfc_scsi_bufs maintained by this host. */
1299         list_for_each_entry_safe(sb, sb_next, &phba->lpfc_scsi_buf_list, list) {
1300                 list_del(&sb->list);
1301                 pci_pool_free(phba->lpfc_scsi_dma_buf_pool, sb->data,
1302                                                                 sb->dma_handle);
1303                 kfree(sb);
1304                 phba->total_scsi_bufs--;
1305         }
1306
1307         /* Release all the lpfc_iocbq entries maintained by this host. */
1308         list_for_each_entry_safe(io, io_next, &phba->lpfc_iocb_list, list) {
1309                 list_del(&io->list);
1310                 kfree(io);
1311                 phba->total_iocbq_bufs--;
1312         }
1313
1314         spin_unlock_irq(phba->host->host_lock);
1315
1316         return 0;
1317 }
1318
1319
1320 static int __devinit
1321 lpfc_pci_probe_one(struct pci_dev *pdev, const struct pci_device_id *pid)
1322 {
1323         struct Scsi_Host *host;
1324         struct lpfc_hba  *phba;
1325         struct lpfc_sli  *psli;
1326         struct lpfc_iocbq *iocbq_entry = NULL, *iocbq_next = NULL;
1327         unsigned long bar0map_len, bar2map_len;
1328         int error = -ENODEV, retval;
1329         int i;
1330         uint16_t iotag;
1331
1332         if (pci_enable_device(pdev))
1333                 goto out;
1334         if (pci_request_regions(pdev, LPFC_DRIVER_NAME))
1335                 goto out_disable_device;
1336
1337         host = scsi_host_alloc(&lpfc_template, sizeof (struct lpfc_hba));
1338         if (!host)
1339                 goto out_release_regions;
1340
1341         phba = (struct lpfc_hba*)host->hostdata;
1342         memset(phba, 0, sizeof (struct lpfc_hba));
1343         phba->host = host;
1344
1345         phba->fc_flag |= FC_LOADING;
1346         phba->pcidev = pdev;
1347
1348         /* Assign an unused board number */
1349         if (!idr_pre_get(&lpfc_hba_index, GFP_KERNEL))
1350                 goto out_put_host;
1351
1352         error = idr_get_new(&lpfc_hba_index, NULL, &phba->brd_no);
1353         if (error)
1354                 goto out_put_host;
1355
1356         host->unique_id = phba->brd_no;
1357
1358         INIT_LIST_HEAD(&phba->ctrspbuflist);
1359         INIT_LIST_HEAD(&phba->rnidrspbuflist);
1360         INIT_LIST_HEAD(&phba->freebufList);
1361
1362         /* Initialize timers used by driver */
1363         init_timer(&phba->fc_estabtmo);
1364         phba->fc_estabtmo.function = lpfc_establish_link_tmo;
1365         phba->fc_estabtmo.data = (unsigned long)phba;
1366         init_timer(&phba->fc_disctmo);
1367         phba->fc_disctmo.function = lpfc_disc_timeout;
1368         phba->fc_disctmo.data = (unsigned long)phba;
1369
1370         init_timer(&phba->fc_fdmitmo);
1371         phba->fc_fdmitmo.function = lpfc_fdmi_tmo;
1372         phba->fc_fdmitmo.data = (unsigned long)phba;
1373         init_timer(&phba->els_tmofunc);
1374         phba->els_tmofunc.function = lpfc_els_timeout;
1375         phba->els_tmofunc.data = (unsigned long)phba;
1376         psli = &phba->sli;
1377         init_timer(&psli->mbox_tmo);
1378         psli->mbox_tmo.function = lpfc_mbox_timeout;
1379         psli->mbox_tmo.data = (unsigned long)phba;
1380
1381         /*
1382          * Get all the module params for configuring this host and then
1383          * establish the host parameters.
1384          */
1385         lpfc_get_cfgparam(phba);
1386
1387         host->max_id = LPFC_MAX_TARGET;
1388         host->max_lun = phba->cfg_max_luns;
1389         host->this_id = -1;
1390
1391         /* Initialize all internally managed lists. */
1392         INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1393         INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1394         INIT_LIST_HEAD(&phba->fc_unused_list);
1395         INIT_LIST_HEAD(&phba->fc_plogi_list);
1396         INIT_LIST_HEAD(&phba->fc_adisc_list);
1397         INIT_LIST_HEAD(&phba->fc_reglogin_list);
1398         INIT_LIST_HEAD(&phba->fc_prli_list);
1399         INIT_LIST_HEAD(&phba->fc_npr_list);
1400
1401
1402         pci_set_master(pdev);
1403         retval = pci_set_mwi(pdev);
1404         if (retval)
1405                 dev_printk(KERN_WARNING, &pdev->dev,
1406                            "Warning: pci_set_mwi returned %d\n", retval);
1407
1408         if (pci_set_dma_mask(phba->pcidev, DMA_64BIT_MASK) != 0)
1409                 if (pci_set_dma_mask(phba->pcidev, DMA_32BIT_MASK) != 0)
1410                         goto out_idr_remove;
1411
1412         /*
1413          * Get the bus address of Bar0 and Bar2 and the number of bytes
1414          * required by each mapping.
1415          */
1416         phba->pci_bar0_map = pci_resource_start(phba->pcidev, 0);
1417         bar0map_len        = pci_resource_len(phba->pcidev, 0);
1418
1419         phba->pci_bar2_map = pci_resource_start(phba->pcidev, 2);
1420         bar2map_len        = pci_resource_len(phba->pcidev, 2);
1421
1422         /* Map HBA SLIM and Control Registers to a kernel virtual address. */
1423         phba->slim_memmap_p      = ioremap(phba->pci_bar0_map, bar0map_len);
1424         phba->ctrl_regs_memmap_p = ioremap(phba->pci_bar2_map, bar2map_len);
1425
1426         /* Allocate memory for SLI-2 structures */
1427         phba->slim2p = dma_alloc_coherent(&phba->pcidev->dev, SLI2_SLIM_SIZE,
1428                                           &phba->slim2p_mapping, GFP_KERNEL);
1429         if (!phba->slim2p)
1430                 goto out_iounmap;
1431
1432         memset(phba->slim2p, 0, SLI2_SLIM_SIZE);
1433
1434         /* Initialize the SLI Layer to run with lpfc HBAs. */
1435         lpfc_sli_setup(phba);
1436         lpfc_sli_queue_setup(phba);
1437
1438         error = lpfc_mem_alloc(phba);
1439         if (error)
1440                 goto out_free_slim;
1441
1442         /* Initialize and populate the iocb list per host.  */
1443         INIT_LIST_HEAD(&phba->lpfc_iocb_list);
1444         for (i = 0; i < LPFC_IOCB_LIST_CNT; i++) {
1445                 iocbq_entry = kmalloc(sizeof(struct lpfc_iocbq), GFP_KERNEL);
1446                 if (iocbq_entry == NULL) {
1447                         printk(KERN_ERR "%s: only allocated %d iocbs of "
1448                                 "expected %d count. Unloading driver.\n",
1449                                 __FUNCTION__, i, LPFC_IOCB_LIST_CNT);
1450                         error = -ENOMEM;
1451                         goto out_free_iocbq;
1452                 }
1453
1454                 memset(iocbq_entry, 0, sizeof(struct lpfc_iocbq));
1455                 iotag = lpfc_sli_next_iotag(phba, iocbq_entry);
1456                 if (iotag == 0) {
1457                         kfree (iocbq_entry);
1458                         printk(KERN_ERR "%s: failed to allocate IOTAG. "
1459                                "Unloading driver.\n",
1460                                 __FUNCTION__);
1461                         error = -ENOMEM;
1462                         goto out_free_iocbq;
1463                 }
1464                 spin_lock_irq(phba->host->host_lock);
1465                 list_add(&iocbq_entry->list, &phba->lpfc_iocb_list);
1466                 phba->total_iocbq_bufs++;
1467                 spin_unlock_irq(phba->host->host_lock);
1468         }
1469
1470         /* Initialize HBA structure */
1471         phba->fc_edtov = FF_DEF_EDTOV;
1472         phba->fc_ratov = FF_DEF_RATOV;
1473         phba->fc_altov = FF_DEF_ALTOV;
1474         phba->fc_arbtov = FF_DEF_ARBTOV;
1475
1476         INIT_LIST_HEAD(&phba->work_list);
1477         phba->work_ha_mask = (HA_ERATT|HA_MBATT|HA_LATT);
1478         phba->work_ha_mask |= (HA_RXMASK << (LPFC_ELS_RING * 4));
1479
1480         /* Startup the kernel thread for this host adapter. */
1481         phba->worker_thread = kthread_run(lpfc_do_work, phba,
1482                                        "lpfc_worker_%d", phba->brd_no);
1483         if (IS_ERR(phba->worker_thread)) {
1484                 error = PTR_ERR(phba->worker_thread);
1485                 goto out_free_iocbq;
1486         }
1487
1488         /* We can rely on a queue depth attribute only after SLI HBA setup */
1489         host->can_queue = phba->cfg_hba_queue_depth - 10;
1490
1491         /* Tell the midlayer we support 16 byte commands */
1492         host->max_cmd_len = 16;
1493
1494         /* Initialize the list of scsi buffers used by driver for scsi IO. */
1495         INIT_LIST_HEAD(&phba->lpfc_scsi_buf_list);
1496
1497         host->transportt = lpfc_transport_template;
1498         host->hostdata[0] = (unsigned long)phba;
1499         pci_set_drvdata(pdev, host);
1500         error = scsi_add_host(host, &pdev->dev);
1501         if (error)
1502                 goto out_kthread_stop;
1503
1504         error = lpfc_alloc_sysfs_attr(phba);
1505         if (error)
1506                 goto out_kthread_stop;
1507
1508         error = request_irq(phba->pcidev->irq, lpfc_intr_handler, SA_SHIRQ,
1509                                                         LPFC_DRIVER_NAME, phba);
1510         if (error) {
1511                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
1512                         "%d:0451 Enable interrupt handler failed\n",
1513                         phba->brd_no);
1514                 goto out_free_sysfs_attr;
1515         }
1516         phba->MBslimaddr = phba->slim_memmap_p;
1517         phba->HAregaddr = phba->ctrl_regs_memmap_p + HA_REG_OFFSET;
1518         phba->CAregaddr = phba->ctrl_regs_memmap_p + CA_REG_OFFSET;
1519         phba->HSregaddr = phba->ctrl_regs_memmap_p + HS_REG_OFFSET;
1520         phba->HCregaddr = phba->ctrl_regs_memmap_p + HC_REG_OFFSET;
1521
1522         error = lpfc_sli_hba_setup(phba);
1523         if (error)
1524                 goto out_free_irq;
1525
1526         /*
1527          * set fixed host attributes
1528          * Must done after lpfc_sli_hba_setup()
1529          */
1530
1531         fc_host_node_name(host) = wwn_to_u64(phba->fc_nodename.u.wwn);
1532         fc_host_port_name(host) = wwn_to_u64(phba->fc_portname.u.wwn);
1533         fc_host_supported_classes(host) = FC_COS_CLASS3;
1534
1535         memset(fc_host_supported_fc4s(host), 0,
1536                 sizeof(fc_host_supported_fc4s(host)));
1537         fc_host_supported_fc4s(host)[2] = 1;
1538         fc_host_supported_fc4s(host)[7] = 1;
1539
1540         lpfc_get_hba_sym_node_name(phba, fc_host_symbolic_name(host));
1541
1542         fc_host_supported_speeds(host) = 0;
1543         switch (FC_JEDEC_ID(phba->vpd.rev.biuRev)) {
1544         case VIPER_JEDEC_ID:
1545                 fc_host_supported_speeds(host) |= FC_PORTSPEED_10GBIT;
1546                 break;
1547         case HELIOS_JEDEC_ID:
1548                 fc_host_supported_speeds(host) |= FC_PORTSPEED_4GBIT;
1549                 /* Fall through */
1550         case CENTAUR_2G_JEDEC_ID:
1551         case PEGASUS_JEDEC_ID:
1552         case THOR_JEDEC_ID:
1553                 fc_host_supported_speeds(host) |= FC_PORTSPEED_2GBIT;
1554                 /* Fall through */
1555         default:
1556                 fc_host_supported_speeds(host) = FC_PORTSPEED_1GBIT;
1557         }
1558
1559         fc_host_maxframe_size(host) =
1560                 ((((uint32_t) phba->fc_sparam.cmn.bbRcvSizeMsb & 0x0F) << 8) |
1561                  (uint32_t) phba->fc_sparam.cmn.bbRcvSizeLsb);
1562
1563         /* This value is also unchanging */
1564         memset(fc_host_active_fc4s(host), 0,
1565                 sizeof(fc_host_active_fc4s(host)));
1566         fc_host_active_fc4s(host)[2] = 1;
1567         fc_host_active_fc4s(host)[7] = 1;
1568
1569         spin_lock_irq(phba->host->host_lock);
1570         phba->fc_flag &= ~FC_LOADING;
1571         spin_unlock_irq(phba->host->host_lock);
1572         return 0;
1573
1574 out_free_irq:
1575         lpfc_stop_timer(phba);
1576         phba->work_hba_events = 0;
1577         free_irq(phba->pcidev->irq, phba);
1578 out_free_sysfs_attr:
1579         lpfc_free_sysfs_attr(phba);
1580 out_kthread_stop:
1581         kthread_stop(phba->worker_thread);
1582 out_free_iocbq:
1583         list_for_each_entry_safe(iocbq_entry, iocbq_next,
1584                                                 &phba->lpfc_iocb_list, list) {
1585                 spin_lock_irq(phba->host->host_lock);
1586                 kfree(iocbq_entry);
1587                 phba->total_iocbq_bufs--;
1588                 spin_unlock_irq(phba->host->host_lock);
1589         }
1590         lpfc_mem_free(phba);
1591 out_free_slim:
1592         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE, phba->slim2p,
1593                                                         phba->slim2p_mapping);
1594 out_iounmap:
1595         iounmap(phba->ctrl_regs_memmap_p);
1596         iounmap(phba->slim_memmap_p);
1597 out_idr_remove:
1598         idr_remove(&lpfc_hba_index, phba->brd_no);
1599 out_put_host:
1600         scsi_host_put(host);
1601 out_release_regions:
1602         pci_release_regions(pdev);
1603 out_disable_device:
1604         pci_disable_device(pdev);
1605 out:
1606         return error;
1607 }
1608
1609 static void __devexit
1610 lpfc_pci_remove_one(struct pci_dev *pdev)
1611 {
1612         struct Scsi_Host   *host = pci_get_drvdata(pdev);
1613         struct lpfc_hba    *phba = (struct lpfc_hba *)host->hostdata[0];
1614         unsigned long iflag;
1615
1616         lpfc_free_sysfs_attr(phba);
1617
1618         spin_lock_irqsave(phba->host->host_lock, iflag);
1619         phba->fc_flag |= FC_UNLOADING;
1620
1621         spin_unlock_irqrestore(phba->host->host_lock, iflag);
1622
1623         fc_remove_host(phba->host);
1624         scsi_remove_host(phba->host);
1625
1626         kthread_stop(phba->worker_thread);
1627
1628         /*
1629          * Bring down the SLI Layer. This step disable all interrupts,
1630          * clears the rings, discards all mailbox commands, and resets
1631          * the HBA.
1632          */
1633         lpfc_sli_hba_down(phba);
1634
1635         /* Release the irq reservation */
1636         free_irq(phba->pcidev->irq, phba);
1637
1638         lpfc_cleanup(phba, 0);
1639         lpfc_stop_timer(phba);
1640         phba->work_hba_events = 0;
1641
1642         /*
1643          * Call scsi_free before mem_free since scsi bufs are released to their
1644          * corresponding pools here.
1645          */
1646         lpfc_scsi_free(phba);
1647         lpfc_mem_free(phba);
1648
1649         /* Free resources associated with SLI2 interface */
1650         dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE,
1651                           phba->slim2p, phba->slim2p_mapping);
1652
1653         /* unmap adapter SLIM and Control Registers */
1654         iounmap(phba->ctrl_regs_memmap_p);
1655         iounmap(phba->slim_memmap_p);
1656
1657         pci_release_regions(phba->pcidev);
1658         pci_disable_device(phba->pcidev);
1659
1660         idr_remove(&lpfc_hba_index, phba->brd_no);
1661         scsi_host_put(phba->host);
1662
1663         pci_set_drvdata(pdev, NULL);
1664 }
1665
1666 static struct pci_device_id lpfc_id_table[] = {
1667         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_VIPER,
1668                 PCI_ANY_ID, PCI_ANY_ID, },
1669         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_FIREFLY,
1670                 PCI_ANY_ID, PCI_ANY_ID, },
1671         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_THOR,
1672                 PCI_ANY_ID, PCI_ANY_ID, },
1673         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PEGASUS,
1674                 PCI_ANY_ID, PCI_ANY_ID, },
1675         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_CENTAUR,
1676                 PCI_ANY_ID, PCI_ANY_ID, },
1677         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_DRAGONFLY,
1678                 PCI_ANY_ID, PCI_ANY_ID, },
1679         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SUPERFLY,
1680                 PCI_ANY_ID, PCI_ANY_ID, },
1681         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_RFLY,
1682                 PCI_ANY_ID, PCI_ANY_ID, },
1683         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PFLY,
1684                 PCI_ANY_ID, PCI_ANY_ID, },
1685         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS,
1686                 PCI_ANY_ID, PCI_ANY_ID, },
1687         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BMID,
1688                 PCI_ANY_ID, PCI_ANY_ID, },
1689         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BSMB,
1690                 PCI_ANY_ID, PCI_ANY_ID, },
1691         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR,
1692                 PCI_ANY_ID, PCI_ANY_ID, },
1693         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZMID,
1694                 PCI_ANY_ID, PCI_ANY_ID, },
1695         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZSMB,
1696                 PCI_ANY_ID, PCI_ANY_ID, },
1697         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_TFLY,
1698                 PCI_ANY_ID, PCI_ANY_ID, },
1699         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP101,
1700                 PCI_ANY_ID, PCI_ANY_ID, },
1701         {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP10000S,
1702                 PCI_ANY_ID, PCI_ANY_ID, },
1703         { 0 }
1704 };
1705
1706 MODULE_DEVICE_TABLE(pci, lpfc_id_table);
1707
1708 static struct pci_driver lpfc_driver = {
1709         .name           = LPFC_DRIVER_NAME,
1710         .id_table       = lpfc_id_table,
1711         .probe          = lpfc_pci_probe_one,
1712         .remove         = __devexit_p(lpfc_pci_remove_one),
1713 };
1714
1715 static int __init
1716 lpfc_init(void)
1717 {
1718         int error = 0;
1719
1720         printk(LPFC_MODULE_DESC "\n");
1721         printk(LPFC_COPYRIGHT "\n");
1722
1723         lpfc_transport_template =
1724                                 fc_attach_transport(&lpfc_transport_functions);
1725         if (!lpfc_transport_template)
1726                 return -ENOMEM;
1727         error = pci_register_driver(&lpfc_driver);
1728         if (error)
1729                 fc_release_transport(lpfc_transport_template);
1730
1731         return error;
1732 }
1733
1734 static void __exit
1735 lpfc_exit(void)
1736 {
1737         pci_unregister_driver(&lpfc_driver);
1738         fc_release_transport(lpfc_transport_template);
1739 }
1740
1741 module_init(lpfc_init);
1742 module_exit(lpfc_exit);
1743 MODULE_LICENSE("GPL");
1744 MODULE_DESCRIPTION(LPFC_MODULE_DESC);
1745 MODULE_AUTHOR("Emulex Corporation - tech.support@emulex.com");
1746 MODULE_VERSION("0:" LPFC_DRIVER_VERSION);