ade5a442166341cdfb8b8a517bd6fc4393e42b78
[deliverable/linux.git] / drivers / ata / pata_qdi.c
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"
29 #define DRV_VERSION "0.3.1"
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;
39
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);
61
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;
70
71 qdi->clock[adev->devno] = timing;
72
73 outb(timing, qdi->timing);
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);
85
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;
94
95 qdi->clock[adev->devno] = timing;
96
97 outb(timing, qdi->timing);
98
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 {
129 struct ata_port *ap = adev->link->ap;
130 int slop = buflen & 3;
131
132 if (ata_id_has_dword_io(adev->id)) {
133 if (write_data)
134 iowrite32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);
135 else
136 ioread32_rep(ap->ioaddr.data_addr, buf, buflen >> 2);
137
138 if (unlikely(slop)) {
139 u32 pad;
140 if (write_data) {
141 memcpy(&pad, buf + buflen - slop, slop);
142 pad = le32_to_cpu(pad);
143 iowrite32(pad, ap->ioaddr.data_addr);
144 } else {
145 pad = ioread32(ap->ioaddr.data_addr);
146 pad = cpu_to_le32(pad);
147 memcpy(buf + buflen - slop, &pad, slop);
148 }
149 }
150 } else
151 ata_data_xfer(adev, buf, buflen, write_data);
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,
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,
168 .slave_destroy = ata_scsi_slave_destroy,
169 .bios_param = ata_std_bios_param,
170 };
171
172 static struct ata_port_operations qdi6500_port_ops = {
173 .port_disable = ata_port_disable,
174 .set_piomode = qdi6500_set_piomode,
175
176 .tf_load = ata_tf_load,
177 .tf_read = ata_tf_read,
178 .check_status = ata_check_status,
179 .exec_command = ata_exec_command,
180 .dev_select = ata_std_dev_select,
181
182 .freeze = ata_bmdma_freeze,
183 .thaw = ata_bmdma_thaw,
184 .error_handler = ata_bmdma_error_handler,
185 .post_internal_cmd = ata_bmdma_post_internal_cmd,
186 .cable_detect = ata_cable_40wire,
187
188 .qc_prep = ata_qc_prep,
189 .qc_issue = qdi_qc_issue_prot,
190
191 .data_xfer = qdi_data_xfer,
192
193 .irq_clear = ata_bmdma_irq_clear,
194 .irq_on = ata_irq_on,
195
196 .port_start = ata_port_start,
197 };
198
199 static struct ata_port_operations qdi6580_port_ops = {
200 .port_disable = ata_port_disable,
201 .set_piomode = qdi6580_set_piomode,
202
203 .tf_load = ata_tf_load,
204 .tf_read = ata_tf_read,
205 .check_status = ata_check_status,
206 .exec_command = ata_exec_command,
207 .dev_select = ata_std_dev_select,
208
209 .freeze = ata_bmdma_freeze,
210 .thaw = ata_bmdma_thaw,
211 .error_handler = ata_bmdma_error_handler,
212 .post_internal_cmd = ata_bmdma_post_internal_cmd,
213 .cable_detect = ata_cable_40wire,
214
215 .qc_prep = ata_qc_prep,
216 .qc_issue = qdi_qc_issue_prot,
217
218 .data_xfer = qdi_data_xfer,
219
220 .irq_clear = ata_bmdma_irq_clear,
221 .irq_on = ata_irq_on,
222
223 .port_start = ata_port_start,
224 };
225
226 /**
227 * qdi_init_one - attach a qdi interface
228 * @type: Type to display
229 * @io: I/O port start
230 * @irq: interrupt line
231 * @fast: True if on a > 33Mhz VLB
232 *
233 * Register an ISA bus IDE interface. Such interfaces are PIO and we
234 * assume do not support IRQ sharing.
235 */
236
237 static __init int qdi_init_one(unsigned long port, int type, unsigned long io, int irq, int fast)
238 {
239 struct platform_device *pdev;
240 struct ata_host *host;
241 struct ata_port *ap;
242 void __iomem *io_addr, *ctl_addr;
243 int ret;
244
245 /*
246 * Fill in a probe structure first of all
247 */
248
249 pdev = platform_device_register_simple(DRV_NAME, nr_qdi_host, NULL, 0);
250 if (IS_ERR(pdev))
251 return PTR_ERR(pdev);
252
253 ret = -ENOMEM;
254 io_addr = devm_ioport_map(&pdev->dev, io, 8);
255 ctl_addr = devm_ioport_map(&pdev->dev, io + 0x206, 1);
256 if (!io_addr || !ctl_addr)
257 goto fail;
258
259 ret = -ENOMEM;
260 host = ata_host_alloc(&pdev->dev, 1);
261 if (!host)
262 goto fail;
263 ap = host->ports[0];
264
265 if (type == 6580) {
266 ap->ops = &qdi6580_port_ops;
267 ap->pio_mask = 0x1F;
268 ap->flags |= ATA_FLAG_SLAVE_POSS;
269 } else {
270 ap->ops = &qdi6500_port_ops;
271 ap->pio_mask = 0x07; /* Actually PIO3 !IORDY is possible */
272 ap->flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_NO_IORDY;
273 }
274
275 ap->ioaddr.cmd_addr = io_addr;
276 ap->ioaddr.altstatus_addr = ctl_addr;
277 ap->ioaddr.ctl_addr = ctl_addr;
278 ata_std_ports(&ap->ioaddr);
279
280 /*
281 * Hook in a private data structure per channel
282 */
283 ap->private_data = &qdi_data[nr_qdi_host];
284
285 qdi_data[nr_qdi_host].timing = port;
286 qdi_data[nr_qdi_host].fast = fast;
287 qdi_data[nr_qdi_host].platform_dev = pdev;
288
289 printk(KERN_INFO DRV_NAME": qd%d at 0x%lx.\n", type, io);
290
291 /* activate */
292 ret = ata_host_activate(host, irq, ata_interrupt, 0, &qdi_sht);
293 if (ret)
294 goto fail;
295
296 qdi_host[nr_qdi_host++] = dev_get_drvdata(&pdev->dev);
297 return 0;
298
299 fail:
300 platform_device_unregister(pdev);
301 return ret;
302 }
303
304 /**
305 * qdi_init - attach qdi interfaces
306 *
307 * Attach qdi IDE interfaces by scanning the ports it may occupy.
308 */
309
310 static __init int qdi_init(void)
311 {
312 unsigned long flags;
313 static const unsigned long qd_port[2] = { 0x30, 0xB0 };
314 static const unsigned long ide_port[2] = { 0x170, 0x1F0 };
315 static const int ide_irq[2] = { 14, 15 };
316
317 int ct = 0;
318 int i;
319
320 if (probe_qdi == 0)
321 return -ENODEV;
322
323 /*
324 * Check each possible QD65xx base address
325 */
326
327 for (i = 0; i < 2; i++) {
328 unsigned long port = qd_port[i];
329 u8 r, res;
330
331
332 if (request_region(port, 2, "pata_qdi")) {
333 /* Check for a card */
334 local_irq_save(flags);
335 r = inb_p(port);
336 outb_p(0x19, port);
337 res = inb_p(port);
338 outb_p(r, port);
339 local_irq_restore(flags);
340
341 /* Fail */
342 if (res == 0x19)
343 {
344 release_region(port, 2);
345 continue;
346 }
347
348 /* Passes the presence test */
349 r = inb_p(port + 1); /* Check port agrees with port set */
350 if ((r & 2) >> 1 != i) {
351 release_region(port, 2);
352 continue;
353 }
354
355 /* Check card type */
356 if ((r & 0xF0) == 0xC0) {
357 /* QD6500: single channel */
358 if (r & 8) {
359 /* Disabled ? */
360 release_region(port, 2);
361 continue;
362 }
363 if (qdi_init_one(port, 6500, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
364 ct++;
365 }
366 if (((r & 0xF0) == 0xA0) || (r & 0xF0) == 0x50) {
367 /* QD6580: dual channel */
368 if (!request_region(port + 2 , 2, "pata_qdi"))
369 {
370 release_region(port, 2);
371 continue;
372 }
373 res = inb(port + 3);
374 if (res & 1) {
375 /* Single channel mode */
376 if (qdi_init_one(port, 6580, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04) == 0)
377 ct++;
378 } else {
379 /* Dual channel mode */
380 if (qdi_init_one(port, 6580, 0x1F0, 14, r & 0x04) == 0)
381 ct++;
382 if (qdi_init_one(port + 2, 6580, 0x170, 15, r & 0x04) == 0)
383 ct++;
384 }
385 }
386 }
387 }
388 if (ct != 0)
389 return 0;
390 return -ENODEV;
391 }
392
393 static __exit void qdi_exit(void)
394 {
395 int i;
396
397 for (i = 0; i < nr_qdi_host; i++) {
398 ata_host_detach(qdi_host[i]);
399 /* Free the control resource. The 6580 dual channel has the resources
400 * claimed as a pair of 2 byte resources so we need no special cases...
401 */
402 release_region(qdi_data[i].timing, 2);
403 platform_device_unregister(qdi_data[i].platform_dev);
404 }
405 }
406
407 MODULE_AUTHOR("Alan Cox");
408 MODULE_DESCRIPTION("low-level driver for qdi ATA");
409 MODULE_LICENSE("GPL");
410 MODULE_VERSION(DRV_VERSION);
411
412 module_init(qdi_init);
413 module_exit(qdi_exit);
414
415 module_param(probe_qdi, int, 0);
416
This page took 0.05637 seconds and 4 git commands to generate.