xref: /openbmc/linux/drivers/scsi/lpfc/lpfc_sli.c (revision 64c70b1c)
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2007 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
21 
22 #include <linux/blkdev.h>
23 #include <linux/pci.h>
24 #include <linux/interrupt.h>
25 #include <linux/delay.h>
26 
27 #include <scsi/scsi.h>
28 #include <scsi/scsi_cmnd.h>
29 #include <scsi/scsi_device.h>
30 #include <scsi/scsi_host.h>
31 #include <scsi/scsi_transport_fc.h>
32 
33 #include "lpfc_hw.h"
34 #include "lpfc_sli.h"
35 #include "lpfc_disc.h"
36 #include "lpfc_scsi.h"
37 #include "lpfc.h"
38 #include "lpfc_crtn.h"
39 #include "lpfc_logmsg.h"
40 #include "lpfc_compat.h"
41 
42 /*
43  * Define macro to log: Mailbox command x%x cannot issue Data
44  * This allows multiple uses of lpfc_msgBlk0311
45  * w/o perturbing log msg utility.
46  */
47 #define LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag) \
48 			lpfc_printf_log(phba, \
49 				KERN_INFO, \
50 				LOG_MBOX | LOG_SLI, \
51 				"%d:0311 Mailbox command x%x cannot issue " \
52 				"Data: x%x x%x x%x\n", \
53 				phba->brd_no, \
54 				mb->mbxCommand,		\
55 				phba->hba_state,	\
56 				psli->sli_flag,	\
57 				flag);
58 
59 
60 /* There are only four IOCB completion types. */
61 typedef enum _lpfc_iocb_type {
62 	LPFC_UNKNOWN_IOCB,
63 	LPFC_UNSOL_IOCB,
64 	LPFC_SOL_IOCB,
65 	LPFC_ABORT_IOCB
66 } lpfc_iocb_type;
67 
68 struct lpfc_iocbq *
69 lpfc_sli_get_iocbq(struct lpfc_hba * phba)
70 {
71 	struct list_head *lpfc_iocb_list = &phba->lpfc_iocb_list;
72 	struct lpfc_iocbq * iocbq = NULL;
73 
74 	list_remove_head(lpfc_iocb_list, iocbq, struct lpfc_iocbq, list);
75 	return iocbq;
76 }
77 
78 void
79 lpfc_sli_release_iocbq(struct lpfc_hba * phba, struct lpfc_iocbq * iocbq)
80 {
81 	size_t start_clean = (size_t)(&((struct lpfc_iocbq *)NULL)->iocb);
82 
83 	/*
84 	 * Clean all volatile data fields, preserve iotag and node struct.
85 	 */
86 	memset((char*)iocbq + start_clean, 0, sizeof(*iocbq) - start_clean);
87 	list_add_tail(&iocbq->list, &phba->lpfc_iocb_list);
88 }
89 
90 /*
91  * Translate the iocb command to an iocb command type used to decide the final
92  * disposition of each completed IOCB.
93  */
94 static lpfc_iocb_type
95 lpfc_sli_iocb_cmd_type(uint8_t iocb_cmnd)
96 {
97 	lpfc_iocb_type type = LPFC_UNKNOWN_IOCB;
98 
99 	if (iocb_cmnd > CMD_MAX_IOCB_CMD)
100 		return 0;
101 
102 	switch (iocb_cmnd) {
103 	case CMD_XMIT_SEQUENCE_CR:
104 	case CMD_XMIT_SEQUENCE_CX:
105 	case CMD_XMIT_BCAST_CN:
106 	case CMD_XMIT_BCAST_CX:
107 	case CMD_ELS_REQUEST_CR:
108 	case CMD_ELS_REQUEST_CX:
109 	case CMD_CREATE_XRI_CR:
110 	case CMD_CREATE_XRI_CX:
111 	case CMD_GET_RPI_CN:
112 	case CMD_XMIT_ELS_RSP_CX:
113 	case CMD_GET_RPI_CR:
114 	case CMD_FCP_IWRITE_CR:
115 	case CMD_FCP_IWRITE_CX:
116 	case CMD_FCP_IREAD_CR:
117 	case CMD_FCP_IREAD_CX:
118 	case CMD_FCP_ICMND_CR:
119 	case CMD_FCP_ICMND_CX:
120 	case CMD_FCP_TSEND_CX:
121 	case CMD_FCP_TRSP_CX:
122 	case CMD_FCP_TRECEIVE_CX:
123 	case CMD_FCP_AUTO_TRSP_CX:
124 	case CMD_ADAPTER_MSG:
125 	case CMD_ADAPTER_DUMP:
126 	case CMD_XMIT_SEQUENCE64_CR:
127 	case CMD_XMIT_SEQUENCE64_CX:
128 	case CMD_XMIT_BCAST64_CN:
129 	case CMD_XMIT_BCAST64_CX:
130 	case CMD_ELS_REQUEST64_CR:
131 	case CMD_ELS_REQUEST64_CX:
132 	case CMD_FCP_IWRITE64_CR:
133 	case CMD_FCP_IWRITE64_CX:
134 	case CMD_FCP_IREAD64_CR:
135 	case CMD_FCP_IREAD64_CX:
136 	case CMD_FCP_ICMND64_CR:
137 	case CMD_FCP_ICMND64_CX:
138 	case CMD_FCP_TSEND64_CX:
139 	case CMD_FCP_TRSP64_CX:
140 	case CMD_FCP_TRECEIVE64_CX:
141 	case CMD_GEN_REQUEST64_CR:
142 	case CMD_GEN_REQUEST64_CX:
143 	case CMD_XMIT_ELS_RSP64_CX:
144 		type = LPFC_SOL_IOCB;
145 		break;
146 	case CMD_ABORT_XRI_CN:
147 	case CMD_ABORT_XRI_CX:
148 	case CMD_CLOSE_XRI_CN:
149 	case CMD_CLOSE_XRI_CX:
150 	case CMD_XRI_ABORTED_CX:
151 	case CMD_ABORT_MXRI64_CN:
152 		type = LPFC_ABORT_IOCB;
153 		break;
154 	case CMD_RCV_SEQUENCE_CX:
155 	case CMD_RCV_ELS_REQ_CX:
156 	case CMD_RCV_SEQUENCE64_CX:
157 	case CMD_RCV_ELS_REQ64_CX:
158 		type = LPFC_UNSOL_IOCB;
159 		break;
160 	default:
161 		type = LPFC_UNKNOWN_IOCB;
162 		break;
163 	}
164 
165 	return type;
166 }
167 
168 static int
169 lpfc_sli_ring_map(struct lpfc_hba * phba, LPFC_MBOXQ_t *pmb)
170 {
171 	struct lpfc_sli *psli = &phba->sli;
172 	MAILBOX_t *pmbox = &pmb->mb;
173 	int i, rc;
174 
175 	for (i = 0; i < psli->num_rings; i++) {
176 		phba->hba_state = LPFC_INIT_MBX_CMDS;
177 		lpfc_config_ring(phba, i, pmb);
178 		rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
179 		if (rc != MBX_SUCCESS) {
180 			lpfc_printf_log(phba,
181 					KERN_ERR,
182 					LOG_INIT,
183 					"%d:0446 Adapter failed to init, "
184 					"mbxCmd x%x CFG_RING, mbxStatus x%x, "
185 					"ring %d\n",
186 					phba->brd_no,
187 					pmbox->mbxCommand,
188 					pmbox->mbxStatus,
189 					i);
190 			phba->hba_state = LPFC_HBA_ERROR;
191 			return -ENXIO;
192 		}
193 	}
194 	return 0;
195 }
196 
197 static int
198 lpfc_sli_ringtxcmpl_put(struct lpfc_hba * phba,
199 			struct lpfc_sli_ring * pring, struct lpfc_iocbq * piocb)
200 {
201 	list_add_tail(&piocb->list, &pring->txcmplq);
202 	pring->txcmplq_cnt++;
203 	if (unlikely(pring->ringno == LPFC_ELS_RING))
204 		mod_timer(&phba->els_tmofunc,
205 					jiffies + HZ * (phba->fc_ratov << 1));
206 
207 	return (0);
208 }
209 
210 static struct lpfc_iocbq *
211 lpfc_sli_ringtx_get(struct lpfc_hba * phba, struct lpfc_sli_ring * pring)
212 {
213 	struct list_head *dlp;
214 	struct lpfc_iocbq *cmd_iocb;
215 
216 	dlp = &pring->txq;
217 	cmd_iocb = NULL;
218 	list_remove_head((&pring->txq), cmd_iocb,
219 			 struct lpfc_iocbq,
220 			 list);
221 	if (cmd_iocb) {
222 		/* If the first ptr is not equal to the list header,
223 		 * deque the IOCBQ_t and return it.
224 		 */
225 		pring->txq_cnt--;
226 	}
227 	return (cmd_iocb);
228 }
229 
230 static IOCB_t *
231 lpfc_sli_next_iocb_slot (struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
232 {
233 	struct lpfc_pgp *pgp = &phba->slim2p->mbx.us.s2.port[pring->ringno];
234 	uint32_t  max_cmd_idx = pring->numCiocb;
235 	IOCB_t *iocb = NULL;
236 
237 	if ((pring->next_cmdidx == pring->cmdidx) &&
238 	   (++pring->next_cmdidx >= max_cmd_idx))
239 		pring->next_cmdidx = 0;
240 
241 	if (unlikely(pring->local_getidx == pring->next_cmdidx)) {
242 
243 		pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
244 
245 		if (unlikely(pring->local_getidx >= max_cmd_idx)) {
246 			lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
247 					"%d:0315 Ring %d issue: portCmdGet %d "
248 					"is bigger then cmd ring %d\n",
249 					phba->brd_no, pring->ringno,
250 					pring->local_getidx, max_cmd_idx);
251 
252 			phba->hba_state = LPFC_HBA_ERROR;
253 			/*
254 			 * All error attention handlers are posted to
255 			 * worker thread
256 			 */
257 			phba->work_ha |= HA_ERATT;
258 			phba->work_hs = HS_FFER3;
259 			if (phba->work_wait)
260 				wake_up(phba->work_wait);
261 
262 			return NULL;
263 		}
264 
265 		if (pring->local_getidx == pring->next_cmdidx)
266 			return NULL;
267 	}
268 
269 	iocb = IOCB_ENTRY(pring->cmdringaddr, pring->cmdidx);
270 
271 	return iocb;
272 }
273 
274 uint16_t
275 lpfc_sli_next_iotag(struct lpfc_hba * phba, struct lpfc_iocbq * iocbq)
276 {
277 	struct lpfc_iocbq ** new_arr;
278 	struct lpfc_iocbq ** old_arr;
279 	size_t new_len;
280 	struct lpfc_sli *psli = &phba->sli;
281 	uint16_t iotag;
282 
283 	spin_lock_irq(phba->host->host_lock);
284 	iotag = psli->last_iotag;
285 	if(++iotag < psli->iocbq_lookup_len) {
286 		psli->last_iotag = iotag;
287 		psli->iocbq_lookup[iotag] = iocbq;
288 		spin_unlock_irq(phba->host->host_lock);
289 		iocbq->iotag = iotag;
290 		return iotag;
291 	}
292 	else if (psli->iocbq_lookup_len < (0xffff
293 					   - LPFC_IOCBQ_LOOKUP_INCREMENT)) {
294 		new_len = psli->iocbq_lookup_len + LPFC_IOCBQ_LOOKUP_INCREMENT;
295 		spin_unlock_irq(phba->host->host_lock);
296 		new_arr = kmalloc(new_len * sizeof (struct lpfc_iocbq *),
297 				  GFP_KERNEL);
298 		if (new_arr) {
299 			memset((char *)new_arr, 0,
300 			       new_len * sizeof (struct lpfc_iocbq *));
301 			spin_lock_irq(phba->host->host_lock);
302 			old_arr = psli->iocbq_lookup;
303 			if (new_len <= psli->iocbq_lookup_len) {
304 				/* highly unprobable case */
305 				kfree(new_arr);
306 				iotag = psli->last_iotag;
307 				if(++iotag < psli->iocbq_lookup_len) {
308 					psli->last_iotag = iotag;
309 					psli->iocbq_lookup[iotag] = iocbq;
310 					spin_unlock_irq(phba->host->host_lock);
311 					iocbq->iotag = iotag;
312 					return iotag;
313 				}
314 				spin_unlock_irq(phba->host->host_lock);
315 				return 0;
316 			}
317 			if (psli->iocbq_lookup)
318 				memcpy(new_arr, old_arr,
319 				       ((psli->last_iotag  + 1) *
320 	 				sizeof (struct lpfc_iocbq *)));
321 			psli->iocbq_lookup = new_arr;
322 			psli->iocbq_lookup_len = new_len;
323 			psli->last_iotag = iotag;
324 			psli->iocbq_lookup[iotag] = iocbq;
325 			spin_unlock_irq(phba->host->host_lock);
326 			iocbq->iotag = iotag;
327 			kfree(old_arr);
328 			return iotag;
329 		}
330 	} else
331 		spin_unlock_irq(phba->host->host_lock);
332 
333 	lpfc_printf_log(phba, KERN_ERR,LOG_SLI,
334 			"%d:0318 Failed to allocate IOTAG.last IOTAG is %d\n",
335 			phba->brd_no, psli->last_iotag);
336 
337 	return 0;
338 }
339 
340 static void
341 lpfc_sli_submit_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
342 		IOCB_t *iocb, struct lpfc_iocbq *nextiocb)
343 {
344 	/*
345 	 * Set up an iotag
346 	 */
347 	nextiocb->iocb.ulpIoTag = (nextiocb->iocb_cmpl) ? nextiocb->iotag : 0;
348 
349 	/*
350 	 * Issue iocb command to adapter
351 	 */
352 	lpfc_sli_pcimem_bcopy(&nextiocb->iocb, iocb, sizeof (IOCB_t));
353 	wmb();
354 	pring->stats.iocb_cmd++;
355 
356 	/*
357 	 * If there is no completion routine to call, we can release the
358 	 * IOCB buffer back right now. For IOCBs, like QUE_RING_BUF,
359 	 * that have no rsp ring completion, iocb_cmpl MUST be NULL.
360 	 */
361 	if (nextiocb->iocb_cmpl)
362 		lpfc_sli_ringtxcmpl_put(phba, pring, nextiocb);
363 	else
364 		lpfc_sli_release_iocbq(phba, nextiocb);
365 
366 	/*
367 	 * Let the HBA know what IOCB slot will be the next one the
368 	 * driver will put a command into.
369 	 */
370 	pring->cmdidx = pring->next_cmdidx;
371 	writel(pring->cmdidx, phba->MBslimaddr
372 	       + (SLIMOFF + (pring->ringno * 2)) * 4);
373 }
374 
375 static void
376 lpfc_sli_update_full_ring(struct lpfc_hba * phba,
377 			  struct lpfc_sli_ring *pring)
378 {
379 	int ringno = pring->ringno;
380 
381 	pring->flag |= LPFC_CALL_RING_AVAILABLE;
382 
383 	wmb();
384 
385 	/*
386 	 * Set ring 'ringno' to SET R0CE_REQ in Chip Att register.
387 	 * The HBA will tell us when an IOCB entry is available.
388 	 */
389 	writel((CA_R0ATT|CA_R0CE_REQ) << (ringno*4), phba->CAregaddr);
390 	readl(phba->CAregaddr); /* flush */
391 
392 	pring->stats.iocb_cmd_full++;
393 }
394 
395 static void
396 lpfc_sli_update_ring(struct lpfc_hba * phba,
397 		     struct lpfc_sli_ring *pring)
398 {
399 	int ringno = pring->ringno;
400 
401 	/*
402 	 * Tell the HBA that there is work to do in this ring.
403 	 */
404 	wmb();
405 	writel(CA_R0ATT << (ringno * 4), phba->CAregaddr);
406 	readl(phba->CAregaddr); /* flush */
407 }
408 
409 static void
410 lpfc_sli_resume_iocb(struct lpfc_hba * phba, struct lpfc_sli_ring * pring)
411 {
412 	IOCB_t *iocb;
413 	struct lpfc_iocbq *nextiocb;
414 
415 	/*
416 	 * Check to see if:
417 	 *  (a) there is anything on the txq to send
418 	 *  (b) link is up
419 	 *  (c) link attention events can be processed (fcp ring only)
420 	 *  (d) IOCB processing is not blocked by the outstanding mbox command.
421 	 */
422 	if (pring->txq_cnt &&
423 	    (phba->hba_state > LPFC_LINK_DOWN) &&
424 	    (pring->ringno != phba->sli.fcp_ring ||
425 	     phba->sli.sli_flag & LPFC_PROCESS_LA) &&
426 	    !(pring->flag & LPFC_STOP_IOCB_MBX)) {
427 
428 		while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
429 		       (nextiocb = lpfc_sli_ringtx_get(phba, pring)))
430 			lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
431 
432 		if (iocb)
433 			lpfc_sli_update_ring(phba, pring);
434 		else
435 			lpfc_sli_update_full_ring(phba, pring);
436 	}
437 
438 	return;
439 }
440 
441 /* lpfc_sli_turn_on_ring is only called by lpfc_sli_handle_mb_event below */
442 static void
443 lpfc_sli_turn_on_ring(struct lpfc_hba * phba, int ringno)
444 {
445 	struct lpfc_pgp *pgp = &phba->slim2p->mbx.us.s2.port[ringno];
446 
447 	/* If the ring is active, flag it */
448 	if (phba->sli.ring[ringno].cmdringaddr) {
449 		if (phba->sli.ring[ringno].flag & LPFC_STOP_IOCB_MBX) {
450 			phba->sli.ring[ringno].flag &= ~LPFC_STOP_IOCB_MBX;
451 			/*
452 			 * Force update of the local copy of cmdGetInx
453 			 */
454 			phba->sli.ring[ringno].local_getidx
455 				= le32_to_cpu(pgp->cmdGetInx);
456 			spin_lock_irq(phba->host->host_lock);
457 			lpfc_sli_resume_iocb(phba, &phba->sli.ring[ringno]);
458 			spin_unlock_irq(phba->host->host_lock);
459 		}
460 	}
461 }
462 
463 static int
464 lpfc_sli_chk_mbx_command(uint8_t mbxCommand)
465 {
466 	uint8_t ret;
467 
468 	switch (mbxCommand) {
469 	case MBX_LOAD_SM:
470 	case MBX_READ_NV:
471 	case MBX_WRITE_NV:
472 	case MBX_RUN_BIU_DIAG:
473 	case MBX_INIT_LINK:
474 	case MBX_DOWN_LINK:
475 	case MBX_CONFIG_LINK:
476 	case MBX_CONFIG_RING:
477 	case MBX_RESET_RING:
478 	case MBX_READ_CONFIG:
479 	case MBX_READ_RCONFIG:
480 	case MBX_READ_SPARM:
481 	case MBX_READ_STATUS:
482 	case MBX_READ_RPI:
483 	case MBX_READ_XRI:
484 	case MBX_READ_REV:
485 	case MBX_READ_LNK_STAT:
486 	case MBX_REG_LOGIN:
487 	case MBX_UNREG_LOGIN:
488 	case MBX_READ_LA:
489 	case MBX_CLEAR_LA:
490 	case MBX_DUMP_MEMORY:
491 	case MBX_DUMP_CONTEXT:
492 	case MBX_RUN_DIAGS:
493 	case MBX_RESTART:
494 	case MBX_UPDATE_CFG:
495 	case MBX_DOWN_LOAD:
496 	case MBX_DEL_LD_ENTRY:
497 	case MBX_RUN_PROGRAM:
498 	case MBX_SET_MASK:
499 	case MBX_SET_SLIM:
500 	case MBX_UNREG_D_ID:
501 	case MBX_KILL_BOARD:
502 	case MBX_CONFIG_FARP:
503 	case MBX_BEACON:
504 	case MBX_LOAD_AREA:
505 	case MBX_RUN_BIU_DIAG64:
506 	case MBX_CONFIG_PORT:
507 	case MBX_READ_SPARM64:
508 	case MBX_READ_RPI64:
509 	case MBX_REG_LOGIN64:
510 	case MBX_READ_LA64:
511 	case MBX_FLASH_WR_ULA:
512 	case MBX_SET_DEBUG:
513 	case MBX_LOAD_EXP_ROM:
514 		ret = mbxCommand;
515 		break;
516 	default:
517 		ret = MBX_SHUTDOWN;
518 		break;
519 	}
520 	return (ret);
521 }
522 static void
523 lpfc_sli_wake_mbox_wait(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmboxq)
524 {
525 	wait_queue_head_t *pdone_q;
526 
527 	/*
528 	 * If pdone_q is empty, the driver thread gave up waiting and
529 	 * continued running.
530 	 */
531 	pmboxq->mbox_flag |= LPFC_MBX_WAKE;
532 	pdone_q = (wait_queue_head_t *) pmboxq->context1;
533 	if (pdone_q)
534 		wake_up_interruptible(pdone_q);
535 	return;
536 }
537 
538 void
539 lpfc_sli_def_mbox_cmpl(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmb)
540 {
541 	struct lpfc_dmabuf *mp;
542 	uint16_t rpi;
543 	int rc;
544 
545 	mp = (struct lpfc_dmabuf *) (pmb->context1);
546 
547 	if (mp) {
548 		lpfc_mbuf_free(phba, mp->virt, mp->phys);
549 		kfree(mp);
550 	}
551 
552 	/*
553 	 * If a REG_LOGIN succeeded  after node is destroyed or node
554 	 * is in re-discovery driver need to cleanup the RPI.
555 	 */
556 	if (!(phba->fc_flag & FC_UNLOADING) &&
557 		(pmb->mb.mbxCommand == MBX_REG_LOGIN64) &&
558 		(!pmb->mb.mbxStatus)) {
559 
560 		rpi = pmb->mb.un.varWords[0];
561 		lpfc_unreg_login(phba, rpi, pmb);
562 		pmb->mbox_cmpl=lpfc_sli_def_mbox_cmpl;
563 		rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
564 		if (rc != MBX_NOT_FINISHED)
565 			return;
566 	}
567 
568 	mempool_free( pmb, phba->mbox_mem_pool);
569 	return;
570 }
571 
572 int
573 lpfc_sli_handle_mb_event(struct lpfc_hba * phba)
574 {
575 	MAILBOX_t *mbox;
576 	MAILBOX_t *pmbox;
577 	LPFC_MBOXQ_t *pmb;
578 	struct lpfc_sli *psli;
579 	int i, rc;
580 	uint32_t process_next;
581 
582 	psli = &phba->sli;
583 	/* We should only get here if we are in SLI2 mode */
584 	if (!(phba->sli.sli_flag & LPFC_SLI2_ACTIVE)) {
585 		return (1);
586 	}
587 
588 	phba->sli.slistat.mbox_event++;
589 
590 	/* Get a Mailbox buffer to setup mailbox commands for callback */
591 	if ((pmb = phba->sli.mbox_active)) {
592 		pmbox = &pmb->mb;
593 		mbox = &phba->slim2p->mbx;
594 
595 		/* First check out the status word */
596 		lpfc_sli_pcimem_bcopy(mbox, pmbox, sizeof (uint32_t));
597 
598 		/* Sanity check to ensure the host owns the mailbox */
599 		if (pmbox->mbxOwner != OWN_HOST) {
600 			/* Lets try for a while */
601 			for (i = 0; i < 10240; i++) {
602 				/* First copy command data */
603 				lpfc_sli_pcimem_bcopy(mbox, pmbox,
604 							sizeof (uint32_t));
605 				if (pmbox->mbxOwner == OWN_HOST)
606 					goto mbout;
607 			}
608 			/* Stray Mailbox Interrupt, mbxCommand <cmd> mbxStatus
609 			   <status> */
610 			lpfc_printf_log(phba,
611 					KERN_WARNING,
612 					LOG_MBOX | LOG_SLI,
613 					"%d:0304 Stray Mailbox Interrupt "
614 					"mbxCommand x%x mbxStatus x%x\n",
615 					phba->brd_no,
616 					pmbox->mbxCommand,
617 					pmbox->mbxStatus);
618 
619 			spin_lock_irq(phba->host->host_lock);
620 			phba->sli.sli_flag |= LPFC_SLI_MBOX_ACTIVE;
621 			spin_unlock_irq(phba->host->host_lock);
622 			return (1);
623 		}
624 
625 	      mbout:
626 		del_timer_sync(&phba->sli.mbox_tmo);
627 		phba->work_hba_events &= ~WORKER_MBOX_TMO;
628 
629 		/*
630 		 * It is a fatal error if unknown mbox command completion.
631 		 */
632 		if (lpfc_sli_chk_mbx_command(pmbox->mbxCommand) ==
633 		    MBX_SHUTDOWN) {
634 
635 			/* Unknow mailbox command compl */
636 			lpfc_printf_log(phba,
637 				KERN_ERR,
638 				LOG_MBOX | LOG_SLI,
639 				"%d:0323 Unknown Mailbox command %x Cmpl\n",
640 				phba->brd_no,
641 				pmbox->mbxCommand);
642 			phba->hba_state = LPFC_HBA_ERROR;
643 			phba->work_hs = HS_FFER3;
644 			lpfc_handle_eratt(phba);
645 			return (0);
646 		}
647 
648 		phba->sli.mbox_active = NULL;
649 		if (pmbox->mbxStatus) {
650 			phba->sli.slistat.mbox_stat_err++;
651 			if (pmbox->mbxStatus == MBXERR_NO_RESOURCES) {
652 				/* Mbox cmd cmpl error - RETRYing */
653 				lpfc_printf_log(phba,
654 					KERN_INFO,
655 					LOG_MBOX | LOG_SLI,
656 					"%d:0305 Mbox cmd cmpl error - "
657 					"RETRYing Data: x%x x%x x%x x%x\n",
658 					phba->brd_no,
659 					pmbox->mbxCommand,
660 					pmbox->mbxStatus,
661 					pmbox->un.varWords[0],
662 					phba->hba_state);
663 				pmbox->mbxStatus = 0;
664 				pmbox->mbxOwner = OWN_HOST;
665 				spin_lock_irq(phba->host->host_lock);
666 				phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
667 				spin_unlock_irq(phba->host->host_lock);
668 				rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
669 				if (rc == MBX_SUCCESS)
670 					return (0);
671 			}
672 		}
673 
674 		/* Mailbox cmd <cmd> Cmpl <cmpl> */
675 		lpfc_printf_log(phba,
676 				KERN_INFO,
677 				LOG_MBOX | LOG_SLI,
678 				"%d:0307 Mailbox cmd x%x Cmpl x%p "
679 				"Data: x%x x%x x%x x%x x%x x%x x%x x%x x%x\n",
680 				phba->brd_no,
681 				pmbox->mbxCommand,
682 				pmb->mbox_cmpl,
683 				*((uint32_t *) pmbox),
684 				pmbox->un.varWords[0],
685 				pmbox->un.varWords[1],
686 				pmbox->un.varWords[2],
687 				pmbox->un.varWords[3],
688 				pmbox->un.varWords[4],
689 				pmbox->un.varWords[5],
690 				pmbox->un.varWords[6],
691 				pmbox->un.varWords[7]);
692 
693 		if (pmb->mbox_cmpl) {
694 			lpfc_sli_pcimem_bcopy(mbox, pmbox, MAILBOX_CMD_SIZE);
695 			pmb->mbox_cmpl(phba,pmb);
696 		}
697 	}
698 
699 
700 	do {
701 		process_next = 0;	/* by default don't loop */
702 		spin_lock_irq(phba->host->host_lock);
703 		phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
704 
705 		/* Process next mailbox command if there is one */
706 		if ((pmb = lpfc_mbox_get(phba))) {
707 			spin_unlock_irq(phba->host->host_lock);
708 			rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
709 			if (rc == MBX_NOT_FINISHED) {
710 				pmb->mb.mbxStatus = MBX_NOT_FINISHED;
711 				pmb->mbox_cmpl(phba,pmb);
712 				process_next = 1;
713 				continue;	/* loop back */
714 			}
715 		} else {
716 			spin_unlock_irq(phba->host->host_lock);
717 			/* Turn on IOCB processing */
718 			for (i = 0; i < phba->sli.num_rings; i++)
719 				lpfc_sli_turn_on_ring(phba, i);
720 		}
721 
722 	} while (process_next);
723 
724 	return (0);
725 }
726 static int
727 lpfc_sli_process_unsol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
728 			    struct lpfc_iocbq *saveq)
729 {
730 	IOCB_t           * irsp;
731 	WORD5            * w5p;
732 	uint32_t           Rctl, Type;
733 	uint32_t           match, i;
734 
735 	match = 0;
736 	irsp = &(saveq->iocb);
737 	if ((irsp->ulpCommand == CMD_RCV_ELS_REQ64_CX)
738 	    || (irsp->ulpCommand == CMD_RCV_ELS_REQ_CX)) {
739 		Rctl = FC_ELS_REQ;
740 		Type = FC_ELS_DATA;
741 	} else {
742 		w5p =
743 		    (WORD5 *) & (saveq->iocb.un.
744 				 ulpWord[5]);
745 		Rctl = w5p->hcsw.Rctl;
746 		Type = w5p->hcsw.Type;
747 
748 		/* Firmware Workaround */
749 		if ((Rctl == 0) && (pring->ringno == LPFC_ELS_RING) &&
750 			(irsp->ulpCommand == CMD_RCV_SEQUENCE64_CX)) {
751 			Rctl = FC_ELS_REQ;
752 			Type = FC_ELS_DATA;
753 			w5p->hcsw.Rctl = Rctl;
754 			w5p->hcsw.Type = Type;
755 		}
756 	}
757 	/* unSolicited Responses */
758 	if (pring->prt[0].profile) {
759 		if (pring->prt[0].lpfc_sli_rcv_unsol_event)
760 			(pring->prt[0].lpfc_sli_rcv_unsol_event) (phba, pring,
761 									saveq);
762 		match = 1;
763 	} else {
764 		/* We must search, based on rctl / type
765 		   for the right routine */
766 		for (i = 0; i < pring->num_mask;
767 		     i++) {
768 			if ((pring->prt[i].rctl ==
769 			     Rctl)
770 			    && (pring->prt[i].
771 				type == Type)) {
772 				if (pring->prt[i].lpfc_sli_rcv_unsol_event)
773 					(pring->prt[i].lpfc_sli_rcv_unsol_event)
774 							(phba, pring, saveq);
775 				match = 1;
776 				break;
777 			}
778 		}
779 	}
780 	if (match == 0) {
781 		/* Unexpected Rctl / Type received */
782 		/* Ring <ringno> handler: unexpected
783 		   Rctl <Rctl> Type <Type> received */
784 		lpfc_printf_log(phba,
785 				KERN_WARNING,
786 				LOG_SLI,
787 				"%d:0313 Ring %d handler: unexpected Rctl x%x "
788 				"Type x%x received \n",
789 				phba->brd_no,
790 				pring->ringno,
791 				Rctl,
792 				Type);
793 	}
794 	return(1);
795 }
796 
797 static struct lpfc_iocbq *
798 lpfc_sli_iocbq_lookup(struct lpfc_hba * phba,
799 		      struct lpfc_sli_ring * pring,
800 		      struct lpfc_iocbq * prspiocb)
801 {
802 	struct lpfc_iocbq *cmd_iocb = NULL;
803 	uint16_t iotag;
804 
805 	iotag = prspiocb->iocb.ulpIoTag;
806 
807 	if (iotag != 0 && iotag <= phba->sli.last_iotag) {
808 		cmd_iocb = phba->sli.iocbq_lookup[iotag];
809 		list_del(&cmd_iocb->list);
810 		pring->txcmplq_cnt--;
811 		return cmd_iocb;
812 	}
813 
814 	lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
815 			"%d:0317 iotag x%x is out off "
816 			"range: max iotag x%x wd0 x%x\n",
817 			phba->brd_no, iotag,
818 			phba->sli.last_iotag,
819 			*(((uint32_t *) &prspiocb->iocb) + 7));
820 	return NULL;
821 }
822 
823 static int
824 lpfc_sli_process_sol_iocb(struct lpfc_hba * phba, struct lpfc_sli_ring * pring,
825 			  struct lpfc_iocbq *saveq)
826 {
827 	struct lpfc_iocbq * cmdiocbp;
828 	int rc = 1;
829 	unsigned long iflag;
830 
831 	/* Based on the iotag field, get the cmd IOCB from the txcmplq */
832 	spin_lock_irqsave(phba->host->host_lock, iflag);
833 	cmdiocbp = lpfc_sli_iocbq_lookup(phba, pring, saveq);
834 	if (cmdiocbp) {
835 		if (cmdiocbp->iocb_cmpl) {
836 			/*
837 			 * Post all ELS completions to the worker thread.
838 			 * All other are passed to the completion callback.
839 			 */
840 			if (pring->ringno == LPFC_ELS_RING) {
841 				if (cmdiocbp->iocb_flag & LPFC_DRIVER_ABORTED) {
842 					cmdiocbp->iocb_flag &=
843 						~LPFC_DRIVER_ABORTED;
844 					saveq->iocb.ulpStatus =
845 						IOSTAT_LOCAL_REJECT;
846 					saveq->iocb.un.ulpWord[4] =
847 						IOERR_SLI_ABORTED;
848 				}
849 				spin_unlock_irqrestore(phba->host->host_lock,
850 						       iflag);
851 				(cmdiocbp->iocb_cmpl) (phba, cmdiocbp, saveq);
852 				spin_lock_irqsave(phba->host->host_lock, iflag);
853 			}
854 			else {
855 				spin_unlock_irqrestore(phba->host->host_lock,
856 						       iflag);
857 				(cmdiocbp->iocb_cmpl) (phba, cmdiocbp, saveq);
858 				spin_lock_irqsave(phba->host->host_lock, iflag);
859 			}
860 		} else
861 			lpfc_sli_release_iocbq(phba, cmdiocbp);
862 	} else {
863 		/*
864 		 * Unknown initiating command based on the response iotag.
865 		 * This could be the case on the ELS ring because of
866 		 * lpfc_els_abort().
867 		 */
868 		if (pring->ringno != LPFC_ELS_RING) {
869 			/*
870 			 * Ring <ringno> handler: unexpected completion IoTag
871 			 * <IoTag>
872 			 */
873 			lpfc_printf_log(phba,
874 				KERN_WARNING,
875 				LOG_SLI,
876 				"%d:0322 Ring %d handler: unexpected "
877 				"completion IoTag x%x Data: x%x x%x x%x x%x\n",
878 				phba->brd_no,
879 				pring->ringno,
880 				saveq->iocb.ulpIoTag,
881 				saveq->iocb.ulpStatus,
882 				saveq->iocb.un.ulpWord[4],
883 				saveq->iocb.ulpCommand,
884 				saveq->iocb.ulpContext);
885 		}
886 	}
887 
888 	spin_unlock_irqrestore(phba->host->host_lock, iflag);
889 	return rc;
890 }
891 
892 static void lpfc_sli_rsp_pointers_error(struct lpfc_hba * phba,
893 					struct lpfc_sli_ring * pring)
894 {
895 	struct lpfc_pgp *pgp = &phba->slim2p->mbx.us.s2.port[pring->ringno];
896 	/*
897 	 * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
898 	 * rsp ring <portRspMax>
899 	 */
900 	lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
901 			"%d:0312 Ring %d handler: portRspPut %d "
902 			"is bigger then rsp ring %d\n",
903 			phba->brd_no, pring->ringno,
904 			le32_to_cpu(pgp->rspPutInx),
905 			pring->numRiocb);
906 
907 	phba->hba_state = LPFC_HBA_ERROR;
908 
909 	/*
910 	 * All error attention handlers are posted to
911 	 * worker thread
912 	 */
913 	phba->work_ha |= HA_ERATT;
914 	phba->work_hs = HS_FFER3;
915 	if (phba->work_wait)
916 		wake_up(phba->work_wait);
917 
918 	return;
919 }
920 
921 void lpfc_sli_poll_fcp_ring(struct lpfc_hba * phba)
922 {
923 	struct lpfc_sli      * psli   = &phba->sli;
924 	struct lpfc_sli_ring * pring = &psli->ring[LPFC_FCP_RING];
925 	IOCB_t *irsp = NULL;
926 	IOCB_t *entry = NULL;
927 	struct lpfc_iocbq *cmdiocbq = NULL;
928 	struct lpfc_iocbq rspiocbq;
929 	struct lpfc_pgp *pgp;
930 	uint32_t status;
931 	uint32_t portRspPut, portRspMax;
932 	int type;
933 	uint32_t rsp_cmpl = 0;
934 	void __iomem *to_slim;
935 	uint32_t ha_copy;
936 
937 	pring->stats.iocb_event++;
938 
939 	/* The driver assumes SLI-2 mode */
940 	pgp =  &phba->slim2p->mbx.us.s2.port[pring->ringno];
941 
942 	/*
943 	 * The next available response entry should never exceed the maximum
944 	 * entries.  If it does, treat it as an adapter hardware error.
945 	 */
946 	portRspMax = pring->numRiocb;
947 	portRspPut = le32_to_cpu(pgp->rspPutInx);
948 	if (unlikely(portRspPut >= portRspMax)) {
949 		lpfc_sli_rsp_pointers_error(phba, pring);
950 		return;
951 	}
952 
953 	rmb();
954 	while (pring->rspidx != portRspPut) {
955 
956 		entry = IOCB_ENTRY(pring->rspringaddr, pring->rspidx);
957 
958 		if (++pring->rspidx >= portRspMax)
959 			pring->rspidx = 0;
960 
961 		lpfc_sli_pcimem_bcopy((uint32_t *) entry,
962 				      (uint32_t *) &rspiocbq.iocb,
963 				      sizeof (IOCB_t));
964 		irsp = &rspiocbq.iocb;
965 		type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
966 		pring->stats.iocb_rsp++;
967 		rsp_cmpl++;
968 
969 		if (unlikely(irsp->ulpStatus)) {
970 			/* Rsp ring <ringno> error: IOCB */
971 			lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
972 					"%d:0326 Rsp Ring %d error: IOCB Data: "
973 					"x%x x%x x%x x%x x%x x%x x%x x%x\n",
974 					phba->brd_no, pring->ringno,
975 					irsp->un.ulpWord[0],
976 					irsp->un.ulpWord[1],
977 					irsp->un.ulpWord[2],
978 					irsp->un.ulpWord[3],
979 					irsp->un.ulpWord[4],
980 					irsp->un.ulpWord[5],
981 					*(((uint32_t *) irsp) + 6),
982 					*(((uint32_t *) irsp) + 7));
983 		}
984 
985 		switch (type) {
986 		case LPFC_ABORT_IOCB:
987 		case LPFC_SOL_IOCB:
988 			/*
989 			 * Idle exchange closed via ABTS from port.  No iocb
990 			 * resources need to be recovered.
991 			 */
992 			if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
993 				lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
994 						"%d:0314 IOCB cmd 0x%x"
995 						" processed. Skipping"
996 						" completion", phba->brd_no,
997 						irsp->ulpCommand);
998 				break;
999 			}
1000 
1001 			cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
1002 							 &rspiocbq);
1003 			if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
1004 				(cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1005 						      &rspiocbq);
1006 			}
1007 			break;
1008 		default:
1009 			if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1010 				char adaptermsg[LPFC_MAX_ADPTMSG];
1011 				memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
1012 				memcpy(&adaptermsg[0], (uint8_t *) irsp,
1013 				       MAX_MSG_DATA);
1014 				dev_warn(&((phba->pcidev)->dev), "lpfc%d: %s",
1015 					 phba->brd_no, adaptermsg);
1016 			} else {
1017 				/* Unknown IOCB command */
1018 				lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1019 						"%d:0321 Unknown IOCB command "
1020 						"Data: x%x, x%x x%x x%x x%x\n",
1021 						phba->brd_no, type,
1022 						irsp->ulpCommand,
1023 						irsp->ulpStatus,
1024 						irsp->ulpIoTag,
1025 						irsp->ulpContext);
1026 			}
1027 			break;
1028 		}
1029 
1030 		/*
1031 		 * The response IOCB has been processed.  Update the ring
1032 		 * pointer in SLIM.  If the port response put pointer has not
1033 		 * been updated, sync the pgp->rspPutInx and fetch the new port
1034 		 * response put pointer.
1035 		 */
1036 		to_slim = phba->MBslimaddr +
1037 			(SLIMOFF + (pring->ringno * 2) + 1) * 4;
1038 		writeb(pring->rspidx, to_slim);
1039 
1040 		if (pring->rspidx == portRspPut)
1041 			portRspPut = le32_to_cpu(pgp->rspPutInx);
1042 	}
1043 
1044 	ha_copy = readl(phba->HAregaddr);
1045 	ha_copy >>= (LPFC_FCP_RING * 4);
1046 
1047 	if ((rsp_cmpl > 0) && (ha_copy & HA_R0RE_REQ)) {
1048 		pring->stats.iocb_rsp_full++;
1049 		status = ((CA_R0ATT | CA_R0RE_RSP) << (LPFC_FCP_RING * 4));
1050 		writel(status, phba->CAregaddr);
1051 		readl(phba->CAregaddr);
1052 	}
1053 	if ((ha_copy & HA_R0CE_RSP) &&
1054 	    (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1055 		pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1056 		pring->stats.iocb_cmd_empty++;
1057 
1058 		/* Force update of the local copy of cmdGetInx */
1059 		pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1060 		lpfc_sli_resume_iocb(phba, pring);
1061 
1062 		if ((pring->lpfc_sli_cmd_available))
1063 			(pring->lpfc_sli_cmd_available) (phba, pring);
1064 
1065 	}
1066 
1067 	return;
1068 }
1069 
1070 /*
1071  * This routine presumes LPFC_FCP_RING handling and doesn't bother
1072  * to check it explicitly.
1073  */
1074 static int
1075 lpfc_sli_handle_fast_ring_event(struct lpfc_hba * phba,
1076 				struct lpfc_sli_ring * pring, uint32_t mask)
1077 {
1078  	struct lpfc_pgp *pgp = &phba->slim2p->mbx.us.s2.port[pring->ringno];
1079 	IOCB_t *irsp = NULL;
1080 	IOCB_t *entry = NULL;
1081 	struct lpfc_iocbq *cmdiocbq = NULL;
1082 	struct lpfc_iocbq rspiocbq;
1083 	uint32_t status;
1084 	uint32_t portRspPut, portRspMax;
1085 	int rc = 1;
1086 	lpfc_iocb_type type;
1087 	unsigned long iflag;
1088 	uint32_t rsp_cmpl = 0;
1089 	void __iomem  *to_slim;
1090 
1091 	spin_lock_irqsave(phba->host->host_lock, iflag);
1092 	pring->stats.iocb_event++;
1093 
1094 	/*
1095 	 * The next available response entry should never exceed the maximum
1096 	 * entries.  If it does, treat it as an adapter hardware error.
1097 	 */
1098 	portRspMax = pring->numRiocb;
1099 	portRspPut = le32_to_cpu(pgp->rspPutInx);
1100 	if (unlikely(portRspPut >= portRspMax)) {
1101 		lpfc_sli_rsp_pointers_error(phba, pring);
1102 		spin_unlock_irqrestore(phba->host->host_lock, iflag);
1103 		return 1;
1104 	}
1105 
1106 	rmb();
1107 	while (pring->rspidx != portRspPut) {
1108 		/*
1109 		 * Fetch an entry off the ring and copy it into a local data
1110 		 * structure.  The copy involves a byte-swap since the
1111 		 * network byte order and pci byte orders are different.
1112 		 */
1113 		entry = IOCB_ENTRY(pring->rspringaddr, pring->rspidx);
1114 
1115 		if (++pring->rspidx >= portRspMax)
1116 			pring->rspidx = 0;
1117 
1118 		lpfc_sli_pcimem_bcopy((uint32_t *) entry,
1119 				      (uint32_t *) &rspiocbq.iocb,
1120 				      sizeof (IOCB_t));
1121 		INIT_LIST_HEAD(&(rspiocbq.list));
1122 		irsp = &rspiocbq.iocb;
1123 
1124 		type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
1125 		pring->stats.iocb_rsp++;
1126 		rsp_cmpl++;
1127 
1128 		if (unlikely(irsp->ulpStatus)) {
1129 			/* Rsp ring <ringno> error: IOCB */
1130 			lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1131 				"%d:0336 Rsp Ring %d error: IOCB Data: "
1132 				"x%x x%x x%x x%x x%x x%x x%x x%x\n",
1133 				phba->brd_no, pring->ringno,
1134 				irsp->un.ulpWord[0], irsp->un.ulpWord[1],
1135 				irsp->un.ulpWord[2], irsp->un.ulpWord[3],
1136 				irsp->un.ulpWord[4], irsp->un.ulpWord[5],
1137 				*(((uint32_t *) irsp) + 6),
1138 				*(((uint32_t *) irsp) + 7));
1139 		}
1140 
1141 		switch (type) {
1142 		case LPFC_ABORT_IOCB:
1143 		case LPFC_SOL_IOCB:
1144 			/*
1145 			 * Idle exchange closed via ABTS from port.  No iocb
1146 			 * resources need to be recovered.
1147 			 */
1148 			if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
1149 				lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1150 						"%d:0333 IOCB cmd 0x%x"
1151 						" processed. Skipping"
1152 						" completion\n", phba->brd_no,
1153 						irsp->ulpCommand);
1154 				break;
1155 			}
1156 
1157 			cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
1158 							 &rspiocbq);
1159 			if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
1160 				if (phba->cfg_poll & ENABLE_FCP_RING_POLLING) {
1161 					(cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1162 							      &rspiocbq);
1163 				} else {
1164 					spin_unlock_irqrestore(
1165 						phba->host->host_lock, iflag);
1166 					(cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1167 							      &rspiocbq);
1168 					spin_lock_irqsave(phba->host->host_lock,
1169 							  iflag);
1170 				}
1171 			}
1172 			break;
1173 		case LPFC_UNSOL_IOCB:
1174 			spin_unlock_irqrestore(phba->host->host_lock, iflag);
1175 			lpfc_sli_process_unsol_iocb(phba, pring, &rspiocbq);
1176 			spin_lock_irqsave(phba->host->host_lock, iflag);
1177 			break;
1178 		default:
1179 			if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1180 				char adaptermsg[LPFC_MAX_ADPTMSG];
1181 				memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
1182 				memcpy(&adaptermsg[0], (uint8_t *) irsp,
1183 				       MAX_MSG_DATA);
1184 				dev_warn(&((phba->pcidev)->dev), "lpfc%d: %s",
1185 					 phba->brd_no, adaptermsg);
1186 			} else {
1187 				/* Unknown IOCB command */
1188 				lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1189 					"%d:0334 Unknown IOCB command "
1190 					"Data: x%x, x%x x%x x%x x%x\n",
1191 					phba->brd_no, type, irsp->ulpCommand,
1192 					irsp->ulpStatus, irsp->ulpIoTag,
1193 					irsp->ulpContext);
1194 			}
1195 			break;
1196 		}
1197 
1198 		/*
1199 		 * The response IOCB has been processed.  Update the ring
1200 		 * pointer in SLIM.  If the port response put pointer has not
1201 		 * been updated, sync the pgp->rspPutInx and fetch the new port
1202 		 * response put pointer.
1203 		 */
1204 		to_slim = phba->MBslimaddr +
1205 			(SLIMOFF + (pring->ringno * 2) + 1) * 4;
1206 		writel(pring->rspidx, to_slim);
1207 
1208 		if (pring->rspidx == portRspPut)
1209 			portRspPut = le32_to_cpu(pgp->rspPutInx);
1210 	}
1211 
1212 	if ((rsp_cmpl > 0) && (mask & HA_R0RE_REQ)) {
1213 		pring->stats.iocb_rsp_full++;
1214 		status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
1215 		writel(status, phba->CAregaddr);
1216 		readl(phba->CAregaddr);
1217 	}
1218 	if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1219 		pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1220 		pring->stats.iocb_cmd_empty++;
1221 
1222 		/* Force update of the local copy of cmdGetInx */
1223 		pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1224 		lpfc_sli_resume_iocb(phba, pring);
1225 
1226 		if ((pring->lpfc_sli_cmd_available))
1227 			(pring->lpfc_sli_cmd_available) (phba, pring);
1228 
1229 	}
1230 
1231 	spin_unlock_irqrestore(phba->host->host_lock, iflag);
1232 	return rc;
1233 }
1234 
1235 
1236 int
1237 lpfc_sli_handle_slow_ring_event(struct lpfc_hba * phba,
1238 			   struct lpfc_sli_ring * pring, uint32_t mask)
1239 {
1240 	IOCB_t *entry;
1241 	IOCB_t *irsp = NULL;
1242 	struct lpfc_iocbq *rspiocbp = NULL;
1243 	struct lpfc_iocbq *next_iocb;
1244 	struct lpfc_iocbq *cmdiocbp;
1245 	struct lpfc_iocbq *saveq;
1246 	struct lpfc_pgp *pgp = &phba->slim2p->mbx.us.s2.port[pring->ringno];
1247 	uint8_t iocb_cmd_type;
1248 	lpfc_iocb_type type;
1249 	uint32_t status, free_saveq;
1250 	uint32_t portRspPut, portRspMax;
1251 	int rc = 1;
1252 	unsigned long iflag;
1253 	void __iomem  *to_slim;
1254 
1255 	spin_lock_irqsave(phba->host->host_lock, iflag);
1256 	pring->stats.iocb_event++;
1257 
1258 	/*
1259 	 * The next available response entry should never exceed the maximum
1260 	 * entries.  If it does, treat it as an adapter hardware error.
1261 	 */
1262 	portRspMax = pring->numRiocb;
1263 	portRspPut = le32_to_cpu(pgp->rspPutInx);
1264 	if (portRspPut >= portRspMax) {
1265 		/*
1266 		 * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
1267 		 * rsp ring <portRspMax>
1268 		 */
1269 		lpfc_printf_log(phba,
1270 				KERN_ERR,
1271 				LOG_SLI,
1272 				"%d:0303 Ring %d handler: portRspPut %d "
1273 				"is bigger then rsp ring %d\n",
1274 				phba->brd_no,
1275 				pring->ringno, portRspPut, portRspMax);
1276 
1277 		phba->hba_state = LPFC_HBA_ERROR;
1278 		spin_unlock_irqrestore(phba->host->host_lock, iflag);
1279 
1280 		phba->work_hs = HS_FFER3;
1281 		lpfc_handle_eratt(phba);
1282 
1283 		return 1;
1284 	}
1285 
1286 	rmb();
1287 	while (pring->rspidx != portRspPut) {
1288 		/*
1289 		 * Build a completion list and call the appropriate handler.
1290 		 * The process is to get the next available response iocb, get
1291 		 * a free iocb from the list, copy the response data into the
1292 		 * free iocb, insert to the continuation list, and update the
1293 		 * next response index to slim.  This process makes response
1294 		 * iocb's in the ring available to DMA as fast as possible but
1295 		 * pays a penalty for a copy operation.  Since the iocb is
1296 		 * only 32 bytes, this penalty is considered small relative to
1297 		 * the PCI reads for register values and a slim write.  When
1298 		 * the ulpLe field is set, the entire Command has been
1299 		 * received.
1300 		 */
1301 		entry = IOCB_ENTRY(pring->rspringaddr, pring->rspidx);
1302 		rspiocbp = lpfc_sli_get_iocbq(phba);
1303 		if (rspiocbp == NULL) {
1304 			printk(KERN_ERR "%s: out of buffers! Failing "
1305 			       "completion.\n", __FUNCTION__);
1306 			break;
1307 		}
1308 
1309 		lpfc_sli_pcimem_bcopy(entry, &rspiocbp->iocb, sizeof (IOCB_t));
1310 		irsp = &rspiocbp->iocb;
1311 
1312 		if (++pring->rspidx >= portRspMax)
1313 			pring->rspidx = 0;
1314 
1315 		to_slim = phba->MBslimaddr + (SLIMOFF + (pring->ringno * 2)
1316 					      + 1) * 4;
1317 		writel(pring->rspidx, to_slim);
1318 
1319 		if (list_empty(&(pring->iocb_continueq))) {
1320 			list_add(&rspiocbp->list, &(pring->iocb_continueq));
1321 		} else {
1322 			list_add_tail(&rspiocbp->list,
1323 				      &(pring->iocb_continueq));
1324 		}
1325 
1326 		pring->iocb_continueq_cnt++;
1327 		if (irsp->ulpLe) {
1328 			/*
1329 			 * By default, the driver expects to free all resources
1330 			 * associated with this iocb completion.
1331 			 */
1332 			free_saveq = 1;
1333 			saveq = list_get_first(&pring->iocb_continueq,
1334 					       struct lpfc_iocbq, list);
1335 			irsp = &(saveq->iocb);
1336 			list_del_init(&pring->iocb_continueq);
1337 			pring->iocb_continueq_cnt = 0;
1338 
1339 			pring->stats.iocb_rsp++;
1340 
1341 			if (irsp->ulpStatus) {
1342 				/* Rsp ring <ringno> error: IOCB */
1343 				lpfc_printf_log(phba,
1344 					KERN_WARNING,
1345 					LOG_SLI,
1346 					"%d:0328 Rsp Ring %d error: IOCB Data: "
1347 					"x%x x%x x%x x%x x%x x%x x%x x%x\n",
1348 					phba->brd_no,
1349 					pring->ringno,
1350 					irsp->un.ulpWord[0],
1351 					irsp->un.ulpWord[1],
1352 					irsp->un.ulpWord[2],
1353 					irsp->un.ulpWord[3],
1354 					irsp->un.ulpWord[4],
1355 					irsp->un.ulpWord[5],
1356 					*(((uint32_t *) irsp) + 6),
1357 					*(((uint32_t *) irsp) + 7));
1358 			}
1359 
1360 			/*
1361 			 * Fetch the IOCB command type and call the correct
1362 			 * completion routine.  Solicited and Unsolicited
1363 			 * IOCBs on the ELS ring get freed back to the
1364 			 * lpfc_iocb_list by the discovery kernel thread.
1365 			 */
1366 			iocb_cmd_type = irsp->ulpCommand & CMD_IOCB_MASK;
1367 			type = lpfc_sli_iocb_cmd_type(iocb_cmd_type);
1368 			if (type == LPFC_SOL_IOCB) {
1369 				spin_unlock_irqrestore(phba->host->host_lock,
1370 						       iflag);
1371 				rc = lpfc_sli_process_sol_iocb(phba, pring,
1372 					saveq);
1373 				spin_lock_irqsave(phba->host->host_lock, iflag);
1374 			} else if (type == LPFC_UNSOL_IOCB) {
1375 				spin_unlock_irqrestore(phba->host->host_lock,
1376 						       iflag);
1377 				rc = lpfc_sli_process_unsol_iocb(phba, pring,
1378 					saveq);
1379 				spin_lock_irqsave(phba->host->host_lock, iflag);
1380 			} else if (type == LPFC_ABORT_IOCB) {
1381 				if ((irsp->ulpCommand != CMD_XRI_ABORTED_CX) &&
1382 				    ((cmdiocbp =
1383 				      lpfc_sli_iocbq_lookup(phba, pring,
1384 							    saveq)))) {
1385 					/* Call the specified completion
1386 					   routine */
1387 					if (cmdiocbp->iocb_cmpl) {
1388 						spin_unlock_irqrestore(
1389 						       phba->host->host_lock,
1390 						       iflag);
1391 						(cmdiocbp->iocb_cmpl) (phba,
1392 							     cmdiocbp, saveq);
1393 						spin_lock_irqsave(
1394 							  phba->host->host_lock,
1395 							  iflag);
1396 					} else
1397 						lpfc_sli_release_iocbq(phba,
1398 								      cmdiocbp);
1399 				}
1400 			} else if (type == LPFC_UNKNOWN_IOCB) {
1401 				if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1402 
1403 					char adaptermsg[LPFC_MAX_ADPTMSG];
1404 
1405 					memset(adaptermsg, 0,
1406 					       LPFC_MAX_ADPTMSG);
1407 					memcpy(&adaptermsg[0], (uint8_t *) irsp,
1408 					       MAX_MSG_DATA);
1409 					dev_warn(&((phba->pcidev)->dev),
1410 						 "lpfc%d: %s",
1411 						 phba->brd_no, adaptermsg);
1412 				} else {
1413 					/* Unknown IOCB command */
1414 					lpfc_printf_log(phba,
1415 						KERN_ERR,
1416 						LOG_SLI,
1417 						"%d:0335 Unknown IOCB command "
1418 						"Data: x%x x%x x%x x%x\n",
1419 						phba->brd_no,
1420 						irsp->ulpCommand,
1421 						irsp->ulpStatus,
1422 						irsp->ulpIoTag,
1423 						irsp->ulpContext);
1424 				}
1425 			}
1426 
1427 			if (free_saveq) {
1428 				if (!list_empty(&saveq->list)) {
1429 					list_for_each_entry_safe(rspiocbp,
1430 								 next_iocb,
1431 								 &saveq->list,
1432 								 list) {
1433 						list_del(&rspiocbp->list);
1434 						lpfc_sli_release_iocbq(phba,
1435 								     rspiocbp);
1436 					}
1437 				}
1438 				lpfc_sli_release_iocbq(phba, saveq);
1439 			}
1440 		}
1441 
1442 		/*
1443 		 * If the port response put pointer has not been updated, sync
1444 		 * the pgp->rspPutInx in the MAILBOX_tand fetch the new port
1445 		 * response put pointer.
1446 		 */
1447 		if (pring->rspidx == portRspPut) {
1448 			portRspPut = le32_to_cpu(pgp->rspPutInx);
1449 		}
1450 	} /* while (pring->rspidx != portRspPut) */
1451 
1452 	if ((rspiocbp != 0) && (mask & HA_R0RE_REQ)) {
1453 		/* At least one response entry has been freed */
1454 		pring->stats.iocb_rsp_full++;
1455 		/* SET RxRE_RSP in Chip Att register */
1456 		status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
1457 		writel(status, phba->CAregaddr);
1458 		readl(phba->CAregaddr); /* flush */
1459 	}
1460 	if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1461 		pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1462 		pring->stats.iocb_cmd_empty++;
1463 
1464 		/* Force update of the local copy of cmdGetInx */
1465 		pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1466 		lpfc_sli_resume_iocb(phba, pring);
1467 
1468 		if ((pring->lpfc_sli_cmd_available))
1469 			(pring->lpfc_sli_cmd_available) (phba, pring);
1470 
1471 	}
1472 
1473 	spin_unlock_irqrestore(phba->host->host_lock, iflag);
1474 	return rc;
1475 }
1476 
1477 int
1478 lpfc_sli_abort_iocb_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1479 {
1480 	LIST_HEAD(completions);
1481 	struct lpfc_iocbq *iocb, *next_iocb;
1482 	IOCB_t *cmd = NULL;
1483 	int errcnt;
1484 
1485 	errcnt = 0;
1486 
1487 	/* Error everything on txq and txcmplq
1488 	 * First do the txq.
1489 	 */
1490 	spin_lock_irq(phba->host->host_lock);
1491 	list_splice_init(&pring->txq, &completions);
1492 	pring->txq_cnt = 0;
1493 
1494 	/* Next issue ABTS for everything on the txcmplq */
1495 	list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list)
1496 		lpfc_sli_issue_abort_iotag(phba, pring, iocb);
1497 
1498 	spin_unlock_irq(phba->host->host_lock);
1499 
1500 	while (!list_empty(&completions)) {
1501 		iocb = list_get_first(&completions, struct lpfc_iocbq, list);
1502 		cmd = &iocb->iocb;
1503 		list_del(&iocb->list);
1504 
1505 		if (iocb->iocb_cmpl) {
1506 			cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
1507 			cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
1508 			(iocb->iocb_cmpl) (phba, iocb, iocb);
1509 		} else
1510 			lpfc_sli_release_iocbq(phba, iocb);
1511 	}
1512 
1513 	return errcnt;
1514 }
1515 
1516 int
1517 lpfc_sli_brdready(struct lpfc_hba * phba, uint32_t mask)
1518 {
1519 	uint32_t status;
1520 	int i = 0;
1521 	int retval = 0;
1522 
1523 	/* Read the HBA Host Status Register */
1524 	status = readl(phba->HSregaddr);
1525 
1526 	/*
1527 	 * Check status register every 100ms for 5 retries, then every
1528 	 * 500ms for 5, then every 2.5 sec for 5, then reset board and
1529 	 * every 2.5 sec for 4.
1530 	 * Break our of the loop if errors occurred during init.
1531 	 */
1532 	while (((status & mask) != mask) &&
1533 	       !(status & HS_FFERM) &&
1534 	       i++ < 20) {
1535 
1536 		if (i <= 5)
1537 			msleep(10);
1538 		else if (i <= 10)
1539 			msleep(500);
1540 		else
1541 			msleep(2500);
1542 
1543 		if (i == 15) {
1544 			phba->hba_state = LPFC_STATE_UNKNOWN; /* Do post */
1545 			lpfc_sli_brdrestart(phba);
1546 		}
1547 		/* Read the HBA Host Status Register */
1548 		status = readl(phba->HSregaddr);
1549 	}
1550 
1551 	/* Check to see if any errors occurred during init */
1552 	if ((status & HS_FFERM) || (i >= 20)) {
1553 		phba->hba_state = LPFC_HBA_ERROR;
1554 		retval = 1;
1555 	}
1556 
1557 	return retval;
1558 }
1559 
1560 #define BARRIER_TEST_PATTERN (0xdeadbeef)
1561 
1562 void lpfc_reset_barrier(struct lpfc_hba * phba)
1563 {
1564 	uint32_t __iomem *resp_buf;
1565 	uint32_t __iomem *mbox_buf;
1566 	volatile uint32_t mbox;
1567 	uint32_t hc_copy;
1568 	int  i;
1569 	uint8_t hdrtype;
1570 
1571 	pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
1572 	if (hdrtype != 0x80 ||
1573 	    (FC_JEDEC_ID(phba->vpd.rev.biuRev) != HELIOS_JEDEC_ID &&
1574 	     FC_JEDEC_ID(phba->vpd.rev.biuRev) != THOR_JEDEC_ID))
1575 		return;
1576 
1577 	/*
1578 	 * Tell the other part of the chip to suspend temporarily all
1579 	 * its DMA activity.
1580 	 */
1581 	resp_buf = phba->MBslimaddr;
1582 
1583 	/* Disable the error attention */
1584 	hc_copy = readl(phba->HCregaddr);
1585 	writel((hc_copy & ~HC_ERINT_ENA), phba->HCregaddr);
1586 	readl(phba->HCregaddr); /* flush */
1587 	phba->fc_flag |= FC_IGNORE_ERATT;
1588 
1589 	if (readl(phba->HAregaddr) & HA_ERATT) {
1590 		/* Clear Chip error bit */
1591 		writel(HA_ERATT, phba->HAregaddr);
1592 		phba->stopped = 1;
1593 	}
1594 
1595 	mbox = 0;
1596 	((MAILBOX_t *)&mbox)->mbxCommand = MBX_KILL_BOARD;
1597 	((MAILBOX_t *)&mbox)->mbxOwner = OWN_CHIP;
1598 
1599 	writel(BARRIER_TEST_PATTERN, (resp_buf + 1));
1600 	mbox_buf = phba->MBslimaddr;
1601 	writel(mbox, mbox_buf);
1602 
1603 	for (i = 0;
1604 	     readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN) && i < 50; i++)
1605 		mdelay(1);
1606 
1607 	if (readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN)) {
1608 		if (phba->sli.sli_flag & LPFC_SLI2_ACTIVE ||
1609 		    phba->stopped)
1610 			goto restore_hc;
1611 		else
1612 			goto clear_errat;
1613 	}
1614 
1615 	((MAILBOX_t *)&mbox)->mbxOwner = OWN_HOST;
1616 	for (i = 0; readl(resp_buf) != mbox &&  i < 500; i++)
1617 		mdelay(1);
1618 
1619 clear_errat:
1620 
1621 	while (!(readl(phba->HAregaddr) & HA_ERATT) && ++i < 500)
1622 		mdelay(1);
1623 
1624 	if (readl(phba->HAregaddr) & HA_ERATT) {
1625 		writel(HA_ERATT, phba->HAregaddr);
1626 		phba->stopped = 1;
1627 	}
1628 
1629 restore_hc:
1630 	phba->fc_flag &= ~FC_IGNORE_ERATT;
1631 	writel(hc_copy, phba->HCregaddr);
1632 	readl(phba->HCregaddr); /* flush */
1633 }
1634 
1635 int
1636 lpfc_sli_brdkill(struct lpfc_hba * phba)
1637 {
1638 	struct lpfc_sli *psli;
1639 	LPFC_MBOXQ_t *pmb;
1640 	uint32_t status;
1641 	uint32_t ha_copy;
1642 	int retval;
1643 	int i = 0;
1644 
1645 	psli = &phba->sli;
1646 
1647 	/* Kill HBA */
1648 	lpfc_printf_log(phba,
1649 		KERN_INFO,
1650 		LOG_SLI,
1651 		"%d:0329 Kill HBA Data: x%x x%x\n",
1652 		phba->brd_no,
1653 		phba->hba_state,
1654 		psli->sli_flag);
1655 
1656 	if ((pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool,
1657 						  GFP_KERNEL)) == 0)
1658 		return 1;
1659 
1660 	/* Disable the error attention */
1661 	spin_lock_irq(phba->host->host_lock);
1662 	status = readl(phba->HCregaddr);
1663 	status &= ~HC_ERINT_ENA;
1664 	writel(status, phba->HCregaddr);
1665 	readl(phba->HCregaddr); /* flush */
1666 	phba->fc_flag |= FC_IGNORE_ERATT;
1667 	spin_unlock_irq(phba->host->host_lock);
1668 
1669 	lpfc_kill_board(phba, pmb);
1670 	pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
1671 	retval = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
1672 
1673 	if (retval != MBX_SUCCESS) {
1674 		if (retval != MBX_BUSY)
1675 			mempool_free(pmb, phba->mbox_mem_pool);
1676 		spin_lock_irq(phba->host->host_lock);
1677 		phba->fc_flag &= ~FC_IGNORE_ERATT;
1678 		spin_unlock_irq(phba->host->host_lock);
1679 		return 1;
1680 	}
1681 
1682 	psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
1683 
1684 	mempool_free(pmb, phba->mbox_mem_pool);
1685 
1686 	/* There is no completion for a KILL_BOARD mbox cmd. Check for an error
1687 	 * attention every 100ms for 3 seconds. If we don't get ERATT after
1688 	 * 3 seconds we still set HBA_ERROR state because the status of the
1689 	 * board is now undefined.
1690 	 */
1691 	ha_copy = readl(phba->HAregaddr);
1692 
1693 	while ((i++ < 30) && !(ha_copy & HA_ERATT)) {
1694 		mdelay(100);
1695 		ha_copy = readl(phba->HAregaddr);
1696 	}
1697 
1698 	del_timer_sync(&psli->mbox_tmo);
1699 	if (ha_copy & HA_ERATT) {
1700 		writel(HA_ERATT, phba->HAregaddr);
1701 		phba->stopped = 1;
1702 	}
1703 	spin_lock_irq(phba->host->host_lock);
1704 	psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
1705 	phba->fc_flag &= ~FC_IGNORE_ERATT;
1706 	spin_unlock_irq(phba->host->host_lock);
1707 
1708 	psli->mbox_active = NULL;
1709 	lpfc_hba_down_post(phba);
1710 	phba->hba_state = LPFC_HBA_ERROR;
1711 
1712 	return (ha_copy & HA_ERATT ? 0 : 1);
1713 }
1714 
1715 int
1716 lpfc_sli_brdreset(struct lpfc_hba * phba)
1717 {
1718 	struct lpfc_sli *psli;
1719 	struct lpfc_sli_ring *pring;
1720 	uint16_t cfg_value;
1721 	int i;
1722 
1723 	psli = &phba->sli;
1724 
1725 	/* Reset HBA */
1726 	lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1727 			"%d:0325 Reset HBA Data: x%x x%x\n", phba->brd_no,
1728 			phba->hba_state, psli->sli_flag);
1729 
1730 	/* perform board reset */
1731 	phba->fc_eventTag = 0;
1732 	phba->fc_myDID = 0;
1733 	phba->fc_prevDID = 0;
1734 
1735 	/* Turn off parity checking and serr during the physical reset */
1736 	pci_read_config_word(phba->pcidev, PCI_COMMAND, &cfg_value);
1737 	pci_write_config_word(phba->pcidev, PCI_COMMAND,
1738 			      (cfg_value &
1739 			       ~(PCI_COMMAND_PARITY | PCI_COMMAND_SERR)));
1740 
1741 	psli->sli_flag &= ~(LPFC_SLI2_ACTIVE | LPFC_PROCESS_LA);
1742 	/* Now toggle INITFF bit in the Host Control Register */
1743 	writel(HC_INITFF, phba->HCregaddr);
1744 	mdelay(1);
1745 	readl(phba->HCregaddr); /* flush */
1746 	writel(0, phba->HCregaddr);
1747 	readl(phba->HCregaddr); /* flush */
1748 
1749 	/* Restore PCI cmd register */
1750 	pci_write_config_word(phba->pcidev, PCI_COMMAND, cfg_value);
1751 
1752 	/* Initialize relevant SLI info */
1753 	for (i = 0; i < psli->num_rings; i++) {
1754 		pring = &psli->ring[i];
1755 		pring->flag = 0;
1756 		pring->rspidx = 0;
1757 		pring->next_cmdidx  = 0;
1758 		pring->local_getidx = 0;
1759 		pring->cmdidx = 0;
1760 		pring->missbufcnt = 0;
1761 	}
1762 
1763 	phba->hba_state = LPFC_WARM_START;
1764 	return 0;
1765 }
1766 
1767 int
1768 lpfc_sli_brdrestart(struct lpfc_hba * phba)
1769 {
1770 	MAILBOX_t *mb;
1771 	struct lpfc_sli *psli;
1772 	uint16_t skip_post;
1773 	volatile uint32_t word0;
1774 	void __iomem *to_slim;
1775 
1776 	spin_lock_irq(phba->host->host_lock);
1777 
1778 	psli = &phba->sli;
1779 
1780 	/* Restart HBA */
1781 	lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1782 			"%d:0337 Restart HBA Data: x%x x%x\n", phba->brd_no,
1783 			phba->hba_state, psli->sli_flag);
1784 
1785 	word0 = 0;
1786 	mb = (MAILBOX_t *) &word0;
1787 	mb->mbxCommand = MBX_RESTART;
1788 	mb->mbxHc = 1;
1789 
1790 	lpfc_reset_barrier(phba);
1791 
1792 	to_slim = phba->MBslimaddr;
1793 	writel(*(uint32_t *) mb, to_slim);
1794 	readl(to_slim); /* flush */
1795 
1796 	/* Only skip post after fc_ffinit is completed */
1797 	if (phba->hba_state) {
1798 		skip_post = 1;
1799 		word0 = 1;	/* This is really setting up word1 */
1800 	} else {
1801 		skip_post = 0;
1802 		word0 = 0;	/* This is really setting up word1 */
1803 	}
1804 	to_slim = phba->MBslimaddr + sizeof (uint32_t);
1805 	writel(*(uint32_t *) mb, to_slim);
1806 	readl(to_slim); /* flush */
1807 
1808 	lpfc_sli_brdreset(phba);
1809 	phba->stopped = 0;
1810 	phba->hba_state = LPFC_INIT_START;
1811 
1812 	spin_unlock_irq(phba->host->host_lock);
1813 
1814 	memset(&psli->lnk_stat_offsets, 0, sizeof(psli->lnk_stat_offsets));
1815 	psli->stats_start = get_seconds();
1816 
1817 	if (skip_post)
1818 		mdelay(100);
1819 	else
1820 		mdelay(2000);
1821 
1822 	lpfc_hba_down_post(phba);
1823 
1824 	return 0;
1825 }
1826 
1827 static int
1828 lpfc_sli_chipset_init(struct lpfc_hba *phba)
1829 {
1830 	uint32_t status, i = 0;
1831 
1832 	/* Read the HBA Host Status Register */
1833 	status = readl(phba->HSregaddr);
1834 
1835 	/* Check status register to see what current state is */
1836 	i = 0;
1837 	while ((status & (HS_FFRDY | HS_MBRDY)) != (HS_FFRDY | HS_MBRDY)) {
1838 
1839 		/* Check every 100ms for 5 retries, then every 500ms for 5, then
1840 		 * every 2.5 sec for 5, then reset board and every 2.5 sec for
1841 		 * 4.
1842 		 */
1843 		if (i++ >= 20) {
1844 			/* Adapter failed to init, timeout, status reg
1845 			   <status> */
1846 			lpfc_printf_log(phba,
1847 					KERN_ERR,
1848 					LOG_INIT,
1849 					"%d:0436 Adapter failed to init, "
1850 					"timeout, status reg x%x\n",
1851 					phba->brd_no,
1852 					status);
1853 			phba->hba_state = LPFC_HBA_ERROR;
1854 			return -ETIMEDOUT;
1855 		}
1856 
1857 		/* Check to see if any errors occurred during init */
1858 		if (status & HS_FFERM) {
1859 			/* ERROR: During chipset initialization */
1860 			/* Adapter failed to init, chipset, status reg
1861 			   <status> */
1862 			lpfc_printf_log(phba,
1863 					KERN_ERR,
1864 					LOG_INIT,
1865 					"%d:0437 Adapter failed to init, "
1866 					"chipset, status reg x%x\n",
1867 					phba->brd_no,
1868 					status);
1869 			phba->hba_state = LPFC_HBA_ERROR;
1870 			return -EIO;
1871 		}
1872 
1873 		if (i <= 5) {
1874 			msleep(10);
1875 		} else if (i <= 10) {
1876 			msleep(500);
1877 		} else {
1878 			msleep(2500);
1879 		}
1880 
1881 		if (i == 15) {
1882 			phba->hba_state = LPFC_STATE_UNKNOWN; /* Do post */
1883 			lpfc_sli_brdrestart(phba);
1884 		}
1885 		/* Read the HBA Host Status Register */
1886 		status = readl(phba->HSregaddr);
1887 	}
1888 
1889 	/* Check to see if any errors occurred during init */
1890 	if (status & HS_FFERM) {
1891 		/* ERROR: During chipset initialization */
1892 		/* Adapter failed to init, chipset, status reg <status> */
1893 		lpfc_printf_log(phba,
1894 				KERN_ERR,
1895 				LOG_INIT,
1896 				"%d:0438 Adapter failed to init, chipset, "
1897 				"status reg x%x\n",
1898 				phba->brd_no,
1899 				status);
1900 		phba->hba_state = LPFC_HBA_ERROR;
1901 		return -EIO;
1902 	}
1903 
1904 	/* Clear all interrupt enable conditions */
1905 	writel(0, phba->HCregaddr);
1906 	readl(phba->HCregaddr); /* flush */
1907 
1908 	/* setup host attn register */
1909 	writel(0xffffffff, phba->HAregaddr);
1910 	readl(phba->HAregaddr); /* flush */
1911 	return 0;
1912 }
1913 
1914 int
1915 lpfc_sli_hba_setup(struct lpfc_hba * phba)
1916 {
1917 	LPFC_MBOXQ_t *pmb;
1918 	uint32_t resetcount = 0, rc = 0, done = 0;
1919 
1920 	pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
1921 	if (!pmb) {
1922 		phba->hba_state = LPFC_HBA_ERROR;
1923 		return -ENOMEM;
1924 	}
1925 
1926 	while (resetcount < 2 && !done) {
1927 		spin_lock_irq(phba->host->host_lock);
1928 		phba->sli.sli_flag |= LPFC_SLI_MBOX_ACTIVE;
1929 		spin_unlock_irq(phba->host->host_lock);
1930 		phba->hba_state = LPFC_STATE_UNKNOWN;
1931 		lpfc_sli_brdrestart(phba);
1932 		msleep(2500);
1933 		rc = lpfc_sli_chipset_init(phba);
1934 		if (rc)
1935 			break;
1936 
1937 		spin_lock_irq(phba->host->host_lock);
1938 		phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
1939 		spin_unlock_irq(phba->host->host_lock);
1940 		resetcount++;
1941 
1942 	/* Call pre CONFIG_PORT mailbox command initialization.  A value of 0
1943 	 * means the call was successful.  Any other nonzero value is a failure,
1944 	 * but if ERESTART is returned, the driver may reset the HBA and try
1945 	 * again.
1946 	 */
1947 		rc = lpfc_config_port_prep(phba);
1948 		if (rc == -ERESTART) {
1949 			phba->hba_state = 0;
1950 			continue;
1951 		} else if (rc) {
1952 			break;
1953 		}
1954 
1955 		phba->hba_state = LPFC_INIT_MBX_CMDS;
1956 		lpfc_config_port(phba, pmb);
1957 		rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
1958 		if (rc == MBX_SUCCESS)
1959 			done = 1;
1960 		else {
1961 			lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
1962 				"%d:0442 Adapter failed to init, mbxCmd x%x "
1963 				"CONFIG_PORT, mbxStatus x%x Data: x%x\n",
1964 				phba->brd_no, pmb->mb.mbxCommand,
1965 				pmb->mb.mbxStatus, 0);
1966 			phba->sli.sli_flag &= ~LPFC_SLI2_ACTIVE;
1967 		}
1968 	}
1969 	if (!done)
1970 		goto lpfc_sli_hba_setup_error;
1971 
1972 	rc = lpfc_sli_ring_map(phba, pmb);
1973 
1974 	if (rc)
1975 		goto lpfc_sli_hba_setup_error;
1976 
1977 	phba->sli.sli_flag |= LPFC_PROCESS_LA;
1978 
1979 	rc = lpfc_config_port_post(phba);
1980 	if (rc)
1981 		goto lpfc_sli_hba_setup_error;
1982 
1983 	goto lpfc_sli_hba_setup_exit;
1984 lpfc_sli_hba_setup_error:
1985 	phba->hba_state = LPFC_HBA_ERROR;
1986 lpfc_sli_hba_setup_exit:
1987 	mempool_free(pmb, phba->mbox_mem_pool);
1988 	return rc;
1989 }
1990 
1991 /*! lpfc_mbox_timeout
1992  *
1993  * \pre
1994  * \post
1995  * \param hba Pointer to per struct lpfc_hba structure
1996  * \param l1  Pointer to the driver's mailbox queue.
1997  * \return
1998  *   void
1999  *
2000  * \b Description:
2001  *
2002  * This routine handles mailbox timeout events at timer interrupt context.
2003  */
2004 void
2005 lpfc_mbox_timeout(unsigned long ptr)
2006 {
2007 	struct lpfc_hba *phba;
2008 	unsigned long iflag;
2009 
2010 	phba = (struct lpfc_hba *)ptr;
2011 	spin_lock_irqsave(phba->host->host_lock, iflag);
2012 	if (!(phba->work_hba_events & WORKER_MBOX_TMO)) {
2013 		phba->work_hba_events |= WORKER_MBOX_TMO;
2014 		if (phba->work_wait)
2015 			wake_up(phba->work_wait);
2016 	}
2017 	spin_unlock_irqrestore(phba->host->host_lock, iflag);
2018 }
2019 
2020 void
2021 lpfc_mbox_timeout_handler(struct lpfc_hba *phba)
2022 {
2023 	LPFC_MBOXQ_t *pmbox;
2024 	MAILBOX_t *mb;
2025 	struct lpfc_sli *psli = &phba->sli;
2026 	struct lpfc_sli_ring *pring;
2027 
2028 	spin_lock_irq(phba->host->host_lock);
2029 	if (!(phba->work_hba_events & WORKER_MBOX_TMO)) {
2030 		spin_unlock_irq(phba->host->host_lock);
2031 		return;
2032 	}
2033 
2034 	pmbox = phba->sli.mbox_active;
2035 	mb = &pmbox->mb;
2036 
2037 	/* Mbox cmd <mbxCommand> timeout */
2038 	lpfc_printf_log(phba,
2039 		KERN_ERR,
2040 		LOG_MBOX | LOG_SLI,
2041 		"%d:0310 Mailbox command x%x timeout Data: x%x x%x x%p\n",
2042 		phba->brd_no,
2043 		mb->mbxCommand,
2044 		phba->hba_state,
2045 		phba->sli.sli_flag,
2046 		phba->sli.mbox_active);
2047 
2048 	/* Setting state unknown so lpfc_sli_abort_iocb_ring
2049 	 * would get IOCB_ERROR from lpfc_sli_issue_iocb, allowing
2050 	 * it to fail all oustanding SCSI IO.
2051 	 */
2052 	phba->hba_state = LPFC_STATE_UNKNOWN;
2053 	phba->work_hba_events &= ~WORKER_MBOX_TMO;
2054 	phba->fc_flag |= FC_ESTABLISH_LINK;
2055 	psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
2056 	spin_unlock_irq(phba->host->host_lock);
2057 
2058 	pring = &psli->ring[psli->fcp_ring];
2059 	lpfc_sli_abort_iocb_ring(phba, pring);
2060 
2061 	lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
2062 			"%d:0316 Resetting board due to mailbox timeout\n",
2063 			phba->brd_no);
2064 	/*
2065 	 * lpfc_offline calls lpfc_sli_hba_down which will clean up
2066 	 * on oustanding mailbox commands.
2067 	 */
2068 	lpfc_offline_prep(phba);
2069 	lpfc_offline(phba);
2070 	lpfc_sli_brdrestart(phba);
2071 	if (lpfc_online(phba) == 0)		/* Initialize the HBA */
2072 		mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
2073 	lpfc_unblock_mgmt_io(phba);
2074 	return;
2075 }
2076 
2077 int
2078 lpfc_sli_issue_mbox(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmbox, uint32_t flag)
2079 {
2080 	MAILBOX_t *mb;
2081 	struct lpfc_sli *psli;
2082 	uint32_t status, evtctr;
2083 	uint32_t ha_copy;
2084 	int i;
2085 	unsigned long drvr_flag = 0;
2086 	volatile uint32_t word0, ldata;
2087 	void __iomem *to_slim;
2088 
2089 	/* If the PCI channel is in offline state, do not post mbox. */
2090 	if (unlikely(pci_channel_offline(phba->pcidev)))
2091 		return MBX_NOT_FINISHED;
2092 
2093 	psli = &phba->sli;
2094 
2095 	spin_lock_irqsave(phba->host->host_lock, drvr_flag);
2096 
2097 
2098 	mb = &pmbox->mb;
2099 	status = MBX_SUCCESS;
2100 
2101 	if (phba->hba_state == LPFC_HBA_ERROR) {
2102 		spin_unlock_irqrestore(phba->host->host_lock, drvr_flag);
2103 
2104 		/* Mbox command <mbxCommand> cannot issue */
2105 		LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag)
2106 		return (MBX_NOT_FINISHED);
2107 	}
2108 
2109 	if (mb->mbxCommand != MBX_KILL_BOARD && flag & MBX_NOWAIT &&
2110 	    !(readl(phba->HCregaddr) & HC_MBINT_ENA)) {
2111 		spin_unlock_irqrestore(phba->host->host_lock, drvr_flag);
2112 		LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag)
2113 		return (MBX_NOT_FINISHED);
2114 	}
2115 
2116 	if (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE) {
2117 		/* Polling for a mbox command when another one is already active
2118 		 * is not allowed in SLI. Also, the driver must have established
2119 		 * SLI2 mode to queue and process multiple mbox commands.
2120 		 */
2121 
2122 		if (flag & MBX_POLL) {
2123 			spin_unlock_irqrestore(phba->host->host_lock,
2124 					       drvr_flag);
2125 
2126 			/* Mbox command <mbxCommand> cannot issue */
2127 			LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag)
2128 			return (MBX_NOT_FINISHED);
2129 		}
2130 
2131 		if (!(psli->sli_flag & LPFC_SLI2_ACTIVE)) {
2132 			spin_unlock_irqrestore(phba->host->host_lock,
2133 					       drvr_flag);
2134 			/* Mbox command <mbxCommand> cannot issue */
2135 			LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag)
2136 			return (MBX_NOT_FINISHED);
2137 		}
2138 
2139 		/* Handle STOP IOCB processing flag. This is only meaningful
2140 		 * if we are not polling for mbox completion.
2141 		 */
2142 		if (flag & MBX_STOP_IOCB) {
2143 			flag &= ~MBX_STOP_IOCB;
2144 			/* Now flag each ring */
2145 			for (i = 0; i < psli->num_rings; i++) {
2146 				/* If the ring is active, flag it */
2147 				if (psli->ring[i].cmdringaddr) {
2148 					psli->ring[i].flag |=
2149 					    LPFC_STOP_IOCB_MBX;
2150 				}
2151 			}
2152 		}
2153 
2154 		/* Another mailbox command is still being processed, queue this
2155 		 * command to be processed later.
2156 		 */
2157 		lpfc_mbox_put(phba, pmbox);
2158 
2159 		/* Mbox cmd issue - BUSY */
2160 		lpfc_printf_log(phba,
2161 			KERN_INFO,
2162 			LOG_MBOX | LOG_SLI,
2163 			"%d:0308 Mbox cmd issue - BUSY Data: x%x x%x x%x x%x\n",
2164 			phba->brd_no,
2165 			mb->mbxCommand,
2166 			phba->hba_state,
2167 			psli->sli_flag,
2168 			flag);
2169 
2170 		psli->slistat.mbox_busy++;
2171 		spin_unlock_irqrestore(phba->host->host_lock,
2172 				       drvr_flag);
2173 
2174 		return (MBX_BUSY);
2175 	}
2176 
2177 	/* Handle STOP IOCB processing flag. This is only meaningful
2178 	 * if we are not polling for mbox completion.
2179 	 */
2180 	if (flag & MBX_STOP_IOCB) {
2181 		flag &= ~MBX_STOP_IOCB;
2182 		if (flag == MBX_NOWAIT) {
2183 			/* Now flag each ring */
2184 			for (i = 0; i < psli->num_rings; i++) {
2185 				/* If the ring is active, flag it */
2186 				if (psli->ring[i].cmdringaddr) {
2187 					psli->ring[i].flag |=
2188 					    LPFC_STOP_IOCB_MBX;
2189 				}
2190 			}
2191 		}
2192 	}
2193 
2194 	psli->sli_flag |= LPFC_SLI_MBOX_ACTIVE;
2195 
2196 	/* If we are not polling, we MUST be in SLI2 mode */
2197 	if (flag != MBX_POLL) {
2198 		if (!(psli->sli_flag & LPFC_SLI2_ACTIVE) &&
2199 		    (mb->mbxCommand != MBX_KILL_BOARD)) {
2200 			psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2201 			spin_unlock_irqrestore(phba->host->host_lock,
2202 					       drvr_flag);
2203 			/* Mbox command <mbxCommand> cannot issue */
2204 			LOG_MBOX_CANNOT_ISSUE_DATA( phba, mb, psli, flag);
2205 			return (MBX_NOT_FINISHED);
2206 		}
2207 		/* timeout active mbox command */
2208 		mod_timer(&psli->mbox_tmo, (jiffies +
2209 			       (HZ * lpfc_mbox_tmo_val(phba, mb->mbxCommand))));
2210 	}
2211 
2212 	/* Mailbox cmd <cmd> issue */
2213 	lpfc_printf_log(phba,
2214 		KERN_INFO,
2215 		LOG_MBOX | LOG_SLI,
2216 		"%d:0309 Mailbox cmd x%x issue Data: x%x x%x x%x\n",
2217 		phba->brd_no,
2218 		mb->mbxCommand,
2219 		phba->hba_state,
2220 		psli->sli_flag,
2221 		flag);
2222 
2223 	psli->slistat.mbox_cmd++;
2224 	evtctr = psli->slistat.mbox_event;
2225 
2226 	/* next set own bit for the adapter and copy over command word */
2227 	mb->mbxOwner = OWN_CHIP;
2228 
2229 	if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2230 		/* First copy command data to host SLIM area */
2231 		lpfc_sli_pcimem_bcopy(mb, &phba->slim2p->mbx, MAILBOX_CMD_SIZE);
2232 	} else {
2233 		if (mb->mbxCommand == MBX_CONFIG_PORT) {
2234 			/* copy command data into host mbox for cmpl */
2235 			lpfc_sli_pcimem_bcopy(mb, &phba->slim2p->mbx,
2236 					MAILBOX_CMD_SIZE);
2237 		}
2238 
2239 		/* First copy mbox command data to HBA SLIM, skip past first
2240 		   word */
2241 		to_slim = phba->MBslimaddr + sizeof (uint32_t);
2242 		lpfc_memcpy_to_slim(to_slim, &mb->un.varWords[0],
2243 			    MAILBOX_CMD_SIZE - sizeof (uint32_t));
2244 
2245 		/* Next copy over first word, with mbxOwner set */
2246 		ldata = *((volatile uint32_t *)mb);
2247 		to_slim = phba->MBslimaddr;
2248 		writel(ldata, to_slim);
2249 		readl(to_slim); /* flush */
2250 
2251 		if (mb->mbxCommand == MBX_CONFIG_PORT) {
2252 			/* switch over to host mailbox */
2253 			psli->sli_flag |= LPFC_SLI2_ACTIVE;
2254 		}
2255 	}
2256 
2257 	wmb();
2258 	/* interrupt board to doit right away */
2259 	writel(CA_MBATT, phba->CAregaddr);
2260 	readl(phba->CAregaddr); /* flush */
2261 
2262 	switch (flag) {
2263 	case MBX_NOWAIT:
2264 		/* Don't wait for it to finish, just return */
2265 		psli->mbox_active = pmbox;
2266 		break;
2267 
2268 	case MBX_POLL:
2269 		psli->mbox_active = NULL;
2270 		if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2271 			/* First read mbox status word */
2272 			word0 = *((volatile uint32_t *)&phba->slim2p->mbx);
2273 			word0 = le32_to_cpu(word0);
2274 		} else {
2275 			/* First read mbox status word */
2276 			word0 = readl(phba->MBslimaddr);
2277 		}
2278 
2279 		/* Read the HBA Host Attention Register */
2280 		ha_copy = readl(phba->HAregaddr);
2281 
2282 		i = lpfc_mbox_tmo_val(phba, mb->mbxCommand);
2283 		i *= 1000; /* Convert to ms */
2284 
2285 		/* Wait for command to complete */
2286 		while (((word0 & OWN_CHIP) == OWN_CHIP) ||
2287 		       (!(ha_copy & HA_MBATT) &&
2288 			(phba->hba_state > LPFC_WARM_START))) {
2289 			if (i-- <= 0) {
2290 				psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2291 				spin_unlock_irqrestore(phba->host->host_lock,
2292 						       drvr_flag);
2293 				return (MBX_NOT_FINISHED);
2294 			}
2295 
2296 			/* Check if we took a mbox interrupt while we were
2297 			   polling */
2298 			if (((word0 & OWN_CHIP) != OWN_CHIP)
2299 			    && (evtctr != psli->slistat.mbox_event))
2300 				break;
2301 
2302 			spin_unlock_irqrestore(phba->host->host_lock,
2303 					       drvr_flag);
2304 
2305 			msleep(1);
2306 
2307 			spin_lock_irqsave(phba->host->host_lock, drvr_flag);
2308 
2309 			if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2310 				/* First copy command data */
2311 				word0 = *((volatile uint32_t *)
2312 						&phba->slim2p->mbx);
2313 				word0 = le32_to_cpu(word0);
2314 				if (mb->mbxCommand == MBX_CONFIG_PORT) {
2315 					MAILBOX_t *slimmb;
2316 					volatile uint32_t slimword0;
2317 					/* Check real SLIM for any errors */
2318 					slimword0 = readl(phba->MBslimaddr);
2319 					slimmb = (MAILBOX_t *) & slimword0;
2320 					if (((slimword0 & OWN_CHIP) != OWN_CHIP)
2321 					    && slimmb->mbxStatus) {
2322 						psli->sli_flag &=
2323 						    ~LPFC_SLI2_ACTIVE;
2324 						word0 = slimword0;
2325 					}
2326 				}
2327 			} else {
2328 				/* First copy command data */
2329 				word0 = readl(phba->MBslimaddr);
2330 			}
2331 			/* Read the HBA Host Attention Register */
2332 			ha_copy = readl(phba->HAregaddr);
2333 		}
2334 
2335 		if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2336 			/* copy results back to user */
2337 			lpfc_sli_pcimem_bcopy(&phba->slim2p->mbx, mb,
2338 					MAILBOX_CMD_SIZE);
2339 		} else {
2340 			/* First copy command data */
2341 			lpfc_memcpy_from_slim(mb, phba->MBslimaddr,
2342 							MAILBOX_CMD_SIZE);
2343 			if ((mb->mbxCommand == MBX_DUMP_MEMORY) &&
2344 				pmbox->context2) {
2345 				lpfc_memcpy_from_slim((void *)pmbox->context2,
2346 				      phba->MBslimaddr + DMP_RSP_OFFSET,
2347 						      mb->un.varDmp.word_cnt);
2348 			}
2349 		}
2350 
2351 		writel(HA_MBATT, phba->HAregaddr);
2352 		readl(phba->HAregaddr); /* flush */
2353 
2354 		psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2355 		status = mb->mbxStatus;
2356 	}
2357 
2358 	spin_unlock_irqrestore(phba->host->host_lock, drvr_flag);
2359 	return (status);
2360 }
2361 
2362 static int
2363 lpfc_sli_ringtx_put(struct lpfc_hba * phba, struct lpfc_sli_ring * pring,
2364 		    struct lpfc_iocbq * piocb)
2365 {
2366 	/* Insert the caller's iocb in the txq tail for later processing. */
2367 	list_add_tail(&piocb->list, &pring->txq);
2368 	pring->txq_cnt++;
2369 	return (0);
2370 }
2371 
2372 static struct lpfc_iocbq *
2373 lpfc_sli_next_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2374 		   struct lpfc_iocbq ** piocb)
2375 {
2376 	struct lpfc_iocbq * nextiocb;
2377 
2378 	nextiocb = lpfc_sli_ringtx_get(phba, pring);
2379 	if (!nextiocb) {
2380 		nextiocb = *piocb;
2381 		*piocb = NULL;
2382 	}
2383 
2384 	return nextiocb;
2385 }
2386 
2387 int
2388 lpfc_sli_issue_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2389 		    struct lpfc_iocbq *piocb, uint32_t flag)
2390 {
2391 	struct lpfc_iocbq *nextiocb;
2392 	IOCB_t *iocb;
2393 
2394 	/* If the PCI channel is in offline state, do not post iocbs. */
2395 	if (unlikely(pci_channel_offline(phba->pcidev)))
2396 		return IOCB_ERROR;
2397 
2398 	/*
2399 	 * We should never get an IOCB if we are in a < LINK_DOWN state
2400 	 */
2401 	if (unlikely(phba->hba_state < LPFC_LINK_DOWN))
2402 		return IOCB_ERROR;
2403 
2404 	/*
2405 	 * Check to see if we are blocking IOCB processing because of a
2406 	 * outstanding mbox command.
2407 	 */
2408 	if (unlikely(pring->flag & LPFC_STOP_IOCB_MBX))
2409 		goto iocb_busy;
2410 
2411 	if (unlikely(phba->hba_state == LPFC_LINK_DOWN)) {
2412 		/*
2413 		 * Only CREATE_XRI, CLOSE_XRI, and QUE_RING_BUF
2414 		 * can be issued if the link is not up.
2415 		 */
2416 		switch (piocb->iocb.ulpCommand) {
2417 		case CMD_QUE_RING_BUF_CN:
2418 		case CMD_QUE_RING_BUF64_CN:
2419 			/*
2420 			 * For IOCBs, like QUE_RING_BUF, that have no rsp ring
2421 			 * completion, iocb_cmpl MUST be 0.
2422 			 */
2423 			if (piocb->iocb_cmpl)
2424 				piocb->iocb_cmpl = NULL;
2425 			/*FALLTHROUGH*/
2426 		case CMD_CREATE_XRI_CR:
2427 		case CMD_CLOSE_XRI_CN:
2428 		case CMD_CLOSE_XRI_CX:
2429 			break;
2430 		default:
2431 			goto iocb_busy;
2432 		}
2433 
2434 	/*
2435 	 * For FCP commands, we must be in a state where we can process link
2436 	 * attention events.
2437 	 */
2438 	} else if (unlikely(pring->ringno == phba->sli.fcp_ring &&
2439 		   !(phba->sli.sli_flag & LPFC_PROCESS_LA)))
2440 		goto iocb_busy;
2441 
2442 	while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
2443 	       (nextiocb = lpfc_sli_next_iocb(phba, pring, &piocb)))
2444 		lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
2445 
2446 	if (iocb)
2447 		lpfc_sli_update_ring(phba, pring);
2448 	else
2449 		lpfc_sli_update_full_ring(phba, pring);
2450 
2451 	if (!piocb)
2452 		return IOCB_SUCCESS;
2453 
2454 	goto out_busy;
2455 
2456  iocb_busy:
2457 	pring->stats.iocb_cmd_delay++;
2458 
2459  out_busy:
2460 
2461 	if (!(flag & SLI_IOCB_RET_IOCB)) {
2462 		lpfc_sli_ringtx_put(phba, pring, piocb);
2463 		return IOCB_SUCCESS;
2464 	}
2465 
2466 	return IOCB_BUSY;
2467 }
2468 
2469 static int
2470 lpfc_extra_ring_setup( struct lpfc_hba *phba)
2471 {
2472 	struct lpfc_sli *psli;
2473 	struct lpfc_sli_ring *pring;
2474 
2475 	psli = &phba->sli;
2476 
2477 	/* Adjust cmd/rsp ring iocb entries more evenly */
2478 
2479 	/* Take some away from the FCP ring */
2480 	pring = &psli->ring[psli->fcp_ring];
2481 	pring->numCiocb -= SLI2_IOCB_CMD_R1XTRA_ENTRIES;
2482 	pring->numRiocb -= SLI2_IOCB_RSP_R1XTRA_ENTRIES;
2483 	pring->numCiocb -= SLI2_IOCB_CMD_R3XTRA_ENTRIES;
2484 	pring->numRiocb -= SLI2_IOCB_RSP_R3XTRA_ENTRIES;
2485 
2486 	/* and give them to the extra ring */
2487 	pring = &psli->ring[psli->extra_ring];
2488 
2489 	pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
2490 	pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
2491 	pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
2492 	pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
2493 
2494 	/* Setup default profile for this ring */
2495 	pring->iotag_max = 4096;
2496 	pring->num_mask = 1;
2497 	pring->prt[0].profile = 0;      /* Mask 0 */
2498 	pring->prt[0].rctl = phba->cfg_multi_ring_rctl;
2499 	pring->prt[0].type = phba->cfg_multi_ring_type;
2500 	pring->prt[0].lpfc_sli_rcv_unsol_event = NULL;
2501 	return 0;
2502 }
2503 
2504 int
2505 lpfc_sli_setup(struct lpfc_hba *phba)
2506 {
2507 	int i, totiocb = 0;
2508 	struct lpfc_sli *psli = &phba->sli;
2509 	struct lpfc_sli_ring *pring;
2510 
2511 	psli->num_rings = MAX_CONFIGURED_RINGS;
2512 	psli->sli_flag = 0;
2513 	psli->fcp_ring = LPFC_FCP_RING;
2514 	psli->next_ring = LPFC_FCP_NEXT_RING;
2515 	psli->extra_ring = LPFC_EXTRA_RING;
2516 
2517 	psli->iocbq_lookup = NULL;
2518 	psli->iocbq_lookup_len = 0;
2519 	psli->last_iotag = 0;
2520 
2521 	for (i = 0; i < psli->num_rings; i++) {
2522 		pring = &psli->ring[i];
2523 		switch (i) {
2524 		case LPFC_FCP_RING:	/* ring 0 - FCP */
2525 			/* numCiocb and numRiocb are used in config_port */
2526 			pring->numCiocb = SLI2_IOCB_CMD_R0_ENTRIES;
2527 			pring->numRiocb = SLI2_IOCB_RSP_R0_ENTRIES;
2528 			pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
2529 			pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
2530 			pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
2531 			pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
2532 			pring->iotag_ctr = 0;
2533 			pring->iotag_max =
2534 			    (phba->cfg_hba_queue_depth * 2);
2535 			pring->fast_iotag = pring->iotag_max;
2536 			pring->num_mask = 0;
2537 			break;
2538 		case LPFC_EXTRA_RING:	/* ring 1 - EXTRA */
2539 			/* numCiocb and numRiocb are used in config_port */
2540 			pring->numCiocb = SLI2_IOCB_CMD_R1_ENTRIES;
2541 			pring->numRiocb = SLI2_IOCB_RSP_R1_ENTRIES;
2542 			pring->num_mask = 0;
2543 			break;
2544 		case LPFC_ELS_RING:	/* ring 2 - ELS / CT */
2545 			/* numCiocb and numRiocb are used in config_port */
2546 			pring->numCiocb = SLI2_IOCB_CMD_R2_ENTRIES;
2547 			pring->numRiocb = SLI2_IOCB_RSP_R2_ENTRIES;
2548 			pring->fast_iotag = 0;
2549 			pring->iotag_ctr = 0;
2550 			pring->iotag_max = 4096;
2551 			pring->num_mask = 4;
2552 			pring->prt[0].profile = 0;	/* Mask 0 */
2553 			pring->prt[0].rctl = FC_ELS_REQ;
2554 			pring->prt[0].type = FC_ELS_DATA;
2555 			pring->prt[0].lpfc_sli_rcv_unsol_event =
2556 			    lpfc_els_unsol_event;
2557 			pring->prt[1].profile = 0;	/* Mask 1 */
2558 			pring->prt[1].rctl = FC_ELS_RSP;
2559 			pring->prt[1].type = FC_ELS_DATA;
2560 			pring->prt[1].lpfc_sli_rcv_unsol_event =
2561 			    lpfc_els_unsol_event;
2562 			pring->prt[2].profile = 0;	/* Mask 2 */
2563 			/* NameServer Inquiry */
2564 			pring->prt[2].rctl = FC_UNSOL_CTL;
2565 			/* NameServer */
2566 			pring->prt[2].type = FC_COMMON_TRANSPORT_ULP;
2567 			pring->prt[2].lpfc_sli_rcv_unsol_event =
2568 			    lpfc_ct_unsol_event;
2569 			pring->prt[3].profile = 0;	/* Mask 3 */
2570 			/* NameServer response */
2571 			pring->prt[3].rctl = FC_SOL_CTL;
2572 			/* NameServer */
2573 			pring->prt[3].type = FC_COMMON_TRANSPORT_ULP;
2574 			pring->prt[3].lpfc_sli_rcv_unsol_event =
2575 			    lpfc_ct_unsol_event;
2576 			break;
2577 		}
2578 		totiocb += (pring->numCiocb + pring->numRiocb);
2579 	}
2580 	if (totiocb > MAX_SLI2_IOCB) {
2581 		/* Too many cmd / rsp ring entries in SLI2 SLIM */
2582 		lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2583 				"%d:0462 Too many cmd / rsp ring entries in "
2584 				"SLI2 SLIM Data: x%x x%x\n",
2585 				phba->brd_no, totiocb, MAX_SLI2_IOCB);
2586 	}
2587 	if (phba->cfg_multi_ring_support == 2)
2588 		lpfc_extra_ring_setup(phba);
2589 
2590 	return 0;
2591 }
2592 
2593 int
2594 lpfc_sli_queue_setup(struct lpfc_hba * phba)
2595 {
2596 	struct lpfc_sli *psli;
2597 	struct lpfc_sli_ring *pring;
2598 	int i;
2599 
2600 	psli = &phba->sli;
2601 	spin_lock_irq(phba->host->host_lock);
2602 	INIT_LIST_HEAD(&psli->mboxq);
2603 	/* Initialize list headers for txq and txcmplq as double linked lists */
2604 	for (i = 0; i < psli->num_rings; i++) {
2605 		pring = &psli->ring[i];
2606 		pring->ringno = i;
2607 		pring->next_cmdidx  = 0;
2608 		pring->local_getidx = 0;
2609 		pring->cmdidx = 0;
2610 		INIT_LIST_HEAD(&pring->txq);
2611 		INIT_LIST_HEAD(&pring->txcmplq);
2612 		INIT_LIST_HEAD(&pring->iocb_continueq);
2613 		INIT_LIST_HEAD(&pring->postbufq);
2614 	}
2615 	spin_unlock_irq(phba->host->host_lock);
2616 	return (1);
2617 }
2618 
2619 int
2620 lpfc_sli_hba_down(struct lpfc_hba * phba)
2621 {
2622 	LIST_HEAD(completions);
2623 	struct lpfc_sli *psli;
2624 	struct lpfc_sli_ring *pring;
2625 	LPFC_MBOXQ_t *pmb;
2626 	struct lpfc_iocbq *iocb;
2627 	IOCB_t *cmd = NULL;
2628 	int i;
2629 	unsigned long flags = 0;
2630 
2631 	psli = &phba->sli;
2632 	lpfc_hba_down_prep(phba);
2633 
2634 	spin_lock_irqsave(phba->host->host_lock, flags);
2635 	for (i = 0; i < psli->num_rings; i++) {
2636 		pring = &psli->ring[i];
2637 		pring->flag |= LPFC_DEFERRED_RING_EVENT;
2638 
2639 		/*
2640 		 * Error everything on the txq since these iocbs have not been
2641 		 * given to the FW yet.
2642 		 */
2643 		list_splice_init(&pring->txq, &completions);
2644 		pring->txq_cnt = 0;
2645 
2646 	}
2647 	spin_unlock_irqrestore(phba->host->host_lock, flags);
2648 
2649 	while (!list_empty(&completions)) {
2650 		iocb = list_get_first(&completions, struct lpfc_iocbq, list);
2651 		cmd = &iocb->iocb;
2652 		list_del(&iocb->list);
2653 
2654 		if (iocb->iocb_cmpl) {
2655 			cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2656 			cmd->un.ulpWord[4] = IOERR_SLI_DOWN;
2657 			(iocb->iocb_cmpl) (phba, iocb, iocb);
2658 		} else
2659 			lpfc_sli_release_iocbq(phba, iocb);
2660 	}
2661 
2662 	/* Return any active mbox cmds */
2663 	del_timer_sync(&psli->mbox_tmo);
2664 	spin_lock_irqsave(phba->host->host_lock, flags);
2665 	phba->work_hba_events &= ~WORKER_MBOX_TMO;
2666 	if (psli->mbox_active) {
2667 		pmb = psli->mbox_active;
2668 		pmb->mb.mbxStatus = MBX_NOT_FINISHED;
2669 		if (pmb->mbox_cmpl) {
2670 			spin_unlock_irqrestore(phba->host->host_lock, flags);
2671 			pmb->mbox_cmpl(phba,pmb);
2672 			spin_lock_irqsave(phba->host->host_lock, flags);
2673 		}
2674 	}
2675 	psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2676 	psli->mbox_active = NULL;
2677 
2678 	/* Return any pending mbox cmds */
2679 	while ((pmb = lpfc_mbox_get(phba)) != NULL) {
2680 		pmb->mb.mbxStatus = MBX_NOT_FINISHED;
2681 		if (pmb->mbox_cmpl) {
2682 			spin_unlock_irqrestore(phba->host->host_lock, flags);
2683 			pmb->mbox_cmpl(phba,pmb);
2684 			spin_lock_irqsave(phba->host->host_lock, flags);
2685 		}
2686 	}
2687 
2688 	INIT_LIST_HEAD(&psli->mboxq);
2689 
2690 	spin_unlock_irqrestore(phba->host->host_lock, flags);
2691 
2692 	return 1;
2693 }
2694 
2695 void
2696 lpfc_sli_pcimem_bcopy(void *srcp, void *destp, uint32_t cnt)
2697 {
2698 	uint32_t *src = srcp;
2699 	uint32_t *dest = destp;
2700 	uint32_t ldata;
2701 	int i;
2702 
2703 	for (i = 0; i < (int)cnt; i += sizeof (uint32_t)) {
2704 		ldata = *src;
2705 		ldata = le32_to_cpu(ldata);
2706 		*dest = ldata;
2707 		src++;
2708 		dest++;
2709 	}
2710 }
2711 
2712 int
2713 lpfc_sli_ringpostbuf_put(struct lpfc_hba * phba, struct lpfc_sli_ring * pring,
2714 			 struct lpfc_dmabuf * mp)
2715 {
2716 	/* Stick struct lpfc_dmabuf at end of postbufq so driver can look it up
2717 	   later */
2718 	list_add_tail(&mp->list, &pring->postbufq);
2719 
2720 	pring->postbufq_cnt++;
2721 	return 0;
2722 }
2723 
2724 
2725 struct lpfc_dmabuf *
2726 lpfc_sli_ringpostbuf_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2727 			 dma_addr_t phys)
2728 {
2729 	struct lpfc_dmabuf *mp, *next_mp;
2730 	struct list_head *slp = &pring->postbufq;
2731 
2732 	/* Search postbufq, from the begining, looking for a match on phys */
2733 	list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
2734 		if (mp->phys == phys) {
2735 			list_del_init(&mp->list);
2736 			pring->postbufq_cnt--;
2737 			return mp;
2738 		}
2739 	}
2740 
2741 	lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2742 			"%d:0410 Cannot find virtual addr for mapped buf on "
2743 			"ring %d Data x%llx x%p x%p x%x\n",
2744 			phba->brd_no, pring->ringno, (unsigned long long)phys,
2745 			slp->next, slp->prev, pring->postbufq_cnt);
2746 	return NULL;
2747 }
2748 
2749 static void
2750 lpfc_sli_abort_els_cmpl(struct lpfc_hba * phba, struct lpfc_iocbq * cmdiocb,
2751 			struct lpfc_iocbq * rspiocb)
2752 {
2753 	IOCB_t *irsp;
2754 	uint16_t abort_iotag, abort_context;
2755 	struct lpfc_iocbq *abort_iocb, *rsp_ab_iocb;
2756 	struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
2757 
2758 	abort_iocb = NULL;
2759 	irsp = &rspiocb->iocb;
2760 
2761 	spin_lock_irq(phba->host->host_lock);
2762 
2763 	if (irsp->ulpStatus) {
2764 		abort_context = cmdiocb->iocb.un.acxri.abortContextTag;
2765 		abort_iotag = cmdiocb->iocb.un.acxri.abortIoTag;
2766 
2767 		if (abort_iotag != 0 && abort_iotag <= phba->sli.last_iotag)
2768 			abort_iocb = phba->sli.iocbq_lookup[abort_iotag];
2769 
2770 		lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2771 				"%d:0327 Cannot abort els iocb %p"
2772 				" with tag %x context %x\n",
2773 				phba->brd_no, abort_iocb,
2774 				abort_iotag, abort_context);
2775 
2776 		/*
2777 		 * make sure we have the right iocbq before taking it
2778 		 * off the txcmplq and try to call completion routine.
2779 		 */
2780 		if (abort_iocb &&
2781 		    abort_iocb->iocb.ulpContext == abort_context &&
2782 		    abort_iocb->iocb_flag & LPFC_DRIVER_ABORTED) {
2783 			list_del(&abort_iocb->list);
2784 			pring->txcmplq_cnt--;
2785 
2786 			rsp_ab_iocb = lpfc_sli_get_iocbq(phba);
2787 			if (rsp_ab_iocb == NULL)
2788 				lpfc_sli_release_iocbq(phba, abort_iocb);
2789 			else {
2790 				abort_iocb->iocb_flag &=
2791 					~LPFC_DRIVER_ABORTED;
2792 				rsp_ab_iocb->iocb.ulpStatus =
2793 					IOSTAT_LOCAL_REJECT;
2794 				rsp_ab_iocb->iocb.un.ulpWord[4] =
2795 					IOERR_SLI_ABORTED;
2796 				spin_unlock_irq(phba->host->host_lock);
2797 				(abort_iocb->iocb_cmpl)
2798 					(phba, abort_iocb, rsp_ab_iocb);
2799 				spin_lock_irq(phba->host->host_lock);
2800 				lpfc_sli_release_iocbq(phba, rsp_ab_iocb);
2801 			}
2802 		}
2803 	}
2804 
2805 	lpfc_sli_release_iocbq(phba, cmdiocb);
2806 	spin_unlock_irq(phba->host->host_lock);
2807 	return;
2808 }
2809 
2810 int
2811 lpfc_sli_issue_abort_iotag(struct lpfc_hba * phba,
2812 			   struct lpfc_sli_ring * pring,
2813 			   struct lpfc_iocbq * cmdiocb)
2814 {
2815 	struct lpfc_iocbq *abtsiocbp;
2816 	IOCB_t *icmd = NULL;
2817 	IOCB_t *iabt = NULL;
2818 	int retval = IOCB_ERROR;
2819 
2820 	/* There are certain command types we don't want
2821 	 * to abort.
2822 	 */
2823 	icmd = &cmdiocb->iocb;
2824 	if ((icmd->ulpCommand == CMD_ABORT_XRI_CN) ||
2825 	    (icmd->ulpCommand == CMD_CLOSE_XRI_CN))
2826 		return 0;
2827 
2828 	/* If we're unloading, interrupts are disabled so we
2829 	 * need to cleanup the iocb here.
2830 	 */
2831 	if (phba->fc_flag & FC_UNLOADING)
2832 		goto abort_iotag_exit;
2833 
2834 	/* issue ABTS for this IOCB based on iotag */
2835 	abtsiocbp = lpfc_sli_get_iocbq(phba);
2836 	if (abtsiocbp == NULL)
2837 		return 0;
2838 
2839 	/* This signals the response to set the correct status
2840 	 * before calling the completion handler.
2841 	 */
2842 	cmdiocb->iocb_flag |= LPFC_DRIVER_ABORTED;
2843 
2844 	iabt = &abtsiocbp->iocb;
2845 	iabt->un.acxri.abortType = ABORT_TYPE_ABTS;
2846 	iabt->un.acxri.abortContextTag = icmd->ulpContext;
2847 	iabt->un.acxri.abortIoTag = icmd->ulpIoTag;
2848 	iabt->ulpLe = 1;
2849 	iabt->ulpClass = icmd->ulpClass;
2850 
2851 	if (phba->hba_state >= LPFC_LINK_UP)
2852 		iabt->ulpCommand = CMD_ABORT_XRI_CN;
2853 	else
2854 		iabt->ulpCommand = CMD_CLOSE_XRI_CN;
2855 
2856 	abtsiocbp->iocb_cmpl = lpfc_sli_abort_els_cmpl;
2857 
2858 	lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2859 			"%d:0339 Abort xri x%x, original iotag x%x, abort "
2860 			"cmd iotag x%x\n",
2861 			phba->brd_no, iabt->un.acxri.abortContextTag,
2862 			iabt->un.acxri.abortIoTag, abtsiocbp->iotag);
2863 	retval = lpfc_sli_issue_iocb(phba, pring, abtsiocbp, 0);
2864 
2865 abort_iotag_exit:
2866 
2867 	/* If we could not issue an abort dequeue the iocb and handle
2868 	 * the completion here.
2869 	 */
2870 	if (retval == IOCB_ERROR) {
2871 		list_del(&cmdiocb->list);
2872 		pring->txcmplq_cnt--;
2873 
2874 		if (cmdiocb->iocb_cmpl) {
2875 			icmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2876 			icmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
2877 			spin_unlock_irq(phba->host->host_lock);
2878 			(cmdiocb->iocb_cmpl) (phba, cmdiocb, cmdiocb);
2879 			spin_lock_irq(phba->host->host_lock);
2880 		} else
2881 			lpfc_sli_release_iocbq(phba, cmdiocb);
2882 	}
2883 
2884 	return 1;
2885 }
2886 
2887 static int
2888 lpfc_sli_validate_fcp_iocb(struct lpfc_iocbq *iocbq, uint16_t tgt_id,
2889 			   uint64_t lun_id, uint32_t ctx,
2890 			   lpfc_ctx_cmd ctx_cmd)
2891 {
2892 	struct lpfc_scsi_buf *lpfc_cmd;
2893 	struct scsi_cmnd *cmnd;
2894 	int rc = 1;
2895 
2896 	if (!(iocbq->iocb_flag &  LPFC_IO_FCP))
2897 		return rc;
2898 
2899 	lpfc_cmd = container_of(iocbq, struct lpfc_scsi_buf, cur_iocbq);
2900 	cmnd = lpfc_cmd->pCmd;
2901 
2902 	if (cmnd == NULL)
2903 		return rc;
2904 
2905 	switch (ctx_cmd) {
2906 	case LPFC_CTX_LUN:
2907 		if ((cmnd->device->id == tgt_id) &&
2908 		    (cmnd->device->lun == lun_id))
2909 			rc = 0;
2910 		break;
2911 	case LPFC_CTX_TGT:
2912 		if (cmnd->device->id == tgt_id)
2913 			rc = 0;
2914 		break;
2915 	case LPFC_CTX_CTX:
2916 		if (iocbq->iocb.ulpContext == ctx)
2917 			rc = 0;
2918 		break;
2919 	case LPFC_CTX_HOST:
2920 		rc = 0;
2921 		break;
2922 	default:
2923 		printk(KERN_ERR "%s: Unknown context cmd type, value %d\n",
2924 			__FUNCTION__, ctx_cmd);
2925 		break;
2926 	}
2927 
2928 	return rc;
2929 }
2930 
2931 int
2932 lpfc_sli_sum_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2933 		uint16_t tgt_id, uint64_t lun_id, lpfc_ctx_cmd ctx_cmd)
2934 {
2935 	struct lpfc_iocbq *iocbq;
2936 	int sum, i;
2937 
2938 	for (i = 1, sum = 0; i <= phba->sli.last_iotag; i++) {
2939 		iocbq = phba->sli.iocbq_lookup[i];
2940 
2941 		if (lpfc_sli_validate_fcp_iocb (iocbq, tgt_id, lun_id,
2942 						0, ctx_cmd) == 0)
2943 			sum++;
2944 	}
2945 
2946 	return sum;
2947 }
2948 
2949 void
2950 lpfc_sli_abort_fcp_cmpl(struct lpfc_hba * phba, struct lpfc_iocbq * cmdiocb,
2951 			   struct lpfc_iocbq * rspiocb)
2952 {
2953 	unsigned long iflags;
2954 
2955 	spin_lock_irqsave(phba->host->host_lock, iflags);
2956 	lpfc_sli_release_iocbq(phba, cmdiocb);
2957 	spin_unlock_irqrestore(phba->host->host_lock, iflags);
2958 	return;
2959 }
2960 
2961 int
2962 lpfc_sli_abort_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2963 		    uint16_t tgt_id, uint64_t lun_id, uint32_t ctx,
2964 		    lpfc_ctx_cmd abort_cmd)
2965 {
2966 	struct lpfc_iocbq *iocbq;
2967 	struct lpfc_iocbq *abtsiocb;
2968 	IOCB_t *cmd = NULL;
2969 	int errcnt = 0, ret_val = 0;
2970 	int i;
2971 
2972 	for (i = 1; i <= phba->sli.last_iotag; i++) {
2973 		iocbq = phba->sli.iocbq_lookup[i];
2974 
2975 		if (lpfc_sli_validate_fcp_iocb (iocbq, tgt_id, lun_id,
2976 						0, abort_cmd) != 0)
2977 			continue;
2978 
2979 		/* issue ABTS for this IOCB based on iotag */
2980 		abtsiocb = lpfc_sli_get_iocbq(phba);
2981 		if (abtsiocb == NULL) {
2982 			errcnt++;
2983 			continue;
2984 		}
2985 
2986 		cmd = &iocbq->iocb;
2987 		abtsiocb->iocb.un.acxri.abortType = ABORT_TYPE_ABTS;
2988 		abtsiocb->iocb.un.acxri.abortContextTag = cmd->ulpContext;
2989 		abtsiocb->iocb.un.acxri.abortIoTag = cmd->ulpIoTag;
2990 		abtsiocb->iocb.ulpLe = 1;
2991 		abtsiocb->iocb.ulpClass = cmd->ulpClass;
2992 
2993 		if (phba->hba_state >= LPFC_LINK_UP)
2994 			abtsiocb->iocb.ulpCommand = CMD_ABORT_XRI_CN;
2995 		else
2996 			abtsiocb->iocb.ulpCommand = CMD_CLOSE_XRI_CN;
2997 
2998 		/* Setup callback routine and issue the command. */
2999 		abtsiocb->iocb_cmpl = lpfc_sli_abort_fcp_cmpl;
3000 		ret_val = lpfc_sli_issue_iocb(phba, pring, abtsiocb, 0);
3001 		if (ret_val == IOCB_ERROR) {
3002 			lpfc_sli_release_iocbq(phba, abtsiocb);
3003 			errcnt++;
3004 			continue;
3005 		}
3006 	}
3007 
3008 	return errcnt;
3009 }
3010 
3011 static void
3012 lpfc_sli_wake_iocb_wait(struct lpfc_hba *phba,
3013 			struct lpfc_iocbq *cmdiocbq,
3014 			struct lpfc_iocbq *rspiocbq)
3015 {
3016 	wait_queue_head_t *pdone_q;
3017 	unsigned long iflags;
3018 
3019 	spin_lock_irqsave(phba->host->host_lock, iflags);
3020 	cmdiocbq->iocb_flag |= LPFC_IO_WAKE;
3021 	if (cmdiocbq->context2 && rspiocbq)
3022 		memcpy(&((struct lpfc_iocbq *)cmdiocbq->context2)->iocb,
3023 		       &rspiocbq->iocb, sizeof(IOCB_t));
3024 
3025 	pdone_q = cmdiocbq->context_un.wait_queue;
3026 	spin_unlock_irqrestore(phba->host->host_lock, iflags);
3027 	if (pdone_q)
3028 		wake_up(pdone_q);
3029 	return;
3030 }
3031 
3032 /*
3033  * Issue the caller's iocb and wait for its completion, but no longer than the
3034  * caller's timeout.  Note that iocb_flags is cleared before the
3035  * lpfc_sli_issue_call since the wake routine sets a unique value and by
3036  * definition this is a wait function.
3037  */
3038 int
3039 lpfc_sli_issue_iocb_wait(struct lpfc_hba * phba,
3040 			 struct lpfc_sli_ring * pring,
3041 			 struct lpfc_iocbq * piocb,
3042 			 struct lpfc_iocbq * prspiocbq,
3043 			 uint32_t timeout)
3044 {
3045 	DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
3046 	long timeleft, timeout_req = 0;
3047 	int retval = IOCB_SUCCESS;
3048 	uint32_t creg_val;
3049 
3050 	/*
3051 	 * If the caller has provided a response iocbq buffer, then context2
3052 	 * is NULL or its an error.
3053 	 */
3054 	if (prspiocbq) {
3055 		if (piocb->context2)
3056 			return IOCB_ERROR;
3057 		piocb->context2 = prspiocbq;
3058 	}
3059 
3060 	piocb->iocb_cmpl = lpfc_sli_wake_iocb_wait;
3061 	piocb->context_un.wait_queue = &done_q;
3062 	piocb->iocb_flag &= ~LPFC_IO_WAKE;
3063 
3064 	if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
3065 		creg_val = readl(phba->HCregaddr);
3066 		creg_val |= (HC_R0INT_ENA << LPFC_FCP_RING);
3067 		writel(creg_val, phba->HCregaddr);
3068 		readl(phba->HCregaddr); /* flush */
3069 	}
3070 
3071 	retval = lpfc_sli_issue_iocb(phba, pring, piocb, 0);
3072 	if (retval == IOCB_SUCCESS) {
3073 		timeout_req = timeout * HZ;
3074 		spin_unlock_irq(phba->host->host_lock);
3075 		timeleft = wait_event_timeout(done_q,
3076 				piocb->iocb_flag & LPFC_IO_WAKE,
3077 				timeout_req);
3078 		spin_lock_irq(phba->host->host_lock);
3079 
3080 		if (piocb->iocb_flag & LPFC_IO_WAKE) {
3081 			lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3082 					"%d:0331 IOCB wake signaled\n",
3083 					phba->brd_no);
3084 		} else if (timeleft == 0) {
3085 			lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
3086 					"%d:0338 IOCB wait timeout error - no "
3087 					"wake response Data x%x\n",
3088 					phba->brd_no, timeout);
3089 			retval = IOCB_TIMEDOUT;
3090 		} else {
3091 			lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
3092 					"%d:0330 IOCB wake NOT set, "
3093 					"Data x%x x%lx\n", phba->brd_no,
3094 					timeout, (timeleft / jiffies));
3095 			retval = IOCB_TIMEDOUT;
3096 		}
3097 	} else {
3098 		lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3099 				"%d:0332 IOCB wait issue failed, Data x%x\n",
3100 				phba->brd_no, retval);
3101 		retval = IOCB_ERROR;
3102 	}
3103 
3104 	if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
3105 		creg_val = readl(phba->HCregaddr);
3106 		creg_val &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
3107 		writel(creg_val, phba->HCregaddr);
3108 		readl(phba->HCregaddr); /* flush */
3109 	}
3110 
3111 	if (prspiocbq)
3112 		piocb->context2 = NULL;
3113 
3114 	piocb->context_un.wait_queue = NULL;
3115 	piocb->iocb_cmpl = NULL;
3116 	return retval;
3117 }
3118 
3119 int
3120 lpfc_sli_issue_mbox_wait(struct lpfc_hba * phba, LPFC_MBOXQ_t * pmboxq,
3121 			 uint32_t timeout)
3122 {
3123 	DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
3124 	int retval;
3125 
3126 	/* The caller must leave context1 empty. */
3127 	if (pmboxq->context1 != 0) {
3128 		return (MBX_NOT_FINISHED);
3129 	}
3130 
3131 	/* setup wake call as IOCB callback */
3132 	pmboxq->mbox_cmpl = lpfc_sli_wake_mbox_wait;
3133 	/* setup context field to pass wait_queue pointer to wake function  */
3134 	pmboxq->context1 = &done_q;
3135 
3136 	/* now issue the command */
3137 	retval = lpfc_sli_issue_mbox(phba, pmboxq, MBX_NOWAIT);
3138 
3139 	if (retval == MBX_BUSY || retval == MBX_SUCCESS) {
3140 		wait_event_interruptible_timeout(done_q,
3141 				pmboxq->mbox_flag & LPFC_MBX_WAKE,
3142 				timeout * HZ);
3143 
3144 		pmboxq->context1 = NULL;
3145 		/*
3146 		 * if LPFC_MBX_WAKE flag is set the mailbox is completed
3147 		 * else do not free the resources.
3148 		 */
3149 		if (pmboxq->mbox_flag & LPFC_MBX_WAKE)
3150 			retval = MBX_SUCCESS;
3151 		else
3152 			retval = MBX_TIMEOUT;
3153 	}
3154 
3155 	return retval;
3156 }
3157 
3158 int
3159 lpfc_sli_flush_mbox_queue(struct lpfc_hba * phba)
3160 {
3161 	int i = 0;
3162 
3163 	while (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE && !phba->stopped) {
3164 		if (i++ > LPFC_MBOX_TMO * 1000)
3165 			return 1;
3166 
3167 		if (lpfc_sli_handle_mb_event(phba) == 0)
3168 			i = 0;
3169 
3170 		msleep(1);
3171 	}
3172 
3173 	return (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE) ? 1 : 0;
3174 }
3175 
3176 irqreturn_t
3177 lpfc_intr_handler(int irq, void *dev_id)
3178 {
3179 	struct lpfc_hba *phba;
3180 	uint32_t ha_copy;
3181 	uint32_t work_ha_copy;
3182 	unsigned long status;
3183 	int i;
3184 	uint32_t control;
3185 
3186 	/*
3187 	 * Get the driver's phba structure from the dev_id and
3188 	 * assume the HBA is not interrupting.
3189 	 */
3190 	phba = (struct lpfc_hba *) dev_id;
3191 
3192 	if (unlikely(!phba))
3193 		return IRQ_NONE;
3194 
3195 	/* If the pci channel is offline, ignore all the interrupts. */
3196 	if (unlikely(pci_channel_offline(phba->pcidev)))
3197 		return IRQ_NONE;
3198 
3199 	phba->sli.slistat.sli_intr++;
3200 
3201 	/*
3202 	 * Call the HBA to see if it is interrupting.  If not, don't claim
3203 	 * the interrupt
3204 	 */
3205 
3206 	/* Ignore all interrupts during initialization. */
3207 	if (unlikely(phba->hba_state < LPFC_LINK_DOWN))
3208 		return IRQ_NONE;
3209 
3210 	/*
3211 	 * Read host attention register to determine interrupt source
3212 	 * Clear Attention Sources, except Error Attention (to
3213 	 * preserve status) and Link Attention
3214 	 */
3215 	spin_lock(phba->host->host_lock);
3216 	ha_copy = readl(phba->HAregaddr);
3217 	/* If somebody is waiting to handle an eratt don't process it
3218 	 * here.  The brdkill function will do this.
3219 	 */
3220 	if (phba->fc_flag & FC_IGNORE_ERATT)
3221 		ha_copy &= ~HA_ERATT;
3222 	writel((ha_copy & ~(HA_LATT | HA_ERATT)), phba->HAregaddr);
3223 	readl(phba->HAregaddr); /* flush */
3224 	spin_unlock(phba->host->host_lock);
3225 
3226 	if (unlikely(!ha_copy))
3227 		return IRQ_NONE;
3228 
3229 	work_ha_copy = ha_copy & phba->work_ha_mask;
3230 
3231 	if (unlikely(work_ha_copy)) {
3232 		if (work_ha_copy & HA_LATT) {
3233 			if (phba->sli.sli_flag & LPFC_PROCESS_LA) {
3234 				/*
3235 				 * Turn off Link Attention interrupts
3236 				 * until CLEAR_LA done
3237 				 */
3238 				spin_lock(phba->host->host_lock);
3239 				phba->sli.sli_flag &= ~LPFC_PROCESS_LA;
3240 				control = readl(phba->HCregaddr);
3241 				control &= ~HC_LAINT_ENA;
3242 				writel(control, phba->HCregaddr);
3243 				readl(phba->HCregaddr); /* flush */
3244 				spin_unlock(phba->host->host_lock);
3245 			}
3246 			else
3247 				work_ha_copy &= ~HA_LATT;
3248 		}
3249 
3250 		if (work_ha_copy & ~(HA_ERATT|HA_MBATT|HA_LATT)) {
3251 			for (i = 0; i < phba->sli.num_rings; i++) {
3252 				if (work_ha_copy & (HA_RXATT << (4*i))) {
3253 					/*
3254 					 * Turn off Slow Rings interrupts
3255 					 */
3256 					spin_lock(phba->host->host_lock);
3257 					control = readl(phba->HCregaddr);
3258 					control &= ~(HC_R0INT_ENA << i);
3259 					writel(control, phba->HCregaddr);
3260 					readl(phba->HCregaddr); /* flush */
3261 					spin_unlock(phba->host->host_lock);
3262 				}
3263 			}
3264 		}
3265 
3266 		if (work_ha_copy & HA_ERATT) {
3267 			phba->hba_state = LPFC_HBA_ERROR;
3268 			/*
3269 			 * There was a link/board error.  Read the
3270 			 * status register to retrieve the error event
3271 			 * and process it.
3272 			 */
3273 			phba->sli.slistat.err_attn_event++;
3274 			/* Save status info */
3275 			phba->work_hs = readl(phba->HSregaddr);
3276 			phba->work_status[0] = readl(phba->MBslimaddr + 0xa8);
3277 			phba->work_status[1] = readl(phba->MBslimaddr + 0xac);
3278 
3279 			/* Clear Chip error bit */
3280 			writel(HA_ERATT, phba->HAregaddr);
3281 			readl(phba->HAregaddr); /* flush */
3282 			phba->stopped = 1;
3283 		}
3284 
3285 		spin_lock(phba->host->host_lock);
3286 		phba->work_ha |= work_ha_copy;
3287 		if (phba->work_wait)
3288 			wake_up(phba->work_wait);
3289 		spin_unlock(phba->host->host_lock);
3290 	}
3291 
3292 	ha_copy &= ~(phba->work_ha_mask);
3293 
3294 	/*
3295 	 * Process all events on FCP ring.  Take the optimized path for
3296 	 * FCP IO.  Any other IO is slow path and is handled by
3297 	 * the worker thread.
3298 	 */
3299 	status = (ha_copy & (HA_RXMASK  << (4*LPFC_FCP_RING)));
3300 	status >>= (4*LPFC_FCP_RING);
3301 	if (status & HA_RXATT)
3302 		lpfc_sli_handle_fast_ring_event(phba,
3303 						&phba->sli.ring[LPFC_FCP_RING],
3304 						status);
3305 
3306 	if (phba->cfg_multi_ring_support == 2) {
3307 		/*
3308 		 * Process all events on extra ring.  Take the optimized path
3309 		 * for extra ring IO.  Any other IO is slow path and is handled
3310 		 * by the worker thread.
3311 		 */
3312 		status = (ha_copy & (HA_RXMASK  << (4*LPFC_EXTRA_RING)));
3313 		status >>= (4*LPFC_EXTRA_RING);
3314 		if (status & HA_RXATT) {
3315 			lpfc_sli_handle_fast_ring_event(phba,
3316 					&phba->sli.ring[LPFC_EXTRA_RING],
3317 					status);
3318 		}
3319 	}
3320 	return IRQ_HANDLED;
3321 
3322 } /* lpfc_intr_handler */
3323