drivers/usb/host/uhci-q.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * Universal Host Controller Interface driver for USB.
   4  *
   5  * Maintainer: Alan Stern <stern@rowland.harvard.edu>
   6  *
   7  * (C) Copyright 1999 Linus Torvalds
   8  * (C) Copyright 1999-2002 Johannes Erdfelt, johannes@erdfelt.com
   9  * (C) Copyright 1999 Randy Dunlap
  10  * (C) Copyright 1999 Georg Acher, acher@in.tum.de
  11  * (C) Copyright 1999 Deti Fliegl, deti@fliegl.de
  12  * (C) Copyright 1999 Thomas Sailer, sailer@ife.ee.ethz.ch
  13  * (C) Copyright 1999 Roman Weissgaerber, weissg@vienna.at
  14  * (C) Copyright 2000 Yggdrasil Computing, Inc. (port of new PCI interface
  15  *               support from usb-ohci.c by Adam Richter, adam@yggdrasil.com).
  16  * (C) Copyright 1999 Gregory P. Smith (from usb-ohci.c)
  17  * (C) Copyright 2004-2007 Alan Stern, stern@rowland.harvard.edu
  18  */
  19
  20
  21 /*
  22  * Technically, updating td->status here is a race, but it's not really a
  23  * problem. The worst that can happen is that we set the IOC bit again
  24  * generating a spurious interrupt. We could fix this by creating another
  25  * QH and leaving the IOC bit always set, but then we would have to play
  26  * games with the FSBR code to make sure we get the correct order in all
  27  * the cases. I don't think it's worth the effort
  28  */
  29 static void uhci_set_next_interrupt(struct uhci_hcd *uhci)
  30 {
  31         if (uhci->is_stopped)
  32                 mod_timer(&uhci_to_hcd(uhci)->rh_timer, jiffies);
  33         uhci->term_td->status |= cpu_to_hc32(uhci, TD_CTRL_IOC);
  34 }
  35
  36 static inline void uhci_clear_next_interrupt(struct uhci_hcd *uhci)
  37 {
  38         uhci->term_td->status &= ~cpu_to_hc32(uhci, TD_CTRL_IOC);
  39 }
  40
  41
  42 /*
  43  * Full-Speed Bandwidth Reclamation (FSBR).
  44  * We turn on FSBR whenever a queue that wants it is advancing,
  45  * and leave it on for a short time thereafter.
  46  */
  47 static void uhci_fsbr_on(struct uhci_hcd *uhci)
  48 {
  49         struct uhci_qh *lqh;
  50
  51         /* The terminating skeleton QH always points back to the first
  52          * FSBR QH.  Make the last async QH point to the terminating
  53          * skeleton QH. */
  54         uhci->fsbr_is_on = 1;
  55         lqh = list_entry(uhci->skel_async_qh->node.prev,
  56                         struct uhci_qh, node);
  57         lqh->link = LINK_TO_QH(uhci, uhci->skel_term_qh);
  58 }
  59
  60 static void uhci_fsbr_off(struct uhci_hcd *uhci)
  61 {
  62         struct uhci_qh *lqh;
  63
  64         /* Remove the link from the last async QH to the terminating
  65          * skeleton QH. */
  66         uhci->fsbr_is_on = 0;
  67         lqh = list_entry(uhci->skel_async_qh->node.prev,
  68                         struct uhci_qh, node);
  69         lqh->link = UHCI_PTR_TERM(uhci);
  70 }
  71
  72 static void uhci_add_fsbr(struct uhci_hcd *uhci, struct urb *urb)
  73 {
  74         struct urb_priv *urbp = urb->hcpriv;
  75
  76         urbp->fsbr = 1;
  77 }
  78
  79 static void uhci_urbp_wants_fsbr(struct uhci_hcd *uhci, struct urb_priv *urbp)
  80 {
  81         if (urbp->fsbr) {
  82                 uhci->fsbr_is_wanted = 1;
  83                 if (!uhci->fsbr_is_on)
  84                         uhci_fsbr_on(uhci);
  85                 else if (uhci->fsbr_expiring) {
  86                         uhci->fsbr_expiring = 0;
  87                         del_timer(&uhci->fsbr_timer);
  88                 }
  89         }
  90 }
  91
  92 static void uhci_fsbr_timeout(struct timer_list *t)
  93 {
  94         struct uhci_hcd *uhci = from_timer(uhci, t, fsbr_timer);
  95         unsigned long flags;
  96
  97         spin_lock_irqsave(&uhci->lock, flags);
  98         if (uhci->fsbr_expiring) {
  99                 uhci->fsbr_expiring = 0;
 100                 uhci_fsbr_off(uhci);
 101         }
 102         spin_unlock_irqrestore(&uhci->lock, flags);
 103 }
 104
 105
 106 static struct uhci_td *uhci_alloc_td(struct uhci_hcd *uhci)
 107 {
 108         dma_addr_t dma_handle;
 109         struct uhci_td *td;
 110
 111         td = dma_pool_alloc(uhci->td_pool, GFP_ATOMIC, &dma_handle);
 112         if (!td)
 113                 return NULL;
 114
 115         td->dma_handle = dma_handle;
 116         td->frame = -1;
 117
 118         INIT_LIST_HEAD(&td->list);
 119         INIT_LIST_HEAD(&td->fl_list);
 120
 121         return td;
 122 }
 123
 124 static void uhci_free_td(struct uhci_hcd *uhci, struct uhci_td *td)
 125 {
 126         if (!list_empty(&td->list))
 127                 dev_WARN(uhci_dev(uhci), "td %p still in list!\n", td);
 128         if (!list_empty(&td->fl_list))
 129                 dev_WARN(uhci_dev(uhci), "td %p still in fl_list!\n", td);
 130
 131         dma_pool_free(uhci->td_pool, td, td->dma_handle);
 132 }
 133
 134 static inline void uhci_fill_td(struct uhci_hcd *uhci, struct uhci_td *td,
 135                 u32 status, u32 token, u32 buffer)
 136 {
 137         td->status = cpu_to_hc32(uhci, status);
 138         td->token = cpu_to_hc32(uhci, token);
 139         td->buffer = cpu_to_hc32(uhci, buffer);
 140 }
 141
 142 static void uhci_add_td_to_urbp(struct uhci_td *td, struct urb_priv *urbp)
 143 {
 144         list_add_tail(&td->list, &urbp->td_list);
 145 }
 146
 147 static void uhci_remove_td_from_urbp(struct uhci_td *td)
 148 {
 149         list_del_init(&td->list);
 150 }
 151
 152 /*
 153  * We insert Isochronous URBs directly into the frame list at the beginning
 154  */
 155 static inline void uhci_insert_td_in_frame_list(struct uhci_hcd *uhci,
 156                 struct uhci_td *td, unsigned framenum)
 157 {
 158         framenum &= (UHCI_NUMFRAMES - 1);
 159
 160         td->frame = framenum;
 161
 162         /* Is there a TD already mapped there? */
 163         if (uhci->frame_cpu[framenum]) {
 164                 struct uhci_td *ftd, *ltd;
 165
 166                 ftd = uhci->frame_cpu[framenum];
 167                 ltd = list_entry(ftd->fl_list.prev, struct uhci_td, fl_list);
 168
 169                 list_add_tail(&td->fl_list, &ftd->fl_list);
 170
 171                 td->link = ltd->link;
 172                 wmb();
 173                 ltd->link = LINK_TO_TD(uhci, td);
 174         } else {
 175                 td->link = uhci->frame[framenum];
 176                 wmb();
 177                 uhci->frame[framenum] = LINK_TO_TD(uhci, td);
 178                 uhci->frame_cpu[framenum] = td;
 179         }
 180 }
 181
 182 static inline void uhci_remove_td_from_frame_list(struct uhci_hcd *uhci,
 183                 struct uhci_td *td)
 184 {
 185         /* If it's not inserted, don't remove it */
 186         if (td->frame == -1) {
 187                 WARN_ON(!list_empty(&td->fl_list));
 188                 return;
 189         }
 190
 191         if (uhci->frame_cpu[td->frame] == td) {
 192                 if (list_empty(&td->fl_list)) {
 193                         uhci->frame[td->frame] = td->link;
 194                         uhci->frame_cpu[td->frame] = NULL;
 195                 } else {
 196                         struct uhci_td *ntd;
 197
 198                         ntd = list_entry(td->fl_list.next,
 199                                          struct uhci_td,
 200                                          fl_list);
 201                         uhci->frame[td->frame] = LINK_TO_TD(uhci, ntd);
 202                         uhci->frame_cpu[td->frame] = ntd;
 203                 }
 204         } else {
 205                 struct uhci_td *ptd;
 206
 207                 ptd = list_entry(td->fl_list.prev, struct uhci_td, fl_list);
 208                 ptd->link = td->link;
 209         }
 210
 211         list_del_init(&td->fl_list);
 212         td->frame = -1;
 213 }
 214
 215 static inline void uhci_remove_tds_from_frame(struct uhci_hcd *uhci,
 216                 unsigned int framenum)
 217 {
 218         struct uhci_td *ftd, *ltd;
 219
 220         framenum &= (UHCI_NUMFRAMES - 1);
 221
 222         ftd = uhci->frame_cpu[framenum];
 223         if (ftd) {
 224                 ltd = list_entry(ftd->fl_list.prev, struct uhci_td, fl_list);
 225                 uhci->frame[framenum] = ltd->link;
 226                 uhci->frame_cpu[framenum] = NULL;
 227
 228                 while (!list_empty(&ftd->fl_list))
 229                         list_del_init(ftd->fl_list.prev);
 230         }
 231 }
 232
 233 /*
 234  * Remove all the TDs for an Isochronous URB from the frame list
 235  */
 236 static void uhci_unlink_isochronous_tds(struct uhci_hcd *uhci, struct urb *urb)
 237 {
 238         struct urb_priv *urbp = (struct urb_priv *) urb->hcpriv;
 239         struct uhci_td *td;
 240
 241         list_for_each_entry(td, &urbp->td_list, list)
 242                 uhci_remove_td_from_frame_list(uhci, td);
 243 }
 244
 245 static struct uhci_qh *uhci_alloc_qh(struct uhci_hcd *uhci,
 246                 struct usb_device *udev, struct usb_host_endpoint *hep)
 247 {
 248         dma_addr_t dma_handle;
 249         struct uhci_qh *qh;
 250
 251         qh = dma_pool_zalloc(uhci->qh_pool, GFP_ATOMIC, &dma_handle);
 252         if (!qh)
 253                 return NULL;
 254
 255         qh->dma_handle = dma_handle;
 256
 257         qh->element = UHCI_PTR_TERM(uhci);
 258         qh->link = UHCI_PTR_TERM(uhci);
 259
 260         INIT_LIST_HEAD(&qh->queue);
 261         INIT_LIST_HEAD(&qh->node);
 262
 263         if (udev) {             /* Normal QH */
 264                 qh->type = usb_endpoint_type(&hep->desc);
 265                 if (qh->type != USB_ENDPOINT_XFER_ISOC) {
 266                         qh->dummy_td = uhci_alloc_td(uhci);
 267                         if (!qh->dummy_td) {
 268                                 dma_pool_free(uhci->qh_pool, qh, dma_handle);
 269                                 return NULL;
 270                         }
 271                 }
 272                 qh->state = QH_STATE_IDLE;
 273                 qh->hep = hep;
 274                 qh->udev = udev;
 275                 hep->hcpriv = qh;
 276
 277                 if (qh->type == USB_ENDPOINT_XFER_INT ||
 278                                 qh->type == USB_ENDPOINT_XFER_ISOC)
 279                         qh->load = usb_calc_bus_time(udev->speed,
 280                                         usb_endpoint_dir_in(&hep->desc),
 281                                         qh->type == USB_ENDPOINT_XFER_ISOC,
 282                                         usb_endpoint_maxp(&hep->desc))
 283                                 / 1000 + 1;
 284
 285         } else {                /* Skeleton QH */
 286                 qh->state = QH_STATE_ACTIVE;
 287                 qh->type = -1;
 288         }
 289         return qh;
 290 }
 291
 292 static void uhci_free_qh(struct uhci_hcd *uhci, struct uhci_qh *qh)
 293 {
 294         WARN_ON(qh->state != QH_STATE_IDLE && qh->udev);
 295         if (!list_empty(&qh->queue))
 296                 dev_WARN(uhci_dev(uhci), "qh %p list not empty!\n", qh);
 297
 298         list_del(&qh->node);
 299         if (qh->udev) {
 300                 qh->hep->hcpriv = NULL;
 301                 if (qh->dummy_td)
 302                         uhci_free_td(uhci, qh->dummy_td);
 303         }
 304         dma_pool_free(uhci->qh_pool, qh, qh->dma_handle);
 305 }
 306
 307 /*
 308  * When a queue is stopped and a dequeued URB is given back, adjust
 309  * the previous TD link (if the URB isn't first on the queue) or
 310  * save its toggle value (if it is first and is currently executing).
 311  *
 312  * Returns 0 if the URB should not yet be given back, 1 otherwise.
 313  */
 314 static int uhci_cleanup_queue(struct uhci_hcd *uhci, struct uhci_qh *qh,
 315                 struct urb *urb)
 316 {
 317         struct urb_priv *urbp = urb->hcpriv;
 318         struct uhci_td *td;
 319         int ret = 1;
 320
 321         /* Isochronous pipes don't use toggles and their TD link pointers
 322          * get adjusted during uhci_urb_dequeue().  But since their queues
 323          * cannot truly be stopped, we have to watch out for dequeues
 324          * occurring after the nominal unlink frame. */
 325         if (qh->type == USB_ENDPOINT_XFER_ISOC) {
 326                 ret = (uhci->frame_number + uhci->is_stopped !=
 327                                 qh->unlink_frame);
 328                 goto done;
 329         }
 330
 331         /* If the URB isn't first on its queue, adjust the link pointer
 332          * of the last TD in the previous URB.  The toggle doesn't need
 333          * to be saved since this URB can't be executing yet. */
 334         if (qh->queue.next != &urbp->node) {
 335                 struct urb_priv *purbp;
 336                 struct uhci_td *ptd;
 337
 338                 purbp = list_entry(urbp->node.prev, struct urb_priv, node);
 339                 WARN_ON(list_empty(&purbp->td_list));
 340                 ptd = list_entry(purbp->td_list.prev, struct uhci_td,
 341                                 list);
 342                 td = list_entry(urbp->td_list.prev, struct uhci_td,
 343                                 list);
 344                 ptd->link = td->link;
 345                 goto done;
 346         }
 347
 348         /* If the QH element pointer is UHCI_PTR_TERM then then currently
 349          * executing URB has already been unlinked, so this one isn't it. */
 350         if (qh_element(qh) == UHCI_PTR_TERM(uhci))
 351                 goto done;
 352         qh->element = UHCI_PTR_TERM(uhci);
 353
 354         /* Control pipes don't have to worry about toggles */
 355         if (qh->type == USB_ENDPOINT_XFER_CONTROL)
 356                 goto done;
 357
 358         /* Save the next toggle value */
 359         WARN_ON(list_empty(&urbp->td_list));
 360         td = list_entry(urbp->td_list.next, struct uhci_td, list);
 361         qh->needs_fixup = 1;
 362         qh->initial_toggle = uhci_toggle(td_token(uhci, td));
 363
 364 done:
 365         return ret;
 366 }
 367
 368 /*
 369  * Fix up the data toggles for URBs in a queue, when one of them
 370  * terminates early (short transfer, error, or dequeued).
 371  */
 372 static void uhci_fixup_toggles(struct uhci_hcd *uhci, struct uhci_qh *qh,
 373                         int skip_first)
 374 {
 375         struct urb_priv *urbp = NULL;
 376         struct uhci_td *td;
 377         unsigned int toggle = qh->initial_toggle;
 378         unsigned int pipe;
 379
 380         /* Fixups for a short transfer start with the second URB in the
 381          * queue (the short URB is the first). */
 382         if (skip_first)
 383                 urbp = list_entry(qh->queue.next, struct urb_priv, node);
 384
 385         /* When starting with the first URB, if the QH element pointer is
 386          * still valid then we know the URB's toggles are okay. */
 387         else if (qh_element(qh) != UHCI_PTR_TERM(uhci))
 388                 toggle = 2;
 389
 390         /* Fix up the toggle for the URBs in the queue.  Normally this
 391          * loop won't run more than once: When an error or short transfer
 392          * occurs, the queue usually gets emptied. */
 393         urbp = list_prepare_entry(urbp, &qh->queue, node);
 394         list_for_each_entry_continue(urbp, &qh->queue, node) {
 395
 396                 /* If the first TD has the right toggle value, we don't
 397                  * need to change any toggles in this URB */
 398                 td = list_entry(urbp->td_list.next, struct uhci_td, list);
 399                 if (toggle > 1 || uhci_toggle(td_token(uhci, td)) == toggle) {
 400                         td = list_entry(urbp->td_list.prev, struct uhci_td,
 401                                         list);
 402                         toggle = uhci_toggle(td_token(uhci, td)) ^ 1;
 403
 404                 /* Otherwise all the toggles in the URB have to be switched */
 405                 } else {
 406                         list_for_each_entry(td, &urbp->td_list, list) {
 407                                 td->token ^= cpu_to_hc32(uhci,
 408                                                         TD_TOKEN_TOGGLE);
 409                                 toggle ^= 1;
 410                         }
 411                 }
 412         }
 413
 414         wmb();
 415         pipe = list_entry(qh->queue.next, struct urb_priv, node)->urb->pipe;
 416         usb_settoggle(qh->udev, usb_pipeendpoint(pipe),
 417                         usb_pipeout(pipe), toggle);
 418         qh->needs_fixup = 0;
 419 }
 420
 421 /*
 422  * Link an Isochronous QH into its skeleton's list
 423  */
 424 static inline void link_iso(struct uhci_hcd *uhci, struct uhci_qh *qh)
 425 {
 426         list_add_tail(&qh->node, &uhci->skel_iso_qh->node);
 427
 428         /* Isochronous QHs aren't linked by the hardware */
 429 }
 430
 431 /*
 432  * Link a high-period interrupt QH into the schedule at the end of its
 433  * skeleton's list
 434  */
 435 static void link_interrupt(struct uhci_hcd *uhci, struct uhci_qh *qh)
 436 {
 437         struct uhci_qh *pqh;
 438
 439         list_add_tail(&qh->node, &uhci->skelqh[qh->skel]->node);
 440
 441         pqh = list_entry(qh->node.prev, struct uhci_qh, node);
 442         qh->link = pqh->link;
 443         wmb();
 444         pqh->link = LINK_TO_QH(uhci, qh);
 445 }
 446
 447 /*
 448  * Link a period-1 interrupt or async QH into the schedule at the
 449  * correct spot in the async skeleton's list, and update the FSBR link
 450  */
 451 static void link_async(struct uhci_hcd *uhci, struct uhci_qh *qh)
 452 {
 453         struct uhci_qh *pqh;
 454         __hc32 link_to_new_qh;
 455
 456         /* Find the predecessor QH for our new one and insert it in the list.
 457          * The list of QHs is expected to be short, so linear search won't
 458          * take too long. */
 459         list_for_each_entry_reverse(pqh, &uhci->skel_async_qh->node, node) {
 460                 if (pqh->skel <= qh->skel)
 461                         break;
 462         }
 463         list_add(&qh->node, &pqh->node);
 464
 465         /* Link it into the schedule */
 466         qh->link = pqh->link;
 467         wmb();
 468         link_to_new_qh = LINK_TO_QH(uhci, qh);
 469         pqh->link = link_to_new_qh;
 470
 471         /* If this is now the first FSBR QH, link the terminating skeleton
 472          * QH to it. */
 473         if (pqh->skel < SKEL_FSBR && qh->skel >= SKEL_FSBR)
 474                 uhci->skel_term_qh->link = link_to_new_qh;
 475 }
 476
 477 /*
 478  * Put a QH on the schedule in both hardware and software
 479  */
 480 static void uhci_activate_qh(struct uhci_hcd *uhci, struct uhci_qh *qh)
 481 {
 482         WARN_ON(list_empty(&qh->queue));
 483
 484         /* Set the element pointer if it isn't set already.
 485          * This isn't needed for Isochronous queues, but it doesn't hurt. */
 486         if (qh_element(qh) == UHCI_PTR_TERM(uhci)) {
 487                 struct urb_priv *urbp = list_entry(qh->queue.next,
 488                                 struct urb_priv, node);
 489                 struct uhci_td *td = list_entry(urbp->td_list.next,
 490                                 struct uhci_td, list);
 491
 492                 qh->element = LINK_TO_TD(uhci, td);
 493         }
 494
 495         /* Treat the queue as if it has just advanced */
 496         qh->wait_expired = 0;
 497         qh->advance_jiffies = jiffies;
 498
 499         if (qh->state == QH_STATE_ACTIVE)
 500                 return;
 501         qh->state = QH_STATE_ACTIVE;
 502
 503         /* Move the QH from its old list to the correct spot in the appropriate
 504          * skeleton's list */
 505         if (qh == uhci->next_qh)
 506                 uhci->next_qh = list_entry(qh->node.next, struct uhci_qh,
 507                                 node);
 508         list_del(&qh->node);
 509
 510         if (qh->skel == SKEL_ISO)
 511                 link_iso(uhci, qh);
 512         else if (qh->skel < SKEL_ASYNC)
 513                 link_interrupt(uhci, qh);
 514         else
 515                 link_async(uhci, qh);
 516 }
 517
 518 /*
 519  * Unlink a high-period interrupt QH from the schedule
 520  */
 521 static void unlink_interrupt(struct uhci_hcd *uhci, struct uhci_qh *qh)
 522 {
 523         struct uhci_qh *pqh;
 524
 525         pqh = list_entry(qh->node.prev, struct uhci_qh, node);
 526         pqh->link = qh->link;
 527         mb();
 528 }
 529
 530 /*
 531  * Unlink a period-1 interrupt or async QH from the schedule
 532  */
 533 static void unlink_async(struct uhci_hcd *uhci, struct uhci_qh *qh)
 534 {
 535         struct uhci_qh *pqh;
 536         __hc32 link_to_next_qh = qh->link;
 537
 538         pqh = list_entry(qh->node.prev, struct uhci_qh, node);
 539         pqh->link = link_to_next_qh;
 540
 541         /* If this was the old first FSBR QH, link the terminating skeleton
 542          * QH to the next (new first FSBR) QH. */
 543         if (pqh->skel < SKEL_FSBR && qh->skel >= SKEL_FSBR)
 544                 uhci->skel_term_qh->link = link_to_next_qh;
 545         mb();
 546 }
 547
 548 /*
 549  * Take a QH off the hardware schedule
 550  */
 551 static void uhci_unlink_qh(struct uhci_hcd *uhci, struct uhci_qh *qh)
 552 {
 553         if (qh->state == QH_STATE_UNLINKING)
 554                 return;
 555         WARN_ON(qh->state != QH_STATE_ACTIVE || !qh->udev);
 556         qh->state = QH_STATE_UNLINKING;
 557
 558         /* Unlink the QH from the schedule and record when we did it */
 559         if (qh->skel == SKEL_ISO)
 560                 ;
 561         else if (qh->skel < SKEL_ASYNC)
 562                 unlink_interrupt(uhci, qh);
 563         else
 564                 unlink_async(uhci, qh);
 565
 566         uhci_get_current_frame_number(uhci);
 567         qh->unlink_frame = uhci->frame_number;
 568
 569         /* Force an interrupt so we know when the QH is fully unlinked */
 570         if (list_empty(&uhci->skel_unlink_qh->node) || uhci->is_stopped)
 571                 uhci_set_next_interrupt(uhci);
 572
 573         /* Move the QH from its old list to the end of the unlinking list */
 574         if (qh == uhci->next_qh)
 575                 uhci->next_qh = list_entry(qh->node.next, struct uhci_qh,
 576                                 node);
 577         list_move_tail(&qh->node, &uhci->skel_unlink_qh->node);
 578 }
 579
 580 /*
 581  * When we and the controller are through with a QH, it becomes IDLE.
 582  * This happens when a QH has been off the schedule (on the unlinking
 583  * list) for more than one frame, or when an error occurs while adding
 584  * the first URB onto a new QH.
 585  */
 586 static void uhci_make_qh_idle(struct uhci_hcd *uhci, struct uhci_qh *qh)
 587 {
 588         WARN_ON(qh->state == QH_STATE_ACTIVE);
 589
 590         if (qh == uhci->next_qh)
 591                 uhci->next_qh = list_entry(qh->node.next, struct uhci_qh,
 592                                 node);
 593         list_move(&qh->node, &uhci->idle_qh_list);
 594         qh->state = QH_STATE_IDLE;
 595
 596         /* Now that the QH is idle, its post_td isn't being used */
 597         if (qh->post_td) {
 598                 uhci_free_td(uhci, qh->post_td);
 599                 qh->post_td = NULL;
 600         }
 601
 602         /* If anyone is waiting for a QH to become idle, wake them up */
 603         if (uhci->num_waiting)
 604                 wake_up_all(&uhci->waitqh);
 605 }
 606
 607 /*
 608  * Find the highest existing bandwidth load for a given phase and period.
 609  */
 610 static int uhci_highest_load(struct uhci_hcd *uhci, int phase, int period)
 611 {
 612         int highest_load = uhci->load[phase];
 613
 614         for (phase += period; phase < MAX_PHASE; phase += period)
 615                 highest_load = max_t(int, highest_load, uhci->load[phase]);
 616         return highest_load;
 617 }
 618
 619 /*
 620  * Set qh->phase to the optimal phase for a periodic transfer and
 621  * check whether the bandwidth requirement is acceptable.
 622  */
 623 static int uhci_check_bandwidth(struct uhci_hcd *uhci, struct uhci_qh *qh)
 624 {
 625         int minimax_load;
 626
 627         /* Find the optimal phase (unless it is already set) and get
 628          * its load value. */
 629         if (qh->phase >= 0)
 630                 minimax_load = uhci_highest_load(uhci, qh->phase, qh->period);
 631         else {
 632                 int phase, load;
 633                 int max_phase = min_t(int, MAX_PHASE, qh->period);
 634
 635                 qh->phase = 0;
 636                 minimax_load = uhci_highest_load(uhci, qh->phase, qh->period);
 637                 for (phase = 1; phase < max_phase; ++phase) {
 638                         load = uhci_highest_load(uhci, phase, qh->period);
 639                         if (load < minimax_load) {
 640                                 minimax_load = load;
 641                                 qh->phase = phase;
 642                         }
 643                 }
 644         }
 645
 646         /* Maximum allowable periodic bandwidth is 90%, or 900 us per frame */
 647         if (minimax_load + qh->load > 900) {
 648                 dev_dbg(uhci_dev(uhci), "bandwidth allocation failed: "
 649                                 "period %d, phase %d, %d + %d us\n",
 650                                 qh->period, qh->phase, minimax_load, qh->load);
 651                 return -ENOSPC;
 652         }
 653         return 0;
 654 }
 655
 656 /*
 657  * Reserve a periodic QH's bandwidth in the schedule
 658  */
 659 static void uhci_reserve_bandwidth(struct uhci_hcd *uhci, struct uhci_qh *qh)
 660 {
 661         int i;
 662         int load = qh->load;
 663         char *p = "??";
 664
 665         for (i = qh->phase; i < MAX_PHASE; i += qh->period) {
 666                 uhci->load[i] += load;
 667                 uhci->total_load += load;
 668         }
 669         uhci_to_hcd(uhci)->self.bandwidth_allocated =
 670                         uhci->total_load / MAX_PHASE;
 671         switch (qh->type) {
 672         case USB_ENDPOINT_XFER_INT:
 673                 ++uhci_to_hcd(uhci)->self.bandwidth_int_reqs;
 674                 p = "INT";
 675                 break;
 676         case USB_ENDPOINT_XFER_ISOC:
 677                 ++uhci_to_hcd(uhci)->self.bandwidth_isoc_reqs;
 678                 p = "ISO";
 679                 break;
 680         }
 681         qh->bandwidth_reserved = 1;
 682         dev_dbg(uhci_dev(uhci),
 683                         "%s dev %d ep%02x-%s, period %d, phase %d, %d us\n",
 684                         "reserve", qh->udev->devnum,
 685                         qh->hep->desc.bEndpointAddress, p,
 686                         qh->period, qh->phase, load);
 687 }
 688
 689 /*
 690  * Release a periodic QH's bandwidth reservation
 691  */
 692 static void uhci_release_bandwidth(struct uhci_hcd *uhci, struct uhci_qh *qh)
 693 {
 694         int i;
 695         int load = qh->load;
 696         char *p = "??";
 697
 698         for (i = qh->phase; i < MAX_PHASE; i += qh->period) {
 699                 uhci->load[i] -= load;
 700                 uhci->total_load -= load;
 701         }
 702         uhci_to_hcd(uhci)->self.bandwidth_allocated =
 703                         uhci->total_load / MAX_PHASE;
 704         switch (qh->type) {
 705         case USB_ENDPOINT_XFER_INT:
 706                 --uhci_to_hcd(uhci)->self.bandwidth_int_reqs;
 707                 p = "INT";
 708                 break;
 709         case USB_ENDPOINT_XFER_ISOC:
 710                 --uhci_to_hcd(uhci)->self.bandwidth_isoc_reqs;
 711                 p = "ISO";
 712                 break;
 713         }
 714         qh->bandwidth_reserved = 0;
 715         dev_dbg(uhci_dev(uhci),
 716                         "%s dev %d ep%02x-%s, period %d, phase %d, %d us\n",
 717                         "release", qh->udev->devnum,
 718                         qh->hep->desc.bEndpointAddress, p,
 719                         qh->period, qh->phase, load);
 720 }
 721
 722 static inline struct urb_priv *uhci_alloc_urb_priv(struct uhci_hcd *uhci,
 723                 struct urb *urb)
 724 {
 725         struct urb_priv *urbp;
 726
 727         urbp = kmem_cache_zalloc(uhci_up_cachep, GFP_ATOMIC);
 728         if (!urbp)
 729                 return NULL;
 730
 731         urbp->urb = urb;
 732         urb->hcpriv = urbp;
 733
 734         INIT_LIST_HEAD(&urbp->node);
 735         INIT_LIST_HEAD(&urbp->td_list);
 736
 737         return urbp;
 738 }
 739
 740 static void uhci_free_urb_priv(struct uhci_hcd *uhci,
 741                 struct urb_priv *urbp)
 742 {
 743         struct uhci_td *td, *tmp;
 744
 745         if (!list_empty(&urbp->node))
 746                 dev_WARN(uhci_dev(uhci), "urb %p still on QH's list!\n",
 747                                 urbp->urb);
 748
 749         list_for_each_entry_safe(td, tmp, &urbp->td_list, list) {
 750                 uhci_remove_td_from_urbp(td);
 751                 uhci_free_td(uhci, td);
 752         }
 753
 754         kmem_cache_free(uhci_up_cachep, urbp);
 755 }
 756
 757 /*
 758  * Map status to standard result codes
 759  *
 760  * <status> is (td_status(uhci, td) & 0xF60000), a.k.a.
 761  * uhci_status_bits(td_status(uhci, td)).
 762  * Note: <status> does not include the TD_CTRL_NAK bit.
 763  * <dir_out> is True for output TDs and False for input TDs.
 764  */
 765 static int uhci_map_status(int status, int dir_out)
 766 {
 767         if (!status)
 768                 return 0;
 769         if (status & TD_CTRL_BITSTUFF)                  /* Bitstuff error */
 770                 return -EPROTO;
 771         if (status & TD_CTRL_CRCTIMEO) {                /* CRC/Timeout */
 772                 if (dir_out)
 773                         return -EPROTO;
 774                 else
 775                         return -EILSEQ;
 776         }
 777         if (status & TD_CTRL_BABBLE)                    /* Babble */
 778                 return -EOVERFLOW;
 779         if (status & TD_CTRL_DBUFERR)                   /* Buffer error */
 780                 return -ENOSR;
 781         if (status & TD_CTRL_STALLED)                   /* Stalled */
 782                 return -EPIPE;
 783         return 0;
 784 }
 785
 786 /*
 787  * Control transfers
 788  */
 789 static int uhci_submit_control(struct uhci_hcd *uhci, struct urb *urb,
 790                 struct uhci_qh *qh)
 791 {
 792         struct uhci_td *td;
 793         unsigned long destination, status;
 794         int maxsze = usb_endpoint_maxp(&qh->hep->desc);
 795         int len = urb->transfer_buffer_length;
 796         dma_addr_t data = urb->transfer_dma;
 797         __hc32 *plink;
 798         struct urb_priv *urbp = urb->hcpriv;
 799         int skel;
 800
 801         /* The "pipe" thing contains the destination in bits 8--18 */
 802         destination = (urb->pipe & PIPE_DEVEP_MASK) | USB_PID_SETUP;
 803
 804         /* 3 errors, dummy TD remains inactive */
 805         status = uhci_maxerr(3);
 806         if (urb->dev->speed == USB_SPEED_LOW)
 807                 status |= TD_CTRL_LS;
 808
 809         /*
 810          * Build the TD for the control request setup packet
 811          */
 812         td = qh->dummy_td;
 813         uhci_add_td_to_urbp(td, urbp);
 814         uhci_fill_td(uhci, td, status, destination | uhci_explen(8),
 815                         urb->setup_dma);
 816         plink = &td->link;
 817         status |= TD_CTRL_ACTIVE;
 818
 819         /*
 820          * If direction is "send", change the packet ID from SETUP (0x2D)
 821          * to OUT (0xE1).  Else change it from SETUP to IN (0x69) and
 822          * set Short Packet Detect (SPD) for all data packets.
 823          *
 824          * 0-length transfers always get treated as "send".
 825          */
 826         if (usb_pipeout(urb->pipe) || len == 0)
 827                 destination ^= (USB_PID_SETUP ^ USB_PID_OUT);
 828         else {
 829                 destination ^= (USB_PID_SETUP ^ USB_PID_IN);
 830                 status |= TD_CTRL_SPD;
 831         }
 832
 833         /*
 834          * Build the DATA TDs
 835          */
 836         while (len > 0) {
 837                 int pktsze = maxsze;
 838
 839                 if (len <= pktsze) {            /* The last data packet */
 840                         pktsze = len;
 841                         status &= ~TD_CTRL_SPD;
 842                 }
 843
 844                 td = uhci_alloc_td(uhci);
 845                 if (!td)
 846                         goto nomem;
 847                 *plink = LINK_TO_TD(uhci, td);
 848
 849                 /* Alternate Data0/1 (start with Data1) */
 850                 destination ^= TD_TOKEN_TOGGLE;
 851
 852                 uhci_add_td_to_urbp(td, urbp);
 853                 uhci_fill_td(uhci, td, status,
 854                         destination | uhci_explen(pktsze), data);
 855                 plink = &td->link;
 856
 857                 data += pktsze;
 858                 len -= pktsze;
 859         }
 860
 861         /*
 862          * Build the final TD for control status
 863          */
 864         td = uhci_alloc_td(uhci);
 865         if (!td)
 866                 goto nomem;
 867         *plink = LINK_TO_TD(uhci, td);
 868
 869         /* Change direction for the status transaction */
 870         destination ^= (USB_PID_IN ^ USB_PID_OUT);
 871         destination |= TD_TOKEN_TOGGLE;         /* End in Data1 */
 872
 873         uhci_add_td_to_urbp(td, urbp);
 874         uhci_fill_td(uhci, td, status | TD_CTRL_IOC,
 875                         destination | uhci_explen(0), 0);
 876         plink = &td->link;
 877
 878         /*
 879          * Build the new dummy TD and activate the old one
 880          */
 881         td = uhci_alloc_td(uhci);
 882         if (!td)
 883                 goto nomem;
 884         *plink = LINK_TO_TD(uhci, td);
 885
 886         uhci_fill_td(uhci, td, 0, USB_PID_OUT | uhci_explen(0), 0);
 887         wmb();
 888         qh->dummy_td->status |= cpu_to_hc32(uhci, TD_CTRL_ACTIVE);
 889         qh->dummy_td = td;
 890
 891         /* Low-speed transfers get a different queue, and won't hog the bus.
 892          * Also, some devices enumerate better without FSBR; the easiest way
 893          * to do that is to put URBs on the low-speed queue while the device
 894          * isn't in the CONFIGURED state. */
 895         if (urb->dev->speed == USB_SPEED_LOW ||
 896                         urb->dev->state != USB_STATE_CONFIGURED)
 897                 skel = SKEL_LS_CONTROL;
 898         else {
 899                 skel = SKEL_FS_CONTROL;
 900                 uhci_add_fsbr(uhci, urb);
 901         }
 902         if (qh->state != QH_STATE_ACTIVE)
 903                 qh->skel = skel;
 904         return 0;
 905
 906 nomem:
 907         /* Remove the dummy TD from the td_list so it doesn't get freed */
 908         uhci_remove_td_from_urbp(qh->dummy_td);
 909         return -ENOMEM;
 910 }
 911
 912 /*
 913  * Common submit for bulk and interrupt
 914  */
 915 static int uhci_submit_common(struct uhci_hcd *uhci, struct urb *urb,
 916                 struct uhci_qh *qh)
 917 {
 918         struct uhci_td *td;
 919         unsigned long destination, status;
 920         int maxsze = usb_endpoint_maxp(&qh->hep->desc);
 921         int len = urb->transfer_buffer_length;
 922         int this_sg_len;
 923         dma_addr_t data;
 924         __hc32 *plink;
 925         struct urb_priv *urbp = urb->hcpriv;
 926         unsigned int toggle;
 927         struct scatterlist  *sg;
 928         int i;
 929
 930         if (len < 0)
 931                 return -EINVAL;
 932
 933         /* The "pipe" thing contains the destination in bits 8--18 */
 934         destination = (urb->pipe & PIPE_DEVEP_MASK) | usb_packetid(urb->pipe);
 935         toggle = usb_gettoggle(urb->dev, usb_pipeendpoint(urb->pipe),
 936                          usb_pipeout(urb->pipe));
 937
 938         /* 3 errors, dummy TD remains inactive */
 939         status = uhci_maxerr(3);
 940         if (urb->dev->speed == USB_SPEED_LOW)
 941                 status |= TD_CTRL_LS;
 942         if (usb_pipein(urb->pipe))
 943                 status |= TD_CTRL_SPD;
 944
 945         i = urb->num_mapped_sgs;
 946         if (len > 0 && i > 0) {
 947                 sg = urb->sg;
 948                 data = sg_dma_address(sg);
 949
 950                 /* urb->transfer_buffer_length may be smaller than the
 951                  * size of the scatterlist (or vice versa)
 952                  */
 953                 this_sg_len = min_t(int, sg_dma_len(sg), len);
 954         } else {
 955                 sg = NULL;
 956                 data = urb->transfer_dma;
 957                 this_sg_len = len;
 958         }
 959         /*
 960          * Build the DATA TDs
 961          */
 962         plink = NULL;
 963         td = qh->dummy_td;
 964         for (;;) {      /* Allow zero length packets */
 965                 int pktsze = maxsze;
 966
 967                 if (len <= pktsze) {            /* The last packet */
 968                         pktsze = len;
 969                         if (!(urb->transfer_flags & URB_SHORT_NOT_OK))
 970                                 status &= ~TD_CTRL_SPD;
 971                 }
 972
 973                 if (plink) {
 974                         td = uhci_alloc_td(uhci);
 975                         if (!td)
 976                                 goto nomem;
 977                         *plink = LINK_TO_TD(uhci, td);
 978                 }
 979                 uhci_add_td_to_urbp(td, urbp);
 980                 uhci_fill_td(uhci, td, status,
 981                                 destination | uhci_explen(pktsze) |
 982                                         (toggle << TD_TOKEN_TOGGLE_SHIFT),
 983                                 data);
 984                 plink = &td->link;
 985                 status |= TD_CTRL_ACTIVE;
 986
 987                 toggle ^= 1;
 988                 data += pktsze;
 989                 this_sg_len -= pktsze;
 990                 len -= maxsze;
 991                 if (this_sg_len <= 0) {
 992                         if (--i <= 0 || len <= 0)
 993                                 break;
 994                         sg = sg_next(sg);
 995                         data = sg_dma_address(sg);
 996                         this_sg_len = min_t(int, sg_dma_len(sg), len);
 997                 }
 998         }
 999
1000         /*
1001          * URB_ZERO_PACKET means adding a 0-length packet, if direction
1002          * is OUT and the transfer_length was an exact multiple of maxsze,
1003          * hence (len = transfer_length - N * maxsze) == 0
1004          * however, if transfer_length == 0, the zero packet was already
1005          * prepared above.
1006          */
1007         if ((urb->transfer_flags & URB_ZERO_PACKET) &&
1008                         usb_pipeout(urb->pipe) && len == 0 &&
1009                         urb->transfer_buffer_length > 0) {
1010                 td = uhci_alloc_td(uhci);
1011                 if (!td)
1012                         goto nomem;
1013                 *plink = LINK_TO_TD(uhci, td);
1014
1015                 uhci_add_td_to_urbp(td, urbp);
1016                 uhci_fill_td(uhci, td, status,
1017                                 destination | uhci_explen(0) |
1018                                         (toggle << TD_TOKEN_TOGGLE_SHIFT),
1019                                 data);
1020                 plink = &td->link;
1021
1022                 toggle ^= 1;
1023         }
1024
1025         /* Set the interrupt-on-completion flag on the last packet.
1026          * A more-or-less typical 4 KB URB (= size of one memory page)
1027          * will require about 3 ms to transfer; that's a little on the
1028          * fast side but not enough to justify delaying an interrupt
1029          * more than 2 or 3 URBs, so we will ignore the URB_NO_INTERRUPT
1030          * flag setting. */
1031         td->status |= cpu_to_hc32(uhci, TD_CTRL_IOC);
1032
1033         /*
1034          * Build the new dummy TD and activate the old one
1035          */
1036         td = uhci_alloc_td(uhci);
1037         if (!td)
1038                 goto nomem;
1039         *plink = LINK_TO_TD(uhci, td);
1040
1041         uhci_fill_td(uhci, td, 0, USB_PID_OUT | uhci_explen(0), 0);
1042         wmb();
1043         qh->dummy_td->status |= cpu_to_hc32(uhci, TD_CTRL_ACTIVE);
1044         qh->dummy_td = td;
1045
1046         usb_settoggle(urb->dev, usb_pipeendpoint(urb->pipe),
1047                         usb_pipeout(urb->pipe), toggle);
1048         return 0;
1049
1050 nomem:
1051         /* Remove the dummy TD from the td_list so it doesn't get freed */
1052         uhci_remove_td_from_urbp(qh->dummy_td);
1053         return -ENOMEM;
1054 }
1055
1056 static int uhci_submit_bulk(struct uhci_hcd *uhci, struct urb *urb,
1057                 struct uhci_qh *qh)
1058 {
1059         int ret;
1060
1061         /* Can't have low-speed bulk transfers */
1062         if (urb->dev->speed == USB_SPEED_LOW)
1063                 return -EINVAL;
1064
1065         if (qh->state != QH_STATE_ACTIVE)
1066                 qh->skel = SKEL_BULK;
1067         ret = uhci_submit_common(uhci, urb, qh);
1068         if (ret == 0)
1069                 uhci_add_fsbr(uhci, urb);
1070         return ret;
1071 }
1072
1073 static int uhci_submit_interrupt(struct uhci_hcd *uhci, struct urb *urb,
1074                 struct uhci_qh *qh)
1075 {
1076         int ret;
1077
1078         /* USB 1.1 interrupt transfers only involve one packet per interval.
1079          * Drivers can submit URBs of any length, but longer ones will need
1080          * multiple intervals to complete.
1081          */
1082
1083         if (!qh->bandwidth_reserved) {
1084                 int exponent;
1085
1086                 /* Figure out which power-of-two queue to use */
1087                 for (exponent = 7; exponent >= 0; --exponent) {
1088                         if ((1 << exponent) <= urb->interval)
1089                                 break;
1090                 }
1091                 if (exponent < 0)
1092                         return -EINVAL;
1093
1094                 /* If the slot is full, try a lower period */
1095                 do {
1096                         qh->period = 1 << exponent;
1097                         qh->skel = SKEL_INDEX(exponent);
1098
1099                         /* For now, interrupt phase is fixed by the layout
1100                          * of the QH lists.
1101                          */
1102                         qh->phase = (qh->period / 2) & (MAX_PHASE - 1);
1103                         ret = uhci_check_bandwidth(uhci, qh);
1104                 } while (ret != 0 && --exponent >= 0);
1105                 if (ret)
1106                         return ret;
1107         } else if (qh->period > urb->interval)
1108                 return -EINVAL;         /* Can't decrease the period */
1109
1110         ret = uhci_submit_common(uhci, urb, qh);
1111         if (ret == 0) {
1112                 urb->interval = qh->period;
1113                 if (!qh->bandwidth_reserved)
1114                         uhci_reserve_bandwidth(uhci, qh);
1115         }
1116         return ret;
1117 }
1118
1119 /*
1120  * Fix up the data structures following a short transfer
1121  */
1122 static int uhci_fixup_short_transfer(struct uhci_hcd *uhci,
1123                 struct uhci_qh *qh, struct urb_priv *urbp)
1124 {
1125         struct uhci_td *td;
1126         struct list_head *tmp;
1127         int ret;
1128
1129         td = list_entry(urbp->td_list.prev, struct uhci_td, list);
1130         if (qh->type == USB_ENDPOINT_XFER_CONTROL) {
1131
1132                 /* When a control transfer is short, we have to restart
1133                  * the queue at the status stage transaction, which is
1134                  * the last TD. */
1135                 WARN_ON(list_empty(&urbp->td_list));
1136                 qh->element = LINK_TO_TD(uhci, td);
1137                 tmp = td->list.prev;
1138                 ret = -EINPROGRESS;
1139
1140         } else {
1141
1142                 /* When a bulk/interrupt transfer is short, we have to
1143                  * fix up the toggles of the following URBs on the queue
1144                  * before restarting the queue at the next URB. */
1145                 qh->initial_toggle =
1146                         uhci_toggle(td_token(uhci, qh->post_td)) ^ 1;
1147                 uhci_fixup_toggles(uhci, qh, 1);
1148
1149                 if (list_empty(&urbp->td_list))
1150                         td = qh->post_td;
1151                 qh->element = td->link;
1152                 tmp = urbp->td_list.prev;
1153                 ret = 0;
1154         }
1155
1156         /* Remove all the TDs we skipped over, from tmp back to the start */
1157         while (tmp != &urbp->td_list) {
1158                 td = list_entry(tmp, struct uhci_td, list);
1159                 tmp = tmp->prev;
1160
1161                 uhci_remove_td_from_urbp(td);
1162                 uhci_free_td(uhci, td);
1163         }
1164         return ret;
1165 }
1166
1167 /*
1168  * Common result for control, bulk, and interrupt
1169  */
1170 static int uhci_result_common(struct uhci_hcd *uhci, struct urb *urb)
1171 {
1172         struct urb_priv *urbp = urb->hcpriv;
1173         struct uhci_qh *qh = urbp->qh;
1174         struct uhci_td *td, *tmp;
1175         unsigned status;
1176         int ret = 0;
1177
1178         list_for_each_entry_safe(td, tmp, &urbp->td_list, list) {
1179                 unsigned int ctrlstat;
1180                 int len;
1181
1182                 ctrlstat = td_status(uhci, td);
1183                 status = uhci_status_bits(ctrlstat);
1184                 if (status & TD_CTRL_ACTIVE)
1185                         return -EINPROGRESS;
1186
1187                 len = uhci_actual_length(ctrlstat);
1188                 urb->actual_length += len;
1189
1190                 if (status) {
1191                         ret = uhci_map_status(status,
1192                                         uhci_packetout(td_token(uhci, td)));
1193                         if ((debug == 1 && ret != -EPIPE) || debug > 1) {
1194                                 /* Some debugging code */
1195                                 dev_dbg(&urb->dev->dev,
1196                                                 "%s: failed with status %x\n",
1197                                                 __func__, status);
1198
1199                                 if (debug > 1 && errbuf) {
1200                                         /* Print the chain for debugging */
1201                                         uhci_show_qh(uhci, urbp->qh, errbuf,
1202                                                 ERRBUF_LEN - EXTRA_SPACE, 0);
1203                                         lprintk(errbuf);
1204                                 }
1205                         }
1206
1207                 /* Did we receive a short packet? */
1208                 } else if (len < uhci_expected_length(td_token(uhci, td))) {
1209
1210                         /* For control transfers, go to the status TD if
1211                          * this isn't already the last data TD */
1212                         if (qh->type == USB_ENDPOINT_XFER_CONTROL) {
1213                                 if (td->list.next != urbp->td_list.prev)
1214                                         ret = 1;
1215                         }
1216
1217                         /* For bulk and interrupt, this may be an error */
1218                         else if (urb->transfer_flags & URB_SHORT_NOT_OK)
1219                                 ret = -EREMOTEIO;
1220
1221                         /* Fixup needed only if this isn't the URB's last TD */
1222                         else if (&td->list != urbp->td_list.prev)
1223                                 ret = 1;
1224                 }
1225
1226                 uhci_remove_td_from_urbp(td);
1227                 if (qh->post_td)
1228                         uhci_free_td(uhci, qh->post_td);
1229                 qh->post_td = td;
1230
1231                 if (ret != 0)
1232                         goto err;
1233         }
1234         return ret;
1235
1236 err:
1237         if (ret < 0) {
1238                 /* Note that the queue has stopped and save
1239                  * the next toggle value */
1240                 qh->element = UHCI_PTR_TERM(uhci);
1241                 qh->is_stopped = 1;
1242                 qh->needs_fixup = (qh->type != USB_ENDPOINT_XFER_CONTROL);
1243                 qh->initial_toggle = uhci_toggle(td_token(uhci, td)) ^
1244                                 (ret == -EREMOTEIO);
1245
1246         } else          /* Short packet received */
1247                 ret = uhci_fixup_short_transfer(uhci, qh, urbp);
1248         return ret;
1249 }
1250
1251 /*
1252  * Isochronous transfers
1253  */
1254 static int uhci_submit_isochronous(struct uhci_hcd *uhci, struct urb *urb,
1255                 struct uhci_qh *qh)
1256 {
1257         struct uhci_td *td = NULL;      /* Since urb->number_of_packets > 0 */
1258         int i;
1259         unsigned frame, next;
1260         unsigned long destination, status;
1261         struct urb_priv *urbp = (struct urb_priv *) urb->hcpriv;
1262
1263         /* Values must not be too big (could overflow below) */
1264         if (urb->interval >= UHCI_NUMFRAMES ||
1265                         urb->number_of_packets >= UHCI_NUMFRAMES)
1266                 return -EFBIG;
1267
1268         uhci_get_current_frame_number(uhci);
1269
1270         /* Check the period and figure out the starting frame number */
1271         if (!qh->bandwidth_reserved) {
1272                 qh->period = urb->interval;
1273                 qh->phase = -1;         /* Find the best phase */
1274                 i = uhci_check_bandwidth(uhci, qh);
1275                 if (i)
1276                         return i;
1277
1278                 /* Allow a little time to allocate the TDs */
1279                 next = uhci->frame_number + 10;
1280                 frame = qh->phase;
1281
1282                 /* Round up to the first available slot */
1283                 frame += (next - frame + qh->period - 1) & -qh->period;
1284
1285         } else if (qh->period != urb->interval) {
1286                 return -EINVAL;         /* Can't change the period */
1287
1288         } else {
1289                 next = uhci->frame_number + 1;
1290
1291                 /* Find the next unused frame */
1292                 if (list_empty(&qh->queue)) {
1293                         frame = qh->iso_frame;
1294                 } else {
1295                         struct urb *lurb;
1296
1297                         lurb = list_entry(qh->queue.prev,
1298                                         struct urb_priv, node)->urb;
1299                         frame = lurb->start_frame +
1300                                         lurb->number_of_packets *
1301                                         lurb->interval;
1302                 }
1303
1304                 /* Fell behind? */
1305                 if (!uhci_frame_before_eq(next, frame)) {
1306
1307                         /* USB_ISO_ASAP: Round up to the first available slot */
1308                         if (urb->transfer_flags & URB_ISO_ASAP)
1309                                 frame += (next - frame + qh->period - 1) &
1310                                                 -qh->period;
1311
1312                         /*
1313                          * Not ASAP: Use the next slot in the stream,
1314                          * no matter what.
1315                          */
1316                         else if (!uhci_frame_before_eq(next,
1317                                         frame + (urb->number_of_packets - 1) *
1318                                                 qh->period))
1319                                 dev_dbg(uhci_dev(uhci), "iso underrun %p (%u+%u < %u)\n",
1320                                                 urb, frame,
1321                                                 (urb->number_of_packets - 1) *
1322                                                         qh->period,
1323                                                 next);
1324                 }
1325         }
1326
1327         /* Make sure we won't have to go too far into the future */
1328         if (uhci_frame_before_eq(uhci->last_iso_frame + UHCI_NUMFRAMES,
1329                         frame + urb->number_of_packets * urb->interval))
1330                 return -EFBIG;
1331         urb->start_frame = frame;
1332
1333         status = TD_CTRL_ACTIVE | TD_CTRL_IOS;
1334         destination = (urb->pipe & PIPE_DEVEP_MASK) | usb_packetid(urb->pipe);
1335
1336         for (i = 0; i < urb->number_of_packets; i++) {
1337                 td = uhci_alloc_td(uhci);
1338                 if (!td)
1339                         return -ENOMEM;
1340
1341                 uhci_add_td_to_urbp(td, urbp);
1342                 uhci_fill_td(uhci, td, status, destination |
1343                                 uhci_explen(urb->iso_frame_desc[i].length),
1344                                 urb->transfer_dma +
1345                                         urb->iso_frame_desc[i].offset);
1346         }
1347
1348         /* Set the interrupt-on-completion flag on the last packet. */
1349         td->status |= cpu_to_hc32(uhci, TD_CTRL_IOC);
1350
1351         /* Add the TDs to the frame list */
1352         frame = urb->start_frame;
1353         list_for_each_entry(td, &urbp->td_list, list) {
1354                 uhci_insert_td_in_frame_list(uhci, td, frame);
1355                 frame += qh->period;
1356         }
1357
1358         if (list_empty(&qh->queue)) {
1359                 qh->iso_packet_desc = &urb->iso_frame_desc[0];
1360                 qh->iso_frame = urb->start_frame;
1361         }
1362
1363         qh->skel = SKEL_ISO;
1364         if (!qh->bandwidth_reserved)
1365                 uhci_reserve_bandwidth(uhci, qh);
1366         return 0;
1367 }
1368
1369 static int uhci_result_isochronous(struct uhci_hcd *uhci, struct urb *urb)
1370 {
1371         struct uhci_td *td, *tmp;
1372         struct urb_priv *urbp = urb->hcpriv;
1373         struct uhci_qh *qh = urbp->qh;
1374
1375         list_for_each_entry_safe(td, tmp, &urbp->td_list, list) {
1376                 unsigned int ctrlstat;
1377                 int status;
1378                 int actlength;
1379
1380                 if (uhci_frame_before_eq(uhci->cur_iso_frame, qh->iso_frame))
1381                         return -EINPROGRESS;
1382
1383                 uhci_remove_tds_from_frame(uhci, qh->iso_frame);
1384
1385                 ctrlstat = td_status(uhci, td);
1386                 if (ctrlstat & TD_CTRL_ACTIVE) {
1387                         status = -EXDEV;        /* TD was added too late? */
1388                 } else {
1389                         status = uhci_map_status(uhci_status_bits(ctrlstat),
1390                                         usb_pipeout(urb->pipe));
1391                         actlength = uhci_actual_length(ctrlstat);
1392
1393                         urb->actual_length += actlength;
1394                         qh->iso_packet_desc->actual_length = actlength;
1395                         qh->iso_packet_desc->status = status;
1396                 }
1397                 if (status)
1398                         urb->error_count++;
1399
1400                 uhci_remove_td_from_urbp(td);
1401                 uhci_free_td(uhci, td);
1402                 qh->iso_frame += qh->period;
1403                 ++qh->iso_packet_desc;
1404         }
1405         return 0;
1406 }
1407
1408 static int uhci_urb_enqueue(struct usb_hcd *hcd,
1409                 struct urb *urb, gfp_t mem_flags)
1410 {
1411         int ret;
1412         struct uhci_hcd *uhci = hcd_to_uhci(hcd);
1413         unsigned long flags;
1414         struct urb_priv *urbp;
1415         struct uhci_qh *qh;
1416
1417         spin_lock_irqsave(&uhci->lock, flags);
1418
1419         ret = usb_hcd_link_urb_to_ep(hcd, urb);
1420         if (ret)
1421                 goto done_not_linked;
1422
1423         ret = -ENOMEM;
1424         urbp = uhci_alloc_urb_priv(uhci, urb);
1425         if (!urbp)
1426                 goto done;
1427
1428         if (urb->ep->hcpriv)
1429                 qh = urb->ep->hcpriv;
1430         else {
1431                 qh = uhci_alloc_qh(uhci, urb->dev, urb->ep);
1432                 if (!qh)
1433                         goto err_no_qh;
1434         }
1435         urbp->qh = qh;
1436
1437         switch (qh->type) {
1438         case USB_ENDPOINT_XFER_CONTROL:
1439                 ret = uhci_submit_control(uhci, urb, qh);
1440                 break;
1441         case USB_ENDPOINT_XFER_BULK:
1442                 ret = uhci_submit_bulk(uhci, urb, qh);
1443                 break;
1444         case USB_ENDPOINT_XFER_INT:
1445                 ret = uhci_submit_interrupt(uhci, urb, qh);
1446                 break;
1447         case USB_ENDPOINT_XFER_ISOC:
1448                 urb->error_count = 0;
1449                 ret = uhci_submit_isochronous(uhci, urb, qh);
1450                 break;
1451         }
1452         if (ret != 0)
1453                 goto err_submit_failed;
1454
1455         /* Add this URB to the QH */
1456         list_add_tail(&urbp->node, &qh->queue);
1457
1458         /* If the new URB is the first and only one on this QH then either
1459          * the QH is new and idle or else it's unlinked and waiting to
1460          * become idle, so we can activate it right away.  But only if the
1461          * queue isn't stopped. */
1462         if (qh->queue.next == &urbp->node && !qh->is_stopped) {
1463                 uhci_activate_qh(uhci, qh);
1464                 uhci_urbp_wants_fsbr(uhci, urbp);
1465         }
1466         goto done;
1467
1468 err_submit_failed:
1469         if (qh->state == QH_STATE_IDLE)
1470                 uhci_make_qh_idle(uhci, qh);    /* Reclaim unused QH */
1471 err_no_qh:
1472         uhci_free_urb_priv(uhci, urbp);
1473 done:
1474         if (ret)
1475                 usb_hcd_unlink_urb_from_ep(hcd, urb);
1476 done_not_linked:
1477         spin_unlock_irqrestore(&uhci->lock, flags);
1478         return ret;
1479 }
1480
1481 static int uhci_urb_dequeue(struct usb_hcd *hcd, struct urb *urb, int status)
1482 {
1483         struct uhci_hcd *uhci = hcd_to_uhci(hcd);
1484         unsigned long flags;
1485         struct uhci_qh *qh;
1486         int rc;
1487
1488         spin_lock_irqsave(&uhci->lock, flags);
1489         rc = usb_hcd_check_unlink_urb(hcd, urb, status);
1490         if (rc)
1491                 goto done;
1492
1493         qh = ((struct urb_priv *) urb->hcpriv)->qh;
1494
1495         /* Remove Isochronous TDs from the frame list ASAP */
1496         if (qh->type == USB_ENDPOINT_XFER_ISOC) {
1497                 uhci_unlink_isochronous_tds(uhci, urb);
1498                 mb();
1499
1500                 /* If the URB has already started, update the QH unlink time */
1501                 uhci_get_current_frame_number(uhci);
1502                 if (uhci_frame_before_eq(urb->start_frame, uhci->frame_number))
1503                         qh->unlink_frame = uhci->frame_number;
1504         }
1505
1506         uhci_unlink_qh(uhci, qh);
1507
1508 done:
1509         spin_unlock_irqrestore(&uhci->lock, flags);
1510         return rc;
1511 }
1512
1513 /*
1514  * Finish unlinking an URB and give it back
1515  */
1516 static void uhci_giveback_urb(struct uhci_hcd *uhci, struct uhci_qh *qh,
1517                 struct urb *urb, int status)
1518 __releases(uhci->lock)
1519 __acquires(uhci->lock)
1520 {
1521         struct urb_priv *urbp = (struct urb_priv *) urb->hcpriv;
1522
1523         if (qh->type == USB_ENDPOINT_XFER_CONTROL) {
1524
1525                 /* Subtract off the length of the SETUP packet from
1526                  * urb->actual_length.
1527                  */
1528                 urb->actual_length -= min_t(u32, 8, urb->actual_length);
1529         }
1530
1531         /* When giving back the first URB in an Isochronous queue,
1532          * reinitialize the QH's iso-related members for the next URB. */
1533         else if (qh->type == USB_ENDPOINT_XFER_ISOC &&
1534                         urbp->node.prev == &qh->queue &&
1535                         urbp->node.next != &qh->queue) {
1536                 struct urb *nurb = list_entry(urbp->node.next,
1537                                 struct urb_priv, node)->urb;
1538
1539                 qh->iso_packet_desc = &nurb->iso_frame_desc[0];
1540                 qh->iso_frame = nurb->start_frame;
1541         }
1542
1543         /* Take the URB off the QH's queue.  If the queue is now empty,
1544          * this is a perfect time for a toggle fixup. */
1545         list_del_init(&urbp->node);
1546         if (list_empty(&qh->queue) && qh->needs_fixup) {
1547                 usb_settoggle(urb->dev, usb_pipeendpoint(urb->pipe),
1548                                 usb_pipeout(urb->pipe), qh->initial_toggle);
1549                 qh->needs_fixup = 0;
1550         }
1551
1552         uhci_free_urb_priv(uhci, urbp);
1553         usb_hcd_unlink_urb_from_ep(uhci_to_hcd(uhci), urb);
1554
1555         spin_unlock(&uhci->lock);
1556         usb_hcd_giveback_urb(uhci_to_hcd(uhci), urb, status);
1557         spin_lock(&uhci->lock);
1558
1559         /* If the queue is now empty, we can unlink the QH and give up its
1560          * reserved bandwidth. */
1561         if (list_empty(&qh->queue)) {
1562                 uhci_unlink_qh(uhci, qh);
1563                 if (qh->bandwidth_reserved)
1564                         uhci_release_bandwidth(uhci, qh);
1565         }
1566 }
1567
1568 /*
1569  * Scan the URBs in a QH's queue
1570  */
1571 #define QH_FINISHED_UNLINKING(qh)                       \
1572                 (qh->state == QH_STATE_UNLINKING &&     \
1573                 uhci->frame_number + uhci->is_stopped != qh->unlink_frame)
1574
1575 static void uhci_scan_qh(struct uhci_hcd *uhci, struct uhci_qh *qh)
1576 {
1577         struct urb_priv *urbp;
1578         struct urb *urb;
1579         int status;
1580
1581         while (!list_empty(&qh->queue)) {
1582                 urbp = list_entry(qh->queue.next, struct urb_priv, node);
1583                 urb = urbp->urb;
1584
1585                 if (qh->type == USB_ENDPOINT_XFER_ISOC)
1586                         status = uhci_result_isochronous(uhci, urb);
1587                 else
1588                         status = uhci_result_common(uhci, urb);
1589                 if (status == -EINPROGRESS)
1590                         break;
1591
1592                 /* Dequeued but completed URBs can't be given back unless
1593                  * the QH is stopped or has finished unlinking. */
1594                 if (urb->unlinked) {
1595                         if (QH_FINISHED_UNLINKING(qh))
1596                                 qh->is_stopped = 1;
1597                         else if (!qh->is_stopped)
1598                                 return;
1599                 }
1600
1601                 uhci_giveback_urb(uhci, qh, urb, status);
1602                 if (status < 0)
1603                         break;
1604         }
1605
1606         /* If the QH is neither stopped nor finished unlinking (normal case),
1607          * our work here is done. */
1608         if (QH_FINISHED_UNLINKING(qh))
1609                 qh->is_stopped = 1;
1610         else if (!qh->is_stopped)
1611                 return;
1612
1613         /* Otherwise give back each of the dequeued URBs */
1614 restart:
1615         list_for_each_entry(urbp, &qh->queue, node) {
1616                 urb = urbp->urb;
1617                 if (urb->unlinked) {
1618
1619                         /* Fix up the TD links and save the toggles for
1620                          * non-Isochronous queues.  For Isochronous queues,
1621                          * test for too-recent dequeues. */
1622                         if (!uhci_cleanup_queue(uhci, qh, urb)) {
1623                                 qh->is_stopped = 0;
1624                                 return;
1625                         }
1626                         uhci_giveback_urb(uhci, qh, urb, 0);
1627                         goto restart;
1628                 }
1629         }
1630         qh->is_stopped = 0;
1631
1632         /* There are no more dequeued URBs.  If there are still URBs on the
1633          * queue, the QH can now be re-activated. */
1634         if (!list_empty(&qh->queue)) {
1635                 if (qh->needs_fixup)
1636                         uhci_fixup_toggles(uhci, qh, 0);
1637
1638                 /* If the first URB on the queue wants FSBR but its time
1639                  * limit has expired, set the next TD to interrupt on
1640                  * completion before reactivating the QH. */
1641                 urbp = list_entry(qh->queue.next, struct urb_priv, node);
1642                 if (urbp->fsbr && qh->wait_expired) {
1643                         struct uhci_td *td = list_entry(urbp->td_list.next,
1644                                         struct uhci_td, list);
1645
1646                         td->status |= cpu_to_hc32(uhci, TD_CTRL_IOC);
1647                 }
1648
1649                 uhci_activate_qh(uhci, qh);
1650         }
1651
1652         /* The queue is empty.  The QH can become idle if it is fully
1653          * unlinked. */
1654         else if (QH_FINISHED_UNLINKING(qh))
1655                 uhci_make_qh_idle(uhci, qh);
1656 }
1657
1658 /*
1659  * Check for queues that have made some forward progress.
1660  * Returns 0 if the queue is not Isochronous, is ACTIVE, and
1661  * has not advanced since last examined; 1 otherwise.
1662  *
1663  * Early Intel controllers have a bug which causes qh->element sometimes
1664  * not to advance when a TD completes successfully.  The queue remains
1665  * stuck on the inactive completed TD.  We detect such cases and advance
1666  * the element pointer by hand.
1667  */
1668 static int uhci_advance_check(struct uhci_hcd *uhci, struct uhci_qh *qh)
1669 {
1670         struct urb_priv *urbp = NULL;
1671         struct uhci_td *td;
1672         int ret = 1;
1673         unsigned status;
1674
1675         if (qh->type == USB_ENDPOINT_XFER_ISOC)
1676                 goto done;
1677
1678         /* Treat an UNLINKING queue as though it hasn't advanced.
1679          * This is okay because reactivation will treat it as though
1680          * it has advanced, and if it is going to become IDLE then
1681          * this doesn't matter anyway.  Furthermore it's possible
1682          * for an UNLINKING queue not to have any URBs at all, or
1683          * for its first URB not to have any TDs (if it was dequeued
1684          * just as it completed).  So it's not easy in any case to
1685          * test whether such queues have advanced. */
1686         if (qh->state != QH_STATE_ACTIVE) {
1687                 urbp = NULL;
1688                 status = 0;
1689
1690         } else {
1691                 urbp = list_entry(qh->queue.next, struct urb_priv, node);
1692                 td = list_entry(urbp->td_list.next, struct uhci_td, list);
1693                 status = td_status(uhci, td);
1694                 if (!(status & TD_CTRL_ACTIVE)) {
1695
1696                         /* We're okay, the queue has advanced */
1697                         qh->wait_expired = 0;
1698                         qh->advance_jiffies = jiffies;
1699                         goto done;
1700                 }
1701                 ret = uhci->is_stopped;
1702         }
1703
1704         /* The queue hasn't advanced; check for timeout */
1705         if (qh->wait_expired)
1706                 goto done;
1707
1708         if (time_after(jiffies, qh->advance_jiffies + QH_WAIT_TIMEOUT)) {
1709
1710                 /* Detect the Intel bug and work around it */
1711                 if (qh->post_td && qh_element(qh) ==
1712                         LINK_TO_TD(uhci, qh->post_td)) {
1713                         qh->element = qh->post_td->link;
1714                         qh->advance_jiffies = jiffies;
1715                         ret = 1;
1716                         goto done;
1717                 }
1718
1719                 qh->wait_expired = 1;
1720
1721                 /* If the current URB wants FSBR, unlink it temporarily
1722                  * so that we can safely set the next TD to interrupt on
1723                  * completion.  That way we'll know as soon as the queue
1724                  * starts moving again. */
1725                 if (urbp && urbp->fsbr && !(status & TD_CTRL_IOC))
1726                         uhci_unlink_qh(uhci, qh);
1727
1728         } else {
1729                 /* Unmoving but not-yet-expired queues keep FSBR alive */
1730                 if (urbp)
1731                         uhci_urbp_wants_fsbr(uhci, urbp);
1732         }
1733
1734 done:
1735         return ret;
1736 }
1737
1738 /*
1739  * Process events in the schedule, but only in one thread at a time
1740  */
1741 static void uhci_scan_schedule(struct uhci_hcd *uhci)
1742 {
1743         int i;
1744         struct uhci_qh *qh;
1745
1746         /* Don't allow re-entrant calls */
1747         if (uhci->scan_in_progress) {
1748                 uhci->need_rescan = 1;
1749                 return;
1750         }
1751         uhci->scan_in_progress = 1;
1752 rescan:
1753         uhci->need_rescan = 0;
1754         uhci->fsbr_is_wanted = 0;
1755
1756         uhci_clear_next_interrupt(uhci);
1757         uhci_get_current_frame_number(uhci);
1758         uhci->cur_iso_frame = uhci->frame_number;
1759
1760         /* Go through all the QH queues and process the URBs in each one */
1761         for (i = 0; i < UHCI_NUM_SKELQH - 1; ++i) {
1762                 uhci->next_qh = list_entry(uhci->skelqh[i]->node.next,
1763                                 struct uhci_qh, node);
1764                 while ((qh = uhci->next_qh) != uhci->skelqh[i]) {
1765                         uhci->next_qh = list_entry(qh->node.next,
1766                                         struct uhci_qh, node);
1767
1768                         if (uhci_advance_check(uhci, qh)) {
1769                                 uhci_scan_qh(uhci, qh);
1770                                 if (qh->state == QH_STATE_ACTIVE) {
1771                                         uhci_urbp_wants_fsbr(uhci,
1772         list_entry(qh->queue.next, struct urb_priv, node));
1773                                 }
1774                         }
1775                 }
1776         }
1777
1778         uhci->last_iso_frame = uhci->cur_iso_frame;
1779         if (uhci->need_rescan)
1780                 goto rescan;
1781         uhci->scan_in_progress = 0;
1782
1783         if (uhci->fsbr_is_on && !uhci->fsbr_is_wanted &&
1784                         !uhci->fsbr_expiring) {
1785                 uhci->fsbr_expiring = 1;
1786                 mod_timer(&uhci->fsbr_timer, jiffies + FSBR_OFF_DELAY);
1787         }
1788
1789         if (list_empty(&uhci->skel_unlink_qh->node))
1790                 uhci_clear_next_interrupt(uhci);
1791         else
1792                 uhci_set_next_interrupt(uhci);
1793 }