cpupowerutils - cpufrequtils extended with quite some features
[linux-2.6.git] / tools / usb / testusb.c
1 /* $(CROSS_COMPILE)cc -Wall -Wextra -g -lpthread -o testusb testusb.c */
2
3 /*
4  * Copyright (c) 2002 by David Brownell
5  * Copyright (c) 2010 by Samsung Electronics
6  * Author: Michal Nazarewicz <m.nazarewicz@samsung.com>
7  *
8  * This program is free software; you can redistribute it and/or modify it
9  * under the terms of the GNU General Public License as published by the
10  * Free Software Foundation; either version 2 of the License, or (at your
11  * option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful, but
14  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16  * for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software Foundation,
20  * Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  */
22
23 /*
24  * This program issues ioctls to perform the tests implemented by the
25  * kernel driver.  It can generate a variety of transfer patterns; you
26  * should make sure to test both regular streaming and mixes of
27  * transfer sizes (including short transfers).
28  *
29  * For more information on how this can be used and on USB testing
30  * refer to <URL:http://www.linux-usb.org/usbtest/>.
31  */
32
33 #include <stdio.h>
34 #include <string.h>
35 #include <ftw.h>
36 #include <stdlib.h>
37 #include <pthread.h>
38 #include <unistd.h>
39 #include <errno.h>
40 #include <limits.h>
41
42 #include <sys/types.h>
43 #include <sys/stat.h>
44 #include <fcntl.h>
45
46 #include <sys/ioctl.h>
47 #include <linux/usbdevice_fs.h>
48
49 /*-------------------------------------------------------------------------*/
50
51 #define TEST_CASES      30
52
53 // FIXME make these public somewhere; usbdevfs.h?
54
55 struct usbtest_param {
56         // inputs
57         unsigned                test_num;       /* 0..(TEST_CASES-1) */
58         unsigned                iterations;
59         unsigned                length;
60         unsigned                vary;
61         unsigned                sglen;
62
63         // outputs
64         struct timeval          duration;
65 };
66 #define USBTEST_REQUEST _IOWR('U', 100, struct usbtest_param)
67
68 /*-------------------------------------------------------------------------*/
69
70 /* #include <linux/usb_ch9.h> */
71
72 #define USB_DT_DEVICE                   0x01
73 #define USB_DT_INTERFACE                0x04
74
75 #define USB_CLASS_PER_INTERFACE         0       /* for DeviceClass */
76 #define USB_CLASS_VENDOR_SPEC           0xff
77
78
79 struct usb_device_descriptor {
80         __u8  bLength;
81         __u8  bDescriptorType;
82         __u16 bcdUSB;
83         __u8  bDeviceClass;
84         __u8  bDeviceSubClass;
85         __u8  bDeviceProtocol;
86         __u8  bMaxPacketSize0;
87         __u16 idVendor;
88         __u16 idProduct;
89         __u16 bcdDevice;
90         __u8  iManufacturer;
91         __u8  iProduct;
92         __u8  iSerialNumber;
93         __u8  bNumConfigurations;
94 } __attribute__ ((packed));
95
96 struct usb_interface_descriptor {
97         __u8  bLength;
98         __u8  bDescriptorType;
99
100         __u8  bInterfaceNumber;
101         __u8  bAlternateSetting;
102         __u8  bNumEndpoints;
103         __u8  bInterfaceClass;
104         __u8  bInterfaceSubClass;
105         __u8  bInterfaceProtocol;
106         __u8  iInterface;
107 } __attribute__ ((packed));
108
109 enum usb_device_speed {
110         USB_SPEED_UNKNOWN = 0,                  /* enumerating */
111         USB_SPEED_LOW, USB_SPEED_FULL,          /* usb 1.1 */
112         USB_SPEED_HIGH                          /* usb 2.0 */
113 };
114
115 /*-------------------------------------------------------------------------*/
116
117 static char *speed (enum usb_device_speed s)
118 {
119         switch (s) {
120         case USB_SPEED_UNKNOWN: return "unknown";
121         case USB_SPEED_LOW:     return "low";
122         case USB_SPEED_FULL:    return "full";
123         case USB_SPEED_HIGH:    return "high";
124         default:                return "??";
125         }
126 }
127
128 struct testdev {
129         struct testdev          *next;
130         char                    *name;
131         pthread_t               thread;
132         enum usb_device_speed   speed;
133         unsigned                ifnum : 8;
134         unsigned                forever : 1;
135         int                     test;
136
137         struct usbtest_param    param;
138 };
139 static struct testdev           *testdevs;
140
141 static int testdev_ffs_ifnum(FILE *fd)
142 {
143         union {
144                 char buf[255];
145                 struct usb_interface_descriptor intf;
146         } u;
147
148         for (;;) {
149                 if (fread(u.buf, 1, 1, fd) != 1)
150                         return -1;
151                 if (fread(u.buf + 1, (unsigned char)u.buf[0] - 1, 1, fd) != 1)
152                         return -1;
153
154                 if (u.intf.bLength == sizeof u.intf
155                  && u.intf.bDescriptorType == USB_DT_INTERFACE
156                  && u.intf.bNumEndpoints == 2
157                  && u.intf.bInterfaceClass == USB_CLASS_VENDOR_SPEC
158                  && u.intf.bInterfaceSubClass == 0
159                  && u.intf.bInterfaceProtocol == 0)
160                         return (unsigned char)u.intf.bInterfaceNumber;
161         }
162 }
163
164 static int testdev_ifnum(FILE *fd)
165 {
166         struct usb_device_descriptor dev;
167
168         if (fread(&dev, sizeof dev, 1, fd) != 1)
169                 return -1;
170
171         if (dev.bLength != sizeof dev || dev.bDescriptorType != USB_DT_DEVICE)
172                 return -1;
173
174         /* FX2 with (tweaked) bulksrc firmware */
175         if (dev.idVendor == 0x0547 && dev.idProduct == 0x1002)
176                 return 0;
177
178         /*----------------------------------------------------*/
179
180         /* devices that start up using the EZ-USB default device and
181          * which we can use after loading simple firmware.  hotplug
182          * can fxload it, and then run this test driver.
183          *
184          * we return false positives in two cases:
185          * - the device has a "real" driver (maybe usb-serial) that
186          *   renumerates.  the device should vanish quickly.
187          * - the device doesn't have the test firmware installed.
188          */
189
190         /* generic EZ-USB FX controller */
191         if (dev.idVendor == 0x0547 && dev.idProduct == 0x2235)
192                 return 0;
193
194         /* generic EZ-USB FX2 controller */
195         if (dev.idVendor == 0x04b4 && dev.idProduct == 0x8613)
196                 return 0;
197
198         /* CY3671 development board with EZ-USB FX */
199         if (dev.idVendor == 0x0547 && dev.idProduct == 0x0080)
200                 return 0;
201
202         /* Keyspan 19Qi uses an21xx (original EZ-USB) */
203         if (dev.idVendor == 0x06cd && dev.idProduct == 0x010b)
204                 return 0;
205
206         /*----------------------------------------------------*/
207
208         /* "gadget zero", Linux-USB test software */
209         if (dev.idVendor == 0x0525 && dev.idProduct == 0xa4a0)
210                 return 0;
211
212         /* user mode subset of that */
213         if (dev.idVendor == 0x0525 && dev.idProduct == 0xa4a4)
214                 return testdev_ffs_ifnum(fd);
215                 /* return 0; */
216
217         /* iso version of usermode code */
218         if (dev.idVendor == 0x0525 && dev.idProduct == 0xa4a3)
219                 return 0;
220
221         /* some GPL'd test firmware uses these IDs */
222
223         if (dev.idVendor == 0xfff0 && dev.idProduct == 0xfff0)
224                 return 0;
225
226         /*----------------------------------------------------*/
227
228         /* iBOT2 high speed webcam */
229         if (dev.idVendor == 0x0b62 && dev.idProduct == 0x0059)
230                 return 0;
231
232         /*----------------------------------------------------*/
233
234         /* the FunctionFS gadget can have the source/sink interface
235          * anywhere.  We look for an interface descriptor that match
236          * what we expect.  We ignore configuratiens thou. */
237
238         if (dev.idVendor == 0x0525 && dev.idProduct == 0xa4ac
239          && (dev.bDeviceClass == USB_CLASS_PER_INTERFACE
240           || dev.bDeviceClass == USB_CLASS_VENDOR_SPEC))
241                 return testdev_ffs_ifnum(fd);
242
243         return -1;
244 }
245
246 static int find_testdev(const char *name, const struct stat *sb, int flag)
247 {
248         FILE                            *fd;
249         int                             ifnum;
250         struct testdev                  *entry;
251
252         (void)sb; /* unused */
253
254         if (flag != FTW_F)
255                 return 0;
256         /* ignore /proc/bus/usb/{devices,drivers} */
257         if (strrchr(name, '/')[1] == 'd')
258                 return 0;
259
260         fd = fopen(name, "rb");
261         if (!fd) {
262                 perror(name);
263                 return 0;
264         }
265
266         ifnum = testdev_ifnum(fd);
267         fclose(fd);
268         if (ifnum < 0)
269                 return 0;
270
271         entry = calloc(1, sizeof *entry);
272         if (!entry)
273                 goto nomem;
274
275         entry->name = strdup(name);
276         if (!entry->name) {
277                 free(entry);
278 nomem:
279                 perror("malloc");
280                 return 0;
281         }
282
283         entry->ifnum = ifnum;
284
285         /* FIXME ask usbfs what speed; update USBDEVFS_CONNECTINFO so
286          * it tells about high speed etc */
287
288         fprintf(stderr, "%s speed\t%s\t%u\n",
289                 speed(entry->speed), entry->name, entry->ifnum);
290
291         entry->next = testdevs;
292         testdevs = entry;
293         return 0;
294 }
295
296 static int
297 usbdev_ioctl (int fd, int ifno, unsigned request, void *param)
298 {
299         struct usbdevfs_ioctl   wrapper;
300
301         wrapper.ifno = ifno;
302         wrapper.ioctl_code = request;
303         wrapper.data = param;
304
305         return ioctl (fd, USBDEVFS_IOCTL, &wrapper);
306 }
307
308 static void *handle_testdev (void *arg)
309 {
310         struct testdev          *dev = arg;
311         int                     fd, i;
312         int                     status;
313
314         if ((fd = open (dev->name, O_RDWR)) < 0) {
315                 perror ("can't open dev file r/w");
316                 return 0;
317         }
318
319 restart:
320         for (i = 0; i < TEST_CASES; i++) {
321                 if (dev->test != -1 && dev->test != i)
322                         continue;
323                 dev->param.test_num = i;
324
325                 status = usbdev_ioctl (fd, dev->ifnum,
326                                 USBTEST_REQUEST, &dev->param);
327                 if (status < 0 && errno == EOPNOTSUPP)
328                         continue;
329
330                 /* FIXME need a "syslog it" option for background testing */
331
332                 /* NOTE: each thread emits complete lines; no fragments! */
333                 if (status < 0) {
334                         char    buf [80];
335                         int     err = errno;
336
337                         if (strerror_r (errno, buf, sizeof buf)) {
338                                 snprintf (buf, sizeof buf, "error %d", err);
339                                 errno = err;
340                         }
341                         printf ("%s test %d --> %d (%s)\n",
342                                 dev->name, i, errno, buf);
343                 } else
344                         printf ("%s test %d, %4d.%.06d secs\n", dev->name, i,
345                                 (int) dev->param.duration.tv_sec,
346                                 (int) dev->param.duration.tv_usec);
347
348                 fflush (stdout);
349         }
350         if (dev->forever)
351                 goto restart;
352
353         close (fd);
354         return arg;
355 }
356
357 static const char *usbfs_dir_find(void)
358 {
359         static char usbfs_path_0[] = "/dev/usb/devices";
360         static char usbfs_path_1[] = "/proc/bus/usb/devices";
361
362         static char *const usbfs_paths[] = {
363                 usbfs_path_0, usbfs_path_1
364         };
365
366         static char *const *
367                 end = usbfs_paths + sizeof usbfs_paths / sizeof *usbfs_paths;
368
369         char *const *it = usbfs_paths;
370         do {
371                 int fd = open(*it, O_RDONLY);
372                 close(fd);
373                 if (fd >= 0) {
374                         strrchr(*it, '/')[0] = '\0';
375                         return *it;
376                 }
377         } while (++it != end);
378
379         return NULL;
380 }
381
382 static int parse_num(unsigned *num, const char *str)
383 {
384         unsigned long val;
385         char *end;
386
387         errno = 0;
388         val = strtoul(str, &end, 0);
389         if (errno || *end || val > UINT_MAX)
390                 return -1;
391         *num = val;
392         return 0;
393 }
394
395 int main (int argc, char **argv)
396 {
397
398         int                     c;
399         struct testdev          *entry;
400         char                    *device;
401         const char              *usbfs_dir = NULL;
402         int                     all = 0, forever = 0, not = 0;
403         int                     test = -1 /* all */;
404         struct usbtest_param    param;
405
406         /* pick defaults that works with all speeds, without short packets.
407          *
408          * Best per-frame data rates:
409          *     high speed, bulk       512 * 13 * 8 = 53248
410          *                 interrupt 1024 *  3 * 8 = 24576
411          *     full speed, bulk/intr   64 * 19     =  1216
412          *                 interrupt   64 *  1     =    64
413          *      low speed, interrupt    8 *  1     =     8
414          */
415         param.iterations = 1000;
416         param.length = 512;
417         param.vary = 512;
418         param.sglen = 32;
419
420         /* for easy use when hotplugging */
421         device = getenv ("DEVICE");
422
423         while ((c = getopt (argc, argv, "D:aA:c:g:hns:t:v:")) != EOF)
424         switch (c) {
425         case 'D':       /* device, if only one */
426                 device = optarg;
427                 continue;
428         case 'A':       /* use all devices with specified usbfs dir */
429                 usbfs_dir = optarg;
430                 /* FALL THROUGH */
431         case 'a':       /* use all devices */
432                 device = NULL;
433                 all = 1;
434                 continue;
435         case 'c':       /* count iterations */
436                 if (parse_num(&param.iterations, optarg))
437                         goto usage;
438                 continue;
439         case 'g':       /* scatter/gather entries */
440                 if (parse_num(&param.sglen, optarg))
441                         goto usage;
442                 continue;
443         case 'l':       /* loop forever */
444                 forever = 1;
445                 continue;
446         case 'n':       /* no test running! */
447                 not = 1;
448                 continue;
449         case 's':       /* size of packet */
450                 if (parse_num(&param.length, optarg))
451                         goto usage;
452                 continue;
453         case 't':       /* run just one test */
454                 test = atoi (optarg);
455                 if (test < 0)
456                         goto usage;
457                 continue;
458         case 'v':       /* vary packet size by ... */
459                 if (parse_num(&param.vary, optarg))
460                         goto usage;
461                 continue;
462         case '?':
463         case 'h':
464         default:
465 usage:
466                 fprintf (stderr, "usage: %s [-n] [-D dev | -a | -A usbfs-dir]\n"
467                         "\t[-c iterations]  [-t testnum]\n"
468                         "\t[-s packetsize] [-g sglen] [-v vary]\n",
469                         argv [0]);
470                 return 1;
471         }
472         if (optind != argc)
473                 goto usage;
474         if (!all && !device) {
475                 fprintf (stderr, "must specify '-a' or '-D dev', "
476                         "or DEVICE=/proc/bus/usb/BBB/DDD in env\n");
477                 goto usage;
478         }
479
480         /* Find usbfs mount point */
481         if (!usbfs_dir) {
482                 usbfs_dir = usbfs_dir_find();
483                 if (!usbfs_dir) {
484                         fputs ("usbfs files are missing\n", stderr);
485                         return -1;
486                 }
487         }
488
489         /* collect and list the test devices */
490         if (ftw (usbfs_dir, find_testdev, 3) != 0) {
491                 fputs ("ftw failed; is usbfs missing?\n", stderr);
492                 return -1;
493         }
494
495         /* quit, run single test, or create test threads */
496         if (!testdevs && !device) {
497                 fputs ("no test devices recognized\n", stderr);
498                 return -1;
499         }
500         if (not)
501                 return 0;
502         if (testdevs && testdevs->next == 0 && !device)
503                 device = testdevs->name;
504         for (entry = testdevs; entry; entry = entry->next) {
505                 int     status;
506
507                 entry->param = param;
508                 entry->forever = forever;
509                 entry->test = test;
510
511                 if (device) {
512                         if (strcmp (entry->name, device))
513                                 continue;
514                         return handle_testdev (entry) != entry;
515                 }
516                 status = pthread_create (&entry->thread, 0, handle_testdev, entry);
517                 if (status) {
518                         perror ("pthread_create");
519                         continue;
520                 }
521         }
522         if (device) {
523                 struct testdev          dev;
524
525                 /* kernel can recognize test devices we don't */
526                 fprintf (stderr, "%s: %s may see only control tests\n",
527                                 argv [0], device);
528
529                 memset (&dev, 0, sizeof dev);
530                 dev.name = device;
531                 dev.param = param;
532                 dev.forever = forever;
533                 dev.test = test;
534                 return handle_testdev (&dev) != &dev;
535         }
536
537         /* wait for tests to complete */
538         for (entry = testdevs; entry; entry = entry->next) {
539                 void    *retval;
540
541                 if (pthread_join (entry->thread, &retval))
542                         perror ("pthread_join");
543                 /* testing errors discarded! */
544         }
545
546         return 0;
547 }