common: Drop linux/delay.h from common header
[oweals/u-boot.git] / drivers / usb / musb-new / musb_uboot.c
1 #include <common.h>
2 #include <console.h>
3 #include <malloc.h>
4 #include <watchdog.h>
5 #include <linux/delay.h>
6 #include <linux/err.h>
7 #include <linux/errno.h>
8 #include <linux/usb/ch9.h>
9 #include <linux/usb/gadget.h>
10
11 #include <usb.h>
12 #include "linux-compat.h"
13 #include "usb-compat.h"
14 #include "musb_core.h"
15 #include "musb_host.h"
16 #include "musb_gadget.h"
17 #include "musb_uboot.h"
18
19 #ifdef CONFIG_USB_MUSB_HOST
20 struct int_queue {
21         struct usb_host_endpoint hep;
22         struct urb urb;
23 };
24
25 #if !CONFIG_IS_ENABLED(DM_USB)
26 struct musb_host_data musb_host;
27 #endif
28
29 static void musb_host_complete_urb(struct urb *urb)
30 {
31         urb->dev->status &= ~USB_ST_NOT_PROC;
32         urb->dev->act_len = urb->actual_length;
33 }
34
35 static void construct_urb(struct urb *urb, struct usb_host_endpoint *hep,
36                           struct usb_device *dev, int endpoint_type,
37                           unsigned long pipe, void *buffer, int len,
38                           struct devrequest *setup, int interval)
39 {
40         int epnum = usb_pipeendpoint(pipe);
41         int is_in = usb_pipein(pipe);
42
43         memset(urb, 0, sizeof(struct urb));
44         memset(hep, 0, sizeof(struct usb_host_endpoint));
45         INIT_LIST_HEAD(&hep->urb_list);
46         INIT_LIST_HEAD(&urb->urb_list);
47         urb->ep = hep;
48         urb->complete = musb_host_complete_urb;
49         urb->status = -EINPROGRESS;
50         urb->dev = dev;
51         urb->pipe = pipe;
52         urb->transfer_buffer = buffer;
53         urb->transfer_dma = (unsigned long)buffer;
54         urb->transfer_buffer_length = len;
55         urb->setup_packet = (unsigned char *)setup;
56
57         urb->ep->desc.wMaxPacketSize =
58                 __cpu_to_le16(is_in ? dev->epmaxpacketin[epnum] :
59                                 dev->epmaxpacketout[epnum]);
60         urb->ep->desc.bmAttributes = endpoint_type;
61         urb->ep->desc.bEndpointAddress =
62                 (is_in ? USB_DIR_IN : USB_DIR_OUT) | epnum;
63         urb->ep->desc.bInterval = interval;
64 }
65
66 static int submit_urb(struct usb_hcd *hcd, struct urb *urb)
67 {
68         struct musb *host = hcd->hcd_priv;
69         int ret;
70         unsigned long timeout;
71
72         ret = musb_urb_enqueue(hcd, urb, 0);
73         if (ret < 0) {
74                 printf("Failed to enqueue URB to controller\n");
75                 return ret;
76         }
77
78         timeout = get_timer(0) + USB_TIMEOUT_MS(urb->pipe);
79         do {
80                 if (ctrlc())
81                         return -EIO;
82                 host->isr(0, host);
83         } while (urb->status == -EINPROGRESS &&
84                  get_timer(0) < timeout);
85
86         if (urb->status == -EINPROGRESS)
87                 musb_urb_dequeue(hcd, urb, -ETIME);
88
89         return urb->status;
90 }
91
92 static int _musb_submit_control_msg(struct musb_host_data *host,
93         struct usb_device *dev, unsigned long pipe,
94         void *buffer, int len, struct devrequest *setup)
95 {
96         construct_urb(&host->urb, &host->hep, dev, USB_ENDPOINT_XFER_CONTROL,
97                       pipe, buffer, len, setup, 0);
98
99         /* Fix speed for non hub-attached devices */
100         if (!usb_dev_get_parent(dev))
101                 dev->speed = host->host_speed;
102
103         return submit_urb(&host->hcd, &host->urb);
104 }
105
106 static int _musb_submit_bulk_msg(struct musb_host_data *host,
107         struct usb_device *dev, unsigned long pipe, void *buffer, int len)
108 {
109         construct_urb(&host->urb, &host->hep, dev, USB_ENDPOINT_XFER_BULK,
110                       pipe, buffer, len, NULL, 0);
111         return submit_urb(&host->hcd, &host->urb);
112 }
113
114 static int _musb_submit_int_msg(struct musb_host_data *host,
115         struct usb_device *dev, unsigned long pipe,
116         void *buffer, int len, int interval, bool nonblock)
117 {
118         construct_urb(&host->urb, &host->hep, dev, USB_ENDPOINT_XFER_INT, pipe,
119                       buffer, len, NULL, interval);
120         return submit_urb(&host->hcd, &host->urb);
121 }
122
123 static struct int_queue *_musb_create_int_queue(struct musb_host_data *host,
124         struct usb_device *dev, unsigned long pipe, int queuesize,
125         int elementsize, void *buffer, int interval)
126 {
127         struct int_queue *queue;
128         int ret, index = usb_pipein(pipe) * 16 + usb_pipeendpoint(pipe);
129
130         if (queuesize != 1) {
131                 printf("ERROR musb int-queues only support queuesize 1\n");
132                 return NULL;
133         }
134
135         if (dev->int_pending & (1 << index)) {
136                 printf("ERROR int-urb is already pending on pipe %lx\n", pipe);
137                 return NULL;
138         }
139
140         queue = malloc(sizeof(*queue));
141         if (!queue)
142                 return NULL;
143
144         construct_urb(&queue->urb, &queue->hep, dev, USB_ENDPOINT_XFER_INT,
145                       pipe, buffer, elementsize, NULL, interval);
146
147         ret = musb_urb_enqueue(&host->hcd, &queue->urb, 0);
148         if (ret < 0) {
149                 printf("Failed to enqueue URB to controller\n");
150                 free(queue);
151                 return NULL;
152         }
153
154         dev->int_pending |= 1 << index;
155         return queue;
156 }
157
158 static int _musb_destroy_int_queue(struct musb_host_data *host,
159         struct usb_device *dev, struct int_queue *queue)
160 {
161         int index = usb_pipein(queue->urb.pipe) * 16 + 
162                     usb_pipeendpoint(queue->urb.pipe);
163
164         if (queue->urb.status == -EINPROGRESS)
165                 musb_urb_dequeue(&host->hcd, &queue->urb, -ETIME);
166
167         dev->int_pending &= ~(1 << index);
168         free(queue);
169         return 0;
170 }
171
172 static void *_musb_poll_int_queue(struct musb_host_data *host,
173         struct usb_device *dev, struct int_queue *queue)
174 {
175         if (queue->urb.status != -EINPROGRESS)
176                 return NULL; /* URB has already completed in a prev. poll */
177
178         host->host->isr(0, host->host);
179
180         if (queue->urb.status != -EINPROGRESS)
181                 return queue->urb.transfer_buffer; /* Done */
182
183         return NULL; /* URB still pending */
184 }
185
186 static int _musb_reset_root_port(struct musb_host_data *host,
187         struct usb_device *dev)
188 {
189         void *mbase = host->host->mregs;
190         u8 power;
191
192         power = musb_readb(mbase, MUSB_POWER);
193         power &= 0xf0;
194         musb_writeb(mbase, MUSB_POWER, MUSB_POWER_RESET | power);
195         mdelay(50);
196
197         if (host->host->ops->pre_root_reset_end)
198                 host->host->ops->pre_root_reset_end(host->host);
199
200         power = musb_readb(mbase, MUSB_POWER);
201         musb_writeb(mbase, MUSB_POWER, ~MUSB_POWER_RESET & power);
202
203         if (host->host->ops->post_root_reset_end)
204                 host->host->ops->post_root_reset_end(host->host);
205
206         host->host->isr(0, host->host);
207         host->host_speed = (musb_readb(mbase, MUSB_POWER) & MUSB_POWER_HSMODE) ?
208                         USB_SPEED_HIGH :
209                         (musb_readb(mbase, MUSB_DEVCTL) & MUSB_DEVCTL_FSDEV) ?
210                         USB_SPEED_FULL : USB_SPEED_LOW;
211         mdelay((host->host_speed == USB_SPEED_LOW) ? 200 : 50);
212
213         return 0;
214 }
215
216 int musb_lowlevel_init(struct musb_host_data *host)
217 {
218         void *mbase;
219         /* USB spec says it may take up to 1 second for a device to connect */
220         unsigned long timeout = get_timer(0) + 1000;
221         int ret;
222
223         if (!host->host) {
224                 printf("MUSB host is not registered\n");
225                 return -ENODEV;
226         }
227
228         ret = musb_start(host->host);
229         if (ret)
230                 return ret;
231
232         mbase = host->host->mregs;
233         do {
234                 if (musb_readb(mbase, MUSB_DEVCTL) & MUSB_DEVCTL_HM)
235                         break;
236         } while (get_timer(0) < timeout);
237         if (get_timer(0) >= timeout) {
238                 musb_stop(host->host);
239                 return -ENODEV;
240         }
241
242         _musb_reset_root_port(host, NULL);
243         host->host->is_active = 1;
244         host->hcd.hcd_priv = host->host;
245
246         return 0;
247 }
248
249 #if !CONFIG_IS_ENABLED(DM_USB)
250 int usb_lowlevel_stop(int index)
251 {
252         if (!musb_host.host) {
253                 printf("MUSB host is not registered\n");
254                 return -ENODEV;
255         }
256
257         musb_stop(musb_host.host);
258         return 0;
259 }
260
261 int submit_bulk_msg(struct usb_device *dev, unsigned long pipe,
262                             void *buffer, int length)
263 {
264         return _musb_submit_bulk_msg(&musb_host, dev, pipe, buffer, length);
265 }
266
267 int submit_control_msg(struct usb_device *dev, unsigned long pipe,
268                        void *buffer, int length, struct devrequest *setup)
269 {
270         return _musb_submit_control_msg(&musb_host, dev, pipe, buffer, length, setup);
271 }
272
273 int submit_int_msg(struct usb_device *dev, unsigned long pipe,
274                    void *buffer, int length, int interval, bool nonblock)
275 {
276         return _musb_submit_int_msg(&musb_host, dev, pipe, buffer, length,
277                                     interval, nonblock);
278 }
279
280 struct int_queue *create_int_queue(struct usb_device *dev,
281                 unsigned long pipe, int queuesize, int elementsize,
282                 void *buffer, int interval)
283 {
284         return _musb_create_int_queue(&musb_host, dev, pipe, queuesize, elementsize,
285                                       buffer, interval);
286 }
287
288 void *poll_int_queue(struct usb_device *dev, struct int_queue *queue)
289 {
290         return _musb_poll_int_queue(&musb_host, dev, queue);
291 }
292
293 int destroy_int_queue(struct usb_device *dev, struct int_queue *queue)
294 {
295         return _musb_destroy_int_queue(&musb_host, dev, queue);
296 }
297
298 int usb_reset_root_port(struct usb_device *dev)
299 {
300         return _musb_reset_root_port(&musb_host, dev);
301 }
302
303 int usb_lowlevel_init(int index, enum usb_init_type init, void **controller)
304 {
305         return musb_lowlevel_init(&musb_host);
306 }
307 #endif /* !CONFIG_IS_ENABLED(DM_USB) */
308
309 #if CONFIG_IS_ENABLED(DM_USB)
310 static int musb_submit_control_msg(struct udevice *dev, struct usb_device *udev,
311                                    unsigned long pipe, void *buffer, int length,
312                                    struct devrequest *setup)
313 {
314         struct musb_host_data *host = dev_get_priv(dev);
315         return _musb_submit_control_msg(host, udev, pipe, buffer, length, setup);
316 }
317
318 static int musb_submit_bulk_msg(struct udevice *dev, struct usb_device *udev,
319                                 unsigned long pipe, void *buffer, int length)
320 {
321         struct musb_host_data *host = dev_get_priv(dev);
322         return _musb_submit_bulk_msg(host, udev, pipe, buffer, length);
323 }
324
325 static int musb_submit_int_msg(struct udevice *dev, struct usb_device *udev,
326                                unsigned long pipe, void *buffer, int length,
327                                int interval, bool nonblock)
328 {
329         struct musb_host_data *host = dev_get_priv(dev);
330         return _musb_submit_int_msg(host, udev, pipe, buffer, length, interval,
331                                     nonblock);
332 }
333
334 static struct int_queue *musb_create_int_queue(struct udevice *dev,
335                 struct usb_device *udev, unsigned long pipe, int queuesize,
336                 int elementsize, void *buffer, int interval)
337 {
338         struct musb_host_data *host = dev_get_priv(dev);
339         return _musb_create_int_queue(host, udev, pipe, queuesize, elementsize,
340                                       buffer, interval);
341 }
342
343 static void *musb_poll_int_queue(struct udevice *dev, struct usb_device *udev,
344                                  struct int_queue *queue)
345 {
346         struct musb_host_data *host = dev_get_priv(dev);
347         return _musb_poll_int_queue(host, udev, queue);
348 }
349
350 static int musb_destroy_int_queue(struct udevice *dev, struct usb_device *udev,
351                                   struct int_queue *queue)
352 {
353         struct musb_host_data *host = dev_get_priv(dev);
354         return _musb_destroy_int_queue(host, udev, queue);
355 }
356
357 static int musb_reset_root_port(struct udevice *dev, struct usb_device *udev)
358 {
359         struct musb_host_data *host = dev_get_priv(dev);
360         return _musb_reset_root_port(host, udev);
361 }
362
363 struct dm_usb_ops musb_usb_ops = {
364         .control = musb_submit_control_msg,
365         .bulk = musb_submit_bulk_msg,
366         .interrupt = musb_submit_int_msg,
367         .create_int_queue = musb_create_int_queue,
368         .poll_int_queue = musb_poll_int_queue,
369         .destroy_int_queue = musb_destroy_int_queue,
370         .reset_root_port = musb_reset_root_port,
371 };
372 #endif /* CONFIG_IS_ENABLED(DM_USB) */
373 #endif /* CONFIG_USB_MUSB_HOST */
374
375 #if defined(CONFIG_USB_MUSB_GADGET) && !CONFIG_IS_ENABLED(DM_USB_GADGET)
376 static struct musb *gadget;
377
378 int usb_gadget_handle_interrupts(int index)
379 {
380         WATCHDOG_RESET();
381         if (!gadget || !gadget->isr)
382                 return -EINVAL;
383
384         return gadget->isr(0, gadget);
385 }
386
387 int usb_gadget_register_driver(struct usb_gadget_driver *driver)
388 {
389         int ret;
390
391         if (!driver || driver->speed < USB_SPEED_FULL || !driver->bind ||
392             !driver->setup) {
393                 printf("bad parameter.\n");
394                 return -EINVAL;
395         }
396
397         if (!gadget) {
398                 printf("Controller uninitialized\n");
399                 return -ENXIO;
400         }
401
402         ret = musb_gadget_start(&gadget->g, driver);
403         if (ret < 0) {
404                 printf("gadget_start failed with %d\n", ret);
405                 return ret;
406         }
407
408         ret = driver->bind(&gadget->g);
409         if (ret < 0) {
410                 printf("bind failed with %d\n", ret);
411                 return ret;
412         }
413
414         return 0;
415 }
416
417 int usb_gadget_unregister_driver(struct usb_gadget_driver *driver)
418 {
419         if (driver->disconnect)
420                 driver->disconnect(&gadget->g);
421         if (driver->unbind)
422                 driver->unbind(&gadget->g);
423         return 0;
424 }
425 #endif /* CONFIG_USB_MUSB_GADGET */
426
427 struct musb *musb_register(struct musb_hdrc_platform_data *plat, void *bdata,
428                            void *ctl_regs)
429 {
430         struct musb **musbp;
431
432         switch (plat->mode) {
433 #if defined(CONFIG_USB_MUSB_HOST) && !CONFIG_IS_ENABLED(DM_USB)
434         case MUSB_HOST:
435                 musbp = &musb_host.host;
436                 break;
437 #endif
438 #if defined(CONFIG_USB_MUSB_GADGET) && !CONFIG_IS_ENABLED(DM_USB_GADGET)
439         case MUSB_PERIPHERAL:
440                 musbp = &gadget;
441                 break;
442 #endif
443         default:
444                 return ERR_PTR(-EINVAL);
445         }
446
447         *musbp = musb_init_controller(plat, (struct device *)bdata, ctl_regs);
448         if (IS_ERR(*musbp)) {
449                 printf("Failed to init the controller\n");
450                 return ERR_CAST(*musbp);
451         }
452
453         return *musbp;
454 }