[net-next-2.6.git] / drivers / s390 / char / tape_block.c

/*
 *  drivers/s390/char/tape_block.c
 *    block device frontend for tape device driver
 *
 *  S390 and zSeries version
 *    Copyright (C) 2001,2003 IBM Deutschland Entwicklung GmbH, IBM Corporation
 *    Author(s): Carsten Otte <cotte@de.ibm.com>
 *		 Tuan Ngo-Anh <ngoanh@de.ibm.com>
 *		 Martin Schwidefsky <schwidefsky@de.ibm.com>
 *		 Stefan Bader <shbader@de.ibm.com>
 */

#define KMSG_COMPONENT "tape"
#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt

#include <linux/fs.h>
#include <linux/module.h>
#include <linux/blkdev.h>
#include <linux/mutex.h>
#include <linux/interrupt.h>
#include <linux/buffer_head.h>
#include <linux/kernel.h>

#include <asm/debug.h>

#define TAPE_DBF_AREA	tape_core_dbf

#include "tape.h"

#define TAPEBLOCK_MAX_SEC	100
#define TAPEBLOCK_MIN_REQUEUE	3

/*
 * 2003/11/25  Stefan Bader <shbader@de.ibm.com>
 *
 * In 2.5/2.6 the block device request function is very likely to be called
 * with disabled interrupts (e.g. generic_unplug_device). So the driver can't
 * just call any function that tries to allocate CCW requests from that con-
 * text since it might sleep. There are two choices to work around this:
 *	a) do not allocate with kmalloc but use its own memory pool
 *      b) take requests from the queue outside that context, knowing that
 *         allocation might sleep
 */

/*
 * file operation structure for tape block frontend
 */
static DEFINE_MUTEX(tape_block_mutex);
static int tapeblock_open(struct block_device *, fmode_t);
static int tapeblock_release(struct gendisk *, fmode_t);
static int tapeblock_medium_changed(struct gendisk *);
static int tapeblock_revalidate_disk(struct gendisk *);

static const struct block_device_operations tapeblock_fops = {
	.owner		 = THIS_MODULE,
	.open		 = tapeblock_open,
	.release	 = tapeblock_release,
	.media_changed   = tapeblock_medium_changed,
	.revalidate_disk = tapeblock_revalidate_disk,
};

static int tapeblock_major = 0;

static void
tapeblock_trigger_requeue(struct tape_device *device)
{
	/* Protect against rescheduling. */
	if (atomic_cmpxchg(&device->blk_data.requeue_scheduled, 0, 1) != 0)
		return;
	schedule_work(&device->blk_data.requeue_task);
}

/*
 * Post finished request.
 */
static void
__tapeblock_end_request(struct tape_request *ccw_req, void *data)
{
	struct tape_device *device;
	struct request *req;

	DBF_LH(6, "__tapeblock_end_request()\n");

	device = ccw_req->device;
	req = (struct request *) data;
	blk_end_request_all(req, (ccw_req->rc == 0) ? 0 : -EIO);
	if (ccw_req->rc == 0)
		/* Update position. */
		device->blk_data.block_position =
		  (blk_rq_pos(req) + blk_rq_sectors(req)) >> TAPEBLOCK_HSEC_S2B;
	else
		/* We lost the position information due to an error. */
		device->blk_data.block_position = -1;
	device->discipline->free_bread(ccw_req);
	if (!list_empty(&device->req_queue) ||
	    blk_peek_request(device->blk_data.request_queue))
		tapeblock_trigger_requeue(device);
}

/*
 * Feed the tape device CCW queue with requests supplied in a list.
 */
static int
tapeblock_start_request(struct tape_device *device, struct request *req)
{
	struct tape_request *	ccw_req;
	int			rc;

	DBF_LH(6, "tapeblock_start_request(%p, %p)\n", device, req);

	ccw_req = device->discipline->bread(device, req);
	if (IS_ERR(ccw_req)) {
		DBF_EVENT(1, "TBLOCK: bread failed\n");
		blk_end_request_all(req, -EIO);
		return PTR_ERR(ccw_req);
	}
	ccw_req->callback = __tapeblock_end_request;
	ccw_req->callback_data = (void *) req;
	ccw_req->retries = TAPEBLOCK_RETRIES;

	rc = tape_do_io_async(device, ccw_req);
	if (rc) {
		/*
		 * Start/enqueueing failed. No retries in
		 * this case.
		 */
		blk_end_request_all(req, -EIO);
		device->discipline->free_bread(ccw_req);
	}

	return rc;
}

/*
 * Move requests from the block device request queue to the tape device ccw
 * queue.
 */
static void
tapeblock_requeue(struct work_struct *work) {
	struct tape_blk_data *	blkdat;
	struct tape_device *	device;
	struct request_queue *	queue;
	int			nr_queued;
	struct request *	req;
	struct list_head *	l;
	int			rc;

	blkdat = container_of(work, struct tape_blk_data, requeue_task);
	device = blkdat->device;
	if (!device)
		return;

	spin_lock_irq(get_ccwdev_lock(device->cdev));
	queue  = device->blk_data.request_queue;

	/* Count number of requests on ccw queue. */
	nr_queued = 0;
	list_for_each(l, &device->req_queue)
		nr_queued++;
	spin_unlock(get_ccwdev_lock(device->cdev));

	spin_lock_irq(&device->blk_data.request_queue_lock);
	while (
		!blk_queue_plugged(queue) &&
		blk_peek_request(queue) &&
		nr_queued < TAPEBLOCK_MIN_REQUEUE
	) {
		req = blk_fetch_request(queue);
		if (rq_data_dir(req) == WRITE) {
			DBF_EVENT(1, "TBLOCK: Rejecting write request\n");
			spin_unlock_irq(&device->blk_data.request_queue_lock);
			blk_end_request_all(req, -EIO);
			spin_lock_irq(&device->blk_data.request_queue_lock);
			continue;
		}
		nr_queued++;
		spin_unlock_irq(&device->blk_data.request_queue_lock);
		rc = tapeblock_start_request(device, req);
		spin_lock_irq(&device->blk_data.request_queue_lock);
	}
	spin_unlock_irq(&device->blk_data.request_queue_lock);
	atomic_set(&device->blk_data.requeue_scheduled, 0);
}

/*
 * Tape request queue function. Called from ll_rw_blk.c
 */
static void
tapeblock_request_fn(struct request_queue *queue)
{
	struct tape_device *device;

	device = (struct tape_device *) queue->queuedata;
	DBF_LH(6, "tapeblock_request_fn(device=%p)\n", device);
	BUG_ON(device == NULL);
	tapeblock_trigger_requeue(device);
}

/*
 * This function is called for every new tapedevice
 */
int
tapeblock_setup_device(struct tape_device * device)
{
	struct tape_blk_data *	blkdat;
	struct gendisk *	disk;
	int			rc;

	blkdat = &device->blk_data;
	blkdat->device = device;
	spin_lock_init(&blkdat->request_queue_lock);
	atomic_set(&blkdat->requeue_scheduled, 0);

	blkdat->request_queue = blk_init_queue(
		tapeblock_request_fn,
		&blkdat->request_queue_lock
	);
	if (!blkdat->request_queue)
		return -ENOMEM;

	rc = elevator_change(blkdat->request_queue, "noop");
	if (rc)
		goto cleanup_queue;

	blk_queue_logical_block_size(blkdat->request_queue, TAPEBLOCK_HSEC_SIZE);
	blk_queue_max_hw_sectors(blkdat->request_queue, TAPEBLOCK_MAX_SEC);
	blk_queue_max_segments(blkdat->request_queue, -1L);
	blk_queue_max_segment_size(blkdat->request_queue, -1L);
	blk_queue_segment_boundary(blkdat->request_queue, -1L);

	disk = alloc_disk(1);
	if (!disk) {
		rc = -ENOMEM;
		goto cleanup_queue;
	}

	disk->major = tapeblock_major;
	disk->first_minor = device->first_minor;
	disk->fops = &tapeblock_fops;
	disk->private_data = tape_get_device(device);
	disk->queue = blkdat->request_queue;
	set_capacity(disk, 0);
	sprintf(disk->disk_name, "btibm%d",
		device->first_minor / TAPE_MINORS_PER_DEV);

	blkdat->disk = disk;
	blkdat->medium_changed = 1;
	blkdat->request_queue->queuedata = tape_get_device(device);

	add_disk(disk);

	tape_get_device(device);
	INIT_WORK(&blkdat->requeue_task, tapeblock_requeue);

	return 0;

cleanup_queue:
	blk_cleanup_queue(blkdat->request_queue);
	blkdat->request_queue = NULL;

	return rc;
}

void
tapeblock_cleanup_device(struct tape_device *device)
{
	flush_scheduled_work();
	tape_put_device(device);

	if (!device->blk_data.disk) {
		goto cleanup_queue;
	}

	del_gendisk(device->blk_data.disk);
	device->blk_data.disk->private_data = NULL;
	tape_put_device(device);
	put_disk(device->blk_data.disk);

	device->blk_data.disk = NULL;
cleanup_queue:
	device->blk_data.request_queue->queuedata = NULL;
	tape_put_device(device);

	blk_cleanup_queue(device->blk_data.request_queue);
	device->blk_data.request_queue = NULL;
}

/*
 * Detect number of blocks of the tape.
 * FIXME: can we extent this to detect the blocks size as well ?
 */
static int
tapeblock_revalidate_disk(struct gendisk *disk)
{
	struct tape_device *	device;
	unsigned int		nr_of_blks;
	int			rc;

	device = (struct tape_device *) disk->private_data;
	BUG_ON(!device);

	if (!device->blk_data.medium_changed)
		return 0;

	rc = tape_mtop(device, MTFSFM, 1);
	if (rc)
		return rc;

	rc = tape_mtop(device, MTTELL, 1);
	if (rc < 0)
		return rc;

	pr_info("%s: Determining the size of the recorded area...\n",
		dev_name(&device->cdev->dev));
	DBF_LH(3, "Image file ends at %d\n", rc);
	nr_of_blks = rc;

	/* This will fail for the first file. Catch the error by checking the
	 * position. */
	tape_mtop(device, MTBSF, 1);

	rc = tape_mtop(device, MTTELL, 1);
	if (rc < 0)
		return rc;

	if (rc > nr_of_blks)
		return -EINVAL;

	DBF_LH(3, "Image file starts at %d\n", rc);
	device->bof = rc;
	nr_of_blks -= rc;

	pr_info("%s: The size of the recorded area is %i blocks\n",
		dev_name(&device->cdev->dev), nr_of_blks);
	set_capacity(device->blk_data.disk,
		nr_of_blks*(TAPEBLOCK_HSEC_SIZE/512));

	device->blk_data.block_position = 0;
	device->blk_data.medium_changed = 0;
	return 0;
}

static int
tapeblock_medium_changed(struct gendisk *disk)
{
	struct tape_device *device;

	device = (struct tape_device *) disk->private_data;
	DBF_LH(6, "tapeblock_medium_changed(%p) = %d\n",
		device, device->blk_data.medium_changed);

	return device->blk_data.medium_changed;
}

/*
 * Block frontend tape device open function.
 */
static int
tapeblock_open(struct block_device *bdev, fmode_t mode)
{
	struct gendisk *	disk = bdev->bd_disk;
	struct tape_device *	device;
	int			rc;

	mutex_lock(&tape_block_mutex);
	device = tape_get_device(disk->private_data);

	if (device->required_tapemarks) {
		DBF_EVENT(2, "TBLOCK: missing tapemarks\n");
		pr_warning("%s: Opening the tape failed because of missing "
			   "end-of-file marks\n", dev_name(&device->cdev->dev));
		rc = -EPERM;
		goto put_device;
	}

	rc = tape_open(device);
	if (rc)
		goto put_device;

	rc = tapeblock_revalidate_disk(disk);
	if (rc)
		goto release;

	/*
	 * Note: The reference to <device> is hold until the release function
	 *       is called.
	 */
	tape_state_set(device, TS_BLKUSE);
	mutex_unlock(&tape_block_mutex);
	return 0;

release:
	tape_release(device);
 put_device:
	tape_put_device(device);
	mutex_unlock(&tape_block_mutex);
	return rc;
}

/*
 * Block frontend tape device release function.
 *
 * Note: One reference to the tape device was made by the open function. So
 *       we just get the pointer here and release the reference.
 */
static int
tapeblock_release(struct gendisk *disk, fmode_t mode)
{
	struct tape_device *device = disk->private_data;
 
	mutex_lock(&tape_block_mutex);
	tape_state_set(device, TS_IN_USE);
	tape_release(device);
	tape_put_device(device);
	mutex_unlock(&tape_block_mutex);

	return 0;
}

/*
 * Initialize block device frontend.
 */
int
tapeblock_init(void)
{
	int rc;

	/* Register the tape major number to the kernel */
	rc = register_blkdev(tapeblock_major, "tBLK");
	if (rc < 0)
		return rc;

	if (tapeblock_major == 0)
		tapeblock_major = rc;
	return 0;
}

/*
 * Deregister major for block device frontend
 */
void
tapeblock_exit(void)
{
	unregister_blkdev(tapeblock_major, "tBLK");
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* drivers/s390/char/tape_block.c
	3	* block device frontend for tape device driver
	4	*
	5	* S390 and zSeries version
	6	* Copyright (C) 2001,2003 IBM Deutschland Entwicklung GmbH, IBM Corporation
	7	* Author(s): Carsten Otte <cotte@de.ibm.com>
	8	* Tuan Ngo-Anh <ngoanh@de.ibm.com>
	9	* Martin Schwidefsky <schwidefsky@de.ibm.com>
	10	* Stefan Bader <shbader@de.ibm.com>
	11	*/
	12
ab640db0	13	#define KMSG_COMPONENT "tape"
bb509912	14	#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
ab640db0	15
1da177e4	16	#include <linux/fs.h>
1da177e4 LT	17	#include <linux/module.h>
1da177e4 LT	18	#include <linux/blkdev.h>
2a48fc0a	19	#include <linux/mutex.h>
1da177e4 LT	20	#include <linux/interrupt.h>
1da177e4 LT	21	#include <linux/buffer_head.h>
c1637532	22	#include <linux/kernel.h>
1da177e4 LT	23
	24	#include <asm/debug.h>
	25
	26	#define TAPE_DBF_AREA tape_core_dbf
	27
	28	#include "tape.h"
	29
1da177e4 LT	30	#define TAPEBLOCK_MAX_SEC 100
	31	#define TAPEBLOCK_MIN_REQUEUE 3
	32
	33	/*
	34	* 2003/11/25 Stefan Bader <shbader@de.ibm.com>
	35	*
	36	* In 2.5/2.6 the block device request function is very likely to be called
	37	* with disabled interrupts (e.g. generic_unplug_device). So the driver can't
	38	* just call any function that tries to allocate CCW requests from that con-
	39	* text since it might sleep. There are two choices to work around this:
	40	* a) do not allocate with kmalloc but use its own memory pool
	41	* b) take requests from the queue outside that context, knowing that
	42	* allocation might sleep
	43	*/
	44
	45	/*
	46	* file operation structure for tape block frontend
	47	*/
2a48fc0a	48	static DEFINE_MUTEX(tape_block_mutex);
4e999af9 AV	49	static int tapeblock_open(struct block_device *, fmode_t);
4e999af9 AV	50	static int tapeblock_release(struct gendisk *, fmode_t);
1da177e4 LT	51	static int tapeblock_medium_changed(struct gendisk *);
	52	static int tapeblock_revalidate_disk(struct gendisk *);
	53
83d5cde4	54	static const struct block_device_operations tapeblock_fops = {
1da177e4	55	.owner = THIS_MODULE,
4e999af9 AV	56	.open = tapeblock_open,
4e999af9 AV	57	.release = tapeblock_release,
1da177e4 LT	58	.media_changed = tapeblock_medium_changed,
	59	.revalidate_disk = tapeblock_revalidate_disk,
	60	};
	61
	62	static int tapeblock_major = 0;
	63
	64	static void
	65	tapeblock_trigger_requeue(struct tape_device *device)
	66	{
	67	/* Protect against rescheduling. */
973bd993	68	if (atomic_cmpxchg(&device->blk_data.requeue_scheduled, 0, 1) != 0)
1da177e4 LT	69	return;
	70	schedule_work(&device->blk_data.requeue_task);
	71	}
	72
	73	/*
	74	* Post finished request.
	75	*/
1da177e4 LT	76	static void
	77	__tapeblock_end_request(struct tape_request ccw_req, void data)
	78	{
	79	struct tape_device *device;
	80	struct request *req;
	81
	82	DBF_LH(6, "__tapeblock_end_request()\n");
	83
	84	device = ccw_req->device;
	85	req = (struct request *) data;
40cbbb78	86	blk_end_request_all(req, (ccw_req->rc == 0) ? 0 : -EIO);
1da177e4 LT	87	if (ccw_req->rc == 0)
	88	/* Update position. */
	89	device->blk_data.block_position =
83096ebf	90	(blk_rq_pos(req) + blk_rq_sectors(req)) >> TAPEBLOCK_HSEC_S2B;
1da177e4 LT	91	else
	92	/* We lost the position information due to an error. */
	93	device->blk_data.block_position = -1;
	94	device->discipline->free_bread(ccw_req);
	95	if (!list_empty(&device->req_queue) \|\|
9934c8c0	96	blk_peek_request(device->blk_data.request_queue))
1da177e4 LT	97	tapeblock_trigger_requeue(device);
	98	}
	99
	100	/*
	101	* Feed the tape device CCW queue with requests supplied in a list.
	102	*/
4d284cac	103	static int
1da177e4 LT	104	tapeblock_start_request(struct tape_device device, struct request req)
	105	{
	106	struct tape_request * ccw_req;
	107	int rc;
	108
	109	DBF_LH(6, "tapeblock_start_request(%p, %p)\n", device, req);
	110
	111	ccw_req = device->discipline->bread(device, req);
	112	if (IS_ERR(ccw_req)) {
	113	DBF_EVENT(1, "TBLOCK: bread failed\n");
40cbbb78	114	blk_end_request_all(req, -EIO);
1da177e4 LT	115	return PTR_ERR(ccw_req);
	116	}
	117	ccw_req->callback = __tapeblock_end_request;
	118	ccw_req->callback_data = (void *) req;
	119	ccw_req->retries = TAPEBLOCK_RETRIES;
	120
	121	rc = tape_do_io_async(device, ccw_req);
	122	if (rc) {
	123	/*
	124	* Start/enqueueing failed. No retries in
	125	* this case.
	126	*/
40cbbb78	127	blk_end_request_all(req, -EIO);
1da177e4 LT	128	device->discipline->free_bread(ccw_req);
	129	}
	130
	131	return rc;
	132	}
	133
	134	/*
	135	* Move requests from the block device request queue to the tape device ccw
	136	* queue.
	137	*/
	138	static void
c1637532 MS	139	tapeblock_requeue(struct work_struct *work) {
c1637532 MS	140	struct tape_blk_data * blkdat;
1da177e4	141	struct tape_device * device;
165125e1	142	struct request_queue * queue;
1da177e4 LT	143	int nr_queued;
	144	struct request * req;
	145	struct list_head * l;
	146	int rc;
	147
c1637532 MS	148	blkdat = container_of(work, struct tape_blk_data, requeue_task);
c1637532 MS	149	device = blkdat->device;
1da177e4 LT	150	if (!device)
	151	return;
	152
	153	spin_lock_irq(get_ccwdev_lock(device->cdev));
	154	queue = device->blk_data.request_queue;
	155
	156	/* Count number of requests on ccw queue. */
	157	nr_queued = 0;
	158	list_for_each(l, &device->req_queue)
	159	nr_queued++;
	160	spin_unlock(get_ccwdev_lock(device->cdev));
	161
7a4a1ccd	162	spin_lock_irq(&device->blk_data.request_queue_lock);
1da177e4 LT	163	while (
1da177e4 LT	164	!blk_queue_plugged(queue) &&
03cadd36	165	blk_peek_request(queue) &&
1da177e4 LT	166	nr_queued < TAPEBLOCK_MIN_REQUEUE
1da177e4 LT	167	) {
03cadd36	168	req = blk_fetch_request(queue);
1da177e4 LT	169	if (rq_data_dir(req) == WRITE) {
1da177e4 LT	170	DBF_EVENT(1, "TBLOCK: Rejecting write request\n");
7a4a1ccd	171	spin_unlock_irq(&device->blk_data.request_queue_lock);
40cbbb78	172	blk_end_request_all(req, -EIO);
7a4a1ccd	173	spin_lock_irq(&device->blk_data.request_queue_lock);
1da177e4 LT	174	continue;
1da177e4 LT	175	}
f71ad62a	176	nr_queued++;
1da177e4 LT	177	spin_unlock_irq(&device->blk_data.request_queue_lock);
	178	rc = tapeblock_start_request(device, req);
	179	spin_lock_irq(&device->blk_data.request_queue_lock);
1da177e4 LT	180	}
	181	spin_unlock_irq(&device->blk_data.request_queue_lock);
	182	atomic_set(&device->blk_data.requeue_scheduled, 0);
	183	}
	184
	185	/*
	186	* Tape request queue function. Called from ll_rw_blk.c
	187	*/
	188	static void
165125e1	189	tapeblock_request_fn(struct request_queue *queue)
1da177e4 LT	190	{
	191	struct tape_device *device;
	192
	193	device = (struct tape_device *) queue->queuedata;
	194	DBF_LH(6, "tapeblock_request_fn(device=%p)\n", device);
3a8dc893	195	BUG_ON(device == NULL);
1da177e4 LT	196	tapeblock_trigger_requeue(device);
	197	}
	198
	199	/*
	200	* This function is called for every new tapedevice
	201	*/
	202	int
	203	tapeblock_setup_device(struct tape_device * device)
	204	{
	205	struct tape_blk_data * blkdat;
	206	struct gendisk * disk;
	207	int rc;
	208
	209	blkdat = &device->blk_data;
c1637532	210	blkdat->device = device;
1da177e4 LT	211	spin_lock_init(&blkdat->request_queue_lock);
	212	atomic_set(&blkdat->requeue_scheduled, 0);
	213
	214	blkdat->request_queue = blk_init_queue(
	215	tapeblock_request_fn,
	216	&blkdat->request_queue_lock
	217	);
	218	if (!blkdat->request_queue)
	219	return -ENOMEM;
	220
52cc2eef	221	rc = elevator_change(blkdat->request_queue, "noop");
1da177e4 LT	222	if (rc)
	223	goto cleanup_queue;
	224
e1defc4f	225	blk_queue_logical_block_size(blkdat->request_queue, TAPEBLOCK_HSEC_SIZE);
086fa5ff	226	blk_queue_max_hw_sectors(blkdat->request_queue, TAPEBLOCK_MAX_SEC);
8a78362c	227	blk_queue_max_segments(blkdat->request_queue, -1L);
1da177e4 LT	228	blk_queue_max_segment_size(blkdat->request_queue, -1L);
	229	blk_queue_segment_boundary(blkdat->request_queue, -1L);
	230
	231	disk = alloc_disk(1);
	232	if (!disk) {
	233	rc = -ENOMEM;
	234	goto cleanup_queue;
	235	}
	236
	237	disk->major = tapeblock_major;
	238	disk->first_minor = device->first_minor;
	239	disk->fops = &tapeblock_fops;
8fd138c3	240	disk->private_data = tape_get_device(device);
1da177e4 LT	241	disk->queue = blkdat->request_queue;
	242	set_capacity(disk, 0);
	243	sprintf(disk->disk_name, "btibm%d",
	244	device->first_minor / TAPE_MINORS_PER_DEV);
	245
	246	blkdat->disk = disk;
	247	blkdat->medium_changed = 1;
8fd138c3	248	blkdat->request_queue->queuedata = tape_get_device(device);
1da177e4 LT	249
	250	add_disk(disk);
	251
8fd138c3	252	tape_get_device(device);
c1637532	253	INIT_WORK(&blkdat->requeue_task, tapeblock_requeue);
1da177e4 LT	254
	255	return 0;
	256
	257	cleanup_queue:
	258	blk_cleanup_queue(blkdat->request_queue);
	259	blkdat->request_queue = NULL;
	260
	261	return rc;
	262	}
	263
	264	void
	265	tapeblock_cleanup_device(struct tape_device *device)
	266	{
	267	flush_scheduled_work();
c1637532	268	tape_put_device(device);
1da177e4 LT	269
1da177e4 LT	270	if (!device->blk_data.disk) {
1da177e4 LT	271	goto cleanup_queue;
	272	}
	273
	274	del_gendisk(device->blk_data.disk);
8fd138c3 MS	275	device->blk_data.disk->private_data = NULL;
8fd138c3 MS	276	tape_put_device(device);
1da177e4 LT	277	put_disk(device->blk_data.disk);
	278
	279	device->blk_data.disk = NULL;
	280	cleanup_queue:
8fd138c3 MS	281	device->blk_data.request_queue->queuedata = NULL;
8fd138c3 MS	282	tape_put_device(device);
1da177e4 LT	283
	284	blk_cleanup_queue(device->blk_data.request_queue);
	285	device->blk_data.request_queue = NULL;
	286	}
	287
	288	/*
	289	* Detect number of blocks of the tape.
	290	* FIXME: can we extent this to detect the blocks size as well ?
	291	*/
	292	static int
	293	tapeblock_revalidate_disk(struct gendisk *disk)
	294	{
	295	struct tape_device * device;
	296	unsigned int nr_of_blks;
	297	int rc;
	298
	299	device = (struct tape_device *) disk->private_data;
3a8dc893	300	BUG_ON(!device);
1da177e4 LT	301
	302	if (!device->blk_data.medium_changed)
	303	return 0;
	304
1da177e4 LT	305	rc = tape_mtop(device, MTFSFM, 1);
	306	if (rc)
	307	return rc;
	308
	309	rc = tape_mtop(device, MTTELL, 1);
	310	if (rc < 0)
	311	return rc;
	312
59e36927 MH	313	pr_info("%s: Determining the size of the recorded area...\n",
59e36927 MH	314	dev_name(&device->cdev->dev));
1da177e4 LT	315	DBF_LH(3, "Image file ends at %d\n", rc);
	316	nr_of_blks = rc;
	317
	318	/* This will fail for the first file. Catch the error by checking the
	319	* position. */
	320	tape_mtop(device, MTBSF, 1);
	321
	322	rc = tape_mtop(device, MTTELL, 1);
	323	if (rc < 0)
	324	return rc;
	325
	326	if (rc > nr_of_blks)
	327	return -EINVAL;
	328
	329	DBF_LH(3, "Image file starts at %d\n", rc);
	330	device->bof = rc;
	331	nr_of_blks -= rc;
	332
59e36927 MH	333	pr_info("%s: The size of the recorded area is %i blocks\n",
59e36927 MH	334	dev_name(&device->cdev->dev), nr_of_blks);
1da177e4 LT	335	set_capacity(device->blk_data.disk,
	336	nr_of_blks*(TAPEBLOCK_HSEC_SIZE/512));
	337
	338	device->blk_data.block_position = 0;
	339	device->blk_data.medium_changed = 0;
	340	return 0;
	341	}
	342
	343	static int
	344	tapeblock_medium_changed(struct gendisk *disk)
	345	{
	346	struct tape_device *device;
	347
	348	device = (struct tape_device *) disk->private_data;
	349	DBF_LH(6, "tapeblock_medium_changed(%p) = %d\n",
	350	device, device->blk_data.medium_changed);
	351
	352	return device->blk_data.medium_changed;
	353	}
	354
	355	/*
	356	* Block frontend tape device open function.
	357	*/
	358	static int
4e999af9	359	tapeblock_open(struct block_device *bdev, fmode_t mode)
1da177e4	360	{
4e999af9	361	struct gendisk * disk = bdev->bd_disk;
1da177e4 LT	362	struct tape_device * device;
	363	int rc;
	364
2a48fc0a	365	mutex_lock(&tape_block_mutex);
8fd138c3	366	device = tape_get_device(disk->private_data);
1da177e4 LT	367
	368	if (device->required_tapemarks) {
	369	DBF_EVENT(2, "TBLOCK: missing tapemarks\n");
59e36927 MH	370	pr_warning("%s: Opening the tape failed because of missing "
59e36927 MH	371	"end-of-file marks\n", dev_name(&device->cdev->dev));
1da177e4 LT	372	rc = -EPERM;
	373	goto put_device;
	374	}
	375
	376	rc = tape_open(device);
	377	if (rc)
	378	goto put_device;
	379
	380	rc = tapeblock_revalidate_disk(disk);
	381	if (rc)
	382	goto release;
	383
	384	/*
	385	* Note: The reference to <device> is hold until the release function
	386	* is called.
	387	*/
	388	tape_state_set(device, TS_BLKUSE);
2a48fc0a	389	mutex_unlock(&tape_block_mutex);
1da177e4 LT	390	return 0;
	391
	392	release:
	393	tape_release(device);
	394	put_device:
	395	tape_put_device(device);
2a48fc0a	396	mutex_unlock(&tape_block_mutex);
1da177e4 LT	397	return rc;
	398	}
	399
	400	/*
	401	* Block frontend tape device release function.
	402	*
	403	* Note: One reference to the tape device was made by the open function. So
	404	* we just get the pointer here and release the reference.
	405	*/
	406	static int
4e999af9	407	tapeblock_release(struct gendisk *disk, fmode_t mode)
1da177e4	408	{
1da177e4	409	struct tape_device *device = disk->private_data;
6e9624b8	410
2a48fc0a	411	mutex_lock(&tape_block_mutex);
1da177e4 LT	412	tape_state_set(device, TS_IN_USE);
	413	tape_release(device);
	414	tape_put_device(device);
2a48fc0a	415	mutex_unlock(&tape_block_mutex);
1da177e4 LT	416
	417	return 0;
	418	}
	419
1da177e4 LT	420	/*
	421	* Initialize block device frontend.
	422	*/
	423	int
	424	tapeblock_init(void)
	425	{
	426	int rc;
	427
	428	/* Register the tape major number to the kernel */
	429	rc = register_blkdev(tapeblock_major, "tBLK");
	430	if (rc < 0)
	431	return rc;
	432
	433	if (tapeblock_major == 0)
	434	tapeblock_major = rc;
1da177e4 LT	435	return 0;
	436	}
	437
	438	/*
	439	* Deregister major for block device frontend
	440	*/
	441	void
	442	tapeblock_exit(void)
	443	{
	444	unregister_blkdev(tapeblock_major, "tBLK");
	445	}