Loading...
1/*
2 * Copyright (C) 2001-2004 by David Brownell
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU General Public License as published by the
6 * Free Software Foundation; either version 2 of the License, or (at your
7 * option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software Foundation,
16 * Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 */
18
19/* this file is part of ehci-hcd.c */
20
21/*-------------------------------------------------------------------------*/
22
23/*
24 * EHCI hardware queue manipulation ... the core. QH/QTD manipulation.
25 *
26 * Control, bulk, and interrupt traffic all use "qh" lists. They list "qtd"
27 * entries describing USB transactions, max 16-20kB/entry (with 4kB-aligned
28 * buffers needed for the larger number). We use one QH per endpoint, queue
29 * multiple urbs (all three types) per endpoint. URBs may need several qtds.
30 *
31 * ISO traffic uses "ISO TD" (itd, and sitd) records, and (along with
32 * interrupts) needs careful scheduling. Performance improvements can be
33 * an ongoing challenge. That's in "ehci-sched.c".
34 *
35 * USB 1.1 devices are handled (a) by "companion" OHCI or UHCI root hubs,
36 * or otherwise through transaction translators (TTs) in USB 2.0 hubs using
37 * (b) special fields in qh entries or (c) split iso entries. TTs will
38 * buffer low/full speed data so the host collects it at high speed.
39 */
40
41/*-------------------------------------------------------------------------*/
42
43/* fill a qtd, returning how much of the buffer we were able to queue up */
44
45static int
46qtd_fill(struct ehci_hcd *ehci, struct ehci_qtd *qtd, dma_addr_t buf,
47 size_t len, int token, int maxpacket)
48{
49 int i, count;
50 u64 addr = buf;
51
52 /* one buffer entry per 4K ... first might be short or unaligned */
53 qtd->hw_buf[0] = cpu_to_hc32(ehci, (u32)addr);
54 qtd->hw_buf_hi[0] = cpu_to_hc32(ehci, (u32)(addr >> 32));
55 count = 0x1000 - (buf & 0x0fff); /* rest of that page */
56 if (likely (len < count)) /* ... iff needed */
57 count = len;
58 else {
59 buf += 0x1000;
60 buf &= ~0x0fff;
61
62 /* per-qtd limit: from 16K to 20K (best alignment) */
63 for (i = 1; count < len && i < 5; i++) {
64 addr = buf;
65 qtd->hw_buf[i] = cpu_to_hc32(ehci, (u32)addr);
66 qtd->hw_buf_hi[i] = cpu_to_hc32(ehci,
67 (u32)(addr >> 32));
68 buf += 0x1000;
69 if ((count + 0x1000) < len)
70 count += 0x1000;
71 else
72 count = len;
73 }
74
75 /* short packets may only terminate transfers */
76 if (count != len)
77 count -= (count % maxpacket);
78 }
79 qtd->hw_token = cpu_to_hc32(ehci, (count << 16) | token);
80 qtd->length = count;
81
82 return count;
83}
84
85/*-------------------------------------------------------------------------*/
86
87static inline void
88qh_update (struct ehci_hcd *ehci, struct ehci_qh *qh, struct ehci_qtd *qtd)
89{
90 struct ehci_qh_hw *hw = qh->hw;
91
92 /* writes to an active overlay are unsafe */
93 BUG_ON(qh->qh_state != QH_STATE_IDLE);
94
95 hw->hw_qtd_next = QTD_NEXT(ehci, qtd->qtd_dma);
96 hw->hw_alt_next = EHCI_LIST_END(ehci);
97
98 /* Except for control endpoints, we make hardware maintain data
99 * toggle (like OHCI) ... here (re)initialize the toggle in the QH,
100 * and set the pseudo-toggle in udev. Only usb_clear_halt() will
101 * ever clear it.
102 */
103 if (!(hw->hw_info1 & cpu_to_hc32(ehci, 1 << 14))) {
104 unsigned is_out, epnum;
105
106 is_out = qh->is_out;
107 epnum = (hc32_to_cpup(ehci, &hw->hw_info1) >> 8) & 0x0f;
108 if (unlikely (!usb_gettoggle (qh->dev, epnum, is_out))) {
109 hw->hw_token &= ~cpu_to_hc32(ehci, QTD_TOGGLE);
110 usb_settoggle (qh->dev, epnum, is_out, 1);
111 }
112 }
113
114 /* HC must see latest qtd and qh data before we clear ACTIVE+HALT */
115 wmb ();
116 hw->hw_token &= cpu_to_hc32(ehci, QTD_TOGGLE | QTD_STS_PING);
117}
118
119/* if it weren't for a common silicon quirk (writing the dummy into the qh
120 * overlay, so qh->hw_token wrongly becomes inactive/halted), only fault
121 * recovery (including urb dequeue) would need software changes to a QH...
122 */
123static void
124qh_refresh (struct ehci_hcd *ehci, struct ehci_qh *qh)
125{
126 struct ehci_qtd *qtd;
127
128 if (list_empty (&qh->qtd_list))
129 qtd = qh->dummy;
130 else {
131 qtd = list_entry (qh->qtd_list.next,
132 struct ehci_qtd, qtd_list);
133 /* first qtd may already be partially processed */
134 if (cpu_to_hc32(ehci, qtd->qtd_dma) == qh->hw->hw_current)
135 qtd = NULL;
136 }
137
138 if (qtd)
139 qh_update (ehci, qh, qtd);
140}
141
142/*-------------------------------------------------------------------------*/
143
144static void qh_link_async(struct ehci_hcd *ehci, struct ehci_qh *qh);
145
146static void ehci_clear_tt_buffer_complete(struct usb_hcd *hcd,
147 struct usb_host_endpoint *ep)
148{
149 struct ehci_hcd *ehci = hcd_to_ehci(hcd);
150 struct ehci_qh *qh = ep->hcpriv;
151 unsigned long flags;
152
153 spin_lock_irqsave(&ehci->lock, flags);
154 qh->clearing_tt = 0;
155 if (qh->qh_state == QH_STATE_IDLE && !list_empty(&qh->qtd_list)
156 && HC_IS_RUNNING(hcd->state))
157 qh_link_async(ehci, qh);
158 spin_unlock_irqrestore(&ehci->lock, flags);
159}
160
161static void ehci_clear_tt_buffer(struct ehci_hcd *ehci, struct ehci_qh *qh,
162 struct urb *urb, u32 token)
163{
164
165 /* If an async split transaction gets an error or is unlinked,
166 * the TT buffer may be left in an indeterminate state. We
167 * have to clear the TT buffer.
168 *
169 * Note: this routine is never called for Isochronous transfers.
170 */
171 if (urb->dev->tt && !usb_pipeint(urb->pipe) && !qh->clearing_tt) {
172#ifdef DEBUG
173 struct usb_device *tt = urb->dev->tt->hub;
174 dev_dbg(&tt->dev,
175 "clear tt buffer port %d, a%d ep%d t%08x\n",
176 urb->dev->ttport, urb->dev->devnum,
177 usb_pipeendpoint(urb->pipe), token);
178#endif /* DEBUG */
179 if (!ehci_is_TDI(ehci)
180 || urb->dev->tt->hub !=
181 ehci_to_hcd(ehci)->self.root_hub) {
182 if (usb_hub_clear_tt_buffer(urb) == 0)
183 qh->clearing_tt = 1;
184 } else {
185
186 /* REVISIT ARC-derived cores don't clear the root
187 * hub TT buffer in this way...
188 */
189 }
190 }
191}
192
193static int qtd_copy_status (
194 struct ehci_hcd *ehci,
195 struct urb *urb,
196 size_t length,
197 u32 token
198)
199{
200 int status = -EINPROGRESS;
201
202 /* count IN/OUT bytes, not SETUP (even short packets) */
203 if (likely (QTD_PID (token) != 2))
204 urb->actual_length += length - QTD_LENGTH (token);
205
206 /* don't modify error codes */
207 if (unlikely(urb->unlinked))
208 return status;
209
210 /* force cleanup after short read; not always an error */
211 if (unlikely (IS_SHORT_READ (token)))
212 status = -EREMOTEIO;
213
214 /* serious "can't proceed" faults reported by the hardware */
215 if (token & QTD_STS_HALT) {
216 if (token & QTD_STS_BABBLE) {
217 /* FIXME "must" disable babbling device's port too */
218 status = -EOVERFLOW;
219 /* CERR nonzero + halt --> stall */
220 } else if (QTD_CERR(token)) {
221 status = -EPIPE;
222
223 /* In theory, more than one of the following bits can be set
224 * since they are sticky and the transaction is retried.
225 * Which to test first is rather arbitrary.
226 */
227 } else if (token & QTD_STS_MMF) {
228 /* fs/ls interrupt xfer missed the complete-split */
229 status = -EPROTO;
230 } else if (token & QTD_STS_DBE) {
231 status = (QTD_PID (token) == 1) /* IN ? */
232 ? -ENOSR /* hc couldn't read data */
233 : -ECOMM; /* hc couldn't write data */
234 } else if (token & QTD_STS_XACT) {
235 /* timeout, bad CRC, wrong PID, etc */
236 ehci_dbg(ehci, "devpath %s ep%d%s 3strikes\n",
237 urb->dev->devpath,
238 usb_pipeendpoint(urb->pipe),
239 usb_pipein(urb->pipe) ? "in" : "out");
240 status = -EPROTO;
241 } else { /* unknown */
242 status = -EPROTO;
243 }
244
245 ehci_vdbg (ehci,
246 "dev%d ep%d%s qtd token %08x --> status %d\n",
247 usb_pipedevice (urb->pipe),
248 usb_pipeendpoint (urb->pipe),
249 usb_pipein (urb->pipe) ? "in" : "out",
250 token, status);
251 }
252
253 return status;
254}
255
256static void
257ehci_urb_done(struct ehci_hcd *ehci, struct urb *urb, int status)
258__releases(ehci->lock)
259__acquires(ehci->lock)
260{
261 if (likely (urb->hcpriv != NULL)) {
262 struct ehci_qh *qh = (struct ehci_qh *) urb->hcpriv;
263
264 /* S-mask in a QH means it's an interrupt urb */
265 if ((qh->hw->hw_info2 & cpu_to_hc32(ehci, QH_SMASK)) != 0) {
266
267 /* ... update hc-wide periodic stats (for usbfs) */
268 ehci_to_hcd(ehci)->self.bandwidth_int_reqs--;
269 }
270 qh_put (qh);
271 }
272
273 if (unlikely(urb->unlinked)) {
274 COUNT(ehci->stats.unlink);
275 } else {
276 /* report non-error and short read status as zero */
277 if (status == -EINPROGRESS || status == -EREMOTEIO)
278 status = 0;
279 COUNT(ehci->stats.complete);
280 }
281
282#ifdef EHCI_URB_TRACE
283 ehci_dbg (ehci,
284 "%s %s urb %p ep%d%s status %d len %d/%d\n",
285 __func__, urb->dev->devpath, urb,
286 usb_pipeendpoint (urb->pipe),
287 usb_pipein (urb->pipe) ? "in" : "out",
288 status,
289 urb->actual_length, urb->transfer_buffer_length);
290#endif
291
292 /* complete() can reenter this HCD */
293 usb_hcd_unlink_urb_from_ep(ehci_to_hcd(ehci), urb);
294 spin_unlock (&ehci->lock);
295 usb_hcd_giveback_urb(ehci_to_hcd(ehci), urb, status);
296 spin_lock (&ehci->lock);
297}
298
299static void start_unlink_async (struct ehci_hcd *ehci, struct ehci_qh *qh);
300static void unlink_async (struct ehci_hcd *ehci, struct ehci_qh *qh);
301
302static int qh_schedule (struct ehci_hcd *ehci, struct ehci_qh *qh);
303
304/*
305 * Process and free completed qtds for a qh, returning URBs to drivers.
306 * Chases up to qh->hw_current. Returns number of completions called,
307 * indicating how much "real" work we did.
308 */
309static unsigned
310qh_completions (struct ehci_hcd *ehci, struct ehci_qh *qh)
311{
312 struct ehci_qtd *last, *end = qh->dummy;
313 struct list_head *entry, *tmp;
314 int last_status;
315 int stopped;
316 unsigned count = 0;
317 u8 state;
318 struct ehci_qh_hw *hw = qh->hw;
319
320 if (unlikely (list_empty (&qh->qtd_list)))
321 return count;
322
323 /* completions (or tasks on other cpus) must never clobber HALT
324 * till we've gone through and cleaned everything up, even when
325 * they add urbs to this qh's queue or mark them for unlinking.
326 *
327 * NOTE: unlinking expects to be done in queue order.
328 *
329 * It's a bug for qh->qh_state to be anything other than
330 * QH_STATE_IDLE, unless our caller is scan_async() or
331 * scan_periodic().
332 */
333 state = qh->qh_state;
334 qh->qh_state = QH_STATE_COMPLETING;
335 stopped = (state == QH_STATE_IDLE);
336
337 rescan:
338 last = NULL;
339 last_status = -EINPROGRESS;
340 qh->needs_rescan = 0;
341
342 /* remove de-activated QTDs from front of queue.
343 * after faults (including short reads), cleanup this urb
344 * then let the queue advance.
345 * if queue is stopped, handles unlinks.
346 */
347 list_for_each_safe (entry, tmp, &qh->qtd_list) {
348 struct ehci_qtd *qtd;
349 struct urb *urb;
350 u32 token = 0;
351
352 qtd = list_entry (entry, struct ehci_qtd, qtd_list);
353 urb = qtd->urb;
354
355 /* clean up any state from previous QTD ...*/
356 if (last) {
357 if (likely (last->urb != urb)) {
358 ehci_urb_done(ehci, last->urb, last_status);
359 count++;
360 last_status = -EINPROGRESS;
361 }
362 ehci_qtd_free (ehci, last);
363 last = NULL;
364 }
365
366 /* ignore urbs submitted during completions we reported */
367 if (qtd == end)
368 break;
369
370 /* hardware copies qtd out of qh overlay */
371 rmb ();
372 token = hc32_to_cpu(ehci, qtd->hw_token);
373
374 /* always clean up qtds the hc de-activated */
375 retry_xacterr:
376 if ((token & QTD_STS_ACTIVE) == 0) {
377
378 /* on STALL, error, and short reads this urb must
379 * complete and all its qtds must be recycled.
380 */
381 if ((token & QTD_STS_HALT) != 0) {
382
383 /* retry transaction errors until we
384 * reach the software xacterr limit
385 */
386 if ((token & QTD_STS_XACT) &&
387 QTD_CERR(token) == 0 &&
388 ++qh->xacterrs < QH_XACTERR_MAX &&
389 !urb->unlinked) {
390 ehci_dbg(ehci,
391 "detected XactErr len %zu/%zu retry %d\n",
392 qtd->length - QTD_LENGTH(token), qtd->length, qh->xacterrs);
393
394 /* reset the token in the qtd and the
395 * qh overlay (which still contains
396 * the qtd) so that we pick up from
397 * where we left off
398 */
399 token &= ~QTD_STS_HALT;
400 token |= QTD_STS_ACTIVE |
401 (EHCI_TUNE_CERR << 10);
402 qtd->hw_token = cpu_to_hc32(ehci,
403 token);
404 wmb();
405 hw->hw_token = cpu_to_hc32(ehci,
406 token);
407 goto retry_xacterr;
408 }
409 stopped = 1;
410
411 /* magic dummy for some short reads; qh won't advance.
412 * that silicon quirk can kick in with this dummy too.
413 *
414 * other short reads won't stop the queue, including
415 * control transfers (status stage handles that) or
416 * most other single-qtd reads ... the queue stops if
417 * URB_SHORT_NOT_OK was set so the driver submitting
418 * the urbs could clean it up.
419 */
420 } else if (IS_SHORT_READ (token)
421 && !(qtd->hw_alt_next
422 & EHCI_LIST_END(ehci))) {
423 stopped = 1;
424 }
425
426 /* stop scanning when we reach qtds the hc is using */
427 } else if (likely (!stopped
428 && HC_IS_RUNNING (ehci_to_hcd(ehci)->state))) {
429 break;
430
431 /* scan the whole queue for unlinks whenever it stops */
432 } else {
433 stopped = 1;
434
435 /* cancel everything if we halt, suspend, etc */
436 if (!HC_IS_RUNNING(ehci_to_hcd(ehci)->state))
437 last_status = -ESHUTDOWN;
438
439 /* this qtd is active; skip it unless a previous qtd
440 * for its urb faulted, or its urb was canceled.
441 */
442 else if (last_status == -EINPROGRESS && !urb->unlinked)
443 continue;
444
445 /* qh unlinked; token in overlay may be most current */
446 if (state == QH_STATE_IDLE
447 && cpu_to_hc32(ehci, qtd->qtd_dma)
448 == hw->hw_current) {
449 token = hc32_to_cpu(ehci, hw->hw_token);
450
451 /* An unlink may leave an incomplete
452 * async transaction in the TT buffer.
453 * We have to clear it.
454 */
455 ehci_clear_tt_buffer(ehci, qh, urb, token);
456 }
457 }
458
459 /* unless we already know the urb's status, collect qtd status
460 * and update count of bytes transferred. in common short read
461 * cases with only one data qtd (including control transfers),
462 * queue processing won't halt. but with two or more qtds (for
463 * example, with a 32 KB transfer), when the first qtd gets a
464 * short read the second must be removed by hand.
465 */
466 if (last_status == -EINPROGRESS) {
467 last_status = qtd_copy_status(ehci, urb,
468 qtd->length, token);
469 if (last_status == -EREMOTEIO
470 && (qtd->hw_alt_next
471 & EHCI_LIST_END(ehci)))
472 last_status = -EINPROGRESS;
473
474 /* As part of low/full-speed endpoint-halt processing
475 * we must clear the TT buffer (11.17.5).
476 */
477 if (unlikely(last_status != -EINPROGRESS &&
478 last_status != -EREMOTEIO)) {
479 /* The TT's in some hubs malfunction when they
480 * receive this request following a STALL (they
481 * stop sending isochronous packets). Since a
482 * STALL can't leave the TT buffer in a busy
483 * state (if you believe Figures 11-48 - 11-51
484 * in the USB 2.0 spec), we won't clear the TT
485 * buffer in this case. Strictly speaking this
486 * is a violation of the spec.
487 */
488 if (last_status != -EPIPE)
489 ehci_clear_tt_buffer(ehci, qh, urb,
490 token);
491 }
492 }
493
494 /* if we're removing something not at the queue head,
495 * patch the hardware queue pointer.
496 */
497 if (stopped && qtd->qtd_list.prev != &qh->qtd_list) {
498 last = list_entry (qtd->qtd_list.prev,
499 struct ehci_qtd, qtd_list);
500 last->hw_next = qtd->hw_next;
501 }
502
503 /* remove qtd; it's recycled after possible urb completion */
504 list_del (&qtd->qtd_list);
505 last = qtd;
506
507 /* reinit the xacterr counter for the next qtd */
508 qh->xacterrs = 0;
509 }
510
511 /* last urb's completion might still need calling */
512 if (likely (last != NULL)) {
513 ehci_urb_done(ehci, last->urb, last_status);
514 count++;
515 ehci_qtd_free (ehci, last);
516 }
517
518 /* Do we need to rescan for URBs dequeued during a giveback? */
519 if (unlikely(qh->needs_rescan)) {
520 /* If the QH is already unlinked, do the rescan now. */
521 if (state == QH_STATE_IDLE)
522 goto rescan;
523
524 /* Otherwise we have to wait until the QH is fully unlinked.
525 * Our caller will start an unlink if qh->needs_rescan is
526 * set. But if an unlink has already started, nothing needs
527 * to be done.
528 */
529 if (state != QH_STATE_LINKED)
530 qh->needs_rescan = 0;
531 }
532
533 /* restore original state; caller must unlink or relink */
534 qh->qh_state = state;
535
536 /* be sure the hardware's done with the qh before refreshing
537 * it after fault cleanup, or recovering from silicon wrongly
538 * overlaying the dummy qtd (which reduces DMA chatter).
539 */
540 if (stopped != 0 || hw->hw_qtd_next == EHCI_LIST_END(ehci)) {
541 switch (state) {
542 case QH_STATE_IDLE:
543 qh_refresh(ehci, qh);
544 break;
545 case QH_STATE_LINKED:
546 /* We won't refresh a QH that's linked (after the HC
547 * stopped the queue). That avoids a race:
548 * - HC reads first part of QH;
549 * - CPU updates that first part and the token;
550 * - HC reads rest of that QH, including token
551 * Result: HC gets an inconsistent image, and then
552 * DMAs to/from the wrong memory (corrupting it).
553 *
554 * That should be rare for interrupt transfers,
555 * except maybe high bandwidth ...
556 */
557
558 /* Tell the caller to start an unlink */
559 qh->needs_rescan = 1;
560 break;
561 /* otherwise, unlink already started */
562 }
563 }
564
565 return count;
566}
567
568/*-------------------------------------------------------------------------*/
569
570// high bandwidth multiplier, as encoded in highspeed endpoint descriptors
571#define hb_mult(wMaxPacketSize) (1 + (((wMaxPacketSize) >> 11) & 0x03))
572// ... and packet size, for any kind of endpoint descriptor
573#define max_packet(wMaxPacketSize) ((wMaxPacketSize) & 0x07ff)
574
575/*
576 * reverse of qh_urb_transaction: free a list of TDs.
577 * used for cleanup after errors, before HC sees an URB's TDs.
578 */
579static void qtd_list_free (
580 struct ehci_hcd *ehci,
581 struct urb *urb,
582 struct list_head *qtd_list
583) {
584 struct list_head *entry, *temp;
585
586 list_for_each_safe (entry, temp, qtd_list) {
587 struct ehci_qtd *qtd;
588
589 qtd = list_entry (entry, struct ehci_qtd, qtd_list);
590 list_del (&qtd->qtd_list);
591 ehci_qtd_free (ehci, qtd);
592 }
593}
594
595/*
596 * create a list of filled qtds for this URB; won't link into qh.
597 */
598static struct list_head *
599qh_urb_transaction (
600 struct ehci_hcd *ehci,
601 struct urb *urb,
602 struct list_head *head,
603 gfp_t flags
604) {
605 struct ehci_qtd *qtd, *qtd_prev;
606 dma_addr_t buf;
607 int len, this_sg_len, maxpacket;
608 int is_input;
609 u32 token;
610 int i;
611 struct scatterlist *sg;
612
613 /*
614 * URBs map to sequences of QTDs: one logical transaction
615 */
616 qtd = ehci_qtd_alloc (ehci, flags);
617 if (unlikely (!qtd))
618 return NULL;
619 list_add_tail (&qtd->qtd_list, head);
620 qtd->urb = urb;
621
622 token = QTD_STS_ACTIVE;
623 token |= (EHCI_TUNE_CERR << 10);
624 /* for split transactions, SplitXState initialized to zero */
625
626 len = urb->transfer_buffer_length;
627 is_input = usb_pipein (urb->pipe);
628 if (usb_pipecontrol (urb->pipe)) {
629 /* SETUP pid */
630 qtd_fill(ehci, qtd, urb->setup_dma,
631 sizeof (struct usb_ctrlrequest),
632 token | (2 /* "setup" */ << 8), 8);
633
634 /* ... and always at least one more pid */
635 token ^= QTD_TOGGLE;
636 qtd_prev = qtd;
637 qtd = ehci_qtd_alloc (ehci, flags);
638 if (unlikely (!qtd))
639 goto cleanup;
640 qtd->urb = urb;
641 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
642 list_add_tail (&qtd->qtd_list, head);
643
644 /* for zero length DATA stages, STATUS is always IN */
645 if (len == 0)
646 token |= (1 /* "in" */ << 8);
647 }
648
649 /*
650 * data transfer stage: buffer setup
651 */
652 i = urb->num_sgs;
653 if (len > 0 && i > 0) {
654 sg = urb->sg;
655 buf = sg_dma_address(sg);
656
657 /* urb->transfer_buffer_length may be smaller than the
658 * size of the scatterlist (or vice versa)
659 */
660 this_sg_len = min_t(int, sg_dma_len(sg), len);
661 } else {
662 sg = NULL;
663 buf = urb->transfer_dma;
664 this_sg_len = len;
665 }
666
667 if (is_input)
668 token |= (1 /* "in" */ << 8);
669 /* else it's already initted to "out" pid (0 << 8) */
670
671 maxpacket = max_packet(usb_maxpacket(urb->dev, urb->pipe, !is_input));
672
673 /*
674 * buffer gets wrapped in one or more qtds;
675 * last one may be "short" (including zero len)
676 * and may serve as a control status ack
677 */
678 for (;;) {
679 int this_qtd_len;
680
681 this_qtd_len = qtd_fill(ehci, qtd, buf, this_sg_len, token,
682 maxpacket);
683 this_sg_len -= this_qtd_len;
684 len -= this_qtd_len;
685 buf += this_qtd_len;
686
687 /*
688 * short reads advance to a "magic" dummy instead of the next
689 * qtd ... that forces the queue to stop, for manual cleanup.
690 * (this will usually be overridden later.)
691 */
692 if (is_input)
693 qtd->hw_alt_next = ehci->async->hw->hw_alt_next;
694
695 /* qh makes control packets use qtd toggle; maybe switch it */
696 if ((maxpacket & (this_qtd_len + (maxpacket - 1))) == 0)
697 token ^= QTD_TOGGLE;
698
699 if (likely(this_sg_len <= 0)) {
700 if (--i <= 0 || len <= 0)
701 break;
702 sg = sg_next(sg);
703 buf = sg_dma_address(sg);
704 this_sg_len = min_t(int, sg_dma_len(sg), len);
705 }
706
707 qtd_prev = qtd;
708 qtd = ehci_qtd_alloc (ehci, flags);
709 if (unlikely (!qtd))
710 goto cleanup;
711 qtd->urb = urb;
712 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
713 list_add_tail (&qtd->qtd_list, head);
714 }
715
716 /*
717 * unless the caller requires manual cleanup after short reads,
718 * have the alt_next mechanism keep the queue running after the
719 * last data qtd (the only one, for control and most other cases).
720 */
721 if (likely ((urb->transfer_flags & URB_SHORT_NOT_OK) == 0
722 || usb_pipecontrol (urb->pipe)))
723 qtd->hw_alt_next = EHCI_LIST_END(ehci);
724
725 /*
726 * control requests may need a terminating data "status" ack;
727 * bulk ones may need a terminating short packet (zero length).
728 */
729 if (likely (urb->transfer_buffer_length != 0)) {
730 int one_more = 0;
731
732 if (usb_pipecontrol (urb->pipe)) {
733 one_more = 1;
734 token ^= 0x0100; /* "in" <--> "out" */
735 token |= QTD_TOGGLE; /* force DATA1 */
736 } else if (usb_pipebulk (urb->pipe)
737 && (urb->transfer_flags & URB_ZERO_PACKET)
738 && !(urb->transfer_buffer_length % maxpacket)) {
739 one_more = 1;
740 }
741 if (one_more) {
742 qtd_prev = qtd;
743 qtd = ehci_qtd_alloc (ehci, flags);
744 if (unlikely (!qtd))
745 goto cleanup;
746 qtd->urb = urb;
747 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
748 list_add_tail (&qtd->qtd_list, head);
749
750 /* never any data in such packets */
751 qtd_fill(ehci, qtd, 0, 0, token, 0);
752 }
753 }
754
755 /* by default, enable interrupt on urb completion */
756 if (likely (!(urb->transfer_flags & URB_NO_INTERRUPT)))
757 qtd->hw_token |= cpu_to_hc32(ehci, QTD_IOC);
758 return head;
759
760cleanup:
761 qtd_list_free (ehci, urb, head);
762 return NULL;
763}
764
765/*-------------------------------------------------------------------------*/
766
767// Would be best to create all qh's from config descriptors,
768// when each interface/altsetting is established. Unlink
769// any previous qh and cancel its urbs first; endpoints are
770// implicitly reset then (data toggle too).
771// That'd mean updating how usbcore talks to HCDs. (2.7?)
772
773
774/*
775 * Each QH holds a qtd list; a QH is used for everything except iso.
776 *
777 * For interrupt urbs, the scheduler must set the microframe scheduling
778 * mask(s) each time the QH gets scheduled. For highspeed, that's
779 * just one microframe in the s-mask. For split interrupt transactions
780 * there are additional complications: c-mask, maybe FSTNs.
781 */
782static struct ehci_qh *
783qh_make (
784 struct ehci_hcd *ehci,
785 struct urb *urb,
786 gfp_t flags
787) {
788 struct ehci_qh *qh = ehci_qh_alloc (ehci, flags);
789 u32 info1 = 0, info2 = 0;
790 int is_input, type;
791 int maxp = 0;
792 struct usb_tt *tt = urb->dev->tt;
793 struct ehci_qh_hw *hw;
794
795 if (!qh)
796 return qh;
797
798 /*
799 * init endpoint/device data for this QH
800 */
801 info1 |= usb_pipeendpoint (urb->pipe) << 8;
802 info1 |= usb_pipedevice (urb->pipe) << 0;
803
804 is_input = usb_pipein (urb->pipe);
805 type = usb_pipetype (urb->pipe);
806 maxp = usb_maxpacket (urb->dev, urb->pipe, !is_input);
807
808 /* 1024 byte maxpacket is a hardware ceiling. High bandwidth
809 * acts like up to 3KB, but is built from smaller packets.
810 */
811 if (max_packet(maxp) > 1024) {
812 ehci_dbg(ehci, "bogus qh maxpacket %d\n", max_packet(maxp));
813 goto done;
814 }
815
816 /* Compute interrupt scheduling parameters just once, and save.
817 * - allowing for high bandwidth, how many nsec/uframe are used?
818 * - split transactions need a second CSPLIT uframe; same question
819 * - splits also need a schedule gap (for full/low speed I/O)
820 * - qh has a polling interval
821 *
822 * For control/bulk requests, the HC or TT handles these.
823 */
824 if (type == PIPE_INTERRUPT) {
825 qh->usecs = NS_TO_US(usb_calc_bus_time(USB_SPEED_HIGH,
826 is_input, 0,
827 hb_mult(maxp) * max_packet(maxp)));
828 qh->start = NO_FRAME;
829 qh->stamp = ehci->periodic_stamp;
830
831 if (urb->dev->speed == USB_SPEED_HIGH) {
832 qh->c_usecs = 0;
833 qh->gap_uf = 0;
834
835 qh->period = urb->interval >> 3;
836 if (qh->period == 0 && urb->interval != 1) {
837 /* NOTE interval 2 or 4 uframes could work.
838 * But interval 1 scheduling is simpler, and
839 * includes high bandwidth.
840 */
841 urb->interval = 1;
842 } else if (qh->period > ehci->periodic_size) {
843 qh->period = ehci->periodic_size;
844 urb->interval = qh->period << 3;
845 }
846 } else {
847 int think_time;
848
849 /* gap is f(FS/LS transfer times) */
850 qh->gap_uf = 1 + usb_calc_bus_time (urb->dev->speed,
851 is_input, 0, maxp) / (125 * 1000);
852
853 /* FIXME this just approximates SPLIT/CSPLIT times */
854 if (is_input) { // SPLIT, gap, CSPLIT+DATA
855 qh->c_usecs = qh->usecs + HS_USECS (0);
856 qh->usecs = HS_USECS (1);
857 } else { // SPLIT+DATA, gap, CSPLIT
858 qh->usecs += HS_USECS (1);
859 qh->c_usecs = HS_USECS (0);
860 }
861
862 think_time = tt ? tt->think_time : 0;
863 qh->tt_usecs = NS_TO_US (think_time +
864 usb_calc_bus_time (urb->dev->speed,
865 is_input, 0, max_packet (maxp)));
866 qh->period = urb->interval;
867 if (qh->period > ehci->periodic_size) {
868 qh->period = ehci->periodic_size;
869 urb->interval = qh->period;
870 }
871 }
872 }
873
874 /* support for tt scheduling, and access to toggles */
875 qh->dev = urb->dev;
876
877 /* using TT? */
878 switch (urb->dev->speed) {
879 case USB_SPEED_LOW:
880 info1 |= (1 << 12); /* EPS "low" */
881 /* FALL THROUGH */
882
883 case USB_SPEED_FULL:
884 /* EPS 0 means "full" */
885 if (type != PIPE_INTERRUPT)
886 info1 |= (EHCI_TUNE_RL_TT << 28);
887 if (type == PIPE_CONTROL) {
888 info1 |= (1 << 27); /* for TT */
889 info1 |= 1 << 14; /* toggle from qtd */
890 }
891 info1 |= maxp << 16;
892
893 info2 |= (EHCI_TUNE_MULT_TT << 30);
894
895 /* Some Freescale processors have an erratum in which the
896 * port number in the queue head was 0..N-1 instead of 1..N.
897 */
898 if (ehci_has_fsl_portno_bug(ehci))
899 info2 |= (urb->dev->ttport-1) << 23;
900 else
901 info2 |= urb->dev->ttport << 23;
902
903 /* set the address of the TT; for TDI's integrated
904 * root hub tt, leave it zeroed.
905 */
906 if (tt && tt->hub != ehci_to_hcd(ehci)->self.root_hub)
907 info2 |= tt->hub->devnum << 16;
908
909 /* NOTE: if (PIPE_INTERRUPT) { scheduler sets c-mask } */
910
911 break;
912
913 case USB_SPEED_HIGH: /* no TT involved */
914 info1 |= (2 << 12); /* EPS "high" */
915 if (type == PIPE_CONTROL) {
916 info1 |= (EHCI_TUNE_RL_HS << 28);
917 info1 |= 64 << 16; /* usb2 fixed maxpacket */
918 info1 |= 1 << 14; /* toggle from qtd */
919 info2 |= (EHCI_TUNE_MULT_HS << 30);
920 } else if (type == PIPE_BULK) {
921 info1 |= (EHCI_TUNE_RL_HS << 28);
922 /* The USB spec says that high speed bulk endpoints
923 * always use 512 byte maxpacket. But some device
924 * vendors decided to ignore that, and MSFT is happy
925 * to help them do so. So now people expect to use
926 * such nonconformant devices with Linux too; sigh.
927 */
928 info1 |= max_packet(maxp) << 16;
929 info2 |= (EHCI_TUNE_MULT_HS << 30);
930 } else { /* PIPE_INTERRUPT */
931 info1 |= max_packet (maxp) << 16;
932 info2 |= hb_mult (maxp) << 30;
933 }
934 break;
935 default:
936 dbg ("bogus dev %p speed %d", urb->dev, urb->dev->speed);
937done:
938 qh_put (qh);
939 return NULL;
940 }
941
942 /* NOTE: if (PIPE_INTERRUPT) { scheduler sets s-mask } */
943
944 /* init as live, toggle clear, advance to dummy */
945 qh->qh_state = QH_STATE_IDLE;
946 hw = qh->hw;
947 hw->hw_info1 = cpu_to_hc32(ehci, info1);
948 hw->hw_info2 = cpu_to_hc32(ehci, info2);
949 qh->is_out = !is_input;
950 usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe), !is_input, 1);
951 qh_refresh (ehci, qh);
952 return qh;
953}
954
955/*-------------------------------------------------------------------------*/
956
957/* move qh (and its qtds) onto async queue; maybe enable queue. */
958
959static void qh_link_async (struct ehci_hcd *ehci, struct ehci_qh *qh)
960{
961 __hc32 dma = QH_NEXT(ehci, qh->qh_dma);
962 struct ehci_qh *head;
963
964 /* Don't link a QH if there's a Clear-TT-Buffer pending */
965 if (unlikely(qh->clearing_tt))
966 return;
967
968 WARN_ON(qh->qh_state != QH_STATE_IDLE);
969
970 /* (re)start the async schedule? */
971 head = ehci->async;
972 timer_action_done (ehci, TIMER_ASYNC_OFF);
973 if (!head->qh_next.qh) {
974 u32 cmd = ehci_readl(ehci, &ehci->regs->command);
975
976 if (!(cmd & CMD_ASE)) {
977 /* in case a clear of CMD_ASE didn't take yet */
978 (void)handshake(ehci, &ehci->regs->status,
979 STS_ASS, 0, 150);
980 cmd |= CMD_ASE | CMD_RUN;
981 ehci_writel(ehci, cmd, &ehci->regs->command);
982 ehci_to_hcd(ehci)->state = HC_STATE_RUNNING;
983 /* posted write need not be known to HC yet ... */
984 }
985 }
986
987 /* clear halt and/or toggle; and maybe recover from silicon quirk */
988 qh_refresh(ehci, qh);
989
990 /* splice right after start */
991 qh->qh_next = head->qh_next;
992 qh->hw->hw_next = head->hw->hw_next;
993 wmb ();
994
995 head->qh_next.qh = qh;
996 head->hw->hw_next = dma;
997
998 qh_get(qh);
999 qh->xacterrs = 0;
1000 qh->qh_state = QH_STATE_LINKED;
1001 /* qtd completions reported later by interrupt */
1002}
1003
1004/*-------------------------------------------------------------------------*/
1005
1006/*
1007 * For control/bulk/interrupt, return QH with these TDs appended.
1008 * Allocates and initializes the QH if necessary.
1009 * Returns null if it can't allocate a QH it needs to.
1010 * If the QH has TDs (urbs) already, that's great.
1011 */
1012static struct ehci_qh *qh_append_tds (
1013 struct ehci_hcd *ehci,
1014 struct urb *urb,
1015 struct list_head *qtd_list,
1016 int epnum,
1017 void **ptr
1018)
1019{
1020 struct ehci_qh *qh = NULL;
1021 __hc32 qh_addr_mask = cpu_to_hc32(ehci, 0x7f);
1022
1023 qh = (struct ehci_qh *) *ptr;
1024 if (unlikely (qh == NULL)) {
1025 /* can't sleep here, we have ehci->lock... */
1026 qh = qh_make (ehci, urb, GFP_ATOMIC);
1027 *ptr = qh;
1028 }
1029 if (likely (qh != NULL)) {
1030 struct ehci_qtd *qtd;
1031
1032 if (unlikely (list_empty (qtd_list)))
1033 qtd = NULL;
1034 else
1035 qtd = list_entry (qtd_list->next, struct ehci_qtd,
1036 qtd_list);
1037
1038 /* control qh may need patching ... */
1039 if (unlikely (epnum == 0)) {
1040
1041 /* usb_reset_device() briefly reverts to address 0 */
1042 if (usb_pipedevice (urb->pipe) == 0)
1043 qh->hw->hw_info1 &= ~qh_addr_mask;
1044 }
1045
1046 /* just one way to queue requests: swap with the dummy qtd.
1047 * only hc or qh_refresh() ever modify the overlay.
1048 */
1049 if (likely (qtd != NULL)) {
1050 struct ehci_qtd *dummy;
1051 dma_addr_t dma;
1052 __hc32 token;
1053
1054 /* to avoid racing the HC, use the dummy td instead of
1055 * the first td of our list (becomes new dummy). both
1056 * tds stay deactivated until we're done, when the
1057 * HC is allowed to fetch the old dummy (4.10.2).
1058 */
1059 token = qtd->hw_token;
1060 qtd->hw_token = HALT_BIT(ehci);
1061 wmb ();
1062 dummy = qh->dummy;
1063
1064 dma = dummy->qtd_dma;
1065 *dummy = *qtd;
1066 dummy->qtd_dma = dma;
1067
1068 list_del (&qtd->qtd_list);
1069 list_add (&dummy->qtd_list, qtd_list);
1070 list_splice_tail(qtd_list, &qh->qtd_list);
1071
1072 ehci_qtd_init(ehci, qtd, qtd->qtd_dma);
1073 qh->dummy = qtd;
1074
1075 /* hc must see the new dummy at list end */
1076 dma = qtd->qtd_dma;
1077 qtd = list_entry (qh->qtd_list.prev,
1078 struct ehci_qtd, qtd_list);
1079 qtd->hw_next = QTD_NEXT(ehci, dma);
1080
1081 /* let the hc process these next qtds */
1082 wmb ();
1083 dummy->hw_token = token;
1084
1085 urb->hcpriv = qh_get (qh);
1086 }
1087 }
1088 return qh;
1089}
1090
1091/*-------------------------------------------------------------------------*/
1092
1093static int
1094submit_async (
1095 struct ehci_hcd *ehci,
1096 struct urb *urb,
1097 struct list_head *qtd_list,
1098 gfp_t mem_flags
1099) {
1100 int epnum;
1101 unsigned long flags;
1102 struct ehci_qh *qh = NULL;
1103 int rc;
1104
1105 epnum = urb->ep->desc.bEndpointAddress;
1106
1107#ifdef EHCI_URB_TRACE
1108 {
1109 struct ehci_qtd *qtd;
1110 qtd = list_entry(qtd_list->next, struct ehci_qtd, qtd_list);
1111 ehci_dbg(ehci,
1112 "%s %s urb %p ep%d%s len %d, qtd %p [qh %p]\n",
1113 __func__, urb->dev->devpath, urb,
1114 epnum & 0x0f, (epnum & USB_DIR_IN) ? "in" : "out",
1115 urb->transfer_buffer_length,
1116 qtd, urb->ep->hcpriv);
1117 }
1118#endif
1119
1120 spin_lock_irqsave (&ehci->lock, flags);
1121 if (unlikely(!HCD_HW_ACCESSIBLE(ehci_to_hcd(ehci)))) {
1122 rc = -ESHUTDOWN;
1123 goto done;
1124 }
1125 rc = usb_hcd_link_urb_to_ep(ehci_to_hcd(ehci), urb);
1126 if (unlikely(rc))
1127 goto done;
1128
1129 qh = qh_append_tds(ehci, urb, qtd_list, epnum, &urb->ep->hcpriv);
1130 if (unlikely(qh == NULL)) {
1131 usb_hcd_unlink_urb_from_ep(ehci_to_hcd(ehci), urb);
1132 rc = -ENOMEM;
1133 goto done;
1134 }
1135
1136 /* Control/bulk operations through TTs don't need scheduling,
1137 * the HC and TT handle it when the TT has a buffer ready.
1138 */
1139 if (likely (qh->qh_state == QH_STATE_IDLE))
1140 qh_link_async(ehci, qh);
1141 done:
1142 spin_unlock_irqrestore (&ehci->lock, flags);
1143 if (unlikely (qh == NULL))
1144 qtd_list_free (ehci, urb, qtd_list);
1145 return rc;
1146}
1147
1148/*-------------------------------------------------------------------------*/
1149
1150/* the async qh for the qtds being reclaimed are now unlinked from the HC */
1151
1152static void end_unlink_async (struct ehci_hcd *ehci)
1153{
1154 struct ehci_qh *qh = ehci->reclaim;
1155 struct ehci_qh *next;
1156
1157 iaa_watchdog_done(ehci);
1158
1159 // qh->hw_next = cpu_to_hc32(qh->qh_dma);
1160 qh->qh_state = QH_STATE_IDLE;
1161 qh->qh_next.qh = NULL;
1162 qh_put (qh); // refcount from reclaim
1163
1164 /* other unlink(s) may be pending (in QH_STATE_UNLINK_WAIT) */
1165 next = qh->reclaim;
1166 ehci->reclaim = next;
1167 qh->reclaim = NULL;
1168
1169 qh_completions (ehci, qh);
1170
1171 if (!list_empty (&qh->qtd_list)
1172 && HC_IS_RUNNING (ehci_to_hcd(ehci)->state))
1173 qh_link_async (ehci, qh);
1174 else {
1175 /* it's not free to turn the async schedule on/off; leave it
1176 * active but idle for a while once it empties.
1177 */
1178 if (HC_IS_RUNNING (ehci_to_hcd(ehci)->state)
1179 && ehci->async->qh_next.qh == NULL)
1180 timer_action (ehci, TIMER_ASYNC_OFF);
1181 }
1182 qh_put(qh); /* refcount from async list */
1183
1184 if (next) {
1185 ehci->reclaim = NULL;
1186 start_unlink_async (ehci, next);
1187 }
1188
1189 if (ehci->has_synopsys_hc_bug)
1190 ehci_writel(ehci, (u32) ehci->async->qh_dma,
1191 &ehci->regs->async_next);
1192}
1193
1194/* makes sure the async qh will become idle */
1195/* caller must own ehci->lock */
1196
1197static void start_unlink_async (struct ehci_hcd *ehci, struct ehci_qh *qh)
1198{
1199 int cmd = ehci_readl(ehci, &ehci->regs->command);
1200 struct ehci_qh *prev;
1201
1202#ifdef DEBUG
1203 assert_spin_locked(&ehci->lock);
1204 if (ehci->reclaim
1205 || (qh->qh_state != QH_STATE_LINKED
1206 && qh->qh_state != QH_STATE_UNLINK_WAIT)
1207 )
1208 BUG ();
1209#endif
1210
1211 /* stop async schedule right now? */
1212 if (unlikely (qh == ehci->async)) {
1213 /* can't get here without STS_ASS set */
1214 if (ehci_to_hcd(ehci)->state != HC_STATE_HALT
1215 && !ehci->reclaim) {
1216 /* ... and CMD_IAAD clear */
1217 ehci_writel(ehci, cmd & ~CMD_ASE,
1218 &ehci->regs->command);
1219 wmb ();
1220 // handshake later, if we need to
1221 timer_action_done (ehci, TIMER_ASYNC_OFF);
1222 }
1223 return;
1224 }
1225
1226 qh->qh_state = QH_STATE_UNLINK;
1227 ehci->reclaim = qh = qh_get (qh);
1228
1229 prev = ehci->async;
1230 while (prev->qh_next.qh != qh)
1231 prev = prev->qh_next.qh;
1232
1233 prev->hw->hw_next = qh->hw->hw_next;
1234 prev->qh_next = qh->qh_next;
1235 if (ehci->qh_scan_next == qh)
1236 ehci->qh_scan_next = qh->qh_next.qh;
1237 wmb ();
1238
1239 /* If the controller isn't running, we don't have to wait for it */
1240 if (unlikely(!HC_IS_RUNNING(ehci_to_hcd(ehci)->state))) {
1241 /* if (unlikely (qh->reclaim != 0))
1242 * this will recurse, probably not much
1243 */
1244 end_unlink_async (ehci);
1245 return;
1246 }
1247
1248 cmd |= CMD_IAAD;
1249 ehci_writel(ehci, cmd, &ehci->regs->command);
1250 (void)ehci_readl(ehci, &ehci->regs->command);
1251 iaa_watchdog_start(ehci);
1252}
1253
1254/*-------------------------------------------------------------------------*/
1255
1256static void scan_async (struct ehci_hcd *ehci)
1257{
1258 bool stopped;
1259 struct ehci_qh *qh;
1260 enum ehci_timer_action action = TIMER_IO_WATCHDOG;
1261
1262 timer_action_done (ehci, TIMER_ASYNC_SHRINK);
1263 stopped = !HC_IS_RUNNING(ehci_to_hcd(ehci)->state);
1264
1265 ehci->qh_scan_next = ehci->async->qh_next.qh;
1266 while (ehci->qh_scan_next) {
1267 qh = ehci->qh_scan_next;
1268 ehci->qh_scan_next = qh->qh_next.qh;
1269 rescan:
1270 /* clean any finished work for this qh */
1271 if (!list_empty(&qh->qtd_list)) {
1272 int temp;
1273
1274 /*
1275 * Unlinks could happen here; completion reporting
1276 * drops the lock. That's why ehci->qh_scan_next
1277 * always holds the next qh to scan; if the next qh
1278 * gets unlinked then ehci->qh_scan_next is adjusted
1279 * in start_unlink_async().
1280 */
1281 qh = qh_get(qh);
1282 temp = qh_completions(ehci, qh);
1283 if (qh->needs_rescan)
1284 unlink_async(ehci, qh);
1285 qh->unlink_time = jiffies + EHCI_SHRINK_JIFFIES;
1286 qh_put(qh);
1287 if (temp != 0)
1288 goto rescan;
1289 }
1290
1291 /* unlink idle entries, reducing DMA usage as well
1292 * as HCD schedule-scanning costs. delay for any qh
1293 * we just scanned, there's a not-unusual case that it
1294 * doesn't stay idle for long.
1295 * (plus, avoids some kind of re-activation race.)
1296 */
1297 if (list_empty(&qh->qtd_list)
1298 && qh->qh_state == QH_STATE_LINKED) {
1299 if (!ehci->reclaim && (stopped ||
1300 time_after_eq(jiffies, qh->unlink_time)))
1301 start_unlink_async(ehci, qh);
1302 else
1303 action = TIMER_ASYNC_SHRINK;
1304 }
1305 }
1306 if (action == TIMER_ASYNC_SHRINK)
1307 timer_action (ehci, TIMER_ASYNC_SHRINK);
1308}
1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * Copyright (C) 2001-2004 by David Brownell
4 */
5
6/* this file is part of ehci-hcd.c */
7
8/*-------------------------------------------------------------------------*/
9
10/*
11 * EHCI hardware queue manipulation ... the core. QH/QTD manipulation.
12 *
13 * Control, bulk, and interrupt traffic all use "qh" lists. They list "qtd"
14 * entries describing USB transactions, max 16-20kB/entry (with 4kB-aligned
15 * buffers needed for the larger number). We use one QH per endpoint, queue
16 * multiple urbs (all three types) per endpoint. URBs may need several qtds.
17 *
18 * ISO traffic uses "ISO TD" (itd, and sitd) records, and (along with
19 * interrupts) needs careful scheduling. Performance improvements can be
20 * an ongoing challenge. That's in "ehci-sched.c".
21 *
22 * USB 1.1 devices are handled (a) by "companion" OHCI or UHCI root hubs,
23 * or otherwise through transaction translators (TTs) in USB 2.0 hubs using
24 * (b) special fields in qh entries or (c) split iso entries. TTs will
25 * buffer low/full speed data so the host collects it at high speed.
26 */
27
28/*-------------------------------------------------------------------------*/
29
30/* PID Codes that are used here, from EHCI specification, Table 3-16. */
31#define PID_CODE_IN 1
32#define PID_CODE_SETUP 2
33
34/* fill a qtd, returning how much of the buffer we were able to queue up */
35
36static unsigned int
37qtd_fill(struct ehci_hcd *ehci, struct ehci_qtd *qtd, dma_addr_t buf,
38 size_t len, int token, int maxpacket)
39{
40 unsigned int count;
41 u64 addr = buf;
42 int i;
43
44 /* one buffer entry per 4K ... first might be short or unaligned */
45 qtd->hw_buf[0] = cpu_to_hc32(ehci, (u32)addr);
46 qtd->hw_buf_hi[0] = cpu_to_hc32(ehci, (u32)(addr >> 32));
47 count = 0x1000 - (buf & 0x0fff); /* rest of that page */
48 if (likely (len < count)) /* ... iff needed */
49 count = len;
50 else {
51 buf += 0x1000;
52 buf &= ~0x0fff;
53
54 /* per-qtd limit: from 16K to 20K (best alignment) */
55 for (i = 1; count < len && i < 5; i++) {
56 addr = buf;
57 qtd->hw_buf[i] = cpu_to_hc32(ehci, (u32)addr);
58 qtd->hw_buf_hi[i] = cpu_to_hc32(ehci,
59 (u32)(addr >> 32));
60 buf += 0x1000;
61 if ((count + 0x1000) < len)
62 count += 0x1000;
63 else
64 count = len;
65 }
66
67 /* short packets may only terminate transfers */
68 if (count != len)
69 count -= (count % maxpacket);
70 }
71 qtd->hw_token = cpu_to_hc32(ehci, (count << 16) | token);
72 qtd->length = count;
73
74 return count;
75}
76
77/*-------------------------------------------------------------------------*/
78
79static inline void
80qh_update (struct ehci_hcd *ehci, struct ehci_qh *qh, struct ehci_qtd *qtd)
81{
82 struct ehci_qh_hw *hw = qh->hw;
83
84 /* writes to an active overlay are unsafe */
85 WARN_ON(qh->qh_state != QH_STATE_IDLE);
86
87 hw->hw_qtd_next = QTD_NEXT(ehci, qtd->qtd_dma);
88 hw->hw_alt_next = EHCI_LIST_END(ehci);
89
90 /* Except for control endpoints, we make hardware maintain data
91 * toggle (like OHCI) ... here (re)initialize the toggle in the QH,
92 * and set the pseudo-toggle in udev. Only usb_clear_halt() will
93 * ever clear it.
94 */
95 if (!(hw->hw_info1 & cpu_to_hc32(ehci, QH_TOGGLE_CTL))) {
96 unsigned is_out, epnum;
97
98 is_out = qh->is_out;
99 epnum = (hc32_to_cpup(ehci, &hw->hw_info1) >> 8) & 0x0f;
100 if (unlikely(!usb_gettoggle(qh->ps.udev, epnum, is_out))) {
101 hw->hw_token &= ~cpu_to_hc32(ehci, QTD_TOGGLE);
102 usb_settoggle(qh->ps.udev, epnum, is_out, 1);
103 }
104 }
105
106 hw->hw_token &= cpu_to_hc32(ehci, QTD_TOGGLE | QTD_STS_PING);
107}
108
109/* if it weren't for a common silicon quirk (writing the dummy into the qh
110 * overlay, so qh->hw_token wrongly becomes inactive/halted), only fault
111 * recovery (including urb dequeue) would need software changes to a QH...
112 */
113static void
114qh_refresh (struct ehci_hcd *ehci, struct ehci_qh *qh)
115{
116 struct ehci_qtd *qtd;
117
118 qtd = list_entry(qh->qtd_list.next, struct ehci_qtd, qtd_list);
119
120 /*
121 * first qtd may already be partially processed.
122 * If we come here during unlink, the QH overlay region
123 * might have reference to the just unlinked qtd. The
124 * qtd is updated in qh_completions(). Update the QH
125 * overlay here.
126 */
127 if (qh->hw->hw_token & ACTIVE_BIT(ehci)) {
128 qh->hw->hw_qtd_next = qtd->hw_next;
129 if (qh->should_be_inactive)
130 ehci_warn(ehci, "qh %p should be inactive!\n", qh);
131 } else {
132 qh_update(ehci, qh, qtd);
133 }
134 qh->should_be_inactive = 0;
135}
136
137/*-------------------------------------------------------------------------*/
138
139static void qh_link_async(struct ehci_hcd *ehci, struct ehci_qh *qh);
140
141static void ehci_clear_tt_buffer_complete(struct usb_hcd *hcd,
142 struct usb_host_endpoint *ep)
143{
144 struct ehci_hcd *ehci = hcd_to_ehci(hcd);
145 struct ehci_qh *qh = ep->hcpriv;
146 unsigned long flags;
147
148 spin_lock_irqsave(&ehci->lock, flags);
149 qh->clearing_tt = 0;
150 if (qh->qh_state == QH_STATE_IDLE && !list_empty(&qh->qtd_list)
151 && ehci->rh_state == EHCI_RH_RUNNING)
152 qh_link_async(ehci, qh);
153 spin_unlock_irqrestore(&ehci->lock, flags);
154}
155
156static void ehci_clear_tt_buffer(struct ehci_hcd *ehci, struct ehci_qh *qh,
157 struct urb *urb, u32 token)
158{
159
160 /* If an async split transaction gets an error or is unlinked,
161 * the TT buffer may be left in an indeterminate state. We
162 * have to clear the TT buffer.
163 *
164 * Note: this routine is never called for Isochronous transfers.
165 */
166 if (urb->dev->tt && !usb_pipeint(urb->pipe) && !qh->clearing_tt) {
167#ifdef CONFIG_DYNAMIC_DEBUG
168 struct usb_device *tt = urb->dev->tt->hub;
169 dev_dbg(&tt->dev,
170 "clear tt buffer port %d, a%d ep%d t%08x\n",
171 urb->dev->ttport, urb->dev->devnum,
172 usb_pipeendpoint(urb->pipe), token);
173#endif /* CONFIG_DYNAMIC_DEBUG */
174 if (!ehci_is_TDI(ehci)
175 || urb->dev->tt->hub !=
176 ehci_to_hcd(ehci)->self.root_hub) {
177 if (usb_hub_clear_tt_buffer(urb) == 0)
178 qh->clearing_tt = 1;
179 } else {
180
181 /* REVISIT ARC-derived cores don't clear the root
182 * hub TT buffer in this way...
183 */
184 }
185 }
186}
187
188static int qtd_copy_status (
189 struct ehci_hcd *ehci,
190 struct urb *urb,
191 size_t length,
192 u32 token
193)
194{
195 int status = -EINPROGRESS;
196
197 /* count IN/OUT bytes, not SETUP (even short packets) */
198 if (likely(QTD_PID(token) != PID_CODE_SETUP))
199 urb->actual_length += length - QTD_LENGTH (token);
200
201 /* don't modify error codes */
202 if (unlikely(urb->unlinked))
203 return status;
204
205 /* force cleanup after short read; not always an error */
206 if (unlikely (IS_SHORT_READ (token)))
207 status = -EREMOTEIO;
208
209 /* serious "can't proceed" faults reported by the hardware */
210 if (token & QTD_STS_HALT) {
211 if (token & QTD_STS_BABBLE) {
212 /* FIXME "must" disable babbling device's port too */
213 status = -EOVERFLOW;
214 /*
215 * When MMF is active and PID Code is IN, queue is halted.
216 * EHCI Specification, Table 4-13.
217 */
218 } else if ((token & QTD_STS_MMF) &&
219 (QTD_PID(token) == PID_CODE_IN)) {
220 status = -EPROTO;
221 /* CERR nonzero + halt --> stall */
222 } else if (QTD_CERR(token)) {
223 status = -EPIPE;
224
225 /* In theory, more than one of the following bits can be set
226 * since they are sticky and the transaction is retried.
227 * Which to test first is rather arbitrary.
228 */
229 } else if (token & QTD_STS_MMF) {
230 /* fs/ls interrupt xfer missed the complete-split */
231 status = -EPROTO;
232 } else if (token & QTD_STS_DBE) {
233 status = (QTD_PID (token) == 1) /* IN ? */
234 ? -ENOSR /* hc couldn't read data */
235 : -ECOMM; /* hc couldn't write data */
236 } else if (token & QTD_STS_XACT) {
237 /* timeout, bad CRC, wrong PID, etc */
238 ehci_dbg(ehci, "devpath %s ep%d%s 3strikes\n",
239 urb->dev->devpath,
240 usb_pipeendpoint(urb->pipe),
241 usb_pipein(urb->pipe) ? "in" : "out");
242 status = -EPROTO;
243 } else { /* unknown */
244 status = -EPROTO;
245 }
246 }
247
248 return status;
249}
250
251static void
252ehci_urb_done(struct ehci_hcd *ehci, struct urb *urb, int status)
253{
254 if (usb_pipetype(urb->pipe) == PIPE_INTERRUPT) {
255 /* ... update hc-wide periodic stats */
256 ehci_to_hcd(ehci)->self.bandwidth_int_reqs--;
257 }
258
259 if (unlikely(urb->unlinked)) {
260 INCR(ehci->stats.unlink);
261 } else {
262 /* report non-error and short read status as zero */
263 if (status == -EINPROGRESS || status == -EREMOTEIO)
264 status = 0;
265 INCR(ehci->stats.complete);
266 }
267
268#ifdef EHCI_URB_TRACE
269 ehci_dbg (ehci,
270 "%s %s urb %p ep%d%s status %d len %d/%d\n",
271 __func__, urb->dev->devpath, urb,
272 usb_pipeendpoint (urb->pipe),
273 usb_pipein (urb->pipe) ? "in" : "out",
274 status,
275 urb->actual_length, urb->transfer_buffer_length);
276#endif
277
278 usb_hcd_unlink_urb_from_ep(ehci_to_hcd(ehci), urb);
279 usb_hcd_giveback_urb(ehci_to_hcd(ehci), urb, status);
280}
281
282static int qh_schedule (struct ehci_hcd *ehci, struct ehci_qh *qh);
283
284/*
285 * Process and free completed qtds for a qh, returning URBs to drivers.
286 * Chases up to qh->hw_current. Returns nonzero if the caller should
287 * unlink qh.
288 */
289static unsigned
290qh_completions (struct ehci_hcd *ehci, struct ehci_qh *qh)
291{
292 struct ehci_qtd *last, *end = qh->dummy;
293 struct list_head *entry, *tmp;
294 int last_status;
295 int stopped;
296 u8 state;
297 struct ehci_qh_hw *hw = qh->hw;
298
299 /* completions (or tasks on other cpus) must never clobber HALT
300 * till we've gone through and cleaned everything up, even when
301 * they add urbs to this qh's queue or mark them for unlinking.
302 *
303 * NOTE: unlinking expects to be done in queue order.
304 *
305 * It's a bug for qh->qh_state to be anything other than
306 * QH_STATE_IDLE, unless our caller is scan_async() or
307 * scan_intr().
308 */
309 state = qh->qh_state;
310 qh->qh_state = QH_STATE_COMPLETING;
311 stopped = (state == QH_STATE_IDLE);
312
313 rescan:
314 last = NULL;
315 last_status = -EINPROGRESS;
316 qh->dequeue_during_giveback = 0;
317
318 /* remove de-activated QTDs from front of queue.
319 * after faults (including short reads), cleanup this urb
320 * then let the queue advance.
321 * if queue is stopped, handles unlinks.
322 */
323 list_for_each_safe (entry, tmp, &qh->qtd_list) {
324 struct ehci_qtd *qtd;
325 struct urb *urb;
326 u32 token = 0;
327
328 qtd = list_entry (entry, struct ehci_qtd, qtd_list);
329 urb = qtd->urb;
330
331 /* clean up any state from previous QTD ...*/
332 if (last) {
333 if (likely (last->urb != urb)) {
334 ehci_urb_done(ehci, last->urb, last_status);
335 last_status = -EINPROGRESS;
336 }
337 ehci_qtd_free (ehci, last);
338 last = NULL;
339 }
340
341 /* ignore urbs submitted during completions we reported */
342 if (qtd == end)
343 break;
344
345 /* hardware copies qtd out of qh overlay */
346 rmb ();
347 token = hc32_to_cpu(ehci, qtd->hw_token);
348
349 /* always clean up qtds the hc de-activated */
350 retry_xacterr:
351 if ((token & QTD_STS_ACTIVE) == 0) {
352
353 /* Report Data Buffer Error: non-fatal but useful */
354 if (token & QTD_STS_DBE)
355 ehci_dbg(ehci,
356 "detected DataBufferErr for urb %p ep%d%s len %d, qtd %p [qh %p]\n",
357 urb,
358 usb_endpoint_num(&urb->ep->desc),
359 usb_endpoint_dir_in(&urb->ep->desc) ? "in" : "out",
360 urb->transfer_buffer_length,
361 qtd,
362 qh);
363
364 /* on STALL, error, and short reads this urb must
365 * complete and all its qtds must be recycled.
366 */
367 if ((token & QTD_STS_HALT) != 0) {
368
369 /* retry transaction errors until we
370 * reach the software xacterr limit
371 */
372 if ((token & QTD_STS_XACT) &&
373 QTD_CERR(token) == 0 &&
374 ++qh->xacterrs < QH_XACTERR_MAX &&
375 !urb->unlinked) {
376 ehci_dbg(ehci,
377 "detected XactErr len %zu/%zu retry %d\n",
378 qtd->length - QTD_LENGTH(token), qtd->length, qh->xacterrs);
379
380 /* reset the token in the qtd and the
381 * qh overlay (which still contains
382 * the qtd) so that we pick up from
383 * where we left off
384 */
385 token &= ~QTD_STS_HALT;
386 token |= QTD_STS_ACTIVE |
387 (EHCI_TUNE_CERR << 10);
388 qtd->hw_token = cpu_to_hc32(ehci,
389 token);
390 wmb();
391 hw->hw_token = cpu_to_hc32(ehci,
392 token);
393 goto retry_xacterr;
394 }
395 stopped = 1;
396 qh->unlink_reason |= QH_UNLINK_HALTED;
397
398 /* magic dummy for some short reads; qh won't advance.
399 * that silicon quirk can kick in with this dummy too.
400 *
401 * other short reads won't stop the queue, including
402 * control transfers (status stage handles that) or
403 * most other single-qtd reads ... the queue stops if
404 * URB_SHORT_NOT_OK was set so the driver submitting
405 * the urbs could clean it up.
406 */
407 } else if (IS_SHORT_READ (token)
408 && !(qtd->hw_alt_next
409 & EHCI_LIST_END(ehci))) {
410 stopped = 1;
411 qh->unlink_reason |= QH_UNLINK_SHORT_READ;
412 }
413
414 /* stop scanning when we reach qtds the hc is using */
415 } else if (likely (!stopped
416 && ehci->rh_state >= EHCI_RH_RUNNING)) {
417 break;
418
419 /* scan the whole queue for unlinks whenever it stops */
420 } else {
421 stopped = 1;
422
423 /* cancel everything if we halt, suspend, etc */
424 if (ehci->rh_state < EHCI_RH_RUNNING) {
425 last_status = -ESHUTDOWN;
426 qh->unlink_reason |= QH_UNLINK_SHUTDOWN;
427 }
428
429 /* this qtd is active; skip it unless a previous qtd
430 * for its urb faulted, or its urb was canceled.
431 */
432 else if (last_status == -EINPROGRESS && !urb->unlinked)
433 continue;
434
435 /*
436 * If this was the active qtd when the qh was unlinked
437 * and the overlay's token is active, then the overlay
438 * hasn't been written back to the qtd yet so use its
439 * token instead of the qtd's. After the qtd is
440 * processed and removed, the overlay won't be valid
441 * any more.
442 */
443 if (state == QH_STATE_IDLE &&
444 qh->qtd_list.next == &qtd->qtd_list &&
445 (hw->hw_token & ACTIVE_BIT(ehci))) {
446 token = hc32_to_cpu(ehci, hw->hw_token);
447 hw->hw_token &= ~ACTIVE_BIT(ehci);
448 qh->should_be_inactive = 1;
449
450 /* An unlink may leave an incomplete
451 * async transaction in the TT buffer.
452 * We have to clear it.
453 */
454 ehci_clear_tt_buffer(ehci, qh, urb, token);
455 }
456 }
457
458 /* unless we already know the urb's status, collect qtd status
459 * and update count of bytes transferred. in common short read
460 * cases with only one data qtd (including control transfers),
461 * queue processing won't halt. but with two or more qtds (for
462 * example, with a 32 KB transfer), when the first qtd gets a
463 * short read the second must be removed by hand.
464 */
465 if (last_status == -EINPROGRESS) {
466 last_status = qtd_copy_status(ehci, urb,
467 qtd->length, token);
468 if (last_status == -EREMOTEIO
469 && (qtd->hw_alt_next
470 & EHCI_LIST_END(ehci)))
471 last_status = -EINPROGRESS;
472
473 /* As part of low/full-speed endpoint-halt processing
474 * we must clear the TT buffer (11.17.5).
475 */
476 if (unlikely(last_status != -EINPROGRESS &&
477 last_status != -EREMOTEIO)) {
478 /* The TT's in some hubs malfunction when they
479 * receive this request following a STALL (they
480 * stop sending isochronous packets). Since a
481 * STALL can't leave the TT buffer in a busy
482 * state (if you believe Figures 11-48 - 11-51
483 * in the USB 2.0 spec), we won't clear the TT
484 * buffer in this case. Strictly speaking this
485 * is a violation of the spec.
486 */
487 if (last_status != -EPIPE)
488 ehci_clear_tt_buffer(ehci, qh, urb,
489 token);
490 }
491 }
492
493 /* if we're removing something not at the queue head,
494 * patch the hardware queue pointer.
495 */
496 if (stopped && qtd->qtd_list.prev != &qh->qtd_list) {
497 last = list_entry (qtd->qtd_list.prev,
498 struct ehci_qtd, qtd_list);
499 last->hw_next = qtd->hw_next;
500 }
501
502 /* remove qtd; it's recycled after possible urb completion */
503 list_del (&qtd->qtd_list);
504 last = qtd;
505
506 /* reinit the xacterr counter for the next qtd */
507 qh->xacterrs = 0;
508 }
509
510 /* last urb's completion might still need calling */
511 if (likely (last != NULL)) {
512 ehci_urb_done(ehci, last->urb, last_status);
513 ehci_qtd_free (ehci, last);
514 }
515
516 /* Do we need to rescan for URBs dequeued during a giveback? */
517 if (unlikely(qh->dequeue_during_giveback)) {
518 /* If the QH is already unlinked, do the rescan now. */
519 if (state == QH_STATE_IDLE)
520 goto rescan;
521
522 /* Otherwise the caller must unlink the QH. */
523 }
524
525 /* restore original state; caller must unlink or relink */
526 qh->qh_state = state;
527
528 /* be sure the hardware's done with the qh before refreshing
529 * it after fault cleanup, or recovering from silicon wrongly
530 * overlaying the dummy qtd (which reduces DMA chatter).
531 *
532 * We won't refresh a QH that's linked (after the HC
533 * stopped the queue). That avoids a race:
534 * - HC reads first part of QH;
535 * - CPU updates that first part and the token;
536 * - HC reads rest of that QH, including token
537 * Result: HC gets an inconsistent image, and then
538 * DMAs to/from the wrong memory (corrupting it).
539 *
540 * That should be rare for interrupt transfers,
541 * except maybe high bandwidth ...
542 */
543 if (stopped != 0 || hw->hw_qtd_next == EHCI_LIST_END(ehci))
544 qh->unlink_reason |= QH_UNLINK_DUMMY_OVERLAY;
545
546 /* Let the caller know if the QH needs to be unlinked. */
547 return qh->unlink_reason;
548}
549
550/*-------------------------------------------------------------------------*/
551
552/*
553 * reverse of qh_urb_transaction: free a list of TDs.
554 * used for cleanup after errors, before HC sees an URB's TDs.
555 */
556static void qtd_list_free (
557 struct ehci_hcd *ehci,
558 struct urb *urb,
559 struct list_head *qtd_list
560) {
561 struct list_head *entry, *temp;
562
563 list_for_each_safe (entry, temp, qtd_list) {
564 struct ehci_qtd *qtd;
565
566 qtd = list_entry (entry, struct ehci_qtd, qtd_list);
567 list_del (&qtd->qtd_list);
568 ehci_qtd_free (ehci, qtd);
569 }
570}
571
572/*
573 * create a list of filled qtds for this URB; won't link into qh.
574 */
575static struct list_head *
576qh_urb_transaction (
577 struct ehci_hcd *ehci,
578 struct urb *urb,
579 struct list_head *head,
580 gfp_t flags
581) {
582 struct ehci_qtd *qtd, *qtd_prev;
583 dma_addr_t buf;
584 int len, this_sg_len, maxpacket;
585 int is_input;
586 u32 token;
587 int i;
588 struct scatterlist *sg;
589
590 /*
591 * URBs map to sequences of QTDs: one logical transaction
592 */
593 qtd = ehci_qtd_alloc (ehci, flags);
594 if (unlikely (!qtd))
595 return NULL;
596 list_add_tail (&qtd->qtd_list, head);
597 qtd->urb = urb;
598
599 token = QTD_STS_ACTIVE;
600 token |= (EHCI_TUNE_CERR << 10);
601 /* for split transactions, SplitXState initialized to zero */
602
603 len = urb->transfer_buffer_length;
604 is_input = usb_pipein (urb->pipe);
605 if (usb_pipecontrol (urb->pipe)) {
606 /* SETUP pid */
607 qtd_fill(ehci, qtd, urb->setup_dma,
608 sizeof (struct usb_ctrlrequest),
609 token | (2 /* "setup" */ << 8), 8);
610
611 /* ... and always at least one more pid */
612 token ^= QTD_TOGGLE;
613 qtd_prev = qtd;
614 qtd = ehci_qtd_alloc (ehci, flags);
615 if (unlikely (!qtd))
616 goto cleanup;
617 qtd->urb = urb;
618 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
619 list_add_tail (&qtd->qtd_list, head);
620
621 /* for zero length DATA stages, STATUS is always IN */
622 if (len == 0)
623 token |= (1 /* "in" */ << 8);
624 }
625
626 /*
627 * data transfer stage: buffer setup
628 */
629 i = urb->num_mapped_sgs;
630 if (len > 0 && i > 0) {
631 sg = urb->sg;
632 buf = sg_dma_address(sg);
633
634 /* urb->transfer_buffer_length may be smaller than the
635 * size of the scatterlist (or vice versa)
636 */
637 this_sg_len = min_t(int, sg_dma_len(sg), len);
638 } else {
639 sg = NULL;
640 buf = urb->transfer_dma;
641 this_sg_len = len;
642 }
643
644 if (is_input)
645 token |= (1 /* "in" */ << 8);
646 /* else it's already initted to "out" pid (0 << 8) */
647
648 maxpacket = usb_endpoint_maxp(&urb->ep->desc);
649
650 /*
651 * buffer gets wrapped in one or more qtds;
652 * last one may be "short" (including zero len)
653 * and may serve as a control status ack
654 */
655 for (;;) {
656 unsigned int this_qtd_len;
657
658 this_qtd_len = qtd_fill(ehci, qtd, buf, this_sg_len, token,
659 maxpacket);
660 this_sg_len -= this_qtd_len;
661 len -= this_qtd_len;
662 buf += this_qtd_len;
663
664 /*
665 * short reads advance to a "magic" dummy instead of the next
666 * qtd ... that forces the queue to stop, for manual cleanup.
667 * (this will usually be overridden later.)
668 */
669 if (is_input)
670 qtd->hw_alt_next = ehci->async->hw->hw_alt_next;
671
672 /* qh makes control packets use qtd toggle; maybe switch it */
673 if ((maxpacket & (this_qtd_len + (maxpacket - 1))) == 0)
674 token ^= QTD_TOGGLE;
675
676 if (likely(this_sg_len <= 0)) {
677 if (--i <= 0 || len <= 0)
678 break;
679 sg = sg_next(sg);
680 buf = sg_dma_address(sg);
681 this_sg_len = min_t(int, sg_dma_len(sg), len);
682 }
683
684 qtd_prev = qtd;
685 qtd = ehci_qtd_alloc (ehci, flags);
686 if (unlikely (!qtd))
687 goto cleanup;
688 qtd->urb = urb;
689 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
690 list_add_tail (&qtd->qtd_list, head);
691 }
692
693 /*
694 * unless the caller requires manual cleanup after short reads,
695 * have the alt_next mechanism keep the queue running after the
696 * last data qtd (the only one, for control and most other cases).
697 */
698 if (likely ((urb->transfer_flags & URB_SHORT_NOT_OK) == 0
699 || usb_pipecontrol (urb->pipe)))
700 qtd->hw_alt_next = EHCI_LIST_END(ehci);
701
702 /*
703 * control requests may need a terminating data "status" ack;
704 * other OUT ones may need a terminating short packet
705 * (zero length).
706 */
707 if (likely (urb->transfer_buffer_length != 0)) {
708 int one_more = 0;
709
710 if (usb_pipecontrol (urb->pipe)) {
711 one_more = 1;
712 token ^= 0x0100; /* "in" <--> "out" */
713 token |= QTD_TOGGLE; /* force DATA1 */
714 } else if (usb_pipeout(urb->pipe)
715 && (urb->transfer_flags & URB_ZERO_PACKET)
716 && !(urb->transfer_buffer_length % maxpacket)) {
717 one_more = 1;
718 }
719 if (one_more) {
720 qtd_prev = qtd;
721 qtd = ehci_qtd_alloc (ehci, flags);
722 if (unlikely (!qtd))
723 goto cleanup;
724 qtd->urb = urb;
725 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
726 list_add_tail (&qtd->qtd_list, head);
727
728 /* never any data in such packets */
729 qtd_fill(ehci, qtd, 0, 0, token, 0);
730 }
731 }
732
733 /* by default, enable interrupt on urb completion */
734 if (likely (!(urb->transfer_flags & URB_NO_INTERRUPT)))
735 qtd->hw_token |= cpu_to_hc32(ehci, QTD_IOC);
736 return head;
737
738cleanup:
739 qtd_list_free (ehci, urb, head);
740 return NULL;
741}
742
743/*-------------------------------------------------------------------------*/
744
745// Would be best to create all qh's from config descriptors,
746// when each interface/altsetting is established. Unlink
747// any previous qh and cancel its urbs first; endpoints are
748// implicitly reset then (data toggle too).
749// That'd mean updating how usbcore talks to HCDs. (2.7?)
750
751
752/*
753 * Each QH holds a qtd list; a QH is used for everything except iso.
754 *
755 * For interrupt urbs, the scheduler must set the microframe scheduling
756 * mask(s) each time the QH gets scheduled. For highspeed, that's
757 * just one microframe in the s-mask. For split interrupt transactions
758 * there are additional complications: c-mask, maybe FSTNs.
759 */
760static struct ehci_qh *
761qh_make (
762 struct ehci_hcd *ehci,
763 struct urb *urb,
764 gfp_t flags
765) {
766 struct ehci_qh *qh = ehci_qh_alloc (ehci, flags);
767 struct usb_host_endpoint *ep;
768 u32 info1 = 0, info2 = 0;
769 int is_input, type;
770 int maxp = 0;
771 int mult;
772 struct usb_tt *tt = urb->dev->tt;
773 struct ehci_qh_hw *hw;
774
775 if (!qh)
776 return qh;
777
778 /*
779 * init endpoint/device data for this QH
780 */
781 info1 |= usb_pipeendpoint (urb->pipe) << 8;
782 info1 |= usb_pipedevice (urb->pipe) << 0;
783
784 is_input = usb_pipein (urb->pipe);
785 type = usb_pipetype (urb->pipe);
786 ep = usb_pipe_endpoint (urb->dev, urb->pipe);
787 maxp = usb_endpoint_maxp (&ep->desc);
788 mult = usb_endpoint_maxp_mult (&ep->desc);
789
790 /* 1024 byte maxpacket is a hardware ceiling. High bandwidth
791 * acts like up to 3KB, but is built from smaller packets.
792 */
793 if (maxp > 1024) {
794 ehci_dbg(ehci, "bogus qh maxpacket %d\n", maxp);
795 goto done;
796 }
797
798 /* Compute interrupt scheduling parameters just once, and save.
799 * - allowing for high bandwidth, how many nsec/uframe are used?
800 * - split transactions need a second CSPLIT uframe; same question
801 * - splits also need a schedule gap (for full/low speed I/O)
802 * - qh has a polling interval
803 *
804 * For control/bulk requests, the HC or TT handles these.
805 */
806 if (type == PIPE_INTERRUPT) {
807 unsigned tmp;
808
809 qh->ps.usecs = NS_TO_US(usb_calc_bus_time(USB_SPEED_HIGH,
810 is_input, 0, mult * maxp));
811 qh->ps.phase = NO_FRAME;
812
813 if (urb->dev->speed == USB_SPEED_HIGH) {
814 qh->ps.c_usecs = 0;
815 qh->gap_uf = 0;
816
817 if (urb->interval > 1 && urb->interval < 8) {
818 /* NOTE interval 2 or 4 uframes could work.
819 * But interval 1 scheduling is simpler, and
820 * includes high bandwidth.
821 */
822 urb->interval = 1;
823 } else if (urb->interval > ehci->periodic_size << 3) {
824 urb->interval = ehci->periodic_size << 3;
825 }
826 qh->ps.period = urb->interval >> 3;
827
828 /* period for bandwidth allocation */
829 tmp = min_t(unsigned, EHCI_BANDWIDTH_SIZE,
830 1 << (urb->ep->desc.bInterval - 1));
831
832 /* Allow urb->interval to override */
833 qh->ps.bw_uperiod = min_t(unsigned, tmp, urb->interval);
834 qh->ps.bw_period = qh->ps.bw_uperiod >> 3;
835 } else {
836 int think_time;
837
838 /* gap is f(FS/LS transfer times) */
839 qh->gap_uf = 1 + usb_calc_bus_time (urb->dev->speed,
840 is_input, 0, maxp) / (125 * 1000);
841
842 /* FIXME this just approximates SPLIT/CSPLIT times */
843 if (is_input) { // SPLIT, gap, CSPLIT+DATA
844 qh->ps.c_usecs = qh->ps.usecs + HS_USECS(0);
845 qh->ps.usecs = HS_USECS(1);
846 } else { // SPLIT+DATA, gap, CSPLIT
847 qh->ps.usecs += HS_USECS(1);
848 qh->ps.c_usecs = HS_USECS(0);
849 }
850
851 think_time = tt ? tt->think_time : 0;
852 qh->ps.tt_usecs = NS_TO_US(think_time +
853 usb_calc_bus_time (urb->dev->speed,
854 is_input, 0, maxp));
855 if (urb->interval > ehci->periodic_size)
856 urb->interval = ehci->periodic_size;
857 qh->ps.period = urb->interval;
858
859 /* period for bandwidth allocation */
860 tmp = min_t(unsigned, EHCI_BANDWIDTH_FRAMES,
861 urb->ep->desc.bInterval);
862 tmp = rounddown_pow_of_two(tmp);
863
864 /* Allow urb->interval to override */
865 qh->ps.bw_period = min_t(unsigned, tmp, urb->interval);
866 qh->ps.bw_uperiod = qh->ps.bw_period << 3;
867 }
868 }
869
870 /* support for tt scheduling, and access to toggles */
871 qh->ps.udev = urb->dev;
872 qh->ps.ep = urb->ep;
873
874 /* using TT? */
875 switch (urb->dev->speed) {
876 case USB_SPEED_LOW:
877 info1 |= QH_LOW_SPEED;
878 fallthrough;
879
880 case USB_SPEED_FULL:
881 /* EPS 0 means "full" */
882 if (type != PIPE_INTERRUPT)
883 info1 |= (EHCI_TUNE_RL_TT << 28);
884 if (type == PIPE_CONTROL) {
885 info1 |= QH_CONTROL_EP; /* for TT */
886 info1 |= QH_TOGGLE_CTL; /* toggle from qtd */
887 }
888 info1 |= maxp << 16;
889
890 info2 |= (EHCI_TUNE_MULT_TT << 30);
891
892 /* Some Freescale processors have an erratum in which the
893 * port number in the queue head was 0..N-1 instead of 1..N.
894 */
895 if (ehci_has_fsl_portno_bug(ehci))
896 info2 |= (urb->dev->ttport-1) << 23;
897 else
898 info2 |= urb->dev->ttport << 23;
899
900 /* set the address of the TT; for TDI's integrated
901 * root hub tt, leave it zeroed.
902 */
903 if (tt && tt->hub != ehci_to_hcd(ehci)->self.root_hub)
904 info2 |= tt->hub->devnum << 16;
905
906 /* NOTE: if (PIPE_INTERRUPT) { scheduler sets c-mask } */
907
908 break;
909
910 case USB_SPEED_HIGH: /* no TT involved */
911 info1 |= QH_HIGH_SPEED;
912 if (type == PIPE_CONTROL) {
913 info1 |= (EHCI_TUNE_RL_HS << 28);
914 info1 |= 64 << 16; /* usb2 fixed maxpacket */
915 info1 |= QH_TOGGLE_CTL; /* toggle from qtd */
916 info2 |= (EHCI_TUNE_MULT_HS << 30);
917 } else if (type == PIPE_BULK) {
918 info1 |= (EHCI_TUNE_RL_HS << 28);
919 /* The USB spec says that high speed bulk endpoints
920 * always use 512 byte maxpacket. But some device
921 * vendors decided to ignore that, and MSFT is happy
922 * to help them do so. So now people expect to use
923 * such nonconformant devices with Linux too; sigh.
924 */
925 info1 |= maxp << 16;
926 info2 |= (EHCI_TUNE_MULT_HS << 30);
927 } else { /* PIPE_INTERRUPT */
928 info1 |= maxp << 16;
929 info2 |= mult << 30;
930 }
931 break;
932 default:
933 ehci_dbg(ehci, "bogus dev %p speed %d\n", urb->dev,
934 urb->dev->speed);
935done:
936 qh_destroy(ehci, qh);
937 return NULL;
938 }
939
940 /* NOTE: if (PIPE_INTERRUPT) { scheduler sets s-mask } */
941
942 /* init as live, toggle clear */
943 qh->qh_state = QH_STATE_IDLE;
944 hw = qh->hw;
945 hw->hw_info1 = cpu_to_hc32(ehci, info1);
946 hw->hw_info2 = cpu_to_hc32(ehci, info2);
947 qh->is_out = !is_input;
948 usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe), !is_input, 1);
949 return qh;
950}
951
952/*-------------------------------------------------------------------------*/
953
954static void enable_async(struct ehci_hcd *ehci)
955{
956 if (ehci->async_count++)
957 return;
958
959 /* Stop waiting to turn off the async schedule */
960 ehci->enabled_hrtimer_events &= ~BIT(EHCI_HRTIMER_DISABLE_ASYNC);
961
962 /* Don't start the schedule until ASS is 0 */
963 ehci_poll_ASS(ehci);
964 turn_on_io_watchdog(ehci);
965}
966
967static void disable_async(struct ehci_hcd *ehci)
968{
969 if (--ehci->async_count)
970 return;
971
972 /* The async schedule and unlink lists are supposed to be empty */
973 WARN_ON(ehci->async->qh_next.qh || !list_empty(&ehci->async_unlink) ||
974 !list_empty(&ehci->async_idle));
975
976 /* Don't turn off the schedule until ASS is 1 */
977 ehci_poll_ASS(ehci);
978}
979
980/* move qh (and its qtds) onto async queue; maybe enable queue. */
981
982static void qh_link_async (struct ehci_hcd *ehci, struct ehci_qh *qh)
983{
984 __hc32 dma = QH_NEXT(ehci, qh->qh_dma);
985 struct ehci_qh *head;
986
987 /* Don't link a QH if there's a Clear-TT-Buffer pending */
988 if (unlikely(qh->clearing_tt))
989 return;
990
991 WARN_ON(qh->qh_state != QH_STATE_IDLE);
992
993 /* clear halt and/or toggle; and maybe recover from silicon quirk */
994 qh_refresh(ehci, qh);
995
996 /* splice right after start */
997 head = ehci->async;
998 qh->qh_next = head->qh_next;
999 qh->hw->hw_next = head->hw->hw_next;
1000 wmb ();
1001
1002 head->qh_next.qh = qh;
1003 head->hw->hw_next = dma;
1004
1005 qh->qh_state = QH_STATE_LINKED;
1006 qh->xacterrs = 0;
1007 qh->unlink_reason = 0;
1008 /* qtd completions reported later by interrupt */
1009
1010 enable_async(ehci);
1011}
1012
1013/*-------------------------------------------------------------------------*/
1014
1015/*
1016 * For control/bulk/interrupt, return QH with these TDs appended.
1017 * Allocates and initializes the QH if necessary.
1018 * Returns null if it can't allocate a QH it needs to.
1019 * If the QH has TDs (urbs) already, that's great.
1020 */
1021static struct ehci_qh *qh_append_tds (
1022 struct ehci_hcd *ehci,
1023 struct urb *urb,
1024 struct list_head *qtd_list,
1025 int epnum,
1026 void **ptr
1027)
1028{
1029 struct ehci_qh *qh = NULL;
1030 __hc32 qh_addr_mask = cpu_to_hc32(ehci, 0x7f);
1031
1032 qh = (struct ehci_qh *) *ptr;
1033 if (unlikely (qh == NULL)) {
1034 /* can't sleep here, we have ehci->lock... */
1035 qh = qh_make (ehci, urb, GFP_ATOMIC);
1036 *ptr = qh;
1037 }
1038 if (likely (qh != NULL)) {
1039 struct ehci_qtd *qtd;
1040
1041 if (unlikely (list_empty (qtd_list)))
1042 qtd = NULL;
1043 else
1044 qtd = list_entry (qtd_list->next, struct ehci_qtd,
1045 qtd_list);
1046
1047 /* control qh may need patching ... */
1048 if (unlikely (epnum == 0)) {
1049
1050 /* usb_reset_device() briefly reverts to address 0 */
1051 if (usb_pipedevice (urb->pipe) == 0)
1052 qh->hw->hw_info1 &= ~qh_addr_mask;
1053 }
1054
1055 /* just one way to queue requests: swap with the dummy qtd.
1056 * only hc or qh_refresh() ever modify the overlay.
1057 */
1058 if (likely (qtd != NULL)) {
1059 struct ehci_qtd *dummy;
1060 dma_addr_t dma;
1061 __hc32 token;
1062
1063 /* to avoid racing the HC, use the dummy td instead of
1064 * the first td of our list (becomes new dummy). both
1065 * tds stay deactivated until we're done, when the
1066 * HC is allowed to fetch the old dummy (4.10.2).
1067 */
1068 token = qtd->hw_token;
1069 qtd->hw_token = HALT_BIT(ehci);
1070
1071 dummy = qh->dummy;
1072
1073 dma = dummy->qtd_dma;
1074 *dummy = *qtd;
1075 dummy->qtd_dma = dma;
1076
1077 list_del (&qtd->qtd_list);
1078 list_add (&dummy->qtd_list, qtd_list);
1079 list_splice_tail(qtd_list, &qh->qtd_list);
1080
1081 ehci_qtd_init(ehci, qtd, qtd->qtd_dma);
1082 qh->dummy = qtd;
1083
1084 /* hc must see the new dummy at list end */
1085 dma = qtd->qtd_dma;
1086 qtd = list_entry (qh->qtd_list.prev,
1087 struct ehci_qtd, qtd_list);
1088 qtd->hw_next = QTD_NEXT(ehci, dma);
1089
1090 /* let the hc process these next qtds */
1091 wmb ();
1092 dummy->hw_token = token;
1093
1094 urb->hcpriv = qh;
1095 }
1096 }
1097 return qh;
1098}
1099
1100/*-------------------------------------------------------------------------*/
1101
1102static int
1103submit_async (
1104 struct ehci_hcd *ehci,
1105 struct urb *urb,
1106 struct list_head *qtd_list,
1107 gfp_t mem_flags
1108) {
1109 int epnum;
1110 unsigned long flags;
1111 struct ehci_qh *qh = NULL;
1112 int rc;
1113
1114 epnum = urb->ep->desc.bEndpointAddress;
1115
1116#ifdef EHCI_URB_TRACE
1117 {
1118 struct ehci_qtd *qtd;
1119 qtd = list_entry(qtd_list->next, struct ehci_qtd, qtd_list);
1120 ehci_dbg(ehci,
1121 "%s %s urb %p ep%d%s len %d, qtd %p [qh %p]\n",
1122 __func__, urb->dev->devpath, urb,
1123 epnum & 0x0f, (epnum & USB_DIR_IN) ? "in" : "out",
1124 urb->transfer_buffer_length,
1125 qtd, urb->ep->hcpriv);
1126 }
1127#endif
1128
1129 spin_lock_irqsave (&ehci->lock, flags);
1130 if (unlikely(!HCD_HW_ACCESSIBLE(ehci_to_hcd(ehci)))) {
1131 rc = -ESHUTDOWN;
1132 goto done;
1133 }
1134 rc = usb_hcd_link_urb_to_ep(ehci_to_hcd(ehci), urb);
1135 if (unlikely(rc))
1136 goto done;
1137
1138 qh = qh_append_tds(ehci, urb, qtd_list, epnum, &urb->ep->hcpriv);
1139 if (unlikely(qh == NULL)) {
1140 usb_hcd_unlink_urb_from_ep(ehci_to_hcd(ehci), urb);
1141 rc = -ENOMEM;
1142 goto done;
1143 }
1144
1145 /* Control/bulk operations through TTs don't need scheduling,
1146 * the HC and TT handle it when the TT has a buffer ready.
1147 */
1148 if (likely (qh->qh_state == QH_STATE_IDLE))
1149 qh_link_async(ehci, qh);
1150 done:
1151 spin_unlock_irqrestore (&ehci->lock, flags);
1152 if (unlikely (qh == NULL))
1153 qtd_list_free (ehci, urb, qtd_list);
1154 return rc;
1155}
1156
1157/*-------------------------------------------------------------------------*/
1158#ifdef CONFIG_USB_HCD_TEST_MODE
1159/*
1160 * This function creates the qtds and submits them for the
1161 * SINGLE_STEP_SET_FEATURE Test.
1162 * This is done in two parts: first SETUP req for GetDesc is sent then
1163 * 15 seconds later, the IN stage for GetDesc starts to req data from dev
1164 *
1165 * is_setup : i/p argument decides which of the two stage needs to be
1166 * performed; TRUE - SETUP and FALSE - IN+STATUS
1167 * Returns 0 if success
1168 */
1169static int ehci_submit_single_step_set_feature(
1170 struct usb_hcd *hcd,
1171 struct urb *urb,
1172 int is_setup
1173) {
1174 struct ehci_hcd *ehci = hcd_to_ehci(hcd);
1175 struct list_head qtd_list;
1176 struct list_head *head;
1177
1178 struct ehci_qtd *qtd, *qtd_prev;
1179 dma_addr_t buf;
1180 int len, maxpacket;
1181 u32 token;
1182
1183 INIT_LIST_HEAD(&qtd_list);
1184 head = &qtd_list;
1185
1186 /* URBs map to sequences of QTDs: one logical transaction */
1187 qtd = ehci_qtd_alloc(ehci, GFP_KERNEL);
1188 if (unlikely(!qtd))
1189 return -1;
1190 list_add_tail(&qtd->qtd_list, head);
1191 qtd->urb = urb;
1192
1193 token = QTD_STS_ACTIVE;
1194 token |= (EHCI_TUNE_CERR << 10);
1195
1196 len = urb->transfer_buffer_length;
1197 /*
1198 * Check if the request is to perform just the SETUP stage (getDesc)
1199 * as in SINGLE_STEP_SET_FEATURE test, DATA stage (IN) happens
1200 * 15 secs after the setup
1201 */
1202 if (is_setup) {
1203 /* SETUP pid, and interrupt after SETUP completion */
1204 qtd_fill(ehci, qtd, urb->setup_dma,
1205 sizeof(struct usb_ctrlrequest),
1206 QTD_IOC | token | (2 /* "setup" */ << 8), 8);
1207
1208 submit_async(ehci, urb, &qtd_list, GFP_ATOMIC);
1209 return 0; /*Return now; we shall come back after 15 seconds*/
1210 }
1211
1212 /*
1213 * IN: data transfer stage: buffer setup : start the IN txn phase for
1214 * the get_Desc SETUP which was sent 15seconds back
1215 */
1216 token ^= QTD_TOGGLE; /*We need to start IN with DATA-1 Pid-sequence*/
1217 buf = urb->transfer_dma;
1218
1219 token |= (1 /* "in" */ << 8); /*This is IN stage*/
1220
1221 maxpacket = usb_endpoint_maxp(&urb->ep->desc);
1222
1223 qtd_fill(ehci, qtd, buf, len, token, maxpacket);
1224
1225 /*
1226 * Our IN phase shall always be a short read; so keep the queue running
1227 * and let it advance to the next qtd which zero length OUT status
1228 */
1229 qtd->hw_alt_next = EHCI_LIST_END(ehci);
1230
1231 /* STATUS stage for GetDesc control request */
1232 token ^= 0x0100; /* "in" <--> "out" */
1233 token |= QTD_TOGGLE; /* force DATA1 */
1234
1235 qtd_prev = qtd;
1236 qtd = ehci_qtd_alloc(ehci, GFP_ATOMIC);
1237 if (unlikely(!qtd))
1238 goto cleanup;
1239 qtd->urb = urb;
1240 qtd_prev->hw_next = QTD_NEXT(ehci, qtd->qtd_dma);
1241 list_add_tail(&qtd->qtd_list, head);
1242
1243 /* Interrupt after STATUS completion */
1244 qtd_fill(ehci, qtd, 0, 0, token | QTD_IOC, 0);
1245
1246 submit_async(ehci, urb, &qtd_list, GFP_KERNEL);
1247
1248 return 0;
1249
1250cleanup:
1251 qtd_list_free(ehci, urb, head);
1252 return -1;
1253}
1254#endif /* CONFIG_USB_HCD_TEST_MODE */
1255
1256/*-------------------------------------------------------------------------*/
1257
1258static void single_unlink_async(struct ehci_hcd *ehci, struct ehci_qh *qh)
1259{
1260 struct ehci_qh *prev;
1261
1262 /* Add to the end of the list of QHs waiting for the next IAAD */
1263 qh->qh_state = QH_STATE_UNLINK_WAIT;
1264 list_add_tail(&qh->unlink_node, &ehci->async_unlink);
1265
1266 /* Unlink it from the schedule */
1267 prev = ehci->async;
1268 while (prev->qh_next.qh != qh)
1269 prev = prev->qh_next.qh;
1270
1271 prev->hw->hw_next = qh->hw->hw_next;
1272 prev->qh_next = qh->qh_next;
1273 if (ehci->qh_scan_next == qh)
1274 ehci->qh_scan_next = qh->qh_next.qh;
1275}
1276
1277static void start_iaa_cycle(struct ehci_hcd *ehci)
1278{
1279 /* If the controller isn't running, we don't have to wait for it */
1280 if (unlikely(ehci->rh_state < EHCI_RH_RUNNING)) {
1281 end_unlink_async(ehci);
1282
1283 /* Otherwise start a new IAA cycle if one isn't already running */
1284 } else if (ehci->rh_state == EHCI_RH_RUNNING &&
1285 !ehci->iaa_in_progress) {
1286
1287 /* Make sure the unlinks are all visible to the hardware */
1288 wmb();
1289
1290 ehci_writel(ehci, ehci->command | CMD_IAAD,
1291 &ehci->regs->command);
1292 ehci_readl(ehci, &ehci->regs->command);
1293 ehci->iaa_in_progress = true;
1294 ehci_enable_event(ehci, EHCI_HRTIMER_IAA_WATCHDOG, true);
1295 }
1296}
1297
1298static void end_iaa_cycle(struct ehci_hcd *ehci)
1299{
1300 if (ehci->has_synopsys_hc_bug)
1301 ehci_writel(ehci, (u32) ehci->async->qh_dma,
1302 &ehci->regs->async_next);
1303
1304 /* The current IAA cycle has ended */
1305 ehci->iaa_in_progress = false;
1306
1307 end_unlink_async(ehci);
1308}
1309
1310/* See if the async qh for the qtds being unlinked are now gone from the HC */
1311
1312static void end_unlink_async(struct ehci_hcd *ehci)
1313{
1314 struct ehci_qh *qh;
1315 bool early_exit;
1316
1317 if (list_empty(&ehci->async_unlink))
1318 return;
1319 qh = list_first_entry(&ehci->async_unlink, struct ehci_qh,
1320 unlink_node); /* QH whose IAA cycle just ended */
1321
1322 /*
1323 * If async_unlinking is set then this routine is already running,
1324 * either on the stack or on another CPU.
1325 */
1326 early_exit = ehci->async_unlinking;
1327
1328 /* If the controller isn't running, process all the waiting QHs */
1329 if (ehci->rh_state < EHCI_RH_RUNNING)
1330 list_splice_tail_init(&ehci->async_unlink, &ehci->async_idle);
1331
1332 /*
1333 * Intel (?) bug: The HC can write back the overlay region even
1334 * after the IAA interrupt occurs. In self-defense, always go
1335 * through two IAA cycles for each QH.
1336 */
1337 else if (qh->qh_state == QH_STATE_UNLINK) {
1338 /*
1339 * Second IAA cycle has finished. Process only the first
1340 * waiting QH (NVIDIA (?) bug).
1341 */
1342 list_move_tail(&qh->unlink_node, &ehci->async_idle);
1343 }
1344
1345 /*
1346 * AMD/ATI (?) bug: The HC can continue to use an active QH long
1347 * after the IAA interrupt occurs. To prevent problems, QHs that
1348 * may still be active will wait until 2 ms have passed with no
1349 * change to the hw_current and hw_token fields (this delay occurs
1350 * between the two IAA cycles).
1351 *
1352 * The EHCI spec (4.8.2) says that active QHs must not be removed
1353 * from the async schedule and recommends waiting until the QH
1354 * goes inactive. This is ridiculous because the QH will _never_
1355 * become inactive if the endpoint NAKs indefinitely.
1356 */
1357
1358 /* Some reasons for unlinking guarantee the QH can't be active */
1359 else if (qh->unlink_reason & (QH_UNLINK_HALTED |
1360 QH_UNLINK_SHORT_READ | QH_UNLINK_DUMMY_OVERLAY))
1361 goto DelayDone;
1362
1363 /* The QH can't be active if the queue was and still is empty... */
1364 else if ((qh->unlink_reason & QH_UNLINK_QUEUE_EMPTY) &&
1365 list_empty(&qh->qtd_list))
1366 goto DelayDone;
1367
1368 /* ... or if the QH has halted */
1369 else if (qh->hw->hw_token & cpu_to_hc32(ehci, QTD_STS_HALT))
1370 goto DelayDone;
1371
1372 /* Otherwise we have to wait until the QH stops changing */
1373 else {
1374 __hc32 qh_current, qh_token;
1375
1376 qh_current = qh->hw->hw_current;
1377 qh_token = qh->hw->hw_token;
1378 if (qh_current != ehci->old_current ||
1379 qh_token != ehci->old_token) {
1380 ehci->old_current = qh_current;
1381 ehci->old_token = qh_token;
1382 ehci_enable_event(ehci,
1383 EHCI_HRTIMER_ACTIVE_UNLINK, true);
1384 return;
1385 }
1386 DelayDone:
1387 qh->qh_state = QH_STATE_UNLINK;
1388 early_exit = true;
1389 }
1390 ehci->old_current = ~0; /* Prepare for next QH */
1391
1392 /* Start a new IAA cycle if any QHs are waiting for it */
1393 if (!list_empty(&ehci->async_unlink))
1394 start_iaa_cycle(ehci);
1395
1396 /*
1397 * Don't allow nesting or concurrent calls,
1398 * or wait for the second IAA cycle for the next QH.
1399 */
1400 if (early_exit)
1401 return;
1402
1403 /* Process the idle QHs */
1404 ehci->async_unlinking = true;
1405 while (!list_empty(&ehci->async_idle)) {
1406 qh = list_first_entry(&ehci->async_idle, struct ehci_qh,
1407 unlink_node);
1408 list_del(&qh->unlink_node);
1409
1410 qh->qh_state = QH_STATE_IDLE;
1411 qh->qh_next.qh = NULL;
1412
1413 if (!list_empty(&qh->qtd_list))
1414 qh_completions(ehci, qh);
1415 if (!list_empty(&qh->qtd_list) &&
1416 ehci->rh_state == EHCI_RH_RUNNING)
1417 qh_link_async(ehci, qh);
1418 disable_async(ehci);
1419 }
1420 ehci->async_unlinking = false;
1421}
1422
1423static void start_unlink_async(struct ehci_hcd *ehci, struct ehci_qh *qh);
1424
1425static void unlink_empty_async(struct ehci_hcd *ehci)
1426{
1427 struct ehci_qh *qh;
1428 struct ehci_qh *qh_to_unlink = NULL;
1429 int count = 0;
1430
1431 /* Find the last async QH which has been empty for a timer cycle */
1432 for (qh = ehci->async->qh_next.qh; qh; qh = qh->qh_next.qh) {
1433 if (list_empty(&qh->qtd_list) &&
1434 qh->qh_state == QH_STATE_LINKED) {
1435 ++count;
1436 if (qh->unlink_cycle != ehci->async_unlink_cycle)
1437 qh_to_unlink = qh;
1438 }
1439 }
1440
1441 /* If nothing else is being unlinked, unlink the last empty QH */
1442 if (list_empty(&ehci->async_unlink) && qh_to_unlink) {
1443 qh_to_unlink->unlink_reason |= QH_UNLINK_QUEUE_EMPTY;
1444 start_unlink_async(ehci, qh_to_unlink);
1445 --count;
1446 }
1447
1448 /* Other QHs will be handled later */
1449 if (count > 0) {
1450 ehci_enable_event(ehci, EHCI_HRTIMER_ASYNC_UNLINKS, true);
1451 ++ehci->async_unlink_cycle;
1452 }
1453}
1454
1455#ifdef CONFIG_PM
1456
1457/* The root hub is suspended; unlink all the async QHs */
1458static void unlink_empty_async_suspended(struct ehci_hcd *ehci)
1459{
1460 struct ehci_qh *qh;
1461
1462 while (ehci->async->qh_next.qh) {
1463 qh = ehci->async->qh_next.qh;
1464 WARN_ON(!list_empty(&qh->qtd_list));
1465 single_unlink_async(ehci, qh);
1466 }
1467}
1468
1469#endif
1470
1471/* makes sure the async qh will become idle */
1472/* caller must own ehci->lock */
1473
1474static void start_unlink_async(struct ehci_hcd *ehci, struct ehci_qh *qh)
1475{
1476 /* If the QH isn't linked then there's nothing we can do. */
1477 if (qh->qh_state != QH_STATE_LINKED)
1478 return;
1479
1480 single_unlink_async(ehci, qh);
1481 start_iaa_cycle(ehci);
1482}
1483
1484/*-------------------------------------------------------------------------*/
1485
1486static void scan_async (struct ehci_hcd *ehci)
1487{
1488 struct ehci_qh *qh;
1489 bool check_unlinks_later = false;
1490
1491 ehci->qh_scan_next = ehci->async->qh_next.qh;
1492 while (ehci->qh_scan_next) {
1493 qh = ehci->qh_scan_next;
1494 ehci->qh_scan_next = qh->qh_next.qh;
1495
1496 /* clean any finished work for this qh */
1497 if (!list_empty(&qh->qtd_list)) {
1498 int temp;
1499
1500 /*
1501 * Unlinks could happen here; completion reporting
1502 * drops the lock. That's why ehci->qh_scan_next
1503 * always holds the next qh to scan; if the next qh
1504 * gets unlinked then ehci->qh_scan_next is adjusted
1505 * in single_unlink_async().
1506 */
1507 temp = qh_completions(ehci, qh);
1508 if (unlikely(temp)) {
1509 start_unlink_async(ehci, qh);
1510 } else if (list_empty(&qh->qtd_list)
1511 && qh->qh_state == QH_STATE_LINKED) {
1512 qh->unlink_cycle = ehci->async_unlink_cycle;
1513 check_unlinks_later = true;
1514 }
1515 }
1516 }
1517
1518 /*
1519 * Unlink empty entries, reducing DMA usage as well
1520 * as HCD schedule-scanning costs. Delay for any qh
1521 * we just scanned, there's a not-unusual case that it
1522 * doesn't stay idle for long.
1523 */
1524 if (check_unlinks_later && ehci->rh_state == EHCI_RH_RUNNING &&
1525 !(ehci->enabled_hrtimer_events &
1526 BIT(EHCI_HRTIMER_ASYNC_UNLINKS))) {
1527 ehci_enable_event(ehci, EHCI_HRTIMER_ASYNC_UNLINKS, true);
1528 ++ehci->async_unlink_cycle;
1529 }
1530}