[deliverable/linux.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 <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)
		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->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);

	if (base->discipline)
		memcpy(dasd_info->type, base->discipline->name, 4);
	else
		memcpy(dasd_info->type, "none", 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;

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