git.sur5r.net Git - u-boot/blob - drivers/usb/gadget/ci_udc.c

   1 /*
   2  * Copyright 2011, Marvell Semiconductor Inc.
   3  * Lei Wen <leiwen@marvell.com>
   4  *
   5  * SPDX-License-Identifier:     GPL-2.0+
   6  *
   7  * Back ported to the 8xx platform (from the 8260 platform) by
   8  * Murray.Jensen@cmst.csiro.au, 27-Jan-01.
   9  */
  10
  11 #include <common.h>
  12 #include <command.h>
  13 #include <config.h>
  14 #include <net.h>
  15 #include <malloc.h>
  16 #include <asm/byteorder.h>
  17 #include <asm/errno.h>
  18 #include <asm/io.h>
  19 #include <asm/unaligned.h>
  20 #include <linux/types.h>
  21 #include <linux/usb/ch9.h>
  22 #include <linux/usb/gadget.h>
  23 #include <usb/ci_udc.h>
  24 #include "../host/ehci.h"
  25 #include "ci_udc.h"
  26
  27 /*
  28  * Check if the system has too long cachelines. If the cachelines are
  29  * longer then 128b, the driver will not be able flush/invalidate data
  30  * cache over separate QH entries. We use 128b because one QH entry is
  31  * 64b long and there are always two QH list entries for each endpoint.
  32  */
  33 #if ARCH_DMA_MINALIGN > 128
  34 #error This driver can not work on systems with caches longer than 128b
  35 #endif
  36
  37 /*
  38  * Every QTD must be individually aligned, since we can program any
  39  * QTD's address into HW. Cache flushing requires ARCH_DMA_MINALIGN,
  40  * and the USB HW requires 32-byte alignment. Align to both:
  41  */
  42 #define ILIST_ALIGN             roundup(ARCH_DMA_MINALIGN, 32)
  43 /* Each QTD is this size */
  44 #define ILIST_ENT_RAW_SZ        sizeof(struct ept_queue_item)
  45 /*
  46  * Align the size of the QTD too, so we can add this value to each
  47  * QTD's address to get another aligned address.
  48  */
  49 #define ILIST_ENT_SZ            roundup(ILIST_ENT_RAW_SZ, ILIST_ALIGN)
  50 /* For each endpoint, we need 2 QTDs, one for each of IN and OUT */
  51 #define ILIST_SZ                (NUM_ENDPOINTS * 2 * ILIST_ENT_SZ)
  52
  53 #define EP_MAX_LENGTH_TRANSFER  0x4000
  54
  55 #ifndef DEBUG
  56 #define DBG(x...) do {} while (0)
  57 #else
  58 #define DBG(x...) printf(x)
  59 static const char *reqname(unsigned r)
  60 {
  61         switch (r) {
  62         case USB_REQ_GET_STATUS: return "GET_STATUS";
  63         case USB_REQ_CLEAR_FEATURE: return "CLEAR_FEATURE";
  64         case USB_REQ_SET_FEATURE: return "SET_FEATURE";
  65         case USB_REQ_SET_ADDRESS: return "SET_ADDRESS";
  66         case USB_REQ_GET_DESCRIPTOR: return "GET_DESCRIPTOR";
  67         case USB_REQ_SET_DESCRIPTOR: return "SET_DESCRIPTOR";
  68         case USB_REQ_GET_CONFIGURATION: return "GET_CONFIGURATION";
  69         case USB_REQ_SET_CONFIGURATION: return "SET_CONFIGURATION";
  70         case USB_REQ_GET_INTERFACE: return "GET_INTERFACE";
  71         case USB_REQ_SET_INTERFACE: return "SET_INTERFACE";
  72         default: return "*UNKNOWN*";
  73         }
  74 }
  75 #endif
  76
  77 static struct usb_endpoint_descriptor ep0_desc = {
  78         .bLength = sizeof(struct usb_endpoint_descriptor),
  79         .bDescriptorType = USB_DT_ENDPOINT,
  80         .bEndpointAddress = USB_DIR_IN,
  81         .bmAttributes = USB_ENDPOINT_XFER_CONTROL,
  82 };
  83
  84 static int ci_pullup(struct usb_gadget *gadget, int is_on);
  85 static int ci_ep_enable(struct usb_ep *ep,
  86                 const struct usb_endpoint_descriptor *desc);
  87 static int ci_ep_disable(struct usb_ep *ep);
  88 static int ci_ep_queue(struct usb_ep *ep,
  89                 struct usb_request *req, gfp_t gfp_flags);
  90 static struct usb_request *
  91 ci_ep_alloc_request(struct usb_ep *ep, unsigned int gfp_flags);
  92 static void ci_ep_free_request(struct usb_ep *ep, struct usb_request *_req);
  93
  94 static struct usb_gadget_ops ci_udc_ops = {
  95         .pullup = ci_pullup,
  96 };
  97
  98 static struct usb_ep_ops ci_ep_ops = {
  99         .enable         = ci_ep_enable,
 100         .disable        = ci_ep_disable,
 101         .queue          = ci_ep_queue,
 102         .alloc_request  = ci_ep_alloc_request,
 103         .free_request   = ci_ep_free_request,
 104 };
 105
 106 /* Init values for USB endpoints. */
 107 static const struct usb_ep ci_ep_init[5] = {
 108         [0] = { /* EP 0 */
 109                 .maxpacket      = 64,
 110                 .name           = "ep0",
 111                 .ops            = &ci_ep_ops,
 112         },
 113         [1] = {
 114                 .maxpacket      = 512,
 115                 .name           = "ep1in-bulk",
 116                 .ops            = &ci_ep_ops,
 117         },
 118         [2] = {
 119                 .maxpacket      = 512,
 120                 .name           = "ep2out-bulk",
 121                 .ops            = &ci_ep_ops,
 122         },
 123         [3] = {
 124                 .maxpacket      = 512,
 125                 .name           = "ep3in-int",
 126                 .ops            = &ci_ep_ops,
 127         },
 128         [4] = {
 129                 .maxpacket      = 512,
 130                 .name           = "ep-",
 131                 .ops            = &ci_ep_ops,
 132         },
 133 };
 134
 135 static struct ci_drv controller = {
 136         .gadget = {
 137                 .name   = "ci_udc",
 138                 .ops    = &ci_udc_ops,
 139                 .is_dualspeed = 1,
 140         },
 141 };
 142
 143 /**
 144  * ci_get_qh() - return queue head for endpoint
 145  * @ep_num:     Endpoint number
 146  * @dir_in:     Direction of the endpoint (IN = 1, OUT = 0)
 147  *
 148  * This function returns the QH associated with particular endpoint
 149  * and it's direction.
 150  */
 151 static struct ept_queue_head *ci_get_qh(int ep_num, int dir_in)
 152 {
 153         return &controller.epts[(ep_num * 2) + dir_in];
 154 }
 155
 156 /**
 157  * ci_get_qtd() - return queue item for endpoint
 158  * @ep_num:     Endpoint number
 159  * @dir_in:     Direction of the endpoint (IN = 1, OUT = 0)
 160  *
 161  * This function returns the QH associated with particular endpoint
 162  * and it's direction.
 163  */
 164 static struct ept_queue_item *ci_get_qtd(int ep_num, int dir_in)
 165 {
 166         int index = (ep_num * 2) + dir_in;
 167         uint8_t *imem = controller.items_mem + (index * ILIST_ENT_SZ);
 168         return (struct ept_queue_item *)imem;
 169 }
 170
 171 /**
 172  * ci_flush_qh - flush cache over queue head
 173  * @ep_num:     Endpoint number
 174  *
 175  * This function flushes cache over QH for particular endpoint.
 176  */
 177 static void ci_flush_qh(int ep_num)
 178 {
 179         struct ept_queue_head *head = ci_get_qh(ep_num, 0);
 180         const unsigned long start = (unsigned long)head;
 181         const unsigned long end = start + 2 * sizeof(*head);
 182
 183         flush_dcache_range(start, end);
 184 }
 185
 186 /**
 187  * ci_invalidate_qh - invalidate cache over queue head
 188  * @ep_num:     Endpoint number
 189  *
 190  * This function invalidates cache over QH for particular endpoint.
 191  */
 192 static void ci_invalidate_qh(int ep_num)
 193 {
 194         struct ept_queue_head *head = ci_get_qh(ep_num, 0);
 195         unsigned long start = (unsigned long)head;
 196         unsigned long end = start + 2 * sizeof(*head);
 197
 198         invalidate_dcache_range(start, end);
 199 }
 200
 201 /**
 202  * ci_flush_qtd - flush cache over queue item
 203  * @ep_num:     Endpoint number
 204  *
 205  * This function flushes cache over qTD pair for particular endpoint.
 206  */
 207 static void ci_flush_qtd(int ep_num)
 208 {
 209         struct ept_queue_item *item = ci_get_qtd(ep_num, 0);
 210         const unsigned long start = (unsigned long)item;
 211         const unsigned long end = start + 2 * ILIST_ENT_SZ;
 212
 213         flush_dcache_range(start, end);
 214 }
 215
 216 /**
 217  * ci_flush_td - flush cache over queue item
 218  * @td: td pointer
 219  *
 220  * This function flushes cache for particular transfer descriptor.
 221  */
 222 static void ci_flush_td(struct ept_queue_item *td)
 223 {
 224         const unsigned long start = (unsigned long)td;
 225         const unsigned long end = (unsigned long)td + ILIST_ENT_SZ;
 226         flush_dcache_range(start, end);
 227 }
 228
 229 /**
 230  * ci_invalidate_qtd - invalidate cache over queue item
 231  * @ep_num:     Endpoint number
 232  *
 233  * This function invalidates cache over qTD pair for particular endpoint.
 234  */
 235 static void ci_invalidate_qtd(int ep_num)
 236 {
 237         struct ept_queue_item *item = ci_get_qtd(ep_num, 0);
 238         const unsigned long start = (unsigned long)item;
 239         const unsigned long end = start + 2 * ILIST_ENT_SZ;
 240
 241         invalidate_dcache_range(start, end);
 242 }
 243
 244 /**
 245  * ci_invalidate_td - invalidate cache over queue item
 246  * @td: td pointer
 247  *
 248  * This function invalidates cache for particular transfer descriptor.
 249  */
 250 static void ci_invalidate_td(struct ept_queue_item *td)
 251 {
 252         const unsigned long start = (unsigned long)td;
 253         const unsigned long end = start + ILIST_ENT_SZ;
 254         invalidate_dcache_range(start, end);
 255 }
 256
 257 static struct usb_request *
 258 ci_ep_alloc_request(struct usb_ep *ep, unsigned int gfp_flags)
 259 {
 260         struct ci_ep *ci_ep = container_of(ep, struct ci_ep, ep);
 261         int num;
 262         struct ci_req *ci_req;
 263
 264         num = ci_ep->desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 265         if (num == 0 && controller.ep0_req)
 266                 return &controller.ep0_req->req;
 267
 268         ci_req = calloc(1, sizeof(*ci_req));
 269         if (!ci_req)
 270                 return NULL;
 271
 272         INIT_LIST_HEAD(&ci_req->queue);
 273
 274         if (num == 0)
 275                 controller.ep0_req = ci_req;
 276
 277         return &ci_req->req;
 278 }
 279
 280 static void ci_ep_free_request(struct usb_ep *ep, struct usb_request *req)
 281 {
 282         struct ci_ep *ci_ep = container_of(ep, struct ci_ep, ep);
 283         struct ci_req *ci_req = container_of(req, struct ci_req, req);
 284         int num;
 285
 286         num = ci_ep->desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 287         if (num == 0) {
 288                 if (!controller.ep0_req)
 289                         return;
 290                 controller.ep0_req = 0;
 291         }
 292
 293         if (ci_req->b_buf)
 294                 free(ci_req->b_buf);
 295         free(ci_req);
 296 }
 297
 298 static void ep_enable(int num, int in, int maxpacket)
 299 {
 300         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 301         unsigned n;
 302
 303         n = readl(&udc->epctrl[num]);
 304         if (in)
 305                 n |= (CTRL_TXE | CTRL_TXR | CTRL_TXT_BULK);
 306         else
 307                 n |= (CTRL_RXE | CTRL_RXR | CTRL_RXT_BULK);
 308
 309         if (num != 0) {
 310                 struct ept_queue_head *head = ci_get_qh(num, in);
 311
 312                 head->config = CONFIG_MAX_PKT(maxpacket) | CONFIG_ZLT;
 313                 ci_flush_qh(num);
 314         }
 315         writel(n, &udc->epctrl[num]);
 316 }
 317
 318 static int ci_ep_enable(struct usb_ep *ep,
 319                 const struct usb_endpoint_descriptor *desc)
 320 {
 321         struct ci_ep *ci_ep = container_of(ep, struct ci_ep, ep);
 322         int num, in;
 323         num = desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 324         in = (desc->bEndpointAddress & USB_DIR_IN) != 0;
 325         ci_ep->desc = desc;
 326
 327         if (num) {
 328                 int max = get_unaligned_le16(&desc->wMaxPacketSize);
 329
 330                 if ((max > 64) && (controller.gadget.speed == USB_SPEED_FULL))
 331                         max = 64;
 332                 if (ep->maxpacket != max) {
 333                         DBG("%s: from %d to %d\n", __func__,
 334                             ep->maxpacket, max);
 335                         ep->maxpacket = max;
 336                 }
 337         }
 338         ep_enable(num, in, ep->maxpacket);
 339         DBG("%s: num=%d maxpacket=%d\n", __func__, num, ep->maxpacket);
 340         return 0;
 341 }
 342
 343 static int ci_ep_disable(struct usb_ep *ep)
 344 {
 345         struct ci_ep *ci_ep = container_of(ep, struct ci_ep, ep);
 346
 347         ci_ep->desc = NULL;
 348         return 0;
 349 }
 350
 351 static int ci_bounce(struct ci_req *ci_req, int in)
 352 {
 353         struct usb_request *req = &ci_req->req;
 354         unsigned long addr = (unsigned long)req->buf;
 355         unsigned long hwaddr;
 356         uint32_t aligned_used_len;
 357
 358         /* Input buffer address is not aligned. */
 359         if (addr & (ARCH_DMA_MINALIGN - 1))
 360                 goto align;
 361
 362         /* Input buffer length is not aligned. */
 363         if (req->length & (ARCH_DMA_MINALIGN - 1))
 364                 goto align;
 365
 366         /* The buffer is well aligned, only flush cache. */
 367         ci_req->hw_len = req->length;
 368         ci_req->hw_buf = req->buf;
 369         goto flush;
 370
 371 align:
 372         if (ci_req->b_buf && req->length > ci_req->b_len) {
 373                 free(ci_req->b_buf);
 374                 ci_req->b_buf = 0;
 375         }
 376         if (!ci_req->b_buf) {
 377                 ci_req->b_len = roundup(req->length, ARCH_DMA_MINALIGN);
 378                 ci_req->b_buf = memalign(ARCH_DMA_MINALIGN, ci_req->b_len);
 379                 if (!ci_req->b_buf)
 380                         return -ENOMEM;
 381         }
 382         ci_req->hw_len = ci_req->b_len;
 383         ci_req->hw_buf = ci_req->b_buf;
 384
 385         if (in)
 386                 memcpy(ci_req->hw_buf, req->buf, req->length);
 387
 388 flush:
 389         hwaddr = (unsigned long)ci_req->hw_buf;
 390         aligned_used_len = roundup(req->length, ARCH_DMA_MINALIGN);
 391         flush_dcache_range(hwaddr, hwaddr + aligned_used_len);
 392
 393         return 0;
 394 }
 395
 396 static void ci_debounce(struct ci_req *ci_req, int in)
 397 {
 398         struct usb_request *req = &ci_req->req;
 399         unsigned long addr = (unsigned long)req->buf;
 400         unsigned long hwaddr = (unsigned long)ci_req->hw_buf;
 401         uint32_t aligned_used_len;
 402
 403         if (in)
 404                 return;
 405
 406         aligned_used_len = roundup(req->actual, ARCH_DMA_MINALIGN);
 407         invalidate_dcache_range(hwaddr, hwaddr + aligned_used_len);
 408
 409         if (addr == hwaddr)
 410                 return; /* not a bounce */
 411
 412         memcpy(req->buf, ci_req->hw_buf, req->actual);
 413 }
 414
 415 static void ci_ep_submit_next_request(struct ci_ep *ci_ep)
 416 {
 417         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 418         struct ept_queue_item *item;
 419         struct ept_queue_head *head;
 420         int bit, num, len, in;
 421         struct ci_req *ci_req;
 422         u8 *buf;
 423         uint32_t length, actlen;
 424         struct ept_queue_item *dtd, *qtd;
 425
 426         ci_ep->req_primed = true;
 427
 428         num = ci_ep->desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 429         in = (ci_ep->desc->bEndpointAddress & USB_DIR_IN) != 0;
 430         item = ci_get_qtd(num, in);
 431         head = ci_get_qh(num, in);
 432
 433         ci_req = list_first_entry(&ci_ep->queue, struct ci_req, queue);
 434         len = ci_req->req.length;
 435
 436         head->next = (unsigned long)item;
 437         head->info = 0;
 438
 439         ci_req->dtd_count = 0;
 440         buf = ci_req->hw_buf;
 441         actlen = 0;
 442         dtd = item;
 443
 444         do {
 445                 length = min(ci_req->req.length - actlen,
 446                              (unsigned)EP_MAX_LENGTH_TRANSFER);
 447
 448                 dtd->info = INFO_BYTES(length) | INFO_ACTIVE;
 449                 dtd->page0 = (unsigned long)buf;
 450                 dtd->page1 = ((unsigned long)buf & 0xfffff000) + 0x1000;
 451                 dtd->page2 = ((unsigned long)buf & 0xfffff000) + 0x2000;
 452                 dtd->page3 = ((unsigned long)buf & 0xfffff000) + 0x3000;
 453                 dtd->page4 = ((unsigned long)buf & 0xfffff000) + 0x4000;
 454
 455                 len -= length;
 456                 actlen += length;
 457                 buf += length;
 458
 459                 if (len) {
 460                         qtd = (struct ept_queue_item *)
 461                                memalign(ILIST_ALIGN, ILIST_ENT_SZ);
 462                         dtd->next = (unsigned long)qtd;
 463                         dtd = qtd;
 464                         memset(dtd, 0, ILIST_ENT_SZ);
 465                 }
 466
 467                 ci_req->dtd_count++;
 468         } while (len);
 469
 470         item = dtd;
 471         /*
 472          * When sending the data for an IN transaction, the attached host
 473          * knows that all data for the IN is sent when one of the following
 474          * occurs:
 475          * a) A zero-length packet is transmitted.
 476          * b) A packet with length that isn't an exact multiple of the ep's
 477          *    maxpacket is transmitted.
 478          * c) Enough data is sent to exactly fill the host's maximum expected
 479          *    IN transaction size.
 480          *
 481          * One of these conditions MUST apply at the end of an IN transaction,
 482          * or the transaction will not be considered complete by the host. If
 483          * none of (a)..(c) already applies, then we must force (a) to apply
 484          * by explicitly sending an extra zero-length packet.
 485          */
 486         /*  IN    !a     !b                              !c */
 487         if (in && len && !(len % ci_ep->ep.maxpacket) && ci_req->req.zero) {
 488                 /*
 489                  * Each endpoint has 2 items allocated, even though typically
 490                  * only 1 is used at a time since either an IN or an OUT but
 491                  * not both is queued. For an IN transaction, item currently
 492                  * points at the second of these items, so we know that we
 493                  * can use the other to transmit the extra zero-length packet.
 494                  */
 495                 struct ept_queue_item *other_item = ci_get_qtd(num, 0);
 496                 item->next = (unsigned long)other_item;
 497                 item = other_item;
 498                 item->info = INFO_ACTIVE;
 499         }
 500
 501         item->next = TERMINATE;
 502         item->info |= INFO_IOC;
 503
 504         ci_flush_qtd(num);
 505
 506         item = (struct ept_queue_item *)(unsigned long)head->next;
 507         while (item->next != TERMINATE) {
 508                 ci_flush_td((struct ept_queue_item *)(unsigned long)item->next);
 509                 item = (struct ept_queue_item *)(unsigned long)item->next;
 510         }
 511
 512         DBG("ept%d %s queue len %x, req %p, buffer %p\n",
 513             num, in ? "in" : "out", len, ci_req, ci_req->hw_buf);
 514         ci_flush_qh(num);
 515
 516         if (in)
 517                 bit = EPT_TX(num);
 518         else
 519                 bit = EPT_RX(num);
 520
 521         writel(bit, &udc->epprime);
 522 }
 523
 524 static int ci_ep_queue(struct usb_ep *ep,
 525                 struct usb_request *req, gfp_t gfp_flags)
 526 {
 527         struct ci_ep *ci_ep = container_of(ep, struct ci_ep, ep);
 528         struct ci_req *ci_req = container_of(req, struct ci_req, req);
 529         int in, ret;
 530         int __maybe_unused num;
 531
 532         num = ci_ep->desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 533         in = (ci_ep->desc->bEndpointAddress & USB_DIR_IN) != 0;
 534
 535         if (!num && ci_ep->req_primed) {
 536                 /*
 537                  * The flipping of ep0 between IN and OUT relies on
 538                  * ci_ep_queue consuming the current IN/OUT setting
 539                  * immediately. If this is deferred to a later point when the
 540                  * req is pulled out of ci_req->queue, then the IN/OUT setting
 541                  * may have been changed since the req was queued, and state
 542                  * will get out of sync. This condition doesn't occur today,
 543                  * but could if bugs were introduced later, and this error
 544                  * check will save a lot of debugging time.
 545                  */
 546                 printf("%s: ep0 transaction already in progress\n", __func__);
 547                 return -EPROTO;
 548         }
 549
 550         ret = ci_bounce(ci_req, in);
 551         if (ret)
 552                 return ret;
 553
 554         DBG("ept%d %s pre-queue req %p, buffer %p\n",
 555             num, in ? "in" : "out", ci_req, ci_req->hw_buf);
 556         list_add_tail(&ci_req->queue, &ci_ep->queue);
 557
 558         if (!ci_ep->req_primed)
 559                 ci_ep_submit_next_request(ci_ep);
 560
 561         return 0;
 562 }
 563
 564 static void flip_ep0_direction(void)
 565 {
 566         if (ep0_desc.bEndpointAddress == USB_DIR_IN) {
 567                 DBG("%s: Flipping ep0 to OUT\n", __func__);
 568                 ep0_desc.bEndpointAddress = 0;
 569         } else {
 570                 DBG("%s: Flipping ep0 to IN\n", __func__);
 571                 ep0_desc.bEndpointAddress = USB_DIR_IN;
 572         }
 573 }
 574
 575 static void handle_ep_complete(struct ci_ep *ci_ep)
 576 {
 577         struct ept_queue_item *item, *next_td;
 578         int num, in, len, j;
 579         struct ci_req *ci_req;
 580
 581         num = ci_ep->desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
 582         in = (ci_ep->desc->bEndpointAddress & USB_DIR_IN) != 0;
 583         item = ci_get_qtd(num, in);
 584         ci_invalidate_qtd(num);
 585         ci_req = list_first_entry(&ci_ep->queue, struct ci_req, queue);
 586
 587         next_td = item;
 588         len = 0;
 589         for (j = 0; j < ci_req->dtd_count; j++) {
 590                 ci_invalidate_td(next_td);
 591                 item = next_td;
 592                 len += (item->info >> 16) & 0x7fff;
 593                 if (item->info & 0xff)
 594                         printf("EP%d/%s FAIL info=%x pg0=%x\n",
 595                                num, in ? "in" : "out", item->info, item->page0);
 596                 if (j != ci_req->dtd_count - 1)
 597                         next_td = (struct ept_queue_item *)(unsigned long)
 598                                 item->next;
 599                 if (j != 0)
 600                         free(item);
 601         }
 602
 603         list_del_init(&ci_req->queue);
 604         ci_ep->req_primed = false;
 605
 606         if (!list_empty(&ci_ep->queue))
 607                 ci_ep_submit_next_request(ci_ep);
 608
 609         ci_req->req.actual = ci_req->req.length - len;
 610         ci_debounce(ci_req, in);
 611
 612         DBG("ept%d %s req %p, complete %x\n",
 613             num, in ? "in" : "out", ci_req, len);
 614         if (num != 0 || controller.ep0_data_phase)
 615                 ci_req->req.complete(&ci_ep->ep, &ci_req->req);
 616         if (num == 0 && controller.ep0_data_phase) {
 617                 /*
 618                  * Data Stage is complete, so flip ep0 dir for Status Stage,
 619                  * which always transfers a packet in the opposite direction.
 620                  */
 621                 DBG("%s: flip ep0 dir for Status Stage\n", __func__);
 622                 flip_ep0_direction();
 623                 controller.ep0_data_phase = false;
 624                 ci_req->req.length = 0;
 625                 usb_ep_queue(&ci_ep->ep, &ci_req->req, 0);
 626         }
 627 }
 628
 629 #define SETUP(type, request) (((type) << 8) | (request))
 630
 631 static void handle_setup(void)
 632 {
 633         struct ci_ep *ci_ep = &controller.ep[0];
 634         struct ci_req *ci_req;
 635         struct usb_request *req;
 636         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 637         struct ept_queue_head *head;
 638         struct usb_ctrlrequest r;
 639         int status = 0;
 640         int num, in, _num, _in, i;
 641         char *buf;
 642
 643         ci_req = controller.ep0_req;
 644         req = &ci_req->req;
 645         head = ci_get_qh(0, 0); /* EP0 OUT */
 646
 647         ci_invalidate_qh(0);
 648         memcpy(&r, head->setup_data, sizeof(struct usb_ctrlrequest));
 649 #ifdef CONFIG_CI_UDC_HAS_HOSTPC
 650         writel(EPT_RX(0), &udc->epsetupstat);
 651 #else
 652         writel(EPT_RX(0), &udc->epstat);
 653 #endif
 654         DBG("handle setup %s, %x, %x index %x value %x length %x\n",
 655             reqname(r.bRequest), r.bRequestType, r.bRequest, r.wIndex,
 656             r.wValue, r.wLength);
 657
 658         /* Set EP0 dir for Data Stage based on Setup Stage data */
 659         if (r.bRequestType & USB_DIR_IN) {
 660                 DBG("%s: Set ep0 to IN for Data Stage\n", __func__);
 661                 ep0_desc.bEndpointAddress = USB_DIR_IN;
 662         } else {
 663                 DBG("%s: Set ep0 to OUT for Data Stage\n", __func__);
 664                 ep0_desc.bEndpointAddress = 0;
 665         }
 666         if (r.wLength) {
 667                 controller.ep0_data_phase = true;
 668         } else {
 669                 /* 0 length -> no Data Stage. Flip dir for Status Stage */
 670                 DBG("%s: 0 length: flip ep0 dir for Status Stage\n", __func__);
 671                 flip_ep0_direction();
 672                 controller.ep0_data_phase = false;
 673         }
 674
 675         list_del_init(&ci_req->queue);
 676         ci_ep->req_primed = false;
 677
 678         switch (SETUP(r.bRequestType, r.bRequest)) {
 679         case SETUP(USB_RECIP_ENDPOINT, USB_REQ_CLEAR_FEATURE):
 680                 _num = r.wIndex & 15;
 681                 _in = !!(r.wIndex & 0x80);
 682
 683                 if ((r.wValue == 0) && (r.wLength == 0)) {
 684                         req->length = 0;
 685                         for (i = 0; i < NUM_ENDPOINTS; i++) {
 686                                 struct ci_ep *ep = &controller.ep[i];
 687
 688                                 if (!ep->desc)
 689                                         continue;
 690                                 num = ep->desc->bEndpointAddress
 691                                                 & USB_ENDPOINT_NUMBER_MASK;
 692                                 in = (ep->desc->bEndpointAddress
 693                                                 & USB_DIR_IN) != 0;
 694                                 if ((num == _num) && (in == _in)) {
 695                                         ep_enable(num, in, ep->ep.maxpacket);
 696                                         usb_ep_queue(controller.gadget.ep0,
 697                                                         req, 0);
 698                                         break;
 699                                 }
 700                         }
 701                 }
 702                 return;
 703
 704         case SETUP(USB_RECIP_DEVICE, USB_REQ_SET_ADDRESS):
 705                 /*
 706                  * write address delayed (will take effect
 707                  * after the next IN txn)
 708                  */
 709                 writel((r.wValue << 25) | (1 << 24), &udc->devaddr);
 710                 req->length = 0;
 711                 usb_ep_queue(controller.gadget.ep0, req, 0);
 712                 return;
 713
 714         case SETUP(USB_DIR_IN | USB_RECIP_DEVICE, USB_REQ_GET_STATUS):
 715                 req->length = 2;
 716                 buf = (char *)req->buf;
 717                 buf[0] = 1 << USB_DEVICE_SELF_POWERED;
 718                 buf[1] = 0;
 719                 usb_ep_queue(controller.gadget.ep0, req, 0);
 720                 return;
 721         }
 722         /* pass request up to the gadget driver */
 723         if (controller.driver)
 724                 status = controller.driver->setup(&controller.gadget, &r);
 725         else
 726                 status = -ENODEV;
 727
 728         if (!status)
 729                 return;
 730         DBG("STALL reqname %s type %x value %x, index %x\n",
 731             reqname(r.bRequest), r.bRequestType, r.wValue, r.wIndex);
 732         writel((1<<16) | (1 << 0), &udc->epctrl[0]);
 733 }
 734
 735 static void stop_activity(void)
 736 {
 737         int i, num, in;
 738         struct ept_queue_head *head;
 739         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 740         writel(readl(&udc->epcomp), &udc->epcomp);
 741 #ifdef CONFIG_CI_UDC_HAS_HOSTPC
 742         writel(readl(&udc->epsetupstat), &udc->epsetupstat);
 743 #endif
 744         writel(readl(&udc->epstat), &udc->epstat);
 745         writel(0xffffffff, &udc->epflush);
 746
 747         /* error out any pending reqs */
 748         for (i = 0; i < NUM_ENDPOINTS; i++) {
 749                 if (i != 0)
 750                         writel(0, &udc->epctrl[i]);
 751                 if (controller.ep[i].desc) {
 752                         num = controller.ep[i].desc->bEndpointAddress
 753                                 & USB_ENDPOINT_NUMBER_MASK;
 754                         in = (controller.ep[i].desc->bEndpointAddress
 755                                 & USB_DIR_IN) != 0;
 756                         head = ci_get_qh(num, in);
 757                         head->info = INFO_ACTIVE;
 758                         ci_flush_qh(num);
 759                 }
 760         }
 761 }
 762
 763 void udc_irq(void)
 764 {
 765         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 766         unsigned n = readl(&udc->usbsts);
 767         writel(n, &udc->usbsts);
 768         int bit, i, num, in;
 769
 770         n &= (STS_SLI | STS_URI | STS_PCI | STS_UI | STS_UEI);
 771         if (n == 0)
 772                 return;
 773
 774         if (n & STS_URI) {
 775                 DBG("-- reset --\n");
 776                 stop_activity();
 777         }
 778         if (n & STS_SLI)
 779                 DBG("-- suspend --\n");
 780
 781         if (n & STS_PCI) {
 782                 int max = 64;
 783                 int speed = USB_SPEED_FULL;
 784
 785 #ifdef CONFIG_CI_UDC_HAS_HOSTPC
 786                 bit = (readl(&udc->hostpc1_devlc) >> 25) & 3;
 787 #else
 788                 bit = (readl(&udc->portsc) >> 26) & 3;
 789 #endif
 790                 DBG("-- portchange %x %s\n", bit, (bit == 2) ? "High" : "Full");
 791                 if (bit == 2) {
 792                         speed = USB_SPEED_HIGH;
 793                         max = 512;
 794                 }
 795                 controller.gadget.speed = speed;
 796                 for (i = 1; i < NUM_ENDPOINTS; i++) {
 797                         if (controller.ep[i].ep.maxpacket > max)
 798                                 controller.ep[i].ep.maxpacket = max;
 799                 }
 800         }
 801
 802         if (n & STS_UEI)
 803                 printf("<UEI %x>\n", readl(&udc->epcomp));
 804
 805         if ((n & STS_UI) || (n & STS_UEI)) {
 806 #ifdef CONFIG_CI_UDC_HAS_HOSTPC
 807                 n = readl(&udc->epsetupstat);
 808 #else
 809                 n = readl(&udc->epstat);
 810 #endif
 811                 if (n & EPT_RX(0))
 812                         handle_setup();
 813
 814                 n = readl(&udc->epcomp);
 815                 if (n != 0)
 816                         writel(n, &udc->epcomp);
 817
 818                 for (i = 0; i < NUM_ENDPOINTS && n; i++) {
 819                         if (controller.ep[i].desc) {
 820                                 num = controller.ep[i].desc->bEndpointAddress
 821                                         & USB_ENDPOINT_NUMBER_MASK;
 822                                 in = (controller.ep[i].desc->bEndpointAddress
 823                                                 & USB_DIR_IN) != 0;
 824                                 bit = (in) ? EPT_TX(num) : EPT_RX(num);
 825                                 if (n & bit)
 826                                         handle_ep_complete(&controller.ep[i]);
 827                         }
 828                 }
 829         }
 830 }
 831
 832 int usb_gadget_handle_interrupts(int index)
 833 {
 834         u32 value;
 835         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 836
 837         value = readl(&udc->usbsts);
 838         if (value)
 839                 udc_irq();
 840
 841         return value;
 842 }
 843
 844 void udc_disconnect(void)
 845 {
 846         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 847         /* disable pullup */
 848         stop_activity();
 849         writel(USBCMD_FS2, &udc->usbcmd);
 850         udelay(800);
 851         if (controller.driver)
 852                 controller.driver->disconnect(&controller.gadget);
 853 }
 854
 855 static int ci_pullup(struct usb_gadget *gadget, int is_on)
 856 {
 857         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
 858         if (is_on) {
 859                 /* RESET */
 860                 writel(USBCMD_ITC(MICRO_8FRAME) | USBCMD_RST, &udc->usbcmd);
 861                 udelay(200);
 862
 863                 writel((unsigned long)controller.epts, &udc->epinitaddr);
 864
 865                 /* select DEVICE mode */
 866                 writel(USBMODE_DEVICE, &udc->usbmode);
 867
 868 #if !defined(CONFIG_USB_GADGET_DUALSPEED)
 869                 /* Port force Full-Speed Connect */
 870                 setbits_le32(&udc->portsc, PFSC);
 871 #endif
 872
 873                 writel(0xffffffff, &udc->epflush);
 874
 875                 /* Turn on the USB connection by enabling the pullup resistor */
 876                 writel(USBCMD_ITC(MICRO_8FRAME) | USBCMD_RUN, &udc->usbcmd);
 877         } else {
 878                 udc_disconnect();
 879         }
 880
 881         return 0;
 882 }
 883
 884 static int ci_udc_probe(void)
 885 {
 886         struct ept_queue_head *head;
 887         int i;
 888
 889         const int num = 2 * NUM_ENDPOINTS;
 890
 891         const int eplist_min_align = 4096;
 892         const int eplist_align = roundup(eplist_min_align, ARCH_DMA_MINALIGN);
 893         const int eplist_raw_sz = num * sizeof(struct ept_queue_head);
 894         const int eplist_sz = roundup(eplist_raw_sz, ARCH_DMA_MINALIGN);
 895
 896         /* The QH list must be aligned to 4096 bytes. */
 897         controller.epts = memalign(eplist_align, eplist_sz);
 898         if (!controller.epts)
 899                 return -ENOMEM;
 900         memset(controller.epts, 0, eplist_sz);
 901
 902         controller.items_mem = memalign(ILIST_ALIGN, ILIST_SZ);
 903         if (!controller.items_mem) {
 904                 free(controller.epts);
 905                 return -ENOMEM;
 906         }
 907         memset(controller.items_mem, 0, ILIST_SZ);
 908
 909         for (i = 0; i < 2 * NUM_ENDPOINTS; i++) {
 910                 /*
 911                  * Configure QH for each endpoint. The structure of the QH list
 912                  * is such that each two subsequent fields, N and N+1 where N is
 913                  * even, in the QH list represent QH for one endpoint. The Nth
 914                  * entry represents OUT configuration and the N+1th entry does
 915                  * represent IN configuration of the endpoint.
 916                  */
 917                 head = controller.epts + i;
 918                 if (i < 2)
 919                         head->config = CONFIG_MAX_PKT(EP0_MAX_PACKET_SIZE)
 920                                 | CONFIG_ZLT | CONFIG_IOS;
 921                 else
 922                         head->config = CONFIG_MAX_PKT(EP_MAX_PACKET_SIZE)
 923                                 | CONFIG_ZLT;
 924                 head->next = TERMINATE;
 925                 head->info = 0;
 926
 927                 if (i & 1) {
 928                         ci_flush_qh(i / 2);
 929                         ci_flush_qtd(i / 2);
 930                 }
 931         }
 932
 933         INIT_LIST_HEAD(&controller.gadget.ep_list);
 934
 935         /* Init EP 0 */
 936         memcpy(&controller.ep[0].ep, &ci_ep_init[0], sizeof(*ci_ep_init));
 937         controller.ep[0].desc = &ep0_desc;
 938         INIT_LIST_HEAD(&controller.ep[0].queue);
 939         controller.ep[0].req_primed = false;
 940         controller.gadget.ep0 = &controller.ep[0].ep;
 941         INIT_LIST_HEAD(&controller.gadget.ep0->ep_list);
 942
 943         /* Init EP 1..3 */
 944         for (i = 1; i < 4; i++) {
 945                 memcpy(&controller.ep[i].ep, &ci_ep_init[i],
 946                        sizeof(*ci_ep_init));
 947                 INIT_LIST_HEAD(&controller.ep[i].queue);
 948                 controller.ep[i].req_primed = false;
 949                 list_add_tail(&controller.ep[i].ep.ep_list,
 950                               &controller.gadget.ep_list);
 951         }
 952
 953         /* Init EP 4..n */
 954         for (i = 4; i < NUM_ENDPOINTS; i++) {
 955                 memcpy(&controller.ep[i].ep, &ci_ep_init[4],
 956                        sizeof(*ci_ep_init));
 957                 INIT_LIST_HEAD(&controller.ep[i].queue);
 958                 controller.ep[i].req_primed = false;
 959                 list_add_tail(&controller.ep[i].ep.ep_list,
 960                               &controller.gadget.ep_list);
 961         }
 962
 963         ci_ep_alloc_request(&controller.ep[0].ep, 0);
 964         if (!controller.ep0_req) {
 965                 free(controller.items_mem);
 966                 free(controller.epts);
 967                 return -ENOMEM;
 968         }
 969
 970         return 0;
 971 }
 972
 973 int usb_gadget_register_driver(struct usb_gadget_driver *driver)
 974 {
 975         int ret;
 976
 977         if (!driver)
 978                 return -EINVAL;
 979         if (!driver->bind || !driver->setup || !driver->disconnect)
 980                 return -EINVAL;
 981         if (driver->speed != USB_SPEED_FULL && driver->speed != USB_SPEED_HIGH)
 982                 return -EINVAL;
 983
 984 #ifdef CONFIG_DM_USB
 985         ret = usb_setup_ehci_gadget(&controller.ctrl);
 986 #else
 987         ret = usb_lowlevel_init(0, USB_INIT_DEVICE, (void **)&controller.ctrl);
 988 #endif
 989         if (ret)
 990                 return ret;
 991
 992         ret = ci_udc_probe();
 993 #if defined(CONFIG_USB_EHCI_MX6) || defined(CONFIG_USB_EHCI_MXS)
 994         /*
 995          * FIXME: usb_lowlevel_init()->ehci_hcd_init() should be doing all
 996          * HW-specific initialization, e.g. ULPI-vs-UTMI PHY selection
 997          */
 998         if (!ret) {
 999                 struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
1000
1001                 /* select ULPI phy */
1002                 writel(PTS(PTS_ENABLE) | PFSC, &udc->portsc);
1003         }
1004 #endif
1005
1006         ret = driver->bind(&controller.gadget);
1007         if (ret) {
1008                 DBG("driver->bind() returned %d\n", ret);
1009                 return ret;
1010         }
1011         controller.driver = driver;
1012
1013         return 0;
1014 }
1015
1016 int usb_gadget_unregister_driver(struct usb_gadget_driver *driver)
1017 {
1018         udc_disconnect();
1019
1020         driver->unbind(&controller.gadget);
1021         controller.driver = NULL;
1022
1023         ci_ep_free_request(&controller.ep[0].ep, &controller.ep0_req->req);
1024         free(controller.items_mem);
1025         free(controller.epts);
1026
1027         return 0;
1028 }
1029
1030 bool dfu_usb_get_reset(void)
1031 {
1032         struct ci_udc *udc = (struct ci_udc *)controller.ctrl->hcor;
1033
1034         return !!(readl(&udc->usbsts) & STS_URI);
1035 }