[net-next-2.6.git] / drivers / s390 / block / dasd_ioctl.c

/*
 * File...........: linux/drivers/s390/block/dasd_ioctl.c
 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
 *		    Horst Hummel <Horst.Hummel@de.ibm.com>
 *		    Carsten Otte <Cotte@de.ibm.com>
 *		    Martin Schwidefsky <schwidefsky@de.ibm.com>
 * Bugreports.to..: <Linux390@de.ibm.com>
 * (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999-2001
 *
 * i/o controls for the dasd driver.
 */

#define KMSG_COMPONENT "dasd"

#include <linux/interrupt.h>
#include <linux/major.h>
#include <linux/fs.h>
#include <linux/blkpg.h>
#include <linux/smp_lock.h>
#include <linux/slab.h>
#include <asm/compat.h>
#include <asm/ccwdev.h>
#include <asm/cmb.h>
#include <asm/uaccess.h>

/* This is ugly... */
#define PRINTK_HEADER "dasd_ioctl:"

#include "dasd_int.h"


static int
dasd_ioctl_api_version(void __user *argp)
{
	int ver = DASD_API_VERSION;
	return put_user(ver, (int __user *)argp);
}

/*
 * Enable device.
 * used by dasdfmt after BIODASDDISABLE to retrigger blocksize detection
 */
static int
dasd_ioctl_enable(struct block_device *bdev)
{
	struct dasd_block *block = bdev->bd_disk->private_data;

	if (!capable(CAP_SYS_ADMIN))
		return -EACCES;

	dasd_enable_device(block->base);
	/* Formatting the dasd device can change the capacity. */
	mutex_lock(&bdev->bd_mutex);
	i_size_write(bdev->bd_inode, (loff_t)get_capacity(block->gdp) << 9);
	mutex_unlock(&bdev->bd_mutex);
	return 0;
}

/*
 * Disable device.
 * Used by dasdfmt. Disable I/O operations but allow ioctls.
 */
static int
dasd_ioctl_disable(struct block_device *bdev)
{
	struct dasd_block *block = bdev->bd_disk->private_data;

	if (!capable(CAP_SYS_ADMIN))
		return -EACCES;

	/*
	 * Man this is sick. We don't do a real disable but only downgrade
	 * the device to DASD_STATE_BASIC. The reason is that dasdfmt uses
	 * BIODASDDISABLE to disable accesses to the device via the block
	 * device layer but it still wants to do i/o on the device by
	 * using the BIODASDFMT ioctl. Therefore the correct state for the
	 * device is DASD_STATE_BASIC that allows to do basic i/o.
	 */
	dasd_set_target_state(block->base, DASD_STATE_BASIC);
	/*
	 * Set i_size to zero, since read, write, etc. check against this
	 * value.
	 */
	mutex_lock(&bdev->bd_mutex);
	i_size_write(bdev->bd_inode, 0);
	mutex_unlock(&bdev->bd_mutex);
	return 0;
}

/*
 * Quiesce device.
 */
static int dasd_ioctl_quiesce(struct dasd_block *block)
{
	unsigned long flags;
	struct dasd_device *base;

	base = block->base;
	if (!capable (CAP_SYS_ADMIN))
		return -EACCES;

	pr_info("%s: The DASD has been put in the quiesce "
		"state\n", dev_name(&base->cdev->dev));
	spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
	dasd_device_set_stop_bits(base, DASD_STOPPED_QUIESCE);
	spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
	return 0;
}


/*
 * Resume device.
 */
static int dasd_ioctl_resume(struct dasd_block *block)
{
	unsigned long flags;
	struct dasd_device *base;

	base = block->base;
	if (!capable (CAP_SYS_ADMIN))
		return -EACCES;

	pr_info("%s: I/O operations have been resumed "
		"on the DASD\n", dev_name(&base->cdev->dev));
	spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
	dasd_device_remove_stop_bits(base, DASD_STOPPED_QUIESCE);
	spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);

	dasd_schedule_block_bh(block);
	return 0;
}

/*
 * performs formatting of _device_ according to _fdata_
 * Note: The discipline's format_function is assumed to deliver formatting
 * commands to format a single unit of the device. In terms of the ECKD
 * devices this means CCWs are generated to format a single track.
 */
static int dasd_format(struct dasd_block *block, struct format_data_t *fdata)
{
	struct dasd_ccw_req *cqr;
	struct dasd_device *base;
	int rc;

	base = block->base;
	if (base->discipline->format_device == NULL)
		return -EPERM;

	if (base->state != DASD_STATE_BASIC) {
		pr_warning("%s: The DASD cannot be formatted while it is "
			   "enabled\n",  dev_name(&base->cdev->dev));
		return -EBUSY;
	}

	DBF_DEV_EVENT(DBF_NOTICE, base,
		      "formatting units %u to %u (%u B blocks) flags %u",
		      fdata->start_unit,
		      fdata->stop_unit, fdata->blksize, fdata->intensity);

	/* Since dasdfmt keeps the device open after it was disabled,
	 * there still exists an inode for this device.
	 * We must update i_blkbits, otherwise we might get errors when
	 * enabling the device later.
	 */
	if (fdata->start_unit == 0) {
		struct block_device *bdev = bdget_disk(block->gdp, 0);
		bdev->bd_inode->i_blkbits = blksize_bits(fdata->blksize);
		bdput(bdev);
	}

	while (fdata->start_unit <= fdata->stop_unit) {
		cqr = base->discipline->format_device(base, fdata);
		if (IS_ERR(cqr))
			return PTR_ERR(cqr);
		rc = dasd_sleep_on_interruptible(cqr);
		dasd_sfree_request(cqr, cqr->memdev);
		if (rc) {
			if (rc != -ERESTARTSYS)
				pr_err("%s: Formatting unit %d failed with "
				       "rc=%d\n", dev_name(&base->cdev->dev),
				       fdata->start_unit, rc);
			return rc;
		}
		fdata->start_unit++;
	}
	return 0;
}

/*
 * Format device.
 */
static int
dasd_ioctl_format(struct block_device *bdev, void __user *argp)
{
	struct dasd_block *block = bdev->bd_disk->private_data;
	struct format_data_t fdata;

	if (!capable(CAP_SYS_ADMIN))
		return -EACCES;
	if (!argp)
		return -EINVAL;

	if (block->base->features & DASD_FEATURE_READONLY ||
	    test_bit(DASD_FLAG_DEVICE_RO, &block->base->flags))
		return -EROFS;
	if (copy_from_user(&fdata, argp, sizeof(struct format_data_t)))
		return -EFAULT;
	if (bdev != bdev->bd_contains) {
		pr_warning("%s: The specified DASD is a partition and cannot "
			   "be formatted\n",
			   dev_name(&block->base->cdev->dev));
		return -EINVAL;
	}
	return dasd_format(block, &fdata);
}

#ifdef CONFIG_DASD_PROFILE
/*
 * Reset device profile information
 */
static int dasd_ioctl_reset_profile(struct dasd_block *block)
{
	memset(&block->profile, 0, sizeof(struct dasd_profile_info_t));
	return 0;
}

/*
 * Return device profile information
 */
static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
{
	if (dasd_profile_level == DASD_PROFILE_OFF)
		return -EIO;
	if (copy_to_user(argp, &block->profile,
			 sizeof(struct dasd_profile_info_t)))
		return -EFAULT;
	return 0;
}
#else
static int dasd_ioctl_reset_profile(struct dasd_block *block)
{
	return -ENOSYS;
}

static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
{
	return -ENOSYS;
}
#endif

/*
 * Return dasd information. Used for BIODASDINFO and BIODASDINFO2.
 */
static int dasd_ioctl_information(struct dasd_block *block,
				  unsigned int cmd, void __user *argp)
{
	struct dasd_information2_t *dasd_info;
	unsigned long flags;
	int rc;
	struct dasd_device *base;
	struct ccw_device *cdev;
	struct ccw_dev_id dev_id;

	base = block->base;
	if (!base->discipline || !base->discipline->fill_info)
		return -EINVAL;

	dasd_info = kzalloc(sizeof(struct dasd_information2_t), GFP_KERNEL);
	if (dasd_info == NULL)
		return -ENOMEM;

	rc = base->discipline->fill_info(base, dasd_info);
	if (rc) {
		kfree(dasd_info);
		return rc;
	}

	cdev = base->cdev;
	ccw_device_get_id(cdev, &dev_id);

	dasd_info->devno = dev_id.devno;
	dasd_info->schid = _ccw_device_get_subchannel_number(base->cdev);
	dasd_info->cu_type = cdev->id.cu_type;
	dasd_info->cu_model = cdev->id.cu_model;
	dasd_info->dev_type = cdev->id.dev_type;
	dasd_info->dev_model = cdev->id.dev_model;
	dasd_info->status = base->state;
	/*
	 * The open_count is increased for every opener, that includes
	 * the blkdev_get in dasd_scan_partitions.
	 * This must be hidden from user-space.
	 */
	dasd_info->open_count = atomic_read(&block->open_count);
	if (!block->bdev)
		dasd_info->open_count++;

	/*
	 * check if device is really formatted
	 * LDL / CDL was returned by 'fill_info'
	 */
	if ((base->state < DASD_STATE_READY) ||
	    (dasd_check_blocksize(block->bp_block)))
		dasd_info->format = DASD_FORMAT_NONE;

	dasd_info->features |=
		((base->features & DASD_FEATURE_READONLY) != 0);

	memcpy(dasd_info->type, base->discipline->name, 4);

	if (block->request_queue->request_fn) {
		struct list_head *l;
#ifdef DASD_EXTENDED_PROFILING
		{
			struct list_head *l;
			spin_lock_irqsave(&block->lock, flags);
			list_for_each(l, &block->request_queue->queue_head)
				dasd_info->req_queue_len++;
			spin_unlock_irqrestore(&block->lock, flags);
		}
#endif				/* DASD_EXTENDED_PROFILING */
		spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
		list_for_each(l, &base->ccw_queue)
			dasd_info->chanq_len++;
		spin_unlock_irqrestore(get_ccwdev_lock(base->cdev),
				       flags);
	}

	rc = 0;
	if (copy_to_user(argp, dasd_info,
			 ((cmd == (unsigned int) BIODASDINFO2) ?
			  sizeof(struct dasd_information2_t) :
			  sizeof(struct dasd_information_t))))
		rc = -EFAULT;
	kfree(dasd_info);
	return rc;
}

/*
 * Set read only
 */
static int
dasd_ioctl_set_ro(struct block_device *bdev, void __user *argp)
{
	struct dasd_block *block =  bdev->bd_disk->private_data;
	int intval;

	if (!capable(CAP_SYS_ADMIN))
		return -EACCES;
	if (bdev != bdev->bd_contains)
		// ro setting is not allowed for partitions
		return -EINVAL;
	if (get_user(intval, (int __user *)argp))
		return -EFAULT;
	if (!intval && test_bit(DASD_FLAG_DEVICE_RO, &block->base->flags))
		return -EROFS;
	set_disk_ro(bdev->bd_disk, intval);
	return dasd_set_feature(block->base->cdev, DASD_FEATURE_READONLY, intval);
}

static int dasd_ioctl_readall_cmb(struct dasd_block *block, unsigned int cmd,
				  struct cmbdata __user *argp)
{
	size_t size = _IOC_SIZE(cmd);
	struct cmbdata data;
	int ret;

	ret = cmf_readall(block->base->cdev, &data);
	if (!ret && copy_to_user(argp, &data, min(size, sizeof(*argp))))
		return -EFAULT;
	return ret;
}

static int
dasd_do_ioctl(struct block_device *bdev, fmode_t mode,
	      unsigned int cmd, unsigned long arg)
{
	struct dasd_block *block = bdev->bd_disk->private_data;
	void __user *argp;

	if (is_compat_task())
		argp = compat_ptr(arg);
	else
		argp = (void __user *)arg;

	if (!block)
                return -ENODEV;

	if ((_IOC_DIR(cmd) != _IOC_NONE) && !arg) {
		PRINT_DEBUG("empty data ptr");
		return -EINVAL;
	}

	switch (cmd) {
	case BIODASDDISABLE:
		return dasd_ioctl_disable(bdev);
	case BIODASDENABLE:
		return dasd_ioctl_enable(bdev);
	case BIODASDQUIESCE:
		return dasd_ioctl_quiesce(block);
	case BIODASDRESUME:
		return dasd_ioctl_resume(block);
	case BIODASDFMT:
		return dasd_ioctl_format(bdev, argp);
	case BIODASDINFO:
		return dasd_ioctl_information(block, cmd, argp);
	case BIODASDINFO2:
		return dasd_ioctl_information(block, cmd, argp);
	case BIODASDPRRD:
		return dasd_ioctl_read_profile(block, argp);
	case BIODASDPRRST:
		return dasd_ioctl_reset_profile(block);
	case BLKROSET:
		return dasd_ioctl_set_ro(bdev, argp);
	case DASDAPIVER:
		return dasd_ioctl_api_version(argp);
	case BIODASDCMFENABLE:
		return enable_cmf(block->base->cdev);
	case BIODASDCMFDISABLE:
		return disable_cmf(block->base->cdev);
	case BIODASDREADALLCMB:
		return dasd_ioctl_readall_cmb(block, cmd, argp);
	default:
		/* if the discipline has an ioctl method try it. */
		if (block->base->discipline->ioctl) {
			int rval = block->base->discipline->ioctl(block, cmd, argp);
			if (rval != -ENOIOCTLCMD)
				return rval;
		}

		return -EINVAL;
	}
}

int dasd_ioctl(struct block_device *bdev, fmode_t mode,
	       unsigned int cmd, unsigned long arg)
{
	int rc;

	lock_kernel();
	rc = dasd_do_ioctl(bdev, mode, cmd, arg);
	unlock_kernel();
	return rc;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* File...........: linux/drivers/s390/block/dasd_ioctl.c
	3	* Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
	4	* Horst Hummel <Horst.Hummel@de.ibm.com>
	5	* Carsten Otte <Cotte@de.ibm.com>
	6	* Martin Schwidefsky <schwidefsky@de.ibm.com>
	7	* Bugreports.to..: <Linux390@de.ibm.com>
	8	* (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999-2001
	9	*
	10	* i/o controls for the dasd driver.
	11	*/
fc19f381 SH	12
	13	#define KMSG_COMPONENT "dasd"
	14
1da177e4 LT	15	#include <linux/interrupt.h>
	16	#include <linux/major.h>
	17	#include <linux/fs.h>
	18	#include <linux/blkpg.h>
405f5571	19	#include <linux/smp_lock.h>
5a0e3ad6	20	#include <linux/slab.h>
88034865	21	#include <asm/compat.h>
1da177e4	22	#include <asm/ccwdev.h>
8b2eb664	23	#include <asm/cmb.h>
1da177e4 LT	24	#include <asm/uaccess.h>
	25
	26	/* This is ugly... */
	27	#define PRINTK_HEADER "dasd_ioctl:"
	28
	29	#include "dasd_int.h"
	30
1da177e4	31
1da177e4	32	static int
13c6204f	33	dasd_ioctl_api_version(void __user *argp)
1da177e4 LT	34	{
1da177e4 LT	35	int ver = DASD_API_VERSION;
b5029622	36	return put_user(ver, (int __user *)argp);
1da177e4 LT	37	}
	38
	39	/*
	40	* Enable device.
	41	* used by dasdfmt after BIODASDDISABLE to retrigger blocksize detection
	42	*/
	43	static int
13c6204f	44	dasd_ioctl_enable(struct block_device *bdev)
1da177e4	45	{
8e09f215	46	struct dasd_block *block = bdev->bd_disk->private_data;
1da177e4 LT	47
	48	if (!capable(CAP_SYS_ADMIN))
	49	return -EACCES;
13c6204f	50
8e09f215	51	dasd_enable_device(block->base);
1da177e4	52	/* Formatting the dasd device can change the capacity. */
c039e313	53	mutex_lock(&bdev->bd_mutex);
8e09f215	54	i_size_write(bdev->bd_inode, (loff_t)get_capacity(block->gdp) << 9);
c039e313	55	mutex_unlock(&bdev->bd_mutex);
1da177e4 LT	56	return 0;
	57	}
	58
	59	/*
	60	* Disable device.
	61	* Used by dasdfmt. Disable I/O operations but allow ioctls.
	62	*/
	63	static int
13c6204f	64	dasd_ioctl_disable(struct block_device *bdev)
1da177e4	65	{
8e09f215	66	struct dasd_block *block = bdev->bd_disk->private_data;
1da177e4 LT	67
	68	if (!capable(CAP_SYS_ADMIN))
	69	return -EACCES;
13c6204f	70
1da177e4 LT	71	/*
	72	* Man this is sick. We don't do a real disable but only downgrade
	73	* the device to DASD_STATE_BASIC. The reason is that dasdfmt uses
	74	* BIODASDDISABLE to disable accesses to the device via the block
	75	* device layer but it still wants to do i/o on the device by
	76	* using the BIODASDFMT ioctl. Therefore the correct state for the
	77	* device is DASD_STATE_BASIC that allows to do basic i/o.
	78	*/
8e09f215	79	dasd_set_target_state(block->base, DASD_STATE_BASIC);
1da177e4 LT	80	/*
	81	* Set i_size to zero, since read, write, etc. check against this
	82	* value.
	83	*/
c039e313	84	mutex_lock(&bdev->bd_mutex);
1da177e4	85	i_size_write(bdev->bd_inode, 0);
c039e313	86	mutex_unlock(&bdev->bd_mutex);
1da177e4 LT	87	return 0;
	88	}
	89
	90	/*
	91	* Quiesce device.
	92	*/
8e09f215	93	static int dasd_ioctl_quiesce(struct dasd_block *block)
1da177e4	94	{
1da177e4	95	unsigned long flags;
8e09f215	96	struct dasd_device *base;
138c014d	97
8e09f215	98	base = block->base;
1da177e4 LT	99	if (!capable (CAP_SYS_ADMIN))
1da177e4 LT	100	return -EACCES;
138c014d	101
ca99dab0 SH	102	pr_info("%s: The DASD has been put in the quiesce "
ca99dab0 SH	103	"state\n", dev_name(&base->cdev->dev));
8e09f215	104	spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
eb6e199b	105	dasd_device_set_stop_bits(base, DASD_STOPPED_QUIESCE);
8e09f215	106	spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
1da177e4 LT	107	return 0;
	108	}
	109
	110
	111	/*
fc19f381	112	* Resume device.
1da177e4	113	*/
8e09f215	114	static int dasd_ioctl_resume(struct dasd_block *block)
1da177e4	115	{
1da177e4	116	unsigned long flags;
8e09f215	117	struct dasd_device *base;
138c014d	118
8e09f215	119	base = block->base;
138c014d	120	if (!capable (CAP_SYS_ADMIN))
1da177e4 LT	121	return -EACCES;
1da177e4 LT	122
ca99dab0 SH	123	pr_info("%s: I/O operations have been resumed "
ca99dab0 SH	124	"on the DASD\n", dev_name(&base->cdev->dev));
8e09f215	125	spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
eb6e199b	126	dasd_device_remove_stop_bits(base, DASD_STOPPED_QUIESCE);
8e09f215	127	spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
1da177e4	128
8e09f215	129	dasd_schedule_block_bh(block);
1da177e4 LT	130	return 0;
	131	}
	132
	133	/*
	134	* performs formatting of _device_ according to _fdata_
	135	* Note: The discipline's format_function is assumed to deliver formatting
	136	* commands to format a single unit of the device. In terms of the ECKD
	137	* devices this means CCWs are generated to format a single track.
	138	*/
8e09f215	139	static int dasd_format(struct dasd_block block, struct format_data_t fdata)
1da177e4 LT	140	{
1da177e4 LT	141	struct dasd_ccw_req *cqr;
8e09f215	142	struct dasd_device *base;
1da177e4 LT	143	int rc;
1da177e4 LT	144
8e09f215 SW	145	base = block->base;
8e09f215 SW	146	if (base->discipline->format_device == NULL)
1da177e4 LT	147	return -EPERM;
1da177e4 LT	148
8e09f215	149	if (base->state != DASD_STATE_BASIC) {
ca99dab0 SH	150	pr_warning("%s: The DASD cannot be formatted while it is "
ca99dab0 SH	151	"enabled\n", dev_name(&base->cdev->dev));
1da177e4 LT	152	return -EBUSY;
	153	}
	154
8e09f215	155	DBF_DEV_EVENT(DBF_NOTICE, base,
b44b0ab3	156	"formatting units %u to %u (%u B blocks) flags %u",
1da177e4 LT	157	fdata->start_unit,
	158	fdata->stop_unit, fdata->blksize, fdata->intensity);
	159
	160	/* Since dasdfmt keeps the device open after it was disabled,
	161	* there still exists an inode for this device.
	162	* We must update i_blkbits, otherwise we might get errors when
	163	* enabling the device later.
	164	*/
	165	if (fdata->start_unit == 0) {
8e09f215	166	struct block_device *bdev = bdget_disk(block->gdp, 0);
1da177e4 LT	167	bdev->bd_inode->i_blkbits = blksize_bits(fdata->blksize);
	168	bdput(bdev);
	169	}
	170
	171	while (fdata->start_unit <= fdata->stop_unit) {
8e09f215	172	cqr = base->discipline->format_device(base, fdata);
1da177e4 LT	173	if (IS_ERR(cqr))
	174	return PTR_ERR(cqr);
	175	rc = dasd_sleep_on_interruptible(cqr);
8e09f215	176	dasd_sfree_request(cqr, cqr->memdev);
1da177e4 LT	177	if (rc) {
1da177e4 LT	178	if (rc != -ERESTARTSYS)
ca99dab0 SH	179	pr_err("%s: Formatting unit %d failed with "
	180	"rc=%d\n", dev_name(&base->cdev->dev),
	181	fdata->start_unit, rc);
1da177e4 LT	182	return rc;
	183	}
	184	fdata->start_unit++;
	185	}
	186	return 0;
	187	}
	188
	189	/*
	190	* Format device.
	191	*/
	192	static int
13c6204f	193	dasd_ioctl_format(struct block_device bdev, void __user argp)
1da177e4	194	{
8e09f215	195	struct dasd_block *block = bdev->bd_disk->private_data;
1da177e4 LT	196	struct format_data_t fdata;
	197
	198	if (!capable(CAP_SYS_ADMIN))
	199	return -EACCES;
13c6204f	200	if (!argp)
1da177e4	201	return -EINVAL;
f24acd45	202
33b62a30 SW	203	if (block->base->features & DASD_FEATURE_READONLY \|\|
33b62a30 SW	204	test_bit(DASD_FLAG_DEVICE_RO, &block->base->flags))
1da177e4	205	return -EROFS;
13c6204f	206	if (copy_from_user(&fdata, argp, sizeof(struct format_data_t)))
1da177e4 LT	207	return -EFAULT;
1da177e4 LT	208	if (bdev != bdev->bd_contains) {
ca99dab0 SH	209	pr_warning("%s: The specified DASD is a partition and cannot "
	210	"be formatted\n",
	211	dev_name(&block->base->cdev->dev));
1da177e4 LT	212	return -EINVAL;
1da177e4 LT	213	}
8e09f215	214	return dasd_format(block, &fdata);
1da177e4 LT	215	}
	216
	217	#ifdef CONFIG_DASD_PROFILE
	218	/*
	219	* Reset device profile information
	220	*/
8e09f215	221	static int dasd_ioctl_reset_profile(struct dasd_block *block)
1da177e4	222	{
8e09f215	223	memset(&block->profile, 0, sizeof(struct dasd_profile_info_t));
1da177e4 LT	224	return 0;
	225	}
	226
	227	/*
	228	* Return device profile information
	229	*/
8e09f215	230	static int dasd_ioctl_read_profile(struct dasd_block block, void __user argp)
1da177e4	231	{
9a7af289 HH	232	if (dasd_profile_level == DASD_PROFILE_OFF)
9a7af289 HH	233	return -EIO;
8e09f215 SW	234	if (copy_to_user(argp, &block->profile,
8e09f215 SW	235	sizeof(struct dasd_profile_info_t)))
1da177e4 LT	236	return -EFAULT;
	237	return 0;
	238	}
	239	#else
8e09f215	240	static int dasd_ioctl_reset_profile(struct dasd_block *block)
1da177e4 LT	241	{
	242	return -ENOSYS;
	243	}
	244
8e09f215	245	static int dasd_ioctl_read_profile(struct dasd_block block, void __user argp)
1da177e4 LT	246	{
	247	return -ENOSYS;
	248	}
	249	#endif
	250
	251	/*
	252	* Return dasd information. Used for BIODASDINFO and BIODASDINFO2.
	253	*/
8e09f215 SW	254	static int dasd_ioctl_information(struct dasd_block *block,
8e09f215 SW	255	unsigned int cmd, void __user *argp)
1da177e4	256	{
1da177e4 LT	257	struct dasd_information2_t *dasd_info;
1da177e4 LT	258	unsigned long flags;
c6eb7b77	259	int rc;
8e09f215	260	struct dasd_device *base;
1da177e4	261	struct ccw_device *cdev;
9a92fe48	262	struct ccw_dev_id dev_id;
1da177e4	263
8e09f215	264	base = block->base;
294001a8	265	if (!base->discipline \|\| !base->discipline->fill_info)
1da177e4 LT	266	return -EINVAL;
1da177e4 LT	267
554a826e	268	dasd_info = kzalloc(sizeof(struct dasd_information2_t), GFP_KERNEL);
1da177e4 LT	269	if (dasd_info == NULL)
	270	return -ENOMEM;
	271
8e09f215	272	rc = base->discipline->fill_info(base, dasd_info);
1da177e4 LT	273	if (rc) {
	274	kfree(dasd_info);
	275	return rc;
	276	}
	277
8e09f215	278	cdev = base->cdev;
9a92fe48	279	ccw_device_get_id(cdev, &dev_id);
1da177e4	280
9a92fe48	281	dasd_info->devno = dev_id.devno;
8e09f215	282	dasd_info->schid = _ccw_device_get_subchannel_number(base->cdev);
1da177e4 LT	283	dasd_info->cu_type = cdev->id.cu_type;
	284	dasd_info->cu_model = cdev->id.cu_model;
	285	dasd_info->dev_type = cdev->id.dev_type;
	286	dasd_info->dev_model = cdev->id.dev_model;
8e09f215	287	dasd_info->status = base->state;
57467195 HH	288	/*
	289	* The open_count is increased for every opener, that includes
	290	* the blkdev_get in dasd_scan_partitions.
	291	* This must be hidden from user-space.
	292	*/
8e09f215 SW	293	dasd_info->open_count = atomic_read(&block->open_count);
8e09f215 SW	294	if (!block->bdev)
57467195	295	dasd_info->open_count++;
138c014d	296
1da177e4 LT	297	/*
	298	* check if device is really formatted
	299	* LDL / CDL was returned by 'fill_info'
	300	*/
8e09f215 SW	301	if ((base->state < DASD_STATE_READY) \|\|
8e09f215 SW	302	(dasd_check_blocksize(block->bp_block)))
1da177e4	303	dasd_info->format = DASD_FORMAT_NONE;
f24acd45	304
c6eb7b77	305	dasd_info->features \|=
8e09f215	306	((base->features & DASD_FEATURE_READONLY) != 0);
1da177e4	307
294001a8	308	memcpy(dasd_info->type, base->discipline->name, 4);
554a826e	309
8e09f215	310	if (block->request_queue->request_fn) {
1da177e4 LT	311	struct list_head *l;
	312	#ifdef DASD_EXTENDED_PROFILING
	313	{
	314	struct list_head *l;
8e09f215 SW	315	spin_lock_irqsave(&block->lock, flags);
8e09f215 SW	316	list_for_each(l, &block->request_queue->queue_head)
1da177e4	317	dasd_info->req_queue_len++;
8e09f215	318	spin_unlock_irqrestore(&block->lock, flags);
1da177e4 LT	319	}
1da177e4 LT	320	#endif /* DASD_EXTENDED_PROFILING */
8e09f215 SW	321	spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
8e09f215 SW	322	list_for_each(l, &base->ccw_queue)
1da177e4	323	dasd_info->chanq_len++;
8e09f215	324	spin_unlock_irqrestore(get_ccwdev_lock(base->cdev),
1da177e4 LT	325	flags);
	326	}
	327
	328	rc = 0;
13c6204f CH	329	if (copy_to_user(argp, dasd_info,
13c6204f CH	330	((cmd == (unsigned int) BIODASDINFO2) ?
8e09f215 SW	331	sizeof(struct dasd_information2_t) :
8e09f215 SW	332	sizeof(struct dasd_information_t))))
1da177e4 LT	333	rc = -EFAULT;
	334	kfree(dasd_info);
	335	return rc;
	336	}
	337
	338	/*
	339	* Set read only
	340	*/
	341	static int
13c6204f	342	dasd_ioctl_set_ro(struct block_device bdev, void __user argp)
1da177e4	343	{
8e09f215	344	struct dasd_block *block = bdev->bd_disk->private_data;
13c6204f	345	int intval;
1da177e4 LT	346
	347	if (!capable(CAP_SYS_ADMIN))
	348	return -EACCES;
	349	if (bdev != bdev->bd_contains)
	350	// ro setting is not allowed for partitions
	351	return -EINVAL;
d2c993d8	352	if (get_user(intval, (int __user *)argp))
1da177e4	353	return -EFAULT;
33b62a30 SW	354	if (!intval && test_bit(DASD_FLAG_DEVICE_RO, &block->base->flags))
33b62a30 SW	355	return -EROFS;
1da177e4	356	set_disk_ro(bdev->bd_disk, intval);
8e09f215	357	return dasd_set_feature(block->base->cdev, DASD_FEATURE_READONLY, intval);
1da177e4 LT	358	}
1da177e4 LT	359
8e09f215	360	static int dasd_ioctl_readall_cmb(struct dasd_block *block, unsigned int cmd,
88034865	361	struct cmbdata __user *argp)
8b2eb664	362	{
8b2eb664 CH	363	size_t size = _IOC_SIZE(cmd);
	364	struct cmbdata data;
	365	int ret;
	366
8e09f215	367	ret = cmf_readall(block->base->cdev, &data);
8b2eb664 CH	368	if (!ret && copy_to_user(argp, &data, min(size, sizeof(*argp))))
	369	return -EFAULT;
	370	return ret;
	371	}
	372
0000d031 HC	373	static int
	374	dasd_do_ioctl(struct block_device *bdev, fmode_t mode,
	375	unsigned int cmd, unsigned long arg)
1da177e4	376	{
8e09f215	377	struct dasd_block *block = bdev->bd_disk->private_data;
88034865 HC	378	void __user *argp;
	379
	380	if (is_compat_task())
	381	argp = compat_ptr(arg);
	382	else
	383	argp = (void __user *)arg;
1da177e4	384
8e09f215	385	if (!block)
13c6204f CH	386	return -ENODEV;
	387
	388	if ((_IOC_DIR(cmd) != _IOC_NONE) && !arg) {
	389	PRINT_DEBUG("empty data ptr");
	390	return -EINVAL;
	391	}
1da177e4	392
13c6204f CH	393	switch (cmd) {
	394	case BIODASDDISABLE:
	395	return dasd_ioctl_disable(bdev);
	396	case BIODASDENABLE:
	397	return dasd_ioctl_enable(bdev);
	398	case BIODASDQUIESCE:
8e09f215	399	return dasd_ioctl_quiesce(block);
13c6204f	400	case BIODASDRESUME:
8e09f215	401	return dasd_ioctl_resume(block);
13c6204f CH	402	case BIODASDFMT:
	403	return dasd_ioctl_format(bdev, argp);
	404	case BIODASDINFO:
8e09f215	405	return dasd_ioctl_information(block, cmd, argp);
13c6204f	406	case BIODASDINFO2:
8e09f215	407	return dasd_ioctl_information(block, cmd, argp);
13c6204f	408	case BIODASDPRRD:
8e09f215	409	return dasd_ioctl_read_profile(block, argp);
13c6204f	410	case BIODASDPRRST:
8e09f215	411	return dasd_ioctl_reset_profile(block);
13c6204f CH	412	case BLKROSET:
	413	return dasd_ioctl_set_ro(bdev, argp);
	414	case DASDAPIVER:
	415	return dasd_ioctl_api_version(argp);
8b2eb664	416	case BIODASDCMFENABLE:
8e09f215	417	return enable_cmf(block->base->cdev);
8b2eb664	418	case BIODASDCMFDISABLE:
8e09f215	419	return disable_cmf(block->base->cdev);
8b2eb664	420	case BIODASDREADALLCMB:
88034865	421	return dasd_ioctl_readall_cmb(block, cmd, argp);
13c6204f	422	default:
1107ccfb	423	/* if the discipline has an ioctl method try it. */
8e09f215 SW	424	if (block->base->discipline->ioctl) {
8e09f215 SW	425	int rval = block->base->discipline->ioctl(block, cmd, argp);
1107ccfb CH	426	if (rval != -ENOIOCTLCMD)
	427	return rval;
	428	}
	429
13c6204f CH	430	return -EINVAL;
13c6204f CH	431	}
1da177e4	432	}
0000d031 HC	433
	434	int dasd_ioctl(struct block_device *bdev, fmode_t mode,
	435	unsigned int cmd, unsigned long arg)
	436	{
	437	int rc;
	438
	439	lock_kernel();
	440	rc = dasd_do_ioctl(bdev, mode, cmd, arg);
	441	unlock_kernel();
	442	return rc;
	443	}