1/* $FreeBSD: head/sys/dev/usb/usb_compat_linux.c 254243 2013-08-12 09:17:48Z hselasky $ */
2/*-
3 * Copyright (c) 2007 Luigi Rizzo - Universita` di Pisa. All rights reserved.
4 * Copyright (c) 2007 Hans Petter Selasky. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 */
27
28#ifdef USB_GLOBAL_INCLUDE_FILE
29#include USB_GLOBAL_INCLUDE_FILE
30#else
31#include <sys/stdint.h>
32#include <sys/stddef.h>
33#include <sys/param.h>
34#include <sys/queue.h>
35#include <sys/types.h>
36#include <sys/systm.h>
37#include <sys/kernel.h>
38#include <sys/bus.h>
39#include <sys/module.h>
40#include <sys/lock.h>
41#include <sys/mutex.h>
42#include <sys/condvar.h>
43#include <sys/sysctl.h>
44#include <sys/sx.h>
45#include <sys/unistd.h>
46#include <sys/callout.h>
47#include <sys/malloc.h>
48#include <sys/priv.h>
49
50#include <dev/usb/usb.h>
51#include <dev/usb/usbdi.h>
52#include <dev/usb/usbdi_util.h>
53
54#define USB_DEBUG_VAR usb_debug
55
56#include <dev/usb/usb_core.h>
57#include <dev/usb/usb_compat_linux.h>
58#include <dev/usb/usb_process.h>
59#include <dev/usb/usb_device.h>
60#include <dev/usb/usb_util.h>
61#include <dev/usb/usb_busdma.h>
62#include <dev/usb/usb_transfer.h>
63#include <dev/usb/usb_hub.h>
64#include <dev/usb/usb_request.h>
65#include <dev/usb/usb_debug.h>
66#endif /* USB_GLOBAL_INCLUDE_FILE */
67
68struct usb_linux_softc {
69 LIST_ENTRY(usb_linux_softc) sc_attached_list;
70
71 device_t sc_fbsd_dev;
72 struct usb_device *sc_fbsd_udev;
73 struct usb_interface *sc_ui;
74 struct usb_driver *sc_udrv;
75};
76
77/* prototypes */
78static device_probe_t usb_linux_probe;
79static device_attach_t usb_linux_attach;
80static device_detach_t usb_linux_detach;
81static device_suspend_t usb_linux_suspend;
82static device_resume_t usb_linux_resume;
83
84static usb_callback_t usb_linux_isoc_callback;
85static usb_callback_t usb_linux_non_isoc_callback;
86
87static usb_complete_t usb_linux_wait_complete;
88
89static uint16_t usb_max_isoc_frames(struct usb_device *);
90static int usb_start_wait_urb(struct urb *, usb_timeout_t, uint16_t *);
91static const struct usb_device_id *usb_linux_lookup_id(
92 const struct usb_device_id *, struct usb_attach_arg *);
93static struct usb_driver *usb_linux_get_usb_driver(struct usb_linux_softc *);
94static int usb_linux_create_usb_device(struct usb_device *, device_t);
95static void usb_linux_cleanup_interface(struct usb_device *,
96 struct usb_interface *);
97static void usb_linux_complete(struct usb_xfer *);
98static int usb_unlink_urb_sub(struct urb *, uint8_t);
99
100/*------------------------------------------------------------------------*
101 * FreeBSD USB interface
102 *------------------------------------------------------------------------*/
103
104static LIST_HEAD(, usb_linux_softc) usb_linux_attached_list;
105static LIST_HEAD(, usb_driver) usb_linux_driver_list;
106
107static device_method_t usb_linux_methods[] = {
108 /* Device interface */
109 DEVMETHOD(device_probe, usb_linux_probe),
110 DEVMETHOD(device_attach, usb_linux_attach),
111 DEVMETHOD(device_detach, usb_linux_detach),
112 DEVMETHOD(device_suspend, usb_linux_suspend),
113 DEVMETHOD(device_resume, usb_linux_resume),
114
115 DEVMETHOD_END
116};
117
118static driver_t usb_linux_driver = {
119 .name = "usb_linux",
120 .methods = usb_linux_methods,
121 .size = sizeof(struct usb_linux_softc),
122};
123
124static devclass_t usb_linux_devclass;
125
126DRIVER_MODULE(usb_linux, uhub, usb_linux_driver, usb_linux_devclass, NULL, 0);
127MODULE_VERSION(usb_linux, 1);
128
129/*------------------------------------------------------------------------*
130 * usb_linux_lookup_id
131 *
132 * This functions takes an array of "struct usb_device_id" and tries
133 * to match the entries with the information in "struct usb_attach_arg".
134 * If it finds a match the matching entry will be returned.
135 * Else "NULL" will be returned.
136 *------------------------------------------------------------------------*/
137static const struct usb_device_id *
138usb_linux_lookup_id(const struct usb_device_id *id, struct usb_attach_arg *uaa)
139{
140 if (id == NULL) {
141 goto done;
142 }
143 /*
144 * Keep on matching array entries until we find one with
145 * "match_flags" equal to zero, which indicates the end of the
146 * array:
147 */
148 for (; id->match_flags; id++) {
149
150 if ((id->match_flags & USB_DEVICE_ID_MATCH_VENDOR) &&
151 (id->idVendor != uaa->info.idVendor)) {
152 continue;
153 }
154 if ((id->match_flags & USB_DEVICE_ID_MATCH_PRODUCT) &&
155 (id->idProduct != uaa->info.idProduct)) {
156 continue;
157 }
158 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_LO) &&
159 (id->bcdDevice_lo > uaa->info.bcdDevice)) {
160 continue;
161 }
162 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_HI) &&
163 (id->bcdDevice_hi < uaa->info.bcdDevice)) {
164 continue;
165 }
166 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_CLASS) &&
167 (id->bDeviceClass != uaa->info.bDeviceClass)) {
168 continue;
169 }
170 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_SUBCLASS) &&
171 (id->bDeviceSubClass != uaa->info.bDeviceSubClass)) {
172 continue;
173 }
174 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_PROTOCOL) &&
175 (id->bDeviceProtocol != uaa->info.bDeviceProtocol)) {
176 continue;
177 }
178 if ((uaa->info.bDeviceClass == 0xFF) &&
179 !(id->match_flags & USB_DEVICE_ID_MATCH_VENDOR) &&
180 (id->match_flags & (USB_DEVICE_ID_MATCH_INT_CLASS |
181 USB_DEVICE_ID_MATCH_INT_SUBCLASS |
182 USB_DEVICE_ID_MATCH_INT_PROTOCOL))) {
183 continue;
184 }
185 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_CLASS) &&
186 (id->bInterfaceClass != uaa->info.bInterfaceClass)) {
187 continue;
188 }
189 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_SUBCLASS) &&
190 (id->bInterfaceSubClass != uaa->info.bInterfaceSubClass)) {
191 continue;
192 }
193 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_PROTOCOL) &&
194 (id->bInterfaceProtocol != uaa->info.bInterfaceProtocol)) {
195 continue;
196 }
197 /* we found a match! */
198 return (id);
199 }
200
201done:
202 return (NULL);
203}
204
205/*------------------------------------------------------------------------*
206 * usb_linux_probe
207 *
208 * This function is the FreeBSD probe callback. It is called from the
209 * FreeBSD USB stack through the "device_probe_and_attach()" function.
210 *------------------------------------------------------------------------*/
211static int
212usb_linux_probe(device_t dev)
213{
214 struct usb_attach_arg *uaa = device_get_ivars(dev);
215 struct usb_driver *udrv;
216 int err = ENXIO;
217
218 if (uaa->usb_mode != USB_MODE_HOST) {
219 return (ENXIO);
220 }
221 mtx_lock(&Giant);
222 LIST_FOREACH(udrv, &usb_linux_driver_list, linux_driver_list) {
223 if (usb_linux_lookup_id(udrv->id_table, uaa)) {
224 err = 0;
225 break;
226 }
227 }
228 mtx_unlock(&Giant);
229
230 return (err);
231}
232
233/*------------------------------------------------------------------------*
234 * usb_linux_get_usb_driver
235 *
236 * This function returns the pointer to the "struct usb_driver" where
237 * the Linux USB device driver "struct usb_device_id" match was found.
238 * We apply a lock before reading out the pointer to avoid races.
239 *------------------------------------------------------------------------*/
240static struct usb_driver *
241usb_linux_get_usb_driver(struct usb_linux_softc *sc)
242{
243 struct usb_driver *udrv;
244
245 mtx_lock(&Giant);
246 udrv = sc->sc_udrv;
247 mtx_unlock(&Giant);
248 return (udrv);
249}
250
251/*------------------------------------------------------------------------*
252 * usb_linux_attach
253 *
254 * This function is the FreeBSD attach callback. It is called from the
255 * FreeBSD USB stack through the "device_probe_and_attach()" function.
256 * This function is called when "usb_linux_probe()" returns zero.
257 *------------------------------------------------------------------------*/
258static int
259usb_linux_attach(device_t dev)
260{
261 struct usb_attach_arg *uaa = device_get_ivars(dev);
262 struct usb_linux_softc *sc = device_get_softc(dev);
263 struct usb_driver *udrv;
264 const struct usb_device_id *id = NULL;
265
266 mtx_lock(&Giant);
267 LIST_FOREACH(udrv, &usb_linux_driver_list, linux_driver_list) {
268 id = usb_linux_lookup_id(udrv->id_table, uaa);
269 if (id)
270 break;
271 }
272 mtx_unlock(&Giant);
273
274 if (id == NULL) {
275 return (ENXIO);
276 }
277 if (usb_linux_create_usb_device(uaa->device, dev) != 0)
278 return (ENOMEM);
279 device_set_usb_desc(dev);
280
281 sc->sc_fbsd_udev = uaa->device;
282 sc->sc_fbsd_dev = dev;
283 sc->sc_udrv = udrv;
284 sc->sc_ui = usb_ifnum_to_if(uaa->device, uaa->info.bIfaceNum);
285 if (sc->sc_ui == NULL) {
286 return (EINVAL);
287 }
288 if (udrv->probe) {
289 if ((udrv->probe) (sc->sc_ui, id)) {
290 return (ENXIO);
291 }
292 }
293 mtx_lock(&Giant);
294 LIST_INSERT_HEAD(&usb_linux_attached_list, sc, sc_attached_list);
295 mtx_unlock(&Giant);
296
297 /* success */
298 return (0);
299}
300
301/*------------------------------------------------------------------------*
302 * usb_linux_detach
303 *
304 * This function is the FreeBSD detach callback. It is called from the
305 * FreeBSD USB stack through the "device_detach()" function.
306 *------------------------------------------------------------------------*/
307static int
308usb_linux_detach(device_t dev)
309{
310 struct usb_linux_softc *sc = device_get_softc(dev);
311 struct usb_driver *udrv = NULL;
312
313 mtx_lock(&Giant);
314 if (sc->sc_attached_list.le_prev) {
315 LIST_REMOVE(sc, sc_attached_list);
316 sc->sc_attached_list.le_prev = NULL;
317 udrv = sc->sc_udrv;
318 sc->sc_udrv = NULL;
319 }
320 mtx_unlock(&Giant);
321
322 if (udrv && udrv->disconnect) {
323 (udrv->disconnect) (sc->sc_ui);
324 }
325 /*
326 * Make sure that we free all FreeBSD USB transfers belonging to
327 * this Linux "usb_interface", hence they will most likely not be
328 * needed any more.
329 */
330 usb_linux_cleanup_interface(sc->sc_fbsd_udev, sc->sc_ui);
331 return (0);
332}
333
334/*------------------------------------------------------------------------*
335 * usb_linux_suspend
336 *
337 * This function is the FreeBSD suspend callback. Usually it does nothing.
338 *------------------------------------------------------------------------*/
339static int
340usb_linux_suspend(device_t dev)
341{
342 struct usb_linux_softc *sc = device_get_softc(dev);
343 struct usb_driver *udrv = usb_linux_get_usb_driver(sc);
344 int err;
345
346 if (udrv && udrv->suspend) {
347 err = (udrv->suspend) (sc->sc_ui, 0);
348 }
349 return (0);
350}
351
352/*------------------------------------------------------------------------*
353 * usb_linux_resume
354 *
355 * This function is the FreeBSD resume callback. Usually it does nothing.
356 *------------------------------------------------------------------------*/
357static int
358usb_linux_resume(device_t dev)
359{
360 struct usb_linux_softc *sc = device_get_softc(dev);
361 struct usb_driver *udrv = usb_linux_get_usb_driver(sc);
362 int err;
363
364 if (udrv && udrv->resume) {
365 err = (udrv->resume) (sc->sc_ui);
366 }
367 return (0);
368}
369
370/*------------------------------------------------------------------------*
371 * Linux emulation layer
372 *------------------------------------------------------------------------*/
373
374/*------------------------------------------------------------------------*
375 * usb_max_isoc_frames
376 *
377 * The following function returns the maximum number of isochronous
378 * frames that we support per URB. It is not part of the Linux USB API.
379 *------------------------------------------------------------------------*/
380static uint16_t
381usb_max_isoc_frames(struct usb_device *dev)
382{
383 ; /* indent fix */
384 switch (usbd_get_speed(dev)) {
385 case USB_SPEED_LOW:
386 case USB_SPEED_FULL:
387 return (USB_MAX_FULL_SPEED_ISOC_FRAMES);
388 default:
389 return (USB_MAX_HIGH_SPEED_ISOC_FRAMES);
390 }
391}
392
393/*------------------------------------------------------------------------*
394 * usb_submit_urb
395 *
396 * This function is used to queue an URB after that it has been
397 * initialized. If it returns non-zero, it means that the URB was not
398 * queued.
399 *------------------------------------------------------------------------*/
400int
401usb_submit_urb(struct urb *urb, uint16_t mem_flags)
402{
403 struct usb_host_endpoint *uhe;
404 uint8_t do_unlock;
405 int err;
406
407 if (urb == NULL)
408 return (-EINVAL);
409
410 do_unlock = mtx_owned(&Giant) ? 0 : 1;
411 if (do_unlock)
412 mtx_lock(&Giant);
413
414 if (urb->endpoint == NULL) {
415 err = -EINVAL;
416 goto done;
417 }
418
419 /*
420 * Check to see if the urb is in the process of being killed
421 * and stop a urb that is in the process of being killed from
422 * being re-submitted (e.g. from its completion callback
423 * function).
424 */
425 if (urb->kill_count != 0) {
426 err = -EPERM;
427 goto done;
428 }
429
430 uhe = urb->endpoint;
431
432 /*
433 * Check that we have got a FreeBSD USB transfer that will dequeue
434 * the URB structure and do the real transfer. If there are no USB
435 * transfers, then we return an error.
436 */
437 if (uhe->bsd_xfer[0] ||
438 uhe->bsd_xfer[1]) {
439 /* we are ready! */
440
441 TAILQ_INSERT_TAIL(&uhe->bsd_urb_list, urb, bsd_urb_list);
442
443 urb->status = -EINPROGRESS;
444
445 usbd_transfer_start(uhe->bsd_xfer[0]);
446 usbd_transfer_start(uhe->bsd_xfer[1]);
447 err = 0;
448 } else {
449 /* no pipes have been setup yet! */
450 urb->status = -EINVAL;
451 err = -EINVAL;
452 }
453done:
454 if (do_unlock)
455 mtx_unlock(&Giant);
456 return (err);
457}
458
459/*------------------------------------------------------------------------*
460 * usb_unlink_urb
461 *
462 * This function is used to stop an URB after that it is been
463 * submitted, but before the "complete" callback has been called. On
464 *------------------------------------------------------------------------*/
465int
466usb_unlink_urb(struct urb *urb)
467{
468 return (usb_unlink_urb_sub(urb, 0));
469}
470
471static void
472usb_unlink_bsd(struct usb_xfer *xfer,
473 struct urb *urb, uint8_t drain)
474{
475 if (xfer == NULL)
476 return;
477 if (!usbd_transfer_pending(xfer))
478 return;
479 if (xfer->priv_fifo == (void *)urb) {
480 if (drain) {
481 mtx_unlock(&Giant);
482 usbd_transfer_drain(xfer);
483 mtx_lock(&Giant);
484 } else {
485 usbd_transfer_stop(xfer);
486 }
487 usbd_transfer_start(xfer);
488 }
489}
490
491static int
492usb_unlink_urb_sub(struct urb *urb, uint8_t drain)
493{
494 struct usb_host_endpoint *uhe;
495 uint16_t x;
496 uint8_t do_unlock;
497 int err;
498
499 if (urb == NULL)
500 return (-EINVAL);
501
502 do_unlock = mtx_owned(&Giant) ? 0 : 1;
503 if (do_unlock)
504 mtx_lock(&Giant);
505 if (drain)
506 urb->kill_count++;
507
508 if (urb->endpoint == NULL) {
509 err = -EINVAL;
510 goto done;
511 }
512 uhe = urb->endpoint;
513
514 if (urb->bsd_urb_list.tqe_prev) {
515
516 /* not started yet, just remove it from the queue */
517 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
518 urb->bsd_urb_list.tqe_prev = NULL;
519 urb->status = -ECONNRESET;
520 urb->actual_length = 0;
521
522 for (x = 0; x < urb->number_of_packets; x++) {
523 urb->iso_frame_desc[x].actual_length = 0;
524 }
525
526 if (urb->complete) {
527 (urb->complete) (urb);
528 }
529 } else {
530
531 /*
532 * If the URB is not on the URB list, then check if one of
533 * the FreeBSD USB transfer are processing the current URB.
534 * If so, re-start that transfer, which will lead to the
535 * termination of that URB:
536 */
537 usb_unlink_bsd(uhe->bsd_xfer[0], urb, drain);
538 usb_unlink_bsd(uhe->bsd_xfer[1], urb, drain);
539 }
540 err = 0;
541done:
542 if (drain)
543 urb->kill_count--;
544 if (do_unlock)
545 mtx_unlock(&Giant);
546 return (err);
547}
548
549/*------------------------------------------------------------------------*
550 * usb_clear_halt
551 *
552 * This function must always be used to clear the stall. Stall is when
553 * an USB endpoint returns a stall message to the USB host controller.
554 * Until the stall is cleared, no data can be transferred.
555 *------------------------------------------------------------------------*/
556int
557usb_clear_halt(struct usb_device *dev, struct usb_host_endpoint *uhe)
558{
559 struct usb_config cfg[1];
560 struct usb_endpoint *ep;
561 uint8_t type;
562 uint8_t addr;
563
564 if (uhe == NULL)
565 return (-EINVAL);
566
567 type = uhe->desc.bmAttributes & UE_XFERTYPE;
568 addr = uhe->desc.bEndpointAddress;
569
570 memset(cfg, 0, sizeof(cfg));
571
572 cfg[0].type = type;
573 cfg[0].endpoint = addr & UE_ADDR;
574 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
575
576 ep = usbd_get_endpoint(dev, uhe->bsd_iface_index, cfg);
577 if (ep == NULL)
578 return (-EINVAL);
579
580 usbd_clear_data_toggle(dev, ep);
581
582 return (usb_control_msg(dev, &dev->ep0,
583 UR_CLEAR_FEATURE, UT_WRITE_ENDPOINT,
584 UF_ENDPOINT_HALT, addr, NULL, 0, 1000));
585}
586
587/*------------------------------------------------------------------------*
588 * usb_start_wait_urb
589 *
590 * This is an internal function that is used to perform synchronous
591 * Linux USB transfers.
592 *------------------------------------------------------------------------*/
593static int
594usb_start_wait_urb(struct urb *urb, usb_timeout_t timeout, uint16_t *p_actlen)
595{
596 int err;
597 uint8_t do_unlock;
598
599 /* you must have a timeout! */
600 if (timeout == 0) {
601 timeout = 1;
602 }
603 urb->complete = &usb_linux_wait_complete;
604 urb->timeout = timeout;
605 urb->transfer_flags |= URB_WAIT_WAKEUP;
606 urb->transfer_flags &= ~URB_IS_SLEEPING;
607
608 do_unlock = mtx_owned(&Giant) ? 0 : 1;
609 if (do_unlock)
610 mtx_lock(&Giant);
611 err = usb_submit_urb(urb, 0);
612 if (err)
613 goto done;
614
615 /*
616 * the URB might have completed before we get here, so check that by
617 * using some flags!
618 */
619 while (urb->transfer_flags & URB_WAIT_WAKEUP) {
620 urb->transfer_flags |= URB_IS_SLEEPING;
621 cv_wait(&urb->cv_wait, &Giant);
622 urb->transfer_flags &= ~URB_IS_SLEEPING;
623 }
624
625 err = urb->status;
626
627done:
628 if (do_unlock)
629 mtx_unlock(&Giant);
630 if (p_actlen != NULL) {
631 if (err)
632 *p_actlen = 0;
633 else
634 *p_actlen = urb->actual_length;
635 }
636 return (err);
637}
638
639/*------------------------------------------------------------------------*
640 * usb_control_msg
641 *
642 * The following function performs a control transfer sequence one any
643 * control, bulk or interrupt endpoint, specified by "uhe". A control
644 * transfer means that you transfer an 8-byte header first followed by
645 * a data-phase as indicated by the 8-byte header. The "timeout" is
646 * given in milliseconds.
647 *
648 * Return values:
649 * 0: Success
650 * < 0: Failure
651 * > 0: Acutal length
652 *------------------------------------------------------------------------*/
653int
654usb_control_msg(struct usb_device *dev, struct usb_host_endpoint *uhe,
655 uint8_t request, uint8_t requesttype,
656 uint16_t value, uint16_t index, void *data,
657 uint16_t size, usb_timeout_t timeout)
658{
659 struct usb_device_request req;
660 struct urb *urb;
661 int err;
662 uint16_t actlen;
663 uint8_t type;
664 uint8_t addr;
665
666 req.bmRequestType = requesttype;
667 req.bRequest = request;
668 USETW(req.wValue, value);
669 USETW(req.wIndex, index);
670 USETW(req.wLength, size);
671
672 if (uhe == NULL) {
673 return (-EINVAL);
674 }
675 type = (uhe->desc.bmAttributes & UE_XFERTYPE);
676 addr = (uhe->desc.bEndpointAddress & UE_ADDR);
677
678 if (type != UE_CONTROL) {
679 return (-EINVAL);
680 }
681 if (addr == 0) {
682 /*
683 * The FreeBSD USB stack supports standard control
684 * transfers on control endpoint zero:
685 */
686 err = usbd_do_request_flags(dev,
687 NULL, &req, data, USB_SHORT_XFER_OK,
688 &actlen, timeout);
689 if (err) {
690 err = -EPIPE;
691 } else {
692 err = actlen;
693 }
694 return (err);
695 }
696 if (dev->flags.usb_mode != USB_MODE_HOST) {
697 /* not supported */
698 return (-EINVAL);
699 }
700 err = usb_setup_endpoint(dev, uhe, 1 /* dummy */ );
701
702 /*
703 * NOTE: we need to allocate real memory here so that we don't
704 * transfer data to/from the stack!
705 *
706 * 0xFFFF is a FreeBSD specific magic value.
707 */
708 urb = usb_alloc_urb(0xFFFF, size);
709 if (urb == NULL)
710 return (-ENOMEM);
711
712 urb->dev = dev;
713 urb->endpoint = uhe;
714
715 memcpy(urb->setup_packet, &req, sizeof(req));
716
717 if (size && (!(req.bmRequestType & UT_READ))) {
718 /* move the data to a real buffer */
719 memcpy(USB_ADD_BYTES(urb->setup_packet, sizeof(req)),
720 data, size);
721 }
722 err = usb_start_wait_urb(urb, timeout, &actlen);
723
724 if (req.bmRequestType & UT_READ) {
725 if (actlen) {
726 bcopy(USB_ADD_BYTES(urb->setup_packet,
727 sizeof(req)), data, actlen);
728 }
729 }
730 usb_free_urb(urb);
731
732 if (err == 0) {
733 err = actlen;
734 }
735 return (err);
736}
737
738/*------------------------------------------------------------------------*
739 * usb_set_interface
740 *
741 * The following function will select which alternate setting of an
742 * USB interface you plan to use. By default alternate setting with
743 * index zero is selected. Note that "iface_no" is not the interface
744 * index, but rather the value of "bInterfaceNumber".
745 *------------------------------------------------------------------------*/
746int
747usb_set_interface(struct usb_device *dev, uint8_t iface_no, uint8_t alt_index)
748{
749 struct usb_interface *p_ui = usb_ifnum_to_if(dev, iface_no);
750 int err;
751
752 if (p_ui == NULL)
753 return (-EINVAL);
754 if (alt_index >= p_ui->num_altsetting)
755 return (-EINVAL);
756 usb_linux_cleanup_interface(dev, p_ui);
757 err = -usbd_set_alt_interface_index(dev,
758 p_ui->bsd_iface_index, alt_index);
759 if (err == 0) {
760 p_ui->cur_altsetting = p_ui->altsetting + alt_index;
761 }
762 return (err);
763}
764
765/*------------------------------------------------------------------------*
766 * usb_setup_endpoint
767 *
768 * The following function is an extension to the Linux USB API that
769 * allows you to set a maximum buffer size for a given USB endpoint.
770 * The maximum buffer size is per URB. If you don't call this function
771 * to set a maximum buffer size, the endpoint will not be functional.
772 * Note that for isochronous endpoints the maximum buffer size must be
773 * a non-zero dummy, hence this function will base the maximum buffer
774 * size on "wMaxPacketSize".
775 *------------------------------------------------------------------------*/
776int
777usb_setup_endpoint(struct usb_device *dev,
778 struct usb_host_endpoint *uhe, usb_size_t bufsize)
779{
780 struct usb_config cfg[2];
781 uint8_t type = uhe->desc.bmAttributes & UE_XFERTYPE;
782 uint8_t addr = uhe->desc.bEndpointAddress;
783
784 if (uhe->fbsd_buf_size == bufsize) {
785 /* optimize */
786 return (0);
787 }
788 usbd_transfer_unsetup(uhe->bsd_xfer, 2);
789
790 uhe->fbsd_buf_size = bufsize;
791
792 if (bufsize == 0) {
793 return (0);
794 }
795 memset(cfg, 0, sizeof(cfg));
796
797 if (type == UE_ISOCHRONOUS) {
798
799 /*
800 * Isochronous transfers are special in that they don't fit
801 * into the BULK/INTR/CONTROL transfer model.
802 */
803
804 cfg[0].type = type;
805 cfg[0].endpoint = addr & UE_ADDR;
806 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
807 cfg[0].callback = &usb_linux_isoc_callback;
808 cfg[0].bufsize = 0; /* use wMaxPacketSize */
809 cfg[0].frames = usb_max_isoc_frames(dev);
810 cfg[0].flags.proxy_buffer = 1;
811#if 0
812 /*
813 * The Linux USB API allows non back-to-back
814 * isochronous frames which we do not support. If the
815 * isochronous frames are not back-to-back we need to
816 * do a copy, and then we need a buffer for
817 * that. Enable this at your own risk.
818 */
819 cfg[0].flags.ext_buffer = 1;
820#endif
821 cfg[0].flags.short_xfer_ok = 1;
822
823 bcopy(cfg, cfg + 1, sizeof(*cfg));
824
825 /* Allocate and setup two generic FreeBSD USB transfers */
826
827 if (usbd_transfer_setup(dev, &uhe->bsd_iface_index,
828 uhe->bsd_xfer, cfg, 2, uhe, &Giant)) {
829 return (-EINVAL);
830 }
831 } else {
832 if (bufsize > (1 << 22)) {
833 /* limit buffer size */
834 bufsize = (1 << 22);
835 }
836 /* Allocate and setup one generic FreeBSD USB transfer */
837
838 cfg[0].type = type;
839 cfg[0].endpoint = addr & UE_ADDR;
840 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
841 cfg[0].callback = &usb_linux_non_isoc_callback;
842 cfg[0].bufsize = bufsize;
843 cfg[0].flags.ext_buffer = 1; /* enable zero-copy */
844 cfg[0].flags.proxy_buffer = 1;
845 cfg[0].flags.short_xfer_ok = 1;
846
847 if (usbd_transfer_setup(dev, &uhe->bsd_iface_index,
848 uhe->bsd_xfer, cfg, 1, uhe, &Giant)) {
849 return (-EINVAL);
850 }
851 }
852 return (0);
853}
854
855/*------------------------------------------------------------------------*
856 * usb_linux_create_usb_device
857 *
858 * The following function is used to build up a per USB device
859 * structure tree, that mimics the Linux one. The root structure
860 * is returned by this function.
861 *------------------------------------------------------------------------*/
862static int
863usb_linux_create_usb_device(struct usb_device *udev, device_t dev)
864{
865 struct usb_config_descriptor *cd = usbd_get_config_descriptor(udev);
866 struct usb_descriptor *desc;
867 struct usb_interface_descriptor *id;
868 struct usb_endpoint_descriptor *ed;
869 struct usb_interface *p_ui = NULL;
870 struct usb_host_interface *p_uhi = NULL;
871 struct usb_host_endpoint *p_uhe = NULL;
872 usb_size_t size;
873 uint16_t niface_total;
874 uint16_t nedesc;
875 uint16_t iface_no_curr;
876 uint16_t iface_index;
877 uint8_t pass;
878 uint8_t iface_no;
879
880 /*
881 * We do two passes. One pass for computing necessary memory size
882 * and one pass to initialize all the allocated memory structures.
883 */
884 for (pass = 0; pass < 2; pass++) {
885
886 iface_no_curr = 0xFFFF;
887 niface_total = 0;
888 iface_index = 0;
889 nedesc = 0;
890 desc = NULL;
891
892 /*
893 * Iterate over all the USB descriptors. Use the USB config
894 * descriptor pointer provided by the FreeBSD USB stack.
895 */
896 while ((desc = usb_desc_foreach(cd, desc))) {
897
898 /*
899 * Build up a tree according to the descriptors we
900 * find:
901 */
902 switch (desc->bDescriptorType) {
903 case UDESC_DEVICE:
904 break;
905
906 case UDESC_ENDPOINT:
907 ed = (void *)desc;
908 if ((ed->bLength < sizeof(*ed)) ||
909 (iface_index == 0))
910 break;
911 if (p_uhe) {
912 bcopy(ed, &p_uhe->desc, sizeof(p_uhe->desc));
913 p_uhe->bsd_iface_index = iface_index - 1;
914 TAILQ_INIT(&p_uhe->bsd_urb_list);
915 p_uhe++;
916 }
917 if (p_uhi) {
918 (p_uhi - 1)->desc.bNumEndpoints++;
919 }
920 nedesc++;
921 break;
922
923 case UDESC_INTERFACE:
924 id = (void *)desc;
925 if (id->bLength < sizeof(*id))
926 break;
927 if (p_uhi) {
928 bcopy(id, &p_uhi->desc, sizeof(p_uhi->desc));
929 p_uhi->desc.bNumEndpoints = 0;
930 p_uhi->endpoint = p_uhe;
931 p_uhi->string = "";
932 p_uhi->bsd_iface_index = iface_index;
933 p_uhi++;
934 }
935 iface_no = id->bInterfaceNumber;
936 niface_total++;
937 if (iface_no_curr != iface_no) {
938 if (p_ui) {
939 p_ui->altsetting = p_uhi - 1;
940 p_ui->cur_altsetting = p_uhi - 1;
941 p_ui->num_altsetting = 1;
942 p_ui->bsd_iface_index = iface_index;
943 p_ui->linux_udev = udev;
944 p_ui++;
945 }
946 iface_no_curr = iface_no;
947 iface_index++;
948 } else {
949 if (p_ui) {
950 (p_ui - 1)->num_altsetting++;
951 }
952 }
953 break;
954
955 default:
956 break;
957 }
958 }
959
960 if (pass == 0) {
961
962 size = (sizeof(*p_uhe) * nedesc) +
963 (sizeof(*p_ui) * iface_index) +
964 (sizeof(*p_uhi) * niface_total);
965
966 p_uhe = malloc(size, M_USBDEV, M_WAITOK | M_ZERO);
967 p_ui = (void *)(p_uhe + nedesc);
968 p_uhi = (void *)(p_ui + iface_index);
969
970 udev->linux_iface_start = p_ui;
971 udev->linux_iface_end = p_ui + iface_index;
972 udev->linux_endpoint_start = p_uhe;
973 udev->linux_endpoint_end = p_uhe + nedesc;
974 udev->devnum = device_get_unit(dev);
975 bcopy(&udev->ddesc, &udev->descriptor,
976 sizeof(udev->descriptor));
977 bcopy(udev->ctrl_ep.edesc, &udev->ep0.desc,
978 sizeof(udev->ep0.desc));
979 }
980 }
981 return (0);
982}
983
984/*------------------------------------------------------------------------*
985 * usb_alloc_urb
986 *
987 * This function should always be used when you allocate an URB for
988 * use with the USB Linux stack. In case of an isochronous transfer
989 * you must specifiy the maximum number of "iso_packets" which you
990 * plan to transfer per URB. This function is always blocking, and
991 * "mem_flags" are not regarded like on Linux.
992 *------------------------------------------------------------------------*/
993struct urb *
994usb_alloc_urb(uint16_t iso_packets, uint16_t mem_flags)
995{
996 struct urb *urb;
997 usb_size_t size;
998
999 if (iso_packets == 0xFFFF) {
1000 /*
1001 * FreeBSD specific magic value to ask for control transfer
1002 * memory allocation:
1003 */
1004 size = sizeof(*urb) + sizeof(struct usb_device_request) + mem_flags;
1005 } else {
1006 size = sizeof(*urb) + (iso_packets * sizeof(urb->iso_frame_desc[0]));
1007 }
1008
1009 urb = malloc(size, M_USBDEV, M_WAITOK | M_ZERO);
1010 if (urb) {
1011
1012 cv_init(&urb->cv_wait, "URBWAIT");
1013 if (iso_packets == 0xFFFF) {
1014 urb->setup_packet = (void *)(urb + 1);
1015 urb->transfer_buffer = (void *)(urb->setup_packet +
1016 sizeof(struct usb_device_request));
1017 } else {
1018 urb->number_of_packets = iso_packets;
1019 }
1020 }
1021 return (urb);
1022}
1023
1024/*------------------------------------------------------------------------*
1025 * usb_find_host_endpoint
1026 *
1027 * The following function will return the Linux USB host endpoint
1028 * structure that matches the given endpoint type and endpoint
1029 * value. If no match is found, NULL is returned. This function is not
1030 * part of the Linux USB API and is only used internally.
1031 *------------------------------------------------------------------------*/
1032struct usb_host_endpoint *
1033usb_find_host_endpoint(struct usb_device *dev, uint8_t type, uint8_t ep)
1034{
1035 struct usb_host_endpoint *uhe;
1036 struct usb_host_endpoint *uhe_end;
1037 struct usb_host_interface *uhi;
1038 struct usb_interface *ui;
1039 uint8_t ea;
1040 uint8_t at;
1041 uint8_t mask;
1042
1043 if (dev == NULL) {
1044 return (NULL);
1045 }
1046 if (type == UE_CONTROL) {
1047 mask = UE_ADDR;
1048 } else {
1049 mask = (UE_DIR_IN | UE_DIR_OUT | UE_ADDR);
1050 }
1051
1052 ep &= mask;
1053
1054 /*
1055 * Iterate over all the interfaces searching the selected alternate
1056 * setting only, and all belonging endpoints.
1057 */
1058 for (ui = dev->linux_iface_start;
1059 ui != dev->linux_iface_end;
1060 ui++) {
1061 uhi = ui->cur_altsetting;
1062 if (uhi) {
1063 uhe_end = uhi->endpoint + uhi->desc.bNumEndpoints;
1064 for (uhe = uhi->endpoint;
1065 uhe != uhe_end;
1066 uhe++) {
1067 ea = uhe->desc.bEndpointAddress;
1068 at = uhe->desc.bmAttributes;
1069
1070 if (((ea & mask) == ep) &&
1071 ((at & UE_XFERTYPE) == type)) {
1072 return (uhe);
1073 }
1074 }
1075 }
1076 }
1077
1078 if ((type == UE_CONTROL) && ((ep & UE_ADDR) == 0)) {
1079 return (&dev->ep0);
1080 }
1081 return (NULL);
1082}
1083
1084/*------------------------------------------------------------------------*
1085 * usb_altnum_to_altsetting
1086 *
1087 * The following function returns a pointer to an alternate setting by
1088 * index given a "usb_interface" pointer. If the alternate setting by
1089 * index does not exist, NULL is returned. And alternate setting is a
1090 * variant of an interface, but usually with slightly different
1091 * characteristics.
1092 *------------------------------------------------------------------------*/
1093struct usb_host_interface *
1094usb_altnum_to_altsetting(const struct usb_interface *intf, uint8_t alt_index)
1095{
1096 if (alt_index >= intf->num_altsetting) {
1097 return (NULL);
1098 }
1099 return (intf->altsetting + alt_index);
1100}
1101
1102/*------------------------------------------------------------------------*
1103 * usb_ifnum_to_if
1104 *
1105 * The following function searches up an USB interface by
1106 * "bInterfaceNumber". If no match is found, NULL is returned.
1107 *------------------------------------------------------------------------*/
1108struct usb_interface *
1109usb_ifnum_to_if(struct usb_device *dev, uint8_t iface_no)
1110{
1111 struct usb_interface *p_ui;
1112
1113 for (p_ui = dev->linux_iface_start;
1114 p_ui != dev->linux_iface_end;
1115 p_ui++) {
1116 if ((p_ui->num_altsetting > 0) &&
1117 (p_ui->altsetting->desc.bInterfaceNumber == iface_no)) {
1118 return (p_ui);
1119 }
1120 }
1121 return (NULL);
1122}
1123
1124/*------------------------------------------------------------------------*
1125 * usb_buffer_alloc
1126 *------------------------------------------------------------------------*/
1127void *
1128usb_buffer_alloc(struct usb_device *dev, usb_size_t size, uint16_t mem_flags, uint8_t *dma_addr)
1129{
1130 return (malloc(size, M_USBDEV, M_WAITOK | M_ZERO));
1131}
1132
1133/*------------------------------------------------------------------------*
1134 * usbd_get_intfdata
1135 *------------------------------------------------------------------------*/
1136void *
1137usbd_get_intfdata(struct usb_interface *intf)
1138{
1139 return (intf->bsd_priv_sc);
1140}
1141
1142/*------------------------------------------------------------------------*
1143 * usb_linux_register
1144 *
1145 * The following function is used by the "USB_DRIVER_EXPORT()" macro,
1146 * and is used to register a Linux USB driver, so that its
1147 * "usb_device_id" structures gets searched a probe time. This
1148 * function is not part of the Linux USB API, and is for internal use
1149 * only.
1150 *------------------------------------------------------------------------*/
1151void
1152usb_linux_register(void *arg)
1153{
1154 struct usb_driver *drv = arg;
1155
1156 mtx_lock(&Giant);
1157 LIST_INSERT_HEAD(&usb_linux_driver_list, drv, linux_driver_list);
1158 mtx_unlock(&Giant);
1159
1160 usb_needs_explore_all();
1161}
1162
1163/*------------------------------------------------------------------------*
1164 * usb_linux_deregister
1165 *
1166 * The following function is used by the "USB_DRIVER_EXPORT()" macro,
1167 * and is used to deregister a Linux USB driver. This function will
1168 * ensure that all driver instances belonging to the Linux USB device
1169 * driver in question, gets detached before the driver is
1170 * unloaded. This function is not part of the Linux USB API, and is
1171 * for internal use only.
1172 *------------------------------------------------------------------------*/
1173void
1174usb_linux_deregister(void *arg)
1175{
1176 struct usb_driver *drv = arg;
1177 struct usb_linux_softc *sc;
1178
1179repeat:
1180 mtx_lock(&Giant);
1181 LIST_FOREACH(sc, &usb_linux_attached_list, sc_attached_list) {
1182 if (sc->sc_udrv == drv) {
1183 mtx_unlock(&Giant);
1184 device_detach(sc->sc_fbsd_dev);
1185 goto repeat;
1186 }
1187 }
1188 LIST_REMOVE(drv, linux_driver_list);
1189 mtx_unlock(&Giant);
1190}
1191
1192/*------------------------------------------------------------------------*
1193 * usb_linux_free_device
1194 *
1195 * The following function is only used by the FreeBSD USB stack, to
1196 * cleanup and free memory after that a Linux USB device was attached.
1197 *------------------------------------------------------------------------*/
1198void
1199usb_linux_free_device(struct usb_device *dev)
1200{
1201 struct usb_host_endpoint *uhe;
1202 struct usb_host_endpoint *uhe_end;
1203 int err;
1204
1205 uhe = dev->linux_endpoint_start;
1206 uhe_end = dev->linux_endpoint_end;
1207 while (uhe != uhe_end) {
1208 err = usb_setup_endpoint(dev, uhe, 0);
1209 uhe++;
1210 }
1211 err = usb_setup_endpoint(dev, &dev->ep0, 0);
1212 free(dev->linux_endpoint_start, M_USBDEV);
1213}
1214
1215/*------------------------------------------------------------------------*
1216 * usb_buffer_free
1217 *------------------------------------------------------------------------*/
1218void
1219usb_buffer_free(struct usb_device *dev, usb_size_t size,
1220 void *addr, uint8_t dma_addr)
1221{
1222 free(addr, M_USBDEV);
1223}
1224
1225/*------------------------------------------------------------------------*
1226 * usb_free_urb
1227 *------------------------------------------------------------------------*/
1228void
1229usb_free_urb(struct urb *urb)
1230{
1231 if (urb == NULL) {
1232 return;
1233 }
1234 /* make sure that the current URB is not active */
1235 usb_kill_urb(urb);
1236
1237 /* destroy condition variable */
1238 cv_destroy(&urb->cv_wait);
1239
1240 /* just free it */
1241 free(urb, M_USBDEV);
1242}
1243
1244/*------------------------------------------------------------------------*
1245 * usb_init_urb
1246 *
1247 * The following function can be used to initialize a custom URB. It
1248 * is not recommended to use this function. Use "usb_alloc_urb()"
1249 * instead.
1250 *------------------------------------------------------------------------*/
1251void
1252usb_init_urb(struct urb *urb)
1253{
1254 if (urb == NULL) {
1255 return;
1256 }
1257 memset(urb, 0, sizeof(*urb));
1258}
1259
1260/*------------------------------------------------------------------------*
1261 * usb_kill_urb
1262 *------------------------------------------------------------------------*/
1263void
1264usb_kill_urb(struct urb *urb)
1265{
1266 usb_unlink_urb_sub(urb, 1);
1267}
1268
1269/*------------------------------------------------------------------------*
1270 * usb_set_intfdata
1271 *
1272 * The following function sets the per Linux USB interface private
1273 * data pointer. It is used by most Linux USB device drivers.
1274 *------------------------------------------------------------------------*/
1275void
1276usb_set_intfdata(struct usb_interface *intf, void *data)
1277{
1278 intf->bsd_priv_sc = data;
1279}
1280
1281/*------------------------------------------------------------------------*
1282 * usb_linux_cleanup_interface
1283 *
1284 * The following function will release all FreeBSD USB transfers
1285 * associated with a Linux USB interface. It is for internal use only.
1286 *------------------------------------------------------------------------*/
1287static void
1288usb_linux_cleanup_interface(struct usb_device *dev, struct usb_interface *iface)
1289{
1290 struct usb_host_interface *uhi;
1291 struct usb_host_interface *uhi_end;
1292 struct usb_host_endpoint *uhe;
1293 struct usb_host_endpoint *uhe_end;
1294 int err;
1295
1296 uhi = iface->altsetting;
1297 uhi_end = iface->altsetting + iface->num_altsetting;
1298 while (uhi != uhi_end) {
1299 uhe = uhi->endpoint;
1300 uhe_end = uhi->endpoint + uhi->desc.bNumEndpoints;
1301 while (uhe != uhe_end) {
1302 err = usb_setup_endpoint(dev, uhe, 0);
1303 uhe++;
1304 }
1305 uhi++;
1306 }
1307}
1308
1309/*------------------------------------------------------------------------*
1310 * usb_linux_wait_complete
1311 *
1312 * The following function is used by "usb_start_wait_urb()" to wake it
1313 * up, when an USB transfer has finished.
1314 *------------------------------------------------------------------------*/
1315static void
1316usb_linux_wait_complete(struct urb *urb)
1317{
1318 if (urb->transfer_flags & URB_IS_SLEEPING) {
1319 cv_signal(&urb->cv_wait);
1320 }
1321 urb->transfer_flags &= ~URB_WAIT_WAKEUP;
1322}
1323
1324/*------------------------------------------------------------------------*
1325 * usb_linux_complete
1326 *------------------------------------------------------------------------*/
1327static void
1328usb_linux_complete(struct usb_xfer *xfer)
1329{
1330 struct urb *urb;
1331
1332 urb = usbd_xfer_get_priv(xfer);
1333 usbd_xfer_set_priv(xfer, NULL);
1334 if (urb->complete) {
1335 (urb->complete) (urb);
1336 }
1337}
1338
1339/*------------------------------------------------------------------------*
1340 * usb_linux_isoc_callback
1341 *
1342 * The following is the FreeBSD isochronous USB callback. Isochronous
1343 * frames are USB packets transferred 1000 or 8000 times per second,
1344 * depending on whether a full- or high- speed USB transfer is
1345 * used.
1346 *------------------------------------------------------------------------*/
1347static void
1348usb_linux_isoc_callback(struct usb_xfer *xfer, usb_error_t error)
1349{
1350 usb_frlength_t max_frame = xfer->max_frame_size;
1351 usb_frlength_t offset;
1352 usb_frcount_t x;
1353 struct urb *urb = usbd_xfer_get_priv(xfer);
1354 struct usb_host_endpoint *uhe = usbd_xfer_softc(xfer);
1355 struct usb_iso_packet_descriptor *uipd;
1356
1357 DPRINTF("\n");
1358
1359 switch (USB_GET_STATE(xfer)) {
1360 case USB_ST_TRANSFERRED:
1361
1362 if (urb->bsd_isread) {
1363
1364 /* copy in data with regard to the URB */
1365
1366 offset = 0;
1367
1368 for (x = 0; x < urb->number_of_packets; x++) {
1369 uipd = urb->iso_frame_desc + x;
1370 if (uipd->length > xfer->frlengths[x]) {
1371 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1372 /* XXX should be EREMOTEIO */
1373 uipd->status = -EPIPE;
1374 } else {
1375 uipd->status = 0;
1376 }
1377 } else {
1378 uipd->status = 0;
1379 }
1380 uipd->actual_length = xfer->frlengths[x];
1381 if (!xfer->flags.ext_buffer) {
1382 usbd_copy_out(xfer->frbuffers, offset,
1383 USB_ADD_BYTES(urb->transfer_buffer,
1384 uipd->offset), uipd->actual_length);
1385 }
1386 offset += max_frame;
1387 }
1388 } else {
1389 for (x = 0; x < urb->number_of_packets; x++) {
1390 uipd = urb->iso_frame_desc + x;
1391 uipd->actual_length = xfer->frlengths[x];
1392 uipd->status = 0;
1393 }
1394 }
1395
1396 urb->actual_length = xfer->actlen;
1397
1398 /* check for short transfer */
1399 if (xfer->actlen < xfer->sumlen) {
1400 /* short transfer */
1401 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1402 /* XXX should be EREMOTEIO */
1403 urb->status = -EPIPE;
1404 } else {
1405 urb->status = 0;
1406 }
1407 } else {
1408 /* success */
1409 urb->status = 0;
1410 }
1411
1412 /* call callback */
1413 usb_linux_complete(xfer);
1414
1415 case USB_ST_SETUP:
1416tr_setup:
1417
1418 if (xfer->priv_fifo == NULL) {
1419
1420 /* get next transfer */
1421 urb = TAILQ_FIRST(&uhe->bsd_urb_list);
1422 if (urb == NULL) {
1423 /* nothing to do */
1424 return;
1425 }
1426 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
1427 urb->bsd_urb_list.tqe_prev = NULL;
1428
1429 x = xfer->max_frame_count;
1430 if (urb->number_of_packets > x) {
1431 /* XXX simply truncate the transfer */
1432 urb->number_of_packets = x;
1433 }
1434 } else {
1435 DPRINTF("Already got a transfer\n");
1436
1437 /* already got a transfer (should not happen) */
1438 urb = usbd_xfer_get_priv(xfer);
1439 }
1440
1441 urb->bsd_isread = (uhe->desc.bEndpointAddress & UE_DIR_IN) ? 1 : 0;
1442
1443 if (xfer->flags.ext_buffer) {
1444 /* set virtual address to load */
1445 usbd_xfer_set_frame_data(xfer, 0, urb->transfer_buffer, 0);
1446 }
1447 if (!(urb->bsd_isread)) {
1448
1449 /* copy out data with regard to the URB */
1450
1451 offset = 0;
1452
1453 for (x = 0; x < urb->number_of_packets; x++) {
1454 uipd = urb->iso_frame_desc + x;
1455 usbd_xfer_set_frame_len(xfer, x, uipd->length);
1456 if (!xfer->flags.ext_buffer) {
1457 usbd_copy_in(xfer->frbuffers, offset,
1458 USB_ADD_BYTES(urb->transfer_buffer,
1459 uipd->offset), uipd->length);
1460 }
1461 offset += uipd->length;
1462 }
1463 } else {
1464
1465 /*
1466 * compute the transfer length into the "offset"
1467 * variable
1468 */
1469
1470 offset = urb->number_of_packets * max_frame;
1471
1472 /* setup "frlengths" array */
1473
1474 for (x = 0; x < urb->number_of_packets; x++) {
1475 uipd = urb->iso_frame_desc + x;
1476 usbd_xfer_set_frame_len(xfer, x, max_frame);
1477 }
1478 }
1479 usbd_xfer_set_priv(xfer, urb);
1480 xfer->flags.force_short_xfer = 0;
1481 xfer->timeout = urb->timeout;
1482 xfer->nframes = urb->number_of_packets;
1483 usbd_transfer_submit(xfer);
1484 return;
1485
1486 default: /* Error */
1487 if (xfer->error == USB_ERR_CANCELLED) {
1488 urb->status = -ECONNRESET;
1489 } else {
1490 urb->status = -EPIPE; /* stalled */
1491 }
1492
1493 /* Set zero for "actual_length" */
1494 urb->actual_length = 0;
1495
1496 /* Set zero for "actual_length" */
1497 for (x = 0; x < urb->number_of_packets; x++) {
1498 urb->iso_frame_desc[x].actual_length = 0;
1499 urb->iso_frame_desc[x].status = urb->status;
1500 }
1501
1502 /* call callback */
1503 usb_linux_complete(xfer);
1504
1505 if (xfer->error == USB_ERR_CANCELLED) {
1506 /* we need to return in this case */
1507 return;
1508 }
1509 goto tr_setup;
1510
1511 }
1512}
1513
1514/*------------------------------------------------------------------------*
1515 * usb_linux_non_isoc_callback
1516 *
1517 * The following is the FreeBSD BULK/INTERRUPT and CONTROL USB
1518 * callback. It dequeues Linux USB stack compatible URB's, transforms
1519 * the URB fields into a FreeBSD USB transfer, and defragments the USB
1520 * transfer as required. When the transfer is complete the "complete"
1521 * callback is called.
1522 *------------------------------------------------------------------------*/
1523static void
1524usb_linux_non_isoc_callback(struct usb_xfer *xfer, usb_error_t error)
1525{
1526 enum {
1527 REQ_SIZE = sizeof(struct usb_device_request)
1528 };
1529 struct urb *urb = usbd_xfer_get_priv(xfer);
1530 struct usb_host_endpoint *uhe = usbd_xfer_softc(xfer);
1531 uint8_t *ptr;
1532 usb_frlength_t max_bulk = usbd_xfer_max_len(xfer);
1533 uint8_t data_frame = xfer->flags_int.control_xfr ? 1 : 0;
1534
1535 DPRINTF("\n");
1536
1537 switch (USB_GET_STATE(xfer)) {
1538 case USB_ST_TRANSFERRED:
1539
1540 if (xfer->flags_int.control_xfr) {
1541
1542 /* don't transfer the setup packet again: */
1543
1544 usbd_xfer_set_frame_len(xfer, 0, 0);
1545 }
1546 if (urb->bsd_isread && (!xfer->flags.ext_buffer)) {
1547 /* copy in data with regard to the URB */
1548 usbd_copy_out(xfer->frbuffers + data_frame, 0,
1549 urb->bsd_data_ptr, xfer->frlengths[data_frame]);
1550 }
1551 urb->bsd_length_rem -= xfer->frlengths[data_frame];
1552 urb->bsd_data_ptr += xfer->frlengths[data_frame];
1553 urb->actual_length += xfer->frlengths[data_frame];
1554
1555 /* check for short transfer */
1556 if (xfer->actlen < xfer->sumlen) {
1557 urb->bsd_length_rem = 0;
1558
1559 /* short transfer */
1560 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1561 urb->status = -EPIPE;
1562 } else {
1563 urb->status = 0;
1564 }
1565 } else {
1566 /* check remainder */
1567 if (urb->bsd_length_rem > 0) {
1568 goto setup_bulk;
1569 }
1570 /* success */
1571 urb->status = 0;
1572 }
1573
1574 /* call callback */
1575 usb_linux_complete(xfer);
1576
1577 case USB_ST_SETUP:
1578tr_setup:
1579 /* get next transfer */
1580 urb = TAILQ_FIRST(&uhe->bsd_urb_list);
1581 if (urb == NULL) {
1582 /* nothing to do */
1583 return;
1584 }
1585 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
1586 urb->bsd_urb_list.tqe_prev = NULL;
1587
1588 usbd_xfer_set_priv(xfer, urb);
1589 xfer->flags.force_short_xfer = 0;
1590 xfer->timeout = urb->timeout;
1591
1592 if (xfer->flags_int.control_xfr) {
1593
1594 /*
1595 * USB control transfers need special handling.
1596 * First copy in the header, then copy in data!
1597 */
1598 if (!xfer->flags.ext_buffer) {
1599 usbd_copy_in(xfer->frbuffers, 0,
1600 urb->setup_packet, REQ_SIZE);
1601 usbd_xfer_set_frame_len(xfer, 0, REQ_SIZE);
1602 } else {
1603 /* set virtual address to load */
1604 usbd_xfer_set_frame_data(xfer, 0,
1605 urb->setup_packet, REQ_SIZE);
1606 }
1607
1608 ptr = urb->setup_packet;
1609
1610 /* setup data transfer direction and length */
1611 urb->bsd_isread = (ptr[0] & UT_READ) ? 1 : 0;
1612 urb->bsd_length_rem = ptr[6] | (ptr[7] << 8);
1613
1614 } else {
1615
1616 /* setup data transfer direction */
1617
1618 urb->bsd_length_rem = urb->transfer_buffer_length;
1619 urb->bsd_isread = (uhe->desc.bEndpointAddress &
1620 UE_DIR_IN) ? 1 : 0;
1621 }
1622
1623 urb->bsd_data_ptr = urb->transfer_buffer;
1624 urb->actual_length = 0;
1625
1626setup_bulk:
1627 if (max_bulk > urb->bsd_length_rem) {
1628 max_bulk = urb->bsd_length_rem;
1629 }
1630 /* check if we need to force a short transfer */
1631
1632 if ((max_bulk == urb->bsd_length_rem) &&
1633 (urb->transfer_flags & URB_ZERO_PACKET) &&
1634 (!xfer->flags_int.control_xfr)) {
1635 xfer->flags.force_short_xfer = 1;
1636 }
1637 /* check if we need to copy in data */
1638
1639 if (xfer->flags.ext_buffer) {
1640 /* set virtual address to load */
1641 usbd_xfer_set_frame_data(xfer, data_frame,
1642 urb->bsd_data_ptr, max_bulk);
1643 } else if (!urb->bsd_isread) {
1644 /* copy out data with regard to the URB */
1645 usbd_copy_in(xfer->frbuffers + data_frame, 0,
1646 urb->bsd_data_ptr, max_bulk);
1647 usbd_xfer_set_frame_len(xfer, data_frame, max_bulk);
1648 }
1649 if (xfer->flags_int.control_xfr) {
1650 if (max_bulk > 0) {
1651 xfer->nframes = 2;
1652 } else {
1653 xfer->nframes = 1;
1654 }
1655 } else {
1656 xfer->nframes = 1;
1657 }
1658 usbd_transfer_submit(xfer);
1659 return;
1660
1661 default:
1662 if (xfer->error == USB_ERR_CANCELLED) {
1663 urb->status = -ECONNRESET;
1664 } else {
1665 urb->status = -EPIPE;
1666 }
1667
1668 /* Set zero for "actual_length" */
1669 urb->actual_length = 0;
1670
1671 /* call callback */
1672 usb_linux_complete(xfer);
1673
1674 if (xfer->error == USB_ERR_CANCELLED) {
1675 /* we need to return in this case */
1676 return;
1677 }
1678 goto tr_setup;
1679 }
1680}
1681
1682/*------------------------------------------------------------------------*
1683 * usb_fill_bulk_urb
1684 *------------------------------------------------------------------------*/
1685void
1686usb_fill_bulk_urb(struct urb *urb, struct usb_device *udev,
1687 struct usb_host_endpoint *uhe, void *buf,
1688 int length, usb_complete_t callback, void *arg)
1689{
1690 urb->dev = udev;
1691 urb->endpoint = uhe;
1692 urb->transfer_buffer = buf;
1693 urb->transfer_buffer_length = length;
1694 urb->complete = callback;
1695 urb->context = arg;
1696}
1697
1698/*------------------------------------------------------------------------*
1699 * usb_bulk_msg
1700 *
1701 * NOTE: This function can also be used for interrupt endpoints!
1702 *
1703 * Return values:
1704 * 0: Success
1705 * Else: Failure
1706 *------------------------------------------------------------------------*/
1707int
1708usb_bulk_msg(struct usb_device *udev, struct usb_host_endpoint *uhe,
1709 void *data, int len, uint16_t *pactlen, usb_timeout_t timeout)
1710{
1711 struct urb *urb;
1712 int err;
1713
1714 if (uhe == NULL)
1715 return (-EINVAL);
1716 if (len < 0)
1717 return (-EINVAL);
1718
1719 err = usb_setup_endpoint(udev, uhe, 4096 /* bytes */);
1720 if (err)
1721 return (err);
1722
1723 urb = usb_alloc_urb(0, 0);
1724 if (urb == NULL)
1725 return (-ENOMEM);
1726
1727 usb_fill_bulk_urb(urb, udev, uhe, data, len,
1728 usb_linux_wait_complete, NULL);
1729
1730 err = usb_start_wait_urb(urb, timeout, pactlen);
1731
1732 usb_free_urb(urb);
1733
1734 return (err);
1735}
2/*-
3 * Copyright (c) 2007 Luigi Rizzo - Universita` di Pisa. All rights reserved.
4 * Copyright (c) 2007 Hans Petter Selasky. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 */
27
28#ifdef USB_GLOBAL_INCLUDE_FILE
29#include USB_GLOBAL_INCLUDE_FILE
30#else
31#include <sys/stdint.h>
32#include <sys/stddef.h>
33#include <sys/param.h>
34#include <sys/queue.h>
35#include <sys/types.h>
36#include <sys/systm.h>
37#include <sys/kernel.h>
38#include <sys/bus.h>
39#include <sys/module.h>
40#include <sys/lock.h>
41#include <sys/mutex.h>
42#include <sys/condvar.h>
43#include <sys/sysctl.h>
44#include <sys/sx.h>
45#include <sys/unistd.h>
46#include <sys/callout.h>
47#include <sys/malloc.h>
48#include <sys/priv.h>
49
50#include <dev/usb/usb.h>
51#include <dev/usb/usbdi.h>
52#include <dev/usb/usbdi_util.h>
53
54#define USB_DEBUG_VAR usb_debug
55
56#include <dev/usb/usb_core.h>
57#include <dev/usb/usb_compat_linux.h>
58#include <dev/usb/usb_process.h>
59#include <dev/usb/usb_device.h>
60#include <dev/usb/usb_util.h>
61#include <dev/usb/usb_busdma.h>
62#include <dev/usb/usb_transfer.h>
63#include <dev/usb/usb_hub.h>
64#include <dev/usb/usb_request.h>
65#include <dev/usb/usb_debug.h>
66#endif /* USB_GLOBAL_INCLUDE_FILE */
67
68struct usb_linux_softc {
69 LIST_ENTRY(usb_linux_softc) sc_attached_list;
70
71 device_t sc_fbsd_dev;
72 struct usb_device *sc_fbsd_udev;
73 struct usb_interface *sc_ui;
74 struct usb_driver *sc_udrv;
75};
76
77/* prototypes */
78static device_probe_t usb_linux_probe;
79static device_attach_t usb_linux_attach;
80static device_detach_t usb_linux_detach;
81static device_suspend_t usb_linux_suspend;
82static device_resume_t usb_linux_resume;
83
84static usb_callback_t usb_linux_isoc_callback;
85static usb_callback_t usb_linux_non_isoc_callback;
86
87static usb_complete_t usb_linux_wait_complete;
88
89static uint16_t usb_max_isoc_frames(struct usb_device *);
90static int usb_start_wait_urb(struct urb *, usb_timeout_t, uint16_t *);
91static const struct usb_device_id *usb_linux_lookup_id(
92 const struct usb_device_id *, struct usb_attach_arg *);
93static struct usb_driver *usb_linux_get_usb_driver(struct usb_linux_softc *);
94static int usb_linux_create_usb_device(struct usb_device *, device_t);
95static void usb_linux_cleanup_interface(struct usb_device *,
96 struct usb_interface *);
97static void usb_linux_complete(struct usb_xfer *);
98static int usb_unlink_urb_sub(struct urb *, uint8_t);
99
100/*------------------------------------------------------------------------*
101 * FreeBSD USB interface
102 *------------------------------------------------------------------------*/
103
104static LIST_HEAD(, usb_linux_softc) usb_linux_attached_list;
105static LIST_HEAD(, usb_driver) usb_linux_driver_list;
106
107static device_method_t usb_linux_methods[] = {
108 /* Device interface */
109 DEVMETHOD(device_probe, usb_linux_probe),
110 DEVMETHOD(device_attach, usb_linux_attach),
111 DEVMETHOD(device_detach, usb_linux_detach),
112 DEVMETHOD(device_suspend, usb_linux_suspend),
113 DEVMETHOD(device_resume, usb_linux_resume),
114
115 DEVMETHOD_END
116};
117
118static driver_t usb_linux_driver = {
119 .name = "usb_linux",
120 .methods = usb_linux_methods,
121 .size = sizeof(struct usb_linux_softc),
122};
123
124static devclass_t usb_linux_devclass;
125
126DRIVER_MODULE(usb_linux, uhub, usb_linux_driver, usb_linux_devclass, NULL, 0);
127MODULE_VERSION(usb_linux, 1);
128
129/*------------------------------------------------------------------------*
130 * usb_linux_lookup_id
131 *
132 * This functions takes an array of "struct usb_device_id" and tries
133 * to match the entries with the information in "struct usb_attach_arg".
134 * If it finds a match the matching entry will be returned.
135 * Else "NULL" will be returned.
136 *------------------------------------------------------------------------*/
137static const struct usb_device_id *
138usb_linux_lookup_id(const struct usb_device_id *id, struct usb_attach_arg *uaa)
139{
140 if (id == NULL) {
141 goto done;
142 }
143 /*
144 * Keep on matching array entries until we find one with
145 * "match_flags" equal to zero, which indicates the end of the
146 * array:
147 */
148 for (; id->match_flags; id++) {
149
150 if ((id->match_flags & USB_DEVICE_ID_MATCH_VENDOR) &&
151 (id->idVendor != uaa->info.idVendor)) {
152 continue;
153 }
154 if ((id->match_flags & USB_DEVICE_ID_MATCH_PRODUCT) &&
155 (id->idProduct != uaa->info.idProduct)) {
156 continue;
157 }
158 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_LO) &&
159 (id->bcdDevice_lo > uaa->info.bcdDevice)) {
160 continue;
161 }
162 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_HI) &&
163 (id->bcdDevice_hi < uaa->info.bcdDevice)) {
164 continue;
165 }
166 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_CLASS) &&
167 (id->bDeviceClass != uaa->info.bDeviceClass)) {
168 continue;
169 }
170 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_SUBCLASS) &&
171 (id->bDeviceSubClass != uaa->info.bDeviceSubClass)) {
172 continue;
173 }
174 if ((id->match_flags & USB_DEVICE_ID_MATCH_DEV_PROTOCOL) &&
175 (id->bDeviceProtocol != uaa->info.bDeviceProtocol)) {
176 continue;
177 }
178 if ((uaa->info.bDeviceClass == 0xFF) &&
179 !(id->match_flags & USB_DEVICE_ID_MATCH_VENDOR) &&
180 (id->match_flags & (USB_DEVICE_ID_MATCH_INT_CLASS |
181 USB_DEVICE_ID_MATCH_INT_SUBCLASS |
182 USB_DEVICE_ID_MATCH_INT_PROTOCOL))) {
183 continue;
184 }
185 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_CLASS) &&
186 (id->bInterfaceClass != uaa->info.bInterfaceClass)) {
187 continue;
188 }
189 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_SUBCLASS) &&
190 (id->bInterfaceSubClass != uaa->info.bInterfaceSubClass)) {
191 continue;
192 }
193 if ((id->match_flags & USB_DEVICE_ID_MATCH_INT_PROTOCOL) &&
194 (id->bInterfaceProtocol != uaa->info.bInterfaceProtocol)) {
195 continue;
196 }
197 /* we found a match! */
198 return (id);
199 }
200
201done:
202 return (NULL);
203}
204
205/*------------------------------------------------------------------------*
206 * usb_linux_probe
207 *
208 * This function is the FreeBSD probe callback. It is called from the
209 * FreeBSD USB stack through the "device_probe_and_attach()" function.
210 *------------------------------------------------------------------------*/
211static int
212usb_linux_probe(device_t dev)
213{
214 struct usb_attach_arg *uaa = device_get_ivars(dev);
215 struct usb_driver *udrv;
216 int err = ENXIO;
217
218 if (uaa->usb_mode != USB_MODE_HOST) {
219 return (ENXIO);
220 }
221 mtx_lock(&Giant);
222 LIST_FOREACH(udrv, &usb_linux_driver_list, linux_driver_list) {
223 if (usb_linux_lookup_id(udrv->id_table, uaa)) {
224 err = 0;
225 break;
226 }
227 }
228 mtx_unlock(&Giant);
229
230 return (err);
231}
232
233/*------------------------------------------------------------------------*
234 * usb_linux_get_usb_driver
235 *
236 * This function returns the pointer to the "struct usb_driver" where
237 * the Linux USB device driver "struct usb_device_id" match was found.
238 * We apply a lock before reading out the pointer to avoid races.
239 *------------------------------------------------------------------------*/
240static struct usb_driver *
241usb_linux_get_usb_driver(struct usb_linux_softc *sc)
242{
243 struct usb_driver *udrv;
244
245 mtx_lock(&Giant);
246 udrv = sc->sc_udrv;
247 mtx_unlock(&Giant);
248 return (udrv);
249}
250
251/*------------------------------------------------------------------------*
252 * usb_linux_attach
253 *
254 * This function is the FreeBSD attach callback. It is called from the
255 * FreeBSD USB stack through the "device_probe_and_attach()" function.
256 * This function is called when "usb_linux_probe()" returns zero.
257 *------------------------------------------------------------------------*/
258static int
259usb_linux_attach(device_t dev)
260{
261 struct usb_attach_arg *uaa = device_get_ivars(dev);
262 struct usb_linux_softc *sc = device_get_softc(dev);
263 struct usb_driver *udrv;
264 const struct usb_device_id *id = NULL;
265
266 mtx_lock(&Giant);
267 LIST_FOREACH(udrv, &usb_linux_driver_list, linux_driver_list) {
268 id = usb_linux_lookup_id(udrv->id_table, uaa);
269 if (id)
270 break;
271 }
272 mtx_unlock(&Giant);
273
274 if (id == NULL) {
275 return (ENXIO);
276 }
277 if (usb_linux_create_usb_device(uaa->device, dev) != 0)
278 return (ENOMEM);
279 device_set_usb_desc(dev);
280
281 sc->sc_fbsd_udev = uaa->device;
282 sc->sc_fbsd_dev = dev;
283 sc->sc_udrv = udrv;
284 sc->sc_ui = usb_ifnum_to_if(uaa->device, uaa->info.bIfaceNum);
285 if (sc->sc_ui == NULL) {
286 return (EINVAL);
287 }
288 if (udrv->probe) {
289 if ((udrv->probe) (sc->sc_ui, id)) {
290 return (ENXIO);
291 }
292 }
293 mtx_lock(&Giant);
294 LIST_INSERT_HEAD(&usb_linux_attached_list, sc, sc_attached_list);
295 mtx_unlock(&Giant);
296
297 /* success */
298 return (0);
299}
300
301/*------------------------------------------------------------------------*
302 * usb_linux_detach
303 *
304 * This function is the FreeBSD detach callback. It is called from the
305 * FreeBSD USB stack through the "device_detach()" function.
306 *------------------------------------------------------------------------*/
307static int
308usb_linux_detach(device_t dev)
309{
310 struct usb_linux_softc *sc = device_get_softc(dev);
311 struct usb_driver *udrv = NULL;
312
313 mtx_lock(&Giant);
314 if (sc->sc_attached_list.le_prev) {
315 LIST_REMOVE(sc, sc_attached_list);
316 sc->sc_attached_list.le_prev = NULL;
317 udrv = sc->sc_udrv;
318 sc->sc_udrv = NULL;
319 }
320 mtx_unlock(&Giant);
321
322 if (udrv && udrv->disconnect) {
323 (udrv->disconnect) (sc->sc_ui);
324 }
325 /*
326 * Make sure that we free all FreeBSD USB transfers belonging to
327 * this Linux "usb_interface", hence they will most likely not be
328 * needed any more.
329 */
330 usb_linux_cleanup_interface(sc->sc_fbsd_udev, sc->sc_ui);
331 return (0);
332}
333
334/*------------------------------------------------------------------------*
335 * usb_linux_suspend
336 *
337 * This function is the FreeBSD suspend callback. Usually it does nothing.
338 *------------------------------------------------------------------------*/
339static int
340usb_linux_suspend(device_t dev)
341{
342 struct usb_linux_softc *sc = device_get_softc(dev);
343 struct usb_driver *udrv = usb_linux_get_usb_driver(sc);
344 int err;
345
346 if (udrv && udrv->suspend) {
347 err = (udrv->suspend) (sc->sc_ui, 0);
348 }
349 return (0);
350}
351
352/*------------------------------------------------------------------------*
353 * usb_linux_resume
354 *
355 * This function is the FreeBSD resume callback. Usually it does nothing.
356 *------------------------------------------------------------------------*/
357static int
358usb_linux_resume(device_t dev)
359{
360 struct usb_linux_softc *sc = device_get_softc(dev);
361 struct usb_driver *udrv = usb_linux_get_usb_driver(sc);
362 int err;
363
364 if (udrv && udrv->resume) {
365 err = (udrv->resume) (sc->sc_ui);
366 }
367 return (0);
368}
369
370/*------------------------------------------------------------------------*
371 * Linux emulation layer
372 *------------------------------------------------------------------------*/
373
374/*------------------------------------------------------------------------*
375 * usb_max_isoc_frames
376 *
377 * The following function returns the maximum number of isochronous
378 * frames that we support per URB. It is not part of the Linux USB API.
379 *------------------------------------------------------------------------*/
380static uint16_t
381usb_max_isoc_frames(struct usb_device *dev)
382{
383 ; /* indent fix */
384 switch (usbd_get_speed(dev)) {
385 case USB_SPEED_LOW:
386 case USB_SPEED_FULL:
387 return (USB_MAX_FULL_SPEED_ISOC_FRAMES);
388 default:
389 return (USB_MAX_HIGH_SPEED_ISOC_FRAMES);
390 }
391}
392
393/*------------------------------------------------------------------------*
394 * usb_submit_urb
395 *
396 * This function is used to queue an URB after that it has been
397 * initialized. If it returns non-zero, it means that the URB was not
398 * queued.
399 *------------------------------------------------------------------------*/
400int
401usb_submit_urb(struct urb *urb, uint16_t mem_flags)
402{
403 struct usb_host_endpoint *uhe;
404 uint8_t do_unlock;
405 int err;
406
407 if (urb == NULL)
408 return (-EINVAL);
409
410 do_unlock = mtx_owned(&Giant) ? 0 : 1;
411 if (do_unlock)
412 mtx_lock(&Giant);
413
414 if (urb->endpoint == NULL) {
415 err = -EINVAL;
416 goto done;
417 }
418
419 /*
420 * Check to see if the urb is in the process of being killed
421 * and stop a urb that is in the process of being killed from
422 * being re-submitted (e.g. from its completion callback
423 * function).
424 */
425 if (urb->kill_count != 0) {
426 err = -EPERM;
427 goto done;
428 }
429
430 uhe = urb->endpoint;
431
432 /*
433 * Check that we have got a FreeBSD USB transfer that will dequeue
434 * the URB structure and do the real transfer. If there are no USB
435 * transfers, then we return an error.
436 */
437 if (uhe->bsd_xfer[0] ||
438 uhe->bsd_xfer[1]) {
439 /* we are ready! */
440
441 TAILQ_INSERT_TAIL(&uhe->bsd_urb_list, urb, bsd_urb_list);
442
443 urb->status = -EINPROGRESS;
444
445 usbd_transfer_start(uhe->bsd_xfer[0]);
446 usbd_transfer_start(uhe->bsd_xfer[1]);
447 err = 0;
448 } else {
449 /* no pipes have been setup yet! */
450 urb->status = -EINVAL;
451 err = -EINVAL;
452 }
453done:
454 if (do_unlock)
455 mtx_unlock(&Giant);
456 return (err);
457}
458
459/*------------------------------------------------------------------------*
460 * usb_unlink_urb
461 *
462 * This function is used to stop an URB after that it is been
463 * submitted, but before the "complete" callback has been called. On
464 *------------------------------------------------------------------------*/
465int
466usb_unlink_urb(struct urb *urb)
467{
468 return (usb_unlink_urb_sub(urb, 0));
469}
470
471static void
472usb_unlink_bsd(struct usb_xfer *xfer,
473 struct urb *urb, uint8_t drain)
474{
475 if (xfer == NULL)
476 return;
477 if (!usbd_transfer_pending(xfer))
478 return;
479 if (xfer->priv_fifo == (void *)urb) {
480 if (drain) {
481 mtx_unlock(&Giant);
482 usbd_transfer_drain(xfer);
483 mtx_lock(&Giant);
484 } else {
485 usbd_transfer_stop(xfer);
486 }
487 usbd_transfer_start(xfer);
488 }
489}
490
491static int
492usb_unlink_urb_sub(struct urb *urb, uint8_t drain)
493{
494 struct usb_host_endpoint *uhe;
495 uint16_t x;
496 uint8_t do_unlock;
497 int err;
498
499 if (urb == NULL)
500 return (-EINVAL);
501
502 do_unlock = mtx_owned(&Giant) ? 0 : 1;
503 if (do_unlock)
504 mtx_lock(&Giant);
505 if (drain)
506 urb->kill_count++;
507
508 if (urb->endpoint == NULL) {
509 err = -EINVAL;
510 goto done;
511 }
512 uhe = urb->endpoint;
513
514 if (urb->bsd_urb_list.tqe_prev) {
515
516 /* not started yet, just remove it from the queue */
517 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
518 urb->bsd_urb_list.tqe_prev = NULL;
519 urb->status = -ECONNRESET;
520 urb->actual_length = 0;
521
522 for (x = 0; x < urb->number_of_packets; x++) {
523 urb->iso_frame_desc[x].actual_length = 0;
524 }
525
526 if (urb->complete) {
527 (urb->complete) (urb);
528 }
529 } else {
530
531 /*
532 * If the URB is not on the URB list, then check if one of
533 * the FreeBSD USB transfer are processing the current URB.
534 * If so, re-start that transfer, which will lead to the
535 * termination of that URB:
536 */
537 usb_unlink_bsd(uhe->bsd_xfer[0], urb, drain);
538 usb_unlink_bsd(uhe->bsd_xfer[1], urb, drain);
539 }
540 err = 0;
541done:
542 if (drain)
543 urb->kill_count--;
544 if (do_unlock)
545 mtx_unlock(&Giant);
546 return (err);
547}
548
549/*------------------------------------------------------------------------*
550 * usb_clear_halt
551 *
552 * This function must always be used to clear the stall. Stall is when
553 * an USB endpoint returns a stall message to the USB host controller.
554 * Until the stall is cleared, no data can be transferred.
555 *------------------------------------------------------------------------*/
556int
557usb_clear_halt(struct usb_device *dev, struct usb_host_endpoint *uhe)
558{
559 struct usb_config cfg[1];
560 struct usb_endpoint *ep;
561 uint8_t type;
562 uint8_t addr;
563
564 if (uhe == NULL)
565 return (-EINVAL);
566
567 type = uhe->desc.bmAttributes & UE_XFERTYPE;
568 addr = uhe->desc.bEndpointAddress;
569
570 memset(cfg, 0, sizeof(cfg));
571
572 cfg[0].type = type;
573 cfg[0].endpoint = addr & UE_ADDR;
574 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
575
576 ep = usbd_get_endpoint(dev, uhe->bsd_iface_index, cfg);
577 if (ep == NULL)
578 return (-EINVAL);
579
580 usbd_clear_data_toggle(dev, ep);
581
582 return (usb_control_msg(dev, &dev->ep0,
583 UR_CLEAR_FEATURE, UT_WRITE_ENDPOINT,
584 UF_ENDPOINT_HALT, addr, NULL, 0, 1000));
585}
586
587/*------------------------------------------------------------------------*
588 * usb_start_wait_urb
589 *
590 * This is an internal function that is used to perform synchronous
591 * Linux USB transfers.
592 *------------------------------------------------------------------------*/
593static int
594usb_start_wait_urb(struct urb *urb, usb_timeout_t timeout, uint16_t *p_actlen)
595{
596 int err;
597 uint8_t do_unlock;
598
599 /* you must have a timeout! */
600 if (timeout == 0) {
601 timeout = 1;
602 }
603 urb->complete = &usb_linux_wait_complete;
604 urb->timeout = timeout;
605 urb->transfer_flags |= URB_WAIT_WAKEUP;
606 urb->transfer_flags &= ~URB_IS_SLEEPING;
607
608 do_unlock = mtx_owned(&Giant) ? 0 : 1;
609 if (do_unlock)
610 mtx_lock(&Giant);
611 err = usb_submit_urb(urb, 0);
612 if (err)
613 goto done;
614
615 /*
616 * the URB might have completed before we get here, so check that by
617 * using some flags!
618 */
619 while (urb->transfer_flags & URB_WAIT_WAKEUP) {
620 urb->transfer_flags |= URB_IS_SLEEPING;
621 cv_wait(&urb->cv_wait, &Giant);
622 urb->transfer_flags &= ~URB_IS_SLEEPING;
623 }
624
625 err = urb->status;
626
627done:
628 if (do_unlock)
629 mtx_unlock(&Giant);
630 if (p_actlen != NULL) {
631 if (err)
632 *p_actlen = 0;
633 else
634 *p_actlen = urb->actual_length;
635 }
636 return (err);
637}
638
639/*------------------------------------------------------------------------*
640 * usb_control_msg
641 *
642 * The following function performs a control transfer sequence one any
643 * control, bulk or interrupt endpoint, specified by "uhe". A control
644 * transfer means that you transfer an 8-byte header first followed by
645 * a data-phase as indicated by the 8-byte header. The "timeout" is
646 * given in milliseconds.
647 *
648 * Return values:
649 * 0: Success
650 * < 0: Failure
651 * > 0: Acutal length
652 *------------------------------------------------------------------------*/
653int
654usb_control_msg(struct usb_device *dev, struct usb_host_endpoint *uhe,
655 uint8_t request, uint8_t requesttype,
656 uint16_t value, uint16_t index, void *data,
657 uint16_t size, usb_timeout_t timeout)
658{
659 struct usb_device_request req;
660 struct urb *urb;
661 int err;
662 uint16_t actlen;
663 uint8_t type;
664 uint8_t addr;
665
666 req.bmRequestType = requesttype;
667 req.bRequest = request;
668 USETW(req.wValue, value);
669 USETW(req.wIndex, index);
670 USETW(req.wLength, size);
671
672 if (uhe == NULL) {
673 return (-EINVAL);
674 }
675 type = (uhe->desc.bmAttributes & UE_XFERTYPE);
676 addr = (uhe->desc.bEndpointAddress & UE_ADDR);
677
678 if (type != UE_CONTROL) {
679 return (-EINVAL);
680 }
681 if (addr == 0) {
682 /*
683 * The FreeBSD USB stack supports standard control
684 * transfers on control endpoint zero:
685 */
686 err = usbd_do_request_flags(dev,
687 NULL, &req, data, USB_SHORT_XFER_OK,
688 &actlen, timeout);
689 if (err) {
690 err = -EPIPE;
691 } else {
692 err = actlen;
693 }
694 return (err);
695 }
696 if (dev->flags.usb_mode != USB_MODE_HOST) {
697 /* not supported */
698 return (-EINVAL);
699 }
700 err = usb_setup_endpoint(dev, uhe, 1 /* dummy */ );
701
702 /*
703 * NOTE: we need to allocate real memory here so that we don't
704 * transfer data to/from the stack!
705 *
706 * 0xFFFF is a FreeBSD specific magic value.
707 */
708 urb = usb_alloc_urb(0xFFFF, size);
709 if (urb == NULL)
710 return (-ENOMEM);
711
712 urb->dev = dev;
713 urb->endpoint = uhe;
714
715 memcpy(urb->setup_packet, &req, sizeof(req));
716
717 if (size && (!(req.bmRequestType & UT_READ))) {
718 /* move the data to a real buffer */
719 memcpy(USB_ADD_BYTES(urb->setup_packet, sizeof(req)),
720 data, size);
721 }
722 err = usb_start_wait_urb(urb, timeout, &actlen);
723
724 if (req.bmRequestType & UT_READ) {
725 if (actlen) {
726 bcopy(USB_ADD_BYTES(urb->setup_packet,
727 sizeof(req)), data, actlen);
728 }
729 }
730 usb_free_urb(urb);
731
732 if (err == 0) {
733 err = actlen;
734 }
735 return (err);
736}
737
738/*------------------------------------------------------------------------*
739 * usb_set_interface
740 *
741 * The following function will select which alternate setting of an
742 * USB interface you plan to use. By default alternate setting with
743 * index zero is selected. Note that "iface_no" is not the interface
744 * index, but rather the value of "bInterfaceNumber".
745 *------------------------------------------------------------------------*/
746int
747usb_set_interface(struct usb_device *dev, uint8_t iface_no, uint8_t alt_index)
748{
749 struct usb_interface *p_ui = usb_ifnum_to_if(dev, iface_no);
750 int err;
751
752 if (p_ui == NULL)
753 return (-EINVAL);
754 if (alt_index >= p_ui->num_altsetting)
755 return (-EINVAL);
756 usb_linux_cleanup_interface(dev, p_ui);
757 err = -usbd_set_alt_interface_index(dev,
758 p_ui->bsd_iface_index, alt_index);
759 if (err == 0) {
760 p_ui->cur_altsetting = p_ui->altsetting + alt_index;
761 }
762 return (err);
763}
764
765/*------------------------------------------------------------------------*
766 * usb_setup_endpoint
767 *
768 * The following function is an extension to the Linux USB API that
769 * allows you to set a maximum buffer size for a given USB endpoint.
770 * The maximum buffer size is per URB. If you don't call this function
771 * to set a maximum buffer size, the endpoint will not be functional.
772 * Note that for isochronous endpoints the maximum buffer size must be
773 * a non-zero dummy, hence this function will base the maximum buffer
774 * size on "wMaxPacketSize".
775 *------------------------------------------------------------------------*/
776int
777usb_setup_endpoint(struct usb_device *dev,
778 struct usb_host_endpoint *uhe, usb_size_t bufsize)
779{
780 struct usb_config cfg[2];
781 uint8_t type = uhe->desc.bmAttributes & UE_XFERTYPE;
782 uint8_t addr = uhe->desc.bEndpointAddress;
783
784 if (uhe->fbsd_buf_size == bufsize) {
785 /* optimize */
786 return (0);
787 }
788 usbd_transfer_unsetup(uhe->bsd_xfer, 2);
789
790 uhe->fbsd_buf_size = bufsize;
791
792 if (bufsize == 0) {
793 return (0);
794 }
795 memset(cfg, 0, sizeof(cfg));
796
797 if (type == UE_ISOCHRONOUS) {
798
799 /*
800 * Isochronous transfers are special in that they don't fit
801 * into the BULK/INTR/CONTROL transfer model.
802 */
803
804 cfg[0].type = type;
805 cfg[0].endpoint = addr & UE_ADDR;
806 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
807 cfg[0].callback = &usb_linux_isoc_callback;
808 cfg[0].bufsize = 0; /* use wMaxPacketSize */
809 cfg[0].frames = usb_max_isoc_frames(dev);
810 cfg[0].flags.proxy_buffer = 1;
811#if 0
812 /*
813 * The Linux USB API allows non back-to-back
814 * isochronous frames which we do not support. If the
815 * isochronous frames are not back-to-back we need to
816 * do a copy, and then we need a buffer for
817 * that. Enable this at your own risk.
818 */
819 cfg[0].flags.ext_buffer = 1;
820#endif
821 cfg[0].flags.short_xfer_ok = 1;
822
823 bcopy(cfg, cfg + 1, sizeof(*cfg));
824
825 /* Allocate and setup two generic FreeBSD USB transfers */
826
827 if (usbd_transfer_setup(dev, &uhe->bsd_iface_index,
828 uhe->bsd_xfer, cfg, 2, uhe, &Giant)) {
829 return (-EINVAL);
830 }
831 } else {
832 if (bufsize > (1 << 22)) {
833 /* limit buffer size */
834 bufsize = (1 << 22);
835 }
836 /* Allocate and setup one generic FreeBSD USB transfer */
837
838 cfg[0].type = type;
839 cfg[0].endpoint = addr & UE_ADDR;
840 cfg[0].direction = addr & (UE_DIR_OUT | UE_DIR_IN);
841 cfg[0].callback = &usb_linux_non_isoc_callback;
842 cfg[0].bufsize = bufsize;
843 cfg[0].flags.ext_buffer = 1; /* enable zero-copy */
844 cfg[0].flags.proxy_buffer = 1;
845 cfg[0].flags.short_xfer_ok = 1;
846
847 if (usbd_transfer_setup(dev, &uhe->bsd_iface_index,
848 uhe->bsd_xfer, cfg, 1, uhe, &Giant)) {
849 return (-EINVAL);
850 }
851 }
852 return (0);
853}
854
855/*------------------------------------------------------------------------*
856 * usb_linux_create_usb_device
857 *
858 * The following function is used to build up a per USB device
859 * structure tree, that mimics the Linux one. The root structure
860 * is returned by this function.
861 *------------------------------------------------------------------------*/
862static int
863usb_linux_create_usb_device(struct usb_device *udev, device_t dev)
864{
865 struct usb_config_descriptor *cd = usbd_get_config_descriptor(udev);
866 struct usb_descriptor *desc;
867 struct usb_interface_descriptor *id;
868 struct usb_endpoint_descriptor *ed;
869 struct usb_interface *p_ui = NULL;
870 struct usb_host_interface *p_uhi = NULL;
871 struct usb_host_endpoint *p_uhe = NULL;
872 usb_size_t size;
873 uint16_t niface_total;
874 uint16_t nedesc;
875 uint16_t iface_no_curr;
876 uint16_t iface_index;
877 uint8_t pass;
878 uint8_t iface_no;
879
880 /*
881 * We do two passes. One pass for computing necessary memory size
882 * and one pass to initialize all the allocated memory structures.
883 */
884 for (pass = 0; pass < 2; pass++) {
885
886 iface_no_curr = 0xFFFF;
887 niface_total = 0;
888 iface_index = 0;
889 nedesc = 0;
890 desc = NULL;
891
892 /*
893 * Iterate over all the USB descriptors. Use the USB config
894 * descriptor pointer provided by the FreeBSD USB stack.
895 */
896 while ((desc = usb_desc_foreach(cd, desc))) {
897
898 /*
899 * Build up a tree according to the descriptors we
900 * find:
901 */
902 switch (desc->bDescriptorType) {
903 case UDESC_DEVICE:
904 break;
905
906 case UDESC_ENDPOINT:
907 ed = (void *)desc;
908 if ((ed->bLength < sizeof(*ed)) ||
909 (iface_index == 0))
910 break;
911 if (p_uhe) {
912 bcopy(ed, &p_uhe->desc, sizeof(p_uhe->desc));
913 p_uhe->bsd_iface_index = iface_index - 1;
914 TAILQ_INIT(&p_uhe->bsd_urb_list);
915 p_uhe++;
916 }
917 if (p_uhi) {
918 (p_uhi - 1)->desc.bNumEndpoints++;
919 }
920 nedesc++;
921 break;
922
923 case UDESC_INTERFACE:
924 id = (void *)desc;
925 if (id->bLength < sizeof(*id))
926 break;
927 if (p_uhi) {
928 bcopy(id, &p_uhi->desc, sizeof(p_uhi->desc));
929 p_uhi->desc.bNumEndpoints = 0;
930 p_uhi->endpoint = p_uhe;
931 p_uhi->string = "";
932 p_uhi->bsd_iface_index = iface_index;
933 p_uhi++;
934 }
935 iface_no = id->bInterfaceNumber;
936 niface_total++;
937 if (iface_no_curr != iface_no) {
938 if (p_ui) {
939 p_ui->altsetting = p_uhi - 1;
940 p_ui->cur_altsetting = p_uhi - 1;
941 p_ui->num_altsetting = 1;
942 p_ui->bsd_iface_index = iface_index;
943 p_ui->linux_udev = udev;
944 p_ui++;
945 }
946 iface_no_curr = iface_no;
947 iface_index++;
948 } else {
949 if (p_ui) {
950 (p_ui - 1)->num_altsetting++;
951 }
952 }
953 break;
954
955 default:
956 break;
957 }
958 }
959
960 if (pass == 0) {
961
962 size = (sizeof(*p_uhe) * nedesc) +
963 (sizeof(*p_ui) * iface_index) +
964 (sizeof(*p_uhi) * niface_total);
965
966 p_uhe = malloc(size, M_USBDEV, M_WAITOK | M_ZERO);
967 p_ui = (void *)(p_uhe + nedesc);
968 p_uhi = (void *)(p_ui + iface_index);
969
970 udev->linux_iface_start = p_ui;
971 udev->linux_iface_end = p_ui + iface_index;
972 udev->linux_endpoint_start = p_uhe;
973 udev->linux_endpoint_end = p_uhe + nedesc;
974 udev->devnum = device_get_unit(dev);
975 bcopy(&udev->ddesc, &udev->descriptor,
976 sizeof(udev->descriptor));
977 bcopy(udev->ctrl_ep.edesc, &udev->ep0.desc,
978 sizeof(udev->ep0.desc));
979 }
980 }
981 return (0);
982}
983
984/*------------------------------------------------------------------------*
985 * usb_alloc_urb
986 *
987 * This function should always be used when you allocate an URB for
988 * use with the USB Linux stack. In case of an isochronous transfer
989 * you must specifiy the maximum number of "iso_packets" which you
990 * plan to transfer per URB. This function is always blocking, and
991 * "mem_flags" are not regarded like on Linux.
992 *------------------------------------------------------------------------*/
993struct urb *
994usb_alloc_urb(uint16_t iso_packets, uint16_t mem_flags)
995{
996 struct urb *urb;
997 usb_size_t size;
998
999 if (iso_packets == 0xFFFF) {
1000 /*
1001 * FreeBSD specific magic value to ask for control transfer
1002 * memory allocation:
1003 */
1004 size = sizeof(*urb) + sizeof(struct usb_device_request) + mem_flags;
1005 } else {
1006 size = sizeof(*urb) + (iso_packets * sizeof(urb->iso_frame_desc[0]));
1007 }
1008
1009 urb = malloc(size, M_USBDEV, M_WAITOK | M_ZERO);
1010 if (urb) {
1011
1012 cv_init(&urb->cv_wait, "URBWAIT");
1013 if (iso_packets == 0xFFFF) {
1014 urb->setup_packet = (void *)(urb + 1);
1015 urb->transfer_buffer = (void *)(urb->setup_packet +
1016 sizeof(struct usb_device_request));
1017 } else {
1018 urb->number_of_packets = iso_packets;
1019 }
1020 }
1021 return (urb);
1022}
1023
1024/*------------------------------------------------------------------------*
1025 * usb_find_host_endpoint
1026 *
1027 * The following function will return the Linux USB host endpoint
1028 * structure that matches the given endpoint type and endpoint
1029 * value. If no match is found, NULL is returned. This function is not
1030 * part of the Linux USB API and is only used internally.
1031 *------------------------------------------------------------------------*/
1032struct usb_host_endpoint *
1033usb_find_host_endpoint(struct usb_device *dev, uint8_t type, uint8_t ep)
1034{
1035 struct usb_host_endpoint *uhe;
1036 struct usb_host_endpoint *uhe_end;
1037 struct usb_host_interface *uhi;
1038 struct usb_interface *ui;
1039 uint8_t ea;
1040 uint8_t at;
1041 uint8_t mask;
1042
1043 if (dev == NULL) {
1044 return (NULL);
1045 }
1046 if (type == UE_CONTROL) {
1047 mask = UE_ADDR;
1048 } else {
1049 mask = (UE_DIR_IN | UE_DIR_OUT | UE_ADDR);
1050 }
1051
1052 ep &= mask;
1053
1054 /*
1055 * Iterate over all the interfaces searching the selected alternate
1056 * setting only, and all belonging endpoints.
1057 */
1058 for (ui = dev->linux_iface_start;
1059 ui != dev->linux_iface_end;
1060 ui++) {
1061 uhi = ui->cur_altsetting;
1062 if (uhi) {
1063 uhe_end = uhi->endpoint + uhi->desc.bNumEndpoints;
1064 for (uhe = uhi->endpoint;
1065 uhe != uhe_end;
1066 uhe++) {
1067 ea = uhe->desc.bEndpointAddress;
1068 at = uhe->desc.bmAttributes;
1069
1070 if (((ea & mask) == ep) &&
1071 ((at & UE_XFERTYPE) == type)) {
1072 return (uhe);
1073 }
1074 }
1075 }
1076 }
1077
1078 if ((type == UE_CONTROL) && ((ep & UE_ADDR) == 0)) {
1079 return (&dev->ep0);
1080 }
1081 return (NULL);
1082}
1083
1084/*------------------------------------------------------------------------*
1085 * usb_altnum_to_altsetting
1086 *
1087 * The following function returns a pointer to an alternate setting by
1088 * index given a "usb_interface" pointer. If the alternate setting by
1089 * index does not exist, NULL is returned. And alternate setting is a
1090 * variant of an interface, but usually with slightly different
1091 * characteristics.
1092 *------------------------------------------------------------------------*/
1093struct usb_host_interface *
1094usb_altnum_to_altsetting(const struct usb_interface *intf, uint8_t alt_index)
1095{
1096 if (alt_index >= intf->num_altsetting) {
1097 return (NULL);
1098 }
1099 return (intf->altsetting + alt_index);
1100}
1101
1102/*------------------------------------------------------------------------*
1103 * usb_ifnum_to_if
1104 *
1105 * The following function searches up an USB interface by
1106 * "bInterfaceNumber". If no match is found, NULL is returned.
1107 *------------------------------------------------------------------------*/
1108struct usb_interface *
1109usb_ifnum_to_if(struct usb_device *dev, uint8_t iface_no)
1110{
1111 struct usb_interface *p_ui;
1112
1113 for (p_ui = dev->linux_iface_start;
1114 p_ui != dev->linux_iface_end;
1115 p_ui++) {
1116 if ((p_ui->num_altsetting > 0) &&
1117 (p_ui->altsetting->desc.bInterfaceNumber == iface_no)) {
1118 return (p_ui);
1119 }
1120 }
1121 return (NULL);
1122}
1123
1124/*------------------------------------------------------------------------*
1125 * usb_buffer_alloc
1126 *------------------------------------------------------------------------*/
1127void *
1128usb_buffer_alloc(struct usb_device *dev, usb_size_t size, uint16_t mem_flags, uint8_t *dma_addr)
1129{
1130 return (malloc(size, M_USBDEV, M_WAITOK | M_ZERO));
1131}
1132
1133/*------------------------------------------------------------------------*
1134 * usbd_get_intfdata
1135 *------------------------------------------------------------------------*/
1136void *
1137usbd_get_intfdata(struct usb_interface *intf)
1138{
1139 return (intf->bsd_priv_sc);
1140}
1141
1142/*------------------------------------------------------------------------*
1143 * usb_linux_register
1144 *
1145 * The following function is used by the "USB_DRIVER_EXPORT()" macro,
1146 * and is used to register a Linux USB driver, so that its
1147 * "usb_device_id" structures gets searched a probe time. This
1148 * function is not part of the Linux USB API, and is for internal use
1149 * only.
1150 *------------------------------------------------------------------------*/
1151void
1152usb_linux_register(void *arg)
1153{
1154 struct usb_driver *drv = arg;
1155
1156 mtx_lock(&Giant);
1157 LIST_INSERT_HEAD(&usb_linux_driver_list, drv, linux_driver_list);
1158 mtx_unlock(&Giant);
1159
1160 usb_needs_explore_all();
1161}
1162
1163/*------------------------------------------------------------------------*
1164 * usb_linux_deregister
1165 *
1166 * The following function is used by the "USB_DRIVER_EXPORT()" macro,
1167 * and is used to deregister a Linux USB driver. This function will
1168 * ensure that all driver instances belonging to the Linux USB device
1169 * driver in question, gets detached before the driver is
1170 * unloaded. This function is not part of the Linux USB API, and is
1171 * for internal use only.
1172 *------------------------------------------------------------------------*/
1173void
1174usb_linux_deregister(void *arg)
1175{
1176 struct usb_driver *drv = arg;
1177 struct usb_linux_softc *sc;
1178
1179repeat:
1180 mtx_lock(&Giant);
1181 LIST_FOREACH(sc, &usb_linux_attached_list, sc_attached_list) {
1182 if (sc->sc_udrv == drv) {
1183 mtx_unlock(&Giant);
1184 device_detach(sc->sc_fbsd_dev);
1185 goto repeat;
1186 }
1187 }
1188 LIST_REMOVE(drv, linux_driver_list);
1189 mtx_unlock(&Giant);
1190}
1191
1192/*------------------------------------------------------------------------*
1193 * usb_linux_free_device
1194 *
1195 * The following function is only used by the FreeBSD USB stack, to
1196 * cleanup and free memory after that a Linux USB device was attached.
1197 *------------------------------------------------------------------------*/
1198void
1199usb_linux_free_device(struct usb_device *dev)
1200{
1201 struct usb_host_endpoint *uhe;
1202 struct usb_host_endpoint *uhe_end;
1203 int err;
1204
1205 uhe = dev->linux_endpoint_start;
1206 uhe_end = dev->linux_endpoint_end;
1207 while (uhe != uhe_end) {
1208 err = usb_setup_endpoint(dev, uhe, 0);
1209 uhe++;
1210 }
1211 err = usb_setup_endpoint(dev, &dev->ep0, 0);
1212 free(dev->linux_endpoint_start, M_USBDEV);
1213}
1214
1215/*------------------------------------------------------------------------*
1216 * usb_buffer_free
1217 *------------------------------------------------------------------------*/
1218void
1219usb_buffer_free(struct usb_device *dev, usb_size_t size,
1220 void *addr, uint8_t dma_addr)
1221{
1222 free(addr, M_USBDEV);
1223}
1224
1225/*------------------------------------------------------------------------*
1226 * usb_free_urb
1227 *------------------------------------------------------------------------*/
1228void
1229usb_free_urb(struct urb *urb)
1230{
1231 if (urb == NULL) {
1232 return;
1233 }
1234 /* make sure that the current URB is not active */
1235 usb_kill_urb(urb);
1236
1237 /* destroy condition variable */
1238 cv_destroy(&urb->cv_wait);
1239
1240 /* just free it */
1241 free(urb, M_USBDEV);
1242}
1243
1244/*------------------------------------------------------------------------*
1245 * usb_init_urb
1246 *
1247 * The following function can be used to initialize a custom URB. It
1248 * is not recommended to use this function. Use "usb_alloc_urb()"
1249 * instead.
1250 *------------------------------------------------------------------------*/
1251void
1252usb_init_urb(struct urb *urb)
1253{
1254 if (urb == NULL) {
1255 return;
1256 }
1257 memset(urb, 0, sizeof(*urb));
1258}
1259
1260/*------------------------------------------------------------------------*
1261 * usb_kill_urb
1262 *------------------------------------------------------------------------*/
1263void
1264usb_kill_urb(struct urb *urb)
1265{
1266 usb_unlink_urb_sub(urb, 1);
1267}
1268
1269/*------------------------------------------------------------------------*
1270 * usb_set_intfdata
1271 *
1272 * The following function sets the per Linux USB interface private
1273 * data pointer. It is used by most Linux USB device drivers.
1274 *------------------------------------------------------------------------*/
1275void
1276usb_set_intfdata(struct usb_interface *intf, void *data)
1277{
1278 intf->bsd_priv_sc = data;
1279}
1280
1281/*------------------------------------------------------------------------*
1282 * usb_linux_cleanup_interface
1283 *
1284 * The following function will release all FreeBSD USB transfers
1285 * associated with a Linux USB interface. It is for internal use only.
1286 *------------------------------------------------------------------------*/
1287static void
1288usb_linux_cleanup_interface(struct usb_device *dev, struct usb_interface *iface)
1289{
1290 struct usb_host_interface *uhi;
1291 struct usb_host_interface *uhi_end;
1292 struct usb_host_endpoint *uhe;
1293 struct usb_host_endpoint *uhe_end;
1294 int err;
1295
1296 uhi = iface->altsetting;
1297 uhi_end = iface->altsetting + iface->num_altsetting;
1298 while (uhi != uhi_end) {
1299 uhe = uhi->endpoint;
1300 uhe_end = uhi->endpoint + uhi->desc.bNumEndpoints;
1301 while (uhe != uhe_end) {
1302 err = usb_setup_endpoint(dev, uhe, 0);
1303 uhe++;
1304 }
1305 uhi++;
1306 }
1307}
1308
1309/*------------------------------------------------------------------------*
1310 * usb_linux_wait_complete
1311 *
1312 * The following function is used by "usb_start_wait_urb()" to wake it
1313 * up, when an USB transfer has finished.
1314 *------------------------------------------------------------------------*/
1315static void
1316usb_linux_wait_complete(struct urb *urb)
1317{
1318 if (urb->transfer_flags & URB_IS_SLEEPING) {
1319 cv_signal(&urb->cv_wait);
1320 }
1321 urb->transfer_flags &= ~URB_WAIT_WAKEUP;
1322}
1323
1324/*------------------------------------------------------------------------*
1325 * usb_linux_complete
1326 *------------------------------------------------------------------------*/
1327static void
1328usb_linux_complete(struct usb_xfer *xfer)
1329{
1330 struct urb *urb;
1331
1332 urb = usbd_xfer_get_priv(xfer);
1333 usbd_xfer_set_priv(xfer, NULL);
1334 if (urb->complete) {
1335 (urb->complete) (urb);
1336 }
1337}
1338
1339/*------------------------------------------------------------------------*
1340 * usb_linux_isoc_callback
1341 *
1342 * The following is the FreeBSD isochronous USB callback. Isochronous
1343 * frames are USB packets transferred 1000 or 8000 times per second,
1344 * depending on whether a full- or high- speed USB transfer is
1345 * used.
1346 *------------------------------------------------------------------------*/
1347static void
1348usb_linux_isoc_callback(struct usb_xfer *xfer, usb_error_t error)
1349{
1350 usb_frlength_t max_frame = xfer->max_frame_size;
1351 usb_frlength_t offset;
1352 usb_frcount_t x;
1353 struct urb *urb = usbd_xfer_get_priv(xfer);
1354 struct usb_host_endpoint *uhe = usbd_xfer_softc(xfer);
1355 struct usb_iso_packet_descriptor *uipd;
1356
1357 DPRINTF("\n");
1358
1359 switch (USB_GET_STATE(xfer)) {
1360 case USB_ST_TRANSFERRED:
1361
1362 if (urb->bsd_isread) {
1363
1364 /* copy in data with regard to the URB */
1365
1366 offset = 0;
1367
1368 for (x = 0; x < urb->number_of_packets; x++) {
1369 uipd = urb->iso_frame_desc + x;
1370 if (uipd->length > xfer->frlengths[x]) {
1371 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1372 /* XXX should be EREMOTEIO */
1373 uipd->status = -EPIPE;
1374 } else {
1375 uipd->status = 0;
1376 }
1377 } else {
1378 uipd->status = 0;
1379 }
1380 uipd->actual_length = xfer->frlengths[x];
1381 if (!xfer->flags.ext_buffer) {
1382 usbd_copy_out(xfer->frbuffers, offset,
1383 USB_ADD_BYTES(urb->transfer_buffer,
1384 uipd->offset), uipd->actual_length);
1385 }
1386 offset += max_frame;
1387 }
1388 } else {
1389 for (x = 0; x < urb->number_of_packets; x++) {
1390 uipd = urb->iso_frame_desc + x;
1391 uipd->actual_length = xfer->frlengths[x];
1392 uipd->status = 0;
1393 }
1394 }
1395
1396 urb->actual_length = xfer->actlen;
1397
1398 /* check for short transfer */
1399 if (xfer->actlen < xfer->sumlen) {
1400 /* short transfer */
1401 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1402 /* XXX should be EREMOTEIO */
1403 urb->status = -EPIPE;
1404 } else {
1405 urb->status = 0;
1406 }
1407 } else {
1408 /* success */
1409 urb->status = 0;
1410 }
1411
1412 /* call callback */
1413 usb_linux_complete(xfer);
1414
1415 case USB_ST_SETUP:
1416tr_setup:
1417
1418 if (xfer->priv_fifo == NULL) {
1419
1420 /* get next transfer */
1421 urb = TAILQ_FIRST(&uhe->bsd_urb_list);
1422 if (urb == NULL) {
1423 /* nothing to do */
1424 return;
1425 }
1426 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
1427 urb->bsd_urb_list.tqe_prev = NULL;
1428
1429 x = xfer->max_frame_count;
1430 if (urb->number_of_packets > x) {
1431 /* XXX simply truncate the transfer */
1432 urb->number_of_packets = x;
1433 }
1434 } else {
1435 DPRINTF("Already got a transfer\n");
1436
1437 /* already got a transfer (should not happen) */
1438 urb = usbd_xfer_get_priv(xfer);
1439 }
1440
1441 urb->bsd_isread = (uhe->desc.bEndpointAddress & UE_DIR_IN) ? 1 : 0;
1442
1443 if (xfer->flags.ext_buffer) {
1444 /* set virtual address to load */
1445 usbd_xfer_set_frame_data(xfer, 0, urb->transfer_buffer, 0);
1446 }
1447 if (!(urb->bsd_isread)) {
1448
1449 /* copy out data with regard to the URB */
1450
1451 offset = 0;
1452
1453 for (x = 0; x < urb->number_of_packets; x++) {
1454 uipd = urb->iso_frame_desc + x;
1455 usbd_xfer_set_frame_len(xfer, x, uipd->length);
1456 if (!xfer->flags.ext_buffer) {
1457 usbd_copy_in(xfer->frbuffers, offset,
1458 USB_ADD_BYTES(urb->transfer_buffer,
1459 uipd->offset), uipd->length);
1460 }
1461 offset += uipd->length;
1462 }
1463 } else {
1464
1465 /*
1466 * compute the transfer length into the "offset"
1467 * variable
1468 */
1469
1470 offset = urb->number_of_packets * max_frame;
1471
1472 /* setup "frlengths" array */
1473
1474 for (x = 0; x < urb->number_of_packets; x++) {
1475 uipd = urb->iso_frame_desc + x;
1476 usbd_xfer_set_frame_len(xfer, x, max_frame);
1477 }
1478 }
1479 usbd_xfer_set_priv(xfer, urb);
1480 xfer->flags.force_short_xfer = 0;
1481 xfer->timeout = urb->timeout;
1482 xfer->nframes = urb->number_of_packets;
1483 usbd_transfer_submit(xfer);
1484 return;
1485
1486 default: /* Error */
1487 if (xfer->error == USB_ERR_CANCELLED) {
1488 urb->status = -ECONNRESET;
1489 } else {
1490 urb->status = -EPIPE; /* stalled */
1491 }
1492
1493 /* Set zero for "actual_length" */
1494 urb->actual_length = 0;
1495
1496 /* Set zero for "actual_length" */
1497 for (x = 0; x < urb->number_of_packets; x++) {
1498 urb->iso_frame_desc[x].actual_length = 0;
1499 urb->iso_frame_desc[x].status = urb->status;
1500 }
1501
1502 /* call callback */
1503 usb_linux_complete(xfer);
1504
1505 if (xfer->error == USB_ERR_CANCELLED) {
1506 /* we need to return in this case */
1507 return;
1508 }
1509 goto tr_setup;
1510
1511 }
1512}
1513
1514/*------------------------------------------------------------------------*
1515 * usb_linux_non_isoc_callback
1516 *
1517 * The following is the FreeBSD BULK/INTERRUPT and CONTROL USB
1518 * callback. It dequeues Linux USB stack compatible URB's, transforms
1519 * the URB fields into a FreeBSD USB transfer, and defragments the USB
1520 * transfer as required. When the transfer is complete the "complete"
1521 * callback is called.
1522 *------------------------------------------------------------------------*/
1523static void
1524usb_linux_non_isoc_callback(struct usb_xfer *xfer, usb_error_t error)
1525{
1526 enum {
1527 REQ_SIZE = sizeof(struct usb_device_request)
1528 };
1529 struct urb *urb = usbd_xfer_get_priv(xfer);
1530 struct usb_host_endpoint *uhe = usbd_xfer_softc(xfer);
1531 uint8_t *ptr;
1532 usb_frlength_t max_bulk = usbd_xfer_max_len(xfer);
1533 uint8_t data_frame = xfer->flags_int.control_xfr ? 1 : 0;
1534
1535 DPRINTF("\n");
1536
1537 switch (USB_GET_STATE(xfer)) {
1538 case USB_ST_TRANSFERRED:
1539
1540 if (xfer->flags_int.control_xfr) {
1541
1542 /* don't transfer the setup packet again: */
1543
1544 usbd_xfer_set_frame_len(xfer, 0, 0);
1545 }
1546 if (urb->bsd_isread && (!xfer->flags.ext_buffer)) {
1547 /* copy in data with regard to the URB */
1548 usbd_copy_out(xfer->frbuffers + data_frame, 0,
1549 urb->bsd_data_ptr, xfer->frlengths[data_frame]);
1550 }
1551 urb->bsd_length_rem -= xfer->frlengths[data_frame];
1552 urb->bsd_data_ptr += xfer->frlengths[data_frame];
1553 urb->actual_length += xfer->frlengths[data_frame];
1554
1555 /* check for short transfer */
1556 if (xfer->actlen < xfer->sumlen) {
1557 urb->bsd_length_rem = 0;
1558
1559 /* short transfer */
1560 if (urb->transfer_flags & URB_SHORT_NOT_OK) {
1561 urb->status = -EPIPE;
1562 } else {
1563 urb->status = 0;
1564 }
1565 } else {
1566 /* check remainder */
1567 if (urb->bsd_length_rem > 0) {
1568 goto setup_bulk;
1569 }
1570 /* success */
1571 urb->status = 0;
1572 }
1573
1574 /* call callback */
1575 usb_linux_complete(xfer);
1576
1577 case USB_ST_SETUP:
1578tr_setup:
1579 /* get next transfer */
1580 urb = TAILQ_FIRST(&uhe->bsd_urb_list);
1581 if (urb == NULL) {
1582 /* nothing to do */
1583 return;
1584 }
1585 TAILQ_REMOVE(&uhe->bsd_urb_list, urb, bsd_urb_list);
1586 urb->bsd_urb_list.tqe_prev = NULL;
1587
1588 usbd_xfer_set_priv(xfer, urb);
1589 xfer->flags.force_short_xfer = 0;
1590 xfer->timeout = urb->timeout;
1591
1592 if (xfer->flags_int.control_xfr) {
1593
1594 /*
1595 * USB control transfers need special handling.
1596 * First copy in the header, then copy in data!
1597 */
1598 if (!xfer->flags.ext_buffer) {
1599 usbd_copy_in(xfer->frbuffers, 0,
1600 urb->setup_packet, REQ_SIZE);
1601 usbd_xfer_set_frame_len(xfer, 0, REQ_SIZE);
1602 } else {
1603 /* set virtual address to load */
1604 usbd_xfer_set_frame_data(xfer, 0,
1605 urb->setup_packet, REQ_SIZE);
1606 }
1607
1608 ptr = urb->setup_packet;
1609
1610 /* setup data transfer direction and length */
1611 urb->bsd_isread = (ptr[0] & UT_READ) ? 1 : 0;
1612 urb->bsd_length_rem = ptr[6] | (ptr[7] << 8);
1613
1614 } else {
1615
1616 /* setup data transfer direction */
1617
1618 urb->bsd_length_rem = urb->transfer_buffer_length;
1619 urb->bsd_isread = (uhe->desc.bEndpointAddress &
1620 UE_DIR_IN) ? 1 : 0;
1621 }
1622
1623 urb->bsd_data_ptr = urb->transfer_buffer;
1624 urb->actual_length = 0;
1625
1626setup_bulk:
1627 if (max_bulk > urb->bsd_length_rem) {
1628 max_bulk = urb->bsd_length_rem;
1629 }
1630 /* check if we need to force a short transfer */
1631
1632 if ((max_bulk == urb->bsd_length_rem) &&
1633 (urb->transfer_flags & URB_ZERO_PACKET) &&
1634 (!xfer->flags_int.control_xfr)) {
1635 xfer->flags.force_short_xfer = 1;
1636 }
1637 /* check if we need to copy in data */
1638
1639 if (xfer->flags.ext_buffer) {
1640 /* set virtual address to load */
1641 usbd_xfer_set_frame_data(xfer, data_frame,
1642 urb->bsd_data_ptr, max_bulk);
1643 } else if (!urb->bsd_isread) {
1644 /* copy out data with regard to the URB */
1645 usbd_copy_in(xfer->frbuffers + data_frame, 0,
1646 urb->bsd_data_ptr, max_bulk);
1647 usbd_xfer_set_frame_len(xfer, data_frame, max_bulk);
1648 }
1649 if (xfer->flags_int.control_xfr) {
1650 if (max_bulk > 0) {
1651 xfer->nframes = 2;
1652 } else {
1653 xfer->nframes = 1;
1654 }
1655 } else {
1656 xfer->nframes = 1;
1657 }
1658 usbd_transfer_submit(xfer);
1659 return;
1660
1661 default:
1662 if (xfer->error == USB_ERR_CANCELLED) {
1663 urb->status = -ECONNRESET;
1664 } else {
1665 urb->status = -EPIPE;
1666 }
1667
1668 /* Set zero for "actual_length" */
1669 urb->actual_length = 0;
1670
1671 /* call callback */
1672 usb_linux_complete(xfer);
1673
1674 if (xfer->error == USB_ERR_CANCELLED) {
1675 /* we need to return in this case */
1676 return;
1677 }
1678 goto tr_setup;
1679 }
1680}
1681
1682/*------------------------------------------------------------------------*
1683 * usb_fill_bulk_urb
1684 *------------------------------------------------------------------------*/
1685void
1686usb_fill_bulk_urb(struct urb *urb, struct usb_device *udev,
1687 struct usb_host_endpoint *uhe, void *buf,
1688 int length, usb_complete_t callback, void *arg)
1689{
1690 urb->dev = udev;
1691 urb->endpoint = uhe;
1692 urb->transfer_buffer = buf;
1693 urb->transfer_buffer_length = length;
1694 urb->complete = callback;
1695 urb->context = arg;
1696}
1697
1698/*------------------------------------------------------------------------*
1699 * usb_bulk_msg
1700 *
1701 * NOTE: This function can also be used for interrupt endpoints!
1702 *
1703 * Return values:
1704 * 0: Success
1705 * Else: Failure
1706 *------------------------------------------------------------------------*/
1707int
1708usb_bulk_msg(struct usb_device *udev, struct usb_host_endpoint *uhe,
1709 void *data, int len, uint16_t *pactlen, usb_timeout_t timeout)
1710{
1711 struct urb *urb;
1712 int err;
1713
1714 if (uhe == NULL)
1715 return (-EINVAL);
1716 if (len < 0)
1717 return (-EINVAL);
1718
1719 err = usb_setup_endpoint(udev, uhe, 4096 /* bytes */);
1720 if (err)
1721 return (err);
1722
1723 urb = usb_alloc_urb(0, 0);
1724 if (urb == NULL)
1725 return (-ENOMEM);
1726
1727 usb_fill_bulk_urb(urb, udev, uhe, data, len,
1728 usb_linux_wait_complete, NULL);
1729
1730 err = usb_start_wait_urb(urb, timeout, pactlen);
1731
1732 usb_free_urb(urb);
1733
1734 return (err);
1735}