Loading...
1/*
2 * LEGO USB Tower driver
3 *
4 * Copyright (C) 2003 David Glance <davidgsf@sourceforge.net>
5 * 2001-2004 Juergen Stuber <starblue@users.sourceforge.net>
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of
10 * the License, or (at your option) any later version.
11 *
12 * derived from USB Skeleton driver - 0.5
13 * Copyright (C) 2001 Greg Kroah-Hartman (greg@kroah.com)
14 *
15 * History:
16 *
17 * 2001-10-13 - 0.1 js
18 * - first version
19 * 2001-11-03 - 0.2 js
20 * - simplified buffering, one-shot URBs for writing
21 * 2001-11-10 - 0.3 js
22 * - removed IOCTL (setting power/mode is more complicated, postponed)
23 * 2001-11-28 - 0.4 js
24 * - added vendor commands for mode of operation and power level in open
25 * 2001-12-04 - 0.5 js
26 * - set IR mode by default (by oversight 0.4 set VLL mode)
27 * 2002-01-11 - 0.5? pcchan
28 * - make read buffer reusable and work around bytes_to_write issue between
29 * uhci and legusbtower
30 * 2002-09-23 - 0.52 david (david@csse.uwa.edu.au)
31 * - imported into lejos project
32 * - changed wake_up to wake_up_interruptible
33 * - changed to use lego0 rather than tower0
34 * - changed dbg() to use __func__ rather than deprecated __func__
35 * 2003-01-12 - 0.53 david (david@csse.uwa.edu.au)
36 * - changed read and write to write everything or
37 * timeout (from a patch by Chris Riesen and Brett Thaeler driver)
38 * - added ioctl functionality to set timeouts
39 * 2003-07-18 - 0.54 davidgsf (david@csse.uwa.edu.au)
40 * - initial import into LegoUSB project
41 * - merge of existing LegoUSB.c driver
42 * 2003-07-18 - 0.56 davidgsf (david@csse.uwa.edu.au)
43 * - port to 2.6 style driver
44 * 2004-02-29 - 0.6 Juergen Stuber <starblue@users.sourceforge.net>
45 * - fix locking
46 * - unlink read URBs which are no longer needed
47 * - allow increased buffer size, eliminates need for timeout on write
48 * - have read URB running continuously
49 * - added poll
50 * - forbid seeking
51 * - added nonblocking I/O
52 * - changed back __func__ to __func__
53 * - read and log tower firmware version
54 * - reset tower on probe, avoids failure of first write
55 * 2004-03-09 - 0.7 Juergen Stuber <starblue@users.sourceforge.net>
56 * - timeout read now only after inactivity, shorten default accordingly
57 * 2004-03-11 - 0.8 Juergen Stuber <starblue@users.sourceforge.net>
58 * - log major, minor instead of possibly confusing device filename
59 * - whitespace cleanup
60 * 2004-03-12 - 0.9 Juergen Stuber <starblue@users.sourceforge.net>
61 * - normalize whitespace in debug messages
62 * - take care about endianness in control message responses
63 * 2004-03-13 - 0.91 Juergen Stuber <starblue@users.sourceforge.net>
64 * - make default intervals longer to accommodate current EHCI driver
65 * 2004-03-19 - 0.92 Juergen Stuber <starblue@users.sourceforge.net>
66 * - replaced atomic_t by memory barriers
67 * 2004-04-21 - 0.93 Juergen Stuber <starblue@users.sourceforge.net>
68 * - wait for completion of write urb in release (needed for remotecontrol)
69 * - corrected poll for write direction (missing negation)
70 * 2004-04-22 - 0.94 Juergen Stuber <starblue@users.sourceforge.net>
71 * - make device locking interruptible
72 * 2004-04-30 - 0.95 Juergen Stuber <starblue@users.sourceforge.net>
73 * - check for valid udev on resubmitting and unlinking urbs
74 * 2004-08-03 - 0.96 Juergen Stuber <starblue@users.sourceforge.net>
75 * - move reset into open to clean out spurious data
76 */
77
78#include <linux/kernel.h>
79#include <linux/errno.h>
80#include <linux/init.h>
81#include <linux/slab.h>
82#include <linux/module.h>
83#include <linux/completion.h>
84#include <linux/mutex.h>
85#include <asm/uaccess.h>
86#include <linux/usb.h>
87#include <linux/poll.h>
88
89
90#ifdef CONFIG_USB_DEBUG
91 static int debug = 4;
92#else
93 static int debug = 0;
94#endif
95
96/* Use our own dbg macro */
97#undef dbg
98#define dbg(lvl, format, arg...) \
99do { \
100 if (debug >= lvl) \
101 printk(KERN_DEBUG "%s: " format "\n", __FILE__, ##arg); \
102} while (0)
103
104/* Version Information */
105#define DRIVER_VERSION "v0.96"
106#define DRIVER_AUTHOR "Juergen Stuber <starblue@sourceforge.net>"
107#define DRIVER_DESC "LEGO USB Tower Driver"
108
109/* Module parameters */
110module_param(debug, int, S_IRUGO | S_IWUSR);
111MODULE_PARM_DESC(debug, "Debug enabled or not");
112
113/* The defaults are chosen to work with the latest versions of leJOS and NQC.
114 */
115
116/* Some legacy software likes to receive packets in one piece.
117 * In this case read_buffer_size should exceed the maximal packet length
118 * (417 for datalog uploads), and packet_timeout should be set.
119 */
120static int read_buffer_size = 480;
121module_param(read_buffer_size, int, 0);
122MODULE_PARM_DESC(read_buffer_size, "Read buffer size");
123
124/* Some legacy software likes to send packets in one piece.
125 * In this case write_buffer_size should exceed the maximal packet length
126 * (417 for firmware and program downloads).
127 * A problem with long writes is that the following read may time out
128 * if the software is not prepared to wait long enough.
129 */
130static int write_buffer_size = 480;
131module_param(write_buffer_size, int, 0);
132MODULE_PARM_DESC(write_buffer_size, "Write buffer size");
133
134/* Some legacy software expects reads to contain whole LASM packets.
135 * To achieve this, characters which arrive before a packet timeout
136 * occurs will be returned in a single read operation.
137 * A problem with long reads is that the software may time out
138 * if it is not prepared to wait long enough.
139 * The packet timeout should be greater than the time between the
140 * reception of subsequent characters, which should arrive about
141 * every 5ms for the standard 2400 baud.
142 * Set it to 0 to disable.
143 */
144static int packet_timeout = 50;
145module_param(packet_timeout, int, 0);
146MODULE_PARM_DESC(packet_timeout, "Packet timeout in ms");
147
148/* Some legacy software expects blocking reads to time out.
149 * Timeout occurs after the specified time of read and write inactivity.
150 * Set it to 0 to disable.
151 */
152static int read_timeout = 200;
153module_param(read_timeout, int, 0);
154MODULE_PARM_DESC(read_timeout, "Read timeout in ms");
155
156/* As of kernel version 2.6.4 ehci-hcd uses an
157 * "only one interrupt transfer per frame" shortcut
158 * to simplify the scheduling of periodic transfers.
159 * This conflicts with our standard 1ms intervals for in and out URBs.
160 * We use default intervals of 2ms for in and 8ms for out transfers,
161 * which is fast enough for 2400 baud and allows a small additional load.
162 * Increase the interval to allow more devices that do interrupt transfers,
163 * or set to 0 to use the standard interval from the endpoint descriptors.
164 */
165static int interrupt_in_interval = 2;
166module_param(interrupt_in_interval, int, 0);
167MODULE_PARM_DESC(interrupt_in_interval, "Interrupt in interval in ms");
168
169static int interrupt_out_interval = 8;
170module_param(interrupt_out_interval, int, 0);
171MODULE_PARM_DESC(interrupt_out_interval, "Interrupt out interval in ms");
172
173/* Define these values to match your device */
174#define LEGO_USB_TOWER_VENDOR_ID 0x0694
175#define LEGO_USB_TOWER_PRODUCT_ID 0x0001
176
177/* Vendor requests */
178#define LEGO_USB_TOWER_REQUEST_RESET 0x04
179#define LEGO_USB_TOWER_REQUEST_GET_VERSION 0xFD
180
181struct tower_reset_reply {
182 __le16 size; /* little-endian */
183 __u8 err_code;
184 __u8 spare;
185} __attribute__ ((packed));
186
187struct tower_get_version_reply {
188 __le16 size; /* little-endian */
189 __u8 err_code;
190 __u8 spare;
191 __u8 major;
192 __u8 minor;
193 __le16 build_no; /* little-endian */
194} __attribute__ ((packed));
195
196
197/* table of devices that work with this driver */
198static const struct usb_device_id tower_table[] = {
199 { USB_DEVICE(LEGO_USB_TOWER_VENDOR_ID, LEGO_USB_TOWER_PRODUCT_ID) },
200 { } /* Terminating entry */
201};
202
203MODULE_DEVICE_TABLE (usb, tower_table);
204static DEFINE_MUTEX(open_disc_mutex);
205
206#define LEGO_USB_TOWER_MINOR_BASE 160
207
208
209/* Structure to hold all of our device specific stuff */
210struct lego_usb_tower {
211 struct mutex lock; /* locks this structure */
212 struct usb_device* udev; /* save off the usb device pointer */
213 unsigned char minor; /* the starting minor number for this device */
214
215 int open_count; /* number of times this port has been opened */
216
217 char* read_buffer;
218 size_t read_buffer_length; /* this much came in */
219 size_t read_packet_length; /* this much will be returned on read */
220 spinlock_t read_buffer_lock;
221 int packet_timeout_jiffies;
222 unsigned long read_last_arrival;
223
224 wait_queue_head_t read_wait;
225 wait_queue_head_t write_wait;
226
227 char* interrupt_in_buffer;
228 struct usb_endpoint_descriptor* interrupt_in_endpoint;
229 struct urb* interrupt_in_urb;
230 int interrupt_in_interval;
231 int interrupt_in_running;
232 int interrupt_in_done;
233
234 char* interrupt_out_buffer;
235 struct usb_endpoint_descriptor* interrupt_out_endpoint;
236 struct urb* interrupt_out_urb;
237 int interrupt_out_interval;
238 int interrupt_out_busy;
239
240};
241
242
243/* local function prototypes */
244static ssize_t tower_read (struct file *file, char __user *buffer, size_t count, loff_t *ppos);
245static ssize_t tower_write (struct file *file, const char __user *buffer, size_t count, loff_t *ppos);
246static inline void tower_delete (struct lego_usb_tower *dev);
247static int tower_open (struct inode *inode, struct file *file);
248static int tower_release (struct inode *inode, struct file *file);
249static unsigned int tower_poll (struct file *file, poll_table *wait);
250static loff_t tower_llseek (struct file *file, loff_t off, int whence);
251
252static void tower_abort_transfers (struct lego_usb_tower *dev);
253static void tower_check_for_read_packet (struct lego_usb_tower *dev);
254static void tower_interrupt_in_callback (struct urb *urb);
255static void tower_interrupt_out_callback (struct urb *urb);
256
257static int tower_probe (struct usb_interface *interface, const struct usb_device_id *id);
258static void tower_disconnect (struct usb_interface *interface);
259
260
261/* file operations needed when we register this driver */
262static const struct file_operations tower_fops = {
263 .owner = THIS_MODULE,
264 .read = tower_read,
265 .write = tower_write,
266 .open = tower_open,
267 .release = tower_release,
268 .poll = tower_poll,
269 .llseek = tower_llseek,
270};
271
272static char *legousbtower_devnode(struct device *dev, mode_t *mode)
273{
274 return kasprintf(GFP_KERNEL, "usb/%s", dev_name(dev));
275}
276
277/*
278 * usb class driver info in order to get a minor number from the usb core,
279 * and to have the device registered with the driver core
280 */
281static struct usb_class_driver tower_class = {
282 .name = "legousbtower%d",
283 .devnode = legousbtower_devnode,
284 .fops = &tower_fops,
285 .minor_base = LEGO_USB_TOWER_MINOR_BASE,
286};
287
288
289/* usb specific object needed to register this driver with the usb subsystem */
290static struct usb_driver tower_driver = {
291 .name = "legousbtower",
292 .probe = tower_probe,
293 .disconnect = tower_disconnect,
294 .id_table = tower_table,
295};
296
297
298/**
299 * lego_usb_tower_debug_data
300 */
301static inline void lego_usb_tower_debug_data (int level, const char *function, int size, const unsigned char *data)
302{
303 int i;
304
305 if (debug < level)
306 return;
307
308 printk (KERN_DEBUG "%s: %s - length = %d, data = ", __FILE__, function, size);
309 for (i = 0; i < size; ++i) {
310 printk ("%.2x ", data[i]);
311 }
312 printk ("\n");
313}
314
315
316/**
317 * tower_delete
318 */
319static inline void tower_delete (struct lego_usb_tower *dev)
320{
321 dbg(2, "%s: enter", __func__);
322
323 tower_abort_transfers (dev);
324
325 /* free data structures */
326 usb_free_urb(dev->interrupt_in_urb);
327 usb_free_urb(dev->interrupt_out_urb);
328 kfree (dev->read_buffer);
329 kfree (dev->interrupt_in_buffer);
330 kfree (dev->interrupt_out_buffer);
331 kfree (dev);
332
333 dbg(2, "%s: leave", __func__);
334}
335
336
337/**
338 * tower_open
339 */
340static int tower_open (struct inode *inode, struct file *file)
341{
342 struct lego_usb_tower *dev = NULL;
343 int subminor;
344 int retval = 0;
345 struct usb_interface *interface;
346 struct tower_reset_reply reset_reply;
347 int result;
348
349 dbg(2, "%s: enter", __func__);
350
351 nonseekable_open(inode, file);
352 subminor = iminor(inode);
353
354 interface = usb_find_interface (&tower_driver, subminor);
355
356 if (!interface) {
357 err ("%s - error, can't find device for minor %d",
358 __func__, subminor);
359 retval = -ENODEV;
360 goto exit;
361 }
362
363 mutex_lock(&open_disc_mutex);
364 dev = usb_get_intfdata(interface);
365
366 if (!dev) {
367 mutex_unlock(&open_disc_mutex);
368 retval = -ENODEV;
369 goto exit;
370 }
371
372 /* lock this device */
373 if (mutex_lock_interruptible(&dev->lock)) {
374 mutex_unlock(&open_disc_mutex);
375 retval = -ERESTARTSYS;
376 goto exit;
377 }
378
379
380 /* allow opening only once */
381 if (dev->open_count) {
382 mutex_unlock(&open_disc_mutex);
383 retval = -EBUSY;
384 goto unlock_exit;
385 }
386 dev->open_count = 1;
387 mutex_unlock(&open_disc_mutex);
388
389 /* reset the tower */
390 result = usb_control_msg (dev->udev,
391 usb_rcvctrlpipe(dev->udev, 0),
392 LEGO_USB_TOWER_REQUEST_RESET,
393 USB_TYPE_VENDOR | USB_DIR_IN | USB_RECIP_DEVICE,
394 0,
395 0,
396 &reset_reply,
397 sizeof(reset_reply),
398 1000);
399 if (result < 0) {
400 err("LEGO USB Tower reset control request failed");
401 retval = result;
402 goto unlock_exit;
403 }
404
405 /* initialize in direction */
406 dev->read_buffer_length = 0;
407 dev->read_packet_length = 0;
408 usb_fill_int_urb (dev->interrupt_in_urb,
409 dev->udev,
410 usb_rcvintpipe(dev->udev, dev->interrupt_in_endpoint->bEndpointAddress),
411 dev->interrupt_in_buffer,
412 le16_to_cpu(dev->interrupt_in_endpoint->wMaxPacketSize),
413 tower_interrupt_in_callback,
414 dev,
415 dev->interrupt_in_interval);
416
417 dev->interrupt_in_running = 1;
418 dev->interrupt_in_done = 0;
419 mb();
420
421 retval = usb_submit_urb (dev->interrupt_in_urb, GFP_KERNEL);
422 if (retval) {
423 err("Couldn't submit interrupt_in_urb %d", retval);
424 dev->interrupt_in_running = 0;
425 dev->open_count = 0;
426 goto unlock_exit;
427 }
428
429 /* save device in the file's private structure */
430 file->private_data = dev;
431
432unlock_exit:
433 mutex_unlock(&dev->lock);
434
435exit:
436 dbg(2, "%s: leave, return value %d ", __func__, retval);
437
438 return retval;
439}
440
441/**
442 * tower_release
443 */
444static int tower_release (struct inode *inode, struct file *file)
445{
446 struct lego_usb_tower *dev;
447 int retval = 0;
448
449 dbg(2, "%s: enter", __func__);
450
451 dev = file->private_data;
452
453 if (dev == NULL) {
454 dbg(1, "%s: object is NULL", __func__);
455 retval = -ENODEV;
456 goto exit_nolock;
457 }
458
459 mutex_lock(&open_disc_mutex);
460 if (mutex_lock_interruptible(&dev->lock)) {
461 retval = -ERESTARTSYS;
462 goto exit;
463 }
464
465 if (dev->open_count != 1) {
466 dbg(1, "%s: device not opened exactly once", __func__);
467 retval = -ENODEV;
468 goto unlock_exit;
469 }
470 if (dev->udev == NULL) {
471 /* the device was unplugged before the file was released */
472
473 /* unlock here as tower_delete frees dev */
474 mutex_unlock(&dev->lock);
475 tower_delete (dev);
476 goto exit;
477 }
478
479 /* wait until write transfer is finished */
480 if (dev->interrupt_out_busy) {
481 wait_event_interruptible_timeout (dev->write_wait, !dev->interrupt_out_busy, 2 * HZ);
482 }
483 tower_abort_transfers (dev);
484 dev->open_count = 0;
485
486unlock_exit:
487 mutex_unlock(&dev->lock);
488
489exit:
490 mutex_unlock(&open_disc_mutex);
491exit_nolock:
492 dbg(2, "%s: leave, return value %d", __func__, retval);
493 return retval;
494}
495
496
497/**
498 * tower_abort_transfers
499 * aborts transfers and frees associated data structures
500 */
501static void tower_abort_transfers (struct lego_usb_tower *dev)
502{
503 dbg(2, "%s: enter", __func__);
504
505 if (dev == NULL) {
506 dbg(1, "%s: dev is null", __func__);
507 goto exit;
508 }
509
510 /* shutdown transfer */
511 if (dev->interrupt_in_running) {
512 dev->interrupt_in_running = 0;
513 mb();
514 if (dev->udev)
515 usb_kill_urb (dev->interrupt_in_urb);
516 }
517 if (dev->interrupt_out_busy && dev->udev)
518 usb_kill_urb(dev->interrupt_out_urb);
519
520exit:
521 dbg(2, "%s: leave", __func__);
522}
523
524
525/**
526 * tower_check_for_read_packet
527 *
528 * To get correct semantics for signals and non-blocking I/O
529 * with packetizing we pretend not to see any data in the read buffer
530 * until it has been there unchanged for at least
531 * dev->packet_timeout_jiffies, or until the buffer is full.
532 */
533static void tower_check_for_read_packet (struct lego_usb_tower *dev)
534{
535 spin_lock_irq (&dev->read_buffer_lock);
536 if (!packet_timeout
537 || time_after(jiffies, dev->read_last_arrival + dev->packet_timeout_jiffies)
538 || dev->read_buffer_length == read_buffer_size) {
539 dev->read_packet_length = dev->read_buffer_length;
540 }
541 dev->interrupt_in_done = 0;
542 spin_unlock_irq (&dev->read_buffer_lock);
543}
544
545
546/**
547 * tower_poll
548 */
549static unsigned int tower_poll (struct file *file, poll_table *wait)
550{
551 struct lego_usb_tower *dev;
552 unsigned int mask = 0;
553
554 dbg(2, "%s: enter", __func__);
555
556 dev = file->private_data;
557
558 if (!dev->udev)
559 return POLLERR | POLLHUP;
560
561 poll_wait(file, &dev->read_wait, wait);
562 poll_wait(file, &dev->write_wait, wait);
563
564 tower_check_for_read_packet(dev);
565 if (dev->read_packet_length > 0) {
566 mask |= POLLIN | POLLRDNORM;
567 }
568 if (!dev->interrupt_out_busy) {
569 mask |= POLLOUT | POLLWRNORM;
570 }
571
572 dbg(2, "%s: leave, mask = %d", __func__, mask);
573
574 return mask;
575}
576
577
578/**
579 * tower_llseek
580 */
581static loff_t tower_llseek (struct file *file, loff_t off, int whence)
582{
583 return -ESPIPE; /* unseekable */
584}
585
586
587/**
588 * tower_read
589 */
590static ssize_t tower_read (struct file *file, char __user *buffer, size_t count, loff_t *ppos)
591{
592 struct lego_usb_tower *dev;
593 size_t bytes_to_read;
594 int i;
595 int retval = 0;
596 unsigned long timeout = 0;
597
598 dbg(2, "%s: enter, count = %Zd", __func__, count);
599
600 dev = file->private_data;
601
602 /* lock this object */
603 if (mutex_lock_interruptible(&dev->lock)) {
604 retval = -ERESTARTSYS;
605 goto exit;
606 }
607
608 /* verify that the device wasn't unplugged */
609 if (dev->udev == NULL) {
610 retval = -ENODEV;
611 err("No device or device unplugged %d", retval);
612 goto unlock_exit;
613 }
614
615 /* verify that we actually have some data to read */
616 if (count == 0) {
617 dbg(1, "%s: read request of 0 bytes", __func__);
618 goto unlock_exit;
619 }
620
621 if (read_timeout) {
622 timeout = jiffies + read_timeout * HZ / 1000;
623 }
624
625 /* wait for data */
626 tower_check_for_read_packet (dev);
627 while (dev->read_packet_length == 0) {
628 if (file->f_flags & O_NONBLOCK) {
629 retval = -EAGAIN;
630 goto unlock_exit;
631 }
632 retval = wait_event_interruptible_timeout(dev->read_wait, dev->interrupt_in_done, dev->packet_timeout_jiffies);
633 if (retval < 0) {
634 goto unlock_exit;
635 }
636
637 /* reset read timeout during read or write activity */
638 if (read_timeout
639 && (dev->read_buffer_length || dev->interrupt_out_busy)) {
640 timeout = jiffies + read_timeout * HZ / 1000;
641 }
642 /* check for read timeout */
643 if (read_timeout && time_after (jiffies, timeout)) {
644 retval = -ETIMEDOUT;
645 goto unlock_exit;
646 }
647 tower_check_for_read_packet (dev);
648 }
649
650 /* copy the data from read_buffer into userspace */
651 bytes_to_read = min(count, dev->read_packet_length);
652
653 if (copy_to_user (buffer, dev->read_buffer, bytes_to_read)) {
654 retval = -EFAULT;
655 goto unlock_exit;
656 }
657
658 spin_lock_irq (&dev->read_buffer_lock);
659 dev->read_buffer_length -= bytes_to_read;
660 dev->read_packet_length -= bytes_to_read;
661 for (i=0; i<dev->read_buffer_length; i++) {
662 dev->read_buffer[i] = dev->read_buffer[i+bytes_to_read];
663 }
664 spin_unlock_irq (&dev->read_buffer_lock);
665
666 retval = bytes_to_read;
667
668unlock_exit:
669 /* unlock the device */
670 mutex_unlock(&dev->lock);
671
672exit:
673 dbg(2, "%s: leave, return value %d", __func__, retval);
674 return retval;
675}
676
677
678/**
679 * tower_write
680 */
681static ssize_t tower_write (struct file *file, const char __user *buffer, size_t count, loff_t *ppos)
682{
683 struct lego_usb_tower *dev;
684 size_t bytes_to_write;
685 int retval = 0;
686
687 dbg(2, "%s: enter, count = %Zd", __func__, count);
688
689 dev = file->private_data;
690
691 /* lock this object */
692 if (mutex_lock_interruptible(&dev->lock)) {
693 retval = -ERESTARTSYS;
694 goto exit;
695 }
696
697 /* verify that the device wasn't unplugged */
698 if (dev->udev == NULL) {
699 retval = -ENODEV;
700 err("No device or device unplugged %d", retval);
701 goto unlock_exit;
702 }
703
704 /* verify that we actually have some data to write */
705 if (count == 0) {
706 dbg(1, "%s: write request of 0 bytes", __func__);
707 goto unlock_exit;
708 }
709
710 /* wait until previous transfer is finished */
711 while (dev->interrupt_out_busy) {
712 if (file->f_flags & O_NONBLOCK) {
713 retval = -EAGAIN;
714 goto unlock_exit;
715 }
716 retval = wait_event_interruptible (dev->write_wait, !dev->interrupt_out_busy);
717 if (retval) {
718 goto unlock_exit;
719 }
720 }
721
722 /* write the data into interrupt_out_buffer from userspace */
723 bytes_to_write = min_t(int, count, write_buffer_size);
724 dbg(4, "%s: count = %Zd, bytes_to_write = %Zd", __func__, count, bytes_to_write);
725
726 if (copy_from_user (dev->interrupt_out_buffer, buffer, bytes_to_write)) {
727 retval = -EFAULT;
728 goto unlock_exit;
729 }
730
731 /* send off the urb */
732 usb_fill_int_urb(dev->interrupt_out_urb,
733 dev->udev,
734 usb_sndintpipe(dev->udev, dev->interrupt_out_endpoint->bEndpointAddress),
735 dev->interrupt_out_buffer,
736 bytes_to_write,
737 tower_interrupt_out_callback,
738 dev,
739 dev->interrupt_out_interval);
740
741 dev->interrupt_out_busy = 1;
742 wmb();
743
744 retval = usb_submit_urb (dev->interrupt_out_urb, GFP_KERNEL);
745 if (retval) {
746 dev->interrupt_out_busy = 0;
747 err("Couldn't submit interrupt_out_urb %d", retval);
748 goto unlock_exit;
749 }
750 retval = bytes_to_write;
751
752unlock_exit:
753 /* unlock the device */
754 mutex_unlock(&dev->lock);
755
756exit:
757 dbg(2, "%s: leave, return value %d", __func__, retval);
758
759 return retval;
760}
761
762
763/**
764 * tower_interrupt_in_callback
765 */
766static void tower_interrupt_in_callback (struct urb *urb)
767{
768 struct lego_usb_tower *dev = urb->context;
769 int status = urb->status;
770 int retval;
771
772 dbg(4, "%s: enter, status %d", __func__, status);
773
774 lego_usb_tower_debug_data(5, __func__, urb->actual_length, urb->transfer_buffer);
775
776 if (status) {
777 if (status == -ENOENT ||
778 status == -ECONNRESET ||
779 status == -ESHUTDOWN) {
780 goto exit;
781 } else {
782 dbg(1, "%s: nonzero status received: %d", __func__, status);
783 goto resubmit; /* maybe we can recover */
784 }
785 }
786
787 if (urb->actual_length > 0) {
788 spin_lock (&dev->read_buffer_lock);
789 if (dev->read_buffer_length + urb->actual_length < read_buffer_size) {
790 memcpy (dev->read_buffer + dev->read_buffer_length,
791 dev->interrupt_in_buffer,
792 urb->actual_length);
793 dev->read_buffer_length += urb->actual_length;
794 dev->read_last_arrival = jiffies;
795 dbg(3, "%s: received %d bytes", __func__, urb->actual_length);
796 } else {
797 printk(KERN_WARNING "%s: read_buffer overflow, %d bytes dropped", __func__, urb->actual_length);
798 }
799 spin_unlock (&dev->read_buffer_lock);
800 }
801
802resubmit:
803 /* resubmit if we're still running */
804 if (dev->interrupt_in_running && dev->udev) {
805 retval = usb_submit_urb (dev->interrupt_in_urb, GFP_ATOMIC);
806 if (retval) {
807 err("%s: usb_submit_urb failed (%d)", __func__, retval);
808 }
809 }
810
811exit:
812 dev->interrupt_in_done = 1;
813 wake_up_interruptible (&dev->read_wait);
814
815 lego_usb_tower_debug_data(5, __func__, urb->actual_length, urb->transfer_buffer);
816 dbg(4, "%s: leave, status %d", __func__, status);
817}
818
819
820/**
821 * tower_interrupt_out_callback
822 */
823static void tower_interrupt_out_callback (struct urb *urb)
824{
825 struct lego_usb_tower *dev = urb->context;
826 int status = urb->status;
827
828 dbg(4, "%s: enter, status %d", __func__, status);
829 lego_usb_tower_debug_data(5, __func__, urb->actual_length, urb->transfer_buffer);
830
831 /* sync/async unlink faults aren't errors */
832 if (status && !(status == -ENOENT ||
833 status == -ECONNRESET ||
834 status == -ESHUTDOWN)) {
835 dbg(1, "%s - nonzero write bulk status received: %d",
836 __func__, status);
837 }
838
839 dev->interrupt_out_busy = 0;
840 wake_up_interruptible(&dev->write_wait);
841
842 lego_usb_tower_debug_data(5, __func__, urb->actual_length, urb->transfer_buffer);
843 dbg(4, "%s: leave, status %d", __func__, status);
844}
845
846
847/**
848 * tower_probe
849 *
850 * Called by the usb core when a new device is connected that it thinks
851 * this driver might be interested in.
852 */
853static int tower_probe (struct usb_interface *interface, const struct usb_device_id *id)
854{
855 struct usb_device *udev = interface_to_usbdev(interface);
856 struct lego_usb_tower *dev = NULL;
857 struct usb_host_interface *iface_desc;
858 struct usb_endpoint_descriptor* endpoint;
859 struct tower_get_version_reply get_version_reply;
860 int i;
861 int retval = -ENOMEM;
862 int result;
863
864 dbg(2, "%s: enter", __func__);
865
866 if (udev == NULL)
867 dev_info(&interface->dev, "udev is NULL.\n");
868
869 /* allocate memory for our device state and initialize it */
870
871 dev = kmalloc (sizeof(struct lego_usb_tower), GFP_KERNEL);
872
873 if (dev == NULL) {
874 err ("Out of memory");
875 goto exit;
876 }
877
878 mutex_init(&dev->lock);
879
880 dev->udev = udev;
881 dev->open_count = 0;
882
883 dev->read_buffer = NULL;
884 dev->read_buffer_length = 0;
885 dev->read_packet_length = 0;
886 spin_lock_init (&dev->read_buffer_lock);
887 dev->packet_timeout_jiffies = packet_timeout * HZ / 1000;
888 dev->read_last_arrival = jiffies;
889
890 init_waitqueue_head (&dev->read_wait);
891 init_waitqueue_head (&dev->write_wait);
892
893 dev->interrupt_in_buffer = NULL;
894 dev->interrupt_in_endpoint = NULL;
895 dev->interrupt_in_urb = NULL;
896 dev->interrupt_in_running = 0;
897 dev->interrupt_in_done = 0;
898
899 dev->interrupt_out_buffer = NULL;
900 dev->interrupt_out_endpoint = NULL;
901 dev->interrupt_out_urb = NULL;
902 dev->interrupt_out_busy = 0;
903
904 iface_desc = interface->cur_altsetting;
905
906 /* set up the endpoint information */
907 for (i = 0; i < iface_desc->desc.bNumEndpoints; ++i) {
908 endpoint = &iface_desc->endpoint[i].desc;
909
910 if (usb_endpoint_xfer_int(endpoint)) {
911 if (usb_endpoint_dir_in(endpoint))
912 dev->interrupt_in_endpoint = endpoint;
913 else
914 dev->interrupt_out_endpoint = endpoint;
915 }
916 }
917 if(dev->interrupt_in_endpoint == NULL) {
918 err("interrupt in endpoint not found");
919 goto error;
920 }
921 if (dev->interrupt_out_endpoint == NULL) {
922 err("interrupt out endpoint not found");
923 goto error;
924 }
925
926 dev->read_buffer = kmalloc (read_buffer_size, GFP_KERNEL);
927 if (!dev->read_buffer) {
928 err("Couldn't allocate read_buffer");
929 goto error;
930 }
931 dev->interrupt_in_buffer = kmalloc (le16_to_cpu(dev->interrupt_in_endpoint->wMaxPacketSize), GFP_KERNEL);
932 if (!dev->interrupt_in_buffer) {
933 err("Couldn't allocate interrupt_in_buffer");
934 goto error;
935 }
936 dev->interrupt_in_urb = usb_alloc_urb(0, GFP_KERNEL);
937 if (!dev->interrupt_in_urb) {
938 err("Couldn't allocate interrupt_in_urb");
939 goto error;
940 }
941 dev->interrupt_out_buffer = kmalloc (write_buffer_size, GFP_KERNEL);
942 if (!dev->interrupt_out_buffer) {
943 err("Couldn't allocate interrupt_out_buffer");
944 goto error;
945 }
946 dev->interrupt_out_urb = usb_alloc_urb(0, GFP_KERNEL);
947 if (!dev->interrupt_out_urb) {
948 err("Couldn't allocate interrupt_out_urb");
949 goto error;
950 }
951 dev->interrupt_in_interval = interrupt_in_interval ? interrupt_in_interval : dev->interrupt_in_endpoint->bInterval;
952 dev->interrupt_out_interval = interrupt_out_interval ? interrupt_out_interval : dev->interrupt_out_endpoint->bInterval;
953
954 /* we can register the device now, as it is ready */
955 usb_set_intfdata (interface, dev);
956
957 retval = usb_register_dev (interface, &tower_class);
958
959 if (retval) {
960 /* something prevented us from registering this driver */
961 err ("Not able to get a minor for this device.");
962 usb_set_intfdata (interface, NULL);
963 goto error;
964 }
965 dev->minor = interface->minor;
966
967 /* let the user know what node this device is now attached to */
968 dev_info(&interface->dev, "LEGO USB Tower #%d now attached to major "
969 "%d minor %d\n", (dev->minor - LEGO_USB_TOWER_MINOR_BASE),
970 USB_MAJOR, dev->minor);
971
972 /* get the firmware version and log it */
973 result = usb_control_msg (udev,
974 usb_rcvctrlpipe(udev, 0),
975 LEGO_USB_TOWER_REQUEST_GET_VERSION,
976 USB_TYPE_VENDOR | USB_DIR_IN | USB_RECIP_DEVICE,
977 0,
978 0,
979 &get_version_reply,
980 sizeof(get_version_reply),
981 1000);
982 if (result < 0) {
983 err("LEGO USB Tower get version control request failed");
984 retval = result;
985 goto error;
986 }
987 dev_info(&interface->dev, "LEGO USB Tower firmware version is %d.%d "
988 "build %d\n", get_version_reply.major,
989 get_version_reply.minor,
990 le16_to_cpu(get_version_reply.build_no));
991
992
993exit:
994 dbg(2, "%s: leave, return value 0x%.8lx (dev)", __func__, (long) dev);
995
996 return retval;
997
998error:
999 tower_delete(dev);
1000 return retval;
1001}
1002
1003
1004/**
1005 * tower_disconnect
1006 *
1007 * Called by the usb core when the device is removed from the system.
1008 */
1009static void tower_disconnect (struct usb_interface *interface)
1010{
1011 struct lego_usb_tower *dev;
1012 int minor;
1013
1014 dbg(2, "%s: enter", __func__);
1015
1016 dev = usb_get_intfdata (interface);
1017 mutex_lock(&open_disc_mutex);
1018 usb_set_intfdata (interface, NULL);
1019
1020 minor = dev->minor;
1021
1022 /* give back our minor */
1023 usb_deregister_dev (interface, &tower_class);
1024
1025 mutex_lock(&dev->lock);
1026 mutex_unlock(&open_disc_mutex);
1027
1028 /* if the device is not opened, then we clean up right now */
1029 if (!dev->open_count) {
1030 mutex_unlock(&dev->lock);
1031 tower_delete (dev);
1032 } else {
1033 dev->udev = NULL;
1034 /* wake up pollers */
1035 wake_up_interruptible_all(&dev->read_wait);
1036 wake_up_interruptible_all(&dev->write_wait);
1037 mutex_unlock(&dev->lock);
1038 }
1039
1040 dev_info(&interface->dev, "LEGO USB Tower #%d now disconnected\n",
1041 (minor - LEGO_USB_TOWER_MINOR_BASE));
1042
1043 dbg(2, "%s: leave", __func__);
1044}
1045
1046
1047
1048/**
1049 * lego_usb_tower_init
1050 */
1051static int __init lego_usb_tower_init(void)
1052{
1053 int result;
1054 int retval = 0;
1055
1056 dbg(2, "%s: enter", __func__);
1057
1058 /* register this driver with the USB subsystem */
1059 result = usb_register(&tower_driver);
1060 if (result < 0) {
1061 err("usb_register failed for the %s driver. Error number %d", __FILE__, result);
1062 retval = -1;
1063 goto exit;
1064 }
1065
1066 printk(KERN_INFO KBUILD_MODNAME ": " DRIVER_VERSION ":"
1067 DRIVER_DESC "\n");
1068
1069exit:
1070 dbg(2, "%s: leave, return value %d", __func__, retval);
1071
1072 return retval;
1073}
1074
1075
1076/**
1077 * lego_usb_tower_exit
1078 */
1079static void __exit lego_usb_tower_exit(void)
1080{
1081 dbg(2, "%s: enter", __func__);
1082
1083 /* deregister this driver with the USB subsystem */
1084 usb_deregister (&tower_driver);
1085
1086 dbg(2, "%s: leave", __func__);
1087}
1088
1089module_init (lego_usb_tower_init);
1090module_exit (lego_usb_tower_exit);
1091
1092MODULE_AUTHOR(DRIVER_AUTHOR);
1093MODULE_DESCRIPTION(DRIVER_DESC);
1094#ifdef MODULE_LICENSE
1095MODULE_LICENSE("GPL");
1096#endif
1/*
2 * LEGO USB Tower driver
3 *
4 * Copyright (C) 2003 David Glance <davidgsf@sourceforge.net>
5 * 2001-2004 Juergen Stuber <starblue@users.sourceforge.net>
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of
10 * the License, or (at your option) any later version.
11 *
12 * derived from USB Skeleton driver - 0.5
13 * Copyright (C) 2001 Greg Kroah-Hartman (greg@kroah.com)
14 *
15 * History:
16 *
17 * 2001-10-13 - 0.1 js
18 * - first version
19 * 2001-11-03 - 0.2 js
20 * - simplified buffering, one-shot URBs for writing
21 * 2001-11-10 - 0.3 js
22 * - removed IOCTL (setting power/mode is more complicated, postponed)
23 * 2001-11-28 - 0.4 js
24 * - added vendor commands for mode of operation and power level in open
25 * 2001-12-04 - 0.5 js
26 * - set IR mode by default (by oversight 0.4 set VLL mode)
27 * 2002-01-11 - 0.5? pcchan
28 * - make read buffer reusable and work around bytes_to_write issue between
29 * uhci and legusbtower
30 * 2002-09-23 - 0.52 david (david@csse.uwa.edu.au)
31 * - imported into lejos project
32 * - changed wake_up to wake_up_interruptible
33 * - changed to use lego0 rather than tower0
34 * - changed dbg() to use __func__ rather than deprecated __func__
35 * 2003-01-12 - 0.53 david (david@csse.uwa.edu.au)
36 * - changed read and write to write everything or
37 * timeout (from a patch by Chris Riesen and Brett Thaeler driver)
38 * - added ioctl functionality to set timeouts
39 * 2003-07-18 - 0.54 davidgsf (david@csse.uwa.edu.au)
40 * - initial import into LegoUSB project
41 * - merge of existing LegoUSB.c driver
42 * 2003-07-18 - 0.56 davidgsf (david@csse.uwa.edu.au)
43 * - port to 2.6 style driver
44 * 2004-02-29 - 0.6 Juergen Stuber <starblue@users.sourceforge.net>
45 * - fix locking
46 * - unlink read URBs which are no longer needed
47 * - allow increased buffer size, eliminates need for timeout on write
48 * - have read URB running continuously
49 * - added poll
50 * - forbid seeking
51 * - added nonblocking I/O
52 * - changed back __func__ to __func__
53 * - read and log tower firmware version
54 * - reset tower on probe, avoids failure of first write
55 * 2004-03-09 - 0.7 Juergen Stuber <starblue@users.sourceforge.net>
56 * - timeout read now only after inactivity, shorten default accordingly
57 * 2004-03-11 - 0.8 Juergen Stuber <starblue@users.sourceforge.net>
58 * - log major, minor instead of possibly confusing device filename
59 * - whitespace cleanup
60 * 2004-03-12 - 0.9 Juergen Stuber <starblue@users.sourceforge.net>
61 * - normalize whitespace in debug messages
62 * - take care about endianness in control message responses
63 * 2004-03-13 - 0.91 Juergen Stuber <starblue@users.sourceforge.net>
64 * - make default intervals longer to accommodate current EHCI driver
65 * 2004-03-19 - 0.92 Juergen Stuber <starblue@users.sourceforge.net>
66 * - replaced atomic_t by memory barriers
67 * 2004-04-21 - 0.93 Juergen Stuber <starblue@users.sourceforge.net>
68 * - wait for completion of write urb in release (needed for remotecontrol)
69 * - corrected poll for write direction (missing negation)
70 * 2004-04-22 - 0.94 Juergen Stuber <starblue@users.sourceforge.net>
71 * - make device locking interruptible
72 * 2004-04-30 - 0.95 Juergen Stuber <starblue@users.sourceforge.net>
73 * - check for valid udev on resubmitting and unlinking urbs
74 * 2004-08-03 - 0.96 Juergen Stuber <starblue@users.sourceforge.net>
75 * - move reset into open to clean out spurious data
76 */
77
78#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
79
80#include <linux/kernel.h>
81#include <linux/errno.h>
82#include <linux/slab.h>
83#include <linux/module.h>
84#include <linux/completion.h>
85#include <linux/mutex.h>
86#include <asm/uaccess.h>
87#include <linux/usb.h>
88#include <linux/poll.h>
89
90
91/* Version Information */
92#define DRIVER_VERSION "v0.96"
93#define DRIVER_AUTHOR "Juergen Stuber <starblue@sourceforge.net>"
94#define DRIVER_DESC "LEGO USB Tower Driver"
95
96
97/* The defaults are chosen to work with the latest versions of leJOS and NQC.
98 */
99
100/* Some legacy software likes to receive packets in one piece.
101 * In this case read_buffer_size should exceed the maximal packet length
102 * (417 for datalog uploads), and packet_timeout should be set.
103 */
104static int read_buffer_size = 480;
105module_param(read_buffer_size, int, 0);
106MODULE_PARM_DESC(read_buffer_size, "Read buffer size");
107
108/* Some legacy software likes to send packets in one piece.
109 * In this case write_buffer_size should exceed the maximal packet length
110 * (417 for firmware and program downloads).
111 * A problem with long writes is that the following read may time out
112 * if the software is not prepared to wait long enough.
113 */
114static int write_buffer_size = 480;
115module_param(write_buffer_size, int, 0);
116MODULE_PARM_DESC(write_buffer_size, "Write buffer size");
117
118/* Some legacy software expects reads to contain whole LASM packets.
119 * To achieve this, characters which arrive before a packet timeout
120 * occurs will be returned in a single read operation.
121 * A problem with long reads is that the software may time out
122 * if it is not prepared to wait long enough.
123 * The packet timeout should be greater than the time between the
124 * reception of subsequent characters, which should arrive about
125 * every 5ms for the standard 2400 baud.
126 * Set it to 0 to disable.
127 */
128static int packet_timeout = 50;
129module_param(packet_timeout, int, 0);
130MODULE_PARM_DESC(packet_timeout, "Packet timeout in ms");
131
132/* Some legacy software expects blocking reads to time out.
133 * Timeout occurs after the specified time of read and write inactivity.
134 * Set it to 0 to disable.
135 */
136static int read_timeout = 200;
137module_param(read_timeout, int, 0);
138MODULE_PARM_DESC(read_timeout, "Read timeout in ms");
139
140/* As of kernel version 2.6.4 ehci-hcd uses an
141 * "only one interrupt transfer per frame" shortcut
142 * to simplify the scheduling of periodic transfers.
143 * This conflicts with our standard 1ms intervals for in and out URBs.
144 * We use default intervals of 2ms for in and 8ms for out transfers,
145 * which is fast enough for 2400 baud and allows a small additional load.
146 * Increase the interval to allow more devices that do interrupt transfers,
147 * or set to 0 to use the standard interval from the endpoint descriptors.
148 */
149static int interrupt_in_interval = 2;
150module_param(interrupt_in_interval, int, 0);
151MODULE_PARM_DESC(interrupt_in_interval, "Interrupt in interval in ms");
152
153static int interrupt_out_interval = 8;
154module_param(interrupt_out_interval, int, 0);
155MODULE_PARM_DESC(interrupt_out_interval, "Interrupt out interval in ms");
156
157/* Define these values to match your device */
158#define LEGO_USB_TOWER_VENDOR_ID 0x0694
159#define LEGO_USB_TOWER_PRODUCT_ID 0x0001
160
161/* Vendor requests */
162#define LEGO_USB_TOWER_REQUEST_RESET 0x04
163#define LEGO_USB_TOWER_REQUEST_GET_VERSION 0xFD
164
165struct tower_reset_reply {
166 __le16 size; /* little-endian */
167 __u8 err_code;
168 __u8 spare;
169} __attribute__ ((packed));
170
171struct tower_get_version_reply {
172 __le16 size; /* little-endian */
173 __u8 err_code;
174 __u8 spare;
175 __u8 major;
176 __u8 minor;
177 __le16 build_no; /* little-endian */
178} __attribute__ ((packed));
179
180
181/* table of devices that work with this driver */
182static const struct usb_device_id tower_table[] = {
183 { USB_DEVICE(LEGO_USB_TOWER_VENDOR_ID, LEGO_USB_TOWER_PRODUCT_ID) },
184 { } /* Terminating entry */
185};
186
187MODULE_DEVICE_TABLE (usb, tower_table);
188static DEFINE_MUTEX(open_disc_mutex);
189
190#define LEGO_USB_TOWER_MINOR_BASE 160
191
192
193/* Structure to hold all of our device specific stuff */
194struct lego_usb_tower {
195 struct mutex lock; /* locks this structure */
196 struct usb_device* udev; /* save off the usb device pointer */
197 unsigned char minor; /* the starting minor number for this device */
198
199 int open_count; /* number of times this port has been opened */
200
201 char* read_buffer;
202 size_t read_buffer_length; /* this much came in */
203 size_t read_packet_length; /* this much will be returned on read */
204 spinlock_t read_buffer_lock;
205 int packet_timeout_jiffies;
206 unsigned long read_last_arrival;
207
208 wait_queue_head_t read_wait;
209 wait_queue_head_t write_wait;
210
211 char* interrupt_in_buffer;
212 struct usb_endpoint_descriptor* interrupt_in_endpoint;
213 struct urb* interrupt_in_urb;
214 int interrupt_in_interval;
215 int interrupt_in_running;
216 int interrupt_in_done;
217
218 char* interrupt_out_buffer;
219 struct usb_endpoint_descriptor* interrupt_out_endpoint;
220 struct urb* interrupt_out_urb;
221 int interrupt_out_interval;
222 int interrupt_out_busy;
223
224};
225
226
227/* local function prototypes */
228static ssize_t tower_read (struct file *file, char __user *buffer, size_t count, loff_t *ppos);
229static ssize_t tower_write (struct file *file, const char __user *buffer, size_t count, loff_t *ppos);
230static inline void tower_delete (struct lego_usb_tower *dev);
231static int tower_open (struct inode *inode, struct file *file);
232static int tower_release (struct inode *inode, struct file *file);
233static unsigned int tower_poll (struct file *file, poll_table *wait);
234static loff_t tower_llseek (struct file *file, loff_t off, int whence);
235
236static void tower_abort_transfers (struct lego_usb_tower *dev);
237static void tower_check_for_read_packet (struct lego_usb_tower *dev);
238static void tower_interrupt_in_callback (struct urb *urb);
239static void tower_interrupt_out_callback (struct urb *urb);
240
241static int tower_probe (struct usb_interface *interface, const struct usb_device_id *id);
242static void tower_disconnect (struct usb_interface *interface);
243
244
245/* file operations needed when we register this driver */
246static const struct file_operations tower_fops = {
247 .owner = THIS_MODULE,
248 .read = tower_read,
249 .write = tower_write,
250 .open = tower_open,
251 .release = tower_release,
252 .poll = tower_poll,
253 .llseek = tower_llseek,
254};
255
256static char *legousbtower_devnode(struct device *dev, umode_t *mode)
257{
258 return kasprintf(GFP_KERNEL, "usb/%s", dev_name(dev));
259}
260
261/*
262 * usb class driver info in order to get a minor number from the usb core,
263 * and to have the device registered with the driver core
264 */
265static struct usb_class_driver tower_class = {
266 .name = "legousbtower%d",
267 .devnode = legousbtower_devnode,
268 .fops = &tower_fops,
269 .minor_base = LEGO_USB_TOWER_MINOR_BASE,
270};
271
272
273/* usb specific object needed to register this driver with the usb subsystem */
274static struct usb_driver tower_driver = {
275 .name = "legousbtower",
276 .probe = tower_probe,
277 .disconnect = tower_disconnect,
278 .id_table = tower_table,
279};
280
281
282/**
283 * lego_usb_tower_debug_data
284 */
285static inline void lego_usb_tower_debug_data(struct device *dev,
286 const char *function, int size,
287 const unsigned char *data)
288{
289 dev_dbg(dev, "%s - length = %d, data = %*ph\n",
290 function, size, size, data);
291}
292
293
294/**
295 * tower_delete
296 */
297static inline void tower_delete (struct lego_usb_tower *dev)
298{
299 tower_abort_transfers (dev);
300
301 /* free data structures */
302 usb_free_urb(dev->interrupt_in_urb);
303 usb_free_urb(dev->interrupt_out_urb);
304 kfree (dev->read_buffer);
305 kfree (dev->interrupt_in_buffer);
306 kfree (dev->interrupt_out_buffer);
307 kfree (dev);
308}
309
310
311/**
312 * tower_open
313 */
314static int tower_open (struct inode *inode, struct file *file)
315{
316 struct lego_usb_tower *dev = NULL;
317 int subminor;
318 int retval = 0;
319 struct usb_interface *interface;
320 struct tower_reset_reply reset_reply;
321 int result;
322
323 nonseekable_open(inode, file);
324 subminor = iminor(inode);
325
326 interface = usb_find_interface (&tower_driver, subminor);
327
328 if (!interface) {
329 pr_err("error, can't find device for minor %d\n", subminor);
330 retval = -ENODEV;
331 goto exit;
332 }
333
334 mutex_lock(&open_disc_mutex);
335 dev = usb_get_intfdata(interface);
336
337 if (!dev) {
338 mutex_unlock(&open_disc_mutex);
339 retval = -ENODEV;
340 goto exit;
341 }
342
343 /* lock this device */
344 if (mutex_lock_interruptible(&dev->lock)) {
345 mutex_unlock(&open_disc_mutex);
346 retval = -ERESTARTSYS;
347 goto exit;
348 }
349
350
351 /* allow opening only once */
352 if (dev->open_count) {
353 mutex_unlock(&open_disc_mutex);
354 retval = -EBUSY;
355 goto unlock_exit;
356 }
357 dev->open_count = 1;
358 mutex_unlock(&open_disc_mutex);
359
360 /* reset the tower */
361 result = usb_control_msg (dev->udev,
362 usb_rcvctrlpipe(dev->udev, 0),
363 LEGO_USB_TOWER_REQUEST_RESET,
364 USB_TYPE_VENDOR | USB_DIR_IN | USB_RECIP_DEVICE,
365 0,
366 0,
367 &reset_reply,
368 sizeof(reset_reply),
369 1000);
370 if (result < 0) {
371 dev_err(&dev->udev->dev,
372 "LEGO USB Tower reset control request failed\n");
373 retval = result;
374 goto unlock_exit;
375 }
376
377 /* initialize in direction */
378 dev->read_buffer_length = 0;
379 dev->read_packet_length = 0;
380 usb_fill_int_urb (dev->interrupt_in_urb,
381 dev->udev,
382 usb_rcvintpipe(dev->udev, dev->interrupt_in_endpoint->bEndpointAddress),
383 dev->interrupt_in_buffer,
384 usb_endpoint_maxp(dev->interrupt_in_endpoint),
385 tower_interrupt_in_callback,
386 dev,
387 dev->interrupt_in_interval);
388
389 dev->interrupt_in_running = 1;
390 dev->interrupt_in_done = 0;
391 mb();
392
393 retval = usb_submit_urb (dev->interrupt_in_urb, GFP_KERNEL);
394 if (retval) {
395 dev_err(&dev->udev->dev,
396 "Couldn't submit interrupt_in_urb %d\n", retval);
397 dev->interrupt_in_running = 0;
398 dev->open_count = 0;
399 goto unlock_exit;
400 }
401
402 /* save device in the file's private structure */
403 file->private_data = dev;
404
405unlock_exit:
406 mutex_unlock(&dev->lock);
407
408exit:
409 return retval;
410}
411
412/**
413 * tower_release
414 */
415static int tower_release (struct inode *inode, struct file *file)
416{
417 struct lego_usb_tower *dev;
418 int retval = 0;
419
420 dev = file->private_data;
421
422 if (dev == NULL) {
423 retval = -ENODEV;
424 goto exit_nolock;
425 }
426
427 mutex_lock(&open_disc_mutex);
428 if (mutex_lock_interruptible(&dev->lock)) {
429 retval = -ERESTARTSYS;
430 goto exit;
431 }
432
433 if (dev->open_count != 1) {
434 dev_dbg(&dev->udev->dev, "%s: device not opened exactly once\n",
435 __func__);
436 retval = -ENODEV;
437 goto unlock_exit;
438 }
439 if (dev->udev == NULL) {
440 /* the device was unplugged before the file was released */
441
442 /* unlock here as tower_delete frees dev */
443 mutex_unlock(&dev->lock);
444 tower_delete (dev);
445 goto exit;
446 }
447
448 /* wait until write transfer is finished */
449 if (dev->interrupt_out_busy) {
450 wait_event_interruptible_timeout (dev->write_wait, !dev->interrupt_out_busy, 2 * HZ);
451 }
452 tower_abort_transfers (dev);
453 dev->open_count = 0;
454
455unlock_exit:
456 mutex_unlock(&dev->lock);
457
458exit:
459 mutex_unlock(&open_disc_mutex);
460exit_nolock:
461 return retval;
462}
463
464
465/**
466 * tower_abort_transfers
467 * aborts transfers and frees associated data structures
468 */
469static void tower_abort_transfers (struct lego_usb_tower *dev)
470{
471 if (dev == NULL)
472 return;
473
474 /* shutdown transfer */
475 if (dev->interrupt_in_running) {
476 dev->interrupt_in_running = 0;
477 mb();
478 if (dev->udev)
479 usb_kill_urb (dev->interrupt_in_urb);
480 }
481 if (dev->interrupt_out_busy && dev->udev)
482 usb_kill_urb(dev->interrupt_out_urb);
483}
484
485
486/**
487 * tower_check_for_read_packet
488 *
489 * To get correct semantics for signals and non-blocking I/O
490 * with packetizing we pretend not to see any data in the read buffer
491 * until it has been there unchanged for at least
492 * dev->packet_timeout_jiffies, or until the buffer is full.
493 */
494static void tower_check_for_read_packet (struct lego_usb_tower *dev)
495{
496 spin_lock_irq (&dev->read_buffer_lock);
497 if (!packet_timeout
498 || time_after(jiffies, dev->read_last_arrival + dev->packet_timeout_jiffies)
499 || dev->read_buffer_length == read_buffer_size) {
500 dev->read_packet_length = dev->read_buffer_length;
501 }
502 dev->interrupt_in_done = 0;
503 spin_unlock_irq (&dev->read_buffer_lock);
504}
505
506
507/**
508 * tower_poll
509 */
510static unsigned int tower_poll (struct file *file, poll_table *wait)
511{
512 struct lego_usb_tower *dev;
513 unsigned int mask = 0;
514
515 dev = file->private_data;
516
517 if (!dev->udev)
518 return POLLERR | POLLHUP;
519
520 poll_wait(file, &dev->read_wait, wait);
521 poll_wait(file, &dev->write_wait, wait);
522
523 tower_check_for_read_packet(dev);
524 if (dev->read_packet_length > 0) {
525 mask |= POLLIN | POLLRDNORM;
526 }
527 if (!dev->interrupt_out_busy) {
528 mask |= POLLOUT | POLLWRNORM;
529 }
530
531 return mask;
532}
533
534
535/**
536 * tower_llseek
537 */
538static loff_t tower_llseek (struct file *file, loff_t off, int whence)
539{
540 return -ESPIPE; /* unseekable */
541}
542
543
544/**
545 * tower_read
546 */
547static ssize_t tower_read (struct file *file, char __user *buffer, size_t count, loff_t *ppos)
548{
549 struct lego_usb_tower *dev;
550 size_t bytes_to_read;
551 int i;
552 int retval = 0;
553 unsigned long timeout = 0;
554
555 dev = file->private_data;
556
557 /* lock this object */
558 if (mutex_lock_interruptible(&dev->lock)) {
559 retval = -ERESTARTSYS;
560 goto exit;
561 }
562
563 /* verify that the device wasn't unplugged */
564 if (dev->udev == NULL) {
565 retval = -ENODEV;
566 pr_err("No device or device unplugged %d\n", retval);
567 goto unlock_exit;
568 }
569
570 /* verify that we actually have some data to read */
571 if (count == 0) {
572 dev_dbg(&dev->udev->dev, "read request of 0 bytes\n");
573 goto unlock_exit;
574 }
575
576 if (read_timeout) {
577 timeout = jiffies + read_timeout * HZ / 1000;
578 }
579
580 /* wait for data */
581 tower_check_for_read_packet (dev);
582 while (dev->read_packet_length == 0) {
583 if (file->f_flags & O_NONBLOCK) {
584 retval = -EAGAIN;
585 goto unlock_exit;
586 }
587 retval = wait_event_interruptible_timeout(dev->read_wait, dev->interrupt_in_done, dev->packet_timeout_jiffies);
588 if (retval < 0) {
589 goto unlock_exit;
590 }
591
592 /* reset read timeout during read or write activity */
593 if (read_timeout
594 && (dev->read_buffer_length || dev->interrupt_out_busy)) {
595 timeout = jiffies + read_timeout * HZ / 1000;
596 }
597 /* check for read timeout */
598 if (read_timeout && time_after (jiffies, timeout)) {
599 retval = -ETIMEDOUT;
600 goto unlock_exit;
601 }
602 tower_check_for_read_packet (dev);
603 }
604
605 /* copy the data from read_buffer into userspace */
606 bytes_to_read = min(count, dev->read_packet_length);
607
608 if (copy_to_user (buffer, dev->read_buffer, bytes_to_read)) {
609 retval = -EFAULT;
610 goto unlock_exit;
611 }
612
613 spin_lock_irq (&dev->read_buffer_lock);
614 dev->read_buffer_length -= bytes_to_read;
615 dev->read_packet_length -= bytes_to_read;
616 for (i=0; i<dev->read_buffer_length; i++) {
617 dev->read_buffer[i] = dev->read_buffer[i+bytes_to_read];
618 }
619 spin_unlock_irq (&dev->read_buffer_lock);
620
621 retval = bytes_to_read;
622
623unlock_exit:
624 /* unlock the device */
625 mutex_unlock(&dev->lock);
626
627exit:
628 return retval;
629}
630
631
632/**
633 * tower_write
634 */
635static ssize_t tower_write (struct file *file, const char __user *buffer, size_t count, loff_t *ppos)
636{
637 struct lego_usb_tower *dev;
638 size_t bytes_to_write;
639 int retval = 0;
640
641 dev = file->private_data;
642
643 /* lock this object */
644 if (mutex_lock_interruptible(&dev->lock)) {
645 retval = -ERESTARTSYS;
646 goto exit;
647 }
648
649 /* verify that the device wasn't unplugged */
650 if (dev->udev == NULL) {
651 retval = -ENODEV;
652 pr_err("No device or device unplugged %d\n", retval);
653 goto unlock_exit;
654 }
655
656 /* verify that we actually have some data to write */
657 if (count == 0) {
658 dev_dbg(&dev->udev->dev, "write request of 0 bytes\n");
659 goto unlock_exit;
660 }
661
662 /* wait until previous transfer is finished */
663 while (dev->interrupt_out_busy) {
664 if (file->f_flags & O_NONBLOCK) {
665 retval = -EAGAIN;
666 goto unlock_exit;
667 }
668 retval = wait_event_interruptible (dev->write_wait, !dev->interrupt_out_busy);
669 if (retval) {
670 goto unlock_exit;
671 }
672 }
673
674 /* write the data into interrupt_out_buffer from userspace */
675 bytes_to_write = min_t(int, count, write_buffer_size);
676 dev_dbg(&dev->udev->dev, "%s: count = %Zd, bytes_to_write = %Zd\n",
677 __func__, count, bytes_to_write);
678
679 if (copy_from_user (dev->interrupt_out_buffer, buffer, bytes_to_write)) {
680 retval = -EFAULT;
681 goto unlock_exit;
682 }
683
684 /* send off the urb */
685 usb_fill_int_urb(dev->interrupt_out_urb,
686 dev->udev,
687 usb_sndintpipe(dev->udev, dev->interrupt_out_endpoint->bEndpointAddress),
688 dev->interrupt_out_buffer,
689 bytes_to_write,
690 tower_interrupt_out_callback,
691 dev,
692 dev->interrupt_out_interval);
693
694 dev->interrupt_out_busy = 1;
695 wmb();
696
697 retval = usb_submit_urb (dev->interrupt_out_urb, GFP_KERNEL);
698 if (retval) {
699 dev->interrupt_out_busy = 0;
700 dev_err(&dev->udev->dev,
701 "Couldn't submit interrupt_out_urb %d\n", retval);
702 goto unlock_exit;
703 }
704 retval = bytes_to_write;
705
706unlock_exit:
707 /* unlock the device */
708 mutex_unlock(&dev->lock);
709
710exit:
711 return retval;
712}
713
714
715/**
716 * tower_interrupt_in_callback
717 */
718static void tower_interrupt_in_callback (struct urb *urb)
719{
720 struct lego_usb_tower *dev = urb->context;
721 int status = urb->status;
722 int retval;
723
724 lego_usb_tower_debug_data(&dev->udev->dev, __func__,
725 urb->actual_length, urb->transfer_buffer);
726
727 if (status) {
728 if (status == -ENOENT ||
729 status == -ECONNRESET ||
730 status == -ESHUTDOWN) {
731 goto exit;
732 } else {
733 dev_dbg(&dev->udev->dev,
734 "%s: nonzero status received: %d\n", __func__,
735 status);
736 goto resubmit; /* maybe we can recover */
737 }
738 }
739
740 if (urb->actual_length > 0) {
741 spin_lock (&dev->read_buffer_lock);
742 if (dev->read_buffer_length + urb->actual_length < read_buffer_size) {
743 memcpy (dev->read_buffer + dev->read_buffer_length,
744 dev->interrupt_in_buffer,
745 urb->actual_length);
746 dev->read_buffer_length += urb->actual_length;
747 dev->read_last_arrival = jiffies;
748 dev_dbg(&dev->udev->dev, "%s: received %d bytes\n",
749 __func__, urb->actual_length);
750 } else {
751 pr_warn("read_buffer overflow, %d bytes dropped\n",
752 urb->actual_length);
753 }
754 spin_unlock (&dev->read_buffer_lock);
755 }
756
757resubmit:
758 /* resubmit if we're still running */
759 if (dev->interrupt_in_running && dev->udev) {
760 retval = usb_submit_urb (dev->interrupt_in_urb, GFP_ATOMIC);
761 if (retval)
762 dev_err(&dev->udev->dev,
763 "%s: usb_submit_urb failed (%d)\n",
764 __func__, retval);
765 }
766
767exit:
768 dev->interrupt_in_done = 1;
769 wake_up_interruptible (&dev->read_wait);
770}
771
772
773/**
774 * tower_interrupt_out_callback
775 */
776static void tower_interrupt_out_callback (struct urb *urb)
777{
778 struct lego_usb_tower *dev = urb->context;
779 int status = urb->status;
780
781 lego_usb_tower_debug_data(&dev->udev->dev, __func__,
782 urb->actual_length, urb->transfer_buffer);
783
784 /* sync/async unlink faults aren't errors */
785 if (status && !(status == -ENOENT ||
786 status == -ECONNRESET ||
787 status == -ESHUTDOWN)) {
788 dev_dbg(&dev->udev->dev,
789 "%s: nonzero write bulk status received: %d\n", __func__,
790 status);
791 }
792
793 dev->interrupt_out_busy = 0;
794 wake_up_interruptible(&dev->write_wait);
795}
796
797
798/**
799 * tower_probe
800 *
801 * Called by the usb core when a new device is connected that it thinks
802 * this driver might be interested in.
803 */
804static int tower_probe (struct usb_interface *interface, const struct usb_device_id *id)
805{
806 struct device *idev = &interface->dev;
807 struct usb_device *udev = interface_to_usbdev(interface);
808 struct lego_usb_tower *dev = NULL;
809 struct usb_host_interface *iface_desc;
810 struct usb_endpoint_descriptor* endpoint;
811 struct tower_get_version_reply get_version_reply;
812 int i;
813 int retval = -ENOMEM;
814 int result;
815
816 /* allocate memory for our device state and initialize it */
817
818 dev = kmalloc (sizeof(struct lego_usb_tower), GFP_KERNEL);
819
820 if (dev == NULL) {
821 dev_err(idev, "Out of memory\n");
822 goto exit;
823 }
824
825 mutex_init(&dev->lock);
826
827 dev->udev = udev;
828 dev->open_count = 0;
829
830 dev->read_buffer = NULL;
831 dev->read_buffer_length = 0;
832 dev->read_packet_length = 0;
833 spin_lock_init (&dev->read_buffer_lock);
834 dev->packet_timeout_jiffies = packet_timeout * HZ / 1000;
835 dev->read_last_arrival = jiffies;
836
837 init_waitqueue_head (&dev->read_wait);
838 init_waitqueue_head (&dev->write_wait);
839
840 dev->interrupt_in_buffer = NULL;
841 dev->interrupt_in_endpoint = NULL;
842 dev->interrupt_in_urb = NULL;
843 dev->interrupt_in_running = 0;
844 dev->interrupt_in_done = 0;
845
846 dev->interrupt_out_buffer = NULL;
847 dev->interrupt_out_endpoint = NULL;
848 dev->interrupt_out_urb = NULL;
849 dev->interrupt_out_busy = 0;
850
851 iface_desc = interface->cur_altsetting;
852
853 /* set up the endpoint information */
854 for (i = 0; i < iface_desc->desc.bNumEndpoints; ++i) {
855 endpoint = &iface_desc->endpoint[i].desc;
856
857 if (usb_endpoint_xfer_int(endpoint)) {
858 if (usb_endpoint_dir_in(endpoint))
859 dev->interrupt_in_endpoint = endpoint;
860 else
861 dev->interrupt_out_endpoint = endpoint;
862 }
863 }
864 if(dev->interrupt_in_endpoint == NULL) {
865 dev_err(idev, "interrupt in endpoint not found\n");
866 goto error;
867 }
868 if (dev->interrupt_out_endpoint == NULL) {
869 dev_err(idev, "interrupt out endpoint not found\n");
870 goto error;
871 }
872
873 dev->read_buffer = kmalloc (read_buffer_size, GFP_KERNEL);
874 if (!dev->read_buffer) {
875 dev_err(idev, "Couldn't allocate read_buffer\n");
876 goto error;
877 }
878 dev->interrupt_in_buffer = kmalloc (usb_endpoint_maxp(dev->interrupt_in_endpoint), GFP_KERNEL);
879 if (!dev->interrupt_in_buffer) {
880 dev_err(idev, "Couldn't allocate interrupt_in_buffer\n");
881 goto error;
882 }
883 dev->interrupt_in_urb = usb_alloc_urb(0, GFP_KERNEL);
884 if (!dev->interrupt_in_urb) {
885 dev_err(idev, "Couldn't allocate interrupt_in_urb\n");
886 goto error;
887 }
888 dev->interrupt_out_buffer = kmalloc (write_buffer_size, GFP_KERNEL);
889 if (!dev->interrupt_out_buffer) {
890 dev_err(idev, "Couldn't allocate interrupt_out_buffer\n");
891 goto error;
892 }
893 dev->interrupt_out_urb = usb_alloc_urb(0, GFP_KERNEL);
894 if (!dev->interrupt_out_urb) {
895 dev_err(idev, "Couldn't allocate interrupt_out_urb\n");
896 goto error;
897 }
898 dev->interrupt_in_interval = interrupt_in_interval ? interrupt_in_interval : dev->interrupt_in_endpoint->bInterval;
899 dev->interrupt_out_interval = interrupt_out_interval ? interrupt_out_interval : dev->interrupt_out_endpoint->bInterval;
900
901 /* we can register the device now, as it is ready */
902 usb_set_intfdata (interface, dev);
903
904 retval = usb_register_dev (interface, &tower_class);
905
906 if (retval) {
907 /* something prevented us from registering this driver */
908 dev_err(idev, "Not able to get a minor for this device.\n");
909 usb_set_intfdata (interface, NULL);
910 goto error;
911 }
912 dev->minor = interface->minor;
913
914 /* let the user know what node this device is now attached to */
915 dev_info(&interface->dev, "LEGO USB Tower #%d now attached to major "
916 "%d minor %d\n", (dev->minor - LEGO_USB_TOWER_MINOR_BASE),
917 USB_MAJOR, dev->minor);
918
919 /* get the firmware version and log it */
920 result = usb_control_msg (udev,
921 usb_rcvctrlpipe(udev, 0),
922 LEGO_USB_TOWER_REQUEST_GET_VERSION,
923 USB_TYPE_VENDOR | USB_DIR_IN | USB_RECIP_DEVICE,
924 0,
925 0,
926 &get_version_reply,
927 sizeof(get_version_reply),
928 1000);
929 if (result < 0) {
930 dev_err(idev, "LEGO USB Tower get version control request failed\n");
931 retval = result;
932 goto error;
933 }
934 dev_info(&interface->dev, "LEGO USB Tower firmware version is %d.%d "
935 "build %d\n", get_version_reply.major,
936 get_version_reply.minor,
937 le16_to_cpu(get_version_reply.build_no));
938
939
940exit:
941 return retval;
942
943error:
944 tower_delete(dev);
945 return retval;
946}
947
948
949/**
950 * tower_disconnect
951 *
952 * Called by the usb core when the device is removed from the system.
953 */
954static void tower_disconnect (struct usb_interface *interface)
955{
956 struct lego_usb_tower *dev;
957 int minor;
958
959 dev = usb_get_intfdata (interface);
960 mutex_lock(&open_disc_mutex);
961 usb_set_intfdata (interface, NULL);
962
963 minor = dev->minor;
964
965 /* give back our minor */
966 usb_deregister_dev (interface, &tower_class);
967
968 mutex_lock(&dev->lock);
969 mutex_unlock(&open_disc_mutex);
970
971 /* if the device is not opened, then we clean up right now */
972 if (!dev->open_count) {
973 mutex_unlock(&dev->lock);
974 tower_delete (dev);
975 } else {
976 dev->udev = NULL;
977 /* wake up pollers */
978 wake_up_interruptible_all(&dev->read_wait);
979 wake_up_interruptible_all(&dev->write_wait);
980 mutex_unlock(&dev->lock);
981 }
982
983 dev_info(&interface->dev, "LEGO USB Tower #%d now disconnected\n",
984 (minor - LEGO_USB_TOWER_MINOR_BASE));
985}
986
987module_usb_driver(tower_driver);
988
989MODULE_AUTHOR(DRIVER_AUTHOR);
990MODULE_DESCRIPTION(DRIVER_DESC);
991#ifdef MODULE_LICENSE
992MODULE_LICENSE("GPL");
993#endif