xref: /openbmc/u-boot/drivers/usb/host/dwc2.c (revision 5c0beb5c)
1 /*
2  * Copyright (C) 2012 Oleksandr Tymoshenko <gonzo@freebsd.org>
3  * Copyright (C) 2014 Marek Vasut <marex@denx.de>
4  *
5  * SPDX-License-Identifier:     GPL-2.0+
6  */
7 
8 #include <common.h>
9 #include <errno.h>
10 #include <usb.h>
11 #include <malloc.h>
12 #include <phys2bus.h>
13 #include <usbroothubdes.h>
14 #include <asm/io.h>
15 
16 #include "dwc2.h"
17 
18 /* Use only HC channel 0. */
19 #define DWC2_HC_CHANNEL			0
20 
21 #define DWC2_STATUS_BUF_SIZE		64
22 #define DWC2_DATA_BUF_SIZE		(64 * 1024)
23 
24 /* We need doubleword-aligned buffers for DMA transfers */
25 DEFINE_ALIGN_BUFFER(uint8_t, aligned_buffer, DWC2_DATA_BUF_SIZE, 8);
26 DEFINE_ALIGN_BUFFER(uint8_t, status_buffer, DWC2_STATUS_BUF_SIZE, 8);
27 
28 #define MAX_DEVICE			16
29 #define MAX_ENDPOINT			16
30 static int bulk_data_toggle[MAX_DEVICE][MAX_ENDPOINT];
31 
32 static int root_hub_devnum;
33 
34 static struct dwc2_core_regs *regs =
35 	(struct dwc2_core_regs *)CONFIG_USB_DWC2_REG_ADDR;
36 
37 /*
38  * DWC2 IP interface
39  */
40 static int wait_for_bit(void *reg, const uint32_t mask, bool set)
41 {
42 	unsigned int timeout = 1000000;
43 	uint32_t val;
44 
45 	while (--timeout) {
46 		val = readl(reg);
47 		if (!set)
48 			val = ~val;
49 
50 		if ((val & mask) == mask)
51 			return 0;
52 
53 		udelay(1);
54 	}
55 
56 	debug("%s: Timeout (reg=%p mask=%08x wait_set=%i)\n",
57 	      __func__, reg, mask, set);
58 
59 	return -ETIMEDOUT;
60 }
61 
62 /*
63  * Initializes the FSLSPClkSel field of the HCFG register
64  * depending on the PHY type.
65  */
66 static void init_fslspclksel(struct dwc2_core_regs *regs)
67 {
68 	uint32_t phyclk;
69 
70 #if (CONFIG_DWC2_PHY_TYPE == DWC2_PHY_TYPE_FS)
71 	phyclk = DWC2_HCFG_FSLSPCLKSEL_48_MHZ;	/* Full speed PHY */
72 #else
73 	/* High speed PHY running at full speed or high speed */
74 	phyclk = DWC2_HCFG_FSLSPCLKSEL_30_60_MHZ;
75 #endif
76 
77 #ifdef CONFIG_DWC2_ULPI_FS_LS
78 	uint32_t hwcfg2 = readl(&regs->ghwcfg2);
79 	uint32_t hval = (ghwcfg2 & DWC2_HWCFG2_HS_PHY_TYPE_MASK) >>
80 			DWC2_HWCFG2_HS_PHY_TYPE_OFFSET;
81 	uint32_t fval = (ghwcfg2 & DWC2_HWCFG2_FS_PHY_TYPE_MASK) >>
82 			DWC2_HWCFG2_FS_PHY_TYPE_OFFSET;
83 
84 	if (hval == 2 && fval == 1)
85 		phyclk = DWC2_HCFG_FSLSPCLKSEL_48_MHZ;	/* Full speed PHY */
86 #endif
87 
88 	clrsetbits_le32(&regs->host_regs.hcfg,
89 			DWC2_HCFG_FSLSPCLKSEL_MASK,
90 			phyclk << DWC2_HCFG_FSLSPCLKSEL_OFFSET);
91 }
92 
93 /*
94  * Flush a Tx FIFO.
95  *
96  * @param regs Programming view of DWC_otg controller.
97  * @param num Tx FIFO to flush.
98  */
99 static void dwc_otg_flush_tx_fifo(struct dwc2_core_regs *regs, const int num)
100 {
101 	int ret;
102 
103 	writel(DWC2_GRSTCTL_TXFFLSH | (num << DWC2_GRSTCTL_TXFNUM_OFFSET),
104 	       &regs->grstctl);
105 	ret = wait_for_bit(&regs->grstctl, DWC2_GRSTCTL_TXFFLSH, 0);
106 	if (ret)
107 		printf("%s: Timeout!\n", __func__);
108 
109 	/* Wait for 3 PHY Clocks */
110 	udelay(1);
111 }
112 
113 /*
114  * Flush Rx FIFO.
115  *
116  * @param regs Programming view of DWC_otg controller.
117  */
118 static void dwc_otg_flush_rx_fifo(struct dwc2_core_regs *regs)
119 {
120 	int ret;
121 
122 	writel(DWC2_GRSTCTL_RXFFLSH, &regs->grstctl);
123 	ret = wait_for_bit(&regs->grstctl, DWC2_GRSTCTL_RXFFLSH, 0);
124 	if (ret)
125 		printf("%s: Timeout!\n", __func__);
126 
127 	/* Wait for 3 PHY Clocks */
128 	udelay(1);
129 }
130 
131 /*
132  * Do core a soft reset of the core.  Be careful with this because it
133  * resets all the internal state machines of the core.
134  */
135 static void dwc_otg_core_reset(struct dwc2_core_regs *regs)
136 {
137 	int ret;
138 
139 	/* Wait for AHB master IDLE state. */
140 	ret = wait_for_bit(&regs->grstctl, DWC2_GRSTCTL_AHBIDLE, 1);
141 	if (ret)
142 		printf("%s: Timeout!\n", __func__);
143 
144 	/* Core Soft Reset */
145 	writel(DWC2_GRSTCTL_CSFTRST, &regs->grstctl);
146 	ret = wait_for_bit(&regs->grstctl, DWC2_GRSTCTL_CSFTRST, 0);
147 	if (ret)
148 		printf("%s: Timeout!\n", __func__);
149 
150 	/*
151 	 * Wait for core to come out of reset.
152 	 * NOTE: This long sleep is _very_ important, otherwise the core will
153 	 *       not stay in host mode after a connector ID change!
154 	 */
155 	mdelay(100);
156 }
157 
158 /*
159  * This function initializes the DWC_otg controller registers for
160  * host mode.
161  *
162  * This function flushes the Tx and Rx FIFOs and it flushes any entries in the
163  * request queues. Host channels are reset to ensure that they are ready for
164  * performing transfers.
165  *
166  * @param regs Programming view of DWC_otg controller
167  *
168  */
169 static void dwc_otg_core_host_init(struct dwc2_core_regs *regs)
170 {
171 	uint32_t nptxfifosize = 0;
172 	uint32_t ptxfifosize = 0;
173 	uint32_t hprt0 = 0;
174 	int i, ret, num_channels;
175 
176 	/* Restart the Phy Clock */
177 	writel(0, &regs->pcgcctl);
178 
179 	/* Initialize Host Configuration Register */
180 	init_fslspclksel(regs);
181 #ifdef CONFIG_DWC2_DFLT_SPEED_FULL
182 	setbits_le32(&regs->host_regs.hcfg, DWC2_HCFG_FSLSSUPP);
183 #endif
184 
185 	/* Configure data FIFO sizes */
186 #ifdef CONFIG_DWC2_ENABLE_DYNAMIC_FIFO
187 	if (readl(&regs->ghwcfg2) & DWC2_HWCFG2_DYNAMIC_FIFO) {
188 		/* Rx FIFO */
189 		writel(CONFIG_DWC2_HOST_RX_FIFO_SIZE, &regs->grxfsiz);
190 
191 		/* Non-periodic Tx FIFO */
192 		nptxfifosize |= CONFIG_DWC2_HOST_NPERIO_TX_FIFO_SIZE <<
193 				DWC2_FIFOSIZE_DEPTH_OFFSET;
194 		nptxfifosize |= CONFIG_DWC2_HOST_RX_FIFO_SIZE <<
195 				DWC2_FIFOSIZE_STARTADDR_OFFSET;
196 		writel(nptxfifosize, &regs->gnptxfsiz);
197 
198 		/* Periodic Tx FIFO */
199 		ptxfifosize |= CONFIG_DWC2_HOST_PERIO_TX_FIFO_SIZE <<
200 				DWC2_FIFOSIZE_DEPTH_OFFSET;
201 		ptxfifosize |= (CONFIG_DWC2_HOST_RX_FIFO_SIZE +
202 				CONFIG_DWC2_HOST_NPERIO_TX_FIFO_SIZE) <<
203 				DWC2_FIFOSIZE_STARTADDR_OFFSET;
204 		writel(ptxfifosize, &regs->hptxfsiz);
205 	}
206 #endif
207 
208 	/* Clear Host Set HNP Enable in the OTG Control Register */
209 	clrbits_le32(&regs->gotgctl, DWC2_GOTGCTL_HSTSETHNPEN);
210 
211 	/* Make sure the FIFOs are flushed. */
212 	dwc_otg_flush_tx_fifo(regs, 0x10);	/* All Tx FIFOs */
213 	dwc_otg_flush_rx_fifo(regs);
214 
215 	/* Flush out any leftover queued requests. */
216 	num_channels = readl(&regs->ghwcfg2);
217 	num_channels &= DWC2_HWCFG2_NUM_HOST_CHAN_MASK;
218 	num_channels >>= DWC2_HWCFG2_NUM_HOST_CHAN_OFFSET;
219 	num_channels += 1;
220 
221 	for (i = 0; i < num_channels; i++)
222 		clrsetbits_le32(&regs->hc_regs[i].hcchar,
223 				DWC2_HCCHAR_CHEN | DWC2_HCCHAR_EPDIR,
224 				DWC2_HCCHAR_CHDIS);
225 
226 	/* Halt all channels to put them into a known state. */
227 	for (i = 0; i < num_channels; i++) {
228 		clrsetbits_le32(&regs->hc_regs[i].hcchar,
229 				DWC2_HCCHAR_EPDIR,
230 				DWC2_HCCHAR_CHEN | DWC2_HCCHAR_CHDIS);
231 		ret = wait_for_bit(&regs->hc_regs[i].hcchar,
232 				   DWC2_HCCHAR_CHEN, 0);
233 		if (ret)
234 			printf("%s: Timeout!\n", __func__);
235 	}
236 
237 	/* Turn on the vbus power. */
238 	if (readl(&regs->gintsts) & DWC2_GINTSTS_CURMODE_HOST) {
239 		hprt0 = readl(&regs->hprt0);
240 		hprt0 &= ~(DWC2_HPRT0_PRTENA | DWC2_HPRT0_PRTCONNDET);
241 		hprt0 &= ~(DWC2_HPRT0_PRTENCHNG | DWC2_HPRT0_PRTOVRCURRCHNG);
242 		if (!(hprt0 & DWC2_HPRT0_PRTPWR)) {
243 			hprt0 |= DWC2_HPRT0_PRTPWR;
244 			writel(hprt0, &regs->hprt0);
245 		}
246 	}
247 }
248 
249 /*
250  * This function initializes the DWC_otg controller registers and
251  * prepares the core for device mode or host mode operation.
252  *
253  * @param regs Programming view of the DWC_otg controller
254  */
255 static void dwc_otg_core_init(struct dwc2_core_regs *regs)
256 {
257 	uint32_t ahbcfg = 0;
258 	uint32_t usbcfg = 0;
259 	uint8_t brst_sz = CONFIG_DWC2_DMA_BURST_SIZE;
260 
261 	/* Common Initialization */
262 	usbcfg = readl(&regs->gusbcfg);
263 
264 	/* Program the ULPI External VBUS bit if needed */
265 #ifdef CONFIG_DWC2_PHY_ULPI_EXT_VBUS
266 	usbcfg |= DWC2_GUSBCFG_ULPI_EXT_VBUS_DRV;
267 #else
268 	usbcfg &= ~DWC2_GUSBCFG_ULPI_EXT_VBUS_DRV;
269 #endif
270 
271 	/* Set external TS Dline pulsing */
272 #ifdef CONFIG_DWC2_TS_DLINE
273 	usbcfg |= DWC2_GUSBCFG_TERM_SEL_DL_PULSE;
274 #else
275 	usbcfg &= ~DWC2_GUSBCFG_TERM_SEL_DL_PULSE;
276 #endif
277 	writel(usbcfg, &regs->gusbcfg);
278 
279 	/* Reset the Controller */
280 	dwc_otg_core_reset(regs);
281 
282 	/*
283 	 * This programming sequence needs to happen in FS mode before
284 	 * any other programming occurs
285 	 */
286 #if defined(CONFIG_DWC2_DFLT_SPEED_FULL) && \
287 	(CONFIG_DWC2_PHY_TYPE == DWC2_PHY_TYPE_FS)
288 	/* If FS mode with FS PHY */
289 	setbits_le32(&regs->gusbcfg, DWC2_GUSBCFG_PHYSEL);
290 
291 	/* Reset after a PHY select */
292 	dwc_otg_core_reset(regs);
293 
294 	/*
295 	 * Program DCFG.DevSpd or HCFG.FSLSPclkSel to 48Mhz in FS.
296 	 * Also do this on HNP Dev/Host mode switches (done in dev_init
297 	 * and host_init).
298 	 */
299 	if (readl(&regs->gintsts) & DWC2_GINTSTS_CURMODE_HOST)
300 		init_fslspclksel(regs);
301 
302 #ifdef CONFIG_DWC2_I2C_ENABLE
303 	/* Program GUSBCFG.OtgUtmifsSel to I2C */
304 	setbits_le32(&regs->gusbcfg, DWC2_GUSBCFG_OTGUTMIFSSEL);
305 
306 	/* Program GI2CCTL.I2CEn */
307 	clrsetbits_le32(&regs->gi2cctl, DWC2_GI2CCTL_I2CEN |
308 			DWC2_GI2CCTL_I2CDEVADDR_MASK,
309 			1 << DWC2_GI2CCTL_I2CDEVADDR_OFFSET);
310 	setbits_le32(&regs->gi2cctl, DWC2_GI2CCTL_I2CEN);
311 #endif
312 
313 #else
314 	/* High speed PHY. */
315 
316 	/*
317 	 * HS PHY parameters. These parameters are preserved during
318 	 * soft reset so only program the first time. Do a soft reset
319 	 * immediately after setting phyif.
320 	 */
321 	usbcfg &= ~(DWC2_GUSBCFG_ULPI_UTMI_SEL | DWC2_GUSBCFG_PHYIF);
322 	usbcfg |= CONFIG_DWC2_PHY_TYPE << DWC2_GUSBCFG_ULPI_UTMI_SEL_OFFSET;
323 
324 	if (usbcfg & DWC2_GUSBCFG_ULPI_UTMI_SEL) {	/* ULPI interface */
325 #ifdef CONFIG_DWC2_PHY_ULPI_DDR
326 		usbcfg |= DWC2_GUSBCFG_DDRSEL;
327 #else
328 		usbcfg &= ~DWC2_GUSBCFG_DDRSEL;
329 #endif
330 	} else {	/* UTMI+ interface */
331 #if (CONFIG_DWC2_UTMI_PHY_WIDTH == 16)
332 		usbcfg |= DWC2_GUSBCFG_PHYIF;
333 #endif
334 	}
335 
336 	writel(usbcfg, &regs->gusbcfg);
337 
338 	/* Reset after setting the PHY parameters */
339 	dwc_otg_core_reset(regs);
340 #endif
341 
342 	usbcfg = readl(&regs->gusbcfg);
343 	usbcfg &= ~(DWC2_GUSBCFG_ULPI_FSLS | DWC2_GUSBCFG_ULPI_CLK_SUS_M);
344 #ifdef CONFIG_DWC2_ULPI_FS_LS
345 	uint32_t hwcfg2 = readl(&regs->ghwcfg2);
346 	uint32_t hval = (ghwcfg2 & DWC2_HWCFG2_HS_PHY_TYPE_MASK) >>
347 			DWC2_HWCFG2_HS_PHY_TYPE_OFFSET;
348 	uint32_t fval = (ghwcfg2 & DWC2_HWCFG2_FS_PHY_TYPE_MASK) >>
349 			DWC2_HWCFG2_FS_PHY_TYPE_OFFSET;
350 	if (hval == 2 && fval == 1) {
351 		usbcfg |= DWC2_GUSBCFG_ULPI_FSLS;
352 		usbcfg |= DWC2_GUSBCFG_ULPI_CLK_SUS_M;
353 	}
354 #endif
355 	writel(usbcfg, &regs->gusbcfg);
356 
357 	/* Program the GAHBCFG Register. */
358 	switch (readl(&regs->ghwcfg2) & DWC2_HWCFG2_ARCHITECTURE_MASK) {
359 	case DWC2_HWCFG2_ARCHITECTURE_SLAVE_ONLY:
360 		break;
361 	case DWC2_HWCFG2_ARCHITECTURE_EXT_DMA:
362 		while (brst_sz > 1) {
363 			ahbcfg |= ahbcfg + (1 << DWC2_GAHBCFG_HBURSTLEN_OFFSET);
364 			ahbcfg &= DWC2_GAHBCFG_HBURSTLEN_MASK;
365 			brst_sz >>= 1;
366 		}
367 
368 #ifdef CONFIG_DWC2_DMA_ENABLE
369 		ahbcfg |= DWC2_GAHBCFG_DMAENABLE;
370 #endif
371 		break;
372 
373 	case DWC2_HWCFG2_ARCHITECTURE_INT_DMA:
374 		ahbcfg |= DWC2_GAHBCFG_HBURSTLEN_INCR4;
375 #ifdef CONFIG_DWC2_DMA_ENABLE
376 		ahbcfg |= DWC2_GAHBCFG_DMAENABLE;
377 #endif
378 		break;
379 	}
380 
381 	writel(ahbcfg, &regs->gahbcfg);
382 
383 	/* Program the GUSBCFG register for HNP/SRP. */
384 	setbits_le32(&regs->gusbcfg, DWC2_GUSBCFG_HNPCAP | DWC2_GUSBCFG_SRPCAP);
385 
386 #ifdef CONFIG_DWC2_IC_USB_CAP
387 	setbits_le32(&regs->gusbcfg, DWC2_GUSBCFG_IC_USB_CAP);
388 #endif
389 }
390 
391 /*
392  * Prepares a host channel for transferring packets to/from a specific
393  * endpoint. The HCCHARn register is set up with the characteristics specified
394  * in _hc. Host channel interrupts that may need to be serviced while this
395  * transfer is in progress are enabled.
396  *
397  * @param regs Programming view of DWC_otg controller
398  * @param hc Information needed to initialize the host channel
399  */
400 static void dwc_otg_hc_init(struct dwc2_core_regs *regs, uint8_t hc_num,
401 		uint8_t dev_addr, uint8_t ep_num, uint8_t ep_is_in,
402 		uint8_t ep_type, uint16_t max_packet)
403 {
404 	struct dwc2_hc_regs *hc_regs = &regs->hc_regs[hc_num];
405 	const uint32_t hcchar = (dev_addr << DWC2_HCCHAR_DEVADDR_OFFSET) |
406 				(ep_num << DWC2_HCCHAR_EPNUM_OFFSET) |
407 				(ep_is_in << DWC2_HCCHAR_EPDIR_OFFSET) |
408 				(ep_type << DWC2_HCCHAR_EPTYPE_OFFSET) |
409 				(max_packet << DWC2_HCCHAR_MPS_OFFSET);
410 
411 	/* Clear old interrupt conditions for this host channel. */
412 	writel(0x3fff, &hc_regs->hcint);
413 
414 	/*
415 	 * Program the HCCHARn register with the endpoint characteristics
416 	 * for the current transfer.
417 	 */
418 	writel(hcchar, &hc_regs->hcchar);
419 
420 	/* Program the HCSPLIT register for SPLITs */
421 	writel(0, &hc_regs->hcsplt);
422 }
423 
424 /*
425  * DWC2 to USB API interface
426  */
427 /* Direction: In ; Request: Status */
428 static int dwc_otg_submit_rh_msg_in_status(struct usb_device *dev, void *buffer,
429 					   int txlen, struct devrequest *cmd)
430 {
431 	uint32_t hprt0 = 0;
432 	uint32_t port_status = 0;
433 	uint32_t port_change = 0;
434 	int len = 0;
435 	int stat = 0;
436 
437 	switch (cmd->requesttype & ~USB_DIR_IN) {
438 	case 0:
439 		*(uint16_t *)buffer = cpu_to_le16(1);
440 		len = 2;
441 		break;
442 	case USB_RECIP_INTERFACE:
443 	case USB_RECIP_ENDPOINT:
444 		*(uint16_t *)buffer = cpu_to_le16(0);
445 		len = 2;
446 		break;
447 	case USB_TYPE_CLASS:
448 		*(uint32_t *)buffer = cpu_to_le32(0);
449 		len = 4;
450 		break;
451 	case USB_RECIP_OTHER | USB_TYPE_CLASS:
452 		hprt0 = readl(&regs->hprt0);
453 		if (hprt0 & DWC2_HPRT0_PRTCONNSTS)
454 			port_status |= USB_PORT_STAT_CONNECTION;
455 		if (hprt0 & DWC2_HPRT0_PRTENA)
456 			port_status |= USB_PORT_STAT_ENABLE;
457 		if (hprt0 & DWC2_HPRT0_PRTSUSP)
458 			port_status |= USB_PORT_STAT_SUSPEND;
459 		if (hprt0 & DWC2_HPRT0_PRTOVRCURRACT)
460 			port_status |= USB_PORT_STAT_OVERCURRENT;
461 		if (hprt0 & DWC2_HPRT0_PRTRST)
462 			port_status |= USB_PORT_STAT_RESET;
463 		if (hprt0 & DWC2_HPRT0_PRTPWR)
464 			port_status |= USB_PORT_STAT_POWER;
465 
466 		port_status |= USB_PORT_STAT_HIGH_SPEED;
467 
468 		if (hprt0 & DWC2_HPRT0_PRTENCHNG)
469 			port_change |= USB_PORT_STAT_C_ENABLE;
470 		if (hprt0 & DWC2_HPRT0_PRTCONNDET)
471 			port_change |= USB_PORT_STAT_C_CONNECTION;
472 		if (hprt0 & DWC2_HPRT0_PRTOVRCURRCHNG)
473 			port_change |= USB_PORT_STAT_C_OVERCURRENT;
474 
475 		*(uint32_t *)buffer = cpu_to_le32(port_status |
476 					(port_change << 16));
477 		len = 4;
478 		break;
479 	default:
480 		puts("unsupported root hub command\n");
481 		stat = USB_ST_STALLED;
482 	}
483 
484 	dev->act_len = min(len, txlen);
485 	dev->status = stat;
486 
487 	return stat;
488 }
489 
490 /* Direction: In ; Request: Descriptor */
491 static int dwc_otg_submit_rh_msg_in_descriptor(struct usb_device *dev,
492 					       void *buffer, int txlen,
493 					       struct devrequest *cmd)
494 {
495 	unsigned char data[32];
496 	uint32_t dsc;
497 	int len = 0;
498 	int stat = 0;
499 	uint16_t wValue = cpu_to_le16(cmd->value);
500 	uint16_t wLength = cpu_to_le16(cmd->length);
501 
502 	switch (cmd->requesttype & ~USB_DIR_IN) {
503 	case 0:
504 		switch (wValue & 0xff00) {
505 		case 0x0100:	/* device descriptor */
506 			len = min3(txlen, (int)sizeof(root_hub_dev_des), (int)wLength);
507 			memcpy(buffer, root_hub_dev_des, len);
508 			break;
509 		case 0x0200:	/* configuration descriptor */
510 			len = min3(txlen, (int)sizeof(root_hub_config_des), (int)wLength);
511 			memcpy(buffer, root_hub_config_des, len);
512 			break;
513 		case 0x0300:	/* string descriptors */
514 			switch (wValue & 0xff) {
515 			case 0x00:
516 				len = min3(txlen, (int)sizeof(root_hub_str_index0),
517 					   (int)wLength);
518 				memcpy(buffer, root_hub_str_index0, len);
519 				break;
520 			case 0x01:
521 				len = min3(txlen, (int)sizeof(root_hub_str_index1),
522 					   (int)wLength);
523 				memcpy(buffer, root_hub_str_index1, len);
524 				break;
525 			}
526 			break;
527 		default:
528 			stat = USB_ST_STALLED;
529 		}
530 		break;
531 
532 	case USB_TYPE_CLASS:
533 		/* Root port config, set 1 port and nothing else. */
534 		dsc = 0x00000001;
535 
536 		data[0] = 9;		/* min length; */
537 		data[1] = 0x29;
538 		data[2] = dsc & RH_A_NDP;
539 		data[3] = 0;
540 		if (dsc & RH_A_PSM)
541 			data[3] |= 0x1;
542 		if (dsc & RH_A_NOCP)
543 			data[3] |= 0x10;
544 		else if (dsc & RH_A_OCPM)
545 			data[3] |= 0x8;
546 
547 		/* corresponds to data[4-7] */
548 		data[5] = (dsc & RH_A_POTPGT) >> 24;
549 		data[7] = dsc & RH_B_DR;
550 		if (data[2] < 7) {
551 			data[8] = 0xff;
552 		} else {
553 			data[0] += 2;
554 			data[8] = (dsc & RH_B_DR) >> 8;
555 			data[9] = 0xff;
556 			data[10] = data[9];
557 		}
558 
559 		len = min3(txlen, (int)data[0], (int)wLength);
560 		memcpy(buffer, data, len);
561 		break;
562 	default:
563 		puts("unsupported root hub command\n");
564 		stat = USB_ST_STALLED;
565 	}
566 
567 	dev->act_len = min(len, txlen);
568 	dev->status = stat;
569 
570 	return stat;
571 }
572 
573 /* Direction: In ; Request: Configuration */
574 static int dwc_otg_submit_rh_msg_in_configuration(struct usb_device *dev,
575 						  void *buffer, int txlen,
576 						  struct devrequest *cmd)
577 {
578 	int len = 0;
579 	int stat = 0;
580 
581 	switch (cmd->requesttype & ~USB_DIR_IN) {
582 	case 0:
583 		*(uint8_t *)buffer = 0x01;
584 		len = 1;
585 		break;
586 	default:
587 		puts("unsupported root hub command\n");
588 		stat = USB_ST_STALLED;
589 	}
590 
591 	dev->act_len = min(len, txlen);
592 	dev->status = stat;
593 
594 	return stat;
595 }
596 
597 /* Direction: In */
598 static int dwc_otg_submit_rh_msg_in(struct usb_device *dev,
599 				 void *buffer, int txlen,
600 				 struct devrequest *cmd)
601 {
602 	switch (cmd->request) {
603 	case USB_REQ_GET_STATUS:
604 		return dwc_otg_submit_rh_msg_in_status(dev, buffer,
605 						       txlen, cmd);
606 	case USB_REQ_GET_DESCRIPTOR:
607 		return dwc_otg_submit_rh_msg_in_descriptor(dev, buffer,
608 							   txlen, cmd);
609 	case USB_REQ_GET_CONFIGURATION:
610 		return dwc_otg_submit_rh_msg_in_configuration(dev, buffer,
611 							      txlen, cmd);
612 	default:
613 		puts("unsupported root hub command\n");
614 		return USB_ST_STALLED;
615 	}
616 }
617 
618 /* Direction: Out */
619 static int dwc_otg_submit_rh_msg_out(struct usb_device *dev,
620 				 void *buffer, int txlen,
621 				 struct devrequest *cmd)
622 {
623 	int len = 0;
624 	int stat = 0;
625 	uint16_t bmrtype_breq = cmd->requesttype | (cmd->request << 8);
626 	uint16_t wValue = cpu_to_le16(cmd->value);
627 
628 	switch (bmrtype_breq & ~USB_DIR_IN) {
629 	case (USB_REQ_CLEAR_FEATURE << 8) | USB_RECIP_ENDPOINT:
630 	case (USB_REQ_CLEAR_FEATURE << 8) | USB_TYPE_CLASS:
631 		break;
632 
633 	case (USB_REQ_CLEAR_FEATURE << 8) | USB_RECIP_OTHER | USB_TYPE_CLASS:
634 		switch (wValue) {
635 		case USB_PORT_FEAT_C_CONNECTION:
636 			setbits_le32(&regs->hprt0, DWC2_HPRT0_PRTCONNDET);
637 			break;
638 		}
639 		break;
640 
641 	case (USB_REQ_SET_FEATURE << 8) | USB_RECIP_OTHER | USB_TYPE_CLASS:
642 		switch (wValue) {
643 		case USB_PORT_FEAT_SUSPEND:
644 			break;
645 
646 		case USB_PORT_FEAT_RESET:
647 			clrsetbits_le32(&regs->hprt0, DWC2_HPRT0_PRTENA |
648 					DWC2_HPRT0_PRTCONNDET |
649 					DWC2_HPRT0_PRTENCHNG |
650 					DWC2_HPRT0_PRTOVRCURRCHNG,
651 					DWC2_HPRT0_PRTRST);
652 			mdelay(50);
653 			clrbits_le32(&regs->hprt0, DWC2_HPRT0_PRTRST);
654 			break;
655 
656 		case USB_PORT_FEAT_POWER:
657 			clrsetbits_le32(&regs->hprt0, DWC2_HPRT0_PRTENA |
658 					DWC2_HPRT0_PRTCONNDET |
659 					DWC2_HPRT0_PRTENCHNG |
660 					DWC2_HPRT0_PRTOVRCURRCHNG,
661 					DWC2_HPRT0_PRTRST);
662 			break;
663 
664 		case USB_PORT_FEAT_ENABLE:
665 			break;
666 		}
667 		break;
668 	case (USB_REQ_SET_ADDRESS << 8):
669 		root_hub_devnum = wValue;
670 		break;
671 	case (USB_REQ_SET_CONFIGURATION << 8):
672 		break;
673 	default:
674 		puts("unsupported root hub command\n");
675 		stat = USB_ST_STALLED;
676 	}
677 
678 	len = min(len, txlen);
679 
680 	dev->act_len = len;
681 	dev->status = stat;
682 
683 	return stat;
684 }
685 
686 static int dwc_otg_submit_rh_msg(struct usb_device *dev, unsigned long pipe,
687 				 void *buffer, int txlen,
688 				 struct devrequest *cmd)
689 {
690 	int stat = 0;
691 
692 	if (usb_pipeint(pipe)) {
693 		puts("Root-Hub submit IRQ: NOT implemented\n");
694 		return 0;
695 	}
696 
697 	if (cmd->requesttype & USB_DIR_IN)
698 		stat = dwc_otg_submit_rh_msg_in(dev, buffer, txlen, cmd);
699 	else
700 		stat = dwc_otg_submit_rh_msg_out(dev, buffer, txlen, cmd);
701 
702 	mdelay(1);
703 
704 	return stat;
705 }
706 
707 int wait_for_chhltd(uint32_t *sub, int *toggle, bool ignore_ack)
708 {
709 	uint32_t hcint_comp_hlt_ack = DWC2_HCINT_XFERCOMP | DWC2_HCINT_CHHLTD;
710 	struct dwc2_hc_regs *hc_regs = &regs->hc_regs[DWC2_HC_CHANNEL];
711 	int ret;
712 	uint32_t hcint, hctsiz;
713 
714 	ret = wait_for_bit(&hc_regs->hcint, DWC2_HCINT_CHHLTD, true);
715 	if (ret)
716 		return ret;
717 
718 	hcint = readl(&hc_regs->hcint);
719 	if (ignore_ack)
720 		hcint &= ~DWC2_HCINT_ACK;
721 	else
722 		hcint_comp_hlt_ack |= DWC2_HCINT_ACK;
723 	if (hcint != hcint_comp_hlt_ack) {
724 		debug("%s: Error (HCINT=%08x)\n", __func__, hcint);
725 		return -EINVAL;
726 	}
727 
728 	hctsiz = readl(&hc_regs->hctsiz);
729 	*sub = (hctsiz & DWC2_HCTSIZ_XFERSIZE_MASK) >>
730 		DWC2_HCTSIZ_XFERSIZE_OFFSET;
731 	*toggle = (hctsiz & DWC2_HCTSIZ_PID_MASK) >> DWC2_HCTSIZ_PID_OFFSET;
732 
733 	debug("%s: sub=%u toggle=%d\n", __func__, *sub, *toggle);
734 
735 	return 0;
736 }
737 
738 static int dwc2_eptype[] = {
739 	DWC2_HCCHAR_EPTYPE_ISOC,
740 	DWC2_HCCHAR_EPTYPE_INTR,
741 	DWC2_HCCHAR_EPTYPE_CONTROL,
742 	DWC2_HCCHAR_EPTYPE_BULK,
743 };
744 
745 int chunk_msg(struct usb_device *dev, unsigned long pipe, int *pid, int in,
746 	      void *buffer, int len, bool ignore_ack)
747 {
748 	struct dwc2_hc_regs *hc_regs = &regs->hc_regs[DWC2_HC_CHANNEL];
749 	int devnum = usb_pipedevice(pipe);
750 	int ep = usb_pipeendpoint(pipe);
751 	int max = usb_maxpacket(dev, pipe);
752 	int eptype = dwc2_eptype[usb_pipetype(pipe)];
753 	int done = 0;
754 	int ret;
755 	uint32_t sub;
756 	uint32_t xfer_len;
757 	uint32_t num_packets;
758 	int stop_transfer = 0;
759 
760 	debug("%s: msg: pipe %lx pid %d in %d len %d\n", __func__, pipe, *pid,
761 	      in, len);
762 
763 	do {
764 		/* Initialize channel */
765 		dwc_otg_hc_init(regs, DWC2_HC_CHANNEL, devnum, ep, in, eptype,
766 				max);
767 
768 		xfer_len = len - done;
769 		if (xfer_len > CONFIG_DWC2_MAX_TRANSFER_SIZE)
770 			xfer_len = CONFIG_DWC2_MAX_TRANSFER_SIZE - max + 1;
771 		if (xfer_len > DWC2_DATA_BUF_SIZE)
772 			xfer_len = DWC2_DATA_BUF_SIZE - max + 1;
773 
774 		/* Make sure that xfer_len is a multiple of max packet size. */
775 		if (xfer_len > 0) {
776 			num_packets = (xfer_len + max - 1) / max;
777 			if (num_packets > CONFIG_DWC2_MAX_PACKET_COUNT) {
778 				num_packets = CONFIG_DWC2_MAX_PACKET_COUNT;
779 				xfer_len = num_packets * max;
780 			}
781 		} else {
782 			num_packets = 1;
783 		}
784 
785 		if (in)
786 			xfer_len = num_packets * max;
787 
788 		debug("%s: chunk: pid %d xfer_len %u pkts %u\n", __func__,
789 		      *pid, xfer_len, num_packets);
790 
791 		writel((xfer_len << DWC2_HCTSIZ_XFERSIZE_OFFSET) |
792 		       (num_packets << DWC2_HCTSIZ_PKTCNT_OFFSET) |
793 		       (*pid << DWC2_HCTSIZ_PID_OFFSET),
794 		       &hc_regs->hctsiz);
795 
796 		if (!in)
797 			memcpy(aligned_buffer, (char *)buffer + done, len);
798 
799 		writel(phys_to_bus((unsigned long)aligned_buffer),
800 		       &hc_regs->hcdma);
801 
802 		/* Set host channel enable after all other setup is complete. */
803 		clrsetbits_le32(&hc_regs->hcchar, DWC2_HCCHAR_MULTICNT_MASK |
804 				DWC2_HCCHAR_CHEN | DWC2_HCCHAR_CHDIS,
805 				(1 << DWC2_HCCHAR_MULTICNT_OFFSET) |
806 				DWC2_HCCHAR_CHEN);
807 
808 		ret = wait_for_chhltd(&sub, pid, ignore_ack);
809 		if (ret) {
810 			stop_transfer = 1;
811 			break;
812 		}
813 
814 		if (in) {
815 			xfer_len -= sub;
816 			memcpy(buffer + done, aligned_buffer, xfer_len);
817 			if (sub)
818 				stop_transfer = 1;
819 		}
820 
821 		done += xfer_len;
822 
823 	} while ((done < len) && !stop_transfer);
824 
825 	writel(0, &hc_regs->hcintmsk);
826 	writel(0xFFFFFFFF, &hc_regs->hcint);
827 
828 	dev->status = 0;
829 	dev->act_len = done;
830 
831 	return 0;
832 }
833 
834 /* U-Boot USB transmission interface */
835 int submit_bulk_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
836 		    int len)
837 {
838 	int devnum = usb_pipedevice(pipe);
839 	int ep = usb_pipeendpoint(pipe);
840 
841 	if (devnum == root_hub_devnum) {
842 		dev->status = 0;
843 		return -EINVAL;
844 	}
845 
846 	return chunk_msg(dev, pipe, &bulk_data_toggle[devnum][ep],
847 			 usb_pipein(pipe), buffer, len, true);
848 }
849 
850 int submit_control_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
851 		       int len, struct devrequest *setup)
852 {
853 	int devnum = usb_pipedevice(pipe);
854 	int pid, ret, act_len;
855 	/* For CONTROL endpoint pid should start with DATA1 */
856 	int status_direction;
857 
858 	if (devnum == root_hub_devnum) {
859 		dev->status = 0;
860 		dev->speed = USB_SPEED_HIGH;
861 		return dwc_otg_submit_rh_msg(dev, pipe, buffer, len, setup);
862 	}
863 
864 	pid = DWC2_HC_PID_SETUP;
865 	ret = chunk_msg(dev, pipe, &pid, 0, setup, 8, true);
866 	if (ret)
867 		return ret;
868 
869 	if (buffer) {
870 		pid = DWC2_HC_PID_DATA1;
871 		ret = chunk_msg(dev, pipe, &pid, usb_pipein(pipe), buffer,
872 				len, false);
873 		if (ret)
874 			return ret;
875 		act_len = dev->act_len;
876 	} /* End of DATA stage */
877 	else
878 		act_len = 0;
879 
880 	/* STATUS stage */
881 	if ((len == 0) || usb_pipeout(pipe))
882 		status_direction = 1;
883 	else
884 		status_direction = 0;
885 
886 	pid = DWC2_HC_PID_DATA1;
887 	ret = chunk_msg(dev, pipe, &pid, status_direction, status_buffer, 0,
888 		false);
889 	if (ret)
890 		return ret;
891 
892 	dev->act_len = act_len;
893 
894 	return 0;
895 }
896 
897 int submit_int_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
898 		   int len, int interval)
899 {
900 	printf("dev = %p pipe = %#lx buf = %p size = %d int = %d\n",
901 	       dev, pipe, buffer, len, interval);
902 	return -ENOSYS;
903 }
904 
905 /* U-Boot USB control interface */
906 int usb_lowlevel_init(int index, enum usb_init_type init, void **controller)
907 {
908 	uint32_t snpsid;
909 	int i, j;
910 
911 	root_hub_devnum = 0;
912 
913 	snpsid = readl(&regs->gsnpsid);
914 	printf("Core Release: %x.%03x\n", snpsid >> 12 & 0xf, snpsid & 0xfff);
915 
916 	if ((snpsid & DWC2_SNPSID_DEVID_MASK) != DWC2_SNPSID_DEVID_VER_2xx) {
917 		printf("SNPSID invalid (not DWC2 OTG device): %08x\n", snpsid);
918 		return -ENODEV;
919 	}
920 
921 	dwc_otg_core_init(regs);
922 	dwc_otg_core_host_init(regs);
923 
924 	clrsetbits_le32(&regs->hprt0, DWC2_HPRT0_PRTENA |
925 			DWC2_HPRT0_PRTCONNDET | DWC2_HPRT0_PRTENCHNG |
926 			DWC2_HPRT0_PRTOVRCURRCHNG,
927 			DWC2_HPRT0_PRTRST);
928 	mdelay(50);
929 	clrbits_le32(&regs->hprt0, DWC2_HPRT0_PRTENA | DWC2_HPRT0_PRTCONNDET |
930 		     DWC2_HPRT0_PRTENCHNG | DWC2_HPRT0_PRTOVRCURRCHNG |
931 		     DWC2_HPRT0_PRTRST);
932 
933 	for (i = 0; i < MAX_DEVICE; i++) {
934 		for (j = 0; j < MAX_ENDPOINT; j++)
935 			bulk_data_toggle[i][j] = DWC2_HC_PID_DATA0;
936 	}
937 
938 	return 0;
939 }
940 
941 int usb_lowlevel_stop(int index)
942 {
943 	/* Put everything in reset. */
944 	clrsetbits_le32(&regs->hprt0, DWC2_HPRT0_PRTENA |
945 			DWC2_HPRT0_PRTCONNDET | DWC2_HPRT0_PRTENCHNG |
946 			DWC2_HPRT0_PRTOVRCURRCHNG,
947 			DWC2_HPRT0_PRTRST);
948 	return 0;
949 }
950