drivers/ide/ide-dma.c

   1 /*
   2  *  Copyright (C) 1995-1998   Mark Lord
   3  *  Copyright (C) 1999-2000   Andre Hedrick <andre@linux-ide.org>
   4  *  Copyright (C) 2004, 2007  Bartlomiej Zolnierkiewicz
   5  *
   6  *  May be copied or modified under the terms of the GNU General Public License
   7  */
   8
   9 /*
  10  *  Special Thanks to Mark for his Six years of work.
  11  */
  12
  13 /*
  14  * This module provides support for the bus-master IDE DMA functions
  15  * of various PCI chipsets, including the Intel PIIX (i82371FB for
  16  * the 430 FX chipset), the PIIX3 (i82371SB for the 430 HX/VX and
  17  * 440 chipsets), and the PIIX4 (i82371AB for the 430 TX chipset)
  18  * ("PIIX" stands for "PCI ISA IDE Xcellerator").
  19  *
  20  * Pretty much the same code works for other IDE PCI bus-mastering chipsets.
  21  *
  22  * DMA is supported for all IDE devices (disk drives, cdroms, tapes, floppies).
  23  *
  24  * By default, DMA support is prepared for use, but is currently enabled only
  25  * for drives which already have DMA enabled (UltraDMA or mode 2 multi/single),
  26  * or which are recognized as "good" (see table below).  Drives with only mode0
  27  * or mode1 (multi/single) DMA should also work with this chipset/driver
  28  * (eg. MC2112A) but are not enabled by default.
  29  *
  30  * Use "hdparm -i" to view modes supported by a given drive.
  31  *
  32  * The hdparm-3.5 (or later) utility can be used for manually enabling/disabling
  33  * DMA support, but must be (re-)compiled against this kernel version or later.
  34  *
  35  * To enable DMA, use "hdparm -d1 /dev/hd?" on a per-drive basis after booting.
  36  * If problems arise, ide.c will disable DMA operation after a few retries.
  37  * This error recovery mechanism works and has been extremely well exercised.
  38  *
  39  * IDE drives, depending on their vintage, may support several different modes
  40  * of DMA operation.  The boot-time modes are indicated with a "*" in
  41  * the "hdparm -i" listing, and can be changed with *knowledgeable* use of
  42  * the "hdparm -X" feature.  There is seldom a need to do this, as drives
  43  * normally power-up with their "best" PIO/DMA modes enabled.
  44  *
  45  * Testing has been done with a rather extensive number of drives,
  46  * with Quantum & Western Digital models generally outperforming the pack,
  47  * and Fujitsu & Conner (and some Seagate which are really Conner) drives
  48  * showing more lackluster throughput.
  49  *
  50  * Keep an eye on /var/adm/messages for "DMA disabled" messages.
  51  *
  52  * Some people have reported trouble with Intel Zappa motherboards.
  53  * This can be fixed by upgrading the AMI BIOS to version 1.00.04.BS0,
  54  * available from ftp://ftp.intel.com/pub/bios/10004bs0.exe
  55  * (thanks to Glen Morrell <glen@spin.Stanford.edu> for researching this).
  56  *
  57  * Thanks to "Christopher J. Reimer" <reimer@doe.carleton.ca> for
  58  * fixing the problem with the BIOS on some Acer motherboards.
  59  *
  60  * Thanks to "Benoit Poulot-Cazajous" <poulot@chorus.fr> for testing
  61  * "TX" chipset compatibility and for providing patches for the "TX" chipset.
  62  *
  63  * Thanks to Christian Brunner <chb@muc.de> for taking a good first crack
  64  * at generic DMA -- his patches were referred to when preparing this code.
  65  *
  66  * Most importantly, thanks to Robert Bringman <rob@mars.trion.com>
  67  * for supplying a Promise UDMA board & WD UDMA drive for this work!
  68  *
  69  * And, yes, Intel Zappa boards really *do* use both PIIX IDE ports.
  70  *
  71  * ATA-66/100 and recovery functions, I forgot the rest......
  72  *
  73  */
  74
  75 #include <linux/module.h>
  76 #include <linux/types.h>
  77 #include <linux/kernel.h>
  78 #include <linux/timer.h>
  79 #include <linux/mm.h>
  80 #include <linux/interrupt.h>
  81 #include <linux/pci.h>
  82 #include <linux/init.h>
  83 #include <linux/ide.h>
  84 #include <linux/delay.h>
  85 #include <linux/scatterlist.h>
  86 #include <linux/dma-mapping.h>
  87
  88 #include <asm/io.h>
  89 #include <asm/irq.h>
  90
  91 static const struct drive_list_entry drive_whitelist [] = {
  92
  93         { "Micropolis 2112A"    ,       NULL            },
  94         { "CONNER CTMA 4000"    ,       NULL            },
  95         { "CONNER CTT8000-A"    ,       NULL            },
  96         { "ST34342A"            ,       NULL            },
  97         { NULL                  ,       NULL            }
  98 };
  99
 100 static const struct drive_list_entry drive_blacklist [] = {
 101
 102         { "WDC AC11000H"        ,       NULL            },
 103         { "WDC AC22100H"        ,       NULL            },
 104         { "WDC AC32500H"        ,       NULL            },
 105         { "WDC AC33100H"        ,       NULL            },
 106         { "WDC AC31600H"        ,       NULL            },
 107         { "WDC AC32100H"        ,       "24.09P07"      },
 108         { "WDC AC23200L"        ,       "21.10N21"      },
 109         { "Compaq CRD-8241B"    ,       NULL            },
 110         { "CRD-8400B"           ,       NULL            },
 111         { "CRD-8480B",                  NULL            },
 112         { "CRD-8482B",                  NULL            },
 113         { "CRD-84"              ,       NULL            },
 114         { "SanDisk SDP3B"       ,       NULL            },
 115         { "SanDisk SDP3B-64"    ,       NULL            },
 116         { "SANYO CD-ROM CRD"    ,       NULL            },
 117         { "HITACHI CDR-8"       ,       NULL            },
 118         { "HITACHI CDR-8335"    ,       NULL            },
 119         { "HITACHI CDR-8435"    ,       NULL            },
 120         { "Toshiba CD-ROM XM-6202B"     ,       NULL            },
 121         { "TOSHIBA CD-ROM XM-1702BC",   NULL            },
 122         { "CD-532E-A"           ,       NULL            },
 123         { "E-IDE CD-ROM CR-840",        NULL            },
 124         { "CD-ROM Drive/F5A",   NULL            },
 125         { "WPI CDD-820",                NULL            },
 126         { "SAMSUNG CD-ROM SC-148C",     NULL            },
 127         { "SAMSUNG CD-ROM SC",  NULL            },
 128         { "ATAPI CD-ROM DRIVE 40X MAXIMUM",     NULL            },
 129         { "_NEC DV5800A",               NULL            },
 130         { "SAMSUNG CD-ROM SN-124",      "N001" },
 131         { "Seagate STT20000A",          NULL  },
 132         { "CD-ROM CDR_U200",            "1.09" },
 133         { NULL                  ,       NULL            }
 134
 135 };
 136
 137 /**
 138  *      ide_dma_intr    -       IDE DMA interrupt handler
 139  *      @drive: the drive the interrupt is for
 140  *
 141  *      Handle an interrupt completing a read/write DMA transfer on an
 142  *      IDE device
 143  */
 144
 145 ide_startstop_t ide_dma_intr (ide_drive_t *drive)
 146 {
 147         u8 stat = 0, dma_stat = 0;
 148
 149         dma_stat = HWIF(drive)->ide_dma_end(drive);
 150         stat = HWIF(drive)->INB(IDE_STATUS_REG);        /* get drive status */
 151         if (OK_STAT(stat,DRIVE_READY,drive->bad_wstat|DRQ_STAT)) {
 152                 if (!dma_stat) {
 153                         struct request *rq = HWGROUP(drive)->rq;
 154
 155                         task_end_request(drive, rq, stat);
 156                         return ide_stopped;
 157                 }
 158                 printk(KERN_ERR "%s: dma_intr: bad DMA status (dma_stat=%x)\n",
 159                        drive->name, dma_stat);
 160         }
 161         return ide_error(drive, "dma_intr", stat);
 162 }
 163
 164 EXPORT_SYMBOL_GPL(ide_dma_intr);
 165
 166 static int ide_dma_good_drive(ide_drive_t *drive)
 167 {
 168         return ide_in_drive_list(drive->id, drive_whitelist);
 169 }
 170
 171 /**
 172  *      ide_build_sglist        -       map IDE scatter gather for DMA I/O
 173  *      @drive: the drive to build the DMA table for
 174  *      @rq: the request holding the sg list
 175  *
 176  *      Perform the DMA mapping magic necessary to access the source or
 177  *      target buffers of a request via DMA.  The lower layers of the
 178  *      kernel provide the necessary cache management so that we can
 179  *      operate in a portable fashion.
 180  */
 181
 182 int ide_build_sglist(ide_drive_t *drive, struct request *rq)
 183 {
 184         ide_hwif_t *hwif = HWIF(drive);
 185         struct scatterlist *sg = hwif->sg_table;
 186
 187         ide_map_sg(drive, rq);
 188
 189         if (rq_data_dir(rq) == READ)
 190                 hwif->sg_dma_direction = DMA_FROM_DEVICE;
 191         else
 192                 hwif->sg_dma_direction = DMA_TO_DEVICE;
 193
 194         return dma_map_sg(hwif->dev, sg, hwif->sg_nents,
 195                           hwif->sg_dma_direction);
 196 }
 197
 198 EXPORT_SYMBOL_GPL(ide_build_sglist);
 199
 200 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
 201 /**
 202  *      ide_build_dmatable      -       build IDE DMA table
 203  *
 204  *      ide_build_dmatable() prepares a dma request. We map the command
 205  *      to get the pci bus addresses of the buffers and then build up
 206  *      the PRD table that the IDE layer wants to be fed. The code
 207  *      knows about the 64K wrap bug in the CS5530.
 208  *
 209  *      Returns the number of built PRD entries if all went okay,
 210  *      returns 0 otherwise.
 211  *
 212  *      May also be invoked from trm290.c
 213  */
 214
 215 int ide_build_dmatable (ide_drive_t *drive, struct request *rq)
 216 {
 217         ide_hwif_t *hwif        = HWIF(drive);
 218         unsigned int *table     = hwif->dmatable_cpu;
 219         unsigned int is_trm290  = (hwif->chipset == ide_trm290) ? 1 : 0;
 220         unsigned int count = 0;
 221         int i;
 222         struct scatterlist *sg;
 223
 224         hwif->sg_nents = i = ide_build_sglist(drive, rq);
 225
 226         if (!i)
 227                 return 0;
 228
 229         sg = hwif->sg_table;
 230         while (i) {
 231                 u32 cur_addr;
 232                 u32 cur_len;
 233
 234                 cur_addr = sg_dma_address(sg);
 235                 cur_len = sg_dma_len(sg);
 236
 237                 /*
 238                  * Fill in the dma table, without crossing any 64kB boundaries.
 239                  * Most hardware requires 16-bit alignment of all blocks,
 240                  * but the trm290 requires 32-bit alignment.
 241                  */
 242
 243                 while (cur_len) {
 244                         if (count++ >= PRD_ENTRIES) {
 245                                 printk(KERN_ERR "%s: DMA table too small\n", drive->name);
 246                                 goto use_pio_instead;
 247                         } else {
 248                                 u32 xcount, bcount = 0x10000 - (cur_addr & 0xffff);
 249
 250                                 if (bcount > cur_len)
 251                                         bcount = cur_len;
 252                                 *table++ = cpu_to_le32(cur_addr);
 253                                 xcount = bcount & 0xffff;
 254                                 if (is_trm290)
 255                                         xcount = ((xcount >> 2) - 1) << 16;
 256                                 if (xcount == 0x0000) {
 257         /*
 258          * Most chipsets correctly interpret a length of 0x0000 as 64KB,
 259          * but at least one (e.g. CS5530) misinterprets it as zero (!).
 260          * So here we break the 64KB entry into two 32KB entries instead.
 261          */
 262                                         if (count++ >= PRD_ENTRIES) {
 263                                                 printk(KERN_ERR "%s: DMA table too small\n", drive->name);
 264                                                 goto use_pio_instead;
 265                                         }
 266                                         *table++ = cpu_to_le32(0x8000);
 267                                         *table++ = cpu_to_le32(cur_addr + 0x8000);
 268                                         xcount = 0x8000;
 269                                 }
 270                                 *table++ = cpu_to_le32(xcount);
 271                                 cur_addr += bcount;
 272                                 cur_len -= bcount;
 273                         }
 274                 }
 275
 276                 sg = sg_next(sg);
 277                 i--;
 278         }
 279
 280         if (count) {
 281                 if (!is_trm290)
 282                         *--table |= cpu_to_le32(0x80000000);
 283                 return count;
 284         }
 285
 286         printk(KERN_ERR "%s: empty DMA table?\n", drive->name);
 287
 288 use_pio_instead:
 289         ide_destroy_dmatable(drive);
 290
 291         return 0; /* revert to PIO for this request */
 292 }
 293
 294 EXPORT_SYMBOL_GPL(ide_build_dmatable);
 295 #endif
 296
 297 /**
 298  *      ide_destroy_dmatable    -       clean up DMA mapping
 299  *      @drive: The drive to unmap
 300  *
 301  *      Teardown mappings after DMA has completed. This must be called
 302  *      after the completion of each use of ide_build_dmatable and before
 303  *      the next use of ide_build_dmatable. Failure to do so will cause
 304  *      an oops as only one mapping can be live for each target at a given
 305  *      time.
 306  */
 307
 308 void ide_destroy_dmatable (ide_drive_t *drive)
 309 {
 310         ide_hwif_t *hwif = drive->hwif;
 311
 312         dma_unmap_sg(hwif->dev, hwif->sg_table, hwif->sg_nents,
 313                      hwif->sg_dma_direction);
 314 }
 315
 316 EXPORT_SYMBOL_GPL(ide_destroy_dmatable);
 317
 318 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
 319 /**
 320  *      config_drive_for_dma    -       attempt to activate IDE DMA
 321  *      @drive: the drive to place in DMA mode
 322  *
 323  *      If the drive supports at least mode 2 DMA or UDMA of any kind
 324  *      then attempt to place it into DMA mode. Drives that are known to
 325  *      support DMA but predate the DMA properties or that are known
 326  *      to have DMA handling bugs are also set up appropriately based
 327  *      on the good/bad drive lists.
 328  */
 329
 330 static int config_drive_for_dma (ide_drive_t *drive)
 331 {
 332         ide_hwif_t *hwif = drive->hwif;
 333         struct hd_driveid *id = drive->id;
 334
 335         if (drive->media != ide_disk) {
 336                 if (hwif->host_flags & IDE_HFLAG_NO_ATAPI_DMA)
 337                         return 0;
 338         }
 339
 340         /*
 341          * Enable DMA on any drive that has
 342          * UltraDMA (mode 0/1/2/3/4/5/6) enabled
 343          */
 344         if ((id->field_valid & 4) && ((id->dma_ultra >> 8) & 0x7f))
 345                 return 1;
 346
 347         /*
 348          * Enable DMA on any drive that has mode2 DMA
 349          * (multi or single) enabled
 350          */
 351         if (id->field_valid & 2)        /* regular DMA */
 352                 if ((id->dma_mword & 0x404) == 0x404 ||
 353                     (id->dma_1word & 0x404) == 0x404)
 354                         return 1;
 355
 356         /* Consult the list of known "good" drives */
 357         if (ide_dma_good_drive(drive))
 358                 return 1;
 359
 360         return 0;
 361 }
 362
 363 /**
 364  *      dma_timer_expiry        -       handle a DMA timeout
 365  *      @drive: Drive that timed out
 366  *
 367  *      An IDE DMA transfer timed out. In the event of an error we ask
 368  *      the driver to resolve the problem, if a DMA transfer is still
 369  *      in progress we continue to wait (arguably we need to add a
 370  *      secondary 'I don't care what the drive thinks' timeout here)
 371  *      Finally if we have an interrupt we let it complete the I/O.
 372  *      But only one time - we clear expiry and if it's still not
 373  *      completed after WAIT_CMD, we error and retry in PIO.
 374  *      This can occur if an interrupt is lost or due to hang or bugs.
 375  */
 376
 377 static int dma_timer_expiry (ide_drive_t *drive)
 378 {
 379         ide_hwif_t *hwif        = HWIF(drive);
 380         u8 dma_stat             = hwif->INB(hwif->dma_status);
 381
 382         printk(KERN_WARNING "%s: dma_timer_expiry: dma status == 0x%02x\n",
 383                 drive->name, dma_stat);
 384
 385         if ((dma_stat & 0x18) == 0x18)  /* BUSY Stupid Early Timer !! */
 386                 return WAIT_CMD;
 387
 388         HWGROUP(drive)->expiry = NULL;  /* one free ride for now */
 389
 390         /* 1 dmaing, 2 error, 4 intr */
 391         if (dma_stat & 2)       /* ERROR */
 392                 return -1;
 393
 394         if (dma_stat & 1)       /* DMAing */
 395                 return WAIT_CMD;
 396
 397         if (dma_stat & 4)       /* Got an Interrupt */
 398                 return WAIT_CMD;
 399
 400         return 0;       /* Status is unknown -- reset the bus */
 401 }
 402
 403 /**
 404  *      ide_dma_host_set        -       Enable/disable DMA on a host
 405  *      @drive: drive to control
 406  *
 407  *      Enable/disable DMA on an IDE controller following generic
 408  *      bus-mastering IDE controller behaviour.
 409  */
 410
 411 void ide_dma_host_set(ide_drive_t *drive, int on)
 412 {
 413         ide_hwif_t *hwif        = HWIF(drive);
 414         u8 unit                 = (drive->select.b.unit & 0x01);
 415         u8 dma_stat             = hwif->INB(hwif->dma_status);
 416
 417         if (on)
 418                 dma_stat |= (1 << (5 + unit));
 419         else
 420                 dma_stat &= ~(1 << (5 + unit));
 421
 422         hwif->OUTB(dma_stat, hwif->dma_status);
 423 }
 424
 425 EXPORT_SYMBOL_GPL(ide_dma_host_set);
 426 #endif /* CONFIG_BLK_DEV_IDEDMA_PCI */
 427
 428 /**
 429  *      ide_dma_off_quietly     -       Generic DMA kill
 430  *      @drive: drive to control
 431  *
 432  *      Turn off the current DMA on this IDE controller.
 433  */
 434
 435 void ide_dma_off_quietly(ide_drive_t *drive)
 436 {
 437         drive->using_dma = 0;
 438         ide_toggle_bounce(drive, 0);
 439
 440         drive->hwif->dma_host_set(drive, 0);
 441 }
 442
 443 EXPORT_SYMBOL(ide_dma_off_quietly);
 444
 445 /**
 446  *      ide_dma_off     -       disable DMA on a device
 447  *      @drive: drive to disable DMA on
 448  *
 449  *      Disable IDE DMA for a device on this IDE controller.
 450  *      Inform the user that DMA has been disabled.
 451  */
 452
 453 void ide_dma_off(ide_drive_t *drive)
 454 {
 455         printk(KERN_INFO "%s: DMA disabled\n", drive->name);
 456         ide_dma_off_quietly(drive);
 457 }
 458
 459 EXPORT_SYMBOL(ide_dma_off);
 460
 461 /**
 462  *      ide_dma_on              -       Enable DMA on a device
 463  *      @drive: drive to enable DMA on
 464  *
 465  *      Enable IDE DMA for a device on this IDE controller.
 466  */
 467
 468 void ide_dma_on(ide_drive_t *drive)
 469 {
 470         drive->using_dma = 1;
 471         ide_toggle_bounce(drive, 1);
 472
 473         drive->hwif->dma_host_set(drive, 1);
 474 }
 475
 476 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
 477 /**
 478  *      ide_dma_setup   -       begin a DMA phase
 479  *      @drive: target device
 480  *
 481  *      Build an IDE DMA PRD (IDE speak for scatter gather table)
 482  *      and then set up the DMA transfer registers for a device
 483  *      that follows generic IDE PCI DMA behaviour. Controllers can
 484  *      override this function if they need to
 485  *
 486  *      Returns 0 on success. If a PIO fallback is required then 1
 487  *      is returned.
 488  */
 489
 490 int ide_dma_setup(ide_drive_t *drive)
 491 {
 492         ide_hwif_t *hwif = drive->hwif;
 493         struct request *rq = HWGROUP(drive)->rq;
 494         unsigned int reading;
 495         u8 dma_stat;
 496
 497         if (rq_data_dir(rq))
 498                 reading = 0;
 499         else
 500                 reading = 1 << 3;
 501
 502         /* fall back to pio! */
 503         if (!ide_build_dmatable(drive, rq)) {
 504                 ide_map_sg(drive, rq);
 505                 return 1;
 506         }
 507
 508         /* PRD table */
 509         if (hwif->mmio)
 510                 writel(hwif->dmatable_dma, (void __iomem *)hwif->dma_prdtable);
 511         else
 512                 outl(hwif->dmatable_dma, hwif->dma_prdtable);
 513
 514         /* specify r/w */
 515         hwif->OUTB(reading, hwif->dma_command);
 516
 517         /* read dma_status for INTR & ERROR flags */
 518         dma_stat = hwif->INB(hwif->dma_status);
 519
 520         /* clear INTR & ERROR flags */
 521         hwif->OUTB(dma_stat|6, hwif->dma_status);
 522         drive->waiting_for_dma = 1;
 523         return 0;
 524 }
 525
 526 EXPORT_SYMBOL_GPL(ide_dma_setup);
 527
 528 static void ide_dma_exec_cmd(ide_drive_t *drive, u8 command)
 529 {
 530         /* issue cmd to drive */
 531         ide_execute_command(drive, command, &ide_dma_intr, 2*WAIT_CMD, dma_timer_expiry);
 532 }
 533
 534 void ide_dma_start(ide_drive_t *drive)
 535 {
 536         ide_hwif_t *hwif        = HWIF(drive);
 537         u8 dma_cmd              = hwif->INB(hwif->dma_command);
 538
 539         /* Note that this is done *after* the cmd has
 540          * been issued to the drive, as per the BM-IDE spec.
 541          * The Promise Ultra33 doesn't work correctly when
 542          * we do this part before issuing the drive cmd.
 543          */
 544         /* start DMA */
 545         hwif->OUTB(dma_cmd|1, hwif->dma_command);
 546         hwif->dma = 1;
 547         wmb();
 548 }
 549
 550 EXPORT_SYMBOL_GPL(ide_dma_start);
 551
 552 /* returns 1 on error, 0 otherwise */
 553 int __ide_dma_end (ide_drive_t *drive)
 554 {
 555         ide_hwif_t *hwif        = HWIF(drive);
 556         u8 dma_stat = 0, dma_cmd = 0;
 557
 558         drive->waiting_for_dma = 0;
 559         /* get dma_command mode */
 560         dma_cmd = hwif->INB(hwif->dma_command);
 561         /* stop DMA */
 562         hwif->OUTB(dma_cmd&~1, hwif->dma_command);
 563         /* get DMA status */
 564         dma_stat = hwif->INB(hwif->dma_status);
 565         /* clear the INTR & ERROR bits */
 566         hwif->OUTB(dma_stat|6, hwif->dma_status);
 567         /* purge DMA mappings */
 568         ide_destroy_dmatable(drive);
 569         /* verify good DMA status */
 570         hwif->dma = 0;
 571         wmb();
 572         return (dma_stat & 7) != 4 ? (0x10 | dma_stat) : 0;
 573 }
 574
 575 EXPORT_SYMBOL(__ide_dma_end);
 576
 577 /* returns 1 if dma irq issued, 0 otherwise */
 578 static int __ide_dma_test_irq(ide_drive_t *drive)
 579 {
 580         ide_hwif_t *hwif        = HWIF(drive);
 581         u8 dma_stat             = hwif->INB(hwif->dma_status);
 582
 583         /* return 1 if INTR asserted */
 584         if ((dma_stat & 4) == 4)
 585                 return 1;
 586         if (!drive->waiting_for_dma)
 587                 printk(KERN_WARNING "%s: (%s) called while not waiting\n",
 588                         drive->name, __FUNCTION__);
 589         return 0;
 590 }
 591 #else
 592 static inline int config_drive_for_dma(ide_drive_t *drive) { return 0; }
 593 #endif /* CONFIG_BLK_DEV_IDEDMA_PCI */
 594
 595 int __ide_dma_bad_drive (ide_drive_t *drive)
 596 {
 597         struct hd_driveid *id = drive->id;
 598
 599         int blacklist = ide_in_drive_list(id, drive_blacklist);
 600         if (blacklist) {
 601                 printk(KERN_WARNING "%s: Disabling (U)DMA for %s (blacklisted)\n",
 602                                     drive->name, id->model);
 603                 return blacklist;
 604         }
 605         return 0;
 606 }
 607
 608 EXPORT_SYMBOL(__ide_dma_bad_drive);
 609
 610 static const u8 xfer_mode_bases[] = {
 611         XFER_UDMA_0,
 612         XFER_MW_DMA_0,
 613         XFER_SW_DMA_0,
 614 };
 615
 616 static unsigned int ide_get_mode_mask(ide_drive_t *drive, u8 base, u8 req_mode)
 617 {
 618         struct hd_driveid *id = drive->id;
 619         ide_hwif_t *hwif = drive->hwif;
 620         unsigned int mask = 0;
 621
 622         switch(base) {
 623         case XFER_UDMA_0:
 624                 if ((id->field_valid & 4) == 0)
 625                         break;
 626
 627                 if (hwif->udma_filter)
 628                         mask = hwif->udma_filter(drive);
 629                 else
 630                         mask = hwif->ultra_mask;
 631                 mask &= id->dma_ultra;
 632
 633                 /*
 634                  * avoid false cable warning from eighty_ninty_three()
 635                  */
 636                 if (req_mode > XFER_UDMA_2) {
 637                         if ((mask & 0x78) && (eighty_ninty_three(drive) == 0))
 638                                 mask &= 0x07;
 639                 }
 640                 break;
 641         case XFER_MW_DMA_0:
 642                 if ((id->field_valid & 2) == 0)
 643                         break;
 644                 if (hwif->mdma_filter)
 645                         mask = hwif->mdma_filter(drive);
 646                 else
 647                         mask = hwif->mwdma_mask;
 648                 mask &= id->dma_mword;
 649                 break;
 650         case XFER_SW_DMA_0:
 651                 if (id->field_valid & 2) {
 652                         mask = id->dma_1word & hwif->swdma_mask;
 653                 } else if (id->tDMA) {
 654                         /*
 655                          * ide_fix_driveid() doesn't convert ->tDMA to the
 656                          * CPU endianness so we need to do it here
 657                          */
 658                         u8 mode = le16_to_cpu(id->tDMA);
 659
 660                         /*
 661                          * if the mode is valid convert it to the mask
 662                          * (the maximum allowed mode is XFER_SW_DMA_2)
 663                          */
 664                         if (mode <= 2)
 665                                 mask = ((2 << mode) - 1) & hwif->swdma_mask;
 666                 }
 667                 break;
 668         default:
 669                 BUG();
 670                 break;
 671         }
 672
 673         return mask;
 674 }
 675
 676 /**
 677  *      ide_find_dma_mode       -       compute DMA speed
 678  *      @drive: IDE device
 679  *      @req_mode: requested mode
 680  *
 681  *      Checks the drive/host capabilities and finds the speed to use for
 682  *      the DMA transfer.  The speed is then limited by the requested mode.
 683  *
 684  *      Returns 0 if the drive/host combination is incapable of DMA transfers
 685  *      or if the requested mode is not a DMA mode.
 686  */
 687
 688 u8 ide_find_dma_mode(ide_drive_t *drive, u8 req_mode)
 689 {
 690         ide_hwif_t *hwif = drive->hwif;
 691         unsigned int mask;
 692         int x, i;
 693         u8 mode = 0;
 694
 695         if (drive->media != ide_disk) {
 696                 if (hwif->host_flags & IDE_HFLAG_NO_ATAPI_DMA)
 697                         return 0;
 698         }
 699
 700         for (i = 0; i < ARRAY_SIZE(xfer_mode_bases); i++) {
 701                 if (req_mode < xfer_mode_bases[i])
 702                         continue;
 703                 mask = ide_get_mode_mask(drive, xfer_mode_bases[i], req_mode);
 704                 x = fls(mask) - 1;
 705                 if (x >= 0) {
 706                         mode = xfer_mode_bases[i] + x;
 707                         break;
 708                 }
 709         }
 710
 711         if (hwif->chipset == ide_acorn && mode == 0) {
 712                 /*
 713                  * is this correct?
 714                  */
 715                 if (ide_dma_good_drive(drive) && drive->id->eide_dma_time < 150)
 716                         mode = XFER_MW_DMA_1;
 717         }
 718
 719         mode = min(mode, req_mode);
 720
 721         printk(KERN_INFO "%s: %s mode selected\n", drive->name,
 722                           mode ? ide_xfer_verbose(mode) : "no DMA");
 723
 724         return mode;
 725 }
 726
 727 EXPORT_SYMBOL_GPL(ide_find_dma_mode);
 728
 729 static int ide_tune_dma(ide_drive_t *drive)
 730 {
 731         ide_hwif_t *hwif = drive->hwif;
 732         u8 speed;
 733
 734         if (noautodma || drive->nodma || (drive->id->capability & 1) == 0)
 735                 return 0;
 736
 737         /* consult the list of known "bad" drives */
 738         if (__ide_dma_bad_drive(drive))
 739                 return 0;
 740
 741         if (ide_id_dma_bug(drive))
 742                 return 0;
 743
 744         if (hwif->host_flags & IDE_HFLAG_TRUST_BIOS_FOR_DMA)
 745                 return config_drive_for_dma(drive);
 746
 747         speed = ide_max_dma_mode(drive);
 748
 749         if (!speed) {
 750                  /* is this really correct/needed? */
 751                 if ((hwif->host_flags & IDE_HFLAG_CY82C693) &&
 752                     ide_dma_good_drive(drive))
 753                         return 1;
 754                 else
 755                         return 0;
 756         }
 757
 758         if (hwif->host_flags & IDE_HFLAG_NO_SET_MODE)
 759                 return 0;
 760
 761         if (ide_set_dma_mode(drive, speed))
 762                 return 0;
 763
 764         return 1;
 765 }
 766
 767 static int ide_dma_check(ide_drive_t *drive)
 768 {
 769         ide_hwif_t *hwif = drive->hwif;
 770         int vdma = (hwif->host_flags & IDE_HFLAG_VDMA)? 1 : 0;
 771
 772         if (!vdma && ide_tune_dma(drive))
 773                 return 0;
 774
 775         /* TODO: always do PIO fallback */
 776         if (hwif->host_flags & IDE_HFLAG_TRUST_BIOS_FOR_DMA)
 777                 return -1;
 778
 779         ide_set_max_pio(drive);
 780
 781         return vdma ? 0 : -1;
 782 }
 783
 784 int ide_id_dma_bug(ide_drive_t *drive)
 785 {
 786         struct hd_driveid *id = drive->id;
 787
 788         if (id->field_valid & 4) {
 789                 if ((id->dma_ultra >> 8) && (id->dma_mword >> 8))
 790                         goto err_out;
 791         } else if (id->field_valid & 2) {
 792                 if ((id->dma_mword >> 8) && (id->dma_1word >> 8))
 793                         goto err_out;
 794         }
 795         return 0;
 796 err_out:
 797         printk(KERN_ERR "%s: bad DMA info in identify block\n", drive->name);
 798         return 1;
 799 }
 800
 801 int ide_set_dma(ide_drive_t *drive)
 802 {
 803         int rc;
 804
 805         /*
 806          * Force DMAing for the beginning of the check.
 807          * Some chipsets appear to do interesting
 808          * things, if not checked and cleared.
 809          *   PARANOIA!!!
 810          */
 811         ide_dma_off_quietly(drive);
 812
 813         rc = ide_dma_check(drive);
 814         if (rc)
 815                 return rc;
 816
 817         ide_dma_on(drive);
 818
 819         return 0;
 820 }
 821
 822 void ide_check_dma_crc(ide_drive_t *drive)
 823 {
 824         u8 mode;
 825
 826         ide_dma_off_quietly(drive);
 827         drive->crc_count = 0;
 828         mode = drive->current_speed;
 829         /*
 830          * Don't try non Ultra-DMA modes without iCRC's.  Force the
 831          * device to PIO and make the user enable SWDMA/MWDMA modes.
 832          */
 833         if (mode > XFER_UDMA_0 && mode <= XFER_UDMA_7)
 834                 mode--;
 835         else
 836                 mode = XFER_PIO_4;
 837         ide_set_xfer_rate(drive, mode);
 838         if (drive->current_speed >= XFER_SW_DMA_0)
 839                 ide_dma_on(drive);
 840 }
 841
 842 #ifdef CONFIG_BLK_DEV_IDEDMA_PCI
 843 void ide_dma_lost_irq (ide_drive_t *drive)
 844 {
 845         printk("%s: DMA interrupt recovery\n", drive->name);
 846 }
 847
 848 EXPORT_SYMBOL(ide_dma_lost_irq);
 849
 850 void ide_dma_timeout (ide_drive_t *drive)
 851 {
 852         ide_hwif_t *hwif = HWIF(drive);
 853
 854         printk(KERN_ERR "%s: timeout waiting for DMA\n", drive->name);
 855
 856         if (hwif->ide_dma_test_irq(drive))
 857                 return;
 858
 859         hwif->ide_dma_end(drive);
 860 }
 861
 862 EXPORT_SYMBOL(ide_dma_timeout);
 863
 864 static void ide_release_dma_engine(ide_hwif_t *hwif)
 865 {
 866         if (hwif->dmatable_cpu) {
 867                 struct pci_dev *pdev = to_pci_dev(hwif->dev);
 868
 869                 pci_free_consistent(pdev, PRD_ENTRIES * PRD_BYTES,
 870                                     hwif->dmatable_cpu, hwif->dmatable_dma);
 871                 hwif->dmatable_cpu = NULL;
 872         }
 873 }
 874
 875 static int ide_release_iomio_dma(ide_hwif_t *hwif)
 876 {
 877         release_region(hwif->dma_base, 8);
 878         if (hwif->extra_ports)
 879                 release_region(hwif->extra_base, hwif->extra_ports);
 880         return 1;
 881 }
 882
 883 /*
 884  * Needed for allowing full modular support of ide-driver
 885  */
 886 int ide_release_dma(ide_hwif_t *hwif)
 887 {
 888         ide_release_dma_engine(hwif);
 889
 890         if (hwif->mmio)
 891                 return 1;
 892         else
 893                 return ide_release_iomio_dma(hwif);
 894 }
 895
 896 static int ide_allocate_dma_engine(ide_hwif_t *hwif)
 897 {
 898         struct pci_dev *pdev = to_pci_dev(hwif->dev);
 899
 900         hwif->dmatable_cpu = pci_alloc_consistent(pdev,
 901                                                   PRD_ENTRIES * PRD_BYTES,
 902                                                   &hwif->dmatable_dma);
 903
 904         if (hwif->dmatable_cpu)
 905                 return 0;
 906
 907         printk(KERN_ERR "%s: -- Error, unable to allocate DMA table.\n",
 908                hwif->cds->name);
 909
 910         return 1;
 911 }
 912
 913 static int ide_mapped_mmio_dma(ide_hwif_t *hwif, unsigned long base)
 914 {
 915         printk(KERN_INFO "    %s: MMIO-DMA ", hwif->name);
 916
 917         return 0;
 918 }
 919
 920 static int ide_iomio_dma(ide_hwif_t *hwif, unsigned long base)
 921 {
 922         printk(KERN_INFO "    %s: BM-DMA at 0x%04lx-0x%04lx",
 923                hwif->name, base, base + 7);
 924
 925         if (!request_region(base, 8, hwif->name)) {
 926                 printk(" -- Error, ports in use.\n");
 927                 return 1;
 928         }
 929
 930         if (hwif->cds->extra) {
 931                 hwif->extra_base = base + (hwif->channel ? 8 : 16);
 932
 933                 if (!hwif->mate || !hwif->mate->extra_ports) {
 934                         if (!request_region(hwif->extra_base,
 935                                             hwif->cds->extra, hwif->cds->name)) {
 936                                 printk(" -- Error, extra ports in use.\n");
 937                                 release_region(base, 8);
 938                                 return 1;
 939                         }
 940                         hwif->extra_ports = hwif->cds->extra;
 941                 }
 942         }
 943
 944         return 0;
 945 }
 946
 947 static int ide_dma_iobase(ide_hwif_t *hwif, unsigned long base)
 948 {
 949         if (hwif->mmio)
 950                 return ide_mapped_mmio_dma(hwif, base);
 951
 952         return ide_iomio_dma(hwif, base);
 953 }
 954
 955 void ide_setup_dma(ide_hwif_t *hwif, unsigned long base)
 956 {
 957         u8 dma_stat;
 958
 959         if (ide_dma_iobase(hwif, base))
 960                 return;
 961
 962         if (ide_allocate_dma_engine(hwif)) {
 963                 ide_release_dma(hwif);
 964                 return;
 965         }
 966
 967         hwif->dma_base = base;
 968
 969         if (!hwif->dma_command)
 970                 hwif->dma_command       = hwif->dma_base + 0;
 971         if (!hwif->dma_vendor1)
 972                 hwif->dma_vendor1       = hwif->dma_base + 1;
 973         if (!hwif->dma_status)
 974                 hwif->dma_status        = hwif->dma_base + 2;
 975         if (!hwif->dma_vendor3)
 976                 hwif->dma_vendor3       = hwif->dma_base + 3;
 977         if (!hwif->dma_prdtable)
 978                 hwif->dma_prdtable      = hwif->dma_base + 4;
 979
 980         if (!hwif->dma_host_set)
 981                 hwif->dma_host_set = &ide_dma_host_set;
 982         if (!hwif->dma_setup)
 983                 hwif->dma_setup = &ide_dma_setup;
 984         if (!hwif->dma_exec_cmd)
 985                 hwif->dma_exec_cmd = &ide_dma_exec_cmd;
 986         if (!hwif->dma_start)
 987                 hwif->dma_start = &ide_dma_start;
 988         if (!hwif->ide_dma_end)
 989                 hwif->ide_dma_end = &__ide_dma_end;
 990         if (!hwif->ide_dma_test_irq)
 991                 hwif->ide_dma_test_irq = &__ide_dma_test_irq;
 992         if (!hwif->dma_timeout)
 993                 hwif->dma_timeout = &ide_dma_timeout;
 994         if (!hwif->dma_lost_irq)
 995                 hwif->dma_lost_irq = &ide_dma_lost_irq;
 996
 997         dma_stat = hwif->INB(hwif->dma_status);
 998         printk(KERN_CONT ", BIOS settings: %s:%s, %s:%s\n",
 999                hwif->drives[0].name, (dma_stat & 0x20) ? "DMA" : "PIO",
1000                hwif->drives[1].name, (dma_stat & 0x40) ? "DMA" : "PIO");
1001 }
1002
1003 EXPORT_SYMBOL_GPL(ide_setup_dma);
1004 #endif /* CONFIG_BLK_DEV_IDEDMA_PCI */