Home | History | Annotate | Line # | Download | only in usb
ugen.c revision 1.134
      1 /*	$NetBSD: ugen.c,v 1.134 2016/07/07 06:55:42 msaitoh Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1998, 2004 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Lennart Augustsson (lennart (at) augustsson.net) at
      9  * Carlstedt Research & Technology.
     10  *
     11  * Copyright (c) 2006 BBN Technologies Corp.  All rights reserved.
     12  * Effort sponsored in part by the Defense Advanced Research Projects
     13  * Agency (DARPA) and the Department of the Interior National Business
     14  * Center under agreement number NBCHC050166.
     15  *
     16  * Redistribution and use in source and binary forms, with or without
     17  * modification, are permitted provided that the following conditions
     18  * are met:
     19  * 1. Redistributions of source code must retain the above copyright
     20  *    notice, this list of conditions and the following disclaimer.
     21  * 2. Redistributions in binary form must reproduce the above copyright
     22  *    notice, this list of conditions and the following disclaimer in the
     23  *    documentation and/or other materials provided with the distribution.
     24  *
     25  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     26  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     27  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     28  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     29  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     30  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     31  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     32  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     33  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     34  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     35  * POSSIBILITY OF SUCH DAMAGE.
     36  */
     37 
     38 
     39 #include <sys/cdefs.h>
     40 __KERNEL_RCSID(0, "$NetBSD: ugen.c,v 1.134 2016/07/07 06:55:42 msaitoh Exp $");
     41 
     42 #ifdef _KERNEL_OPT
     43 #include "opt_compat_netbsd.h"
     44 #include "opt_usb.h"
     45 #endif
     46 
     47 #include <sys/param.h>
     48 #include <sys/systm.h>
     49 #include <sys/kernel.h>
     50 #include <sys/kmem.h>
     51 #include <sys/device.h>
     52 #include <sys/ioctl.h>
     53 #include <sys/conf.h>
     54 #include <sys/tty.h>
     55 #include <sys/file.h>
     56 #include <sys/select.h>
     57 #include <sys/proc.h>
     58 #include <sys/vnode.h>
     59 #include <sys/poll.h>
     60 
     61 #include <dev/usb/usb.h>
     62 #include <dev/usb/usbdi.h>
     63 #include <dev/usb/usbdi_util.h>
     64 
     65 #ifdef UGEN_DEBUG
     66 #define DPRINTF(x)	if (ugendebug) printf x
     67 #define DPRINTFN(n,x)	if (ugendebug>(n)) printf x
     68 int	ugendebug = 0;
     69 #else
     70 #define DPRINTF(x)
     71 #define DPRINTFN(n,x)
     72 #endif
     73 
     74 #define	UGEN_CHUNK	128	/* chunk size for read */
     75 #define	UGEN_IBSIZE	1020	/* buffer size */
     76 #define	UGEN_BBSIZE	1024
     77 
     78 #define UGEN_NISOREQS	4	/* number of outstanding xfer requests */
     79 #define UGEN_NISORFRMS	8	/* number of transactions per req */
     80 #define UGEN_NISOFRAMES	(UGEN_NISORFRMS * UGEN_NISOREQS)
     81 
     82 #define UGEN_BULK_RA_WB_BUFSIZE	16384		/* default buffer size */
     83 #define UGEN_BULK_RA_WB_BUFMAX	(1 << 20)	/* maximum allowed buffer */
     84 
     85 struct isoreq {
     86 	struct ugen_endpoint *sce;
     87 	struct usbd_xfer *xfer;
     88 	void *dmabuf;
     89 	uint16_t sizes[UGEN_NISORFRMS];
     90 };
     91 
     92 struct ugen_endpoint {
     93 	struct ugen_softc *sc;
     94 	usb_endpoint_descriptor_t *edesc;
     95 	struct usbd_interface *iface;
     96 	int state;
     97 #define	UGEN_ASLP	0x02	/* waiting for data */
     98 #define UGEN_SHORT_OK	0x04	/* short xfers are OK */
     99 #define UGEN_BULK_RA	0x08	/* in bulk read-ahead mode */
    100 #define UGEN_BULK_WB	0x10	/* in bulk write-behind mode */
    101 #define UGEN_RA_WB_STOP	0x20	/* RA/WB xfer is stopped (buffer full/empty) */
    102 	struct usbd_pipe *pipeh;
    103 	struct clist q;
    104 	u_char *ibuf;		/* start of buffer (circular for isoc) */
    105 	u_char *fill;		/* location for input (isoc) */
    106 	u_char *limit;		/* end of circular buffer (isoc) */
    107 	u_char *cur;		/* current read location (isoc) */
    108 	uint32_t timeout;
    109 	uint32_t ra_wb_bufsize; /* requested size for RA/WB buffer */
    110 	uint32_t ra_wb_reqsize; /* requested xfer length for RA/WB */
    111 	uint32_t ra_wb_used;	 /* how much is in buffer */
    112 	uint32_t ra_wb_xferlen; /* current xfer length for RA/WB */
    113 	struct usbd_xfer *ra_wb_xfer;
    114 	struct isoreq isoreqs[UGEN_NISOREQS];
    115 	/* Keep these last; we don't overwrite them in ugen_set_config() */
    116 #define UGEN_ENDPOINT_NONZERO_CRUFT	offsetof(struct ugen_endpoint, rsel)
    117 	struct selinfo rsel;
    118 	kcondvar_t cv;
    119 };
    120 
    121 struct ugen_softc {
    122 	device_t sc_dev;		/* base device */
    123 	struct usbd_device *sc_udev;
    124 
    125 	kmutex_t		sc_lock;
    126 	kcondvar_t		sc_detach_cv;
    127 
    128 	char sc_is_open[USB_MAX_ENDPOINTS];
    129 	struct ugen_endpoint sc_endpoints[USB_MAX_ENDPOINTS][2];
    130 #define OUT 0
    131 #define IN  1
    132 
    133 	int sc_refcnt;
    134 	char sc_buffer[UGEN_BBSIZE];
    135 	u_char sc_dying;
    136 };
    137 
    138 dev_type_open(ugenopen);
    139 dev_type_close(ugenclose);
    140 dev_type_read(ugenread);
    141 dev_type_write(ugenwrite);
    142 dev_type_ioctl(ugenioctl);
    143 dev_type_poll(ugenpoll);
    144 dev_type_kqfilter(ugenkqfilter);
    145 
    146 const struct cdevsw ugen_cdevsw = {
    147 	.d_open = ugenopen,
    148 	.d_close = ugenclose,
    149 	.d_read = ugenread,
    150 	.d_write = ugenwrite,
    151 	.d_ioctl = ugenioctl,
    152 	.d_stop = nostop,
    153 	.d_tty = notty,
    154 	.d_poll = ugenpoll,
    155 	.d_mmap = nommap,
    156 	.d_kqfilter = ugenkqfilter,
    157 	.d_discard = nodiscard,
    158 	.d_flag = D_OTHER,
    159 };
    160 
    161 Static void ugenintr(struct usbd_xfer *, void *,
    162 		     usbd_status);
    163 Static void ugen_isoc_rintr(struct usbd_xfer *, void *,
    164 			    usbd_status);
    165 Static void ugen_bulkra_intr(struct usbd_xfer *, void *,
    166 			     usbd_status);
    167 Static void ugen_bulkwb_intr(struct usbd_xfer *, void *,
    168 			     usbd_status);
    169 Static int ugen_do_read(struct ugen_softc *, int, struct uio *, int);
    170 Static int ugen_do_write(struct ugen_softc *, int, struct uio *, int);
    171 Static int ugen_do_ioctl(struct ugen_softc *, int, u_long,
    172 			 void *, int, struct lwp *);
    173 Static int ugen_set_config(struct ugen_softc *, int);
    174 Static usb_config_descriptor_t *ugen_get_cdesc(struct ugen_softc *,
    175 					       int, int *);
    176 Static usbd_status ugen_set_interface(struct ugen_softc *, int, int);
    177 Static int ugen_get_alt_index(struct ugen_softc *, int);
    178 Static void ugen_clear_endpoints(struct ugen_softc *);
    179 
    180 #define UGENUNIT(n) ((minor(n) >> 4) & 0xf)
    181 #define UGENENDPOINT(n) (minor(n) & 0xf)
    182 #define UGENDEV(u, e) (makedev(0, ((u) << 4) | (e)))
    183 
    184 int	ugen_match(device_t, cfdata_t, void *);
    185 void	ugen_attach(device_t, device_t, void *);
    186 int	ugen_detach(device_t, int);
    187 int	ugen_activate(device_t, enum devact);
    188 extern struct cfdriver ugen_cd;
    189 CFATTACH_DECL_NEW(ugen, sizeof(struct ugen_softc), ugen_match, ugen_attach,
    190     ugen_detach, ugen_activate);
    191 
    192 /* toggle to control attach priority. -1 means "let autoconf decide" */
    193 int ugen_override = -1;
    194 
    195 int
    196 ugen_match(device_t parent, cfdata_t match, void *aux)
    197 {
    198 	struct usb_attach_arg *uaa = aux;
    199 	int override;
    200 
    201 	if (ugen_override != -1)
    202 		override = ugen_override;
    203 	else
    204 		override = match->cf_flags & 1;
    205 
    206 	if (override)
    207 		return UMATCH_HIGHEST;
    208 	else if (uaa->uaa_usegeneric)
    209 		return UMATCH_GENERIC;
    210 	else
    211 		return UMATCH_NONE;
    212 }
    213 
    214 void
    215 ugen_attach(device_t parent, device_t self, void *aux)
    216 {
    217 	struct ugen_softc *sc = device_private(self);
    218 	struct usb_attach_arg *uaa = aux;
    219 	struct usbd_device *udev;
    220 	char *devinfop;
    221 	usbd_status err;
    222 	int i, dir, conf;
    223 
    224 	aprint_naive("\n");
    225 	aprint_normal("\n");
    226 
    227 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_SOFTUSB);
    228 	cv_init(&sc->sc_detach_cv, "ugendet");
    229 
    230 	devinfop = usbd_devinfo_alloc(uaa->uaa_device, 0);
    231 	aprint_normal_dev(self, "%s\n", devinfop);
    232 	usbd_devinfo_free(devinfop);
    233 
    234 	sc->sc_dev = self;
    235 	sc->sc_udev = udev = uaa->uaa_device;
    236 
    237 	for (i = 0; i < USB_MAX_ENDPOINTS; i++) {
    238 		for (dir = OUT; dir <= IN; dir++) {
    239 			struct ugen_endpoint *sce;
    240 
    241 			sce = &sc->sc_endpoints[i][dir];
    242 			selinit(&sce->rsel);
    243 			cv_init(&sce->cv, "ugensce");
    244 		}
    245 	}
    246 
    247 	/* First set configuration index 0, the default one for ugen. */
    248 	err = usbd_set_config_index(udev, 0, 0);
    249 	if (err) {
    250 		aprint_error_dev(self,
    251 		    "setting configuration index 0 failed\n");
    252 		sc->sc_dying = 1;
    253 		return;
    254 	}
    255 	conf = usbd_get_config_descriptor(udev)->bConfigurationValue;
    256 
    257 	/* Set up all the local state for this configuration. */
    258 	err = ugen_set_config(sc, conf);
    259 	if (err) {
    260 		aprint_error_dev(self, "setting configuration %d failed\n",
    261 		    conf);
    262 		sc->sc_dying = 1;
    263 		return;
    264 	}
    265 
    266 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev, sc->sc_dev);
    267 
    268 	if (!pmf_device_register(self, NULL, NULL))
    269 		aprint_error_dev(self, "couldn't establish power handler\n");
    270 
    271 	return;
    272 }
    273 
    274 Static void
    275 ugen_clear_endpoints(struct ugen_softc *sc)
    276 {
    277 
    278 	/* Clear out the old info, but leave the selinfo and cv initialised. */
    279 	for (int i = 0; i < USB_MAX_ENDPOINTS; i++) {
    280 		for (int dir = OUT; dir <= IN; dir++) {
    281 			struct ugen_endpoint *sce = &sc->sc_endpoints[i][dir];
    282 			memset(sce, 0, UGEN_ENDPOINT_NONZERO_CRUFT);
    283 		}
    284 	}
    285 }
    286 
    287 Static int
    288 ugen_set_config(struct ugen_softc *sc, int configno)
    289 {
    290 	struct usbd_device *dev = sc->sc_udev;
    291 	usb_config_descriptor_t *cdesc;
    292 	struct usbd_interface *iface;
    293 	usb_endpoint_descriptor_t *ed;
    294 	struct ugen_endpoint *sce;
    295 	uint8_t niface, nendpt;
    296 	int ifaceno, endptno, endpt;
    297 	usbd_status err;
    298 	int dir;
    299 
    300 	DPRINTFN(1,("ugen_set_config: %s to configno %d, sc=%p\n",
    301 		    device_xname(sc->sc_dev), configno, sc));
    302 
    303 	/*
    304 	 * We start at 1, not 0, because we don't care whether the
    305 	 * control endpoint is open or not. It is always present.
    306 	 */
    307 	for (endptno = 1; endptno < USB_MAX_ENDPOINTS; endptno++)
    308 		if (sc->sc_is_open[endptno]) {
    309 			DPRINTFN(1,
    310 			     ("ugen_set_config: %s - endpoint %d is open\n",
    311 			      device_xname(sc->sc_dev), endptno));
    312 			return USBD_IN_USE;
    313 		}
    314 
    315 	/* Avoid setting the current value. */
    316 	cdesc = usbd_get_config_descriptor(dev);
    317 	if (!cdesc || cdesc->bConfigurationValue != configno) {
    318 		err = usbd_set_config_no(dev, configno, 1);
    319 		if (err)
    320 			return err;
    321 	}
    322 
    323 	err = usbd_interface_count(dev, &niface);
    324 	if (err)
    325 		return err;
    326 
    327 	ugen_clear_endpoints(sc);
    328 
    329 	for (ifaceno = 0; ifaceno < niface; ifaceno++) {
    330 		DPRINTFN(1,("ugen_set_config: ifaceno %d\n", ifaceno));
    331 		err = usbd_device2interface_handle(dev, ifaceno, &iface);
    332 		if (err)
    333 			return err;
    334 		err = usbd_endpoint_count(iface, &nendpt);
    335 		if (err)
    336 			return err;
    337 		for (endptno = 0; endptno < nendpt; endptno++) {
    338 			ed = usbd_interface2endpoint_descriptor(iface,endptno);
    339 			KASSERT(ed != NULL);
    340 			endpt = ed->bEndpointAddress;
    341 			dir = UE_GET_DIR(endpt) == UE_DIR_IN ? IN : OUT;
    342 			sce = &sc->sc_endpoints[UE_GET_ADDR(endpt)][dir];
    343 			DPRINTFN(1,("ugen_set_config: endptno %d, endpt=0x%02x"
    344 				    "(%d,%d), sce=%p\n",
    345 				    endptno, endpt, UE_GET_ADDR(endpt),
    346 				    UE_GET_DIR(endpt), sce));
    347 			sce->sc = sc;
    348 			sce->edesc = ed;
    349 			sce->iface = iface;
    350 		}
    351 	}
    352 	return USBD_NORMAL_COMPLETION;
    353 }
    354 
    355 int
    356 ugenopen(dev_t dev, int flag, int mode, struct lwp *l)
    357 {
    358 	struct ugen_softc *sc;
    359 	int unit = UGENUNIT(dev);
    360 	int endpt = UGENENDPOINT(dev);
    361 	usb_endpoint_descriptor_t *edesc;
    362 	struct ugen_endpoint *sce;
    363 	int dir, isize;
    364 	usbd_status err;
    365 	struct usbd_xfer *xfer;
    366 	int i, j;
    367 
    368 	sc = device_lookup_private(&ugen_cd, unit);
    369 	if (sc == NULL)
    370 		return ENXIO;
    371 
    372 	DPRINTFN(5, ("ugenopen: flag=%d, mode=%d, unit=%d endpt=%d\n",
    373 		     flag, mode, unit, endpt));
    374 
    375 	if (sc == NULL || sc->sc_dying)
    376 		return ENXIO;
    377 
    378 	/* The control endpoint allows multiple opens. */
    379 	if (endpt == USB_CONTROL_ENDPOINT) {
    380 		sc->sc_is_open[USB_CONTROL_ENDPOINT] = 1;
    381 		return 0;
    382 	}
    383 
    384 	if (sc->sc_is_open[endpt])
    385 		return EBUSY;
    386 
    387 	/* Make sure there are pipes for all directions. */
    388 	for (dir = OUT; dir <= IN; dir++) {
    389 		if (flag & (dir == OUT ? FWRITE : FREAD)) {
    390 			sce = &sc->sc_endpoints[endpt][dir];
    391 			if (sce->edesc == NULL)
    392 				return ENXIO;
    393 		}
    394 	}
    395 
    396 	/* Actually open the pipes. */
    397 	/* XXX Should back out properly if it fails. */
    398 	for (dir = OUT; dir <= IN; dir++) {
    399 		if (!(flag & (dir == OUT ? FWRITE : FREAD)))
    400 			continue;
    401 		sce = &sc->sc_endpoints[endpt][dir];
    402 		sce->state = 0;
    403 		sce->timeout = USBD_NO_TIMEOUT;
    404 		DPRINTFN(5, ("ugenopen: sc=%p, endpt=%d, dir=%d, sce=%p\n",
    405 			     sc, endpt, dir, sce));
    406 		edesc = sce->edesc;
    407 		switch (edesc->bmAttributes & UE_XFERTYPE) {
    408 		case UE_INTERRUPT:
    409 			if (dir == OUT) {
    410 				err = usbd_open_pipe(sce->iface,
    411 				    edesc->bEndpointAddress, 0, &sce->pipeh);
    412 				if (err)
    413 					return EIO;
    414 				break;
    415 			}
    416 			isize = UGETW(edesc->wMaxPacketSize);
    417 			if (isize == 0)	/* shouldn't happen */
    418 				return EINVAL;
    419 			sce->ibuf = kmem_alloc(isize, KM_SLEEP);
    420 			DPRINTFN(5, ("ugenopen: intr endpt=%d,isize=%d\n",
    421 				     endpt, isize));
    422 			if (clalloc(&sce->q, UGEN_IBSIZE, 0) == -1) {
    423 				kmem_free(sce->ibuf, isize);
    424 				sce->ibuf = NULL;
    425 				return ENOMEM;
    426 			}
    427 			err = usbd_open_pipe_intr(sce->iface,
    428 				  edesc->bEndpointAddress,
    429 				  USBD_SHORT_XFER_OK, &sce->pipeh, sce,
    430 				  sce->ibuf, isize, ugenintr,
    431 				  USBD_DEFAULT_INTERVAL);
    432 			if (err) {
    433 				clfree(&sce->q);
    434 				kmem_free(sce->ibuf, isize);
    435 				sce->ibuf = NULL;
    436 				return EIO;
    437 			}
    438 			DPRINTFN(5, ("ugenopen: interrupt open done\n"));
    439 			break;
    440 		case UE_BULK:
    441 			err = usbd_open_pipe(sce->iface,
    442 				  edesc->bEndpointAddress, 0, &sce->pipeh);
    443 			if (err)
    444 				return EIO;
    445 			sce->ra_wb_bufsize = UGEN_BULK_RA_WB_BUFSIZE;
    446 			/*
    447 			 * Use request size for non-RA/WB transfers
    448 			 * as the default.
    449 			 */
    450 			sce->ra_wb_reqsize = UGEN_BBSIZE;
    451 			break;
    452 		case UE_ISOCHRONOUS:
    453 			if (dir == OUT)
    454 				return EINVAL;
    455 			isize = UGETW(edesc->wMaxPacketSize);
    456 			if (isize == 0)	/* shouldn't happen */
    457 				return EINVAL;
    458 			sce->ibuf = kmem_alloc(isize * UGEN_NISOFRAMES,
    459 				KM_SLEEP);
    460 			sce->cur = sce->fill = sce->ibuf;
    461 			sce->limit = sce->ibuf + isize * UGEN_NISOFRAMES;
    462 			DPRINTFN(5, ("ugenopen: isoc endpt=%d, isize=%d\n",
    463 				     endpt, isize));
    464 			err = usbd_open_pipe(sce->iface,
    465 				  edesc->bEndpointAddress, 0, &sce->pipeh);
    466 			if (err) {
    467 				kmem_free(sce->ibuf, isize * UGEN_NISOFRAMES);
    468 				sce->ibuf = NULL;
    469 				return EIO;
    470 			}
    471 			for (i = 0; i < UGEN_NISOREQS; ++i) {
    472 				sce->isoreqs[i].sce = sce;
    473 				err = usbd_create_xfer(sce->pipeh,
    474 				    isize * UGEN_NISORFRMS, 0, UGEN_NISORFRMS,
    475 				    &xfer);
    476 				if (err)
    477 					goto bad;
    478 				sce->isoreqs[i].xfer = xfer;
    479 				sce->isoreqs[i].dmabuf = usbd_get_buffer(xfer);
    480 				for (j = 0; j < UGEN_NISORFRMS; ++j)
    481 					sce->isoreqs[i].sizes[j] = isize;
    482 				usbd_setup_isoc_xfer(xfer, &sce->isoreqs[i],
    483 				    sce->isoreqs[i].sizes, UGEN_NISORFRMS, 0,
    484 				    ugen_isoc_rintr);
    485 				(void)usbd_transfer(xfer);
    486 			}
    487 			DPRINTFN(5, ("ugenopen: isoc open done\n"));
    488 			break;
    489 		bad:
    490 			while (--i >= 0) /* implicit buffer free */
    491 				usbd_destroy_xfer(sce->isoreqs[i].xfer);
    492 			usbd_close_pipe(sce->pipeh);
    493 			sce->pipeh = NULL;
    494 			kmem_free(sce->ibuf, isize * UGEN_NISOFRAMES);
    495 			sce->ibuf = NULL;
    496 			return ENOMEM;
    497 		case UE_CONTROL:
    498 			sce->timeout = USBD_DEFAULT_TIMEOUT;
    499 			return EINVAL;
    500 		}
    501 	}
    502 	sc->sc_is_open[endpt] = 1;
    503 	return 0;
    504 }
    505 
    506 int
    507 ugenclose(dev_t dev, int flag, int mode, struct lwp *l)
    508 {
    509 	int endpt = UGENENDPOINT(dev);
    510 	struct ugen_softc *sc;
    511 	struct ugen_endpoint *sce;
    512 	int dir;
    513 	int i;
    514 
    515 	sc = device_lookup_private(& ugen_cd, UGENUNIT(dev));
    516 	if (sc == NULL)
    517 		return ENXIO;
    518 
    519 	DPRINTFN(5, ("ugenclose: flag=%d, mode=%d, unit=%d, endpt=%d\n",
    520 		     flag, mode, UGENUNIT(dev), endpt));
    521 
    522 #ifdef DIAGNOSTIC
    523 	if (!sc->sc_is_open[endpt]) {
    524 		printf("ugenclose: not open\n");
    525 		return EINVAL;
    526 	}
    527 #endif
    528 
    529 	if (endpt == USB_CONTROL_ENDPOINT) {
    530 		DPRINTFN(5, ("ugenclose: close control\n"));
    531 		sc->sc_is_open[endpt] = 0;
    532 		return 0;
    533 	}
    534 
    535 	for (dir = OUT; dir <= IN; dir++) {
    536 		if (!(flag & (dir == OUT ? FWRITE : FREAD)))
    537 			continue;
    538 		sce = &sc->sc_endpoints[endpt][dir];
    539 		if (sce->pipeh == NULL)
    540 			continue;
    541 		DPRINTFN(5, ("ugenclose: endpt=%d dir=%d sce=%p\n",
    542 			     endpt, dir, sce));
    543 
    544 		usbd_abort_pipe(sce->pipeh);
    545 
    546 		int isize = UGETW(sce->edesc->wMaxPacketSize);
    547 		int msize = 0;
    548 
    549 		switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
    550 		case UE_INTERRUPT:
    551 			ndflush(&sce->q, sce->q.c_cc);
    552 			clfree(&sce->q);
    553 			msize = isize;
    554 			break;
    555 		case UE_ISOCHRONOUS:
    556 			for (i = 0; i < UGEN_NISOREQS; ++i)
    557 				usbd_destroy_xfer(sce->isoreqs[i].xfer);
    558 			msize = isize * UGEN_NISOFRAMES;
    559 			break;
    560 		case UE_BULK:
    561 			if (sce->state & (UGEN_BULK_RA | UGEN_BULK_WB)) {
    562 				usbd_destroy_xfer(sce->ra_wb_xfer);
    563 				msize = sce->ra_wb_bufsize;
    564 			}
    565 			break;
    566 		default:
    567 			break;
    568 		}
    569 		usbd_close_pipe(sce->pipeh);
    570 		sce->pipeh = NULL;
    571 		if (sce->ibuf != NULL) {
    572 			kmem_free(sce->ibuf, msize);
    573 			sce->ibuf = NULL;
    574 		}
    575 	}
    576 	sc->sc_is_open[endpt] = 0;
    577 
    578 	return 0;
    579 }
    580 
    581 Static int
    582 ugen_do_read(struct ugen_softc *sc, int endpt, struct uio *uio, int flag)
    583 {
    584 	struct ugen_endpoint *sce = &sc->sc_endpoints[endpt][IN];
    585 	uint32_t n, tn;
    586 	struct usbd_xfer *xfer;
    587 	usbd_status err;
    588 	int error = 0;
    589 
    590 	DPRINTFN(5, ("%s: ugenread: %d\n", device_xname(sc->sc_dev), endpt));
    591 
    592 	if (sc->sc_dying)
    593 		return EIO;
    594 
    595 	if (endpt == USB_CONTROL_ENDPOINT)
    596 		return ENODEV;
    597 
    598 #ifdef DIAGNOSTIC
    599 	if (sce->edesc == NULL) {
    600 		printf("ugenread: no edesc\n");
    601 		return EIO;
    602 	}
    603 	if (sce->pipeh == NULL) {
    604 		printf("ugenread: no pipe\n");
    605 		return EIO;
    606 	}
    607 #endif
    608 
    609 	switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
    610 	case UE_INTERRUPT:
    611 		/* Block until activity occurred. */
    612 		mutex_enter(&sc->sc_lock);
    613 		while (sce->q.c_cc == 0) {
    614 			if (flag & IO_NDELAY) {
    615 				mutex_exit(&sc->sc_lock);
    616 				return EWOULDBLOCK;
    617 			}
    618 			sce->state |= UGEN_ASLP;
    619 			DPRINTFN(5, ("ugenread: sleep on %p\n", sce));
    620 			/* "ugenri" */
    621 			error = cv_timedwait_sig(&sce->cv, &sc->sc_lock,
    622 			    mstohz(sce->timeout));
    623 			DPRINTFN(5, ("ugenread: woke, error=%d\n", error));
    624 			if (sc->sc_dying)
    625 				error = EIO;
    626 			if (error) {
    627 				sce->state &= ~UGEN_ASLP;
    628 				break;
    629 			}
    630 		}
    631 		mutex_exit(&sc->sc_lock);
    632 
    633 		/* Transfer as many chunks as possible. */
    634 		while (sce->q.c_cc > 0 && uio->uio_resid > 0 && !error) {
    635 			n = min(sce->q.c_cc, uio->uio_resid);
    636 			if (n > sizeof(sc->sc_buffer))
    637 				n = sizeof(sc->sc_buffer);
    638 
    639 			/* Remove a small chunk from the input queue. */
    640 			q_to_b(&sce->q, sc->sc_buffer, n);
    641 			DPRINTFN(5, ("ugenread: got %d chars\n", n));
    642 
    643 			/* Copy the data to the user process. */
    644 			error = uiomove(sc->sc_buffer, n, uio);
    645 			if (error)
    646 				break;
    647 		}
    648 		break;
    649 	case UE_BULK:
    650 		if (sce->state & UGEN_BULK_RA) {
    651 			DPRINTFN(5, ("ugenread: BULK_RA req: %zd used: %d\n",
    652 				     uio->uio_resid, sce->ra_wb_used));
    653 			xfer = sce->ra_wb_xfer;
    654 
    655 			mutex_enter(&sc->sc_lock);
    656 			if (sce->ra_wb_used == 0 && flag & IO_NDELAY) {
    657 				mutex_exit(&sc->sc_lock);
    658 				return EWOULDBLOCK;
    659 			}
    660 			while (uio->uio_resid > 0 && !error) {
    661 				while (sce->ra_wb_used == 0) {
    662 					sce->state |= UGEN_ASLP;
    663 					DPRINTFN(5,
    664 						 ("ugenread: sleep on %p\n",
    665 						  sce));
    666 					/* "ugenrb" */
    667 					error = cv_timedwait_sig(&sce->cv,
    668 					    &sc->sc_lock, mstohz(sce->timeout));
    669 					DPRINTFN(5,
    670 						 ("ugenread: woke, error=%d\n",
    671 						  error));
    672 					if (sc->sc_dying)
    673 						error = EIO;
    674 					if (error) {
    675 						sce->state &= ~UGEN_ASLP;
    676 						break;
    677 					}
    678 				}
    679 
    680 				/* Copy data to the process. */
    681 				while (uio->uio_resid > 0
    682 				       && sce->ra_wb_used > 0) {
    683 					n = min(uio->uio_resid,
    684 						sce->ra_wb_used);
    685 					n = min(n, sce->limit - sce->cur);
    686 					error = uiomove(sce->cur, n, uio);
    687 					if (error)
    688 						break;
    689 					sce->cur += n;
    690 					sce->ra_wb_used -= n;
    691 					if (sce->cur == sce->limit)
    692 						sce->cur = sce->ibuf;
    693 				}
    694 
    695 				/*
    696 				 * If the transfers stopped because the
    697 				 * buffer was full, restart them.
    698 				 */
    699 				if (sce->state & UGEN_RA_WB_STOP &&
    700 				    sce->ra_wb_used < sce->limit - sce->ibuf) {
    701 					n = (sce->limit - sce->ibuf)
    702 					    - sce->ra_wb_used;
    703 					usbd_setup_xfer(xfer, sce, NULL,
    704 					    min(n, sce->ra_wb_xferlen),
    705 					    0, USBD_NO_TIMEOUT,
    706 					    ugen_bulkra_intr);
    707 					sce->state &= ~UGEN_RA_WB_STOP;
    708 					err = usbd_transfer(xfer);
    709 					if (err != USBD_IN_PROGRESS)
    710 						/*
    711 						 * The transfer has not been
    712 						 * queued.  Setting STOP
    713 						 * will make us try
    714 						 * again at the next read.
    715 						 */
    716 						sce->state |= UGEN_RA_WB_STOP;
    717 				}
    718 			}
    719 			mutex_exit(&sc->sc_lock);
    720 			break;
    721 		}
    722 		error = usbd_create_xfer(sce->pipeh, UGEN_BBSIZE,
    723 		    sce->state & UGEN_SHORT_OK ? USBD_SHORT_XFER_OK : 0,
    724 		    0, &xfer);
    725 		if (error)
    726 			return error;
    727 		while ((n = min(UGEN_BBSIZE, uio->uio_resid)) != 0) {
    728 			DPRINTFN(1, ("ugenread: start transfer %d bytes\n",n));
    729 			tn = n;
    730 			err = usbd_bulk_transfer(xfer, sce->pipeh,
    731 			    sce->state & UGEN_SHORT_OK ? USBD_SHORT_XFER_OK : 0,
    732 			    sce->timeout, sc->sc_buffer, &tn);
    733 			if (err) {
    734 				if (err == USBD_INTERRUPTED)
    735 					error = EINTR;
    736 				else if (err == USBD_TIMEOUT)
    737 					error = ETIMEDOUT;
    738 				else
    739 					error = EIO;
    740 				break;
    741 			}
    742 			DPRINTFN(1, ("ugenread: got %d bytes\n", tn));
    743 			error = uiomove(sc->sc_buffer, tn, uio);
    744 			if (error || tn < n)
    745 				break;
    746 		}
    747 		usbd_destroy_xfer(xfer);
    748 		break;
    749 	case UE_ISOCHRONOUS:
    750 		mutex_enter(&sc->sc_lock);
    751 		while (sce->cur == sce->fill) {
    752 			if (flag & IO_NDELAY) {
    753 				mutex_exit(&sc->sc_lock);
    754 				return EWOULDBLOCK;
    755 			}
    756 			sce->state |= UGEN_ASLP;
    757 			/* "ugenri" */
    758 			DPRINTFN(5, ("ugenread: sleep on %p\n", sce));
    759 			error = cv_timedwait_sig(&sce->cv, &sc->sc_lock,
    760 			    mstohz(sce->timeout));
    761 			DPRINTFN(5, ("ugenread: woke, error=%d\n", error));
    762 			if (sc->sc_dying)
    763 				error = EIO;
    764 			if (error) {
    765 				sce->state &= ~UGEN_ASLP;
    766 				break;
    767 			}
    768 		}
    769 
    770 		while (sce->cur != sce->fill && uio->uio_resid > 0 && !error) {
    771 			if(sce->fill > sce->cur)
    772 				n = min(sce->fill - sce->cur, uio->uio_resid);
    773 			else
    774 				n = min(sce->limit - sce->cur, uio->uio_resid);
    775 
    776 			DPRINTFN(5, ("ugenread: isoc got %d chars\n", n));
    777 
    778 			/* Copy the data to the user process. */
    779 			error = uiomove(sce->cur, n, uio);
    780 			if (error)
    781 				break;
    782 			sce->cur += n;
    783 			if (sce->cur >= sce->limit)
    784 				sce->cur = sce->ibuf;
    785 		}
    786 		mutex_exit(&sc->sc_lock);
    787 		break;
    788 
    789 
    790 	default:
    791 		return ENXIO;
    792 	}
    793 	return error;
    794 }
    795 
    796 int
    797 ugenread(dev_t dev, struct uio *uio, int flag)
    798 {
    799 	int endpt = UGENENDPOINT(dev);
    800 	struct ugen_softc *sc;
    801 	int error;
    802 
    803 	sc = device_lookup_private(& ugen_cd, UGENUNIT(dev));
    804 	if (sc == NULL)
    805 		return ENXIO;
    806 
    807 	mutex_enter(&sc->sc_lock);
    808 	sc->sc_refcnt++;
    809 	mutex_exit(&sc->sc_lock);
    810 
    811 	error = ugen_do_read(sc, endpt, uio, flag);
    812 
    813 	mutex_enter(&sc->sc_lock);
    814 	if (--sc->sc_refcnt < 0)
    815 		usb_detach_broadcast(sc->sc_dev, &sc->sc_detach_cv);
    816 	mutex_exit(&sc->sc_lock);
    817 
    818 	return error;
    819 }
    820 
    821 Static int
    822 ugen_do_write(struct ugen_softc *sc, int endpt, struct uio *uio,
    823 	int flag)
    824 {
    825 	struct ugen_endpoint *sce = &sc->sc_endpoints[endpt][OUT];
    826 	uint32_t n;
    827 	int error = 0;
    828 	uint32_t tn;
    829 	char *dbuf;
    830 	struct usbd_xfer *xfer;
    831 	usbd_status err;
    832 
    833 	DPRINTFN(5, ("%s: ugenwrite: %d\n", device_xname(sc->sc_dev), endpt));
    834 
    835 	if (sc->sc_dying)
    836 		return EIO;
    837 
    838 	if (endpt == USB_CONTROL_ENDPOINT)
    839 		return ENODEV;
    840 
    841 #ifdef DIAGNOSTIC
    842 	if (sce->edesc == NULL) {
    843 		printf("ugenwrite: no edesc\n");
    844 		return EIO;
    845 	}
    846 	if (sce->pipeh == NULL) {
    847 		printf("ugenwrite: no pipe\n");
    848 		return EIO;
    849 	}
    850 #endif
    851 
    852 	switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
    853 	case UE_BULK:
    854 		if (sce->state & UGEN_BULK_WB) {
    855 			DPRINTFN(5, ("ugenwrite: BULK_WB req: %zd used: %d\n",
    856 				     uio->uio_resid, sce->ra_wb_used));
    857 			xfer = sce->ra_wb_xfer;
    858 
    859 			mutex_enter(&sc->sc_lock);
    860 			if (sce->ra_wb_used == sce->limit - sce->ibuf &&
    861 			    flag & IO_NDELAY) {
    862 				mutex_exit(&sc->sc_lock);
    863 				return EWOULDBLOCK;
    864 			}
    865 			while (uio->uio_resid > 0 && !error) {
    866 				while (sce->ra_wb_used ==
    867 				       sce->limit - sce->ibuf) {
    868 					sce->state |= UGEN_ASLP;
    869 					DPRINTFN(5,
    870 						 ("ugenwrite: sleep on %p\n",
    871 						  sce));
    872 					/* "ugenwb" */
    873 					error = cv_timedwait_sig(&sce->cv,
    874 					    &sc->sc_lock, mstohz(sce->timeout));
    875 					DPRINTFN(5,
    876 						 ("ugenwrite: woke, error=%d\n",
    877 						  error));
    878 					if (sc->sc_dying)
    879 						error = EIO;
    880 					if (error) {
    881 						sce->state &= ~UGEN_ASLP;
    882 						break;
    883 					}
    884 				}
    885 
    886 				/* Copy data from the process. */
    887 				while (uio->uio_resid > 0 &&
    888 				    sce->ra_wb_used < sce->limit - sce->ibuf) {
    889 					n = min(uio->uio_resid,
    890 						(sce->limit - sce->ibuf)
    891 						 - sce->ra_wb_used);
    892 					n = min(n, sce->limit - sce->fill);
    893 					error = uiomove(sce->fill, n, uio);
    894 					if (error)
    895 						break;
    896 					sce->fill += n;
    897 					sce->ra_wb_used += n;
    898 					if (sce->fill == sce->limit)
    899 						sce->fill = sce->ibuf;
    900 				}
    901 
    902 				/*
    903 				 * If the transfers stopped because the
    904 				 * buffer was empty, restart them.
    905 				 */
    906 				if (sce->state & UGEN_RA_WB_STOP &&
    907 				    sce->ra_wb_used > 0) {
    908 					dbuf = (char *)usbd_get_buffer(xfer);
    909 					n = min(sce->ra_wb_used,
    910 						sce->ra_wb_xferlen);
    911 					tn = min(n, sce->limit - sce->cur);
    912 					memcpy(dbuf, sce->cur, tn);
    913 					dbuf += tn;
    914 					if (n - tn > 0)
    915 						memcpy(dbuf, sce->ibuf,
    916 						       n - tn);
    917 					usbd_setup_xfer(xfer, sce, NULL, n,
    918 					    0, USBD_NO_TIMEOUT,
    919 					    ugen_bulkwb_intr);
    920 					sce->state &= ~UGEN_RA_WB_STOP;
    921 					err = usbd_transfer(xfer);
    922 					if (err != USBD_IN_PROGRESS)
    923 						/*
    924 						 * The transfer has not been
    925 						 * queued.  Setting STOP
    926 						 * will make us try again
    927 						 * at the next read.
    928 						 */
    929 						sce->state |= UGEN_RA_WB_STOP;
    930 				}
    931 			}
    932 			mutex_exit(&sc->sc_lock);
    933 			break;
    934 		}
    935 		error = usbd_create_xfer(sce->pipeh, UGEN_BBSIZE,
    936 		    sce->state & UGEN_SHORT_OK ? USBD_SHORT_XFER_OK : 0,
    937 		    0, &xfer);
    938 		if (error)
    939 			return error;
    940 		while ((n = min(UGEN_BBSIZE, uio->uio_resid)) != 0) {
    941 			error = uiomove(sc->sc_buffer, n, uio);
    942 			if (error)
    943 				break;
    944 			DPRINTFN(1, ("ugenwrite: transfer %d bytes\n", n));
    945 			err = usbd_bulk_transfer(xfer, sce->pipeh, 0, sce->timeout,
    946 			    sc->sc_buffer, &n);
    947 			if (err) {
    948 				if (err == USBD_INTERRUPTED)
    949 					error = EINTR;
    950 				else if (err == USBD_TIMEOUT)
    951 					error = ETIMEDOUT;
    952 				else
    953 					error = EIO;
    954 				break;
    955 			}
    956 		}
    957 		usbd_destroy_xfer(xfer);
    958 		break;
    959 	case UE_INTERRUPT:
    960 		error = usbd_create_xfer(sce->pipeh,
    961 		    UGETW(sce->edesc->wMaxPacketSize), 0, 0, &xfer);
    962 		if (error)
    963 			return error;
    964 		while ((n = min(UGETW(sce->edesc->wMaxPacketSize),
    965 		    uio->uio_resid)) != 0) {
    966 			error = uiomove(sc->sc_buffer, n, uio);
    967 			if (error)
    968 				break;
    969 			DPRINTFN(1, ("ugenwrite: transfer %d bytes\n", n));
    970 			err = usbd_intr_transfer(xfer, sce->pipeh, 0,
    971 			    sce->timeout, sc->sc_buffer, &n);
    972 			if (err) {
    973 				if (err == USBD_INTERRUPTED)
    974 					error = EINTR;
    975 				else if (err == USBD_TIMEOUT)
    976 					error = ETIMEDOUT;
    977 				else
    978 					error = EIO;
    979 				break;
    980 			}
    981 		}
    982 		usbd_destroy_xfer(xfer);
    983 		break;
    984 	default:
    985 		return ENXIO;
    986 	}
    987 	return error;
    988 }
    989 
    990 int
    991 ugenwrite(dev_t dev, struct uio *uio, int flag)
    992 {
    993 	int endpt = UGENENDPOINT(dev);
    994 	struct ugen_softc *sc;
    995 	int error;
    996 
    997 	sc = device_lookup_private(& ugen_cd, UGENUNIT(dev));
    998 	if (sc == NULL)
    999 		return ENXIO;
   1000 
   1001 	mutex_enter(&sc->sc_lock);
   1002 	sc->sc_refcnt++;
   1003 	mutex_exit(&sc->sc_lock);
   1004 
   1005 	error = ugen_do_write(sc, endpt, uio, flag);
   1006 
   1007 	mutex_enter(&sc->sc_lock);
   1008 	if (--sc->sc_refcnt < 0)
   1009 		usb_detach_broadcast(sc->sc_dev, &sc->sc_detach_cv);
   1010 	mutex_exit(&sc->sc_lock);
   1011 
   1012 	return error;
   1013 }
   1014 
   1015 int
   1016 ugen_activate(device_t self, enum devact act)
   1017 {
   1018 	struct ugen_softc *sc = device_private(self);
   1019 
   1020 	switch (act) {
   1021 	case DVACT_DEACTIVATE:
   1022 		sc->sc_dying = 1;
   1023 		return 0;
   1024 	default:
   1025 		return EOPNOTSUPP;
   1026 	}
   1027 }
   1028 
   1029 int
   1030 ugen_detach(device_t self, int flags)
   1031 {
   1032 	struct ugen_softc *sc = device_private(self);
   1033 	struct ugen_endpoint *sce;
   1034 	int i, dir;
   1035 	int maj, mn;
   1036 
   1037 	DPRINTF(("ugen_detach: sc=%p flags=%d\n", sc, flags));
   1038 
   1039 	sc->sc_dying = 1;
   1040 	pmf_device_deregister(self);
   1041 	/* Abort all pipes.  Causes processes waiting for transfer to wake. */
   1042 	for (i = 0; i < USB_MAX_ENDPOINTS; i++) {
   1043 		for (dir = OUT; dir <= IN; dir++) {
   1044 			sce = &sc->sc_endpoints[i][dir];
   1045 			if (sce->pipeh)
   1046 				usbd_abort_pipe(sce->pipeh);
   1047 		}
   1048 	}
   1049 
   1050 	mutex_enter(&sc->sc_lock);
   1051 	if (--sc->sc_refcnt >= 0) {
   1052 		/* Wake everyone */
   1053 		for (i = 0; i < USB_MAX_ENDPOINTS; i++)
   1054 			cv_signal(&sc->sc_endpoints[i][IN].cv);
   1055 		/* Wait for processes to go away. */
   1056 		usb_detach_wait(sc->sc_dev, &sc->sc_detach_cv, &sc->sc_lock);
   1057 	}
   1058 	mutex_exit(&sc->sc_lock);
   1059 
   1060 	/* locate the major number */
   1061 	maj = cdevsw_lookup_major(&ugen_cdevsw);
   1062 
   1063 	/* Nuke the vnodes for any open instances (calls close). */
   1064 	mn = device_unit(self) * USB_MAX_ENDPOINTS;
   1065 	vdevgone(maj, mn, mn + USB_MAX_ENDPOINTS - 1, VCHR);
   1066 
   1067 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, sc->sc_dev);
   1068 
   1069 	for (i = 0; i < USB_MAX_ENDPOINTS; i++) {
   1070 		for (dir = OUT; dir <= IN; dir++) {
   1071 			sce = &sc->sc_endpoints[i][dir];
   1072 			seldestroy(&sce->rsel);
   1073 			cv_destroy(&sce->cv);
   1074 		}
   1075 	}
   1076 
   1077 	cv_destroy(&sc->sc_detach_cv);
   1078 	mutex_destroy(&sc->sc_lock);
   1079 
   1080 	return 0;
   1081 }
   1082 
   1083 Static void
   1084 ugenintr(struct usbd_xfer *xfer, void *addr, usbd_status status)
   1085 {
   1086 	struct ugen_endpoint *sce = addr;
   1087 	struct ugen_softc *sc = sce->sc;
   1088 	uint32_t count;
   1089 	u_char *ibuf;
   1090 
   1091 	if (status == USBD_CANCELLED)
   1092 		return;
   1093 
   1094 	if (status != USBD_NORMAL_COMPLETION) {
   1095 		DPRINTF(("ugenintr: status=%d\n", status));
   1096 		if (status == USBD_STALLED)
   1097 		    usbd_clear_endpoint_stall_async(sce->pipeh);
   1098 		return;
   1099 	}
   1100 
   1101 	usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
   1102 	ibuf = sce->ibuf;
   1103 
   1104 	DPRINTFN(5, ("ugenintr: xfer=%p status=%d count=%d\n",
   1105 		     xfer, status, count));
   1106 	DPRINTFN(5, ("          data = %02x %02x %02x\n",
   1107 		     ibuf[0], ibuf[1], ibuf[2]));
   1108 
   1109 	(void)b_to_q(ibuf, count, &sce->q);
   1110 
   1111 	mutex_enter(&sc->sc_lock);
   1112 	if (sce->state & UGEN_ASLP) {
   1113 		sce->state &= ~UGEN_ASLP;
   1114 		DPRINTFN(5, ("ugen_intr: waking %p\n", sce));
   1115 		cv_signal(&sce->cv);
   1116 	}
   1117 	mutex_exit(&sc->sc_lock);
   1118 	selnotify(&sce->rsel, 0, 0);
   1119 }
   1120 
   1121 Static void
   1122 ugen_isoc_rintr(struct usbd_xfer *xfer, void *addr,
   1123 		usbd_status status)
   1124 {
   1125 	struct isoreq *req = addr;
   1126 	struct ugen_endpoint *sce = req->sce;
   1127 	struct ugen_softc *sc = sce->sc;
   1128 	uint32_t count, n;
   1129 	int i, isize;
   1130 
   1131 	/* Return if we are aborting. */
   1132 	if (status == USBD_CANCELLED)
   1133 		return;
   1134 
   1135 	usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
   1136 	DPRINTFN(5,("ugen_isoc_rintr: xfer %ld, count=%d\n",
   1137 	    (long)(req - sce->isoreqs), count));
   1138 
   1139 	/* throw away oldest input if the buffer is full */
   1140 	if(sce->fill < sce->cur && sce->cur <= sce->fill + count) {
   1141 		sce->cur += count;
   1142 		if(sce->cur >= sce->limit)
   1143 			sce->cur = sce->ibuf + (sce->limit - sce->cur);
   1144 		DPRINTFN(5, ("ugen_isoc_rintr: throwing away %d bytes\n",
   1145 			     count));
   1146 	}
   1147 
   1148 	isize = UGETW(sce->edesc->wMaxPacketSize);
   1149 	for (i = 0; i < UGEN_NISORFRMS; i++) {
   1150 		uint32_t actlen = req->sizes[i];
   1151 		char const *tbuf = (char const *)req->dmabuf + isize * i;
   1152 
   1153 		/* copy data to buffer */
   1154 		while (actlen > 0) {
   1155 			n = min(actlen, sce->limit - sce->fill);
   1156 			memcpy(sce->fill, tbuf, n);
   1157 
   1158 			tbuf += n;
   1159 			actlen -= n;
   1160 			sce->fill += n;
   1161 			if(sce->fill == sce->limit)
   1162 				sce->fill = sce->ibuf;
   1163 		}
   1164 
   1165 		/* setup size for next transfer */
   1166 		req->sizes[i] = isize;
   1167 	}
   1168 
   1169 	usbd_setup_isoc_xfer(xfer, req, req->sizes, UGEN_NISORFRMS, 0,
   1170 	    ugen_isoc_rintr);
   1171 	(void)usbd_transfer(xfer);
   1172 
   1173 	mutex_enter(&sc->sc_lock);
   1174 	if (sce->state & UGEN_ASLP) {
   1175 		sce->state &= ~UGEN_ASLP;
   1176 		DPRINTFN(5, ("ugen_isoc_rintr: waking %p\n", sce));
   1177 		cv_signal(&sce->cv);
   1178 	}
   1179 	mutex_exit(&sc->sc_lock);
   1180 	selnotify(&sce->rsel, 0, 0);
   1181 }
   1182 
   1183 Static void
   1184 ugen_bulkra_intr(struct usbd_xfer *xfer, void *addr,
   1185 		 usbd_status status)
   1186 {
   1187 	struct ugen_endpoint *sce = addr;
   1188 	struct ugen_softc *sc = sce->sc;
   1189 	uint32_t count, n;
   1190 	char const *tbuf;
   1191 	usbd_status err;
   1192 
   1193 	/* Return if we are aborting. */
   1194 	if (status == USBD_CANCELLED)
   1195 		return;
   1196 
   1197 	if (status != USBD_NORMAL_COMPLETION) {
   1198 		DPRINTF(("ugen_bulkra_intr: status=%d\n", status));
   1199 		sce->state |= UGEN_RA_WB_STOP;
   1200 		if (status == USBD_STALLED)
   1201 		    usbd_clear_endpoint_stall_async(sce->pipeh);
   1202 		return;
   1203 	}
   1204 
   1205 	usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
   1206 
   1207 	/* Keep track of how much is in the buffer. */
   1208 	sce->ra_wb_used += count;
   1209 
   1210 	/* Copy data to buffer. */
   1211 	tbuf = (char const *)usbd_get_buffer(sce->ra_wb_xfer);
   1212 	n = min(count, sce->limit - sce->fill);
   1213 	memcpy(sce->fill, tbuf, n);
   1214 	tbuf += n;
   1215 	count -= n;
   1216 	sce->fill += n;
   1217 	if (sce->fill == sce->limit)
   1218 		sce->fill = sce->ibuf;
   1219 	if (count > 0) {
   1220 		memcpy(sce->fill, tbuf, count);
   1221 		sce->fill += count;
   1222 	}
   1223 
   1224 	/* Set up the next request if necessary. */
   1225 	n = (sce->limit - sce->ibuf) - sce->ra_wb_used;
   1226 	if (n > 0) {
   1227 		usbd_setup_xfer(xfer, sce, NULL, min(n, sce->ra_wb_xferlen), 0,
   1228 		    USBD_NO_TIMEOUT, ugen_bulkra_intr);
   1229 		err = usbd_transfer(xfer);
   1230 		if (err != USBD_IN_PROGRESS) {
   1231 			printf("usbd_bulkra_intr: error=%d\n", err);
   1232 			/*
   1233 			 * The transfer has not been queued.  Setting STOP
   1234 			 * will make us try again at the next read.
   1235 			 */
   1236 			sce->state |= UGEN_RA_WB_STOP;
   1237 		}
   1238 	}
   1239 	else
   1240 		sce->state |= UGEN_RA_WB_STOP;
   1241 
   1242 	mutex_enter(&sc->sc_lock);
   1243 	if (sce->state & UGEN_ASLP) {
   1244 		sce->state &= ~UGEN_ASLP;
   1245 		DPRINTFN(5, ("ugen_bulkra_intr: waking %p\n", sce));
   1246 		cv_signal(&sce->cv);
   1247 	}
   1248 	mutex_exit(&sc->sc_lock);
   1249 	selnotify(&sce->rsel, 0, 0);
   1250 }
   1251 
   1252 Static void
   1253 ugen_bulkwb_intr(struct usbd_xfer *xfer, void *addr,
   1254 		 usbd_status status)
   1255 {
   1256 	struct ugen_endpoint *sce = addr;
   1257 	struct ugen_softc *sc = sce->sc;
   1258 	uint32_t count, n;
   1259 	char *tbuf;
   1260 	usbd_status err;
   1261 
   1262 	/* Return if we are aborting. */
   1263 	if (status == USBD_CANCELLED)
   1264 		return;
   1265 
   1266 	if (status != USBD_NORMAL_COMPLETION) {
   1267 		DPRINTF(("ugen_bulkwb_intr: status=%d\n", status));
   1268 		sce->state |= UGEN_RA_WB_STOP;
   1269 		if (status == USBD_STALLED)
   1270 		    usbd_clear_endpoint_stall_async(sce->pipeh);
   1271 		return;
   1272 	}
   1273 
   1274 	usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
   1275 
   1276 	/* Keep track of how much is in the buffer. */
   1277 	sce->ra_wb_used -= count;
   1278 
   1279 	/* Update buffer pointers. */
   1280 	sce->cur += count;
   1281 	if (sce->cur >= sce->limit)
   1282 		sce->cur = sce->ibuf + (sce->cur - sce->limit);
   1283 
   1284 	/* Set up next request if necessary. */
   1285 	if (sce->ra_wb_used > 0) {
   1286 		/* copy data from buffer */
   1287 		tbuf = (char *)usbd_get_buffer(sce->ra_wb_xfer);
   1288 		count = min(sce->ra_wb_used, sce->ra_wb_xferlen);
   1289 		n = min(count, sce->limit - sce->cur);
   1290 		memcpy(tbuf, sce->cur, n);
   1291 		tbuf += n;
   1292 		if (count - n > 0)
   1293 			memcpy(tbuf, sce->ibuf, count - n);
   1294 
   1295 		usbd_setup_xfer(xfer, sce, NULL, count, 0, USBD_NO_TIMEOUT,
   1296 		    ugen_bulkwb_intr);
   1297 		err = usbd_transfer(xfer);
   1298 		if (err != USBD_IN_PROGRESS) {
   1299 			printf("usbd_bulkwb_intr: error=%d\n", err);
   1300 			/*
   1301 			 * The transfer has not been queued.  Setting STOP
   1302 			 * will make us try again at the next write.
   1303 			 */
   1304 			sce->state |= UGEN_RA_WB_STOP;
   1305 		}
   1306 	}
   1307 	else
   1308 		sce->state |= UGEN_RA_WB_STOP;
   1309 
   1310 	mutex_enter(&sc->sc_lock);
   1311 	if (sce->state & UGEN_ASLP) {
   1312 		sce->state &= ~UGEN_ASLP;
   1313 		DPRINTFN(5, ("ugen_bulkwb_intr: waking %p\n", sce));
   1314 		cv_signal(&sce->cv);
   1315 	}
   1316 	mutex_exit(&sc->sc_lock);
   1317 	selnotify(&sce->rsel, 0, 0);
   1318 }
   1319 
   1320 Static usbd_status
   1321 ugen_set_interface(struct ugen_softc *sc, int ifaceidx, int altno)
   1322 {
   1323 	struct usbd_interface *iface;
   1324 	usb_endpoint_descriptor_t *ed;
   1325 	usbd_status err;
   1326 	struct ugen_endpoint *sce;
   1327 	uint8_t niface, nendpt, endptno, endpt;
   1328 	int dir;
   1329 
   1330 	DPRINTFN(15, ("ugen_set_interface %d %d\n", ifaceidx, altno));
   1331 
   1332 	err = usbd_interface_count(sc->sc_udev, &niface);
   1333 	if (err)
   1334 		return err;
   1335 	if (ifaceidx < 0 || ifaceidx >= niface)
   1336 		return USBD_INVAL;
   1337 
   1338 	err = usbd_device2interface_handle(sc->sc_udev, ifaceidx, &iface);
   1339 	if (err)
   1340 		return err;
   1341 	err = usbd_endpoint_count(iface, &nendpt);
   1342 	if (err)
   1343 		return err;
   1344 
   1345 	/* change setting */
   1346 	err = usbd_set_interface(iface, altno);
   1347 	if (err)
   1348 		return err;
   1349 
   1350 	err = usbd_endpoint_count(iface, &nendpt);
   1351 	if (err)
   1352 		return err;
   1353 
   1354 	ugen_clear_endpoints(sc);
   1355 
   1356 	for (endptno = 0; endptno < nendpt; endptno++) {
   1357 		ed = usbd_interface2endpoint_descriptor(iface,endptno);
   1358 		KASSERT(ed != NULL);
   1359 		endpt = ed->bEndpointAddress;
   1360 		dir = UE_GET_DIR(endpt) == UE_DIR_IN ? IN : OUT;
   1361 		sce = &sc->sc_endpoints[UE_GET_ADDR(endpt)][dir];
   1362 		sce->sc = sc;
   1363 		sce->edesc = ed;
   1364 		sce->iface = iface;
   1365 	}
   1366 	return 0;
   1367 }
   1368 
   1369 /* Retrieve a complete descriptor for a certain device and index. */
   1370 Static usb_config_descriptor_t *
   1371 ugen_get_cdesc(struct ugen_softc *sc, int index, int *lenp)
   1372 {
   1373 	usb_config_descriptor_t *cdesc, *tdesc, cdescr;
   1374 	int len;
   1375 	usbd_status err;
   1376 
   1377 	if (index == USB_CURRENT_CONFIG_INDEX) {
   1378 		tdesc = usbd_get_config_descriptor(sc->sc_udev);
   1379 		len = UGETW(tdesc->wTotalLength);
   1380 		if (lenp)
   1381 			*lenp = len;
   1382 		cdesc = kmem_alloc(len, KM_SLEEP);
   1383 		memcpy(cdesc, tdesc, len);
   1384 		DPRINTFN(5,("ugen_get_cdesc: current, len=%d\n", len));
   1385 	} else {
   1386 		err = usbd_get_config_desc(sc->sc_udev, index, &cdescr);
   1387 		if (err)
   1388 			return 0;
   1389 		len = UGETW(cdescr.wTotalLength);
   1390 		DPRINTFN(5,("ugen_get_cdesc: index=%d, len=%d\n", index, len));
   1391 		if (lenp)
   1392 			*lenp = len;
   1393 		cdesc = kmem_alloc(len, KM_SLEEP);
   1394 		err = usbd_get_config_desc_full(sc->sc_udev, index, cdesc, len);
   1395 		if (err) {
   1396 			kmem_free(cdesc, len);
   1397 			return 0;
   1398 		}
   1399 	}
   1400 	return cdesc;
   1401 }
   1402 
   1403 Static int
   1404 ugen_get_alt_index(struct ugen_softc *sc, int ifaceidx)
   1405 {
   1406 	struct usbd_interface *iface;
   1407 	usbd_status err;
   1408 
   1409 	err = usbd_device2interface_handle(sc->sc_udev, ifaceidx, &iface);
   1410 	if (err)
   1411 		return -1;
   1412 	return usbd_get_interface_altindex(iface);
   1413 }
   1414 
   1415 Static int
   1416 ugen_do_ioctl(struct ugen_softc *sc, int endpt, u_long cmd,
   1417 	      void *addr, int flag, struct lwp *l)
   1418 {
   1419 	struct ugen_endpoint *sce;
   1420 	usbd_status err;
   1421 	struct usbd_interface *iface;
   1422 	struct usb_config_desc *cd;
   1423 	usb_config_descriptor_t *cdesc;
   1424 	struct usb_interface_desc *id;
   1425 	usb_interface_descriptor_t *idesc;
   1426 	struct usb_endpoint_desc *ed;
   1427 	usb_endpoint_descriptor_t *edesc;
   1428 	struct usb_alt_interface *ai;
   1429 	struct usb_string_desc *si;
   1430 	uint8_t conf, alt;
   1431 	int cdesclen;
   1432 	int error;
   1433 
   1434 	DPRINTFN(5, ("ugenioctl: cmd=%08lx\n", cmd));
   1435 	if (sc->sc_dying)
   1436 		return EIO;
   1437 
   1438 	switch (cmd) {
   1439 	case FIONBIO:
   1440 		/* All handled in the upper FS layer. */
   1441 		return 0;
   1442 	case USB_SET_SHORT_XFER:
   1443 		if (endpt == USB_CONTROL_ENDPOINT)
   1444 			return EINVAL;
   1445 		/* This flag only affects read */
   1446 		sce = &sc->sc_endpoints[endpt][IN];
   1447 		if (sce == NULL || sce->pipeh == NULL)
   1448 			return EINVAL;
   1449 		if (*(int *)addr)
   1450 			sce->state |= UGEN_SHORT_OK;
   1451 		else
   1452 			sce->state &= ~UGEN_SHORT_OK;
   1453 		return 0;
   1454 	case USB_SET_TIMEOUT:
   1455 		sce = &sc->sc_endpoints[endpt][IN];
   1456 		if (sce == NULL
   1457 		    /* XXX this shouldn't happen, but the distinction between
   1458 		       input and output pipes isn't clear enough.
   1459 		       || sce->pipeh == NULL */
   1460 			)
   1461 			return EINVAL;
   1462 		sce->timeout = *(int *)addr;
   1463 		return 0;
   1464 	case USB_SET_BULK_RA:
   1465 		if (endpt == USB_CONTROL_ENDPOINT)
   1466 			return EINVAL;
   1467 		sce = &sc->sc_endpoints[endpt][IN];
   1468 		if (sce == NULL || sce->pipeh == NULL)
   1469 			return EINVAL;
   1470 		edesc = sce->edesc;
   1471 		if ((edesc->bmAttributes & UE_XFERTYPE) != UE_BULK)
   1472 			return EINVAL;
   1473 
   1474 		if (*(int *)addr) {
   1475 			/* Only turn RA on if it's currently off. */
   1476 			if (sce->state & UGEN_BULK_RA)
   1477 				return 0;
   1478 
   1479 			if (sce->ra_wb_bufsize == 0 || sce->ra_wb_reqsize == 0)
   1480 				/* shouldn't happen */
   1481 				return EINVAL;
   1482 			error = usbd_create_xfer(sce->pipeh,
   1483 			    sce->ra_wb_reqsize, 0, 0, &sce->ra_wb_xfer);
   1484 			if (error)
   1485 				return error;
   1486 			sce->ra_wb_xferlen = sce->ra_wb_reqsize;
   1487 			sce->ibuf = kmem_alloc(sce->ra_wb_bufsize, KM_SLEEP);
   1488 			sce->fill = sce->cur = sce->ibuf;
   1489 			sce->limit = sce->ibuf + sce->ra_wb_bufsize;
   1490 			sce->ra_wb_used = 0;
   1491 			sce->state |= UGEN_BULK_RA;
   1492 			sce->state &= ~UGEN_RA_WB_STOP;
   1493 			/* Now start reading. */
   1494 			usbd_setup_xfer(sce->ra_wb_xfer, sce, NULL,
   1495 			    min(sce->ra_wb_xferlen, sce->ra_wb_bufsize),
   1496 			     0, USBD_NO_TIMEOUT, ugen_bulkra_intr);
   1497 			err = usbd_transfer(sce->ra_wb_xfer);
   1498 			if (err != USBD_IN_PROGRESS) {
   1499 				sce->state &= ~UGEN_BULK_RA;
   1500 				kmem_free(sce->ibuf, sce->ra_wb_bufsize);
   1501 				sce->ibuf = NULL;
   1502 				usbd_destroy_xfer(sce->ra_wb_xfer);
   1503 				return EIO;
   1504 			}
   1505 		} else {
   1506 			/* Only turn RA off if it's currently on. */
   1507 			if (!(sce->state & UGEN_BULK_RA))
   1508 				return 0;
   1509 
   1510 			sce->state &= ~UGEN_BULK_RA;
   1511 			usbd_abort_pipe(sce->pipeh);
   1512 			usbd_destroy_xfer(sce->ra_wb_xfer);
   1513 			/*
   1514 			 * XXX Discard whatever's in the buffer, but we
   1515 			 * should keep it around and drain the buffer
   1516 			 * instead.
   1517 			 */
   1518 			kmem_free(sce->ibuf, sce->ra_wb_bufsize);
   1519 			sce->ibuf = NULL;
   1520 		}
   1521 		return 0;
   1522 	case USB_SET_BULK_WB:
   1523 		if (endpt == USB_CONTROL_ENDPOINT)
   1524 			return EINVAL;
   1525 		sce = &sc->sc_endpoints[endpt][OUT];
   1526 		if (sce == NULL || sce->pipeh == NULL)
   1527 			return EINVAL;
   1528 		edesc = sce->edesc;
   1529 		if ((edesc->bmAttributes & UE_XFERTYPE) != UE_BULK)
   1530 			return EINVAL;
   1531 
   1532 		if (*(int *)addr) {
   1533 			/* Only turn WB on if it's currently off. */
   1534 			if (sce->state & UGEN_BULK_WB)
   1535 				return 0;
   1536 
   1537 			if (sce->ra_wb_bufsize == 0 || sce->ra_wb_reqsize == 0)
   1538 				/* shouldn't happen */
   1539 				return EINVAL;
   1540 			error = usbd_create_xfer(sce->pipeh, sce->ra_wb_reqsize,
   1541 			    0, 0, &sce->ra_wb_xfer);
   1542 			sce->ra_wb_xferlen = sce->ra_wb_reqsize;
   1543 			sce->ibuf = kmem_alloc(sce->ra_wb_bufsize, KM_SLEEP);
   1544 			sce->fill = sce->cur = sce->ibuf;
   1545 			sce->limit = sce->ibuf + sce->ra_wb_bufsize;
   1546 			sce->ra_wb_used = 0;
   1547 			sce->state |= UGEN_BULK_WB | UGEN_RA_WB_STOP;
   1548 		} else {
   1549 			/* Only turn WB off if it's currently on. */
   1550 			if (!(sce->state & UGEN_BULK_WB))
   1551 				return 0;
   1552 
   1553 			sce->state &= ~UGEN_BULK_WB;
   1554 			/*
   1555 			 * XXX Discard whatever's in the buffer, but we
   1556 			 * should keep it around and keep writing to
   1557 			 * drain the buffer instead.
   1558 			 */
   1559 			usbd_abort_pipe(sce->pipeh);
   1560 			usbd_destroy_xfer(sce->ra_wb_xfer);
   1561 			kmem_free(sce->ibuf, sce->ra_wb_bufsize);
   1562 			sce->ibuf = NULL;
   1563 		}
   1564 		return 0;
   1565 	case USB_SET_BULK_RA_OPT:
   1566 	case USB_SET_BULK_WB_OPT:
   1567 	{
   1568 		struct usb_bulk_ra_wb_opt *opt;
   1569 
   1570 		if (endpt == USB_CONTROL_ENDPOINT)
   1571 			return EINVAL;
   1572 		opt = (struct usb_bulk_ra_wb_opt *)addr;
   1573 		if (cmd == USB_SET_BULK_RA_OPT)
   1574 			sce = &sc->sc_endpoints[endpt][IN];
   1575 		else
   1576 			sce = &sc->sc_endpoints[endpt][OUT];
   1577 		if (sce == NULL || sce->pipeh == NULL)
   1578 			return EINVAL;
   1579 		if (opt->ra_wb_buffer_size < 1 ||
   1580 		    opt->ra_wb_buffer_size > UGEN_BULK_RA_WB_BUFMAX ||
   1581 		    opt->ra_wb_request_size < 1 ||
   1582 		    opt->ra_wb_request_size > opt->ra_wb_buffer_size)
   1583 			return EINVAL;
   1584 		/*
   1585 		 * XXX These changes do not take effect until the
   1586 		 * next time RA/WB mode is enabled but they ought to
   1587 		 * take effect immediately.
   1588 		 */
   1589 		sce->ra_wb_bufsize = opt->ra_wb_buffer_size;
   1590 		sce->ra_wb_reqsize = opt->ra_wb_request_size;
   1591 		return 0;
   1592 	}
   1593 	default:
   1594 		break;
   1595 	}
   1596 
   1597 	if (endpt != USB_CONTROL_ENDPOINT)
   1598 		return EINVAL;
   1599 
   1600 	switch (cmd) {
   1601 #ifdef UGEN_DEBUG
   1602 	case USB_SETDEBUG:
   1603 		ugendebug = *(int *)addr;
   1604 		break;
   1605 #endif
   1606 	case USB_GET_CONFIG:
   1607 		err = usbd_get_config(sc->sc_udev, &conf);
   1608 		if (err)
   1609 			return EIO;
   1610 		*(int *)addr = conf;
   1611 		break;
   1612 	case USB_SET_CONFIG:
   1613 		if (!(flag & FWRITE))
   1614 			return EPERM;
   1615 		err = ugen_set_config(sc, *(int *)addr);
   1616 		switch (err) {
   1617 		case USBD_NORMAL_COMPLETION:
   1618 			break;
   1619 		case USBD_IN_USE:
   1620 			return EBUSY;
   1621 		default:
   1622 			return EIO;
   1623 		}
   1624 		break;
   1625 	case USB_GET_ALTINTERFACE:
   1626 		ai = (struct usb_alt_interface *)addr;
   1627 		err = usbd_device2interface_handle(sc->sc_udev,
   1628 			  ai->uai_interface_index, &iface);
   1629 		if (err)
   1630 			return EINVAL;
   1631 		idesc = usbd_get_interface_descriptor(iface);
   1632 		if (idesc == NULL)
   1633 			return EIO;
   1634 		ai->uai_alt_no = idesc->bAlternateSetting;
   1635 		break;
   1636 	case USB_SET_ALTINTERFACE:
   1637 		if (!(flag & FWRITE))
   1638 			return EPERM;
   1639 		ai = (struct usb_alt_interface *)addr;
   1640 		err = usbd_device2interface_handle(sc->sc_udev,
   1641 			  ai->uai_interface_index, &iface);
   1642 		if (err)
   1643 			return EINVAL;
   1644 		err = ugen_set_interface(sc, ai->uai_interface_index,
   1645 		    ai->uai_alt_no);
   1646 		if (err)
   1647 			return EINVAL;
   1648 		break;
   1649 	case USB_GET_NO_ALT:
   1650 		ai = (struct usb_alt_interface *)addr;
   1651 		cdesc = ugen_get_cdesc(sc, ai->uai_config_index, &cdesclen);
   1652 		if (cdesc == NULL)
   1653 			return EINVAL;
   1654 		idesc = usbd_find_idesc(cdesc, ai->uai_interface_index, 0);
   1655 		if (idesc == NULL) {
   1656 			kmem_free(cdesc, cdesclen);
   1657 			return EINVAL;
   1658 		}
   1659 		ai->uai_alt_no = usbd_get_no_alts(cdesc,
   1660 		    idesc->bInterfaceNumber);
   1661 		kmem_free(cdesc, cdesclen);
   1662 		break;
   1663 	case USB_GET_DEVICE_DESC:
   1664 		*(usb_device_descriptor_t *)addr =
   1665 			*usbd_get_device_descriptor(sc->sc_udev);
   1666 		break;
   1667 	case USB_GET_CONFIG_DESC:
   1668 		cd = (struct usb_config_desc *)addr;
   1669 		cdesc = ugen_get_cdesc(sc, cd->ucd_config_index, &cdesclen);
   1670 		if (cdesc == NULL)
   1671 			return EINVAL;
   1672 		cd->ucd_desc = *cdesc;
   1673 		kmem_free(cdesc, cdesclen);
   1674 		break;
   1675 	case USB_GET_INTERFACE_DESC:
   1676 		id = (struct usb_interface_desc *)addr;
   1677 		cdesc = ugen_get_cdesc(sc, id->uid_config_index, &cdesclen);
   1678 		if (cdesc == NULL)
   1679 			return EINVAL;
   1680 		if (id->uid_config_index == USB_CURRENT_CONFIG_INDEX &&
   1681 		    id->uid_alt_index == USB_CURRENT_ALT_INDEX)
   1682 			alt = ugen_get_alt_index(sc, id->uid_interface_index);
   1683 		else
   1684 			alt = id->uid_alt_index;
   1685 		idesc = usbd_find_idesc(cdesc, id->uid_interface_index, alt);
   1686 		if (idesc == NULL) {
   1687 			kmem_free(cdesc, cdesclen);
   1688 			return EINVAL;
   1689 		}
   1690 		id->uid_desc = *idesc;
   1691 		kmem_free(cdesc, cdesclen);
   1692 		break;
   1693 	case USB_GET_ENDPOINT_DESC:
   1694 		ed = (struct usb_endpoint_desc *)addr;
   1695 		cdesc = ugen_get_cdesc(sc, ed->ued_config_index, &cdesclen);
   1696 		if (cdesc == NULL)
   1697 			return EINVAL;
   1698 		if (ed->ued_config_index == USB_CURRENT_CONFIG_INDEX &&
   1699 		    ed->ued_alt_index == USB_CURRENT_ALT_INDEX)
   1700 			alt = ugen_get_alt_index(sc, ed->ued_interface_index);
   1701 		else
   1702 			alt = ed->ued_alt_index;
   1703 		edesc = usbd_find_edesc(cdesc, ed->ued_interface_index,
   1704 					alt, ed->ued_endpoint_index);
   1705 		if (edesc == NULL) {
   1706 			kmem_free(cdesc, cdesclen);
   1707 			return EINVAL;
   1708 		}
   1709 		ed->ued_desc = *edesc;
   1710 		kmem_free(cdesc, cdesclen);
   1711 		break;
   1712 	case USB_GET_FULL_DESC:
   1713 	{
   1714 		int len;
   1715 		struct iovec iov;
   1716 		struct uio uio;
   1717 		struct usb_full_desc *fd = (struct usb_full_desc *)addr;
   1718 
   1719 		cdesc = ugen_get_cdesc(sc, fd->ufd_config_index, &cdesclen);
   1720 		if (cdesc == NULL)
   1721 			return EINVAL;
   1722 		len = cdesclen;
   1723 		if (len > fd->ufd_size)
   1724 			len = fd->ufd_size;
   1725 		iov.iov_base = (void *)fd->ufd_data;
   1726 		iov.iov_len = len;
   1727 		uio.uio_iov = &iov;
   1728 		uio.uio_iovcnt = 1;
   1729 		uio.uio_resid = len;
   1730 		uio.uio_offset = 0;
   1731 		uio.uio_rw = UIO_READ;
   1732 		uio.uio_vmspace = l->l_proc->p_vmspace;
   1733 		error = uiomove((void *)cdesc, len, &uio);
   1734 		kmem_free(cdesc, cdesclen);
   1735 		return error;
   1736 	}
   1737 	case USB_GET_STRING_DESC: {
   1738 		int len;
   1739 		si = (struct usb_string_desc *)addr;
   1740 		err = usbd_get_string_desc(sc->sc_udev, si->usd_string_index,
   1741 			  si->usd_language_id, &si->usd_desc, &len);
   1742 		if (err)
   1743 			return EINVAL;
   1744 		break;
   1745 	}
   1746 	case USB_DO_REQUEST:
   1747 	{
   1748 		struct usb_ctl_request *ur = (void *)addr;
   1749 		int len = UGETW(ur->ucr_request.wLength);
   1750 		struct iovec iov;
   1751 		struct uio uio;
   1752 		void *ptr = 0;
   1753 		usbd_status xerr;
   1754 
   1755 		error = 0;
   1756 
   1757 		if (!(flag & FWRITE))
   1758 			return EPERM;
   1759 		/* Avoid requests that would damage the bus integrity. */
   1760 		if ((ur->ucr_request.bmRequestType == UT_WRITE_DEVICE &&
   1761 		     ur->ucr_request.bRequest == UR_SET_ADDRESS) ||
   1762 		    (ur->ucr_request.bmRequestType == UT_WRITE_DEVICE &&
   1763 		     ur->ucr_request.bRequest == UR_SET_CONFIG) ||
   1764 		    (ur->ucr_request.bmRequestType == UT_WRITE_INTERFACE &&
   1765 		     ur->ucr_request.bRequest == UR_SET_INTERFACE))
   1766 			return EINVAL;
   1767 
   1768 		if (len < 0 || len > 32767)
   1769 			return EINVAL;
   1770 		if (len != 0) {
   1771 			iov.iov_base = (void *)ur->ucr_data;
   1772 			iov.iov_len = len;
   1773 			uio.uio_iov = &iov;
   1774 			uio.uio_iovcnt = 1;
   1775 			uio.uio_resid = len;
   1776 			uio.uio_offset = 0;
   1777 			uio.uio_rw =
   1778 				ur->ucr_request.bmRequestType & UT_READ ?
   1779 				UIO_READ : UIO_WRITE;
   1780 			uio.uio_vmspace = l->l_proc->p_vmspace;
   1781 			ptr = kmem_alloc(len, KM_SLEEP);
   1782 			if (uio.uio_rw == UIO_WRITE) {
   1783 				error = uiomove(ptr, len, &uio);
   1784 				if (error)
   1785 					goto ret;
   1786 			}
   1787 		}
   1788 		sce = &sc->sc_endpoints[endpt][IN];
   1789 		xerr = usbd_do_request_flags(sc->sc_udev, &ur->ucr_request,
   1790 			  ptr, ur->ucr_flags, &ur->ucr_actlen, sce->timeout);
   1791 		if (xerr) {
   1792 			error = EIO;
   1793 			goto ret;
   1794 		}
   1795 		if (len != 0) {
   1796 			if (uio.uio_rw == UIO_READ) {
   1797 				size_t alen = min(len, ur->ucr_actlen);
   1798 				error = uiomove(ptr, alen, &uio);
   1799 				if (error)
   1800 					goto ret;
   1801 			}
   1802 		}
   1803 	ret:
   1804 		if (ptr)
   1805 			kmem_free(ptr, len);
   1806 		return error;
   1807 	}
   1808 	case USB_GET_DEVICEINFO:
   1809 		usbd_fill_deviceinfo(sc->sc_udev,
   1810 				     (struct usb_device_info *)addr, 0);
   1811 		break;
   1812 #ifdef COMPAT_30
   1813 	case USB_GET_DEVICEINFO_OLD:
   1814 		usbd_fill_deviceinfo_old(sc->sc_udev,
   1815 					 (struct usb_device_info_old *)addr, 0);
   1816 
   1817 		break;
   1818 #endif
   1819 	default:
   1820 		return EINVAL;
   1821 	}
   1822 	return 0;
   1823 }
   1824 
   1825 int
   1826 ugenioctl(dev_t dev, u_long cmd, void *addr, int flag, struct lwp *l)
   1827 {
   1828 	int endpt = UGENENDPOINT(dev);
   1829 	struct ugen_softc *sc;
   1830 	int error;
   1831 
   1832 	sc = device_lookup_private(& ugen_cd, UGENUNIT(dev));
   1833 	if (sc == NULL)
   1834 		return ENXIO;
   1835 
   1836 	sc->sc_refcnt++;
   1837 	error = ugen_do_ioctl(sc, endpt, cmd, addr, flag, l);
   1838 	if (--sc->sc_refcnt < 0)
   1839 		usb_detach_broadcast(sc->sc_dev, &sc->sc_detach_cv);
   1840 	return error;
   1841 }
   1842 
   1843 int
   1844 ugenpoll(dev_t dev, int events, struct lwp *l)
   1845 {
   1846 	struct ugen_softc *sc;
   1847 	struct ugen_endpoint *sce_in, *sce_out;
   1848 	int revents = 0;
   1849 
   1850 	sc = device_lookup_private(&ugen_cd, UGENUNIT(dev));
   1851 	if (sc == NULL)
   1852 		return ENXIO;
   1853 
   1854 	if (sc->sc_dying)
   1855 		return POLLHUP;
   1856 
   1857 	if (UGENENDPOINT(dev) == USB_CONTROL_ENDPOINT)
   1858 		return ENODEV;
   1859 
   1860 	sce_in = &sc->sc_endpoints[UGENENDPOINT(dev)][IN];
   1861 	sce_out = &sc->sc_endpoints[UGENENDPOINT(dev)][OUT];
   1862 	if (sce_in == NULL && sce_out == NULL)
   1863 		return POLLERR;
   1864 #ifdef DIAGNOSTIC
   1865 	if (!sce_in->edesc && !sce_out->edesc) {
   1866 		printf("ugenpoll: no edesc\n");
   1867 		return POLLERR;
   1868 	}
   1869 	/* It's possible to have only one pipe open. */
   1870 	if (!sce_in->pipeh && !sce_out->pipeh) {
   1871 		printf("ugenpoll: no pipe\n");
   1872 		return POLLERR;
   1873 	}
   1874 #endif
   1875 
   1876 	mutex_enter(&sc->sc_lock);
   1877 	if (sce_in && sce_in->pipeh && (events & (POLLIN | POLLRDNORM)))
   1878 		switch (sce_in->edesc->bmAttributes & UE_XFERTYPE) {
   1879 		case UE_INTERRUPT:
   1880 			if (sce_in->q.c_cc > 0)
   1881 				revents |= events & (POLLIN | POLLRDNORM);
   1882 			else
   1883 				selrecord(l, &sce_in->rsel);
   1884 			break;
   1885 		case UE_ISOCHRONOUS:
   1886 			if (sce_in->cur != sce_in->fill)
   1887 				revents |= events & (POLLIN | POLLRDNORM);
   1888 			else
   1889 				selrecord(l, &sce_in->rsel);
   1890 			break;
   1891 		case UE_BULK:
   1892 			if (sce_in->state & UGEN_BULK_RA) {
   1893 				if (sce_in->ra_wb_used > 0)
   1894 					revents |= events &
   1895 					    (POLLIN | POLLRDNORM);
   1896 				else
   1897 					selrecord(l, &sce_in->rsel);
   1898 				break;
   1899 			}
   1900 			/*
   1901 			 * We have no easy way of determining if a read will
   1902 			 * yield any data or a write will happen.
   1903 			 * Pretend they will.
   1904 			 */
   1905 			 revents |= events & (POLLIN | POLLRDNORM);
   1906 			 break;
   1907 		default:
   1908 			break;
   1909 		}
   1910 	if (sce_out && sce_out->pipeh && (events & (POLLOUT | POLLWRNORM)))
   1911 		switch (sce_out->edesc->bmAttributes & UE_XFERTYPE) {
   1912 		case UE_INTERRUPT:
   1913 		case UE_ISOCHRONOUS:
   1914 			/* XXX unimplemented */
   1915 			break;
   1916 		case UE_BULK:
   1917 			if (sce_out->state & UGEN_BULK_WB) {
   1918 				if (sce_out->ra_wb_used <
   1919 				    sce_out->limit - sce_out->ibuf)
   1920 					revents |= events &
   1921 					    (POLLOUT | POLLWRNORM);
   1922 				else
   1923 					selrecord(l, &sce_out->rsel);
   1924 				break;
   1925 			}
   1926 			/*
   1927 			 * We have no easy way of determining if a read will
   1928 			 * yield any data or a write will happen.
   1929 			 * Pretend they will.
   1930 			 */
   1931 			 revents |= events & (POLLOUT | POLLWRNORM);
   1932 			 break;
   1933 		default:
   1934 			break;
   1935 		}
   1936 
   1937 	mutex_exit(&sc->sc_lock);
   1938 
   1939 	return revents;
   1940 }
   1941 
   1942 static void
   1943 filt_ugenrdetach(struct knote *kn)
   1944 {
   1945 	struct ugen_endpoint *sce = kn->kn_hook;
   1946 	struct ugen_softc *sc = sce->sc;
   1947 
   1948 	mutex_enter(&sc->sc_lock);
   1949 	SLIST_REMOVE(&sce->rsel.sel_klist, kn, knote, kn_selnext);
   1950 	mutex_exit(&sc->sc_lock);
   1951 }
   1952 
   1953 static int
   1954 filt_ugenread_intr(struct knote *kn, long hint)
   1955 {
   1956 	struct ugen_endpoint *sce = kn->kn_hook;
   1957 
   1958 	kn->kn_data = sce->q.c_cc;
   1959 	return kn->kn_data > 0;
   1960 }
   1961 
   1962 static int
   1963 filt_ugenread_isoc(struct knote *kn, long hint)
   1964 {
   1965 	struct ugen_endpoint *sce = kn->kn_hook;
   1966 
   1967 	if (sce->cur == sce->fill)
   1968 		return 0;
   1969 
   1970 	if (sce->cur < sce->fill)
   1971 		kn->kn_data = sce->fill - sce->cur;
   1972 	else
   1973 		kn->kn_data = (sce->limit - sce->cur) +
   1974 		    (sce->fill - sce->ibuf);
   1975 
   1976 	return 1;
   1977 }
   1978 
   1979 static int
   1980 filt_ugenread_bulk(struct knote *kn, long hint)
   1981 {
   1982 	struct ugen_endpoint *sce = kn->kn_hook;
   1983 
   1984 	if (!(sce->state & UGEN_BULK_RA))
   1985 		/*
   1986 		 * We have no easy way of determining if a read will
   1987 		 * yield any data or a write will happen.
   1988 		 * So, emulate "seltrue".
   1989 		 */
   1990 		return filt_seltrue(kn, hint);
   1991 
   1992 	if (sce->ra_wb_used == 0)
   1993 		return 0;
   1994 
   1995 	kn->kn_data = sce->ra_wb_used;
   1996 
   1997 	return 1;
   1998 }
   1999 
   2000 static int
   2001 filt_ugenwrite_bulk(struct knote *kn, long hint)
   2002 {
   2003 	struct ugen_endpoint *sce = kn->kn_hook;
   2004 
   2005 	if (!(sce->state & UGEN_BULK_WB))
   2006 		/*
   2007 		 * We have no easy way of determining if a read will
   2008 		 * yield any data or a write will happen.
   2009 		 * So, emulate "seltrue".
   2010 		 */
   2011 		return filt_seltrue(kn, hint);
   2012 
   2013 	if (sce->ra_wb_used == sce->limit - sce->ibuf)
   2014 		return 0;
   2015 
   2016 	kn->kn_data = (sce->limit - sce->ibuf) - sce->ra_wb_used;
   2017 
   2018 	return 1;
   2019 }
   2020 
   2021 static const struct filterops ugenread_intr_filtops =
   2022 	{ 1, NULL, filt_ugenrdetach, filt_ugenread_intr };
   2023 
   2024 static const struct filterops ugenread_isoc_filtops =
   2025 	{ 1, NULL, filt_ugenrdetach, filt_ugenread_isoc };
   2026 
   2027 static const struct filterops ugenread_bulk_filtops =
   2028 	{ 1, NULL, filt_ugenrdetach, filt_ugenread_bulk };
   2029 
   2030 static const struct filterops ugenwrite_bulk_filtops =
   2031 	{ 1, NULL, filt_ugenrdetach, filt_ugenwrite_bulk };
   2032 
   2033 int
   2034 ugenkqfilter(dev_t dev, struct knote *kn)
   2035 {
   2036 	struct ugen_softc *sc;
   2037 	struct ugen_endpoint *sce;
   2038 	struct klist *klist;
   2039 
   2040 	sc = device_lookup_private(&ugen_cd, UGENUNIT(dev));
   2041 	if (sc == NULL)
   2042 		return ENXIO;
   2043 
   2044 	if (sc->sc_dying)
   2045 		return ENXIO;
   2046 
   2047 	if (UGENENDPOINT(dev) == USB_CONTROL_ENDPOINT)
   2048 		return ENODEV;
   2049 
   2050 	switch (kn->kn_filter) {
   2051 	case EVFILT_READ:
   2052 		sce = &sc->sc_endpoints[UGENENDPOINT(dev)][IN];
   2053 		if (sce == NULL)
   2054 			return EINVAL;
   2055 
   2056 		klist = &sce->rsel.sel_klist;
   2057 		switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
   2058 		case UE_INTERRUPT:
   2059 			kn->kn_fop = &ugenread_intr_filtops;
   2060 			break;
   2061 		case UE_ISOCHRONOUS:
   2062 			kn->kn_fop = &ugenread_isoc_filtops;
   2063 			break;
   2064 		case UE_BULK:
   2065 			kn->kn_fop = &ugenread_bulk_filtops;
   2066 			break;
   2067 		default:
   2068 			return EINVAL;
   2069 		}
   2070 		break;
   2071 
   2072 	case EVFILT_WRITE:
   2073 		sce = &sc->sc_endpoints[UGENENDPOINT(dev)][OUT];
   2074 		if (sce == NULL)
   2075 			return EINVAL;
   2076 
   2077 		klist = &sce->rsel.sel_klist;
   2078 		switch (sce->edesc->bmAttributes & UE_XFERTYPE) {
   2079 		case UE_INTERRUPT:
   2080 		case UE_ISOCHRONOUS:
   2081 			/* XXX poll doesn't support this */
   2082 			return EINVAL;
   2083 
   2084 		case UE_BULK:
   2085 			kn->kn_fop = &ugenwrite_bulk_filtops;
   2086 			break;
   2087 		default:
   2088 			return EINVAL;
   2089 		}
   2090 		break;
   2091 
   2092 	default:
   2093 		return EINVAL;
   2094 	}
   2095 
   2096 	kn->kn_hook = sce;
   2097 
   2098 	mutex_enter(&sc->sc_lock);
   2099 	SLIST_INSERT_HEAD(klist, kn, kn_selnext);
   2100 	mutex_exit(&sc->sc_lock);
   2101 
   2102 	return 0;
   2103 }
   2104