uhid.c revision 1.9 1 /* $NetBSD: uhid.c,v 1.9 1998/12/03 20:43:19 augustss Exp $ */
2
3 /*
4 * Copyright (c) 1998 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 (augustss (at) carlstedt.se) at
9 * Carlstedt Research & Technology.
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 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the NetBSD
22 * Foundation, Inc. and its contributors.
23 * 4. Neither the name of The NetBSD Foundation nor the names of its
24 * contributors may be used to endorse or promote products derived
25 * from this software without specific prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 * POSSIBILITY OF SUCH DAMAGE.
38 */
39
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/kernel.h>
44 #include <sys/malloc.h>
45 #include <sys/device.h>
46 #include <sys/ioctl.h>
47 #include <sys/tty.h>
48 #include <sys/file.h>
49 #include <sys/select.h>
50 #include <sys/proc.h>
51 #include <sys/vnode.h>
52 #include <sys/device.h>
53 #include <sys/poll.h>
54
55 #include <dev/usb/usb.h>
56 #include <dev/usb/usbhid.h>
57
58 #include <dev/usb/usbdi.h>
59 #include <dev/usb/usbdi_util.h>
60 #include <dev/usb/hid.h>
61 #include <dev/usb/usb_quirks.h>
62
63 #ifdef USB_DEBUG
64 #define DPRINTF(x) if (uhiddebug) printf x
65 #define DPRINTFN(n,x) if (uhiddebug>(n)) printf x
66 int uhiddebug = 0;
67 #else
68 #define DPRINTF(x)
69 #define DPRINTFN(n,x)
70 #endif
71
72 struct uhid_softc {
73 struct device sc_dev; /* base device */
74 usbd_interface_handle sc_iface; /* interface */
75 usbd_pipe_handle sc_intrpipe; /* interrupt pipe */
76 int sc_ep_addr;
77
78 int sc_isize;
79 int sc_osize;
80 int sc_fsize;
81 u_int8_t sc_iid;
82 u_int8_t sc_oid;
83 u_int8_t sc_fid;
84
85 char *sc_ibuf;
86 char *sc_obuf;
87
88 void *sc_repdesc;
89 int sc_repdesc_size;
90
91 struct clist sc_q;
92 struct selinfo sc_rsel;
93 u_char sc_state; /* driver state */
94 #define UHID_OPEN 0x01 /* device is open */
95 #define UHID_ASLP 0x02 /* waiting for device data */
96 #define UHID_NEEDCLEAR 0x04 /* needs clearing endpoint stall */
97 #define UHID_IMMED 0x08 /* return read data immediately */
98 int sc_disconnected; /* device is gone */
99 };
100
101 #define UHIDUNIT(dev) (minor(dev))
102 #define UHID_CHUNK 128 /* chunk size for read */
103 #define UHID_BSIZE 1020 /* buffer size */
104
105 int uhid_match __P((struct device *, struct cfdata *, void *));
106 void uhid_attach __P((struct device *, struct device *, void *));
107
108 int uhidopen __P((dev_t, int, int, struct proc *));
109 int uhidclose __P((dev_t, int, int, struct proc *p));
110 int uhidread __P((dev_t, struct uio *uio, int));
111 int uhidwrite __P((dev_t, struct uio *uio, int));
112 int uhidioctl __P((dev_t, u_long, caddr_t, int, struct proc *));
113 int uhidpoll __P((dev_t, int, struct proc *));
114 void uhid_intr __P((usbd_request_handle, usbd_private_handle, usbd_status));
115 void uhid_disco __P((void *));
116
117 extern struct cfdriver uhid_cd;
118
119 struct cfattach uhid_ca = {
120 sizeof(struct uhid_softc), uhid_match, uhid_attach
121 };
122
123 int
124 uhid_match(parent, match, aux)
125 struct device *parent;
126 struct cfdata *match;
127 void *aux;
128 {
129 struct usb_attach_arg *uaa = aux;
130 usb_interface_descriptor_t *id;
131
132 if (!uaa->iface)
133 return (UMATCH_NONE);
134 id = usbd_get_interface_descriptor(uaa->iface);
135 if (!id || id->bInterfaceClass != UCLASS_HID)
136 return (UMATCH_NONE);
137 return (UMATCH_IFACECLASS_GENERIC);
138 }
139
140 void
141 uhid_attach(parent, self, aux)
142 struct device *parent;
143 struct device *self;
144 void *aux;
145 {
146 struct uhid_softc *sc = (struct uhid_softc *)self;
147 struct usb_attach_arg *uaa = aux;
148 usbd_interface_handle iface = uaa->iface;
149 usb_interface_descriptor_t *id;
150 usb_endpoint_descriptor_t *ed;
151 int size;
152 void *desc;
153 usbd_status r;
154 char devinfo[1024];
155
156 sc->sc_disconnected = 1;
157 sc->sc_iface = iface;
158 id = usbd_get_interface_descriptor(iface);
159 usbd_devinfo(uaa->device, 0, devinfo);
160 printf("\n%s: %s, iclass %d/%d\n", sc->sc_dev.dv_xname,
161 devinfo, id->bInterfaceClass, id->bInterfaceSubClass);
162 ed = usbd_interface2endpoint_descriptor(iface, 0);
163 if (!ed) {
164 printf("%s: could not read endpoint descriptor\n",
165 sc->sc_dev.dv_xname);
166 return;
167 }
168
169 DPRINTFN(10,("uhid_attach: \
170 bLength=%d bDescriptorType=%d bEndpointAddress=%d-%s bmAttributes=%d wMaxPacketSize=%d bInterval=%d\n",
171 ed->bLength, ed->bDescriptorType, ed->bEndpointAddress & UE_ADDR,
172 ed->bEndpointAddress & UE_IN ? "in" : "out",
173 ed->bmAttributes & UE_XFERTYPE,
174 UGETW(ed->wMaxPacketSize), ed->bInterval));
175
176 if ((ed->bEndpointAddress & UE_IN) != UE_IN ||
177 (ed->bmAttributes & UE_XFERTYPE) != UE_INTERRUPT) {
178 printf("%s: unexpected endpoint\n",
179 sc->sc_dev.dv_xname);
180 return;
181 }
182
183 sc->sc_ep_addr = ed->bEndpointAddress;
184 sc->sc_disconnected = 0;
185
186 r = usbd_alloc_report_desc(uaa->iface, &desc, &size, M_USB);
187 if (r != USBD_NORMAL_COMPLETION) {
188 printf("%s: no report descriptor\n", sc->sc_dev.dv_xname);
189 return;
190 }
191
192 (void)usbd_set_idle(iface, 0, 0);
193
194 sc->sc_isize = hid_report_size(desc, size, hid_input, &sc->sc_iid);
195 sc->sc_osize = hid_report_size(desc, size, hid_output, &sc->sc_oid);
196 sc->sc_fsize = hid_report_size(desc, size, hid_feature, &sc->sc_fid);
197
198 sc->sc_repdesc = desc;
199 sc->sc_repdesc_size = size;
200 }
201
202 void
203 uhid_disco(p)
204 void *p;
205 {
206 struct uhid_softc *sc = p;
207
208 DPRINTF(("ums_hid: sc=%p\n", sc));
209 usbd_abort_pipe(sc->sc_intrpipe);
210 sc->sc_disconnected = 1;
211 }
212
213 void
214 uhid_intr(reqh, addr, status)
215 usbd_request_handle reqh;
216 usbd_private_handle addr;
217 usbd_status status;
218 {
219 struct uhid_softc *sc = addr;
220
221 DPRINTFN(5, ("uhid_intr: status=%d\n", status));
222 DPRINTFN(5, ("uhid_intr: data = %02x %02x %02x\n",
223 sc->sc_ibuf[0], sc->sc_ibuf[1], sc->sc_ibuf[2]));
224
225 if (status == USBD_CANCELLED)
226 return;
227
228 if (status != USBD_NORMAL_COMPLETION) {
229 DPRINTF(("uhid_intr: status=%d\n", status));
230 sc->sc_state |= UHID_NEEDCLEAR;
231 return;
232 }
233
234 (void) b_to_q(sc->sc_ibuf, sc->sc_isize, &sc->sc_q);
235
236 if (sc->sc_state & UHID_ASLP) {
237 sc->sc_state &= ~UHID_ASLP;
238 DPRINTFN(5, ("uhid_intr: waking %p\n", sc));
239 wakeup((caddr_t)sc);
240 }
241 selwakeup(&sc->sc_rsel);
242 }
243
244 int
245 uhidopen(dev, flag, mode, p)
246 dev_t dev;
247 int flag;
248 int mode;
249 struct proc *p;
250 {
251 int unit = UHIDUNIT(dev);
252 struct uhid_softc *sc;
253 usbd_status r;
254
255 if (unit >= uhid_cd.cd_ndevs)
256 return ENXIO;
257 sc = uhid_cd.cd_devs[unit];
258 if (!sc)
259 return ENXIO;
260
261 DPRINTF(("uhidopen: sc=%p, disco=%d\n", sc, sc->sc_disconnected));
262
263 if (sc->sc_disconnected)
264 return (EIO);
265
266 if (sc->sc_state & UHID_OPEN)
267 return EBUSY;
268
269 if (clalloc(&sc->sc_q, UHID_BSIZE, 0) == -1)
270 return ENOMEM;
271
272 sc->sc_state |= UHID_OPEN;
273 sc->sc_state &= ~UHID_IMMED;
274
275 sc->sc_ibuf = malloc(sc->sc_isize, M_USB, M_WAITOK);
276 sc->sc_obuf = malloc(sc->sc_osize, M_USB, M_WAITOK);
277
278 /* Set up interrupt pipe. */
279 r = usbd_open_pipe_intr(sc->sc_iface, sc->sc_ep_addr,
280 USBD_SHORT_XFER_OK,
281 &sc->sc_intrpipe, sc, sc->sc_ibuf,
282 sc->sc_isize, uhid_intr);
283 if (r != USBD_NORMAL_COMPLETION) {
284 DPRINTF(("uhidopen: usbd_open_pipe_intr failed, error=%d\n",r));
285 sc->sc_state &= ~UHID_OPEN;
286 return (EIO);
287 }
288 usbd_set_disco(sc->sc_intrpipe, uhid_disco, sc);
289
290 return 0;
291 }
292
293 int
294 uhidclose(dev, flag, mode, p)
295 dev_t dev;
296 int flag;
297 int mode;
298 struct proc *p;
299 {
300 struct uhid_softc *sc = uhid_cd.cd_devs[UHIDUNIT(dev)];
301
302 if (sc->sc_disconnected)
303 return (EIO);
304
305 DPRINTF(("uhidclose: sc=%p\n", sc));
306
307 /* Disable interrupts. */
308 usbd_abort_pipe(sc->sc_intrpipe);
309 usbd_close_pipe(sc->sc_intrpipe);
310
311 sc->sc_state &= ~UHID_OPEN;
312
313 clfree(&sc->sc_q);
314
315 free(sc->sc_ibuf, M_USB);
316 free(sc->sc_obuf, M_USB);
317
318 return 0;
319 }
320
321 int
322 uhidread(dev, uio, flag)
323 dev_t dev;
324 struct uio *uio;
325 int flag;
326 {
327 struct uhid_softc *sc = uhid_cd.cd_devs[UHIDUNIT(dev)];
328 int s;
329 int error = 0;
330 size_t length;
331 u_char buffer[UHID_CHUNK];
332 usbd_status r;
333
334 if (sc->sc_disconnected)
335 return (EIO);
336
337 DPRINTFN(1, ("uhidread\n"));
338 if (sc->sc_state & UHID_IMMED) {
339 DPRINTFN(1, ("uhidread immed\n"));
340
341 r = usbd_get_report(sc->sc_iface, UHID_INPUT_REPORT,
342 sc->sc_iid, sc->sc_ibuf, sc->sc_isize);
343 if (r != USBD_NORMAL_COMPLETION)
344 return (EIO);
345 return (uiomove(buffer, sc->sc_isize, uio));
346 }
347
348 s = spltty();
349 while (sc->sc_q.c_cc == 0) {
350 if (flag & IO_NDELAY) {
351 splx(s);
352 return EWOULDBLOCK;
353 }
354 sc->sc_state |= UHID_ASLP;
355 DPRINTFN(5, ("uhidread: sleep on %p\n", sc));
356 error = tsleep((caddr_t)sc, PZERO | PCATCH, "uhidrea", 0);
357 DPRINTFN(5, ("uhidread: woke, error=%d\n", error));
358 if (error) {
359 sc->sc_state &= ~UHID_ASLP;
360 splx(s);
361 return (error);
362 }
363 if (sc->sc_state & UHID_NEEDCLEAR) {
364 DPRINTFN(-1,("uhidread: clearing stall\n"));
365 sc->sc_state &= ~UHID_NEEDCLEAR;
366 usbd_clear_endpoint_stall(sc->sc_intrpipe);
367 }
368 }
369 splx(s);
370
371 /* Transfer as many chunks as possible. */
372 while (sc->sc_q.c_cc > 0 && uio->uio_resid > 0) {
373 length = min(sc->sc_q.c_cc, uio->uio_resid);
374 if (length > sizeof(buffer))
375 length = sizeof(buffer);
376
377 /* Remove a small chunk from the input queue. */
378 (void) q_to_b(&sc->sc_q, buffer, length);
379 DPRINTFN(5, ("uhidread: got %d chars\n", length));
380
381 /* Copy the data to the user process. */
382 if ((error = uiomove(buffer, length, uio)) != 0)
383 break;
384 }
385
386 return (error);
387 }
388
389 int
390 uhidwrite(dev, uio, flag)
391 dev_t dev;
392 struct uio *uio;
393 int flag;
394 {
395 struct uhid_softc *sc = uhid_cd.cd_devs[UHIDUNIT(dev)];
396 int error;
397 int size;
398 usbd_status r;
399
400 if (sc->sc_disconnected)
401 return (EIO);
402
403 DPRINTFN(1, ("uhidwrite\n"));
404
405 size = sc->sc_osize;
406 error = 0;
407 while (uio->uio_resid > 0) {
408 if (uio->uio_resid != size)
409 return (0);
410 if ((error = uiomove(sc->sc_obuf, size, uio)) != 0)
411 break;
412 if (sc->sc_oid)
413 r = usbd_set_report(sc->sc_iface, UHID_OUTPUT_REPORT,
414 sc->sc_obuf[0],
415 sc->sc_obuf+1, size-1);
416 else
417 r = usbd_set_report(sc->sc_iface, UHID_OUTPUT_REPORT,
418 0, sc->sc_obuf, size);
419 if (r != USBD_NORMAL_COMPLETION) {
420 error = EIO;
421 break;
422 }
423 }
424 return (error);
425 }
426
427 int
428 uhidioctl(dev, cmd, addr, flag, p)
429 dev_t dev;
430 u_long cmd;
431 caddr_t addr;
432 int flag;
433 struct proc *p;
434 {
435 struct uhid_softc *sc = uhid_cd.cd_devs[UHIDUNIT(dev)];
436 struct usb_ctl_report_desc *rd;
437 struct usb_ctl_report *re;
438 int size, id;
439 usbd_status r;
440
441 if (sc->sc_disconnected)
442 return (EIO);
443
444 DPRINTFN(2, ("uhidioctl: cmd=%lx\n", cmd));
445 switch (cmd) {
446 case FIONBIO:
447 /* All handled in the upper FS layer. */
448 break;
449
450 case USB_GET_REPORT_DESC:
451 rd = (struct usb_ctl_report_desc *)addr;
452 size = min(sc->sc_repdesc_size, sizeof rd->data);
453 rd->size = size;
454 memcpy(rd->data, sc->sc_repdesc, size);
455 break;
456
457 case USB_SET_IMMED:
458 if (*(int *)addr) {
459 /* XXX should read into ibuf, but does it matter */
460 r = usbd_get_report(sc->sc_iface, UHID_INPUT_REPORT,
461 sc->sc_iid, sc->sc_ibuf,
462 sc->sc_isize);
463 if (r != USBD_NORMAL_COMPLETION)
464 return (EOPNOTSUPP);
465 sc->sc_state |= UHID_IMMED;
466 } else
467 sc->sc_state &= ~UHID_IMMED;
468 break;
469
470 case USB_GET_REPORT:
471 re = (struct usb_ctl_report *)addr;
472 switch (re->report) {
473 case UHID_INPUT_REPORT:
474 size = sc->sc_isize;
475 id = sc->sc_iid;
476 break;
477 case UHID_OUTPUT_REPORT:
478 size = sc->sc_osize;
479 id = sc->sc_oid;
480 break;
481 case UHID_FEATURE_REPORT:
482 size = sc->sc_fsize;
483 id = sc->sc_fid;
484 break;
485 default:
486 return (EINVAL);
487 }
488 r = usbd_get_report(sc->sc_iface, re->report, id,
489 re->data, size);
490 if (r != USBD_NORMAL_COMPLETION)
491 return (EIO);
492 break;
493
494 default:
495 return (EINVAL);
496 }
497 return (0);
498 }
499
500 int
501 uhidpoll(dev, events, p)
502 dev_t dev;
503 int events;
504 struct proc *p;
505 {
506 struct uhid_softc *sc = uhid_cd.cd_devs[UHIDUNIT(dev)];
507 int revents = 0;
508 int s;
509
510 if (sc->sc_disconnected)
511 return (EIO);
512
513 s = spltty();
514 if (events & (POLLOUT | POLLWRNORM))
515 revents |= events & (POLLOUT | POLLWRNORM);
516 if (events & (POLLIN | POLLRDNORM)) {
517 if (sc->sc_q.c_cc > 0)
518 revents |= events & (POLLIN | POLLRDNORM);
519 else
520 selrecord(p, &sc->sc_rsel);
521 }
522
523 splx(s);
524 return (revents);
525 }
526