[people/ms/u-boot.git] / common / cmd_scsi.c

/*
 * (C) Copyright 2001
 * Denis Peter, MPL AG Switzerland
 *
 * 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
 *
 *
 *
 */

/*
 * SCSI support.
 */
#include <common.h>
#include <command.h>
#include <asm/processor.h>
#include <scsi.h>
#include <image.h>
#include <pci.h>

#ifdef CONFIG_SCSI_SYM53C8XX
#define SCSI_VEND_ID	0x1000
#ifndef CONFIG_SCSI_DEV_ID
#define SCSI_DEV_ID		0x0001
#else
#define SCSI_DEV_ID		CONFIG_SCSI_DEV_ID
#endif
#elif defined CONFIG_SATA_ULI5288

#define SCSI_VEND_ID 0x10b9
#define SCSI_DEV_ID  0x5288

#else
#error no scsi device defined
#endif


static ccb tempccb;	/* temporary scsi command buffer */

static unsigned char tempbuff[512]; /* temporary data buffer */

static int scsi_max_devs; /* number of highest available scsi device */

static int scsi_curr_dev; /* current device */

static block_dev_desc_t scsi_dev_desc[CONFIG_SYS_SCSI_MAX_DEVICE];

/********************************************************************************
 *  forward declerations of some Setup Routines
 */
void scsi_setup_test_unit_ready(ccb * pccb);
void scsi_setup_read_capacity(ccb * pccb);
void scsi_setup_read6(ccb * pccb, unsigned long start, unsigned short blocks);
void scsi_setup_read_ext(ccb * pccb, unsigned long start, unsigned short blocks);
void scsi_setup_inquiry(ccb * pccb);
void scsi_ident_cpy (unsigned char *dest, unsigned char *src, unsigned int len);


ulong scsi_read(int device, ulong blknr, ulong blkcnt, void *buffer);


/*********************************************************************************
 * (re)-scan the scsi bus and reports scsi device info
 * to the user if mode = 1
 */
void scsi_scan(int mode)
{
	unsigned char i,perq,modi,lun;
	unsigned long capacity,blksz;
	ccb* pccb=(ccb *)&tempccb;

	if(mode==1) {
		printf("scanning bus for devices...\n");
	}
	for(i=0;i<CONFIG_SYS_SCSI_MAX_DEVICE;i++) {
		scsi_dev_desc[i].target=0xff;
		scsi_dev_desc[i].lun=0xff;
		scsi_dev_desc[i].lba=0;
		scsi_dev_desc[i].blksz=0;
		scsi_dev_desc[i].type=DEV_TYPE_UNKNOWN;
		scsi_dev_desc[i].vendor[0]=0;
		scsi_dev_desc[i].product[0]=0;
		scsi_dev_desc[i].revision[0]=0;
		scsi_dev_desc[i].removable=FALSE;
		scsi_dev_desc[i].if_type=IF_TYPE_SCSI;
		scsi_dev_desc[i].dev=i;
		scsi_dev_desc[i].part_type=PART_TYPE_UNKNOWN;
		scsi_dev_desc[i].block_read=scsi_read;
	}
	scsi_max_devs=0;
	for(i=0;i<CONFIG_SYS_SCSI_MAX_SCSI_ID;i++) {
		pccb->target=i;
		for(lun=0;lun<CONFIG_SYS_SCSI_MAX_LUN;lun++) {
			pccb->lun=lun;
			pccb->pdata=(unsigned char *)&tempbuff;
			pccb->datalen=512;
			scsi_setup_inquiry(pccb);
			if(scsi_exec(pccb)!=TRUE) {
				if(pccb->contr_stat==SCSI_SEL_TIME_OUT) {
					debug ("Selection timeout ID %d\n",pccb->target);
					continue; /* selection timeout => assuming no device present */
				}
				scsi_print_error(pccb);
				continue;
			}
			perq=tempbuff[0];
			modi=tempbuff[1];
			if((perq & 0x1f)==0x1f) {
				continue; /* skip unknown devices */
			}
			if((modi&0x80)==0x80) /* drive is removable */
				scsi_dev_desc[scsi_max_devs].removable=TRUE;
			/* get info for this device */
			scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].vendor[0],
				       &tempbuff[8], 8);
			scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].product[0],
				       &tempbuff[16], 16);
			scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].revision[0],
				       &tempbuff[32], 4);
			scsi_dev_desc[scsi_max_devs].target=pccb->target;
			scsi_dev_desc[scsi_max_devs].lun=pccb->lun;

			pccb->datalen=0;
			scsi_setup_test_unit_ready(pccb);
			if(scsi_exec(pccb)!=TRUE) {
				if(scsi_dev_desc[scsi_max_devs].removable==TRUE) {
					scsi_dev_desc[scsi_max_devs].type=perq;
					goto removable;
				}
				scsi_print_error(pccb);
				continue;
			}
			pccb->datalen=8;
			scsi_setup_read_capacity(pccb);
			if(scsi_exec(pccb)!=TRUE) {
				scsi_print_error(pccb);
				continue;
			}
			capacity=((unsigned long)tempbuff[0]<<24)|((unsigned long)tempbuff[1]<<16)|
					((unsigned long)tempbuff[2]<<8)|((unsigned long)tempbuff[3]);
			blksz=((unsigned long)tempbuff[4]<<24)|((unsigned long)tempbuff[5]<<16)|
				((unsigned long)tempbuff[6]<<8)|((unsigned long)tempbuff[7]);
			scsi_dev_desc[scsi_max_devs].lba=capacity;
			scsi_dev_desc[scsi_max_devs].blksz=blksz;
			scsi_dev_desc[scsi_max_devs].type=perq;
			init_part(&scsi_dev_desc[scsi_max_devs]);
removable:
			if(mode==1) {
				printf ("  Device %d: ", scsi_max_devs);
				dev_print(&scsi_dev_desc[scsi_max_devs]);
			} /* if mode */
			scsi_max_devs++;
		} /* next LUN */
	}
	if(scsi_max_devs>0)
		scsi_curr_dev=0;
	else
		scsi_curr_dev = -1;
}


void scsi_init(void)
{
	int busdevfunc;

	busdevfunc=pci_find_device(SCSI_VEND_ID,SCSI_DEV_ID,0); /* get PCI Device ID */
	if(busdevfunc==-1) {
		printf("Error SCSI Controller (%04X,%04X) not found\n",SCSI_VEND_ID,SCSI_DEV_ID);
		return;
	}
#ifdef DEBUG
	else {
		printf("SCSI Controller (%04X,%04X) found (%d:%d:%d)\n",SCSI_VEND_ID,SCSI_DEV_ID,(busdevfunc>>16)&0xFF,(busdevfunc>>11)&0x1F,(busdevfunc>>8)&0x7);
	}
#endif
	scsi_low_level_init(busdevfunc);
	scsi_scan(1);
}

block_dev_desc_t * scsi_get_dev(int dev)
{
	return (dev < CONFIG_SYS_SCSI_MAX_DEVICE) ? &scsi_dev_desc[dev] : NULL;
}


/******************************************************************************
 * scsi boot command intepreter. Derived from diskboot
 */
int do_scsiboot (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	char *boot_device = NULL;
	char *ep;
	int dev, part = 0;
	ulong addr, cnt;
	disk_partition_t info;
	image_header_t *hdr;
	int rcode = 0;
#if defined(CONFIG_FIT)
	const void *fit_hdr = NULL;
#endif

	switch (argc) {
	case 1:
		addr = CONFIG_SYS_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:
		return cmd_usage(cmdtp);
	}

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

	dev = simple_strtoul(boot_device, &ep, 16);
	printf("booting from dev %d\n",dev);
	if (scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
		printf ("\n** Device %d not available\n", dev);
		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 (&scsi_dev_desc[dev], part, &info)) {
		printf("error reading partinfo\n");
		return 1;
	}
	if ((strncmp((char *)(info.type), BOOT_PART_TYPE, sizeof(info.type)) != 0) &&
	    (strncmp((char *)(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 SCSI 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 (scsi_read (dev, info.start, 1, (ulong *)addr) != 1) {
		printf ("** Read error on %d:%d\n", dev, part);
		return 1;
	}

	switch (genimg_get_format ((void *)addr)) {
	case IMAGE_FORMAT_LEGACY:
		hdr = (image_header_t *)addr;

		if (!image_check_hcrc (hdr)) {
			puts ("\n** Bad Header Checksum **\n");
			return 1;
		}

		image_print_contents (hdr);
		cnt = image_get_image_size (hdr);
		break;
#if defined(CONFIG_FIT)
	case IMAGE_FORMAT_FIT:
		fit_hdr = (const void *)addr;
		puts ("Fit image detected...\n");

		cnt = fit_get_size (fit_hdr);
		break;
#endif
	default:
		puts ("** Unknown image type\n");
		return 1;
	}

	cnt += info.blksz - 1;
	cnt /= info.blksz;
	cnt -= 1;

	if (scsi_read (dev, info.start+1, cnt,
		      (ulong *)(addr+info.blksz)) != cnt) {
		printf ("** Read error on %d:%d\n", dev, part);
		return 1;
	}

#if defined(CONFIG_FIT)
	/* This cannot be done earlier, we need complete FIT image in RAM first */
	if (genimg_get_format ((void *)addr) == IMAGE_FORMAT_FIT) {
		if (!fit_check_format (fit_hdr)) {
			puts ("** Bad FIT image format\n");
			return 1;
		}
		fit_print_contents (fit_hdr);
	}
#endif

	/* 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;
}

/*********************************************************************************
 * scsi command intepreter
 */
int do_scsi (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	switch (argc) {
    case 0:
    case 1:	return cmd_usage(cmdtp);

    case 2:
			if (strncmp(argv[1],"res",3) == 0) {
				printf("\nReset SCSI\n");
				scsi_bus_reset();
				scsi_scan(1);
				return 0;
			}
			if (strncmp(argv[1],"inf",3) == 0) {
				int i;
				for (i=0; i<CONFIG_SYS_SCSI_MAX_DEVICE; ++i) {
					if(scsi_dev_desc[i].type==DEV_TYPE_UNKNOWN)
						continue; /* list only known devices */
					printf ("SCSI dev. %d:  ", i);
					dev_print(&scsi_dev_desc[i]);
				}
				return 0;
			}
			if (strncmp(argv[1],"dev",3) == 0) {
				if ((scsi_curr_dev < 0) || (scsi_curr_dev >= CONFIG_SYS_SCSI_MAX_DEVICE)) {
					printf("\nno SCSI devices available\n");
					return 1;
				}
				printf ("\n    Device %d: ", scsi_curr_dev);
				dev_print(&scsi_dev_desc[scsi_curr_dev]);
				return 0;
			}
			if (strncmp(argv[1],"scan",4) == 0) {
				scsi_scan(1);
				return 0;
			}
			if (strncmp(argv[1],"part",4) == 0) {
				int dev, ok;
				for (ok=0, dev=0; dev<CONFIG_SYS_SCSI_MAX_DEVICE; ++dev) {
					if (scsi_dev_desc[dev].type!=DEV_TYPE_UNKNOWN) {
						ok++;
						if (dev)
							printf("\n");
						debug ("print_part of %x\n",dev);
							print_part(&scsi_dev_desc[dev]);
					}
				}
				if (!ok)
					printf("\nno SCSI devices available\n");
				return 1;
			}
			return cmd_usage(cmdtp);
	case 3:
			if (strncmp(argv[1],"dev",3) == 0) {
				int dev = (int)simple_strtoul(argv[2], NULL, 10);
				printf ("\nSCSI device %d: ", dev);
				if (dev >= CONFIG_SYS_SCSI_MAX_DEVICE) {
					printf("unknown device\n");
					return 1;
				}
				printf ("\n    Device %d: ", dev);
				dev_print(&scsi_dev_desc[dev]);
				if(scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
					return 1;
				}
				scsi_curr_dev = dev;
				printf("... is now current device\n");
				return 0;
			}
			if (strncmp(argv[1],"part",4) == 0) {
				int dev = (int)simple_strtoul(argv[2], NULL, 10);
				if(scsi_dev_desc[dev].type != DEV_TYPE_UNKNOWN) {
					print_part(&scsi_dev_desc[dev]);
				}
				else {
					printf ("\nSCSI device %d not available\n", dev);
				}
				return 1;
			}
			return cmd_usage(cmdtp);
    default:
			/* at least 4 args */
			if (strcmp(argv[1],"read") == 0) {
				ulong addr = simple_strtoul(argv[2], NULL, 16);
				ulong blk  = simple_strtoul(argv[3], NULL, 16);
				ulong cnt  = simple_strtoul(argv[4], NULL, 16);
				ulong n;
				printf ("\nSCSI read: device %d block # %ld, count %ld ... ",
						scsi_curr_dev, blk, cnt);
				n = scsi_read(scsi_curr_dev, blk, cnt, (ulong *)addr);
				printf ("%ld blocks read: %s\n",n,(n==cnt) ? "OK" : "ERROR");
				return 0;
			}
	} /* switch */
	return cmd_usage(cmdtp);
}

/****************************************************************************************
 * scsi_read
 */

#define SCSI_MAX_READ_BLK 0xFFFF /* almost the maximum amount of the scsi_ext command.. */

ulong scsi_read(int device, ulong blknr, ulong blkcnt, void *buffer)
{
	ulong start,blks, buf_addr;
	unsigned short smallblks;
	ccb* pccb=(ccb *)&tempccb;
	device&=0xff;
	/* Setup  device
	 */
	pccb->target=scsi_dev_desc[device].target;
	pccb->lun=scsi_dev_desc[device].lun;
	buf_addr=(unsigned long)buffer;
	start=blknr;
	blks=blkcnt;
	debug ("\nscsi_read: dev %d startblk %lx, blccnt %lx buffer %lx\n",device,start,blks,(unsigned long)buffer);
	do {
		pccb->pdata=(unsigned char *)buf_addr;
		if(blks>SCSI_MAX_READ_BLK) {
			pccb->datalen=scsi_dev_desc[device].blksz * SCSI_MAX_READ_BLK;
			smallblks=SCSI_MAX_READ_BLK;
			scsi_setup_read_ext(pccb,start,smallblks);
			start+=SCSI_MAX_READ_BLK;
			blks-=SCSI_MAX_READ_BLK;
		}
		else {
			pccb->datalen=scsi_dev_desc[device].blksz * blks;
			smallblks=(unsigned short) blks;
			scsi_setup_read_ext(pccb,start,smallblks);
			start+=blks;
			blks=0;
		}
		debug ("scsi_read_ext: startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
		if(scsi_exec(pccb)!=TRUE) {
			scsi_print_error(pccb);
			blkcnt-=blks;
			break;
		}
		buf_addr+=pccb->datalen;
	} while(blks!=0);
	debug ("scsi_read_ext: end startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
	return(blkcnt);
}

/* copy src to dest, skipping leading and trailing blanks
 * and null terminate the string
 */
void scsi_ident_cpy (unsigned char *dest, unsigned char *src, unsigned int len)
{
	int start,end;

	start=0;
	while(start<len) {
		if(src[start]!=' ')
			break;
		start++;
	}
	end=len-1;
	while(end>start) {
		if(src[end]!=' ')
			break;
		end--;
	}
	for( ; start<=end; start++) {
		*dest++=src[start];
	}
	*dest='\0';
}


/* Trim trailing blanks, and NUL-terminate string
 */
void scsi_trim_trail (unsigned char *str, unsigned int len)
{
	unsigned char *p = str + len - 1;

	while (len-- > 0) {
		*p-- = '\0';
		if (*p != ' ') {
			return;
		}
	}
}


/************************************************************************************
 * Some setup (fill-in) routines
 */
void scsi_setup_test_unit_ready(ccb * pccb)
{
	pccb->cmd[0]=SCSI_TST_U_RDY;
	pccb->cmd[1]=pccb->lun<<5;
	pccb->cmd[2]=0;
	pccb->cmd[3]=0;
	pccb->cmd[4]=0;
	pccb->cmd[5]=0;
	pccb->cmdlen=6;
	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
}

void scsi_setup_read_capacity(ccb * pccb)
{
	pccb->cmd[0]=SCSI_RD_CAPAC;
	pccb->cmd[1]=pccb->lun<<5;
	pccb->cmd[2]=0;
	pccb->cmd[3]=0;
	pccb->cmd[4]=0;
	pccb->cmd[5]=0;
	pccb->cmd[6]=0;
	pccb->cmd[7]=0;
	pccb->cmd[8]=0;
	pccb->cmd[9]=0;
	pccb->cmdlen=10;
	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */

}

void scsi_setup_read_ext(ccb * pccb, unsigned long start, unsigned short blocks)
{
	pccb->cmd[0]=SCSI_READ10;
	pccb->cmd[1]=pccb->lun<<5;
	pccb->cmd[2]=((unsigned char) (start>>24))&0xff;
	pccb->cmd[3]=((unsigned char) (start>>16))&0xff;
	pccb->cmd[4]=((unsigned char) (start>>8))&0xff;
	pccb->cmd[5]=((unsigned char) (start))&0xff;
	pccb->cmd[6]=0;
	pccb->cmd[7]=((unsigned char) (blocks>>8))&0xff;
	pccb->cmd[8]=(unsigned char) blocks & 0xff;
	pccb->cmd[6]=0;
	pccb->cmdlen=10;
	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	debug ("scsi_setup_read_ext: cmd: %02X %02X startblk %02X%02X%02X%02X blccnt %02X%02X\n",
		pccb->cmd[0],pccb->cmd[1],
		pccb->cmd[2],pccb->cmd[3],pccb->cmd[4],pccb->cmd[5],
		pccb->cmd[7],pccb->cmd[8]);
}

void scsi_setup_read6(ccb * pccb, unsigned long start, unsigned short blocks)
{
	pccb->cmd[0]=SCSI_READ6;
	pccb->cmd[1]=pccb->lun<<5 | (((unsigned char)(start>>16))&0x1f);
	pccb->cmd[2]=((unsigned char) (start>>8))&0xff;
	pccb->cmd[3]=((unsigned char) (start))&0xff;
	pccb->cmd[4]=(unsigned char) blocks & 0xff;
	pccb->cmd[5]=0;
	pccb->cmdlen=6;
	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	debug ("scsi_setup_read6: cmd: %02X %02X startblk %02X%02X blccnt %02X\n",
		pccb->cmd[0],pccb->cmd[1],
		pccb->cmd[2],pccb->cmd[3],pccb->cmd[4]);
}


void scsi_setup_inquiry(ccb * pccb)
{
	pccb->cmd[0]=SCSI_INQUIRY;
	pccb->cmd[1]=pccb->lun<<5;
	pccb->cmd[2]=0;
	pccb->cmd[3]=0;
	if(pccb->datalen>255)
		pccb->cmd[4]=255;
	else
		pccb->cmd[4]=(unsigned char)pccb->datalen;
	pccb->cmd[5]=0;
	pccb->cmdlen=6;
	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
}


U_BOOT_CMD(
	scsi, 5, 1, do_scsi,
	"SCSI sub-system",
	"reset - reset SCSI controller\n"
	"scsi info  - show available SCSI devices\n"
	"scsi scan  - (re-)scan SCSI bus\n"
	"scsi device [dev] - show or set current device\n"
	"scsi part [dev] - print partition table of one or all SCSI devices\n"
	"scsi read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
	"     to memory address `addr'"
);

U_BOOT_CMD(
	scsiboot, 3, 1, do_scsiboot,
	"boot from SCSI device",
	"loadAddr dev:part"
);
Commit	Line	Data
e887afc9 WD	1	/*
	2	* (C) Copyright 2001
	3	* Denis Peter, MPL AG Switzerland
	4	*
	5	* See file CREDITS for list of people who contributed to this
	6	* project.
	7	*
	8	* This program is free software; you can redistribute it and/or
	9	* modify it under the terms of the GNU General Public License as
	10	* published by the Free Software Foundation; either version 2 of
	11	* the License, or (at your option) any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License 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
	20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	21	* MA 02111-1307 USA
	22	*
	23	*
	24	*
	25	*/
	26
	27	/*
	28	* SCSI support.
	29	*/
e887afc9 WD	30	#include <common.h>
e887afc9 WD	31	#include <command.h>
e887afc9 WD	32	#include <asm/processor.h>
	33	#include <scsi.h>
	34	#include <image.h>
e887afc9 WD	35	#include <pci.h>
e887afc9 WD	36
e887afc9 WD	37	#ifdef CONFIG_SCSI_SYM53C8XX
	38	#define SCSI_VEND_ID 0x1000
	39	#ifndef CONFIG_SCSI_DEV_ID
	40	#define SCSI_DEV_ID 0x0001
	41	#else
	42	#define SCSI_DEV_ID CONFIG_SCSI_DEV_ID
	43	#endif
4782ac80 JZ	44	#elif defined CONFIG_SATA_ULI5288
	45
	46	#define SCSI_VEND_ID 0x10b9
	47	#define SCSI_DEV_ID 0x5288
	48
e887afc9	49	#else
4782ac80	50	#error no scsi device defined
e887afc9 WD	51	#endif
	52
	53
	54	static ccb tempccb; /* temporary scsi command buffer */
	55
	56	static unsigned char tempbuff[512]; /* temporary data buffer */
	57
	58	static int scsi_max_devs; /* number of highest available scsi device */
	59
	60	static int scsi_curr_dev; /* current device */
	61
6d0f6bcf	62	static block_dev_desc_t scsi_dev_desc[CONFIG_SYS_SCSI_MAX_DEVICE];
e887afc9 WD	63
	64	/********************************************************************************
	65	* forward declerations of some Setup Routines
	66	*/
	67	void scsi_setup_test_unit_ready(ccb * pccb);
	68	void scsi_setup_read_capacity(ccb * pccb);
	69	void scsi_setup_read6(ccb * pccb, unsigned long start, unsigned short blocks);
	70	void scsi_setup_read_ext(ccb * pccb, unsigned long start, unsigned short blocks);
	71	void scsi_setup_inquiry(ccb * pccb);
	72	void scsi_ident_cpy (unsigned char dest, unsigned char src, unsigned int len);
	73
	74
eb867a76	75	ulong scsi_read(int device, ulong blknr, ulong blkcnt, void *buffer);
e887afc9 WD	76
	77
	78	/*********************************************************************************
	79	* (re)-scan the scsi bus and reports scsi device info
	80	* to the user if mode = 1
	81	*/
	82	void scsi_scan(int mode)
	83	{
	84	unsigned char i,perq,modi,lun;
	85	unsigned long capacity,blksz;
	86	ccb* pccb=(ccb *)&tempccb;
	87
	88	if(mode==1) {
	89	printf("scanning bus for devices...\n");
	90	}
6d0f6bcf	91	for(i=0;i<CONFIG_SYS_SCSI_MAX_DEVICE;i++) {
e887afc9 WD	92	scsi_dev_desc[i].target=0xff;
	93	scsi_dev_desc[i].lun=0xff;
	94	scsi_dev_desc[i].lba=0;
	95	scsi_dev_desc[i].blksz=0;
	96	scsi_dev_desc[i].type=DEV_TYPE_UNKNOWN;
	97	scsi_dev_desc[i].vendor[0]=0;
	98	scsi_dev_desc[i].product[0]=0;
	99	scsi_dev_desc[i].revision[0]=0;
	100	scsi_dev_desc[i].removable=FALSE;
	101	scsi_dev_desc[i].if_type=IF_TYPE_SCSI;
	102	scsi_dev_desc[i].dev=i;
	103	scsi_dev_desc[i].part_type=PART_TYPE_UNKNOWN;
	104	scsi_dev_desc[i].block_read=scsi_read;
	105	}
	106	scsi_max_devs=0;
6d0f6bcf	107	for(i=0;i<CONFIG_SYS_SCSI_MAX_SCSI_ID;i++) {
e887afc9	108	pccb->target=i;
6d0f6bcf	109	for(lun=0;lun<CONFIG_SYS_SCSI_MAX_LUN;lun++) {
e887afc9 WD	110	pccb->lun=lun;
	111	pccb->pdata=(unsigned char *)&tempbuff;
	112	pccb->datalen=512;
	113	scsi_setup_inquiry(pccb);
	114	if(scsi_exec(pccb)!=TRUE) {
	115	if(pccb->contr_stat==SCSI_SEL_TIME_OUT) {
1a344f29	116	debug ("Selection timeout ID %d\n",pccb->target);
e887afc9 WD	117	continue; /* selection timeout => assuming no device present */
	118	}
	119	scsi_print_error(pccb);
	120	continue;
	121	}
	122	perq=tempbuff[0];
	123	modi=tempbuff[1];
	124	if((perq & 0x1f)==0x1f) {
	125	continue; /* skip unknown devices */
	126	}
	127	if((modi&0x80)==0x80) /* drive is removable */
	128	scsi_dev_desc[scsi_max_devs].removable=TRUE;
	129	/* get info for this device */
2309c130 SR	130	scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].vendor[0],
	131	&tempbuff[8], 8);
	132	scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].product[0],
	133	&tempbuff[16], 16);
	134	scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].revision[0],
	135	&tempbuff[32], 4);
e887afc9 WD	136	scsi_dev_desc[scsi_max_devs].target=pccb->target;
	137	scsi_dev_desc[scsi_max_devs].lun=pccb->lun;
	138
	139	pccb->datalen=0;
	140	scsi_setup_test_unit_ready(pccb);
	141	if(scsi_exec(pccb)!=TRUE) {
	142	if(scsi_dev_desc[scsi_max_devs].removable==TRUE) {
	143	scsi_dev_desc[scsi_max_devs].type=perq;
	144	goto removable;
	145	}
	146	scsi_print_error(pccb);
	147	continue;
	148	}
	149	pccb->datalen=8;
	150	scsi_setup_read_capacity(pccb);
	151	if(scsi_exec(pccb)!=TRUE) {
	152	scsi_print_error(pccb);
	153	continue;
	154	}
	155	capacity=((unsigned long)tempbuff[0]<<24)\|((unsigned long)tempbuff[1]<<16)\|
	156	((unsigned long)tempbuff[2]<<8)\|((unsigned long)tempbuff[3]);
	157	blksz=((unsigned long)tempbuff[4]<<24)\|((unsigned long)tempbuff[5]<<16)\|
	158	((unsigned long)tempbuff[6]<<8)\|((unsigned long)tempbuff[7]);
	159	scsi_dev_desc[scsi_max_devs].lba=capacity;
	160	scsi_dev_desc[scsi_max_devs].blksz=blksz;
	161	scsi_dev_desc[scsi_max_devs].type=perq;
	162	init_part(&scsi_dev_desc[scsi_max_devs]);
	163	removable:
	164	if(mode==1) {
	165	printf (" Device %d: ", scsi_max_devs);
	166	dev_print(&scsi_dev_desc[scsi_max_devs]);
	167	} /* if mode */
	168	scsi_max_devs++;
	169	} /* next LUN */
	170	}
	171	if(scsi_max_devs>0)
	172	scsi_curr_dev=0;
	173	else
d0ff51ba	174	scsi_curr_dev = -1;
e887afc9 WD	175	}
	176
	177
e887afc9 WD	178	void scsi_init(void)
	179	{
	180	int busdevfunc;
	181
	182	busdevfunc=pci_find_device(SCSI_VEND_ID,SCSI_DEV_ID,0); /* get PCI Device ID */
	183	if(busdevfunc==-1) {
	184	printf("Error SCSI Controller (%04X,%04X) not found\n",SCSI_VEND_ID,SCSI_DEV_ID);
	185	return;
	186	}
	187	#ifdef DEBUG
	188	else {
	189	printf("SCSI Controller (%04X,%04X) found (%d:%d:%d)\n",SCSI_VEND_ID,SCSI_DEV_ID,(busdevfunc>>16)&0xFF,(busdevfunc>>11)&0x1F,(busdevfunc>>8)&0x7);
	190	}
	191	#endif
	192	scsi_low_level_init(busdevfunc);
	193	scsi_scan(1);
	194	}
	195
	196	block_dev_desc_t * scsi_get_dev(int dev)
	197	{
6d0f6bcf	198	return (dev < CONFIG_SYS_SCSI_MAX_DEVICE) ? &scsi_dev_desc[dev] : NULL;
e887afc9 WD	199	}
	200
	201
e887afc9 WD	202	/******************************************************************************
	203	* scsi boot command intepreter. Derived from diskboot
	204	*/
54841ab5	205	int do_scsiboot (cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
e887afc9 WD	206	{
	207	char *boot_device = NULL;
	208	char *ep;
	209	int dev, part = 0;
b97a2a0a	210	ulong addr, cnt;
e887afc9 WD	211	disk_partition_t info;
	212	image_header_t *hdr;
	213	int rcode = 0;
09475f75	214	#if defined(CONFIG_FIT)
3bab76a2	215	const void *fit_hdr = NULL;
09475f75	216	#endif
e887afc9 WD	217
	218	switch (argc) {
	219	case 1:
6d0f6bcf	220	addr = CONFIG_SYS_LOAD_ADDR;
e887afc9 WD	221	boot_device = getenv ("bootdevice");
	222	break;
	223	case 2:
	224	addr = simple_strtoul(argv[1], NULL, 16);
	225	boot_device = getenv ("bootdevice");
	226	break;
	227	case 3:
	228	addr = simple_strtoul(argv[1], NULL, 16);
	229	boot_device = argv[2];
	230	break;
	231	default:
47e26b1b	232	return cmd_usage(cmdtp);
e887afc9 WD	233	}
	234
	235	if (!boot_device) {
	236	puts ("\n No boot device \n");
	237	return 1;
	238	}
	239
	240	dev = simple_strtoul(boot_device, &ep, 16);
	241	printf("booting from dev %d\n",dev);
	242	if (scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
	243	printf ("\n** Device %d not available\n", dev);
	244	return 1;
	245	}
	246
	247	if (*ep) {
	248	if (*ep != ':') {
	249	puts ("\n Invalid boot device, use `dev[:part]' \n");
	250	return 1;
	251	}
	252	part = simple_strtoul(++ep, NULL, 16);
	253	}
7882751c	254	if (get_partition_info (&scsi_dev_desc[dev], part, &info)) {
e887afc9 WD	255	printf("error reading partinfo\n");
	256	return 1;
	257	}
77ddac94 WD	258	if ((strncmp((char *)(info.type), BOOT_PART_TYPE, sizeof(info.type)) != 0) &&
77ddac94 WD	259	(strncmp((char *)(info.type), BOOT_PART_COMP, sizeof(info.type)) != 0)) {
e887afc9 WD	260	printf ("\n** Invalid partition type \"%.32s\""
	261	" (expect \"" BOOT_PART_TYPE "\")\n",
	262	info.type);
	263	return 1;
	264	}
	265
	266	printf ("\nLoading from SCSI device %d, partition %d: "
	267	"Name: %.32s Type: %.32s\n",
	268	dev, part, info.name, info.type);
	269
1a344f29	270	debug ("First Block: %ld, # of blocks: %ld, Block Size: %ld\n",
e887afc9 WD	271	info.start, info.size, info.blksz);
	272
	273	if (scsi_read (dev, info.start, 1, (ulong *)addr) != 1) {
	274	printf ("** Read error on %d:%d\n", dev, part);
	275	return 1;
	276	}
	277
9a4daad0	278	switch (genimg_get_format ((void *)addr)) {
d5934ad7 MB	279	case IMAGE_FORMAT_LEGACY:
d5934ad7 MB	280	hdr = (image_header_t *)addr;
e887afc9	281
d5934ad7 MB	282	if (!image_check_hcrc (hdr)) {
	283	puts ("\n Bad Header Checksum \n");
	284	return 1;
	285	}
	286
	287	image_print_contents (hdr);
	288	cnt = image_get_image_size (hdr);
	289	break;
	290	#if defined(CONFIG_FIT)
	291	case IMAGE_FORMAT_FIT:
09475f75	292	fit_hdr = (const void *)addr;
09475f75 MB	293	puts ("Fit image detected...\n");
	294
	295	cnt = fit_get_size (fit_hdr);
	296	break;
d5934ad7 MB	297	#endif
	298	default:
	299	puts ("** Unknown image type\n");
1a344f29 WD	300	return 1;
	301	}
	302
1a344f29 WD	303	cnt += info.blksz - 1;
	304	cnt /= info.blksz;
	305	cnt -= 1;
	306
e887afc9 WD	307	if (scsi_read (dev, info.start+1, cnt,
	308	(ulong *)(addr+info.blksz)) != cnt) {
	309	printf ("** Read error on %d:%d\n", dev, part);
	310	return 1;
	311	}
09475f75 MB	312
	313	#if defined(CONFIG_FIT)
	314	/* This cannot be done earlier, we need complete FIT image in RAM first */
3bab76a2 MB	315	if (genimg_get_format ((void *)addr) == IMAGE_FORMAT_FIT) {
	316	if (!fit_check_format (fit_hdr)) {
	317	puts ("** Bad FIT image format\n");
	318	return 1;
	319	}
	320	fit_print_contents (fit_hdr);
	321	}
09475f75 MB	322	#endif
09475f75 MB	323
e887afc9 WD	324	/* Loading ok, update default load address */
	325	load_addr = addr;
	326
	327	flush_cache (addr, (cnt+1)*info.blksz);
	328
	329	/* Check if we should attempt an auto-start */
	330	if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
	331	char *local_args[2];
	332	extern int do_bootm (cmd_tbl_t , int, int, char []);
	333	local_args[0] = argv[0];
	334	local_args[1] = NULL;
	335	printf ("Automatic boot of image at addr 0x%08lX ...\n", addr);
	336	rcode = do_bootm (cmdtp, 0, 1, local_args);
	337	}
	338	return rcode;
	339	}
	340
	341	/*********************************************************************************
	342	* scsi command intepreter
	343	*/
54841ab5	344	int do_scsi (cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
e887afc9 WD	345	{
	346	switch (argc) {
	347	case 0:
47e26b1b WD	348	case 1: return cmd_usage(cmdtp);
47e26b1b WD	349
e887afc9 WD	350	case 2:
	351	if (strncmp(argv[1],"res",3) == 0) {
	352	printf("\nReset SCSI\n");
	353	scsi_bus_reset();
	354	scsi_scan(1);
	355	return 0;
	356	}
	357	if (strncmp(argv[1],"inf",3) == 0) {
	358	int i;
6d0f6bcf	359	for (i=0; i<CONFIG_SYS_SCSI_MAX_DEVICE; ++i) {
e887afc9 WD	360	if(scsi_dev_desc[i].type==DEV_TYPE_UNKNOWN)
	361	continue; /* list only known devices */
	362	printf ("SCSI dev. %d: ", i);
	363	dev_print(&scsi_dev_desc[i]);
	364	}
	365	return 0;
	366	}
	367	if (strncmp(argv[1],"dev",3) == 0) {
6d0f6bcf	368	if ((scsi_curr_dev < 0) \|\| (scsi_curr_dev >= CONFIG_SYS_SCSI_MAX_DEVICE)) {
e887afc9 WD	369	printf("\nno SCSI devices available\n");
	370	return 1;
	371	}
	372	printf ("\n Device %d: ", scsi_curr_dev);
	373	dev_print(&scsi_dev_desc[scsi_curr_dev]);
	374	return 0;
	375	}
	376	if (strncmp(argv[1],"scan",4) == 0) {
	377	scsi_scan(1);
	378	return 0;
	379	}
	380	if (strncmp(argv[1],"part",4) == 0) {
	381	int dev, ok;
6d0f6bcf	382	for (ok=0, dev=0; dev<CONFIG_SYS_SCSI_MAX_DEVICE; ++dev) {
e887afc9 WD	383	if (scsi_dev_desc[dev].type!=DEV_TYPE_UNKNOWN) {
	384	ok++;
	385	if (dev)
	386	printf("\n");
1a344f29	387	debug ("print_part of %x\n",dev);
e887afc9 WD	388	print_part(&scsi_dev_desc[dev]);
	389	}
	390	}
	391	if (!ok)
	392	printf("\nno SCSI devices available\n");
	393	return 1;
	394	}
47e26b1b	395	return cmd_usage(cmdtp);
53677ef1	396	case 3:
e887afc9 WD	397	if (strncmp(argv[1],"dev",3) == 0) {
	398	int dev = (int)simple_strtoul(argv[2], NULL, 10);
	399	printf ("\nSCSI device %d: ", dev);
6d0f6bcf	400	if (dev >= CONFIG_SYS_SCSI_MAX_DEVICE) {
e887afc9 WD	401	printf("unknown device\n");
	402	return 1;
	403	}
	404	printf ("\n Device %d: ", dev);
	405	dev_print(&scsi_dev_desc[dev]);
	406	if(scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
	407	return 1;
	408	}
	409	scsi_curr_dev = dev;
	410	printf("... is now current device\n");
	411	return 0;
	412	}
	413	if (strncmp(argv[1],"part",4) == 0) {
	414	int dev = (int)simple_strtoul(argv[2], NULL, 10);
	415	if(scsi_dev_desc[dev].type != DEV_TYPE_UNKNOWN) {
	416	print_part(&scsi_dev_desc[dev]);
	417	}
	418	else {
	419	printf ("\nSCSI device %d not available\n", dev);
	420	}
	421	return 1;
	422	}
47e26b1b	423	return cmd_usage(cmdtp);
e887afc9 WD	424	default:
	425	/* at least 4 args */
	426	if (strcmp(argv[1],"read") == 0) {
	427	ulong addr = simple_strtoul(argv[2], NULL, 16);
	428	ulong blk = simple_strtoul(argv[3], NULL, 16);
	429	ulong cnt = simple_strtoul(argv[4], NULL, 16);
	430	ulong n;
	431	printf ("\nSCSI read: device %d block # %ld, count %ld ... ",
	432	scsi_curr_dev, blk, cnt);
	433	n = scsi_read(scsi_curr_dev, blk, cnt, (ulong *)addr);
	434	printf ("%ld blocks read: %s\n",n,(n==cnt) ? "OK" : "ERROR");
	435	return 0;
	436	}
	437	} /* switch */
47e26b1b	438	return cmd_usage(cmdtp);
e887afc9 WD	439	}
	440
	441	/****************************************************************************************
	442	* scsi_read
	443	*/
	444
	445	#define SCSI_MAX_READ_BLK 0xFFFF /* almost the maximum amount of the scsi_ext command.. */
	446
eb867a76	447	ulong scsi_read(int device, ulong blknr, ulong blkcnt, void *buffer)
e887afc9 WD	448	{
	449	ulong start,blks, buf_addr;
	450	unsigned short smallblks;
	451	ccb* pccb=(ccb *)&tempccb;
	452	device&=0xff;
	453	/* Setup device
	454	*/
	455	pccb->target=scsi_dev_desc[device].target;
	456	pccb->lun=scsi_dev_desc[device].lun;
	457	buf_addr=(unsigned long)buffer;
	458	start=blknr;
	459	blks=blkcnt;
1a344f29	460	debug ("\nscsi_read: dev %d startblk %lx, blccnt %lx buffer %lx\n",device,start,blks,(unsigned long)buffer);
e887afc9 WD	461	do {
	462	pccb->pdata=(unsigned char *)buf_addr;
	463	if(blks>SCSI_MAX_READ_BLK) {
	464	pccb->datalen=scsi_dev_desc[device].blksz * SCSI_MAX_READ_BLK;
	465	smallblks=SCSI_MAX_READ_BLK;
	466	scsi_setup_read_ext(pccb,start,smallblks);
	467	start+=SCSI_MAX_READ_BLK;
	468	blks-=SCSI_MAX_READ_BLK;
	469	}
	470	else {
	471	pccb->datalen=scsi_dev_desc[device].blksz * blks;
	472	smallblks=(unsigned short) blks;
	473	scsi_setup_read_ext(pccb,start,smallblks);
	474	start+=blks;
	475	blks=0;
	476	}
1a344f29	477	debug ("scsi_read_ext: startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
e887afc9 WD	478	if(scsi_exec(pccb)!=TRUE) {
	479	scsi_print_error(pccb);
	480	blkcnt-=blks;
	481	break;
	482	}
	483	buf_addr+=pccb->datalen;
	484	} while(blks!=0);
1a344f29	485	debug ("scsi_read_ext: end startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
e887afc9 WD	486	return(blkcnt);
	487	}
	488
	489	/* copy src to dest, skipping leading and trailing blanks
	490	* and null terminate the string
	491	*/
	492	void scsi_ident_cpy (unsigned char dest, unsigned char src, unsigned int len)
	493	{
	494	int start,end;
	495
	496	start=0;
	497	while(start<len) {
	498	if(src[start]!=' ')
	499	break;
	500	start++;
	501	}
	502	end=len-1;
	503	while(end>start) {
	504	if(src[end]!=' ')
	505	break;
	506	end--;
	507	}
	508	for( ; start<=end; start++) {
	509	*dest++=src[start];
	510	}
	511	*dest='\0';
	512	}
	513
	514
e887afc9 WD	515	/* Trim trailing blanks, and NUL-terminate string
	516	*/
	517	void scsi_trim_trail (unsigned char *str, unsigned int len)
	518	{
	519	unsigned char *p = str + len - 1;
	520
	521	while (len-- > 0) {
	522	*p-- = '\0';
	523	if (*p != ' ') {
	524	return;
	525	}
	526	}
	527	}
	528
	529
	530	/************************************************************************************
	531	* Some setup (fill-in) routines
	532	*/
	533	void scsi_setup_test_unit_ready(ccb * pccb)
	534	{
	535	pccb->cmd[0]=SCSI_TST_U_RDY;
	536	pccb->cmd[1]=pccb->lun<<5;
	537	pccb->cmd[2]=0;
	538	pccb->cmd[3]=0;
	539	pccb->cmd[4]=0;
	540	pccb->cmd[5]=0;
	541	pccb->cmdlen=6;
	542	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	543	}
	544
	545	void scsi_setup_read_capacity(ccb * pccb)
	546	{
	547	pccb->cmd[0]=SCSI_RD_CAPAC;
	548	pccb->cmd[1]=pccb->lun<<5;
	549	pccb->cmd[2]=0;
	550	pccb->cmd[3]=0;
	551	pccb->cmd[4]=0;
	552	pccb->cmd[5]=0;
	553	pccb->cmd[6]=0;
	554	pccb->cmd[7]=0;
	555	pccb->cmd[8]=0;
	556	pccb->cmd[9]=0;
	557	pccb->cmdlen=10;
	558	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	559
	560	}
	561
	562	void scsi_setup_read_ext(ccb * pccb, unsigned long start, unsigned short blocks)
	563	{
	564	pccb->cmd[0]=SCSI_READ10;
	565	pccb->cmd[1]=pccb->lun<<5;
	566	pccb->cmd[2]=((unsigned char) (start>>24))&0xff;
	567	pccb->cmd[3]=((unsigned char) (start>>16))&0xff;
	568	pccb->cmd[4]=((unsigned char) (start>>8))&0xff;
	569	pccb->cmd[5]=((unsigned char) (start))&0xff;
	570	pccb->cmd[6]=0;
	571	pccb->cmd[7]=((unsigned char) (blocks>>8))&0xff;
	572	pccb->cmd[8]=(unsigned char) blocks & 0xff;
	573	pccb->cmd[6]=0;
	574	pccb->cmdlen=10;
	575	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
1a344f29	576	debug ("scsi_setup_read_ext: cmd: %02X %02X startblk %02X%02X%02X%02X blccnt %02X%02X\n",
e887afc9 WD	577	pccb->cmd[0],pccb->cmd[1],
	578	pccb->cmd[2],pccb->cmd[3],pccb->cmd[4],pccb->cmd[5],
	579	pccb->cmd[7],pccb->cmd[8]);
	580	}
	581
	582	void scsi_setup_read6(ccb * pccb, unsigned long start, unsigned short blocks)
	583	{
	584	pccb->cmd[0]=SCSI_READ6;
	585	pccb->cmd[1]=pccb->lun<<5 \| (((unsigned char)(start>>16))&0x1f);
	586	pccb->cmd[2]=((unsigned char) (start>>8))&0xff;
	587	pccb->cmd[3]=((unsigned char) (start))&0xff;
	588	pccb->cmd[4]=(unsigned char) blocks & 0xff;
	589	pccb->cmd[5]=0;
	590	pccb->cmdlen=6;
	591	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
1a344f29	592	debug ("scsi_setup_read6: cmd: %02X %02X startblk %02X%02X blccnt %02X\n",
e887afc9 WD	593	pccb->cmd[0],pccb->cmd[1],
	594	pccb->cmd[2],pccb->cmd[3],pccb->cmd[4]);
	595	}
	596
	597
	598	void scsi_setup_inquiry(ccb * pccb)
	599	{
	600	pccb->cmd[0]=SCSI_INQUIRY;
	601	pccb->cmd[1]=pccb->lun<<5;
	602	pccb->cmd[2]=0;
	603	pccb->cmd[3]=0;
	604	if(pccb->datalen>255)
	605	pccb->cmd[4]=255;
	606	else
	607	pccb->cmd[4]=(unsigned char)pccb->datalen;
	608	pccb->cmd[5]=0;
	609	pccb->cmdlen=6;
	610	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	611	}
	612
460c322f WD	613
	614	U_BOOT_CMD(
	615	scsi, 5, 1, do_scsi,
2fb2604d	616	"SCSI sub-system",
460c322f WD	617	"reset - reset SCSI controller\n"
	618	"scsi info - show available SCSI devices\n"
	619	"scsi scan - (re-)scan SCSI bus\n"
	620	"scsi device [dev] - show or set current device\n"
	621	"scsi part [dev] - print partition table of one or all SCSI devices\n"
	622	"scsi read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
a89c33db	623	" to memory address `addr'"
460c322f WD	624	);
	625
	626	U_BOOT_CMD(
	627	scsiboot, 3, 1, do_scsiboot,
2fb2604d	628	"boot from SCSI device",
a89c33db	629	"loadAddr dev:part"
460c322f	630	);