]> pilppa.org Git - linux-2.6-omap-h63xx.git/blob - drivers/scsi/lpfc/lpfc_sli.c
Merge branches 'core/debug', 'core/futexes', 'core/locking', 'core/rcu', 'core/signal...
[linux-2.6-omap-h63xx.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-2008 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
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_nl.h"
36 #include "lpfc_disc.h"
37 #include "lpfc_scsi.h"
38 #include "lpfc.h"
39 #include "lpfc_crtn.h"
40 #include "lpfc_logmsg.h"
41 #include "lpfc_compat.h"
42 #include "lpfc_debugfs.h"
43
44 /*
45  * Define macro to log: Mailbox command x%x cannot issue Data
46  * This allows multiple uses of lpfc_msgBlk0311
47  * w/o perturbing log msg utility.
48  */
49 #define LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag) \
50                         lpfc_printf_log(phba, \
51                                 KERN_INFO, \
52                                 LOG_MBOX | LOG_SLI, \
53                                 "(%d):0311 Mailbox command x%x cannot " \
54                                 "issue Data: x%x x%x x%x\n", \
55                                 pmbox->vport ? pmbox->vport->vpi : 0, \
56                                 pmbox->mb.mbxCommand,           \
57                                 phba->pport->port_state,        \
58                                 psli->sli_flag, \
59                                 flag)
60
61
62 /* There are only four IOCB completion types. */
63 typedef enum _lpfc_iocb_type {
64         LPFC_UNKNOWN_IOCB,
65         LPFC_UNSOL_IOCB,
66         LPFC_SOL_IOCB,
67         LPFC_ABORT_IOCB
68 } lpfc_iocb_type;
69
70 /**
71  * lpfc_cmd_iocb: Get next command iocb entry in the ring.
72  * @phba: Pointer to HBA context object.
73  * @pring: Pointer to driver SLI ring object.
74  *
75  * This function returns pointer to next command iocb entry
76  * in the command ring. The caller must hold hbalock to prevent
77  * other threads consume the next command iocb.
78  * SLI-2/SLI-3 provide different sized iocbs.
79  **/
80 static inline IOCB_t *
81 lpfc_cmd_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
82 {
83         return (IOCB_t *) (((char *) pring->cmdringaddr) +
84                            pring->cmdidx * phba->iocb_cmd_size);
85 }
86
87 /**
88  * lpfc_resp_iocb: Get next response iocb entry in the ring.
89  * @phba: Pointer to HBA context object.
90  * @pring: Pointer to driver SLI ring object.
91  *
92  * This function returns pointer to next response iocb entry
93  * in the response ring. The caller must hold hbalock to make sure
94  * that no other thread consume the next response iocb.
95  * SLI-2/SLI-3 provide different sized iocbs.
96  **/
97 static inline IOCB_t *
98 lpfc_resp_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
99 {
100         return (IOCB_t *) (((char *) pring->rspringaddr) +
101                            pring->rspidx * phba->iocb_rsp_size);
102 }
103
104 /**
105  * __lpfc_sli_get_iocbq: Allocates an iocb object from iocb pool.
106  * @phba: Pointer to HBA context object.
107  *
108  * This function is called with hbalock held. This function
109  * allocates a new driver iocb object from the iocb pool. If the
110  * allocation is successful, it returns pointer to the newly
111  * allocated iocb object else it returns NULL.
112  **/
113 static struct lpfc_iocbq *
114 __lpfc_sli_get_iocbq(struct lpfc_hba *phba)
115 {
116         struct list_head *lpfc_iocb_list = &phba->lpfc_iocb_list;
117         struct lpfc_iocbq * iocbq = NULL;
118
119         list_remove_head(lpfc_iocb_list, iocbq, struct lpfc_iocbq, list);
120         return iocbq;
121 }
122
123 /**
124  * lpfc_sli_get_iocbq: Allocates an iocb object from iocb pool.
125  * @phba: Pointer to HBA context object.
126  *
127  * This function is called with no lock held. This function
128  * allocates a new driver iocb object from the iocb pool. If the
129  * allocation is successful, it returns pointer to the newly
130  * allocated iocb object else it returns NULL.
131  **/
132 struct lpfc_iocbq *
133 lpfc_sli_get_iocbq(struct lpfc_hba *phba)
134 {
135         struct lpfc_iocbq * iocbq = NULL;
136         unsigned long iflags;
137
138         spin_lock_irqsave(&phba->hbalock, iflags);
139         iocbq = __lpfc_sli_get_iocbq(phba);
140         spin_unlock_irqrestore(&phba->hbalock, iflags);
141         return iocbq;
142 }
143
144 /**
145  * __lpfc_sli_release_iocbq: Release iocb to the iocb pool.
146  * @phba: Pointer to HBA context object.
147  * @iocbq: Pointer to driver iocb object.
148  *
149  * This function is called with hbalock held to release driver
150  * iocb object to the iocb pool. The iotag in the iocb object
151  * does not change for each use of the iocb object. This function
152  * clears all other fields of the iocb object when it is freed.
153  **/
154 static void
155 __lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
156 {
157         size_t start_clean = offsetof(struct lpfc_iocbq, iocb);
158
159         /*
160          * Clean all volatile data fields, preserve iotag and node struct.
161          */
162         memset((char*)iocbq + start_clean, 0, sizeof(*iocbq) - start_clean);
163         list_add_tail(&iocbq->list, &phba->lpfc_iocb_list);
164 }
165
166 /**
167  * lpfc_sli_release_iocbq: Release iocb to the iocb pool.
168  * @phba: Pointer to HBA context object.
169  * @iocbq: Pointer to driver iocb object.
170  *
171  * This function is called with no lock held to release the iocb to
172  * iocb pool.
173  **/
174 void
175 lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
176 {
177         unsigned long iflags;
178
179         /*
180          * Clean all volatile data fields, preserve iotag and node struct.
181          */
182         spin_lock_irqsave(&phba->hbalock, iflags);
183         __lpfc_sli_release_iocbq(phba, iocbq);
184         spin_unlock_irqrestore(&phba->hbalock, iflags);
185 }
186
187 /**
188  * lpfc_sli_iocb_cmd_type: Get the iocb type.
189  * @iocb_cmnd : iocb command code.
190  *
191  * This function is called by ring event handler function to get the iocb type.
192  * This function translates the iocb command to an iocb command type used to
193  * decide the final disposition of each completed IOCB.
194  * The function returns
195  * LPFC_UNKNOWN_IOCB if it is an unsupported iocb
196  * LPFC_SOL_IOCB     if it is a solicited iocb completion
197  * LPFC_ABORT_IOCB   if it is an abort iocb
198  * LPFC_UNSOL_IOCB   if it is an unsolicited iocb
199  *
200  * The caller is not required to hold any lock.
201  **/
202 static lpfc_iocb_type
203 lpfc_sli_iocb_cmd_type(uint8_t iocb_cmnd)
204 {
205         lpfc_iocb_type type = LPFC_UNKNOWN_IOCB;
206
207         if (iocb_cmnd > CMD_MAX_IOCB_CMD)
208                 return 0;
209
210         switch (iocb_cmnd) {
211         case CMD_XMIT_SEQUENCE_CR:
212         case CMD_XMIT_SEQUENCE_CX:
213         case CMD_XMIT_BCAST_CN:
214         case CMD_XMIT_BCAST_CX:
215         case CMD_ELS_REQUEST_CR:
216         case CMD_ELS_REQUEST_CX:
217         case CMD_CREATE_XRI_CR:
218         case CMD_CREATE_XRI_CX:
219         case CMD_GET_RPI_CN:
220         case CMD_XMIT_ELS_RSP_CX:
221         case CMD_GET_RPI_CR:
222         case CMD_FCP_IWRITE_CR:
223         case CMD_FCP_IWRITE_CX:
224         case CMD_FCP_IREAD_CR:
225         case CMD_FCP_IREAD_CX:
226         case CMD_FCP_ICMND_CR:
227         case CMD_FCP_ICMND_CX:
228         case CMD_FCP_TSEND_CX:
229         case CMD_FCP_TRSP_CX:
230         case CMD_FCP_TRECEIVE_CX:
231         case CMD_FCP_AUTO_TRSP_CX:
232         case CMD_ADAPTER_MSG:
233         case CMD_ADAPTER_DUMP:
234         case CMD_XMIT_SEQUENCE64_CR:
235         case CMD_XMIT_SEQUENCE64_CX:
236         case CMD_XMIT_BCAST64_CN:
237         case CMD_XMIT_BCAST64_CX:
238         case CMD_ELS_REQUEST64_CR:
239         case CMD_ELS_REQUEST64_CX:
240         case CMD_FCP_IWRITE64_CR:
241         case CMD_FCP_IWRITE64_CX:
242         case CMD_FCP_IREAD64_CR:
243         case CMD_FCP_IREAD64_CX:
244         case CMD_FCP_ICMND64_CR:
245         case CMD_FCP_ICMND64_CX:
246         case CMD_FCP_TSEND64_CX:
247         case CMD_FCP_TRSP64_CX:
248         case CMD_FCP_TRECEIVE64_CX:
249         case CMD_GEN_REQUEST64_CR:
250         case CMD_GEN_REQUEST64_CX:
251         case CMD_XMIT_ELS_RSP64_CX:
252                 type = LPFC_SOL_IOCB;
253                 break;
254         case CMD_ABORT_XRI_CN:
255         case CMD_ABORT_XRI_CX:
256         case CMD_CLOSE_XRI_CN:
257         case CMD_CLOSE_XRI_CX:
258         case CMD_XRI_ABORTED_CX:
259         case CMD_ABORT_MXRI64_CN:
260                 type = LPFC_ABORT_IOCB;
261                 break;
262         case CMD_RCV_SEQUENCE_CX:
263         case CMD_RCV_ELS_REQ_CX:
264         case CMD_RCV_SEQUENCE64_CX:
265         case CMD_RCV_ELS_REQ64_CX:
266         case CMD_ASYNC_STATUS:
267         case CMD_IOCB_RCV_SEQ64_CX:
268         case CMD_IOCB_RCV_ELS64_CX:
269         case CMD_IOCB_RCV_CONT64_CX:
270         case CMD_IOCB_RET_XRI64_CX:
271                 type = LPFC_UNSOL_IOCB;
272                 break;
273         case CMD_IOCB_XMIT_MSEQ64_CR:
274         case CMD_IOCB_XMIT_MSEQ64_CX:
275         case CMD_IOCB_RCV_SEQ_LIST64_CX:
276         case CMD_IOCB_RCV_ELS_LIST64_CX:
277         case CMD_IOCB_CLOSE_EXTENDED_CN:
278         case CMD_IOCB_ABORT_EXTENDED_CN:
279         case CMD_IOCB_RET_HBQE64_CN:
280         case CMD_IOCB_FCP_IBIDIR64_CR:
281         case CMD_IOCB_FCP_IBIDIR64_CX:
282         case CMD_IOCB_FCP_ITASKMGT64_CX:
283         case CMD_IOCB_LOGENTRY_CN:
284         case CMD_IOCB_LOGENTRY_ASYNC_CN:
285                 printk("%s - Unhandled SLI-3 Command x%x\n",
286                                 __func__, iocb_cmnd);
287                 type = LPFC_UNKNOWN_IOCB;
288                 break;
289         default:
290                 type = LPFC_UNKNOWN_IOCB;
291                 break;
292         }
293
294         return type;
295 }
296
297 /**
298  * lpfc_sli_ring_map: Issue config_ring mbox for all rings.
299  * @phba: Pointer to HBA context object.
300  *
301  * This function is called from SLI initialization code
302  * to configure every ring of the HBA's SLI interface. The
303  * caller is not required to hold any lock. This function issues
304  * a config_ring mailbox command for each ring.
305  * This function returns zero if successful else returns a negative
306  * error code.
307  **/
308 static int
309 lpfc_sli_ring_map(struct lpfc_hba *phba)
310 {
311         struct lpfc_sli *psli = &phba->sli;
312         LPFC_MBOXQ_t *pmb;
313         MAILBOX_t *pmbox;
314         int i, rc, ret = 0;
315
316         pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
317         if (!pmb)
318                 return -ENOMEM;
319         pmbox = &pmb->mb;
320         phba->link_state = LPFC_INIT_MBX_CMDS;
321         for (i = 0; i < psli->num_rings; i++) {
322                 lpfc_config_ring(phba, i, pmb);
323                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
324                 if (rc != MBX_SUCCESS) {
325                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
326                                         "0446 Adapter failed to init (%d), "
327                                         "mbxCmd x%x CFG_RING, mbxStatus x%x, "
328                                         "ring %d\n",
329                                         rc, pmbox->mbxCommand,
330                                         pmbox->mbxStatus, i);
331                         phba->link_state = LPFC_HBA_ERROR;
332                         ret = -ENXIO;
333                         break;
334                 }
335         }
336         mempool_free(pmb, phba->mbox_mem_pool);
337         return ret;
338 }
339
340 /**
341  * lpfc_sli_ringtxcmpl_put: Adds new iocb to the txcmplq.
342  * @phba: Pointer to HBA context object.
343  * @pring: Pointer to driver SLI ring object.
344  * @piocb: Pointer to the driver iocb object.
345  *
346  * This function is called with hbalock held. The function adds the
347  * new iocb to txcmplq of the given ring. This function always returns
348  * 0. If this function is called for ELS ring, this function checks if
349  * there is a vport associated with the ELS command. This function also
350  * starts els_tmofunc timer if this is an ELS command.
351  **/
352 static int
353 lpfc_sli_ringtxcmpl_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
354                         struct lpfc_iocbq *piocb)
355 {
356         list_add_tail(&piocb->list, &pring->txcmplq);
357         pring->txcmplq_cnt++;
358         if ((unlikely(pring->ringno == LPFC_ELS_RING)) &&
359            (piocb->iocb.ulpCommand != CMD_ABORT_XRI_CN) &&
360            (piocb->iocb.ulpCommand != CMD_CLOSE_XRI_CN)) {
361                 if (!piocb->vport)
362                         BUG();
363                 else
364                         mod_timer(&piocb->vport->els_tmofunc,
365                                   jiffies + HZ * (phba->fc_ratov << 1));
366         }
367
368
369         return 0;
370 }
371
372 /**
373  * lpfc_sli_ringtx_get: Get first element of the txq.
374  * @phba: Pointer to HBA context object.
375  * @pring: Pointer to driver SLI ring object.
376  *
377  * This function is called with hbalock held to get next
378  * iocb in txq of the given ring. If there is any iocb in
379  * the txq, the function returns first iocb in the list after
380  * removing the iocb from the list, else it returns NULL.
381  **/
382 static struct lpfc_iocbq *
383 lpfc_sli_ringtx_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
384 {
385         struct lpfc_iocbq *cmd_iocb;
386
387         list_remove_head((&pring->txq), cmd_iocb, struct lpfc_iocbq, list);
388         if (cmd_iocb != NULL)
389                 pring->txq_cnt--;
390         return cmd_iocb;
391 }
392
393 /**
394  * lpfc_sli_next_iocb_slot: Get next iocb slot in the ring.
395  * @phba: Pointer to HBA context object.
396  * @pring: Pointer to driver SLI ring object.
397  *
398  * This function is called with hbalock held and the caller must post the
399  * iocb without releasing the lock. If the caller releases the lock,
400  * iocb slot returned by the function is not guaranteed to be available.
401  * The function returns pointer to the next available iocb slot if there
402  * is available slot in the ring, else it returns NULL.
403  * If the get index of the ring is ahead of the put index, the function
404  * will post an error attention event to the worker thread to take the
405  * HBA to offline state.
406  **/
407 static IOCB_t *
408 lpfc_sli_next_iocb_slot (struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
409 {
410         struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
411         uint32_t  max_cmd_idx = pring->numCiocb;
412         if ((pring->next_cmdidx == pring->cmdidx) &&
413            (++pring->next_cmdidx >= max_cmd_idx))
414                 pring->next_cmdidx = 0;
415
416         if (unlikely(pring->local_getidx == pring->next_cmdidx)) {
417
418                 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
419
420                 if (unlikely(pring->local_getidx >= max_cmd_idx)) {
421                         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
422                                         "0315 Ring %d issue: portCmdGet %d "
423                                         "is bigger then cmd ring %d\n",
424                                         pring->ringno,
425                                         pring->local_getidx, max_cmd_idx);
426
427                         phba->link_state = LPFC_HBA_ERROR;
428                         /*
429                          * All error attention handlers are posted to
430                          * worker thread
431                          */
432                         phba->work_ha |= HA_ERATT;
433                         phba->work_hs = HS_FFER3;
434
435                         lpfc_worker_wake_up(phba);
436
437                         return NULL;
438                 }
439
440                 if (pring->local_getidx == pring->next_cmdidx)
441                         return NULL;
442         }
443
444         return lpfc_cmd_iocb(phba, pring);
445 }
446
447 /**
448  * lpfc_sli_next_iotag: Get an iotag for the iocb.
449  * @phba: Pointer to HBA context object.
450  * @iocbq: Pointer to driver iocb object.
451  *
452  * This function gets an iotag for the iocb. If there is no unused iotag and
453  * the iocbq_lookup_len < 0xffff, this function allocates a bigger iotag_lookup
454  * array and assigns a new iotag.
455  * The function returns the allocated iotag if successful, else returns zero.
456  * Zero is not a valid iotag.
457  * The caller is not required to hold any lock.
458  **/
459 uint16_t
460 lpfc_sli_next_iotag(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
461 {
462         struct lpfc_iocbq **new_arr;
463         struct lpfc_iocbq **old_arr;
464         size_t new_len;
465         struct lpfc_sli *psli = &phba->sli;
466         uint16_t iotag;
467
468         spin_lock_irq(&phba->hbalock);
469         iotag = psli->last_iotag;
470         if(++iotag < psli->iocbq_lookup_len) {
471                 psli->last_iotag = iotag;
472                 psli->iocbq_lookup[iotag] = iocbq;
473                 spin_unlock_irq(&phba->hbalock);
474                 iocbq->iotag = iotag;
475                 return iotag;
476         } else if (psli->iocbq_lookup_len < (0xffff
477                                            - LPFC_IOCBQ_LOOKUP_INCREMENT)) {
478                 new_len = psli->iocbq_lookup_len + LPFC_IOCBQ_LOOKUP_INCREMENT;
479                 spin_unlock_irq(&phba->hbalock);
480                 new_arr = kzalloc(new_len * sizeof (struct lpfc_iocbq *),
481                                   GFP_KERNEL);
482                 if (new_arr) {
483                         spin_lock_irq(&phba->hbalock);
484                         old_arr = psli->iocbq_lookup;
485                         if (new_len <= psli->iocbq_lookup_len) {
486                                 /* highly unprobable case */
487                                 kfree(new_arr);
488                                 iotag = psli->last_iotag;
489                                 if(++iotag < psli->iocbq_lookup_len) {
490                                         psli->last_iotag = iotag;
491                                         psli->iocbq_lookup[iotag] = iocbq;
492                                         spin_unlock_irq(&phba->hbalock);
493                                         iocbq->iotag = iotag;
494                                         return iotag;
495                                 }
496                                 spin_unlock_irq(&phba->hbalock);
497                                 return 0;
498                         }
499                         if (psli->iocbq_lookup)
500                                 memcpy(new_arr, old_arr,
501                                        ((psli->last_iotag  + 1) *
502                                         sizeof (struct lpfc_iocbq *)));
503                         psli->iocbq_lookup = new_arr;
504                         psli->iocbq_lookup_len = new_len;
505                         psli->last_iotag = iotag;
506                         psli->iocbq_lookup[iotag] = iocbq;
507                         spin_unlock_irq(&phba->hbalock);
508                         iocbq->iotag = iotag;
509                         kfree(old_arr);
510                         return iotag;
511                 }
512         } else
513                 spin_unlock_irq(&phba->hbalock);
514
515         lpfc_printf_log(phba, KERN_ERR,LOG_SLI,
516                         "0318 Failed to allocate IOTAG.last IOTAG is %d\n",
517                         psli->last_iotag);
518
519         return 0;
520 }
521
522 /**
523  * lpfc_sli_submit_iocb: Submit an iocb to the firmware.
524  * @phba: Pointer to HBA context object.
525  * @pring: Pointer to driver SLI ring object.
526  * @iocb: Pointer to iocb slot in the ring.
527  * @nextiocb: Pointer to driver iocb object which need to be
528  *            posted to firmware.
529  *
530  * This function is called with hbalock held to post a new iocb to
531  * the firmware. This function copies the new iocb to ring iocb slot and
532  * updates the ring pointers. It adds the new iocb to txcmplq if there is
533  * a completion call back for this iocb else the function will free the
534  * iocb object.
535  **/
536 static void
537 lpfc_sli_submit_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
538                 IOCB_t *iocb, struct lpfc_iocbq *nextiocb)
539 {
540         /*
541          * Set up an iotag
542          */
543         nextiocb->iocb.ulpIoTag = (nextiocb->iocb_cmpl) ? nextiocb->iotag : 0;
544
545         if (pring->ringno == LPFC_ELS_RING) {
546                 lpfc_debugfs_slow_ring_trc(phba,
547                         "IOCB cmd ring:   wd4:x%08x wd6:x%08x wd7:x%08x",
548                         *(((uint32_t *) &nextiocb->iocb) + 4),
549                         *(((uint32_t *) &nextiocb->iocb) + 6),
550                         *(((uint32_t *) &nextiocb->iocb) + 7));
551         }
552
553         /*
554          * Issue iocb command to adapter
555          */
556         lpfc_sli_pcimem_bcopy(&nextiocb->iocb, iocb, phba->iocb_cmd_size);
557         wmb();
558         pring->stats.iocb_cmd++;
559
560         /*
561          * If there is no completion routine to call, we can release the
562          * IOCB buffer back right now. For IOCBs, like QUE_RING_BUF,
563          * that have no rsp ring completion, iocb_cmpl MUST be NULL.
564          */
565         if (nextiocb->iocb_cmpl)
566                 lpfc_sli_ringtxcmpl_put(phba, pring, nextiocb);
567         else
568                 __lpfc_sli_release_iocbq(phba, nextiocb);
569
570         /*
571          * Let the HBA know what IOCB slot will be the next one the
572          * driver will put a command into.
573          */
574         pring->cmdidx = pring->next_cmdidx;
575         writel(pring->cmdidx, &phba->host_gp[pring->ringno].cmdPutInx);
576 }
577
578 /**
579  * lpfc_sli_update_full_ring: Update the chip attention register.
580  * @phba: Pointer to HBA context object.
581  * @pring: Pointer to driver SLI ring object.
582  *
583  * The caller is not required to hold any lock for calling this function.
584  * This function updates the chip attention bits for the ring to inform firmware
585  * that there are pending work to be done for this ring and requests an
586  * interrupt when there is space available in the ring. This function is
587  * called when the driver is unable to post more iocbs to the ring due
588  * to unavailability of space in the ring.
589  **/
590 static void
591 lpfc_sli_update_full_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
592 {
593         int ringno = pring->ringno;
594
595         pring->flag |= LPFC_CALL_RING_AVAILABLE;
596
597         wmb();
598
599         /*
600          * Set ring 'ringno' to SET R0CE_REQ in Chip Att register.
601          * The HBA will tell us when an IOCB entry is available.
602          */
603         writel((CA_R0ATT|CA_R0CE_REQ) << (ringno*4), phba->CAregaddr);
604         readl(phba->CAregaddr); /* flush */
605
606         pring->stats.iocb_cmd_full++;
607 }
608
609 /**
610  * lpfc_sli_update_ring: Update chip attention register.
611  * @phba: Pointer to HBA context object.
612  * @pring: Pointer to driver SLI ring object.
613  *
614  * This function updates the chip attention register bit for the
615  * given ring to inform HBA that there is more work to be done
616  * in this ring. The caller is not required to hold any lock.
617  **/
618 static void
619 lpfc_sli_update_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
620 {
621         int ringno = pring->ringno;
622
623         /*
624          * Tell the HBA that there is work to do in this ring.
625          */
626         if (!(phba->sli3_options & LPFC_SLI3_CRP_ENABLED)) {
627                 wmb();
628                 writel(CA_R0ATT << (ringno * 4), phba->CAregaddr);
629                 readl(phba->CAregaddr); /* flush */
630         }
631 }
632
633 /**
634  * lpfc_sli_resume_iocb: Process iocbs in the txq.
635  * @phba: Pointer to HBA context object.
636  * @pring: Pointer to driver SLI ring object.
637  *
638  * This function is called with hbalock held to post pending iocbs
639  * in the txq to the firmware. This function is called when driver
640  * detects space available in the ring.
641  **/
642 static void
643 lpfc_sli_resume_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
644 {
645         IOCB_t *iocb;
646         struct lpfc_iocbq *nextiocb;
647
648         /*
649          * Check to see if:
650          *  (a) there is anything on the txq to send
651          *  (b) link is up
652          *  (c) link attention events can be processed (fcp ring only)
653          *  (d) IOCB processing is not blocked by the outstanding mbox command.
654          */
655         if (pring->txq_cnt &&
656             lpfc_is_link_up(phba) &&
657             (pring->ringno != phba->sli.fcp_ring ||
658              phba->sli.sli_flag & LPFC_PROCESS_LA)) {
659
660                 while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
661                        (nextiocb = lpfc_sli_ringtx_get(phba, pring)))
662                         lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
663
664                 if (iocb)
665                         lpfc_sli_update_ring(phba, pring);
666                 else
667                         lpfc_sli_update_full_ring(phba, pring);
668         }
669
670         return;
671 }
672
673 /**
674  * lpfc_sli_next_hbq_slot: Get next hbq entry for the HBQ.
675  * @phba: Pointer to HBA context object.
676  * @hbqno: HBQ number.
677  *
678  * This function is called with hbalock held to get the next
679  * available slot for the given HBQ. If there is free slot
680  * available for the HBQ it will return pointer to the next available
681  * HBQ entry else it will return NULL.
682  **/
683 static struct lpfc_hbq_entry *
684 lpfc_sli_next_hbq_slot(struct lpfc_hba *phba, uint32_t hbqno)
685 {
686         struct hbq_s *hbqp = &phba->hbqs[hbqno];
687
688         if (hbqp->next_hbqPutIdx == hbqp->hbqPutIdx &&
689             ++hbqp->next_hbqPutIdx >= hbqp->entry_count)
690                 hbqp->next_hbqPutIdx = 0;
691
692         if (unlikely(hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)) {
693                 uint32_t raw_index = phba->hbq_get[hbqno];
694                 uint32_t getidx = le32_to_cpu(raw_index);
695
696                 hbqp->local_hbqGetIdx = getidx;
697
698                 if (unlikely(hbqp->local_hbqGetIdx >= hbqp->entry_count)) {
699                         lpfc_printf_log(phba, KERN_ERR,
700                                         LOG_SLI | LOG_VPORT,
701                                         "1802 HBQ %d: local_hbqGetIdx "
702                                         "%u is > than hbqp->entry_count %u\n",
703                                         hbqno, hbqp->local_hbqGetIdx,
704                                         hbqp->entry_count);
705
706                         phba->link_state = LPFC_HBA_ERROR;
707                         return NULL;
708                 }
709
710                 if (hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)
711                         return NULL;
712         }
713
714         return (struct lpfc_hbq_entry *) phba->hbqs[hbqno].hbq_virt +
715                         hbqp->hbqPutIdx;
716 }
717
718 /**
719  * lpfc_sli_hbqbuf_free_all: Free all the hbq buffers.
720  * @phba: Pointer to HBA context object.
721  *
722  * This function is called with no lock held to free all the
723  * hbq buffers while uninitializing the SLI interface. It also
724  * frees the HBQ buffers returned by the firmware but not yet
725  * processed by the upper layers.
726  **/
727 void
728 lpfc_sli_hbqbuf_free_all(struct lpfc_hba *phba)
729 {
730         struct lpfc_dmabuf *dmabuf, *next_dmabuf;
731         struct hbq_dmabuf *hbq_buf;
732         unsigned long flags;
733         int i, hbq_count;
734         uint32_t hbqno;
735
736         hbq_count = lpfc_sli_hbq_count();
737         /* Return all memory used by all HBQs */
738         spin_lock_irqsave(&phba->hbalock, flags);
739         for (i = 0; i < hbq_count; ++i) {
740                 list_for_each_entry_safe(dmabuf, next_dmabuf,
741                                 &phba->hbqs[i].hbq_buffer_list, list) {
742                         hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
743                         list_del(&hbq_buf->dbuf.list);
744                         (phba->hbqs[i].hbq_free_buffer)(phba, hbq_buf);
745                 }
746                 phba->hbqs[i].buffer_count = 0;
747         }
748         /* Return all HBQ buffer that are in-fly */
749         list_for_each_entry_safe(dmabuf, next_dmabuf,
750                         &phba->hbqbuf_in_list, list) {
751                 hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
752                 list_del(&hbq_buf->dbuf.list);
753                 if (hbq_buf->tag == -1) {
754                         (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
755                                 (phba, hbq_buf);
756                 } else {
757                         hbqno = hbq_buf->tag >> 16;
758                         if (hbqno >= LPFC_MAX_HBQS)
759                                 (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
760                                         (phba, hbq_buf);
761                         else
762                                 (phba->hbqs[hbqno].hbq_free_buffer)(phba,
763                                         hbq_buf);
764                 }
765         }
766
767         /* Mark the HBQs not in use */
768         phba->hbq_in_use = 0;
769         spin_unlock_irqrestore(&phba->hbalock, flags);
770 }
771
772 /**
773  * lpfc_sli_hbq_to_firmware: Post the hbq buffer to firmware.
774  * @phba: Pointer to HBA context object.
775  * @hbqno: HBQ number.
776  * @hbq_buf: Pointer to HBQ buffer.
777  *
778  * This function is called with the hbalock held to post a
779  * hbq buffer to the firmware. If the function finds an empty
780  * slot in the HBQ, it will post the buffer. The function will return
781  * pointer to the hbq entry if it successfully post the buffer
782  * else it will return NULL.
783  **/
784 static struct lpfc_hbq_entry *
785 lpfc_sli_hbq_to_firmware(struct lpfc_hba *phba, uint32_t hbqno,
786                          struct hbq_dmabuf *hbq_buf)
787 {
788         struct lpfc_hbq_entry *hbqe;
789         dma_addr_t physaddr = hbq_buf->dbuf.phys;
790
791         /* Get next HBQ entry slot to use */
792         hbqe = lpfc_sli_next_hbq_slot(phba, hbqno);
793         if (hbqe) {
794                 struct hbq_s *hbqp = &phba->hbqs[hbqno];
795
796                 hbqe->bde.addrHigh = le32_to_cpu(putPaddrHigh(physaddr));
797                 hbqe->bde.addrLow  = le32_to_cpu(putPaddrLow(physaddr));
798                 hbqe->bde.tus.f.bdeSize = hbq_buf->size;
799                 hbqe->bde.tus.f.bdeFlags = 0;
800                 hbqe->bde.tus.w = le32_to_cpu(hbqe->bde.tus.w);
801                 hbqe->buffer_tag = le32_to_cpu(hbq_buf->tag);
802                                 /* Sync SLIM */
803                 hbqp->hbqPutIdx = hbqp->next_hbqPutIdx;
804                 writel(hbqp->hbqPutIdx, phba->hbq_put + hbqno);
805                                 /* flush */
806                 readl(phba->hbq_put + hbqno);
807                 list_add_tail(&hbq_buf->dbuf.list, &hbqp->hbq_buffer_list);
808         }
809         return hbqe;
810 }
811
812 /* HBQ for ELS and CT traffic. */
813 static struct lpfc_hbq_init lpfc_els_hbq = {
814         .rn = 1,
815         .entry_count = 200,
816         .mask_count = 0,
817         .profile = 0,
818         .ring_mask = (1 << LPFC_ELS_RING),
819         .buffer_count = 0,
820         .init_count = 20,
821         .add_count = 5,
822 };
823
824 /* HBQ for the extra ring if needed */
825 static struct lpfc_hbq_init lpfc_extra_hbq = {
826         .rn = 1,
827         .entry_count = 200,
828         .mask_count = 0,
829         .profile = 0,
830         .ring_mask = (1 << LPFC_EXTRA_RING),
831         .buffer_count = 0,
832         .init_count = 0,
833         .add_count = 5,
834 };
835
836 /* Array of HBQs */
837 struct lpfc_hbq_init *lpfc_hbq_defs[] = {
838         &lpfc_els_hbq,
839         &lpfc_extra_hbq,
840 };
841
842 /**
843  * lpfc_sli_hbqbuf_fill_hbqs: Post more hbq buffers to HBQ.
844  * @phba: Pointer to HBA context object.
845  * @hbqno: HBQ number.
846  * @count: Number of HBQ buffers to be posted.
847  *
848  * This function is called with no lock held to post more hbq buffers to the
849  * given HBQ. The function returns the number of HBQ buffers successfully
850  * posted.
851  **/
852 static int
853 lpfc_sli_hbqbuf_fill_hbqs(struct lpfc_hba *phba, uint32_t hbqno, uint32_t count)
854 {
855         uint32_t i, posted = 0;
856         unsigned long flags;
857         struct hbq_dmabuf *hbq_buffer;
858         LIST_HEAD(hbq_buf_list);
859         if (!phba->hbqs[hbqno].hbq_alloc_buffer)
860                 return 0;
861
862         if ((phba->hbqs[hbqno].buffer_count + count) >
863             lpfc_hbq_defs[hbqno]->entry_count)
864                 count = lpfc_hbq_defs[hbqno]->entry_count -
865                                         phba->hbqs[hbqno].buffer_count;
866         if (!count)
867                 return 0;
868         /* Allocate HBQ entries */
869         for (i = 0; i < count; i++) {
870                 hbq_buffer = (phba->hbqs[hbqno].hbq_alloc_buffer)(phba);
871                 if (!hbq_buffer)
872                         break;
873                 list_add_tail(&hbq_buffer->dbuf.list, &hbq_buf_list);
874         }
875         /* Check whether HBQ is still in use */
876         spin_lock_irqsave(&phba->hbalock, flags);
877         if (!phba->hbq_in_use)
878                 goto err;
879         while (!list_empty(&hbq_buf_list)) {
880                 list_remove_head(&hbq_buf_list, hbq_buffer, struct hbq_dmabuf,
881                                  dbuf.list);
882                 hbq_buffer->tag = (phba->hbqs[hbqno].buffer_count |
883                                       (hbqno << 16));
884                 if (lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer)) {
885                         phba->hbqs[hbqno].buffer_count++;
886                         posted++;
887                 } else
888                         (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
889         }
890         spin_unlock_irqrestore(&phba->hbalock, flags);
891         return posted;
892 err:
893         spin_unlock_irqrestore(&phba->hbalock, flags);
894         while (!list_empty(&hbq_buf_list)) {
895                 list_remove_head(&hbq_buf_list, hbq_buffer, struct hbq_dmabuf,
896                                  dbuf.list);
897                 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
898         }
899         return 0;
900 }
901
902 /**
903  * lpfc_sli_hbqbuf_add_hbqs: Post more HBQ buffers to firmware.
904  * @phba: Pointer to HBA context object.
905  * @qno: HBQ number.
906  *
907  * This function posts more buffers to the HBQ. This function
908  * is called with no lock held. The function returns the number of HBQ entries
909  * successfully allocated.
910  **/
911 int
912 lpfc_sli_hbqbuf_add_hbqs(struct lpfc_hba *phba, uint32_t qno)
913 {
914         return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
915                                          lpfc_hbq_defs[qno]->add_count));
916 }
917
918 /**
919  * lpfc_sli_hbqbuf_init_hbqs: Post initial buffers to the HBQ.
920  * @phba: Pointer to HBA context object.
921  * @qno:  HBQ queue number.
922  *
923  * This function is called from SLI initialization code path with
924  * no lock held to post initial HBQ buffers to firmware. The
925  * function returns the number of HBQ entries successfully allocated.
926  **/
927 static int
928 lpfc_sli_hbqbuf_init_hbqs(struct lpfc_hba *phba, uint32_t qno)
929 {
930         return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
931                                          lpfc_hbq_defs[qno]->init_count));
932 }
933
934 /**
935  * lpfc_sli_hbqbuf_find: Find the hbq buffer associated with a tag.
936  * @phba: Pointer to HBA context object.
937  * @tag: Tag of the hbq buffer.
938  *
939  * This function is called with hbalock held. This function searches
940  * for the hbq buffer associated with the given tag in the hbq buffer
941  * list. If it finds the hbq buffer, it returns the hbq_buffer other wise
942  * it returns NULL.
943  **/
944 static struct hbq_dmabuf *
945 lpfc_sli_hbqbuf_find(struct lpfc_hba *phba, uint32_t tag)
946 {
947         struct lpfc_dmabuf *d_buf;
948         struct hbq_dmabuf *hbq_buf;
949         uint32_t hbqno;
950
951         hbqno = tag >> 16;
952         if (hbqno >= LPFC_MAX_HBQS)
953                 return NULL;
954
955         list_for_each_entry(d_buf, &phba->hbqs[hbqno].hbq_buffer_list, list) {
956                 hbq_buf = container_of(d_buf, struct hbq_dmabuf, dbuf);
957                 if (hbq_buf->tag == tag) {
958                         return hbq_buf;
959                 }
960         }
961         lpfc_printf_log(phba, KERN_ERR, LOG_SLI | LOG_VPORT,
962                         "1803 Bad hbq tag. Data: x%x x%x\n",
963                         tag, phba->hbqs[tag >> 16].buffer_count);
964         return NULL;
965 }
966
967 /**
968  * lpfc_sli_free_hbq: Give back the hbq buffer to firmware.
969  * @phba: Pointer to HBA context object.
970  * @hbq_buffer: Pointer to HBQ buffer.
971  *
972  * This function is called with hbalock. This function gives back
973  * the hbq buffer to firmware. If the HBQ does not have space to
974  * post the buffer, it will free the buffer.
975  **/
976 void
977 lpfc_sli_free_hbq(struct lpfc_hba *phba, struct hbq_dmabuf *hbq_buffer)
978 {
979         uint32_t hbqno;
980
981         if (hbq_buffer) {
982                 hbqno = hbq_buffer->tag >> 16;
983                 if (!lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer)) {
984                         (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
985                 }
986         }
987 }
988
989 /**
990  * lpfc_sli_chk_mbx_command: Check if the mailbox is a legitimate mailbox.
991  * @mbxCommand: mailbox command code.
992  *
993  * This function is called by the mailbox event handler function to verify
994  * that the completed mailbox command is a legitimate mailbox command. If the
995  * completed mailbox is not known to the function, it will return MBX_SHUTDOWN
996  * and the mailbox event handler will take the HBA offline.
997  **/
998 static int
999 lpfc_sli_chk_mbx_command(uint8_t mbxCommand)
1000 {
1001         uint8_t ret;
1002
1003         switch (mbxCommand) {
1004         case MBX_LOAD_SM:
1005         case MBX_READ_NV:
1006         case MBX_WRITE_NV:
1007         case MBX_WRITE_VPARMS:
1008         case MBX_RUN_BIU_DIAG:
1009         case MBX_INIT_LINK:
1010         case MBX_DOWN_LINK:
1011         case MBX_CONFIG_LINK:
1012         case MBX_CONFIG_RING:
1013         case MBX_RESET_RING:
1014         case MBX_READ_CONFIG:
1015         case MBX_READ_RCONFIG:
1016         case MBX_READ_SPARM:
1017         case MBX_READ_STATUS:
1018         case MBX_READ_RPI:
1019         case MBX_READ_XRI:
1020         case MBX_READ_REV:
1021         case MBX_READ_LNK_STAT:
1022         case MBX_REG_LOGIN:
1023         case MBX_UNREG_LOGIN:
1024         case MBX_READ_LA:
1025         case MBX_CLEAR_LA:
1026         case MBX_DUMP_MEMORY:
1027         case MBX_DUMP_CONTEXT:
1028         case MBX_RUN_DIAGS:
1029         case MBX_RESTART:
1030         case MBX_UPDATE_CFG:
1031         case MBX_DOWN_LOAD:
1032         case MBX_DEL_LD_ENTRY:
1033         case MBX_RUN_PROGRAM:
1034         case MBX_SET_MASK:
1035         case MBX_SET_VARIABLE:
1036         case MBX_UNREG_D_ID:
1037         case MBX_KILL_BOARD:
1038         case MBX_CONFIG_FARP:
1039         case MBX_BEACON:
1040         case MBX_LOAD_AREA:
1041         case MBX_RUN_BIU_DIAG64:
1042         case MBX_CONFIG_PORT:
1043         case MBX_READ_SPARM64:
1044         case MBX_READ_RPI64:
1045         case MBX_REG_LOGIN64:
1046         case MBX_READ_LA64:
1047         case MBX_WRITE_WWN:
1048         case MBX_SET_DEBUG:
1049         case MBX_LOAD_EXP_ROM:
1050         case MBX_ASYNCEVT_ENABLE:
1051         case MBX_REG_VPI:
1052         case MBX_UNREG_VPI:
1053         case MBX_HEARTBEAT:
1054         case MBX_PORT_CAPABILITIES:
1055         case MBX_PORT_IOV_CONTROL:
1056                 ret = mbxCommand;
1057                 break;
1058         default:
1059                 ret = MBX_SHUTDOWN;
1060                 break;
1061         }
1062         return ret;
1063 }
1064
1065 /**
1066  * lpfc_sli_wake_mbox_wait: Completion handler for mbox issued from
1067  *          lpfc_sli_issue_mbox_wait.
1068  * @phba: Pointer to HBA context object.
1069  * @pmboxq: Pointer to mailbox command.
1070  *
1071  * This is completion handler function for mailbox commands issued from
1072  * lpfc_sli_issue_mbox_wait function. This function is called by the
1073  * mailbox event handler function with no lock held. This function
1074  * will wake up thread waiting on the wait queue pointed by context1
1075  * of the mailbox.
1076  **/
1077 static void
1078 lpfc_sli_wake_mbox_wait(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmboxq)
1079 {
1080         wait_queue_head_t *pdone_q;
1081         unsigned long drvr_flag;
1082
1083         /*
1084          * If pdone_q is empty, the driver thread gave up waiting and
1085          * continued running.
1086          */
1087         pmboxq->mbox_flag |= LPFC_MBX_WAKE;
1088         spin_lock_irqsave(&phba->hbalock, drvr_flag);
1089         pdone_q = (wait_queue_head_t *) pmboxq->context1;
1090         if (pdone_q)
1091                 wake_up_interruptible(pdone_q);
1092         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
1093         return;
1094 }
1095
1096
1097 /**
1098  * lpfc_sli_def_mbox_cmpl: Default mailbox completion handler.
1099  * @phba: Pointer to HBA context object.
1100  * @pmb: Pointer to mailbox object.
1101  *
1102  * This function is the default mailbox completion handler. It
1103  * frees the memory resources associated with the completed mailbox
1104  * command. If the completed command is a REG_LOGIN mailbox command,
1105  * this function will issue a UREG_LOGIN to re-claim the RPI.
1106  **/
1107 void
1108 lpfc_sli_def_mbox_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1109 {
1110         struct lpfc_dmabuf *mp;
1111         uint16_t rpi;
1112         int rc;
1113
1114         mp = (struct lpfc_dmabuf *) (pmb->context1);
1115
1116         if (mp) {
1117                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
1118                 kfree(mp);
1119         }
1120
1121         /*
1122          * If a REG_LOGIN succeeded  after node is destroyed or node
1123          * is in re-discovery driver need to cleanup the RPI.
1124          */
1125         if (!(phba->pport->load_flag & FC_UNLOADING) &&
1126             pmb->mb.mbxCommand == MBX_REG_LOGIN64 &&
1127             !pmb->mb.mbxStatus) {
1128
1129                 rpi = pmb->mb.un.varWords[0];
1130                 lpfc_unreg_login(phba, pmb->mb.un.varRegLogin.vpi, rpi, pmb);
1131                 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
1132                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
1133                 if (rc != MBX_NOT_FINISHED)
1134                         return;
1135         }
1136
1137         mempool_free(pmb, phba->mbox_mem_pool);
1138         return;
1139 }
1140
1141 /**
1142  * lpfc_sli_handle_mb_event: Handle mailbox completions from firmware.
1143  * @phba: Pointer to HBA context object.
1144  *
1145  * This function is called with no lock held. This function processes all
1146  * the completed mailbox commands and gives it to upper layers. The interrupt
1147  * service routine processes mailbox completion interrupt and adds completed
1148  * mailbox commands to the mboxq_cmpl queue and signals the worker thread.
1149  * Worker thread call lpfc_sli_handle_mb_event, which will return the
1150  * completed mailbox commands in mboxq_cmpl queue to the upper layers. This
1151  * function returns the mailbox commands to the upper layer by calling the
1152  * completion handler function of each mailbox.
1153  **/
1154 int
1155 lpfc_sli_handle_mb_event(struct lpfc_hba *phba)
1156 {
1157         MAILBOX_t *pmbox;
1158         LPFC_MBOXQ_t *pmb;
1159         int rc;
1160         LIST_HEAD(cmplq);
1161
1162         phba->sli.slistat.mbox_event++;
1163
1164         /* Get all completed mailboxe buffers into the cmplq */
1165         spin_lock_irq(&phba->hbalock);
1166         list_splice_init(&phba->sli.mboxq_cmpl, &cmplq);
1167         spin_unlock_irq(&phba->hbalock);
1168
1169         /* Get a Mailbox buffer to setup mailbox commands for callback */
1170         do {
1171                 list_remove_head(&cmplq, pmb, LPFC_MBOXQ_t, list);
1172                 if (pmb == NULL)
1173                         break;
1174
1175                 pmbox = &pmb->mb;
1176
1177                 if (pmbox->mbxCommand != MBX_HEARTBEAT) {
1178                         if (pmb->vport) {
1179                                 lpfc_debugfs_disc_trc(pmb->vport,
1180                                         LPFC_DISC_TRC_MBOX_VPORT,
1181                                         "MBOX cmpl vport: cmd:x%x mb:x%x x%x",
1182                                         (uint32_t)pmbox->mbxCommand,
1183                                         pmbox->un.varWords[0],
1184                                         pmbox->un.varWords[1]);
1185                         }
1186                         else {
1187                                 lpfc_debugfs_disc_trc(phba->pport,
1188                                         LPFC_DISC_TRC_MBOX,
1189                                         "MBOX cmpl:       cmd:x%x mb:x%x x%x",
1190                                         (uint32_t)pmbox->mbxCommand,
1191                                         pmbox->un.varWords[0],
1192                                         pmbox->un.varWords[1]);
1193                         }
1194                 }
1195
1196                 /*
1197                  * It is a fatal error if unknown mbox command completion.
1198                  */
1199                 if (lpfc_sli_chk_mbx_command(pmbox->mbxCommand) ==
1200                     MBX_SHUTDOWN) {
1201                         /* Unknow mailbox command compl */
1202                         lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
1203                                         "(%d):0323 Unknown Mailbox command "
1204                                         "%x Cmpl\n",
1205                                         pmb->vport ? pmb->vport->vpi : 0,
1206                                         pmbox->mbxCommand);
1207                         phba->link_state = LPFC_HBA_ERROR;
1208                         phba->work_hs = HS_FFER3;
1209                         lpfc_handle_eratt(phba);
1210                         continue;
1211                 }
1212
1213                 if (pmbox->mbxStatus) {
1214                         phba->sli.slistat.mbox_stat_err++;
1215                         if (pmbox->mbxStatus == MBXERR_NO_RESOURCES) {
1216                                 /* Mbox cmd cmpl error - RETRYing */
1217                                 lpfc_printf_log(phba, KERN_INFO,
1218                                                 LOG_MBOX | LOG_SLI,
1219                                                 "(%d):0305 Mbox cmd cmpl "
1220                                                 "error - RETRYing Data: x%x "
1221                                                 "x%x x%x x%x\n",
1222                                                 pmb->vport ? pmb->vport->vpi :0,
1223                                                 pmbox->mbxCommand,
1224                                                 pmbox->mbxStatus,
1225                                                 pmbox->un.varWords[0],
1226                                                 pmb->vport->port_state);
1227                                 pmbox->mbxStatus = 0;
1228                                 pmbox->mbxOwner = OWN_HOST;
1229                                 spin_lock_irq(&phba->hbalock);
1230                                 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
1231                                 spin_unlock_irq(&phba->hbalock);
1232                                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
1233                                 if (rc == MBX_SUCCESS)
1234                                         continue;
1235                         }
1236                 }
1237
1238                 /* Mailbox cmd <cmd> Cmpl <cmpl> */
1239                 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
1240                                 "(%d):0307 Mailbox cmd x%x Cmpl x%p "
1241                                 "Data: x%x x%x x%x x%x x%x x%x x%x x%x x%x\n",
1242                                 pmb->vport ? pmb->vport->vpi : 0,
1243                                 pmbox->mbxCommand,
1244                                 pmb->mbox_cmpl,
1245                                 *((uint32_t *) pmbox),
1246                                 pmbox->un.varWords[0],
1247                                 pmbox->un.varWords[1],
1248                                 pmbox->un.varWords[2],
1249                                 pmbox->un.varWords[3],
1250                                 pmbox->un.varWords[4],
1251                                 pmbox->un.varWords[5],
1252                                 pmbox->un.varWords[6],
1253                                 pmbox->un.varWords[7]);
1254
1255                 if (pmb->mbox_cmpl)
1256                         pmb->mbox_cmpl(phba,pmb);
1257         } while (1);
1258         return 0;
1259 }
1260
1261 /**
1262  * lpfc_sli_replace_hbqbuff: Replace the HBQ buffer with a new buffer.
1263  * @phba: Pointer to HBA context object.
1264  * @tag: Tag for the HBQ buffer.
1265  *
1266  * This function is called from unsolicited event handler code path to get the
1267  * HBQ buffer associated with an unsolicited iocb. This function is called with
1268  * no lock held. It returns the buffer associated with the given tag and posts
1269  * another buffer to the firmware. Note that the new buffer must be allocated
1270  * before taking the hbalock and that the hba lock must be held until it is
1271  * finished with the hbq entry swap.
1272  **/
1273 static struct lpfc_dmabuf *
1274 lpfc_sli_replace_hbqbuff(struct lpfc_hba *phba, uint32_t tag)
1275 {
1276         struct hbq_dmabuf *hbq_entry, *new_hbq_entry;
1277         uint32_t hbqno;
1278         void *virt;             /* virtual address ptr */
1279         dma_addr_t phys;        /* mapped address */
1280         unsigned long flags;
1281
1282         hbqno = tag >> 16;
1283         new_hbq_entry = (phba->hbqs[hbqno].hbq_alloc_buffer)(phba);
1284         /* Check whether HBQ is still in use */
1285         spin_lock_irqsave(&phba->hbalock, flags);
1286         if (!phba->hbq_in_use) {
1287                 if (new_hbq_entry)
1288                         (phba->hbqs[hbqno].hbq_free_buffer)(phba,
1289                                                             new_hbq_entry);
1290                 spin_unlock_irqrestore(&phba->hbalock, flags);
1291                 return NULL;
1292         }
1293
1294         hbq_entry = lpfc_sli_hbqbuf_find(phba, tag);
1295         if (hbq_entry == NULL) {
1296                 if (new_hbq_entry)
1297                         (phba->hbqs[hbqno].hbq_free_buffer)(phba,
1298                                                             new_hbq_entry);
1299                 spin_unlock_irqrestore(&phba->hbalock, flags);
1300                 return NULL;
1301         }
1302         list_del(&hbq_entry->dbuf.list);
1303
1304         if (new_hbq_entry == NULL) {
1305                 list_add_tail(&hbq_entry->dbuf.list, &phba->hbqbuf_in_list);
1306                 spin_unlock_irqrestore(&phba->hbalock, flags);
1307                 return &hbq_entry->dbuf;
1308         }
1309         new_hbq_entry->tag = -1;
1310         phys = new_hbq_entry->dbuf.phys;
1311         virt = new_hbq_entry->dbuf.virt;
1312         new_hbq_entry->dbuf.phys = hbq_entry->dbuf.phys;
1313         new_hbq_entry->dbuf.virt = hbq_entry->dbuf.virt;
1314         hbq_entry->dbuf.phys = phys;
1315         hbq_entry->dbuf.virt = virt;
1316         lpfc_sli_free_hbq(phba, hbq_entry);
1317         list_add_tail(&new_hbq_entry->dbuf.list, &phba->hbqbuf_in_list);
1318         spin_unlock_irqrestore(&phba->hbalock, flags);
1319
1320         return &new_hbq_entry->dbuf;
1321 }
1322
1323 /**
1324  * lpfc_sli_get_buff: Get the buffer associated with the buffer tag.
1325  * @phba: Pointer to HBA context object.
1326  * @pring: Pointer to driver SLI ring object.
1327  * @tag: buffer tag.
1328  *
1329  * This function is called with no lock held. When QUE_BUFTAG_BIT bit
1330  * is set in the tag the buffer is posted for a particular exchange,
1331  * the function will return the buffer without replacing the buffer.
1332  * If the buffer is for unsolicited ELS or CT traffic, this function
1333  * returns the buffer and also posts another buffer to the firmware.
1334  **/
1335 static struct lpfc_dmabuf *
1336 lpfc_sli_get_buff(struct lpfc_hba *phba,
1337                         struct lpfc_sli_ring *pring,
1338                         uint32_t tag)
1339 {
1340         if (tag & QUE_BUFTAG_BIT)
1341                 return lpfc_sli_ring_taggedbuf_get(phba, pring, tag);
1342         else
1343                 return lpfc_sli_replace_hbqbuff(phba, tag);
1344 }
1345
1346
1347 /**
1348  * lpfc_sli_process_unsol_iocb: Unsolicited iocb handler.
1349  * @phba: Pointer to HBA context object.
1350  * @pring: Pointer to driver SLI ring object.
1351  * @saveq: Pointer to the unsolicited iocb.
1352  *
1353  * This function is called with no lock held by the ring event handler
1354  * when there is an unsolicited iocb posted to the response ring by the
1355  * firmware. This function gets the buffer associated with the iocbs
1356  * and calls the event handler for the ring. This function handles both
1357  * qring buffers and hbq buffers.
1358  * When the function returns 1 the caller can free the iocb object otherwise
1359  * upper layer functions will free the iocb objects.
1360  **/
1361 static int
1362 lpfc_sli_process_unsol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1363                             struct lpfc_iocbq *saveq)
1364 {
1365         IOCB_t           * irsp;
1366         WORD5            * w5p;
1367         uint32_t           Rctl, Type;
1368         uint32_t           match, i;
1369         struct lpfc_iocbq *iocbq;
1370         struct lpfc_dmabuf *dmzbuf;
1371
1372         match = 0;
1373         irsp = &(saveq->iocb);
1374
1375         if (irsp->ulpStatus == IOSTAT_NEED_BUFFER)
1376                 return 1;
1377         if (irsp->ulpCommand == CMD_ASYNC_STATUS) {
1378                 if (pring->lpfc_sli_rcv_async_status)
1379                         pring->lpfc_sli_rcv_async_status(phba, pring, saveq);
1380                 else
1381                         lpfc_printf_log(phba,
1382                                         KERN_WARNING,
1383                                         LOG_SLI,
1384                                         "0316 Ring %d handler: unexpected "
1385                                         "ASYNC_STATUS iocb received evt_code "
1386                                         "0x%x\n",
1387                                         pring->ringno,
1388                                         irsp->un.asyncstat.evt_code);
1389                 return 1;
1390         }
1391
1392         if ((irsp->ulpCommand == CMD_IOCB_RET_XRI64_CX) &&
1393                 (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED)) {
1394                 if (irsp->ulpBdeCount > 0) {
1395                         dmzbuf = lpfc_sli_get_buff(phba, pring,
1396                                         irsp->un.ulpWord[3]);
1397                         lpfc_in_buf_free(phba, dmzbuf);
1398                 }
1399
1400                 if (irsp->ulpBdeCount > 1) {
1401                         dmzbuf = lpfc_sli_get_buff(phba, pring,
1402                                         irsp->unsli3.sli3Words[3]);
1403                         lpfc_in_buf_free(phba, dmzbuf);
1404                 }
1405
1406                 if (irsp->ulpBdeCount > 2) {
1407                         dmzbuf = lpfc_sli_get_buff(phba, pring,
1408                                 irsp->unsli3.sli3Words[7]);
1409                         lpfc_in_buf_free(phba, dmzbuf);
1410                 }
1411
1412                 return 1;
1413         }
1414
1415         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
1416                 if (irsp->ulpBdeCount != 0) {
1417                         saveq->context2 = lpfc_sli_get_buff(phba, pring,
1418                                                 irsp->un.ulpWord[3]);
1419                         if (!saveq->context2)
1420                                 lpfc_printf_log(phba,
1421                                         KERN_ERR,
1422                                         LOG_SLI,
1423                                         "0341 Ring %d Cannot find buffer for "
1424                                         "an unsolicited iocb. tag 0x%x\n",
1425                                         pring->ringno,
1426                                         irsp->un.ulpWord[3]);
1427                 }
1428                 if (irsp->ulpBdeCount == 2) {
1429                         saveq->context3 = lpfc_sli_get_buff(phba, pring,
1430                                                 irsp->unsli3.sli3Words[7]);
1431                         if (!saveq->context3)
1432                                 lpfc_printf_log(phba,
1433                                         KERN_ERR,
1434                                         LOG_SLI,
1435                                         "0342 Ring %d Cannot find buffer for an"
1436                                         " unsolicited iocb. tag 0x%x\n",
1437                                         pring->ringno,
1438                                         irsp->unsli3.sli3Words[7]);
1439                 }
1440                 list_for_each_entry(iocbq, &saveq->list, list) {
1441                         irsp = &(iocbq->iocb);
1442                         if (irsp->ulpBdeCount != 0) {
1443                                 iocbq->context2 = lpfc_sli_get_buff(phba, pring,
1444                                                         irsp->un.ulpWord[3]);
1445                                 if (!iocbq->context2)
1446                                         lpfc_printf_log(phba,
1447                                                 KERN_ERR,
1448                                                 LOG_SLI,
1449                                                 "0343 Ring %d Cannot find "
1450                                                 "buffer for an unsolicited iocb"
1451                                                 ". tag 0x%x\n", pring->ringno,
1452                                                 irsp->un.ulpWord[3]);
1453                         }
1454                         if (irsp->ulpBdeCount == 2) {
1455                                 iocbq->context3 = lpfc_sli_get_buff(phba, pring,
1456                                                 irsp->unsli3.sli3Words[7]);
1457                                 if (!iocbq->context3)
1458                                         lpfc_printf_log(phba,
1459                                                 KERN_ERR,
1460                                                 LOG_SLI,
1461                                                 "0344 Ring %d Cannot find "
1462                                                 "buffer for an unsolicited "
1463                                                 "iocb. tag 0x%x\n",
1464                                                 pring->ringno,
1465                                                 irsp->unsli3.sli3Words[7]);
1466                         }
1467                 }
1468         }
1469         if (irsp->ulpBdeCount != 0 &&
1470             (irsp->ulpCommand == CMD_IOCB_RCV_CONT64_CX ||
1471              irsp->ulpStatus == IOSTAT_INTERMED_RSP)) {
1472                 int found = 0;
1473
1474                 /* search continue save q for same XRI */
1475                 list_for_each_entry(iocbq, &pring->iocb_continue_saveq, clist) {
1476                         if (iocbq->iocb.ulpContext == saveq->iocb.ulpContext) {
1477                                 list_add_tail(&saveq->list, &iocbq->list);
1478                                 found = 1;
1479                                 break;
1480                         }
1481                 }
1482                 if (!found)
1483                         list_add_tail(&saveq->clist,
1484                                       &pring->iocb_continue_saveq);
1485                 if (saveq->iocb.ulpStatus != IOSTAT_INTERMED_RSP) {
1486                         list_del_init(&iocbq->clist);
1487                         saveq = iocbq;
1488                         irsp = &(saveq->iocb);
1489                 } else
1490                         return 0;
1491         }
1492         if ((irsp->ulpCommand == CMD_RCV_ELS_REQ64_CX) ||
1493             (irsp->ulpCommand == CMD_RCV_ELS_REQ_CX) ||
1494             (irsp->ulpCommand == CMD_IOCB_RCV_ELS64_CX)) {
1495                 Rctl = FC_ELS_REQ;
1496                 Type = FC_ELS_DATA;
1497         } else {
1498                 w5p = (WORD5 *)&(saveq->iocb.un.ulpWord[5]);
1499                 Rctl = w5p->hcsw.Rctl;
1500                 Type = w5p->hcsw.Type;
1501
1502                 /* Firmware Workaround */
1503                 if ((Rctl == 0) && (pring->ringno == LPFC_ELS_RING) &&
1504                         (irsp->ulpCommand == CMD_RCV_SEQUENCE64_CX ||
1505                          irsp->ulpCommand == CMD_IOCB_RCV_SEQ64_CX)) {
1506                         Rctl = FC_ELS_REQ;
1507                         Type = FC_ELS_DATA;
1508                         w5p->hcsw.Rctl = Rctl;
1509                         w5p->hcsw.Type = Type;
1510                 }
1511         }
1512
1513         /* unSolicited Responses */
1514         if (pring->prt[0].profile) {
1515                 if (pring->prt[0].lpfc_sli_rcv_unsol_event)
1516                         (pring->prt[0].lpfc_sli_rcv_unsol_event) (phba, pring,
1517                                                                         saveq);
1518                 match = 1;
1519         } else {
1520                 /* We must search, based on rctl / type
1521                    for the right routine */
1522                 for (i = 0; i < pring->num_mask; i++) {
1523                         if ((pring->prt[i].rctl == Rctl)
1524                             && (pring->prt[i].type == Type)) {
1525                                 if (pring->prt[i].lpfc_sli_rcv_unsol_event)
1526                                         (pring->prt[i].lpfc_sli_rcv_unsol_event)
1527                                                         (phba, pring, saveq);
1528                                 match = 1;
1529                                 break;
1530                         }
1531                 }
1532         }
1533         if (match == 0) {
1534                 /* Unexpected Rctl / Type received */
1535                 /* Ring <ringno> handler: unexpected
1536                    Rctl <Rctl> Type <Type> received */
1537                 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1538                                 "0313 Ring %d handler: unexpected Rctl x%x "
1539                                 "Type x%x received\n",
1540                                 pring->ringno, Rctl, Type);
1541         }
1542         return 1;
1543 }
1544
1545 /**
1546  * lpfc_sli_iocbq_lookup: Find command iocb for the given response iocb.
1547  * @phba: Pointer to HBA context object.
1548  * @pring: Pointer to driver SLI ring object.
1549  * @prspiocb: Pointer to response iocb object.
1550  *
1551  * This function looks up the iocb_lookup table to get the command iocb
1552  * corresponding to the given response iocb using the iotag of the
1553  * response iocb. This function is called with the hbalock held.
1554  * This function returns the command iocb object if it finds the command
1555  * iocb else returns NULL.
1556  **/
1557 static struct lpfc_iocbq *
1558 lpfc_sli_iocbq_lookup(struct lpfc_hba *phba,
1559                       struct lpfc_sli_ring *pring,
1560                       struct lpfc_iocbq *prspiocb)
1561 {
1562         struct lpfc_iocbq *cmd_iocb = NULL;
1563         uint16_t iotag;
1564
1565         iotag = prspiocb->iocb.ulpIoTag;
1566
1567         if (iotag != 0 && iotag <= phba->sli.last_iotag) {
1568                 cmd_iocb = phba->sli.iocbq_lookup[iotag];
1569                 list_del_init(&cmd_iocb->list);
1570                 pring->txcmplq_cnt--;
1571                 return cmd_iocb;
1572         }
1573
1574         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1575                         "0317 iotag x%x is out off "
1576                         "range: max iotag x%x wd0 x%x\n",
1577                         iotag, phba->sli.last_iotag,
1578                         *(((uint32_t *) &prspiocb->iocb) + 7));
1579         return NULL;
1580 }
1581
1582 /**
1583  * lpfc_sli_process_sol_iocb: process solicited iocb completion.
1584  * @phba: Pointer to HBA context object.
1585  * @pring: Pointer to driver SLI ring object.
1586  * @saveq: Pointer to the response iocb to be processed.
1587  *
1588  * This function is called by the ring event handler for non-fcp
1589  * rings when there is a new response iocb in the response ring.
1590  * The caller is not required to hold any locks. This function
1591  * gets the command iocb associated with the response iocb and
1592  * calls the completion handler for the command iocb. If there
1593  * is no completion handler, the function will free the resources
1594  * associated with command iocb. If the response iocb is for
1595  * an already aborted command iocb, the status of the completion
1596  * is changed to IOSTAT_LOCAL_REJECT/IOERR_SLI_ABORTED.
1597  * This function always returns 1.
1598  **/
1599 static int
1600 lpfc_sli_process_sol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1601                           struct lpfc_iocbq *saveq)
1602 {
1603         struct lpfc_iocbq *cmdiocbp;
1604         int rc = 1;
1605         unsigned long iflag;
1606
1607         /* Based on the iotag field, get the cmd IOCB from the txcmplq */
1608         spin_lock_irqsave(&phba->hbalock, iflag);
1609         cmdiocbp = lpfc_sli_iocbq_lookup(phba, pring, saveq);
1610         spin_unlock_irqrestore(&phba->hbalock, iflag);
1611
1612         if (cmdiocbp) {
1613                 if (cmdiocbp->iocb_cmpl) {
1614                         /*
1615                          * If an ELS command failed send an event to mgmt
1616                          * application.
1617                          */
1618                         if (saveq->iocb.ulpStatus &&
1619                              (pring->ringno == LPFC_ELS_RING) &&
1620                              (cmdiocbp->iocb.ulpCommand ==
1621                                 CMD_ELS_REQUEST64_CR))
1622                                 lpfc_send_els_failure_event(phba,
1623                                         cmdiocbp, saveq);
1624
1625                         /*
1626                          * Post all ELS completions to the worker thread.
1627                          * All other are passed to the completion callback.
1628                          */
1629                         if (pring->ringno == LPFC_ELS_RING) {
1630                                 if (cmdiocbp->iocb_flag & LPFC_DRIVER_ABORTED) {
1631                                         cmdiocbp->iocb_flag &=
1632                                                 ~LPFC_DRIVER_ABORTED;
1633                                         saveq->iocb.ulpStatus =
1634                                                 IOSTAT_LOCAL_REJECT;
1635                                         saveq->iocb.un.ulpWord[4] =
1636                                                 IOERR_SLI_ABORTED;
1637
1638                                         /* Firmware could still be in progress
1639                                          * of DMAing payload, so don't free data
1640                                          * buffer till after a hbeat.
1641                                          */
1642                                         saveq->iocb_flag |= LPFC_DELAY_MEM_FREE;
1643                                 }
1644                         }
1645                         (cmdiocbp->iocb_cmpl) (phba, cmdiocbp, saveq);
1646                 } else
1647                         lpfc_sli_release_iocbq(phba, cmdiocbp);
1648         } else {
1649                 /*
1650                  * Unknown initiating command based on the response iotag.
1651                  * This could be the case on the ELS ring because of
1652                  * lpfc_els_abort().
1653                  */
1654                 if (pring->ringno != LPFC_ELS_RING) {
1655                         /*
1656                          * Ring <ringno> handler: unexpected completion IoTag
1657                          * <IoTag>
1658                          */
1659                         lpfc_printf_vlog(cmdiocbp->vport, KERN_WARNING, LOG_SLI,
1660                                          "0322 Ring %d handler: "
1661                                          "unexpected completion IoTag x%x "
1662                                          "Data: x%x x%x x%x x%x\n",
1663                                          pring->ringno,
1664                                          saveq->iocb.ulpIoTag,
1665                                          saveq->iocb.ulpStatus,
1666                                          saveq->iocb.un.ulpWord[4],
1667                                          saveq->iocb.ulpCommand,
1668                                          saveq->iocb.ulpContext);
1669                 }
1670         }
1671
1672         return rc;
1673 }
1674
1675 /**
1676  * lpfc_sli_rsp_pointers_error: Response ring pointer error handler.
1677  * @phba: Pointer to HBA context object.
1678  * @pring: Pointer to driver SLI ring object.
1679  *
1680  * This function is called from the iocb ring event handlers when
1681  * put pointer is ahead of the get pointer for a ring. This function signal
1682  * an error attention condition to the worker thread and the worker
1683  * thread will transition the HBA to offline state.
1684  **/
1685 static void
1686 lpfc_sli_rsp_pointers_error(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1687 {
1688         struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
1689         /*
1690          * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
1691          * rsp ring <portRspMax>
1692          */
1693         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1694                         "0312 Ring %d handler: portRspPut %d "
1695                         "is bigger then rsp ring %d\n",
1696                         pring->ringno, le32_to_cpu(pgp->rspPutInx),
1697                         pring->numRiocb);
1698
1699         phba->link_state = LPFC_HBA_ERROR;
1700
1701         /*
1702          * All error attention handlers are posted to
1703          * worker thread
1704          */
1705         phba->work_ha |= HA_ERATT;
1706         phba->work_hs = HS_FFER3;
1707
1708         lpfc_worker_wake_up(phba);
1709
1710         return;
1711 }
1712
1713 /**
1714  * lpfc_poll_eratt: Error attention polling timer timeout handler.
1715  * @ptr: Pointer to address of HBA context object.
1716  *
1717  * This function is invoked by the Error Attention polling timer when the
1718  * timer times out. It will check the SLI Error Attention register for
1719  * possible attention events. If so, it will post an Error Attention event
1720  * and wake up worker thread to process it. Otherwise, it will set up the
1721  * Error Attention polling timer for the next poll.
1722  **/
1723 void lpfc_poll_eratt(unsigned long ptr)
1724 {
1725         struct lpfc_hba *phba;
1726         uint32_t eratt = 0;
1727
1728         phba = (struct lpfc_hba *)ptr;
1729
1730         /* Check chip HA register for error event */
1731         eratt = lpfc_sli_check_eratt(phba);
1732
1733         if (eratt)
1734                 /* Tell the worker thread there is work to do */
1735                 lpfc_worker_wake_up(phba);
1736         else
1737                 /* Restart the timer for next eratt poll */
1738                 mod_timer(&phba->eratt_poll, jiffies +
1739                                         HZ * LPFC_ERATT_POLL_INTERVAL);
1740         return;
1741 }
1742
1743 /**
1744  * lpfc_sli_poll_fcp_ring: Handle FCP ring completion in polling mode.
1745  * @phba: Pointer to HBA context object.
1746  *
1747  * This function is called from lpfc_queuecommand, lpfc_poll_timeout,
1748  * lpfc_abort_handler and lpfc_slave_configure when FCP_RING_POLLING
1749  * is enabled.
1750  *
1751  * The caller does not hold any lock.
1752  * The function processes each response iocb in the response ring until it
1753  * finds an iocb with LE bit set and chains all the iocbs upto the iocb with
1754  * LE bit set. The function will call the completion handler of the command iocb
1755  * if the response iocb indicates a completion for a command iocb or it is
1756  * an abort completion.
1757  **/
1758 void lpfc_sli_poll_fcp_ring(struct lpfc_hba *phba)
1759 {
1760         struct lpfc_sli      *psli  = &phba->sli;
1761         struct lpfc_sli_ring *pring = &psli->ring[LPFC_FCP_RING];
1762         IOCB_t *irsp = NULL;
1763         IOCB_t *entry = NULL;
1764         struct lpfc_iocbq *cmdiocbq = NULL;
1765         struct lpfc_iocbq rspiocbq;
1766         struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
1767         uint32_t status;
1768         uint32_t portRspPut, portRspMax;
1769         int type;
1770         uint32_t rsp_cmpl = 0;
1771         uint32_t ha_copy;
1772         unsigned long iflags;
1773
1774         pring->stats.iocb_event++;
1775
1776         /*
1777          * The next available response entry should never exceed the maximum
1778          * entries.  If it does, treat it as an adapter hardware error.
1779          */
1780         portRspMax = pring->numRiocb;
1781         portRspPut = le32_to_cpu(pgp->rspPutInx);
1782         if (unlikely(portRspPut >= portRspMax)) {
1783                 lpfc_sli_rsp_pointers_error(phba, pring);
1784                 return;
1785         }
1786
1787         rmb();
1788         while (pring->rspidx != portRspPut) {
1789                 entry = lpfc_resp_iocb(phba, pring);
1790                 if (++pring->rspidx >= portRspMax)
1791                         pring->rspidx = 0;
1792
1793                 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
1794                                       (uint32_t *) &rspiocbq.iocb,
1795                                       phba->iocb_rsp_size);
1796                 irsp = &rspiocbq.iocb;
1797                 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
1798                 pring->stats.iocb_rsp++;
1799                 rsp_cmpl++;
1800
1801                 if (unlikely(irsp->ulpStatus)) {
1802                         /* Rsp ring <ringno> error: IOCB */
1803                         lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1804                                         "0326 Rsp Ring %d error: IOCB Data: "
1805                                         "x%x x%x x%x x%x x%x x%x x%x x%x\n",
1806                                         pring->ringno,
1807                                         irsp->un.ulpWord[0],
1808                                         irsp->un.ulpWord[1],
1809                                         irsp->un.ulpWord[2],
1810                                         irsp->un.ulpWord[3],
1811                                         irsp->un.ulpWord[4],
1812                                         irsp->un.ulpWord[5],
1813                                         *(uint32_t *)&irsp->un1,
1814                                         *((uint32_t *)&irsp->un1 + 1));
1815                 }
1816
1817                 switch (type) {
1818                 case LPFC_ABORT_IOCB:
1819                 case LPFC_SOL_IOCB:
1820                         /*
1821                          * Idle exchange closed via ABTS from port.  No iocb
1822                          * resources need to be recovered.
1823                          */
1824                         if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
1825                                 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
1826                                                 "0314 IOCB cmd 0x%x "
1827                                                 "processed. Skipping "
1828                                                 "completion",
1829                                                 irsp->ulpCommand);
1830                                 break;
1831                         }
1832
1833                         spin_lock_irqsave(&phba->hbalock, iflags);
1834                         cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
1835                                                          &rspiocbq);
1836                         spin_unlock_irqrestore(&phba->hbalock, iflags);
1837                         if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
1838                                 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
1839                                                       &rspiocbq);
1840                         }
1841                         break;
1842                 default:
1843                         if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
1844                                 char adaptermsg[LPFC_MAX_ADPTMSG];
1845                                 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
1846                                 memcpy(&adaptermsg[0], (uint8_t *) irsp,
1847                                        MAX_MSG_DATA);
1848                                 dev_warn(&((phba->pcidev)->dev),
1849                                          "lpfc%d: %s\n",
1850                                          phba->brd_no, adaptermsg);
1851                         } else {
1852                                 /* Unknown IOCB command */
1853                                 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
1854                                                 "0321 Unknown IOCB command "
1855                                                 "Data: x%x, x%x x%x x%x x%x\n",
1856                                                 type, irsp->ulpCommand,
1857                                                 irsp->ulpStatus,
1858                                                 irsp->ulpIoTag,
1859                                                 irsp->ulpContext);
1860                         }
1861                         break;
1862                 }
1863
1864                 /*
1865                  * The response IOCB has been processed.  Update the ring
1866                  * pointer in SLIM.  If the port response put pointer has not
1867                  * been updated, sync the pgp->rspPutInx and fetch the new port
1868                  * response put pointer.
1869                  */
1870                 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
1871
1872                 if (pring->rspidx == portRspPut)
1873                         portRspPut = le32_to_cpu(pgp->rspPutInx);
1874         }
1875
1876         ha_copy = readl(phba->HAregaddr);
1877         ha_copy >>= (LPFC_FCP_RING * 4);
1878
1879         if ((rsp_cmpl > 0) && (ha_copy & HA_R0RE_REQ)) {
1880                 spin_lock_irqsave(&phba->hbalock, iflags);
1881                 pring->stats.iocb_rsp_full++;
1882                 status = ((CA_R0ATT | CA_R0RE_RSP) << (LPFC_FCP_RING * 4));
1883                 writel(status, phba->CAregaddr);
1884                 readl(phba->CAregaddr);
1885                 spin_unlock_irqrestore(&phba->hbalock, iflags);
1886         }
1887         if ((ha_copy & HA_R0CE_RSP) &&
1888             (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
1889                 spin_lock_irqsave(&phba->hbalock, iflags);
1890                 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
1891                 pring->stats.iocb_cmd_empty++;
1892
1893                 /* Force update of the local copy of cmdGetInx */
1894                 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
1895                 lpfc_sli_resume_iocb(phba, pring);
1896
1897                 if ((pring->lpfc_sli_cmd_available))
1898                         (pring->lpfc_sli_cmd_available) (phba, pring);
1899
1900                 spin_unlock_irqrestore(&phba->hbalock, iflags);
1901         }
1902
1903         return;
1904 }
1905
1906 /**
1907  * lpfc_sli_handle_fast_ring_event: Handle ring events on FCP ring.
1908  * @phba: Pointer to HBA context object.
1909  * @pring: Pointer to driver SLI ring object.
1910  * @mask: Host attention register mask for this ring.
1911  *
1912  * This function is called from the interrupt context when there is a ring
1913  * event for the fcp ring. The caller does not hold any lock.
1914  * The function processes each response iocb in the response ring until it
1915  * finds an iocb with LE bit set and chains all the iocbs upto the iocb with
1916  * LE bit set. The function will call the completion handler of the command iocb
1917  * if the response iocb indicates a completion for a command iocb or it is
1918  * an abort completion. The function will call lpfc_sli_process_unsol_iocb
1919  * function if this is an unsolicited iocb.
1920  * This routine presumes LPFC_FCP_RING handling and doesn't bother
1921  * to check it explicitly. This function always returns 1.
1922  **/
1923 static int
1924 lpfc_sli_handle_fast_ring_event(struct lpfc_hba *phba,
1925                                 struct lpfc_sli_ring *pring, uint32_t mask)
1926 {
1927         struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
1928         IOCB_t *irsp = NULL;
1929         IOCB_t *entry = NULL;
1930         struct lpfc_iocbq *cmdiocbq = NULL;
1931         struct lpfc_iocbq rspiocbq;
1932         uint32_t status;
1933         uint32_t portRspPut, portRspMax;
1934         int rc = 1;
1935         lpfc_iocb_type type;
1936         unsigned long iflag;
1937         uint32_t rsp_cmpl = 0;
1938
1939         spin_lock_irqsave(&phba->hbalock, iflag);
1940         pring->stats.iocb_event++;
1941
1942         /*
1943          * The next available response entry should never exceed the maximum
1944          * entries.  If it does, treat it as an adapter hardware error.
1945          */
1946         portRspMax = pring->numRiocb;
1947         portRspPut = le32_to_cpu(pgp->rspPutInx);
1948         if (unlikely(portRspPut >= portRspMax)) {
1949                 lpfc_sli_rsp_pointers_error(phba, pring);
1950                 spin_unlock_irqrestore(&phba->hbalock, iflag);
1951                 return 1;
1952         }
1953
1954         rmb();
1955         while (pring->rspidx != portRspPut) {
1956                 /*
1957                  * Fetch an entry off the ring and copy it into a local data
1958                  * structure.  The copy involves a byte-swap since the
1959                  * network byte order and pci byte orders are different.
1960                  */
1961                 entry = lpfc_resp_iocb(phba, pring);
1962                 phba->last_completion_time = jiffies;
1963
1964                 if (++pring->rspidx >= portRspMax)
1965                         pring->rspidx = 0;
1966
1967                 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
1968                                       (uint32_t *) &rspiocbq.iocb,
1969                                       phba->iocb_rsp_size);
1970                 INIT_LIST_HEAD(&(rspiocbq.list));
1971                 irsp = &rspiocbq.iocb;
1972
1973                 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
1974                 pring->stats.iocb_rsp++;
1975                 rsp_cmpl++;
1976
1977                 if (unlikely(irsp->ulpStatus)) {
1978                         /*
1979                          * If resource errors reported from HBA, reduce
1980                          * queuedepths of the SCSI device.
1981                          */
1982                         if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
1983                                 (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
1984                                 spin_unlock_irqrestore(&phba->hbalock, iflag);
1985                                 lpfc_adjust_queue_depth(phba);
1986                                 spin_lock_irqsave(&phba->hbalock, iflag);
1987                         }
1988
1989                         /* Rsp ring <ringno> error: IOCB */
1990                         lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
1991                                         "0336 Rsp Ring %d error: IOCB Data: "
1992                                         "x%x x%x x%x x%x x%x x%x x%x x%x\n",
1993                                         pring->ringno,
1994                                         irsp->un.ulpWord[0],
1995                                         irsp->un.ulpWord[1],
1996                                         irsp->un.ulpWord[2],
1997                                         irsp->un.ulpWord[3],
1998                                         irsp->un.ulpWord[4],
1999                                         irsp->un.ulpWord[5],
2000                                         *(uint32_t *)&irsp->un1,
2001                                         *((uint32_t *)&irsp->un1 + 1));
2002                 }
2003
2004                 switch (type) {
2005                 case LPFC_ABORT_IOCB:
2006                 case LPFC_SOL_IOCB:
2007                         /*
2008                          * Idle exchange closed via ABTS from port.  No iocb
2009                          * resources need to be recovered.
2010                          */
2011                         if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
2012                                 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2013                                                 "0333 IOCB cmd 0x%x"
2014                                                 " processed. Skipping"
2015                                                 " completion\n",
2016                                                 irsp->ulpCommand);
2017                                 break;
2018                         }
2019
2020                         cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
2021                                                          &rspiocbq);
2022                         if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
2023                                 if (phba->cfg_poll & ENABLE_FCP_RING_POLLING) {
2024                                         (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
2025                                                               &rspiocbq);
2026                                 } else {
2027                                         spin_unlock_irqrestore(&phba->hbalock,
2028                                                                iflag);
2029                                         (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
2030                                                               &rspiocbq);
2031                                         spin_lock_irqsave(&phba->hbalock,
2032                                                           iflag);
2033                                 }
2034                         }
2035                         break;
2036                 case LPFC_UNSOL_IOCB:
2037                         spin_unlock_irqrestore(&phba->hbalock, iflag);
2038                         lpfc_sli_process_unsol_iocb(phba, pring, &rspiocbq);
2039                         spin_lock_irqsave(&phba->hbalock, iflag);
2040                         break;
2041                 default:
2042                         if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
2043                                 char adaptermsg[LPFC_MAX_ADPTMSG];
2044                                 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
2045                                 memcpy(&adaptermsg[0], (uint8_t *) irsp,
2046                                        MAX_MSG_DATA);
2047                                 dev_warn(&((phba->pcidev)->dev),
2048                                          "lpfc%d: %s\n",
2049                                          phba->brd_no, adaptermsg);
2050                         } else {
2051                                 /* Unknown IOCB command */
2052                                 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2053                                                 "0334 Unknown IOCB command "
2054                                                 "Data: x%x, x%x x%x x%x x%x\n",
2055                                                 type, irsp->ulpCommand,
2056                                                 irsp->ulpStatus,
2057                                                 irsp->ulpIoTag,
2058                                                 irsp->ulpContext);
2059                         }
2060                         break;
2061                 }
2062
2063                 /*
2064                  * The response IOCB has been processed.  Update the ring
2065                  * pointer in SLIM.  If the port response put pointer has not
2066                  * been updated, sync the pgp->rspPutInx and fetch the new port
2067                  * response put pointer.
2068                  */
2069                 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
2070
2071                 if (pring->rspidx == portRspPut)
2072                         portRspPut = le32_to_cpu(pgp->rspPutInx);
2073         }
2074
2075         if ((rsp_cmpl > 0) && (mask & HA_R0RE_REQ)) {
2076                 pring->stats.iocb_rsp_full++;
2077                 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
2078                 writel(status, phba->CAregaddr);
2079                 readl(phba->CAregaddr);
2080         }
2081         if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
2082                 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
2083                 pring->stats.iocb_cmd_empty++;
2084
2085                 /* Force update of the local copy of cmdGetInx */
2086                 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
2087                 lpfc_sli_resume_iocb(phba, pring);
2088
2089                 if ((pring->lpfc_sli_cmd_available))
2090                         (pring->lpfc_sli_cmd_available) (phba, pring);
2091
2092         }
2093
2094         spin_unlock_irqrestore(&phba->hbalock, iflag);
2095         return rc;
2096 }
2097
2098 /**
2099  * lpfc_sli_handle_slow_ring_event: Handle ring events for non-FCP rings.
2100  * @phba: Pointer to HBA context object.
2101  * @pring: Pointer to driver SLI ring object.
2102  * @mask: Host attention register mask for this ring.
2103  *
2104  * This function is called from the worker thread when there is a ring
2105  * event for non-fcp rings. The caller does not hold any lock .
2106  * The function processes each response iocb in the response ring until it
2107  * finds an iocb with LE bit set and chains all the iocbs upto the iocb with
2108  * LE bit set. The function will call lpfc_sli_process_sol_iocb function if the
2109  * response iocb indicates a completion of a command iocb. The function
2110  * will call lpfc_sli_process_unsol_iocb function if this is an unsolicited
2111  * iocb. The function frees the resources or calls the completion handler if
2112  * this iocb is an abort completion. The function returns 0 when the allocated
2113  * iocbs are not freed, otherwise returns 1.
2114  **/
2115 int
2116 lpfc_sli_handle_slow_ring_event(struct lpfc_hba *phba,
2117                                 struct lpfc_sli_ring *pring, uint32_t mask)
2118 {
2119         struct lpfc_pgp *pgp;
2120         IOCB_t *entry;
2121         IOCB_t *irsp = NULL;
2122         struct lpfc_iocbq *rspiocbp = NULL;
2123         struct lpfc_iocbq *next_iocb;
2124         struct lpfc_iocbq *cmdiocbp;
2125         struct lpfc_iocbq *saveq;
2126         uint8_t iocb_cmd_type;
2127         lpfc_iocb_type type;
2128         uint32_t status, free_saveq;
2129         uint32_t portRspPut, portRspMax;
2130         int rc = 1;
2131         unsigned long iflag;
2132
2133         pgp = &phba->port_gp[pring->ringno];
2134         spin_lock_irqsave(&phba->hbalock, iflag);
2135         pring->stats.iocb_event++;
2136
2137         /*
2138          * The next available response entry should never exceed the maximum
2139          * entries.  If it does, treat it as an adapter hardware error.
2140          */
2141         portRspMax = pring->numRiocb;
2142         portRspPut = le32_to_cpu(pgp->rspPutInx);
2143         if (portRspPut >= portRspMax) {
2144                 /*
2145                  * Ring <ringno> handler: portRspPut <portRspPut> is bigger then
2146                  * rsp ring <portRspMax>
2147                  */
2148                 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2149                                 "0303 Ring %d handler: portRspPut %d "
2150                                 "is bigger then rsp ring %d\n",
2151                                 pring->ringno, portRspPut, portRspMax);
2152
2153                 phba->link_state = LPFC_HBA_ERROR;
2154                 spin_unlock_irqrestore(&phba->hbalock, iflag);
2155
2156                 phba->work_hs = HS_FFER3;
2157                 lpfc_handle_eratt(phba);
2158
2159                 return 1;
2160         }
2161
2162         rmb();
2163         while (pring->rspidx != portRspPut) {
2164                 /*
2165                  * Build a completion list and call the appropriate handler.
2166                  * The process is to get the next available response iocb, get
2167                  * a free iocb from the list, copy the response data into the
2168                  * free iocb, insert to the continuation list, and update the
2169                  * next response index to slim.  This process makes response
2170                  * iocb's in the ring available to DMA as fast as possible but
2171                  * pays a penalty for a copy operation.  Since the iocb is
2172                  * only 32 bytes, this penalty is considered small relative to
2173                  * the PCI reads for register values and a slim write.  When
2174                  * the ulpLe field is set, the entire Command has been
2175                  * received.
2176                  */
2177                 entry = lpfc_resp_iocb(phba, pring);
2178
2179                 phba->last_completion_time = jiffies;
2180                 rspiocbp = __lpfc_sli_get_iocbq(phba);
2181                 if (rspiocbp == NULL) {
2182                         printk(KERN_ERR "%s: out of buffers! Failing "
2183                                "completion.\n", __func__);
2184                         break;
2185                 }
2186
2187                 lpfc_sli_pcimem_bcopy(entry, &rspiocbp->iocb,
2188                                       phba->iocb_rsp_size);
2189                 irsp = &rspiocbp->iocb;
2190
2191                 if (++pring->rspidx >= portRspMax)
2192                         pring->rspidx = 0;
2193
2194                 if (pring->ringno == LPFC_ELS_RING) {
2195                         lpfc_debugfs_slow_ring_trc(phba,
2196                         "IOCB rsp ring:   wd4:x%08x wd6:x%08x wd7:x%08x",
2197                                 *(((uint32_t *) irsp) + 4),
2198                                 *(((uint32_t *) irsp) + 6),
2199                                 *(((uint32_t *) irsp) + 7));
2200                 }
2201
2202                 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
2203
2204                 list_add_tail(&rspiocbp->list, &(pring->iocb_continueq));
2205
2206                 pring->iocb_continueq_cnt++;
2207                 if (irsp->ulpLe) {
2208                         /*
2209                          * By default, the driver expects to free all resources
2210                          * associated with this iocb completion.
2211                          */
2212                         free_saveq = 1;
2213                         saveq = list_get_first(&pring->iocb_continueq,
2214                                                struct lpfc_iocbq, list);
2215                         irsp = &(saveq->iocb);
2216                         list_del_init(&pring->iocb_continueq);
2217                         pring->iocb_continueq_cnt = 0;
2218
2219                         pring->stats.iocb_rsp++;
2220
2221                         /*
2222                          * If resource errors reported from HBA, reduce
2223                          * queuedepths of the SCSI device.
2224                          */
2225                         if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
2226                              (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
2227                                 spin_unlock_irqrestore(&phba->hbalock, iflag);
2228                                 lpfc_adjust_queue_depth(phba);
2229                                 spin_lock_irqsave(&phba->hbalock, iflag);
2230                         }
2231
2232                         if (irsp->ulpStatus) {
2233                                 /* Rsp ring <ringno> error: IOCB */
2234                                 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2235                                                 "0328 Rsp Ring %d error: "
2236                                                 "IOCB Data: "
2237                                                 "x%x x%x x%x x%x "
2238                                                 "x%x x%x x%x x%x "
2239                                                 "x%x x%x x%x x%x "
2240                                                 "x%x x%x x%x x%x\n",
2241                                                 pring->ringno,
2242                                                 irsp->un.ulpWord[0],
2243                                                 irsp->un.ulpWord[1],
2244                                                 irsp->un.ulpWord[2],
2245                                                 irsp->un.ulpWord[3],
2246                                                 irsp->un.ulpWord[4],
2247                                                 irsp->un.ulpWord[5],
2248                                                 *(((uint32_t *) irsp) + 6),
2249                                                 *(((uint32_t *) irsp) + 7),
2250                                                 *(((uint32_t *) irsp) + 8),
2251                                                 *(((uint32_t *) irsp) + 9),
2252                                                 *(((uint32_t *) irsp) + 10),
2253                                                 *(((uint32_t *) irsp) + 11),
2254                                                 *(((uint32_t *) irsp) + 12),
2255                                                 *(((uint32_t *) irsp) + 13),
2256                                                 *(((uint32_t *) irsp) + 14),
2257                                                 *(((uint32_t *) irsp) + 15));
2258                         }
2259
2260                         /*
2261                          * Fetch the IOCB command type and call the correct
2262                          * completion routine.  Solicited and Unsolicited
2263                          * IOCBs on the ELS ring get freed back to the
2264                          * lpfc_iocb_list by the discovery kernel thread.
2265                          */
2266                         iocb_cmd_type = irsp->ulpCommand & CMD_IOCB_MASK;
2267                         type = lpfc_sli_iocb_cmd_type(iocb_cmd_type);
2268                         if (type == LPFC_SOL_IOCB) {
2269                                 spin_unlock_irqrestore(&phba->hbalock, iflag);
2270                                 rc = lpfc_sli_process_sol_iocb(phba, pring,
2271                                                                saveq);
2272                                 spin_lock_irqsave(&phba->hbalock, iflag);
2273                         } else if (type == LPFC_UNSOL_IOCB) {
2274                                 spin_unlock_irqrestore(&phba->hbalock, iflag);
2275                                 rc = lpfc_sli_process_unsol_iocb(phba, pring,
2276                                                                  saveq);
2277                                 spin_lock_irqsave(&phba->hbalock, iflag);
2278                                 if (!rc)
2279                                         free_saveq = 0;
2280                         } else if (type == LPFC_ABORT_IOCB) {
2281                                 if ((irsp->ulpCommand != CMD_XRI_ABORTED_CX) &&
2282                                     ((cmdiocbp =
2283                                       lpfc_sli_iocbq_lookup(phba, pring,
2284                                                             saveq)))) {
2285                                         /* Call the specified completion
2286                                            routine */
2287                                         if (cmdiocbp->iocb_cmpl) {
2288                                                 spin_unlock_irqrestore(
2289                                                        &phba->hbalock,
2290                                                        iflag);
2291                                                 (cmdiocbp->iocb_cmpl) (phba,
2292                                                              cmdiocbp, saveq);
2293                                                 spin_lock_irqsave(
2294                                                           &phba->hbalock,
2295                                                           iflag);
2296                                         } else
2297                                                 __lpfc_sli_release_iocbq(phba,
2298                                                                       cmdiocbp);
2299                                 }
2300                         } else if (type == LPFC_UNKNOWN_IOCB) {
2301                                 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
2302
2303                                         char adaptermsg[LPFC_MAX_ADPTMSG];
2304
2305                                         memset(adaptermsg, 0,
2306                                                LPFC_MAX_ADPTMSG);
2307                                         memcpy(&adaptermsg[0], (uint8_t *) irsp,
2308                                                MAX_MSG_DATA);
2309                                         dev_warn(&((phba->pcidev)->dev),
2310                                                  "lpfc%d: %s\n",
2311                                                  phba->brd_no, adaptermsg);
2312                                 } else {
2313                                         /* Unknown IOCB command */
2314                                         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2315                                                         "0335 Unknown IOCB "
2316                                                         "command Data: x%x "
2317                                                         "x%x x%x x%x\n",
2318                                                         irsp->ulpCommand,
2319                                                         irsp->ulpStatus,
2320                                                         irsp->ulpIoTag,
2321                                                         irsp->ulpContext);
2322                                 }
2323                         }
2324
2325                         if (free_saveq) {
2326                                 list_for_each_entry_safe(rspiocbp, next_iocb,
2327                                                          &saveq->list, list) {
2328                                         list_del(&rspiocbp->list);
2329                                         __lpfc_sli_release_iocbq(phba,
2330                                                                  rspiocbp);
2331                                 }
2332                                 __lpfc_sli_release_iocbq(phba, saveq);
2333                         }
2334                         rspiocbp = NULL;
2335                 }
2336
2337                 /*
2338                  * If the port response put pointer has not been updated, sync
2339                  * the pgp->rspPutInx in the MAILBOX_tand fetch the new port
2340                  * response put pointer.
2341                  */
2342                 if (pring->rspidx == portRspPut) {
2343                         portRspPut = le32_to_cpu(pgp->rspPutInx);
2344                 }
2345         } /* while (pring->rspidx != portRspPut) */
2346
2347         if ((rspiocbp != NULL) && (mask & HA_R0RE_REQ)) {
2348                 /* At least one response entry has been freed */
2349                 pring->stats.iocb_rsp_full++;
2350                 /* SET RxRE_RSP in Chip Att register */
2351                 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
2352                 writel(status, phba->CAregaddr);
2353                 readl(phba->CAregaddr); /* flush */
2354         }
2355         if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
2356                 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
2357                 pring->stats.iocb_cmd_empty++;
2358
2359                 /* Force update of the local copy of cmdGetInx */
2360                 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
2361                 lpfc_sli_resume_iocb(phba, pring);
2362
2363                 if ((pring->lpfc_sli_cmd_available))
2364                         (pring->lpfc_sli_cmd_available) (phba, pring);
2365
2366         }
2367
2368         spin_unlock_irqrestore(&phba->hbalock, iflag);
2369         return rc;
2370 }
2371
2372 /**
2373  * lpfc_sli_abort_iocb_ring: Abort all iocbs in the ring.
2374  * @phba: Pointer to HBA context object.
2375  * @pring: Pointer to driver SLI ring object.
2376  *
2377  * This function aborts all iocbs in the given ring and frees all the iocb
2378  * objects in txq. This function issues an abort iocb for all the iocb commands
2379  * in txcmplq. The iocbs in the txcmplq is not guaranteed to complete before
2380  * the return of this function. The caller is not required to hold any locks.
2381  **/
2382 void
2383 lpfc_sli_abort_iocb_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
2384 {
2385         LIST_HEAD(completions);
2386         struct lpfc_iocbq *iocb, *next_iocb;
2387         IOCB_t *cmd = NULL;
2388
2389         if (pring->ringno == LPFC_ELS_RING) {
2390                 lpfc_fabric_abort_hba(phba);
2391         }
2392
2393         /* Error everything on txq and txcmplq
2394          * First do the txq.
2395          */
2396         spin_lock_irq(&phba->hbalock);
2397         list_splice_init(&pring->txq, &completions);
2398         pring->txq_cnt = 0;
2399
2400         /* Next issue ABTS for everything on the txcmplq */
2401         list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list)
2402                 lpfc_sli_issue_abort_iotag(phba, pring, iocb);
2403
2404         spin_unlock_irq(&phba->hbalock);
2405
2406         while (!list_empty(&completions)) {
2407                 iocb = list_get_first(&completions, struct lpfc_iocbq, list);
2408                 cmd = &iocb->iocb;
2409                 list_del_init(&iocb->list);
2410
2411                 if (!iocb->iocb_cmpl)
2412                         lpfc_sli_release_iocbq(phba, iocb);
2413                 else {
2414                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2415                         cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
2416                         (iocb->iocb_cmpl) (phba, iocb, iocb);
2417                 }
2418         }
2419 }
2420
2421 /**
2422  * lpfc_sli_flush_fcp_rings: flush all iocbs in the fcp ring.
2423  * @phba: Pointer to HBA context object.
2424  *
2425  * This function flushes all iocbs in the fcp ring and frees all the iocb
2426  * objects in txq and txcmplq. This function will not issue abort iocbs
2427  * for all the iocb commands in txcmplq, they will just be returned with
2428  * IOERR_SLI_DOWN. This function is invoked with EEH when device's PCI
2429  * slot has been permanently disabled.
2430  **/
2431 void
2432 lpfc_sli_flush_fcp_rings(struct lpfc_hba *phba)
2433 {
2434         LIST_HEAD(txq);
2435         LIST_HEAD(txcmplq);
2436         struct lpfc_iocbq *iocb;
2437         IOCB_t *cmd = NULL;
2438         struct lpfc_sli *psli = &phba->sli;
2439         struct lpfc_sli_ring  *pring;
2440
2441         /* Currently, only one fcp ring */
2442         pring = &psli->ring[psli->fcp_ring];
2443
2444         spin_lock_irq(&phba->hbalock);
2445         /* Retrieve everything on txq */
2446         list_splice_init(&pring->txq, &txq);
2447         pring->txq_cnt = 0;
2448
2449         /* Retrieve everything on the txcmplq */
2450         list_splice_init(&pring->txcmplq, &txcmplq);
2451         pring->txcmplq_cnt = 0;
2452         spin_unlock_irq(&phba->hbalock);
2453
2454         /* Flush the txq */
2455         while (!list_empty(&txq)) {
2456                 iocb = list_get_first(&txq, struct lpfc_iocbq, list);
2457                 cmd = &iocb->iocb;
2458                 list_del_init(&iocb->list);
2459
2460                 if (!iocb->iocb_cmpl)
2461                         lpfc_sli_release_iocbq(phba, iocb);
2462                 else {
2463                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2464                         cmd->un.ulpWord[4] = IOERR_SLI_DOWN;
2465                         (iocb->iocb_cmpl) (phba, iocb, iocb);
2466                 }
2467         }
2468
2469         /* Flush the txcmpq */
2470         while (!list_empty(&txcmplq)) {
2471                 iocb = list_get_first(&txcmplq, struct lpfc_iocbq, list);
2472                 cmd = &iocb->iocb;
2473                 list_del_init(&iocb->list);
2474
2475                 if (!iocb->iocb_cmpl)
2476                         lpfc_sli_release_iocbq(phba, iocb);
2477                 else {
2478                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2479                         cmd->un.ulpWord[4] = IOERR_SLI_DOWN;
2480                         (iocb->iocb_cmpl) (phba, iocb, iocb);
2481                 }
2482         }
2483 }
2484
2485 /**
2486  * lpfc_sli_brdready: Check for host status bits.
2487  * @phba: Pointer to HBA context object.
2488  * @mask: Bit mask to be checked.
2489  *
2490  * This function reads the host status register and compares
2491  * with the provided bit mask to check if HBA completed
2492  * the restart. This function will wait in a loop for the
2493  * HBA to complete restart. If the HBA does not restart within
2494  * 15 iterations, the function will reset the HBA again. The
2495  * function returns 1 when HBA fail to restart otherwise returns
2496  * zero.
2497  **/
2498 int
2499 lpfc_sli_brdready(struct lpfc_hba *phba, uint32_t mask)
2500 {
2501         uint32_t status;
2502         int i = 0;
2503         int retval = 0;
2504
2505         /* Read the HBA Host Status Register */
2506         status = readl(phba->HSregaddr);
2507
2508         /*
2509          * Check status register every 100ms for 5 retries, then every
2510          * 500ms for 5, then every 2.5 sec for 5, then reset board and
2511          * every 2.5 sec for 4.
2512          * Break our of the loop if errors occurred during init.
2513          */
2514         while (((status & mask) != mask) &&
2515                !(status & HS_FFERM) &&
2516                i++ < 20) {
2517
2518                 if (i <= 5)
2519                         msleep(10);
2520                 else if (i <= 10)
2521                         msleep(500);
2522                 else
2523                         msleep(2500);
2524
2525                 if (i == 15) {
2526                                 /* Do post */
2527                         phba->pport->port_state = LPFC_VPORT_UNKNOWN;
2528                         lpfc_sli_brdrestart(phba);
2529                 }
2530                 /* Read the HBA Host Status Register */
2531                 status = readl(phba->HSregaddr);
2532         }
2533
2534         /* Check to see if any errors occurred during init */
2535         if ((status & HS_FFERM) || (i >= 20)) {
2536                 phba->link_state = LPFC_HBA_ERROR;
2537                 retval = 1;
2538         }
2539
2540         return retval;
2541 }
2542
2543 #define BARRIER_TEST_PATTERN (0xdeadbeef)
2544
2545 /**
2546  * lpfc_reset_barrier: Make HBA ready for HBA reset.
2547  * @phba: Pointer to HBA context object.
2548  *
2549  * This function is called before resetting an HBA. This
2550  * function requests HBA to quiesce DMAs before a reset.
2551  **/
2552 void lpfc_reset_barrier(struct lpfc_hba *phba)
2553 {
2554         uint32_t __iomem *resp_buf;
2555         uint32_t __iomem *mbox_buf;
2556         volatile uint32_t mbox;
2557         uint32_t hc_copy;
2558         int  i;
2559         uint8_t hdrtype;
2560
2561         pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
2562         if (hdrtype != 0x80 ||
2563             (FC_JEDEC_ID(phba->vpd.rev.biuRev) != HELIOS_JEDEC_ID &&
2564              FC_JEDEC_ID(phba->vpd.rev.biuRev) != THOR_JEDEC_ID))
2565                 return;
2566
2567         /*
2568          * Tell the other part of the chip to suspend temporarily all
2569          * its DMA activity.
2570          */
2571         resp_buf = phba->MBslimaddr;
2572
2573         /* Disable the error attention */
2574         hc_copy = readl(phba->HCregaddr);
2575         writel((hc_copy & ~HC_ERINT_ENA), phba->HCregaddr);
2576         readl(phba->HCregaddr); /* flush */
2577         phba->link_flag |= LS_IGNORE_ERATT;
2578
2579         if (readl(phba->HAregaddr) & HA_ERATT) {
2580                 /* Clear Chip error bit */
2581                 writel(HA_ERATT, phba->HAregaddr);
2582                 phba->pport->stopped = 1;
2583         }
2584
2585         mbox = 0;
2586         ((MAILBOX_t *)&mbox)->mbxCommand = MBX_KILL_BOARD;
2587         ((MAILBOX_t *)&mbox)->mbxOwner = OWN_CHIP;
2588
2589         writel(BARRIER_TEST_PATTERN, (resp_buf + 1));
2590         mbox_buf = phba->MBslimaddr;
2591         writel(mbox, mbox_buf);
2592
2593         for (i = 0;
2594              readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN) && i < 50; i++)
2595                 mdelay(1);
2596
2597         if (readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN)) {
2598                 if (phba->sli.sli_flag & LPFC_SLI2_ACTIVE ||
2599                     phba->pport->stopped)
2600                         goto restore_hc;
2601                 else
2602                         goto clear_errat;
2603         }
2604
2605         ((MAILBOX_t *)&mbox)->mbxOwner = OWN_HOST;
2606         for (i = 0; readl(resp_buf) != mbox &&  i < 500; i++)
2607                 mdelay(1);
2608
2609 clear_errat:
2610
2611         while (!(readl(phba->HAregaddr) & HA_ERATT) && ++i < 500)
2612                 mdelay(1);
2613
2614         if (readl(phba->HAregaddr) & HA_ERATT) {
2615                 writel(HA_ERATT, phba->HAregaddr);
2616                 phba->pport->stopped = 1;
2617         }
2618
2619 restore_hc:
2620         phba->link_flag &= ~LS_IGNORE_ERATT;
2621         writel(hc_copy, phba->HCregaddr);
2622         readl(phba->HCregaddr); /* flush */
2623 }
2624
2625 /**
2626  * lpfc_sli_brdkill: Issue a kill_board mailbox command.
2627  * @phba: Pointer to HBA context object.
2628  *
2629  * This function issues a kill_board mailbox command and waits for
2630  * the error attention interrupt. This function is called for stopping
2631  * the firmware processing. The caller is not required to hold any
2632  * locks. This function calls lpfc_hba_down_post function to free
2633  * any pending commands after the kill. The function will return 1 when it
2634  * fails to kill the board else will return 0.
2635  **/
2636 int
2637 lpfc_sli_brdkill(struct lpfc_hba *phba)
2638 {
2639         struct lpfc_sli *psli;
2640         LPFC_MBOXQ_t *pmb;
2641         uint32_t status;
2642         uint32_t ha_copy;
2643         int retval;
2644         int i = 0;
2645
2646         psli = &phba->sli;
2647
2648         /* Kill HBA */
2649         lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2650                         "0329 Kill HBA Data: x%x x%x\n",
2651                         phba->pport->port_state, psli->sli_flag);
2652
2653         pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2654         if (!pmb)
2655                 return 1;
2656
2657         /* Disable the error attention */
2658         spin_lock_irq(&phba->hbalock);
2659         status = readl(phba->HCregaddr);
2660         status &= ~HC_ERINT_ENA;
2661         writel(status, phba->HCregaddr);
2662         readl(phba->HCregaddr); /* flush */
2663         phba->link_flag |= LS_IGNORE_ERATT;
2664         spin_unlock_irq(&phba->hbalock);
2665
2666         lpfc_kill_board(phba, pmb);
2667         pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2668         retval = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
2669
2670         if (retval != MBX_SUCCESS) {
2671                 if (retval != MBX_BUSY)
2672                         mempool_free(pmb, phba->mbox_mem_pool);
2673                 spin_lock_irq(&phba->hbalock);
2674                 phba->link_flag &= ~LS_IGNORE_ERATT;
2675                 spin_unlock_irq(&phba->hbalock);
2676                 return 1;
2677         }
2678
2679         psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
2680
2681         mempool_free(pmb, phba->mbox_mem_pool);
2682
2683         /* There is no completion for a KILL_BOARD mbox cmd. Check for an error
2684          * attention every 100ms for 3 seconds. If we don't get ERATT after
2685          * 3 seconds we still set HBA_ERROR state because the status of the
2686          * board is now undefined.
2687          */
2688         ha_copy = readl(phba->HAregaddr);
2689
2690         while ((i++ < 30) && !(ha_copy & HA_ERATT)) {
2691                 mdelay(100);
2692                 ha_copy = readl(phba->HAregaddr);
2693         }
2694
2695         del_timer_sync(&psli->mbox_tmo);
2696         if (ha_copy & HA_ERATT) {
2697                 writel(HA_ERATT, phba->HAregaddr);
2698                 phba->pport->stopped = 1;
2699         }
2700         spin_lock_irq(&phba->hbalock);
2701         psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
2702         phba->link_flag &= ~LS_IGNORE_ERATT;
2703         spin_unlock_irq(&phba->hbalock);
2704
2705         psli->mbox_active = NULL;
2706         lpfc_hba_down_post(phba);
2707         phba->link_state = LPFC_HBA_ERROR;
2708
2709         return ha_copy & HA_ERATT ? 0 : 1;
2710 }
2711
2712 /**
2713  * lpfc_sli_brdreset: Reset the HBA.
2714  * @phba: Pointer to HBA context object.
2715  *
2716  * This function resets the HBA by writing HC_INITFF to the control
2717  * register. After the HBA resets, this function resets all the iocb ring
2718  * indices. This function disables PCI layer parity checking during
2719  * the reset.
2720  * This function returns 0 always.
2721  * The caller is not required to hold any locks.
2722  **/
2723 int
2724 lpfc_sli_brdreset(struct lpfc_hba *phba)
2725 {
2726         struct lpfc_sli *psli;
2727         struct lpfc_sli_ring *pring;
2728         uint16_t cfg_value;
2729         int i;
2730
2731         psli = &phba->sli;
2732
2733         /* Reset HBA */
2734         lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2735                         "0325 Reset HBA Data: x%x x%x\n",
2736                         phba->pport->port_state, psli->sli_flag);
2737
2738         /* perform board reset */
2739         phba->fc_eventTag = 0;
2740         phba->pport->fc_myDID = 0;
2741         phba->pport->fc_prevDID = 0;
2742
2743         /* Turn off parity checking and serr during the physical reset */
2744         pci_read_config_word(phba->pcidev, PCI_COMMAND, &cfg_value);
2745         pci_write_config_word(phba->pcidev, PCI_COMMAND,
2746                               (cfg_value &
2747                                ~(PCI_COMMAND_PARITY | PCI_COMMAND_SERR)));
2748
2749         psli->sli_flag &= ~(LPFC_SLI2_ACTIVE | LPFC_PROCESS_LA);
2750         /* Now toggle INITFF bit in the Host Control Register */
2751         writel(HC_INITFF, phba->HCregaddr);
2752         mdelay(1);
2753         readl(phba->HCregaddr); /* flush */
2754         writel(0, phba->HCregaddr);
2755         readl(phba->HCregaddr); /* flush */
2756
2757         /* Restore PCI cmd register */
2758         pci_write_config_word(phba->pcidev, PCI_COMMAND, cfg_value);
2759
2760         /* Initialize relevant SLI info */
2761         for (i = 0; i < psli->num_rings; i++) {
2762                 pring = &psli->ring[i];
2763                 pring->flag = 0;
2764                 pring->rspidx = 0;
2765                 pring->next_cmdidx  = 0;
2766                 pring->local_getidx = 0;
2767                 pring->cmdidx = 0;
2768                 pring->missbufcnt = 0;
2769         }
2770
2771         phba->link_state = LPFC_WARM_START;
2772         return 0;
2773 }
2774
2775 /**
2776  * lpfc_sli_brdrestart: Restart the HBA.
2777  * @phba: Pointer to HBA context object.
2778  *
2779  * This function is called in the SLI initialization code path to
2780  * restart the HBA. The caller is not required to hold any lock.
2781  * This function writes MBX_RESTART mailbox command to the SLIM and
2782  * resets the HBA. At the end of the function, it calls lpfc_hba_down_post
2783  * function to free any pending commands. The function enables
2784  * POST only during the first initialization. The function returns zero.
2785  * The function does not guarantee completion of MBX_RESTART mailbox
2786  * command before the return of this function.
2787  **/
2788 int
2789 lpfc_sli_brdrestart(struct lpfc_hba *phba)
2790 {
2791         MAILBOX_t *mb;
2792         struct lpfc_sli *psli;
2793         uint16_t skip_post;
2794         volatile uint32_t word0;
2795         void __iomem *to_slim;
2796
2797         spin_lock_irq(&phba->hbalock);
2798
2799         psli = &phba->sli;
2800
2801         /* Restart HBA */
2802         lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2803                         "0337 Restart HBA Data: x%x x%x\n",
2804                         phba->pport->port_state, psli->sli_flag);
2805
2806         word0 = 0;
2807         mb = (MAILBOX_t *) &word0;
2808         mb->mbxCommand = MBX_RESTART;
2809         mb->mbxHc = 1;
2810
2811         lpfc_reset_barrier(phba);
2812
2813         to_slim = phba->MBslimaddr;
2814         writel(*(uint32_t *) mb, to_slim);
2815         readl(to_slim); /* flush */
2816
2817         /* Only skip post after fc_ffinit is completed */
2818         if (phba->pport->port_state) {
2819                 skip_post = 1;
2820                 word0 = 1;      /* This is really setting up word1 */
2821         } else {
2822                 skip_post = 0;
2823                 word0 = 0;      /* This is really setting up word1 */
2824         }
2825         to_slim = phba->MBslimaddr + sizeof (uint32_t);
2826         writel(*(uint32_t *) mb, to_slim);
2827         readl(to_slim); /* flush */
2828
2829         lpfc_sli_brdreset(phba);
2830         phba->pport->stopped = 0;
2831         phba->link_state = LPFC_INIT_START;
2832
2833         spin_unlock_irq(&phba->hbalock);
2834
2835         memset(&psli->lnk_stat_offsets, 0, sizeof(psli->lnk_stat_offsets));
2836         psli->stats_start = get_seconds();
2837
2838         if (skip_post)
2839                 mdelay(100);
2840         else
2841                 mdelay(2000);
2842
2843         lpfc_hba_down_post(phba);
2844
2845         return 0;
2846 }
2847
2848 /**
2849  * lpfc_sli_chipset_init: Wait for the restart of the HBA after a restart.
2850  * @phba: Pointer to HBA context object.
2851  *
2852  * This function is called after a HBA restart to wait for successful
2853  * restart of the HBA. Successful restart of the HBA is indicated by
2854  * HS_FFRDY and HS_MBRDY bits. If the HBA fails to restart even after 15
2855  * iteration, the function will restart the HBA again. The function returns
2856  * zero if HBA successfully restarted else returns negative error code.
2857  **/
2858 static int
2859 lpfc_sli_chipset_init(struct lpfc_hba *phba)
2860 {
2861         uint32_t status, i = 0;
2862
2863         /* Read the HBA Host Status Register */
2864         status = readl(phba->HSregaddr);
2865
2866         /* Check status register to see what current state is */
2867         i = 0;
2868         while ((status & (HS_FFRDY | HS_MBRDY)) != (HS_FFRDY | HS_MBRDY)) {
2869
2870                 /* Check every 100ms for 5 retries, then every 500ms for 5, then
2871                  * every 2.5 sec for 5, then reset board and every 2.5 sec for
2872                  * 4.
2873                  */
2874                 if (i++ >= 20) {
2875                         /* Adapter failed to init, timeout, status reg
2876                            <status> */
2877                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2878                                         "0436 Adapter failed to init, "
2879                                         "timeout, status reg x%x, "
2880                                         "FW Data: A8 x%x AC x%x\n", status,
2881                                         readl(phba->MBslimaddr + 0xa8),
2882                                         readl(phba->MBslimaddr + 0xac));
2883                         phba->link_state = LPFC_HBA_ERROR;
2884                         return -ETIMEDOUT;
2885                 }
2886
2887                 /* Check to see if any errors occurred during init */
2888                 if (status & HS_FFERM) {
2889                         /* ERROR: During chipset initialization */
2890                         /* Adapter failed to init, chipset, status reg
2891                            <status> */
2892                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2893                                         "0437 Adapter failed to init, "
2894                                         "chipset, status reg x%x, "
2895                                         "FW Data: A8 x%x AC x%x\n", status,
2896                                         readl(phba->MBslimaddr + 0xa8),
2897                                         readl(phba->MBslimaddr + 0xac));
2898                         phba->link_state = LPFC_HBA_ERROR;
2899                         return -EIO;
2900                 }
2901
2902                 if (i <= 5) {
2903                         msleep(10);
2904                 } else if (i <= 10) {
2905                         msleep(500);
2906                 } else {
2907                         msleep(2500);
2908                 }
2909
2910                 if (i == 15) {
2911                                 /* Do post */
2912                         phba->pport->port_state = LPFC_VPORT_UNKNOWN;
2913                         lpfc_sli_brdrestart(phba);
2914                 }
2915                 /* Read the HBA Host Status Register */
2916                 status = readl(phba->HSregaddr);
2917         }
2918
2919         /* Check to see if any errors occurred during init */
2920         if (status & HS_FFERM) {
2921                 /* ERROR: During chipset initialization */
2922                 /* Adapter failed to init, chipset, status reg <status> */
2923                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
2924                                 "0438 Adapter failed to init, chipset, "
2925                                 "status reg x%x, "
2926                                 "FW Data: A8 x%x AC x%x\n", status,
2927                                 readl(phba->MBslimaddr + 0xa8),
2928                                 readl(phba->MBslimaddr + 0xac));
2929                 phba->link_state = LPFC_HBA_ERROR;
2930                 return -EIO;
2931         }
2932
2933         /* Clear all interrupt enable conditions */
2934         writel(0, phba->HCregaddr);
2935         readl(phba->HCregaddr); /* flush */
2936
2937         /* setup host attn register */
2938         writel(0xffffffff, phba->HAregaddr);
2939         readl(phba->HAregaddr); /* flush */
2940         return 0;
2941 }
2942
2943 /**
2944  * lpfc_sli_hbq_count: Get the number of HBQs to be configured.
2945  *
2946  * This function calculates and returns the number of HBQs required to be
2947  * configured.
2948  **/
2949 int
2950 lpfc_sli_hbq_count(void)
2951 {
2952         return ARRAY_SIZE(lpfc_hbq_defs);
2953 }
2954
2955 /**
2956  * lpfc_sli_hbq_entry_count: Calculate total number of hbq entries.
2957  *
2958  * This function adds the number of hbq entries in every HBQ to get
2959  * the total number of hbq entries required for the HBA and returns
2960  * the total count.
2961  **/
2962 static int
2963 lpfc_sli_hbq_entry_count(void)
2964 {
2965         int  hbq_count = lpfc_sli_hbq_count();
2966         int  count = 0;
2967         int  i;
2968
2969         for (i = 0; i < hbq_count; ++i)
2970                 count += lpfc_hbq_defs[i]->entry_count;
2971         return count;
2972 }
2973
2974 /**
2975  * lpfc_sli_hbq_size: Calculate memory required for all hbq entries.
2976  *
2977  * This function calculates amount of memory required for all hbq entries
2978  * to be configured and returns the total memory required.
2979  **/
2980 int
2981 lpfc_sli_hbq_size(void)
2982 {
2983         return lpfc_sli_hbq_entry_count() * sizeof(struct lpfc_hbq_entry);
2984 }
2985
2986 /**
2987  * lpfc_sli_hbq_setup: configure and initialize HBQs.
2988  * @phba: Pointer to HBA context object.
2989  *
2990  * This function is called during the SLI initialization to configure
2991  * all the HBQs and post buffers to the HBQ. The caller is not
2992  * required to hold any locks. This function will return zero if successful
2993  * else it will return negative error code.
2994  **/
2995 static int
2996 lpfc_sli_hbq_setup(struct lpfc_hba *phba)
2997 {
2998         int  hbq_count = lpfc_sli_hbq_count();
2999         LPFC_MBOXQ_t *pmb;
3000         MAILBOX_t *pmbox;
3001         uint32_t hbqno;
3002         uint32_t hbq_entry_index;
3003
3004                                 /* Get a Mailbox buffer to setup mailbox
3005                                  * commands for HBA initialization
3006                                  */
3007         pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3008
3009         if (!pmb)
3010                 return -ENOMEM;
3011
3012         pmbox = &pmb->mb;
3013
3014         /* Initialize the struct lpfc_sli_hbq structure for each hbq */
3015         phba->link_state = LPFC_INIT_MBX_CMDS;
3016         phba->hbq_in_use = 1;
3017
3018         hbq_entry_index = 0;
3019         for (hbqno = 0; hbqno < hbq_count; ++hbqno) {
3020                 phba->hbqs[hbqno].next_hbqPutIdx = 0;
3021                 phba->hbqs[hbqno].hbqPutIdx      = 0;
3022                 phba->hbqs[hbqno].local_hbqGetIdx   = 0;
3023                 phba->hbqs[hbqno].entry_count =
3024                         lpfc_hbq_defs[hbqno]->entry_count;
3025                 lpfc_config_hbq(phba, hbqno, lpfc_hbq_defs[hbqno],
3026                         hbq_entry_index, pmb);
3027                 hbq_entry_index += phba->hbqs[hbqno].entry_count;
3028
3029                 if (lpfc_sli_issue_mbox(phba, pmb, MBX_POLL) != MBX_SUCCESS) {
3030                         /* Adapter failed to init, mbxCmd <cmd> CFG_RING,
3031                            mbxStatus <status>, ring <num> */
3032
3033                         lpfc_printf_log(phba, KERN_ERR,
3034                                         LOG_SLI | LOG_VPORT,
3035                                         "1805 Adapter failed to init. "
3036                                         "Data: x%x x%x x%x\n",
3037                                         pmbox->mbxCommand,
3038                                         pmbox->mbxStatus, hbqno);
3039
3040                         phba->link_state = LPFC_HBA_ERROR;
3041                         mempool_free(pmb, phba->mbox_mem_pool);
3042                         return ENXIO;
3043                 }
3044         }
3045         phba->hbq_count = hbq_count;
3046
3047         mempool_free(pmb, phba->mbox_mem_pool);
3048
3049         /* Initially populate or replenish the HBQs */
3050         for (hbqno = 0; hbqno < hbq_count; ++hbqno)
3051                 lpfc_sli_hbqbuf_init_hbqs(phba, hbqno);
3052         return 0;
3053 }
3054
3055 /**
3056  * lpfc_sli_config_port: Issue config port mailbox command.
3057  * @phba: Pointer to HBA context object.
3058  * @sli_mode: sli mode - 2/3
3059  *
3060  * This function is called by the sli intialization code path
3061  * to issue config_port mailbox command. This function restarts the
3062  * HBA firmware and issues a config_port mailbox command to configure
3063  * the SLI interface in the sli mode specified by sli_mode
3064  * variable. The caller is not required to hold any locks.
3065  * The function returns 0 if successful, else returns negative error
3066  * code.
3067  **/
3068 int
3069 lpfc_sli_config_port(struct lpfc_hba *phba, int sli_mode)
3070 {
3071         LPFC_MBOXQ_t *pmb;
3072         uint32_t resetcount = 0, rc = 0, done = 0;
3073
3074         pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3075         if (!pmb) {
3076                 phba->link_state = LPFC_HBA_ERROR;
3077                 return -ENOMEM;
3078         }
3079
3080         phba->sli_rev = sli_mode;
3081         while (resetcount < 2 && !done) {
3082                 spin_lock_irq(&phba->hbalock);
3083                 phba->sli.sli_flag |= LPFC_SLI_MBOX_ACTIVE;
3084                 spin_unlock_irq(&phba->hbalock);
3085                 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
3086                 lpfc_sli_brdrestart(phba);
3087                 msleep(2500);
3088                 rc = lpfc_sli_chipset_init(phba);
3089                 if (rc)
3090                         break;
3091
3092                 spin_lock_irq(&phba->hbalock);
3093                 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3094                 spin_unlock_irq(&phba->hbalock);
3095                 resetcount++;
3096
3097                 /* Call pre CONFIG_PORT mailbox command initialization.  A
3098                  * value of 0 means the call was successful.  Any other
3099                  * nonzero value is a failure, but if ERESTART is returned,
3100                  * the driver may reset the HBA and try again.
3101                  */
3102                 rc = lpfc_config_port_prep(phba);
3103                 if (rc == -ERESTART) {
3104                         phba->link_state = LPFC_LINK_UNKNOWN;
3105                         continue;
3106                 } else if (rc)
3107                         break;
3108                 phba->link_state = LPFC_INIT_MBX_CMDS;
3109                 lpfc_config_port(phba, pmb);
3110                 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
3111                 phba->sli3_options &= ~(LPFC_SLI3_NPIV_ENABLED |
3112                                         LPFC_SLI3_HBQ_ENABLED |
3113                                         LPFC_SLI3_CRP_ENABLED |
3114                                         LPFC_SLI3_INB_ENABLED);
3115                 if (rc != MBX_SUCCESS) {
3116                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3117                                 "0442 Adapter failed to init, mbxCmd x%x "
3118                                 "CONFIG_PORT, mbxStatus x%x Data: x%x\n",
3119                                 pmb->mb.mbxCommand, pmb->mb.mbxStatus, 0);
3120                         spin_lock_irq(&phba->hbalock);
3121                         phba->sli.sli_flag &= ~LPFC_SLI2_ACTIVE;
3122                         spin_unlock_irq(&phba->hbalock);
3123                         rc = -ENXIO;
3124                 } else
3125                         done = 1;
3126         }
3127         if (!done) {
3128                 rc = -EINVAL;
3129                 goto do_prep_failed;
3130         }
3131         if (pmb->mb.un.varCfgPort.sli_mode == 3) {
3132                 if (!pmb->mb.un.varCfgPort.cMA) {
3133                         rc = -ENXIO;
3134                         goto do_prep_failed;
3135                 }
3136                 if (phba->max_vpi && pmb->mb.un.varCfgPort.gmv) {
3137                         phba->sli3_options |= LPFC_SLI3_NPIV_ENABLED;
3138                         phba->max_vpi = pmb->mb.un.varCfgPort.max_vpi;
3139                 } else
3140                         phba->max_vpi = 0;
3141                 if (pmb->mb.un.varCfgPort.gerbm)
3142                         phba->sli3_options |= LPFC_SLI3_HBQ_ENABLED;
3143                 if (pmb->mb.un.varCfgPort.gcrp)
3144                         phba->sli3_options |= LPFC_SLI3_CRP_ENABLED;
3145                 if (pmb->mb.un.varCfgPort.ginb) {
3146                         phba->sli3_options |= LPFC_SLI3_INB_ENABLED;
3147                         phba->port_gp = phba->mbox->us.s3_inb_pgp.port;
3148                         phba->inb_ha_copy = &phba->mbox->us.s3_inb_pgp.ha_copy;
3149                         phba->inb_counter = &phba->mbox->us.s3_inb_pgp.counter;
3150                         phba->inb_last_counter =
3151                                         phba->mbox->us.s3_inb_pgp.counter;
3152                 } else {
3153                         phba->port_gp = phba->mbox->us.s3_pgp.port;
3154                         phba->inb_ha_copy = NULL;
3155                         phba->inb_counter = NULL;
3156                 }
3157         } else {
3158                 phba->port_gp = phba->mbox->us.s2.port;
3159                 phba->inb_ha_copy = NULL;
3160                 phba->inb_counter = NULL;
3161                 phba->max_vpi = 0;
3162         }
3163 do_prep_failed:
3164         mempool_free(pmb, phba->mbox_mem_pool);
3165         return rc;
3166 }
3167
3168
3169 /**
3170  * lpfc_sli_hba_setup: SLI intialization function.
3171  * @phba: Pointer to HBA context object.
3172  *
3173  * This function is the main SLI intialization function. This function
3174  * is called by the HBA intialization code, HBA reset code and HBA
3175  * error attention handler code. Caller is not required to hold any
3176  * locks. This function issues config_port mailbox command to configure
3177  * the SLI, setup iocb rings and HBQ rings. In the end the function
3178  * calls the config_port_post function to issue init_link mailbox
3179  * command and to start the discovery. The function will return zero
3180  * if successful, else it will return negative error code.
3181  **/
3182 int
3183 lpfc_sli_hba_setup(struct lpfc_hba *phba)
3184 {
3185         uint32_t rc;
3186         int  mode = 3;
3187
3188         switch (lpfc_sli_mode) {
3189         case 2:
3190                 if (phba->cfg_enable_npiv) {
3191                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
3192                                 "1824 NPIV enabled: Override lpfc_sli_mode "
3193                                 "parameter (%d) to auto (0).\n",
3194                                 lpfc_sli_mode);
3195                         break;
3196                 }
3197                 mode = 2;
3198                 break;
3199         case 0:
3200         case 3:
3201                 break;
3202         default:
3203                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
3204                                 "1819 Unrecognized lpfc_sli_mode "
3205                                 "parameter: %d.\n", lpfc_sli_mode);
3206
3207                 break;
3208         }
3209
3210         rc = lpfc_sli_config_port(phba, mode);
3211
3212         if (rc && lpfc_sli_mode == 3)
3213                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
3214                                 "1820 Unable to select SLI-3.  "
3215                                 "Not supported by adapter.\n");
3216         if (rc && mode != 2)
3217                 rc = lpfc_sli_config_port(phba, 2);
3218         if (rc)
3219                 goto lpfc_sli_hba_setup_error;
3220
3221         if (phba->sli_rev == 3) {
3222                 phba->iocb_cmd_size = SLI3_IOCB_CMD_SIZE;
3223                 phba->iocb_rsp_size = SLI3_IOCB_RSP_SIZE;
3224         } else {
3225                 phba->iocb_cmd_size = SLI2_IOCB_CMD_SIZE;
3226                 phba->iocb_rsp_size = SLI2_IOCB_RSP_SIZE;
3227                 phba->sli3_options = 0;
3228         }
3229
3230         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
3231                         "0444 Firmware in SLI %x mode. Max_vpi %d\n",
3232                         phba->sli_rev, phba->max_vpi);
3233         rc = lpfc_sli_ring_map(phba);
3234
3235         if (rc)
3236                 goto lpfc_sli_hba_setup_error;
3237
3238         /* Init HBQs */
3239         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
3240                 rc = lpfc_sli_hbq_setup(phba);
3241                 if (rc)
3242                         goto lpfc_sli_hba_setup_error;
3243         }
3244
3245         phba->sli.sli_flag |= LPFC_PROCESS_LA;
3246
3247         rc = lpfc_config_port_post(phba);
3248         if (rc)
3249                 goto lpfc_sli_hba_setup_error;
3250
3251         return rc;
3252
3253 lpfc_sli_hba_setup_error:
3254         phba->link_state = LPFC_HBA_ERROR;
3255         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
3256                         "0445 Firmware initialization failed\n");
3257         return rc;
3258 }
3259
3260
3261 /**
3262  * lpfc_mbox_timeout: Timeout call back function for mbox timer.
3263  * @ptr: context object - pointer to hba structure.
3264  *
3265  * This is the callback function for mailbox timer. The mailbox
3266  * timer is armed when a new mailbox command is issued and the timer
3267  * is deleted when the mailbox complete. The function is called by
3268  * the kernel timer code when a mailbox does not complete within
3269  * expected time. This function wakes up the worker thread to
3270  * process the mailbox timeout and returns. All the processing is
3271  * done by the worker thread function lpfc_mbox_timeout_handler.
3272  **/
3273 void
3274 lpfc_mbox_timeout(unsigned long ptr)
3275 {
3276         struct lpfc_hba  *phba = (struct lpfc_hba *) ptr;
3277         unsigned long iflag;
3278         uint32_t tmo_posted;
3279
3280         spin_lock_irqsave(&phba->pport->work_port_lock, iflag);
3281         tmo_posted = phba->pport->work_port_events & WORKER_MBOX_TMO;
3282         if (!tmo_posted)
3283                 phba->pport->work_port_events |= WORKER_MBOX_TMO;
3284         spin_unlock_irqrestore(&phba->pport->work_port_lock, iflag);
3285
3286         if (!tmo_posted)
3287                 lpfc_worker_wake_up(phba);
3288         return;
3289 }
3290
3291
3292 /**
3293  * lpfc_mbox_timeout_handler: Worker thread function to handle mailbox timeout.
3294  * @phba: Pointer to HBA context object.
3295  *
3296  * This function is called from worker thread when a mailbox command times out.
3297  * The caller is not required to hold any locks. This function will reset the
3298  * HBA and recover all the pending commands.
3299  **/
3300 void
3301 lpfc_mbox_timeout_handler(struct lpfc_hba *phba)
3302 {
3303         LPFC_MBOXQ_t *pmbox = phba->sli.mbox_active;
3304         MAILBOX_t *mb = &pmbox->mb;
3305         struct lpfc_sli *psli = &phba->sli;
3306         struct lpfc_sli_ring *pring;
3307
3308         if (!(phba->pport->work_port_events & WORKER_MBOX_TMO)) {
3309                 return;
3310         }
3311
3312         /* Mbox cmd <mbxCommand> timeout */
3313         lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
3314                         "0310 Mailbox command x%x timeout Data: x%x x%x x%p\n",
3315                         mb->mbxCommand,
3316                         phba->pport->port_state,
3317                         phba->sli.sli_flag,
3318                         phba->sli.mbox_active);
3319
3320         /* Setting state unknown so lpfc_sli_abort_iocb_ring
3321          * would get IOCB_ERROR from lpfc_sli_issue_iocb, allowing
3322          * it to fail all oustanding SCSI IO.
3323          */
3324         spin_lock_irq(&phba->pport->work_port_lock);
3325         phba->pport->work_port_events &= ~WORKER_MBOX_TMO;
3326         spin_unlock_irq(&phba->pport->work_port_lock);
3327         spin_lock_irq(&phba->hbalock);
3328         phba->link_state = LPFC_LINK_UNKNOWN;
3329         psli->sli_flag &= ~LPFC_SLI2_ACTIVE;
3330         spin_unlock_irq(&phba->hbalock);
3331
3332         pring = &psli->ring[psli->fcp_ring];
3333         lpfc_sli_abort_iocb_ring(phba, pring);
3334
3335         lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
3336                         "0345 Resetting board due to mailbox timeout\n");
3337         /*
3338          * lpfc_offline calls lpfc_sli_hba_down which will clean up
3339          * on oustanding mailbox commands.
3340          */
3341         /* If resets are disabled then set error state and return. */
3342         if (!phba->cfg_enable_hba_reset) {
3343                 phba->link_state = LPFC_HBA_ERROR;
3344                 return;
3345         }
3346         lpfc_offline_prep(phba);
3347         lpfc_offline(phba);
3348         lpfc_sli_brdrestart(phba);
3349         lpfc_online(phba);
3350         lpfc_unblock_mgmt_io(phba);
3351         return;
3352 }
3353
3354 /**
3355  * lpfc_sli_issue_mbox: Issue a mailbox command to firmware.
3356  * @phba: Pointer to HBA context object.
3357  * @pmbox: Pointer to mailbox object.
3358  * @flag: Flag indicating how the mailbox need to be processed.
3359  *
3360  * This function is called by discovery code and HBA management code
3361  * to submit a mailbox command to firmware. This function gets the
3362  * hbalock to protect the data structures.
3363  * The mailbox command can be submitted in polling mode, in which case
3364  * this function will wait in a polling loop for the completion of the
3365  * mailbox.
3366  * If the mailbox is submitted in no_wait mode (not polling) the
3367  * function will submit the command and returns immediately without waiting
3368  * for the mailbox completion. The no_wait is supported only when HBA
3369  * is in SLI2/SLI3 mode - interrupts are enabled.
3370  * The SLI interface allows only one mailbox pending at a time. If the
3371  * mailbox is issued in polling mode and there is already a mailbox
3372  * pending, then the function will return an error. If the mailbox is issued
3373  * in NO_WAIT mode and there is a mailbox pending already, the function
3374  * will return MBX_BUSY after queuing the mailbox into mailbox queue.
3375  * The sli layer owns the mailbox object until the completion of mailbox
3376  * command if this function return MBX_BUSY or MBX_SUCCESS. For all other
3377  * return codes the caller owns the mailbox command after the return of
3378  * the function.
3379  **/
3380 int
3381 lpfc_sli_issue_mbox(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmbox, uint32_t flag)
3382 {
3383         MAILBOX_t *mb;
3384         struct lpfc_sli *psli = &phba->sli;
3385         uint32_t status, evtctr;
3386         uint32_t ha_copy;
3387         int i;
3388         unsigned long timeout;
3389         unsigned long drvr_flag = 0;
3390         uint32_t word0, ldata;
3391         void __iomem *to_slim;
3392         int processing_queue = 0;
3393
3394         spin_lock_irqsave(&phba->hbalock, drvr_flag);
3395         if (!pmbox) {
3396                 /* processing mbox queue from intr_handler */
3397                 processing_queue = 1;
3398                 phba->sli.sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3399                 pmbox = lpfc_mbox_get(phba);
3400                 if (!pmbox) {
3401                         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3402                         return MBX_SUCCESS;
3403                 }
3404         }
3405
3406         if (pmbox->mbox_cmpl && pmbox->mbox_cmpl != lpfc_sli_def_mbox_cmpl &&
3407                 pmbox->mbox_cmpl != lpfc_sli_wake_mbox_wait) {
3408                 if(!pmbox->vport) {
3409                         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3410                         lpfc_printf_log(phba, KERN_ERR,
3411                                         LOG_MBOX | LOG_VPORT,
3412                                         "1806 Mbox x%x failed. No vport\n",
3413                                         pmbox->mb.mbxCommand);
3414                         dump_stack();
3415                         goto out_not_finished;
3416                 }
3417         }
3418
3419         /* If the PCI channel is in offline state, do not post mbox. */
3420         if (unlikely(pci_channel_offline(phba->pcidev))) {
3421                 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3422                 goto out_not_finished;
3423         }
3424
3425         psli = &phba->sli;
3426
3427         mb = &pmbox->mb;
3428         status = MBX_SUCCESS;
3429
3430         if (phba->link_state == LPFC_HBA_ERROR) {
3431                 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3432
3433                 /* Mbox command <mbxCommand> cannot issue */
3434                 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
3435                 goto out_not_finished;
3436         }
3437
3438         if (mb->mbxCommand != MBX_KILL_BOARD && flag & MBX_NOWAIT &&
3439             !(readl(phba->HCregaddr) & HC_MBINT_ENA)) {
3440                 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3441                 LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
3442                 goto out_not_finished;
3443         }
3444
3445         if (psli->sli_flag & LPFC_SLI_MBOX_ACTIVE) {
3446                 /* Polling for a mbox command when another one is already active
3447                  * is not allowed in SLI. Also, the driver must have established
3448                  * SLI2 mode to queue and process multiple mbox commands.
3449                  */
3450
3451                 if (flag & MBX_POLL) {
3452                         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3453
3454                         /* Mbox command <mbxCommand> cannot issue */
3455                         LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
3456                         goto out_not_finished;
3457                 }
3458
3459                 if (!(psli->sli_flag & LPFC_SLI2_ACTIVE)) {
3460                         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3461                         /* Mbox command <mbxCommand> cannot issue */
3462                         LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
3463                         goto out_not_finished;
3464                 }
3465
3466                 /* Another mailbox command is still being processed, queue this
3467                  * command to be processed later.
3468                  */
3469                 lpfc_mbox_put(phba, pmbox);
3470
3471                 /* Mbox cmd issue - BUSY */
3472                 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
3473                                 "(%d):0308 Mbox cmd issue - BUSY Data: "
3474                                 "x%x x%x x%x x%x\n",
3475                                 pmbox->vport ? pmbox->vport->vpi : 0xffffff,
3476                                 mb->mbxCommand, phba->pport->port_state,
3477                                 psli->sli_flag, flag);
3478
3479                 psli->slistat.mbox_busy++;
3480                 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3481
3482                 if (pmbox->vport) {
3483                         lpfc_debugfs_disc_trc(pmbox->vport,
3484                                 LPFC_DISC_TRC_MBOX_VPORT,
3485                                 "MBOX Bsy vport:  cmd:x%x mb:x%x x%x",
3486                                 (uint32_t)mb->mbxCommand,
3487                                 mb->un.varWords[0], mb->un.varWords[1]);
3488                 }
3489                 else {
3490                         lpfc_debugfs_disc_trc(phba->pport,
3491                                 LPFC_DISC_TRC_MBOX,
3492                                 "MBOX Bsy:        cmd:x%x mb:x%x x%x",
3493                                 (uint32_t)mb->mbxCommand,
3494                                 mb->un.varWords[0], mb->un.varWords[1]);
3495                 }
3496
3497                 return MBX_BUSY;
3498         }
3499
3500         psli->sli_flag |= LPFC_SLI_MBOX_ACTIVE;
3501
3502         /* If we are not polling, we MUST be in SLI2 mode */
3503         if (flag != MBX_POLL) {
3504                 if (!(psli->sli_flag & LPFC_SLI2_ACTIVE) &&
3505                     (mb->mbxCommand != MBX_KILL_BOARD)) {
3506                         psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3507                         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3508                         /* Mbox command <mbxCommand> cannot issue */
3509                         LOG_MBOX_CANNOT_ISSUE_DATA(phba, pmbox, psli, flag);
3510                         goto out_not_finished;
3511                 }
3512                 /* timeout active mbox command */
3513                 mod_timer(&psli->mbox_tmo, (jiffies +
3514                                (HZ * lpfc_mbox_tmo_val(phba, mb->mbxCommand))));
3515         }
3516
3517         /* Mailbox cmd <cmd> issue */
3518         lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
3519                         "(%d):0309 Mailbox cmd x%x issue Data: x%x x%x "
3520                         "x%x\n",
3521                         pmbox->vport ? pmbox->vport->vpi : 0,
3522                         mb->mbxCommand, phba->pport->port_state,
3523                         psli->sli_flag, flag);
3524
3525         if (mb->mbxCommand != MBX_HEARTBEAT) {
3526                 if (pmbox->vport) {
3527                         lpfc_debugfs_disc_trc(pmbox->vport,
3528                                 LPFC_DISC_TRC_MBOX_VPORT,
3529                                 "MBOX Send vport: cmd:x%x mb:x%x x%x",
3530                                 (uint32_t)mb->mbxCommand,
3531                                 mb->un.varWords[0], mb->un.varWords[1]);
3532                 }
3533                 else {
3534                         lpfc_debugfs_disc_trc(phba->pport,
3535                                 LPFC_DISC_TRC_MBOX,
3536                                 "MBOX Send:       cmd:x%x mb:x%x x%x",
3537                                 (uint32_t)mb->mbxCommand,
3538                                 mb->un.varWords[0], mb->un.varWords[1]);
3539                 }
3540         }
3541
3542         psli->slistat.mbox_cmd++;
3543         evtctr = psli->slistat.mbox_event;
3544
3545         /* next set own bit for the adapter and copy over command word */
3546         mb->mbxOwner = OWN_CHIP;
3547
3548         if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
3549                 /* First copy command data to host SLIM area */
3550                 lpfc_sli_pcimem_bcopy(mb, phba->mbox, MAILBOX_CMD_SIZE);
3551         } else {
3552                 if (mb->mbxCommand == MBX_CONFIG_PORT) {
3553                         /* copy command data into host mbox for cmpl */
3554                         lpfc_sli_pcimem_bcopy(mb, phba->mbox, MAILBOX_CMD_SIZE);
3555                 }
3556
3557                 /* First copy mbox command data to HBA SLIM, skip past first
3558                    word */
3559                 to_slim = phba->MBslimaddr + sizeof (uint32_t);
3560                 lpfc_memcpy_to_slim(to_slim, &mb->un.varWords[0],
3561                             MAILBOX_CMD_SIZE - sizeof (uint32_t));
3562
3563                 /* Next copy over first word, with mbxOwner set */
3564                 ldata = *((uint32_t *)mb);
3565                 to_slim = phba->MBslimaddr;
3566                 writel(ldata, to_slim);
3567                 readl(to_slim); /* flush */
3568
3569                 if (mb->mbxCommand == MBX_CONFIG_PORT) {
3570                         /* switch over to host mailbox */
3571                         psli->sli_flag |= LPFC_SLI2_ACTIVE;
3572                 }
3573         }
3574
3575         wmb();
3576
3577         switch (flag) {
3578         case MBX_NOWAIT:
3579                 /* Set up reference to mailbox command */
3580                 psli->mbox_active = pmbox;
3581                 /* Interrupt board to do it */
3582                 writel(CA_MBATT, phba->CAregaddr);
3583                 readl(phba->CAregaddr); /* flush */
3584                 /* Don't wait for it to finish, just return */
3585                 break;
3586
3587         case MBX_POLL:
3588                 /* Set up null reference to mailbox command */
3589                 psli->mbox_active = NULL;
3590                 /* Interrupt board to do it */
3591                 writel(CA_MBATT, phba->CAregaddr);
3592                 readl(phba->CAregaddr); /* flush */
3593
3594                 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
3595                         /* First read mbox status word */
3596                         word0 = *((uint32_t *)phba->mbox);
3597                         word0 = le32_to_cpu(word0);
3598                 } else {
3599                         /* First read mbox status word */
3600                         word0 = readl(phba->MBslimaddr);
3601                 }
3602
3603                 /* Read the HBA Host Attention Register */
3604                 ha_copy = readl(phba->HAregaddr);
3605                 timeout = msecs_to_jiffies(lpfc_mbox_tmo_val(phba,
3606                                                              mb->mbxCommand) *
3607                                            1000) + jiffies;
3608                 i = 0;
3609                 /* Wait for command to complete */
3610                 while (((word0 & OWN_CHIP) == OWN_CHIP) ||
3611                        (!(ha_copy & HA_MBATT) &&
3612                         (phba->link_state > LPFC_WARM_START))) {
3613                         if (time_after(jiffies, timeout)) {
3614                                 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3615                                 spin_unlock_irqrestore(&phba->hbalock,
3616                                                        drvr_flag);
3617                                 goto out_not_finished;
3618                         }
3619
3620                         /* Check if we took a mbox interrupt while we were
3621                            polling */
3622                         if (((word0 & OWN_CHIP) != OWN_CHIP)
3623                             && (evtctr != psli->slistat.mbox_event))
3624                                 break;
3625
3626                         if (i++ > 10) {
3627                                 spin_unlock_irqrestore(&phba->hbalock,
3628                                                        drvr_flag);
3629                                 msleep(1);
3630                                 spin_lock_irqsave(&phba->hbalock, drvr_flag);
3631                         }
3632
3633                         if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
3634                                 /* First copy command data */
3635                                 word0 = *((uint32_t *)phba->mbox);
3636                                 word0 = le32_to_cpu(word0);
3637                                 if (mb->mbxCommand == MBX_CONFIG_PORT) {
3638                                         MAILBOX_t *slimmb;
3639                                         uint32_t slimword0;
3640                                         /* Check real SLIM for any errors */
3641                                         slimword0 = readl(phba->MBslimaddr);
3642                                         slimmb = (MAILBOX_t *) & slimword0;
3643                                         if (((slimword0 & OWN_CHIP) != OWN_CHIP)
3644                                             && slimmb->mbxStatus) {
3645                                                 psli->sli_flag &=
3646                                                     ~LPFC_SLI2_ACTIVE;
3647                                                 word0 = slimword0;
3648                                         }
3649                                 }
3650                         } else {
3651                                 /* First copy command data */
3652                                 word0 = readl(phba->MBslimaddr);
3653                         }
3654                         /* Read the HBA Host Attention Register */
3655                         ha_copy = readl(phba->HAregaddr);
3656                 }
3657
3658                 if (psli->sli_flag & LPFC_SLI2_ACTIVE) {
3659                         /* copy results back to user */
3660                         lpfc_sli_pcimem_bcopy(phba->mbox, mb, MAILBOX_CMD_SIZE);
3661                 } else {
3662                         /* First copy command data */
3663                         lpfc_memcpy_from_slim(mb, phba->MBslimaddr,
3664                                                         MAILBOX_CMD_SIZE);
3665                         if ((mb->mbxCommand == MBX_DUMP_MEMORY) &&
3666                                 pmbox->context2) {
3667                                 lpfc_memcpy_from_slim((void *)pmbox->context2,
3668                                       phba->MBslimaddr + DMP_RSP_OFFSET,
3669                                                       mb->un.varDmp.word_cnt);
3670                         }
3671                 }
3672
3673                 writel(HA_MBATT, phba->HAregaddr);
3674                 readl(phba->HAregaddr); /* flush */
3675
3676                 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3677                 status = mb->mbxStatus;
3678         }
3679
3680         spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
3681         return status;
3682
3683 out_not_finished:
3684         if (processing_queue) {
3685                 pmbox->mb.mbxStatus = MBX_NOT_FINISHED;
3686                 lpfc_mbox_cmpl_put(phba, pmbox);
3687         }
3688         return MBX_NOT_FINISHED;
3689 }
3690
3691 /**
3692  * __lpfc_sli_ringtx_put: Add an iocb to the txq.
3693  * @phba: Pointer to HBA context object.
3694  * @pring: Pointer to driver SLI ring object.
3695  * @piocb: Pointer to address of newly added command iocb.
3696  *
3697  * This function is called with hbalock held to add a command
3698  * iocb to the txq when SLI layer cannot submit the command iocb
3699  * to the ring.
3700  **/
3701 static void
3702 __lpfc_sli_ringtx_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3703                     struct lpfc_iocbq *piocb)
3704 {
3705         /* Insert the caller's iocb in the txq tail for later processing. */
3706         list_add_tail(&piocb->list, &pring->txq);
3707         pring->txq_cnt++;
3708 }
3709
3710 /**
3711  * lpfc_sli_next_iocb: Get the next iocb in the txq.
3712  * @phba: Pointer to HBA context object.
3713  * @pring: Pointer to driver SLI ring object.
3714  * @piocb: Pointer to address of newly added command iocb.
3715  *
3716  * This function is called with hbalock held before a new
3717  * iocb is submitted to the firmware. This function checks
3718  * txq to flush the iocbs in txq to Firmware before
3719  * submitting new iocbs to the Firmware.
3720  * If there are iocbs in the txq which need to be submitted
3721  * to firmware, lpfc_sli_next_iocb returns the first element
3722  * of the txq after dequeuing it from txq.
3723  * If there is no iocb in the txq then the function will return
3724  * *piocb and *piocb is set to NULL. Caller needs to check
3725  * *piocb to find if there are more commands in the txq.
3726  **/
3727 static struct lpfc_iocbq *
3728 lpfc_sli_next_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3729                    struct lpfc_iocbq **piocb)
3730 {
3731         struct lpfc_iocbq * nextiocb;
3732
3733         nextiocb = lpfc_sli_ringtx_get(phba, pring);
3734         if (!nextiocb) {
3735                 nextiocb = *piocb;
3736                 *piocb = NULL;
3737         }
3738
3739         return nextiocb;
3740 }
3741
3742 /**
3743  * __lpfc_sli_issue_iocb: Lockless version of lpfc_sli_issue_iocb.
3744  * @phba: Pointer to HBA context object.
3745  * @pring: Pointer to driver SLI ring object.
3746  * @piocb: Pointer to command iocb.
3747  * @flag: Flag indicating if this command can be put into txq.
3748  *
3749  * __lpfc_sli_issue_iocb is used by other functions in the driver
3750  * to issue an iocb command to the HBA. If the PCI slot is recovering
3751  * from error state or if HBA is resetting or if LPFC_STOP_IOCB_EVENT
3752  * flag is turned on, the function returns IOCB_ERROR.
3753  * When the link is down, this function allows only iocbs for
3754  * posting buffers.
3755  * This function finds next available slot in the command ring and
3756  * posts the command to the available slot and writes the port
3757  * attention register to request HBA start processing new iocb.
3758  * If there is no slot available in the ring and
3759  * flag & SLI_IOCB_RET_IOCB is set, the new iocb is added to the
3760  * txq, otherwise the function returns IOCB_BUSY.
3761  *
3762  * This function is called with hbalock held.
3763  * The function will return success after it successfully submit the
3764  * iocb to firmware or after adding to the txq.
3765  **/
3766 static int
3767 __lpfc_sli_issue_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3768                     struct lpfc_iocbq *piocb, uint32_t flag)
3769 {
3770         struct lpfc_iocbq *nextiocb;
3771         IOCB_t *iocb;
3772
3773         if (piocb->iocb_cmpl && (!piocb->vport) &&
3774            (piocb->iocb.ulpCommand != CMD_ABORT_XRI_CN) &&
3775            (piocb->iocb.ulpCommand != CMD_CLOSE_XRI_CN)) {
3776                 lpfc_printf_log(phba, KERN_ERR,
3777                                 LOG_SLI | LOG_VPORT,
3778                                 "1807 IOCB x%x failed. No vport\n",
3779                                 piocb->iocb.ulpCommand);
3780                 dump_stack();
3781                 return IOCB_ERROR;
3782         }
3783
3784
3785         /* If the PCI channel is in offline state, do not post iocbs. */
3786         if (unlikely(pci_channel_offline(phba->pcidev)))
3787                 return IOCB_ERROR;
3788
3789         /*
3790          * We should never get an IOCB if we are in a < LINK_DOWN state
3791          */
3792         if (unlikely(phba->link_state < LPFC_LINK_DOWN))
3793                 return IOCB_ERROR;
3794
3795         /*
3796          * Check to see if we are blocking IOCB processing because of a
3797          * outstanding event.
3798          */
3799         if (unlikely(pring->flag & LPFC_STOP_IOCB_EVENT))
3800                 goto iocb_busy;
3801
3802         if (unlikely(phba->link_state == LPFC_LINK_DOWN)) {
3803                 /*
3804                  * Only CREATE_XRI, CLOSE_XRI, and QUE_RING_BUF
3805                  * can be issued if the link is not up.
3806                  */
3807                 switch (piocb->iocb.ulpCommand) {
3808                 case CMD_GEN_REQUEST64_CR:
3809                 case CMD_GEN_REQUEST64_CX:
3810                         if (!(phba->sli.sli_flag & LPFC_MENLO_MAINT) ||
3811                                 (piocb->iocb.un.genreq64.w5.hcsw.Rctl !=
3812                                         FC_FCP_CMND) ||
3813                                 (piocb->iocb.un.genreq64.w5.hcsw.Type !=
3814                                         MENLO_TRANSPORT_TYPE))
3815
3816                                 goto iocb_busy;
3817                         break;
3818                 case CMD_QUE_RING_BUF_CN:
3819                 case CMD_QUE_RING_BUF64_CN:
3820                         /*
3821                          * For IOCBs, like QUE_RING_BUF, that have no rsp ring
3822                          * completion, iocb_cmpl MUST be 0.
3823                          */
3824                         if (piocb->iocb_cmpl)
3825                                 piocb->iocb_cmpl = NULL;
3826                         /*FALLTHROUGH*/
3827                 case CMD_CREATE_XRI_CR:
3828                 case CMD_CLOSE_XRI_CN:
3829                 case CMD_CLOSE_XRI_CX:
3830                         break;
3831                 default:
3832                         goto iocb_busy;
3833                 }
3834
3835         /*
3836          * For FCP commands, we must be in a state where we can process link
3837          * attention events.
3838          */
3839         } else if (unlikely(pring->ringno == phba->sli.fcp_ring &&
3840                             !(phba->sli.sli_flag & LPFC_PROCESS_LA))) {
3841                 goto iocb_busy;
3842         }
3843
3844         while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
3845                (nextiocb = lpfc_sli_next_iocb(phba, pring, &piocb)))
3846                 lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
3847
3848         if (iocb)
3849                 lpfc_sli_update_ring(phba, pring);
3850         else
3851                 lpfc_sli_update_full_ring(phba, pring);
3852
3853         if (!piocb)
3854                 return IOCB_SUCCESS;
3855
3856         goto out_busy;
3857
3858  iocb_busy:
3859         pring->stats.iocb_cmd_delay++;
3860
3861  out_busy:
3862
3863         if (!(flag & SLI_IOCB_RET_IOCB)) {
3864                 __lpfc_sli_ringtx_put(phba, pring, piocb);
3865                 return IOCB_SUCCESS;
3866         }
3867
3868         return IOCB_BUSY;
3869 }
3870
3871
3872 /**
3873  * lpfc_sli_issue_iocb: Wrapper function for __lpfc_sli_issue_iocb.
3874  * @phba: Pointer to HBA context object.
3875  * @pring: Pointer to driver SLI ring object.
3876  * @piocb: Pointer to command iocb.
3877  * @flag: Flag indicating if this command can be put into txq.
3878  *
3879  * lpfc_sli_issue_iocb is a wrapper around __lpfc_sli_issue_iocb
3880  * function. This function gets the hbalock and calls
3881  * __lpfc_sli_issue_iocb function and will return the error returned
3882  * by __lpfc_sli_issue_iocb function. This wrapper is used by
3883  * functions which do not hold hbalock.
3884  **/
3885 int
3886 lpfc_sli_issue_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
3887                     struct lpfc_iocbq *piocb, uint32_t flag)
3888 {
3889         unsigned long iflags;
3890         int rc;
3891
3892         spin_lock_irqsave(&phba->hbalock, iflags);
3893         rc = __lpfc_sli_issue_iocb(phba, pring, piocb, flag);
3894         spin_unlock_irqrestore(&phba->hbalock, iflags);
3895
3896         return rc;
3897 }
3898
3899 /**
3900  * lpfc_extra_ring_setup: Extra ring setup function.
3901  * @phba: Pointer to HBA context object.
3902  *
3903  * This function is called while driver attaches with the
3904  * HBA to setup the extra ring. The extra ring is used
3905  * only when driver needs to support target mode functionality
3906  * or IP over FC functionalities.
3907  *
3908  * This function is called with no lock held.
3909  **/
3910 static int
3911 lpfc_extra_ring_setup( struct lpfc_hba *phba)
3912 {
3913         struct lpfc_sli *psli;
3914         struct lpfc_sli_ring *pring;
3915
3916         psli = &phba->sli;
3917
3918         /* Adjust cmd/rsp ring iocb entries more evenly */
3919
3920         /* Take some away from the FCP ring */
3921         pring = &psli->ring[psli->fcp_ring];
3922         pring->numCiocb -= SLI2_IOCB_CMD_R1XTRA_ENTRIES;
3923         pring->numRiocb -= SLI2_IOCB_RSP_R1XTRA_ENTRIES;
3924         pring->numCiocb -= SLI2_IOCB_CMD_R3XTRA_ENTRIES;
3925         pring->numRiocb -= SLI2_IOCB_RSP_R3XTRA_ENTRIES;
3926
3927         /* and give them to the extra ring */
3928         pring = &psli->ring[psli->extra_ring];
3929
3930         pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
3931         pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
3932         pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
3933         pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
3934
3935         /* Setup default profile for this ring */
3936         pring->iotag_max = 4096;
3937         pring->num_mask = 1;
3938         pring->prt[0].profile = 0;      /* Mask 0 */
3939         pring->prt[0].rctl = phba->cfg_multi_ring_rctl;
3940         pring->prt[0].type = phba->cfg_multi_ring_type;
3941         pring->prt[0].lpfc_sli_rcv_unsol_event = NULL;
3942         return 0;
3943 }
3944
3945 /**
3946  * lpfc_sli_async_event_handler: ASYNC iocb handler function.
3947  * @phba: Pointer to HBA context object.
3948  * @pring: Pointer to driver SLI ring object.
3949  * @iocbq: Pointer to iocb object.
3950  *
3951  * This function is called by the slow ring event handler
3952  * function when there is an ASYNC event iocb in the ring.
3953  * This function is called with no lock held.
3954  * Currently this function handles only temperature related
3955  * ASYNC events. The function decodes the temperature sensor
3956  * event message and posts events for the management applications.
3957  **/
3958 static void
3959 lpfc_sli_async_event_handler(struct lpfc_hba * phba,
3960         struct lpfc_sli_ring * pring, struct lpfc_iocbq * iocbq)
3961 {
3962         IOCB_t *icmd;
3963         uint16_t evt_code;
3964         uint16_t temp;
3965         struct temp_event temp_event_data;
3966         struct Scsi_Host *shost;
3967
3968         icmd = &iocbq->iocb;
3969         evt_code = icmd->un.asyncstat.evt_code;
3970         temp = icmd->ulpContext;
3971
3972         if ((evt_code != ASYNC_TEMP_WARN) &&
3973                 (evt_code != ASYNC_TEMP_SAFE)) {
3974                 lpfc_printf_log(phba,
3975                         KERN_ERR,
3976                         LOG_SLI,
3977                         "0346 Ring %d handler: unexpected ASYNC_STATUS"
3978                         " evt_code 0x%x\n",
3979                         pring->ringno,
3980                         icmd->un.asyncstat.evt_code);
3981                 return;
3982         }
3983         temp_event_data.data = (uint32_t)temp;
3984         temp_event_data.event_type = FC_REG_TEMPERATURE_EVENT;
3985         if (evt_code == ASYNC_TEMP_WARN) {
3986                 temp_event_data.event_code = LPFC_THRESHOLD_TEMP;
3987                 lpfc_printf_log(phba,
3988                                 KERN_ERR,
3989                                 LOG_TEMP,
3990                                 "0347 Adapter is very hot, please take "
3991                                 "corrective action. temperature : %d Celsius\n",
3992                                 temp);
3993         }
3994         if (evt_code == ASYNC_TEMP_SAFE) {
3995                 temp_event_data.event_code = LPFC_NORMAL_TEMP;
3996                 lpfc_printf_log(phba,
3997                                 KERN_ERR,
3998                                 LOG_TEMP,
3999                                 "0340 Adapter temperature is OK now. "
4000                                 "temperature : %d Celsius\n",
4001                                 temp);
4002         }
4003
4004         /* Send temperature change event to applications */
4005         shost = lpfc_shost_from_vport(phba->pport);
4006         fc_host_post_vendor_event(shost, fc_get_event_number(),
4007                 sizeof(temp_event_data), (char *) &temp_event_data,
4008                 SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
4009
4010 }
4011
4012
4013 /**
4014  * lpfc_sli_setup: SLI ring setup function.
4015  * @phba: Pointer to HBA context object.
4016  *
4017  * lpfc_sli_setup sets up rings of the SLI interface with
4018  * number of iocbs per ring and iotags. This function is
4019  * called while driver attach to the HBA and before the
4020  * interrupts are enabled. So there is no need for locking.
4021  *
4022  * This function always returns 0.
4023  **/
4024 int
4025 lpfc_sli_setup(struct lpfc_hba *phba)
4026 {
4027         int i, totiocbsize = 0;
4028         struct lpfc_sli *psli = &phba->sli;
4029         struct lpfc_sli_ring *pring;
4030
4031         psli->num_rings = MAX_CONFIGURED_RINGS;
4032         psli->sli_flag = 0;
4033         psli->fcp_ring = LPFC_FCP_RING;
4034         psli->next_ring = LPFC_FCP_NEXT_RING;
4035         psli->extra_ring = LPFC_EXTRA_RING;
4036
4037         psli->iocbq_lookup = NULL;
4038         psli->iocbq_lookup_len = 0;
4039         psli->last_iotag = 0;
4040
4041         for (i = 0; i < psli->num_rings; i++) {
4042                 pring = &psli->ring[i];
4043                 switch (i) {
4044                 case LPFC_FCP_RING:     /* ring 0 - FCP */
4045                         /* numCiocb and numRiocb are used in config_port */
4046                         pring->numCiocb = SLI2_IOCB_CMD_R0_ENTRIES;
4047                         pring->numRiocb = SLI2_IOCB_RSP_R0_ENTRIES;
4048                         pring->numCiocb += SLI2_IOCB_CMD_R1XTRA_ENTRIES;
4049                         pring->numRiocb += SLI2_IOCB_RSP_R1XTRA_ENTRIES;
4050                         pring->numCiocb += SLI2_IOCB_CMD_R3XTRA_ENTRIES;
4051                         pring->numRiocb += SLI2_IOCB_RSP_R3XTRA_ENTRIES;
4052                         pring->sizeCiocb = (phba->sli_rev == 3) ?
4053                                                         SLI3_IOCB_CMD_SIZE :
4054                                                         SLI2_IOCB_CMD_SIZE;
4055                         pring->sizeRiocb = (phba->sli_rev == 3) ?
4056                                                         SLI3_IOCB_RSP_SIZE :
4057                                                         SLI2_IOCB_RSP_SIZE;
4058                         pring->iotag_ctr = 0;
4059                         pring->iotag_max =
4060                             (phba->cfg_hba_queue_depth * 2);
4061                         pring->fast_iotag = pring->iotag_max;
4062                         pring->num_mask = 0;
4063                         break;
4064                 case LPFC_EXTRA_RING:   /* ring 1 - EXTRA */
4065                         /* numCiocb and numRiocb are used in config_port */
4066                         pring->numCiocb = SLI2_IOCB_CMD_R1_ENTRIES;
4067                         pring->numRiocb = SLI2_IOCB_RSP_R1_ENTRIES;
4068                         pring->sizeCiocb = (phba->sli_rev == 3) ?
4069                                                         SLI3_IOCB_CMD_SIZE :
4070                                                         SLI2_IOCB_CMD_SIZE;
4071                         pring->sizeRiocb = (phba->sli_rev == 3) ?
4072                                                         SLI3_IOCB_RSP_SIZE :
4073                                                         SLI2_IOCB_RSP_SIZE;
4074                         pring->iotag_max = phba->cfg_hba_queue_depth;
4075                         pring->num_mask = 0;
4076                         break;
4077                 case LPFC_ELS_RING:     /* ring 2 - ELS / CT */
4078                         /* numCiocb and numRiocb are used in config_port */
4079                         pring->numCiocb = SLI2_IOCB_CMD_R2_ENTRIES;
4080                         pring->numRiocb = SLI2_IOCB_RSP_R2_ENTRIES;
4081                         pring->sizeCiocb = (phba->sli_rev == 3) ?
4082                                                         SLI3_IOCB_CMD_SIZE :
4083                                                         SLI2_IOCB_CMD_SIZE;
4084                         pring->sizeRiocb = (phba->sli_rev == 3) ?
4085                                                         SLI3_IOCB_RSP_SIZE :
4086                                                         SLI2_IOCB_RSP_SIZE;
4087                         pring->fast_iotag = 0;
4088                         pring->iotag_ctr = 0;
4089                         pring->iotag_max = 4096;
4090                         pring->lpfc_sli_rcv_async_status =
4091                                 lpfc_sli_async_event_handler;
4092                         pring->num_mask = 4;
4093                         pring->prt[0].profile = 0;      /* Mask 0 */
4094                         pring->prt[0].rctl = FC_ELS_REQ;
4095                         pring->prt[0].type = FC_ELS_DATA;
4096                         pring->prt[0].lpfc_sli_rcv_unsol_event =
4097                             lpfc_els_unsol_event;
4098                         pring->prt[1].profile = 0;      /* Mask 1 */
4099                         pring->prt[1].rctl = FC_ELS_RSP;
4100                         pring->prt[1].type = FC_ELS_DATA;
4101                         pring->prt[1].lpfc_sli_rcv_unsol_event =
4102                             lpfc_els_unsol_event;
4103                         pring->prt[2].profile = 0;      /* Mask 2 */
4104                         /* NameServer Inquiry */
4105                         pring->prt[2].rctl = FC_UNSOL_CTL;
4106                         /* NameServer */
4107                         pring->prt[2].type = FC_COMMON_TRANSPORT_ULP;
4108                         pring->prt[2].lpfc_sli_rcv_unsol_event =
4109                             lpfc_ct_unsol_event;
4110                         pring->prt[3].profile = 0;      /* Mask 3 */
4111                         /* NameServer response */
4112                         pring->prt[3].rctl = FC_SOL_CTL;
4113                         /* NameServer */
4114                         pring->prt[3].type = FC_COMMON_TRANSPORT_ULP;
4115                         pring->prt[3].lpfc_sli_rcv_unsol_event =
4116                             lpfc_ct_unsol_event;
4117                         break;
4118                 }
4119                 totiocbsize += (pring->numCiocb * pring->sizeCiocb) +
4120                                 (pring->numRiocb * pring->sizeRiocb);
4121         }
4122         if (totiocbsize > MAX_SLIM_IOCB_SIZE) {
4123                 /* Too many cmd / rsp ring entries in SLI2 SLIM */
4124                 printk(KERN_ERR "%d:0462 Too many cmd / rsp ring entries in "
4125                        "SLI2 SLIM Data: x%x x%lx\n",
4126                        phba->brd_no, totiocbsize,
4127                        (unsigned long) MAX_SLIM_IOCB_SIZE);
4128         }
4129         if (phba->cfg_multi_ring_support == 2)
4130                 lpfc_extra_ring_setup(phba);
4131
4132         return 0;
4133 }
4134
4135 /**
4136  * lpfc_sli_queue_setup: Queue initialization function.
4137  * @phba: Pointer to HBA context object.
4138  *
4139  * lpfc_sli_queue_setup sets up mailbox queues and iocb queues for each
4140  * ring. This function also initializes ring indices of each ring.
4141  * This function is called during the initialization of the SLI
4142  * interface of an HBA.
4143  * This function is called with no lock held and always returns
4144  * 1.
4145  **/
4146 int
4147 lpfc_sli_queue_setup(struct lpfc_hba *phba)
4148 {
4149         struct lpfc_sli *psli;
4150         struct lpfc_sli_ring *pring;
4151         int i;
4152
4153         psli = &phba->sli;
4154         spin_lock_irq(&phba->hbalock);
4155         INIT_LIST_HEAD(&psli->mboxq);
4156         INIT_LIST_HEAD(&psli->mboxq_cmpl);
4157         /* Initialize list headers for txq and txcmplq as double linked lists */
4158         for (i = 0; i < psli->num_rings; i++) {
4159                 pring = &psli->ring[i];
4160                 pring->ringno = i;
4161                 pring->next_cmdidx  = 0;
4162                 pring->local_getidx = 0;
4163                 pring->cmdidx = 0;
4164                 INIT_LIST_HEAD(&pring->txq);
4165                 INIT_LIST_HEAD(&pring->txcmplq);
4166                 INIT_LIST_HEAD(&pring->iocb_continueq);
4167                 INIT_LIST_HEAD(&pring->iocb_continue_saveq);
4168                 INIT_LIST_HEAD(&pring->postbufq);
4169         }
4170         spin_unlock_irq(&phba->hbalock);
4171         return 1;
4172 }
4173
4174 /**
4175  * lpfc_sli_host_down: Vport cleanup function.
4176  * @vport: Pointer to virtual port object.
4177  *
4178  * lpfc_sli_host_down is called to clean up the resources
4179  * associated with a vport before destroying virtual
4180  * port data structures.
4181  * This function does following operations:
4182  * - Free discovery resources associated with this virtual
4183  *   port.
4184  * - Free iocbs associated with this virtual port in
4185  *   the txq.
4186  * - Send abort for all iocb commands associated with this
4187  *   vport in txcmplq.
4188  *
4189  * This function is called with no lock held and always returns 1.
4190  **/
4191 int
4192 lpfc_sli_host_down(struct lpfc_vport *vport)
4193 {
4194         LIST_HEAD(completions);
4195         struct lpfc_hba *phba = vport->phba;
4196         struct lpfc_sli *psli = &phba->sli;
4197         struct lpfc_sli_ring *pring;
4198         struct lpfc_iocbq *iocb, *next_iocb;
4199         int i;
4200         unsigned long flags = 0;
4201         uint16_t prev_pring_flag;
4202
4203         lpfc_cleanup_discovery_resources(vport);
4204
4205         spin_lock_irqsave(&phba->hbalock, flags);
4206         for (i = 0; i < psli->num_rings; i++) {
4207                 pring = &psli->ring[i];
4208                 prev_pring_flag = pring->flag;
4209                 /* Only slow rings */
4210                 if (pring->ringno == LPFC_ELS_RING) {
4211                         pring->flag |= LPFC_DEFERRED_RING_EVENT;
4212                         /* Set the lpfc data pending flag */
4213                         set_bit(LPFC_DATA_READY, &phba->data_flags);
4214                 }
4215                 /*
4216                  * Error everything on the txq since these iocbs have not been
4217                  * given to the FW yet.
4218                  */
4219                 list_for_each_entry_safe(iocb, next_iocb, &pring->txq, list) {
4220                         if (iocb->vport != vport)
4221                                 continue;
4222                         list_move_tail(&iocb->list, &completions);
4223                         pring->txq_cnt--;
4224                 }
4225
4226                 /* Next issue ABTS for everything on the txcmplq */
4227                 list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq,
4228                                                                         list) {
4229                         if (iocb->vport != vport)
4230                                 continue;
4231                         lpfc_sli_issue_abort_iotag(phba, pring, iocb);
4232                 }
4233
4234                 pring->flag = prev_pring_flag;
4235         }
4236
4237         spin_unlock_irqrestore(&phba->hbalock, flags);
4238
4239         while (!list_empty(&completions)) {
4240                 list_remove_head(&completions, iocb, struct lpfc_iocbq, list);
4241
4242                 if (!iocb->iocb_cmpl)
4243                         lpfc_sli_release_iocbq(phba, iocb);
4244                 else {
4245                         iocb->iocb.ulpStatus = IOSTAT_LOCAL_REJECT;
4246                         iocb->iocb.un.ulpWord[4] = IOERR_SLI_DOWN;
4247                         (iocb->iocb_cmpl) (phba, iocb, iocb);
4248                 }
4249         }
4250         return 1;
4251 }
4252
4253 /**
4254  * lpfc_sli_hba_down: Resource cleanup function for the HBA.
4255  * @phba: Pointer to HBA context object.
4256  *
4257  * This function cleans up all iocb, buffers, mailbox commands
4258  * while shutting down the HBA. This function is called with no
4259  * lock held and always returns 1.
4260  * This function does the following to cleanup driver resources:
4261  * - Free discovery resources for each virtual port
4262  * - Cleanup any pending fabric iocbs
4263  * - Iterate through the iocb txq and free each entry
4264  *   in the list.
4265  * - Free up any buffer posted to the HBA
4266  * - Free mailbox commands in the mailbox queue.
4267  **/
4268 int
4269 lpfc_sli_hba_down(struct lpfc_hba *phba)
4270 {
4271         LIST_HEAD(completions);
4272         struct lpfc_sli *psli = &phba->sli;
4273         struct lpfc_sli_ring *pring;
4274         struct lpfc_dmabuf *buf_ptr;
4275         LPFC_MBOXQ_t *pmb;
4276         struct lpfc_iocbq *iocb;
4277         IOCB_t *cmd = NULL;
4278         int i;
4279         unsigned long flags = 0;
4280
4281         lpfc_hba_down_prep(phba);
4282
4283         lpfc_fabric_abort_hba(phba);
4284
4285         spin_lock_irqsave(&phba->hbalock, flags);
4286         for (i = 0; i < psli->num_rings; i++) {
4287                 pring = &psli->ring[i];
4288                 /* Only slow rings */
4289                 if (pring->ringno == LPFC_ELS_RING) {
4290                         pring->flag |= LPFC_DEFERRED_RING_EVENT;
4291                         /* Set the lpfc data pending flag */
4292                         set_bit(LPFC_DATA_READY, &phba->data_flags);
4293                 }
4294
4295                 /*
4296                  * Error everything on the txq since these iocbs have not been
4297                  * given to the FW yet.
4298                  */
4299                 list_splice_init(&pring->txq, &completions);
4300                 pring->txq_cnt = 0;
4301
4302         }
4303         spin_unlock_irqrestore(&phba->hbalock, flags);
4304
4305         while (!list_empty(&completions)) {
4306                 list_remove_head(&completions, iocb, struct lpfc_iocbq, list);
4307                 cmd = &iocb->iocb;
4308
4309                 if (!iocb->iocb_cmpl)
4310                         lpfc_sli_release_iocbq(phba, iocb);
4311                 else {
4312                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
4313                         cmd->un.ulpWord[4] = IOERR_SLI_DOWN;
4314                         (iocb->iocb_cmpl) (phba, iocb, iocb);
4315                 }
4316         }
4317
4318         spin_lock_irqsave(&phba->hbalock, flags);
4319         list_splice_init(&phba->elsbuf, &completions);
4320         phba->elsbuf_cnt = 0;
4321         phba->elsbuf_prev_cnt = 0;
4322         spin_unlock_irqrestore(&phba->hbalock, flags);
4323
4324         while (!list_empty(&completions)) {
4325                 list_remove_head(&completions, buf_ptr,
4326                         struct lpfc_dmabuf, list);
4327                 lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
4328                 kfree(buf_ptr);
4329         }
4330
4331         /* Return any active mbox cmds */
4332         del_timer_sync(&psli->mbox_tmo);
4333         spin_lock_irqsave(&phba->hbalock, flags);
4334
4335         spin_lock(&phba->pport->work_port_lock);
4336         phba->pport->work_port_events &= ~WORKER_MBOX_TMO;
4337         spin_unlock(&phba->pport->work_port_lock);
4338
4339         /* Return any pending or completed mbox cmds */
4340         list_splice_init(&phba->sli.mboxq, &completions);
4341         if (psli->mbox_active) {
4342                 list_add_tail(&psli->mbox_active->list, &completions);
4343                 psli->mbox_active = NULL;
4344                 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
4345         }
4346         list_splice_init(&phba->sli.mboxq_cmpl, &completions);
4347         spin_unlock_irqrestore(&phba->hbalock, flags);
4348
4349         while (!list_empty(&completions)) {
4350                 list_remove_head(&completions, pmb, LPFC_MBOXQ_t, list);
4351                 pmb->mb.mbxStatus = MBX_NOT_FINISHED;
4352                 if (pmb->mbox_cmpl)
4353                         pmb->mbox_cmpl(phba,pmb);
4354         }
4355         return 1;
4356 }
4357
4358 /**
4359  * lpfc_sli_pcimem_bcopy: SLI memory copy function.
4360  * @srcp: Source memory pointer.
4361  * @destp: Destination memory pointer.
4362  * @cnt: Number of words required to be copied.
4363  *
4364  * This function is used for copying data between driver memory
4365  * and the SLI memory. This function also changes the endianness
4366  * of each word if native endianness is different from SLI
4367  * endianness. This function can be called with or without
4368  * lock.
4369  **/
4370 void
4371 lpfc_sli_pcimem_bcopy(void *srcp, void *destp, uint32_t cnt)
4372 {
4373         uint32_t *src = srcp;
4374         uint32_t *dest = destp;
4375         uint32_t ldata;
4376         int i;
4377
4378         for (i = 0; i < (int)cnt; i += sizeof (uint32_t)) {
4379                 ldata = *src;
4380                 ldata = le32_to_cpu(ldata);
4381                 *dest = ldata;
4382                 src++;
4383                 dest++;
4384         }
4385 }
4386
4387
4388 /**
4389  * lpfc_sli_ringpostbuf_put: Function to add a buffer to postbufq.
4390  * @phba: Pointer to HBA context object.
4391  * @pring: Pointer to driver SLI ring object.
4392  * @mp: Pointer to driver buffer object.
4393  *
4394  * This function is called with no lock held.
4395  * It always return zero after adding the buffer to the postbufq
4396  * buffer list.
4397  **/
4398 int
4399 lpfc_sli_ringpostbuf_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
4400                          struct lpfc_dmabuf *mp)
4401 {
4402         /* Stick struct lpfc_dmabuf at end of postbufq so driver can look it up
4403            later */
4404         spin_lock_irq(&phba->hbalock);
4405         list_add_tail(&mp->list, &pring->postbufq);
4406         pring->postbufq_cnt++;
4407         spin_unlock_irq(&phba->hbalock);
4408         return 0;
4409 }
4410
4411 /**
4412  * lpfc_sli_get_buffer_tag: Tag allocation function for a buffer posted
4413  *          using CMD_QUE_XRI64_CX iocb.
4414  * @phba: Pointer to HBA context object.
4415  *
4416  * When HBQ is enabled, buffers are searched based on tags. This function
4417  * allocates a tag for buffer posted using CMD_QUE_XRI64_CX iocb. The
4418  * tag is bit wise or-ed with QUE_BUFTAG_BIT to make sure that the tag
4419  * does not conflict with tags of buffer posted for unsolicited events.
4420  * The function returns the allocated tag. The function is called with
4421  * no locks held.
4422  **/
4423 uint32_t
4424 lpfc_sli_get_buffer_tag(struct lpfc_hba *phba)
4425 {
4426         spin_lock_irq(&phba->hbalock);
4427         phba->buffer_tag_count++;
4428         /*
4429          * Always set the QUE_BUFTAG_BIT to distiguish between
4430          * a tag assigned by HBQ.
4431          */
4432         phba->buffer_tag_count |= QUE_BUFTAG_BIT;
4433         spin_unlock_irq(&phba->hbalock);
4434         return phba->buffer_tag_count;
4435 }
4436
4437 /**
4438  * lpfc_sli_ring_taggedbuf_get: Search HBQ buffer associated with
4439  *              posted using CMD_QUE_XRI64_CX iocb.
4440  * @phba: Pointer to HBA context object.
4441  * @pring: Pointer to driver SLI ring object.
4442  * @tag: Buffer tag.
4443  *
4444  * Buffers posted using CMD_QUE_XRI64_CX iocb are in pring->postbufq
4445  * list. After HBA DMA data to these buffers, CMD_IOCB_RET_XRI64_CX
4446  * iocb is posted to the response ring with the tag of the buffer.
4447  * This function searches the pring->postbufq list using the tag
4448  * to find buffer associated with CMD_IOCB_RET_XRI64_CX
4449  * iocb. If the buffer is found then lpfc_dmabuf object of the
4450  * buffer is returned to the caller else NULL is returned.
4451  * This function is called with no lock held.
4452  **/
4453 struct lpfc_dmabuf *
4454 lpfc_sli_ring_taggedbuf_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
4455                         uint32_t tag)
4456 {
4457         struct lpfc_dmabuf *mp, *next_mp;
4458         struct list_head *slp = &pring->postbufq;
4459
4460         /* Search postbufq, from the begining, looking for a match on tag */
4461         spin_lock_irq(&phba->hbalock);
4462         list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
4463                 if (mp->buffer_tag == tag) {
4464                         list_del_init(&mp->list);
4465                         pring->postbufq_cnt--;
4466                         spin_unlock_irq(&phba->hbalock);
4467                         return mp;
4468                 }
4469         }
4470
4471         spin_unlock_irq(&phba->hbalock);
4472         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
4473                         "0402 Cannot find virtual addr for buffer tag on "
4474                         "ring %d Data x%lx x%p x%p x%x\n",
4475                         pring->ringno, (unsigned long) tag,
4476                         slp->next, slp->prev, pring->postbufq_cnt);
4477
4478         return NULL;
4479 }
4480
4481 /**
4482  * lpfc_sli_ringpostbuf_get: SLI2 buffer search function for
4483  *      unsolicited ct and els events.
4484  * @phba: Pointer to HBA context object.
4485  * @pring: Pointer to driver SLI ring object.
4486  * @phys: DMA address of the buffer.
4487  *
4488  * This function searches the buffer list using the dma_address
4489  * of unsolicited event to find the driver's lpfc_dmabuf object
4490  * corresponding to the dma_address. The function returns the
4491  * lpfc_dmabuf object if a buffer is found else it returns NULL.
4492  * This function is called by the ct and els unsolicited event
4493  * handlers to get the buffer associated with the unsolicited
4494  * event.
4495  *
4496  * This function is called with no lock held.
4497  **/
4498 struct lpfc_dmabuf *
4499 lpfc_sli_ringpostbuf_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
4500                          dma_addr_t phys)
4501 {
4502         struct lpfc_dmabuf *mp, *next_mp;
4503         struct list_head *slp = &pring->postbufq;
4504
4505         /* Search postbufq, from the begining, looking for a match on phys */
4506         spin_lock_irq(&phba->hbalock);
4507         list_for_each_entry_safe(mp, next_mp, &pring->postbufq, list) {
4508                 if (mp->phys == phys) {
4509                         list_del_init(&mp->list);
4510                         pring->postbufq_cnt--;
4511                         spin_unlock_irq(&phba->hbalock);
4512                         return mp;
4513                 }
4514         }
4515
4516         spin_unlock_irq(&phba->hbalock);
4517         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
4518                         "0410 Cannot find virtual addr for mapped buf on "
4519                         "ring %d Data x%llx x%p x%p x%x\n",
4520                         pring->ringno, (unsigned long long)phys,
4521                         slp->next, slp->prev, pring->postbufq_cnt);
4522         return NULL;
4523 }
4524
4525 /**
4526  * lpfc_sli_abort_els_cmpl: Completion handler for the els abort iocbs.
4527  * @phba: Pointer to HBA context object.
4528  * @cmdiocb: Pointer to driver command iocb object.
4529  * @rspiocb: Pointer to driver response iocb object.
4530  *
4531  * This function is the completion handler for the abort iocbs for
4532  * ELS commands. This function is called from the ELS ring event
4533  * handler with no lock held. This function frees memory resources
4534  * associated with the abort iocb.
4535  **/
4536 static void
4537 lpfc_sli_abort_els_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
4538                         struct lpfc_iocbq *rspiocb)
4539 {
4540         IOCB_t *irsp = &rspiocb->iocb;
4541         uint16_t abort_iotag, abort_context;
4542         struct lpfc_iocbq *abort_iocb;
4543         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
4544
4545         abort_iocb = NULL;
4546
4547         if (irsp->ulpStatus) {
4548                 abort_context = cmdiocb->iocb.un.acxri.abortContextTag;
4549                 abort_iotag = cmdiocb->iocb.un.acxri.abortIoTag;
4550
4551                 spin_lock_irq(&phba->hbalock);
4552                 if (abort_iotag != 0 && abort_iotag <= phba->sli.last_iotag)
4553                         abort_iocb = phba->sli.iocbq_lookup[abort_iotag];
4554
4555                 lpfc_printf_log(phba, KERN_INFO, LOG_ELS | LOG_SLI,
4556                                 "0327 Cannot abort els iocb %p "
4557                                 "with tag %x context %x, abort status %x, "
4558                                 "abort code %x\n",
4559                                 abort_iocb, abort_iotag, abort_context,
4560                                 irsp->ulpStatus, irsp->un.ulpWord[4]);
4561
4562                 /*
4563                  *  If the iocb is not found in Firmware queue the iocb
4564                  *  might have completed already. Do not free it again.
4565                  */
4566                 if (irsp->ulpStatus == IOSTAT_LOCAL_REJECT) {
4567                         spin_unlock_irq(&phba->hbalock);
4568                         lpfc_sli_release_iocbq(phba, cmdiocb);
4569                         return;
4570                 }
4571                 /*
4572                  * make sure we have the right iocbq before taking it
4573                  * off the txcmplq and try to call completion routine.
4574                  */
4575                 if (!abort_iocb ||
4576                     abort_iocb->iocb.ulpContext != abort_context ||
4577                     (abort_iocb->iocb_flag & LPFC_DRIVER_ABORTED) == 0)
4578                         spin_unlock_irq(&phba->hbalock);
4579                 else {
4580                         list_del_init(&abort_iocb->list);
4581                         pring->txcmplq_cnt--;
4582                         spin_unlock_irq(&phba->hbalock);
4583
4584                         /* Firmware could still be in progress of DMAing
4585                          * payload, so don't free data buffer till after
4586                          * a hbeat.
4587                          */
4588                         abort_iocb->iocb_flag |= LPFC_DELAY_MEM_FREE;
4589
4590                         abort_iocb->iocb_flag &= ~LPFC_DRIVER_ABORTED;
4591                         abort_iocb->iocb.ulpStatus = IOSTAT_LOCAL_REJECT;
4592                         abort_iocb->iocb.un.ulpWord[4] = IOERR_SLI_ABORTED;
4593                         (abort_iocb->iocb_cmpl)(phba, abort_iocb, abort_iocb);
4594                 }
4595         }
4596
4597         lpfc_sli_release_iocbq(phba, cmdiocb);
4598         return;
4599 }
4600
4601 /**
4602  * lpfc_ignore_els_cmpl: Completion handler for aborted ELS command.
4603  * @phba: Pointer to HBA context object.
4604  * @cmdiocb: Pointer to driver command iocb object.
4605  * @rspiocb: Pointer to driver response iocb object.
4606  *
4607  * The function is called from SLI ring event handler with no
4608  * lock held. This function is the completion handler for ELS commands
4609  * which are aborted. The function frees memory resources used for
4610  * the aborted ELS commands.
4611  **/
4612 static void
4613 lpfc_ignore_els_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
4614                      struct lpfc_iocbq *rspiocb)
4615 {
4616         IOCB_t *irsp = &rspiocb->iocb;
4617
4618         /* ELS cmd tag <ulpIoTag> completes */
4619         lpfc_printf_log(phba, KERN_INFO, LOG_ELS,
4620                         "0139 Ignoring ELS cmd tag x%x completion Data: "
4621                         "x%x x%x x%x\n",
4622                         irsp->ulpIoTag, irsp->ulpStatus,
4623                         irsp->un.ulpWord[4], irsp->ulpTimeout);
4624         if (cmdiocb->iocb.ulpCommand == CMD_GEN_REQUEST64_CR)
4625                 lpfc_ct_free_iocb(phba, cmdiocb);
4626         else
4627                 lpfc_els_free_iocb(phba, cmdiocb);
4628         return;
4629 }
4630
4631 /**
4632  * lpfc_sli_issue_abort_iotag: Abort function for a command iocb.
4633  * @phba: Pointer to HBA context object.
4634  * @pring: Pointer to driver SLI ring object.
4635  * @cmdiocb: Pointer to driver command iocb object.
4636  *
4637  * This function issues an abort iocb for the provided command
4638  * iocb. This function is called with hbalock held.
4639  * The function returns 0 when it fails due to memory allocation
4640  * failure or when the command iocb is an abort request.
4641  **/
4642 int
4643 lpfc_sli_issue_abort_iotag(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
4644                            struct lpfc_iocbq *cmdiocb)
4645 {
4646         struct lpfc_vport *vport = cmdiocb->vport;
4647         struct lpfc_iocbq *abtsiocbp;
4648         IOCB_t *icmd = NULL;
4649         IOCB_t *iabt = NULL;
4650         int retval = IOCB_ERROR;
4651
4652         /*
4653          * There are certain command types we don't want to abort.  And we
4654          * don't want to abort commands that are already in the process of
4655          * being aborted.
4656          */
4657         icmd = &cmdiocb->iocb;
4658         if (icmd->ulpCommand == CMD_ABORT_XRI_CN ||
4659             icmd->ulpCommand == CMD_CLOSE_XRI_CN ||
4660             (cmdiocb->iocb_flag & LPFC_DRIVER_ABORTED) != 0)
4661                 return 0;
4662
4663         /* If we're unloading, don't abort iocb on the ELS ring, but change the
4664          * callback so that nothing happens when it finishes.
4665          */
4666         if ((vport->load_flag & FC_UNLOADING) &&
4667             (pring->ringno == LPFC_ELS_RING)) {
4668                 if (cmdiocb->iocb_flag & LPFC_IO_FABRIC)
4669                         cmdiocb->fabric_iocb_cmpl = lpfc_ignore_els_cmpl;
4670                 else
4671                         cmdiocb->iocb_cmpl = lpfc_ignore_els_cmpl;
4672                 goto abort_iotag_exit;
4673         }
4674
4675         /* issue ABTS for this IOCB based on iotag */
4676         abtsiocbp = __lpfc_sli_get_iocbq(phba);
4677         if (abtsiocbp == NULL)
4678                 return 0;
4679
4680         /* This signals the response to set the correct status
4681          * before calling the completion handler.
4682          */
4683         cmdiocb->iocb_flag |= LPFC_DRIVER_ABORTED;
4684
4685         iabt = &abtsiocbp->iocb;
4686         iabt->un.acxri.abortType = ABORT_TYPE_ABTS;
4687         iabt->un.acxri.abortContextTag = icmd->ulpContext;
4688         iabt->un.acxri.abortIoTag = icmd->ulpIoTag;
4689         iabt->ulpLe = 1;
4690         iabt->ulpClass = icmd->ulpClass;
4691
4692         if (phba->link_state >= LPFC_LINK_UP)
4693                 iabt->ulpCommand = CMD_ABORT_XRI_CN;
4694         else
4695                 iabt->ulpCommand = CMD_CLOSE_XRI_CN;
4696
4697         abtsiocbp->iocb_cmpl = lpfc_sli_abort_els_cmpl;
4698
4699         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
4700                          "0339 Abort xri x%x, original iotag x%x, "
4701                          "abort cmd iotag x%x\n",
4702                          iabt->un.acxri.abortContextTag,
4703                          iabt->un.acxri.abortIoTag, abtsiocbp->iotag);
4704         retval = __lpfc_sli_issue_iocb(phba, pring, abtsiocbp, 0);
4705
4706         if (retval)
4707                 __lpfc_sli_release_iocbq(phba, abtsiocbp);
4708 abort_iotag_exit:
4709         /*
4710          * Caller to this routine should check for IOCB_ERROR
4711          * and handle it properly.  This routine no longer removes
4712          * iocb off txcmplq and call compl in case of IOCB_ERROR.
4713          */
4714         return retval;
4715 }
4716
4717 /**
4718  * lpfc_sli_validate_fcp_iocb: Filtering function, used to find commands
4719  *                    associated with a vport/SCSI target/lun.
4720  * @iocbq: Pointer to driver iocb object.
4721  * @vport: Pointer to driver virtual port object.
4722  * @tgt_id: SCSI ID of the target.
4723  * @lun_id: LUN ID of the scsi device.
4724  * @ctx_cmd: LPFC_CTX_LUN/LPFC_CTX_TGT/LPFC_CTX_HOST
4725  *
4726  * This function acts as iocb filter for functions which abort or count
4727  * all FCP iocbs pending on a lun/SCSI target/SCSI host. It will return
4728  * 0 if the filtering criteria is met for the given iocb and will return
4729  * 1 if the filtering criteria is not met.
4730  * If ctx_cmd == LPFC_CTX_LUN, the function returns 0 only if the
4731  * given iocb is for the SCSI device specified by vport, tgt_id and
4732  * lun_id parameter.
4733  * If ctx_cmd == LPFC_CTX_TGT,  the function returns 0 only if the
4734  * given iocb is for the SCSI target specified by vport and tgt_id
4735  * parameters.
4736  * If ctx_cmd == LPFC_CTX_HOST, the function returns 0 only if the
4737  * given iocb is for the SCSI host associated with the given vport.
4738  * This function is called with no locks held.
4739  **/
4740 static int
4741 lpfc_sli_validate_fcp_iocb(struct lpfc_iocbq *iocbq, struct lpfc_vport *vport,
4742                            uint16_t tgt_id, uint64_t lun_id,
4743                            lpfc_ctx_cmd ctx_cmd)
4744 {
4745         struct lpfc_scsi_buf *lpfc_cmd;
4746         int rc = 1;
4747
4748         if (!(iocbq->iocb_flag &  LPFC_IO_FCP))
4749                 return rc;
4750
4751         if (iocbq->vport != vport)
4752                 return rc;
4753
4754         lpfc_cmd = container_of(iocbq, struct lpfc_scsi_buf, cur_iocbq);
4755
4756         if (lpfc_cmd->pCmd == NULL)
4757                 return rc;
4758
4759         switch (ctx_cmd) {
4760         case LPFC_CTX_LUN:
4761                 if ((lpfc_cmd->rdata->pnode) &&
4762                     (lpfc_cmd->rdata->pnode->nlp_sid == tgt_id) &&
4763                     (scsilun_to_int(&lpfc_cmd->fcp_cmnd->fcp_lun) == lun_id))
4764                         rc = 0;
4765                 break;
4766         case LPFC_CTX_TGT:
4767                 if ((lpfc_cmd->rdata->pnode) &&
4768                     (lpfc_cmd->rdata->pnode->nlp_sid == tgt_id))
4769                         rc = 0;
4770                 break;
4771         case LPFC_CTX_HOST:
4772                 rc = 0;
4773                 break;
4774         default:
4775                 printk(KERN_ERR "%s: Unknown context cmd type, value %d\n",
4776                         __func__, ctx_cmd);
4777                 break;
4778         }
4779
4780         return rc;
4781 }
4782
4783 /**
4784  * lpfc_sli_sum_iocb: Function to count the number of FCP iocbs pending.
4785  * @vport: Pointer to virtual port.
4786  * @tgt_id: SCSI ID of the target.
4787  * @lun_id: LUN ID of the scsi device.
4788  * @ctx_cmd: LPFC_CTX_LUN/LPFC_CTX_TGT/LPFC_CTX_HOST.
4789  *
4790  * This function returns number of FCP commands pending for the vport.
4791  * When ctx_cmd == LPFC_CTX_LUN, the function returns number of FCP
4792  * commands pending on the vport associated with SCSI device specified
4793  * by tgt_id and lun_id parameters.
4794  * When ctx_cmd == LPFC_CTX_TGT, the function returns number of FCP
4795  * commands pending on the vport associated with SCSI target specified
4796  * by tgt_id parameter.
4797  * When ctx_cmd == LPFC_CTX_HOST, the function returns number of FCP
4798  * commands pending on the vport.
4799  * This function returns the number of iocbs which satisfy the filter.
4800  * This function is called without any lock held.
4801  **/
4802 int
4803 lpfc_sli_sum_iocb(struct lpfc_vport *vport, uint16_t tgt_id, uint64_t lun_id,
4804                   lpfc_ctx_cmd ctx_cmd)
4805 {
4806         struct lpfc_hba *phba = vport->phba;
4807         struct lpfc_iocbq *iocbq;
4808         int sum, i;
4809
4810         for (i = 1, sum = 0; i <= phba->sli.last_iotag; i++) {
4811                 iocbq = phba->sli.iocbq_lookup[i];
4812
4813                 if (lpfc_sli_validate_fcp_iocb (iocbq, vport, tgt_id, lun_id,
4814                                                 ctx_cmd) == 0)
4815                         sum++;
4816         }
4817
4818         return sum;
4819 }
4820
4821 /**
4822  * lpfc_sli_abort_fcp_cmpl: Completion handler function for an aborted
4823  *       FCP iocb.
4824  * @phba: Pointer to HBA context object
4825  * @cmdiocb: Pointer to command iocb object.
4826  * @rspiocb: Pointer to response iocb object.
4827  *
4828  * This function is called when an aborted FCP iocb completes. This
4829  * function is called by the ring event handler with no lock held.
4830  * This function frees the iocb.
4831  **/
4832 void
4833 lpfc_sli_abort_fcp_cmpl(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
4834                         struct lpfc_iocbq *rspiocb)
4835 {
4836         lpfc_sli_release_iocbq(phba, cmdiocb);
4837         return;
4838 }
4839
4840 /**
4841  * lpfc_sli_abort_iocb: This function issue abort for all SCSI commands
4842  *          pending on a SCSI host(vport)/target/lun.
4843  * @vport: Pointer to virtual port.
4844  * @pring: Pointer to driver SLI ring object.
4845  * @tgt_id: SCSI ID of the target.
4846  * @lun_id: LUN ID of the scsi device.
4847  * @abort_cmd: LPFC_CTX_LUN/LPFC_CTX_TGT/LPFC_CTX_HOST.
4848  *
4849  * This function sends an abort command for every SCSI command
4850  * associated with the given virtual port pending on the ring
4851  * filtered by lpfc_sli_validate_fcp_iocb function.
4852  * When abort_cmd == LPFC_CTX_LUN, the function sends abort only to the
4853  * FCP iocbs associated with lun specified by tgt_id and lun_id
4854  * parameters
4855  * When abort_cmd == LPFC_CTX_TGT, the function sends abort only to the
4856  * FCP iocbs associated with SCSI target specified by tgt_id parameter.
4857  * When abort_cmd == LPFC_CTX_HOST, the function sends abort to all
4858  * FCP iocbs associated with virtual port.
4859  * This function returns number of iocbs it failed to abort.
4860  * This function is called with no locks held.
4861  **/
4862 int
4863 lpfc_sli_abort_iocb(struct lpfc_vport *vport, struct lpfc_sli_ring *pring,
4864                     uint16_t tgt_id, uint64_t lun_id, lpfc_ctx_cmd abort_cmd)
4865 {
4866         struct lpfc_hba *phba = vport->phba;
4867         struct lpfc_iocbq *iocbq;
4868         struct lpfc_iocbq *abtsiocb;
4869         IOCB_t *cmd = NULL;
4870         int errcnt = 0, ret_val = 0;
4871         int i;
4872
4873         for (i = 1; i <= phba->sli.last_iotag; i++) {
4874                 iocbq = phba->sli.iocbq_lookup[i];
4875
4876                 if (lpfc_sli_validate_fcp_iocb(iocbq, vport, tgt_id, lun_id,
4877                                                abort_cmd) != 0)
4878                         continue;
4879
4880                 /* issue ABTS for this IOCB based on iotag */
4881                 abtsiocb = lpfc_sli_get_iocbq(phba);
4882                 if (abtsiocb == NULL) {
4883                         errcnt++;
4884                         continue;
4885                 }
4886
4887                 cmd = &iocbq->iocb;
4888                 abtsiocb->iocb.un.acxri.abortType = ABORT_TYPE_ABTS;
4889                 abtsiocb->iocb.un.acxri.abortContextTag = cmd->ulpContext;
4890                 abtsiocb->iocb.un.acxri.abortIoTag = cmd->ulpIoTag;
4891                 abtsiocb->iocb.ulpLe = 1;
4892                 abtsiocb->iocb.ulpClass = cmd->ulpClass;
4893                 abtsiocb->vport = phba->pport;
4894
4895                 if (lpfc_is_link_up(phba))
4896                         abtsiocb->iocb.ulpCommand = CMD_ABORT_XRI_CN;
4897                 else
4898                         abtsiocb->iocb.ulpCommand = CMD_CLOSE_XRI_CN;
4899
4900                 /* Setup callback routine and issue the command. */
4901                 abtsiocb->iocb_cmpl = lpfc_sli_abort_fcp_cmpl;
4902                 ret_val = lpfc_sli_issue_iocb(phba, pring, abtsiocb, 0);
4903                 if (ret_val == IOCB_ERROR) {
4904                         lpfc_sli_release_iocbq(phba, abtsiocb);
4905                         errcnt++;
4906                         continue;
4907                 }
4908         }
4909
4910         return errcnt;
4911 }
4912
4913 /**
4914  * lpfc_sli_wake_iocb_wait: iocb completion handler for iocb issued using
4915  *                          lpfc_sli_issue_iocb_wait.
4916  * @phba: Pointer to HBA context object.
4917  * @cmdiocbq: Pointer to command iocb.
4918  * @rspiocbq: Pointer to response iocb.
4919  *
4920  * This function is the completion handler for iocbs issued using
4921  * lpfc_sli_issue_iocb_wait function. This function is called by the
4922  * ring event handler function without any lock held. This function
4923  * can be called from both worker thread context and interrupt
4924  * context. This function also can be called from other thread which
4925  * cleans up the SLI layer objects.
4926  * This function copy the contents of the response iocb to the
4927  * response iocb memory object provided by the caller of
4928  * lpfc_sli_issue_iocb_wait and then wakes up the thread which
4929  * sleeps for the iocb completion.
4930  **/
4931 static void
4932 lpfc_sli_wake_iocb_wait(struct lpfc_hba *phba,
4933                         struct lpfc_iocbq *cmdiocbq,
4934                         struct lpfc_iocbq *rspiocbq)
4935 {
4936         wait_queue_head_t *pdone_q;
4937         unsigned long iflags;
4938
4939         spin_lock_irqsave(&phba->hbalock, iflags);
4940         cmdiocbq->iocb_flag |= LPFC_IO_WAKE;
4941         if (cmdiocbq->context2 && rspiocbq)
4942                 memcpy(&((struct lpfc_iocbq *)cmdiocbq->context2)->iocb,
4943                        &rspiocbq->iocb, sizeof(IOCB_t));
4944
4945         pdone_q = cmdiocbq->context_un.wait_queue;
4946         if (pdone_q)
4947                 wake_up(pdone_q);
4948         spin_unlock_irqrestore(&phba->hbalock, iflags);
4949         return;
4950 }
4951
4952 /**
4953  * lpfc_sli_issue_iocb_wait: Synchronous function to issue iocb commands.
4954  * @phba: Pointer to HBA context object..
4955  * @pring: Pointer to sli ring.
4956  * @piocb: Pointer to command iocb.
4957  * @prspiocbq: Pointer to response iocb.
4958  * @timeout: Timeout in number of seconds.
4959  *
4960  * This function issues the iocb to firmware and waits for the
4961  * iocb to complete. If the iocb command is not
4962  * completed within timeout seconds, it returns IOCB_TIMEDOUT.
4963  * Caller should not free the iocb resources if this function
4964  * returns IOCB_TIMEDOUT.
4965  * The function waits for the iocb completion using an
4966  * non-interruptible wait.
4967  * This function will sleep while waiting for iocb completion.
4968  * So, this function should not be called from any context which
4969  * does not allow sleeping. Due to the same reason, this function
4970  * cannot be called with interrupt disabled.
4971  * This function assumes that the iocb completions occur while
4972  * this function sleep. So, this function cannot be called from
4973  * the thread which process iocb completion for this ring.
4974  * This function clears the iocb_flag of the iocb object before
4975  * issuing the iocb and the iocb completion handler sets this
4976  * flag and wakes this thread when the iocb completes.
4977  * The contents of the response iocb will be copied to prspiocbq
4978  * by the completion handler when the command completes.
4979  * This function returns IOCB_SUCCESS when success.
4980  * This function is called with no lock held.
4981  **/
4982 int
4983 lpfc_sli_issue_iocb_wait(struct lpfc_hba *phba,
4984                          struct lpfc_sli_ring *pring,
4985                          struct lpfc_iocbq *piocb,
4986                          struct lpfc_iocbq *prspiocbq,
4987                          uint32_t timeout)
4988 {
4989         DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
4990         long timeleft, timeout_req = 0;
4991         int retval = IOCB_SUCCESS;
4992         uint32_t creg_val;
4993
4994         /*
4995          * If the caller has provided a response iocbq buffer, then context2
4996          * is NULL or its an error.
4997          */
4998         if (prspiocbq) {
4999                 if (piocb->context2)
5000                         return IOCB_ERROR;
5001                 piocb->context2 = prspiocbq;
5002         }
5003
5004         piocb->iocb_cmpl = lpfc_sli_wake_iocb_wait;
5005         piocb->context_un.wait_queue = &done_q;
5006         piocb->iocb_flag &= ~LPFC_IO_WAKE;
5007
5008         if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
5009                 creg_val = readl(phba->HCregaddr);
5010                 creg_val |= (HC_R0INT_ENA << LPFC_FCP_RING);
5011                 writel(creg_val, phba->HCregaddr);
5012                 readl(phba->HCregaddr); /* flush */
5013         }
5014
5015         retval = lpfc_sli_issue_iocb(phba, pring, piocb, 0);
5016         if (retval == IOCB_SUCCESS) {
5017                 timeout_req = timeout * HZ;
5018                 timeleft = wait_event_timeout(done_q,
5019                                 piocb->iocb_flag & LPFC_IO_WAKE,
5020                                 timeout_req);
5021
5022                 if (piocb->iocb_flag & LPFC_IO_WAKE) {
5023                         lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
5024                                         "0331 IOCB wake signaled\n");
5025                 } else if (timeleft == 0) {
5026                         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
5027                                         "0338 IOCB wait timeout error - no "
5028                                         "wake response Data x%x\n", timeout);
5029                         retval = IOCB_TIMEDOUT;
5030                 } else {
5031                         lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
5032                                         "0330 IOCB wake NOT set, "
5033                                         "Data x%x x%lx\n",
5034                                         timeout, (timeleft / jiffies));
5035                         retval = IOCB_TIMEDOUT;
5036                 }
5037         } else {
5038                 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
5039                                 "0332 IOCB wait issue failed, Data x%x\n",
5040                                 retval);
5041                 retval = IOCB_ERROR;
5042         }
5043
5044         if (phba->cfg_poll & DISABLE_FCP_RING_INT) {
5045                 creg_val = readl(phba->HCregaddr);
5046                 creg_val &= ~(HC_R0INT_ENA << LPFC_FCP_RING);
5047                 writel(creg_val, phba->HCregaddr);
5048                 readl(phba->HCregaddr); /* flush */
5049         }
5050
5051         if (prspiocbq)
5052                 piocb->context2 = NULL;
5053
5054         piocb->context_un.wait_queue = NULL;
5055         piocb->iocb_cmpl = NULL;
5056         return retval;
5057 }
5058
5059 /**
5060  * lpfc_sli_issue_mbox_wait: Synchronous function to issue mailbox.
5061  * @phba: Pointer to HBA context object.
5062  * @pmboxq: Pointer to driver mailbox object.
5063  * @timeout: Timeout in number of seconds.
5064  *
5065  * This function issues the mailbox to firmware and waits for the
5066  * mailbox command to complete. If the mailbox command is not
5067  * completed within timeout seconds, it returns MBX_TIMEOUT.
5068  * The function waits for the mailbox completion using an
5069  * interruptible wait. If the thread is woken up due to a
5070  * signal, MBX_TIMEOUT error is returned to the caller. Caller
5071  * should not free the mailbox resources, if this function returns
5072  * MBX_TIMEOUT.
5073  * This function will sleep while waiting for mailbox completion.
5074  * So, this function should not be called from any context which
5075  * does not allow sleeping. Due to the same reason, this function
5076  * cannot be called with interrupt disabled.
5077  * This function assumes that the mailbox completion occurs while
5078  * this function sleep. So, this function cannot be called from
5079  * the worker thread which processes mailbox completion.
5080  * This function is called in the context of HBA management
5081  * applications.
5082  * This function returns MBX_SUCCESS when successful.
5083  * This function is called with no lock held.
5084  **/
5085 int
5086 lpfc_sli_issue_mbox_wait(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmboxq,
5087                          uint32_t timeout)
5088 {
5089         DECLARE_WAIT_QUEUE_HEAD_ONSTACK(done_q);
5090         int retval;
5091         unsigned long flag;
5092
5093         /* The caller must leave context1 empty. */
5094         if (pmboxq->context1)
5095                 return MBX_NOT_FINISHED;
5096
5097         pmboxq->mbox_flag &= ~LPFC_MBX_WAKE;
5098         /* setup wake call as IOCB callback */
5099         pmboxq->mbox_cmpl = lpfc_sli_wake_mbox_wait;
5100         /* setup context field to pass wait_queue pointer to wake function  */
5101         pmboxq->context1 = &done_q;
5102
5103         /* now issue the command */
5104         retval = lpfc_sli_issue_mbox(phba, pmboxq, MBX_NOWAIT);
5105
5106         if (retval == MBX_BUSY || retval == MBX_SUCCESS) {
5107                 wait_event_interruptible_timeout(done_q,
5108                                 pmboxq->mbox_flag & LPFC_MBX_WAKE,
5109                                 timeout * HZ);
5110
5111                 spin_lock_irqsave(&phba->hbalock, flag);
5112                 pmboxq->context1 = NULL;
5113                 /*
5114                  * if LPFC_MBX_WAKE flag is set the mailbox is completed
5115                  * else do not free the resources.
5116                  */
5117                 if (pmboxq->mbox_flag & LPFC_MBX_WAKE)
5118                         retval = MBX_SUCCESS;
5119                 else {
5120                         retval = MBX_TIMEOUT;
5121                         pmboxq->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
5122                 }
5123                 spin_unlock_irqrestore(&phba->hbalock, flag);
5124         }
5125
5126         return retval;
5127 }
5128
5129 /**
5130  * lpfc_sli_flush_mbox_queue: mailbox queue cleanup function.
5131  * @phba: Pointer to HBA context.
5132  *
5133  * This function is called to cleanup any pending mailbox
5134  * objects in the driver queue before bringing the HBA offline.
5135  * This function is called while resetting the HBA.
5136  * The function is called without any lock held. The function
5137  * takes hbalock to update SLI data structure.
5138  * This function returns 1 when there is an active mailbox
5139  * command pending else returns 0.
5140  **/
5141 int
5142 lpfc_sli_flush_mbox_queue(struct lpfc_hba * phba)
5143 {
5144         struct lpfc_vport *vport = phba->pport;
5145         int i = 0;
5146         uint32_t ha_copy;
5147
5148         while (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE && !vport->stopped) {
5149                 if (i++ > LPFC_MBOX_TMO * 1000)
5150                         return 1;
5151
5152                 /*
5153                  * Call lpfc_sli_handle_mb_event only if a mailbox cmd
5154                  * did finish. This way we won't get the misleading
5155                  * "Stray Mailbox Interrupt" message.
5156                  */
5157                 spin_lock_irq(&phba->hbalock);
5158                 ha_copy = phba->work_ha;
5159                 phba->work_ha &= ~HA_MBATT;
5160                 spin_unlock_irq(&phba->hbalock);
5161
5162                 if (ha_copy & HA_MBATT)
5163                         if (lpfc_sli_handle_mb_event(phba) == 0)
5164                                 i = 0;
5165
5166                 msleep(1);
5167         }
5168
5169         return (phba->sli.sli_flag & LPFC_SLI_MBOX_ACTIVE) ? 1 : 0;
5170 }
5171
5172 /**
5173  * lpfc_sli_check_eratt: check error attention events
5174  * @phba: Pointer to HBA context.
5175  *
5176  * This function is called form timer soft interrupt context to check HBA's
5177  * error attention register bit for error attention events.
5178  *
5179  * This fucntion returns 1 when there is Error Attention in the Host Attention
5180  * Register and returns 0 otherwise.
5181  **/
5182 int
5183 lpfc_sli_check_eratt(struct lpfc_hba *phba)
5184 {
5185         uint32_t ha_copy;
5186
5187         /* If somebody is waiting to handle an eratt, don't process it
5188          * here. The brdkill function will do this.
5189          */
5190         if (phba->link_flag & LS_IGNORE_ERATT)
5191                 return 0;
5192
5193         /* Check if interrupt handler handles this ERATT */
5194         spin_lock_irq(&phba->hbalock);
5195         if (phba->hba_flag & HBA_ERATT_HANDLED) {
5196                 /* Interrupt handler has handled ERATT */
5197                 spin_unlock_irq(&phba->hbalock);
5198                 return 0;
5199         }
5200
5201         /* Read chip Host Attention (HA) register */
5202         ha_copy = readl(phba->HAregaddr);
5203         if (ha_copy & HA_ERATT) {
5204                 /* Read host status register to retrieve error event */
5205                 lpfc_sli_read_hs(phba);
5206                 /* Set the driver HA work bitmap */
5207                 phba->work_ha |= HA_ERATT;
5208                 /* Indicate polling handles this ERATT */
5209                 phba->hba_flag |= HBA_ERATT_HANDLED;
5210                 spin_unlock_irq(&phba->hbalock);
5211                 return 1;
5212         }
5213         spin_unlock_irq(&phba->hbalock);
5214         return 0;
5215 }
5216
5217 /**
5218  * lpfc_sp_intr_handler: The slow-path interrupt handler of lpfc driver.
5219  * @irq: Interrupt number.
5220  * @dev_id: The device context pointer.
5221  *
5222  * This function is directly called from the PCI layer as an interrupt
5223  * service routine when the device is enabled with MSI-X multi-message
5224  * interrupt mode and there are slow-path events in the HBA. However,
5225  * when the device is enabled with either MSI or Pin-IRQ interrupt mode,
5226  * this function is called as part of the device-level interrupt handler.
5227  * When the PCI slot is in error recovery or the HBA is undergoing
5228  * initialization, the interrupt handler will not process the interrupt.
5229  * The link attention and ELS ring attention events are handled by the
5230  * worker thread. The interrupt handler signals the worker thread and
5231  * and returns for these events. This function is called without any
5232  * lock held. It gets the hbalock to access and update SLI data
5233  * structures.
5234  *
5235  * This function returns IRQ_HANDLED when interrupt is handled else it
5236  * returns IRQ_NONE.
5237  **/
5238 irqreturn_t
5239 lpfc_sp_intr_handler(int irq, void *dev_id)
5240 {
5241         struct lpfc_hba  *phba;
5242         uint32_t ha_copy;
5243         uint32_t work_ha_copy;
5244         unsigned long status;
5245         uint32_t control;
5246
5247         MAILBOX_t *mbox, *pmbox;
5248         struct lpfc_vport *vport;
5249         struct lpfc_nodelist *ndlp;
5250         struct lpfc_dmabuf *mp;
5251         LPFC_MBOXQ_t *pmb;
5252         int rc;
5253
5254         /*
5255          * Get the driver's phba structure from the dev_id and
5256          * assume the HBA is not interrupting.
5257          */
5258         phba = (struct lpfc_hba *)dev_id;
5259
5260         if (unlikely(!phba))
5261                 return IRQ_NONE;
5262
5263         /*
5264          * Stuff needs to be attented to when this function is invoked as an
5265          * individual interrupt handler in MSI-X multi-message interrupt mode
5266          */
5267         if (phba->intr_type == MSIX) {
5268                 /* If the pci channel is offline, ignore all the interrupts */
5269                 if (unlikely(pci_channel_offline(phba->pcidev)))
5270                         return IRQ_NONE;
5271                 /* Update device-level interrupt statistics */
5272                 phba->sli.slistat.sli_intr++;
5273                 /* Ignore all interrupts during initialization. */
5274                 if (unlikely(phba->link_state < LPFC_LINK_DOWN))
5275                         return IRQ_NONE;
5276                 /* Need to read HA REG for slow-path events */
5277                 spin_lock(&phba->hbalock);
5278                 ha_copy = readl(phba->HAregaddr);
5279                 /* If somebody is waiting to handle an eratt don't process it
5280                  * here. The brdkill function will do this.
5281                  */
5282                 if (phba->link_flag & LS_IGNORE_ERATT)
5283                         ha_copy &= ~HA_ERATT;
5284                 /* Check the need for handling ERATT in interrupt handler */
5285                 if (ha_copy & HA_ERATT) {
5286                         if (phba->hba_flag & HBA_ERATT_HANDLED)
5287                                 /* ERATT polling has handled ERATT */
5288                                 ha_copy &= ~HA_ERATT;
5289                         else
5290                                 /* Indicate interrupt handler handles ERATT */
5291                                 phba->hba_flag |= HBA_ERATT_HANDLED;
5292                 }
5293                 /* Clear up only attention source related to slow-path */
5294                 writel((ha_copy & (HA_MBATT | HA_R2_CLR_MSK)),
5295                         phba->HAregaddr);
5296                 readl(phba->HAregaddr); /* flush */
5297                 spin_unlock(&phba->hbalock);
5298         } else
5299                 ha_copy = phba->ha_copy;
5300
5301         work_ha_copy = ha_copy & phba->work_ha_mask;
5302
5303         if (work_ha_copy) {
5304                 if (work_ha_copy & HA_LATT) {
5305                         if (phba->sli.sli_flag & LPFC_PROCESS_LA) {
5306                                 /*
5307                                  * Turn off Link Attention interrupts
5308                                  * until CLEAR_LA done
5309                                  */
5310                                 spin_lock(&phba->hbalock);
5311                                 phba->sli.sli_flag &= ~LPFC_PROCESS_LA;
5312                                 control = readl(phba->HCregaddr);
5313                                 control &= ~HC_LAINT_ENA;
5314                                 writel(control, phba->HCregaddr);
5315                                 readl(phba->HCregaddr); /* flush */
5316                                 spin_unlock(&phba->hbalock);
5317                         }
5318                         else
5319                                 work_ha_copy &= ~HA_LATT;
5320                 }
5321
5322                 if (work_ha_copy & ~(HA_ERATT | HA_MBATT | HA_LATT)) {
5323                         /*
5324                          * Turn off Slow Rings interrupts, LPFC_ELS_RING is
5325                          * the only slow ring.
5326                          */
5327                         status = (work_ha_copy &
5328                                 (HA_RXMASK  << (4*LPFC_ELS_RING)));
5329                         status >>= (4*LPFC_ELS_RING);
5330                         if (status & HA_RXMASK) {
5331                                 spin_lock(&phba->hbalock);
5332                                 control = readl(phba->HCregaddr);
5333
5334                                 lpfc_debugfs_slow_ring_trc(phba,
5335                                 "ISR slow ring:   ctl:x%x stat:x%x isrcnt:x%x",
5336                                 control, status,
5337                                 (uint32_t)phba->sli.slistat.sli_intr);
5338
5339                                 if (control & (HC_R0INT_ENA << LPFC_ELS_RING)) {
5340                                         lpfc_debugfs_slow_ring_trc(phba,
5341                                                 "ISR Disable ring:"
5342                                                 "pwork:x%x hawork:x%x wait:x%x",
5343                                                 phba->work_ha, work_ha_copy,
5344                                                 (uint32_t)((unsigned long)
5345                                                 &phba->work_waitq));
5346
5347                                         control &=
5348                                             ~(HC_R0INT_ENA << LPFC_ELS_RING);
5349                                         writel(control, phba->HCregaddr);
5350                                         readl(phba->HCregaddr); /* flush */
5351                                 }
5352                                 else {
5353                                         lpfc_debugfs_slow_ring_trc(phba,
5354                                                 "ISR slow ring:   pwork:"
5355                                                 "x%x hawork:x%x wait:x%x",
5356                                                 phba->work_ha, work_ha_copy,
5357                                                 (uint32_t)((unsigned long)
5358                                                 &phba->work_waitq));
5359                                 }
5360                                 spin_unlock(&phba->hbalock);
5361                         }
5362                 }
5363                 spin_lock(&phba->hbalock);
5364                 if (work_ha_copy & HA_ERATT)
5365                         lpfc_sli_read_hs(phba);
5366                 if ((work_ha_copy & HA_MBATT) && (phba->sli.mbox_active)) {
5367                         pmb = phba->sli.mbox_active;
5368                         pmbox = &pmb->mb;
5369                         mbox = phba->mbox;
5370                         vport = pmb->vport;
5371
5372                         /* First check out the status word */
5373                         lpfc_sli_pcimem_bcopy(mbox, pmbox, sizeof(uint32_t));
5374                         if (pmbox->mbxOwner != OWN_HOST) {
5375                                 spin_unlock(&phba->hbalock);
5376                                 /*
5377                                  * Stray Mailbox Interrupt, mbxCommand <cmd>
5378                                  * mbxStatus <status>
5379                                  */
5380                                 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX |
5381                                                 LOG_SLI,
5382                                                 "(%d):0304 Stray Mailbox "
5383                                                 "Interrupt mbxCommand x%x "
5384                                                 "mbxStatus x%x\n",
5385                                                 (vport ? vport->vpi : 0),
5386                                                 pmbox->mbxCommand,
5387                                                 pmbox->mbxStatus);
5388                                 /* clear mailbox attention bit */
5389                                 work_ha_copy &= ~HA_MBATT;
5390                         } else {
5391                                 phba->sli.mbox_active = NULL;
5392                                 spin_unlock(&phba->hbalock);
5393                                 phba->last_completion_time = jiffies;
5394                                 del_timer(&phba->sli.mbox_tmo);
5395                                 if (pmb->mbox_cmpl) {
5396                                         lpfc_sli_pcimem_bcopy(mbox, pmbox,
5397                                                         MAILBOX_CMD_SIZE);
5398                                 }
5399                                 if (pmb->mbox_flag & LPFC_MBX_IMED_UNREG) {
5400                                         pmb->mbox_flag &= ~LPFC_MBX_IMED_UNREG;
5401
5402                                         lpfc_debugfs_disc_trc(vport,
5403                                                 LPFC_DISC_TRC_MBOX_VPORT,
5404                                                 "MBOX dflt rpi: : "
5405                                                 "status:x%x rpi:x%x",
5406                                                 (uint32_t)pmbox->mbxStatus,
5407                                                 pmbox->un.varWords[0], 0);
5408
5409                                         if (!pmbox->mbxStatus) {
5410                                                 mp = (struct lpfc_dmabuf *)
5411                                                         (pmb->context1);
5412                                                 ndlp = (struct lpfc_nodelist *)
5413                                                         pmb->context2;
5414
5415                                                 /* Reg_LOGIN of dflt RPI was
5416                                                  * successful. new lets get
5417                                                  * rid of the RPI using the
5418                                                  * same mbox buffer.
5419                                                  */
5420                                                 lpfc_unreg_login(phba,
5421                                                         vport->vpi,
5422                                                         pmbox->un.varWords[0],
5423                                                         pmb);
5424                                                 pmb->mbox_cmpl =
5425                                                         lpfc_mbx_cmpl_dflt_rpi;
5426                                                 pmb->context1 = mp;
5427                                                 pmb->context2 = ndlp;
5428                                                 pmb->vport = vport;
5429                                                 rc = lpfc_sli_issue_mbox(phba,
5430                                                                 pmb,
5431                                                                 MBX_NOWAIT);
5432                                                 if (rc != MBX_BUSY)
5433                                                         lpfc_printf_log(phba,
5434                                                         KERN_ERR,
5435                                                         LOG_MBOX | LOG_SLI,
5436                                                         "0350 rc should have"
5437                                                         "been MBX_BUSY");
5438                                                 goto send_current_mbox;
5439                                         }
5440                                 }
5441                                 spin_lock(&phba->pport->work_port_lock);
5442                                 phba->pport->work_port_events &=
5443                                         ~WORKER_MBOX_TMO;
5444                                 spin_unlock(&phba->pport->work_port_lock);
5445                                 lpfc_mbox_cmpl_put(phba, pmb);
5446                         }
5447                 } else
5448                         spin_unlock(&phba->hbalock);
5449
5450                 if ((work_ha_copy & HA_MBATT) &&
5451                     (phba->sli.mbox_active == NULL)) {
5452 send_current_mbox:
5453                         /* Process next mailbox command if there is one */
5454                         do {
5455                                 rc = lpfc_sli_issue_mbox(phba, NULL,
5456                                                          MBX_NOWAIT);
5457                         } while (rc == MBX_NOT_FINISHED);
5458                         if (rc != MBX_SUCCESS)
5459                                 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX |
5460                                                 LOG_SLI, "0349 rc should be "
5461                                                 "MBX_SUCCESS");
5462                 }
5463
5464                 spin_lock(&phba->hbalock);
5465                 phba->work_ha |= work_ha_copy;
5466                 spin_unlock(&phba->hbalock);
5467                 lpfc_worker_wake_up(phba);
5468         }
5469         return IRQ_HANDLED;
5470
5471 } /* lpfc_sp_intr_handler */
5472
5473 /**
5474  * lpfc_fp_intr_handler: The fast-path interrupt handler of lpfc driver.
5475  * @irq: Interrupt number.
5476  * @dev_id: The device context pointer.
5477  *
5478  * This function is directly called from the PCI layer as an interrupt
5479  * service routine when the device is enabled with MSI-X multi-message
5480  * interrupt mode and there is a fast-path FCP IOCB ring event in the
5481  * HBA. However, when the device is enabled with either MSI or Pin-IRQ
5482  * interrupt mode, this function is called as part of the device-level
5483  * interrupt handler. When the PCI slot is in error recovery or the HBA
5484  * is undergoing initialization, the interrupt handler will not process
5485  * the interrupt. The SCSI FCP fast-path ring event are handled in the
5486  * intrrupt context. This function is called without any lock held. It
5487  * gets the hbalock to access and update SLI data structures.
5488  *
5489  * This function returns IRQ_HANDLED when interrupt is handled else it
5490  * returns IRQ_NONE.
5491  **/
5492 irqreturn_t
5493 lpfc_fp_intr_handler(int irq, void *dev_id)
5494 {
5495         struct lpfc_hba  *phba;
5496         uint32_t ha_copy;
5497         unsigned long status;
5498
5499         /* Get the driver's phba structure from the dev_id and
5500          * assume the HBA is not interrupting.
5501          */
5502         phba = (struct lpfc_hba *) dev_id;
5503
5504         if (unlikely(!phba))
5505                 return IRQ_NONE;
5506
5507         /*
5508          * Stuff needs to be attented to when this function is invoked as an
5509          * individual interrupt handler in MSI-X multi-message interrupt mode
5510          */
5511         if (phba->intr_type == MSIX) {
5512                 /* If pci channel is offline, ignore all the interrupts */
5513                 if (unlikely(pci_channel_offline(phba->pcidev)))
5514                         return IRQ_NONE;
5515                 /* Update device-level interrupt statistics */
5516                 phba->sli.slistat.sli_intr++;
5517                 /* Ignore all interrupts during initialization. */
5518                 if (unlikely(phba->link_state < LPFC_LINK_DOWN))
5519                         return IRQ_NONE;
5520                 /* Need to read HA REG for FCP ring and other ring events */
5521                 ha_copy = readl(phba->HAregaddr);
5522                 /* Clear up only attention source related to fast-path */
5523                 spin_lock(&phba->hbalock);
5524                 writel((ha_copy & (HA_R0_CLR_MSK | HA_R1_CLR_MSK)),
5525                         phba->HAregaddr);
5526                 readl(phba->HAregaddr); /* flush */
5527                 spin_unlock(&phba->hbalock);
5528         } else
5529                 ha_copy = phba->ha_copy;
5530
5531         /*
5532          * Process all events on FCP ring. Take the optimized path for FCP IO.
5533          */
5534         ha_copy &= ~(phba->work_ha_mask);
5535
5536         status = (ha_copy & (HA_RXMASK << (4*LPFC_FCP_RING)));
5537         status >>= (4*LPFC_FCP_RING);
5538         if (status & HA_RXMASK)
5539                 lpfc_sli_handle_fast_ring_event(phba,
5540                                                 &phba->sli.ring[LPFC_FCP_RING],
5541                                                 status);
5542
5543         if (phba->cfg_multi_ring_support == 2) {
5544                 /*
5545                  * Process all events on extra ring. Take the optimized path
5546                  * for extra ring IO.
5547                  */
5548                 status = (ha_copy & (HA_RXMASK << (4*LPFC_EXTRA_RING)));
5549                 status >>= (4*LPFC_EXTRA_RING);
5550                 if (status & HA_RXMASK) {
5551                         lpfc_sli_handle_fast_ring_event(phba,
5552                                         &phba->sli.ring[LPFC_EXTRA_RING],
5553                                         status);
5554                 }
5555         }
5556         return IRQ_HANDLED;
5557 }  /* lpfc_fp_intr_handler */
5558
5559 /**
5560  * lpfc_intr_handler: The device-level interrupt handler of lpfc driver.
5561  * @irq: Interrupt number.
5562  * @dev_id: The device context pointer.
5563  *
5564  * This function is the device-level interrupt handler called from the PCI
5565  * layer when either MSI or Pin-IRQ interrupt mode is enabled and there is
5566  * an event in the HBA which requires driver attention. This function
5567  * invokes the slow-path interrupt attention handling function and fast-path
5568  * interrupt attention handling function in turn to process the relevant
5569  * HBA attention events. This function is called without any lock held. It
5570  * gets the hbalock to access and update SLI data structures.
5571  *
5572  * This function returns IRQ_HANDLED when interrupt is handled, else it
5573  * returns IRQ_NONE.
5574  **/
5575 irqreturn_t
5576 lpfc_intr_handler(int irq, void *dev_id)
5577 {
5578         struct lpfc_hba  *phba;
5579         irqreturn_t sp_irq_rc, fp_irq_rc;
5580         unsigned long status1, status2;
5581
5582         /*
5583          * Get the driver's phba structure from the dev_id and
5584          * assume the HBA is not interrupting.
5585          */
5586         phba = (struct lpfc_hba *) dev_id;
5587
5588         if (unlikely(!phba))
5589                 return IRQ_NONE;
5590
5591         /* If the pci channel is offline, ignore all the interrupts. */
5592         if (unlikely(pci_channel_offline(phba->pcidev)))
5593                 return IRQ_NONE;
5594
5595         /* Update device level interrupt statistics */
5596         phba->sli.slistat.sli_intr++;
5597
5598         /* Ignore all interrupts during initialization. */
5599         if (unlikely(phba->link_state < LPFC_LINK_DOWN))
5600                 return IRQ_NONE;
5601
5602         spin_lock(&phba->hbalock);
5603         phba->ha_copy = readl(phba->HAregaddr);
5604         if (unlikely(!phba->ha_copy)) {
5605                 spin_unlock(&phba->hbalock);
5606                 return IRQ_NONE;
5607         } else if (phba->ha_copy & HA_ERATT) {
5608                 if (phba->hba_flag & HBA_ERATT_HANDLED)
5609                         /* ERATT polling has handled ERATT */
5610                         phba->ha_copy &= ~HA_ERATT;
5611                 else
5612                         /* Indicate interrupt handler handles ERATT */
5613                         phba->hba_flag |= HBA_ERATT_HANDLED;
5614         }
5615
5616         /* Clear attention sources except link and error attentions */
5617         writel((phba->ha_copy & ~(HA_LATT | HA_ERATT)), phba->HAregaddr);
5618         readl(phba->HAregaddr); /* flush */
5619         spin_unlock(&phba->hbalock);
5620
5621         /*
5622          * Invokes slow-path host attention interrupt handling as appropriate.
5623          */
5624
5625         /* status of events with mailbox and link attention */
5626         status1 = phba->ha_copy & (HA_MBATT | HA_LATT | HA_ERATT);
5627
5628         /* status of events with ELS ring */
5629         status2 = (phba->ha_copy & (HA_RXMASK  << (4*LPFC_ELS_RING)));
5630         status2 >>= (4*LPFC_ELS_RING);
5631
5632         if (status1 || (status2 & HA_RXMASK))
5633                 sp_irq_rc = lpfc_sp_intr_handler(irq, dev_id);
5634         else
5635                 sp_irq_rc = IRQ_NONE;
5636
5637         /*
5638          * Invoke fast-path host attention interrupt handling as appropriate.
5639          */
5640
5641         /* status of events with FCP ring */
5642         status1 = (phba->ha_copy & (HA_RXMASK << (4*LPFC_FCP_RING)));
5643         status1 >>= (4*LPFC_FCP_RING);
5644
5645         /* status of events with extra ring */
5646         if (phba->cfg_multi_ring_support == 2) {
5647                 status2 = (phba->ha_copy & (HA_RXMASK << (4*LPFC_EXTRA_RING)));
5648                 status2 >>= (4*LPFC_EXTRA_RING);
5649         } else
5650                 status2 = 0;
5651
5652         if ((status1 & HA_RXMASK) || (status2 & HA_RXMASK))
5653                 fp_irq_rc = lpfc_fp_intr_handler(irq, dev_id);
5654         else
5655                 fp_irq_rc = IRQ_NONE;
5656
5657         /* Return device-level interrupt handling status */
5658         return (sp_irq_rc == IRQ_HANDLED) ? sp_irq_rc : fp_irq_rc;
5659 }  /* lpfc_intr_handler */