[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 *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:
		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);
	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 *argv[])
{
	switch (argc) {
    case 0:
    case 1:	printf ("Usage:\n%s\n", cmdtp->usage);	return 1;
    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;
			}
			printf ("Usage:\n%s\n", cmdtp->usage);
			return 1;
	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;
			}
			printf ("Usage:\n%s\n", cmdtp->usage);
			return 1;
    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 */
	printf ("Usage:\n%s\n", cmdtp->usage);
	return 1;
}

/****************************************************************************************
 * 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    - SCSI sub-system\n",
	"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'\n"
);

U_BOOT_CMD(
	scsiboot, 3, 1, do_scsiboot,
	"scsiboot- boot from SCSI device\n",
	"loadAddr dev:part\n"
);
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	*/
	205	int do_scsiboot (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	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:
	232	printf ("Usage:\n%s\n", cmdtp->usage);
	233	return 1;
	234	}
	235
	236	if (!boot_device) {
	237	puts ("\n No boot device \n");
	238	return 1;
	239	}
	240
	241	dev = simple_strtoul(boot_device, &ep, 16);
	242	printf("booting from dev %d\n",dev);
	243	if (scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
	244	printf ("\n** Device %d not available\n", dev);
	245	return 1;
	246	}
	247
	248	if (*ep) {
	249	if (*ep != ':') {
	250	puts ("\n Invalid boot device, use `dev[:part]' \n");
	251	return 1;
	252	}
	253	part = simple_strtoul(++ep, NULL, 16);
	254	}
7882751c	255	if (get_partition_info (&scsi_dev_desc[dev], part, &info)) {
e887afc9 WD	256	printf("error reading partinfo\n");
	257	return 1;
	258	}
77ddac94 WD	259	if ((strncmp((char *)(info.type), BOOT_PART_TYPE, sizeof(info.type)) != 0) &&
77ddac94 WD	260	(strncmp((char *)(info.type), BOOT_PART_COMP, sizeof(info.type)) != 0)) {
e887afc9 WD	261	printf ("\n** Invalid partition type \"%.32s\""
	262	" (expect \"" BOOT_PART_TYPE "\")\n",
	263	info.type);
	264	return 1;
	265	}
	266
	267	printf ("\nLoading from SCSI device %d, partition %d: "
	268	"Name: %.32s Type: %.32s\n",
	269	dev, part, info.name, info.type);
	270
1a344f29	271	debug ("First Block: %ld, # of blocks: %ld, Block Size: %ld\n",
e887afc9 WD	272	info.start, info.size, info.blksz);
	273
	274	if (scsi_read (dev, info.start, 1, (ulong *)addr) != 1) {
	275	printf ("** Read error on %d:%d\n", dev, part);
	276	return 1;
	277	}
	278
9a4daad0	279	switch (genimg_get_format ((void *)addr)) {
d5934ad7 MB	280	case IMAGE_FORMAT_LEGACY:
d5934ad7 MB	281	hdr = (image_header_t *)addr;
e887afc9	282
d5934ad7 MB	283	if (!image_check_hcrc (hdr)) {
	284	puts ("\n Bad Header Checksum \n");
	285	return 1;
	286	}
	287
	288	image_print_contents (hdr);
	289	cnt = image_get_image_size (hdr);
	290	break;
	291	#if defined(CONFIG_FIT)
	292	case IMAGE_FORMAT_FIT:
09475f75	293	fit_hdr = (const void *)addr;
09475f75 MB	294	puts ("Fit image detected...\n");
	295
	296	cnt = fit_get_size (fit_hdr);
	297	break;
d5934ad7 MB	298	#endif
	299	default:
	300	puts ("** Unknown image type\n");
1a344f29 WD	301	return 1;
	302	}
	303
1a344f29 WD	304	cnt += info.blksz - 1;
	305	cnt /= info.blksz;
	306	cnt -= 1;
	307
e887afc9 WD	308	if (scsi_read (dev, info.start+1, cnt,
	309	(ulong *)(addr+info.blksz)) != cnt) {
	310	printf ("** Read error on %d:%d\n", dev, part);
	311	return 1;
	312	}
09475f75 MB	313
	314	#if defined(CONFIG_FIT)
	315	/* This cannot be done earlier, we need complete FIT image in RAM first */
3bab76a2 MB	316	if (genimg_get_format ((void *)addr) == IMAGE_FORMAT_FIT) {
	317	if (!fit_check_format (fit_hdr)) {
	318	puts ("** Bad FIT image format\n");
	319	return 1;
	320	}
	321	fit_print_contents (fit_hdr);
	322	}
09475f75 MB	323	#endif
09475f75 MB	324
e887afc9 WD	325	/* Loading ok, update default load address */
	326	load_addr = addr;
	327
	328	flush_cache (addr, (cnt+1)*info.blksz);
	329
	330	/* Check if we should attempt an auto-start */
	331	if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
	332	char *local_args[2];
	333	extern int do_bootm (cmd_tbl_t , int, int, char []);
	334	local_args[0] = argv[0];
	335	local_args[1] = NULL;
	336	printf ("Automatic boot of image at addr 0x%08lX ...\n", addr);
	337	rcode = do_bootm (cmdtp, 0, 1, local_args);
	338	}
	339	return rcode;
	340	}
	341
	342	/*********************************************************************************
	343	* scsi command intepreter
	344	*/
	345	int do_scsi (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	346	{
	347	switch (argc) {
	348	case 0:
	349	case 1: printf ("Usage:\n%s\n", cmdtp->usage); return 1;
	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	}
	395	printf ("Usage:\n%s\n", cmdtp->usage);
	396	return 1;
53677ef1	397	case 3:
e887afc9 WD	398	if (strncmp(argv[1],"dev",3) == 0) {
	399	int dev = (int)simple_strtoul(argv[2], NULL, 10);
	400	printf ("\nSCSI device %d: ", dev);
6d0f6bcf	401	if (dev >= CONFIG_SYS_SCSI_MAX_DEVICE) {
e887afc9 WD	402	printf("unknown device\n");
	403	return 1;
	404	}
	405	printf ("\n Device %d: ", dev);
	406	dev_print(&scsi_dev_desc[dev]);
	407	if(scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN) {
	408	return 1;
	409	}
	410	scsi_curr_dev = dev;
	411	printf("... is now current device\n");
	412	return 0;
	413	}
	414	if (strncmp(argv[1],"part",4) == 0) {
	415	int dev = (int)simple_strtoul(argv[2], NULL, 10);
	416	if(scsi_dev_desc[dev].type != DEV_TYPE_UNKNOWN) {
	417	print_part(&scsi_dev_desc[dev]);
	418	}
	419	else {
	420	printf ("\nSCSI device %d not available\n", dev);
	421	}
	422	return 1;
	423	}
	424	printf ("Usage:\n%s\n", cmdtp->usage);
	425	return 1;
	426	default:
	427	/* at least 4 args */
	428	if (strcmp(argv[1],"read") == 0) {
	429	ulong addr = simple_strtoul(argv[2], NULL, 16);
	430	ulong blk = simple_strtoul(argv[3], NULL, 16);
	431	ulong cnt = simple_strtoul(argv[4], NULL, 16);
	432	ulong n;
	433	printf ("\nSCSI read: device %d block # %ld, count %ld ... ",
	434	scsi_curr_dev, blk, cnt);
	435	n = scsi_read(scsi_curr_dev, blk, cnt, (ulong *)addr);
	436	printf ("%ld blocks read: %s\n",n,(n==cnt) ? "OK" : "ERROR");
	437	return 0;
	438	}
	439	} /* switch */
	440	printf ("Usage:\n%s\n", cmdtp->usage);
	441	return 1;
	442	}
	443
	444	/****************************************************************************************
	445	* scsi_read
	446	*/
	447
	448	#define SCSI_MAX_READ_BLK 0xFFFF /* almost the maximum amount of the scsi_ext command.. */
	449
eb867a76	450	ulong scsi_read(int device, ulong blknr, ulong blkcnt, void *buffer)
e887afc9 WD	451	{
	452	ulong start,blks, buf_addr;
	453	unsigned short smallblks;
	454	ccb* pccb=(ccb *)&tempccb;
	455	device&=0xff;
	456	/* Setup device
	457	*/
	458	pccb->target=scsi_dev_desc[device].target;
	459	pccb->lun=scsi_dev_desc[device].lun;
	460	buf_addr=(unsigned long)buffer;
	461	start=blknr;
	462	blks=blkcnt;
1a344f29	463	debug ("\nscsi_read: dev %d startblk %lx, blccnt %lx buffer %lx\n",device,start,blks,(unsigned long)buffer);
e887afc9 WD	464	do {
	465	pccb->pdata=(unsigned char *)buf_addr;
	466	if(blks>SCSI_MAX_READ_BLK) {
	467	pccb->datalen=scsi_dev_desc[device].blksz * SCSI_MAX_READ_BLK;
	468	smallblks=SCSI_MAX_READ_BLK;
	469	scsi_setup_read_ext(pccb,start,smallblks);
	470	start+=SCSI_MAX_READ_BLK;
	471	blks-=SCSI_MAX_READ_BLK;
	472	}
	473	else {
	474	pccb->datalen=scsi_dev_desc[device].blksz * blks;
	475	smallblks=(unsigned short) blks;
	476	scsi_setup_read_ext(pccb,start,smallblks);
	477	start+=blks;
	478	blks=0;
	479	}
1a344f29	480	debug ("scsi_read_ext: startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
e887afc9 WD	481	if(scsi_exec(pccb)!=TRUE) {
	482	scsi_print_error(pccb);
	483	blkcnt-=blks;
	484	break;
	485	}
	486	buf_addr+=pccb->datalen;
	487	} while(blks!=0);
1a344f29	488	debug ("scsi_read_ext: end startblk %lx, blccnt %x buffer %lx\n",start,smallblks,buf_addr);
e887afc9 WD	489	return(blkcnt);
	490	}
	491
	492	/* copy src to dest, skipping leading and trailing blanks
	493	* and null terminate the string
	494	*/
	495	void scsi_ident_cpy (unsigned char dest, unsigned char src, unsigned int len)
	496	{
	497	int start,end;
	498
	499	start=0;
	500	while(start<len) {
	501	if(src[start]!=' ')
	502	break;
	503	start++;
	504	}
	505	end=len-1;
	506	while(end>start) {
	507	if(src[end]!=' ')
	508	break;
	509	end--;
	510	}
	511	for( ; start<=end; start++) {
	512	*dest++=src[start];
	513	}
	514	*dest='\0';
	515	}
	516
	517
e887afc9 WD	518	/* Trim trailing blanks, and NUL-terminate string
	519	*/
	520	void scsi_trim_trail (unsigned char *str, unsigned int len)
	521	{
	522	unsigned char *p = str + len - 1;
	523
	524	while (len-- > 0) {
	525	*p-- = '\0';
	526	if (*p != ' ') {
	527	return;
	528	}
	529	}
	530	}
	531
	532
	533	/************************************************************************************
	534	* Some setup (fill-in) routines
	535	*/
	536	void scsi_setup_test_unit_ready(ccb * pccb)
	537	{
	538	pccb->cmd[0]=SCSI_TST_U_RDY;
	539	pccb->cmd[1]=pccb->lun<<5;
	540	pccb->cmd[2]=0;
	541	pccb->cmd[3]=0;
	542	pccb->cmd[4]=0;
	543	pccb->cmd[5]=0;
	544	pccb->cmdlen=6;
	545	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	546	}
	547
	548	void scsi_setup_read_capacity(ccb * pccb)
	549	{
	550	pccb->cmd[0]=SCSI_RD_CAPAC;
	551	pccb->cmd[1]=pccb->lun<<5;
	552	pccb->cmd[2]=0;
	553	pccb->cmd[3]=0;
	554	pccb->cmd[4]=0;
	555	pccb->cmd[5]=0;
	556	pccb->cmd[6]=0;
	557	pccb->cmd[7]=0;
	558	pccb->cmd[8]=0;
	559	pccb->cmd[9]=0;
	560	pccb->cmdlen=10;
	561	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	562
	563	}
	564
	565	void scsi_setup_read_ext(ccb * pccb, unsigned long start, unsigned short blocks)
	566	{
	567	pccb->cmd[0]=SCSI_READ10;
	568	pccb->cmd[1]=pccb->lun<<5;
	569	pccb->cmd[2]=((unsigned char) (start>>24))&0xff;
	570	pccb->cmd[3]=((unsigned char) (start>>16))&0xff;
	571	pccb->cmd[4]=((unsigned char) (start>>8))&0xff;
	572	pccb->cmd[5]=((unsigned char) (start))&0xff;
	573	pccb->cmd[6]=0;
	574	pccb->cmd[7]=((unsigned char) (blocks>>8))&0xff;
	575	pccb->cmd[8]=(unsigned char) blocks & 0xff;
	576	pccb->cmd[6]=0;
	577	pccb->cmdlen=10;
	578	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
1a344f29	579	debug ("scsi_setup_read_ext: cmd: %02X %02X startblk %02X%02X%02X%02X blccnt %02X%02X\n",
e887afc9 WD	580	pccb->cmd[0],pccb->cmd[1],
	581	pccb->cmd[2],pccb->cmd[3],pccb->cmd[4],pccb->cmd[5],
	582	pccb->cmd[7],pccb->cmd[8]);
	583	}
	584
	585	void scsi_setup_read6(ccb * pccb, unsigned long start, unsigned short blocks)
	586	{
	587	pccb->cmd[0]=SCSI_READ6;
	588	pccb->cmd[1]=pccb->lun<<5 \| (((unsigned char)(start>>16))&0x1f);
	589	pccb->cmd[2]=((unsigned char) (start>>8))&0xff;
	590	pccb->cmd[3]=((unsigned char) (start))&0xff;
	591	pccb->cmd[4]=(unsigned char) blocks & 0xff;
	592	pccb->cmd[5]=0;
	593	pccb->cmdlen=6;
	594	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
1a344f29	595	debug ("scsi_setup_read6: cmd: %02X %02X startblk %02X%02X blccnt %02X\n",
e887afc9 WD	596	pccb->cmd[0],pccb->cmd[1],
	597	pccb->cmd[2],pccb->cmd[3],pccb->cmd[4]);
	598	}
	599
	600
	601	void scsi_setup_inquiry(ccb * pccb)
	602	{
	603	pccb->cmd[0]=SCSI_INQUIRY;
	604	pccb->cmd[1]=pccb->lun<<5;
	605	pccb->cmd[2]=0;
	606	pccb->cmd[3]=0;
	607	if(pccb->datalen>255)
	608	pccb->cmd[4]=255;
	609	else
	610	pccb->cmd[4]=(unsigned char)pccb->datalen;
	611	pccb->cmd[5]=0;
	612	pccb->cmdlen=6;
	613	pccb->msgout[0]=SCSI_IDENTIFY; /* NOT USED */
	614	}
	615
460c322f WD	616
	617	U_BOOT_CMD(
	618	scsi, 5, 1, do_scsi,
	619	"scsi - SCSI sub-system\n",
	620	"reset - reset SCSI controller\n"
	621	"scsi info - show available SCSI devices\n"
	622	"scsi scan - (re-)scan SCSI bus\n"
	623	"scsi device [dev] - show or set current device\n"
	624	"scsi part [dev] - print partition table of one or all SCSI devices\n"
	625	"scsi read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
	626	" to memory address `addr'\n"
	627	);
	628
	629	U_BOOT_CMD(
	630	scsiboot, 3, 1, do_scsiboot,
	631	"scsiboot- boot from SCSI device\n",
	632	"loadAddr dev:part\n"
	633	);