[PATCH] memory hotadd: pgdat->node_present_pages fix
[linux-2.6/mini2440.git] / drivers / scsi / lpfc / lpfc_init.c
blobb7a603a45328f2dd95753f7384f56ef2e1ec7c02
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 *******************************************************************/
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>
31 #include <scsi/scsi.h>
32 #include <scsi/scsi_device.h>
33 #include <scsi/scsi_host.h>
34 #include <scsi/scsi_transport_fc.h>
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"
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 *);
49 static struct scsi_transport_template *lpfc_transport_template = NULL;
50 static DEFINE_IDR(lpfc_hba_index);
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)
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";
75 pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
76 if (!pmb) {
77 phba->hba_state = LPFC_HBA_ERROR;
78 return -ENOMEM;
81 mb = &pmb->mb;
82 phba->hba_state = LPFC_INIT_MBX_CMDS;
84 if (lpfc_is_LC_HBA(phba->pcidev->device)) {
85 uint32_t *ptext = (uint32_t *) licensed;
87 for (i = 0; i < 56; i += sizeof (uint32_t), ptext++)
88 *ptext = cpu_to_be32(*ptext);
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));
96 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
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;
110 memcpy(phba->wwnn, (char *)mb->un.varRDnvp.nodename,
111 sizeof (mb->un.varRDnvp.nodename));
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;
130 * The value of rr must be 1 since the driver set the cv field to 1.
131 * This setting requires the FW to set all revision fields.
133 if (mb->un.varRdRev.rr == 0) {
134 vp->rev.rBit = 0;
135 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
136 "%d:0440 Adapter failed to init, READ_REV has "
137 "missing revision information.\n",
138 phba->brd_no);
139 mempool_free(pmb, phba->mbox_mem_pool);
140 return -ERESTART;
143 /* Save information as VPD data */
144 vp->rev.rBit = 1;
145 vp->rev.sli1FwRev = mb->un.varRdRev.sli1FwRev;
146 memcpy(vp->rev.sli1FwName, (char*) mb->un.varRdRev.sli1FwName, 16);
147 vp->rev.sli2FwRev = mb->un.varRdRev.sli2FwRev;
148 memcpy(vp->rev.sli2FwName, (char *) mb->un.varRdRev.sli2FwName, 16);
149 vp->rev.biuRev = mb->un.varRdRev.biuRev;
150 vp->rev.smRev = mb->un.varRdRev.smRev;
151 vp->rev.smFwRev = mb->un.varRdRev.un.smFwRev;
152 vp->rev.endecRev = mb->un.varRdRev.endecRev;
153 vp->rev.fcphHigh = mb->un.varRdRev.fcphHigh;
154 vp->rev.fcphLow = mb->un.varRdRev.fcphLow;
155 vp->rev.feaLevelHigh = mb->un.varRdRev.feaLevelHigh;
156 vp->rev.feaLevelLow = mb->un.varRdRev.feaLevelLow;
157 vp->rev.postKernRev = mb->un.varRdRev.postKernRev;
158 vp->rev.opFwRev = mb->un.varRdRev.opFwRev;
160 if (lpfc_is_LC_HBA(phba->pcidev->device))
161 memcpy(phba->RandomData, (char *)&mb->un.varWords[24],
162 sizeof (phba->RandomData));
164 /* Get the default values for Model Name and Description */
165 lpfc_get_hba_model_desc(phba, phba->ModelName, phba->ModelDesc);
167 /* Get adapter VPD information */
168 pmb->context2 = kmalloc(DMP_RSP_SIZE, GFP_KERNEL);
169 if (!pmb->context2)
170 goto out_free_mbox;
171 lpfc_vpd_data = kmalloc(DMP_VPD_SIZE, GFP_KERNEL);
172 if (!lpfc_vpd_data)
173 goto out_free_context2;
175 do {
176 lpfc_dump_mem(phba, pmb, offset);
177 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
179 if (rc != MBX_SUCCESS) {
180 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
181 "%d:0441 VPD not present on adapter, "
182 "mbxCmd x%x DUMP VPD, mbxStatus x%x\n",
183 phba->brd_no,
184 mb->mbxCommand, mb->mbxStatus);
185 kfree(lpfc_vpd_data);
186 lpfc_vpd_data = NULL;
187 break;
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);
194 lpfc_parse_vpd(phba, lpfc_vpd_data);
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;
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 /************************************************************************/
215 lpfc_config_port_post(struct lpfc_hba * phba)
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;
224 pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
225 if (!pmb) {
226 phba->hba_state = LPFC_HBA_ERROR;
227 return -ENOMEM;
229 mb = &pmb->mb;
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;
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;
264 mp = (struct lpfc_dmabuf *) pmb->context1;
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;
271 memcpy(&phba->fc_nodename, &phba->fc_sparam.nodeName,
272 sizeof (struct lpfc_name));
273 memcpy(&phba->fc_portname, &phba->fc_sparam.portName,
274 sizeof (struct lpfc_name));
275 /* If no serial number in VPD data, use low 6 bytes of WWNN */
276 /* This should be consolidated into parse_vpd ? - mr */
277 if (phba->SerialNumber[0] == 0) {
278 uint8_t *outptr;
280 outptr = &phba->fc_nodename.u.s.IEEE[0];
281 for (i = 0; i < 12; i++) {
282 status = *outptr++;
283 j = ((status & 0xf0) >> 4);
284 if (j <= 9)
285 phba->SerialNumber[i] =
286 (char)((uint8_t) 0x30 + (uint8_t) j);
287 else
288 phba->SerialNumber[i] =
289 (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
290 i++;
291 j = (status & 0xf);
292 if (j <= 9)
293 phba->SerialNumber[i] =
294 (char)((uint8_t) 0x30 + (uint8_t) j);
295 else
296 phba->SerialNumber[i] =
297 (char)((uint8_t) 0x61 + (uint8_t) (j - 10));
301 /* This should turn on DELAYED ABTS for ELS timeouts */
302 lpfc_set_slim(phba, pmb, 0x052198, 0x1);
303 if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
304 phba->hba_state = LPFC_HBA_ERROR;
305 mempool_free( pmb, phba->mbox_mem_pool);
306 return -EIO;
310 lpfc_read_config(phba, pmb);
311 if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
312 lpfc_printf_log(phba,
313 KERN_ERR,
314 LOG_INIT,
315 "%d:0453 Adapter failed to init, mbxCmd x%x "
316 "READ_CONFIG, mbxStatus x%x\n",
317 phba->brd_no,
318 mb->mbxCommand, mb->mbxStatus);
319 phba->hba_state = LPFC_HBA_ERROR;
320 mempool_free( pmb, phba->mbox_mem_pool);
321 return -EIO;
324 /* Reset the DFT_HBA_Q_DEPTH to the max xri */
325 if (phba->cfg_hba_queue_depth > (mb->un.varRdConfig.max_xri+1))
326 phba->cfg_hba_queue_depth =
327 mb->un.varRdConfig.max_xri + 1;
329 phba->lmt = mb->un.varRdConfig.lmt;
330 /* HBA is not 4GB capable, or HBA is not 2GB capable,
331 don't let link speed ask for it */
332 if ((((phba->lmt & LMT_4250_10bit) != LMT_4250_10bit) &&
333 (phba->cfg_link_speed > LINK_SPEED_2G)) ||
334 (((phba->lmt & LMT_2125_10bit) != LMT_2125_10bit) &&
335 (phba->cfg_link_speed > LINK_SPEED_1G))) {
336 /* Reset link speed to auto. 1G/2GB HBA cfg'd for 4G */
337 lpfc_printf_log(phba,
338 KERN_WARNING,
339 LOG_LINK_EVENT,
340 "%d:1302 Invalid speed for this board: "
341 "Reset link speed to auto: x%x\n",
342 phba->brd_no,
343 phba->cfg_link_speed);
344 phba->cfg_link_speed = LINK_SPEED_AUTO;
347 phba->hba_state = LPFC_LINK_DOWN;
349 /* Only process IOCBs on ring 0 till hba_state is READY */
350 if (psli->ring[psli->ip_ring].cmdringaddr)
351 psli->ring[psli->ip_ring].flag |= LPFC_STOP_IOCB_EVENT;
352 if (psli->ring[psli->fcp_ring].cmdringaddr)
353 psli->ring[psli->fcp_ring].flag |= LPFC_STOP_IOCB_EVENT;
354 if (psli->ring[psli->next_ring].cmdringaddr)
355 psli->ring[psli->next_ring].flag |= LPFC_STOP_IOCB_EVENT;
357 /* Post receive buffers for desired rings */
358 lpfc_post_rcv_buf(phba);
360 /* Enable appropriate host interrupts */
361 spin_lock_irq(phba->host->host_lock);
362 status = readl(phba->HCregaddr);
363 status |= HC_MBINT_ENA | HC_ERINT_ENA | HC_LAINT_ENA;
364 if (psli->num_rings > 0)
365 status |= HC_R0INT_ENA;
366 if (psli->num_rings > 1)
367 status |= HC_R1INT_ENA;
368 if (psli->num_rings > 2)
369 status |= HC_R2INT_ENA;
370 if (psli->num_rings > 3)
371 status |= HC_R3INT_ENA;
373 if ((phba->cfg_poll & ENABLE_FCP_RING_POLLING) &&
374 (phba->cfg_poll & DISABLE_FCP_RING_INT))
375 status &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
377 writel(status, phba->HCregaddr);
378 readl(phba->HCregaddr); /* flush */
379 spin_unlock_irq(phba->host->host_lock);
382 * Setup the ring 0 (els) timeout handler
384 timeout = phba->fc_ratov << 1;
385 phba->els_tmofunc.expires = jiffies + HZ * timeout;
386 add_timer(&phba->els_tmofunc);
388 lpfc_init_link(phba, pmb, phba->cfg_topology, phba->cfg_link_speed);
389 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
390 if (lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT) != MBX_SUCCESS) {
391 lpfc_printf_log(phba,
392 KERN_ERR,
393 LOG_INIT,
394 "%d:0454 Adapter failed to init, mbxCmd x%x "
395 "INIT_LINK, mbxStatus x%x\n",
396 phba->brd_no,
397 mb->mbxCommand, mb->mbxStatus);
399 /* Clear all interrupt enable conditions */
400 writel(0, phba->HCregaddr);
401 readl(phba->HCregaddr); /* flush */
402 /* Clear all pending interrupts */
403 writel(0xffffffff, phba->HAregaddr);
404 readl(phba->HAregaddr); /* flush */
406 phba->hba_state = LPFC_HBA_ERROR;
407 mempool_free(pmb, phba->mbox_mem_pool);
408 return -EIO;
410 /* MBOX buffer will be freed in mbox compl */
412 i = 0;
413 while ((phba->hba_state != LPFC_HBA_READY) ||
414 (phba->num_disc_nodes) || (phba->fc_prli_sent) ||
415 ((phba->fc_map_cnt == 0) && (i<2)) ||
416 (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE)) {
417 /* Check every second for 30 retries. */
418 i++;
419 if (i > 30) {
420 break;
422 if ((i >= 15) && (phba->hba_state <= LPFC_LINK_DOWN)) {
423 /* The link is down. Set linkdown timeout */
424 break;
427 /* Delay for 1 second to give discovery time to complete. */
428 msleep(1000);
432 /* Since num_disc_nodes keys off of PLOGI, delay a bit to let
433 * any potential PRLIs to flush thru the SLI sub-system.
435 msleep(50);
437 return (0);
440 /************************************************************************/
441 /* */
442 /* lpfc_hba_down_prep */
443 /* This routine will do LPFC uninitialization before the */
444 /* HBA is reset when bringing down the SLI Layer. This will be */
445 /* initialized as a SLI layer callback routine. */
446 /* This routine returns 0 on success. Any other return value */
447 /* indicates an error. */
448 /* */
449 /************************************************************************/
451 lpfc_hba_down_prep(struct lpfc_hba * phba)
453 /* Disable interrupts */
454 writel(0, phba->HCregaddr);
455 readl(phba->HCregaddr); /* flush */
457 /* Cleanup potential discovery resources */
458 lpfc_els_flush_rscn(phba);
459 lpfc_els_flush_cmd(phba);
460 lpfc_disc_flush_list(phba);
462 return (0);
465 /************************************************************************/
466 /* */
467 /* lpfc_handle_eratt */
468 /* This routine will handle processing a Host Attention */
469 /* Error Status event. This will be initialized */
470 /* as a SLI layer callback routine. */
471 /* */
472 /************************************************************************/
473 void
474 lpfc_handle_eratt(struct lpfc_hba * phba)
476 struct lpfc_sli *psli = &phba->sli;
477 struct lpfc_sli_ring *pring;
480 * If a reset is sent to the HBA restore PCI configuration registers.
482 if ( phba->hba_state == LPFC_INIT_START ) {
483 mdelay(1);
484 readl(phba->HCregaddr); /* flush */
485 writel(0, phba->HCregaddr);
486 readl(phba->HCregaddr); /* flush */
488 /* Restore PCI cmd register */
489 pci_write_config_word(phba->pcidev,
490 PCI_COMMAND, phba->pci_cfg_value);
493 if (phba->work_hs & HS_FFER6) {
494 /* Re-establishing Link */
495 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
496 "%d:1301 Re-establishing Link "
497 "Data: x%x x%x x%x\n",
498 phba->brd_no, phba->work_hs,
499 phba->work_status[0], phba->work_status[1]);
500 spin_lock_irq(phba->host->host_lock);
501 phba->fc_flag |= FC_ESTABLISH_LINK;
502 spin_unlock_irq(phba->host->host_lock);
505 * Firmware stops when it triggled erratt with HS_FFER6.
506 * That could cause the I/Os dropped by the firmware.
507 * Error iocb (I/O) on txcmplq and let the SCSI layer
508 * retry it after re-establishing link.
510 pring = &psli->ring[psli->fcp_ring];
511 lpfc_sli_abort_iocb_ring(phba, pring);
515 * There was a firmware error. Take the hba offline and then
516 * attempt to restart it.
518 lpfc_offline(phba);
519 if (lpfc_online(phba) == 0) { /* Initialize the HBA */
520 mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
521 return;
523 } else {
524 /* The if clause above forces this code path when the status
525 * failure is a value other than FFER6. Do not call the offline
526 * twice. This is the adapter hardware error path.
528 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
529 "%d:0457 Adapter Hardware Error "
530 "Data: x%x x%x x%x\n",
531 phba->brd_no, phba->work_hs,
532 phba->work_status[0], phba->work_status[1]);
534 lpfc_offline(phba);
539 /************************************************************************/
540 /* */
541 /* lpfc_handle_latt */
542 /* This routine will handle processing a Host Attention */
543 /* Link Status event. This will be initialized */
544 /* as a SLI layer callback routine. */
545 /* */
546 /************************************************************************/
547 void
548 lpfc_handle_latt(struct lpfc_hba * phba)
550 struct lpfc_sli *psli = &phba->sli;
551 LPFC_MBOXQ_t *pmb;
552 volatile uint32_t control;
553 struct lpfc_dmabuf *mp;
554 int rc = -ENOMEM;
556 pmb = (LPFC_MBOXQ_t *)mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
557 if (!pmb)
558 goto lpfc_handle_latt_err_exit;
560 mp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
561 if (!mp)
562 goto lpfc_handle_latt_free_pmb;
564 mp->virt = lpfc_mbuf_alloc(phba, 0, &mp->phys);
565 if (!mp->virt)
566 goto lpfc_handle_latt_free_mp;
568 rc = -EIO;
570 /* Cleanup any outstanding ELS commands */
571 lpfc_els_flush_cmd(phba);
573 psli->slistat.link_event++;
574 lpfc_read_la(phba, pmb, mp);
575 pmb->mbox_cmpl = lpfc_mbx_cmpl_read_la;
576 rc = lpfc_sli_issue_mbox (phba, pmb, (MBX_NOWAIT | MBX_STOP_IOCB));
577 if (rc == MBX_NOT_FINISHED)
578 goto lpfc_handle_latt_free_mp;
580 /* Clear Link Attention in HA REG */
581 spin_lock_irq(phba->host->host_lock);
582 writel(HA_LATT, phba->HAregaddr);
583 readl(phba->HAregaddr); /* flush */
584 spin_unlock_irq(phba->host->host_lock);
586 return;
588 lpfc_handle_latt_free_mp:
589 kfree(mp);
590 lpfc_handle_latt_free_pmb:
591 kfree(pmb);
592 lpfc_handle_latt_err_exit:
593 /* Enable Link attention interrupts */
594 spin_lock_irq(phba->host->host_lock);
595 psli->sli_flag |= LPFC_PROCESS_LA;
596 control = readl(phba->HCregaddr);
597 control |= HC_LAINT_ENA;
598 writel(control, phba->HCregaddr);
599 readl(phba->HCregaddr); /* flush */
601 /* Clear Link Attention in HA REG */
602 writel(HA_LATT, phba->HAregaddr);
603 readl(phba->HAregaddr); /* flush */
604 spin_unlock_irq(phba->host->host_lock);
605 lpfc_linkdown(phba);
606 phba->hba_state = LPFC_HBA_ERROR;
608 /* The other case is an error from issue_mbox */
609 if (rc == -ENOMEM)
610 lpfc_printf_log(phba,
611 KERN_WARNING,
612 LOG_MBOX,
613 "%d:0300 READ_LA: no buffers\n",
614 phba->brd_no);
616 return;
619 /************************************************************************/
620 /* */
621 /* lpfc_parse_vpd */
622 /* This routine will parse the VPD data */
623 /* */
624 /************************************************************************/
625 static int
626 lpfc_parse_vpd(struct lpfc_hba * phba, uint8_t * vpd)
628 uint8_t lenlo, lenhi;
629 uint32_t Length;
630 int i, j;
631 int finished = 0;
632 int index = 0;
634 if (!vpd)
635 return 0;
637 /* Vital Product */
638 lpfc_printf_log(phba,
639 KERN_INFO,
640 LOG_INIT,
641 "%d:0455 Vital Product Data: x%x x%x x%x x%x\n",
642 phba->brd_no,
643 (uint32_t) vpd[0], (uint32_t) vpd[1], (uint32_t) vpd[2],
644 (uint32_t) vpd[3]);
645 do {
646 switch (vpd[index]) {
647 case 0x82:
648 index += 1;
649 lenlo = vpd[index];
650 index += 1;
651 lenhi = vpd[index];
652 index += 1;
653 i = ((((unsigned short)lenhi) << 8) + lenlo);
654 index += i;
655 break;
656 case 0x90:
657 index += 1;
658 lenlo = vpd[index];
659 index += 1;
660 lenhi = vpd[index];
661 index += 1;
662 Length = ((((unsigned short)lenhi) << 8) + lenlo);
664 while (Length > 0) {
665 /* Look for Serial Number */
666 if ((vpd[index] == 'S') && (vpd[index+1] == 'N')) {
667 index += 2;
668 i = vpd[index];
669 index += 1;
670 j = 0;
671 Length -= (3+i);
672 while(i--) {
673 phba->SerialNumber[j++] = vpd[index++];
674 if (j == 31)
675 break;
677 phba->SerialNumber[j] = 0;
678 continue;
680 else if ((vpd[index] == 'V') && (vpd[index+1] == '1')) {
681 phba->vpd_flag |= VPD_MODEL_DESC;
682 index += 2;
683 i = vpd[index];
684 index += 1;
685 j = 0;
686 Length -= (3+i);
687 while(i--) {
688 phba->ModelDesc[j++] = vpd[index++];
689 if (j == 255)
690 break;
692 phba->ModelDesc[j] = 0;
693 continue;
695 else if ((vpd[index] == 'V') && (vpd[index+1] == '2')) {
696 phba->vpd_flag |= VPD_MODEL_NAME;
697 index += 2;
698 i = vpd[index];
699 index += 1;
700 j = 0;
701 Length -= (3+i);
702 while(i--) {
703 phba->ModelName[j++] = vpd[index++];
704 if (j == 79)
705 break;
707 phba->ModelName[j] = 0;
708 continue;
710 else if ((vpd[index] == 'V') && (vpd[index+1] == '3')) {
711 phba->vpd_flag |= VPD_PROGRAM_TYPE;
712 index += 2;
713 i = vpd[index];
714 index += 1;
715 j = 0;
716 Length -= (3+i);
717 while(i--) {
718 phba->ProgramType[j++] = vpd[index++];
719 if (j == 255)
720 break;
722 phba->ProgramType[j] = 0;
723 continue;
725 else if ((vpd[index] == 'V') && (vpd[index+1] == '4')) {
726 phba->vpd_flag |= VPD_PORT;
727 index += 2;
728 i = vpd[index];
729 index += 1;
730 j = 0;
731 Length -= (3+i);
732 while(i--) {
733 phba->Port[j++] = vpd[index++];
734 if (j == 19)
735 break;
737 phba->Port[j] = 0;
738 continue;
740 else {
741 index += 2;
742 i = vpd[index];
743 index += 1;
744 index += i;
745 Length -= (3 + i);
748 finished = 0;
749 break;
750 case 0x78:
751 finished = 1;
752 break;
753 default:
754 index ++;
755 break;
757 } while (!finished && (index < 108));
759 return(1);
762 static void
763 lpfc_get_hba_model_desc(struct lpfc_hba * phba, uint8_t * mdp, uint8_t * descp)
765 lpfc_vpd_t *vp;
766 uint16_t dev_id = phba->pcidev->device;
767 uint16_t dev_subid = phba->pcidev->subsystem_device;
768 uint8_t hdrtype = phba->pcidev->hdr_type;
769 char *model_str = "";
771 vp = &phba->vpd;
773 switch (dev_id) {
774 case PCI_DEVICE_ID_FIREFLY:
775 model_str = "LP6000 1Gb PCI";
776 break;
777 case PCI_DEVICE_ID_SUPERFLY:
778 if (vp->rev.biuRev >= 1 && vp->rev.biuRev <= 3)
779 model_str = "LP7000 1Gb PCI";
780 else
781 model_str = "LP7000E 1Gb PCI";
782 break;
783 case PCI_DEVICE_ID_DRAGONFLY:
784 model_str = "LP8000 1Gb PCI";
785 break;
786 case PCI_DEVICE_ID_CENTAUR:
787 if (FC_JEDEC_ID(vp->rev.biuRev) == CENTAUR_2G_JEDEC_ID)
788 model_str = "LP9002 2Gb PCI";
789 else
790 model_str = "LP9000 1Gb PCI";
791 break;
792 case PCI_DEVICE_ID_RFLY:
793 model_str = "LP952 2Gb PCI";
794 break;
795 case PCI_DEVICE_ID_PEGASUS:
796 model_str = "LP9802 2Gb PCI-X";
797 break;
798 case PCI_DEVICE_ID_THOR:
799 if (hdrtype == 0x80)
800 model_str = "LP10000DC 2Gb 2-port PCI-X";
801 else
802 model_str = "LP10000 2Gb PCI-X";
803 break;
804 case PCI_DEVICE_ID_VIPER:
805 model_str = "LPX1000 10Gb PCI-X";
806 break;
807 case PCI_DEVICE_ID_PFLY:
808 model_str = "LP982 2Gb PCI-X";
809 break;
810 case PCI_DEVICE_ID_TFLY:
811 if (hdrtype == 0x80)
812 model_str = "LP1050DC 2Gb 2-port PCI-X";
813 else
814 model_str = "LP1050 2Gb PCI-X";
815 break;
816 case PCI_DEVICE_ID_HELIOS:
817 if (hdrtype == 0x80)
818 model_str = "LP11002 4Gb 2-port PCI-X2";
819 else
820 model_str = "LP11000 4Gb PCI-X2";
821 break;
822 case PCI_DEVICE_ID_HELIOS_SCSP:
823 model_str = "LP11000-SP 4Gb PCI-X2";
824 break;
825 case PCI_DEVICE_ID_HELIOS_DCSP:
826 model_str = "LP11002-SP 4Gb 2-port PCI-X2";
827 break;
828 case PCI_DEVICE_ID_NEPTUNE:
829 if (hdrtype == 0x80)
830 model_str = "LPe1002 4Gb 2-port";
831 else
832 model_str = "LPe1000 4Gb PCIe";
833 break;
834 case PCI_DEVICE_ID_NEPTUNE_SCSP:
835 model_str = "LPe1000-SP 4Gb PCIe";
836 break;
837 case PCI_DEVICE_ID_NEPTUNE_DCSP:
838 model_str = "LPe1002-SP 4Gb 2-port PCIe";
839 break;
840 case PCI_DEVICE_ID_BMID:
841 model_str = "LP1150 4Gb PCI-X2";
842 break;
843 case PCI_DEVICE_ID_BSMB:
844 model_str = "LP111 4Gb PCI-X2";
845 break;
846 case PCI_DEVICE_ID_ZEPHYR:
847 if (hdrtype == 0x80)
848 model_str = "LPe11002 4Gb 2-port PCIe";
849 else
850 model_str = "LPe11000 4Gb PCIe";
851 break;
852 case PCI_DEVICE_ID_ZEPHYR_SCSP:
853 model_str = "LPe11000-SP 4Gb PCIe";
854 break;
855 case PCI_DEVICE_ID_ZEPHYR_DCSP:
856 model_str = "LPe11002-SP 4Gb 2-port PCIe";
857 break;
858 case PCI_DEVICE_ID_ZMID:
859 model_str = "LPe1150 4Gb PCIe";
860 break;
861 case PCI_DEVICE_ID_ZSMB:
862 model_str = "LPe111 4Gb PCIe";
863 break;
864 case PCI_DEVICE_ID_LP101:
865 model_str = "LP101 2Gb PCI-X";
866 break;
867 case PCI_DEVICE_ID_LP10000S:
868 model_str = "LP10000-S 2Gb PCI";
869 break;
870 case PCI_DEVICE_ID_LP11000S:
871 case PCI_DEVICE_ID_LPE11000S:
872 switch (dev_subid) {
873 case PCI_SUBSYSTEM_ID_LP11000S:
874 model_str = "LP11002-S 4Gb PCI-X2";
875 break;
876 case PCI_SUBSYSTEM_ID_LP11002S:
877 model_str = "LP11000-S 4Gb 2-port PCI-X2";
878 break;
879 case PCI_SUBSYSTEM_ID_LPE11000S:
880 model_str = "LPe11002-S 4Gb PCIe";
881 break;
882 case PCI_SUBSYSTEM_ID_LPE11002S:
883 model_str = "LPe11002-S 4Gb 2-port PCIe";
884 break;
885 case PCI_SUBSYSTEM_ID_LPE11010S:
886 model_str = "LPe11010-S 4Gb 10-port PCIe";
887 break;
888 default:
889 break;
891 break;
892 default:
893 break;
895 if (mdp)
896 sscanf(model_str, "%s", mdp);
897 if (descp)
898 sprintf(descp, "Emulex %s Fibre Channel Adapter", model_str);
901 /**************************************************/
902 /* lpfc_post_buffer */
903 /* */
904 /* This routine will post count buffers to the */
905 /* ring with the QUE_RING_BUF_CN command. This */
906 /* allows 3 buffers / command to be posted. */
907 /* Returns the number of buffers NOT posted. */
908 /**************************************************/
910 lpfc_post_buffer(struct lpfc_hba * phba, struct lpfc_sli_ring * pring, int cnt,
911 int type)
913 IOCB_t *icmd;
914 struct lpfc_iocbq *iocb;
915 struct lpfc_dmabuf *mp1, *mp2;
917 cnt += pring->missbufcnt;
919 /* While there are buffers to post */
920 while (cnt > 0) {
921 /* Allocate buffer for command iocb */
922 spin_lock_irq(phba->host->host_lock);
923 iocb = lpfc_sli_get_iocbq(phba);
924 spin_unlock_irq(phba->host->host_lock);
925 if (iocb == NULL) {
926 pring->missbufcnt = cnt;
927 return cnt;
929 icmd = &iocb->iocb;
931 /* 2 buffers can be posted per command */
932 /* Allocate buffer to post */
933 mp1 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
934 if (mp1)
935 mp1->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
936 &mp1->phys);
937 if (mp1 == 0 || mp1->virt == 0) {
938 kfree(mp1);
939 spin_lock_irq(phba->host->host_lock);
940 lpfc_sli_release_iocbq(phba, iocb);
941 spin_unlock_irq(phba->host->host_lock);
942 pring->missbufcnt = cnt;
943 return cnt;
946 INIT_LIST_HEAD(&mp1->list);
947 /* Allocate buffer to post */
948 if (cnt > 1) {
949 mp2 = kmalloc(sizeof (struct lpfc_dmabuf), GFP_KERNEL);
950 if (mp2)
951 mp2->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
952 &mp2->phys);
953 if (mp2 == 0 || mp2->virt == 0) {
954 kfree(mp2);
955 lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
956 kfree(mp1);
957 spin_lock_irq(phba->host->host_lock);
958 lpfc_sli_release_iocbq(phba, iocb);
959 spin_unlock_irq(phba->host->host_lock);
960 pring->missbufcnt = cnt;
961 return cnt;
964 INIT_LIST_HEAD(&mp2->list);
965 } else {
966 mp2 = NULL;
969 icmd->un.cont64[0].addrHigh = putPaddrHigh(mp1->phys);
970 icmd->un.cont64[0].addrLow = putPaddrLow(mp1->phys);
971 icmd->un.cont64[0].tus.f.bdeSize = FCELSSIZE;
972 icmd->ulpBdeCount = 1;
973 cnt--;
974 if (mp2) {
975 icmd->un.cont64[1].addrHigh = putPaddrHigh(mp2->phys);
976 icmd->un.cont64[1].addrLow = putPaddrLow(mp2->phys);
977 icmd->un.cont64[1].tus.f.bdeSize = FCELSSIZE;
978 cnt--;
979 icmd->ulpBdeCount = 2;
982 icmd->ulpCommand = CMD_QUE_RING_BUF64_CN;
983 icmd->ulpLe = 1;
985 spin_lock_irq(phba->host->host_lock);
986 if (lpfc_sli_issue_iocb(phba, pring, iocb, 0) == IOCB_ERROR) {
987 lpfc_mbuf_free(phba, mp1->virt, mp1->phys);
988 kfree(mp1);
989 cnt++;
990 if (mp2) {
991 lpfc_mbuf_free(phba, mp2->virt, mp2->phys);
992 kfree(mp2);
993 cnt++;
995 lpfc_sli_release_iocbq(phba, iocb);
996 pring->missbufcnt = cnt;
997 spin_unlock_irq(phba->host->host_lock);
998 return cnt;
1000 spin_unlock_irq(phba->host->host_lock);
1001 lpfc_sli_ringpostbuf_put(phba, pring, mp1);
1002 if (mp2) {
1003 lpfc_sli_ringpostbuf_put(phba, pring, mp2);
1006 pring->missbufcnt = 0;
1007 return 0;
1010 /************************************************************************/
1011 /* */
1012 /* lpfc_post_rcv_buf */
1013 /* This routine post initial rcv buffers to the configured rings */
1014 /* */
1015 /************************************************************************/
1016 static int
1017 lpfc_post_rcv_buf(struct lpfc_hba * phba)
1019 struct lpfc_sli *psli = &phba->sli;
1021 /* Ring 0, ELS / CT buffers */
1022 lpfc_post_buffer(phba, &psli->ring[LPFC_ELS_RING], LPFC_BUF_RING0, 1);
1023 /* Ring 2 - FCP no buffers needed */
1025 return 0;
1028 #define S(N,V) (((V)<<(N))|((V)>>(32-(N))))
1030 /************************************************************************/
1031 /* */
1032 /* lpfc_sha_init */
1033 /* */
1034 /************************************************************************/
1035 static void
1036 lpfc_sha_init(uint32_t * HashResultPointer)
1038 HashResultPointer[0] = 0x67452301;
1039 HashResultPointer[1] = 0xEFCDAB89;
1040 HashResultPointer[2] = 0x98BADCFE;
1041 HashResultPointer[3] = 0x10325476;
1042 HashResultPointer[4] = 0xC3D2E1F0;
1045 /************************************************************************/
1046 /* */
1047 /* lpfc_sha_iterate */
1048 /* */
1049 /************************************************************************/
1050 static void
1051 lpfc_sha_iterate(uint32_t * HashResultPointer, uint32_t * HashWorkingPointer)
1053 int t;
1054 uint32_t TEMP;
1055 uint32_t A, B, C, D, E;
1056 t = 16;
1057 do {
1058 HashWorkingPointer[t] =
1059 S(1,
1060 HashWorkingPointer[t - 3] ^ HashWorkingPointer[t -
1061 8] ^
1062 HashWorkingPointer[t - 14] ^ HashWorkingPointer[t - 16]);
1063 } while (++t <= 79);
1064 t = 0;
1065 A = HashResultPointer[0];
1066 B = HashResultPointer[1];
1067 C = HashResultPointer[2];
1068 D = HashResultPointer[3];
1069 E = HashResultPointer[4];
1071 do {
1072 if (t < 20) {
1073 TEMP = ((B & C) | ((~B) & D)) + 0x5A827999;
1074 } else if (t < 40) {
1075 TEMP = (B ^ C ^ D) + 0x6ED9EBA1;
1076 } else if (t < 60) {
1077 TEMP = ((B & C) | (B & D) | (C & D)) + 0x8F1BBCDC;
1078 } else {
1079 TEMP = (B ^ C ^ D) + 0xCA62C1D6;
1081 TEMP += S(5, A) + E + HashWorkingPointer[t];
1082 E = D;
1083 D = C;
1084 C = S(30, B);
1085 B = A;
1086 A = TEMP;
1087 } while (++t <= 79);
1089 HashResultPointer[0] += A;
1090 HashResultPointer[1] += B;
1091 HashResultPointer[2] += C;
1092 HashResultPointer[3] += D;
1093 HashResultPointer[4] += E;
1097 /************************************************************************/
1098 /* */
1099 /* lpfc_challenge_key */
1100 /* */
1101 /************************************************************************/
1102 static void
1103 lpfc_challenge_key(uint32_t * RandomChallenge, uint32_t * HashWorking)
1105 *HashWorking = (*RandomChallenge ^ *HashWorking);
1108 /************************************************************************/
1109 /* */
1110 /* lpfc_hba_init */
1111 /* */
1112 /************************************************************************/
1113 void
1114 lpfc_hba_init(struct lpfc_hba *phba, uint32_t *hbainit)
1116 int t;
1117 uint32_t *HashWorking;
1118 uint32_t *pwwnn = phba->wwnn;
1120 HashWorking = kmalloc(80 * sizeof(uint32_t), GFP_KERNEL);
1121 if (!HashWorking)
1122 return;
1124 memset(HashWorking, 0, (80 * sizeof(uint32_t)));
1125 HashWorking[0] = HashWorking[78] = *pwwnn++;
1126 HashWorking[1] = HashWorking[79] = *pwwnn;
1128 for (t = 0; t < 7; t++)
1129 lpfc_challenge_key(phba->RandomData + t, HashWorking + t);
1131 lpfc_sha_init(hbainit);
1132 lpfc_sha_iterate(hbainit, HashWorking);
1133 kfree(HashWorking);
1136 static void
1137 lpfc_cleanup(struct lpfc_hba * phba, uint32_t save_bind)
1139 struct lpfc_nodelist *ndlp, *next_ndlp;
1141 /* clean up phba - lpfc specific */
1142 lpfc_can_disctmo(phba);
1143 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpunmap_list,
1144 nlp_listp) {
1145 lpfc_nlp_remove(phba, ndlp);
1148 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_nlpmap_list,
1149 nlp_listp) {
1150 lpfc_nlp_remove(phba, ndlp);
1153 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_unused_list,
1154 nlp_listp) {
1155 lpfc_nlp_list(phba, ndlp, NLP_NO_LIST);
1158 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_plogi_list,
1159 nlp_listp) {
1160 lpfc_nlp_remove(phba, ndlp);
1163 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_adisc_list,
1164 nlp_listp) {
1165 lpfc_nlp_remove(phba, ndlp);
1168 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_reglogin_list,
1169 nlp_listp) {
1170 lpfc_nlp_remove(phba, ndlp);
1173 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_prli_list,
1174 nlp_listp) {
1175 lpfc_nlp_remove(phba, ndlp);
1178 list_for_each_entry_safe(ndlp, next_ndlp, &phba->fc_npr_list,
1179 nlp_listp) {
1180 lpfc_nlp_remove(phba, ndlp);
1183 INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1184 INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1185 INIT_LIST_HEAD(&phba->fc_unused_list);
1186 INIT_LIST_HEAD(&phba->fc_plogi_list);
1187 INIT_LIST_HEAD(&phba->fc_adisc_list);
1188 INIT_LIST_HEAD(&phba->fc_reglogin_list);
1189 INIT_LIST_HEAD(&phba->fc_prli_list);
1190 INIT_LIST_HEAD(&phba->fc_npr_list);
1192 phba->fc_map_cnt = 0;
1193 phba->fc_unmap_cnt = 0;
1194 phba->fc_plogi_cnt = 0;
1195 phba->fc_adisc_cnt = 0;
1196 phba->fc_reglogin_cnt = 0;
1197 phba->fc_prli_cnt = 0;
1198 phba->fc_npr_cnt = 0;
1199 phba->fc_unused_cnt= 0;
1200 return;
1203 static void
1204 lpfc_establish_link_tmo(unsigned long ptr)
1206 struct lpfc_hba *phba = (struct lpfc_hba *)ptr;
1207 unsigned long iflag;
1210 /* Re-establishing Link, timer expired */
1211 lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1212 "%d:1300 Re-establishing Link, timer expired "
1213 "Data: x%x x%x\n",
1214 phba->brd_no, phba->fc_flag, phba->hba_state);
1215 spin_lock_irqsave(phba->host->host_lock, iflag);
1216 phba->fc_flag &= ~FC_ESTABLISH_LINK;
1217 spin_unlock_irqrestore(phba->host->host_lock, iflag);
1220 static int
1221 lpfc_stop_timer(struct lpfc_hba * phba)
1223 struct lpfc_sli *psli = &phba->sli;
1225 /* Instead of a timer, this has been converted to a
1226 * deferred procedding list.
1228 while (!list_empty(&phba->freebufList)) {
1230 struct lpfc_dmabuf *mp = NULL;
1232 list_remove_head((&phba->freebufList), mp,
1233 struct lpfc_dmabuf, list);
1234 if (mp) {
1235 lpfc_mbuf_free(phba, mp->virt, mp->phys);
1236 kfree(mp);
1240 del_timer_sync(&phba->fcp_poll_timer);
1241 del_timer_sync(&phba->fc_estabtmo);
1242 del_timer_sync(&phba->fc_disctmo);
1243 del_timer_sync(&phba->fc_fdmitmo);
1244 del_timer_sync(&phba->els_tmofunc);
1245 psli = &phba->sli;
1246 del_timer_sync(&psli->mbox_tmo);
1247 return(1);
1251 lpfc_online(struct lpfc_hba * phba)
1253 if (!phba)
1254 return 0;
1256 if (!(phba->fc_flag & FC_OFFLINE_MODE))
1257 return 0;
1259 lpfc_printf_log(phba,
1260 KERN_WARNING,
1261 LOG_INIT,
1262 "%d:0458 Bring Adapter online\n",
1263 phba->brd_no);
1265 if (!lpfc_sli_queue_setup(phba))
1266 return 1;
1268 if (lpfc_sli_hba_setup(phba)) /* Initialize the HBA */
1269 return 1;
1271 spin_lock_irq(phba->host->host_lock);
1272 phba->fc_flag &= ~FC_OFFLINE_MODE;
1273 spin_unlock_irq(phba->host->host_lock);
1275 return 0;
1279 lpfc_offline(struct lpfc_hba * phba)
1281 struct lpfc_sli_ring *pring;
1282 struct lpfc_sli *psli;
1283 unsigned long iflag;
1284 int i = 0;
1286 if (!phba)
1287 return 0;
1289 if (phba->fc_flag & FC_OFFLINE_MODE)
1290 return 0;
1292 psli = &phba->sli;
1293 pring = &psli->ring[psli->fcp_ring];
1295 lpfc_linkdown(phba);
1297 /* The linkdown event takes 30 seconds to timeout. */
1298 while (pring->txcmplq_cnt) {
1299 mdelay(10);
1300 if (i++ > 3000)
1301 break;
1304 /* stop all timers associated with this hba */
1305 lpfc_stop_timer(phba);
1306 phba->work_hba_events = 0;
1308 lpfc_printf_log(phba,
1309 KERN_WARNING,
1310 LOG_INIT,
1311 "%d:0460 Bring Adapter offline\n",
1312 phba->brd_no);
1314 /* Bring down the SLI Layer and cleanup. The HBA is offline
1315 now. */
1316 lpfc_sli_hba_down(phba);
1317 lpfc_cleanup(phba, 1);
1318 spin_lock_irqsave(phba->host->host_lock, iflag);
1319 phba->fc_flag |= FC_OFFLINE_MODE;
1320 spin_unlock_irqrestore(phba->host->host_lock, iflag);
1321 return 0;
1324 /******************************************************************************
1325 * Function name: lpfc_scsi_free
1327 * Description: Called from lpfc_pci_remove_one free internal driver resources
1329 ******************************************************************************/
1330 static int
1331 lpfc_scsi_free(struct lpfc_hba * phba)
1333 struct lpfc_scsi_buf *sb, *sb_next;
1334 struct lpfc_iocbq *io, *io_next;
1336 spin_lock_irq(phba->host->host_lock);
1337 /* Release all the lpfc_scsi_bufs maintained by this host. */
1338 list_for_each_entry_safe(sb, sb_next, &phba->lpfc_scsi_buf_list, list) {
1339 list_del(&sb->list);
1340 pci_pool_free(phba->lpfc_scsi_dma_buf_pool, sb->data,
1341 sb->dma_handle);
1342 kfree(sb);
1343 phba->total_scsi_bufs--;
1346 /* Release all the lpfc_iocbq entries maintained by this host. */
1347 list_for_each_entry_safe(io, io_next, &phba->lpfc_iocb_list, list) {
1348 list_del(&io->list);
1349 kfree(io);
1350 phba->total_iocbq_bufs--;
1353 spin_unlock_irq(phba->host->host_lock);
1355 return 0;
1359 static int __devinit
1360 lpfc_pci_probe_one(struct pci_dev *pdev, const struct pci_device_id *pid)
1362 struct Scsi_Host *host;
1363 struct lpfc_hba *phba;
1364 struct lpfc_sli *psli;
1365 struct lpfc_iocbq *iocbq_entry = NULL, *iocbq_next = NULL;
1366 unsigned long bar0map_len, bar2map_len;
1367 int error = -ENODEV, retval;
1368 int i;
1369 uint16_t iotag;
1371 if (pci_enable_device(pdev))
1372 goto out;
1373 if (pci_request_regions(pdev, LPFC_DRIVER_NAME))
1374 goto out_disable_device;
1376 host = scsi_host_alloc(&lpfc_template, sizeof (struct lpfc_hba));
1377 if (!host)
1378 goto out_release_regions;
1380 phba = (struct lpfc_hba*)host->hostdata;
1381 memset(phba, 0, sizeof (struct lpfc_hba));
1382 phba->host = host;
1384 phba->fc_flag |= FC_LOADING;
1385 phba->pcidev = pdev;
1387 /* Assign an unused board number */
1388 if (!idr_pre_get(&lpfc_hba_index, GFP_KERNEL))
1389 goto out_put_host;
1391 error = idr_get_new(&lpfc_hba_index, NULL, &phba->brd_no);
1392 if (error)
1393 goto out_put_host;
1395 host->unique_id = phba->brd_no;
1396 init_MUTEX(&phba->hba_can_block);
1397 INIT_LIST_HEAD(&phba->ctrspbuflist);
1398 INIT_LIST_HEAD(&phba->rnidrspbuflist);
1399 INIT_LIST_HEAD(&phba->freebufList);
1401 /* Initialize timers used by driver */
1402 init_timer(&phba->fc_estabtmo);
1403 phba->fc_estabtmo.function = lpfc_establish_link_tmo;
1404 phba->fc_estabtmo.data = (unsigned long)phba;
1405 init_timer(&phba->fc_disctmo);
1406 phba->fc_disctmo.function = lpfc_disc_timeout;
1407 phba->fc_disctmo.data = (unsigned long)phba;
1409 init_timer(&phba->fc_fdmitmo);
1410 phba->fc_fdmitmo.function = lpfc_fdmi_tmo;
1411 phba->fc_fdmitmo.data = (unsigned long)phba;
1412 init_timer(&phba->els_tmofunc);
1413 phba->els_tmofunc.function = lpfc_els_timeout;
1414 phba->els_tmofunc.data = (unsigned long)phba;
1415 psli = &phba->sli;
1416 init_timer(&psli->mbox_tmo);
1417 psli->mbox_tmo.function = lpfc_mbox_timeout;
1418 psli->mbox_tmo.data = (unsigned long)phba;
1420 init_timer(&phba->fcp_poll_timer);
1421 phba->fcp_poll_timer.function = lpfc_poll_timeout;
1422 phba->fcp_poll_timer.data = (unsigned long)phba;
1425 * Get all the module params for configuring this host and then
1426 * establish the host parameters.
1428 lpfc_get_cfgparam(phba);
1430 host->max_id = LPFC_MAX_TARGET;
1431 host->max_lun = phba->cfg_max_luns;
1432 host->this_id = -1;
1434 /* Initialize all internally managed lists. */
1435 INIT_LIST_HEAD(&phba->fc_nlpmap_list);
1436 INIT_LIST_HEAD(&phba->fc_nlpunmap_list);
1437 INIT_LIST_HEAD(&phba->fc_unused_list);
1438 INIT_LIST_HEAD(&phba->fc_plogi_list);
1439 INIT_LIST_HEAD(&phba->fc_adisc_list);
1440 INIT_LIST_HEAD(&phba->fc_reglogin_list);
1441 INIT_LIST_HEAD(&phba->fc_prli_list);
1442 INIT_LIST_HEAD(&phba->fc_npr_list);
1445 pci_set_master(pdev);
1446 retval = pci_set_mwi(pdev);
1447 if (retval)
1448 dev_printk(KERN_WARNING, &pdev->dev,
1449 "Warning: pci_set_mwi returned %d\n", retval);
1451 if (pci_set_dma_mask(phba->pcidev, DMA_64BIT_MASK) != 0)
1452 if (pci_set_dma_mask(phba->pcidev, DMA_32BIT_MASK) != 0)
1453 goto out_idr_remove;
1456 * Get the bus address of Bar0 and Bar2 and the number of bytes
1457 * required by each mapping.
1459 phba->pci_bar0_map = pci_resource_start(phba->pcidev, 0);
1460 bar0map_len = pci_resource_len(phba->pcidev, 0);
1462 phba->pci_bar2_map = pci_resource_start(phba->pcidev, 2);
1463 bar2map_len = pci_resource_len(phba->pcidev, 2);
1465 /* Map HBA SLIM and Control Registers to a kernel virtual address. */
1466 phba->slim_memmap_p = ioremap(phba->pci_bar0_map, bar0map_len);
1467 phba->ctrl_regs_memmap_p = ioremap(phba->pci_bar2_map, bar2map_len);
1469 /* Allocate memory for SLI-2 structures */
1470 phba->slim2p = dma_alloc_coherent(&phba->pcidev->dev, SLI2_SLIM_SIZE,
1471 &phba->slim2p_mapping, GFP_KERNEL);
1472 if (!phba->slim2p)
1473 goto out_iounmap;
1475 memset(phba->slim2p, 0, SLI2_SLIM_SIZE);
1477 /* Initialize the SLI Layer to run with lpfc HBAs. */
1478 lpfc_sli_setup(phba);
1479 lpfc_sli_queue_setup(phba);
1481 error = lpfc_mem_alloc(phba);
1482 if (error)
1483 goto out_free_slim;
1485 /* Initialize and populate the iocb list per host. */
1486 INIT_LIST_HEAD(&phba->lpfc_iocb_list);
1487 for (i = 0; i < LPFC_IOCB_LIST_CNT; i++) {
1488 iocbq_entry = kmalloc(sizeof(struct lpfc_iocbq), GFP_KERNEL);
1489 if (iocbq_entry == NULL) {
1490 printk(KERN_ERR "%s: only allocated %d iocbs of "
1491 "expected %d count. Unloading driver.\n",
1492 __FUNCTION__, i, LPFC_IOCB_LIST_CNT);
1493 error = -ENOMEM;
1494 goto out_free_iocbq;
1497 memset(iocbq_entry, 0, sizeof(struct lpfc_iocbq));
1498 iotag = lpfc_sli_next_iotag(phba, iocbq_entry);
1499 if (iotag == 0) {
1500 kfree (iocbq_entry);
1501 printk(KERN_ERR "%s: failed to allocate IOTAG. "
1502 "Unloading driver.\n",
1503 __FUNCTION__);
1504 error = -ENOMEM;
1505 goto out_free_iocbq;
1507 spin_lock_irq(phba->host->host_lock);
1508 list_add(&iocbq_entry->list, &phba->lpfc_iocb_list);
1509 phba->total_iocbq_bufs++;
1510 spin_unlock_irq(phba->host->host_lock);
1513 /* Initialize HBA structure */
1514 phba->fc_edtov = FF_DEF_EDTOV;
1515 phba->fc_ratov = FF_DEF_RATOV;
1516 phba->fc_altov = FF_DEF_ALTOV;
1517 phba->fc_arbtov = FF_DEF_ARBTOV;
1519 INIT_LIST_HEAD(&phba->work_list);
1520 phba->work_ha_mask = (HA_ERATT|HA_MBATT|HA_LATT);
1521 phba->work_ha_mask |= (HA_RXMASK << (LPFC_ELS_RING * 4));
1523 /* Startup the kernel thread for this host adapter. */
1524 phba->worker_thread = kthread_run(lpfc_do_work, phba,
1525 "lpfc_worker_%d", phba->brd_no);
1526 if (IS_ERR(phba->worker_thread)) {
1527 error = PTR_ERR(phba->worker_thread);
1528 goto out_free_iocbq;
1531 /* We can rely on a queue depth attribute only after SLI HBA setup */
1532 host->can_queue = phba->cfg_hba_queue_depth - 10;
1534 /* Tell the midlayer we support 16 byte commands */
1535 host->max_cmd_len = 16;
1537 /* Initialize the list of scsi buffers used by driver for scsi IO. */
1538 spin_lock_init(&phba->scsi_buf_list_lock);
1539 INIT_LIST_HEAD(&phba->lpfc_scsi_buf_list);
1541 host->transportt = lpfc_transport_template;
1542 host->hostdata[0] = (unsigned long)phba;
1543 pci_set_drvdata(pdev, host);
1544 error = scsi_add_host(host, &pdev->dev);
1545 if (error)
1546 goto out_kthread_stop;
1548 error = lpfc_alloc_sysfs_attr(phba);
1549 if (error)
1550 goto out_kthread_stop;
1552 error = request_irq(phba->pcidev->irq, lpfc_intr_handler, SA_SHIRQ,
1553 LPFC_DRIVER_NAME, phba);
1554 if (error) {
1555 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
1556 "%d:0451 Enable interrupt handler failed\n",
1557 phba->brd_no);
1558 goto out_free_sysfs_attr;
1560 phba->MBslimaddr = phba->slim_memmap_p;
1561 phba->HAregaddr = phba->ctrl_regs_memmap_p + HA_REG_OFFSET;
1562 phba->CAregaddr = phba->ctrl_regs_memmap_p + CA_REG_OFFSET;
1563 phba->HSregaddr = phba->ctrl_regs_memmap_p + HS_REG_OFFSET;
1564 phba->HCregaddr = phba->ctrl_regs_memmap_p + HC_REG_OFFSET;
1566 error = lpfc_sli_hba_setup(phba);
1567 if (error)
1568 goto out_free_irq;
1570 if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
1571 spin_lock_irq(phba->host->host_lock);
1572 lpfc_poll_start_timer(phba);
1573 spin_unlock_irq(phba->host->host_lock);
1577 * set fixed host attributes
1578 * Must done after lpfc_sli_hba_setup()
1581 fc_host_node_name(host) = wwn_to_u64(phba->fc_nodename.u.wwn);
1582 fc_host_port_name(host) = wwn_to_u64(phba->fc_portname.u.wwn);
1583 fc_host_supported_classes(host) = FC_COS_CLASS3;
1585 memset(fc_host_supported_fc4s(host), 0,
1586 sizeof(fc_host_supported_fc4s(host)));
1587 fc_host_supported_fc4s(host)[2] = 1;
1588 fc_host_supported_fc4s(host)[7] = 1;
1590 lpfc_get_hba_sym_node_name(phba, fc_host_symbolic_name(host));
1592 fc_host_supported_speeds(host) = 0;
1593 switch (FC_JEDEC_ID(phba->vpd.rev.biuRev)) {
1594 case VIPER_JEDEC_ID:
1595 fc_host_supported_speeds(host) |= FC_PORTSPEED_10GBIT;
1596 break;
1597 case HELIOS_JEDEC_ID:
1598 fc_host_supported_speeds(host) |= FC_PORTSPEED_4GBIT;
1599 /* Fall through */
1600 case CENTAUR_2G_JEDEC_ID:
1601 case PEGASUS_JEDEC_ID:
1602 case THOR_JEDEC_ID:
1603 fc_host_supported_speeds(host) |= FC_PORTSPEED_2GBIT;
1604 /* Fall through */
1605 default:
1606 fc_host_supported_speeds(host) = FC_PORTSPEED_1GBIT;
1609 fc_host_maxframe_size(host) =
1610 ((((uint32_t) phba->fc_sparam.cmn.bbRcvSizeMsb & 0x0F) << 8) |
1611 (uint32_t) phba->fc_sparam.cmn.bbRcvSizeLsb);
1613 /* This value is also unchanging */
1614 memset(fc_host_active_fc4s(host), 0,
1615 sizeof(fc_host_active_fc4s(host)));
1616 fc_host_active_fc4s(host)[2] = 1;
1617 fc_host_active_fc4s(host)[7] = 1;
1619 spin_lock_irq(phba->host->host_lock);
1620 phba->fc_flag &= ~FC_LOADING;
1621 spin_unlock_irq(phba->host->host_lock);
1622 return 0;
1624 out_free_irq:
1625 lpfc_stop_timer(phba);
1626 phba->work_hba_events = 0;
1627 free_irq(phba->pcidev->irq, phba);
1628 out_free_sysfs_attr:
1629 lpfc_free_sysfs_attr(phba);
1630 out_kthread_stop:
1631 kthread_stop(phba->worker_thread);
1632 out_free_iocbq:
1633 list_for_each_entry_safe(iocbq_entry, iocbq_next,
1634 &phba->lpfc_iocb_list, list) {
1635 spin_lock_irq(phba->host->host_lock);
1636 kfree(iocbq_entry);
1637 phba->total_iocbq_bufs--;
1638 spin_unlock_irq(phba->host->host_lock);
1640 lpfc_mem_free(phba);
1641 out_free_slim:
1642 dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE, phba->slim2p,
1643 phba->slim2p_mapping);
1644 out_iounmap:
1645 iounmap(phba->ctrl_regs_memmap_p);
1646 iounmap(phba->slim_memmap_p);
1647 out_idr_remove:
1648 idr_remove(&lpfc_hba_index, phba->brd_no);
1649 out_put_host:
1650 scsi_host_put(host);
1651 out_release_regions:
1652 pci_release_regions(pdev);
1653 out_disable_device:
1654 pci_disable_device(pdev);
1655 out:
1656 return error;
1659 static void __devexit
1660 lpfc_pci_remove_one(struct pci_dev *pdev)
1662 struct Scsi_Host *host = pci_get_drvdata(pdev);
1663 struct lpfc_hba *phba = (struct lpfc_hba *)host->hostdata[0];
1664 unsigned long iflag;
1666 lpfc_free_sysfs_attr(phba);
1668 spin_lock_irqsave(phba->host->host_lock, iflag);
1669 phba->fc_flag |= FC_UNLOADING;
1671 spin_unlock_irqrestore(phba->host->host_lock, iflag);
1673 fc_remove_host(phba->host);
1674 scsi_remove_host(phba->host);
1676 kthread_stop(phba->worker_thread);
1679 * Bring down the SLI Layer. This step disable all interrupts,
1680 * clears the rings, discards all mailbox commands, and resets
1681 * the HBA.
1683 lpfc_sli_hba_down(phba);
1685 /* Release the irq reservation */
1686 free_irq(phba->pcidev->irq, phba);
1688 lpfc_cleanup(phba, 0);
1689 lpfc_stop_timer(phba);
1690 phba->work_hba_events = 0;
1693 * Call scsi_free before mem_free since scsi bufs are released to their
1694 * corresponding pools here.
1696 lpfc_scsi_free(phba);
1697 lpfc_mem_free(phba);
1699 /* Free resources associated with SLI2 interface */
1700 dma_free_coherent(&pdev->dev, SLI2_SLIM_SIZE,
1701 phba->slim2p, phba->slim2p_mapping);
1703 /* unmap adapter SLIM and Control Registers */
1704 iounmap(phba->ctrl_regs_memmap_p);
1705 iounmap(phba->slim_memmap_p);
1707 pci_release_regions(phba->pcidev);
1708 pci_disable_device(phba->pcidev);
1710 idr_remove(&lpfc_hba_index, phba->brd_no);
1711 scsi_host_put(phba->host);
1713 pci_set_drvdata(pdev, NULL);
1716 static struct pci_device_id lpfc_id_table[] = {
1717 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_VIPER,
1718 PCI_ANY_ID, PCI_ANY_ID, },
1719 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_FIREFLY,
1720 PCI_ANY_ID, PCI_ANY_ID, },
1721 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_THOR,
1722 PCI_ANY_ID, PCI_ANY_ID, },
1723 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PEGASUS,
1724 PCI_ANY_ID, PCI_ANY_ID, },
1725 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_CENTAUR,
1726 PCI_ANY_ID, PCI_ANY_ID, },
1727 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_DRAGONFLY,
1728 PCI_ANY_ID, PCI_ANY_ID, },
1729 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_SUPERFLY,
1730 PCI_ANY_ID, PCI_ANY_ID, },
1731 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_RFLY,
1732 PCI_ANY_ID, PCI_ANY_ID, },
1733 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_PFLY,
1734 PCI_ANY_ID, PCI_ANY_ID, },
1735 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE,
1736 PCI_ANY_ID, PCI_ANY_ID, },
1737 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_SCSP,
1738 PCI_ANY_ID, PCI_ANY_ID, },
1739 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_NEPTUNE_DCSP,
1740 PCI_ANY_ID, PCI_ANY_ID, },
1741 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS,
1742 PCI_ANY_ID, PCI_ANY_ID, },
1743 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_SCSP,
1744 PCI_ANY_ID, PCI_ANY_ID, },
1745 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_HELIOS_DCSP,
1746 PCI_ANY_ID, PCI_ANY_ID, },
1747 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BMID,
1748 PCI_ANY_ID, PCI_ANY_ID, },
1749 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_BSMB,
1750 PCI_ANY_ID, PCI_ANY_ID, },
1751 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR,
1752 PCI_ANY_ID, PCI_ANY_ID, },
1753 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_SCSP,
1754 PCI_ANY_ID, PCI_ANY_ID, },
1755 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZEPHYR_DCSP,
1756 PCI_ANY_ID, PCI_ANY_ID, },
1757 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZMID,
1758 PCI_ANY_ID, PCI_ANY_ID, },
1759 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_ZSMB,
1760 PCI_ANY_ID, PCI_ANY_ID, },
1761 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_TFLY,
1762 PCI_ANY_ID, PCI_ANY_ID, },
1763 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP101,
1764 PCI_ANY_ID, PCI_ANY_ID, },
1765 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP10000S,
1766 PCI_ANY_ID, PCI_ANY_ID, },
1767 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LP11000S,
1768 PCI_ANY_ID, PCI_ANY_ID, },
1769 {PCI_VENDOR_ID_EMULEX, PCI_DEVICE_ID_LPE11000S,
1770 PCI_ANY_ID, PCI_ANY_ID, },
1771 { 0 }
1774 MODULE_DEVICE_TABLE(pci, lpfc_id_table);
1776 static struct pci_driver lpfc_driver = {
1777 .name = LPFC_DRIVER_NAME,
1778 .id_table = lpfc_id_table,
1779 .probe = lpfc_pci_probe_one,
1780 .remove = __devexit_p(lpfc_pci_remove_one),
1783 static int __init
1784 lpfc_init(void)
1786 int error = 0;
1788 printk(LPFC_MODULE_DESC "\n");
1789 printk(LPFC_COPYRIGHT "\n");
1791 lpfc_transport_template =
1792 fc_attach_transport(&lpfc_transport_functions);
1793 if (!lpfc_transport_template)
1794 return -ENOMEM;
1795 error = pci_register_driver(&lpfc_driver);
1796 if (error)
1797 fc_release_transport(lpfc_transport_template);
1799 return error;
1802 static void __exit
1803 lpfc_exit(void)
1805 pci_unregister_driver(&lpfc_driver);
1806 fc_release_transport(lpfc_transport_template);
1809 module_init(lpfc_init);
1810 module_exit(lpfc_exit);
1811 MODULE_LICENSE("GPL");
1812 MODULE_DESCRIPTION(LPFC_MODULE_DESC);
1813 MODULE_AUTHOR("Emulex Corporation - tech.support@emulex.com");
1814 MODULE_VERSION("0:" LPFC_DRIVER_VERSION);