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