nbd.c 20.4 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
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) {
130
		dev_warn(disk_to_dev(lo->disk), "shutting down socket\n");
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
	if (unlikely(!sock)) {
160 161 162
		dev_err(disk_to_dev(lo->disk),
			"Attempted %s on closed socket in sock_xmit\n",
			(send ? "send" : "recv"));
163 164 165
		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
	if (result <= 0) {
253 254
		dev_err(disk_to_dev(lo->disk),
			"Send control failed (result %d)\n", result);
L
Linus Torvalds 已提交
255 256 257 258
		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
			if (result <= 0) {
273 274 275
				dev_err(disk_to_dev(lo->disk),
					"Send data failed (result %d)\n",
					result);
276 277
				goto error_out;
			}
L
Linus Torvalds 已提交
278 279 280 281 282
		}
	}
	return 0;

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

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

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

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

	err = -ENOENT;

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

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

	if (ntohl(reply.magic) != NBD_REPLY_MAGIC) {
338
		dev_err(disk_to_dev(lo->disk), "Wrong magic (0x%lx)\n",
339 340 341 342 343
				(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;

350 351
		dev_err(disk_to_dev(lo->disk), "Unexpected reply (%p)\n",
			reply.handle);
L
Linus Torvalds 已提交
352 353 354 355 356
		result = -EBADR;
		goto harderror;
	}

	if (ntohl(reply.error)) {
357 358
		dev_err(disk_to_dev(lo->disk), "Other side returned error (%d)\n",
			ntohl(reply.error));
L
Linus Torvalds 已提交
359 360 361 362 363 364 365
		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
			if (result <= 0) {
372 373
				dev_err(disk_to_dev(lo->disk), "Receive data failed (result %d)\n",
					result);
374 375 376 377 378
				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 = task_pid_nr(current);
409
	ret = device_create_file(disk_to_dev(lo->disk), &pid_attr);
410
	if (ret) {
411
		dev_err(disk_to_dev(lo->disk), "device_create_file failed!\n");
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
	device_remove_file(disk_to_dev(lo->disk), &pid_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
		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) {
460 461
			dev_err(disk_to_dev(lo->disk),
				"Write on read-only\n");
462 463 464 465 466 467 468 469 470
			goto error_out;
		}
	}

	req->errors = 0;

	mutex_lock(&lo->tx_lock);
	if (unlikely(!lo->sock)) {
		mutex_unlock(&lo->tx_lock);
471 472
		dev_err(disk_to_dev(lo->disk),
			"Attempted send on closed socket\n");
P
Pavel Machek 已提交
473
		goto error_out;
474 475 476 477 478
	}

	lo->active_req = req;

	if (nbd_send_req(lo, req) != 0) {
479
		dev_err(disk_to_dev(lo->disk), "Request send failed\n");
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
		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
		if (unlikely(!lo->sock)) {
551 552
			dev_err(disk_to_dev(lo->disk),
				"Attempted send on closed socket\n");
553 554 555 556 557 558
			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;

578
		dev_info(disk_to_dev(lo->disk), "NBD_DISCONNECT\n");
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
		file = lo->file;
		lo->file = NULL;
		nbd_clear_que(lo);
676
		dev_warn(disk_to_dev(lo->disk), "queue cleared\n");
L
Linus Torvalds 已提交
677 678
		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
	case NBD_PRINT_DEBUG:
696 697
		dev_info(disk_to_dev(lo->disk),
			"next = %p, prev = %p, head = %p\n",
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 720 721 722 723 724
	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 已提交
725 726
}

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

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

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

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

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

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

759 760 761 762 763 764 765 766 767 768 769
		/*
		 * Adjust max_part according to part_shift as it is exported
		 * to user space so that user can know the max number of
		 * partition kernel should be able to manage.
		 *
		 * Note that -1 is required because partition 0 is reserved
		 * for the whole disk.
		 */
		max_part = (1UL << part_shift) - 1;
	}

770 771 772 773 774 775
	if ((1UL << part_shift) > DISK_MAX_PARTS)
		return -EINVAL;

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

776
	for (i = 0; i < nbds_max; i++) {
L
Laurent Vivier 已提交
777
		struct gendisk *disk = alloc_disk(1 << part_shift);
L
Linus Torvalds 已提交
778 779 780 781 782 783 784 785 786 787 788 789 790
		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;
		}
791 792 793 794
		/*
		 * Tell the block layer that we are not a rotational device
		 */
		queue_flag_set_unlocked(QUEUE_FLAG_NONROT, disk->queue);
L
Linus Torvalds 已提交
795 796 797 798 799 800 801 802 803 804
	}

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

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

	return 0;
out:
	while (i--) {
		blk_cleanup_queue(nbd_dev[i].disk->queue);
		put_disk(nbd_dev[i].disk);
	}
833
	kfree(nbd_dev);
L
Linus Torvalds 已提交
834 835 836 837 838 839
	return err;
}

static void __exit nbd_cleanup(void)
{
	int i;
840
	for (i = 0; i < nbds_max; i++) {
L
Linus Torvalds 已提交
841
		struct gendisk *disk = nbd_dev[i].disk;
842
		nbd_dev[i].magic = 0;
L
Linus Torvalds 已提交
843 844 845 846 847 848 849
		if (disk) {
			del_gendisk(disk);
			blk_cleanup_queue(disk->queue);
			put_disk(disk);
		}
	}
	unregister_blkdev(NBD_MAJOR, "nbd");
850
	kfree(nbd_dev);
L
Linus Torvalds 已提交
851 852 853 854 855 856 857 858 859
	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");

860
module_param(nbds_max, int, 0444);
L
Laurent Vivier 已提交
861 862 863
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 已提交
864 865 866 867
#ifndef NDEBUG
module_param(debugflags, int, 0644);
MODULE_PARM_DESC(debugflags, "flags for controlling debug output");
#endif