4362141976adfa41af697adcbede81f4b1fdb44d
[linux-2.6.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.2.4"
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->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
187         .qc_prep        = ata_qc_prep,
188         .qc_issue       = qdi_qc_issue_prot,
189
190         .data_xfer      = qdi_data_xfer,
191
192         .irq_handler    = ata_interrupt,
193         .irq_clear      = ata_bmdma_irq_clear,
194         .irq_on         = ata_irq_on,
195         .irq_ack        = ata_irq_ack,
196
197         .port_start     = ata_port_start,
198 };
199
200 static struct ata_port_operations qdi6580_port_ops = {
201         .port_disable   = ata_port_disable,
202         .set_piomode    = qdi6580_set_piomode,
203
204         .tf_load        = ata_tf_load,
205         .tf_read        = ata_tf_read,
206         .check_status   = ata_check_status,
207         .exec_command   = ata_exec_command,
208         .dev_select     = ata_std_dev_select,
209
210         .freeze         = ata_bmdma_freeze,
211         .thaw           = ata_bmdma_thaw,
212         .error_handler  = ata_bmdma_error_handler,
213         .post_internal_cmd = ata_bmdma_post_internal_cmd,
214
215         .qc_prep        = ata_qc_prep,
216         .qc_issue       = qdi_qc_issue_prot,
217
218         .data_xfer      = qdi_data_xfer,
219
220         .irq_handler    = ata_interrupt,
221         .irq_clear      = ata_bmdma_irq_clear,
222         .irq_on         = ata_irq_on,
223         .irq_ack        = ata_irq_ack,
224
225         .port_start     = ata_port_start,
226 };
227
228 /**
229  *      qdi_init_one            -       attach a qdi interface
230  *      @type: Type to display
231  *      @io: I/O port start
232  *      @irq: interrupt line
233  *      @fast: True if on a > 33Mhz VLB
234  *
235  *      Register an ISA bus IDE interface. Such interfaces are PIO and we
236  *      assume do not support IRQ sharing.
237  */
238
239 static __init int qdi_init_one(unsigned long port, int type, unsigned long io, int irq, int fast)
240 {
241         struct ata_probe_ent ae;
242         struct platform_device *pdev;
243         void __iomem *io_addr, *ctl_addr;
244         int ret;
245
246         /*
247          *      Fill in a probe structure first of all
248          */
249
250         pdev = platform_device_register_simple(DRV_NAME, nr_qdi_host, NULL, 0);
251         if (IS_ERR(pdev))
252                 return PTR_ERR(pdev);
253
254         ret = -ENOMEM;
255         io_addr = devm_ioport_map(&pdev->dev, io, 8);
256         ctl_addr = devm_ioport_map(&pdev->dev, io + 0x206, 1);
257         if (!io_addr || !ctl_addr)
258                 goto fail;
259
260         memset(&ae, 0, sizeof(struct ata_probe_ent));
261         INIT_LIST_HEAD(&ae.node);
262         ae.dev = &pdev->dev;
263
264         if (type == 6580) {
265                 ae.port_ops = &qdi6580_port_ops;
266                 ae.pio_mask = 0x1F;
267                 ae.port_flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_SRST;
268         } else {
269                 ae.port_ops = &qdi6500_port_ops;
270                 ae.pio_mask = 0x07;     /* Actually PIO3 !IORDY is possible */
271                 ae.port_flags = ATA_FLAG_SLAVE_POSS | ATA_FLAG_SRST |
272                                 ATA_FLAG_NO_IORDY;
273         }
274
275         ae.sht = &qdi_sht;
276         ae.n_ports = 1;
277         ae.irq = irq;
278         ae.irq_flags = 0;
279         ae.port[0].cmd_addr = io_addr;
280         ae.port[0].altstatus_addr = ctl_addr;
281         ae.port[0].ctl_addr = ctl_addr;
282         ata_std_ports(&ae.port[0]);
283
284         /*
285          *      Hook in a private data structure per channel
286          */
287         ae.private_data = &qdi_data[nr_qdi_host];
288
289         qdi_data[nr_qdi_host].timing = port;
290         qdi_data[nr_qdi_host].fast = fast;
291         qdi_data[nr_qdi_host].platform_dev = pdev;
292
293         printk(KERN_INFO DRV_NAME": qd%d at 0x%lx.\n", type, io);
294
295         ret = -ENODEV;
296         if (!ata_device_add(&ae))
297                 goto fail;
298
299         qdi_host[nr_qdi_host++] = dev_get_drvdata(&pdev->dev);
300         return 0;
301
302  fail:
303         platform_device_unregister(pdev);
304         return ret;
305 }
306
307 /**
308  *      qdi_init                -       attach qdi interfaces
309  *
310  *      Attach qdi IDE interfaces by scanning the ports it may occupy.
311  */
312
313 static __init int qdi_init(void)
314 {
315         unsigned long flags;
316         static const unsigned long qd_port[2] = { 0x30, 0xB0 };
317         static const unsigned long ide_port[2] = { 0x170, 0x1F0 };
318         static const int ide_irq[2] = { 14, 15 };
319
320         int ct = 0;
321         int i;
322
323         if (probe_qdi == 0)
324                 return -ENODEV;
325
326         /*
327          *      Check each possible QD65xx base address
328          */
329
330         for (i = 0; i < 2; i++) {
331                 unsigned long port = qd_port[i];
332                 u8 r, res;
333
334
335                 if (request_region(port, 2, "pata_qdi")) {
336                         /* Check for a card */
337                         local_irq_save(flags);
338                         r = inb_p(port);
339                         outb_p(0x19, port);
340                         res = inb_p(port);
341                         outb_p(r, port);
342                         local_irq_restore(flags);
343
344                         /* Fail */
345                         if (res == 0x19)
346                         {
347                                 release_region(port, 2);
348                                 continue;
349                         }
350
351                         /* Passes the presence test */
352                         r = inb_p(port + 1);    /* Check port agrees with port set */
353                         if ((r & 2) >> 1 != i) {
354                                 release_region(port, 2);
355                                 continue;
356                         }
357
358                         /* Check card type */
359                         if ((r & 0xF0) == 0xC0) {
360                                 /* QD6500: single channel */
361                                 if (r & 8) {
362                                         /* Disabled ? */
363                                         release_region(port, 2);
364                                         continue;
365                                 }
366                                 ct += qdi_init_one(port, 6500, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04);
367                         }
368                         if (((r & 0xF0) == 0xA0) || (r & 0xF0) == 0x50) {
369                                 /* QD6580: dual channel */
370                                 if (!request_region(port + 2 , 2, "pata_qdi"))
371                                 {
372                                         release_region(port, 2);
373                                         continue;
374                                 }
375                                 res = inb(port + 3);
376                                 if (res & 1) {
377                                         /* Single channel mode */
378                                         ct += qdi_init_one(port, 6580, ide_port[r & 0x01], ide_irq[r & 0x01], r & 0x04);
379                                 } else {
380                                         /* Dual channel mode */
381                                         ct += qdi_init_one(port, 6580, 0x1F0, 14, r & 0x04);
382                                         ct += qdi_init_one(port + 2, 6580, 0x170, 15, r & 0x04);
383                                 }
384                         }
385                 }
386         }
387         if (ct != 0)
388                 return 0;
389         return -ENODEV;
390 }
391
392 static __exit void qdi_exit(void)
393 {
394         int i;
395
396         for (i = 0; i < nr_qdi_host; i++) {
397                 ata_host_detach(qdi_host[i]);
398                 /* Free the control resource. The 6580 dual channel has the resources
399                  * claimed as a pair of 2 byte resources so we need no special cases...
400                  */
401                 release_region(qdi_data[i].timing, 2);
402                 platform_device_unregister(qdi_data[i].platform_dev);
403         }
404 }
405
406 MODULE_AUTHOR("Alan Cox");
407 MODULE_DESCRIPTION("low-level driver for qdi ATA");
408 MODULE_LICENSE("GPL");
409 MODULE_VERSION(DRV_VERSION);
410
411 module_init(qdi_init);
412 module_exit(qdi_exit);
413
414 module_param(probe_qdi, int, 0);
415