Loading...
1/*
2 * OHCI HCD (Host Controller Driver) for USB.
3 *
4 * (C) Copyright 1999 Roman Weissgaerber <weissg@vienna.at>
5 * (C) Copyright 2000-2002 David Brownell <dbrownell@users.sourceforge.net>
6 *
7 * This file is licenced under the GPL.
8 */
9
10#include <linux/irq.h>
11#include <linux/slab.h>
12
13static void urb_free_priv (struct ohci_hcd *hc, urb_priv_t *urb_priv)
14{
15 int last = urb_priv->length - 1;
16
17 if (last >= 0) {
18 int i;
19 struct td *td;
20
21 for (i = 0; i <= last; i++) {
22 td = urb_priv->td [i];
23 if (td)
24 td_free (hc, td);
25 }
26 }
27
28 list_del (&urb_priv->pending);
29 kfree (urb_priv);
30}
31
32/*-------------------------------------------------------------------------*/
33
34/*
35 * URB goes back to driver, and isn't reissued.
36 * It's completely gone from HC data structures.
37 * PRECONDITION: ohci lock held, irqs blocked.
38 */
39static void
40finish_urb(struct ohci_hcd *ohci, struct urb *urb, int status)
41__releases(ohci->lock)
42__acquires(ohci->lock)
43{
44 struct device *dev = ohci_to_hcd(ohci)->self.controller;
45 struct usb_host_endpoint *ep = urb->ep;
46 struct urb_priv *urb_priv;
47
48 // ASSERT (urb->hcpriv != 0);
49
50 restart:
51 urb_free_priv (ohci, urb->hcpriv);
52 urb->hcpriv = NULL;
53 if (likely(status == -EINPROGRESS))
54 status = 0;
55
56 switch (usb_pipetype (urb->pipe)) {
57 case PIPE_ISOCHRONOUS:
58 ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs--;
59 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0) {
60 if (quirk_amdiso(ohci))
61 usb_amd_quirk_pll_enable();
62 if (quirk_amdprefetch(ohci))
63 sb800_prefetch(dev, 0);
64 }
65 break;
66 case PIPE_INTERRUPT:
67 ohci_to_hcd(ohci)->self.bandwidth_int_reqs--;
68 break;
69 }
70
71 /* urb->complete() can reenter this HCD */
72 usb_hcd_unlink_urb_from_ep(ohci_to_hcd(ohci), urb);
73 spin_unlock (&ohci->lock);
74 usb_hcd_giveback_urb(ohci_to_hcd(ohci), urb, status);
75 spin_lock (&ohci->lock);
76
77 /* stop periodic dma if it's not needed */
78 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0
79 && ohci_to_hcd(ohci)->self.bandwidth_int_reqs == 0) {
80 ohci->hc_control &= ~(OHCI_CTRL_PLE|OHCI_CTRL_IE);
81 ohci_writel (ohci, ohci->hc_control, &ohci->regs->control);
82 }
83
84 /*
85 * An isochronous URB that is sumitted too late won't have any TDs
86 * (marked by the fact that the td_cnt value is larger than the
87 * actual number of TDs). If the next URB on this endpoint is like
88 * that, give it back now.
89 */
90 if (!list_empty(&ep->urb_list)) {
91 urb = list_first_entry(&ep->urb_list, struct urb, urb_list);
92 urb_priv = urb->hcpriv;
93 if (urb_priv->td_cnt > urb_priv->length) {
94 status = 0;
95 goto restart;
96 }
97 }
98}
99
100
101/*-------------------------------------------------------------------------*
102 * ED handling functions
103 *-------------------------------------------------------------------------*/
104
105/* search for the right schedule branch to use for a periodic ed.
106 * does some load balancing; returns the branch, or negative errno.
107 */
108static int balance (struct ohci_hcd *ohci, int interval, int load)
109{
110 int i, branch = -ENOSPC;
111
112 /* iso periods can be huge; iso tds specify frame numbers */
113 if (interval > NUM_INTS)
114 interval = NUM_INTS;
115
116 /* search for the least loaded schedule branch of that period
117 * that has enough bandwidth left unreserved.
118 */
119 for (i = 0; i < interval ; i++) {
120 if (branch < 0 || ohci->load [branch] > ohci->load [i]) {
121 int j;
122
123 /* usb 1.1 says 90% of one frame */
124 for (j = i; j < NUM_INTS; j += interval) {
125 if ((ohci->load [j] + load) > 900)
126 break;
127 }
128 if (j < NUM_INTS)
129 continue;
130 branch = i;
131 }
132 }
133 return branch;
134}
135
136/*-------------------------------------------------------------------------*/
137
138/* both iso and interrupt requests have periods; this routine puts them
139 * into the schedule tree in the apppropriate place. most iso devices use
140 * 1msec periods, but that's not required.
141 */
142static void periodic_link (struct ohci_hcd *ohci, struct ed *ed)
143{
144 unsigned i;
145
146 ohci_dbg(ohci, "link %sed %p branch %d [%dus.], interval %d\n",
147 (ed->hwINFO & cpu_to_hc32 (ohci, ED_ISO)) ? "iso " : "",
148 ed, ed->branch, ed->load, ed->interval);
149
150 for (i = ed->branch; i < NUM_INTS; i += ed->interval) {
151 struct ed **prev = &ohci->periodic [i];
152 __hc32 *prev_p = &ohci->hcca->int_table [i];
153 struct ed *here = *prev;
154
155 /* sorting each branch by period (slow before fast)
156 * lets us share the faster parts of the tree.
157 * (plus maybe: put interrupt eds before iso)
158 */
159 while (here && ed != here) {
160 if (ed->interval > here->interval)
161 break;
162 prev = &here->ed_next;
163 prev_p = &here->hwNextED;
164 here = *prev;
165 }
166 if (ed != here) {
167 ed->ed_next = here;
168 if (here)
169 ed->hwNextED = *prev_p;
170 wmb ();
171 *prev = ed;
172 *prev_p = cpu_to_hc32(ohci, ed->dma);
173 wmb();
174 }
175 ohci->load [i] += ed->load;
176 }
177 ohci_to_hcd(ohci)->self.bandwidth_allocated += ed->load / ed->interval;
178}
179
180/* link an ed into one of the HC chains */
181
182static int ed_schedule (struct ohci_hcd *ohci, struct ed *ed)
183{
184 int branch;
185
186 ed->state = ED_OPER;
187 ed->ed_prev = NULL;
188 ed->ed_next = NULL;
189 ed->hwNextED = 0;
190 wmb ();
191
192 /* we care about rm_list when setting CLE/BLE in case the HC was at
193 * work on some TD when CLE/BLE was turned off, and isn't quiesced
194 * yet. finish_unlinks() restarts as needed, some upcoming INTR_SF.
195 *
196 * control and bulk EDs are doubly linked (ed_next, ed_prev), but
197 * periodic ones are singly linked (ed_next). that's because the
198 * periodic schedule encodes a tree like figure 3-5 in the ohci
199 * spec: each qh can have several "previous" nodes, and the tree
200 * doesn't have unused/idle descriptors.
201 */
202 switch (ed->type) {
203 case PIPE_CONTROL:
204 if (ohci->ed_controltail == NULL) {
205 WARN_ON (ohci->hc_control & OHCI_CTRL_CLE);
206 ohci_writel (ohci, ed->dma,
207 &ohci->regs->ed_controlhead);
208 } else {
209 ohci->ed_controltail->ed_next = ed;
210 ohci->ed_controltail->hwNextED = cpu_to_hc32 (ohci,
211 ed->dma);
212 }
213 ed->ed_prev = ohci->ed_controltail;
214 if (!ohci->ed_controltail && !ohci->ed_rm_list) {
215 wmb();
216 ohci->hc_control |= OHCI_CTRL_CLE;
217 ohci_writel (ohci, 0, &ohci->regs->ed_controlcurrent);
218 ohci_writel (ohci, ohci->hc_control,
219 &ohci->regs->control);
220 }
221 ohci->ed_controltail = ed;
222 break;
223
224 case PIPE_BULK:
225 if (ohci->ed_bulktail == NULL) {
226 WARN_ON (ohci->hc_control & OHCI_CTRL_BLE);
227 ohci_writel (ohci, ed->dma, &ohci->regs->ed_bulkhead);
228 } else {
229 ohci->ed_bulktail->ed_next = ed;
230 ohci->ed_bulktail->hwNextED = cpu_to_hc32 (ohci,
231 ed->dma);
232 }
233 ed->ed_prev = ohci->ed_bulktail;
234 if (!ohci->ed_bulktail && !ohci->ed_rm_list) {
235 wmb();
236 ohci->hc_control |= OHCI_CTRL_BLE;
237 ohci_writel (ohci, 0, &ohci->regs->ed_bulkcurrent);
238 ohci_writel (ohci, ohci->hc_control,
239 &ohci->regs->control);
240 }
241 ohci->ed_bulktail = ed;
242 break;
243
244 // case PIPE_INTERRUPT:
245 // case PIPE_ISOCHRONOUS:
246 default:
247 branch = balance (ohci, ed->interval, ed->load);
248 if (branch < 0) {
249 ohci_dbg (ohci,
250 "ERR %d, interval %d msecs, load %d\n",
251 branch, ed->interval, ed->load);
252 // FIXME if there are TDs queued, fail them!
253 return branch;
254 }
255 ed->branch = branch;
256 periodic_link (ohci, ed);
257 }
258
259 /* the HC may not see the schedule updates yet, but if it does
260 * then they'll be properly ordered.
261 */
262 return 0;
263}
264
265/*-------------------------------------------------------------------------*/
266
267/* scan the periodic table to find and unlink this ED */
268static void periodic_unlink (struct ohci_hcd *ohci, struct ed *ed)
269{
270 int i;
271
272 for (i = ed->branch; i < NUM_INTS; i += ed->interval) {
273 struct ed *temp;
274 struct ed **prev = &ohci->periodic [i];
275 __hc32 *prev_p = &ohci->hcca->int_table [i];
276
277 while (*prev && (temp = *prev) != ed) {
278 prev_p = &temp->hwNextED;
279 prev = &temp->ed_next;
280 }
281 if (*prev) {
282 *prev_p = ed->hwNextED;
283 *prev = ed->ed_next;
284 }
285 ohci->load [i] -= ed->load;
286 }
287 ohci_to_hcd(ohci)->self.bandwidth_allocated -= ed->load / ed->interval;
288
289 ohci_dbg(ohci, "unlink %sed %p branch %d [%dus.], interval %d\n",
290 (ed->hwINFO & cpu_to_hc32 (ohci, ED_ISO)) ? "iso " : "",
291 ed, ed->branch, ed->load, ed->interval);
292}
293
294/* unlink an ed from one of the HC chains.
295 * just the link to the ed is unlinked.
296 * the link from the ed still points to another operational ed or 0
297 * so the HC can eventually finish the processing of the unlinked ed
298 * (assuming it already started that, which needn't be true).
299 *
300 * ED_UNLINK is a transient state: the HC may still see this ED, but soon
301 * it won't. ED_SKIP means the HC will finish its current transaction,
302 * but won't start anything new. The TD queue may still grow; device
303 * drivers don't know about this HCD-internal state.
304 *
305 * When the HC can't see the ED, something changes ED_UNLINK to one of:
306 *
307 * - ED_OPER: when there's any request queued, the ED gets rescheduled
308 * immediately. HC should be working on them.
309 *
310 * - ED_IDLE: when there's no TD queue or the HC isn't running.
311 *
312 * When finish_unlinks() runs later, after SOF interrupt, it will often
313 * complete one or more URB unlinks before making that state change.
314 */
315static void ed_deschedule (struct ohci_hcd *ohci, struct ed *ed)
316{
317 ed->hwINFO |= cpu_to_hc32 (ohci, ED_SKIP);
318 wmb ();
319 ed->state = ED_UNLINK;
320
321 /* To deschedule something from the control or bulk list, just
322 * clear CLE/BLE and wait. There's no safe way to scrub out list
323 * head/current registers until later, and "later" isn't very
324 * tightly specified. Figure 6-5 and Section 6.4.2.2 show how
325 * the HC is reading the ED queues (while we modify them).
326 *
327 * For now, ed_schedule() is "later". It might be good paranoia
328 * to scrub those registers in finish_unlinks(), in case of bugs
329 * that make the HC try to use them.
330 */
331 switch (ed->type) {
332 case PIPE_CONTROL:
333 /* remove ED from the HC's list: */
334 if (ed->ed_prev == NULL) {
335 if (!ed->hwNextED) {
336 ohci->hc_control &= ~OHCI_CTRL_CLE;
337 ohci_writel (ohci, ohci->hc_control,
338 &ohci->regs->control);
339 // a ohci_readl() later syncs CLE with the HC
340 } else
341 ohci_writel (ohci,
342 hc32_to_cpup (ohci, &ed->hwNextED),
343 &ohci->regs->ed_controlhead);
344 } else {
345 ed->ed_prev->ed_next = ed->ed_next;
346 ed->ed_prev->hwNextED = ed->hwNextED;
347 }
348 /* remove ED from the HCD's list: */
349 if (ohci->ed_controltail == ed) {
350 ohci->ed_controltail = ed->ed_prev;
351 if (ohci->ed_controltail)
352 ohci->ed_controltail->ed_next = NULL;
353 } else if (ed->ed_next) {
354 ed->ed_next->ed_prev = ed->ed_prev;
355 }
356 break;
357
358 case PIPE_BULK:
359 /* remove ED from the HC's list: */
360 if (ed->ed_prev == NULL) {
361 if (!ed->hwNextED) {
362 ohci->hc_control &= ~OHCI_CTRL_BLE;
363 ohci_writel (ohci, ohci->hc_control,
364 &ohci->regs->control);
365 // a ohci_readl() later syncs BLE with the HC
366 } else
367 ohci_writel (ohci,
368 hc32_to_cpup (ohci, &ed->hwNextED),
369 &ohci->regs->ed_bulkhead);
370 } else {
371 ed->ed_prev->ed_next = ed->ed_next;
372 ed->ed_prev->hwNextED = ed->hwNextED;
373 }
374 /* remove ED from the HCD's list: */
375 if (ohci->ed_bulktail == ed) {
376 ohci->ed_bulktail = ed->ed_prev;
377 if (ohci->ed_bulktail)
378 ohci->ed_bulktail->ed_next = NULL;
379 } else if (ed->ed_next) {
380 ed->ed_next->ed_prev = ed->ed_prev;
381 }
382 break;
383
384 // case PIPE_INTERRUPT:
385 // case PIPE_ISOCHRONOUS:
386 default:
387 periodic_unlink (ohci, ed);
388 break;
389 }
390}
391
392
393/*-------------------------------------------------------------------------*/
394
395/* get and maybe (re)init an endpoint. init _should_ be done only as part
396 * of enumeration, usb_set_configuration() or usb_set_interface().
397 */
398static struct ed *ed_get (
399 struct ohci_hcd *ohci,
400 struct usb_host_endpoint *ep,
401 struct usb_device *udev,
402 unsigned int pipe,
403 int interval
404) {
405 struct ed *ed;
406 unsigned long flags;
407
408 spin_lock_irqsave (&ohci->lock, flags);
409
410 ed = ep->hcpriv;
411 if (!ed) {
412 struct td *td;
413 int is_out;
414 u32 info;
415
416 ed = ed_alloc (ohci, GFP_ATOMIC);
417 if (!ed) {
418 /* out of memory */
419 goto done;
420 }
421
422 /* dummy td; end of td list for ed */
423 td = td_alloc (ohci, GFP_ATOMIC);
424 if (!td) {
425 /* out of memory */
426 ed_free (ohci, ed);
427 ed = NULL;
428 goto done;
429 }
430 ed->dummy = td;
431 ed->hwTailP = cpu_to_hc32 (ohci, td->td_dma);
432 ed->hwHeadP = ed->hwTailP; /* ED_C, ED_H zeroed */
433 ed->state = ED_IDLE;
434
435 is_out = !(ep->desc.bEndpointAddress & USB_DIR_IN);
436
437 /* FIXME usbcore changes dev->devnum before SET_ADDRESS
438 * succeeds ... otherwise we wouldn't need "pipe".
439 */
440 info = usb_pipedevice (pipe);
441 ed->type = usb_pipetype(pipe);
442
443 info |= (ep->desc.bEndpointAddress & ~USB_DIR_IN) << 7;
444 info |= usb_endpoint_maxp(&ep->desc) << 16;
445 if (udev->speed == USB_SPEED_LOW)
446 info |= ED_LOWSPEED;
447 /* only control transfers store pids in tds */
448 if (ed->type != PIPE_CONTROL) {
449 info |= is_out ? ED_OUT : ED_IN;
450 if (ed->type != PIPE_BULK) {
451 /* periodic transfers... */
452 if (ed->type == PIPE_ISOCHRONOUS)
453 info |= ED_ISO;
454 else if (interval > 32) /* iso can be bigger */
455 interval = 32;
456 ed->interval = interval;
457 ed->load = usb_calc_bus_time (
458 udev->speed, !is_out,
459 ed->type == PIPE_ISOCHRONOUS,
460 usb_endpoint_maxp(&ep->desc))
461 / 1000;
462 }
463 }
464 ed->hwINFO = cpu_to_hc32(ohci, info);
465
466 ep->hcpriv = ed;
467 }
468
469done:
470 spin_unlock_irqrestore (&ohci->lock, flags);
471 return ed;
472}
473
474/*-------------------------------------------------------------------------*/
475
476/* request unlinking of an endpoint from an operational HC.
477 * put the ep on the rm_list
478 * real work is done at the next start frame (SF) hardware interrupt
479 * caller guarantees HCD is running, so hardware access is safe,
480 * and that ed->state is ED_OPER
481 */
482static void start_ed_unlink (struct ohci_hcd *ohci, struct ed *ed)
483{
484 ed->hwINFO |= cpu_to_hc32 (ohci, ED_DEQUEUE);
485 ed_deschedule (ohci, ed);
486
487 /* rm_list is just singly linked, for simplicity */
488 ed->ed_next = ohci->ed_rm_list;
489 ed->ed_prev = NULL;
490 ohci->ed_rm_list = ed;
491
492 /* enable SOF interrupt */
493 ohci_writel (ohci, OHCI_INTR_SF, &ohci->regs->intrstatus);
494 ohci_writel (ohci, OHCI_INTR_SF, &ohci->regs->intrenable);
495 // flush those writes, and get latest HCCA contents
496 (void) ohci_readl (ohci, &ohci->regs->control);
497
498 /* SF interrupt might get delayed; record the frame counter value that
499 * indicates when the HC isn't looking at it, so concurrent unlinks
500 * behave. frame_no wraps every 2^16 msec, and changes right before
501 * SF is triggered.
502 */
503 ed->tick = ohci_frame_no(ohci) + 1;
504
505}
506
507/*-------------------------------------------------------------------------*
508 * TD handling functions
509 *-------------------------------------------------------------------------*/
510
511/* enqueue next TD for this URB (OHCI spec 5.2.8.2) */
512
513static void
514td_fill (struct ohci_hcd *ohci, u32 info,
515 dma_addr_t data, int len,
516 struct urb *urb, int index)
517{
518 struct td *td, *td_pt;
519 struct urb_priv *urb_priv = urb->hcpriv;
520 int is_iso = info & TD_ISO;
521 int hash;
522
523 // ASSERT (index < urb_priv->length);
524
525 /* aim for only one interrupt per urb. mostly applies to control
526 * and iso; other urbs rarely need more than one TD per urb.
527 * this way, only final tds (or ones with an error) cause IRQs.
528 * at least immediately; use DI=6 in case any control request is
529 * tempted to die part way through. (and to force the hc to flush
530 * its donelist soonish, even on unlink paths.)
531 *
532 * NOTE: could delay interrupts even for the last TD, and get fewer
533 * interrupts ... increasing per-urb latency by sharing interrupts.
534 * Drivers that queue bulk urbs may request that behavior.
535 */
536 if (index != (urb_priv->length - 1)
537 || (urb->transfer_flags & URB_NO_INTERRUPT))
538 info |= TD_DI_SET (6);
539
540 /* use this td as the next dummy */
541 td_pt = urb_priv->td [index];
542
543 /* fill the old dummy TD */
544 td = urb_priv->td [index] = urb_priv->ed->dummy;
545 urb_priv->ed->dummy = td_pt;
546
547 td->ed = urb_priv->ed;
548 td->next_dl_td = NULL;
549 td->index = index;
550 td->urb = urb;
551 td->data_dma = data;
552 if (!len)
553 data = 0;
554
555 td->hwINFO = cpu_to_hc32 (ohci, info);
556 if (is_iso) {
557 td->hwCBP = cpu_to_hc32 (ohci, data & 0xFFFFF000);
558 *ohci_hwPSWp(ohci, td, 0) = cpu_to_hc16 (ohci,
559 (data & 0x0FFF) | 0xE000);
560 } else {
561 td->hwCBP = cpu_to_hc32 (ohci, data);
562 }
563 if (data)
564 td->hwBE = cpu_to_hc32 (ohci, data + len - 1);
565 else
566 td->hwBE = 0;
567 td->hwNextTD = cpu_to_hc32 (ohci, td_pt->td_dma);
568
569 /* append to queue */
570 list_add_tail (&td->td_list, &td->ed->td_list);
571
572 /* hash it for later reverse mapping */
573 hash = TD_HASH_FUNC (td->td_dma);
574 td->td_hash = ohci->td_hash [hash];
575 ohci->td_hash [hash] = td;
576
577 /* HC might read the TD (or cachelines) right away ... */
578 wmb ();
579 td->ed->hwTailP = td->hwNextTD;
580}
581
582/*-------------------------------------------------------------------------*/
583
584/* Prepare all TDs of a transfer, and queue them onto the ED.
585 * Caller guarantees HC is active.
586 * Usually the ED is already on the schedule, so TDs might be
587 * processed as soon as they're queued.
588 */
589static void td_submit_urb (
590 struct ohci_hcd *ohci,
591 struct urb *urb
592) {
593 struct urb_priv *urb_priv = urb->hcpriv;
594 struct device *dev = ohci_to_hcd(ohci)->self.controller;
595 dma_addr_t data;
596 int data_len = urb->transfer_buffer_length;
597 int cnt = 0;
598 u32 info = 0;
599 int is_out = usb_pipeout (urb->pipe);
600 int periodic = 0;
601 int i, this_sg_len, n;
602 struct scatterlist *sg;
603
604 /* OHCI handles the bulk/interrupt data toggles itself. We just
605 * use the device toggle bits for resetting, and rely on the fact
606 * that resetting toggle is meaningless if the endpoint is active.
607 */
608 if (!usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe), is_out)) {
609 usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe),
610 is_out, 1);
611 urb_priv->ed->hwHeadP &= ~cpu_to_hc32 (ohci, ED_C);
612 }
613
614 list_add (&urb_priv->pending, &ohci->pending);
615
616 i = urb->num_mapped_sgs;
617 if (data_len > 0 && i > 0) {
618 sg = urb->sg;
619 data = sg_dma_address(sg);
620
621 /*
622 * urb->transfer_buffer_length may be smaller than the
623 * size of the scatterlist (or vice versa)
624 */
625 this_sg_len = min_t(int, sg_dma_len(sg), data_len);
626 } else {
627 sg = NULL;
628 if (data_len)
629 data = urb->transfer_dma;
630 else
631 data = 0;
632 this_sg_len = data_len;
633 }
634
635 /* NOTE: TD_CC is set so we can tell which TDs the HC processed by
636 * using TD_CC_GET, as well as by seeing them on the done list.
637 * (CC = NotAccessed ... 0x0F, or 0x0E in PSWs for ISO.)
638 */
639 switch (urb_priv->ed->type) {
640
641 /* Bulk and interrupt are identical except for where in the schedule
642 * their EDs live.
643 */
644 case PIPE_INTERRUPT:
645 /* ... and periodic urbs have extra accounting */
646 periodic = ohci_to_hcd(ohci)->self.bandwidth_int_reqs++ == 0
647 && ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0;
648 /* FALLTHROUGH */
649 case PIPE_BULK:
650 info = is_out
651 ? TD_T_TOGGLE | TD_CC | TD_DP_OUT
652 : TD_T_TOGGLE | TD_CC | TD_DP_IN;
653 /* TDs _could_ transfer up to 8K each */
654 for (;;) {
655 n = min(this_sg_len, 4096);
656
657 /* maybe avoid ED halt on final TD short read */
658 if (n >= data_len || (i == 1 && n >= this_sg_len)) {
659 if (!(urb->transfer_flags & URB_SHORT_NOT_OK))
660 info |= TD_R;
661 }
662 td_fill(ohci, info, data, n, urb, cnt);
663 this_sg_len -= n;
664 data_len -= n;
665 data += n;
666 cnt++;
667
668 if (this_sg_len <= 0) {
669 if (--i <= 0 || data_len <= 0)
670 break;
671 sg = sg_next(sg);
672 data = sg_dma_address(sg);
673 this_sg_len = min_t(int, sg_dma_len(sg),
674 data_len);
675 }
676 }
677 if ((urb->transfer_flags & URB_ZERO_PACKET)
678 && cnt < urb_priv->length) {
679 td_fill (ohci, info, 0, 0, urb, cnt);
680 cnt++;
681 }
682 /* maybe kickstart bulk list */
683 if (urb_priv->ed->type == PIPE_BULK) {
684 wmb ();
685 ohci_writel (ohci, OHCI_BLF, &ohci->regs->cmdstatus);
686 }
687 break;
688
689 /* control manages DATA0/DATA1 toggle per-request; SETUP resets it,
690 * any DATA phase works normally, and the STATUS ack is special.
691 */
692 case PIPE_CONTROL:
693 info = TD_CC | TD_DP_SETUP | TD_T_DATA0;
694 td_fill (ohci, info, urb->setup_dma, 8, urb, cnt++);
695 if (data_len > 0) {
696 info = TD_CC | TD_R | TD_T_DATA1;
697 info |= is_out ? TD_DP_OUT : TD_DP_IN;
698 /* NOTE: mishandles transfers >8K, some >4K */
699 td_fill (ohci, info, data, data_len, urb, cnt++);
700 }
701 info = (is_out || data_len == 0)
702 ? TD_CC | TD_DP_IN | TD_T_DATA1
703 : TD_CC | TD_DP_OUT | TD_T_DATA1;
704 td_fill (ohci, info, data, 0, urb, cnt++);
705 /* maybe kickstart control list */
706 wmb ();
707 ohci_writel (ohci, OHCI_CLF, &ohci->regs->cmdstatus);
708 break;
709
710 /* ISO has no retransmit, so no toggle; and it uses special TDs.
711 * Each TD could handle multiple consecutive frames (interval 1);
712 * we could often reduce the number of TDs here.
713 */
714 case PIPE_ISOCHRONOUS:
715 for (cnt = urb_priv->td_cnt; cnt < urb->number_of_packets;
716 cnt++) {
717 int frame = urb->start_frame;
718
719 // FIXME scheduling should handle frame counter
720 // roll-around ... exotic case (and OHCI has
721 // a 2^16 iso range, vs other HCs max of 2^10)
722 frame += cnt * urb->interval;
723 frame &= 0xffff;
724 td_fill (ohci, TD_CC | TD_ISO | frame,
725 data + urb->iso_frame_desc [cnt].offset,
726 urb->iso_frame_desc [cnt].length, urb, cnt);
727 }
728 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0) {
729 if (quirk_amdiso(ohci))
730 usb_amd_quirk_pll_disable();
731 if (quirk_amdprefetch(ohci))
732 sb800_prefetch(dev, 1);
733 }
734 periodic = ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs++ == 0
735 && ohci_to_hcd(ohci)->self.bandwidth_int_reqs == 0;
736 break;
737 }
738
739 /* start periodic dma if needed */
740 if (periodic) {
741 wmb ();
742 ohci->hc_control |= OHCI_CTRL_PLE|OHCI_CTRL_IE;
743 ohci_writel (ohci, ohci->hc_control, &ohci->regs->control);
744 }
745
746 // ASSERT (urb_priv->length == cnt);
747}
748
749/*-------------------------------------------------------------------------*
750 * Done List handling functions
751 *-------------------------------------------------------------------------*/
752
753/* calculate transfer length/status and update the urb */
754static int td_done(struct ohci_hcd *ohci, struct urb *urb, struct td *td)
755{
756 u32 tdINFO = hc32_to_cpup (ohci, &td->hwINFO);
757 int cc = 0;
758 int status = -EINPROGRESS;
759
760 list_del (&td->td_list);
761
762 /* ISO ... drivers see per-TD length/status */
763 if (tdINFO & TD_ISO) {
764 u16 tdPSW = ohci_hwPSW(ohci, td, 0);
765 int dlen = 0;
766
767 /* NOTE: assumes FC in tdINFO == 0, and that
768 * only the first of 0..MAXPSW psws is used.
769 */
770
771 cc = (tdPSW >> 12) & 0xF;
772 if (tdINFO & TD_CC) /* hc didn't touch? */
773 return status;
774
775 if (usb_pipeout (urb->pipe))
776 dlen = urb->iso_frame_desc [td->index].length;
777 else {
778 /* short reads are always OK for ISO */
779 if (cc == TD_DATAUNDERRUN)
780 cc = TD_CC_NOERROR;
781 dlen = tdPSW & 0x3ff;
782 }
783 urb->actual_length += dlen;
784 urb->iso_frame_desc [td->index].actual_length = dlen;
785 urb->iso_frame_desc [td->index].status = cc_to_error [cc];
786
787 if (cc != TD_CC_NOERROR)
788 ohci_dbg(ohci,
789 "urb %p iso td %p (%d) len %d cc %d\n",
790 urb, td, 1 + td->index, dlen, cc);
791
792 /* BULK, INT, CONTROL ... drivers see aggregate length/status,
793 * except that "setup" bytes aren't counted and "short" transfers
794 * might not be reported as errors.
795 */
796 } else {
797 int type = usb_pipetype (urb->pipe);
798 u32 tdBE = hc32_to_cpup (ohci, &td->hwBE);
799
800 cc = TD_CC_GET (tdINFO);
801
802 /* update packet status if needed (short is normally ok) */
803 if (cc == TD_DATAUNDERRUN
804 && !(urb->transfer_flags & URB_SHORT_NOT_OK))
805 cc = TD_CC_NOERROR;
806 if (cc != TD_CC_NOERROR && cc < 0x0E)
807 status = cc_to_error[cc];
808
809 /* count all non-empty packets except control SETUP packet */
810 if ((type != PIPE_CONTROL || td->index != 0) && tdBE != 0) {
811 if (td->hwCBP == 0)
812 urb->actual_length += tdBE - td->data_dma + 1;
813 else
814 urb->actual_length +=
815 hc32_to_cpup (ohci, &td->hwCBP)
816 - td->data_dma;
817 }
818
819 if (cc != TD_CC_NOERROR && cc < 0x0E)
820 ohci_dbg(ohci,
821 "urb %p td %p (%d) cc %d, len=%d/%d\n",
822 urb, td, 1 + td->index, cc,
823 urb->actual_length,
824 urb->transfer_buffer_length);
825 }
826 return status;
827}
828
829/*-------------------------------------------------------------------------*/
830
831static void ed_halted(struct ohci_hcd *ohci, struct td *td, int cc)
832{
833 struct urb *urb = td->urb;
834 urb_priv_t *urb_priv = urb->hcpriv;
835 struct ed *ed = td->ed;
836 struct list_head *tmp = td->td_list.next;
837 __hc32 toggle = ed->hwHeadP & cpu_to_hc32 (ohci, ED_C);
838
839 /* clear ed halt; this is the td that caused it, but keep it inactive
840 * until its urb->complete() has a chance to clean up.
841 */
842 ed->hwINFO |= cpu_to_hc32 (ohci, ED_SKIP);
843 wmb ();
844 ed->hwHeadP &= ~cpu_to_hc32 (ohci, ED_H);
845
846 /* Get rid of all later tds from this urb. We don't have
847 * to be careful: no errors and nothing was transferred.
848 * Also patch the ed so it looks as if those tds completed normally.
849 */
850 while (tmp != &ed->td_list) {
851 struct td *next;
852
853 next = list_entry (tmp, struct td, td_list);
854 tmp = next->td_list.next;
855
856 if (next->urb != urb)
857 break;
858
859 /* NOTE: if multi-td control DATA segments get supported,
860 * this urb had one of them, this td wasn't the last td
861 * in that segment (TD_R clear), this ed halted because
862 * of a short read, _and_ URB_SHORT_NOT_OK is clear ...
863 * then we need to leave the control STATUS packet queued
864 * and clear ED_SKIP.
865 */
866
867 list_del(&next->td_list);
868 urb_priv->td_cnt++;
869 ed->hwHeadP = next->hwNextTD | toggle;
870 }
871
872 /* help for troubleshooting: report anything that
873 * looks odd ... that doesn't include protocol stalls
874 * (or maybe some other things)
875 */
876 switch (cc) {
877 case TD_DATAUNDERRUN:
878 if ((urb->transfer_flags & URB_SHORT_NOT_OK) == 0)
879 break;
880 /* fallthrough */
881 case TD_CC_STALL:
882 if (usb_pipecontrol (urb->pipe))
883 break;
884 /* fallthrough */
885 default:
886 ohci_dbg (ohci,
887 "urb %p path %s ep%d%s %08x cc %d --> status %d\n",
888 urb, urb->dev->devpath,
889 usb_pipeendpoint (urb->pipe),
890 usb_pipein (urb->pipe) ? "in" : "out",
891 hc32_to_cpu (ohci, td->hwINFO),
892 cc, cc_to_error [cc]);
893 }
894}
895
896/* Add a TD to the done list */
897static void add_to_done_list(struct ohci_hcd *ohci, struct td *td)
898{
899 struct td *td2, *td_prev;
900 struct ed *ed;
901
902 if (td->next_dl_td)
903 return; /* Already on the list */
904
905 /* Add all the TDs going back until we reach one that's on the list */
906 ed = td->ed;
907 td2 = td_prev = td;
908 list_for_each_entry_continue_reverse(td2, &ed->td_list, td_list) {
909 if (td2->next_dl_td)
910 break;
911 td2->next_dl_td = td_prev;
912 td_prev = td2;
913 }
914
915 if (ohci->dl_end)
916 ohci->dl_end->next_dl_td = td_prev;
917 else
918 ohci->dl_start = td_prev;
919
920 /*
921 * Make td->next_dl_td point to td itself, to mark the fact
922 * that td is on the done list.
923 */
924 ohci->dl_end = td->next_dl_td = td;
925
926 /* Did we just add the latest pending TD? */
927 td2 = ed->pending_td;
928 if (td2 && td2->next_dl_td)
929 ed->pending_td = NULL;
930}
931
932/* Get the entries on the hardware done queue and put them on our list */
933static void update_done_list(struct ohci_hcd *ohci)
934{
935 u32 td_dma;
936 struct td *td = NULL;
937
938 td_dma = hc32_to_cpup (ohci, &ohci->hcca->done_head);
939 ohci->hcca->done_head = 0;
940 wmb();
941
942 /* get TD from hc's singly linked list, and
943 * add to ours. ed->td_list changes later.
944 */
945 while (td_dma) {
946 int cc;
947
948 td = dma_to_td (ohci, td_dma);
949 if (!td) {
950 ohci_err (ohci, "bad entry %8x\n", td_dma);
951 break;
952 }
953
954 td->hwINFO |= cpu_to_hc32 (ohci, TD_DONE);
955 cc = TD_CC_GET (hc32_to_cpup (ohci, &td->hwINFO));
956
957 /* Non-iso endpoints can halt on error; un-halt,
958 * and dequeue any other TDs from this urb.
959 * No other TD could have caused the halt.
960 */
961 if (cc != TD_CC_NOERROR
962 && (td->ed->hwHeadP & cpu_to_hc32 (ohci, ED_H)))
963 ed_halted(ohci, td, cc);
964
965 td_dma = hc32_to_cpup (ohci, &td->hwNextTD);
966 add_to_done_list(ohci, td);
967 }
968}
969
970/*-------------------------------------------------------------------------*/
971
972/* there are some urbs/eds to unlink; called in_irq(), with HCD locked */
973static void finish_unlinks(struct ohci_hcd *ohci)
974{
975 unsigned tick = ohci_frame_no(ohci);
976 struct ed *ed, **last;
977
978rescan_all:
979 for (last = &ohci->ed_rm_list, ed = *last; ed != NULL; ed = *last) {
980 struct list_head *entry, *tmp;
981 int completed, modified;
982 __hc32 *prev;
983
984 /* only take off EDs that the HC isn't using, accounting for
985 * frame counter wraps and EDs with partially retired TDs
986 */
987 if (likely(ohci->rh_state == OHCI_RH_RUNNING) &&
988 tick_before(tick, ed->tick)) {
989skip_ed:
990 last = &ed->ed_next;
991 continue;
992 }
993 if (!list_empty(&ed->td_list)) {
994 struct td *td;
995 u32 head;
996
997 td = list_first_entry(&ed->td_list, struct td, td_list);
998
999 /* INTR_WDH may need to clean up first */
1000 head = hc32_to_cpu(ohci, ed->hwHeadP) & TD_MASK;
1001 if (td->td_dma != head &&
1002 ohci->rh_state == OHCI_RH_RUNNING)
1003 goto skip_ed;
1004
1005 /* Don't mess up anything already on the done list */
1006 if (td->next_dl_td)
1007 goto skip_ed;
1008 }
1009
1010 /* ED's now officially unlinked, hc doesn't see */
1011 ed->hwHeadP &= ~cpu_to_hc32(ohci, ED_H);
1012 ed->hwNextED = 0;
1013 wmb();
1014 ed->hwINFO &= ~cpu_to_hc32(ohci, ED_SKIP | ED_DEQUEUE);
1015
1016 /* reentrancy: if we drop the schedule lock, someone might
1017 * have modified this list. normally it's just prepending
1018 * entries (which we'd ignore), but paranoia won't hurt.
1019 */
1020 modified = 0;
1021
1022 /* unlink urbs as requested, but rescan the list after
1023 * we call a completion since it might have unlinked
1024 * another (earlier) urb
1025 *
1026 * When we get here, the HC doesn't see this ed. But it
1027 * must not be rescheduled until all completed URBs have
1028 * been given back to the driver.
1029 */
1030rescan_this:
1031 completed = 0;
1032 prev = &ed->hwHeadP;
1033 list_for_each_safe (entry, tmp, &ed->td_list) {
1034 struct td *td;
1035 struct urb *urb;
1036 urb_priv_t *urb_priv;
1037 __hc32 savebits;
1038 u32 tdINFO;
1039
1040 td = list_entry (entry, struct td, td_list);
1041 urb = td->urb;
1042 urb_priv = td->urb->hcpriv;
1043
1044 if (!urb->unlinked) {
1045 prev = &td->hwNextTD;
1046 continue;
1047 }
1048
1049 /* patch pointer hc uses */
1050 savebits = *prev & ~cpu_to_hc32 (ohci, TD_MASK);
1051 *prev = td->hwNextTD | savebits;
1052
1053 /* If this was unlinked, the TD may not have been
1054 * retired ... so manually save the data toggle.
1055 * The controller ignores the value we save for
1056 * control and ISO endpoints.
1057 */
1058 tdINFO = hc32_to_cpup(ohci, &td->hwINFO);
1059 if ((tdINFO & TD_T) == TD_T_DATA0)
1060 ed->hwHeadP &= ~cpu_to_hc32(ohci, ED_C);
1061 else if ((tdINFO & TD_T) == TD_T_DATA1)
1062 ed->hwHeadP |= cpu_to_hc32(ohci, ED_C);
1063
1064 /* HC may have partly processed this TD */
1065 td_done (ohci, urb, td);
1066 urb_priv->td_cnt++;
1067
1068 /* if URB is done, clean up */
1069 if (urb_priv->td_cnt >= urb_priv->length) {
1070 modified = completed = 1;
1071 finish_urb(ohci, urb, 0);
1072 }
1073 }
1074 if (completed && !list_empty (&ed->td_list))
1075 goto rescan_this;
1076
1077 /*
1078 * If no TDs are queued, take ED off the ed_rm_list.
1079 * Otherwise, if the HC is running, reschedule.
1080 * If not, leave it on the list for further dequeues.
1081 */
1082 if (list_empty(&ed->td_list)) {
1083 *last = ed->ed_next;
1084 ed->ed_next = NULL;
1085 ed->state = ED_IDLE;
1086 list_del(&ed->in_use_list);
1087 } else if (ohci->rh_state == OHCI_RH_RUNNING) {
1088 *last = ed->ed_next;
1089 ed->ed_next = NULL;
1090 ed_schedule(ohci, ed);
1091 } else {
1092 last = &ed->ed_next;
1093 }
1094
1095 if (modified)
1096 goto rescan_all;
1097 }
1098
1099 /* maybe reenable control and bulk lists */
1100 if (ohci->rh_state == OHCI_RH_RUNNING && !ohci->ed_rm_list) {
1101 u32 command = 0, control = 0;
1102
1103 if (ohci->ed_controltail) {
1104 command |= OHCI_CLF;
1105 if (quirk_zfmicro(ohci))
1106 mdelay(1);
1107 if (!(ohci->hc_control & OHCI_CTRL_CLE)) {
1108 control |= OHCI_CTRL_CLE;
1109 ohci_writel (ohci, 0,
1110 &ohci->regs->ed_controlcurrent);
1111 }
1112 }
1113 if (ohci->ed_bulktail) {
1114 command |= OHCI_BLF;
1115 if (quirk_zfmicro(ohci))
1116 mdelay(1);
1117 if (!(ohci->hc_control & OHCI_CTRL_BLE)) {
1118 control |= OHCI_CTRL_BLE;
1119 ohci_writel (ohci, 0,
1120 &ohci->regs->ed_bulkcurrent);
1121 }
1122 }
1123
1124 /* CLE/BLE to enable, CLF/BLF to (maybe) kickstart */
1125 if (control) {
1126 ohci->hc_control |= control;
1127 if (quirk_zfmicro(ohci))
1128 mdelay(1);
1129 ohci_writel (ohci, ohci->hc_control,
1130 &ohci->regs->control);
1131 }
1132 if (command) {
1133 if (quirk_zfmicro(ohci))
1134 mdelay(1);
1135 ohci_writel (ohci, command, &ohci->regs->cmdstatus);
1136 }
1137 }
1138}
1139
1140
1141
1142/*-------------------------------------------------------------------------*/
1143
1144/* Take back a TD from the host controller */
1145static void takeback_td(struct ohci_hcd *ohci, struct td *td)
1146{
1147 struct urb *urb = td->urb;
1148 urb_priv_t *urb_priv = urb->hcpriv;
1149 struct ed *ed = td->ed;
1150 int status;
1151
1152 /* update URB's length and status from TD */
1153 status = td_done(ohci, urb, td);
1154 urb_priv->td_cnt++;
1155
1156 /* If all this urb's TDs are done, call complete() */
1157 if (urb_priv->td_cnt >= urb_priv->length)
1158 finish_urb(ohci, urb, status);
1159
1160 /* clean schedule: unlink EDs that are no longer busy */
1161 if (list_empty(&ed->td_list)) {
1162 if (ed->state == ED_OPER)
1163 start_ed_unlink(ohci, ed);
1164
1165 /* ... reenabling halted EDs only after fault cleanup */
1166 } else if ((ed->hwINFO & cpu_to_hc32(ohci, ED_SKIP | ED_DEQUEUE))
1167 == cpu_to_hc32(ohci, ED_SKIP)) {
1168 td = list_entry(ed->td_list.next, struct td, td_list);
1169 if (!(td->hwINFO & cpu_to_hc32(ohci, TD_DONE))) {
1170 ed->hwINFO &= ~cpu_to_hc32(ohci, ED_SKIP);
1171 /* ... hc may need waking-up */
1172 switch (ed->type) {
1173 case PIPE_CONTROL:
1174 ohci_writel(ohci, OHCI_CLF,
1175 &ohci->regs->cmdstatus);
1176 break;
1177 case PIPE_BULK:
1178 ohci_writel(ohci, OHCI_BLF,
1179 &ohci->regs->cmdstatus);
1180 break;
1181 }
1182 }
1183 }
1184}
1185
1186/*
1187 * Process normal completions (error or success) and clean the schedules.
1188 *
1189 * This is the main path for handing urbs back to drivers. The only other
1190 * normal path is finish_unlinks(), which unlinks URBs using ed_rm_list,
1191 * instead of scanning the (re-reversed) donelist as this does.
1192 */
1193static void process_done_list(struct ohci_hcd *ohci)
1194{
1195 struct td *td;
1196
1197 while (ohci->dl_start) {
1198 td = ohci->dl_start;
1199 if (td == ohci->dl_end)
1200 ohci->dl_start = ohci->dl_end = NULL;
1201 else
1202 ohci->dl_start = td->next_dl_td;
1203
1204 takeback_td(ohci, td);
1205 }
1206}
1207
1208/*
1209 * TD takeback and URB giveback must be single-threaded.
1210 * This routine takes care of it all.
1211 */
1212static void ohci_work(struct ohci_hcd *ohci)
1213{
1214 if (ohci->working) {
1215 ohci->restart_work = 1;
1216 return;
1217 }
1218 ohci->working = 1;
1219
1220 restart:
1221 process_done_list(ohci);
1222 if (ohci->ed_rm_list)
1223 finish_unlinks(ohci);
1224
1225 if (ohci->restart_work) {
1226 ohci->restart_work = 0;
1227 goto restart;
1228 }
1229 ohci->working = 0;
1230}
1/*
2 * OHCI HCD (Host Controller Driver) for USB.
3 *
4 * (C) Copyright 1999 Roman Weissgaerber <weissg@vienna.at>
5 * (C) Copyright 2000-2002 David Brownell <dbrownell@users.sourceforge.net>
6 *
7 * This file is licenced under the GPL.
8 */
9
10#include <linux/irq.h>
11#include <linux/slab.h>
12
13static void urb_free_priv (struct ohci_hcd *hc, urb_priv_t *urb_priv)
14{
15 int last = urb_priv->length - 1;
16
17 if (last >= 0) {
18 int i;
19 struct td *td;
20
21 for (i = 0; i <= last; i++) {
22 td = urb_priv->td [i];
23 if (td)
24 td_free (hc, td);
25 }
26 }
27
28 list_del (&urb_priv->pending);
29 kfree (urb_priv);
30}
31
32/*-------------------------------------------------------------------------*/
33
34/*
35 * URB goes back to driver, and isn't reissued.
36 * It's completely gone from HC data structures.
37 * PRECONDITION: ohci lock held, irqs blocked.
38 */
39static void
40finish_urb(struct ohci_hcd *ohci, struct urb *urb, int status)
41__releases(ohci->lock)
42__acquires(ohci->lock)
43{
44 // ASSERT (urb->hcpriv != 0);
45
46 urb_free_priv (ohci, urb->hcpriv);
47 if (likely(status == -EINPROGRESS))
48 status = 0;
49
50 switch (usb_pipetype (urb->pipe)) {
51 case PIPE_ISOCHRONOUS:
52 ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs--;
53 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0) {
54 if (quirk_amdiso(ohci))
55 usb_amd_quirk_pll_enable();
56 if (quirk_amdprefetch(ohci))
57 sb800_prefetch(ohci, 0);
58 }
59 break;
60 case PIPE_INTERRUPT:
61 ohci_to_hcd(ohci)->self.bandwidth_int_reqs--;
62 break;
63 }
64
65#ifdef OHCI_VERBOSE_DEBUG
66 urb_print(urb, "RET", usb_pipeout (urb->pipe), status);
67#endif
68
69 /* urb->complete() can reenter this HCD */
70 usb_hcd_unlink_urb_from_ep(ohci_to_hcd(ohci), urb);
71 spin_unlock (&ohci->lock);
72 usb_hcd_giveback_urb(ohci_to_hcd(ohci), urb, status);
73 spin_lock (&ohci->lock);
74
75 /* stop periodic dma if it's not needed */
76 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0
77 && ohci_to_hcd(ohci)->self.bandwidth_int_reqs == 0) {
78 ohci->hc_control &= ~(OHCI_CTRL_PLE|OHCI_CTRL_IE);
79 ohci_writel (ohci, ohci->hc_control, &ohci->regs->control);
80 }
81}
82
83
84/*-------------------------------------------------------------------------*
85 * ED handling functions
86 *-------------------------------------------------------------------------*/
87
88/* search for the right schedule branch to use for a periodic ed.
89 * does some load balancing; returns the branch, or negative errno.
90 */
91static int balance (struct ohci_hcd *ohci, int interval, int load)
92{
93 int i, branch = -ENOSPC;
94
95 /* iso periods can be huge; iso tds specify frame numbers */
96 if (interval > NUM_INTS)
97 interval = NUM_INTS;
98
99 /* search for the least loaded schedule branch of that period
100 * that has enough bandwidth left unreserved.
101 */
102 for (i = 0; i < interval ; i++) {
103 if (branch < 0 || ohci->load [branch] > ohci->load [i]) {
104 int j;
105
106 /* usb 1.1 says 90% of one frame */
107 for (j = i; j < NUM_INTS; j += interval) {
108 if ((ohci->load [j] + load) > 900)
109 break;
110 }
111 if (j < NUM_INTS)
112 continue;
113 branch = i;
114 }
115 }
116 return branch;
117}
118
119/*-------------------------------------------------------------------------*/
120
121/* both iso and interrupt requests have periods; this routine puts them
122 * into the schedule tree in the apppropriate place. most iso devices use
123 * 1msec periods, but that's not required.
124 */
125static void periodic_link (struct ohci_hcd *ohci, struct ed *ed)
126{
127 unsigned i;
128
129 ohci_vdbg (ohci, "link %sed %p branch %d [%dus.], interval %d\n",
130 (ed->hwINFO & cpu_to_hc32 (ohci, ED_ISO)) ? "iso " : "",
131 ed, ed->branch, ed->load, ed->interval);
132
133 for (i = ed->branch; i < NUM_INTS; i += ed->interval) {
134 struct ed **prev = &ohci->periodic [i];
135 __hc32 *prev_p = &ohci->hcca->int_table [i];
136 struct ed *here = *prev;
137
138 /* sorting each branch by period (slow before fast)
139 * lets us share the faster parts of the tree.
140 * (plus maybe: put interrupt eds before iso)
141 */
142 while (here && ed != here) {
143 if (ed->interval > here->interval)
144 break;
145 prev = &here->ed_next;
146 prev_p = &here->hwNextED;
147 here = *prev;
148 }
149 if (ed != here) {
150 ed->ed_next = here;
151 if (here)
152 ed->hwNextED = *prev_p;
153 wmb ();
154 *prev = ed;
155 *prev_p = cpu_to_hc32(ohci, ed->dma);
156 wmb();
157 }
158 ohci->load [i] += ed->load;
159 }
160 ohci_to_hcd(ohci)->self.bandwidth_allocated += ed->load / ed->interval;
161}
162
163/* link an ed into one of the HC chains */
164
165static int ed_schedule (struct ohci_hcd *ohci, struct ed *ed)
166{
167 int branch;
168
169 ed->state = ED_OPER;
170 ed->ed_prev = NULL;
171 ed->ed_next = NULL;
172 ed->hwNextED = 0;
173 if (quirk_zfmicro(ohci)
174 && (ed->type == PIPE_INTERRUPT)
175 && !(ohci->eds_scheduled++))
176 mod_timer(&ohci->unlink_watchdog, round_jiffies(jiffies + HZ));
177 wmb ();
178
179 /* we care about rm_list when setting CLE/BLE in case the HC was at
180 * work on some TD when CLE/BLE was turned off, and isn't quiesced
181 * yet. finish_unlinks() restarts as needed, some upcoming INTR_SF.
182 *
183 * control and bulk EDs are doubly linked (ed_next, ed_prev), but
184 * periodic ones are singly linked (ed_next). that's because the
185 * periodic schedule encodes a tree like figure 3-5 in the ohci
186 * spec: each qh can have several "previous" nodes, and the tree
187 * doesn't have unused/idle descriptors.
188 */
189 switch (ed->type) {
190 case PIPE_CONTROL:
191 if (ohci->ed_controltail == NULL) {
192 WARN_ON (ohci->hc_control & OHCI_CTRL_CLE);
193 ohci_writel (ohci, ed->dma,
194 &ohci->regs->ed_controlhead);
195 } else {
196 ohci->ed_controltail->ed_next = ed;
197 ohci->ed_controltail->hwNextED = cpu_to_hc32 (ohci,
198 ed->dma);
199 }
200 ed->ed_prev = ohci->ed_controltail;
201 if (!ohci->ed_controltail && !ohci->ed_rm_list) {
202 wmb();
203 ohci->hc_control |= OHCI_CTRL_CLE;
204 ohci_writel (ohci, 0, &ohci->regs->ed_controlcurrent);
205 ohci_writel (ohci, ohci->hc_control,
206 &ohci->regs->control);
207 }
208 ohci->ed_controltail = ed;
209 break;
210
211 case PIPE_BULK:
212 if (ohci->ed_bulktail == NULL) {
213 WARN_ON (ohci->hc_control & OHCI_CTRL_BLE);
214 ohci_writel (ohci, ed->dma, &ohci->regs->ed_bulkhead);
215 } else {
216 ohci->ed_bulktail->ed_next = ed;
217 ohci->ed_bulktail->hwNextED = cpu_to_hc32 (ohci,
218 ed->dma);
219 }
220 ed->ed_prev = ohci->ed_bulktail;
221 if (!ohci->ed_bulktail && !ohci->ed_rm_list) {
222 wmb();
223 ohci->hc_control |= OHCI_CTRL_BLE;
224 ohci_writel (ohci, 0, &ohci->regs->ed_bulkcurrent);
225 ohci_writel (ohci, ohci->hc_control,
226 &ohci->regs->control);
227 }
228 ohci->ed_bulktail = ed;
229 break;
230
231 // case PIPE_INTERRUPT:
232 // case PIPE_ISOCHRONOUS:
233 default:
234 branch = balance (ohci, ed->interval, ed->load);
235 if (branch < 0) {
236 ohci_dbg (ohci,
237 "ERR %d, interval %d msecs, load %d\n",
238 branch, ed->interval, ed->load);
239 // FIXME if there are TDs queued, fail them!
240 return branch;
241 }
242 ed->branch = branch;
243 periodic_link (ohci, ed);
244 }
245
246 /* the HC may not see the schedule updates yet, but if it does
247 * then they'll be properly ordered.
248 */
249 return 0;
250}
251
252/*-------------------------------------------------------------------------*/
253
254/* scan the periodic table to find and unlink this ED */
255static void periodic_unlink (struct ohci_hcd *ohci, struct ed *ed)
256{
257 int i;
258
259 for (i = ed->branch; i < NUM_INTS; i += ed->interval) {
260 struct ed *temp;
261 struct ed **prev = &ohci->periodic [i];
262 __hc32 *prev_p = &ohci->hcca->int_table [i];
263
264 while (*prev && (temp = *prev) != ed) {
265 prev_p = &temp->hwNextED;
266 prev = &temp->ed_next;
267 }
268 if (*prev) {
269 *prev_p = ed->hwNextED;
270 *prev = ed->ed_next;
271 }
272 ohci->load [i] -= ed->load;
273 }
274 ohci_to_hcd(ohci)->self.bandwidth_allocated -= ed->load / ed->interval;
275
276 ohci_vdbg (ohci, "unlink %sed %p branch %d [%dus.], interval %d\n",
277 (ed->hwINFO & cpu_to_hc32 (ohci, ED_ISO)) ? "iso " : "",
278 ed, ed->branch, ed->load, ed->interval);
279}
280
281/* unlink an ed from one of the HC chains.
282 * just the link to the ed is unlinked.
283 * the link from the ed still points to another operational ed or 0
284 * so the HC can eventually finish the processing of the unlinked ed
285 * (assuming it already started that, which needn't be true).
286 *
287 * ED_UNLINK is a transient state: the HC may still see this ED, but soon
288 * it won't. ED_SKIP means the HC will finish its current transaction,
289 * but won't start anything new. The TD queue may still grow; device
290 * drivers don't know about this HCD-internal state.
291 *
292 * When the HC can't see the ED, something changes ED_UNLINK to one of:
293 *
294 * - ED_OPER: when there's any request queued, the ED gets rescheduled
295 * immediately. HC should be working on them.
296 *
297 * - ED_IDLE: when there's no TD queue. there's no reason for the HC
298 * to care about this ED; safe to disable the endpoint.
299 *
300 * When finish_unlinks() runs later, after SOF interrupt, it will often
301 * complete one or more URB unlinks before making that state change.
302 */
303static void ed_deschedule (struct ohci_hcd *ohci, struct ed *ed)
304{
305 ed->hwINFO |= cpu_to_hc32 (ohci, ED_SKIP);
306 wmb ();
307 ed->state = ED_UNLINK;
308
309 /* To deschedule something from the control or bulk list, just
310 * clear CLE/BLE and wait. There's no safe way to scrub out list
311 * head/current registers until later, and "later" isn't very
312 * tightly specified. Figure 6-5 and Section 6.4.2.2 show how
313 * the HC is reading the ED queues (while we modify them).
314 *
315 * For now, ed_schedule() is "later". It might be good paranoia
316 * to scrub those registers in finish_unlinks(), in case of bugs
317 * that make the HC try to use them.
318 */
319 switch (ed->type) {
320 case PIPE_CONTROL:
321 /* remove ED from the HC's list: */
322 if (ed->ed_prev == NULL) {
323 if (!ed->hwNextED) {
324 ohci->hc_control &= ~OHCI_CTRL_CLE;
325 ohci_writel (ohci, ohci->hc_control,
326 &ohci->regs->control);
327 // a ohci_readl() later syncs CLE with the HC
328 } else
329 ohci_writel (ohci,
330 hc32_to_cpup (ohci, &ed->hwNextED),
331 &ohci->regs->ed_controlhead);
332 } else {
333 ed->ed_prev->ed_next = ed->ed_next;
334 ed->ed_prev->hwNextED = ed->hwNextED;
335 }
336 /* remove ED from the HCD's list: */
337 if (ohci->ed_controltail == ed) {
338 ohci->ed_controltail = ed->ed_prev;
339 if (ohci->ed_controltail)
340 ohci->ed_controltail->ed_next = NULL;
341 } else if (ed->ed_next) {
342 ed->ed_next->ed_prev = ed->ed_prev;
343 }
344 break;
345
346 case PIPE_BULK:
347 /* remove ED from the HC's list: */
348 if (ed->ed_prev == NULL) {
349 if (!ed->hwNextED) {
350 ohci->hc_control &= ~OHCI_CTRL_BLE;
351 ohci_writel (ohci, ohci->hc_control,
352 &ohci->regs->control);
353 // a ohci_readl() later syncs BLE with the HC
354 } else
355 ohci_writel (ohci,
356 hc32_to_cpup (ohci, &ed->hwNextED),
357 &ohci->regs->ed_bulkhead);
358 } else {
359 ed->ed_prev->ed_next = ed->ed_next;
360 ed->ed_prev->hwNextED = ed->hwNextED;
361 }
362 /* remove ED from the HCD's list: */
363 if (ohci->ed_bulktail == ed) {
364 ohci->ed_bulktail = ed->ed_prev;
365 if (ohci->ed_bulktail)
366 ohci->ed_bulktail->ed_next = NULL;
367 } else if (ed->ed_next) {
368 ed->ed_next->ed_prev = ed->ed_prev;
369 }
370 break;
371
372 // case PIPE_INTERRUPT:
373 // case PIPE_ISOCHRONOUS:
374 default:
375 periodic_unlink (ohci, ed);
376 break;
377 }
378}
379
380
381/*-------------------------------------------------------------------------*/
382
383/* get and maybe (re)init an endpoint. init _should_ be done only as part
384 * of enumeration, usb_set_configuration() or usb_set_interface().
385 */
386static struct ed *ed_get (
387 struct ohci_hcd *ohci,
388 struct usb_host_endpoint *ep,
389 struct usb_device *udev,
390 unsigned int pipe,
391 int interval
392) {
393 struct ed *ed;
394 unsigned long flags;
395
396 spin_lock_irqsave (&ohci->lock, flags);
397
398 if (!(ed = ep->hcpriv)) {
399 struct td *td;
400 int is_out;
401 u32 info;
402
403 ed = ed_alloc (ohci, GFP_ATOMIC);
404 if (!ed) {
405 /* out of memory */
406 goto done;
407 }
408
409 /* dummy td; end of td list for ed */
410 td = td_alloc (ohci, GFP_ATOMIC);
411 if (!td) {
412 /* out of memory */
413 ed_free (ohci, ed);
414 ed = NULL;
415 goto done;
416 }
417 ed->dummy = td;
418 ed->hwTailP = cpu_to_hc32 (ohci, td->td_dma);
419 ed->hwHeadP = ed->hwTailP; /* ED_C, ED_H zeroed */
420 ed->state = ED_IDLE;
421
422 is_out = !(ep->desc.bEndpointAddress & USB_DIR_IN);
423
424 /* FIXME usbcore changes dev->devnum before SET_ADDRESS
425 * succeeds ... otherwise we wouldn't need "pipe".
426 */
427 info = usb_pipedevice (pipe);
428 ed->type = usb_pipetype(pipe);
429
430 info |= (ep->desc.bEndpointAddress & ~USB_DIR_IN) << 7;
431 info |= usb_endpoint_maxp(&ep->desc) << 16;
432 if (udev->speed == USB_SPEED_LOW)
433 info |= ED_LOWSPEED;
434 /* only control transfers store pids in tds */
435 if (ed->type != PIPE_CONTROL) {
436 info |= is_out ? ED_OUT : ED_IN;
437 if (ed->type != PIPE_BULK) {
438 /* periodic transfers... */
439 if (ed->type == PIPE_ISOCHRONOUS)
440 info |= ED_ISO;
441 else if (interval > 32) /* iso can be bigger */
442 interval = 32;
443 ed->interval = interval;
444 ed->load = usb_calc_bus_time (
445 udev->speed, !is_out,
446 ed->type == PIPE_ISOCHRONOUS,
447 usb_endpoint_maxp(&ep->desc))
448 / 1000;
449 }
450 }
451 ed->hwINFO = cpu_to_hc32(ohci, info);
452
453 ep->hcpriv = ed;
454 }
455
456done:
457 spin_unlock_irqrestore (&ohci->lock, flags);
458 return ed;
459}
460
461/*-------------------------------------------------------------------------*/
462
463/* request unlinking of an endpoint from an operational HC.
464 * put the ep on the rm_list
465 * real work is done at the next start frame (SF) hardware interrupt
466 * caller guarantees HCD is running, so hardware access is safe,
467 * and that ed->state is ED_OPER
468 */
469static void start_ed_unlink (struct ohci_hcd *ohci, struct ed *ed)
470{
471 ed->hwINFO |= cpu_to_hc32 (ohci, ED_DEQUEUE);
472 ed_deschedule (ohci, ed);
473
474 /* rm_list is just singly linked, for simplicity */
475 ed->ed_next = ohci->ed_rm_list;
476 ed->ed_prev = NULL;
477 ohci->ed_rm_list = ed;
478
479 /* enable SOF interrupt */
480 ohci_writel (ohci, OHCI_INTR_SF, &ohci->regs->intrstatus);
481 ohci_writel (ohci, OHCI_INTR_SF, &ohci->regs->intrenable);
482 // flush those writes, and get latest HCCA contents
483 (void) ohci_readl (ohci, &ohci->regs->control);
484
485 /* SF interrupt might get delayed; record the frame counter value that
486 * indicates when the HC isn't looking at it, so concurrent unlinks
487 * behave. frame_no wraps every 2^16 msec, and changes right before
488 * SF is triggered.
489 */
490 ed->tick = ohci_frame_no(ohci) + 1;
491
492}
493
494/*-------------------------------------------------------------------------*
495 * TD handling functions
496 *-------------------------------------------------------------------------*/
497
498/* enqueue next TD for this URB (OHCI spec 5.2.8.2) */
499
500static void
501td_fill (struct ohci_hcd *ohci, u32 info,
502 dma_addr_t data, int len,
503 struct urb *urb, int index)
504{
505 struct td *td, *td_pt;
506 struct urb_priv *urb_priv = urb->hcpriv;
507 int is_iso = info & TD_ISO;
508 int hash;
509
510 // ASSERT (index < urb_priv->length);
511
512 /* aim for only one interrupt per urb. mostly applies to control
513 * and iso; other urbs rarely need more than one TD per urb.
514 * this way, only final tds (or ones with an error) cause IRQs.
515 * at least immediately; use DI=6 in case any control request is
516 * tempted to die part way through. (and to force the hc to flush
517 * its donelist soonish, even on unlink paths.)
518 *
519 * NOTE: could delay interrupts even for the last TD, and get fewer
520 * interrupts ... increasing per-urb latency by sharing interrupts.
521 * Drivers that queue bulk urbs may request that behavior.
522 */
523 if (index != (urb_priv->length - 1)
524 || (urb->transfer_flags & URB_NO_INTERRUPT))
525 info |= TD_DI_SET (6);
526
527 /* use this td as the next dummy */
528 td_pt = urb_priv->td [index];
529
530 /* fill the old dummy TD */
531 td = urb_priv->td [index] = urb_priv->ed->dummy;
532 urb_priv->ed->dummy = td_pt;
533
534 td->ed = urb_priv->ed;
535 td->next_dl_td = NULL;
536 td->index = index;
537 td->urb = urb;
538 td->data_dma = data;
539 if (!len)
540 data = 0;
541
542 td->hwINFO = cpu_to_hc32 (ohci, info);
543 if (is_iso) {
544 td->hwCBP = cpu_to_hc32 (ohci, data & 0xFFFFF000);
545 *ohci_hwPSWp(ohci, td, 0) = cpu_to_hc16 (ohci,
546 (data & 0x0FFF) | 0xE000);
547 td->ed->last_iso = info & 0xffff;
548 } else {
549 td->hwCBP = cpu_to_hc32 (ohci, data);
550 }
551 if (data)
552 td->hwBE = cpu_to_hc32 (ohci, data + len - 1);
553 else
554 td->hwBE = 0;
555 td->hwNextTD = cpu_to_hc32 (ohci, td_pt->td_dma);
556
557 /* append to queue */
558 list_add_tail (&td->td_list, &td->ed->td_list);
559
560 /* hash it for later reverse mapping */
561 hash = TD_HASH_FUNC (td->td_dma);
562 td->td_hash = ohci->td_hash [hash];
563 ohci->td_hash [hash] = td;
564
565 /* HC might read the TD (or cachelines) right away ... */
566 wmb ();
567 td->ed->hwTailP = td->hwNextTD;
568}
569
570/*-------------------------------------------------------------------------*/
571
572/* Prepare all TDs of a transfer, and queue them onto the ED.
573 * Caller guarantees HC is active.
574 * Usually the ED is already on the schedule, so TDs might be
575 * processed as soon as they're queued.
576 */
577static void td_submit_urb (
578 struct ohci_hcd *ohci,
579 struct urb *urb
580) {
581 struct urb_priv *urb_priv = urb->hcpriv;
582 dma_addr_t data;
583 int data_len = urb->transfer_buffer_length;
584 int cnt = 0;
585 u32 info = 0;
586 int is_out = usb_pipeout (urb->pipe);
587 int periodic = 0;
588
589 /* OHCI handles the bulk/interrupt data toggles itself. We just
590 * use the device toggle bits for resetting, and rely on the fact
591 * that resetting toggle is meaningless if the endpoint is active.
592 */
593 if (!usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe), is_out)) {
594 usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe),
595 is_out, 1);
596 urb_priv->ed->hwHeadP &= ~cpu_to_hc32 (ohci, ED_C);
597 }
598
599 urb_priv->td_cnt = 0;
600 list_add (&urb_priv->pending, &ohci->pending);
601
602 if (data_len)
603 data = urb->transfer_dma;
604 else
605 data = 0;
606
607 /* NOTE: TD_CC is set so we can tell which TDs the HC processed by
608 * using TD_CC_GET, as well as by seeing them on the done list.
609 * (CC = NotAccessed ... 0x0F, or 0x0E in PSWs for ISO.)
610 */
611 switch (urb_priv->ed->type) {
612
613 /* Bulk and interrupt are identical except for where in the schedule
614 * their EDs live.
615 */
616 case PIPE_INTERRUPT:
617 /* ... and periodic urbs have extra accounting */
618 periodic = ohci_to_hcd(ohci)->self.bandwidth_int_reqs++ == 0
619 && ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0;
620 /* FALLTHROUGH */
621 case PIPE_BULK:
622 info = is_out
623 ? TD_T_TOGGLE | TD_CC | TD_DP_OUT
624 : TD_T_TOGGLE | TD_CC | TD_DP_IN;
625 /* TDs _could_ transfer up to 8K each */
626 while (data_len > 4096) {
627 td_fill (ohci, info, data, 4096, urb, cnt);
628 data += 4096;
629 data_len -= 4096;
630 cnt++;
631 }
632 /* maybe avoid ED halt on final TD short read */
633 if (!(urb->transfer_flags & URB_SHORT_NOT_OK))
634 info |= TD_R;
635 td_fill (ohci, info, data, data_len, urb, cnt);
636 cnt++;
637 if ((urb->transfer_flags & URB_ZERO_PACKET)
638 && cnt < urb_priv->length) {
639 td_fill (ohci, info, 0, 0, urb, cnt);
640 cnt++;
641 }
642 /* maybe kickstart bulk list */
643 if (urb_priv->ed->type == PIPE_BULK) {
644 wmb ();
645 ohci_writel (ohci, OHCI_BLF, &ohci->regs->cmdstatus);
646 }
647 break;
648
649 /* control manages DATA0/DATA1 toggle per-request; SETUP resets it,
650 * any DATA phase works normally, and the STATUS ack is special.
651 */
652 case PIPE_CONTROL:
653 info = TD_CC | TD_DP_SETUP | TD_T_DATA0;
654 td_fill (ohci, info, urb->setup_dma, 8, urb, cnt++);
655 if (data_len > 0) {
656 info = TD_CC | TD_R | TD_T_DATA1;
657 info |= is_out ? TD_DP_OUT : TD_DP_IN;
658 /* NOTE: mishandles transfers >8K, some >4K */
659 td_fill (ohci, info, data, data_len, urb, cnt++);
660 }
661 info = (is_out || data_len == 0)
662 ? TD_CC | TD_DP_IN | TD_T_DATA1
663 : TD_CC | TD_DP_OUT | TD_T_DATA1;
664 td_fill (ohci, info, data, 0, urb, cnt++);
665 /* maybe kickstart control list */
666 wmb ();
667 ohci_writel (ohci, OHCI_CLF, &ohci->regs->cmdstatus);
668 break;
669
670 /* ISO has no retransmit, so no toggle; and it uses special TDs.
671 * Each TD could handle multiple consecutive frames (interval 1);
672 * we could often reduce the number of TDs here.
673 */
674 case PIPE_ISOCHRONOUS:
675 for (cnt = 0; cnt < urb->number_of_packets; cnt++) {
676 int frame = urb->start_frame;
677
678 // FIXME scheduling should handle frame counter
679 // roll-around ... exotic case (and OHCI has
680 // a 2^16 iso range, vs other HCs max of 2^10)
681 frame += cnt * urb->interval;
682 frame &= 0xffff;
683 td_fill (ohci, TD_CC | TD_ISO | frame,
684 data + urb->iso_frame_desc [cnt].offset,
685 urb->iso_frame_desc [cnt].length, urb, cnt);
686 }
687 if (ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs == 0) {
688 if (quirk_amdiso(ohci))
689 usb_amd_quirk_pll_disable();
690 if (quirk_amdprefetch(ohci))
691 sb800_prefetch(ohci, 1);
692 }
693 periodic = ohci_to_hcd(ohci)->self.bandwidth_isoc_reqs++ == 0
694 && ohci_to_hcd(ohci)->self.bandwidth_int_reqs == 0;
695 break;
696 }
697
698 /* start periodic dma if needed */
699 if (periodic) {
700 wmb ();
701 ohci->hc_control |= OHCI_CTRL_PLE|OHCI_CTRL_IE;
702 ohci_writel (ohci, ohci->hc_control, &ohci->regs->control);
703 }
704
705 // ASSERT (urb_priv->length == cnt);
706}
707
708/*-------------------------------------------------------------------------*
709 * Done List handling functions
710 *-------------------------------------------------------------------------*/
711
712/* calculate transfer length/status and update the urb */
713static int td_done(struct ohci_hcd *ohci, struct urb *urb, struct td *td)
714{
715 u32 tdINFO = hc32_to_cpup (ohci, &td->hwINFO);
716 int cc = 0;
717 int status = -EINPROGRESS;
718
719 list_del (&td->td_list);
720
721 /* ISO ... drivers see per-TD length/status */
722 if (tdINFO & TD_ISO) {
723 u16 tdPSW = ohci_hwPSW(ohci, td, 0);
724 int dlen = 0;
725
726 /* NOTE: assumes FC in tdINFO == 0, and that
727 * only the first of 0..MAXPSW psws is used.
728 */
729
730 cc = (tdPSW >> 12) & 0xF;
731 if (tdINFO & TD_CC) /* hc didn't touch? */
732 return status;
733
734 if (usb_pipeout (urb->pipe))
735 dlen = urb->iso_frame_desc [td->index].length;
736 else {
737 /* short reads are always OK for ISO */
738 if (cc == TD_DATAUNDERRUN)
739 cc = TD_CC_NOERROR;
740 dlen = tdPSW & 0x3ff;
741 }
742 urb->actual_length += dlen;
743 urb->iso_frame_desc [td->index].actual_length = dlen;
744 urb->iso_frame_desc [td->index].status = cc_to_error [cc];
745
746 if (cc != TD_CC_NOERROR)
747 ohci_vdbg (ohci,
748 "urb %p iso td %p (%d) len %d cc %d\n",
749 urb, td, 1 + td->index, dlen, cc);
750
751 /* BULK, INT, CONTROL ... drivers see aggregate length/status,
752 * except that "setup" bytes aren't counted and "short" transfers
753 * might not be reported as errors.
754 */
755 } else {
756 int type = usb_pipetype (urb->pipe);
757 u32 tdBE = hc32_to_cpup (ohci, &td->hwBE);
758
759 cc = TD_CC_GET (tdINFO);
760
761 /* update packet status if needed (short is normally ok) */
762 if (cc == TD_DATAUNDERRUN
763 && !(urb->transfer_flags & URB_SHORT_NOT_OK))
764 cc = TD_CC_NOERROR;
765 if (cc != TD_CC_NOERROR && cc < 0x0E)
766 status = cc_to_error[cc];
767
768 /* count all non-empty packets except control SETUP packet */
769 if ((type != PIPE_CONTROL || td->index != 0) && tdBE != 0) {
770 if (td->hwCBP == 0)
771 urb->actual_length += tdBE - td->data_dma + 1;
772 else
773 urb->actual_length +=
774 hc32_to_cpup (ohci, &td->hwCBP)
775 - td->data_dma;
776 }
777
778 if (cc != TD_CC_NOERROR && cc < 0x0E)
779 ohci_vdbg (ohci,
780 "urb %p td %p (%d) cc %d, len=%d/%d\n",
781 urb, td, 1 + td->index, cc,
782 urb->actual_length,
783 urb->transfer_buffer_length);
784 }
785 return status;
786}
787
788/*-------------------------------------------------------------------------*/
789
790static void ed_halted(struct ohci_hcd *ohci, struct td *td, int cc)
791{
792 struct urb *urb = td->urb;
793 urb_priv_t *urb_priv = urb->hcpriv;
794 struct ed *ed = td->ed;
795 struct list_head *tmp = td->td_list.next;
796 __hc32 toggle = ed->hwHeadP & cpu_to_hc32 (ohci, ED_C);
797
798 /* clear ed halt; this is the td that caused it, but keep it inactive
799 * until its urb->complete() has a chance to clean up.
800 */
801 ed->hwINFO |= cpu_to_hc32 (ohci, ED_SKIP);
802 wmb ();
803 ed->hwHeadP &= ~cpu_to_hc32 (ohci, ED_H);
804
805 /* Get rid of all later tds from this urb. We don't have
806 * to be careful: no errors and nothing was transferred.
807 * Also patch the ed so it looks as if those tds completed normally.
808 */
809 while (tmp != &ed->td_list) {
810 struct td *next;
811
812 next = list_entry (tmp, struct td, td_list);
813 tmp = next->td_list.next;
814
815 if (next->urb != urb)
816 break;
817
818 /* NOTE: if multi-td control DATA segments get supported,
819 * this urb had one of them, this td wasn't the last td
820 * in that segment (TD_R clear), this ed halted because
821 * of a short read, _and_ URB_SHORT_NOT_OK is clear ...
822 * then we need to leave the control STATUS packet queued
823 * and clear ED_SKIP.
824 */
825
826 list_del(&next->td_list);
827 urb_priv->td_cnt++;
828 ed->hwHeadP = next->hwNextTD | toggle;
829 }
830
831 /* help for troubleshooting: report anything that
832 * looks odd ... that doesn't include protocol stalls
833 * (or maybe some other things)
834 */
835 switch (cc) {
836 case TD_DATAUNDERRUN:
837 if ((urb->transfer_flags & URB_SHORT_NOT_OK) == 0)
838 break;
839 /* fallthrough */
840 case TD_CC_STALL:
841 if (usb_pipecontrol (urb->pipe))
842 break;
843 /* fallthrough */
844 default:
845 ohci_dbg (ohci,
846 "urb %p path %s ep%d%s %08x cc %d --> status %d\n",
847 urb, urb->dev->devpath,
848 usb_pipeendpoint (urb->pipe),
849 usb_pipein (urb->pipe) ? "in" : "out",
850 hc32_to_cpu (ohci, td->hwINFO),
851 cc, cc_to_error [cc]);
852 }
853}
854
855/* replies to the request have to be on a FIFO basis so
856 * we unreverse the hc-reversed done-list
857 */
858static struct td *dl_reverse_done_list (struct ohci_hcd *ohci)
859{
860 u32 td_dma;
861 struct td *td_rev = NULL;
862 struct td *td = NULL;
863
864 td_dma = hc32_to_cpup (ohci, &ohci->hcca->done_head);
865 ohci->hcca->done_head = 0;
866 wmb();
867
868 /* get TD from hc's singly linked list, and
869 * prepend to ours. ed->td_list changes later.
870 */
871 while (td_dma) {
872 int cc;
873
874 td = dma_to_td (ohci, td_dma);
875 if (!td) {
876 ohci_err (ohci, "bad entry %8x\n", td_dma);
877 break;
878 }
879
880 td->hwINFO |= cpu_to_hc32 (ohci, TD_DONE);
881 cc = TD_CC_GET (hc32_to_cpup (ohci, &td->hwINFO));
882
883 /* Non-iso endpoints can halt on error; un-halt,
884 * and dequeue any other TDs from this urb.
885 * No other TD could have caused the halt.
886 */
887 if (cc != TD_CC_NOERROR
888 && (td->ed->hwHeadP & cpu_to_hc32 (ohci, ED_H)))
889 ed_halted(ohci, td, cc);
890
891 td->next_dl_td = td_rev;
892 td_rev = td;
893 td_dma = hc32_to_cpup (ohci, &td->hwNextTD);
894 }
895 return td_rev;
896}
897
898/*-------------------------------------------------------------------------*/
899
900/* there are some urbs/eds to unlink; called in_irq(), with HCD locked */
901static void
902finish_unlinks (struct ohci_hcd *ohci, u16 tick)
903{
904 struct ed *ed, **last;
905
906rescan_all:
907 for (last = &ohci->ed_rm_list, ed = *last; ed != NULL; ed = *last) {
908 struct list_head *entry, *tmp;
909 int completed, modified;
910 __hc32 *prev;
911
912 /* only take off EDs that the HC isn't using, accounting for
913 * frame counter wraps and EDs with partially retired TDs
914 */
915 if (likely(ohci->rh_state == OHCI_RH_RUNNING)) {
916 if (tick_before (tick, ed->tick)) {
917skip_ed:
918 last = &ed->ed_next;
919 continue;
920 }
921
922 if (!list_empty (&ed->td_list)) {
923 struct td *td;
924 u32 head;
925
926 td = list_entry (ed->td_list.next, struct td,
927 td_list);
928 head = hc32_to_cpu (ohci, ed->hwHeadP) &
929 TD_MASK;
930
931 /* INTR_WDH may need to clean up first */
932 if (td->td_dma != head) {
933 if (ed == ohci->ed_to_check)
934 ohci->ed_to_check = NULL;
935 else
936 goto skip_ed;
937 }
938 }
939 }
940
941 /* reentrancy: if we drop the schedule lock, someone might
942 * have modified this list. normally it's just prepending
943 * entries (which we'd ignore), but paranoia won't hurt.
944 */
945 *last = ed->ed_next;
946 ed->ed_next = NULL;
947 modified = 0;
948
949 /* unlink urbs as requested, but rescan the list after
950 * we call a completion since it might have unlinked
951 * another (earlier) urb
952 *
953 * When we get here, the HC doesn't see this ed. But it
954 * must not be rescheduled until all completed URBs have
955 * been given back to the driver.
956 */
957rescan_this:
958 completed = 0;
959 prev = &ed->hwHeadP;
960 list_for_each_safe (entry, tmp, &ed->td_list) {
961 struct td *td;
962 struct urb *urb;
963 urb_priv_t *urb_priv;
964 __hc32 savebits;
965 u32 tdINFO;
966
967 td = list_entry (entry, struct td, td_list);
968 urb = td->urb;
969 urb_priv = td->urb->hcpriv;
970
971 if (!urb->unlinked) {
972 prev = &td->hwNextTD;
973 continue;
974 }
975
976 /* patch pointer hc uses */
977 savebits = *prev & ~cpu_to_hc32 (ohci, TD_MASK);
978 *prev = td->hwNextTD | savebits;
979
980 /* If this was unlinked, the TD may not have been
981 * retired ... so manually save the data toggle.
982 * The controller ignores the value we save for
983 * control and ISO endpoints.
984 */
985 tdINFO = hc32_to_cpup(ohci, &td->hwINFO);
986 if ((tdINFO & TD_T) == TD_T_DATA0)
987 ed->hwHeadP &= ~cpu_to_hc32(ohci, ED_C);
988 else if ((tdINFO & TD_T) == TD_T_DATA1)
989 ed->hwHeadP |= cpu_to_hc32(ohci, ED_C);
990
991 /* HC may have partly processed this TD */
992 td_done (ohci, urb, td);
993 urb_priv->td_cnt++;
994
995 /* if URB is done, clean up */
996 if (urb_priv->td_cnt == urb_priv->length) {
997 modified = completed = 1;
998 finish_urb(ohci, urb, 0);
999 }
1000 }
1001 if (completed && !list_empty (&ed->td_list))
1002 goto rescan_this;
1003
1004 /* ED's now officially unlinked, hc doesn't see */
1005 ed->state = ED_IDLE;
1006 if (quirk_zfmicro(ohci) && ed->type == PIPE_INTERRUPT)
1007 ohci->eds_scheduled--;
1008 ed->hwHeadP &= ~cpu_to_hc32(ohci, ED_H);
1009 ed->hwNextED = 0;
1010 wmb ();
1011 ed->hwINFO &= ~cpu_to_hc32 (ohci, ED_SKIP | ED_DEQUEUE);
1012
1013 /* but if there's work queued, reschedule */
1014 if (!list_empty (&ed->td_list)) {
1015 if (ohci->rh_state == OHCI_RH_RUNNING)
1016 ed_schedule (ohci, ed);
1017 }
1018
1019 if (modified)
1020 goto rescan_all;
1021 }
1022
1023 /* maybe reenable control and bulk lists */
1024 if (ohci->rh_state == OHCI_RH_RUNNING && !ohci->ed_rm_list) {
1025 u32 command = 0, control = 0;
1026
1027 if (ohci->ed_controltail) {
1028 command |= OHCI_CLF;
1029 if (quirk_zfmicro(ohci))
1030 mdelay(1);
1031 if (!(ohci->hc_control & OHCI_CTRL_CLE)) {
1032 control |= OHCI_CTRL_CLE;
1033 ohci_writel (ohci, 0,
1034 &ohci->regs->ed_controlcurrent);
1035 }
1036 }
1037 if (ohci->ed_bulktail) {
1038 command |= OHCI_BLF;
1039 if (quirk_zfmicro(ohci))
1040 mdelay(1);
1041 if (!(ohci->hc_control & OHCI_CTRL_BLE)) {
1042 control |= OHCI_CTRL_BLE;
1043 ohci_writel (ohci, 0,
1044 &ohci->regs->ed_bulkcurrent);
1045 }
1046 }
1047
1048 /* CLE/BLE to enable, CLF/BLF to (maybe) kickstart */
1049 if (control) {
1050 ohci->hc_control |= control;
1051 if (quirk_zfmicro(ohci))
1052 mdelay(1);
1053 ohci_writel (ohci, ohci->hc_control,
1054 &ohci->regs->control);
1055 }
1056 if (command) {
1057 if (quirk_zfmicro(ohci))
1058 mdelay(1);
1059 ohci_writel (ohci, command, &ohci->regs->cmdstatus);
1060 }
1061 }
1062}
1063
1064
1065
1066/*-------------------------------------------------------------------------*/
1067
1068/*
1069 * Used to take back a TD from the host controller. This would normally be
1070 * called from within dl_done_list, however it may be called directly if the
1071 * HC no longer sees the TD and it has not appeared on the donelist (after
1072 * two frames). This bug has been observed on ZF Micro systems.
1073 */
1074static void takeback_td(struct ohci_hcd *ohci, struct td *td)
1075{
1076 struct urb *urb = td->urb;
1077 urb_priv_t *urb_priv = urb->hcpriv;
1078 struct ed *ed = td->ed;
1079 int status;
1080
1081 /* update URB's length and status from TD */
1082 status = td_done(ohci, urb, td);
1083 urb_priv->td_cnt++;
1084
1085 /* If all this urb's TDs are done, call complete() */
1086 if (urb_priv->td_cnt == urb_priv->length)
1087 finish_urb(ohci, urb, status);
1088
1089 /* clean schedule: unlink EDs that are no longer busy */
1090 if (list_empty(&ed->td_list)) {
1091 if (ed->state == ED_OPER)
1092 start_ed_unlink(ohci, ed);
1093
1094 /* ... reenabling halted EDs only after fault cleanup */
1095 } else if ((ed->hwINFO & cpu_to_hc32(ohci, ED_SKIP | ED_DEQUEUE))
1096 == cpu_to_hc32(ohci, ED_SKIP)) {
1097 td = list_entry(ed->td_list.next, struct td, td_list);
1098 if (!(td->hwINFO & cpu_to_hc32(ohci, TD_DONE))) {
1099 ed->hwINFO &= ~cpu_to_hc32(ohci, ED_SKIP);
1100 /* ... hc may need waking-up */
1101 switch (ed->type) {
1102 case PIPE_CONTROL:
1103 ohci_writel(ohci, OHCI_CLF,
1104 &ohci->regs->cmdstatus);
1105 break;
1106 case PIPE_BULK:
1107 ohci_writel(ohci, OHCI_BLF,
1108 &ohci->regs->cmdstatus);
1109 break;
1110 }
1111 }
1112 }
1113}
1114
1115/*
1116 * Process normal completions (error or success) and clean the schedules.
1117 *
1118 * This is the main path for handing urbs back to drivers. The only other
1119 * normal path is finish_unlinks(), which unlinks URBs using ed_rm_list,
1120 * instead of scanning the (re-reversed) donelist as this does. There's
1121 * an abnormal path too, handling a quirk in some Compaq silicon: URBs
1122 * with TDs that appear to be orphaned are directly reclaimed.
1123 */
1124static void
1125dl_done_list (struct ohci_hcd *ohci)
1126{
1127 struct td *td = dl_reverse_done_list (ohci);
1128
1129 while (td) {
1130 struct td *td_next = td->next_dl_td;
1131 takeback_td(ohci, td);
1132 td = td_next;
1133 }
1134}