Merge branch 'master' of git://git.denx.de/u-boot-tegra
[platform/kernel/u-boot.git] / drivers / usb / musb-new / musb_uboot.c
1 #include <common.h>
2 #include <watchdog.h>
3 #ifdef CONFIG_ARCH_SUNXI
4 #include <asm/arch/usbc.h>
5 #endif
6 #include <asm/errno.h>
7 #include <linux/usb/ch9.h>
8 #include <linux/usb/gadget.h>
9
10 #include <usb.h>
11 #include "linux-compat.h"
12 #include "usb-compat.h"
13 #include "musb_core.h"
14 #include "musb_host.h"
15 #include "musb_gadget.h"
16
17 #ifdef CONFIG_MUSB_HOST
18 struct int_queue {
19         struct usb_host_endpoint hep;
20         struct urb urb;
21 };
22
23 static struct musb *host;
24 static struct usb_hcd hcd;
25 static enum usb_device_speed host_speed;
26
27 static void musb_host_complete_urb(struct urb *urb)
28 {
29         urb->dev->status &= ~USB_ST_NOT_PROC;
30         urb->dev->act_len = urb->actual_length;
31 }
32
33 static struct usb_host_endpoint hep;
34 static struct urb urb;
35
36 static void construct_urb(struct urb *urb, struct usb_host_endpoint *hep,
37                           struct usb_device *dev, int endpoint_type,
38                           unsigned long pipe, void *buffer, int len,
39                           struct devrequest *setup, int interval)
40 {
41         int epnum = usb_pipeendpoint(pipe);
42         int is_in = usb_pipein(pipe);
43
44         memset(urb, 0, sizeof(struct urb));
45         memset(hep, 0, sizeof(struct usb_host_endpoint));
46         INIT_LIST_HEAD(&hep->urb_list);
47         INIT_LIST_HEAD(&urb->urb_list);
48         urb->ep = hep;
49         urb->complete = musb_host_complete_urb;
50         urb->status = -EINPROGRESS;
51         urb->dev = dev;
52         urb->pipe = pipe;
53         urb->transfer_buffer = buffer;
54         urb->transfer_dma = (unsigned long)buffer;
55         urb->transfer_buffer_length = len;
56         urb->setup_packet = (unsigned char *)setup;
57
58         urb->ep->desc.wMaxPacketSize =
59                 __cpu_to_le16(is_in ? dev->epmaxpacketin[epnum] :
60                                 dev->epmaxpacketout[epnum]);
61         urb->ep->desc.bmAttributes = endpoint_type;
62         urb->ep->desc.bEndpointAddress =
63                 (is_in ? USB_DIR_IN : USB_DIR_OUT) | epnum;
64         urb->ep->desc.bInterval = interval;
65 }
66
67 static int submit_urb(struct usb_hcd *hcd, struct urb *urb)
68 {
69         struct musb *host = hcd->hcd_priv;
70         int ret;
71         unsigned long timeout;
72
73         ret = musb_urb_enqueue(hcd, urb, 0);
74         if (ret < 0) {
75                 printf("Failed to enqueue URB to controller\n");
76                 return ret;
77         }
78
79         timeout = get_timer(0) + USB_TIMEOUT_MS(urb->pipe);
80         do {
81                 if (ctrlc())
82                         return -EIO;
83                 host->isr(0, host);
84         } while (urb->status == -EINPROGRESS &&
85                  get_timer(0) < timeout);
86
87         if (urb->status == -EINPROGRESS)
88                 musb_urb_dequeue(hcd, urb, -ETIME);
89
90         return urb->status;
91 }
92
93 int submit_control_msg(struct usb_device *dev, unsigned long pipe,
94                         void *buffer, int len, struct devrequest *setup)
95 {
96         construct_urb(&urb, &hep, dev, USB_ENDPOINT_XFER_CONTROL, pipe,
97                       buffer, len, setup, 0);
98
99         /* Fix speed for non hub-attached devices */
100         if (!dev->parent)
101                 dev->speed = host_speed;
102
103         return submit_urb(&hcd, &urb);
104 }
105
106
107 int submit_bulk_msg(struct usb_device *dev, unsigned long pipe,
108                                         void *buffer, int len)
109 {
110         construct_urb(&urb, &hep, dev, USB_ENDPOINT_XFER_BULK, pipe,
111                       buffer, len, NULL, 0);
112         return submit_urb(&hcd, &urb);
113 }
114
115 int submit_int_msg(struct usb_device *dev, unsigned long pipe,
116                                 void *buffer, int len, int interval)
117 {
118         construct_urb(&urb, &hep, dev, USB_ENDPOINT_XFER_INT, pipe,
119                       buffer, len, NULL, interval);
120         return submit_urb(&hcd, &urb);
121 }
122
123 struct int_queue *create_int_queue(struct usb_device *dev, unsigned long pipe,
124         int queuesize, int elementsize, void *buffer, int interval)
125 {
126         struct int_queue *queue;
127         int ret, index = usb_pipein(pipe) * 16 + usb_pipeendpoint(pipe);
128
129         if (queuesize != 1) {
130                 printf("ERROR musb int-queues only support queuesize 1\n");
131                 return NULL;
132         }
133
134         if (dev->int_pending & (1 << index)) {
135                 printf("ERROR int-urb is already pending on pipe %lx\n", pipe);
136                 return NULL;
137         }
138
139         queue = malloc(sizeof(*queue));
140         if (!queue)
141                 return NULL;
142
143         construct_urb(&queue->urb, &queue->hep, dev, USB_ENDPOINT_XFER_INT,
144                       pipe, buffer, elementsize, NULL, interval);
145
146         ret = musb_urb_enqueue(&hcd, &queue->urb, 0);
147         if (ret < 0) {
148                 printf("Failed to enqueue URB to controller\n");
149                 free(queue);
150                 return NULL;
151         }
152
153         dev->int_pending |= 1 << index;
154         return queue;
155 }
156
157 int destroy_int_queue(struct usb_device *dev, struct int_queue *queue)
158 {
159         int index = usb_pipein(queue->urb.pipe) * 16 + 
160                     usb_pipeendpoint(queue->urb.pipe);
161
162         if (queue->urb.status == -EINPROGRESS)
163                 musb_urb_dequeue(&hcd, &queue->urb, -ETIME);
164
165         dev->int_pending &= ~(1 << index);
166         free(queue);
167         return 0;
168 }
169
170 void *poll_int_queue(struct usb_device *dev, struct int_queue *queue)
171 {
172         if (queue->urb.status != -EINPROGRESS)
173                 return NULL; /* URB has already completed in a prev. poll */
174
175         host->isr(0, host);
176
177         if (queue->urb.status != -EINPROGRESS)
178                 return queue->urb.transfer_buffer; /* Done */
179
180         return NULL; /* URB still pending */
181 }
182
183 void usb_reset_root_port(void)
184 {
185         void *mbase = host->mregs;
186         u8 power;
187
188         power = musb_readb(mbase, MUSB_POWER);
189         power &= 0xf0;
190         musb_writeb(mbase, MUSB_POWER, MUSB_POWER_RESET | power);
191         mdelay(50);
192 #ifdef CONFIG_ARCH_SUNXI
193         /*
194          * sunxi phy has a bug and it will wrongly detect high speed squelch
195          * when clearing reset on low-speed devices, temporary disable
196          * squelch detection to work around this.
197          */
198         sunxi_usbc_enable_squelch_detect(0, 0);
199 #endif
200         power = musb_readb(mbase, MUSB_POWER);
201         musb_writeb(mbase, MUSB_POWER, ~MUSB_POWER_RESET & power);
202 #ifdef CONFIG_ARCH_SUNXI
203         sunxi_usbc_enable_squelch_detect(0, 1);
204 #endif
205         host->isr(0, host);
206         host_speed = (musb_readb(mbase, MUSB_POWER) & MUSB_POWER_HSMODE) ?
207                         USB_SPEED_HIGH :
208                         (musb_readb(mbase, MUSB_DEVCTL) & MUSB_DEVCTL_FSDEV) ?
209                         USB_SPEED_FULL : USB_SPEED_LOW;
210         mdelay((host_speed == USB_SPEED_LOW) ? 200 : 50);
211 }
212
213 int usb_lowlevel_init(int index, enum usb_init_type init, void **controller)
214 {
215         void *mbase;
216         /* USB spec says it may take up to 1 second for a device to connect */
217         unsigned long timeout = get_timer(0) + 1000;
218
219         if (!host) {
220                 printf("MUSB host is not registered\n");
221                 return -ENODEV;
222         }
223
224         musb_start(host);
225         mbase = host->mregs;
226         do {
227                 if (musb_readb(mbase, MUSB_DEVCTL) & MUSB_DEVCTL_HM)
228                         break;
229         } while (get_timer(0) < timeout);
230         if (get_timer(0) >= timeout)
231                 return -ENODEV;
232
233         usb_reset_root_port();
234         host->is_active = 1;
235         hcd.hcd_priv = host;
236
237         return 0;
238 }
239
240 int usb_lowlevel_stop(int index)
241 {
242         if (!host) {
243                 printf("MUSB host is not registered\n");
244                 return -ENODEV;
245         }
246
247         musb_stop(host);
248         return 0;
249 }
250 #endif /* CONFIG_MUSB_HOST */
251
252 #ifdef CONFIG_MUSB_GADGET
253 static struct musb *gadget;
254
255 int usb_gadget_handle_interrupts(void)
256 {
257         WATCHDOG_RESET();
258         if (!gadget || !gadget->isr)
259                 return -EINVAL;
260
261         return gadget->isr(0, gadget);
262 }
263
264 int usb_gadget_register_driver(struct usb_gadget_driver *driver)
265 {
266         int ret;
267
268         if (!driver || driver->speed < USB_SPEED_FULL || !driver->bind ||
269             !driver->setup) {
270                 printf("bad parameter.\n");
271                 return -EINVAL;
272         }
273
274         if (!gadget) {
275                 printf("Controller uninitialized\n");
276                 return -ENXIO;
277         }
278
279         ret = musb_gadget_start(&gadget->g, driver);
280         if (ret < 0) {
281                 printf("gadget_start failed with %d\n", ret);
282                 return ret;
283         }
284
285         ret = driver->bind(&gadget->g);
286         if (ret < 0) {
287                 printf("bind failed with %d\n", ret);
288                 return ret;
289         }
290
291         return 0;
292 }
293
294 int usb_gadget_unregister_driver(struct usb_gadget_driver *driver)
295 {
296         if (driver->disconnect)
297                 driver->disconnect(&gadget->g);
298         if (driver->unbind)
299                 driver->unbind(&gadget->g);
300         return 0;
301 }
302 #endif /* CONFIG_MUSB_GADGET */
303
304 int musb_register(struct musb_hdrc_platform_data *plat, void *bdata,
305                         void *ctl_regs)
306 {
307         struct musb **musbp;
308
309         switch (plat->mode) {
310 #ifdef CONFIG_MUSB_HOST
311         case MUSB_HOST:
312                 musbp = &host;
313                 break;
314 #endif
315 #ifdef CONFIG_MUSB_GADGET
316         case MUSB_PERIPHERAL:
317                 musbp = &gadget;
318                 break;
319 #endif
320         default:
321                 return -EINVAL;
322         }
323
324         *musbp = musb_init_controller(plat, (struct device *)bdata, ctl_regs);
325         if (!musbp) {
326                 printf("Failed to init the controller\n");
327                 return -EIO;
328         }
329
330         return 0;
331 }