[POWERPC] 4xx: Reorganize 4xx defconfigs
[linux/fpc-iii.git] / drivers / scsi / lpfc / lpfc_sli.c
blobfc0d9501aba628f41a79c0b4a8ae31f384d60ab2
1 /*******************************************************************
2 * This file is part of the Emulex Linux Device Driver for *
3 * Fibre Channel Host Bus Adapters. *
4 * Copyright (C) 2004-2008 Emulex. All rights reserved. *
5 * EMULEX and SLI are trademarks of Emulex. *
6 * www.emulex.com *
7 * Portions Copyright (C) 2004-2005 Christoph Hellwig *
8 * *
9 * This program is free software; you can redistribute it and/or *
10 * modify it under the terms of version 2 of the GNU General *
11 * Public License as published by the Free Software Foundation. *
12 * This program is distributed in the hope that it will be useful. *
13 * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND *
14 * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, *
15 * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE *
16 * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17 * TO BE LEGALLY INVALID. See the GNU General Public License for *
18 * more details, a copy of which can be found in the file COPYING *
19 * included with this package. *
20 *******************************************************************/
22 #include <linux/blkdev.h>
23 #include <linux/pci.h>
24 #include <linux/interrupt.h>
25 #include <linux/delay.h>
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>
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 #include "lpfc_debugfs.h"
44 * Define macro to log: Mailbox command x%x cannot issue Data
45 * This allows multiple uses of lpfc_msgBlk0311
46 * w/o perturbing log msg utility.
48 #define LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag) \
49 lpfc_printf_log(phba, \
50 KERN_INFO, \
51 LOG_MBOX | LOG_SLI, \
52 "(%d):0311 Mailbox command x%x cannot " \
53 "issue Data: x%x x%x x%x\n", \
54 pmbox->vport ? pmbox->vport->vpi : 0, \
55 pmbox->mb.mbxCommand, \
56 phba->pport->port_state, \
57 psli->sli_flag, \
58 flag)
61 /* There are only four IOCB completion types. */
62 typedef enum _lpfc_iocb_type {
63 LPFC_UNKNOWN_IOCB,
64 LPFC_UNSOL_IOCB,
65 LPFC_SOL_IOCB,
66 LPFC_ABORT_IOCB
67 } lpfc_iocb_type;
69 /* SLI-2/SLI-3 provide different sized iocbs. Given a pointer
70 * to the start of the ring, and the slot number of the
71 * desired iocb entry, calc a pointer to that entry.
73 static inline IOCB_t *
74 lpfc_cmd_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
76 return (IOCB_t *) (((char *) pring->cmdringaddr) +
77 pring->cmdidx * phba->iocb_cmd_size);
80 static inline IOCB_t *
81 lpfc_resp_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
83 return (IOCB_t *) (((char *) pring->rspringaddr) +
84 pring->rspidx * phba->iocb_rsp_size);
87 static struct lpfc_iocbq *
88 __lpfc_sli_get_iocbq(struct lpfc_hba *phba)
90 struct list_head *lpfc_iocb_list = &phba->lpfc_iocb_list;
91 struct lpfc_iocbq * iocbq = NULL;
93 list_remove_head(lpfc_iocb_list, iocbq, struct lpfc_iocbq, list);
94 return iocbq;
97 struct lpfc_iocbq *
98 lpfc_sli_get_iocbq(struct lpfc_hba *phba)
100 struct lpfc_iocbq * iocbq = NULL;
101 unsigned long iflags;
103 spin_lock_irqsave(&phba->hbalock, iflags);
104 iocbq = __lpfc_sli_get_iocbq(phba);
105 spin_unlock_irqrestore(&phba->hbalock, iflags);
106 return iocbq;
109 static void
110 __lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
112 size_t start_clean = offsetof(struct lpfc_iocbq, iocb);
115 * Clean all volatile data fields, preserve iotag and node struct.
117 memset((char*)iocbq + start_clean, 0, sizeof(*iocbq) - start_clean);
118 list_add_tail(&iocbq->list, &phba->lpfc_iocb_list);
121 void
122 lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
124 unsigned long iflags;
127 * Clean all volatile data fields, preserve iotag and node struct.
129 spin_lock_irqsave(&phba->hbalock, iflags);
130 __lpfc_sli_release_iocbq(phba, iocbq);
131 spin_unlock_irqrestore(&phba->hbalock, iflags);
135 * Translate the iocb command to an iocb command type used to decide the final
136 * disposition of each completed IOCB.
138 static lpfc_iocb_type
139 lpfc_sli_iocb_cmd_type(uint8_t iocb_cmnd)
141 lpfc_iocb_type type = LPFC_UNKNOWN_IOCB;
143 if (iocb_cmnd > CMD_MAX_IOCB_CMD)
144 return 0;
146 switch (iocb_cmnd) {
147 case CMD_XMIT_SEQUENCE_CR:
148 case CMD_XMIT_SEQUENCE_CX:
149 case CMD_XMIT_BCAST_CN:
150 case CMD_XMIT_BCAST_CX:
151 case CMD_ELS_REQUEST_CR:
152 case CMD_ELS_REQUEST_CX:
153 case CMD_CREATE_XRI_CR:
154 case CMD_CREATE_XRI_CX:
155 case CMD_GET_RPI_CN:
156 case CMD_XMIT_ELS_RSP_CX:
157 case CMD_GET_RPI_CR:
158 case CMD_FCP_IWRITE_CR:
159 case CMD_FCP_IWRITE_CX:
160 case CMD_FCP_IREAD_CR:
161 case CMD_FCP_IREAD_CX:
162 case CMD_FCP_ICMND_CR:
163 case CMD_FCP_ICMND_CX:
164 case CMD_FCP_TSEND_CX:
165 case CMD_FCP_TRSP_CX:
166 case CMD_FCP_TRECEIVE_CX:
167 case CMD_FCP_AUTO_TRSP_CX:
168 case CMD_ADAPTER_MSG:
169 case CMD_ADAPTER_DUMP:
170 case CMD_XMIT_SEQUENCE64_CR:
171 case CMD_XMIT_SEQUENCE64_CX:
172 case CMD_XMIT_BCAST64_CN:
173 case CMD_XMIT_BCAST64_CX:
174 case CMD_ELS_REQUEST64_CR:
175 case CMD_ELS_REQUEST64_CX:
176 case CMD_FCP_IWRITE64_CR:
177 case CMD_FCP_IWRITE64_CX:
178 case CMD_FCP_IREAD64_CR:
179 case CMD_FCP_IREAD64_CX:
180 case CMD_FCP_ICMND64_CR:
181 case CMD_FCP_ICMND64_CX:
182 case CMD_FCP_TSEND64_CX:
183 case CMD_FCP_TRSP64_CX:
184 case CMD_FCP_TRECEIVE64_CX:
185 case CMD_GEN_REQUEST64_CR:
186 case CMD_GEN_REQUEST64_CX:
187 case CMD_XMIT_ELS_RSP64_CX:
188 type = LPFC_SOL_IOCB;
189 break;
190 case CMD_ABORT_XRI_CN:
191 case CMD_ABORT_XRI_CX:
192 case CMD_CLOSE_XRI_CN:
193 case CMD_CLOSE_XRI_CX:
194 case CMD_XRI_ABORTED_CX:
195 case CMD_ABORT_MXRI64_CN:
196 type = LPFC_ABORT_IOCB;
197 break;
198 case CMD_RCV_SEQUENCE_CX:
199 case CMD_RCV_ELS_REQ_CX:
200 case CMD_RCV_SEQUENCE64_CX:
201 case CMD_RCV_ELS_REQ64_CX:
202 case CMD_ASYNC_STATUS:
203 case CMD_IOCB_RCV_SEQ64_CX:
204 case CMD_IOCB_RCV_ELS64_CX:
205 case CMD_IOCB_RCV_CONT64_CX:
206 case CMD_IOCB_RET_XRI64_CX:
207 type = LPFC_UNSOL_IOCB;
208 break;
209 case CMD_IOCB_XMIT_MSEQ64_CR:
210 case CMD_IOCB_XMIT_MSEQ64_CX:
211 case CMD_IOCB_RCV_SEQ_LIST64_CX:
212 case CMD_IOCB_RCV_ELS_LIST64_CX:
213 case CMD_IOCB_CLOSE_EXTENDED_CN:
214 case CMD_IOCB_ABORT_EXTENDED_CN:
215 case CMD_IOCB_RET_HBQE64_CN:
216 case CMD_IOCB_FCP_IBIDIR64_CR:
217 case CMD_IOCB_FCP_IBIDIR64_CX:
218 case CMD_IOCB_FCP_ITASKMGT64_CX:
219 case CMD_IOCB_LOGENTRY_CN:
220 case CMD_IOCB_LOGENTRY_ASYNC_CN:
221 printk("%s - Unhandled SLI-3 Command x%x\n",
222 __FUNCTION__, iocb_cmnd);
223 type = LPFC_UNKNOWN_IOCB;
224 break;
225 default:
226 type = LPFC_UNKNOWN_IOCB;
227 break;
230 return type;
233 static int
234 lpfc_sli_ring_map(struct lpfc_hba *phba)
236 struct lpfc_sli *psli = &phba->sli;
237 LPFC_MBOXQ_t *pmb;
238 MAILBOX_t *pmbox;
239 int i, rc, ret = 0;
241 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
242 if (!pmb)
243 return -ENOMEM;
244 pmbox = &pmb->mb;
245 phba->link_state = LPFC_INIT_MBX_CMDS;
246 for (i = 0; i < psli->num_rings; i++) {
247 lpfc_config_ring(phba, i, pmb);
248 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
249 if (rc != MBX_SUCCESS) {
250 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
251 "0446 Adapter failed to init (%d), "
252 "mbxCmd x%x CFG_RING, mbxStatus x%x, "
253 "ring %d\n",
254 rc, pmbox->mbxCommand,
255 pmbox->mbxStatus, i);
256 phba->link_state = LPFC_HBA_ERROR;
257 ret = -ENXIO;
258 break;
261 mempool_free(pmb, phba->mbox_mem_pool);
262 return ret;
265 static int
266 lpfc_sli_ringtxcmpl_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
267 struct lpfc_iocbq *piocb)
269 list_add_tail(&piocb->list, &pring->txcmplq);
270 pring->txcmplq_cnt++;
271 if ((unlikely(pring->ringno == LPFC_ELS_RING)) &&
272 (piocb->iocb.ulpCommand != CMD_ABORT_XRI_CN) &&
273 (piocb->iocb.ulpCommand != CMD_CLOSE_XRI_CN)) {
274 if (!piocb->vport)
275 BUG();
276 else
277 mod_timer(&piocb->vport->els_tmofunc,
278 jiffies + HZ * (phba->fc_ratov << 1));
282 return 0;
285 static struct lpfc_iocbq *
286 lpfc_sli_ringtx_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
288 struct lpfc_iocbq *cmd_iocb;
290 list_remove_head((&pring->txq), cmd_iocb, struct lpfc_iocbq, list);
291 if (cmd_iocb != NULL)
292 pring->txq_cnt--;
293 return cmd_iocb;
296 static IOCB_t *
297 lpfc_sli_next_iocb_slot (struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
299 struct lpfc_pgp *pgp = (phba->sli_rev == 3) ?
300 &phba->slim2p->mbx.us.s3_pgp.port[pring->ringno] :
301 &phba->slim2p->mbx.us.s2.port[pring->ringno];
302 uint32_t max_cmd_idx = pring->numCiocb;
304 if ((pring->next_cmdidx == pring->cmdidx) &&
305 (++pring->next_cmdidx >= max_cmd_idx))
306 pring->next_cmdidx = 0;
308 if (unlikely(pring->local_getidx == pring->next_cmdidx)) {
310 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
312 if (unlikely(pring->local_getidx >= max_cmd_idx)) {
313 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
314 "0315 Ring %d issue: portCmdGet %d "
315 "is bigger then cmd ring %d\n",
316 pring->ringno,
317 pring->local_getidx, max_cmd_idx);
319 phba->link_state = LPFC_HBA_ERROR;
321 * All error attention handlers are posted to
322 * worker thread
324 phba->work_ha |= HA_ERATT;
325 phba->work_hs = HS_FFER3;
327 /* hbalock should already be held */
328 if (phba->work_wait)
329 lpfc_worker_wake_up(phba);
331 return NULL;
334 if (pring->local_getidx == pring->next_cmdidx)
335 return NULL;
338 return lpfc_cmd_iocb(phba, pring);
341 uint16_t
342 lpfc_sli_next_iotag(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
344 struct lpfc_iocbq **new_arr;
345 struct lpfc_iocbq **old_arr;
346 size_t new_len;
347 struct lpfc_sli *psli = &phba->sli;
348 uint16_t iotag;
350 spin_lock_irq(&phba->hbalock);
351 iotag = psli->last_iotag;
352 if(++iotag < psli->iocbq_lookup_len) {
353 psli->last_iotag = iotag;
354 psli->iocbq_lookup[iotag] = iocbq;
355 spin_unlock_irq(&phba->hbalock);
356 iocbq->iotag = iotag;
357 return iotag;
358 } else if (psli->iocbq_lookup_len < (0xffff
359 - LPFC_IOCBQ_LOOKUP_INCREMENT)) {
360 new_len = psli->iocbq_lookup_len + LPFC_IOCBQ_LOOKUP_INCREMENT;
361 spin_unlock_irq(&phba->hbalock);
362 new_arr = kzalloc(new_len * sizeof (struct lpfc_iocbq *),
363 GFP_KERNEL);
364 if (new_arr) {
365 spin_lock_irq(&phba->hbalock);
366 old_arr = psli->iocbq_lookup;
367 if (new_len <= psli->iocbq_lookup_len) {
368 /* highly unprobable case */
369 kfree(new_arr);
370 iotag = psli->last_iotag;
371 if(++iotag < psli->iocbq_lookup_len) {
372 psli->last_iotag = iotag;
373 psli->iocbq_lookup[iotag] = iocbq;
374 spin_unlock_irq(&phba->hbalock);
375 iocbq->iotag = iotag;
376 return iotag;
378 spin_unlock_irq(&phba->hbalock);
379 return 0;
381 if (psli->iocbq_lookup)
382 memcpy(new_arr, old_arr,
383 ((psli->last_iotag + 1) *
384 sizeof (struct lpfc_iocbq *)));
385 psli->iocbq_lookup = new_arr;
386 psli->iocbq_lookup_len = new_len;
387 psli->last_iotag = iotag;
388 psli->iocbq_lookup[iotag] = iocbq;
389 spin_unlock_irq(&phba->hbalock);
390 iocbq->iotag = iotag;
391 kfree(old_arr);
392 return iotag;
394 } else
395 spin_unlock_irq(&phba->hbalock);
397 lpfc_printf_log(phba, KERN_ERR,LOG_SLI,
398 "0318 Failed to allocate IOTAG.last IOTAG is %d\n",
399 psli->last_iotag);
401 return 0;
404 static void
405 lpfc_sli_submit_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
406 IOCB_t *iocb, struct lpfc_iocbq *nextiocb)
409 * Set up an iotag
411 nextiocb->iocb.ulpIoTag = (nextiocb->iocb_cmpl) ? nextiocb->iotag : 0;
413 if (pring->ringno == LPFC_ELS_RING) {
414 lpfc_debugfs_slow_ring_trc(phba,
415 "IOCB cmd ring: wd4:x%08x wd6:x%08x wd7:x%08x",
416 *(((uint32_t *) &nextiocb->iocb) + 4),
417 *(((uint32_t *) &nextiocb->iocb) + 6),
418 *(((uint32_t *) &nextiocb->iocb) + 7));
422 * Issue iocb command to adapter
424 lpfc_sli_pcimem_bcopy(&nextiocb->iocb, iocb, phba->iocb_cmd_size);
425 wmb();
426 pring->stats.iocb_cmd++;
429 * If there is no completion routine to call, we can release the
430 * IOCB buffer back right now. For IOCBs, like QUE_RING_BUF,
431 * that have no rsp ring completion, iocb_cmpl MUST be NULL.
433 if (nextiocb->iocb_cmpl)
434 lpfc_sli_ringtxcmpl_put(phba, pring, nextiocb);
435 else
436 __lpfc_sli_release_iocbq(phba, nextiocb);
439 * Let the HBA know what IOCB slot will be the next one the
440 * driver will put a command into.
442 pring->cmdidx = pring->next_cmdidx;
443 writel(pring->cmdidx, &phba->host_gp[pring->ringno].cmdPutInx);
446 static void
447 lpfc_sli_update_full_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
449 int ringno = pring->ringno;
451 pring->flag |= LPFC_CALL_RING_AVAILABLE;
453 wmb();
456 * Set ring 'ringno' to SET R0CE_REQ in Chip Att register.
457 * The HBA will tell us when an IOCB entry is available.
459 writel((CA_R0ATT|CA_R0CE_REQ) << (ringno*4), phba->CAregaddr);
460 readl(phba->CAregaddr); /* flush */
462 pring->stats.iocb_cmd_full++;
465 static void
466 lpfc_sli_update_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
468 int ringno = pring->ringno;
471 * Tell the HBA that there is work to do in this ring.
473 wmb();
474 writel(CA_R0ATT << (ringno * 4), phba->CAregaddr);
475 readl(phba->CAregaddr); /* flush */
478 static void
479 lpfc_sli_resume_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
481 IOCB_t *iocb;
482 struct lpfc_iocbq *nextiocb;
485 * Check to see if:
486 * (a) there is anything on the txq to send
487 * (b) link is up
488 * (c) link attention events can be processed (fcp ring only)
489 * (d) IOCB processing is not blocked by the outstanding mbox command.
491 if (pring->txq_cnt &&
492 lpfc_is_link_up(phba) &&
493 (pring->ringno != phba->sli.fcp_ring ||
494 phba->sli.sli_flag & LPFC_PROCESS_LA)) {
496 while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
497 (nextiocb = lpfc_sli_ringtx_get(phba, pring)))
498 lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
500 if (iocb)
501 lpfc_sli_update_ring(phba, pring);
502 else
503 lpfc_sli_update_full_ring(phba, pring);
506 return;
509 static struct lpfc_hbq_entry *
510 lpfc_sli_next_hbq_slot(struct lpfc_hba *phba, uint32_t hbqno)
512 struct hbq_s *hbqp = &phba->hbqs[hbqno];
514 if (hbqp->next_hbqPutIdx == hbqp->hbqPutIdx &&
515 ++hbqp->next_hbqPutIdx >= hbqp->entry_count)
516 hbqp->next_hbqPutIdx = 0;
518 if (unlikely(hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)) {
519 uint32_t raw_index = phba->hbq_get[hbqno];
520 uint32_t getidx = le32_to_cpu(raw_index);
522 hbqp->local_hbqGetIdx = getidx;
524 if (unlikely(hbqp->local_hbqGetIdx >= hbqp->entry_count)) {
525 lpfc_printf_log(phba, KERN_ERR,
526 LOG_SLI | LOG_VPORT,
527 "1802 HBQ %d: local_hbqGetIdx "
528 "%u is > than hbqp->entry_count %u\n",
529 hbqno, hbqp->local_hbqGetIdx,
530 hbqp->entry_count);
532 phba->link_state = LPFC_HBA_ERROR;
533 return NULL;
536 if (hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)
537 return NULL;
540 return (struct lpfc_hbq_entry *) phba->hbqs[hbqno].hbq_virt +
541 hbqp->hbqPutIdx;
544 void
545 lpfc_sli_hbqbuf_free_all(struct lpfc_hba *phba)
547 struct lpfc_dmabuf *dmabuf, *next_dmabuf;
548 struct hbq_dmabuf *hbq_buf;
549 unsigned long flags;
550 int i, hbq_count;
551 uint32_t hbqno;
553 hbq_count = lpfc_sli_hbq_count();
554 /* Return all memory used by all HBQs */
555 spin_lock_irqsave(&phba->hbalock, flags);
556 for (i = 0; i < hbq_count; ++i) {
557 list_for_each_entry_safe(dmabuf, next_dmabuf,
558 &phba->hbqs[i].hbq_buffer_list, list) {
559 hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
560 list_del(&hbq_buf->dbuf.list);
561 (phba->hbqs[i].hbq_free_buffer)(phba, hbq_buf);
563 phba->hbqs[i].buffer_count = 0;
565 /* Return all HBQ buffer that are in-fly */
566 list_for_each_entry_safe(dmabuf, next_dmabuf,
567 &phba->hbqbuf_in_list, list) {
568 hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
569 list_del(&hbq_buf->dbuf.list);
570 if (hbq_buf->tag == -1) {
571 (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
572 (phba, hbq_buf);
573 } else {
574 hbqno = hbq_buf->tag >> 16;
575 if (hbqno >= LPFC_MAX_HBQS)
576 (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
577 (phba, hbq_buf);
578 else
579 (phba->hbqs[hbqno].hbq_free_buffer)(phba,
580 hbq_buf);
584 /* Mark the HBQs not in use */
585 phba->hbq_in_use = 0;
586 spin_unlock_irqrestore(&phba->hbalock, flags);
589 static struct lpfc_hbq_entry *
590 lpfc_sli_hbq_to_firmware(struct lpfc_hba *phba, uint32_t hbqno,
591 struct hbq_dmabuf *hbq_buf)
593 struct lpfc_hbq_entry *hbqe;
594 dma_addr_t physaddr = hbq_buf->dbuf.phys;
596 /* Get next HBQ entry slot to use */
597 hbqe = lpfc_sli_next_hbq_slot(phba, hbqno);
598 if (hbqe) {
599 struct hbq_s *hbqp = &phba->hbqs[hbqno];
601 hbqe->bde.addrHigh = le32_to_cpu(putPaddrHigh(physaddr));
602 hbqe->bde.addrLow = le32_to_cpu(putPaddrLow(physaddr));
603 hbqe->bde.tus.f.bdeSize = hbq_buf->size;
604 hbqe->bde.tus.f.bdeFlags = 0;
605 hbqe->bde.tus.w = le32_to_cpu(hbqe->bde.tus.w);
606 hbqe->buffer_tag = le32_to_cpu(hbq_buf->tag);
607 /* Sync SLIM */
608 hbqp->hbqPutIdx = hbqp->next_hbqPutIdx;
609 writel(hbqp->hbqPutIdx, phba->hbq_put + hbqno);
610 /* flush */
611 readl(phba->hbq_put + hbqno);
612 list_add_tail(&hbq_buf->dbuf.list, &hbqp->hbq_buffer_list);
614 return hbqe;
617 static struct lpfc_hbq_init lpfc_els_hbq = {
618 .rn = 1,
619 .entry_count = 200,
620 .mask_count = 0,
621 .profile = 0,
622 .ring_mask = (1 << LPFC_ELS_RING),
623 .buffer_count = 0,
624 .init_count = 20,
625 .add_count = 5,
628 static struct lpfc_hbq_init lpfc_extra_hbq = {
629 .rn = 1,
630 .entry_count = 200,
631 .mask_count = 0,
632 .profile = 0,
633 .ring_mask = (1 << LPFC_EXTRA_RING),
634 .buffer_count = 0,
635 .init_count = 0,
636 .add_count = 5,
639 struct lpfc_hbq_init *lpfc_hbq_defs[] = {
640 &lpfc_els_hbq,
641 &lpfc_extra_hbq,
644 static int
645 lpfc_sli_hbqbuf_fill_hbqs(struct lpfc_hba *phba, uint32_t hbqno, uint32_t count)
647 uint32_t i, start, end;
648 unsigned long flags;
649 struct hbq_dmabuf *hbq_buffer;
651 if (!phba->hbqs[hbqno].hbq_alloc_buffer)
652 return 0;
654 start = phba->hbqs[hbqno].buffer_count;
655 end = count + start;
656 if (end > lpfc_hbq_defs[hbqno]->entry_count)
657 end = lpfc_hbq_defs[hbqno]->entry_count;
659 /* Check whether HBQ is still in use */
660 spin_lock_irqsave(&phba->hbalock, flags);
661 if (!phba->hbq_in_use)
662 goto out;
664 /* Populate HBQ entries */
665 for (i = start; i < end; i++) {
666 hbq_buffer = (phba->hbqs[hbqno].hbq_alloc_buffer)(phba);
667 if (!hbq_buffer)
668 goto err;
669 hbq_buffer->tag = (i | (hbqno << 16));
670 if (lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer))
671 phba->hbqs[hbqno].buffer_count++;
672 else
673 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
676 out:
677 spin_unlock_irqrestore(&phba->hbalock, flags);
678 return 0;
679 err:
680 spin_unlock_irqrestore(&phba->hbalock, flags);
681 return 1;
685 lpfc_sli_hbqbuf_add_hbqs(struct lpfc_hba *phba, uint32_t qno)
687 return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
688 lpfc_hbq_defs[qno]->add_count));
691 static int
692 lpfc_sli_hbqbuf_init_hbqs(struct lpfc_hba *phba, uint32_t qno)
694 return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
695 lpfc_hbq_defs[qno]->init_count));
698 static struct hbq_dmabuf *
699 lpfc_sli_hbqbuf_find(struct lpfc_hba *phba, uint32_t tag)
701 struct lpfc_dmabuf *d_buf;
702 struct hbq_dmabuf *hbq_buf;
703 uint32_t hbqno;
705 hbqno = tag >> 16;
706 if (hbqno >= LPFC_MAX_HBQS)
707 return NULL;
709 list_for_each_entry(d_buf, &phba->hbqs[hbqno].hbq_buffer_list, list) {
710 hbq_buf = container_of(d_buf, struct hbq_dmabuf, dbuf);
711 if (hbq_buf->tag == tag) {
712 return hbq_buf;
715 lpfc_printf_log(phba, KERN_ERR, LOG_SLI | LOG_VPORT,
716 "1803 Bad hbq tag. Data: x%x x%x\n",
717 tag, phba->hbqs[tag >> 16].buffer_count);
718 return NULL;
721 void
722 lpfc_sli_free_hbq(struct lpfc_hba *phba, struct hbq_dmabuf *hbq_buffer)
724 uint32_t hbqno;
726 if (hbq_buffer) {
727 hbqno = hbq_buffer->tag >> 16;
728 if (!lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer)) {
729 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
734 static int
735 lpfc_sli_chk_mbx_command(uint8_t mbxCommand)
737 uint8_t ret;
739 switch (mbxCommand) {
740 case MBX_LOAD_SM:
741 case MBX_READ_NV:
742 case MBX_WRITE_NV:
743 case MBX_WRITE_VPARMS:
744 case MBX_RUN_BIU_DIAG:
745 case MBX_INIT_LINK:
746 case MBX_DOWN_LINK:
747 case MBX_CONFIG_LINK:
748 case MBX_CONFIG_RING:
749 case MBX_RESET_RING:
750 case MBX_READ_CONFIG:
751 case MBX_READ_RCONFIG:
752 case MBX_READ_SPARM:
753 case MBX_READ_STATUS:
754 case MBX_READ_RPI:
755 case MBX_READ_XRI:
756 case MBX_READ_REV:
757 case MBX_READ_LNK_STAT:
758 case MBX_REG_LOGIN:
759 case MBX_UNREG_LOGIN:
760 case MBX_READ_LA:
761 case MBX_CLEAR_LA:
762 case MBX_DUMP_MEMORY:
763 case MBX_DUMP_CONTEXT:
764 case MBX_RUN_DIAGS:
765 case MBX_RESTART:
766 case MBX_UPDATE_CFG:
767 case MBX_DOWN_LOAD:
768 case MBX_DEL_LD_ENTRY:
769 case MBX_RUN_PROGRAM:
770 case MBX_SET_MASK:
771 case MBX_SET_VARIABLE:
772 case MBX_UNREG_D_ID:
773 case MBX_KILL_BOARD:
774 case MBX_CONFIG_FARP:
775 case MBX_BEACON:
776 case MBX_LOAD_AREA:
777 case MBX_RUN_BIU_DIAG64:
778 case MBX_CONFIG_PORT:
779 case MBX_READ_SPARM64:
780 case MBX_READ_RPI64:
781 case MBX_REG_LOGIN64:
782 case MBX_READ_LA64:
783 case MBX_WRITE_WWN:
784 case MBX_SET_DEBUG:
785 case MBX_LOAD_EXP_ROM:
786 case MBX_ASYNCEVT_ENABLE:
787 case MBX_REG_VPI:
788 case MBX_UNREG_VPI:
789 case MBX_HEARTBEAT:
790 ret = mbxCommand;
791 break;
792 default:
793 ret = MBX_SHUTDOWN;
794 break;
796 return ret;
798 static void
799 lpfc_sli_wake_mbox_wait(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmboxq)
801 wait_queue_head_t *pdone_q;
802 unsigned long drvr_flag;
805 * If pdone_q is empty, the driver thread gave up waiting and
806 * continued running.
808 pmboxq->mbox_flag |= LPFC_MBX_WAKE;
809 spin_lock_irqsave(&phba->hbalock, drvr_flag);
810 pdone_q = (wait_queue_head_t *) pmboxq->context1;
811 if (pdone_q)
812 wake_up_interruptible(pdone_q);
813 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
814 return;
817 void
818 lpfc_sli_def_mbox_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
820 struct lpfc_dmabuf *mp;
821 uint16_t rpi;
822 int rc;
824 mp = (struct lpfc_dmabuf *) (pmb->context1);
826 if (mp) {
827 lpfc_mbuf_free(phba, mp->virt, mp->phys);
828 kfree(mp);
832 * If a REG_LOGIN succeeded after node is destroyed or node
833 * is in re-discovery driver need to cleanup the RPI.
835 if (!(phba->pport->load_flag & FC_UNLOADING) &&
836 pmb->mb.mbxCommand == MBX_REG_LOGIN64 &&
837 !pmb->mb.mbxStatus) {
839 rpi = pmb->mb.un.varWords[0];
840 lpfc_unreg_login(phba, pmb->mb.un.varRegLogin.vpi, rpi, pmb);
841 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
842 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
843 if (rc != MBX_NOT_FINISHED)
844 return;
847 mempool_free(pmb, phba->mbox_mem_pool);
848 return;
852 lpfc_sli_handle_mb_event(struct lpfc_hba *phba)
854 MAILBOX_t *pmbox;
855 LPFC_MBOXQ_t *pmb;
856 int rc;
857 LIST_HEAD(cmplq);
859 phba->sli.slistat.mbox_event++;
861 /* Get all completed mailboxe buffers into the cmplq */
862 spin_lock_irq(&phba->hbalock);
863 list_splice_init(&phba->sli.mboxq_cmpl, &cmplq);
864 spin_unlock_irq(&phba->hbalock);
866 /* Get a Mailbox buffer to setup mailbox commands for callback */
867 do {
868 list_remove_head(&cmplq, pmb, LPFC_MBOXQ_t, list);
869 if (pmb == NULL)
870 break;
872 pmbox = &pmb->mb;
874 if (pmbox->mbxCommand != MBX_HEARTBEAT) {
875 if (pmb->vport) {
876 lpfc_debugfs_disc_trc(pmb->vport,
877 LPFC_DISC_TRC_MBOX_VPORT,
878 "MBOX cmpl vport: cmd:x%x mb:x%x x%x",
879 (uint32_t)pmbox->mbxCommand,
880 pmbox->un.varWords[0],
881 pmbox->un.varWords[1]);
883 else {
884 lpfc_debugfs_disc_trc(phba->pport,
885 LPFC_DISC_TRC_MBOX,
886 "MBOX cmpl: cmd:x%x mb:x%x x%x",
887 (uint32_t)pmbox->mbxCommand,
888 pmbox->un.varWords[0],
889 pmbox->un.varWords[1]);
894 * It is a fatal error if unknown mbox command completion.
896 if (lpfc_sli_chk_mbx_command(pmbox->mbxCommand) ==
897 MBX_SHUTDOWN) {
898 /* Unknow mailbox command compl */
899 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
900 "(%d):0323 Unknown Mailbox command "
901 "%x Cmpl\n",
902 pmb->vport ? pmb->vport->vpi : 0,
903 pmbox->mbxCommand);
904 phba->link_state = LPFC_HBA_ERROR;
905 phba->work_hs = HS_FFER3;
906 lpfc_handle_eratt(phba);
907 continue;
910 if (pmbox->mbxStatus) {
911 phba->sli.slistat.mbox_stat_err++;
912 if (pmbox->mbxStatus == MBXERR_NO_RESOURCES) {
913 /* Mbox cmd cmpl error - RETRYing */
914 lpfc_printf_log(phba, KERN_INFO,
915 LOG_MBOX | LOG_SLI,
916 "(%d):0305 Mbox cmd cmpl "
917 "error - RETRYing Data: x%x "
918 "x%x x%x x%x\n",
919 pmb->vport ? pmb->vport->vpi :0,
920 pmbox->mbxCommand,
921 pmbox->mbxStatus,
922 pmbox->un.varWords[0],
923 pmb->vport->port_state);
924 pmbox->mbxStatus = 0;
925 pmbox->mbxOwner = OWN_HOST;
926 spin_lock_irq(&phba->hbalock);
927 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
928 spin_unlock_irq(&phba->hbalock);
929 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
930 if (rc == MBX_SUCCESS)
931 continue;
935 /* Mailbox cmd <cmd> Cmpl <cmpl> */
936 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
937 "(%d):0307 Mailbox cmd x%x Cmpl x%p "
938 "Data: x%x x%x x%x x%x x%x x%x x%x x%x x%x\n",
939 pmb->vport ? pmb->vport->vpi : 0,
940 pmbox->mbxCommand,
941 pmb->mbox_cmpl,
942 *((uint32_t *) pmbox),
943 pmbox->un.varWords[0],
944 pmbox->un.varWords[1],
945 pmbox->un.varWords[2],
946 pmbox->un.varWords[3],
947 pmbox->un.varWords[4],
948 pmbox->un.varWords[5],
949 pmbox->un.varWords[6],
950 pmbox->un.varWords[7]);
952 if (pmb->mbox_cmpl)
953 pmb->mbox_cmpl(phba,pmb);
954 } while (1);
955 return 0;
958 static struct lpfc_dmabuf *
959 lpfc_sli_replace_hbqbuff(struct lpfc_hba *phba, uint32_t tag)
961 struct hbq_dmabuf *hbq_entry, *new_hbq_entry;
962 uint32_t hbqno;
963 void *virt; /* virtual address ptr */
964 dma_addr_t phys; /* mapped address */
965 unsigned long flags;
967 /* Check whether HBQ is still in use */
968 spin_lock_irqsave(&phba->hbalock, flags);
969 if (!phba->hbq_in_use) {
970 spin_unlock_irqrestore(&phba->hbalock, flags);
971 return NULL;
974 hbq_entry = lpfc_sli_hbqbuf_find(phba, tag);
975 if (hbq_entry == NULL) {
976 spin_unlock_irqrestore(&phba->hbalock, flags);
977 return NULL;
979 list_del(&hbq_entry->dbuf.list);
981 hbqno = tag >> 16;
982 new_hbq_entry = (phba->hbqs[hbqno].hbq_alloc_buffer)(phba);
983 if (new_hbq_entry == NULL) {
984 list_add_tail(&hbq_entry->dbuf.list, &phba->hbqbuf_in_list);
985 spin_unlock_irqrestore(&phba->hbalock, flags);
986 return &hbq_entry->dbuf;
988 new_hbq_entry->tag = -1;
989 phys = new_hbq_entry->dbuf.phys;
990 virt = new_hbq_entry->dbuf.virt;
991 new_hbq_entry->dbuf.phys = hbq_entry->dbuf.phys;
992 new_hbq_entry->dbuf.virt = hbq_entry->dbuf.virt;
993 hbq_entry->dbuf.phys = phys;
994 hbq_entry->dbuf.virt = virt;
995 lpfc_sli_free_hbq(phba, hbq_entry);
996 list_add_tail(&new_hbq_entry->dbuf.list, &phba->hbqbuf_in_list);
997 spin_unlock_irqrestore(&phba->hbalock, flags);
999 return &new_hbq_entry->dbuf;
1002 static struct lpfc_dmabuf *
1003 lpfc_sli_get_buff(struct lpfc_hba *phba,
1004 struct lpfc_sli_ring *pring,
1005 uint32_t tag)
1007 if (tag & QUE_BUFTAG_BIT)
1008 return lpfc_sli_ring_taggedbuf_get(phba, pring, tag);
1009 else
1010 return lpfc_sli_replace_hbqbuff(phba, tag);
1013 static int
1014 lpfc_sli_process_unsol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1015 struct lpfc_iocbq *saveq)
1017 IOCB_t * irsp;
1018 WORD5 * w5p;
1019 uint32_t Rctl, Type;
1020 uint32_t match, i;
1021 struct lpfc_iocbq *iocbq;
1022 struct lpfc_dmabuf *dmzbuf;
1024 match = 0;
1025 irsp = &(saveq->iocb);
1027 if (irsp->ulpStatus == IOSTAT_NEED_BUFFER)
1028 return 1;
1029 if (irsp->ulpCommand == CMD_ASYNC_STATUS) {
1030 if (pring->lpfc_sli_rcv_async_status)
1031 pring->lpfc_sli_rcv_async_status(phba, pring, saveq);
1032 else
1033 lpfc_printf_log(phba,
1034 KERN_WARNING,
1035 LOG_SLI,
1036 "0316 Ring %d handler: unexpected "
1037 "ASYNC_STATUS iocb received evt_code "
1038 "0x%x\n",
1039 pring->ringno,
1040 irsp->un.asyncstat.evt_code);
1041 return 1;
1044 if ((irsp->ulpCommand == CMD_IOCB_RET_XRI64_CX) &&
1045 (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED)) {
1046 if (irsp->ulpBdeCount > 0) {
1047 dmzbuf = lpfc_sli_get_buff(phba, pring,
1048 irsp->un.ulpWord[3]);
1049 lpfc_in_buf_free(phba, dmzbuf);
1052 if (irsp->ulpBdeCount > 1) {
1053 dmzbuf = lpfc_sli_get_buff(phba, pring,
1054 irsp->unsli3.sli3Words[3]);
1055 lpfc_in_buf_free(phba, dmzbuf);
1058 if (irsp->ulpBdeCount > 2) {
1059 dmzbuf = lpfc_sli_get_buff(phba, pring,
1060 irsp->unsli3.sli3Words[7]);
1061 lpfc_in_buf_free(phba, dmzbuf);
1064 return 1;
1067 if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
1068 if (irsp->ulpBdeCount != 0) {
1069 saveq->context2 = lpfc_sli_get_buff(phba, pring,
1070 irsp->un.ulpWord[3]);
1071 if (!saveq->context2)
1072 lpfc_printf_log(phba,
1073 KERN_ERR,
1074 LOG_SLI,
1075 "0341 Ring %d Cannot find buffer for "
1076 "an unsolicited iocb. tag 0x%x\n",
1077 pring->ringno,
1078 irsp->un.ulpWord[3]);
1080 if (irsp->ulpBdeCount == 2) {
1081 saveq->context3 = lpfc_sli_get_buff(phba, pring,
1082 irsp->unsli3.sli3Words[7]);
1083 if (!saveq->context3)
1084 lpfc_printf_log(phba,
1085 KERN_ERR,
1086 LOG_SLI,
1087 "0342 Ring %d Cannot find buffer for an"
1088 " unsolicited iocb. tag 0x%x\n",
1089 pring->ringno,
1090 irsp->unsli3.sli3Words[7]);
1092 list_for_each_entry(iocbq, &saveq->list, list) {
1093 irsp = &(iocbq->iocb);
1094 if (irsp->ulpBdeCount != 0) {
1095 iocbq->context2 = lpfc_sli_get_buff(phba, pring,
1096 irsp->un.ulpWord[3]);
1097 if (!iocbq->context2)
1098 lpfc_printf_log(phba,
1099 KERN_ERR,
1100 LOG_SLI,
1101 "0343 Ring %d Cannot find "
1102 "buffer for an unsolicited iocb"
1103 ". tag 0x%x\n", pring->ringno,
1104 irsp->un.ulpWord[3]);
1106 if (irsp->ulpBdeCount == 2) {
1107 iocbq->context3 = lpfc_sli_get_buff(phba, pring,
1108 irsp->unsli3.sli3Words[7]);
1109 if (!iocbq->context3)
1110 lpfc_printf_log(phba,
1111 KERN_ERR,
1112 LOG_SLI,
1113 "0344 Ring %d Cannot find "
1114 "buffer for an unsolicited "
1115 "iocb. tag 0x%x\n",
1116 pring->ringno,
1117 irsp->unsli3.sli3Words[7]);
1121 if (irsp->ulpBdeCount != 0 &&
1122 (irsp->ulpCommand == CMD_IOCB_RCV_CONT64_CX ||
1123 irsp->ulpStatus == IOSTAT_INTERMED_RSP)) {
1124 int found = 0;
1126 /* search continue save q for same XRI */
1127 list_for_each_entry(iocbq, &pring->iocb_continue_saveq, clist) {
1128 if (iocbq->iocb.ulpContext == saveq->iocb.ulpContext) {
1129 list_add_tail(&saveq->list, &iocbq->list);
1130 found = 1;
1131 break;
1134 if (!found)
1135 list_add_tail(&saveq->clist,
1136 &pring->iocb_continue_saveq);
1137 if (saveq->iocb.ulpStatus != IOSTAT_INTERMED_RSP) {
1138 list_del_init(&iocbq->clist);
1139 saveq = iocbq;
1140 irsp = &(saveq->iocb);
1141 } else
1142 return 0;
1144 if ((irsp->ulpCommand == CMD_RCV_ELS_REQ64_CX) ||
1145 (irsp->ulpCommand == CMD_RCV_ELS_REQ_CX) ||
1146 (irsp->ulpCommand == CMD_IOCB_RCV_ELS64_CX)) {
1147 Rctl = FC_ELS_REQ;
1148 Type = FC_ELS_DATA;
1149 } else {
1150 w5p = (WORD5 *)&(saveq->iocb.un.ulpWord[5]);
1151 Rctl = w5p->hcsw.Rctl;
1152 Type = w5p->hcsw.Type;
1154 /* Firmware Workaround */
1155 if ((Rctl == 0) && (pring->ringno == LPFC_ELS_RING) &&
1156 (irsp->ulpCommand == CMD_RCV_SEQUENCE64_CX ||
1157 irsp->ulpCommand == CMD_IOCB_RCV_SEQ64_CX)) {
1158 Rctl = FC_ELS_REQ;
1159 Type = FC_ELS_DATA;
1160 w5p->hcsw.Rctl = Rctl;
1161 w5p->hcsw.Type = Type;
1165 /* unSolicited Responses */
1166 if (pring->prt[0].profile) {
1167 if (pring->prt[0].lpfc_sli_rcv_unsol_event)
1168 (pring->prt[0].lpfc_sli_rcv_unsol_event) (phba, pring,
1169 saveq);
1170 match = 1;
1171 } else {
1172 /* We must search, based on rctl / type
1173 for the right routine */
1174 for (i = 0; i < pring->num_mask; i++) {
1175 if ((pring->prt[i].rctl == Rctl)
1176 && (pring->prt[i].type == Type)) {
1177 if (pring->prt[i].lpfc_sli_rcv_unsol_event)
1178 (pring->prt[i].lpfc_sli_rcv_unsol_event)
1179 (phba, pring, saveq);
1180 match = 1;
1181 break;
1185 if (match == 0) {
1186 /* Unexpected Rctl / Type received */
1187 /* Ring <ringno> handler: unexpected
1188 Rctl <Rctl> Type <Type> received */
1189 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1190 "0313 Ring %d handler: unexpected Rctl x%x "
1191 "Type x%x received\n",
1192 pring->ringno, Rctl, Type);
1194 return 1;
1197 static struct lpfc_iocbq *
1198 lpfc_sli_iocbq_lookup(struct lpfc_hba *phba,
1199 struct lpfc_sli_ring *pring,
1200 struct lpfc_iocbq *prspiocb)
1202 struct lpfc_iocbq *cmd_iocb = NULL;
1203 uint16_t iotag;
1205 iotag = prspiocb->iocb.ulpIoTag;
1207 if (iotag != 0 && iotag <= phba->sli.last_iotag) {
1208 cmd_iocb = phba->sli.iocbq_lookup[iotag];
1209 list_del_init(&cmd_iocb->list);
1210 pring->txcmplq_cnt--;
1211 return cmd_iocb;
1214 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1215 "0317 iotag x%x is out off "
1216 "range: max iotag x%x wd0 x%x\n",
1217 iotag, phba->sli.last_iotag,
1218 *(((uint32_t *) &prspiocb->iocb) + 7));
1219 return NULL;
1222 static int
1223 lpfc_sli_process_sol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1224 struct lpfc_iocbq *saveq)
1226 struct lpfc_iocbq *cmdiocbp;
1227 int rc = 1;
1228 unsigned long iflag;
1230 /* Based on the iotag field, get the cmd IOCB from the txcmplq */
1231 spin_lock_irqsave(&phba->hbalock, iflag);
1232 cmdiocbp = lpfc_sli_iocbq_lookup(phba, pring, saveq);
1233 spin_unlock_irqrestore(&phba->hbalock, iflag);
1235 if (cmdiocbp) {
1236 if (cmdiocbp->iocb_cmpl) {
1238 * Post all ELS completions to the worker thread.
1239 * All other are passed to the completion callback.
1241 if (pring->ringno == LPFC_ELS_RING) {
1242 if (cmdiocbp->iocb_flag & LPFC_DRIVER_ABORTED) {
1243 cmdiocbp->iocb_flag &=
1244 ~LPFC_DRIVER_ABORTED;
1245 saveq->iocb.ulpStatus =
1246 IOSTAT_LOCAL_REJECT;
1247 saveq->iocb.un.ulpWord[4] =
1248 IOERR_SLI_ABORTED;
1250 /* Firmware could still be in progress
1251 * of DMAing payload, so don't free data
1252 * buffer till after a hbeat.
1254 saveq->iocb_flag |= LPFC_DELAY_MEM_FREE;
1257 (cmdiocbp->iocb_cmpl) (phba, cmdiocbp, saveq);
1258 } else
1259 lpfc_sli_release_iocbq(phba, cmdiocbp);
1260 } else {
1262 * Unknown initiating command based on the response iotag.
1263 * This could be the case on the ELS ring because of
1264 * lpfc_els_abort().
1266 if (pring->ringno != LPFC_ELS_RING) {
1268 * Ring <ringno> handler: unexpected completion IoTag
1269 * <IoTag>
1271 lpfc_printf_vlog(cmdiocbp->vport, KERN_WARNING, LOG_SLI,
1272 "0322 Ring %d handler: "
1273 "unexpected completion IoTag x%x "
1274 "Data: x%x x%x x%x x%x\n",
1275 pring->ringno,
1276 saveq->iocb.ulpIoTag,
1277 saveq->iocb.ulpStatus,
1278 saveq->iocb.un.ulpWord[4],
1279 saveq->iocb.ulpCommand,
1280 saveq->iocb.ulpContext);
1284 return rc;
1287 static void
1288 lpfc_sli_rsp_pointers_error(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1290 struct lpfc_pgp *pgp = (phba->sli_rev == 3) ?
1291 &phba->slim2p->mbx.us.s3_pgp.port[pring->ringno] :
1292 &phba->slim2p->mbx.us.s2.port[pring->ringno];
1294 * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
1295 * rsp ring <portRspMax>
1297 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1298 "0312 Ring %d handler: portRspPut %d "
1299 "is bigger then rsp ring %d\n",
1300 pring->ringno, le32_to_cpu(pgp->rspPutInx),
1301 pring->numRiocb);
1303 phba->link_state = LPFC_HBA_ERROR;
1306 * All error attention handlers are posted to
1307 * worker thread
1309 phba->work_ha |= HA_ERATT;
1310 phba->work_hs = HS_FFER3;
1312 /* hbalock should already be held */
1313 if (phba->work_wait)
1314 lpfc_worker_wake_up(phba);
1316 return;
1319 void lpfc_sli_poll_fcp_ring(struct lpfc_hba *phba)
1321 struct lpfc_sli *psli = &phba->sli;
1322 struct lpfc_sli_ring *pring = &psli->ring[LPFC_FCP_RING];
1323 IOCB_t *irsp = NULL;
1324 IOCB_t *entry = NULL;
1325 struct lpfc_iocbq *cmdiocbq = NULL;
1326 struct lpfc_iocbq rspiocbq;
1327 struct lpfc_pgp *pgp;
1328 uint32_t status;
1329 uint32_t portRspPut, portRspMax;
1330 int type;
1331 uint32_t rsp_cmpl = 0;
1332 uint32_t ha_copy;
1333 unsigned long iflags;
1335 pring->stats.iocb_event++;
1337 pgp = (phba->sli_rev == 3) ?
1338 &phba->slim2p->mbx.us.s3_pgp.port[pring->ringno] :
1339 &phba->slim2p->mbx.us.s2.port[pring->ringno];
1343 * The next available response entry should never exceed the maximum
1344 * entries. If it does, treat it as an adapter hardware error.
1346 portRspMax = pring->numRiocb;
1347 portRspPut = le32_to_cpu(pgp->rspPutInx);
1348 if (unlikely(portRspPut >= portRspMax)) {
1349 lpfc_sli_rsp_pointers_error(phba, pring);
1350 return;
1353 rmb();
1354 while (pring->rspidx != portRspPut) {
1355 entry = lpfc_resp_iocb(phba, pring);
1356 if (++pring->rspidx >= portRspMax)
1357 pring->rspidx = 0;
1359 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
1360 (uint32_t *) &rspiocbq.iocb,
1361 phba->iocb_rsp_size);
1362 irsp = &rspiocbq.iocb;
1363 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
1364 pring->stats.iocb_rsp++;
1365 rsp_cmpl++;
1367 if (unlikely(irsp->ulpStatus)) {
1368 /* Rsp ring <ringno> error: IOCB */
1369 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1370 "0326 Rsp Ring %d error: IOCB Data: "
1371 "x%x x%x x%x x%x x%x x%x x%x x%x\n",
1372 pring->ringno,
1373 irsp->un.ulpWord[0],
1374 irsp->un.ulpWord[1],
1375 irsp->un.ulpWord[2],
1376 irsp->un.ulpWord[3],
1377 irsp->un.ulpWord[4],
1378 irsp->un.ulpWord[5],
1379 *(((uint32_t *) irsp) + 6),
1380 *(((uint32_t *) irsp) + 7));
1383 switch (type) {
1384 case LPFC_ABORT_IOCB:
1385 case LPFC_SOL_IOCB:
1387 * Idle exchange closed via ABTS from port. No iocb
1388 * resources need to be recovered.
1390 if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
1391 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1392 "0314 IOCB cmd 0x%x "
1393 "processed. Skipping "
1394 "completion",
1395 irsp->ulpCommand);
1396 break;
1399 spin_lock_irqsave(&phba->hbalock, iflags);
1400 cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
1401 &rspiocbq);
1402 spin_unlock_irqrestore(&phba->hbalock, iflags);
1403 if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
1404 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1405 &rspiocbq);
1407 break;
1408 default:
1409 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1410 char adaptermsg[LPFC_MAX_ADPTMSG];
1411 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
1412 memcpy(&adaptermsg[0], (uint8_t *) irsp,
1413 MAX_MSG_DATA);
1414 dev_warn(&((phba->pcidev)->dev),
1415 "lpfc%d: %s\n",
1416 phba->brd_no, adaptermsg);
1417 } else {
1418 /* Unknown IOCB command */
1419 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1420 "0321 Unknown IOCB command "
1421 "Data: x%x, x%x x%x x%x x%x\n",
1422 type, irsp->ulpCommand,
1423 irsp->ulpStatus,
1424 irsp->ulpIoTag,
1425 irsp->ulpContext);
1427 break;
1431 * The response IOCB has been processed. Update the ring
1432 * pointer in SLIM. If the port response put pointer has not
1433 * been updated, sync the pgp->rspPutInx and fetch the new port
1434 * response put pointer.
1436 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
1438 if (pring->rspidx == portRspPut)
1439 portRspPut = le32_to_cpu(pgp->rspPutInx);
1442 ha_copy = readl(phba->HAregaddr);
1443 ha_copy >>= (LPFC_FCP_RING * 4);
1445 if ((rsp_cmpl > 0) && (ha_copy & HA_R0RE_REQ)) {
1446 spin_lock_irqsave(&phba->hbalock, iflags);
1447 pring->stats.iocb_rsp_full++;
1448 status = ((CA_R0ATT | CA_R0RE_RSP) << (LPFC_FCP_RING * 4));
1449 writel(status, phba->CAregaddr);
1450 readl(phba->CAregaddr);
1451 spin_unlock_irqrestore(&phba->hbalock, iflags);
1453 if ((ha_copy & HA_R0CE_RSP) &&
1454 (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1455 spin_lock_irqsave(&phba->hbalock, iflags);
1456 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1457 pring->stats.iocb_cmd_empty++;
1459 /* Force update of the local copy of cmdGetInx */
1460 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1461 lpfc_sli_resume_iocb(phba, pring);
1463 if ((pring->lpfc_sli_cmd_available))
1464 (pring->lpfc_sli_cmd_available) (phba, pring);
1466 spin_unlock_irqrestore(&phba->hbalock, iflags);
1469 return;
1473 * This routine presumes LPFC_FCP_RING handling and doesn't bother
1474 * to check it explicitly.
1476 static int
1477 lpfc_sli_handle_fast_ring_event(struct lpfc_hba *phba,
1478 struct lpfc_sli_ring *pring, uint32_t mask)
1480 struct lpfc_pgp *pgp = (phba->sli_rev == 3) ?
1481 &phba->slim2p->mbx.us.s3_pgp.port[pring->ringno] :
1482 &phba->slim2p->mbx.us.s2.port[pring->ringno];
1483 IOCB_t *irsp = NULL;
1484 IOCB_t *entry = NULL;
1485 struct lpfc_iocbq *cmdiocbq = NULL;
1486 struct lpfc_iocbq rspiocbq;
1487 uint32_t status;
1488 uint32_t portRspPut, portRspMax;
1489 int rc = 1;
1490 lpfc_iocb_type type;
1491 unsigned long iflag;
1492 uint32_t rsp_cmpl = 0;
1494 spin_lock_irqsave(&phba->hbalock, iflag);
1495 pring->stats.iocb_event++;
1498 * The next available response entry should never exceed the maximum
1499 * entries. If it does, treat it as an adapter hardware error.
1501 portRspMax = pring->numRiocb;
1502 portRspPut = le32_to_cpu(pgp->rspPutInx);
1503 if (unlikely(portRspPut >= portRspMax)) {
1504 lpfc_sli_rsp_pointers_error(phba, pring);
1505 spin_unlock_irqrestore(&phba->hbalock, iflag);
1506 return 1;
1509 rmb();
1510 while (pring->rspidx != portRspPut) {
1512 * Fetch an entry off the ring and copy it into a local data
1513 * structure. The copy involves a byte-swap since the
1514 * network byte order and pci byte orders are different.
1516 entry = lpfc_resp_iocb(phba, pring);
1517 phba->last_completion_time = jiffies;
1519 if (++pring->rspidx >= portRspMax)
1520 pring->rspidx = 0;
1522 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
1523 (uint32_t *) &rspiocbq.iocb,
1524 phba->iocb_rsp_size);
1525 INIT_LIST_HEAD(&(rspiocbq.list));
1526 irsp = &rspiocbq.iocb;
1528 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
1529 pring->stats.iocb_rsp++;
1530 rsp_cmpl++;
1532 if (unlikely(irsp->ulpStatus)) {
1534 * If resource errors reported from HBA, reduce
1535 * queuedepths of the SCSI device.
1537 if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
1538 (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
1539 spin_unlock_irqrestore(&phba->hbalock, iflag);
1540 lpfc_adjust_queue_depth(phba);
1541 spin_lock_irqsave(&phba->hbalock, iflag);
1544 /* Rsp ring <ringno> error: IOCB */
1545 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1546 "0336 Rsp Ring %d error: IOCB Data: "
1547 "x%x x%x x%x x%x x%x x%x x%x x%x\n",
1548 pring->ringno,
1549 irsp->un.ulpWord[0],
1550 irsp->un.ulpWord[1],
1551 irsp->un.ulpWord[2],
1552 irsp->un.ulpWord[3],
1553 irsp->un.ulpWord[4],
1554 irsp->un.ulpWord[5],
1555 *(((uint32_t *) irsp) + 6),
1556 *(((uint32_t *) irsp) + 7));
1559 switch (type) {
1560 case LPFC_ABORT_IOCB:
1561 case LPFC_SOL_IOCB:
1563 * Idle exchange closed via ABTS from port. No iocb
1564 * resources need to be recovered.
1566 if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
1567 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1568 "0333 IOCB cmd 0x%x"
1569 " processed. Skipping"
1570 " completion\n",
1571 irsp->ulpCommand);
1572 break;
1575 cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
1576 &rspiocbq);
1577 if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
1578 if (phba->cfg_poll & ENABLE_FCP_RING_POLLING) {
1579 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1580 &rspiocbq);
1581 } else {
1582 spin_unlock_irqrestore(&phba->hbalock,
1583 iflag);
1584 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1585 &rspiocbq);
1586 spin_lock_irqsave(&phba->hbalock,
1587 iflag);
1590 break;
1591 case LPFC_UNSOL_IOCB:
1592 spin_unlock_irqrestore(&phba->hbalock, iflag);
1593 lpfc_sli_process_unsol_iocb(phba, pring, &rspiocbq);
1594 spin_lock_irqsave(&phba->hbalock, iflag);
1595 break;
1596 default:
1597 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1598 char adaptermsg[LPFC_MAX_ADPTMSG];
1599 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
1600 memcpy(&adaptermsg[0], (uint8_t *) irsp,
1601 MAX_MSG_DATA);
1602 dev_warn(&((phba->pcidev)->dev),
1603 "lpfc%d: %s\n",
1604 phba->brd_no, adaptermsg);
1605 } else {
1606 /* Unknown IOCB command */
1607 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1608 "0334 Unknown IOCB command "
1609 "Data: x%x, x%x x%x x%x x%x\n",
1610 type, irsp->ulpCommand,
1611 irsp->ulpStatus,
1612 irsp->ulpIoTag,
1613 irsp->ulpContext);
1615 break;
1619 * The response IOCB has been processed. Update the ring
1620 * pointer in SLIM. If the port response put pointer has not
1621 * been updated, sync the pgp->rspPutInx and fetch the new port
1622 * response put pointer.
1624 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
1626 if (pring->rspidx == portRspPut)
1627 portRspPut = le32_to_cpu(pgp->rspPutInx);
1630 if ((rsp_cmpl > 0) && (mask & HA_R0RE_REQ)) {
1631 pring->stats.iocb_rsp_full++;
1632 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
1633 writel(status, phba->CAregaddr);
1634 readl(phba->CAregaddr);
1636 if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1637 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1638 pring->stats.iocb_cmd_empty++;
1640 /* Force update of the local copy of cmdGetInx */
1641 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1642 lpfc_sli_resume_iocb(phba, pring);
1644 if ((pring->lpfc_sli_cmd_available))
1645 (pring->lpfc_sli_cmd_available) (phba, pring);
1649 spin_unlock_irqrestore(&phba->hbalock, iflag);
1650 return rc;
1654 lpfc_sli_handle_slow_ring_event(struct lpfc_hba *phba,
1655 struct lpfc_sli_ring *pring, uint32_t mask)
1657 struct lpfc_pgp *pgp = (phba->sli_rev == 3) ?
1658 &phba->slim2p->mbx.us.s3_pgp.port[pring->ringno] :
1659 &phba->slim2p->mbx.us.s2.port[pring->ringno];
1660 IOCB_t *entry;
1661 IOCB_t *irsp = NULL;
1662 struct lpfc_iocbq *rspiocbp = NULL;
1663 struct lpfc_iocbq *next_iocb;
1664 struct lpfc_iocbq *cmdiocbp;
1665 struct lpfc_iocbq *saveq;
1666 uint8_t iocb_cmd_type;
1667 lpfc_iocb_type type;
1668 uint32_t status, free_saveq;
1669 uint32_t portRspPut, portRspMax;
1670 int rc = 1;
1671 unsigned long iflag;
1673 spin_lock_irqsave(&phba->hbalock, iflag);
1674 pring->stats.iocb_event++;
1677 * The next available response entry should never exceed the maximum
1678 * entries. If it does, treat it as an adapter hardware error.
1680 portRspMax = pring->numRiocb;
1681 portRspPut = le32_to_cpu(pgp->rspPutInx);
1682 if (portRspPut >= portRspMax) {
1684 * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
1685 * rsp ring <portRspMax>
1687 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1688 "0303 Ring %d handler: portRspPut %d "
1689 "is bigger then rsp ring %d\n",
1690 pring->ringno, portRspPut, portRspMax);
1692 phba->link_state = LPFC_HBA_ERROR;
1693 spin_unlock_irqrestore(&phba->hbalock, iflag);
1695 phba->work_hs = HS_FFER3;
1696 lpfc_handle_eratt(phba);
1698 return 1;
1701 rmb();
1702 while (pring->rspidx != portRspPut) {
1704 * Build a completion list and call the appropriate handler.
1705 * The process is to get the next available response iocb, get
1706 * a free iocb from the list, copy the response data into the
1707 * free iocb, insert to the continuation list, and update the
1708 * next response index to slim. This process makes response
1709 * iocb's in the ring available to DMA as fast as possible but
1710 * pays a penalty for a copy operation. Since the iocb is
1711 * only 32 bytes, this penalty is considered small relative to
1712 * the PCI reads for register values and a slim write. When
1713 * the ulpLe field is set, the entire Command has been
1714 * received.
1716 entry = lpfc_resp_iocb(phba, pring);
1718 phba->last_completion_time = jiffies;
1719 rspiocbp = __lpfc_sli_get_iocbq(phba);
1720 if (rspiocbp == NULL) {
1721 printk(KERN_ERR "%s: out of buffers! Failing "
1722 "completion.\n", __FUNCTION__);
1723 break;
1726 lpfc_sli_pcimem_bcopy(entry, &rspiocbp->iocb,
1727 phba->iocb_rsp_size);
1728 irsp = &rspiocbp->iocb;
1730 if (++pring->rspidx >= portRspMax)
1731 pring->rspidx = 0;
1733 if (pring->ringno == LPFC_ELS_RING) {
1734 lpfc_debugfs_slow_ring_trc(phba,
1735 "IOCB rsp ring: wd4:x%08x wd6:x%08x wd7:x%08x",
1736 *(((uint32_t *) irsp) + 4),
1737 *(((uint32_t *) irsp) + 6),
1738 *(((uint32_t *) irsp) + 7));
1741 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
1743 list_add_tail(&rspiocbp->list, &(pring->iocb_continueq));
1745 pring->iocb_continueq_cnt++;
1746 if (irsp->ulpLe) {
1748 * By default, the driver expects to free all resources
1749 * associated with this iocb completion.
1751 free_saveq = 1;
1752 saveq = list_get_first(&pring->iocb_continueq,
1753 struct lpfc_iocbq, list);
1754 irsp = &(saveq->iocb);
1755 list_del_init(&pring->iocb_continueq);
1756 pring->iocb_continueq_cnt = 0;
1758 pring->stats.iocb_rsp++;
1761 * If resource errors reported from HBA, reduce
1762 * queuedepths of the SCSI device.
1764 if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
1765 (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
1766 spin_unlock_irqrestore(&phba->hbalock, iflag);
1767 lpfc_adjust_queue_depth(phba);
1768 spin_lock_irqsave(&phba->hbalock, iflag);
1771 if (irsp->ulpStatus) {
1772 /* Rsp ring <ringno> error: IOCB */
1773 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1774 "0328 Rsp Ring %d error: "
1775 "IOCB Data: "
1776 "x%x x%x x%x x%x "
1777 "x%x x%x x%x x%x "
1778 "x%x x%x x%x x%x "
1779 "x%x x%x x%x x%x\n",
1780 pring->ringno,
1781 irsp->un.ulpWord[0],
1782 irsp->un.ulpWord[1],
1783 irsp->un.ulpWord[2],
1784 irsp->un.ulpWord[3],
1785 irsp->un.ulpWord[4],
1786 irsp->un.ulpWord[5],
1787 *(((uint32_t *) irsp) + 6),
1788 *(((uint32_t *) irsp) + 7),
1789 *(((uint32_t *) irsp) + 8),
1790 *(((uint32_t *) irsp) + 9),
1791 *(((uint32_t *) irsp) + 10),
1792 *(((uint32_t *) irsp) + 11),
1793 *(((uint32_t *) irsp) + 12),
1794 *(((uint32_t *) irsp) + 13),
1795 *(((uint32_t *) irsp) + 14),
1796 *(((uint32_t *) irsp) + 15));
1800 * Fetch the IOCB command type and call the correct
1801 * completion routine. Solicited and Unsolicited
1802 * IOCBs on the ELS ring get freed back to the
1803 * lpfc_iocb_list by the discovery kernel thread.
1805 iocb_cmd_type = irsp->ulpCommand & CMD_IOCB_MASK;
1806 type = lpfc_sli_iocb_cmd_type(iocb_cmd_type);
1807 if (type == LPFC_SOL_IOCB) {
1808 spin_unlock_irqrestore(&phba->hbalock, iflag);
1809 rc = lpfc_sli_process_sol_iocb(phba, pring,
1810 saveq);
1811 spin_lock_irqsave(&phba->hbalock, iflag);
1812 } else if (type == LPFC_UNSOL_IOCB) {
1813 spin_unlock_irqrestore(&phba->hbalock, iflag);
1814 rc = lpfc_sli_process_unsol_iocb(phba, pring,
1815 saveq);
1816 spin_lock_irqsave(&phba->hbalock, iflag);
1817 if (!rc)
1818 free_saveq = 0;
1819 } else if (type == LPFC_ABORT_IOCB) {
1820 if ((irsp->ulpCommand != CMD_XRI_ABORTED_CX) &&
1821 ((cmdiocbp =
1822 lpfc_sli_iocbq_lookup(phba, pring,
1823 saveq)))) {
1824 /* Call the specified completion
1825 routine */
1826 if (cmdiocbp->iocb_cmpl) {
1827 spin_unlock_irqrestore(
1828 &phba->hbalock,
1829 iflag);
1830 (cmdiocbp->iocb_cmpl) (phba,
1831 cmdiocbp, saveq);
1832 spin_lock_irqsave(
1833 &phba->hbalock,
1834 iflag);
1835 } else
1836 __lpfc_sli_release_iocbq(phba,
1837 cmdiocbp);
1839 } else if (type == LPFC_UNKNOWN_IOCB) {
1840 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1842 char adaptermsg[LPFC_MAX_ADPTMSG];
1844 memset(adaptermsg, 0,
1845 LPFC_MAX_ADPTMSG);
1846 memcpy(&adaptermsg[0], (uint8_t *) irsp,
1847 MAX_MSG_DATA);
1848 dev_warn(&((phba->pcidev)->dev),
1849 "lpfc%d: %s\n",
1850 phba->brd_no, adaptermsg);
1851 } else {
1852 /* Unknown IOCB command */
1853 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1854 "0335 Unknown IOCB "
1855 "command Data: x%x "
1856 "x%x x%x x%x\n",
1857 irsp->ulpCommand,
1858 irsp->ulpStatus,
1859 irsp->ulpIoTag,
1860 irsp->ulpContext);
1864 if (free_saveq) {
1865 list_for_each_entry_safe(rspiocbp, next_iocb,
1866 &saveq->list, list) {
1867 list_del(&rspiocbp->list);
1868 __lpfc_sli_release_iocbq(phba,
1869 rspiocbp);
1871 __lpfc_sli_release_iocbq(phba, saveq);
1873 rspiocbp = NULL;
1877 * If the port response put pointer has not been updated, sync
1878 * the pgp->rspPutInx in the MAILBOX_tand fetch the new port
1879 * response put pointer.
1881 if (pring->rspidx == portRspPut) {
1882 portRspPut = le32_to_cpu(pgp->rspPutInx);
1884 } /* while (pring->rspidx != portRspPut) */
1886 if ((rspiocbp != NULL) && (mask & HA_R0RE_REQ)) {
1887 /* At least one response entry has been freed */
1888 pring->stats.iocb_rsp_full++;
1889 /* SET RxRE_RSP in Chip Att register */
1890 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
1891 writel(status, phba->CAregaddr);
1892 readl(phba->CAregaddr); /* flush */
1894 if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1895 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1896 pring->stats.iocb_cmd_empty++;
1898 /* Force update of the local copy of cmdGetInx */
1899 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1900 lpfc_sli_resume_iocb(phba, pring);
1902 if ((pring->lpfc_sli_cmd_available))
1903 (pring->lpfc_sli_cmd_available) (phba, pring);
1907 spin_unlock_irqrestore(&phba->hbalock, iflag);
1908 return rc;
1911 void
1912 lpfc_sli_abort_iocb_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1914 LIST_HEAD(completions);
1915 struct lpfc_iocbq *iocb, *next_iocb;
1916 IOCB_t *cmd = NULL;
1918 if (pring->ringno == LPFC_ELS_RING) {
1919 lpfc_fabric_abort_hba(phba);
1922 /* Error everything on txq and txcmplq
1923 * First do the txq.
1925 spin_lock_irq(&phba->hbalock);
1926 list_splice_init(&pring->txq, &completions);
1927 pring->txq_cnt = 0;
1929 /* Next issue ABTS for everything on the txcmplq */
1930 list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list)
1931 lpfc_sli_issue_abort_iotag(phba, pring, iocb);
1933 spin_unlock_irq(&phba->hbalock);
1935 while (!list_empty(&completions)) {
1936 iocb = list_get_first(&completions, struct lpfc_iocbq, list);
1937 cmd = &iocb->iocb;
1938 list_del_init(&iocb->list);
1940 if (!iocb->iocb_cmpl)
1941 lpfc_sli_release_iocbq(phba, iocb);
1942 else {
1943 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
1944 cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
1945 (iocb->iocb_cmpl) (phba, iocb, iocb);
1951 lpfc_sli_brdready(struct lpfc_hba *phba, uint32_t mask)
1953 uint32_t status;
1954 int i = 0;
1955 int retval = 0;
1957 /* Read the HBA Host Status Register */
1958 status = readl(phba->HSregaddr);
1961 * Check status register every 100ms for 5 retries, then every
1962 * 500ms for 5, then every 2.5 sec for 5, then reset board and
1963 * every 2.5 sec for 4.
1964 * Break our of the loop if errors occurred during init.
1966 while (((status & mask) != mask) &&
1967 !(status & HS_FFERM) &&
1968 i++ < 20) {
1970 if (i <= 5)
1971 msleep(10);
1972 else if (i <= 10)
1973 msleep(500);
1974 else
1975 msleep(2500);
1977 if (i == 15) {
1978 /* Do post */
1979 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
1980 lpfc_sli_brdrestart(phba);
1982 /* Read the HBA Host Status Register */
1983 status = readl(phba->HSregaddr);
1986 /* Check to see if any errors occurred during init */
1987 if ((status & HS_FFERM) || (i >= 20)) {
1988 phba->link_state = LPFC_HBA_ERROR;
1989 retval = 1;
1992 return retval;
1995 #define BARRIER_TEST_PATTERN (0xdeadbeef)
1997 void lpfc_reset_barrier(struct lpfc_hba *phba)
1999 uint32_t __iomem *resp_buf;
2000 uint32_t __iomem *mbox_buf;
2001 volatile uint32_t mbox;
2002 uint32_t hc_copy;
2003 int i;
2004 uint8_t hdrtype;
2006 pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
2007 if (hdrtype != 0x80 ||
2008 (FC_JEDEC_ID(phba->vpd.rev.biuRev) != HELIOS_JEDEC_ID &&
2009 FC_JEDEC_ID(phba->vpd.rev.biuRev) != THOR_JEDEC_ID))
2010 return;
2013 * Tell the other part of the chip to suspend temporarily all
2014 * its DMA activity.
2016 resp_buf = phba->MBslimaddr;
2018 /* Disable the error attention */
2019 hc_copy = readl(phba->HCregaddr);
2020 writel((hc_copy & ~HC_ERINT_ENA), phba->HCregaddr);
2021 readl(phba->HCregaddr); /* flush */
2022 phba->link_flag |= LS_IGNORE_ERATT;
2024 if (readl(phba->HAregaddr) & HA_ERATT) {
2025 /* Clear Chip error bit */
2026 writel(HA_ERATT, phba->HAregaddr);
2027 phba->pport->stopped = 1;
2030 mbox = 0;
2031 ((MAILBOX_t *)&mbox)->mbxCommand = MBX_KILL_BOARD;
2032 ((MAILBOX_t *)&mbox)->mbxOwner = OWN_CHIP;
2034 writel(BARRIER_TEST_PATTERN, (resp_buf + 1));
2035 mbox_buf = phba->MBslimaddr;
2036 writel(mbox, mbox_buf);
2038 for (i = 0;
2039 readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN) && i < 50; i++)
2040 mdelay(1);
2042 if (readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN)) {
2043 if (phba->sli.sli_flag & LPFC_SLI2_ACTIVE ||
2044 phba->pport->stopped)
2045 goto restore_hc;
2046 else
2047 goto clear_errat;
2050 ((MAILBOX_t *)&mbox)->mbxOwner = OWN_HOST;
2051 for (i = 0; readl(resp_buf) != mbox && i < 500; i++)
2052 mdelay(1);
2054 clear_errat:
2056 while (!(readl(phba->HAregaddr) & HA_ERATT) && ++i < 500)
2057 mdelay(1);
2059 if (readl(phba->HAregaddr) & HA_ERATT) {
2060 writel(HA_ERATT, phba->HAregaddr);
2061 phba->pport->stopped = 1;
2064 restore_hc:
2065 phba->link_flag &= ~LS_IGNORE_ERATT;
2066 writel(hc_copy, phba->HCregaddr);
2067 readl(phba->HCregaddr); /* flush */
2071 lpfc_sli_brdkill(struct lpfc_hba *phba)
2073 struct lpfc_sli *psli;
2074 LPFC_MBOXQ_t *pmb;
2075 uint32_t status;
2076 uint32_t ha_copy;
2077 int retval;
2078 int i = 0;
2080 psli = &phba->sli;
2082 /* Kill HBA */
2083 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2084 "0329 Kill HBA Data: x%x x%x\n",
2085 phba->pport->port_state, psli->sli_flag);
2087 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2088 if (!pmb)
2089 return 1;
2091 /* Disable the error attention */
2092 spin_lock_irq(&phba->hbalock);
2093 status = readl(phba->HCregaddr);
2094 status &= ~HC_ERINT_ENA;
2095 writel(status, phba->HCregaddr);
2096 readl(phba->HCregaddr); /* flush */
2097 phba->link_flag |= LS_IGNORE_ERATT;
2098 spin_unlock_irq(&phba->hbalock);
2100 lpfc_kill_board(phba, pmb);
2101 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2102 retval = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
2104 if (retval != MBX_SUCCESS) {
2105 if (retval != MBX_BUSY)
2106 mempool_free(pmb, phba->mbox_mem_pool);
2107 spin_lock_irq(&phba->hbalock);
2108 phba->link_flag &= ~LS_IGNORE_ERATT;
2109 spin_unlock_irq(&phba->hbalock);
2110 return 1;
2113 psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
2115 mempool_free(pmb, phba->mbox_mem_pool);
2117 /* There is no completion for a KILL_BOARD mbox cmd. Check for an error
2118 * attention every 100ms for 3 seconds. If we don't get ERATT after
2119 * 3 seconds we still set HBA_ERROR state because the status of the
2120 * board is now undefined.
2122 ha_copy = readl(phba->HAregaddr);
2124 while ((i++ < 30) && !(ha_copy & HA_ERATT)) {
2125 mdelay(100);
2126 ha_copy = readl(phba->HAregaddr);
2129 del_timer_sync(&psli->mbox_tmo);
2130 if (ha_copy & HA_ERATT) {
2131 writel(HA_ERATT, phba->HAregaddr);
2132 phba->pport->stopped = 1;
2134 spin_lock_irq(&phba->hbalock);
2135 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2136 phba->link_flag &= ~LS_IGNORE_ERATT;
2137 spin_unlock_irq(&phba->hbalock);
2139 psli->mbox_active = NULL;
2140 lpfc_hba_down_post(phba);
2141 phba->link_state = LPFC_HBA_ERROR;
2143 return ha_copy & HA_ERATT ? 0 : 1;
2147 lpfc_sli_brdreset(struct lpfc_hba *phba)
2149 struct lpfc_sli *psli;
2150 struct lpfc_sli_ring *pring;
2151 uint16_t cfg_value;
2152 int i;
2154 psli = &phba->sli;
2156 /* Reset HBA */
2157 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2158 "0325 Reset HBA Data: x%x x%x\n",
2159 phba->pport->port_state, psli->sli_flag);
2161 /* perform board reset */
2162 phba->fc_eventTag = 0;
2163 phba->pport->fc_myDID = 0;
2164 phba->pport->fc_prevDID = 0;
2166 /* Turn off parity checking and serr during the physical reset */
2167 pci_read_config_word(phba->pcidev, PCI_COMMAND, &cfg_value);
2168 pci_write_config_word(phba->pcidev, PCI_COMMAND,
2169 (cfg_value &
2170 ~(PCI_COMMAND_PARITY | PCI_COMMAND_SERR)));
2172 psli->sli_flag &= ~(LPFC_SLI2_ACTIVE | LPFC_PROCESS_LA);
2173 /* Now toggle INITFF bit in the Host Control Register */
2174 writel(HC_INITFF, phba->HCregaddr);
2175 mdelay(1);
2176 readl(phba->HCregaddr); /* flush */
2177 writel(0, phba->HCregaddr);
2178 readl(phba->HCregaddr); /* flush */
2180 /* Restore PCI cmd register */
2181 pci_write_config_word(phba->pcidev, PCI_COMMAND, cfg_value);
2183 /* Initialize relevant SLI info */
2184 for (i = 0; i < psli->num_rings; i++) {
2185 pring = &psli->ring[i];
2186 pring->flag = 0;
2187 pring->rspidx = 0;
2188 pring->next_cmdidx = 0;
2189 pring->local_getidx = 0;
2190 pring->cmdidx = 0;
2191 pring->missbufcnt = 0;
2194 phba->link_state = LPFC_WARM_START;
2195 return 0;
2199 lpfc_sli_brdrestart(struct lpfc_hba *phba)
2201 MAILBOX_t *mb;
2202 struct lpfc_sli *psli;
2203 uint16_t skip_post;
2204 volatile uint32_t word0;
2205 void __iomem *to_slim;
2207 spin_lock_irq(&phba->hbalock);
2209 psli = &phba->sli;
2211 /* Restart HBA */
2212 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2213 "0337 Restart HBA Data: x%x x%x\n",
2214 phba->pport->port_state, psli->sli_flag);
2216 word0 = 0;
2217 mb = (MAILBOX_t *) &word0;
2218 mb->mbxCommand = MBX_RESTART;
2219 mb->mbxHc = 1;
2221 lpfc_reset_barrier(phba);
2223 to_slim = phba->MBslimaddr;
2224 writel(*(uint32_t *) mb, to_slim);
2225 readl(to_slim); /* flush */
2227 /* Only skip post after fc_ffinit is completed */
2228 if (phba->pport->port_state) {
2229 skip_post = 1;
2230 word0 = 1; /* This is really setting up word1 */
2231 } else {
2232 skip_post = 0;
2233 word0 = 0; /* This is really setting up word1 */
2235 to_slim = phba->MBslimaddr + sizeof (uint32_t);
2236 writel(*(uint32_t *) mb, to_slim);
2237 readl(to_slim); /* flush */
2239 lpfc_sli_brdreset(phba);
2240 phba->pport->stopped = 0;
2241 phba->link_state = LPFC_INIT_START;
2243 spin_unlock_irq(&phba->hbalock);
2245 memset(&psli->lnk_stat_offsets, 0, sizeof(psli->lnk_stat_offsets));
2246 psli->stats_start = get_seconds();
2248 if (skip_post)
2249 mdelay(100);
2250 else
2251 mdelay(2000);
2253 lpfc_hba_down_post(phba);
2255 return 0;
2258 static int
2259 lpfc_sli_chipset_init(struct lpfc_hba *phba)
2261 uint32_t status, i = 0;
2263 /* Read the HBA Host Status Register */
2264 status = readl(phba->HSregaddr);
2266 /* Check status register to see what current state is */
2267 i = 0;
2268 while ((status & (HS_FFRDY | HS_MBRDY)) != (HS_FFRDY | HS_MBRDY)) {
2270 /* Check every 100ms for 5 retries, then every 500ms for 5, then
2271 * every 2.5 sec for 5, then reset board and every 2.5 sec for
2272 * 4.
2274 if (i++ >= 20) {
2275 /* Adapter failed to init, timeout, status reg
2276 <status> */
2277 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2278 "0436 Adapter failed to init, "
2279 "timeout, status reg x%x, "
2280 "FW Data: A8 x%x AC x%x\n", status,
2281 readl(phba->MBslimaddr + 0xa8),
2282 readl(phba->MBslimaddr + 0xac));
2283 phba->link_state = LPFC_HBA_ERROR;
2284 return -ETIMEDOUT;
2287 /* Check to see if any errors occurred during init */
2288 if (status & HS_FFERM) {
2289 /* ERROR: During chipset initialization */
2290 /* Adapter failed to init, chipset, status reg
2291 <status> */
2292 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2293 "0437 Adapter failed to init, "
2294 "chipset, status reg x%x, "
2295 "FW Data: A8 x%x AC x%x\n", status,
2296 readl(phba->MBslimaddr + 0xa8),
2297 readl(phba->MBslimaddr + 0xac));
2298 phba->link_state = LPFC_HBA_ERROR;
2299 return -EIO;
2302 if (i <= 5) {
2303 msleep(10);
2304 } else if (i <= 10) {
2305 msleep(500);
2306 } else {
2307 msleep(2500);
2310 if (i == 15) {
2311 /* Do post */
2312 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
2313 lpfc_sli_brdrestart(phba);
2315 /* Read the HBA Host Status Register */
2316 status = readl(phba->HSregaddr);
2319 /* Check to see if any errors occurred during init */
2320 if (status & HS_FFERM) {
2321 /* ERROR: During chipset initialization */
2322 /* Adapter failed to init, chipset, status reg <status> */
2323 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2324 "0438 Adapter failed to init, chipset, "
2325 "status reg x%x, "
2326 "FW Data: A8 x%x AC x%x\n", status,
2327 readl(phba->MBslimaddr + 0xa8),
2328 readl(phba->MBslimaddr + 0xac));
2329 phba->link_state = LPFC_HBA_ERROR;
2330 return -EIO;
2333 /* Clear all interrupt enable conditions */
2334 writel(0, phba->HCregaddr);
2335 readl(phba->HCregaddr); /* flush */
2337 /* setup host attn register */
2338 writel(0xffffffff, phba->HAregaddr);
2339 readl(phba->HAregaddr); /* flush */
2340 return 0;
2344 lpfc_sli_hbq_count(void)
2346 return ARRAY_SIZE(lpfc_hbq_defs);
2349 static int
2350 lpfc_sli_hbq_entry_count(void)
2352 int hbq_count = lpfc_sli_hbq_count();
2353 int count = 0;
2354 int i;
2356 for (i = 0; i < hbq_count; ++i)
2357 count += lpfc_hbq_defs[i]->entry_count;
2358 return count;
2362 lpfc_sli_hbq_size(void)
2364 return lpfc_sli_hbq_entry_count() * sizeof(struct lpfc_hbq_entry);
2367 static int
2368 lpfc_sli_hbq_setup(struct lpfc_hba *phba)
2370 int hbq_count = lpfc_sli_hbq_count();
2371 LPFC_MBOXQ_t *pmb;
2372 MAILBOX_t *pmbox;
2373 uint32_t hbqno;
2374 uint32_t hbq_entry_index;
2376 /* Get a Mailbox buffer to setup mailbox
2377 * commands for HBA initialization
2379 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2381 if (!pmb)
2382 return -ENOMEM;
2384 pmbox = &pmb->mb;
2386 /* Initialize the struct lpfc_sli_hbq structure for each hbq */
2387 phba->link_state = LPFC_INIT_MBX_CMDS;
2388 phba->hbq_in_use = 1;
2390 hbq_entry_index = 0;
2391 for (hbqno = 0; hbqno < hbq_count; ++hbqno) {
2392 phba->hbqs[hbqno].next_hbqPutIdx = 0;
2393 phba->hbqs[hbqno].hbqPutIdx = 0;
2394 phba->hbqs[hbqno].local_hbqGetIdx = 0;
2395 phba->hbqs[hbqno].entry_count =
2396 lpfc_hbq_defs[hbqno]->entry_count;
2397 lpfc_config_hbq(phba, hbqno, lpfc_hbq_defs[hbqno],
2398 hbq_entry_index, pmb);
2399 hbq_entry_index += phba->hbqs[hbqno].entry_count;
2401 if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
2402 /* Adapter failed to init, mbxCmd <cmd> CFG_RING,
2403 mbxStatus <status>, ring <num> */
2405 lpfc_printf_log(phba, KERN_ERR,
2406 LOG_SLI | LOG_VPORT,
2407 "1805 Adapter failed to init. "
2408 "Data: x%x x%x x%x\n",
2409 pmbox->mbxCommand,
2410 pmbox->mbxStatus, hbqno);
2412 phba->link_state = LPFC_HBA_ERROR;
2413 mempool_free(pmb, phba->mbox_mem_pool);
2414 return ENXIO;
2417 phba->hbq_count = hbq_count;
2419 mempool_free(pmb, phba->mbox_mem_pool);
2421 /* Initially populate or replenish the HBQs */
2422 for (hbqno = 0; hbqno < hbq_count; ++hbqno) {
2423 if (lpfc_sli_hbqbuf_init_hbqs(phba, hbqno))
2424 return -ENOMEM;
2426 return 0;
2429 static int
2430 lpfc_do_config_port(struct lpfc_hba *phba, int sli_mode)
2432 LPFC_MBOXQ_t *pmb;
2433 uint32_t resetcount = 0, rc = 0, done = 0;
2435 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2436 if (!pmb) {
2437 phba->link_state = LPFC_HBA_ERROR;
2438 return -ENOMEM;
2441 phba->sli_rev = sli_mode;
2442 while (resetcount < 2 && !done) {
2443 spin_lock_irq(&phba->hbalock);
2444 phba->sli.sli_flag |= LPFC_SLI_MBOX_ACTIVE;
2445 spin_unlock_irq(&phba->hbalock);
2446 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
2447 lpfc_sli_brdrestart(phba);
2448 msleep(2500);
2449 rc = lpfc_sli_chipset_init(phba);
2450 if (rc)
2451 break;
2453 spin_lock_irq(&phba->hbalock);
2454 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2455 spin_unlock_irq(&phba->hbalock);
2456 resetcount++;
2458 /* Call pre CONFIG_PORT mailbox command initialization. A
2459 * value of 0 means the call was successful. Any other
2460 * nonzero value is a failure, but if ERESTART is returned,
2461 * the driver may reset the HBA and try again.
2463 rc = lpfc_config_port_prep(phba);
2464 if (rc == -ERESTART) {
2465 phba->link_state = LPFC_LINK_UNKNOWN;
2466 continue;
2467 } else if (rc) {
2468 break;
2471 phba->link_state = LPFC_INIT_MBX_CMDS;
2472 lpfc_config_port(phba, pmb);
2473 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
2474 if (rc != MBX_SUCCESS) {
2475 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2476 "0442 Adapter failed to init, mbxCmd x%x "
2477 "CONFIG_PORT, mbxStatus x%x Data: x%x\n",
2478 pmb->mb.mbxCommand, pmb->mb.mbxStatus, 0);
2479 spin_lock_irq(&phba->hbalock);
2480 phba->sli.sli_flag &= ~LPFC_SLI2_ACTIVE;
2481 spin_unlock_irq(&phba->hbalock);
2482 rc = -ENXIO;
2483 } else {
2484 done = 1;
2485 phba->max_vpi = (phba->max_vpi &&
2486 pmb->mb.un.varCfgPort.gmv) != 0
2487 ? pmb->mb.un.varCfgPort.max_vpi
2488 : 0;
2492 if (!done) {
2493 rc = -EINVAL;
2494 goto do_prep_failed;
2497 if ((pmb->mb.un.varCfgPort.sli_mode == 3) &&
2498 (!pmb->mb.un.varCfgPort.cMA)) {
2499 rc = -ENXIO;
2502 do_prep_failed:
2503 mempool_free(pmb, phba->mbox_mem_pool);
2504 return rc;
2508 lpfc_sli_hba_setup(struct lpfc_hba *phba)
2510 uint32_t rc;
2511 int mode = 3;
2513 switch (lpfc_sli_mode) {
2514 case 2:
2515 if (phba->cfg_enable_npiv) {
2516 lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
2517 "1824 NPIV enabled: Override lpfc_sli_mode "
2518 "parameter (%d) to auto (0).\n",
2519 lpfc_sli_mode);
2520 break;
2522 mode = 2;
2523 break;
2524 case 0:
2525 case 3:
2526 break;
2527 default:
2528 lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
2529 "1819 Unrecognized lpfc_sli_mode "
2530 "parameter: %d.\n", lpfc_sli_mode);
2532 break;
2535 rc = lpfc_do_config_port(phba, mode);
2536 if (rc && lpfc_sli_mode == 3)
2537 lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
2538 "1820 Unable to select SLI-3. "
2539 "Not supported by adapter.\n");
2540 if (rc && mode != 2)
2541 rc = lpfc_do_config_port(phba, 2);
2542 if (rc)
2543 goto lpfc_sli_hba_setup_error;
2545 if (phba->sli_rev == 3) {
2546 phba->iocb_cmd_size = SLI3_IOCB_CMD_SIZE;
2547 phba->iocb_rsp_size = SLI3_IOCB_RSP_SIZE;
2548 phba->sli3_options |= LPFC_SLI3_ENABLED;
2549 phba->sli3_options |= LPFC_SLI3_HBQ_ENABLED;
2551 } else {
2552 phba->iocb_cmd_size = SLI2_IOCB_CMD_SIZE;
2553 phba->iocb_rsp_size = SLI2_IOCB_RSP_SIZE;
2554 phba->sli3_options = 0;
2557 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
2558 "0444 Firmware in SLI %x mode. Max_vpi %d\n",
2559 phba->sli_rev, phba->max_vpi);
2560 rc = lpfc_sli_ring_map(phba);
2562 if (rc)
2563 goto lpfc_sli_hba_setup_error;
2565 /* Init HBQs */
2567 if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
2568 rc = lpfc_sli_hbq_setup(phba);
2569 if (rc)
2570 goto lpfc_sli_hba_setup_error;
2573 phba->sli.sli_flag |= LPFC_PROCESS_LA;
2575 rc = lpfc_config_port_post(phba);
2576 if (rc)
2577 goto lpfc_sli_hba_setup_error;
2579 return rc;
2581 lpfc_sli_hba_setup_error:
2582 phba->link_state = LPFC_HBA_ERROR;
2583 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
2584 "0445 Firmware initialization failed\n");
2585 return rc;
2588 /*! lpfc_mbox_timeout
2590 * \pre
2591 * \post
2592 * \param hba Pointer to per struct lpfc_hba structure
2593 * \param l1 Pointer to the driver's mailbox queue.
2594 * \return
2595 * void
2597 * \b Description:
2599 * This routine handles mailbox timeout events at timer interrupt context.
2601 void
2602 lpfc_mbox_timeout(unsigned long ptr)
2604 struct lpfc_hba *phba = (struct lpfc_hba *) ptr;
2605 unsigned long iflag;
2606 uint32_t tmo_posted;
2608 spin_lock_irqsave(&phba->pport->work_port_lock, iflag);
2609 tmo_posted = phba->pport->work_port_events & WORKER_MBOX_TMO;
2610 if (!tmo_posted)
2611 phba->pport->work_port_events |= WORKER_MBOX_TMO;
2612 spin_unlock_irqrestore(&phba->pport->work_port_lock, iflag);
2614 if (!tmo_posted) {
2615 spin_lock_irqsave(&phba->hbalock, iflag);
2616 if (phba->work_wait)
2617 lpfc_worker_wake_up(phba);
2618 spin_unlock_irqrestore(&phba->hbalock, iflag);
2622 void
2623 lpfc_mbox_timeout_handler(struct lpfc_hba *phba)
2625 LPFC_MBOXQ_t *pmbox = phba->sli.mbox_active;
2626 MAILBOX_t *mb = &pmbox->mb;
2627 struct lpfc_sli *psli = &phba->sli;
2628 struct lpfc_sli_ring *pring;
2630 if (!(phba->pport->work_port_events & WORKER_MBOX_TMO)) {
2631 return;
2634 /* Mbox cmd <mbxCommand> timeout */
2635 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
2636 "0310 Mailbox command x%x timeout Data: x%x x%x x%p\n",
2637 mb->mbxCommand,
2638 phba->pport->port_state,
2639 phba->sli.sli_flag,
2640 phba->sli.mbox_active);
2642 /* Setting state unknown so lpfc_sli_abort_iocb_ring
2643 * would get IOCB_ERROR from lpfc_sli_issue_iocb, allowing
2644 * it to fail all oustanding SCSI IO.
2646 spin_lock_irq(&phba->pport->work_port_lock);
2647 phba->pport->work_port_events &= ~WORKER_MBOX_TMO;
2648 spin_unlock_irq(&phba->pport->work_port_lock);
2649 spin_lock_irq(&phba->hbalock);
2650 phba->link_state = LPFC_LINK_UNKNOWN;
2651 phba->pport->fc_flag |= FC_ESTABLISH_LINK;
2652 psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
2653 spin_unlock_irq(&phba->hbalock);
2655 pring = &psli->ring[psli->fcp_ring];
2656 lpfc_sli_abort_iocb_ring(phba, pring);
2658 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
2659 "0345 Resetting board due to mailbox timeout\n");
2661 * lpfc_offline calls lpfc_sli_hba_down which will clean up
2662 * on oustanding mailbox commands.
2664 /* If resets are disabled then set error state and return. */
2665 if (!phba->cfg_enable_hba_reset) {
2666 phba->link_state = LPFC_HBA_ERROR;
2667 return;
2669 lpfc_offline_prep(phba);
2670 lpfc_offline(phba);
2671 lpfc_sli_brdrestart(phba);
2672 if (lpfc_online(phba) == 0) /* Initialize the HBA */
2673 mod_timer(&phba->fc_estabtmo, jiffies + HZ * 60);
2674 lpfc_unblock_mgmt_io(phba);
2675 return;
2679 lpfc_sli_issue_mbox(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmbox, uint32_t flag)
2681 MAILBOX_t *mb;
2682 struct lpfc_sli *psli = &phba->sli;
2683 uint32_t status, evtctr;
2684 uint32_t ha_copy;
2685 int i;
2686 unsigned long timeout;
2687 unsigned long drvr_flag = 0;
2688 volatile uint32_t word0, ldata;
2689 void __iomem *to_slim;
2691 if (pmbox->mbox_cmpl && pmbox->mbox_cmpl != lpfc_sli_def_mbox_cmpl &&
2692 pmbox->mbox_cmpl != lpfc_sli_wake_mbox_wait) {
2693 if(!pmbox->vport) {
2694 lpfc_printf_log(phba, KERN_ERR,
2695 LOG_MBOX | LOG_VPORT,
2696 "1806 Mbox x%x failed. No vport\n",
2697 pmbox->mb.mbxCommand);
2698 dump_stack();
2699 return MBX_NOT_FINISHED;
2704 /* If the PCI channel is in offline state, do not post mbox. */
2705 if (unlikely(pci_channel_offline(phba->pcidev)))
2706 return MBX_NOT_FINISHED;
2708 spin_lock_irqsave(&phba->hbalock, drvr_flag);
2709 psli = &phba->sli;
2712 mb = &pmbox->mb;
2713 status = MBX_SUCCESS;
2715 if (phba->link_state == LPFC_HBA_ERROR) {
2716 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2718 /* Mbox command <mbxCommand> cannot issue */
2719 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
2720 return MBX_NOT_FINISHED;
2723 if (mb->mbxCommand != MBX_KILL_BOARD && flag & MBX_NOWAIT &&
2724 !(readl(phba->HCregaddr) & HC_MBINT_ENA)) {
2725 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2726 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
2727 return MBX_NOT_FINISHED;
2730 if (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE) {
2731 /* Polling for a mbox command when another one is already active
2732 * is not allowed in SLI. Also, the driver must have established
2733 * SLI2 mode to queue and process multiple mbox commands.
2736 if (flag & MBX_POLL) {
2737 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2739 /* Mbox command <mbxCommand> cannot issue */
2740 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
2741 return MBX_NOT_FINISHED;
2744 if (!(psli->sli_flag & LPFC_SLI2_ACTIVE)) {
2745 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2746 /* Mbox command <mbxCommand> cannot issue */
2747 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
2748 return MBX_NOT_FINISHED;
2751 /* Another mailbox command is still being processed, queue this
2752 * command to be processed later.
2754 lpfc_mbox_put(phba, pmbox);
2756 /* Mbox cmd issue - BUSY */
2757 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
2758 "(%d):0308 Mbox cmd issue - BUSY Data: "
2759 "x%x x%x x%x x%x\n",
2760 pmbox->vport ? pmbox->vport->vpi : 0xffffff,
2761 mb->mbxCommand, phba->pport->port_state,
2762 psli->sli_flag, flag);
2764 psli->slistat.mbox_busy++;
2765 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2767 if (pmbox->vport) {
2768 lpfc_debugfs_disc_trc(pmbox->vport,
2769 LPFC_DISC_TRC_MBOX_VPORT,
2770 "MBOX Bsy vport: cmd:x%x mb:x%x x%x",
2771 (uint32_t)mb->mbxCommand,
2772 mb->un.varWords[0], mb->un.varWords[1]);
2774 else {
2775 lpfc_debugfs_disc_trc(phba->pport,
2776 LPFC_DISC_TRC_MBOX,
2777 "MBOX Bsy: cmd:x%x mb:x%x x%x",
2778 (uint32_t)mb->mbxCommand,
2779 mb->un.varWords[0], mb->un.varWords[1]);
2782 return MBX_BUSY;
2785 psli->sli_flag |= LPFC_SLI_MBOX_ACTIVE;
2787 /* If we are not polling, we MUST be in SLI2 mode */
2788 if (flag != MBX_POLL) {
2789 if (!(psli->sli_flag & LPFC_SLI2_ACTIVE) &&
2790 (mb->mbxCommand != MBX_KILL_BOARD)) {
2791 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2792 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2793 /* Mbox command <mbxCommand> cannot issue */
2794 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
2795 return MBX_NOT_FINISHED;
2797 /* timeout active mbox command */
2798 mod_timer(&psli->mbox_tmo, (jiffies +
2799 (HZ * lpfc_mbox_tmo_val(phba, mb->mbxCommand))));
2802 /* Mailbox cmd <cmd> issue */
2803 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
2804 "(%d):0309 Mailbox cmd x%x issue Data: x%x x%x "
2805 "x%x\n",
2806 pmbox->vport ? pmbox->vport->vpi : 0,
2807 mb->mbxCommand, phba->pport->port_state,
2808 psli->sli_flag, flag);
2810 if (mb->mbxCommand != MBX_HEARTBEAT) {
2811 if (pmbox->vport) {
2812 lpfc_debugfs_disc_trc(pmbox->vport,
2813 LPFC_DISC_TRC_MBOX_VPORT,
2814 "MBOX Send vport: cmd:x%x mb:x%x x%x",
2815 (uint32_t)mb->mbxCommand,
2816 mb->un.varWords[0], mb->un.varWords[1]);
2818 else {
2819 lpfc_debugfs_disc_trc(phba->pport,
2820 LPFC_DISC_TRC_MBOX,
2821 "MBOX Send: cmd:x%x mb:x%x x%x",
2822 (uint32_t)mb->mbxCommand,
2823 mb->un.varWords[0], mb->un.varWords[1]);
2827 psli->slistat.mbox_cmd++;
2828 evtctr = psli->slistat.mbox_event;
2830 /* next set own bit for the adapter and copy over command word */
2831 mb->mbxOwner = OWN_CHIP;
2833 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2834 /* First copy command data to host SLIM area */
2835 lpfc_sli_pcimem_bcopy(mb, &phba->slim2p->mbx, MAILBOX_CMD_SIZE);
2836 } else {
2837 if (mb->mbxCommand == MBX_CONFIG_PORT) {
2838 /* copy command data into host mbox for cmpl */
2839 lpfc_sli_pcimem_bcopy(mb, &phba->slim2p->mbx,
2840 MAILBOX_CMD_SIZE);
2843 /* First copy mbox command data to HBA SLIM, skip past first
2844 word */
2845 to_slim = phba->MBslimaddr + sizeof (uint32_t);
2846 lpfc_memcpy_to_slim(to_slim, &mb->un.varWords[0],
2847 MAILBOX_CMD_SIZE - sizeof (uint32_t));
2849 /* Next copy over first word, with mbxOwner set */
2850 ldata = *((volatile uint32_t *)mb);
2851 to_slim = phba->MBslimaddr;
2852 writel(ldata, to_slim);
2853 readl(to_slim); /* flush */
2855 if (mb->mbxCommand == MBX_CONFIG_PORT) {
2856 /* switch over to host mailbox */
2857 psli->sli_flag |= LPFC_SLI2_ACTIVE;
2861 wmb();
2863 switch (flag) {
2864 case MBX_NOWAIT:
2865 /* Set up reference to mailbox command */
2866 psli->mbox_active = pmbox;
2867 /* Interrupt board to do it */
2868 writel(CA_MBATT, phba->CAregaddr);
2869 readl(phba->CAregaddr); /* flush */
2870 /* Don't wait for it to finish, just return */
2871 break;
2873 case MBX_POLL:
2874 /* Set up null reference to mailbox command */
2875 psli->mbox_active = NULL;
2876 /* Interrupt board to do it */
2877 writel(CA_MBATT, phba->CAregaddr);
2878 readl(phba->CAregaddr); /* flush */
2880 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2881 /* First read mbox status word */
2882 word0 = *((volatile uint32_t *)&phba->slim2p->mbx);
2883 word0 = le32_to_cpu(word0);
2884 } else {
2885 /* First read mbox status word */
2886 word0 = readl(phba->MBslimaddr);
2889 /* Read the HBA Host Attention Register */
2890 ha_copy = readl(phba->HAregaddr);
2891 timeout = msecs_to_jiffies(lpfc_mbox_tmo_val(phba,
2892 mb->mbxCommand) *
2893 1000) + jiffies;
2894 i = 0;
2895 /* Wait for command to complete */
2896 while (((word0 & OWN_CHIP) == OWN_CHIP) ||
2897 (!(ha_copy & HA_MBATT) &&
2898 (phba->link_state > LPFC_WARM_START))) {
2899 if (time_after(jiffies, timeout)) {
2900 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2901 spin_unlock_irqrestore(&phba->hbalock,
2902 drvr_flag);
2903 return MBX_NOT_FINISHED;
2906 /* Check if we took a mbox interrupt while we were
2907 polling */
2908 if (((word0 & OWN_CHIP) != OWN_CHIP)
2909 && (evtctr != psli->slistat.mbox_event))
2910 break;
2912 if (i++ > 10) {
2913 spin_unlock_irqrestore(&phba->hbalock,
2914 drvr_flag);
2915 msleep(1);
2916 spin_lock_irqsave(&phba->hbalock, drvr_flag);
2919 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2920 /* First copy command data */
2921 word0 = *((volatile uint32_t *)
2922 &phba->slim2p->mbx);
2923 word0 = le32_to_cpu(word0);
2924 if (mb->mbxCommand == MBX_CONFIG_PORT) {
2925 MAILBOX_t *slimmb;
2926 volatile uint32_t slimword0;
2927 /* Check real SLIM for any errors */
2928 slimword0 = readl(phba->MBslimaddr);
2929 slimmb = (MAILBOX_t *) & slimword0;
2930 if (((slimword0 & OWN_CHIP) != OWN_CHIP)
2931 && slimmb->mbxStatus) {
2932 psli->sli_flag &=
2933 ~LPFC_SLI2_ACTIVE;
2934 word0 = slimword0;
2937 } else {
2938 /* First copy command data */
2939 word0 = readl(phba->MBslimaddr);
2941 /* Read the HBA Host Attention Register */
2942 ha_copy = readl(phba->HAregaddr);
2945 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
2946 /* copy results back to user */
2947 lpfc_sli_pcimem_bcopy(&phba->slim2p->mbx, mb,
2948 MAILBOX_CMD_SIZE);
2949 } else {
2950 /* First copy command data */
2951 lpfc_memcpy_from_slim(mb, phba->MBslimaddr,
2952 MAILBOX_CMD_SIZE);
2953 if ((mb->mbxCommand == MBX_DUMP_MEMORY) &&
2954 pmbox->context2) {
2955 lpfc_memcpy_from_slim((void *)pmbox->context2,
2956 phba->MBslimaddr + DMP_RSP_OFFSET,
2957 mb->un.varDmp.word_cnt);
2961 writel(HA_MBATT, phba->HAregaddr);
2962 readl(phba->HAregaddr); /* flush */
2964 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2965 status = mb->mbxStatus;
2968 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
2969 return status;
2973 * Caller needs to hold lock.
2975 static void
2976 __lpfc_sli_ringtx_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2977 struct lpfc_iocbq *piocb)
2979 /* Insert the caller's iocb in the txq tail for later processing. */
2980 list_add_tail(&piocb->list, &pring->txq);
2981 pring->txq_cnt++;
2984 static struct lpfc_iocbq *
2985 lpfc_sli_next_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2986 struct lpfc_iocbq **piocb)
2988 struct lpfc_iocbq * nextiocb;
2990 nextiocb = lpfc_sli_ringtx_get(phba, pring);
2991 if (!nextiocb) {
2992 nextiocb = *piocb;
2993 *piocb = NULL;
2996 return nextiocb;
3000 * Lockless version of lpfc_sli_issue_iocb.
3002 static int
3003 __lpfc_sli_issue_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3004 struct lpfc_iocbq *piocb, uint32_t flag)
3006 struct lpfc_iocbq *nextiocb;
3007 IOCB_t *iocb;
3009 if (piocb->iocb_cmpl && (!piocb->vport) &&
3010 (piocb->iocb.ulpCommand != CMD_ABORT_XRI_CN) &&
3011 (piocb->iocb.ulpCommand != CMD_CLOSE_XRI_CN)) {
3012 lpfc_printf_log(phba, KERN_ERR,
3013 LOG_SLI | LOG_VPORT,
3014 "1807 IOCB x%x failed. No vport\n",
3015 piocb->iocb.ulpCommand);
3016 dump_stack();
3017 return IOCB_ERROR;
3021 /* If the PCI channel is in offline state, do not post iocbs. */
3022 if (unlikely(pci_channel_offline(phba->pcidev)))
3023 return IOCB_ERROR;
3026 * We should never get an IOCB if we are in a < LINK_DOWN state
3028 if (unlikely(phba->link_state < LPFC_LINK_DOWN))
3029 return IOCB_ERROR;
3032 * Check to see if we are blocking IOCB processing because of a
3033 * outstanding event.
3035 if (unlikely(pring->flag & LPFC_STOP_IOCB_EVENT))
3036 goto iocb_busy;
3038 if (unlikely(phba->link_state == LPFC_LINK_DOWN)) {
3040 * Only CREATE_XRI, CLOSE_XRI, and QUE_RING_BUF
3041 * can be issued if the link is not up.
3043 switch (piocb->iocb.ulpCommand) {
3044 case CMD_QUE_RING_BUF_CN:
3045 case CMD_QUE_RING_BUF64_CN:
3047 * For IOCBs, like QUE_RING_BUF, that have no rsp ring
3048 * completion, iocb_cmpl MUST be 0.
3050 if (piocb->iocb_cmpl)
3051 piocb->iocb_cmpl = NULL;
3052 /*FALLTHROUGH*/
3053 case CMD_CREATE_XRI_CR:
3054 case CMD_CLOSE_XRI_CN:
3055 case CMD_CLOSE_XRI_CX:
3056 break;
3057 default:
3058 goto iocb_busy;
3062 * For FCP commands, we must be in a state where we can process link
3063 * attention events.
3065 } else if (unlikely(pring->ringno == phba->sli.fcp_ring &&
3066 !(phba->sli.sli_flag & LPFC_PROCESS_LA))) {
3067 goto iocb_busy;
3070 while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
3071 (nextiocb = lpfc_sli_next_iocb(phba, pring, &piocb)))
3072 lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
3074 if (iocb)
3075 lpfc_sli_update_ring(phba, pring);
3076 else
3077 lpfc_sli_update_full_ring(phba, pring);
3079 if (!piocb)
3080 return IOCB_SUCCESS;
3082 goto out_busy;
3084 iocb_busy:
3085 pring->stats.iocb_cmd_delay++;
3087 out_busy:
3089 if (!(flag & SLI_IOCB_RET_IOCB)) {
3090 __lpfc_sli_ringtx_put(phba, pring, piocb);
3091 return IOCB_SUCCESS;
3094 return IOCB_BUSY;
3099 lpfc_sli_issue_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3100 struct lpfc_iocbq *piocb, uint32_t flag)
3102 unsigned long iflags;
3103 int rc;
3105 spin_lock_irqsave(&phba->hbalock, iflags);
3106 rc = __lpfc_sli_issue_iocb(phba, pring, piocb, flag);
3107 spin_unlock_irqrestore(&phba->hbalock, iflags);
3109 return rc;
3112 static int
3113 lpfc_extra_ring_setup( struct lpfc_hba *phba)
3115 struct lpfc_sli *psli;
3116 struct lpfc_sli_ring *pring;
3118 psli = &phba->sli;
3120 /* Adjust cmd/rsp ring iocb entries more evenly */
3122 /* Take some away from the FCP ring */
3123 pring = &psli->ring[psli->fcp_ring];
3124 pring->numCiocb -= SLI2_IOCB_CMD_R1XTRA_ENTRIES;
3125 pring->numRiocb -= SLI2_IOCB_RSP_R1XTRA_ENTRIES;
3126 pring->numCiocb -= SLI2_IOCB_CMD_R3XTRA_ENTRIES;
3127 pring->numRiocb -= SLI2_IOCB_RSP_R3XTRA_ENTRIES;
3129 /* and give them to the extra ring */
3130 pring = &psli->ring[psli->extra_ring];
3132 pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
3133 pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
3134 pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
3135 pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
3137 /* Setup default profile for this ring */
3138 pring->iotag_max = 4096;
3139 pring->num_mask = 1;
3140 pring->prt[0].profile = 0; /* Mask 0 */
3141 pring->prt[0].rctl = phba->cfg_multi_ring_rctl;
3142 pring->prt[0].type = phba->cfg_multi_ring_type;
3143 pring->prt[0].lpfc_sli_rcv_unsol_event = NULL;
3144 return 0;
3147 static void
3148 lpfc_sli_async_event_handler(struct lpfc_hba * phba,
3149 struct lpfc_sli_ring * pring, struct lpfc_iocbq * iocbq)
3151 IOCB_t *icmd;
3152 uint16_t evt_code;
3153 uint16_t temp;
3154 struct temp_event temp_event_data;
3155 struct Scsi_Host *shost;
3157 icmd = &iocbq->iocb;
3158 evt_code = icmd->un.asyncstat.evt_code;
3159 temp = icmd->ulpContext;
3161 if ((evt_code != ASYNC_TEMP_WARN) &&
3162 (evt_code != ASYNC_TEMP_SAFE)) {
3163 lpfc_printf_log(phba,
3164 KERN_ERR,
3165 LOG_SLI,
3166 "0346 Ring %d handler: unexpected ASYNC_STATUS"
3167 " evt_code 0x%x\n",
3168 pring->ringno,
3169 icmd->un.asyncstat.evt_code);
3170 return;
3172 temp_event_data.data = (uint32_t)temp;
3173 temp_event_data.event_type = FC_REG_TEMPERATURE_EVENT;
3174 if (evt_code == ASYNC_TEMP_WARN) {
3175 temp_event_data.event_code = LPFC_THRESHOLD_TEMP;
3176 lpfc_printf_log(phba,
3177 KERN_ERR,
3178 LOG_TEMP,
3179 "0347 Adapter is very hot, please take "
3180 "corrective action. temperature : %d Celsius\n",
3181 temp);
3183 if (evt_code == ASYNC_TEMP_SAFE) {
3184 temp_event_data.event_code = LPFC_NORMAL_TEMP;
3185 lpfc_printf_log(phba,
3186 KERN_ERR,
3187 LOG_TEMP,
3188 "0340 Adapter temperature is OK now. "
3189 "temperature : %d Celsius\n",
3190 temp);
3193 /* Send temperature change event to applications */
3194 shost = lpfc_shost_from_vport(phba->pport);
3195 fc_host_post_vendor_event(shost, fc_get_event_number(),
3196 sizeof(temp_event_data), (char *) &temp_event_data,
3197 SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
3203 lpfc_sli_setup(struct lpfc_hba *phba)
3205 int i, totiocbsize = 0;
3206 struct lpfc_sli *psli = &phba->sli;
3207 struct lpfc_sli_ring *pring;
3209 psli->num_rings = MAX_CONFIGURED_RINGS;
3210 psli->sli_flag = 0;
3211 psli->fcp_ring = LPFC_FCP_RING;
3212 psli->next_ring = LPFC_FCP_NEXT_RING;
3213 psli->extra_ring = LPFC_EXTRA_RING;
3215 psli->iocbq_lookup = NULL;
3216 psli->iocbq_lookup_len = 0;
3217 psli->last_iotag = 0;
3219 for (i = 0; i < psli->num_rings; i++) {
3220 pring = &psli->ring[i];
3221 switch (i) {
3222 case LPFC_FCP_RING: /* ring 0 - FCP */
3223 /* numCiocb and numRiocb are used in config_port */
3224 pring->numCiocb = SLI2_IOCB_CMD_R0_ENTRIES;
3225 pring->numRiocb = SLI2_IOCB_RSP_R0_ENTRIES;
3226 pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
3227 pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
3228 pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
3229 pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
3230 pring->sizeCiocb = (phba->sli_rev == 3) ?
3231 SLI3_IOCB_CMD_SIZE :
3232 SLI2_IOCB_CMD_SIZE;
3233 pring->sizeRiocb = (phba->sli_rev == 3) ?
3234 SLI3_IOCB_RSP_SIZE :
3235 SLI2_IOCB_RSP_SIZE;
3236 pring->iotag_ctr = 0;
3237 pring->iotag_max =
3238 (phba->cfg_hba_queue_depth * 2);
3239 pring->fast_iotag = pring->iotag_max;
3240 pring->num_mask = 0;
3241 break;
3242 case LPFC_EXTRA_RING: /* ring 1 - EXTRA */
3243 /* numCiocb and numRiocb are used in config_port */
3244 pring->numCiocb = SLI2_IOCB_CMD_R1_ENTRIES;
3245 pring->numRiocb = SLI2_IOCB_RSP_R1_ENTRIES;
3246 pring->sizeCiocb = (phba->sli_rev == 3) ?
3247 SLI3_IOCB_CMD_SIZE :
3248 SLI2_IOCB_CMD_SIZE;
3249 pring->sizeRiocb = (phba->sli_rev == 3) ?
3250 SLI3_IOCB_RSP_SIZE :
3251 SLI2_IOCB_RSP_SIZE;
3252 pring->iotag_max = phba->cfg_hba_queue_depth;
3253 pring->num_mask = 0;
3254 break;
3255 case LPFC_ELS_RING: /* ring 2 - ELS / CT */
3256 /* numCiocb and numRiocb are used in config_port */
3257 pring->numCiocb = SLI2_IOCB_CMD_R2_ENTRIES;
3258 pring->numRiocb = SLI2_IOCB_RSP_R2_ENTRIES;
3259 pring->sizeCiocb = (phba->sli_rev == 3) ?
3260 SLI3_IOCB_CMD_SIZE :
3261 SLI2_IOCB_CMD_SIZE;
3262 pring->sizeRiocb = (phba->sli_rev == 3) ?
3263 SLI3_IOCB_RSP_SIZE :
3264 SLI2_IOCB_RSP_SIZE;
3265 pring->fast_iotag = 0;
3266 pring->iotag_ctr = 0;
3267 pring->iotag_max = 4096;
3268 pring->lpfc_sli_rcv_async_status =
3269 lpfc_sli_async_event_handler;
3270 pring->num_mask = 4;
3271 pring->prt[0].profile = 0; /* Mask 0 */
3272 pring->prt[0].rctl = FC_ELS_REQ;
3273 pring->prt[0].type = FC_ELS_DATA;
3274 pring->prt[0].lpfc_sli_rcv_unsol_event =
3275 lpfc_els_unsol_event;
3276 pring->prt[1].profile = 0; /* Mask 1 */
3277 pring->prt[1].rctl = FC_ELS_RSP;
3278 pring->prt[1].type = FC_ELS_DATA;
3279 pring->prt[1].lpfc_sli_rcv_unsol_event =
3280 lpfc_els_unsol_event;
3281 pring->prt[2].profile = 0; /* Mask 2 */
3282 /* NameServer Inquiry */
3283 pring->prt[2].rctl = FC_UNSOL_CTL;
3284 /* NameServer */
3285 pring->prt[2].type = FC_COMMON_TRANSPORT_ULP;
3286 pring->prt[2].lpfc_sli_rcv_unsol_event =
3287 lpfc_ct_unsol_event;
3288 pring->prt[3].profile = 0; /* Mask 3 */
3289 /* NameServer response */
3290 pring->prt[3].rctl = FC_SOL_CTL;
3291 /* NameServer */
3292 pring->prt[3].type = FC_COMMON_TRANSPORT_ULP;
3293 pring->prt[3].lpfc_sli_rcv_unsol_event =
3294 lpfc_ct_unsol_event;
3295 break;
3297 totiocbsize += (pring->numCiocb * pring->sizeCiocb) +
3298 (pring->numRiocb * pring->sizeRiocb);
3300 if (totiocbsize > MAX_SLIM_IOCB_SIZE) {
3301 /* Too many cmd / rsp ring entries in SLI2 SLIM */
3302 printk(KERN_ERR "%d:0462 Too many cmd / rsp ring entries in "
3303 "SLI2 SLIM Data: x%x x%lx\n",
3304 phba->brd_no, totiocbsize,
3305 (unsigned long) MAX_SLIM_IOCB_SIZE);
3307 if (phba->cfg_multi_ring_support == 2)
3308 lpfc_extra_ring_setup(phba);
3310 return 0;
3314 lpfc_sli_queue_setup(struct lpfc_hba *phba)
3316 struct lpfc_sli *psli;
3317 struct lpfc_sli_ring *pring;
3318 int i;
3320 psli = &phba->sli;
3321 spin_lock_irq(&phba->hbalock);
3322 INIT_LIST_HEAD(&psli->mboxq);
3323 INIT_LIST_HEAD(&psli->mboxq_cmpl);
3324 /* Initialize list headers for txq and txcmplq as double linked lists */
3325 for (i = 0; i < psli->num_rings; i++) {
3326 pring = &psli->ring[i];
3327 pring->ringno = i;
3328 pring->next_cmdidx = 0;
3329 pring->local_getidx = 0;
3330 pring->cmdidx = 0;
3331 INIT_LIST_HEAD(&pring->txq);
3332 INIT_LIST_HEAD(&pring->txcmplq);
3333 INIT_LIST_HEAD(&pring->iocb_continueq);
3334 INIT_LIST_HEAD(&pring->iocb_continue_saveq);
3335 INIT_LIST_HEAD(&pring->postbufq);
3337 spin_unlock_irq(&phba->hbalock);
3338 return 1;
3342 lpfc_sli_host_down(struct lpfc_vport *vport)
3344 LIST_HEAD(completions);
3345 struct lpfc_hba *phba = vport->phba;
3346 struct lpfc_sli *psli = &phba->sli;
3347 struct lpfc_sli_ring *pring;
3348 struct lpfc_iocbq *iocb, *next_iocb;
3349 int i;
3350 unsigned long flags = 0;
3351 uint16_t prev_pring_flag;
3353 lpfc_cleanup_discovery_resources(vport);
3355 spin_lock_irqsave(&phba->hbalock, flags);
3356 for (i = 0; i < psli->num_rings; i++) {
3357 pring = &psli->ring[i];
3358 prev_pring_flag = pring->flag;
3359 if (pring->ringno == LPFC_ELS_RING) /* Only slow rings */
3360 pring->flag |= LPFC_DEFERRED_RING_EVENT;
3362 * Error everything on the txq since these iocbs have not been
3363 * given to the FW yet.
3365 list_for_each_entry_safe(iocb, next_iocb, &pring->txq, list) {
3366 if (iocb->vport != vport)
3367 continue;
3368 list_move_tail(&iocb->list, &completions);
3369 pring->txq_cnt--;
3372 /* Next issue ABTS for everything on the txcmplq */
3373 list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq,
3374 list) {
3375 if (iocb->vport != vport)
3376 continue;
3377 lpfc_sli_issue_abort_iotag(phba, pring, iocb);
3380 pring->flag = prev_pring_flag;
3383 spin_unlock_irqrestore(&phba->hbalock, flags);
3385 while (!list_empty(&completions)) {
3386 list_remove_head(&completions, iocb, struct lpfc_iocbq, list);
3388 if (!iocb->iocb_cmpl)
3389 lpfc_sli_release_iocbq(phba, iocb);
3390 else {
3391 iocb->iocb.ulpStatus = IOSTAT_LOCAL_REJECT;
3392 iocb->iocb.un.ulpWord[4] = IOERR_SLI_DOWN;
3393 (iocb->iocb_cmpl) (phba, iocb, iocb);
3396 return 1;
3400 lpfc_sli_hba_down(struct lpfc_hba *phba)
3402 LIST_HEAD(completions);
3403 struct lpfc_sli *psli = &phba->sli;
3404 struct lpfc_sli_ring *pring;
3405 struct lpfc_dmabuf *buf_ptr;
3406 LPFC_MBOXQ_t *pmb;
3407 struct lpfc_iocbq *iocb;
3408 IOCB_t *cmd = NULL;
3409 int i;
3410 unsigned long flags = 0;
3412 lpfc_hba_down_prep(phba);
3414 lpfc_fabric_abort_hba(phba);
3416 spin_lock_irqsave(&phba->hbalock, flags);
3417 for (i = 0; i < psli->num_rings; i++) {
3418 pring = &psli->ring[i];
3419 if (pring->ringno == LPFC_ELS_RING) /* Only slow rings */
3420 pring->flag |= LPFC_DEFERRED_RING_EVENT;
3423 * Error everything on the txq since these iocbs have not been
3424 * given to the FW yet.
3426 list_splice_init(&pring->txq, &completions);
3427 pring->txq_cnt = 0;
3430 spin_unlock_irqrestore(&phba->hbalock, flags);
3432 while (!list_empty(&completions)) {
3433 list_remove_head(&completions, iocb, struct lpfc_iocbq, list);
3434 cmd = &iocb->iocb;
3436 if (!iocb->iocb_cmpl)
3437 lpfc_sli_release_iocbq(phba, iocb);
3438 else {
3439 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
3440 cmd->un.ulpWord[4] = IOERR_SLI_DOWN;
3441 (iocb->iocb_cmpl) (phba, iocb, iocb);
3445 spin_lock_irqsave(&phba->hbalock, flags);
3446 list_splice_init(&phba->elsbuf, &completions);
3447 phba->elsbuf_cnt = 0;
3448 phba->elsbuf_prev_cnt = 0;
3449 spin_unlock_irqrestore(&phba->hbalock, flags);
3451 while (!list_empty(&completions)) {
3452 list_remove_head(&completions, buf_ptr,
3453 struct lpfc_dmabuf, list);
3454 lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
3455 kfree(buf_ptr);
3458 /* Return any active mbox cmds */
3459 del_timer_sync(&psli->mbox_tmo);
3460 spin_lock_irqsave(&phba->hbalock, flags);
3462 spin_lock(&phba->pport->work_port_lock);
3463 phba->pport->work_port_events &= ~WORKER_MBOX_TMO;
3464 spin_unlock(&phba->pport->work_port_lock);
3466 if (psli->mbox_active) {
3467 list_add_tail(&psli->mbox_active->list, &completions);
3468 psli->mbox_active = NULL;
3469 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3472 /* Return any pending or completed mbox cmds */
3473 list_splice_init(&phba->sli.mboxq, &completions);
3474 list_splice_init(&phba->sli.mboxq_cmpl, &completions);
3475 INIT_LIST_HEAD(&psli->mboxq);
3476 INIT_LIST_HEAD(&psli->mboxq_cmpl);
3478 spin_unlock_irqrestore(&phba->hbalock, flags);
3480 while (!list_empty(&completions)) {
3481 list_remove_head(&completions, pmb, LPFC_MBOXQ_t, list);
3482 pmb->mb.mbxStatus = MBX_NOT_FINISHED;
3483 if (pmb->mbox_cmpl) {
3484 pmb->mbox_cmpl(phba,pmb);
3487 return 1;
3490 void
3491 lpfc_sli_pcimem_bcopy(void *srcp, void *destp, uint32_t cnt)
3493 uint32_t *src = srcp;
3494 uint32_t *dest = destp;
3495 uint32_t ldata;
3496 int i;
3498 for (i = 0; i < (int)cnt; i += sizeof (uint32_t)) {
3499 ldata = *src;
3500 ldata = le32_to_cpu(ldata);
3501 *dest = ldata;
3502 src++;
3503 dest++;
3508 lpfc_sli_ringpostbuf_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3509 struct lpfc_dmabuf *mp)
3511 /* Stick struct lpfc_dmabuf at end of postbufq so driver can look it up
3512 later */
3513 spin_lock_irq(&phba->hbalock);
3514 list_add_tail(&mp->list, &pring->postbufq);
3515 pring->postbufq_cnt++;
3516 spin_unlock_irq(&phba->hbalock);
3517 return 0;
3520 uint32_t
3521 lpfc_sli_get_buffer_tag(struct lpfc_hba *phba)
3523 spin_lock_irq(&phba->hbalock);
3524 phba->buffer_tag_count++;
3526 * Always set the QUE_BUFTAG_BIT to distiguish between
3527 * a tag assigned by HBQ.
3529 phba->buffer_tag_count |= QUE_BUFTAG_BIT;
3530 spin_unlock_irq(&phba->hbalock);
3531 return phba->buffer_tag_count;
3534 struct lpfc_dmabuf *
3535 lpfc_sli_ring_taggedbuf_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3536 uint32_t tag)
3538 struct lpfc_dmabuf *mp, *next_mp;
3539 struct list_head *slp = &pring->postbufq;
3541 /* Search postbufq, from the begining, looking for a match on tag */
3542 spin_lock_irq(&phba->hbalock);
3543 list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
3544 if (mp->buffer_tag == tag) {
3545 list_del_init(&mp->list);
3546 pring->postbufq_cnt--;
3547 spin_unlock_irq(&phba->hbalock);
3548 return mp;
3552 spin_unlock_irq(&phba->hbalock);
3553 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3554 "0410 Cannot find virtual addr for buffer tag on "
3555 "ring %d Data x%lx x%p x%p x%x\n",
3556 pring->ringno, (unsigned long) tag,
3557 slp->next, slp->prev, pring->postbufq_cnt);
3559 return NULL;
3562 struct lpfc_dmabuf *
3563 lpfc_sli_ringpostbuf_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3564 dma_addr_t phys)
3566 struct lpfc_dmabuf *mp, *next_mp;
3567 struct list_head *slp = &pring->postbufq;
3569 /* Search postbufq, from the begining, looking for a match on phys */
3570 spin_lock_irq(&phba->hbalock);
3571 list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
3572 if (mp->phys == phys) {
3573 list_del_init(&mp->list);
3574 pring->postbufq_cnt--;
3575 spin_unlock_irq(&phba->hbalock);
3576 return mp;
3580 spin_unlock_irq(&phba->hbalock);
3581 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3582 "0410 Cannot find virtual addr for mapped buf on "
3583 "ring %d Data x%llx x%p x%p x%x\n",
3584 pring->ringno, (unsigned long long)phys,
3585 slp->next, slp->prev, pring->postbufq_cnt);
3586 return NULL;
3589 static void
3590 lpfc_sli_abort_els_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
3591 struct lpfc_iocbq *rspiocb)
3593 IOCB_t *irsp = &rspiocb->iocb;
3594 uint16_t abort_iotag, abort_context;
3595 struct lpfc_iocbq *abort_iocb;
3596 struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
3598 abort_iocb = NULL;
3600 if (irsp->ulpStatus) {
3601 abort_context = cmdiocb->iocb.un.acxri.abortContextTag;
3602 abort_iotag = cmdiocb->iocb.un.acxri.abortIoTag;
3604 spin_lock_irq(&phba->hbalock);
3605 if (abort_iotag != 0 && abort_iotag <= phba->sli.last_iotag)
3606 abort_iocb = phba->sli.iocbq_lookup[abort_iotag];
3608 lpfc_printf_log(phba, KERN_INFO, LOG_ELS | LOG_SLI,
3609 "0327 Cannot abort els iocb %p "
3610 "with tag %x context %x, abort status %x, "
3611 "abort code %x\n",
3612 abort_iocb, abort_iotag, abort_context,
3613 irsp->ulpStatus, irsp->un.ulpWord[4]);
3616 * make sure we have the right iocbq before taking it
3617 * off the txcmplq and try to call completion routine.
3619 if (!abort_iocb ||
3620 abort_iocb->iocb.ulpContext != abort_context ||
3621 (abort_iocb->iocb_flag & LPFC_DRIVER_ABORTED) == 0)
3622 spin_unlock_irq(&phba->hbalock);
3623 else {
3624 list_del_init(&abort_iocb->list);
3625 pring->txcmplq_cnt--;
3626 spin_unlock_irq(&phba->hbalock);
3628 /* Firmware could still be in progress of DMAing
3629 * payload, so don't free data buffer till after
3630 * a hbeat.
3632 abort_iocb->iocb_flag |= LPFC_DELAY_MEM_FREE;
3634 abort_iocb->iocb_flag &= ~LPFC_DRIVER_ABORTED;
3635 abort_iocb->iocb.ulpStatus = IOSTAT_LOCAL_REJECT;
3636 abort_iocb->iocb.un.ulpWord[4] = IOERR_SLI_ABORTED;
3637 (abort_iocb->iocb_cmpl)(phba, abort_iocb, abort_iocb);
3641 lpfc_sli_release_iocbq(phba, cmdiocb);
3642 return;
3645 static void
3646 lpfc_ignore_els_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
3647 struct lpfc_iocbq *rspiocb)
3649 IOCB_t *irsp = &rspiocb->iocb;
3651 /* ELS cmd tag <ulpIoTag> completes */
3652 lpfc_printf_log(phba, KERN_INFO, LOG_ELS,
3653 "0133 Ignoring ELS cmd tag x%x completion Data: "
3654 "x%x x%x x%x\n",
3655 irsp->ulpIoTag, irsp->ulpStatus,
3656 irsp->un.ulpWord[4], irsp->ulpTimeout);
3657 if (cmdiocb->iocb.ulpCommand == CMD_GEN_REQUEST64_CR)
3658 lpfc_ct_free_iocb(phba, cmdiocb);
3659 else
3660 lpfc_els_free_iocb(phba, cmdiocb);
3661 return;
3665 lpfc_sli_issue_abort_iotag(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3666 struct lpfc_iocbq *cmdiocb)
3668 struct lpfc_vport *vport = cmdiocb->vport;
3669 struct lpfc_iocbq *abtsiocbp;
3670 IOCB_t *icmd = NULL;
3671 IOCB_t *iabt = NULL;
3672 int retval = IOCB_ERROR;
3675 * There are certain command types we don't want to abort. And we
3676 * don't want to abort commands that are already in the process of
3677 * being aborted.
3679 icmd = &cmdiocb->iocb;
3680 if (icmd->ulpCommand == CMD_ABORT_XRI_CN ||
3681 icmd->ulpCommand == CMD_CLOSE_XRI_CN ||
3682 (cmdiocb->iocb_flag & LPFC_DRIVER_ABORTED) != 0)
3683 return 0;
3685 /* If we're unloading, don't abort iocb on the ELS ring, but change the
3686 * callback so that nothing happens when it finishes.
3688 if ((vport->load_flag & FC_UNLOADING) &&
3689 (pring->ringno == LPFC_ELS_RING)) {
3690 if (cmdiocb->iocb_flag & LPFC_IO_FABRIC)
3691 cmdiocb->fabric_iocb_cmpl = lpfc_ignore_els_cmpl;
3692 else
3693 cmdiocb->iocb_cmpl = lpfc_ignore_els_cmpl;
3694 goto abort_iotag_exit;
3697 /* issue ABTS for this IOCB based on iotag */
3698 abtsiocbp = __lpfc_sli_get_iocbq(phba);
3699 if (abtsiocbp == NULL)
3700 return 0;
3702 /* This signals the response to set the correct status
3703 * before calling the completion handler.
3705 cmdiocb->iocb_flag |= LPFC_DRIVER_ABORTED;
3707 iabt = &abtsiocbp->iocb;
3708 iabt->un.acxri.abortType = ABORT_TYPE_ABTS;
3709 iabt->un.acxri.abortContextTag = icmd->ulpContext;
3710 iabt->un.acxri.abortIoTag = icmd->ulpIoTag;
3711 iabt->ulpLe = 1;
3712 iabt->ulpClass = icmd->ulpClass;
3714 if (phba->link_state >= LPFC_LINK_UP)
3715 iabt->ulpCommand = CMD_ABORT_XRI_CN;
3716 else
3717 iabt->ulpCommand = CMD_CLOSE_XRI_CN;
3719 abtsiocbp->iocb_cmpl = lpfc_sli_abort_els_cmpl;
3721 lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
3722 "0339 Abort xri x%x, original iotag x%x, "
3723 "abort cmd iotag x%x\n",
3724 iabt->un.acxri.abortContextTag,
3725 iabt->un.acxri.abortIoTag, abtsiocbp->iotag);
3726 retval = __lpfc_sli_issue_iocb(phba, pring, abtsiocbp, 0);
3728 abort_iotag_exit:
3730 * Caller to this routine should check for IOCB_ERROR
3731 * and handle it properly. This routine no longer removes
3732 * iocb off txcmplq and call compl in case of IOCB_ERROR.
3734 return retval;
3737 static int
3738 lpfc_sli_validate_fcp_iocb(struct lpfc_iocbq *iocbq, struct lpfc_vport *vport,
3739 uint16_t tgt_id, uint64_t lun_id,
3740 lpfc_ctx_cmd ctx_cmd)
3742 struct lpfc_scsi_buf *lpfc_cmd;
3743 struct scsi_cmnd *cmnd;
3744 int rc = 1;
3746 if (!(iocbq->iocb_flag & LPFC_IO_FCP))
3747 return rc;
3749 if (iocbq->vport != vport)
3750 return rc;
3752 lpfc_cmd = container_of(iocbq, struct lpfc_scsi_buf, cur_iocbq);
3753 cmnd = lpfc_cmd->pCmd;
3755 if (cmnd == NULL)
3756 return rc;
3758 switch (ctx_cmd) {
3759 case LPFC_CTX_LUN:
3760 if ((cmnd->device->id == tgt_id) &&
3761 (cmnd->device->lun == lun_id))
3762 rc = 0;
3763 break;
3764 case LPFC_CTX_TGT:
3765 if (cmnd->device->id == tgt_id)
3766 rc = 0;
3767 break;
3768 case LPFC_CTX_HOST:
3769 rc = 0;
3770 break;
3771 default:
3772 printk(KERN_ERR "%s: Unknown context cmd type, value %d\n",
3773 __FUNCTION__, ctx_cmd);
3774 break;
3777 return rc;
3781 lpfc_sli_sum_iocb(struct lpfc_vport *vport, uint16_t tgt_id, uint64_t lun_id,
3782 lpfc_ctx_cmd ctx_cmd)
3784 struct lpfc_hba *phba = vport->phba;
3785 struct lpfc_iocbq *iocbq;
3786 int sum, i;
3788 for (i = 1, sum = 0; i <= phba->sli.last_iotag; i++) {
3789 iocbq = phba->sli.iocbq_lookup[i];
3791 if (lpfc_sli_validate_fcp_iocb (iocbq, vport, tgt_id, lun_id,
3792 ctx_cmd) == 0)
3793 sum++;
3796 return sum;
3799 void
3800 lpfc_sli_abort_fcp_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
3801 struct lpfc_iocbq *rspiocb)
3803 lpfc_sli_release_iocbq(phba, cmdiocb);
3804 return;
3808 lpfc_sli_abort_iocb(struct lpfc_vport *vport, struct lpfc_sli_ring *pring,
3809 uint16_t tgt_id, uint64_t lun_id, lpfc_ctx_cmd abort_cmd)
3811 struct lpfc_hba *phba = vport->phba;
3812 struct lpfc_iocbq *iocbq;
3813 struct lpfc_iocbq *abtsiocb;
3814 IOCB_t *cmd = NULL;
3815 int errcnt = 0, ret_val = 0;
3816 int i;
3818 for (i = 1; i <= phba->sli.last_iotag; i++) {
3819 iocbq = phba->sli.iocbq_lookup[i];
3821 if (lpfc_sli_validate_fcp_iocb(iocbq, vport, tgt_id, lun_id,
3822 abort_cmd) != 0)
3823 continue;
3825 /* issue ABTS for this IOCB based on iotag */
3826 abtsiocb = lpfc_sli_get_iocbq(phba);
3827 if (abtsiocb == NULL) {
3828 errcnt++;
3829 continue;
3832 cmd = &iocbq->iocb;
3833 abtsiocb->iocb.un.acxri.abortType = ABORT_TYPE_ABTS;
3834 abtsiocb->iocb.un.acxri.abortContextTag = cmd->ulpContext;
3835 abtsiocb->iocb.un.acxri.abortIoTag = cmd->ulpIoTag;
3836 abtsiocb->iocb.ulpLe = 1;
3837 abtsiocb->iocb.ulpClass = cmd->ulpClass;
3838 abtsiocb->vport = phba->pport;
3840 if (lpfc_is_link_up(phba))
3841 abtsiocb->iocb.ulpCommand = CMD_ABORT_XRI_CN;
3842 else
3843 abtsiocb->iocb.ulpCommand = CMD_CLOSE_XRI_CN;
3845 /* Setup callback routine and issue the command. */
3846 abtsiocb->iocb_cmpl = lpfc_sli_abort_fcp_cmpl;
3847 ret_val = lpfc_sli_issue_iocb(phba, pring, abtsiocb, 0);
3848 if (ret_val == IOCB_ERROR) {
3849 lpfc_sli_release_iocbq(phba, abtsiocb);
3850 errcnt++;
3851 continue;
3855 return errcnt;
3858 static void
3859 lpfc_sli_wake_iocb_wait(struct lpfc_hba *phba,
3860 struct lpfc_iocbq *cmdiocbq,
3861 struct lpfc_iocbq *rspiocbq)
3863 wait_queue_head_t *pdone_q;
3864 unsigned long iflags;
3866 spin_lock_irqsave(&phba->hbalock, iflags);
3867 cmdiocbq->iocb_flag |= LPFC_IO_WAKE;
3868 if (cmdiocbq->context2 && rspiocbq)
3869 memcpy(&((struct lpfc_iocbq *)cmdiocbq->context2)->iocb,
3870 &rspiocbq->iocb, sizeof(IOCB_t));
3872 pdone_q = cmdiocbq->context_un.wait_queue;
3873 if (pdone_q)
3874 wake_up(pdone_q);
3875 spin_unlock_irqrestore(&phba->hbalock, iflags);
3876 return;
3880 * Issue the caller's iocb and wait for its completion, but no longer than the
3881 * caller's timeout. Note that iocb_flags is cleared before the
3882 * lpfc_sli_issue_call since the wake routine sets a unique value and by
3883 * definition this is a wait function.
3887 lpfc_sli_issue_iocb_wait(struct lpfc_hba *phba,
3888 struct lpfc_sli_ring *pring,
3889 struct lpfc_iocbq *piocb,
3890 struct lpfc_iocbq *prspiocbq,
3891 uint32_t timeout)
3893 DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
3894 long timeleft, timeout_req = 0;
3895 int retval = IOCB_SUCCESS;
3896 uint32_t creg_val;
3899 * If the caller has provided a response iocbq buffer, then context2
3900 * is NULL or its an error.
3902 if (prspiocbq) {
3903 if (piocb->context2)
3904 return IOCB_ERROR;
3905 piocb->context2 = prspiocbq;
3908 piocb->iocb_cmpl = lpfc_sli_wake_iocb_wait;
3909 piocb->context_un.wait_queue = &done_q;
3910 piocb->iocb_flag &= ~LPFC_IO_WAKE;
3912 if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
3913 creg_val = readl(phba->HCregaddr);
3914 creg_val |= (HC_R0INT_ENA << LPFC_FCP_RING);
3915 writel(creg_val, phba->HCregaddr);
3916 readl(phba->HCregaddr); /* flush */
3919 retval = lpfc_sli_issue_iocb(phba, pring, piocb, 0);
3920 if (retval == IOCB_SUCCESS) {
3921 timeout_req = timeout * HZ;
3922 timeleft = wait_event_timeout(done_q,
3923 piocb->iocb_flag & LPFC_IO_WAKE,
3924 timeout_req);
3926 if (piocb->iocb_flag & LPFC_IO_WAKE) {
3927 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3928 "0331 IOCB wake signaled\n");
3929 } else if (timeleft == 0) {
3930 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
3931 "0338 IOCB wait timeout error - no "
3932 "wake response Data x%x\n", timeout);
3933 retval = IOCB_TIMEDOUT;
3934 } else {
3935 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
3936 "0330 IOCB wake NOT set, "
3937 "Data x%x x%lx\n",
3938 timeout, (timeleft / jiffies));
3939 retval = IOCB_TIMEDOUT;
3941 } else {
3942 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3943 ":0332 IOCB wait issue failed, Data x%x\n",
3944 retval);
3945 retval = IOCB_ERROR;
3948 if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
3949 creg_val = readl(phba->HCregaddr);
3950 creg_val &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
3951 writel(creg_val, phba->HCregaddr);
3952 readl(phba->HCregaddr); /* flush */
3955 if (prspiocbq)
3956 piocb->context2 = NULL;
3958 piocb->context_un.wait_queue = NULL;
3959 piocb->iocb_cmpl = NULL;
3960 return retval;
3964 lpfc_sli_issue_mbox_wait(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmboxq,
3965 uint32_t timeout)
3967 DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
3968 int retval;
3969 unsigned long flag;
3971 /* The caller must leave context1 empty. */
3972 if (pmboxq->context1)
3973 return MBX_NOT_FINISHED;
3975 /* setup wake call as IOCB callback */
3976 pmboxq->mbox_cmpl = lpfc_sli_wake_mbox_wait;
3977 /* setup context field to pass wait_queue pointer to wake function */
3978 pmboxq->context1 = &done_q;
3980 /* now issue the command */
3981 retval = lpfc_sli_issue_mbox(phba, pmboxq, MBX_NOWAIT);
3983 if (retval == MBX_BUSY || retval == MBX_SUCCESS) {
3984 wait_event_interruptible_timeout(done_q,
3985 pmboxq->mbox_flag & LPFC_MBX_WAKE,
3986 timeout * HZ);
3988 spin_lock_irqsave(&phba->hbalock, flag);
3989 pmboxq->context1 = NULL;
3991 * if LPFC_MBX_WAKE flag is set the mailbox is completed
3992 * else do not free the resources.
3994 if (pmboxq->mbox_flag & LPFC_MBX_WAKE)
3995 retval = MBX_SUCCESS;
3996 else {
3997 retval = MBX_TIMEOUT;
3998 pmboxq->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4000 spin_unlock_irqrestore(&phba->hbalock, flag);
4003 return retval;
4007 lpfc_sli_flush_mbox_queue(struct lpfc_hba * phba)
4009 struct lpfc_vport *vport = phba->pport;
4010 int i = 0;
4011 uint32_t ha_copy;
4013 while (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE && !vport->stopped) {
4014 if (i++ > LPFC_MBOX_TMO * 1000)
4015 return 1;
4018 * Call lpfc_sli_handle_mb_event only if a mailbox cmd
4019 * did finish. This way we won't get the misleading
4020 * "Stray Mailbox Interrupt" message.
4022 spin_lock_irq(&phba->hbalock);
4023 ha_copy = phba->work_ha;
4024 phba->work_ha &= ~HA_MBATT;
4025 spin_unlock_irq(&phba->hbalock);
4027 if (ha_copy & HA_MBATT)
4028 if (lpfc_sli_handle_mb_event(phba) == 0)
4029 i = 0;
4031 msleep(1);
4034 return (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE) ? 1 : 0;
4037 irqreturn_t
4038 lpfc_intr_handler(int irq, void *dev_id)
4040 struct lpfc_hba *phba;
4041 uint32_t ha_copy;
4042 uint32_t work_ha_copy;
4043 unsigned long status;
4044 uint32_t control;
4046 MAILBOX_t *mbox, *pmbox;
4047 struct lpfc_vport *vport;
4048 struct lpfc_nodelist *ndlp;
4049 struct lpfc_dmabuf *mp;
4050 LPFC_MBOXQ_t *pmb;
4051 int rc;
4054 * Get the driver's phba structure from the dev_id and
4055 * assume the HBA is not interrupting.
4057 phba = (struct lpfc_hba *) dev_id;
4059 if (unlikely(!phba))
4060 return IRQ_NONE;
4062 /* If the pci channel is offline, ignore all the interrupts. */
4063 if (unlikely(pci_channel_offline(phba->pcidev)))
4064 return IRQ_NONE;
4066 phba->sli.slistat.sli_intr++;
4069 * Call the HBA to see if it is interrupting. If not, don't claim
4070 * the interrupt
4073 /* Ignore all interrupts during initialization. */
4074 if (unlikely(phba->link_state < LPFC_LINK_DOWN))
4075 return IRQ_NONE;
4078 * Read host attention register to determine interrupt source
4079 * Clear Attention Sources, except Error Attention (to
4080 * preserve status) and Link Attention
4082 spin_lock(&phba->hbalock);
4083 ha_copy = readl(phba->HAregaddr);
4084 /* If somebody is waiting to handle an eratt don't process it
4085 * here. The brdkill function will do this.
4087 if (phba->link_flag & LS_IGNORE_ERATT)
4088 ha_copy &= ~HA_ERATT;
4089 writel((ha_copy & ~(HA_LATT | HA_ERATT)), phba->HAregaddr);
4090 readl(phba->HAregaddr); /* flush */
4091 spin_unlock(&phba->hbalock);
4093 if (unlikely(!ha_copy))
4094 return IRQ_NONE;
4096 work_ha_copy = ha_copy & phba->work_ha_mask;
4098 if (unlikely(work_ha_copy)) {
4099 if (work_ha_copy & HA_LATT) {
4100 if (phba->sli.sli_flag & LPFC_PROCESS_LA) {
4102 * Turn off Link Attention interrupts
4103 * until CLEAR_LA done
4105 spin_lock(&phba->hbalock);
4106 phba->sli.sli_flag &= ~LPFC_PROCESS_LA;
4107 control = readl(phba->HCregaddr);
4108 control &= ~HC_LAINT_ENA;
4109 writel(control, phba->HCregaddr);
4110 readl(phba->HCregaddr); /* flush */
4111 spin_unlock(&phba->hbalock);
4113 else
4114 work_ha_copy &= ~HA_LATT;
4117 if (work_ha_copy & ~(HA_ERATT|HA_MBATT|HA_LATT)) {
4119 * Turn off Slow Rings interrupts, LPFC_ELS_RING is
4120 * the only slow ring.
4122 status = (work_ha_copy &
4123 (HA_RXMASK << (4*LPFC_ELS_RING)));
4124 status >>= (4*LPFC_ELS_RING);
4125 if (status & HA_RXMASK) {
4126 spin_lock(&phba->hbalock);
4127 control = readl(phba->HCregaddr);
4129 lpfc_debugfs_slow_ring_trc(phba,
4130 "ISR slow ring: ctl:x%x stat:x%x isrcnt:x%x",
4131 control, status,
4132 (uint32_t)phba->sli.slistat.sli_intr);
4134 if (control & (HC_R0INT_ENA << LPFC_ELS_RING)) {
4135 lpfc_debugfs_slow_ring_trc(phba,
4136 "ISR Disable ring:"
4137 "pwork:x%x hawork:x%x wait:x%x",
4138 phba->work_ha, work_ha_copy,
4139 (uint32_t)((unsigned long)
4140 phba->work_wait));
4142 control &=
4143 ~(HC_R0INT_ENA << LPFC_ELS_RING);
4144 writel(control, phba->HCregaddr);
4145 readl(phba->HCregaddr); /* flush */
4147 else {
4148 lpfc_debugfs_slow_ring_trc(phba,
4149 "ISR slow ring: pwork:"
4150 "x%x hawork:x%x wait:x%x",
4151 phba->work_ha, work_ha_copy,
4152 (uint32_t)((unsigned long)
4153 phba->work_wait));
4155 spin_unlock(&phba->hbalock);
4159 if (work_ha_copy & HA_ERATT) {
4161 * There was a link/board error. Read the
4162 * status register to retrieve the error event
4163 * and process it.
4165 phba->sli.slistat.err_attn_event++;
4166 /* Save status info */
4167 phba->work_hs = readl(phba->HSregaddr);
4168 phba->work_status[0] = readl(phba->MBslimaddr + 0xa8);
4169 phba->work_status[1] = readl(phba->MBslimaddr + 0xac);
4171 /* Clear Chip error bit */
4172 writel(HA_ERATT, phba->HAregaddr);
4173 readl(phba->HAregaddr); /* flush */
4174 phba->pport->stopped = 1;
4177 if ((work_ha_copy & HA_MBATT) &&
4178 (phba->sli.mbox_active)) {
4179 pmb = phba->sli.mbox_active;
4180 pmbox = &pmb->mb;
4181 mbox = &phba->slim2p->mbx;
4182 vport = pmb->vport;
4184 /* First check out the status word */
4185 lpfc_sli_pcimem_bcopy(mbox, pmbox, sizeof(uint32_t));
4186 if (pmbox->mbxOwner != OWN_HOST) {
4188 * Stray Mailbox Interrupt, mbxCommand <cmd>
4189 * mbxStatus <status>
4191 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX |
4192 LOG_SLI,
4193 "(%d):0304 Stray Mailbox "
4194 "Interrupt mbxCommand x%x "
4195 "mbxStatus x%x\n",
4196 (vport ? vport->vpi : 0),
4197 pmbox->mbxCommand,
4198 pmbox->mbxStatus);
4199 /* clear mailbox attention bit */
4200 work_ha_copy &= ~HA_MBATT;
4201 } else {
4202 phba->last_completion_time = jiffies;
4203 del_timer(&phba->sli.mbox_tmo);
4205 phba->sli.mbox_active = NULL;
4206 if (pmb->mbox_cmpl) {
4207 lpfc_sli_pcimem_bcopy(mbox, pmbox,
4208 MAILBOX_CMD_SIZE);
4210 if (pmb->mbox_flag & LPFC_MBX_IMED_UNREG) {
4211 pmb->mbox_flag &= ~LPFC_MBX_IMED_UNREG;
4213 lpfc_debugfs_disc_trc(vport,
4214 LPFC_DISC_TRC_MBOX_VPORT,
4215 "MBOX dflt rpi: : "
4216 "status:x%x rpi:x%x",
4217 (uint32_t)pmbox->mbxStatus,
4218 pmbox->un.varWords[0], 0);
4220 if (!pmbox->mbxStatus) {
4221 mp = (struct lpfc_dmabuf *)
4222 (pmb->context1);
4223 ndlp = (struct lpfc_nodelist *)
4224 pmb->context2;
4226 /* Reg_LOGIN of dflt RPI was
4227 * successful. new lets get
4228 * rid of the RPI using the
4229 * same mbox buffer.
4231 lpfc_unreg_login(phba,
4232 vport->vpi,
4233 pmbox->un.varWords[0],
4234 pmb);
4235 pmb->mbox_cmpl =
4236 lpfc_mbx_cmpl_dflt_rpi;
4237 pmb->context1 = mp;
4238 pmb->context2 = ndlp;
4239 pmb->vport = vport;
4240 spin_lock(&phba->hbalock);
4241 phba->sli.sli_flag &=
4242 ~LPFC_SLI_MBOX_ACTIVE;
4243 spin_unlock(&phba->hbalock);
4244 goto send_current_mbox;
4247 spin_lock(&phba->pport->work_port_lock);
4248 phba->pport->work_port_events &=
4249 ~WORKER_MBOX_TMO;
4250 spin_unlock(&phba->pport->work_port_lock);
4251 lpfc_mbox_cmpl_put(phba, pmb);
4254 if ((work_ha_copy & HA_MBATT) &&
4255 (phba->sli.mbox_active == NULL)) {
4256 send_next_mbox:
4257 spin_lock(&phba->hbalock);
4258 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
4259 pmb = lpfc_mbox_get(phba);
4260 spin_unlock(&phba->hbalock);
4261 send_current_mbox:
4262 /* Process next mailbox command if there is one */
4263 if (pmb != NULL) {
4264 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
4265 if (rc == MBX_NOT_FINISHED) {
4266 pmb->mb.mbxStatus = MBX_NOT_FINISHED;
4267 lpfc_mbox_cmpl_put(phba, pmb);
4268 goto send_next_mbox;
4274 spin_lock(&phba->hbalock);
4275 phba->work_ha |= work_ha_copy;
4276 if (phba->work_wait)
4277 lpfc_worker_wake_up(phba);
4278 spin_unlock(&phba->hbalock);
4281 ha_copy &= ~(phba->work_ha_mask);
4284 * Process all events on FCP ring. Take the optimized path for
4285 * FCP IO. Any other IO is slow path and is handled by
4286 * the worker thread.
4288 status = (ha_copy & (HA_RXMASK << (4*LPFC_FCP_RING)));
4289 status >>= (4*LPFC_FCP_RING);
4290 if (status & HA_RXMASK)
4291 lpfc_sli_handle_fast_ring_event(phba,
4292 &phba->sli.ring[LPFC_FCP_RING],
4293 status);
4295 if (phba->cfg_multi_ring_support == 2) {
4297 * Process all events on extra ring. Take the optimized path
4298 * for extra ring IO. Any other IO is slow path and is handled
4299 * by the worker thread.
4301 status = (ha_copy & (HA_RXMASK << (4*LPFC_EXTRA_RING)));
4302 status >>= (4*LPFC_EXTRA_RING);
4303 if (status & HA_RXMASK) {
4304 lpfc_sli_handle_fast_ring_event(phba,
4305 &phba->sli.ring[LPFC_EXTRA_RING],
4306 status);
4309 return IRQ_HANDLED;
4311 } /* lpfc_intr_handler */