ide: add PIO masks
[linux-2.6] / drivers / ide / pci / pdc202xx_old.c
1 /*
2  *  linux/drivers/ide/pci/pdc202xx_old.c        Version 0.50    Mar 3, 2007
3  *
4  *  Copyright (C) 1998-2002             Andre Hedrick <andre@linux-ide.org>
5  *  Copyright (C) 2006-2007             MontaVista Software, Inc.
6  *  Copyright (C) 2007                  Bartlomiej Zolnierkiewicz
7  *
8  *  Promise Ultra33 cards with BIOS v1.20 through 1.28 will need this
9  *  compiled into the kernel if you have more than one card installed.
10  *  Note that BIOS v1.29 is reported to fix the problem.  Since this is
11  *  safe chipset tuning, including this support is harmless
12  *
13  *  Promise Ultra66 cards with BIOS v1.11 this
14  *  compiled into the kernel if you have more than one card installed.
15  *
16  *  Promise Ultra100 cards.
17  *
18  *  The latest chipset code will support the following ::
19  *  Three Ultra33 controllers and 12 drives.
20  *  8 are UDMA supported and 4 are limited to DMA mode 2 multi-word.
21  *  The 8/4 ratio is a BIOS code limit by promise.
22  *
23  *  UNLESS you enable "CONFIG_PDC202XX_BURST"
24  *
25  */
26
27 /*
28  *  Portions Copyright (C) 1999 Promise Technology, Inc.
29  *  Author: Frank Tiernan (frankt@promise.com)
30  *  Released under terms of General Public License
31  */
32
33 #include <linux/types.h>
34 #include <linux/module.h>
35 #include <linux/kernel.h>
36 #include <linux/delay.h>
37 #include <linux/timer.h>
38 #include <linux/mm.h>
39 #include <linux/ioport.h>
40 #include <linux/blkdev.h>
41 #include <linux/hdreg.h>
42 #include <linux/interrupt.h>
43 #include <linux/pci.h>
44 #include <linux/init.h>
45 #include <linux/ide.h>
46
47 #include <asm/io.h>
48 #include <asm/irq.h>
49
50 #define PDC202XX_DEBUG_DRIVE_INFO       0
51
52 static const char *pdc_quirk_drives[] = {
53         "QUANTUM FIREBALLlct08 08",
54         "QUANTUM FIREBALLP KA6.4",
55         "QUANTUM FIREBALLP KA9.1",
56         "QUANTUM FIREBALLP LM20.4",
57         "QUANTUM FIREBALLP KX13.6",
58         "QUANTUM FIREBALLP KX20.5",
59         "QUANTUM FIREBALLP KX27.3",
60         "QUANTUM FIREBALLP LM20.5",
61         NULL
62 };
63
64 static void pdc_old_disable_66MHz_clock(ide_hwif_t *);
65
66 static int pdc202xx_tune_chipset (ide_drive_t *drive, u8 xferspeed)
67 {
68         ide_hwif_t *hwif        = HWIF(drive);
69         struct pci_dev *dev     = hwif->pci_dev;
70         u8 drive_pci            = 0x60 + (drive->dn << 2);
71         u8 speed                = ide_rate_filter(drive, xferspeed);
72
73         u8                      AP = 0, BP = 0, CP = 0;
74         u8                      TA = 0, TB = 0, TC = 0;
75
76 #if PDC202XX_DEBUG_DRIVE_INFO
77         u32                     drive_conf = 0;
78         pci_read_config_dword(dev, drive_pci, &drive_conf);
79 #endif
80
81         /*
82          * TODO: do this once per channel
83          */
84         if (dev->device != PCI_DEVICE_ID_PROMISE_20246)
85                 pdc_old_disable_66MHz_clock(hwif);
86
87         pci_read_config_byte(dev, drive_pci,     &AP);
88         pci_read_config_byte(dev, drive_pci + 1, &BP);
89         pci_read_config_byte(dev, drive_pci + 2, &CP);
90
91         switch(speed) {
92                 case XFER_UDMA_5:
93                 case XFER_UDMA_4:       TB = 0x20; TC = 0x01; break;
94                 case XFER_UDMA_2:       TB = 0x20; TC = 0x01; break;
95                 case XFER_UDMA_3:
96                 case XFER_UDMA_1:       TB = 0x40; TC = 0x02; break;
97                 case XFER_UDMA_0:
98                 case XFER_MW_DMA_2:     TB = 0x60; TC = 0x03; break;
99                 case XFER_MW_DMA_1:     TB = 0x60; TC = 0x04; break;
100                 case XFER_MW_DMA_0:     TB = 0xE0; TC = 0x0F; break;
101                 case XFER_SW_DMA_2:     TB = 0x60; TC = 0x05; break;
102                 case XFER_SW_DMA_1:     TB = 0x80; TC = 0x06; break;
103                 case XFER_SW_DMA_0:     TB = 0xC0; TC = 0x0B; break;
104                 case XFER_PIO_4:        TA = 0x01; TB = 0x04; break;
105                 case XFER_PIO_3:        TA = 0x02; TB = 0x06; break;
106                 case XFER_PIO_2:        TA = 0x03; TB = 0x08; break;
107                 case XFER_PIO_1:        TA = 0x05; TB = 0x0C; break;
108                 case XFER_PIO_0:
109                 default:                TA = 0x09; TB = 0x13; break;
110         }
111
112         if (speed < XFER_SW_DMA_0) {
113                 /*
114                  * preserve SYNC_INT / ERDDY_EN bits while clearing
115                  * Prefetch_EN / IORDY_EN / PA[3:0] bits of register A
116                  */
117                 AP &= ~0x3f;
118                 if (drive->id->capability & 4)
119                         AP |= 0x20;     /* set IORDY_EN bit */
120                 if (drive->media == ide_disk)
121                         AP |= 0x10;     /* set Prefetch_EN bit */
122                 /* clear PB[4:0] bits of register B */
123                 BP &= ~0x1f;
124                 pci_write_config_byte(dev, drive_pci,     AP | TA);
125                 pci_write_config_byte(dev, drive_pci + 1, BP | TB);
126         } else {
127                 /* clear MB[2:0] bits of register B */
128                 BP &= ~0xe0;
129                 /* clear MC[3:0] bits of register C */
130                 CP &= ~0x0f;
131                 pci_write_config_byte(dev, drive_pci + 1, BP | TB);
132                 pci_write_config_byte(dev, drive_pci + 2, CP | TC);
133         }
134
135 #if PDC202XX_DEBUG_DRIVE_INFO
136         printk(KERN_DEBUG "%s: %s drive%d 0x%08x ",
137                 drive->name, ide_xfer_verbose(speed),
138                 drive->dn, drive_conf);
139         pci_read_config_dword(dev, drive_pci, &drive_conf);
140         printk("0x%08x\n", drive_conf);
141 #endif
142
143         return ide_config_drive_speed(drive, speed);
144 }
145
146 static void pdc202xx_tune_drive(ide_drive_t *drive, u8 pio)
147 {
148         pio = ide_get_best_pio_mode(drive, pio, 4);
149         pdc202xx_tune_chipset(drive, XFER_PIO_0 + pio);
150 }
151
152 static u8 pdc202xx_old_cable_detect (ide_hwif_t *hwif)
153 {
154         u16 CIS = 0, mask = (hwif->channel) ? (1<<11) : (1<<10);
155
156         pci_read_config_word(hwif->pci_dev, 0x50, &CIS);
157
158         return (CIS & mask) ? ATA_CBL_PATA40 : ATA_CBL_PATA80;
159 }
160
161 /*
162  * Set the control register to use the 66MHz system
163  * clock for UDMA 3/4/5 mode operation when necessary.
164  *
165  * FIXME: this register is shared by both channels, some locking is needed
166  *
167  * It may also be possible to leave the 66MHz clock on
168  * and readjust the timing parameters.
169  */
170 static void pdc_old_enable_66MHz_clock(ide_hwif_t *hwif)
171 {
172         unsigned long clock_reg = hwif->dma_master + 0x11;
173         u8 clock = inb(clock_reg);
174
175         outb(clock | (hwif->channel ? 0x08 : 0x02), clock_reg);
176 }
177
178 static void pdc_old_disable_66MHz_clock(ide_hwif_t *hwif)
179 {
180         unsigned long clock_reg = hwif->dma_master + 0x11;
181         u8 clock = inb(clock_reg);
182
183         outb(clock & ~(hwif->channel ? 0x08 : 0x02), clock_reg);
184 }
185
186 static int pdc202xx_config_drive_xfer_rate (ide_drive_t *drive)
187 {
188         drive->init_speed = 0;
189
190         if (ide_tune_dma(drive))
191                 return 0;
192
193         if (ide_use_fast_pio(drive))
194                 pdc202xx_tune_drive(drive, 255);
195
196         return -1;
197 }
198
199 static int pdc202xx_quirkproc (ide_drive_t *drive)
200 {
201         const char **list, *model = drive->id->model;
202
203         for (list = pdc_quirk_drives; *list != NULL; list++)
204                 if (strstr(model, *list) != NULL)
205                         return 2;
206         return 0;
207 }
208
209 static void pdc202xx_old_ide_dma_start(ide_drive_t *drive)
210 {
211         if (drive->current_speed > XFER_UDMA_2)
212                 pdc_old_enable_66MHz_clock(drive->hwif);
213         if (drive->media != ide_disk || drive->addressing == 1) {
214                 struct request *rq      = HWGROUP(drive)->rq;
215                 ide_hwif_t *hwif        = HWIF(drive);
216                 unsigned long high_16   = hwif->dma_master;
217                 unsigned long atapi_reg = high_16 + (hwif->channel ? 0x24 : 0x20);
218                 u32 word_count  = 0;
219                 u8 clock = inb(high_16 + 0x11);
220
221                 outb(clock | (hwif->channel ? 0x08 : 0x02), high_16 + 0x11);
222                 word_count = (rq->nr_sectors << 8);
223                 word_count = (rq_data_dir(rq) == READ) ?
224                                         word_count | 0x05000000 :
225                                         word_count | 0x06000000;
226                 outl(word_count, atapi_reg);
227         }
228         ide_dma_start(drive);
229 }
230
231 static int pdc202xx_old_ide_dma_end(ide_drive_t *drive)
232 {
233         if (drive->media != ide_disk || drive->addressing == 1) {
234                 ide_hwif_t *hwif        = HWIF(drive);
235                 unsigned long high_16   = hwif->dma_master;
236                 unsigned long atapi_reg = high_16 + (hwif->channel ? 0x24 : 0x20);
237                 u8 clock                = 0;
238
239                 outl(0, atapi_reg); /* zero out extra */
240                 clock = inb(high_16 + 0x11);
241                 outb(clock & ~(hwif->channel ? 0x08:0x02), high_16 + 0x11);
242         }
243         if (drive->current_speed > XFER_UDMA_2)
244                 pdc_old_disable_66MHz_clock(drive->hwif);
245         return __ide_dma_end(drive);
246 }
247
248 static int pdc202xx_old_ide_dma_test_irq(ide_drive_t *drive)
249 {
250         ide_hwif_t *hwif        = HWIF(drive);
251         unsigned long high_16   = hwif->dma_master;
252         u8 dma_stat             = inb(hwif->dma_status);
253         u8 sc1d                 = inb(high_16 + 0x001d);
254
255         if (hwif->channel) {
256                 /* bit7: Error, bit6: Interrupting, bit5: FIFO Full, bit4: FIFO Empty */
257                 if ((sc1d & 0x50) == 0x50)
258                         goto somebody_else;
259                 else if ((sc1d & 0x40) == 0x40)
260                         return (dma_stat & 4) == 4;
261         } else {
262                 /* bit3: Error, bit2: Interrupting, bit1: FIFO Full, bit0: FIFO Empty */
263                 if ((sc1d & 0x05) == 0x05)
264                         goto somebody_else;
265                 else if ((sc1d & 0x04) == 0x04)
266                         return (dma_stat & 4) == 4;
267         }
268 somebody_else:
269         return (dma_stat & 4) == 4;     /* return 1 if INTR asserted */
270 }
271
272 static void pdc202xx_dma_lost_irq(ide_drive_t *drive)
273 {
274         ide_hwif_t *hwif = HWIF(drive);
275
276         if (hwif->resetproc != NULL)
277                 hwif->resetproc(drive);
278
279         ide_dma_lost_irq(drive);
280 }
281
282 static void pdc202xx_dma_timeout(ide_drive_t *drive)
283 {
284         ide_hwif_t *hwif = HWIF(drive);
285
286         if (hwif->resetproc != NULL)
287                 hwif->resetproc(drive);
288
289         ide_dma_timeout(drive);
290 }
291
292 static void pdc202xx_reset_host (ide_hwif_t *hwif)
293 {
294         unsigned long high_16   = hwif->dma_master;
295         u8 udma_speed_flag      = inb(high_16 | 0x001f);
296
297         outb(udma_speed_flag | 0x10, high_16 | 0x001f);
298         mdelay(100);
299         outb(udma_speed_flag & ~0x10, high_16 | 0x001f);
300         mdelay(2000);   /* 2 seconds ?! */
301
302         printk(KERN_WARNING "PDC202XX: %s channel reset.\n",
303                 hwif->channel ? "Secondary" : "Primary");
304 }
305
306 static void pdc202xx_reset (ide_drive_t *drive)
307 {
308         ide_hwif_t *hwif        = HWIF(drive);
309         ide_hwif_t *mate        = hwif->mate;
310         
311         pdc202xx_reset_host(hwif);
312         pdc202xx_reset_host(mate);
313         pdc202xx_tune_drive(drive, 255);
314 }
315
316 static unsigned int __devinit init_chipset_pdc202xx(struct pci_dev *dev,
317                                                         const char *name)
318 {
319         return dev->irq;
320 }
321
322 static void __devinit init_hwif_pdc202xx(ide_hwif_t *hwif)
323 {
324         struct pci_dev *dev = hwif->pci_dev;
325
326         /* PDC20265 has problems with large LBA48 requests */
327         if ((dev->device == PCI_DEVICE_ID_PROMISE_20267) ||
328             (dev->device == PCI_DEVICE_ID_PROMISE_20265))
329                 hwif->rqsize = 256;
330
331         hwif->autodma = 0;
332         hwif->tuneproc  = &pdc202xx_tune_drive;
333         hwif->quirkproc = &pdc202xx_quirkproc;
334
335         if (hwif->pci_dev->device != PCI_DEVICE_ID_PROMISE_20246)
336                 hwif->resetproc = &pdc202xx_reset;
337
338         hwif->speedproc = &pdc202xx_tune_chipset;
339
340         hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
341
342         hwif->ultra_mask = hwif->cds->udma_mask;
343         hwif->mwdma_mask = 0x07;
344         hwif->swdma_mask = 0x07;
345         hwif->atapi_dma = 1;
346
347         hwif->err_stops_fifo = 1;
348
349         hwif->ide_dma_check = &pdc202xx_config_drive_xfer_rate;
350         hwif->dma_lost_irq = &pdc202xx_dma_lost_irq;
351         hwif->dma_timeout = &pdc202xx_dma_timeout;
352
353         if (hwif->pci_dev->device != PCI_DEVICE_ID_PROMISE_20246) {
354                 if (hwif->cbl != ATA_CBL_PATA40_SHORT)
355                         hwif->cbl = pdc202xx_old_cable_detect(hwif);
356
357                 hwif->dma_start = &pdc202xx_old_ide_dma_start;
358                 hwif->ide_dma_end = &pdc202xx_old_ide_dma_end;
359         } 
360         hwif->ide_dma_test_irq = &pdc202xx_old_ide_dma_test_irq;
361
362         if (!noautodma)
363                 hwif->autodma = 1;
364         hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
365 }
366
367 static void __devinit init_dma_pdc202xx(ide_hwif_t *hwif, unsigned long dmabase)
368 {
369         u8 udma_speed_flag = 0, primary_mode = 0, secondary_mode = 0;
370
371         if (hwif->channel) {
372                 ide_setup_dma(hwif, dmabase, 8);
373                 return;
374         }
375
376         udma_speed_flag = inb(dmabase | 0x1f);
377         primary_mode    = inb(dmabase | 0x1a);
378         secondary_mode  = inb(dmabase | 0x1b);
379         printk(KERN_INFO "%s: (U)DMA Burst Bit %sABLED " \
380                 "Primary %s Mode " \
381                 "Secondary %s Mode.\n", hwif->cds->name,
382                 (udma_speed_flag & 1) ? "EN" : "DIS",
383                 (primary_mode & 1) ? "MASTER" : "PCI",
384                 (secondary_mode & 1) ? "MASTER" : "PCI" );
385
386 #ifdef CONFIG_PDC202XX_BURST
387         if (!(udma_speed_flag & 1)) {
388                 printk(KERN_INFO "%s: FORCING BURST BIT 0x%02x->0x%02x ",
389                         hwif->cds->name, udma_speed_flag,
390                         (udma_speed_flag|1));
391                 outb(udma_speed_flag | 1, dmabase | 0x1f);
392                 printk("%sACTIVE\n", (inb(dmabase | 0x1f) & 1) ? "" : "IN");
393         }
394 #endif /* CONFIG_PDC202XX_BURST */
395
396         ide_setup_dma(hwif, dmabase, 8);
397 }
398
399 static int __devinit init_setup_pdc202ata4(struct pci_dev *dev,
400                                            ide_pci_device_t *d)
401 {
402         if ((dev->class >> 8) != PCI_CLASS_STORAGE_IDE) {
403                 u8 irq = 0, irq2 = 0;
404                 pci_read_config_byte(dev, PCI_INTERRUPT_LINE, &irq);
405                 /* 0xbc */
406                 pci_read_config_byte(dev, (PCI_INTERRUPT_LINE)|0x80, &irq2);
407                 if (irq != irq2) {
408                         pci_write_config_byte(dev,
409                                 (PCI_INTERRUPT_LINE)|0x80, irq);     /* 0xbc */
410                         printk(KERN_INFO "%s: pci-config space interrupt "
411                                 "mirror fixed.\n", d->name);
412                 }
413         }
414         return ide_setup_pci_device(dev, d);
415 }
416
417 static int __devinit init_setup_pdc20265(struct pci_dev *dev,
418                                          ide_pci_device_t *d)
419 {
420         if ((dev->bus->self) &&
421             (dev->bus->self->vendor == PCI_VENDOR_ID_INTEL) &&
422             ((dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960) ||
423              (dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960RM))) {
424                 printk(KERN_INFO "ide: Skipping Promise PDC20265 "
425                         "attached to I2O RAID controller.\n");
426                 return -ENODEV;
427         }
428         return ide_setup_pci_device(dev, d);
429 }
430
431 static int __devinit init_setup_pdc202xx(struct pci_dev *dev,
432                                          ide_pci_device_t *d)
433 {
434         return ide_setup_pci_device(dev, d);
435 }
436
437 static ide_pci_device_t pdc202xx_chipsets[] __devinitdata = {
438         {       /* 0 */
439                 .name           = "PDC20246",
440                 .init_setup     = init_setup_pdc202ata4,
441                 .init_chipset   = init_chipset_pdc202xx,
442                 .init_hwif      = init_hwif_pdc202xx,
443                 .init_dma       = init_dma_pdc202xx,
444                 .autodma        = AUTODMA,
445                 .bootable       = OFF_BOARD,
446                 .extra          = 16,
447                 .pio_mask       = ATA_PIO4,
448                 .udma_mask      = 0x07, /* udma0-2 */
449         },{     /* 1 */
450                 .name           = "PDC20262",
451                 .init_setup     = init_setup_pdc202ata4,
452                 .init_chipset   = init_chipset_pdc202xx,
453                 .init_hwif      = init_hwif_pdc202xx,
454                 .init_dma       = init_dma_pdc202xx,
455                 .autodma        = AUTODMA,
456                 .bootable       = OFF_BOARD,
457                 .extra          = 48,
458                 .pio_mask       = ATA_PIO4,
459                 .udma_mask      = 0x1f, /* udma0-4 */
460         },{     /* 2 */
461                 .name           = "PDC20263",
462                 .init_setup     = init_setup_pdc202ata4,
463                 .init_chipset   = init_chipset_pdc202xx,
464                 .init_hwif      = init_hwif_pdc202xx,
465                 .init_dma       = init_dma_pdc202xx,
466                 .autodma        = AUTODMA,
467                 .bootable       = OFF_BOARD,
468                 .extra          = 48,
469                 .pio_mask       = ATA_PIO4,
470                 .udma_mask      = 0x1f, /* udma0-4 */
471         },{     /* 3 */
472                 .name           = "PDC20265",
473                 .init_setup     = init_setup_pdc20265,
474                 .init_chipset   = init_chipset_pdc202xx,
475                 .init_hwif      = init_hwif_pdc202xx,
476                 .init_dma       = init_dma_pdc202xx,
477                 .autodma        = AUTODMA,
478                 .bootable       = OFF_BOARD,
479                 .extra          = 48,
480                 .pio_mask       = ATA_PIO4,
481                 .udma_mask      = 0x3f, /* udma0-5 */
482         },{     /* 4 */
483                 .name           = "PDC20267",
484                 .init_setup     = init_setup_pdc202xx,
485                 .init_chipset   = init_chipset_pdc202xx,
486                 .init_hwif      = init_hwif_pdc202xx,
487                 .init_dma       = init_dma_pdc202xx,
488                 .autodma        = AUTODMA,
489                 .bootable       = OFF_BOARD,
490                 .extra          = 48,
491                 .pio_mask       = ATA_PIO4,
492                 .udma_mask      = 0x3f, /* udma0-5 */
493         }
494 };
495
496 /**
497  *      pdc202xx_init_one       -       called when a PDC202xx is found
498  *      @dev: the pdc202xx device
499  *      @id: the matching pci id
500  *
501  *      Called when the PCI registration layer (or the IDE initialization)
502  *      finds a device matching our IDE device tables.
503  */
504  
505 static int __devinit pdc202xx_init_one(struct pci_dev *dev, const struct pci_device_id *id)
506 {
507         ide_pci_device_t *d = &pdc202xx_chipsets[id->driver_data];
508
509         return d->init_setup(dev, d);
510 }
511
512 static struct pci_device_id pdc202xx_pci_tbl[] = {
513         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20246, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
514         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20262, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
515         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20263, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
516         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20265, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
517         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20267, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
518         { 0, },
519 };
520 MODULE_DEVICE_TABLE(pci, pdc202xx_pci_tbl);
521
522 static struct pci_driver driver = {
523         .name           = "Promise_Old_IDE",
524         .id_table       = pdc202xx_pci_tbl,
525         .probe          = pdc202xx_init_one,
526 };
527
528 static int __init pdc202xx_ide_init(void)
529 {
530         return ide_pci_register_driver(&driver);
531 }
532
533 module_init(pdc202xx_ide_init);
534
535 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
536 MODULE_DESCRIPTION("PCI driver module for older Promise IDE");
537 MODULE_LICENSE("GPL");