nbd.c 20.3 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/mutex.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
195 196
			result = kernel_recvmsg(sock, &msg, &iov, 1, size,
						msg.msg_flags);
L
Linus Torvalds 已提交
197 198 199 200

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

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

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

	return result;
}

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

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

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

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

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

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

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

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

	err = -ENOENT;

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

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

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

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

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

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

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

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

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

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

	BUG_ON(lo->magic != LO_MAGIC);

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

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

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

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

	BUG_ON(lo->magic != LO_MAGIC);

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

450

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

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

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

542 543
		spin_unlock_irq(q->queue_lock);

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

		lo = req->rq_disk->private_data;

		BUG_ON(lo->magic != LO_MAGIC);

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

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

564
		wake_up(&lo->waiting_wq);
565

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

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

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

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

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

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

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

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

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

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

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

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

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

		mutex_unlock(&lo->tx_lock);

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

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

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

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

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

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

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

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

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

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

760 761 762 763 764 765
	if ((1UL << part_shift) > DISK_MAX_PARTS)
		return -EINVAL;

	if (nbds_max > 1UL << (MINORBITS - part_shift))
		return -EINVAL;

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

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

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

	return 0;
out:
	while (i--) {
		blk_cleanup_queue(nbd_dev[i].disk->queue);
		put_disk(nbd_dev[i].disk);
	}
823
	kfree(nbd_dev);
L
Linus Torvalds 已提交
824 825 826 827 828 829
	return err;
}

static void __exit nbd_cleanup(void)
{
	int i;
830
	for (i = 0; i < nbds_max; i++) {
L
Linus Torvalds 已提交
831
		struct gendisk *disk = nbd_dev[i].disk;
832
		nbd_dev[i].magic = 0;
L
Linus Torvalds 已提交
833 834 835 836 837 838 839
		if (disk) {
			del_gendisk(disk);
			blk_cleanup_queue(disk->queue);
			put_disk(disk);
		}
	}
	unregister_blkdev(NBD_MAJOR, "nbd");
840
	kfree(nbd_dev);
L
Linus Torvalds 已提交
841 842 843 844 845 846 847 848 849
	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");

850
module_param(nbds_max, int, 0444);
L
Laurent Vivier 已提交
851 852 853
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 已提交
854 855 856 857
#ifndef NDEBUG
module_param(debugflags, int, 0644);
MODULE_PARM_DESC(debugflags, "flags for controlling debug output");
#endif