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-2006 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>
40 #define PDC202_DEBUG_CABLE 0
45 #define DBG(fmt, args...) printk("%s: " fmt, __FUNCTION__, ## args)
47 #define DBG(fmt, args...)
50 static const char *pdc_quirk_drives[] = {
51 "QUANTUM FIREBALLlct08 08",
52 "QUANTUM FIREBALLP KA6.4",
53 "QUANTUM FIREBALLP KA9.1",
54 "QUANTUM FIREBALLP LM20.4",
55 "QUANTUM FIREBALLP KX13.6",
56 "QUANTUM FIREBALLP KX20.5",
57 "QUANTUM FIREBALLP KX27.3",
58 "QUANTUM FIREBALLP LM20.5",
62 static u8 max_dma_rate(struct pci_dev *pdev)
66 switch(pdev->device) {
67 case PCI_DEVICE_ID_PROMISE_20277:
68 case PCI_DEVICE_ID_PROMISE_20276:
69 case PCI_DEVICE_ID_PROMISE_20275:
70 case PCI_DEVICE_ID_PROMISE_20271:
71 case PCI_DEVICE_ID_PROMISE_20269:
74 case PCI_DEVICE_ID_PROMISE_20270:
75 case PCI_DEVICE_ID_PROMISE_20268:
85 static u8 pdcnew_ratemask(ide_drive_t *drive)
87 u8 mode = max_dma_rate(HWIF(drive)->pci_dev);
89 if (!eighty_ninty_three(drive))
90 mode = min_t(u8, mode, 1);
96 * get_indexed_reg - Get indexed register
97 * @hwif: for the port address
98 * @index: index of the indexed register
100 static u8 get_indexed_reg(ide_hwif_t *hwif, u8 index)
104 hwif->OUTB(index, hwif->dma_vendor1);
105 value = hwif->INB(hwif->dma_vendor3);
107 DBG("index[%02X] value[%02X]\n", index, value);
112 * set_indexed_reg - Set indexed register
113 * @hwif: for the port address
114 * @index: index of the indexed register
116 static void set_indexed_reg(ide_hwif_t *hwif, u8 index, u8 value)
118 hwif->OUTB(index, hwif->dma_vendor1);
119 hwif->OUTB(value, hwif->dma_vendor3);
120 DBG("index[%02X] value[%02X]\n", index, value);
124 * ATA Timing Tables based on 133 MHz PLL output clock.
126 * If the PLL outputs 100 MHz clock, the ASIC hardware will set
127 * the timing registers automatically when "set features" command is
128 * issued to the device. However, if the PLL output clock is 133 MHz,
129 * the following tables must be used.
131 static struct pio_timing {
132 u8 reg0c, reg0d, reg13;
134 { 0xfb, 0x2b, 0xac }, /* PIO mode 0, IORDY off, Prefetch off */
135 { 0x46, 0x29, 0xa4 }, /* PIO mode 1, IORDY off, Prefetch off */
136 { 0x23, 0x26, 0x64 }, /* PIO mode 2, IORDY off, Prefetch off */
137 { 0x27, 0x0d, 0x35 }, /* PIO mode 3, IORDY on, Prefetch off */
138 { 0x23, 0x09, 0x25 }, /* PIO mode 4, IORDY on, Prefetch off */
141 static struct mwdma_timing {
143 } mwdma_timings [] = {
144 { 0xdf, 0x5f }, /* MWDMA mode 0 */
145 { 0x6b, 0x27 }, /* MWDMA mode 1 */
146 { 0x69, 0x25 }, /* MWDMA mode 2 */
149 static struct udma_timing {
150 u8 reg10, reg11, reg12;
151 } udma_timings [] = {
152 { 0x4a, 0x0f, 0xd5 }, /* UDMA mode 0 */
153 { 0x3a, 0x0a, 0xd0 }, /* UDMA mode 1 */
154 { 0x2a, 0x07, 0xcd }, /* UDMA mode 2 */
155 { 0x1a, 0x05, 0xcd }, /* UDMA mode 3 */
156 { 0x1a, 0x03, 0xcd }, /* UDMA mode 4 */
157 { 0x1a, 0x02, 0xcb }, /* UDMA mode 5 */
158 { 0x1a, 0x01, 0xcb }, /* UDMA mode 6 */
161 static int pdcnew_tune_chipset(ide_drive_t *drive, u8 speed)
163 ide_hwif_t *hwif = HWIF(drive);
164 u8 adj = (drive->dn & 1) ? 0x08 : 0x00;
167 speed = ide_rate_filter(pdcnew_ratemask(drive), speed);
170 * Issue SETFEATURES_XFER to the drive first. PDC202xx hardware will
171 * automatically set the timing registers based on 100 MHz PLL output.
173 err = ide_config_drive_speed(drive, speed);
176 * As we set up the PLL to output 133 MHz for UltraDMA/133 capable
177 * chips, we must override the default register settings...
179 if (max_dma_rate(hwif->pci_dev) == 4) {
180 u8 mode = speed & 0x07;
190 set_indexed_reg(hwif, 0x10 + adj,
191 udma_timings[mode].reg10);
192 set_indexed_reg(hwif, 0x11 + adj,
193 udma_timings[mode].reg11);
194 set_indexed_reg(hwif, 0x12 + adj,
195 udma_timings[mode].reg12);
201 set_indexed_reg(hwif, 0x0e + adj,
202 mwdma_timings[mode].reg0e);
203 set_indexed_reg(hwif, 0x0f + adj,
204 mwdma_timings[mode].reg0f);
211 set_indexed_reg(hwif, 0x0c + adj,
212 pio_timings[mode].reg0c);
213 set_indexed_reg(hwif, 0x0d + adj,
214 pio_timings[mode].reg0d);
215 set_indexed_reg(hwif, 0x13 + adj,
216 pio_timings[mode].reg13);
219 printk(KERN_ERR "pdc202xx_new: "
220 "Unknown speed %d ignored\n", speed);
222 } else if (speed == XFER_UDMA_2) {
223 /* Set tHOLD bit to 0 if using UDMA mode 2 */
224 u8 tmp = get_indexed_reg(hwif, 0x10 + adj);
226 set_indexed_reg(hwif, 0x10 + adj, tmp & 0x7f);
232 static void pdcnew_tune_drive(ide_drive_t *drive, u8 pio)
234 pio = ide_get_best_pio_mode(drive, pio, 4, NULL);
235 (void)pdcnew_tune_chipset(drive, XFER_PIO_0 + pio);
238 static u8 pdcnew_cable_detect(ide_hwif_t *hwif)
240 return get_indexed_reg(hwif, 0x0b) & 0x04;
243 static int config_chipset_for_dma(ide_drive_t *drive)
245 struct hd_driveid *id = drive->id;
246 ide_hwif_t *hwif = HWIF(drive);
247 u8 ultra_66 = (id->dma_ultra & 0x0078) ? 1 : 0;
248 u8 cable = pdcnew_cable_detect(hwif);
251 if (ultra_66 && cable) {
252 printk(KERN_WARNING "Warning: %s channel "
253 "requires an 80-pin cable for operation.\n",
254 hwif->channel ? "Secondary" : "Primary");
255 printk(KERN_WARNING "%s reduced to Ultra33 mode.\n", drive->name);
258 if (drive->media != ide_disk)
261 if (id->capability & 4) {
263 * Set IORDY_EN & PREFETCH_EN (this seems to have
264 * NO real effect since this register is reloaded
265 * by hardware when the transfer mode is selected)
267 u8 tmp, adj = (drive->dn & 1) ? 0x08 : 0x00;
269 tmp = get_indexed_reg(hwif, 0x13 + adj);
270 set_indexed_reg(hwif, 0x13 + adj, tmp | 0x03);
273 speed = ide_dma_speed(drive, pdcnew_ratemask(drive));
278 (void) hwif->speedproc(drive, speed);
279 return ide_dma_enable(drive);
282 static int pdcnew_config_drive_xfer_rate(ide_drive_t *drive)
284 ide_hwif_t *hwif = HWIF(drive);
285 struct hd_driveid *id = drive->id;
287 drive->init_speed = 0;
289 if ((id->capability & 1) && drive->autodma) {
291 if (ide_use_dma(drive) && config_chipset_for_dma(drive))
292 return hwif->ide_dma_on(drive);
296 } else if ((id->capability & 8) || (id->field_valid & 2)) {
298 hwif->tuneproc(drive, 255);
299 return hwif->ide_dma_off_quietly(drive);
301 /* IORDY not supported */
305 static int pdcnew_quirkproc(ide_drive_t *drive)
307 const char **list, *model = drive->id->model;
309 for (list = pdc_quirk_drives; *list != NULL; list++)
310 if (strstr(model, *list) != NULL)
315 static void pdcnew_reset(ide_drive_t *drive)
318 * Deleted this because it is redundant from the caller.
320 printk(KERN_WARNING "pdc202xx_new: %s channel reset.\n",
321 HWIF(drive)->channel ? "Secondary" : "Primary");
325 * read_counter - Read the byte count registers
326 * @dma_base: for the port address
328 static long __devinit read_counter(u32 dma_base)
330 u32 pri_dma_base = dma_base, sec_dma_base = dma_base + 0x08;
331 u8 cnt0, cnt1, cnt2, cnt3;
332 long count = 0, last;
338 /* Read the current count */
339 outb(0x20, pri_dma_base + 0x01);
340 cnt0 = inb(pri_dma_base + 0x03);
341 outb(0x21, pri_dma_base + 0x01);
342 cnt1 = inb(pri_dma_base + 0x03);
343 outb(0x20, sec_dma_base + 0x01);
344 cnt2 = inb(sec_dma_base + 0x03);
345 outb(0x21, sec_dma_base + 0x01);
346 cnt3 = inb(sec_dma_base + 0x03);
348 count = (cnt3 << 23) | (cnt2 << 15) | (cnt1 << 8) | cnt0;
351 * The 30-bit decrementing counter is read in 4 pieces.
352 * Incorrect value may be read when the most significant bytes
355 } while (retry-- && (((last ^ count) & 0x3fff8000) || last < count));
357 DBG("cnt0[%02X] cnt1[%02X] cnt2[%02X] cnt3[%02X]\n",
358 cnt0, cnt1, cnt2, cnt3);
364 * detect_pll_input_clock - Detect the PLL input clock in Hz.
365 * @dma_base: for the port address
366 * E.g. 16949000 on 33 MHz PCI bus, i.e. half of the PCI clock.
368 static long __devinit detect_pll_input_clock(unsigned long dma_base)
370 long start_count, end_count;
374 start_count = read_counter(dma_base);
376 /* Start the test mode */
377 outb(0x01, dma_base + 0x01);
378 scr1 = inb(dma_base + 0x03);
379 DBG("scr1[%02X]\n", scr1);
380 outb(scr1 | 0x40, dma_base + 0x03);
382 /* Let the counter run for 10 ms. */
385 end_count = read_counter(dma_base);
387 /* Stop the test mode */
388 outb(0x01, dma_base + 0x01);
389 scr1 = inb(dma_base + 0x03);
390 DBG("scr1[%02X]\n", scr1);
391 outb(scr1 & ~0x40, dma_base + 0x03);
394 * Calculate the input clock in Hz
395 * (the clock counter is 30 bit wide and counts down)
397 pll_input = ((start_count - end_count) & 0x3ffffff) * 100;
399 DBG("start[%ld] end[%ld]\n", start_count, end_count);
404 #ifdef CONFIG_PPC_PMAC
405 static void __devinit apple_kiwi_init(struct pci_dev *pdev)
407 struct device_node *np = pci_device_to_OF_node(pdev);
408 unsigned int class_rev = 0;
411 if (np == NULL || !device_is_compatible(np, "kiwi-root"))
414 pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
417 if (class_rev >= 0x03) {
418 /* Setup chip magic config stuff (from darwin) */
419 pci_read_config_byte (pdev, 0x40, &conf);
420 pci_write_config_byte(pdev, 0x40, (conf | 0x01));
423 #endif /* CONFIG_PPC_PMAC */
425 static unsigned int __devinit init_chipset_pdcnew(struct pci_dev *dev, const char *name)
427 unsigned long dma_base = pci_resource_start(dev, 4);
428 unsigned long sec_dma_base = dma_base + 0x08;
429 long pll_input, pll_output, ratio;
431 u8 pll_ctl0, pll_ctl1;
433 if (dev->resource[PCI_ROM_RESOURCE].start) {
434 pci_write_config_dword(dev, PCI_ROM_ADDRESS,
435 dev->resource[PCI_ROM_RESOURCE].start | PCI_ROM_ADDRESS_ENABLE);
436 printk(KERN_INFO "%s: ROM enabled at 0x%08lx\n", name,
437 (unsigned long)dev->resource[PCI_ROM_RESOURCE].start);
440 #ifdef CONFIG_PPC_PMAC
441 apple_kiwi_init(dev);
444 /* Calculate the required PLL output frequency */
445 switch(max_dma_rate(dev)) {
446 case 4: /* it's 133 MHz for Ultra133 chips */
447 pll_output = 133333333;
449 case 3: /* and 100 MHz for Ultra100 chips */
451 pll_output = 100000000;
456 * Detect PLL input clock.
457 * On some systems, where PCI bus is running at non-standard clock rate
458 * (e.g. 25 or 40 MHz), we have to adjust the cycle time.
459 * PDC20268 and newer chips employ PLL circuit to help correct timing
462 pll_input = detect_pll_input_clock(dma_base);
463 printk("%s: PLL input clock is %ld kHz\n", name, pll_input / 1000);
466 if (unlikely(pll_input < 5000000L || pll_input > 70000000L)) {
467 printk(KERN_ERR "%s: Bad PLL input clock %ld Hz, giving up!\n",
473 DBG("pll_output is %ld Hz\n", pll_output);
475 /* Show the current clock value of PLL control register
476 * (maybe already configured by the BIOS)
478 outb(0x02, sec_dma_base + 0x01);
479 pll_ctl0 = inb(sec_dma_base + 0x03);
480 outb(0x03, sec_dma_base + 0x01);
481 pll_ctl1 = inb(sec_dma_base + 0x03);
483 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
487 * Calculate the ratio of F, R and NO
488 * POUT = (F + 2) / (( R + 2) * NO)
490 ratio = pll_output / (pll_input / 1000);
491 if (ratio < 8600L) { /* 8.6x */
492 /* Using NO = 0x01, R = 0x0d */
494 } else if (ratio < 12900L) { /* 12.9x */
495 /* Using NO = 0x01, R = 0x08 */
497 } else if (ratio < 16100L) { /* 16.1x */
498 /* Using NO = 0x01, R = 0x06 */
500 } else if (ratio < 64000L) { /* 64x */
504 printk(KERN_ERR "%s: Bad ratio %ld, giving up!\n", name, ratio);
508 f = (ratio * (r + 2)) / 1000 - 2;
510 DBG("F[%d] R[%d] ratio*1000[%ld]\n", f, r, ratio);
512 if (unlikely(f < 0 || f > 127)) {
514 printk(KERN_ERR "%s: F[%d] invalid!\n", name, f);
521 DBG("Writing pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
523 outb(0x02, sec_dma_base + 0x01);
524 outb(pll_ctl0, sec_dma_base + 0x03);
525 outb(0x03, sec_dma_base + 0x01);
526 outb(pll_ctl1, sec_dma_base + 0x03);
528 /* Wait the PLL circuit to be stable */
533 * Show the current clock value of PLL control register
535 outb(0x02, sec_dma_base + 0x01);
536 pll_ctl0 = inb(sec_dma_base + 0x03);
537 outb(0x03, sec_dma_base + 0x01);
538 pll_ctl1 = inb(sec_dma_base + 0x03);
540 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
547 static void __devinit init_hwif_pdc202new(ide_hwif_t *hwif)
551 hwif->tuneproc = &pdcnew_tune_drive;
552 hwif->quirkproc = &pdcnew_quirkproc;
553 hwif->speedproc = &pdcnew_tune_chipset;
554 hwif->resetproc = &pdcnew_reset;
556 hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
558 hwif->ultra_mask = 0x7f;
559 hwif->mwdma_mask = 0x07;
561 hwif->err_stops_fifo = 1;
563 hwif->ide_dma_check = &pdcnew_config_drive_xfer_rate;
565 if (!hwif->udma_four)
566 hwif->udma_four = pdcnew_cable_detect(hwif) ? 0 : 1;
570 hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
572 #if PDC202_DEBUG_CABLE
573 printk(KERN_DEBUG "%s: %s-pin cable\n",
574 hwif->name, hwif->udma_four ? "80" : "40");
575 #endif /* PDC202_DEBUG_CABLE */
578 static int __devinit init_setup_pdcnew(struct pci_dev *dev, ide_pci_device_t *d)
580 return ide_setup_pci_device(dev, d);
583 static int __devinit init_setup_pdc20270(struct pci_dev *dev,
586 struct pci_dev *findev = NULL;
589 if ((dev->bus->self &&
590 dev->bus->self->vendor == PCI_VENDOR_ID_DEC) &&
591 (dev->bus->self->device == PCI_DEVICE_ID_DEC_21150)) {
592 if (PCI_SLOT(dev->devfn) & 2)
595 while ((findev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, findev)) != NULL) {
596 if ((findev->vendor == dev->vendor) &&
597 (findev->device == dev->device) &&
598 (PCI_SLOT(findev->devfn) & 2)) {
599 if (findev->irq != dev->irq) {
600 findev->irq = dev->irq;
602 ret = ide_setup_pci_devices(dev, findev, d);
608 return ide_setup_pci_device(dev, d);
611 static int __devinit init_setup_pdc20276(struct pci_dev *dev,
614 if ((dev->bus->self) &&
615 (dev->bus->self->vendor == PCI_VENDOR_ID_INTEL) &&
616 ((dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960) ||
617 (dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960RM))) {
618 printk(KERN_INFO "ide: Skipping Promise PDC20276 "
619 "attached to I2O RAID controller.\n");
622 return ide_setup_pci_device(dev, d);
625 static ide_pci_device_t pdcnew_chipsets[] __devinitdata = {
628 .init_setup = init_setup_pdcnew,
629 .init_chipset = init_chipset_pdcnew,
630 .init_hwif = init_hwif_pdc202new,
633 .bootable = OFF_BOARD,
636 .init_setup = init_setup_pdcnew,
637 .init_chipset = init_chipset_pdcnew,
638 .init_hwif = init_hwif_pdc202new,
641 .bootable = OFF_BOARD,
644 .init_setup = init_setup_pdc20270,
645 .init_chipset = init_chipset_pdcnew,
646 .init_hwif = init_hwif_pdc202new,
649 .bootable = OFF_BOARD,
652 .init_setup = init_setup_pdcnew,
653 .init_chipset = init_chipset_pdcnew,
654 .init_hwif = init_hwif_pdc202new,
657 .bootable = OFF_BOARD,
660 .init_setup = init_setup_pdcnew,
661 .init_chipset = init_chipset_pdcnew,
662 .init_hwif = init_hwif_pdc202new,
665 .bootable = OFF_BOARD,
668 .init_setup = init_setup_pdc20276,
669 .init_chipset = init_chipset_pdcnew,
670 .init_hwif = init_hwif_pdc202new,
673 .bootable = OFF_BOARD,
676 .init_setup = init_setup_pdcnew,
677 .init_chipset = init_chipset_pdcnew,
678 .init_hwif = init_hwif_pdc202new,
681 .bootable = OFF_BOARD,
686 * pdc202new_init_one - called when a pdc202xx is found
687 * @dev: the pdc202new device
688 * @id: the matching pci id
690 * Called when the PCI registration layer (or the IDE initialization)
691 * finds a device matching our IDE device tables.
694 static int __devinit pdc202new_init_one(struct pci_dev *dev, const struct pci_device_id *id)
696 ide_pci_device_t *d = &pdcnew_chipsets[id->driver_data];
698 return d->init_setup(dev, d);
701 static struct pci_device_id pdc202new_pci_tbl[] = {
702 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20268, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
703 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20269, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
704 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20270, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
705 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20271, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
706 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20275, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
707 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20276, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 5},
708 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20277, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 6},
711 MODULE_DEVICE_TABLE(pci, pdc202new_pci_tbl);
713 static struct pci_driver driver = {
714 .name = "Promise_IDE",
715 .id_table = pdc202new_pci_tbl,
716 .probe = pdc202new_init_one,
719 static int __init pdc202new_ide_init(void)
721 return ide_pci_register_driver(&driver);
724 module_init(pdc202new_ide_init);
726 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
727 MODULE_DESCRIPTION("PCI driver module for Promise PDC20268 and higher");
728 MODULE_LICENSE("GPL");