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