| /* |
| * Copyright (C) 1997-1998 Mark Lord <mlord@pobox.com> |
| * Copyright (C) 1998 Eddie C. Dost <ecd@skynet.be> |
| * Copyright (C) 1999-2000 Andre Hedrick <andre@linux-ide.org> |
| * Copyright (C) 2004 Grant Grundler <grundler at parisc-linux.org> |
| * |
| * Inspired by an earlier effort from David S. Miller <davem@redhat.com> |
| */ |
| |
| #include <linux/module.h> |
| #include <linux/types.h> |
| #include <linux/kernel.h> |
| #include <linux/interrupt.h> |
| #include <linux/pci.h> |
| #include <linux/delay.h> |
| #include <linux/ide.h> |
| #include <linux/init.h> |
| |
| #include <asm/io.h> |
| |
| #define DRV_NAME "ns87415" |
| |
| #ifdef CONFIG_SUPERIO |
| /* SUPERIO 87560 is a PoS chip that NatSem denies exists. |
| * Unfortunately, it's built-in on all Astro-based PA-RISC workstations |
| * which use the integrated NS87514 cell for CD-ROM support. |
| * i.e we have to support for CD-ROM installs. |
| * See drivers/parisc/superio.c for more gory details. |
| */ |
| #include <asm/superio.h> |
| |
| #define SUPERIO_IDE_MAX_RETRIES 25 |
| |
| /* Because of a defect in Super I/O, all reads of the PCI DMA status |
| * registers, IDE status register and the IDE select register need to be |
| * retried |
| */ |
| static u8 superio_ide_inb (unsigned long port) |
| { |
| u8 tmp; |
| int retries = SUPERIO_IDE_MAX_RETRIES; |
| |
| /* printk(" [ reading port 0x%x with retry ] ", port); */ |
| |
| do { |
| tmp = inb(port); |
| if (tmp == 0) |
| udelay(50); |
| } while (tmp == 0 && retries-- > 0); |
| |
| return tmp; |
| } |
| |
| static u8 superio_read_status(ide_hwif_t *hwif) |
| { |
| return superio_ide_inb(hwif->io_ports.status_addr); |
| } |
| |
| static u8 superio_dma_sff_read_status(ide_hwif_t *hwif) |
| { |
| return superio_ide_inb(hwif->dma_base + ATA_DMA_STATUS); |
| } |
| |
| static void superio_tf_read(ide_drive_t *drive, struct ide_cmd *cmd) |
| { |
| struct ide_io_ports *io_ports = &drive->hwif->io_ports; |
| struct ide_taskfile *tf = &cmd->tf; |
| u8 valid = cmd->valid.in.tf; |
| |
| /* be sure we're looking at the low order bits */ |
| ide_write_devctl(hwif, ATA_DEVCTL_OBS); |
| |
| if (valid & IDE_VALID_ERROR) |
| tf->error = inb(io_ports->feature_addr); |
| if (valid & IDE_VALID_NSECT) |
| tf->nsect = inb(io_ports->nsect_addr); |
| if (valid & IDE_VALID_LBAL) |
| tf->lbal = inb(io_ports->lbal_addr); |
| if (valid & IDE_VALID_LBAM) |
| tf->lbam = inb(io_ports->lbam_addr); |
| if (valid & IDE_VALID_LBAH) |
| tf->lbah = inb(io_ports->lbah_addr); |
| if (valid & IDE_VALID_DEVICE) |
| tf->device = superio_ide_inb(io_ports->device_addr); |
| |
| if (cmd->tf_flags & IDE_TFLAG_LBA48) { |
| ide_write_devctl(hwif, ATA_HOB | ATA_DEVCTL_OBS); |
| |
| tf = &cmd->hob; |
| valid = cmd->valid.in.hob; |
| |
| if (valid & IDE_VALID_ERROR) |
| tf->error = inb(io_ports->feature_addr); |
| if (valid & IDE_VALID_NSECT) |
| tf->nsect = inb(io_ports->nsect_addr); |
| if (valid & IDE_VALID_LBAL) |
| tf->lbal = inb(io_ports->lbal_addr); |
| if (valid & IDE_VALID_LBAM) |
| tf->lbam = inb(io_ports->lbam_addr); |
| if (valid & IDE_VALID_LBAH) |
| tf->lbah = inb(io_ports->lbah_addr); |
| } |
| } |
| |
| static void ns87415_dev_select(ide_drive_t *drive); |
| |
| static const struct ide_tp_ops superio_tp_ops = { |
| .exec_command = ide_exec_command, |
| .read_status = superio_read_status, |
| .read_altstatus = ide_read_altstatus, |
| .write_devctl = ide_write_devctl, |
| |
| .dev_select = ns87415_dev_select, |
| .tf_load = ide_tf_load, |
| .tf_read = superio_tf_read, |
| |
| .input_data = ide_input_data, |
| .output_data = ide_output_data, |
| }; |
| |
| static void __devinit superio_init_iops(struct hwif_s *hwif) |
| { |
| struct pci_dev *pdev = to_pci_dev(hwif->dev); |
| u32 dma_stat; |
| u8 port = hwif->channel, tmp; |
| |
| dma_stat = (pci_resource_start(pdev, 4) & ~3) + (!port ? 2 : 0xa); |
| |
| /* Clear error/interrupt, enable dma */ |
| tmp = superio_ide_inb(dma_stat); |
| outb(tmp | 0x66, dma_stat); |
| } |
| #else |
| #define superio_dma_sff_read_status ide_dma_sff_read_status |
| #endif |
| |
| static unsigned int ns87415_count = 0, ns87415_control[MAX_HWIFS] = { 0 }; |
| |
| /* |
| * This routine either enables/disables (according to IDE_DFLAG_PRESENT) |
| * the IRQ associated with the port, |
| * and selects either PIO or DMA handshaking for the next I/O operation. |
| */ |
| static void ns87415_prepare_drive (ide_drive_t *drive, unsigned int use_dma) |
| { |
| ide_hwif_t *hwif = drive->hwif; |
| struct pci_dev *dev = to_pci_dev(hwif->dev); |
| unsigned int bit, other, new, *old = (unsigned int *) hwif->select_data; |
| unsigned long flags; |
| |
| local_irq_save(flags); |
| new = *old; |
| |
| /* Adjust IRQ enable bit */ |
| bit = 1 << (8 + hwif->channel); |
| |
| if (drive->dev_flags & IDE_DFLAG_PRESENT) |
| new &= ~bit; |
| else |
| new |= bit; |
| |
| /* Select PIO or DMA, DMA may only be selected for one drive/channel. */ |
| bit = 1 << (20 + (drive->dn & 1) + (hwif->channel << 1)); |
| other = 1 << (20 + (1 - (drive->dn & 1)) + (hwif->channel << 1)); |
| new = use_dma ? ((new & ~other) | bit) : (new & ~bit); |
| |
| if (new != *old) { |
| unsigned char stat; |
| |
| /* |
| * Don't change DMA engine settings while Write Buffers |
| * are busy. |
| */ |
| (void) pci_read_config_byte(dev, 0x43, &stat); |
| while (stat & 0x03) { |
| udelay(1); |
| (void) pci_read_config_byte(dev, 0x43, &stat); |
| } |
| |
| *old = new; |
| (void) pci_write_config_dword(dev, 0x40, new); |
| |
| /* |
| * And let things settle... |
| */ |
| udelay(10); |
| } |
| |
| local_irq_restore(flags); |
| } |
| |
| static void ns87415_dev_select(ide_drive_t *drive) |
| { |
| ns87415_prepare_drive(drive, |
| !!(drive->dev_flags & IDE_DFLAG_USING_DMA)); |
| |
| outb(drive->select | ATA_DEVICE_OBS, drive->hwif->io_ports.device_addr); |
| } |
| |
| static void ns87415_dma_start(ide_drive_t *drive) |
| { |
| ns87415_prepare_drive(drive, 1); |
| ide_dma_start(drive); |
| } |
| |
| static int ns87415_dma_end(ide_drive_t *drive) |
| { |
| ide_hwif_t *hwif = drive->hwif; |
| u8 dma_stat = 0, dma_cmd = 0; |
| |
| dma_stat = hwif->dma_ops->dma_sff_read_status(hwif); |
| /* get DMA command mode */ |
| dma_cmd = inb(hwif->dma_base + ATA_DMA_CMD); |
| /* stop DMA */ |
| outb(dma_cmd & ~1, hwif->dma_base + ATA_DMA_CMD); |
| /* from ERRATA: clear the INTR & ERROR bits */ |
| dma_cmd = inb(hwif->dma_base + ATA_DMA_CMD); |
| outb(dma_cmd | 6, hwif->dma_base + ATA_DMA_CMD); |
| |
| ns87415_prepare_drive(drive, 0); |
| |
| /* verify good DMA status */ |
| return (dma_stat & 7) != 4; |
| } |
| |
| static void __devinit init_hwif_ns87415 (ide_hwif_t *hwif) |
| { |
| struct pci_dev *dev = to_pci_dev(hwif->dev); |
| unsigned int ctrl, using_inta; |
| u8 progif; |
| #ifdef __sparc_v9__ |
| int timeout; |
| u8 stat; |
| #endif |
| |
| /* |
| * We cannot probe for IRQ: both ports share common IRQ on INTA. |
| * Also, leave IRQ masked during drive probing, to prevent infinite |
| * interrupts from a potentially floating INTA.. |
| * |
| * IRQs get unmasked in dev_select() when drive is first used. |
| */ |
| (void) pci_read_config_dword(dev, 0x40, &ctrl); |
| (void) pci_read_config_byte(dev, 0x09, &progif); |
| /* is irq in "native" mode? */ |
| using_inta = progif & (1 << (hwif->channel << 1)); |
| if (!using_inta) |
| using_inta = ctrl & (1 << (4 + hwif->channel)); |
| if (hwif->mate) { |
| hwif->select_data = hwif->mate->select_data; |
| } else { |
| hwif->select_data = (unsigned long) |
| &ns87415_control[ns87415_count++]; |
| ctrl |= (1 << 8) | (1 << 9); /* mask both IRQs */ |
| if (using_inta) |
| ctrl &= ~(1 << 6); /* unmask INTA */ |
| *((unsigned int *)hwif->select_data) = ctrl; |
| (void) pci_write_config_dword(dev, 0x40, ctrl); |
| |
| /* |
| * Set prefetch size to 512 bytes for both ports, |
| * but don't turn on/off prefetching here. |
| */ |
| pci_write_config_byte(dev, 0x55, 0xee); |
| |
| #ifdef __sparc_v9__ |
| /* |
| * XXX: Reset the device, if we don't it will not respond to |
| * dev_select() properly during first ide_probe_port(). |
| */ |
| timeout = 10000; |
| outb(12, hwif->io_ports.ctl_addr); |
| udelay(10); |
| outb(8, hwif->io_ports.ctl_addr); |
| do { |
| udelay(50); |
| stat = hwif->tp_ops->read_status(hwif); |
| if (stat == 0xff) |
| break; |
| } while ((stat & ATA_BUSY) && --timeout); |
| #endif |
| } |
| |
| if (!using_inta) |
| hwif->irq = pci_get_legacy_ide_irq(dev, hwif->channel); |
| |
| if (!hwif->dma_base) |
| return; |
| |
| outb(0x60, hwif->dma_base + ATA_DMA_STATUS); |
| } |
| |
| static const struct ide_tp_ops ns87415_tp_ops = { |
| .exec_command = ide_exec_command, |
| .read_status = ide_read_status, |
| .read_altstatus = ide_read_altstatus, |
| .write_devctl = ide_write_devctl, |
| |
| .dev_select = ns87415_dev_select, |
| .tf_load = ide_tf_load, |
| .tf_read = ide_tf_read, |
| |
| .input_data = ide_input_data, |
| .output_data = ide_output_data, |
| }; |
| |
| static const struct ide_dma_ops ns87415_dma_ops = { |
| .dma_host_set = ide_dma_host_set, |
| .dma_setup = ide_dma_setup, |
| .dma_start = ns87415_dma_start, |
| .dma_end = ns87415_dma_end, |
| .dma_test_irq = ide_dma_test_irq, |
| .dma_lost_irq = ide_dma_lost_irq, |
| .dma_timer_expiry = ide_dma_sff_timer_expiry, |
| .dma_sff_read_status = superio_dma_sff_read_status, |
| }; |
| |
| static const struct ide_port_info ns87415_chipset __devinitdata = { |
| .name = DRV_NAME, |
| .init_hwif = init_hwif_ns87415, |
| .tp_ops = &ns87415_tp_ops, |
| .dma_ops = &ns87415_dma_ops, |
| .host_flags = IDE_HFLAG_TRUST_BIOS_FOR_DMA | |
| IDE_HFLAG_NO_ATAPI_DMA, |
| }; |
| |
| static int __devinit ns87415_init_one(struct pci_dev *dev, const struct pci_device_id *id) |
| { |
| struct ide_port_info d = ns87415_chipset; |
| |
| #ifdef CONFIG_SUPERIO |
| if (PCI_SLOT(dev->devfn) == 0xE) { |
| /* Built-in - assume it's under superio. */ |
| d.init_iops = superio_init_iops; |
| d.tp_ops = &superio_tp_ops; |
| } |
| #endif |
| return ide_pci_init_one(dev, &d, NULL); |
| } |
| |
| static const struct pci_device_id ns87415_pci_tbl[] = { |
| { PCI_VDEVICE(NS, PCI_DEVICE_ID_NS_87415), 0 }, |
| { 0, }, |
| }; |
| MODULE_DEVICE_TABLE(pci, ns87415_pci_tbl); |
| |
| static struct pci_driver ns87415_pci_driver = { |
| .name = "NS87415_IDE", |
| .id_table = ns87415_pci_tbl, |
| .probe = ns87415_init_one, |
| .remove = ide_pci_remove, |
| .suspend = ide_pci_suspend, |
| .resume = ide_pci_resume, |
| }; |
| |
| static int __init ns87415_ide_init(void) |
| { |
| return ide_pci_register_driver(&ns87415_pci_driver); |
| } |
| |
| static void __exit ns87415_ide_exit(void) |
| { |
| pci_unregister_driver(&ns87415_pci_driver); |
| } |
| |
| module_init(ns87415_ide_init); |
| module_exit(ns87415_ide_exit); |
| |
| MODULE_AUTHOR("Mark Lord, Eddie Dost, Andre Hedrick"); |
| MODULE_DESCRIPTION("PCI driver module for NS87415 IDE"); |
| MODULE_LICENSE("GPL"); |