Merge master.kernel.org:/pub/scm/linux/kernel/git/jejb/scsi-rc-fixes-2.6
[linux-2.6] / drivers / ide / pci / pdc202xx_old.c
1 /*
2  *  linux/drivers/ide/pci/pdc202xx_old.c        Version 0.51    Jul 27, 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->err_stops_fifo = 1;
341
342         hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
343
344         if (hwif->dma_base == 0)
345                 return;
346
347         hwif->ultra_mask = hwif->cds->udma_mask;
348         hwif->mwdma_mask = 0x07;
349         hwif->swdma_mask = 0x07;
350         hwif->atapi_dma = 1;
351
352         hwif->ide_dma_check = &pdc202xx_config_drive_xfer_rate;
353         hwif->dma_lost_irq = &pdc202xx_dma_lost_irq;
354         hwif->dma_timeout = &pdc202xx_dma_timeout;
355
356         if (hwif->pci_dev->device != PCI_DEVICE_ID_PROMISE_20246) {
357                 if (hwif->cbl != ATA_CBL_PATA40_SHORT)
358                         hwif->cbl = pdc202xx_old_cable_detect(hwif);
359
360                 hwif->dma_start = &pdc202xx_old_ide_dma_start;
361                 hwif->ide_dma_end = &pdc202xx_old_ide_dma_end;
362         } 
363         hwif->ide_dma_test_irq = &pdc202xx_old_ide_dma_test_irq;
364
365         if (!noautodma)
366                 hwif->autodma = 1;
367         hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
368 }
369
370 static void __devinit init_dma_pdc202xx(ide_hwif_t *hwif, unsigned long dmabase)
371 {
372         u8 udma_speed_flag = 0, primary_mode = 0, secondary_mode = 0;
373
374         if (hwif->channel) {
375                 ide_setup_dma(hwif, dmabase, 8);
376                 return;
377         }
378
379         udma_speed_flag = inb(dmabase | 0x1f);
380         primary_mode    = inb(dmabase | 0x1a);
381         secondary_mode  = inb(dmabase | 0x1b);
382         printk(KERN_INFO "%s: (U)DMA Burst Bit %sABLED " \
383                 "Primary %s Mode " \
384                 "Secondary %s Mode.\n", hwif->cds->name,
385                 (udma_speed_flag & 1) ? "EN" : "DIS",
386                 (primary_mode & 1) ? "MASTER" : "PCI",
387                 (secondary_mode & 1) ? "MASTER" : "PCI" );
388
389 #ifdef CONFIG_PDC202XX_BURST
390         if (!(udma_speed_flag & 1)) {
391                 printk(KERN_INFO "%s: FORCING BURST BIT 0x%02x->0x%02x ",
392                         hwif->cds->name, udma_speed_flag,
393                         (udma_speed_flag|1));
394                 outb(udma_speed_flag | 1, dmabase | 0x1f);
395                 printk("%sACTIVE\n", (inb(dmabase | 0x1f) & 1) ? "" : "IN");
396         }
397 #endif /* CONFIG_PDC202XX_BURST */
398
399         ide_setup_dma(hwif, dmabase, 8);
400 }
401
402 static int __devinit init_setup_pdc202ata4(struct pci_dev *dev,
403                                            ide_pci_device_t *d)
404 {
405         if ((dev->class >> 8) != PCI_CLASS_STORAGE_IDE) {
406                 u8 irq = 0, irq2 = 0;
407                 pci_read_config_byte(dev, PCI_INTERRUPT_LINE, &irq);
408                 /* 0xbc */
409                 pci_read_config_byte(dev, (PCI_INTERRUPT_LINE)|0x80, &irq2);
410                 if (irq != irq2) {
411                         pci_write_config_byte(dev,
412                                 (PCI_INTERRUPT_LINE)|0x80, irq);     /* 0xbc */
413                         printk(KERN_INFO "%s: pci-config space interrupt "
414                                 "mirror fixed.\n", d->name);
415                 }
416         }
417         return ide_setup_pci_device(dev, d);
418 }
419
420 static int __devinit init_setup_pdc20265(struct pci_dev *dev,
421                                          ide_pci_device_t *d)
422 {
423         if ((dev->bus->self) &&
424             (dev->bus->self->vendor == PCI_VENDOR_ID_INTEL) &&
425             ((dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960) ||
426              (dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960RM))) {
427                 printk(KERN_INFO "ide: Skipping Promise PDC20265 "
428                         "attached to I2O RAID controller.\n");
429                 return -ENODEV;
430         }
431         return ide_setup_pci_device(dev, d);
432 }
433
434 static int __devinit init_setup_pdc202xx(struct pci_dev *dev,
435                                          ide_pci_device_t *d)
436 {
437         return ide_setup_pci_device(dev, d);
438 }
439
440 static ide_pci_device_t pdc202xx_chipsets[] __devinitdata = {
441         {       /* 0 */
442                 .name           = "PDC20246",
443                 .init_setup     = init_setup_pdc202ata4,
444                 .init_chipset   = init_chipset_pdc202xx,
445                 .init_hwif      = init_hwif_pdc202xx,
446                 .init_dma       = init_dma_pdc202xx,
447                 .autodma        = AUTODMA,
448                 .bootable       = OFF_BOARD,
449                 .extra          = 16,
450                 .pio_mask       = ATA_PIO4,
451                 .udma_mask      = 0x07, /* udma0-2 */
452         },{     /* 1 */
453                 .name           = "PDC20262",
454                 .init_setup     = init_setup_pdc202ata4,
455                 .init_chipset   = init_chipset_pdc202xx,
456                 .init_hwif      = init_hwif_pdc202xx,
457                 .init_dma       = init_dma_pdc202xx,
458                 .autodma        = AUTODMA,
459                 .bootable       = OFF_BOARD,
460                 .extra          = 48,
461                 .pio_mask       = ATA_PIO4,
462                 .udma_mask      = 0x1f, /* udma0-4 */
463         },{     /* 2 */
464                 .name           = "PDC20263",
465                 .init_setup     = init_setup_pdc202ata4,
466                 .init_chipset   = init_chipset_pdc202xx,
467                 .init_hwif      = init_hwif_pdc202xx,
468                 .init_dma       = init_dma_pdc202xx,
469                 .autodma        = AUTODMA,
470                 .bootable       = OFF_BOARD,
471                 .extra          = 48,
472                 .pio_mask       = ATA_PIO4,
473                 .udma_mask      = 0x1f, /* udma0-4 */
474         },{     /* 3 */
475                 .name           = "PDC20265",
476                 .init_setup     = init_setup_pdc20265,
477                 .init_chipset   = init_chipset_pdc202xx,
478                 .init_hwif      = init_hwif_pdc202xx,
479                 .init_dma       = init_dma_pdc202xx,
480                 .autodma        = AUTODMA,
481                 .bootable       = OFF_BOARD,
482                 .extra          = 48,
483                 .pio_mask       = ATA_PIO4,
484                 .udma_mask      = 0x3f, /* udma0-5 */
485         },{     /* 4 */
486                 .name           = "PDC20267",
487                 .init_setup     = init_setup_pdc202xx,
488                 .init_chipset   = init_chipset_pdc202xx,
489                 .init_hwif      = init_hwif_pdc202xx,
490                 .init_dma       = init_dma_pdc202xx,
491                 .autodma        = AUTODMA,
492                 .bootable       = OFF_BOARD,
493                 .extra          = 48,
494                 .pio_mask       = ATA_PIO4,
495                 .udma_mask      = 0x3f, /* udma0-5 */
496         }
497 };
498
499 /**
500  *      pdc202xx_init_one       -       called when a PDC202xx is found
501  *      @dev: the pdc202xx device
502  *      @id: the matching pci id
503  *
504  *      Called when the PCI registration layer (or the IDE initialization)
505  *      finds a device matching our IDE device tables.
506  */
507  
508 static int __devinit pdc202xx_init_one(struct pci_dev *dev, const struct pci_device_id *id)
509 {
510         ide_pci_device_t *d = &pdc202xx_chipsets[id->driver_data];
511
512         return d->init_setup(dev, d);
513 }
514
515 static struct pci_device_id pdc202xx_pci_tbl[] = {
516         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20246, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
517         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20262, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
518         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20263, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
519         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20265, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
520         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20267, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
521         { 0, },
522 };
523 MODULE_DEVICE_TABLE(pci, pdc202xx_pci_tbl);
524
525 static struct pci_driver driver = {
526         .name           = "Promise_Old_IDE",
527         .id_table       = pdc202xx_pci_tbl,
528         .probe          = pdc202xx_init_one,
529 };
530
531 static int __init pdc202xx_ide_init(void)
532 {
533         return ide_pci_register_driver(&driver);
534 }
535
536 module_init(pdc202xx_ide_init);
537
538 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
539 MODULE_DESCRIPTION("PCI driver module for older Promise IDE");
540 MODULE_LICENSE("GPL");