xref: /openbmc/u-boot/drivers/usb/host/ehci-hcd.c (revision 84683638)
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 }
821