2 * adutux - driver for ADU devices from Ontrak Control Systems
3 * This is an experimental driver. Use at your own risk.
4 * This driver is not supported by Ontrak Control Systems.
6 * Copyright (c) 2003 John Homppi (SCO, leave this notice here)
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
13 * derived from the Lego USB Tower driver 0.56:
14 * Copyright (c) 2003 David Glance <davidgsf@sourceforge.net>
15 * 2001 Juergen Stuber <stuber@loria.fr>
16 * that was derived from USB Skeleton driver - 0.5
17 * Copyright (c) 2001 Greg Kroah-Hartman (greg@kroah.com)
21 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
23 #include <linux/kernel.h>
24 #include <linux/errno.h>
25 #include <linux/slab.h>
26 #include <linux/module.h>
27 #include <linux/usb.h>
28 #include <linux/mutex.h>
29 #include <linux/uaccess.h>
31 /* Version Information */
32 #define DRIVER_VERSION "v0.0.13"
33 #define DRIVER_AUTHOR "John Homppi"
34 #define DRIVER_DESC "adutux (see www.ontrak.net)"
36 /* Define these values to match your device */
37 #define ADU_VENDOR_ID 0x0a07
38 #define ADU_PRODUCT_ID 0x0064
40 /* table of devices that work with this driver */
41 static const struct usb_device_id device_table[] = {
42 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID) }, /* ADU100 */
43 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID+20) }, /* ADU120 */
44 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID+30) }, /* ADU130 */
45 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID+100) }, /* ADU200 */
46 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID+108) }, /* ADU208 */
47 { USB_DEVICE(ADU_VENDOR_ID, ADU_PRODUCT_ID+118) }, /* ADU218 */
48 { } /* Terminating entry */
51 MODULE_DEVICE_TABLE(usb, device_table);
53 #ifdef CONFIG_USB_DYNAMIC_MINORS
54 #define ADU_MINOR_BASE 0
56 #define ADU_MINOR_BASE 67
59 /* we can have up to this number of device plugged in at once */
60 #define MAX_DEVICES 16
62 #define COMMAND_TIMEOUT (2*HZ) /* 60 second timeout for a command */
65 * The locking scheme is a vanilla 3-lock:
66 * adu_device.buflock: A spinlock, covers what IRQs touch.
67 * adutux_mutex: A Static lock to cover open_count. It would also cover
68 * any globals, but we don't have them in 2.6.
69 * adu_device.mtx: A mutex to hold across sleepers like copy_from_user.
70 * It covers all of adu_device, except the open_count
71 * and what .buflock covers.
74 /* Structure to hold all of our device specific stuff */
77 struct usb_device *udev; /* save off the usb device pointer */
78 struct usb_interface *interface;
79 unsigned int minor; /* the starting minor number for this device */
80 char serial_number[8];
82 int open_count; /* number of times this port has been opened */
84 char *read_buffer_primary;
85 int read_buffer_length;
86 char *read_buffer_secondary;
91 wait_queue_head_t read_wait;
92 wait_queue_head_t write_wait;
94 char *interrupt_in_buffer;
95 struct usb_endpoint_descriptor *interrupt_in_endpoint;
96 struct urb *interrupt_in_urb;
97 int read_urb_finished;
99 char *interrupt_out_buffer;
100 struct usb_endpoint_descriptor *interrupt_out_endpoint;
101 struct urb *interrupt_out_urb;
102 int out_urb_finished;
105 static DEFINE_MUTEX(adutux_mutex);
107 static struct usb_driver adu_driver;
109 static inline void adu_debug_data(struct device *dev, const char *function,
110 int size, const unsigned char *data)
112 dev_dbg(dev, "%s - length = %d, data = %*ph\n",
113 function, size, size, data);
117 * adu_abort_transfers
118 * aborts transfers and frees associated data structures
120 static void adu_abort_transfers(struct adu_device *dev)
124 if (dev->udev == NULL)
127 /* shutdown transfer */
129 /* XXX Anchor these instead */
130 spin_lock_irqsave(&dev->buflock, flags);
131 if (!dev->read_urb_finished) {
132 spin_unlock_irqrestore(&dev->buflock, flags);
133 usb_kill_urb(dev->interrupt_in_urb);
135 spin_unlock_irqrestore(&dev->buflock, flags);
137 spin_lock_irqsave(&dev->buflock, flags);
138 if (!dev->out_urb_finished) {
139 spin_unlock_irqrestore(&dev->buflock, flags);
140 usb_kill_urb(dev->interrupt_out_urb);
142 spin_unlock_irqrestore(&dev->buflock, flags);
145 static void adu_delete(struct adu_device *dev)
147 /* free data structures */
148 usb_free_urb(dev->interrupt_in_urb);
149 usb_free_urb(dev->interrupt_out_urb);
150 kfree(dev->read_buffer_primary);
151 kfree(dev->read_buffer_secondary);
152 kfree(dev->interrupt_in_buffer);
153 kfree(dev->interrupt_out_buffer);
157 static void adu_interrupt_in_callback(struct urb *urb)
159 struct adu_device *dev = urb->context;
160 int status = urb->status;
162 adu_debug_data(&dev->udev->dev, __func__,
163 urb->actual_length, urb->transfer_buffer);
165 spin_lock(&dev->buflock);
168 if ((status != -ENOENT) && (status != -ECONNRESET) &&
169 (status != -ESHUTDOWN)) {
170 dev_dbg(&dev->udev->dev,
171 "%s : nonzero status received: %d\n",
177 if (urb->actual_length > 0 && dev->interrupt_in_buffer[0] != 0x00) {
178 if (dev->read_buffer_length <
179 (4 * usb_endpoint_maxp(dev->interrupt_in_endpoint)) -
180 (urb->actual_length)) {
181 memcpy (dev->read_buffer_primary +
182 dev->read_buffer_length,
183 dev->interrupt_in_buffer, urb->actual_length);
185 dev->read_buffer_length += urb->actual_length;
186 dev_dbg(&dev->udev->dev,"%s reading %d\n", __func__,
189 dev_dbg(&dev->udev->dev,"%s : read_buffer overflow\n",
195 dev->read_urb_finished = 1;
196 spin_unlock(&dev->buflock);
197 /* always wake up so we recover from errors */
198 wake_up_interruptible(&dev->read_wait);
201 static void adu_interrupt_out_callback(struct urb *urb)
203 struct adu_device *dev = urb->context;
204 int status = urb->status;
206 adu_debug_data(&dev->udev->dev, __func__,
207 urb->actual_length, urb->transfer_buffer);
210 if ((status != -ENOENT) &&
211 (status != -ECONNRESET)) {
212 dev_dbg(&dev->udev->dev,
213 "%s :nonzero status received: %d\n", __func__,
219 spin_lock(&dev->buflock);
220 dev->out_urb_finished = 1;
221 wake_up(&dev->write_wait);
222 spin_unlock(&dev->buflock);
225 static int adu_open(struct inode *inode, struct file *file)
227 struct adu_device *dev = NULL;
228 struct usb_interface *interface;
232 subminor = iminor(inode);
234 retval = mutex_lock_interruptible(&adutux_mutex);
238 interface = usb_find_interface(&adu_driver, subminor);
240 pr_err("%s - error, can't find device for minor %d\n",
246 dev = usb_get_intfdata(interface);
247 if (!dev || !dev->udev) {
252 /* check that nobody else is using the device */
253 if (dev->open_count) {
259 dev_dbg(&dev->udev->dev, "%s: open count %d\n", __func__,
262 /* save device in the file's private structure */
263 file->private_data = dev;
265 /* initialize in direction */
266 dev->read_buffer_length = 0;
268 /* fixup first read by having urb waiting for it */
269 usb_fill_int_urb(dev->interrupt_in_urb, dev->udev,
270 usb_rcvintpipe(dev->udev,
271 dev->interrupt_in_endpoint->bEndpointAddress),
272 dev->interrupt_in_buffer,
273 usb_endpoint_maxp(dev->interrupt_in_endpoint),
274 adu_interrupt_in_callback, dev,
275 dev->interrupt_in_endpoint->bInterval);
276 dev->read_urb_finished = 0;
277 if (usb_submit_urb(dev->interrupt_in_urb, GFP_KERNEL))
278 dev->read_urb_finished = 1;
279 /* we ignore failure */
280 /* end of fixup for first read */
282 /* initialize out direction */
283 dev->out_urb_finished = 1;
288 mutex_unlock(&adutux_mutex);
293 static void adu_release_internal(struct adu_device *dev)
295 /* decrement our usage count for the device */
297 dev_dbg(&dev->udev->dev, "%s : open count %d\n", __func__,
299 if (dev->open_count <= 0) {
300 adu_abort_transfers(dev);
305 static int adu_release(struct inode *inode, struct file *file)
307 struct adu_device *dev;
315 dev = file->private_data;
321 mutex_lock(&adutux_mutex); /* not interruptible */
323 if (dev->open_count <= 0) {
324 dev_dbg(&dev->udev->dev, "%s : device not opened\n", __func__);
329 adu_release_internal(dev);
330 if (dev->udev == NULL) {
331 /* the device was unplugged before the file was released */
332 if (!dev->open_count) /* ... and we're the last user */
336 mutex_unlock(&adutux_mutex);
341 static ssize_t adu_read(struct file *file, __user char *buffer, size_t count,
344 struct adu_device *dev;
345 size_t bytes_read = 0;
346 size_t bytes_to_read = count;
350 int should_submit = 0;
352 DECLARE_WAITQUEUE(wait, current);
354 dev = file->private_data;
355 if (mutex_lock_interruptible(&dev->mtx))
358 /* verify that the device wasn't unplugged */
359 if (dev->udev == NULL) {
361 pr_err("No device or device unplugged %d\n", retval);
365 /* verify that some data was requested */
367 dev_dbg(&dev->udev->dev, "%s : read request of 0 bytes\n",
372 timeout = COMMAND_TIMEOUT;
373 dev_dbg(&dev->udev->dev, "%s : about to start looping\n", __func__);
374 while (bytes_to_read) {
375 int data_in_secondary = dev->secondary_tail - dev->secondary_head;
376 dev_dbg(&dev->udev->dev,
377 "%s : while, data_in_secondary=%d, status=%d\n",
378 __func__, data_in_secondary,
379 dev->interrupt_in_urb->status);
381 if (data_in_secondary) {
382 /* drain secondary buffer */
383 int amount = bytes_to_read < data_in_secondary ? bytes_to_read : data_in_secondary;
384 i = copy_to_user(buffer, dev->read_buffer_secondary+dev->secondary_head, amount);
389 dev->secondary_head += (amount - i);
390 bytes_read += (amount - i);
391 bytes_to_read -= (amount - i);
393 /* we check the primary buffer */
394 spin_lock_irqsave (&dev->buflock, flags);
395 if (dev->read_buffer_length) {
396 /* we secure access to the primary */
398 dev_dbg(&dev->udev->dev,
399 "%s : swap, read_buffer_length = %d\n",
400 __func__, dev->read_buffer_length);
401 tmp = dev->read_buffer_secondary;
402 dev->read_buffer_secondary = dev->read_buffer_primary;
403 dev->read_buffer_primary = tmp;
404 dev->secondary_head = 0;
405 dev->secondary_tail = dev->read_buffer_length;
406 dev->read_buffer_length = 0;
407 spin_unlock_irqrestore(&dev->buflock, flags);
408 /* we have a free buffer so use it */
411 /* even the primary was empty - we may need to do IO */
412 if (!dev->read_urb_finished) {
413 /* somebody is doing IO */
414 spin_unlock_irqrestore(&dev->buflock, flags);
415 dev_dbg(&dev->udev->dev,
416 "%s : submitted already\n",
419 /* we must initiate input */
420 dev_dbg(&dev->udev->dev,
421 "%s : initiate input\n",
423 dev->read_urb_finished = 0;
424 spin_unlock_irqrestore(&dev->buflock, flags);
426 usb_fill_int_urb(dev->interrupt_in_urb, dev->udev,
427 usb_rcvintpipe(dev->udev,
428 dev->interrupt_in_endpoint->bEndpointAddress),
429 dev->interrupt_in_buffer,
430 usb_endpoint_maxp(dev->interrupt_in_endpoint),
431 adu_interrupt_in_callback,
433 dev->interrupt_in_endpoint->bInterval);
434 retval = usb_submit_urb(dev->interrupt_in_urb, GFP_KERNEL);
436 dev->read_urb_finished = 1;
437 if (retval == -ENOMEM) {
438 retval = bytes_read ? bytes_read : -ENOMEM;
440 dev_dbg(&dev->udev->dev,
441 "%s : submit failed\n",
447 /* we wait for I/O to complete */
448 set_current_state(TASK_INTERRUPTIBLE);
449 add_wait_queue(&dev->read_wait, &wait);
450 spin_lock_irqsave(&dev->buflock, flags);
451 if (!dev->read_urb_finished) {
452 spin_unlock_irqrestore(&dev->buflock, flags);
453 timeout = schedule_timeout(COMMAND_TIMEOUT);
455 spin_unlock_irqrestore(&dev->buflock, flags);
456 set_current_state(TASK_RUNNING);
458 remove_wait_queue(&dev->read_wait, &wait);
461 dev_dbg(&dev->udev->dev,
462 "%s : timeout\n", __func__);
463 retval = bytes_read ? bytes_read : -ETIMEDOUT;
467 if (signal_pending(current)) {
468 dev_dbg(&dev->udev->dev,
469 "%s : signal pending\n",
471 retval = bytes_read ? bytes_read : -EINTR;
479 /* if the primary buffer is empty then use it */
480 spin_lock_irqsave(&dev->buflock, flags);
481 if (should_submit && dev->read_urb_finished) {
482 dev->read_urb_finished = 0;
483 spin_unlock_irqrestore(&dev->buflock, flags);
484 usb_fill_int_urb(dev->interrupt_in_urb, dev->udev,
485 usb_rcvintpipe(dev->udev,
486 dev->interrupt_in_endpoint->bEndpointAddress),
487 dev->interrupt_in_buffer,
488 usb_endpoint_maxp(dev->interrupt_in_endpoint),
489 adu_interrupt_in_callback,
491 dev->interrupt_in_endpoint->bInterval);
492 if (usb_submit_urb(dev->interrupt_in_urb, GFP_KERNEL) != 0)
493 dev->read_urb_finished = 1;
494 /* we ignore failure */
496 spin_unlock_irqrestore(&dev->buflock, flags);
500 /* unlock the device */
501 mutex_unlock(&dev->mtx);
506 static ssize_t adu_write(struct file *file, const __user char *buffer,
507 size_t count, loff_t *ppos)
509 DECLARE_WAITQUEUE(waita, current);
510 struct adu_device *dev;
511 size_t bytes_written = 0;
512 size_t bytes_to_write;
517 dev = file->private_data;
519 retval = mutex_lock_interruptible(&dev->mtx);
523 /* verify that the device wasn't unplugged */
524 if (dev->udev == NULL) {
526 pr_err("No device or device unplugged %d\n", retval);
530 /* verify that we actually have some data to write */
532 dev_dbg(&dev->udev->dev, "%s : write request of 0 bytes\n",
538 add_wait_queue(&dev->write_wait, &waita);
539 set_current_state(TASK_INTERRUPTIBLE);
540 spin_lock_irqsave(&dev->buflock, flags);
541 if (!dev->out_urb_finished) {
542 spin_unlock_irqrestore(&dev->buflock, flags);
544 mutex_unlock(&dev->mtx);
545 if (signal_pending(current)) {
546 dev_dbg(&dev->udev->dev, "%s : interrupted\n",
548 set_current_state(TASK_RUNNING);
552 if (schedule_timeout(COMMAND_TIMEOUT) == 0) {
553 dev_dbg(&dev->udev->dev,
554 "%s - command timed out.\n", __func__);
558 remove_wait_queue(&dev->write_wait, &waita);
559 retval = mutex_lock_interruptible(&dev->mtx);
561 retval = bytes_written ? bytes_written : retval;
565 dev_dbg(&dev->udev->dev,
566 "%s : in progress, count = %zd\n",
569 spin_unlock_irqrestore(&dev->buflock, flags);
570 set_current_state(TASK_RUNNING);
571 remove_wait_queue(&dev->write_wait, &waita);
572 dev_dbg(&dev->udev->dev, "%s : sending, count = %zd\n",
575 /* write the data into interrupt_out_buffer from userspace */
576 buffer_size = usb_endpoint_maxp(dev->interrupt_out_endpoint);
577 bytes_to_write = count > buffer_size ? buffer_size : count;
578 dev_dbg(&dev->udev->dev,
579 "%s : buffer_size = %zd, count = %zd, bytes_to_write = %zd\n",
580 __func__, buffer_size, count, bytes_to_write);
582 if (copy_from_user(dev->interrupt_out_buffer, buffer, bytes_to_write) != 0) {
587 /* send off the urb */
589 dev->interrupt_out_urb,
591 usb_sndintpipe(dev->udev, dev->interrupt_out_endpoint->bEndpointAddress),
592 dev->interrupt_out_buffer,
594 adu_interrupt_out_callback,
596 dev->interrupt_out_endpoint->bInterval);
597 dev->interrupt_out_urb->actual_length = bytes_to_write;
598 dev->out_urb_finished = 0;
599 retval = usb_submit_urb(dev->interrupt_out_urb, GFP_KERNEL);
601 dev->out_urb_finished = 1;
602 dev_err(&dev->udev->dev, "Couldn't submit "
603 "interrupt_out_urb %d\n", retval);
607 buffer += bytes_to_write;
608 count -= bytes_to_write;
610 bytes_written += bytes_to_write;
613 mutex_unlock(&dev->mtx);
614 return bytes_written;
617 mutex_unlock(&dev->mtx);
622 remove_wait_queue(&dev->write_wait, &waita);
626 /* file operations needed when we register this driver */
627 static const struct file_operations adu_fops = {
628 .owner = THIS_MODULE,
632 .release = adu_release,
633 .llseek = noop_llseek,
637 * usb class driver info in order to get a minor number from the usb core,
638 * and to have the device registered with devfs and the driver core
640 static struct usb_class_driver adu_class = {
641 .name = "usb/adutux%d",
643 .minor_base = ADU_MINOR_BASE,
649 * Called by the usb core when a new device is connected that it thinks
650 * this driver might be interested in.
652 static int adu_probe(struct usb_interface *interface,
653 const struct usb_device_id *id)
655 struct usb_device *udev = interface_to_usbdev(interface);
656 struct adu_device *dev = NULL;
657 struct usb_host_interface *iface_desc;
658 struct usb_endpoint_descriptor *endpoint;
659 int retval = -ENODEV;
665 dev_err(&interface->dev, "udev is NULL.\n");
669 /* allocate memory for our device state and initialize it */
670 dev = kzalloc(sizeof(struct adu_device), GFP_KERNEL);
676 mutex_init(&dev->mtx);
677 spin_lock_init(&dev->buflock);
679 init_waitqueue_head(&dev->read_wait);
680 init_waitqueue_head(&dev->write_wait);
682 iface_desc = &interface->altsetting[0];
684 /* set up the endpoint information */
685 for (i = 0; i < iface_desc->desc.bNumEndpoints; ++i) {
686 endpoint = &iface_desc->endpoint[i].desc;
688 if (usb_endpoint_is_int_in(endpoint))
689 dev->interrupt_in_endpoint = endpoint;
691 if (usb_endpoint_is_int_out(endpoint))
692 dev->interrupt_out_endpoint = endpoint;
694 if (dev->interrupt_in_endpoint == NULL) {
695 dev_err(&interface->dev, "interrupt in endpoint not found\n");
698 if (dev->interrupt_out_endpoint == NULL) {
699 dev_err(&interface->dev, "interrupt out endpoint not found\n");
703 in_end_size = usb_endpoint_maxp(dev->interrupt_in_endpoint);
704 out_end_size = usb_endpoint_maxp(dev->interrupt_out_endpoint);
706 dev->read_buffer_primary = kmalloc((4 * in_end_size), GFP_KERNEL);
707 if (!dev->read_buffer_primary) {
712 /* debug code prime the buffer */
713 memset(dev->read_buffer_primary, 'a', in_end_size);
714 memset(dev->read_buffer_primary + in_end_size, 'b', in_end_size);
715 memset(dev->read_buffer_primary + (2 * in_end_size), 'c', in_end_size);
716 memset(dev->read_buffer_primary + (3 * in_end_size), 'd', in_end_size);
718 dev->read_buffer_secondary = kmalloc((4 * in_end_size), GFP_KERNEL);
719 if (!dev->read_buffer_secondary) {
724 /* debug code prime the buffer */
725 memset(dev->read_buffer_secondary, 'e', in_end_size);
726 memset(dev->read_buffer_secondary + in_end_size, 'f', in_end_size);
727 memset(dev->read_buffer_secondary + (2 * in_end_size), 'g', in_end_size);
728 memset(dev->read_buffer_secondary + (3 * in_end_size), 'h', in_end_size);
730 dev->interrupt_in_buffer = kmalloc(in_end_size, GFP_KERNEL);
731 if (!dev->interrupt_in_buffer)
734 /* debug code prime the buffer */
735 memset(dev->interrupt_in_buffer, 'i', in_end_size);
737 dev->interrupt_in_urb = usb_alloc_urb(0, GFP_KERNEL);
738 if (!dev->interrupt_in_urb)
740 dev->interrupt_out_buffer = kmalloc(out_end_size, GFP_KERNEL);
741 if (!dev->interrupt_out_buffer)
743 dev->interrupt_out_urb = usb_alloc_urb(0, GFP_KERNEL);
744 if (!dev->interrupt_out_urb)
747 if (!usb_string(udev, udev->descriptor.iSerialNumber, dev->serial_number,
748 sizeof(dev->serial_number))) {
749 dev_err(&interface->dev, "Could not retrieve serial number\n");
752 dev_dbg(&interface->dev,"serial_number=%s", dev->serial_number);
754 /* we can register the device now, as it is ready */
755 usb_set_intfdata(interface, dev);
757 retval = usb_register_dev(interface, &adu_class);
760 /* something prevented us from registering this driver */
761 dev_err(&interface->dev, "Not able to get a minor for this device.\n");
762 usb_set_intfdata(interface, NULL);
766 dev->minor = interface->minor;
768 /* let the user know what node this device is now attached to */
769 dev_info(&interface->dev, "ADU%d %s now attached to /dev/usb/adutux%d\n",
770 le16_to_cpu(udev->descriptor.idProduct), dev->serial_number,
771 (dev->minor - ADU_MINOR_BASE));
783 * Called by the usb core when the device is removed from the system.
785 static void adu_disconnect(struct usb_interface *interface)
787 struct adu_device *dev;
790 dev = usb_get_intfdata(interface);
792 mutex_lock(&dev->mtx); /* not interruptible */
793 dev->udev = NULL; /* poison */
795 usb_deregister_dev(interface, &adu_class);
796 mutex_unlock(&dev->mtx);
798 mutex_lock(&adutux_mutex);
799 usb_set_intfdata(interface, NULL);
801 /* if the device is not opened, then we clean up right now */
802 if (!dev->open_count)
805 mutex_unlock(&adutux_mutex);
808 /* usb specific object needed to register this driver with the usb subsystem */
809 static struct usb_driver adu_driver = {
812 .disconnect = adu_disconnect,
813 .id_table = device_table,
816 module_usb_driver(adu_driver);
818 MODULE_AUTHOR(DRIVER_AUTHOR);
819 MODULE_DESCRIPTION(DRIVER_DESC);
820 MODULE_LICENSE("GPL");