/* * linux/drivers/ide/alim15x3.c Version 0.10 Jun. 9, 2000 * * Copyright (C) 1998-2000 Michel Aubry, Maintainer * Copyright (C) 1998-2000 Andrzej Krzysztofowicz, Maintainer * Copyright (C) 1999-2000 CJ, cjtsai@ali.com.tw, Maintainer * * Copyright (C) 1998-2000 Andre Hedrick (andre@linux-ide.org) * May be copied or modified under the terms of the GNU General Public License * * (U)DMA capable version of ali 1533/1543(C), 1535(D) * ********************************************************************** * 9/7/99 --Parts from the above author are included and need to be * converted into standard interface, once I finish the thought. */ #include #include #include #include #include #include #include #include #include #include "ide_modes.h" #define DISPLAY_ALI_TIMINGS #if defined(DISPLAY_ALI_TIMINGS) && defined(CONFIG_PROC_FS) #include #include static int ali_get_info(char *buffer, char **addr, off_t offset, int count); extern int (*ali_display_info)(char *, char **, off_t, int); /* ide-proc.c */ static struct pci_dev *bmide_dev; char *fifo[4] = { "FIFO Off", "FIFO On ", "DMA mode", "PIO mode" }; char *udmaT[8] = { "1.5T", " 2T", "2.5T", " 3T", "3.5T", " 4T", " 6T", " 8T" }; char *channel_status[8] = { "OK ", "busy ", "DRQ ", "DRQ busy ", "error ", "error busy ", "error DRQ ", "error DRQ busy" }; static int ali_get_info (char *buffer, char **addr, off_t offset, int count) { byte reg53h, reg5xh, reg5yh, reg5xh1, reg5yh1; unsigned int bibma; byte c0, c1; byte rev, tmp; char *p = buffer; char *q; /* fetch rev. */ pci_read_config_byte(bmide_dev, 0x08, &rev); if (rev >= 0xc1) /* M1543C or newer */ udmaT[7] = " ???"; else fifo[3] = " ??? "; /* first fetch bibma: */ pci_read_config_dword(bmide_dev, 0x20, &bibma); bibma = (bibma & 0xfff0) ; /* * at that point bibma+0x2 et bibma+0xa are byte * registers to investigate: */ c0 = inb((unsigned short)bibma + 0x02); c1 = inb((unsigned short)bibma + 0x0a); p += sprintf(p, "\n Ali M15x3 Chipset.\n"); p += sprintf(p, " ------------------\n"); pci_read_config_byte(bmide_dev, 0x78, ®53h); p += sprintf(p, "PCI Clock: %d.\n", reg53h); pci_read_config_byte(bmide_dev, 0x53, ®53h); p += sprintf(p, "CD_ROM FIFO:%s, CD_ROM DMA:%s\n", (reg53h & 0x02) ? "Yes" : "No ", (reg53h & 0x01) ? "Yes" : "No " ); pci_read_config_byte(bmide_dev, 0x74, ®53h); p += sprintf(p, "FIFO Status: contains %d Words, runs%s%s\n\n", (reg53h & 0x3f), (reg53h & 0x40) ? " OVERWR" : "", (reg53h & 0x80) ? " OVERRD." : "." ); p += sprintf(p, "-------------------primary channel-------------------secondary channel---------\n\n"); pci_read_config_byte(bmide_dev, 0x09, ®53h); p += sprintf(p, "channel status: %s %s\n", (reg53h & 0x20) ? "On " : "Off", (reg53h & 0x10) ? "On " : "Off" ); p += sprintf(p, "both channels togth: %s %s\n", (c0&0x80) ? "No " : "Yes", (c1&0x80) ? "No " : "Yes" ); pci_read_config_byte(bmide_dev, 0x76, ®53h); p += sprintf(p, "Channel state: %s %s\n", channel_status[reg53h & 0x07], channel_status[(reg53h & 0x70) >> 4] ); pci_read_config_byte(bmide_dev, 0x58, ®5xh); pci_read_config_byte(bmide_dev, 0x5c, ®5yh); p += sprintf(p, "Add. Setup Timing: %dT %dT\n", (reg5xh & 0x07) ? (reg5xh & 0x07) : 8, (reg5yh & 0x07) ? (reg5yh & 0x07) : 8 ); pci_read_config_byte(bmide_dev, 0x59, ®5xh); pci_read_config_byte(bmide_dev, 0x5d, ®5yh); p += sprintf(p, "Command Act. Count: %dT %dT\n" "Command Rec. Count: %dT %dT\n\n", (reg5xh & 0x70) ? ((reg5xh & 0x70) >> 4) : 8, (reg5yh & 0x70) ? ((reg5yh & 0x70) >> 4) : 8, (reg5xh & 0x0f) ? (reg5xh & 0x0f) : 16, (reg5yh & 0x0f) ? (reg5yh & 0x0f) : 16 ); p += sprintf(p, "----------------drive0-----------drive1------------drive0-----------drive1------\n\n"); p += sprintf(p, "DMA enabled: %s %s %s %s\n", (c0&0x20) ? "Yes" : "No ", (c0&0x40) ? "Yes" : "No ", (c1&0x20) ? "Yes" : "No ", (c1&0x40) ? "Yes" : "No " ); pci_read_config_byte(bmide_dev, 0x54, ®5xh); pci_read_config_byte(bmide_dev, 0x55, ®5yh); q = "FIFO threshold: %2d Words %2d Words %2d Words %2d Words\n"; if (rev < 0xc1) { if ((rev == 0x20) && (pci_read_config_byte(bmide_dev, 0x4f, &tmp), (tmp &= 0x20))) { p += sprintf(p, q, 8, 8, 8, 8); } else { p += sprintf(p, q, (reg5xh & 0x03) + 12, ((reg5xh & 0x30)>>4) + 12, (reg5yh & 0x03) + 12, ((reg5yh & 0x30)>>4) + 12 ); } } else { int t1 = (tmp = (reg5xh & 0x03)) ? (tmp << 3) : 4; int t2 = (tmp = ((reg5xh & 0x30)>>4)) ? (tmp << 3) : 4; int t3 = (tmp = (reg5yh & 0x03)) ? (tmp << 3) : 4; int t4 = (tmp = ((reg5yh & 0x30)>>4)) ? (tmp << 3) : 4; p += sprintf(p, q, t1, t2, t3, t4); } #if 0 p += sprintf(p, "FIFO threshold: %2d Words %2d Words %2d Words %2d Words\n", (reg5xh & 0x03) + 12, ((reg5xh & 0x30)>>4) + 12, (reg5yh & 0x03) + 12, ((reg5yh & 0x30)>>4) + 12 ); #endif p += sprintf(p, "FIFO mode: %s %s %s %s\n", fifo[((reg5xh & 0x0c) >> 2)], fifo[((reg5xh & 0xc0) >> 6)], fifo[((reg5yh & 0x0c) >> 2)], fifo[((reg5yh & 0xc0) >> 6)] ); pci_read_config_byte(bmide_dev, 0x5a, ®5xh); pci_read_config_byte(bmide_dev, 0x5b, ®5xh1); pci_read_config_byte(bmide_dev, 0x5e, ®5yh); pci_read_config_byte(bmide_dev, 0x5f, ®5yh1); p += sprintf(p,/* "------------------drive0-----------drive1------------drive0-----------drive1------\n")*/ "Dt RW act. Cnt %2dT %2dT %2dT %2dT\n" "Dt RW rec. Cnt %2dT %2dT %2dT %2dT\n\n", (reg5xh & 0x70) ? ((reg5xh & 0x70) >> 4) : 8, (reg5xh1 & 0x70) ? ((reg5xh1 & 0x70) >> 4) : 8, (reg5yh & 0x70) ? ((reg5yh & 0x70) >> 4) : 8, (reg5yh1 & 0x70) ? ((reg5yh1 & 0x70) >> 4) : 8, (reg5xh & 0x0f) ? (reg5xh & 0x0f) : 16, (reg5xh1 & 0x0f) ? (reg5xh1 & 0x0f) : 16, (reg5yh & 0x0f) ? (reg5yh & 0x0f) : 16, (reg5yh1 & 0x0f) ? (reg5yh1 & 0x0f) : 16 ); p += sprintf(p, "-----------------------------------UDMA Timings--------------------------------\n\n"); pci_read_config_byte(bmide_dev, 0x56, ®5xh); pci_read_config_byte(bmide_dev, 0x57, ®5yh); p += sprintf(p, "UDMA: %s %s %s %s\n" "UDMA timings: %s %s %s %s\n\n", (reg5xh & 0x08) ? "OK" : "No", (reg5xh & 0x80) ? "OK" : "No", (reg5yh & 0x08) ? "OK" : "No", (reg5yh & 0x80) ? "OK" : "No", udmaT[(reg5xh & 0x07)], udmaT[(reg5xh & 0x70) >> 4], udmaT[reg5yh & 0x07], udmaT[(reg5yh & 0x70) >> 4] ); return p-buffer; /* => must be less than 4k! */ } #endif /* defined(DISPLAY_ALI_TIMINGS) && defined(CONFIG_PROC_FS) */ static byte m5229_revision; static byte chip_is_1543c_e; byte ali_proc = 0; static struct pci_dev *isa_dev; static void ali15x3_tune_drive (ide_drive_t *drive, byte pio) { ide_pio_data_t d; ide_hwif_t *hwif = HWIF(drive); struct pci_dev *dev = hwif->pci_dev; int s_time, a_time, c_time; byte s_clc, a_clc, r_clc; unsigned long flags; int bus_speed = system_bus_clock(); int port = hwif->index ? 0x5c : 0x58; int portFIFO = hwif->channel ? 0x55 : 0x54; byte cd_dma_fifo = 0; pio = ide_get_best_pio_mode(drive, pio, 5, &d); s_time = ide_pio_timings[pio].setup_time; a_time = ide_pio_timings[pio].active_time; if ((s_clc = (s_time * bus_speed + 999) / 1000) >= 8) s_clc = 0; if ((a_clc = (a_time * bus_speed + 999) / 1000) >= 8) a_clc = 0; c_time = ide_pio_timings[pio].cycle_time; #if 0 if ((r_clc = ((c_time - s_time - a_time) * bus_speed + 999) / 1000) >= 16) r_clc = 0; #endif if (!(r_clc = (c_time * bus_speed + 999) / 1000 - a_clc - s_clc)) { r_clc = 1; } else { if (r_clc >= 16) r_clc = 0; } __save_flags(flags); __cli(); /* * PIO mode => ATA FIFO on, ATAPI FIFO off */ pci_read_config_byte(dev, portFIFO, &cd_dma_fifo); if (drive->media==ide_disk) { if (hwif->index) { pci_write_config_byte(dev, portFIFO, (cd_dma_fifo & 0x0F) | 0x50); } else { pci_write_config_byte(dev, portFIFO, (cd_dma_fifo & 0xF0) | 0x05); } } else { if (hwif->index) { pci_write_config_byte(dev, portFIFO, cd_dma_fifo & 0x0F); } else { pci_write_config_byte(dev, portFIFO, cd_dma_fifo & 0xF0); } } pci_write_config_byte(dev, port, s_clc); pci_write_config_byte(dev, port+drive->select.b.unit+2, (a_clc << 4) | r_clc); __restore_flags(flags); /* * setup active rec * { 70, 165, 365 }, PIO Mode 0 * { 50, 125, 208 }, PIO Mode 1 * { 30, 100, 110 }, PIO Mode 2 * { 30, 80, 70 }, PIO Mode 3 with IORDY * { 25, 70, 25 }, PIO Mode 4 with IORDY ns * { 20, 50, 30 } PIO Mode 5 with IORDY (nonstandard) */ } static int ali15x3_tune_chipset (ide_drive_t *drive, byte speed) { ide_hwif_t *hwif = HWIF(drive); struct pci_dev *dev = hwif->pci_dev; byte unit = (drive->select.b.unit & 0x01); byte tmpbyte = 0x00; int m5229_udma = hwif->channel? 0x57 : 0x56; int err = 0; if (speed < XFER_UDMA_0) { byte ultra_enable = (unit) ? 0x7f : 0xf7; /* * clear "ultra enable" bit */ pci_read_config_byte(dev, m5229_udma, &tmpbyte); tmpbyte &= ultra_enable; pci_write_config_byte(dev, m5229_udma, tmpbyte); } err = ide_config_drive_speed(drive, speed); #ifdef CONFIG_BLK_DEV_IDEDMA if (speed >= XFER_SW_DMA_0) { unsigned long dma_base = hwif->dma_base; outb(inb(dma_base+2)|(1<<(5+unit)), dma_base+2); } if (speed >= XFER_UDMA_0) { pci_read_config_byte(dev, m5229_udma, &tmpbyte); tmpbyte &= (0x0f << ((1-unit) << 2)); /* * enable ultra dma and set timing */ tmpbyte |= ((0x08 | ((4-speed)&0x07)) << (unit << 2)); pci_write_config_byte(dev, m5229_udma, tmpbyte); if (speed >= XFER_UDMA_3) { pci_read_config_byte(dev, 0x4b, &tmpbyte); tmpbyte |= 1; pci_write_config_byte(dev, 0x4b, tmpbyte); } } #endif /* CONFIG_BLK_DEV_IDEDMA */ drive->current_speed = speed; return (err); } static void config_chipset_for_pio (ide_drive_t *drive) { ali15x3_tune_drive(drive, 5); } #ifdef CONFIG_BLK_DEV_IDEDMA static int config_chipset_for_dma (ide_drive_t *drive, byte ultra33) { struct hd_driveid *id = drive->id; byte speed = 0x00; byte ultra66 = eighty_ninty_three(drive); byte ultra100 = (m5229_revision>=0xc4) ? 1 : 0; int rval; if ((id->dma_ultra & 0x0020) && (ultra100) && (ultra66) && (ultra33)) { speed = XFER_UDMA_5; } else if ((id->dma_ultra & 0x0010) && (ultra66) && (ultra33)) { speed = XFER_UDMA_4; } else if ((id->dma_ultra & 0x0008) && (ultra66) && (ultra33)) { speed = XFER_UDMA_3; } else if ((id->dma_ultra & 0x0004) && (ultra33)) { speed = XFER_UDMA_2; } else if ((id->dma_ultra & 0x0002) && (ultra33)) { speed = XFER_UDMA_1; } else if ((id->dma_ultra & 0x0001) && (ultra33)) { speed = XFER_UDMA_0; } else if (id->dma_mword & 0x0004) { speed = XFER_MW_DMA_2; } else if (id->dma_mword & 0x0002) { speed = XFER_MW_DMA_1; } else if (id->dma_mword & 0x0001) { speed = XFER_MW_DMA_0; } else if (id->dma_1word & 0x0004) { speed = XFER_SW_DMA_2; } else if (id->dma_1word & 0x0002) { speed = XFER_SW_DMA_1; } else if (id->dma_1word & 0x0001) { speed = XFER_SW_DMA_0; } else { return ((int) ide_dma_off_quietly); } (void) ali15x3_tune_chipset(drive, speed); if (!drive->init_speed) drive->init_speed = speed; rval = (int)( ((id->dma_ultra >> 11) & 3) ? ide_dma_on : ((id->dma_ultra >> 8) & 7) ? ide_dma_on : ((id->dma_mword >> 8) & 7) ? ide_dma_on : ((id->dma_1word >> 8) & 7) ? ide_dma_on : ide_dma_off_quietly); return rval; } static byte ali15x3_can_ultra (ide_drive_t *drive) { #ifndef CONFIG_WDC_ALI15X3 struct hd_driveid *id = drive->id; #endif /* CONFIG_WDC_ALI15X3 */ if (m5229_revision <= 0x20) { return 0; } else if ((m5229_revision < 0xC2) && #ifndef CONFIG_WDC_ALI15X3 ((chip_is_1543c_e && strstr(id->model, "WDC ")) || (drive->media!=ide_disk))) { #else /* CONFIG_WDC_ALI15X3 */ (drive->media!=ide_disk)) { #endif /* CONFIG_WDC_ALI15X3 */ return 0; } else { return 1; } } static int ali15x3_config_drive_for_dma(ide_drive_t *drive) { struct hd_driveid *id = drive->id; ide_hwif_t *hwif = HWIF(drive); ide_dma_action_t dma_func = ide_dma_on; byte can_ultra_dma = ali15x3_can_ultra(drive); if ((m5229_revision<=0x20) && (drive->media!=ide_disk)) return hwif->dmaproc(ide_dma_off_quietly, drive); if ((id != NULL) && ((id->capability & 1) != 0) && hwif->autodma) { /* Consult the list of known "bad" drives */ if (ide_dmaproc(ide_dma_bad_drive, drive)) { dma_func = ide_dma_off; goto fast_ata_pio; } dma_func = ide_dma_off_quietly; if ((id->field_valid & 4) && (m5229_revision >= 0xC2)) { if (id->dma_ultra & 0x002F) { /* Force if Capable UltraDMA */ dma_func = config_chipset_for_dma(drive, can_ultra_dma); if ((id->field_valid & 2) && (dma_func != ide_dma_on)) goto try_dma_modes; } } else if (id->field_valid & 2) { try_dma_modes: if ((id->dma_mword & 0x0007) || (id->dma_1word & 0x0007)) { /* Force if Capable regular DMA modes */ dma_func = config_chipset_for_dma(drive, can_ultra_dma); if (dma_func != ide_dma_on) goto no_dma_set; } } else if (ide_dmaproc(ide_dma_good_drive, drive)) { if (id->eide_dma_time > 150) { goto no_dma_set; } /* Consult the list of known "good" drives */ dma_func = config_chipset_for_dma(drive, can_ultra_dma); if (dma_func != ide_dma_on) goto no_dma_set; } else { goto fast_ata_pio; } } else if ((id->capability & 8) || (id->field_valid & 2)) { fast_ata_pio: dma_func = ide_dma_off_quietly; no_dma_set: config_chipset_for_pio(drive); } return hwif->dmaproc(dma_func, drive); } static int ali15x3_dmaproc (ide_dma_action_t func, ide_drive_t *drive) { switch(func) { case ide_dma_check: return ali15x3_config_drive_for_dma(drive); case ide_dma_write: if ((m5229_revision < 0xC2) && (drive->media != ide_disk)) return 1; /* try PIO instead of DMA */ break; default: break; } return ide_dmaproc(func, drive); /* use standard DMA stuff */ } #endif /* CONFIG_BLK_DEV_IDEDMA */ unsigned int __init pci_init_ali15x3 (struct pci_dev *dev, const char *name) { unsigned long fixdma_base = pci_resource_start(dev, 4); pci_read_config_byte(dev, PCI_REVISION_ID, &m5229_revision); isa_dev = pci_find_device(PCI_VENDOR_ID_AL, PCI_DEVICE_ID_AL_M1533, NULL); if (!fixdma_base) { /* * */ } else { /* * enable DMA capable bit, and "not" simplex only */ outb(inb(fixdma_base+2) & 0x60, fixdma_base+2); if (inb(fixdma_base+2) & 0x80) printk("%s: simplex device: DMA will fail!!\n", name); } #if defined(DISPLAY_ALI_TIMINGS) && defined(CONFIG_PROC_FS) if (!ali_proc) { ali_proc = 1; bmide_dev = dev; ali_display_info = &ali_get_info; } #endif /* defined(DISPLAY_ALI_TIMINGS) && defined(CONFIG_PROC_FS) */ return 0; } /* * This checks if the controller and the cable are capable * of UDMA66 transfers. It doesn't check the drives. * But see note 2 below! */ unsigned int __init ata66_ali15x3 (ide_hwif_t *hwif) { struct pci_dev *dev = hwif->pci_dev; unsigned int ata66 = 0; byte cable_80_pin[2] = { 0, 0 }; unsigned long flags; byte tmpbyte; __save_flags(flags); __cli(); if (m5229_revision >= 0xC2) { /* * 1543C-B?, 1535, 1535D, 1553 * Note 1: not all "motherboard" support this detection * Note 2: if no udma 66 device, the detection may "error". * but in this case, we will not set the device to * ultra 66, the detection result is not important */ /* * enable "Cable Detection", m5229, 0x4b, bit3 */ pci_read_config_byte(dev, 0x4b, &tmpbyte); pci_write_config_byte(dev, 0x4b, tmpbyte | 0x08); /* * set south-bridge's enable bit, m1533, 0x79 */ pci_read_config_byte(isa_dev, 0x79, &tmpbyte); if (m5229_revision == 0xC2) { /* * 1543C-B0 (m1533, 0x79, bit 2) */ pci_write_config_byte(isa_dev, 0x79, tmpbyte | 0x04); } else if (m5229_revision >= 0xC3) { /* * 1553/1535 (m1533, 0x79, bit 1) */ pci_write_config_byte(isa_dev, 0x79, tmpbyte | 0x02); } /* * Ultra66 cable detection (from Host View) * m5229, 0x4a, bit0: primary, bit1: secondary 80 pin */ pci_read_config_byte(dev, 0x4a, &tmpbyte); /* * 0x4a, bit0 is 0 => primary channel * has 80-pin (from host view) */ if (!(tmpbyte & 0x01)) cable_80_pin[0] = 1; /* * 0x4a, bit1 is 0 => secondary channel * has 80-pin (from host view) */ if (!(tmpbyte & 0x02)) cable_80_pin[1] = 1; /* * Allow ata66 if cable of current channel has 80 pins */ ata66 = (hwif->channel)?cable_80_pin[1]:cable_80_pin[0]; } else { /* * revision 0x20 (1543-E, 1543-F) * revision 0xC0, 0xC1 (1543C-C, 1543C-D, 1543C-E) * clear CD-ROM DMA write bit, m5229, 0x4b, bit 7 */ pci_read_config_byte(dev, 0x4b, &tmpbyte); /* * clear bit 7 */ pci_write_config_byte(dev, 0x4b, tmpbyte & 0x7F); /* * check m1533, 0x5e, bit 1~4 == 1001 => & 00011110 = 00010010 */ pci_read_config_byte(isa_dev, 0x5e, &tmpbyte); chip_is_1543c_e = ((tmpbyte & 0x1e) == 0x12) ? 1: 0; } /* * CD_ROM DMA on (m5229, 0x53, bit0) * Enable this bit even if we want to use PIO * PIO FIFO off (m5229, 0x53, bit1) * The hardware will use 0x54h and 0x55h to control PIO FIFO */ pci_read_config_byte(dev, 0x53, &tmpbyte); tmpbyte = (tmpbyte & (~0x02)) | 0x01; pci_write_config_byte(dev, 0x53, tmpbyte); __restore_flags(flags); return(ata66); } void __init ide_init_ali15x3 (ide_hwif_t *hwif) { #ifndef CONFIG_SPARC64 byte ideic, inmir; byte irq_routing_table[] = { -1, 9, 3, 10, 4, 5, 7, 6, 1, 11, 0, 12, 0, 14, 0, 15 }; hwif->irq = hwif->channel ? 15 : 14; if (isa_dev) { /* * read IDE interface control */ pci_read_config_byte(isa_dev, 0x58, &ideic); /* bit0, bit1 */ ideic = ideic & 0x03; /* get IRQ for IDE Controller */ if ((hwif->channel && ideic == 0x03) || (!hwif->channel && !ideic)) { /* * get SIRQ1 routing table */ pci_read_config_byte(isa_dev, 0x44, &inmir); inmir = inmir & 0x0f; hwif->irq = irq_routing_table[inmir]; } else if (hwif->channel && !(ideic & 0x01)) { /* * get SIRQ2 routing table */ pci_read_config_byte(isa_dev, 0x75, &inmir); inmir = inmir & 0x0f; hwif->irq = irq_routing_table[inmir]; } } #endif /* CONFIG_SPARC64 */ hwif->tuneproc = &ali15x3_tune_drive; hwif->drives[0].autotune = 1; hwif->drives[1].autotune = 1; hwif->speedproc = &ali15x3_tune_chipset; #ifdef CONFIG_BLK_DEV_IDEDMA if ((hwif->dma_base) && (m5229_revision >= 0x20)) { /* * M1543C or newer for DMAing */ hwif->dmaproc = &ali15x3_dmaproc; hwif->autodma = 1; } if (noautodma) hwif->autodma = 0; #else hwif->autodma = 0; #endif /* CONFIG_BLK_DEV_IDEDMA */ } void __init ide_dmacapable_ali15x3 (ide_hwif_t *hwif, unsigned long dmabase) { if ((dmabase) && (m5229_revision < 0x20)) { return; } ide_setup_dma(hwif, dmabase, 8); }