2e022240051eb6ff069435457dd5750d0e2bd942
[linux-2.6.git] / drivers / scsi / libata-core.c
1 /*
2  *  libata-core.c - helper library for ATA
3  *
4  *  Maintained by:  Jeff Garzik <jgarzik@pobox.com>
5  *                  Please ALWAYS copy linux-ide@vger.kernel.org
6  *                  on emails.
7  *
8  *  Copyright 2003-2004 Red Hat, Inc.  All rights reserved.
9  *  Copyright 2003-2004 Jeff Garzik
10  *
11  *
12  *  This program is free software; you can redistribute it and/or modify
13  *  it under the terms of the GNU General Public License as published by
14  *  the Free Software Foundation; either version 2, or (at your option)
15  *  any later version.
16  *
17  *  This program is distributed in the hope that it will be useful,
18  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
19  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  *  GNU General Public License for more details.
21  *
22  *  You should have received a copy of the GNU General Public License
23  *  along with this program; see the file COPYING.  If not, write to
24  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
25  *
26  *
27  *  libata documentation is available via 'make {ps|pdf}docs',
28  *  as Documentation/DocBook/libata.*
29  *
30  *  Hardware documentation available from http://www.t13.org/ and
31  *  http://www.sata-io.org/
32  *
33  */
34
35 #include <linux/config.h>
36 #include <linux/kernel.h>
37 #include <linux/module.h>
38 #include <linux/pci.h>
39 #include <linux/init.h>
40 #include <linux/list.h>
41 #include <linux/mm.h>
42 #include <linux/highmem.h>
43 #include <linux/spinlock.h>
44 #include <linux/blkdev.h>
45 #include <linux/delay.h>
46 #include <linux/timer.h>
47 #include <linux/interrupt.h>
48 #include <linux/completion.h>
49 #include <linux/suspend.h>
50 #include <linux/workqueue.h>
51 #include <linux/jiffies.h>
52 #include <linux/scatterlist.h>
53 #include <scsi/scsi.h>
54 #include "scsi.h"
55 #include "scsi_priv.h"
56 #include <scsi/scsi_host.h>
57 #include <linux/libata.h>
58 #include <asm/io.h>
59 #include <asm/semaphore.h>
60 #include <asm/byteorder.h>
61
62 #include "libata.h"
63
64 static unsigned int ata_busy_sleep (struct ata_port *ap,
65                                     unsigned long tmout_pat,
66                                     unsigned long tmout);
67 static void ata_dev_reread_id(struct ata_port *ap, struct ata_device *dev);
68 static void ata_dev_init_params(struct ata_port *ap, struct ata_device *dev);
69 static void ata_set_mode(struct ata_port *ap);
70 static void ata_dev_set_xfermode(struct ata_port *ap, struct ata_device *dev);
71 static unsigned int ata_get_mode_mask(const struct ata_port *ap, int shift);
72 static int fgb(u32 bitmap);
73 static int ata_choose_xfer_mode(const struct ata_port *ap,
74                                 u8 *xfer_mode_out,
75                                 unsigned int *xfer_shift_out);
76 static void __ata_qc_complete(struct ata_queued_cmd *qc);
77
78 static unsigned int ata_unique_id = 1;
79 static struct workqueue_struct *ata_wq;
80
81 int atapi_enabled = 0;
82 module_param(atapi_enabled, int, 0444);
83 MODULE_PARM_DESC(atapi_enabled, "Enable discovery of ATAPI devices (0=off, 1=on)");
84
85 MODULE_AUTHOR("Jeff Garzik");
86 MODULE_DESCRIPTION("Library module for ATA devices");
87 MODULE_LICENSE("GPL");
88 MODULE_VERSION(DRV_VERSION);
89
90 /**
91  *      ata_tf_load_pio - send taskfile registers to host controller
92  *      @ap: Port to which output is sent
93  *      @tf: ATA taskfile register set
94  *
95  *      Outputs ATA taskfile to standard ATA host controller.
96  *
97  *      LOCKING:
98  *      Inherited from caller.
99  */
100
101 static void ata_tf_load_pio(struct ata_port *ap, const struct ata_taskfile *tf)
102 {
103         struct ata_ioports *ioaddr = &ap->ioaddr;
104         unsigned int is_addr = tf->flags & ATA_TFLAG_ISADDR;
105
106         if (tf->ctl != ap->last_ctl) {
107                 outb(tf->ctl, ioaddr->ctl_addr);
108                 ap->last_ctl = tf->ctl;
109                 ata_wait_idle(ap);
110         }
111
112         if (is_addr && (tf->flags & ATA_TFLAG_LBA48)) {
113                 outb(tf->hob_feature, ioaddr->feature_addr);
114                 outb(tf->hob_nsect, ioaddr->nsect_addr);
115                 outb(tf->hob_lbal, ioaddr->lbal_addr);
116                 outb(tf->hob_lbam, ioaddr->lbam_addr);
117                 outb(tf->hob_lbah, ioaddr->lbah_addr);
118                 VPRINTK("hob: feat 0x%X nsect 0x%X, lba 0x%X 0x%X 0x%X\n",
119                         tf->hob_feature,
120                         tf->hob_nsect,
121                         tf->hob_lbal,
122                         tf->hob_lbam,
123                         tf->hob_lbah);
124         }
125
126         if (is_addr) {
127                 outb(tf->feature, ioaddr->feature_addr);
128                 outb(tf->nsect, ioaddr->nsect_addr);
129                 outb(tf->lbal, ioaddr->lbal_addr);
130                 outb(tf->lbam, ioaddr->lbam_addr);
131                 outb(tf->lbah, ioaddr->lbah_addr);
132                 VPRINTK("feat 0x%X nsect 0x%X lba 0x%X 0x%X 0x%X\n",
133                         tf->feature,
134                         tf->nsect,
135                         tf->lbal,
136                         tf->lbam,
137                         tf->lbah);
138         }
139
140         if (tf->flags & ATA_TFLAG_DEVICE) {
141                 outb(tf->device, ioaddr->device_addr);
142                 VPRINTK("device 0x%X\n", tf->device);
143         }
144
145         ata_wait_idle(ap);
146 }
147
148 /**
149  *      ata_tf_load_mmio - send taskfile registers to host controller
150  *      @ap: Port to which output is sent
151  *      @tf: ATA taskfile register set
152  *
153  *      Outputs ATA taskfile to standard ATA host controller using MMIO.
154  *
155  *      LOCKING:
156  *      Inherited from caller.
157  */
158
159 static void ata_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
160 {
161         struct ata_ioports *ioaddr = &ap->ioaddr;
162         unsigned int is_addr = tf->flags & ATA_TFLAG_ISADDR;
163
164         if (tf->ctl != ap->last_ctl) {
165                 writeb(tf->ctl, (void __iomem *) ap->ioaddr.ctl_addr);
166                 ap->last_ctl = tf->ctl;
167                 ata_wait_idle(ap);
168         }
169
170         if (is_addr && (tf->flags & ATA_TFLAG_LBA48)) {
171                 writeb(tf->hob_feature, (void __iomem *) ioaddr->feature_addr);
172                 writeb(tf->hob_nsect, (void __iomem *) ioaddr->nsect_addr);
173                 writeb(tf->hob_lbal, (void __iomem *) ioaddr->lbal_addr);
174                 writeb(tf->hob_lbam, (void __iomem *) ioaddr->lbam_addr);
175                 writeb(tf->hob_lbah, (void __iomem *) ioaddr->lbah_addr);
176                 VPRINTK("hob: feat 0x%X nsect 0x%X, lba 0x%X 0x%X 0x%X\n",
177                         tf->hob_feature,
178                         tf->hob_nsect,
179                         tf->hob_lbal,
180                         tf->hob_lbam,
181                         tf->hob_lbah);
182         }
183
184         if (is_addr) {
185                 writeb(tf->feature, (void __iomem *) ioaddr->feature_addr);
186                 writeb(tf->nsect, (void __iomem *) ioaddr->nsect_addr);
187                 writeb(tf->lbal, (void __iomem *) ioaddr->lbal_addr);
188                 writeb(tf->lbam, (void __iomem *) ioaddr->lbam_addr);
189                 writeb(tf->lbah, (void __iomem *) ioaddr->lbah_addr);
190                 VPRINTK("feat 0x%X nsect 0x%X lba 0x%X 0x%X 0x%X\n",
191                         tf->feature,
192                         tf->nsect,
193                         tf->lbal,
194                         tf->lbam,
195                         tf->lbah);
196         }
197
198         if (tf->flags & ATA_TFLAG_DEVICE) {
199                 writeb(tf->device, (void __iomem *) ioaddr->device_addr);
200                 VPRINTK("device 0x%X\n", tf->device);
201         }
202
203         ata_wait_idle(ap);
204 }
205
206
207 /**
208  *      ata_tf_load - send taskfile registers to host controller
209  *      @ap: Port to which output is sent
210  *      @tf: ATA taskfile register set
211  *
212  *      Outputs ATA taskfile to standard ATA host controller using MMIO
213  *      or PIO as indicated by the ATA_FLAG_MMIO flag.
214  *      Writes the control, feature, nsect, lbal, lbam, and lbah registers.
215  *      Optionally (ATA_TFLAG_LBA48) writes hob_feature, hob_nsect,
216  *      hob_lbal, hob_lbam, and hob_lbah.
217  *
218  *      This function waits for idle (!BUSY and !DRQ) after writing
219  *      registers.  If the control register has a new value, this
220  *      function also waits for idle after writing control and before
221  *      writing the remaining registers.
222  *
223  *      May be used as the tf_load() entry in ata_port_operations.
224  *
225  *      LOCKING:
226  *      Inherited from caller.
227  */
228 void ata_tf_load(struct ata_port *ap, const struct ata_taskfile *tf)
229 {
230         if (ap->flags & ATA_FLAG_MMIO)
231                 ata_tf_load_mmio(ap, tf);
232         else
233                 ata_tf_load_pio(ap, tf);
234 }
235
236 /**
237  *      ata_exec_command_pio - issue ATA command to host controller
238  *      @ap: port to which command is being issued
239  *      @tf: ATA taskfile register set
240  *
241  *      Issues PIO write to ATA command register, with proper
242  *      synchronization with interrupt handler / other threads.
243  *
244  *      LOCKING:
245  *      spin_lock_irqsave(host_set lock)
246  */
247
248 static void ata_exec_command_pio(struct ata_port *ap, const struct ata_taskfile *tf)
249 {
250         DPRINTK("ata%u: cmd 0x%X\n", ap->id, tf->command);
251
252         outb(tf->command, ap->ioaddr.command_addr);
253         ata_pause(ap);
254 }
255
256
257 /**
258  *      ata_exec_command_mmio - issue ATA command to host controller
259  *      @ap: port to which command is being issued
260  *      @tf: ATA taskfile register set
261  *
262  *      Issues MMIO write to ATA command register, with proper
263  *      synchronization with interrupt handler / other threads.
264  *
265  *      LOCKING:
266  *      spin_lock_irqsave(host_set lock)
267  */
268
269 static void ata_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
270 {
271         DPRINTK("ata%u: cmd 0x%X\n", ap->id, tf->command);
272
273         writeb(tf->command, (void __iomem *) ap->ioaddr.command_addr);
274         ata_pause(ap);
275 }
276
277
278 /**
279  *      ata_exec_command - issue ATA command to host controller
280  *      @ap: port to which command is being issued
281  *      @tf: ATA taskfile register set
282  *
283  *      Issues PIO/MMIO write to ATA command register, with proper
284  *      synchronization with interrupt handler / other threads.
285  *
286  *      LOCKING:
287  *      spin_lock_irqsave(host_set lock)
288  */
289 void ata_exec_command(struct ata_port *ap, const struct ata_taskfile *tf)
290 {
291         if (ap->flags & ATA_FLAG_MMIO)
292                 ata_exec_command_mmio(ap, tf);
293         else
294                 ata_exec_command_pio(ap, tf);
295 }
296
297 /**
298  *      ata_exec - issue ATA command to host controller
299  *      @ap: port to which command is being issued
300  *      @tf: ATA taskfile register set
301  *
302  *      Issues PIO/MMIO write to ATA command register, with proper
303  *      synchronization with interrupt handler / other threads.
304  *
305  *      LOCKING:
306  *      Obtains host_set lock.
307  */
308
309 static inline void ata_exec(struct ata_port *ap, const struct ata_taskfile *tf)
310 {
311         unsigned long flags;
312
313         DPRINTK("ata%u: cmd 0x%X\n", ap->id, tf->command);
314         spin_lock_irqsave(&ap->host_set->lock, flags);
315         ap->ops->exec_command(ap, tf);
316         spin_unlock_irqrestore(&ap->host_set->lock, flags);
317 }
318
319 /**
320  *      ata_tf_to_host - issue ATA taskfile to host controller
321  *      @ap: port to which command is being issued
322  *      @tf: ATA taskfile register set
323  *
324  *      Issues ATA taskfile register set to ATA host controller,
325  *      with proper synchronization with interrupt handler and
326  *      other threads.
327  *
328  *      LOCKING:
329  *      Obtains host_set lock.
330  */
331
332 static void ata_tf_to_host(struct ata_port *ap, const struct ata_taskfile *tf)
333 {
334         ap->ops->tf_load(ap, tf);
335
336         ata_exec(ap, tf);
337 }
338
339 /**
340  *      ata_tf_to_host_nolock - issue ATA taskfile to host controller
341  *      @ap: port to which command is being issued
342  *      @tf: ATA taskfile register set
343  *
344  *      Issues ATA taskfile register set to ATA host controller,
345  *      with proper synchronization with interrupt handler and
346  *      other threads.
347  *
348  *      LOCKING:
349  *      spin_lock_irqsave(host_set lock)
350  */
351
352 void ata_tf_to_host_nolock(struct ata_port *ap, const struct ata_taskfile *tf)
353 {
354         ap->ops->tf_load(ap, tf);
355         ap->ops->exec_command(ap, tf);
356 }
357
358 /**
359  *      ata_tf_read_pio - input device's ATA taskfile shadow registers
360  *      @ap: Port from which input is read
361  *      @tf: ATA taskfile register set for storing input
362  *
363  *      Reads ATA taskfile registers for currently-selected device
364  *      into @tf.
365  *
366  *      LOCKING:
367  *      Inherited from caller.
368  */
369
370 static void ata_tf_read_pio(struct ata_port *ap, struct ata_taskfile *tf)
371 {
372         struct ata_ioports *ioaddr = &ap->ioaddr;
373
374         tf->command = ata_check_status(ap);
375         tf->feature = inb(ioaddr->error_addr);
376         tf->nsect = inb(ioaddr->nsect_addr);
377         tf->lbal = inb(ioaddr->lbal_addr);
378         tf->lbam = inb(ioaddr->lbam_addr);
379         tf->lbah = inb(ioaddr->lbah_addr);
380         tf->device = inb(ioaddr->device_addr);
381
382         if (tf->flags & ATA_TFLAG_LBA48) {
383                 outb(tf->ctl | ATA_HOB, ioaddr->ctl_addr);
384                 tf->hob_feature = inb(ioaddr->error_addr);
385                 tf->hob_nsect = inb(ioaddr->nsect_addr);
386                 tf->hob_lbal = inb(ioaddr->lbal_addr);
387                 tf->hob_lbam = inb(ioaddr->lbam_addr);
388                 tf->hob_lbah = inb(ioaddr->lbah_addr);
389         }
390 }
391
392 /**
393  *      ata_tf_read_mmio - input device's ATA taskfile shadow registers
394  *      @ap: Port from which input is read
395  *      @tf: ATA taskfile register set for storing input
396  *
397  *      Reads ATA taskfile registers for currently-selected device
398  *      into @tf via MMIO.
399  *
400  *      LOCKING:
401  *      Inherited from caller.
402  */
403
404 static void ata_tf_read_mmio(struct ata_port *ap, struct ata_taskfile *tf)
405 {
406         struct ata_ioports *ioaddr = &ap->ioaddr;
407
408         tf->command = ata_check_status(ap);
409         tf->feature = readb((void __iomem *)ioaddr->error_addr);
410         tf->nsect = readb((void __iomem *)ioaddr->nsect_addr);
411         tf->lbal = readb((void __iomem *)ioaddr->lbal_addr);
412         tf->lbam = readb((void __iomem *)ioaddr->lbam_addr);
413         tf->lbah = readb((void __iomem *)ioaddr->lbah_addr);
414         tf->device = readb((void __iomem *)ioaddr->device_addr);
415
416         if (tf->flags & ATA_TFLAG_LBA48) {
417                 writeb(tf->ctl | ATA_HOB, (void __iomem *) ap->ioaddr.ctl_addr);
418                 tf->hob_feature = readb((void __iomem *)ioaddr->error_addr);
419                 tf->hob_nsect = readb((void __iomem *)ioaddr->nsect_addr);
420                 tf->hob_lbal = readb((void __iomem *)ioaddr->lbal_addr);
421                 tf->hob_lbam = readb((void __iomem *)ioaddr->lbam_addr);
422                 tf->hob_lbah = readb((void __iomem *)ioaddr->lbah_addr);
423         }
424 }
425
426
427 /**
428  *      ata_tf_read - input device's ATA taskfile shadow registers
429  *      @ap: Port from which input is read
430  *      @tf: ATA taskfile register set for storing input
431  *
432  *      Reads ATA taskfile registers for currently-selected device
433  *      into @tf.
434  *
435  *      Reads nsect, lbal, lbam, lbah, and device.  If ATA_TFLAG_LBA48
436  *      is set, also reads the hob registers.
437  *
438  *      May be used as the tf_read() entry in ata_port_operations.
439  *
440  *      LOCKING:
441  *      Inherited from caller.
442  */
443 void ata_tf_read(struct ata_port *ap, struct ata_taskfile *tf)
444 {
445         if (ap->flags & ATA_FLAG_MMIO)
446                 ata_tf_read_mmio(ap, tf);
447         else
448                 ata_tf_read_pio(ap, tf);
449 }
450
451 /**
452  *      ata_check_status_pio - Read device status reg & clear interrupt
453  *      @ap: port where the device is
454  *
455  *      Reads ATA taskfile status register for currently-selected device
456  *      and return its value. This also clears pending interrupts
457  *      from this device
458  *
459  *      LOCKING:
460  *      Inherited from caller.
461  */
462 static u8 ata_check_status_pio(struct ata_port *ap)
463 {
464         return inb(ap->ioaddr.status_addr);
465 }
466
467 /**
468  *      ata_check_status_mmio - Read device status reg & clear interrupt
469  *      @ap: port where the device is
470  *
471  *      Reads ATA taskfile status register for currently-selected device
472  *      via MMIO and return its value. This also clears pending interrupts
473  *      from this device
474  *
475  *      LOCKING:
476  *      Inherited from caller.
477  */
478 static u8 ata_check_status_mmio(struct ata_port *ap)
479 {
480         return readb((void __iomem *) ap->ioaddr.status_addr);
481 }
482
483
484 /**
485  *      ata_check_status - Read device status reg & clear interrupt
486  *      @ap: port where the device is
487  *
488  *      Reads ATA taskfile status register for currently-selected device
489  *      and return its value. This also clears pending interrupts
490  *      from this device
491  *
492  *      May be used as the check_status() entry in ata_port_operations.
493  *
494  *      LOCKING:
495  *      Inherited from caller.
496  */
497 u8 ata_check_status(struct ata_port *ap)
498 {
499         if (ap->flags & ATA_FLAG_MMIO)
500                 return ata_check_status_mmio(ap);
501         return ata_check_status_pio(ap);
502 }
503
504
505 /**
506  *      ata_altstatus - Read device alternate status reg
507  *      @ap: port where the device is
508  *
509  *      Reads ATA taskfile alternate status register for
510  *      currently-selected device and return its value.
511  *
512  *      Note: may NOT be used as the check_altstatus() entry in
513  *      ata_port_operations.
514  *
515  *      LOCKING:
516  *      Inherited from caller.
517  */
518 u8 ata_altstatus(struct ata_port *ap)
519 {
520         if (ap->ops->check_altstatus)
521                 return ap->ops->check_altstatus(ap);
522
523         if (ap->flags & ATA_FLAG_MMIO)
524                 return readb((void __iomem *)ap->ioaddr.altstatus_addr);
525         return inb(ap->ioaddr.altstatus_addr);
526 }
527
528
529 /**
530  *      ata_tf_to_fis - Convert ATA taskfile to SATA FIS structure
531  *      @tf: Taskfile to convert
532  *      @fis: Buffer into which data will output
533  *      @pmp: Port multiplier port
534  *
535  *      Converts a standard ATA taskfile to a Serial ATA
536  *      FIS structure (Register - Host to Device).
537  *
538  *      LOCKING:
539  *      Inherited from caller.
540  */
541
542 void ata_tf_to_fis(const struct ata_taskfile *tf, u8 *fis, u8 pmp)
543 {
544         fis[0] = 0x27;  /* Register - Host to Device FIS */
545         fis[1] = (pmp & 0xf) | (1 << 7); /* Port multiplier number,
546                                             bit 7 indicates Command FIS */
547         fis[2] = tf->command;
548         fis[3] = tf->feature;
549
550         fis[4] = tf->lbal;
551         fis[5] = tf->lbam;
552         fis[6] = tf->lbah;
553         fis[7] = tf->device;
554
555         fis[8] = tf->hob_lbal;
556         fis[9] = tf->hob_lbam;
557         fis[10] = tf->hob_lbah;
558         fis[11] = tf->hob_feature;
559
560         fis[12] = tf->nsect;
561         fis[13] = tf->hob_nsect;
562         fis[14] = 0;
563         fis[15] = tf->ctl;
564
565         fis[16] = 0;
566         fis[17] = 0;
567         fis[18] = 0;
568         fis[19] = 0;
569 }
570
571 /**
572  *      ata_tf_from_fis - Convert SATA FIS to ATA taskfile
573  *      @fis: Buffer from which data will be input
574  *      @tf: Taskfile to output
575  *
576  *      Converts a standard ATA taskfile to a Serial ATA
577  *      FIS structure (Register - Host to Device).
578  *
579  *      LOCKING:
580  *      Inherited from caller.
581  */
582
583 void ata_tf_from_fis(const u8 *fis, struct ata_taskfile *tf)
584 {
585         tf->command     = fis[2];       /* status */
586         tf->feature     = fis[3];       /* error */
587
588         tf->lbal        = fis[4];
589         tf->lbam        = fis[5];
590         tf->lbah        = fis[6];
591         tf->device      = fis[7];
592
593         tf->hob_lbal    = fis[8];
594         tf->hob_lbam    = fis[9];
595         tf->hob_lbah    = fis[10];
596
597         tf->nsect       = fis[12];
598         tf->hob_nsect   = fis[13];
599 }
600
601 static const u8 ata_rw_cmds[] = {
602         /* pio multi */
603         ATA_CMD_READ_MULTI,
604         ATA_CMD_WRITE_MULTI,
605         ATA_CMD_READ_MULTI_EXT,
606         ATA_CMD_WRITE_MULTI_EXT,
607         /* pio */
608         ATA_CMD_PIO_READ,
609         ATA_CMD_PIO_WRITE,
610         ATA_CMD_PIO_READ_EXT,
611         ATA_CMD_PIO_WRITE_EXT,
612         /* dma */
613         ATA_CMD_READ,
614         ATA_CMD_WRITE,
615         ATA_CMD_READ_EXT,
616         ATA_CMD_WRITE_EXT
617 };
618
619 /**
620  *      ata_rwcmd_protocol - set taskfile r/w commands and protocol
621  *      @qc: command to examine and configure
622  *
623  *      Examine the device configuration and tf->flags to calculate 
624  *      the proper read/write commands and protocol to use.
625  *
626  *      LOCKING:
627  *      caller.
628  */
629 void ata_rwcmd_protocol(struct ata_queued_cmd *qc)
630 {
631         struct ata_taskfile *tf = &qc->tf;
632         struct ata_device *dev = qc->dev;
633
634         int index, lba48, write;
635  
636         lba48 = (tf->flags & ATA_TFLAG_LBA48) ? 2 : 0;
637         write = (tf->flags & ATA_TFLAG_WRITE) ? 1 : 0;
638
639         if (dev->flags & ATA_DFLAG_PIO) {
640                 tf->protocol = ATA_PROT_PIO;
641                 index = dev->multi_count ? 0 : 4;
642         } else {
643                 tf->protocol = ATA_PROT_DMA;
644                 index = 8;
645         }
646
647         tf->command = ata_rw_cmds[index + lba48 + write];
648 }
649
650 static const char * xfer_mode_str[] = {
651         "UDMA/16",
652         "UDMA/25",
653         "UDMA/33",
654         "UDMA/44",
655         "UDMA/66",
656         "UDMA/100",
657         "UDMA/133",
658         "UDMA7",
659         "MWDMA0",
660         "MWDMA1",
661         "MWDMA2",
662         "PIO0",
663         "PIO1",
664         "PIO2",
665         "PIO3",
666         "PIO4",
667 };
668
669 /**
670  *      ata_udma_string - convert UDMA bit offset to string
671  *      @mask: mask of bits supported; only highest bit counts.
672  *
673  *      Determine string which represents the highest speed
674  *      (highest bit in @udma_mask).
675  *
676  *      LOCKING:
677  *      None.
678  *
679  *      RETURNS:
680  *      Constant C string representing highest speed listed in
681  *      @udma_mask, or the constant C string "<n/a>".
682  */
683
684 static const char *ata_mode_string(unsigned int mask)
685 {
686         int i;
687
688         for (i = 7; i >= 0; i--)
689                 if (mask & (1 << i))
690                         goto out;
691         for (i = ATA_SHIFT_MWDMA + 2; i >= ATA_SHIFT_MWDMA; i--)
692                 if (mask & (1 << i))
693                         goto out;
694         for (i = ATA_SHIFT_PIO + 4; i >= ATA_SHIFT_PIO; i--)
695                 if (mask & (1 << i))
696                         goto out;
697
698         return "<n/a>";
699
700 out:
701         return xfer_mode_str[i];
702 }
703
704 /**
705  *      ata_pio_devchk - PATA device presence detection
706  *      @ap: ATA channel to examine
707  *      @device: Device to examine (starting at zero)
708  *
709  *      This technique was originally described in
710  *      Hale Landis's ATADRVR (www.ata-atapi.com), and
711  *      later found its way into the ATA/ATAPI spec.
712  *
713  *      Write a pattern to the ATA shadow registers,
714  *      and if a device is present, it will respond by
715  *      correctly storing and echoing back the
716  *      ATA shadow register contents.
717  *
718  *      LOCKING:
719  *      caller.
720  */
721
722 static unsigned int ata_pio_devchk(struct ata_port *ap,
723                                    unsigned int device)
724 {
725         struct ata_ioports *ioaddr = &ap->ioaddr;
726         u8 nsect, lbal;
727
728         ap->ops->dev_select(ap, device);
729
730         outb(0x55, ioaddr->nsect_addr);
731         outb(0xaa, ioaddr->lbal_addr);
732
733         outb(0xaa, ioaddr->nsect_addr);
734         outb(0x55, ioaddr->lbal_addr);
735
736         outb(0x55, ioaddr->nsect_addr);
737         outb(0xaa, ioaddr->lbal_addr);
738
739         nsect = inb(ioaddr->nsect_addr);
740         lbal = inb(ioaddr->lbal_addr);
741
742         if ((nsect == 0x55) && (lbal == 0xaa))
743                 return 1;       /* we found a device */
744
745         return 0;               /* nothing found */
746 }
747
748 /**
749  *      ata_mmio_devchk - PATA device presence detection
750  *      @ap: ATA channel to examine
751  *      @device: Device to examine (starting at zero)
752  *
753  *      This technique was originally described in
754  *      Hale Landis's ATADRVR (www.ata-atapi.com), and
755  *      later found its way into the ATA/ATAPI spec.
756  *
757  *      Write a pattern to the ATA shadow registers,
758  *      and if a device is present, it will respond by
759  *      correctly storing and echoing back the
760  *      ATA shadow register contents.
761  *
762  *      LOCKING:
763  *      caller.
764  */
765
766 static unsigned int ata_mmio_devchk(struct ata_port *ap,
767                                     unsigned int device)
768 {
769         struct ata_ioports *ioaddr = &ap->ioaddr;
770         u8 nsect, lbal;
771
772         ap->ops->dev_select(ap, device);
773
774         writeb(0x55, (void __iomem *) ioaddr->nsect_addr);
775         writeb(0xaa, (void __iomem *) ioaddr->lbal_addr);
776
777         writeb(0xaa, (void __iomem *) ioaddr->nsect_addr);
778         writeb(0x55, (void __iomem *) ioaddr->lbal_addr);
779
780         writeb(0x55, (void __iomem *) ioaddr->nsect_addr);
781         writeb(0xaa, (void __iomem *) ioaddr->lbal_addr);
782
783         nsect = readb((void __iomem *) ioaddr->nsect_addr);
784         lbal = readb((void __iomem *) ioaddr->lbal_addr);
785
786         if ((nsect == 0x55) && (lbal == 0xaa))
787                 return 1;       /* we found a device */
788
789         return 0;               /* nothing found */
790 }
791
792 /**
793  *      ata_devchk - PATA device presence detection
794  *      @ap: ATA channel to examine
795  *      @device: Device to examine (starting at zero)
796  *
797  *      Dispatch ATA device presence detection, depending
798  *      on whether we are using PIO or MMIO to talk to the
799  *      ATA shadow registers.
800  *
801  *      LOCKING:
802  *      caller.
803  */
804
805 static unsigned int ata_devchk(struct ata_port *ap,
806                                     unsigned int device)
807 {
808         if (ap->flags & ATA_FLAG_MMIO)
809                 return ata_mmio_devchk(ap, device);
810         return ata_pio_devchk(ap, device);
811 }
812
813 /**
814  *      ata_dev_classify - determine device type based on ATA-spec signature
815  *      @tf: ATA taskfile register set for device to be identified
816  *
817  *      Determine from taskfile register contents whether a device is
818  *      ATA or ATAPI, as per "Signature and persistence" section
819  *      of ATA/PI spec (volume 1, sect 5.14).
820  *
821  *      LOCKING:
822  *      None.
823  *
824  *      RETURNS:
825  *      Device type, %ATA_DEV_ATA, %ATA_DEV_ATAPI, or %ATA_DEV_UNKNOWN
826  *      the event of failure.
827  */
828
829 unsigned int ata_dev_classify(const struct ata_taskfile *tf)
830 {
831         /* Apple's open source Darwin code hints that some devices only
832          * put a proper signature into the LBA mid/high registers,
833          * So, we only check those.  It's sufficient for uniqueness.
834          */
835
836         if (((tf->lbam == 0) && (tf->lbah == 0)) ||
837             ((tf->lbam == 0x3c) && (tf->lbah == 0xc3))) {
838                 DPRINTK("found ATA device by sig\n");
839                 return ATA_DEV_ATA;
840         }
841
842         if (((tf->lbam == 0x14) && (tf->lbah == 0xeb)) ||
843             ((tf->lbam == 0x69) && (tf->lbah == 0x96))) {
844                 DPRINTK("found ATAPI device by sig\n");
845                 return ATA_DEV_ATAPI;
846         }
847
848         DPRINTK("unknown device\n");
849         return ATA_DEV_UNKNOWN;
850 }
851
852 /**
853  *      ata_dev_try_classify - Parse returned ATA device signature
854  *      @ap: ATA channel to examine
855  *      @device: Device to examine (starting at zero)
856  *
857  *      After an event -- SRST, E.D.D., or SATA COMRESET -- occurs,
858  *      an ATA/ATAPI-defined set of values is placed in the ATA
859  *      shadow registers, indicating the results of device detection
860  *      and diagnostics.
861  *
862  *      Select the ATA device, and read the values from the ATA shadow
863  *      registers.  Then parse according to the Error register value,
864  *      and the spec-defined values examined by ata_dev_classify().
865  *
866  *      LOCKING:
867  *      caller.
868  */
869
870 static u8 ata_dev_try_classify(struct ata_port *ap, unsigned int device)
871 {
872         struct ata_device *dev = &ap->device[device];
873         struct ata_taskfile tf;
874         unsigned int class;
875         u8 err;
876
877         ap->ops->dev_select(ap, device);
878
879         memset(&tf, 0, sizeof(tf));
880
881         ap->ops->tf_read(ap, &tf);
882         err = tf.feature;
883
884         dev->class = ATA_DEV_NONE;
885
886         /* see if device passed diags */
887         if (err == 1)
888                 /* do nothing */ ;
889         else if ((device == 0) && (err == 0x81))
890                 /* do nothing */ ;
891         else
892                 return err;
893
894         /* determine if device if ATA or ATAPI */
895         class = ata_dev_classify(&tf);
896         if (class == ATA_DEV_UNKNOWN)
897                 return err;
898         if ((class == ATA_DEV_ATA) && (ata_chk_status(ap) == 0))
899                 return err;
900
901         dev->class = class;
902
903         return err;
904 }
905
906 /**
907  *      ata_dev_id_string - Convert IDENTIFY DEVICE page into string
908  *      @id: IDENTIFY DEVICE results we will examine
909  *      @s: string into which data is output
910  *      @ofs: offset into identify device page
911  *      @len: length of string to return. must be an even number.
912  *
913  *      The strings in the IDENTIFY DEVICE page are broken up into
914  *      16-bit chunks.  Run through the string, and output each
915  *      8-bit chunk linearly, regardless of platform.
916  *
917  *      LOCKING:
918  *      caller.
919  */
920
921 void ata_dev_id_string(const u16 *id, unsigned char *s,
922                        unsigned int ofs, unsigned int len)
923 {
924         unsigned int c;
925
926         while (len > 0) {
927                 c = id[ofs] >> 8;
928                 *s = c;
929                 s++;
930
931                 c = id[ofs] & 0xff;
932                 *s = c;
933                 s++;
934
935                 ofs++;
936                 len -= 2;
937         }
938 }
939
940
941 /**
942  *      ata_noop_dev_select - Select device 0/1 on ATA bus
943  *      @ap: ATA channel to manipulate
944  *      @device: ATA device (numbered from zero) to select
945  *
946  *      This function performs no actual function.
947  *
948  *      May be used as the dev_select() entry in ata_port_operations.
949  *
950  *      LOCKING:
951  *      caller.
952  */
953 void ata_noop_dev_select (struct ata_port *ap, unsigned int device)
954 {
955 }
956
957
958 /**
959  *      ata_std_dev_select - Select device 0/1 on ATA bus
960  *      @ap: ATA channel to manipulate
961  *      @device: ATA device (numbered from zero) to select
962  *
963  *      Use the method defined in the ATA specification to
964  *      make either device 0, or device 1, active on the
965  *      ATA channel.  Works with both PIO and MMIO.
966  *
967  *      May be used as the dev_select() entry in ata_port_operations.
968  *
969  *      LOCKING:
970  *      caller.
971  */
972
973 void ata_std_dev_select (struct ata_port *ap, unsigned int device)
974 {
975         u8 tmp;
976
977         if (device == 0)
978                 tmp = ATA_DEVICE_OBS;
979         else
980                 tmp = ATA_DEVICE_OBS | ATA_DEV1;
981
982         if (ap->flags & ATA_FLAG_MMIO) {
983                 writeb(tmp, (void __iomem *) ap->ioaddr.device_addr);
984         } else {
985                 outb(tmp, ap->ioaddr.device_addr);
986         }
987         ata_pause(ap);          /* needed; also flushes, for mmio */
988 }
989
990 /**
991  *      ata_dev_select - Select device 0/1 on ATA bus
992  *      @ap: ATA channel to manipulate
993  *      @device: ATA device (numbered from zero) to select
994  *      @wait: non-zero to wait for Status register BSY bit to clear
995  *      @can_sleep: non-zero if context allows sleeping
996  *
997  *      Use the method defined in the ATA specification to
998  *      make either device 0, or device 1, active on the
999  *      ATA channel.
1000  *
1001  *      This is a high-level version of ata_std_dev_select(),
1002  *      which additionally provides the services of inserting
1003  *      the proper pauses and status polling, where needed.
1004  *
1005  *      LOCKING:
1006  *      caller.
1007  */
1008
1009 void ata_dev_select(struct ata_port *ap, unsigned int device,
1010                            unsigned int wait, unsigned int can_sleep)
1011 {
1012         VPRINTK("ENTER, ata%u: device %u, wait %u\n",
1013                 ap->id, device, wait);
1014
1015         if (wait)
1016                 ata_wait_idle(ap);
1017
1018         ap->ops->dev_select(ap, device);
1019
1020         if (wait) {
1021                 if (can_sleep && ap->device[device].class == ATA_DEV_ATAPI)
1022                         msleep(150);
1023                 ata_wait_idle(ap);
1024         }
1025 }
1026
1027 /**
1028  *      ata_dump_id - IDENTIFY DEVICE info debugging output
1029  *      @dev: Device whose IDENTIFY DEVICE page we will dump
1030  *
1031  *      Dump selected 16-bit words from a detected device's
1032  *      IDENTIFY PAGE page.
1033  *
1034  *      LOCKING:
1035  *      caller.
1036  */
1037
1038 static inline void ata_dump_id(const struct ata_device *dev)
1039 {
1040         DPRINTK("49==0x%04x  "
1041                 "53==0x%04x  "
1042                 "63==0x%04x  "
1043                 "64==0x%04x  "
1044                 "75==0x%04x  \n",
1045                 dev->id[49],
1046                 dev->id[53],
1047                 dev->id[63],
1048                 dev->id[64],
1049                 dev->id[75]);
1050         DPRINTK("80==0x%04x  "
1051                 "81==0x%04x  "
1052                 "82==0x%04x  "
1053                 "83==0x%04x  "
1054                 "84==0x%04x  \n",
1055                 dev->id[80],
1056                 dev->id[81],
1057                 dev->id[82],
1058                 dev->id[83],
1059                 dev->id[84]);
1060         DPRINTK("88==0x%04x  "
1061                 "93==0x%04x\n",
1062                 dev->id[88],
1063                 dev->id[93]);
1064 }
1065
1066 /*
1067  *      Compute the PIO modes available for this device. This is not as
1068  *      trivial as it seems if we must consider early devices correctly.
1069  *
1070  *      FIXME: pre IDE drive timing (do we care ?). 
1071  */
1072
1073 static unsigned int ata_pio_modes(const struct ata_device *adev)
1074 {
1075         u16 modes;
1076
1077         /* Usual case. Word 53 indicates word 88 is valid */
1078         if (adev->id[ATA_ID_FIELD_VALID] & (1 << 2)) {
1079                 modes = adev->id[ATA_ID_PIO_MODES] & 0x03;
1080                 modes <<= 3;
1081                 modes |= 0x7;
1082                 return modes;
1083         }
1084
1085         /* If word 88 isn't valid then Word 51 holds the PIO timing number
1086            for the maximum. Turn it into a mask and return it */
1087         modes = (2 << (adev->id[ATA_ID_OLD_PIO_MODES] & 0xFF)) - 1 ;
1088         return modes;
1089 }
1090
1091 /**
1092  *      ata_dev_identify - obtain IDENTIFY x DEVICE page
1093  *      @ap: port on which device we wish to probe resides
1094  *      @device: device bus address, starting at zero
1095  *
1096  *      Following bus reset, we issue the IDENTIFY [PACKET] DEVICE
1097  *      command, and read back the 512-byte device information page.
1098  *      The device information page is fed to us via the standard
1099  *      PIO-IN protocol, but we hand-code it here. (TODO: investigate
1100  *      using standard PIO-IN paths)
1101  *
1102  *      After reading the device information page, we use several
1103  *      bits of information from it to initialize data structures
1104  *      that will be used during the lifetime of the ata_device.
1105  *      Other data from the info page is used to disqualify certain
1106  *      older ATA devices we do not wish to support.
1107  *
1108  *      LOCKING:
1109  *      Inherited from caller.  Some functions called by this function
1110  *      obtain the host_set lock.
1111  */
1112
1113 static void ata_dev_identify(struct ata_port *ap, unsigned int device)
1114 {
1115         struct ata_device *dev = &ap->device[device];
1116         unsigned int major_version;
1117         u16 tmp;
1118         unsigned long xfer_modes;
1119         unsigned int using_edd;
1120         DECLARE_COMPLETION(wait);
1121         struct ata_queued_cmd *qc;
1122         unsigned long flags;
1123         int rc;
1124
1125         if (!ata_dev_present(dev)) {
1126                 DPRINTK("ENTER/EXIT (host %u, dev %u) -- nodev\n",
1127                         ap->id, device);
1128                 return;
1129         }
1130
1131         if (ap->flags & (ATA_FLAG_SRST | ATA_FLAG_SATA_RESET))
1132                 using_edd = 0;
1133         else
1134                 using_edd = 1;
1135
1136         DPRINTK("ENTER, host %u, dev %u\n", ap->id, device);
1137
1138         assert (dev->class == ATA_DEV_ATA || dev->class == ATA_DEV_ATAPI ||
1139                 dev->class == ATA_DEV_NONE);
1140
1141         ata_dev_select(ap, device, 1, 1); /* select device 0/1 */
1142
1143         qc = ata_qc_new_init(ap, dev);
1144         BUG_ON(qc == NULL);
1145
1146         ata_sg_init_one(qc, dev->id, sizeof(dev->id));
1147         qc->dma_dir = DMA_FROM_DEVICE;
1148         qc->tf.protocol = ATA_PROT_PIO;
1149         qc->nsect = 1;
1150
1151 retry:
1152         if (dev->class == ATA_DEV_ATA) {
1153                 qc->tf.command = ATA_CMD_ID_ATA;
1154                 DPRINTK("do ATA identify\n");
1155         } else {
1156                 qc->tf.command = ATA_CMD_ID_ATAPI;
1157                 DPRINTK("do ATAPI identify\n");
1158         }
1159
1160         qc->waiting = &wait;
1161         qc->complete_fn = ata_qc_complete_noop;
1162
1163         spin_lock_irqsave(&ap->host_set->lock, flags);
1164         rc = ata_qc_issue(qc);
1165         spin_unlock_irqrestore(&ap->host_set->lock, flags);
1166
1167         if (rc)
1168                 goto err_out;
1169         else
1170                 wait_for_completion(&wait);
1171
1172         spin_lock_irqsave(&ap->host_set->lock, flags);
1173         ap->ops->tf_read(ap, &qc->tf);
1174         spin_unlock_irqrestore(&ap->host_set->lock, flags);
1175
1176         if (qc->tf.command & ATA_ERR) {
1177                 /*
1178                  * arg!  EDD works for all test cases, but seems to return
1179                  * the ATA signature for some ATAPI devices.  Until the
1180                  * reason for this is found and fixed, we fix up the mess
1181                  * here.  If IDENTIFY DEVICE returns command aborted
1182                  * (as ATAPI devices do), then we issue an
1183                  * IDENTIFY PACKET DEVICE.
1184                  *
1185                  * ATA software reset (SRST, the default) does not appear
1186                  * to have this problem.
1187                  */
1188                 if ((using_edd) && (qc->tf.command == ATA_CMD_ID_ATA)) {
1189                         u8 err = qc->tf.feature;
1190                         if (err & ATA_ABORTED) {
1191                                 dev->class = ATA_DEV_ATAPI;
1192                                 qc->cursg = 0;
1193                                 qc->cursg_ofs = 0;
1194                                 qc->cursect = 0;
1195                                 qc->nsect = 1;
1196                                 goto retry;
1197                         }
1198                 }
1199                 goto err_out;
1200         }
1201
1202         swap_buf_le16(dev->id, ATA_ID_WORDS);
1203
1204         /* print device capabilities */
1205         printk(KERN_DEBUG "ata%u: dev %u cfg "
1206                "49:%04x 82:%04x 83:%04x 84:%04x 85:%04x 86:%04x 87:%04x 88:%04x\n",
1207                ap->id, device, dev->id[49],
1208                dev->id[82], dev->id[83], dev->id[84],
1209                dev->id[85], dev->id[86], dev->id[87],
1210                dev->id[88]);
1211
1212         /*
1213          * common ATA, ATAPI feature tests
1214          */
1215
1216         /* we require DMA support (bits 8 of word 49) */
1217         if (!ata_id_has_dma(dev->id)) {
1218                 printk(KERN_DEBUG "ata%u: no dma\n", ap->id);
1219                 goto err_out_nosup;
1220         }
1221
1222         /* quick-n-dirty find max transfer mode; for printk only */
1223         xfer_modes = dev->id[ATA_ID_UDMA_MODES];
1224         if (!xfer_modes)
1225                 xfer_modes = (dev->id[ATA_ID_MWDMA_MODES]) << ATA_SHIFT_MWDMA;
1226         if (!xfer_modes)
1227                 xfer_modes = ata_pio_modes(dev);
1228
1229         ata_dump_id(dev);
1230
1231         /* ATA-specific feature tests */
1232         if (dev->class == ATA_DEV_ATA) {
1233                 if (!ata_id_is_ata(dev->id))    /* sanity check */
1234                         goto err_out_nosup;
1235
1236                 /* get major version */
1237                 tmp = dev->id[ATA_ID_MAJOR_VER];
1238                 for (major_version = 14; major_version >= 1; major_version--)
1239                         if (tmp & (1 << major_version))
1240                                 break;
1241
1242                 /*
1243                  * The exact sequence expected by certain pre-ATA4 drives is:
1244                  * SRST RESET
1245                  * IDENTIFY
1246                  * INITIALIZE DEVICE PARAMETERS
1247                  * anything else..
1248                  * Some drives were very specific about that exact sequence.
1249                  */
1250                 if (major_version < 4 || (!ata_id_has_lba(dev->id))) {
1251                         ata_dev_init_params(ap, dev);
1252
1253                         /* current CHS translation info (id[53-58]) might be
1254                          * changed. reread the identify device info.
1255                          */
1256                         ata_dev_reread_id(ap, dev);
1257                 }
1258
1259                 if (ata_id_has_lba(dev->id)) {
1260                         dev->flags |= ATA_DFLAG_LBA;
1261
1262                         if (ata_id_has_lba48(dev->id)) {
1263                                 dev->flags |= ATA_DFLAG_LBA48;
1264                                 dev->n_sectors = ata_id_u64(dev->id, 100);
1265                         } else {
1266                                 dev->n_sectors = ata_id_u32(dev->id, 60);
1267                         }
1268
1269                         /* print device info to dmesg */
1270                         printk(KERN_INFO "ata%u: dev %u ATA-%d, max %s, %Lu sectors:%s\n",
1271                                ap->id, device,
1272                                major_version,
1273                                ata_mode_string(xfer_modes),
1274                                (unsigned long long)dev->n_sectors,
1275                                dev->flags & ATA_DFLAG_LBA48 ? " LBA48" : " LBA");
1276                 } else { 
1277                         /* CHS */
1278
1279                         /* Default translation */
1280                         dev->cylinders  = dev->id[1];
1281                         dev->heads      = dev->id[3];
1282                         dev->sectors    = dev->id[6];
1283                         dev->n_sectors  = dev->cylinders * dev->heads * dev->sectors;
1284
1285                         if (ata_id_current_chs_valid(dev->id)) {
1286                                 /* Current CHS translation is valid. */
1287                                 dev->cylinders = dev->id[54];
1288                                 dev->heads     = dev->id[55];
1289                                 dev->sectors   = dev->id[56];
1290                                 
1291                                 dev->n_sectors = ata_id_u32(dev->id, 57);
1292                         }
1293
1294                         /* print device info to dmesg */
1295                         printk(KERN_INFO "ata%u: dev %u ATA-%d, max %s, %Lu sectors: CHS %d/%d/%d\n",
1296                                ap->id, device,
1297                                major_version,
1298                                ata_mode_string(xfer_modes),
1299                                (unsigned long long)dev->n_sectors,
1300                                (int)dev->cylinders, (int)dev->heads, (int)dev->sectors);
1301
1302                 }
1303
1304                 ap->host->max_cmd_len = 16;
1305         }
1306
1307         /* ATAPI-specific feature tests */
1308         else {
1309                 if (ata_id_is_ata(dev->id))             /* sanity check */
1310                         goto err_out_nosup;
1311
1312                 rc = atapi_cdb_len(dev->id);
1313                 if ((rc < 12) || (rc > ATAPI_CDB_LEN)) {
1314                         printk(KERN_WARNING "ata%u: unsupported CDB len\n", ap->id);
1315                         goto err_out_nosup;
1316                 }
1317                 ap->cdb_len = (unsigned int) rc;
1318                 ap->host->max_cmd_len = (unsigned char) ap->cdb_len;
1319
1320                 /* print device info to dmesg */
1321                 printk(KERN_INFO "ata%u: dev %u ATAPI, max %s\n",
1322                        ap->id, device,
1323                        ata_mode_string(xfer_modes));
1324         }
1325
1326         DPRINTK("EXIT, drv_stat = 0x%x\n", ata_chk_status(ap));
1327         return;
1328
1329 err_out_nosup:
1330         printk(KERN_WARNING "ata%u: dev %u not supported, ignoring\n",
1331                ap->id, device);
1332 err_out:
1333         dev->class++;   /* converts ATA_DEV_xxx into ATA_DEV_xxx_UNSUP */
1334         DPRINTK("EXIT, err\n");
1335 }
1336
1337
1338 static inline u8 ata_dev_knobble(const struct ata_port *ap)
1339 {
1340         return ((ap->cbl == ATA_CBL_SATA) && (!ata_id_is_sata(ap->device->id)));
1341 }
1342
1343 /**
1344  *      ata_dev_config - Run device specific handlers and check for
1345  *                       SATA->PATA bridges
1346  *      @ap: Bus
1347  *      @i:  Device
1348  *
1349  *      LOCKING:
1350  */
1351
1352 void ata_dev_config(struct ata_port *ap, unsigned int i)
1353 {
1354         /* limit bridge transfers to udma5, 200 sectors */
1355         if (ata_dev_knobble(ap)) {
1356                 printk(KERN_INFO "ata%u(%u): applying bridge limits\n",
1357                         ap->id, ap->device->devno);
1358                 ap->udma_mask &= ATA_UDMA5;
1359                 ap->host->max_sectors = ATA_MAX_SECTORS;
1360                 ap->host->hostt->max_sectors = ATA_MAX_SECTORS;
1361                 ap->device->flags |= ATA_DFLAG_LOCK_SECTORS;
1362         }
1363
1364         if (ap->ops->dev_config)
1365                 ap->ops->dev_config(ap, &ap->device[i]);
1366 }
1367
1368 /**
1369  *      ata_bus_probe - Reset and probe ATA bus
1370  *      @ap: Bus to probe
1371  *
1372  *      Master ATA bus probing function.  Initiates a hardware-dependent
1373  *      bus reset, then attempts to identify any devices found on
1374  *      the bus.
1375  *
1376  *      LOCKING:
1377  *      PCI/etc. bus probe sem.
1378  *
1379  *      RETURNS:
1380  *      Zero on success, non-zero on error.
1381  */
1382
1383 static int ata_bus_probe(struct ata_port *ap)
1384 {
1385         unsigned int i, found = 0;
1386
1387         ap->ops->phy_reset(ap);
1388         if (ap->flags & ATA_FLAG_PORT_DISABLED)
1389                 goto err_out;
1390
1391         for (i = 0; i < ATA_MAX_DEVICES; i++) {
1392                 ata_dev_identify(ap, i);
1393                 if (ata_dev_present(&ap->device[i])) {
1394                         found = 1;
1395                         ata_dev_config(ap,i);
1396                 }
1397         }
1398
1399         if ((!found) || (ap->flags & ATA_FLAG_PORT_DISABLED))
1400                 goto err_out_disable;
1401
1402         ata_set_mode(ap);
1403         if (ap->flags & ATA_FLAG_PORT_DISABLED)
1404                 goto err_out_disable;
1405
1406         return 0;
1407
1408 err_out_disable:
1409         ap->ops->port_disable(ap);
1410 err_out:
1411         return -1;
1412 }
1413
1414 /**
1415  *      ata_port_probe - Mark port as enabled
1416  *      @ap: Port for which we indicate enablement
1417  *
1418  *      Modify @ap data structure such that the system
1419  *      thinks that the entire port is enabled.
1420  *
1421  *      LOCKING: host_set lock, or some other form of
1422  *      serialization.
1423  */
1424
1425 void ata_port_probe(struct ata_port *ap)
1426 {
1427         ap->flags &= ~ATA_FLAG_PORT_DISABLED;
1428 }
1429
1430 /**
1431  *      __sata_phy_reset - Wake/reset a low-level SATA PHY
1432  *      @ap: SATA port associated with target SATA PHY.
1433  *
1434  *      This function issues commands to standard SATA Sxxx
1435  *      PHY registers, to wake up the phy (and device), and
1436  *      clear any reset condition.
1437  *
1438  *      LOCKING:
1439  *      PCI/etc. bus probe sem.
1440  *
1441  */
1442 void __sata_phy_reset(struct ata_port *ap)
1443 {
1444         u32 sstatus;
1445         unsigned long timeout = jiffies + (HZ * 5);
1446
1447         if (ap->flags & ATA_FLAG_SATA_RESET) {
1448                 /* issue phy wake/reset */
1449                 scr_write_flush(ap, SCR_CONTROL, 0x301);
1450                 /* Couldn't find anything in SATA I/II specs, but
1451                  * AHCI-1.1 10.4.2 says at least 1 ms. */
1452                 mdelay(1);
1453         }
1454         scr_write_flush(ap, SCR_CONTROL, 0x300); /* phy wake/clear reset */
1455
1456         /* wait for phy to become ready, if necessary */
1457         do {
1458                 msleep(200);
1459                 sstatus = scr_read(ap, SCR_STATUS);
1460                 if ((sstatus & 0xf) != 1)
1461                         break;
1462         } while (time_before(jiffies, timeout));
1463
1464         /* TODO: phy layer with polling, timeouts, etc. */
1465         if (sata_dev_present(ap))
1466                 ata_port_probe(ap);
1467         else {
1468                 sstatus = scr_read(ap, SCR_STATUS);
1469                 printk(KERN_INFO "ata%u: no device found (phy stat %08x)\n",
1470                        ap->id, sstatus);
1471                 ata_port_disable(ap);
1472         }
1473
1474         if (ap->flags & ATA_FLAG_PORT_DISABLED)
1475                 return;
1476
1477         if (ata_busy_sleep(ap, ATA_TMOUT_BOOT_QUICK, ATA_TMOUT_BOOT)) {
1478                 ata_port_disable(ap);
1479                 return;
1480         }
1481
1482         ap->cbl = ATA_CBL_SATA;
1483 }
1484
1485 /**
1486  *      sata_phy_reset - Reset SATA bus.
1487  *      @ap: SATA port associated with target SATA PHY.
1488  *
1489  *      This function resets the SATA bus, and then probes
1490  *      the bus for devices.
1491  *
1492  *      LOCKING:
1493  *      PCI/etc. bus probe sem.
1494  *
1495  */
1496 void sata_phy_reset(struct ata_port *ap)
1497 {
1498         __sata_phy_reset(ap);
1499         if (ap->flags & ATA_FLAG_PORT_DISABLED)
1500                 return;
1501         ata_bus_reset(ap);
1502 }
1503
1504 /**
1505  *      ata_port_disable - Disable port.
1506  *      @ap: Port to be disabled.
1507  *
1508  *      Modify @ap data structure such that the system
1509  *      thinks that the entire port is disabled, and should
1510  *      never attempt to probe or communicate with devices
1511  *      on this port.
1512  *
1513  *      LOCKING: host_set lock, or some other form of
1514  *      serialization.
1515  */
1516
1517 void ata_port_disable(struct ata_port *ap)
1518 {
1519         ap->device[0].class = ATA_DEV_NONE;
1520         ap->device[1].class = ATA_DEV_NONE;
1521         ap->flags |= ATA_FLAG_PORT_DISABLED;
1522 }
1523
1524 /*
1525  * This mode timing computation functionality is ported over from
1526  * drivers/ide/ide-timing.h and was originally written by Vojtech Pavlik
1527  */
1528 /*
1529  * PIO 0-5, MWDMA 0-2 and UDMA 0-6 timings (in nanoseconds).
1530  * These were taken from ATA/ATAPI-6 standard, rev 0a, except
1531  * for PIO 5, which is a nonstandard extension and UDMA6, which
1532  * is currently supported only by Maxtor drives. 
1533  */
1534
1535 static const struct ata_timing ata_timing[] = {
1536
1537         { XFER_UDMA_6,     0,   0,   0,   0,   0,   0,   0,  15 },
1538         { XFER_UDMA_5,     0,   0,   0,   0,   0,   0,   0,  20 },
1539         { XFER_UDMA_4,     0,   0,   0,   0,   0,   0,   0,  30 },
1540         { XFER_UDMA_3,     0,   0,   0,   0,   0,   0,   0,  45 },
1541
1542         { XFER_UDMA_2,     0,   0,   0,   0,   0,   0,   0,  60 },
1543         { XFER_UDMA_1,     0,   0,   0,   0,   0,   0,   0,  80 },
1544         { XFER_UDMA_0,     0,   0,   0,   0,   0,   0,   0, 120 },
1545
1546 /*      { XFER_UDMA_SLOW,  0,   0,   0,   0,   0,   0,   0, 150 }, */
1547                                           
1548         { XFER_MW_DMA_2,  25,   0,   0,   0,  70,  25, 120,   0 },
1549         { XFER_MW_DMA_1,  45,   0,   0,   0,  80,  50, 150,   0 },
1550         { XFER_MW_DMA_0,  60,   0,   0,   0, 215, 215, 480,   0 },
1551                                           
1552         { XFER_SW_DMA_2,  60,   0,   0,   0, 120, 120, 240,   0 },
1553         { XFER_SW_DMA_1,  90,   0,   0,   0, 240, 240, 480,   0 },
1554         { XFER_SW_DMA_0, 120,   0,   0,   0, 480, 480, 960,   0 },
1555
1556 /*      { XFER_PIO_5,     20,  50,  30, 100,  50,  30, 100,   0 }, */
1557         { XFER_PIO_4,     25,  70,  25, 120,  70,  25, 120,   0 },
1558         { XFER_PIO_3,     30,  80,  70, 180,  80,  70, 180,   0 },
1559
1560         { XFER_PIO_2,     30, 290,  40, 330, 100,  90, 240,   0 },
1561         { XFER_PIO_1,     50, 290,  93, 383, 125, 100, 383,   0 },
1562         { XFER_PIO_0,     70, 290, 240, 600, 165, 150, 600,   0 },
1563
1564 /*      { XFER_PIO_SLOW, 120, 290, 240, 960, 290, 240, 960,   0 }, */
1565
1566         { 0xFF }
1567 };
1568
1569 #define ENOUGH(v,unit)          (((v)-1)/(unit)+1)
1570 #define EZ(v,unit)              ((v)?ENOUGH(v,unit):0)
1571
1572 static void ata_timing_quantize(const struct ata_timing *t, struct ata_timing *q, int T, int UT)
1573 {
1574         q->setup   = EZ(t->setup   * 1000,  T);
1575         q->act8b   = EZ(t->act8b   * 1000,  T);
1576         q->rec8b   = EZ(t->rec8b   * 1000,  T);
1577         q->cyc8b   = EZ(t->cyc8b   * 1000,  T);
1578         q->active  = EZ(t->active  * 1000,  T);
1579         q->recover = EZ(t->recover * 1000,  T);
1580         q->cycle   = EZ(t->cycle   * 1000,  T);
1581         q->udma    = EZ(t->udma    * 1000, UT);
1582 }
1583
1584 void ata_timing_merge(const struct ata_timing *a, const struct ata_timing *b,
1585                       struct ata_timing *m, unsigned int what)
1586 {
1587         if (what & ATA_TIMING_SETUP  ) m->setup   = max(a->setup,   b->setup);
1588         if (what & ATA_TIMING_ACT8B  ) m->act8b   = max(a->act8b,   b->act8b);
1589         if (what & ATA_TIMING_REC8B  ) m->rec8b   = max(a->rec8b,   b->rec8b);
1590         if (what & ATA_TIMING_CYC8B  ) m->cyc8b   = max(a->cyc8b,   b->cyc8b);
1591         if (what & ATA_TIMING_ACTIVE ) m->active  = max(a->active,  b->active);
1592         if (what & ATA_TIMING_RECOVER) m->recover = max(a->recover, b->recover);
1593         if (what & ATA_TIMING_CYCLE  ) m->cycle   = max(a->cycle,   b->cycle);
1594         if (what & ATA_TIMING_UDMA   ) m->udma    = max(a->udma,    b->udma);
1595 }
1596
1597 static const struct ata_timing* ata_timing_find_mode(unsigned short speed)
1598 {
1599         const struct ata_timing *t;
1600
1601         for (t = ata_timing; t->mode != speed; t++)
1602                 if (t->mode == 0xFF)
1603                         return NULL;
1604         return t; 
1605 }
1606
1607 int ata_timing_compute(struct ata_device *adev, unsigned short speed,
1608                        struct ata_timing *t, int T, int UT)
1609 {
1610         const struct ata_timing *s;
1611         struct ata_timing p;
1612
1613         /*
1614          * Find the mode. 
1615         */
1616
1617         if (!(s = ata_timing_find_mode(speed)))
1618                 return -EINVAL;
1619
1620         /*
1621          * If the drive is an EIDE drive, it can tell us it needs extended
1622          * PIO/MW_DMA cycle timing.
1623          */
1624
1625         if (adev->id[ATA_ID_FIELD_VALID] & 2) { /* EIDE drive */
1626                 memset(&p, 0, sizeof(p));
1627                 if(speed >= XFER_PIO_0 && speed <= XFER_SW_DMA_0) {
1628                         if (speed <= XFER_PIO_2) p.cycle = p.cyc8b = adev->id[ATA_ID_EIDE_PIO];
1629                                             else p.cycle = p.cyc8b = adev->id[ATA_ID_EIDE_PIO_IORDY];
1630                 } else if(speed >= XFER_MW_DMA_0 && speed <= XFER_MW_DMA_2) {
1631                         p.cycle = adev->id[ATA_ID_EIDE_DMA_MIN];
1632                 }
1633                 ata_timing_merge(&p, t, t, ATA_TIMING_CYCLE | ATA_TIMING_CYC8B);
1634         }
1635
1636         /*
1637          * Convert the timing to bus clock counts.
1638          */
1639
1640         ata_timing_quantize(s, t, T, UT);
1641
1642         /*
1643          * Even in DMA/UDMA modes we still use PIO access for IDENTIFY, S.M.A.R.T
1644          * and some other commands. We have to ensure that the DMA cycle timing is
1645          * slower/equal than the fastest PIO timing.
1646          */
1647
1648         if (speed > XFER_PIO_4) {
1649                 ata_timing_compute(adev, adev->pio_mode, &p, T, UT);
1650                 ata_timing_merge(&p, t, t, ATA_TIMING_ALL);
1651         }
1652
1653         /*
1654          * Lenghten active & recovery time so that cycle time is correct.
1655          */
1656
1657         if (t->act8b + t->rec8b < t->cyc8b) {
1658                 t->act8b += (t->cyc8b - (t->act8b + t->rec8b)) / 2;
1659                 t->rec8b = t->cyc8b - t->act8b;
1660         }
1661
1662         if (t->active + t->recover < t->cycle) {
1663                 t->active += (t->cycle - (t->active + t->recover)) / 2;
1664                 t->recover = t->cycle - t->active;
1665         }
1666
1667         return 0;
1668 }
1669
1670 static const struct {
1671         unsigned int shift;
1672         u8 base;
1673 } xfer_mode_classes[] = {
1674         { ATA_SHIFT_UDMA,       XFER_UDMA_0 },
1675         { ATA_SHIFT_MWDMA,      XFER_MW_DMA_0 },
1676         { ATA_SHIFT_PIO,        XFER_PIO_0 },
1677 };
1678
1679 static inline u8 base_from_shift(unsigned int shift)
1680 {
1681         int i;
1682
1683         for (i = 0; i < ARRAY_SIZE(xfer_mode_classes); i++)
1684                 if (xfer_mode_classes[i].shift == shift)
1685                         return xfer_mode_classes[i].base;
1686
1687         return 0xff;
1688 }
1689
1690 static void ata_dev_set_mode(struct ata_port *ap, struct ata_device *dev)
1691 {
1692         int ofs, idx;
1693         u8 base;
1694
1695         if (!ata_dev_present(dev) || (ap->flags & ATA_FLAG_PORT_DISABLED))
1696                 return;
1697
1698         if (dev->xfer_shift == ATA_SHIFT_PIO)
1699                 dev->flags |= ATA_DFLAG_PIO;
1700
1701         ata_dev_set_xfermode(ap, dev);
1702
1703         base = base_from_shift(dev->xfer_shift);
1704         ofs = dev->xfer_mode - base;
1705         idx = ofs + dev->xfer_shift;
1706         WARN_ON(idx >= ARRAY_SIZE(xfer_mode_str));
1707
1708         DPRINTK("idx=%d xfer_shift=%u, xfer_mode=0x%x, base=0x%x, offset=%d\n",
1709                 idx, dev->xfer_shift, (int)dev->xfer_mode, (int)base, ofs);
1710
1711         printk(KERN_INFO "ata%u: dev %u configured for %s\n",
1712                 ap->id, dev->devno, xfer_mode_str[idx]);
1713 }
1714
1715 static int ata_host_set_pio(struct ata_port *ap)
1716 {
1717         unsigned int mask;
1718         int x, i;
1719         u8 base, xfer_mode;
1720
1721         mask = ata_get_mode_mask(ap, ATA_SHIFT_PIO);
1722         x = fgb(mask);
1723         if (x < 0) {
1724                 printk(KERN_WARNING "ata%u: no PIO support\n", ap->id);
1725                 return -1;
1726         }
1727
1728         base = base_from_shift(ATA_SHIFT_PIO);
1729         xfer_mode = base + x;
1730
1731         DPRINTK("base 0x%x xfer_mode 0x%x mask 0x%x x %d\n",
1732                 (int)base, (int)xfer_mode, mask, x);
1733
1734         for (i = 0; i < ATA_MAX_DEVICES; i++) {
1735                 struct ata_device *dev = &ap->device[i];
1736                 if (ata_dev_present(dev)) {
1737                         dev->pio_mode = xfer_mode;
1738                         dev->xfer_mode = xfer_mode;
1739                         dev->xfer_shift = ATA_SHIFT_PIO;
1740                         if (ap->ops->set_piomode)
1741                                 ap->ops->set_piomode(ap, dev);
1742                 }
1743         }
1744
1745         return 0;
1746 }
1747
1748 static void ata_host_set_dma(struct ata_port *ap, u8 xfer_mode,
1749                             unsigned int xfer_shift)
1750 {
1751         int i;
1752
1753         for (i = 0; i < ATA_MAX_DEVICES; i++) {
1754                 struct ata_device *dev = &ap->device[i];
1755                 if (ata_dev_present(dev)) {
1756                         dev->dma_mode = xfer_mode;
1757                         dev->xfer_mode = xfer_mode;
1758                         dev->xfer_shift = xfer_shift;
1759                         if (ap->ops->set_dmamode)
1760                                 ap->ops->set_dmamode(ap, dev);
1761                 }
1762         }
1763 }
1764
1765 /**
1766  *      ata_set_mode - Program timings and issue SET FEATURES - XFER
1767  *      @ap: port on which timings will be programmed
1768  *
1769  *      Set ATA device disk transfer mode (PIO3, UDMA6, etc.).
1770  *
1771  *      LOCKING:
1772  *      PCI/etc. bus probe sem.
1773  *
1774  */
1775 static void ata_set_mode(struct ata_port *ap)
1776 {
1777         unsigned int xfer_shift;
1778         u8 xfer_mode;
1779         int rc;
1780
1781         /* step 1: always set host PIO timings */
1782         rc = ata_host_set_pio(ap);
1783         if (rc)
1784                 goto err_out;
1785
1786         /* step 2: choose the best data xfer mode */
1787         xfer_mode = xfer_shift = 0;
1788         rc = ata_choose_xfer_mode(ap, &xfer_mode, &xfer_shift);
1789         if (rc)
1790                 goto err_out;
1791
1792         /* step 3: if that xfer mode isn't PIO, set host DMA timings */
1793         if (xfer_shift != ATA_SHIFT_PIO)
1794                 ata_host_set_dma(ap, xfer_mode, xfer_shift);
1795
1796         /* step 4: update devices' xfer mode */
1797         ata_dev_set_mode(ap, &ap->device[0]);
1798         ata_dev_set_mode(ap, &ap->device[1]);
1799
1800         if (ap->flags & ATA_FLAG_PORT_DISABLED)
1801                 return;
1802
1803         if (ap->ops->post_set_mode)
1804                 ap->ops->post_set_mode(ap);
1805
1806         return;
1807
1808 err_out:
1809         ata_port_disable(ap);
1810 }
1811
1812 /**
1813  *      ata_busy_sleep - sleep until BSY clears, or timeout
1814  *      @ap: port containing status register to be polled
1815  *      @tmout_pat: impatience timeout
1816  *      @tmout: overall timeout
1817  *
1818  *      Sleep until ATA Status register bit BSY clears,
1819  *      or a timeout occurs.
1820  *
1821  *      LOCKING: None.
1822  *
1823  */
1824
1825 static unsigned int ata_busy_sleep (struct ata_port *ap,
1826                                     unsigned long tmout_pat,
1827                                     unsigned long tmout)
1828 {
1829         unsigned long timer_start, timeout;
1830         u8 status;
1831
1832         status = ata_busy_wait(ap, ATA_BUSY, 300);
1833         timer_start = jiffies;
1834         timeout = timer_start + tmout_pat;
1835         while ((status & ATA_BUSY) && (time_before(jiffies, timeout))) {
1836                 msleep(50);
1837                 status = ata_busy_wait(ap, ATA_BUSY, 3);
1838         }
1839
1840         if (status & ATA_BUSY)
1841                 printk(KERN_WARNING "ata%u is slow to respond, "
1842                        "please be patient\n", ap->id);
1843
1844         timeout = timer_start + tmout;
1845         while ((status & ATA_BUSY) && (time_before(jiffies, timeout))) {
1846                 msleep(50);
1847                 status = ata_chk_status(ap);
1848         }
1849
1850         if (status & ATA_BUSY) {
1851                 printk(KERN_ERR "ata%u failed to respond (%lu secs)\n",
1852                        ap->id, tmout / HZ);
1853                 return 1;
1854         }
1855
1856         return 0;
1857 }
1858
1859 static void ata_bus_post_reset(struct ata_port *ap, unsigned int devmask)
1860 {
1861         struct ata_ioports *ioaddr = &ap->ioaddr;
1862         unsigned int dev0 = devmask & (1 << 0);
1863         unsigned int dev1 = devmask & (1 << 1);
1864         unsigned long timeout;
1865
1866         /* if device 0 was found in ata_devchk, wait for its
1867          * BSY bit to clear
1868          */
1869         if (dev0)
1870                 ata_busy_sleep(ap, ATA_TMOUT_BOOT_QUICK, ATA_TMOUT_BOOT);
1871
1872         /* if device 1 was found in ata_devchk, wait for
1873          * register access, then wait for BSY to clear
1874          */
1875         timeout = jiffies + ATA_TMOUT_BOOT;
1876         while (dev1) {
1877                 u8 nsect, lbal;
1878
1879                 ap->ops->dev_select(ap, 1);
1880                 if (ap->flags & ATA_FLAG_MMIO) {
1881                         nsect = readb((void __iomem *) ioaddr->nsect_addr);
1882                         lbal = readb((void __iomem *) ioaddr->lbal_addr);
1883                 } else {
1884                         nsect = inb(ioaddr->nsect_addr);
1885                         lbal = inb(ioaddr->lbal_addr);
1886                 }
1887                 if ((nsect == 1) && (lbal == 1))
1888                         break;
1889                 if (time_after(jiffies, timeout)) {
1890                         dev1 = 0;
1891                         break;
1892                 }
1893                 msleep(50);     /* give drive a breather */
1894         }
1895         if (dev1)
1896                 ata_busy_sleep(ap, ATA_TMOUT_BOOT_QUICK, ATA_TMOUT_BOOT);
1897
1898         /* is all this really necessary? */
1899         ap->ops->dev_select(ap, 0);
1900         if (dev1)
1901                 ap->ops->dev_select(ap, 1);
1902         if (dev0)
1903                 ap->ops->dev_select(ap, 0);
1904 }
1905
1906 /**
1907  *      ata_bus_edd - Issue EXECUTE DEVICE DIAGNOSTIC command.
1908  *      @ap: Port to reset and probe
1909  *
1910  *      Use the EXECUTE DEVICE DIAGNOSTIC command to reset and
1911  *      probe the bus.  Not often used these days.
1912  *
1913  *      LOCKING:
1914  *      PCI/etc. bus probe sem.
1915  *
1916  */
1917
1918 static unsigned int ata_bus_edd(struct ata_port *ap)
1919 {
1920         struct ata_taskfile tf;
1921
1922         /* set up execute-device-diag (bus reset) taskfile */
1923         /* also, take interrupts to a known state (disabled) */
1924         DPRINTK("execute-device-diag\n");
1925         ata_tf_init(ap, &tf, 0);
1926         tf.ctl |= ATA_NIEN;
1927         tf.command = ATA_CMD_EDD;
1928         tf.protocol = ATA_PROT_NODATA;
1929
1930         /* do bus reset */
1931         ata_tf_to_host(ap, &tf);
1932
1933         /* spec says at least 2ms.  but who knows with those
1934          * crazy ATAPI devices...
1935          */
1936         msleep(150);
1937
1938         return ata_busy_sleep(ap, ATA_TMOUT_BOOT_QUICK, ATA_TMOUT_BOOT);
1939 }
1940
1941 static unsigned int ata_bus_softreset(struct ata_port *ap,
1942                                       unsigned int devmask)
1943 {
1944         struct ata_ioports *ioaddr = &ap->ioaddr;
1945
1946         DPRINTK("ata%u: bus reset via SRST\n", ap->id);
1947
1948         /* software reset.  causes dev0 to be selected */
1949         if (ap->flags & ATA_FLAG_MMIO) {
1950                 writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
1951                 udelay(20);     /* FIXME: flush */
1952                 writeb(ap->ctl | ATA_SRST, (void __iomem *) ioaddr->ctl_addr);
1953                 udelay(20);     /* FIXME: flush */
1954                 writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
1955         } else {
1956                 outb(ap->ctl, ioaddr->ctl_addr);
1957                 udelay(10);
1958                 outb(ap->ctl | ATA_SRST, ioaddr->ctl_addr);
1959                 udelay(10);
1960                 outb(ap->ctl, ioaddr->ctl_addr);
1961         }
1962
1963         /* spec mandates ">= 2ms" before checking status.
1964          * We wait 150ms, because that was the magic delay used for
1965          * ATAPI devices in Hale Landis's ATADRVR, for the period of time
1966          * between when the ATA command register is written, and then
1967          * status is checked.  Because waiting for "a while" before
1968          * checking status is fine, post SRST, we perform this magic
1969          * delay here as well.
1970          */
1971         msleep(150);
1972
1973         ata_bus_post_reset(ap, devmask);
1974
1975         return 0;
1976 }
1977
1978 /**
1979  *      ata_bus_reset - reset host port and associated ATA channel
1980  *      @ap: port to reset
1981  *
1982  *      This is typically the first time we actually start issuing
1983  *      commands to the ATA channel.  We wait for BSY to clear, then
1984  *      issue EXECUTE DEVICE DIAGNOSTIC command, polling for its
1985  *      result.  Determine what devices, if any, are on the channel
1986  *      by looking at the device 0/1 error register.  Look at the signature
1987  *      stored in each device's taskfile registers, to determine if
1988  *      the device is ATA or ATAPI.
1989  *
1990  *      LOCKING:
1991  *      PCI/etc. bus probe sem.
1992  *      Obtains host_set lock.
1993  *
1994  *      SIDE EFFECTS:
1995  *      Sets ATA_FLAG_PORT_DISABLED if bus reset fails.
1996  */
1997
1998 void ata_bus_reset(struct ata_port *ap)
1999 {
2000         struct ata_ioports *ioaddr = &ap->ioaddr;
2001         unsigned int slave_possible = ap->flags & ATA_FLAG_SLAVE_POSS;
2002         u8 err;
2003         unsigned int dev0, dev1 = 0, rc = 0, devmask = 0;
2004
2005         DPRINTK("ENTER, host %u, port %u\n", ap->id, ap->port_no);
2006
2007         /* determine if device 0/1 are present */
2008         if (ap->flags & ATA_FLAG_SATA_RESET)
2009                 dev0 = 1;
2010         else {
2011                 dev0 = ata_devchk(ap, 0);
2012                 if (slave_possible)
2013                         dev1 = ata_devchk(ap, 1);
2014         }
2015
2016         if (dev0)
2017                 devmask |= (1 << 0);
2018         if (dev1)
2019                 devmask |= (1 << 1);
2020
2021         /* select device 0 again */
2022         ap->ops->dev_select(ap, 0);
2023
2024         /* issue bus reset */
2025         if (ap->flags & ATA_FLAG_SRST)
2026                 rc = ata_bus_softreset(ap, devmask);
2027         else if ((ap->flags & ATA_FLAG_SATA_RESET) == 0) {
2028                 /* set up device control */
2029                 if (ap->flags & ATA_FLAG_MMIO)
2030                         writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
2031                 else
2032                         outb(ap->ctl, ioaddr->ctl_addr);
2033                 rc = ata_bus_edd(ap);
2034         }
2035
2036         if (rc)
2037                 goto err_out;
2038
2039         /*
2040          * determine by signature whether we have ATA or ATAPI devices
2041          */
2042         err = ata_dev_try_classify(ap, 0);
2043         if ((slave_possible) && (err != 0x81))
2044                 ata_dev_try_classify(ap, 1);
2045
2046         /* re-enable interrupts */
2047         if (ap->ioaddr.ctl_addr)        /* FIXME: hack. create a hook instead */
2048                 ata_irq_on(ap);
2049
2050         /* is double-select really necessary? */
2051         if (ap->device[1].class != ATA_DEV_NONE)
2052                 ap->ops->dev_select(ap, 1);
2053         if (ap->device[0].class != ATA_DEV_NONE)
2054                 ap->ops->dev_select(ap, 0);
2055
2056         /* if no devices were detected, disable this port */
2057         if ((ap->device[0].class == ATA_DEV_NONE) &&
2058             (ap->device[1].class == ATA_DEV_NONE))
2059                 goto err_out;
2060
2061         if (ap->flags & (ATA_FLAG_SATA_RESET | ATA_FLAG_SRST)) {
2062                 /* set up device control for ATA_FLAG_SATA_RESET */
2063                 if (ap->flags & ATA_FLAG_MMIO)
2064                         writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
2065                 else
2066                         outb(ap->ctl, ioaddr->ctl_addr);
2067         }
2068
2069         DPRINTK("EXIT\n");
2070         return;
2071
2072 err_out:
2073         printk(KERN_ERR "ata%u: disabling port\n", ap->id);
2074         ap->ops->port_disable(ap);
2075
2076         DPRINTK("EXIT\n");
2077 }
2078
2079 static void ata_pr_blacklisted(const struct ata_port *ap,
2080                                const struct ata_device *dev)
2081 {
2082         printk(KERN_WARNING "ata%u: dev %u is on DMA blacklist, disabling DMA\n",
2083                 ap->id, dev->devno);
2084 }
2085
2086 static const char * ata_dma_blacklist [] = {
2087         "WDC AC11000H",
2088         "WDC AC22100H",
2089         "WDC AC32500H",
2090         "WDC AC33100H",
2091         "WDC AC31600H",
2092         "WDC AC32100H",
2093         "WDC AC23200L",
2094         "Compaq CRD-8241B",
2095         "CRD-8400B",
2096         "CRD-8480B",
2097         "CRD-8482B",
2098         "CRD-84",
2099         "SanDisk SDP3B",
2100         "SanDisk SDP3B-64",
2101         "SANYO CD-ROM CRD",
2102         "HITACHI CDR-8",
2103         "HITACHI CDR-8335",
2104         "HITACHI CDR-8435",
2105         "Toshiba CD-ROM XM-6202B",
2106         "TOSHIBA CD-ROM XM-1702BC",
2107         "CD-532E-A",
2108         "E-IDE CD-ROM CR-840",
2109         "CD-ROM Drive/F5A",
2110         "WPI CDD-820",
2111         "SAMSUNG CD-ROM SC-148C",
2112         "SAMSUNG CD-ROM SC",
2113         "SanDisk SDP3B-64",
2114         "ATAPI CD-ROM DRIVE 40X MAXIMUM",
2115         "_NEC DV5800A",
2116 };
2117
2118 static int ata_dma_blacklisted(const struct ata_device *dev)
2119 {
2120         unsigned char model_num[40];
2121         char *s;
2122         unsigned int len;
2123         int i;
2124
2125         ata_dev_id_string(dev->id, model_num, ATA_ID_PROD_OFS,
2126                           sizeof(model_num));
2127         s = &model_num[0];
2128         len = strnlen(s, sizeof(model_num));
2129
2130         /* ATAPI specifies that empty space is blank-filled; remove blanks */
2131         while ((len > 0) && (s[len - 1] == ' ')) {
2132                 len--;
2133                 s[len] = 0;
2134         }
2135
2136         for (i = 0; i < ARRAY_SIZE(ata_dma_blacklist); i++)
2137                 if (!strncmp(ata_dma_blacklist[i], s, len))
2138                         return 1;
2139
2140         return 0;
2141 }
2142
2143 static unsigned int ata_get_mode_mask(const struct ata_port *ap, int shift)
2144 {
2145         const struct ata_device *master, *slave;
2146         unsigned int mask;
2147
2148         master = &ap->device[0];
2149         slave = &ap->device[1];
2150
2151         assert (ata_dev_present(master) || ata_dev_present(slave));
2152
2153         if (shift == ATA_SHIFT_UDMA) {
2154                 mask = ap->udma_mask;
2155                 if (ata_dev_present(master)) {
2156                         mask &= (master->id[ATA_ID_UDMA_MODES] & 0xff);
2157                         if (ata_dma_blacklisted(master)) {
2158                                 mask = 0;
2159                                 ata_pr_blacklisted(ap, master);
2160                         }
2161                 }
2162                 if (ata_dev_present(slave)) {
2163                         mask &= (slave->id[ATA_ID_UDMA_MODES] & 0xff);
2164                         if (ata_dma_blacklisted(slave)) {
2165                                 mask = 0;
2166                                 ata_pr_blacklisted(ap, slave);
2167                         }
2168                 }
2169         }
2170         else if (shift == ATA_SHIFT_MWDMA) {
2171                 mask = ap->mwdma_mask;
2172                 if (ata_dev_present(master)) {
2173                         mask &= (master->id[ATA_ID_MWDMA_MODES] & 0x07);
2174                         if (ata_dma_blacklisted(master)) {
2175                                 mask = 0;
2176                                 ata_pr_blacklisted(ap, master);
2177                         }
2178                 }
2179                 if (ata_dev_present(slave)) {
2180                         mask &= (slave->id[ATA_ID_MWDMA_MODES] & 0x07);
2181                         if (ata_dma_blacklisted(slave)) {
2182                                 mask = 0;
2183                                 ata_pr_blacklisted(ap, slave);
2184                         }
2185                 }
2186         }
2187         else if (shift == ATA_SHIFT_PIO) {
2188                 mask = ap->pio_mask;
2189                 if (ata_dev_present(master)) {
2190                         /* spec doesn't return explicit support for
2191                          * PIO0-2, so we fake it
2192                          */
2193                         u16 tmp_mode = master->id[ATA_ID_PIO_MODES] & 0x03;
2194                         tmp_mode <<= 3;
2195                         tmp_mode |= 0x7;
2196                         mask &= tmp_mode;
2197                 }
2198                 if (ata_dev_present(slave)) {
2199                         /* spec doesn't return explicit support for
2200                          * PIO0-2, so we fake it
2201                          */
2202                         u16 tmp_mode = slave->id[ATA_ID_PIO_MODES] & 0x03;
2203                         tmp_mode <<= 3;
2204                         tmp_mode |= 0x7;
2205                         mask &= tmp_mode;
2206                 }
2207         }
2208         else {
2209                 mask = 0xffffffff; /* shut up compiler warning */
2210                 BUG();
2211         }
2212
2213         return mask;
2214 }
2215
2216 /* find greatest bit */
2217 static int fgb(u32 bitmap)
2218 {
2219         unsigned int i;
2220         int x = -1;
2221
2222         for (i = 0; i < 32; i++)
2223                 if (bitmap & (1 << i))
2224                         x = i;
2225
2226         return x;
2227 }
2228
2229 /**
2230  *      ata_choose_xfer_mode - attempt to find best transfer mode
2231  *      @ap: Port for which an xfer mode will be selected
2232  *      @xfer_mode_out: (output) SET FEATURES - XFER MODE code
2233  *      @xfer_shift_out: (output) bit shift that selects this mode
2234  *
2235  *      Based on host and device capabilities, determine the
2236  *      maximum transfer mode that is amenable to all.
2237  *
2238  *      LOCKING:
2239  *      PCI/etc. bus probe sem.
2240  *
2241  *      RETURNS:
2242  *      Zero on success, negative on error.
2243  */
2244
2245 static int ata_choose_xfer_mode(const struct ata_port *ap,
2246                                 u8 *xfer_mode_out,
2247                                 unsigned int *xfer_shift_out)
2248 {
2249         unsigned int mask, shift;
2250         int x, i;
2251
2252         for (i = 0; i < ARRAY_SIZE(xfer_mode_classes); i++) {
2253                 shift = xfer_mode_classes[i].shift;
2254                 mask = ata_get_mode_mask(ap, shift);
2255
2256                 x = fgb(mask);
2257                 if (x >= 0) {
2258                         *xfer_mode_out = xfer_mode_classes[i].base + x;
2259                         *xfer_shift_out = shift;
2260                         return 0;
2261                 }
2262         }
2263
2264         return -1;
2265 }
2266
2267 /**
2268  *      ata_dev_set_xfermode - Issue SET FEATURES - XFER MODE command
2269  *      @ap: Port associated with device @dev
2270  *      @dev: Device to which command will be sent
2271  *
2272  *      Issue SET FEATURES - XFER MODE command to device @dev
2273  *      on port @ap.
2274  *
2275  *      LOCKING:
2276  *      PCI/etc. bus probe sem.
2277  */
2278
2279 static void ata_dev_set_xfermode(struct ata_port *ap, struct ata_device *dev)
2280 {
2281         DECLARE_COMPLETION(wait);
2282         struct ata_queued_cmd *qc;
2283         int rc;
2284         unsigned long flags;
2285
2286         /* set up set-features taskfile */
2287         DPRINTK("set features - xfer mode\n");
2288
2289         qc = ata_qc_new_init(ap, dev);
2290         BUG_ON(qc == NULL);
2291
2292         qc->tf.command = ATA_CMD_SET_FEATURES;
2293         qc->tf.feature = SETFEATURES_XFER;
2294         qc->tf.flags |= ATA_TFLAG_ISADDR | ATA_TFLAG_DEVICE;
2295         qc->tf.protocol = ATA_PROT_NODATA;
2296         qc->tf.nsect = dev->xfer_mode;
2297
2298         qc->waiting = &wait;
2299         qc->complete_fn = ata_qc_complete_noop;
2300
2301         spin_lock_irqsave(&ap->host_set->lock, flags);
2302         rc = ata_qc_issue(qc);
2303         spin_unlock_irqrestore(&ap->host_set->lock, flags);
2304
2305         if (rc)
2306                 ata_port_disable(ap);
2307         else
2308                 wait_for_completion(&wait);
2309
2310         DPRINTK("EXIT\n");
2311 }
2312
2313 /**
2314  *      ata_dev_reread_id - Reread the device identify device info
2315  *      @ap: port where the device is
2316  *      @dev: device to reread the identify device info
2317  *
2318  *      LOCKING:
2319  */
2320
2321 static void ata_dev_reread_id(struct ata_port *ap, struct ata_device *dev)
2322 {
2323         DECLARE_COMPLETION(wait);
2324         struct ata_queued_cmd *qc;
2325         unsigned long flags;
2326         int rc;
2327
2328         qc = ata_qc_new_init(ap, dev);
2329         BUG_ON(qc == NULL);
2330
2331         ata_sg_init_one(qc, dev->id, sizeof(dev->id));
2332         qc->dma_dir = DMA_FROM_DEVICE;
2333
2334         if (dev->class == ATA_DEV_ATA) {
2335                 qc->tf.command = ATA_CMD_ID_ATA;
2336                 DPRINTK("do ATA identify\n");
2337         } else {
2338                 qc->tf.command = ATA_CMD_ID_ATAPI;
2339                 DPRINTK("do ATAPI identify\n");
2340         }
2341
2342         qc->tf.flags |= ATA_TFLAG_DEVICE;
2343         qc->tf.protocol = ATA_PROT_PIO;
2344         qc->nsect = 1;
2345
2346         qc->waiting = &wait;
2347         qc->complete_fn = ata_qc_complete_noop;
2348
2349         spin_lock_irqsave(&ap->host_set->lock, flags);
2350         rc = ata_qc_issue(qc);
2351         spin_unlock_irqrestore(&ap->host_set->lock, flags);
2352
2353         if (rc)
2354                 goto err_out;
2355
2356         wait_for_completion(&wait);
2357
2358         swap_buf_le16(dev->id, ATA_ID_WORDS);
2359
2360         ata_dump_id(dev);
2361
2362         DPRINTK("EXIT\n");
2363
2364         return;
2365 err_out:
2366         ata_port_disable(ap);
2367 }
2368
2369 /**
2370  *      ata_dev_init_params - Issue INIT DEV PARAMS command
2371  *      @ap: Port associated with device @dev
2372  *      @dev: Device to which command will be sent
2373  *
2374  *      LOCKING:
2375  */
2376
2377 static void ata_dev_init_params(struct ata_port *ap, struct ata_device *dev)
2378 {
2379         DECLARE_COMPLETION(wait);
2380         struct ata_queued_cmd *qc;
2381         int rc;
2382         unsigned long flags;
2383         u16 sectors = dev->id[6];
2384         u16 heads   = dev->id[3];
2385
2386         /* Number of sectors per track 1-255. Number of heads 1-16 */
2387         if (sectors < 1 || sectors > 255 || heads < 1 || heads > 16)
2388                 return;
2389
2390         /* set up init dev params taskfile */
2391         DPRINTK("init dev params \n");
2392
2393         qc = ata_qc_new_init(ap, dev);
2394         BUG_ON(qc == NULL);
2395
2396         qc->tf.command = ATA_CMD_INIT_DEV_PARAMS;
2397         qc->tf.flags |= ATA_TFLAG_ISADDR | ATA_TFLAG_DEVICE;
2398         qc->tf.protocol = ATA_PROT_NODATA;
2399         qc->tf.nsect = sectors;
2400         qc->tf.device |= (heads - 1) & 0x0f; /* max head = num. of heads - 1 */
2401
2402         qc->waiting = &wait;
2403         qc->complete_fn = ata_qc_complete_noop;
2404
2405         spin_lock_irqsave(&ap->host_set->lock, flags);
2406         rc = ata_qc_issue(qc);
2407         spin_unlock_irqrestore(&ap->host_set->lock, flags);
2408
2409         if (rc)
2410                 ata_port_disable(ap);
2411         else
2412                 wait_for_completion(&wait);
2413
2414         DPRINTK("EXIT\n");
2415 }
2416
2417 /**
2418  *      ata_sg_clean - Unmap DMA memory associated with command
2419  *      @qc: Command containing DMA memory to be released
2420  *
2421  *      Unmap all mapped DMA memory associated with this command.
2422  *
2423  *      LOCKING:
2424  *      spin_lock_irqsave(host_set lock)
2425  */
2426
2427 static void ata_sg_clean(struct ata_queued_cmd *qc)
2428 {
2429         struct ata_port *ap = qc->ap;
2430         struct scatterlist *sg = qc->__sg;
2431         int dir = qc->dma_dir;
2432         void *pad_buf = NULL;
2433
2434         assert(qc->flags & ATA_QCFLAG_DMAMAP);
2435         assert(sg != NULL);
2436
2437         if (qc->flags & ATA_QCFLAG_SINGLE)
2438                 assert(qc->n_elem == 1);
2439
2440         DPRINTK("unmapping %u sg elements\n", qc->n_elem);
2441
2442         /* if we padded the buffer out to 32-bit bound, and data
2443          * xfer direction is from-device, we must copy from the
2444          * pad buffer back into the supplied buffer
2445          */
2446         if (qc->pad_len && !(qc->tf.flags & ATA_TFLAG_WRITE))
2447                 pad_buf = ap->pad + (qc->tag * ATA_DMA_PAD_SZ);
2448
2449         if (qc->flags & ATA_QCFLAG_SG) {
2450                 dma_unmap_sg(ap->host_set->dev, sg, qc->n_elem, dir);
2451                 /* restore last sg */
2452                 sg[qc->orig_n_elem - 1].length += qc->pad_len;
2453                 if (pad_buf) {
2454                         struct scatterlist *psg = &qc->pad_sgent;
2455                         void *addr = kmap_atomic(psg->page, KM_IRQ0);
2456                         memcpy(addr + psg->offset, pad_buf, qc->pad_len);
2457                         kunmap_atomic(psg->page, KM_IRQ0);
2458                 }
2459         } else {
2460                 dma_unmap_single(ap->host_set->dev, sg_dma_address(&sg[0]),
2461                                  sg_dma_len(&sg[0]), dir);
2462                 /* restore sg */
2463                 sg->length += qc->pad_len;
2464                 if (pad_buf)
2465                         memcpy(qc->buf_virt + sg->length - qc->pad_len,
2466                                pad_buf, qc->pad_len);
2467         }
2468
2469         qc->flags &= ~ATA_QCFLAG_DMAMAP;
2470         qc->__sg = NULL;
2471 }
2472
2473 /**
2474  *      ata_fill_sg - Fill PCI IDE PRD table
2475  *      @qc: Metadata associated with taskfile to be transferred
2476  *
2477  *      Fill PCI IDE PRD (scatter-gather) table with segments
2478  *      associated with the current disk command.
2479  *
2480  *      LOCKING:
2481  *      spin_lock_irqsave(host_set lock)
2482  *
2483  */
2484 static void ata_fill_sg(struct ata_queued_cmd *qc)
2485 {
2486         struct ata_port *ap = qc->ap;
2487         struct scatterlist *sg;
2488         unsigned int idx;
2489
2490         assert(qc->__sg != NULL);
2491         assert(qc->n_elem > 0);
2492
2493         idx = 0;
2494         ata_for_each_sg(sg, qc) {
2495                 u32 addr, offset;
2496                 u32 sg_len, len;
2497
2498                 /* determine if physical DMA addr spans 64K boundary.
2499                  * Note h/w doesn't support 64-bit, so we unconditionally
2500                  * truncate dma_addr_t to u32.
2501                  */
2502                 addr = (u32) sg_dma_address(sg);
2503                 sg_len = sg_dma_len(sg);
2504
2505                 while (sg_len) {
2506                         offset = addr & 0xffff;
2507                         len = sg_len;
2508                         if ((offset + sg_len) > 0x10000)
2509                                 len = 0x10000 - offset;
2510
2511                         ap->prd[idx].addr = cpu_to_le32(addr);
2512                         ap->prd[idx].flags_len = cpu_to_le32(len & 0xffff);
2513                         VPRINTK("PRD[%u] = (0x%X, 0x%X)\n", idx, addr, len);
2514
2515                         idx++;
2516                         sg_len -= len;
2517                         addr += len;
2518                 }
2519         }
2520
2521         if (idx)
2522                 ap->prd[idx - 1].flags_len |= cpu_to_le32(ATA_PRD_EOT);
2523 }
2524 /**
2525  *      ata_check_atapi_dma - Check whether ATAPI DMA can be supported
2526  *      @qc: Metadata associated with taskfile to check
2527  *
2528  *      Allow low-level driver to filter ATA PACKET commands, returning
2529  *      a status indicating whether or not it is OK to use DMA for the
2530  *      supplied PACKET command.
2531  *
2532  *      LOCKING:
2533  *      spin_lock_irqsave(host_set lock)
2534  *
2535  *      RETURNS: 0 when ATAPI DMA can be used
2536  *               nonzero otherwise
2537  */
2538 int ata_check_atapi_dma(struct ata_queued_cmd *qc)
2539 {
2540         struct ata_port *ap = qc->ap;
2541         int rc = 0; /* Assume ATAPI DMA is OK by default */
2542
2543         if (ap->ops->check_atapi_dma)
2544                 rc = ap->ops->check_atapi_dma(qc);
2545
2546         return rc;
2547 }
2548 /**
2549  *      ata_qc_prep - Prepare taskfile for submission
2550  *      @qc: Metadata associated with taskfile to be prepared
2551  *
2552  *      Prepare ATA taskfile for submission.
2553  *
2554  *      LOCKING:
2555  *      spin_lock_irqsave(host_set lock)
2556  */
2557 void ata_qc_prep(struct ata_queued_cmd *qc)
2558 {
2559         if (!(qc->flags & ATA_QCFLAG_DMAMAP))
2560                 return;
2561
2562         ata_fill_sg(qc);
2563 }
2564
2565 /**
2566  *      ata_sg_init_one - Associate command with memory buffer
2567  *      @qc: Command to be associated
2568  *      @buf: Memory buffer
2569  *      @buflen: Length of memory buffer, in bytes.
2570  *
2571  *      Initialize the data-related elements of queued_cmd @qc
2572  *      to point to a single memory buffer, @buf of byte length @buflen.
2573  *
2574  *      LOCKING:
2575  *      spin_lock_irqsave(host_set lock)
2576  */
2577
2578 void ata_sg_init_one(struct ata_queued_cmd *qc, void *buf, unsigned int buflen)
2579 {
2580         struct scatterlist *sg;
2581
2582         qc->flags |= ATA_QCFLAG_SINGLE;
2583
2584         memset(&qc->sgent, 0, sizeof(qc->sgent));
2585         qc->__sg = &qc->sgent;
2586         qc->n_elem = 1;
2587         qc->orig_n_elem = 1;
2588         qc->buf_virt = buf;
2589
2590         sg = qc->__sg;
2591         sg_init_one(sg, buf, buflen);
2592 }
2593
2594 /**
2595  *      ata_sg_init - Associate command with scatter-gather table.
2596  *      @qc: Command to be associated
2597  *      @sg: Scatter-gather table.
2598  *      @n_elem: Number of elements in s/g table.
2599  *
2600  *      Initialize the data-related elements of queued_cmd @qc
2601  *      to point to a scatter-gather table @sg, containing @n_elem
2602  *      elements.
2603  *
2604  *      LOCKING:
2605  *      spin_lock_irqsave(host_set lock)
2606  */
2607
2608 void ata_sg_init(struct ata_queued_cmd *qc, struct scatterlist *sg,
2609                  unsigned int n_elem)
2610 {
2611         qc->flags |= ATA_QCFLAG_SG;
2612         qc->__sg = sg;
2613         qc->n_elem = n_elem;
2614         qc->orig_n_elem = n_elem;
2615 }
2616
2617 /**
2618  *      ata_sg_setup_one - DMA-map the memory buffer associated with a command.
2619  *      @qc: Command with memory buffer to be mapped.
2620  *
2621  *      DMA-map the memory buffer associated with queued_cmd @qc.
2622  *
2623  *      LOCKING:
2624  *      spin_lock_irqsave(host_set lock)
2625  *
2626  *      RETURNS:
2627  *      Zero on success, negative on error.
2628  */
2629
2630 static int ata_sg_setup_one(struct ata_queued_cmd *qc)
2631 {
2632         struct ata_port *ap = qc->ap;
2633         int dir = qc->dma_dir;
2634         struct scatterlist *sg = qc->__sg;
2635         dma_addr_t dma_address;
2636
2637         /* we must lengthen transfers to end on a 32-bit boundary */
2638         qc->pad_len = sg->length & 3;
2639         if (qc->pad_len) {
2640                 void *pad_buf = ap->pad + (qc->tag * ATA_DMA_PAD_SZ);
2641                 struct scatterlist *psg = &qc->pad_sgent;
2642
2643                 assert(qc->dev->class == ATA_DEV_ATAPI);
2644
2645                 memset(pad_buf, 0, ATA_DMA_PAD_SZ);
2646
2647                 if (qc->tf.flags & ATA_TFLAG_WRITE)
2648                         memcpy(pad_buf, qc->buf_virt + sg->length - qc->pad_len,
2649                                qc->pad_len);
2650
2651                 sg_dma_address(psg) = ap->pad_dma + (qc->tag * ATA_DMA_PAD_SZ);
2652                 sg_dma_len(psg) = ATA_DMA_PAD_SZ;
2653                 /* trim sg */
2654                 sg->length -= qc->pad_len;
2655
2656                 DPRINTK("padding done, sg->length=%u pad_len=%u\n",
2657                         sg->length, qc->pad_len);
2658         }
2659
2660         dma_address = dma_map_single(ap->host_set->dev, qc->buf_virt,
2661                                      sg->length, dir);
2662         if (dma_mapping_error(dma_address))
2663                 return -1;
2664
2665         sg_dma_address(sg) = dma_address;
2666         sg_dma_len(sg) = sg->length;
2667
2668         DPRINTK("mapped buffer of %d bytes for %s\n", sg_dma_len(sg),
2669                 qc->tf.flags & ATA_TFLAG_WRITE ? "write" : "read");
2670
2671         return 0;
2672 }
2673
2674 /**
2675  *      ata_sg_setup - DMA-map the scatter-gather table associated with a command.
2676  *      @qc: Command with scatter-gather table to be mapped.
2677  *
2678  *      DMA-map the scatter-gather table associated with queued_cmd @qc.
2679  *
2680  *      LOCKING:
2681  *      spin_lock_irqsave(host_set lock)
2682  *
2683  *      RETURNS:
2684  *      Zero on success, negative on error.
2685  *
2686  */
2687
2688 static int ata_sg_setup(struct ata_queued_cmd *qc)
2689 {
2690         struct ata_port *ap = qc->ap;
2691         struct scatterlist *sg = qc->__sg;
2692         struct scatterlist *lsg = &sg[qc->n_elem - 1];
2693         int n_elem, dir;
2694
2695         VPRINTK("ENTER, ata%u\n", ap->id);
2696         assert(qc->flags & ATA_QCFLAG_SG);
2697
2698         /* we must lengthen transfers to end on a 32-bit boundary */
2699         qc->pad_len = lsg->length & 3;
2700         if (qc->pad_len) {
2701                 void *pad_buf = ap->pad + (qc->tag * ATA_DMA_PAD_SZ);
2702                 struct scatterlist *psg = &qc->pad_sgent;
2703                 unsigned int offset;
2704
2705                 assert(qc->dev->class == ATA_DEV_ATAPI);
2706
2707                 memset(pad_buf, 0, ATA_DMA_PAD_SZ);
2708
2709                 /*
2710                  * psg->page/offset are used to copy to-be-written
2711                  * data in this function or read data in ata_sg_clean.
2712                  */
2713                 offset = lsg->offset + lsg->length - qc->pad_len;
2714                 psg->page = nth_page(lsg->page, offset >> PAGE_SHIFT);
2715                 psg->offset = offset_in_page(offset);
2716
2717                 if (qc->tf.flags & ATA_TFLAG_WRITE) {
2718                         void *addr = kmap_atomic(psg->page, KM_IRQ0);
2719                         memcpy(pad_buf, addr + psg->offset, qc->pad_len);
2720                         kunmap_atomic(psg->page, KM_IRQ0);
2721                 }
2722
2723                 sg_dma_address(psg) = ap->pad_dma + (qc->tag * ATA_DMA_PAD_SZ);
2724                 sg_dma_len(psg) = ATA_DMA_PAD_SZ;
2725                 /* trim last sg */
2726                 lsg->length -= qc->pad_len;
2727
2728                 DPRINTK("padding done, sg[%d].length=%u pad_len=%u\n",
2729                         qc->n_elem - 1, lsg->length, qc->pad_len);
2730         }
2731
2732         dir = qc->dma_dir;
2733         n_elem = dma_map_sg(ap->host_set->dev, sg, qc->n_elem, dir);
2734         if (n_elem < 1)
2735                 return -1;
2736
2737         DPRINTK("%d sg elements mapped\n", n_elem);
2738
2739         qc->n_elem = n_elem;
2740
2741         return 0;
2742 }
2743
2744 /**
2745  *      ata_poll_qc_complete - turn irq back on and finish qc
2746  *      @qc: Command to complete
2747  *      @drv_stat: ATA status register content
2748  *
2749  *      LOCKING:
2750  *      None.  (grabs host lock)
2751  */
2752
2753 void ata_poll_qc_complete(struct ata_queued_cmd *qc, unsigned int err_mask)
2754 {
2755         struct ata_port *ap = qc->ap;
2756         unsigned long flags;
2757
2758         spin_lock_irqsave(&ap->host_set->lock, flags);
2759         ap->flags &= ~ATA_FLAG_NOINTR;
2760         ata_irq_on(ap);
2761         ata_qc_complete(qc, err_mask);
2762         spin_unlock_irqrestore(&ap->host_set->lock, flags);
2763 }
2764
2765 /**
2766  *      ata_pio_poll -
2767  *      @ap: the target ata_port
2768  *
2769  *      LOCKING:
2770  *      None.  (executing in kernel thread context)
2771  *
2772  *      RETURNS:
2773  *      timeout value to use
2774  */
2775
2776 static unsigned long ata_pio_poll(struct ata_port *ap)
2777 {
2778         u8 status;
2779         unsigned int poll_state = HSM_ST_UNKNOWN;
2780         unsigned int reg_state = HSM_ST_UNKNOWN;
2781         const unsigned int tmout_state = HSM_ST_TMOUT;
2782
2783         switch (ap->hsm_task_state) {
2784         case HSM_ST:
2785         case HSM_ST_POLL:
2786                 poll_state = HSM_ST_POLL;
2787                 reg_state = HSM_ST;
2788                 break;
2789         case HSM_ST_LAST:
2790         case HSM_ST_LAST_POLL:
2791                 poll_state = HSM_ST_LAST_POLL;
2792                 reg_state = HSM_ST_LAST;
2793                 break;
2794         default:
2795                 BUG();
2796                 break;
2797         }
2798
2799         status = ata_chk_status(ap);
2800         if (status & ATA_BUSY) {
2801                 if (time_after(jiffies, ap->pio_task_timeout)) {
2802                         ap->hsm_task_state = tmout_state;
2803                         return 0;
2804                 }
2805                 ap->hsm_task_state = poll_state;
2806                 return ATA_SHORT_PAUSE;
2807         }
2808
2809         ap->hsm_task_state = reg_state;
2810         return 0;
2811 }
2812
2813 /**
2814  *      ata_pio_complete - check if drive is busy or idle
2815  *      @ap: the target ata_port
2816  *
2817  *      LOCKING:
2818  *      None.  (executing in kernel thread context)
2819  *
2820  *      RETURNS:
2821  *      Non-zero if qc completed, zero otherwise.
2822  */
2823
2824 static int ata_pio_complete (struct ata_port *ap)
2825 {
2826         struct ata_queued_cmd *qc;
2827         u8 drv_stat;
2828
2829         /*
2830          * This is purely heuristic.  This is a fast path.  Sometimes when
2831          * we enter, BSY will be cleared in a chk-status or two.  If not,
2832          * the drive is probably seeking or something.  Snooze for a couple
2833          * msecs, then chk-status again.  If still busy, fall back to
2834          * HSM_ST_POLL state.
2835          */
2836         drv_stat = ata_busy_wait(ap, ATA_BUSY | ATA_DRQ, 10);
2837         if (drv_stat & (ATA_BUSY | ATA_DRQ)) {
2838                 msleep(2);
2839                 drv_stat = ata_busy_wait(ap, ATA_BUSY | ATA_DRQ, 10);
2840                 if (drv_stat & (ATA_BUSY | ATA_DRQ)) {
2841                         ap->hsm_task_state = HSM_ST_LAST_POLL;
2842                         ap->pio_task_timeout = jiffies + ATA_TMOUT_PIO;
2843                         return 0;
2844                 }
2845         }
2846
2847         drv_stat = ata_wait_idle(ap);
2848         if (!ata_ok(drv_stat)) {
2849                 ap->hsm_task_state = HSM_ST_ERR;
2850                 return 0;
2851         }
2852
2853         qc = ata_qc_from_tag(ap, ap->active_tag);
2854         assert(qc != NULL);
2855
2856         ap->hsm_task_state = HSM_ST_IDLE;
2857
2858         ata_poll_qc_complete(qc, 0);
2859
2860         /* another command may start at this point */
2861
2862         return 1;
2863 }
2864
2865
2866 /**
2867  *      swap_buf_le16 - swap halves of 16-words in place
2868  *      @buf:  Buffer to swap
2869  *      @buf_words:  Number of 16-bit words in buffer.
2870  *
2871  *      Swap halves of 16-bit words if needed to convert from
2872  *      little-endian byte order to native cpu byte order, or
2873  *      vice-versa.
2874  *
2875  *      LOCKING:
2876  *      Inherited from caller.
2877  */
2878 void swap_buf_le16(u16 *buf, unsigned int buf_words)
2879 {
2880 #ifdef __BIG_ENDIAN
2881         unsigned int i;
2882
2883         for (i = 0; i < buf_words; i++)
2884                 buf[i] = le16_to_cpu(buf[i]);
2885 #endif /* __BIG_ENDIAN */
2886 }
2887
2888 /**
2889  *      ata_mmio_data_xfer - Transfer data by MMIO
2890  *      @ap: port to read/write
2891  *      @buf: data buffer
2892  *      @buflen: buffer length
2893  *      @write_data: read/write
2894  *
2895  *      Transfer data from/to the device data register by MMIO.
2896  *
2897  *      LOCKING:
2898  *      Inherited from caller.
2899  */
2900
2901 static void ata_mmio_data_xfer(struct ata_port *ap, unsigned char *buf,
2902                                unsigned int buflen, int write_data)
2903 {
2904         unsigned int i;
2905         unsigned int words = buflen >> 1;
2906         u16 *buf16 = (u16 *) buf;
2907         void __iomem *mmio = (void __iomem *)ap->ioaddr.data_addr;
2908
2909         /* Transfer multiple of 2 bytes */
2910         if (write_data) {
2911                 for (i = 0; i < words; i++)
2912                         writew(le16_to_cpu(buf16[i]), mmio);
2913         } else {
2914                 for (i = 0; i < words; i++)
2915                         buf16[i] = cpu_to_le16(readw(mmio));
2916         }
2917
2918         /* Transfer trailing 1 byte, if any. */
2919         if (unlikely(buflen & 0x01)) {
2920                 u16 align_buf[1] = { 0 };
2921                 unsigned char *trailing_buf = buf + buflen - 1;
2922
2923                 if (write_data) {
2924                         memcpy(align_buf, trailing_buf, 1);
2925                         writew(le16_to_cpu(align_buf[0]), mmio);
2926                 } else {
2927                         align_buf[0] = cpu_to_le16(readw(mmio));
2928                         memcpy(trailing_buf, align_buf, 1);
2929                 }
2930         }
2931 }
2932
2933 /**
2934  *      ata_pio_data_xfer - Transfer data by PIO
2935  *      @ap: port to read/write
2936  *      @buf: data buffer
2937  *      @buflen: buffer length
2938  *      @write_data: read/write
2939  *
2940  *      Transfer data from/to the device data register by PIO.
2941  *
2942  *      LOCKING:
2943  *      Inherited from caller.
2944  */
2945
2946 static void ata_pio_data_xfer(struct ata_port *ap, unsigned char *buf,
2947                               unsigned int buflen, int write_data)
2948 {
2949         unsigned int words = buflen >> 1;
2950
2951         /* Transfer multiple of 2 bytes */
2952         if (write_data)
2953                 outsw(ap->ioaddr.data_addr, buf, words);
2954         else
2955                 insw(ap->ioaddr.data_addr, buf, words);
2956
2957         /* Transfer trailing 1 byte, if any. */
2958         if (unlikely(buflen & 0x01)) {
2959                 u16 align_buf[1] = { 0 };
2960                 unsigned char *trailing_buf = buf + buflen - 1;
2961
2962                 if (write_data) {
2963                         memcpy(align_buf, trailing_buf, 1);
2964                         outw(le16_to_cpu(align_buf[0]), ap->ioaddr.data_addr);
2965                 } else {
2966                         align_buf[0] = cpu_to_le16(inw(ap->ioaddr.data_addr));
2967                         memcpy(trailing_buf, align_buf, 1);
2968                 }
2969         }
2970 }
2971
2972 /**
2973  *      ata_data_xfer - Transfer data from/to the data register.
2974  *      @ap: port to read/write
2975  *      @buf: data buffer
2976  *      @buflen: buffer length
2977  *      @do_write: read/write
2978  *
2979  *      Transfer data from/to the device data register.
2980  *
2981  *      LOCKING:
2982  *      Inherited from caller.
2983  */
2984
2985 static void ata_data_xfer(struct ata_port *ap, unsigned char *buf,
2986                           unsigned int buflen, int do_write)
2987 {
2988         if (ap->flags & ATA_FLAG_MMIO)
2989                 ata_mmio_data_xfer(ap, buf, buflen, do_write);
2990         else
2991                 ata_pio_data_xfer(ap, buf, buflen, do_write);
2992 }
2993
2994 /**
2995  *      ata_pio_sector - Transfer ATA_SECT_SIZE (512 bytes) of data.
2996  *      @qc: Command on going
2997  *
2998  *      Transfer ATA_SECT_SIZE of data from/to the ATA device.
2999  *
3000  *      LOCKING:
3001  *      Inherited from caller.
3002  */
3003
3004 static void ata_pio_sector(struct ata_queued_cmd *qc)
3005 {
3006         int do_write = (qc->tf.flags & ATA_TFLAG_WRITE);
3007         struct scatterlist *sg = qc->__sg;
3008         struct ata_port *ap = qc->ap;
3009         struct page *page;
3010         unsigned int offset;
3011         unsigned char *buf;
3012
3013         if (qc->cursect == (qc->nsect - 1))
3014                 ap->hsm_task_state = HSM_ST_LAST;
3015
3016         page = sg[qc->cursg].page;
3017         offset = sg[qc->cursg].offset + qc->cursg_ofs * ATA_SECT_SIZE;
3018
3019         /* get the current page and offset */
3020         page = nth_page(page, (offset >> PAGE_SHIFT));
3021         offset %= PAGE_SIZE;
3022
3023         buf = kmap(page) + offset;
3024
3025         qc->cursect++;
3026         qc->cursg_ofs++;
3027
3028         if ((qc->cursg_ofs * ATA_SECT_SIZE) == (&sg[qc->cursg])->length) {
3029                 qc->cursg++;
3030                 qc->cursg_ofs = 0;
3031         }
3032
3033         DPRINTK("data %s\n", qc->tf.flags & ATA_TFLAG_WRITE ? "write" : "read");
3034
3035         /* do the actual data transfer */
3036         do_write = (qc->tf.flags & ATA_TFLAG_WRITE);
3037         ata_data_xfer(ap, buf, ATA_SECT_SIZE, do_write);
3038
3039         kunmap(page);
3040 }
3041
3042 /**
3043  *      __atapi_pio_bytes - Transfer data from/to the ATAPI device.
3044  *      @qc: Command on going
3045  *      @bytes: number of bytes
3046  *
3047  *      Transfer Transfer data from/to the ATAPI device.
3048  *
3049  *      LOCKING:
3050  *      Inherited from caller.
3051  *
3052  */
3053
3054 static void __atapi_pio_bytes(struct ata_queued_cmd *qc, unsigned int bytes)
3055 {
3056         int do_write = (qc->tf.flags & ATA_TFLAG_WRITE);
3057         struct scatterlist *sg = qc->__sg;
3058         struct ata_port *ap = qc->ap;
3059         struct page *page;
3060         unsigned char *buf;
3061         unsigned int offset, count;
3062
3063         if (qc->curbytes + bytes >= qc->nbytes)
3064                 ap->hsm_task_state = HSM_ST_LAST;
3065
3066 next_sg:
3067         if (unlikely(qc->cursg >= qc->n_elem)) {
3068                 /*
3069                  * The end of qc->sg is reached and the device expects
3070                  * more data to transfer. In order not to overrun qc->sg
3071                  * and fulfill length specified in the byte count register,
3072                  *    - for read case, discard trailing data from the device
3073                  *    - for write case, padding zero data to the device
3074                  */
3075                 u16 pad_buf[1] = { 0 };
3076                 unsigned int words = bytes >> 1;
3077                 unsigned int i;
3078
3079                 if (words) /* warning if bytes > 1 */
3080                         printk(KERN_WARNING "ata%u: %u bytes trailing data\n",
3081                                ap->id, bytes);
3082
3083                 for (i = 0; i < words; i++)
3084                         ata_data_xfer(ap, (unsigned char*)pad_buf, 2, do_write);
3085
3086                 ap->hsm_task_state = HSM_ST_LAST;
3087                 return;
3088         }
3089
3090         sg = &qc->__sg[qc->cursg];
3091
3092         page = sg->page;
3093         offset = sg->offset + qc->cursg_ofs;
3094
3095         /* get the current page and offset */
3096         page = nth_page(page, (offset >> PAGE_SHIFT));
3097         offset %= PAGE_SIZE;
3098
3099         /* don't overrun current sg */
3100         count = min(sg->length - qc->cursg_ofs, bytes);
3101
3102         /* don't cross page boundaries */
3103         count = min(count, (unsigned int)PAGE_SIZE - offset);
3104
3105         buf = kmap(page) + offset;
3106
3107         bytes -= count;
3108         qc->curbytes += count;
3109         qc->cursg_ofs += count;
3110
3111         if (qc->cursg_ofs == sg->length) {
3112                 qc->cursg++;
3113                 qc->cursg_ofs = 0;
3114         }
3115
3116         DPRINTK("data %s\n", qc->tf.flags & ATA_TFLAG_WRITE ? "write" : "read");
3117
3118         /* do the actual data transfer */
3119         ata_data_xfer(ap, buf, count, do_write);
3120
3121         kunmap(page);
3122
3123         if (bytes)
3124                 goto next_sg;
3125 }
3126
3127 /**
3128  *      atapi_pio_bytes - Transfer data from/to the ATAPI device.
3129  *      @qc: Command on going
3130  *
3131  *      Transfer Transfer data from/to the ATAPI device.
3132  *
3133  *      LOCKING:
3134  *      Inherited from caller.
3135  */
3136
3137 static void atapi_pio_bytes(struct ata_queued_cmd *qc)
3138 {
3139         struct ata_port *ap = qc->ap;
3140         struct ata_device *dev = qc->dev;
3141         unsigned int ireason, bc_lo, bc_hi, bytes;
3142         int i_write, do_write = (qc->tf.flags & ATA_TFLAG_WRITE) ? 1 : 0;
3143
3144         ap->ops->tf_read(ap, &qc->tf);
3145         ireason = qc->tf.nsect;
3146         bc_lo = qc->tf.lbam;
3147         bc_hi = qc->tf.lbah;
3148         bytes = (bc_hi << 8) | bc_lo;
3149
3150         /* shall be cleared to zero, indicating xfer of data */
3151         if (ireason & (1 << 0))
3152                 goto err_out;
3153
3154         /* make sure transfer direction matches expected */
3155         i_write = ((ireason & (1 << 1)) == 0) ? 1 : 0;
3156         if (do_write != i_write)
3157                 goto err_out;
3158
3159         __atapi_pio_bytes(qc, bytes);
3160
3161         return;
3162
3163 err_out:
3164         printk(KERN_INFO "ata%u: dev %u: ATAPI check failed\n",
3165               ap->id, dev->devno);
3166         ap->hsm_task_state = HSM_ST_ERR;
3167 }
3168
3169 /**
3170  *      ata_pio_block - start PIO on a block
3171  *      @ap: the target ata_port
3172  *
3173  *      LOCKING:
3174  *      None.  (executing in kernel thread context)
3175  */
3176
3177 static void ata_pio_block(struct ata_port *ap)
3178 {
3179         struct ata_queued_cmd *qc;
3180         u8 status;
3181
3182         /*
3183          * This is purely heuristic.  This is a fast path.
3184          * Sometimes when we enter, BSY will be cleared in
3185          * a chk-status or two.  If not, the drive is probably seeking
3186          * or something.  Snooze for a couple msecs, then
3187          * chk-status again.  If still busy, fall back to
3188          * HSM_ST_POLL state.
3189          */
3190         status = ata_busy_wait(ap, ATA_BUSY, 5);
3191         if (status & ATA_BUSY) {
3192                 msleep(2);
3193                 status = ata_busy_wait(ap, ATA_BUSY, 10);
3194                 if (status & ATA_BUSY) {
3195                         ap->hsm_task_state = HSM_ST_POLL;
3196                         ap->pio_task_timeout = jiffies + ATA_TMOUT_PIO;
3197                         return;
3198                 }
3199         }
3200
3201         qc = ata_qc_from_tag(ap, ap->active_tag);
3202         assert(qc != NULL);
3203
3204         if (is_atapi_taskfile(&qc->tf)) {
3205                 /* no more data to transfer or unsupported ATAPI command */
3206                 if ((status & ATA_DRQ) == 0) {
3207                         ap->hsm_task_state = HSM_ST_LAST;
3208                         return;
3209                 }
3210
3211                 atapi_pio_bytes(qc);
3212         } else {
3213                 /* handle BSY=0, DRQ=0 as error */
3214                 if ((status & ATA_DRQ) == 0) {
3215                         ap->hsm_task_state = HSM_ST_ERR;
3216                         return;
3217                 }
3218
3219                 ata_pio_sector(qc);
3220         }
3221 }
3222
3223 static void ata_pio_error(struct ata_port *ap)
3224 {
3225         struct ata_queued_cmd *qc;
3226
3227         printk(KERN_WARNING "ata%u: PIO error\n", ap->id);
3228
3229         qc = ata_qc_from_tag(ap, ap->active_tag);
3230         assert(qc != NULL);
3231
3232         ap->hsm_task_state = HSM_ST_IDLE;
3233
3234         ata_poll_qc_complete(qc, AC_ERR_ATA_BUS);
3235 }
3236
3237 static void ata_pio_task(void *_data)
3238 {
3239         struct ata_port *ap = _data;
3240         unsigned long timeout;
3241         int qc_completed;
3242
3243 fsm_start:
3244         timeout = 0;
3245         qc_completed = 0;
3246
3247         switch (ap->hsm_task_state) {
3248         case HSM_ST_IDLE:
3249                 return;
3250
3251         case HSM_ST:
3252                 ata_pio_block(ap);
3253                 break;
3254
3255         case HSM_ST_LAST:
3256                 qc_completed = ata_pio_complete(ap);
3257                 break;
3258
3259         case HSM_ST_POLL:
3260         case HSM_ST_LAST_POLL:
3261                 timeout = ata_pio_poll(ap);
3262                 break;
3263
3264         case HSM_ST_TMOUT:
3265         case HSM_ST_ERR:
3266                 ata_pio_error(ap);
3267                 return;
3268         }
3269
3270         if (timeout)
3271                 queue_delayed_work(ata_wq, &ap->pio_task, timeout);
3272         else if (!qc_completed)
3273                 goto fsm_start;
3274 }
3275
3276 /**
3277  *      ata_qc_timeout - Handle timeout of queued command
3278  *      @qc: Command that timed out
3279  *
3280  *      Some part of the kernel (currently, only the SCSI layer)
3281  *      has noticed that the active command on port @ap has not
3282  *      completed after a specified length of time.  Handle this
3283  *      condition by disabling DMA (if necessary) and completing
3284  *      transactions, with error if necessary.
3285  *
3286  *      This also handles the case of the "lost interrupt", where
3287  *      for some reason (possibly hardware bug, possibly driver bug)
3288  *      an interrupt was not delivered to the driver, even though the
3289  *      transaction completed successfully.
3290  *
3291  *      LOCKING:
3292  *      Inherited from SCSI layer (none, can sleep)
3293  */
3294
3295 static void ata_qc_timeout(struct ata_queued_cmd *qc)
3296 {
3297         struct ata_port *ap = qc->ap;
3298         struct ata_host_set *host_set = ap->host_set;
3299         struct ata_device *dev = qc->dev;
3300         u8 host_stat = 0, drv_stat;
3301         unsigned long flags;
3302
3303         DPRINTK("ENTER\n");
3304
3305         /* FIXME: doesn't this conflict with timeout handling? */
3306         if (qc->dev->class == ATA_DEV_ATAPI && qc->scsicmd) {
3307                 struct scsi_cmnd *cmd = qc->scsicmd;
3308
3309                 if (!(cmd->eh_eflags & SCSI_EH_CANCEL_CMD)) {
3310
3311                         /* finish completing original command */
3312                         spin_lock_irqsave(&host_set->lock, flags);
3313                         __ata_qc_complete(qc);
3314                         spin_unlock_irqrestore(&host_set->lock, flags);
3315
3316                         atapi_request_sense(ap, dev, cmd);
3317
3318                         cmd->result = (CHECK_CONDITION << 1) | (DID_OK << 16);
3319                         scsi_finish_command(cmd);
3320
3321                         goto out;
3322                 }
3323         }
3324
3325         spin_lock_irqsave(&host_set->lock, flags);
3326
3327         /* hack alert!  We cannot use the supplied completion
3328          * function from inside the ->eh_strategy_handler() thread.
3329          * libata is the only user of ->eh_strategy_handler() in
3330          * any kernel, so the default scsi_done() assumes it is
3331          * not being called from the SCSI EH.
3332          */
3333         qc->scsidone = scsi_finish_command;
3334
3335         switch (qc->tf.protocol) {
3336
3337         case ATA_PROT_DMA:
3338         case ATA_PROT_ATAPI_DMA:
3339                 host_stat = ap->ops->bmdma_status(ap);
3340
3341                 /* before we do anything else, clear DMA-Start bit */
3342                 ap->ops->bmdma_stop(qc);
3343
3344                 /* fall through */
3345
3346         default:
3347                 ata_altstatus(ap);
3348                 drv_stat = ata_chk_status(ap);
3349
3350                 /* ack bmdma irq events */
3351                 ap->ops->irq_clear(ap);
3352
3353                 printk(KERN_ERR "ata%u: command 0x%x timeout, stat 0x%x host_stat 0x%x\n",
3354                        ap->id, qc->tf.command, drv_stat, host_stat);
3355
3356                 /* complete taskfile transaction */
3357                 ata_qc_complete(qc, ac_err_mask(drv_stat));
3358                 break;
3359         }
3360
3361         spin_unlock_irqrestore(&host_set->lock, flags);
3362
3363 out:
3364         DPRINTK("EXIT\n");
3365 }
3366
3367 /**
3368  *      ata_eng_timeout - Handle timeout of queued command
3369  *      @ap: Port on which timed-out command is active
3370  *
3371  *      Some part of the kernel (currently, only the SCSI layer)
3372  *      has noticed that the active command on port @ap has not
3373  *      completed after a specified length of time.  Handle this
3374  *      condition by disabling DMA (if necessary) and completing
3375  *      transactions, with error if necessary.
3376  *
3377  *      This also handles the case of the "lost interrupt", where
3378  *      for some reason (possibly hardware bug, possibly driver bug)
3379  *      an interrupt was not delivered to the driver, even though the
3380  *      transaction completed successfully.
3381  *
3382  *      LOCKING:
3383  *      Inherited from SCSI layer (none, can sleep)
3384  */
3385
3386 void ata_eng_timeout(struct ata_port *ap)
3387 {
3388         struct ata_queued_cmd *qc;
3389
3390         DPRINTK("ENTER\n");
3391
3392         qc = ata_qc_from_tag(ap, ap->active_tag);
3393         if (qc)
3394                 ata_qc_timeout(qc);
3395         else {
3396                 printk(KERN_ERR "ata%u: BUG: timeout without command\n",
3397                        ap->id);
3398                 goto out;
3399         }
3400
3401 out:
3402         DPRINTK("EXIT\n");
3403 }
3404
3405 /**
3406  *      ata_qc_new - Request an available ATA command, for queueing
3407  *      @ap: Port associated with device @dev
3408  *      @dev: Device from whom we request an available command structure
3409  *
3410  *      LOCKING:
3411  *      None.
3412  */
3413
3414 static struct ata_queued_cmd *ata_qc_new(struct ata_port *ap)
3415 {
3416         struct ata_queued_cmd *qc = NULL;
3417         unsigned int i;
3418