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_quirkproc(ide_drive_t *drive)
228 const char **list, *model = drive->id->model;
230 for (list = pdc_quirk_drives; *list != NULL; list++)
231 if (strstr(model, *list) != NULL)
236 static void pdcnew_reset(ide_drive_t *drive)
239 * Deleted this because it is redundant from the caller.
241 printk(KERN_WARNING "pdc202xx_new: %s channel reset.\n",
242 HWIF(drive)->channel ? "Secondary" : "Primary");
246 * read_counter - Read the byte count registers
247 * @dma_base: for the port address
249 static long __devinit read_counter(u32 dma_base)
251 u32 pri_dma_base = dma_base, sec_dma_base = dma_base + 0x08;
252 u8 cnt0, cnt1, cnt2, cnt3;
253 long count = 0, last;
259 /* Read the current count */
260 outb(0x20, pri_dma_base + 0x01);
261 cnt0 = inb(pri_dma_base + 0x03);
262 outb(0x21, pri_dma_base + 0x01);
263 cnt1 = inb(pri_dma_base + 0x03);
264 outb(0x20, sec_dma_base + 0x01);
265 cnt2 = inb(sec_dma_base + 0x03);
266 outb(0x21, sec_dma_base + 0x01);
267 cnt3 = inb(sec_dma_base + 0x03);
269 count = (cnt3 << 23) | (cnt2 << 15) | (cnt1 << 8) | cnt0;
272 * The 30-bit decrementing counter is read in 4 pieces.
273 * Incorrect value may be read when the most significant bytes
276 } while (retry-- && (((last ^ count) & 0x3fff8000) || last < count));
278 DBG("cnt0[%02X] cnt1[%02X] cnt2[%02X] cnt3[%02X]\n",
279 cnt0, cnt1, cnt2, cnt3);
285 * detect_pll_input_clock - Detect the PLL input clock in Hz.
286 * @dma_base: for the port address
287 * E.g. 16949000 on 33 MHz PCI bus, i.e. half of the PCI clock.
289 static long __devinit detect_pll_input_clock(unsigned long dma_base)
291 struct timeval start_time, end_time;
292 long start_count, end_count;
293 long pll_input, usec_elapsed;
296 start_count = read_counter(dma_base);
297 do_gettimeofday(&start_time);
299 /* Start the test mode */
300 outb(0x01, dma_base + 0x01);
301 scr1 = inb(dma_base + 0x03);
302 DBG("scr1[%02X]\n", scr1);
303 outb(scr1 | 0x40, dma_base + 0x03);
305 /* Let the counter run for 10 ms. */
308 end_count = read_counter(dma_base);
309 do_gettimeofday(&end_time);
311 /* Stop the test mode */
312 outb(0x01, dma_base + 0x01);
313 scr1 = inb(dma_base + 0x03);
314 DBG("scr1[%02X]\n", scr1);
315 outb(scr1 & ~0x40, dma_base + 0x03);
318 * Calculate the input clock in Hz
319 * (the clock counter is 30 bit wide and counts down)
321 usec_elapsed = (end_time.tv_sec - start_time.tv_sec) * 1000000 +
322 (end_time.tv_usec - start_time.tv_usec);
323 pll_input = ((start_count - end_count) & 0x3fffffff) / 10 *
324 (10000000 / usec_elapsed);
326 DBG("start[%ld] end[%ld]\n", start_count, end_count);
331 #ifdef CONFIG_PPC_PMAC
332 static void __devinit apple_kiwi_init(struct pci_dev *pdev)
334 struct device_node *np = pci_device_to_OF_node(pdev);
335 unsigned int class_rev = 0;
338 if (np == NULL || !of_device_is_compatible(np, "kiwi-root"))
341 pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
344 if (class_rev >= 0x03) {
345 /* Setup chip magic config stuff (from darwin) */
346 pci_read_config_byte (pdev, 0x40, &conf);
347 pci_write_config_byte(pdev, 0x40, (conf | 0x01));
350 #endif /* CONFIG_PPC_PMAC */
352 static unsigned int __devinit init_chipset_pdcnew(struct pci_dev *dev, const char *name)
354 unsigned long dma_base = pci_resource_start(dev, 4);
355 unsigned long sec_dma_base = dma_base + 0x08;
356 long pll_input, pll_output, ratio;
358 u8 pll_ctl0, pll_ctl1;
363 #ifdef CONFIG_PPC_PMAC
364 apple_kiwi_init(dev);
367 /* Calculate the required PLL output frequency */
368 switch(max_dma_rate(dev)) {
369 case 4: /* it's 133 MHz for Ultra133 chips */
370 pll_output = 133333333;
372 case 3: /* and 100 MHz for Ultra100 chips */
374 pll_output = 100000000;
379 * Detect PLL input clock.
380 * On some systems, where PCI bus is running at non-standard clock rate
381 * (e.g. 25 or 40 MHz), we have to adjust the cycle time.
382 * PDC20268 and newer chips employ PLL circuit to help correct timing
385 pll_input = detect_pll_input_clock(dma_base);
386 printk("%s: PLL input clock is %ld kHz\n", name, pll_input / 1000);
389 if (unlikely(pll_input < 5000000L || pll_input > 70000000L)) {
390 printk(KERN_ERR "%s: Bad PLL input clock %ld Hz, giving up!\n",
396 DBG("pll_output is %ld Hz\n", pll_output);
398 /* Show the current clock value of PLL control register
399 * (maybe already configured by the BIOS)
401 outb(0x02, sec_dma_base + 0x01);
402 pll_ctl0 = inb(sec_dma_base + 0x03);
403 outb(0x03, sec_dma_base + 0x01);
404 pll_ctl1 = inb(sec_dma_base + 0x03);
406 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
410 * Calculate the ratio of F, R and NO
411 * POUT = (F + 2) / (( R + 2) * NO)
413 ratio = pll_output / (pll_input / 1000);
414 if (ratio < 8600L) { /* 8.6x */
415 /* Using NO = 0x01, R = 0x0d */
417 } else if (ratio < 12900L) { /* 12.9x */
418 /* Using NO = 0x01, R = 0x08 */
420 } else if (ratio < 16100L) { /* 16.1x */
421 /* Using NO = 0x01, R = 0x06 */
423 } else if (ratio < 64000L) { /* 64x */
427 printk(KERN_ERR "%s: Bad ratio %ld, giving up!\n", name, ratio);
431 f = (ratio * (r + 2)) / 1000 - 2;
433 DBG("F[%d] R[%d] ratio*1000[%ld]\n", f, r, ratio);
435 if (unlikely(f < 0 || f > 127)) {
437 printk(KERN_ERR "%s: F[%d] invalid!\n", name, f);
444 DBG("Writing pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
446 outb(0x02, sec_dma_base + 0x01);
447 outb(pll_ctl0, sec_dma_base + 0x03);
448 outb(0x03, sec_dma_base + 0x01);
449 outb(pll_ctl1, sec_dma_base + 0x03);
451 /* Wait the PLL circuit to be stable */
456 * Show the current clock value of PLL control register
458 outb(0x02, sec_dma_base + 0x01);
459 pll_ctl0 = inb(sec_dma_base + 0x03);
460 outb(0x03, sec_dma_base + 0x01);
461 pll_ctl1 = inb(sec_dma_base + 0x03);
463 DBG("pll_ctl[%02X][%02X]\n", pll_ctl0, pll_ctl1);
470 static void __devinit init_hwif_pdc202new(ide_hwif_t *hwif)
472 hwif->set_pio_mode = &pdcnew_set_pio_mode;
473 hwif->set_dma_mode = &pdcnew_set_mode;
475 hwif->quirkproc = &pdcnew_quirkproc;
476 hwif->resetproc = &pdcnew_reset;
478 hwif->err_stops_fifo = 1;
480 hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
482 if (hwif->dma_base == 0)
485 hwif->ultra_mask = hwif->cds->udma_mask;
486 hwif->mwdma_mask = 0x07;
488 if (hwif->cbl != ATA_CBL_PATA40_SHORT)
489 hwif->cbl = pdcnew_cable_detect(hwif);
492 static int __devinit init_setup_pdcnew(struct pci_dev *dev, ide_pci_device_t *d)
494 return ide_setup_pci_device(dev, d);
497 static int __devinit init_setup_pdc20270(struct pci_dev *dev, ide_pci_device_t *d)
499 struct pci_dev *bridge = dev->bus->self;
501 if (bridge != NULL &&
502 bridge->vendor == PCI_VENDOR_ID_DEC &&
503 bridge->device == PCI_DEVICE_ID_DEC_21150) {
504 struct pci_dev *dev2;
506 if (PCI_SLOT(dev->devfn) & 2)
509 dev2 = pci_get_slot(dev->bus, PCI_DEVFN(PCI_SLOT(dev->devfn) + 2,
510 PCI_FUNC(dev->devfn)));
512 dev2->vendor == dev->vendor &&
513 dev2->device == dev->device) {
516 if (dev2->irq != dev->irq) {
517 dev2->irq = dev->irq;
519 printk(KERN_WARNING "%s: PCI config space "
520 "interrupt fixed.\n", d->name);
523 ret = ide_setup_pci_devices(dev, dev2, d);
529 return ide_setup_pci_device(dev, d);
532 static int __devinit init_setup_pdc20276(struct pci_dev *dev, ide_pci_device_t *d)
534 struct pci_dev *bridge = dev->bus->self;
536 if (bridge != NULL &&
537 bridge->vendor == PCI_VENDOR_ID_INTEL &&
538 (bridge->device == PCI_DEVICE_ID_INTEL_I960 ||
539 bridge->device == PCI_DEVICE_ID_INTEL_I960RM)) {
541 printk(KERN_INFO "%s: attached to I2O RAID controller, "
542 "skipping.\n", d->name);
545 return ide_setup_pci_device(dev, d);
548 static ide_pci_device_t pdcnew_chipsets[] __devinitdata = {
551 .init_setup = init_setup_pdcnew,
552 .init_chipset = init_chipset_pdcnew,
553 .init_hwif = init_hwif_pdc202new,
554 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
555 .pio_mask = ATA_PIO4,
556 .udma_mask = 0x3f, /* udma0-5 */
559 .init_setup = init_setup_pdcnew,
560 .init_chipset = init_chipset_pdcnew,
561 .init_hwif = init_hwif_pdc202new,
562 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
563 .pio_mask = ATA_PIO4,
564 .udma_mask = 0x7f, /* udma0-6*/
567 .init_setup = init_setup_pdc20270,
568 .init_chipset = init_chipset_pdcnew,
569 .init_hwif = init_hwif_pdc202new,
570 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
571 .pio_mask = ATA_PIO4,
572 .udma_mask = 0x3f, /* udma0-5 */
575 .init_setup = init_setup_pdcnew,
576 .init_chipset = init_chipset_pdcnew,
577 .init_hwif = init_hwif_pdc202new,
578 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
579 .pio_mask = ATA_PIO4,
580 .udma_mask = 0x7f, /* udma0-6*/
583 .init_setup = init_setup_pdcnew,
584 .init_chipset = init_chipset_pdcnew,
585 .init_hwif = init_hwif_pdc202new,
586 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
587 .pio_mask = ATA_PIO4,
588 .udma_mask = 0x7f, /* udma0-6*/
591 .init_setup = init_setup_pdc20276,
592 .init_chipset = init_chipset_pdcnew,
593 .init_hwif = init_hwif_pdc202new,
594 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
595 .pio_mask = ATA_PIO4,
596 .udma_mask = 0x7f, /* udma0-6*/
599 .init_setup = init_setup_pdcnew,
600 .init_chipset = init_chipset_pdcnew,
601 .init_hwif = init_hwif_pdc202new,
602 .host_flags = IDE_HFLAG_POST_SET_MODE | IDE_HFLAG_OFF_BOARD,
603 .pio_mask = ATA_PIO4,
604 .udma_mask = 0x7f, /* udma0-6*/
609 * pdc202new_init_one - called when a pdc202xx is found
610 * @dev: the pdc202new device
611 * @id: the matching pci id
613 * Called when the PCI registration layer (or the IDE initialization)
614 * finds a device matching our IDE device tables.
617 static int __devinit pdc202new_init_one(struct pci_dev *dev, const struct pci_device_id *id)
619 ide_pci_device_t *d = &pdcnew_chipsets[id->driver_data];
621 return d->init_setup(dev, d);
624 static const struct pci_device_id pdc202new_pci_tbl[] = {
625 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20268), 0 },
626 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20269), 1 },
627 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20270), 2 },
628 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20271), 3 },
629 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20275), 4 },
630 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20276), 5 },
631 { PCI_VDEVICE(PROMISE, PCI_DEVICE_ID_PROMISE_20277), 6 },
634 MODULE_DEVICE_TABLE(pci, pdc202new_pci_tbl);
636 static struct pci_driver driver = {
637 .name = "Promise_IDE",
638 .id_table = pdc202new_pci_tbl,
639 .probe = pdc202new_init_one,
642 static int __init pdc202new_ide_init(void)
644 return ide_pci_register_driver(&driver);
647 module_init(pdc202new_ide_init);
649 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
650 MODULE_DESCRIPTION("PCI driver module for Promise PDC20268 and higher");
651 MODULE_LICENSE("GPL");