1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2012, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  */
36 
37 /*
38  *  linux/drivers/block/loop.c
39  *
40  *  Written by Theodore Ts'o, 3/29/93
41  *
42  * Copyright 1993 by Theodore Ts'o.  Redistribution of this file is
43  * permitted under the GNU General Public License.
44  *
45  * Modularized and updated for 1.1.16 kernel - Mitch Dsouza 28th May 1994
46  * Adapted for 1.3.59 kernel - Andries Brouwer, 1 Feb 1996
47  *
48  * Fixed do_loop_request() re-entrancy - Vincent.Renardias@waw.com Mar 20, 1997
49  *
50  * Added devfs support - Richard Gooch <rgooch@atnf.csiro.au> 16-Jan-1998
51  *
52  * Handle sparse backing files correctly - Kenn Humborg, Jun 28, 1998
53  *
54  * Loadable modules and other fixes by AK, 1998
55  *
56  * Maximum number of loop devices now dynamic via max_loop module parameter.
57  * Russell Kroll <rkroll@exploits.org> 19990701
58  *
59  * Maximum number of loop devices when compiled-in now selectable by passing
60  * max_loop=<1-255> to the kernel on boot.
61  * Erik I. Bols?, <eriki@himolde.no>, Oct 31, 1999
62  *
63  * Completely rewrite request handling to be make_request_fn style and
64  * non blocking, pushing work to a helper thread. Lots of fixes from
65  * Al Viro too.
66  * Jens Axboe <axboe@suse.de>, Nov 2000
67  *
68  * Support up to 256 loop devices
69  * Heinz Mauelshagen <mge@sistina.com>, Feb 2002
70  *
71  * Support for falling back on the write file operation when the address space
72  * operations prepare_write and/or commit_write are not available on the
73  * backing filesystem.
74  * Anton Altaparmakov, 16 Feb 2005
75  *
76  * Still To Fix:
77  * - Advisory locking is ignored here.
78  * - Should use an own CAP_* category instead of CAP_SYS_ADMIN
79  *
80  */
81 
82 #include <linux/module.h>
83 
84 #include <linux/sched.h>
85 #include <linux/fs.h>
86 #include <linux/file.h>
87 #include <linux/stat.h>
88 #include <linux/errno.h>
89 #include <linux/major.h>
90 #include <linux/wait.h>
91 #include <linux/blkdev.h>
92 #include <linux/blkpg.h>
93 #include <linux/init.h>
94 #include <linux/swap.h>
95 #include <linux/slab.h>
96 #include <linux/suspend.h>
97 #include <linux/writeback.h>
98 #include <linux/buffer_head.h>		/* for invalidate_bdev() */
99 #include <linux/completion.h>
100 #include <linux/highmem.h>
101 #include <linux/gfp.h>
102 #include <linux/pagevec.h>
103 #include <linux/uaccess.h>
104 
105 #include "../include/lustre_lib.h"
106 #include "../include/lustre_lite.h"
107 #include "llite_internal.h"
108 
109 #define LLOOP_MAX_SEGMENTS	LNET_MAX_IOV
110 
111 /* Possible states of device */
112 enum {
113 	LLOOP_UNBOUND,
114 	LLOOP_BOUND,
115 	LLOOP_RUNDOWN,
116 };
117 
118 struct lloop_device {
119 	int		  lo_number;
120 	int		  lo_refcnt;
121 	loff_t	       lo_offset;
122 	loff_t	       lo_sizelimit;
123 	int		  lo_flags;
124 	struct file	 *lo_backing_file;
125 	struct block_device *lo_device;
126 	unsigned	     lo_blocksize;
127 
128 	gfp_t		  old_gfp_mask;
129 
130 	spinlock_t		lo_lock;
131 	struct bio		*lo_bio;
132 	struct bio		*lo_biotail;
133 	int			lo_state;
134 	struct semaphore	lo_sem;
135 	struct mutex		lo_ctl_mutex;
136 	atomic_t	 lo_pending;
137 	wait_queue_head_t	  lo_bh_wait;
138 
139 	struct request_queue *lo_queue;
140 
141 	const struct lu_env *lo_env;
142 	struct cl_io	 lo_io;
143 	struct ll_dio_pages  lo_pvec;
144 
145 	/* data to handle bio for lustre. */
146 	struct lo_request_data {
147 		struct page *lrd_pages[LLOOP_MAX_SEGMENTS];
148 		loff_t       lrd_offsets[LLOOP_MAX_SEGMENTS];
149 	} lo_requests[1];
150 };
151 
152 /*
153  * Loop flags
154  */
155 enum {
156 	LO_FLAGS_READ_ONLY       = 1,
157 };
158 
159 static int lloop_major;
160 #define MAX_LOOP_DEFAULT  16
161 static int max_loop = MAX_LOOP_DEFAULT;
162 static struct lloop_device *loop_dev;
163 static struct gendisk **disks;
164 static struct mutex lloop_mutex;
165 static void *ll_iocontrol_magic = NULL;
166 
get_loop_size(struct lloop_device * lo,struct file * file)167 static loff_t get_loop_size(struct lloop_device *lo, struct file *file)
168 {
169 	loff_t size, offset, loopsize;
170 
171 	/* Compute loopsize in bytes */
172 	size = i_size_read(file->f_mapping->host);
173 	offset = lo->lo_offset;
174 	loopsize = size - offset;
175 	if (lo->lo_sizelimit > 0 && lo->lo_sizelimit < loopsize)
176 		loopsize = lo->lo_sizelimit;
177 
178 	/*
179 	 * Unfortunately, if we want to do I/O on the device,
180 	 * the number of 512-byte sectors has to fit into a sector_t.
181 	 */
182 	return loopsize >> 9;
183 }
184 
do_bio_lustrebacked(struct lloop_device * lo,struct bio * head)185 static int do_bio_lustrebacked(struct lloop_device *lo, struct bio *head)
186 {
187 	const struct lu_env  *env   = lo->lo_env;
188 	struct cl_io	 *io    = &lo->lo_io;
189 	struct inode	 *inode = file_inode(lo->lo_backing_file);
190 	struct cl_object     *obj = ll_i2info(inode)->lli_clob;
191 	pgoff_t	       offset;
192 	int		   ret;
193 	int		   rw;
194 	u32		   page_count = 0;
195 	struct bio_vec       bvec;
196 	struct bvec_iter   iter;
197 	struct bio	   *bio;
198 	ssize_t	       bytes;
199 
200 	struct ll_dio_pages  *pvec = &lo->lo_pvec;
201 	struct page	 **pages = pvec->ldp_pages;
202 	loff_t	       *offsets = pvec->ldp_offsets;
203 
204 	truncate_inode_pages(inode->i_mapping, 0);
205 
206 	/* initialize the IO */
207 	memset(io, 0, sizeof(*io));
208 	io->ci_obj = obj;
209 	ret = cl_io_init(env, io, CIT_MISC, obj);
210 	if (ret)
211 		return io->ci_result;
212 	io->ci_lockreq = CILR_NEVER;
213 
214 	LASSERT(head != NULL);
215 	rw = head->bi_rw;
216 	for (bio = head; bio != NULL; bio = bio->bi_next) {
217 		LASSERT(rw == bio->bi_rw);
218 
219 		offset = (pgoff_t)(bio->bi_iter.bi_sector << 9) + lo->lo_offset;
220 		bio_for_each_segment(bvec, bio, iter) {
221 			BUG_ON(bvec.bv_offset != 0);
222 			BUG_ON(bvec.bv_len != PAGE_CACHE_SIZE);
223 
224 			pages[page_count] = bvec.bv_page;
225 			offsets[page_count] = offset;
226 			page_count++;
227 			offset += bvec.bv_len;
228 		}
229 		LASSERT(page_count <= LLOOP_MAX_SEGMENTS);
230 	}
231 
232 	ll_stats_ops_tally(ll_i2sbi(inode),
233 			(rw == WRITE) ? LPROC_LL_BRW_WRITE : LPROC_LL_BRW_READ,
234 			page_count);
235 
236 	pvec->ldp_size = page_count << PAGE_CACHE_SHIFT;
237 	pvec->ldp_nr = page_count;
238 
239 	/* FIXME: in ll_direct_rw_pages, it has to allocate many cl_page{}s to
240 	 * write those pages into OST. Even worse case is that more pages
241 	 * would be asked to write out to swap space, and then finally get here
242 	 * again.
243 	 * Unfortunately this is NOT easy to fix.
244 	 * Thoughts on solution:
245 	 * 0. Define a reserved pool for cl_pages, which could be a list of
246 	 *    pre-allocated cl_pages;
247 	 * 1. Define a new operation in cl_object_operations{}, says clo_depth,
248 	 *    which measures how many layers for this lustre object. Generally
249 	 *    speaking, the depth would be 2, one for llite, and one for lovsub.
250 	 *    However, for SNS, there will be more since we need additional page
251 	 *    to store parity;
252 	 * 2. Reserve the # of (page_count * depth) cl_pages from the reserved
253 	 *    pool. Afterwards, the clio would allocate the pages from reserved
254 	 *    pool, this guarantees we needn't allocate the cl_pages from
255 	 *    generic cl_page slab cache.
256 	 *    Of course, if there is NOT enough pages in the pool, we might
257 	 *    be asked to write less pages once, this purely depends on
258 	 *    implementation. Anyway, we should be careful to avoid deadlocking.
259 	 */
260 	mutex_lock(&inode->i_mutex);
261 	bytes = ll_direct_rw_pages(env, io, rw, inode, pvec);
262 	mutex_unlock(&inode->i_mutex);
263 	cl_io_fini(env, io);
264 	return (bytes == pvec->ldp_size) ? 0 : (int)bytes;
265 }
266 
267 /*
268  * Add bio to back of pending list
269  */
loop_add_bio(struct lloop_device * lo,struct bio * bio)270 static void loop_add_bio(struct lloop_device *lo, struct bio *bio)
271 {
272 	unsigned long flags;
273 
274 	spin_lock_irqsave(&lo->lo_lock, flags);
275 	if (lo->lo_biotail) {
276 		lo->lo_biotail->bi_next = bio;
277 		lo->lo_biotail = bio;
278 	} else
279 		lo->lo_bio = lo->lo_biotail = bio;
280 	spin_unlock_irqrestore(&lo->lo_lock, flags);
281 
282 	atomic_inc(&lo->lo_pending);
283 	if (waitqueue_active(&lo->lo_bh_wait))
284 		wake_up(&lo->lo_bh_wait);
285 }
286 
287 /*
288  * Grab first pending buffer
289  */
loop_get_bio(struct lloop_device * lo,struct bio ** req)290 static unsigned int loop_get_bio(struct lloop_device *lo, struct bio **req)
291 {
292 	struct bio *first;
293 	struct bio **bio;
294 	unsigned int count = 0;
295 	unsigned int page_count = 0;
296 	int rw;
297 
298 	spin_lock_irq(&lo->lo_lock);
299 	first = lo->lo_bio;
300 	if (unlikely(first == NULL)) {
301 		spin_unlock_irq(&lo->lo_lock);
302 		return 0;
303 	}
304 
305 	/* TODO: need to split the bio, too bad. */
306 	LASSERT(first->bi_vcnt <= LLOOP_MAX_SEGMENTS);
307 
308 	rw = first->bi_rw;
309 	bio = &lo->lo_bio;
310 	while (*bio && (*bio)->bi_rw == rw) {
311 		CDEBUG(D_INFO, "bio sector %llu size %u count %u vcnt%u \n",
312 		       (unsigned long long)(*bio)->bi_iter.bi_sector,
313 		       (*bio)->bi_iter.bi_size,
314 		       page_count, (*bio)->bi_vcnt);
315 		if (page_count + (*bio)->bi_vcnt > LLOOP_MAX_SEGMENTS)
316 			break;
317 
318 
319 		page_count += (*bio)->bi_vcnt;
320 		count++;
321 		bio = &(*bio)->bi_next;
322 	}
323 	if (*bio) {
324 		/* Some of bios can't be mergeable. */
325 		lo->lo_bio = *bio;
326 		*bio = NULL;
327 	} else {
328 		/* Hit the end of queue */
329 		lo->lo_biotail = NULL;
330 		lo->lo_bio = NULL;
331 	}
332 	*req = first;
333 	spin_unlock_irq(&lo->lo_lock);
334 	return count;
335 }
336 
loop_make_request(struct request_queue * q,struct bio * old_bio)337 static void loop_make_request(struct request_queue *q, struct bio *old_bio)
338 {
339 	struct lloop_device *lo = q->queuedata;
340 	int rw = bio_rw(old_bio);
341 	int inactive;
342 
343 	if (!lo)
344 		goto err;
345 
346 	CDEBUG(D_INFO, "submit bio sector %llu size %u\n",
347 	       (unsigned long long)old_bio->bi_iter.bi_sector,
348 	       old_bio->bi_iter.bi_size);
349 
350 	spin_lock_irq(&lo->lo_lock);
351 	inactive = lo->lo_state != LLOOP_BOUND;
352 	spin_unlock_irq(&lo->lo_lock);
353 	if (inactive)
354 		goto err;
355 
356 	if (rw == WRITE) {
357 		if (lo->lo_flags & LO_FLAGS_READ_ONLY)
358 			goto err;
359 	} else if (rw == READA) {
360 		rw = READ;
361 	} else if (rw != READ) {
362 		CERROR("lloop: unknown command (%x)\n", rw);
363 		goto err;
364 	}
365 	loop_add_bio(lo, old_bio);
366 	return;
367 err:
368 	cfs_bio_io_error(old_bio, old_bio->bi_iter.bi_size);
369 }
370 
371 
loop_handle_bio(struct lloop_device * lo,struct bio * bio)372 static inline void loop_handle_bio(struct lloop_device *lo, struct bio *bio)
373 {
374 	int ret;
375 	ret = do_bio_lustrebacked(lo, bio);
376 	while (bio) {
377 		struct bio *tmp = bio->bi_next;
378 		bio->bi_next = NULL;
379 		cfs_bio_endio(bio, bio->bi_iter.bi_size, ret);
380 		bio = tmp;
381 	}
382 }
383 
loop_active(struct lloop_device * lo)384 static inline int loop_active(struct lloop_device *lo)
385 {
386 	return atomic_read(&lo->lo_pending) ||
387 		(lo->lo_state == LLOOP_RUNDOWN);
388 }
389 
390 /*
391  * worker thread that handles reads/writes to file backed loop devices,
392  * to avoid blocking in our make_request_fn.
393  */
loop_thread(void * data)394 static int loop_thread(void *data)
395 {
396 	struct lloop_device *lo = data;
397 	struct bio *bio;
398 	unsigned int count;
399 	unsigned long times = 0;
400 	unsigned long total_count = 0;
401 
402 	struct lu_env *env;
403 	int refcheck;
404 	int ret = 0;
405 
406 	set_user_nice(current, MIN_NICE);
407 
408 	lo->lo_state = LLOOP_BOUND;
409 
410 	env = cl_env_get(&refcheck);
411 	if (IS_ERR(env)) {
412 		ret = PTR_ERR(env);
413 		goto out;
414 	}
415 
416 	lo->lo_env = env;
417 	memset(&lo->lo_pvec, 0, sizeof(lo->lo_pvec));
418 	lo->lo_pvec.ldp_pages   = lo->lo_requests[0].lrd_pages;
419 	lo->lo_pvec.ldp_offsets = lo->lo_requests[0].lrd_offsets;
420 
421 	/*
422 	 * up sem, we are running
423 	 */
424 	up(&lo->lo_sem);
425 
426 	for (;;) {
427 		wait_event(lo->lo_bh_wait, loop_active(lo));
428 		if (!atomic_read(&lo->lo_pending)) {
429 			int exiting = 0;
430 			spin_lock_irq(&lo->lo_lock);
431 			exiting = (lo->lo_state == LLOOP_RUNDOWN);
432 			spin_unlock_irq(&lo->lo_lock);
433 			if (exiting)
434 				break;
435 		}
436 
437 		bio = NULL;
438 		count = loop_get_bio(lo, &bio);
439 		if (!count) {
440 			CWARN("lloop(minor: %d): missing bio\n", lo->lo_number);
441 			continue;
442 		}
443 
444 		total_count += count;
445 		if (total_count < count) {     /* overflow */
446 			total_count = count;
447 			times = 1;
448 		} else {
449 			times++;
450 		}
451 		if ((times & 127) == 0) {
452 			CDEBUG(D_INFO, "total: %lu, count: %lu, avg: %lu\n",
453 			       total_count, times, total_count / times);
454 		}
455 
456 		LASSERT(bio != NULL);
457 		LASSERT(count <= atomic_read(&lo->lo_pending));
458 		loop_handle_bio(lo, bio);
459 		atomic_sub(count, &lo->lo_pending);
460 	}
461 	cl_env_put(env, &refcheck);
462 
463 out:
464 	up(&lo->lo_sem);
465 	return ret;
466 }
467 
loop_set_fd(struct lloop_device * lo,struct file * unused,struct block_device * bdev,struct file * file)468 static int loop_set_fd(struct lloop_device *lo, struct file *unused,
469 		       struct block_device *bdev, struct file *file)
470 {
471 	struct inode	 *inode;
472 	struct address_space *mapping;
473 	int		   lo_flags = 0;
474 	int		   error;
475 	loff_t		size;
476 
477 	if (!try_module_get(THIS_MODULE))
478 		return -ENODEV;
479 
480 	error = -EBUSY;
481 	if (lo->lo_state != LLOOP_UNBOUND)
482 		goto out;
483 
484 	mapping = file->f_mapping;
485 	inode = mapping->host;
486 
487 	error = -EINVAL;
488 	if (!S_ISREG(inode->i_mode) || inode->i_sb->s_magic != LL_SUPER_MAGIC)
489 		goto out;
490 
491 	if (!(file->f_mode & FMODE_WRITE))
492 		lo_flags |= LO_FLAGS_READ_ONLY;
493 
494 	size = get_loop_size(lo, file);
495 
496 	if ((loff_t)(sector_t)size != size) {
497 		error = -EFBIG;
498 		goto out;
499 	}
500 
501 	/* remove all pages in cache so as dirty pages not to be existent. */
502 	truncate_inode_pages(mapping, 0);
503 
504 	set_device_ro(bdev, (lo_flags & LO_FLAGS_READ_ONLY) != 0);
505 
506 	lo->lo_blocksize = PAGE_CACHE_SIZE;
507 	lo->lo_device = bdev;
508 	lo->lo_flags = lo_flags;
509 	lo->lo_backing_file = file;
510 	lo->lo_sizelimit = 0;
511 	lo->old_gfp_mask = mapping_gfp_mask(mapping);
512 	mapping_set_gfp_mask(mapping, lo->old_gfp_mask & ~(__GFP_IO|__GFP_FS));
513 
514 	lo->lo_bio = lo->lo_biotail = NULL;
515 
516 	/*
517 	 * set queue make_request_fn, and add limits based on lower level
518 	 * device
519 	 */
520 	blk_queue_make_request(lo->lo_queue, loop_make_request);
521 	lo->lo_queue->queuedata = lo;
522 
523 	/* queue parameters */
524 	CLASSERT(PAGE_CACHE_SIZE < (1 << (sizeof(unsigned short) * 8)));
525 	blk_queue_logical_block_size(lo->lo_queue,
526 				     (unsigned short)PAGE_CACHE_SIZE);
527 	blk_queue_max_hw_sectors(lo->lo_queue,
528 				 LLOOP_MAX_SEGMENTS << (PAGE_CACHE_SHIFT - 9));
529 	blk_queue_max_segments(lo->lo_queue, LLOOP_MAX_SEGMENTS);
530 
531 	set_capacity(disks[lo->lo_number], size);
532 	bd_set_size(bdev, size << 9);
533 
534 	set_blocksize(bdev, lo->lo_blocksize);
535 
536 	kthread_run(loop_thread, lo, "lloop%d", lo->lo_number);
537 	down(&lo->lo_sem);
538 	return 0;
539 
540 out:
541 	/* This is safe: open() is still holding a reference. */
542 	module_put(THIS_MODULE);
543 	return error;
544 }
545 
loop_clr_fd(struct lloop_device * lo,struct block_device * bdev,int count)546 static int loop_clr_fd(struct lloop_device *lo, struct block_device *bdev,
547 		       int count)
548 {
549 	struct file *filp = lo->lo_backing_file;
550 	gfp_t gfp = lo->old_gfp_mask;
551 
552 	if (lo->lo_state != LLOOP_BOUND)
553 		return -ENXIO;
554 
555 	if (lo->lo_refcnt > count)	/* we needed one fd for the ioctl */
556 		return -EBUSY;
557 
558 	if (filp == NULL)
559 		return -EINVAL;
560 
561 	spin_lock_irq(&lo->lo_lock);
562 	lo->lo_state = LLOOP_RUNDOWN;
563 	spin_unlock_irq(&lo->lo_lock);
564 	wake_up(&lo->lo_bh_wait);
565 
566 	down(&lo->lo_sem);
567 	lo->lo_backing_file = NULL;
568 	lo->lo_device = NULL;
569 	lo->lo_offset = 0;
570 	lo->lo_sizelimit = 0;
571 	lo->lo_flags = 0;
572 	invalidate_bdev(bdev);
573 	set_capacity(disks[lo->lo_number], 0);
574 	bd_set_size(bdev, 0);
575 	mapping_set_gfp_mask(filp->f_mapping, gfp);
576 	lo->lo_state = LLOOP_UNBOUND;
577 	fput(filp);
578 	/* This is safe: open() is still holding a reference. */
579 	module_put(THIS_MODULE);
580 	return 0;
581 }
582 
lo_open(struct block_device * bdev,fmode_t mode)583 static int lo_open(struct block_device *bdev, fmode_t mode)
584 {
585 	struct lloop_device *lo = bdev->bd_disk->private_data;
586 
587 	mutex_lock(&lo->lo_ctl_mutex);
588 	lo->lo_refcnt++;
589 	mutex_unlock(&lo->lo_ctl_mutex);
590 
591 	return 0;
592 }
593 
lo_release(struct gendisk * disk,fmode_t mode)594 static void lo_release(struct gendisk *disk, fmode_t mode)
595 {
596 	struct lloop_device *lo = disk->private_data;
597 
598 	mutex_lock(&lo->lo_ctl_mutex);
599 	--lo->lo_refcnt;
600 	mutex_unlock(&lo->lo_ctl_mutex);
601 }
602 
603 /* lloop device node's ioctl function. */
lo_ioctl(struct block_device * bdev,fmode_t mode,unsigned int cmd,unsigned long arg)604 static int lo_ioctl(struct block_device *bdev, fmode_t mode,
605 		    unsigned int cmd, unsigned long arg)
606 {
607 	struct lloop_device *lo = bdev->bd_disk->private_data;
608 	struct inode *inode = NULL;
609 	int err = 0;
610 
611 	mutex_lock(&lloop_mutex);
612 	switch (cmd) {
613 	case LL_IOC_LLOOP_DETACH: {
614 		err = loop_clr_fd(lo, bdev, 2);
615 		if (err == 0)
616 			blkdev_put(bdev, 0); /* grabbed in LLOOP_ATTACH */
617 		break;
618 	}
619 
620 	case LL_IOC_LLOOP_INFO: {
621 		struct lu_fid fid;
622 
623 		if (lo->lo_backing_file == NULL) {
624 			err = -ENOENT;
625 			break;
626 		}
627 		if (inode == NULL)
628 			inode = file_inode(lo->lo_backing_file);
629 		if (lo->lo_state == LLOOP_BOUND)
630 			fid = ll_i2info(inode)->lli_fid;
631 		else
632 			fid_zero(&fid);
633 
634 		if (copy_to_user((struct lu_fid *)arg, &fid, sizeof(fid)))
635 			err = -EFAULT;
636 		break;
637 	}
638 
639 	default:
640 		err = -EINVAL;
641 		break;
642 	}
643 	mutex_unlock(&lloop_mutex);
644 
645 	return err;
646 }
647 
648 static struct block_device_operations lo_fops = {
649 	.owner =	THIS_MODULE,
650 	.open =	 lo_open,
651 	.release =      lo_release,
652 	.ioctl =	lo_ioctl,
653 };
654 
655 /* dynamic iocontrol callback.
656  * This callback is registered in lloop_init and will be called by
657  * ll_iocontrol_call.
658  *
659  * This is a llite regular file ioctl function. It takes the responsibility
660  * of attaching or detaching a file by a lloop's device number.
661  */
lloop_ioctl(struct inode * unused,struct file * file,unsigned int cmd,unsigned long arg,void * magic,int * rcp)662 static enum llioc_iter lloop_ioctl(struct inode *unused, struct file *file,
663 				   unsigned int cmd, unsigned long arg,
664 				   void *magic, int *rcp)
665 {
666 	struct lloop_device *lo = NULL;
667 	struct block_device *bdev = NULL;
668 	int err = 0;
669 	dev_t dev;
670 
671 	if (magic != ll_iocontrol_magic)
672 		return LLIOC_CONT;
673 
674 	if (disks == NULL) {
675 		err = -ENODEV;
676 		goto out1;
677 	}
678 
679 	CWARN("Enter llop_ioctl\n");
680 
681 	mutex_lock(&lloop_mutex);
682 	switch (cmd) {
683 	case LL_IOC_LLOOP_ATTACH: {
684 		struct lloop_device *lo_free = NULL;
685 		int i;
686 
687 		for (i = 0; i < max_loop; i++, lo = NULL) {
688 			lo = &loop_dev[i];
689 			if (lo->lo_state == LLOOP_UNBOUND) {
690 				if (!lo_free)
691 					lo_free = lo;
692 				continue;
693 			}
694 			if (file_inode(lo->lo_backing_file) == file_inode(file))
695 				break;
696 		}
697 		if (lo || !lo_free) {
698 			err = -EBUSY;
699 			goto out;
700 		}
701 
702 		lo = lo_free;
703 		dev = MKDEV(lloop_major, lo->lo_number);
704 
705 		/* quit if the used pointer is writable */
706 		if (put_user((long)old_encode_dev(dev), (long *)arg)) {
707 			err = -EFAULT;
708 			goto out;
709 		}
710 
711 		bdev = blkdev_get_by_dev(dev, file->f_mode, NULL);
712 		if (IS_ERR(bdev)) {
713 			err = PTR_ERR(bdev);
714 			goto out;
715 		}
716 
717 		get_file(file);
718 		err = loop_set_fd(lo, NULL, bdev, file);
719 		if (err) {
720 			fput(file);
721 			blkdev_put(bdev, 0);
722 		}
723 
724 		break;
725 	}
726 
727 	case LL_IOC_LLOOP_DETACH_BYDEV: {
728 		int minor;
729 
730 		dev = old_decode_dev(arg);
731 		if (MAJOR(dev) != lloop_major) {
732 			err = -EINVAL;
733 			goto out;
734 		}
735 
736 		minor = MINOR(dev);
737 		if (minor > max_loop - 1) {
738 			err = -EINVAL;
739 			goto out;
740 		}
741 
742 		lo = &loop_dev[minor];
743 		if (lo->lo_state != LLOOP_BOUND) {
744 			err = -EINVAL;
745 			goto out;
746 		}
747 
748 		bdev = lo->lo_device;
749 		err = loop_clr_fd(lo, bdev, 1);
750 		if (err == 0)
751 			blkdev_put(bdev, 0); /* grabbed in LLOOP_ATTACH */
752 
753 		break;
754 	}
755 
756 	default:
757 		err = -EINVAL;
758 		break;
759 	}
760 
761 out:
762 	mutex_unlock(&lloop_mutex);
763 out1:
764 	if (rcp)
765 		*rcp = err;
766 	return LLIOC_STOP;
767 }
768 
lloop_init(void)769 static int __init lloop_init(void)
770 {
771 	int	i;
772 	unsigned int cmdlist[] = {
773 		LL_IOC_LLOOP_ATTACH,
774 		LL_IOC_LLOOP_DETACH_BYDEV,
775 	};
776 
777 	if (max_loop < 1 || max_loop > 256) {
778 		max_loop = MAX_LOOP_DEFAULT;
779 		CWARN("lloop: invalid max_loop (must be between 1 and 256), using default (%u)\n",
780 		      max_loop);
781 	}
782 
783 	lloop_major = register_blkdev(0, "lloop");
784 	if (lloop_major < 0)
785 		return -EIO;
786 
787 	CDEBUG(D_CONFIG, "registered lloop major %d with %u minors\n",
788 	       lloop_major, max_loop);
789 
790 	ll_iocontrol_magic = ll_iocontrol_register(lloop_ioctl, 2, cmdlist);
791 	if (ll_iocontrol_magic == NULL)
792 		goto out_mem1;
793 
794 	loop_dev = kcalloc(max_loop, sizeof(*loop_dev), GFP_KERNEL);
795 	if (!loop_dev)
796 		goto out_mem1;
797 
798 	disks = kcalloc(max_loop, sizeof(*disks), GFP_KERNEL);
799 	if (!disks)
800 		goto out_mem2;
801 
802 	for (i = 0; i < max_loop; i++) {
803 		disks[i] = alloc_disk(1);
804 		if (!disks[i])
805 			goto out_mem3;
806 	}
807 
808 	mutex_init(&lloop_mutex);
809 
810 	for (i = 0; i < max_loop; i++) {
811 		struct lloop_device *lo = &loop_dev[i];
812 		struct gendisk *disk = disks[i];
813 
814 		lo->lo_queue = blk_alloc_queue(GFP_KERNEL);
815 		if (!lo->lo_queue)
816 			goto out_mem4;
817 
818 		mutex_init(&lo->lo_ctl_mutex);
819 		sema_init(&lo->lo_sem, 0);
820 		init_waitqueue_head(&lo->lo_bh_wait);
821 		lo->lo_number = i;
822 		spin_lock_init(&lo->lo_lock);
823 		disk->major = lloop_major;
824 		disk->first_minor = i;
825 		disk->fops = &lo_fops;
826 		sprintf(disk->disk_name, "lloop%d", i);
827 		disk->private_data = lo;
828 		disk->queue = lo->lo_queue;
829 	}
830 
831 	/* We cannot fail after we call this, so another loop!*/
832 	for (i = 0; i < max_loop; i++)
833 		add_disk(disks[i]);
834 	return 0;
835 
836 out_mem4:
837 	while (i--)
838 		blk_cleanup_queue(loop_dev[i].lo_queue);
839 	i = max_loop;
840 out_mem3:
841 	while (i--)
842 		put_disk(disks[i]);
843 	OBD_FREE(disks, max_loop * sizeof(*disks));
844 out_mem2:
845 	OBD_FREE(loop_dev, max_loop * sizeof(*loop_dev));
846 out_mem1:
847 	unregister_blkdev(lloop_major, "lloop");
848 	ll_iocontrol_unregister(ll_iocontrol_magic);
849 	CERROR("lloop: ran out of memory\n");
850 	return -ENOMEM;
851 }
852 
lloop_exit(void)853 static void lloop_exit(void)
854 {
855 	int i;
856 
857 	ll_iocontrol_unregister(ll_iocontrol_magic);
858 	for (i = 0; i < max_loop; i++) {
859 		del_gendisk(disks[i]);
860 		blk_cleanup_queue(loop_dev[i].lo_queue);
861 		put_disk(disks[i]);
862 	}
863 
864 	unregister_blkdev(lloop_major, "lloop");
865 
866 	OBD_FREE(disks, max_loop * sizeof(*disks));
867 	OBD_FREE(loop_dev, max_loop * sizeof(*loop_dev));
868 }
869 
870 module_init(lloop_init);
871 module_exit(lloop_exit);
872 
873 module_param(max_loop, int, 0444);
874 MODULE_PARM_DESC(max_loop, "maximum of lloop_device");
875 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
876 MODULE_DESCRIPTION("Lustre virtual block device");
877 MODULE_LICENSE("GPL");
878