| /* |
| * (C) Copyright 2000-2011 |
| * Wolfgang Denk, DENX Software Engineering, wd@denx.de. |
| * |
| * SPDX-License-Identifier: GPL-2.0+ |
| */ |
| |
| /* |
| * IDE support |
| */ |
| |
| #include <common.h> |
| #include <config.h> |
| #include <watchdog.h> |
| #include <command.h> |
| #include <image.h> |
| #include <asm/byteorder.h> |
| #include <asm/io.h> |
| |
| #if defined(CONFIG_IDE_8xx_DIRECT) || defined(CONFIG_IDE_PCMCIA) |
| # include <pcmcia.h> |
| #endif |
| |
| #include <ide.h> |
| #include <ata.h> |
| |
| #ifdef CONFIG_STATUS_LED |
| # include <status_led.h> |
| #endif |
| |
| #ifdef __PPC__ |
| # define EIEIO __asm__ volatile ("eieio") |
| # define SYNC __asm__ volatile ("sync") |
| #else |
| # define EIEIO /* nothing */ |
| # define SYNC /* nothing */ |
| #endif |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* Current I/O Device */ |
| static int curr_device = -1; |
| |
| /* Current offset for IDE0 / IDE1 bus access */ |
| ulong ide_bus_offset[CONFIG_SYS_IDE_MAXBUS] = { |
| #if defined(CONFIG_SYS_ATA_IDE0_OFFSET) |
| CONFIG_SYS_ATA_IDE0_OFFSET, |
| #endif |
| #if defined(CONFIG_SYS_ATA_IDE1_OFFSET) && (CONFIG_SYS_IDE_MAXBUS > 1) |
| CONFIG_SYS_ATA_IDE1_OFFSET, |
| #endif |
| }; |
| |
| static int ide_bus_ok[CONFIG_SYS_IDE_MAXBUS]; |
| |
| struct blk_desc ide_dev_desc[CONFIG_SYS_IDE_MAXDEVICE]; |
| /* ------------------------------------------------------------------------- */ |
| |
| #ifdef CONFIG_IDE_RESET |
| static void ide_reset (void); |
| #else |
| #define ide_reset() /* dummy */ |
| #endif |
| |
| static void ide_ident(struct blk_desc *dev_desc); |
| static uchar ide_wait (int dev, ulong t); |
| |
| #define IDE_TIME_OUT 2000 /* 2 sec timeout */ |
| |
| #define ATAPI_TIME_OUT 7000 /* 7 sec timeout (5 sec seems to work...) */ |
| |
| #define IDE_SPIN_UP_TIME_OUT 5000 /* 5 sec spin-up timeout */ |
| |
| static void ident_cpy (unsigned char *dest, unsigned char *src, unsigned int len); |
| |
| #ifndef CONFIG_SYS_ATA_PORT_ADDR |
| #define CONFIG_SYS_ATA_PORT_ADDR(port) (port) |
| #endif |
| |
| #ifdef CONFIG_ATAPI |
| static void atapi_inquiry(struct blk_desc *dev_desc); |
| static ulong atapi_read(struct blk_desc *block_dev, lbaint_t blknr, |
| lbaint_t blkcnt, void *buffer); |
| #endif |
| |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| int do_ide(cmd_tbl_t *cmdtp, int flag, int argc, char *const argv[]) |
| { |
| int rcode = 0; |
| |
| switch (argc) { |
| case 0: |
| case 1: |
| return CMD_RET_USAGE; |
| case 2: |
| if (strncmp(argv[1], "res", 3) == 0) { |
| puts("\nReset IDE" |
| #ifdef CONFIG_IDE_8xx_DIRECT |
| " on PCMCIA " PCMCIA_SLOT_MSG |
| #endif |
| ": "); |
| |
| ide_init(); |
| return 0; |
| } else if (strncmp(argv[1], "inf", 3) == 0) { |
| int i; |
| |
| putc('\n'); |
| |
| for (i = 0; i < CONFIG_SYS_IDE_MAXDEVICE; ++i) { |
| if (ide_dev_desc[i].type == DEV_TYPE_UNKNOWN) |
| continue; /* list only known devices */ |
| printf("IDE device %d: ", i); |
| dev_print(&ide_dev_desc[i]); |
| } |
| return 0; |
| |
| } else if (strncmp(argv[1], "dev", 3) == 0) { |
| if ((curr_device < 0) |
| || (curr_device >= CONFIG_SYS_IDE_MAXDEVICE)) { |
| puts("\nno IDE devices available\n"); |
| return 1; |
| } |
| printf("\nIDE device %d: ", curr_device); |
| dev_print(&ide_dev_desc[curr_device]); |
| return 0; |
| } else if (strncmp(argv[1], "part", 4) == 0) { |
| int dev, ok; |
| |
| for (ok = 0, dev = 0; |
| dev < CONFIG_SYS_IDE_MAXDEVICE; |
| ++dev) { |
| if (ide_dev_desc[dev].part_type != |
| PART_TYPE_UNKNOWN) { |
| ++ok; |
| if (dev) |
| putc('\n'); |
| print_part(&ide_dev_desc[dev]); |
| } |
| } |
| if (!ok) { |
| puts("\nno IDE devices available\n"); |
| rcode++; |
| } |
| return rcode; |
| } |
| return CMD_RET_USAGE; |
| case 3: |
| if (strncmp(argv[1], "dev", 3) == 0) { |
| int dev = (int) simple_strtoul(argv[2], NULL, 10); |
| |
| printf("\nIDE device %d: ", dev); |
| if (dev >= CONFIG_SYS_IDE_MAXDEVICE) { |
| puts("unknown device\n"); |
| return 1; |
| } |
| dev_print(&ide_dev_desc[dev]); |
| /*ide_print (dev); */ |
| |
| if (ide_dev_desc[dev].type == DEV_TYPE_UNKNOWN) |
| return 1; |
| |
| curr_device = dev; |
| |
| puts("... is now current device\n"); |
| |
| return 0; |
| } else if (strncmp(argv[1], "part", 4) == 0) { |
| int dev = (int) simple_strtoul(argv[2], NULL, 10); |
| |
| if (ide_dev_desc[dev].part_type != PART_TYPE_UNKNOWN) { |
| print_part(&ide_dev_desc[dev]); |
| } else { |
| printf("\nIDE device %d not available\n", |
| dev); |
| rcode = 1; |
| } |
| return rcode; |
| } |
| |
| return CMD_RET_USAGE; |
| default: |
| /* at least 4 args */ |
| |
| if (strcmp(argv[1], "read") == 0) { |
| ulong addr = simple_strtoul(argv[2], NULL, 16); |
| ulong cnt = simple_strtoul(argv[4], NULL, 16); |
| struct blk_desc *dev_desc; |
| ulong n; |
| |
| #ifdef CONFIG_SYS_64BIT_LBA |
| lbaint_t blk = simple_strtoull(argv[3], NULL, 16); |
| |
| printf("\nIDE read: device %d block # %lld, count %ld ... ", |
| curr_device, blk, cnt); |
| #else |
| lbaint_t blk = simple_strtoul(argv[3], NULL, 16); |
| |
| printf("\nIDE read: device %d block # %ld, count %ld ... ", |
| curr_device, blk, cnt); |
| #endif |
| |
| dev_desc = &ide_dev_desc[curr_device]; |
| n = dev_desc->block_read(dev_desc, blk, cnt, |
| (ulong *)addr); |
| /* flush cache after read */ |
| flush_cache(addr, |
| cnt * ide_dev_desc[curr_device].blksz); |
| |
| printf("%ld blocks read: %s\n", |
| n, (n == cnt) ? "OK" : "ERROR"); |
| if (n == cnt) |
| return 0; |
| else |
| return 1; |
| } else if (strcmp(argv[1], "write") == 0) { |
| ulong addr = simple_strtoul(argv[2], NULL, 16); |
| ulong cnt = simple_strtoul(argv[4], NULL, 16); |
| ulong n; |
| |
| #ifdef CONFIG_SYS_64BIT_LBA |
| lbaint_t blk = simple_strtoull(argv[3], NULL, 16); |
| |
| printf("\nIDE write: device %d block # %lld, count %ld ... ", |
| curr_device, blk, cnt); |
| #else |
| lbaint_t blk = simple_strtoul(argv[3], NULL, 16); |
| |
| printf("\nIDE write: device %d block # %ld, count %ld ... ", |
| curr_device, blk, cnt); |
| #endif |
| n = ide_write(&ide_dev_desc[curr_device], blk, cnt, |
| (ulong *)addr); |
| |
| printf("%ld blocks written: %s\n", |
| n, (n == cnt) ? "OK" : "ERROR"); |
| if (n == cnt) |
| return 0; |
| else |
| return 1; |
| } else { |
| return CMD_RET_USAGE; |
| } |
| |
| return rcode; |
| } |
| } |
| |
| int do_diskboot(cmd_tbl_t *cmdtp, int flag, int argc, char *const argv[]) |
| { |
| return common_diskboot(cmdtp, "ide", argc, argv); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| __weak void ide_led(uchar led, uchar status) |
| { |
| #if defined(CONFIG_IDE_LED) && defined(PER8_BASE) /* required by LED_PORT */ |
| static uchar led_buffer; /* Buffer for current LED status */ |
| |
| uchar *led_port = LED_PORT; |
| |
| if (status) /* switch LED on */ |
| led_buffer |= led; |
| else /* switch LED off */ |
| led_buffer &= ~led; |
| |
| *led_port = led_buffer; |
| #endif |
| } |
| |
| #ifndef CONFIG_IDE_LED /* define LED macros, they are not used anyways */ |
| # define DEVICE_LED(x) 0 |
| # define LED_IDE1 1 |
| # define LED_IDE2 2 |
| #endif |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| __weak void ide_outb(int dev, int port, unsigned char val) |
| { |
| debug("ide_outb (dev= %d, port= 0x%x, val= 0x%02x) : @ 0x%08lx\n", |
| dev, port, val, |
| (ATA_CURR_BASE(dev) + CONFIG_SYS_ATA_PORT_ADDR(port))); |
| |
| #if defined(CONFIG_IDE_AHB) |
| if (port) { |
| /* write command */ |
| ide_write_register(dev, port, val); |
| } else { |
| /* write data */ |
| outb(val, (ATA_CURR_BASE(dev))); |
| } |
| #else |
| outb(val, (ATA_CURR_BASE(dev) + CONFIG_SYS_ATA_PORT_ADDR(port))); |
| #endif |
| } |
| |
| __weak unsigned char ide_inb(int dev, int port) |
| { |
| uchar val; |
| |
| #if defined(CONFIG_IDE_AHB) |
| val = ide_read_register(dev, port); |
| #else |
| val = inb((ATA_CURR_BASE(dev) + CONFIG_SYS_ATA_PORT_ADDR(port))); |
| #endif |
| |
| debug("ide_inb (dev= %d, port= 0x%x) : @ 0x%08lx -> 0x%02x\n", |
| dev, port, |
| (ATA_CURR_BASE(dev) + CONFIG_SYS_ATA_PORT_ADDR(port)), val); |
| return val; |
| } |
| |
| void ide_init(void) |
| { |
| unsigned char c; |
| int i, bus; |
| |
| #ifdef CONFIG_IDE_8xx_PCCARD |
| extern int ide_devices_found; /* Initialized in check_ide_device() */ |
| #endif /* CONFIG_IDE_8xx_PCCARD */ |
| |
| #ifdef CONFIG_IDE_PREINIT |
| WATCHDOG_RESET(); |
| |
| if (ide_preinit()) { |
| puts("ide_preinit failed\n"); |
| return; |
| } |
| #endif /* CONFIG_IDE_PREINIT */ |
| |
| WATCHDOG_RESET(); |
| |
| /* |
| * Reset the IDE just to be sure. |
| * Light LED's to show |
| */ |
| ide_led((LED_IDE1 | LED_IDE2), 1); /* LED's on */ |
| |
| /* ATAPI Drives seems to need a proper IDE Reset */ |
| ide_reset(); |
| |
| #ifdef CONFIG_IDE_INIT_POSTRESET |
| WATCHDOG_RESET(); |
| |
| if (ide_init_postreset()) { |
| puts("ide_preinit_postreset failed\n"); |
| return; |
| } |
| #endif /* CONFIG_IDE_INIT_POSTRESET */ |
| |
| /* |
| * Wait for IDE to get ready. |
| * According to spec, this can take up to 31 seconds! |
| */ |
| for (bus = 0; bus < CONFIG_SYS_IDE_MAXBUS; ++bus) { |
| int dev = |
| bus * (CONFIG_SYS_IDE_MAXDEVICE / |
| CONFIG_SYS_IDE_MAXBUS); |
| |
| #ifdef CONFIG_IDE_8xx_PCCARD |
| /* Skip non-ide devices from probing */ |
| if ((ide_devices_found & (1 << bus)) == 0) { |
| ide_led((LED_IDE1 | LED_IDE2), 0); /* LED's off */ |
| continue; |
| } |
| #endif |
| printf("Bus %d: ", bus); |
| |
| ide_bus_ok[bus] = 0; |
| |
| /* Select device |
| */ |
| udelay(100000); /* 100 ms */ |
| ide_outb(dev, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(dev)); |
| udelay(100000); /* 100 ms */ |
| i = 0; |
| do { |
| udelay(10000); /* 10 ms */ |
| |
| c = ide_inb(dev, ATA_STATUS); |
| i++; |
| if (i > (ATA_RESET_TIME * 100)) { |
| puts("** Timeout **\n"); |
| /* LED's off */ |
| ide_led((LED_IDE1 | LED_IDE2), 0); |
| return; |
| } |
| if ((i >= 100) && ((i % 100) == 0)) |
| putc('.'); |
| |
| } while (c & ATA_STAT_BUSY); |
| |
| if (c & (ATA_STAT_BUSY | ATA_STAT_FAULT)) { |
| puts("not available "); |
| debug("Status = 0x%02X ", c); |
| #ifndef CONFIG_ATAPI /* ATAPI Devices do not set DRDY */ |
| } else if ((c & ATA_STAT_READY) == 0) { |
| puts("not available "); |
| debug("Status = 0x%02X ", c); |
| #endif |
| } else { |
| puts("OK "); |
| ide_bus_ok[bus] = 1; |
| } |
| WATCHDOG_RESET(); |
| } |
| |
| putc('\n'); |
| |
| ide_led((LED_IDE1 | LED_IDE2), 0); /* LED's off */ |
| |
| curr_device = -1; |
| for (i = 0; i < CONFIG_SYS_IDE_MAXDEVICE; ++i) { |
| int led = (IDE_BUS(i) == 0) ? LED_IDE1 : LED_IDE2; |
| ide_dev_desc[i].type = DEV_TYPE_UNKNOWN; |
| ide_dev_desc[i].if_type = IF_TYPE_IDE; |
| ide_dev_desc[i].dev = i; |
| ide_dev_desc[i].part_type = PART_TYPE_UNKNOWN; |
| ide_dev_desc[i].blksz = 0; |
| ide_dev_desc[i].log2blksz = |
| LOG2_INVALID(typeof(ide_dev_desc[i].log2blksz)); |
| ide_dev_desc[i].lba = 0; |
| ide_dev_desc[i].block_read = ide_read; |
| ide_dev_desc[i].block_write = ide_write; |
| if (!ide_bus_ok[IDE_BUS(i)]) |
| continue; |
| ide_led(led, 1); /* LED on */ |
| ide_ident(&ide_dev_desc[i]); |
| ide_led(led, 0); /* LED off */ |
| dev_print(&ide_dev_desc[i]); |
| |
| if ((ide_dev_desc[i].lba > 0) && (ide_dev_desc[i].blksz > 0)) { |
| /* initialize partition type */ |
| init_part(&ide_dev_desc[i]); |
| if (curr_device < 0) |
| curr_device = i; |
| } |
| } |
| WATCHDOG_RESET(); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| #ifdef CONFIG_PARTITIONS |
| struct blk_desc *ide_get_dev(int dev) |
| { |
| return (dev < CONFIG_SYS_IDE_MAXDEVICE) ? &ide_dev_desc[dev] : NULL; |
| } |
| #endif |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* We only need to swap data if we are running on a big endian cpu. */ |
| #if defined(__LITTLE_ENDIAN) |
| __weak void ide_input_swap_data(int dev, ulong *sect_buf, int words) |
| { |
| ide_input_data(dev, sect_buf, words); |
| } |
| #else |
| __weak void ide_input_swap_data(int dev, ulong *sect_buf, int words) |
| { |
| volatile ushort *pbuf = |
| (ushort *) (ATA_CURR_BASE(dev) + ATA_DATA_REG); |
| ushort *dbuf = (ushort *) sect_buf; |
| |
| debug("in input swap data base for read is %lx\n", |
| (unsigned long) pbuf); |
| |
| while (words--) { |
| #ifdef __MIPS__ |
| *dbuf++ = swab16p((u16 *) pbuf); |
| *dbuf++ = swab16p((u16 *) pbuf); |
| #else |
| *dbuf++ = ld_le16(pbuf); |
| *dbuf++ = ld_le16(pbuf); |
| #endif /* !MIPS */ |
| } |
| } |
| #endif /* __LITTLE_ENDIAN */ |
| |
| |
| #if defined(CONFIG_IDE_SWAP_IO) |
| __weak void ide_output_data(int dev, const ulong *sect_buf, int words) |
| { |
| ushort *dbuf; |
| volatile ushort *pbuf; |
| |
| pbuf = (ushort *) (ATA_CURR_BASE(dev) + ATA_DATA_REG); |
| dbuf = (ushort *) sect_buf; |
| while (words--) { |
| EIEIO; |
| *pbuf = *dbuf++; |
| EIEIO; |
| *pbuf = *dbuf++; |
| } |
| } |
| #else /* ! CONFIG_IDE_SWAP_IO */ |
| __weak void ide_output_data(int dev, const ulong *sect_buf, int words) |
| { |
| #if defined(CONFIG_IDE_AHB) |
| ide_write_data(dev, sect_buf, words); |
| #else |
| outsw(ATA_CURR_BASE(dev) + ATA_DATA_REG, sect_buf, words << 1); |
| #endif |
| } |
| #endif /* CONFIG_IDE_SWAP_IO */ |
| |
| #if defined(CONFIG_IDE_SWAP_IO) |
| __weak void ide_input_data(int dev, ulong *sect_buf, int words) |
| { |
| ushort *dbuf; |
| volatile ushort *pbuf; |
| |
| pbuf = (ushort *) (ATA_CURR_BASE(dev) + ATA_DATA_REG); |
| dbuf = (ushort *) sect_buf; |
| |
| debug("in input data base for read is %lx\n", (unsigned long) pbuf); |
| |
| while (words--) { |
| EIEIO; |
| *dbuf++ = *pbuf; |
| EIEIO; |
| *dbuf++ = *pbuf; |
| } |
| } |
| #else /* ! CONFIG_IDE_SWAP_IO */ |
| __weak void ide_input_data(int dev, ulong *sect_buf, int words) |
| { |
| #if defined(CONFIG_IDE_AHB) |
| ide_read_data(dev, sect_buf, words); |
| #else |
| insw(ATA_CURR_BASE(dev) + ATA_DATA_REG, sect_buf, words << 1); |
| #endif |
| } |
| |
| #endif /* CONFIG_IDE_SWAP_IO */ |
| |
| /* ------------------------------------------------------------------------- |
| */ |
| static void ide_ident(struct blk_desc *dev_desc) |
| { |
| unsigned char c; |
| hd_driveid_t iop; |
| |
| #ifdef CONFIG_ATAPI |
| int retries = 0; |
| #endif |
| int device; |
| |
| device = dev_desc->dev; |
| printf(" Device %d: ", device); |
| |
| ide_led(DEVICE_LED(device), 1); /* LED on */ |
| /* Select device |
| */ |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| dev_desc->if_type = IF_TYPE_IDE; |
| #ifdef CONFIG_ATAPI |
| |
| retries = 0; |
| |
| /* Warning: This will be tricky to read */ |
| while (retries <= 1) { |
| /* check signature */ |
| if ((ide_inb(device, ATA_SECT_CNT) == 0x01) && |
| (ide_inb(device, ATA_SECT_NUM) == 0x01) && |
| (ide_inb(device, ATA_CYL_LOW) == 0x14) && |
| (ide_inb(device, ATA_CYL_HIGH) == 0xEB)) { |
| /* ATAPI Signature found */ |
| dev_desc->if_type = IF_TYPE_ATAPI; |
| /* |
| * Start Ident Command |
| */ |
| ide_outb(device, ATA_COMMAND, ATAPI_CMD_IDENT); |
| /* |
| * Wait for completion - ATAPI devices need more time |
| * to become ready |
| */ |
| c = ide_wait(device, ATAPI_TIME_OUT); |
| } else |
| #endif |
| { |
| /* |
| * Start Ident Command |
| */ |
| ide_outb(device, ATA_COMMAND, ATA_CMD_IDENT); |
| |
| /* |
| * Wait for completion |
| */ |
| c = ide_wait(device, IDE_TIME_OUT); |
| } |
| ide_led(DEVICE_LED(device), 0); /* LED off */ |
| |
| if (((c & ATA_STAT_DRQ) == 0) || |
| ((c & (ATA_STAT_FAULT | ATA_STAT_ERR)) != 0)) { |
| #ifdef CONFIG_ATAPI |
| { |
| /* |
| * Need to soft reset the device |
| * in case it's an ATAPI... |
| */ |
| debug("Retrying...\n"); |
| ide_outb(device, ATA_DEV_HD, |
| ATA_LBA | ATA_DEVICE(device)); |
| udelay(100000); |
| ide_outb(device, ATA_COMMAND, 0x08); |
| udelay(500000); /* 500 ms */ |
| } |
| /* |
| * Select device |
| */ |
| ide_outb(device, ATA_DEV_HD, |
| ATA_LBA | ATA_DEVICE(device)); |
| retries++; |
| #else |
| return; |
| #endif |
| } |
| #ifdef CONFIG_ATAPI |
| else |
| break; |
| } /* see above - ugly to read */ |
| |
| if (retries == 2) /* Not found */ |
| return; |
| #endif |
| |
| ide_input_swap_data(device, (ulong *)&iop, ATA_SECTORWORDS); |
| |
| ident_cpy((unsigned char *) dev_desc->revision, iop.fw_rev, |
| sizeof(dev_desc->revision)); |
| ident_cpy((unsigned char *) dev_desc->vendor, iop.model, |
| sizeof(dev_desc->vendor)); |
| ident_cpy((unsigned char *) dev_desc->product, iop.serial_no, |
| sizeof(dev_desc->product)); |
| #ifdef __LITTLE_ENDIAN |
| /* |
| * firmware revision, model, and serial number have Big Endian Byte |
| * order in Word. Convert all three to little endian. |
| * |
| * See CF+ and CompactFlash Specification Revision 2.0: |
| * 6.2.1.6: Identify Drive, Table 39 for more details |
| */ |
| |
| strswab(dev_desc->revision); |
| strswab(dev_desc->vendor); |
| strswab(dev_desc->product); |
| #endif /* __LITTLE_ENDIAN */ |
| |
| if ((iop.config & 0x0080) == 0x0080) |
| dev_desc->removable = 1; |
| else |
| dev_desc->removable = 0; |
| |
| #ifdef CONFIG_ATAPI |
| if (dev_desc->if_type == IF_TYPE_ATAPI) { |
| atapi_inquiry(dev_desc); |
| return; |
| } |
| #endif /* CONFIG_ATAPI */ |
| |
| #ifdef __BIG_ENDIAN |
| /* swap shorts */ |
| dev_desc->lba = (iop.lba_capacity << 16) | (iop.lba_capacity >> 16); |
| #else /* ! __BIG_ENDIAN */ |
| /* |
| * do not swap shorts on little endian |
| * |
| * See CF+ and CompactFlash Specification Revision 2.0: |
| * 6.2.1.6: Identfy Drive, Table 39, Word Address 57-58 for details. |
| */ |
| dev_desc->lba = iop.lba_capacity; |
| #endif /* __BIG_ENDIAN */ |
| |
| #ifdef CONFIG_LBA48 |
| if (iop.command_set_2 & 0x0400) { /* LBA 48 support */ |
| dev_desc->lba48 = 1; |
| dev_desc->lba = (unsigned long long) iop.lba48_capacity[0] | |
| ((unsigned long long) iop.lba48_capacity[1] << 16) | |
| ((unsigned long long) iop.lba48_capacity[2] << 32) | |
| ((unsigned long long) iop.lba48_capacity[3] << 48); |
| } else { |
| dev_desc->lba48 = 0; |
| } |
| #endif /* CONFIG_LBA48 */ |
| /* assuming HD */ |
| dev_desc->type = DEV_TYPE_HARDDISK; |
| dev_desc->blksz = ATA_BLOCKSIZE; |
| dev_desc->log2blksz = LOG2(dev_desc->blksz); |
| dev_desc->lun = 0; /* just to fill something in... */ |
| |
| #if 0 /* only used to test the powersaving mode, |
| * if enabled, the drive goes after 5 sec |
| * in standby mode */ |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| c = ide_wait(device, IDE_TIME_OUT); |
| ide_outb(device, ATA_SECT_CNT, 1); |
| ide_outb(device, ATA_LBA_LOW, 0); |
| ide_outb(device, ATA_LBA_MID, 0); |
| ide_outb(device, ATA_LBA_HIGH, 0); |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| ide_outb(device, ATA_COMMAND, 0xe3); |
| udelay(50); |
| c = ide_wait(device, IDE_TIME_OUT); /* can't take over 500 ms */ |
| #endif |
| } |
| |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| ulong ide_read(struct blk_desc *block_dev, lbaint_t blknr, lbaint_t blkcnt, |
| void *buffer) |
| { |
| int device = block_dev->dev; |
| ulong n = 0; |
| unsigned char c; |
| unsigned char pwrsave = 0; /* power save */ |
| |
| #ifdef CONFIG_LBA48 |
| unsigned char lba48 = 0; |
| |
| if (blknr & 0x0000fffff0000000ULL) { |
| /* more than 28 bits used, use 48bit mode */ |
| lba48 = 1; |
| } |
| #endif |
| debug("ide_read dev %d start " LBAF ", blocks " LBAF " buffer at %lX\n", |
| device, blknr, blkcnt, (ulong) buffer); |
| |
| ide_led(DEVICE_LED(device), 1); /* LED on */ |
| |
| /* Select device |
| */ |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| c = ide_wait(device, IDE_TIME_OUT); |
| |
| if (c & ATA_STAT_BUSY) { |
| printf("IDE read: device %d not ready\n", device); |
| goto IDE_READ_E; |
| } |
| |
| /* first check if the drive is in Powersaving mode, if yes, |
| * increase the timeout value */ |
| ide_outb(device, ATA_COMMAND, ATA_CMD_CHK_PWR); |
| udelay(50); |
| |
| c = ide_wait(device, IDE_TIME_OUT); /* can't take over 500 ms */ |
| |
| if (c & ATA_STAT_BUSY) { |
| printf("IDE read: device %d not ready\n", device); |
| goto IDE_READ_E; |
| } |
| if ((c & ATA_STAT_ERR) == ATA_STAT_ERR) { |
| printf("No Powersaving mode %X\n", c); |
| } else { |
| c = ide_inb(device, ATA_SECT_CNT); |
| debug("Powersaving %02X\n", c); |
| if (c == 0) |
| pwrsave = 1; |
| } |
| |
| |
| while (blkcnt-- > 0) { |
| |
| c = ide_wait(device, IDE_TIME_OUT); |
| |
| if (c & ATA_STAT_BUSY) { |
| printf("IDE read: device %d not ready\n", device); |
| break; |
| } |
| #ifdef CONFIG_LBA48 |
| if (lba48) { |
| /* write high bits */ |
| ide_outb(device, ATA_SECT_CNT, 0); |
| ide_outb(device, ATA_LBA_LOW, (blknr >> 24) & 0xFF); |
| #ifdef CONFIG_SYS_64BIT_LBA |
| ide_outb(device, ATA_LBA_MID, (blknr >> 32) & 0xFF); |
| ide_outb(device, ATA_LBA_HIGH, (blknr >> 40) & 0xFF); |
| #else |
| ide_outb(device, ATA_LBA_MID, 0); |
| ide_outb(device, ATA_LBA_HIGH, 0); |
| #endif |
| } |
| #endif |
| ide_outb(device, ATA_SECT_CNT, 1); |
| ide_outb(device, ATA_LBA_LOW, (blknr >> 0) & 0xFF); |
| ide_outb(device, ATA_LBA_MID, (blknr >> 8) & 0xFF); |
| ide_outb(device, ATA_LBA_HIGH, (blknr >> 16) & 0xFF); |
| |
| #ifdef CONFIG_LBA48 |
| if (lba48) { |
| ide_outb(device, ATA_DEV_HD, |
| ATA_LBA | ATA_DEVICE(device)); |
| ide_outb(device, ATA_COMMAND, ATA_CMD_READ_EXT); |
| |
| } else |
| #endif |
| { |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | |
| ATA_DEVICE(device) | ((blknr >> 24) & 0xF)); |
| ide_outb(device, ATA_COMMAND, ATA_CMD_READ); |
| } |
| |
| udelay(50); |
| |
| if (pwrsave) { |
| /* may take up to 4 sec */ |
| c = ide_wait(device, IDE_SPIN_UP_TIME_OUT); |
| pwrsave = 0; |
| } else { |
| /* can't take over 500 ms */ |
| c = ide_wait(device, IDE_TIME_OUT); |
| } |
| |
| if ((c & (ATA_STAT_DRQ | ATA_STAT_BUSY | ATA_STAT_ERR)) != |
| ATA_STAT_DRQ) { |
| printf("Error (no IRQ) dev %d blk " LBAF ": status " |
| "%#02x\n", device, blknr, c); |
| break; |
| } |
| |
| ide_input_data(device, buffer, ATA_SECTORWORDS); |
| (void) ide_inb(device, ATA_STATUS); /* clear IRQ */ |
| |
| ++n; |
| ++blknr; |
| buffer += ATA_BLOCKSIZE; |
| } |
| IDE_READ_E: |
| ide_led(DEVICE_LED(device), 0); /* LED off */ |
| return (n); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| |
| ulong ide_write(struct blk_desc *block_dev, lbaint_t blknr, lbaint_t blkcnt, |
| const void *buffer) |
| { |
| int device = block_dev->dev; |
| ulong n = 0; |
| unsigned char c; |
| |
| #ifdef CONFIG_LBA48 |
| unsigned char lba48 = 0; |
| |
| if (blknr & 0x0000fffff0000000ULL) { |
| /* more than 28 bits used, use 48bit mode */ |
| lba48 = 1; |
| } |
| #endif |
| |
| ide_led(DEVICE_LED(device), 1); /* LED on */ |
| |
| /* Select device |
| */ |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| |
| while (blkcnt-- > 0) { |
| |
| c = ide_wait(device, IDE_TIME_OUT); |
| |
| if (c & ATA_STAT_BUSY) { |
| printf("IDE read: device %d not ready\n", device); |
| goto WR_OUT; |
| } |
| #ifdef CONFIG_LBA48 |
| if (lba48) { |
| /* write high bits */ |
| ide_outb(device, ATA_SECT_CNT, 0); |
| ide_outb(device, ATA_LBA_LOW, (blknr >> 24) & 0xFF); |
| #ifdef CONFIG_SYS_64BIT_LBA |
| ide_outb(device, ATA_LBA_MID, (blknr >> 32) & 0xFF); |
| ide_outb(device, ATA_LBA_HIGH, (blknr >> 40) & 0xFF); |
| #else |
| ide_outb(device, ATA_LBA_MID, 0); |
| ide_outb(device, ATA_LBA_HIGH, 0); |
| #endif |
| } |
| #endif |
| ide_outb(device, ATA_SECT_CNT, 1); |
| ide_outb(device, ATA_LBA_LOW, (blknr >> 0) & 0xFF); |
| ide_outb(device, ATA_LBA_MID, (blknr >> 8) & 0xFF); |
| ide_outb(device, ATA_LBA_HIGH, (blknr >> 16) & 0xFF); |
| |
| #ifdef CONFIG_LBA48 |
| if (lba48) { |
| ide_outb(device, ATA_DEV_HD, |
| ATA_LBA | ATA_DEVICE(device)); |
| ide_outb(device, ATA_COMMAND, ATA_CMD_WRITE_EXT); |
| |
| } else |
| #endif |
| { |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | |
| ATA_DEVICE(device) | ((blknr >> 24) & 0xF)); |
| ide_outb(device, ATA_COMMAND, ATA_CMD_WRITE); |
| } |
| |
| udelay(50); |
| |
| /* can't take over 500 ms */ |
| c = ide_wait(device, IDE_TIME_OUT); |
| |
| if ((c & (ATA_STAT_DRQ | ATA_STAT_BUSY | ATA_STAT_ERR)) != |
| ATA_STAT_DRQ) { |
| printf("Error (no IRQ) dev %d blk " LBAF ": status " |
| "%#02x\n", device, blknr, c); |
| goto WR_OUT; |
| } |
| |
| ide_output_data(device, buffer, ATA_SECTORWORDS); |
| c = ide_inb(device, ATA_STATUS); /* clear IRQ */ |
| ++n; |
| ++blknr; |
| buffer += ATA_BLOCKSIZE; |
| } |
| WR_OUT: |
| ide_led(DEVICE_LED(device), 0); /* LED off */ |
| return (n); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* |
| * copy src to dest, skipping leading and trailing blanks and null |
| * terminate the string |
| * "len" is the size of available memory including the terminating '\0' |
| */ |
| static void ident_cpy(unsigned char *dst, unsigned char *src, |
| unsigned int len) |
| { |
| unsigned char *end, *last; |
| |
| last = dst; |
| end = src + len - 1; |
| |
| /* reserve space for '\0' */ |
| if (len < 2) |
| goto OUT; |
| |
| /* skip leading white space */ |
| while ((*src) && (src < end) && (*src == ' ')) |
| ++src; |
| |
| /* copy string, omitting trailing white space */ |
| while ((*src) && (src < end)) { |
| *dst++ = *src; |
| if (*src++ != ' ') |
| last = dst; |
| } |
| OUT: |
| *last = '\0'; |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| /* |
| * Wait until Busy bit is off, or timeout (in ms) |
| * Return last status |
| */ |
| static uchar ide_wait(int dev, ulong t) |
| { |
| ulong delay = 10 * t; /* poll every 100 us */ |
| uchar c; |
| |
| while ((c = ide_inb(dev, ATA_STATUS)) & ATA_STAT_BUSY) { |
| udelay(100); |
| if (delay-- == 0) |
| break; |
| } |
| return (c); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| #ifdef CONFIG_IDE_RESET |
| extern void ide_set_reset(int idereset); |
| |
| static void ide_reset(void) |
| { |
| int i; |
| |
| curr_device = -1; |
| for (i = 0; i < CONFIG_SYS_IDE_MAXBUS; ++i) |
| ide_bus_ok[i] = 0; |
| for (i = 0; i < CONFIG_SYS_IDE_MAXDEVICE; ++i) |
| ide_dev_desc[i].type = DEV_TYPE_UNKNOWN; |
| |
| ide_set_reset(1); /* assert reset */ |
| |
| /* the reset signal shall be asserted for et least 25 us */ |
| udelay(25); |
| |
| WATCHDOG_RESET(); |
| |
| /* de-assert RESET signal */ |
| ide_set_reset(0); |
| |
| /* wait 250 ms */ |
| for (i = 0; i < 250; ++i) |
| udelay(1000); |
| } |
| |
| #endif /* CONFIG_IDE_RESET */ |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| #if defined(CONFIG_OF_IDE_FIXUP) |
| int ide_device_present(int dev) |
| { |
| if (dev >= CONFIG_SYS_IDE_MAXBUS) |
| return 0; |
| return (ide_dev_desc[dev].type == DEV_TYPE_UNKNOWN ? 0 : 1); |
| } |
| #endif |
| /* ------------------------------------------------------------------------- */ |
| |
| #ifdef CONFIG_ATAPI |
| /**************************************************************************** |
| * ATAPI Support |
| */ |
| |
| #if defined(CONFIG_IDE_SWAP_IO) |
| /* since ATAPI may use commands with not 4 bytes alligned length |
| * we have our own transfer functions, 2 bytes alligned */ |
| __weak void ide_output_data_shorts(int dev, ushort *sect_buf, int shorts) |
| { |
| ushort *dbuf; |
| volatile ushort *pbuf; |
| |
| pbuf = (ushort *) (ATA_CURR_BASE(dev) + ATA_DATA_REG); |
| dbuf = (ushort *) sect_buf; |
| |
| debug("in output data shorts base for read is %lx\n", |
| (unsigned long) pbuf); |
| |
| while (shorts--) { |
| EIEIO; |
| *pbuf = *dbuf++; |
| } |
| } |
| |
| __weak void ide_input_data_shorts(int dev, ushort *sect_buf, int shorts) |
| { |
| ushort *dbuf; |
| volatile ushort *pbuf; |
| |
| pbuf = (ushort *) (ATA_CURR_BASE(dev) + ATA_DATA_REG); |
| dbuf = (ushort *) sect_buf; |
| |
| debug("in input data shorts base for read is %lx\n", |
| (unsigned long) pbuf); |
| |
| while (shorts--) { |
| EIEIO; |
| *dbuf++ = *pbuf; |
| } |
| } |
| |
| #else /* ! CONFIG_IDE_SWAP_IO */ |
| __weak void ide_output_data_shorts(int dev, ushort *sect_buf, int shorts) |
| { |
| outsw(ATA_CURR_BASE(dev) + ATA_DATA_REG, sect_buf, shorts); |
| } |
| |
| __weak void ide_input_data_shorts(int dev, ushort *sect_buf, int shorts) |
| { |
| insw(ATA_CURR_BASE(dev) + ATA_DATA_REG, sect_buf, shorts); |
| } |
| |
| #endif /* CONFIG_IDE_SWAP_IO */ |
| |
| /* |
| * Wait until (Status & mask) == res, or timeout (in ms) |
| * Return last status |
| * This is used since some ATAPI CD ROMs clears their Busy Bit first |
| * and then they set their DRQ Bit |
| */ |
| static uchar atapi_wait_mask(int dev, ulong t, uchar mask, uchar res) |
| { |
| ulong delay = 10 * t; /* poll every 100 us */ |
| uchar c; |
| |
| /* prevents to read the status before valid */ |
| c = ide_inb(dev, ATA_DEV_CTL); |
| |
| while (((c = ide_inb(dev, ATA_STATUS)) & mask) != res) { |
| /* break if error occurs (doesn't make sense to wait more) */ |
| if ((c & ATA_STAT_ERR) == ATA_STAT_ERR) |
| break; |
| udelay(100); |
| if (delay-- == 0) |
| break; |
| } |
| return (c); |
| } |
| |
| /* |
| * issue an atapi command |
| */ |
| unsigned char atapi_issue(int device, unsigned char *ccb, int ccblen, |
| unsigned char *buffer, int buflen) |
| { |
| unsigned char c, err, mask, res; |
| int n; |
| |
| ide_led(DEVICE_LED(device), 1); /* LED on */ |
| |
| /* Select device |
| */ |
| mask = ATA_STAT_BUSY | ATA_STAT_DRQ; |
| res = 0; |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| c = atapi_wait_mask(device, ATAPI_TIME_OUT, mask, res); |
| if ((c & mask) != res) { |
| printf("ATAPI_ISSUE: device %d not ready status %X\n", device, |
| c); |
| err = 0xFF; |
| goto AI_OUT; |
| } |
| /* write taskfile */ |
| ide_outb(device, ATA_ERROR_REG, 0); /* no DMA, no overlaped */ |
| ide_outb(device, ATA_SECT_CNT, 0); |
| ide_outb(device, ATA_SECT_NUM, 0); |
| ide_outb(device, ATA_CYL_LOW, (unsigned char) (buflen & 0xFF)); |
| ide_outb(device, ATA_CYL_HIGH, |
| (unsigned char) ((buflen >> 8) & 0xFF)); |
| ide_outb(device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device)); |
| |
| ide_outb(device, ATA_COMMAND, ATAPI_CMD_PACKET); |
| udelay(50); |
| |
| mask = ATA_STAT_DRQ | ATA_STAT_BUSY | ATA_STAT_ERR; |
| res = ATA_STAT_DRQ; |
| c = atapi_wait_mask(device, ATAPI_TIME_OUT, mask, res); |
| |
| if ((c & mask) != res) { /* DRQ must be 1, BSY 0 */ |
| printf("ATAPI_ISSUE: Error (no IRQ) before sending ccb dev %d status 0x%02x\n", |
| device, c); |
| err = 0xFF; |
| goto AI_OUT; |
| } |
| |
| /* write command block */ |
| ide_output_data_shorts(device, (unsigned short *) ccb, ccblen / 2); |
| |
| /* ATAPI Command written wait for completition */ |
| udelay(5000); /* device must set bsy */ |
| |
| mask = ATA_STAT_DRQ | ATA_STAT_BUSY | ATA_STAT_ERR; |
| /* |
| * if no data wait for DRQ = 0 BSY = 0 |
| * if data wait for DRQ = 1 BSY = 0 |
| */ |
| res = 0; |
| if (buflen) |
| res = ATA_STAT_DRQ; |
| c = atapi_wait_mask(device, ATAPI_TIME_OUT, mask, res); |
| if ((c & mask) != res) { |
| if (c & ATA_STAT_ERR) { |
| err = (ide_inb(device, ATA_ERROR_REG)) >> 4; |
| debug("atapi_issue 1 returned sense key %X status %02X\n", |
| err, c); |
| } else { |
| printf("ATAPI_ISSUE: (no DRQ) after sending ccb (%x) status 0x%02x\n", |
| ccb[0], c); |
| err = 0xFF; |
| } |
| goto AI_OUT; |
| } |
| n = ide_inb(device, ATA_CYL_HIGH); |
| n <<= 8; |
| n += ide_inb(device, ATA_CYL_LOW); |
| if (n > buflen) { |
| printf("ERROR, transfer bytes %d requested only %d\n", n, |
| buflen); |
| err = 0xff; |
| goto AI_OUT; |
| } |
| if ((n == 0) && (buflen < 0)) { |
| printf("ERROR, transfer bytes %d requested %d\n", n, buflen); |
| err = 0xff; |
| goto AI_OUT; |
| } |
| if (n != buflen) { |
| debug("WARNING, transfer bytes %d not equal with requested %d\n", |
| n, buflen); |
| } |
| if (n != 0) { /* data transfer */ |
| debug("ATAPI_ISSUE: %d Bytes to transfer\n", n); |
| /* we transfer shorts */ |
| n >>= 1; |
| /* ok now decide if it is an in or output */ |
| if ((ide_inb(device, ATA_SECT_CNT) & 0x02) == 0) { |
| debug("Write to device\n"); |
| ide_output_data_shorts(device, |
| (unsigned short *) buffer, n); |
| } else { |
| debug("Read from device @ %p shorts %d\n", buffer, n); |
| ide_input_data_shorts(device, |
| (unsigned short *) buffer, n); |
| } |
| } |
| udelay(5000); /* seems that some CD ROMs need this... */ |
| mask = ATA_STAT_BUSY | ATA_STAT_ERR; |
| res = 0; |
| c = atapi_wait_mask(device, ATAPI_TIME_OUT, mask, res); |
| if ((c & ATA_STAT_ERR) == ATA_STAT_ERR) { |
| err = (ide_inb(device, ATA_ERROR_REG) >> 4); |
| debug("atapi_issue 2 returned sense key %X status %X\n", err, |
| c); |
| } else { |
| err = 0; |
| } |
| AI_OUT: |
| ide_led(DEVICE_LED(device), 0); /* LED off */ |
| return (err); |
| } |
| |
| /* |
| * sending the command to atapi_issue. If an status other than good |
| * returns, an request_sense will be issued |
| */ |
| |
| #define ATAPI_DRIVE_NOT_READY 100 |
| #define ATAPI_UNIT_ATTN 10 |
| |
| unsigned char atapi_issue_autoreq(int device, |
| unsigned char *ccb, |
| int ccblen, |
| unsigned char *buffer, int buflen) |
| { |
| unsigned char sense_data[18], sense_ccb[12]; |
| unsigned char res, key, asc, ascq; |
| int notready, unitattn; |
| |
| unitattn = ATAPI_UNIT_ATTN; |
| notready = ATAPI_DRIVE_NOT_READY; |
| |
| retry: |
| res = atapi_issue(device, ccb, ccblen, buffer, buflen); |
| if (res == 0) |
| return 0; /* Ok */ |
| |
| if (res == 0xFF) |
| return 0xFF; /* error */ |
| |
| debug("(auto_req)atapi_issue returned sense key %X\n", res); |
| |
| memset(sense_ccb, 0, sizeof(sense_ccb)); |
| memset(sense_data, 0, sizeof(sense_data)); |
| sense_ccb[0] = ATAPI_CMD_REQ_SENSE; |
| sense_ccb[4] = 18; /* allocation Length */ |
| |
| res = atapi_issue(device, sense_ccb, 12, sense_data, 18); |
| key = (sense_data[2] & 0xF); |
| asc = (sense_data[12]); |
| ascq = (sense_data[13]); |
| |
| debug("ATAPI_CMD_REQ_SENSE returned %x\n", res); |
| debug(" Sense page: %02X key %02X ASC %02X ASCQ %02X\n", |
| sense_data[0], key, asc, ascq); |
| |
| if ((key == 0)) |
| return 0; /* ok device ready */ |
| |
| if ((key == 6) || (asc == 0x29) || (asc == 0x28)) { /* Unit Attention */ |
| if (unitattn-- > 0) { |
| udelay(200 * 1000); |
| goto retry; |
| } |
| printf("Unit Attention, tried %d\n", ATAPI_UNIT_ATTN); |
| goto error; |
| } |
| if ((asc == 0x4) && (ascq == 0x1)) { |
| /* not ready, but will be ready soon */ |
| if (notready-- > 0) { |
| udelay(200 * 1000); |
| goto retry; |
| } |
| printf("Drive not ready, tried %d times\n", |
| ATAPI_DRIVE_NOT_READY); |
| goto error; |
| } |
| if (asc == 0x3a) { |
| debug("Media not present\n"); |
| goto error; |
| } |
| |
| printf("ERROR: Unknown Sense key %02X ASC %02X ASCQ %02X\n", key, asc, |
| ascq); |
| error: |
| debug("ERROR Sense key %02X ASC %02X ASCQ %02X\n", key, asc, ascq); |
| return (0xFF); |
| } |
| |
| |
| static void atapi_inquiry(struct blk_desc *dev_desc) |
| { |
| unsigned char ccb[12]; /* Command descriptor block */ |
| unsigned char iobuf[64]; /* temp buf */ |
| unsigned char c; |
| int device; |
| |
| device = dev_desc->dev; |
| dev_desc->type = DEV_TYPE_UNKNOWN; /* not yet valid */ |
| dev_desc->block_read = atapi_read; |
| |
| memset(ccb, 0, sizeof(ccb)); |
| memset(iobuf, 0, sizeof(iobuf)); |
| |
| ccb[0] = ATAPI_CMD_INQUIRY; |
| ccb[4] = 40; /* allocation Legnth */ |
| c = atapi_issue_autoreq(device, ccb, 12, (unsigned char *) iobuf, 40); |
| |
| debug("ATAPI_CMD_INQUIRY returned %x\n", c); |
| if (c != 0) |
| return; |
| |
| /* copy device ident strings */ |
| ident_cpy((unsigned char *) dev_desc->vendor, &iobuf[8], 8); |
| ident_cpy((unsigned char *) dev_desc->product, &iobuf[16], 16); |
| ident_cpy((unsigned char *) dev_desc->revision, &iobuf[32], 5); |
| |
| dev_desc->lun = 0; |
| dev_desc->lba = 0; |
| dev_desc->blksz = 0; |
| dev_desc->log2blksz = LOG2_INVALID(typeof(dev_desc->log2blksz)); |
| dev_desc->type = iobuf[0] & 0x1f; |
| |
| if ((iobuf[1] & 0x80) == 0x80) |
| dev_desc->removable = 1; |
| else |
| dev_desc->removable = 0; |
| |
| memset(ccb, 0, sizeof(ccb)); |
| memset(iobuf, 0, sizeof(iobuf)); |
| ccb[0] = ATAPI_CMD_START_STOP; |
| ccb[4] = 0x03; /* start */ |
| |
| c = atapi_issue_autoreq(device, ccb, 12, (unsigned char *) iobuf, 0); |
| |
| debug("ATAPI_CMD_START_STOP returned %x\n", c); |
| if (c != 0) |
| return; |
| |
| memset(ccb, 0, sizeof(ccb)); |
| memset(iobuf, 0, sizeof(iobuf)); |
| c = atapi_issue_autoreq(device, ccb, 12, (unsigned char *) iobuf, 0); |
| |
| debug("ATAPI_CMD_UNIT_TEST_READY returned %x\n", c); |
| if (c != 0) |
| return; |
| |
| memset(ccb, 0, sizeof(ccb)); |
| memset(iobuf, 0, sizeof(iobuf)); |
| ccb[0] = ATAPI_CMD_READ_CAP; |
| c = atapi_issue_autoreq(device, ccb, 12, (unsigned char *) iobuf, 8); |
| debug("ATAPI_CMD_READ_CAP returned %x\n", c); |
| if (c != 0) |
| return; |
| |
| debug("Read Cap: LBA %02X%02X%02X%02X blksize %02X%02X%02X%02X\n", |
| iobuf[0], iobuf[1], iobuf[2], iobuf[3], |
| iobuf[4], iobuf[5], iobuf[6], iobuf[7]); |
| |
| dev_desc->lba = ((unsigned long) iobuf[0] << 24) + |
| ((unsigned long) iobuf[1] << 16) + |
| ((unsigned long) iobuf[2] << 8) + ((unsigned long) iobuf[3]); |
| dev_desc->blksz = ((unsigned long) iobuf[4] << 24) + |
| ((unsigned long) iobuf[5] << 16) + |
| ((unsigned long) iobuf[6] << 8) + ((unsigned long) iobuf[7]); |
| dev_desc->log2blksz = LOG2(dev_desc->blksz); |
| #ifdef CONFIG_LBA48 |
| /* ATAPI devices cannot use 48bit addressing (ATA/ATAPI v7) */ |
| dev_desc->lba48 = 0; |
| #endif |
| return; |
| } |
| |
| |
| /* |
| * atapi_read: |
| * we transfer only one block per command, since the multiple DRQ per |
| * command is not yet implemented |
| */ |
| #define ATAPI_READ_MAX_BYTES 2048 /* we read max 2kbytes */ |
| #define ATAPI_READ_BLOCK_SIZE 2048 /* assuming CD part */ |
| #define ATAPI_READ_MAX_BLOCK (ATAPI_READ_MAX_BYTES/ATAPI_READ_BLOCK_SIZE) |
| |
| ulong atapi_read(struct blk_desc *block_dev, lbaint_t blknr, lbaint_t blkcnt, |
| void *buffer) |
| { |
| int device = block_dev->dev; |
| ulong n = 0; |
| unsigned char ccb[12]; /* Command descriptor block */ |
| ulong cnt; |
| |
| debug("atapi_read dev %d start " LBAF " blocks " LBAF " buffer at %lX\n", |
| device, blknr, blkcnt, (ulong) buffer); |
| |
| do { |
| if (blkcnt > ATAPI_READ_MAX_BLOCK) |
| cnt = ATAPI_READ_MAX_BLOCK; |
| else |
| cnt = blkcnt; |
| |
| ccb[0] = ATAPI_CMD_READ_12; |
| ccb[1] = 0; /* reserved */ |
| ccb[2] = (unsigned char) (blknr >> 24) & 0xFF; /* MSB Block */ |
| ccb[3] = (unsigned char) (blknr >> 16) & 0xFF; /* */ |
| ccb[4] = (unsigned char) (blknr >> 8) & 0xFF; |
| ccb[5] = (unsigned char) blknr & 0xFF; /* LSB Block */ |
| ccb[6] = (unsigned char) (cnt >> 24) & 0xFF; /* MSB Block cnt */ |
| ccb[7] = (unsigned char) (cnt >> 16) & 0xFF; |
| ccb[8] = (unsigned char) (cnt >> 8) & 0xFF; |
| ccb[9] = (unsigned char) cnt & 0xFF; /* LSB Block */ |
| ccb[10] = 0; /* reserved */ |
| ccb[11] = 0; /* reserved */ |
| |
| if (atapi_issue_autoreq(device, ccb, 12, |
| (unsigned char *) buffer, |
| cnt * ATAPI_READ_BLOCK_SIZE) |
| == 0xFF) { |
| return (n); |
| } |
| n += cnt; |
| blkcnt -= cnt; |
| blknr += cnt; |
| buffer += (cnt * ATAPI_READ_BLOCK_SIZE); |
| } while (blkcnt > 0); |
| return (n); |
| } |
| |
| /* ------------------------------------------------------------------------- */ |
| |
| #endif /* CONFIG_ATAPI */ |
| |
| U_BOOT_CMD(ide, 5, 1, do_ide, |
| "IDE sub-system", |
| "reset - reset IDE controller\n" |
| "ide info - show available IDE devices\n" |
| "ide device [dev] - show or set current device\n" |
| "ide part [dev] - print partition table of one or all IDE devices\n" |
| "ide read addr blk# cnt\n" |
| "ide write addr blk# cnt - read/write `cnt'" |
| " blocks starting at block `blk#'\n" |
| " to/from memory address `addr'"); |
| |
| U_BOOT_CMD(diskboot, 3, 1, do_diskboot, |
| "boot from IDE device", "loadAddr dev:part"); |