[deliverable/linux.git] / block / scsi_ioctl.c

/*
 * Copyright (C) 2001 Jens Axboe <axboe@suse.de>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 *
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public Licens
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-
 *
 */
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/string.h>
#include <linux/module.h>
#include <linux/blkdev.h>
#include <linux/completion.h>
#include <linux/cdrom.h>
#include <linux/slab.h>
#include <linux/times.h>
#include <asm/uaccess.h>

#include <scsi/scsi.h>
#include <scsi/scsi_ioctl.h>
#include <scsi/scsi_cmnd.h>

/* Command group 3 is reserved and should never be used.  */
const unsigned char scsi_command_size[8] =
{
	6, 10, 10, 12,
	16, 12, 10, 10
};

EXPORT_SYMBOL(scsi_command_size);

#define BLK_DEFAULT_TIMEOUT	(60 * HZ)

#include <scsi/sg.h>

static int sg_get_version(int __user *p)
{
	static const int sg_version_num = 30527;
	return put_user(sg_version_num, p);
}

static int scsi_get_idlun(request_queue_t *q, int __user *p)
{
	return put_user(0, p);
}

static int scsi_get_bus(request_queue_t *q, int __user *p)
{
	return put_user(0, p);
}

static int sg_get_timeout(request_queue_t *q)
{
	return q->sg_timeout / (HZ / USER_HZ);
}

static int sg_set_timeout(request_queue_t *q, int __user *p)
{
	int timeout, err = get_user(timeout, p);

	if (!err)
		q->sg_timeout = timeout * (HZ / USER_HZ);

	return err;
}

static int sg_get_reserved_size(request_queue_t *q, int __user *p)
{
	return put_user(q->sg_reserved_size, p);
}

static int sg_set_reserved_size(request_queue_t *q, int __user *p)
{
	int size, err = get_user(size, p);

	if (err)
		return err;

	if (size < 0)
		return -EINVAL;
	if (size > (q->max_sectors << 9))
		size = q->max_sectors << 9;

	q->sg_reserved_size = size;
	return 0;
}

/*
 * will always return that we are ATAPI even for a real SCSI drive, I'm not
 * so sure this is worth doing anything about (why would you care??)
 */
static int sg_emulated_host(request_queue_t *q, int __user *p)
{
	return put_user(1, p);
}

#define CMD_READ_SAFE	0x01
#define CMD_WRITE_SAFE	0x02
#define CMD_WARNED	0x04
#define safe_for_read(cmd)	[cmd] = CMD_READ_SAFE
#define safe_for_write(cmd)	[cmd] = CMD_WRITE_SAFE

static int verify_command(struct file *file, unsigned char *cmd)
{
	static unsigned char cmd_type[256] = {

		/* Basic read-only commands */
		safe_for_read(TEST_UNIT_READY),
		safe_for_read(REQUEST_SENSE),
		safe_for_read(READ_6),
		safe_for_read(READ_10),
		safe_for_read(READ_12),
		safe_for_read(READ_16),
		safe_for_read(READ_BUFFER),
		safe_for_read(READ_DEFECT_DATA),
		safe_for_read(READ_LONG),
		safe_for_read(INQUIRY),
		safe_for_read(MODE_SENSE),
		safe_for_read(MODE_SENSE_10),
		safe_for_read(LOG_SENSE),
		safe_for_read(START_STOP),
		safe_for_read(GPCMD_VERIFY_10),
		safe_for_read(VERIFY_16),

		/* Audio CD commands */
		safe_for_read(GPCMD_PLAY_CD),
		safe_for_read(GPCMD_PLAY_AUDIO_10),
		safe_for_read(GPCMD_PLAY_AUDIO_MSF),
		safe_for_read(GPCMD_PLAY_AUDIO_TI),
		safe_for_read(GPCMD_PAUSE_RESUME),

		/* CD/DVD data reading */
		safe_for_read(GPCMD_READ_BUFFER_CAPACITY),
		safe_for_read(GPCMD_READ_CD),
		safe_for_read(GPCMD_READ_CD_MSF),
		safe_for_read(GPCMD_READ_DISC_INFO),
		safe_for_read(GPCMD_READ_CDVD_CAPACITY),
		safe_for_read(GPCMD_READ_DVD_STRUCTURE),
		safe_for_read(GPCMD_READ_HEADER),
		safe_for_read(GPCMD_READ_TRACK_RZONE_INFO),
		safe_for_read(GPCMD_READ_SUBCHANNEL),
		safe_for_read(GPCMD_READ_TOC_PMA_ATIP),
		safe_for_read(GPCMD_REPORT_KEY),
		safe_for_read(GPCMD_SCAN),
		safe_for_read(GPCMD_GET_CONFIGURATION),
		safe_for_read(GPCMD_READ_FORMAT_CAPACITIES),
		safe_for_read(GPCMD_GET_EVENT_STATUS_NOTIFICATION),
		safe_for_read(GPCMD_GET_PERFORMANCE),
		safe_for_read(GPCMD_SEEK),
		safe_for_read(GPCMD_STOP_PLAY_SCAN),

		/* Basic writing commands */
		safe_for_write(WRITE_6),
		safe_for_write(WRITE_10),
		safe_for_write(WRITE_VERIFY),
		safe_for_write(WRITE_12),
		safe_for_write(WRITE_VERIFY_12),
		safe_for_write(WRITE_16),
		safe_for_write(WRITE_LONG),
		safe_for_write(WRITE_LONG_2),
		safe_for_write(ERASE),
		safe_for_write(GPCMD_MODE_SELECT_10),
		safe_for_write(MODE_SELECT),
		safe_for_write(LOG_SELECT),
		safe_for_write(GPCMD_BLANK),
		safe_for_write(GPCMD_CLOSE_TRACK),
		safe_for_write(GPCMD_FLUSH_CACHE),
		safe_for_write(GPCMD_FORMAT_UNIT),
		safe_for_write(GPCMD_REPAIR_RZONE_TRACK),
		safe_for_write(GPCMD_RESERVE_RZONE_TRACK),
		safe_for_write(GPCMD_SEND_DVD_STRUCTURE),
		safe_for_write(GPCMD_SEND_EVENT),
		safe_for_write(GPCMD_SEND_KEY),
		safe_for_write(GPCMD_SEND_OPC),
		safe_for_write(GPCMD_SEND_CUE_SHEET),
		safe_for_write(GPCMD_SET_SPEED),
		safe_for_write(GPCMD_PREVENT_ALLOW_MEDIUM_REMOVAL),
		safe_for_write(GPCMD_LOAD_UNLOAD),
		safe_for_write(GPCMD_SET_STREAMING),
	};
	unsigned char type = cmd_type[cmd[0]];
	int has_write_perm = 0;

	/* Anybody who can open the device can do a read-safe command */
	if (type & CMD_READ_SAFE)
		return 0;

	/*
	 * file can be NULL from ioctl_by_bdev()...
	 */
	if (file)
		has_write_perm = file->f_mode & FMODE_WRITE;

	/* Write-safe commands just require a writable open.. */
	if ((type & CMD_WRITE_SAFE) && has_write_perm)
		return 0;

	/* And root can do any command.. */
	if (capable(CAP_SYS_RAWIO))
		return 0;

	if (!type) {
		cmd_type[cmd[0]] = CMD_WARNED;
		printk(KERN_WARNING "scsi: unknown opcode 0x%02x\n", cmd[0]);
	}

	/* Otherwise fail it with an "Operation not permitted" */
	return -EPERM;
}

static int sg_io(struct file *file, request_queue_t *q,
		struct gendisk *bd_disk, struct sg_io_hdr *hdr)
{
	unsigned long start_time;
	int writing = 0, ret = 0;
	struct request *rq;
	struct bio *bio;
	char sense[SCSI_SENSE_BUFFERSIZE];
	unsigned char cmd[BLK_MAX_CDB];

	if (hdr->interface_id != 'S')
		return -EINVAL;
	if (hdr->cmd_len > BLK_MAX_CDB)
		return -EINVAL;
	if (copy_from_user(cmd, hdr->cmdp, hdr->cmd_len))
		return -EFAULT;
	if (verify_command(file, cmd))
		return -EPERM;

	if (hdr->dxfer_len > (q->max_hw_sectors << 9))
		return -EIO;

	if (hdr->dxfer_len)
		switch (hdr->dxfer_direction) {
		default:
			return -EINVAL;
		case SG_DXFER_TO_FROM_DEV:
		case SG_DXFER_TO_DEV:
			writing = 1;
			break;
		case SG_DXFER_FROM_DEV:
			break;
		}

	rq = blk_get_request(q, writing ? WRITE : READ, GFP_KERNEL);
	if (!rq)
		return -ENOMEM;

	if (hdr->iovec_count) {
		const int size = sizeof(struct sg_iovec) * hdr->iovec_count;
		struct sg_iovec *iov;

		iov = kmalloc(size, GFP_KERNEL);
		if (!iov) {
			ret = -ENOMEM;
			goto out;
		}

		if (copy_from_user(iov, hdr->dxferp, size)) {
			kfree(iov);
			ret = -EFAULT;
			goto out;
		}

		ret = blk_rq_map_user_iov(q, rq, iov, hdr->iovec_count);
		kfree(iov);
	} else if (hdr->dxfer_len)
		ret = blk_rq_map_user(q, rq, hdr->dxferp, hdr->dxfer_len);

	if (ret)
		goto out;

	/*
	 * fill in request structure
	 */
	rq->cmd_len = hdr->cmd_len;
	memcpy(rq->cmd, cmd, hdr->cmd_len);
	if (sizeof(rq->cmd) != hdr->cmd_len)
		memset(rq->cmd + hdr->cmd_len, 0, sizeof(rq->cmd) - hdr->cmd_len);

	memset(sense, 0, sizeof(sense));
	rq->sense = sense;
	rq->sense_len = 0;

	rq->flags |= REQ_BLOCK_PC;
	bio = rq->bio;

	/*
	 * bounce this after holding a reference to the original bio, it's
	 * needed for proper unmapping
	 */
	if (rq->bio)
		blk_queue_bounce(q, &rq->bio);

	rq->timeout = (hdr->timeout * HZ) / 1000;
	if (!rq->timeout)
		rq->timeout = q->sg_timeout;
	if (!rq->timeout)
		rq->timeout = BLK_DEFAULT_TIMEOUT;

	start_time = jiffies;

	/* ignore return value. All information is passed back to caller
	 * (if he doesn't check that is his problem).
	 * N.B. a non-zero SCSI status is _not_ necessarily an error.
	 */
	blk_execute_rq(q, bd_disk, rq, 0);

	/* write to all output members */
	hdr->status = 0xff & rq->errors;
	hdr->masked_status = status_byte(rq->errors);
	hdr->msg_status = msg_byte(rq->errors);
	hdr->host_status = host_byte(rq->errors);
	hdr->driver_status = driver_byte(rq->errors);
	hdr->info = 0;
	if (hdr->masked_status || hdr->host_status || hdr->driver_status)
		hdr->info |= SG_INFO_CHECK;
	hdr->resid = rq->data_len;
	hdr->duration = ((jiffies - start_time) * 1000) / HZ;
	hdr->sb_len_wr = 0;

	if (rq->sense_len && hdr->sbp) {
		int len = min((unsigned int) hdr->mx_sb_len, rq->sense_len);

		if (!copy_to_user(hdr->sbp, rq->sense, len))
			hdr->sb_len_wr = len;
	}

	if (blk_rq_unmap_user(bio, hdr->dxfer_len))
		ret = -EFAULT;

	/* may not have succeeded, but output values written to control
	 * structure (struct sg_io_hdr).  */
out:
	blk_put_request(rq);
	return ret;
}

#define OMAX_SB_LEN 16          /* For backward compatibility */

static int sg_scsi_ioctl(struct file *file, request_queue_t *q,
			 struct gendisk *bd_disk, Scsi_Ioctl_Command __user *sic)
{
	struct request *rq;
	int err;
	unsigned int in_len, out_len, bytes, opcode, cmdlen;
	char *buffer = NULL, sense[SCSI_SENSE_BUFFERSIZE];

	/*
	 * get in an out lengths, verify they don't exceed a page worth of data
	 */
	if (get_user(in_len, &sic->inlen))
		return -EFAULT;
	if (get_user(out_len, &sic->outlen))
		return -EFAULT;
	if (in_len > PAGE_SIZE || out_len > PAGE_SIZE)
		return -EINVAL;
	if (get_user(opcode, sic->data))
		return -EFAULT;

	bytes = max(in_len, out_len);
	if (bytes) {
		buffer = kmalloc(bytes, q->bounce_gfp | GFP_USER| __GFP_NOWARN);
		if (!buffer)
			return -ENOMEM;

		memset(buffer, 0, bytes);
	}

	rq = blk_get_request(q, in_len ? WRITE : READ, __GFP_WAIT);

	cmdlen = COMMAND_SIZE(opcode);

	/*
	 * get command and data to send to device, if any
	 */
	err = -EFAULT;
	rq->cmd_len = cmdlen;
	if (copy_from_user(rq->cmd, sic->data, cmdlen))
		goto error;

	if (copy_from_user(buffer, sic->data + cmdlen, in_len))
		goto error;

	err = verify_command(file, rq->cmd);
	if (err)
		goto error;

	switch (opcode) {
		case SEND_DIAGNOSTIC:
		case FORMAT_UNIT:
			rq->timeout = FORMAT_UNIT_TIMEOUT;
			break;
		case START_STOP:
			rq->timeout = START_STOP_TIMEOUT;
			break;
		case MOVE_MEDIUM:
			rq->timeout = MOVE_MEDIUM_TIMEOUT;
			break;
		case READ_ELEMENT_STATUS:
			rq->timeout = READ_ELEMENT_STATUS_TIMEOUT;
			break;
		case READ_DEFECT_DATA:
			rq->timeout = READ_DEFECT_DATA_TIMEOUT;
			break;
		default:
			rq->timeout = BLK_DEFAULT_TIMEOUT;
			break;
	}

	memset(sense, 0, sizeof(sense));
	rq->sense = sense;
	rq->sense_len = 0;

	rq->data = buffer;
	rq->data_len = bytes;
	rq->flags |= REQ_BLOCK_PC;

	blk_execute_rq(q, bd_disk, rq, 0);
	err = rq->errors & 0xff;	/* only 8 bit SCSI status */
	if (err) {
		if (rq->sense_len && rq->sense) {
			bytes = (OMAX_SB_LEN > rq->sense_len) ?
				rq->sense_len : OMAX_SB_LEN;
			if (copy_to_user(sic->data, rq->sense, bytes))
				err = -EFAULT;
		}
	} else {
		if (copy_to_user(sic->data, buffer, out_len))
			err = -EFAULT;
	}
	
error:
	kfree(buffer);
	blk_put_request(rq);
	return err;
}


/* Send basic block requests */
static int __blk_send_generic(request_queue_t *q, struct gendisk *bd_disk, int cmd, int data)
{
	struct request *rq;
	int err;

	rq = blk_get_request(q, WRITE, __GFP_WAIT);
	rq->flags |= REQ_BLOCK_PC;
	rq->data = NULL;
	rq->data_len = 0;
	rq->timeout = BLK_DEFAULT_TIMEOUT;
	memset(rq->cmd, 0, sizeof(rq->cmd));
	rq->cmd[0] = cmd;
	rq->cmd[4] = data;
	rq->cmd_len = 6;
	err = blk_execute_rq(q, bd_disk, rq, 0);
	blk_put_request(rq);

	return err;
}

static inline int blk_send_start_stop(request_queue_t *q, struct gendisk *bd_disk, int data)
{
	return __blk_send_generic(q, bd_disk, GPCMD_START_STOP_UNIT, data);
}

int scsi_cmd_ioctl(struct file *file, struct gendisk *bd_disk, unsigned int cmd, void __user *arg)
{
	request_queue_t *q;
	int err;

	q = bd_disk->queue;
	if (!q)
		return -ENXIO;

	if (blk_get_queue(q))
		return -ENXIO;

	switch (cmd) {
		/*
		 * new sgv3 interface
		 */
		case SG_GET_VERSION_NUM:
			err = sg_get_version(arg);
			break;
		case SCSI_IOCTL_GET_IDLUN:
			err = scsi_get_idlun(q, arg);
			break;
		case SCSI_IOCTL_GET_BUS_NUMBER:
			err = scsi_get_bus(q, arg);
			break;
		case SG_SET_TIMEOUT:
			err = sg_set_timeout(q, arg);
			break;
		case SG_GET_TIMEOUT:
			err = sg_get_timeout(q);
			break;
		case SG_GET_RESERVED_SIZE:
			err = sg_get_reserved_size(q, arg);
			break;
		case SG_SET_RESERVED_SIZE:
			err = sg_set_reserved_size(q, arg);
			break;
		case SG_EMULATED_HOST:
			err = sg_emulated_host(q, arg);
			break;
		case SG_IO: {
			struct sg_io_hdr hdr;

			err = -EFAULT;
			if (copy_from_user(&hdr, arg, sizeof(hdr)))
				break;
			err = sg_io(file, q, bd_disk, &hdr);
			if (err == -EFAULT)
				break;

			if (copy_to_user(arg, &hdr, sizeof(hdr)))
				err = -EFAULT;
			break;
		}
		case CDROM_SEND_PACKET: {
			struct cdrom_generic_command cgc;
			struct sg_io_hdr hdr;

			err = -EFAULT;
			if (copy_from_user(&cgc, arg, sizeof(cgc)))
				break;
			cgc.timeout = clock_t_to_jiffies(cgc.timeout);
			memset(&hdr, 0, sizeof(hdr));
			hdr.interface_id = 'S';
			hdr.cmd_len = sizeof(cgc.cmd);
			hdr.dxfer_len = cgc.buflen;
			err = 0;
			switch (cgc.data_direction) {
				case CGC_DATA_UNKNOWN:
					hdr.dxfer_direction = SG_DXFER_UNKNOWN;
					break;
				case CGC_DATA_WRITE:
					hdr.dxfer_direction = SG_DXFER_TO_DEV;
					break;
				case CGC_DATA_READ:
					hdr.dxfer_direction = SG_DXFER_FROM_DEV;
					break;
				case CGC_DATA_NONE:
					hdr.dxfer_direction = SG_DXFER_NONE;
					break;
				default:
					err = -EINVAL;
			}
			if (err)
				break;

			hdr.dxferp = cgc.buffer;
			hdr.sbp = cgc.sense;
			if (hdr.sbp)
				hdr.mx_sb_len = sizeof(struct request_sense);
			hdr.timeout = cgc.timeout;
			hdr.cmdp = ((struct cdrom_generic_command __user*) arg)->cmd;
			hdr.cmd_len = sizeof(cgc.cmd);

			err = sg_io(file, q, bd_disk, &hdr);
			if (err == -EFAULT)
				break;

			if (hdr.status)
				err = -EIO;

			cgc.stat = err;
			cgc.buflen = hdr.resid;
			if (copy_to_user(arg, &cgc, sizeof(cgc)))
				err = -EFAULT;

			break;
		}

		/*
		 * old junk scsi send command ioctl
		 */
		case SCSI_IOCTL_SEND_COMMAND:
			printk(KERN_WARNING "program %s is using a deprecated SCSI ioctl, please convert it to SG_IO\n", current->comm);
			err = -EINVAL;
			if (!arg)
				break;

			err = sg_scsi_ioctl(file, q, bd_disk, arg);
			break;
		case CDROMCLOSETRAY:
			err = blk_send_start_stop(q, bd_disk, 0x03);
			break;
		case CDROMEJECT:
			err = blk_send_start_stop(q, bd_disk, 0x02);
			break;
		default:
			err = -ENOTTY;
	}

	blk_put_queue(q);
	return err;
}

EXPORT_SYMBOL(scsi_cmd_ioctl);
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Copyright (C) 2001 Jens Axboe <axboe@suse.de>
	3	*
	4	* This program is free software; you can redistribute it and/or modify
	5	* it under the terms of the GNU General Public License version 2 as
	6	* published by the Free Software Foundation.
	7	*
	8	* This program is distributed in the hope that it will be useful,
	9	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	10	*
	11	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	12	* GNU General Public License for more details.
	13	*
	14	* You should have received a copy of the GNU General Public Licens
	15	* along with this program; if not, write to the Free Software
	16	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-
	17	*
	18	*/
	19	#include <linux/kernel.h>
	20	#include <linux/errno.h>
	21	#include <linux/string.h>
	22	#include <linux/module.h>
	23	#include <linux/blkdev.h>
	24	#include <linux/completion.h>
	25	#include <linux/cdrom.h>
	26	#include <linux/slab.h>
	27	#include <linux/times.h>
	28	#include <asm/uaccess.h>
	29
	30	#include <scsi/scsi.h>
	31	#include <scsi/scsi_ioctl.h>
	32	#include <scsi/scsi_cmnd.h>
	33
	34	/* Command group 3 is reserved and should never be used. */
	35	const unsigned char scsi_command_size[8] =
	36	{
	37	6, 10, 10, 12,
	38	16, 12, 10, 10
	39	};
	40
	41	EXPORT_SYMBOL(scsi_command_size);
	42
	43	#define BLK_DEFAULT_TIMEOUT (60 * HZ)
	44
	45	#include <scsi/sg.h>
	46
	47	static int sg_get_version(int __user *p)
	48	{
64100099	49	static const int sg_version_num = 30527;
1da177e4 LT	50	return put_user(sg_version_num, p);
	51	}
	52
	53	static int scsi_get_idlun(request_queue_t q, int __user p)
	54	{
	55	return put_user(0, p);
	56	}
	57
	58	static int scsi_get_bus(request_queue_t q, int __user p)
	59	{
	60	return put_user(0, p);
	61	}
	62
	63	static int sg_get_timeout(request_queue_t *q)
	64	{
	65	return q->sg_timeout / (HZ / USER_HZ);
	66	}
	67
	68	static int sg_set_timeout(request_queue_t q, int __user p)
	69	{
	70	int timeout, err = get_user(timeout, p);
	71
	72	if (!err)
	73	q->sg_timeout = timeout * (HZ / USER_HZ);
	74
	75	return err;
	76	}
	77
	78	static int sg_get_reserved_size(request_queue_t q, int __user p)
	79	{
	80	return put_user(q->sg_reserved_size, p);
	81	}
	82
	83	static int sg_set_reserved_size(request_queue_t q, int __user p)
	84	{
	85	int size, err = get_user(size, p);
	86
	87	if (err)
	88	return err;
	89
	90	if (size < 0)
	91	return -EINVAL;
	92	if (size > (q->max_sectors << 9))
	93	size = q->max_sectors << 9;
	94
	95	q->sg_reserved_size = size;
	96	return 0;
	97	}
	98
	99	/*
	100	* will always return that we are ATAPI even for a real SCSI drive, I'm not
	101	* so sure this is worth doing anything about (why would you care??)
	102	*/
	103	static int sg_emulated_host(request_queue_t q, int __user p)
	104	{
	105	return put_user(1, p);
	106	}
	107
	108	#define CMD_READ_SAFE 0x01
	109	#define CMD_WRITE_SAFE 0x02
	110	#define CMD_WARNED 0x04
	111	#define safe_for_read(cmd) [cmd] = CMD_READ_SAFE
	112	#define safe_for_write(cmd) [cmd] = CMD_WRITE_SAFE
	113
114	static int verify_command(struct file file, unsigned char cmd)
115	{
116	static unsigned char cmd_type[256] = {
117
118	/* Basic read-only commands */
119	safe_for_read(TEST_UNIT_READY),
120	safe_for_read(REQUEST_SENSE),
121	safe_for_read(READ_6),
122	safe_for_read(READ_10),
123	safe_for_read(READ_12),
124	safe_for_read(READ_16),
125	safe_for_read(READ_BUFFER),
942fc2fb	126	safe_for_read(READ_DEFECT_DATA),
1da177e4 LT	127	safe_for_read(READ_LONG),
	128	safe_for_read(INQUIRY),
	129	safe_for_read(MODE_SENSE),
	130	safe_for_read(MODE_SENSE_10),
	131	safe_for_read(LOG_SENSE),
	132	safe_for_read(START_STOP),
	133	safe_for_read(GPCMD_VERIFY_10),
	134	safe_for_read(VERIFY_16),
	135
	136	/* Audio CD commands */
	137	safe_for_read(GPCMD_PLAY_CD),
	138	safe_for_read(GPCMD_PLAY_AUDIO_10),
	139	safe_for_read(GPCMD_PLAY_AUDIO_MSF),
	140	safe_for_read(GPCMD_PLAY_AUDIO_TI),
	141	safe_for_read(GPCMD_PAUSE_RESUME),
	142
	143	/* CD/DVD data reading */
	144	safe_for_read(GPCMD_READ_BUFFER_CAPACITY),
	145	safe_for_read(GPCMD_READ_CD),
	146	safe_for_read(GPCMD_READ_CD_MSF),
	147	safe_for_read(GPCMD_READ_DISC_INFO),
	148	safe_for_read(GPCMD_READ_CDVD_CAPACITY),
	149	safe_for_read(GPCMD_READ_DVD_STRUCTURE),
	150	safe_for_read(GPCMD_READ_HEADER),
	151	safe_for_read(GPCMD_READ_TRACK_RZONE_INFO),
	152	safe_for_read(GPCMD_READ_SUBCHANNEL),
	153	safe_for_read(GPCMD_READ_TOC_PMA_ATIP),
	154	safe_for_read(GPCMD_REPORT_KEY),
	155	safe_for_read(GPCMD_SCAN),
	156	safe_for_read(GPCMD_GET_CONFIGURATION),
	157	safe_for_read(GPCMD_READ_FORMAT_CAPACITIES),
	158	safe_for_read(GPCMD_GET_EVENT_STATUS_NOTIFICATION),
	159	safe_for_read(GPCMD_GET_PERFORMANCE),
	160	safe_for_read(GPCMD_SEEK),
	161	safe_for_read(GPCMD_STOP_PLAY_SCAN),
	162
	163	/* Basic writing commands */
	164	safe_for_write(WRITE_6),
	165	safe_for_write(WRITE_10),
	166	safe_for_write(WRITE_VERIFY),
	167	safe_for_write(WRITE_12),
	168	safe_for_write(WRITE_VERIFY_12),
	169	safe_for_write(WRITE_16),
	170	safe_for_write(WRITE_LONG),
0faf3d3d	171	safe_for_write(WRITE_LONG_2),
1da177e4 LT	172	safe_for_write(ERASE),
	173	safe_for_write(GPCMD_MODE_SELECT_10),
	174	safe_for_write(MODE_SELECT),
	175	safe_for_write(LOG_SELECT),
	176	safe_for_write(GPCMD_BLANK),
	177	safe_for_write(GPCMD_CLOSE_TRACK),
	178	safe_for_write(GPCMD_FLUSH_CACHE),
	179	safe_for_write(GPCMD_FORMAT_UNIT),
	180	safe_for_write(GPCMD_REPAIR_RZONE_TRACK),
	181	safe_for_write(GPCMD_RESERVE_RZONE_TRACK),
	182	safe_for_write(GPCMD_SEND_DVD_STRUCTURE),
	183	safe_for_write(GPCMD_SEND_EVENT),
	184	safe_for_write(GPCMD_SEND_KEY),
	185	safe_for_write(GPCMD_SEND_OPC),
	186	safe_for_write(GPCMD_SEND_CUE_SHEET),
	187	safe_for_write(GPCMD_SET_SPEED),
	188	safe_for_write(GPCMD_PREVENT_ALLOW_MEDIUM_REMOVAL),
	189	safe_for_write(GPCMD_LOAD_UNLOAD),
	190	safe_for_write(GPCMD_SET_STREAMING),
	191	};
	192	unsigned char type = cmd_type[cmd[0]];
5a57be8d	193	int has_write_perm = 0;
1da177e4 LT	194
	195	/* Anybody who can open the device can do a read-safe command */
	196	if (type & CMD_READ_SAFE)
	197	return 0;
	198
5a57be8d JA	199	/*
	200	* file can be NULL from ioctl_by_bdev()...
	201	*/
	202	if (file)
	203	has_write_perm = file->f_mode & FMODE_WRITE;
	204
1da177e4	205	/* Write-safe commands just require a writable open.. */
5a57be8d JA	206	if ((type & CMD_WRITE_SAFE) && has_write_perm)
5a57be8d JA	207	return 0;
1da177e4	208
3b0e77bd JA	209	/* And root can do any command.. */
	210	if (capable(CAP_SYS_RAWIO))
	211	return 0;
	212
1da177e4 LT	213	if (!type) {
	214	cmd_type[cmd[0]] = CMD_WARNED;
	215	printk(KERN_WARNING "scsi: unknown opcode 0x%02x\n", cmd[0]);
	216	}
	217
1da177e4 LT	218	/* Otherwise fail it with an "Operation not permitted" */
	219	return -EPERM;
	220	}
	221
	222	static int sg_io(struct file file, request_queue_t q,
	223	struct gendisk bd_disk, struct sg_io_hdr hdr)
	224	{
	225	unsigned long start_time;
f63eb21b	226	int writing = 0, ret = 0;
1da177e4 LT	227	struct request *rq;
	228	struct bio *bio;
	229	char sense[SCSI_SENSE_BUFFERSIZE];
	230	unsigned char cmd[BLK_MAX_CDB];
	231
	232	if (hdr->interface_id != 'S')
	233	return -EINVAL;
	234	if (hdr->cmd_len > BLK_MAX_CDB)
	235	return -EINVAL;
	236	if (copy_from_user(cmd, hdr->cmdp, hdr->cmd_len))
	237	return -EFAULT;
	238	if (verify_command(file, cmd))
	239	return -EPERM;
	240
defd94b7	241	if (hdr->dxfer_len > (q->max_hw_sectors << 9))
1da177e4 LT	242	return -EIO;
1da177e4 LT	243
f1970baf	244	if (hdr->dxfer_len)
1da177e4 LT	245	switch (hdr->dxfer_direction) {
	246	default:
	247	return -EINVAL;
	248	case SG_DXFER_TO_FROM_DEV:
1da177e4 LT	249	case SG_DXFER_TO_DEV:
	250	writing = 1;
	251	break;
	252	case SG_DXFER_FROM_DEV:
1da177e4 LT	253	break;
	254	}
	255
dd1cab95 JA	256	rq = blk_get_request(q, writing ? WRITE : READ, GFP_KERNEL);
	257	if (!rq)
	258	return -ENOMEM;
1da177e4	259
f1970baf JB	260	if (hdr->iovec_count) {
	261	const int size = sizeof(struct sg_iovec) * hdr->iovec_count;
	262	struct sg_iovec *iov;
	263
	264	iov = kmalloc(size, GFP_KERNEL);
	265	if (!iov) {
	266	ret = -ENOMEM;
dd1cab95	267	goto out;
f1970baf JB	268	}
	269
	270	if (copy_from_user(iov, hdr->dxferp, size)) {
	271	kfree(iov);
	272	ret = -EFAULT;
	273	goto out;
	274	}
	275
	276	ret = blk_rq_map_user_iov(q, rq, iov, hdr->iovec_count);
	277	kfree(iov);
	278	} else if (hdr->dxfer_len)
	279	ret = blk_rq_map_user(q, rq, hdr->dxferp, hdr->dxfer_len);
	280
	281	if (ret)
	282	goto out;
1da177e4 LT	283
	284	/*
	285	* fill in request structure
	286	*/
	287	rq->cmd_len = hdr->cmd_len;
	288	memcpy(rq->cmd, cmd, hdr->cmd_len);
	289	if (sizeof(rq->cmd) != hdr->cmd_len)
	290	memset(rq->cmd + hdr->cmd_len, 0, sizeof(rq->cmd) - hdr->cmd_len);
	291
	292	memset(sense, 0, sizeof(sense));
	293	rq->sense = sense;
	294	rq->sense_len = 0;
	295
	296	rq->flags \|= REQ_BLOCK_PC;
	297	bio = rq->bio;
	298
	299	/*
	300	* bounce this after holding a reference to the original bio, it's
	301	* needed for proper unmapping
	302	*/
	303	if (rq->bio)
	304	blk_queue_bounce(q, &rq->bio);
	305
	306	rq->timeout = (hdr->timeout * HZ) / 1000;
	307	if (!rq->timeout)
	308	rq->timeout = q->sg_timeout;
	309	if (!rq->timeout)
	310	rq->timeout = BLK_DEFAULT_TIMEOUT;
	311
	312	start_time = jiffies;
	313
	314	/* ignore return value. All information is passed back to caller
	315	* (if he doesn't check that is his problem).
	316	* N.B. a non-zero SCSI status is _not_ necessarily an error.
	317	*/
994ca9a1	318	blk_execute_rq(q, bd_disk, rq, 0);
1da177e4 LT	319
	320	/* write to all output members */
	321	hdr->status = 0xff & rq->errors;
	322	hdr->masked_status = status_byte(rq->errors);
	323	hdr->msg_status = msg_byte(rq->errors);
	324	hdr->host_status = host_byte(rq->errors);
	325	hdr->driver_status = driver_byte(rq->errors);
	326	hdr->info = 0;
	327	if (hdr->masked_status \|\| hdr->host_status \|\| hdr->driver_status)
	328	hdr->info \|= SG_INFO_CHECK;
	329	hdr->resid = rq->data_len;
	330	hdr->duration = ((jiffies - start_time) * 1000) / HZ;
	331	hdr->sb_len_wr = 0;
	332
	333	if (rq->sense_len && hdr->sbp) {
	334	int len = min((unsigned int) hdr->mx_sb_len, rq->sense_len);
	335
	336	if (!copy_to_user(hdr->sbp, rq->sense, len))
	337	hdr->sb_len_wr = len;
	338	}
	339
e1f546e1	340	if (blk_rq_unmap_user(bio, hdr->dxfer_len))
dd1cab95	341	ret = -EFAULT;
1da177e4 LT	342
	343	/* may not have succeeded, but output values written to control
	344	* structure (struct sg_io_hdr). */
dd1cab95 JA	345	out:
	346	blk_put_request(rq);
	347	return ret;
1da177e4 LT	348	}
1da177e4 LT	349
1da177e4 LT	350	#define OMAX_SB_LEN 16 /* For backward compatibility */
	351
	352	static int sg_scsi_ioctl(struct file file, request_queue_t q,
	353	struct gendisk bd_disk, Scsi_Ioctl_Command __user sic)
	354	{
	355	struct request *rq;
	356	int err;
	357	unsigned int in_len, out_len, bytes, opcode, cmdlen;
	358	char *buffer = NULL, sense[SCSI_SENSE_BUFFERSIZE];
	359
	360	/*
	361	* get in an out lengths, verify they don't exceed a page worth of data
	362	*/
	363	if (get_user(in_len, &sic->inlen))
	364	return -EFAULT;
	365	if (get_user(out_len, &sic->outlen))
	366	return -EFAULT;
	367	if (in_len > PAGE_SIZE \|\| out_len > PAGE_SIZE)
	368	return -EINVAL;
	369	if (get_user(opcode, sic->data))
	370	return -EFAULT;
	371
	372	bytes = max(in_len, out_len);
	373	if (bytes) {
	374	buffer = kmalloc(bytes, q->bounce_gfp \| GFP_USER\| __GFP_NOWARN);
	375	if (!buffer)
	376	return -ENOMEM;
	377
	378	memset(buffer, 0, bytes);
	379	}
	380
	381	rq = blk_get_request(q, in_len ? WRITE : READ, __GFP_WAIT);
	382
	383	cmdlen = COMMAND_SIZE(opcode);
	384
	385	/*
	386	* get command and data to send to device, if any
	387	*/
	388	err = -EFAULT;
	389	rq->cmd_len = cmdlen;
	390	if (copy_from_user(rq->cmd, sic->data, cmdlen))
	391	goto error;
	392
	393	if (copy_from_user(buffer, sic->data + cmdlen, in_len))
	394	goto error;
	395
	396	err = verify_command(file, rq->cmd);
	397	if (err)
	398	goto error;
	399
	400	switch (opcode) {
	401	case SEND_DIAGNOSTIC:
	402	case FORMAT_UNIT:
	403	rq->timeout = FORMAT_UNIT_TIMEOUT;
	404	break;
	405	case START_STOP:
	406	rq->timeout = START_STOP_TIMEOUT;
	407	break;
	408	case MOVE_MEDIUM:
	409	rq->timeout = MOVE_MEDIUM_TIMEOUT;
	410	break;
	411	case READ_ELEMENT_STATUS:
	412	rq->timeout = READ_ELEMENT_STATUS_TIMEOUT;
	413	break;
414	case READ_DEFECT_DATA:
415	rq->timeout = READ_DEFECT_DATA_TIMEOUT;
416	break;
417	default:
418	rq->timeout = BLK_DEFAULT_TIMEOUT;
419	break;
420	}
421
422	memset(sense, 0, sizeof(sense));
423	rq->sense = sense;
424	rq->sense_len = 0;
425
426	rq->data = buffer;
427	rq->data_len = bytes;
428	rq->flags \|= REQ_BLOCK_PC;
429
994ca9a1	430	blk_execute_rq(q, bd_disk, rq, 0);
1da177e4 LT	431	err = rq->errors & 0xff; /* only 8 bit SCSI status */
	432	if (err) {
	433	if (rq->sense_len && rq->sense) {
	434	bytes = (OMAX_SB_LEN > rq->sense_len) ?
	435	rq->sense_len : OMAX_SB_LEN;
	436	if (copy_to_user(sic->data, rq->sense, bytes))
	437	err = -EFAULT;
	438	}
	439	} else {
	440	if (copy_to_user(sic->data, buffer, out_len))
	441	err = -EFAULT;
	442	}
	443
	444	error:
	445	kfree(buffer);
	446	blk_put_request(rq);
	447	return err;
	448	}
	449
f98d2dfd BC	450
	451	/* Send basic block requests */
	452	static int __blk_send_generic(request_queue_t q, struct gendisk bd_disk, int cmd, int data)
	453	{
	454	struct request *rq;
	455	int err;
	456
	457	rq = blk_get_request(q, WRITE, __GFP_WAIT);
	458	rq->flags \|= REQ_BLOCK_PC;
	459	rq->data = NULL;
	460	rq->data_len = 0;
	461	rq->timeout = BLK_DEFAULT_TIMEOUT;
	462	memset(rq->cmd, 0, sizeof(rq->cmd));
	463	rq->cmd[0] = cmd;
	464	rq->cmd[4] = data;
	465	rq->cmd_len = 6;
	466	err = blk_execute_rq(q, bd_disk, rq, 0);
	467	blk_put_request(rq);
	468
	469	return err;
	470	}
	471
	472	static inline int blk_send_start_stop(request_queue_t q, struct gendisk bd_disk, int data)
	473	{
	474	return __blk_send_generic(q, bd_disk, GPCMD_START_STOP_UNIT, data);
	475	}
	476
1da177e4 LT	477	int scsi_cmd_ioctl(struct file file, struct gendisk bd_disk, unsigned int cmd, void __user *arg)
	478	{
	479	request_queue_t *q;
f98d2dfd	480	int err;
1da177e4 LT	481
	482	q = bd_disk->queue;
	483	if (!q)
	484	return -ENXIO;
	485
	486	if (blk_get_queue(q))
	487	return -ENXIO;
	488
	489	switch (cmd) {
	490	/*
	491	* new sgv3 interface
	492	*/
	493	case SG_GET_VERSION_NUM:
	494	err = sg_get_version(arg);
	495	break;
	496	case SCSI_IOCTL_GET_IDLUN:
	497	err = scsi_get_idlun(q, arg);
	498	break;
	499	case SCSI_IOCTL_GET_BUS_NUMBER:
	500	err = scsi_get_bus(q, arg);
	501	break;
	502	case SG_SET_TIMEOUT:
	503	err = sg_set_timeout(q, arg);
	504	break;
	505	case SG_GET_TIMEOUT:
	506	err = sg_get_timeout(q);
	507	break;
	508	case SG_GET_RESERVED_SIZE:
	509	err = sg_get_reserved_size(q, arg);
	510	break;
	511	case SG_SET_RESERVED_SIZE:
	512	err = sg_set_reserved_size(q, arg);
	513	break;
	514	case SG_EMULATED_HOST:
	515	err = sg_emulated_host(q, arg);
	516	break;
	517	case SG_IO: {
	518	struct sg_io_hdr hdr;
	519
	520	err = -EFAULT;
	521	if (copy_from_user(&hdr, arg, sizeof(hdr)))
	522	break;
	523	err = sg_io(file, q, bd_disk, &hdr);
	524	if (err == -EFAULT)
	525	break;
	526
	527	if (copy_to_user(arg, &hdr, sizeof(hdr)))
	528	err = -EFAULT;
	529	break;
	530	}
	531	case CDROM_SEND_PACKET: {
	532	struct cdrom_generic_command cgc;
	533	struct sg_io_hdr hdr;
	534
	535	err = -EFAULT;
	536	if (copy_from_user(&cgc, arg, sizeof(cgc)))
	537	break;
	538	cgc.timeout = clock_t_to_jiffies(cgc.timeout);
	539	memset(&hdr, 0, sizeof(hdr));
	540	hdr.interface_id = 'S';
	541	hdr.cmd_len = sizeof(cgc.cmd);
	542	hdr.dxfer_len = cgc.buflen;
	543	err = 0;
	544	switch (cgc.data_direction) {
545	case CGC_DATA_UNKNOWN:
546	hdr.dxfer_direction = SG_DXFER_UNKNOWN;
547	break;
548	case CGC_DATA_WRITE:
549	hdr.dxfer_direction = SG_DXFER_TO_DEV;
550	break;
551	case CGC_DATA_READ:
552	hdr.dxfer_direction = SG_DXFER_FROM_DEV;
553	break;
554	case CGC_DATA_NONE:
555	hdr.dxfer_direction = SG_DXFER_NONE;
556	break;
557	default:
558	err = -EINVAL;
559	}
560	if (err)
561	break;
562
563	hdr.dxferp = cgc.buffer;
564	hdr.sbp = cgc.sense;
565	if (hdr.sbp)
566	hdr.mx_sb_len = sizeof(struct request_sense);
567	hdr.timeout = cgc.timeout;
568	hdr.cmdp = ((struct cdrom_generic_command __user*) arg)->cmd;
569	hdr.cmd_len = sizeof(cgc.cmd);
570
571	err = sg_io(file, q, bd_disk, &hdr);
572	if (err == -EFAULT)
573	break;
574
575	if (hdr.status)
576	err = -EIO;
577
578	cgc.stat = err;
579	cgc.buflen = hdr.resid;
580	if (copy_to_user(arg, &cgc, sizeof(cgc)))
581	err = -EFAULT;
582
583	break;
584	}
585
586	/*
587	* old junk scsi send command ioctl
588	*/
589	case SCSI_IOCTL_SEND_COMMAND:
590	printk(KERN_WARNING "program %s is using a deprecated SCSI ioctl, please convert it to SG_IO\n", current->comm);
591	err = -EINVAL;
592	if (!arg)
593	break;
594
595	err = sg_scsi_ioctl(file, q, bd_disk, arg);
596	break;
597	case CDROMCLOSETRAY:
f98d2dfd BC	598	err = blk_send_start_stop(q, bd_disk, 0x03);
f98d2dfd BC	599	break;
1da177e4	600	case CDROMEJECT:
f98d2dfd	601	err = blk_send_start_stop(q, bd_disk, 0x02);
1da177e4 LT	602	break;
	603	default:
	604	err = -ENOTTY;
	605	}
	606
	607	blk_put_queue(q);
	608	return err;
	609	}
	610
	611	EXPORT_SYMBOL(scsi_cmd_ioctl);