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