5 #include <linux/kernel.h>
6 #include <linux/cdrom.h>
7 #include <linux/delay.h>
9 #include <linux/scatterlist.h>
10 #include <linux/gfp.h>
12 #include <scsi/scsi.h>
14 #define DRV_NAME "ide-atapi"
15 #define PFX DRV_NAME ": "
18 #define debug_log(fmt, args...) \
19 printk(KERN_INFO "ide: " fmt, ## args)
21 #define debug_log(fmt, args...) do {} while (0)
24 #define ATAPI_MIN_CDB_BYTES 12
26 static inline int dev_is_idecd(ide_drive_t
*drive
)
28 return drive
->media
== ide_cdrom
|| drive
->media
== ide_optical
;
32 * Check whether we can support a device,
33 * based on the ATAPI IDENTIFY command results.
35 int ide_check_atapi_device(ide_drive_t
*drive
, const char *s
)
38 u8 gcw
[2], protocol
, device_type
, removable
, drq_type
, packet_size
;
40 *((u16
*)&gcw
) = id
[ATA_ID_CONFIG
];
42 protocol
= (gcw
[1] & 0xC0) >> 6;
43 device_type
= gcw
[1] & 0x1F;
44 removable
= (gcw
[0] & 0x80) >> 7;
45 drq_type
= (gcw
[0] & 0x60) >> 5;
46 packet_size
= gcw
[0] & 0x03;
49 /* kludge for Apple PowerBook internal zip */
50 if (drive
->media
== ide_floppy
&& device_type
== 5 &&
51 !strstr((char *)&id
[ATA_ID_PROD
], "CD-ROM") &&
52 strstr((char *)&id
[ATA_ID_PROD
], "ZIP"))
57 printk(KERN_ERR
"%s: %s: protocol (0x%02x) is not ATAPI\n",
58 s
, drive
->name
, protocol
);
59 else if ((drive
->media
== ide_floppy
&& device_type
!= 0) ||
60 (drive
->media
== ide_tape
&& device_type
!= 1))
61 printk(KERN_ERR
"%s: %s: invalid device type (0x%02x)\n",
62 s
, drive
->name
, device_type
);
63 else if (removable
== 0)
64 printk(KERN_ERR
"%s: %s: the removable flag is not set\n",
66 else if (drive
->media
== ide_floppy
&& drq_type
== 3)
67 printk(KERN_ERR
"%s: %s: sorry, DRQ type (0x%02x) not "
68 "supported\n", s
, drive
->name
, drq_type
);
69 else if (packet_size
!= 0)
70 printk(KERN_ERR
"%s: %s: packet size (0x%02x) is not 12 "
71 "bytes\n", s
, drive
->name
, packet_size
);
76 EXPORT_SYMBOL_GPL(ide_check_atapi_device
);
78 void ide_init_pc(struct ide_atapi_pc
*pc
)
80 memset(pc
, 0, sizeof(*pc
));
82 EXPORT_SYMBOL_GPL(ide_init_pc
);
85 * Add a special packet command request to the tail of the request queue,
86 * and wait for it to be serviced.
88 int ide_queue_pc_tail(ide_drive_t
*drive
, struct gendisk
*disk
,
89 struct ide_atapi_pc
*pc
, void *buf
, unsigned int bufflen
)
94 rq
= blk_get_request(drive
->queue
, READ
, __GFP_WAIT
);
95 rq
->cmd_type
= REQ_TYPE_SPECIAL
;
96 rq
->special
= (char *)pc
;
99 error
= blk_rq_map_kern(drive
->queue
, rq
, buf
, bufflen
,
105 memcpy(rq
->cmd
, pc
->c
, 12);
106 if (drive
->media
== ide_tape
)
107 rq
->cmd
[13] = REQ_IDETAPE_PC1
;
108 error
= blk_execute_rq(drive
->queue
, disk
, rq
, 0);
113 EXPORT_SYMBOL_GPL(ide_queue_pc_tail
);
115 int ide_do_test_unit_ready(ide_drive_t
*drive
, struct gendisk
*disk
)
117 struct ide_atapi_pc pc
;
120 pc
.c
[0] = TEST_UNIT_READY
;
122 return ide_queue_pc_tail(drive
, disk
, &pc
, NULL
, 0);
124 EXPORT_SYMBOL_GPL(ide_do_test_unit_ready
);
126 int ide_do_start_stop(ide_drive_t
*drive
, struct gendisk
*disk
, int start
)
128 struct ide_atapi_pc pc
;
131 pc
.c
[0] = START_STOP
;
134 if (drive
->media
== ide_tape
)
135 pc
.flags
|= PC_FLAG_WAIT_FOR_DSC
;
137 return ide_queue_pc_tail(drive
, disk
, &pc
, NULL
, 0);
139 EXPORT_SYMBOL_GPL(ide_do_start_stop
);
141 int ide_set_media_lock(ide_drive_t
*drive
, struct gendisk
*disk
, int on
)
143 struct ide_atapi_pc pc
;
145 if ((drive
->dev_flags
& IDE_DFLAG_DOORLOCKING
) == 0)
149 pc
.c
[0] = ALLOW_MEDIUM_REMOVAL
;
152 return ide_queue_pc_tail(drive
, disk
, &pc
, NULL
, 0);
154 EXPORT_SYMBOL_GPL(ide_set_media_lock
);
156 void ide_create_request_sense_cmd(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
)
159 pc
->c
[0] = REQUEST_SENSE
;
160 if (drive
->media
== ide_floppy
) {
168 EXPORT_SYMBOL_GPL(ide_create_request_sense_cmd
);
170 void ide_prep_sense(ide_drive_t
*drive
, struct request
*rq
)
172 struct request_sense
*sense
= &drive
->sense_data
;
173 struct request
*sense_rq
= &drive
->sense_rq
;
174 unsigned int cmd_len
, sense_len
;
177 switch (drive
->media
) {
191 BUG_ON(sense_len
> sizeof(*sense
));
193 if (blk_sense_request(rq
) || drive
->sense_rq_armed
)
196 memset(sense
, 0, sizeof(*sense
));
198 blk_rq_init(rq
->q
, sense_rq
);
200 err
= blk_rq_map_kern(drive
->queue
, sense_rq
, sense
, sense_len
,
203 if (printk_ratelimit())
204 printk(KERN_WARNING PFX
"%s: failed to map sense "
205 "buffer\n", drive
->name
);
209 sense_rq
->rq_disk
= rq
->rq_disk
;
210 sense_rq
->cmd
[0] = GPCMD_REQUEST_SENSE
;
211 sense_rq
->cmd
[4] = cmd_len
;
212 sense_rq
->cmd_type
= REQ_TYPE_SENSE
;
213 sense_rq
->cmd_flags
|= REQ_PREEMPT
;
215 if (drive
->media
== ide_tape
)
216 sense_rq
->cmd
[13] = REQ_IDETAPE_PC1
;
218 drive
->sense_rq_armed
= true;
220 EXPORT_SYMBOL_GPL(ide_prep_sense
);
222 int ide_queue_sense_rq(ide_drive_t
*drive
, void *special
)
224 /* deferred failure from ide_prep_sense() */
225 if (!drive
->sense_rq_armed
) {
226 printk(KERN_WARNING PFX
"%s: error queuing a sense request\n",
231 drive
->sense_rq
.special
= special
;
232 drive
->sense_rq_armed
= false;
234 drive
->hwif
->rq
= NULL
;
236 elv_add_request(drive
->queue
, &drive
->sense_rq
,
237 ELEVATOR_INSERT_FRONT
, 0);
240 EXPORT_SYMBOL_GPL(ide_queue_sense_rq
);
243 * Called when an error was detected during the last packet command.
244 * We queue a request sense packet command at the head of the request
247 void ide_retry_pc(ide_drive_t
*drive
)
249 struct request
*failed_rq
= drive
->hwif
->rq
;
250 struct request
*sense_rq
= &drive
->sense_rq
;
251 struct ide_atapi_pc
*pc
= &drive
->request_sense_pc
;
253 (void)ide_read_error(drive
);
255 /* init pc from sense_rq */
257 memcpy(pc
->c
, sense_rq
->cmd
, 12);
259 if (drive
->media
== ide_tape
)
260 drive
->atapi_flags
|= IDE_AFLAG_IGNORE_DSC
;
263 * Push back the failed request and put request sense on top
264 * of it. The failed command will be retried after sense data
267 drive
->hwif
->rq
= NULL
;
268 ide_requeue_and_plug(drive
, failed_rq
);
269 if (ide_queue_sense_rq(drive
, pc
)) {
270 blk_start_request(failed_rq
);
271 ide_complete_rq(drive
, -EIO
, blk_rq_bytes(failed_rq
));
274 EXPORT_SYMBOL_GPL(ide_retry_pc
);
276 int ide_cd_expiry(ide_drive_t
*drive
)
278 struct request
*rq
= drive
->hwif
->rq
;
279 unsigned long wait
= 0;
281 debug_log("%s: rq->cmd[0]: 0x%x\n", __func__
, rq
->cmd
[0]);
284 * Some commands are *slow* and normally take a long time to complete.
285 * Usually we can use the ATAPI "disconnect" to bypass this, but not all
286 * commands/drives support that. Let ide_timer_expiry keep polling us
289 switch (rq
->cmd
[0]) {
291 case GPCMD_FORMAT_UNIT
:
292 case GPCMD_RESERVE_RZONE_TRACK
:
293 case GPCMD_CLOSE_TRACK
:
294 case GPCMD_FLUSH_CACHE
:
295 wait
= ATAPI_WAIT_PC
;
298 if (!(rq
->cmd_flags
& REQ_QUIET
))
299 printk(KERN_INFO PFX
"cmd 0x%x timed out\n",
306 EXPORT_SYMBOL_GPL(ide_cd_expiry
);
308 int ide_cd_get_xferlen(struct request
*rq
)
310 if (blk_fs_request(rq
))
312 else if (blk_sense_request(rq
) || blk_pc_request(rq
) ||
313 rq
->cmd_type
== REQ_TYPE_ATA_PC
)
314 return blk_rq_bytes(rq
);
318 EXPORT_SYMBOL_GPL(ide_cd_get_xferlen
);
320 void ide_read_bcount_and_ireason(ide_drive_t
*drive
, u16
*bcount
, u8
*ireason
)
322 struct ide_taskfile tf
;
324 drive
->hwif
->tp_ops
->tf_read(drive
, &tf
, IDE_VALID_NSECT
|
325 IDE_VALID_LBAM
| IDE_VALID_LBAH
);
327 *bcount
= (tf
.lbah
<< 8) | tf
.lbam
;
328 *ireason
= tf
.nsect
& 3;
330 EXPORT_SYMBOL_GPL(ide_read_bcount_and_ireason
);
333 * Check the contents of the interrupt reason register and attempt to recover if
334 * there are problems.
337 * - 0 if everything's ok
338 * - 1 if the request has to be terminated.
340 int ide_check_ireason(ide_drive_t
*drive
, struct request
*rq
, int len
,
343 ide_hwif_t
*hwif
= drive
->hwif
;
345 debug_log("ireason: 0x%x, rw: 0x%x\n", ireason
, rw
);
347 if (ireason
== (!rw
<< 1))
349 else if (ireason
== (rw
<< 1)) {
350 printk(KERN_ERR PFX
"%s: %s: wrong transfer direction!\n",
351 drive
->name
, __func__
);
353 if (dev_is_idecd(drive
))
354 ide_pad_transfer(drive
, rw
, len
);
355 } else if (!rw
&& ireason
== ATAPI_COD
) {
356 if (dev_is_idecd(drive
)) {
358 * Some drives (ASUS) seem to tell us that status info
359 * is available. Just get it and ignore.
361 (void)hwif
->tp_ops
->read_status(hwif
);
365 if (ireason
& ATAPI_COD
)
366 printk(KERN_ERR PFX
"%s: CoD != 0 in %s\n", drive
->name
,
369 /* drive wants a command packet, or invalid ireason... */
370 printk(KERN_ERR PFX
"%s: %s: bad interrupt reason 0x%02x\n",
371 drive
->name
, __func__
, ireason
);
374 if (dev_is_idecd(drive
) && rq
->cmd_type
== REQ_TYPE_ATA_PC
)
375 rq
->cmd_flags
|= REQ_FAILED
;
379 EXPORT_SYMBOL_GPL(ide_check_ireason
);
382 * This is the usual interrupt handler which will be called during a packet
383 * command. We will transfer some of the data (as requested by the drive)
384 * and will re-point interrupt handler to us.
386 static ide_startstop_t
ide_pc_intr(ide_drive_t
*drive
)
388 struct ide_atapi_pc
*pc
= drive
->pc
;
389 ide_hwif_t
*hwif
= drive
->hwif
;
390 struct ide_cmd
*cmd
= &hwif
->cmd
;
391 struct request
*rq
= hwif
->rq
;
392 const struct ide_tp_ops
*tp_ops
= hwif
->tp_ops
;
393 unsigned int timeout
, done
;
395 u8 stat
, ireason
, dsc
= 0;
396 u8 write
= !!(pc
->flags
& PC_FLAG_WRITING
);
398 debug_log("Enter %s - interrupt handler\n", __func__
);
400 timeout
= (drive
->media
== ide_floppy
) ? WAIT_FLOPPY_CMD
403 /* Clear the interrupt */
404 stat
= tp_ops
->read_status(hwif
);
406 if (pc
->flags
& PC_FLAG_DMA_IN_PROGRESS
) {
409 drive
->waiting_for_dma
= 0;
410 rc
= hwif
->dma_ops
->dma_end(drive
);
411 ide_dma_unmap_sg(drive
, cmd
);
413 if (rc
|| (drive
->media
== ide_tape
&& (stat
& ATA_ERR
))) {
414 if (drive
->media
== ide_floppy
)
415 printk(KERN_ERR PFX
"%s: DMA %s error\n",
416 drive
->name
, rq_data_dir(pc
->rq
)
418 pc
->flags
|= PC_FLAG_DMA_ERROR
;
421 debug_log("%s: DMA finished\n", drive
->name
);
424 /* No more interrupts */
425 if ((stat
& ATA_DRQ
) == 0) {
428 debug_log("Packet command completed, %d bytes transferred\n",
431 pc
->flags
&= ~PC_FLAG_DMA_IN_PROGRESS
;
433 local_irq_enable_in_hardirq();
435 if (drive
->media
== ide_tape
&&
436 (stat
& ATA_ERR
) && rq
->cmd
[0] == REQUEST_SENSE
)
439 if ((stat
& ATA_ERR
) || (pc
->flags
& PC_FLAG_DMA_ERROR
)) {
441 debug_log("%s: I/O error\n", drive
->name
);
443 if (drive
->media
!= ide_tape
)
446 if (rq
->cmd
[0] == REQUEST_SENSE
) {
447 printk(KERN_ERR PFX
"%s: I/O error in request "
448 "sense command\n", drive
->name
);
449 return ide_do_reset(drive
);
452 debug_log("[cmd %x]: check condition\n", rq
->cmd
[0]);
454 /* Retry operation */
457 /* queued, but not started */
462 if ((pc
->flags
& PC_FLAG_WAIT_FOR_DSC
) && (stat
& ATA_DSC
) == 0)
466 * ->pc_callback() might change rq->data_len for
467 * residual count, cache total length.
469 done
= blk_rq_bytes(rq
);
471 /* Command finished - Call the callback function */
472 uptodate
= drive
->pc_callback(drive
, dsc
);
475 drive
->failed_pc
= NULL
;
477 if (blk_special_request(rq
)) {
482 if (blk_fs_request(rq
) == 0 && uptodate
<= 0) {
487 error
= uptodate
? 0 : -EIO
;
490 ide_complete_rq(drive
, error
, blk_rq_bytes(rq
));
494 if (pc
->flags
& PC_FLAG_DMA_IN_PROGRESS
) {
495 pc
->flags
&= ~PC_FLAG_DMA_IN_PROGRESS
;
496 printk(KERN_ERR PFX
"%s: The device wants to issue more "
497 "interrupts in DMA mode\n", drive
->name
);
499 return ide_do_reset(drive
);
502 /* Get the number of bytes to transfer on this interrupt. */
503 ide_read_bcount_and_ireason(drive
, &bcount
, &ireason
);
505 if (ide_check_ireason(drive
, rq
, bcount
, ireason
, write
))
506 return ide_do_reset(drive
);
508 done
= min_t(unsigned int, bcount
, cmd
->nleft
);
509 ide_pio_bytes(drive
, cmd
, write
, done
);
511 /* Update transferred byte count */
512 rq
->resid_len
-= done
;
517 ide_pad_transfer(drive
, write
, bcount
);
519 debug_log("[cmd %x] transferred %d bytes, padded %d bytes, resid: %u\n",
520 rq
->cmd
[0], done
, bcount
, rq
->resid_len
);
522 /* And set the interrupt handler again */
523 ide_set_handler(drive
, ide_pc_intr
, timeout
);
527 static void ide_init_packet_cmd(struct ide_cmd
*cmd
, u8 valid_tf
,
530 cmd
->protocol
= dma
? ATAPI_PROT_DMA
: ATAPI_PROT_PIO
;
531 cmd
->valid
.out
.tf
= IDE_VALID_LBAH
| IDE_VALID_LBAM
|
532 IDE_VALID_FEATURE
| valid_tf
;
533 cmd
->tf
.command
= ATA_CMD_PACKET
;
534 cmd
->tf
.feature
= dma
; /* Use PIO/DMA */
535 cmd
->tf
.lbam
= bcount
& 0xff;
536 cmd
->tf
.lbah
= (bcount
>> 8) & 0xff;
539 static u8
ide_read_ireason(ide_drive_t
*drive
)
541 struct ide_taskfile tf
;
543 drive
->hwif
->tp_ops
->tf_read(drive
, &tf
, IDE_VALID_NSECT
);
548 static u8
ide_wait_ireason(ide_drive_t
*drive
, u8 ireason
)
552 while (retries
-- && ((ireason
& ATAPI_COD
) == 0 ||
553 (ireason
& ATAPI_IO
))) {
554 printk(KERN_ERR PFX
"%s: (IO,CoD != (0,1) while issuing "
555 "a packet command, retrying\n", drive
->name
);
557 ireason
= ide_read_ireason(drive
);
559 printk(KERN_ERR PFX
"%s: (IO,CoD != (0,1) while issuing"
560 " a packet command, ignoring\n",
562 ireason
|= ATAPI_COD
;
563 ireason
&= ~ATAPI_IO
;
570 static int ide_delayed_transfer_pc(ide_drive_t
*drive
)
572 /* Send the actual packet */
573 drive
->hwif
->tp_ops
->output_data(drive
, NULL
, drive
->pc
->c
, 12);
575 /* Timeout for the packet command */
576 return WAIT_FLOPPY_CMD
;
579 static ide_startstop_t
ide_transfer_pc(ide_drive_t
*drive
)
581 struct ide_atapi_pc
*uninitialized_var(pc
);
582 ide_hwif_t
*hwif
= drive
->hwif
;
583 struct request
*rq
= hwif
->rq
;
584 ide_expiry_t
*expiry
;
585 unsigned int timeout
;
587 ide_startstop_t startstop
;
590 if (ide_wait_stat(&startstop
, drive
, ATA_DRQ
, ATA_BUSY
, WAIT_READY
)) {
591 printk(KERN_ERR PFX
"%s: Strange, packet command initiated yet "
592 "DRQ isn't asserted\n", drive
->name
);
596 if (drive
->atapi_flags
& IDE_AFLAG_DRQ_INTERRUPT
) {
598 drive
->waiting_for_dma
= 1;
601 if (dev_is_idecd(drive
)) {
602 /* ATAPI commands get padded out to 12 bytes minimum */
603 cmd_len
= COMMAND_SIZE(rq
->cmd
[0]);
604 if (cmd_len
< ATAPI_MIN_CDB_BYTES
)
605 cmd_len
= ATAPI_MIN_CDB_BYTES
;
607 timeout
= rq
->timeout
;
608 expiry
= ide_cd_expiry
;
612 cmd_len
= ATAPI_MIN_CDB_BYTES
;
615 * If necessary schedule the packet transfer to occur 'timeout'
616 * milliseconds later in ide_delayed_transfer_pc() after the
617 * device says it's ready for a packet.
619 if (drive
->atapi_flags
& IDE_AFLAG_ZIP_DRIVE
) {
620 timeout
= drive
->pc_delay
;
621 expiry
= &ide_delayed_transfer_pc
;
623 timeout
= (drive
->media
== ide_floppy
) ? WAIT_FLOPPY_CMD
628 ireason
= ide_read_ireason(drive
);
629 if (drive
->media
== ide_tape
)
630 ireason
= ide_wait_ireason(drive
, ireason
);
632 if ((ireason
& ATAPI_COD
) == 0 || (ireason
& ATAPI_IO
)) {
633 printk(KERN_ERR PFX
"%s: (IO,CoD) != (0,1) while "
634 "issuing a packet command\n", drive
->name
);
636 return ide_do_reset(drive
);
640 hwif
->expiry
= expiry
;
642 /* Set the interrupt routine */
643 ide_set_handler(drive
,
644 (dev_is_idecd(drive
) ? drive
->irq_handler
648 /* Send the actual packet */
649 if ((drive
->atapi_flags
& IDE_AFLAG_ZIP_DRIVE
) == 0)
650 hwif
->tp_ops
->output_data(drive
, NULL
, rq
->cmd
, cmd_len
);
652 /* Begin DMA, if necessary */
653 if (dev_is_idecd(drive
)) {
655 hwif
->dma_ops
->dma_start(drive
);
657 if (pc
->flags
& PC_FLAG_DMA_OK
) {
658 pc
->flags
|= PC_FLAG_DMA_IN_PROGRESS
;
659 hwif
->dma_ops
->dma_start(drive
);
666 ide_startstop_t
ide_issue_pc(ide_drive_t
*drive
, struct ide_cmd
*cmd
)
668 struct ide_atapi_pc
*pc
;
669 ide_hwif_t
*hwif
= drive
->hwif
;
670 ide_expiry_t
*expiry
= NULL
;
671 struct request
*rq
= hwif
->rq
;
672 unsigned int timeout
, bytes
;
675 u8 drq_int
= !!(drive
->atapi_flags
& IDE_AFLAG_DRQ_INTERRUPT
);
677 if (dev_is_idecd(drive
)) {
678 valid_tf
= IDE_VALID_NSECT
| IDE_VALID_LBAL
;
679 bcount
= ide_cd_get_xferlen(rq
);
680 expiry
= ide_cd_expiry
;
681 timeout
= ATAPI_WAIT_PC
;
684 drive
->dma
= !ide_dma_prepare(drive
, cmd
);
688 valid_tf
= IDE_VALID_DEVICE
;
689 bytes
= blk_rq_bytes(rq
);
690 bcount
= ((drive
->media
== ide_tape
) ? bytes
691 : min_t(unsigned int,
694 /* We haven't transferred any data yet */
695 rq
->resid_len
= bcount
;
697 if (pc
->flags
& PC_FLAG_DMA_ERROR
) {
698 pc
->flags
&= ~PC_FLAG_DMA_ERROR
;
702 if (pc
->flags
& PC_FLAG_DMA_OK
)
703 drive
->dma
= !ide_dma_prepare(drive
, cmd
);
706 pc
->flags
&= ~PC_FLAG_DMA_OK
;
708 timeout
= (drive
->media
== ide_floppy
) ? WAIT_FLOPPY_CMD
712 ide_init_packet_cmd(cmd
, valid_tf
, bcount
, drive
->dma
);
714 (void)do_rw_taskfile(drive
, cmd
);
718 drive
->waiting_for_dma
= 0;
719 hwif
->expiry
= expiry
;
722 ide_execute_command(drive
, cmd
, ide_transfer_pc
, timeout
);
724 return drq_int
? ide_started
: ide_transfer_pc(drive
);
726 EXPORT_SYMBOL_GPL(ide_issue_pc
);