Home | History | Annotate | Line # | Download | only in usb
ugen.c revision 1.39
      1 /*	$NetBSD: ugen.c,v 1.39 2000/05/31 16:16:49 augustss Exp $	*/
      2 /*	$FreeBSD: src/sys/dev/usb/ugen.c,v 1.26 1999/11/17 22:33:41 n_hibma Exp $	*/
      3 
      4 /*
      5  * Copyright (c) 1998 The NetBSD Foundation, Inc.
      6  * All rights reserved.
      7  *
      8  * This code is derived from software contributed to The NetBSD Foundation
      9  * by Lennart Augustsson (lennart (at) augustsson.net) at
     10  * Carlstedt Research & Technology.
     11  *
     12  * Redistribution and use in source and binary forms, with or without
     13  * modification, are permitted provided that the following conditions
     14  * are met:
     15  * 1. Redistributions of source code must retain the above copyright
     16  *    notice, this list of conditions and the following disclaimer.
     17  * 2. Redistributions in binary form must reproduce the above copyright
     18  *    notice, this list of conditions and the following disclaimer in the
     19  *    documentation and/or other materials provided with the distribution.
     20  * 3. All advertising materials mentioning features or use of this software
     21  *    must display the following acknowledgement:
     22  *        This product includes software developed by the NetBSD
     23  *        Foundation, Inc. and its contributors.
     24  * 4. Neither the name of The NetBSD Foundation nor the names of its
     25  *    contributors may be used to endorse or promote products derived
     26  *    from this software without specific prior written permission.
     27  *
     28  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     29  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     30  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     31  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     32  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     33  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     34  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     35  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     36  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     37  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     38  * POSSIBILITY OF SUCH DAMAGE.
     39  */
     40 
     41 
     42 #include <sys/param.h>
     43 #include <sys/systm.h>
     44 #include <sys/kernel.h>
     45 #include <sys/malloc.h>
     46 #if defined(__NetBSD__) || defined(__OpenBSD__)
     47 #include <sys/device.h>
     48 #include <sys/ioctl.h>
     49 #elif defined(__FreeBSD__)
     50 #include <sys/module.h>
     51 #include <sys/bus.h>
     52 #include <sys/ioccom.h>
     53 #include <sys/conf.h>
     54 #include <sys/fcntl.h>
     55 #include <sys/filio.h>
     56 #endif
     57 #include <sys/conf.h>
     58 #include <sys/tty.h>
     59 #include <sys/file.h>
     60 #include <sys/select.h>
     61 #include <sys/proc.h>
     62 #include <sys/vnode.h>
     63 #include <sys/poll.h>
     64 
     65 #include <dev/usb/usb.h>
     66 #include <dev/usb/usbdi.h>
     67 #include <dev/usb/usbdi_util.h>
     68 
     69 #ifdef UGEN_DEBUG
     70 #define DPRINTF(x)	if (ugendebug) logprintf x
     71 #define DPRINTFN(n,x)	if (ugendebug>(n)) logprintf x
     72 int	ugendebug = 0;
     73 #else
     74 #define DPRINTF(x)
     75 #define DPRINTFN(n,x)
     76 #endif
     77 
     78 struct ugen_endpoint {
     79 	struct ugen_softc *sc;
     80 	usb_endpoint_descriptor_t *edesc;
     81 	usbd_interface_handle iface;
     82 	int state;
     83 #define	UGEN_ASLP	0x02	/* waiting for data */
     84 #define UGEN_SHORT_OK	0x04	/* short xfers are OK */
     85 	usbd_pipe_handle pipeh;
     86 	struct clist q;
     87 	struct selinfo rsel;
     88 	void *ibuf;
     89 	u_int32_t timeout;
     90 };
     91 
     92 #define	UGEN_CHUNK	128	/* chunk size for read */
     93 #define	UGEN_IBSIZE	1020	/* buffer size */
     94 #define	UGEN_BBSIZE	1024
     95 
     96 struct ugen_softc {
     97 	USBBASEDEVICE sc_dev;		/* base device */
     98 	usbd_device_handle sc_udev;
     99 
    100 	char sc_is_open[USB_MAX_ENDPOINTS];
    101 	struct ugen_endpoint sc_endpoints[USB_MAX_ENDPOINTS][2];
    102 #define OUT 0
    103 #define IN  1
    104 
    105 	int sc_refcnt;
    106 	u_char sc_dying;
    107 };
    108 
    109 #if defined(__NetBSD__) || defined(__OpenBSD__)
    110 cdev_decl(ugen);
    111 #elif defined(__FreeBSD__)
    112 d_open_t  ugenopen;
    113 d_close_t ugenclose;
    114 d_read_t  ugenread;
    115 d_write_t ugenwrite;
    116 d_ioctl_t ugenioctl;
    117 d_poll_t  ugenpoll;
    118 
    119 #define UGEN_CDEV_MAJOR	114
    120 
    121 Static struct cdevsw ugen_cdevsw = {
    122 	/* open */	ugenopen,
    123 	/* close */	ugenclose,
    124 	/* read */	ugenread,
    125 	/* write */	ugenwrite,
    126 	/* ioctl */	ugenioctl,
    127 	/* poll */	ugenpoll,
    128 	/* mmap */	nommap,
    129 	/* strategy */	nostrategy,
    130 	/* name */	"ugen",
    131 	/* maj */	UGEN_CDEV_MAJOR,
    132 	/* dump */	nodump,
    133 	/* psize */	nopsize,
    134 	/* flags */	0,
    135 	/* bmaj */	-1
    136 };
    137 #endif
    138 
    139 Static void ugenintr __P((usbd_xfer_handle xfer, usbd_private_handle addr,
    140 			  usbd_status status));
    141 
    142 Static int ugen_do_read __P((struct ugen_softc *, int, struct uio *, int));
    143 Static int ugen_do_write __P((struct ugen_softc *, int, struct uio *, int));
    144 Static int ugen_do_ioctl __P((struct ugen_softc *, int, u_long,
    145 			      caddr_t, int, struct proc *));
    146 Static int ugen_set_config __P((struct ugen_softc *sc, int configno));
    147 Static usb_config_descriptor_t *ugen_get_cdesc __P((struct ugen_softc *sc,
    148 						    int index, int *lenp));
    149 Static usbd_status ugen_set_interface __P((struct ugen_softc *, int, int));
    150 Static int ugen_get_alt_index __P((struct ugen_softc *sc, int ifaceidx));
    151 
    152 #define UGENUNIT(n) ((minor(n) >> 4) & 0xf)
    153 #define UGENENDPOINT(n) (minor(n) & 0xf)
    154 #define UGENDEV(u, e) (makedev(0, ((u) << 4) | (e)))
    155 
    156 USB_DECLARE_DRIVER(ugen);
    157 
    158 USB_MATCH(ugen)
    159 {
    160 	USB_MATCH_START(ugen, uaa);
    161 
    162 	if (uaa->usegeneric)
    163 		return (UMATCH_GENERIC);
    164 	else
    165 		return (UMATCH_NONE);
    166 }
    167 
    168 USB_ATTACH(ugen)
    169 {
    170 	USB_ATTACH_START(ugen, sc, uaa);
    171 	usbd_device_handle udev;
    172 	char devinfo[1024];
    173 	usbd_status err;
    174 	int conf;
    175 
    176 	usbd_devinfo(uaa->device, 0, devinfo);
    177 	USB_ATTACH_SETUP;
    178 	printf("%s: %s\n", USBDEVNAME(sc->sc_dev), devinfo);
    179 
    180 	sc->sc_udev = udev = uaa->device;
    181 
    182 	/* First set configuration index 0, the default one for ugen. */
    183 	err = usbd_set_config_index(udev, 0, 0);
    184 	if (err) {
    185 		printf("%s: setting configuration index 0 failed\n",
    186 		       USBDEVNAME(sc->sc_dev));
    187 		sc->sc_dying = 1;
    188 		USB_ATTACH_ERROR_RETURN;
    189 	}
    190 	conf = usbd_get_config_descriptor(udev)->bConfigurationValue;
    191 
    192 	/* Set up all the local state for this configuration. */
    193 	err = ugen_set_config(sc, conf);
    194 	if (err) {
    195 		printf("%s: setting configuration %d failed\n",
    196 		       USBDEVNAME(sc->sc_dev), conf);
    197 		sc->sc_dying = 1;
    198 		USB_ATTACH_ERROR_RETURN;
    199 	}
    200 
    201 #ifdef __FreeBSD__
    202 	{
    203 		static int global_init_done = 0;
    204 		if (!global_init_done) {
    205 			cdevsw_add(&ugen_cdevsw);
    206 			global_init_done = 1;
    207 		}
    208 	}
    209 #endif
    210 
    211 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev,
    212 			   USBDEV(sc->sc_dev));
    213 
    214 	USB_ATTACH_SUCCESS_RETURN;
    215 }
    216 
    217 Static int
    218 ugen_set_config(sc, configno)
    219 	struct ugen_softc *sc;
    220 	int configno;
    221 {
    222 	usbd_device_handle dev = sc->sc_udev;
    223 	usbd_interface_handle iface;
    224 	usb_endpoint_descriptor_t *ed;
    225 	struct ugen_endpoint *sce;
    226 	u_int8_t niface, nendpt;
    227 	int ifaceno, endptno, endpt;
    228 	usbd_status err;
    229 	int dir;
    230 
    231 	DPRINTFN(1,("ugen_set_config: %s to configno %d, sc=%p\n",
    232 		    USBDEVNAME(sc->sc_dev), configno, sc));
    233 	/* Avoid setting the current value. */
    234 	if (usbd_get_config_descriptor(dev)->bConfigurationValue != configno) {
    235 		err = usbd_set_config_no(dev, configno, 0);
    236 		if (err)
    237 			return (err);
    238 	}
    239 
    240 	err = usbd_interface_count(dev, &niface);
    241 	if (err)
    242 		return (err);
    243 	memset(sc->sc_endpoints, 0, sizeof sc->sc_endpoints);
    244 	for (ifaceno = 0; ifaceno < niface; ifaceno++) {
    245 		DPRINTFN(1,("ugen_set_config: ifaceno %d\n", ifaceno));
    246 		err = usbd_device2interface_handle(dev, ifaceno, &iface);
    247 		if (err)
    248 			return (err);
    249 		err = usbd_endpoint_count(iface, &nendpt);
    250 		if (err)
    251 			return (err);
    252 		for (endptno = 0; endptno < nendpt; endptno++) {
    253 			ed = usbd_interface2endpoint_descriptor(iface,endptno);
    254 			endpt = ed->bEndpointAddress;
    255 			dir = UE_GET_DIR(endpt) == UE_DIR_IN ? IN : OUT;
    256 			sce = &sc->sc_endpoints[UE_GET_ADDR(endpt)][dir];
    257 			DPRINTFN(1,("ugen_set_config: endptno %d, endpt=0x%02x"
    258 				    "(%d,%d), sce=%p\n",
    259 				    endptno, endpt, UE_GET_ADDR(endpt),
    260 				    UE_GET_DIR(endpt), sce));
    261 			sce->sc = sc;
    262 			sce->edesc = ed;
    263 			sce->iface = iface;
    264 		}
    265 	}
    266 	return (USBD_NORMAL_COMPLETION);
    267 }
    268 
    269 int
    270 ugenopen(dev, flag, mode, p)
    271 	dev_t dev;
    272 	int flag;
    273 	int mode;
    274 	struct proc *p;
    275 {
    276 	struct ugen_softc *sc;
    277 	int unit = UGENUNIT(dev);
    278 	int endpt = UGENENDPOINT(dev);
    279 	usb_endpoint_descriptor_t *edesc;
    280 	struct ugen_endpoint *sce;
    281 	int dir, isize;
    282 	usbd_status err;
    283 
    284 	USB_GET_SC_OPEN(ugen, unit, sc);
    285 
    286  	DPRINTFN(5, ("ugenopen: flag=%d, mode=%d, unit=%d endpt=%d\n",
    287 		     flag, mode, unit, endpt));
    288 
    289 	if (sc == NULL || sc->sc_dying)
    290 		return (ENXIO);
    291 
    292 	if (sc->sc_is_open[endpt])
    293 		return (EBUSY);
    294 
    295 	if (endpt == USB_CONTROL_ENDPOINT) {
    296 		sc->sc_is_open[USB_CONTROL_ENDPOINT] = 1;
    297 		return (0);
    298 	}
    299 
    300 	/* Make sure there are pipes for all directions. */
    301 	for (dir = OUT; dir <= IN; dir++) {
    302 		if (flag & (dir == OUT ? FWRITE : FREAD)) {
    303 			sce = &sc->sc_endpoints[endpt][dir];
    304 			if (sce == 0 || sce->edesc == 0)
    305 				return (ENXIO);
    306 		}
    307 	}
    308 
    309 	/* Actually open the pipes. */
    310 	/* XXX Should back out properly if it fails. */
    311 	for (dir = OUT; dir <= IN; dir++) {
    312 		if (!(flag & (dir == OUT ? FWRITE : FREAD)))
    313 			continue;
    314 		sce = &sc->sc_endpoints[endpt][dir];
    315 		sce->state = 0;
    316 		sce->timeout = USBD_NO_TIMEOUT;
    317 		DPRINTFN(5, ("ugenopen: sc=%p, endpt=%d, dir=%d, sce=%p\n",
    318 			     sc, endpt, dir, sce));
    319 		edesc = sce->edesc;
    320 		switch (edesc->bmAttributes & UE_XFERTYPE) {
    321 		case UE_INTERRUPT:
    322 			isize = UGETW(edesc->wMaxPacketSize);
    323 			if (isize == 0)	/* shouldn't happen */
    324 				return (EINVAL);
    325 			sce->ibuf = malloc(isize, M_USBDEV, M_WAITOK);
    326 			DPRINTFN(5, ("ugenopen: intr endpt=%d,isize=%d\n",
    327 				     endpt, isize));
    328                         if (clalloc(&sce->q, UGEN_IBSIZE, 0) == -1)
    329                                 return (ENOMEM);
    330 			err = usbd_open_pipe_intr(sce->iface,
    331 				  edesc->bEndpointAddress,
    332 				  USBD_SHORT_XFER_OK, &sce->pipeh, sce,
    333 				  sce->ibuf, isize, ugenintr,
    334 				  USBD_DEFAULT_INTERVAL);
    335 			if (err) {
    336 				free(sce->ibuf, M_USBDEV);
    337 				clfree(&sce->q);
    338 				return (EIO);
    339 			}
    340 			DPRINTFN(5, ("ugenopen: interrupt open done\n"));
    341 			break;
    342 		case UE_BULK:
    343 			err = usbd_open_pipe(sce->iface,
    344 				  edesc->bEndpointAddress, 0, &sce->pipeh);
    345 			if (err)
    346 				return (EIO);
    347 			break;
    348 		case UE_CONTROL:
    349 		case UE_ISOCHRONOUS:
    350 			return (EINVAL);
    351 		}
    352 	}
    353 	sc->sc_is_open[endpt] = 1;
    354 	return (0);
    355 }
    356 
    357 int
    358 ugenclose(dev, flag, mode, p)
    359 	dev_t dev;
    360 	int flag;
    361 	int mode;
    362 	struct proc *p;
    363 {
    364 	int endpt = UGENENDPOINT(dev);
    365 	struct ugen_softc *sc;
    366 	struct ugen_endpoint *sce;
    367 	int dir;
    368 
    369 	USB_GET_SC(ugen, UGENUNIT(dev), sc);
    370 
    371 	DPRINTFN(5, ("ugenclose: flag=%d, mode=%d, unit=%d, endpt=%d\n",
    372 		     flag, mode, UGENUNIT(dev), endpt));
    373 
    374 #ifdef DIAGNOSTIC
    375 	if (!sc->sc_is_open[endpt]) {
    376 		printf("ugenclose: not open\n");
    377 		return (EINVAL);
    378 	}
    379 #endif
    380 
    381 	if (endpt == USB_CONTROL_ENDPOINT) {
    382 		DPRINTFN(5, ("ugenclose: close control\n"));
    383 		sc->sc_is_open[endpt] = 0;
    384 		return (0);
    385 	}
    386 
    387 	for (dir = OUT; dir <= IN; dir++) {
    388 		if (!(flag & (dir == OUT ? FWRITE : FREAD)))
    389 			continue;
    390 		sce = &sc->sc_endpoints[endpt][dir];
    391 		if (sce == NULL || sce->pipeh == NULL)
    392 			continue;
    393 		DPRINTFN(5, ("ugenclose: endpt=%d dir=%d sce=%p\n",
    394 			     endpt, dir, sce));
    395 
    396 		usbd_abort_pipe(sce->pipeh);
    397 		usbd_close_pipe(sce->pipeh);
    398 		sce->pipeh = NULL;
    399 
    400 		if (sce->ibuf != NULL) {
    401 			free(sce->ibuf, M_USBDEV);
    402 			sce->ibuf = NULL;
    403 			clfree(&sce->q);
    404 
    405 		}
    406 	}
    407 	sc->sc_is_open[endpt] = 0;
    408 
    409 	return (0);
    410 }
    411 
    412 Static int
    413 ugen_do_read(sc, endpt, uio, flag)
    414 	struct ugen_softc *sc;
    415 	int endpt;
    416 	struct uio *uio;
    417 	int flag;
    418 {
    419 	struct ugen_endpoint *sce = &sc->sc_endpoints[endpt][IN];
    420 	u_int32_t n, tn;
    421 	char buf[UGEN_BBSIZE];
    422 	usbd_xfer_handle xfer;
    423 	usbd_status err;
    424 	int s;
    425 	int error = 0;
    426 	u_char buffer[UGEN_CHUNK];
    427 
    428 #ifdef __NetBSD__
    429 	DPRINTFN(5, ("ugenread: %d:%d\n", sc->sc_dev.dv_unit, endpt));
    430 #endif
    431 
    432 	if (sc->sc_dying)
    433 		return (EIO);
    434 
    435 	if (endpt == USB_CONTROL_ENDPOINT)
    436 		return (ENODEV);
    437 
    438 #ifdef DIAGNOSTIC
    439 	if (sce->edesc == NULL) {
    440 		printf("ugenread: no edesc\n");
    441 		return (EIO);
    442 	}
    443 	if (sce->pipeh == NULL) {
    444 		printf("ugenread: no pipe\n");
    445 		return (EIO);
    446 	}
    447 #endif
    448 
    449 	switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
    450 	case UE_INTERRUPT:
    451 		/* Block until activity occured. */
    452 		s = splusb();
    453 		while (sce->q.c_cc == 0) {
    454 			if (flag & IO_NDELAY) {
    455 				splx(s);
    456 				return (EWOULDBLOCK);
    457 			}
    458 			sce->state |= UGEN_ASLP;
    459 			DPRINTFN(5, ("ugenread: sleep on %p\n", sc));
    460 			error = tsleep(sce, PZERO | PCATCH, "ugenri", 0);
    461 			DPRINTFN(5, ("ugenread: woke, error=%d\n", error));
    462 			if (sc->sc_dying)
    463 				error = EIO;
    464 			if (error) {
    465 				sce->state &= ~UGEN_ASLP;
    466 				break;
    467 			}
    468 		}
    469 		splx(s);
    470 
    471 		/* Transfer as many chunks as possible. */
    472 		while (sce->q.c_cc > 0 && uio->uio_resid > 0 && !error) {
    473 			n = min(sce->q.c_cc, uio->uio_resid);
    474 			if (n > sizeof(buffer))
    475 				n = sizeof(buffer);
    476 
    477 			/* Remove a small chunk from the input queue. */
    478 			q_to_b(&sce->q, buffer, n);
    479 			DPRINTFN(5, ("ugenread: got %d chars\n", n));
    480 
    481 			/* Copy the data to the user process. */
    482 			error = uiomove(buffer, n, uio);
    483 			if (error)
    484 				break;
    485 		}
    486 		break;
    487 	case UE_BULK:
    488 		xfer = usbd_alloc_xfer(sc->sc_udev);
    489 		if (xfer == 0)
    490 			return (ENOMEM);
    491 		while ((n = min(UGEN_BBSIZE, uio->uio_resid)) != 0) {
    492 			DPRINTFN(1, ("ugenread: start transfer %d bytes\n",n));
    493 			tn = n;
    494 			err = usbd_bulk_transfer(
    495 				  xfer, sce->pipeh,
    496 				  sce->state & UGEN_SHORT_OK ?
    497 				      USBD_SHORT_XFER_OK : 0,
    498 				  sce->timeout, buf, &tn, "ugenrb");
    499 			if (err) {
    500 				if (err == USBD_INTERRUPTED)
    501 					error = EINTR;
    502 				else if (err == USBD_TIMEOUT)
    503 					error = ETIMEDOUT;
    504 				else
    505 					error = EIO;
    506 				break;
    507 			}
    508 			DPRINTFN(1, ("ugenread: got %d bytes\n", tn));
    509 			error = uiomove(buf, tn, uio);
    510 			if (error || tn < n)
    511 				break;
    512 		}
    513 		usbd_free_xfer(xfer);
    514 		break;
    515 	default:
    516 		return (ENXIO);
    517 	}
    518 	return (error);
    519 }
    520 
    521 int
    522 ugenread(dev, uio, flag)
    523 	dev_t dev;
    524 	struct uio *uio;
    525 	int flag;
    526 {
    527 	int endpt = UGENENDPOINT(dev);
    528 	struct ugen_softc *sc;
    529 	int error;
    530 
    531 	USB_GET_SC(ugen, UGENUNIT(dev), sc);
    532 
    533 	sc->sc_refcnt++;
    534 	error = ugen_do_read(sc, endpt, uio, flag);
    535 	if (--sc->sc_refcnt < 0)
    536 		usb_detach_wakeup(USBDEV(sc->sc_dev));
    537 	return (error);
    538 }
    539 
    540 Static int
    541 ugen_do_write(sc, endpt, uio, flag)
    542 	struct ugen_softc *sc;
    543 	int endpt;
    544 	struct uio *uio;
    545 	int flag;
    546 {
    547 	struct ugen_endpoint *sce = &sc->sc_endpoints[endpt][OUT];
    548 	u_int32_t n;
    549 	int error = 0;
    550 	char buf[UGEN_BBSIZE];
    551 	usbd_xfer_handle xfer;
    552 	usbd_status err;
    553 
    554 	DPRINTFN(5, ("%s: ugenwrite: %d\n", USBDEVNAME(sc->sc_dev), endpt));
    555 
    556 	if (sc->sc_dying)
    557 		return (EIO);
    558 
    559 	if (endpt == USB_CONTROL_ENDPOINT)
    560 		return (ENODEV);
    561 
    562 #ifdef DIAGNOSTIC
    563 	if (sce->edesc == NULL) {
    564 		printf("ugenwrite: no edesc\n");
    565 		return (EIO);
    566 	}
    567 	if (sce->pipeh == NULL) {
    568 		printf("ugenwrite: no pipe\n");
    569 		return (EIO);
    570 	}
    571 #endif
    572 
    573 	switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
    574 	case UE_BULK:
    575 		xfer = usbd_alloc_xfer(sc->sc_udev);
    576 		if (xfer == 0)
    577 			return (EIO);
    578 		while ((n = min(UGEN_BBSIZE, uio->uio_resid)) != 0) {
    579 			error = uiomove(buf, n, uio);
    580 			if (error)
    581 				break;
    582 			DPRINTFN(1, ("ugenwrite: transfer %d bytes\n", n));
    583 			err = usbd_bulk_transfer(xfer, sce->pipeh, 0,
    584 				  sce->timeout, buf, &n,"ugenwb");
    585 			if (err) {
    586 				if (err == USBD_INTERRUPTED)
    587 					error = EINTR;
    588 				else if (err == USBD_TIMEOUT)
    589 					error = ETIMEDOUT;
    590 				else
    591 					error = EIO;
    592 				break;
    593 			}
    594 		}
    595 		usbd_free_xfer(xfer);
    596 		break;
    597 	default:
    598 		return (ENXIO);
    599 	}
    600 	return (error);
    601 }
    602 
    603 int
    604 ugenwrite(dev, uio, flag)
    605 	dev_t dev;
    606 	struct uio *uio;
    607 	int flag;
    608 {
    609 	int endpt = UGENENDPOINT(dev);
    610 	struct ugen_softc *sc;
    611 	int error;
    612 
    613 	USB_GET_SC(ugen, UGENUNIT(dev), sc);
    614 
    615 	sc->sc_refcnt++;
    616 	error = ugen_do_write(sc, endpt, uio, flag);
    617 	if (--sc->sc_refcnt < 0)
    618 		usb_detach_wakeup(USBDEV(sc->sc_dev));
    619 	return (error);
    620 }
    621 
    622 #if defined(__NetBSD__) || defined(__OpenBSD__)
    623 int
    624 ugen_activate(self, act)
    625 	device_ptr_t self;
    626 	enum devact act;
    627 {
    628 	struct ugen_softc *sc = (struct ugen_softc *)self;
    629 
    630 	switch (act) {
    631 	case DVACT_ACTIVATE:
    632 		return (EOPNOTSUPP);
    633 		break;
    634 
    635 	case DVACT_DEACTIVATE:
    636 		sc->sc_dying = 1;
    637 		break;
    638 	}
    639 	return (0);
    640 }
    641 #endif
    642 
    643 USB_DETACH(ugen)
    644 {
    645 	USB_DETACH_START(ugen, sc);
    646 	struct ugen_endpoint *sce;
    647 	int i, dir;
    648 	int s;
    649 #if defined(__NetBSD__) || defined(__OpenBSD__)
    650 	int maj, mn;
    651 
    652 	DPRINTF(("ugen_detach: sc=%p flags=%d\n", sc, flags));
    653 #elif defined(__FreeBSD__)
    654 	DPRINTF(("ugen_detach: sc=%p\n", sc));
    655 #endif
    656 
    657 	sc->sc_dying = 1;
    658 	/* Abort all pipes.  Causes processes waiting for transfer to wake. */
    659 	for (i = 0; i < USB_MAX_ENDPOINTS; i++) {
    660 		for (dir = OUT; dir <= IN; dir++) {
    661 			sce = &sc->sc_endpoints[i][dir];
    662 			if (sce && sce->pipeh)
    663 				usbd_abort_pipe(sce->pipeh);
    664 		}
    665 	}
    666 
    667 	s = splusb();
    668 	if (--sc->sc_refcnt >= 0) {
    669 		/* Wake everyone */
    670 		for (i = 0; i < USB_MAX_ENDPOINTS; i++)
    671 			wakeup(&sc->sc_endpoints[i][IN]);
    672 		/* Wait for processes to go away. */
    673 		usb_detach_wait(USBDEV(sc->sc_dev));
    674 	}
    675 	splx(s);
    676 
    677 #if defined(__NetBSD__) || defined(__OpenBSD__)
    678 	/* locate the major number */
    679 	for (maj = 0; maj < nchrdev; maj++)
    680 		if (cdevsw[maj].d_open == ugenopen)
    681 			break;
    682 
    683 	/* Nuke the vnodes for any open instances (calls close). */
    684 	mn = self->dv_unit * USB_MAX_ENDPOINTS;
    685 	vdevgone(maj, mn, mn + USB_MAX_ENDPOINTS - 1, VCHR);
    686 #elif defined(__FreeBSD__)
    687 	/* XXX not implemented yet */
    688 #endif
    689 
    690 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev,
    691 			   USBDEV(sc->sc_dev));
    692 
    693 	return (0);
    694 }
    695 
    696 Static void
    697 ugenintr(xfer, addr, status)
    698 	usbd_xfer_handle xfer;
    699 	usbd_private_handle addr;
    700 	usbd_status status;
    701 {
    702 	struct ugen_endpoint *sce = addr;
    703 	/*struct ugen_softc *sc = sce->sc;*/
    704 	u_int32_t count;
    705 	u_char *ibuf;
    706 
    707 	if (status == USBD_CANCELLED)
    708 		return;
    709 
    710 	if (status != USBD_NORMAL_COMPLETION) {
    711 		DPRINTF(("ugenintr: status=%d\n", status));
    712 		usbd_clear_endpoint_stall_async(sce->pipeh);
    713 		return;
    714 	}
    715 
    716 	usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
    717 	ibuf = sce->ibuf;
    718 
    719 	DPRINTFN(5, ("ugenintr: xfer=%p status=%d count=%d\n",
    720 		     xfer, status, count));
    721 	DPRINTFN(5, ("          data = %02x %02x %02x\n",
    722 		     ibuf[0], ibuf[1], ibuf[2]));
    723 
    724 	(void)b_to_q(ibuf, count, &sce->q);
    725 
    726 	if (sce->state & UGEN_ASLP) {
    727 		sce->state &= ~UGEN_ASLP;
    728 		DPRINTFN(5, ("ugen_intr: waking %p\n", sce));
    729 		wakeup(sce);
    730 	}
    731 	selwakeup(&sce->rsel);
    732 }
    733 
    734 Static usbd_status
    735 ugen_set_interface(sc, ifaceidx, altno)
    736 	struct ugen_softc *sc;
    737 	int ifaceidx, altno;
    738 {
    739 	usbd_interface_handle iface;
    740 	usb_endpoint_descriptor_t *ed;
    741 	usbd_status err;
    742 	struct ugen_endpoint *sce;
    743 	u_int8_t niface, nendpt, endptno, endpt;
    744 	int dir;
    745 
    746 	DPRINTFN(15, ("ugen_set_interface %d %d\n", ifaceidx, altno));
    747 
    748 	err = usbd_interface_count(sc->sc_udev, &niface);
    749 	if (err)
    750 		return (err);
    751 	if (ifaceidx < 0 || ifaceidx >= niface)
    752 		return (USBD_INVAL);
    753 
    754 	err = usbd_device2interface_handle(sc->sc_udev, ifaceidx, &iface);
    755 	if (err)
    756 		return (err);
    757 	err = usbd_endpoint_count(iface, &nendpt);
    758 	if (err)
    759 		return (err);
    760 	/* XXX should only do this after setting new altno has succeeded */
    761 	for (endptno = 0; endptno < nendpt; endptno++) {
    762 		ed = usbd_interface2endpoint_descriptor(iface,endptno);
    763 		endpt = ed->bEndpointAddress;
    764 		dir = UE_GET_DIR(endpt) == UE_DIR_IN ? IN : OUT;
    765 		sce = &sc->sc_endpoints[UE_GET_ADDR(endpt)][dir];
    766 		sce->sc = 0;
    767 		sce->edesc = 0;
    768 		sce->iface = 0;
    769 	}
    770 
    771 	/* change setting */
    772 	err = usbd_set_interface(iface, altno);
    773 	if (err)
    774 		return (err);
    775 
    776 	err = usbd_endpoint_count(iface, &nendpt);
    777 	if (err)
    778 		return (err);
    779 	for (endptno = 0; endptno < nendpt; endptno++) {
    780 		ed = usbd_interface2endpoint_descriptor(iface,endptno);
    781 		endpt = ed->bEndpointAddress;
    782 		dir = UE_GET_DIR(endpt) == UE_DIR_IN ? IN : OUT;
    783 		sce = &sc->sc_endpoints[UE_GET_ADDR(endpt)][dir];
    784 		sce->sc = sc;
    785 		sce->edesc = ed;
    786 		sce->iface = iface;
    787 	}
    788 	return (0);
    789 }
    790 
    791 /* Retrieve a complete descriptor for a certain device and index. */
    792 Static usb_config_descriptor_t *
    793 ugen_get_cdesc(sc, index, lenp)
    794 	struct ugen_softc *sc;
    795 	int index;
    796 	int *lenp;
    797 {
    798 	usb_config_descriptor_t *cdesc, *tdesc, cdescr;
    799 	int len;
    800 	usbd_status err;
    801 
    802 	if (index == USB_CURRENT_CONFIG_INDEX) {
    803 		tdesc = usbd_get_config_descriptor(sc->sc_udev);
    804 		len = UGETW(tdesc->wTotalLength);
    805 		if (lenp)
    806 			*lenp = len;
    807 		cdesc = malloc(len, M_TEMP, M_WAITOK);
    808 		memcpy(cdesc, tdesc, len);
    809 		DPRINTFN(5,("ugen_get_cdesc: current, len=%d\n", len));
    810 	} else {
    811 		err = usbd_get_config_desc(sc->sc_udev, index, &cdescr);
    812 		if (err)
    813 			return (0);
    814 		len = UGETW(cdescr.wTotalLength);
    815 		DPRINTFN(5,("ugen_get_cdesc: index=%d, len=%d\n", index, len));
    816 		if (lenp)
    817 			*lenp = len;
    818 		cdesc = malloc(len, M_TEMP, M_WAITOK);
    819 		err = usbd_get_config_desc_full(sc->sc_udev, index, cdesc,len);
    820 		if (err) {
    821 			free(cdesc, M_TEMP);
    822 			return (0);
    823 		}
    824 	}
    825 	return (cdesc);
    826 }
    827 
    828 Static int
    829 ugen_get_alt_index(sc, ifaceidx)
    830 	struct ugen_softc *sc;
    831 	int ifaceidx;
    832 {
    833 	usbd_interface_handle iface;
    834 	usbd_status err;
    835 
    836 	err = usbd_device2interface_handle(sc->sc_udev, ifaceidx, &iface);
    837 	if (err)
    838 		return (-1);
    839 	return (usbd_get_interface_altindex(iface));
    840 }
    841 
    842 Static int
    843 ugen_do_ioctl(sc, endpt, cmd, addr, flag, p)
    844 	struct ugen_softc *sc;
    845 	int endpt;
    846 	u_long cmd;
    847 	caddr_t addr;
    848 	int flag;
    849 	struct proc *p;
    850 {
    851 	struct ugen_endpoint *sce;
    852 	usbd_status err;
    853 	usbd_interface_handle iface;
    854 	struct usb_config_desc *cd;
    855 	usb_config_descriptor_t *cdesc;
    856 	struct usb_interface_desc *id;
    857 	usb_interface_descriptor_t *idesc;
    858 	struct usb_endpoint_desc *ed;
    859 	usb_endpoint_descriptor_t *edesc;
    860 	struct usb_alt_interface *ai;
    861 	struct usb_string_desc *si;
    862 	u_int8_t conf, alt;
    863 
    864 	DPRINTFN(5, ("ugenioctl: cmd=%08lx\n", cmd));
    865 	if (sc->sc_dying)
    866 		return (EIO);
    867 
    868 	switch (cmd) {
    869 	case FIONBIO:
    870 		/* All handled in the upper FS layer. */
    871 		return (0);
    872 	case USB_SET_SHORT_XFER:
    873 		/* This flag only affects read */
    874 		if (endpt == USB_CONTROL_ENDPOINT)
    875 			return (EINVAL);
    876 		sce = &sc->sc_endpoints[endpt][IN];
    877 		if (sce == NULL)
    878 			return (EINVAL);
    879 #ifdef DIAGNOSTIC
    880 		if (sce->pipeh == NULL) {
    881 			printf("ugenioctl: USB_SET_SHORT_XFER, no pipe\n");
    882 			return (EIO);
    883 		}
    884 #endif
    885 		if (*(int *)addr)
    886 			sce->state |= UGEN_SHORT_OK;
    887 		else
    888 			sce->state &= ~UGEN_SHORT_OK;
    889 		return (0);
    890 	case USB_SET_TIMEOUT:
    891 		sce = &sc->sc_endpoints[endpt][IN];
    892 		if (sce == NULL)
    893 			return (EINVAL);
    894 #ifdef DIAGNOSTIC
    895 		if (sce->pipeh == NULL) {
    896 			printf("ugenioctl: USB_SET_TIMEOUT, no pipe\n");
    897 			return (EIO);
    898 		}
    899 #endif
    900 		sce->timeout = *(int *)addr;
    901 		return (0);
    902 	default:
    903 		break;
    904 	}
    905 
    906 	if (endpt != USB_CONTROL_ENDPOINT)
    907 		return (EINVAL);
    908 
    909 	switch (cmd) {
    910 #ifdef UGEN_DEBUG
    911 	case USB_SETDEBUG:
    912 		ugendebug = *(int *)addr;
    913 		break;
    914 #endif
    915 	case USB_GET_CONFIG:
    916 		err = usbd_get_config(sc->sc_udev, &conf);
    917 		if (err)
    918 			return (EIO);
    919 		*(int *)addr = conf;
    920 		break;
    921 	case USB_SET_CONFIG:
    922 		if (!(flag & FWRITE))
    923 			return (EPERM);
    924 		err = ugen_set_config(sc, *(int *)addr);
    925 		if (err)
    926 			return (EIO);
    927 		break;
    928 	case USB_GET_ALTINTERFACE:
    929 		ai = (struct usb_alt_interface *)addr;
    930 		err = usbd_device2interface_handle(sc->sc_udev,
    931 			  ai->interface_index, &iface);
    932 		if (err)
    933 			return (EINVAL);
    934 		idesc = usbd_get_interface_descriptor(iface);
    935 		if (idesc == NULL)
    936 			return (EIO);
    937 		ai->alt_no = idesc->bAlternateSetting;
    938 		break;
    939 	case USB_SET_ALTINTERFACE:
    940 		if (!(flag & FWRITE))
    941 			return (EPERM);
    942 		ai = (struct usb_alt_interface *)addr;
    943 		err = usbd_device2interface_handle(sc->sc_udev,
    944 			  ai->interface_index, &iface);
    945 		if (err)
    946 			return (EINVAL);
    947 		err = ugen_set_interface(sc, ai->interface_index, ai->alt_no);
    948 		if (err)
    949 			return (EINVAL);
    950 		break;
    951 	case USB_GET_NO_ALT:
    952 		ai = (struct usb_alt_interface *)addr;
    953 		cdesc = ugen_get_cdesc(sc, ai->config_index, 0);
    954 		if (cdesc == NULL)
    955 			return (EINVAL);
    956 		idesc = usbd_find_idesc(cdesc, ai->interface_index, 0);
    957 		if (idesc == NULL) {
    958 			free(cdesc, M_TEMP);
    959 			return (EINVAL);
    960 		}
    961 		ai->alt_no = usbd_get_no_alts(cdesc, idesc->bInterfaceNumber);
    962 		free(cdesc, M_TEMP);
    963 		break;
    964 	case USB_GET_DEVICE_DESC:
    965 		*(usb_device_descriptor_t *)addr =
    966 			*usbd_get_device_descriptor(sc->sc_udev);
    967 		break;
    968 	case USB_GET_CONFIG_DESC:
    969 		cd = (struct usb_config_desc *)addr;
    970 		cdesc = ugen_get_cdesc(sc, cd->config_index, 0);
    971 		if (cdesc == NULL)
    972 			return (EINVAL);
    973 		cd->desc = *cdesc;
    974 		free(cdesc, M_TEMP);
    975 		break;
    976 	case USB_GET_INTERFACE_DESC:
    977 		id = (struct usb_interface_desc *)addr;
    978 		cdesc = ugen_get_cdesc(sc, id->config_index, 0);
    979 		if (cdesc == NULL)
    980 			return (EINVAL);
    981 		if (id->config_index == USB_CURRENT_CONFIG_INDEX &&
    982 		    id->alt_index == USB_CURRENT_ALT_INDEX)
    983 			alt = ugen_get_alt_index(sc, id->interface_index);
    984 		else
    985 			alt = id->alt_index;
    986 		idesc = usbd_find_idesc(cdesc, id->interface_index, alt);
    987 		if (idesc == NULL) {
    988 			free(cdesc, M_TEMP);
    989 			return (EINVAL);
    990 		}
    991 		id->desc = *idesc;
    992 		free(cdesc, M_TEMP);
    993 		break;
    994 	case USB_GET_ENDPOINT_DESC:
    995 		ed = (struct usb_endpoint_desc *)addr;
    996 		cdesc = ugen_get_cdesc(sc, ed->config_index, 0);
    997 		if (cdesc == NULL)
    998 			return (EINVAL);
    999 		if (ed->config_index == USB_CURRENT_CONFIG_INDEX &&
   1000 		    ed->alt_index == USB_CURRENT_ALT_INDEX)
   1001 			alt = ugen_get_alt_index(sc, ed->interface_index);
   1002 		else
   1003 			alt = ed->alt_index;
   1004 		edesc = usbd_find_edesc(cdesc, ed->interface_index,
   1005 					alt, ed->endpoint_index);
   1006 		if (edesc == NULL) {
   1007 			free(cdesc, M_TEMP);
   1008 			return (EINVAL);
   1009 		}
   1010 		ed->desc = *edesc;
   1011 		free(cdesc, M_TEMP);
   1012 		break;
   1013 	case USB_GET_FULL_DESC:
   1014 	{
   1015 		int len;
   1016 		struct iovec iov;
   1017 		struct uio uio;
   1018 		struct usb_full_desc *fd = (struct usb_full_desc *)addr;
   1019 		int error;
   1020 
   1021 		cdesc = ugen_get_cdesc(sc, fd->config_index, &len);
   1022 		if (len > fd->size)
   1023 			len = fd->size;
   1024 		iov.iov_base = (caddr_t)fd->data;
   1025 		iov.iov_len = len;
   1026 		uio.uio_iov = &iov;
   1027 		uio.uio_iovcnt = 1;
   1028 		uio.uio_resid = len;
   1029 		uio.uio_offset = 0;
   1030 		uio.uio_segflg = UIO_USERSPACE;
   1031 		uio.uio_rw = UIO_READ;
   1032 		uio.uio_procp = p;
   1033 		error = uiomove((void *)cdesc, len, &uio);
   1034 		free(cdesc, M_TEMP);
   1035 		return (error);
   1036 	}
   1037 	case USB_GET_STRING_DESC:
   1038 		si = (struct usb_string_desc *)addr;
   1039 		err = usbd_get_string_desc(sc->sc_udev, si->string_index,
   1040 			  si->language_id, &si->desc);
   1041 		if (err)
   1042 			return (EINVAL);
   1043 		break;
   1044 	case USB_DO_REQUEST:
   1045 	{
   1046 		struct usb_ctl_request *ur = (void *)addr;
   1047 		int len = UGETW(ur->request.wLength);
   1048 		struct iovec iov;
   1049 		struct uio uio;
   1050 		void *ptr = 0;
   1051 		usbd_status err;
   1052 		int error = 0;
   1053 
   1054 		if (!(flag & FWRITE))
   1055 			return (EPERM);
   1056 		/* Avoid requests that would damage the bus integrity. */
   1057 		if ((ur->request.bmRequestType == UT_WRITE_DEVICE &&
   1058 		     ur->request.bRequest == UR_SET_ADDRESS) ||
   1059 		    (ur->request.bmRequestType == UT_WRITE_DEVICE &&
   1060 		     ur->request.bRequest == UR_SET_CONFIG) ||
   1061 		    (ur->request.bmRequestType == UT_WRITE_INTERFACE &&
   1062 		     ur->request.bRequest == UR_SET_INTERFACE))
   1063 			return (EINVAL);
   1064 
   1065 		if (len < 0 || len > 32767)
   1066 			return (EINVAL);
   1067 		if (len != 0) {
   1068 			iov.iov_base = (caddr_t)ur->data;
   1069 			iov.iov_len = len;
   1070 			uio.uio_iov = &iov;
   1071 			uio.uio_iovcnt = 1;
   1072 			uio.uio_resid = len;
   1073 			uio.uio_offset = 0;
   1074 			uio.uio_segflg = UIO_USERSPACE;
   1075 			uio.uio_rw =
   1076 				ur->request.bmRequestType & UT_READ ?
   1077 				UIO_READ : UIO_WRITE;
   1078 			uio.uio_procp = p;
   1079 			ptr = malloc(len, M_TEMP, M_WAITOK);
   1080 			if (uio.uio_rw == UIO_WRITE) {
   1081 				error = uiomove(ptr, len, &uio);
   1082 				if (error)
   1083 					goto ret;
   1084 			}
   1085 		}
   1086 		err = usbd_do_request_flags(sc->sc_udev, &ur->request,
   1087 			  ptr, ur->flags, &ur->actlen);
   1088 		if (err) {
   1089 			error = EIO;
   1090 			goto ret;
   1091 		}
   1092 		if (len != 0) {
   1093 			if (uio.uio_rw == UIO_READ) {
   1094 				error = uiomove(ptr, len, &uio);
   1095 				if (error)
   1096 					goto ret;
   1097 			}
   1098 		}
   1099 	ret:
   1100 		if (ptr)
   1101 			free(ptr, M_TEMP);
   1102 		return (error);
   1103 	}
   1104 	case USB_GET_DEVICEINFO:
   1105 		usbd_fill_deviceinfo(sc->sc_udev,
   1106 				     (struct usb_device_info *)addr);
   1107 		break;
   1108 	default:
   1109 		return (EINVAL);
   1110 	}
   1111 	return (0);
   1112 }
   1113 
   1114 int
   1115 ugenioctl(dev, cmd, addr, flag, p)
   1116 	dev_t dev;
   1117 	u_long cmd;
   1118 	caddr_t addr;
   1119 	int flag;
   1120 	struct proc *p;
   1121 {
   1122 	int endpt = UGENENDPOINT(dev);
   1123 	struct ugen_softc *sc;
   1124 	int error;
   1125 
   1126 	USB_GET_SC(ugen, UGENUNIT(dev), sc);
   1127 
   1128 	sc->sc_refcnt++;
   1129 	error = ugen_do_ioctl(sc, endpt, cmd, addr, flag, p);
   1130 	if (--sc->sc_refcnt < 0)
   1131 		usb_detach_wakeup(USBDEV(sc->sc_dev));
   1132 	return (error);
   1133 }
   1134 
   1135 int
   1136 ugenpoll(dev, events, p)
   1137 	dev_t dev;
   1138 	int events;
   1139 	struct proc *p;
   1140 {
   1141 	struct ugen_softc *sc;
   1142 	struct ugen_endpoint *sce;
   1143 	int revents = 0;
   1144 	int s;
   1145 
   1146 	USB_GET_SC(ugen, UGENUNIT(dev), sc);
   1147 
   1148 	if (sc->sc_dying)
   1149 		return (EIO);
   1150 
   1151 	/* XXX always IN */
   1152 	sce = &sc->sc_endpoints[UGENENDPOINT(dev)][IN];
   1153 	if (sce == NULL)
   1154 		return (EINVAL);
   1155 #ifdef DIAGNOSTIC
   1156 	if (!sce->edesc) {
   1157 		printf("ugenpoll: no edesc\n");
   1158 		return (EIO);
   1159 	}
   1160 	if (!sce->pipeh) {
   1161 		printf("ugenpoll: no pipe\n");
   1162 		return (EIO);
   1163 	}
   1164 #endif
   1165 	s = splusb();
   1166 	switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
   1167 	case UE_INTERRUPT:
   1168 		if (events & (POLLIN | POLLRDNORM)) {
   1169 			if (sce->q.c_cc > 0)
   1170 				revents |= events & (POLLIN | POLLRDNORM);
   1171 			else
   1172 				selrecord(p, &sce->rsel);
   1173 		}
   1174 		break;
   1175 	case UE_BULK:
   1176 		/*
   1177 		 * We have no easy way of determining if a read will
   1178 		 * yield any data or a write will happen.
   1179 		 * Pretend they will.
   1180 		 */
   1181 		revents |= events &
   1182 			   (POLLIN | POLLRDNORM | POLLOUT | POLLWRNORM);
   1183 		break;
   1184 	default:
   1185 		break;
   1186 	}
   1187 	splx(s);
   1188 	return (revents);
   1189 }
   1190 
   1191 #if defined(__FreeBSD__)
   1192 DRIVER_MODULE(ugen, uhub, ugen_driver, ugen_devclass, usbd_driver_load, 0);
   1193 #endif
   1194