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_dma_ops *dma_ops = hwif->dma_ops;
69 if (task->data_phase == TASKFILE_MULTI_IN ||
70 task->data_phase == TASKFILE_MULTI_OUT) {
71 if (!drive->mult_count) {
72 printk(KERN_ERR "%s: multimode not set!\n",
78 if (task->tf_flags & IDE_TFLAG_FLAGGED)
79 task->tf_flags |= IDE_TFLAG_FLAGGED_SET_IN_FLAGS;
81 if ((task->tf_flags & IDE_TFLAG_DMA_PIO_FALLBACK) == 0) {
82 ide_tf_dump(drive->name, tf);
83 hwif->set_irq(hwif, 1);
84 SELECT_MASK(drive, 0);
85 hwif->tf_load(drive, task);
88 switch (task->data_phase) {
89 case TASKFILE_MULTI_OUT:
91 hwif->exec_command(hwif, tf->command);
92 ndelay(400); /* FIXME */
93 return pre_task_out_intr(drive, task->rq);
94 case TASKFILE_MULTI_IN:
96 handler = task_in_intr;
98 case TASKFILE_NO_DATA:
100 handler = task_no_data_intr;
101 /* WIN_{SPECIFY,RESTORE,SETMULT} use custom handlers */
102 if (task->tf_flags & IDE_TFLAG_CUSTOM_HANDLER) {
103 switch (tf->command) {
104 case WIN_SPECIFY: handler = set_geometry_intr; break;
105 case WIN_RESTORE: handler = recal_intr; break;
106 case WIN_SETMULT: handler = set_multmode_intr; break;
109 ide_execute_command(drive, tf->command, handler,
110 WAIT_WORSTCASE, NULL);
113 if (drive->using_dma == 0 || dma_ops->dma_setup(drive))
115 dma_ops->dma_exec_cmd(drive, tf->command);
116 dma_ops->dma_start(drive);
120 EXPORT_SYMBOL_GPL(do_rw_taskfile);
123 * set_multmode_intr() is invoked on completion of a WIN_SETMULT cmd.
125 static ide_startstop_t set_multmode_intr(ide_drive_t *drive)
127 ide_hwif_t *hwif = drive->hwif;
128 u8 stat = hwif->read_status(hwif);
130 if (OK_STAT(stat, READY_STAT, BAD_STAT))
131 drive->mult_count = drive->mult_req;
133 drive->mult_req = drive->mult_count = 0;
134 drive->special.b.recalibrate = 1;
135 (void) ide_dump_status(drive, "set_multmode", stat);
141 * set_geometry_intr() is invoked on completion of a WIN_SPECIFY cmd.
143 static ide_startstop_t set_geometry_intr(ide_drive_t *drive)
145 ide_hwif_t *hwif = drive->hwif;
149 while (((stat = hwif->read_status(hwif)) & BUSY_STAT) && retries--)
152 if (OK_STAT(stat, READY_STAT, BAD_STAT))
155 if (stat & (ERR_STAT|DRQ_STAT))
156 return ide_error(drive, "set_geometry_intr", stat);
158 ide_set_handler(drive, &set_geometry_intr, WAIT_WORSTCASE, NULL);
163 * recal_intr() is invoked on completion of a WIN_RESTORE (recalibrate) cmd.
165 static ide_startstop_t recal_intr(ide_drive_t *drive)
167 ide_hwif_t *hwif = drive->hwif;
168 u8 stat = hwif->read_status(hwif);
170 if (!OK_STAT(stat, READY_STAT, BAD_STAT))
171 return ide_error(drive, "recal_intr", stat);
176 * Handler for commands without a data phase
178 static ide_startstop_t task_no_data_intr(ide_drive_t *drive)
180 ide_hwif_t *hwif = drive->hwif;
181 ide_task_t *args = hwif->hwgroup->rq->special;
184 local_irq_enable_in_hardirq();
185 stat = hwif->read_status(hwif);
187 if (!OK_STAT(stat, READY_STAT, BAD_STAT))
188 return ide_error(drive, "task_no_data_intr", stat);
189 /* calls ide_end_drive_cmd */
192 ide_end_drive_cmd(drive, stat, ide_read_error(drive));
197 static u8 wait_drive_not_busy(ide_drive_t *drive)
199 ide_hwif_t *hwif = drive->hwif;
204 * Last sector was transfered, wait until device is ready. This can
205 * take up to 6 ms on some ATAPI devices, so we will wait max 10 ms.
207 for (retries = 0; retries < 1000; retries++) {
208 stat = hwif->read_status(hwif);
210 if (stat & BUSY_STAT)
216 if (stat & BUSY_STAT)
217 printk(KERN_ERR "%s: drive still BUSY!\n", drive->name);
222 static void ide_pio_sector(ide_drive_t *drive, struct request *rq,
225 ide_hwif_t *hwif = drive->hwif;
226 struct scatterlist *sg = hwif->sg_table;
227 struct scatterlist *cursg = hwif->cursg;
229 #ifdef CONFIG_HIGHMEM
241 page = sg_page(cursg);
242 offset = cursg->offset + hwif->cursg_ofs * SECTOR_SIZE;
244 /* get the current page and offset */
245 page = nth_page(page, (offset >> PAGE_SHIFT));
248 #ifdef CONFIG_HIGHMEM
249 local_irq_save(flags);
251 buf = kmap_atomic(page, KM_BIO_SRC_IRQ) + offset;
256 if ((hwif->cursg_ofs * SECTOR_SIZE) == cursg->length) {
257 hwif->cursg = sg_next(hwif->cursg);
261 /* do the actual data transfer */
263 hwif->output_data(drive, rq, buf, SECTOR_SIZE);
265 hwif->input_data(drive, rq, buf, SECTOR_SIZE);
267 kunmap_atomic(buf, KM_BIO_SRC_IRQ);
268 #ifdef CONFIG_HIGHMEM
269 local_irq_restore(flags);
273 static void ide_pio_multi(ide_drive_t *drive, struct request *rq,
278 nsect = min_t(unsigned int, drive->hwif->nleft, drive->mult_count);
280 ide_pio_sector(drive, rq, write);
283 static void ide_pio_datablock(ide_drive_t *drive, struct request *rq,
286 u8 saved_io_32bit = drive->io_32bit;
288 if (rq->bio) /* fs request */
291 if (rq->cmd_type == REQ_TYPE_ATA_TASKFILE) {
292 ide_task_t *task = rq->special;
294 if (task->tf_flags & IDE_TFLAG_IO_16BIT)
298 touch_softlockup_watchdog();
300 switch (drive->hwif->data_phase) {
301 case TASKFILE_MULTI_IN:
302 case TASKFILE_MULTI_OUT:
303 ide_pio_multi(drive, rq, write);
306 ide_pio_sector(drive, rq, write);
310 drive->io_32bit = saved_io_32bit;
313 static ide_startstop_t task_error(ide_drive_t *drive, struct request *rq,
314 const char *s, u8 stat)
317 ide_hwif_t *hwif = drive->hwif;
318 int sectors = hwif->nsect - hwif->nleft;
320 switch (hwif->data_phase) {
328 case TASKFILE_MULTI_IN:
332 case TASKFILE_MULTI_OUT:
333 sectors -= drive->mult_count;
341 drv = *(ide_driver_t **)rq->rq_disk->private_data;
342 drv->end_request(drive, 1, sectors);
345 return ide_error(drive, s, stat);
348 void task_end_request(ide_drive_t *drive, struct request *rq, u8 stat)
350 if (rq->cmd_type == REQ_TYPE_ATA_TASKFILE) {
351 u8 err = ide_read_error(drive);
353 ide_end_drive_cmd(drive, stat, err);
360 drv = *(ide_driver_t **)rq->rq_disk->private_data;;
361 drv->end_request(drive, 1, rq->nr_sectors);
363 ide_end_request(drive, 1, rq->nr_sectors);
367 * We got an interrupt on a task_in case, but no errors and no DRQ.
369 * It might be a spurious irq (shared irq), but it might be a
370 * command that had no output.
372 static ide_startstop_t task_in_unexpected(ide_drive_t *drive, struct request *rq, u8 stat)
374 /* Command all done? */
375 if (OK_STAT(stat, READY_STAT, BUSY_STAT)) {
376 task_end_request(drive, rq, stat);
380 /* Assume it was a spurious irq */
381 ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
386 * Handler for command with PIO data-in phase (Read/Read Multiple).
388 static ide_startstop_t task_in_intr(ide_drive_t *drive)
390 ide_hwif_t *hwif = drive->hwif;
391 struct request *rq = hwif->hwgroup->rq;
392 u8 stat = hwif->read_status(hwif);
396 return task_error(drive, rq, __func__, stat);
398 /* Didn't want any data? Odd. */
399 if (!(stat & DRQ_STAT))
400 return task_in_unexpected(drive, rq, stat);
402 ide_pio_datablock(drive, rq, 0);
404 /* Are we done? Check status and finish transfer. */
406 stat = wait_drive_not_busy(drive);
407 if (!OK_STAT(stat, 0, BAD_STAT))
408 return task_error(drive, rq, __func__, stat);
409 task_end_request(drive, rq, stat);
413 /* Still data left to transfer. */
414 ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
420 * Handler for command with PIO data-out phase (Write/Write Multiple).
422 static ide_startstop_t task_out_intr (ide_drive_t *drive)
424 ide_hwif_t *hwif = drive->hwif;
425 struct request *rq = HWGROUP(drive)->rq;
426 u8 stat = hwif->read_status(hwif);
428 if (!OK_STAT(stat, DRIVE_READY, drive->bad_wstat))
429 return task_error(drive, rq, __func__, stat);
431 /* Deal with unexpected ATA data phase. */
432 if (((stat & DRQ_STAT) == 0) ^ !hwif->nleft)
433 return task_error(drive, rq, __func__, stat);
436 task_end_request(drive, rq, stat);
440 /* Still data left to transfer. */
441 ide_pio_datablock(drive, rq, 1);
442 ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
447 static ide_startstop_t pre_task_out_intr(ide_drive_t *drive, struct request *rq)
449 ide_startstop_t startstop;
451 if (ide_wait_stat(&startstop, drive, DRQ_STAT,
452 drive->bad_wstat, WAIT_DRQ)) {
453 printk(KERN_ERR "%s: no DRQ after issuing %sWRITE%s\n",
455 drive->hwif->data_phase ? "MULT" : "",
456 drive->addressing ? "_EXT" : "");
463 ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
464 ide_pio_datablock(drive, rq, 1);
469 int ide_raw_taskfile(ide_drive_t *drive, ide_task_t *task, u8 *buf, u16 nsect)
474 rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
475 rq->cmd_type = REQ_TYPE_ATA_TASKFILE;
479 * (ks) We transfer currently only whole sectors.
480 * This is suffient for now. But, it would be great,
481 * if we would find a solution to transfer any size.
482 * To support special commands like READ LONG.
484 rq->hard_nr_sectors = rq->nr_sectors = nsect;
485 rq->hard_cur_sectors = rq->current_nr_sectors = nsect;
487 if (task->tf_flags & IDE_TFLAG_WRITE)
488 rq->cmd_flags |= REQ_RW;
493 error = blk_execute_rq(drive->queue, NULL, rq, 0);
499 EXPORT_SYMBOL(ide_raw_taskfile);
501 int ide_no_data_taskfile(ide_drive_t *drive, ide_task_t *task)
503 task->data_phase = TASKFILE_NO_DATA;
505 return ide_raw_taskfile(drive, task, NULL, 0);
507 EXPORT_SYMBOL_GPL(ide_no_data_taskfile);
509 #ifdef CONFIG_IDE_TASK_IOCTL
510 int ide_taskfile_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
512 ide_task_request_t *req_task;
518 int tasksize = sizeof(struct ide_task_request_s);
519 unsigned int taskin = 0;
520 unsigned int taskout = 0;
522 char __user *buf = (char __user *)arg;
524 // printk("IDE Taskfile ...\n");
526 req_task = kzalloc(tasksize, GFP_KERNEL);
527 if (req_task == NULL) return -ENOMEM;
528 if (copy_from_user(req_task, buf, tasksize)) {
533 taskout = req_task->out_size;
534 taskin = req_task->in_size;
536 if (taskin > 65536 || taskout > 65536) {
542 int outtotal = tasksize;
543 outbuf = kzalloc(taskout, GFP_KERNEL);
544 if (outbuf == NULL) {
548 if (copy_from_user(outbuf, buf + outtotal, taskout)) {
555 int intotal = tasksize + taskout;
556 inbuf = kzalloc(taskin, GFP_KERNEL);
561 if (copy_from_user(inbuf, buf + intotal, taskin)) {
567 memset(&args, 0, sizeof(ide_task_t));
569 memcpy(&args.tf_array[0], req_task->hob_ports, HDIO_DRIVE_HOB_HDR_SIZE - 2);
570 memcpy(&args.tf_array[6], req_task->io_ports, HDIO_DRIVE_TASK_HDR_SIZE);
572 args.data_phase = req_task->data_phase;
574 args.tf_flags = IDE_TFLAG_IO_16BIT | IDE_TFLAG_DEVICE |
576 if (drive->addressing == 1)
577 args.tf_flags |= (IDE_TFLAG_LBA48 | IDE_TFLAG_IN_HOB);
579 if (req_task->out_flags.all) {
580 args.tf_flags |= IDE_TFLAG_FLAGGED;
582 if (req_task->out_flags.b.data)
583 args.tf_flags |= IDE_TFLAG_OUT_DATA;
585 if (req_task->out_flags.b.nsector_hob)
586 args.tf_flags |= IDE_TFLAG_OUT_HOB_NSECT;
587 if (req_task->out_flags.b.sector_hob)
588 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAL;
589 if (req_task->out_flags.b.lcyl_hob)
590 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAM;
591 if (req_task->out_flags.b.hcyl_hob)
592 args.tf_flags |= IDE_TFLAG_OUT_HOB_LBAH;
594 if (req_task->out_flags.b.error_feature)
595 args.tf_flags |= IDE_TFLAG_OUT_FEATURE;
596 if (req_task->out_flags.b.nsector)
597 args.tf_flags |= IDE_TFLAG_OUT_NSECT;
598 if (req_task->out_flags.b.sector)
599 args.tf_flags |= IDE_TFLAG_OUT_LBAL;
600 if (req_task->out_flags.b.lcyl)
601 args.tf_flags |= IDE_TFLAG_OUT_LBAM;
602 if (req_task->out_flags.b.hcyl)
603 args.tf_flags |= IDE_TFLAG_OUT_LBAH;
605 args.tf_flags |= IDE_TFLAG_OUT_TF;
606 if (args.tf_flags & IDE_TFLAG_LBA48)
607 args.tf_flags |= IDE_TFLAG_OUT_HOB;
610 if (req_task->in_flags.b.data)
611 args.tf_flags |= IDE_TFLAG_IN_DATA;
613 switch(req_task->data_phase) {
614 case TASKFILE_MULTI_OUT:
615 if (!drive->mult_count) {
616 /* (hs): give up if multcount is not set */
617 printk(KERN_ERR "%s: %s Multimode Write " \
618 "multcount is not set\n",
619 drive->name, __func__);
626 case TASKFILE_OUT_DMAQ:
627 case TASKFILE_OUT_DMA:
628 nsect = taskout / SECTOR_SIZE;
631 case TASKFILE_MULTI_IN:
632 if (!drive->mult_count) {
633 /* (hs): give up if multcount is not set */
634 printk(KERN_ERR "%s: %s Multimode Read failure " \
635 "multcount is not set\n",
636 drive->name, __func__);
643 case TASKFILE_IN_DMAQ:
644 case TASKFILE_IN_DMA:
645 nsect = taskin / SECTOR_SIZE;
648 case TASKFILE_NO_DATA:
655 if (req_task->req_cmd == IDE_DRIVE_TASK_NO_DATA)
658 nsect = (args.tf.hob_nsect << 8) | args.tf.nsect;
661 printk(KERN_ERR "%s: in/out command without data\n",
668 if (req_task->req_cmd == IDE_DRIVE_TASK_RAW_WRITE)
669 args.tf_flags |= IDE_TFLAG_WRITE;
671 err = ide_raw_taskfile(drive, &args, data_buf, nsect);
673 memcpy(req_task->hob_ports, &args.tf_array[0], HDIO_DRIVE_HOB_HDR_SIZE - 2);
674 memcpy(req_task->io_ports, &args.tf_array[6], HDIO_DRIVE_TASK_HDR_SIZE);
676 if ((args.tf_flags & IDE_TFLAG_FLAGGED_SET_IN_FLAGS) &&
677 req_task->in_flags.all == 0) {
678 req_task->in_flags.all = IDE_TASKFILE_STD_IN_FLAGS;
679 if (drive->addressing == 1)
680 req_task->in_flags.all |= (IDE_HOB_STD_IN_FLAGS << 8);
683 if (copy_to_user(buf, req_task, tasksize)) {
688 int outtotal = tasksize;
689 if (copy_to_user(buf + outtotal, outbuf, taskout)) {
695 int intotal = tasksize + taskout;
696 if (copy_to_user(buf + intotal, inbuf, taskin)) {
706 // printk("IDE Taskfile ioctl ended. rc = %i\n", err);
712 int ide_cmd_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
715 int bufsize = 0, err = 0;
716 u8 args[4], xfer_rate = 0;
718 struct ide_taskfile *tf = &tfargs.tf;
719 struct hd_driveid *id = drive->id;
721 if (NULL == (void *) arg) {
724 rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
725 rq->cmd_type = REQ_TYPE_ATA_TASKFILE;
726 err = blk_execute_rq(drive->queue, NULL, rq, 0);
732 if (copy_from_user(args, (void __user *)arg, 4))
735 memset(&tfargs, 0, sizeof(ide_task_t));
736 tf->feature = args[2];
737 if (args[0] == WIN_SMART) {
742 tfargs.tf_flags = IDE_TFLAG_OUT_TF | IDE_TFLAG_IN_NSECT;
745 tfargs.tf_flags = IDE_TFLAG_OUT_FEATURE |
746 IDE_TFLAG_OUT_NSECT | IDE_TFLAG_IN_NSECT;
748 tf->command = args[0];
749 tfargs.data_phase = args[3] ? TASKFILE_IN : TASKFILE_NO_DATA;
752 tfargs.tf_flags |= IDE_TFLAG_IO_16BIT;
753 bufsize = SECTOR_WORDS * 4 * args[3];
754 buf = kzalloc(bufsize, GFP_KERNEL);
759 if (tf->command == WIN_SETFEATURES &&
760 tf->feature == SETFEATURES_XFER &&
761 tf->nsect >= XFER_SW_DMA_0 &&
762 (id->dma_ultra || id->dma_mword || id->dma_1word)) {
764 if (tf->nsect > XFER_UDMA_2 && !eighty_ninty_three(drive)) {
765 printk(KERN_WARNING "%s: UDMA speeds >UDMA33 cannot "
766 "be set\n", drive->name);
771 err = ide_raw_taskfile(drive, &tfargs, buf, args[3]);
773 args[0] = tf->status;
777 if (!err && xfer_rate) {
778 /* active-retuning-calls future */
779 ide_set_xfer_rate(drive, xfer_rate);
780 ide_driveid_update(drive);
783 if (copy_to_user((void __user *)arg, &args, 4))
786 if (copy_to_user((void __user *)(arg + 4), buf, bufsize))
793 int ide_task_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
795 void __user *p = (void __user *)arg;
800 if (copy_from_user(args, p, 7))
803 memset(&task, 0, sizeof(task));
804 memcpy(&task.tf_array[7], &args[1], 6);
805 task.tf.command = args[0];
806 task.tf_flags = IDE_TFLAG_TF | IDE_TFLAG_DEVICE;
808 err = ide_no_data_taskfile(drive, &task);
810 args[0] = task.tf.command;
811 memcpy(&args[1], &task.tf_array[7], 6);
813 if (copy_to_user(p, args, 7))