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