[GitHub/LineageOS/android_kernel_motorola_exynos9610.git] / drivers / ide / ide-atapi.c

/*
 * ATAPI support.
 */

#include <linux/kernel.h>
#include <linux/delay.h>
#include <linux/ide.h>
#include <scsi/scsi.h>

#ifdef DEBUG
#define debug_log(fmt, args...) \
	printk(KERN_INFO "ide: " fmt, ## args)
#else
#define debug_log(fmt, args...) do {} while (0)
#endif

/*
 * Check whether we can support a device,
 * based on the ATAPI IDENTIFY command results.
 */
int ide_check_atapi_device(ide_drive_t *drive, const char *s)
{
	u16 *id = drive->id;
	u8 gcw[2], protocol, device_type, removable, drq_type, packet_size;

	*((u16 *)&gcw) = id[ATA_ID_CONFIG];

	protocol    = (gcw[1] & 0xC0) >> 6;
	device_type =  gcw[1] & 0x1F;
	removable   = (gcw[0] & 0x80) >> 7;
	drq_type    = (gcw[0] & 0x60) >> 5;
	packet_size =  gcw[0] & 0x03;

#ifdef CONFIG_PPC
	/* kludge for Apple PowerBook internal zip */
	if (drive->media == ide_floppy && device_type == 5 &&
	    !strstr((char *)&id[ATA_ID_PROD], "CD-ROM") &&
	    strstr((char *)&id[ATA_ID_PROD], "ZIP"))
		device_type = 0;
#endif

	if (protocol != 2)
		printk(KERN_ERR "%s: %s: protocol (0x%02x) is not ATAPI\n",
			s, drive->name, protocol);
	else if ((drive->media == ide_floppy && device_type != 0) ||
		 (drive->media == ide_tape && device_type != 1))
		printk(KERN_ERR "%s: %s: invalid device type (0x%02x)\n",
			s, drive->name, device_type);
	else if (removable == 0)
		printk(KERN_ERR "%s: %s: the removable flag is not set\n",
			s, drive->name);
	else if (drive->media == ide_floppy && drq_type == 3)
		printk(KERN_ERR "%s: %s: sorry, DRQ type (0x%02x) not "
			"supported\n", s, drive->name, drq_type);
	else if (packet_size != 0)
		printk(KERN_ERR "%s: %s: packet size (0x%02x) is not 12 "
			"bytes\n", s, drive->name, packet_size);
	else
		return 1;
	return 0;
}
EXPORT_SYMBOL_GPL(ide_check_atapi_device);

/* PIO data transfer routine using the scatter gather table. */
int ide_io_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
		    unsigned int bcount, int write)
{
	ide_hwif_t *hwif = drive->hwif;
	const struct ide_tp_ops *tp_ops = hwif->tp_ops;
	xfer_func_t *xf = write ? tp_ops->output_data : tp_ops->input_data;
	struct scatterlist *sg = pc->sg;
	char *buf;
	int count, done = 0;

	while (bcount) {
		count = min(sg->length - pc->b_count, bcount);

		if (PageHighMem(sg_page(sg))) {
			unsigned long flags;

			local_irq_save(flags);
			buf = kmap_atomic(sg_page(sg), KM_IRQ0) + sg->offset;
			xf(drive, NULL, buf + pc->b_count, count);
			kunmap_atomic(buf - sg->offset, KM_IRQ0);
			local_irq_restore(flags);
		} else {
			buf = sg_virt(sg);
			xf(drive, NULL, buf + pc->b_count, count);
		}

		bcount -= count;
		pc->b_count += count;
		done += count;

		if (pc->b_count == sg->length) {
			if (!--pc->sg_cnt)
				break;
			pc->sg = sg = sg_next(sg);
			pc->b_count = 0;
		}
	}

	if (bcount) {
		printk(KERN_ERR "%s: %d leftover bytes, %s\n", drive->name,
			bcount, write ? "padding with zeros"
				      : "discarding data");
		ide_pad_transfer(drive, write, bcount);
	}

	return done;
}
EXPORT_SYMBOL_GPL(ide_io_buffers);

void ide_init_pc(struct ide_atapi_pc *pc)
{
	memset(pc, 0, sizeof(*pc));
	pc->buf = pc->pc_buf;
	pc->buf_size = IDE_PC_BUFFER_SIZE;
}
EXPORT_SYMBOL_GPL(ide_init_pc);

/*
 * Generate a new packet command request in front of the request queue, before
 * the current request, so that it will be processed immediately, on the next
 * pass through the driver.
 */
static void ide_queue_pc_head(ide_drive_t *drive, struct gendisk *disk,
			      struct ide_atapi_pc *pc, struct request *rq)
{
	blk_rq_init(NULL, rq);
	rq->cmd_type = REQ_TYPE_SPECIAL;
	rq->cmd_flags |= REQ_PREEMPT;
	rq->buffer = (char *)pc;
	rq->rq_disk = disk;
	memcpy(rq->cmd, pc->c, 12);
	if (drive->media == ide_tape)
		rq->cmd[13] = REQ_IDETAPE_PC1;
	ide_do_drive_cmd(drive, rq);
}

/*
 * Add a special packet command request to the tail of the request queue,
 * and wait for it to be serviced.
 */
int ide_queue_pc_tail(ide_drive_t *drive, struct gendisk *disk,
		      struct ide_atapi_pc *pc)
{
	struct request *rq;
	int error;

	rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
	rq->cmd_type = REQ_TYPE_SPECIAL;
	rq->buffer = (char *)pc;
	memcpy(rq->cmd, pc->c, 12);
	if (drive->media == ide_tape)
		rq->cmd[13] = REQ_IDETAPE_PC1;
	error = blk_execute_rq(drive->queue, disk, rq, 0);
	blk_put_request(rq);

	return error;
}
EXPORT_SYMBOL_GPL(ide_queue_pc_tail);

int ide_do_test_unit_ready(ide_drive_t *drive, struct gendisk *disk)
{
	struct ide_atapi_pc pc;

	ide_init_pc(&pc);
	pc.c[0] = TEST_UNIT_READY;

	return ide_queue_pc_tail(drive, disk, &pc);
}
EXPORT_SYMBOL_GPL(ide_do_test_unit_ready);

int ide_do_start_stop(ide_drive_t *drive, struct gendisk *disk, int start)
{
	struct ide_atapi_pc pc;

	ide_init_pc(&pc);
	pc.c[0] = START_STOP;
	pc.c[4] = start;

	if (drive->media == ide_tape)
		pc.flags |= PC_FLAG_WAIT_FOR_DSC;

	return ide_queue_pc_tail(drive, disk, &pc);
}
EXPORT_SYMBOL_GPL(ide_do_start_stop);

int ide_set_media_lock(ide_drive_t *drive, struct gendisk *disk, int on)
{
	struct ide_atapi_pc pc;

	if (drive->atapi_flags & IDE_AFLAG_NO_DOORLOCK)
		return 0;

	ide_init_pc(&pc);
	pc.c[0] = ALLOW_MEDIUM_REMOVAL;
	pc.c[4] = on;

	return ide_queue_pc_tail(drive, disk, &pc);
}
EXPORT_SYMBOL_GPL(ide_set_media_lock);

void ide_create_request_sense_cmd(ide_drive_t *drive, struct ide_atapi_pc *pc)
{
	ide_init_pc(pc);
	pc->c[0] = REQUEST_SENSE;
	if (drive->media == ide_floppy) {
		pc->c[4] = 255;
		pc->req_xfer = 18;
	} else {
		pc->c[4] = 20;
		pc->req_xfer = 20;
	}
}
EXPORT_SYMBOL_GPL(ide_create_request_sense_cmd);

/*
 * Called when an error was detected during the last packet command.
 * We queue a request sense packet command in the head of the request list.
 */
void ide_retry_pc(ide_drive_t *drive, struct gendisk *disk)
{
	struct request *rq = &drive->request_sense_rq;
	struct ide_atapi_pc *pc = &drive->request_sense_pc;

	(void)ide_read_error(drive);
	ide_create_request_sense_cmd(drive, pc);
	if (drive->media == ide_tape)
		set_bit(IDE_AFLAG_IGNORE_DSC, &drive->atapi_flags);
	ide_queue_pc_head(drive, disk, pc, rq);
}
EXPORT_SYMBOL_GPL(ide_retry_pc);

int ide_scsi_expiry(ide_drive_t *drive)
{
	struct ide_atapi_pc *pc = drive->pc;

	debug_log("%s called for %lu at %lu\n", __func__,
		  pc->scsi_cmd->serial_number, jiffies);

	pc->flags |= PC_FLAG_TIMEDOUT;

	return 0; /* we do not want the IDE subsystem to retry */
}
EXPORT_SYMBOL_GPL(ide_scsi_expiry);

/*
 * This is the usual interrupt handler which will be called during a packet
 * command.  We will transfer some of the data (as requested by the drive)
 * and will re-point interrupt handler to us.
 */
static ide_startstop_t ide_pc_intr(ide_drive_t *drive)
{
	struct ide_atapi_pc *pc = drive->pc;
	ide_hwif_t *hwif = drive->hwif;
	struct request *rq = hwif->hwgroup->rq;
	const struct ide_tp_ops *tp_ops = hwif->tp_ops;
	xfer_func_t *xferfunc;
	ide_expiry_t *expiry;
	unsigned int timeout, temp;
	u16 bcount;
	u8 stat, ireason, scsi = drive->scsi, dsc = 0;

	debug_log("Enter %s - interrupt handler\n", __func__);

	if (scsi) {
		timeout = ide_scsi_get_timeout(pc);
		expiry = ide_scsi_expiry;
	} else {
		timeout = (drive->media == ide_floppy) ? WAIT_FLOPPY_CMD
						       : WAIT_TAPE_CMD;
		expiry = NULL;
	}

	if (pc->flags & PC_FLAG_TIMEDOUT) {
		drive->pc_callback(drive, 0);
		return ide_stopped;
	}

	/* Clear the interrupt */
	stat = tp_ops->read_status(hwif);

	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
		if (hwif->dma_ops->dma_end(drive) ||
		    (drive->media == ide_tape && !scsi && (stat & ATA_ERR))) {
			if (drive->media == ide_floppy && !scsi)
				printk(KERN_ERR "%s: DMA %s error\n",
					drive->name, rq_data_dir(pc->rq)
						     ? "write" : "read");
			pc->flags |= PC_FLAG_DMA_ERROR;
		} else {
			pc->xferred = pc->req_xfer;
			if (drive->pc_update_buffers)
				drive->pc_update_buffers(drive, pc);
		}
		debug_log("%s: DMA finished\n", drive->name);
	}

	/* No more interrupts */
	if ((stat & ATA_DRQ) == 0) {
		debug_log("Packet command completed, %d bytes transferred\n",
			  pc->xferred);

		pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;

		local_irq_enable_in_hardirq();

		if (drive->media == ide_tape && !scsi &&
		    (stat & ATA_ERR) && rq->cmd[0] == REQUEST_SENSE)
			stat &= ~ATA_ERR;

		if ((stat & ATA_ERR) || (pc->flags & PC_FLAG_DMA_ERROR)) {
			/* Error detected */
			debug_log("%s: I/O error\n", drive->name);

			if (drive->media != ide_tape || scsi) {
				pc->rq->errors++;
				if (scsi)
					goto cmd_finished;
			}

			if (rq->cmd[0] == REQUEST_SENSE) {
				printk(KERN_ERR "%s: I/O error in request sense"
						" command\n", drive->name);
				return ide_do_reset(drive);
			}

			debug_log("[cmd %x]: check condition\n", rq->cmd[0]);

			/* Retry operation */
			ide_retry_pc(drive, rq->rq_disk);

			/* queued, but not started */
			return ide_stopped;
		}
cmd_finished:
		pc->error = 0;

		if ((pc->flags & PC_FLAG_WAIT_FOR_DSC) && (stat & ATA_DSC) == 0)
			dsc = 1;

		/* Command finished - Call the callback function */
		drive->pc_callback(drive, dsc);

		return ide_stopped;
	}

	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
		pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
		printk(KERN_ERR "%s: The device wants to issue more interrupts "
				"in DMA mode\n", drive->name);
		ide_dma_off(drive);
		return ide_do_reset(drive);
	}

	/* Get the number of bytes to transfer on this interrupt. */
	ide_read_bcount_and_ireason(drive, &bcount, &ireason);

	if (ireason & ATAPI_COD) {
		printk(KERN_ERR "%s: CoD != 0 in %s\n", drive->name, __func__);
		return ide_do_reset(drive);
	}

	if (((ireason & ATAPI_IO) == ATAPI_IO) ==
		!!(pc->flags & PC_FLAG_WRITING)) {
		/* Hopefully, we will never get here */
		printk(KERN_ERR "%s: We wanted to %s, but the device wants us "
				"to %s!\n", drive->name,
				(ireason & ATAPI_IO) ? "Write" : "Read",
				(ireason & ATAPI_IO) ? "Read" : "Write");
		return ide_do_reset(drive);
	}

	if (!(pc->flags & PC_FLAG_WRITING)) {
		/* Reading - Check that we have enough space */
		temp = pc->xferred + bcount;
		if (temp > pc->req_xfer) {
			if (temp > pc->buf_size) {
				printk(KERN_ERR "%s: The device wants to send "
						"us more data than expected - "
						"discarding data\n",
						drive->name);
				if (scsi)
					temp = pc->buf_size - pc->xferred;
				else
					temp = 0;
				if (temp) {
					if (pc->sg)
						drive->pc_io_buffers(drive, pc,
								     temp, 0);
					else
						tp_ops->input_data(drive, NULL,
							pc->cur_pos, temp);
					printk(KERN_ERR "%s: transferred %d of "
							"%d bytes\n",
							drive->name,
							temp, bcount);
				}
				pc->xferred += temp;
				pc->cur_pos += temp;
				ide_pad_transfer(drive, 0, bcount - temp);
				goto next_irq;
			}
			debug_log("The device wants to send us more data than "
				  "expected - allowing transfer\n");
		}
		xferfunc = tp_ops->input_data;
	} else
		xferfunc = tp_ops->output_data;

	if ((drive->media == ide_floppy && !scsi && !pc->buf) ||
	    (drive->media == ide_tape && !scsi && pc->bh) ||
	    (scsi && pc->sg)) {
		int done = drive->pc_io_buffers(drive, pc, bcount,
				  !!(pc->flags & PC_FLAG_WRITING));

		/* FIXME: don't do partial completions */
		if (drive->media == ide_floppy && !scsi)
			ide_end_request(drive, 1, done >> 9);
	} else
		xferfunc(drive, NULL, pc->cur_pos, bcount);

	/* Update the current position */
	pc->xferred += bcount;
	pc->cur_pos += bcount;

	debug_log("[cmd %x] transferred %d bytes on that intr.\n",
		  rq->cmd[0], bcount);
next_irq:
	/* And set the interrupt handler again */
	ide_set_handler(drive, ide_pc_intr, timeout, expiry);
	return ide_started;
}

static u8 ide_read_ireason(ide_drive_t *drive)
{
	ide_task_t task;

	memset(&task, 0, sizeof(task));
	task.tf_flags = IDE_TFLAG_IN_NSECT;

	drive->hwif->tp_ops->tf_read(drive, &task);

	return task.tf.nsect & 3;
}

static u8 ide_wait_ireason(ide_drive_t *drive, u8 ireason)
{
	int retries = 100;

	while (retries-- && ((ireason & ATAPI_COD) == 0 ||
		(ireason & ATAPI_IO))) {
		printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
				"a packet command, retrying\n", drive->name);
		udelay(100);
		ireason = ide_read_ireason(drive);
		if (retries == 0) {
			printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
					"a packet command, ignoring\n",
					drive->name);
			ireason |= ATAPI_COD;
			ireason &= ~ATAPI_IO;
		}
	}

	return ireason;
}

ide_startstop_t ide_transfer_pc(ide_drive_t *drive, unsigned int timeout,
				ide_expiry_t *expiry)
{
	struct ide_atapi_pc *pc = drive->pc;
	ide_hwif_t *hwif = drive->hwif;
	struct request *rq = hwif->hwgroup->rq;
	ide_startstop_t startstop;
	u8 ireason;

	if (ide_wait_stat(&startstop, drive, ATA_DRQ, ATA_BUSY, WAIT_READY)) {
		printk(KERN_ERR "%s: Strange, packet command initiated yet "
				"DRQ isn't asserted\n", drive->name);
		return startstop;
	}

	ireason = ide_read_ireason(drive);
	if (drive->media == ide_tape && !drive->scsi)
		ireason = ide_wait_ireason(drive, ireason);

	if ((ireason & ATAPI_COD) == 0 || (ireason & ATAPI_IO)) {
		printk(KERN_ERR "%s: (IO,CoD) != (0,1) while issuing "
				"a packet command\n", drive->name);
		return ide_do_reset(drive);
	}

	/* Set the interrupt routine */
	ide_set_handler(drive, ide_pc_intr, timeout, expiry);

	/* Begin DMA, if necessary */
	if (pc->flags & PC_FLAG_DMA_OK) {
		pc->flags |= PC_FLAG_DMA_IN_PROGRESS;
		hwif->dma_ops->dma_start(drive);
	}

	/* Send the actual packet */
	if ((drive->atapi_flags & IDE_AFLAG_ZIP_DRIVE) == 0)
		hwif->tp_ops->output_data(drive, NULL, rq->cmd, 12);

	return ide_started;
}
EXPORT_SYMBOL_GPL(ide_transfer_pc);

ide_startstop_t ide_issue_pc(ide_drive_t *drive,
			     ide_handler_t *handler, unsigned int timeout,
			     ide_expiry_t *expiry)
{
	struct ide_atapi_pc *pc = drive->pc;
	ide_hwif_t *hwif = drive->hwif;
	u16 bcount;
	u8 dma = 0;

	/* We haven't transferred any data yet */
	pc->xferred = 0;
	pc->cur_pos = pc->buf;

	/* Request to transfer the entire buffer at once */
	if (drive->media == ide_tape && !drive->scsi)
		bcount = pc->req_xfer;
	else
		bcount = min(pc->req_xfer, 63 * 1024);

	if (pc->flags & PC_FLAG_DMA_ERROR) {
		pc->flags &= ~PC_FLAG_DMA_ERROR;
		ide_dma_off(drive);
	}

	if ((pc->flags & PC_FLAG_DMA_OK) && drive->using_dma) {
		if (drive->scsi)
			hwif->sg_mapped = 1;
		dma = !hwif->dma_ops->dma_setup(drive);
		if (drive->scsi)
			hwif->sg_mapped = 0;
	}

	if (!dma)
		pc->flags &= ~PC_FLAG_DMA_OK;

	ide_pktcmd_tf_load(drive, drive->scsi ? 0 : IDE_TFLAG_OUT_DEVICE,
			   bcount, dma);

	/* Issue the packet command */
	if (drive->atapi_flags & IDE_AFLAG_DRQ_INTERRUPT) {
		ide_execute_command(drive, ATA_CMD_PACKET, handler,
				    timeout, NULL);
		return ide_started;
	} else {
		ide_execute_pkt_cmd(drive);
		return (*handler)(drive);
	}
}
EXPORT_SYMBOL_GPL(ide_issue_pc);
Commit	Line	Data
594c16d8 BZ	1	/*
	2	* ATAPI support.
	3	*/
	4
	5	#include <linux/kernel.h>
	6	#include <linux/delay.h>
	7	#include <linux/ide.h>
646c0cb6 BZ	8	#include <scsi/scsi.h>
	9
	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
	16
51509eec BZ	17	/*
	18	* Check whether we can support a device,
	19	* based on the ATAPI IDENTIFY command results.
	20	*/
	21	int ide_check_atapi_device(ide_drive_t drive, const char s)
	22	{
	23	u16 *id = drive->id;
	24	u8 gcw[2], protocol, device_type, removable, drq_type, packet_size;
	25
	26	((u16 )&gcw) = id[ATA_ID_CONFIG];
	27
	28	protocol = (gcw[1] & 0xC0) >> 6;
	29	device_type = gcw[1] & 0x1F;
	30	removable = (gcw[0] & 0x80) >> 7;
	31	drq_type = (gcw[0] & 0x60) >> 5;
	32	packet_size = gcw[0] & 0x03;
	33
	34	#ifdef CONFIG_PPC
	35	/* kludge for Apple PowerBook internal zip */
	36	if (drive->media == ide_floppy && device_type == 5 &&
	37	!strstr((char *)&id[ATA_ID_PROD], "CD-ROM") &&
	38	strstr((char *)&id[ATA_ID_PROD], "ZIP"))
	39	device_type = 0;
	40	#endif
	41
	42	if (protocol != 2)
	43	printk(KERN_ERR "%s: %s: protocol (0x%02x) is not ATAPI\n",
	44	s, drive->name, protocol);
	45	else if ((drive->media == ide_floppy && device_type != 0) \|\|
	46	(drive->media == ide_tape && device_type != 1))
	47	printk(KERN_ERR "%s: %s: invalid device type (0x%02x)\n",
	48	s, drive->name, device_type);
	49	else if (removable == 0)
	50	printk(KERN_ERR "%s: %s: the removable flag is not set\n",
	51	s, drive->name);
	52	else if (drive->media == ide_floppy && drq_type == 3)
	53	printk(KERN_ERR "%s: %s: sorry, DRQ type (0x%02x) not "
	54	"supported\n", s, drive->name, drq_type);
	55	else if (packet_size != 0)
	56	printk(KERN_ERR "%s: %s: packet size (0x%02x) is not 12 "
	57	"bytes\n", s, drive->name, packet_size);
	58	else
	59	return 1;
	60	return 0;
	61	}
	62	EXPORT_SYMBOL_GPL(ide_check_atapi_device);
	63
acaa0f5f BZ	64	/* PIO data transfer routine using the scatter gather table. */
	65	int ide_io_buffers(ide_drive_t drive, struct ide_atapi_pc pc,
	66	unsigned int bcount, int write)
	67	{
	68	ide_hwif_t *hwif = drive->hwif;
	69	const struct ide_tp_ops *tp_ops = hwif->tp_ops;
	70	xfer_func_t *xf = write ? tp_ops->output_data : tp_ops->input_data;
	71	struct scatterlist *sg = pc->sg;
	72	char *buf;
	73	int count, done = 0;
	74
	75	while (bcount) {
	76	count = min(sg->length - pc->b_count, bcount);
	77
	78	if (PageHighMem(sg_page(sg))) {
	79	unsigned long flags;
	80
	81	local_irq_save(flags);
	82	buf = kmap_atomic(sg_page(sg), KM_IRQ0) + sg->offset;
	83	xf(drive, NULL, buf + pc->b_count, count);
	84	kunmap_atomic(buf - sg->offset, KM_IRQ0);
	85	local_irq_restore(flags);
	86	} else {
	87	buf = sg_virt(sg);
	88	xf(drive, NULL, buf + pc->b_count, count);
	89	}
	90
	91	bcount -= count;
	92	pc->b_count += count;
	93	done += count;
	94
	95	if (pc->b_count == sg->length) {
	96	if (!--pc->sg_cnt)
	97	break;
	98	pc->sg = sg = sg_next(sg);
	99	pc->b_count = 0;
	100	}
	101	}
	102
	103	if (bcount) {
	104	printk(KERN_ERR "%s: %d leftover bytes, %s\n", drive->name,
	105	bcount, write ? "padding with zeros"
	106	: "discarding data");
	107	ide_pad_transfer(drive, write, bcount);
	108	}
	109
	110	return done;
	111	}
	112	EXPORT_SYMBOL_GPL(ide_io_buffers);
	113
7bf7420a BZ	114	void ide_init_pc(struct ide_atapi_pc *pc)
	115	{
	116	memset(pc, 0, sizeof(*pc));
	117	pc->buf = pc->pc_buf;
	118	pc->buf_size = IDE_PC_BUFFER_SIZE;
	119	}
	120	EXPORT_SYMBOL_GPL(ide_init_pc);
	121
7645c151 BZ	122	/*
	123	* Generate a new packet command request in front of the request queue, before
	124	* the current request, so that it will be processed immediately, on the next
	125	* pass through the driver.
	126	*/
6b0da28b BZ	127	static void ide_queue_pc_head(ide_drive_t drive, struct gendisk disk,
6b0da28b BZ	128	struct ide_atapi_pc pc, struct request rq)
7645c151 BZ	129	{
	130	blk_rq_init(NULL, rq);
	131	rq->cmd_type = REQ_TYPE_SPECIAL;
	132	rq->cmd_flags \|= REQ_PREEMPT;
	133	rq->buffer = (char *)pc;
	134	rq->rq_disk = disk;
	135	memcpy(rq->cmd, pc->c, 12);
	136	if (drive->media == ide_tape)
	137	rq->cmd[13] = REQ_IDETAPE_PC1;
	138	ide_do_drive_cmd(drive, rq);
	139	}
7645c151	140
2ac07d92 BZ	141	/*
	142	* Add a special packet command request to the tail of the request queue,
	143	* and wait for it to be serviced.
	144	*/
	145	int ide_queue_pc_tail(ide_drive_t drive, struct gendisk disk,
	146	struct ide_atapi_pc *pc)
	147	{
	148	struct request *rq;
	149	int error;
	150
	151	rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
	152	rq->cmd_type = REQ_TYPE_SPECIAL;
	153	rq->buffer = (char *)pc;
	154	memcpy(rq->cmd, pc->c, 12);
	155	if (drive->media == ide_tape)
	156	rq->cmd[13] = REQ_IDETAPE_PC1;
	157	error = blk_execute_rq(drive->queue, disk, rq, 0);
	158	blk_put_request(rq);
	159
	160	return error;
	161	}
	162	EXPORT_SYMBOL_GPL(ide_queue_pc_tail);
	163
de699ad5 BZ	164	int ide_do_test_unit_ready(ide_drive_t drive, struct gendisk disk)
	165	{
	166	struct ide_atapi_pc pc;
	167
	168	ide_init_pc(&pc);
	169	pc.c[0] = TEST_UNIT_READY;
	170
	171	return ide_queue_pc_tail(drive, disk, &pc);
	172	}
	173	EXPORT_SYMBOL_GPL(ide_do_test_unit_ready);
	174
0c8a6c7a BZ	175	int ide_do_start_stop(ide_drive_t drive, struct gendisk disk, int start)
	176	{
	177	struct ide_atapi_pc pc;
	178
	179	ide_init_pc(&pc);
	180	pc.c[0] = START_STOP;
	181	pc.c[4] = start;
	182
	183	if (drive->media == ide_tape)
	184	pc.flags \|= PC_FLAG_WAIT_FOR_DSC;
	185
	186	return ide_queue_pc_tail(drive, disk, &pc);
	187	}
	188	EXPORT_SYMBOL_GPL(ide_do_start_stop);
	189
0578042d BZ	190	int ide_set_media_lock(ide_drive_t drive, struct gendisk disk, int on)
	191	{
	192	struct ide_atapi_pc pc;
	193
	194	if (drive->atapi_flags & IDE_AFLAG_NO_DOORLOCK)
	195	return 0;
	196
	197	ide_init_pc(&pc);
	198	pc.c[0] = ALLOW_MEDIUM_REMOVAL;
	199	pc.c[4] = on;
	200
	201	return ide_queue_pc_tail(drive, disk, &pc);
	202	}
	203	EXPORT_SYMBOL_GPL(ide_set_media_lock);
	204
6b0da28b BZ	205	void ide_create_request_sense_cmd(ide_drive_t drive, struct ide_atapi_pc pc)
	206	{
	207	ide_init_pc(pc);
	208	pc->c[0] = REQUEST_SENSE;
	209	if (drive->media == ide_floppy) {
	210	pc->c[4] = 255;
	211	pc->req_xfer = 18;
	212	} else {
	213	pc->c[4] = 20;
	214	pc->req_xfer = 20;
	215	}
	216	}
	217	EXPORT_SYMBOL_GPL(ide_create_request_sense_cmd);
	218
	219	/*
	220	* Called when an error was detected during the last packet command.
	221	* We queue a request sense packet command in the head of the request list.
	222	*/
	223	void ide_retry_pc(ide_drive_t drive, struct gendisk disk)
	224	{
	225	struct request *rq = &drive->request_sense_rq;
	226	struct ide_atapi_pc *pc = &drive->request_sense_pc;
	227
	228	(void)ide_read_error(drive);
	229	ide_create_request_sense_cmd(drive, pc);
	230	if (drive->media == ide_tape)
	231	set_bit(IDE_AFLAG_IGNORE_DSC, &drive->atapi_flags);
	232	ide_queue_pc_head(drive, disk, pc, rq);
	233	}
	234	EXPORT_SYMBOL_GPL(ide_retry_pc);
	235
844b9468 BZ	236	int ide_scsi_expiry(ide_drive_t *drive)
	237	{
	238	struct ide_atapi_pc *pc = drive->pc;
	239
	240	debug_log("%s called for %lu at %lu\n", __func__,
	241	pc->scsi_cmd->serial_number, jiffies);
	242
	243	pc->flags \|= PC_FLAG_TIMEDOUT;
	244
	245	return 0; /* we do not want the IDE subsystem to retry */
	246	}
	247	EXPORT_SYMBOL_GPL(ide_scsi_expiry);
	248
aa5d2de7 BZ	249	/*
	250	* This is the usual interrupt handler which will be called during a packet
	251	* command. We will transfer some of the data (as requested by the drive)
	252	* and will re-point interrupt handler to us.
	253	*/
	254	static ide_startstop_t ide_pc_intr(ide_drive_t *drive)
646c0cb6	255	{
2b9efba4	256	struct ide_atapi_pc *pc = drive->pc;
646c0cb6	257	ide_hwif_t *hwif = drive->hwif;
8fccf899	258	struct request *rq = hwif->hwgroup->rq;
374e042c	259	const struct ide_tp_ops *tp_ops = hwif->tp_ops;
646c0cb6	260	xfer_func_t *xferfunc;
844b9468 BZ	261	ide_expiry_t *expiry;
844b9468 BZ	262	unsigned int timeout, temp;
646c0cb6	263	u16 bcount;
b14c7212	264	u8 stat, ireason, scsi = drive->scsi, dsc = 0;
646c0cb6 BZ	265
	266	debug_log("Enter %s - interrupt handler\n", __func__);
	267
844b9468 BZ	268	if (scsi) {
	269	timeout = ide_scsi_get_timeout(pc);
	270	expiry = ide_scsi_expiry;
	271	} else {
	272	timeout = (drive->media == ide_floppy) ? WAIT_FLOPPY_CMD
	273	: WAIT_TAPE_CMD;
	274	expiry = NULL;
	275	}
	276
646c0cb6	277	if (pc->flags & PC_FLAG_TIMEDOUT) {
b14c7212	278	drive->pc_callback(drive, 0);
646c0cb6 BZ	279	return ide_stopped;
	280	}
	281
	282	/* Clear the interrupt */
374e042c	283	stat = tp_ops->read_status(hwif);
646c0cb6 BZ	284
	285	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
	286	if (hwif->dma_ops->dma_end(drive) \|\|
3a7d2484	287	(drive->media == ide_tape && !scsi && (stat & ATA_ERR))) {
646c0cb6 BZ	288	if (drive->media == ide_floppy && !scsi)
	289	printk(KERN_ERR "%s: DMA %s error\n",
	290	drive->name, rq_data_dir(pc->rq)
	291	? "write" : "read");
	292	pc->flags \|= PC_FLAG_DMA_ERROR;
	293	} else {
	294	pc->xferred = pc->req_xfer;
85e39035 BZ	295	if (drive->pc_update_buffers)
85e39035 BZ	296	drive->pc_update_buffers(drive, pc);
646c0cb6 BZ	297	}
	298	debug_log("%s: DMA finished\n", drive->name);
	299	}
	300
	301	/* No more interrupts */
3a7d2484	302	if ((stat & ATA_DRQ) == 0) {
646c0cb6 BZ	303	debug_log("Packet command completed, %d bytes transferred\n",
	304	pc->xferred);
	305
	306	pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
	307
	308	local_irq_enable_in_hardirq();
	309
	310	if (drive->media == ide_tape && !scsi &&
3a7d2484 BZ	311	(stat & ATA_ERR) && rq->cmd[0] == REQUEST_SENSE)
3a7d2484 BZ	312	stat &= ~ATA_ERR;
8fccf899	313
3a7d2484	314	if ((stat & ATA_ERR) \|\| (pc->flags & PC_FLAG_DMA_ERROR)) {
646c0cb6 BZ	315	/* Error detected */
	316	debug_log("%s: I/O error\n", drive->name);
	317
	318	if (drive->media != ide_tape \|\| scsi) {
	319	pc->rq->errors++;
	320	if (scsi)
	321	goto cmd_finished;
	322	}
	323
8fccf899	324	if (rq->cmd[0] == REQUEST_SENSE) {
646c0cb6 BZ	325	printk(KERN_ERR "%s: I/O error in request sense"
	326	" command\n", drive->name);
	327	return ide_do_reset(drive);
	328	}
	329
8fccf899	330	debug_log("[cmd %x]: check condition\n", rq->cmd[0]);
646c0cb6 BZ	331
646c0cb6 BZ	332	/* Retry operation */
6b0da28b	333	ide_retry_pc(drive, rq->rq_disk);
8fccf899	334
646c0cb6 BZ	335	/* queued, but not started */
	336	return ide_stopped;
	337	}
	338	cmd_finished:
	339	pc->error = 0;
b14c7212 BZ	340
	341	if ((pc->flags & PC_FLAG_WAIT_FOR_DSC) && (stat & ATA_DSC) == 0)
	342	dsc = 1;
8fccf899	343
646c0cb6	344	/* Command finished - Call the callback function */
b14c7212	345	drive->pc_callback(drive, dsc);
8fccf899	346
646c0cb6 BZ	347	return ide_stopped;
	348	}
	349
	350	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
	351	pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
	352	printk(KERN_ERR "%s: The device wants to issue more interrupts "
	353	"in DMA mode\n", drive->name);
	354	ide_dma_off(drive);
	355	return ide_do_reset(drive);
	356	}
646c0cb6	357
1823649b BZ	358	/* Get the number of bytes to transfer on this interrupt. */
1823649b BZ	359	ide_read_bcount_and_ireason(drive, &bcount, &ireason);
646c0cb6	360
3a7d2484	361	if (ireason & ATAPI_COD) {
646c0cb6 BZ	362	printk(KERN_ERR "%s: CoD != 0 in %s\n", drive->name, __func__);
	363	return ide_do_reset(drive);
	364	}
8fccf899	365
3a7d2484 BZ	366	if (((ireason & ATAPI_IO) == ATAPI_IO) ==
3a7d2484 BZ	367	!!(pc->flags & PC_FLAG_WRITING)) {
646c0cb6 BZ	368	/* Hopefully, we will never get here */
	369	printk(KERN_ERR "%s: We wanted to %s, but the device wants us "
	370	"to %s!\n", drive->name,
3a7d2484 BZ	371	(ireason & ATAPI_IO) ? "Write" : "Read",
3a7d2484 BZ	372	(ireason & ATAPI_IO) ? "Read" : "Write");
646c0cb6 BZ	373	return ide_do_reset(drive);
646c0cb6 BZ	374	}
8fccf899	375
646c0cb6 BZ	376	if (!(pc->flags & PC_FLAG_WRITING)) {
	377	/* Reading - Check that we have enough space */
	378	temp = pc->xferred + bcount;
	379	if (temp > pc->req_xfer) {
	380	if (temp > pc->buf_size) {
	381	printk(KERN_ERR "%s: The device wants to send "
	382	"us more data than expected - "
	383	"discarding data\n",
	384	drive->name);
	385	if (scsi)
	386	temp = pc->buf_size - pc->xferred;
	387	else
	388	temp = 0;
	389	if (temp) {
	390	if (pc->sg)
85e39035 BZ	391	drive->pc_io_buffers(drive, pc,
85e39035 BZ	392	temp, 0);
646c0cb6	393	else
374e042c	394	tp_ops->input_data(drive, NULL,
646c0cb6 BZ	395	pc->cur_pos, temp);
	396	printk(KERN_ERR "%s: transferred %d of "
	397	"%d bytes\n",
	398	drive->name,
	399	temp, bcount);
	400	}
	401	pc->xferred += temp;
	402	pc->cur_pos += temp;
	403	ide_pad_transfer(drive, 0, bcount - temp);
844b9468	404	goto next_irq;
646c0cb6 BZ	405	}
	406	debug_log("The device wants to send us more data than "
	407	"expected - allowing transfer\n");
	408	}
374e042c	409	xferfunc = tp_ops->input_data;
646c0cb6	410	} else
374e042c	411	xferfunc = tp_ops->output_data;
646c0cb6 BZ	412
	413	if ((drive->media == ide_floppy && !scsi && !pc->buf) \|\|
	414	(drive->media == ide_tape && !scsi && pc->bh) \|\|
acaa0f5f	415	(scsi && pc->sg)) {
85e39035	416	int done = drive->pc_io_buffers(drive, pc, bcount,
acaa0f5f BZ	417	!!(pc->flags & PC_FLAG_WRITING));
	418
	419	/* FIXME: don't do partial completions */
	420	if (drive->media == ide_floppy && !scsi)
	421	ide_end_request(drive, 1, done >> 9);
	422	} else
646c0cb6 BZ	423	xferfunc(drive, NULL, pc->cur_pos, bcount);
	424
	425	/* Update the current position */
	426	pc->xferred += bcount;
	427	pc->cur_pos += bcount;
	428
	429	debug_log("[cmd %x] transferred %d bytes on that intr.\n",
8fccf899	430	rq->cmd[0], bcount);
844b9468	431	next_irq:
646c0cb6	432	/* And set the interrupt handler again */
aa5d2de7	433	ide_set_handler(drive, ide_pc_intr, timeout, expiry);
646c0cb6 BZ	434	return ide_started;
646c0cb6 BZ	435	}
594c16d8	436
88a72109 BZ	437	static u8 ide_read_ireason(ide_drive_t *drive)
	438	{
	439	ide_task_t task;
	440
	441	memset(&task, 0, sizeof(task));
	442	task.tf_flags = IDE_TFLAG_IN_NSECT;
	443
374e042c	444	drive->hwif->tp_ops->tf_read(drive, &task);
88a72109 BZ	445
	446	return task.tf.nsect & 3;
	447	}
	448
594c16d8 BZ	449	static u8 ide_wait_ireason(ide_drive_t *drive, u8 ireason)
594c16d8 BZ	450	{
594c16d8 BZ	451	int retries = 100;
594c16d8 BZ	452
3a7d2484 BZ	453	while (retries-- && ((ireason & ATAPI_COD) == 0 \|\|
3a7d2484 BZ	454	(ireason & ATAPI_IO))) {
594c16d8 BZ	455	printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
	456	"a packet command, retrying\n", drive->name);
	457	udelay(100);
88a72109	458	ireason = ide_read_ireason(drive);
594c16d8 BZ	459	if (retries == 0) {
	460	printk(KERN_ERR "%s: (IO,CoD != (0,1) while issuing "
	461	"a packet command, ignoring\n",
	462	drive->name);
3a7d2484 BZ	463	ireason \|= ATAPI_COD;
3a7d2484 BZ	464	ireason &= ~ATAPI_IO;
594c16d8 BZ	465	}
	466	}
	467
	468	return ireason;
	469	}
	470
aa5d2de7	471	ide_startstop_t ide_transfer_pc(ide_drive_t *drive, unsigned int timeout,
594c16d8 BZ	472	ide_expiry_t *expiry)
594c16d8 BZ	473	{
2b9efba4	474	struct ide_atapi_pc *pc = drive->pc;
594c16d8	475	ide_hwif_t *hwif = drive->hwif;
8fccf899	476	struct request *rq = hwif->hwgroup->rq;
594c16d8 BZ	477	ide_startstop_t startstop;
	478	u8 ireason;
	479
3a7d2484	480	if (ide_wait_stat(&startstop, drive, ATA_DRQ, ATA_BUSY, WAIT_READY)) {
594c16d8 BZ	481	printk(KERN_ERR "%s: Strange, packet command initiated yet "
	482	"DRQ isn't asserted\n", drive->name);
	483	return startstop;
	484	}
	485
88a72109	486	ireason = ide_read_ireason(drive);
594c16d8 BZ	487	if (drive->media == ide_tape && !drive->scsi)
	488	ireason = ide_wait_ireason(drive, ireason);
	489
3a7d2484	490	if ((ireason & ATAPI_COD) == 0 \|\| (ireason & ATAPI_IO)) {
594c16d8 BZ	491	printk(KERN_ERR "%s: (IO,CoD) != (0,1) while issuing "
	492	"a packet command\n", drive->name);
	493	return ide_do_reset(drive);
	494	}
	495
	496	/* Set the interrupt routine */
aa5d2de7	497	ide_set_handler(drive, ide_pc_intr, timeout, expiry);
594c16d8 BZ	498
	499	/* Begin DMA, if necessary */
	500	if (pc->flags & PC_FLAG_DMA_OK) {
	501	pc->flags \|= PC_FLAG_DMA_IN_PROGRESS;
	502	hwif->dma_ops->dma_start(drive);
	503	}
	504
	505	/* Send the actual packet */
ea68d270	506	if ((drive->atapi_flags & IDE_AFLAG_ZIP_DRIVE) == 0)
8fccf899	507	hwif->tp_ops->output_data(drive, NULL, rq->cmd, 12);
594c16d8 BZ	508
	509	return ide_started;
	510	}
	511	EXPORT_SYMBOL_GPL(ide_transfer_pc);
6bf1641c	512
2b9efba4	513	ide_startstop_t ide_issue_pc(ide_drive_t *drive,
6bf1641c BZ	514	ide_handler_t *handler, unsigned int timeout,
	515	ide_expiry_t *expiry)
	516	{
2b9efba4	517	struct ide_atapi_pc *pc = drive->pc;
6bf1641c BZ	518	ide_hwif_t *hwif = drive->hwif;
	519	u16 bcount;
	520	u8 dma = 0;
	521
	522	/* We haven't transferred any data yet */
	523	pc->xferred = 0;
	524	pc->cur_pos = pc->buf;
	525
	526	/* Request to transfer the entire buffer at once */
	527	if (drive->media == ide_tape && !drive->scsi)
	528	bcount = pc->req_xfer;
	529	else
	530	bcount = min(pc->req_xfer, 63 * 1024);
	531
	532	if (pc->flags & PC_FLAG_DMA_ERROR) {
	533	pc->flags &= ~PC_FLAG_DMA_ERROR;
	534	ide_dma_off(drive);
	535	}
	536
	537	if ((pc->flags & PC_FLAG_DMA_OK) && drive->using_dma) {
	538	if (drive->scsi)
	539	hwif->sg_mapped = 1;
	540	dma = !hwif->dma_ops->dma_setup(drive);
	541	if (drive->scsi)
	542	hwif->sg_mapped = 0;
	543	}
	544
	545	if (!dma)
	546	pc->flags &= ~PC_FLAG_DMA_OK;
	547
	548	ide_pktcmd_tf_load(drive, drive->scsi ? 0 : IDE_TFLAG_OUT_DEVICE,
	549	bcount, dma);
	550
	551	/* Issue the packet command */
ac77ef8b	552	if (drive->atapi_flags & IDE_AFLAG_DRQ_INTERRUPT) {
aaaade3f	553	ide_execute_command(drive, ATA_CMD_PACKET, handler,
6bf1641c BZ	554	timeout, NULL);
	555	return ide_started;
	556	} else {
	557	ide_execute_pkt_cmd(drive);
	558	return (*handler)(drive);
	559	}
	560	}
	561	EXPORT_SYMBOL_GPL(ide_issue_pc);