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 outb(index, hwif->dma_vendor1);
105 value = 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 outb(index, hwif->dma_vendor1);
119 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);
286 drive->init_speed = 0;
288 if (ide_use_dma(drive) && config_chipset_for_dma(drive))
289 return hwif->ide_dma_on(drive);
291 if (ide_use_fast_pio(drive)) {
292 hwif->tuneproc(drive, 255);
293 return hwif->ide_dma_off_quietly(drive);
295 /* IORDY not supported */
299 static int pdcnew_quirkproc(ide_drive_t *drive)
301 const char **list, *model = drive->id->model;
303 for (list = pdc_quirk_drives; *list != NULL; list++)
304 if (strstr(model, *list) != NULL)
309 static void pdcnew_reset(ide_drive_t *drive)
312 * Deleted this because it is redundant from the caller.
314 printk(KERN_WARNING "pdc202xx_new: %s channel reset.\n",
315 HWIF(drive)->channel ? "Secondary" : "Primary");
319 * read_counter - Read the byte count registers
320 * @dma_base: for the port address
322 static long __devinit read_counter(u32 dma_base)
324 u32 pri_dma_base = dma_base, sec_dma_base = dma_base + 0x08;
325 u8 cnt0, cnt1, cnt2, cnt3;
326 long count = 0, last;
332 /* Read the current count */
333 outb(0x20, pri_dma_base + 0x01);
334 cnt0 = inb(pri_dma_base + 0x03);
335 outb(0x21, pri_dma_base + 0x01);
336 cnt1 = inb(pri_dma_base + 0x03);
337 outb(0x20, sec_dma_base + 0x01);
338 cnt2 = inb(sec_dma_base + 0x03);
339 outb(0x21, sec_dma_base + 0x01);
340 cnt3 = inb(sec_dma_base + 0x03);
342 count = (cnt3 << 23) | (cnt2 << 15) | (cnt1 << 8) | cnt0;
345 * The 30-bit decrementing counter is read in 4 pieces.
346 * Incorrect value may be read when the most significant bytes
349 } while (retry-- && (((last ^ count) & 0x3fff8000) || last < count));
351 DBG("cnt0[%02X] cnt1[%02X] cnt2[%02X] cnt3[%02X]\n",
352 cnt0, cnt1, cnt2, cnt3);
358 * detect_pll_input_clock - Detect the PLL input clock in Hz.
359 * @dma_base: for the port address
360 * E.g. 16949000 on 33 MHz PCI bus, i.e. half of the PCI clock.
362 static long __devinit detect_pll_input_clock(unsigned long dma_base)
364 long start_count, end_count;
368 start_count = read_counter(dma_base);
370 /* Start the test mode */
371 outb(0x01, dma_base + 0x01);
372 scr1 = inb(dma_base + 0x03);
373 DBG("scr1[%02X]\n", scr1);
374 outb(scr1 | 0x40, dma_base + 0x03);
376 /* Let the counter run for 10 ms. */
379 end_count = read_counter(dma_base);
381 /* Stop the test mode */
382 outb(0x01, dma_base + 0x01);
383 scr1 = inb(dma_base + 0x03);
384 DBG("scr1[%02X]\n", scr1);
385 outb(scr1 & ~0x40, dma_base + 0x03);
388 * Calculate the input clock in Hz
389 * (the clock counter is 30 bit wide and counts down)
391 pll_input = ((start_count - end_count) & 0x3ffffff) * 100;
393 DBG("start[%ld] end[%ld]\n", start_count, end_count);
398 #ifdef CONFIG_PPC_PMAC
399 static void __devinit apple_kiwi_init(struct pci_dev *pdev)
401 struct device_node *np = pci_device_to_OF_node(pdev);
402 unsigned int class_rev = 0;
405 if (np == NULL || !device_is_compatible(np, "kiwi-root"))
408 pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
411 if (class_rev >= 0x03) {
412 /* Setup chip magic config stuff (from darwin) */
413 pci_read_config_byte (pdev, 0x40, &conf);
414 pci_write_config_byte(pdev, 0x40, (conf | 0x01));
417 #endif /* CONFIG_PPC_PMAC */
419 static unsigned int __devinit init_chipset_pdcnew(struct pci_dev *dev, const char *name)
421 unsigned long dma_base = pci_resource_start(dev, 4);
422 unsigned long sec_dma_base = dma_base + 0x08;
423 long pll_input, pll_output, ratio;
425 u8 pll_ctl0, pll_ctl1;
427 if (dev->resource[PCI_ROM_RESOURCE].start) {
428 pci_write_config_dword(dev, PCI_ROM_ADDRESS,
429 dev->resource[PCI_ROM_RESOURCE].start | PCI_ROM_ADDRESS_ENABLE);
430 printk(KERN_INFO "%s: ROM enabled at 0x%08lx\n", name,
431 (unsigned long)dev->resource[PCI_ROM_RESOURCE].start);
434 #ifdef CONFIG_PPC_PMAC
435 apple_kiwi_init(dev);
438 /* Calculate the required PLL output frequency */
439 switch(max_dma_rate(dev)) {
440 case 4: /* it's 133 MHz for Ultra133 chips */
441 pll_output = 133333333;
443 case 3: /* and 100 MHz for Ultra100 chips */
445 pll_output = 100000000;
450 * Detect PLL input clock.
451 * On some systems, where PCI bus is running at non-standard clock rate
452 * (e.g. 25 or 40 MHz), we have to adjust the cycle time.
453 * PDC20268 and newer chips employ PLL circuit to help correct timing
456 pll_input = detect_pll_input_clock(dma_base);
457 printk("%s: PLL input clock is %ld kHz\n", name, pll_input / 1000);
460 if (unlikely(pll_input < 5000000L || pll_input > 70000000L)) {
461 printk(KERN_ERR "%s: Bad PLL input clock %ld Hz, giving up!\n",
467 DBG("pll_output is %ld Hz\n", pll_output);
469 /* Show the current clock value of PLL control register
470 * (maybe already configured by the BIOS)
472 outb(0x02, sec_dma_base + 0x01);
473 pll_ctl0 = inb(sec_dma_base + 0x03);
474 outb(0x03, sec_dma_base + 0x01);
475 pll_ctl1 = inb(sec_dma_base + 0x03);
477 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
481 * Calculate the ratio of F, R and NO
482 * POUT = (F + 2) / (( R + 2) * NO)
484 ratio = pll_output / (pll_input / 1000);
485 if (ratio < 8600L) { /* 8.6x */
486 /* Using NO = 0x01, R = 0x0d */
488 } else if (ratio < 12900L) { /* 12.9x */
489 /* Using NO = 0x01, R = 0x08 */
491 } else if (ratio < 16100L) { /* 16.1x */
492 /* Using NO = 0x01, R = 0x06 */
494 } else if (ratio < 64000L) { /* 64x */
498 printk(KERN_ERR "%s: Bad ratio %ld, giving up!\n", name, ratio);
502 f = (ratio * (r + 2)) / 1000 - 2;
504 DBG("F[%d] R[%d] ratio*1000[%ld]\n", f, r, ratio);
506 if (unlikely(f < 0 || f > 127)) {
508 printk(KERN_ERR "%s: F[%d] invalid!\n", name, f);
515 DBG("Writing pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
517 outb(0x02, sec_dma_base + 0x01);
518 outb(pll_ctl0, sec_dma_base + 0x03);
519 outb(0x03, sec_dma_base + 0x01);
520 outb(pll_ctl1, sec_dma_base + 0x03);
522 /* Wait the PLL circuit to be stable */
527 * Show the current clock value of PLL control register
529 outb(0x02, sec_dma_base + 0x01);
530 pll_ctl0 = inb(sec_dma_base + 0x03);
531 outb(0x03, sec_dma_base + 0x01);
532 pll_ctl1 = inb(sec_dma_base + 0x03);
534 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
541 static void __devinit init_hwif_pdc202new(ide_hwif_t *hwif)
545 hwif->tuneproc = &pdcnew_tune_drive;
546 hwif->quirkproc = &pdcnew_quirkproc;
547 hwif->speedproc = &pdcnew_tune_chipset;
548 hwif->resetproc = &pdcnew_reset;
550 hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
552 hwif->ultra_mask = 0x7f;
553 hwif->mwdma_mask = 0x07;
555 hwif->err_stops_fifo = 1;
557 hwif->ide_dma_check = &pdcnew_config_drive_xfer_rate;
559 if (!hwif->udma_four)
560 hwif->udma_four = pdcnew_cable_detect(hwif) ? 0 : 1;
564 hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
566 #if PDC202_DEBUG_CABLE
567 printk(KERN_DEBUG "%s: %s-pin cable\n",
568 hwif->name, hwif->udma_four ? "80" : "40");
569 #endif /* PDC202_DEBUG_CABLE */
572 static int __devinit init_setup_pdcnew(struct pci_dev *dev, ide_pci_device_t *d)
574 return ide_setup_pci_device(dev, d);
577 static int __devinit init_setup_pdc20270(struct pci_dev *dev,
580 struct pci_dev *findev = NULL;
583 if ((dev->bus->self &&
584 dev->bus->self->vendor == PCI_VENDOR_ID_DEC) &&
585 (dev->bus->self->device == PCI_DEVICE_ID_DEC_21150)) {
586 if (PCI_SLOT(dev->devfn) & 2)
589 while ((findev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, findev)) != NULL) {
590 if ((findev->vendor == dev->vendor) &&
591 (findev->device == dev->device) &&
592 (PCI_SLOT(findev->devfn) & 2)) {
593 if (findev->irq != dev->irq) {
594 findev->irq = dev->irq;
596 ret = ide_setup_pci_devices(dev, findev, d);
602 return ide_setup_pci_device(dev, d);
605 static int __devinit init_setup_pdc20276(struct pci_dev *dev,
608 if ((dev->bus->self) &&
609 (dev->bus->self->vendor == PCI_VENDOR_ID_INTEL) &&
610 ((dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960) ||
611 (dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960RM))) {
612 printk(KERN_INFO "ide: Skipping Promise PDC20276 "
613 "attached to I2O RAID controller.\n");
616 return ide_setup_pci_device(dev, d);
619 static ide_pci_device_t pdcnew_chipsets[] __devinitdata = {
622 .init_setup = init_setup_pdcnew,
623 .init_chipset = init_chipset_pdcnew,
624 .init_hwif = init_hwif_pdc202new,
627 .bootable = OFF_BOARD,
630 .init_setup = init_setup_pdcnew,
631 .init_chipset = init_chipset_pdcnew,
632 .init_hwif = init_hwif_pdc202new,
635 .bootable = OFF_BOARD,
638 .init_setup = init_setup_pdc20270,
639 .init_chipset = init_chipset_pdcnew,
640 .init_hwif = init_hwif_pdc202new,
643 .bootable = OFF_BOARD,
646 .init_setup = init_setup_pdcnew,
647 .init_chipset = init_chipset_pdcnew,
648 .init_hwif = init_hwif_pdc202new,
651 .bootable = OFF_BOARD,
654 .init_setup = init_setup_pdcnew,
655 .init_chipset = init_chipset_pdcnew,
656 .init_hwif = init_hwif_pdc202new,
659 .bootable = OFF_BOARD,
662 .init_setup = init_setup_pdc20276,
663 .init_chipset = init_chipset_pdcnew,
664 .init_hwif = init_hwif_pdc202new,
667 .bootable = OFF_BOARD,
670 .init_setup = init_setup_pdcnew,
671 .init_chipset = init_chipset_pdcnew,
672 .init_hwif = init_hwif_pdc202new,
675 .bootable = OFF_BOARD,
680 * pdc202new_init_one - called when a pdc202xx is found
681 * @dev: the pdc202new device
682 * @id: the matching pci id
684 * Called when the PCI registration layer (or the IDE initialization)
685 * finds a device matching our IDE device tables.
688 static int __devinit pdc202new_init_one(struct pci_dev *dev, const struct pci_device_id *id)
690 ide_pci_device_t *d = &pdcnew_chipsets[id->driver_data];
692 return d->init_setup(dev, d);
695 static struct pci_device_id pdc202new_pci_tbl[] = {
696 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20268, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
697 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20269, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
698 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20270, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
699 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20271, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
700 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20275, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
701 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20276, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 5},
702 { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20277, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 6},
705 MODULE_DEVICE_TABLE(pci, pdc202new_pci_tbl);
707 static struct pci_driver driver = {
708 .name = "Promise_IDE",
709 .id_table = pdc202new_pci_tbl,
710 .probe = pdc202new_init_one,
713 static int __init pdc202new_ide_init(void)
715 return ide_pci_register_driver(&driver);
718 module_init(pdc202new_ide_init);
720 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
721 MODULE_DESCRIPTION("PCI driver module for Promise PDC20268 and higher");
722 MODULE_LICENSE("GPL");