2 * Copyright (C) 2000-2002 Michael Cornwell <cornwell@acm.org>
3 * Copyright (C) 2000-2002 Andre Hedrick <andre@linux-ide.org>
4 * Copyright (C) 2001-2002 Klaus Smolin
5 * IBM Storage Technology Division
6 * Copyright (C) 2003-2004, 2007 Bartlomiej Zolnierkiewicz
8 * The big the bad and the ugly.
11 #include <linux/types.h>
12 #include <linux/string.h>
13 #include <linux/kernel.h>
14 #include <linux/sched.h>
15 #include <linux/interrupt.h>
16 #include <linux/errno.h>
17 #include <linux/slab.h>
18 #include <linux/delay.h>
19 #include <linux/hdreg.h>
20 #include <linux/ide.h>
21 #include <linux/scatterlist.h>
23 #include <asm/uaccess.h>
26 void ide_tf_dump(const char *s, struct ide_taskfile *tf)
29 printk("%s: tf: feat 0x%02x nsect 0x%02x lbal 0x%02x "
30 "lbam 0x%02x lbah 0x%02x dev 0x%02x cmd 0x%02x\n",
31 s, tf->feature, tf->nsect, tf->lbal,
32 tf->lbam, tf->lbah, tf->device, tf->command);
33 printk("%s: hob: nsect 0x%02x lbal 0x%02x "
34 "lbam 0x%02x lbah 0x%02x\n",
35 s, tf->hob_nsect, tf->hob_lbal,
36 tf->hob_lbam, tf->hob_lbah);
40 int taskfile_lib_get_identify (ide_drive_t *drive, u8 *buf)
44 memset(&args, 0, sizeof(ide_task_t));
46 if (drive->media == ide_disk)
47 args.tf.command = WIN_IDENTIFY;
49 args.tf.command = WIN_PIDENTIFY;
50 args.tf_flags = IDE_TFLAG_TF | IDE_TFLAG_DEVICE;
51 args.data_phase = TASKFILE_IN;
52 return ide_raw_taskfile(drive, &args, buf, 1);
55 static ide_startstop_t task_no_data_intr(ide_drive_t *);
56 static ide_startstop_t set_geometry_intr(ide_drive_t *);
57 static ide_startstop_t recal_intr(ide_drive_t *);
58 static ide_startstop_t set_multmode_intr(ide_drive_t *);
59 static ide_startstop_t pre_task_out_intr(ide_drive_t *, struct request *);
60 static ide_startstop_t task_in_intr(ide_drive_t *);
62 ide_startstop_t do_rw_taskfile (ide_drive_t *drive, ide_task_t *task)
64 ide_hwif_t *hwif = HWIF(drive);
65 struct ide_taskfile *tf = &task->tf;
66 ide_handler_t *handler = NULL;
67 const struct ide_tp_ops *tp_ops = hwif->tp_ops;
68 const struct ide_dma_ops *dma_ops = hwif->dma_ops;
70 if (task->data_phase == TASKFILE_MULTI_IN ||
71 task->data_phase == TASKFILE_MULTI_OUT) {
72 if (!drive->mult_count) {
73 printk(KERN_ERR "%s: multimode not set!\n",
79 if (task->tf_flags & IDE_TFLAG_FLAGGED)
80 task->tf_flags |= IDE_TFLAG_FLAGGED_SET_IN_FLAGS;
82 if ((task->tf_flags & IDE_TFLAG_DMA_PIO_FALLBACK) == 0) {
83 ide_tf_dump(drive->name, tf);
84 tp_ops->set_irq(hwif, 1);
85 SELECT_MASK(drive, 0);
86 tp_ops->tf_load(drive, task);
89 switch (task->data_phase) {
90 case TASKFILE_MULTI_OUT:
92 tp_ops->exec_command(hwif, tf->command);
93 ndelay(400); /* FIXME */
94 return pre_task_out_intr(drive, task->rq);
95 case TASKFILE_MULTI_IN:
97 handler = task_in_intr;
99 case TASKFILE_NO_DATA:
101 handler = task_no_data_intr;
102 /* WIN_{SPECIFY,RESTORE,SETMULT} use custom handlers */
103 if (task->tf_flags & IDE_TFLAG_CUSTOM_HANDLER) {
104 switch (tf->command) {
105 case WIN_SPECIFY: handler = set_geometry_intr; break;
106 case WIN_RESTORE: handler = recal_intr; break;
107 case WIN_SETMULT: handler = set_multmode_intr; break;
110 ide_execute_command(drive, tf->command, handler,
111 WAIT_WORSTCASE, NULL);
114 if (drive->using_dma == 0 || dma_ops->dma_setup(drive))
116 dma_ops->dma_exec_cmd(drive, tf->command);
117 dma_ops->dma_start(drive);
121 EXPORT_SYMBOL_GPL(do_rw_taskfile);
124 * set_multmode_intr() is invoked on completion of a WIN_SETMULT cmd.
126 static ide_startstop_t set_multmode_intr(ide_drive_t *drive)
128 ide_hwif_t *hwif = drive->hwif;
131 local_irq_enable_in_hardirq();
132 stat = hwif->tp_ops->read_status(hwif);
134 if (OK_STAT(stat, READY_STAT, BAD_STAT))
135 drive->mult_count = drive->mult_req;
137 drive->mult_req = drive->mult_count = 0;
138 drive->special.b.recalibrate = 1;
139 (void) ide_dump_status(drive, "set_multmode", stat);
145 * set_geometry_intr() is invoked on completion of a WIN_SPECIFY cmd.
147 static ide_startstop_t set_geometry_intr(ide_drive_t *drive)
149 ide_hwif_t *hwif = drive->hwif;
153 local_irq_enable_in_hardirq();
156 stat = hwif->tp_ops->read_status(hwif);
157 if ((stat & BUSY_STAT) == 0 || retries-- == 0)
162 if (OK_STAT(stat, READY_STAT, BAD_STAT))
165 if (stat & (ERR_STAT|DRQ_STAT))
166 return ide_error(drive, "set_geometry_intr", stat);
168 ide_set_handler(drive, &set_geometry_intr, WAIT_WORSTCASE, NULL);
173 * recal_intr() is invoked on completion of a WIN_RESTORE (recalibrate) cmd.
175 static ide_startstop_t recal_intr(ide_drive_t *drive)
177 ide_hwif_t *hwif = drive->hwif;
180 local_irq_enable_in_hardirq();
181 stat = hwif->tp_ops->read_status(hwif);
183 if (!OK_STAT(stat, READY_STAT, BAD_STAT))
184 return ide_error(drive, "recal_intr", stat);
189 * Handler for commands without a data phase
191 static ide_startstop_t task_no_data_intr(ide_drive_t *drive)
193 ide_hwif_t *hwif = drive->hwif;
194 ide_task_t *args = hwif->hwgroup->rq->special;
197 local_irq_enable_in_hardirq();
198 stat = hwif->tp_ops->read_status(hwif);
200 if (!OK_STAT(stat, READY_STAT, BAD_STAT))
201 return ide_error(drive, "task_no_data_intr", stat);
202 /* calls ide_end_drive_cmd */
205 ide_end_drive_cmd(drive, stat, ide_read_error(drive));
210 static u8 wait_drive_not_busy(ide_drive_t *drive)
212 ide_hwif_t *hwif = drive->hwif;
217 * Last sector was transfered, wait until device is ready. This can
218 * take up to 6 ms on some ATAPI devices, so we will wait max 10 ms.
220 for (retries = 0; retries < 1000; retries++) {
221 stat = hwif->tp_ops->read_status(hwif);
223 if (stat & BUSY_STAT)
229 if (stat & BUSY_STAT)
230 printk(KERN_ERR "%s: drive still BUSY!\n", drive->name);
235 static void ide_pio_sector(ide_drive_t *drive, struct request *rq,
238 ide_hwif_t *hwif = drive->hwif;
239 struct scatterlist *sg = hwif->sg_table;
240 struct scatterlist *cursg = hwif->cursg;
242 #ifdef CONFIG_HIGHMEM
254 page = sg_page(cursg);
255 offset = cursg->offset + hwif->cursg_ofs * SECTOR_SIZE;
257 /* get the current page and offset */
258 page = nth_page(page, (offset >> PAGE_SHIFT));
261 #ifdef CONFIG_HIGHMEM
262 local_irq_save(flags);
264 buf = kmap_atomic(page, KM_BIO_SRC_IRQ) + offset;
269 if ((hwif->cursg_ofs * SECTOR_SIZE) == cursg->length) {
270 hwif->cursg = sg_next(hwif->cursg);
274 /* do the actual data transfer */
276 hwif->tp_ops->output_data(drive, rq, buf, SECTOR_SIZE);
278 hwif->tp_ops->input_data(drive, rq, buf, SECTOR_SIZE);
280 kunmap_atomic(buf, KM_BIO_SRC_IRQ);
281 #ifdef CONFIG_HIGHMEM
282 local_irq_restore(flags);
286 static void ide_pio_multi(ide_drive_t *drive, struct request *rq,
291 nsect = min_t(unsigned int, drive->hwif->nleft, drive->mult_count);
293 ide_pio_sector(drive, rq, write);
296 static void ide_pio_datablock(ide_drive_t *drive, struct request *rq,
299 u8 saved_io_32bit = drive->io_32bit;
301 if (rq->bio) /* fs request */
304 if (rq->cmd_type == REQ_TYPE_ATA_TASKFILE) {
305 ide_task_t *task = rq->special;
307 if (task->tf_flags & IDE_TFLAG_IO_16BIT)
311 touch_softlockup_watchdog();
313 switch (drive->hwif->data_phase) {
314 case TASKFILE_MULTI_IN:
315 case TASKFILE_MULTI_OUT:
316 ide_pio_multi(drive, rq, write);
319 ide_pio_sector(drive, rq, write);
323 drive->io_32bit = saved_io_32bit;
326 static ide_startstop_t task_error(ide_drive_t *drive, struct request *rq,
327 const char *s, u8 stat)
330 ide_hwif_t *hwif = drive->hwif;
331 int sectors = hwif->nsect - hwif->nleft;
333 switch (hwif->data_phase) {
341 case TASKFILE_MULTI_IN:
345 case TASKFILE_MULTI_OUT:
346 sectors -= drive->mult_count;
354 drv = *(ide_driver_t **)rq->rq_disk->private_data;
355 drv->end_request(drive, 1, sectors);
358 return ide_error(drive, s, stat);
361 void task_end_request(ide_drive_t *drive, struct request *rq, u8 stat)
363 if (rq->cmd_type == REQ_TYPE_ATA_TASKFILE) {
364 u8 err = ide_read_error(drive);
366 ide_end_drive_cmd(drive, stat, err);
373 drv = *(ide_driver_t **)rq->rq_disk->private_data;;
374 drv->end_request(drive, 1, rq->nr_sectors);
376 ide_end_request(drive, 1, rq->nr_sectors);
380 * We got an interrupt on a task_in case, but no errors and no DRQ.
382 * It might be a spurious irq (shared irq), but it might be a
383 * command that had no output.
385 static ide_startstop_t task_in_unexpected(ide_drive_t *drive, struct request *rq, u8 stat)
387 /* Command all done? */
388 if (OK_STAT(stat, READY_STAT, BUSY_STAT)) {
389 task_end_request(drive, rq, stat);
393 /* Assume it was a spurious irq */
394 ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
399 * Handler for command with PIO data-in phase (Read/Read Multiple).
401 static ide_startstop_t task_in_intr(ide_drive_t *drive)
403 ide_hwif_t *hwif = drive->hwif;
404 struct request *rq = hwif->hwgroup->rq;
405 u8 stat = hwif->tp_ops->read_status(hwif);
409 return task_error(drive, rq, __func__, stat);
411 /* Didn't want any data? Odd. */
412 if (!(stat & DRQ_STAT))
413 return task_in_unexpected(drive, rq, stat);
415 ide_pio_datablock(drive, rq, 0);
417 /* Are we done? Check status and finish transfer. */
419 stat = wait_drive_not_busy(drive);
420 if (!OK_STAT(stat, 0, BAD_STAT))
421 return task_error(drive, rq, __func__, stat);
422 task_end_request(drive, rq, stat);
426 /* Still data left to transfer. */
427 ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
433 * Handler for command with PIO data-out phase (Write/Write Multiple).
435 static ide_startstop_t task_out_intr (ide_drive_t *drive)
437 ide_hwif_t *hwif = drive->hwif;
438 struct request *rq = HWGROUP(drive)->rq;
439 u8 stat = hwif->tp_ops->read_status(hwif);
441 if (!OK_STAT(stat, DRIVE_READY, drive->bad_wstat))
442 return task_error(drive, rq, __func__, stat);
444 /* Deal with unexpected ATA data phase. */
445 if (((stat & DRQ_STAT) == 0) ^ !hwif->nleft)
446 return task_error(drive, rq, __func__, stat);
449 task_end_request(drive, rq, stat);
453 /* Still data left to transfer. */
454 ide_pio_datablock(drive, rq, 1);
455 ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
460 static ide_startstop_t pre_task_out_intr(ide_drive_t *drive, struct request *rq)
462 ide_startstop_t startstop;
464 if (ide_wait_stat(&startstop, drive, DRQ_STAT,
465 drive->bad_wstat, WAIT_DRQ)) {
466 printk(KERN_ERR "%s: no DRQ after issuing %sWRITE%s\n",
468 drive->hwif->data_phase ? "MULT" : "",
469 drive->addressing ? "_EXT" : "");
476 ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
477 ide_pio_datablock(drive, rq, 1);
482 int ide_raw_taskfile(ide_drive_t *drive, ide_task_t *task, u8 *buf, u16 nsect)
487 rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
488 rq->cmd_type = REQ_TYPE_ATA_TASKFILE;
492 * (ks) We transfer currently only whole sectors.
493 * This is suffient for now. But, it would be great,
494 * if we would find a solution to transfer any size.
495 * To support special commands like READ LONG.
497 rq->hard_nr_sectors = rq->nr_sectors = nsect;
498 rq->hard_cur_sectors = rq->current_nr_sectors = nsect;
500 if (task->tf_flags & IDE_TFLAG_WRITE)
501 rq->cmd_flags |= REQ_RW;
506 error = blk_execute_rq(drive->queue, NULL, rq, 0);
512 EXPORT_SYMBOL(ide_raw_taskfile);
514 int ide_no_data_taskfile(ide_drive_t *drive, ide_task_t *task)
516 task->data_phase = TASKFILE_NO_DATA;
518 return ide_raw_taskfile(drive, task, NULL, 0);
520 EXPORT_SYMBOL_GPL(ide_no_data_taskfile);
522 #ifdef CONFIG_IDE_TASK_IOCTL
523 int ide_taskfile_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
525 ide_task_request_t *req_task;
531 int tasksize = sizeof(struct ide_task_request_s);
532 unsigned int taskin = 0;
533 unsigned int taskout = 0;
535 char __user *buf = (char __user *)arg;
537 // printk("IDE Taskfile ...\n");
539 req_task = kzalloc(tasksize, GFP_KERNEL);
540 if (req_task == NULL) return -ENOMEM;
541 if (copy_from_user(req_task, buf, tasksize)) {
546 taskout = req_task->out_size;
547 taskin = req_task->in_size;
549 if (taskin > 65536 || taskout > 65536) {
555 int outtotal = tasksize;
556 outbuf = kzalloc(taskout, GFP_KERNEL);
557 if (outbuf == NULL) {
561 if (copy_from_user(outbuf, buf + outtotal, taskout)) {
568 int intotal = tasksize + taskout;
569 inbuf = kzalloc(taskin, GFP_KERNEL);
574 if (copy_from_user(inbuf, buf + intotal, taskin)) {
580 memset(&args, 0, sizeof(ide_task_t));
582 memcpy(&args.tf_array[0], req_task->hob_ports, HDIO_DRIVE_HOB_HDR_SIZE - 2);
583 memcpy(&args.tf_array[6], req_task->io_ports, HDIO_DRIVE_TASK_HDR_SIZE);
585 args.data_phase = req_task->data_phase;
587 args.tf_flags = IDE_TFLAG_IO_16BIT | IDE_TFLAG_DEVICE |
589 if (drive->addressing == 1)
590 args.tf_flags |= (IDE_TFLAG_LBA48 | IDE_TFLAG_IN_HOB);
592 if (req_task->out_flags.all) {
593 args.tf_flags |= IDE_TFLAG_FLAGGED;
595 if (req_task->out_flags.b.data)
596 args.tf_flags |= IDE_TFLAG_OUT_DATA;
598 if (req_task->out_flags.b.nsector_hob)
599 args.tf_flags |= IDE_TFLAG_OUT_HOB_NSECT;
600 if (req_task->out_flags.b.sector_hob)
601 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAL;
602 if (req_task->out_flags.b.lcyl_hob)
603 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAM;
604 if (req_task->out_flags.b.hcyl_hob)
605 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAH;
607 if (req_task->out_flags.b.error_feature)
608 args.tf_flags |= IDE_TFLAG_OUT_FEATURE;
609 if (req_task->out_flags.b.nsector)
610 args.tf_flags |= IDE_TFLAG_OUT_NSECT;
611 if (req_task->out_flags.b.sector)
612 args.tf_flags |= IDE_TFLAG_OUT_LBAL;
613 if (req_task->out_flags.b.lcyl)
614 args.tf_flags |= IDE_TFLAG_OUT_LBAM;
615 if (req_task->out_flags.b.hcyl)
616 args.tf_flags |= IDE_TFLAG_OUT_LBAH;
618 args.tf_flags |= IDE_TFLAG_OUT_TF;
619 if (args.tf_flags & IDE_TFLAG_LBA48)
620 args.tf_flags |= IDE_TFLAG_OUT_HOB;
623 if (req_task->in_flags.b.data)
624 args.tf_flags |= IDE_TFLAG_IN_DATA;
626 switch(req_task->data_phase) {
627 case TASKFILE_MULTI_OUT:
628 if (!drive->mult_count) {
629 /* (hs): give up if multcount is not set */
630 printk(KERN_ERR "%s: %s Multimode Write " \
631 "multcount is not set\n",
632 drive->name, __func__);
639 case TASKFILE_OUT_DMAQ:
640 case TASKFILE_OUT_DMA:
641 nsect = taskout / SECTOR_SIZE;
644 case TASKFILE_MULTI_IN:
645 if (!drive->mult_count) {
646 /* (hs): give up if multcount is not set */
647 printk(KERN_ERR "%s: %s Multimode Read failure " \
648 "multcount is not set\n",
649 drive->name, __func__);
656 case TASKFILE_IN_DMAQ:
657 case TASKFILE_IN_DMA:
658 nsect = taskin / SECTOR_SIZE;
661 case TASKFILE_NO_DATA:
668 if (req_task->req_cmd == IDE_DRIVE_TASK_NO_DATA)
671 nsect = (args.tf.hob_nsect << 8) | args.tf.nsect;
674 printk(KERN_ERR "%s: in/out command without data\n",
681 if (req_task->req_cmd == IDE_DRIVE_TASK_RAW_WRITE)
682 args.tf_flags |= IDE_TFLAG_WRITE;
684 err = ide_raw_taskfile(drive, &args, data_buf, nsect);
686 memcpy(req_task->hob_ports, &args.tf_array[0], HDIO_DRIVE_HOB_HDR_SIZE - 2);
687 memcpy(req_task->io_ports, &args.tf_array[6], HDIO_DRIVE_TASK_HDR_SIZE);
689 if ((args.tf_flags & IDE_TFLAG_FLAGGED_SET_IN_FLAGS) &&
690 req_task->in_flags.all == 0) {
691 req_task->in_flags.all = IDE_TASKFILE_STD_IN_FLAGS;
692 if (drive->addressing == 1)
693 req_task->in_flags.all |= (IDE_HOB_STD_IN_FLAGS << 8);
696 if (copy_to_user(buf, req_task, tasksize)) {
701 int outtotal = tasksize;
702 if (copy_to_user(buf + outtotal, outbuf, taskout)) {
708 int intotal = tasksize + taskout;
709 if (copy_to_user(buf + intotal, inbuf, taskin)) {
719 // printk("IDE Taskfile ioctl ended. rc = %i\n", err);
725 int ide_cmd_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
728 int bufsize = 0, err = 0;
729 u8 args[4], xfer_rate = 0;
731 struct ide_taskfile *tf = &tfargs.tf;
732 struct hd_driveid *id = drive->id;
734 if (NULL == (void *) arg) {
737 rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
738 rq->cmd_type = REQ_TYPE_ATA_TASKFILE;
739 err = blk_execute_rq(drive->queue, NULL, rq, 0);
745 if (copy_from_user(args, (void __user *)arg, 4))
748 memset(&tfargs, 0, sizeof(ide_task_t));
749 tf->feature = args[2];
750 if (args[0] == WIN_SMART) {
755 tfargs.tf_flags = IDE_TFLAG_OUT_TF | IDE_TFLAG_IN_NSECT;
758 tfargs.tf_flags = IDE_TFLAG_OUT_FEATURE |
759 IDE_TFLAG_OUT_NSECT | IDE_TFLAG_IN_NSECT;
761 tf->command = args[0];
762 tfargs.data_phase = args[3] ? TASKFILE_IN : TASKFILE_NO_DATA;
765 tfargs.tf_flags |= IDE_TFLAG_IO_16BIT;
766 bufsize = SECTOR_WORDS * 4 * args[3];
767 buf = kzalloc(bufsize, GFP_KERNEL);
772 if (tf->command == WIN_SETFEATURES &&
773 tf->feature == SETFEATURES_XFER &&
774 tf->nsect >= XFER_SW_DMA_0 &&
775 (id->dma_ultra || id->dma_mword || id->dma_1word)) {
777 if (tf->nsect > XFER_UDMA_2 && !eighty_ninty_three(drive)) {
778 printk(KERN_WARNING "%s: UDMA speeds >UDMA33 cannot "
779 "be set\n", drive->name);
784 err = ide_raw_taskfile(drive, &tfargs, buf, args[3]);
786 args[0] = tf->status;
790 if (!err && xfer_rate) {
791 /* active-retuning-calls future */
792 ide_set_xfer_rate(drive, xfer_rate);
793 ide_driveid_update(drive);
796 if (copy_to_user((void __user *)arg, &args, 4))
799 if (copy_to_user((void __user *)(arg + 4), buf, bufsize))
806 int ide_task_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
808 void __user *p = (void __user *)arg;
813 if (copy_from_user(args, p, 7))
816 memset(&task, 0, sizeof(task));
817 memcpy(&task.tf_array[7], &args[1], 6);
818 task.tf.command = args[0];
819 task.tf_flags = IDE_TFLAG_TF | IDE_TFLAG_DEVICE;
821 err = ide_no_data_taskfile(drive, &task);
823 args[0] = task.tf.command;
824 memcpy(&args[1], &task.tf_array[7], 6);
826 if (copy_to_user(p, args, 7))