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