[deliverable/linux.git] / drivers / ide / pci / cmd64x.c

/*
 * linux/drivers/ide/pci/cmd64x.c		Version 1.53	Dec 24, 2007
 *
 * cmd64x.c: Enable interrupts at initialization time on Ultra/PCI machines.
 *           Due to massive hardware bugs, UltraDMA is only supported
 *           on the 646U2 and not on the 646U.
 *
 * Copyright (C) 1998		Eddie C. Dost  (ecd@skynet.be)
 * Copyright (C) 1998		David S. Miller (davem@redhat.com)
 *
 * Copyright (C) 1999-2002	Andre Hedrick <andre@linux-ide.org>
 * Copyright (C) 2007		MontaVista Software, Inc. <source@mvista.com>
 */

#include <linux/module.h>
#include <linux/types.h>
#include <linux/pci.h>
#include <linux/delay.h>
#include <linux/hdreg.h>
#include <linux/ide.h>
#include <linux/init.h>

#include <asm/io.h>

#define CMD_DEBUG 0

#if CMD_DEBUG
#define cmdprintk(x...)	printk(x)
#else
#define cmdprintk(x...)
#endif

/*
 * CMD64x specific registers definition.
 */
#define CFR		0x50
#define   CFR_INTR_CH0		0x04

#define	CMDTIM		0x52
#define	ARTTIM0		0x53
#define	DRWTIM0		0x54
#define ARTTIM1 	0x55
#define DRWTIM1		0x56
#define ARTTIM23	0x57
#define   ARTTIM23_DIS_RA2	0x04
#define   ARTTIM23_DIS_RA3	0x08
#define   ARTTIM23_INTR_CH1	0x10
#define DRWTIM2		0x58
#define BRST		0x59
#define DRWTIM3		0x5b

#define BMIDECR0	0x70
#define MRDMODE		0x71
#define   MRDMODE_INTR_CH0	0x04
#define   MRDMODE_INTR_CH1	0x08
#define UDIDETCR0	0x73
#define DTPR0		0x74
#define BMIDECR1	0x78
#define BMIDECSR	0x79
#define UDIDETCR1	0x7B
#define DTPR1		0x7C

static u8 quantize_timing(int timing, int quant)
{
	return (timing + quant - 1) / quant;
}

/*
 * This routine calculates active/recovery counts and then writes them into
 * the chipset registers.
 */
static void program_cycle_times (ide_drive_t *drive, int cycle_time, int active_time)
{
	struct pci_dev *dev	= HWIF(drive)->pci_dev;
	int clock_time		= 1000 / system_bus_clock();
	u8  cycle_count, active_count, recovery_count, drwtim;
	static const u8 recovery_values[] =
		{15, 15, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 0};
	static const u8 drwtim_regs[4] = {DRWTIM0, DRWTIM1, DRWTIM2, DRWTIM3};

	cmdprintk("program_cycle_times parameters: total=%d, active=%d\n",
		  cycle_time, active_time);

	cycle_count	= quantize_timing( cycle_time, clock_time);
	active_count	= quantize_timing(active_time, clock_time);
	recovery_count	= cycle_count - active_count;

	/*
	 * In case we've got too long recovery phase, try to lengthen
	 * the active phase
	 */
	if (recovery_count > 16) {
		active_count += recovery_count - 16;
		recovery_count = 16;
	}
	if (active_count > 16)		/* shouldn't actually happen... */
	 	active_count = 16;

	cmdprintk("Final counts: total=%d, active=%d, recovery=%d\n",
		  cycle_count, active_count, recovery_count);

	/*
	 * Convert values to internal chipset representation
	 */
	recovery_count = recovery_values[recovery_count];
 	active_count  &= 0x0f;

	/* Program the active/recovery counts into the DRWTIM register */
	drwtim = (active_count << 4) | recovery_count;
	(void) pci_write_config_byte(dev, drwtim_regs[drive->dn], drwtim);
	cmdprintk("Write 0x%02x to reg 0x%x\n", drwtim, drwtim_regs[drive->dn]);
}

/*
 * This routine writes into the chipset registers
 * PIO setup/active/recovery timings.
 */
static void cmd64x_tune_pio(ide_drive_t *drive, const u8 pio)
{
	ide_hwif_t *hwif	= HWIF(drive);
	struct pci_dev *dev	= hwif->pci_dev;
	unsigned int cycle_time;
	u8 setup_count, arttim = 0;

	static const u8 setup_values[] = {0x40, 0x40, 0x40, 0x80, 0, 0xc0};
	static const u8 arttim_regs[4] = {ARTTIM0, ARTTIM1, ARTTIM23, ARTTIM23};

	cycle_time = ide_pio_cycle_time(drive, pio);

	program_cycle_times(drive, cycle_time,
			    ide_pio_timings[pio].active_time);

	setup_count = quantize_timing(ide_pio_timings[pio].setup_time,
				      1000 / system_bus_clock());

	/*
	 * The primary channel has individual address setup timing registers
	 * for each drive and the hardware selects the slowest timing itself.
	 * The secondary channel has one common register and we have to select
	 * the slowest address setup timing ourselves.
	 */
	if (hwif->channel) {
		ide_drive_t *drives = hwif->drives;

		drive->drive_data = setup_count;
		setup_count = max(drives[0].drive_data, drives[1].drive_data);
	}

	if (setup_count > 5)		/* shouldn't actually happen... */
		setup_count = 5;
	cmdprintk("Final address setup count: %d\n", setup_count);

	/*
	 * Program the address setup clocks into the ARTTIM registers.
	 * Avoid clearing the secondary channel's interrupt bit.
	 */
	(void) pci_read_config_byte (dev, arttim_regs[drive->dn], &arttim);
	if (hwif->channel)
		arttim &= ~ARTTIM23_INTR_CH1;
	arttim &= ~0xc0;
	arttim |= setup_values[setup_count];
	(void) pci_write_config_byte(dev, arttim_regs[drive->dn], arttim);
	cmdprintk("Write 0x%02x to reg 0x%x\n", arttim, arttim_regs[drive->dn]);
}

/*
 * Attempts to set drive's PIO mode.
 * Special cases are 8: prefetch off, 9: prefetch on (both never worked)
 */

static void cmd64x_set_pio_mode(ide_drive_t *drive, const u8 pio)
{
	/*
	 * Filter out the prefetch control values
	 * to prevent PIO5 from being programmed
	 */
	if (pio == 8 || pio == 9)
		return;

	cmd64x_tune_pio(drive, pio);
}

static void cmd64x_set_dma_mode(ide_drive_t *drive, const u8 speed)
{
	ide_hwif_t *hwif	= HWIF(drive);
	struct pci_dev *dev	= hwif->pci_dev;
	u8 unit			= drive->dn & 0x01;
	u8 regU = 0, pciU	= hwif->channel ? UDIDETCR1 : UDIDETCR0;

	if (speed >= XFER_SW_DMA_0) {
		(void) pci_read_config_byte(dev, pciU, &regU);
		regU &= ~(unit ? 0xCA : 0x35);
	}

	switch(speed) {
	case XFER_UDMA_5:
		regU |= unit ? 0x0A : 0x05;
		break;
	case XFER_UDMA_4:
		regU |= unit ? 0x4A : 0x15;
		break;
	case XFER_UDMA_3:
		regU |= unit ? 0x8A : 0x25;
		break;
	case XFER_UDMA_2:
		regU |= unit ? 0x42 : 0x11;
		break;
	case XFER_UDMA_1:
		regU |= unit ? 0x82 : 0x21;
		break;
	case XFER_UDMA_0:
		regU |= unit ? 0xC2 : 0x31;
		break;
	case XFER_MW_DMA_2:
		program_cycle_times(drive, 120, 70);
		break;
	case XFER_MW_DMA_1:
		program_cycle_times(drive, 150, 80);
		break;
	case XFER_MW_DMA_0:
		program_cycle_times(drive, 480, 215);
		break;
	}

	if (speed >= XFER_SW_DMA_0)
		(void) pci_write_config_byte(dev, pciU, regU);
}

static int cmd648_ide_dma_end (ide_drive_t *drive)
{
	ide_hwif_t *hwif	= HWIF(drive);
	unsigned long base	= hwif->dma_base - (hwif->channel * 8);
	int err			= __ide_dma_end(drive);
	u8  irq_mask		= hwif->channel ? MRDMODE_INTR_CH1 :
						  MRDMODE_INTR_CH0;
	u8  mrdmode		= inb(base + 1);

	/* clear the interrupt bit */
	outb((mrdmode & ~(MRDMODE_INTR_CH0 | MRDMODE_INTR_CH1)) | irq_mask,
	     base + 1);

	return err;
}

static int cmd64x_ide_dma_end (ide_drive_t *drive)
{
	ide_hwif_t *hwif	= HWIF(drive);
	struct pci_dev *dev	= hwif->pci_dev;
	int irq_reg		= hwif->channel ? ARTTIM23 : CFR;
	u8  irq_mask		= hwif->channel ? ARTTIM23_INTR_CH1 :
						  CFR_INTR_CH0;
	u8  irq_stat		= 0;
	int err			= __ide_dma_end(drive);

	(void) pci_read_config_byte(dev, irq_reg, &irq_stat);
	/* clear the interrupt bit */
	(void) pci_write_config_byte(dev, irq_reg, irq_stat | irq_mask);

	return err;
}

static int cmd648_ide_dma_test_irq (ide_drive_t *drive)
{
	ide_hwif_t *hwif	= HWIF(drive);
	unsigned long base	= hwif->dma_base - (hwif->channel * 8);
	u8 irq_mask		= hwif->channel ? MRDMODE_INTR_CH1 :
						  MRDMODE_INTR_CH0;
	u8 dma_stat		= inb(hwif->dma_status);
	u8 mrdmode		= inb(base + 1);

#ifdef DEBUG
	printk("%s: dma_stat: 0x%02x mrdmode: 0x%02x irq_mask: 0x%02x\n",
	       drive->name, dma_stat, mrdmode, irq_mask);
#endif
	if (!(mrdmode & irq_mask))
		return 0;

	/* return 1 if INTR asserted */
	if (dma_stat & 4)
		return 1;

	return 0;
}

static int cmd64x_ide_dma_test_irq (ide_drive_t *drive)
{
	ide_hwif_t *hwif	= HWIF(drive);
	struct pci_dev *dev	= hwif->pci_dev;
	int irq_reg		= hwif->channel ? ARTTIM23 : CFR;
	u8  irq_mask		= hwif->channel ? ARTTIM23_INTR_CH1 :
						  CFR_INTR_CH0;
	u8  dma_stat		= inb(hwif->dma_status);
	u8  irq_stat		= 0;

	(void) pci_read_config_byte(dev, irq_reg, &irq_stat);

#ifdef DEBUG
	printk("%s: dma_stat: 0x%02x irq_stat: 0x%02x irq_mask: 0x%02x\n",
	       drive->name, dma_stat, irq_stat, irq_mask);
#endif
	if (!(irq_stat & irq_mask))
		return 0;

	/* return 1 if INTR asserted */
	if (dma_stat & 4)
		return 1;

	return 0;
}

/*
 * ASUS P55T2P4D with CMD646 chipset revision 0x01 requires the old
 * event order for DMA transfers.
 */

static int cmd646_1_ide_dma_end (ide_drive_t *drive)
{
	ide_hwif_t *hwif = HWIF(drive);
	u8 dma_stat = 0, dma_cmd = 0;

	drive->waiting_for_dma = 0;
	/* get DMA status */
	dma_stat = inb(hwif->dma_status);
	/* read DMA command state */
	dma_cmd = inb(hwif->dma_command);
	/* stop DMA */
	outb(dma_cmd & ~1, hwif->dma_command);
	/* clear the INTR & ERROR bits */
	outb(dma_stat | 6, hwif->dma_status);
	/* and free any DMA resources */
	ide_destroy_dmatable(drive);
	/* verify good DMA status */
	return (dma_stat & 7) != 4;
}

static unsigned int __devinit init_chipset_cmd64x(struct pci_dev *dev, const char *name)
{
	u8 mrdmode = 0;

	if (dev->device == PCI_DEVICE_ID_CMD_646) {

		switch (dev->revision) {
		case 0x07:
		case 0x05:
			printk("%s: UltraDMA capable\n", name);
			break;
		case 0x03:
		default:
			printk("%s: MultiWord DMA force limited\n", name);
			break;
		case 0x01:
			printk("%s: MultiWord DMA limited, "
			       "IRQ workaround enabled\n", name);
			break;
		}
	}

	/* Set a good latency timer and cache line size value. */
	(void) pci_write_config_byte(dev, PCI_LATENCY_TIMER, 64);
	/* FIXME: pci_set_master() to ensure a good latency timer value */

	/*
	 * Enable interrupts, select MEMORY READ LINE for reads.
	 *
	 * NOTE: although not mentioned in the PCI0646U specs,
	 * bits 0-1 are write only and won't be read back as
	 * set or not -- PCI0646U2 specs clarify this point.
	 */
	(void) pci_read_config_byte (dev, MRDMODE, &mrdmode);
	mrdmode &= ~0x30;
	(void) pci_write_config_byte(dev, MRDMODE, (mrdmode | 0x02));

	return 0;
}

static u8 __devinit ata66_cmd64x(ide_hwif_t *hwif)
{
	struct pci_dev  *dev	= hwif->pci_dev;
	u8 bmidecsr = 0, mask	= hwif->channel ? 0x02 : 0x01;

	switch (dev->device) {
	case PCI_DEVICE_ID_CMD_648:
	case PCI_DEVICE_ID_CMD_649:
 		pci_read_config_byte(dev, BMIDECSR, &bmidecsr);
		return (bmidecsr & mask) ? ATA_CBL_PATA80 : ATA_CBL_PATA40;
	default:
		return ATA_CBL_PATA40;
	}
}

static void __devinit init_hwif_cmd64x(ide_hwif_t *hwif)
{
	struct pci_dev *dev	= hwif->pci_dev;

	hwif->set_pio_mode = &cmd64x_set_pio_mode;
	hwif->set_dma_mode = &cmd64x_set_dma_mode;

	if (!hwif->dma_base)
		return;

	/*
	 * UltraDMA only supported on PCI646U and PCI646U2, which
	 * correspond to revisions 0x03, 0x05 and 0x07 respectively.
	 * Actually, although the CMD tech support people won't
	 * tell me the details, the 0x03 revision cannot support
	 * UDMA correctly without hardware modifications, and even
	 * then it only works with Quantum disks due to some
	 * hold time assumptions in the 646U part which are fixed
	 * in the 646U2.
	 *
	 * So we only do UltraDMA on revision 0x05 and 0x07 chipsets.
	 */
	if (dev->device == PCI_DEVICE_ID_CMD_646 && dev->revision < 5)
		hwif->ultra_mask = 0x00;

	if (hwif->cbl != ATA_CBL_PATA40_SHORT)
		hwif->cbl = ata66_cmd64x(hwif);

	switch (dev->device) {
	case PCI_DEVICE_ID_CMD_648:
	case PCI_DEVICE_ID_CMD_649:
	alt_irq_bits:
		hwif->ide_dma_end	= &cmd648_ide_dma_end;
		hwif->ide_dma_test_irq	= &cmd648_ide_dma_test_irq;
		break;
	case PCI_DEVICE_ID_CMD_646:
		if (dev->revision == 0x01) {
			hwif->ide_dma_end = &cmd646_1_ide_dma_end;
			break;
		} else if (dev->revision >= 0x03)
			goto alt_irq_bits;
		/* fall thru */
	default:
		hwif->ide_dma_end	= &cmd64x_ide_dma_end;
		hwif->ide_dma_test_irq	= &cmd64x_ide_dma_test_irq;
		break;
	}
}

static const struct ide_port_info cmd64x_chipsets[] __devinitdata = {
	{	/* 0 */
		.name		= "CMD643",
		.init_chipset	= init_chipset_cmd64x,
		.init_hwif	= init_hwif_cmd64x,
		.enablebits	= {{0x00,0x00,0x00}, {0x51,0x08,0x08}},
		.host_flags	= IDE_HFLAG_CLEAR_SIMPLEX |
				  IDE_HFLAG_ABUSE_PREFETCH |
				  IDE_HFLAG_BOOTABLE,
		.pio_mask	= ATA_PIO5,
		.mwdma_mask	= ATA_MWDMA2,
		.udma_mask	= 0x00, /* no udma */
	},{	/* 1 */
		.name		= "CMD646",
		.init_chipset	= init_chipset_cmd64x,
		.init_hwif	= init_hwif_cmd64x,
		.enablebits	= {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
		.chipset	= ide_cmd646,
		.host_flags	= IDE_HFLAG_ABUSE_PREFETCH | IDE_HFLAG_BOOTABLE,
		.pio_mask	= ATA_PIO5,
		.mwdma_mask	= ATA_MWDMA2,
		.udma_mask	= ATA_UDMA2,
	},{	/* 2 */
		.name		= "CMD648",
		.init_chipset	= init_chipset_cmd64x,
		.init_hwif	= init_hwif_cmd64x,
		.enablebits	= {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
		.host_flags	= IDE_HFLAG_ABUSE_PREFETCH | IDE_HFLAG_BOOTABLE,
		.pio_mask	= ATA_PIO5,
		.mwdma_mask	= ATA_MWDMA2,
		.udma_mask	= ATA_UDMA4,
	},{	/* 3 */
		.name		= "CMD649",
		.init_chipset	= init_chipset_cmd64x,
		.init_hwif	= init_hwif_cmd64x,
		.enablebits	= {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
		.host_flags	= IDE_HFLAG_ABUSE_PREFETCH | IDE_HFLAG_BOOTABLE,
		.pio_mask	= ATA_PIO5,
		.mwdma_mask	= ATA_MWDMA2,
		.udma_mask	= ATA_UDMA5,
	}
};

static int __devinit cmd64x_init_one(struct pci_dev *dev, const struct pci_device_id *id)
{
	struct ide_port_info d;
	u8 idx = id->driver_data;

	d = cmd64x_chipsets[idx];

	/*
	 * The original PCI0646 didn't have the primary channel enable bit,
	 * it appeared starting with PCI0646U (i.e. revision ID 3).
	 */
	if (idx == 1 && dev->revision < 3)
		d.enablebits[0].reg = 0;

	return ide_setup_pci_device(dev, &d);
}

static const struct pci_device_id cmd64x_pci_tbl[] = {
	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_643), 0 },
	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_646), 1 },
	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_648), 2 },
	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_649), 3 },
	{ 0, },
};
MODULE_DEVICE_TABLE(pci, cmd64x_pci_tbl);

static struct pci_driver driver = {
	.name		= "CMD64x_IDE",
	.id_table	= cmd64x_pci_tbl,
	.probe		= cmd64x_init_one,
};

static int __init cmd64x_ide_init(void)
{
	return ide_pci_register_driver(&driver);
}

module_init(cmd64x_ide_init);

MODULE_AUTHOR("Eddie Dost, David Miller, Andre Hedrick");
MODULE_DESCRIPTION("PCI driver module for CMD64x IDE");
MODULE_LICENSE("GPL");
Commit	Line	Data
60e7a82f	1	/*
63c44678	2	* linux/drivers/ide/pci/cmd64x.c Version 1.53 Dec 24, 2007
1da177e4 LT	3	*
1da177e4 LT	4	* cmd64x.c: Enable interrupts at initialization time on Ultra/PCI machines.
1da177e4 LT	5	* Due to massive hardware bugs, UltraDMA is only supported
	6	* on the 646U2 and not on the 646U.
	7	*
	8	* Copyright (C) 1998 Eddie C. Dost (ecd@skynet.be)
	9	* Copyright (C) 1998 David S. Miller (davem@redhat.com)
	10	*
	11	* Copyright (C) 1999-2002 Andre Hedrick <andre@linux-ide.org>
f92d50e6	12	* Copyright (C) 2007 MontaVista Software, Inc. <source@mvista.com>
1da177e4 LT	13	*/
1da177e4 LT	14
1da177e4 LT	15	#include <linux/module.h>
	16	#include <linux/types.h>
	17	#include <linux/pci.h>
	18	#include <linux/delay.h>
	19	#include <linux/hdreg.h>
	20	#include <linux/ide.h>
	21	#include <linux/init.h>
	22
	23	#include <asm/io.h>
	24
1da177e4 LT	25	#define CMD_DEBUG 0
	26
	27	#if CMD_DEBUG
	28	#define cmdprintk(x...) printk(x)
	29	#else
	30	#define cmdprintk(x...)
	31	#endif
	32
	33	/*
	34	* CMD64x specific registers definition.
	35	*/
	36	#define CFR 0x50
e51e2528	37	#define CFR_INTR_CH0 0x04
1da177e4 LT	38
	39	#define CMDTIM 0x52
	40	#define ARTTIM0 0x53
	41	#define DRWTIM0 0x54
	42	#define ARTTIM1 0x55
	43	#define DRWTIM1 0x56
	44	#define ARTTIM23 0x57
	45	#define ARTTIM23_DIS_RA2 0x04
	46	#define ARTTIM23_DIS_RA3 0x08
	47	#define ARTTIM23_INTR_CH1 0x10
1da177e4 LT	48	#define DRWTIM2 0x58
	49	#define BRST 0x59
	50	#define DRWTIM3 0x5b
	51
	52	#define BMIDECR0 0x70
	53	#define MRDMODE 0x71
	54	#define MRDMODE_INTR_CH0 0x04
	55	#define MRDMODE_INTR_CH1 0x08
1da177e4 LT	56	#define UDIDETCR0 0x73
	57	#define DTPR0 0x74
	58	#define BMIDECR1 0x78
	59	#define BMIDECSR 0x79
1da177e4 LT	60	#define UDIDETCR1 0x7B
	61	#define DTPR1 0x7C
	62
e277a1aa SS	63	static u8 quantize_timing(int timing, int quant)
	64	{
	65	return (timing + quant - 1) / quant;
	66	}
	67
1da177e4	68	/*
60e7a82f SS	69	* This routine calculates active/recovery counts and then writes them into
60e7a82f SS	70	* the chipset registers.
1da177e4	71	*/
60e7a82f	72	static void program_cycle_times (ide_drive_t *drive, int cycle_time, int active_time)
1da177e4	73	{
60e7a82f SS	74	struct pci_dev *dev = HWIF(drive)->pci_dev;
	75	int clock_time = 1000 / system_bus_clock();
	76	u8 cycle_count, active_count, recovery_count, drwtim;
	77	static const u8 recovery_values[] =
1da177e4	78	{15, 15, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 0};
60e7a82f SS	79	static const u8 drwtim_regs[4] = {DRWTIM0, DRWTIM1, DRWTIM2, DRWTIM3};
	80
	81	cmdprintk("program_cycle_times parameters: total=%d, active=%d\n",
	82	cycle_time, active_time);
	83
	84	cycle_count = quantize_timing( cycle_time, clock_time);
	85	active_count = quantize_timing(active_time, clock_time);
	86	recovery_count = cycle_count - active_count;
	87
1da177e4	88	/*
60e7a82f SS	89	* In case we've got too long recovery phase, try to lengthen
60e7a82f SS	90	* the active phase
1da177e4	91	*/
60e7a82f SS	92	if (recovery_count > 16) {
	93	active_count += recovery_count - 16;
	94	recovery_count = 16;
1da177e4	95	}
60e7a82f SS	96	if (active_count > 16) /* shouldn't actually happen... */
	97	active_count = 16;
	98
	99	cmdprintk("Final counts: total=%d, active=%d, recovery=%d\n",
	100	cycle_count, active_count, recovery_count);
1da177e4 LT	101
	102	/*
	103	* Convert values to internal chipset representation
	104	*/
60e7a82f SS	105	recovery_count = recovery_values[recovery_count];
60e7a82f SS	106	active_count &= 0x0f;
1da177e4	107
60e7a82f SS	108	/* Program the active/recovery counts into the DRWTIM register */
	109	drwtim = (active_count << 4) \| recovery_count;
	110	(void) pci_write_config_byte(dev, drwtim_regs[drive->dn], drwtim);
	111	cmdprintk("Write 0x%02x to reg 0x%x\n", drwtim, drwtim_regs[drive->dn]);
1da177e4 LT	112	}
	113
	114	/*
26bcb879 BZ	115	* This routine writes into the chipset registers
26bcb879 BZ	116	* PIO setup/active/recovery timings.
1da177e4	117	*/
26bcb879	118	static void cmd64x_tune_pio(ide_drive_t *drive, const u8 pio)
1da177e4	119	{
60e7a82f SS	120	ide_hwif_t *hwif = HWIF(drive);
60e7a82f SS	121	struct pci_dev *dev = hwif->pci_dev;
7dd00083	122	unsigned int cycle_time;
26bcb879 BZ	123	u8 setup_count, arttim = 0;
26bcb879 BZ	124
60e7a82f SS	125	static const u8 setup_values[] = {0x40, 0x40, 0x40, 0x80, 0, 0xc0};
60e7a82f SS	126	static const u8 arttim_regs[4] = {ARTTIM0, ARTTIM1, ARTTIM23, ARTTIM23};
7dd00083	127
26bcb879	128	cycle_time = ide_pio_cycle_time(drive, pio);
1da177e4	129
7dd00083	130	program_cycle_times(drive, cycle_time,
26bcb879	131	ide_pio_timings[pio].active_time);
1da177e4	132
26bcb879	133	setup_count = quantize_timing(ide_pio_timings[pio].setup_time,
60e7a82f SS	134	1000 / system_bus_clock());
	135
	136	/*
	137	* The primary channel has individual address setup timing registers
	138	* for each drive and the hardware selects the slowest timing itself.
	139	* The secondary channel has one common register and we have to select
	140	* the slowest address setup timing ourselves.
	141	*/
	142	if (hwif->channel) {
	143	ide_drive_t *drives = hwif->drives;
	144
	145	drive->drive_data = setup_count;
	146	setup_count = max(drives[0].drive_data, drives[1].drive_data);
1da177e4	147	}
1da177e4	148
60e7a82f SS	149	if (setup_count > 5) /* shouldn't actually happen... */
	150	setup_count = 5;
	151	cmdprintk("Final address setup count: %d\n", setup_count);
1da177e4	152
60e7a82f SS	153	/*
	154	* Program the address setup clocks into the ARTTIM registers.
	155	* Avoid clearing the secondary channel's interrupt bit.
	156	*/
	157	(void) pci_read_config_byte (dev, arttim_regs[drive->dn], &arttim);
	158	if (hwif->channel)
	159	arttim &= ~ARTTIM23_INTR_CH1;
	160	arttim &= ~0xc0;
	161	arttim \|= setup_values[setup_count];
	162	(void) pci_write_config_byte(dev, arttim_regs[drive->dn], arttim);
	163	cmdprintk("Write 0x%02x to reg 0x%x\n", arttim, arttim_regs[drive->dn]);
f92d50e6 SS	164	}
	165
	166	/*
	167	* Attempts to set drive's PIO mode.
26bcb879	168	* Special cases are 8: prefetch off, 9: prefetch on (both never worked)
f92d50e6	169	*/
26bcb879 BZ	170
26bcb879 BZ	171	static void cmd64x_set_pio_mode(ide_drive_t *drive, const u8 pio)
f92d50e6 SS	172	{
	173	/*
	174	* Filter out the prefetch control values
	175	* to prevent PIO5 from being programmed
	176	*/
	177	if (pio == 8 \|\| pio == 9)
	178	return;
	179
26bcb879	180	cmd64x_tune_pio(drive, pio);
1da177e4 LT	181	}
1da177e4 LT	182
88b2b32b	183	static void cmd64x_set_dma_mode(ide_drive_t *drive, const u8 speed)
1da177e4 LT	184	{
	185	ide_hwif_t *hwif = HWIF(drive);
	186	struct pci_dev *dev = hwif->pci_dev;
60e7a82f SS	187	u8 unit = drive->dn & 0x01;
60e7a82f SS	188	u8 regU = 0, pciU = hwif->channel ? UDIDETCR1 : UDIDETCR0;
1da177e4	189
f92d50e6	190	if (speed >= XFER_SW_DMA_0) {
1da177e4	191	(void) pci_read_config_byte(dev, pciU, &regU);
1da177e4	192	regU &= ~(unit ? 0xCA : 0x35);
1da177e4 LT	193	}
	194
	195	switch(speed) {
60e7a82f SS	196	case XFER_UDMA_5:
	197	regU \|= unit ? 0x0A : 0x05;
	198	break;
	199	case XFER_UDMA_4:
	200	regU \|= unit ? 0x4A : 0x15;
	201	break;
	202	case XFER_UDMA_3:
	203	regU \|= unit ? 0x8A : 0x25;
	204	break;
	205	case XFER_UDMA_2:
	206	regU \|= unit ? 0x42 : 0x11;
	207	break;
	208	case XFER_UDMA_1:
	209	regU \|= unit ? 0x82 : 0x21;
	210	break;
	211	case XFER_UDMA_0:
	212	regU \|= unit ? 0xC2 : 0x31;
	213	break;
	214	case XFER_MW_DMA_2:
	215	program_cycle_times(drive, 120, 70);
	216	break;
	217	case XFER_MW_DMA_1:
	218	program_cycle_times(drive, 150, 80);
	219	break;
	220	case XFER_MW_DMA_0:
	221	program_cycle_times(drive, 480, 215);
	222	break;
1da177e4 LT	223	}
1da177e4 LT	224
60e7a82f	225	if (speed >= XFER_SW_DMA_0)
1da177e4	226	(void) pci_write_config_byte(dev, pciU, regU);
1da177e4 LT	227	}
1da177e4 LT	228
66602c83	229	static int cmd648_ide_dma_end (ide_drive_t *drive)
1da177e4	230	{
66602c83	231	ide_hwif_t *hwif = HWIF(drive);
1c029fd6	232	unsigned long base = hwif->dma_base - (hwif->channel * 8);
66602c83 SS	233	int err = __ide_dma_end(drive);
	234	u8 irq_mask = hwif->channel ? MRDMODE_INTR_CH1 :
	235	MRDMODE_INTR_CH0;
1c029fd6	236	u8 mrdmode = inb(base + 1);
66602c83 SS	237
66602c83 SS	238	/* clear the interrupt bit */
6183289c	239	outb((mrdmode & ~(MRDMODE_INTR_CH0 \| MRDMODE_INTR_CH1)) \| irq_mask,
1c029fd6	240	base + 1);
66602c83 SS	241
66602c83 SS	242	return err;
1da177e4 LT	243	}
	244
	245	static int cmd64x_ide_dma_end (ide_drive_t *drive)
	246	{
1da177e4 LT	247	ide_hwif_t *hwif = HWIF(drive);
1da177e4 LT	248	struct pci_dev *dev = hwif->pci_dev;
66602c83 SS	249	int irq_reg = hwif->channel ? ARTTIM23 : CFR;
	250	u8 irq_mask = hwif->channel ? ARTTIM23_INTR_CH1 :
	251	CFR_INTR_CH0;
	252	u8 irq_stat = 0;
	253	int err = __ide_dma_end(drive);
1da177e4	254
66602c83 SS	255	(void) pci_read_config_byte(dev, irq_reg, &irq_stat);
	256	/* clear the interrupt bit */
	257	(void) pci_write_config_byte(dev, irq_reg, irq_stat \| irq_mask);
	258
	259	return err;
	260	}
	261
	262	static int cmd648_ide_dma_test_irq (ide_drive_t *drive)
	263	{
	264	ide_hwif_t *hwif = HWIF(drive);
1c029fd6	265	unsigned long base = hwif->dma_base - (hwif->channel * 8);
66602c83 SS	266	u8 irq_mask = hwif->channel ? MRDMODE_INTR_CH1 :
	267	MRDMODE_INTR_CH0;
	268	u8 dma_stat = inb(hwif->dma_status);
1c029fd6	269	u8 mrdmode = inb(base + 1);
66602c83 SS	270
	271	#ifdef DEBUG
	272	printk("%s: dma_stat: 0x%02x mrdmode: 0x%02x irq_mask: 0x%02x\n",
	273	drive->name, dma_stat, mrdmode, irq_mask);
	274	#endif
	275	if (!(mrdmode & irq_mask))
	276	return 0;
	277
	278	/* return 1 if INTR asserted */
	279	if (dma_stat & 4)
	280	return 1;
	281
	282	return 0;
1da177e4 LT	283	}
	284
	285	static int cmd64x_ide_dma_test_irq (ide_drive_t *drive)
	286	{
e51e2528 SS	287	ide_hwif_t *hwif = HWIF(drive);
e51e2528 SS	288	struct pci_dev *dev = hwif->pci_dev;
66602c83 SS	289	int irq_reg = hwif->channel ? ARTTIM23 : CFR;
	290	u8 irq_mask = hwif->channel ? ARTTIM23_INTR_CH1 :
	291	CFR_INTR_CH0;
	292	u8 dma_stat = inb(hwif->dma_status);
	293	u8 irq_stat = 0;
e51e2528 SS	294
e51e2528 SS	295	(void) pci_read_config_byte(dev, irq_reg, &irq_stat);
1da177e4	296
1da177e4	297	#ifdef DEBUG
66602c83 SS	298	printk("%s: dma_stat: 0x%02x irq_stat: 0x%02x irq_mask: 0x%02x\n",
66602c83 SS	299	drive->name, dma_stat, irq_stat, irq_mask);
1da177e4	300	#endif
66602c83	301	if (!(irq_stat & irq_mask))
1da177e4 LT	302	return 0;
	303
	304	/* return 1 if INTR asserted */
66602c83	305	if (dma_stat & 4)
1da177e4 LT	306	return 1;
	307
	308	return 0;
	309	}
	310
	311	/*
	312	* ASUS P55T2P4D with CMD646 chipset revision 0x01 requires the old
	313	* event order for DMA transfers.
	314	*/
	315
	316	static int cmd646_1_ide_dma_end (ide_drive_t *drive)
	317	{
	318	ide_hwif_t *hwif = HWIF(drive);
	319	u8 dma_stat = 0, dma_cmd = 0;
	320
	321	drive->waiting_for_dma = 0;
	322	/* get DMA status */
0ecdca26	323	dma_stat = inb(hwif->dma_status);
1da177e4	324	/* read DMA command state */
0ecdca26	325	dma_cmd = inb(hwif->dma_command);
1da177e4	326	/* stop DMA */
0ecdca26	327	outb(dma_cmd & ~1, hwif->dma_command);
1da177e4	328	/* clear the INTR & ERROR bits */
0ecdca26	329	outb(dma_stat \| 6, hwif->dma_status);
1da177e4 LT	330	/* and free any DMA resources */
	331	ide_destroy_dmatable(drive);
	332	/* verify good DMA status */
	333	return (dma_stat & 7) != 4;
	334	}
	335
	336	static unsigned int __devinit init_chipset_cmd64x(struct pci_dev dev, const char name)
	337	{
1da177e4 LT	338	u8 mrdmode = 0;
1da177e4 LT	339
83a6d4ab	340	if (dev->device == PCI_DEVICE_ID_CMD_646) {
1da177e4	341
1afa6554	342	switch (dev->revision) {
83a6d4ab SS	343	case 0x07:
83a6d4ab SS	344	case 0x05:
b37c6b84	345	printk("%s: UltraDMA capable\n", name);
1da177e4	346	break;
83a6d4ab	347	case 0x03:
1da177e4	348	default:
b37c6b84	349	printk("%s: MultiWord DMA force limited\n", name);
83a6d4ab SS	350	break;
	351	case 0x01:
	352	printk("%s: MultiWord DMA limited, "
	353	"IRQ workaround enabled\n", name);
1da177e4	354	break;
83a6d4ab	355	}
1da177e4 LT	356	}
	357
	358	/* Set a good latency timer and cache line size value. */
	359	(void) pci_write_config_byte(dev, PCI_LATENCY_TIMER, 64);
	360	/* FIXME: pci_set_master() to ensure a good latency timer value */
	361
83a6d4ab SS	362	/*
	363	* Enable interrupts, select MEMORY READ LINE for reads.
	364	*
	365	* NOTE: although not mentioned in the PCI0646U specs,
	366	* bits 0-1 are write only and won't be read back as
	367	* set or not -- PCI0646U2 specs clarify this point.
1da177e4	368	*/
83a6d4ab SS	369	(void) pci_read_config_byte (dev, MRDMODE, &mrdmode);
	370	mrdmode &= ~0x30;
	371	(void) pci_write_config_byte(dev, MRDMODE, (mrdmode \| 0x02));
1da177e4	372
1da177e4 LT	373	return 0;
	374	}
	375
49521f97	376	static u8 __devinit ata66_cmd64x(ide_hwif_t *hwif)
1da177e4	377	{
83a6d4ab SS	378	struct pci_dev *dev = hwif->pci_dev;
83a6d4ab SS	379	u8 bmidecsr = 0, mask = hwif->channel ? 0x02 : 0x01;
1da177e4	380
83a6d4ab SS	381	switch (dev->device) {
	382	case PCI_DEVICE_ID_CMD_648:
	383	case PCI_DEVICE_ID_CMD_649:
	384	pci_read_config_byte(dev, BMIDECSR, &bmidecsr);
49521f97	385	return (bmidecsr & mask) ? ATA_CBL_PATA80 : ATA_CBL_PATA40;
83a6d4ab	386	default:
49521f97	387	return ATA_CBL_PATA40;
1da177e4	388	}
1da177e4 LT	389	}
	390
	391	static void __devinit init_hwif_cmd64x(ide_hwif_t *hwif)
	392	{
	393	struct pci_dev *dev = hwif->pci_dev;
1da177e4	394
26bcb879	395	hwif->set_pio_mode = &cmd64x_set_pio_mode;
88b2b32b	396	hwif->set_dma_mode = &cmd64x_set_dma_mode;
1da177e4	397
f92d50e6	398	if (!hwif->dma_base)
1da177e4	399	return;
1da177e4	400
2d5eaa6d BZ	401	/*
	402	* UltraDMA only supported on PCI646U and PCI646U2, which
	403	* correspond to revisions 0x03, 0x05 and 0x07 respectively.
	404	* Actually, although the CMD tech support people won't
	405	* tell me the details, the 0x03 revision cannot support
	406	* UDMA correctly without hardware modifications, and even
	407	* then it only works with Quantum disks due to some
	408	* hold time assumptions in the 646U part which are fixed
	409	* in the 646U2.
	410	*
	411	* So we only do UltraDMA on revision 0x05 and 0x07 chipsets.
	412	*/
1afa6554	413	if (dev->device == PCI_DEVICE_ID_CMD_646 && dev->revision < 5)
18137207	414	hwif->ultra_mask = 0x00;
1da177e4	415
49521f97 BZ	416	if (hwif->cbl != ATA_CBL_PATA40_SHORT)
49521f97 BZ	417	hwif->cbl = ata66_cmd64x(hwif);
1da177e4	418
83a6d4ab	419	switch (dev->device) {
66602c83 SS	420	case PCI_DEVICE_ID_CMD_648:
	421	case PCI_DEVICE_ID_CMD_649:
	422	alt_irq_bits:
	423	hwif->ide_dma_end = &cmd648_ide_dma_end;
	424	hwif->ide_dma_test_irq = &cmd648_ide_dma_test_irq;
	425	break;
	426	case PCI_DEVICE_ID_CMD_646:
1afa6554	427	if (dev->revision == 0x01) {
1da177e4	428	hwif->ide_dma_end = &cmd646_1_ide_dma_end;
66602c83	429	break;
1afa6554	430	} else if (dev->revision >= 0x03)
66602c83 SS	431	goto alt_irq_bits;
	432	/* fall thru */
	433	default:
	434	hwif->ide_dma_end = &cmd64x_ide_dma_end;
	435	hwif->ide_dma_test_irq = &cmd64x_ide_dma_test_irq;
	436	break;
1da177e4	437	}
1da177e4 LT	438	}
1da177e4 LT	439
85620436	440	static const struct ide_port_info cmd64x_chipsets[] __devinitdata = {
1da177e4 LT	441	{ /* 0 */
	442	.name = "CMD643",
	443	.init_chipset = init_chipset_cmd64x,
	444	.init_hwif = init_hwif_cmd64x,
7accbffd	445	.enablebits = {{0x00,0x00,0x00}, {0x51,0x08,0x08}},
8ac2b42a BZ	446	.host_flags = IDE_HFLAG_CLEAR_SIMPLEX \|
	447	IDE_HFLAG_ABUSE_PREFETCH \|
	448	IDE_HFLAG_BOOTABLE,
4099d143	449	.pio_mask = ATA_PIO5,
5f8b6c34	450	.mwdma_mask = ATA_MWDMA2,
18137207	451	.udma_mask = 0x00, /* no udma */
1da177e4 LT	452	},{ /* 1 */
	453	.name = "CMD646",
	454	.init_chipset = init_chipset_cmd64x,
	455	.init_hwif = init_hwif_cmd64x,
7accbffd	456	.enablebits = {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
deffca11	457	.chipset = ide_cmd646,
7cab14a7	458	.host_flags = IDE_HFLAG_ABUSE_PREFETCH \| IDE_HFLAG_BOOTABLE,
4099d143	459	.pio_mask = ATA_PIO5,
5f8b6c34 BZ	460	.mwdma_mask = ATA_MWDMA2,
5f8b6c34 BZ	461	.udma_mask = ATA_UDMA2,
1da177e4 LT	462	},{ /* 2 */
	463	.name = "CMD648",
	464	.init_chipset = init_chipset_cmd64x,
	465	.init_hwif = init_hwif_cmd64x,
7accbffd	466	.enablebits = {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
7cab14a7	467	.host_flags = IDE_HFLAG_ABUSE_PREFETCH \| IDE_HFLAG_BOOTABLE,
4099d143	468	.pio_mask = ATA_PIO5,
5f8b6c34 BZ	469	.mwdma_mask = ATA_MWDMA2,
5f8b6c34 BZ	470	.udma_mask = ATA_UDMA4,
1da177e4 LT	471	},{ /* 3 */
	472	.name = "CMD649",
	473	.init_chipset = init_chipset_cmd64x,
	474	.init_hwif = init_hwif_cmd64x,
7accbffd	475	.enablebits = {{0x51,0x04,0x04}, {0x51,0x08,0x08}},
7cab14a7	476	.host_flags = IDE_HFLAG_ABUSE_PREFETCH \| IDE_HFLAG_BOOTABLE,
4099d143	477	.pio_mask = ATA_PIO5,
5f8b6c34 BZ	478	.mwdma_mask = ATA_MWDMA2,
5f8b6c34 BZ	479	.udma_mask = ATA_UDMA5,
1da177e4 LT	480	}
	481	};
	482
	483	static int __devinit cmd64x_init_one(struct pci_dev dev, const struct pci_device_id id)
	484	{
039788e1	485	struct ide_port_info d;
bfd314a3 BZ	486	u8 idx = id->driver_data;
	487
	488	d = cmd64x_chipsets[idx];
	489
	490	/*
	491	* The original PCI0646 didn't have the primary channel enable bit,
	492	* it appeared starting with PCI0646U (i.e. revision ID 3).
	493	*/
	494	if (idx == 1 && dev->revision < 3)
	495	d.enablebits[0].reg = 0;
7accbffd	496
bfd314a3	497	return ide_setup_pci_device(dev, &d);
1da177e4 LT	498	}
1da177e4 LT	499
9cbcc5e3 BZ	500	static const struct pci_device_id cmd64x_pci_tbl[] = {
	501	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_643), 0 },
	502	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_646), 1 },
	503	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_648), 2 },
	504	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_649), 3 },
1da177e4 LT	505	{ 0, },
	506	};
	507	MODULE_DEVICE_TABLE(pci, cmd64x_pci_tbl);
	508
	509	static struct pci_driver driver = {
	510	.name = "CMD64x_IDE",
	511	.id_table = cmd64x_pci_tbl,
	512	.probe = cmd64x_init_one,
	513	};
	514
82ab1eec	515	static int __init cmd64x_ide_init(void)
1da177e4 LT	516	{
	517	return ide_pci_register_driver(&driver);
	518	}
	519
	520	module_init(cmd64x_ide_init);
	521
	522	MODULE_AUTHOR("Eddie Dost, David Miller, Andre Hedrick");
	523	MODULE_DESCRIPTION("PCI driver module for CMD64x IDE");
	524	MODULE_LICENSE("GPL");