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