1 /*******************************************************************
2 * This file is part of the Emulex Linux Device Driver for *
3 * Fibre Channel Host Bus Adapters. *
4 * Copyright (C) 2004-2009 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 #include <scsi/fc/fc_fs.h>
33
34 #include "lpfc_hw4.h"
35 #include "lpfc_hw.h"
36 #include "lpfc_sli.h"
37 #include "lpfc_sli4.h"
38 #include "lpfc_nl.h"
39 #include "lpfc_disc.h"
40 #include "lpfc_scsi.h"
41 #include "lpfc.h"
42 #include "lpfc_crtn.h"
43 #include "lpfc_logmsg.h"
44 #include "lpfc_compat.h"
45 #include "lpfc_debugfs.h"
46 #include "lpfc_vport.h"
47
48 /* There are only four IOCB completion types. */
49 typedef enum _lpfc_iocb_type {
50 LPFC_UNKNOWN_IOCB,
51 LPFC_UNSOL_IOCB,
52 LPFC_SOL_IOCB,
53 LPFC_ABORT_IOCB
54 } lpfc_iocb_type;
55
56
57 /* Provide function prototypes local to this module. */
58 static int lpfc_sli_issue_mbox_s4(struct lpfc_hba *, LPFC_MBOXQ_t *,
59 uint32_t);
60 static int lpfc_sli4_read_rev(struct lpfc_hba *, LPFC_MBOXQ_t *,
61 uint8_t *, uint32_t *);
62
63 static IOCB_t *
64 lpfc_get_iocb_from_iocbq(struct lpfc_iocbq *iocbq)
65 {
66 return &iocbq->iocb;
67 }
68
69 /**
70 * lpfc_sli4_wq_put - Put a Work Queue Entry on an Work Queue
71 * @q: The Work Queue to operate on.
72 * @wqe: The work Queue Entry to put on the Work queue.
73 *
74 * This routine will copy the contents of @wqe to the next available entry on
75 * the @q. This function will then ring the Work Queue Doorbell to signal the
76 * HBA to start processing the Work Queue Entry. This function returns 0 if
77 * successful. If no entries are available on @q then this function will return
78 * -ENOMEM.
79 * The caller is expected to hold the hbalock when calling this routine.
80 **/
81 static uint32_t
82 lpfc_sli4_wq_put(struct lpfc_queue *q, union lpfc_wqe *wqe)
83 {
84 union lpfc_wqe *temp_wqe = q->qe[q->host_index].wqe;
85 struct lpfc_register doorbell;
86 uint32_t host_index;
87
88 /* If the host has not yet processed the next entry then we are done */
89 if (((q->host_index + 1) % q->entry_count) == q->hba_index)
90 return -ENOMEM;
91 /* set consumption flag every once in a while */
92 if (!((q->host_index + 1) % LPFC_RELEASE_NOTIFICATION_INTERVAL))
93 bf_set(lpfc_wqe_gen_wqec, &wqe->generic, 1);
94
95 lpfc_sli_pcimem_bcopy(wqe, temp_wqe, q->entry_size);
96
97 /* Update the host index before invoking device */
98 host_index = q->host_index;
99 q->host_index = ((q->host_index + 1) % q->entry_count);
100
101 /* Ring Doorbell */
102 doorbell.word0 = 0;
103 bf_set(lpfc_wq_doorbell_num_posted, &doorbell, 1);
104 bf_set(lpfc_wq_doorbell_index, &doorbell, host_index);
105 bf_set(lpfc_wq_doorbell_id, &doorbell, q->queue_id);
106 writel(doorbell.word0, q->phba->sli4_hba.WQDBregaddr);
107 readl(q->phba->sli4_hba.WQDBregaddr); /* Flush */
108
109 return 0;
110 }
111
112 /**
113 * lpfc_sli4_wq_release - Updates internal hba index for WQ
114 * @q: The Work Queue to operate on.
115 * @index: The index to advance the hba index to.
116 *
117 * This routine will update the HBA index of a queue to reflect consumption of
118 * Work Queue Entries by the HBA. When the HBA indicates that it has consumed
119 * an entry the host calls this function to update the queue's internal
120 * pointers. This routine returns the number of entries that were consumed by
121 * the HBA.
122 **/
123 static uint32_t
124 lpfc_sli4_wq_release(struct lpfc_queue *q, uint32_t index)
125 {
126 uint32_t released = 0;
127
128 if (q->hba_index == index)
129 return 0;
130 do {
131 q->hba_index = ((q->hba_index + 1) % q->entry_count);
132 released++;
133 } while (q->hba_index != index);
134 return released;
135 }
136
137 /**
138 * lpfc_sli4_mq_put - Put a Mailbox Queue Entry on an Mailbox Queue
139 * @q: The Mailbox Queue to operate on.
140 * @wqe: The Mailbox Queue Entry to put on the Work queue.
141 *
142 * This routine will copy the contents of @mqe to the next available entry on
143 * the @q. This function will then ring the Work Queue Doorbell to signal the
144 * HBA to start processing the Work Queue Entry. This function returns 0 if
145 * successful. If no entries are available on @q then this function will return
146 * -ENOMEM.
147 * The caller is expected to hold the hbalock when calling this routine.
148 **/
149 static uint32_t
150 lpfc_sli4_mq_put(struct lpfc_queue *q, struct lpfc_mqe *mqe)
151 {
152 struct lpfc_mqe *temp_mqe = q->qe[q->host_index].mqe;
153 struct lpfc_register doorbell;
154 uint32_t host_index;
155
156 /* If the host has not yet processed the next entry then we are done */
157 if (((q->host_index + 1) % q->entry_count) == q->hba_index)
158 return -ENOMEM;
159 lpfc_sli_pcimem_bcopy(mqe, temp_mqe, q->entry_size);
160 /* Save off the mailbox pointer for completion */
161 q->phba->mbox = (MAILBOX_t *)temp_mqe;
162
163 /* Update the host index before invoking device */
164 host_index = q->host_index;
165 q->host_index = ((q->host_index + 1) % q->entry_count);
166
167 /* Ring Doorbell */
168 doorbell.word0 = 0;
169 bf_set(lpfc_mq_doorbell_num_posted, &doorbell, 1);
170 bf_set(lpfc_mq_doorbell_id, &doorbell, q->queue_id);
171 writel(doorbell.word0, q->phba->sli4_hba.MQDBregaddr);
172 readl(q->phba->sli4_hba.MQDBregaddr); /* Flush */
173 return 0;
174 }
175
176 /**
177 * lpfc_sli4_mq_release - Updates internal hba index for MQ
178 * @q: The Mailbox Queue to operate on.
179 *
180 * This routine will update the HBA index of a queue to reflect consumption of
181 * a Mailbox Queue Entry by the HBA. When the HBA indicates that it has consumed
182 * an entry the host calls this function to update the queue's internal
183 * pointers. This routine returns the number of entries that were consumed by
184 * the HBA.
185 **/
186 static uint32_t
187 lpfc_sli4_mq_release(struct lpfc_queue *q)
188 {
189 /* Clear the mailbox pointer for completion */
190 q->phba->mbox = NULL;
191 q->hba_index = ((q->hba_index + 1) % q->entry_count);
192 return 1;
193 }
194
195 /**
196 * lpfc_sli4_eq_get - Gets the next valid EQE from a EQ
197 * @q: The Event Queue to get the first valid EQE from
198 *
199 * This routine will get the first valid Event Queue Entry from @q, update
200 * the queue's internal hba index, and return the EQE. If no valid EQEs are in
201 * the Queue (no more work to do), or the Queue is full of EQEs that have been
202 * processed, but not popped back to the HBA then this routine will return NULL.
203 **/
204 static struct lpfc_eqe *
205 lpfc_sli4_eq_get(struct lpfc_queue *q)
206 {
207 struct lpfc_eqe *eqe = q->qe[q->hba_index].eqe;
208
209 /* If the next EQE is not valid then we are done */
210 if (!bf_get(lpfc_eqe_valid, eqe))
211 return NULL;
212 /* If the host has not yet processed the next entry then we are done */
213 if (((q->hba_index + 1) % q->entry_count) == q->host_index)
214 return NULL;
215
216 q->hba_index = ((q->hba_index + 1) % q->entry_count);
217 return eqe;
218 }
219
220 /**
221 * lpfc_sli4_eq_release - Indicates the host has finished processing an EQ
222 * @q: The Event Queue that the host has completed processing for.
223 * @arm: Indicates whether the host wants to arms this CQ.
224 *
225 * This routine will mark all Event Queue Entries on @q, from the last
226 * known completed entry to the last entry that was processed, as completed
227 * by clearing the valid bit for each completion queue entry. Then it will
228 * notify the HBA, by ringing the doorbell, that the EQEs have been processed.
229 * The internal host index in the @q will be updated by this routine to indicate
230 * that the host has finished processing the entries. The @arm parameter
231 * indicates that the queue should be rearmed when ringing the doorbell.
232 *
233 * This function will return the number of EQEs that were popped.
234 **/
235 uint32_t
236 lpfc_sli4_eq_release(struct lpfc_queue *q, bool arm)
237 {
238 uint32_t released = 0;
239 struct lpfc_eqe *temp_eqe;
240 struct lpfc_register doorbell;
241
242 /* while there are valid entries */
243 while (q->hba_index != q->host_index) {
244 temp_eqe = q->qe[q->host_index].eqe;
245 bf_set(lpfc_eqe_valid, temp_eqe, 0);
246 released++;
247 q->host_index = ((q->host_index + 1) % q->entry_count);
248 }
249 if (unlikely(released == 0 && !arm))
250 return 0;
251
252 /* ring doorbell for number popped */
253 doorbell.word0 = 0;
254 if (arm) {
255 bf_set(lpfc_eqcq_doorbell_arm, &doorbell, 1);
256 bf_set(lpfc_eqcq_doorbell_eqci, &doorbell, 1);
257 }
258 bf_set(lpfc_eqcq_doorbell_num_released, &doorbell, released);
259 bf_set(lpfc_eqcq_doorbell_qt, &doorbell, LPFC_QUEUE_TYPE_EVENT);
260 bf_set(lpfc_eqcq_doorbell_eqid, &doorbell, q->queue_id);
261 writel(doorbell.word0, q->phba->sli4_hba.EQCQDBregaddr);
262 return released;
263 }
264
265 /**
266 * lpfc_sli4_cq_get - Gets the next valid CQE from a CQ
267 * @q: The Completion Queue to get the first valid CQE from
268 *
269 * This routine will get the first valid Completion Queue Entry from @q, update
270 * the queue's internal hba index, and return the CQE. If no valid CQEs are in
271 * the Queue (no more work to do), or the Queue is full of CQEs that have been
272 * processed, but not popped back to the HBA then this routine will return NULL.
273 **/
274 static struct lpfc_cqe *
275 lpfc_sli4_cq_get(struct lpfc_queue *q)
276 {
277 struct lpfc_cqe *cqe;
278
279 /* If the next CQE is not valid then we are done */
280 if (!bf_get(lpfc_cqe_valid, q->qe[q->hba_index].cqe))
281 return NULL;
282 /* If the host has not yet processed the next entry then we are done */
283 if (((q->hba_index + 1) % q->entry_count) == q->host_index)
284 return NULL;
285
286 cqe = q->qe[q->hba_index].cqe;
287 q->hba_index = ((q->hba_index + 1) % q->entry_count);
288 return cqe;
289 }
290
291 /**
292 * lpfc_sli4_cq_release - Indicates the host has finished processing a CQ
293 * @q: The Completion Queue that the host has completed processing for.
294 * @arm: Indicates whether the host wants to arms this CQ.
295 *
296 * This routine will mark all Completion queue entries on @q, from the last
297 * known completed entry to the last entry that was processed, as completed
298 * by clearing the valid bit for each completion queue entry. Then it will
299 * notify the HBA, by ringing the doorbell, that the CQEs have been processed.
300 * The internal host index in the @q will be updated by this routine to indicate
301 * that the host has finished processing the entries. The @arm parameter
302 * indicates that the queue should be rearmed when ringing the doorbell.
303 *
304 * This function will return the number of CQEs that were released.
305 **/
306 uint32_t
307 lpfc_sli4_cq_release(struct lpfc_queue *q, bool arm)
308 {
309 uint32_t released = 0;
310 struct lpfc_cqe *temp_qe;
311 struct lpfc_register doorbell;
312
313 /* while there are valid entries */
314 while (q->hba_index != q->host_index) {
315 temp_qe = q->qe[q->host_index].cqe;
316 bf_set(lpfc_cqe_valid, temp_qe, 0);
317 released++;
318 q->host_index = ((q->host_index + 1) % q->entry_count);
319 }
320 if (unlikely(released == 0 && !arm))
321 return 0;
322
323 /* ring doorbell for number popped */
324 doorbell.word0 = 0;
325 if (arm)
326 bf_set(lpfc_eqcq_doorbell_arm, &doorbell, 1);
327 bf_set(lpfc_eqcq_doorbell_num_released, &doorbell, released);
328 bf_set(lpfc_eqcq_doorbell_qt, &doorbell, LPFC_QUEUE_TYPE_COMPLETION);
329 bf_set(lpfc_eqcq_doorbell_cqid, &doorbell, q->queue_id);
330 writel(doorbell.word0, q->phba->sli4_hba.EQCQDBregaddr);
331 return released;
332 }
333
334 /**
335 * lpfc_sli4_rq_put - Put a Receive Buffer Queue Entry on a Receive Queue
336 * @q: The Header Receive Queue to operate on.
337 * @wqe: The Receive Queue Entry to put on the Receive queue.
338 *
339 * This routine will copy the contents of @wqe to the next available entry on
340 * the @q. This function will then ring the Receive Queue Doorbell to signal the
341 * HBA to start processing the Receive Queue Entry. This function returns the
342 * index that the rqe was copied to if successful. If no entries are available
343 * on @q then this function will return -ENOMEM.
344 * The caller is expected to hold the hbalock when calling this routine.
345 **/
346 static int
347 lpfc_sli4_rq_put(struct lpfc_queue *hq, struct lpfc_queue *dq,
348 struct lpfc_rqe *hrqe, struct lpfc_rqe *drqe)
349 {
350 struct lpfc_rqe *temp_hrqe = hq->qe[hq->host_index].rqe;
351 struct lpfc_rqe *temp_drqe = dq->qe[dq->host_index].rqe;
352 struct lpfc_register doorbell;
353 int put_index = hq->host_index;
354
355 if (hq->type != LPFC_HRQ || dq->type != LPFC_DRQ)
356 return -EINVAL;
357 if (hq->host_index != dq->host_index)
358 return -EINVAL;
359 /* If the host has not yet processed the next entry then we are done */
360 if (((hq->host_index + 1) % hq->entry_count) == hq->hba_index)
361 return -EBUSY;
362 lpfc_sli_pcimem_bcopy(hrqe, temp_hrqe, hq->entry_size);
363 lpfc_sli_pcimem_bcopy(drqe, temp_drqe, dq->entry_size);
364
365 /* Update the host index to point to the next slot */
366 hq->host_index = ((hq->host_index + 1) % hq->entry_count);
367 dq->host_index = ((dq->host_index + 1) % dq->entry_count);
368
369 /* Ring The Header Receive Queue Doorbell */
370 if (!(hq->host_index % LPFC_RQ_POST_BATCH)) {
371 doorbell.word0 = 0;
372 bf_set(lpfc_rq_doorbell_num_posted, &doorbell,
373 LPFC_RQ_POST_BATCH);
374 bf_set(lpfc_rq_doorbell_id, &doorbell, hq->queue_id);
375 writel(doorbell.word0, hq->phba->sli4_hba.RQDBregaddr);
376 }
377 return put_index;
378 }
379
380 /**
381 * lpfc_sli4_rq_release - Updates internal hba index for RQ
382 * @q: The Header Receive Queue to operate on.
383 *
384 * This routine will update the HBA index of a queue to reflect consumption of
385 * one Receive Queue Entry by the HBA. When the HBA indicates that it has
386 * consumed an entry the host calls this function to update the queue's
387 * internal pointers. This routine returns the number of entries that were
388 * consumed by the HBA.
389 **/
390 static uint32_t
391 lpfc_sli4_rq_release(struct lpfc_queue *hq, struct lpfc_queue *dq)
392 {
393 if ((hq->type != LPFC_HRQ) || (dq->type != LPFC_DRQ))
394 return 0;
395 hq->hba_index = ((hq->hba_index + 1) % hq->entry_count);
396 dq->hba_index = ((dq->hba_index + 1) % dq->entry_count);
397 return 1;
398 }
399
400 /**
401 * lpfc_cmd_iocb - Get next command iocb entry in the ring
402 * @phba: Pointer to HBA context object.
403 * @pring: Pointer to driver SLI ring object.
404 *
405 * This function returns pointer to next command iocb entry
406 * in the command ring. The caller must hold hbalock to prevent
407 * other threads consume the next command iocb.
408 * SLI-2/SLI-3 provide different sized iocbs.
409 **/
410 static inline IOCB_t *
411 lpfc_cmd_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
412 {
413 return (IOCB_t *) (((char *) pring->cmdringaddr) +
414 pring->cmdidx * phba->iocb_cmd_size);
415 }
416
417 /**
418 * lpfc_resp_iocb - Get next response iocb entry in the ring
419 * @phba: Pointer to HBA context object.
420 * @pring: Pointer to driver SLI ring object.
421 *
422 * This function returns pointer to next response iocb entry
423 * in the response ring. The caller must hold hbalock to make sure
424 * that no other thread consume the next response iocb.
425 * SLI-2/SLI-3 provide different sized iocbs.
426 **/
427 static inline IOCB_t *
428 lpfc_resp_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
429 {
430 return (IOCB_t *) (((char *) pring->rspringaddr) +
431 pring->rspidx * phba->iocb_rsp_size);
432 }
433
434 /**
435 * __lpfc_sli_get_iocbq - Allocates an iocb object from iocb pool
436 * @phba: Pointer to HBA context object.
437 *
438 * This function is called with hbalock held. This function
439 * allocates a new driver iocb object from the iocb pool. If the
440 * allocation is successful, it returns pointer to the newly
441 * allocated iocb object else it returns NULL.
442 **/
443 static struct lpfc_iocbq *
444 __lpfc_sli_get_iocbq(struct lpfc_hba *phba)
445 {
446 struct list_head *lpfc_iocb_list = &phba->lpfc_iocb_list;
447 struct lpfc_iocbq * iocbq = NULL;
448
449 list_remove_head(lpfc_iocb_list, iocbq, struct lpfc_iocbq, list);
450 return iocbq;
451 }
452
453 /**
454 * __lpfc_clear_active_sglq - Remove the active sglq for this XRI.
455 * @phba: Pointer to HBA context object.
456 * @xritag: XRI value.
457 *
458 * This function clears the sglq pointer from the array of acive
459 * sglq's. The xritag that is passed in is used to index into the
460 * array. Before the xritag can be used it needs to be adjusted
461 * by subtracting the xribase.
462 *
463 * Returns sglq ponter = success, NULL = Failure.
464 **/
465 static struct lpfc_sglq *
466 __lpfc_clear_active_sglq(struct lpfc_hba *phba, uint16_t xritag)
467 {
468 uint16_t adj_xri;
469 struct lpfc_sglq *sglq;
470 adj_xri = xritag - phba->sli4_hba.max_cfg_param.xri_base;
471 if (adj_xri > phba->sli4_hba.max_cfg_param.max_xri)
472 return NULL;
473 sglq = phba->sli4_hba.lpfc_sglq_active_list[adj_xri];
474 phba->sli4_hba.lpfc_sglq_active_list[adj_xri] = NULL;
475 return sglq;
476 }
477
478 /**
479 * __lpfc_get_active_sglq - Get the active sglq for this XRI.
480 * @phba: Pointer to HBA context object.
481 * @xritag: XRI value.
482 *
483 * This function returns the sglq pointer from the array of acive
484 * sglq's. The xritag that is passed in is used to index into the
485 * array. Before the xritag can be used it needs to be adjusted
486 * by subtracting the xribase.
487 *
488 * Returns sglq ponter = success, NULL = Failure.
489 **/
490 static struct lpfc_sglq *
491 __lpfc_get_active_sglq(struct lpfc_hba *phba, uint16_t xritag)
492 {
493 uint16_t adj_xri;
494 struct lpfc_sglq *sglq;
495 adj_xri = xritag - phba->sli4_hba.max_cfg_param.xri_base;
496 if (adj_xri > phba->sli4_hba.max_cfg_param.max_xri)
497 return NULL;
498 sglq = phba->sli4_hba.lpfc_sglq_active_list[adj_xri];
499 return sglq;
500 }
501
502 /**
503 * __lpfc_sli_get_sglq - Allocates an iocb object from sgl pool
504 * @phba: Pointer to HBA context object.
505 *
506 * This function is called with hbalock held. This function
507 * Gets a new driver sglq object from the sglq list. If the
508 * list is not empty then it is successful, it returns pointer to the newly
509 * allocated sglq object else it returns NULL.
510 **/
511 static struct lpfc_sglq *
512 __lpfc_sli_get_sglq(struct lpfc_hba *phba)
513 {
514 struct list_head *lpfc_sgl_list = &phba->sli4_hba.lpfc_sgl_list;
515 struct lpfc_sglq *sglq = NULL;
516 uint16_t adj_xri;
517 list_remove_head(lpfc_sgl_list, sglq, struct lpfc_sglq, list);
518 adj_xri = sglq->sli4_xritag - phba->sli4_hba.max_cfg_param.xri_base;
519 phba->sli4_hba.lpfc_sglq_active_list[adj_xri] = sglq;
520 return sglq;
521 }
522
523 /**
524 * lpfc_sli_get_iocbq - Allocates an iocb object from iocb pool
525 * @phba: Pointer to HBA context object.
526 *
527 * This function is called with no lock held. This function
528 * allocates a new driver iocb object from the iocb pool. If the
529 * allocation is successful, it returns pointer to the newly
530 * allocated iocb object else it returns NULL.
531 **/
532 struct lpfc_iocbq *
533 lpfc_sli_get_iocbq(struct lpfc_hba *phba)
534 {
535 struct lpfc_iocbq * iocbq = NULL;
536 unsigned long iflags;
537
538 spin_lock_irqsave(&phba->hbalock, iflags);
539 iocbq = __lpfc_sli_get_iocbq(phba);
540 spin_unlock_irqrestore(&phba->hbalock, iflags);
541 return iocbq;
542 }
543
544 /**
545 * __lpfc_sli_release_iocbq_s4 - Release iocb to the iocb pool
546 * @phba: Pointer to HBA context object.
547 * @iocbq: Pointer to driver iocb object.
548 *
549 * This function is called with hbalock held to release driver
550 * iocb object to the iocb pool. The iotag in the iocb object
551 * does not change for each use of the iocb object. This function
552 * clears all other fields of the iocb object when it is freed.
553 * The sqlq structure that holds the xritag and phys and virtual
554 * mappings for the scatter gather list is retrieved from the
555 * active array of sglq. The get of the sglq pointer also clears
556 * the entry in the array. If the status of the IO indiactes that
557 * this IO was aborted then the sglq entry it put on the
558 * lpfc_abts_els_sgl_list until the CQ_ABORTED_XRI is received. If the
559 * IO has good status or fails for any other reason then the sglq
560 * entry is added to the free list (lpfc_sgl_list).
561 **/
562 static void
563 __lpfc_sli_release_iocbq_s4(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
564 {
565 struct lpfc_sglq *sglq;
566 size_t start_clean = offsetof(struct lpfc_iocbq, iocb);
567 unsigned long iflag;
568
569 if (iocbq->sli4_xritag == NO_XRI)
570 sglq = NULL;
571 else
572 sglq = __lpfc_clear_active_sglq(phba, iocbq->sli4_xritag);
573 if (sglq) {
574 if (iocbq->iocb_flag & LPFC_DRIVER_ABORTED
575 || ((iocbq->iocb.ulpStatus == IOSTAT_LOCAL_REJECT)
576 && (iocbq->iocb.un.ulpWord[4]
577 == IOERR_SLI_ABORTED))) {
578 spin_lock_irqsave(&phba->sli4_hba.abts_sgl_list_lock,
579 iflag);
580 list_add(&sglq->list,
581 &phba->sli4_hba.lpfc_abts_els_sgl_list);
582 spin_unlock_irqrestore(
583 &phba->sli4_hba.abts_sgl_list_lock, iflag);
584 } else
585 list_add(&sglq->list, &phba->sli4_hba.lpfc_sgl_list);
586 }
587
588
589 /*
590 * Clean all volatile data fields, preserve iotag and node struct.
591 */
592 memset((char *)iocbq + start_clean, 0, sizeof(*iocbq) - start_clean);
593 iocbq->sli4_xritag = NO_XRI;
594 list_add_tail(&iocbq->list, &phba->lpfc_iocb_list);
595 }
596
597 /**
598 * __lpfc_sli_release_iocbq_s3 - Release iocb to the iocb pool
599 * @phba: Pointer to HBA context object.
600 * @iocbq: Pointer to driver iocb object.
601 *
602 * This function is called with hbalock held to release driver
603 * iocb object to the iocb pool. The iotag in the iocb object
604 * does not change for each use of the iocb object. This function
605 * clears all other fields of the iocb object when it is freed.
606 **/
607 static void
608 __lpfc_sli_release_iocbq_s3(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
609 {
610 size_t start_clean = offsetof(struct lpfc_iocbq, iocb);
611
612 /*
613 * Clean all volatile data fields, preserve iotag and node struct.
614 */
615 memset((char*)iocbq + start_clean, 0, sizeof(*iocbq) - start_clean);
616 iocbq->sli4_xritag = NO_XRI;
617 list_add_tail(&iocbq->list, &phba->lpfc_iocb_list);
618 }
619
620 /**
621 * __lpfc_sli_release_iocbq - Release iocb to the iocb pool
622 * @phba: Pointer to HBA context object.
623 * @iocbq: Pointer to driver iocb object.
624 *
625 * This function is called with hbalock held to release driver
626 * iocb object to the iocb pool. The iotag in the iocb object
627 * does not change for each use of the iocb object. This function
628 * clears all other fields of the iocb object when it is freed.
629 **/
630 static void
631 __lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
632 {
633 phba->__lpfc_sli_release_iocbq(phba, iocbq);
634 }
635
636 /**
637 * lpfc_sli_release_iocbq - Release iocb to the iocb pool
638 * @phba: Pointer to HBA context object.
639 * @iocbq: Pointer to driver iocb object.
640 *
641 * This function is called with no lock held to release the iocb to
642 * iocb pool.
643 **/
644 void
645 lpfc_sli_release_iocbq(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
646 {
647 unsigned long iflags;
648
649 /*
650 * Clean all volatile data fields, preserve iotag and node struct.
651 */
652 spin_lock_irqsave(&phba->hbalock, iflags);
653 __lpfc_sli_release_iocbq(phba, iocbq);
654 spin_unlock_irqrestore(&phba->hbalock, iflags);
655 }
656
657 /**
658 * lpfc_sli_cancel_iocbs - Cancel all iocbs from a list.
659 * @phba: Pointer to HBA context object.
660 * @iocblist: List of IOCBs.
661 * @ulpstatus: ULP status in IOCB command field.
662 * @ulpWord4: ULP word-4 in IOCB command field.
663 *
664 * This function is called with a list of IOCBs to cancel. It cancels the IOCB
665 * on the list by invoking the complete callback function associated with the
666 * IOCB with the provided @ulpstatus and @ulpword4 set to the IOCB commond
667 * fields.
668 **/
669 void
670 lpfc_sli_cancel_iocbs(struct lpfc_hba *phba, struct list_head *iocblist,
671 uint32_t ulpstatus, uint32_t ulpWord4)
672 {
673 struct lpfc_iocbq *piocb;
674
675 while (!list_empty(iocblist)) {
676 list_remove_head(iocblist, piocb, struct lpfc_iocbq, list);
677
678 if (!piocb->iocb_cmpl)
679 lpfc_sli_release_iocbq(phba, piocb);
680 else {
681 piocb->iocb.ulpStatus = ulpstatus;
682 piocb->iocb.un.ulpWord[4] = ulpWord4;
683 (piocb->iocb_cmpl) (phba, piocb, piocb);
684 }
685 }
686 return;
687 }
688
689 /**
690 * lpfc_sli_iocb_cmd_type - Get the iocb type
691 * @iocb_cmnd: iocb command code.
692 *
693 * This function is called by ring event handler function to get the iocb type.
694 * This function translates the iocb command to an iocb command type used to
695 * decide the final disposition of each completed IOCB.
696 * The function returns
697 * LPFC_UNKNOWN_IOCB if it is an unsupported iocb
698 * LPFC_SOL_IOCB if it is a solicited iocb completion
699 * LPFC_ABORT_IOCB if it is an abort iocb
700 * LPFC_UNSOL_IOCB if it is an unsolicited iocb
701 *
702 * The caller is not required to hold any lock.
703 **/
704 static lpfc_iocb_type
705 lpfc_sli_iocb_cmd_type(uint8_t iocb_cmnd)
706 {
707 lpfc_iocb_type type = LPFC_UNKNOWN_IOCB;
708
709 if (iocb_cmnd > CMD_MAX_IOCB_CMD)
710 return 0;
711
712 switch (iocb_cmnd) {
713 case CMD_XMIT_SEQUENCE_CR:
714 case CMD_XMIT_SEQUENCE_CX:
715 case CMD_XMIT_BCAST_CN:
716 case CMD_XMIT_BCAST_CX:
717 case CMD_ELS_REQUEST_CR:
718 case CMD_ELS_REQUEST_CX:
719 case CMD_CREATE_XRI_CR:
720 case CMD_CREATE_XRI_CX:
721 case CMD_GET_RPI_CN:
722 case CMD_XMIT_ELS_RSP_CX:
723 case CMD_GET_RPI_CR:
724 case CMD_FCP_IWRITE_CR:
725 case CMD_FCP_IWRITE_CX:
726 case CMD_FCP_IREAD_CR:
727 case CMD_FCP_IREAD_CX:
728 case CMD_FCP_ICMND_CR:
729 case CMD_FCP_ICMND_CX:
730 case CMD_FCP_TSEND_CX:
731 case CMD_FCP_TRSP_CX:
732 case CMD_FCP_TRECEIVE_CX:
733 case CMD_FCP_AUTO_TRSP_CX:
734 case CMD_ADAPTER_MSG:
735 case CMD_ADAPTER_DUMP:
736 case CMD_XMIT_SEQUENCE64_CR:
737 case CMD_XMIT_SEQUENCE64_CX:
738 case CMD_XMIT_BCAST64_CN:
739 case CMD_XMIT_BCAST64_CX:
740 case CMD_ELS_REQUEST64_CR:
741 case CMD_ELS_REQUEST64_CX:
742 case CMD_FCP_IWRITE64_CR:
743 case CMD_FCP_IWRITE64_CX:
744 case CMD_FCP_IREAD64_CR:
745 case CMD_FCP_IREAD64_CX:
746 case CMD_FCP_ICMND64_CR:
747 case CMD_FCP_ICMND64_CX:
748 case CMD_FCP_TSEND64_CX:
749 case CMD_FCP_TRSP64_CX:
750 case CMD_FCP_TRECEIVE64_CX:
751 case CMD_GEN_REQUEST64_CR:
752 case CMD_GEN_REQUEST64_CX:
753 case CMD_XMIT_ELS_RSP64_CX:
754 case DSSCMD_IWRITE64_CR:
755 case DSSCMD_IWRITE64_CX:
756 case DSSCMD_IREAD64_CR:
757 case DSSCMD_IREAD64_CX:
758 case DSSCMD_INVALIDATE_DEK:
759 case DSSCMD_SET_KEK:
760 case DSSCMD_GET_KEK_ID:
761 case DSSCMD_GEN_XFER:
762 type = LPFC_SOL_IOCB;
763 break;
764 case CMD_ABORT_XRI_CN:
765 case CMD_ABORT_XRI_CX:
766 case CMD_CLOSE_XRI_CN:
767 case CMD_CLOSE_XRI_CX:
768 case CMD_XRI_ABORTED_CX:
769 case CMD_ABORT_MXRI64_CN:
770 type = LPFC_ABORT_IOCB;
771 break;
772 case CMD_RCV_SEQUENCE_CX:
773 case CMD_RCV_ELS_REQ_CX:
774 case CMD_RCV_SEQUENCE64_CX:
775 case CMD_RCV_ELS_REQ64_CX:
776 case CMD_ASYNC_STATUS:
777 case CMD_IOCB_RCV_SEQ64_CX:
778 case CMD_IOCB_RCV_ELS64_CX:
779 case CMD_IOCB_RCV_CONT64_CX:
780 case CMD_IOCB_RET_XRI64_CX:
781 type = LPFC_UNSOL_IOCB;
782 break;
783 case CMD_IOCB_XMIT_MSEQ64_CR:
784 case CMD_IOCB_XMIT_MSEQ64_CX:
785 case CMD_IOCB_RCV_SEQ_LIST64_CX:
786 case CMD_IOCB_RCV_ELS_LIST64_CX:
787 case CMD_IOCB_CLOSE_EXTENDED_CN:
788 case CMD_IOCB_ABORT_EXTENDED_CN:
789 case CMD_IOCB_RET_HBQE64_CN:
790 case CMD_IOCB_FCP_IBIDIR64_CR:
791 case CMD_IOCB_FCP_IBIDIR64_CX:
792 case CMD_IOCB_FCP_ITASKMGT64_CX:
793 case CMD_IOCB_LOGENTRY_CN:
794 case CMD_IOCB_LOGENTRY_ASYNC_CN:
795 printk("%s - Unhandled SLI-3 Command x%x\n",
796 __func__, iocb_cmnd);
797 type = LPFC_UNKNOWN_IOCB;
798 break;
799 default:
800 type = LPFC_UNKNOWN_IOCB;
801 break;
802 }
803
804 return type;
805 }
806
807 /**
808 * lpfc_sli_ring_map - Issue config_ring mbox for all rings
809 * @phba: Pointer to HBA context object.
810 *
811 * This function is called from SLI initialization code
812 * to configure every ring of the HBA's SLI interface. The
813 * caller is not required to hold any lock. This function issues
814 * a config_ring mailbox command for each ring.
815 * This function returns zero if successful else returns a negative
816 * error code.
817 **/
818 static int
819 lpfc_sli_ring_map(struct lpfc_hba *phba)
820 {
821 struct lpfc_sli *psli = &phba->sli;
822 LPFC_MBOXQ_t *pmb;
823 MAILBOX_t *pmbox;
824 int i, rc, ret = 0;
825
826 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
827 if (!pmb)
828 return -ENOMEM;
829 pmbox = &pmb->u.mb;
830 phba->link_state = LPFC_INIT_MBX_CMDS;
831 for (i = 0; i < psli->num_rings; i++) {
832 lpfc_config_ring(phba, i, pmb);
833 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_POLL);
834 if (rc != MBX_SUCCESS) {
835 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
836 "0446 Adapter failed to init (%d), "
837 "mbxCmd x%x CFG_RING, mbxStatus x%x, "
838 "ring %d\n",
839 rc, pmbox->mbxCommand,
840 pmbox->mbxStatus, i);
841 phba->link_state = LPFC_HBA_ERROR;
842 ret = -ENXIO;
843 break;
844 }
845 }
846 mempool_free(pmb, phba->mbox_mem_pool);
847 return ret;
848 }
849
850 /**
851 * lpfc_sli_ringtxcmpl_put - Adds new iocb to the txcmplq
852 * @phba: Pointer to HBA context object.
853 * @pring: Pointer to driver SLI ring object.
854 * @piocb: Pointer to the driver iocb object.
855 *
856 * This function is called with hbalock held. The function adds the
857 * new iocb to txcmplq of the given ring. This function always returns
858 * 0. If this function is called for ELS ring, this function checks if
859 * there is a vport associated with the ELS command. This function also
860 * starts els_tmofunc timer if this is an ELS command.
861 **/
862 static int
863 lpfc_sli_ringtxcmpl_put(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
864 struct lpfc_iocbq *piocb)
865 {
866 list_add_tail(&piocb->list, &pring->txcmplq);
867 pring->txcmplq_cnt++;
868 if ((unlikely(pring->ringno == LPFC_ELS_RING)) &&
869 (piocb->iocb.ulpCommand != CMD_ABORT_XRI_CN) &&
870 (piocb->iocb.ulpCommand != CMD_CLOSE_XRI_CN)) {
871 if (!piocb->vport)
872 BUG();
873 else
874 mod_timer(&piocb->vport->els_tmofunc,
875 jiffies + HZ * (phba->fc_ratov << 1));
876 }
877
878
879 return 0;
880 }
881
882 /**
883 * lpfc_sli_ringtx_get - Get first element of the txq
884 * @phba: Pointer to HBA context object.
885 * @pring: Pointer to driver SLI ring object.
886 *
887 * This function is called with hbalock held to get next
888 * iocb in txq of the given ring. If there is any iocb in
889 * the txq, the function returns first iocb in the list after
890 * removing the iocb from the list, else it returns NULL.
891 **/
892 static struct lpfc_iocbq *
893 lpfc_sli_ringtx_get(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
894 {
895 struct lpfc_iocbq *cmd_iocb;
896
897 list_remove_head((&pring->txq), cmd_iocb, struct lpfc_iocbq, list);
898 if (cmd_iocb != NULL)
899 pring->txq_cnt--;
900 return cmd_iocb;
901 }
902
903 /**
904 * lpfc_sli_next_iocb_slot - Get next iocb slot in the ring
905 * @phba: Pointer to HBA context object.
906 * @pring: Pointer to driver SLI ring object.
907 *
908 * This function is called with hbalock held and the caller must post the
909 * iocb without releasing the lock. If the caller releases the lock,
910 * iocb slot returned by the function is not guaranteed to be available.
911 * The function returns pointer to the next available iocb slot if there
912 * is available slot in the ring, else it returns NULL.
913 * If the get index of the ring is ahead of the put index, the function
914 * will post an error attention event to the worker thread to take the
915 * HBA to offline state.
916 **/
917 static IOCB_t *
918 lpfc_sli_next_iocb_slot (struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
919 {
920 struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
921 uint32_t max_cmd_idx = pring->numCiocb;
922 if ((pring->next_cmdidx == pring->cmdidx) &&
923 (++pring->next_cmdidx >= max_cmd_idx))
924 pring->next_cmdidx = 0;
925
926 if (unlikely(pring->local_getidx == pring->next_cmdidx)) {
927
928 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
929
930 if (unlikely(pring->local_getidx >= max_cmd_idx)) {
931 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
932 "0315 Ring %d issue: portCmdGet %d "
933 "is bigger than cmd ring %d\n",
934 pring->ringno,
935 pring->local_getidx, max_cmd_idx);
936
937 phba->link_state = LPFC_HBA_ERROR;
938 /*
939 * All error attention handlers are posted to
940 * worker thread
941 */
942 phba->work_ha |= HA_ERATT;
943 phba->work_hs = HS_FFER3;
944
945 lpfc_worker_wake_up(phba);
946
947 return NULL;
948 }
949
950 if (pring->local_getidx == pring->next_cmdidx)
951 return NULL;
952 }
953
954 return lpfc_cmd_iocb(phba, pring);
955 }
956
957 /**
958 * lpfc_sli_next_iotag - Get an iotag for the iocb
959 * @phba: Pointer to HBA context object.
960 * @iocbq: Pointer to driver iocb object.
961 *
962 * This function gets an iotag for the iocb. If there is no unused iotag and
963 * the iocbq_lookup_len < 0xffff, this function allocates a bigger iotag_lookup
964 * array and assigns a new iotag.
965 * The function returns the allocated iotag if successful, else returns zero.
966 * Zero is not a valid iotag.
967 * The caller is not required to hold any lock.
968 **/
969 uint16_t
970 lpfc_sli_next_iotag(struct lpfc_hba *phba, struct lpfc_iocbq *iocbq)
971 {
972 struct lpfc_iocbq **new_arr;
973 struct lpfc_iocbq **old_arr;
974 size_t new_len;
975 struct lpfc_sli *psli = &phba->sli;
976 uint16_t iotag;
977
978 spin_lock_irq(&phba->hbalock);
979 iotag = psli->last_iotag;
980 if(++iotag < psli->iocbq_lookup_len) {
981 psli->last_iotag = iotag;
982 psli->iocbq_lookup[iotag] = iocbq;
983 spin_unlock_irq(&phba->hbalock);
984 iocbq->iotag = iotag;
985 return iotag;
986 } else if (psli->iocbq_lookup_len < (0xffff
987 - LPFC_IOCBQ_LOOKUP_INCREMENT)) {
988 new_len = psli->iocbq_lookup_len + LPFC_IOCBQ_LOOKUP_INCREMENT;
989 spin_unlock_irq(&phba->hbalock);
990 new_arr = kzalloc(new_len * sizeof (struct lpfc_iocbq *),
991 GFP_KERNEL);
992 if (new_arr) {
993 spin_lock_irq(&phba->hbalock);
994 old_arr = psli->iocbq_lookup;
995 if (new_len <= psli->iocbq_lookup_len) {
996 /* highly unprobable case */
997 kfree(new_arr);
998 iotag = psli->last_iotag;
999 if(++iotag < psli->iocbq_lookup_len) {
1000 psli->last_iotag = iotag;
1001 psli->iocbq_lookup[iotag] = iocbq;
1002 spin_unlock_irq(&phba->hbalock);
1003 iocbq->iotag = iotag;
1004 return iotag;
1005 }
1006 spin_unlock_irq(&phba->hbalock);
1007 return 0;
1008 }
1009 if (psli->iocbq_lookup)
1010 memcpy(new_arr, old_arr,
1011 ((psli->last_iotag + 1) *
1012 sizeof (struct lpfc_iocbq *)));
1013 psli->iocbq_lookup = new_arr;
1014 psli->iocbq_lookup_len = new_len;
1015 psli->last_iotag = iotag;
1016 psli->iocbq_lookup[iotag] = iocbq;
1017 spin_unlock_irq(&phba->hbalock);
1018 iocbq->iotag = iotag;
1019 kfree(old_arr);
1020 return iotag;
1021 }
1022 } else
1023 spin_unlock_irq(&phba->hbalock);
1024
1025 lpfc_printf_log(phba, KERN_ERR,LOG_SLI,
1026 "0318 Failed to allocate IOTAG.last IOTAG is %d\n",
1027 psli->last_iotag);
1028
1029 return 0;
1030 }
1031
1032 /**
1033 * lpfc_sli_submit_iocb - Submit an iocb to the firmware
1034 * @phba: Pointer to HBA context object.
1035 * @pring: Pointer to driver SLI ring object.
1036 * @iocb: Pointer to iocb slot in the ring.
1037 * @nextiocb: Pointer to driver iocb object which need to be
1038 * posted to firmware.
1039 *
1040 * This function is called with hbalock held to post a new iocb to
1041 * the firmware. This function copies the new iocb to ring iocb slot and
1042 * updates the ring pointers. It adds the new iocb to txcmplq if there is
1043 * a completion call back for this iocb else the function will free the
1044 * iocb object.
1045 **/
1046 static void
1047 lpfc_sli_submit_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1048 IOCB_t *iocb, struct lpfc_iocbq *nextiocb)
1049 {
1050 /*
1051 * Set up an iotag
1052 */
1053 nextiocb->iocb.ulpIoTag = (nextiocb->iocb_cmpl) ? nextiocb->iotag : 0;
1054
1055
1056 if (pring->ringno == LPFC_ELS_RING) {
1057 lpfc_debugfs_slow_ring_trc(phba,
1058 "IOCB cmd ring: wd4:x%08x wd6:x%08x wd7:x%08x",
1059 *(((uint32_t *) &nextiocb->iocb) + 4),
1060 *(((uint32_t *) &nextiocb->iocb) + 6),
1061 *(((uint32_t *) &nextiocb->iocb) + 7));
1062 }
1063
1064 /*
1065 * Issue iocb command to adapter
1066 */
1067 lpfc_sli_pcimem_bcopy(&nextiocb->iocb, iocb, phba->iocb_cmd_size);
1068 wmb();
1069 pring->stats.iocb_cmd++;
1070
1071 /*
1072 * If there is no completion routine to call, we can release the
1073 * IOCB buffer back right now. For IOCBs, like QUE_RING_BUF,
1074 * that have no rsp ring completion, iocb_cmpl MUST be NULL.
1075 */
1076 if (nextiocb->iocb_cmpl)
1077 lpfc_sli_ringtxcmpl_put(phba, pring, nextiocb);
1078 else
1079 __lpfc_sli_release_iocbq(phba, nextiocb);
1080
1081 /*
1082 * Let the HBA know what IOCB slot will be the next one the
1083 * driver will put a command into.
1084 */
1085 pring->cmdidx = pring->next_cmdidx;
1086 writel(pring->cmdidx, &phba->host_gp[pring->ringno].cmdPutInx);
1087 }
1088
1089 /**
1090 * lpfc_sli_update_full_ring - Update the chip attention register
1091 * @phba: Pointer to HBA context object.
1092 * @pring: Pointer to driver SLI ring object.
1093 *
1094 * The caller is not required to hold any lock for calling this function.
1095 * This function updates the chip attention bits for the ring to inform firmware
1096 * that there are pending work to be done for this ring and requests an
1097 * interrupt when there is space available in the ring. This function is
1098 * called when the driver is unable to post more iocbs to the ring due
1099 * to unavailability of space in the ring.
1100 **/
1101 static void
1102 lpfc_sli_update_full_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1103 {
1104 int ringno = pring->ringno;
1105
1106 pring->flag |= LPFC_CALL_RING_AVAILABLE;
1107
1108 wmb();
1109
1110 /*
1111 * Set ring 'ringno' to SET R0CE_REQ in Chip Att register.
1112 * The HBA will tell us when an IOCB entry is available.
1113 */
1114 writel((CA_R0ATT|CA_R0CE_REQ) << (ringno*4), phba->CAregaddr);
1115 readl(phba->CAregaddr); /* flush */
1116
1117 pring->stats.iocb_cmd_full++;
1118 }
1119
1120 /**
1121 * lpfc_sli_update_ring - Update chip attention register
1122 * @phba: Pointer to HBA context object.
1123 * @pring: Pointer to driver SLI ring object.
1124 *
1125 * This function updates the chip attention register bit for the
1126 * given ring to inform HBA that there is more work to be done
1127 * in this ring. The caller is not required to hold any lock.
1128 **/
1129 static void
1130 lpfc_sli_update_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1131 {
1132 int ringno = pring->ringno;
1133
1134 /*
1135 * Tell the HBA that there is work to do in this ring.
1136 */
1137 if (!(phba->sli3_options & LPFC_SLI3_CRP_ENABLED)) {
1138 wmb();
1139 writel(CA_R0ATT << (ringno * 4), phba->CAregaddr);
1140 readl(phba->CAregaddr); /* flush */
1141 }
1142 }
1143
1144 /**
1145 * lpfc_sli_resume_iocb - Process iocbs in the txq
1146 * @phba: Pointer to HBA context object.
1147 * @pring: Pointer to driver SLI ring object.
1148 *
1149 * This function is called with hbalock held to post pending iocbs
1150 * in the txq to the firmware. This function is called when driver
1151 * detects space available in the ring.
1152 **/
1153 static void
1154 lpfc_sli_resume_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
1155 {
1156 IOCB_t *iocb;
1157 struct lpfc_iocbq *nextiocb;
1158
1159 /*
1160 * Check to see if:
1161 * (a) there is anything on the txq to send
1162 * (b) link is up
1163 * (c) link attention events can be processed (fcp ring only)
1164 * (d) IOCB processing is not blocked by the outstanding mbox command.
1165 */
1166 if (pring->txq_cnt &&
1167 lpfc_is_link_up(phba) &&
1168 (pring->ringno != phba->sli.fcp_ring ||
1169 phba->sli.sli_flag & LPFC_PROCESS_LA)) {
1170
1171 while ((iocb = lpfc_sli_next_iocb_slot(phba, pring)) &&
1172 (nextiocb = lpfc_sli_ringtx_get(phba, pring)))
1173 lpfc_sli_submit_iocb(phba, pring, iocb, nextiocb);
1174
1175 if (iocb)
1176 lpfc_sli_update_ring(phba, pring);
1177 else
1178 lpfc_sli_update_full_ring(phba, pring);
1179 }
1180
1181 return;
1182 }
1183
1184 /**
1185 * lpfc_sli_next_hbq_slot - Get next hbq entry for the HBQ
1186 * @phba: Pointer to HBA context object.
1187 * @hbqno: HBQ number.
1188 *
1189 * This function is called with hbalock held to get the next
1190 * available slot for the given HBQ. If there is free slot
1191 * available for the HBQ it will return pointer to the next available
1192 * HBQ entry else it will return NULL.
1193 **/
1194 static struct lpfc_hbq_entry *
1195 lpfc_sli_next_hbq_slot(struct lpfc_hba *phba, uint32_t hbqno)
1196 {
1197 struct hbq_s *hbqp = &phba->hbqs[hbqno];
1198
1199 if (hbqp->next_hbqPutIdx == hbqp->hbqPutIdx &&
1200 ++hbqp->next_hbqPutIdx >= hbqp->entry_count)
1201 hbqp->next_hbqPutIdx = 0;
1202
1203 if (unlikely(hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)) {
1204 uint32_t raw_index = phba->hbq_get[hbqno];
1205 uint32_t getidx = le32_to_cpu(raw_index);
1206
1207 hbqp->local_hbqGetIdx = getidx;
1208
1209 if (unlikely(hbqp->local_hbqGetIdx >= hbqp->entry_count)) {
1210 lpfc_printf_log(phba, KERN_ERR,
1211 LOG_SLI | LOG_VPORT,
1212 "1802 HBQ %d: local_hbqGetIdx "
1213 "%u is > than hbqp->entry_count %u\n",
1214 hbqno, hbqp->local_hbqGetIdx,
1215 hbqp->entry_count);
1216
1217 phba->link_state = LPFC_HBA_ERROR;
1218 return NULL;
1219 }
1220
1221 if (hbqp->local_hbqGetIdx == hbqp->next_hbqPutIdx)
1222 return NULL;
1223 }
1224
1225 return (struct lpfc_hbq_entry *) phba->hbqs[hbqno].hbq_virt +
1226 hbqp->hbqPutIdx;
1227 }
1228
1229 /**
1230 * lpfc_sli_hbqbuf_free_all - Free all the hbq buffers
1231 * @phba: Pointer to HBA context object.
1232 *
1233 * This function is called with no lock held to free all the
1234 * hbq buffers while uninitializing the SLI interface. It also
1235 * frees the HBQ buffers returned by the firmware but not yet
1236 * processed by the upper layers.
1237 **/
1238 void
1239 lpfc_sli_hbqbuf_free_all(struct lpfc_hba *phba)
1240 {
1241 struct lpfc_dmabuf *dmabuf, *next_dmabuf;
1242 struct hbq_dmabuf *hbq_buf;
1243 unsigned long flags;
1244 int i, hbq_count;
1245 uint32_t hbqno;
1246
1247 hbq_count = lpfc_sli_hbq_count();
1248 /* Return all memory used by all HBQs */
1249 spin_lock_irqsave(&phba->hbalock, flags);
1250 for (i = 0; i < hbq_count; ++i) {
1251 list_for_each_entry_safe(dmabuf, next_dmabuf,
1252 &phba->hbqs[i].hbq_buffer_list, list) {
1253 hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
1254 list_del(&hbq_buf->dbuf.list);
1255 (phba->hbqs[i].hbq_free_buffer)(phba, hbq_buf);
1256 }
1257 phba->hbqs[i].buffer_count = 0;
1258 }
1259 /* Return all HBQ buffer that are in-fly */
1260 list_for_each_entry_safe(dmabuf, next_dmabuf, &phba->rb_pend_list,
1261 list) {
1262 hbq_buf = container_of(dmabuf, struct hbq_dmabuf, dbuf);
1263 list_del(&hbq_buf->dbuf.list);
1264 if (hbq_buf->tag == -1) {
1265 (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
1266 (phba, hbq_buf);
1267 } else {
1268 hbqno = hbq_buf->tag >> 16;
1269 if (hbqno >= LPFC_MAX_HBQS)
1270 (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
1271 (phba, hbq_buf);
1272 else
1273 (phba->hbqs[hbqno].hbq_free_buffer)(phba,
1274 hbq_buf);
1275 }
1276 }
1277
1278 /* Mark the HBQs not in use */
1279 phba->hbq_in_use = 0;
1280 spin_unlock_irqrestore(&phba->hbalock, flags);
1281 }
1282
1283 /**
1284 * lpfc_sli_hbq_to_firmware - Post the hbq buffer to firmware
1285 * @phba: Pointer to HBA context object.
1286 * @hbqno: HBQ number.
1287 * @hbq_buf: Pointer to HBQ buffer.
1288 *
1289 * This function is called with the hbalock held to post a
1290 * hbq buffer to the firmware. If the function finds an empty
1291 * slot in the HBQ, it will post the buffer. The function will return
1292 * pointer to the hbq entry if it successfully post the buffer
1293 * else it will return NULL.
1294 **/
1295 static int
1296 lpfc_sli_hbq_to_firmware(struct lpfc_hba *phba, uint32_t hbqno,
1297 struct hbq_dmabuf *hbq_buf)
1298 {
1299 return phba->lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buf);
1300 }
1301
1302 /**
1303 * lpfc_sli_hbq_to_firmware_s3 - Post the hbq buffer to SLI3 firmware
1304 * @phba: Pointer to HBA context object.
1305 * @hbqno: HBQ number.
1306 * @hbq_buf: Pointer to HBQ buffer.
1307 *
1308 * This function is called with the hbalock held to post a hbq buffer to the
1309 * firmware. If the function finds an empty slot in the HBQ, it will post the
1310 * buffer and place it on the hbq_buffer_list. The function will return zero if
1311 * it successfully post the buffer else it will return an error.
1312 **/
1313 static int
1314 lpfc_sli_hbq_to_firmware_s3(struct lpfc_hba *phba, uint32_t hbqno,
1315 struct hbq_dmabuf *hbq_buf)
1316 {
1317 struct lpfc_hbq_entry *hbqe;
1318 dma_addr_t physaddr = hbq_buf->dbuf.phys;
1319
1320 /* Get next HBQ entry slot to use */
1321 hbqe = lpfc_sli_next_hbq_slot(phba, hbqno);
1322 if (hbqe) {
1323 struct hbq_s *hbqp = &phba->hbqs[hbqno];
1324
1325 hbqe->bde.addrHigh = le32_to_cpu(putPaddrHigh(physaddr));
1326 hbqe->bde.addrLow = le32_to_cpu(putPaddrLow(physaddr));
1327 hbqe->bde.tus.f.bdeSize = hbq_buf->size;
1328 hbqe->bde.tus.f.bdeFlags = 0;
1329 hbqe->bde.tus.w = le32_to_cpu(hbqe->bde.tus.w);
1330 hbqe->buffer_tag = le32_to_cpu(hbq_buf->tag);
1331 /* Sync SLIM */
1332 hbqp->hbqPutIdx = hbqp->next_hbqPutIdx;
1333 writel(hbqp->hbqPutIdx, phba->hbq_put + hbqno);
1334 /* flush */
1335 readl(phba->hbq_put + hbqno);
1336 list_add_tail(&hbq_buf->dbuf.list, &hbqp->hbq_buffer_list);
1337 return 0;
1338 } else
1339 return -ENOMEM;
1340 }
1341
1342 /**
1343 * lpfc_sli_hbq_to_firmware_s4 - Post the hbq buffer to SLI4 firmware
1344 * @phba: Pointer to HBA context object.
1345 * @hbqno: HBQ number.
1346 * @hbq_buf: Pointer to HBQ buffer.
1347 *
1348 * This function is called with the hbalock held to post an RQE to the SLI4
1349 * firmware. If able to post the RQE to the RQ it will queue the hbq entry to
1350 * the hbq_buffer_list and return zero, otherwise it will return an error.
1351 **/
1352 static int
1353 lpfc_sli_hbq_to_firmware_s4(struct lpfc_hba *phba, uint32_t hbqno,
1354 struct hbq_dmabuf *hbq_buf)
1355 {
1356 int rc;
1357 struct lpfc_rqe hrqe;
1358 struct lpfc_rqe drqe;
1359
1360 hrqe.address_lo = putPaddrLow(hbq_buf->hbuf.phys);
1361 hrqe.address_hi = putPaddrHigh(hbq_buf->hbuf.phys);
1362 drqe.address_lo = putPaddrLow(hbq_buf->dbuf.phys);
1363 drqe.address_hi = putPaddrHigh(hbq_buf->dbuf.phys);
1364 rc = lpfc_sli4_rq_put(phba->sli4_hba.hdr_rq, phba->sli4_hba.dat_rq,
1365 &hrqe, &drqe);
1366 if (rc < 0)
1367 return rc;
1368 hbq_buf->tag = rc;
1369 list_add_tail(&hbq_buf->dbuf.list, &phba->hbqs[hbqno].hbq_buffer_list);
1370 return 0;
1371 }
1372
1373 /* HBQ for ELS and CT traffic. */
1374 static struct lpfc_hbq_init lpfc_els_hbq = {
1375 .rn = 1,
1376 .entry_count = 200,
1377 .mask_count = 0,
1378 .profile = 0,
1379 .ring_mask = (1 << LPFC_ELS_RING),
1380 .buffer_count = 0,
1381 .init_count = 40,
1382 .add_count = 40,
1383 };
1384
1385 /* HBQ for the extra ring if needed */
1386 static struct lpfc_hbq_init lpfc_extra_hbq = {
1387 .rn = 1,
1388 .entry_count = 200,
1389 .mask_count = 0,
1390 .profile = 0,
1391 .ring_mask = (1 << LPFC_EXTRA_RING),
1392 .buffer_count = 0,
1393 .init_count = 0,
1394 .add_count = 5,
1395 };
1396
1397 /* Array of HBQs */
1398 struct lpfc_hbq_init *lpfc_hbq_defs[] = {
1399 &lpfc_els_hbq,
1400 &lpfc_extra_hbq,
1401 };
1402
1403 /**
1404 * lpfc_sli_hbqbuf_fill_hbqs - Post more hbq buffers to HBQ
1405 * @phba: Pointer to HBA context object.
1406 * @hbqno: HBQ number.
1407 * @count: Number of HBQ buffers to be posted.
1408 *
1409 * This function is called with no lock held to post more hbq buffers to the
1410 * given HBQ. The function returns the number of HBQ buffers successfully
1411 * posted.
1412 **/
1413 static int
1414 lpfc_sli_hbqbuf_fill_hbqs(struct lpfc_hba *phba, uint32_t hbqno, uint32_t count)
1415 {
1416 uint32_t i, posted = 0;
1417 unsigned long flags;
1418 struct hbq_dmabuf *hbq_buffer;
1419 LIST_HEAD(hbq_buf_list);
1420 if (!phba->hbqs[hbqno].hbq_alloc_buffer)
1421 return 0;
1422
1423 if ((phba->hbqs[hbqno].buffer_count + count) >
1424 lpfc_hbq_defs[hbqno]->entry_count)
1425 count = lpfc_hbq_defs[hbqno]->entry_count -
1426 phba->hbqs[hbqno].buffer_count;
1427 if (!count)
1428 return 0;
1429 /* Allocate HBQ entries */
1430 for (i = 0; i < count; i++) {
1431 hbq_buffer = (phba->hbqs[hbqno].hbq_alloc_buffer)(phba);
1432 if (!hbq_buffer)
1433 break;
1434 list_add_tail(&hbq_buffer->dbuf.list, &hbq_buf_list);
1435 }
1436 /* Check whether HBQ is still in use */
1437 spin_lock_irqsave(&phba->hbalock, flags);
1438 if (!phba->hbq_in_use)
1439 goto err;
1440 while (!list_empty(&hbq_buf_list)) {
1441 list_remove_head(&hbq_buf_list, hbq_buffer, struct hbq_dmabuf,
1442 dbuf.list);
1443 hbq_buffer->tag = (phba->hbqs[hbqno].buffer_count |
1444 (hbqno << 16));
1445 if (!lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer)) {
1446 phba->hbqs[hbqno].buffer_count++;
1447 posted++;
1448 } else
1449 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
1450 }
1451 spin_unlock_irqrestore(&phba->hbalock, flags);
1452 return posted;
1453 err:
1454 spin_unlock_irqrestore(&phba->hbalock, flags);
1455 while (!list_empty(&hbq_buf_list)) {
1456 list_remove_head(&hbq_buf_list, hbq_buffer, struct hbq_dmabuf,
1457 dbuf.list);
1458 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
1459 }
1460 return 0;
1461 }
1462
1463 /**
1464 * lpfc_sli_hbqbuf_add_hbqs - Post more HBQ buffers to firmware
1465 * @phba: Pointer to HBA context object.
1466 * @qno: HBQ number.
1467 *
1468 * This function posts more buffers to the HBQ. This function
1469 * is called with no lock held. The function returns the number of HBQ entries
1470 * successfully allocated.
1471 **/
1472 int
1473 lpfc_sli_hbqbuf_add_hbqs(struct lpfc_hba *phba, uint32_t qno)
1474 {
1475 return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
1476 lpfc_hbq_defs[qno]->add_count));
1477 }
1478
1479 /**
1480 * lpfc_sli_hbqbuf_init_hbqs - Post initial buffers to the HBQ
1481 * @phba: Pointer to HBA context object.
1482 * @qno: HBQ queue number.
1483 *
1484 * This function is called from SLI initialization code path with
1485 * no lock held to post initial HBQ buffers to firmware. The
1486 * function returns the number of HBQ entries successfully allocated.
1487 **/
1488 static int
1489 lpfc_sli_hbqbuf_init_hbqs(struct lpfc_hba *phba, uint32_t qno)
1490 {
1491 return(lpfc_sli_hbqbuf_fill_hbqs(phba, qno,
1492 lpfc_hbq_defs[qno]->init_count));
1493 }
1494
1495 /**
1496 * lpfc_sli_hbqbuf_get - Remove the first hbq off of an hbq list
1497 * @phba: Pointer to HBA context object.
1498 * @hbqno: HBQ number.
1499 *
1500 * This function removes the first hbq buffer on an hbq list and returns a
1501 * pointer to that buffer. If it finds no buffers on the list it returns NULL.
1502 **/
1503 static struct hbq_dmabuf *
1504 lpfc_sli_hbqbuf_get(struct list_head *rb_list)
1505 {
1506 struct lpfc_dmabuf *d_buf;
1507
1508 list_remove_head(rb_list, d_buf, struct lpfc_dmabuf, list);
1509 if (!d_buf)
1510 return NULL;
1511 return container_of(d_buf, struct hbq_dmabuf, dbuf);
1512 }
1513
1514 /**
1515 * lpfc_sli_hbqbuf_find - Find the hbq buffer associated with a tag
1516 * @phba: Pointer to HBA context object.
1517 * @tag: Tag of the hbq buffer.
1518 *
1519 * This function is called with hbalock held. This function searches
1520 * for the hbq buffer associated with the given tag in the hbq buffer
1521 * list. If it finds the hbq buffer, it returns the hbq_buffer other wise
1522 * it returns NULL.
1523 **/
1524 static struct hbq_dmabuf *
1525 lpfc_sli_hbqbuf_find(struct lpfc_hba *phba, uint32_t tag)
1526 {
1527 struct lpfc_dmabuf *d_buf;
1528 struct hbq_dmabuf *hbq_buf;
1529 uint32_t hbqno;
1530
1531 hbqno = tag >> 16;
1532 if (hbqno >= LPFC_MAX_HBQS)
1533 return NULL;
1534
1535 spin_lock_irq(&phba->hbalock);
1536 list_for_each_entry(d_buf, &phba->hbqs[hbqno].hbq_buffer_list, list) {
1537 hbq_buf = container_of(d_buf, struct hbq_dmabuf, dbuf);
1538 if (hbq_buf->tag == tag) {
1539 spin_unlock_irq(&phba->hbalock);
1540 return hbq_buf;
1541 }
1542 }
1543 spin_unlock_irq(&phba->hbalock);
1544 lpfc_printf_log(phba, KERN_ERR, LOG_SLI | LOG_VPORT,
1545 "1803 Bad hbq tag. Data: x%x x%x\n",
1546 tag, phba->hbqs[tag >> 16].buffer_count);
1547 return NULL;
1548 }
1549
1550 /**
1551 * lpfc_sli_free_hbq - Give back the hbq buffer to firmware
1552 * @phba: Pointer to HBA context object.
1553 * @hbq_buffer: Pointer to HBQ buffer.
1554 *
1555 * This function is called with hbalock. This function gives back
1556 * the hbq buffer to firmware. If the HBQ does not have space to
1557 * post the buffer, it will free the buffer.
1558 **/
1559 void
1560 lpfc_sli_free_hbq(struct lpfc_hba *phba, struct hbq_dmabuf *hbq_buffer)
1561 {
1562 uint32_t hbqno;
1563
1564 if (hbq_buffer) {
1565 hbqno = hbq_buffer->tag >> 16;
1566 if (lpfc_sli_hbq_to_firmware(phba, hbqno, hbq_buffer))
1567 (phba->hbqs[hbqno].hbq_free_buffer)(phba, hbq_buffer);
1568 }
1569 }
1570
1571 /**
1572 * lpfc_sli_chk_mbx_command - Check if the mailbox is a legitimate mailbox
1573 * @mbxCommand: mailbox command code.
1574 *
1575 * This function is called by the mailbox event handler function to verify
1576 * that the completed mailbox command is a legitimate mailbox command. If the
1577 * completed mailbox is not known to the function, it will return MBX_SHUTDOWN
1578 * and the mailbox event handler will take the HBA offline.
1579 **/
1580 static int
1581 lpfc_sli_chk_mbx_command(uint8_t mbxCommand)
1582 {
1583 uint8_t ret;
1584
1585 switch (mbxCommand) {
1586 case MBX_LOAD_SM:
1587 case MBX_READ_NV:
1588 case MBX_WRITE_NV:
1589 case MBX_WRITE_VPARMS:
1590 case MBX_RUN_BIU_DIAG:
1591 case MBX_INIT_LINK:
1592 case MBX_DOWN_LINK:
1593 case MBX_CONFIG_LINK:
1594 case MBX_CONFIG_RING:
1595 case MBX_RESET_RING:
1596 case MBX_READ_CONFIG:
1597 case MBX_READ_RCONFIG:
1598 case MBX_READ_SPARM:
1599 case MBX_READ_STATUS:
1600 case MBX_READ_RPI:
1601 case MBX_READ_XRI:
1602 case MBX_READ_REV:
1603 case MBX_READ_LNK_STAT:
1604 case MBX_REG_LOGIN:
1605 case MBX_UNREG_LOGIN:
1606 case MBX_READ_LA:
1607 case MBX_CLEAR_LA:
1608 case MBX_DUMP_MEMORY:
1609 case MBX_DUMP_CONTEXT:
1610 case MBX_RUN_DIAGS:
1611 case MBX_RESTART:
1612 case MBX_UPDATE_CFG:
1613 case MBX_DOWN_LOAD:
1614 case MBX_DEL_LD_ENTRY:
1615 case MBX_RUN_PROGRAM:
1616 case MBX_SET_MASK:
1617 case MBX_SET_VARIABLE:
1618 case MBX_UNREG_D_ID:
1619 case MBX_KILL_BOARD:
1620 case MBX_CONFIG_FARP:
1621 case MBX_BEACON:
1622 case MBX_LOAD_AREA:
1623 case MBX_RUN_BIU_DIAG64:
1624 case MBX_CONFIG_PORT:
1625 case MBX_READ_SPARM64:
1626 case MBX_READ_RPI64:
1627 case MBX_REG_LOGIN64:
1628 case MBX_READ_LA64:
1629 case MBX_WRITE_WWN:
1630 case MBX_SET_DEBUG:
1631 case MBX_LOAD_EXP_ROM:
1632 case MBX_ASYNCEVT_ENABLE:
1633 case MBX_REG_VPI:
1634 case MBX_UNREG_VPI:
1635 case MBX_HEARTBEAT:
1636 case MBX_PORT_CAPABILITIES:
1637 case MBX_PORT_IOV_CONTROL:
1638 case MBX_SLI4_CONFIG:
1639 case MBX_SLI4_REQ_FTRS:
1640 case MBX_REG_FCFI:
1641 case MBX_UNREG_FCFI:
1642 case MBX_REG_VFI:
1643 case MBX_UNREG_VFI:
1644 case MBX_INIT_VPI:
1645 case MBX_INIT_VFI:
1646 case MBX_RESUME_RPI:
1647 ret = mbxCommand;
1648 break;
1649 default:
1650 ret = MBX_SHUTDOWN;
1651 break;
1652 }
1653 return ret;
1654 }
1655
1656 /**
1657 * lpfc_sli_wake_mbox_wait - lpfc_sli_issue_mbox_wait mbox completion handler
1658 * @phba: Pointer to HBA context object.
1659 * @pmboxq: Pointer to mailbox command.
1660 *
1661 * This is completion handler function for mailbox commands issued from
1662 * lpfc_sli_issue_mbox_wait function. This function is called by the
1663 * mailbox event handler function with no lock held. This function
1664 * will wake up thread waiting on the wait queue pointed by context1
1665 * of the mailbox.
1666 **/
1667 void
1668 lpfc_sli_wake_mbox_wait(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmboxq)
1669 {
1670 wait_queue_head_t *pdone_q;
1671 unsigned long drvr_flag;
1672
1673 /*
1674 * If pdone_q is empty, the driver thread gave up waiting and
1675 * continued running.
1676 */
1677 pmboxq->mbox_flag |= LPFC_MBX_WAKE;
1678 spin_lock_irqsave(&phba->hbalock, drvr_flag);
1679 pdone_q = (wait_queue_head_t *) pmboxq->context1;
1680 if (pdone_q)
1681 wake_up_interruptible(pdone_q);
1682 spin_unlock_irqrestore(&phba->hbalock, drvr_flag);
1683 return;
1684 }
1685
1686
1687 /**
1688 * lpfc_sli_def_mbox_cmpl - Default mailbox completion handler
1689 * @phba: Pointer to HBA context object.
1690 * @pmb: Pointer to mailbox object.
1691 *
1692 * This function is the default mailbox completion handler. It
1693 * frees the memory resources associated with the completed mailbox
1694 * command. If the completed command is a REG_LOGIN mailbox command,
1695 * this function will issue a UREG_LOGIN to re-claim the RPI.
1696 **/
1697 void
1698 lpfc_sli_def_mbox_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1699 {
1700 struct lpfc_dmabuf *mp;
1701 uint16_t rpi, vpi;
1702 int rc;
1703
1704 mp = (struct lpfc_dmabuf *) (pmb->context1);
1705
1706 if (mp) {
1707 lpfc_mbuf_free(phba, mp->virt, mp->phys);
1708 kfree(mp);
1709 }
1710
1711 if ((pmb->u.mb.mbxCommand == MBX_UNREG_LOGIN) &&
1712 (phba->sli_rev == LPFC_SLI_REV4))
1713 lpfc_sli4_free_rpi(phba, pmb->u.mb.un.varUnregLogin.rpi);
1714
1715 /*
1716 * If a REG_LOGIN succeeded after node is destroyed or node
1717 * is in re-discovery driver need to cleanup the RPI.
1718 */
1719 if (!(phba->pport->load_flag & FC_UNLOADING) &&
1720 pmb->u.mb.mbxCommand == MBX_REG_LOGIN64 &&
1721 !pmb->u.mb.mbxStatus) {
1722 rpi = pmb->u.mb.un.varWords[0];
1723 vpi = pmb->u.mb.un.varRegLogin.vpi - phba->vpi_base;
1724 lpfc_unreg_login(phba, vpi, rpi, pmb);
1725 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
1726 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
1727 if (rc != MBX_NOT_FINISHED)
1728 return;
1729 }
1730
1731 if (bf_get(lpfc_mqe_command, &pmb->u.mqe) == MBX_SLI4_CONFIG)
1732 lpfc_sli4_mbox_cmd_free(phba, pmb);
1733 else
1734 mempool_free(pmb, phba->mbox_mem_pool);
1735 }
1736
1737 /**
1738 * lpfc_sli_handle_mb_event - Handle mailbox completions from firmware
1739 * @phba: Pointer to HBA context object.
1740 *
1741 * This function is called with no lock held. This function processes all
1742 * the completed mailbox commands and gives it to upper layers. The interrupt
1743 * service routine processes mailbox completion interrupt and adds completed
1744 * mailbox commands to the mboxq_cmpl queue and signals the worker thread.
1745 * Worker thread call lpfc_sli_handle_mb_event, which will return the
1746 * completed mailbox commands in mboxq_cmpl queue to the upper layers. This
1747 * function returns the mailbox commands to the upper layer by calling the
1748 * completion handler function of each mailbox.
1749 **/
1750 int
1751 lpfc_sli_handle_mb_event(struct lpfc_hba *phba)
1752 {
1753 MAILBOX_t *pmbox;
1754 LPFC_MBOXQ_t *pmb;
1755 int rc;
1756 LIST_HEAD(cmplq);
1757
1758 phba->sli.slistat.mbox_event++;
1759
1760 /* Get all completed mailboxe buffers into the cmplq */
1761 spin_lock_irq(&phba->hbalock);
1762 list_splice_init(&phba->sli.mboxq_cmpl, &cmplq);
1763 spin_unlock_irq(&phba->hbalock);
1764
1765 /* Get a Mailbox buffer to setup mailbox commands for callback */
1766 do {
1767 list_remove_head(&cmplq, pmb, LPFC_MBOXQ_t, list);
1768 if (pmb == NULL)
1769 break;
1770
1771 pmbox = &pmb->u.mb;
1772
1773 if (pmbox->mbxCommand != MBX_HEARTBEAT) {
1774 if (pmb->vport) {
1775 lpfc_debugfs_disc_trc(pmb->vport,
1776 LPFC_DISC_TRC_MBOX_VPORT,
1777 "MBOX cmpl vport: cmd:x%x mb:x%x x%x",
1778 (uint32_t)pmbox->mbxCommand,
1779 pmbox->un.varWords[0],
1780 pmbox->un.varWords[1]);
1781 }
1782 else {
1783 lpfc_debugfs_disc_trc(phba->pport,
1784 LPFC_DISC_TRC_MBOX,
1785 "MBOX cmpl: cmd:x%x mb:x%x x%x",
1786 (uint32_t)pmbox->mbxCommand,
1787 pmbox->un.varWords[0],
1788 pmbox->un.varWords[1]);
1789 }
1790 }
1791
1792 /*
1793 * It is a fatal error if unknown mbox command completion.
1794 */
1795 if (lpfc_sli_chk_mbx_command(pmbox->mbxCommand) ==
1796 MBX_SHUTDOWN) {
1797 /* Unknow mailbox command compl */
1798 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX | LOG_SLI,
1799 "(%d):0323 Unknown Mailbox command "
1800 "x%x (x%x) Cmpl\n",
1801 pmb->vport ? pmb->vport->vpi : 0,
1802 pmbox->mbxCommand,
1803 lpfc_sli4_mbox_opcode_get(phba, pmb));
1804 phba->link_state = LPFC_HBA_ERROR;
1805 phba->work_hs = HS_FFER3;
1806 lpfc_handle_eratt(phba);
1807 continue;
1808 }
1809
1810 if (pmbox->mbxStatus) {
1811 phba->sli.slistat.mbox_stat_err++;
1812 if (pmbox->mbxStatus == MBXERR_NO_RESOURCES) {
1813 /* Mbox cmd cmpl error - RETRYing */
1814 lpfc_printf_log(phba, KERN_INFO,
1815 LOG_MBOX | LOG_SLI,
1816 "(%d):0305 Mbox cmd cmpl "
1817 "error - RETRYing Data: x%x "
1818 "(x%x) x%x x%x x%x\n",
1819 pmb->vport ? pmb->vport->vpi :0,
1820 pmbox->mbxCommand,
1821 lpfc_sli4_mbox_opcode_get(phba,
1822 pmb),
1823 pmbox->mbxStatus,
1824 pmbox->un.varWords[0],
1825 pmb->vport->port_state);
1826 pmbox->mbxStatus = 0;
1827 pmbox->mbxOwner = OWN_HOST;
1828 rc = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
1829 if (rc != MBX_NOT_FINISHED)
1830 continue;
1831 }
1832 }
1833
1834 /* Mailbox cmd <cmd> Cmpl <cmpl> */
1835 lpfc_printf_log(phba, KERN_INFO, LOG_MBOX | LOG_SLI,
1836 "(%d):0307 Mailbox cmd x%x (x%x) Cmpl x%p "
1837 "Data: x%x x%x x%x x%x x%x x%x x%x x%x x%x\n",
1838 pmb->vport ? pmb->vport->vpi : 0,
1839 pmbox->mbxCommand,
1840 lpfc_sli4_mbox_opcode_get(phba, pmb),
1841 pmb->mbox_cmpl,
1842 *((uint32_t *) pmbox),
1843 pmbox->un.varWords[0],
1844 pmbox->un.varWords[1],
1845 pmbox->un.varWords[2],
1846 pmbox->un.varWords[3],
1847 pmbox->un.varWords[4],
1848 pmbox->un.varWords[5],
1849 pmbox->un.varWords[6],
1850 pmbox->un.varWords[7]);
1851
1852 if (pmb->mbox_cmpl)
1853 pmb->mbox_cmpl(phba,pmb);
1854 } while (1);
1855 return 0;
1856 }
1857
1858 /**
1859 * lpfc_sli_get_buff - Get the buffer associated with the buffer tag
1860 * @phba: Pointer to HBA context object.
1861 * @pring: Pointer to driver SLI ring object.
1862 * @tag: buffer tag.
1863 *
1864 * This function is called with no lock held. When QUE_BUFTAG_BIT bit
1865 * is set in the tag the buffer is posted for a particular exchange,
1866 * the function will return the buffer without replacing the buffer.
1867 * If the buffer is for unsolicited ELS or CT traffic, this function
1868 * returns the buffer and also posts another buffer to the firmware.
1869 **/
1870 static struct lpfc_dmabuf *
1871 lpfc_sli_get_buff(struct lpfc_hba *phba,
1872 struct lpfc_sli_ring *pring,
1873 uint32_t tag)
1874 {
1875 struct hbq_dmabuf *hbq_entry;
1876
1877 if (tag & QUE_BUFTAG_BIT)
1878 return lpfc_sli_ring_taggedbuf_get(phba, pring, tag);
1879 hbq_entry = lpfc_sli_hbqbuf_find(phba, tag);
1880 if (!hbq_entry)
1881 return NULL;
1882 return &hbq_entry->dbuf;
1883 }
1884
1885 /**
1886 * lpfc_complete_unsol_iocb - Complete an unsolicited sequence
1887 * @phba: Pointer to HBA context object.
1888 * @pring: Pointer to driver SLI ring object.
1889 * @saveq: Pointer to the iocbq struct representing the sequence starting frame.
1890 * @fch_r_ctl: the r_ctl for the first frame of the sequence.
1891 * @fch_type: the type for the first frame of the sequence.
1892 *
1893 * This function is called with no lock held. This function uses the r_ctl and
1894 * type of the received sequence to find the correct callback function to call
1895 * to process the sequence.
1896 **/
1897 static int
1898 lpfc_complete_unsol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1899 struct lpfc_iocbq *saveq, uint32_t fch_r_ctl,
1900 uint32_t fch_type)
1901 {
1902 int i;
1903
1904 /* unSolicited Responses */
1905 if (pring->prt[0].profile) {
1906 if (pring->prt[0].lpfc_sli_rcv_unsol_event)
1907 (pring->prt[0].lpfc_sli_rcv_unsol_event) (phba, pring,
1908 saveq);
1909 return 1;
1910 }
1911 /* We must search, based on rctl / type
1912 for the right routine */
1913 for (i = 0; i < pring->num_mask; i++) {
1914 if ((pring->prt[i].rctl == fch_r_ctl) &&
1915 (pring->prt[i].type == fch_type)) {
1916 if (pring->prt[i].lpfc_sli_rcv_unsol_event)
1917 (pring->prt[i].lpfc_sli_rcv_unsol_event)
1918 (phba, pring, saveq);
1919 return 1;
1920 }
1921 }
1922 return 0;
1923 }
1924
1925 /**
1926 * lpfc_sli_process_unsol_iocb - Unsolicited iocb handler
1927 * @phba: Pointer to HBA context object.
1928 * @pring: Pointer to driver SLI ring object.
1929 * @saveq: Pointer to the unsolicited iocb.
1930 *
1931 * This function is called with no lock held by the ring event handler
1932 * when there is an unsolicited iocb posted to the response ring by the
1933 * firmware. This function gets the buffer associated with the iocbs
1934 * and calls the event handler for the ring. This function handles both
1935 * qring buffers and hbq buffers.
1936 * When the function returns 1 the caller can free the iocb object otherwise
1937 * upper layer functions will free the iocb objects.
1938 **/
1939 static int
1940 lpfc_sli_process_unsol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
1941 struct lpfc_iocbq *saveq)
1942 {
1943 IOCB_t * irsp;
1944 WORD5 * w5p;
1945 uint32_t Rctl, Type;
1946 uint32_t match;
1947 struct lpfc_iocbq *iocbq;
1948 struct lpfc_dmabuf *dmzbuf;
1949
1950 match = 0;
1951 irsp = &(saveq->iocb);
1952
1953 if (irsp->ulpCommand == CMD_ASYNC_STATUS) {
1954 if (pring->lpfc_sli_rcv_async_status)
1955 pring->lpfc_sli_rcv_async_status(phba, pring, saveq);
1956 else
1957 lpfc_printf_log(phba,
1958 KERN_WARNING,
1959 LOG_SLI,
1960 "0316 Ring %d handler: unexpected "
1961 "ASYNC_STATUS iocb received evt_code "
1962 "0x%x\n",
1963 pring->ringno,
1964 irsp->un.asyncstat.evt_code);
1965 return 1;
1966 }
1967
1968 if ((irsp->ulpCommand == CMD_IOCB_RET_XRI64_CX) &&
1969 (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED)) {
1970 if (irsp->ulpBdeCount > 0) {
1971 dmzbuf = lpfc_sli_get_buff(phba, pring,
1972 irsp->un.ulpWord[3]);
1973 lpfc_in_buf_free(phba, dmzbuf);
1974 }
1975
1976 if (irsp->ulpBdeCount > 1) {
1977 dmzbuf = lpfc_sli_get_buff(phba, pring,
1978 irsp->unsli3.sli3Words[3]);
1979 lpfc_in_buf_free(phba, dmzbuf);
1980 }
1981
1982 if (irsp->ulpBdeCount > 2) {
1983 dmzbuf = lpfc_sli_get_buff(phba, pring,
1984 irsp->unsli3.sli3Words[7]);
1985 lpfc_in_buf_free(phba, dmzbuf);
1986 }
1987
1988 return 1;
1989 }
1990
1991 if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
1992 if (irsp->ulpBdeCount != 0) {
1993 saveq->context2 = lpfc_sli_get_buff(phba, pring,
1994 irsp->un.ulpWord[3]);
1995 if (!saveq->context2)
1996 lpfc_printf_log(phba,
1997 KERN_ERR,
1998 LOG_SLI,
1999 "0341 Ring %d Cannot find buffer for "
2000 "an unsolicited iocb. tag 0x%x\n",
2001 pring->ringno,
2002 irsp->un.ulpWord[3]);
2003 }
2004 if (irsp->ulpBdeCount == 2) {
2005 saveq->context3 = lpfc_sli_get_buff(phba, pring,
2006 irsp->unsli3.sli3Words[7]);
2007 if (!saveq->context3)
2008 lpfc_printf_log(phba,
2009 KERN_ERR,
2010 LOG_SLI,
2011 "0342 Ring %d Cannot find buffer for an"
2012 " unsolicited iocb. tag 0x%x\n",
2013 pring->ringno,
2014 irsp->unsli3.sli3Words[7]);
2015 }
2016 list_for_each_entry(iocbq, &saveq->list, list) {
2017 irsp = &(iocbq->iocb);
2018 if (irsp->ulpBdeCount != 0) {
2019 iocbq->context2 = lpfc_sli_get_buff(phba, pring,
2020 irsp->un.ulpWord[3]);
2021 if (!iocbq->context2)
2022 lpfc_printf_log(phba,
2023 KERN_ERR,
2024 LOG_SLI,
2025 "0343 Ring %d Cannot find "
2026 "buffer for an unsolicited iocb"
2027 ". tag 0x%x\n", pring->ringno,
2028 irsp->un.ulpWord[3]);
2029 }
2030 if (irsp->ulpBdeCount == 2) {
2031 iocbq->context3 = lpfc_sli_get_buff(phba, pring,
2032 irsp->unsli3.sli3Words[7]);
2033 if (!iocbq->context3)
2034 lpfc_printf_log(phba,
2035 KERN_ERR,
2036 LOG_SLI,
2037 "0344 Ring %d Cannot find "
2038 "buffer for an unsolicited "
2039 "iocb. tag 0x%x\n",
2040 pring->ringno,
2041 irsp->unsli3.sli3Words[7]);
2042 }
2043 }
2044 }
2045 if (irsp->ulpBdeCount != 0 &&
2046 (irsp->ulpCommand == CMD_IOCB_RCV_CONT64_CX ||
2047 irsp->ulpStatus == IOSTAT_INTERMED_RSP)) {
2048 int found = 0;
2049
2050 /* search continue save q for same XRI */
2051 list_for_each_entry(iocbq, &pring->iocb_continue_saveq, clist) {
2052 if (iocbq->iocb.ulpContext == saveq->iocb.ulpContext) {
2053 list_add_tail(&saveq->list, &iocbq->list);
2054 found = 1;
2055 break;
2056 }
2057 }
2058 if (!found)
2059 list_add_tail(&saveq->clist,
2060 &pring->iocb_continue_saveq);
2061 if (saveq->iocb.ulpStatus != IOSTAT_INTERMED_RSP) {
2062 list_del_init(&iocbq->clist);
2063 saveq = iocbq;
2064 irsp = &(saveq->iocb);
2065 } else
2066 return 0;
2067 }
2068 if ((irsp->ulpCommand == CMD_RCV_ELS_REQ64_CX) ||
2069 (irsp->ulpCommand == CMD_RCV_ELS_REQ_CX) ||
2070 (irsp->ulpCommand == CMD_IOCB_RCV_ELS64_CX)) {
2071 Rctl = FC_ELS_REQ;
2072 Type = FC_ELS_DATA;
2073 } else {
2074 w5p = (WORD5 *)&(saveq->iocb.un.ulpWord[5]);
2075 Rctl = w5p->hcsw.Rctl;
2076 Type = w5p->hcsw.Type;
2077
2078 /* Firmware Workaround */
2079 if ((Rctl == 0) && (pring->ringno == LPFC_ELS_RING) &&
2080 (irsp->ulpCommand == CMD_RCV_SEQUENCE64_CX ||
2081 irsp->ulpCommand == CMD_IOCB_RCV_SEQ64_CX)) {
2082 Rctl = FC_ELS_REQ;
2083 Type = FC_ELS_DATA;
2084 w5p->hcsw.Rctl = Rctl;
2085 w5p->hcsw.Type = Type;
2086 }
2087 }
2088
2089 if (!lpfc_complete_unsol_iocb(phba, pring, saveq, Rctl, Type))
2090 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2091 "0313 Ring %d handler: unexpected Rctl x%x "
2092 "Type x%x received\n",
2093 pring->ringno, Rctl, Type);
2094
2095 return 1;
2096 }
2097
2098 /**
2099 * lpfc_sli_iocbq_lookup - Find command iocb for the given response iocb
2100 * @phba: Pointer to HBA context object.
2101 * @pring: Pointer to driver SLI ring object.
2102 * @prspiocb: Pointer to response iocb object.
2103 *
2104 * This function looks up the iocb_lookup table to get the command iocb
2105 * corresponding to the given response iocb using the iotag of the
2106 * response iocb. This function is called with the hbalock held.
2107 * This function returns the command iocb object if it finds the command
2108 * iocb else returns NULL.
2109 **/
2110 static struct lpfc_iocbq *
2111 lpfc_sli_iocbq_lookup(struct lpfc_hba *phba,
2112 struct lpfc_sli_ring *pring,
2113 struct lpfc_iocbq *prspiocb)
2114 {
2115 struct lpfc_iocbq *cmd_iocb = NULL;
2116 uint16_t iotag;
2117
2118 iotag = prspiocb->iocb.ulpIoTag;
2119
2120 if (iotag != 0 && iotag <= phba->sli.last_iotag) {
2121 cmd_iocb = phba->sli.iocbq_lookup[iotag];
2122 list_del_init(&cmd_iocb->list);
2123 pring->txcmplq_cnt--;
2124 return cmd_iocb;
2125 }
2126
2127 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2128 "0317 iotag x%x is out off "
2129 "range: max iotag x%x wd0 x%x\n",
2130 iotag, phba->sli.last_iotag,
2131 *(((uint32_t *) &prspiocb->iocb) + 7));
2132 return NULL;
2133 }
2134
2135 /**
2136 * lpfc_sli_iocbq_lookup_by_tag - Find command iocb for the iotag
2137 * @phba: Pointer to HBA context object.
2138 * @pring: Pointer to driver SLI ring object.
2139 * @iotag: IOCB tag.
2140 *
2141 * This function looks up the iocb_lookup table to get the command iocb
2142 * corresponding to the given iotag. This function is called with the
2143 * hbalock held.
2144 * This function returns the command iocb object if it finds the command
2145 * iocb else returns NULL.
2146 **/
2147 static struct lpfc_iocbq *
2148 lpfc_sli_iocbq_lookup_by_tag(struct lpfc_hba *phba,
2149 struct lpfc_sli_ring *pring, uint16_t iotag)
2150 {
2151 struct lpfc_iocbq *cmd_iocb;
2152
2153 if (iotag != 0 && iotag <= phba->sli.last_iotag) {
2154 cmd_iocb = phba->sli.iocbq_lookup[iotag];
2155 list_del_init(&cmd_iocb->list);
2156 pring->txcmplq_cnt--;
2157 return cmd_iocb;
2158 }
2159
2160 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2161 "0372 iotag x%x is out off range: max iotag (x%x)\n",
2162 iotag, phba->sli.last_iotag);
2163 return NULL;
2164 }
2165
2166 /**
2167 * lpfc_sli_process_sol_iocb - process solicited iocb completion
2168 * @phba: Pointer to HBA context object.
2169 * @pring: Pointer to driver SLI ring object.
2170 * @saveq: Pointer to the response iocb to be processed.
2171 *
2172 * This function is called by the ring event handler for non-fcp
2173 * rings when there is a new response iocb in the response ring.
2174 * The caller is not required to hold any locks. This function
2175 * gets the command iocb associated with the response iocb and
2176 * calls the completion handler for the command iocb. If there
2177 * is no completion handler, the function will free the resources
2178 * associated with command iocb. If the response iocb is for
2179 * an already aborted command iocb, the status of the completion
2180 * is changed to IOSTAT_LOCAL_REJECT/IOERR_SLI_ABORTED.
2181 * This function always returns 1.
2182 **/
2183 static int
2184 lpfc_sli_process_sol_iocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2185 struct lpfc_iocbq *saveq)
2186 {
2187 struct lpfc_iocbq *cmdiocbp;
2188 int rc = 1;
2189 unsigned long iflag;
2190
2191 /* Based on the iotag field, get the cmd IOCB from the txcmplq */
2192 spin_lock_irqsave(&phba->hbalock, iflag);
2193 cmdiocbp = lpfc_sli_iocbq_lookup(phba, pring, saveq);
2194 spin_unlock_irqrestore(&phba->hbalock, iflag);
2195
2196 if (cmdiocbp) {
2197 if (cmdiocbp->iocb_cmpl) {
2198 /*
2199 * If an ELS command failed send an event to mgmt
2200 * application.
2201 */
2202 if (saveq->iocb.ulpStatus &&
2203 (pring->ringno == LPFC_ELS_RING) &&
2204 (cmdiocbp->iocb.ulpCommand ==
2205 CMD_ELS_REQUEST64_CR))
2206 lpfc_send_els_failure_event(phba,
2207 cmdiocbp, saveq);
2208
2209 /*
2210 * Post all ELS completions to the worker thread.
2211 * All other are passed to the completion callback.
2212 */
2213 if (pring->ringno == LPFC_ELS_RING) {
2214 if (cmdiocbp->iocb_flag & LPFC_DRIVER_ABORTED) {
2215 cmdiocbp->iocb_flag &=
2216 ~LPFC_DRIVER_ABORTED;
2217 saveq->iocb.ulpStatus =
2218 IOSTAT_LOCAL_REJECT;
2219 saveq->iocb.un.ulpWord[4] =
2220 IOERR_SLI_ABORTED;
2221
2222 /* Firmware could still be in progress
2223 * of DMAing payload, so don't free data
2224 * buffer till after a hbeat.
2225 */
2226 saveq->iocb_flag |= LPFC_DELAY_MEM_FREE;
2227 }
2228 }
2229 (cmdiocbp->iocb_cmpl) (phba, cmdiocbp, saveq);
2230 } else
2231 lpfc_sli_release_iocbq(phba, cmdiocbp);
2232 } else {
2233 /*
2234 * Unknown initiating command based on the response iotag.
2235 * This could be the case on the ELS ring because of
2236 * lpfc_els_abort().
2237 */
2238 if (pring->ringno != LPFC_ELS_RING) {
2239 /*
2240 * Ring <ringno> handler: unexpected completion IoTag
2241 * <IoTag>
2242 */
2243 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2244 "0322 Ring %d handler: "
2245 "unexpected completion IoTag x%x "
2246 "Data: x%x x%x x%x x%x\n",
2247 pring->ringno,
2248 saveq->iocb.ulpIoTag,
2249 saveq->iocb.ulpStatus,
2250 saveq->iocb.un.ulpWord[4],
2251 saveq->iocb.ulpCommand,
2252 saveq->iocb.ulpContext);
2253 }
2254 }
2255
2256 return rc;
2257 }
2258
2259 /**
2260 * lpfc_sli_rsp_pointers_error - Response ring pointer error handler
2261 * @phba: Pointer to HBA context object.
2262 * @pring: Pointer to driver SLI ring object.
2263 *
2264 * This function is called from the iocb ring event handlers when
2265 * put pointer is ahead of the get pointer for a ring. This function signal
2266 * an error attention condition to the worker thread and the worker
2267 * thread will transition the HBA to offline state.
2268 **/
2269 static void
2270 lpfc_sli_rsp_pointers_error(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
2271 {
2272 struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
2273 /*
2274 * Ring <ringno> handler: portRspPut <portRspPut> is bigger than
2275 * rsp ring <portRspMax>
2276 */
2277 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2278 "0312 Ring %d handler: portRspPut %d "
2279 "is bigger than rsp ring %d\n",
2280 pring->ringno, le32_to_cpu(pgp->rspPutInx),
2281 pring->numRiocb);
2282
2283 phba->link_state = LPFC_HBA_ERROR;
2284
2285 /*
2286 * All error attention handlers are posted to
2287 * worker thread
2288 */
2289 phba->work_ha |= HA_ERATT;
2290 phba->work_hs = HS_FFER3;
2291
2292 lpfc_worker_wake_up(phba);
2293
2294 return;
2295 }
2296
2297 /**
2298 * lpfc_poll_eratt - Error attention polling timer timeout handler
2299 * @ptr: Pointer to address of HBA context object.
2300 *
2301 * This function is invoked by the Error Attention polling timer when the
2302 * timer times out. It will check the SLI Error Attention register for
2303 * possible attention events. If so, it will post an Error Attention event
2304 * and wake up worker thread to process it. Otherwise, it will set up the
2305 * Error Attention polling timer for the next poll.
2306 **/
2307 void lpfc_poll_eratt(unsigned long ptr)
2308 {
2309 struct lpfc_hba *phba;
2310 uint32_t eratt = 0;
2311
2312 phba = (struct lpfc_hba *)ptr;
2313
2314 /* Check chip HA register for error event */
2315 eratt = lpfc_sli_check_eratt(phba);
2316
2317 if (eratt)
2318 /* Tell the worker thread there is work to do */
2319 lpfc_worker_wake_up(phba);
2320 else
2321 /* Restart the timer for next eratt poll */
2322 mod_timer(&phba->eratt_poll, jiffies +
2323 HZ * LPFC_ERATT_POLL_INTERVAL);
2324 return;
2325 }
2326
2327 /**
2328 * lpfc_sli_poll_fcp_ring - Handle FCP ring completion in polling mode
2329 * @phba: Pointer to HBA context object.
2330 *
2331 * This function is called from lpfc_queuecommand, lpfc_poll_timeout,
2332 * lpfc_abort_handler and lpfc_slave_configure when FCP_RING_POLLING
2333 * is enabled.
2334 *
2335 * The caller does not hold any lock.
2336 * The function processes each response iocb in the response ring until it
2337 * finds an iocb with LE bit set and chains all the iocbs upto the iocb with
2338 * LE bit set. The function will call the completion handler of the command iocb
2339 * if the response iocb indicates a completion for a command iocb or it is
2340 * an abort completion.
2341 **/
2342 void lpfc_sli_poll_fcp_ring(struct lpfc_hba *phba)
2343 {
2344 struct lpfc_sli *psli = &phba->sli;
2345 struct lpfc_sli_ring *pring = &psli->ring[LPFC_FCP_RING];
2346 IOCB_t *irsp = NULL;
2347 IOCB_t *entry = NULL;
2348 struct lpfc_iocbq *cmdiocbq = NULL;
2349 struct lpfc_iocbq rspiocbq;
2350 struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
2351 uint32_t status;
2352 uint32_t portRspPut, portRspMax;
2353 int type;
2354 uint32_t rsp_cmpl = 0;
2355 uint32_t ha_copy;
2356 unsigned long iflags;
2357
2358 pring->stats.iocb_event++;
2359
2360 /*
2361 * The next available response entry should never exceed the maximum
2362 * entries. If it does, treat it as an adapter hardware error.
2363 */
2364 portRspMax = pring->numRiocb;
2365 portRspPut = le32_to_cpu(pgp->rspPutInx);
2366 if (unlikely(portRspPut >= portRspMax)) {
2367 lpfc_sli_rsp_pointers_error(phba, pring);
2368 return;
2369 }
2370
2371 rmb();
2372 while (pring->rspidx != portRspPut) {
2373 entry = lpfc_resp_iocb(phba, pring);
2374 if (++pring->rspidx >= portRspMax)
2375 pring->rspidx = 0;
2376
2377 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
2378 (uint32_t *) &rspiocbq.iocb,
2379 phba->iocb_rsp_size);
2380 irsp = &rspiocbq.iocb;
2381 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
2382 pring->stats.iocb_rsp++;
2383 rsp_cmpl++;
2384
2385 if (unlikely(irsp->ulpStatus)) {
2386 /* Rsp ring <ringno> error: IOCB */
2387 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2388 "0326 Rsp Ring %d error: IOCB Data: "
2389 "x%x x%x x%x x%x x%x x%x x%x x%x\n",
2390 pring->ringno,
2391 irsp->un.ulpWord[0],
2392 irsp->un.ulpWord[1],
2393 irsp->un.ulpWord[2],
2394 irsp->un.ulpWord[3],
2395 irsp->un.ulpWord[4],
2396 irsp->un.ulpWord[5],
2397 *(uint32_t *)&irsp->un1,
2398 *((uint32_t *)&irsp->un1 + 1));
2399 }
2400
2401 switch (type) {
2402 case LPFC_ABORT_IOCB:
2403 case LPFC_SOL_IOCB:
2404 /*
2405 * Idle exchange closed via ABTS from port. No iocb
2406 * resources need to be recovered.
2407 */
2408 if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
2409 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2410 "0314 IOCB cmd 0x%x "
2411 "processed. Skipping "
2412 "completion",
2413 irsp->ulpCommand);
2414 break;
2415 }
2416
2417 spin_lock_irqsave(&phba->hbalock, iflags);
2418 cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
2419 &rspiocbq);
2420 spin_unlock_irqrestore(&phba->hbalock, iflags);
2421 if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
2422 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
2423 &rspiocbq);
2424 }
2425 break;
2426 default:
2427 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
2428 char adaptermsg[LPFC_MAX_ADPTMSG];
2429 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
2430 memcpy(&adaptermsg[0], (uint8_t *) irsp,
2431 MAX_MSG_DATA);
2432 dev_warn(&((phba->pcidev)->dev),
2433 "lpfc%d: %s\n",
2434 phba->brd_no, adaptermsg);
2435 } else {
2436 /* Unknown IOCB command */
2437 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2438 "0321 Unknown IOCB command "
2439 "Data: x%x, x%x x%x x%x x%x\n",
2440 type, irsp->ulpCommand,
2441 irsp->ulpStatus,
2442 irsp->ulpIoTag,
2443 irsp->ulpContext);
2444 }
2445 break;
2446 }
2447
2448 /*
2449 * The response IOCB has been processed. Update the ring
2450 * pointer in SLIM. If the port response put pointer has not
2451 * been updated, sync the pgp->rspPutInx and fetch the new port
2452 * response put pointer.
2453 */
2454 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
2455
2456 if (pring->rspidx == portRspPut)
2457 portRspPut = le32_to_cpu(pgp->rspPutInx);
2458 }
2459
2460 ha_copy = readl(phba->HAregaddr);
2461 ha_copy >>= (LPFC_FCP_RING * 4);
2462
2463 if ((rsp_cmpl > 0) && (ha_copy & HA_R0RE_REQ)) {
2464 spin_lock_irqsave(&phba->hbalock, iflags);
2465 pring->stats.iocb_rsp_full++;
2466 status = ((CA_R0ATT | CA_R0RE_RSP) << (LPFC_FCP_RING * 4));
2467 writel(status, phba->CAregaddr);
2468 readl(phba->CAregaddr);
2469 spin_unlock_irqrestore(&phba->hbalock, iflags);
2470 }
2471 if ((ha_copy & HA_R0CE_RSP) &&
2472 (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
2473 spin_lock_irqsave(&phba->hbalock, iflags);
2474 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
2475 pring->stats.iocb_cmd_empty++;
2476
2477 /* Force update of the local copy of cmdGetInx */
2478 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
2479 lpfc_sli_resume_iocb(phba, pring);
2480
2481 if ((pring->lpfc_sli_cmd_available))
2482 (pring->lpfc_sli_cmd_available) (phba, pring);
2483
2484 spin_unlock_irqrestore(&phba->hbalock, iflags);
2485 }
2486
2487 return;
2488 }
2489
2490 /**
2491 * lpfc_sli_handle_fast_ring_event - Handle ring events on FCP ring
2492 * @phba: Pointer to HBA context object.
2493 * @pring: Pointer to driver SLI ring object.
2494 * @mask: Host attention register mask for this ring.
2495 *
2496 * This function is called from the interrupt context when there is a ring
2497 * event for the fcp ring. The caller does not hold any lock.
2498 * The function processes each response iocb in the response ring until it
2499 * finds an iocb with LE bit set and chains all the iocbs upto the iocb with
2500 * LE bit set. The function will call the completion handler of the command iocb
2501 * if the response iocb indicates a completion for a command iocb or it is
2502 * an abort completion. The function will call lpfc_sli_process_unsol_iocb
2503 * function if this is an unsolicited iocb.
2504 * This routine presumes LPFC_FCP_RING handling and doesn't bother
2505 * to check it explicitly. This function always returns 1.
2506 **/
2507 static int
2508 lpfc_sli_handle_fast_ring_event(struct lpfc_hba *phba,
2509 struct lpfc_sli_ring *pring, uint32_t mask)
2510 {
2511 struct lpfc_pgp *pgp = &phba->port_gp[pring->ringno];
2512 IOCB_t *irsp = NULL;
2513 IOCB_t *entry = NULL;
2514 struct lpfc_iocbq *cmdiocbq = NULL;
2515 struct lpfc_iocbq rspiocbq;
2516 uint32_t status;
2517 uint32_t portRspPut, portRspMax;
2518 int rc = 1;
2519 lpfc_iocb_type type;
2520 unsigned long iflag;
2521 uint32_t rsp_cmpl = 0;
2522
2523 spin_lock_irqsave(&phba->hbalock, iflag);
2524 pring->stats.iocb_event++;
2525
2526 /*
2527 * The next available response entry should never exceed the maximum
2528 * entries. If it does, treat it as an adapter hardware error.
2529 */
2530 portRspMax = pring->numRiocb;
2531 portRspPut = le32_to_cpu(pgp->rspPutInx);
2532 if (unlikely(portRspPut >= portRspMax)) {
2533 lpfc_sli_rsp_pointers_error(phba, pring);
2534 spin_unlock_irqrestore(&phba->hbalock, iflag);
2535 return 1;
2536 }
2537
2538 rmb();
2539 while (pring->rspidx != portRspPut) {
2540 /*
2541 * Fetch an entry off the ring and copy it into a local data
2542 * structure. The copy involves a byte-swap since the
2543 * network byte order and pci byte orders are different.
2544 */
2545 entry = lpfc_resp_iocb(phba, pring);
2546 phba->last_completion_time = jiffies;
2547
2548 if (++pring->rspidx >= portRspMax)
2549 pring->rspidx = 0;
2550
2551 lpfc_sli_pcimem_bcopy((uint32_t *) entry,
2552 (uint32_t *) &rspiocbq.iocb,
2553 phba->iocb_rsp_size);
2554 INIT_LIST_HEAD(&(rspiocbq.list));
2555 irsp = &rspiocbq.iocb;
2556
2557 type = lpfc_sli_iocb_cmd_type(irsp->ulpCommand & CMD_IOCB_MASK);
2558 pring->stats.iocb_rsp++;
2559 rsp_cmpl++;
2560
2561 if (unlikely(irsp->ulpStatus)) {
2562 /*
2563 * If resource errors reported from HBA, reduce
2564 * queuedepths of the SCSI device.
2565 */
2566 if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
2567 (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
2568 spin_unlock_irqrestore(&phba->hbalock, iflag);
2569 phba->lpfc_rampdown_queue_depth(phba);
2570 spin_lock_irqsave(&phba->hbalock, iflag);
2571 }
2572
2573 /* Rsp ring <ringno> error: IOCB */
2574 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2575 "0336 Rsp Ring %d error: IOCB Data: "
2576 "x%x x%x x%x x%x x%x x%x x%x x%x\n",
2577 pring->ringno,
2578 irsp->un.ulpWord[0],
2579 irsp->un.ulpWord[1],
2580 irsp->un.ulpWord[2],
2581 irsp->un.ulpWord[3],
2582 irsp->un.ulpWord[4],
2583 irsp->un.ulpWord[5],
2584 *(uint32_t *)&irsp->un1,
2585 *((uint32_t *)&irsp->un1 + 1));
2586 }
2587
2588 switch (type) {
2589 case LPFC_ABORT_IOCB:
2590 case LPFC_SOL_IOCB:
2591 /*
2592 * Idle exchange closed via ABTS from port. No iocb
2593 * resources need to be recovered.
2594 */
2595 if (unlikely(irsp->ulpCommand == CMD_XRI_ABORTED_CX)) {
2596 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
2597 "0333 IOCB cmd 0x%x"
2598 " processed. Skipping"
2599 " completion\n",
2600 irsp->ulpCommand);
2601 break;
2602 }
2603
2604 cmdiocbq = lpfc_sli_iocbq_lookup(phba, pring,
2605 &rspiocbq);
2606 if ((cmdiocbq) && (cmdiocbq->iocb_cmpl)) {
2607 if (phba->cfg_poll & ENABLE_FCP_RING_POLLING) {
2608 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
2609 &rspiocbq);
2610 } else {
2611 spin_unlock_irqrestore(&phba->hbalock,
2612 iflag);
2613 (cmdiocbq->iocb_cmpl)(phba, cmdiocbq,
2614 &rspiocbq);
2615 spin_lock_irqsave(&phba->hbalock,
2616 iflag);
2617 }
2618 }
2619 break;
2620 case LPFC_UNSOL_IOCB:
2621 spin_unlock_irqrestore(&phba->hbalock, iflag);
2622 lpfc_sli_process_unsol_iocb(phba, pring, &rspiocbq);
2623 spin_lock_irqsave(&phba->hbalock, iflag);
2624 break;
2625 default:
2626 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
2627 char adaptermsg[LPFC_MAX_ADPTMSG];
2628 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
2629 memcpy(&adaptermsg[0], (uint8_t *) irsp,
2630 MAX_MSG_DATA);
2631 dev_warn(&((phba->pcidev)->dev),
2632 "lpfc%d: %s\n",
2633 phba->brd_no, adaptermsg);
2634 } else {
2635 /* Unknown IOCB command */
2636 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2637 "0334 Unknown IOCB command "
2638 "Data: x%x, x%x x%x x%x x%x\n",
2639 type, irsp->ulpCommand,
2640 irsp->ulpStatus,
2641 irsp->ulpIoTag,
2642 irsp->ulpContext);
2643 }
2644 break;
2645 }
2646
2647 /*
2648 * The response IOCB has been processed. Update the ring
2649 * pointer in SLIM. If the port response put pointer has not
2650 * been updated, sync the pgp->rspPutInx and fetch the new port
2651 * response put pointer.
2652 */
2653 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
2654
2655 if (pring->rspidx == portRspPut)
2656 portRspPut = le32_to_cpu(pgp->rspPutInx);
2657 }
2658
2659 if ((rsp_cmpl > 0) && (mask & HA_R0RE_REQ)) {
2660 pring->stats.iocb_rsp_full++;
2661 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
2662 writel(status, phba->CAregaddr);
2663 readl(phba->CAregaddr);
2664 }
2665 if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
2666 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
2667 pring->stats.iocb_cmd_empty++;
2668
2669 /* Force update of the local copy of cmdGetInx */
2670 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
2671 lpfc_sli_resume_iocb(phba, pring);
2672
2673 if ((pring->lpfc_sli_cmd_available))
2674 (pring->lpfc_sli_cmd_available) (phba, pring);
2675
2676 }
2677
2678 spin_unlock_irqrestore(&phba->hbalock, iflag);
2679 return rc;
2680 }
2681
2682 /**
2683 * lpfc_sli_sp_handle_rspiocb - Handle slow-path response iocb
2684 * @phba: Pointer to HBA context object.
2685 * @pring: Pointer to driver SLI ring object.
2686 * @rspiocbp: Pointer to driver response IOCB object.
2687 *
2688 * This function is called from the worker thread when there is a slow-path
2689 * response IOCB to process. This function chains all the response iocbs until
2690 * seeing the iocb with the LE bit set. The function will call
2691 * lpfc_sli_process_sol_iocb function if the response iocb indicates a
2692 * completion of a command iocb. The function will call the
2693 * lpfc_sli_process_unsol_iocb function if this is an unsolicited iocb.
2694 * The function frees the resources or calls the completion handler if this
2695 * iocb is an abort completion. The function returns NULL when the response
2696 * iocb has the LE bit set and all the chained iocbs are processed, otherwise
2697 * this function shall chain the iocb on to the iocb_continueq and return the
2698 * response iocb passed in.
2699 **/
2700 static struct lpfc_iocbq *
2701 lpfc_sli_sp_handle_rspiocb(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
2702 struct lpfc_iocbq *rspiocbp)
2703 {
2704 struct lpfc_iocbq *saveq;
2705 struct lpfc_iocbq *cmdiocbp;
2706 struct lpfc_iocbq *next_iocb;
2707 IOCB_t *irsp = NULL;
2708 uint32_t free_saveq;
2709 uint8_t iocb_cmd_type;
2710 lpfc_iocb_type type;
2711 unsigned long iflag;
2712 int rc;
2713
2714 spin_lock_irqsave(&phba->hbalock, iflag);
2715 /* First add the response iocb to the countinueq list */
2716 list_add_tail(&rspiocbp->list, &(pring->iocb_continueq));
2717 pring->iocb_continueq_cnt++;
2718
2719 /* Now, determine whetehr the list is completed for processing */
2720 irsp = &rspiocbp->iocb;
2721 if (irsp->ulpLe) {
2722 /*
2723 * By default, the driver expects to free all resources
2724 * associated with this iocb completion.
2725 */
2726 free_saveq = 1;
2727 saveq = list_get_first(&pring->iocb_continueq,
2728 struct lpfc_iocbq, list);
2729 irsp = &(saveq->iocb);
2730 list_del_init(&pring->iocb_continueq);
2731 pring->iocb_continueq_cnt = 0;
2732
2733 pring->stats.iocb_rsp++;
2734
2735 /*
2736 * If resource errors reported from HBA, reduce
2737 * queuedepths of the SCSI device.
2738 */
2739 if ((irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
2740 (irsp->un.ulpWord[4] == IOERR_NO_RESOURCES)) {
2741 spin_unlock_irqrestore(&phba->hbalock, iflag);
2742 phba->lpfc_rampdown_queue_depth(phba);
2743 spin_lock_irqsave(&phba->hbalock, iflag);
2744 }
2745
2746 if (irsp->ulpStatus) {
2747 /* Rsp ring <ringno> error: IOCB */
2748 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
2749 "0328 Rsp Ring %d error: "
2750 "IOCB Data: "
2751 "x%x x%x x%x x%x "
2752 "x%x x%x x%x x%x "
2753 "x%x x%x x%x x%x "
2754 "x%x x%x x%x x%x\n",
2755 pring->ringno,
2756 irsp->un.ulpWord[0],
2757 irsp->un.ulpWord[1],
2758 irsp->un.ulpWord[2],
2759 irsp->un.ulpWord[3],
2760 irsp->un.ulpWord[4],
2761 irsp->un.ulpWord[5],
2762 *(((uint32_t *) irsp) + 6),
2763 *(((uint32_t *) irsp) + 7),
2764 *(((uint32_t *) irsp) + 8),
2765 *(((uint32_t *) irsp) + 9),
2766 *(((uint32_t *) irsp) + 10),
2767 *(((uint32_t *) irsp) + 11),
2768 *(((uint32_t *) irsp) + 12),
2769 *(((uint32_t *) irsp) + 13),
2770 *(((uint32_t *) irsp) + 14),
2771 *(((uint32_t *) irsp) + 15));
2772 }
2773
2774 /*
2775 * Fetch the IOCB command type and call the correct completion
2776 * routine. Solicited and Unsolicited IOCBs on the ELS ring
2777 * get freed back to the lpfc_iocb_list by the discovery
2778 * kernel thread.
2779 */
2780 iocb_cmd_type = irsp->ulpCommand & CMD_IOCB_MASK;
2781 type = lpfc_sli_iocb_cmd_type(iocb_cmd_type);
2782 switch (type) {
2783 case LPFC_SOL_IOCB:
2784 spin_unlock_irqrestore(&phba->hbalock, iflag);
2785 rc = lpfc_sli_process_sol_iocb(phba, pring, saveq);
2786 spin_lock_irqsave(&phba->hbalock, iflag);
2787 break;
2788
2789 case LPFC_UNSOL_IOCB:
2790 spin_unlock_irqrestore(&phba->hbalock, iflag);
2791 rc = lpfc_sli_process_unsol_iocb(phba, pring, saveq);
2792 spin_lock_irqsave(&phba->hbalock, iflag);
2793 if (!rc)
2794 free_saveq = 0;
2795 break;
2796
2797 case LPFC_ABORT_IOCB:
2798 cmdiocbp = NULL;
2799 if (irsp->ulpCommand != CMD_XRI_ABORTED_CX)
2800 cmdiocbp = lpfc_sli_iocbq_lookup(phba, pring,
2801 saveq);
2802 if (cmdiocbp) {
2803 /* Call the specified completion routine */
2804 if (cmdiocbp->iocb_cmpl) {
2805 spin_unlock_irqrestore(&phba->hbalock,
2806 iflag);
2807 (cmdiocbp->iocb_cmpl)(phba, cmdiocbp,
2808 saveq);
2809 spin_lock_irqsave(&phba->hbalock,
2810 iflag);
2811 } else
2812 __lpfc_sli_release_iocbq(phba,
2813 cmdiocbp);
2814 }
2815 break;
2816
2817 case LPFC_UNKNOWN_IOCB:
2818 if (irsp->ulpCommand == CMD_ADAPTER_MSG) {
2819 char adaptermsg[LPFC_MAX_ADPTMSG];
2820 memset(adaptermsg, 0, LPFC_MAX_ADPTMSG);
2821 memcpy(&adaptermsg[0], (uint8_t *)irsp,
2822 MAX_MSG_DATA);
2823 dev_warn(&((phba->pcidev)->dev),
2824 "lpfc%d: %s\n",
2825 phba->brd_no, adaptermsg);
2826 } else {
2827 /* Unknown IOCB command */
2828 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2829 "0335 Unknown IOCB "
2830 "command Data: x%x "
2831 "x%x x%x x%x\n",
2832 irsp->ulpCommand,
2833 irsp->ulpStatus,
2834 irsp->ulpIoTag,
2835 irsp->ulpContext);
2836 }
2837 break;
2838 }
2839
2840 if (free_saveq) {
2841 list_for_each_entry_safe(rspiocbp, next_iocb,
2842 &saveq->list, list) {
2843 list_del(&rspiocbp->list);
2844 __lpfc_sli_release_iocbq(phba, rspiocbp);
2845 }
2846 __lpfc_sli_release_iocbq(phba, saveq);
2847 }
2848 rspiocbp = NULL;
2849 }
2850 spin_unlock_irqrestore(&phba->hbalock, iflag);
2851 return rspiocbp;
2852 }
2853
2854 /**
2855 * lpfc_sli_handle_slow_ring_event - Wrapper func for handling slow-path iocbs
2856 * @phba: Pointer to HBA context object.
2857 * @pring: Pointer to driver SLI ring object.
2858 * @mask: Host attention register mask for this ring.
2859 *
2860 * This routine wraps the actual slow_ring event process routine from the
2861 * API jump table function pointer from the lpfc_hba struct.
2862 **/
2863 void
2864 lpfc_sli_handle_slow_ring_event(struct lpfc_hba *phba,
2865 struct lpfc_sli_ring *pring, uint32_t mask)
2866 {
2867 phba->lpfc_sli_handle_slow_ring_event(phba, pring, mask);
2868 }
2869
2870 /**
2871 * lpfc_sli_handle_slow_ring_event_s3 - Handle SLI3 ring event for non-FCP rings
2872 * @phba: Pointer to HBA context object.
2873 * @pring: Pointer to driver SLI ring object.
2874 * @mask: Host attention register mask for this ring.
2875 *
2876 * This function is called from the worker thread when there is a ring event
2877 * for non-fcp rings. The caller does not hold any lock. The function will
2878 * remove each response iocb in the response ring and calls the handle
2879 * response iocb routine (lpfc_sli_sp_handle_rspiocb) to process it.
2880 **/
2881 static void
2882 lpfc_sli_handle_slow_ring_event_s3(struct lpfc_hba *phba,
2883 struct lpfc_sli_ring *pring, uint32_t mask)
2884 {
2885 struct lpfc_pgp *pgp;
2886 IOCB_t *entry;
2887 IOCB_t *irsp = NULL;
2888 struct lpfc_iocbq *rspiocbp = NULL;
2889 uint32_t portRspPut, portRspMax;
2890 unsigned long iflag;
2891 uint32_t status;
2892
2893 pgp = &phba->port_gp[pring->ringno];
2894 spin_lock_irqsave(&phba->hbalock, iflag);
2895 pring->stats.iocb_event++;
2896
2897 /*
2898 * The next available response entry should never exceed the maximum
2899 * entries. If it does, treat it as an adapter hardware error.
2900 */
2901 portRspMax = pring->numRiocb;
2902 portRspPut = le32_to_cpu(pgp->rspPutInx);
2903 if (portRspPut >= portRspMax) {
2904 /*
2905 * Ring <ringno> handler: portRspPut <portRspPut> is bigger than
2906 * rsp ring <portRspMax>
2907 */
2908 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
2909 "0303 Ring %d handler: portRspPut %d "
2910 "is bigger than rsp ring %d\n",
2911 pring->ringno, portRspPut, portRspMax);
2912
2913 phba->link_state = LPFC_HBA_ERROR;
2914 spin_unlock_irqrestore(&phba->hbalock, iflag);
2915
2916 phba->work_hs = HS_FFER3;
2917 lpfc_handle_eratt(phba);
2918
2919 return;
2920 }
2921
2922 rmb();
2923 while (pring->rspidx != portRspPut) {
2924 /*
2925 * Build a completion list and call the appropriate handler.
2926 * The process is to get the next available response iocb, get
2927 * a free iocb from the list, copy the response data into the
2928 * free iocb, insert to the continuation list, and update the
2929 * next response index to slim. This process makes response
2930 * iocb's in the ring available to DMA as fast as possible but
2931 * pays a penalty for a copy operation. Since the iocb is
2932 * only 32 bytes, this penalty is considered small relative to
2933 * the PCI reads for register values and a slim write. When
2934 * the ulpLe field is set, the entire Command has been
2935 * received.
2936 */
2937 entry = lpfc_resp_iocb(phba, pring);
2938
2939 phba->last_completion_time = jiffies;
2940 rspiocbp = __lpfc_sli_get_iocbq(phba);
2941 if (rspiocbp == NULL) {
2942 printk(KERN_ERR "%s: out of buffers! Failing "
2943 "completion.\n", __func__);
2944 break;
2945 }
2946
2947 lpfc_sli_pcimem_bcopy(entry, &rspiocbp->iocb,
2948 phba->iocb_rsp_size);
2949 irsp = &rspiocbp->iocb;
2950
2951 if (++pring->rspidx >= portRspMax)
2952 pring->rspidx = 0;
2953
2954 if (pring->ringno == LPFC_ELS_RING) {
2955 lpfc_debugfs_slow_ring_trc(phba,
2956 "IOCB rsp ring: wd4:x%08x wd6:x%08x wd7:x%08x",
2957 *(((uint32_t *) irsp) + 4),
2958 *(((uint32_t *) irsp) + 6),
2959 *(((uint32_t *) irsp) + 7));
2960 }
2961
2962 writel(pring->rspidx, &phba->host_gp[pring->ringno].rspGetInx);
2963
2964 spin_unlock_irqrestore(&phba->hbalock, iflag);
2965 /* Handle the response IOCB */
2966 rspiocbp = lpfc_sli_sp_handle_rspiocb(phba, pring, rspiocbp);
2967 spin_lock_irqsave(&phba->hbalock, iflag);
2968
2969 /*
2970 * If the port response put pointer has not been updated, sync
2971 * the pgp->rspPutInx in the MAILBOX_tand fetch the new port
2972 * response put pointer.
2973 */
2974 if (pring->rspidx == portRspPut) {
2975 portRspPut = le32_to_cpu(pgp->rspPutInx);
2976 }
2977 } /* while (pring->rspidx != portRspPut) */
2978
2979 if ((rspiocbp != NULL) && (mask & HA_R0RE_REQ)) {
2980 /* At least one response entry has been freed */
2981 pring->stats.iocb_rsp_full++;
2982 /* SET RxRE_RSP in Chip Att register */
2983 status = ((CA_R0ATT | CA_R0RE_RSP) << (pring->ringno * 4));
2984 writel(status, phba->CAregaddr);
2985 readl(phba->CAregaddr); /* flush */
2986 }
2987 if ((mask & HA_R0CE_RSP) && (pring->flag & LPFC_CALL_RING_AVAILABLE)) {
2988 pring->flag &= ~LPFC_CALL_RING_AVAILABLE;
2989 pring->stats.iocb_cmd_empty++;
2990
2991 /* Force update of the local copy of cmdGetInx */
2992 pring->local_getidx = le32_to_cpu(pgp->cmdGetInx);
2993 lpfc_sli_resume_iocb(phba, pring);
2994
2995 if ((pring->lpfc_sli_cmd_available))
2996 (pring->lpfc_sli_cmd_available) (phba, pring);
2997
2998 }
2999
3000 spin_unlock_irqrestore(&phba->hbalock, iflag);
3001 return;
3002 }
3003
3004 /**
3005 * lpfc_sli_handle_slow_ring_event_s4 - Handle SLI4 slow-path els events
3006 * @phba: Pointer to HBA context object.
3007 * @pring: Pointer to driver SLI ring object.
3008 * @mask: Host attention register mask for this ring.
3009 *
3010 * This function is called from the worker thread when there is a pending
3011 * ELS response iocb on the driver internal slow-path response iocb worker
3012 * queue. The caller does not hold any lock. The function will remove each
3013 * response iocb from the response worker queue and calls the handle
3014 * response iocb routine (lpfc_sli_sp_handle_rspiocb) to process it.
3015 **/
3016 static void
3017 lpfc_sli_handle_slow_ring_event_s4(struct lpfc_hba *phba,
3018 struct lpfc_sli_ring *pring, uint32_t mask)
3019 {
3020 struct lpfc_iocbq *irspiocbq;
3021 unsigned long iflag;
3022
3023 while (!list_empty(&phba->sli4_hba.sp_rspiocb_work_queue)) {
3024 /* Get the response iocb from the head of work queue */
3025 spin_lock_irqsave(&phba->hbalock, iflag);
3026 list_remove_head(&phba->sli4_hba.sp_rspiocb_work_queue,
3027 irspiocbq, struct lpfc_iocbq, list);
3028 spin_unlock_irqrestore(&phba->hbalock, iflag);
3029 /* Process the response iocb */
3030 lpfc_sli_sp_handle_rspiocb(phba, pring, irspiocbq);
3031 }
3032 }
3033
3034 /**
3035 * lpfc_sli_abort_iocb_ring - Abort all iocbs in the ring
3036 * @phba: Pointer to HBA context object.
3037 * @pring: Pointer to driver SLI ring object.
3038 *
3039 * This function aborts all iocbs in the given ring and frees all the iocb
3040 * objects in txq. This function issues an abort iocb for all the iocb commands
3041 * in txcmplq. The iocbs in the txcmplq is not guaranteed to complete before
3042 * the return of this function. The caller is not required to hold any locks.
3043 **/
3044 void
3045 lpfc_sli_abort_iocb_ring(struct lpfc_hba *phba, struct lpfc_sli_ring *pring)
3046 {
3047 LIST_HEAD(completions);
3048 struct lpfc_iocbq *iocb, *next_iocb;
3049
3050 if (pring->ringno == LPFC_ELS_RING) {
3051 lpfc_fabric_abort_hba(phba);
3052 }
3053
3054 /* Error everything on txq and txcmplq
3055 * First do the txq.
3056 */
3057 spin_lock_irq(&phba->hbalock);
3058 list_splice_init(&pring->txq, &completions);
3059 pring->txq_cnt = 0;
3060
3061 /* Next issue ABTS for everything on the txcmplq */
3062 list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list)
3063 lpfc_sli_issue_abort_iotag(phba, pring, iocb);
3064
3065 spin_unlock_irq(&phba->hbalock);
3066
3067 /* Cancel all the IOCBs from the completions list */
3068 lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
3069 IOERR_SLI_ABORTED);
3070 }
3071
3072 /**
3073 * lpfc_sli_flush_fcp_rings - flush all iocbs in the fcp ring
3074 * @phba: Pointer to HBA context object.
3075 *
3076 * This function flushes all iocbs in the fcp ring and frees all the iocb
3077 * objects in txq and txcmplq. This function will not issue abort iocbs
3078 * for all the iocb commands in txcmplq, they will just be returned with
3079 * IOERR_SLI_DOWN. This function is invoked with EEH when device's PCI
3080 * slot has been permanently disabled.
3081 **/
3082 void
3083 lpfc_sli_flush_fcp_rings(struct lpfc_hba *phba)
3084 {
3085 LIST_HEAD(txq);
3086 LIST_HEAD(txcmplq);
3087 struct lpfc_sli *psli = &phba->sli;
3088 struct lpfc_sli_ring *pring;
3089
3090 /* Currently, only one fcp ring */
3091 pring = &psli->ring[psli->fcp_ring];
3092
3093 spin_lock_irq(&phba->hbalock);
3094 /* Retrieve everything on txq */
3095 list_splice_init(&pring->txq, &txq);
3096 pring->txq_cnt = 0;
3097
3098 /* Retrieve everything on the txcmplq */
3099 list_splice_init(&pring->txcmplq, &txcmplq);
3100 pring->txcmplq_cnt = 0;
3101 spin_unlock_irq(&phba->hbalock);
3102
3103 /* Flush the txq */
3104 lpfc_sli_cancel_iocbs(phba, &txq, IOSTAT_LOCAL_REJECT,
3105 IOERR_SLI_DOWN);
3106
3107 /* Flush the txcmpq */
3108 lpfc_sli_cancel_iocbs(phba, &txcmplq, IOSTAT_LOCAL_REJECT,
3109 IOERR_SLI_DOWN);
3110 }
3111
3112 /**
3113 * lpfc_sli_brdready_s3 - Check for sli3 host ready status
3114 * @phba: Pointer to HBA context object.
3115 * @mask: Bit mask to be checked.
3116 *
3117 * This function reads the host status register and compares
3118 * with the provided bit mask to check if HBA completed
3119 * the restart. This function will wait in a loop for the
3120 * HBA to complete restart. If the HBA does not restart within
3121 * 15 iterations, the function will reset the HBA again. The
3122 * function returns 1 when HBA fail to restart otherwise returns
3123 * zero.
3124 **/
3125 static int
3126 lpfc_sli_brdready_s3(struct lpfc_hba *phba, uint32_t mask)
3127 {
3128 uint32_t status;
3129 int i = 0;
3130 int retval = 0;
3131
3132 /* Read the HBA Host Status Register */
3133 status = readl(phba->HSregaddr);
3134
3135 /*
3136 * Check status register every 100ms for 5 retries, then every
3137 * 500ms for 5, then every 2.5 sec for 5, then reset board and
3138 * every 2.5 sec for 4.
3139 * Break our of the loop if errors occurred during init.
3140 */
3141 while (((status & mask) != mask) &&
3142 !(status & HS_FFERM) &&
3143 i++ < 20) {
3144
3145 if (i <= 5)
3146 msleep(10);
3147 else if (i <= 10)
3148 msleep(500);
3149 else
3150 msleep(2500);
3151
3152 if (i == 15) {
3153 /* Do post */
3154 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
3155 lpfc_sli_brdrestart(phba);
3156 }
3157 /* Read the HBA Host Status Register */
3158 status = readl(phba->HSregaddr);
3159 }
3160
3161 /* Check to see if any errors occurred during init */
3162 if ((status & HS_FFERM) || (i >= 20)) {
3163 phba->link_state = LPFC_HBA_ERROR;
3164 retval = 1;
3165 }
3166
3167 return retval;
3168 }
3169
3170 /**
3171 * lpfc_sli_brdready_s4 - Check for sli4 host ready status
3172 * @phba: Pointer to HBA context object.
3173 * @mask: Bit mask to be checked.
3174 *
3175 * This function checks the host status register to check if HBA is
3176 * ready. This function will wait in a loop for the HBA to be ready
3177 * If the HBA is not ready , the function will will reset the HBA PCI
3178 * function again. The function returns 1 when HBA fail to be ready
3179 * otherwise returns zero.
3180 **/
3181 static int
3182 lpfc_sli_brdready_s4(struct lpfc_hba *phba, uint32_t mask)
3183 {
3184 uint32_t status;
3185 int retval = 0;
3186
3187 /* Read the HBA Host Status Register */
3188 status = lpfc_sli4_post_status_check(phba);
3189
3190 if (status) {
3191 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
3192 lpfc_sli_brdrestart(phba);
3193 status = lpfc_sli4_post_status_check(phba);
3194 }
3195
3196 /* Check to see if any errors occurred during init */
3197 if (status) {
3198 phba->link_state = LPFC_HBA_ERROR;
3199 retval = 1;
3200 } else
3201 phba->sli4_hba.intr_enable = 0;
3202
3203 return retval;
3204 }
3205
3206 /**
3207 * lpfc_sli_brdready - Wrapper func for checking the hba readyness
3208 * @phba: Pointer to HBA context object.
3209 * @mask: Bit mask to be checked.
3210 *
3211 * This routine wraps the actual SLI3 or SLI4 hba readyness check routine
3212 * from the API jump table function pointer from the lpfc_hba struct.
3213 **/
3214 int
3215 lpfc_sli_brdready(struct lpfc_hba *phba, uint32_t mask)
3216 {
3217 return phba->lpfc_sli_brdready(phba, mask);
3218 }
3219
3220 #define BARRIER_TEST_PATTERN (0xdeadbeef)
3221
3222 /**
3223 * lpfc_reset_barrier - Make HBA ready for HBA reset
3224 * @phba: Pointer to HBA context object.
3225 *
3226 * This function is called before resetting an HBA. This
3227 * function requests HBA to quiesce DMAs before a reset.
3228 **/
3229 void lpfc_reset_barrier(struct lpfc_hba *phba)
3230 {
3231 uint32_t __iomem *resp_buf;
3232 uint32_t __iomem *mbox_buf;
3233 volatile uint32_t mbox;
3234 uint32_t hc_copy;
3235 int i;
3236 uint8_t hdrtype;
3237
3238 pci_read_config_byte(phba->pcidev, PCI_HEADER_TYPE, &hdrtype);
3239 if (hdrtype != 0x80 ||
3240 (FC_JEDEC_ID(phba->vpd.rev.biuRev) != HELIOS_JEDEC_ID &&
3241 FC_JEDEC_ID(phba->vpd.rev.biuRev) != THOR_JEDEC_ID))
3242 return;
3243
3244 /*
3245 * Tell the other part of the chip to suspend temporarily all
3246 * its DMA activity.
3247 */
3248 resp_buf = phba->MBslimaddr;
3249
3250 /* Disable the error attention */
3251 hc_copy = readl(phba->HCregaddr);
3252 writel((hc_copy & ~HC_ERINT_ENA), phba->HCregaddr);
3253 readl(phba->HCregaddr); /* flush */
3254 phba->link_flag |= LS_IGNORE_ERATT;
3255
3256 if (readl(phba->HAregaddr) & HA_ERATT) {
3257 /* Clear Chip error bit */
3258 writel(HA_ERATT, phba->HAregaddr);
3259 phba->pport->stopped = 1;
3260 }
3261
3262 mbox = 0;
3263 ((MAILBOX_t *)&mbox)->mbxCommand = MBX_KILL_BOARD;
3264 ((MAILBOX_t *)&mbox)->mbxOwner = OWN_CHIP;
3265
3266 writel(BARRIER_TEST_PATTERN, (resp_buf + 1));
3267 mbox_buf = phba->MBslimaddr;
3268 writel(mbox, mbox_buf);
3269
3270 for (i = 0;
3271 readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN) && i < 50; i++)
3272 mdelay(1);
3273
3274 if (readl(resp_buf + 1) != ~(BARRIER_TEST_PATTERN)) {
3275 if (phba->sli.sli_flag & LPFC_SLI_ACTIVE ||
3276 phba->pport->stopped)
3277 goto restore_hc;
3278 else
3279 goto clear_errat;
3280 }
3281
3282 ((MAILBOX_t *)&mbox)->mbxOwner = OWN_HOST;
3283 for (i = 0; readl(resp_buf) != mbox && i < 500; i++)
3284 mdelay(1);
3285
3286 clear_errat:
3287
3288 while (!(readl(phba->HAregaddr) & HA_ERATT) && ++i < 500)
3289 mdelay(1);
3290
3291 if (readl(phba->HAregaddr) & HA_ERATT) {
3292 writel(HA_ERATT, phba->HAregaddr);
3293 phba->pport->stopped = 1;
3294 }
3295
3296 restore_hc:
3297 phba->link_flag &= ~LS_IGNORE_ERATT;
3298 writel(hc_copy, phba->HCregaddr);
3299 readl(phba->HCregaddr); /* flush */
3300 }
3301
3302 /**
3303 * lpfc_sli_brdkill - Issue a kill_board mailbox command
3304 * @phba: Pointer to HBA context object.
3305 *
3306 * This function issues a kill_board mailbox command and waits for
3307 * the error attention interrupt. This function is called for stopping
3308 * the firmware processing. The caller is not required to hold any
3309 * locks. This function calls lpfc_hba_down_post function to free
3310 * any pending commands after the kill. The function will return 1 when it
3311 * fails to kill the board else will return 0.
3312 **/
3313 int
3314 lpfc_sli_brdkill(struct lpfc_hba *phba)
3315 {
3316 struct lpfc_sli *psli;
3317 LPFC_MBOXQ_t *pmb;
3318 uint32_t status;
3319 uint32_t ha_copy;
3320 int retval;
3321 int i = 0;
3322
3323 psli = &phba->sli;
3324
3325 /* Kill HBA */
3326 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3327 "0329 Kill HBA Data: x%x x%x\n",
3328 phba->pport->port_state, psli->sli_flag);
3329
3330 pmb = (LPFC_MBOXQ_t *) mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3331 if (!pmb)
3332 return 1;
3333
3334 /* Disable the error attention */
3335 spin_lock_irq(&phba->hbalock);
3336 status = readl(phba->HCregaddr);
3337 status &= ~HC_ERINT_ENA;
3338 writel(status, phba->HCregaddr);
3339 readl(phba->HCregaddr); /* flush */
3340 phba->link_flag |= LS_IGNORE_ERATT;
3341 spin_unlock_irq(&phba->hbalock);
3342
3343 lpfc_kill_board(phba, pmb);
3344 pmb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
3345 retval = lpfc_sli_issue_mbox(phba, pmb, MBX_NOWAIT);
3346
3347 if (retval != MBX_SUCCESS) {
3348 if (retval != MBX_BUSY)
3349 mempool_free(pmb, phba->mbox_mem_pool);
3350 spin_lock_irq(&phba->hbalock);
3351 phba->link_flag &= ~LS_IGNORE_ERATT;
3352 spin_unlock_irq(&phba->hbalock);
3353 return 1;
3354 }
3355
3356 spin_lock_irq(&phba->hbalock);
3357 psli->sli_flag &= ~LPFC_SLI_ACTIVE;
3358 spin_unlock_irq(&phba->hbalock);
3359
3360 mempool_free(pmb, phba->mbox_mem_pool);
3361
3362 /* There is no completion for a KILL_BOARD mbox cmd. Check for an error
3363 * attention every 100ms for 3 seconds. If we don't get ERATT after
3364 * 3 seconds we still set HBA_ERROR state because the status of the
3365 * board is now undefined.
3366 */
3367 ha_copy = readl(phba->HAregaddr);
3368
3369 while ((i++ < 30) && !(ha_copy & HA_ERATT)) {
3370 mdelay(100);
3371 ha_copy = readl(phba->HAregaddr);
3372 }
3373
3374 del_timer_sync(&psli->mbox_tmo);
3375 if (ha_copy & HA_ERATT) {
3376 writel(HA_ERATT, phba->HAregaddr);
3377 phba->pport->stopped = 1;
3378 }
3379 spin_lock_irq(&phba->hbalock);
3380 psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
3381 psli->mbox_active = NULL;
3382 phba->link_flag &= ~LS_IGNORE_ERATT;
3383 spin_unlock_irq(&phba->hbalock);
3384
3385 lpfc_hba_down_post(phba);
3386 phba->link_state = LPFC_HBA_ERROR;
3387
3388 return ha_copy & HA_ERATT ? 0 : 1;
3389 }
3390
3391 /**
3392 * lpfc_sli_brdreset - Reset a sli-2 or sli-3 HBA
3393 * @phba: Pointer to HBA context object.
3394 *
3395 * This function resets the HBA by writing HC_INITFF to the control
3396 * register. After the HBA resets, this function resets all the iocb ring
3397 * indices. This function disables PCI layer parity checking during
3398 * the reset.
3399 * This function returns 0 always.
3400 * The caller is not required to hold any locks.
3401 **/
3402 int
3403 lpfc_sli_brdreset(struct lpfc_hba *phba)
3404 {
3405 struct lpfc_sli *psli;
3406 struct lpfc_sli_ring *pring;
3407 uint16_t cfg_value;
3408 int i;
3409
3410 psli = &phba->sli;
3411
3412 /* Reset HBA */
3413 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3414 "0325 Reset HBA Data: x%x x%x\n",
3415 phba->pport->port_state, psli->sli_flag);
3416
3417 /* perform board reset */
3418 phba->fc_eventTag = 0;
3419 phba->pport->fc_myDID = 0;
3420 phba->pport->fc_prevDID = 0;
3421
3422 /* Turn off parity checking and serr during the physical reset */
3423 pci_read_config_word(phba->pcidev, PCI_COMMAND, &cfg_value);
3424 pci_write_config_word(phba->pcidev, PCI_COMMAND,
3425 (cfg_value &
3426 ~(PCI_COMMAND_PARITY | PCI_COMMAND_SERR)));
3427
3428 psli->sli_flag &= ~(LPFC_SLI_ACTIVE | LPFC_PROCESS_LA);
3429
3430 /* Now toggle INITFF bit in the Host Control Register */
3431 writel(HC_INITFF, phba->HCregaddr);
3432 mdelay(1);
3433 readl(phba->HCregaddr); /* flush */
3434 writel(0, phba->HCregaddr);
3435 readl(phba->HCregaddr); /* flush */
3436
3437 /* Restore PCI cmd register */
3438 pci_write_config_word(phba->pcidev, PCI_COMMAND, cfg_value);
3439
3440 /* Initialize relevant SLI info */
3441 for (i = 0; i < psli->num_rings; i++) {
3442 pring = &psli->ring[i];
3443 pring->flag = 0;
3444 pring->rspidx = 0;
3445 pring->next_cmdidx = 0;
3446 pring->local_getidx = 0;
3447 pring->cmdidx = 0;
3448 pring->missbufcnt = 0;
3449 }
3450
3451 phba->link_state = LPFC_WARM_START;
3452 return 0;
3453 }
3454
3455 /**
3456 * lpfc_sli4_brdreset - Reset a sli-4 HBA
3457 * @phba: Pointer to HBA context object.
3458 *
3459 * This function resets a SLI4 HBA. This function disables PCI layer parity
3460 * checking during resets the device. The caller is not required to hold
3461 * any locks.
3462 *
3463 * This function returns 0 always.
3464 **/
3465 int
3466 lpfc_sli4_brdreset(struct lpfc_hba *phba)
3467 {
3468 struct lpfc_sli *psli = &phba->sli;
3469 uint16_t cfg_value;
3470 uint8_t qindx;
3471
3472 /* Reset HBA */
3473 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3474 "0295 Reset HBA Data: x%x x%x\n",
3475 phba->pport->port_state, psli->sli_flag);
3476
3477 /* perform board reset */
3478 phba->fc_eventTag = 0;
3479 phba->pport->fc_myDID = 0;
3480 phba->pport->fc_prevDID = 0;
3481
3482 /* Turn off parity checking and serr during the physical reset */
3483 pci_read_config_word(phba->pcidev, PCI_COMMAND, &cfg_value);
3484 pci_write_config_word(phba->pcidev, PCI_COMMAND,
3485 (cfg_value &
3486 ~(PCI_COMMAND_PARITY | PCI_COMMAND_SERR)));
3487
3488 spin_lock_irq(&phba->hbalock);
3489 psli->sli_flag &= ~(LPFC_PROCESS_LA);
3490 phba->fcf.fcf_flag = 0;
3491 /* Clean up the child queue list for the CQs */
3492 list_del_init(&phba->sli4_hba.mbx_wq->list);
3493 list_del_init(&phba->sli4_hba.els_wq->list);
3494 list_del_init(&phba->sli4_hba.hdr_rq->list);
3495 list_del_init(&phba->sli4_hba.dat_rq->list);
3496 list_del_init(&phba->sli4_hba.mbx_cq->list);
3497 list_del_init(&phba->sli4_hba.els_cq->list);
3498 list_del_init(&phba->sli4_hba.rxq_cq->list);
3499 for (qindx = 0; qindx < phba->cfg_fcp_wq_count; qindx++)
3500 list_del_init(&phba->sli4_hba.fcp_wq[qindx]->list);
3501 for (qindx = 0; qindx < phba->cfg_fcp_eq_count; qindx++)
3502 list_del_init(&phba->sli4_hba.fcp_cq[qindx]->list);
3503 spin_unlock_irq(&phba->hbalock);
3504
3505 /* Now physically reset the device */
3506 lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
3507 "0389 Performing PCI function reset!\n");
3508 /* Perform FCoE PCI function reset */
3509 lpfc_pci_function_reset(phba);
3510
3511 return 0;
3512 }
3513
3514 /**
3515 * lpfc_sli_brdrestart_s3 - Restart a sli-3 hba
3516 * @phba: Pointer to HBA context object.
3517 *
3518 * This function is called in the SLI initialization code path to
3519 * restart the HBA. The caller is not required to hold any lock.
3520 * This function writes MBX_RESTART mailbox command to the SLIM and
3521 * resets the HBA. At the end of the function, it calls lpfc_hba_down_post
3522 * function to free any pending commands. The function enables
3523 * POST only during the first initialization. The function returns zero.
3524 * The function does not guarantee completion of MBX_RESTART mailbox
3525 * command before the return of this function.
3526 **/
3527 static int
3528 lpfc_sli_brdrestart_s3(struct lpfc_hba *phba)
3529 {
3530 MAILBOX_t *mb;
3531 struct lpfc_sli *psli;
3532 volatile uint32_t word0;
3533 void __iomem *to_slim;
3534
3535 spin_lock_irq(&phba->hbalock);
3536
3537 psli = &phba->sli;
3538
3539 /* Restart HBA */
3540 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3541 "0337 Restart HBA Data: x%x x%x\n",
3542 phba->pport->port_state, psli->sli_flag);
3543
3544 word0 = 0;
3545 mb = (MAILBOX_t *) &word0;
3546 mb->mbxCommand = MBX_RESTART;
3547 mb->mbxHc = 1;
3548
3549 lpfc_reset_barrier(phba);
3550
3551 to_slim = phba->MBslimaddr;
3552 writel(*(uint32_t *) mb, to_slim);
3553 readl(to_slim); /* flush */
3554
3555 /* Only skip post after fc_ffinit is completed */
3556 if (phba->pport->port_state)
3557 word0 = 1; /* This is really setting up word1 */
3558 else
3559 word0 = 0; /* This is really setting up word1 */
3560 to_slim = phba->MBslimaddr + sizeof (uint32_t);
3561 writel(*(uint32_t *) mb, to_slim);
3562 readl(to_slim); /* flush */
3563
3564 lpfc_sli_brdreset(phba);
3565 phba->pport->stopped = 0;
3566 phba->link_state = LPFC_INIT_START;
3567 phba->hba_flag = 0;
3568 spin_unlock_irq(&phba->hbalock);
3569
3570 memset(&psli->lnk_stat_offsets, 0, sizeof(psli->lnk_stat_offsets));
3571 psli->stats_start = get_seconds();
3572
3573 /* Give the INITFF and Post time to settle. */
3574 mdelay(100);
3575
3576 lpfc_hba_down_post(phba);
3577
3578 return 0;
3579 }
3580
3581 /**
3582 * lpfc_sli_brdrestart_s4 - Restart the sli-4 hba
3583 * @phba: Pointer to HBA context object.
3584 *
3585 * This function is called in the SLI initialization code path to restart
3586 * a SLI4 HBA. The caller is not required to hold any lock.
3587 * At the end of the function, it calls lpfc_hba_down_post function to
3588 * free any pending commands.
3589 **/
3590 static int
3591 lpfc_sli_brdrestart_s4(struct lpfc_hba *phba)
3592 {
3593 struct lpfc_sli *psli = &phba->sli;
3594
3595
3596 /* Restart HBA */
3597 lpfc_printf_log(phba, KERN_INFO, LOG_SLI,
3598 "0296 Restart HBA Data: x%x x%x\n",
3599 phba->pport->port_state, psli->sli_flag);
3600
3601 lpfc_sli4_brdreset(phba);
3602
3603 spin_lock_irq(&phba->hbalock);
3604 phba->pport->stopped = 0;
3605 phba->link_state = LPFC_INIT_START;
3606 phba->hba_flag = 0;
3607 spin_unlock_irq(&phba->hbalock);
3608
3609 memset(&psli->lnk_stat_offsets, 0, sizeof(psli->lnk_stat_offsets));
3610 psli->stats_start = get_seconds();
3611
3612 lpfc_hba_down_post(phba);
3613
3614 return 0;
3615 }
3616
3617 /**
3618 * lpfc_sli_brdrestart - Wrapper func for restarting hba
3619 * @phba: Pointer to HBA context object.
3620 *
3621 * This routine wraps the actual SLI3 or SLI4 hba restart routine from the
3622 * API jump table function pointer from the lpfc_hba struct.
3623 **/
3624 int
3625 lpfc_sli_brdrestart(struct lpfc_hba *phba)
3626 {
3627 return phba->lpfc_sli_brdrestart(phba);
3628 }
3629
3630 /**
3631 * lpfc_sli_chipset_init - Wait for the restart of the HBA after a restart
3632 * @phba: Pointer to HBA context object.
3633 *
3634 * This function is called after a HBA restart to wait for successful
3635 * restart of the HBA. Successful restart of the HBA is indicated by
3636 * HS_FFRDY and HS_MBRDY bits. If the HBA fails to restart even after 15
3637 * iteration, the function will restart the HBA again. The function returns
3638 * zero if HBA successfully restarted else returns negative error code.
3639 **/
3640 static int
3641 lpfc_sli_chipset_init(struct lpfc_hba *phba)
3642 {
3643 uint32_t status, i = 0;
3644
3645 /* Read the HBA Host Status Register */
3646 status = readl(phba->HSregaddr);
3647
3648 /* Check status register to see what current state is */
3649 i = 0;
3650 while ((status & (HS_FFRDY | HS_MBRDY)) != (HS_FFRDY | HS_MBRDY)) {
3651
3652 /* Check every 100ms for 5 retries, then every 500ms for 5, then
3653 * every 2.5 sec for 5, then reset board and every 2.5 sec for
3654 * 4.
3655 */
3656 if (i++ >= 20) {
3657 /* Adapter failed to init, timeout, status reg
3658 <status> */
3659 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3660 "0436 Adapter failed to init, "
3661 "timeout, status reg x%x, "
3662 "FW Data: A8 x%x AC x%x\n", status,
3663 readl(phba->MBslimaddr + 0xa8),
3664 readl(phba->MBslimaddr + 0xac));
3665 phba->link_state = LPFC_HBA_ERROR;
3666 return -ETIMEDOUT;
3667 }
3668
3669 /* Check to see if any errors occurred during init */
3670 if (status & HS_FFERM) {
3671 /* ERROR: During chipset initialization */
3672 /* Adapter failed to init, chipset, status reg
3673 <status> */
3674 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3675 "0437 Adapter failed to init, "
3676 "chipset, status reg x%x, "
3677 "FW Data: A8 x%x AC x%x\n", status,
3678 readl(phba->MBslimaddr + 0xa8),
3679 readl(phba->MBslimaddr + 0xac));
3680 phba->link_state = LPFC_HBA_ERROR;
3681 return -EIO;
3682 }
3683
3684 if (i <= 5) {
3685 msleep(10);
3686 } else if (i <= 10) {
3687 msleep(500);
3688 } else {
3689 msleep(2500);
3690 }
3691
3692 if (i == 15) {
3693 /* Do post */
3694 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
3695 lpfc_sli_brdrestart(phba);
3696 }
3697 /* Read the HBA Host Status Register */
3698 status = readl(phba->HSregaddr);
3699 }
3700
3701 /* Check to see if any errors occurred during init */
3702 if (status & HS_FFERM) {
3703 /* ERROR: During chipset initialization */
3704 /* Adapter failed to init, chipset, status reg <status> */
3705 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3706 "0438 Adapter failed to init, chipset, "
3707 "status reg x%x, "
3708 "FW Data: A8 x%x AC x%x\n", status,
3709 readl(phba->MBslimaddr + 0xa8),
3710 readl(phba->MBslimaddr + 0xac));
3711 phba->link_state = LPFC_HBA_ERROR;
3712 return -EIO;
3713 }
3714
3715 /* Clear all interrupt enable conditions */
3716 writel(0, phba->HCregaddr);
3717 readl(phba->HCregaddr); /* flush */
3718
3719 /* setup host attn register */
3720 writel(0xffffffff, phba->HAregaddr);
3721 readl(phba->HAregaddr); /* flush */
3722 return 0;
3723 }
3724
3725 /**
3726 * lpfc_sli_hbq_count - Get the number of HBQs to be configured
3727 *
3728 * This function calculates and returns the number of HBQs required to be
3729 * configured.
3730 **/
3731 int
3732 lpfc_sli_hbq_count(void)
3733 {
3734 return ARRAY_SIZE(lpfc_hbq_defs);
3735 }
3736
3737 /**
3738 * lpfc_sli_hbq_entry_count - Calculate total number of hbq entries
3739 *
3740 * This function adds the number of hbq entries in every HBQ to get
3741 * the total number of hbq entries required for the HBA and returns
3742 * the total count.
3743 **/
3744 static int