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 28 29
#include <linux/compiler.h>
#include <linux/err.h>
#include <linux/kernel.h>
30
#include <linux/slab.h>
L
Linus Torvalds 已提交
31
#include <net/sock.h>
32
#include <linux/net.h>
33
#include <linux/kthread.h>
L
Linus Torvalds 已提交
34 35

#include <asm/uaccess.h>
36
#include <asm/system.h>
L
Linus Torvalds 已提交
37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57
#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 */

58
static unsigned int nbds_max = 16;
59
static struct nbd_device *nbd_dev;
L
Laurent Vivier 已提交
60
static int max_part;
L
Linus Torvalds 已提交
61 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

/*
 * 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)
{
106
	int error = req->errors ? -EIO : 0;
107
	struct request_queue *q = req->q;
L
Linus Torvalds 已提交
108 109 110
	unsigned long flags;

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

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

118 119 120 121 122 123 124 125 126 127 128 129 130
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);
131
		kernel_sock_shutdown(lo->sock, SHUT_RDWR);
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146
		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 已提交
147 148 149
/*
 *  Send or receive packet.
 */
150
static int sock_xmit(struct nbd_device *lo, int send, void *buf, int size,
L
Linus Torvalds 已提交
151 152
		int msg_flags)
{
153
	struct socket *sock = lo->sock;
L
Linus Torvalds 已提交
154 155 156
	int result;
	struct msghdr msg;
	struct kvec iov;
157
	sigset_t blocked, oldset;
L
Linus Torvalds 已提交
158

159 160 161 162 163 164
	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 已提交
165 166
	/* Allow interception of SIGKILL only
	 * Don't allow other signals to interrupt the transmission */
167 168
	siginitsetinv(&blocked, sigmask(SIGKILL));
	sigprocmask(SIG_SETMASK, &blocked, &oldset);
L
Linus Torvalds 已提交
169 170 171 172 173 174 175 176 177 178 179

	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;

180 181 182 183 184 185 186 187 188 189
		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 已提交
190
			result = kernel_sendmsg(sock, &msg, &iov, 1, size);
191 192 193
			if (lo->xmit_timeout)
				del_timer_sync(&ti);
		} else
L
Linus Torvalds 已提交
194 195 196 197 198
			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",
199
				task_pid_nr(current), current->comm,
200
				dequeue_signal_lock(current, &current->blocked, &info));
L
Linus Torvalds 已提交
201
			result = -EINTR;
202
			sock_shutdown(lo, !send);
L
Linus Torvalds 已提交
203 204 205 206 207 208 209 210 211 212 213 214
			break;
		}

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

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

	return result;
}

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

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

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

243
	dprintk(DBG_TX, "%s: request %p: sending control (%s@%llu,%uB)\n",
L
Linus Torvalds 已提交
244 245
			lo->disk->disk_name, req,
			nbdcmd_to_ascii(nbd_cmd(req)),
246
			(unsigned long long)blk_rq_pos(req) << 9,
247
			blk_rq_bytes(req));
248 249
	result = sock_xmit(lo, 1, &request, sizeof(request),
			(nbd_cmd(req) == NBD_CMD_WRITE) ? MSG_MORE : 0);
L
Linus Torvalds 已提交
250 251 252 253 254 255 256
	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) {
257 258
		struct req_iterator iter;
		struct bio_vec *bvec;
L
Linus Torvalds 已提交
259 260 261 262
		/*
		 * we are really probing at internals to determine
		 * whether to set MSG_MORE or not...
		 */
263
		rq_for_each_segment(bvec, req, iter) {
264 265 266 267 268
			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);
269
			result = sock_send_bvec(lo, bvec, flags);
270 271 272 273 274
			if (result <= 0) {
				printk(KERN_ERR "%s: Send data failed (result %d)\n",
						lo->disk->disk_name, result);
				goto error_out;
			}
L
Linus Torvalds 已提交
275 276 277 278 279
		}
	}
	return 0;

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

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

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

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

	err = -ENOENT;

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

309
static inline int sock_recv_bvec(struct nbd_device *lo, struct bio_vec *bvec)
L
Linus Torvalds 已提交
310 311 312
{
	int result;
	void *kaddr = kmap(bvec->bv_page);
313
	result = sock_xmit(lo, 0, kaddr + bvec->bv_offset, bvec->bv_len,
L
Linus Torvalds 已提交
314 315 316 317 318 319 320 321 322 323 324 325 326
			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;
327
	result = sock_xmit(lo, 0, &reply, sizeof(reply), MSG_WAITALL);
L
Linus Torvalds 已提交
328 329 330 331 332
	if (result <= 0) {
		printk(KERN_ERR "%s: Receive control failed (result %d)\n",
				lo->disk->disk_name, result);
		goto harderror;
	}
333 334 335 336 337 338 339 340 341

	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;
	}

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

L
Linus Torvalds 已提交
348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363
		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) {
364 365 366 367
		struct req_iterator iter;
		struct bio_vec *bvec;

		rq_for_each_segment(bvec, req, iter) {
368
			result = sock_recv_bvec(lo, bvec);
369 370 371 372 373 374 375 376
			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 已提交
377 378 379 380 381 382 383 384
		}
	}
	return req;
harderror:
	lo->harderror = result;
	return NULL;
}

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

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

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

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

	BUG_ON(lo->magic != LO_MAGIC);

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

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

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

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

	BUG_ON(lo->magic != LO_MAGIC);

428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445
	/*
	 * 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 已提交
446 447
}

448

449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470
static void nbd_handle_req(struct nbd_device *lo, struct request *req)
{
	if (!blk_fs_request(req))
		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 已提交
471
		goto error_out;
472 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
	}

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

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

540 541
		spin_unlock_irq(q->queue_lock);

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

		lo = req->rq_disk->private_data;

		BUG_ON(lo->magic != LO_MAGIC);

549 550 551 552 553 554 555 556 557
		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;
		}

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

562
		wake_up(&lo->waiting_wq);
563

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

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

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

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

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

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

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

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

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

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

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

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

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

		mutex_unlock(&lo->tx_lock);

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

		mutex_lock(&lo->tx_lock);
669 670
		if (error)
			return error;
P
Pavel Machek 已提交
671
		sock_shutdown(lo, 0);
L
Linus Torvalds 已提交
672 673 674 675 676 677
		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);
678
		lo->bytesize = 0;
A
Al Viro 已提交
679
		bdev->bd_inode->i_size = 0;
680
		set_capacity(lo->disk, 0);
L
Laurent Vivier 已提交
681
		if (max_part > 0)
A
Al Viro 已提交
682
			ioctl_by_bdev(bdev, BLKRRPART, 0);
L
Linus Torvalds 已提交
683
		return lo->harderror;
P
Pavel Machek 已提交
684 685
	}

L
Linus Torvalds 已提交
686
	case NBD_CLEAR_QUE:
687 688 689 690 691
		/*
		 * 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 已提交
692
		return 0;
P
Pavel Machek 已提交
693

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

	mutex_lock(&lo->tx_lock);
	error = __nbd_ioctl(bdev, lo, cmd, arg);
	mutex_unlock(&lo->tx_lock);

	return error;
L
Linus Torvalds 已提交
724 725
}

726
static const struct block_device_operations nbd_fops =
L
Linus Torvalds 已提交
727 728
{
	.owner =	THIS_MODULE,
A
Al Viro 已提交
729
	.locked_ioctl =	nbd_ioctl,
L
Linus Torvalds 已提交
730 731 732 733 734 735 736 737 738 739 740
};

/*
 * 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 已提交
741
	int part_shift;
L
Linus Torvalds 已提交
742

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

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

750 751 752 753
	nbd_dev = kcalloc(nbds_max, sizeof(*nbd_dev), GFP_KERNEL);
	if (!nbd_dev)
		return -ENOMEM;

L
Laurent Vivier 已提交
754 755 756 757
	part_shift = 0;
	if (max_part > 0)
		part_shift = fls(max_part);

758
	for (i = 0; i < nbds_max; i++) {
L
Laurent Vivier 已提交
759
		struct gendisk *disk = alloc_disk(1 << part_shift);
L
Linus Torvalds 已提交
760 761 762 763 764 765 766 767 768 769 770 771 772
		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;
		}
773 774 775 776
		/*
		 * Tell the block layer that we are not a rotational device
		 */
		queue_flag_set_unlocked(QUEUE_FLAG_NONROT, disk->queue);
L
Linus Torvalds 已提交
777 778 779 780 781 782 783 784 785 786
	}

	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);

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

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

static void __exit nbd_cleanup(void)
{
	int i;
822
	for (i = 0; i < nbds_max; i++) {
L
Linus Torvalds 已提交
823
		struct gendisk *disk = nbd_dev[i].disk;
824
		nbd_dev[i].magic = 0;
L
Linus Torvalds 已提交
825 826 827 828 829 830 831
		if (disk) {
			del_gendisk(disk);
			blk_cleanup_queue(disk->queue);
			put_disk(disk);
		}
	}
	unregister_blkdev(NBD_MAJOR, "nbd");
832
	kfree(nbd_dev);
L
Linus Torvalds 已提交
833 834 835 836 837 838 839 840 841
	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");

842
module_param(nbds_max, int, 0444);
L
Laurent Vivier 已提交
843 844 845
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 已提交
846 847 848 849
#ifndef NDEBUG
module_param(debugflags, int, 0644);
MODULE_PARM_DESC(debugflags, "flags for controlling debug output");
#endif