Home | History | Annotate | Line # | Download | only in i2c
ihidev.c revision 1.12
      1 /* $NetBSD: ihidev.c,v 1.12 2020/01/09 04:04:01 thorpej Exp $ */
      2 /* $OpenBSD ihidev.c,v 1.13 2017/04/08 02:57:23 deraadt Exp $ */
      3 
      4 /*-
      5  * Copyright (c) 2017 The NetBSD Foundation, Inc.
      6  * All rights reserved.
      7  *
      8  * This code is derived from software contributed to The NetBSD Foundation
      9  * by Manuel Bouyer.
     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  * Copyright (c) 2015, 2016 joshua stein <jcs (at) openbsd.org>
     35  *
     36  * Permission to use, copy, modify, and distribute this software for any
     37  * purpose with or without fee is hereby granted, provided that the above
     38  * copyright notice and this permission notice appear in all copies.
     39  *
     40  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
     41  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     42  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
     43  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     44  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     45  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
     46  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     47  */
     48 
     49 /*
     50  * HID-over-i2c driver
     51  *
     52  * https://msdn.microsoft.com/en-us/library/windows/hardware/dn642101%28v=vs.85%29.aspx
     53  *
     54  */
     55 
     56 #include <sys/cdefs.h>
     57 __KERNEL_RCSID(0, "$NetBSD: ihidev.c,v 1.12 2020/01/09 04:04:01 thorpej Exp $");
     58 
     59 #include <sys/param.h>
     60 #include <sys/systm.h>
     61 #include <sys/device.h>
     62 #include <sys/kmem.h>
     63 
     64 
     65 #include <dev/i2c/i2cvar.h>
     66 #include <dev/i2c/ihidev.h>
     67 
     68 #include <dev/hid/hid.h>
     69 
     70 #if defined(__i386__) || defined(__amd64__)
     71 #  include "acpica.h"
     72 #endif
     73 #if NACPICA > 0
     74 #include <dev/acpi/acpivar.h>
     75 #include <dev/acpi/acpi_intr.h>
     76 #endif
     77 
     78 #include "locators.h"
     79 
     80 /* #define IHIDEV_DEBUG */
     81 
     82 #ifdef IHIDEV_DEBUG
     83 #define DPRINTF(x) printf x
     84 #else
     85 #define DPRINTF(x)
     86 #endif
     87 
     88 /* 7.2 */
     89 enum {
     90 	I2C_HID_CMD_DESCR	= 0x0,
     91 	I2C_HID_CMD_RESET	= 0x1,
     92 	I2C_HID_CMD_GET_REPORT	= 0x2,
     93 	I2C_HID_CMD_SET_REPORT	= 0x3,
     94 	I2C_HID_CMD_GET_IDLE	= 0x4,
     95 	I2C_HID_CMD_SET_IDLE	= 0x5,
     96 	I2C_HID_CMD_GET_PROTO	= 0x6,
     97 	I2C_HID_CMD_SET_PROTO	= 0x7,
     98 	I2C_HID_CMD_SET_POWER	= 0x8,
     99 
    100 	/* pseudo commands */
    101 	I2C_HID_REPORT_DESCR	= 0x100,
    102 };
    103 
    104 static int I2C_HID_POWER_ON	= 0x0;
    105 static int I2C_HID_POWER_OFF	= 0x1;
    106 
    107 static int	ihidev_match(device_t, cfdata_t, void *);
    108 static void	ihidev_attach(device_t, device_t, void *);
    109 static int	ihidev_detach(device_t, int);
    110 CFATTACH_DECL_NEW(ihidev, sizeof(struct ihidev_softc),
    111     ihidev_match, ihidev_attach, ihidev_detach, NULL);
    112 
    113 static bool	ihiddev_intr_init(struct ihidev_softc *);
    114 static void	ihiddev_intr_fini(struct ihidev_softc *);
    115 
    116 static bool	ihidev_suspend(device_t, const pmf_qual_t *);
    117 static bool	ihidev_resume(device_t, const pmf_qual_t *);
    118 static int	ihidev_hid_command(struct ihidev_softc *, int, void *, bool);
    119 static int	ihidev_intr(void *);
    120 static void	ihidev_softintr(void *);
    121 static int	ihidev_reset(struct ihidev_softc *, bool);
    122 static int	ihidev_hid_desc_parse(struct ihidev_softc *);
    123 
    124 static int	ihidev_maxrepid(void *, int);
    125 static int	ihidev_print(void *, const char *);
    126 static int	ihidev_submatch(device_t, cfdata_t, const int *, void *);
    127 
    128 static const struct device_compatible_entry compat_data[] = {
    129 	{ "hid-over-i2c",		0 },
    130 	{ NULL,				0 }
    131 };
    132 
    133 static int
    134 ihidev_match(device_t parent, cfdata_t match, void *aux)
    135 {
    136 	struct i2c_attach_args * const ia = aux;
    137 	int match_result;
    138 
    139 	if (iic_use_direct_match(ia, match, compat_data, &match_result))
    140 		return I2C_MATCH_DIRECT_COMPATIBLE;
    141 
    142 	return 0;
    143 }
    144 
    145 static void
    146 ihidev_attach(device_t parent, device_t self, void *aux)
    147 {
    148 	struct ihidev_softc *sc = device_private(self);
    149 	struct i2c_attach_args *ia = aux;
    150 	struct ihidev_attach_arg iha;
    151 	device_t dev;
    152 	int repid, repsz;
    153 	int isize;
    154 	uint32_t v;
    155 	int locs[IHIDBUSCF_NLOCS];
    156 
    157 
    158 	sc->sc_dev = self;
    159 	sc->sc_tag = ia->ia_tag;
    160 	sc->sc_addr = ia->ia_addr;
    161 	sc->sc_phandle = ia->ia_cookie;
    162 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_VM);
    163 
    164 	if (!prop_dictionary_get_uint32(ia->ia_prop, "hid-descr-addr", &v)) {
    165 		aprint_error(": no hid-descr-addr value\n");
    166 		return;
    167 	}
    168 
    169 	sc->sc_hid_desc_addr = v;
    170 
    171 	if (ihidev_hid_command(sc, I2C_HID_CMD_DESCR, NULL, false) ||
    172 	    ihidev_hid_desc_parse(sc)) {
    173 		aprint_error(": failed fetching initial HID descriptor\n");
    174 		return;
    175 	}
    176 
    177 	aprint_naive("\n");
    178 	aprint_normal(": vendor 0x%x product 0x%x, %s\n",
    179 	    le16toh(sc->hid_desc.wVendorID), le16toh(sc->hid_desc.wProductID),
    180 	    ia->ia_name);
    181 
    182 	sc->sc_nrepid = ihidev_maxrepid(sc->sc_report, sc->sc_reportlen);
    183 	if (sc->sc_nrepid < 0)
    184 		return;
    185 
    186 	aprint_normal_dev(self, "%d report id%s\n", sc->sc_nrepid,
    187 	    sc->sc_nrepid > 1 ? "s" : "");
    188 
    189 	sc->sc_nrepid++;
    190 	sc->sc_subdevs = kmem_zalloc(sc->sc_nrepid * sizeof(struct ihidev *),
    191 	    KM_SLEEP);
    192 
    193 	/* find largest report size and allocate memory for input buffer */
    194 	sc->sc_isize = le16toh(sc->hid_desc.wMaxInputLength);
    195 	for (repid = 0; repid < sc->sc_nrepid; repid++) {
    196 		repsz = hid_report_size(sc->sc_report, sc->sc_reportlen,
    197 		    hid_input, repid);
    198 
    199 		isize = repsz + 2; /* two bytes for the length */
    200 		isize += (sc->sc_nrepid != 1); /* one byte for the report ID */
    201 		if (isize > sc->sc_isize)
    202 			sc->sc_isize = isize;
    203 
    204 		DPRINTF(("%s: repid %d size %d\n", sc->sc_dev.dv_xname, repid,
    205 		    repsz));
    206 	}
    207 	sc->sc_ibuf = kmem_zalloc(sc->sc_isize, KM_SLEEP);
    208 	if (! ihiddev_intr_init(sc)) {
    209 		return;
    210 	}
    211 
    212 	iha.iaa = ia;
    213 	iha.parent = sc;
    214 
    215 	/* Look for a driver claiming all report IDs first. */
    216 	iha.reportid = IHIDEV_CLAIM_ALLREPORTID;
    217 	locs[IHIDBUSCF_REPORTID] = IHIDEV_CLAIM_ALLREPORTID;
    218 	dev = config_found_sm_loc(self, "ihidbus", locs, &iha,
    219 	    ihidev_print, ihidev_submatch);
    220 	if (dev != NULL) {
    221 		for (repid = 0; repid < sc->sc_nrepid; repid++)
    222 			sc->sc_subdevs[repid] = device_private(dev);
    223 		return;
    224 	}
    225 
    226 	for (repid = 0; repid < sc->sc_nrepid; repid++) {
    227 		if (hid_report_size(sc->sc_report, sc->sc_reportlen, hid_input,
    228 		    repid) == 0 &&
    229 		    hid_report_size(sc->sc_report, sc->sc_reportlen,
    230 		    hid_output, repid) == 0 &&
    231 		    hid_report_size(sc->sc_report, sc->sc_reportlen,
    232 		    hid_feature, repid) == 0)
    233 			continue;
    234 
    235 		iha.reportid = repid;
    236 		locs[IHIDBUSCF_REPORTID] = repid;
    237 		dev = config_found_sm_loc(self, "ihidbus", locs,
    238 		    &iha, ihidev_print, ihidev_submatch);
    239 		sc->sc_subdevs[repid] = device_private(dev);
    240 	}
    241 
    242 	/* power down until we're opened */
    243 	if (ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER, &I2C_HID_POWER_OFF, false)) {
    244 		aprint_error_dev(sc->sc_dev, "failed to power down\n");
    245 		return;
    246 	}
    247 	if (!pmf_device_register(self, ihidev_suspend, ihidev_resume))
    248 		aprint_error_dev(self, "couldn't establish power handler\n");
    249 }
    250 
    251 static int
    252 ihidev_detach(device_t self, int flags)
    253 {
    254 	struct ihidev_softc *sc = device_private(self);
    255 
    256 	mutex_enter(&sc->sc_intr_lock);
    257 	ihiddev_intr_fini(sc);
    258 	if (ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER,
    259 	    &I2C_HID_POWER_OFF, true))
    260 	aprint_error_dev(sc->sc_dev, "failed to power down\n");
    261 	mutex_exit(&sc->sc_intr_lock);
    262 	if (sc->sc_ibuf != NULL) {
    263 		kmem_free(sc->sc_ibuf, sc->sc_isize);
    264 		sc->sc_ibuf = NULL;
    265 	}
    266 
    267 	if (sc->sc_report != NULL)
    268 		kmem_free(sc->sc_report, sc->sc_reportlen);
    269 
    270 	pmf_device_deregister(self);
    271 	return (0);
    272 }
    273 
    274 static bool
    275 ihidev_suspend(device_t self, const pmf_qual_t *q)
    276 {
    277 	struct ihidev_softc *sc = device_private(self);
    278 
    279 	mutex_enter(&sc->sc_intr_lock);
    280 	if (sc->sc_refcnt > 0) {
    281 		printf("ihidev power off\n");
    282 		if (ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER,
    283 		    &I2C_HID_POWER_OFF, true))
    284 		aprint_error_dev(sc->sc_dev, "failed to power down\n");
    285 	}
    286 	mutex_exit(&sc->sc_intr_lock);
    287 	return true;
    288 }
    289 
    290 static bool
    291 ihidev_resume(device_t self, const pmf_qual_t *q)
    292 {
    293 	struct ihidev_softc *sc = device_private(self);
    294 
    295 	mutex_enter(&sc->sc_intr_lock);
    296 	if (sc->sc_refcnt > 0) {
    297 		printf("ihidev power reset\n");
    298 		ihidev_reset(sc, true);
    299 	}
    300 	mutex_exit(&sc->sc_intr_lock);
    301 	return true;
    302 }
    303 
    304 static int
    305 ihidev_hid_command(struct ihidev_softc *sc, int hidcmd, void *arg, bool poll)
    306 {
    307 	int i, res = 1;
    308 	int flags = poll ? I2C_F_POLL : 0;
    309 
    310 	iic_acquire_bus(sc->sc_tag, flags);
    311 
    312 	switch (hidcmd) {
    313 	case I2C_HID_CMD_DESCR: {
    314 		/*
    315 		 * 5.2.2 - HID Descriptor Retrieval
    316 		 * register is passed from the controller
    317 		 */
    318 		uint8_t cmd[] = {
    319 			htole16(sc->sc_hid_desc_addr) & 0xff,
    320 			htole16(sc->sc_hid_desc_addr) >> 8,
    321 		};
    322 
    323 		DPRINTF(("%s: HID command I2C_HID_CMD_DESCR at 0x%x\n",
    324 		    sc->sc_dev.dv_xname, htole16(sc->sc_hid_desc_addr)));
    325 
    326 		/* 20 00 */
    327 		res = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
    328 		    &cmd, sizeof(cmd), &sc->hid_desc_buf,
    329 		    sizeof(struct i2c_hid_desc), flags);
    330 
    331 		DPRINTF(("%s: HID descriptor:", sc->sc_dev.dv_xname));
    332 		for (i = 0; i < sizeof(struct i2c_hid_desc); i++)
    333 			DPRINTF((" %.2x", sc->hid_desc_buf[i]));
    334 		DPRINTF(("\n"));
    335 
    336 		break;
    337 	}
    338 	case I2C_HID_CMD_RESET: {
    339 		uint8_t cmd[] = {
    340 			htole16(sc->hid_desc.wCommandRegister) & 0xff,
    341 			htole16(sc->hid_desc.wCommandRegister) >> 8,
    342 			0,
    343 			I2C_HID_CMD_RESET,
    344 		};
    345 
    346 		DPRINTF(("%s: HID command I2C_HID_CMD_RESET\n",
    347 		    sc->sc_dev.dv_xname));
    348 
    349 		/* 22 00 00 01 */
    350 		res = iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP, sc->sc_addr,
    351 		    &cmd, sizeof(cmd), NULL, 0, flags);
    352 
    353 		break;
    354 	}
    355 	case I2C_HID_CMD_GET_REPORT: {
    356 		struct i2c_hid_report_request *rreq =
    357 		    (struct i2c_hid_report_request *)arg;
    358 
    359 		uint8_t cmd[] = {
    360 			htole16(sc->hid_desc.wCommandRegister) & 0xff,
    361 			htole16(sc->hid_desc.wCommandRegister) >> 8,
    362 			0,
    363 			I2C_HID_CMD_GET_REPORT,
    364 			0, 0, 0,
    365 		};
    366 		int cmdlen = 7;
    367 		int dataoff = 4;
    368 		int report_id = rreq->id;
    369 		int report_id_len = 1;
    370 		int report_len = rreq->len + 2;
    371 		int d;
    372 		uint8_t *tmprep;
    373 
    374 		DPRINTF(("%s: HID command I2C_HID_CMD_GET_REPORT %d "
    375 		    "(type %d, len %d)\n", sc->sc_dev.dv_xname, report_id,
    376 		    rreq->type, rreq->len));
    377 
    378 		/*
    379 		 * 7.2.2.4 - "The protocol is optimized for Report < 15.  If a
    380 		 * report ID >= 15 is necessary, then the Report ID in the Low
    381 		 * Byte must be set to 1111 and a Third Byte is appended to the
    382 		 * protocol.  This Third Byte contains the entire/actual report
    383 		 * ID."
    384 		 */
    385 		if (report_id >= 15) {
    386 			cmd[dataoff++] = report_id;
    387 			report_id = 15;
    388 			report_id_len = 2;
    389 		} else
    390 			cmdlen--;
    391 
    392 		cmd[2] = report_id | rreq->type << 4;
    393 
    394 		cmd[dataoff++] = sc->hid_desc.wDataRegister & 0xff;
    395 		cmd[dataoff] = sc->hid_desc.wDataRegister >> 8;
    396 
    397 		/*
    398 		 * 7.2.2.2 - Response will be a 2-byte length value, the report
    399 		 * id with length determined above, and then the report.
    400 		 * Allocate rreq->len + 2 + 2 bytes, read into that temporary
    401 		 * buffer, and then copy only the report back out to
    402 		 * rreq->data.
    403 		 */
    404 		report_len += report_id_len;
    405 		tmprep = kmem_zalloc(report_len, KM_NOSLEEP);
    406 
    407 		/* type 3 id 8: 22 00 38 02 23 00 */
    408 		res = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
    409 		    &cmd, cmdlen, tmprep, report_len, flags);
    410 
    411 		d = tmprep[0] | tmprep[1] << 8;
    412 		if (d != report_len) {
    413 			DPRINTF(("%s: response size %d != expected length %d\n",
    414 			    sc->sc_dev.dv_xname, d, report_len));
    415 		}
    416 
    417 		if (report_id_len == 2)
    418 			d = tmprep[2] | tmprep[3] << 8;
    419 		else
    420 			d = tmprep[2];
    421 
    422 		if (d != rreq->id) {
    423 			DPRINTF(("%s: response report id %d != %d\n",
    424 			    sc->sc_dev.dv_xname, d, rreq->id));
    425 			iic_release_bus(sc->sc_tag, 0);
    426 			kmem_free(tmprep, report_len);
    427 			return (1);
    428 		}
    429 
    430 		DPRINTF(("%s: response:", sc->sc_dev.dv_xname));
    431 		for (i = 0; i < report_len; i++)
    432 			DPRINTF((" %.2x", tmprep[i]));
    433 		DPRINTF(("\n"));
    434 
    435 		memcpy(rreq->data, tmprep + 2 + report_id_len, rreq->len);
    436 		kmem_free(tmprep, report_len);
    437 
    438 		break;
    439 	}
    440 	case I2C_HID_CMD_SET_REPORT: {
    441 		struct i2c_hid_report_request *rreq =
    442 		    (struct i2c_hid_report_request *)arg;
    443 
    444 		uint8_t cmd[] = {
    445 			htole16(sc->hid_desc.wCommandRegister) & 0xff,
    446 			htole16(sc->hid_desc.wCommandRegister) >> 8,
    447 			0,
    448 			I2C_HID_CMD_SET_REPORT,
    449 			0, 0, 0, 0, 0, 0,
    450 		};
    451 		int cmdlen = 10;
    452 		int report_id = rreq->id;
    453 		int report_len = 2 + (report_id ? 1 : 0) + rreq->len;
    454 		int dataoff;
    455 		uint8_t *finalcmd;
    456 
    457 		DPRINTF(("%s: HID command I2C_HID_CMD_SET_REPORT %d "
    458 		    "(type %d, len %d):", sc->sc_dev.dv_xname, report_id,
    459 		    rreq->type, rreq->len));
    460 		for (i = 0; i < rreq->len; i++)
    461 			DPRINTF((" %.2x", ((uint8_t *)rreq->data)[i]));
    462 		DPRINTF(("\n"));
    463 
    464 		/*
    465 		 * 7.2.2.4 - "The protocol is optimized for Report < 15.  If a
    466 		 * report ID >= 15 is necessary, then the Report ID in the Low
    467 		 * Byte must be set to 1111 and a Third Byte is appended to the
    468 		 * protocol.  This Third Byte contains the entire/actual report
    469 		 * ID."
    470 		 */
    471 		dataoff = 4;
    472 		if (report_id >= 15) {
    473 			cmd[dataoff++] = report_id;
    474 			report_id = 15;
    475 		} else
    476 			cmdlen--;
    477 
    478 		cmd[2] = report_id | rreq->type << 4;
    479 
    480 		if (rreq->type == I2C_HID_REPORT_TYPE_FEATURE) {
    481 			cmd[dataoff++] = htole16(sc->hid_desc.wDataRegister)
    482 			    & 0xff;
    483 			cmd[dataoff++] = htole16(sc->hid_desc.wDataRegister)
    484 			    >> 8;
    485 		} else {
    486 			cmd[dataoff++] = htole16(sc->hid_desc.wOutputRegister)
    487 			    & 0xff;
    488 			cmd[dataoff++] = htole16(sc->hid_desc.wOutputRegister)
    489 			    >> 8;
    490 		}
    491 
    492 		cmd[dataoff++] = report_len & 0xff;
    493 		cmd[dataoff++] = report_len >> 8;
    494 		cmd[dataoff] = rreq->id;
    495 
    496 		finalcmd = kmem_zalloc(cmdlen + rreq->len, KM_NOSLEEP);
    497 
    498 		memcpy(finalcmd, cmd, cmdlen);
    499 		memcpy(finalcmd + cmdlen, rreq->data, rreq->len);
    500 
    501 		/* type 3 id 4: 22 00 34 03 23 00 04 00 04 03 */
    502 		res = iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP, sc->sc_addr,
    503 		    finalcmd, cmdlen + rreq->len, NULL, 0, flags);
    504 		kmem_free(finalcmd, cmdlen + rreq->len);
    505 
    506  		break;
    507  	}
    508 
    509 	case I2C_HID_CMD_SET_POWER: {
    510 		int power = *(int *)arg;
    511 		uint8_t cmd[] = {
    512 			htole16(sc->hid_desc.wCommandRegister) & 0xff,
    513 			htole16(sc->hid_desc.wCommandRegister) >> 8,
    514 			power,
    515 			I2C_HID_CMD_SET_POWER,
    516 		};
    517 
    518 		DPRINTF(("%s: HID command I2C_HID_CMD_SET_POWER(%d)\n",
    519 		    sc->sc_dev.dv_xname, power));
    520 
    521 		/* 22 00 00 08 */
    522 		res = iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP, sc->sc_addr,
    523 		    &cmd, sizeof(cmd), NULL, 0, flags);
    524 
    525 		break;
    526 	}
    527 	case I2C_HID_REPORT_DESCR: {
    528 		uint8_t cmd[] = {
    529 			htole16(sc->hid_desc.wReportDescRegister) & 0xff,
    530 			htole16(sc->hid_desc.wReportDescRegister) >> 8,
    531 		};
    532 
    533 		DPRINTF(("%s: HID command I2C_HID_REPORT_DESCR at 0x%x with "
    534 		    "size %d\n", sc->sc_dev.dv_xname, cmd[0],
    535 		    sc->sc_reportlen));
    536 
    537 		/* 20 00 */
    538 		res = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
    539 		    &cmd, sizeof(cmd), sc->sc_report, sc->sc_reportlen, flags);
    540 
    541 		DPRINTF(("%s: HID report descriptor:", sc->sc_dev.dv_xname));
    542 		for (i = 0; i < sc->sc_reportlen; i++)
    543 			DPRINTF((" %.2x", sc->sc_report[i]));
    544 		DPRINTF(("\n"));
    545 
    546 		break;
    547 	}
    548 	default:
    549 		aprint_error_dev(sc->sc_dev, "unknown command %d\n",
    550 		    hidcmd);
    551 	}
    552 
    553 	iic_release_bus(sc->sc_tag, flags);
    554 
    555 	return (res);
    556 }
    557 
    558 static int
    559 ihidev_reset(struct ihidev_softc *sc, bool poll)
    560 {
    561 	DPRINTF(("%s: resetting\n", sc->sc_dev.dv_xname));
    562 
    563 	if (ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER,
    564 	    &I2C_HID_POWER_ON, poll)) {
    565 		aprint_error_dev(sc->sc_dev, "failed to power on\n");
    566 		return (1);
    567 	}
    568 
    569 	DELAY(1000);
    570 
    571 	if (ihidev_hid_command(sc, I2C_HID_CMD_RESET, 0, poll)) {
    572 		aprint_error_dev(sc->sc_dev, "failed to reset hardware\n");
    573 
    574 		ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER,
    575 		    &I2C_HID_POWER_OFF, poll);
    576 
    577 		return (1);
    578 	}
    579 
    580 	DELAY(1000);
    581 
    582 	return (0);
    583 }
    584 
    585 /*
    586  * 5.2.2 - HID Descriptor Retrieval
    587  *
    588  * parse HID Descriptor that has already been read into hid_desc with
    589  * I2C_HID_CMD_DESCR
    590  */
    591 static int
    592 ihidev_hid_desc_parse(struct ihidev_softc *sc)
    593 {
    594 	int retries = 3;
    595 
    596 	/* must be v01.00 */
    597 	if (le16toh(sc->hid_desc.bcdVersion) != 0x0100) {
    598 		aprint_error_dev(sc->sc_dev,
    599 		    "bad HID descriptor bcdVersion (0x%x)\n",
    600 		    le16toh(sc->hid_desc.bcdVersion));
    601 		return (1);
    602 	}
    603 
    604 	/* must be 30 bytes for v1.00 */
    605 	if (le16toh(sc->hid_desc.wHIDDescLength !=
    606 	    sizeof(struct i2c_hid_desc))) {
    607 		aprint_error_dev(sc->sc_dev,
    608 		    "bad HID descriptor size (%d != %zu)\n",
    609 		    le16toh(sc->hid_desc.wHIDDescLength),
    610 		    sizeof(struct i2c_hid_desc));
    611 		return (1);
    612 	}
    613 
    614 	if (le16toh(sc->hid_desc.wReportDescLength) <= 0) {
    615 		aprint_error_dev(sc->sc_dev,
    616 		    "bad HID report descriptor size (%d)\n",
    617 		    le16toh(sc->hid_desc.wReportDescLength));
    618 		return (1);
    619 	}
    620 
    621 	while (retries-- > 0) {
    622 		if (ihidev_reset(sc, false)) {
    623 			if (retries == 0)
    624 				return(1);
    625 
    626 			DELAY(1000);
    627 		}
    628 		else
    629 			break;
    630 	}
    631 
    632 	sc->sc_reportlen = le16toh(sc->hid_desc.wReportDescLength);
    633 	sc->sc_report = kmem_zalloc(sc->sc_reportlen, KM_NOSLEEP);
    634 
    635 	if (ihidev_hid_command(sc, I2C_HID_REPORT_DESCR, 0, false)) {
    636 		aprint_error_dev(sc->sc_dev, "failed fetching HID report\n");
    637 		return (1);
    638 	}
    639 
    640 	return (0);
    641 }
    642 
    643 static bool
    644 ihiddev_intr_init(struct ihidev_softc *sc)
    645 {
    646 #if NACPICA > 0
    647 	ACPI_HANDLE hdl = (void *)(uintptr_t)sc->sc_phandle;
    648 	struct acpi_resources res;
    649 	ACPI_STATUS rv;
    650 	char buf[100];
    651 
    652 	rv = acpi_resource_parse(sc->sc_dev, hdl, "_CRS", &res,
    653 	    &acpi_resource_parse_ops_quiet);
    654 	if (ACPI_FAILURE(rv)) {
    655 		aprint_error_dev(sc->sc_dev, "can't parse '_CRS'\n");
    656 		return false;
    657 	}
    658 
    659 	const struct acpi_irq * const irq = acpi_res_irq(&res, 0);
    660 	if (irq == NULL) {
    661 		aprint_error_dev(sc->sc_dev, "no IRQ resource\n");
    662 		acpi_resource_cleanup(&res);
    663 		return false;
    664 	}
    665 
    666 	sc->sc_intr_type =
    667 	    irq->ar_type == ACPI_EDGE_SENSITIVE ? IST_EDGE : IST_LEVEL;
    668 
    669 	acpi_resource_cleanup(&res);
    670 
    671 	sc->sc_ih = acpi_intr_establish(sc->sc_dev, sc->sc_phandle, IPL_TTY,
    672 	    false, ihidev_intr, sc, device_xname(sc->sc_dev));
    673 	if (sc->sc_ih == NULL) {
    674 		aprint_error_dev(sc->sc_dev, "can't establish interrupt\n");
    675 		return false;
    676 	}
    677 	aprint_normal_dev(sc->sc_dev, "interrupting at %s\n",
    678 	    acpi_intr_string(sc->sc_ih, buf, sizeof(buf)));
    679 
    680 	sc->sc_sih = softint_establish(SOFTINT_SERIAL, ihidev_softintr, sc);
    681 	if (sc->sc_sih == NULL) {
    682 		aprint_error_dev(sc->sc_dev,
    683 		    "can't establish soft interrupt\n");
    684 		return false;
    685 	}
    686 
    687 	return true;
    688 #else
    689 	aprint_error_dev(sc->sc_dev, "can't establish interrupt\n");
    690 	return false;
    691 #endif
    692 }
    693 
    694 static void
    695 ihiddev_intr_fini(struct ihidev_softc *sc)
    696 {
    697 #if NACPICA > 0
    698 	if (sc->sc_ih != NULL) {
    699 		acpi_intr_disestablish(sc->sc_ih);
    700 	}
    701 	if (sc->sc_sih != NULL) {
    702 		softint_disestablish(sc->sc_sih);
    703 	}
    704 #endif
    705 }
    706 
    707 static void
    708 ihidev_intr_mask(struct ihidev_softc * const sc)
    709 {
    710 
    711 	if (sc->sc_intr_type == IST_LEVEL) {
    712 #if NACPICA > 0
    713 		acpi_intr_mask(sc->sc_ih);
    714 #endif
    715 	}
    716 }
    717 
    718 static void
    719 ihidev_intr_unmask(struct ihidev_softc * const sc)
    720 {
    721 
    722 	if (sc->sc_intr_type == IST_LEVEL) {
    723 #if NACPICA > 0
    724 		acpi_intr_unmask(sc->sc_ih);
    725 #endif
    726 	}
    727 }
    728 
    729 static int
    730 ihidev_intr(void *arg)
    731 {
    732 	struct ihidev_softc * const sc = arg;
    733 
    734 	mutex_enter(&sc->sc_intr_lock);
    735 
    736 	/*
    737 	 * Schedule our soft interrupt handler.  If we're using a level-
    738 	 * triggered interrupt, we have to mask it off while we wait
    739 	 * for service.
    740 	 */
    741 	softint_schedule(sc->sc_sih);
    742 	ihidev_intr_mask(sc);
    743 
    744 	mutex_exit(&sc->sc_intr_lock);
    745 
    746 	return 1;
    747 }
    748 
    749 static void
    750 ihidev_softintr(void *arg)
    751 {
    752 	struct ihidev_softc * const sc = arg;
    753 	struct ihidev *scd;
    754 	u_int psize;
    755 	int res, i;
    756 	u_char *p;
    757 	u_int rep = 0;
    758 
    759 	mutex_enter(&sc->sc_intr_lock);
    760 	iic_acquire_bus(sc->sc_tag, 0);
    761 	res = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr, NULL, 0,
    762 	    sc->sc_ibuf, sc->sc_isize, 0);
    763 	iic_release_bus(sc->sc_tag, 0);
    764 	mutex_exit(&sc->sc_intr_lock);
    765 
    766 	if (res != 0)
    767 		goto out;
    768 
    769 	/*
    770 	 * 6.1.1 - First two bytes are the packet length, which must be less
    771 	 * than or equal to wMaxInputLength
    772 	 */
    773 	psize = sc->sc_ibuf[0] | sc->sc_ibuf[1] << 8;
    774 	if (!psize || psize > sc->sc_isize) {
    775 		DPRINTF(("%s: %s: invalid packet size (%d vs. %d)\n",
    776 		    sc->sc_dev.dv_xname, __func__, psize, sc->sc_isize));
    777 		goto out;
    778 	}
    779 
    780 	/* 3rd byte is the report id */
    781 	p = sc->sc_ibuf + 2;
    782 	psize -= 2;
    783 	if (sc->sc_nrepid != 1)
    784 		rep = *p++, psize--;
    785 
    786 	if (rep >= sc->sc_nrepid) {
    787 		aprint_error_dev(sc->sc_dev, "%s: bad report id %d\n",
    788 		    __func__, rep);
    789 		goto out;
    790 	}
    791 
    792 	DPRINTF(("%s: %s: hid input (rep %d):", sc->sc_dev.dv_xname,
    793 	    __func__, rep));
    794 	for (i = 0; i < sc->sc_isize; i++)
    795 		DPRINTF((" %.2x", sc->sc_ibuf[i]));
    796 	DPRINTF(("\n"));
    797 
    798 	scd = sc->sc_subdevs[rep];
    799 	if (scd == NULL || !(scd->sc_state & IHIDEV_OPEN))
    800 		goto out;
    801 
    802 	scd->sc_intr(scd, p, psize);
    803 
    804  out:
    805 	/*
    806 	 * If our interrupt is level-triggered, re-enable it now.
    807 	 */
    808 	ihidev_intr_unmask(sc);
    809 }
    810 
    811 static int
    812 ihidev_maxrepid(void *buf, int len)
    813 {
    814 	struct hid_data *d;
    815 	struct hid_item h;
    816 	int maxid;
    817 
    818 	maxid = -1;
    819 	h.report_ID = 0;
    820 	for (d = hid_start_parse(buf, len, hid_none); hid_get_item(d, &h); )
    821 		if ((int)h.report_ID > maxid)
    822 			maxid = h.report_ID;
    823 	hid_end_parse(d);
    824 
    825 	return (maxid);
    826 }
    827 
    828 static int
    829 ihidev_print(void *aux, const char *pnp)
    830 {
    831 	struct ihidev_attach_arg *iha = aux;
    832 
    833 	if (iha->reportid == IHIDEV_CLAIM_ALLREPORTID)
    834 		return (QUIET);
    835 
    836 	if (pnp)
    837 		aprint_normal("hid at %s", pnp);
    838 
    839 	if (iha->reportid != 0)
    840 		aprint_normal(" reportid %d", iha->reportid);
    841 
    842 	return (UNCONF);
    843 }
    844 
    845 static int
    846 ihidev_submatch(device_t parent, cfdata_t cf, const int *locs, void *aux)
    847 {
    848 	struct ihidev_attach_arg *iha = aux;
    849 
    850 	if (cf->ihidevcf_reportid != IHIDEV_UNK_REPORTID &&
    851 	    cf->ihidevcf_reportid != iha->reportid)
    852 		return (0);
    853 
    854 	return config_match(parent, cf, aux);
    855 }
    856 
    857 int
    858 ihidev_open(struct ihidev *scd)
    859 {
    860 	struct ihidev_softc *sc = scd->sc_parent;
    861 
    862 	DPRINTF(("%s: %s: state=%d refcnt=%d\n", sc->sc_dev.dv_xname,
    863 	    __func__, scd->sc_state, sc->sc_refcnt));
    864 
    865 	if (scd->sc_state & IHIDEV_OPEN)
    866 		return (EBUSY);
    867 
    868 	scd->sc_state |= IHIDEV_OPEN;
    869 
    870 	if (sc->sc_refcnt++ || sc->sc_isize == 0)
    871 		return (0);
    872 
    873 	/* power on */
    874 	ihidev_reset(sc, false);
    875 
    876 	return (0);
    877 }
    878 
    879 void
    880 ihidev_close(struct ihidev *scd)
    881 {
    882 	struct ihidev_softc *sc = scd->sc_parent;
    883 
    884 	DPRINTF(("%s: %s: state=%d refcnt=%d\n", sc->sc_dev.dv_xname,
    885 	    __func__, scd->sc_state, sc->sc_refcnt));
    886 
    887 	if (!(scd->sc_state & IHIDEV_OPEN))
    888 		return;
    889 
    890 	scd->sc_state &= ~IHIDEV_OPEN;
    891 
    892 	if (--sc->sc_refcnt)
    893 		return;
    894 
    895 	if (ihidev_hid_command(sc, I2C_HID_CMD_SET_POWER,
    896 	    &I2C_HID_POWER_OFF, false))
    897 		aprint_error_dev(sc->sc_dev, "failed to power down\n");
    898 }
    899 
    900 void
    901 ihidev_get_report_desc(struct ihidev_softc *sc, void **desc, int *size)
    902 {
    903 	*desc = sc->sc_report;
    904 	*size = sc->sc_reportlen;
    905 }
    906 
    907 /* convert hid_* constants used throughout HID code to i2c HID equivalents */
    908 int
    909 ihidev_report_type_conv(int hid_type_id)
    910 {
    911 	switch (hid_type_id) {
    912 	case hid_input:
    913 		return I2C_HID_REPORT_TYPE_INPUT;
    914 	case hid_output:
    915 		return I2C_HID_REPORT_TYPE_OUTPUT;
    916 	case hid_feature:
    917 		return I2C_HID_REPORT_TYPE_FEATURE;
    918 	default:
    919 		return -1;
    920 	}
    921 }
    922 
    923 int
    924 ihidev_get_report(struct device *dev, int type, int id, void *data, int len)
    925 {
    926 	struct ihidev_softc *sc = (struct ihidev_softc *)dev;
    927 	struct i2c_hid_report_request rreq;
    928 	int ctype;
    929 
    930 	if ((ctype = ihidev_report_type_conv(type)) < 0)
    931 		return (1);
    932 
    933 	rreq.type = ctype;
    934 	rreq.id = id;
    935 	rreq.data = data;
    936 	rreq.len = len;
    937 
    938 	if (ihidev_hid_command(sc, I2C_HID_CMD_GET_REPORT, &rreq, false)) {
    939 		aprint_error_dev(sc->sc_dev, "failed fetching report\n");
    940 		return (1);
    941 	}
    942 
    943 	return 0;
    944 }
    945 
    946 int
    947 ihidev_set_report(struct device *dev, int type, int id, void *data,
    948     int len)
    949 {
    950 	struct ihidev_softc *sc = (struct ihidev_softc *)dev;
    951 	struct i2c_hid_report_request rreq;
    952 	int ctype;
    953 
    954 	if ((ctype = ihidev_report_type_conv(type)) < 0)
    955 		return (1);
    956 
    957 	rreq.type = ctype;
    958 	rreq.id = id;
    959 	rreq.data = data;
    960 	rreq.len = len;
    961 
    962 	if (ihidev_hid_command(sc, I2C_HID_CMD_SET_REPORT, &rreq, false)) {
    963 		aprint_error_dev(sc->sc_dev, "failed setting report\n");
    964 		return (1);
    965 	}
    966 
    967 	return 0;
    968 }
    969