2 * (C) Copyright 2000-2011
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5 * SPDX-License-Identifier: GPL-2.0+
17 #include <asm/byteorder.h>
20 #if defined(CONFIG_IDE_8xx_DIRECT) || defined(CONFIG_IDE_PCMCIA)
27 #ifdef CONFIG_STATUS_LED
28 # include <status_led.h>
32 # define EIEIO __asm__ volatile ("eieio")
33 # define SYNC __asm__ volatile ("sync")
35 # define EIEIO /* nothing */
36 # define SYNC /* nothing */
39 /* ------------------------------------------------------------------------- */
41 /* Current I/O Device */
42 static int curr_device
= -1;
44 /* Current offset for IDE0 / IDE1 bus access */
45 ulong ide_bus_offset
[CONFIG_SYS_IDE_MAXBUS
] = {
46 #if defined(CONFIG_SYS_ATA_IDE0_OFFSET)
47 CONFIG_SYS_ATA_IDE0_OFFSET
,
49 #if defined(CONFIG_SYS_ATA_IDE1_OFFSET) && (CONFIG_SYS_IDE_MAXBUS > 1)
50 CONFIG_SYS_ATA_IDE1_OFFSET
,
54 static int ide_bus_ok
[CONFIG_SYS_IDE_MAXBUS
];
56 struct blk_desc ide_dev_desc
[CONFIG_SYS_IDE_MAXDEVICE
];
57 /* ------------------------------------------------------------------------- */
59 #ifdef CONFIG_IDE_RESET
60 static void ide_reset (void);
62 #define ide_reset() /* dummy */
65 static void ide_ident(struct blk_desc
*dev_desc
);
66 static uchar
ide_wait (int dev
, ulong t
);
68 #define IDE_TIME_OUT 2000 /* 2 sec timeout */
70 #define ATAPI_TIME_OUT 7000 /* 7 sec timeout (5 sec seems to work...) */
72 #define IDE_SPIN_UP_TIME_OUT 5000 /* 5 sec spin-up timeout */
74 static void ident_cpy (unsigned char *dest
, unsigned char *src
, unsigned int len
);
76 #ifndef CONFIG_SYS_ATA_PORT_ADDR
77 #define CONFIG_SYS_ATA_PORT_ADDR(port) (port)
81 static void atapi_inquiry(struct blk_desc
*dev_desc
);
82 static ulong
atapi_read(struct blk_desc
*block_dev
, lbaint_t blknr
,
83 lbaint_t blkcnt
, void *buffer
);
87 /* ------------------------------------------------------------------------- */
89 int do_ide(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *const argv
[])
98 if (strncmp(argv
[1], "res", 3) == 0) {
100 #ifdef CONFIG_IDE_8xx_DIRECT
101 " on PCMCIA " PCMCIA_SLOT_MSG
107 } else if (strncmp(argv
[1], "inf", 3) == 0) {
112 for (i
= 0; i
< CONFIG_SYS_IDE_MAXDEVICE
; ++i
) {
113 if (ide_dev_desc
[i
].type
== DEV_TYPE_UNKNOWN
)
114 continue; /* list only known devices */
115 printf("IDE device %d: ", i
);
116 dev_print(&ide_dev_desc
[i
]);
120 } else if (strncmp(argv
[1], "dev", 3) == 0) {
121 if ((curr_device
< 0)
122 || (curr_device
>= CONFIG_SYS_IDE_MAXDEVICE
)) {
123 puts("\nno IDE devices available\n");
126 printf("\nIDE device %d: ", curr_device
);
127 dev_print(&ide_dev_desc
[curr_device
]);
129 } else if (strncmp(argv
[1], "part", 4) == 0) {
132 for (ok
= 0, dev
= 0;
133 dev
< CONFIG_SYS_IDE_MAXDEVICE
;
135 if (ide_dev_desc
[dev
].part_type
!=
140 part_print(&ide_dev_desc
[dev
]);
144 puts("\nno IDE devices available\n");
149 return CMD_RET_USAGE
;
151 if (strncmp(argv
[1], "dev", 3) == 0) {
152 int dev
= (int) simple_strtoul(argv
[2], NULL
, 10);
154 printf("\nIDE device %d: ", dev
);
155 if (dev
>= CONFIG_SYS_IDE_MAXDEVICE
) {
156 puts("unknown device\n");
159 dev_print(&ide_dev_desc
[dev
]);
160 /*ide_print (dev); */
162 if (ide_dev_desc
[dev
].type
== DEV_TYPE_UNKNOWN
)
167 puts("... is now current device\n");
170 } else if (strncmp(argv
[1], "part", 4) == 0) {
171 int dev
= (int) simple_strtoul(argv
[2], NULL
, 10);
173 if (ide_dev_desc
[dev
].part_type
!= PART_TYPE_UNKNOWN
) {
174 part_print(&ide_dev_desc
[dev
]);
176 printf("\nIDE device %d not available\n",
183 return CMD_RET_USAGE
;
185 /* at least 4 args */
187 if (strcmp(argv
[1], "read") == 0) {
188 ulong addr
= simple_strtoul(argv
[2], NULL
, 16);
189 ulong cnt
= simple_strtoul(argv
[4], NULL
, 16);
190 struct blk_desc
*dev_desc
;
193 #ifdef CONFIG_SYS_64BIT_LBA
194 lbaint_t blk
= simple_strtoull(argv
[3], NULL
, 16);
196 printf("\nIDE read: device %d block # %lld, count %ld ... ",
197 curr_device
, blk
, cnt
);
199 lbaint_t blk
= simple_strtoul(argv
[3], NULL
, 16);
201 printf("\nIDE read: device %d block # %ld, count %ld ... ",
202 curr_device
, blk
, cnt
);
205 dev_desc
= &ide_dev_desc
[curr_device
];
206 n
= dev_desc
->block_read(dev_desc
, blk
, cnt
,
208 /* flush cache after read */
210 cnt
* ide_dev_desc
[curr_device
].blksz
);
212 printf("%ld blocks read: %s\n",
213 n
, (n
== cnt
) ? "OK" : "ERROR");
218 } else if (strcmp(argv
[1], "write") == 0) {
219 ulong addr
= simple_strtoul(argv
[2], NULL
, 16);
220 ulong cnt
= simple_strtoul(argv
[4], NULL
, 16);
223 #ifdef CONFIG_SYS_64BIT_LBA
224 lbaint_t blk
= simple_strtoull(argv
[3], NULL
, 16);
226 printf("\nIDE write: device %d block # %lld, count %ld ... ",
227 curr_device
, blk
, cnt
);
229 lbaint_t blk
= simple_strtoul(argv
[3], NULL
, 16);
231 printf("\nIDE write: device %d block # %ld, count %ld ... ",
232 curr_device
, blk
, cnt
);
234 n
= ide_write(&ide_dev_desc
[curr_device
], blk
, cnt
,
237 printf("%ld blocks written: %s\n",
238 n
, (n
== cnt
) ? "OK" : "ERROR");
244 return CMD_RET_USAGE
;
251 int do_diskboot(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *const argv
[])
253 return common_diskboot(cmdtp
, "ide", argc
, argv
);
256 /* ------------------------------------------------------------------------- */
258 __weak
void ide_led(uchar led
, uchar status
)
260 #if defined(CONFIG_IDE_LED) && defined(PER8_BASE) /* required by LED_PORT */
261 static uchar led_buffer
; /* Buffer for current LED status */
263 uchar
*led_port
= LED_PORT
;
265 if (status
) /* switch LED on */
267 else /* switch LED off */
270 *led_port
= led_buffer
;
274 #ifndef CONFIG_IDE_LED /* define LED macros, they are not used anyways */
275 # define DEVICE_LED(x) 0
280 /* ------------------------------------------------------------------------- */
282 __weak
void ide_outb(int dev
, int port
, unsigned char val
)
284 debug("ide_outb (dev= %d, port= 0x%x, val= 0x%02x) : @ 0x%08lx\n",
286 (ATA_CURR_BASE(dev
) + CONFIG_SYS_ATA_PORT_ADDR(port
)));
288 #if defined(CONFIG_IDE_AHB)
291 ide_write_register(dev
, port
, val
);
294 outb(val
, (ATA_CURR_BASE(dev
)));
297 outb(val
, (ATA_CURR_BASE(dev
) + CONFIG_SYS_ATA_PORT_ADDR(port
)));
301 __weak
unsigned char ide_inb(int dev
, int port
)
305 #if defined(CONFIG_IDE_AHB)
306 val
= ide_read_register(dev
, port
);
308 val
= inb((ATA_CURR_BASE(dev
) + CONFIG_SYS_ATA_PORT_ADDR(port
)));
311 debug("ide_inb (dev= %d, port= 0x%x) : @ 0x%08lx -> 0x%02x\n",
313 (ATA_CURR_BASE(dev
) + CONFIG_SYS_ATA_PORT_ADDR(port
)), val
);
322 #ifdef CONFIG_IDE_8xx_PCCARD
323 extern int ide_devices_found
; /* Initialized in check_ide_device() */
324 #endif /* CONFIG_IDE_8xx_PCCARD */
326 #ifdef CONFIG_IDE_PREINIT
330 puts("ide_preinit failed\n");
333 #endif /* CONFIG_IDE_PREINIT */
338 * Reset the IDE just to be sure.
339 * Light LED's to show
341 ide_led((LED_IDE1
| LED_IDE2
), 1); /* LED's on */
343 /* ATAPI Drives seems to need a proper IDE Reset */
346 #ifdef CONFIG_IDE_INIT_POSTRESET
349 if (ide_init_postreset()) {
350 puts("ide_preinit_postreset failed\n");
353 #endif /* CONFIG_IDE_INIT_POSTRESET */
356 * Wait for IDE to get ready.
357 * According to spec, this can take up to 31 seconds!
359 for (bus
= 0; bus
< CONFIG_SYS_IDE_MAXBUS
; ++bus
) {
361 bus
* (CONFIG_SYS_IDE_MAXDEVICE
/
362 CONFIG_SYS_IDE_MAXBUS
);
364 #ifdef CONFIG_IDE_8xx_PCCARD
365 /* Skip non-ide devices from probing */
366 if ((ide_devices_found
& (1 << bus
)) == 0) {
367 ide_led((LED_IDE1
| LED_IDE2
), 0); /* LED's off */
371 printf("Bus %d: ", bus
);
377 udelay(100000); /* 100 ms */
378 ide_outb(dev
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(dev
));
379 udelay(100000); /* 100 ms */
382 udelay(10000); /* 10 ms */
384 c
= ide_inb(dev
, ATA_STATUS
);
386 if (i
> (ATA_RESET_TIME
* 100)) {
387 puts("** Timeout **\n");
389 ide_led((LED_IDE1
| LED_IDE2
), 0);
392 if ((i
>= 100) && ((i
% 100) == 0))
395 } while (c
& ATA_STAT_BUSY
);
397 if (c
& (ATA_STAT_BUSY
| ATA_STAT_FAULT
)) {
398 puts("not available ");
399 debug("Status = 0x%02X ", c
);
400 #ifndef CONFIG_ATAPI /* ATAPI Devices do not set DRDY */
401 } else if ((c
& ATA_STAT_READY
) == 0) {
402 puts("not available ");
403 debug("Status = 0x%02X ", c
);
414 ide_led((LED_IDE1
| LED_IDE2
), 0); /* LED's off */
417 for (i
= 0; i
< CONFIG_SYS_IDE_MAXDEVICE
; ++i
) {
418 int led
= (IDE_BUS(i
) == 0) ? LED_IDE1
: LED_IDE2
;
419 ide_dev_desc
[i
].type
= DEV_TYPE_UNKNOWN
;
420 ide_dev_desc
[i
].if_type
= IF_TYPE_IDE
;
421 ide_dev_desc
[i
].devnum
= i
;
422 ide_dev_desc
[i
].part_type
= PART_TYPE_UNKNOWN
;
423 ide_dev_desc
[i
].blksz
= 0;
424 ide_dev_desc
[i
].log2blksz
=
425 LOG2_INVALID(typeof(ide_dev_desc
[i
].log2blksz
));
426 ide_dev_desc
[i
].lba
= 0;
427 ide_dev_desc
[i
].block_read
= ide_read
;
428 ide_dev_desc
[i
].block_write
= ide_write
;
429 if (!ide_bus_ok
[IDE_BUS(i
)])
431 ide_led(led
, 1); /* LED on */
432 ide_ident(&ide_dev_desc
[i
]);
433 ide_led(led
, 0); /* LED off */
434 dev_print(&ide_dev_desc
[i
]);
436 if ((ide_dev_desc
[i
].lba
> 0) && (ide_dev_desc
[i
].blksz
> 0)) {
437 /* initialize partition type */
438 part_init(&ide_dev_desc
[i
]);
446 /* ------------------------------------------------------------------------- */
448 #ifdef CONFIG_PARTITIONS
449 struct blk_desc
*ide_get_dev(int dev
)
451 return (dev
< CONFIG_SYS_IDE_MAXDEVICE
) ? &ide_dev_desc
[dev
] : NULL
;
455 /* ------------------------------------------------------------------------- */
457 /* We only need to swap data if we are running on a big endian cpu. */
458 #if defined(__LITTLE_ENDIAN)
459 __weak
void ide_input_swap_data(int dev
, ulong
*sect_buf
, int words
)
461 ide_input_data(dev
, sect_buf
, words
);
464 __weak
void ide_input_swap_data(int dev
, ulong
*sect_buf
, int words
)
466 volatile ushort
*pbuf
=
467 (ushort
*) (ATA_CURR_BASE(dev
) + ATA_DATA_REG
);
468 ushort
*dbuf
= (ushort
*) sect_buf
;
470 debug("in input swap data base for read is %lx\n",
471 (unsigned long) pbuf
);
475 *dbuf
++ = swab16p((u16
*) pbuf
);
476 *dbuf
++ = swab16p((u16
*) pbuf
);
478 *dbuf
++ = ld_le16(pbuf
);
479 *dbuf
++ = ld_le16(pbuf
);
483 #endif /* __LITTLE_ENDIAN */
486 #if defined(CONFIG_IDE_SWAP_IO)
487 __weak
void ide_output_data(int dev
, const ulong
*sect_buf
, int words
)
490 volatile ushort
*pbuf
;
492 pbuf
= (ushort
*) (ATA_CURR_BASE(dev
) + ATA_DATA_REG
);
493 dbuf
= (ushort
*) sect_buf
;
501 #else /* ! CONFIG_IDE_SWAP_IO */
502 __weak
void ide_output_data(int dev
, const ulong
*sect_buf
, int words
)
504 #if defined(CONFIG_IDE_AHB)
505 ide_write_data(dev
, sect_buf
, words
);
507 outsw(ATA_CURR_BASE(dev
) + ATA_DATA_REG
, sect_buf
, words
<< 1);
510 #endif /* CONFIG_IDE_SWAP_IO */
512 #if defined(CONFIG_IDE_SWAP_IO)
513 __weak
void ide_input_data(int dev
, ulong
*sect_buf
, int words
)
516 volatile ushort
*pbuf
;
518 pbuf
= (ushort
*) (ATA_CURR_BASE(dev
) + ATA_DATA_REG
);
519 dbuf
= (ushort
*) sect_buf
;
521 debug("in input data base for read is %lx\n", (unsigned long) pbuf
);
530 #else /* ! CONFIG_IDE_SWAP_IO */
531 __weak
void ide_input_data(int dev
, ulong
*sect_buf
, int words
)
533 #if defined(CONFIG_IDE_AHB)
534 ide_read_data(dev
, sect_buf
, words
);
536 insw(ATA_CURR_BASE(dev
) + ATA_DATA_REG
, sect_buf
, words
<< 1);
540 #endif /* CONFIG_IDE_SWAP_IO */
542 /* -------------------------------------------------------------------------
544 static void ide_ident(struct blk_desc
*dev_desc
)
554 device
= dev_desc
->devnum
;
555 printf(" Device %d: ", device
);
557 ide_led(DEVICE_LED(device
), 1); /* LED on */
560 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
561 dev_desc
->if_type
= IF_TYPE_IDE
;
566 /* Warning: This will be tricky to read */
567 while (retries
<= 1) {
568 /* check signature */
569 if ((ide_inb(device
, ATA_SECT_CNT
) == 0x01) &&
570 (ide_inb(device
, ATA_SECT_NUM
) == 0x01) &&
571 (ide_inb(device
, ATA_CYL_LOW
) == 0x14) &&
572 (ide_inb(device
, ATA_CYL_HIGH
) == 0xEB)) {
573 /* ATAPI Signature found */
574 dev_desc
->if_type
= IF_TYPE_ATAPI
;
576 * Start Ident Command
578 ide_outb(device
, ATA_COMMAND
, ATAPI_CMD_IDENT
);
580 * Wait for completion - ATAPI devices need more time
583 c
= ide_wait(device
, ATAPI_TIME_OUT
);
588 * Start Ident Command
590 ide_outb(device
, ATA_COMMAND
, ATA_CMD_IDENT
);
593 * Wait for completion
595 c
= ide_wait(device
, IDE_TIME_OUT
);
597 ide_led(DEVICE_LED(device
), 0); /* LED off */
599 if (((c
& ATA_STAT_DRQ
) == 0) ||
600 ((c
& (ATA_STAT_FAULT
| ATA_STAT_ERR
)) != 0)) {
604 * Need to soft reset the device
605 * in case it's an ATAPI...
607 debug("Retrying...\n");
608 ide_outb(device
, ATA_DEV_HD
,
609 ATA_LBA
| ATA_DEVICE(device
));
611 ide_outb(device
, ATA_COMMAND
, 0x08);
612 udelay(500000); /* 500 ms */
617 ide_outb(device
, ATA_DEV_HD
,
618 ATA_LBA
| ATA_DEVICE(device
));
627 } /* see above - ugly to read */
629 if (retries
== 2) /* Not found */
633 ide_input_swap_data(device
, (ulong
*)&iop
, ATA_SECTORWORDS
);
635 ident_cpy((unsigned char *) dev_desc
->revision
, iop
.fw_rev
,
636 sizeof(dev_desc
->revision
));
637 ident_cpy((unsigned char *) dev_desc
->vendor
, iop
.model
,
638 sizeof(dev_desc
->vendor
));
639 ident_cpy((unsigned char *) dev_desc
->product
, iop
.serial_no
,
640 sizeof(dev_desc
->product
));
641 #ifdef __LITTLE_ENDIAN
643 * firmware revision, model, and serial number have Big Endian Byte
644 * order in Word. Convert all three to little endian.
646 * See CF+ and CompactFlash Specification Revision 2.0:
647 * 6.2.1.6: Identify Drive, Table 39 for more details
650 strswab(dev_desc
->revision
);
651 strswab(dev_desc
->vendor
);
652 strswab(dev_desc
->product
);
653 #endif /* __LITTLE_ENDIAN */
655 if ((iop
.config
& 0x0080) == 0x0080)
656 dev_desc
->removable
= 1;
658 dev_desc
->removable
= 0;
661 if (dev_desc
->if_type
== IF_TYPE_ATAPI
) {
662 atapi_inquiry(dev_desc
);
665 #endif /* CONFIG_ATAPI */
669 dev_desc
->lba
= (iop
.lba_capacity
<< 16) | (iop
.lba_capacity
>> 16);
670 #else /* ! __BIG_ENDIAN */
672 * do not swap shorts on little endian
674 * See CF+ and CompactFlash Specification Revision 2.0:
675 * 6.2.1.6: Identfy Drive, Table 39, Word Address 57-58 for details.
677 dev_desc
->lba
= iop
.lba_capacity
;
678 #endif /* __BIG_ENDIAN */
681 if (iop
.command_set_2
& 0x0400) { /* LBA 48 support */
683 dev_desc
->lba
= (unsigned long long) iop
.lba48_capacity
[0] |
684 ((unsigned long long) iop
.lba48_capacity
[1] << 16) |
685 ((unsigned long long) iop
.lba48_capacity
[2] << 32) |
686 ((unsigned long long) iop
.lba48_capacity
[3] << 48);
690 #endif /* CONFIG_LBA48 */
692 dev_desc
->type
= DEV_TYPE_HARDDISK
;
693 dev_desc
->blksz
= ATA_BLOCKSIZE
;
694 dev_desc
->log2blksz
= LOG2(dev_desc
->blksz
);
695 dev_desc
->lun
= 0; /* just to fill something in... */
697 #if 0 /* only used to test the powersaving mode,
698 * if enabled, the drive goes after 5 sec
700 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
701 c
= ide_wait(device
, IDE_TIME_OUT
);
702 ide_outb(device
, ATA_SECT_CNT
, 1);
703 ide_outb(device
, ATA_LBA_LOW
, 0);
704 ide_outb(device
, ATA_LBA_MID
, 0);
705 ide_outb(device
, ATA_LBA_HIGH
, 0);
706 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
707 ide_outb(device
, ATA_COMMAND
, 0xe3);
709 c
= ide_wait(device
, IDE_TIME_OUT
); /* can't take over 500 ms */
714 /* ------------------------------------------------------------------------- */
716 ulong
ide_read(struct blk_desc
*block_dev
, lbaint_t blknr
, lbaint_t blkcnt
,
719 int device
= block_dev
->devnum
;
722 unsigned char pwrsave
= 0; /* power save */
725 unsigned char lba48
= 0;
727 if (blknr
& 0x0000fffff0000000ULL
) {
728 /* more than 28 bits used, use 48bit mode */
732 debug("ide_read dev %d start " LBAF
", blocks " LBAF
" buffer at %lX\n",
733 device
, blknr
, blkcnt
, (ulong
) buffer
);
735 ide_led(DEVICE_LED(device
), 1); /* LED on */
739 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
740 c
= ide_wait(device
, IDE_TIME_OUT
);
742 if (c
& ATA_STAT_BUSY
) {
743 printf("IDE read: device %d not ready\n", device
);
747 /* first check if the drive is in Powersaving mode, if yes,
748 * increase the timeout value */
749 ide_outb(device
, ATA_COMMAND
, ATA_CMD_CHK_PWR
);
752 c
= ide_wait(device
, IDE_TIME_OUT
); /* can't take over 500 ms */
754 if (c
& ATA_STAT_BUSY
) {
755 printf("IDE read: device %d not ready\n", device
);
758 if ((c
& ATA_STAT_ERR
) == ATA_STAT_ERR
) {
759 printf("No Powersaving mode %X\n", c
);
761 c
= ide_inb(device
, ATA_SECT_CNT
);
762 debug("Powersaving %02X\n", c
);
768 while (blkcnt
-- > 0) {
770 c
= ide_wait(device
, IDE_TIME_OUT
);
772 if (c
& ATA_STAT_BUSY
) {
773 printf("IDE read: device %d not ready\n", device
);
778 /* write high bits */
779 ide_outb(device
, ATA_SECT_CNT
, 0);
780 ide_outb(device
, ATA_LBA_LOW
, (blknr
>> 24) & 0xFF);
781 #ifdef CONFIG_SYS_64BIT_LBA
782 ide_outb(device
, ATA_LBA_MID
, (blknr
>> 32) & 0xFF);
783 ide_outb(device
, ATA_LBA_HIGH
, (blknr
>> 40) & 0xFF);
785 ide_outb(device
, ATA_LBA_MID
, 0);
786 ide_outb(device
, ATA_LBA_HIGH
, 0);
790 ide_outb(device
, ATA_SECT_CNT
, 1);
791 ide_outb(device
, ATA_LBA_LOW
, (blknr
>> 0) & 0xFF);
792 ide_outb(device
, ATA_LBA_MID
, (blknr
>> 8) & 0xFF);
793 ide_outb(device
, ATA_LBA_HIGH
, (blknr
>> 16) & 0xFF);
797 ide_outb(device
, ATA_DEV_HD
,
798 ATA_LBA
| ATA_DEVICE(device
));
799 ide_outb(device
, ATA_COMMAND
, ATA_CMD_READ_EXT
);
804 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
|
805 ATA_DEVICE(device
) | ((blknr
>> 24) & 0xF));
806 ide_outb(device
, ATA_COMMAND
, ATA_CMD_READ
);
812 /* may take up to 4 sec */
813 c
= ide_wait(device
, IDE_SPIN_UP_TIME_OUT
);
816 /* can't take over 500 ms */
817 c
= ide_wait(device
, IDE_TIME_OUT
);
820 if ((c
& (ATA_STAT_DRQ
| ATA_STAT_BUSY
| ATA_STAT_ERR
)) !=
822 printf("Error (no IRQ) dev %d blk " LBAF
": status "
823 "%#02x\n", device
, blknr
, c
);
827 ide_input_data(device
, buffer
, ATA_SECTORWORDS
);
828 (void) ide_inb(device
, ATA_STATUS
); /* clear IRQ */
832 buffer
+= ATA_BLOCKSIZE
;
835 ide_led(DEVICE_LED(device
), 0); /* LED off */
839 /* ------------------------------------------------------------------------- */
842 ulong
ide_write(struct blk_desc
*block_dev
, lbaint_t blknr
, lbaint_t blkcnt
,
845 int device
= block_dev
->devnum
;
850 unsigned char lba48
= 0;
852 if (blknr
& 0x0000fffff0000000ULL
) {
853 /* more than 28 bits used, use 48bit mode */
858 ide_led(DEVICE_LED(device
), 1); /* LED on */
862 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
864 while (blkcnt
-- > 0) {
866 c
= ide_wait(device
, IDE_TIME_OUT
);
868 if (c
& ATA_STAT_BUSY
) {
869 printf("IDE read: device %d not ready\n", device
);
874 /* write high bits */
875 ide_outb(device
, ATA_SECT_CNT
, 0);
876 ide_outb(device
, ATA_LBA_LOW
, (blknr
>> 24) & 0xFF);
877 #ifdef CONFIG_SYS_64BIT_LBA
878 ide_outb(device
, ATA_LBA_MID
, (blknr
>> 32) & 0xFF);
879 ide_outb(device
, ATA_LBA_HIGH
, (blknr
>> 40) & 0xFF);
881 ide_outb(device
, ATA_LBA_MID
, 0);
882 ide_outb(device
, ATA_LBA_HIGH
, 0);
886 ide_outb(device
, ATA_SECT_CNT
, 1);
887 ide_outb(device
, ATA_LBA_LOW
, (blknr
>> 0) & 0xFF);
888 ide_outb(device
, ATA_LBA_MID
, (blknr
>> 8) & 0xFF);
889 ide_outb(device
, ATA_LBA_HIGH
, (blknr
>> 16) & 0xFF);
893 ide_outb(device
, ATA_DEV_HD
,
894 ATA_LBA
| ATA_DEVICE(device
));
895 ide_outb(device
, ATA_COMMAND
, ATA_CMD_WRITE_EXT
);
900 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
|
901 ATA_DEVICE(device
) | ((blknr
>> 24) & 0xF));
902 ide_outb(device
, ATA_COMMAND
, ATA_CMD_WRITE
);
907 /* can't take over 500 ms */
908 c
= ide_wait(device
, IDE_TIME_OUT
);
910 if ((c
& (ATA_STAT_DRQ
| ATA_STAT_BUSY
| ATA_STAT_ERR
)) !=
912 printf("Error (no IRQ) dev %d blk " LBAF
": status "
913 "%#02x\n", device
, blknr
, c
);
917 ide_output_data(device
, buffer
, ATA_SECTORWORDS
);
918 c
= ide_inb(device
, ATA_STATUS
); /* clear IRQ */
921 buffer
+= ATA_BLOCKSIZE
;
924 ide_led(DEVICE_LED(device
), 0); /* LED off */
928 /* ------------------------------------------------------------------------- */
931 * copy src to dest, skipping leading and trailing blanks and null
932 * terminate the string
933 * "len" is the size of available memory including the terminating '\0'
935 static void ident_cpy(unsigned char *dst
, unsigned char *src
,
938 unsigned char *end
, *last
;
943 /* reserve space for '\0' */
947 /* skip leading white space */
948 while ((*src
) && (src
< end
) && (*src
== ' '))
951 /* copy string, omitting trailing white space */
952 while ((*src
) && (src
< end
)) {
961 /* ------------------------------------------------------------------------- */
964 * Wait until Busy bit is off, or timeout (in ms)
967 static uchar
ide_wait(int dev
, ulong t
)
969 ulong delay
= 10 * t
; /* poll every 100 us */
972 while ((c
= ide_inb(dev
, ATA_STATUS
)) & ATA_STAT_BUSY
) {
980 /* ------------------------------------------------------------------------- */
982 #ifdef CONFIG_IDE_RESET
983 extern void ide_set_reset(int idereset
);
985 static void ide_reset(void)
990 for (i
= 0; i
< CONFIG_SYS_IDE_MAXBUS
; ++i
)
992 for (i
= 0; i
< CONFIG_SYS_IDE_MAXDEVICE
; ++i
)
993 ide_dev_desc
[i
].type
= DEV_TYPE_UNKNOWN
;
995 ide_set_reset(1); /* assert reset */
997 /* the reset signal shall be asserted for et least 25 us */
1002 /* de-assert RESET signal */
1006 for (i
= 0; i
< 250; ++i
)
1010 #endif /* CONFIG_IDE_RESET */
1012 /* ------------------------------------------------------------------------- */
1014 #if defined(CONFIG_OF_IDE_FIXUP)
1015 int ide_device_present(int dev
)
1017 if (dev
>= CONFIG_SYS_IDE_MAXBUS
)
1019 return (ide_dev_desc
[dev
].type
== DEV_TYPE_UNKNOWN
? 0 : 1);
1022 /* ------------------------------------------------------------------------- */
1025 /****************************************************************************
1029 #if defined(CONFIG_IDE_SWAP_IO)
1030 /* since ATAPI may use commands with not 4 bytes alligned length
1031 * we have our own transfer functions, 2 bytes alligned */
1032 __weak
void ide_output_data_shorts(int dev
, ushort
*sect_buf
, int shorts
)
1035 volatile ushort
*pbuf
;
1037 pbuf
= (ushort
*) (ATA_CURR_BASE(dev
) + ATA_DATA_REG
);
1038 dbuf
= (ushort
*) sect_buf
;
1040 debug("in output data shorts base for read is %lx\n",
1041 (unsigned long) pbuf
);
1049 __weak
void ide_input_data_shorts(int dev
, ushort
*sect_buf
, int shorts
)
1052 volatile ushort
*pbuf
;
1054 pbuf
= (ushort
*) (ATA_CURR_BASE(dev
) + ATA_DATA_REG
);
1055 dbuf
= (ushort
*) sect_buf
;
1057 debug("in input data shorts base for read is %lx\n",
1058 (unsigned long) pbuf
);
1066 #else /* ! CONFIG_IDE_SWAP_IO */
1067 __weak
void ide_output_data_shorts(int dev
, ushort
*sect_buf
, int shorts
)
1069 outsw(ATA_CURR_BASE(dev
) + ATA_DATA_REG
, sect_buf
, shorts
);
1072 __weak
void ide_input_data_shorts(int dev
, ushort
*sect_buf
, int shorts
)
1074 insw(ATA_CURR_BASE(dev
) + ATA_DATA_REG
, sect_buf
, shorts
);
1077 #endif /* CONFIG_IDE_SWAP_IO */
1080 * Wait until (Status & mask) == res, or timeout (in ms)
1081 * Return last status
1082 * This is used since some ATAPI CD ROMs clears their Busy Bit first
1083 * and then they set their DRQ Bit
1085 static uchar
atapi_wait_mask(int dev
, ulong t
, uchar mask
, uchar res
)
1087 ulong delay
= 10 * t
; /* poll every 100 us */
1090 /* prevents to read the status before valid */
1091 c
= ide_inb(dev
, ATA_DEV_CTL
);
1093 while (((c
= ide_inb(dev
, ATA_STATUS
)) & mask
) != res
) {
1094 /* break if error occurs (doesn't make sense to wait more) */
1095 if ((c
& ATA_STAT_ERR
) == ATA_STAT_ERR
)
1105 * issue an atapi command
1107 unsigned char atapi_issue(int device
, unsigned char *ccb
, int ccblen
,
1108 unsigned char *buffer
, int buflen
)
1110 unsigned char c
, err
, mask
, res
;
1113 ide_led(DEVICE_LED(device
), 1); /* LED on */
1117 mask
= ATA_STAT_BUSY
| ATA_STAT_DRQ
;
1119 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
1120 c
= atapi_wait_mask(device
, ATAPI_TIME_OUT
, mask
, res
);
1121 if ((c
& mask
) != res
) {
1122 printf("ATAPI_ISSUE: device %d not ready status %X\n", device
,
1127 /* write taskfile */
1128 ide_outb(device
, ATA_ERROR_REG
, 0); /* no DMA, no overlaped */
1129 ide_outb(device
, ATA_SECT_CNT
, 0);
1130 ide_outb(device
, ATA_SECT_NUM
, 0);
1131 ide_outb(device
, ATA_CYL_LOW
, (unsigned char) (buflen
& 0xFF));
1132 ide_outb(device
, ATA_CYL_HIGH
,
1133 (unsigned char) ((buflen
>> 8) & 0xFF));
1134 ide_outb(device
, ATA_DEV_HD
, ATA_LBA
| ATA_DEVICE(device
));
1136 ide_outb(device
, ATA_COMMAND
, ATAPI_CMD_PACKET
);
1139 mask
= ATA_STAT_DRQ
| ATA_STAT_BUSY
| ATA_STAT_ERR
;
1141 c
= atapi_wait_mask(device
, ATAPI_TIME_OUT
, mask
, res
);
1143 if ((c
& mask
) != res
) { /* DRQ must be 1, BSY 0 */
1144 printf("ATAPI_ISSUE: Error (no IRQ) before sending ccb dev %d status 0x%02x\n",
1150 /* write command block */
1151 ide_output_data_shorts(device
, (unsigned short *) ccb
, ccblen
/ 2);
1153 /* ATAPI Command written wait for completition */
1154 udelay(5000); /* device must set bsy */
1156 mask
= ATA_STAT_DRQ
| ATA_STAT_BUSY
| ATA_STAT_ERR
;
1158 * if no data wait for DRQ = 0 BSY = 0
1159 * if data wait for DRQ = 1 BSY = 0
1164 c
= atapi_wait_mask(device
, ATAPI_TIME_OUT
, mask
, res
);
1165 if ((c
& mask
) != res
) {
1166 if (c
& ATA_STAT_ERR
) {
1167 err
= (ide_inb(device
, ATA_ERROR_REG
)) >> 4;
1168 debug("atapi_issue 1 returned sense key %X status %02X\n",
1171 printf("ATAPI_ISSUE: (no DRQ) after sending ccb (%x) status 0x%02x\n",
1177 n
= ide_inb(device
, ATA_CYL_HIGH
);
1179 n
+= ide_inb(device
, ATA_CYL_LOW
);
1181 printf("ERROR, transfer bytes %d requested only %d\n", n
,
1186 if ((n
== 0) && (buflen
< 0)) {
1187 printf("ERROR, transfer bytes %d requested %d\n", n
, buflen
);
1192 debug("WARNING, transfer bytes %d not equal with requested %d\n",
1195 if (n
!= 0) { /* data transfer */
1196 debug("ATAPI_ISSUE: %d Bytes to transfer\n", n
);
1197 /* we transfer shorts */
1199 /* ok now decide if it is an in or output */
1200 if ((ide_inb(device
, ATA_SECT_CNT
) & 0x02) == 0) {
1201 debug("Write to device\n");
1202 ide_output_data_shorts(device
,
1203 (unsigned short *) buffer
, n
);
1205 debug("Read from device @ %p shorts %d\n", buffer
, n
);
1206 ide_input_data_shorts(device
,
1207 (unsigned short *) buffer
, n
);
1210 udelay(5000); /* seems that some CD ROMs need this... */
1211 mask
= ATA_STAT_BUSY
| ATA_STAT_ERR
;
1213 c
= atapi_wait_mask(device
, ATAPI_TIME_OUT
, mask
, res
);
1214 if ((c
& ATA_STAT_ERR
) == ATA_STAT_ERR
) {
1215 err
= (ide_inb(device
, ATA_ERROR_REG
) >> 4);
1216 debug("atapi_issue 2 returned sense key %X status %X\n", err
,
1222 ide_led(DEVICE_LED(device
), 0); /* LED off */
1227 * sending the command to atapi_issue. If an status other than good
1228 * returns, an request_sense will be issued
1231 #define ATAPI_DRIVE_NOT_READY 100
1232 #define ATAPI_UNIT_ATTN 10
1234 unsigned char atapi_issue_autoreq(int device
,
1237 unsigned char *buffer
, int buflen
)
1239 unsigned char sense_data
[18], sense_ccb
[12];
1240 unsigned char res
, key
, asc
, ascq
;
1241 int notready
, unitattn
;
1243 unitattn
= ATAPI_UNIT_ATTN
;
1244 notready
= ATAPI_DRIVE_NOT_READY
;
1247 res
= atapi_issue(device
, ccb
, ccblen
, buffer
, buflen
);
1252 return 0xFF; /* error */
1254 debug("(auto_req)atapi_issue returned sense key %X\n", res
);
1256 memset(sense_ccb
, 0, sizeof(sense_ccb
));
1257 memset(sense_data
, 0, sizeof(sense_data
));
1258 sense_ccb
[0] = ATAPI_CMD_REQ_SENSE
;
1259 sense_ccb
[4] = 18; /* allocation Length */
1261 res
= atapi_issue(device
, sense_ccb
, 12, sense_data
, 18);
1262 key
= (sense_data
[2] & 0xF);
1263 asc
= (sense_data
[12]);
1264 ascq
= (sense_data
[13]);
1266 debug("ATAPI_CMD_REQ_SENSE returned %x\n", res
);
1267 debug(" Sense page: %02X key %02X ASC %02X ASCQ %02X\n",
1268 sense_data
[0], key
, asc
, ascq
);
1271 return 0; /* ok device ready */
1273 if ((key
== 6) || (asc
== 0x29) || (asc
== 0x28)) { /* Unit Attention */
1274 if (unitattn
-- > 0) {
1278 printf("Unit Attention, tried %d\n", ATAPI_UNIT_ATTN
);
1281 if ((asc
== 0x4) && (ascq
== 0x1)) {
1282 /* not ready, but will be ready soon */
1283 if (notready
-- > 0) {
1287 printf("Drive not ready, tried %d times\n",
1288 ATAPI_DRIVE_NOT_READY
);
1292 debug("Media not present\n");
1296 printf("ERROR: Unknown Sense key %02X ASC %02X ASCQ %02X\n", key
, asc
,
1299 debug("ERROR Sense key %02X ASC %02X ASCQ %02X\n", key
, asc
, ascq
);
1304 static void atapi_inquiry(struct blk_desc
*dev_desc
)
1306 unsigned char ccb
[12]; /* Command descriptor block */
1307 unsigned char iobuf
[64]; /* temp buf */
1311 device
= dev_desc
->devnum
;
1312 dev_desc
->type
= DEV_TYPE_UNKNOWN
; /* not yet valid */
1313 dev_desc
->block_read
= atapi_read
;
1315 memset(ccb
, 0, sizeof(ccb
));
1316 memset(iobuf
, 0, sizeof(iobuf
));
1318 ccb
[0] = ATAPI_CMD_INQUIRY
;
1319 ccb
[4] = 40; /* allocation Legnth */
1320 c
= atapi_issue_autoreq(device
, ccb
, 12, (unsigned char *) iobuf
, 40);
1322 debug("ATAPI_CMD_INQUIRY returned %x\n", c
);
1326 /* copy device ident strings */
1327 ident_cpy((unsigned char *) dev_desc
->vendor
, &iobuf
[8], 8);
1328 ident_cpy((unsigned char *) dev_desc
->product
, &iobuf
[16], 16);
1329 ident_cpy((unsigned char *) dev_desc
->revision
, &iobuf
[32], 5);
1333 dev_desc
->blksz
= 0;
1334 dev_desc
->log2blksz
= LOG2_INVALID(typeof(dev_desc
->log2blksz
));
1335 dev_desc
->type
= iobuf
[0] & 0x1f;
1337 if ((iobuf
[1] & 0x80) == 0x80)
1338 dev_desc
->removable
= 1;
1340 dev_desc
->removable
= 0;
1342 memset(ccb
, 0, sizeof(ccb
));
1343 memset(iobuf
, 0, sizeof(iobuf
));
1344 ccb
[0] = ATAPI_CMD_START_STOP
;
1345 ccb
[4] = 0x03; /* start */
1347 c
= atapi_issue_autoreq(device
, ccb
, 12, (unsigned char *) iobuf
, 0);
1349 debug("ATAPI_CMD_START_STOP returned %x\n", c
);
1353 memset(ccb
, 0, sizeof(ccb
));
1354 memset(iobuf
, 0, sizeof(iobuf
));
1355 c
= atapi_issue_autoreq(device
, ccb
, 12, (unsigned char *) iobuf
, 0);
1357 debug("ATAPI_CMD_UNIT_TEST_READY returned %x\n", c
);
1361 memset(ccb
, 0, sizeof(ccb
));
1362 memset(iobuf
, 0, sizeof(iobuf
));
1363 ccb
[0] = ATAPI_CMD_READ_CAP
;
1364 c
= atapi_issue_autoreq(device
, ccb
, 12, (unsigned char *) iobuf
, 8);
1365 debug("ATAPI_CMD_READ_CAP returned %x\n", c
);
1369 debug("Read Cap: LBA %02X%02X%02X%02X blksize %02X%02X%02X%02X\n",
1370 iobuf
[0], iobuf
[1], iobuf
[2], iobuf
[3],
1371 iobuf
[4], iobuf
[5], iobuf
[6], iobuf
[7]);
1373 dev_desc
->lba
= ((unsigned long) iobuf
[0] << 24) +
1374 ((unsigned long) iobuf
[1] << 16) +
1375 ((unsigned long) iobuf
[2] << 8) + ((unsigned long) iobuf
[3]);
1376 dev_desc
->blksz
= ((unsigned long) iobuf
[4] << 24) +
1377 ((unsigned long) iobuf
[5] << 16) +
1378 ((unsigned long) iobuf
[6] << 8) + ((unsigned long) iobuf
[7]);
1379 dev_desc
->log2blksz
= LOG2(dev_desc
->blksz
);
1381 /* ATAPI devices cannot use 48bit addressing (ATA/ATAPI v7) */
1382 dev_desc
->lba48
= 0;
1390 * we transfer only one block per command, since the multiple DRQ per
1391 * command is not yet implemented
1393 #define ATAPI_READ_MAX_BYTES 2048 /* we read max 2kbytes */
1394 #define ATAPI_READ_BLOCK_SIZE 2048 /* assuming CD part */
1395 #define ATAPI_READ_MAX_BLOCK (ATAPI_READ_MAX_BYTES/ATAPI_READ_BLOCK_SIZE)
1397 ulong
atapi_read(struct blk_desc
*block_dev
, lbaint_t blknr
, lbaint_t blkcnt
,
1400 int device
= block_dev
->devnum
;
1402 unsigned char ccb
[12]; /* Command descriptor block */
1405 debug("atapi_read dev %d start " LBAF
" blocks " LBAF
" buffer at %lX\n",
1406 device
, blknr
, blkcnt
, (ulong
) buffer
);
1409 if (blkcnt
> ATAPI_READ_MAX_BLOCK
)
1410 cnt
= ATAPI_READ_MAX_BLOCK
;
1414 ccb
[0] = ATAPI_CMD_READ_12
;
1415 ccb
[1] = 0; /* reserved */
1416 ccb
[2] = (unsigned char) (blknr
>> 24) & 0xFF; /* MSB Block */
1417 ccb
[3] = (unsigned char) (blknr
>> 16) & 0xFF; /* */
1418 ccb
[4] = (unsigned char) (blknr
>> 8) & 0xFF;
1419 ccb
[5] = (unsigned char) blknr
& 0xFF; /* LSB Block */
1420 ccb
[6] = (unsigned char) (cnt
>> 24) & 0xFF; /* MSB Block cnt */
1421 ccb
[7] = (unsigned char) (cnt
>> 16) & 0xFF;
1422 ccb
[8] = (unsigned char) (cnt
>> 8) & 0xFF;
1423 ccb
[9] = (unsigned char) cnt
& 0xFF; /* LSB Block */
1424 ccb
[10] = 0; /* reserved */
1425 ccb
[11] = 0; /* reserved */
1427 if (atapi_issue_autoreq(device
, ccb
, 12,
1428 (unsigned char *) buffer
,
1429 cnt
* ATAPI_READ_BLOCK_SIZE
)
1436 buffer
+= (cnt
* ATAPI_READ_BLOCK_SIZE
);
1437 } while (blkcnt
> 0);
1441 /* ------------------------------------------------------------------------- */
1443 #endif /* CONFIG_ATAPI */
1445 U_BOOT_CMD(ide
, 5, 1, do_ide
,
1447 "reset - reset IDE controller\n"
1448 "ide info - show available IDE devices\n"
1449 "ide device [dev] - show or set current device\n"
1450 "ide part [dev] - print partition table of one or all IDE devices\n"
1451 "ide read addr blk# cnt\n"
1452 "ide write addr blk# cnt - read/write `cnt'"
1453 " blocks starting at block `blk#'\n"
1454 " to/from memory address `addr'");
1456 U_BOOT_CMD(diskboot
, 3, 1, do_diskboot
,
1457 "boot from IDE device", "loadAddr dev:part");