2 * Promise TX2/TX4/TX2000/133 IDE driver
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; either version
7 * 2 of the License, or (at your option) any later version.
10 * linux/drivers/ide/pdc202xx.c Version 0.35 Mar. 30, 2002
11 * Copyright (C) 1998-2002 Andre Hedrick <andre@linux-ide.org>
12 * Copyright (C) 2005-2007 MontaVista Software, Inc.
13 * Portions Copyright (C) 1999 Promise Technology, Inc.
14 * Author: Frank Tiernan (frankt@promise.com)
15 * Released under terms of General Public License
18 #include <linux/module.h>
19 #include <linux/types.h>
20 #include <linux/kernel.h>
21 #include <linux/delay.h>
22 #include <linux/timer.h>
24 #include <linux/ioport.h>
25 #include <linux/blkdev.h>
26 #include <linux/hdreg.h>
27 #include <linux/interrupt.h>
28 #include <linux/pci.h>
29 #include <linux/init.h>
30 #include <linux/ide.h>
35 #ifdef CONFIG_PPC_PMAC
37 #include <asm/pci-bridge.h>
43 #define DBG(fmt, args...) printk("%s: " fmt, __FUNCTION__, ## args)
45 #define DBG(fmt, args...)
48 static const char *pdc_quirk_drives[] = {
49 "QUANTUM FIREBALLlct08 08",
50 "QUANTUM FIREBALLP KA6.4",
51 "QUANTUM FIREBALLP KA9.1",
52 "QUANTUM FIREBALLP LM20.4",
53 "QUANTUM FIREBALLP KX13.6",
54 "QUANTUM FIREBALLP KX20.5",
55 "QUANTUM FIREBALLP KX27.3",
56 "QUANTUM FIREBALLP LM20.5",
60 static u8 max_dma_rate(struct pci_dev *pdev)
64 switch(pdev->device) {
65 case PCI_DEVICE_ID_PROMISE_20277:
66 case PCI_DEVICE_ID_PROMISE_20276:
67 case PCI_DEVICE_ID_PROMISE_20275:
68 case PCI_DEVICE_ID_PROMISE_20271:
69 case PCI_DEVICE_ID_PROMISE_20269:
72 case PCI_DEVICE_ID_PROMISE_20270:
73 case PCI_DEVICE_ID_PROMISE_20268:
84 * get_indexed_reg - Get indexed register
85 * @hwif: for the port address
86 * @index: index of the indexed register
88 static u8 get_indexed_reg(ide_hwif_t *hwif, u8 index)
92 outb(index, hwif->dma_vendor1);
93 value = inb(hwif->dma_vendor3);
95 DBG("index[%02X] value[%02X]\n", index, value);
100 * set_indexed_reg - Set indexed register
101 * @hwif: for the port address
102 * @index: index of the indexed register
104 static void set_indexed_reg(ide_hwif_t *hwif, u8 index, u8 value)
106 outb(index, hwif->dma_vendor1);
107 outb(value, hwif->dma_vendor3);
108 DBG("index[%02X] value[%02X]\n", index, value);
112 * ATA Timing Tables based on 133 MHz PLL output clock.
114 * If the PLL outputs 100 MHz clock, the ASIC hardware will set
115 * the timing registers automatically when "set features" command is
116 * issued to the device. However, if the PLL output clock is 133 MHz,
117 * the following tables must be used.
119 static struct pio_timing {
120 u8 reg0c, reg0d, reg13;
122 { 0xfb, 0x2b, 0xac }, /* PIO mode 0, IORDY off, Prefetch off */
123 { 0x46, 0x29, 0xa4 }, /* PIO mode 1, IORDY off, Prefetch off */
124 { 0x23, 0x26, 0x64 }, /* PIO mode 2, IORDY off, Prefetch off */
125 { 0x27, 0x0d, 0x35 }, /* PIO mode 3, IORDY on, Prefetch off */
126 { 0x23, 0x09, 0x25 }, /* PIO mode 4, IORDY on, Prefetch off */
129 static struct mwdma_timing {
131 } mwdma_timings [] = {
132 { 0xdf, 0x5f }, /* MWDMA mode 0 */
133 { 0x6b, 0x27 }, /* MWDMA mode 1 */
134 { 0x69, 0x25 }, /* MWDMA mode 2 */
137 static struct udma_timing {
138 u8 reg10, reg11, reg12;
139 } udma_timings [] = {
140 { 0x4a, 0x0f, 0xd5 }, /* UDMA mode 0 */
141 { 0x3a, 0x0a, 0xd0 }, /* UDMA mode 1 */
142 { 0x2a, 0x07, 0xcd }, /* UDMA mode 2 */
143 { 0x1a, 0x05, 0xcd }, /* UDMA mode 3 */
144 { 0x1a, 0x03, 0xcd }, /* UDMA mode 4 */
145 { 0x1a, 0x02, 0xcb }, /* UDMA mode 5 */
146 { 0x1a, 0x01, 0xcb }, /* UDMA mode 6 */
149 static void pdcnew_set_mode(ide_drive_t *drive, const u8 speed)
151 ide_hwif_t *hwif = HWIF(drive);
152 u8 adj = (drive->dn & 1) ? 0x08 : 0x00;
155 * IDE core issues SETFEATURES_XFER to the drive first (thanks to
156 * IDE_HFLAG_POST_SET_MODE in ->host_flags). PDC202xx hardware will
157 * automatically set the timing registers based on 100 MHz PLL output.
159 * As we set up the PLL to output 133 MHz for UltraDMA/133 capable
160 * chips, we must override the default register settings...
162 if (max_dma_rate(hwif->pci_dev) == 4) {
163 u8 mode = speed & 0x07;
173 set_indexed_reg(hwif, 0x10 + adj,
174 udma_timings[mode].reg10);
175 set_indexed_reg(hwif, 0x11 + adj,
176 udma_timings[mode].reg11);
177 set_indexed_reg(hwif, 0x12 + adj,
178 udma_timings[mode].reg12);
184 set_indexed_reg(hwif, 0x0e + adj,
185 mwdma_timings[mode].reg0e);
186 set_indexed_reg(hwif, 0x0f + adj,
187 mwdma_timings[mode].reg0f);
194 set_indexed_reg(hwif, 0x0c + adj,
195 pio_timings[mode].reg0c);
196 set_indexed_reg(hwif, 0x0d + adj,
197 pio_timings[mode].reg0d);
198 set_indexed_reg(hwif, 0x13 + adj,
199 pio_timings[mode].reg13);
202 printk(KERN_ERR "pdc202xx_new: "
203 "Unknown speed %d ignored\n", speed);
205 } else if (speed == XFER_UDMA_2) {
206 /* Set tHOLD bit to 0 if using UDMA mode 2 */
207 u8 tmp = get_indexed_reg(hwif, 0x10 + adj);
209 set_indexed_reg(hwif, 0x10 + adj, tmp & 0x7f);
213 static void pdcnew_set_pio_mode(ide_drive_t *drive, const u8 pio)
215 pdcnew_set_mode(drive, XFER_PIO_0 + pio);
218 static u8 pdcnew_cable_detect(ide_hwif_t *hwif)
220 if (get_indexed_reg(hwif, 0x0b) & 0x04)
221 return ATA_CBL_PATA40;
223 return ATA_CBL_PATA80;
226 static int pdcnew_config_drive_xfer_rate(ide_drive_t *drive)
228 if (ide_tune_dma(drive))
231 if (ide_use_fast_pio(drive))
232 ide_set_max_pio(drive);
237 static int pdcnew_quirkproc(ide_drive_t *drive)
239 const char **list, *model = drive->id->model;
241 for (list = pdc_quirk_drives; *list != NULL; list++)
242 if (strstr(model, *list) != NULL)
247 static void pdcnew_reset(ide_drive_t *drive)
250 * Deleted this because it is redundant from the caller.
252 printk(KERN_WARNING "pdc202xx_new: %s channel reset.\n",
253 HWIF(drive)->channel ? "Secondary" : "Primary");
257 * read_counter - Read the byte count registers
258 * @dma_base: for the port address
260 static long __devinit read_counter(u32 dma_base)
262 u32 pri_dma_base = dma_base, sec_dma_base = dma_base + 0x08;
263 u8 cnt0, cnt1, cnt2, cnt3;
264 long count = 0, last;
270 /* Read the current count */
271 outb(0x20, pri_dma_base + 0x01);
272 cnt0 = inb(pri_dma_base + 0x03);
273 outb(0x21, pri_dma_base + 0x01);
274 cnt1 = inb(pri_dma_base + 0x03);
275 outb(0x20, sec_dma_base + 0x01);
276 cnt2 = inb(sec_dma_base + 0x03);
277 outb(0x21, sec_dma_base + 0x01);
278 cnt3 = inb(sec_dma_base + 0x03);
280 count = (cnt3 << 23) | (cnt2 << 15) | (cnt1 << 8) | cnt0;
283 * The 30-bit decrementing counter is read in 4 pieces.
284 * Incorrect value may be read when the most significant bytes
287 } while (retry-- && (((last ^ count) & 0x3fff8000) || last < count));
289 DBG("cnt0[%02X] cnt1[%02X] cnt2[%02X] cnt3[%02X]\n",
290 cnt0, cnt1, cnt2, cnt3);
296 * detect_pll_input_clock - Detect the PLL input clock in Hz.
297 * @dma_base: for the port address
298 * E.g. 16949000 on 33 MHz PCI bus, i.e. half of the PCI clock.
300 static long __devinit detect_pll_input_clock(unsigned long dma_base)
302 struct timeval start_time, end_time;
303 long start_count, end_count;
304 long pll_input, usec_elapsed;
307 start_count = read_counter(dma_base);
308 do_gettimeofday(&start_time);
310 /* Start the test mode */
311 outb(0x01, dma_base + 0x01);
312 scr1 = inb(dma_base + 0x03);
313 DBG("scr1[%02X]\n", scr1);
314 outb(scr1 | 0x40, dma_base + 0x03);
316 /* Let the counter run for 10 ms. */
319 end_count = read_counter(dma_base);
320 do_gettimeofday(&end_time);
322 /* Stop the test mode */
323 outb(0x01, dma_base + 0x01);
324 scr1 = inb(dma_base + 0x03);
325 DBG("scr1[%02X]\n", scr1);
326 outb(scr1 & ~0x40, dma_base + 0x03);
329 * Calculate the input clock in Hz
330 * (the clock counter is 30 bit wide and counts down)
332 usec_elapsed = (end_time.tv_sec - start_time.tv_sec) * 1000000 +
333 (end_time.tv_usec - start_time.tv_usec);
334 pll_input = ((start_count - end_count) & 0x3fffffff) / 10 *
335 (10000000 / usec_elapsed);
337 DBG("start[%ld] end[%ld]\n", start_count, end_count);
342 #ifdef CONFIG_PPC_PMAC
343 static void __devinit apple_kiwi_init(struct pci_dev *pdev)
345 struct device_node *np = pci_device_to_OF_node(pdev);
346 unsigned int class_rev = 0;
349 if (np == NULL || !of_device_is_compatible(np, "kiwi-root"))
352 pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
355 if (class_rev >= 0x03) {
356 /* Setup chip magic config stuff (from darwin) */
357 pci_read_config_byte (pdev, 0x40, &conf);
358 pci_write_config_byte(pdev, 0x40, (conf | 0x01));
361 #endif /* CONFIG_PPC_PMAC */
363 static unsigned int __devinit init_chipset_pdcnew(struct pci_dev *dev, const char *name)
365 unsigned long dma_base = pci_resource_start(dev, 4);
366 unsigned long sec_dma_base = dma_base + 0x08;
367 long pll_input, pll_output, ratio;
369 u8 pll_ctl0, pll_ctl1;
374 #ifdef CONFIG_PPC_PMAC
375 apple_kiwi_init(dev);
378 /* Calculate the required PLL output frequency */
379 switch(max_dma_rate(dev)) {
380 case 4: /* it's 133 MHz for Ultra133 chips */
381 pll_output = 133333333;
383 case 3: /* and 100 MHz for Ultra100 chips */
385 pll_output = 100000000;
390 * Detect PLL input clock.
391 * On some systems, where PCI bus is running at non-standard clock rate
392 * (e.g. 25 or 40 MHz), we have to adjust the cycle time.
393 * PDC20268 and newer chips employ PLL circuit to help correct timing
396 pll_input = detect_pll_input_clock(dma_base);
397 printk("%s: PLL input clock is %ld kHz\n", name, pll_input / 1000);
400 if (unlikely(pll_input < 5000000L || pll_input > 70000000L)) {
401 printk(KERN_ERR "%s: Bad PLL input clock %ld Hz, giving up!\n",
407 DBG("pll_output is %ld Hz\n", pll_output);
409 /* Show the current clock value of PLL control register
410 * (maybe already configured by the BIOS)
412 outb(0x02, sec_dma_base + 0x01);
413 pll_ctl0 = inb(sec_dma_base + 0x03);
414 outb(0x03, sec_dma_base + 0x01);
415 pll_ctl1 = inb(sec_dma_base + 0x03);
417 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
421 * Calculate the ratio of F, R and NO
422 * POUT = (F + 2) / (( R + 2) * NO)
424 ratio = pll_output / (pll_input / 1000);
425 if (ratio < 8600L) { /* 8.6x */
426 /* Using NO = 0x01, R = 0x0d */
428 } else if (ratio < 12900L) { /* 12.9x */
429 /* Using NO = 0x01, R = 0x08 */
431 } else if (ratio < 16100L) { /* 16.1x */
432 /* Using NO = 0x01, R = 0x06 */
434 } else if (ratio < 64000L) { /* 64x */
438 printk(KERN_ERR "%s: Bad ratio %ld, giving up!\n", name, ratio);
442 f = (ratio * (r + 2)) / 1000 - 2;
444 DBG("F[%d] R[%d] ratio*1000[%ld]\n", f, r, ratio);
446 if (unlikely(f < 0 || f > 127)) {
448 printk(KERN_ERR "%s: F[%d] invalid!\n", name, f);
455 DBG("Writing pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
457 outb(0x02, sec_dma_base + 0x01);
458 outb(pll_ctl0, sec_dma_base + 0x03);
459 outb(0x03, sec_dma_base + 0x01);
460 outb(pll_ctl1, sec_dma_base + 0x03);
462 /* Wait the PLL circuit to be stable */
467 * Show the current clock value of PLL control register
469 outb(0x02, sec_dma_base + 0x01);
470 pll_ctl0 = inb(sec_dma_base + 0x03);
471 outb(0x03, sec_dma_base + 0x01);
472 pll_ctl1 = inb(sec_dma_base + 0x03);
474 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
481 static void __devinit init_hwif_pdc202new(ide_hwif_t *hwif)
485 hwif->set_pio_mode = &pdcnew_set_pio_mode;
486 hwif->set_dma_mode = &pdcnew_set_mode;
488 hwif->quirkproc = &pdcnew_quirkproc;
489 hwif->resetproc = &pdcnew_reset;
491 hwif->err_stops_fifo = 1;
493 hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
495 if (hwif->dma_base == 0)
500 hwif->ultra_mask = hwif->cds->udma_mask;
501 hwif->mwdma_mask = 0x07;
503 hwif->ide_dma_check = &pdcnew_config_drive_xfer_rate;
505 if (hwif->cbl != ATA_CBL_PATA40_SHORT)
506 hwif->cbl = pdcnew_cable_detect(hwif);
510 hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
513 static int __devinit init_setup_pdcnew(struct pci_dev *dev, ide_pci_device_t *d)
515 return ide_setup_pci_device(dev, d);
518 static int __devinit init_setup_pdc20270(struct pci_dev *dev, ide_pci_device_t *d)
520 struct pci_dev *bridge = dev->bus->self;
522 if (bridge != NULL &&
523 bridge->vendor == PCI_VENDOR_ID_DEC &&
524 bridge->device == PCI_DEVICE_ID_DEC_21150) {
525 struct pci_dev *dev2;
527 if (PCI_SLOT(dev->devfn) & 2)
530 dev2 = pci_get_slot(dev->bus, PCI_DEVFN(PCI_SLOT(dev->devfn) + 2,
531 PCI_FUNC(dev->devfn)));
533 dev2->vendor == dev->vendor &&
534 dev2->device == dev->device) {
537 if (dev2->irq != dev->irq) {
538 dev2->irq = dev->irq;
540 printk(KERN_WARNING "%s: PCI config space "
541 "interrupt fixed.\n", d->name);
544 ret = ide_setup_pci_devices(dev, dev2, d);
550 return ide_setup_pci_device(dev, d);
553 static int __devinit init_setup_pdc20276(struct pci_dev *dev, ide_pci_device_t *d)
555 struct pci_dev *bridge = dev->bus->self;
557 if (bridge != NULL &&
558 bridge->vendor == PCI_VENDOR_ID_INTEL &&
559 (bridge->device == PCI_DEVICE_ID_INTEL_I960 ||
560 bridge->device == PCI_DEVICE_ID_INTEL_I960RM)) {
562 printk(KERN_INFO "%s: attached to I2O RAID controller, "
563 "skipping.\n", d->name);
566 return ide_setup_pci_device(dev, d);
569 static ide_pci_device_t pdcnew_chipsets[] __devinitdata = {
572 .init_setup = init_setup_pdcnew,
573 .init_chipset = init_chipset_pdcnew,
574 .init_hwif = init_hwif_pdc202new,
576 .bootable = OFF_BOARD,
577 .pio_mask = ATA_PIO4,
578 .udma_mask = 0x3f, /* udma0-5 */
579 .host_flags = IDE_HFLAG_POST_SET_MODE,
582 .init_setup = init_setup_pdcnew,
583 .init_chipset = init_chipset_pdcnew,
584 .init_hwif = init_hwif_pdc202new,
586 .bootable = OFF_BOARD,
587 .pio_mask = ATA_PIO4,
588 .udma_mask = 0x7f, /* udma0-6*/
589 .host_flags = IDE_HFLAG_POST_SET_MODE,
592 .init_setup = init_setup_pdc20270,
593 .init_chipset = init_chipset_pdcnew,
594 .init_hwif = init_hwif_pdc202new,
596 .bootable = OFF_BOARD,
597 .pio_mask = ATA_PIO4,
598 .udma_mask = 0x3f, /* udma0-5 */
599 .host_flags = IDE_HFLAG_POST_SET_MODE,
602 .init_setup = init_setup_pdcnew,
603 .init_chipset = init_chipset_pdcnew,
604 .init_hwif = init_hwif_pdc202new,
606 .bootable = OFF_BOARD,
607 .pio_mask = ATA_PIO4,
608 .udma_mask = 0x7f, /* udma0-6*/
609 .host_flags = IDE_HFLAG_POST_SET_MODE,
612 .init_setup = init_setup_pdcnew,
613 .init_chipset = init_chipset_pdcnew,
614 .init_hwif = init_hwif_pdc202new,
616 .bootable = OFF_BOARD,
617 .pio_mask = ATA_PIO4,
618 .udma_mask = 0x7f, /* udma0-6*/
619 .host_flags = IDE_HFLAG_POST_SET_MODE,
622 .init_setup = init_setup_pdc20276,
623 .init_chipset = init_chipset_pdcnew,
624 .init_hwif = init_hwif_pdc202new,
626 .bootable = OFF_BOARD,
627 .pio_mask = ATA_PIO4,
628 .udma_mask = 0x7f, /* udma0-6*/
629 .host_flags = IDE_HFLAG_POST_SET_MODE,
632 .init_setup = init_setup_pdcnew,
633 .init_chipset = init_chipset_pdcnew,
634 .init_hwif = init_hwif_pdc202new,
636 .bootable = OFF_BOARD,
637 .pio_mask = ATA_PIO4,
638 .udma_mask = 0x7f, /* udma0-6*/
639 .host_flags = IDE_HFLAG_POST_SET_MODE,
644 * pdc202new_init_one - called when a pdc202xx is found
645 * @dev: the pdc202new device
646 * @id: the matching pci id
648 * Called when the PCI registration layer (or the IDE initialization)
649 * finds a device matching our IDE device tables.
652 static int __devinit pdc202new_init_one(struct pci_dev *dev, const struct pci_device_id *id)
654 ide_pci_device_t *d = &pdcnew_chipsets[id->driver_data];
656 return d->init_setup(dev, d);
659 static struct pci_device_id pdc202new_pci_tbl[] = {
660 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20268, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
661 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20269, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
662 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20270, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
663 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20271, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
664 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20275, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
665 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20276, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 5},
666 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20277, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 6},
669 MODULE_DEVICE_TABLE(pci, pdc202new_pci_tbl);
671 static struct pci_driver driver = {
672 .name = "Promise_IDE",
673 .id_table = pdc202new_pci_tbl,
674 .probe = pdc202new_init_one,
677 static int __init pdc202new_ide_init(void)
679 return ide_pci_register_driver(&driver);
682 module_init(pdc202new_ide_init);
684 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
685 MODULE_DESCRIPTION("PCI driver module for Promise PDC20268 and higher");
686 MODULE_LICENSE("GPL");