Home | History | Annotate | Line # | Download | only in usb
uirda.c revision 1.46
      1 /*	$NetBSD: uirda.c,v 1.46 2020/03/13 18:17:41 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2001 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).
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: uirda.c,v 1.46 2020/03/13 18:17:41 christos Exp $");
     34 
     35 #ifdef _KERNEL_OPT
     36 #include "opt_usb.h"
     37 #endif
     38 
     39 #include <sys/param.h>
     40 #include <sys/systm.h>
     41 #include <sys/kernel.h>
     42 #include <sys/device.h>
     43 #include <sys/mutex.h>
     44 #include <sys/ioctl.h>
     45 #include <sys/conf.h>
     46 #include <sys/file.h>
     47 #include <sys/poll.h>
     48 #include <sys/select.h>
     49 #include <sys/proc.h>
     50 
     51 #include <dev/usb/usb.h>
     52 #include <dev/usb/usbdi.h>
     53 #include <dev/usb/usbdi_util.h>
     54 #include <dev/usb/usbdevs.h>
     55 
     56 #include <dev/ir/ir.h>
     57 #include <dev/ir/irdaio.h>
     58 #include <dev/ir/irframevar.h>
     59 
     60 #include <dev/usb/uirdavar.h>
     61 
     62 #ifdef UIRDA_DEBUG
     63 #define DPRINTF(x)	if (uirdadebug) printf x
     64 #define DPRINTFN(n,x)	if (uirdadebug>(n)) printf x
     65 int	uirdadebug = 0;
     66 #else
     67 #define DPRINTF(x)
     68 #define DPRINTFN(n,x)
     69 #endif
     70 
     71 
     72 /* Class specific requests */
     73 #define UR_IRDA_RECEIVING		0x01	/* Receive in progress? */
     74 #define UR_IRDA_CHECK_MEDIA_BUSY	0x03
     75 #define UR_IRDA_SET_RATE_SNIFF		0x04	/* opt */
     76 #define UR_IRDA_SET_UNICAST_LIST	0x05	/* opt */
     77 #define UR_IRDA_GET_DESC		0x06
     78 
     79 #define UIRDA_NEBOFS 8
     80 static const struct {
     81 	int count;
     82 	int mask;
     83 	int header;
     84 } uirda_ebofs[UIRDA_NEBOFS] = {
     85 	{ 0, UI_EB_0, UIRDA_EB_0 },
     86 	{ 1, UI_EB_1, UIRDA_EB_1 },
     87 	{ 2, UI_EB_2, UIRDA_EB_2 },
     88 	{ 3, UI_EB_3, UIRDA_EB_3 },
     89 	{ 6, UI_EB_6, UIRDA_EB_6 },
     90 	{ 12, UI_EB_12, UIRDA_EB_12 },
     91 	{ 24, UI_EB_24, UIRDA_EB_24 },
     92 	{ 48, UI_EB_48, UIRDA_EB_48 }
     93 };
     94 
     95 #define UIRDA_NSPEEDS 9
     96 static const struct {
     97 	int speed;
     98 	int mask;
     99 	int header;
    100 } uirda_speeds[UIRDA_NSPEEDS] = {
    101 	{ 4000000, UI_BR_4000000, UIRDA_4000000 },
    102 	{ 1152000, UI_BR_1152000, UIRDA_1152000 },
    103 	{ 576000, UI_BR_576000, UIRDA_576000 },
    104 	{ 115200, UI_BR_115200, UIRDA_115200 },
    105 	{ 57600, UI_BR_57600, UIRDA_57600 },
    106 	{ 38400, UI_BR_38400, UIRDA_38400 },
    107 	{ 19200, UI_BR_19200, UIRDA_19200 },
    108 	{ 9600, UI_BR_9600, UIRDA_9600 },
    109 	{ 2400, UI_BR_2400, UIRDA_2400 },
    110 };
    111 
    112 
    113 
    114 int uirda_open(void *, int, int, struct lwp *);
    115 int uirda_close(void *, int, int, struct lwp *);
    116 int uirda_read(void *, struct uio *, int);
    117 int uirda_write(void *, struct uio *, int);
    118 int uirda_set_params(void *, struct irda_params *);
    119 int uirda_get_speeds(void *, int *);
    120 int uirda_get_turnarounds(void *, int *);
    121 int uirda_poll(void *, int, struct lwp *);
    122 int uirda_kqfilter(void *, struct knote *);
    123 
    124 static const struct irframe_methods uirda_methods = {
    125 	uirda_open, uirda_close, uirda_read, uirda_write, uirda_poll,
    126 	uirda_kqfilter, uirda_set_params, uirda_get_speeds,
    127 	uirda_get_turnarounds
    128 };
    129 
    130 static void uirda_rd_cb(struct usbd_xfer *xfer,	void *priv,
    131 		 usbd_status status);
    132 static usbd_status uirda_start_read(struct uirda_softc *sc);
    133 
    134 /*
    135  * These devices don't quite follow the spec.  Speed changing is broken
    136  * and they don't handle windows.
    137  * But we change speed in a safe way, and don't use windows now.
    138  * Some devices also seem to have an interrupt pipe that can be ignored.
    139  *
    140  * Table information taken from Linux driver.
    141  */
    142 Static const struct usb_devno uirda_devs[] = {
    143 	{ USB_VENDOR_ACTISYS, USB_PRODUCT_ACTISYS_IR2000U },
    144 	{ USB_VENDOR_EXTENDED, USB_PRODUCT_EXTENDED_XTNDACCESS },
    145 	{ USB_VENDOR_KAWATSU, USB_PRODUCT_KAWATSU_KC180 },
    146 };
    147 #define uirda_lookup(v, p) (usb_lookup(uirda_devs, v, p))
    148 
    149 int uirda_match(device_t, cfdata_t, void *);
    150 void uirda_attach(device_t, device_t, void *);
    151 void uirda_childdet(device_t, device_t);
    152 int uirda_detach(device_t, int);
    153 int uirda_activate(device_t, enum devact);
    154 
    155 CFATTACH_DECL2_NEW(uirda, sizeof(struct uirda_softc), uirda_match,
    156     uirda_attach, uirda_detach, uirda_activate, NULL, uirda_childdet);
    157 
    158 int
    159 uirda_match(device_t parent, cfdata_t match, void *aux)
    160 {
    161 	struct usbif_attach_arg *uiaa = aux;
    162 
    163 	DPRINTFN(50,("uirda_match\n"));
    164 
    165 	if (uirda_lookup(uiaa->uiaa_vendor, uiaa->uiaa_product) != NULL)
    166 		return UMATCH_VENDOR_PRODUCT;
    167 
    168 	if (uiaa->uiaa_class == UICLASS_APPL_SPEC &&
    169 	    uiaa->uiaa_subclass == UISUBCLASS_IRDA &&
    170 	    uiaa->uiaa_proto == UIPROTO_IRDA)
    171 		return UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO;
    172 	return UMATCH_NONE;
    173 }
    174 
    175 void
    176 uirda_attach(device_t parent, device_t self, void *aux)
    177 {
    178 	struct uirda_softc *sc = device_private(self);
    179 	struct usbif_attach_arg *uiaa = aux;
    180 	struct usbd_device *	dev = uiaa->uiaa_device;
    181 	struct usbd_interface  *iface = uiaa->uiaa_iface;
    182 	char			*devinfop;
    183 	usb_endpoint_descriptor_t *ed;
    184 	usbd_status		err;
    185 	uint8_t			epcount;
    186 	u_int			specrev;
    187 	int			i;
    188 	struct ir_attach_args	ia;
    189 
    190 	DPRINTFN(10,("uirda_attach: sc=%p\n", sc));
    191 
    192 	sc->sc_dev = self;
    193 
    194 	aprint_naive("\n");
    195 	aprint_normal("\n");
    196 
    197 	devinfop = usbd_devinfo_alloc(dev, 0);
    198 	aprint_normal_dev(self, "%s\n", devinfop);
    199 	usbd_devinfo_free(devinfop);
    200 
    201 	sc->sc_udev = dev;
    202 	sc->sc_iface = iface;
    203 
    204 	if (sc->sc_hdszi == 0)
    205 		sc->sc_hdszi = UIRDA_INPUT_HEADER_SIZE;
    206 
    207 	epcount = 0;
    208 	(void)usbd_endpoint_count(iface, &epcount);
    209 
    210 	sc->sc_rd_addr = -1;
    211 	sc->sc_wr_addr = -1;
    212 	for (i = 0; i < epcount; i++) {
    213 		ed = usbd_interface2endpoint_descriptor(iface, i);
    214 		if (ed == NULL) {
    215 			aprint_error_dev(self, "couldn't get ep %d\n", i);
    216 			return;
    217 		}
    218 		if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
    219 		    UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
    220 			sc->sc_rd_addr = ed->bEndpointAddress;
    221 		} else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_OUT &&
    222 			   UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
    223 			sc->sc_wr_addr = ed->bEndpointAddress;
    224 		}
    225 	}
    226 	if (sc->sc_rd_addr == -1 || sc->sc_wr_addr == -1) {
    227 		aprint_error_dev(self, "missing endpoint\n");
    228 		return;
    229 	}
    230 
    231 	if (sc->sc_loadfw(sc) != 0) {
    232 		return;
    233 	}
    234 
    235 	/* Get the IrDA descriptor */
    236 	err = usbd_get_class_desc(sc->sc_udev, UDESC_IRDA, 0,
    237 		USB_IRDA_DESCRIPTOR_SIZE, &sc->sc_irdadesc);
    238 	aprint_error_dev(self, "error %d reading class desc\n", err);
    239 	if (err) {
    240 		err = usbd_get_desc(sc->sc_udev, UDESC_IRDA, 0,
    241 		  USB_IRDA_DESCRIPTOR_SIZE, &sc->sc_irdadesc);
    242 	}
    243 	aprint_error_dev(self, "error %d reading desc\n", err);
    244 	if (err) {
    245 		/* maybe it's embedded in the config desc? */
    246 		usbd_desc_iter_t iter;
    247 		const usb_descriptor_t *d;
    248 		usb_desc_iter_init(sc->sc_udev, &iter);
    249 		for (;;) {
    250 			d = usb_desc_iter_next(&iter);
    251 			if (!d || d->bDescriptorType == UDESC_IRDA)
    252 				break;
    253 		}
    254 		if (d == NULL) {
    255 			aprint_error_dev(self,
    256 			    "Cannot get IrDA descriptor\n");
    257 			return;
    258 		}
    259 		memcpy(&sc->sc_irdadesc, d, USB_IRDA_DESCRIPTOR_SIZE);
    260 	}
    261 	DPRINTF(("uirda_attach: bDescriptorSize %d bDescriptorType %#x "
    262 		 "bmDataSize=%#02x bmWindowSize=%#02x "
    263 		 "bmMinTurnaroundTime=%#02x wBaudRate=%#04x "
    264 		 "bmAdditionalBOFs=%#02x bIrdaSniff=%d bMaxUnicastList=%d\n",
    265 		 sc->sc_irdadesc.bLength,
    266 		 sc->sc_irdadesc.bDescriptorType,
    267 		 sc->sc_irdadesc.bmDataSize,
    268 		 sc->sc_irdadesc.bmWindowSize,
    269 		 sc->sc_irdadesc.bmMinTurnaroundTime,
    270 		 UGETW(sc->sc_irdadesc.wBaudRate),
    271 		 sc->sc_irdadesc.bmAdditionalBOFs,
    272 		 sc->sc_irdadesc.bIrdaSniff,
    273 		 sc->sc_irdadesc.bMaxUnicastList));
    274 
    275 	specrev = UGETW(sc->sc_irdadesc.bcdSpecRevision);
    276 	aprint_normal_dev(self, "USB-IrDA protocol version %x.%02x\n",
    277 	    specrev >> 8, specrev & 0xff);
    278 
    279 	DPRINTFN(10, ("uirda_attach: %p\n", sc->sc_udev));
    280 
    281 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev, sc->sc_dev);
    282 
    283 	mutex_init(&sc->sc_wr_buf_lk, MUTEX_DEFAULT, IPL_NONE);
    284 	mutex_init(&sc->sc_rd_buf_lk, MUTEX_DEFAULT, IPL_NONE);
    285 	selinit(&sc->sc_rd_sel);
    286 	selinit(&sc->sc_wr_sel);
    287 
    288 	ia.ia_type = IR_TYPE_IRFRAME;
    289 	ia.ia_methods = sc->sc_irm ? sc->sc_irm : &uirda_methods;
    290 	ia.ia_handle = sc;
    291 
    292 	sc->sc_child = config_found(self, &ia, ir_print);
    293 
    294 	return;
    295 }
    296 
    297 int
    298 uirda_detach(device_t self, int flags)
    299 {
    300 	struct uirda_softc *sc = device_private(self);
    301 	int s;
    302 	int rv = 0;
    303 
    304 	DPRINTF(("uirda_detach: sc=%p flags=%d\n", sc, flags));
    305 
    306 	sc->sc_dying = 1;
    307 	/* Abort all pipes.  Causes processes waiting for transfer to wake. */
    308 	if (sc->sc_rd_pipe != NULL) {
    309 		usbd_abort_pipe(sc->sc_rd_pipe);
    310 	}
    311 	if (sc->sc_wr_pipe != NULL) {
    312 		usbd_abort_pipe(sc->sc_wr_pipe);
    313 	}
    314 	if (sc->sc_rd_xfer != NULL) {
    315 		usbd_destroy_xfer(sc->sc_rd_xfer);
    316 		sc->sc_rd_xfer = NULL;
    317 		sc->sc_rd_buf = NULL;
    318 	}
    319 	if (sc->sc_wr_xfer != NULL) {
    320 		usbd_destroy_xfer(sc->sc_wr_xfer);
    321 		sc->sc_wr_xfer = NULL;
    322 		sc->sc_wr_buf = NULL;
    323 	}
    324 	if (sc->sc_rd_pipe != NULL) {
    325 		usbd_close_pipe(sc->sc_rd_pipe);
    326 		sc->sc_rd_pipe = NULL;
    327 	}
    328 	if (sc->sc_wr_pipe != NULL) {
    329 		usbd_close_pipe(sc->sc_wr_pipe);
    330 		sc->sc_wr_pipe = NULL;
    331 	}
    332 	wakeup(&sc->sc_rd_count);
    333 
    334 	s = splusb();
    335 	if (--sc->sc_refcnt >= 0) {
    336 		/* Wait for processes to go away. */
    337 		usb_detach_waitold(sc->sc_dev);
    338 	}
    339 	splx(s);
    340 
    341 	if (sc->sc_child != NULL)
    342 		rv = config_detach(sc->sc_child, flags);
    343 
    344 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, sc->sc_dev);
    345 
    346 	mutex_destroy(&sc->sc_wr_buf_lk);
    347 	mutex_destroy(&sc->sc_rd_buf_lk);
    348 	seldestroy(&sc->sc_rd_sel);
    349 	seldestroy(&sc->sc_wr_sel);
    350 
    351 	return rv;
    352 }
    353 
    354 void
    355 uirda_childdet(device_t self, device_t child)
    356 {
    357 	struct uirda_softc *sc = device_private(self);
    358 
    359 	KASSERT(sc->sc_child == child);
    360 	sc->sc_child = NULL;
    361 }
    362 
    363 int
    364 uirda_activate(device_t self, enum devact act)
    365 {
    366 	struct uirda_softc *sc = device_private(self);
    367 
    368 	switch (act) {
    369 	case DVACT_DEACTIVATE:
    370 		sc->sc_dying = 1;
    371 		return 0;
    372 	default:
    373 		return EOPNOTSUPP;
    374 	}
    375 }
    376 
    377 int
    378 uirda_open(void *h, int flag, int mode,
    379     struct lwp *l)
    380 {
    381 	struct uirda_softc *sc = h;
    382 	int error;
    383 	usbd_status err;
    384 
    385 	DPRINTF(("%s: sc=%p\n", __func__, sc));
    386 
    387 	err = usbd_open_pipe(sc->sc_iface, sc->sc_rd_addr, 0, &sc->sc_rd_pipe);
    388 	if (err) {
    389 		error = EIO;
    390 		goto bad1;
    391 	}
    392 	err = usbd_open_pipe(sc->sc_iface, sc->sc_wr_addr, 0, &sc->sc_wr_pipe);
    393 	if (err) {
    394 		error = EIO;
    395 		goto bad2;
    396 	}
    397 	error = usbd_create_xfer(sc->sc_rd_pipe,
    398 	    IRDA_MAX_FRAME_SIZE + sc->sc_hdszi, 0, 0,
    399 	    &sc->sc_rd_xfer);
    400 	if (error)
    401 		goto bad3;
    402 	sc->sc_rd_buf = usbd_get_buffer(sc->sc_rd_xfer);
    403 
    404 	/* worst case ST-UIRDA length */
    405 	error = usbd_create_xfer(sc->sc_wr_pipe,
    406 	    IRDA_MAX_FRAME_SIZE + UIRDA_OUTPUT_HEADER_SIZE + 2 + 1,
    407 	    USBD_FORCE_SHORT_XFER, 0, &sc->sc_wr_xfer);
    408 	if (error)
    409 		goto bad4;
    410 	sc->sc_wr_buf = usbd_get_buffer(sc->sc_wr_xfer);
    411 
    412 	sc->sc_rd_count = 0;
    413 	sc->sc_rd_err = 0;
    414 	sc->sc_params.speed = 0;
    415 	sc->sc_params.ebofs = 0;
    416 	sc->sc_params.maxsize = IRDA_MAX_FRAME_SIZE;
    417 	sc->sc_wr_hdr = -1;
    418 
    419 	err = uirda_start_read(sc);
    420 	/* XXX check err */
    421 
    422 	return 0;
    423 
    424 bad4:
    425 	usbd_destroy_xfer(sc->sc_rd_xfer);
    426 	sc->sc_rd_xfer = NULL;
    427 bad3:
    428 	usbd_close_pipe(sc->sc_wr_pipe);
    429 	sc->sc_wr_pipe = NULL;
    430 bad2:
    431 	usbd_close_pipe(sc->sc_rd_pipe);
    432 	sc->sc_rd_pipe = NULL;
    433 bad1:
    434 	return error;
    435 }
    436 
    437 int
    438 uirda_close(void *h, int flag, int mode,
    439     struct lwp *l)
    440 {
    441 	struct uirda_softc *sc = h;
    442 
    443 	DPRINTF(("%s: sc=%p\n", __func__, sc));
    444 
    445 	if (sc->sc_rd_pipe != NULL) {
    446 		usbd_abort_pipe(sc->sc_rd_pipe);
    447 	}
    448 	if (sc->sc_wr_pipe != NULL) {
    449 		usbd_abort_pipe(sc->sc_wr_pipe);
    450 	}
    451 	if (sc->sc_rd_xfer != NULL) {
    452 		usbd_destroy_xfer(sc->sc_rd_xfer);
    453 		sc->sc_rd_xfer = NULL;
    454 		sc->sc_rd_buf = NULL;
    455 	}
    456 	if (sc->sc_wr_xfer != NULL) {
    457 		usbd_destroy_xfer(sc->sc_wr_xfer);
    458 		sc->sc_wr_xfer = NULL;
    459 		sc->sc_wr_buf = NULL;
    460 	}
    461 	if (sc->sc_rd_pipe != NULL) {
    462 		usbd_close_pipe(sc->sc_rd_pipe);
    463 		sc->sc_rd_pipe = NULL;
    464 	}
    465 	if (sc->sc_wr_pipe != NULL) {
    466 		usbd_close_pipe(sc->sc_wr_pipe);
    467 		sc->sc_wr_pipe = NULL;
    468 	}
    469 
    470 	return 0;
    471 }
    472 
    473 int
    474 uirda_read(void *h, struct uio *uio, int flag)
    475 {
    476 	struct uirda_softc *sc = h;
    477 	int s;
    478 	int error;
    479 	u_int n;
    480 
    481 	DPRINTFN(1,("%s: sc=%p\n", __func__, sc));
    482 
    483 	if (sc->sc_dying)
    484 		return EIO;
    485 
    486 #ifdef DIAGNOSTIC
    487 	if (sc->sc_rd_buf == NULL)
    488 		return EINVAL;
    489 #endif
    490 
    491 	sc->sc_refcnt++;
    492 
    493 	do {
    494 		s = splusb();
    495 		while (sc->sc_rd_count == 0) {
    496 			DPRINTFN(5,("uirda_read: calling tsleep()\n"));
    497 			error = tsleep(&sc->sc_rd_count, PZERO | PCATCH,
    498 				       "uirdrd", 0);
    499 			if (sc->sc_dying)
    500 				error = EIO;
    501 			if (error) {
    502 				splx(s);
    503 				DPRINTF(("uirda_read: tsleep() = %d\n", error));
    504 				goto ret;
    505 			}
    506 		}
    507 		splx(s);
    508 
    509 		mutex_enter(&sc->sc_rd_buf_lk);
    510 		n = sc->sc_rd_count - sc->sc_hdszi;
    511 		DPRINTFN(1,("%s: sc=%p n=%u, hdr=%#02x\n", __func__,
    512 			    sc, n, sc->sc_rd_buf[0]));
    513 		if (n > uio->uio_resid)
    514 			error = EINVAL;
    515 		else
    516 			error = uiomove(sc->sc_rd_buf + sc->sc_hdszi, n, uio);
    517 		sc->sc_rd_count = 0;
    518 		mutex_exit(&sc->sc_rd_buf_lk);
    519 
    520 		uirda_start_read(sc);
    521 		/* XXX check uirda_start_read() return value */
    522 
    523 	} while (n == 0);
    524 
    525 	DPRINTFN(1,("uirda_read: return %d\n", error));
    526 
    527  ret:
    528 	if (--sc->sc_refcnt < 0)
    529 		usb_detach_wakeupold(sc->sc_dev);
    530 	return error;
    531 }
    532 
    533 int
    534 uirda_write(void *h, struct uio *uio, int flag)
    535 {
    536 	struct uirda_softc *sc = h;
    537 	usbd_status err;
    538 	uint32_t n;
    539 	int error = 0;
    540 
    541 	DPRINTFN(1,("%s: sc=%p\n", __func__, sc));
    542 
    543 	if (sc->sc_dying)
    544 		return EIO;
    545 
    546 #ifdef DIAGNOSTIC
    547 	if (sc->sc_wr_buf == NULL)
    548 		return EINVAL;
    549 #endif
    550 
    551 	n = uio->uio_resid;
    552 	if (n > sc->sc_params.maxsize)
    553 		return EINVAL;
    554 
    555 	sc->sc_refcnt++;
    556 	mutex_enter(&sc->sc_wr_buf_lk);
    557 
    558 	sc->sc_wr_buf[0] = UIRDA_EB_NO_CHANGE | UIRDA_NO_SPEED;
    559 	error = uiomove(sc->sc_wr_buf + UIRDA_OUTPUT_HEADER_SIZE, n, uio);
    560 	if (error)
    561 		goto done;
    562 
    563 	DPRINTFN(1, ("uirdawrite: transfer %d bytes\n", n));
    564 
    565 	n += UIRDA_OUTPUT_HEADER_SIZE;
    566 	err = usbd_bulk_transfer(sc->sc_wr_xfer, sc->sc_wr_pipe,
    567 	    USBD_FORCE_SHORT_XFER, UIRDA_WR_TIMEOUT, sc->sc_wr_buf, &n);
    568 	DPRINTFN(2, ("uirdawrite: err=%d\n", err));
    569 	if (err) {
    570 		if (err == USBD_INTERRUPTED)
    571 			error = EINTR;
    572 		else if (err == USBD_TIMEOUT)
    573 			error = ETIMEDOUT;
    574 		else
    575 			error = EIO;
    576 	}
    577 done:
    578 	mutex_exit(&sc->sc_wr_buf_lk);
    579 	if (--sc->sc_refcnt < 0)
    580 		usb_detach_wakeupold(sc->sc_dev);
    581 
    582 	DPRINTFN(1,("%s: sc=%p done\n", __func__, sc));
    583 	return error;
    584 }
    585 
    586 int
    587 uirda_poll(void *h, int events, struct lwp *l)
    588 {
    589 	struct uirda_softc *sc = h;
    590 	int revents = 0;
    591 	int s;
    592 
    593 	DPRINTFN(1,("%s: sc=%p\n", __func__, sc));
    594 
    595 	s = splusb();
    596 	if (events & (POLLOUT | POLLWRNORM))
    597 		revents |= events & (POLLOUT | POLLWRNORM);
    598 	if (events & (POLLIN | POLLRDNORM)) {
    599 		if (sc->sc_rd_count != 0) {
    600 			DPRINTFN(2,("%s: have data\n", __func__));
    601 			revents |= events & (POLLIN | POLLRDNORM);
    602 		} else {
    603 			DPRINTFN(2,("%s: recording select\n", __func__));
    604 			selrecord(l, &sc->sc_rd_sel);
    605 		}
    606 	}
    607 	splx(s);
    608 
    609 	return revents;
    610 }
    611 
    612 static void
    613 filt_uirdardetach(struct knote *kn)
    614 {
    615 	struct uirda_softc *sc = kn->kn_hook;
    616 	int s;
    617 
    618 	s = splusb();
    619 	SLIST_REMOVE(&sc->sc_rd_sel.sel_klist, kn, knote, kn_selnext);
    620 	splx(s);
    621 }
    622 
    623 static int
    624 filt_uirdaread(struct knote *kn, long hint)
    625 {
    626 	struct uirda_softc *sc = kn->kn_hook;
    627 
    628 	kn->kn_data = sc->sc_rd_count;
    629 	return kn->kn_data > 0;
    630 }
    631 
    632 static void
    633 filt_uirdawdetach(struct knote *kn)
    634 {
    635 	struct uirda_softc *sc = kn->kn_hook;
    636 	int s;
    637 
    638 	s = splusb();
    639 	SLIST_REMOVE(&sc->sc_wr_sel.sel_klist, kn, knote, kn_selnext);
    640 	splx(s);
    641 }
    642 
    643 static const struct filterops uirdaread_filtops = {
    644 	.f_isfd = 1,
    645 	.f_attach = NULL,
    646 	.f_detach = filt_uirdardetach,
    647 	.f_event = filt_uirdaread,
    648 };
    649 
    650 static const struct filterops uirdawrite_filtops = {
    651 	.f_isfd = 1,
    652 	.f_attach = NULL,
    653 	.f_detach = filt_uirdawdetach,
    654 	.f_event = filt_seltrue,
    655 };
    656 
    657 int
    658 uirda_kqfilter(void *h, struct knote *kn)
    659 {
    660 	struct uirda_softc *sc = kn->kn_hook;
    661 	struct klist *klist;
    662 	int s;
    663 
    664 	switch (kn->kn_filter) {
    665 	case EVFILT_READ:
    666 		klist = &sc->sc_rd_sel.sel_klist;
    667 		kn->kn_fop = &uirdaread_filtops;
    668 		break;
    669 	case EVFILT_WRITE:
    670 		klist = &sc->sc_wr_sel.sel_klist;
    671 		kn->kn_fop = &uirdawrite_filtops;
    672 		break;
    673 	default:
    674 		return EINVAL;
    675 	}
    676 
    677 	kn->kn_hook = sc;
    678 
    679 	s = splusb();
    680 	SLIST_INSERT_HEAD(klist, kn, kn_selnext);
    681 	splx(s);
    682 
    683 	return 0;
    684 }
    685 
    686 int
    687 uirda_set_params(void *h, struct irda_params *p)
    688 {
    689 	struct uirda_softc *sc = h;
    690 	usbd_status err;
    691 	int i;
    692 	uint8_t hdr;
    693 	uint32_t n;
    694 	u_int mask;
    695 
    696 	DPRINTF(("%s: sc=%p, speed=%d ebofs=%d maxsize=%d\n", __func__,
    697 		 sc, p->speed, p->ebofs, p->maxsize));
    698 
    699 	if (sc->sc_dying)
    700 		return EIO;
    701 
    702 	hdr = 0;
    703 	if (p->ebofs != sc->sc_params.ebofs) {
    704 		/* round up ebofs */
    705 		mask = 1 /* sc->sc_irdadesc.bmAdditionalBOFs*/;
    706 		DPRINTF(("u.s.p.: mask=%#x, sc->ebofs=%d, p->ebofs=%d\n",
    707 			mask, sc->sc_params.ebofs, p->ebofs));
    708 		for (i = 0; i < UIRDA_NEBOFS; i++) {
    709 			DPRINTF(("u.s.p.: u_e[%d].mask=%#x, count=%d\n",
    710 				i, uirda_ebofs[i].mask, uirda_ebofs[i].count));
    711 			if ((mask & uirda_ebofs[i].mask) &&
    712 			    uirda_ebofs[i].count >= p->ebofs) {
    713 				hdr = uirda_ebofs[i].header;
    714 				goto found1;
    715 			}
    716 		}
    717 		for (i = 0; i < UIRDA_NEBOFS; i++) {
    718 			DPRINTF(("u.s.p.: u_e[%d].mask=%#x, count=%d\n",
    719 				i, uirda_ebofs[i].mask, uirda_ebofs[i].count));
    720 			if ((mask & uirda_ebofs[i].mask)) {
    721 				hdr = uirda_ebofs[i].header;
    722 				goto found1;
    723 			}
    724 		}
    725 		/* no good value found */
    726 		return EINVAL;
    727 	found1:
    728 		DPRINTF(("uirda_set_params: ebofs hdr=%#02x\n", hdr));
    729 		;
    730 
    731 	}
    732 	if (hdr != 0 || p->speed != sc->sc_params.speed) {
    733 		/* find speed */
    734 		mask = UGETW(sc->sc_irdadesc.wBaudRate);
    735 		for (i = 0; i < UIRDA_NSPEEDS; i++) {
    736 			if ((mask & uirda_speeds[i].mask) &&
    737 			    uirda_speeds[i].speed == p->speed) {
    738 				hdr |= uirda_speeds[i].header;
    739 				goto found2;
    740 			}
    741 		}
    742 		/* no good value found */
    743 		return EINVAL;
    744 	found2:
    745 		DPRINTF(("uirda_set_params: speed hdr=%#02x\n", hdr));
    746 		;
    747 	}
    748 	if (p->maxsize != sc->sc_params.maxsize) {
    749 		if (p->maxsize > IRDA_MAX_FRAME_SIZE)
    750 			return EINVAL;
    751 		sc->sc_params.maxsize = p->maxsize;
    752 #if 0
    753 		DPRINTF(("%s: new buffers, old size=%d\n", __func__,
    754 			 sc->sc_params.maxsize));
    755 		if (p->maxsize > 10000 || p < 0) /* XXX */
    756 			return EINVAL;
    757 
    758 		/* Change the write buffer */
    759 		mutex_enter(&sc->sc_wr_buf_lk);
    760 		if (sc->sc_wr_buf != NULL)
    761 			usbd_free_buffer(sc->sc_wr_xfer);
    762 		sc->sc_wr_buf = usbd_get_buffer(sc->sc_wr_xfer, p->maxsize+1);
    763 		mutex_exit(&sc->sc_wr_buf_lk);
    764 		if (sc->sc_wr_buf == NULL)
    765 			return ENOMEM;
    766 
    767 		/* Change the read buffer */
    768 		mutex_enter(&sc->sc_rd_buf_lk);
    769 		usbd_abort_pipe(sc->sc_rd_pipe);
    770 		if (sc->sc_rd_buf != NULL)
    771 			usbd_free_buffer(sc->sc_rd_xfer);
    772 		sc->sc_rd_buf = usbd_get_buffer(sc->sc_rd_xfer, p->maxsize+1);
    773 		sc->sc_rd_count = 0;
    774 		if (sc->sc_rd_buf == NULL) {
    775 			mutex_exit(&sc->sc_rd_buf_lk);
    776 			return ENOMEM;
    777 		}
    778 		sc->sc_params.maxsize = p->maxsize;
    779 		err = uirda_start_read(sc); /* XXX check */
    780 		mutex_exit(&sc->sc_rd_buf_lk);
    781 #endif
    782 	}
    783 	if (hdr != 0 && hdr != sc->sc_wr_hdr) {
    784 		/*
    785 		 * A change has occurred, transmit a 0 length frame with
    786 		 * the new settings.  The 0 length frame is not sent to the
    787 		 * device.
    788 		 */
    789 		DPRINTF(("%s: sc=%p setting header %#02x\n",
    790 			 __func__, sc, hdr));
    791 		sc->sc_wr_hdr = hdr;
    792 		mutex_enter(&sc->sc_wr_buf_lk);
    793 		sc->sc_wr_buf[0] = hdr;
    794 		n = UIRDA_OUTPUT_HEADER_SIZE;
    795 		err = usbd_bulk_transfer(sc->sc_wr_xfer, sc->sc_wr_pipe,
    796 		    USBD_FORCE_SHORT_XFER, UIRDA_WR_TIMEOUT,
    797 		    sc->sc_wr_buf, &n);
    798 		if (err) {
    799 			aprint_error_dev(sc->sc_dev, "set failed, err=%d\n",
    800 			    err);
    801 			usbd_clear_endpoint_stall(sc->sc_wr_pipe);
    802 		}
    803 		mutex_exit(&sc->sc_wr_buf_lk);
    804 	}
    805 
    806 	sc->sc_params = *p;
    807 
    808 	return 0;
    809 }
    810 
    811 int
    812 uirda_get_speeds(void *h, int *speeds)
    813 {
    814 	struct uirda_softc *sc = h;
    815 	u_int isp;
    816 	u_int usp;
    817 
    818 	DPRINTF(("%s: sc=%p\n", __func__, sc));
    819 
    820 	if (sc->sc_dying)
    821 		return EIO;
    822 
    823 	usp = UGETW(sc->sc_irdadesc.wBaudRate);
    824 	isp = 0;
    825 	if (usp & UI_BR_4000000) isp |= IRDA_SPEED_4000000;
    826 	if (usp & UI_BR_1152000) isp |= IRDA_SPEED_1152000;
    827 	if (usp & UI_BR_576000)  isp |= IRDA_SPEED_576000;
    828 	if (usp & UI_BR_115200)  isp |= IRDA_SPEED_115200;
    829 	if (usp & UI_BR_57600)   isp |= IRDA_SPEED_57600;
    830 	if (usp & UI_BR_38400)   isp |= IRDA_SPEED_38400;
    831 	if (usp & UI_BR_19200)   isp |= IRDA_SPEED_19200;
    832 	if (usp & UI_BR_9600)    isp |= IRDA_SPEED_9600;
    833 	if (usp & UI_BR_2400)    isp |= IRDA_SPEED_2400;
    834 	*speeds = isp;
    835 	DPRINTF(("%s: speeds = %#x\n", __func__, isp));
    836 	return 0;
    837 }
    838 
    839 int
    840 uirda_get_turnarounds(void *h, int *turnarounds)
    841 {
    842 	struct uirda_softc *sc = h;
    843 	u_int ita;
    844 	u_int uta;
    845 
    846 	DPRINTF(("%s: sc=%p\n", __func__, sc));
    847 
    848 	if (sc->sc_dying)
    849 		return EIO;
    850 
    851 	uta = sc->sc_irdadesc.bmMinTurnaroundTime;
    852 	ita = 0;
    853 	if (uta & UI_TA_0)     ita |= IRDA_TURNT_0;
    854 	if (uta & UI_TA_10)    ita |= IRDA_TURNT_10;
    855 	if (uta & UI_TA_50)    ita |= IRDA_TURNT_50;
    856 	if (uta & UI_TA_100)   ita |= IRDA_TURNT_100;
    857 	if (uta & UI_TA_500)   ita |= IRDA_TURNT_500;
    858 	if (uta & UI_TA_1000)  ita |= IRDA_TURNT_1000;
    859 	if (uta & UI_TA_5000)  ita |= IRDA_TURNT_5000;
    860 	if (uta & UI_TA_10000) ita |= IRDA_TURNT_10000;
    861 	*turnarounds = ita;
    862 	return 0;
    863 }
    864 
    865 static void
    866 uirda_rd_cb(struct usbd_xfer *xfer, void *priv,
    867 	    usbd_status status)
    868 {
    869 	struct uirda_softc *sc = priv;
    870 	uint32_t size;
    871 
    872 	DPRINTFN(1,("%s: sc=%p\n", __func__, sc));
    873 
    874 	if (status == USBD_CANCELLED) /* this is normal */
    875 		return;
    876 	if (status) {
    877 		size = sc->sc_hdszi;
    878 		sc->sc_rd_err = 1;
    879 	} else {
    880 		usbd_get_xfer_status(xfer, NULL, NULL, &size, NULL);
    881 	}
    882 	DPRINTFN(1,("%s: sc=%p size=%u, err=%d\n", __func__, sc, size,
    883 		    sc->sc_rd_err));
    884 	sc->sc_rd_count = size;
    885 	wakeup(&sc->sc_rd_count); /* XXX should use flag */
    886 	selnotify(&sc->sc_rd_sel, 0, 0);
    887 }
    888 
    889 static usbd_status
    890 uirda_start_read(struct uirda_softc *sc)
    891 {
    892 	usbd_status err;
    893 
    894 	DPRINTFN(1,("%s: sc=%p, size=%d\n", __func__, sc,
    895 		    sc->sc_params.maxsize + UIRDA_INPUT_HEADER_SIZE));
    896 
    897 	if (sc->sc_dying)
    898 		return USBD_IOERROR;
    899 
    900 	if (sc->sc_rd_err) {
    901 		sc->sc_rd_err = 0;
    902 		DPRINTF(("uirda_start_read: clear stall\n"));
    903 		usbd_clear_endpoint_stall(sc->sc_rd_pipe);
    904 	}
    905 
    906 	usbd_setup_xfer(sc->sc_rd_xfer, sc, sc->sc_rd_buf,
    907 	    sc->sc_params.maxsize + sc->sc_hdszi, USBD_SHORT_XFER_OK,
    908 	    USBD_NO_TIMEOUT, uirda_rd_cb);
    909 	err = usbd_transfer(sc->sc_rd_xfer);
    910 	if (err != USBD_IN_PROGRESS) {
    911 		DPRINTF(("uirda_start_read: err=%d\n", err));
    912 		return err;
    913 	}
    914 	return USBD_NORMAL_COMPLETION;
    915 }
    916 
    917 usbd_status
    918 usbd_get_class_desc(struct usbd_device *dev, int type, int index, int len, void *desc)
    919 {
    920 	usb_device_request_t req;
    921 
    922 	DPRINTFN(3,("usbd_get_desc: type=%d, index=%d, len=%d\n",
    923 		    type, index, len));
    924 
    925 	req.bmRequestType = 0xa1; /* XXX ? */
    926 	req.bRequest = UR_GET_DESCRIPTOR;
    927 	USETW2(req.wValue, type, index);
    928 	USETW(req.wIndex, 0);
    929 	USETW(req.wLength, len);
    930 	return usbd_do_request(dev, &req, desc);
    931 }
    932