Nuke USB_MATCH*, USB_ATTACH* and USB_DETACH* macros.
[dragonfly.git] / sys / dev / usbmisc / urio / urio.c
1 /*
2  * Copyright (c) 2000 Iwasa Kazmi
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions, and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
18  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * This code is based on ugen.c and ulpt.c developed by Lennart Augustsson.
27  * This code includes software developed by the NetBSD Foundation, Inc. and
28  * its contributors.
29  */
30
31 /*
32  * $FreeBSD: src/sys/dev/usb/urio.c,v 1.28 2003/08/25 22:01:06 joe Exp $
33  * $DragonFly: src/sys/dev/usbmisc/urio/urio.c,v 1.20 2007/07/01 21:24:04 hasso Exp $
34  */
35
36 /*
37  * 2000/3/24  added NetBSD/OpenBSD support (from Alex Nemirovsky)
38  * 2000/3/07  use two bulk-pipe handles for read and write (Dirk)
39  * 2000/3/06  change major number(143), and copyright header
40  *            some fix for 4.0 (Dirk)
41  * 2000/3/05  codes for FreeBSD 4.x - CURRENT (Thanks to Dirk-Willem van Gulik)
42  * 2000/3/01  remove retry code from urioioctl()
43  *            change method of bulk transfer (no interrupt)
44  * 2000/2/28  small fixes for new rio_usb.h
45  * 2000/2/24  first version.
46  */
47
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/kernel.h>
51 #include <sys/malloc.h>
52 #include <sys/module.h>
53 #include <sys/bus.h>
54 #include <sys/ioccom.h>
55 #include <sys/fcntl.h>
56 #include <sys/filio.h>
57 #include <sys/conf.h>
58 #include <sys/uio.h>
59 #include <sys/tty.h>
60 #include <sys/file.h>
61 #include <sys/select.h>
62 #include <sys/vnode.h>
63 #include <sys/poll.h>
64 #include <sys/sysctl.h>
65 #include <sys/proc.h>
66 #include <sys/thread2.h>
67
68 #include <bus/usb/usb.h>
69 #include <bus/usb/usbdi.h>
70 #include <bus/usb/usbdi_util.h>
71
72 #include <bus/usb/usbdevs.h>
73 #include <bus/usb/rio500_usb.h>
74
75 #ifdef USB_DEBUG
76 #define DPRINTF(x)      if (uriodebug) kprintf x
77 #define DPRINTFN(n,x)   if (uriodebug>(n)) kprintf x
78 int     uriodebug = 0;
79 SYSCTL_NODE(_hw_usb, OID_AUTO, urio, CTLFLAG_RW, 0, "USB urio");
80 SYSCTL_INT(_hw_usb_urio, OID_AUTO, debug, CTLFLAG_RW,
81            &uriodebug, 0, "urio debug level");
82 #else
83 #define DPRINTF(x)
84 #define DPRINTFN(n,x)
85 #endif
86
87 /* difference of usbd interface */
88 #define USBDI 1
89
90 #define RIO_OUT 0
91 #define RIO_IN  1
92 #define RIO_NODIR  2
93
94 d_open_t  urioopen;
95 d_close_t urioclose;
96 d_read_t  urioread;
97 d_write_t uriowrite;
98 d_ioctl_t urioioctl;
99
100 #define URIO_CDEV_MAJOR 143
101
102 static struct dev_ops urio_ops = {
103         { "urio", URIO_CDEV_MAJOR, 0 },
104         .d_open =       urioopen,
105         .d_close =      urioclose,
106         .d_read =       urioread,
107         .d_write =      uriowrite,
108         .d_ioctl =      urioioctl,
109 };
110 #define RIO_UE_GET_DIR(p) ((UE_GET_DIR(p) == UE_DIR_IN) ? RIO_IN :\
111                           ((UE_GET_DIR(p) == UE_DIR_OUT) ? RIO_OUT :\
112                                                            RIO_NODIR))
113
114 #define URIO_BBSIZE     1024
115
116 struct urio_softc {
117         device_t sc_dev;
118         usbd_device_handle sc_udev;
119         usbd_interface_handle sc_iface;
120
121         int sc_opened;
122         usbd_pipe_handle sc_pipeh_in;
123         usbd_pipe_handle sc_pipeh_out;
124         int sc_epaddr[2];
125
126         int sc_refcnt;
127 };
128
129 #define URIOUNIT(n) (minor(n))
130
131 #define RIO_RW_TIMEOUT 4000     /* ms */
132
133 USB_DECLARE_DRIVER(urio);
134
135 static int
136 urio_match(device_t self)
137 {
138         struct usb_attach_arg *uaa = device_get_ivars(self);
139         usb_device_descriptor_t *dd;
140
141         DPRINTFN(10,("urio_match\n"));
142         if (!uaa->iface)
143                 return UMATCH_NONE;
144
145         dd = usbd_get_device_descriptor(uaa->device);
146
147         if (dd &&
148             ((UGETW(dd->idVendor) == USB_VENDOR_DIAMOND &&
149             UGETW(dd->idProduct) == USB_PRODUCT_DIAMOND_RIO500USB) ||
150             (UGETW(dd->idVendor) == USB_VENDOR_DIAMOND2 &&
151               (UGETW(dd->idProduct) == USB_PRODUCT_DIAMOND2_RIO600USB ||
152               UGETW(dd->idProduct) == USB_PRODUCT_DIAMOND2_RIO800USB))))
153                 return UMATCH_VENDOR_PRODUCT;
154         else
155                 return UMATCH_NONE;
156 }
157
158 static int
159 urio_attach(device_t self)
160 {
161         struct urio_softc *sc = device_get_softc(self);
162         struct usb_attach_arg *uaa = device_get_ivars(self);
163         char devinfo[1024];
164         usbd_device_handle udev;
165         usbd_interface_handle iface;
166         u_int8_t epcount;
167         usbd_status r;
168         char * ermsg = "<none>";
169         int i;
170
171         DPRINTFN(10,("urio_attach: sc=%p\n", sc));
172         usbd_devinfo(uaa->device, 0, devinfo);
173         sc->sc_dev = self;
174         device_set_desc_copy(self, devinfo);
175         kprintf("%s: %s\n", device_get_nameunit(sc->sc_dev), devinfo);
176
177         sc->sc_udev = udev = uaa->device;
178
179         if ((!uaa->device) || (!uaa->iface)) {
180                 ermsg = "device or iface";
181                 goto nobulk;
182         }
183         sc->sc_iface = iface = uaa->iface;
184         sc->sc_opened = 0;
185         sc->sc_pipeh_in = 0;
186         sc->sc_pipeh_out = 0;
187         sc->sc_refcnt = 0;
188
189         r = usbd_endpoint_count(iface, &epcount);
190         if (r != USBD_NORMAL_COMPLETION) {
191                 ermsg = "endpoints";
192                 goto nobulk;
193         }
194
195         sc->sc_epaddr[RIO_OUT] = 0xff;
196         sc->sc_epaddr[RIO_IN] = 0x00;
197
198         for (i = 0; i < epcount; i++) {
199                 usb_endpoint_descriptor_t *edesc =
200                         usbd_interface2endpoint_descriptor(iface, i);
201                 int d;
202
203                 if (!edesc) {
204                         ermsg = "interface endpoint";
205                         goto nobulk;
206                 }
207
208                 d = RIO_UE_GET_DIR(edesc->bEndpointAddress);
209                 if (d != RIO_NODIR)
210                         sc->sc_epaddr[d] = edesc->bEndpointAddress;
211         }
212         if ( sc->sc_epaddr[RIO_OUT] == 0xff ||
213              sc->sc_epaddr[RIO_IN] == 0x00) {
214                 ermsg = "Rio I&O";
215                 goto nobulk;
216         }
217
218         dev_ops_add(&urio_ops, -1, device_get_unit(self));
219         make_dev(&urio_ops, device_get_unit(self),
220                         UID_ROOT, GID_OPERATOR,
221                         0644, "urio%d", device_get_unit(self));
222
223         DPRINTFN(10, ("urio_attach: %p\n", sc->sc_udev));
224
225         return 0;
226
227  nobulk:
228         kprintf("%s: could not find %s\n", device_get_nameunit(sc->sc_dev),ermsg);
229         return ENXIO;
230 }
231
232
233 int
234 urioopen(struct dev_open_args *ap)
235 {
236         cdev_t dev = ap->a_head.a_dev;
237 #if (USBDI >= 1)
238         struct urio_softc * sc;
239 #endif
240         int unit = URIOUNIT(dev);
241         USB_GET_SC_OPEN(urio, unit, sc);
242
243         DPRINTFN(5, ("urioopen: flag=%d, mode=%d, unit=%d\n",
244                      ap->a_oflags, ap->a_devtype, unit));
245
246         if (sc->sc_opened)
247                 return EBUSY;
248
249         if ((ap->a_oflags & (FWRITE|FREAD)) != (FWRITE|FREAD))
250                 return EACCES;
251
252         sc->sc_opened = 1;
253         sc->sc_pipeh_in = 0;
254         sc->sc_pipeh_out = 0;
255         if (usbd_open_pipe(sc->sc_iface,
256                 sc->sc_epaddr[RIO_IN], 0, &sc->sc_pipeh_in)
257                         != USBD_NORMAL_COMPLETION)
258         {
259                         sc->sc_pipeh_in = 0;
260                         return EIO;
261         };
262         if (usbd_open_pipe(sc->sc_iface,
263                 sc->sc_epaddr[RIO_OUT], 0, &sc->sc_pipeh_out)
264                         != USBD_NORMAL_COMPLETION)
265         {
266                         usbd_close_pipe(sc->sc_pipeh_in);
267                         sc->sc_pipeh_in = 0;
268                         sc->sc_pipeh_out = 0;
269                         return EIO;
270         };
271         return 0;
272 }
273
274 int
275 urioclose(struct dev_close_args *ap)
276 {
277         cdev_t dev = ap->a_head.a_dev;
278 #if (USBDI >= 1)
279         struct urio_softc * sc;
280 #endif
281         int unit = URIOUNIT(dev);
282         USB_GET_SC(urio, unit, sc);
283
284         DPRINTFN(5, ("urioclose: flag=%d, mode=%d, unit=%d\n",
285                 ap->a_fflag, ap->a_devtype, unit));
286         if (sc->sc_pipeh_in)
287                 usbd_close_pipe(sc->sc_pipeh_in);
288
289         if (sc->sc_pipeh_out)
290                 usbd_close_pipe(sc->sc_pipeh_out);
291
292         sc->sc_pipeh_in = 0;
293         sc->sc_pipeh_out = 0;
294         sc->sc_opened = 0;
295         sc->sc_refcnt = 0;
296         return 0;
297 }
298
299 int
300 urioread(struct dev_read_args *ap)
301 {
302         cdev_t dev = ap->a_head.a_dev;
303         struct uio *uio = ap->a_uio;
304 #if (USBDI >= 1)
305         struct urio_softc * sc;
306         usbd_xfer_handle reqh;
307 #else
308         usbd_request_handle reqh;
309         usbd_private_handle r_priv;
310         void *r_buff;
311         usbd_status r_status;
312 #endif
313         int unit = URIOUNIT(dev);
314         usbd_status r;
315         char buf[URIO_BBSIZE];
316         u_int32_t n, tn;
317         int error = 0;
318
319         USB_GET_SC(urio, unit, sc);
320
321         DPRINTFN(5, ("urioread: %d\n", unit));
322         if (!sc->sc_opened)
323                 return EIO;
324
325 #if (USBDI >= 1)
326         sc->sc_refcnt++;
327         reqh = usbd_alloc_xfer(sc->sc_udev);
328 #else
329         reqh = usbd_alloc_request();
330 #endif
331         if (reqh == 0)
332                 return ENOMEM;
333         while ((n = min(URIO_BBSIZE, uio->uio_resid)) != 0) {
334                 DPRINTFN(1, ("urioread: start transfer %d bytes\n", n));
335                 tn = n;
336 #if (USBDI >= 1)
337                 usbd_setup_xfer(reqh, sc->sc_pipeh_in, 0, buf, tn,
338                                        0, RIO_RW_TIMEOUT, 0);
339 #else
340                 r = usbd_setup_request(reqh, sc->sc_pipeh_in, 0, buf, tn,
341                                        0, RIO_RW_TIMEOUT, 0);
342                 if (r != USBD_NORMAL_COMPLETION) {
343                         error = EIO;
344                         break;
345                 }
346 #endif
347                 r = usbd_sync_transfer(reqh);
348                 if (r != USBD_NORMAL_COMPLETION) {
349                         DPRINTFN(1, ("urioread: error=%d\n", r));
350                         usbd_clear_endpoint_stall(sc->sc_pipeh_in);
351                         tn = 0;
352                         error = EIO;
353                         break;
354                 }
355 #if (USBDI >= 1)
356                 usbd_get_xfer_status(reqh, 0, 0, &tn, 0);
357 #else
358                 usbd_get_request_status(reqh, &r_priv, &r_buff, &tn, &r_status);
359 #endif
360
361                 DPRINTFN(1, ("urioread: got %d bytes\n", tn));
362                 error = uiomove(buf, tn, uio);
363                 if (error || tn < n)
364                         break;
365         }
366 #if (USBDI >= 1)
367         usbd_free_xfer(reqh);
368 #else
369         usbd_free_request(reqh);
370 #endif
371
372         return error;
373 }
374
375 int
376 uriowrite(struct dev_write_args *ap)
377 {
378         cdev_t dev = ap->a_head.a_dev;
379         struct uio *uio = ap->a_uio;
380 #if (USBDI >= 1)
381         struct urio_softc * sc;
382         usbd_xfer_handle reqh;
383 #else
384         usbd_request_handle reqh;
385 #endif
386         int unit = URIOUNIT(dev);
387         usbd_status r;
388         char buf[URIO_BBSIZE];
389         u_int32_t n;
390         int error = 0;
391
392         USB_GET_SC(urio, unit, sc);
393
394         DPRINTFN(5, ("uriowrite: %d\n", unit));
395         if (!sc->sc_opened)
396                 return EIO;
397
398 #if (USBDI >= 1)
399         sc->sc_refcnt++;
400         reqh = usbd_alloc_xfer(sc->sc_udev);
401 #else
402         reqh = usbd_alloc_request();
403 #endif
404         if (reqh == 0)
405                 return EIO;
406         while ((n = min(URIO_BBSIZE, uio->uio_resid)) != 0) {
407                 error = uiomove(buf, n, uio);
408                 if (error)
409                         break;
410                 DPRINTFN(1, ("uriowrite: transfer %d bytes\n", n));
411 #if (USBDI >= 1)
412                 usbd_setup_xfer(reqh, sc->sc_pipeh_out, 0, buf, n,
413                                        0, RIO_RW_TIMEOUT, 0);
414 #else
415                 r = usbd_setup_request(reqh, sc->sc_pipeh_out, 0, buf, n,
416                                        0, RIO_RW_TIMEOUT, 0);
417                 if (r != USBD_NORMAL_COMPLETION) {
418                         error = EIO;
419                         break;
420                 }
421 #endif
422                 r = usbd_sync_transfer(reqh);
423                 if (r != USBD_NORMAL_COMPLETION) {
424                         DPRINTFN(1, ("uriowrite: error=%d\n", r));
425                         usbd_clear_endpoint_stall(sc->sc_pipeh_out);
426                         error = EIO;
427                         break;
428                 }
429 #if (USBDI >= 1)
430                 usbd_get_xfer_status(reqh, 0, 0, 0, 0);
431 #endif
432         }
433
434 #if (USBDI >= 1)
435         usbd_free_xfer(reqh);
436 #else
437         usbd_free_request(reqh);
438 #endif
439
440         return error;
441 }
442
443
444 int
445 urioioctl(struct dev_ioctl_args *ap)
446 {
447         cdev_t dev = ap->a_head.a_dev;
448 #if (USBDI >= 1)
449         struct urio_softc * sc;
450 #endif
451         int unit = URIOUNIT(dev);
452         struct RioCommand *rio_cmd;
453         int requesttype, len;
454         struct iovec iov;
455         struct uio uio;
456         usb_device_request_t req;
457         int req_flags = 0, req_actlen = 0;
458         void *ptr = 0;
459         int error = 0;
460         usbd_status r;
461
462         USB_GET_SC(urio, unit, sc);
463
464         switch (ap->a_cmd) {
465         case RIO_RECV_COMMAND:
466                 if (!(ap->a_fflag & FWRITE))
467                         return EPERM;
468                 rio_cmd = (struct RioCommand *)ap->a_data;
469                 if (rio_cmd == NULL)
470                         return EINVAL;
471                 len = rio_cmd->length;
472
473                 requesttype = rio_cmd->requesttype | UT_READ_VENDOR_DEVICE;
474                 DPRINTFN(1,("sending command:reqtype=%0x req=%0x value=%0x index=%0x len=%0x\n",
475                         requesttype, rio_cmd->request, rio_cmd->value, rio_cmd->index, len));
476                 break;
477
478         case RIO_SEND_COMMAND:
479                 if (!(ap->a_fflag & FWRITE))
480                         return EPERM;
481                 rio_cmd = (struct RioCommand *)ap->a_data;
482                 if (rio_cmd == NULL)
483                         return EINVAL;
484                 len = rio_cmd->length;
485
486                 requesttype = rio_cmd->requesttype | UT_WRITE_VENDOR_DEVICE;
487                 DPRINTFN(1,("sending command:reqtype=%0x req=%0x value=%0x index=%0x len=%0x\n",
488                         requesttype, rio_cmd->request, rio_cmd->value, rio_cmd->index, len));
489                 break;
490
491         default:
492                 return EINVAL;
493                 break;
494         }
495
496         /* Send rio control message */
497         req.bmRequestType = requesttype;
498         req.bRequest = rio_cmd->request;
499         USETW(req.wValue, rio_cmd->value);
500         USETW(req.wIndex, rio_cmd->index);
501         USETW(req.wLength, len);
502
503         if (len < 0 || len > 32767)
504                 return EINVAL;
505         if (len != 0) {
506                 iov.iov_base = (caddr_t)rio_cmd->buffer;
507                 iov.iov_len = len;
508                 uio.uio_iov = &iov;
509                 uio.uio_iovcnt = 1;
510                 uio.uio_resid = len;
511                 uio.uio_offset = 0;
512                 uio.uio_segflg = UIO_USERSPACE;
513                 uio.uio_rw =
514                         req.bmRequestType & UT_READ ?
515                         UIO_READ : UIO_WRITE;
516                 uio.uio_td = curthread;
517                 ptr = kmalloc(len, M_TEMP, M_WAITOK);
518                 if (uio.uio_rw == UIO_WRITE) {
519                         error = uiomove(ptr, len, &uio);
520                         if (error)
521                                 goto ret;
522                 }
523         }
524
525         r = usbd_do_request_flags(sc->sc_udev, &req,
526                                   ptr, req_flags, &req_actlen,
527                                   USBD_DEFAULT_TIMEOUT);
528         if (r == USBD_NORMAL_COMPLETION) {
529                 error = 0;
530                 if (len != 0) {
531                         if (uio.uio_rw == UIO_READ) {
532                                 error = uiomove(ptr, len, &uio);
533                         }
534                 }
535         } else {
536                 error = EIO;
537         }
538
539 ret:
540         if (ptr)
541                 kfree(ptr, M_TEMP);
542         return error;
543 }
544
545 static int
546 urio_detach(device_t self)
547 {
548         DPRINTF(("%s: disconnected\n", device_get_nameunit(self)));
549         dev_ops_remove(&urio_ops, -1, device_get_unit(self));
550         /* XXX not implemented yet */
551         device_set_desc(self, NULL);
552         return 0;
553 }
554
555 DRIVER_MODULE(urio, uhub, urio_driver, urio_devclass, usbd_driver_load, 0);
556