[deliverable/linux.git] / drivers / ata / pata_qdi.c

/*
 *    pata_qdi.c - QDI VLB ATA controllers
 *	(C) 2006 Red Hat <alan@redhat.com>
 *
 * This driver mostly exists as a proof of concept for non PCI devices under
 * libata. While the QDI6580 was 'neat' in 1993 it is no longer terribly
 * useful.
 *
 * Tuning code written from the documentation at
 * http://www.ryston.cz/petr/vlb/qd6500.html
 * http://www.ryston.cz/petr/vlb/qd6580.html
 *
 * Probe code based on drivers/ide/legacy/qd65xx.c
 * Rewritten from the work of Colten Edwards <pje120@cs.usask.ca> by
 * Samuel Thibault <samuel.thibault@fnac.net>
 */

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/pci.h>
#include <linux/init.h>
#include <linux/blkdev.h>
#include <linux/delay.h>
#include <scsi/scsi_host.h>
#include <linux/libata.h>
#include <linux/platform_device.h>

#define DRV_NAME "pata_qdi"
#define DRV_VERSION "0.3.1"

#define NR_HOST 4	/* Two 6580s */

struct qdi_data {
	unsigned long timing;
	u8 clock[2];
	u8 last;
	int fast;
	struct platform_device *platform_dev;

};

static struct ata_host *qdi_host[NR_HOST];
static struct qdi_data qdi_data[NR_HOST];
static int nr_qdi_host;

#ifdef MODULE
static int probe_qdi = 1;
#else
static int probe_qdi;
#endif

static void qdi6500_set_piomode(struct ata_port *ap, struct ata_device *adev)
{
	struct ata_timing t;
	struct qdi_data *qdi = ap->host->private_data;
	int active, recovery;
	u8 timing;

	/* Get the timing data in cycles */
	ata_timing_compute(adev, adev->pio_mode, &t, 30303, 1000);

	if (qdi->fast) {
		active = 8 - FIT(t.active, 1, 8);
		recovery = 18 - FIT(t.recover, 3, 18);
	} else {
		active = 9 - FIT(t.active, 2, 9);
		recovery = 15 - FIT(t.recover, 0, 15);
	}
	timing = (recovery << 4) | active | 0x08;

	qdi->clock[adev->devno] = timing;

	outb(timing, qdi->timing);
}

static void qdi6580_set_piomode(struct ata_port *ap, struct ata_device *adev)
{
	struct ata_timing t;
	struct qdi_data *qdi = ap->host->private_data;
	int active, recovery;
	u8 timing;

	/* Get the timing data in cycles */
	ata_timing_compute(adev, adev->pio_mode, &t, 30303, 1000);

	if (qdi->fast) {
		active = 8 - FIT(t.active, 1, 8);
		recovery = 18 - FIT(t.recover, 3, 18);
	} else {
		active = 9 - FIT(t.active, 2, 9);
		recovery = 15 - FIT(t.recover, 0, 15);
	}
	timing = (recovery << 4) | active | 0x08;

	qdi->clock[adev->devno] = timing;

	outb(timing, qdi->timing);

	/* Clear the FIFO */
	if (adev->class != ATA_DEV_ATA)
		outb(0x5F, (qdi->timing & 0xFFF0) + 3);
}

/**
 *	qdi_qc_issue_prot	-	command issue
 *	@qc: command pending
 *
 *	Called when the libata layer is about to issue a command. We wrap
 *	this interface so that we can load the correct ATA timings.
 */

static unsigned int qdi_qc_issue_prot(struct ata_queued_cmd *qc)
{
	struct ata_port *ap = qc->ap;
	struct ata_device *adev = qc->dev;
	struct qdi_data *qdi = ap->host->private_data;

	if (qdi->clock[adev->devno] != qdi->last) {
		if (adev->pio_mode) {
			qdi->last = qdi->clock[adev->devno];
			outb(qdi->clock[adev->devno], qdi->timing);
		}
	}
	return ata_qc_issue_prot(qc);
}

static void qdi_data_xfer(struct ata_device *adev, unsigned char *buf, unsigned int buflen, int write_data)
{
	struct ata_port *ap = adev->link->ap;
	int slop = buflen & 3;

	if (ata_id_has_dword_io(adev->id)) {
		if (write_data)
			iowrite32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);
		else
			ioread32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);

		if (unlikely(slop)) {
			u32 pad;
			if (write_data) {
				memcpy(&pad, buf + buflen - slop, slop);
				pad = le32_to_cpu(pad);
				iowrite32(pad, ap->ioaddr.data_addr);
			} else {
				pad = ioread32(ap->ioaddr.data_addr);
				pad = cpu_to_le32(pad);
				memcpy(buf + buflen - slop, &pad, slop);
			}
		}
	} else
		ata_data_xfer(adev, buf, buflen, write_data);
}

static struct scsi_host_template qdi_sht = {
	.module			= THIS_MODULE,
	.name			= DRV_NAME,
	.ioctl			= ata_scsi_ioctl,
	.queuecommand		= ata_scsi_queuecmd,
	.can_queue		= ATA_DEF_QUEUE,
	.this_id		= ATA_SHT_THIS_ID,
	.sg_tablesize		= LIBATA_MAX_PRD,
	.cmd_per_lun		= ATA_SHT_CMD_PER_LUN,
	.emulated		= ATA_SHT_EMULATED,
	.use_clustering		= ATA_SHT_USE_CLUSTERING,
	.proc_name		= DRV_NAME,
	.dma_boundary		= ATA_DMA_BOUNDARY,
	.slave_configure	= ata_scsi_slave_config,
	.slave_destroy		= ata_scsi_slave_destroy,
	.bios_param		= ata_std_bios_param,
};

static struct ata_port_operations qdi6500_port_ops = {
	.set_piomode	= qdi6500_set_piomode,

	.tf_load	= ata_tf_load,
	.tf_read	= ata_tf_read,
	.check_status 	= ata_check_status,
	.exec_command	= ata_exec_command,
	.dev_select 	= ata_std_dev_select,

	.freeze		= ata_bmdma_freeze,
	.thaw		= ata_bmdma_thaw,
	.error_handler	= ata_bmdma_error_handler,
	.post_internal_cmd = ata_bmdma_post_internal_cmd,
	.cable_detect	= ata_cable_40wire,

	.qc_prep 	= ata_qc_prep,
	.qc_issue	= qdi_qc_issue_prot,

	.data_xfer	= qdi_data_xfer,

	.irq_clear	= ata_bmdma_irq_clear,
	.irq_on		= ata_irq_on,

	.port_start	= ata_sff_port_start,
};

static struct ata_port_operations qdi6580_port_ops = {
	.set_piomode	= qdi6580_set_piomode,

	.tf_load	= ata_tf_load,
	.tf_read	= ata_tf_read,
	.check_status 	= ata_check_status,
	.exec_command	= ata_exec_command,
	.dev_select 	= ata_std_dev_select,

	.freeze		= ata_bmdma_freeze,
	.thaw		= ata_bmdma_thaw,
	.error_handler	= ata_bmdma_error_handler,
	.post_internal_cmd = ata_bmdma_post_internal_cmd,
	.cable_detect	= ata_cable_40wire,

	.qc_prep 	= ata_qc_prep,
	.qc_issue	= qdi_qc_issue_prot,

	.data_xfer	= qdi_data_xfer,

	.irq_clear	= ata_bmdma_irq_clear,
	.irq_on		= ata_irq_on,

	.port_start	= ata_sff_port_start,
};

/**
 *	qdi_init_one		-	attach a qdi interface
 *	@type: Type to display
 *	@io: I/O port start
 *	@irq: interrupt line
 *	@fast: True if on a > 33Mhz VLB
 *
 *	Register an ISA bus IDE interface. Such interfaces are PIO and we
 *	assume do not support IRQ sharing.
 */

static __init int qdi_init_one(unsigned long port, int type, unsigned long io, int irq, int fast)
{
	unsigned long ctl = io + 0x206;
	struct platform_device *pdev;
	struct ata_host *host;
	struct ata_port *ap;
	void __iomem *io_addr, *ctl_addr;
	int ret;

	/*
	 *	Fill in a probe structure first of all
	 */

	pdev = platform_device_register_simple(DRV_NAME, nr_qdi_host, NULL, 0);
	if (IS_ERR(pdev))
		return PTR_ERR(pdev);

	ret = -ENOMEM;
	io_addr = devm_ioport_map(&pdev->dev, io, 8);
	ctl_addr = devm_ioport_map(&pdev->dev, ctl, 1);
	if (!io_addr || !ctl_addr)
		goto fail;

	ret = -ENOMEM;
	host = ata_host_alloc(&pdev->dev, 1);
	if (!host)
		goto fail;
	ap = host->ports[0];

	if (type == 6580) {
		ap->ops = &qdi6580_port_ops;
		ap->pio_mask = 0x1F;
		ap->flags |= ATA_FLAG_SLAVE_POSS;
	} else {
		ap->ops = &qdi6500_port_ops;
		ap->pio_mask = 0x07;	/* Actually PIO3 !IORDY is possible */
		ap->flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_NO_IORDY;
	}

	ap->ioaddr.cmd_addr = io_addr;
	ap->ioaddr.altstatus_addr = ctl_addr;
	ap->ioaddr.ctl_addr = ctl_addr;
	ata_std_ports(&ap->ioaddr);

	ata_port_desc(ap, "cmd %lx ctl %lx", io, ctl);

	/*
	 *	Hook in a private data structure per channel
	 */
	ap->private_data = &qdi_data[nr_qdi_host];

	qdi_data[nr_qdi_host].timing = port;
	qdi_data[nr_qdi_host].fast = fast;
	qdi_data[nr_qdi_host].platform_dev = pdev;

	printk(KERN_INFO DRV_NAME": qd%d at 0x%lx.\n", type, io);

	/* activate */
	ret = ata_host_activate(host, irq, ata_interrupt, 0, &qdi_sht);
	if (ret)
		goto fail;

	qdi_host[nr_qdi_host++] = dev_get_drvdata(&pdev->dev);
	return 0;

 fail:
	platform_device_unregister(pdev);
	return ret;
}

/**
 *	qdi_init		-	attach qdi interfaces
 *
 *	Attach qdi IDE interfaces by scanning the ports it may occupy.
 */

static __init int qdi_init(void)
{
	unsigned long flags;
	static const unsigned long qd_port[2] = { 0x30, 0xB0 };
	static const unsigned long ide_port[2] = { 0x170, 0x1F0 };
	static const int ide_irq[2] = { 14, 15 };

	int ct = 0;
	int i;

	if (probe_qdi == 0)
		return -ENODEV;

	/*
 	 *	Check each possible QD65xx base address
	 */

	for (i = 0; i < 2; i++) {
		unsigned long port = qd_port[i];
		u8 r, res;


		if (request_region(port, 2, "pata_qdi")) {
			/* Check for a card */
			local_irq_save(flags);
			r = inb_p(port);
			outb_p(0x19, port);
			res = inb_p(port);
			outb_p(r, port);
			local_irq_restore(flags);

			/* Fail */
			if (res == 0x19)
			{
				release_region(port, 2);
				continue;
			}

			/* Passes the presence test */
			r = inb_p(port + 1);	/* Check port agrees with port set */
			if ((r & 2) >> 1 != i) {
				release_region(port, 2);
				continue;
			}

			/* Check card type */
			if ((r & 0xF0) == 0xC0) {
				/* QD6500: single channel */
				if (r & 8) {
					/* Disabled ? */
					release_region(port, 2);
					continue;
				}
				if (qdi_init_one(port, 6500, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
					ct++;
			}
			if (((r & 0xF0) == 0xA0) || (r & 0xF0) == 0x50) {
				/* QD6580: dual channel */
				if (!request_region(port + 2 , 2, "pata_qdi"))
				{
					release_region(port, 2);
					continue;
				}
				res = inb(port + 3);
				if (res & 1) {
					/* Single channel mode */
					if (qdi_init_one(port, 6580, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
						ct++;
				} else {
					/* Dual channel mode */
					if (qdi_init_one(port, 6580, 0x1F0, 14, r & 0x04) == 0)
						ct++;
					if (qdi_init_one(port + 2, 6580, 0x170, 15, r & 0x04) == 0)
						ct++;
				}
			}
		}
	}
	if (ct != 0)
		return 0;
	return -ENODEV;
}

static __exit void qdi_exit(void)
{
	int i;

	for (i = 0; i < nr_qdi_host; i++) {
		ata_host_detach(qdi_host[i]);
		/* Free the control resource. The 6580 dual channel has the resources
		 * claimed as a pair of 2 byte resources so we need no special cases...
		 */
		release_region(qdi_data[i].timing, 2);
		platform_device_unregister(qdi_data[i].platform_dev);
	}
}

MODULE_AUTHOR("Alan Cox");
MODULE_DESCRIPTION("low-level driver for qdi ATA");
MODULE_LICENSE("GPL");
MODULE_VERSION(DRV_VERSION);

module_init(qdi_init);
module_exit(qdi_exit);

module_param(probe_qdi, int, 0);
Commit	Line	Data
669a5db4 JG	1	/*
	2	* pata_qdi.c - QDI VLB ATA controllers
	3	* (C) 2006 Red Hat <alan@redhat.com>
	4	*
	5	* This driver mostly exists as a proof of concept for non PCI devices under
	6	* libata. While the QDI6580 was 'neat' in 1993 it is no longer terribly
	7	* useful.
	8	*
	9	* Tuning code written from the documentation at
	10	* http://www.ryston.cz/petr/vlb/qd6500.html
	11	* http://www.ryston.cz/petr/vlb/qd6580.html
	12	*
	13	* Probe code based on drivers/ide/legacy/qd65xx.c
	14	* Rewritten from the work of Colten Edwards <pje120@cs.usask.ca> by
	15	* Samuel Thibault <samuel.thibault@fnac.net>
	16	*/
	17
	18	#include <linux/kernel.h>
	19	#include <linux/module.h>
	20	#include <linux/pci.h>
	21	#include <linux/init.h>
	22	#include <linux/blkdev.h>
	23	#include <linux/delay.h>
	24	#include <scsi/scsi_host.h>
	25	#include <linux/libata.h>
	26	#include <linux/platform_device.h>
	27
	28	#define DRV_NAME "pata_qdi"
8bc3fc47	29	#define DRV_VERSION "0.3.1"
669a5db4 JG	30
	31	#define NR_HOST 4 /* Two 6580s */
	32
	33	struct qdi_data {
	34	unsigned long timing;
	35	u8 clock[2];
	36	u8 last;
	37	int fast;
	38	struct platform_device *platform_dev;
85cd7251	39
669a5db4 JG	40	};
	41
	42	static struct ata_host *qdi_host[NR_HOST];
	43	static struct qdi_data qdi_data[NR_HOST];
	44	static int nr_qdi_host;
	45
	46	#ifdef MODULE
	47	static int probe_qdi = 1;
	48	#else
	49	static int probe_qdi;
	50	#endif
	51
	52	static void qdi6500_set_piomode(struct ata_port ap, struct ata_device adev)
	53	{
	54	struct ata_timing t;
	55	struct qdi_data *qdi = ap->host->private_data;
	56	int active, recovery;
	57	u8 timing;
	58
	59	/* Get the timing data in cycles */
	60	ata_timing_compute(adev, adev->pio_mode, &t, 30303, 1000);
85cd7251	61
669a5db4 JG	62	if (qdi->fast) {
	63	active = 8 - FIT(t.active, 1, 8);
	64	recovery = 18 - FIT(t.recover, 3, 18);
	65	} else {
	66	active = 9 - FIT(t.active, 2, 9);
	67	recovery = 15 - FIT(t.recover, 0, 15);
	68	}
	69	timing = (recovery << 4) \| active \| 0x08;
85cd7251	70
669a5db4 JG	71	qdi->clock[adev->devno] = timing;
669a5db4 JG	72
85cd7251	73	outb(timing, qdi->timing);
669a5db4 JG	74	}
	75
	76	static void qdi6580_set_piomode(struct ata_port ap, struct ata_device adev)
	77	{
	78	struct ata_timing t;
	79	struct qdi_data *qdi = ap->host->private_data;
	80	int active, recovery;
	81	u8 timing;
	82
	83	/* Get the timing data in cycles */
	84	ata_timing_compute(adev, adev->pio_mode, &t, 30303, 1000);
85cd7251	85
669a5db4 JG	86	if (qdi->fast) {
	87	active = 8 - FIT(t.active, 1, 8);
	88	recovery = 18 - FIT(t.recover, 3, 18);
	89	} else {
	90	active = 9 - FIT(t.active, 2, 9);
	91	recovery = 15 - FIT(t.recover, 0, 15);
	92	}
	93	timing = (recovery << 4) \| active \| 0x08;
85cd7251	94
669a5db4 JG	95	qdi->clock[adev->devno] = timing;
	96
	97	outb(timing, qdi->timing);
85cd7251	98
669a5db4 JG	99	/* Clear the FIFO */
	100	if (adev->class != ATA_DEV_ATA)
	101	outb(0x5F, (qdi->timing & 0xFFF0) + 3);
	102	}
	103
	104	/**
	105	* qdi_qc_issue_prot - command issue
	106	* @qc: command pending
	107	*
	108	* Called when the libata layer is about to issue a command. We wrap
	109	* this interface so that we can load the correct ATA timings.
	110	*/
	111
	112	static unsigned int qdi_qc_issue_prot(struct ata_queued_cmd *qc)
	113	{
	114	struct ata_port *ap = qc->ap;
	115	struct ata_device *adev = qc->dev;
	116	struct qdi_data *qdi = ap->host->private_data;
	117
	118	if (qdi->clock[adev->devno] != qdi->last) {
	119	if (adev->pio_mode) {
	120	qdi->last = qdi->clock[adev->devno];
	121	outb(qdi->clock[adev->devno], qdi->timing);
	122	}
	123	}
	124	return ata_qc_issue_prot(qc);
	125	}
	126
	127	static void qdi_data_xfer(struct ata_device adev, unsigned char buf, unsigned int buflen, int write_data)
	128	{
9af5c9c9	129	struct ata_port *ap = adev->link->ap;
669a5db4	130	int slop = buflen & 3;
85cd7251	131
669a5db4 JG	132	if (ata_id_has_dword_io(adev->id)) {
669a5db4 JG	133	if (write_data)
0d5ff566	134	iowrite32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);
669a5db4	135	else
0d5ff566	136	ioread32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);
85cd7251	137
669a5db4 JG	138	if (unlikely(slop)) {
	139	u32 pad;
	140	if (write_data) {
	141	memcpy(&pad, buf + buflen - slop, slop);
0d5ff566 TH	142	pad = le32_to_cpu(pad);
0d5ff566 TH	143	iowrite32(pad, ap->ioaddr.data_addr);
669a5db4	144	} else {
0d5ff566 TH	145	pad = ioread32(ap->ioaddr.data_addr);
0d5ff566 TH	146	pad = cpu_to_le32(pad);
669a5db4 JG	147	memcpy(buf + buflen - slop, &pad, slop);
	148	}
	149	}
	150	} else
0d5ff566	151	ata_data_xfer(adev, buf, buflen, write_data);
669a5db4 JG	152	}
	153
	154	static struct scsi_host_template qdi_sht = {
	155	.module = THIS_MODULE,
	156	.name = DRV_NAME,
	157	.ioctl = ata_scsi_ioctl,
	158	.queuecommand = ata_scsi_queuecmd,
	159	.can_queue = ATA_DEF_QUEUE,
	160	.this_id = ATA_SHT_THIS_ID,
	161	.sg_tablesize = LIBATA_MAX_PRD,
669a5db4 JG	162	.cmd_per_lun = ATA_SHT_CMD_PER_LUN,
	163	.emulated = ATA_SHT_EMULATED,
	164	.use_clustering = ATA_SHT_USE_CLUSTERING,
	165	.proc_name = DRV_NAME,
	166	.dma_boundary = ATA_DMA_BOUNDARY,
	167	.slave_configure = ata_scsi_slave_config,
afdfe899	168	.slave_destroy = ata_scsi_slave_destroy,
669a5db4 JG	169	.bios_param = ata_std_bios_param,
	170	};
	171
	172	static struct ata_port_operations qdi6500_port_ops = {
669a5db4 JG	173	.set_piomode = qdi6500_set_piomode,
	174
	175	.tf_load = ata_tf_load,
	176	.tf_read = ata_tf_read,
	177	.check_status = ata_check_status,
	178	.exec_command = ata_exec_command,
	179	.dev_select = ata_std_dev_select,
	180
	181	.freeze = ata_bmdma_freeze,
	182	.thaw = ata_bmdma_thaw,
	183	.error_handler = ata_bmdma_error_handler,
	184	.post_internal_cmd = ata_bmdma_post_internal_cmd,
3be40d76	185	.cable_detect = ata_cable_40wire,
85cd7251	186
669a5db4 JG	187	.qc_prep = ata_qc_prep,
669a5db4 JG	188	.qc_issue = qdi_qc_issue_prot,
bda30288	189
669a5db4 JG	190	.data_xfer = qdi_data_xfer,
669a5db4 JG	191
669a5db4	192	.irq_clear = ata_bmdma_irq_clear,
246ce3b6	193	.irq_on = ata_irq_on,
85cd7251	194
81ad1837	195	.port_start = ata_sff_port_start,
85cd7251	196	};
669a5db4 JG	197
669a5db4 JG	198	static struct ata_port_operations qdi6580_port_ops = {
669a5db4 JG	199	.set_piomode = qdi6580_set_piomode,
	200
	201	.tf_load = ata_tf_load,
	202	.tf_read = ata_tf_read,
	203	.check_status = ata_check_status,
	204	.exec_command = ata_exec_command,
	205	.dev_select = ata_std_dev_select,
	206
	207	.freeze = ata_bmdma_freeze,
	208	.thaw = ata_bmdma_thaw,
	209	.error_handler = ata_bmdma_error_handler,
	210	.post_internal_cmd = ata_bmdma_post_internal_cmd,
3be40d76	211	.cable_detect = ata_cable_40wire,
85cd7251	212
669a5db4 JG	213	.qc_prep = ata_qc_prep,
669a5db4 JG	214	.qc_issue = qdi_qc_issue_prot,
bda30288	215
669a5db4 JG	216	.data_xfer = qdi_data_xfer,
669a5db4 JG	217
669a5db4	218	.irq_clear = ata_bmdma_irq_clear,
246ce3b6	219	.irq_on = ata_irq_on,
85cd7251	220
81ad1837	221	.port_start = ata_sff_port_start,
85cd7251	222	};
669a5db4 JG	223
	224	/**
	225	* qdi_init_one - attach a qdi interface
	226	* @type: Type to display
	227	* @io: I/O port start
	228	* @irq: interrupt line
	229	* @fast: True if on a > 33Mhz VLB
	230	*
	231	* Register an ISA bus IDE interface. Such interfaces are PIO and we
	232	* assume do not support IRQ sharing.
	233	*/
85cd7251	234
669a5db4 JG	235	static __init int qdi_init_one(unsigned long port, int type, unsigned long io, int irq, int fast)
669a5db4 JG	236	{
cbcdd875	237	unsigned long ctl = io + 0x206;
669a5db4	238	struct platform_device *pdev;
5d728824 TH	239	struct ata_host *host;
5d728824 TH	240	struct ata_port *ap;
0d5ff566	241	void __iomem io_addr, ctl_addr;
669a5db4 JG	242	int ret;
669a5db4 JG	243
669a5db4 JG	244	/*
	245	* Fill in a probe structure first of all
	246	*/
	247
	248	pdev = platform_device_register_simple(DRV_NAME, nr_qdi_host, NULL, 0);
9825d73c AM	249	if (IS_ERR(pdev))
9825d73c AM	250	return PTR_ERR(pdev);
85cd7251	251
0d5ff566 TH	252	ret = -ENOMEM;
0d5ff566 TH	253	io_addr = devm_ioport_map(&pdev->dev, io, 8);
cbcdd875	254	ctl_addr = devm_ioport_map(&pdev->dev, ctl, 1);
0d5ff566 TH	255	if (!io_addr \|\| !ctl_addr)
	256	goto fail;
	257
5d728824 TH	258	ret = -ENOMEM;
	259	host = ata_host_alloc(&pdev->dev, 1);
	260	if (!host)
	261	goto fail;
	262	ap = host->ports[0];
85cd7251	263
669a5db4	264	if (type == 6580) {
5d728824 TH	265	ap->ops = &qdi6580_port_ops;
	266	ap->pio_mask = 0x1F;
	267	ap->flags \|= ATA_FLAG_SLAVE_POSS;
669a5db4	268	} else {
5d728824 TH	269	ap->ops = &qdi6500_port_ops;
	270	ap->pio_mask = 0x07; /* Actually PIO3 !IORDY is possible */
	271	ap->flags = ATA_FLAG_SLAVE_POSS \| ATA_FLAG_NO_IORDY;
669a5db4	272	}
85cd7251	273
5d728824 TH	274	ap->ioaddr.cmd_addr = io_addr;
	275	ap->ioaddr.altstatus_addr = ctl_addr;
	276	ap->ioaddr.ctl_addr = ctl_addr;
	277	ata_std_ports(&ap->ioaddr);
669a5db4	278
cbcdd875 TH	279	ata_port_desc(ap, "cmd %lx ctl %lx", io, ctl);
cbcdd875 TH	280
669a5db4 JG	281	/*
	282	* Hook in a private data structure per channel
	283	*/
5d728824	284	ap->private_data = &qdi_data[nr_qdi_host];
669a5db4 JG	285
	286	qdi_data[nr_qdi_host].timing = port;
	287	qdi_data[nr_qdi_host].fast = fast;
	288	qdi_data[nr_qdi_host].platform_dev = pdev;
	289
	290	printk(KERN_INFO DRV_NAME": qd%d at 0x%lx.\n", type, io);
0d5ff566	291
5d728824 TH	292	/* activate */
	293	ret = ata_host_activate(host, irq, ata_interrupt, 0, &qdi_sht);
	294	if (ret)
0d5ff566	295	goto fail;
85cd7251	296
669a5db4	297	qdi_host[nr_qdi_host++] = dev_get_drvdata(&pdev->dev);
85cd7251	298	return 0;
0d5ff566 TH	299
	300	fail:
	301	platform_device_unregister(pdev);
	302	return ret;
669a5db4 JG	303	}
	304
	305	/**
	306	* qdi_init - attach qdi interfaces
	307	*
	308	* Attach qdi IDE interfaces by scanning the ports it may occupy.
	309	*/
85cd7251	310
669a5db4 JG	311	static __init int qdi_init(void)
	312	{
	313	unsigned long flags;
	314	static const unsigned long qd_port[2] = { 0x30, 0xB0 };
	315	static const unsigned long ide_port[2] = { 0x170, 0x1F0 };
	316	static const int ide_irq[2] = { 14, 15 };
85cd7251	317
669a5db4 JG	318	int ct = 0;
669a5db4 JG	319	int i;
85cd7251	320
669a5db4 JG	321	if (probe_qdi == 0)
669a5db4 JG	322	return -ENODEV;
85cd7251	323
669a5db4 JG	324	/*
	325	* Check each possible QD65xx base address
	326	*/
85cd7251	327
669a5db4 JG	328	for (i = 0; i < 2; i++) {
	329	unsigned long port = qd_port[i];
	330	u8 r, res;
85cd7251 JG	331
85cd7251 JG	332
669a5db4 JG	333	if (request_region(port, 2, "pata_qdi")) {
	334	/* Check for a card */
	335	local_irq_save(flags);
	336	r = inb_p(port);
	337	outb_p(0x19, port);
	338	res = inb_p(port);
	339	outb_p(r, port);
	340	local_irq_restore(flags);
85cd7251	341
669a5db4 JG	342	/* Fail */
	343	if (res == 0x19)
	344	{
	345	release_region(port, 2);
	346	continue;
	347	}
85cd7251	348
669a5db4 JG	349	/* Passes the presence test */
	350	r = inb_p(port + 1); /* Check port agrees with port set */
	351	if ((r & 2) >> 1 != i) {
	352	release_region(port, 2);
	353	continue;
	354	}
	355
85cd7251	356	/* Check card type */
669a5db4 JG	357	if ((r & 0xF0) == 0xC0) {
	358	/* QD6500: single channel */
	359	if (r & 8) {
	360	/* Disabled ? */
	361	release_region(port, 2);
	362	continue;
	363	}
cc7c15ec AC	364	if (qdi_init_one(port, 6500, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
cc7c15ec AC	365	ct++;
669a5db4 JG	366	}
	367	if (((r & 0xF0) == 0xA0) \|\| (r & 0xF0) == 0x50) {
	368	/* QD6580: dual channel */
	369	if (!request_region(port + 2 , 2, "pata_qdi"))
	370	{
	371	release_region(port, 2);
	372	continue;
	373	}
	374	res = inb(port + 3);
	375	if (res & 1) {
	376	/* Single channel mode */
6878cce5	377	if (qdi_init_one(port, 6580, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
cc7c15ec	378	ct++;
669a5db4 JG	379	} else {
669a5db4 JG	380	/* Dual channel mode */
cc7c15ec AC	381	if (qdi_init_one(port, 6580, 0x1F0, 14, r & 0x04) == 0)
	382	ct++;
	383	if (qdi_init_one(port + 2, 6580, 0x170, 15, r & 0x04) == 0)
	384	ct++;
669a5db4 JG	385	}
	386	}
	387	}
	388	}
	389	if (ct != 0)
	390	return 0;
	391	return -ENODEV;
	392	}
	393
	394	static __exit void qdi_exit(void)
	395	{
	396	int i;
	397
	398	for (i = 0; i < nr_qdi_host; i++) {
24dc5f33	399	ata_host_detach(qdi_host[i]);
669a5db4 JG	400	/* Free the control resource. The 6580 dual channel has the resources
	401	* claimed as a pair of 2 byte resources so we need no special cases...
	402	*/
	403	release_region(qdi_data[i].timing, 2);
	404	platform_device_unregister(qdi_data[i].platform_dev);
85cd7251	405	}
669a5db4 JG	406	}
	407
	408	MODULE_AUTHOR("Alan Cox");
	409	MODULE_DESCRIPTION("low-level driver for qdi ATA");
	410	MODULE_LICENSE("GPL");
	411	MODULE_VERSION(DRV_VERSION);
	412
	413	module_init(qdi_init);
	414	module_exit(qdi_exit);
	415
	416	module_param(probe_qdi, int, 0);
	417