Merge branch 'master' of git://git.denx.de/u-boot-usb
[oweals/u-boot.git] / drivers / usb / host / ehci-hcd.c
1 /*-
2  * Copyright (c) 2007-2008, Juniper Networks, Inc.
3  * Copyright (c) 2008, Excito Elektronik i Skåne AB
4  * Copyright (c) 2008, Michael Trimarchi <trimarchimichael@yahoo.it>
5  *
6  * All rights reserved.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation version 2 of
11  * the License.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23 #include <common.h>
24 #include <asm/byteorder.h>
25 #include <usb.h>
26 #include <asm/io.h>
27 #include <malloc.h>
28 #include <watchdog.h>
29
30 #include "ehci.h"
31
32 int rootdev;
33 struct ehci_hccr *hccr; /* R/O registers, not need for volatile */
34 volatile struct ehci_hcor *hcor;
35
36 static uint16_t portreset;
37 static struct QH qh_list __attribute__((aligned(32)));
38
39 static struct descriptor {
40         struct usb_hub_descriptor hub;
41         struct usb_device_descriptor device;
42         struct usb_linux_config_descriptor config;
43         struct usb_linux_interface_descriptor interface;
44         struct usb_endpoint_descriptor endpoint;
45 }  __attribute__ ((packed)) descriptor = {
46         {
47                 0x8,            /* bDescLength */
48                 0x29,           /* bDescriptorType: hub descriptor */
49                 2,              /* bNrPorts -- runtime modified */
50                 0,              /* wHubCharacteristics */
51                 10,             /* bPwrOn2PwrGood */
52                 0,              /* bHubCntrCurrent */
53                 {},             /* Device removable */
54                 {}              /* at most 7 ports! XXX */
55         },
56         {
57                 0x12,           /* bLength */
58                 1,              /* bDescriptorType: UDESC_DEVICE */
59                 cpu_to_le16(0x0200), /* bcdUSB: v2.0 */
60                 9,              /* bDeviceClass: UDCLASS_HUB */
61                 0,              /* bDeviceSubClass: UDSUBCLASS_HUB */
62                 1,              /* bDeviceProtocol: UDPROTO_HSHUBSTT */
63                 64,             /* bMaxPacketSize: 64 bytes */
64                 0x0000,         /* idVendor */
65                 0x0000,         /* idProduct */
66                 cpu_to_le16(0x0100), /* bcdDevice */
67                 1,              /* iManufacturer */
68                 2,              /* iProduct */
69                 0,              /* iSerialNumber */
70                 1               /* bNumConfigurations: 1 */
71         },
72         {
73                 0x9,
74                 2,              /* bDescriptorType: UDESC_CONFIG */
75                 cpu_to_le16(0x19),
76                 1,              /* bNumInterface */
77                 1,              /* bConfigurationValue */
78                 0,              /* iConfiguration */
79                 0x40,           /* bmAttributes: UC_SELF_POWER */
80                 0               /* bMaxPower */
81         },
82         {
83                 0x9,            /* bLength */
84                 4,              /* bDescriptorType: UDESC_INTERFACE */
85                 0,              /* bInterfaceNumber */
86                 0,              /* bAlternateSetting */
87                 1,              /* bNumEndpoints */
88                 9,              /* bInterfaceClass: UICLASS_HUB */
89                 0,              /* bInterfaceSubClass: UISUBCLASS_HUB */
90                 0,              /* bInterfaceProtocol: UIPROTO_HSHUBSTT */
91                 0               /* iInterface */
92         },
93         {
94                 0x7,            /* bLength */
95                 5,              /* bDescriptorType: UDESC_ENDPOINT */
96                 0x81,           /* bEndpointAddress:
97                                  * UE_DIR_IN | EHCI_INTR_ENDPT
98                                  */
99                 3,              /* bmAttributes: UE_INTERRUPT */
100                 8,              /* wMaxPacketSize */
101                 255             /* bInterval */
102         },
103 };
104
105 #if defined(CONFIG_EHCI_IS_TDI)
106 #define ehci_is_TDI()   (1)
107 #else
108 #define ehci_is_TDI()   (0)
109 #endif
110
111 void __ehci_powerup_fixup(uint32_t *status_reg, uint32_t *reg)
112 {
113         mdelay(50);
114 }
115
116 void ehci_powerup_fixup(uint32_t *status_reg, uint32_t *reg)
117         __attribute__((weak, alias("__ehci_powerup_fixup")));
118
119 static int handshake(uint32_t *ptr, uint32_t mask, uint32_t done, int usec)
120 {
121         uint32_t result;
122         do {
123                 result = ehci_readl(ptr);
124                 udelay(5);
125                 if (result == ~(uint32_t)0)
126                         return -1;
127                 result &= mask;
128                 if (result == done)
129                         return 0;
130                 usec--;
131         } while (usec > 0);
132         return -1;
133 }
134
135 static int ehci_reset(void)
136 {
137         uint32_t cmd;
138         uint32_t tmp;
139         uint32_t *reg_ptr;
140         int ret = 0;
141
142         cmd = ehci_readl(&hcor->or_usbcmd);
143         cmd = (cmd & ~CMD_RUN) | CMD_RESET;
144         ehci_writel(&hcor->or_usbcmd, cmd);
145         ret = handshake((uint32_t *)&hcor->or_usbcmd, CMD_RESET, 0, 250 * 1000);
146         if (ret < 0) {
147                 printf("EHCI fail to reset\n");
148                 goto out;
149         }
150
151         if (ehci_is_TDI()) {
152                 reg_ptr = (uint32_t *)((u8 *)hcor + USBMODE);
153                 tmp = ehci_readl(reg_ptr);
154                 tmp |= USBMODE_CM_HC;
155 #if defined(CONFIG_EHCI_MMIO_BIG_ENDIAN)
156                 tmp |= USBMODE_BE;
157 #endif
158                 ehci_writel(reg_ptr, tmp);
159         }
160
161 #ifdef CONFIG_USB_EHCI_TXFIFO_THRESH
162         cmd = ehci_readl(&hcor->or_txfilltuning);
163         cmd &= ~TXFIFO_THRESH(0x3f);
164         cmd |= TXFIFO_THRESH(CONFIG_USB_EHCI_TXFIFO_THRESH);
165         ehci_writel(&hcor->or_txfilltuning, cmd);
166 #endif
167 out:
168         return ret;
169 }
170
171 static int ehci_td_buffer(struct qTD *td, void *buf, size_t sz)
172 {
173         uint32_t delta, next;
174         uint32_t addr = (uint32_t)buf;
175         size_t rsz = roundup(sz, 32);
176         int idx;
177
178         if (sz != rsz)
179                 debug("EHCI-HCD: Misaligned buffer size (%08x)\n", sz);
180
181         if (addr & 31)
182                 debug("EHCI-HCD: Misaligned buffer address (%p)\n", buf);
183
184         idx = 0;
185         while (idx < 5) {
186                 flush_dcache_range(addr, addr + rsz);
187                 td->qt_buffer[idx] = cpu_to_hc32(addr);
188                 td->qt_buffer_hi[idx] = 0;
189                 next = (addr + 4096) & ~4095;
190                 delta = next - addr;
191                 if (delta >= sz)
192                         break;
193                 sz -= delta;
194                 addr = next;
195                 idx++;
196         }
197
198         if (idx == 5) {
199                 debug("out of buffer pointers (%u bytes left)\n", sz);
200                 return -1;
201         }
202
203         return 0;
204 }
205
206 static int
207 ehci_submit_async(struct usb_device *dev, unsigned long pipe, void *buffer,
208                    int length, struct devrequest *req)
209 {
210         static struct QH qh __attribute__((aligned(32)));
211         static struct qTD qtd[3] __attribute__((aligned (32)));
212         int qtd_counter = 0;
213
214         volatile struct qTD *vtd;
215         unsigned long ts;
216         uint32_t *tdp;
217         uint32_t endpt, token, usbsts;
218         uint32_t c, toggle;
219         uint32_t cmd;
220         int timeout;
221         int ret = 0;
222
223         debug("dev=%p, pipe=%lx, buffer=%p, length=%d, req=%p\n", dev, pipe,
224               buffer, length, req);
225         if (req != NULL)
226                 debug("req=%u (%#x), type=%u (%#x), value=%u (%#x), index=%u\n",
227                       req->request, req->request,
228                       req->requesttype, req->requesttype,
229                       le16_to_cpu(req->value), le16_to_cpu(req->value),
230                       le16_to_cpu(req->index));
231
232         memset(&qh, 0, sizeof(struct QH));
233         memset(qtd, 0, sizeof(qtd));
234
235         toggle = usb_gettoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe));
236
237         /*
238          * Setup QH (3.6 in ehci-r10.pdf)
239          *
240          *   qh_link ................. 03-00 H
241          *   qh_endpt1 ............... 07-04 H
242          *   qh_endpt2 ............... 0B-08 H
243          * - qh_curtd
244          *   qh_overlay.qt_next ...... 13-10 H
245          * - qh_overlay.qt_altnext
246          */
247         qh.qh_link = cpu_to_hc32((uint32_t)&qh_list | QH_LINK_TYPE_QH);
248         c = (usb_pipespeed(pipe) != USB_SPEED_HIGH &&
249              usb_pipeendpoint(pipe) == 0) ? 1 : 0;
250         endpt = (8 << 28) |
251             (c << 27) |
252             (usb_maxpacket(dev, pipe) << 16) |
253             (0 << 15) |
254             (1 << 14) |
255             (usb_pipespeed(pipe) << 12) |
256             (usb_pipeendpoint(pipe) << 8) |
257             (0 << 7) | (usb_pipedevice(pipe) << 0);
258         qh.qh_endpt1 = cpu_to_hc32(endpt);
259         endpt = (1 << 30) |
260             (dev->portnr << 23) |
261             (dev->parent->devnum << 16) | (0 << 8) | (0 << 0);
262         qh.qh_endpt2 = cpu_to_hc32(endpt);
263         qh.qh_overlay.qt_next = cpu_to_hc32(QT_NEXT_TERMINATE);
264
265         tdp = &qh.qh_overlay.qt_next;
266
267         if (req != NULL) {
268                 /*
269                  * Setup request qTD (3.5 in ehci-r10.pdf)
270                  *
271                  *   qt_next ................ 03-00 H
272                  *   qt_altnext ............. 07-04 H
273                  *   qt_token ............... 0B-08 H
274                  *
275                  *   [ buffer, buffer_hi ] loaded with "req".
276                  */
277                 qtd[qtd_counter].qt_next = cpu_to_hc32(QT_NEXT_TERMINATE);
278                 qtd[qtd_counter].qt_altnext = cpu_to_hc32(QT_NEXT_TERMINATE);
279                 token = (0 << 31) |
280                     (sizeof(*req) << 16) |
281                     (0 << 15) | (0 << 12) | (3 << 10) | (2 << 8) | (0x80 << 0);
282                 qtd[qtd_counter].qt_token = cpu_to_hc32(token);
283                 if (ehci_td_buffer(&qtd[qtd_counter], req, sizeof(*req)) != 0) {
284                         debug("unable construct SETUP td\n");
285                         goto fail;
286                 }
287                 /* Update previous qTD! */
288                 *tdp = cpu_to_hc32((uint32_t)&qtd[qtd_counter]);
289                 tdp = &qtd[qtd_counter++].qt_next;
290                 toggle = 1;
291         }
292
293         if (length > 0 || req == NULL) {
294                 /*
295                  * Setup request qTD (3.5 in ehci-r10.pdf)
296                  *
297                  *   qt_next ................ 03-00 H
298                  *   qt_altnext ............. 07-04 H
299                  *   qt_token ............... 0B-08 H
300                  *
301                  *   [ buffer, buffer_hi ] loaded with "buffer".
302                  */
303                 qtd[qtd_counter].qt_next = cpu_to_hc32(QT_NEXT_TERMINATE);
304                 qtd[qtd_counter].qt_altnext = cpu_to_hc32(QT_NEXT_TERMINATE);
305                 token = (toggle << 31) |
306                     (length << 16) |
307                     ((req == NULL ? 1 : 0) << 15) |
308                     (0 << 12) |
309                     (3 << 10) |
310                     ((usb_pipein(pipe) ? 1 : 0) << 8) | (0x80 << 0);
311                 qtd[qtd_counter].qt_token = cpu_to_hc32(token);
312                 if (ehci_td_buffer(&qtd[qtd_counter], buffer, length) != 0) {
313                         debug("unable construct DATA td\n");
314                         goto fail;
315                 }
316                 /* Update previous qTD! */
317                 *tdp = cpu_to_hc32((uint32_t)&qtd[qtd_counter]);
318                 tdp = &qtd[qtd_counter++].qt_next;
319         }
320
321         if (req != NULL) {
322                 /*
323                  * Setup request qTD (3.5 in ehci-r10.pdf)
324                  *
325                  *   qt_next ................ 03-00 H
326                  *   qt_altnext ............. 07-04 H
327                  *   qt_token ............... 0B-08 H
328                  */
329                 qtd[qtd_counter].qt_next = cpu_to_hc32(QT_NEXT_TERMINATE);
330                 qtd[qtd_counter].qt_altnext = cpu_to_hc32(QT_NEXT_TERMINATE);
331                 token = (toggle << 31) |
332                     (0 << 16) |
333                     (1 << 15) |
334                     (0 << 12) |
335                     (3 << 10) |
336                     ((usb_pipein(pipe) ? 0 : 1) << 8) | (0x80 << 0);
337                 qtd[qtd_counter].qt_token = cpu_to_hc32(token);
338                 /* Update previous qTD! */
339                 *tdp = cpu_to_hc32((uint32_t)&qtd[qtd_counter]);
340                 tdp = &qtd[qtd_counter++].qt_next;
341         }
342
343         qh_list.qh_link = cpu_to_hc32((uint32_t)&qh | QH_LINK_TYPE_QH);
344
345         /* Flush dcache */
346         flush_dcache_range((uint32_t)&qh_list,
347                 (uint32_t)&qh_list + sizeof(struct QH));
348         flush_dcache_range((uint32_t)&qh, (uint32_t)&qh + sizeof(struct QH));
349         flush_dcache_range((uint32_t)qtd, (uint32_t)qtd + sizeof(qtd));
350
351         usbsts = ehci_readl(&hcor->or_usbsts);
352         ehci_writel(&hcor->or_usbsts, (usbsts & 0x3f));
353
354         /* Enable async. schedule. */
355         cmd = ehci_readl(&hcor->or_usbcmd);
356         cmd |= CMD_ASE;
357         ehci_writel(&hcor->or_usbcmd, cmd);
358
359         ret = handshake((uint32_t *)&hcor->or_usbsts, STD_ASS, STD_ASS,
360                         100 * 1000);
361         if (ret < 0) {
362                 printf("EHCI fail timeout STD_ASS set\n");
363                 goto fail;
364         }
365
366         /* Wait for TDs to be processed. */
367         ts = get_timer(0);
368         vtd = &qtd[qtd_counter - 1];
369         timeout = USB_TIMEOUT_MS(pipe);
370         do {
371                 /* Invalidate dcache */
372                 invalidate_dcache_range((uint32_t)&qh_list,
373                         (uint32_t)&qh_list + sizeof(struct QH));
374                 invalidate_dcache_range((uint32_t)&qh,
375                         (uint32_t)&qh + sizeof(struct QH));
376                 invalidate_dcache_range((uint32_t)qtd,
377                         (uint32_t)qtd + sizeof(qtd));
378
379                 token = hc32_to_cpu(vtd->qt_token);
380                 if (!(token & 0x80))
381                         break;
382                 WATCHDOG_RESET();
383         } while (get_timer(ts) < timeout);
384
385         /* Invalidate the memory area occupied by buffer */
386         invalidate_dcache_range(((uint32_t)buffer & ~31),
387                 ((uint32_t)buffer & ~31) + roundup(length, 32));
388
389         /* Check that the TD processing happened */
390         if (token & 0x80) {
391                 printf("EHCI timed out on TD - token=%#x\n", token);
392         }
393
394         /* Disable async schedule. */
395         cmd = ehci_readl(&hcor->or_usbcmd);
396         cmd &= ~CMD_ASE;
397         ehci_writel(&hcor->or_usbcmd, cmd);
398
399         ret = handshake((uint32_t *)&hcor->or_usbsts, STD_ASS, 0,
400                         100 * 1000);
401         if (ret < 0) {
402                 printf("EHCI fail timeout STD_ASS reset\n");
403                 goto fail;
404         }
405
406         qh_list.qh_link = cpu_to_hc32((uint32_t)&qh_list | QH_LINK_TYPE_QH);
407
408         token = hc32_to_cpu(qh.qh_overlay.qt_token);
409         if (!(token & 0x80)) {
410                 debug("TOKEN=%#x\n", token);
411                 switch (token & 0xfc) {
412                 case 0:
413                         toggle = token >> 31;
414                         usb_settoggle(dev, usb_pipeendpoint(pipe),
415                                        usb_pipeout(pipe), toggle);
416                         dev->status = 0;
417                         break;
418                 case 0x40:
419                         dev->status = USB_ST_STALLED;
420                         break;
421                 case 0xa0:
422                 case 0x20:
423                         dev->status = USB_ST_BUF_ERR;
424                         break;
425                 case 0x50:
426                 case 0x10:
427                         dev->status = USB_ST_BABBLE_DET;
428                         break;
429                 default:
430                         dev->status = USB_ST_CRC_ERR;
431                         if ((token & 0x40) == 0x40)
432                                 dev->status |= USB_ST_STALLED;
433                         break;
434                 }
435                 dev->act_len = length - ((token >> 16) & 0x7fff);
436         } else {
437                 dev->act_len = 0;
438                 debug("dev=%u, usbsts=%#x, p[1]=%#x, p[2]=%#x\n",
439                       dev->devnum, ehci_readl(&hcor->or_usbsts),
440                       ehci_readl(&hcor->or_portsc[0]),
441                       ehci_readl(&hcor->or_portsc[1]));
442         }
443
444         return (dev->status != USB_ST_NOT_PROC) ? 0 : -1;
445
446 fail:
447         return -1;
448 }
449
450 static inline int min3(int a, int b, int c)
451 {
452
453         if (b < a)
454                 a = b;
455         if (c < a)
456                 a = c;
457         return a;
458 }
459
460 int
461 ehci_submit_root(struct usb_device *dev, unsigned long pipe, void *buffer,
462                  int length, struct devrequest *req)
463 {
464         uint8_t tmpbuf[4];
465         u16 typeReq;
466         void *srcptr = NULL;
467         int len, srclen;
468         uint32_t reg;
469         uint32_t *status_reg;
470
471         if (le16_to_cpu(req->index) > CONFIG_SYS_USB_EHCI_MAX_ROOT_PORTS) {
472                 printf("The request port(%d) is not configured\n",
473                         le16_to_cpu(req->index) - 1);
474                 return -1;
475         }
476         status_reg = (uint32_t *)&hcor->or_portsc[
477                                                 le16_to_cpu(req->index) - 1];
478         srclen = 0;
479
480         debug("req=%u (%#x), type=%u (%#x), value=%u, index=%u\n",
481               req->request, req->request,
482               req->requesttype, req->requesttype,
483               le16_to_cpu(req->value), le16_to_cpu(req->index));
484
485         typeReq = req->request | req->requesttype << 8;
486
487         switch (typeReq) {
488         case DeviceRequest | USB_REQ_GET_DESCRIPTOR:
489                 switch (le16_to_cpu(req->value) >> 8) {
490                 case USB_DT_DEVICE:
491                         debug("USB_DT_DEVICE request\n");
492                         srcptr = &descriptor.device;
493                         srclen = 0x12;
494                         break;
495                 case USB_DT_CONFIG:
496                         debug("USB_DT_CONFIG config\n");
497                         srcptr = &descriptor.config;
498                         srclen = 0x19;
499                         break;
500                 case USB_DT_STRING:
501                         debug("USB_DT_STRING config\n");
502                         switch (le16_to_cpu(req->value) & 0xff) {
503                         case 0: /* Language */
504                                 srcptr = "\4\3\1\0";
505                                 srclen = 4;
506                                 break;
507                         case 1: /* Vendor */
508                                 srcptr = "\16\3u\0-\0b\0o\0o\0t\0";
509                                 srclen = 14;
510                                 break;
511                         case 2: /* Product */
512                                 srcptr = "\52\3E\0H\0C\0I\0 "
513                                          "\0H\0o\0s\0t\0 "
514                                          "\0C\0o\0n\0t\0r\0o\0l\0l\0e\0r\0";
515                                 srclen = 42;
516                                 break;
517                         default:
518                                 debug("unknown value DT_STRING %x\n",
519                                         le16_to_cpu(req->value));
520                                 goto unknown;
521                         }
522                         break;
523                 default:
524                         debug("unknown value %x\n", le16_to_cpu(req->value));
525                         goto unknown;
526                 }
527                 break;
528         case USB_REQ_GET_DESCRIPTOR | ((USB_DIR_IN | USB_RT_HUB) << 8):
529                 switch (le16_to_cpu(req->value) >> 8) {
530                 case USB_DT_HUB:
531                         debug("USB_DT_HUB config\n");
532                         srcptr = &descriptor.hub;
533                         srclen = 0x8;
534                         break;
535                 default:
536                         debug("unknown value %x\n", le16_to_cpu(req->value));
537                         goto unknown;
538                 }
539                 break;
540         case USB_REQ_SET_ADDRESS | (USB_RECIP_DEVICE << 8):
541                 debug("USB_REQ_SET_ADDRESS\n");
542                 rootdev = le16_to_cpu(req->value);
543                 break;
544         case DeviceOutRequest | USB_REQ_SET_CONFIGURATION:
545                 debug("USB_REQ_SET_CONFIGURATION\n");
546                 /* Nothing to do */
547                 break;
548         case USB_REQ_GET_STATUS | ((USB_DIR_IN | USB_RT_HUB) << 8):
549                 tmpbuf[0] = 1;  /* USB_STATUS_SELFPOWERED */
550                 tmpbuf[1] = 0;
551                 srcptr = tmpbuf;
552                 srclen = 2;
553                 break;
554         case USB_REQ_GET_STATUS | ((USB_RT_PORT | USB_DIR_IN) << 8):
555                 memset(tmpbuf, 0, 4);
556                 reg = ehci_readl(status_reg);
557                 if (reg & EHCI_PS_CS)
558                         tmpbuf[0] |= USB_PORT_STAT_CONNECTION;
559                 if (reg & EHCI_PS_PE)
560                         tmpbuf[0] |= USB_PORT_STAT_ENABLE;
561                 if (reg & EHCI_PS_SUSP)
562                         tmpbuf[0] |= USB_PORT_STAT_SUSPEND;
563                 if (reg & EHCI_PS_OCA)
564                         tmpbuf[0] |= USB_PORT_STAT_OVERCURRENT;
565                 if (reg & EHCI_PS_PR)
566                         tmpbuf[0] |= USB_PORT_STAT_RESET;
567                 if (reg & EHCI_PS_PP)
568                         tmpbuf[1] |= USB_PORT_STAT_POWER >> 8;
569
570                 if (ehci_is_TDI()) {
571                         switch ((reg >> 26) & 3) {
572                         case 0:
573                                 break;
574                         case 1:
575                                 tmpbuf[1] |= USB_PORT_STAT_LOW_SPEED >> 8;
576                                 break;
577                         case 2:
578                         default:
579                                 tmpbuf[1] |= USB_PORT_STAT_HIGH_SPEED >> 8;
580                                 break;
581                         }
582                 } else {
583                         tmpbuf[1] |= USB_PORT_STAT_HIGH_SPEED >> 8;
584                 }
585
586                 if (reg & EHCI_PS_CSC)
587                         tmpbuf[2] |= USB_PORT_STAT_C_CONNECTION;
588                 if (reg & EHCI_PS_PEC)
589                         tmpbuf[2] |= USB_PORT_STAT_C_ENABLE;
590                 if (reg & EHCI_PS_OCC)
591                         tmpbuf[2] |= USB_PORT_STAT_C_OVERCURRENT;
592                 if (portreset & (1 << le16_to_cpu(req->index)))
593                         tmpbuf[2] |= USB_PORT_STAT_C_RESET;
594
595                 srcptr = tmpbuf;
596                 srclen = 4;
597                 break;
598         case USB_REQ_SET_FEATURE | ((USB_DIR_OUT | USB_RT_PORT) << 8):
599                 reg = ehci_readl(status_reg);
600                 reg &= ~EHCI_PS_CLEAR;
601                 switch (le16_to_cpu(req->value)) {
602                 case USB_PORT_FEAT_ENABLE:
603                         reg |= EHCI_PS_PE;
604                         ehci_writel(status_reg, reg);
605                         break;
606                 case USB_PORT_FEAT_POWER:
607                         if (HCS_PPC(ehci_readl(&hccr->cr_hcsparams))) {
608                                 reg |= EHCI_PS_PP;
609                                 ehci_writel(status_reg, reg);
610                         }
611                         break;
612                 case USB_PORT_FEAT_RESET:
613                         if ((reg & (EHCI_PS_PE | EHCI_PS_CS)) == EHCI_PS_CS &&
614                             !ehci_is_TDI() &&
615                             EHCI_PS_IS_LOWSPEED(reg)) {
616                                 /* Low speed device, give up ownership. */
617                                 debug("port %d low speed --> companion\n",
618                                       req->index - 1);
619                                 reg |= EHCI_PS_PO;
620                                 ehci_writel(status_reg, reg);
621                                 break;
622                         } else {
623                                 int ret;
624
625                                 reg |= EHCI_PS_PR;
626                                 reg &= ~EHCI_PS_PE;
627                                 ehci_writel(status_reg, reg);
628                                 /*
629                                  * caller must wait, then call GetPortStatus
630                                  * usb 2.0 specification say 50 ms resets on
631                                  * root
632                                  */
633                                 ehci_powerup_fixup(status_reg, &reg);
634
635                                 ehci_writel(status_reg, reg & ~EHCI_PS_PR);
636                                 /*
637                                  * A host controller must terminate the reset
638                                  * and stabilize the state of the port within
639                                  * 2 milliseconds
640                                  */
641                                 ret = handshake(status_reg, EHCI_PS_PR, 0,
642                                                 2 * 1000);
643                                 if (!ret)
644                                         portreset |=
645                                                 1 << le16_to_cpu(req->index);
646                                 else
647                                         printf("port(%d) reset error\n",
648                                         le16_to_cpu(req->index) - 1);
649                         }
650                         break;
651                 default:
652                         debug("unknown feature %x\n", le16_to_cpu(req->value));
653                         goto unknown;
654                 }
655                 /* unblock posted writes */
656                 (void) ehci_readl(&hcor->or_usbcmd);
657                 break;
658         case USB_REQ_CLEAR_FEATURE | ((USB_DIR_OUT | USB_RT_PORT) << 8):
659                 reg = ehci_readl(status_reg);
660                 switch (le16_to_cpu(req->value)) {
661                 case USB_PORT_FEAT_ENABLE:
662                         reg &= ~EHCI_PS_PE;
663                         break;
664                 case USB_PORT_FEAT_C_ENABLE:
665                         reg = (reg & ~EHCI_PS_CLEAR) | EHCI_PS_PE;
666                         break;
667                 case USB_PORT_FEAT_POWER:
668                         if (HCS_PPC(ehci_readl(&hccr->cr_hcsparams)))
669                                 reg = reg & ~(EHCI_PS_CLEAR | EHCI_PS_PP);
670                 case USB_PORT_FEAT_C_CONNECTION:
671                         reg = (reg & ~EHCI_PS_CLEAR) | EHCI_PS_CSC;
672                         break;
673                 case USB_PORT_FEAT_OVER_CURRENT:
674                         reg = (reg & ~EHCI_PS_CLEAR) | EHCI_PS_OCC;
675                         break;
676                 case USB_PORT_FEAT_C_RESET:
677                         portreset &= ~(1 << le16_to_cpu(req->index));
678                         break;
679                 default:
680                         debug("unknown feature %x\n", le16_to_cpu(req->value));
681                         goto unknown;
682                 }
683                 ehci_writel(status_reg, reg);
684                 /* unblock posted write */
685                 (void) ehci_readl(&hcor->or_usbcmd);
686                 break;
687         default:
688                 debug("Unknown request\n");
689                 goto unknown;
690         }
691
692         mdelay(1);
693         len = min3(srclen, le16_to_cpu(req->length), length);
694         if (srcptr != NULL && len > 0)
695                 memcpy(buffer, srcptr, len);
696         else
697                 debug("Len is 0\n");
698
699         dev->act_len = len;
700         dev->status = 0;
701         return 0;
702
703 unknown:
704         debug("requesttype=%x, request=%x, value=%x, index=%x, length=%x\n",
705               req->requesttype, req->request, le16_to_cpu(req->value),
706               le16_to_cpu(req->index), le16_to_cpu(req->length));
707
708         dev->act_len = 0;
709         dev->status = USB_ST_STALLED;
710         return -1;
711 }
712
713 int usb_lowlevel_stop(void)
714 {
715         return ehci_hcd_stop();
716 }
717
718 int usb_lowlevel_init(void)
719 {
720         uint32_t reg;
721         uint32_t cmd;
722
723         if (ehci_hcd_init() != 0)
724                 return -1;
725
726         /* EHCI spec section 4.1 */
727         if (ehci_reset() != 0)
728                 return -1;
729
730 #if defined(CONFIG_EHCI_HCD_INIT_AFTER_RESET)
731         if (ehci_hcd_init() != 0)
732                 return -1;
733 #endif
734
735         /* Set head of reclaim list */
736         memset(&qh_list, 0, sizeof(qh_list));
737         qh_list.qh_link = cpu_to_hc32((uint32_t)&qh_list | QH_LINK_TYPE_QH);
738         qh_list.qh_endpt1 = cpu_to_hc32((1 << 15) | (USB_SPEED_HIGH << 12));
739         qh_list.qh_curtd = cpu_to_hc32(QT_NEXT_TERMINATE);
740         qh_list.qh_overlay.qt_next = cpu_to_hc32(QT_NEXT_TERMINATE);
741         qh_list.qh_overlay.qt_altnext = cpu_to_hc32(QT_NEXT_TERMINATE);
742         qh_list.qh_overlay.qt_token = cpu_to_hc32(0x40);
743
744         /* Set async. queue head pointer. */
745         ehci_writel(&hcor->or_asynclistaddr, (uint32_t)&qh_list);
746
747         reg = ehci_readl(&hccr->cr_hcsparams);
748         descriptor.hub.bNbrPorts = HCS_N_PORTS(reg);
749         printf("Register %x NbrPorts %d\n", reg, descriptor.hub.bNbrPorts);
750         /* Port Indicators */
751         if (HCS_INDICATOR(reg))
752                 descriptor.hub.wHubCharacteristics |= 0x80;
753         /* Port Power Control */
754         if (HCS_PPC(reg))
755                 descriptor.hub.wHubCharacteristics |= 0x01;
756
757         /* Start the host controller. */
758         cmd = ehci_readl(&hcor->or_usbcmd);
759         /*
760          * Philips, Intel, and maybe others need CMD_RUN before the
761          * root hub will detect new devices (why?); NEC doesn't
762          */
763         cmd &= ~(CMD_LRESET|CMD_IAAD|CMD_PSE|CMD_ASE|CMD_RESET);
764         cmd |= CMD_RUN;
765         ehci_writel(&hcor->or_usbcmd, cmd);
766
767         /* take control over the ports */
768         cmd = ehci_readl(&hcor->or_configflag);
769         cmd |= FLAG_CF;
770         ehci_writel(&hcor->or_configflag, cmd);
771         /* unblock posted write */
772         cmd = ehci_readl(&hcor->or_usbcmd);
773         mdelay(5);
774         reg = HC_VERSION(ehci_readl(&hccr->cr_capbase));
775         printf("USB EHCI %x.%02x\n", reg >> 8, reg & 0xff);
776
777         rootdev = 0;
778
779         return 0;
780 }
781
782 int
783 submit_bulk_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
784                 int length)
785 {
786
787         if (usb_pipetype(pipe) != PIPE_BULK) {
788                 debug("non-bulk pipe (type=%lu)", usb_pipetype(pipe));
789                 return -1;
790         }
791         return ehci_submit_async(dev, pipe, buffer, length, NULL);
792 }
793
794 int
795 submit_control_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
796                    int length, struct devrequest *setup)
797 {
798
799         if (usb_pipetype(pipe) != PIPE_CONTROL) {
800                 debug("non-control pipe (type=%lu)", usb_pipetype(pipe));
801                 return -1;
802         }
803
804         if (usb_pipedevice(pipe) == rootdev) {
805                 if (rootdev == 0)
806                         dev->speed = USB_SPEED_HIGH;
807                 return ehci_submit_root(dev, pipe, buffer, length, setup);
808         }
809         return ehci_submit_async(dev, pipe, buffer, length, setup);
810 }
811
812 int
813 submit_int_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
814                int length, int interval)
815 {
816
817         debug("dev=%p, pipe=%lu, buffer=%p, length=%d, interval=%d",
818               dev, pipe, buffer, length, interval);
819         return ehci_submit_async(dev, pipe, buffer, length, NULL);
820 }