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