[u-boot.git] / common / cmd_usb.c

/*
 * (C) Copyright 2001
 * Denis Peter, MPL AG Switzerland
 *
 * Most of this source has been derived from the Linux USB
 * project.
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 *
 */

#include <common.h>
#include <command.h>

#if (CONFIG_COMMANDS & CFG_CMD_USB)

#include <usb.h>

static int usb_stor_curr_dev=-1; /* current device */

/* some display routines (info command) */
char * usb_get_class_desc(unsigned char dclass)
{
	switch(dclass) {
		case USB_CLASS_PER_INTERFACE:
			return("See Interface");
		case USB_CLASS_AUDIO:
			return("Audio");
		case USB_CLASS_COMM:
			return("Communication");
		case USB_CLASS_HID:
			return("Human Interface");
		case USB_CLASS_PRINTER:
			return("Printer");
		case USB_CLASS_MASS_STORAGE:
			return("Mass Storage");
		case USB_CLASS_HUB:
			return("Hub");
		case USB_CLASS_DATA:
			return("CDC Data");
		case USB_CLASS_VENDOR_SPEC:
			return("Vendor specific");
		default :
			return("");
	}
}

void usb_display_class_sub(unsigned char dclass,unsigned char subclass,unsigned char proto)
{
	switch(dclass) {
		case USB_CLASS_PER_INTERFACE:
			printf("See Interface");
			break;
		case USB_CLASS_HID:
			printf("Human Interface, Subclass: ");
			switch(subclass) {
				case USB_SUB_HID_NONE:
					printf("None");
					break;
				case USB_SUB_HID_BOOT:
					printf("Boot ");
					switch(proto) {
						case USB_PROT_HID_NONE:
							printf("None");
							break;
						case USB_PROT_HID_KEYBOARD:
							printf("Keyboard");
							break;
						case USB_PROT_HID_MOUSE:
							printf("Mouse");
							break;
						default:
							printf("reserved");
					}
					break;
				default:
					printf("reserved");
			}
			break;
		case USB_CLASS_MASS_STORAGE:
			printf("Mass Storage, ");
			switch(subclass) {
				case US_SC_RBC:
					printf("RBC ");
					break;
				case US_SC_8020:
					printf("SFF-8020i (ATAPI)");
					break;
				case US_SC_QIC:
					printf("QIC-157 (Tape)");
					break;
				case US_SC_UFI:
					printf("UFI");
					break;
				case US_SC_8070:
					printf("SFF-8070");
					break;
				case US_SC_SCSI:
					printf("Transp. SCSI");
					break;
				default:
					printf("reserved");
					break;
			}
			printf(", ");
			switch(proto) {
				case US_PR_CB:
					printf("Command/Bulk");
					break;
				case US_PR_CBI:
					printf("Command/Bulk/Int");
					break;
				case US_PR_BULK:
					printf("Bulk only");
					break;
				default:
					printf("reserved");
			}
			break;
		default:
			printf("%s",usb_get_class_desc(dclass));
	}
}

void usb_display_string(struct usb_device *dev,int index)
{
	char buffer[256];
	if (index!=0) {
		if (usb_string(dev,index,&buffer[0],256)>0);
			printf("String: \"%s\"",buffer);
	}
}

void usb_display_desc(struct usb_device *dev)
{
	if (dev->descriptor.bDescriptorType==USB_DT_DEVICE) {
		printf("%d: %s,  USB Revision %x.%x\n",dev->devnum,usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass),
			(dev->descriptor.bcdUSB>>8) & 0xff,dev->descriptor.bcdUSB & 0xff);
		if (strlen(dev->mf) || strlen(dev->prod) || strlen(dev->serial))
			printf(" - %s %s %s\n",dev->mf,dev->prod,dev->serial);
		if (dev->descriptor.bDeviceClass) {
			printf(" - Class: ");
			usb_display_class_sub(dev->descriptor.bDeviceClass,dev->descriptor.bDeviceSubClass,dev->descriptor.bDeviceProtocol);
			printf("\n");
		}
		else {
			printf(" - Class: (from Interface) %s\n",usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass));
		}
		printf(" - PacketSize: %d  Configurations: %d\n",dev->descriptor.bMaxPacketSize0,dev->descriptor.bNumConfigurations);
		printf(" - Vendor: 0x%04x  Product 0x%04x Version %d.%d\n",dev->descriptor.idVendor,dev->descriptor.idProduct,(dev->descriptor.bcdDevice>>8) & 0xff,dev->descriptor.bcdDevice & 0xff);
	}

}

void usb_display_conf_desc(struct usb_config_descriptor *config,struct usb_device *dev)
{
	printf("   Configuration: %d\n",config->bConfigurationValue);
	printf("   - Interfaces: %d %s%s%dmA\n",config->bNumInterfaces,(config->bmAttributes & 0x40) ? "Self Powered " : "Bus Powered ",
	(config->bmAttributes & 0x20) ? "Remote Wakeup " : "",config->MaxPower*2);
	if (config->iConfiguration) {
		printf("   - ");
		usb_display_string(dev,config->iConfiguration);
		printf("\n");
	}
}

void usb_display_if_desc(struct usb_interface_descriptor *ifdesc,struct usb_device *dev)
{
	printf("     Interface: %d\n",ifdesc->bInterfaceNumber);
	printf("     - Alternate Settings %d, Endpoints: %d\n",ifdesc->bAlternateSetting,ifdesc->bNumEndpoints);
	printf("     - Class ");
	usb_display_class_sub(ifdesc->bInterfaceClass,ifdesc->bInterfaceSubClass,ifdesc->bInterfaceProtocol);
	printf("\n");
	if (ifdesc->iInterface) {
		printf("     - ");
		usb_display_string(dev,ifdesc->iInterface);
		printf("\n");
	}
}

void usb_display_ep_desc(struct usb_endpoint_descriptor *epdesc)
{
	printf("     - Endpoint %d %s ",epdesc->bEndpointAddress & 0xf,(epdesc->bEndpointAddress & 0x80) ? "In" : "Out");
	switch((epdesc->bmAttributes & 0x03))
	{
		case 0: printf("Control"); break;
		case 1: printf("Isochronous"); break;
		case 2: printf("Bulk"); break;
		case 3: printf("Interrupt"); break;
	}
	printf(" MaxPacket %d",epdesc->wMaxPacketSize);
	if ((epdesc->bmAttributes & 0x03)==0x3)
		printf(" Interval %dms",epdesc->bInterval);
	printf("\n");
}

/* main routine to diasplay the configs, interfaces and endpoints */
void usb_display_config(struct usb_device *dev)
{
	struct usb_config_descriptor *config;
	struct usb_interface_descriptor *ifdesc;
	struct usb_endpoint_descriptor *epdesc;
	int i,ii;

	config= &dev->config;
	usb_display_conf_desc(config,dev);
	for(i=0;i<config->no_of_if;i++) {
		ifdesc= &config->if_desc[i];
		usb_display_if_desc(ifdesc,dev);
		for(ii=0;ii<ifdesc->no_of_ep;ii++) {
			epdesc= &ifdesc->ep_desc[ii];
			usb_display_ep_desc(epdesc);
		}
	}
	printf("\n");
}

/* shows the device tree recursively */
void usb_show_tree_graph(struct usb_device *dev,char *pre)
{
	int i,index;
	int has_child,last_child,port;

	index=strlen(pre);
	printf(" %s",pre);
	/* check if the device has connected children */
	has_child=0;
	for(i=0;i<dev->maxchild;i++) {
		if (dev->children[i]!=NULL)
			has_child=1;
	}
	/* check if we are the last one */
	last_child=1;
	if (dev->parent!=NULL) {
		for(i=0;i<dev->parent->maxchild;i++) {
			/* search for children */
			if (dev->parent->children[i]==dev) {
				/* found our pointer, see if we have a little sister */
				port=i;
				while(i++<dev->parent->maxchild) {
					if (dev->parent->children[i]!=NULL) {
						/* found a sister */
						last_child=0;
						break;
					} /* if */
				} /* while */
			} /* device found */
		} /* for all children of the parent */
		printf("\b+-");
		/* correct last child */
		if (last_child) {
			pre[index-1]=' ';
		}
	} /* if not root hub */
	else
		printf(" ");
	printf("%d ",dev->devnum);
	pre[index++]=' ';
	pre[index++]= has_child ? '|' : ' ';
	pre[index]=0;
	printf(" %s (%s, %dmA)\n",usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass),
		dev->slow ? "1.5MBit/s" : "12MBit/s",dev->config.MaxPower * 2);
	if (strlen(dev->mf) ||
	   strlen(dev->prod) ||
	   strlen(dev->serial))
		printf(" %s  %s %s %s\n",pre,dev->mf,dev->prod,dev->serial);
	printf(" %s\n",pre);
	if (dev->maxchild>0) {
		for(i=0;i<dev->maxchild;i++) {
			if (dev->children[i]!=NULL) {
				usb_show_tree_graph(dev->children[i],pre);
				pre[index]=0;
			}
		}
	}
}

/* main routine for the tree command */
void usb_show_tree(struct usb_device *dev)
{
	char preamble[32];

	memset(preamble,0,32);
	usb_show_tree_graph(dev,&preamble[0]);
}


/******************************************************************************
 * usb boot command intepreter. Derived from diskboot
 */
#ifdef CONFIG_USB_STORAGE
int do_usbboot (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
{
	char *boot_device = NULL;
	char *ep;
	int dev, part=1, rcode;
	ulong addr, cnt, checksum;
	disk_partition_t info;
	image_header_t *hdr;
	block_dev_desc_t *stor_dev;


	switch (argc) {
	case 1:
		addr = CFG_LOAD_ADDR;
		boot_device = getenv ("bootdevice");
		break;
	case 2:
		addr = simple_strtoul(argv[1], NULL, 16);
		boot_device = getenv ("bootdevice");
		break;
	case 3:
		addr = simple_strtoul(argv[1], NULL, 16);
		boot_device = argv[2];
		break;
	default:
		printf ("Usage:\n%s\n", cmdtp->usage);
		return 1;
	}

	if (!boot_device) {
		puts ("\n** No boot device **\n");
		return 1;
	}

	dev = simple_strtoul(boot_device, &ep, 16);
	stor_dev=usb_stor_get_dev(dev);
	if (stor_dev->type == DEV_TYPE_UNKNOWN) {
		printf ("\n** Device %d not available\n", dev);
		return 1;
	}
	if (stor_dev->block_read==NULL) {
		printf("storage device not initialized. Use usb scan\n");
		return 1;
	}
	if (*ep) {
		if (*ep != ':') {
			puts ("\n** Invalid boot device, use `dev[:part]' **\n");
			return 1;
		}
		part = simple_strtoul(++ep, NULL, 16);
	}

	if (get_partition_info (stor_dev, part, &info)) {
		/* try to boot raw .... */
		strncpy(&info.type[0], BOOT_PART_TYPE, sizeof(BOOT_PART_TYPE));
		strncpy(&info.name[0], "Raw", 4);
		info.start=0;
		info.blksz=0x200;
		info.size=2880;
		printf("error reading partinfo...try to boot raw\n");
	}
	if ((strncmp(info.type, BOOT_PART_TYPE, sizeof(info.type)) != 0) &&
	    (strncmp(info.type, BOOT_PART_COMP, sizeof(info.type)) != 0)) {
		printf ("\n** Invalid partition type \"%.32s\""
			" (expect \"" BOOT_PART_TYPE "\")\n",
			info.type);
		return 1;
	}
	printf ("\nLoading from USB device %d, partition %d: "
		"Name: %.32s  Type: %.32s\n",
		dev, part, info.name, info.type);

	debug ("First Block: %ld,  # of blocks: %ld, Block Size: %ld\n",
		info.start, info.size, info.blksz);

	if (stor_dev->block_read(dev, info.start, 1, (ulong *)addr) != 1) {
		printf ("** Read error on %d:%d\n", dev, part);
		return 1;
	}

	hdr = (image_header_t *)addr;

	if (ntohl(hdr->ih_magic) != IH_MAGIC) {
		printf("\n** Bad Magic Number **\n");
		return 1;
	}

	checksum = ntohl(hdr->ih_hcrc);
	hdr->ih_hcrc = 0;

	if (crc32 (0, (char *)hdr, sizeof(image_header_t)) != checksum) {
		puts ("\n** Bad Header Checksum **\n");
		return 1;
	}
	hdr->ih_hcrc = htonl(checksum);	/* restore checksum for later use */

	print_image_hdr (hdr);

	cnt = (ntohl(hdr->ih_size) + sizeof(image_header_t));
	cnt += info.blksz - 1;
	cnt /= info.blksz;
	cnt -= 1;

	if (stor_dev->block_read (dev, info.start+1, cnt,
		      (ulong *)(addr+info.blksz)) != cnt) {
		printf ("\n** Read error on %d:%d\n", dev, part);
		return 1;
	}
	/* Loading ok, update default load address */
	load_addr = addr;

	flush_cache (addr, (cnt+1)*info.blksz);

	/* Check if we should attempt an auto-start */
	if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
		char *local_args[2];
		extern int do_bootm (cmd_tbl_t *, int, int, char *[]);
		local_args[0] = argv[0];
		local_args[1] = NULL;
		printf ("Automatic boot of image at addr 0x%08lX ...\n", addr);
		rcode=do_bootm (cmdtp, 0, 1, local_args);
		return rcode;
	}
	return 0;
}
#endif /* CONFIG_USB_STORAGE */


/*********************************************************************************
 * usb command intepreter
 */
int do_usb (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
{

	int i;
	struct usb_device *dev = NULL;
	block_dev_desc_t *stor_dev;

	if ((strncmp(argv[1],"reset",5) == 0) ||
		 (strncmp(argv[1],"start",5) == 0)){
		usb_stop();
		printf("(Re)start USB...\n");
		usb_init();
		return 0;
	}
	if (strncmp(argv[1],"stop",4) == 0) {
#ifdef CONFIG_USB_KEYBOARD
		if (argc==2) {
			if (usb_kbd_deregister()!=0) {
				printf("USB not stopped: usbkbd still using USB\n");
				return 1;
			}
		}
		else { /* forced stop, switch console in to serial */
			console_assign(stdin,"serial");
			usb_kbd_deregister();
		}
#endif
		printf("stopping USB..\n");
		usb_stop();
		return 0;
	}
	if (strncmp(argv[1],"tree",4) == 0) {
		printf("\nDevice Tree:\n");
		usb_show_tree(usb_get_dev_index(0));
		return 0;
	}
	if (strncmp(argv[1],"inf",3) == 0) {
		int d;
		if (argc==2) {
			for(d=0;d<USB_MAX_DEVICE;d++) {
				dev=usb_get_dev_index(d);
				if (dev==NULL)
					break;
				usb_display_desc(dev);
				usb_display_config(dev);
			}
			return 0;
		}
		else {
			int d;

			i=simple_strtoul(argv[2], NULL, 16);
			printf("config for device %d\n",i);
			for(d=0;d<USB_MAX_DEVICE;d++) {
				dev=usb_get_dev_index(d);
				if (dev==NULL)
					break;
				if (dev->devnum==i)
					break;
			}
			if (dev==NULL) {
				printf("*** NO Device avaiable ***\n");
				return 0;
			}
			else {
				usb_display_desc(dev);
				usb_display_config(dev);
			}
		}
		return 0;
	}
#ifdef CONFIG_USB_STORAGE
	if (strncmp(argv[1],"scan",4) == 0) {
		printf("Scan for storage device:\n");
	 	usb_stor_curr_dev=usb_stor_scan(1);
		if (usb_stor_curr_dev==-1) {
			printf("No device found. Not initialized?\n");
			return 1;
		}
		return 0;
	}
	if (strncmp(argv[1],"part",4) == 0) {
		int devno, ok;
		for (ok=0, devno=0; devno<USB_MAX_STOR_DEV; ++devno) {
			stor_dev=usb_stor_get_dev(devno);
			if (stor_dev->type!=DEV_TYPE_UNKNOWN) {
				ok++;
				if (devno)
					printf("\n");
				printf("print_part of %x\n",devno);
				print_part(stor_dev);
			}
		}
		if (!ok) {
			printf("\nno USB devices available\n");
			return 1;
		}
		return 0;
	}
	if (strcmp(argv[1],"read") == 0) {
		if (usb_stor_curr_dev<0) {
			printf("no current device selected\n");
			return 1;
		}
		if (argc==5) {
			unsigned long addr = simple_strtoul(argv[2], NULL, 16);
			unsigned long blk  = simple_strtoul(argv[3], NULL, 16);
			unsigned long cnt  = simple_strtoul(argv[4], NULL, 16);
			unsigned long n;
			printf ("\nUSB read: device %d block # %ld, count %ld ... ",
					usb_stor_curr_dev, blk, cnt);
			stor_dev=usb_stor_get_dev(usb_stor_curr_dev);
			n = stor_dev->block_read(usb_stor_curr_dev, blk, cnt, (ulong *)addr);
			printf ("%ld blocks read: %s\n",n,(n==cnt) ? "OK" : "ERROR");
			if (n==cnt)
				return 0;
			return 1;
		}
	}
	if (strcmp(argv[1],"dev") == 0) {
		if (argc==3) {
			int dev = (int)simple_strtoul(argv[2], NULL, 10);
			printf ("\nUSB device %d: ", dev);
			if (dev >= USB_MAX_STOR_DEV) {
				printf("unknown device\n");
				return 1;
			}
			printf ("\n    Device %d: ", dev);
			stor_dev=usb_stor_get_dev(dev);
			dev_print(stor_dev);
			if (stor_dev->type == DEV_TYPE_UNKNOWN) {
				return 1;
			}
			usb_stor_curr_dev = dev;
			printf("... is now current device\n");
			return 0;
		}
		else {
			printf ("\nUSB device %d: ", usb_stor_curr_dev);
			stor_dev=usb_stor_get_dev(usb_stor_curr_dev);
			dev_print(stor_dev);
			if (stor_dev->type == DEV_TYPE_UNKNOWN) {
				return 1;
			}
			return 0;
		}
		return 0;
	}
#endif /* CONFIG_USB_STORAGE */
	printf ("Usage:\n%s\n", cmdtp->usage);
	return 1;
}


#endif /* (CONFIG_COMMANDS & CFG_CMD_USB) */


#if (CONFIG_COMMANDS & CFG_CMD_USB)

#ifdef CONFIG_USB_STORAGE
U_BOOT_CMD(
	usb,	5,	1,	do_usb,
	"usb     - USB sub-system\n",
	"reset - reset (rescan) USB controller\n"
	"usb stop [f]  - stop USB [f]=force stop\n"
	"usb tree  - show USB device tree\n"
	"usb info [dev] - show available USB devices\n"
	"usb scan  - (re-)scan USB bus for storage devices\n"
	"usb device [dev] - show or set current USB storage device\n"
	"usb part [dev] - print partition table of one or all USB storage devices\n"
	"usb read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
	"    to memory address `addr'\n"
);


U_BOOT_CMD(
	usbboot,	3,	1,	do_usbboot,
	"usbboot - boot from USB device\n",
	"loadAddr dev:part\n"
);

#else
U_BOOT_CMD(
	usb,	5,	1,	do_usb,
	"usb     - USB sub-system\n",
	"reset - reset (rescan) USB controller\n"
	"usb  tree  - show USB device tree\n"
	"usb  info [dev] - show available USB devices\n"
);
#endif
#endif
Commit	Line	Data
e887afc9 WD	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	* See file CREDITS for list of people who contributed to this
	9	* project.
	10	*
	11	* This program is free software; you can redistribute it and/or
	12	* modify it under the terms of the GNU General Public License as
	13	* published by the Free Software Foundation; either version 2 of
	14	* the License, or (at your option) any later version.
	15	*
	16	* This program is distributed in the hope that it will be useful,
	17	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	18	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	19	* GNU General Public License for more details.
	20	*
	21	* You should have received a copy of the GNU General Public License
	22	* along with this program; if not, write to the Free Software
	23	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	24	* MA 02111-1307 USA
	25	*
	26	*/
	27
	28	#include <common.h>
	29	#include <command.h>
	30
	31	#if (CONFIG_COMMANDS & CFG_CMD_USB)
	32
	33	#include <usb.h>
e887afc9	34
e887afc9 WD	35	static int usb_stor_curr_dev=-1; /* current device */
e887afc9 WD	36
a2663ea4	37	/* some display routines (info command) */
e887afc9 WD	38	char * usb_get_class_desc(unsigned char dclass)
	39	{
	40	switch(dclass) {
	41	case USB_CLASS_PER_INTERFACE:
	42	return("See Interface");
	43	case USB_CLASS_AUDIO:
	44	return("Audio");
	45	case USB_CLASS_COMM:
	46	return("Communication");
	47	case USB_CLASS_HID:
	48	return("Human Interface");
	49	case USB_CLASS_PRINTER:
	50	return("Printer");
	51	case USB_CLASS_MASS_STORAGE:
	52	return("Mass Storage");
	53	case USB_CLASS_HUB:
	54	return("Hub");
	55	case USB_CLASS_DATA:
	56	return("CDC Data");
	57	case USB_CLASS_VENDOR_SPEC:
	58	return("Vendor specific");
	59	default :
	60	return("");
	61	}
	62	}
	63
	64	void usb_display_class_sub(unsigned char dclass,unsigned char subclass,unsigned char proto)
	65	{
	66	switch(dclass) {
	67	case USB_CLASS_PER_INTERFACE:
	68	printf("See Interface");
	69	break;
	70	case USB_CLASS_HID:
	71	printf("Human Interface, Subclass: ");
	72	switch(subclass) {
	73	case USB_SUB_HID_NONE:
	74	printf("None");
	75	break;
	76	case USB_SUB_HID_BOOT:
	77	printf("Boot ");
	78	switch(proto) {
	79	case USB_PROT_HID_NONE:
	80	printf("None");
	81	break;
	82	case USB_PROT_HID_KEYBOARD:
	83	printf("Keyboard");
	84	break;
	85	case USB_PROT_HID_MOUSE:
	86	printf("Mouse");
	87	break;
	88	default:
	89	printf("reserved");
	90	}
	91	break;
	92	default:
	93	printf("reserved");
	94	}
	95	break;
	96	case USB_CLASS_MASS_STORAGE:
	97	printf("Mass Storage, ");
	98	switch(subclass) {
	99	case US_SC_RBC:
	100	printf("RBC ");
	101	break;
102	case US_SC_8020:
103	printf("SFF-8020i (ATAPI)");
104	break;
105	case US_SC_QIC:
106	printf("QIC-157 (Tape)");
107	break;
108	case US_SC_UFI:
109	printf("UFI");
110	break;
111	case US_SC_8070:
112	printf("SFF-8070");
113	break;
114	case US_SC_SCSI:
115	printf("Transp. SCSI");
116	break;
117	default:
118	printf("reserved");
119	break;
120	}
121	printf(", ");
122	switch(proto) {
123	case US_PR_CB:
124	printf("Command/Bulk");
125	break;
126	case US_PR_CBI:
127	printf("Command/Bulk/Int");
128	break;
129	case US_PR_BULK:
130	printf("Bulk only");
131	break;
132	default:
133	printf("reserved");
134	}
135	break;
136	default:
137	printf("%s",usb_get_class_desc(dclass));
138	}
139	}
140
141	void usb_display_string(struct usb_device *dev,int index)
142	{
143	char buffer[256];
144	if (index!=0) {
145	if (usb_string(dev,index,&buffer[0],256)>0);
146	printf("String: \"%s\"",buffer);
147	}
148	}
149
150	void usb_display_desc(struct usb_device *dev)
151	{
152	if (dev->descriptor.bDescriptorType==USB_DT_DEVICE) {
153	printf("%d: %s, USB Revision %x.%x\n",dev->devnum,usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass),
154	(dev->descriptor.bcdUSB>>8) & 0xff,dev->descriptor.bcdUSB & 0xff);
155	if (strlen(dev->mf) \|\| strlen(dev->prod) \|\| strlen(dev->serial))
156	printf(" - %s %s %s\n",dev->mf,dev->prod,dev->serial);
157	if (dev->descriptor.bDeviceClass) {
158	printf(" - Class: ");
159	usb_display_class_sub(dev->descriptor.bDeviceClass,dev->descriptor.bDeviceSubClass,dev->descriptor.bDeviceProtocol);
160	printf("\n");
161	}
162	else {
163	printf(" - Class: (from Interface) %s\n",usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass));
164	}
165	printf(" - PacketSize: %d Configurations: %d\n",dev->descriptor.bMaxPacketSize0,dev->descriptor.bNumConfigurations);
166	printf(" - Vendor: 0x%04x Product 0x%04x Version %d.%d\n",dev->descriptor.idVendor,dev->descriptor.idProduct,(dev->descriptor.bcdDevice>>8) & 0xff,dev->descriptor.bcdDevice & 0xff);
167	}
168
169	}
170
171	void usb_display_conf_desc(struct usb_config_descriptor config,struct usb_device dev)
172	{
173	printf(" Configuration: %d\n",config->bConfigurationValue);
174	printf(" - Interfaces: %d %s%s%dmA\n",config->bNumInterfaces,(config->bmAttributes & 0x40) ? "Self Powered " : "Bus Powered ",
175	(config->bmAttributes & 0x20) ? "Remote Wakeup " : "",config->MaxPower*2);
176	if (config->iConfiguration) {
177	printf(" - ");
178	usb_display_string(dev,config->iConfiguration);
179	printf("\n");
180	}
181	}
182
183	void usb_display_if_desc(struct usb_interface_descriptor ifdesc,struct usb_device dev)
184	{
185	printf(" Interface: %d\n",ifdesc->bInterfaceNumber);
186	printf(" - Alternate Settings %d, Endpoints: %d\n",ifdesc->bAlternateSetting,ifdesc->bNumEndpoints);
187	printf(" - Class ");
188	usb_display_class_sub(ifdesc->bInterfaceClass,ifdesc->bInterfaceSubClass,ifdesc->bInterfaceProtocol);
189	printf("\n");
190	if (ifdesc->iInterface) {
191	printf(" - ");
192	usb_display_string(dev,ifdesc->iInterface);
193	printf("\n");
194	}
195	}
196
197	void usb_display_ep_desc(struct usb_endpoint_descriptor *epdesc)
198	{
199	printf(" - Endpoint %d %s ",epdesc->bEndpointAddress & 0xf,(epdesc->bEndpointAddress & 0x80) ? "In" : "Out");
200	switch((epdesc->bmAttributes & 0x03))
201	{
202	case 0: printf("Control"); break;
203	case 1: printf("Isochronous"); break;
204	case 2: printf("Bulk"); break;
205	case 3: printf("Interrupt"); break;
206	}
207	printf(" MaxPacket %d",epdesc->wMaxPacketSize);
208	if ((epdesc->bmAttributes & 0x03)==0x3)
209	printf(" Interval %dms",epdesc->bInterval);
210	printf("\n");
211	}
212
213	/* main routine to diasplay the configs, interfaces and endpoints */
214	void usb_display_config(struct usb_device *dev)
215	{
216	struct usb_config_descriptor *config;
217	struct usb_interface_descriptor *ifdesc;
218	struct usb_endpoint_descriptor *epdesc;
219	int i,ii;
220
221	config= &dev->config;
222	usb_display_conf_desc(config,dev);
223	for(i=0;i<config->no_of_if;i++) {
224	ifdesc= &config->if_desc[i];
225	usb_display_if_desc(ifdesc,dev);
226	for(ii=0;ii<ifdesc->no_of_ep;ii++) {
227	epdesc= &ifdesc->ep_desc[ii];
228	usb_display_ep_desc(epdesc);
229	}
230	}
231	printf("\n");
232	}
233
234	/* shows the device tree recursively */
235	void usb_show_tree_graph(struct usb_device dev,char pre)
236	{
237	int i,index;
238	int has_child,last_child,port;
239
240	index=strlen(pre);
241	printf(" %s",pre);
242	/* check if the device has connected children */
243	has_child=0;
244	for(i=0;i<dev->maxchild;i++) {
245	if (dev->children[i]!=NULL)
246	has_child=1;
247	}
248	/* check if we are the last one */
249	last_child=1;
250	if (dev->parent!=NULL) {
251	for(i=0;i<dev->parent->maxchild;i++) {
252	/* search for children */
253	if (dev->parent->children[i]==dev) {
254	/* found our pointer, see if we have a little sister */
255	port=i;
256	while(i++<dev->parent->maxchild) {
257	if (dev->parent->children[i]!=NULL) {
258	/* found a sister */
259	last_child=0;
260	break;
261	} /* if */
262	} /* while */
263	} /* device found */
264	} /* for all children of the parent */
265	printf("\b+-");
266	/* correct last child */
267	if (last_child) {
268	pre[index-1]=' ';
269	}
270	} /* if not root hub */
271	else
272	printf(" ");
273	printf("%d ",dev->devnum);
274	pre[index++]=' ';
275	pre[index++]= has_child ? '\|' : ' ';
276	pre[index]=0;
277	printf(" %s (%s, %dmA)\n",usb_get_class_desc(dev->config.if_desc[0].bInterfaceClass),
278	dev->slow ? "1.5MBit/s" : "12MBit/s",dev->config.MaxPower * 2);
279	if (strlen(dev->mf) \|\|
280	strlen(dev->prod) \|\|
281	strlen(dev->serial))
282	printf(" %s %s %s %s\n",pre,dev->mf,dev->prod,dev->serial);
283	printf(" %s\n",pre);
284	if (dev->maxchild>0) {
285	for(i=0;i<dev->maxchild;i++) {
286	if (dev->children[i]!=NULL) {
287	usb_show_tree_graph(dev->children[i],pre);
288	pre[index]=0;
289	}
290	}
291	}
292	}
293
294	/* main routine for the tree command */
295	void usb_show_tree(struct usb_device *dev)
296	{
297	char preamble[32];
298
299	memset(preamble,0,32);
300	usb_show_tree_graph(dev,&preamble[0]);
301	}
302
303
e887afc9 WD	304	/******************************************************************************
	305	* usb boot command intepreter. Derived from diskboot
	306	*/
	307	#ifdef CONFIG_USB_STORAGE
	308	int do_usbboot (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	309	{
	310	char *boot_device = NULL;
	311	char *ep;
2f916943	312	int dev, part=1, rcode;
1a344f29	313	ulong addr, cnt, checksum;
e887afc9 WD	314	disk_partition_t info;
	315	image_header_t *hdr;
	316	block_dev_desc_t *stor_dev;
	317
	318
	319	switch (argc) {
	320	case 1:
	321	addr = CFG_LOAD_ADDR;
	322	boot_device = getenv ("bootdevice");
	323	break;
	324	case 2:
	325	addr = simple_strtoul(argv[1], NULL, 16);
	326	boot_device = getenv ("bootdevice");
	327	break;
	328	case 3:
	329	addr = simple_strtoul(argv[1], NULL, 16);
	330	boot_device = argv[2];
	331	break;
	332	default:
	333	printf ("Usage:\n%s\n", cmdtp->usage);
	334	return 1;
	335	}
	336
	337	if (!boot_device) {
	338	puts ("\n No boot device \n");
	339	return 1;
	340	}
	341
	342	dev = simple_strtoul(boot_device, &ep, 16);
	343	stor_dev=usb_stor_get_dev(dev);
	344	if (stor_dev->type == DEV_TYPE_UNKNOWN) {
	345	printf ("\n** Device %d not available\n", dev);
	346	return 1;
	347	}
	348	if (stor_dev->block_read==NULL) {
	349	printf("storage device not initialized. Use usb scan\n");
	350	return 1;
	351	}
	352	if (*ep) {
	353	if (*ep != ':') {
	354	puts ("\n Invalid boot device, use `dev[:part]' \n");
	355	return 1;
	356	}
	357	part = simple_strtoul(++ep, NULL, 16);
	358	}
	359
	360	if (get_partition_info (stor_dev, part, &info)) {
	361	/* try to boot raw .... */
	362	strncpy(&info.type[0], BOOT_PART_TYPE, sizeof(BOOT_PART_TYPE));
	363	strncpy(&info.name[0], "Raw", 4);
	364	info.start=0;
	365	info.blksz=0x200;
	366	info.size=2880;
	367	printf("error reading partinfo...try to boot raw\n");
	368	}
4532cb69 WD	369	if ((strncmp(info.type, BOOT_PART_TYPE, sizeof(info.type)) != 0) &&
4532cb69 WD	370	(strncmp(info.type, BOOT_PART_COMP, sizeof(info.type)) != 0)) {
e887afc9 WD	371	printf ("\n** Invalid partition type \"%.32s\""
	372	" (expect \"" BOOT_PART_TYPE "\")\n",
	373	info.type);
	374	return 1;
	375	}
	376	printf ("\nLoading from USB device %d, partition %d: "
	377	"Name: %.32s Type: %.32s\n",
	378	dev, part, info.name, info.type);
	379
1a344f29	380	debug ("First Block: %ld, # of blocks: %ld, Block Size: %ld\n",
e887afc9 WD	381	info.start, info.size, info.blksz);
	382
	383	if (stor_dev->block_read(dev, info.start, 1, (ulong *)addr) != 1) {
	384	printf ("** Read error on %d:%d\n", dev, part);
	385	return 1;
	386	}
	387
	388	hdr = (image_header_t *)addr;
	389
f8883cb1	390	if (ntohl(hdr->ih_magic) != IH_MAGIC) {
e887afc9 WD	391	printf("\n Bad Magic Number \n");
	392	return 1;
	393	}
	394
1a344f29 WD	395	checksum = ntohl(hdr->ih_hcrc);
	396	hdr->ih_hcrc = 0;
	397
	398	if (crc32 (0, (char *)hdr, sizeof(image_header_t)) != checksum) {
	399	puts ("\n Bad Header Checksum \n");
	400	return 1;
	401	}
2f916943	402	hdr->ih_hcrc = htonl(checksum); /* restore checksum for later use */
1a344f29 WD	403
	404	print_image_hdr (hdr);
	405
f8883cb1	406	cnt = (ntohl(hdr->ih_size) + sizeof(image_header_t));
1a344f29 WD	407	cnt += info.blksz - 1;
	408	cnt /= info.blksz;
	409	cnt -= 1;
	410
e887afc9 WD	411	if (stor_dev->block_read (dev, info.start+1, cnt,
	412	(ulong *)(addr+info.blksz)) != cnt) {
	413	printf ("\n** Read error on %d:%d\n", dev, part);
	414	return 1;
	415	}
	416	/* Loading ok, update default load address */
	417	load_addr = addr;
	418
	419	flush_cache (addr, (cnt+1)*info.blksz);
	420
	421	/* Check if we should attempt an auto-start */
	422	if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
	423	char *local_args[2];
	424	extern int do_bootm (cmd_tbl_t , int, int, char []);
	425	local_args[0] = argv[0];
	426	local_args[1] = NULL;
	427	printf ("Automatic boot of image at addr 0x%08lX ...\n", addr);
	428	rcode=do_bootm (cmdtp, 0, 1, local_args);
	429	return rcode;
	430	}
	431	return 0;
	432	}
	433	#endif /* CONFIG_USB_STORAGE */
	434
	435
e887afc9 WD	436	/*********************************************************************************
	437	* usb command intepreter
	438	*/
	439	int do_usb (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	440	{
	441
	442	int i;
	443	struct usb_device *dev = NULL;
	444	block_dev_desc_t *stor_dev;
	445
	446	if ((strncmp(argv[1],"reset",5) == 0) \|\|
	447	(strncmp(argv[1],"start",5) == 0)){
	448	usb_stop();
	449	printf("(Re)start USB...\n");
	450	usb_init();
	451	return 0;
	452	}
	453	if (strncmp(argv[1],"stop",4) == 0) {
	454	#ifdef CONFIG_USB_KEYBOARD
	455	if (argc==2) {
	456	if (usb_kbd_deregister()!=0) {
	457	printf("USB not stopped: usbkbd still using USB\n");
	458	return 1;
	459	}
	460	}
	461	else { /* forced stop, switch console in to serial */
	462	console_assign(stdin,"serial");
	463	usb_kbd_deregister();
	464	}
	465	#endif
	466	printf("stopping USB..\n");
	467	usb_stop();
	468	return 0;
	469	}
	470	if (strncmp(argv[1],"tree",4) == 0) {
	471	printf("\nDevice Tree:\n");
	472	usb_show_tree(usb_get_dev_index(0));
	473	return 0;
	474	}
	475	if (strncmp(argv[1],"inf",3) == 0) {
	476	int d;
	477	if (argc==2) {
	478	for(d=0;d<USB_MAX_DEVICE;d++) {
	479	dev=usb_get_dev_index(d);
	480	if (dev==NULL)
	481	break;
	482	usb_display_desc(dev);
	483	usb_display_config(dev);
	484	}
	485	return 0;
	486	}
	487	else {
	488	int d;
	489
	490	i=simple_strtoul(argv[2], NULL, 16);
	491	printf("config for device %d\n",i);
	492	for(d=0;d<USB_MAX_DEVICE;d++) {
	493	dev=usb_get_dev_index(d);
	494	if (dev==NULL)
	495	break;
	496	if (dev->devnum==i)
	497	break;
	498	}
	499	if (dev==NULL) {
500	printf("* NO Device avaiable *\n");
501	return 0;
502	}
503	else {
504	usb_display_desc(dev);
505	usb_display_config(dev);
506	}
507	}
508	return 0;
509	}
510	#ifdef CONFIG_USB_STORAGE
511	if (strncmp(argv[1],"scan",4) == 0) {
512	printf("Scan for storage device:\n");
513	usb_stor_curr_dev=usb_stor_scan(1);
514	if (usb_stor_curr_dev==-1) {
515	printf("No device found. Not initialized?\n");
516	return 1;
517	}
518	return 0;
519	}
520	if (strncmp(argv[1],"part",4) == 0) {
521	int devno, ok;
522	for (ok=0, devno=0; devno<USB_MAX_STOR_DEV; ++devno) {
523	stor_dev=usb_stor_get_dev(devno);
524	if (stor_dev->type!=DEV_TYPE_UNKNOWN) {
525	ok++;
526	if (devno)
527	printf("\n");
528	printf("print_part of %x\n",devno);
529	print_part(stor_dev);
530	}
531	}
532	if (!ok) {
533	printf("\nno USB devices available\n");
534	return 1;
535	}
536	return 0;
537	}
538	if (strcmp(argv[1],"read") == 0) {
539	if (usb_stor_curr_dev<0) {
540	printf("no current device selected\n");
541	return 1;
542	}
543	if (argc==5) {
544	unsigned long addr = simple_strtoul(argv[2], NULL, 16);
545	unsigned long blk = simple_strtoul(argv[3], NULL, 16);
546	unsigned long cnt = simple_strtoul(argv[4], NULL, 16);
547	unsigned long n;
548	printf ("\nUSB read: device %d block # %ld, count %ld ... ",
549	usb_stor_curr_dev, blk, cnt);
550	stor_dev=usb_stor_get_dev(usb_stor_curr_dev);
551	n = stor_dev->block_read(usb_stor_curr_dev, blk, cnt, (ulong *)addr);
552	printf ("%ld blocks read: %s\n",n,(n==cnt) ? "OK" : "ERROR");
553	if (n==cnt)
554	return 0;
555	return 1;
556	}
557	}
558	if (strcmp(argv[1],"dev") == 0) {
559	if (argc==3) {
560	int dev = (int)simple_strtoul(argv[2], NULL, 10);
561	printf ("\nUSB device %d: ", dev);
562	if (dev >= USB_MAX_STOR_DEV) {
563	printf("unknown device\n");
564	return 1;
565	}
566	printf ("\n Device %d: ", dev);
567	stor_dev=usb_stor_get_dev(dev);
568	dev_print(stor_dev);
569	if (stor_dev->type == DEV_TYPE_UNKNOWN) {
570	return 1;
571	}
572	usb_stor_curr_dev = dev;
573	printf("... is now current device\n");
574	return 0;
575	}
576	else {
577	printf ("\nUSB device %d: ", usb_stor_curr_dev);
578	stor_dev=usb_stor_get_dev(usb_stor_curr_dev);
579	dev_print(stor_dev);
580	if (stor_dev->type == DEV_TYPE_UNKNOWN) {
581	return 1;
582	}
583	return 0;
584	}
585	return 0;
586	}
587	#endif /* CONFIG_USB_STORAGE */
588	printf ("Usage:\n%s\n", cmdtp->usage);
589	return 1;
590	}
591
592
593	#endif /* (CONFIG_COMMANDS & CFG_CMD_USB) */
594
595
8bde7f77 WD	596	#if (CONFIG_COMMANDS & CFG_CMD_USB)
	597
	598	#ifdef CONFIG_USB_STORAGE
0d498393 WD	599	U_BOOT_CMD(
0d498393 WD	600	usb, 5, 1, do_usb,
8bde7f77 WD	601	"usb - USB sub-system\n",
8bde7f77 WD	602	"reset - reset (rescan) USB controller\n"
5cf91d6b WD	603	"usb stop [f] - stop USB [f]=force stop\n"
	604	"usb tree - show USB device tree\n"
	605	"usb info [dev] - show available USB devices\n"
	606	"usb scan - (re-)scan USB bus for storage devices\n"
	607	"usb device [dev] - show or set current USB storage device\n"
	608	"usb part [dev] - print partition table of one or all USB storage devices\n"
	609	"usb read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
	610	" to memory address `addr'\n"
8bde7f77 WD	611	);
	612
	613
0d498393 WD	614	U_BOOT_CMD(
0d498393 WD	615	usbboot, 3, 1, do_usbboot,
8bde7f77 WD	616	"usbboot - boot from USB device\n",
	617	"loadAddr dev:part\n"
	618	);
	619
	620	#else
0d498393 WD	621	U_BOOT_CMD(
0d498393 WD	622	usb, 5, 1, do_usb,
8bde7f77 WD	623	"usb - USB sub-system\n",
	624	"reset - reset (rescan) USB controller\n"
	625	"usb tree - show USB device tree\n"
	626	"usb info [dev] - show available USB devices\n"
	627	);
	628	#endif
	629	#endif