ide-atapi: setup dma for ide-cd
[linux-2.6/mini2440.git] / drivers / ide / ide-atapi.c
blob74273fdc882740a1b138b1e45c47d22533aa8a0c
1 /*
2 * ATAPI support.
3 */
5 #include <linux/kernel.h>
6 #include <linux/delay.h>
7 #include <linux/ide.h>
8 #include <scsi/scsi.h>
10 #ifdef DEBUG
11 #define debug_log(fmt, args...) \
12 printk(KERN_INFO "ide: " fmt, ## args)
13 #else
14 #define debug_log(fmt, args...) do {} while (0)
15 #endif
17 static inline int dev_is_idecd(ide_drive_t *drive)
19 return (drive->media == ide_cdrom || drive->media == ide_optical) &&
20 !(drive->dev_flags & IDE_DFLAG_SCSI);
24 * Check whether we can support a device,
25 * based on the ATAPI IDENTIFY command results.
27 int ide_check_atapi_device(ide_drive_t *drive, const char *s)
29 u16 *id = drive->id;
30 u8 gcw[2], protocol, device_type, removable, drq_type, packet_size;
32 *((u16 *)&gcw) = id[ATA_ID_CONFIG];
34 protocol = (gcw[1] & 0xC0) >> 6;
35 device_type = gcw[1] & 0x1F;
36 removable = (gcw[0] & 0x80) >> 7;
37 drq_type = (gcw[0] & 0x60) >> 5;
38 packet_size = gcw[0] & 0x03;
40 #ifdef CONFIG_PPC
41 /* kludge for Apple PowerBook internal zip */
42 if (drive->media == ide_floppy && device_type == 5 &&
43 !strstr((char *)&id[ATA_ID_PROD], "CD-ROM") &&
44 strstr((char *)&id[ATA_ID_PROD], "ZIP"))
45 device_type = 0;
46 #endif
48 if (protocol != 2)
49 printk(KERN_ERR "%s: %s: protocol (0x%02x) is not ATAPI\n",
50 s, drive->name, protocol);
51 else if ((drive->media == ide_floppy && device_type != 0) ||
52 (drive->media == ide_tape && device_type != 1))
53 printk(KERN_ERR "%s: %s: invalid device type (0x%02x)\n",
54 s, drive->name, device_type);
55 else if (removable == 0)
56 printk(KERN_ERR "%s: %s: the removable flag is not set\n",
57 s, drive->name);
58 else if (drive->media == ide_floppy && drq_type == 3)
59 printk(KERN_ERR "%s: %s: sorry, DRQ type (0x%02x) not "
60 "supported\n", s, drive->name, drq_type);
61 else if (packet_size != 0)
62 printk(KERN_ERR "%s: %s: packet size (0x%02x) is not 12 "
63 "bytes\n", s, drive->name, packet_size);
64 else
65 return 1;
66 return 0;
68 EXPORT_SYMBOL_GPL(ide_check_atapi_device);
70 /* PIO data transfer routine using the scatter gather table. */
71 int ide_io_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
72 unsigned int bcount, int write)
74 ide_hwif_t *hwif = drive->hwif;
75 const struct ide_tp_ops *tp_ops = hwif->tp_ops;
76 xfer_func_t *xf = write ? tp_ops->output_data : tp_ops->input_data;
77 struct scatterlist *sg = pc->sg;
78 char *buf;
79 int count, done = 0;
81 while (bcount) {
82 count = min(sg->length - pc->b_count, bcount);
84 if (PageHighMem(sg_page(sg))) {
85 unsigned long flags;
87 local_irq_save(flags);
88 buf = kmap_atomic(sg_page(sg), KM_IRQ0) + sg->offset;
89 xf(drive, NULL, buf + pc->b_count, count);
90 kunmap_atomic(buf - sg->offset, KM_IRQ0);
91 local_irq_restore(flags);
92 } else {
93 buf = sg_virt(sg);
94 xf(drive, NULL, buf + pc->b_count, count);
97 bcount -= count;
98 pc->b_count += count;
99 done += count;
101 if (pc->b_count == sg->length) {
102 if (!--pc->sg_cnt)
103 break;
104 pc->sg = sg = sg_next(sg);
105 pc->b_count = 0;
109 if (bcount) {
110 printk(KERN_ERR "%s: %d leftover bytes, %s\n", drive->name,
111 bcount, write ? "padding with zeros"
112 : "discarding data");
113 ide_pad_transfer(drive, write, bcount);
116 return done;
118 EXPORT_SYMBOL_GPL(ide_io_buffers);
120 void ide_init_pc(struct ide_atapi_pc *pc)
122 memset(pc, 0, sizeof(*pc));
123 pc->buf = pc->pc_buf;
124 pc->buf_size = IDE_PC_BUFFER_SIZE;
126 EXPORT_SYMBOL_GPL(ide_init_pc);
129 * Generate a new packet command request in front of the request queue, before
130 * the current request, so that it will be processed immediately, on the next
131 * pass through the driver.
133 static void ide_queue_pc_head(ide_drive_t *drive, struct gendisk *disk,
134 struct ide_atapi_pc *pc, struct request *rq)
136 blk_rq_init(NULL, rq);
137 rq->cmd_type = REQ_TYPE_SPECIAL;
138 rq->cmd_flags |= REQ_PREEMPT;
139 rq->buffer = (char *)pc;
140 rq->rq_disk = disk;
141 memcpy(rq->cmd, pc->c, 12);
142 if (drive->media == ide_tape)
143 rq->cmd[13] = REQ_IDETAPE_PC1;
144 ide_do_drive_cmd(drive, rq);
148 * Add a special packet command request to the tail of the request queue,
149 * and wait for it to be serviced.
151 int ide_queue_pc_tail(ide_drive_t *drive, struct gendisk *disk,
152 struct ide_atapi_pc *pc)
154 struct request *rq;
155 int error;
157 rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
158 rq->cmd_type = REQ_TYPE_SPECIAL;
159 rq->buffer = (char *)pc;
160 memcpy(rq->cmd, pc->c, 12);
161 if (drive->media == ide_tape)
162 rq->cmd[13] = REQ_IDETAPE_PC1;
163 error = blk_execute_rq(drive->queue, disk, rq, 0);
164 blk_put_request(rq);
166 return error;
168 EXPORT_SYMBOL_GPL(ide_queue_pc_tail);
170 int ide_do_test_unit_ready(ide_drive_t *drive, struct gendisk *disk)
172 struct ide_atapi_pc pc;
174 ide_init_pc(&pc);
175 pc.c[0] = TEST_UNIT_READY;
177 return ide_queue_pc_tail(drive, disk, &pc);
179 EXPORT_SYMBOL_GPL(ide_do_test_unit_ready);
181 int ide_do_start_stop(ide_drive_t *drive, struct gendisk *disk, int start)
183 struct ide_atapi_pc pc;
185 ide_init_pc(&pc);
186 pc.c[0] = START_STOP;
187 pc.c[4] = start;
189 if (drive->media == ide_tape)
190 pc.flags |= PC_FLAG_WAIT_FOR_DSC;
192 return ide_queue_pc_tail(drive, disk, &pc);
194 EXPORT_SYMBOL_GPL(ide_do_start_stop);
196 int ide_set_media_lock(ide_drive_t *drive, struct gendisk *disk, int on)
198 struct ide_atapi_pc pc;
200 if ((drive->dev_flags & IDE_DFLAG_DOORLOCKING) == 0)
201 return 0;
203 ide_init_pc(&pc);
204 pc.c[0] = ALLOW_MEDIUM_REMOVAL;
205 pc.c[4] = on;
207 return ide_queue_pc_tail(drive, disk, &pc);
209 EXPORT_SYMBOL_GPL(ide_set_media_lock);
211 void ide_create_request_sense_cmd(ide_drive_t *drive, struct ide_atapi_pc *pc)
213 ide_init_pc(pc);
214 pc->c[0] = REQUEST_SENSE;
215 if (drive->media == ide_floppy) {
216 pc->c[4] = 255;
217 pc->req_xfer = 18;
218 } else {
219 pc->c[4] = 20;
220 pc->req_xfer = 20;
223 EXPORT_SYMBOL_GPL(ide_create_request_sense_cmd);
226 * Called when an error was detected during the last packet command.
227 * We queue a request sense packet command in the head of the request list.
229 void ide_retry_pc(ide_drive_t *drive, struct gendisk *disk)
231 struct request *rq = &drive->request_sense_rq;
232 struct ide_atapi_pc *pc = &drive->request_sense_pc;
234 (void)ide_read_error(drive);
235 ide_create_request_sense_cmd(drive, pc);
236 if (drive->media == ide_tape)
237 set_bit(IDE_AFLAG_IGNORE_DSC, &drive->atapi_flags);
238 ide_queue_pc_head(drive, disk, pc, rq);
240 EXPORT_SYMBOL_GPL(ide_retry_pc);
242 int ide_scsi_expiry(ide_drive_t *drive)
244 struct ide_atapi_pc *pc = drive->pc;
246 debug_log("%s called for %lu at %lu\n", __func__,
247 pc->scsi_cmd->serial_number, jiffies);
249 pc->flags |= PC_FLAG_TIMEDOUT;
251 return 0; /* we do not want the IDE subsystem to retry */
253 EXPORT_SYMBOL_GPL(ide_scsi_expiry);
256 * This is the usual interrupt handler which will be called during a packet
257 * command. We will transfer some of the data (as requested by the drive)
258 * and will re-point interrupt handler to us.
260 static ide_startstop_t ide_pc_intr(ide_drive_t *drive)
262 struct ide_atapi_pc *pc = drive->pc;
263 ide_hwif_t *hwif = drive->hwif;
264 struct request *rq = hwif->hwgroup->rq;
265 const struct ide_tp_ops *tp_ops = hwif->tp_ops;
266 xfer_func_t *xferfunc;
267 ide_expiry_t *expiry;
268 unsigned int timeout, temp;
269 u16 bcount;
270 u8 stat, ireason, scsi = !!(drive->dev_flags & IDE_DFLAG_SCSI), dsc = 0;
272 debug_log("Enter %s - interrupt handler\n", __func__);
274 if (scsi) {
275 timeout = ide_scsi_get_timeout(pc);
276 expiry = ide_scsi_expiry;
277 } else {
278 timeout = (drive->media == ide_floppy) ? WAIT_FLOPPY_CMD
279 : WAIT_TAPE_CMD;
280 expiry = NULL;
283 if (pc->flags & PC_FLAG_TIMEDOUT) {
284 drive->pc_callback(drive, 0);
285 return ide_stopped;
288 /* Clear the interrupt */
289 stat = tp_ops->read_status(hwif);
291 if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
292 if (hwif->dma_ops->dma_end(drive) ||
293 (drive->media == ide_tape && !scsi && (stat & ATA_ERR))) {
294 if (drive->media == ide_floppy && !scsi)
295 printk(KERN_ERR "%s: DMA %s error\n",
296 drive->name, rq_data_dir(pc->rq)
297 ? "write" : "read");
298 pc->flags |= PC_FLAG_DMA_ERROR;
299 } else {
300 pc->xferred = pc->req_xfer;
301 if (drive->pc_update_buffers)
302 drive->pc_update_buffers(drive, pc);
304 debug_log("%s: DMA finished\n", drive->name);
307 /* No more interrupts */
308 if ((stat & ATA_DRQ) == 0) {
309 debug_log("Packet command completed, %d bytes transferred\n",
310 pc->xferred);
312 pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
314 local_irq_enable_in_hardirq();
316 if (drive->media == ide_tape && !scsi &&
317 (stat & ATA_ERR) && rq->cmd[0] == REQUEST_SENSE)
318 stat &= ~ATA_ERR;
320 if ((stat & ATA_ERR) || (pc->flags & PC_FLAG_DMA_ERROR)) {
321 /* Error detected */
322 debug_log("%s: I/O error\n", drive->name);
324 if (drive->media != ide_tape || scsi) {
325 pc->rq->errors++;
326 if (scsi)
327 goto cmd_finished;
330 if (rq->cmd[0] == REQUEST_SENSE) {
331 printk(KERN_ERR "%s: I/O error in request sense"
332 " command\n", drive->name);
333 return ide_do_reset(drive);
336 debug_log("[cmd %x]: check condition\n", rq->cmd[0]);
338 /* Retry operation */
339 ide_retry_pc(drive, rq->rq_disk);
341 /* queued, but not started */
342 return ide_stopped;
344 cmd_finished:
345 pc->error = 0;
347 if ((pc->flags & PC_FLAG_WAIT_FOR_DSC) && (stat & ATA_DSC) == 0)
348 dsc = 1;
350 /* Command finished - Call the callback function */
351 drive->pc_callback(drive, dsc);
353 return ide_stopped;
356 if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
357 pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
358 printk(KERN_ERR "%s: The device wants to issue more interrupts "
359 "in DMA mode\n", drive->name);
360 ide_dma_off(drive);
361 return ide_do_reset(drive);
364 /* Get the number of bytes to transfer on this interrupt. */
365 ide_read_bcount_and_ireason(drive, &bcount, &ireason);
367 if (ireason & ATAPI_COD) {
368 printk(KERN_ERR "%s: CoD != 0 in %s\n", drive->name, __func__);
369 return ide_do_reset(drive);
372 if (((ireason & ATAPI_IO) == ATAPI_IO) ==
373 !!(pc->flags & PC_FLAG_WRITING)) {
374 /* Hopefully, we will never get here */
375 printk(KERN_ERR "%s: We wanted to %s, but the device wants us "
376 "to %s!\n", drive->name,
377 (ireason & ATAPI_IO) ? "Write" : "Read",
378 (ireason & ATAPI_IO) ? "Read" : "Write");
379 return ide_do_reset(drive);
382 if (!(pc->flags & PC_FLAG_WRITING)) {
383 /* Reading - Check that we have enough space */
384 temp = pc->xferred + bcount;
385 if (temp > pc->req_xfer) {
386 if (temp > pc->buf_size) {
387 printk(KERN_ERR "%s: The device wants to send "
388 "us more data than expected - "
389 "discarding data\n",
390 drive->name);
391 if (scsi)
392 temp = pc->buf_size - pc->xferred;
393 else
394 temp = 0;
395 if (temp) {
396 if (pc->sg)
397 drive->pc_io_buffers(drive, pc,
398 temp, 0);
399 else
400 tp_ops->input_data(drive, NULL,
401 pc->cur_pos, temp);
402 printk(KERN_ERR "%s: transferred %d of "
403 "%d bytes\n",
404 drive->name,
405 temp, bcount);
407 pc->xferred += temp;
408 pc->cur_pos += temp;
409 ide_pad_transfer(drive, 0, bcount - temp);
410 goto next_irq;
412 debug_log("The device wants to send us more data than "
413 "expected - allowing transfer\n");
415 xferfunc = tp_ops->input_data;
416 } else
417 xferfunc = tp_ops->output_data;
419 if ((drive->media == ide_floppy && !scsi && !pc->buf) ||
420 (drive->media == ide_tape && !scsi && pc->bh) ||
421 (scsi && pc->sg)) {
422 int done = drive->pc_io_buffers(drive, pc, bcount,
423 !!(pc->flags & PC_FLAG_WRITING));
425 /* FIXME: don't do partial completions */
426 if (drive->media == ide_floppy && !scsi)
427 ide_end_request(drive, 1, done >> 9);
428 } else
429 xferfunc(drive, NULL, pc->cur_pos, bcount);
431 /* Update the current position */
432 pc->xferred += bcount;
433 pc->cur_pos += bcount;
435 debug_log("[cmd %x] transferred %d bytes on that intr.\n",
436 rq->cmd[0], bcount);
437 next_irq:
438 /* And set the interrupt handler again */
439 ide_set_handler(drive, ide_pc_intr, timeout, expiry);
440 return ide_started;
443 static u8 ide_read_ireason(ide_drive_t *drive)
445 ide_task_t task;
447 memset(&task, 0, sizeof(task));
448 task.tf_flags = IDE_TFLAG_IN_NSECT;
450 drive->hwif->tp_ops->tf_read(drive, &task);
452 return task.tf.nsect & 3;
455 static u8 ide_wait_ireason(ide_drive_t *drive, u8 ireason)
457 int retries = 100;
459 while (retries-- && ((ireason & ATAPI_COD) == 0 ||
460 (ireason & ATAPI_IO))) {
461 printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
462 "a packet command, retrying\n", drive->name);
463 udelay(100);
464 ireason = ide_read_ireason(drive);
465 if (retries == 0) {
466 printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
467 "a packet command, ignoring\n",
468 drive->name);
469 ireason |= ATAPI_COD;
470 ireason &= ~ATAPI_IO;
474 return ireason;
477 static int ide_delayed_transfer_pc(ide_drive_t *drive)
479 /* Send the actual packet */
480 drive->hwif->tp_ops->output_data(drive, NULL, drive->pc->c, 12);
482 /* Timeout for the packet command */
483 return WAIT_FLOPPY_CMD;
486 static ide_startstop_t ide_transfer_pc(ide_drive_t *drive)
488 struct ide_atapi_pc *pc = drive->pc;
489 ide_hwif_t *hwif = drive->hwif;
490 struct request *rq = hwif->hwgroup->rq;
491 ide_expiry_t *expiry;
492 unsigned int timeout;
493 ide_startstop_t startstop;
494 u8 ireason;
496 if (ide_wait_stat(&startstop, drive, ATA_DRQ, ATA_BUSY, WAIT_READY)) {
497 printk(KERN_ERR "%s: Strange, packet command initiated yet "
498 "DRQ isn't asserted\n", drive->name);
499 return startstop;
502 ireason = ide_read_ireason(drive);
503 if (drive->media == ide_tape &&
504 (drive->dev_flags & IDE_DFLAG_SCSI) == 0)
505 ireason = ide_wait_ireason(drive, ireason);
507 if ((ireason & ATAPI_COD) == 0 || (ireason & ATAPI_IO)) {
508 printk(KERN_ERR "%s: (IO,CoD) != (0,1) while issuing "
509 "a packet command\n", drive->name);
510 return ide_do_reset(drive);
514 * If necessary schedule the packet transfer to occur 'timeout'
515 * miliseconds later in ide_delayed_transfer_pc() after the device
516 * says it's ready for a packet.
518 if (drive->atapi_flags & IDE_AFLAG_ZIP_DRIVE) {
519 timeout = drive->pc_delay;
520 expiry = &ide_delayed_transfer_pc;
521 } else {
522 if (drive->dev_flags & IDE_DFLAG_SCSI) {
523 timeout = ide_scsi_get_timeout(pc);
524 expiry = ide_scsi_expiry;
525 } else {
526 timeout = (drive->media == ide_floppy) ? WAIT_FLOPPY_CMD
527 : WAIT_TAPE_CMD;
528 expiry = NULL;
532 /* Set the interrupt routine */
533 ide_set_handler(drive, ide_pc_intr, timeout, expiry);
535 /* Begin DMA, if necessary */
536 if (pc->flags & PC_FLAG_DMA_OK) {
537 pc->flags |= PC_FLAG_DMA_IN_PROGRESS;
538 hwif->dma_ops->dma_start(drive);
541 /* Send the actual packet */
542 if ((drive->atapi_flags & IDE_AFLAG_ZIP_DRIVE) == 0)
543 hwif->tp_ops->output_data(drive, NULL, rq->cmd, 12);
545 return ide_started;
548 ide_startstop_t ide_issue_pc(ide_drive_t *drive, unsigned int timeout,
549 ide_expiry_t *expiry)
551 struct ide_atapi_pc *pc = drive->pc;
552 ide_hwif_t *hwif = drive->hwif;
553 u32 tf_flags;
554 u16 bcount = 0;
555 u8 scsi = !!(drive->dev_flags & IDE_DFLAG_SCSI);
557 /* We haven't transferred any data yet */
558 pc->xferred = 0;
559 pc->cur_pos = pc->buf;
561 if (dev_is_idecd(drive)) {
562 tf_flags = IDE_TFLAG_OUT_NSECT | IDE_TFLAG_OUT_LBAL;
563 } else if (scsi) {
564 tf_flags = 0;
565 bcount = min(pc->req_xfer, 63 * 1024);
566 } else {
567 tf_flags = IDE_TFLAG_OUT_DEVICE;
568 bcount = ((drive->media == ide_tape) ?
569 pc->req_xfer :
570 min(pc->req_xfer, 63 * 1024));
573 if (pc->flags & PC_FLAG_DMA_ERROR) {
574 pc->flags &= ~PC_FLAG_DMA_ERROR;
575 ide_dma_off(drive);
578 if (((pc->flags & PC_FLAG_DMA_OK) &&
579 (drive->dev_flags & IDE_DFLAG_USING_DMA)) ||
580 drive->dma) {
581 if (scsi)
582 hwif->sg_mapped = 1;
583 drive->dma = !hwif->dma_ops->dma_setup(drive);
584 if (scsi)
585 hwif->sg_mapped = 0;
588 if (!drive->dma)
589 pc->flags &= ~PC_FLAG_DMA_OK;
591 ide_pktcmd_tf_load(drive, tf_flags, bcount, drive->dma);
593 /* Issue the packet command */
594 if (drive->atapi_flags & IDE_AFLAG_DRQ_INTERRUPT) {
595 ide_execute_command(drive, ATA_CMD_PACKET, ide_transfer_pc,
596 timeout, NULL);
597 return ide_started;
598 } else {
599 ide_execute_pkt_cmd(drive);
600 return ide_transfer_pc(drive);
603 EXPORT_SYMBOL_GPL(ide_issue_pc);