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_readback(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
28 ide_hwif_t
*hwif
= drive
->hwif
;
29 const struct ide_tp_ops
*tp_ops
= hwif
->tp_ops
;
31 /* Be sure we're looking at the low order bytes */
32 tp_ops
->write_devctl(hwif
, ATA_DEVCTL_OBS
);
34 tp_ops
->tf_read(drive
, &cmd
->tf
, cmd
->valid
.in
.tf
);
36 if (cmd
->tf_flags
& IDE_TFLAG_LBA48
) {
37 tp_ops
->write_devctl(hwif
, ATA_HOB
| ATA_DEVCTL_OBS
);
39 tp_ops
->tf_read(drive
, &cmd
->hob
, cmd
->valid
.in
.hob
);
43 void ide_tf_dump(const char *s
, struct ide_cmd
*cmd
)
46 printk("%s: tf: feat 0x%02x nsect 0x%02x lbal 0x%02x "
47 "lbam 0x%02x lbah 0x%02x dev 0x%02x cmd 0x%02x\n",
48 s
, cmd
->tf
.feature
, cmd
->tf
.nsect
,
49 cmd
->tf
.lbal
, cmd
->tf
.lbam
, cmd
->tf
.lbah
,
50 cmd
->tf
.device
, cmd
->tf
.command
);
51 printk("%s: hob: nsect 0x%02x lbal 0x%02x lbam 0x%02x lbah 0x%02x\n",
52 s
, cmd
->hob
.nsect
, cmd
->hob
.lbal
, cmd
->hob
.lbam
, cmd
->hob
.lbah
);
56 int taskfile_lib_get_identify (ide_drive_t
*drive
, u8
*buf
)
60 memset(&cmd
, 0, sizeof(cmd
));
62 if (drive
->media
== ide_disk
)
63 cmd
.tf
.command
= ATA_CMD_ID_ATA
;
65 cmd
.tf
.command
= ATA_CMD_ID_ATAPI
;
66 cmd
.valid
.out
.tf
= IDE_VALID_OUT_TF
| IDE_VALID_DEVICE
;
67 cmd
.valid
.in
.tf
= IDE_VALID_IN_TF
| IDE_VALID_DEVICE
;
68 cmd
.protocol
= ATA_PROT_PIO
;
70 return ide_raw_taskfile(drive
, &cmd
, buf
, 1);
73 static ide_startstop_t
task_no_data_intr(ide_drive_t
*);
74 static ide_startstop_t
pre_task_out_intr(ide_drive_t
*, struct ide_cmd
*);
75 static ide_startstop_t
task_pio_intr(ide_drive_t
*);
77 ide_startstop_t
do_rw_taskfile(ide_drive_t
*drive
, struct ide_cmd
*orig_cmd
)
79 ide_hwif_t
*hwif
= drive
->hwif
;
80 struct ide_cmd
*cmd
= &hwif
->cmd
;
81 struct ide_taskfile
*tf
= &cmd
->tf
;
82 ide_handler_t
*handler
= NULL
;
83 const struct ide_tp_ops
*tp_ops
= hwif
->tp_ops
;
84 const struct ide_dma_ops
*dma_ops
= hwif
->dma_ops
;
86 if (orig_cmd
->protocol
== ATA_PROT_PIO
&&
87 (orig_cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
) &&
88 drive
->mult_count
== 0) {
89 printk(KERN_ERR
"%s: multimode not set!\n", drive
->name
);
93 if (orig_cmd
->ftf_flags
& IDE_FTFLAG_FLAGGED
)
94 orig_cmd
->ftf_flags
|= IDE_FTFLAG_SET_IN_FLAGS
;
96 memcpy(cmd
, orig_cmd
, sizeof(*cmd
));
98 if ((cmd
->tf_flags
& IDE_TFLAG_DMA_PIO_FALLBACK
) == 0) {
99 ide_tf_dump(drive
->name
, cmd
);
100 tp_ops
->write_devctl(hwif
, ATA_DEVCTL_OBS
);
102 if (cmd
->ftf_flags
& IDE_FTFLAG_OUT_DATA
) {
103 u8 data
[2] = { cmd
->tf
.data
, cmd
->hob
.data
};
105 tp_ops
->output_data(drive
, cmd
, data
, 2);
108 if (cmd
->valid
.out
.tf
& IDE_VALID_DEVICE
) {
109 u8 HIHI
= (cmd
->tf_flags
& IDE_TFLAG_LBA48
) ?
112 if (!(cmd
->ftf_flags
& IDE_FTFLAG_FLAGGED
))
113 cmd
->tf
.device
&= HIHI
;
114 cmd
->tf
.device
|= drive
->select
;
117 tp_ops
->tf_load(drive
, &cmd
->hob
, cmd
->valid
.out
.hob
);
118 tp_ops
->tf_load(drive
, &cmd
->tf
, cmd
->valid
.out
.tf
);
121 switch (cmd
->protocol
) {
123 if (cmd
->tf_flags
& IDE_TFLAG_WRITE
) {
124 tp_ops
->exec_command(hwif
, tf
->command
);
125 ndelay(400); /* FIXME */
126 return pre_task_out_intr(drive
, cmd
);
128 handler
= task_pio_intr
;
130 case ATA_PROT_NODATA
:
132 handler
= task_no_data_intr
;
133 ide_execute_command(drive
, cmd
, handler
, WAIT_WORSTCASE
);
136 if (ide_dma_prepare(drive
, cmd
))
138 hwif
->expiry
= dma_ops
->dma_timer_expiry
;
139 ide_execute_command(drive
, cmd
, ide_dma_intr
, 2 * WAIT_CMD
);
140 dma_ops
->dma_start(drive
);
145 EXPORT_SYMBOL_GPL(do_rw_taskfile
);
147 static ide_startstop_t
task_no_data_intr(ide_drive_t
*drive
)
149 ide_hwif_t
*hwif
= drive
->hwif
;
150 struct ide_cmd
*cmd
= &hwif
->cmd
;
151 struct ide_taskfile
*tf
= &cmd
->tf
;
152 int custom
= (cmd
->tf_flags
& IDE_TFLAG_CUSTOM_HANDLER
) ? 1 : 0;
153 int retries
= (custom
&& tf
->command
== ATA_CMD_INIT_DEV_PARAMS
) ? 5 : 1;
156 local_irq_enable_in_hardirq();
159 stat
= hwif
->tp_ops
->read_status(hwif
);
160 if ((stat
& ATA_BUSY
) == 0 || retries
-- == 0)
165 if (!OK_STAT(stat
, ATA_DRDY
, BAD_STAT
)) {
166 if (custom
&& tf
->command
== ATA_CMD_SET_MULTI
) {
167 drive
->mult_req
= drive
->mult_count
= 0;
168 drive
->special_flags
|= IDE_SFLAG_RECALIBRATE
;
169 (void)ide_dump_status(drive
, __func__
, stat
);
171 } else if (custom
&& tf
->command
== ATA_CMD_INIT_DEV_PARAMS
) {
172 if ((stat
& (ATA_ERR
| ATA_DRQ
)) == 0) {
173 ide_set_handler(drive
, &task_no_data_intr
,
178 return ide_error(drive
, "task_no_data_intr", stat
);
181 if (custom
&& tf
->command
== ATA_CMD_SET_MULTI
)
182 drive
->mult_count
= drive
->mult_req
;
184 if (custom
== 0 || tf
->command
== ATA_CMD_IDLEIMMEDIATE
||
185 tf
->command
== ATA_CMD_CHK_POWER
) {
186 struct request
*rq
= hwif
->rq
;
188 if (blk_pm_request(rq
))
189 ide_complete_pm_rq(drive
, rq
);
191 ide_finish_cmd(drive
, cmd
, stat
);
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
->tp_ops
->read_status(hwif
);
217 printk(KERN_ERR
"%s: drive still BUSY!\n", drive
->name
);
222 void ide_pio_bytes(ide_drive_t
*drive
, struct ide_cmd
*cmd
,
223 unsigned int write
, unsigned int len
)
225 ide_hwif_t
*hwif
= drive
->hwif
;
226 struct scatterlist
*sg
= hwif
->sg_table
;
227 struct scatterlist
*cursg
= cmd
->cursg
;
235 cursg
= cmd
->cursg
= sg
;
238 unsigned nr_bytes
= min(len
, cursg
->length
- cmd
->cursg_ofs
);
240 if (nr_bytes
> PAGE_SIZE
)
241 nr_bytes
= PAGE_SIZE
;
243 page
= sg_page(cursg
);
244 offset
= cursg
->offset
+ cmd
->cursg_ofs
;
246 /* get the current page and offset */
247 page
= nth_page(page
, (offset
>> PAGE_SHIFT
));
250 if (PageHighMem(page
))
251 local_irq_save(flags
);
253 buf
= kmap_atomic(page
, KM_BIO_SRC_IRQ
) + offset
;
255 cmd
->nleft
-= nr_bytes
;
256 cmd
->cursg_ofs
+= nr_bytes
;
258 if (cmd
->cursg_ofs
== cursg
->length
) {
259 cursg
= cmd
->cursg
= sg_next(cmd
->cursg
);
263 /* do the actual data transfer */
265 hwif
->tp_ops
->output_data(drive
, cmd
, buf
, nr_bytes
);
267 hwif
->tp_ops
->input_data(drive
, cmd
, buf
, nr_bytes
);
269 kunmap_atomic(buf
, KM_BIO_SRC_IRQ
);
271 if (PageHighMem(page
))
272 local_irq_restore(flags
);
277 EXPORT_SYMBOL_GPL(ide_pio_bytes
);
279 static void ide_pio_datablock(ide_drive_t
*drive
, struct ide_cmd
*cmd
,
282 unsigned int nr_bytes
;
284 u8 saved_io_32bit
= drive
->io_32bit
;
286 if (cmd
->tf_flags
& IDE_TFLAG_FS
)
289 if (cmd
->tf_flags
& IDE_TFLAG_IO_16BIT
)
292 touch_softlockup_watchdog();
294 if (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
)
295 nr_bytes
= min_t(unsigned, cmd
->nleft
, drive
->mult_count
<< 9);
297 nr_bytes
= SECTOR_SIZE
;
299 ide_pio_bytes(drive
, cmd
, write
, nr_bytes
);
301 drive
->io_32bit
= saved_io_32bit
;
304 static void ide_error_cmd(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
306 if (cmd
->tf_flags
& IDE_TFLAG_FS
) {
307 int nr_bytes
= cmd
->nbytes
- cmd
->nleft
;
309 if (cmd
->protocol
== ATA_PROT_PIO
&&
310 ((cmd
->tf_flags
& IDE_TFLAG_WRITE
) || cmd
->nleft
== 0)) {
311 if (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
)
312 nr_bytes
-= drive
->mult_count
<< 9;
314 nr_bytes
-= SECTOR_SIZE
;
318 ide_complete_rq(drive
, 0, nr_bytes
);
322 void ide_finish_cmd(ide_drive_t
*drive
, struct ide_cmd
*cmd
, u8 stat
)
324 struct request
*rq
= drive
->hwif
->rq
;
325 u8 err
= ide_read_error(drive
);
327 ide_complete_cmd(drive
, cmd
, stat
, err
);
329 ide_complete_rq(drive
, err
? -EIO
: 0, blk_rq_bytes(rq
));
333 * Handler for command with PIO data phase.
335 static ide_startstop_t
task_pio_intr(ide_drive_t
*drive
)
337 ide_hwif_t
*hwif
= drive
->hwif
;
338 struct ide_cmd
*cmd
= &drive
->hwif
->cmd
;
339 u8 stat
= hwif
->tp_ops
->read_status(hwif
);
340 u8 write
= !!(cmd
->tf_flags
& IDE_TFLAG_WRITE
);
347 /* Didn't want any data? Odd. */
348 if ((stat
& ATA_DRQ
) == 0) {
349 /* Command all done? */
350 if (OK_STAT(stat
, ATA_DRDY
, ATA_BUSY
))
353 /* Assume it was a spurious irq */
357 if (!OK_STAT(stat
, DRIVE_READY
, drive
->bad_wstat
))
360 /* Deal with unexpected ATA data phase. */
361 if (((stat
& ATA_DRQ
) == 0) ^ (cmd
->nleft
== 0))
365 if (write
&& cmd
->nleft
== 0)
368 /* Still data left to transfer. */
369 ide_pio_datablock(drive
, cmd
, write
);
371 /* Are we done? Check status and finish transfer. */
372 if (write
== 0 && cmd
->nleft
== 0) {
373 stat
= wait_drive_not_busy(drive
);
374 if (!OK_STAT(stat
, 0, BAD_STAT
))
380 /* Still data left to transfer. */
381 ide_set_handler(drive
, &task_pio_intr
, WAIT_WORSTCASE
);
384 if ((cmd
->tf_flags
& IDE_TFLAG_FS
) == 0)
385 ide_finish_cmd(drive
, cmd
, stat
);
387 ide_complete_rq(drive
, 0, blk_rq_sectors(cmd
->rq
) << 9);
390 ide_error_cmd(drive
, cmd
);
391 return ide_error(drive
, __func__
, stat
);
394 static ide_startstop_t
pre_task_out_intr(ide_drive_t
*drive
,
397 ide_startstop_t startstop
;
399 if (ide_wait_stat(&startstop
, drive
, ATA_DRQ
,
400 drive
->bad_wstat
, WAIT_DRQ
)) {
401 printk(KERN_ERR
"%s: no DRQ after issuing %sWRITE%s\n",
403 (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
) ? "MULT" : "",
404 (drive
->dev_flags
& IDE_DFLAG_LBA48
) ? "_EXT" : "");
408 if ((drive
->dev_flags
& IDE_DFLAG_UNMASK
) == 0)
411 ide_set_handler(drive
, &task_pio_intr
, WAIT_WORSTCASE
);
413 ide_pio_datablock(drive
, cmd
, 1);
418 int ide_raw_taskfile(ide_drive_t
*drive
, struct ide_cmd
*cmd
, u8
*buf
,
424 rq
= blk_get_request(drive
->queue
, READ
, __GFP_WAIT
);
425 rq
->cmd_type
= REQ_TYPE_ATA_TASKFILE
;
427 if (cmd
->tf_flags
& IDE_TFLAG_WRITE
)
428 rq
->cmd_flags
|= REQ_RW
;
431 * (ks) We transfer currently only whole sectors.
432 * This is suffient for now. But, it would be great,
433 * if we would find a solution to transfer any size.
434 * To support special commands like READ LONG.
437 error
= blk_rq_map_kern(drive
->queue
, rq
, buf
,
438 nsect
* SECTOR_SIZE
, __GFP_WAIT
);
446 error
= blk_execute_rq(drive
->queue
, NULL
, rq
, 0);
453 EXPORT_SYMBOL(ide_raw_taskfile
);
455 int ide_no_data_taskfile(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
457 cmd
->protocol
= ATA_PROT_NODATA
;
459 return ide_raw_taskfile(drive
, cmd
, NULL
, 0);
461 EXPORT_SYMBOL_GPL(ide_no_data_taskfile
);
463 #ifdef CONFIG_IDE_TASK_IOCTL
464 int ide_taskfile_ioctl(ide_drive_t
*drive
, unsigned long arg
)
466 ide_task_request_t
*req_task
;
472 int tasksize
= sizeof(struct ide_task_request_s
);
473 unsigned int taskin
= 0;
474 unsigned int taskout
= 0;
476 char __user
*buf
= (char __user
*)arg
;
478 // printk("IDE Taskfile ...\n");
480 req_task
= kzalloc(tasksize
, GFP_KERNEL
);
481 if (req_task
== NULL
) return -ENOMEM
;
482 if (copy_from_user(req_task
, buf
, tasksize
)) {
487 taskout
= req_task
->out_size
;
488 taskin
= req_task
->in_size
;
490 if (taskin
> 65536 || taskout
> 65536) {
496 int outtotal
= tasksize
;
497 outbuf
= kzalloc(taskout
, GFP_KERNEL
);
498 if (outbuf
== NULL
) {
502 if (copy_from_user(outbuf
, buf
+ outtotal
, taskout
)) {
509 int intotal
= tasksize
+ taskout
;
510 inbuf
= kzalloc(taskin
, GFP_KERNEL
);
515 if (copy_from_user(inbuf
, buf
+ intotal
, taskin
)) {
521 memset(&cmd
, 0, sizeof(cmd
));
523 memcpy(&cmd
.hob
, req_task
->hob_ports
, HDIO_DRIVE_HOB_HDR_SIZE
- 2);
524 memcpy(&cmd
.tf
, req_task
->io_ports
, HDIO_DRIVE_TASK_HDR_SIZE
);
526 cmd
.valid
.out
.tf
= IDE_VALID_DEVICE
;
527 cmd
.valid
.in
.tf
= IDE_VALID_DEVICE
| IDE_VALID_IN_TF
;
528 cmd
.tf_flags
= IDE_TFLAG_IO_16BIT
;
530 if (drive
->dev_flags
& IDE_DFLAG_LBA48
) {
531 cmd
.tf_flags
|= IDE_TFLAG_LBA48
;
532 cmd
.valid
.in
.hob
= IDE_VALID_IN_HOB
;
535 if (req_task
->out_flags
.all
) {
536 cmd
.ftf_flags
|= IDE_FTFLAG_FLAGGED
;
538 if (req_task
->out_flags
.b
.data
)
539 cmd
.ftf_flags
|= IDE_FTFLAG_OUT_DATA
;
541 if (req_task
->out_flags
.b
.nsector_hob
)
542 cmd
.valid
.out
.hob
|= IDE_VALID_NSECT
;
543 if (req_task
->out_flags
.b
.sector_hob
)
544 cmd
.valid
.out
.hob
|= IDE_VALID_LBAL
;
545 if (req_task
->out_flags
.b
.lcyl_hob
)
546 cmd
.valid
.out
.hob
|= IDE_VALID_LBAM
;
547 if (req_task
->out_flags
.b
.hcyl_hob
)
548 cmd
.valid
.out
.hob
|= IDE_VALID_LBAH
;
550 if (req_task
->out_flags
.b
.error_feature
)
551 cmd
.valid
.out
.tf
|= IDE_VALID_FEATURE
;
552 if (req_task
->out_flags
.b
.nsector
)
553 cmd
.valid
.out
.tf
|= IDE_VALID_NSECT
;
554 if (req_task
->out_flags
.b
.sector
)
555 cmd
.valid
.out
.tf
|= IDE_VALID_LBAL
;
556 if (req_task
->out_flags
.b
.lcyl
)
557 cmd
.valid
.out
.tf
|= IDE_VALID_LBAM
;
558 if (req_task
->out_flags
.b
.hcyl
)
559 cmd
.valid
.out
.tf
|= IDE_VALID_LBAH
;
561 cmd
.valid
.out
.tf
|= IDE_VALID_OUT_TF
;
562 if (cmd
.tf_flags
& IDE_TFLAG_LBA48
)
563 cmd
.valid
.out
.hob
|= IDE_VALID_OUT_HOB
;
566 if (req_task
->in_flags
.b
.data
)
567 cmd
.ftf_flags
|= IDE_FTFLAG_IN_DATA
;
569 if (req_task
->req_cmd
== IDE_DRIVE_TASK_RAW_WRITE
) {
570 /* fixup data phase if needed */
571 if (req_task
->data_phase
== TASKFILE_IN_DMAQ
||
572 req_task
->data_phase
== TASKFILE_IN_DMA
)
573 cmd
.tf_flags
|= IDE_TFLAG_WRITE
;
576 cmd
.protocol
= ATA_PROT_DMA
;
578 switch (req_task
->data_phase
) {
579 case TASKFILE_MULTI_OUT
:
580 if (!drive
->mult_count
) {
581 /* (hs): give up if multcount is not set */
582 printk(KERN_ERR
"%s: %s Multimode Write " \
583 "multcount is not set\n",
584 drive
->name
, __func__
);
588 cmd
.tf_flags
|= IDE_TFLAG_MULTI_PIO
;
591 cmd
.protocol
= ATA_PROT_PIO
;
593 case TASKFILE_OUT_DMAQ
:
594 case TASKFILE_OUT_DMA
:
595 cmd
.tf_flags
|= IDE_TFLAG_WRITE
;
596 nsect
= taskout
/ SECTOR_SIZE
;
599 case TASKFILE_MULTI_IN
:
600 if (!drive
->mult_count
) {
601 /* (hs): give up if multcount is not set */
602 printk(KERN_ERR
"%s: %s Multimode Read failure " \
603 "multcount is not set\n",
604 drive
->name
, __func__
);
608 cmd
.tf_flags
|= IDE_TFLAG_MULTI_PIO
;
611 cmd
.protocol
= ATA_PROT_PIO
;
613 case TASKFILE_IN_DMAQ
:
614 case TASKFILE_IN_DMA
:
615 nsect
= taskin
/ SECTOR_SIZE
;
618 case TASKFILE_NO_DATA
:
619 cmd
.protocol
= ATA_PROT_NODATA
;
626 if (req_task
->req_cmd
== IDE_DRIVE_TASK_NO_DATA
)
629 nsect
= (cmd
.hob
.nsect
<< 8) | cmd
.tf
.nsect
;
632 printk(KERN_ERR
"%s: in/out command without data\n",
639 err
= ide_raw_taskfile(drive
, &cmd
, data_buf
, nsect
);
641 memcpy(req_task
->hob_ports
, &cmd
.hob
, HDIO_DRIVE_HOB_HDR_SIZE
- 2);
642 memcpy(req_task
->io_ports
, &cmd
.tf
, HDIO_DRIVE_TASK_HDR_SIZE
);
644 if ((cmd
.ftf_flags
& IDE_FTFLAG_SET_IN_FLAGS
) &&
645 req_task
->in_flags
.all
== 0) {
646 req_task
->in_flags
.all
= IDE_TASKFILE_STD_IN_FLAGS
;
647 if (drive
->dev_flags
& IDE_DFLAG_LBA48
)
648 req_task
->in_flags
.all
|= (IDE_HOB_STD_IN_FLAGS
<< 8);
651 if (copy_to_user(buf
, req_task
, tasksize
)) {
656 int outtotal
= tasksize
;
657 if (copy_to_user(buf
+ outtotal
, outbuf
, taskout
)) {
663 int intotal
= tasksize
+ taskout
;
664 if (copy_to_user(buf
+ intotal
, inbuf
, taskin
)) {
674 // printk("IDE Taskfile ioctl ended. rc = %i\n", err);