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>
22 #include <linux/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 pr_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 transferred, 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 pr_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
;
228 unsigned long uninitialized_var(flags
);
235 cursg
= cmd
->cursg
= sg
;
238 unsigned nr_bytes
= min(len
, cursg
->length
- cmd
->cursg_ofs
);
241 if (nr_bytes
> PAGE_SIZE
)
242 nr_bytes
= PAGE_SIZE
;
244 page
= sg_page(cursg
);
245 offset
= cursg
->offset
+ cmd
->cursg_ofs
;
247 /* get the current page and offset */
248 page
= nth_page(page
, (offset
>> PAGE_SHIFT
));
251 page_is_high
= PageHighMem(page
);
253 local_irq_save(flags
);
255 buf
= kmap_atomic(page
, KM_BIO_SRC_IRQ
) + offset
;
257 cmd
->nleft
-= nr_bytes
;
258 cmd
->cursg_ofs
+= nr_bytes
;
260 if (cmd
->cursg_ofs
== cursg
->length
) {
261 cursg
= cmd
->cursg
= sg_next(cmd
->cursg
);
265 /* do the actual data transfer */
267 hwif
->tp_ops
->output_data(drive
, cmd
, buf
, nr_bytes
);
269 hwif
->tp_ops
->input_data(drive
, cmd
, buf
, nr_bytes
);
271 kunmap_atomic(buf
, KM_BIO_SRC_IRQ
);
274 local_irq_restore(flags
);
279 EXPORT_SYMBOL_GPL(ide_pio_bytes
);
281 static void ide_pio_datablock(ide_drive_t
*drive
, struct ide_cmd
*cmd
,
284 unsigned int nr_bytes
;
286 u8 saved_io_32bit
= drive
->io_32bit
;
288 if (cmd
->tf_flags
& IDE_TFLAG_FS
)
291 if (cmd
->tf_flags
& IDE_TFLAG_IO_16BIT
)
294 touch_softlockup_watchdog();
296 if (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
)
297 nr_bytes
= min_t(unsigned, cmd
->nleft
, drive
->mult_count
<< 9);
299 nr_bytes
= SECTOR_SIZE
;
301 ide_pio_bytes(drive
, cmd
, write
, nr_bytes
);
303 drive
->io_32bit
= saved_io_32bit
;
306 static void ide_error_cmd(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
308 if (cmd
->tf_flags
& IDE_TFLAG_FS
) {
309 int nr_bytes
= cmd
->nbytes
- cmd
->nleft
;
311 if (cmd
->protocol
== ATA_PROT_PIO
&&
312 ((cmd
->tf_flags
& IDE_TFLAG_WRITE
) || cmd
->nleft
== 0)) {
313 if (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
)
314 nr_bytes
-= drive
->mult_count
<< 9;
316 nr_bytes
-= SECTOR_SIZE
;
320 ide_complete_rq(drive
, 0, nr_bytes
);
324 void ide_finish_cmd(ide_drive_t
*drive
, struct ide_cmd
*cmd
, u8 stat
)
326 struct request
*rq
= drive
->hwif
->rq
;
327 u8 err
= ide_read_error(drive
), nsect
= cmd
->tf
.nsect
;
328 u8 set_xfer
= !!(cmd
->tf_flags
& IDE_TFLAG_SET_XFER
);
330 ide_complete_cmd(drive
, cmd
, stat
, err
);
333 if (err
== 0 && set_xfer
) {
334 ide_set_xfer_rate(drive
, nsect
);
335 ide_driveid_update(drive
);
338 ide_complete_rq(drive
, err
? -EIO
: 0, blk_rq_bytes(rq
));
342 * Handler for command with PIO data phase.
344 static ide_startstop_t
task_pio_intr(ide_drive_t
*drive
)
346 ide_hwif_t
*hwif
= drive
->hwif
;
347 struct ide_cmd
*cmd
= &drive
->hwif
->cmd
;
348 u8 stat
= hwif
->tp_ops
->read_status(hwif
);
349 u8 write
= !!(cmd
->tf_flags
& IDE_TFLAG_WRITE
);
356 /* Didn't want any data? Odd. */
357 if ((stat
& ATA_DRQ
) == 0) {
358 /* Command all done? */
359 if (OK_STAT(stat
, ATA_DRDY
, ATA_BUSY
))
362 /* Assume it was a spurious irq */
366 if (!OK_STAT(stat
, DRIVE_READY
, drive
->bad_wstat
))
369 /* Deal with unexpected ATA data phase. */
370 if (((stat
& ATA_DRQ
) == 0) ^ (cmd
->nleft
== 0))
374 if (write
&& cmd
->nleft
== 0)
377 /* Still data left to transfer. */
378 ide_pio_datablock(drive
, cmd
, write
);
380 /* Are we done? Check status and finish transfer. */
381 if (write
== 0 && cmd
->nleft
== 0) {
382 stat
= wait_drive_not_busy(drive
);
383 if (!OK_STAT(stat
, 0, BAD_STAT
))
389 /* Still data left to transfer. */
390 ide_set_handler(drive
, &task_pio_intr
, WAIT_WORSTCASE
);
393 if ((cmd
->tf_flags
& IDE_TFLAG_FS
) == 0)
394 ide_finish_cmd(drive
, cmd
, stat
);
396 ide_complete_rq(drive
, 0, blk_rq_sectors(cmd
->rq
) << 9);
399 ide_error_cmd(drive
, cmd
);
400 return ide_error(drive
, __func__
, stat
);
403 static ide_startstop_t
pre_task_out_intr(ide_drive_t
*drive
,
406 ide_startstop_t startstop
;
408 if (ide_wait_stat(&startstop
, drive
, ATA_DRQ
,
409 drive
->bad_wstat
, WAIT_DRQ
)) {
410 pr_err("%s: no DRQ after issuing %sWRITE%s\n", drive
->name
,
411 (cmd
->tf_flags
& IDE_TFLAG_MULTI_PIO
) ? "MULT" : "",
412 (drive
->dev_flags
& IDE_DFLAG_LBA48
) ? "_EXT" : "");
416 if ((drive
->dev_flags
& IDE_DFLAG_UNMASK
) == 0)
419 ide_set_handler(drive
, &task_pio_intr
, WAIT_WORSTCASE
);
421 ide_pio_datablock(drive
, cmd
, 1);
426 int ide_raw_taskfile(ide_drive_t
*drive
, struct ide_cmd
*cmd
, u8
*buf
,
431 int rw
= !(cmd
->tf_flags
& IDE_TFLAG_WRITE
) ? READ
: WRITE
;
433 rq
= blk_get_request(drive
->queue
, rw
, __GFP_WAIT
);
434 rq
->cmd_type
= REQ_TYPE_ATA_TASKFILE
;
437 * (ks) We transfer currently only whole sectors.
438 * This is suffient for now. But, it would be great,
439 * if we would find a solution to transfer any size.
440 * To support special commands like READ LONG.
443 error
= blk_rq_map_kern(drive
->queue
, rq
, buf
,
444 nsect
* SECTOR_SIZE
, __GFP_WAIT
);
452 error
= blk_execute_rq(drive
->queue
, NULL
, rq
, 0);
458 EXPORT_SYMBOL(ide_raw_taskfile
);
460 int ide_no_data_taskfile(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
462 cmd
->protocol
= ATA_PROT_NODATA
;
464 return ide_raw_taskfile(drive
, cmd
, NULL
, 0);
466 EXPORT_SYMBOL_GPL(ide_no_data_taskfile
);
468 #ifdef CONFIG_IDE_TASK_IOCTL
469 int ide_taskfile_ioctl(ide_drive_t
*drive
, unsigned long arg
)
471 ide_task_request_t
*req_task
;
477 int tasksize
= sizeof(struct ide_task_request_s
);
478 unsigned int taskin
= 0;
479 unsigned int taskout
= 0;
481 char __user
*buf
= (char __user
*)arg
;
483 req_task
= memdup_user(buf
, tasksize
);
484 if (IS_ERR(req_task
))
485 return PTR_ERR(req_task
);
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 pr_err("%s: %s Multimode Write multcount is not set\n",
583 drive
->name
, __func__
);
587 cmd
.tf_flags
|= IDE_TFLAG_MULTI_PIO
;
590 cmd
.protocol
= ATA_PROT_PIO
;
592 case TASKFILE_OUT_DMAQ
:
593 case TASKFILE_OUT_DMA
:
594 cmd
.tf_flags
|= IDE_TFLAG_WRITE
;
595 nsect
= taskout
/ SECTOR_SIZE
;
598 case TASKFILE_MULTI_IN
:
599 if (!drive
->mult_count
) {
600 /* (hs): give up if multcount is not set */
601 pr_err("%s: %s Multimode Read multcount is not set\n",
602 drive
->name
, __func__
);
606 cmd
.tf_flags
|= IDE_TFLAG_MULTI_PIO
;
609 cmd
.protocol
= ATA_PROT_PIO
;
611 case TASKFILE_IN_DMAQ
:
612 case TASKFILE_IN_DMA
:
613 nsect
= taskin
/ SECTOR_SIZE
;
616 case TASKFILE_NO_DATA
:
617 cmd
.protocol
= ATA_PROT_NODATA
;
624 if (req_task
->req_cmd
== IDE_DRIVE_TASK_NO_DATA
)
627 nsect
= (cmd
.hob
.nsect
<< 8) | cmd
.tf
.nsect
;
630 pr_err("%s: in/out command without data\n",
637 err
= ide_raw_taskfile(drive
, &cmd
, data_buf
, nsect
);
639 memcpy(req_task
->hob_ports
, &cmd
.hob
, HDIO_DRIVE_HOB_HDR_SIZE
- 2);
640 memcpy(req_task
->io_ports
, &cmd
.tf
, HDIO_DRIVE_TASK_HDR_SIZE
);
642 if ((cmd
.ftf_flags
& IDE_FTFLAG_SET_IN_FLAGS
) &&
643 req_task
->in_flags
.all
== 0) {
644 req_task
->in_flags
.all
= IDE_TASKFILE_STD_IN_FLAGS
;
645 if (drive
->dev_flags
& IDE_DFLAG_LBA48
)
646 req_task
->in_flags
.all
|= (IDE_HOB_STD_IN_FLAGS
<< 8);
649 if (copy_to_user(buf
, req_task
, tasksize
)) {
654 int outtotal
= tasksize
;
655 if (copy_to_user(buf
+ outtotal
, outbuf
, taskout
)) {
661 int intotal
= tasksize
+ taskout
;
662 if (copy_to_user(buf
+ intotal
, inbuf
, taskin
)) {