drivers/ide/pci/pdc202xx_new.c

   1 /*
   2  *  Promise TX2/TX4/TX2000/133 IDE driver
   3  *
   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.
   8  *
   9  *  Split from:
  10  *  linux/drivers/ide/pdc202xx.c        Version 0.35    Mar. 30, 2002
  11  *  Copyright (C) 1998-2002             Andre Hedrick <andre@linux-ide.org>
  12  *  Portions Copyright (C) 1999 Promise Technology, Inc.
  13  *  Author: Frank Tiernan (frankt@promise.com)
  14  *  Released under terms of General Public License
  15  */
  16
  17 #include <linux/config.h>
  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>
  23 #include <linux/mm.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>
  31
  32 #include <asm/io.h>
  33 #include <asm/irq.h>
  34
  35 #ifdef CONFIG_PPC_PMAC
  36 #include <asm/prom.h>
  37 #include <asm/pci-bridge.h>
  38 #endif
  39
  40 #define PDC202_DEBUG_CABLE      0
  41
  42 static const char *pdc_quirk_drives[] = {
  43         "QUANTUM FIREBALLlct08 08",
  44         "QUANTUM FIREBALLP KA6.4",
  45         "QUANTUM FIREBALLP KA9.1",
  46         "QUANTUM FIREBALLP LM20.4",
  47         "QUANTUM FIREBALLP KX13.6",
  48         "QUANTUM FIREBALLP KX20.5",
  49         "QUANTUM FIREBALLP KX27.3",
  50         "QUANTUM FIREBALLP LM20.5",
  51         NULL
  52 };
  53
  54 #define set_2regs(a, b)                                 \
  55         do {                                            \
  56                 hwif->OUTB((a + adj), indexreg);        \
  57                 hwif->OUTB(b, datareg);                 \
  58         } while(0)
  59
  60 #define set_ultra(a, b, c)                              \
  61         do {                                            \
  62                 set_2regs(0x10,(a));                    \
  63                 set_2regs(0x11,(b));                    \
  64                 set_2regs(0x12,(c));                    \
  65         } while(0)
  66
  67 #define set_ata2(a, b)                                  \
  68         do {                                            \
  69                 set_2regs(0x0e,(a));                    \
  70                 set_2regs(0x0f,(b));                    \
  71         } while(0)
  72
  73 #define set_pio(a, b, c)                                \
  74         do {                                            \
  75                 set_2regs(0x0c,(a));                    \
  76                 set_2regs(0x0d,(b));                    \
  77                 set_2regs(0x13,(c));                    \
  78         } while(0)
  79
  80 static u8 pdcnew_ratemask (ide_drive_t *drive)
  81 {
  82         u8 mode;
  83
  84         switch(HWIF(drive)->pci_dev->device) {
  85                 case PCI_DEVICE_ID_PROMISE_20277:
  86                 case PCI_DEVICE_ID_PROMISE_20276:
  87                 case PCI_DEVICE_ID_PROMISE_20275:
  88                 case PCI_DEVICE_ID_PROMISE_20271:
  89                 case PCI_DEVICE_ID_PROMISE_20269:
  90                         mode = 4;
  91                         break;
  92                 case PCI_DEVICE_ID_PROMISE_20270:
  93                 case PCI_DEVICE_ID_PROMISE_20268:
  94                         mode = 3;
  95                         break;
  96                 default:
  97                         return 0;
  98         }
  99         if (!eighty_ninty_three(drive))
 100                 mode = min(mode, (u8)1);
 101         return mode;
 102 }
 103
 104 static int check_in_drive_lists (ide_drive_t *drive, const char **list)
 105 {
 106         struct hd_driveid *id = drive->id;
 107
 108         if (pdc_quirk_drives == list) {
 109                 while (*list) {
 110                         if (strstr(id->model, *list++)) {
 111                                 return 2;
 112                         }
 113                 }
 114         } else {
 115                 while (*list) {
 116                         if (!strcmp(*list++,id->model)) {
 117                                 return 1;
 118                         }
 119                 }
 120         }
 121         return 0;
 122 }
 123
 124 static int pdcnew_new_tune_chipset (ide_drive_t *drive, u8 xferspeed)
 125 {
 126         ide_hwif_t *hwif        = HWIF(drive);
 127         unsigned long indexreg  = hwif->dma_vendor1;
 128         unsigned long datareg   = hwif->dma_vendor3;
 129         u8 thold                = 0x10;
 130         u8 adj                  = (drive->dn%2) ? 0x08 : 0x00;
 131         u8 speed                = ide_rate_filter(pdcnew_ratemask(drive), xferspeed);
 132
 133         if (speed == XFER_UDMA_2) {
 134                 hwif->OUTB((thold + adj), indexreg);
 135                 hwif->OUTB((hwif->INB(datareg) & 0x7f), datareg);
 136         }
 137
 138         switch (speed) {
 139                 case XFER_UDMA_7:
 140                         speed = XFER_UDMA_6;
 141                 case XFER_UDMA_6:       set_ultra(0x1a, 0x01, 0xcb); break;
 142                 case XFER_UDMA_5:       set_ultra(0x1a, 0x02, 0xcb); break;
 143                 case XFER_UDMA_4:       set_ultra(0x1a, 0x03, 0xcd); break;
 144                 case XFER_UDMA_3:       set_ultra(0x1a, 0x05, 0xcd); break;
 145                 case XFER_UDMA_2:       set_ultra(0x2a, 0x07, 0xcd); break;
 146                 case XFER_UDMA_1:       set_ultra(0x3a, 0x0a, 0xd0); break;
 147                 case XFER_UDMA_0:       set_ultra(0x4a, 0x0f, 0xd5); break;
 148                 case XFER_MW_DMA_2:     set_ata2(0x69, 0x25); break;
 149                 case XFER_MW_DMA_1:     set_ata2(0x6b, 0x27); break;
 150                 case XFER_MW_DMA_0:     set_ata2(0xdf, 0x5f); break;
 151                 case XFER_PIO_4:        set_pio(0x23, 0x09, 0x25); break;
 152                 case XFER_PIO_3:        set_pio(0x27, 0x0d, 0x35); break;
 153                 case XFER_PIO_2:        set_pio(0x23, 0x26, 0x64); break;
 154                 case XFER_PIO_1:        set_pio(0x46, 0x29, 0xa4); break;
 155                 case XFER_PIO_0:        set_pio(0xfb, 0x2b, 0xac); break;
 156                 default:
 157                         ;
 158         }
 159
 160         return (ide_config_drive_speed(drive, speed));
 161 }
 162
 163 /*   0    1    2    3    4    5    6   7   8
 164  * 960, 480, 390, 300, 240, 180, 120, 90, 60
 165  *           180, 150, 120,  90,  60
 166  * DMA_Speed
 167  * 180, 120,  90,  90,  90,  60,  30
 168  *  11,   5,   4,   3,   2,   1,   0
 169  */
 170 static void pdcnew_tune_drive(ide_drive_t *drive, u8 pio)
 171 {
 172         u8 speed;
 173
 174         if (pio == 5) pio = 4;
 175         speed = XFER_PIO_0 + ide_get_best_pio_mode(drive, 255, pio, NULL);
 176
 177         (void)pdcnew_new_tune_chipset(drive, speed);
 178 }
 179
 180 static u8 pdcnew_new_cable_detect (ide_hwif_t *hwif)
 181 {
 182         hwif->OUTB(0x0b, hwif->dma_vendor1);
 183         return ((u8)((hwif->INB(hwif->dma_vendor3) & 0x04)));
 184 }
 185 static int config_chipset_for_dma (ide_drive_t *drive)
 186 {
 187         struct hd_driveid *id   = drive->id;
 188         ide_hwif_t *hwif        = HWIF(drive);
 189         u8 speed                = -1;
 190         u8 cable;
 191
 192         u8 ultra_66             = ((id->dma_ultra & 0x0010) ||
 193                                    (id->dma_ultra & 0x0008)) ? 1 : 0;
 194
 195         cable = pdcnew_new_cable_detect(hwif);
 196
 197         if (ultra_66 && cable) {
 198                 printk(KERN_WARNING "Warning: %s channel requires an 80-pin cable for operation.\n", hwif->channel ? "Secondary":"Primary");
 199                 printk(KERN_WARNING "%s reduced to Ultra33 mode.\n", drive->name);
 200         }
 201
 202         if (drive->media != ide_disk)
 203                 return 0;
 204         if (id->capability & 4) {       /* IORDY_EN & PREFETCH_EN */
 205                 hwif->OUTB((0x13 + ((drive->dn%2) ? 0x08 : 0x00)), hwif->dma_vendor1);
 206                 hwif->OUTB((hwif->INB(hwif->dma_vendor3)|0x03), hwif->dma_vendor3);
 207         }
 208
 209         speed = ide_dma_speed(drive, pdcnew_ratemask(drive));
 210
 211         if (!(speed)) {
 212                 hwif->tuneproc(drive, 5);
 213                 return 0;
 214         }
 215
 216         (void) hwif->speedproc(drive, speed);
 217         return ide_dma_enable(drive);
 218 }
 219
 220 static int pdcnew_config_drive_xfer_rate (ide_drive_t *drive)
 221 {
 222         ide_hwif_t *hwif        = HWIF(drive);
 223         struct hd_driveid *id   = drive->id;
 224
 225         drive->init_speed = 0;
 226
 227         if (id && (id->capability & 1) && drive->autodma) {
 228
 229                 if (ide_use_dma(drive)) {
 230                         if (config_chipset_for_dma(drive))
 231                                 return hwif->ide_dma_on(drive);
 232                 }
 233
 234                 goto fast_ata_pio;
 235
 236         } else if ((id->capability & 8) || (id->field_valid & 2)) {
 237 fast_ata_pio:
 238                 hwif->tuneproc(drive, 5);
 239                 return hwif->ide_dma_off_quietly(drive);
 240         }
 241         /* IORDY not supported */
 242         return 0;
 243 }
 244
 245 static int pdcnew_quirkproc (ide_drive_t *drive)
 246 {
 247         return ((int) check_in_drive_lists(drive, pdc_quirk_drives));
 248 }
 249
 250 static int pdcnew_ide_dma_lostirq(ide_drive_t *drive)
 251 {
 252         if (HWIF(drive)->resetproc != NULL)
 253                 HWIF(drive)->resetproc(drive);
 254         return __ide_dma_lostirq(drive);
 255 }
 256
 257 static int pdcnew_ide_dma_timeout(ide_drive_t *drive)
 258 {
 259         if (HWIF(drive)->resetproc != NULL)
 260                 HWIF(drive)->resetproc(drive);
 261         return __ide_dma_timeout(drive);
 262 }
 263
 264 static void pdcnew_new_reset (ide_drive_t *drive)
 265 {
 266         /*
 267          * Deleted this because it is redundant from the caller.
 268          */
 269         printk(KERN_WARNING "PDC202XX: %s channel reset.\n",
 270                 HWIF(drive)->channel ? "Secondary" : "Primary");
 271 }
 272
 273 #ifdef CONFIG_PPC_PMAC
 274 static void __devinit apple_kiwi_init(struct pci_dev *pdev)
 275 {
 276         struct device_node *np = pci_device_to_OF_node(pdev);
 277         unsigned int class_rev = 0;
 278         void __iomem *mmio;
 279         u8 conf;
 280
 281         if (np == NULL || !device_is_compatible(np, "kiwi-root"))
 282                 return;
 283
 284         pci_read_config_dword(pdev, PCI_CLASS_REVISION, &class_rev);
 285         class_rev &= 0xff;
 286
 287         if (class_rev >= 0x03) {
 288                 /* Setup chip magic config stuff (from darwin) */
 289                 pci_read_config_byte(pdev, 0x40, &conf);
 290                 pci_write_config_byte(pdev, 0x40, conf | 0x01);
 291         }
 292         mmio = ioremap(pci_resource_start(pdev, 5),
 293                                       pci_resource_len(pdev, 5));
 294
 295         /* Setup some PLL stuffs */
 296         switch (pdev->device) {
 297         case PCI_DEVICE_ID_PROMISE_20270:
 298                 writew(0x0d2b, mmio + 0x1202);
 299                 mdelay(30);
 300                 break;
 301         case PCI_DEVICE_ID_PROMISE_20271:
 302                 writew(0x0826, mmio + 0x1202);
 303                 mdelay(30);
 304                 break;
 305         }
 306
 307         iounmap(mmio);
 308 }
 309 #endif /* CONFIG_PPC_PMAC */
 310
 311 static unsigned int __devinit init_chipset_pdcnew(struct pci_dev *dev, const char *name)
 312 {
 313         if (dev->resource[PCI_ROM_RESOURCE].start) {
 314                 pci_write_config_dword(dev, PCI_ROM_ADDRESS,
 315                         dev->resource[PCI_ROM_RESOURCE].start | PCI_ROM_ADDRESS_ENABLE);
 316                 printk(KERN_INFO "%s: ROM enabled at 0x%08lx\n",
 317                         name, dev->resource[PCI_ROM_RESOURCE].start);
 318         }
 319
 320 #ifdef CONFIG_PPC_PMAC
 321         apple_kiwi_init(dev);
 322 #endif
 323
 324         return dev->irq;
 325 }
 326
 327 static void __devinit init_hwif_pdc202new(ide_hwif_t *hwif)
 328 {
 329         hwif->autodma = 0;
 330
 331         hwif->tuneproc  = &pdcnew_tune_drive;
 332         hwif->quirkproc = &pdcnew_quirkproc;
 333         hwif->speedproc = &pdcnew_new_tune_chipset;
 334         hwif->resetproc = &pdcnew_new_reset;
 335
 336         hwif->drives[0].autotune = hwif->drives[1].autotune = 1;
 337
 338         hwif->ultra_mask = 0x7f;
 339         hwif->mwdma_mask = 0x07;
 340
 341         hwif->ide_dma_check = &pdcnew_config_drive_xfer_rate;
 342         hwif->ide_dma_lostirq = &pdcnew_ide_dma_lostirq;
 343         hwif->ide_dma_timeout = &pdcnew_ide_dma_timeout;
 344         if (!(hwif->udma_four))
 345                 hwif->udma_four = (pdcnew_new_cable_detect(hwif)) ? 0 : 1;
 346         if (!noautodma)
 347                 hwif->autodma = 1;
 348         hwif->drives[0].autodma = hwif->drives[1].autodma = hwif->autodma;
 349 #if PDC202_DEBUG_CABLE
 350         printk(KERN_DEBUG "%s: %s-pin cable\n",
 351                 hwif->name, hwif->udma_four ? "80" : "40");
 352 #endif /* PDC202_DEBUG_CABLE */
 353 }
 354
 355 static int __devinit init_setup_pdcnew(struct pci_dev *dev, ide_pci_device_t *d)
 356 {
 357         return ide_setup_pci_device(dev, d);
 358 }
 359
 360 static int __devinit init_setup_pdc20270(struct pci_dev *dev,
 361                                          ide_pci_device_t *d)
 362 {
 363         struct pci_dev *findev = NULL;
 364
 365         if ((dev->bus->self &&
 366              dev->bus->self->vendor == PCI_VENDOR_ID_DEC) &&
 367             (dev->bus->self->device == PCI_DEVICE_ID_DEC_21150)) {
 368                 if (PCI_SLOT(dev->devfn) & 2)
 369                         return -ENODEV;
 370                 d->extra = 0;
 371                 while ((findev = pci_find_device(PCI_ANY_ID, PCI_ANY_ID, findev)) != NULL) {
 372                         if ((findev->vendor == dev->vendor) &&
 373                             (findev->device == dev->device) &&
 374                             (PCI_SLOT(findev->devfn) & 2)) {
 375                                 if (findev->irq != dev->irq) {
 376                                         findev->irq = dev->irq;
 377                                 }
 378                                 return ide_setup_pci_devices(dev, findev, d);
 379                         }
 380                 }
 381         }
 382         return ide_setup_pci_device(dev, d);
 383 }
 384
 385 static int __devinit init_setup_pdc20276(struct pci_dev *dev,
 386                                          ide_pci_device_t *d)
 387 {
 388         if ((dev->bus->self) &&
 389             (dev->bus->self->vendor == PCI_VENDOR_ID_INTEL) &&
 390             ((dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960) ||
 391              (dev->bus->self->device == PCI_DEVICE_ID_INTEL_I960RM))) {
 392                 printk(KERN_INFO "ide: Skipping Promise PDC20276 "
 393                         "attached to I2O RAID controller.\n");
 394                 return -ENODEV;
 395         }
 396         return ide_setup_pci_device(dev, d);
 397 }
 398
 399 static ide_pci_device_t pdcnew_chipsets[] __devinitdata = {
 400         {       /* 0 */
 401                 .name           = "PDC20268",
 402                 .init_setup     = init_setup_pdcnew,
 403                 .init_chipset   = init_chipset_pdcnew,
 404                 .init_hwif      = init_hwif_pdc202new,
 405                 .channels       = 2,
 406                 .autodma        = AUTODMA,
 407                 .bootable       = OFF_BOARD,
 408         },{     /* 1 */
 409                 .name           = "PDC20269",
 410                 .init_setup     = init_setup_pdcnew,
 411                 .init_chipset   = init_chipset_pdcnew,
 412                 .init_hwif      = init_hwif_pdc202new,
 413                 .channels       = 2,
 414                 .autodma        = AUTODMA,
 415                 .bootable       = OFF_BOARD,
 416         },{     /* 2 */
 417                 .name           = "PDC20270",
 418                 .init_setup     = init_setup_pdc20270,
 419                 .init_chipset   = init_chipset_pdcnew,
 420                 .init_hwif      = init_hwif_pdc202new,
 421                 .channels       = 2,
 422                 .autodma        = AUTODMA,
 423                 .bootable       = OFF_BOARD,
 424         },{     /* 3 */
 425                 .name           = "PDC20271",
 426                 .init_setup     = init_setup_pdcnew,
 427                 .init_chipset   = init_chipset_pdcnew,
 428                 .init_hwif      = init_hwif_pdc202new,
 429                 .channels       = 2,
 430                 .autodma        = AUTODMA,
 431                 .bootable       = OFF_BOARD,
 432         },{     /* 4 */
 433                 .name           = "PDC20275",
 434                 .init_setup     = init_setup_pdcnew,
 435                 .init_chipset   = init_chipset_pdcnew,
 436                 .init_hwif      = init_hwif_pdc202new,
 437                 .channels       = 2,
 438                 .autodma        = AUTODMA,
 439                 .bootable       = OFF_BOARD,
 440         },{     /* 5 */
 441                 .name           = "PDC20276",
 442                 .init_setup     = init_setup_pdc20276,
 443                 .init_chipset   = init_chipset_pdcnew,
 444                 .init_hwif      = init_hwif_pdc202new,
 445                 .channels       = 2,
 446                 .autodma        = AUTODMA,
 447                 .bootable       = OFF_BOARD,
 448         },{     /* 6 */
 449                 .name           = "PDC20277",
 450                 .init_setup     = init_setup_pdcnew,
 451                 .init_chipset   = init_chipset_pdcnew,
 452                 .init_hwif      = init_hwif_pdc202new,
 453                 .channels       = 2,
 454                 .autodma        = AUTODMA,
 455                 .bootable       = OFF_BOARD,
 456         }
 457 };
 458
 459 /**
 460  *      pdc202new_init_one      -       called when a pdc202xx is found
 461  *      @dev: the pdc202new device
 462  *      @id: the matching pci id
 463  *
 464  *      Called when the PCI registration layer (or the IDE initialization)
 465  *      finds a device matching our IDE device tables.
 466  */
 467
 468 static int __devinit pdc202new_init_one(struct pci_dev *dev, const struct pci_device_id *id)
 469 {
 470         ide_pci_device_t *d = &pdcnew_chipsets[id->driver_data];
 471
 472         return d->init_setup(dev, d);
 473 }
 474
 475 static struct pci_device_id pdc202new_pci_tbl[] = {
 476         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20268, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
 477         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20269, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1},
 478         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20270, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2},
 479         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20271, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3},
 480         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20275, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4},
 481         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20276, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 5},
 482         { PCI_VENDOR_ID_PROMISE, PCI_DEVICE_ID_PROMISE_20277, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 6},
 483         { 0, },
 484 };
 485 MODULE_DEVICE_TABLE(pci, pdc202new_pci_tbl);
 486
 487 static struct pci_driver driver = {
 488         .name           = "Promise_IDE",
 489         .id_table       = pdc202new_pci_tbl,
 490         .probe          = pdc202new_init_one,
 491 };
 492
 493 static int pdc202new_ide_init(void)
 494 {
 495         return ide_pci_register_driver(&driver);
 496 }
 497
 498 module_init(pdc202new_ide_init);
 499
 500 MODULE_AUTHOR("Andre Hedrick, Frank Tiernan");
 501 MODULE_DESCRIPTION("PCI driver module for Promise PDC20268 and higher");
 502 MODULE_LICENSE("GPL");