Home | History | Annotate | Line # | Download | only in usb
uhidev.c revision 1.79.2.2
      1 /*	$NetBSD: uhidev.c,v 1.79.2.2 2021/03/22 16:23:46 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.79.2.2 2021/03/22 16:23:46 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 					   CFARG_SUBMATCH, config_stdsubmatch,
    366 					   CFARG_LOCATORS, locs,
    367 					   CFARG_EOL);
    368 			sc->sc_subdevs[repid] = dev;
    369 			if (dev != NULL) {
    370 				csc = device_private(dev);
    371 				csc->sc_in_rep_size = repsizes[repid];
    372 #ifdef DIAGNOSTIC
    373 				DPRINTF(("uhidev_match: repid=%d dev=%p\n",
    374 					 repid, dev));
    375 				if (csc->sc_intr == NULL) {
    376 					kmem_free(repsizes,
    377 					    nrepid * sizeof(*repsizes));
    378 					aprint_error_dev(self,
    379 					    "sc_intr == NULL\n");
    380 					return;
    381 				}
    382 #endif
    383 				rnd_attach_source(&csc->rnd_source,
    384 						  device_xname(dev),
    385 						  RND_TYPE_TTY,
    386 						  RND_FLAG_DEFAULT);
    387 			}
    388 		}
    389 	}
    390 	kmem_free(repsizes, nrepid * sizeof(*repsizes));
    391 
    392 	return;
    393 }
    394 
    395 int
    396 uhidev_maxrepid(void *buf, int len)
    397 {
    398 	struct hid_data *d;
    399 	struct hid_item h;
    400 	int maxid;
    401 
    402 	maxid = -1;
    403 	h.report_ID = 0;
    404 	for (d = hid_start_parse(buf, len, hid_none); hid_get_item(d, &h); )
    405 		if ((int)h.report_ID > maxid)
    406 			maxid = h.report_ID;
    407 	hid_end_parse(d);
    408 	return maxid;
    409 }
    410 
    411 int
    412 uhidevprint(void *aux, const char *pnp)
    413 {
    414 	struct uhidev_attach_arg *uha = aux;
    415 
    416 	if (pnp)
    417 		aprint_normal("uhid at %s", pnp);
    418 	if (uha->reportid != 0)
    419 		aprint_normal(" reportid %d", uha->reportid);
    420 	return UNCONF;
    421 }
    422 
    423 static int
    424 uhidev_activate(device_t self, enum devact act)
    425 {
    426 	struct uhidev_softc *sc = device_private(self);
    427 
    428 	switch (act) {
    429 	case DVACT_DEACTIVATE:
    430 		sc->sc_dying = 1;
    431 		return 0;
    432 	default:
    433 		return EOPNOTSUPP;
    434 	}
    435 }
    436 
    437 static void
    438 uhidev_childdet(device_t self, device_t child)
    439 {
    440 	int i;
    441 	struct uhidev_softc *sc = device_private(self);
    442 
    443 	for (i = 0; i < sc->sc_nrepid; i++) {
    444 		if (sc->sc_subdevs[i] == child)
    445 			break;
    446 	}
    447 	KASSERT(i < sc->sc_nrepid);
    448 	sc->sc_subdevs[i] = NULL;
    449 }
    450 
    451 static int
    452 uhidev_detach(device_t self, int flags)
    453 {
    454 	struct uhidev_softc *sc = device_private(self);
    455 	int i, rv;
    456 	struct uhidev *csc;
    457 
    458 	DPRINTF(("uhidev_detach: sc=%p flags=%d\n", sc, flags));
    459 
    460 	/* Notify that we are going away.  */
    461 	mutex_enter(&sc->sc_lock);
    462 	sc->sc_dying = 1;
    463 	cv_broadcast(&sc->sc_cv);
    464 	mutex_exit(&sc->sc_lock);
    465 
    466 	/*
    467 	 * Try to detach all our children.  If anything fails, bail.
    468 	 * Failure can happen if this is from drvctl -d; of course, if
    469 	 * this is a USB device being yanked, flags will have
    470 	 * DETACH_FORCE and the children will not have the option of
    471 	 * refusing detachment.
    472 	 */
    473 	for (i = 0; i < sc->sc_nrepid; i++) {
    474 		if (sc->sc_subdevs[i] == NULL)
    475 			continue;
    476 		/*
    477 		 * XXX rnd_detach_source should go in uhidev_childdet,
    478 		 * but the struct krndsource lives in the child's
    479 		 * softc, which is gone by the time of childdet.  The
    480 		 * parent uhidev_softc should be changed to allocate
    481 		 * the struct krndsource, not the child.
    482 		 */
    483 		csc = device_private(sc->sc_subdevs[i]);
    484 		rnd_detach_source(&csc->rnd_source);
    485 		rv = config_detach(sc->sc_subdevs[i], flags);
    486 		if (rv) {
    487 			rnd_attach_source(&csc->rnd_source,
    488 			    device_xname(sc->sc_dev),
    489 			    RND_TYPE_TTY, RND_FLAG_DEFAULT);
    490 			mutex_enter(&sc->sc_lock);
    491 			sc->sc_dying = 0;
    492 			mutex_exit(&sc->sc_lock);
    493 			return rv;
    494 		}
    495 	}
    496 
    497 	KASSERTMSG(sc->sc_refcnt == 0,
    498 	    "%s: %d refs remain", device_xname(sc->sc_dev), sc->sc_refcnt);
    499 	KASSERT(sc->sc_opipe == NULL);
    500 	KASSERT(sc->sc_ipipe == NULL);
    501 	KASSERT(sc->sc_ibuf == NULL);
    502 
    503 	if (sc->sc_repdesc != NULL) {
    504 		kmem_free(sc->sc_repdesc, sc->sc_repdesc_size);
    505 		sc->sc_repdesc = NULL;
    506 	}
    507 	if (sc->sc_subdevs != NULL) {
    508 		int nrepid = sc->sc_nrepid;
    509 		kmem_free(sc->sc_subdevs, nrepid * sizeof(sc->sc_subdevs[0]));
    510 		sc->sc_subdevs = NULL;
    511 	}
    512 
    513 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev, sc->sc_dev);
    514 
    515 	pmf_device_deregister(self);
    516 	KASSERT(sc->sc_configlock == NULL);
    517 	KASSERT(sc->sc_writelock == NULL);
    518 	cv_destroy(&sc->sc_cv);
    519 	mutex_destroy(&sc->sc_lock);
    520 
    521 	return rv;
    522 }
    523 
    524 void
    525 uhidev_intr(struct usbd_xfer *xfer, void *addr, usbd_status status)
    526 {
    527 	struct uhidev_softc *sc = addr;
    528 	device_t cdev;
    529 	struct uhidev *scd;
    530 	u_char *p;
    531 	u_int rep;
    532 	uint32_t cc;
    533 
    534 	usbd_get_xfer_status(xfer, NULL, NULL, &cc, NULL);
    535 
    536 #ifdef UHIDEV_DEBUG
    537 	if (uhidevdebug > 5) {
    538 		uint32_t i;
    539 
    540 		DPRINTF(("uhidev_intr: status=%d cc=%d\n", status, cc));
    541 		DPRINTF(("uhidev_intr: data ="));
    542 		for (i = 0; i < cc; i++)
    543 			DPRINTF((" %02x", sc->sc_ibuf[i]));
    544 		DPRINTF(("\n"));
    545 	}
    546 #endif
    547 
    548 	if (status == USBD_CANCELLED)
    549 		return;
    550 
    551 	if (status != USBD_NORMAL_COMPLETION) {
    552 		DPRINTF(("%s: interrupt status=%d\n", device_xname(sc->sc_dev),
    553 			 status));
    554 		usbd_clear_endpoint_stall_async(sc->sc_ipipe);
    555 		return;
    556 	}
    557 
    558 	p = sc->sc_ibuf;
    559 	if (sc->sc_nrepid != 1)
    560 		rep = *p++, cc--;
    561 	else
    562 		rep = 0;
    563 	if (rep >= sc->sc_nrepid) {
    564 		printf("uhidev_intr: bad repid %d\n", rep);
    565 		return;
    566 	}
    567 	cdev = sc->sc_subdevs[rep];
    568 	if (!cdev)
    569 		return;
    570 	scd = device_private(cdev);
    571 	DPRINTFN(5,("uhidev_intr: rep=%d, scd=%p state=%#x\n",
    572 		    rep, scd, scd ? scd->sc_state : 0));
    573 	if (!(scd->sc_state & UHIDEV_OPEN))
    574 		return;
    575 #ifdef UHIDEV_DEBUG
    576 	if (scd->sc_in_rep_size != cc) {
    577 		DPRINTF(("%s: expected %d bytes, got %d\n",
    578 		       device_xname(sc->sc_dev), scd->sc_in_rep_size, cc));
    579 	}
    580 #endif
    581 	if (cc == 0) {
    582 		DPRINTF(("%s: 0-length input ignored\n",
    583 			device_xname(sc->sc_dev)));
    584 		return;
    585 	}
    586 	rnd_add_uint32(&scd->rnd_source, (uintptr_t)(sc->sc_ibuf));
    587 	scd->sc_intr(scd, p, cc);
    588 }
    589 
    590 void
    591 uhidev_get_report_desc(struct uhidev_softc *sc, void **desc, int *size)
    592 {
    593 	*desc = sc->sc_repdesc;
    594 	*size = sc->sc_repdesc_size;
    595 }
    596 
    597 static int
    598 uhidev_config_enter(struct uhidev_softc *sc)
    599 {
    600 	int error;
    601 
    602 	KASSERT(mutex_owned(&sc->sc_lock));
    603 
    604 	for (;;) {
    605 		if (sc->sc_dying)
    606 			return ENXIO;
    607 		if (sc->sc_configlock == NULL)
    608 			break;
    609 		error = cv_wait_sig(&sc->sc_cv, &sc->sc_lock);
    610 		if (error)
    611 			return error;
    612 	}
    613 
    614 	sc->sc_configlock = curlwp;
    615 	return 0;
    616 }
    617 
    618 static void
    619 uhidev_config_enter_nointr(struct uhidev_softc *sc)
    620 {
    621 
    622 	KASSERT(mutex_owned(&sc->sc_lock));
    623 
    624 	while (sc->sc_configlock)
    625 		cv_wait(&sc->sc_cv, &sc->sc_lock);
    626 	sc->sc_configlock = curlwp;
    627 }
    628 
    629 static void
    630 uhidev_config_exit(struct uhidev_softc *sc)
    631 {
    632 
    633 	KASSERT(mutex_owned(&sc->sc_lock));
    634 	KASSERTMSG(sc->sc_configlock == curlwp, "%s: migrated from %p to %p",
    635 	    device_xname(sc->sc_dev), curlwp, sc->sc_configlock);
    636 
    637 	sc->sc_configlock = NULL;
    638 	cv_broadcast(&sc->sc_cv);
    639 }
    640 
    641 /*
    642  * uhidev_open_pipes(sc)
    643  *
    644  *	Ensure the pipes of the softc are open.  Caller must hold
    645  *	sc_lock, which may be released and reacquired.
    646  */
    647 static int
    648 uhidev_open_pipes(struct uhidev_softc *sc)
    649 {
    650 	usbd_status err;
    651 	int error;
    652 
    653 	KASSERT(mutex_owned(&sc->sc_lock));
    654 
    655 	/* If the device is dying, refuse.  */
    656 	if (sc->sc_dying)
    657 		return ENXIO;
    658 
    659 	/*
    660 	 * If the pipes are already open, just increment the reference
    661 	 * count, or fail if it would overflow.
    662 	 */
    663 	if (sc->sc_refcnt) {
    664 		if (sc->sc_refcnt == INT_MAX)
    665 			return EBUSY;
    666 		sc->sc_refcnt++;
    667 		return 0;
    668 	}
    669 
    670 	/*
    671 	 * If there's no input data to prepare, don't bother with the
    672 	 * pipes.  We assume any device that does output also does
    673 	 * input; if you have a device where this is wrong, then
    674 	 * uhidev_write will fail gracefully (it checks sc->sc_opipe),
    675 	 * and you can use that device to test the changes needed to
    676 	 * open the output pipe here.
    677 	 */
    678 	if (sc->sc_isize == 0)
    679 		return 0;
    680 
    681 	/*
    682 	 * Lock the configuration and release sc_lock we may sleep to
    683 	 * allocate.  If someone else got in first, we're done;
    684 	 * otherwise open the pipes.
    685 	 */
    686 	error = uhidev_config_enter(sc);
    687 	if (error)
    688 		goto out;
    689 	if (sc->sc_refcnt) {
    690 		if (sc->sc_refcnt == INT_MAX) {
    691 			error = EBUSY;
    692 		} else {
    693 			sc->sc_refcnt++;
    694 			error = 0;
    695 		}
    696 		goto out0;
    697 	}
    698 	mutex_exit(&sc->sc_lock);
    699 
    700 	/* Allocate an input buffer.  */
    701 	sc->sc_ibuf = kmem_alloc(sc->sc_isize, KM_SLEEP);
    702 
    703 	/* Set up input interrupt pipe. */
    704 	DPRINTF(("%s: isize=%d, ep=0x%02x\n", __func__, sc->sc_isize,
    705 		 sc->sc_iep_addr));
    706 
    707 	err = usbd_open_pipe_intr(sc->sc_iface, sc->sc_iep_addr,
    708 		  USBD_SHORT_XFER_OK, &sc->sc_ipipe, sc, sc->sc_ibuf,
    709 		  sc->sc_isize, uhidev_intr, USBD_DEFAULT_INTERVAL);
    710 	if (err != USBD_NORMAL_COMPLETION) {
    711 		DPRINTF(("uhidopen: usbd_open_pipe_intr failed, "
    712 		    "error=%d\n", err));
    713 		error = EIO;
    714 		goto out1;
    715 	}
    716 
    717 	/*
    718 	 * Set up output interrupt pipe if an output interrupt endpoint
    719 	 * exists.
    720 	 */
    721 	if (sc->sc_oep_addr != -1) {
    722 		DPRINTF(("uhidev_open: oep=0x%02x\n", sc->sc_oep_addr));
    723 
    724 		err = usbd_open_pipe(sc->sc_iface, sc->sc_oep_addr,
    725 		    0, &sc->sc_opipe);
    726 
    727 		if (err != USBD_NORMAL_COMPLETION) {
    728 			DPRINTF(("uhidev_open: usbd_open_pipe failed, "
    729 			    "error=%d\n", err));
    730 			error = EIO;
    731 			goto out2;
    732 		}
    733 		DPRINTF(("uhidev_open: sc->sc_opipe=%p\n", sc->sc_opipe));
    734 
    735 		error = usbd_create_xfer(sc->sc_opipe, UHIDEV_OSIZE, 0, 0,
    736 		    &sc->sc_oxfer);
    737 		if (error) {
    738 			DPRINTF(("uhidev_open: couldn't allocate an xfer\n"));
    739 			goto out3;
    740 		}
    741 
    742 		if (sc->sc_flags & UHIDEV_F_XB1) {
    743 			uint8_t init_data[] = { 0x05, 0x20 };
    744 			int init_data_len = sizeof(init_data);
    745 			err = usbd_intr_transfer(sc->sc_oxfer, sc->sc_opipe, 0,
    746 			    USBD_NO_TIMEOUT, init_data, &init_data_len);
    747 			if (err != USBD_NORMAL_COMPLETION) {
    748 				DPRINTF(("uhidev_open: xb1 init failed, "
    749 				    "error=%d\n", err));
    750 				error = EIO;
    751 				goto out4;
    752 			}
    753 		}
    754 	}
    755 
    756 	/* Success!  */
    757 	mutex_enter(&sc->sc_lock);
    758 	KASSERTMSG(sc->sc_refcnt == 0, "%d refs spuriously acquired",
    759 	    sc->sc_refcnt);
    760 	sc->sc_refcnt++;
    761 	goto out0;
    762 
    763 out4:	if (sc->sc_oxfer) {
    764 		usbd_abort_pipe(sc->sc_opipe);
    765 		usbd_destroy_xfer(sc->sc_oxfer);
    766 		sc->sc_oxfer = NULL;
    767 	}
    768 out3:	if (sc->sc_opipe) {
    769 		usbd_close_pipe(sc->sc_opipe);
    770 		sc->sc_opipe = NULL;
    771 	}
    772 out2:	if (sc->sc_ipipe) {
    773 		usbd_abort_pipe(sc->sc_ipipe);
    774 		usbd_close_pipe(sc->sc_ipipe);
    775 		sc->sc_ipipe = NULL;
    776 	}
    777 out1:	kmem_free(sc->sc_ibuf, sc->sc_isize);
    778 	sc->sc_ibuf = NULL;
    779 	mutex_enter(&sc->sc_lock);
    780 out0:	KASSERT(mutex_owned(&sc->sc_lock));
    781 	uhidev_config_exit(sc);
    782 out:	KASSERT(mutex_owned(&sc->sc_lock));
    783 	return error;
    784 }
    785 
    786 static void
    787 uhidev_close_pipes(struct uhidev_softc *sc)
    788 {
    789 
    790 	KASSERT(mutex_owned(&sc->sc_lock));
    791 	KASSERTMSG(sc->sc_refcnt > 0, "%s: refcnt fouled: %d",
    792 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    793 
    794 	/* If this isn't the last reference, just decrement.  */
    795 	if (sc->sc_refcnt > 1) {
    796 		sc->sc_refcnt--;
    797 		return;
    798 	}
    799 
    800 	/*
    801 	 * Lock the configuration and release sc_lock so we may sleep
    802 	 * to free memory.  We're not waiting for anyone to allocate or
    803 	 * free anything.
    804 	 */
    805 	uhidev_config_enter_nointr(sc);
    806 
    807 	/*
    808 	 * If someone else acquired a reference while we were waiting
    809 	 * for the config lock, nothing more for us to do.
    810 	 */
    811 	if (sc->sc_refcnt > 1) {
    812 		sc->sc_refcnt--;
    813 		uhidev_config_exit(sc);
    814 		return;
    815 	}
    816 
    817 	/*
    818 	 * We're the last reference and committed to closing the pipes.
    819 	 * Decrement the reference count before we release the lock --
    820 	 * access to the pipes is allowed as long as the reference
    821 	 * count is positive, so this forces all new opens to wait
    822 	 * until the config lock is released.
    823 	 */
    824 	KASSERTMSG(sc->sc_refcnt == 1, "%s: refcnt fouled: %d",
    825 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    826 	sc->sc_refcnt--;
    827 	mutex_exit(&sc->sc_lock);
    828 
    829 	if (sc->sc_oxfer) {
    830 		usbd_abort_pipe(sc->sc_opipe);
    831 		usbd_destroy_xfer(sc->sc_oxfer);
    832 		sc->sc_oxfer = NULL;
    833 	}
    834 	if (sc->sc_opipe) {
    835 		usbd_close_pipe(sc->sc_opipe);
    836 		sc->sc_opipe = NULL;
    837 	}
    838 	if (sc->sc_ipipe) {
    839 		usbd_abort_pipe(sc->sc_ipipe);
    840 		usbd_close_pipe(sc->sc_ipipe);
    841 		sc->sc_ipipe = NULL;
    842 	}
    843 	kmem_free(sc->sc_ibuf, sc->sc_isize);
    844 	sc->sc_ibuf = NULL;
    845 
    846 	mutex_enter(&sc->sc_lock);
    847 	uhidev_config_exit(sc);
    848 	KASSERTMSG(sc->sc_refcnt == 0, "%s: refcnt fouled: %d",
    849 	    device_xname(sc->sc_dev), sc->sc_refcnt);
    850 }
    851 
    852 int
    853 uhidev_open(struct uhidev *scd)
    854 {
    855 	struct uhidev_softc *sc = scd->sc_parent;
    856 	int error;
    857 
    858 	mutex_enter(&sc->sc_lock);
    859 
    860 	DPRINTF(("uhidev_open(%s, report %d = %s): state=%x refcnt=%d\n",
    861 		device_xname(sc->sc_dev),
    862 		scd->sc_report_id,
    863 		device_xname(scd->sc_dev),
    864 		scd->sc_state,
    865 		sc->sc_refcnt));
    866 
    867 	/* Mark the report id open.  This is an exclusive lock.  */
    868 	if (scd->sc_state & UHIDEV_OPEN) {
    869 		error = EBUSY;
    870 		goto fail0;
    871 	}
    872 	scd->sc_state |= UHIDEV_OPEN;
    873 
    874 	/* Open the pipes which are shared by all report ids.  */
    875 	error = uhidev_open_pipes(sc);
    876 	if (error)
    877 		goto fail1;
    878 
    879 	mutex_exit(&sc->sc_lock);
    880 
    881 	/* Success!  */
    882 	return 0;
    883 
    884 fail2: __unused
    885 	uhidev_close_pipes(sc);
    886 fail1:	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    887 	    "%s: report id %d: closed while opening",
    888 	    device_xname(sc->sc_dev), scd->sc_report_id);
    889 	scd->sc_state &= ~UHIDEV_OPEN;
    890 fail0:	mutex_exit(&sc->sc_lock);
    891 	return error;
    892 }
    893 
    894 void
    895 uhidev_stop(struct uhidev *scd)
    896 {
    897 	struct uhidev_softc *sc = scd->sc_parent;
    898 	bool abort = false;
    899 
    900 	mutex_enter(&sc->sc_lock);
    901 	if (sc->sc_writereportid == scd->sc_report_id)
    902 		abort = true;
    903 	mutex_exit(&sc->sc_lock);
    904 
    905 	if (abort && sc->sc_opipe)
    906 		usbd_abort_pipe(sc->sc_opipe);
    907 }
    908 
    909 void
    910 uhidev_close(struct uhidev *scd)
    911 {
    912 	struct uhidev_softc *sc = scd->sc_parent;
    913 
    914 	mutex_enter(&sc->sc_lock);
    915 
    916 	DPRINTF(("uhidev_close(%s, report %d = %s): state=%x refcnt=%d\n",
    917 		device_xname(sc->sc_dev),
    918 		scd->sc_report_id,
    919 		device_xname(scd->sc_dev),
    920 		scd->sc_state,
    921 		sc->sc_refcnt));
    922 
    923 	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    924 	    "%s: report id %d: unpaired close",
    925 	    device_xname(sc->sc_dev), scd->sc_report_id);
    926 	uhidev_close_pipes(sc);
    927 	KASSERTMSG(scd->sc_state & UHIDEV_OPEN,
    928 	    "%s: report id %d: closed while closing",
    929 	    device_xname(sc->sc_dev), scd->sc_report_id);
    930 	scd->sc_state &= ~UHIDEV_OPEN;
    931 
    932 	mutex_exit(&sc->sc_lock);
    933 }
    934 
    935 usbd_status
    936 uhidev_set_report(struct uhidev *scd, int type, void *data, int len)
    937 {
    938 	char *buf;
    939 	usbd_status retstat;
    940 
    941 	if (scd->sc_report_id == 0)
    942 		return usbd_set_report(scd->sc_parent->sc_iface, type,
    943 				       scd->sc_report_id, data, len);
    944 
    945 	buf = kmem_alloc(len + 1, KM_SLEEP);
    946 	buf[0] = scd->sc_report_id;
    947 	memcpy(buf+1, data, len);
    948 
    949 	retstat = usbd_set_report(scd->sc_parent->sc_iface, type,
    950 				  scd->sc_report_id, buf, len + 1);
    951 
    952 	kmem_free(buf, len + 1);
    953 
    954 	return retstat;
    955 }
    956 
    957 usbd_status
    958 uhidev_get_report(struct uhidev *scd, int type, void *data, int len)
    959 {
    960 	return usbd_get_report(scd->sc_parent->sc_iface, type,
    961 			       scd->sc_report_id, data, len);
    962 }
    963 
    964 usbd_status
    965 uhidev_write(struct uhidev_softc *sc, void *data, int len)
    966 {
    967 	usbd_status err;
    968 
    969 	DPRINTF(("uhidev_write: data=%p, len=%d\n", data, len));
    970 
    971 	if (sc->sc_opipe == NULL)
    972 		return USBD_INVAL;
    973 
    974 	mutex_enter(&sc->sc_lock);
    975 	KASSERT(sc->sc_refcnt);
    976 	for (;;) {
    977 		if (sc->sc_dying) {
    978 			err = USBD_IOERROR;
    979 			goto out;
    980 		}
    981 		if (sc->sc_writelock == NULL)
    982 			break;
    983 		if (cv_wait_sig(&sc->sc_cv, &sc->sc_lock)) {
    984 			err = USBD_INTERRUPTED;
    985 			goto out;
    986 		}
    987 	}
    988 	sc->sc_writelock = curlwp;
    989 	mutex_exit(&sc->sc_lock);
    990 
    991 #ifdef UHIDEV_DEBUG
    992 	if (uhidevdebug > 50) {
    993 
    994 		uint32_t i;
    995 		uint8_t *d = data;
    996 
    997 		DPRINTF(("uhidev_write: data ="));
    998 		for (i = 0; i < len; i++)
    999 			DPRINTF((" %02x", d[i]));
   1000 		DPRINTF(("\n"));
   1001 	}
   1002 #endif
   1003 	err = usbd_intr_transfer(sc->sc_oxfer, sc->sc_opipe, 0,
   1004 	    USBD_NO_TIMEOUT, data, &len);
   1005 
   1006 	mutex_enter(&sc->sc_lock);
   1007 	KASSERT(sc->sc_refcnt);
   1008 	KASSERTMSG(sc->sc_writelock == curlwp, "%s: migrated from %p to %p",
   1009 	    device_xname(sc->sc_dev), curlwp, sc->sc_writelock);
   1010 	sc->sc_writelock = NULL;
   1011 	cv_broadcast(&sc->sc_cv);
   1012 out:	mutex_exit(&sc->sc_lock);
   1013 	return err;
   1014 }
   1015