nbd.c 20.1 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6
/*
 * Network block device - make block devices work over TCP
 *
 * Note that you can not swap over this thing, yet. Seems to work but
 * deadlocks sometimes - you can not swap over TCP in general.
 * 
P
Pavel Machek 已提交
7
 * Copyright 1997-2000, 2008 Pavel Machek <pavel@ucw.cz>
L
Linus Torvalds 已提交
8 9
 * Parts copyright 2001 Steven Whitehouse <steve@chygwyn.com>
 *
10
 * This file is released under GPLv2 or later.
L
Linus Torvalds 已提交
11
 *
12
 * (part of code stolen from loop.c)
L
Linus Torvalds 已提交
13 14 15 16 17 18 19 20 21 22 23 24 25 26
 */

#include <linux/major.h>

#include <linux/blkdev.h>
#include <linux/module.h>
#include <linux/init.h>
#include <linux/sched.h>
#include <linux/fs.h>
#include <linux/bio.h>
#include <linux/stat.h>
#include <linux/errno.h>
#include <linux/file.h>
#include <linux/ioctl.h>
27
#include <linux/smp_lock.h>
28 29 30
#include <linux/compiler.h>
#include <linux/err.h>
#include <linux/kernel.h>
31
#include <linux/slab.h>
L
Linus Torvalds 已提交
32
#include <net/sock.h>
33
#include <linux/net.h>
34
#include <linux/kthread.h>
L
Linus Torvalds 已提交
35 36

#include <asm/uaccess.h>
37
#include <asm/system.h>
L
Linus Torvalds 已提交
38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58
#include <asm/types.h>

#include <linux/nbd.h>

#define LO_MAGIC 0x68797548

#ifdef NDEBUG
#define dprintk(flags, fmt...)
#else /* NDEBUG */
#define dprintk(flags, fmt...) do { \
	if (debugflags & (flags)) printk(KERN_DEBUG fmt); \
} while (0)
#define DBG_IOCTL       0x0004
#define DBG_INIT        0x0010
#define DBG_EXIT        0x0020
#define DBG_BLKDEV      0x0100
#define DBG_RX          0x0200
#define DBG_TX          0x0400
static unsigned int debugflags;
#endif /* NDEBUG */

59
static unsigned int nbds_max = 16;
60
static struct nbd_device *nbd_dev;
L
Laurent Vivier 已提交
61
static int max_part;
L
Linus Torvalds 已提交
62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106

/*
 * Use just one lock (or at most 1 per NIC). Two arguments for this:
 * 1. Each NIC is essentially a synchronization point for all servers
 *    accessed through that NIC so there's no need to have more locks
 *    than NICs anyway.
 * 2. More locks lead to more "Dirty cache line bouncing" which will slow
 *    down each lock to the point where they're actually slower than just
 *    a single lock.
 * Thanks go to Jens Axboe and Al Viro for their LKML emails explaining this!
 */
static DEFINE_SPINLOCK(nbd_lock);

#ifndef NDEBUG
static const char *ioctl_cmd_to_ascii(int cmd)
{
	switch (cmd) {
	case NBD_SET_SOCK: return "set-sock";
	case NBD_SET_BLKSIZE: return "set-blksize";
	case NBD_SET_SIZE: return "set-size";
	case NBD_DO_IT: return "do-it";
	case NBD_CLEAR_SOCK: return "clear-sock";
	case NBD_CLEAR_QUE: return "clear-que";
	case NBD_PRINT_DEBUG: return "print-debug";
	case NBD_SET_SIZE_BLOCKS: return "set-size-blocks";
	case NBD_DISCONNECT: return "disconnect";
	case BLKROSET: return "set-read-only";
	case BLKFLSBUF: return "flush-buffer-cache";
	}
	return "unknown";
}

static const char *nbdcmd_to_ascii(int cmd)
{
	switch (cmd) {
	case  NBD_CMD_READ: return "read";
	case NBD_CMD_WRITE: return "write";
	case  NBD_CMD_DISC: return "disconnect";
	}
	return "invalid";
}
#endif /* NDEBUG */

static void nbd_end_request(struct request *req)
{
107
	int error = req->errors ? -EIO : 0;
108
	struct request_queue *q = req->q;
L
Linus Torvalds 已提交
109 110 111
	unsigned long flags;

	dprintk(DBG_BLKDEV, "%s: request %p: %s\n", req->rq_disk->disk_name,
112
			req, error ? "failed" : "done");
L
Linus Torvalds 已提交
113 114

	spin_lock_irqsave(q->queue_lock, flags);
115
	__blk_end_request_all(req, error);
L
Linus Torvalds 已提交
116 117 118
	spin_unlock_irqrestore(q->queue_lock, flags);
}

119 120 121 122 123 124 125 126 127 128 129 130 131
static void sock_shutdown(struct nbd_device *lo, int lock)
{
	/* Forcibly shutdown the socket causing all listeners
	 * to error
	 *
	 * FIXME: This code is duplicated from sys_shutdown, but
	 * there should be a more generic interface rather than
	 * calling socket ops directly here */
	if (lock)
		mutex_lock(&lo->tx_lock);
	if (lo->sock) {
		printk(KERN_WARNING "%s: shutting down socket\n",
			lo->disk->disk_name);
132
		kernel_sock_shutdown(lo->sock, SHUT_RDWR);
133 134 135 136 137 138 139 140 141 142 143 144 145 146 147
		lo->sock = NULL;
	}
	if (lock)
		mutex_unlock(&lo->tx_lock);
}

static void nbd_xmit_timeout(unsigned long arg)
{
	struct task_struct *task = (struct task_struct *)arg;

	printk(KERN_WARNING "nbd: killing hung xmit (%s, pid: %d)\n",
		task->comm, task->pid);
	force_sig(SIGKILL, task);
}

L
Linus Torvalds 已提交
148 149 150
/*
 *  Send or receive packet.
 */
151
static int sock_xmit(struct nbd_device *lo, int send, void *buf, int size,
L
Linus Torvalds 已提交
152 153
		int msg_flags)
{
154
	struct socket *sock = lo->sock;
L
Linus Torvalds 已提交
155 156 157
	int result;
	struct msghdr msg;
	struct kvec iov;
158
	sigset_t blocked, oldset;
L
Linus Torvalds 已提交
159

160 161 162 163 164 165
	if (unlikely(!sock)) {
		printk(KERN_ERR "%s: Attempted %s on closed socket in sock_xmit\n",
		       lo->disk->disk_name, (send ? "send" : "recv"));
		return -EINVAL;
	}

L
Linus Torvalds 已提交
166 167
	/* Allow interception of SIGKILL only
	 * Don't allow other signals to interrupt the transmission */
168 169
	siginitsetinv(&blocked, sigmask(SIGKILL));
	sigprocmask(SIG_SETMASK, &blocked, &oldset);
L
Linus Torvalds 已提交
170 171 172 173 174 175 176 177 178 179 180

	do {
		sock->sk->sk_allocation = GFP_NOIO;
		iov.iov_base = buf;
		iov.iov_len = size;
		msg.msg_name = NULL;
		msg.msg_namelen = 0;
		msg.msg_control = NULL;
		msg.msg_controllen = 0;
		msg.msg_flags = msg_flags | MSG_NOSIGNAL;

181 182 183 184 185 186 187 188 189 190
		if (send) {
			struct timer_list ti;

			if (lo->xmit_timeout) {
				init_timer(&ti);
				ti.function = nbd_xmit_timeout;
				ti.data = (unsigned long)current;
				ti.expires = jiffies + lo->xmit_timeout;
				add_timer(&ti);
			}
L
Linus Torvalds 已提交
191
			result = kernel_sendmsg(sock, &msg, &iov, 1, size);
192 193 194
			if (lo->xmit_timeout)
				del_timer_sync(&ti);
		} else
L
Linus Torvalds 已提交
195 196 197 198 199
			result = kernel_recvmsg(sock, &msg, &iov, 1, size, 0);

		if (signal_pending(current)) {
			siginfo_t info;
			printk(KERN_WARNING "nbd (pid %d: %s) got signal %d\n",
200
				task_pid_nr(current), current->comm,
201
				dequeue_signal_lock(current, &current->blocked, &info));
L
Linus Torvalds 已提交
202
			result = -EINTR;
203
			sock_shutdown(lo, !send);
L
Linus Torvalds 已提交
204 205 206 207 208 209 210 211 212 213 214 215
			break;
		}

		if (result <= 0) {
			if (result == 0)
				result = -EPIPE; /* short read */
			break;
		}
		size -= result;
		buf += result;
	} while (size > 0);

216
	sigprocmask(SIG_SETMASK, &oldset, NULL);
L
Linus Torvalds 已提交
217 218 219 220

	return result;
}

221
static inline int sock_send_bvec(struct nbd_device *lo, struct bio_vec *bvec,
L
Linus Torvalds 已提交
222 223 224 225
		int flags)
{
	int result;
	void *kaddr = kmap(bvec->bv_page);
226
	result = sock_xmit(lo, 1, kaddr + bvec->bv_offset, bvec->bv_len, flags);
L
Linus Torvalds 已提交
227 228 229 230
	kunmap(bvec->bv_page);
	return result;
}

231
/* always call with the tx_lock held */
L
Linus Torvalds 已提交
232 233
static int nbd_send_req(struct nbd_device *lo, struct request *req)
{
234
	int result, flags;
L
Linus Torvalds 已提交
235
	struct nbd_request request;
236
	unsigned long size = blk_rq_bytes(req);
L
Linus Torvalds 已提交
237 238 239

	request.magic = htonl(NBD_REQUEST_MAGIC);
	request.type = htonl(nbd_cmd(req));
240
	request.from = cpu_to_be64((u64)blk_rq_pos(req) << 9);
L
Linus Torvalds 已提交
241 242 243
	request.len = htonl(size);
	memcpy(request.handle, &req, sizeof(req));

244
	dprintk(DBG_TX, "%s: request %p: sending control (%s@%llu,%uB)\n",
L
Linus Torvalds 已提交
245 246
			lo->disk->disk_name, req,
			nbdcmd_to_ascii(nbd_cmd(req)),
247
			(unsigned long long)blk_rq_pos(req) << 9,
248
			blk_rq_bytes(req));
249 250
	result = sock_xmit(lo, 1, &request, sizeof(request),
			(nbd_cmd(req) == NBD_CMD_WRITE) ? MSG_MORE : 0);
L
Linus Torvalds 已提交
251 252 253 254 255 256 257
	if (result <= 0) {
		printk(KERN_ERR "%s: Send control failed (result %d)\n",
				lo->disk->disk_name, result);
		goto error_out;
	}

	if (nbd_cmd(req) == NBD_CMD_WRITE) {
258 259
		struct req_iterator iter;
		struct bio_vec *bvec;
L
Linus Torvalds 已提交
260 261 262 263
		/*
		 * we are really probing at internals to determine
		 * whether to set MSG_MORE or not...
		 */
264
		rq_for_each_segment(bvec, req, iter) {
265 266 267 268 269
			flags = 0;
			if (!rq_iter_last(req, iter))
				flags = MSG_MORE;
			dprintk(DBG_TX, "%s: request %p: sending %d bytes data\n",
					lo->disk->disk_name, req, bvec->bv_len);
270
			result = sock_send_bvec(lo, bvec, flags);
271 272 273 274 275
			if (result <= 0) {
				printk(KERN_ERR "%s: Send data failed (result %d)\n",
						lo->disk->disk_name, result);
				goto error_out;
			}
L
Linus Torvalds 已提交
276 277 278 279 280
		}
	}
	return 0;

error_out:
P
Pavel Machek 已提交
281
	return -EIO;
L
Linus Torvalds 已提交
282 283
}

284 285
static struct request *nbd_find_request(struct nbd_device *lo,
					struct request *xreq)
L
Linus Torvalds 已提交
286
{
287
	struct request *req, *tmp;
288
	int err;
L
Linus Torvalds 已提交
289

290 291 292 293
	err = wait_event_interruptible(lo->active_wq, lo->active_req != xreq);
	if (unlikely(err))
		goto out;

L
Linus Torvalds 已提交
294
	spin_lock(&lo->queue_lock);
295
	list_for_each_entry_safe(req, tmp, &lo->queue_head, queuelist) {
L
Linus Torvalds 已提交
296 297 298 299 300 301 302
		if (req != xreq)
			continue;
		list_del_init(&req->queuelist);
		spin_unlock(&lo->queue_lock);
		return req;
	}
	spin_unlock(&lo->queue_lock);
303 304 305 306 307

	err = -ENOENT;

out:
	return ERR_PTR(err);
L
Linus Torvalds 已提交
308 309
}

310
static inline int sock_recv_bvec(struct nbd_device *lo, struct bio_vec *bvec)
L
Linus Torvalds 已提交
311 312 313
{
	int result;
	void *kaddr = kmap(bvec->bv_page);
314
	result = sock_xmit(lo, 0, kaddr + bvec->bv_offset, bvec->bv_len,
L
Linus Torvalds 已提交
315 316 317 318 319 320 321 322 323 324 325 326 327
			MSG_WAITALL);
	kunmap(bvec->bv_page);
	return result;
}

/* NULL returned = something went wrong, inform userspace */
static struct request *nbd_read_stat(struct nbd_device *lo)
{
	int result;
	struct nbd_reply reply;
	struct request *req;

	reply.magic = 0;
328
	result = sock_xmit(lo, 0, &reply, sizeof(reply), MSG_WAITALL);
L
Linus Torvalds 已提交
329 330 331 332 333
	if (result <= 0) {
		printk(KERN_ERR "%s: Receive control failed (result %d)\n",
				lo->disk->disk_name, result);
		goto harderror;
	}
334 335 336 337 338 339 340 341 342

	if (ntohl(reply.magic) != NBD_REPLY_MAGIC) {
		printk(KERN_ERR "%s: Wrong magic (0x%lx)\n",
				lo->disk->disk_name,
				(unsigned long)ntohl(reply.magic));
		result = -EPROTO;
		goto harderror;
	}

343
	req = nbd_find_request(lo, *(struct request **)reply.handle);
344
	if (IS_ERR(req)) {
345 346 347 348
		result = PTR_ERR(req);
		if (result != -ENOENT)
			goto harderror;

L
Linus Torvalds 已提交
349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364
		printk(KERN_ERR "%s: Unexpected reply (%p)\n",
				lo->disk->disk_name, reply.handle);
		result = -EBADR;
		goto harderror;
	}

	if (ntohl(reply.error)) {
		printk(KERN_ERR "%s: Other side returned error (%d)\n",
				lo->disk->disk_name, ntohl(reply.error));
		req->errors++;
		return req;
	}

	dprintk(DBG_RX, "%s: request %p: got reply\n",
			lo->disk->disk_name, req);
	if (nbd_cmd(req) == NBD_CMD_READ) {
365 366 367 368
		struct req_iterator iter;
		struct bio_vec *bvec;

		rq_for_each_segment(bvec, req, iter) {
369
			result = sock_recv_bvec(lo, bvec);
370 371 372 373 374 375 376 377
			if (result <= 0) {
				printk(KERN_ERR "%s: Receive data failed (result %d)\n",
						lo->disk->disk_name, result);
				req->errors++;
				return req;
			}
			dprintk(DBG_RX, "%s: request %p: got %d bytes data\n",
				lo->disk->disk_name, req, bvec->bv_len);
L
Linus Torvalds 已提交
378 379 380 381 382 383 384 385
		}
	}
	return req;
harderror:
	lo->harderror = result;
	return NULL;
}

386 387
static ssize_t pid_show(struct device *dev,
			struct device_attribute *attr, char *buf)
388
{
389 390 391
	struct gendisk *disk = dev_to_disk(dev);

	return sprintf(buf, "%ld\n",
392 393 394
		(long) ((struct nbd_device *)disk->private_data)->pid);
}

395
static struct device_attribute pid_attr = {
396
	.attr = { .name = "pid", .mode = S_IRUGO},
397 398 399
	.show = pid_show,
};

400
static int nbd_do_it(struct nbd_device *lo)
L
Linus Torvalds 已提交
401 402
{
	struct request *req;
403
	int ret;
L
Linus Torvalds 已提交
404 405 406

	BUG_ON(lo->magic != LO_MAGIC);

407
	lo->pid = current->pid;
408
	ret = sysfs_create_file(&disk_to_dev(lo->disk)->kobj, &pid_attr.attr);
409 410
	if (ret) {
		printk(KERN_ERR "nbd: sysfs_create_file failed!");
411
		lo->pid = 0;
412 413
		return ret;
	}
414

L
Linus Torvalds 已提交
415 416
	while ((req = nbd_read_stat(lo)) != NULL)
		nbd_end_request(req);
417

418
	sysfs_remove_file(&disk_to_dev(lo->disk)->kobj, &pid_attr.attr);
419
	lo->pid = 0;
420
	return 0;
L
Linus Torvalds 已提交
421 422 423 424 425 426 427 428
}

static void nbd_clear_que(struct nbd_device *lo)
{
	struct request *req;

	BUG_ON(lo->magic != LO_MAGIC);

429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446
	/*
	 * Because we have set lo->sock to NULL under the tx_lock, all
	 * modifications to the list must have completed by now.  For
	 * the same reason, the active_req must be NULL.
	 *
	 * As a consequence, we don't need to take the spin lock while
	 * purging the list here.
	 */
	BUG_ON(lo->sock);
	BUG_ON(lo->active_req);

	while (!list_empty(&lo->queue_head)) {
		req = list_entry(lo->queue_head.next, struct request,
				 queuelist);
		list_del_init(&req->queuelist);
		req->errors++;
		nbd_end_request(req);
	}
L
Linus Torvalds 已提交
447 448
}

449

450 451
static void nbd_handle_req(struct nbd_device *lo, struct request *req)
{
452
	if (req->cmd_type != REQ_TYPE_FS)
453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471
		goto error_out;

	nbd_cmd(req) = NBD_CMD_READ;
	if (rq_data_dir(req) == WRITE) {
		nbd_cmd(req) = NBD_CMD_WRITE;
		if (lo->flags & NBD_READ_ONLY) {
			printk(KERN_ERR "%s: Write on read-only\n",
					lo->disk->disk_name);
			goto error_out;
		}
	}

	req->errors = 0;

	mutex_lock(&lo->tx_lock);
	if (unlikely(!lo->sock)) {
		mutex_unlock(&lo->tx_lock);
		printk(KERN_ERR "%s: Attempted send on closed socket\n",
		       lo->disk->disk_name);
P
Pavel Machek 已提交
472
		goto error_out;
473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526
	}

	lo->active_req = req;

	if (nbd_send_req(lo, req) != 0) {
		printk(KERN_ERR "%s: Request send failed\n",
				lo->disk->disk_name);
		req->errors++;
		nbd_end_request(req);
	} else {
		spin_lock(&lo->queue_lock);
		list_add(&req->queuelist, &lo->queue_head);
		spin_unlock(&lo->queue_lock);
	}

	lo->active_req = NULL;
	mutex_unlock(&lo->tx_lock);
	wake_up_all(&lo->active_wq);

	return;

error_out:
	req->errors++;
	nbd_end_request(req);
}

static int nbd_thread(void *data)
{
	struct nbd_device *lo = data;
	struct request *req;

	set_user_nice(current, -20);
	while (!kthread_should_stop() || !list_empty(&lo->waiting_queue)) {
		/* wait for something to do */
		wait_event_interruptible(lo->waiting_wq,
					 kthread_should_stop() ||
					 !list_empty(&lo->waiting_queue));

		/* extract request */
		if (list_empty(&lo->waiting_queue))
			continue;

		spin_lock_irq(&lo->queue_lock);
		req = list_entry(lo->waiting_queue.next, struct request,
				 queuelist);
		list_del_init(&req->queuelist);
		spin_unlock_irq(&lo->queue_lock);

		/* handle request */
		nbd_handle_req(lo, req);
	}
	return 0;
}

L
Linus Torvalds 已提交
527 528 529
/*
 * We always wait for result of write, for now. It would be nice to make it optional
 * in future
530
 * if ((rq_data_dir(req) == WRITE) && (lo->flags & NBD_WRITE_NOCHK))
L
Linus Torvalds 已提交
531 532 533
 *   { printk( "Warning: Ignoring result!\n"); nbd_end_request( req ); }
 */

P
Pavel Machek 已提交
534
static void do_nbd_request(struct request_queue *q)
L
Linus Torvalds 已提交
535 536 537
{
	struct request *req;
	
538
	while ((req = blk_fetch_request(q)) != NULL) {
L
Linus Torvalds 已提交
539 540
		struct nbd_device *lo;

541 542
		spin_unlock_irq(q->queue_lock);

543 544
		dprintk(DBG_BLKDEV, "%s: request %p: dequeued (flags=%x)\n",
				req->rq_disk->disk_name, req, req->cmd_type);
L
Linus Torvalds 已提交
545 546 547 548 549

		lo = req->rq_disk->private_data;

		BUG_ON(lo->magic != LO_MAGIC);

550 551 552 553 554 555 556 557 558
		if (unlikely(!lo->sock)) {
			printk(KERN_ERR "%s: Attempted send on closed socket\n",
				lo->disk->disk_name);
			req->errors++;
			nbd_end_request(req);
			spin_lock_irq(q->queue_lock);
			continue;
		}

559 560 561
		spin_lock_irq(&lo->queue_lock);
		list_add_tail(&req->queuelist, &lo->waiting_queue);
		spin_unlock_irq(&lo->queue_lock);
L
Linus Torvalds 已提交
562

563
		wake_up(&lo->waiting_wq);
564

L
Linus Torvalds 已提交
565 566 567 568
		spin_lock_irq(q->queue_lock);
	}
}

P
Pavel Machek 已提交
569
/* Must be called with tx_lock held */
L
Linus Torvalds 已提交
570

P
Pavel Machek 已提交
571 572 573
static int __nbd_ioctl(struct block_device *bdev, struct nbd_device *lo,
		       unsigned int cmd, unsigned long arg)
{
L
Linus Torvalds 已提交
574
	switch (cmd) {
P
Pavel Machek 已提交
575 576 577
	case NBD_DISCONNECT: {
		struct request sreq;

L
Linus Torvalds 已提交
578
	        printk(KERN_INFO "%s: NBD_DISCONNECT\n", lo->disk->disk_name);
P
Pavel Machek 已提交
579

580
		blk_rq_init(NULL, &sreq);
581
		sreq.cmd_type = REQ_TYPE_SPECIAL;
L
Linus Torvalds 已提交
582
		nbd_cmd(&sreq) = NBD_CMD_DISC;
P
Pavel Machek 已提交
583
		if (!lo->sock)
L
Linus Torvalds 已提交
584
			return -EINVAL;
P
Pavel Machek 已提交
585
		nbd_send_req(lo, &sreq);
L
Linus Torvalds 已提交
586
                return 0;
P
Pavel Machek 已提交
587
	}
L
Linus Torvalds 已提交
588
 
P
Pavel Machek 已提交
589 590 591
	case NBD_CLEAR_SOCK: {
		struct file *file;

L
Linus Torvalds 已提交
592 593 594 595
		lo->sock = NULL;
		file = lo->file;
		lo->file = NULL;
		nbd_clear_que(lo);
596
		BUG_ON(!list_empty(&lo->queue_head));
L
Linus Torvalds 已提交
597 598
		if (file)
			fput(file);
P
Pavel Machek 已提交
599 600 601 602 603
		return 0;
	}

	case NBD_SET_SOCK: {
		struct file *file;
L
Linus Torvalds 已提交
604 605 606 607
		if (lo->file)
			return -EBUSY;
		file = fget(arg);
		if (file) {
A
Al Viro 已提交
608
			struct inode *inode = file->f_path.dentry->d_inode;
L
Linus Torvalds 已提交
609 610 611
			if (S_ISSOCK(inode->i_mode)) {
				lo->file = file;
				lo->sock = SOCKET_I(inode);
L
Laurent Vivier 已提交
612 613
				if (max_part > 0)
					bdev->bd_invalidated = 1;
P
Pavel Machek 已提交
614
				return 0;
L
Linus Torvalds 已提交
615 616 617 618
			} else {
				fput(file);
			}
		}
P
Pavel Machek 已提交
619 620 621
		return -EINVAL;
	}

L
Linus Torvalds 已提交
622 623 624
	case NBD_SET_BLKSIZE:
		lo->blksize = arg;
		lo->bytesize &= ~(lo->blksize-1);
A
Al Viro 已提交
625 626
		bdev->bd_inode->i_size = lo->bytesize;
		set_blocksize(bdev, lo->blksize);
L
Linus Torvalds 已提交
627 628
		set_capacity(lo->disk, lo->bytesize >> 9);
		return 0;
P
Pavel Machek 已提交
629

L
Linus Torvalds 已提交
630 631
	case NBD_SET_SIZE:
		lo->bytesize = arg & ~(lo->blksize-1);
A
Al Viro 已提交
632 633
		bdev->bd_inode->i_size = lo->bytesize;
		set_blocksize(bdev, lo->blksize);
L
Linus Torvalds 已提交
634 635
		set_capacity(lo->disk, lo->bytesize >> 9);
		return 0;
P
Pavel Machek 已提交
636

637 638 639
	case NBD_SET_TIMEOUT:
		lo->xmit_timeout = arg * HZ;
		return 0;
P
Pavel Machek 已提交
640

L
Linus Torvalds 已提交
641 642
	case NBD_SET_SIZE_BLOCKS:
		lo->bytesize = ((u64) arg) * lo->blksize;
A
Al Viro 已提交
643 644
		bdev->bd_inode->i_size = lo->bytesize;
		set_blocksize(bdev, lo->blksize);
L
Linus Torvalds 已提交
645 646
		set_capacity(lo->disk, lo->bytesize >> 9);
		return 0;
P
Pavel Machek 已提交
647 648 649 650 651 652

	case NBD_DO_IT: {
		struct task_struct *thread;
		struct file *file;
		int error;

653 654
		if (lo->pid)
			return -EBUSY;
L
Linus Torvalds 已提交
655 656
		if (!lo->file)
			return -EINVAL;
P
Pavel Machek 已提交
657 658 659

		mutex_unlock(&lo->tx_lock);

660
		thread = kthread_create(nbd_thread, lo, lo->disk->disk_name);
P
Pavel Machek 已提交
661 662
		if (IS_ERR(thread)) {
			mutex_lock(&lo->tx_lock);
663
			return PTR_ERR(thread);
P
Pavel Machek 已提交
664
		}
665
		wake_up_process(thread);
666
		error = nbd_do_it(lo);
667
		kthread_stop(thread);
P
Pavel Machek 已提交
668 669

		mutex_lock(&lo->tx_lock);
670 671
		if (error)
			return error;
P
Pavel Machek 已提交
672
		sock_shutdown(lo, 0);
L
Linus Torvalds 已提交
673 674 675 676 677 678
		file = lo->file;
		lo->file = NULL;
		nbd_clear_que(lo);
		printk(KERN_WARNING "%s: queue cleared\n", lo->disk->disk_name);
		if (file)
			fput(file);
679
		lo->bytesize = 0;
A
Al Viro 已提交
680
		bdev->bd_inode->i_size = 0;
681
		set_capacity(lo->disk, 0);
L
Laurent Vivier 已提交
682
		if (max_part > 0)
A
Al Viro 已提交
683
			ioctl_by_bdev(bdev, BLKRRPART, 0);
L
Linus Torvalds 已提交
684
		return lo->harderror;
P
Pavel Machek 已提交
685 686
	}

L
Linus Torvalds 已提交
687
	case NBD_CLEAR_QUE:
688 689 690 691 692
		/*
		 * This is for compatibility only.  The queue is always cleared
		 * by NBD_DO_IT or NBD_CLEAR_SOCK.
		 */
		BUG_ON(!lo->sock && !list_empty(&lo->queue_head));
L
Linus Torvalds 已提交
693
		return 0;
P
Pavel Machek 已提交
694

L
Linus Torvalds 已提交
695 696
	case NBD_PRINT_DEBUG:
		printk(KERN_INFO "%s: next = %p, prev = %p, head = %p\n",
A
Al Viro 已提交
697
			bdev->bd_disk->disk_name,
L
Linus Torvalds 已提交
698 699 700 701
			lo->queue_head.next, lo->queue_head.prev,
			&lo->queue_head);
		return 0;
	}
P
Pavel Machek 已提交
702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719
	return -ENOTTY;
}

static int nbd_ioctl(struct block_device *bdev, fmode_t mode,
		     unsigned int cmd, unsigned long arg)
{
	struct nbd_device *lo = bdev->bd_disk->private_data;
	int error;

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

	BUG_ON(lo->magic != LO_MAGIC);

	/* Anyone capable of this syscall can do *real bad* things */
	dprintk(DBG_IOCTL, "%s: nbd_ioctl cmd=%s(0x%x) arg=%lu\n",
			lo->disk->disk_name, ioctl_cmd_to_ascii(cmd), cmd, arg);

720
	lock_kernel();
P
Pavel Machek 已提交
721 722 723
	mutex_lock(&lo->tx_lock);
	error = __nbd_ioctl(bdev, lo, cmd, arg);
	mutex_unlock(&lo->tx_lock);
724
	unlock_kernel();
P
Pavel Machek 已提交
725 726

	return error;
L
Linus Torvalds 已提交
727 728
}

729
static const struct block_device_operations nbd_fops =
L
Linus Torvalds 已提交
730 731
{
	.owner =	THIS_MODULE,
732
	.ioctl =	nbd_ioctl,
L
Linus Torvalds 已提交
733 734 735 736 737 738 739 740 741 742 743
};

/*
 * And here should be modules and kernel interface 
 *  (Just smiley confuses emacs :-)
 */

static int __init nbd_init(void)
{
	int err = -ENOMEM;
	int i;
L
Laurent Vivier 已提交
744
	int part_shift;
L
Linus Torvalds 已提交
745

746
	BUILD_BUG_ON(sizeof(struct nbd_request) != 28);
L
Linus Torvalds 已提交
747

L
Laurent Vivier 已提交
748 749 750 751 752
	if (max_part < 0) {
		printk(KERN_CRIT "nbd: max_part must be >= 0\n");
		return -EINVAL;
	}

753 754 755 756
	nbd_dev = kcalloc(nbds_max, sizeof(*nbd_dev), GFP_KERNEL);
	if (!nbd_dev)
		return -ENOMEM;

L
Laurent Vivier 已提交
757 758 759 760
	part_shift = 0;
	if (max_part > 0)
		part_shift = fls(max_part);

761
	for (i = 0; i < nbds_max; i++) {
L
Laurent Vivier 已提交
762
		struct gendisk *disk = alloc_disk(1 << part_shift);
L
Linus Torvalds 已提交
763 764 765 766 767 768 769 770 771 772 773 774 775
		if (!disk)
			goto out;
		nbd_dev[i].disk = disk;
		/*
		 * The new linux 2.5 block layer implementation requires
		 * every gendisk to have its very own request_queue struct.
		 * These structs are big so we dynamically allocate them.
		 */
		disk->queue = blk_init_queue(do_nbd_request, &nbd_lock);
		if (!disk->queue) {
			put_disk(disk);
			goto out;
		}
776 777 778 779
		/*
		 * Tell the block layer that we are not a rotational device
		 */
		queue_flag_set_unlocked(QUEUE_FLAG_NONROT, disk->queue);
L
Linus Torvalds 已提交
780 781 782 783 784 785 786 787 788 789
	}

	if (register_blkdev(NBD_MAJOR, "nbd")) {
		err = -EIO;
		goto out;
	}

	printk(KERN_INFO "nbd: registered device at major %d\n", NBD_MAJOR);
	dprintk(DBG_INIT, "nbd: debugflags=0x%x\n", debugflags);

790
	for (i = 0; i < nbds_max; i++) {
L
Linus Torvalds 已提交
791 792 793 794
		struct gendisk *disk = nbd_dev[i].disk;
		nbd_dev[i].file = NULL;
		nbd_dev[i].magic = LO_MAGIC;
		nbd_dev[i].flags = 0;
795
		INIT_LIST_HEAD(&nbd_dev[i].waiting_queue);
L
Linus Torvalds 已提交
796 797
		spin_lock_init(&nbd_dev[i].queue_lock);
		INIT_LIST_HEAD(&nbd_dev[i].queue_head);
798
		mutex_init(&nbd_dev[i].tx_lock);
799
		init_waitqueue_head(&nbd_dev[i].active_wq);
800
		init_waitqueue_head(&nbd_dev[i].waiting_wq);
L
Linus Torvalds 已提交
801
		nbd_dev[i].blksize = 1024;
802
		nbd_dev[i].bytesize = 0;
L
Linus Torvalds 已提交
803
		disk->major = NBD_MAJOR;
L
Laurent Vivier 已提交
804
		disk->first_minor = i << part_shift;
L
Linus Torvalds 已提交
805 806 807
		disk->fops = &nbd_fops;
		disk->private_data = &nbd_dev[i];
		sprintf(disk->disk_name, "nbd%d", i);
808
		set_capacity(disk, 0);
L
Linus Torvalds 已提交
809 810 811 812 813 814 815 816 817
		add_disk(disk);
	}

	return 0;
out:
	while (i--) {
		blk_cleanup_queue(nbd_dev[i].disk->queue);
		put_disk(nbd_dev[i].disk);
	}
818
	kfree(nbd_dev);
L
Linus Torvalds 已提交
819 820 821 822 823 824
	return err;
}

static void __exit nbd_cleanup(void)
{
	int i;
825
	for (i = 0; i < nbds_max; i++) {
L
Linus Torvalds 已提交
826
		struct gendisk *disk = nbd_dev[i].disk;
827
		nbd_dev[i].magic = 0;
L
Linus Torvalds 已提交
828 829 830 831 832 833 834
		if (disk) {
			del_gendisk(disk);
			blk_cleanup_queue(disk->queue);
			put_disk(disk);
		}
	}
	unregister_blkdev(NBD_MAJOR, "nbd");
835
	kfree(nbd_dev);
L
Linus Torvalds 已提交
836 837 838 839 840 841 842 843 844
	printk(KERN_INFO "nbd: unregistered device at major %d\n", NBD_MAJOR);
}

module_init(nbd_init);
module_exit(nbd_cleanup);

MODULE_DESCRIPTION("Network Block Device");
MODULE_LICENSE("GPL");

845
module_param(nbds_max, int, 0444);
L
Laurent Vivier 已提交
846 847 848
MODULE_PARM_DESC(nbds_max, "number of network block devices to initialize (default: 16)");
module_param(max_part, int, 0444);
MODULE_PARM_DESC(max_part, "number of partitions per device (default: 0)");
L
Linus Torvalds 已提交
849 850 851 852
#ifndef NDEBUG
module_param(debugflags, int, 0644);
MODULE_PARM_DESC(debugflags, "flags for controlling debug output");
#endif