2 * IBM Accelerator Family 'GenWQE'
4 * (C) Copyright IBM Corp. 2013
6 * Author: Frank Haverkamp <haver@linux.vnet.ibm.com>
7 * Author: Joerg-Stephan Vogt <jsvogt@de.ibm.com>
8 * Author: Michael Jung <mijung@de.ibm.com>
9 * Author: Michael Ruettger <michael@ibmra.de>
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License (version 2 only)
13 * as published by the Free Software Foundation.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
22 * Device Driver Control Block (DDCB) queue support. Definition of
23 * interrupt handlers for queue support as well as triggering the
24 * health monitor code in case of problems. The current hardware uses
25 * an MSI interrupt which is shared between error handling and
29 #include <linux/types.h>
30 #include <linux/module.h>
31 #include <linux/sched.h>
32 #include <linux/wait.h>
33 #include <linux/pci.h>
34 #include <linux/string.h>
35 #include <linux/dma-mapping.h>
36 #include <linux/delay.h>
37 #include <linux/module.h>
38 #include <linux/interrupt.h>
39 #include <linux/crc-itu-t.h>
41 #include "card_base.h"
42 #include "card_ddcb.h"
45 * N: next DDCB, this is where the next DDCB will be put.
46 * A: active DDCB, this is where the code will look for the next completion.
47 * x: DDCB is enqueued, we are waiting for its completion.
49 * Situation (1): Empty queue
50 * +---+---+---+---+---+---+---+---+
51 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
53 * +---+---+---+---+---+---+---+---+
55 * enqueued_ddcbs = A - N = 2 - 2 = 0
57 * Situation (2): Wrapped, N > A
58 * +---+---+---+---+---+---+---+---+
59 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
60 * | | | x | x | | | | |
61 * +---+---+---+---+---+---+---+---+
63 * enqueued_ddcbs = N - A = 4 - 2 = 2
65 * Situation (3): Queue wrapped, A > N
66 * +---+---+---+---+---+---+---+---+
67 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
68 * | x | x | | | x | x | x | x |
69 * +---+---+---+---+---+---+---+---+
71 * enqueued_ddcbs = queue_max - (A - N) = 8 - (4 - 2) = 6
73 * Situation (4a): Queue full N > A
74 * +---+---+---+---+---+---+---+---+
75 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
76 * | x | x | x | x | x | x | x | |
77 * +---+---+---+---+---+---+---+---+
80 * enqueued_ddcbs = N - A = 7 - 0 = 7
82 * Situation (4a): Queue full A > N
83 * +---+---+---+---+---+---+---+---+
84 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
85 * | x | x | x | | x | x | x | x |
86 * +---+---+---+---+---+---+---+---+
88 * enqueued_ddcbs = queue_max - (A - N) = 8 - (4 - 3) = 7
91 static int queue_empty(struct ddcb_queue
*queue
)
93 return queue
->ddcb_next
== queue
->ddcb_act
;
96 static int queue_enqueued_ddcbs(struct ddcb_queue
*queue
)
98 if (queue
->ddcb_next
>= queue
->ddcb_act
)
99 return queue
->ddcb_next
- queue
->ddcb_act
;
101 return queue
->ddcb_max
- (queue
->ddcb_act
- queue
->ddcb_next
);
104 static int queue_free_ddcbs(struct ddcb_queue
*queue
)
106 int free_ddcbs
= queue
->ddcb_max
- queue_enqueued_ddcbs(queue
) - 1;
108 if (WARN_ON_ONCE(free_ddcbs
< 0)) { /* must never ever happen! */
115 * Use of the PRIV field in the DDCB for queue debugging:
117 * (1) Trying to get rid of a DDCB which saw a timeout:
118 * pddcb->priv[6] = 0xcc; # cleared
120 * (2) Append a DDCB via NEXT bit:
121 * pddcb->priv[7] = 0xaa; # appended
123 * (3) DDCB needed tapping:
124 * pddcb->priv[7] = 0xbb; # tapped
126 * (4) DDCB marked as correctly finished:
127 * pddcb->priv[6] = 0xff; # finished
130 static inline void ddcb_mark_tapped(struct ddcb
*pddcb
)
132 pddcb
->priv
[7] = 0xbb; /* tapped */
135 static inline void ddcb_mark_appended(struct ddcb
*pddcb
)
137 pddcb
->priv
[7] = 0xaa; /* appended */
140 static inline void ddcb_mark_cleared(struct ddcb
*pddcb
)
142 pddcb
->priv
[6] = 0xcc; /* cleared */
145 static inline void ddcb_mark_finished(struct ddcb
*pddcb
)
147 pddcb
->priv
[6] = 0xff; /* finished */
150 static inline void ddcb_mark_unused(struct ddcb
*pddcb
)
152 pddcb
->priv_64
= cpu_to_be64(0); /* not tapped */
156 * genwqe_crc16() - Generate 16-bit crc as required for DDCBs
157 * @buff: pointer to data buffer
158 * @len: length of data for calculation
159 * @init: initial crc (0xffff at start)
161 * Polynomial = x^16 + x^12 + x^5 + 1 (0x1021)
162 * Example: 4 bytes 0x01 0x02 0x03 0x04 with init = 0xffff
163 * should result in a crc16 of 0x89c3
165 * Return: crc16 checksum in big endian format !
167 static inline u16
genwqe_crc16(const u8
*buff
, size_t len
, u16 init
)
169 return crc_itu_t(init
, buff
, len
);
172 static void print_ddcb_info(struct genwqe_dev
*cd
, struct ddcb_queue
*queue
)
177 struct pci_dev
*pci_dev
= cd
->pci_dev
;
179 spin_lock_irqsave(&cd
->print_lock
, flags
);
181 dev_info(&pci_dev
->dev
,
182 "DDCB list for card #%d (ddcb_act=%d / ddcb_next=%d):\n",
183 cd
->card_idx
, queue
->ddcb_act
, queue
->ddcb_next
);
185 pddcb
= queue
->ddcb_vaddr
;
186 for (i
= 0; i
< queue
->ddcb_max
; i
++) {
187 dev_err(&pci_dev
->dev
,
188 " %c %-3d: RETC=%03x SEQ=%04x "
189 "HSI=%02X SHI=%02x PRIV=%06llx CMD=%03x\n",
190 i
== queue
->ddcb_act
? '>' : ' ',
192 be16_to_cpu(pddcb
->retc_16
),
193 be16_to_cpu(pddcb
->seqnum_16
),
196 be64_to_cpu(pddcb
->priv_64
),
200 spin_unlock_irqrestore(&cd
->print_lock
, flags
);
203 struct genwqe_ddcb_cmd
*ddcb_requ_alloc(void)
205 struct ddcb_requ
*req
;
207 req
= kzalloc(sizeof(*req
), GFP_ATOMIC
);
214 void ddcb_requ_free(struct genwqe_ddcb_cmd
*cmd
)
216 struct ddcb_requ
*req
= container_of(cmd
, struct ddcb_requ
, cmd
);
220 static inline enum genwqe_requ_state
ddcb_requ_get_state(struct ddcb_requ
*req
)
222 return req
->req_state
;
225 static inline void ddcb_requ_set_state(struct ddcb_requ
*req
,
226 enum genwqe_requ_state new_state
)
228 req
->req_state
= new_state
;
231 static inline int ddcb_requ_collect_debug_data(struct ddcb_requ
*req
)
233 return req
->cmd
.ddata_addr
!= 0x0;
237 * ddcb_requ_finished() - Returns the hardware state of the associated DDCB
238 * @cd: pointer to genwqe device descriptor
239 * @req: DDCB work request
241 * Status of ddcb_requ mirrors this hardware state, but is copied in
242 * the ddcb_requ on interrupt/polling function. The lowlevel code
243 * should check the hardware state directly, the higher level code
244 * should check the copy.
246 * This function will also return true if the state of the queue is
247 * not GENWQE_CARD_USED. This enables us to purge all DDCBs in the
250 static int ddcb_requ_finished(struct genwqe_dev
*cd
, struct ddcb_requ
*req
)
252 return (ddcb_requ_get_state(req
) == GENWQE_REQU_FINISHED
) ||
253 (cd
->card_state
!= GENWQE_CARD_USED
);
257 * enqueue_ddcb() - Enqueue a DDCB
258 * @cd: pointer to genwqe device descriptor
259 * @queue: queue this operation should be done on
260 * @ddcb_no: pointer to ddcb number being tapped
262 * Start execution of DDCB by tapping or append to queue via NEXT
263 * bit. This is done by an atomic 'compare and swap' instruction and
264 * checking SHI and HSI of the previous DDCB.
266 * This function must only be called with ddcb_lock held.
268 * Return: 1 if new DDCB is appended to previous
269 * 2 if DDCB queue is tapped via register/simulation
271 #define RET_DDCB_APPENDED 1
272 #define RET_DDCB_TAPPED 2
274 static int enqueue_ddcb(struct genwqe_dev
*cd
, struct ddcb_queue
*queue
,
275 struct ddcb
*pddcb
, int ddcb_no
)
279 struct ddcb
*prev_ddcb
;
280 __be32 old
, new, icrc_hsi_shi
;
284 * For performance checks a Dispatch Timestamp can be put into
285 * DDCB It is supposed to use the SLU's free running counter,
286 * but this requires PCIe cycles.
288 ddcb_mark_unused(pddcb
);
290 /* check previous DDCB if already fetched */
291 prev_no
= (ddcb_no
== 0) ? queue
->ddcb_max
- 1 : ddcb_no
- 1;
292 prev_ddcb
= &queue
->ddcb_vaddr
[prev_no
];
295 * It might have happened that the HSI.FETCHED bit is
296 * set. Retry in this case. Therefore I expect maximum 2 times
299 ddcb_mark_appended(pddcb
);
300 for (try = 0; try < 2; try++) {
301 old
= prev_ddcb
->icrc_hsi_shi_32
; /* read SHI/HSI in BE32 */
303 /* try to append via NEXT bit if prev DDCB is not completed */
304 if ((old
& DDCB_COMPLETED_BE32
) != 0x00000000)
307 new = (old
| DDCB_NEXT_BE32
);
308 icrc_hsi_shi
= cmpxchg(&prev_ddcb
->icrc_hsi_shi_32
, old
, new);
310 if (icrc_hsi_shi
== old
)
311 return RET_DDCB_APPENDED
; /* appended to queue */
314 /* Queue must be re-started by updating QUEUE_OFFSET */
315 ddcb_mark_tapped(pddcb
);
316 num
= (u64
)ddcb_no
<< 8;
317 __genwqe_writeq(cd
, queue
->IO_QUEUE_OFFSET
, num
); /* start queue */
319 return RET_DDCB_TAPPED
;
323 * copy_ddcb_results() - Copy output state from real DDCB to request
325 * Copy DDCB ASV to request struct. There is no endian
326 * conversion made, since data structure in ASV is still
330 * - genwqe_purge_ddcb()
331 * - genwqe_check_ddcb_queue()
333 static void copy_ddcb_results(struct ddcb_requ
*req
, int ddcb_no
)
335 struct ddcb_queue
*queue
= req
->queue
;
336 struct ddcb
*pddcb
= &queue
->ddcb_vaddr
[req
->num
];
338 memcpy(&req
->cmd
.asv
[0], &pddcb
->asv
[0], DDCB_ASV_LENGTH
);
340 /* copy status flags of the variant part */
341 req
->cmd
.vcrc
= be16_to_cpu(pddcb
->vcrc_16
);
342 req
->cmd
.deque_ts
= be64_to_cpu(pddcb
->deque_ts_64
);
343 req
->cmd
.cmplt_ts
= be64_to_cpu(pddcb
->cmplt_ts_64
);
345 req
->cmd
.attn
= be16_to_cpu(pddcb
->attn_16
);
346 req
->cmd
.progress
= be32_to_cpu(pddcb
->progress_32
);
347 req
->cmd
.retc
= be16_to_cpu(pddcb
->retc_16
);
349 if (ddcb_requ_collect_debug_data(req
)) {
350 int prev_no
= (ddcb_no
== 0) ?
351 queue
->ddcb_max
- 1 : ddcb_no
- 1;
352 struct ddcb
*prev_pddcb
= &queue
->ddcb_vaddr
[prev_no
];
354 memcpy(&req
->debug_data
.ddcb_finished
, pddcb
,
355 sizeof(req
->debug_data
.ddcb_finished
));
356 memcpy(&req
->debug_data
.ddcb_prev
, prev_pddcb
,
357 sizeof(req
->debug_data
.ddcb_prev
));
362 * genwqe_check_ddcb_queue() - Checks DDCB queue for completed work equests.
363 * @cd: pointer to genwqe device descriptor
365 * Return: Number of DDCBs which were finished
367 static int genwqe_check_ddcb_queue(struct genwqe_dev
*cd
,
368 struct ddcb_queue
*queue
)
371 int ddcbs_finished
= 0;
372 struct pci_dev
*pci_dev
= cd
->pci_dev
;
374 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
376 /* FIXME avoid soft locking CPU */
377 while (!queue_empty(queue
) && (ddcbs_finished
< queue
->ddcb_max
)) {
380 struct ddcb_requ
*req
;
381 u16 vcrc
, vcrc_16
, retc_16
;
383 pddcb
= &queue
->ddcb_vaddr
[queue
->ddcb_act
];
385 if ((pddcb
->icrc_hsi_shi_32
& DDCB_COMPLETED_BE32
) ==
387 goto go_home
; /* not completed, continue waiting */
389 /* Note: DDCB could be purged */
391 req
= queue
->ddcb_req
[queue
->ddcb_act
];
393 /* this occurs if DDCB is purged, not an error */
394 /* Move active DDCB further; Nothing to do anymore. */
399 * HSI=0x44 (fetched and completed), but RETC is
400 * 0x101, or even worse 0x000.
402 * In case of seeing the queue in inconsistent state
403 * we read the errcnts and the queue status to provide
404 * a trigger for our PCIe analyzer stop capturing.
406 retc_16
= be16_to_cpu(pddcb
->retc_16
);
407 if ((pddcb
->hsi
== 0x44) && (retc_16
<= 0x101)) {
409 u64 ddcb_offs
= (u64
)pddcb
- (u64
)queue
->ddcb_vaddr
;
411 errcnts
= __genwqe_readq(cd
, queue
->IO_QUEUE_ERRCNTS
);
412 status
= __genwqe_readq(cd
, queue
->IO_QUEUE_STATUS
);
414 dev_err(&pci_dev
->dev
,
415 "[%s] SEQN=%04x HSI=%02x RETC=%03x "
416 " Q_ERRCNTS=%016llx Q_STATUS=%016llx\n"
417 " DDCB_DMA_ADDR=%016llx\n",
418 __func__
, be16_to_cpu(pddcb
->seqnum_16
),
419 pddcb
->hsi
, retc_16
, errcnts
, status
,
420 queue
->ddcb_daddr
+ ddcb_offs
);
423 copy_ddcb_results(req
, queue
->ddcb_act
);
424 queue
->ddcb_req
[queue
->ddcb_act
] = NULL
; /* take from queue */
426 dev_dbg(&pci_dev
->dev
, "FINISHED DDCB#%d\n", req
->num
);
427 genwqe_hexdump(pci_dev
, pddcb
, sizeof(*pddcb
));
429 ddcb_mark_finished(pddcb
);
431 /* calculate CRC_16 to see if VCRC is correct */
432 vcrc
= genwqe_crc16(pddcb
->asv
,
433 VCRC_LENGTH(req
->cmd
.asv_length
),
435 vcrc_16
= be16_to_cpu(pddcb
->vcrc_16
);
436 if (vcrc
!= vcrc_16
) {
437 printk_ratelimited(KERN_ERR
438 "%s %s: err: wrong VCRC pre=%02x vcrc_len=%d "
439 "bytes vcrc_data=%04x is not vcrc_card=%04x\n",
440 GENWQE_DEVNAME
, dev_name(&pci_dev
->dev
),
441 pddcb
->pre
, VCRC_LENGTH(req
->cmd
.asv_length
),
445 ddcb_requ_set_state(req
, GENWQE_REQU_FINISHED
);
446 queue
->ddcbs_completed
++;
447 queue
->ddcbs_in_flight
--;
449 /* wake up process waiting for this DDCB */
450 wake_up_interruptible(&queue
->ddcb_waitqs
[queue
->ddcb_act
]);
453 queue
->ddcb_act
= (queue
->ddcb_act
+ 1) % queue
->ddcb_max
;
458 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
459 return ddcbs_finished
;
463 * __genwqe_wait_ddcb(): Waits until DDCB is completed
464 * @cd: pointer to genwqe device descriptor
465 * @req: pointer to requsted DDCB parameters
467 * The Service Layer will update the RETC in DDCB when processing is
470 * Return: > 0 remaining jiffies, DDCB completed
471 * -ETIMEDOUT when timeout
472 * -ERESTARTSYS when ^C
473 * -EINVAL when unknown error condition
475 * When an error is returned the called needs to ensure that
476 * purge_ddcb() is being called to get the &req removed from the
479 int __genwqe_wait_ddcb(struct genwqe_dev
*cd
, struct ddcb_requ
*req
)
482 unsigned int ddcb_no
;
483 struct ddcb_queue
*queue
;
484 struct pci_dev
*pci_dev
= cd
->pci_dev
;
494 if (ddcb_no
>= queue
->ddcb_max
)
497 rc
= wait_event_interruptible_timeout(queue
->ddcb_waitqs
[ddcb_no
],
498 ddcb_requ_finished(cd
, req
),
499 genwqe_ddcb_software_timeout
* HZ
);
502 * We need to distinguish 3 cases here:
503 * 1. rc == 0 timeout occured
504 * 2. rc == -ERESTARTSYS signal received
505 * 3. rc > 0 remaining jiffies condition is true
508 struct ddcb_queue
*queue
= req
->queue
;
512 * Timeout may be caused by long task switching time.
513 * When timeout happens, check if the request has
514 * meanwhile completed.
516 genwqe_check_ddcb_queue(cd
, req
->queue
);
517 if (ddcb_requ_finished(cd
, req
))
520 dev_err(&pci_dev
->dev
,
521 "[%s] err: DDCB#%d timeout rc=%d state=%d req @ %p\n",
522 __func__
, req
->num
, rc
, ddcb_requ_get_state(req
),
524 dev_err(&pci_dev
->dev
,
525 "[%s] IO_QUEUE_STATUS=0x%016llx\n", __func__
,
526 __genwqe_readq(cd
, queue
->IO_QUEUE_STATUS
));
528 pddcb
= &queue
->ddcb_vaddr
[req
->num
];
529 genwqe_hexdump(pci_dev
, pddcb
, sizeof(*pddcb
));
531 print_ddcb_info(cd
, req
->queue
);
534 } else if (rc
== -ERESTARTSYS
) {
537 * EINTR: Stops the application
538 * ERESTARTSYS: Restartable systemcall; called again
542 dev_err(&pci_dev
->dev
,
543 "[%s] err: DDCB#%d unknown result (rc=%d) %d!\n",
544 __func__
, req
->num
, rc
, ddcb_requ_get_state(req
));
548 /* Severe error occured. Driver is forced to stop operation */
549 if (cd
->card_state
!= GENWQE_CARD_USED
) {
550 dev_err(&pci_dev
->dev
,
551 "[%s] err: DDCB#%d forced to stop (rc=%d)\n",
552 __func__
, req
->num
, rc
);
559 * get_next_ddcb() - Get next available DDCB
560 * @cd: pointer to genwqe device descriptor
562 * DDCB's content is completely cleared but presets for PRE and
563 * SEQNUM. This function must only be called when ddcb_lock is held.
565 * Return: NULL if no empty DDCB available otherwise ptr to next DDCB.
567 static struct ddcb
*get_next_ddcb(struct genwqe_dev
*cd
,
568 struct ddcb_queue
*queue
,
574 if (queue_free_ddcbs(queue
) == 0) /* queue is full */
578 pddcb
= &queue
->ddcb_vaddr
[queue
->ddcb_next
];
580 /* if it is not completed, we are not allowed to use it */
582 if ((pddcb
->icrc_hsi_shi_32
& DDCB_COMPLETED_BE32
) == 0x00000000)
585 *num
= queue
->ddcb_next
; /* internal DDCB number */
586 queue
->ddcb_next
= (queue
->ddcb_next
+ 1) % queue
->ddcb_max
;
588 /* clear important DDCB fields */
590 pu64
[0] = 0ULL; /* offs 0x00 (ICRC,HSI,SHI,...) */
591 pu64
[1] = 0ULL; /* offs 0x01 (ACFUNC,CMD...) */
593 /* destroy previous results in ASV */
594 pu64
[0x80/8] = 0ULL; /* offs 0x80 (ASV + 0) */
595 pu64
[0x88/8] = 0ULL; /* offs 0x88 (ASV + 0x08) */
596 pu64
[0x90/8] = 0ULL; /* offs 0x90 (ASV + 0x10) */
597 pu64
[0x98/8] = 0ULL; /* offs 0x98 (ASV + 0x18) */
598 pu64
[0xd0/8] = 0ULL; /* offs 0xd0 (RETC,ATTN...) */
600 pddcb
->pre
= DDCB_PRESET_PRE
; /* 128 */
601 pddcb
->seqnum_16
= cpu_to_be16(queue
->ddcb_seq
++);
606 * __genwqe_purge_ddcb() - Remove a DDCB from the workqueue
607 * @cd: genwqe device descriptor
610 * This will fail when the request was already FETCHED. In this case
611 * we need to wait until it is finished. Else the DDCB can be
612 * reused. This function also ensures that the request data structure
613 * is removed from ddcb_req[].
615 * Do not forget to call this function when genwqe_wait_ddcb() fails,
616 * such that the request gets really removed from ddcb_req[].
620 int __genwqe_purge_ddcb(struct genwqe_dev
*cd
, struct ddcb_requ
*req
)
622 struct ddcb
*pddcb
= NULL
;
625 struct ddcb_queue
*queue
= req
->queue
;
626 struct pci_dev
*pci_dev
= cd
->pci_dev
;
628 __be32 icrc_hsi_shi
= 0x0000;
631 /* unsigned long flags; */
632 if (genwqe_ddcb_software_timeout
<= 0) {
633 dev_err(&pci_dev
->dev
,
634 "[%s] err: software timeout is not set!\n", __func__
);
638 pddcb
= &queue
->ddcb_vaddr
[req
->num
];
640 for (t
= 0; t
< genwqe_ddcb_software_timeout
* 10; t
++) {
642 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
644 /* Check if req was meanwhile finished */
645 if (ddcb_requ_get_state(req
) == GENWQE_REQU_FINISHED
)
648 /* try to set PURGE bit if FETCHED/COMPLETED are not set */
649 old
= pddcb
->icrc_hsi_shi_32
; /* read SHI/HSI in BE32 */
650 if ((old
& DDCB_FETCHED_BE32
) == 0x00000000) {
652 new = (old
| DDCB_PURGE_BE32
);
653 icrc_hsi_shi
= cmpxchg(&pddcb
->icrc_hsi_shi_32
,
655 if (icrc_hsi_shi
== old
)
659 /* normal finish with HSI bit */
661 icrc_hsi_shi
= pddcb
->icrc_hsi_shi_32
;
662 if (icrc_hsi_shi
& DDCB_COMPLETED_BE32
)
665 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
668 * Here the check_ddcb() function will most likely
669 * discover this DDCB to be finished some point in
670 * time. It will mark the req finished and free it up
674 copy_ddcb_results(req
, req
->num
); /* for the failing case */
675 msleep(100); /* sleep for 1/10 second and try again */
679 copy_ddcb_results(req
, req
->num
);
680 ddcb_requ_set_state(req
, GENWQE_REQU_FINISHED
);
681 queue
->ddcbs_in_flight
--;
682 queue
->ddcb_req
[req
->num
] = NULL
; /* delete from array */
683 ddcb_mark_cleared(pddcb
);
685 /* Move active DDCB further; Nothing to do here anymore. */
688 * We need to ensure that there is at least one free
689 * DDCB in the queue. To do that, we must update
690 * ddcb_act only if the COMPLETED bit is set for the
691 * DDCB we are working on else we treat that DDCB even
692 * if we PURGED it as occupied (hardware is supposed
693 * to set the COMPLETED bit yet!).
695 icrc_hsi_shi
= pddcb
->icrc_hsi_shi_32
;
696 if ((icrc_hsi_shi
& DDCB_COMPLETED_BE32
) &&
697 (queue
->ddcb_act
== req
->num
)) {
698 queue
->ddcb_act
= ((queue
->ddcb_act
+ 1) %
702 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
707 * If the card is dead and the queue is forced to stop, we
708 * might see this in the queue status register.
710 queue_status
= __genwqe_readq(cd
, queue
->IO_QUEUE_STATUS
);
712 dev_dbg(&pci_dev
->dev
, "UN/FINISHED DDCB#%d\n", req
->num
);
713 genwqe_hexdump(pci_dev
, pddcb
, sizeof(*pddcb
));
715 dev_err(&pci_dev
->dev
,
716 "[%s] err: DDCB#%d not purged and not completed "
717 "after %d seconds QSTAT=%016llx!!\n",
718 __func__
, req
->num
, genwqe_ddcb_software_timeout
,
721 print_ddcb_info(cd
, req
->queue
);
726 int genwqe_init_debug_data(struct genwqe_dev
*cd
, struct genwqe_debug_data
*d
)
729 struct pci_dev
*pci_dev
= cd
->pci_dev
;
732 dev_err(&pci_dev
->dev
,
733 "[%s] err: invalid memory for debug data!\n",
738 len
= sizeof(d
->driver_version
);
739 snprintf(d
->driver_version
, len
, "%s", DRV_VERS_STRING
);
740 d
->slu_unitcfg
= cd
->slu_unitcfg
;
741 d
->app_unitcfg
= cd
->app_unitcfg
;
746 * __genwqe_enqueue_ddcb() - Enqueue a DDCB
747 * @cd: pointer to genwqe device descriptor
748 * @req: pointer to DDCB execution request
750 * Return: 0 if enqueuing succeeded
751 * -EIO if card is unusable/PCIe problems
752 * -EBUSY if enqueuing failed
754 int __genwqe_enqueue_ddcb(struct genwqe_dev
*cd
, struct ddcb_requ
*req
)
758 struct ddcb_queue
*queue
;
759 struct pci_dev
*pci_dev
= cd
->pci_dev
;
762 if (cd
->card_state
!= GENWQE_CARD_USED
) {
763 printk_ratelimited(KERN_ERR
764 "%s %s: [%s] Card is unusable/PCIe problem Req#%d\n",
765 GENWQE_DEVNAME
, dev_name(&pci_dev
->dev
),
770 queue
= req
->queue
= &cd
->queue
;
772 /* FIXME circumvention to improve performance when no irq is
775 if (genwqe_polling_enabled
)
776 genwqe_check_ddcb_queue(cd
, queue
);
779 * It must be ensured to process all DDCBs in successive
780 * order. Use a lock here in order to prevent nested DDCB
783 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
785 pddcb
= get_next_ddcb(cd
, queue
, &req
->num
); /* get ptr and num */
787 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
792 if (queue
->ddcb_req
[req
->num
] != NULL
) {
793 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
795 dev_err(&pci_dev
->dev
,
796 "[%s] picked DDCB %d with req=%p still in use!!\n",
797 __func__
, req
->num
, req
);
800 ddcb_requ_set_state(req
, GENWQE_REQU_ENQUEUED
);
801 queue
->ddcb_req
[req
->num
] = req
;
803 pddcb
->cmdopts_16
= cpu_to_be16(req
->cmd
.cmdopts
);
804 pddcb
->cmd
= req
->cmd
.cmd
;
805 pddcb
->acfunc
= req
->cmd
.acfunc
; /* functional unit */
808 * We know that we can get retc 0x104 with CRC error, do not
809 * stop the queue in those cases for this command. XDIR = 1
810 * does not work for old SLU versions.
812 * Last bitstream with the old XDIR behavior had SLU_ID
815 if ((cd
->slu_unitcfg
& 0xFFFF0ull
) > 0x34199ull
)
821 pddcb
->psp
= (((req
->cmd
.asiv_length
/ 8) << 4) |
822 ((req
->cmd
.asv_length
/ 8)));
823 pddcb
->disp_ts_64
= cpu_to_be64(req
->cmd
.disp_ts
);
826 * If copying the whole DDCB_ASIV_LENGTH is impacting
827 * performance we need to change it to
828 * req->cmd.asiv_length. But simulation benefits from some
829 * non-architectured bits behind the architectured content.
831 * How much data is copied depends on the availability of the
832 * ATS field, which was introduced late. If the ATS field is
833 * supported ASIV is 8 bytes shorter than it used to be. Since
834 * the ATS field is copied too, the code should do exactly
835 * what it did before, but I wanted to make copying of the ATS
836 * field very explicit.
838 if (genwqe_get_slu_id(cd
) <= 0x2) {
839 memcpy(&pddcb
->__asiv
[0], /* destination */
840 &req
->cmd
.__asiv
[0], /* source */
841 DDCB_ASIV_LENGTH
); /* req->cmd.asiv_length */
843 pddcb
->n
.ats_64
= cpu_to_be64(req
->cmd
.ats
);
844 memcpy(&pddcb
->n
.asiv
[0], /* destination */
845 &req
->cmd
.asiv
[0], /* source */
846 DDCB_ASIV_LENGTH_ATS
); /* req->cmd.asiv_length */
849 pddcb
->icrc_hsi_shi_32
= cpu_to_be32(0x00000000); /* for crc */
852 * Calculate CRC_16 for corresponding range PSP(7:4). Include
853 * empty 4 bytes prior to the data.
855 icrc
= genwqe_crc16((const u8
*)pddcb
,
856 ICRC_LENGTH(req
->cmd
.asiv_length
), 0xffff);
857 pddcb
->icrc_hsi_shi_32
= cpu_to_be32((u32
)icrc
<< 16);
859 /* enable DDCB completion irq */
860 if (!genwqe_polling_enabled
)
861 pddcb
->icrc_hsi_shi_32
|= DDCB_INTR_BE32
;
863 dev_dbg(&pci_dev
->dev
, "INPUT DDCB#%d\n", req
->num
);
864 genwqe_hexdump(pci_dev
, pddcb
, sizeof(*pddcb
));
866 if (ddcb_requ_collect_debug_data(req
)) {
867 /* use the kernel copy of debug data. copying back to
868 user buffer happens later */
870 genwqe_init_debug_data(cd
, &req
->debug_data
);
871 memcpy(&req
->debug_data
.ddcb_before
, pddcb
,
872 sizeof(req
->debug_data
.ddcb_before
));
875 enqueue_ddcb(cd
, queue
, pddcb
, req
->num
);
876 queue
->ddcbs_in_flight
++;
878 if (queue
->ddcbs_in_flight
> queue
->ddcbs_max_in_flight
)
879 queue
->ddcbs_max_in_flight
= queue
->ddcbs_in_flight
;
881 ddcb_requ_set_state(req
, GENWQE_REQU_TAPPED
);
882 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
883 wake_up_interruptible(&cd
->queue_waitq
);
889 * __genwqe_execute_raw_ddcb() - Setup and execute DDCB
890 * @cd: pointer to genwqe device descriptor
891 * @req: user provided DDCB request
893 int __genwqe_execute_raw_ddcb(struct genwqe_dev
*cd
,
894 struct genwqe_ddcb_cmd
*cmd
)
897 struct pci_dev
*pci_dev
= cd
->pci_dev
;
898 struct ddcb_requ
*req
= container_of(cmd
, struct ddcb_requ
, cmd
);
900 if (cmd
->asiv_length
> DDCB_ASIV_LENGTH
) {
901 dev_err(&pci_dev
->dev
, "[%s] err: wrong asiv_length of %d\n",
902 __func__
, cmd
->asiv_length
);
905 if (cmd
->asv_length
> DDCB_ASV_LENGTH
) {
906 dev_err(&pci_dev
->dev
, "[%s] err: wrong asv_length of %d\n",
907 __func__
, cmd
->asiv_length
);
910 rc
= __genwqe_enqueue_ddcb(cd
, req
);
914 rc
= __genwqe_wait_ddcb(cd
, req
);
915 if (rc
< 0) /* error or signal interrupt */
918 if (ddcb_requ_collect_debug_data(req
)) {
919 if (copy_to_user((struct genwqe_debug_data __user
*)
920 (unsigned long)cmd
->ddata_addr
,
922 sizeof(struct genwqe_debug_data
)))
927 * Higher values than 0x102 indicate completion with faults,
928 * lower values than 0x102 indicate processing faults. Note
929 * that DDCB might have been purged. E.g. Cntl+C.
931 if (cmd
->retc
!= DDCB_RETC_COMPLETE
) {
932 /* This might happen e.g. flash read, and needs to be
933 handled by the upper layer code. */
934 rc
= -EBADMSG
; /* not processed/error retc */
940 __genwqe_purge_ddcb(cd
, req
);
942 if (ddcb_requ_collect_debug_data(req
)) {
943 if (copy_to_user((struct genwqe_debug_data __user
*)
944 (unsigned long)cmd
->ddata_addr
,
946 sizeof(struct genwqe_debug_data
)))
953 * genwqe_next_ddcb_ready() - Figure out if the next DDCB is already finished
955 * We use this as condition for our wait-queue code.
957 static int genwqe_next_ddcb_ready(struct genwqe_dev
*cd
)
961 struct ddcb_queue
*queue
= &cd
->queue
;
963 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
965 if (queue_empty(queue
)) { /* emtpy queue */
966 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
970 pddcb
= &queue
->ddcb_vaddr
[queue
->ddcb_act
];
971 if (pddcb
->icrc_hsi_shi_32
& DDCB_COMPLETED_BE32
) { /* ddcb ready */
972 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
976 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
981 * genwqe_ddcbs_in_flight() - Check how many DDCBs are in flight
983 * Keep track on the number of DDCBs which ware currently in the
984 * queue. This is needed for statistics as well as conditon if we want
985 * to wait or better do polling in case of no interrupts available.
987 int genwqe_ddcbs_in_flight(struct genwqe_dev
*cd
)
990 int ddcbs_in_flight
= 0;
991 struct ddcb_queue
*queue
= &cd
->queue
;
993 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
994 ddcbs_in_flight
+= queue
->ddcbs_in_flight
;
995 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
997 return ddcbs_in_flight
;
1000 static int setup_ddcb_queue(struct genwqe_dev
*cd
, struct ddcb_queue
*queue
)
1005 unsigned int queue_size
;
1006 struct pci_dev
*pci_dev
= cd
->pci_dev
;
1008 if (genwqe_ddcb_max
< 2)
1011 queue_size
= roundup(genwqe_ddcb_max
* sizeof(struct ddcb
), PAGE_SIZE
);
1013 queue
->ddcbs_in_flight
= 0; /* statistics */
1014 queue
->ddcbs_max_in_flight
= 0;
1015 queue
->ddcbs_completed
= 0;
1018 queue
->ddcb_seq
= 0x100; /* start sequence number */
1019 queue
->ddcb_max
= genwqe_ddcb_max
; /* module parameter */
1020 queue
->ddcb_vaddr
= __genwqe_alloc_consistent(cd
, queue_size
,
1021 &queue
->ddcb_daddr
);
1022 if (queue
->ddcb_vaddr
== NULL
) {
1023 dev_err(&pci_dev
->dev
,
1024 "[%s] **err: could not allocate DDCB **\n", __func__
);
1027 memset(queue
->ddcb_vaddr
, 0, queue_size
);
1029 queue
->ddcb_req
= kzalloc(sizeof(struct ddcb_requ
*) *
1030 queue
->ddcb_max
, GFP_KERNEL
);
1031 if (!queue
->ddcb_req
) {
1036 queue
->ddcb_waitqs
= kzalloc(sizeof(wait_queue_head_t
) *
1037 queue
->ddcb_max
, GFP_KERNEL
);
1038 if (!queue
->ddcb_waitqs
) {
1043 for (i
= 0; i
< queue
->ddcb_max
; i
++) {
1044 pddcb
= &queue
->ddcb_vaddr
[i
]; /* DDCBs */
1045 pddcb
->icrc_hsi_shi_32
= DDCB_COMPLETED_BE32
;
1046 pddcb
->retc_16
= cpu_to_be16(0xfff);
1048 queue
->ddcb_req
[i
] = NULL
; /* requests */
1049 init_waitqueue_head(&queue
->ddcb_waitqs
[i
]); /* waitqueues */
1052 queue
->ddcb_act
= 0;
1053 queue
->ddcb_next
= 0; /* queue is empty */
1055 spin_lock_init(&queue
->ddcb_lock
);
1056 init_waitqueue_head(&queue
->ddcb_waitq
);
1058 val64
= ((u64
)(queue
->ddcb_max
- 1) << 8); /* lastptr */
1059 __genwqe_writeq(cd
, queue
->IO_QUEUE_CONFIG
, 0x07); /* iCRC/vCRC */
1060 __genwqe_writeq(cd
, queue
->IO_QUEUE_SEGMENT
, queue
->ddcb_daddr
);
1061 __genwqe_writeq(cd
, queue
->IO_QUEUE_INITSQN
, queue
->ddcb_seq
);
1062 __genwqe_writeq(cd
, queue
->IO_QUEUE_WRAP
, val64
);
1066 kfree(queue
->ddcb_req
);
1067 queue
->ddcb_req
= NULL
;
1069 __genwqe_free_consistent(cd
, queue_size
, queue
->ddcb_vaddr
,
1071 queue
->ddcb_vaddr
= NULL
;
1072 queue
->ddcb_daddr
= 0ull;
1077 static int ddcb_queue_initialized(struct ddcb_queue
*queue
)
1079 return queue
->ddcb_vaddr
!= NULL
;
1082 static void free_ddcb_queue(struct genwqe_dev
*cd
, struct ddcb_queue
*queue
)
1084 unsigned int queue_size
;
1086 queue_size
= roundup(queue
->ddcb_max
* sizeof(struct ddcb
), PAGE_SIZE
);
1088 kfree(queue
->ddcb_req
);
1089 queue
->ddcb_req
= NULL
;
1091 if (queue
->ddcb_vaddr
) {
1092 __genwqe_free_consistent(cd
, queue_size
, queue
->ddcb_vaddr
,
1094 queue
->ddcb_vaddr
= NULL
;
1095 queue
->ddcb_daddr
= 0ull;
1099 static irqreturn_t
genwqe_pf_isr(int irq
, void *dev_id
)
1102 struct genwqe_dev
*cd
= (struct genwqe_dev
*)dev_id
;
1103 struct pci_dev
*pci_dev
= cd
->pci_dev
;
1106 * In case of fatal FIR error the queue is stopped, such that
1107 * we can safely check it without risking anything.
1109 cd
->irqs_processed
++;
1110 wake_up_interruptible(&cd
->queue_waitq
);
1113 * Checking for errors before kicking the queue might be
1114 * safer, but slower for the good-case ... See above.
1116 gfir
= __genwqe_readq(cd
, IO_SLC_CFGREG_GFIR
);
1117 if ((gfir
& GFIR_ERR_TRIGGER
) != 0x0) {
1119 wake_up_interruptible(&cd
->health_waitq
);
1122 * By default GFIRs causes recovery actions. This
1123 * count is just for debug when recovery is masked.
1125 printk_ratelimited(KERN_ERR
1126 "%s %s: [%s] GFIR=%016llx\n",
1127 GENWQE_DEVNAME
, dev_name(&pci_dev
->dev
),
1134 static irqreturn_t
genwqe_vf_isr(int irq
, void *dev_id
)
1136 struct genwqe_dev
*cd
= (struct genwqe_dev
*)dev_id
;
1138 cd
->irqs_processed
++;
1139 wake_up_interruptible(&cd
->queue_waitq
);
1145 * genwqe_card_thread() - Work thread for the DDCB queue
1147 * The idea is to check if there are DDCBs in processing. If there are
1148 * some finished DDCBs, we process them and wakeup the
1149 * requestors. Otherwise we give other processes time using
1152 static int genwqe_card_thread(void *data
)
1154 int should_stop
= 0, rc
= 0;
1155 struct genwqe_dev
*cd
= (struct genwqe_dev
*)data
;
1157 while (!kthread_should_stop()) {
1159 genwqe_check_ddcb_queue(cd
, &cd
->queue
);
1161 if (genwqe_polling_enabled
) {
1162 rc
= wait_event_interruptible_timeout(
1164 genwqe_ddcbs_in_flight(cd
) ||
1165 (should_stop
= kthread_should_stop()), 1);
1167 rc
= wait_event_interruptible_timeout(
1169 genwqe_next_ddcb_ready(cd
) ||
1170 (should_stop
= kthread_should_stop()), HZ
);
1176 * Avoid soft lockups on heavy loads; we do not want
1177 * to disable our interrupts.
1185 * genwqe_setup_service_layer() - Setup DDCB queue
1186 * @cd: pointer to genwqe device descriptor
1188 * Allocate DDCBs. Configure Service Layer Controller (SLC).
1192 int genwqe_setup_service_layer(struct genwqe_dev
*cd
)
1195 struct ddcb_queue
*queue
;
1196 struct pci_dev
*pci_dev
= cd
->pci_dev
;
1198 if (genwqe_is_privileged(cd
)) {
1199 rc
= genwqe_card_reset(cd
);
1201 dev_err(&pci_dev
->dev
,
1202 "[%s] err: reset failed.\n", __func__
);
1205 genwqe_read_softreset(cd
);
1209 queue
->IO_QUEUE_CONFIG
= IO_SLC_QUEUE_CONFIG
;
1210 queue
->IO_QUEUE_STATUS
= IO_SLC_QUEUE_STATUS
;
1211 queue
->IO_QUEUE_SEGMENT
= IO_SLC_QUEUE_SEGMENT
;
1212 queue
->IO_QUEUE_INITSQN
= IO_SLC_QUEUE_INITSQN
;
1213 queue
->IO_QUEUE_OFFSET
= IO_SLC_QUEUE_OFFSET
;
1214 queue
->IO_QUEUE_WRAP
= IO_SLC_QUEUE_WRAP
;
1215 queue
->IO_QUEUE_WTIME
= IO_SLC_QUEUE_WTIME
;
1216 queue
->IO_QUEUE_ERRCNTS
= IO_SLC_QUEUE_ERRCNTS
;
1217 queue
->IO_QUEUE_LRW
= IO_SLC_QUEUE_LRW
;
1219 rc
= setup_ddcb_queue(cd
, queue
);
1225 init_waitqueue_head(&cd
->queue_waitq
);
1226 cd
->card_thread
= kthread_run(genwqe_card_thread
, cd
,
1227 GENWQE_DEVNAME
"%d_thread",
1229 if (IS_ERR(cd
->card_thread
)) {
1230 rc
= PTR_ERR(cd
->card_thread
);
1231 cd
->card_thread
= NULL
;
1232 goto stop_free_queue
;
1235 rc
= genwqe_set_interrupt_capability(cd
, GENWQE_MSI_IRQS
);
1237 rc
= genwqe_set_interrupt_capability(cd
, rc
);
1244 * We must have all wait-queues initialized when we enable the
1245 * interrupts. Otherwise we might crash if we get an early
1248 init_waitqueue_head(&cd
->health_waitq
);
1250 if (genwqe_is_privileged(cd
)) {
1251 rc
= request_irq(pci_dev
->irq
, genwqe_pf_isr
, IRQF_SHARED
,
1252 GENWQE_DEVNAME
, cd
);
1254 rc
= request_irq(pci_dev
->irq
, genwqe_vf_isr
, IRQF_SHARED
,
1255 GENWQE_DEVNAME
, cd
);
1258 dev_err(&pci_dev
->dev
, "irq %d not free.\n", pci_dev
->irq
);
1262 cd
->card_state
= GENWQE_CARD_USED
;
1266 genwqe_reset_interrupt_capability(cd
);
1268 kthread_stop(cd
->card_thread
);
1269 cd
->card_thread
= NULL
;
1271 free_ddcb_queue(cd
, queue
);
1277 * queue_wake_up_all() - Handles fatal error case
1279 * The PCI device got unusable and we have to stop all pending
1280 * requests as fast as we can. The code after this must purge the
1281 * DDCBs in question and ensure that all mappings are freed.
1283 static int queue_wake_up_all(struct genwqe_dev
*cd
)
1286 unsigned long flags
;
1287 struct ddcb_queue
*queue
= &cd
->queue
;
1289 spin_lock_irqsave(&queue
->ddcb_lock
, flags
);
1291 for (i
= 0; i
< queue
->ddcb_max
; i
++)
1292 wake_up_interruptible(&queue
->ddcb_waitqs
[queue
->ddcb_act
]);
1294 spin_unlock_irqrestore(&queue
->ddcb_lock
, flags
);
1300 * genwqe_finish_queue() - Remove any genwqe devices and user-interfaces
1302 * Relies on the pre-condition that there are no users of the card
1303 * device anymore e.g. with open file-descriptors.
1305 * This function must be robust enough to be called twice.
1307 int genwqe_finish_queue(struct genwqe_dev
*cd
)
1309 int i
, rc
, in_flight
;
1310 int waitmax
= genwqe_ddcb_software_timeout
;
1311 struct pci_dev
*pci_dev
= cd
->pci_dev
;
1312 struct ddcb_queue
*queue
= &cd
->queue
;
1314 if (!ddcb_queue_initialized(queue
))
1317 /* Do not wipe out the error state. */
1318 if (cd
->card_state
== GENWQE_CARD_USED
)
1319 cd
->card_state
= GENWQE_CARD_UNUSED
;
1321 /* Wake up all requests in the DDCB queue such that they
1322 should be removed nicely. */
1323 queue_wake_up_all(cd
);
1325 /* We must wait to get rid of the DDCBs in flight */
1326 for (i
= 0; i
< waitmax
; i
++) {
1327 in_flight
= genwqe_ddcbs_in_flight(cd
);
1332 dev_dbg(&pci_dev
->dev
,
1333 " DEBUG [%d/%d] waiting for queue to get empty: "
1334 "%d requests!\n", i
, waitmax
, in_flight
);
1337 * Severe severe error situation: The card itself has
1338 * 16 DDCB queues, each queue has e.g. 32 entries,
1339 * each DDBC has a hardware timeout of currently 250
1340 * msec but the PFs have a hardware timeout of 8 sec
1341 * ... so I take something large.
1346 dev_err(&pci_dev
->dev
, " [%s] err: queue is not empty!!\n",
1354 * genwqe_release_service_layer() - Shutdown DDCB queue
1355 * @cd: genwqe device descriptor
1357 * This function must be robust enough to be called twice.
1359 int genwqe_release_service_layer(struct genwqe_dev
*cd
)
1361 struct pci_dev
*pci_dev
= cd
->pci_dev
;
1363 if (!ddcb_queue_initialized(&cd
->queue
))
1366 free_irq(pci_dev
->irq
, cd
);
1367 genwqe_reset_interrupt_capability(cd
);
1369 if (cd
->card_thread
!= NULL
) {
1370 kthread_stop(cd
->card_thread
);
1371 cd
->card_thread
= NULL
;
1374 free_ddcb_queue(cd
, &cd
->queue
);