Home | History | Annotate | Line # | Download | only in usb
uhidev.c revision 1.81
      1 /*	$NetBSD: uhidev.c,v 1.81 2021/08/07 16:19:17 thorpej Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2001, 2012 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 and Matthew R. Green (mrg (at) eterna.com.au).
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30  * POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 /*
     34  * HID spec: http://www.usb.org/developers/devclass_docs/HID1_11.pdf
     35  */
     36 
     37 #include <sys/cdefs.h>
     38 __KERNEL_RCSID(0, "$NetBSD: uhidev.c,v 1.81 2021/08/07 16:19:17 thorpej Exp $");
     39 
     40 #ifdef _KERNEL_OPT
     41 #include "opt_usb.h"
     42 #endif
     43 
     44 #include <sys/param.h>
     45 #include <sys/types.h>
     46 
     47 #include <sys/conf.h>
     48 #include <sys/device.h>
     49 #include <sys/ioctl.h>
     50 #include <sys/kernel.h>
     51 #include <sys/kmem.h>
     52 #include <sys/lwp.h>
     53 #include <sys/rndsource.h>
     54 #include <sys/signalvar.h>
     55 #include <sys/systm.h>
     56 
     57 #include <dev/usb/usb.h>
     58 #include <dev/usb/usbhid.h>
     59 
     60 #include <dev/usb/usbdevs.h>
     61 #include <dev/usb/usbdi.h>
     62 #include <dev/usb/usbdi_util.h>
     63 #include <dev/usb/usb_quirks.h>
     64 
     65 #include <dev/usb/uhidev.h>
     66 #include <dev/hid/hid.h>
     67 
     68 /* Report descriptor for broken Wacom Graphire */
     69 #include <dev/usb/ugraphire_rdesc.h>
     70 /* Report descriptor for game controllers in "XInput" mode */
     71 #include <dev/usb/xinput_rdesc.h>
     72 /* Report descriptor for Xbox One controllers */
     73 #include <dev/usb/x1input_rdesc.h>
     74 
     75 #include "locators.h"
     76 
     77 #ifdef UHIDEV_DEBUG
     78 #define DPRINTF(x)	if (uhidevdebug) printf x
     79 #define DPRINTFN(n,x)	if (uhidevdebug>(n)) printf x
     80 int	uhidevdebug = 0;
     81 #else
     82 #define DPRINTF(x)
     83 #define DPRINTFN(n,x)
     84 #endif
     85 
     86 Static void uhidev_intr(struct usbd_xfer *, void *, usbd_status);
     87 
     88 Static int uhidev_maxrepid(void *, int);
     89 Static int uhidevprint(void *, const char *);
     90 
     91 static int uhidev_match(device_t, cfdata_t, void *);
     92 static void uhidev_attach(device_t, device_t, void *);
     93 static void uhidev_childdet(device_t, device_t);
     94 static int uhidev_detach(device_t, int);
     95 static int uhidev_activate(device_t, enum devact);
     96 
     97 CFATTACH_DECL2_NEW(uhidev, sizeof(struct uhidev_softc), uhidev_match,
     98     uhidev_attach, uhidev_detach, uhidev_activate, NULL, uhidev_childdet);
     99 
    100 static int
    101 uhidev_match(device_t parent, cfdata_t match, void *aux)
    102 {
    103 	struct usbif_attach_arg *uiaa = aux;
    104 
    105 	/* Game controllers in "XInput" mode */
    106 	if (USBIF_IS_XINPUT(uiaa))
    107 		return UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO;
    108 	/* Xbox One controllers */
    109 	if (USBIF_IS_X1INPUT(uiaa) && uiaa->uiaa_ifaceno == 0)
    110 		return UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO;
    111 
    112 	if (uiaa->uiaa_class != UICLASS_HID)
    113 		return UMATCH_NONE;
    114 	if (usbd_get_quirks(uiaa->uiaa_device)->uq_flags & UQ_HID_IGNORE)
    115 		return UMATCH_NONE;
    116 	return UMATCH_IFACECLASS_GENERIC;
    117 }
    118 
    119 static void
    120 uhidev_attach(device_t parent, device_t self, void *aux)
    121 {
    122 	struct uhidev_softc *sc = device_private(self);
    123 	struct usbif_attach_arg *uiaa = aux;
    124 	struct usbd_interface *iface = uiaa->uiaa_iface;
    125 	usb_interface_descriptor_t *id;
    126 	usb_endpoint_descriptor_t *ed;
    127 	struct uhidev_attach_arg uha;
    128 	device_t dev;
    129 	struct uhidev *csc;
    130 	int maxinpktsize, size, nrepid, repid, repsz;
    131 	int *repsizes;
    132 	int i;
    133 	void *desc;
    134 	const void *descptr;
    135 	usbd_status err;
    136 	char *devinfop;
    137 	int locs[UHIDBUSCF_NLOCS];
    138 
    139 	sc->sc_dev = self;
    140 	sc->sc_udev = uiaa->uiaa_device;
    141 	sc->sc_iface = iface;
    142 
    143 	aprint_naive("\n");
    144 	aprint_normal("\n");
    145 
    146 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_SOFTUSB);
    147 	cv_init(&sc->sc_cv, "uhidev");
    148 	sc->sc_writelock = NULL;
    149 	sc->sc_configlock = NULL;
    150 
    151 	id = usbd_get_interface_descriptor(iface);
    152 
    153 	devinfop = usbd_devinfo_alloc(uiaa->uiaa_device, 0);
    154 	aprint_normal_dev(self, "%s, iclass %d/%d\n",
    155 	       devinfop, id->bInterfaceClass, id->bInterfaceSubClass);
    156 	usbd_devinfo_free(devinfop);
    157 
    158 	if (!pmf_device_register(self, NULL, NULL))
    159 		aprint_error_dev(self, "couldn't establish power handler\n");
    160 
    161 	if (uiaa->uiaa_vendor == USB_VENDOR_WACOM) {
    162 		if (uiaa->uiaa_product == USB_PRODUCT_WACOM_XD0912U) {
    163 		/*
    164 		 * Wacom Intuos2 (XD-0912-U) requires longer idle time to
    165 		 * initialize the device with 0x0202.
    166 		 */
    167 			DELAY(500000);
    168 		}
    169 	}
    170 	(void)usbd_set_idle(iface, 0, 0);
    171 
    172 	if ((usbd_get_quirks(sc->sc_udev)->uq_flags & UQ_NO_SET_PROTO) == 0)
    173 		(void)usbd_set_protocol(iface, 1);
    174 
    175 	maxinpktsize = 0;
    176 	sc->sc_iep_addr = sc->sc_oep_addr = -1;
    177 	for (i = 0; i < id->bNumEndpoints; i++) {
    178 		ed = usbd_interface2endpoint_descriptor(iface, i);
    179 		if (ed == NULL) {
    180 			aprint_error_dev(self,
    181 			    "could not read endpoint descriptor\n");
    182 			sc->sc_dying = 1;
    183 			return;
    184 		}
    185 
    186 		DPRINTFN(10,("uhidev_attach: bLength=%d bDescriptorType=%d "
    187 		    "bEndpointAddress=%d-%s bmAttributes=%d wMaxPacketSize=%d"
    188 		    " bInterval=%d\n",
    189 		    ed->bLength, ed->bDescriptorType,
    190 		    ed->bEndpointAddress & UE_ADDR,
    191 		    UE_GET_DIR(ed->bEndpointAddress)==UE_DIR_IN? "in" : "out",
    192 		    ed->bmAttributes & UE_XFERTYPE,
    193 		    UGETW(ed->wMaxPacketSize), ed->bInterval));
    194 
    195 		if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
    196 		    (ed->bmAttributes & UE_XFERTYPE) == UE_INTERRUPT) {
    197 			maxinpktsize = UGETW(ed->wMaxPacketSize);
    198 			sc->sc_iep_addr = ed->bEndpointAddress;
    199 		} else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_OUT &&
    200 		    (ed->bmAttributes & UE_XFERTYPE) == UE_INTERRUPT) {
    201 			sc->sc_oep_addr = ed->bEndpointAddress;
    202 		} else {
    203 			aprint_verbose_dev(self, "endpoint %d: ignored\n", i);
    204 		}
    205 	}
    206 
    207 	/*
    208 	 * Check that we found an input interrupt endpoint. The output interrupt
    209 	 * endpoint is optional
    210 	 */
    211 	if (sc->sc_iep_addr == -1) {
    212 		aprint_error_dev(self, "no input interrupt endpoint\n");
    213 		sc->sc_dying = 1;
    214 		return;
    215 	}
    216 
    217 	/* XXX need to extend this */
    218 	descptr = NULL;
    219 	if (uiaa->uiaa_vendor == USB_VENDOR_WACOM) {
    220 		static uByte reportbuf[3];
    221 
    222 		/* The report descriptor for the Wacom Graphire is broken. */
    223 		switch (uiaa->uiaa_product) {
    224 		case USB_PRODUCT_WACOM_GRAPHIRE3_4X5:
    225 		case USB_PRODUCT_WACOM_GRAPHIRE3_6X8:
    226 		case USB_PRODUCT_WACOM_GRAPHIRE4_4X5: /* The 6x8 too? */
    227 			/*
    228 			 * The Graphire3 needs 0x0202 to be written to
    229 			 * feature report ID 2 before it'll start
    230 			 * returning digitizer data.
    231 			 */
    232 			reportbuf[0] = 0x02;
    233 			reportbuf[1] = 0x02;
    234 			usbd_set_report(uiaa->uiaa_iface, UHID_FEATURE_REPORT, 2,
    235 			    &reportbuf, 2);
    236 
    237 			size = sizeof(uhid_graphire3_4x5_report_descr);
    238 			descptr = uhid_graphire3_4x5_report_descr;
    239 			break;
    240 		case USB_PRODUCT_WACOM_GRAPHIRE:
    241 		case USB_PRODUCT_WACOM_GRAPHIRE2:
    242 		case USB_PRODUCT_WACOM_XD0912U:
    243 		case USB_PRODUCT_WACOM_CTH690K0:
    244 			reportbuf[0] = 0x02;
    245 			reportbuf[1] = 0x02;
    246 			usbd_set_report(uiaa->uiaa_iface, UHID_FEATURE_REPORT, 2,
    247 			    &reportbuf, 2);
    248 			break;
    249 		default:
    250 			/* Keep descriptor */
    251 			break;
    252 		}
    253 	}
    254 	if (USBIF_IS_XINPUT(uiaa)) {
    255 		size = sizeof(uhid_xinput_report_descr);
    256 		descptr = uhid_xinput_report_descr;
    257 	}
    258 	if (USBIF_IS_X1INPUT(uiaa)) {
    259 		sc->sc_flags |= UHIDEV_F_XB1;
    260 		size = sizeof(uhid_x1input_report_descr);
    261 		descptr = uhid_x1input_report_descr;
    262 	}
    263 
    264 	if (descptr) {
    265 		desc = kmem_alloc(size, KM_SLEEP);
    266 		err = USBD_NORMAL_COMPLETION;
    267 		memcpy(desc, descptr, size);
    268 	} else {
    269 		desc = NULL;
    270 		err = usbd_read_report_desc(uiaa->uiaa_iface, &desc, &size);
    271 	}
    272 	if (err) {
    273 		aprint_error_dev(self, "no report descriptor\n");
    274 		sc->sc_dying = 1;
    275 		return;
    276 	}
    277 
    278 	if (uiaa->uiaa_vendor == USB_VENDOR_HOSIDEN &&
    279 	    uiaa->uiaa_product == USB_PRODUCT_HOSIDEN_PPP) {
    280 		static uByte reportbuf[] = { 1 };
    281 		/*
    282 		 *  This device was sold by Konami with its ParaParaParadise
    283 		 *  game for PlayStation2.  It needs to be "turned on"
    284 		 *  before it will send any reports.
    285 		 */
    286 
    287 		usbd_set_report(uiaa->uiaa_iface, UHID_FEATURE_REPORT, 0,
    288 		    &reportbuf, sizeof(reportbuf));
    289 	}
    290 
    291 	if (uiaa->uiaa_vendor == USB_VENDOR_LOGITECH &&
    292 	    uiaa->uiaa_product == USB_PRODUCT_LOGITECH_CBT44 && size == 0xb1) {
    293 		uint8_t *data = desc;
    294 		/*
    295 		 * This device has a odd USAGE_MINIMUM value that would
    296 		 * cause the multimedia keys to have their usage number
    297 		 * shifted up one usage.  Adjust so the usages are sane.
    298 		 */
    299 
    300 		if (data[0x56] == 0x19 && data[0x57] == 0x01 &&
    301 		    data[0x58] == 0x2a && data[0x59] == 0x8c)
    302 			data[0x57] = 0x00;
    303 	}
    304 
    305 	/*
    306 	 * Enable the Six Axis and DualShock 3 controllers.
    307 	 * See http://ps3.jim.sh/sixaxis/usb/
    308 	 */
    309 	if (uiaa->uiaa_vendor == USB_VENDOR_SONY &&
    310 	    uiaa->uiaa_product == USB_PRODUCT_SONY_PS3CONTROLLER) {
    311 		usb_device_request_t req;
    312 		char data[17];
    313 		int actlen;
    314 
    315 		req.bmRequestType = UT_READ_CLASS_INTERFACE;
    316 		req.bRequest = 1;
    317 		USETW(req.wValue, 0x3f2);
    318 		USETW(req.wIndex, 0);
    319 		USETW(req.wLength, sizeof(data));
    320 
    321 		usbd_do_request_flags(sc->sc_udev, &req, data,
    322 			USBD_SHORT_XFER_OK, &actlen, USBD_DEFAULT_TIMEOUT);
    323 	}
    324 
    325 	sc->sc_repdesc = desc;
    326 	sc->sc_repdesc_size = size;
    327 
    328 	uha.uiaa = uiaa;
    329 	nrepid = uhidev_maxrepid(desc, size);
    330 	if (nrepid < 0)
    331 		return;
    332 	if (nrepid > 0)
    333 		aprint_normal_dev(self, "%d report ids\n", nrepid);
    334 	nrepid++;
    335 	repsizes = kmem_alloc(nrepid * sizeof(*repsizes), KM_SLEEP);
    336 	sc->sc_subdevs = kmem_zalloc(nrepid * sizeof(sc->sc_subdevs[0]),
    337 	    KM_SLEEP);
    338 
    339 	/* Just request max packet size for the interrupt pipe */
    340 	sc->sc_isize = maxinpktsize;
    341 	sc->sc_nrepid = nrepid;
    342 
    343 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev, sc->sc_dev);
    344 
    345 	for (repid = 0; repid < nrepid; repid++) {
    346 		repsz = hid_report_size(desc, size, hid_input, repid);
    347 		DPRINTF(("uhidev_match: repid=%d, repsz=%d\n", repid, repsz));
    348 		repsizes[repid] = repsz;
    349 	}
    350 
    351 	DPRINTF(("uhidev_attach: isize=%d\n", sc->sc_isize));
    352 
    353 	uha.parent = sc;
    354 	for (repid = 0; repid < nrepid; repid++) {
    355 		DPRINTF(("uhidev_match: try repid=%d\n", repid));
    356 		if (hid_report_size(desc, size, hid_input, repid) == 0 &&
    357 		    hid_report_size(desc, size, hid_output, repid) == 0 &&
    358 		    hid_report_size(desc, size, hid_feature, repid) == 0) {
    359 			;	/* already NULL in sc->sc_subdevs[repid] */
    360 		} else {
    361 			uha.reportid = repid;
    362 			locs[UHIDBUSCF_REPORTID] = repid;
    363 
    364 			dev = config_found(self, &uha, uhidevprint,
    365 			    CFARGS(.submatch = config_stdsubmatch,
    366 				   .locators = locs));
    367 			sc->sc_subdevs[repid] = dev;
    368 			if (dev != NULL) {
    369 				csc = device_private(dev);
    370 				csc->sc_in_rep_size = repsizes[repid];
    371 #ifdef DIAGNOSTIC
    372 				DPRINTF(("uhidev_match: repid=%d dev=%p\n",
    373 					 repid, dev));
    374 				if (csc->sc_intr == NULL) {
    375 					kmem_free(repsizes,
    376 					    nrepid * sizeof(*repsizes));
    377 					aprint_error_dev(self,
    378 					    "sc_intr == NULL\n");
    379 					return;
    380 				}
    381 #endif
    382 				rnd_attach_source(&csc->rnd_source,
    383 						  device_xname(dev),
    384 						  RND_TYPE_TTY,
    385 						  RND_FLAG_DEFAULT);
    386 			}
    387 		}
    388 	}
    389 	kmem_free(repsizes, nrepid * sizeof(*repsizes));
    390 
    391 	return;
    392 }
    393 
    394 int
    395 uhidev_maxrepid(void *buf, int len)
    396 {
    397 	struct hid_data *d;
    398 	struct hid_item h;
    399 	int maxid;
    400 
    401 	maxid = -1;
    402 	h.report_ID = 0;
    403 	for (d = hid_start_parse(buf, len, hid_none); hid_get_item(d, &h); )
    404 		if ((int)h.report_ID > maxid)
    405 			maxid = h.report_ID;
    406 	hid_end_parse(d);
    407 	return maxid;
    408 }
    409 
    410 int
    411 uhidevprint(void *aux, const char *pnp)
    412 {
    413 	struct uhidev_attach_arg *uha = aux;
    414 
    415 	if (pnp)
    416 		aprint_normal("uhid at %s", pnp);
    417 	if (uha->reportid != 0)
    418 		aprint_normal(" reportid %d", uha->reportid);
    419 	return UNCONF;
    420 }
    421 
    422 static int
    423 uhidev_activate(device_t self, enum devact act)
    424 {
    425 	struct uhidev_softc *sc = device_private(self);
    426 
    427 	switch (act) {
    428 	case DVACT_DEACTIVATE:
    429 		sc->sc_dying = 1;
    430 		return 0;
    431 	default:
    432 		return EOPNOTSUPP;
    433 	}
    434 }
    435 
    436 static void
    437 uhidev_childdet(device_t self, device_t child)
    438 {
    439 	int i;
    440 	struct uhidev_softc *sc = device_private(self);
    441 
    442 	for (i = 0; i < sc->sc_nrepid; i++) {
    443 		if (sc->sc_subdevs[i] == child)
    444 			break;
    445 	}
    446 	KASSERT(i < sc->sc_nrepid);
    447 	sc->sc_subdevs[i] = NULL;
    448 }
    449 
    450 static int
    451 uhidev_detach(device_t self, int flags)
    452 {
    453 	struct uhidev_softc *sc = device_private(self);
    454 	int i, rv;
    455 	struct uhidev *csc;
    456 
    457 	DPRINTF(("uhidev_detach: sc=%p flags=%d\n", sc, flags));
    458 
    459 	/* Notify that we are going away.  */
    460 	mutex_enter(&sc->sc_lock);
    461 	sc->sc_dying = 1;
    462 	cv_broadcast(&sc->sc_cv);
    463 	mutex_exit(&sc->sc_lock);
    464 
    465 	/*
    466 	 * Try to detach all our children.  If anything fails, bail.
    467 	 * Failure can happen if this is from drvctl -d; of course, if
    468 	 * this is a USB device being yanked, flags will have
    469 	 * DETACH_FORCE and the children will not have the option of
    470 	 * refusing detachment.
    471 	 */
    472 	for (i = 0; i < sc->sc_nrepid; i++) {
    473 		if (sc->sc_subdevs[i] == NULL)
    474 			continue;
    475 		/*
    476 		 * XXX rnd_detach_source should go in uhidev_childdet,
    477 		 * but the struct krndsource lives in the child's
    478 		 * softc, which is gone by the time of childdet.  The
    479 		 * parent uhidev_softc should be changed to allocate
    480 		 * the struct krndsource, not the child.
    481 		 */
    482 		csc = device_private(sc->sc_subdevs[i]);
    483 		rnd_detach_source(&csc->rnd_source);
    484 		rv = config_detach(sc->sc_subdevs[i], flags);
    485 		if (rv) {
    486 			rnd_attach_source(&csc->rnd_source,
    487 			    device_xname(sc->sc_dev),
    488 			    RND_TYPE_TTY, RND_FLAG_DEFAULT);
    489 			mutex_enter(&sc->sc_lock);
    490 			sc->sc_dying = 0;
    491 			mutex_exit(&sc->sc_lock);
    492 			return rv;
    493 		}
    494 	}
    495 
    496 	KASSERTMSG(sc->sc_refcnt == 0,
    497 	    "%s: %d refs remain", device_xname(sc->sc_dev), sc->sc_refcnt);
    498 	KASSERT(sc->sc_opipe == NULL);
    499 	KASSERT(sc->sc_ipipe == NULL);
    500 	KASSERT(sc->sc_ibuf == NULL);
    501 
    502 	if (sc->sc_repdesc != NULL) {
    503 		kmem_free(sc->sc_repdesc, sc->sc_repdesc_size);
    504 		sc->sc_repdesc = NULL;
    505 	}
    506 	if (sc->sc_subdevs != NULL) {
    507 		int nrepid = sc->sc_nrepid;
    508 		kmem_free(sc->sc_subdevs, nrepid * sizeof(sc->sc_subdevs[0]));
    509 		sc->sc_subdevs = NULL;
    510 	}
    511 
    512 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, sc->sc_dev);
    513 
    514 	pmf_device_deregister(self);
    515 	KASSERT(sc->sc_configlock == NULL);
    516 	KASSERT(sc->sc_writelock == NULL);
    517 	cv_destroy(&sc->sc_cv);
    518 	mutex_destroy(&sc->sc_lock);
    519 
    520 	return rv;
    521 }
    522 
    523 void
    524 uhidev_intr(struct usbd_xfer *xfer, void *addr, usbd_status status)
    525 {
    526 	struct uhidev_softc *sc = addr;
    527 	device_t cdev;
    528 	struct uhidev *scd;
    529 	u_char *p;
    530 	u_int rep;
    531 	uint32_t cc;
    532 
    533 	usbd_get_xfer_status(xfer, NULL, NULL, &cc, NULL);
    534 
    535 #ifdef UHIDEV_DEBUG
    536 	if (uhidevdebug > 5) {
    537 		uint32_t i;
    538 
    539 		DPRINTF(("uhidev_intr: status=%d cc=%d\n", status, cc));
    540 		DPRINTF(("uhidev_intr: data ="));
    541 		for (i = 0; i < cc; i++)
    542 			DPRINTF((" %02x", sc->sc_ibuf[i]));
    543 		DPRINTF(("\n"));
    544 	}
    545 #endif
    546 
    547 	if (status == USBD_CANCELLED)
    548 		return;
    549 
    550 	if (status != USBD_NORMAL_COMPLETION) {
    551 		DPRINTF(("%s: interrupt status=%d\n", device_xname(sc->sc_dev),
    552 			 status));
    553 		usbd_clear_endpoint_stall_async(sc->sc_ipipe);
    554 		return;
    555 	}
    556 
    557 	p = sc->sc_ibuf;
    558 	if (sc->sc_nrepid != 1)
    559 		rep = *p++, cc--;
    560 	else
    561 		rep = 0;
    562 	if (rep >= sc->sc_nrepid) {
    563 		printf("uhidev_intr: bad repid %d\n", rep);
    564 		return;
    565 	}
    566 	cdev = sc->sc_subdevs[rep];
    567 	if (!cdev)
    568 		return;
    569 	scd = device_private(cdev);
    570 	DPRINTFN(5,("uhidev_intr: rep=%d, scd=%p state=%#x\n",
    571 		    rep, scd, scd ? scd->sc_state : 0));
    572 	if (!(scd->sc_state & UHIDEV_OPEN))
    573 		return;
    574 #ifdef UHIDEV_DEBUG
    575 	if (scd->sc_in_rep_size != cc) {
    576 		DPRINTF(("%s: expected %d bytes, got %d\n",
    577 		       device_xname(sc->sc_dev), scd->sc_in_rep_size, cc));
    578 	}
    579 #endif
    580 	if (cc == 0) {
    581 		DPRINTF(("%s: 0-length input ignored\n",
    582 			device_xname(sc->sc_dev)));
    583 		return;
    584 	}
    585 	rnd_add_uint32(&scd->rnd_source, (uintptr_t)(sc->sc_ibuf));
    586 	scd->sc_intr(scd, p, cc);
    587 }
    588 
    589 void
    590 uhidev_get_report_desc(struct uhidev_softc *sc, void **desc, int *size)
    591 {
    592 	*desc = sc->sc_repdesc;
    593 	*size = sc->sc_repdesc_size;
    594 }
    595 
    596 static int
    597 uhidev_config_enter(struct uhidev_softc *sc)
    598 {
    599 	int error;
    600 
    601 	KASSERT(mutex_owned(&sc->sc_lock));
    602 
    603 	for (;;) {
    604 		if (sc->sc_dying)
    605 			return ENXIO;
    606 		if (sc->sc_configlock == NULL)
    607 			break;
    608 		error = cv_wait_sig(&sc->sc_cv, &sc->sc_lock);
    609 		if (error)
    610 			return error;
    611 	}
    612 
    613 	sc->sc_configlock = curlwp;
    614 	return 0;
    615 }
    616 
    617 static void
    618 uhidev_config_enter_nointr(struct uhidev_softc *sc)
    619 {
    620 
    621 	KASSERT(mutex_owned(&sc->sc_lock));
    622 
    623 	while (sc->sc_configlock)
    624 		cv_wait(&sc->sc_cv, &sc->sc_lock);
    625 	sc->sc_configlock = curlwp;
    626 }
    627 
    628 static void
    629 uhidev_config_exit(struct uhidev_softc *sc)
    630 {
    631 
    632 	KASSERT(mutex_owned(&sc->sc_lock));
    633 	KASSERTMSG(sc->sc_configlock == curlwp, "%s: migrated from %p to %p",
    634 	    device_xname(sc->sc_dev), curlwp, sc->sc_configlock);
    635 
    636 	sc->sc_configlock = NULL;
    637 	cv_broadcast(&sc->sc_cv);
    638 }
    639 
    640 /*
    641  * uhidev_open_pipes(sc)
    642  *
    643  *	Ensure the pipes of the softc are open.  Caller must hold
    644  *	sc_lock, which may be released and reacquired.
    645  */
    646 static int
    647 uhidev_open_pipes(struct uhidev_softc *sc)
    648 {
    649 	usbd_status err;
    650 	int error;
    651 
    652 	KASSERT(mutex_owned(&sc->sc_lock));
    653 
    654 	/* If the device is dying, refuse.  */
    655 	if (sc->sc_dying)
    656 		return ENXIO;
    657 
    658 	/*
    659 	 * If the pipes are already open, just increment the reference
    660 	 * count, or fail if it would overflow.
    661 	 */
    662 	if (sc->sc_refcnt) {
    663 		if (sc->sc_refcnt == INT_MAX)
    664 			return EBUSY;
    665 		sc->sc_refcnt++;
    666 		return 0;
    667 	}
    668 
    669 	/*
    670 	 * If there's no input data to prepare, don't bother with the
    671 	 * pipes.  We assume any device that does output also does
    672 	 * input; if you have a device where this is wrong, then
    673 	 * uhidev_write will fail gracefully (it checks sc->sc_opipe),
    674 	 * and you can use that device to test the changes needed to
    675 	 * open the output pipe here.
    676 	 */
    677 	if (sc->sc_isize == 0)
    678 		return 0;
    679 
    680 	/*
    681 	 * Lock the configuration and release sc_lock we may sleep to
    682 	 * allocate.  If someone else got in first, we're done;
    683 	 * otherwise open the pipes.
    684 	 */
    685 	error = uhidev_config_enter(sc);
    686 	if (error)
    687 		goto out;
    688 	if (sc->sc_refcnt) {
    689 		if (sc->sc_refcnt == INT_MAX) {
    690 			error = EBUSY;
    691 		} else {
    692 			sc->sc_refcnt++;
    693 			error = 0;
    694 		}
    695 		goto out0;
    696 	}
    697 	mutex_exit(&sc->sc_lock);
    698 
    699 	/* Allocate an input buffer.  */
    700 	sc->sc_ibuf = kmem_alloc(sc->sc_isize, KM_SLEEP);
    701 
    702 	/* Set up input interrupt pipe. */
    703 	DPRINTF(("%s: isize=%d, ep=0x%02x\n", __func__, sc->sc_isize,
    704 		 sc->sc_iep_addr));
    705 
    706 	err = usbd_open_pipe_intr(sc->sc_iface, sc->sc_iep_addr,
    707 		  USBD_SHORT_XFER_OK, &sc->sc_ipipe, sc, sc->sc_ibuf,
    708 		  sc->sc_isize, uhidev_intr, USBD_DEFAULT_INTERVAL);
    709 	if (err != USBD_NORMAL_COMPLETION) {
    710 		DPRINTF(("uhidopen: usbd_open_pipe_intr failed, "
    711 		    "error=%d\n", err));
    712 		error = EIO;
    713 		goto out1;
    714 	}
    715 
    716 	/*
    717 	 * Set up output interrupt pipe if an output interrupt endpoint
    718 	 * exists.
    719 	 */
    720 	if (sc->sc_oep_addr != -1) {
    721 		DPRINTF(("uhidev_open: oep=0x%02x\n", sc->sc_oep_addr));
    722 
    723 		err = usbd_open_pipe(sc->sc_iface, sc->sc_oep_addr,
    724 		    0, &sc->sc_opipe);
    725 
    726 		if (err != USBD_NORMAL_COMPLETION) {
    727 			DPRINTF(("uhidev_open: usbd_open_pipe failed, "
    728 			    "error=%d\n", err));
    729 			error = EIO;
    730 			goto out2;
    731 		}
    732 		DPRINTF(("uhidev_open: sc->sc_opipe=%p\n", sc->sc_opipe));
    733 
    734 		error = usbd_create_xfer(sc->sc_opipe, UHIDEV_OSIZE, 0, 0,
    735 		    &sc->sc_oxfer);
    736 		if (error) {
    737 			DPRINTF(("uhidev_open: couldn't allocate an xfer\n"));
    738 			goto out3;
    739 		}
    740 
    741 		if (sc->sc_flags & UHIDEV_F_XB1) {
    742 			uint8_t init_data[] = { 0x05, 0x20 };
    743 			int init_data_len = sizeof(init_data);
    744 			err = usbd_intr_transfer(sc->sc_oxfer, sc->sc_opipe, 0,
    745 			    USBD_NO_TIMEOUT, init_data, &init_data_len);
    746 			if (err != USBD_NORMAL_COMPLETION) {
    747 				DPRINTF(("uhidev_open: xb1 init failed, "
    748 				    "error=%d\n", err));
    749 				error = EIO;
    750 				goto out4;
    751 			}
    752 		}
    753 	}
    754 
    755 	/* Success!  */
    756 	mutex_enter(&sc->sc_lock);
    757 	KASSERTMSG(sc->sc_refcnt == 0, "%d refs spuriously acquired",
    758 	    sc->sc_refcnt);
    759 	sc->sc_refcnt++;
    760 	goto out0;
    761 
    762 out4:	if (sc->sc_oxfer) {
    763 		usbd_abort_pipe(sc->sc_opipe);
    764 		usbd_destroy_xfer(sc->sc_oxfer);
    765 		sc->sc_oxfer = NULL;
    766 	}
    767 out3:	if (sc->sc_opipe) {
    768 		usbd_close_pipe(sc->sc_opipe);
    769 		sc->sc_opipe = NULL;
    770 	}
    771 out2:	if (sc->sc_ipipe) {
    772 		usbd_abort_pipe(sc->sc_ipipe);
    773 		usbd_close_pipe(sc->sc_ipipe);
    774 		sc->sc_ipipe = NULL;
    775 	}
    776 out1:	kmem_free(sc->sc_ibuf, sc->sc_isize);
    777 	sc->sc_ibuf = NULL;
    778 	mutex_enter(&sc->sc_lock);
    779 out0:	KASSERT(mutex_owned(&sc->sc_lock));
    780 	uhidev_config_exit(sc);
    781 out:	KASSERT(mutex_owned(&sc->sc_lock));
    782 	return error;
    783 }
    784 
    785 static void
    786 uhidev_close_pipes(struct uhidev_softc *sc)
    787 {
    788 
    789 	KASSERT(mutex_owned(&sc->sc_lock));
    790 	KASSERTMSG(sc->sc_refcnt > 0, "%s: refcnt fouled: %d",
    791 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    792 
    793 	/* If this isn't the last reference, just decrement.  */
    794 	if (sc->sc_refcnt > 1) {
    795 		sc->sc_refcnt--;
    796 		return;
    797 	}
    798 
    799 	/*
    800 	 * Lock the configuration and release sc_lock so we may sleep
    801 	 * to free memory.  We're not waiting for anyone to allocate or
    802 	 * free anything.
    803 	 */
    804 	uhidev_config_enter_nointr(sc);
    805 
    806 	/*
    807 	 * If someone else acquired a reference while we were waiting
    808 	 * for the config lock, nothing more for us to do.
    809 	 */
    810 	if (sc->sc_refcnt > 1) {
    811 		sc->sc_refcnt--;
    812 		uhidev_config_exit(sc);
    813 		return;
    814 	}
    815 
    816 	/*
    817 	 * We're the last reference and committed to closing the pipes.
    818 	 * Decrement the reference count before we release the lock --
    819 	 * access to the pipes is allowed as long as the reference
    820 	 * count is positive, so this forces all new opens to wait
    821 	 * until the config lock is released.
    822 	 */
    823 	KASSERTMSG(sc->sc_refcnt == 1, "%s: refcnt fouled: %d",
    824 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    825 	sc->sc_refcnt--;
    826 	mutex_exit(&sc->sc_lock);
    827 
    828 	if (sc->sc_oxfer) {
    829 		usbd_abort_pipe(sc->sc_opipe);
    830 		usbd_destroy_xfer(sc->sc_oxfer);
    831 		sc->sc_oxfer = NULL;
    832 	}
    833 	if (sc->sc_opipe) {
    834 		usbd_close_pipe(sc->sc_opipe);
    835 		sc->sc_opipe = NULL;
    836 	}
    837 	if (sc->sc_ipipe) {
    838 		usbd_abort_pipe(sc->sc_ipipe);
    839 		usbd_close_pipe(sc->sc_ipipe);
    840 		sc->sc_ipipe = NULL;
    841 	}
    842 	kmem_free(sc->sc_ibuf, sc->sc_isize);
    843 	sc->sc_ibuf = NULL;
    844 
    845 	mutex_enter(&sc->sc_lock);
    846 	uhidev_config_exit(sc);
    847 	KASSERTMSG(sc->sc_refcnt == 0, "%s: refcnt fouled: %d",
    848 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    849 }
    850 
    851 int
    852 uhidev_open(struct uhidev *scd)
    853 {
    854 	struct uhidev_softc *sc = scd->sc_parent;
    855 	int error;
    856 
    857 	mutex_enter(&sc->sc_lock);
    858 
    859 	DPRINTF(("uhidev_open(%s, report %d = %s): state=%x refcnt=%d\n",
    860 		device_xname(sc->sc_dev),
    861 		scd->sc_report_id,
    862 		device_xname(scd->sc_dev),
    863 		scd->sc_state,
    864 		sc->sc_refcnt));
    865 
    866 	/* Mark the report id open.  This is an exclusive lock.  */
    867 	if (scd->sc_state & UHIDEV_OPEN) {
    868 		error = EBUSY;
    869 		goto fail0;
    870 	}
    871 	scd->sc_state |= UHIDEV_OPEN;
    872 
    873 	/* Open the pipes which are shared by all report ids.  */
    874 	error = uhidev_open_pipes(sc);
    875 	if (error)
    876 		goto fail1;
    877 
    878 	mutex_exit(&sc->sc_lock);
    879 
    880 	/* Success!  */
    881 	return 0;
    882 
    883 fail2: __unused
    884 	uhidev_close_pipes(sc);
    885 fail1:	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    886 	    "%s: report id %d: closed while opening",
    887 	    device_xname(sc->sc_dev), scd->sc_report_id);
    888 	scd->sc_state &= ~UHIDEV_OPEN;
    889 fail0:	mutex_exit(&sc->sc_lock);
    890 	return error;
    891 }
    892 
    893 void
    894 uhidev_stop(struct uhidev *scd)
    895 {
    896 	struct uhidev_softc *sc = scd->sc_parent;
    897 	bool abort = false;
    898 
    899 	mutex_enter(&sc->sc_lock);
    900 	if (sc->sc_writereportid == scd->sc_report_id)
    901 		abort = true;
    902 	mutex_exit(&sc->sc_lock);
    903 
    904 	if (abort && sc->sc_opipe)
    905 		usbd_abort_pipe(sc->sc_opipe);
    906 }
    907 
    908 void
    909 uhidev_close(struct uhidev *scd)
    910 {
    911 	struct uhidev_softc *sc = scd->sc_parent;
    912 
    913 	mutex_enter(&sc->sc_lock);
    914 
    915 	DPRINTF(("uhidev_close(%s, report %d = %s): state=%x refcnt=%d\n",
    916 		device_xname(sc->sc_dev),
    917 		scd->sc_report_id,
    918 		device_xname(scd->sc_dev),
    919 		scd->sc_state,
    920 		sc->sc_refcnt));
    921 
    922 	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    923 	    "%s: report id %d: unpaired close",
    924 	    device_xname(sc->sc_dev), scd->sc_report_id);
    925 	uhidev_close_pipes(sc);
    926 	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    927 	    "%s: report id %d: closed while closing",
    928 	    device_xname(sc->sc_dev), scd->sc_report_id);
    929 	scd->sc_state &= ~UHIDEV_OPEN;
    930 
    931 	mutex_exit(&sc->sc_lock);
    932 }
    933 
    934 usbd_status
    935 uhidev_set_report(struct uhidev *scd, int type, void *data, int len)
    936 {
    937 	char *buf;
    938 	usbd_status retstat;
    939 
    940 	if (scd->sc_report_id == 0)
    941 		return usbd_set_report(scd->sc_parent->sc_iface, type,
    942 				       scd->sc_report_id, data, len);
    943 
    944 	buf = kmem_alloc(len + 1, KM_SLEEP);
    945 	buf[0] = scd->sc_report_id;
    946 	memcpy(buf+1, data, len);
    947 
    948 	retstat = usbd_set_report(scd->sc_parent->sc_iface, type,
    949 				  scd->sc_report_id, buf, len + 1);
    950 
    951 	kmem_free(buf, len + 1);
    952 
    953 	return retstat;
    954 }
    955 
    956 usbd_status
    957 uhidev_get_report(struct uhidev *scd, int type, void *data, int len)
    958 {
    959 	return usbd_get_report(scd->sc_parent->sc_iface, type,
    960 			       scd->sc_report_id, data, len);
    961 }
    962 
    963 usbd_status
    964 uhidev_write(struct uhidev_softc *sc, void *data, int len)
    965 {
    966 	usbd_status err;
    967 
    968 	DPRINTF(("uhidev_write: data=%p, len=%d\n", data, len));
    969 
    970 	if (sc->sc_opipe == NULL)
    971 		return USBD_INVAL;
    972 
    973 	mutex_enter(&sc->sc_lock);
    974 	KASSERT(sc->sc_refcnt);
    975 	for (;;) {
    976 		if (sc->sc_dying) {
    977 			err = USBD_IOERROR;
    978 			goto out;
    979 		}
    980 		if (sc->sc_writelock == NULL)
    981 			break;
    982 		if (cv_wait_sig(&sc->sc_cv, &sc->sc_lock)) {
    983 			err = USBD_INTERRUPTED;
    984 			goto out;
    985 		}
    986 	}
    987 	sc->sc_writelock = curlwp;
    988 	mutex_exit(&sc->sc_lock);
    989 
    990 #ifdef UHIDEV_DEBUG
    991 	if (uhidevdebug > 50) {
    992 
    993 		uint32_t i;
    994 		uint8_t *d = data;
    995 
    996 		DPRINTF(("uhidev_write: data ="));
    997 		for (i = 0; i < len; i++)
    998 			DPRINTF((" %02x", d[i]));
    999 		DPRINTF(("\n"));
   1000 	}
   1001 #endif
   1002 	err = usbd_intr_transfer(sc->sc_oxfer, sc->sc_opipe, 0,
   1003 	    USBD_NO_TIMEOUT, data, &len);
   1004 
   1005 	mutex_enter(&sc->sc_lock);
   1006 	KASSERT(sc->sc_refcnt);
   1007 	KASSERTMSG(sc->sc_writelock == curlwp, "%s: migrated from %p to %p",
   1008 	    device_xname(sc->sc_dev), curlwp, sc->sc_writelock);
   1009 	sc->sc_writelock = NULL;
   1010 	cv_broadcast(&sc->sc_cv);
   1011 out:	mutex_exit(&sc->sc_lock);
   1012 	return err;
   1013 }
   1014