[deliverable/linux.git] / drivers / ide / ide-floppy_ioctl.c

/*
 * ide-floppy IOCTLs handling.
 */

#include <linux/kernel.h>
#include <linux/ide.h>
#include <linux/cdrom.h>

#include <asm/unaligned.h>

#include <scsi/scsi_ioctl.h>

#include "ide-floppy.h"

/*
 * Obtain the list of formattable capacities.
 * Very similar to ide_floppy_get_capacity, except that we push the capacity
 * descriptors to userland, instead of our own structures.
 *
 * Userland gives us the following structure:
 *
 * struct idefloppy_format_capacities {
 *	int nformats;
 *	struct {
 *		int nblocks;
 *		int blocksize;
 *	} formats[];
 * };
 *
 * userland initializes nformats to the number of allocated formats[] records.
 * On exit we set nformats to the number of records we've actually initialized.
 */

static int ide_floppy_get_format_capacities(ide_drive_t *drive,
					    struct ide_atapi_pc *pc,
					    int __user *arg)
{
	struct ide_disk_obj *floppy = drive->driver_data;
	int i, blocks, length, u_array_size, u_index;
	int __user *argp;
	u8 pc_buf[256], header_len, desc_cnt;

	if (get_user(u_array_size, arg))
		return -EFAULT;

	if (u_array_size <= 0)
		return -EINVAL;

	ide_floppy_create_read_capacity_cmd(pc);
	pc->buf_size = sizeof(pc_buf);

	if (ide_queue_pc_tail(drive, floppy->disk, pc, pc_buf, pc->req_xfer)) {
		printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
		return -EIO;
	}

	header_len = pc_buf[3];
	desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */

	u_index = 0;
	argp = arg + 1;

	/*
	 * We always skip the first capacity descriptor.  That's the current
	 * capacity.  We are interested in the remaining descriptors, the
	 * formattable capacities.
	 */
	for (i = 1; i < desc_cnt; i++) {
		unsigned int desc_start = 4 + i*8;

		if (u_index >= u_array_size)
			break;	/* User-supplied buffer too small */

		blocks = be32_to_cpup((__be32 *)&pc_buf[desc_start]);
		length = be16_to_cpup((__be16 *)&pc_buf[desc_start + 6]);

		if (put_user(blocks, argp))
			return -EFAULT;

		++argp;

		if (put_user(length, argp))
			return -EFAULT;

		++argp;

		++u_index;
	}

	if (put_user(u_index, arg))
		return -EFAULT;

	return 0;
}

static void ide_floppy_create_format_unit_cmd(struct ide_atapi_pc *pc, int b,
		int l, int flags)
{
	ide_init_pc(pc);
	pc->c[0] = GPCMD_FORMAT_UNIT;
	pc->c[1] = 0x17;

	memset(pc->buf, 0, 12);
	pc->buf[1] = 0xA2;
	/* Default format list header, u8 1: FOV/DCRT/IMM bits set */

	if (flags & 1)				/* Verify bit on... */
		pc->buf[1] ^= 0x20;		/* ... turn off DCRT bit */
	pc->buf[3] = 8;

	put_unaligned(cpu_to_be32(b), (unsigned int *)(&pc->buf[4]));
	put_unaligned(cpu_to_be32(l), (unsigned int *)(&pc->buf[8]));
	pc->buf_size = 12;
	pc->flags |= PC_FLAG_WRITING;
}

static int ide_floppy_get_sfrp_bit(ide_drive_t *drive, struct ide_atapi_pc *pc)
{
	struct ide_disk_obj *floppy = drive->driver_data;
	u8 buf[20];

	drive->atapi_flags &= ~IDE_AFLAG_SRFP;

	ide_floppy_create_mode_sense_cmd(pc, IDEFLOPPY_CAPABILITIES_PAGE);
	pc->flags |= PC_FLAG_SUPPRESS_ERROR;

	if (ide_queue_pc_tail(drive, floppy->disk, pc, buf, pc->req_xfer))
		return 1;

	if (buf[8 + 2] & 0x40)
		drive->atapi_flags |= IDE_AFLAG_SRFP;

	return 0;
}

static int ide_floppy_format_unit(ide_drive_t *drive, struct ide_atapi_pc *pc,
				  int __user *arg)
{
	struct ide_disk_obj *floppy = drive->driver_data;
	int blocks, length, flags, err = 0;

	if (floppy->openers > 1) {
		/* Don't format if someone is using the disk */
		drive->dev_flags &= ~IDE_DFLAG_FORMAT_IN_PROGRESS;
		return -EBUSY;
	}

	drive->dev_flags |= IDE_DFLAG_FORMAT_IN_PROGRESS;

	/*
	 * Send ATAPI_FORMAT_UNIT to the drive.
	 *
	 * Userland gives us the following structure:
	 *
	 * struct idefloppy_format_command {
	 *        int nblocks;
	 *        int blocksize;
	 *        int flags;
	 *        } ;
	 *
	 * flags is a bitmask, currently, the only defined flag is:
	 *
	 *        0x01 - verify media after format.
	 */
	if (get_user(blocks, arg) ||
			get_user(length, arg+1) ||
			get_user(flags, arg+2)) {
		err = -EFAULT;
		goto out;
	}

	ide_floppy_get_sfrp_bit(drive, pc);
	ide_floppy_create_format_unit_cmd(pc, blocks, length, flags);

	if (ide_queue_pc_tail(drive, floppy->disk, pc, pc->buf, pc->req_xfer))
		err = -EIO;

out:
	if (err)
		drive->dev_flags &= ~IDE_DFLAG_FORMAT_IN_PROGRESS;
	return err;
}

/*
 * Get ATAPI_FORMAT_UNIT progress indication.
 *
 * Userland gives a pointer to an int.  The int is set to a progress
 * indicator 0-65536, with 65536=100%.
 *
 * If the drive does not support format progress indication, we just check
 * the dsc bit, and return either 0 or 65536.
 */

static int ide_floppy_get_format_progress(ide_drive_t *drive,
					  struct ide_atapi_pc *pc,
					  int __user *arg)
{
	struct ide_disk_obj *floppy = drive->driver_data;
	int progress_indication = 0x10000;

	if (drive->atapi_flags & IDE_AFLAG_SRFP) {
		ide_create_request_sense_cmd(drive, pc);
		if (ide_queue_pc_tail(drive, floppy->disk, pc, pc->buf,
				      pc->req_xfer))
			return -EIO;

		if (floppy->sense_key == 2 &&
		    floppy->asc == 4 &&
		    floppy->ascq == 4)
			progress_indication = floppy->progress_indication;

		/* Else assume format_unit has finished, and we're at 0x10000 */
	} else {
		ide_hwif_t *hwif = drive->hwif;
		unsigned long flags;
		u8 stat;

		local_irq_save(flags);
		stat = hwif->tp_ops->read_status(hwif);
		local_irq_restore(flags);

		progress_indication = ((stat & ATA_DSC) == 0) ? 0 : 0x10000;
	}

	if (put_user(progress_indication, arg))
		return -EFAULT;

	return 0;
}

static int ide_floppy_lockdoor(ide_drive_t *drive, struct ide_atapi_pc *pc,
			       unsigned long arg, unsigned int cmd)
{
	struct ide_disk_obj *floppy = drive->driver_data;
	struct gendisk *disk = floppy->disk;
	int prevent = (arg && cmd != CDROMEJECT) ? 1 : 0;

	if (floppy->openers > 1)
		return -EBUSY;

	ide_set_media_lock(drive, disk, prevent);

	if (cmd == CDROMEJECT)
		ide_do_start_stop(drive, disk, 2);

	return 0;
}

static int ide_floppy_format_ioctl(ide_drive_t *drive, struct ide_atapi_pc *pc,
				   fmode_t mode, unsigned int cmd,
				   void __user *argp)
{
	switch (cmd) {
	case IDEFLOPPY_IOCTL_FORMAT_SUPPORTED:
		return 0;
	case IDEFLOPPY_IOCTL_FORMAT_GET_CAPACITY:
		return ide_floppy_get_format_capacities(drive, pc, argp);
	case IDEFLOPPY_IOCTL_FORMAT_START:
		if (!(mode & FMODE_WRITE))
			return -EPERM;
		return ide_floppy_format_unit(drive, pc, (int __user *)argp);
	case IDEFLOPPY_IOCTL_FORMAT_GET_PROGRESS:
		return ide_floppy_get_format_progress(drive, pc, argp);
	default:
		return -ENOTTY;
	}
}

int ide_floppy_ioctl(ide_drive_t *drive, struct block_device *bdev,
		     fmode_t mode, unsigned int cmd, unsigned long arg)
{
	struct ide_atapi_pc pc;
	void __user *argp = (void __user *)arg;
	int err;

	if (cmd == CDROMEJECT || cmd == CDROM_LOCKDOOR)
		return ide_floppy_lockdoor(drive, &pc, arg, cmd);

	err = ide_floppy_format_ioctl(drive, &pc, mode, cmd, argp);
	if (err != -ENOTTY)
		return err;

	/*
	 * skip SCSI_IOCTL_SEND_COMMAND (deprecated)
	 * and CDROM_SEND_PACKET (legacy) ioctls
	 */
	if (cmd != CDROM_SEND_PACKET && cmd != SCSI_IOCTL_SEND_COMMAND)
		err = scsi_cmd_ioctl(bdev->bd_disk->queue, bdev->bd_disk,
				mode, cmd, argp);

	if (err == -ENOTTY)
		err = generic_ide_ioctl(drive, bdev, cmd, arg);

	return err;
}
Commit	Line	Data
0127854d BZ	1	/*
	2	* ide-floppy IOCTLs handling.
	3	*/
	4
	5	#include <linux/kernel.h>
	6	#include <linux/ide.h>
	7	#include <linux/cdrom.h>
	8
	9	#include <asm/unaligned.h>
	10
	11	#include <scsi/scsi_ioctl.h>
	12
	13	#include "ide-floppy.h"
	14
	15	/*
	16	* Obtain the list of formattable capacities.
	17	* Very similar to ide_floppy_get_capacity, except that we push the capacity
	18	* descriptors to userland, instead of our own structures.
	19	*
	20	* Userland gives us the following structure:
	21	*
	22	* struct idefloppy_format_capacities {
	23	* int nformats;
	24	* struct {
	25	* int nblocks;
	26	* int blocksize;
	27	* } formats[];
	28	* };
	29	*
	30	* userland initializes nformats to the number of allocated formats[] records.
	31	* On exit we set nformats to the number of records we've actually initialized.
	32	*/
	33
07bd3f47 LT	34	static int ide_floppy_get_format_capacities(ide_drive_t *drive,
	35	struct ide_atapi_pc *pc,
	36	int __user *arg)
0127854d	37	{
806f80a6	38	struct ide_disk_obj *floppy = drive->driver_data;
0127854d BZ	39	int i, blocks, length, u_array_size, u_index;
0127854d BZ	40	int __user *argp;
41fa9f86	41	u8 pc_buf[256], header_len, desc_cnt;
0127854d BZ	42
	43	if (get_user(u_array_size, arg))
	44	return -EFAULT;
	45
	46	if (u_array_size <= 0)
	47	return -EINVAL;
	48
07bd3f47	49	ide_floppy_create_read_capacity_cmd(pc);
41fa9f86 BZ	50	pc->buf_size = sizeof(pc_buf);
41fa9f86 BZ	51
b13345f3	52	if (ide_queue_pc_tail(drive, floppy->disk, pc, pc_buf, pc->req_xfer)) {
0127854d BZ	53	printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
	54	return -EIO;
	55	}
	56
b13345f3	57	header_len = pc_buf[3];
0127854d BZ	58	desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */
	59
	60	u_index = 0;
	61	argp = arg + 1;
	62
	63	/*
	64	* We always skip the first capacity descriptor. That's the current
	65	* capacity. We are interested in the remaining descriptors, the
	66	* formattable capacities.
	67	*/
	68	for (i = 1; i < desc_cnt; i++) {
	69	unsigned int desc_start = 4 + i*8;
	70
	71	if (u_index >= u_array_size)
	72	break; /* User-supplied buffer too small */
	73
b13345f3 BP	74	blocks = be32_to_cpup((__be32 *)&pc_buf[desc_start]);
b13345f3 BP	75	length = be16_to_cpup((__be16 *)&pc_buf[desc_start + 6]);
0127854d BZ	76
	77	if (put_user(blocks, argp))
	78	return -EFAULT;
	79
	80	++argp;
	81
	82	if (put_user(length, argp))
	83	return -EFAULT;
	84
	85	++argp;
	86
	87	++u_index;
	88	}
	89
	90	if (put_user(u_index, arg))
	91	return -EFAULT;
	92
	93	return 0;
	94	}
	95
	96	static void ide_floppy_create_format_unit_cmd(struct ide_atapi_pc *pc, int b,
	97	int l, int flags)
	98	{
	99	ide_init_pc(pc);
	100	pc->c[0] = GPCMD_FORMAT_UNIT;
	101	pc->c[1] = 0x17;
	102
	103	memset(pc->buf, 0, 12);
	104	pc->buf[1] = 0xA2;
	105	/* Default format list header, u8 1: FOV/DCRT/IMM bits set */
	106
	107	if (flags & 1) /* Verify bit on... */
	108	pc->buf[1] ^= 0x20; /* ... turn off DCRT bit */
	109	pc->buf[3] = 8;
	110
	111	put_unaligned(cpu_to_be32(b), (unsigned int *)(&pc->buf[4]));
	112	put_unaligned(cpu_to_be32(l), (unsigned int *)(&pc->buf[8]));
	113	pc->buf_size = 12;
	114	pc->flags \|= PC_FLAG_WRITING;
	115	}
	116
07bd3f47	117	static int ide_floppy_get_sfrp_bit(ide_drive_t drive, struct ide_atapi_pc pc)
0127854d	118	{
0df96277	119	struct ide_disk_obj *floppy = drive->driver_data;
802e6634	120	u8 buf[20];
0127854d BZ	121
	122	drive->atapi_flags &= ~IDE_AFLAG_SRFP;
	123
07bd3f47 LT	124	ide_floppy_create_mode_sense_cmd(pc, IDEFLOPPY_CAPABILITIES_PAGE);
07bd3f47 LT	125	pc->flags \|= PC_FLAG_SUPPRESS_ERROR;
0127854d	126
802e6634	127	if (ide_queue_pc_tail(drive, floppy->disk, pc, buf, pc->req_xfer))
0127854d BZ	128	return 1;
0127854d BZ	129
802e6634	130	if (buf[8 + 2] & 0x40)
0127854d BZ	131	drive->atapi_flags \|= IDE_AFLAG_SRFP;
	132
	133	return 0;
	134	}
	135
07bd3f47 LT	136	static int ide_floppy_format_unit(ide_drive_t drive, struct ide_atapi_pc pc,
07bd3f47 LT	137	int __user *arg)
0127854d	138	{
0df96277	139	struct ide_disk_obj *floppy = drive->driver_data;
0127854d BZ	140	int blocks, length, flags, err = 0;
	141
	142	if (floppy->openers > 1) {
	143	/* Don't format if someone is using the disk */
e0128628	144	drive->dev_flags &= ~IDE_DFLAG_FORMAT_IN_PROGRESS;
0127854d BZ	145	return -EBUSY;
	146	}
	147
e0128628	148	drive->dev_flags \|= IDE_DFLAG_FORMAT_IN_PROGRESS;
0127854d BZ	149
	150	/*
	151	* Send ATAPI_FORMAT_UNIT to the drive.
	152	*
	153	* Userland gives us the following structure:
	154	*
	155	* struct idefloppy_format_command {
	156	* int nblocks;
	157	* int blocksize;
	158	* int flags;
	159	* } ;
	160	*
	161	* flags is a bitmask, currently, the only defined flag is:
	162	*
	163	* 0x01 - verify media after format.
	164	*/
	165	if (get_user(blocks, arg) \|\|
	166	get_user(length, arg+1) \|\|
	167	get_user(flags, arg+2)) {
	168	err = -EFAULT;
	169	goto out;
	170	}
	171
07bd3f47 LT	172	ide_floppy_get_sfrp_bit(drive, pc);
07bd3f47 LT	173	ide_floppy_create_format_unit_cmd(pc, blocks, length, flags);
0127854d	174
b13345f3	175	if (ide_queue_pc_tail(drive, floppy->disk, pc, pc->buf, pc->req_xfer))
0127854d BZ	176	err = -EIO;
	177
	178	out:
	179	if (err)
e0128628	180	drive->dev_flags &= ~IDE_DFLAG_FORMAT_IN_PROGRESS;
0127854d BZ	181	return err;
	182	}
	183
	184	/*
	185	* Get ATAPI_FORMAT_UNIT progress indication.
	186	*
	187	* Userland gives a pointer to an int. The int is set to a progress
	188	* indicator 0-65536, with 65536=100%.
	189	*
	190	* If the drive does not support format progress indication, we just check
	191	* the dsc bit, and return either 0 or 65536.
	192	*/
	193
07bd3f47 LT	194	static int ide_floppy_get_format_progress(ide_drive_t *drive,
	195	struct ide_atapi_pc *pc,
	196	int __user *arg)
0127854d	197	{
0df96277	198	struct ide_disk_obj *floppy = drive->driver_data;
0127854d BZ	199	int progress_indication = 0x10000;
	200
	201	if (drive->atapi_flags & IDE_AFLAG_SRFP) {
07bd3f47	202	ide_create_request_sense_cmd(drive, pc);
b13345f3 BP	203	if (ide_queue_pc_tail(drive, floppy->disk, pc, pc->buf,
b13345f3 BP	204	pc->req_xfer))
0127854d BZ	205	return -EIO;
	206
	207	if (floppy->sense_key == 2 &&
	208	floppy->asc == 4 &&
	209	floppy->ascq == 4)
	210	progress_indication = floppy->progress_indication;
	211
	212	/* Else assume format_unit has finished, and we're at 0x10000 */
	213	} else {
	214	ide_hwif_t *hwif = drive->hwif;
	215	unsigned long flags;
	216	u8 stat;
	217
	218	local_irq_save(flags);
	219	stat = hwif->tp_ops->read_status(hwif);
	220	local_irq_restore(flags);
	221
	222	progress_indication = ((stat & ATA_DSC) == 0) ? 0 : 0x10000;
	223	}
	224
	225	if (put_user(progress_indication, arg))
	226	return -EFAULT;
	227
	228	return 0;
	229	}
	230
5bb1536a BZ	231	static int ide_floppy_lockdoor(ide_drive_t drive, struct ide_atapi_pc pc,
	232	unsigned long arg, unsigned int cmd)
	233	{
0df96277	234	struct ide_disk_obj *floppy = drive->driver_data;
5bb1536a BZ	235	struct gendisk *disk = floppy->disk;
	236	int prevent = (arg && cmd != CDROMEJECT) ? 1 : 0;
	237
	238	if (floppy->openers > 1)
	239	return -EBUSY;
	240
	241	ide_set_media_lock(drive, disk, prevent);
	242
	243	if (cmd == CDROMEJECT)
	244	ide_do_start_stop(drive, disk, 2);
	245
	246	return 0;
	247	}
	248
07bd3f47 LT	249	static int ide_floppy_format_ioctl(ide_drive_t drive, struct ide_atapi_pc pc,
	250	fmode_t mode, unsigned int cmd,
	251	void __user *argp)
0127854d BZ	252	{
	253	switch (cmd) {
	254	case IDEFLOPPY_IOCTL_FORMAT_SUPPORTED:
	255	return 0;
	256	case IDEFLOPPY_IOCTL_FORMAT_GET_CAPACITY:
07bd3f47	257	return ide_floppy_get_format_capacities(drive, pc, argp);
0127854d	258	case IDEFLOPPY_IOCTL_FORMAT_START:
badf8082	259	if (!(mode & FMODE_WRITE))
0127854d	260	return -EPERM;
07bd3f47	261	return ide_floppy_format_unit(drive, pc, (int __user *)argp);
0127854d	262	case IDEFLOPPY_IOCTL_FORMAT_GET_PROGRESS:
07bd3f47	263	return ide_floppy_get_format_progress(drive, pc, argp);
0127854d BZ	264	default:
	265	return -ENOTTY;
	266	}
	267	}
5bb1536a	268
badf8082 AV	269	int ide_floppy_ioctl(ide_drive_t drive, struct block_device bdev,
badf8082 AV	270	fmode_t mode, unsigned int cmd, unsigned long arg)
5bb1536a	271	{
5bb1536a BZ	272	struct ide_atapi_pc pc;
	273	void __user argp = (void __user )arg;
	274	int err;
	275
	276	if (cmd == CDROMEJECT \|\| cmd == CDROM_LOCKDOOR)
	277	return ide_floppy_lockdoor(drive, &pc, arg, cmd);
	278
07bd3f47	279	err = ide_floppy_format_ioctl(drive, &pc, mode, cmd, argp);
5bb1536a BZ	280	if (err != -ENOTTY)
	281	return err;
	282
	283	/*
	284	* skip SCSI_IOCTL_SEND_COMMAND (deprecated)
	285	* and CDROM_SEND_PACKET (legacy) ioctls
	286	*/
	287	if (cmd != CDROM_SEND_PACKET && cmd != SCSI_IOCTL_SEND_COMMAND)
74f3c8af	288	err = scsi_cmd_ioctl(bdev->bd_disk->queue, bdev->bd_disk,
badf8082	289	mode, cmd, argp);
5bb1536a BZ	290
5bb1536a BZ	291	if (err == -ENOTTY)
1bddd9e6	292	err = generic_ide_ioctl(drive, bdev, cmd, arg);
5bb1536a BZ	293
	294	return err;
	295	}