3 * Denis Peter, MPL AG Switzerland
5 * SPDX-License-Identifier: GPL-2.0+
14 #include <asm/processor.h>
19 #ifdef CONFIG_SCSI_DEV_LIST
20 #define SCSI_DEV_LIST CONFIG_SCSI_DEV_LIST
22 #ifdef CONFIG_SCSI_SYM53C8XX
23 #define SCSI_VEND_ID 0x1000
24 #ifndef CONFIG_SCSI_DEV_ID
25 #define SCSI_DEV_ID 0x0001
27 #define SCSI_DEV_ID CONFIG_SCSI_DEV_ID
29 #elif defined CONFIG_SATA_ULI5288
31 #define SCSI_VEND_ID 0x10b9
32 #define SCSI_DEV_ID 0x5288
34 #elif !defined(CONFIG_SCSI_AHCI_PLAT)
35 #error no scsi device defined
37 #define SCSI_DEV_LIST {SCSI_VEND_ID, SCSI_DEV_ID}
40 #if defined(CONFIG_PCI) && !defined(CONFIG_SCSI_AHCI_PLAT)
41 const struct pci_device_id scsi_device_list[] = { SCSI_DEV_LIST };
43 static ccb tempccb; /* temporary scsi command buffer */
45 static unsigned char tempbuff[512]; /* temporary data buffer */
47 static int scsi_max_devs; /* number of highest available scsi device */
49 static int scsi_curr_dev; /* current device */
51 static struct blk_desc scsi_dev_desc[CONFIG_SYS_SCSI_MAX_DEVICE];
53 /* almost the maximum amount of the scsi_ext command.. */
54 #define SCSI_MAX_READ_BLK 0xFFFF
55 #define SCSI_LBA48_READ 0xFFFFFFF
57 #ifdef CONFIG_SYS_64BIT_LBA
58 void scsi_setup_read16(ccb *pccb, lbaint_t start, unsigned long blocks)
60 pccb->cmd[0] = SCSI_READ16;
61 pccb->cmd[1] = pccb->lun << 5;
62 pccb->cmd[2] = (unsigned char)(start >> 56) & 0xff;
63 pccb->cmd[3] = (unsigned char)(start >> 48) & 0xff;
64 pccb->cmd[4] = (unsigned char)(start >> 40) & 0xff;
65 pccb->cmd[5] = (unsigned char)(start >> 32) & 0xff;
66 pccb->cmd[6] = (unsigned char)(start >> 24) & 0xff;
67 pccb->cmd[7] = (unsigned char)(start >> 16) & 0xff;
68 pccb->cmd[8] = (unsigned char)(start >> 8) & 0xff;
69 pccb->cmd[9] = (unsigned char)start & 0xff;
71 pccb->cmd[11] = (unsigned char)(blocks >> 24) & 0xff;
72 pccb->cmd[12] = (unsigned char)(blocks >> 16) & 0xff;
73 pccb->cmd[13] = (unsigned char)(blocks >> 8) & 0xff;
74 pccb->cmd[14] = (unsigned char)blocks & 0xff;
77 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
78 debug("scsi_setup_read16: cmd: %02X %02X startblk %02X%02X%02X%02X%02X%02X%02X%02X blccnt %02X%02X%02X%02X\n",
79 pccb->cmd[0], pccb->cmd[1],
80 pccb->cmd[2], pccb->cmd[3], pccb->cmd[4], pccb->cmd[5],
81 pccb->cmd[6], pccb->cmd[7], pccb->cmd[8], pccb->cmd[9],
82 pccb->cmd[11], pccb->cmd[12], pccb->cmd[13], pccb->cmd[14]);
86 void scsi_setup_read_ext(ccb * pccb, lbaint_t start, unsigned short blocks)
88 pccb->cmd[0] = SCSI_READ10;
89 pccb->cmd[1] = pccb->lun << 5;
90 pccb->cmd[2] = (unsigned char)(start >> 24) & 0xff;
91 pccb->cmd[3] = (unsigned char)(start >> 16) & 0xff;
92 pccb->cmd[4] = (unsigned char)(start >> 8) & 0xff;
93 pccb->cmd[5] = (unsigned char)start & 0xff;
95 pccb->cmd[7] = (unsigned char)(blocks >> 8) & 0xff;
96 pccb->cmd[8] = (unsigned char)blocks & 0xff;
99 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
100 debug ("scsi_setup_read_ext: cmd: %02X %02X startblk %02X%02X%02X%02X blccnt %02X%02X\n",
101 pccb->cmd[0],pccb->cmd[1],
102 pccb->cmd[2],pccb->cmd[3],pccb->cmd[4],pccb->cmd[5],
103 pccb->cmd[7],pccb->cmd[8]);
106 void scsi_setup_write_ext(ccb *pccb, lbaint_t start, unsigned short blocks)
108 pccb->cmd[0] = SCSI_WRITE10;
109 pccb->cmd[1] = pccb->lun << 5;
110 pccb->cmd[2] = (unsigned char)(start >> 24) & 0xff;
111 pccb->cmd[3] = (unsigned char)(start >> 16) & 0xff;
112 pccb->cmd[4] = (unsigned char)(start >> 8) & 0xff;
113 pccb->cmd[5] = (unsigned char)start & 0xff;
115 pccb->cmd[7] = ((unsigned char)(blocks >> 8)) & 0xff;
116 pccb->cmd[8] = (unsigned char)blocks & 0xff;
119 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
120 debug("%s: cmd: %02X %02X startblk %02X%02X%02X%02X blccnt %02X%02X\n",
122 pccb->cmd[0], pccb->cmd[1],
123 pccb->cmd[2], pccb->cmd[3], pccb->cmd[4], pccb->cmd[5],
124 pccb->cmd[7], pccb->cmd[8]);
127 void scsi_setup_read6(ccb * pccb, lbaint_t start, unsigned short blocks)
129 pccb->cmd[0] = SCSI_READ6;
130 pccb->cmd[1] = pccb->lun << 5 | ((unsigned char)(start >> 16) & 0x1f);
131 pccb->cmd[2] = (unsigned char)(start >> 8) & 0xff;
132 pccb->cmd[3] = (unsigned char)start & 0xff;
133 pccb->cmd[4] = (unsigned char)blocks & 0xff;
136 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
137 debug("scsi_setup_read6: cmd: %02X %02X startblk %02X%02X blccnt %02X\n",
138 pccb->cmd[0], pccb->cmd[1],
139 pccb->cmd[2], pccb->cmd[3], pccb->cmd[4]);
143 void scsi_setup_inquiry(ccb * pccb)
145 pccb->cmd[0] = SCSI_INQUIRY;
146 pccb->cmd[1] = pccb->lun << 5;
149 if (pccb->datalen > 255)
152 pccb->cmd[4] = (unsigned char)pccb->datalen;
155 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
158 static ulong scsi_read(struct blk_desc *block_dev, lbaint_t blknr,
159 lbaint_t blkcnt, void *buffer)
161 int device = block_dev->devnum;
162 lbaint_t start, blks;
164 unsigned short smallblks = 0;
165 ccb* pccb=(ccb *)&tempccb;
169 pccb->target = scsi_dev_desc[device].target;
170 pccb->lun = scsi_dev_desc[device].lun;
171 buf_addr = (unsigned long)buffer;
174 debug("\nscsi_read: dev %d startblk " LBAF
175 ", blccnt " LBAF " buffer %lx\n",
176 device, start, blks, (unsigned long)buffer);
178 pccb->pdata = (unsigned char *)buf_addr;
179 #ifdef CONFIG_SYS_64BIT_LBA
180 if (start > SCSI_LBA48_READ) {
181 unsigned long blocks;
182 blocks = min_t(lbaint_t, blks, SCSI_MAX_READ_BLK);
183 pccb->datalen = scsi_dev_desc[device].blksz * blocks;
184 scsi_setup_read16(pccb, start, blocks);
189 if (blks > SCSI_MAX_READ_BLK) {
190 pccb->datalen = scsi_dev_desc[device].blksz *
192 smallblks = SCSI_MAX_READ_BLK;
193 scsi_setup_read_ext(pccb, start, smallblks);
194 start += SCSI_MAX_READ_BLK;
195 blks -= SCSI_MAX_READ_BLK;
198 pccb->datalen = scsi_dev_desc[device].blksz * blks;
199 smallblks = (unsigned short)blks;
200 scsi_setup_read_ext(pccb, start, smallblks);
204 debug("scsi_read_ext: startblk " LBAF
205 ", blccnt %x buffer %" PRIXPTR "\n",
206 start, smallblks, buf_addr);
207 if (scsi_exec(pccb) != true) {
208 scsi_print_error(pccb);
212 buf_addr+=pccb->datalen;
214 debug("scsi_read_ext: end startblk " LBAF
215 ", blccnt %x buffer %" PRIXPTR "\n", start, smallblks, buf_addr);
219 /*******************************************************************************
223 /* Almost the maximum amount of the scsi_ext command.. */
224 #define SCSI_MAX_WRITE_BLK 0xFFFF
226 static ulong scsi_write(struct blk_desc *block_dev, lbaint_t blknr,
227 lbaint_t blkcnt, const void *buffer)
229 int device = block_dev->devnum;
230 lbaint_t start, blks;
232 unsigned short smallblks;
233 ccb* pccb = (ccb *)&tempccb;
237 pccb->target = scsi_dev_desc[device].target;
238 pccb->lun = scsi_dev_desc[device].lun;
239 buf_addr = (unsigned long)buffer;
242 debug("\n%s: dev %d startblk " LBAF ", blccnt " LBAF " buffer %lx\n",
243 __func__, device, start, blks, (unsigned long)buffer);
245 pccb->pdata = (unsigned char *)buf_addr;
246 if (blks > SCSI_MAX_WRITE_BLK) {
247 pccb->datalen = (scsi_dev_desc[device].blksz *
249 smallblks = SCSI_MAX_WRITE_BLK;
250 scsi_setup_write_ext(pccb, start, smallblks);
251 start += SCSI_MAX_WRITE_BLK;
252 blks -= SCSI_MAX_WRITE_BLK;
254 pccb->datalen = scsi_dev_desc[device].blksz * blks;
255 smallblks = (unsigned short)blks;
256 scsi_setup_write_ext(pccb, start, smallblks);
260 debug("%s: startblk " LBAF ", blccnt %x buffer %" PRIXPTR "\n",
261 __func__, start, smallblks, buf_addr);
262 if (scsi_exec(pccb) != true) {
263 scsi_print_error(pccb);
267 buf_addr += pccb->datalen;
269 debug("%s: end startblk " LBAF ", blccnt %x buffer %" PRIXPTR "\n",
270 __func__, start, smallblks, buf_addr);
274 int scsi_get_disk_count(void)
276 return scsi_max_devs;
279 #if defined(CONFIG_PCI) && !defined(CONFIG_SCSI_AHCI_PLAT)
285 * Find a device from the list, this driver will support a single
288 for (i = 0; i < ARRAY_SIZE(scsi_device_list); i++) {
289 /* get PCI Device ID */
294 ret = dm_pci_find_device(scsi_device_list[i].vendor,
295 scsi_device_list[i].device, 0, &dev);
297 busdevfunc = dm_pci_get_bdf(dev);
301 busdevfunc = pci_find_device(scsi_device_list[i].vendor,
302 scsi_device_list[i].device,
305 if (busdevfunc != -1)
309 if (busdevfunc == -1) {
310 printf("Error: SCSI Controller(s) ");
311 for (i = 0; i < ARRAY_SIZE(scsi_device_list); i++) {
313 scsi_device_list[i].vendor,
314 scsi_device_list[i].device);
316 printf("not found\n");
321 printf("SCSI Controller (%04X,%04X) found (%d:%d:%d)\n",
322 scsi_device_list[i].vendor,
323 scsi_device_list[i].device,
324 (busdevfunc >> 16) & 0xFF,
325 (busdevfunc >> 11) & 0x1F,
326 (busdevfunc >> 8) & 0x7);
329 bootstage_start(BOOTSTAGE_ID_ACCUM_SCSI, "ahci");
330 scsi_low_level_init(busdevfunc);
332 bootstage_accum(BOOTSTAGE_ID_ACCUM_SCSI);
336 #ifdef CONFIG_PARTITIONS
337 struct blk_desc *scsi_get_dev(int dev)
339 return (dev < CONFIG_SYS_SCSI_MAX_DEVICE) ? &scsi_dev_desc[dev] : NULL;
343 #ifndef CONFIG_SPL_BUILD
344 /******************************************************************************
345 * scsi boot command intepreter. Derived from diskboot
347 int do_scsiboot (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
349 return common_diskboot(cmdtp, "scsi", argc, argv);
352 /*********************************************************************************
353 * scsi command intepreter
355 int do_scsi (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
360 return CMD_RET_USAGE;
363 if (strncmp(argv[1], "res", 3) == 0) {
364 printf("\nReset SCSI\n");
369 if (strncmp(argv[1], "inf", 3) == 0) {
371 for (i = 0; i < CONFIG_SYS_SCSI_MAX_DEVICE; ++i) {
372 if (scsi_dev_desc[i].type == DEV_TYPE_UNKNOWN)
373 continue; /* list only known devices */
374 printf("SCSI dev. %d: ", i);
375 dev_print(&scsi_dev_desc[i]);
379 if (strncmp(argv[1], "dev", 3) == 0) {
380 if (scsi_curr_dev < 0 ||
381 scsi_curr_dev >= CONFIG_SYS_SCSI_MAX_DEVICE) {
382 printf("\nno SCSI devices available\n");
385 printf("\n Device %d: ", scsi_curr_dev);
386 dev_print(&scsi_dev_desc[scsi_curr_dev]);
389 if (strncmp(argv[1], "scan", 4) == 0) {
393 if (strncmp(argv[1], "part", 4) == 0) {
395 for (ok = 0, dev = 0;
396 dev < CONFIG_SYS_SCSI_MAX_DEVICE; ++dev) {
397 if (scsi_dev_desc[dev].type !=
402 debug("print_part of %x\n", dev);
403 part_print(&scsi_dev_desc[dev]);
407 printf("\nno SCSI devices available\n");
410 return CMD_RET_USAGE;
412 if (strncmp(argv[1], "dev", 3) == 0) {
413 int dev = (int)simple_strtoul(argv[2], NULL, 10);
414 printf("\nSCSI device %d: ", dev);
415 if (dev >= CONFIG_SYS_SCSI_MAX_DEVICE) {
416 printf("unknown device\n");
419 printf("\n Device %d: ", dev);
420 dev_print(&scsi_dev_desc[dev]);
421 if (scsi_dev_desc[dev].type == DEV_TYPE_UNKNOWN)
424 printf("... is now current device\n");
427 if (strncmp(argv[1], "part", 4) == 0) {
428 int dev = (int)simple_strtoul(argv[2], NULL, 10);
429 if (scsi_dev_desc[dev].type != DEV_TYPE_UNKNOWN)
430 part_print(&scsi_dev_desc[dev]);
432 printf("\nSCSI device %d not available\n", dev);
435 return CMD_RET_USAGE;
437 /* at least 4 args */
438 if (strcmp(argv[1], "read") == 0) {
439 ulong addr = simple_strtoul(argv[2], NULL, 16);
440 ulong blk = simple_strtoul(argv[3], NULL, 16);
441 ulong cnt = simple_strtoul(argv[4], NULL, 16);
443 printf("\nSCSI read: device %d block # %ld, count %ld ... ",
444 scsi_curr_dev, blk, cnt);
445 n = scsi_read(&scsi_dev_desc[scsi_curr_dev],
446 blk, cnt, (ulong *)addr);
447 printf("%ld blocks read: %s\n", n,
448 n == cnt ? "OK" : "ERROR");
450 } else if (strcmp(argv[1], "write") == 0) {
451 ulong addr = simple_strtoul(argv[2], NULL, 16);
452 ulong blk = simple_strtoul(argv[3], NULL, 16);
453 ulong cnt = simple_strtoul(argv[4], NULL, 16);
455 printf("\nSCSI write: device %d block # %ld, count %ld ... ",
456 scsi_curr_dev, blk, cnt);
457 n = scsi_write(&scsi_dev_desc[scsi_curr_dev],
458 blk, cnt, (ulong *)addr);
459 printf("%ld blocks written: %s\n", n,
460 n == cnt ? "OK" : "ERROR");
464 return CMD_RET_USAGE;
470 "reset - reset SCSI controller\n"
471 "scsi info - show available SCSI devices\n"
472 "scsi scan - (re-)scan SCSI bus\n"
473 "scsi device [dev] - show or set current device\n"
474 "scsi part [dev] - print partition table of one or all SCSI devices\n"
475 "scsi read addr blk# cnt - read `cnt' blocks starting at block `blk#'\n"
476 " to memory address `addr'\n"
477 "scsi write addr blk# cnt - write `cnt' blocks starting at block\n"
478 " `blk#' from memory address `addr'"
482 scsiboot, 3, 1, do_scsiboot,
483 "boot from SCSI device",
488 /* copy src to dest, skipping leading and trailing blanks
489 * and null terminate the string
491 void scsi_ident_cpy(unsigned char *dest, unsigned char *src, unsigned int len)
496 while (start < len) {
497 if (src[start] != ' ')
502 while (end > start) {
507 for (; start <= end; start++)
508 *dest ++= src[start];
513 /* Trim trailing blanks, and NUL-terminate string
515 void scsi_trim_trail (unsigned char *str, unsigned int len)
517 unsigned char *p = str + len - 1;
527 int scsi_read_capacity(ccb *pccb, lbaint_t *capacity, unsigned long *blksz)
531 memset(pccb->cmd, '\0', sizeof(pccb->cmd));
532 pccb->cmd[0] = SCSI_RD_CAPAC10;
533 pccb->cmd[1] = pccb->lun << 5;
535 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
538 if (scsi_exec(pccb) != true)
541 *capacity = ((lbaint_t)pccb->pdata[0] << 24) |
542 ((lbaint_t)pccb->pdata[1] << 16) |
543 ((lbaint_t)pccb->pdata[2] << 8) |
544 ((lbaint_t)pccb->pdata[3]);
546 if (*capacity != 0xffffffff) {
547 /* Read capacity (10) was sufficient for this drive. */
548 *blksz = ((unsigned long)pccb->pdata[4] << 24) |
549 ((unsigned long)pccb->pdata[5] << 16) |
550 ((unsigned long)pccb->pdata[6] << 8) |
551 ((unsigned long)pccb->pdata[7]);
555 /* Read capacity (10) was insufficient. Use read capacity (16). */
556 memset(pccb->cmd, '\0', sizeof(pccb->cmd));
557 pccb->cmd[0] = SCSI_RD_CAPAC16;
560 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
563 if (scsi_exec(pccb) != true)
566 *capacity = ((uint64_t)pccb->pdata[0] << 56) |
567 ((uint64_t)pccb->pdata[1] << 48) |
568 ((uint64_t)pccb->pdata[2] << 40) |
569 ((uint64_t)pccb->pdata[3] << 32) |
570 ((uint64_t)pccb->pdata[4] << 24) |
571 ((uint64_t)pccb->pdata[5] << 16) |
572 ((uint64_t)pccb->pdata[6] << 8) |
573 ((uint64_t)pccb->pdata[7]);
575 *blksz = ((uint64_t)pccb->pdata[8] << 56) |
576 ((uint64_t)pccb->pdata[9] << 48) |
577 ((uint64_t)pccb->pdata[10] << 40) |
578 ((uint64_t)pccb->pdata[11] << 32) |
579 ((uint64_t)pccb->pdata[12] << 24) |
580 ((uint64_t)pccb->pdata[13] << 16) |
581 ((uint64_t)pccb->pdata[14] << 8) |
582 ((uint64_t)pccb->pdata[15]);
588 /************************************************************************************
589 * Some setup (fill-in) routines
591 void scsi_setup_test_unit_ready(ccb * pccb)
593 pccb->cmd[0] = SCSI_TST_U_RDY;
594 pccb->cmd[1] = pccb->lun << 5;
600 pccb->msgout[0] = SCSI_IDENTIFY; /* NOT USED */
603 /*********************************************************************************
604 * (re)-scan the scsi bus and reports scsi device info
605 * to the user if mode = 1
607 void scsi_scan(int mode)
609 unsigned char i,perq,modi,lun;
612 ccb* pccb=(ccb *)&tempccb;
615 printf("scanning bus for devices...\n");
616 for (i = 0; i < CONFIG_SYS_SCSI_MAX_DEVICE; i++) {
617 scsi_dev_desc[i].target = 0xff;
618 scsi_dev_desc[i].lun = 0xff;
619 scsi_dev_desc[i].lba = 0;
620 scsi_dev_desc[i].blksz = 0;
621 scsi_dev_desc[i].log2blksz =
622 LOG2_INVALID(typeof(scsi_dev_desc[i].log2blksz));
623 scsi_dev_desc[i].type = DEV_TYPE_UNKNOWN;
624 scsi_dev_desc[i].vendor[0] = 0;
625 scsi_dev_desc[i].product[0] = 0;
626 scsi_dev_desc[i].revision[0] = 0;
627 scsi_dev_desc[i].removable = false;
628 scsi_dev_desc[i].if_type = IF_TYPE_SCSI;
629 scsi_dev_desc[i].devnum = i;
630 scsi_dev_desc[i].part_type = PART_TYPE_UNKNOWN;
631 scsi_dev_desc[i].block_read = scsi_read;
632 scsi_dev_desc[i].block_write = scsi_write;
635 for (i = 0; i < CONFIG_SYS_SCSI_MAX_SCSI_ID; i++) {
637 for (lun = 0; lun < CONFIG_SYS_SCSI_MAX_LUN; lun++) {
639 pccb->pdata = (unsigned char *)&tempbuff;
641 scsi_setup_inquiry(pccb);
642 if (scsi_exec(pccb) != true) {
643 if(pccb->contr_stat==SCSI_SEL_TIME_OUT) {
644 debug("Selection timeout ID %d\n",
646 continue; /* selection timeout => assuming no device present */
648 scsi_print_error(pccb);
653 if ((perq & 0x1f) == 0x1f)
654 continue; /* skip unknown devices */
655 if ((modi & 0x80) == 0x80) /* drive is removable */
656 scsi_dev_desc[scsi_max_devs].removable = true;
657 /* get info for this device */
658 scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].vendor[0],
660 scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].product[0],
662 scsi_ident_cpy((unsigned char *)&scsi_dev_desc[scsi_max_devs].revision[0],
664 scsi_dev_desc[scsi_max_devs].target = pccb->target;
665 scsi_dev_desc[scsi_max_devs].lun = pccb->lun;
668 scsi_setup_test_unit_ready(pccb);
669 if (scsi_exec(pccb) != true) {
670 if (scsi_dev_desc[scsi_max_devs].removable) {
671 scsi_dev_desc[scsi_max_devs].type =
675 scsi_print_error(pccb);
678 if (scsi_read_capacity(pccb, &capacity, &blksz)) {
679 scsi_print_error(pccb);
682 scsi_dev_desc[scsi_max_devs].lba = capacity;
683 scsi_dev_desc[scsi_max_devs].blksz = blksz;
684 scsi_dev_desc[scsi_max_devs].log2blksz =
685 LOG2(scsi_dev_desc[scsi_max_devs].blksz);
686 scsi_dev_desc[scsi_max_devs].type = perq;
687 part_init(&scsi_dev_desc[scsi_max_devs]);
690 printf (" Device %d: ", scsi_max_devs);
691 dev_print(&scsi_dev_desc[scsi_max_devs]);
696 if (scsi_max_devs > 0)
701 printf("Found %d device(s).\n", scsi_max_devs);
702 #ifndef CONFIG_SPL_BUILD
703 setenv_ulong("scsidevs", scsi_max_devs);