Merge branch 'master' of git://git.denx.de/u-boot-mpc85xx
[kernel/u-boot.git] / common / cmd_usb.c
1 /*
2  * (C) Copyright 2001
3  * Denis Peter, MPL AG Switzerland
4  *
5  * Most of this source has been derived from the Linux USB
6  * project.
7  *
8  * SPDX-License-Identifier:     GPL-2.0+
9  */
10
11 #include <common.h>
12 #include <command.h>
13 #include <asm/byteorder.h>
14 #include <asm/unaligned.h>
15 #include <part.h>
16 #include <usb.h>
17
18 #ifdef CONFIG_USB_STORAGE
19 static int usb_stor_curr_dev = -1; /* current device */
20 #endif
21 #ifdef CONFIG_USB_HOST_ETHER
22 static int usb_ether_curr_dev = -1; /* current ethernet device */
23 #endif
24
25 /* some display routines (info command) */
26 static char *usb_get_class_desc(unsigned char dclass)
27 {
28         switch (dclass) {
29         case USB_CLASS_PER_INTERFACE:
30                 return "See Interface";
31         case USB_CLASS_AUDIO:
32                 return "Audio";
33         case USB_CLASS_COMM:
34                 return "Communication";
35         case USB_CLASS_HID:
36                 return "Human Interface";
37         case USB_CLASS_PRINTER:
38                 return "Printer";
39         case USB_CLASS_MASS_STORAGE:
40                 return "Mass Storage";
41         case USB_CLASS_HUB:
42                 return "Hub";
43         case USB_CLASS_DATA:
44                 return "CDC Data";
45         case USB_CLASS_VENDOR_SPEC:
46                 return "Vendor specific";
47         default:
48                 return "";
49         }
50 }
51
52 static void usb_display_class_sub(unsigned char dclass, unsigned char subclass,
53                                   unsigned char proto)
54 {
55         switch (dclass) {
56         case USB_CLASS_PER_INTERFACE:
57                 printf("See Interface");
58                 break;
59         case USB_CLASS_HID:
60                 printf("Human Interface, Subclass: ");
61                 switch (subclass) {
62                 case USB_SUB_HID_NONE:
63                         printf("None");
64                         break;
65                 case USB_SUB_HID_BOOT:
66                         printf("Boot ");
67                         switch (proto) {
68                         case USB_PROT_HID_NONE:
69                                 printf("None");
70                                 break;
71                         case USB_PROT_HID_KEYBOARD:
72                                 printf("Keyboard");
73                                 break;
74                         case USB_PROT_HID_MOUSE:
75                                 printf("Mouse");
76                                 break;
77                         default:
78                                 printf("reserved");
79                                 break;
80                         }
81                         break;
82                 default:
83                         printf("reserved");
84                         break;
85                 }
86                 break;
87         case USB_CLASS_MASS_STORAGE:
88                 printf("Mass Storage, ");
89                 switch (subclass) {
90                 case US_SC_RBC:
91                         printf("RBC ");
92                         break;
93                 case US_SC_8020:
94                         printf("SFF-8020i (ATAPI)");
95                         break;
96                 case US_SC_QIC:
97                         printf("QIC-157 (Tape)");
98                         break;
99                 case US_SC_UFI:
100                         printf("UFI");
101                         break;
102                 case US_SC_8070:
103                         printf("SFF-8070");
104                         break;
105                 case US_SC_SCSI:
106                         printf("Transp. SCSI");
107                         break;
108                 default:
109                         printf("reserved");
110                         break;
111                 }
112                 printf(", ");
113                 switch (proto) {
114                 case US_PR_CB:
115                         printf("Command/Bulk");
116                         break;
117                 case US_PR_CBI:
118                         printf("Command/Bulk/Int");
119                         break;
120                 case US_PR_BULK:
121                         printf("Bulk only");
122                         break;
123                 default:
124                         printf("reserved");
125                         break;
126                 }
127                 break;
128         default:
129                 printf("%s", usb_get_class_desc(dclass));
130                 break;
131         }
132 }
133
134 static void usb_display_string(struct usb_device *dev, int index)
135 {
136         ALLOC_CACHE_ALIGN_BUFFER(char, buffer, 256);
137
138         if (index != 0) {
139                 if (usb_string(dev, index, &buffer[0], 256) > 0)
140                         printf("String: \"%s\"", buffer);
141         }
142 }
143
144 static void usb_display_desc(struct usb_device *dev)
145 {
146         if (dev->descriptor.bDescriptorType == USB_DT_DEVICE) {
147                 printf("%d: %s,  USB Revision %x.%x\n", dev->devnum,
148                 usb_get_class_desc(dev->config.if_desc[0].desc.bInterfaceClass),
149                                    (dev->descriptor.bcdUSB>>8) & 0xff,
150                                    dev->descriptor.bcdUSB & 0xff);
151
152                 if (strlen(dev->mf) || strlen(dev->prod) ||
153                     strlen(dev->serial))
154                         printf(" - %s %s %s\n", dev->mf, dev->prod,
155                                 dev->serial);
156                 if (dev->descriptor.bDeviceClass) {
157                         printf(" - Class: ");
158                         usb_display_class_sub(dev->descriptor.bDeviceClass,
159                                               dev->descriptor.bDeviceSubClass,
160                                               dev->descriptor.bDeviceProtocol);
161                         printf("\n");
162                 } else {
163                         printf(" - Class: (from Interface) %s\n",
164                                usb_get_class_desc(
165                                 dev->config.if_desc[0].desc.bInterfaceClass));
166                 }
167                 printf(" - PacketSize: %d  Configurations: %d\n",
168                         dev->descriptor.bMaxPacketSize0,
169                         dev->descriptor.bNumConfigurations);
170                 printf(" - Vendor: 0x%04x  Product 0x%04x Version %d.%d\n",
171                         dev->descriptor.idVendor, dev->descriptor.idProduct,
172                         (dev->descriptor.bcdDevice>>8) & 0xff,
173                         dev->descriptor.bcdDevice & 0xff);
174         }
175
176 }
177
178 static void usb_display_conf_desc(struct usb_config_descriptor *config,
179                                   struct usb_device *dev)
180 {
181         printf("   Configuration: %d\n", config->bConfigurationValue);
182         printf("   - Interfaces: %d %s%s%dmA\n", config->bNumInterfaces,
183                (config->bmAttributes & 0x40) ? "Self Powered " : "Bus Powered ",
184                (config->bmAttributes & 0x20) ? "Remote Wakeup " : "",
185                 config->bMaxPower*2);
186         if (config->iConfiguration) {
187                 printf("   - ");
188                 usb_display_string(dev, config->iConfiguration);
189                 printf("\n");
190         }
191 }
192
193 static void usb_display_if_desc(struct usb_interface_descriptor *ifdesc,
194                                 struct usb_device *dev)
195 {
196         printf("     Interface: %d\n", ifdesc->bInterfaceNumber);
197         printf("     - Alternate Setting %d, Endpoints: %d\n",
198                 ifdesc->bAlternateSetting, ifdesc->bNumEndpoints);
199         printf("     - Class ");
200         usb_display_class_sub(ifdesc->bInterfaceClass,
201                 ifdesc->bInterfaceSubClass, ifdesc->bInterfaceProtocol);
202         printf("\n");
203         if (ifdesc->iInterface) {
204                 printf("     - ");
205                 usb_display_string(dev, ifdesc->iInterface);
206                 printf("\n");
207         }
208 }
209
210 static void usb_display_ep_desc(struct usb_endpoint_descriptor *epdesc)
211 {
212         printf("     - Endpoint %d %s ", epdesc->bEndpointAddress & 0xf,
213                 (epdesc->bEndpointAddress & 0x80) ? "In" : "Out");
214         switch ((epdesc->bmAttributes & 0x03)) {
215         case 0:
216                 printf("Control");
217                 break;
218         case 1:
219                 printf("Isochronous");
220                 break;
221         case 2:
222                 printf("Bulk");
223                 break;
224         case 3:
225                 printf("Interrupt");
226                 break;
227         }
228         printf(" MaxPacket %d", get_unaligned(&epdesc->wMaxPacketSize));
229         if ((epdesc->bmAttributes & 0x03) == 0x3)
230                 printf(" Interval %dms", epdesc->bInterval);
231         printf("\n");
232 }
233
234 /* main routine to diasplay the configs, interfaces and endpoints */
235 static void usb_display_config(struct usb_device *dev)
236 {
237         struct usb_config *config;
238         struct usb_interface *ifdesc;
239         struct usb_endpoint_descriptor *epdesc;
240         int i, ii;
241
242         config = &dev->config;
243         usb_display_conf_desc(&config->desc, dev);
244         for (i = 0; i < config->no_of_if; i++) {
245                 ifdesc = &config->if_desc[i];
246                 usb_display_if_desc(&ifdesc->desc, dev);
247                 for (ii = 0; ii < ifdesc->no_of_ep; ii++) {
248                         epdesc = &ifdesc->ep_desc[ii];
249                         usb_display_ep_desc(epdesc);
250                 }
251         }
252         printf("\n");
253 }
254
255 static struct usb_device *usb_find_device(int devnum)
256 {
257         struct usb_device *dev;
258         int d;
259
260         for (d = 0; d < USB_MAX_DEVICE; d++) {
261                 dev = usb_get_dev_index(d);
262                 if (dev == NULL)
263                         return NULL;
264                 if (dev->devnum == devnum)
265                         return dev;
266         }
267
268         return NULL;
269 }
270
271 static inline char *portspeed(int speed)
272 {
273         char *speed_str;
274
275         switch (speed) {
276         case USB_SPEED_SUPER:
277                 speed_str = "5 Gb/s";
278                 break;
279         case USB_SPEED_HIGH:
280                 speed_str = "480 Mb/s";
281                 break;
282         case USB_SPEED_LOW:
283                 speed_str = "1.5 Mb/s";
284                 break;
285         default:
286                 speed_str = "12 Mb/s";
287                 break;
288         }
289
290         return speed_str;
291 }
292
293 /* shows the device tree recursively */
294 static void usb_show_tree_graph(struct usb_device *dev, char *pre)
295 {
296         int i, index;
297         int has_child, last_child;
298
299         index = strlen(pre);
300         printf(" %s", pre);
301         /* check if the device has connected children */
302         has_child = 0;
303         for (i = 0; i < dev->maxchild; i++) {
304                 if (dev->children[i] != NULL)
305                         has_child = 1;
306         }
307         /* check if we are the last one */
308         last_child = 1;
309         if (dev->parent != NULL) {
310                 for (i = 0; i < dev->parent->maxchild; i++) {
311                         /* search for children */
312                         if (dev->parent->children[i] == dev) {
313                                 /* found our pointer, see if we have a
314                                  * little sister
315                                  */
316                                 while (i++ < dev->parent->maxchild) {
317                                         if (dev->parent->children[i] != NULL) {
318                                                 /* found a sister */
319                                                 last_child = 0;
320                                                 break;
321                                         } /* if */
322                                 } /* while */
323                         } /* device found */
324                 } /* for all children of the parent */
325                 printf("\b+-");
326                 /* correct last child */
327                 if (last_child)
328                         pre[index-1] = ' ';
329         } /* if not root hub */
330         else
331                 printf(" ");
332         printf("%d ", dev->devnum);
333         pre[index++] = ' ';
334         pre[index++] = has_child ? '|' : ' ';
335         pre[index] = 0;
336         printf(" %s (%s, %dmA)\n", usb_get_class_desc(
337                                         dev->config.if_desc[0].desc.bInterfaceClass),
338                                         portspeed(dev->speed),
339                                         dev->config.desc.bMaxPower * 2);
340         if (strlen(dev->mf) || strlen(dev->prod) || strlen(dev->serial))
341                 printf(" %s  %s %s %s\n", pre, dev->mf, dev->prod, dev->serial);
342         printf(" %s\n", pre);
343         if (dev->maxchild > 0) {
344                 for (i = 0; i < dev->maxchild; i++) {
345                         if (dev->children[i] != NULL) {
346                                 usb_show_tree_graph(dev->children[i], pre);
347                                 pre[index] = 0;
348                         }
349                 }
350         }
351 }
352
353 /* main routine for the tree command */
354 static void usb_show_tree(struct usb_device *dev)
355 {
356         char preamble[32];
357
358         memset(preamble, 0, 32);
359         usb_show_tree_graph(dev, &preamble[0]);
360 }
361
362 static int usb_test(struct usb_device *dev, int port, char* arg)
363 {
364         int mode;
365
366         if (port > dev->maxchild) {
367                 printf("Device is no hub or does not have %d ports.\n", port);
368                 return 1;
369         }
370
371         switch (arg[0]) {
372         case 'J':
373         case 'j':
374                 printf("Setting Test_J mode");
375                 mode = USB_TEST_MODE_J;
376                 break;
377         case 'K':
378         case 'k':
379                 printf("Setting Test_K mode");
380                 mode = USB_TEST_MODE_K;
381                 break;
382         case 'S':
383         case 's':
384                 printf("Setting Test_SE0_NAK mode");
385                 mode = USB_TEST_MODE_SE0_NAK;
386                 break;
387         case 'P':
388         case 'p':
389                 printf("Setting Test_Packet mode");
390                 mode = USB_TEST_MODE_PACKET;
391                 break;
392         case 'F':
393         case 'f':
394                 printf("Setting Test_Force_Enable mode");
395                 mode = USB_TEST_MODE_FORCE_ENABLE;
396                 break;
397         default:
398                 printf("Unrecognized test mode: %s\nAvailable modes: "
399                        "J, K, S[E0_NAK], P[acket], F[orce_Enable]\n", arg);
400                 return 1;
401         }
402
403         if (port)
404                 printf(" on downstream facing port %d...\n", port);
405         else
406                 printf(" on upstream facing port...\n");
407
408         if (usb_control_msg(dev, usb_sndctrlpipe(dev, 0), USB_REQ_SET_FEATURE,
409                             port ? USB_RT_PORT : USB_RECIP_DEVICE,
410                             port ? USB_PORT_FEAT_TEST : USB_FEAT_TEST,
411                             (mode << 8) | port,
412                             NULL, 0, USB_CNTL_TIMEOUT) == -1) {
413                 printf("Error during SET_FEATURE.\n");
414                 return 1;
415         } else {
416                 printf("Test mode successfully set. Use 'usb start' "
417                        "to return to normal operation.\n");
418                 return 0;
419         }
420 }
421
422
423 /******************************************************************************
424  * usb boot command intepreter. Derived from diskboot
425  */
426 #ifdef CONFIG_USB_STORAGE
427 static int do_usbboot(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
428 {
429         return common_diskboot(cmdtp, "usb", argc, argv);
430 }
431 #endif /* CONFIG_USB_STORAGE */
432
433
434 /******************************************************************************
435  * usb command intepreter
436  */
437 static int do_usb(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
438 {
439
440         int i;
441         struct usb_device *dev = NULL;
442         extern char usb_started;
443 #ifdef CONFIG_USB_STORAGE
444         block_dev_desc_t *stor_dev;
445 #endif
446
447         if (argc < 2)
448                 return CMD_RET_USAGE;
449
450         if ((strncmp(argv[1], "reset", 5) == 0) ||
451                  (strncmp(argv[1], "start", 5) == 0)) {
452                 bootstage_mark_name(BOOTSTAGE_ID_USB_START, "usb_start");
453                 usb_stop();
454                 printf("(Re)start USB...\n");
455                 if (usb_init() >= 0) {
456 #ifdef CONFIG_USB_STORAGE
457                         /* try to recognize storage devices immediately */
458                         usb_stor_curr_dev = usb_stor_scan(1);
459 #endif
460 #ifdef CONFIG_USB_HOST_ETHER
461                         /* try to recognize ethernet devices immediately */
462                         usb_ether_curr_dev = usb_host_eth_scan(1);
463 #endif
464 #ifdef CONFIG_USB_KEYBOARD
465                         drv_usb_kbd_init();
466 #endif
467                 }
468                 return 0;
469         }
470         if (strncmp(argv[1], "stop", 4) == 0) {
471 #ifdef CONFIG_USB_KEYBOARD
472                 if (argc == 2) {
473                         if (usb_kbd_deregister() != 0) {
474                                 printf("USB not stopped: usbkbd still"
475                                         " using USB\n");
476                                 return 1;
477                         }
478                 } else {
479                         /* forced stop, switch console in to serial */
480                         console_assign(stdin, "serial");
481                         usb_kbd_deregister();
482                 }
483 #endif
484                 printf("stopping USB..\n");
485                 usb_stop();
486                 return 0;
487         }
488         if (!usb_started) {
489                 printf("USB is stopped. Please issue 'usb start' first.\n");
490                 return 1;
491         }
492         if (strncmp(argv[1], "tree", 4) == 0) {
493                 puts("USB device tree:\n");
494                 for (i = 0; i < USB_MAX_DEVICE; i++) {
495                         dev = usb_get_dev_index(i);
496                         if (dev == NULL)
497                                 break;
498                         if (dev->parent == NULL)
499                                 usb_show_tree(dev);
500                 }
501                 return 0;
502         }
503         if (strncmp(argv[1], "inf", 3) == 0) {
504                 int d;
505                 if (argc == 2) {
506                         for (d = 0; d < USB_MAX_DEVICE; d++) {
507                                 dev = usb_get_dev_index(d);
508                                 if (dev == NULL)
509                                         break;
510                                 usb_display_desc(dev);
511                                 usb_display_config(dev);
512                         }
513                         return 0;
514                 } else {
515                         i = simple_strtoul(argv[2], NULL, 10);
516                         printf("config for device %d\n", i);
517                         dev = usb_find_device(i);
518                         if (dev == NULL) {
519                                 printf("*** No device available ***\n");
520                                 return 0;
521                         } else {
522                                 usb_display_desc(dev);
523                                 usb_display_config(dev);
524                         }
525                 }
526                 return 0;
527         }
528         if (strncmp(argv[1], "test", 4) == 0) {
529                 if (argc < 5)
530                         return CMD_RET_USAGE;
531                 i = simple_strtoul(argv[2], NULL, 10);
532                 dev = usb_find_device(i);
533                 if (dev == NULL) {
534                         printf("Device %d does not exist.\n", i);
535                         return 1;
536                 }
537                 i = simple_strtoul(argv[3], NULL, 10);
538                 return usb_test(dev, i, argv[4]);
539         }
540 #ifdef CONFIG_USB_STORAGE
541         if (strncmp(argv[1], "stor", 4) == 0)
542                 return usb_stor_info();
543
544         if (strncmp(argv[1], "part", 4) == 0) {
545                 int devno, ok = 0;
546                 if (argc == 2) {
547                         for (devno = 0; ; ++devno) {
548                                 stor_dev = usb_stor_get_dev(devno);
549                                 if (stor_dev == NULL)
550                                         break;
551                                 if (stor_dev->type != DEV_TYPE_UNKNOWN) {
552                                         ok++;
553                                         if (devno)
554                                                 printf("\n");
555                                         debug("print_part of %x\n", devno);
556                                         print_part(stor_dev);
557                                 }
558                         }
559                 } else {
560                         devno = simple_strtoul(argv[2], NULL, 16);
561                         stor_dev = usb_stor_get_dev(devno);
562                         if (stor_dev != NULL &&
563                             stor_dev->type != DEV_TYPE_UNKNOWN) {
564                                 ok++;
565                                 debug("print_part of %x\n", devno);
566                                 print_part(stor_dev);
567                         }
568                 }
569                 if (!ok) {
570                         printf("\nno USB devices available\n");
571                         return 1;
572                 }
573                 return 0;
574         }
575         if (strcmp(argv[1], "read") == 0) {
576                 if (usb_stor_curr_dev < 0) {
577                         printf("no current device selected\n");
578                         return 1;
579                 }
580                 if (argc == 5) {
581                         unsigned long addr = simple_strtoul(argv[2], NULL, 16);
582                         unsigned long blk  = simple_strtoul(argv[3], NULL, 16);
583                         unsigned long cnt  = simple_strtoul(argv[4], NULL, 16);
584                         unsigned long n;
585                         printf("\nUSB read: device %d block # %ld, count %ld"
586                                 " ... ", usb_stor_curr_dev, blk, cnt);
587                         stor_dev = usb_stor_get_dev(usb_stor_curr_dev);
588                         n = stor_dev->block_read(usb_stor_curr_dev, blk, cnt,
589                                                  (ulong *)addr);
590                         printf("%ld blocks read: %s\n", n,
591                                 (n == cnt) ? "OK" : "ERROR");
592                         if (n == cnt)
593                                 return 0;
594                         return 1;
595                 }
596         }
597         if (strcmp(argv[1], "write") == 0) {
598                 if (usb_stor_curr_dev < 0) {
599                         printf("no current device selected\n");
600                         return 1;
601                 }
602                 if (argc == 5) {
603                         unsigned long addr = simple_strtoul(argv[2], NULL, 16);
604                         unsigned long blk  = simple_strtoul(argv[3], NULL, 16);
605                         unsigned long cnt  = simple_strtoul(argv[4], NULL, 16);
606                         unsigned long n;
607                         printf("\nUSB write: device %d block # %ld, count %ld"
608                                 " ... ", usb_stor_curr_dev, blk, cnt);
609                         stor_dev = usb_stor_get_dev(usb_stor_curr_dev);
610                         n = stor_dev->block_write(usb_stor_curr_dev, blk, cnt,
611                                                 (ulong *)addr);
612                         printf("%ld blocks write: %s\n", n,
613                                 (n == cnt) ? "OK" : "ERROR");
614                         if (n == cnt)
615                                 return 0;
616                         return 1;
617                 }
618         }
619         if (strncmp(argv[1], "dev", 3) == 0) {
620                 if (argc == 3) {
621                         int dev = (int)simple_strtoul(argv[2], NULL, 10);
622                         printf("\nUSB device %d: ", dev);
623                         stor_dev = usb_stor_get_dev(dev);
624                         if (stor_dev == NULL) {
625                                 printf("unknown device\n");
626                                 return 1;
627                         }
628                         printf("\n    Device %d: ", dev);
629                         dev_print(stor_dev);
630                         if (stor_dev->type == DEV_TYPE_UNKNOWN)
631                                 return 1;
632                         usb_stor_curr_dev = dev;
633                         printf("... is now current device\n");
634                         return 0;
635                 } else {
636                         printf("\nUSB device %d: ", usb_stor_curr_dev);
637                         stor_dev = usb_stor_get_dev(usb_stor_curr_dev);
638                         dev_print(stor_dev);
639                         if (stor_dev->type == DEV_TYPE_UNKNOWN)
640                                 return 1;
641                         return 0;
642                 }
643                 return 0;
644         }
645 #endif /* CONFIG_USB_STORAGE */
646         return CMD_RET_USAGE;
647 }
648
649 U_BOOT_CMD(
650         usb,    5,      1,      do_usb,
651         "USB sub-system",
652         "start - start (scan) USB controller\n"
653         "usb reset - reset (rescan) USB controller\n"
654         "usb stop [f] - stop USB [f]=force stop\n"
655         "usb tree - show USB device tree\n"
656         "usb info [dev] - show available USB devices\n"
657         "usb test [dev] [port] [mode] - set USB 2.0 test mode\n"
658         "    (specify port 0 to indicate the device's upstream port)\n"
659         "    Available modes: J, K, S[E0_NAK], P[acket], F[orce_Enable]\n"
660 #ifdef CONFIG_USB_STORAGE
661         "usb storage - show details of USB storage devices\n"
662         "usb dev [dev] - show or set current USB storage device\n"
663         "usb part [dev] - print partition table of one or all USB storage"
664         "    devices\n"
665         "usb read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
666         "    to memory address `addr'\n"
667         "usb write addr blk# cnt - write `cnt' blocks starting at block `blk#'\n"
668         "    from memory address `addr'"
669 #endif /* CONFIG_USB_STORAGE */
670 );
671
672
673 #ifdef CONFIG_USB_STORAGE
674 U_BOOT_CMD(
675         usbboot,        3,      1,      do_usbboot,
676         "boot from USB device",
677         "loadAddr dev:part"
678 );
679 #endif /* CONFIG_USB_STORAGE */