Merge branch 'machtypes' into pxa-palm
[linux-2.6] / drivers / ide / ide-lib.c
1 #include <linux/module.h>
2 #include <linux/types.h>
3 #include <linux/string.h>
4 #include <linux/kernel.h>
5 #include <linux/timer.h>
6 #include <linux/mm.h>
7 #include <linux/interrupt.h>
8 #include <linux/major.h>
9 #include <linux/errno.h>
10 #include <linux/genhd.h>
11 #include <linux/blkpg.h>
12 #include <linux/slab.h>
13 #include <linux/pci.h>
14 #include <linux/delay.h>
15 #include <linux/hdreg.h>
16 #include <linux/ide.h>
17 #include <linux/bitops.h>
18
19 #include <asm/byteorder.h>
20 #include <asm/irq.h>
21 #include <asm/uaccess.h>
22 #include <asm/io.h>
23
24 static const char *udma_str[] =
25          { "UDMA/16", "UDMA/25",  "UDMA/33",  "UDMA/44",
26            "UDMA/66", "UDMA/100", "UDMA/133", "UDMA7" };
27 static const char *mwdma_str[] =
28         { "MWDMA0", "MWDMA1", "MWDMA2" };
29 static const char *swdma_str[] =
30         { "SWDMA0", "SWDMA1", "SWDMA2" };
31 static const char *pio_str[] =
32         { "PIO0", "PIO1", "PIO2", "PIO3", "PIO4", "PIO5" };
33
34 /**
35  *      ide_xfer_verbose        -       return IDE mode names
36  *      @mode: transfer mode
37  *
38  *      Returns a constant string giving the name of the mode
39  *      requested.
40  */
41
42 const char *ide_xfer_verbose(u8 mode)
43 {
44         const char *s;
45         u8 i = mode & 0xf;
46
47         if (mode >= XFER_UDMA_0 && mode <= XFER_UDMA_7)
48                 s = udma_str[i];
49         else if (mode >= XFER_MW_DMA_0 && mode <= XFER_MW_DMA_2)
50                 s = mwdma_str[i];
51         else if (mode >= XFER_SW_DMA_0 && mode <= XFER_SW_DMA_2)
52                 s = swdma_str[i];
53         else if (mode >= XFER_PIO_0 && mode <= XFER_PIO_5)
54                 s = pio_str[i & 0x7];
55         else if (mode == XFER_PIO_SLOW)
56                 s = "PIO SLOW";
57         else
58                 s = "XFER ERROR";
59
60         return s;
61 }
62
63 EXPORT_SYMBOL(ide_xfer_verbose);
64
65 /**
66  *      ide_rate_filter         -       filter transfer mode
67  *      @drive: IDE device
68  *      @speed: desired speed
69  *
70  *      Given the available transfer modes this function returns
71  *      the best available speed at or below the speed requested.
72  *
73  *      TODO: check device PIO capabilities
74  */
75
76 static u8 ide_rate_filter(ide_drive_t *drive, u8 speed)
77 {
78         ide_hwif_t *hwif = drive->hwif;
79         u8 mode = ide_find_dma_mode(drive, speed);
80
81         if (mode == 0) {
82                 if (hwif->pio_mask)
83                         mode = fls(hwif->pio_mask) - 1 + XFER_PIO_0;
84                 else
85                         mode = XFER_PIO_4;
86         }
87
88 /*      printk("%s: mode 0x%02x, speed 0x%02x\n", __func__, mode, speed); */
89
90         return min(speed, mode);
91 }
92
93 /*
94  * Standard (generic) timings for PIO modes, from ATA2 specification.
95  * These timings are for access to the IDE data port register *only*.
96  * Some drives may specify a mode, while also specifying a different
97  * value for cycle_time (from drive identification data).
98  */
99 const ide_pio_timings_t ide_pio_timings[6] = {
100         { 70,   165,    600 },  /* PIO Mode 0 */
101         { 50,   125,    383 },  /* PIO Mode 1 */
102         { 30,   100,    240 },  /* PIO Mode 2 */
103         { 30,   80,     180 },  /* PIO Mode 3 with IORDY */
104         { 25,   70,     120 },  /* PIO Mode 4 with IORDY */
105         { 20,   50,     100 }   /* PIO Mode 5 with IORDY (nonstandard) */
106 };
107
108 EXPORT_SYMBOL_GPL(ide_pio_timings);
109
110 /*
111  * Shared data/functions for determining best PIO mode for an IDE drive.
112  * Most of this stuff originally lived in cmd640.c, and changes to the
113  * ide_pio_blacklist[] table should be made with EXTREME CAUTION to avoid
114  * breaking the fragile cmd640.c support.
115  */
116
117 /*
118  * Black list. Some drives incorrectly report their maximal PIO mode,
119  * at least in respect to CMD640. Here we keep info on some known drives.
120  */
121 static struct ide_pio_info {
122         const char      *name;
123         int             pio;
124 } ide_pio_blacklist [] = {
125         { "Conner Peripherals 540MB - CFS540A", 3 },
126
127         { "WDC AC2700",  3 },
128         { "WDC AC2540",  3 },
129         { "WDC AC2420",  3 },
130         { "WDC AC2340",  3 },
131         { "WDC AC2250",  0 },
132         { "WDC AC2200",  0 },
133         { "WDC AC21200", 4 },
134         { "WDC AC2120",  0 },
135         { "WDC AC2850",  3 },
136         { "WDC AC1270",  3 },
137         { "WDC AC1170",  1 },
138         { "WDC AC1210",  1 },
139         { "WDC AC280",   0 },
140         { "WDC AC31000", 3 },
141         { "WDC AC31200", 3 },
142
143         { "Maxtor 7131 AT", 1 },
144         { "Maxtor 7171 AT", 1 },
145         { "Maxtor 7213 AT", 1 },
146         { "Maxtor 7245 AT", 1 },
147         { "Maxtor 7345 AT", 1 },
148         { "Maxtor 7546 AT", 3 },
149         { "Maxtor 7540 AV", 3 },
150
151         { "SAMSUNG SHD-3121A", 1 },
152         { "SAMSUNG SHD-3122A", 1 },
153         { "SAMSUNG SHD-3172A", 1 },
154
155         { "ST5660A",  3 },
156         { "ST3660A",  3 },
157         { "ST3630A",  3 },
158         { "ST3655A",  3 },
159         { "ST3391A",  3 },
160         { "ST3390A",  1 },
161         { "ST3600A",  1 },
162         { "ST3290A",  0 },
163         { "ST3144A",  0 },
164         { "ST3491A",  1 },      /* reports 3, should be 1 or 2 (depending on */ 
165                                 /* drive) according to Seagates FIND-ATA program */
166
167         { "QUANTUM ELS127A", 0 },
168         { "QUANTUM ELS170A", 0 },
169         { "QUANTUM LPS240A", 0 },
170         { "QUANTUM LPS210A", 3 },
171         { "QUANTUM LPS270A", 3 },
172         { "QUANTUM LPS365A", 3 },
173         { "QUANTUM LPS540A", 3 },
174         { "QUANTUM LIGHTNING 540A", 3 },
175         { "QUANTUM LIGHTNING 730A", 3 },
176
177         { "QUANTUM FIREBALL_540", 3 }, /* Older Quantum Fireballs don't work */
178         { "QUANTUM FIREBALL_640", 3 }, 
179         { "QUANTUM FIREBALL_1080", 3 },
180         { "QUANTUM FIREBALL_1280", 3 },
181         { NULL, 0 }
182 };
183
184 /**
185  *      ide_scan_pio_blacklist  -       check for a blacklisted drive
186  *      @model: Drive model string
187  *
188  *      This routine searches the ide_pio_blacklist for an entry
189  *      matching the start/whole of the supplied model name.
190  *
191  *      Returns -1 if no match found.
192  *      Otherwise returns the recommended PIO mode from ide_pio_blacklist[].
193  */
194
195 static int ide_scan_pio_blacklist (char *model)
196 {
197         struct ide_pio_info *p;
198
199         for (p = ide_pio_blacklist; p->name != NULL; p++) {
200                 if (strncmp(p->name, model, strlen(p->name)) == 0)
201                         return p->pio;
202         }
203         return -1;
204 }
205
206 unsigned int ide_pio_cycle_time(ide_drive_t *drive, u8 pio)
207 {
208         struct hd_driveid *id = drive->id;
209         int cycle_time = 0;
210
211         if (id->field_valid & 2) {
212                 if (id->capability & 8)
213                         cycle_time = id->eide_pio_iordy;
214                 else
215                         cycle_time = id->eide_pio;
216         }
217
218         /* conservative "downgrade" for all pre-ATA2 drives */
219         if (pio < 3) {
220                 if (cycle_time && cycle_time < ide_pio_timings[pio].cycle_time)
221                         cycle_time = 0; /* use standard timing */
222         }
223
224         return cycle_time ? cycle_time : ide_pio_timings[pio].cycle_time;
225 }
226
227 EXPORT_SYMBOL_GPL(ide_pio_cycle_time);
228
229 /**
230  *      ide_get_best_pio_mode   -       get PIO mode from drive
231  *      @drive: drive to consider
232  *      @mode_wanted: preferred mode
233  *      @max_mode: highest allowed mode
234  *
235  *      This routine returns the recommended PIO settings for a given drive,
236  *      based on the drive->id information and the ide_pio_blacklist[].
237  *
238  *      Drive PIO mode is auto-selected if 255 is passed as mode_wanted.
239  *      This is used by most chipset support modules when "auto-tuning".
240  */
241
242 u8 ide_get_best_pio_mode (ide_drive_t *drive, u8 mode_wanted, u8 max_mode)
243 {
244         int pio_mode;
245         struct hd_driveid* id = drive->id;
246         int overridden  = 0;
247
248         if (mode_wanted != 255)
249                 return min_t(u8, mode_wanted, max_mode);
250
251         if ((drive->hwif->host_flags & IDE_HFLAG_PIO_NO_BLACKLIST) == 0 &&
252             (pio_mode = ide_scan_pio_blacklist(id->model)) != -1) {
253                 printk(KERN_INFO "%s: is on PIO blacklist\n", drive->name);
254         } else {
255                 pio_mode = id->tPIO;
256                 if (pio_mode > 2) {     /* 2 is maximum allowed tPIO value */
257                         pio_mode = 2;
258                         overridden = 1;
259                 }
260                 if (id->field_valid & 2) {        /* drive implements ATA2? */
261                         if (id->capability & 8) { /* IORDY supported? */
262                                 if (id->eide_pio_modes & 7) {
263                                         overridden = 0;
264                                         if (id->eide_pio_modes & 4)
265                                                 pio_mode = 5;
266                                         else if (id->eide_pio_modes & 2)
267                                                 pio_mode = 4;
268                                         else
269                                                 pio_mode = 3;
270                                 }
271                         }
272                 }
273
274                 if (overridden)
275                         printk(KERN_INFO "%s: tPIO > 2, assuming tPIO = 2\n",
276                                          drive->name);
277         }
278
279         if (pio_mode > max_mode)
280                 pio_mode = max_mode;
281
282         return pio_mode;
283 }
284
285 EXPORT_SYMBOL_GPL(ide_get_best_pio_mode);
286
287 /* req_pio == "255" for auto-tune */
288 void ide_set_pio(ide_drive_t *drive, u8 req_pio)
289 {
290         ide_hwif_t *hwif = drive->hwif;
291         const struct ide_port_ops *port_ops = hwif->port_ops;
292         u8 host_pio, pio;
293
294         if (port_ops == NULL || port_ops->set_pio_mode == NULL ||
295             (hwif->host_flags & IDE_HFLAG_NO_SET_MODE))
296                 return;
297
298         BUG_ON(hwif->pio_mask == 0x00);
299
300         host_pio = fls(hwif->pio_mask) - 1;
301
302         pio = ide_get_best_pio_mode(drive, req_pio, host_pio);
303
304         /*
305          * TODO:
306          * - report device max PIO mode
307          * - check req_pio != 255 against device max PIO mode
308          */
309         printk(KERN_DEBUG "%s: host max PIO%d wanted PIO%d%s selected PIO%d\n",
310                           drive->name, host_pio, req_pio,
311                           req_pio == 255 ? "(auto-tune)" : "", pio);
312
313         (void)ide_set_pio_mode(drive, XFER_PIO_0 + pio);
314 }
315
316 EXPORT_SYMBOL_GPL(ide_set_pio);
317
318 /**
319  *      ide_toggle_bounce       -       handle bounce buffering
320  *      @drive: drive to update
321  *      @on: on/off boolean
322  *
323  *      Enable or disable bounce buffering for the device. Drives move
324  *      between PIO and DMA and that changes the rules we need.
325  */
326  
327 void ide_toggle_bounce(ide_drive_t *drive, int on)
328 {
329         u64 addr = BLK_BOUNCE_HIGH;     /* dma64_addr_t */
330
331         if (!PCI_DMA_BUS_IS_PHYS) {
332                 addr = BLK_BOUNCE_ANY;
333         } else if (on && drive->media == ide_disk) {
334                 struct device *dev = drive->hwif->dev;
335
336                 if (dev && dev->dma_mask)
337                         addr = *dev->dma_mask;
338         }
339
340         if (drive->queue)
341                 blk_queue_bounce_limit(drive->queue, addr);
342 }
343
344 int ide_set_pio_mode(ide_drive_t *drive, const u8 mode)
345 {
346         ide_hwif_t *hwif = drive->hwif;
347         const struct ide_port_ops *port_ops = hwif->port_ops;
348
349         if (hwif->host_flags & IDE_HFLAG_NO_SET_MODE)
350                 return 0;
351
352         if (port_ops == NULL || port_ops->set_pio_mode == NULL)
353                 return -1;
354
355         /*
356          * TODO: temporary hack for some legacy host drivers that didn't
357          * set transfer mode on the device in ->set_pio_mode method...
358          */
359         if (port_ops->set_dma_mode == NULL) {
360                 port_ops->set_pio_mode(drive, mode - XFER_PIO_0);
361                 return 0;
362         }
363
364         if (hwif->host_flags & IDE_HFLAG_POST_SET_MODE) {
365                 if (ide_config_drive_speed(drive, mode))
366                         return -1;
367                 port_ops->set_pio_mode(drive, mode - XFER_PIO_0);
368                 return 0;
369         } else {
370                 port_ops->set_pio_mode(drive, mode - XFER_PIO_0);
371                 return ide_config_drive_speed(drive, mode);
372         }
373 }
374
375 int ide_set_dma_mode(ide_drive_t *drive, const u8 mode)
376 {
377         ide_hwif_t *hwif = drive->hwif;
378         const struct ide_port_ops *port_ops = hwif->port_ops;
379
380         if (hwif->host_flags & IDE_HFLAG_NO_SET_MODE)
381                 return 0;
382
383         if (port_ops == NULL || port_ops->set_dma_mode == NULL)
384                 return -1;
385
386         if (hwif->host_flags & IDE_HFLAG_POST_SET_MODE) {
387                 if (ide_config_drive_speed(drive, mode))
388                         return -1;
389                 port_ops->set_dma_mode(drive, mode);
390                 return 0;
391         } else {
392                 port_ops->set_dma_mode(drive, mode);
393                 return ide_config_drive_speed(drive, mode);
394         }
395 }
396
397 EXPORT_SYMBOL_GPL(ide_set_dma_mode);
398
399 /**
400  *      ide_set_xfer_rate       -       set transfer rate
401  *      @drive: drive to set
402  *      @rate: speed to attempt to set
403  *      
404  *      General helper for setting the speed of an IDE device. This
405  *      function knows about user enforced limits from the configuration
406  *      which ->set_pio_mode/->set_dma_mode does not.
407  */
408
409 int ide_set_xfer_rate(ide_drive_t *drive, u8 rate)
410 {
411         ide_hwif_t *hwif = drive->hwif;
412         const struct ide_port_ops *port_ops = hwif->port_ops;
413
414         if (port_ops == NULL || port_ops->set_dma_mode == NULL ||
415             (hwif->host_flags & IDE_HFLAG_NO_SET_MODE))
416                 return -1;
417
418         rate = ide_rate_filter(drive, rate);
419
420         if (rate >= XFER_PIO_0 && rate <= XFER_PIO_5)
421                 return ide_set_pio_mode(drive, rate);
422
423         /*
424          * TODO: transfer modes 0x00-0x07 passed from the user-space are
425          * currently handled here which needs fixing (please note that such
426          * case could happen iff the transfer mode has already been set on
427          * the device by ide-proc.c::set_xfer_rate()).
428          */
429         if (rate < XFER_PIO_0) {
430                 if (hwif->host_flags & IDE_HFLAG_ABUSE_SET_DMA_MODE)
431                         return ide_set_dma_mode(drive, rate);
432                 else
433                         return ide_config_drive_speed(drive, rate);
434         }
435
436         return ide_set_dma_mode(drive, rate);
437 }
438
439 static void ide_dump_opcode(ide_drive_t *drive)
440 {
441         struct request *rq;
442         ide_task_t *task = NULL;
443
444         spin_lock(&ide_lock);
445         rq = NULL;
446         if (HWGROUP(drive))
447                 rq = HWGROUP(drive)->rq;
448         spin_unlock(&ide_lock);
449         if (!rq)
450                 return;
451
452         if (rq->cmd_type == REQ_TYPE_ATA_TASKFILE)
453                 task = rq->special;
454
455         printk("ide: failed opcode was: ");
456         if (task == NULL)
457                 printk(KERN_CONT "unknown\n");
458         else
459                 printk(KERN_CONT "0x%02x\n", task->tf.command);
460 }
461
462 u64 ide_get_lba_addr(struct ide_taskfile *tf, int lba48)
463 {
464         u32 high, low;
465
466         if (lba48)
467                 high = (tf->hob_lbah << 16) | (tf->hob_lbam << 8) |
468                         tf->hob_lbal;
469         else
470                 high = tf->device & 0xf;
471         low  = (tf->lbah << 16) | (tf->lbam << 8) | tf->lbal;
472
473         return ((u64)high << 24) | low;
474 }
475 EXPORT_SYMBOL_GPL(ide_get_lba_addr);
476
477 static void ide_dump_sector(ide_drive_t *drive)
478 {
479         ide_task_t task;
480         struct ide_taskfile *tf = &task.tf;
481         int lba48 = (drive->addressing == 1) ? 1 : 0;
482
483         memset(&task, 0, sizeof(task));
484         if (lba48)
485                 task.tf_flags = IDE_TFLAG_IN_LBA | IDE_TFLAG_IN_HOB_LBA |
486                                 IDE_TFLAG_LBA48;
487         else
488                 task.tf_flags = IDE_TFLAG_IN_LBA | IDE_TFLAG_IN_DEVICE;
489
490         drive->hwif->tf_read(drive, &task);
491
492         if (lba48 || (tf->device & ATA_LBA))
493                 printk(", LBAsect=%llu",
494                         (unsigned long long)ide_get_lba_addr(tf, lba48));
495         else
496                 printk(", CHS=%d/%d/%d", (tf->lbah << 8) + tf->lbam,
497                                          tf->device & 0xf, tf->lbal);
498 }
499
500 static void ide_dump_ata_error(ide_drive_t *drive, u8 err)
501 {
502         printk("{ ");
503         if (err & ABRT_ERR)     printk("DriveStatusError ");
504         if (err & ICRC_ERR)
505                 printk((err & ABRT_ERR) ? "BadCRC " : "BadSector ");
506         if (err & ECC_ERR)      printk("UncorrectableError ");
507         if (err & ID_ERR)       printk("SectorIdNotFound ");
508         if (err & TRK0_ERR)     printk("TrackZeroNotFound ");
509         if (err & MARK_ERR)     printk("AddrMarkNotFound ");
510         printk("}");
511         if ((err & (BBD_ERR | ABRT_ERR)) == BBD_ERR ||
512             (err & (ECC_ERR|ID_ERR|MARK_ERR))) {
513                 ide_dump_sector(drive);
514                 if (HWGROUP(drive) && HWGROUP(drive)->rq)
515                         printk(", sector=%llu",
516                                (unsigned long long)HWGROUP(drive)->rq->sector);
517         }
518         printk("\n");
519 }
520
521 static void ide_dump_atapi_error(ide_drive_t *drive, u8 err)
522 {
523         printk("{ ");
524         if (err & ILI_ERR)      printk("IllegalLengthIndication ");
525         if (err & EOM_ERR)      printk("EndOfMedia ");
526         if (err & ABRT_ERR)     printk("AbortedCommand ");
527         if (err & MCR_ERR)      printk("MediaChangeRequested ");
528         if (err & LFS_ERR)      printk("LastFailedSense=0x%02x ",
529                                        (err & LFS_ERR) >> 4);
530         printk("}\n");
531 }
532
533 /**
534  *      ide_dump_status         -       translate ATA/ATAPI error
535  *      @drive: drive that status applies to
536  *      @msg: text message to print
537  *      @stat: status byte to decode
538  *
539  *      Error reporting, in human readable form (luxurious, but a memory hog).
540  *      Combines the drive name, message and status byte to provide a
541  *      user understandable explanation of the device error.
542  */
543
544 u8 ide_dump_status(ide_drive_t *drive, const char *msg, u8 stat)
545 {
546         unsigned long flags;
547         u8 err = 0;
548
549         local_irq_save(flags);
550         printk("%s: %s: status=0x%02x { ", drive->name, msg, stat);
551         if (stat & BUSY_STAT)
552                 printk("Busy ");
553         else {
554                 if (stat & READY_STAT)  printk("DriveReady ");
555                 if (stat & WRERR_STAT)  printk("DeviceFault ");
556                 if (stat & SEEK_STAT)   printk("SeekComplete ");
557                 if (stat & DRQ_STAT)    printk("DataRequest ");
558                 if (stat & ECC_STAT)    printk("CorrectedError ");
559                 if (stat & INDEX_STAT)  printk("Index ");
560                 if (stat & ERR_STAT)    printk("Error ");
561         }
562         printk("}\n");
563         if ((stat & (BUSY_STAT|ERR_STAT)) == ERR_STAT) {
564                 err = ide_read_error(drive);
565                 printk("%s: %s: error=0x%02x ", drive->name, msg, err);
566                 if (drive->media == ide_disk)
567                         ide_dump_ata_error(drive, err);
568                 else
569                         ide_dump_atapi_error(drive, err);
570         }
571         ide_dump_opcode(drive);
572         local_irq_restore(flags);
573         return err;
574 }
575
576 EXPORT_SYMBOL(ide_dump_status);