nfs4state.c 187.1 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
/*
*  Copyright (c) 2001 The Regents of the University of Michigan.
*  All rights reserved.
*
*  Kendrick Smith <kmsmith@umich.edu>
*  Andy Adamson <kandros@umich.edu>
*
*  Redistribution and use in source and binary forms, with or without
*  modification, are permitted provided that the following conditions
*  are met:
*
*  1. Redistributions of source code must retain the above copyright
*     notice, this list of conditions and the following disclaimer.
*  2. Redistributions in binary form must reproduce the above copyright
*     notice, this list of conditions and the following disclaimer in the
*     documentation and/or other materials provided with the distribution.
*  3. Neither the name of the University nor the names of its
*     contributors may be used to endorse or promote products derived
*     from this software without specific prior written permission.
*
*  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
*  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
*  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
*  DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
*  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
*  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
*  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
*  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
*  LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
*  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
*  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
*/

35
#include <linux/file.h>
36
#include <linux/fs.h>
37
#include <linux/slab.h>
38
#include <linux/namei.h>
39
#include <linux/swap.h>
40
#include <linux/pagemap.h>
41
#include <linux/ratelimit.h>
42
#include <linux/sunrpc/svcauth_gss.h>
43
#include <linux/sunrpc/addr.h>
44
#include <linux/jhash.h>
45
#include "xdr4.h"
46
#include "xdr4cb.h"
47
#include "vfs.h"
48
#include "current_stateid.h"
L
Linus Torvalds 已提交
49

50
#include "netns.h"
51
#include "pnfs.h"
52

L
Linus Torvalds 已提交
53 54
#define NFSDDBG_FACILITY                NFSDDBG_PROC

55 56 57 58 59 60 61 62
#define all_ones {{~0,~0},~0}
static const stateid_t one_stateid = {
	.si_generation = ~0,
	.si_opaque = all_ones,
};
static const stateid_t zero_stateid = {
	/* all fields zero */
};
63 64 65
static const stateid_t currentstateid = {
	.si_generation = 1,
};
66 67 68
static const stateid_t close_stateid = {
	.si_generation = 0xffffffffU,
};
69

A
Andy Adamson 已提交
70
static u64 current_sessionid = 1;
71

72 73
#define ZERO_STATEID(stateid) (!memcmp((stateid), &zero_stateid, sizeof(stateid_t)))
#define ONE_STATEID(stateid)  (!memcmp((stateid), &one_stateid, sizeof(stateid_t)))
74
#define CURRENT_STATEID(stateid) (!memcmp((stateid), &currentstateid, sizeof(stateid_t)))
75
#define CLOSE_STATEID(stateid)  (!memcmp((stateid), &close_stateid, sizeof(stateid_t)))
L
Linus Torvalds 已提交
76 77

/* forward declarations */
78
static bool check_for_locks(struct nfs4_file *fp, struct nfs4_lockowner *lowner);
79
static void nfs4_free_ol_stateid(struct nfs4_stid *stid);
L
Linus Torvalds 已提交
80

81 82 83 84 85 86 87
/* Locking: */

/*
 * Currently used for the del_recall_lru and file hash table.  In an
 * effort to decrease the scope of the client_mutex, this spinlock may
 * eventually cover more:
 */
88
static DEFINE_SPINLOCK(state_lock);
89

90 91 92 93 94
enum nfsd4_st_mutex_lock_subclass {
	OPEN_STATEID_MUTEX = 0,
	LOCK_STATEID_MUTEX = 1,
};

95 96 97 98 99 100
/*
 * A waitqueue for all in-progress 4.0 CLOSE operations that are waiting for
 * the refcount on the open stateid to drop.
 */
static DECLARE_WAIT_QUEUE_HEAD(close_wq);

C
Christoph Hellwig 已提交
101 102 103 104 105
static struct kmem_cache *openowner_slab;
static struct kmem_cache *lockowner_slab;
static struct kmem_cache *file_slab;
static struct kmem_cache *stateid_slab;
static struct kmem_cache *deleg_slab;
106
static struct kmem_cache *odstate_slab;
N
NeilBrown 已提交
107

108
static void free_session(struct nfsd4_session *);
109

110
static const struct nfsd4_callback_ops nfsd4_cb_recall_ops;
111
static const struct nfsd4_callback_ops nfsd4_cb_notify_lock_ops;
112

113
static bool is_session_dead(struct nfsd4_session *ses)
114
{
115
	return ses->se_flags & NFS4_SESSION_DEAD;
116 117
}

118
static __be32 mark_session_dead_locked(struct nfsd4_session *ses, int ref_held_by_me)
119
{
120
	if (atomic_read(&ses->se_ref) > ref_held_by_me)
121 122 123
		return nfserr_jukebox;
	ses->se_flags |= NFS4_SESSION_DEAD;
	return nfs_ok;
124 125
}

126 127 128 129 130 131 132
static bool is_client_expired(struct nfs4_client *clp)
{
	return clp->cl_time == 0;
}

static __be32 get_client_locked(struct nfs4_client *clp)
{
133 134 135 136
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);

137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164
	if (is_client_expired(clp))
		return nfserr_expired;
	atomic_inc(&clp->cl_refcount);
	return nfs_ok;
}

/* must be called under the client_lock */
static inline void
renew_client_locked(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	if (is_client_expired(clp)) {
		WARN_ON(1);
		printk("%s: client (clientid %08x/%08x) already expired\n",
			__func__,
			clp->cl_clientid.cl_boot,
			clp->cl_clientid.cl_id);
		return;
	}

	dprintk("renewing client (clientid %08x/%08x)\n",
			clp->cl_clientid.cl_boot,
			clp->cl_clientid.cl_id);
	list_move_tail(&clp->cl_lru, &nn->client_lru);
	clp->cl_time = get_seconds();
}

165
static void put_client_renew_locked(struct nfs4_client *clp)
166
{
167 168 169 170
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);

171 172 173 174 175 176
	if (!atomic_dec_and_test(&clp->cl_refcount))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
}

177 178 179 180
static void put_client_renew(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

181 182 183 184
	if (!atomic_dec_and_lock(&clp->cl_refcount, &nn->client_lock))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
185 186 187
	spin_unlock(&nn->client_lock);
}

188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203
static __be32 nfsd4_get_session_locked(struct nfsd4_session *ses)
{
	__be32 status;

	if (is_session_dead(ses))
		return nfserr_badsession;
	status = get_client_locked(ses->se_client);
	if (status)
		return status;
	atomic_inc(&ses->se_ref);
	return nfs_ok;
}

static void nfsd4_put_session_locked(struct nfsd4_session *ses)
{
	struct nfs4_client *clp = ses->se_client;
204 205 206
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);
207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222

	if (atomic_dec_and_test(&ses->se_ref) && is_session_dead(ses))
		free_session(ses);
	put_client_renew_locked(clp);
}

static void nfsd4_put_session(struct nfsd4_session *ses)
{
	struct nfs4_client *clp = ses->se_client;
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	spin_lock(&nn->client_lock);
	nfsd4_put_session_locked(ses);
	spin_unlock(&nn->client_lock);
}

223 224 225 226 227 228
static struct nfsd4_blocked_lock *
find_blocked_lock(struct nfs4_lockowner *lo, struct knfsd_fh *fh,
			struct nfsd_net *nn)
{
	struct nfsd4_blocked_lock *cur, *found = NULL;

229
	spin_lock(&nn->blocked_locks_lock);
230 231 232
	list_for_each_entry(cur, &lo->lo_blocked, nbl_list) {
		if (fh_match(fh, &cur->nbl_fh)) {
			list_del_init(&cur->nbl_list);
233
			list_del_init(&cur->nbl_lru);
234 235 236 237
			found = cur;
			break;
		}
	}
238
	spin_unlock(&nn->blocked_locks_lock);
239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270
	if (found)
		posix_unblock_lock(&found->nbl_lock);
	return found;
}

static struct nfsd4_blocked_lock *
find_or_allocate_block(struct nfs4_lockowner *lo, struct knfsd_fh *fh,
			struct nfsd_net *nn)
{
	struct nfsd4_blocked_lock *nbl;

	nbl = find_blocked_lock(lo, fh, nn);
	if (!nbl) {
		nbl= kmalloc(sizeof(*nbl), GFP_KERNEL);
		if (nbl) {
			fh_copy_shallow(&nbl->nbl_fh, fh);
			locks_init_lock(&nbl->nbl_lock);
			nfsd4_init_cb(&nbl->nbl_cb, lo->lo_owner.so_client,
					&nfsd4_cb_notify_lock_ops,
					NFSPROC4_CLNT_CB_NOTIFY_LOCK);
		}
	}
	return nbl;
}

static void
free_blocked_lock(struct nfsd4_blocked_lock *nbl)
{
	locks_release_private(&nbl->nbl_lock);
	kfree(nbl);
}

271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299
static void
remove_blocked_locks(struct nfs4_lockowner *lo)
{
	struct nfs4_client *clp = lo->lo_owner.so_client;
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
	struct nfsd4_blocked_lock *nbl;
	LIST_HEAD(reaplist);

	/* Dequeue all blocked locks */
	spin_lock(&nn->blocked_locks_lock);
	while (!list_empty(&lo->lo_blocked)) {
		nbl = list_first_entry(&lo->lo_blocked,
					struct nfsd4_blocked_lock,
					nbl_list);
		list_del_init(&nbl->nbl_list);
		list_move(&nbl->nbl_lru, &reaplist);
	}
	spin_unlock(&nn->blocked_locks_lock);

	/* Now free them */
	while (!list_empty(&reaplist)) {
		nbl = list_first_entry(&reaplist, struct nfsd4_blocked_lock,
					nbl_lru);
		list_del_init(&nbl->nbl_lru);
		posix_unblock_lock(&nbl->nbl_lock);
		free_blocked_lock(nbl);
	}
}

300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330
static int
nfsd4_cb_notify_lock_done(struct nfsd4_callback *cb, struct rpc_task *task)
{
	/*
	 * Since this is just an optimization, we don't try very hard if it
	 * turns out not to succeed. We'll requeue it on NFS4ERR_DELAY, and
	 * just quit trying on anything else.
	 */
	switch (task->tk_status) {
	case -NFS4ERR_DELAY:
		rpc_delay(task, 1 * HZ);
		return 0;
	default:
		return 1;
	}
}

static void
nfsd4_cb_notify_lock_release(struct nfsd4_callback *cb)
{
	struct nfsd4_blocked_lock	*nbl = container_of(cb,
						struct nfsd4_blocked_lock, nbl_cb);

	free_blocked_lock(nbl);
}

static const struct nfsd4_callback_ops nfsd4_cb_notify_lock_ops = {
	.done		= nfsd4_cb_notify_lock_done,
	.release	= nfsd4_cb_notify_lock_release,
};

331 332 333 334 335 336 337
static inline struct nfs4_stateowner *
nfs4_get_stateowner(struct nfs4_stateowner *sop)
{
	atomic_inc(&sop->so_count);
	return sop;
}

338
static int
339
same_owner_str(struct nfs4_stateowner *sop, struct xdr_netobj *owner)
340 341
{
	return (sop->so_owner.len == owner->len) &&
342
		0 == memcmp(sop->so_owner.data, owner->data, owner->len);
343 344 345 346
}

static struct nfs4_openowner *
find_openstateowner_str_locked(unsigned int hashval, struct nfsd4_open *open,
347
			struct nfs4_client *clp)
348 349 350
{
	struct nfs4_stateowner *so;

351
	lockdep_assert_held(&clp->cl_lock);
352

353 354
	list_for_each_entry(so, &clp->cl_ownerstr_hashtbl[hashval],
			    so_strhash) {
355 356
		if (!so->so_is_open_owner)
			continue;
357 358
		if (same_owner_str(so, &open->op_owner))
			return openowner(nfs4_get_stateowner(so));
359 360 361 362 363 364
	}
	return NULL;
}

static struct nfs4_openowner *
find_openstateowner_str(unsigned int hashval, struct nfsd4_open *open,
365
			struct nfs4_client *clp)
366 367 368
{
	struct nfs4_openowner *oo;

369 370 371
	spin_lock(&clp->cl_lock);
	oo = find_openstateowner_str_locked(hashval, open, clp);
	spin_unlock(&clp->cl_lock);
372 373 374
	return oo;
}

L
Linus Torvalds 已提交
375 376 377 378 379 380 381 382 383 384 385 386 387
static inline u32
opaque_hashval(const void *ptr, int nbytes)
{
	unsigned char *cptr = (unsigned char *) ptr;

	u32 x = 0;
	while (nbytes--) {
		x *= 37;
		x += *cptr++;
	}
	return x;
}

388
static void nfsd4_free_file_rcu(struct rcu_head *rcu)
389
{
390 391 392
	struct nfs4_file *fp = container_of(rcu, struct nfs4_file, fi_rcu);

	kmem_cache_free(file_slab, fp);
393 394
}

395
void
396 397
put_nfs4_file(struct nfs4_file *fi)
{
398 399
	might_lock(&state_lock);

400
	if (refcount_dec_and_lock(&fi->fi_ref, &state_lock)) {
401
		hlist_del_rcu(&fi->fi_hash);
402
		spin_unlock(&state_lock);
403
		WARN_ON_ONCE(!list_empty(&fi->fi_clnt_odstate));
404 405
		WARN_ON_ONCE(!list_empty(&fi->fi_delegations));
		call_rcu(&fi->fi_rcu, nfsd4_free_file_rcu);
406
	}
407 408
}

409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465
static struct file *
__nfs4_get_fd(struct nfs4_file *f, int oflag)
{
	if (f->fi_fds[oflag])
		return get_file(f->fi_fds[oflag]);
	return NULL;
}

static struct file *
find_writeable_file_locked(struct nfs4_file *f)
{
	struct file *ret;

	lockdep_assert_held(&f->fi_lock);

	ret = __nfs4_get_fd(f, O_WRONLY);
	if (!ret)
		ret = __nfs4_get_fd(f, O_RDWR);
	return ret;
}

static struct file *
find_writeable_file(struct nfs4_file *f)
{
	struct file *ret;

	spin_lock(&f->fi_lock);
	ret = find_writeable_file_locked(f);
	spin_unlock(&f->fi_lock);

	return ret;
}

static struct file *find_readable_file_locked(struct nfs4_file *f)
{
	struct file *ret;

	lockdep_assert_held(&f->fi_lock);

	ret = __nfs4_get_fd(f, O_RDONLY);
	if (!ret)
		ret = __nfs4_get_fd(f, O_RDWR);
	return ret;
}

static struct file *
find_readable_file(struct nfs4_file *f)
{
	struct file *ret;

	spin_lock(&f->fi_lock);
	ret = find_readable_file_locked(f);
	spin_unlock(&f->fi_lock);

	return ret;
}

466
struct file *
467 468 469 470 471 472 473 474 475 476 477 478 479 480 481
find_any_file(struct nfs4_file *f)
{
	struct file *ret;

	spin_lock(&f->fi_lock);
	ret = __nfs4_get_fd(f, O_RDWR);
	if (!ret) {
		ret = __nfs4_get_fd(f, O_WRONLY);
		if (!ret)
			ret = __nfs4_get_fd(f, O_RDONLY);
	}
	spin_unlock(&f->fi_lock);
	return ret;
}

482
static atomic_long_t num_delegations;
483
unsigned long max_delegations;
484 485 486 487 488

/*
 * Open owner state (share locks)
 */

489 490 491 492
/* hash tables for lock and open owners */
#define OWNER_HASH_BITS              8
#define OWNER_HASH_SIZE             (1 << OWNER_HASH_BITS)
#define OWNER_HASH_MASK             (OWNER_HASH_SIZE - 1)
493

494
static unsigned int ownerstr_hashval(struct xdr_netobj *ownername)
495 496 497 498
{
	unsigned int ret;

	ret = opaque_hashval(ownername->data, ownername->len);
499
	return ret & OWNER_HASH_MASK;
500
}
501 502 503 504

/* hash table for nfs4_file */
#define FILE_HASH_BITS                   8
#define FILE_HASH_SIZE                  (1 << FILE_HASH_BITS)
S
Shan Wei 已提交
505

506
static unsigned int nfsd_fh_hashval(struct knfsd_fh *fh)
507
{
508 509 510 511 512 513 514 515
	return jhash2(fh->fh_base.fh_pad, XDR_QUADLEN(fh->fh_size), 0);
}

static unsigned int file_hashval(struct knfsd_fh *fh)
{
	return nfsd_fh_hashval(fh) & (FILE_HASH_SIZE - 1);
}

516
static struct hlist_head file_hashtbl[FILE_HASH_SIZE];
517

518 519
static void
__nfs4_file_get_access(struct nfs4_file *fp, u32 access)
520
{
521 522
	lockdep_assert_held(&fp->fi_lock);

523 524 525 526
	if (access & NFS4_SHARE_ACCESS_WRITE)
		atomic_inc(&fp->fi_access[O_WRONLY]);
	if (access & NFS4_SHARE_ACCESS_READ)
		atomic_inc(&fp->fi_access[O_RDONLY]);
527 528
}

529 530
static __be32
nfs4_file_get_access(struct nfs4_file *fp, u32 access)
531
{
532 533
	lockdep_assert_held(&fp->fi_lock);

534 535 536 537
	/* Does this access mode make sense? */
	if (access & ~NFS4_SHARE_ACCESS_BOTH)
		return nfserr_inval;

538 539 540 541
	/* Does it conflict with a deny mode already set? */
	if ((access & fp->fi_share_deny) != 0)
		return nfserr_share_denied;

542 543
	__nfs4_file_get_access(fp, access);
	return nfs_ok;
544 545
}

546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564
static __be32 nfs4_file_check_deny(struct nfs4_file *fp, u32 deny)
{
	/* Common case is that there is no deny mode. */
	if (deny) {
		/* Does this deny mode make sense? */
		if (deny & ~NFS4_SHARE_DENY_BOTH)
			return nfserr_inval;

		if ((deny & NFS4_SHARE_DENY_READ) &&
		    atomic_read(&fp->fi_access[O_RDONLY]))
			return nfserr_share_denied;

		if ((deny & NFS4_SHARE_DENY_WRITE) &&
		    atomic_read(&fp->fi_access[O_WRONLY]))
			return nfserr_share_denied;
	}
	return nfs_ok;
}

565
static void __nfs4_file_put_access(struct nfs4_file *fp, int oflag)
566
{
567 568 569 570 571 572
	might_lock(&fp->fi_lock);

	if (atomic_dec_and_lock(&fp->fi_access[oflag], &fp->fi_lock)) {
		struct file *f1 = NULL;
		struct file *f2 = NULL;

J
Jeff Layton 已提交
573
		swap(f1, fp->fi_fds[oflag]);
574
		if (atomic_read(&fp->fi_access[1 - oflag]) == 0)
J
Jeff Layton 已提交
575
			swap(f2, fp->fi_fds[O_RDWR]);
576 577 578 579 580
		spin_unlock(&fp->fi_lock);
		if (f1)
			fput(f1);
		if (f2)
			fput(f2);
581 582 583
	}
}

584
static void nfs4_file_put_access(struct nfs4_file *fp, u32 access)
585
{
586 587 588
	WARN_ON_ONCE(access & ~NFS4_SHARE_ACCESS_BOTH);

	if (access & NFS4_SHARE_ACCESS_WRITE)
589
		__nfs4_file_put_access(fp, O_WRONLY);
590 591
	if (access & NFS4_SHARE_ACCESS_READ)
		__nfs4_file_put_access(fp, O_RDONLY);
592 593
}

594 595 596 597 598 599 600 601 602 603 604 605 606 607 608
/*
 * Allocate a new open/delegation state counter. This is needed for
 * pNFS for proper return on close semantics.
 *
 * Note that we only allocate it for pNFS-enabled exports, otherwise
 * all pointers to struct nfs4_clnt_odstate are always NULL.
 */
static struct nfs4_clnt_odstate *
alloc_clnt_odstate(struct nfs4_client *clp)
{
	struct nfs4_clnt_odstate *co;

	co = kmem_cache_zalloc(odstate_slab, GFP_KERNEL);
	if (co) {
		co->co_client = clp;
609
		refcount_set(&co->co_odcount, 1);
610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626
	}
	return co;
}

static void
hash_clnt_odstate_locked(struct nfs4_clnt_odstate *co)
{
	struct nfs4_file *fp = co->co_file;

	lockdep_assert_held(&fp->fi_lock);
	list_add(&co->co_perfile, &fp->fi_clnt_odstate);
}

static inline void
get_clnt_odstate(struct nfs4_clnt_odstate *co)
{
	if (co)
627
		refcount_inc(&co->co_odcount);
628 629 630 631 632 633 634 635 636 637 638
}

static void
put_clnt_odstate(struct nfs4_clnt_odstate *co)
{
	struct nfs4_file *fp;

	if (!co)
		return;

	fp = co->co_file;
639
	if (refcount_dec_and_lock(&co->co_odcount, &fp->fi_lock)) {
640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673
		list_del(&co->co_perfile);
		spin_unlock(&fp->fi_lock);

		nfsd4_return_all_file_layouts(co->co_client, fp);
		kmem_cache_free(odstate_slab, co);
	}
}

static struct nfs4_clnt_odstate *
find_or_hash_clnt_odstate(struct nfs4_file *fp, struct nfs4_clnt_odstate *new)
{
	struct nfs4_clnt_odstate *co;
	struct nfs4_client *cl;

	if (!new)
		return NULL;

	cl = new->co_client;

	spin_lock(&fp->fi_lock);
	list_for_each_entry(co, &fp->fi_clnt_odstate, co_perfile) {
		if (co->co_client == cl) {
			get_clnt_odstate(co);
			goto out;
		}
	}
	co = new;
	co->co_file = fp;
	hash_clnt_odstate_locked(new);
out:
	spin_unlock(&fp->fi_lock);
	return co;
}

674 675
struct nfs4_stid *nfs4_alloc_stid(struct nfs4_client *cl, struct kmem_cache *slab,
				  void (*sc_free)(struct nfs4_stid *))
676
{
J
J. Bruce Fields 已提交
677
	struct nfs4_stid *stid;
J
J. Bruce Fields 已提交
678
	int new_id;
679

680
	stid = kmem_cache_zalloc(slab, GFP_KERNEL);
J
J. Bruce Fields 已提交
681 682 683
	if (!stid)
		return NULL;

684 685 686 687 688
	idr_preload(GFP_KERNEL);
	spin_lock(&cl->cl_lock);
	new_id = idr_alloc_cyclic(&cl->cl_stateids, stid, 0, 0, GFP_NOWAIT);
	spin_unlock(&cl->cl_lock);
	idr_preload_end();
T
Tejun Heo 已提交
689
	if (new_id < 0)
J
J. Bruce Fields 已提交
690
		goto out_free;
691 692

	stid->sc_free = sc_free;
693
	stid->sc_client = cl;
J
J. Bruce Fields 已提交
694 695
	stid->sc_stateid.si_opaque.so_id = new_id;
	stid->sc_stateid.si_opaque.so_clid = cl->cl_clientid;
696
	/* Will be incremented before return to client: */
697
	refcount_set(&stid->sc_count, 1);
698
	spin_lock_init(&stid->sc_lock);
699 700

	/*
J
J. Bruce Fields 已提交
701 702 703 704 705 706 707
	 * It shouldn't be a problem to reuse an opaque stateid value.
	 * I don't think it is for 4.1.  But with 4.0 I worry that, for
	 * example, a stray write retransmission could be accepted by
	 * the server when it should have been rejected.  Therefore,
	 * adopt a trick from the sctp code to attempt to maximize the
	 * amount of time until an id is reused, by ensuring they always
	 * "increase" (mod INT_MAX):
708
	 */
J
J. Bruce Fields 已提交
709 710
	return stid;
out_free:
711
	kmem_cache_free(slab, stid);
J
J. Bruce Fields 已提交
712
	return NULL;
713 714
}

715
static struct nfs4_ol_stateid * nfs4_alloc_open_stateid(struct nfs4_client *clp)
716
{
717 718
	struct nfs4_stid *stid;

719
	stid = nfs4_alloc_stid(clp, stateid_slab, nfs4_free_ol_stateid);
720 721 722
	if (!stid)
		return NULL;

723
	return openlockstateid(stid);
724 725 726 727 728 729
}

static void nfs4_free_deleg(struct nfs4_stid *stid)
{
	kmem_cache_free(deleg_slab, stid);
	atomic_long_dec(&num_delegations);
730 731
}

732 733 734 735 736 737 738 739 740 741 742 743 744 745
/*
 * When we recall a delegation, we should be careful not to hand it
 * out again straight away.
 * To ensure this we keep a pair of bloom filters ('new' and 'old')
 * in which the filehandles of recalled delegations are "stored".
 * If a filehandle appear in either filter, a delegation is blocked.
 * When a delegation is recalled, the filehandle is stored in the "new"
 * filter.
 * Every 30 seconds we swap the filters and clear the "new" one,
 * unless both are empty of course.
 *
 * Each filter is 256 bits.  We hash the filehandle to 32bit and use the
 * low 3 bytes as hash-table indices.
 *
746
 * 'blocked_delegations_lock', which is always taken in block_delegations(),
747 748 749
 * is used to manage concurrent access.  Testing does not need the lock
 * except when swapping the two filters.
 */
750
static DEFINE_SPINLOCK(blocked_delegations_lock);
751 752 753 754 755 756 757 758 759 760 761 762 763 764 765
static struct bloom_pair {
	int	entries, old_entries;
	time_t	swap_time;
	int	new; /* index into 'set' */
	DECLARE_BITMAP(set[2], 256);
} blocked_delegations;

static int delegation_blocked(struct knfsd_fh *fh)
{
	u32 hash;
	struct bloom_pair *bd = &blocked_delegations;

	if (bd->entries == 0)
		return 0;
	if (seconds_since_boot() - bd->swap_time > 30) {
766
		spin_lock(&blocked_delegations_lock);
767 768 769 770 771 772 773 774
		if (seconds_since_boot() - bd->swap_time > 30) {
			bd->entries -= bd->old_entries;
			bd->old_entries = bd->entries;
			memset(bd->set[bd->new], 0,
			       sizeof(bd->set[0]));
			bd->new = 1-bd->new;
			bd->swap_time = seconds_since_boot();
		}
775
		spin_unlock(&blocked_delegations_lock);
776
	}
777
	hash = jhash(&fh->fh_base, fh->fh_size, 0);
778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795
	if (test_bit(hash&255, bd->set[0]) &&
	    test_bit((hash>>8)&255, bd->set[0]) &&
	    test_bit((hash>>16)&255, bd->set[0]))
		return 1;

	if (test_bit(hash&255, bd->set[1]) &&
	    test_bit((hash>>8)&255, bd->set[1]) &&
	    test_bit((hash>>16)&255, bd->set[1]))
		return 1;

	return 0;
}

static void block_delegations(struct knfsd_fh *fh)
{
	u32 hash;
	struct bloom_pair *bd = &blocked_delegations;

796
	hash = jhash(&fh->fh_base, fh->fh_size, 0);
797

798
	spin_lock(&blocked_delegations_lock);
799 800 801 802 803 804
	__set_bit(hash&255, bd->set[bd->new]);
	__set_bit((hash>>8)&255, bd->set[bd->new]);
	__set_bit((hash>>16)&255, bd->set[bd->new]);
	if (bd->entries == 0)
		bd->swap_time = seconds_since_boot();
	bd->entries += 1;
805
	spin_unlock(&blocked_delegations_lock);
806 807
}

L
Linus Torvalds 已提交
808
static struct nfs4_delegation *
809 810
alloc_init_deleg(struct nfs4_client *clp, struct svc_fh *current_fh,
		 struct nfs4_clnt_odstate *odstate)
L
Linus Torvalds 已提交
811 812
{
	struct nfs4_delegation *dp;
813
	long n;
L
Linus Torvalds 已提交
814 815

	dprintk("NFSD alloc_init_deleg\n");
816 817 818
	n = atomic_long_inc_return(&num_delegations);
	if (n < 0 || n > max_delegations)
		goto out_dec;
819
	if (delegation_blocked(&current_fh->fh_handle))
820
		goto out_dec;
821
	dp = delegstateid(nfs4_alloc_stid(clp, deleg_slab, nfs4_free_deleg));
N
NeilBrown 已提交
822
	if (dp == NULL)
823
		goto out_dec;
824

825 826
	/*
	 * delegation seqid's are never incremented.  The 4.1 special
J
J. Bruce Fields 已提交
827 828
	 * meaning of seqid 0 isn't meaningful, really, but let's avoid
	 * 0 anyway just for consistency and use 1:
829 830
	 */
	dp->dl_stid.sc_stateid.si_generation = 1;
831 832
	INIT_LIST_HEAD(&dp->dl_perfile);
	INIT_LIST_HEAD(&dp->dl_perclnt);
L
Linus Torvalds 已提交
833
	INIT_LIST_HEAD(&dp->dl_recall_lru);
834 835
	dp->dl_clnt_odstate = odstate;
	get_clnt_odstate(odstate);
836
	dp->dl_type = NFS4_OPEN_DELEGATE_READ;
837 838
	dp->dl_retries = 1;
	nfsd4_init_cb(&dp->dl_recall, dp->dl_stid.sc_client,
839
		      &nfsd4_cb_recall_ops, NFSPROC4_CLNT_CB_RECALL);
L
Linus Torvalds 已提交
840
	return dp;
841 842 843
out_dec:
	atomic_long_dec(&num_delegations);
	return NULL;
L
Linus Torvalds 已提交
844 845 846
}

void
847
nfs4_put_stid(struct nfs4_stid *s)
L
Linus Torvalds 已提交
848
{
849
	struct nfs4_file *fp = s->sc_file;
850 851
	struct nfs4_client *clp = s->sc_client;

852 853
	might_lock(&clp->cl_lock);

854
	if (!refcount_dec_and_lock(&s->sc_count, &clp->cl_lock)) {
855
		wake_up_all(&close_wq);
856
		return;
857
	}
858
	idr_remove(&clp->cl_stateids, s->sc_stateid.si_opaque.so_id);
859
	spin_unlock(&clp->cl_lock);
860
	s->sc_free(s);
861 862
	if (fp)
		put_nfs4_file(fp);
L
Linus Torvalds 已提交
863 864
}

865 866 867 868 869 870 871 872 873 874 875 876
void
nfs4_inc_and_copy_stateid(stateid_t *dst, struct nfs4_stid *stid)
{
	stateid_t *src = &stid->sc_stateid;

	spin_lock(&stid->sc_lock);
	if (unlikely(++src->si_generation == 0))
		src->si_generation = 1;
	memcpy(dst, src, sizeof(*dst));
	spin_unlock(&stid->sc_lock);
}

877
static void nfs4_put_deleg_lease(struct nfs4_file *fp)
L
Linus Torvalds 已提交
878
{
879
	struct file *filp = NULL;
880

881
	spin_lock(&fp->fi_lock);
882
	if (fp->fi_deleg_file && --fp->fi_delegees == 0)
883 884 885 886
		swap(filp, fp->fi_deleg_file);
	spin_unlock(&fp->fi_lock);

	if (filp) {
887
		vfs_setlease(filp, F_UNLCK, NULL, (void **)&fp);
888
		fput(filp);
889
	}
L
Linus Torvalds 已提交
890 891
}

892
void nfs4_unhash_stid(struct nfs4_stid *s)
J
J. Bruce Fields 已提交
893
{
J
J. Bruce Fields 已提交
894
	s->sc_type = 0;
J
J. Bruce Fields 已提交
895 896
}

897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941
/**
 * nfs4_get_existing_delegation - Discover if this delegation already exists
 * @clp:     a pointer to the nfs4_client we're granting a delegation to
 * @fp:      a pointer to the nfs4_file we're granting a delegation on
 *
 * Return:
 *      On success: NULL if an existing delegation was not found.
 *
 *      On error: -EAGAIN if one was previously granted to this nfs4_client
 *                 for this nfs4_file.
 *
 */

static int
nfs4_get_existing_delegation(struct nfs4_client *clp, struct nfs4_file *fp)
{
	struct nfs4_delegation *searchdp = NULL;
	struct nfs4_client *searchclp = NULL;

	lockdep_assert_held(&state_lock);
	lockdep_assert_held(&fp->fi_lock);

	list_for_each_entry(searchdp, &fp->fi_delegations, dl_perfile) {
		searchclp = searchdp->dl_stid.sc_client;
		if (clp == searchclp) {
			return -EAGAIN;
		}
	}
	return 0;
}

/**
 * hash_delegation_locked - Add a delegation to the appropriate lists
 * @dp:     a pointer to the nfs4_delegation we are adding.
 * @fp:     a pointer to the nfs4_file we're granting a delegation on
 *
 * Return:
 *      On success: NULL if the delegation was successfully hashed.
 *
 *      On error: -EAGAIN if one was previously granted to this
 *                 nfs4_client for this nfs4_file. Delegation is not hashed.
 *
 */

static int
942 943
hash_delegation_locked(struct nfs4_delegation *dp, struct nfs4_file *fp)
{
944 945 946
	int status;
	struct nfs4_client *clp = dp->dl_stid.sc_client;

947
	lockdep_assert_held(&state_lock);
948
	lockdep_assert_held(&fp->fi_lock);
949

950 951 952 953
	status = nfs4_get_existing_delegation(clp, fp);
	if (status)
		return status;
	++fp->fi_delegees;
954
	refcount_inc(&dp->dl_stid.sc_count);
955
	dp->dl_stid.sc_type = NFS4_DELEG_STID;
956
	list_add(&dp->dl_perfile, &fp->fi_delegations);
957 958
	list_add(&dp->dl_perclnt, &clp->cl_delegations);
	return 0;
959 960
}

961
static bool
962
unhash_delegation_locked(struct nfs4_delegation *dp)
L
Linus Torvalds 已提交
963
{
964
	struct nfs4_file *fp = dp->dl_stid.sc_file;
965

966 967
	lockdep_assert_held(&state_lock);

968 969 970
	if (list_empty(&dp->dl_perfile))
		return false;

971
	dp->dl_stid.sc_type = NFS4_CLOSED_DELEG_STID;
972 973
	/* Ensure that deleg break won't try to requeue it */
	++dp->dl_time;
974
	spin_lock(&fp->fi_lock);
975
	list_del_init(&dp->dl_perclnt);
L
Linus Torvalds 已提交
976
	list_del_init(&dp->dl_recall_lru);
977 978
	list_del_init(&dp->dl_perfile);
	spin_unlock(&fp->fi_lock);
979
	return true;
980 981 982 983
}

static void destroy_delegation(struct nfs4_delegation *dp)
{
984 985
	bool unhashed;

986
	spin_lock(&state_lock);
987
	unhashed = unhash_delegation_locked(dp);
988
	spin_unlock(&state_lock);
989 990 991 992 993
	if (unhashed) {
		put_clnt_odstate(dp->dl_clnt_odstate);
		nfs4_put_deleg_lease(dp->dl_stid.sc_file);
		nfs4_put_stid(&dp->dl_stid);
	}
994 995 996 997 998 999
}

static void revoke_delegation(struct nfs4_delegation *dp)
{
	struct nfs4_client *clp = dp->dl_stid.sc_client;

1000 1001
	WARN_ON(!list_empty(&dp->dl_recall_lru));

1002
	put_clnt_odstate(dp->dl_clnt_odstate);
1003 1004
	nfs4_put_deleg_lease(dp->dl_stid.sc_file);

1005
	if (clp->cl_minorversion == 0)
1006
		nfs4_put_stid(&dp->dl_stid);
1007 1008
	else {
		dp->dl_stid.sc_type = NFS4_REVOKED_DELEG_STID;
1009 1010 1011
		spin_lock(&clp->cl_lock);
		list_add(&dp->dl_recall_lru, &clp->cl_revoked);
		spin_unlock(&clp->cl_lock);
1012 1013 1014
	}
}

L
Linus Torvalds 已提交
1015 1016 1017 1018
/* 
 * SETCLIENTID state 
 */

1019 1020 1021 1022 1023 1024 1025 1026 1027 1028
static unsigned int clientid_hashval(u32 id)
{
	return id & CLIENT_HASH_MASK;
}

static unsigned int clientstr_hashval(const char *name)
{
	return opaque_hashval(name, 8) & CLIENT_HASH_MASK;
}

1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046
/*
 * We store the NONE, READ, WRITE, and BOTH bits separately in the
 * st_{access,deny}_bmap field of the stateid, in order to track not
 * only what share bits are currently in force, but also what
 * combinations of share bits previous opens have used.  This allows us
 * to enforce the recommendation of rfc 3530 14.2.19 that the server
 * return an error if the client attempt to downgrade to a combination
 * of share bits not explicable by closing some of its previous opens.
 *
 * XXX: This enforcement is actually incomplete, since we don't keep
 * track of access/deny bit combinations; so, e.g., we allow:
 *
 *	OPEN allow read, deny write
 *	OPEN allow both, deny none
 *	DOWNGRADE allow read, deny none
 *
 * which we should reject.
 */
1047 1048
static unsigned int
bmap_to_share_mode(unsigned long bmap) {
1049
	int i;
1050
	unsigned int access = 0;
1051 1052 1053

	for (i = 1; i < 4; i++) {
		if (test_bit(i, &bmap))
1054
			access |= i;
1055
	}
1056
	return access;
1057 1058
}

1059 1060 1061 1062
/* set share access for a given stateid */
static inline void
set_access(u32 access, struct nfs4_ol_stateid *stp)
{
1063 1064 1065 1066
	unsigned char mask = 1 << access;

	WARN_ON_ONCE(access > NFS4_SHARE_ACCESS_BOTH);
	stp->st_access_bmap |= mask;
1067 1068 1069 1070 1071 1072
}

/* clear share access for a given stateid */
static inline void
clear_access(u32 access, struct nfs4_ol_stateid *stp)
{
1073 1074 1075 1076
	unsigned char mask = 1 << access;

	WARN_ON_ONCE(access > NFS4_SHARE_ACCESS_BOTH);
	stp->st_access_bmap &= ~mask;
1077 1078 1079 1080 1081 1082
}

/* test whether a given stateid has access */
static inline bool
test_access(u32 access, struct nfs4_ol_stateid *stp)
{
1083 1084 1085
	unsigned char mask = 1 << access;

	return (bool)(stp->st_access_bmap & mask);
1086 1087
}

1088 1089
/* set share deny for a given stateid */
static inline void
1090
set_deny(u32 deny, struct nfs4_ol_stateid *stp)
1091
{
1092 1093 1094 1095
	unsigned char mask = 1 << deny;

	WARN_ON_ONCE(deny > NFS4_SHARE_DENY_BOTH);
	stp->st_deny_bmap |= mask;
1096 1097 1098 1099
}

/* clear share deny for a given stateid */
static inline void
1100
clear_deny(u32 deny, struct nfs4_ol_stateid *stp)
1101
{
1102 1103 1104 1105
	unsigned char mask = 1 << deny;

	WARN_ON_ONCE(deny > NFS4_SHARE_DENY_BOTH);
	stp->st_deny_bmap &= ~mask;
1106 1107 1108 1109
}

/* test whether a given stateid is denying specific access */
static inline bool
1110
test_deny(u32 deny, struct nfs4_ol_stateid *stp)
1111
{
1112 1113 1114
	unsigned char mask = 1 << deny;

	return (bool)(stp->st_deny_bmap & mask);
1115 1116 1117 1118
}

static int nfs4_access_to_omode(u32 access)
{
1119
	switch (access & NFS4_SHARE_ACCESS_BOTH) {
1120 1121 1122 1123 1124 1125 1126
	case NFS4_SHARE_ACCESS_READ:
		return O_RDONLY;
	case NFS4_SHARE_ACCESS_WRITE:
		return O_WRONLY;
	case NFS4_SHARE_ACCESS_BOTH:
		return O_RDWR;
	}
1127 1128
	WARN_ON_ONCE(1);
	return O_RDONLY;
1129 1130
}

1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161
/*
 * A stateid that had a deny mode associated with it is being released
 * or downgraded. Recalculate the deny mode on the file.
 */
static void
recalculate_deny_mode(struct nfs4_file *fp)
{
	struct nfs4_ol_stateid *stp;

	spin_lock(&fp->fi_lock);
	fp->fi_share_deny = 0;
	list_for_each_entry(stp, &fp->fi_stateids, st_perfile)
		fp->fi_share_deny |= bmap_to_share_mode(stp->st_deny_bmap);
	spin_unlock(&fp->fi_lock);
}

static void
reset_union_bmap_deny(u32 deny, struct nfs4_ol_stateid *stp)
{
	int i;
	bool change = false;

	for (i = 1; i < 4; i++) {
		if ((i & deny) != i) {
			change = true;
			clear_deny(i, stp);
		}
	}

	/* Recalculate per-file deny mode if there was a change */
	if (change)
1162
		recalculate_deny_mode(stp->st_stid.sc_file);
1163 1164
}

1165 1166 1167 1168 1169
/* release all access and file references for a given stateid */
static void
release_all_access(struct nfs4_ol_stateid *stp)
{
	int i;
1170
	struct nfs4_file *fp = stp->st_stid.sc_file;
1171 1172 1173

	if (fp && stp->st_deny_bmap != 0)
		recalculate_deny_mode(fp);
1174 1175 1176

	for (i = 1; i < 4; i++) {
		if (test_access(i, stp))
1177
			nfs4_file_put_access(stp->st_stid.sc_file, i);
1178 1179 1180 1181
		clear_access(i, stp);
	}
}

1182 1183 1184 1185 1186 1187
static inline void nfs4_free_stateowner(struct nfs4_stateowner *sop)
{
	kfree(sop->so_owner.data);
	sop->so_ops->so_free(sop);
}

1188 1189
static void nfs4_put_stateowner(struct nfs4_stateowner *sop)
{
1190 1191 1192 1193 1194
	struct nfs4_client *clp = sop->so_client;

	might_lock(&clp->cl_lock);

	if (!atomic_dec_and_lock(&sop->so_count, &clp->cl_lock))
1195
		return;
1196
	sop->so_ops->so_unhash(sop);
1197
	spin_unlock(&clp->cl_lock);
1198
	nfs4_free_stateowner(sop);
1199 1200
}

1201
static bool unhash_ol_stateid(struct nfs4_ol_stateid *stp)
1202
{
1203
	struct nfs4_file *fp = stp->st_stid.sc_file;
1204

1205 1206
	lockdep_assert_held(&stp->st_stateowner->so_client->cl_lock);

1207 1208 1209
	if (list_empty(&stp->st_perfile))
		return false;

1210
	spin_lock(&fp->fi_lock);
1211
	list_del_init(&stp->st_perfile);
1212
	spin_unlock(&fp->fi_lock);
1213
	list_del(&stp->st_perstateowner);
1214
	return true;
1215 1216
}

1217
static void nfs4_free_ol_stateid(struct nfs4_stid *stid)
1218
{
1219
	struct nfs4_ol_stateid *stp = openlockstateid(stid);
1220

1221
	put_clnt_odstate(stp->st_clnt_odstate);
1222
	release_all_access(stp);
1223 1224
	if (stp->st_stateowner)
		nfs4_put_stateowner(stp->st_stateowner);
1225
	kmem_cache_free(stateid_slab, stid);
1226 1227
}

1228
static void nfs4_free_lock_stateid(struct nfs4_stid *stid)
1229
{
1230 1231
	struct nfs4_ol_stateid *stp = openlockstateid(stid);
	struct nfs4_lockowner *lo = lockowner(stp->st_stateowner);
1232 1233
	struct file *file;

1234 1235 1236 1237 1238 1239
	file = find_any_file(stp->st_stid.sc_file);
	if (file)
		filp_close(file, (fl_owner_t)lo);
	nfs4_free_ol_stateid(stid);
}

1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254
/*
 * Put the persistent reference to an already unhashed generic stateid, while
 * holding the cl_lock. If it's the last reference, then put it onto the
 * reaplist for later destruction.
 */
static void put_ol_stateid_locked(struct nfs4_ol_stateid *stp,
				       struct list_head *reaplist)
{
	struct nfs4_stid *s = &stp->st_stid;
	struct nfs4_client *clp = s->sc_client;

	lockdep_assert_held(&clp->cl_lock);

	WARN_ON_ONCE(!list_empty(&stp->st_locks));

1255
	if (!refcount_dec_and_test(&s->sc_count)) {
1256 1257 1258 1259 1260 1261 1262 1263
		wake_up_all(&close_wq);
		return;
	}

	idr_remove(&clp->cl_stateids, s->sc_stateid.si_opaque.so_id);
	list_add(&stp->st_locks, reaplist);
}

1264
static bool unhash_lock_stateid(struct nfs4_ol_stateid *stp)
1265
{
1266
	lockdep_assert_held(&stp->st_stid.sc_client->cl_lock);
1267 1268

	list_del_init(&stp->st_locks);
1269
	nfs4_unhash_stid(&stp->st_stid);
1270
	return unhash_ol_stateid(stp);
1271 1272 1273 1274
}

static void release_lock_stateid(struct nfs4_ol_stateid *stp)
{
1275
	struct nfs4_client *clp = stp->st_stid.sc_client;
1276
	bool unhashed;
1277

1278
	spin_lock(&clp->cl_lock);
1279
	unhashed = unhash_lock_stateid(stp);
1280
	spin_unlock(&clp->cl_lock);
1281 1282
	if (unhashed)
		nfs4_put_stid(&stp->st_stid);
1283 1284
}

1285
static void unhash_lockowner_locked(struct nfs4_lockowner *lo)
1286
{
1287
	struct nfs4_client *clp = lo->lo_owner.so_client;
1288

1289
	lockdep_assert_held(&clp->cl_lock);
1290

1291 1292 1293
	list_del_init(&lo->lo_owner.so_strhash);
}

1294 1295 1296 1297 1298 1299 1300 1301
/*
 * Free a list of generic stateids that were collected earlier after being
 * fully unhashed.
 */
static void
free_ol_stateid_reaplist(struct list_head *reaplist)
{
	struct nfs4_ol_stateid *stp;
1302
	struct nfs4_file *fp;
1303 1304 1305 1306 1307 1308 1309

	might_sleep();

	while (!list_empty(reaplist)) {
		stp = list_first_entry(reaplist, struct nfs4_ol_stateid,
				       st_locks);
		list_del(&stp->st_locks);
1310
		fp = stp->st_stid.sc_file;
1311
		stp->st_stid.sc_free(&stp->st_stid);
1312 1313
		if (fp)
			put_nfs4_file(fp);
1314 1315 1316
	}
}

1317 1318
static void release_open_stateid_locks(struct nfs4_ol_stateid *open_stp,
				       struct list_head *reaplist)
1319 1320 1321
{
	struct nfs4_ol_stateid *stp;

1322 1323
	lockdep_assert_held(&open_stp->st_stid.sc_client->cl_lock);

1324 1325 1326
	while (!list_empty(&open_stp->st_locks)) {
		stp = list_entry(open_stp->st_locks.next,
				struct nfs4_ol_stateid, st_locks);
1327
		WARN_ON(!unhash_lock_stateid(stp));
1328
		put_ol_stateid_locked(stp, reaplist);
1329 1330 1331
	}
}

1332
static bool unhash_open_stateid(struct nfs4_ol_stateid *stp,
1333
				struct list_head *reaplist)
1334
{
1335 1336
	bool unhashed;

1337 1338
	lockdep_assert_held(&stp->st_stid.sc_client->cl_lock);

1339
	unhashed = unhash_ol_stateid(stp);
1340
	release_open_stateid_locks(stp, reaplist);
1341
	return unhashed;
1342 1343 1344 1345
}

static void release_open_stateid(struct nfs4_ol_stateid *stp)
{
1346 1347 1348
	LIST_HEAD(reaplist);

	spin_lock(&stp->st_stid.sc_client->cl_lock);
1349 1350
	if (unhash_open_stateid(stp, &reaplist))
		put_ol_stateid_locked(stp, &reaplist);
1351 1352
	spin_unlock(&stp->st_stid.sc_client->cl_lock);
	free_ol_stateid_reaplist(&reaplist);
1353 1354
}

1355
static void unhash_openowner_locked(struct nfs4_openowner *oo)
1356
{
1357
	struct nfs4_client *clp = oo->oo_owner.so_client;
1358

1359
	lockdep_assert_held(&clp->cl_lock);
1360

1361 1362
	list_del_init(&oo->oo_owner.so_strhash);
	list_del_init(&oo->oo_perclient);
1363 1364
}

1365 1366
static void release_last_closed_stateid(struct nfs4_openowner *oo)
{
1367 1368 1369
	struct nfsd_net *nn = net_generic(oo->oo_owner.so_client->net,
					  nfsd_net_id);
	struct nfs4_ol_stateid *s;
1370

1371 1372
	spin_lock(&nn->client_lock);
	s = oo->oo_last_closed_stid;
1373
	if (s) {
1374
		list_del_init(&oo->oo_close_lru);
1375 1376
		oo->oo_last_closed_stid = NULL;
	}
1377 1378 1379
	spin_unlock(&nn->client_lock);
	if (s)
		nfs4_put_stid(&s->st_stid);
1380 1381
}

1382
static void release_openowner(struct nfs4_openowner *oo)
1383 1384
{
	struct nfs4_ol_stateid *stp;
1385
	struct nfs4_client *clp = oo->oo_owner.so_client;
1386
	struct list_head reaplist;
1387

1388
	INIT_LIST_HEAD(&reaplist);
1389

1390 1391
	spin_lock(&clp->cl_lock);
	unhash_openowner_locked(oo);
1392 1393 1394
	while (!list_empty(&oo->oo_owner.so_stateids)) {
		stp = list_first_entry(&oo->oo_owner.so_stateids,
				struct nfs4_ol_stateid, st_perstateowner);
1395 1396
		if (unhash_open_stateid(stp, &reaplist))
			put_ol_stateid_locked(stp, &reaplist);
1397
	}
1398
	spin_unlock(&clp->cl_lock);
1399
	free_ol_stateid_reaplist(&reaplist);
1400
	release_last_closed_stateid(oo);
1401
	nfs4_put_stateowner(&oo->oo_owner);
1402 1403
}

M
Marc Eshel 已提交
1404 1405 1406 1407 1408 1409 1410 1411
static inline int
hash_sessionid(struct nfs4_sessionid *sessionid)
{
	struct nfsd4_sessionid *sid = (struct nfsd4_sessionid *)sessionid;

	return sid->sequence % SESSION_HASH_SIZE;
}

M
Mark Salter 已提交
1412
#ifdef CONFIG_SUNRPC_DEBUG
M
Marc Eshel 已提交
1413 1414 1415 1416 1417 1418
static inline void
dump_sessionid(const char *fn, struct nfs4_sessionid *sessionid)
{
	u32 *ptr = (u32 *)(&sessionid->data[0]);
	dprintk("%s: %u:%u:%u:%u\n", fn, ptr[0], ptr[1], ptr[2], ptr[3]);
}
1419 1420 1421 1422 1423 1424 1425
#else
static inline void
dump_sessionid(const char *fn, struct nfs4_sessionid *sessionid)
{
}
#endif

1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437
/*
 * Bump the seqid on cstate->replay_owner, and clear replay_owner if it
 * won't be used for replay.
 */
void nfsd4_bump_seqid(struct nfsd4_compound_state *cstate, __be32 nfserr)
{
	struct nfs4_stateowner *so = cstate->replay_owner;

	if (nfserr == nfserr_replay_me)
		return;

	if (!seqid_mutating_err(ntohl(nfserr))) {
1438
		nfsd4_cstate_clear_replay(cstate);
1439 1440 1441 1442 1443 1444 1445 1446 1447
		return;
	}
	if (!so)
		return;
	if (so->so_is_open_owner)
		release_last_closed_stateid(openowner(so));
	so->so_seqid++;
	return;
}
M
Marc Eshel 已提交
1448

A
Andy Adamson 已提交
1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461
static void
gen_sessionid(struct nfsd4_session *ses)
{
	struct nfs4_client *clp = ses->se_client;
	struct nfsd4_sessionid *sid;

	sid = (struct nfsd4_sessionid *)ses->se_sessionid.data;
	sid->clientid = clp->cl_clientid;
	sid->sequence = current_sessionid++;
	sid->reserved = 0;
}

/*
1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474
 * The protocol defines ca_maxresponssize_cached to include the size of
 * the rpc header, but all we need to cache is the data starting after
 * the end of the initial SEQUENCE operation--the rest we regenerate
 * each time.  Therefore we can advertise a ca_maxresponssize_cached
 * value that is the number of bytes in our cache plus a few additional
 * bytes.  In order to stay on the safe side, and not promise more than
 * we can cache, those additional bytes must be the minimum possible: 24
 * bytes of rpc header (xid through accept state, with AUTH_NULL
 * verifier), 12 for the compound header (with zero-length tag), and 44
 * for the SEQUENCE op response:
 */
#define NFSD_MIN_HDR_SEQ_SZ  (24 + 12 + 44)

1475 1476 1477 1478 1479
static void
free_session_slots(struct nfsd4_session *ses)
{
	int i;

1480 1481
	for (i = 0; i < ses->se_fchannel.maxreqs; i++) {
		free_svc_cred(&ses->se_slots[i]->sl_cred);
1482
		kfree(ses->se_slots[i]);
1483
	}
1484 1485
}

1486
/*
1487 1488 1489
 * We don't actually need to cache the rpc and session headers, so we
 * can allocate a little less for each slot:
 */
1490
static inline u32 slot_bytes(struct nfsd4_channel_attrs *ca)
1491
{
1492
	u32 size;
1493

1494 1495 1496 1497 1498
	if (ca->maxresp_cached < NFSD_MIN_HDR_SEQ_SZ)
		size = 0;
	else
		size = ca->maxresp_cached - NFSD_MIN_HDR_SEQ_SZ;
	return size + sizeof(struct nfsd4_slot);
1499
}
A
Andy Adamson 已提交
1500

1501 1502
/*
 * XXX: If we run out of reserved DRC memory we could (up to a point)
1503
 * re-negotiate active sessions and reduce their slot usage to make
1504
 * room for new connections. For now we just fail the create session.
A
Andy Adamson 已提交
1505
 */
1506
static u32 nfsd4_get_drc_mem(struct nfsd4_channel_attrs *ca)
A
Andy Adamson 已提交
1507
{
1508 1509
	u32 slotsize = slot_bytes(ca);
	u32 num = ca->maxreqs;
1510
	int avail;
A
Andy Adamson 已提交
1511

1512
	spin_lock(&nfsd_drc_lock);
1513 1514
	avail = min((unsigned long)NFSD_MAX_MEM_PER_SESSION,
		    nfsd_drc_max_mem - nfsd_drc_mem_used);
1515 1516 1517 1518 1519
	/*
	 * Never use more than a third of the remaining memory,
	 * unless it's the only way to give this client a slot:
	 */
	avail = clamp_t(int, avail, slotsize, avail/3);
1520 1521 1522
	num = min_t(int, num, avail / slotsize);
	nfsd_drc_mem_used += num * slotsize;
	spin_unlock(&nfsd_drc_lock);
A
Andy Adamson 已提交
1523

1524 1525
	return num;
}
A
Andy Adamson 已提交
1526

1527
static void nfsd4_put_drc_mem(struct nfsd4_channel_attrs *ca)
1528
{
1529 1530
	int slotsize = slot_bytes(ca);

1531
	spin_lock(&nfsd_drc_lock);
1532
	nfsd_drc_mem_used -= slotsize * ca->maxreqs;
1533
	spin_unlock(&nfsd_drc_lock);
1534
}
A
Andy Adamson 已提交
1535

1536 1537
static struct nfsd4_session *alloc_session(struct nfsd4_channel_attrs *fattrs,
					   struct nfsd4_channel_attrs *battrs)
1538
{
1539 1540
	int numslots = fattrs->maxreqs;
	int slotsize = slot_bytes(fattrs);
1541 1542
	struct nfsd4_session *new;
	int mem, i;
1543

1544 1545 1546
	BUILD_BUG_ON(NFSD_MAX_SLOTS_PER_SESSION * sizeof(struct nfsd4_slot *)
			+ sizeof(struct nfsd4_session) > PAGE_SIZE);
	mem = numslots * sizeof(struct nfsd4_slot *);
A
Andy Adamson 已提交
1547

1548 1549 1550
	new = kzalloc(sizeof(*new) + mem, GFP_KERNEL);
	if (!new)
		return NULL;
1551
	/* allocate each struct nfsd4_slot and data cache in one piece */
1552
	for (i = 0; i < numslots; i++) {
1553
		new->se_slots[i] = kzalloc(slotsize, GFP_KERNEL);
1554
		if (!new->se_slots[i])
1555 1556
			goto out_free;
	}
1557 1558 1559 1560

	memcpy(&new->se_fchannel, fattrs, sizeof(struct nfsd4_channel_attrs));
	memcpy(&new->se_bchannel, battrs, sizeof(struct nfsd4_channel_attrs));

1561 1562 1563 1564 1565 1566
	return new;
out_free:
	while (i--)
		kfree(new->se_slots[i]);
	kfree(new);
	return NULL;
A
Andy Adamson 已提交
1567 1568
}

1569 1570 1571 1572 1573
static void free_conn(struct nfsd4_conn *c)
{
	svc_xprt_put(c->cn_xprt);
	kfree(c);
}
A
Andy Adamson 已提交
1574

1575 1576 1577 1578
static void nfsd4_conn_lost(struct svc_xpt_user *u)
{
	struct nfsd4_conn *c = container_of(u, struct nfsd4_conn, cn_xpt_user);
	struct nfs4_client *clp = c->cn_session->se_client;
A
Andy Adamson 已提交
1579

1580 1581 1582 1583 1584
	spin_lock(&clp->cl_lock);
	if (!list_empty(&c->cn_persession)) {
		list_del(&c->cn_persession);
		free_conn(c);
	}
1585
	nfsd4_probe_callback(clp);
1586
	spin_unlock(&clp->cl_lock);
1587
}
A
Andy Adamson 已提交
1588

1589
static struct nfsd4_conn *alloc_conn(struct svc_rqst *rqstp, u32 flags)
1590 1591
{
	struct nfsd4_conn *conn;
A
Andy Adamson 已提交
1592

1593 1594
	conn = kmalloc(sizeof(struct nfsd4_conn), GFP_KERNEL);
	if (!conn)
1595
		return NULL;
1596 1597
	svc_xprt_get(rqstp->rq_xprt);
	conn->cn_xprt = rqstp->rq_xprt;
1598
	conn->cn_flags = flags;
1599 1600 1601
	INIT_LIST_HEAD(&conn->cn_xpt_user.list);
	return conn;
}
1602

1603 1604 1605 1606
static void __nfsd4_hash_conn(struct nfsd4_conn *conn, struct nfsd4_session *ses)
{
	conn->cn_session = ses;
	list_add(&conn->cn_persession, &ses->se_conns);
A
Andy Adamson 已提交
1607 1608
}

1609
static void nfsd4_hash_conn(struct nfsd4_conn *conn, struct nfsd4_session *ses)
1610
{
1611
	struct nfs4_client *clp = ses->se_client;
1612

1613
	spin_lock(&clp->cl_lock);
1614
	__nfsd4_hash_conn(conn, ses);
1615
	spin_unlock(&clp->cl_lock);
1616 1617
}

1618
static int nfsd4_register_conn(struct nfsd4_conn *conn)
1619
{
1620
	conn->cn_xpt_user.callback = nfsd4_conn_lost;
1621
	return register_xpt_user(conn->cn_xprt, &conn->cn_xpt_user);
1622 1623
}

1624
static void nfsd4_init_conn(struct svc_rqst *rqstp, struct nfsd4_conn *conn, struct nfsd4_session *ses)
A
Andy Adamson 已提交
1625
{
1626
	int ret;
A
Andy Adamson 已提交
1627

1628
	nfsd4_hash_conn(conn, ses);
1629 1630 1631 1632
	ret = nfsd4_register_conn(conn);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&conn->cn_xpt_user);
1633 1634
	/* We may have gained or lost a callback channel: */
	nfsd4_probe_callback_sync(ses->se_client);
1635
}
A
Andy Adamson 已提交
1636

1637
static struct nfsd4_conn *alloc_conn_from_crses(struct svc_rqst *rqstp, struct nfsd4_create_session *cses)
1638 1639 1640
{
	u32 dir = NFS4_CDFC4_FORE;

1641
	if (cses->flags & SESSION4_BACK_CHAN)
1642
		dir |= NFS4_CDFC4_BACK;
1643
	return alloc_conn(rqstp, dir);
1644 1645 1646
}

/* must be called under client_lock */
1647
static void nfsd4_del_conns(struct nfsd4_session *s)
1648
{
1649 1650
	struct nfs4_client *clp = s->se_client;
	struct nfsd4_conn *c;
A
Andy Adamson 已提交
1651

1652 1653 1654 1655 1656
	spin_lock(&clp->cl_lock);
	while (!list_empty(&s->se_conns)) {
		c = list_first_entry(&s->se_conns, struct nfsd4_conn, cn_persession);
		list_del_init(&c->cn_persession);
		spin_unlock(&clp->cl_lock);
1657

1658 1659
		unregister_xpt_user(c->cn_xprt, &c->cn_xpt_user);
		free_conn(c);
A
Andy Adamson 已提交
1660

1661 1662 1663
		spin_lock(&clp->cl_lock);
	}
	spin_unlock(&clp->cl_lock);
1664
}
A
Andy Adamson 已提交
1665

1666 1667 1668 1669 1670 1671
static void __free_session(struct nfsd4_session *ses)
{
	free_session_slots(ses);
	kfree(ses);
}

1672
static void free_session(struct nfsd4_session *ses)
1673
{
1674
	nfsd4_del_conns(ses);
1675
	nfsd4_put_drc_mem(&ses->se_fchannel);
1676
	__free_session(ses);
1677 1678
}

1679
static void init_session(struct svc_rqst *rqstp, struct nfsd4_session *new, struct nfs4_client *clp, struct nfsd4_create_session *cses)
1680 1681
{
	int idx;
1682
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
1683

A
Andy Adamson 已提交
1684 1685 1686
	new->se_client = clp;
	gen_sessionid(new);

1687 1688
	INIT_LIST_HEAD(&new->se_conns);

1689
	new->se_cb_seq_nr = 1;
A
Andy Adamson 已提交
1690
	new->se_flags = cses->flags;
1691
	new->se_cb_prog = cses->callback_prog;
1692
	new->se_cb_sec = cses->cb_sec;
1693
	atomic_set(&new->se_ref, 0);
1694
	idx = hash_sessionid(&new->se_sessionid);
1695
	list_add(&new->se_hash, &nn->sessionid_hashtbl[idx]);
1696
	spin_lock(&clp->cl_lock);
A
Andy Adamson 已提交
1697
	list_add(&new->se_perclnt, &clp->cl_sessions);
1698
	spin_unlock(&clp->cl_lock);
1699

C
Chuck Lever 已提交
1700
	{
1701
		struct sockaddr *sa = svc_addr(rqstp);
1702 1703 1704 1705 1706 1707 1708
		/*
		 * This is a little silly; with sessions there's no real
		 * use for the callback address.  Use the peer address
		 * as a reasonable default for now, but consider fixing
		 * the rpc client not to require an address in the
		 * future:
		 */
1709 1710 1711
		rpc_copy_addr((struct sockaddr *)&clp->cl_cb_conn.cb_addr, sa);
		clp->cl_cb_conn.cb_addrlen = svc_addr_len(sa);
	}
A
Andy Adamson 已提交
1712 1713
}

1714
/* caller must hold client_lock */
M
Marc Eshel 已提交
1715
static struct nfsd4_session *
1716
__find_in_sessionid_hashtbl(struct nfs4_sessionid *sessionid, struct net *net)
M
Marc Eshel 已提交
1717 1718 1719
{
	struct nfsd4_session *elem;
	int idx;
1720
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
M
Marc Eshel 已提交
1721

1722 1723
	lockdep_assert_held(&nn->client_lock);

M
Marc Eshel 已提交
1724 1725 1726
	dump_sessionid(__func__, sessionid);
	idx = hash_sessionid(sessionid);
	/* Search in the appropriate list */
1727
	list_for_each_entry(elem, &nn->sessionid_hashtbl[idx], se_hash) {
M
Marc Eshel 已提交
1728 1729 1730 1731 1732 1733 1734 1735 1736 1737
		if (!memcmp(elem->se_sessionid.data, sessionid->data,
			    NFS4_MAX_SESSIONID_LEN)) {
			return elem;
		}
	}

	dprintk("%s: session not found\n", __func__);
	return NULL;
}

1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755
static struct nfsd4_session *
find_in_sessionid_hashtbl(struct nfs4_sessionid *sessionid, struct net *net,
		__be32 *ret)
{
	struct nfsd4_session *session;
	__be32 status = nfserr_badsession;

	session = __find_in_sessionid_hashtbl(sessionid, net);
	if (!session)
		goto out;
	status = nfsd4_get_session_locked(session);
	if (status)
		session = NULL;
out:
	*ret = status;
	return session;
}

1756
/* caller must hold client_lock */
A
Andy Adamson 已提交
1757
static void
M
Marc Eshel 已提交
1758
unhash_session(struct nfsd4_session *ses)
A
Andy Adamson 已提交
1759
{
1760 1761 1762 1763 1764
	struct nfs4_client *clp = ses->se_client;
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);

A
Andy Adamson 已提交
1765
	list_del(&ses->se_hash);
1766
	spin_lock(&ses->se_client->cl_lock);
A
Andy Adamson 已提交
1767
	list_del(&ses->se_perclnt);
1768
	spin_unlock(&ses->se_client->cl_lock);
M
Marc Eshel 已提交
1769 1770
}

L
Linus Torvalds 已提交
1771 1772
/* SETCLIENTID and SETCLIENTID_CONFIRM Helper functions */
static int
1773
STALE_CLIENTID(clientid_t *clid, struct nfsd_net *nn)
L
Linus Torvalds 已提交
1774
{
1775 1776 1777 1778 1779 1780
	/*
	 * We're assuming the clid was not given out from a boot
	 * precisely 2^32 (about 136 years) before this one.  That seems
	 * a safe assumption:
	 */
	if (clid->cl_boot == (u32)nn->boot_time)
L
Linus Torvalds 已提交
1781
		return 0;
A
Andy Adamson 已提交
1782
	dprintk("NFSD stale clientid (%08x/%08x) boot_time %08lx\n",
1783
		clid->cl_boot, clid->cl_id, nn->boot_time);
L
Linus Torvalds 已提交
1784 1785 1786 1787 1788 1789 1790 1791
	return 1;
}

/* 
 * XXX Should we use a slab cache ?
 * This type of memory management is somewhat inefficient, but we use it
 * anyway since SETCLIENTID is not a common operation.
 */
1792
static struct nfs4_client *alloc_client(struct xdr_netobj name)
L
Linus Torvalds 已提交
1793 1794
{
	struct nfs4_client *clp;
1795
	int i;
L
Linus Torvalds 已提交
1796

1797 1798 1799
	clp = kzalloc(sizeof(struct nfs4_client), GFP_KERNEL);
	if (clp == NULL)
		return NULL;
1800
	clp->cl_name.data = kmemdup(name.data, name.len, GFP_KERNEL);
1801 1802 1803 1804 1805 1806 1807 1808
	if (clp->cl_name.data == NULL)
		goto err_no_name;
	clp->cl_ownerstr_hashtbl = kmalloc(sizeof(struct list_head) *
			OWNER_HASH_SIZE, GFP_KERNEL);
	if (!clp->cl_ownerstr_hashtbl)
		goto err_no_hashtbl;
	for (i = 0; i < OWNER_HASH_SIZE; i++)
		INIT_LIST_HEAD(&clp->cl_ownerstr_hashtbl[i]);
1809
	clp->cl_name.len = name.len;
1810 1811 1812 1813 1814 1815 1816 1817 1818
	INIT_LIST_HEAD(&clp->cl_sessions);
	idr_init(&clp->cl_stateids);
	atomic_set(&clp->cl_refcount, 0);
	clp->cl_cb_state = NFSD4_CB_UNKNOWN;
	INIT_LIST_HEAD(&clp->cl_idhash);
	INIT_LIST_HEAD(&clp->cl_openowners);
	INIT_LIST_HEAD(&clp->cl_delegations);
	INIT_LIST_HEAD(&clp->cl_lru);
	INIT_LIST_HEAD(&clp->cl_revoked);
1819 1820 1821
#ifdef CONFIG_NFSD_PNFS
	INIT_LIST_HEAD(&clp->cl_lo_states);
#endif
1822 1823
	spin_lock_init(&clp->cl_lock);
	rpc_init_wait_queue(&clp->cl_cb_waitq, "Backchannel slot table");
L
Linus Torvalds 已提交
1824
	return clp;
1825 1826 1827 1828 1829
err_no_hashtbl:
	kfree(clp->cl_name.data);
err_no_name:
	kfree(clp);
	return NULL;
L
Linus Torvalds 已提交
1830 1831
}

1832
static void
L
Linus Torvalds 已提交
1833 1834
free_client(struct nfs4_client *clp)
{
1835 1836 1837 1838 1839
	while (!list_empty(&clp->cl_sessions)) {
		struct nfsd4_session *ses;
		ses = list_entry(clp->cl_sessions.next, struct nfsd4_session,
				se_perclnt);
		list_del(&ses->se_perclnt);
1840 1841
		WARN_ON_ONCE(atomic_read(&ses->se_ref));
		free_session(ses);
1842
	}
1843
	rpc_destroy_wait_queue(&clp->cl_cb_waitq);
1844
	free_svc_cred(&clp->cl_cred);
1845
	kfree(clp->cl_ownerstr_hashtbl);
L
Linus Torvalds 已提交
1846
	kfree(clp->cl_name.data);
M
majianpeng 已提交
1847
	idr_destroy(&clp->cl_stateids);
L
Linus Torvalds 已提交
1848 1849 1850
	kfree(clp);
}

B
Benny Halevy 已提交
1851
/* must be called under the client_lock */
1852
static void
B
Benny Halevy 已提交
1853 1854
unhash_client_locked(struct nfs4_client *clp)
{
1855
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
1856 1857
	struct nfsd4_session *ses;

1858 1859
	lockdep_assert_held(&nn->client_lock);

1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870
	/* Mark the client as expired! */
	clp->cl_time = 0;
	/* Make it invisible */
	if (!list_empty(&clp->cl_idhash)) {
		list_del_init(&clp->cl_idhash);
		if (test_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags))
			rb_erase(&clp->cl_namenode, &nn->conf_name_tree);
		else
			rb_erase(&clp->cl_namenode, &nn->unconf_name_tree);
	}
	list_del_init(&clp->cl_lru);
1871
	spin_lock(&clp->cl_lock);
1872 1873
	list_for_each_entry(ses, &clp->cl_sessions, se_perclnt)
		list_del_init(&ses->se_hash);
1874
	spin_unlock(&clp->cl_lock);
B
Benny Halevy 已提交
1875 1876
}

L
Linus Torvalds 已提交
1877
static void
1878 1879 1880 1881 1882 1883 1884 1885 1886
unhash_client(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	spin_lock(&nn->client_lock);
	unhash_client_locked(clp);
	spin_unlock(&nn->client_lock);
}

1887 1888 1889 1890 1891 1892 1893 1894
static __be32 mark_client_expired_locked(struct nfs4_client *clp)
{
	if (atomic_read(&clp->cl_refcount))
		return nfserr_jukebox;
	unhash_client_locked(clp);
	return nfs_ok;
}

1895 1896
static void
__destroy_client(struct nfs4_client *clp)
L
Linus Torvalds 已提交
1897
{
1898
	int i;
1899
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
1900 1901 1902 1903
	struct nfs4_delegation *dp;
	struct list_head reaplist;

	INIT_LIST_HEAD(&reaplist);
1904
	spin_lock(&state_lock);
1905 1906
	while (!list_empty(&clp->cl_delegations)) {
		dp = list_entry(clp->cl_delegations.next, struct nfs4_delegation, dl_perclnt);
1907
		WARN_ON(!unhash_delegation_locked(dp));
1908
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
1909
	}
1910
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
1911 1912
	while (!list_empty(&reaplist)) {
		dp = list_entry(reaplist.next, struct nfs4_delegation, dl_recall_lru);
1913
		list_del_init(&dp->dl_recall_lru);
1914
		put_clnt_odstate(dp->dl_clnt_odstate);
1915
		nfs4_put_deleg_lease(dp->dl_stid.sc_file);
1916
		nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
1917
	}
1918
	while (!list_empty(&clp->cl_revoked)) {
1919
		dp = list_entry(clp->cl_revoked.next, struct nfs4_delegation, dl_recall_lru);
1920
		list_del_init(&dp->dl_recall_lru);
1921
		nfs4_put_stid(&dp->dl_stid);
1922
	}
1923
	while (!list_empty(&clp->cl_openowners)) {
1924
		oo = list_entry(clp->cl_openowners.next, struct nfs4_openowner, oo_perclient);
1925
		nfs4_get_stateowner(&oo->oo_owner);
1926
		release_openowner(oo);
L
Linus Torvalds 已提交
1927
	}
1928 1929 1930 1931 1932 1933 1934 1935 1936 1937
	for (i = 0; i < OWNER_HASH_SIZE; i++) {
		struct nfs4_stateowner *so, *tmp;

		list_for_each_entry_safe(so, tmp, &clp->cl_ownerstr_hashtbl[i],
					 so_strhash) {
			/* Should be no openowners at this point */
			WARN_ON_ONCE(so->so_is_open_owner);
			remove_blocked_locks(lockowner(so));
		}
	}
1938
	nfsd4_return_all_client_layouts(clp);
1939
	nfsd4_shutdown_callback(clp);
B
Benny Halevy 已提交
1940 1941
	if (clp->cl_cb_conn.cb_xprt)
		svc_xprt_put(clp->cl_cb_conn.cb_xprt);
1942
	free_client(clp);
L
Linus Torvalds 已提交
1943 1944
}

1945 1946 1947 1948 1949 1950 1951
static void
destroy_client(struct nfs4_client *clp)
{
	unhash_client(clp);
	__destroy_client(clp);
}

1952 1953
static void expire_client(struct nfs4_client *clp)
{
1954
	unhash_client(clp);
1955
	nfsd4_client_record_remove(clp);
1956
	__destroy_client(clp);
1957 1958
}

1959 1960 1961 1962
static void copy_verf(struct nfs4_client *target, nfs4_verifier *source)
{
	memcpy(target->cl_verifier.data, source->data,
			sizeof(target->cl_verifier.data));
L
Linus Torvalds 已提交
1963 1964
}

1965 1966
static void copy_clid(struct nfs4_client *target, struct nfs4_client *source)
{
L
Linus Torvalds 已提交
1967 1968 1969 1970
	target->cl_clientid.cl_boot = source->cl_clientid.cl_boot; 
	target->cl_clientid.cl_id = source->cl_clientid.cl_id; 
}

1971 1972
static int copy_cred(struct svc_cred *target, struct svc_cred *source)
{
1973 1974 1975 1976 1977 1978
	target->cr_principal = kstrdup(source->cr_principal, GFP_KERNEL);
	target->cr_raw_principal = kstrdup(source->cr_raw_principal,
								GFP_KERNEL);
	if ((source->cr_principal && ! target->cr_principal) ||
	    (source->cr_raw_principal && ! target->cr_raw_principal))
		return -ENOMEM;
1979

1980
	target->cr_flavor = source->cr_flavor;
L
Linus Torvalds 已提交
1981 1982 1983 1984
	target->cr_uid = source->cr_uid;
	target->cr_gid = source->cr_gid;
	target->cr_group_info = source->cr_group_info;
	get_group_info(target->cr_group_info);
1985 1986 1987
	target->cr_gss_mech = source->cr_gss_mech;
	if (source->cr_gss_mech)
		gss_mech_get(source->cr_gss_mech);
1988
	return 0;
L
Linus Torvalds 已提交
1989 1990
}

1991
static int
1992 1993
compare_blob(const struct xdr_netobj *o1, const struct xdr_netobj *o2)
{
1994 1995 1996 1997 1998
	if (o1->len < o2->len)
		return -1;
	if (o1->len > o2->len)
		return 1;
	return memcmp(o1->data, o2->data, o1->len);
1999 2000
}

2001
static int same_name(const char *n1, const char *n2)
2002
{
N
NeilBrown 已提交
2003
	return 0 == memcmp(n1, n2, HEXDIR_LEN);
L
Linus Torvalds 已提交
2004 2005 2006
}

static int
2007 2008 2009
same_verf(nfs4_verifier *v1, nfs4_verifier *v2)
{
	return 0 == memcmp(v1->data, v2->data, sizeof(v1->data));
L
Linus Torvalds 已提交
2010 2011 2012
}

static int
2013 2014 2015
same_clid(clientid_t *cl1, clientid_t *cl2)
{
	return (cl1->cl_boot == cl2->cl_boot) && (cl1->cl_id == cl2->cl_id);
L
Linus Torvalds 已提交
2016 2017
}

2018 2019 2020 2021 2022 2023 2024
static bool groups_equal(struct group_info *g1, struct group_info *g2)
{
	int i;

	if (g1->ngroups != g2->ngroups)
		return false;
	for (i=0; i<g1->ngroups; i++)
2025
		if (!gid_eq(g1->gid[i], g2->gid[i]))
2026 2027 2028 2029
			return false;
	return true;
}

2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045
/*
 * RFC 3530 language requires clid_inuse be returned when the
 * "principal" associated with a requests differs from that previously
 * used.  We use uid, gid's, and gss principal string as our best
 * approximation.  We also don't want to allow non-gss use of a client
 * established using gss: in theory cr_principal should catch that
 * change, but in practice cr_principal can be null even in the gss case
 * since gssd doesn't always pass down a principal string.
 */
static bool is_gss_cred(struct svc_cred *cr)
{
	/* Is cr_flavor one of the gss "pseudoflavors"?: */
	return (cr->cr_flavor > RPC_AUTH_MAXFLAVOR);
}


2046
static bool
2047 2048
same_creds(struct svc_cred *cr1, struct svc_cred *cr2)
{
2049
	if ((is_gss_cred(cr1) != is_gss_cred(cr2))
2050 2051
		|| (!uid_eq(cr1->cr_uid, cr2->cr_uid))
		|| (!gid_eq(cr1->cr_gid, cr2->cr_gid))
2052 2053 2054 2055 2056 2057
		|| !groups_equal(cr1->cr_group_info, cr2->cr_group_info))
		return false;
	if (cr1->cr_principal == cr2->cr_principal)
		return true;
	if (!cr1->cr_principal || !cr2->cr_principal)
		return false;
2058
	return 0 == strcmp(cr1->cr_principal, cr2->cr_principal);
L
Linus Torvalds 已提交
2059 2060
}

2061 2062 2063 2064 2065
static bool svc_rqst_integrity_protected(struct svc_rqst *rqstp)
{
	struct svc_cred *cr = &rqstp->rq_cred;
	u32 service;

2066 2067
	if (!cr->cr_gss_mech)
		return false;
2068 2069 2070 2071 2072
	service = gss_pseudoflavor_to_service(cr->cr_gss_mech, cr->cr_flavor);
	return service == RPC_GSS_SVC_INTEGRITY ||
	       service == RPC_GSS_SVC_PRIVACY;
}

2073
bool nfsd4_mach_creds_match(struct nfs4_client *cl, struct svc_rqst *rqstp)
2074 2075 2076 2077 2078 2079 2080 2081 2082
{
	struct svc_cred *cr = &rqstp->rq_cred;

	if (!cl->cl_mach_cred)
		return true;
	if (cl->cl_cred.cr_gss_mech != cr->cr_gss_mech)
		return false;
	if (!svc_rqst_integrity_protected(rqstp))
		return false;
2083 2084 2085
	if (cl->cl_cred.cr_raw_principal)
		return 0 == strcmp(cl->cl_cred.cr_raw_principal,
						cr->cr_raw_principal);
2086 2087 2088 2089 2090
	if (!cr->cr_principal)
		return false;
	return 0 == strcmp(cl->cl_cred.cr_principal, cr->cr_principal);
}

2091
static void gen_confirm(struct nfs4_client *clp, struct nfsd_net *nn)
2092
{
2093
	__be32 verf[2];
L
Linus Torvalds 已提交
2094

2095 2096 2097 2098 2099
	/*
	 * This is opaque to client, so no need to byte-swap. Use
	 * __force to keep sparse happy
	 */
	verf[0] = (__force __be32)get_seconds();
2100
	verf[1] = (__force __be32)nn->clverifier_counter++;
2101
	memcpy(clp->cl_confirm.data, verf, sizeof(clp->cl_confirm.data));
L
Linus Torvalds 已提交
2102 2103
}

2104 2105 2106 2107 2108 2109 2110
static void gen_clid(struct nfs4_client *clp, struct nfsd_net *nn)
{
	clp->cl_clientid.cl_boot = nn->boot_time;
	clp->cl_clientid.cl_id = nn->clientid_counter++;
	gen_confirm(clp, nn);
}

2111 2112
static struct nfs4_stid *
find_stateid_locked(struct nfs4_client *cl, stateid_t *t)
2113
{
J
J. Bruce Fields 已提交
2114 2115 2116 2117 2118 2119
	struct nfs4_stid *ret;

	ret = idr_find(&cl->cl_stateids, t->si_opaque.so_id);
	if (!ret || !ret->sc_type)
		return NULL;
	return ret;
J
J. Bruce Fields 已提交
2120 2121
}

2122 2123
static struct nfs4_stid *
find_stateid_by_type(struct nfs4_client *cl, stateid_t *t, char typemask)
2124 2125
{
	struct nfs4_stid *s;
J
J. Bruce Fields 已提交
2126

2127 2128
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, t);
2129 2130
	if (s != NULL) {
		if (typemask & s->sc_type)
2131
			refcount_inc(&s->sc_count);
2132 2133 2134
		else
			s = NULL;
	}
2135 2136
	spin_unlock(&cl->cl_lock);
	return s;
2137 2138
}

J
Jeff Layton 已提交
2139
static struct nfs4_client *create_client(struct xdr_netobj name,
2140 2141 2142 2143
		struct svc_rqst *rqstp, nfs4_verifier *verf)
{
	struct nfs4_client *clp;
	struct sockaddr *sa = svc_addr(rqstp);
2144
	int ret;
2145
	struct net *net = SVC_NET(rqstp);
2146 2147 2148 2149 2150

	clp = alloc_client(name);
	if (clp == NULL)
		return NULL;

2151 2152 2153 2154
	ret = copy_cred(&clp->cl_cred, &rqstp->rq_cred);
	if (ret) {
		free_client(clp);
		return NULL;
2155
	}
2156
	nfsd4_init_cb(&clp->cl_cb_null, clp, NULL, NFSPROC4_CLNT_CB_NULL);
B
Benny Halevy 已提交
2157
	clp->cl_time = get_seconds();
2158 2159 2160
	clear_bit(0, &clp->cl_cb_slot_busy);
	copy_verf(clp, verf);
	rpc_copy_addr((struct sockaddr *) &clp->cl_addr, sa);
2161
	clp->cl_cb_session = NULL;
2162
	clp->net = net;
2163 2164 2165
	return clp;
}

2166
static void
2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188
add_clp_to_name_tree(struct nfs4_client *new_clp, struct rb_root *root)
{
	struct rb_node **new = &(root->rb_node), *parent = NULL;
	struct nfs4_client *clp;

	while (*new) {
		clp = rb_entry(*new, struct nfs4_client, cl_namenode);
		parent = *new;

		if (compare_blob(&clp->cl_name, &new_clp->cl_name) > 0)
			new = &((*new)->rb_left);
		else
			new = &((*new)->rb_right);
	}

	rb_link_node(&new_clp->cl_namenode, parent, new);
	rb_insert_color(&new_clp->cl_namenode, root);
}

static struct nfs4_client *
find_clp_in_name_tree(struct xdr_netobj *name, struct rb_root *root)
{
2189
	int cmp;
2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207
	struct rb_node *node = root->rb_node;
	struct nfs4_client *clp;

	while (node) {
		clp = rb_entry(node, struct nfs4_client, cl_namenode);
		cmp = compare_blob(&clp->cl_name, name);
		if (cmp > 0)
			node = node->rb_left;
		else if (cmp < 0)
			node = node->rb_right;
		else
			return clp;
	}
	return NULL;
}

static void
add_to_unconfirmed(struct nfs4_client *clp)
L
Linus Torvalds 已提交
2208 2209
{
	unsigned int idhashval;
2210
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
2211

2212 2213
	lockdep_assert_held(&nn->client_lock);

2214
	clear_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
2215
	add_clp_to_name_tree(clp, &nn->unconf_name_tree);
L
Linus Torvalds 已提交
2216
	idhashval = clientid_hashval(clp->cl_clientid.cl_id);
2217
	list_add(&clp->cl_idhash, &nn->unconf_id_hashtbl[idhashval]);
2218
	renew_client_locked(clp);
L
Linus Torvalds 已提交
2219 2220
}

2221
static void
L
Linus Torvalds 已提交
2222 2223 2224
move_to_confirmed(struct nfs4_client *clp)
{
	unsigned int idhashval = clientid_hashval(clp->cl_clientid.cl_id);
2225
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
2226

2227 2228
	lockdep_assert_held(&nn->client_lock);

L
Linus Torvalds 已提交
2229
	dprintk("NFSD: move_to_confirm nfs4_client %p\n", clp);
2230
	list_move(&clp->cl_idhash, &nn->conf_id_hashtbl[idhashval]);
2231
	rb_erase(&clp->cl_namenode, &nn->unconf_name_tree);
2232
	add_clp_to_name_tree(clp, &nn->conf_name_tree);
2233
	set_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
2234
	renew_client_locked(clp);
L
Linus Torvalds 已提交
2235 2236 2237
}

static struct nfs4_client *
J
J. Bruce Fields 已提交
2238
find_client_in_id_table(struct list_head *tbl, clientid_t *clid, bool sessions)
L
Linus Torvalds 已提交
2239 2240 2241 2242
{
	struct nfs4_client *clp;
	unsigned int idhashval = clientid_hashval(clid->cl_id);

J
J. Bruce Fields 已提交
2243
	list_for_each_entry(clp, &tbl[idhashval], cl_idhash) {
2244
		if (same_clid(&clp->cl_clientid, clid)) {
2245 2246
			if ((bool)clp->cl_minorversion != sessions)
				return NULL;
2247
			renew_client_locked(clp);
L
Linus Torvalds 已提交
2248
			return clp;
2249
		}
L
Linus Torvalds 已提交
2250 2251 2252 2253
	}
	return NULL;
}

J
J. Bruce Fields 已提交
2254 2255 2256 2257 2258
static struct nfs4_client *
find_confirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
{
	struct list_head *tbl = nn->conf_id_hashtbl;

2259
	lockdep_assert_held(&nn->client_lock);
J
J. Bruce Fields 已提交
2260 2261 2262
	return find_client_in_id_table(tbl, clid, sessions);
}

L
Linus Torvalds 已提交
2263
static struct nfs4_client *
2264
find_unconfirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
L
Linus Torvalds 已提交
2265
{
J
J. Bruce Fields 已提交
2266
	struct list_head *tbl = nn->unconf_id_hashtbl;
L
Linus Torvalds 已提交
2267

2268
	lockdep_assert_held(&nn->client_lock);
J
J. Bruce Fields 已提交
2269
	return find_client_in_id_table(tbl, clid, sessions);
L
Linus Torvalds 已提交
2270 2271
}

2272
static bool clp_used_exchangeid(struct nfs4_client *clp)
2273
{
2274
	return clp->cl_exchange_flags != 0;
2275
} 
2276

2277
static struct nfs4_client *
2278
find_confirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
2279
{
2280
	lockdep_assert_held(&nn->client_lock);
2281
	return find_clp_in_name_tree(name, &nn->conf_name_tree);
2282 2283 2284
}

static struct nfs4_client *
2285
find_unconfirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
2286
{
2287
	lockdep_assert_held(&nn->client_lock);
2288
	return find_clp_in_name_tree(name, &nn->unconf_name_tree);
2289 2290
}

2291
static void
2292
gen_callback(struct nfs4_client *clp, struct nfsd4_setclientid *se, struct svc_rqst *rqstp)
L
Linus Torvalds 已提交
2293
{
2294
	struct nfs4_cb_conn *conn = &clp->cl_cb_conn;
2295 2296
	struct sockaddr	*sa = svc_addr(rqstp);
	u32 scopeid = rpc_get_scope_id(sa);
2297 2298 2299 2300 2301 2302 2303 2304 2305 2306
	unsigned short expected_family;

	/* Currently, we only support tcp and tcp6 for the callback channel */
	if (se->se_callback_netid_len == 3 &&
	    !memcmp(se->se_callback_netid_val, "tcp", 3))
		expected_family = AF_INET;
	else if (se->se_callback_netid_len == 4 &&
		 !memcmp(se->se_callback_netid_val, "tcp6", 4))
		expected_family = AF_INET6;
	else
L
Linus Torvalds 已提交
2307 2308
		goto out_err;

2309
	conn->cb_addrlen = rpc_uaddr2sockaddr(clp->net, se->se_callback_addr_val,
2310
					    se->se_callback_addr_len,
2311 2312
					    (struct sockaddr *)&conn->cb_addr,
					    sizeof(conn->cb_addr));
2313

2314
	if (!conn->cb_addrlen || conn->cb_addr.ss_family != expected_family)
L
Linus Torvalds 已提交
2315
		goto out_err;
2316

2317 2318
	if (conn->cb_addr.ss_family == AF_INET6)
		((struct sockaddr_in6 *)&conn->cb_addr)->sin6_scope_id = scopeid;
2319

2320 2321
	conn->cb_prog = se->se_callback_prog;
	conn->cb_ident = se->se_callback_ident;
2322
	memcpy(&conn->cb_saddr, &rqstp->rq_daddr, rqstp->rq_daddrlen);
L
Linus Torvalds 已提交
2323 2324
	return;
out_err:
2325 2326
	conn->cb_addr.ss_family = AF_UNSPEC;
	conn->cb_addrlen = 0;
2327
	dprintk("NFSD: this client (clientid %08x/%08x) "
L
Linus Torvalds 已提交
2328 2329 2330 2331 2332 2333
		"will not receive delegations\n",
		clp->cl_clientid.cl_boot, clp->cl_clientid.cl_id);

	return;
}

2334
/*
2335
 * Cache a reply. nfsd4_check_resp_size() has bounded the cache size.
2336
 */
2337
static void
2338 2339
nfsd4_store_cache_entry(struct nfsd4_compoundres *resp)
{
2340
	struct xdr_buf *buf = resp->xdr.buf;
2341 2342
	struct nfsd4_slot *slot = resp->cstate.slot;
	unsigned int base;
2343

2344
	dprintk("--> %s slot %p\n", __func__, slot);
2345

2346
	slot->sl_flags |= NFSD4_SLOT_INITIALIZED;
2347 2348
	slot->sl_opcnt = resp->opcnt;
	slot->sl_status = resp->cstate.status;
2349 2350
	free_svc_cred(&slot->sl_cred);
	copy_cred(&slot->sl_cred, &resp->rqstp->rq_cred);
2351

2352 2353
	if (!nfsd4_cache_this(resp)) {
		slot->sl_flags &= ~NFSD4_SLOT_CACHED;
2354
		return;
2355
	}
2356 2357
	slot->sl_flags |= NFSD4_SLOT_CACHED;

2358 2359 2360
	base = resp->cstate.data_offset;
	slot->sl_datalen = buf->len - base;
	if (read_bytes_from_xdr_buf(buf, base, slot->sl_data, slot->sl_datalen))
D
Dan Carpenter 已提交
2361 2362
		WARN(1, "%s: sessions DRC could not cache compound\n",
		     __func__);
2363
	return;
2364 2365 2366
}

/*
2367 2368 2369 2370
 * Encode the replay sequence operation from the slot values.
 * If cachethis is FALSE encode the uncached rep error on the next
 * operation which sets resp->p and increments resp->opcnt for
 * nfs4svc_encode_compoundres.
2371 2372
 *
 */
2373 2374 2375
static __be32
nfsd4_enc_sequence_replay(struct nfsd4_compoundargs *args,
			  struct nfsd4_compoundres *resp)
2376
{
2377 2378
	struct nfsd4_op *op;
	struct nfsd4_slot *slot = resp->cstate.slot;
2379

2380 2381 2382
	/* Encode the replayed sequence operation */
	op = &args->ops[resp->opcnt - 1];
	nfsd4_encode_operation(resp, op);
2383

2384 2385 2386 2387 2388 2389 2390 2391 2392 2393
	if (slot->sl_flags & NFSD4_SLOT_CACHED)
		return op->status;
	if (args->opcnt == 1) {
		/*
		 * The original operation wasn't a solo sequence--we
		 * always cache those--so this retry must not match the
		 * original:
		 */
		op->status = nfserr_seq_false_retry;
	} else {
2394 2395 2396
		op = &args->ops[resp->opcnt++];
		op->status = nfserr_retry_uncached_rep;
		nfsd4_encode_operation(resp, op);
2397
	}
2398
	return op->status;
2399 2400 2401
}

/*
2402 2403
 * The sequence operation is not cached because we can use the slot and
 * session values.
2404
 */
2405
static __be32
2406 2407
nfsd4_replay_cache_entry(struct nfsd4_compoundres *resp,
			 struct nfsd4_sequence *seq)
2408
{
2409
	struct nfsd4_slot *slot = resp->cstate.slot;
2410 2411
	struct xdr_stream *xdr = &resp->xdr;
	__be32 *p;
2412 2413
	__be32 status;

2414
	dprintk("--> %s slot %p\n", __func__, slot);
2415

2416
	status = nfsd4_enc_sequence_replay(resp->rqstp->rq_argp, resp);
2417
	if (status)
2418
		return status;
2419

2420 2421 2422 2423 2424 2425 2426
	p = xdr_reserve_space(xdr, slot->sl_datalen);
	if (!p) {
		WARN_ON_ONCE(1);
		return nfserr_serverfault;
	}
	xdr_encode_opaque_fixed(p, slot->sl_data, slot->sl_datalen);
	xdr_commit_encode(xdr);
2427

2428
	resp->opcnt = slot->sl_opcnt;
2429
	return slot->sl_status;
2430 2431
}

A
Andy Adamson 已提交
2432 2433 2434 2435 2436 2437
/*
 * Set the exchange_id flags returned by the server.
 */
static void
nfsd4_set_ex_flags(struct nfs4_client *new, struct nfsd4_exchange_id *clid)
{
2438 2439 2440
#ifdef CONFIG_NFSD_PNFS
	new->cl_exchange_flags |= EXCHGID4_FLAG_USE_PNFS_MDS;
#else
A
Andy Adamson 已提交
2441
	new->cl_exchange_flags |= EXCHGID4_FLAG_USE_NON_PNFS;
2442
#endif
A
Andy Adamson 已提交
2443 2444 2445 2446 2447 2448 2449 2450

	/* Referrals are supported, Migration is not. */
	new->cl_exchange_flags |= EXCHGID4_FLAG_SUPP_MOVED_REFER;

	/* set the wire flags to return to client. */
	clid->flags = new->cl_exchange_flags;
}

2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461
static bool client_has_openowners(struct nfs4_client *clp)
{
	struct nfs4_openowner *oo;

	list_for_each_entry(oo, &clp->cl_openowners, oo_perclient) {
		if (!list_empty(&oo->oo_owner.so_stateids))
			return true;
	}
	return false;
}

2462 2463
static bool client_has_state(struct nfs4_client *clp)
{
2464
	return client_has_openowners(clp)
2465 2466 2467
#ifdef CONFIG_NFSD_PNFS
		|| !list_empty(&clp->cl_lo_states)
#endif
2468 2469
		|| !list_empty(&clp->cl_delegations)
		|| !list_empty(&clp->cl_sessions);
2470 2471
}

A
Andy Adamson 已提交
2472
__be32
2473 2474
nfsd4_exchange_id(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
A
Andy Adamson 已提交
2475
{
2476
	struct nfsd4_exchange_id *exid = &u->exchange_id;
2477 2478
	struct nfs4_client *conf, *new;
	struct nfs4_client *unconf = NULL;
J
J. Bruce Fields 已提交
2479
	__be32 status;
2480
	char			addr_str[INET6_ADDRSTRLEN];
A
Andy Adamson 已提交
2481
	nfs4_verifier		verf = exid->verifier;
2482
	struct sockaddr		*sa = svc_addr(rqstp);
2483
	bool	update = exid->flags & EXCHGID4_FLAG_UPD_CONFIRMED_REC_A;
2484
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
2485

2486
	rpc_ntop(sa, addr_str, sizeof(addr_str));
A
Andy Adamson 已提交
2487
	dprintk("%s rqstp=%p exid=%p clname.len=%u clname.data=%p "
2488
		"ip_addr=%s flags %x, spa_how %d\n",
A
Andy Adamson 已提交
2489
		__func__, rqstp, exid, exid->clname.len, exid->clname.data,
2490
		addr_str, exid->flags, exid->spa_how);
A
Andy Adamson 已提交
2491

2492
	if (exid->flags & ~EXCHGID4_FLAG_MASK_A)
A
Andy Adamson 已提交
2493 2494
		return nfserr_inval;

2495 2496 2497 2498
	new = create_client(exid->clname, rqstp, &verf);
	if (new == NULL)
		return nfserr_jukebox;

A
Andy Adamson 已提交
2499
	switch (exid->spa_how) {
2500
	case SP4_MACH_CRED:
2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516
		exid->spo_must_enforce[0] = 0;
		exid->spo_must_enforce[1] = (
			1 << (OP_BIND_CONN_TO_SESSION - 32) |
			1 << (OP_EXCHANGE_ID - 32) |
			1 << (OP_CREATE_SESSION - 32) |
			1 << (OP_DESTROY_SESSION - 32) |
			1 << (OP_DESTROY_CLIENTID - 32));

		exid->spo_must_allow[0] &= (1 << (OP_CLOSE) |
					1 << (OP_OPEN_DOWNGRADE) |
					1 << (OP_LOCKU) |
					1 << (OP_DELEGRETURN));

		exid->spo_must_allow[1] &= (
					1 << (OP_TEST_STATEID - 32) |
					1 << (OP_FREE_STATEID - 32));
2517 2518 2519
		if (!svc_rqst_integrity_protected(rqstp)) {
			status = nfserr_inval;
			goto out_nolock;
2520 2521 2522 2523 2524 2525
		}
		/*
		 * Sometimes userspace doesn't give us a principal.
		 * Which is a bug, really.  Anyway, we can't enforce
		 * MACH_CRED in that case, better to give up now:
		 */
2526 2527
		if (!new->cl_cred.cr_principal &&
					!new->cl_cred.cr_raw_principal) {
2528 2529
			status = nfserr_serverfault;
			goto out_nolock;
2530 2531
		}
		new->cl_mach_cred = true;
A
Andy Adamson 已提交
2532 2533
	case SP4_NONE:
		break;
2534 2535
	default:				/* checked by xdr code */
		WARN_ON_ONCE(1);
A
Andy Adamson 已提交
2536
	case SP4_SSV:
2537 2538
		status = nfserr_encr_alg_unsupp;
		goto out_nolock;
A
Andy Adamson 已提交
2539 2540
	}

2541
	/* Cases below refer to rfc 5661 section 18.35.4: */
2542
	spin_lock(&nn->client_lock);
2543
	conf = find_confirmed_client_by_name(&exid->clname, nn);
A
Andy Adamson 已提交
2544
	if (conf) {
2545 2546 2547
		bool creds_match = same_creds(&conf->cl_cred, &rqstp->rq_cred);
		bool verfs_match = same_verf(&verf, &conf->cl_verifier);

2548 2549
		if (update) {
			if (!clp_used_exchangeid(conf)) { /* buggy client */
2550
				status = nfserr_inval;
2551 2552
				goto out;
			}
2553
			if (!nfsd4_mach_creds_match(conf, rqstp)) {
2554 2555 2556
				status = nfserr_wrong_cred;
				goto out;
			}
2557
			if (!creds_match) { /* case 9 */
2558
				status = nfserr_perm;
2559 2560 2561
				goto out;
			}
			if (!verfs_match) { /* case 8 */
A
Andy Adamson 已提交
2562 2563 2564
				status = nfserr_not_same;
				goto out;
			}
2565 2566 2567
			/* case 6 */
			exid->flags |= EXCHGID4_FLAG_CONFIRMED_R;
			goto out_copy;
A
Andy Adamson 已提交
2568
		}
2569
		if (!creds_match) { /* case 3 */
2570 2571
			if (client_has_state(conf)) {
				status = nfserr_clid_inuse;
A
Andy Adamson 已提交
2572 2573 2574 2575
				goto out;
			}
			goto out_new;
		}
2576
		if (verfs_match) { /* case 2 */
2577
			conf->cl_exchange_flags |= EXCHGID4_FLAG_CONFIRMED_R;
2578 2579 2580
			goto out_copy;
		}
		/* case 5, client reboot */
2581
		conf = NULL;
2582
		goto out_new;
2583 2584
	}

2585
	if (update) { /* case 7 */
2586 2587
		status = nfserr_noent;
		goto out;
A
Andy Adamson 已提交
2588 2589
	}

2590
	unconf  = find_unconfirmed_client_by_name(&exid->clname, nn);
2591
	if (unconf) /* case 4, possible retry or client restart */
2592
		unhash_client_locked(unconf);
A
Andy Adamson 已提交
2593

2594
	/* case 1 (normal case) */
A
Andy Adamson 已提交
2595
out_new:
2596 2597 2598 2599 2600
	if (conf) {
		status = mark_client_expired_locked(conf);
		if (status)
			goto out;
	}
2601
	new->cl_minorversion = cstate->minorversion;
2602 2603
	new->cl_spo_must_allow.u.words[0] = exid->spo_must_allow[0];
	new->cl_spo_must_allow.u.words[1] = exid->spo_must_allow[1];
A
Andy Adamson 已提交
2604

2605
	gen_clid(new, nn);
2606
	add_to_unconfirmed(new);
2607
	swap(new, conf);
A
Andy Adamson 已提交
2608
out_copy:
2609 2610
	exid->clientid.cl_boot = conf->cl_clientid.cl_boot;
	exid->clientid.cl_id = conf->cl_clientid.cl_id;
A
Andy Adamson 已提交
2611

2612 2613
	exid->seqid = conf->cl_cs_slot.sl_seqid + 1;
	nfsd4_set_ex_flags(conf, exid);
A
Andy Adamson 已提交
2614 2615

	dprintk("nfsd4_exchange_id seqid %d flags %x\n",
2616
		conf->cl_cs_slot.sl_seqid, conf->cl_exchange_flags);
A
Andy Adamson 已提交
2617 2618 2619
	status = nfs_ok;

out:
2620
	spin_unlock(&nn->client_lock);
2621
out_nolock:
2622
	if (new)
2623 2624 2625
		expire_client(new);
	if (unconf)
		expire_client(unconf);
A
Andy Adamson 已提交
2626
	return status;
A
Andy Adamson 已提交
2627 2628
}

J
J. Bruce Fields 已提交
2629
static __be32
2630
check_slot_seqid(u32 seqid, u32 slot_seqid, int slot_inuse)
B
Benny Halevy 已提交
2631
{
2632 2633
	dprintk("%s enter. seqid %d slot_seqid %d\n", __func__, seqid,
		slot_seqid);
B
Benny Halevy 已提交
2634 2635

	/* The slot is in use, and no response has been sent. */
2636 2637
	if (slot_inuse) {
		if (seqid == slot_seqid)
B
Benny Halevy 已提交
2638 2639 2640 2641
			return nfserr_jukebox;
		else
			return nfserr_seq_misordered;
	}
2642
	/* Note unsigned 32-bit arithmetic handles wraparound: */
2643
	if (likely(seqid == slot_seqid + 1))
B
Benny Halevy 已提交
2644
		return nfs_ok;
2645
	if (seqid == slot_seqid)
B
Benny Halevy 已提交
2646 2647 2648 2649
		return nfserr_replay_cache;
	return nfserr_seq_misordered;
}

2650 2651 2652 2653 2654 2655 2656
/*
 * Cache the create session result into the create session single DRC
 * slot cache by saving the xdr structure. sl_seqid has been set.
 * Do this for solo or embedded create session operations.
 */
static void
nfsd4_cache_create_session(struct nfsd4_create_session *cr_ses,
J
J. Bruce Fields 已提交
2657
			   struct nfsd4_clid_slot *slot, __be32 nfserr)
2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670
{
	slot->sl_status = nfserr;
	memcpy(&slot->sl_cr_ses, cr_ses, sizeof(*cr_ses));
}

static __be32
nfsd4_replay_create_session(struct nfsd4_create_session *cr_ses,
			    struct nfsd4_clid_slot *slot)
{
	memcpy(cr_ses, &slot->sl_cr_ses, sizeof(*cr_ses));
	return slot->sl_status;
}

2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687
#define NFSD_MIN_REQ_HDR_SEQ_SZ	((\
			2 * 2 + /* credential,verifier: AUTH_NULL, length 0 */ \
			1 +	/* MIN tag is length with zero, only length */ \
			3 +	/* version, opcount, opcode */ \
			XDR_QUADLEN(NFS4_MAX_SESSIONID_LEN) + \
				/* seqid, slotID, slotID, cache */ \
			4 ) * sizeof(__be32))

#define NFSD_MIN_RESP_HDR_SEQ_SZ ((\
			2 +	/* verifier: AUTH_NULL, length 0 */\
			1 +	/* status */ \
			1 +	/* MIN tag is length with zero, only length */ \
			3 +	/* opcount, opcode, opstatus*/ \
			XDR_QUADLEN(NFS4_MAX_SESSIONID_LEN) + \
				/* seqid, slotID, slotID, slotID, status */ \
			5 ) * sizeof(__be32))

2688
static __be32 check_forechannel_attrs(struct nfsd4_channel_attrs *ca, struct nfsd_net *nn)
2689
{
2690 2691
	u32 maxrpc = nn->nfsd_serv->sv_max_mesg;

2692 2693 2694 2695
	if (ca->maxreq_sz < NFSD_MIN_REQ_HDR_SEQ_SZ)
		return nfserr_toosmall;
	if (ca->maxresp_sz < NFSD_MIN_RESP_HDR_SEQ_SZ)
		return nfserr_toosmall;
2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714
	ca->headerpadsz = 0;
	ca->maxreq_sz = min_t(u32, ca->maxreq_sz, maxrpc);
	ca->maxresp_sz = min_t(u32, ca->maxresp_sz, maxrpc);
	ca->maxops = min_t(u32, ca->maxops, NFSD_MAX_OPS_PER_COMPOUND);
	ca->maxresp_cached = min_t(u32, ca->maxresp_cached,
			NFSD_SLOT_CACHE_SIZE + NFSD_MIN_HDR_SEQ_SZ);
	ca->maxreqs = min_t(u32, ca->maxreqs, NFSD_MAX_SLOTS_PER_SESSION);
	/*
	 * Note decreasing slot size below client's request may make it
	 * difficult for client to function correctly, whereas
	 * decreasing the number of slots will (just?) affect
	 * performance.  When short on memory we therefore prefer to
	 * decrease number of slots instead of their size.  Clients that
	 * request larger slots than they need will get poor results:
	 */
	ca->maxreqs = nfsd4_get_drc_mem(ca);
	if (!ca->maxreqs)
		return nfserr_jukebox;

2715
	return nfs_ok;
2716 2717
}

2718 2719 2720 2721 2722 2723 2724 2725 2726 2727
/*
 * Server's NFSv4.1 backchannel support is AUTH_SYS-only for now.
 * These are based on similar macros in linux/sunrpc/msg_prot.h .
 */
#define RPC_MAX_HEADER_WITH_AUTH_SYS \
	(RPC_CALLHDRSIZE + 2 * (2 + UNX_CALLSLACK))

#define RPC_MAX_REPHEADER_WITH_AUTH_SYS \
	(RPC_REPHDRSIZE + (2 + NUL_REPLYSLACK))

2728
#define NFSD_CB_MAX_REQ_SZ	((NFS4_enc_cb_recall_sz + \
2729
				 RPC_MAX_HEADER_WITH_AUTH_SYS) * sizeof(__be32))
2730
#define NFSD_CB_MAX_RESP_SZ	((NFS4_dec_cb_recall_sz + \
2731 2732
				 RPC_MAX_REPHEADER_WITH_AUTH_SYS) * \
				 sizeof(__be32))
2733

2734
static __be32 check_backchannel_attrs(struct nfsd4_channel_attrs *ca)
2735
{
2736 2737
	ca->headerpadsz = 0;

2738
	if (ca->maxreq_sz < NFSD_CB_MAX_REQ_SZ)
2739
		return nfserr_toosmall;
2740
	if (ca->maxresp_sz < NFSD_CB_MAX_RESP_SZ)
2741 2742 2743 2744 2745 2746
		return nfserr_toosmall;
	ca->maxresp_cached = 0;
	if (ca->maxops < 2)
		return nfserr_toosmall;

	return nfs_ok;
2747 2748
}

2749 2750 2751 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766
static __be32 nfsd4_check_cb_sec(struct nfsd4_cb_sec *cbs)
{
	switch (cbs->flavor) {
	case RPC_AUTH_NULL:
	case RPC_AUTH_UNIX:
		return nfs_ok;
	default:
		/*
		 * GSS case: the spec doesn't allow us to return this
		 * error.  But it also doesn't allow us not to support
		 * GSS.
		 * I'd rather this fail hard than return some error the
		 * client might think it can already handle:
		 */
		return nfserr_encr_alg_unsupp;
	}
}

A
Andy Adamson 已提交
2767 2768
__be32
nfsd4_create_session(struct svc_rqst *rqstp,
2769
		struct nfsd4_compound_state *cstate, union nfsd4_op_u *u)
A
Andy Adamson 已提交
2770
{
2771
	struct nfsd4_create_session *cr_ses = &u->create_session;
2772
	struct sockaddr *sa = svc_addr(rqstp);
A
Andy Adamson 已提交
2773
	struct nfs4_client *conf, *unconf;
2774
	struct nfs4_client *old = NULL;
2775
	struct nfsd4_session *new;
2776
	struct nfsd4_conn *conn;
2777
	struct nfsd4_clid_slot *cs_slot = NULL;
J
J. Bruce Fields 已提交
2778
	__be32 status = 0;
2779
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
2780

2781 2782
	if (cr_ses->flags & ~SESSION4_FLAG_MASK_A)
		return nfserr_inval;
2783 2784 2785
	status = nfsd4_check_cb_sec(&cr_ses->cb_sec);
	if (status)
		return status;
2786
	status = check_forechannel_attrs(&cr_ses->fore_channel, nn);
2787 2788 2789
	if (status)
		return status;
	status = check_backchannel_attrs(&cr_ses->back_channel);
2790
	if (status)
2791
		goto out_release_drc_mem;
2792
	status = nfserr_jukebox;
2793
	new = alloc_session(&cr_ses->fore_channel, &cr_ses->back_channel);
2794 2795
	if (!new)
		goto out_release_drc_mem;
2796 2797 2798
	conn = alloc_conn_from_crses(rqstp, cr_ses);
	if (!conn)
		goto out_free_session;
2799

2800
	spin_lock(&nn->client_lock);
2801
	unconf = find_unconfirmed_client(&cr_ses->clientid, true, nn);
2802
	conf = find_confirmed_client(&cr_ses->clientid, true, nn);
2803
	WARN_ON_ONCE(conf && unconf);
A
Andy Adamson 已提交
2804 2805

	if (conf) {
2806
		status = nfserr_wrong_cred;
2807
		if (!nfsd4_mach_creds_match(conf, rqstp))
2808
			goto out_free_conn;
2809 2810
		cs_slot = &conf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2811 2812 2813
		if (status) {
			if (status == nfserr_replay_cache)
				status = nfsd4_replay_create_session(cr_ses, cs_slot);
2814
			goto out_free_conn;
A
Andy Adamson 已提交
2815 2816 2817
		}
	} else if (unconf) {
		if (!same_creds(&unconf->cl_cred, &rqstp->rq_cred) ||
2818
		    !rpc_cmp_addr(sa, (struct sockaddr *) &unconf->cl_addr)) {
A
Andy Adamson 已提交
2819
			status = nfserr_clid_inuse;
2820
			goto out_free_conn;
A
Andy Adamson 已提交
2821
		}
2822
		status = nfserr_wrong_cred;
2823
		if (!nfsd4_mach_creds_match(unconf, rqstp))
2824
			goto out_free_conn;
2825 2826
		cs_slot = &unconf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2827 2828
		if (status) {
			/* an unconfirmed replay returns misordered */
A
Andy Adamson 已提交
2829
			status = nfserr_seq_misordered;
2830
			goto out_free_conn;
A
Andy Adamson 已提交
2831
		}
2832
		old = find_confirmed_client_by_name(&unconf->cl_name, nn);
2833
		if (old) {
2834
			status = mark_client_expired_locked(old);
2835 2836
			if (status) {
				old = NULL;
2837
				goto out_free_conn;
2838
			}
2839
		}
J
J. Bruce Fields 已提交
2840
		move_to_confirmed(unconf);
A
Andy Adamson 已提交
2841 2842 2843
		conf = unconf;
	} else {
		status = nfserr_stale_clientid;
2844
		goto out_free_conn;
A
Andy Adamson 已提交
2845
	}
2846
	status = nfs_ok;
2847
	/* Persistent sessions are not supported */
2848
	cr_ses->flags &= ~SESSION4_PERSIST;
2849
	/* Upshifting from TCP to RDMA is not supported */
2850 2851
	cr_ses->flags &= ~SESSION4_RDMA;

2852
	init_session(rqstp, new, conf, cr_ses);
2853
	nfsd4_get_session_locked(new);
2854

2855
	memcpy(cr_ses->sessionid.data, new->se_sessionid.data,
A
Andy Adamson 已提交
2856
	       NFS4_MAX_SESSIONID_LEN);
2857
	cs_slot->sl_seqid++;
2858
	cr_ses->seqid = cs_slot->sl_seqid;
A
Andy Adamson 已提交
2859

2860
	/* cache solo and embedded create sessions under the client_lock */
2861
	nfsd4_cache_create_session(cr_ses, cs_slot, status);
2862 2863 2864 2865 2866 2867
	spin_unlock(&nn->client_lock);
	/* init connection and backchannel */
	nfsd4_init_conn(rqstp, conn, new);
	nfsd4_put_session(new);
	if (old)
		expire_client(old);
A
Andy Adamson 已提交
2868
	return status;
2869
out_free_conn:
2870
	spin_unlock(&nn->client_lock);
2871
	free_conn(conn);
2872 2873
	if (old)
		expire_client(old);
2874 2875
out_free_session:
	__free_session(new);
2876 2877
out_release_drc_mem:
	nfsd4_put_drc_mem(&cr_ses->fore_channel);
J
J. Bruce Fields 已提交
2878
	return status;
A
Andy Adamson 已提交
2879 2880
}

2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891 2892 2893 2894
static __be32 nfsd4_map_bcts_dir(u32 *dir)
{
	switch (*dir) {
	case NFS4_CDFC4_FORE:
	case NFS4_CDFC4_BACK:
		return nfs_ok;
	case NFS4_CDFC4_FORE_OR_BOTH:
	case NFS4_CDFC4_BACK_OR_BOTH:
		*dir = NFS4_CDFC4_BOTH;
		return nfs_ok;
	};
	return nfserr_inval;
}

2895 2896 2897
__be32 nfsd4_backchannel_ctl(struct svc_rqst *rqstp,
		struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
2898
{
2899
	struct nfsd4_backchannel_ctl *bc = &u->backchannel_ctl;
2900
	struct nfsd4_session *session = cstate->session;
2901
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2902
	__be32 status;
2903

2904 2905 2906
	status = nfsd4_check_cb_sec(&bc->bc_cb_sec);
	if (status)
		return status;
2907
	spin_lock(&nn->client_lock);
2908 2909
	session->se_cb_prog = bc->bc_cb_program;
	session->se_cb_sec = bc->bc_cb_sec;
2910
	spin_unlock(&nn->client_lock);
2911 2912 2913 2914 2915 2916

	nfsd4_probe_callback(session->se_client);

	return nfs_ok;
}

2917 2918
__be32 nfsd4_bind_conn_to_session(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
2919
		     union nfsd4_op_u *u)
2920
{
2921
	struct nfsd4_bind_conn_to_session *bcts = &u->bind_conn_to_session;
2922
	__be32 status;
2923
	struct nfsd4_conn *conn;
2924
	struct nfsd4_session *session;
2925 2926
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
2927 2928 2929

	if (!nfsd4_last_compound_op(rqstp))
		return nfserr_not_only_op;
2930
	spin_lock(&nn->client_lock);
2931
	session = find_in_sessionid_hashtbl(&bcts->sessionid, net, &status);
2932
	spin_unlock(&nn->client_lock);
2933
	if (!session)
2934
		goto out_no_session;
2935
	status = nfserr_wrong_cred;
2936
	if (!nfsd4_mach_creds_match(session->se_client, rqstp))
2937
		goto out;
2938
	status = nfsd4_map_bcts_dir(&bcts->dir);
2939
	if (status)
2940
		goto out;
2941
	conn = alloc_conn(rqstp, bcts->dir);
2942
	status = nfserr_jukebox;
2943
	if (!conn)
2944 2945 2946 2947
		goto out;
	nfsd4_init_conn(rqstp, conn, session);
	status = nfs_ok;
out:
2948 2949
	nfsd4_put_session(session);
out_no_session:
2950
	return status;
2951 2952
}

2953 2954 2955 2956 2957 2958 2959
static bool nfsd4_compound_in_session(struct nfsd4_session *session, struct nfs4_sessionid *sid)
{
	if (!session)
		return 0;
	return !memcmp(sid, &session->se_sessionid, sizeof(*sid));
}

A
Andy Adamson 已提交
2960
__be32
2961 2962
nfsd4_destroy_session(struct svc_rqst *r, struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
A
Andy Adamson 已提交
2963
{
2964
	struct nfsd4_destroy_session *sessionid = &u->destroy_session;
B
Benny Halevy 已提交
2965
	struct nfsd4_session *ses;
2966
	__be32 status;
2967
	int ref_held_by_me = 0;
2968 2969
	struct net *net = SVC_NET(r);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
B
Benny Halevy 已提交
2970

2971
	status = nfserr_not_only_op;
2972
	if (nfsd4_compound_in_session(cstate->session, &sessionid->sessionid)) {
2973
		if (!nfsd4_last_compound_op(r))
2974
			goto out;
2975
		ref_held_by_me++;
2976
	}
B
Benny Halevy 已提交
2977
	dump_sessionid(__func__, &sessionid->sessionid);
2978
	spin_lock(&nn->client_lock);
2979
	ses = find_in_sessionid_hashtbl(&sessionid->sessionid, net, &status);
2980 2981
	if (!ses)
		goto out_client_lock;
2982
	status = nfserr_wrong_cred;
2983
	if (!nfsd4_mach_creds_match(ses->se_client, r))
2984
		goto out_put_session;
2985
	status = mark_session_dead_locked(ses, 1 + ref_held_by_me);
2986
	if (status)
2987
		goto out_put_session;
B
Benny Halevy 已提交
2988
	unhash_session(ses);
2989
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2990

2991
	nfsd4_probe_callback_sync(ses->se_client);
2992

2993
	spin_lock(&nn->client_lock);
B
Benny Halevy 已提交
2994
	status = nfs_ok;
2995
out_put_session:
2996
	nfsd4_put_session_locked(ses);
2997 2998
out_client_lock:
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2999 3000
out:
	return status;
A
Andy Adamson 已提交
3001 3002
}

3003
static struct nfsd4_conn *__nfsd4_find_conn(struct svc_xprt *xpt, struct nfsd4_session *s)
3004 3005 3006 3007
{
	struct nfsd4_conn *c;

	list_for_each_entry(c, &s->se_conns, cn_persession) {
3008
		if (c->cn_xprt == xpt) {
3009 3010 3011 3012 3013 3014
			return c;
		}
	}
	return NULL;
}

3015
static __be32 nfsd4_sequence_check_conn(struct nfsd4_conn *new, struct nfsd4_session *ses)
3016 3017
{
	struct nfs4_client *clp = ses->se_client;
3018
	struct nfsd4_conn *c;
3019
	__be32 status = nfs_ok;
3020
	int ret;
3021 3022

	spin_lock(&clp->cl_lock);
3023
	c = __nfsd4_find_conn(new->cn_xprt, ses);
3024 3025 3026 3027 3028
	if (c)
		goto out_free;
	status = nfserr_conn_not_bound_to_session;
	if (clp->cl_mach_cred)
		goto out_free;
3029 3030
	__nfsd4_hash_conn(new, ses);
	spin_unlock(&clp->cl_lock);
3031 3032 3033 3034
	ret = nfsd4_register_conn(new);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&new->cn_xpt_user);
3035 3036 3037 3038 3039
	return nfs_ok;
out_free:
	spin_unlock(&clp->cl_lock);
	free_conn(new);
	return status;
3040 3041
}

3042 3043 3044 3045 3046 3047 3048
static bool nfsd4_session_too_many_ops(struct svc_rqst *rqstp, struct nfsd4_session *session)
{
	struct nfsd4_compoundargs *args = rqstp->rq_argp;

	return args->opcnt > session->se_fchannel.maxops;
}

M
Mi Jinlong 已提交
3049 3050 3051 3052 3053 3054 3055 3056
static bool nfsd4_request_too_big(struct svc_rqst *rqstp,
				  struct nfsd4_session *session)
{
	struct xdr_buf *xb = &rqstp->rq_arg;

	return xb->len > session->se_fchannel.maxreq_sz;
}

3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083 3084
static bool replay_matches_cache(struct svc_rqst *rqstp,
		 struct nfsd4_sequence *seq, struct nfsd4_slot *slot)
{
	struct nfsd4_compoundargs *argp = rqstp->rq_argp;

	if ((bool)(slot->sl_flags & NFSD4_SLOT_CACHETHIS) !=
	    (bool)seq->cachethis)
		return false;
	/*
	 * If there's an error than the reply can have fewer ops than
	 * the call.  But if we cached a reply with *more* ops than the
	 * call you're sending us now, then this new call is clearly not
	 * really a replay of the old one:
	 */
	if (slot->sl_opcnt < argp->opcnt)
		return false;
	/* This is the only check explicitly called by spec: */
	if (!same_creds(&rqstp->rq_cred, &slot->sl_cred))
		return false;
	/*
	 * There may be more comparisons we could actually do, but the
	 * spec doesn't require us to catch every case where the calls
	 * don't match (that would require caching the call as well as
	 * the reply), so we don't bother.
	 */
	return true;
}

A
Andy Adamson 已提交
3085
__be32
3086 3087
nfsd4_sequence(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
A
Andy Adamson 已提交
3088
{
3089
	struct nfsd4_sequence *seq = &u->sequence;
3090
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
3091
	struct xdr_stream *xdr = &resp->xdr;
B
Benny Halevy 已提交
3092
	struct nfsd4_session *session;
3093
	struct nfs4_client *clp;
B
Benny Halevy 已提交
3094
	struct nfsd4_slot *slot;
3095
	struct nfsd4_conn *conn;
J
J. Bruce Fields 已提交
3096
	__be32 status;
3097
	int buflen;
3098 3099
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
B
Benny Halevy 已提交
3100

3101 3102 3103
	if (resp->opcnt != 1)
		return nfserr_sequence_pos;

3104 3105 3106 3107 3108 3109 3110 3111
	/*
	 * Will be either used or freed by nfsd4_sequence_check_conn
	 * below.
	 */
	conn = alloc_conn(rqstp, NFS4_CDFC4_FORE);
	if (!conn)
		return nfserr_jukebox;

3112
	spin_lock(&nn->client_lock);
3113
	session = find_in_sessionid_hashtbl(&seq->sessionid, net, &status);
B
Benny Halevy 已提交
3114
	if (!session)
3115 3116
		goto out_no_session;
	clp = session->se_client;
B
Benny Halevy 已提交
3117

3118 3119
	status = nfserr_too_many_ops;
	if (nfsd4_session_too_many_ops(rqstp, session))
3120
		goto out_put_session;
3121

M
Mi Jinlong 已提交
3122 3123
	status = nfserr_req_too_big;
	if (nfsd4_request_too_big(rqstp, session))
3124
		goto out_put_session;
M
Mi Jinlong 已提交
3125

B
Benny Halevy 已提交
3126
	status = nfserr_badslot;
3127
	if (seq->slotid >= session->se_fchannel.maxreqs)
3128
		goto out_put_session;
B
Benny Halevy 已提交
3129

3130
	slot = session->se_slots[seq->slotid];
B
Benny Halevy 已提交
3131 3132
	dprintk("%s: slotid %d\n", __func__, seq->slotid);

3133 3134 3135 3136 3137
	/* We do not negotiate the number of slots yet, so set the
	 * maxslots to the session maxreqs which is used to encode
	 * sr_highest_slotid and the sr_target_slot id to maxslots */
	seq->maxslots = session->se_fchannel.maxreqs;

3138 3139
	status = check_slot_seqid(seq->seqid, slot->sl_seqid,
					slot->sl_flags & NFSD4_SLOT_INUSE);
B
Benny Halevy 已提交
3140
	if (status == nfserr_replay_cache) {
3141 3142
		status = nfserr_seq_misordered;
		if (!(slot->sl_flags & NFSD4_SLOT_INITIALIZED))
3143
			goto out_put_session;
3144 3145 3146
		status = nfserr_seq_false_retry;
		if (!replay_matches_cache(rqstp, seq, slot))
			goto out_put_session;
B
Benny Halevy 已提交
3147 3148
		cstate->slot = slot;
		cstate->session = session;
3149
		cstate->clp = clp;
A
Andy Adamson 已提交
3150
		/* Return the cached reply status and set cstate->status
3151
		 * for nfsd4_proc_compound processing */
3152
		status = nfsd4_replay_cache_entry(resp, seq);
A
Andy Adamson 已提交
3153
		cstate->status = nfserr_replay_cache;
3154
		goto out;
B
Benny Halevy 已提交
3155 3156
	}
	if (status)
3157
		goto out_put_session;
B
Benny Halevy 已提交
3158

3159
	status = nfsd4_sequence_check_conn(conn, session);
3160
	conn = NULL;
3161 3162
	if (status)
		goto out_put_session;
3163

3164 3165 3166 3167 3168
	buflen = (seq->cachethis) ?
			session->se_fchannel.maxresp_cached :
			session->se_fchannel.maxresp_sz;
	status = (seq->cachethis) ? nfserr_rep_too_big_to_cache :
				    nfserr_rep_too_big;
3169
	if (xdr_restrict_buflen(xdr, buflen - rqstp->rq_auth_slack))
3170
		goto out_put_session;
3171
	svc_reserve(rqstp, buflen);
3172 3173

	status = nfs_ok;
B
Benny Halevy 已提交
3174 3175
	/* Success! bump slot seqid */
	slot->sl_seqid = seq->seqid;
3176
	slot->sl_flags |= NFSD4_SLOT_INUSE;
3177 3178
	if (seq->cachethis)
		slot->sl_flags |= NFSD4_SLOT_CACHETHIS;
3179 3180
	else
		slot->sl_flags &= ~NFSD4_SLOT_CACHETHIS;
B
Benny Halevy 已提交
3181 3182 3183

	cstate->slot = slot;
	cstate->session = session;
3184
	cstate->clp = clp;
B
Benny Halevy 已提交
3185 3186

out:
3187 3188 3189 3190 3191 3192 3193 3194 3195
	switch (clp->cl_cb_state) {
	case NFSD4_CB_DOWN:
		seq->status_flags = SEQ4_STATUS_CB_PATH_DOWN;
		break;
	case NFSD4_CB_FAULT:
		seq->status_flags = SEQ4_STATUS_BACKCHANNEL_FAULT;
		break;
	default:
		seq->status_flags = 0;
3196
	}
3197 3198
	if (!list_empty(&clp->cl_revoked))
		seq->status_flags |= SEQ4_STATUS_RECALLABLE_STATE_REVOKED;
3199
out_no_session:
3200 3201
	if (conn)
		free_conn(conn);
3202
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
3203
	return status;
3204
out_put_session:
3205
	nfsd4_put_session_locked(session);
3206
	goto out_no_session;
A
Andy Adamson 已提交
3207 3208
}

3209 3210 3211 3212 3213 3214 3215 3216 3217 3218
void
nfsd4_sequence_done(struct nfsd4_compoundres *resp)
{
	struct nfsd4_compound_state *cs = &resp->cstate;

	if (nfsd4_has_session(cs)) {
		if (cs->status != nfserr_replay_cache) {
			nfsd4_store_cache_entry(resp);
			cs->slot->sl_flags &= ~NFSD4_SLOT_INUSE;
		}
3219
		/* Drop session reference that was taken in nfsd4_sequence() */
3220
		nfsd4_put_session(cs->session);
3221 3222
	} else if (cs->clp)
		put_client_renew(cs->clp);
3223 3224
}

3225
__be32
3226 3227 3228
nfsd4_destroy_clientid(struct svc_rqst *rqstp,
		struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
3229
{
3230
	struct nfsd4_destroy_clientid *dc = &u->destroy_clientid;
3231 3232
	struct nfs4_client *conf, *unconf;
	struct nfs4_client *clp = NULL;
J
J. Bruce Fields 已提交
3233
	__be32 status = 0;
3234
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
3235

3236
	spin_lock(&nn->client_lock);
3237
	unconf = find_unconfirmed_client(&dc->clientid, true, nn);
3238
	conf = find_confirmed_client(&dc->clientid, true, nn);
3239
	WARN_ON_ONCE(conf && unconf);
3240 3241

	if (conf) {
3242
		if (client_has_state(conf)) {
3243 3244 3245
			status = nfserr_clientid_busy;
			goto out;
		}
3246 3247 3248
		status = mark_client_expired_locked(conf);
		if (status)
			goto out;
3249
		clp = conf;
3250 3251 3252 3253 3254 3255
	} else if (unconf)
		clp = unconf;
	else {
		status = nfserr_stale_clientid;
		goto out;
	}
3256
	if (!nfsd4_mach_creds_match(clp, rqstp)) {
3257
		clp = NULL;
3258 3259 3260
		status = nfserr_wrong_cred;
		goto out;
	}
3261
	unhash_client_locked(clp);
3262
out:
3263 3264 3265
	spin_unlock(&nn->client_lock);
	if (clp)
		expire_client(clp);
3266 3267 3268
	return status;
}

3269
__be32
3270 3271
nfsd4_reclaim_complete(struct svc_rqst *rqstp,
		struct nfsd4_compound_state *cstate, union nfsd4_op_u *u)
3272
{
3273
	struct nfsd4_reclaim_complete *rc = &u->reclaim_complete;
J
J. Bruce Fields 已提交
3274
	__be32 status = 0;
3275

3276 3277 3278 3279 3280 3281 3282
	if (rc->rca_one_fs) {
		if (!cstate->current_fh.fh_dentry)
			return nfserr_nofilehandle;
		/*
		 * We don't take advantage of the rca_one_fs case.
		 * That's OK, it's optional, we can safely ignore it.
		 */
3283
		return nfs_ok;
3284
	}
3285 3286

	status = nfserr_complete_already;
3287 3288
	if (test_and_set_bit(NFSD4_CLIENT_RECLAIM_COMPLETE,
			     &cstate->session->se_client->cl_flags))
3289 3290 3291 3292
		goto out;

	status = nfserr_stale_clientid;
	if (is_client_expired(cstate->session->se_client))
3293 3294 3295 3296 3297 3298 3299
		/*
		 * The following error isn't really legal.
		 * But we only get here if the client just explicitly
		 * destroyed the client.  Surely it no longer cares what
		 * error it gets back on an operation for the dead
		 * client.
		 */
3300 3301 3302
		goto out;

	status = nfs_ok;
3303
	nfsd4_client_record_create(cstate->session->se_client);
3304 3305
out:
	return status;
3306 3307
}

3308
__be32
3309
nfsd4_setclientid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
3310
		  union nfsd4_op_u *u)
L
Linus Torvalds 已提交
3311
{
3312
	struct nfsd4_setclientid *setclid = &u->setclientid;
3313
	struct xdr_netobj 	clname = setclid->se_name;
L
Linus Torvalds 已提交
3314
	nfs4_verifier		clverifier = setclid->se_verf;
3315 3316
	struct nfs4_client	*conf, *new;
	struct nfs4_client	*unconf = NULL;
3317
	__be32 			status;
3318 3319
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

3320 3321 3322
	new = create_client(clname, rqstp, &clverifier);
	if (new == NULL)
		return nfserr_jukebox;
3323
	/* Cases below refer to rfc 3530 section 14.2.33: */
3324
	spin_lock(&nn->client_lock);
3325
	conf = find_confirmed_client_by_name(&clname, nn);
3326
	if (conf && client_has_state(conf)) {
3327
		/* case 0: */
L
Linus Torvalds 已提交
3328
		status = nfserr_clid_inuse;
3329 3330
		if (clp_used_exchangeid(conf))
			goto out;
3331
		if (!same_creds(&conf->cl_cred, &rqstp->rq_cred)) {
3332 3333 3334 3335 3336
			char addr_str[INET6_ADDRSTRLEN];
			rpc_ntop((struct sockaddr *) &conf->cl_addr, addr_str,
				 sizeof(addr_str));
			dprintk("NFSD: setclientid: string in use by client "
				"at %s\n", addr_str);
L
Linus Torvalds 已提交
3337 3338 3339
			goto out;
		}
	}
3340
	unconf = find_unconfirmed_client_by_name(&clname, nn);
3341
	if (unconf)
3342
		unhash_client_locked(unconf);
3343
	if (conf && same_verf(&conf->cl_verifier, &clverifier)) {
3344
		/* case 1: probable callback update */
L
Linus Torvalds 已提交
3345
		copy_clid(new, conf);
3346 3347
		gen_confirm(new, nn);
	} else /* case 4 (new client) or cases 2, 3 (client reboot): */
3348
		gen_clid(new, nn);
3349
	new->cl_minorversion = 0;
3350
	gen_callback(new, setclid, rqstp);
3351
	add_to_unconfirmed(new);
L
Linus Torvalds 已提交
3352 3353 3354
	setclid->se_clientid.cl_boot = new->cl_clientid.cl_boot;
	setclid->se_clientid.cl_id = new->cl_clientid.cl_id;
	memcpy(setclid->se_confirm.data, new->cl_confirm.data, sizeof(setclid->se_confirm.data));
3355
	new = NULL;
L
Linus Torvalds 已提交
3356 3357
	status = nfs_ok;
out:
3358
	spin_unlock(&nn->client_lock);
3359 3360
	if (new)
		free_client(new);
3361 3362
	if (unconf)
		expire_client(unconf);
L
Linus Torvalds 已提交
3363 3364 3365 3366
	return status;
}


3367
__be32
3368
nfsd4_setclientid_confirm(struct svc_rqst *rqstp,
3369 3370
			struct nfsd4_compound_state *cstate,
			union nfsd4_op_u *u)
L
Linus Torvalds 已提交
3371
{
3372 3373
	struct nfsd4_setclientid_confirm *setclientid_confirm =
			&u->setclientid_confirm;
3374
	struct nfs4_client *conf, *unconf;
3375
	struct nfs4_client *old = NULL;
L
Linus Torvalds 已提交
3376 3377
	nfs4_verifier confirm = setclientid_confirm->sc_confirm; 
	clientid_t * clid = &setclientid_confirm->sc_clientid;
3378
	__be32 status;
3379
	struct nfsd_net	*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
3380

3381
	if (STALE_CLIENTID(clid, nn))
L
Linus Torvalds 已提交
3382
		return nfserr_stale_clientid;
3383

3384
	spin_lock(&nn->client_lock);
3385
	conf = find_confirmed_client(clid, false, nn);
3386
	unconf = find_unconfirmed_client(clid, false, nn);
3387
	/*
3388 3389
	 * We try hard to give out unique clientid's, so if we get an
	 * attempt to confirm the same clientid with a different cred,
3390 3391 3392
	 * the client may be buggy; this should never happen.
	 *
	 * Nevertheless, RFC 7530 recommends INUSE for this case:
3393
	 */
3394
	status = nfserr_clid_inuse;
3395 3396 3397 3398
	if (unconf && !same_creds(&unconf->cl_cred, &rqstp->rq_cred))
		goto out;
	if (conf && !same_creds(&conf->cl_cred, &rqstp->rq_cred))
		goto out;
3399
	/* cases below refer to rfc 3530 section 14.2.34: */
3400
	if (!unconf || !same_verf(&confirm, &unconf->cl_confirm)) {
3401 3402
		if (conf && same_verf(&confirm, &conf->cl_confirm)) {
			/* case 2: probable retransmit */
L
Linus Torvalds 已提交
3403
			status = nfs_ok;
3404
		} else /* case 4: client hasn't noticed we rebooted yet? */
3405 3406 3407 3408 3409
			status = nfserr_stale_clientid;
		goto out;
	}
	status = nfs_ok;
	if (conf) { /* case 1: callback update */
3410 3411
		old = unconf;
		unhash_client_locked(old);
3412
		nfsd4_change_callback(conf, &unconf->cl_cb_conn);
3413
	} else { /* case 3: normal case; new or rebooted client */
3414 3415
		old = find_confirmed_client_by_name(&unconf->cl_name, nn);
		if (old) {
3416 3417 3418 3419 3420
			status = nfserr_clid_inuse;
			if (client_has_state(old)
					&& !same_creds(&unconf->cl_cred,
							&old->cl_cred))
				goto out;
3421
			status = mark_client_expired_locked(old);
3422 3423
			if (status) {
				old = NULL;
3424
				goto out;
3425
			}
3426
		}
3427
		move_to_confirmed(unconf);
3428
		conf = unconf;
3429
	}
3430 3431 3432 3433 3434
	get_client_locked(conf);
	spin_unlock(&nn->client_lock);
	nfsd4_probe_callback(conf);
	spin_lock(&nn->client_lock);
	put_client_renew_locked(conf);
L
Linus Torvalds 已提交
3435
out:
3436 3437 3438
	spin_unlock(&nn->client_lock);
	if (old)
		expire_client(old);
L
Linus Torvalds 已提交
3439 3440 3441
	return status;
}

3442 3443 3444 3445 3446
static struct nfs4_file *nfsd4_alloc_file(void)
{
	return kmem_cache_alloc(file_slab, GFP_KERNEL);
}

L
Linus Torvalds 已提交
3447
/* OPEN Share state helper functions */
3448 3449
static void nfsd4_init_file(struct knfsd_fh *fh, unsigned int hashval,
				struct nfs4_file *fp)
L
Linus Torvalds 已提交
3450
{
3451 3452
	lockdep_assert_held(&state_lock);

3453
	refcount_set(&fp->fi_ref, 1);
3454
	spin_lock_init(&fp->fi_lock);
3455 3456
	INIT_LIST_HEAD(&fp->fi_stateids);
	INIT_LIST_HEAD(&fp->fi_delegations);
3457
	INIT_LIST_HEAD(&fp->fi_clnt_odstate);
3458
	fh_copy_shallow(&fp->fi_fhandle, fh);
3459
	fp->fi_deleg_file = NULL;
3460
	fp->fi_had_conflict = false;
3461
	fp->fi_share_deny = 0;
3462 3463
	memset(fp->fi_fds, 0, sizeof(fp->fi_fds));
	memset(fp->fi_access, 0, sizeof(fp->fi_access));
3464 3465
#ifdef CONFIG_NFSD_PNFS
	INIT_LIST_HEAD(&fp->fi_lo_states);
3466
	atomic_set(&fp->fi_lo_recalls, 0);
3467
#endif
3468
	hlist_add_head_rcu(&fp->fi_hash, &file_hashtbl[hashval]);
L
Linus Torvalds 已提交
3469 3470
}

3471
void
L
Linus Torvalds 已提交
3472 3473
nfsd4_free_slabs(void)
{
3474
	kmem_cache_destroy(odstate_slab);
C
Christoph Hellwig 已提交
3475 3476 3477 3478 3479
	kmem_cache_destroy(openowner_slab);
	kmem_cache_destroy(lockowner_slab);
	kmem_cache_destroy(file_slab);
	kmem_cache_destroy(stateid_slab);
	kmem_cache_destroy(deleg_slab);
N
NeilBrown 已提交
3480
}
L
Linus Torvalds 已提交
3481

3482
int
N
NeilBrown 已提交
3483 3484
nfsd4_init_slabs(void)
{
3485 3486 3487
	openowner_slab = kmem_cache_create("nfsd4_openowners",
			sizeof(struct nfs4_openowner), 0, 0, NULL);
	if (openowner_slab == NULL)
C
Christoph Hellwig 已提交
3488
		goto out;
3489
	lockowner_slab = kmem_cache_create("nfsd4_lockowners",
3490
			sizeof(struct nfs4_lockowner), 0, 0, NULL);
3491
	if (lockowner_slab == NULL)
C
Christoph Hellwig 已提交
3492
		goto out_free_openowner_slab;
N
NeilBrown 已提交
3493
	file_slab = kmem_cache_create("nfsd4_files",
3494
			sizeof(struct nfs4_file), 0, 0, NULL);
N
NeilBrown 已提交
3495
	if (file_slab == NULL)
C
Christoph Hellwig 已提交
3496
		goto out_free_lockowner_slab;
N
NeilBrown 已提交
3497
	stateid_slab = kmem_cache_create("nfsd4_stateids",
3498
			sizeof(struct nfs4_ol_stateid), 0, 0, NULL);
N
NeilBrown 已提交
3499
	if (stateid_slab == NULL)
C
Christoph Hellwig 已提交
3500
		goto out_free_file_slab;
N
NeilBrown 已提交
3501
	deleg_slab = kmem_cache_create("nfsd4_delegations",
3502
			sizeof(struct nfs4_delegation), 0, 0, NULL);
N
NeilBrown 已提交
3503
	if (deleg_slab == NULL)
C
Christoph Hellwig 已提交
3504
		goto out_free_stateid_slab;
3505 3506 3507 3508
	odstate_slab = kmem_cache_create("nfsd4_odstate",
			sizeof(struct nfs4_clnt_odstate), 0, 0, NULL);
	if (odstate_slab == NULL)
		goto out_free_deleg_slab;
N
NeilBrown 已提交
3509
	return 0;
C
Christoph Hellwig 已提交
3510

3511 3512
out_free_deleg_slab:
	kmem_cache_destroy(deleg_slab);
C
Christoph Hellwig 已提交
3513 3514 3515 3516 3517 3518 3519 3520 3521
out_free_stateid_slab:
	kmem_cache_destroy(stateid_slab);
out_free_file_slab:
	kmem_cache_destroy(file_slab);
out_free_lockowner_slab:
	kmem_cache_destroy(lockowner_slab);
out_free_openowner_slab:
	kmem_cache_destroy(openowner_slab);
out:
N
NeilBrown 已提交
3522 3523
	dprintk("nfsd4: out of memory while initializing nfsv4\n");
	return -ENOMEM;
L
Linus Torvalds 已提交
3524 3525
}

3526
static void init_nfs4_replay(struct nfs4_replay *rp)
L
Linus Torvalds 已提交
3527
{
3528 3529 3530
	rp->rp_status = nfserr_serverfault;
	rp->rp_buflen = 0;
	rp->rp_buf = rp->rp_ibuf;
3531 3532 3533 3534 3535 3536 3537 3538
	mutex_init(&rp->rp_mutex);
}

static void nfsd4_cstate_assign_replay(struct nfsd4_compound_state *cstate,
		struct nfs4_stateowner *so)
{
	if (!nfsd4_has_session(cstate)) {
		mutex_lock(&so->so_replay.rp_mutex);
3539
		cstate->replay_owner = nfs4_get_stateowner(so);
3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551
	}
}

void nfsd4_cstate_clear_replay(struct nfsd4_compound_state *cstate)
{
	struct nfs4_stateowner *so = cstate->replay_owner;

	if (so != NULL) {
		cstate->replay_owner = NULL;
		mutex_unlock(&so->so_replay.rp_mutex);
		nfs4_put_stateowner(so);
	}
L
Linus Torvalds 已提交
3552 3553
}

3554
static inline void *alloc_stateowner(struct kmem_cache *slab, struct xdr_netobj *owner, struct nfs4_client *clp)
3555
{
L
Linus Torvalds 已提交
3556 3557
	struct nfs4_stateowner *sop;

3558
	sop = kmem_cache_alloc(slab, GFP_KERNEL);
3559 3560 3561 3562 3563
	if (!sop)
		return NULL;

	sop->so_owner.data = kmemdup(owner->data, owner->len, GFP_KERNEL);
	if (!sop->so_owner.data) {
3564
		kmem_cache_free(slab, sop);
L
Linus Torvalds 已提交
3565
		return NULL;
3566 3567 3568
	}
	sop->so_owner.len = owner->len;

3569
	INIT_LIST_HEAD(&sop->so_stateids);
3570 3571
	sop->so_client = clp;
	init_nfs4_replay(&sop->so_replay);
3572
	atomic_set(&sop->so_count, 1);
3573 3574 3575
	return sop;
}

3576
static void hash_openowner(struct nfs4_openowner *oo, struct nfs4_client *clp, unsigned int strhashval)
3577
{
3578
	lockdep_assert_held(&clp->cl_lock);
3579

3580 3581
	list_add(&oo->oo_owner.so_strhash,
		 &clp->cl_ownerstr_hashtbl[strhashval]);
3582
	list_add(&oo->oo_perclient, &clp->cl_openowners);
3583 3584
}

3585 3586
static void nfs4_unhash_openowner(struct nfs4_stateowner *so)
{
3587
	unhash_openowner_locked(openowner(so));
3588 3589
}

3590 3591 3592 3593 3594 3595 3596 3597
static void nfs4_free_openowner(struct nfs4_stateowner *so)
{
	struct nfs4_openowner *oo = openowner(so);

	kmem_cache_free(openowner_slab, oo);
}

static const struct nfs4_stateowner_operations openowner_ops = {
3598 3599
	.so_unhash =	nfs4_unhash_openowner,
	.so_free =	nfs4_free_openowner,
3600 3601
};

3602 3603 3604 3605 3606 3607 3608 3609 3610 3611 3612 3613
static struct nfs4_ol_stateid *
nfsd4_find_existing_open(struct nfs4_file *fp, struct nfsd4_open *open)
{
	struct nfs4_ol_stateid *local, *ret = NULL;
	struct nfs4_openowner *oo = open->op_openowner;

	lockdep_assert_held(&fp->fi_lock);

	list_for_each_entry(local, &fp->fi_stateids, st_perfile) {
		/* ignore lock owners */
		if (local->st_stateowner->so_is_open_owner == 0)
			continue;
3614 3615 3616
		if (local->st_stateowner != &oo->oo_owner)
			continue;
		if (local->st_stid.sc_type == NFS4_OPEN_STID) {
3617
			ret = local;
3618
			refcount_inc(&ret->st_stid.sc_count);
3619 3620 3621 3622 3623 3624
			break;
		}
	}
	return ret;
}

3625 3626 3627 3628 3629 3630 3631 3632
static __be32
nfsd4_verify_open_stid(struct nfs4_stid *s)
{
	__be32 ret = nfs_ok;

	switch (s->sc_type) {
	default:
		break;
3633
	case 0:
3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649
	case NFS4_CLOSED_STID:
	case NFS4_CLOSED_DELEG_STID:
		ret = nfserr_bad_stateid;
		break;
	case NFS4_REVOKED_DELEG_STID:
		ret = nfserr_deleg_revoked;
	}
	return ret;
}

/* Lock the stateid st_mutex, and deal with races with CLOSE */
static __be32
nfsd4_lock_ol_stateid(struct nfs4_ol_stateid *stp)
{
	__be32 ret;

3650
	mutex_lock_nested(&stp->st_mutex, LOCK_STATEID_MUTEX);
3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671
	ret = nfsd4_verify_open_stid(&stp->st_stid);
	if (ret != nfs_ok)
		mutex_unlock(&stp->st_mutex);
	return ret;
}

static struct nfs4_ol_stateid *
nfsd4_find_and_lock_existing_open(struct nfs4_file *fp, struct nfsd4_open *open)
{
	struct nfs4_ol_stateid *stp;
	for (;;) {
		spin_lock(&fp->fi_lock);
		stp = nfsd4_find_existing_open(fp, open);
		spin_unlock(&fp->fi_lock);
		if (!stp || nfsd4_lock_ol_stateid(stp) == nfs_ok)
			break;
		nfs4_put_stid(&stp->st_stid);
	}
	return stp;
}

3672
static struct nfs4_openowner *
3673
alloc_init_open_stateowner(unsigned int strhashval, struct nfsd4_open *open,
3674 3675
			   struct nfsd4_compound_state *cstate)
{
3676
	struct nfs4_client *clp = cstate->clp;
3677
	struct nfs4_openowner *oo, *ret;
3678

3679 3680
	oo = alloc_stateowner(openowner_slab, &open->op_owner, clp);
	if (!oo)
3681
		return NULL;
3682
	oo->oo_owner.so_ops = &openowner_ops;
3683 3684
	oo->oo_owner.so_is_open_owner = 1;
	oo->oo_owner.so_seqid = open->op_seqid;
3685
	oo->oo_flags = 0;
3686 3687
	if (nfsd4_has_session(cstate))
		oo->oo_flags |= NFS4_OO_CONFIRMED;
3688
	oo->oo_time = 0;
3689
	oo->oo_last_closed_stid = NULL;
3690
	INIT_LIST_HEAD(&oo->oo_close_lru);
3691 3692
	spin_lock(&clp->cl_lock);
	ret = find_openstateowner_str_locked(strhashval, open, clp);
3693 3694 3695 3696
	if (ret == NULL) {
		hash_openowner(oo, clp, strhashval);
		ret = oo;
	} else
3697 3698
		nfs4_free_stateowner(&oo->oo_owner);

3699
	spin_unlock(&clp->cl_lock);
3700
	return ret;
L
Linus Torvalds 已提交
3701 3702
}

3703
static struct nfs4_ol_stateid *
3704
init_open_stateid(struct nfs4_file *fp, struct nfsd4_open *open)
3705 3706
{

3707
	struct nfs4_openowner *oo = open->op_openowner;
3708
	struct nfs4_ol_stateid *retstp = NULL;
3709
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
3710

3711
	stp = open->op_stp;
3712 3713
	/* We are moving these outside of the spinlocks to avoid the warnings */
	mutex_init(&stp->st_mutex);
3714
	mutex_lock_nested(&stp->st_mutex, OPEN_STATEID_MUTEX);
3715

3716
retry:
3717 3718 3719 3720 3721 3722
	spin_lock(&oo->oo_owner.so_client->cl_lock);
	spin_lock(&fp->fi_lock);

	retstp = nfsd4_find_existing_open(fp, open);
	if (retstp)
		goto out_unlock;
3723 3724

	open->op_stp = NULL;
3725
	refcount_inc(&stp->st_stid.sc_count);
J
J. Bruce Fields 已提交
3726
	stp->st_stid.sc_type = NFS4_OPEN_STID;
3727
	INIT_LIST_HEAD(&stp->st_locks);
3728
	stp->st_stateowner = nfs4_get_stateowner(&oo->oo_owner);
3729
	get_nfs4_file(fp);
3730
	stp->st_stid.sc_file = fp;
L
Linus Torvalds 已提交
3731 3732
	stp->st_access_bmap = 0;
	stp->st_deny_bmap = 0;
3733
	stp->st_openstp = NULL;
3734
	list_add(&stp->st_perstateowner, &oo->oo_owner.so_stateids);
3735
	list_add(&stp->st_perfile, &fp->fi_stateids);
3736 3737

out_unlock:
3738
	spin_unlock(&fp->fi_lock);
3739
	spin_unlock(&oo->oo_owner.so_client->cl_lock);
3740
	if (retstp) {
3741 3742 3743 3744 3745
		/* Handle races with CLOSE */
		if (nfsd4_lock_ol_stateid(retstp) != nfs_ok) {
			nfs4_put_stid(&retstp->st_stid);
			goto retry;
		}
3746
		/* To keep mutex tracking happy */
3747
		mutex_unlock(&stp->st_mutex);
3748
		stp = retstp;
3749
	}
3750
	return stp;
L
Linus Torvalds 已提交
3751 3752
}

3753 3754 3755 3756 3757
/*
 * In the 4.0 case we need to keep the owners around a little while to handle
 * CLOSE replay. We still do need to release any file access that is held by
 * them before returning however.
 */
3758
static void
3759
move_to_close_lru(struct nfs4_ol_stateid *s, struct net *net)
L
Linus Torvalds 已提交
3760
{
3761
	struct nfs4_ol_stateid *last;
3762 3763 3764
	struct nfs4_openowner *oo = openowner(s->st_stateowner);
	struct nfsd_net *nn = net_generic(s->st_stid.sc_client->net,
						nfsd_net_id);
3765

3766
	dprintk("NFSD: move_to_close_lru nfs4_openowner %p\n", oo);
L
Linus Torvalds 已提交
3767

3768 3769 3770 3771 3772 3773 3774 3775 3776
	/*
	 * We know that we hold one reference via nfsd4_close, and another
	 * "persistent" reference for the client. If the refcount is higher
	 * than 2, then there are still calls in progress that are using this
	 * stateid. We can't put the sc_file reference until they are finished.
	 * Wait for the refcount to drop to 2. Since it has been unhashed,
	 * there should be no danger of the refcount going back up again at
	 * this point.
	 */
3777
	wait_event(close_wq, refcount_read(&s->st_stid.sc_count) == 2);
3778

3779 3780 3781 3782 3783
	release_all_access(s);
	if (s->st_stid.sc_file) {
		put_nfs4_file(s->st_stid.sc_file);
		s->st_stid.sc_file = NULL;
	}
3784 3785 3786

	spin_lock(&nn->client_lock);
	last = oo->oo_last_closed_stid;
3787
	oo->oo_last_closed_stid = s;
3788
	list_move_tail(&oo->oo_close_lru, &nn->close_lru);
3789
	oo->oo_time = get_seconds();
3790 3791 3792
	spin_unlock(&nn->client_lock);
	if (last)
		nfs4_put_stid(&last->st_stid);
L
Linus Torvalds 已提交
3793 3794 3795 3796
}

/* search file_hashtbl[] for file */
static struct nfs4_file *
3797
find_file_locked(struct knfsd_fh *fh, unsigned int hashval)
L
Linus Torvalds 已提交
3798 3799 3800
{
	struct nfs4_file *fp;

3801
	hlist_for_each_entry_rcu(fp, &file_hashtbl[hashval], fi_hash) {
3802
		if (fh_match(&fp->fi_fhandle, fh)) {
3803
			if (refcount_inc_not_zero(&fp->fi_ref))
3804
				return fp;
3805
		}
L
Linus Torvalds 已提交
3806 3807 3808 3809
	}
	return NULL;
}

3810
struct nfs4_file *
3811
find_file(struct knfsd_fh *fh)
3812 3813
{
	struct nfs4_file *fp;
3814
	unsigned int hashval = file_hashval(fh);
3815

3816 3817 3818
	rcu_read_lock();
	fp = find_file_locked(fh, hashval);
	rcu_read_unlock();
3819 3820 3821 3822
	return fp;
}

static struct nfs4_file *
3823
find_or_add_file(struct nfs4_file *new, struct knfsd_fh *fh)
3824 3825
{
	struct nfs4_file *fp;
3826 3827 3828 3829 3830 3831 3832
	unsigned int hashval = file_hashval(fh);

	rcu_read_lock();
	fp = find_file_locked(fh, hashval);
	rcu_read_unlock();
	if (fp)
		return fp;
3833 3834

	spin_lock(&state_lock);
3835 3836 3837
	fp = find_file_locked(fh, hashval);
	if (likely(fp == NULL)) {
		nfsd4_init_file(fh, hashval, new);
3838 3839 3840 3841 3842 3843 3844
		fp = new;
	}
	spin_unlock(&state_lock);

	return fp;
}

L
Linus Torvalds 已提交
3845 3846 3847 3848
/*
 * Called to check deny when READ with all zero stateid or
 * WRITE with all zero or all one stateid
 */
3849
static __be32
L
Linus Torvalds 已提交
3850 3851 3852
nfs4_share_conflict(struct svc_fh *current_fh, unsigned int deny_type)
{
	struct nfs4_file *fp;
3853
	__be32 ret = nfs_ok;
L
Linus Torvalds 已提交
3854

3855
	fp = find_file(&current_fh->fh_handle);
3856
	if (!fp)
3857 3858
		return ret;
	/* Check for conflicting share reservations */
3859
	spin_lock(&fp->fi_lock);
3860 3861
	if (fp->fi_share_deny & deny_type)
		ret = nfserr_locked;
3862
	spin_unlock(&fp->fi_lock);
3863 3864
	put_nfs4_file(fp);
	return ret;
L
Linus Torvalds 已提交
3865 3866
}

3867
static void nfsd4_cb_recall_prepare(struct nfsd4_callback *cb)
L
Linus Torvalds 已提交
3868
{
3869
	struct nfs4_delegation *dp = cb_to_delegation(cb);
3870 3871
	struct nfsd_net *nn = net_generic(dp->dl_stid.sc_client->net,
					  nfsd_net_id);
3872

3873
	block_delegations(&dp->dl_stid.sc_file->fi_fhandle);
3874

3875
	/*
3876 3877 3878
	 * We can't do this in nfsd_break_deleg_cb because it is
	 * already holding inode->i_lock.
	 *
3879 3880 3881
	 * If the dl_time != 0, then we know that it has already been
	 * queued for a lease break. Don't queue it again.
	 */
3882
	spin_lock(&state_lock);
3883 3884
	if (dp->dl_time == 0) {
		dp->dl_time = get_seconds();
3885
		list_add_tail(&dp->dl_recall_lru, &nn->del_recall_lru);
3886
	}
3887 3888
	spin_unlock(&state_lock);
}
L
Linus Torvalds 已提交
3889

3890 3891 3892 3893 3894
static int nfsd4_cb_recall_done(struct nfsd4_callback *cb,
		struct rpc_task *task)
{
	struct nfs4_delegation *dp = cb_to_delegation(cb);

3895 3896 3897
	if (dp->dl_stid.sc_type == NFS4_CLOSED_DELEG_STID)
	        return 1;

3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923
	switch (task->tk_status) {
	case 0:
		return 1;
	case -EBADHANDLE:
	case -NFS4ERR_BAD_STATEID:
		/*
		 * Race: client probably got cb_recall before open reply
		 * granting delegation.
		 */
		if (dp->dl_retries--) {
			rpc_delay(task, 2 * HZ);
			return 0;
		}
		/*FALLTHRU*/
	default:
		return -1;
	}
}

static void nfsd4_cb_recall_release(struct nfsd4_callback *cb)
{
	struct nfs4_delegation *dp = cb_to_delegation(cb);

	nfs4_put_stid(&dp->dl_stid);
}

3924
static const struct nfsd4_callback_ops nfsd4_cb_recall_ops = {
3925 3926 3927 3928 3929
	.prepare	= nfsd4_cb_recall_prepare,
	.done		= nfsd4_cb_recall_done,
	.release	= nfsd4_cb_recall_release,
};

3930 3931 3932 3933 3934 3935 3936 3937 3938
static void nfsd_break_one_deleg(struct nfs4_delegation *dp)
{
	/*
	 * We're assuming the state code never drops its reference
	 * without first removing the lease.  Since we're in this lease
	 * callback (and since the lease code is serialized by the kernel
	 * lock) we know the server hasn't removed the lease yet, we know
	 * it's safe to take a reference.
	 */
3939
	refcount_inc(&dp->dl_stid.sc_count);
3940
	nfsd4_run_cb(&dp->dl_recall);
3941 3942
}

3943
/* Called from break_lease() with i_lock held. */
J
Jeff Layton 已提交
3944 3945
static bool
nfsd_break_deleg_cb(struct file_lock *fl)
3946
{
J
Jeff Layton 已提交
3947
	bool ret = false;
3948 3949
	struct nfs4_file *fp = (struct nfs4_file *)fl->fl_owner;
	struct nfs4_delegation *dp;
3950

3951 3952
	if (!fp) {
		WARN(1, "(%p)->fl_owner NULL\n", fl);
J
Jeff Layton 已提交
3953
		return ret;
3954 3955 3956
	}
	if (fp->fi_had_conflict) {
		WARN(1, "duplicate break on %p\n", fp);
J
Jeff Layton 已提交
3957
		return ret;
3958
	}
3959 3960
	/*
	 * We don't want the locks code to timeout the lease for us;
3961
	 * we'll remove it ourself if a delegation isn't returned
3962
	 * in time:
3963 3964
	 */
	fl->fl_break_time = 0;
L
Linus Torvalds 已提交
3965

3966
	spin_lock(&fp->fi_lock);
3967 3968
	fp->fi_had_conflict = true;
	/*
J
Jeff Layton 已提交
3969 3970
	 * If there are no delegations on the list, then return true
	 * so that the lease code will go ahead and delete it.
3971 3972
	 */
	if (list_empty(&fp->fi_delegations))
J
Jeff Layton 已提交
3973
		ret = true;
3974 3975 3976
	else
		list_for_each_entry(dp, &fp->fi_delegations, dl_perfile)
			nfsd_break_one_deleg(dp);
3977
	spin_unlock(&fp->fi_lock);
J
Jeff Layton 已提交
3978
	return ret;
L
Linus Torvalds 已提交
3979 3980
}

3981
static int
3982 3983
nfsd_change_deleg_cb(struct file_lock *onlist, int arg,
		     struct list_head *dispose)
L
Linus Torvalds 已提交
3984 3985
{
	if (arg & F_UNLCK)
3986
		return lease_modify(onlist, arg, dispose);
L
Linus Torvalds 已提交
3987 3988 3989 3990
	else
		return -EAGAIN;
}

3991
static const struct lock_manager_operations nfsd_lease_mng_ops = {
J
J. Bruce Fields 已提交
3992 3993
	.lm_break = nfsd_break_deleg_cb,
	.lm_change = nfsd_change_deleg_cb,
L
Linus Torvalds 已提交
3994 3995
};

3996 3997 3998 3999 4000 4001 4002 4003 4004 4005
static __be32 nfsd4_check_seqid(struct nfsd4_compound_state *cstate, struct nfs4_stateowner *so, u32 seqid)
{
	if (nfsd4_has_session(cstate))
		return nfs_ok;
	if (seqid == so->so_seqid - 1)
		return nfserr_replay_me;
	if (seqid == so->so_seqid)
		return nfs_ok;
	return nfserr_bad_seqid;
}
L
Linus Torvalds 已提交
4006

4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028
static __be32 lookup_clientid(clientid_t *clid,
		struct nfsd4_compound_state *cstate,
		struct nfsd_net *nn)
{
	struct nfs4_client *found;

	if (cstate->clp) {
		found = cstate->clp;
		if (!same_clid(&found->cl_clientid, clid))
			return nfserr_stale_clientid;
		return nfs_ok;
	}

	if (STALE_CLIENTID(clid, nn))
		return nfserr_stale_clientid;

	/*
	 * For v4.1+ we get the client in the SEQUENCE op. If we don't have one
	 * cached already then we know this is for is for v4.0 and "sessions"
	 * will be false.
	 */
	WARN_ON_ONCE(cstate->session);
4029
	spin_lock(&nn->client_lock);
4030
	found = find_confirmed_client(clid, false, nn);
4031 4032
	if (!found) {
		spin_unlock(&nn->client_lock);
4033
		return nfserr_expired;
4034 4035 4036
	}
	atomic_inc(&found->cl_refcount);
	spin_unlock(&nn->client_lock);
4037 4038 4039 4040 4041 4042

	/* Cache the nfs4_client in cstate! */
	cstate->clp = found;
	return nfs_ok;
}

4043
__be32
A
Andy Adamson 已提交
4044
nfsd4_process_open1(struct nfsd4_compound_state *cstate,
4045
		    struct nfsd4_open *open, struct nfsd_net *nn)
L
Linus Torvalds 已提交
4046 4047 4048 4049
{
	clientid_t *clientid = &open->op_clientid;
	struct nfs4_client *clp = NULL;
	unsigned int strhashval;
4050
	struct nfs4_openowner *oo = NULL;
4051
	__be32 status;
L
Linus Torvalds 已提交
4052

4053
	if (STALE_CLIENTID(&open->op_clientid, nn))
L
Linus Torvalds 已提交
4054
		return nfserr_stale_clientid;
4055 4056 4057 4058 4059 4060 4061
	/*
	 * In case we need it later, after we've already created the
	 * file and don't want to risk a further failure:
	 */
	open->op_file = nfsd4_alloc_file();
	if (open->op_file == NULL)
		return nfserr_jukebox;
L
Linus Torvalds 已提交
4062

4063 4064 4065 4066 4067
	status = lookup_clientid(clientid, cstate, nn);
	if (status)
		return status;
	clp = cstate->clp;

4068 4069
	strhashval = ownerstr_hashval(&open->op_owner);
	oo = find_openstateowner_str(strhashval, open, clp);
4070 4071
	open->op_openowner = oo;
	if (!oo) {
4072
		goto new_owner;
L
Linus Torvalds 已提交
4073
	}
4074
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED)) {
4075
		/* Replace unconfirmed owners without checking for replay. */
4076 4077
		release_openowner(oo);
		open->op_openowner = NULL;
4078
		goto new_owner;
4079
	}
4080 4081 4082 4083
	status = nfsd4_check_seqid(cstate, &oo->oo_owner, open->op_seqid);
	if (status)
		return status;
	goto alloc_stateid;
4084
new_owner:
4085
	oo = alloc_init_open_stateowner(strhashval, open, cstate);
4086 4087 4088
	if (oo == NULL)
		return nfserr_jukebox;
	open->op_openowner = oo;
4089
alloc_stateid:
4090
	open->op_stp = nfs4_alloc_open_stateid(clp);
4091 4092
	if (!open->op_stp)
		return nfserr_jukebox;
4093 4094 4095 4096 4097 4098 4099 4100

	if (nfsd4_has_session(cstate) &&
	    (cstate->current_fh.fh_export->ex_flags & NFSEXP_PNFS)) {
		open->op_odstate = alloc_clnt_odstate(clp);
		if (!open->op_odstate)
			return nfserr_jukebox;
	}

4101
	return nfs_ok;
L
Linus Torvalds 已提交
4102 4103
}

4104
static inline __be32
N
NeilBrown 已提交
4105 4106 4107 4108 4109 4110 4111 4112
nfs4_check_delegmode(struct nfs4_delegation *dp, int flags)
{
	if ((flags & WR_STATE) && (dp->dl_type == NFS4_OPEN_DELEGATE_READ))
		return nfserr_openmode;
	else
		return nfs_ok;
}

4113
static int share_access_to_flags(u32 share_access)
4114
{
4115
	return share_access == NFS4_SHARE_ACCESS_READ ? RD_STATE : WR_STATE;
4116 4117
}

4118
static struct nfs4_delegation *find_deleg_stateid(struct nfs4_client *cl, stateid_t *s)
4119
{
4120
	struct nfs4_stid *ret;
4121

4122 4123
	ret = find_stateid_by_type(cl, s,
				NFS4_DELEG_STID|NFS4_REVOKED_DELEG_STID);
4124 4125 4126
	if (!ret)
		return NULL;
	return delegstateid(ret);
4127 4128
}

4129 4130 4131 4132 4133 4134
static bool nfsd4_is_deleg_cur(struct nfsd4_open *open)
{
	return open->op_claim_type == NFS4_OPEN_CLAIM_DELEGATE_CUR ||
	       open->op_claim_type == NFS4_OPEN_CLAIM_DELEG_CUR_FH;
}

4135
static __be32
4136
nfs4_check_deleg(struct nfs4_client *cl, struct nfsd4_open *open,
4137 4138 4139
		struct nfs4_delegation **dp)
{
	int flags;
4140
	__be32 status = nfserr_bad_stateid;
4141
	struct nfs4_delegation *deleg;
4142

4143 4144
	deleg = find_deleg_stateid(cl, &open->op_delegate_stateid);
	if (deleg == NULL)
4145
		goto out;
4146 4147 4148 4149 4150 4151
	if (deleg->dl_stid.sc_type == NFS4_REVOKED_DELEG_STID) {
		nfs4_put_stid(&deleg->dl_stid);
		if (cl->cl_minorversion)
			status = nfserr_deleg_revoked;
		goto out;
	}
4152
	flags = share_access_to_flags(open->op_share_access);
4153 4154 4155 4156 4157 4158
	status = nfs4_check_delegmode(deleg, flags);
	if (status) {
		nfs4_put_stid(&deleg->dl_stid);
		goto out;
	}
	*dp = deleg;
4159
out:
4160
	if (!nfsd4_is_deleg_cur(open))
4161 4162 4163
		return nfs_ok;
	if (status)
		return status;
4164
	open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
4165
	return nfs_ok;
4166 4167
}

4168 4169 4170 4171 4172 4173 4174 4175 4176 4177 4178
static inline int nfs4_access_to_access(u32 nfs4_access)
{
	int flags = 0;

	if (nfs4_access & NFS4_SHARE_ACCESS_READ)
		flags |= NFSD_MAY_READ;
	if (nfs4_access & NFS4_SHARE_ACCESS_WRITE)
		flags |= NFSD_MAY_WRITE;
	return flags;
}

4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193
static inline __be32
nfsd4_truncate(struct svc_rqst *rqstp, struct svc_fh *fh,
		struct nfsd4_open *open)
{
	struct iattr iattr = {
		.ia_valid = ATTR_SIZE,
		.ia_size = 0,
	};
	if (!open->op_truncate)
		return 0;
	if (!(open->op_share_access & NFS4_SHARE_ACCESS_WRITE))
		return nfserr_inval;
	return nfsd_setattr(rqstp, fh, &iattr, 0, (time_t)0);
}

4194
static __be32 nfs4_get_vfs_file(struct svc_rqst *rqstp, struct nfs4_file *fp,
4195 4196
		struct svc_fh *cur_fh, struct nfs4_ol_stateid *stp,
		struct nfsd4_open *open)
4197
{
4198
	struct file *filp = NULL;
4199
	__be32 status;
4200 4201
	int oflag = nfs4_access_to_omode(open->op_share_access);
	int access = nfs4_access_to_access(open->op_share_access);
4202
	unsigned char old_access_bmap, old_deny_bmap;
4203

4204
	spin_lock(&fp->fi_lock);
4205 4206 4207 4208 4209 4210 4211 4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222 4223 4224 4225 4226 4227 4228 4229 4230 4231

	/*
	 * Are we trying to set a deny mode that would conflict with
	 * current access?
	 */
	status = nfs4_file_check_deny(fp, open->op_share_deny);
	if (status != nfs_ok) {
		spin_unlock(&fp->fi_lock);
		goto out;
	}

	/* set access to the file */
	status = nfs4_file_get_access(fp, open->op_share_access);
	if (status != nfs_ok) {
		spin_unlock(&fp->fi_lock);
		goto out;
	}

	/* Set access bits in stateid */
	old_access_bmap = stp->st_access_bmap;
	set_access(open->op_share_access, stp);

	/* Set new deny mask */
	old_deny_bmap = stp->st_deny_bmap;
	set_deny(open->op_share_deny, stp);
	fp->fi_share_deny |= (open->op_share_deny & NFS4_SHARE_DENY_BOTH);

4232
	if (!fp->fi_fds[oflag]) {
4233 4234
		spin_unlock(&fp->fi_lock);
		status = nfsd_open(rqstp, cur_fh, S_IFREG, access, &filp);
4235
		if (status)
4236
			goto out_put_access;
4237 4238 4239 4240 4241
		spin_lock(&fp->fi_lock);
		if (!fp->fi_fds[oflag]) {
			fp->fi_fds[oflag] = filp;
			filp = NULL;
		}
4242
	}
4243 4244 4245
	spin_unlock(&fp->fi_lock);
	if (filp)
		fput(filp);
4246

4247 4248 4249 4250 4251
	status = nfsd4_truncate(rqstp, cur_fh, open);
	if (status)
		goto out_put_access;
out:
	return status;
4252 4253 4254 4255 4256
out_put_access:
	stp->st_access_bmap = old_access_bmap;
	nfs4_file_put_access(fp, open->op_share_access);
	reset_union_bmap_deny(bmap_to_share_mode(old_deny_bmap), stp);
	goto out;
L
Linus Torvalds 已提交
4257 4258
}

4259
static __be32
4260
nfs4_upgrade_open(struct svc_rqst *rqstp, struct nfs4_file *fp, struct svc_fh *cur_fh, struct nfs4_ol_stateid *stp, struct nfsd4_open *open)
L
Linus Torvalds 已提交
4261
{
4262
	__be32 status;
4263
	unsigned char old_deny_bmap = stp->st_deny_bmap;
L
Linus Torvalds 已提交
4264

4265
	if (!test_access(open->op_share_access, stp))
4266
		return nfs4_get_vfs_file(rqstp, fp, cur_fh, stp, open);
4267

4268 4269 4270 4271 4272 4273 4274 4275 4276 4277 4278
	/* test and set deny mode */
	spin_lock(&fp->fi_lock);
	status = nfs4_file_check_deny(fp, open->op_share_deny);
	if (status == nfs_ok) {
		set_deny(open->op_share_deny, stp);
		fp->fi_share_deny |=
				(open->op_share_deny & NFS4_SHARE_DENY_BOTH);
	}
	spin_unlock(&fp->fi_lock);

	if (status != nfs_ok)
L
Linus Torvalds 已提交
4279 4280
		return status;

4281 4282 4283 4284 4285
	status = nfsd4_truncate(rqstp, cur_fh, open);
	if (status != nfs_ok)
		reset_union_bmap_deny(old_deny_bmap, stp);
	return status;
}
L
Linus Torvalds 已提交
4286

4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298 4299
/* Should we give out recallable state?: */
static bool nfsd4_cb_channel_good(struct nfs4_client *clp)
{
	if (clp->cl_cb_state == NFSD4_CB_UP)
		return true;
	/*
	 * In the sessions case, since we don't have to establish a
	 * separate connection for callbacks, we assume it's OK
	 * until we hear otherwise:
	 */
	return clp->cl_minorversion && clp->cl_cb_state == NFSD4_CB_UNKNOWN;
}

4300
static struct file_lock *nfs4_alloc_init_lease(struct nfs4_file *fp, int flag)
4301 4302 4303 4304 4305 4306 4307
{
	struct file_lock *fl;

	fl = locks_alloc_lock();
	if (!fl)
		return NULL;
	fl->fl_lmops = &nfsd_lease_mng_ops;
4308
	fl->fl_flags = FL_DELEG;
4309 4310
	fl->fl_type = flag == NFS4_OPEN_DELEGATE_READ? F_RDLCK: F_WRLCK;
	fl->fl_end = OFFSET_MAX;
4311
	fl->fl_owner = (fl_owner_t)fp;
4312 4313 4314 4315
	fl->fl_pid = current->tgid;
	return fl;
}

4316 4317 4318 4319 4320 4321 4322 4323 4324 4325 4326 4327
/**
 * nfs4_setlease - Obtain a delegation by requesting lease from vfs layer
 * @dp:   a pointer to the nfs4_delegation we're adding.
 *
 * Return:
 *      On success: Return code will be 0 on success.
 *
 *      On error: -EAGAIN if there was an existing delegation.
 *                 nonzero if there is an error in other cases.
 *
 */

4328
static int nfs4_setlease(struct nfs4_delegation *dp)
4329
{
4330
	struct nfs4_file *fp = dp->dl_stid.sc_file;
4331
	struct file_lock *fl;
4332 4333
	struct file *filp;
	int status = 0;
4334

4335
	fl = nfs4_alloc_init_lease(fp, NFS4_OPEN_DELEGATE_READ);
4336 4337
	if (!fl)
		return -ENOMEM;
4338 4339 4340 4341
	filp = find_readable_file(fp);
	if (!filp) {
		/* We should always have a readable file here */
		WARN_ON_ONCE(1);
4342
		locks_free_lock(fl);
4343 4344 4345
		return -EBADF;
	}
	fl->fl_file = filp;
4346
	status = vfs_setlease(filp, fl->fl_type, &fl, NULL);
4347
	if (fl)
4348
		locks_free_lock(fl);
4349
	if (status)
4350 4351 4352 4353 4354 4355 4356 4357
		goto out_fput;
	spin_lock(&state_lock);
	spin_lock(&fp->fi_lock);
	/* Did the lease get broken before we took the lock? */
	status = -EAGAIN;
	if (fp->fi_had_conflict)
		goto out_unlock;
	/* Race breaker */
4358
	if (fp->fi_deleg_file) {
4359
		status = hash_delegation_locked(dp, fp);
4360 4361 4362
		goto out_unlock;
	}
	fp->fi_deleg_file = filp;
4363 4364
	fp->fi_delegees = 0;
	status = hash_delegation_locked(dp, fp);
4365
	spin_unlock(&fp->fi_lock);
4366
	spin_unlock(&state_lock);
4367 4368 4369 4370 4371
	if (status) {
		/* Should never happen, this is a new fi_deleg_file  */
		WARN_ON_ONCE(1);
		goto out_fput;
	}
4372
	return 0;
4373 4374 4375 4376 4377
out_unlock:
	spin_unlock(&fp->fi_lock);
	spin_unlock(&state_lock);
out_fput:
	fput(filp);
4378
	return status;
4379 4380
}

J
Jeff Layton 已提交
4381 4382
static struct nfs4_delegation *
nfs4_set_delegation(struct nfs4_client *clp, struct svc_fh *fh,
4383
		    struct nfs4_file *fp, struct nfs4_clnt_odstate *odstate)
4384
{
J
Jeff Layton 已提交
4385 4386
	int status;
	struct nfs4_delegation *dp;
4387

4388
	if (fp->fi_had_conflict)
J
Jeff Layton 已提交
4389 4390
		return ERR_PTR(-EAGAIN);

4391 4392 4393 4394 4395 4396 4397 4398 4399
	spin_lock(&state_lock);
	spin_lock(&fp->fi_lock);
	status = nfs4_get_existing_delegation(clp, fp);
	spin_unlock(&fp->fi_lock);
	spin_unlock(&state_lock);

	if (status)
		return ERR_PTR(status);

4400
	dp = alloc_init_deleg(clp, fh, odstate);
J
Jeff Layton 已提交
4401 4402 4403
	if (!dp)
		return ERR_PTR(-ENOMEM);

4404
	get_nfs4_file(fp);
4405 4406
	spin_lock(&state_lock);
	spin_lock(&fp->fi_lock);
4407
	dp->dl_stid.sc_file = fp;
4408
	if (!fp->fi_deleg_file) {
4409 4410
		spin_unlock(&fp->fi_lock);
		spin_unlock(&state_lock);
J
Jeff Layton 已提交
4411 4412
		status = nfs4_setlease(dp);
		goto out;
4413
	}
4414
	if (fp->fi_had_conflict) {
4415 4416
		status = -EAGAIN;
		goto out_unlock;
4417
	}
4418
	status = hash_delegation_locked(dp, fp);
4419 4420
out_unlock:
	spin_unlock(&fp->fi_lock);
4421
	spin_unlock(&state_lock);
J
Jeff Layton 已提交
4422 4423
out:
	if (status) {
4424
		put_clnt_odstate(dp->dl_clnt_odstate);
4425
		nfs4_put_stid(&dp->dl_stid);
J
Jeff Layton 已提交
4426 4427 4428
		return ERR_PTR(status);
	}
	return dp;
4429 4430
}

4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444 4445 4446
static void nfsd4_open_deleg_none_ext(struct nfsd4_open *open, int status)
{
	open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE_EXT;
	if (status == -EAGAIN)
		open->op_why_no_deleg = WND4_CONTENTION;
	else {
		open->op_why_no_deleg = WND4_RESOURCE;
		switch (open->op_deleg_want) {
		case NFS4_SHARE_WANT_READ_DELEG:
		case NFS4_SHARE_WANT_WRITE_DELEG:
		case NFS4_SHARE_WANT_ANY_DELEG:
			break;
		case NFS4_SHARE_WANT_CANCEL:
			open->op_why_no_deleg = WND4_CANCELLED;
			break;
		case NFS4_SHARE_WANT_NO_DELEG:
4447
			WARN_ON_ONCE(1);
4448 4449 4450 4451
		}
	}
}

L
Linus Torvalds 已提交
4452 4453
/*
 * Attempt to hand out a delegation.
4454 4455 4456
 *
 * Note we don't support write delegations, and won't until the vfs has
 * proper support for them.
L
Linus Torvalds 已提交
4457 4458
 */
static void
4459 4460
nfs4_open_delegation(struct svc_fh *fh, struct nfsd4_open *open,
			struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4461 4462
{
	struct nfs4_delegation *dp;
4463 4464
	struct nfs4_openowner *oo = openowner(stp->st_stateowner);
	struct nfs4_client *clp = stp->st_stid.sc_client;
4465
	int cb_up;
4466
	int status = 0;
L
Linus Torvalds 已提交
4467

4468
	cb_up = nfsd4_cb_channel_good(oo->oo_owner.so_client);
4469 4470 4471
	open->op_recall = 0;
	switch (open->op_claim_type) {
		case NFS4_OPEN_CLAIM_PREVIOUS:
4472
			if (!cb_up)
4473
				open->op_recall = 1;
4474 4475
			if (open->op_delegate_type != NFS4_OPEN_DELEGATE_READ)
				goto out_no_deleg;
4476 4477
			break;
		case NFS4_OPEN_CLAIM_NULL:
4478
		case NFS4_OPEN_CLAIM_FH:
4479 4480
			/*
			 * Let's not give out any delegations till everyone's
4481 4482
			 * had the chance to reclaim theirs, *and* until
			 * NLM locks have all been reclaimed:
4483
			 */
4484
			if (locks_in_grace(clp->net))
4485
				goto out_no_deleg;
4486
			if (!cb_up || !(oo->oo_flags & NFS4_OO_CONFIRMED))
4487
				goto out_no_deleg;
4488 4489 4490 4491 4492 4493 4494
			/*
			 * Also, if the file was opened for write or
			 * create, there's a good chance the client's
			 * about to write to it, resulting in an
			 * immediate recall (since we don't support
			 * write delegations):
			 */
4495
			if (open->op_share_access & NFS4_SHARE_ACCESS_WRITE)
4496 4497 4498
				goto out_no_deleg;
			if (open->op_create == NFS4_OPEN_CREATE)
				goto out_no_deleg;
4499 4500
			break;
		default:
4501
			goto out_no_deleg;
4502
	}
4503
	dp = nfs4_set_delegation(clp, fh, stp->st_stid.sc_file, stp->st_clnt_odstate);
J
Jeff Layton 已提交
4504
	if (IS_ERR(dp))
4505
		goto out_no_deleg;
L
Linus Torvalds 已提交
4506

4507
	memcpy(&open->op_delegate_stateid, &dp->dl_stid.sc_stateid, sizeof(dp->dl_stid.sc_stateid));
L
Linus Torvalds 已提交
4508

4509
	dprintk("NFSD: delegation stateid=" STATEID_FMT "\n",
4510
		STATEID_VAL(&dp->dl_stid.sc_stateid));
4511
	open->op_delegate_type = NFS4_OPEN_DELEGATE_READ;
4512
	nfs4_put_stid(&dp->dl_stid);
4513 4514
	return;
out_no_deleg:
4515 4516
	open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE;
	if (open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS &&
4517
	    open->op_delegate_type != NFS4_OPEN_DELEGATE_NONE) {
4518
		dprintk("NFSD: WARNING: refusing delegation reclaim\n");
4519 4520
		open->op_recall = 1;
	}
4521 4522 4523 4524 4525

	/* 4.1 client asking for a delegation? */
	if (open->op_deleg_want)
		nfsd4_open_deleg_none_ext(open, status);
	return;
L
Linus Torvalds 已提交
4526 4527
}

4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544 4545
static void nfsd4_deleg_xgrade_none_ext(struct nfsd4_open *open,
					struct nfs4_delegation *dp)
{
	if (open->op_deleg_want == NFS4_SHARE_WANT_READ_DELEG &&
	    dp->dl_type == NFS4_OPEN_DELEGATE_WRITE) {
		open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE_EXT;
		open->op_why_no_deleg = WND4_NOT_SUPP_DOWNGRADE;
	} else if (open->op_deleg_want == NFS4_SHARE_WANT_WRITE_DELEG &&
		   dp->dl_type == NFS4_OPEN_DELEGATE_WRITE) {
		open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE_EXT;
		open->op_why_no_deleg = WND4_NOT_SUPP_UPGRADE;
	}
	/* Otherwise the client must be confused wanting a delegation
	 * it already has, therefore we don't return
	 * NFS4_OPEN_DELEGATE_NONE_EXT and reason.
	 */
}

4546
__be32
L
Linus Torvalds 已提交
4547 4548
nfsd4_process_open2(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
{
A
Andy Adamson 已提交
4549
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
4550
	struct nfs4_client *cl = open->op_openowner->oo_owner.so_client;
L
Linus Torvalds 已提交
4551
	struct nfs4_file *fp = NULL;
4552
	struct nfs4_ol_stateid *stp = NULL;
4553
	struct nfs4_delegation *dp = NULL;
4554
	__be32 status;
4555
	bool new_stp = false;
L
Linus Torvalds 已提交
4556 4557 4558 4559 4560 4561

	/*
	 * Lookup file; if found, lookup stateid and check open request,
	 * and check for delegations in the process of being recalled.
	 * If not found, create the nfs4_file struct
	 */
4562
	fp = find_or_add_file(open->op_file, &current_fh->fh_handle);
4563
	if (fp != open->op_file) {
4564
		status = nfs4_check_deleg(cl, open, &dp);
4565 4566
		if (status)
			goto out;
4567
		stp = nfsd4_find_and_lock_existing_open(fp, open);
L
Linus Torvalds 已提交
4568
	} else {
4569
		open->op_file = NULL;
4570
		status = nfserr_bad_stateid;
4571
		if (nfsd4_is_deleg_cur(open))
4572
			goto out;
L
Linus Torvalds 已提交
4573 4574
	}

4575 4576 4577 4578 4579 4580
	if (!stp) {
		stp = init_open_stateid(fp, open);
		if (!open->op_stp)
			new_stp = true;
	}

L
Linus Torvalds 已提交
4581 4582 4583
	/*
	 * OPEN the file, or upgrade an existing OPEN.
	 * If truncate fails, the OPEN fails.
4584 4585
	 *
	 * stp is already locked.
L
Linus Torvalds 已提交
4586
	 */
4587
	if (!new_stp) {
L
Linus Torvalds 已提交
4588
		/* Stateid was found, this is an OPEN upgrade */
4589
		status = nfs4_upgrade_open(rqstp, fp, current_fh, stp, open);
4590
		if (status) {
4591
			mutex_unlock(&stp->st_mutex);
L
Linus Torvalds 已提交
4592
			goto out;
4593
		}
L
Linus Torvalds 已提交
4594
	} else {
4595 4596
		status = nfs4_get_vfs_file(rqstp, fp, current_fh, stp, open);
		if (status) {
4597
			stp->st_stid.sc_type = NFS4_CLOSED_STID;
4598
			release_open_stateid(stp);
4599
			mutex_unlock(&stp->st_mutex);
4600 4601
			goto out;
		}
4602 4603 4604 4605 4606

		stp->st_clnt_odstate = find_or_hash_clnt_odstate(fp,
							open->op_odstate);
		if (stp->st_clnt_odstate == open->op_odstate)
			open->op_odstate = NULL;
L
Linus Torvalds 已提交
4607
	}
4608

4609
	nfs4_inc_and_copy_stateid(&open->op_stateid, &stp->st_stid);
4610
	mutex_unlock(&stp->st_mutex);
L
Linus Torvalds 已提交
4611

4612 4613 4614 4615 4616 4617 4618 4619
	if (nfsd4_has_session(&resp->cstate)) {
		if (open->op_deleg_want & NFS4_SHARE_WANT_NO_DELEG) {
			open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE_EXT;
			open->op_why_no_deleg = WND4_NOT_WANTED;
			goto nodeleg;
		}
	}

L
Linus Torvalds 已提交
4620 4621 4622 4623
	/*
	* Attempt to hand out a delegation. No error return, because the
	* OPEN succeeds even if we fail.
	*/
4624
	nfs4_open_delegation(current_fh, open, stp);
4625
nodeleg:
L
Linus Torvalds 已提交
4626 4627
	status = nfs_ok;

4628
	dprintk("%s: stateid=" STATEID_FMT "\n", __func__,
4629
		STATEID_VAL(&stp->st_stid.sc_stateid));
L
Linus Torvalds 已提交
4630
out:
4631 4632
	/* 4.1 client trying to upgrade/downgrade delegation? */
	if (open->op_delegate_type == NFS4_OPEN_DELEGATE_NONE && dp &&
4633 4634
	    open->op_deleg_want)
		nfsd4_deleg_xgrade_none_ext(open, dp);
4635

4636 4637
	if (fp)
		put_nfs4_file(fp);
4638
	if (status == 0 && open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS)
4639
		open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
L
Linus Torvalds 已提交
4640 4641 4642 4643
	/*
	* To finish the open response, we just need to set the rflags.
	*/
	open->op_rflags = NFS4_OPEN_RESULT_LOCKTYPE_POSIX;
4644 4645 4646
	if (nfsd4_has_session(&resp->cstate))
		open->op_rflags |= NFS4_OPEN_RESULT_MAY_NOTIFY_LOCK;
	else if (!(open->op_openowner->oo_flags & NFS4_OO_CONFIRMED))
L
Linus Torvalds 已提交
4647
		open->op_rflags |= NFS4_OPEN_RESULT_CONFIRM;
4648

4649 4650
	if (dp)
		nfs4_put_stid(&dp->dl_stid);
4651 4652
	if (stp)
		nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
4653 4654 4655 4656

	return status;
}

4657
void nfsd4_cleanup_open_state(struct nfsd4_compound_state *cstate,
4658
			      struct nfsd4_open *open)
4659 4660
{
	if (open->op_openowner) {
4661 4662 4663 4664
		struct nfs4_stateowner *so = &open->op_openowner->oo_owner;

		nfsd4_cstate_assign_replay(cstate, so);
		nfs4_put_stateowner(so);
4665
	}
4666
	if (open->op_file)
4667
		kmem_cache_free(file_slab, open->op_file);
4668
	if (open->op_stp)
4669
		nfs4_put_stid(&open->op_stp->st_stid);
4670 4671
	if (open->op_odstate)
		kmem_cache_free(odstate_slab, open->op_odstate);
4672 4673
}

4674
__be32
4675
nfsd4_renew(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4676
	    union nfsd4_op_u *u)
L
Linus Torvalds 已提交
4677
{
4678
	clientid_t *clid = &u->renew;
L
Linus Torvalds 已提交
4679
	struct nfs4_client *clp;
4680
	__be32 status;
4681
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4682 4683 4684

	dprintk("process_renew(%08x/%08x): starting\n", 
			clid->cl_boot, clid->cl_id);
4685
	status = lookup_clientid(clid, cstate, nn);
4686
	if (status)
L
Linus Torvalds 已提交
4687
		goto out;
4688
	clp = cstate->clp;
L
Linus Torvalds 已提交
4689
	status = nfserr_cb_path_down;
4690
	if (!list_empty(&clp->cl_delegations)
4691
			&& clp->cl_cb_state != NFSD4_CB_UP)
L
Linus Torvalds 已提交
4692 4693 4694 4695 4696 4697
		goto out;
	status = nfs_ok;
out:
	return status;
}

4698
void
4699
nfsd4_end_grace(struct nfsd_net *nn)
4700
{
4701
	/* do nothing if grace period already ended */
4702
	if (nn->grace_ended)
4703 4704
		return;

4705
	dprintk("NFSD: end of grace period\n");
4706
	nn->grace_ended = true;
4707 4708 4709 4710 4711 4712
	/*
	 * If the server goes down again right now, an NFSv4
	 * client will still be allowed to reclaim after it comes back up,
	 * even if it hasn't yet had a chance to reclaim state this time.
	 *
	 */
4713
	nfsd4_record_grace_done(nn);
4714 4715 4716 4717 4718 4719 4720 4721 4722
	/*
	 * At this point, NFSv4 clients can still reclaim.  But if the
	 * server crashes, any that have not yet reclaimed will be out
	 * of luck on the next boot.
	 *
	 * (NFSv4.1+ clients are considered to have reclaimed once they
	 * call RECLAIM_COMPLETE.  NFSv4.0 clients are considered to
	 * have reclaimed after their first OPEN.)
	 */
4723
	locks_end_grace(&nn->nfsd4_manager);
4724 4725 4726 4727 4728
	/*
	 * At this point, and once lockd and/or any other containers
	 * exit their grace period, further reclaims will fail and
	 * regular locking can resume.
	 */
4729 4730
}

4731
static time_t
4732
nfs4_laundromat(struct nfsd_net *nn)
L
Linus Torvalds 已提交
4733 4734
{
	struct nfs4_client *clp;
4735
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
4736
	struct nfs4_delegation *dp;
4737
	struct nfs4_ol_stateid *stp;
4738
	struct nfsd4_blocked_lock *nbl;
L
Linus Torvalds 已提交
4739
	struct list_head *pos, *next, reaplist;
4740
	time_t cutoff = get_seconds() - nn->nfsd4_lease;
4741
	time_t t, new_timeo = nn->nfsd4_lease;
L
Linus Torvalds 已提交
4742 4743

	dprintk("NFSD: laundromat service - starting\n");
4744
	nfsd4_end_grace(nn);
4745
	INIT_LIST_HEAD(&reaplist);
4746
	spin_lock(&nn->client_lock);
4747
	list_for_each_safe(pos, next, &nn->client_lru) {
L
Linus Torvalds 已提交
4748 4749 4750
		clp = list_entry(pos, struct nfs4_client, cl_lru);
		if (time_after((unsigned long)clp->cl_time, (unsigned long)cutoff)) {
			t = clp->cl_time - cutoff;
4751
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4752 4753
			break;
		}
4754
		if (mark_client_expired_locked(clp)) {
4755 4756 4757 4758
			dprintk("NFSD: client in use (clientid %08x)\n",
				clp->cl_clientid.cl_id);
			continue;
		}
4759
		list_add(&clp->cl_lru, &reaplist);
4760
	}
4761
	spin_unlock(&nn->client_lock);
4762 4763
	list_for_each_safe(pos, next, &reaplist) {
		clp = list_entry(pos, struct nfs4_client, cl_lru);
L
Linus Torvalds 已提交
4764 4765
		dprintk("NFSD: purging unused client (clientid %08x)\n",
			clp->cl_clientid.cl_id);
4766
		list_del_init(&clp->cl_lru);
L
Linus Torvalds 已提交
4767 4768
		expire_client(clp);
	}
4769
	spin_lock(&state_lock);
4770
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
4771 4772
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
		if (time_after((unsigned long)dp->dl_time, (unsigned long)cutoff)) {
4773 4774
			t = dp->dl_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4775 4776
			break;
		}
4777
		WARN_ON(!unhash_delegation_locked(dp));
4778
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
4779
	}
4780
	spin_unlock(&state_lock);
4781 4782 4783 4784
	while (!list_empty(&reaplist)) {
		dp = list_first_entry(&reaplist, struct nfs4_delegation,
					dl_recall_lru);
		list_del_init(&dp->dl_recall_lru);
4785
		revoke_delegation(dp);
L
Linus Torvalds 已提交
4786
	}
4787 4788 4789 4790 4791 4792 4793

	spin_lock(&nn->client_lock);
	while (!list_empty(&nn->close_lru)) {
		oo = list_first_entry(&nn->close_lru, struct nfs4_openowner,
					oo_close_lru);
		if (time_after((unsigned long)oo->oo_time,
			       (unsigned long)cutoff)) {
4794 4795
			t = oo->oo_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4796 4797
			break;
		}
4798 4799 4800 4801 4802 4803
		list_del_init(&oo->oo_close_lru);
		stp = oo->oo_last_closed_stid;
		oo->oo_last_closed_stid = NULL;
		spin_unlock(&nn->client_lock);
		nfs4_put_stid(&stp->st_stid);
		spin_lock(&nn->client_lock);
L
Linus Torvalds 已提交
4804
	}
4805 4806
	spin_unlock(&nn->client_lock);

4807 4808 4809 4810 4811 4812 4813 4814 4815 4816 4817 4818
	/*
	 * It's possible for a client to try and acquire an already held lock
	 * that is being held for a long time, and then lose interest in it.
	 * So, we clean out any un-revisited request after a lease period
	 * under the assumption that the client is no longer interested.
	 *
	 * RFC5661, sec. 9.6 states that the client must not rely on getting
	 * notifications and must continue to poll for locks, even when the
	 * server supports them. Thus this shouldn't lead to clients blocking
	 * indefinitely once the lock does become free.
	 */
	BUG_ON(!list_empty(&reaplist));
4819
	spin_lock(&nn->blocked_locks_lock);
4820 4821 4822 4823 4824 4825 4826 4827 4828 4829 4830 4831
	while (!list_empty(&nn->blocked_locks_lru)) {
		nbl = list_first_entry(&nn->blocked_locks_lru,
					struct nfsd4_blocked_lock, nbl_lru);
		if (time_after((unsigned long)nbl->nbl_time,
			       (unsigned long)cutoff)) {
			t = nbl->nbl_time - cutoff;
			new_timeo = min(new_timeo, t);
			break;
		}
		list_move(&nbl->nbl_lru, &reaplist);
		list_del_init(&nbl->nbl_list);
	}
4832
	spin_unlock(&nn->blocked_locks_lock);
4833 4834

	while (!list_empty(&reaplist)) {
4835
		nbl = list_first_entry(&reaplist,
4836 4837 4838 4839 4840 4841
					struct nfsd4_blocked_lock, nbl_lru);
		list_del_init(&nbl->nbl_lru);
		posix_unblock_lock(&nbl->nbl_lock);
		free_blocked_lock(nbl);
	}

4842 4843
	new_timeo = max_t(time_t, new_timeo, NFSD_LAUNDROMAT_MINTIMEOUT);
	return new_timeo;
L
Linus Torvalds 已提交
4844 4845
}

H
Harvey Harrison 已提交
4846 4847 4848 4849
static struct workqueue_struct *laundry_wq;
static void laundromat_main(struct work_struct *);

static void
4850
laundromat_main(struct work_struct *laundry)
L
Linus Torvalds 已提交
4851 4852
{
	time_t t;
G
Geliang Tang 已提交
4853
	struct delayed_work *dwork = to_delayed_work(laundry);
4854 4855
	struct nfsd_net *nn = container_of(dwork, struct nfsd_net,
					   laundromat_work);
L
Linus Torvalds 已提交
4856

4857
	t = nfs4_laundromat(nn);
L
Linus Torvalds 已提交
4858
	dprintk("NFSD: laundromat_main - sleeping for %ld seconds\n", t);
4859
	queue_delayed_work(laundry_wq, &nn->laundromat_work, t*HZ);
L
Linus Torvalds 已提交
4860 4861
}

4862
static inline __be32 nfs4_check_fh(struct svc_fh *fhp, struct nfs4_stid *stp)
L
Linus Torvalds 已提交
4863
{
4864
	if (!fh_match(&fhp->fh_handle, &stp->sc_file->fi_fhandle))
4865 4866
		return nfserr_bad_stateid;
	return nfs_ok;
L
Linus Torvalds 已提交
4867 4868 4869
}

static inline int
4870
access_permit_read(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4871
{
4872 4873 4874
	return test_access(NFS4_SHARE_ACCESS_READ, stp) ||
		test_access(NFS4_SHARE_ACCESS_BOTH, stp) ||
		test_access(NFS4_SHARE_ACCESS_WRITE, stp);
L
Linus Torvalds 已提交
4875 4876 4877
}

static inline int
4878
access_permit_write(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4879
{
4880 4881
	return test_access(NFS4_SHARE_ACCESS_WRITE, stp) ||
		test_access(NFS4_SHARE_ACCESS_BOTH, stp);
L
Linus Torvalds 已提交
4882 4883 4884
}

static
4885
__be32 nfs4_check_openmode(struct nfs4_ol_stateid *stp, int flags)
L
Linus Torvalds 已提交
4886
{
4887
        __be32 status = nfserr_openmode;
L
Linus Torvalds 已提交
4888

4889 4890 4891
	/* For lock stateid's, we test the parent open, not the lock: */
	if (stp->st_openstp)
		stp = stp->st_openstp;
4892
	if ((flags & WR_STATE) && !access_permit_write(stp))
L
Linus Torvalds 已提交
4893
                goto out;
4894
	if ((flags & RD_STATE) && !access_permit_read(stp))
L
Linus Torvalds 已提交
4895 4896 4897 4898 4899 4900
                goto out;
	status = nfs_ok;
out:
	return status;
}

4901
static inline __be32
4902
check_special_stateids(struct net *net, svc_fh *current_fh, stateid_t *stateid, int flags)
L
Linus Torvalds 已提交
4903
{
4904
	if (ONE_STATEID(stateid) && (flags & RD_STATE))
L
Linus Torvalds 已提交
4905
		return nfs_ok;
4906
	else if (opens_in_grace(net)) {
L
Lucas De Marchi 已提交
4907
		/* Answer in remaining cases depends on existence of
L
Linus Torvalds 已提交
4908 4909 4910 4911 4912 4913 4914 4915 4916 4917 4918 4919 4920 4921 4922
		 * conflicting state; so we must wait out the grace period. */
		return nfserr_grace;
	} else if (flags & WR_STATE)
		return nfs4_share_conflict(current_fh,
				NFS4_SHARE_DENY_WRITE);
	else /* (flags & RD_STATE) && ZERO_STATEID(stateid) */
		return nfs4_share_conflict(current_fh,
				NFS4_SHARE_DENY_READ);
}

/*
 * Allow READ/WRITE during grace period on recovered state only for files
 * that are not able to provide mandatory locking.
 */
static inline int
4923
grace_disallows_io(struct net *net, struct inode *inode)
L
Linus Torvalds 已提交
4924
{
4925
	return opens_in_grace(net) && mandatory_lock(inode);
L
Linus Torvalds 已提交
4926 4927
}

J
J. Bruce Fields 已提交
4928
static __be32 check_stateid_generation(stateid_t *in, stateid_t *ref, bool has_session)
4929
{
A
Andy Adamson 已提交
4930 4931 4932 4933
	/*
	 * When sessions are used the stateid generation number is ignored
	 * when it is zero.
	 */
J
J. Bruce Fields 已提交
4934
	if (has_session && in->si_generation == 0)
4935 4936 4937 4938
		return nfs_ok;

	if (in->si_generation == ref->si_generation)
		return nfs_ok;
A
Andy Adamson 已提交
4939

4940
	/* If the client sends us a stateid from the future, it's buggy: */
4941
	if (nfsd4_stateid_generation_after(in, ref))
4942 4943
		return nfserr_bad_stateid;
	/*
4944 4945 4946 4947 4948 4949 4950 4951
	 * However, we could see a stateid from the past, even from a
	 * non-buggy client.  For example, if the client sends a lock
	 * while some IO is outstanding, the lock may bump si_generation
	 * while the IO is still in flight.  The client could avoid that
	 * situation by waiting for responses on all the IO requests,
	 * but better performance may result in retrying IO that
	 * receives an old_stateid error if requests are rarely
	 * reordered in flight:
4952
	 */
4953
	return nfserr_old_stateid;
4954 4955
}

4956 4957 4958 4959 4960 4961 4962 4963 4964 4965 4966 4967
static __be32 nfsd4_stid_check_stateid_generation(stateid_t *in, struct nfs4_stid *s, bool has_session)
{
	__be32 ret;

	spin_lock(&s->sc_lock);
	ret = nfsd4_verify_open_stid(s);
	if (ret == nfs_ok)
		ret = check_stateid_generation(in, &s->sc_stateid, has_session);
	spin_unlock(&s->sc_lock);
	return ret;
}

4968 4969 4970 4971 4972 4973 4974 4975
static __be32 nfsd4_check_openowner_confirmed(struct nfs4_ol_stateid *ols)
{
	if (ols->st_stateowner->so_is_open_owner &&
	    !(openowner(ols->st_stateowner)->oo_flags & NFS4_OO_CONFIRMED))
		return nfserr_bad_stateid;
	return nfs_ok;
}

4976
static __be32 nfsd4_validate_stateid(struct nfs4_client *cl, stateid_t *stateid)
4977
{
4978
	struct nfs4_stid *s;
4979
	__be32 status = nfserr_bad_stateid;
4980

4981 4982
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid) ||
		CLOSE_STATEID(stateid))
4983
		return status;
4984 4985 4986 4987 4988 4989 4990
	/* Client debugging aid. */
	if (!same_clid(&stateid->si_opaque.so_clid, &cl->cl_clientid)) {
		char addr_str[INET6_ADDRSTRLEN];
		rpc_ntop((struct sockaddr *)&cl->cl_addr, addr_str,
				 sizeof(addr_str));
		pr_warn_ratelimited("NFSD: client %s testing state ID "
					"with incorrect client ID\n", addr_str);
4991
		return status;
4992
	}
4993 4994
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, stateid);
4995
	if (!s)
4996
		goto out_unlock;
4997
	status = nfsd4_stid_check_stateid_generation(stateid, s, 1);
4998
	if (status)
4999
		goto out_unlock;
5000 5001
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
5002 5003
		status = nfs_ok;
		break;
5004
	case NFS4_REVOKED_DELEG_STID:
5005 5006
		status = nfserr_deleg_revoked;
		break;
5007 5008
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
5009
		status = nfsd4_check_openowner_confirmed(openlockstateid(s));
5010
		break;
5011 5012
	default:
		printk("unknown stateid type %x\n", s->sc_type);
5013
		/* Fallthrough */
5014
	case NFS4_CLOSED_STID:
5015
	case NFS4_CLOSED_DELEG_STID:
5016
		status = nfserr_bad_stateid;
5017
	}
5018 5019 5020
out_unlock:
	spin_unlock(&cl->cl_lock);
	return status;
5021 5022
}

5023
__be32
5024 5025 5026
nfsd4_lookup_stateid(struct nfsd4_compound_state *cstate,
		     stateid_t *stateid, unsigned char typemask,
		     struct nfs4_stid **s, struct nfsd_net *nn)
5027
{
J
J. Bruce Fields 已提交
5028
	__be32 status;
5029 5030 5031 5032 5033 5034 5035 5036 5037 5038
	bool return_revoked = false;

	/*
	 *  only return revoked delegations if explicitly asked.
	 *  otherwise we report revoked or bad_stateid status.
	 */
	if (typemask & NFS4_REVOKED_DELEG_STID)
		return_revoked = true;
	else if (typemask & NFS4_DELEG_STID)
		typemask |= NFS4_REVOKED_DELEG_STID;
5039

5040 5041
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid) ||
		CLOSE_STATEID(stateid))
5042
		return nfserr_bad_stateid;
5043
	status = lookup_clientid(&stateid->si_opaque.so_clid, cstate, nn);
5044
	if (status == nfserr_stale_clientid) {
5045
		if (cstate->session)
5046
			return nfserr_bad_stateid;
5047
		return nfserr_stale_stateid;
5048
	}
J
J. Bruce Fields 已提交
5049 5050
	if (status)
		return status;
5051
	*s = find_stateid_by_type(cstate->clp, stateid, typemask);
5052 5053
	if (!*s)
		return nfserr_bad_stateid;
5054 5055 5056 5057 5058 5059
	if (((*s)->sc_type == NFS4_REVOKED_DELEG_STID) && !return_revoked) {
		nfs4_put_stid(*s);
		if (cstate->minorversion)
			return nfserr_deleg_revoked;
		return nfserr_bad_stateid;
	}
5060 5061 5062
	return nfs_ok;
}

5063 5064 5065
static struct file *
nfs4_find_file(struct nfs4_stid *s, int flags)
{
5066 5067 5068
	if (!s)
		return NULL;

5069 5070 5071 5072 5073 5074 5075 5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
		if (WARN_ON_ONCE(!s->sc_file->fi_deleg_file))
			return NULL;
		return get_file(s->sc_file->fi_deleg_file);
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
		if (flags & RD_STATE)
			return find_readable_file(s->sc_file);
		else
			return find_writeable_file(s->sc_file);
		break;
	}

	return NULL;
}

static __be32
nfs4_check_olstateid(struct svc_fh *fhp, struct nfs4_ol_stateid *ols, int flags)
{
	__be32 status;

	status = nfsd4_check_openowner_confirmed(ols);
	if (status)
		return status;
	return nfs4_check_openmode(ols, flags);
}

5097 5098 5099 5100 5101 5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121 5122 5123 5124 5125 5126
static __be32
nfs4_check_file(struct svc_rqst *rqstp, struct svc_fh *fhp, struct nfs4_stid *s,
		struct file **filpp, bool *tmp_file, int flags)
{
	int acc = (flags & RD_STATE) ? NFSD_MAY_READ : NFSD_MAY_WRITE;
	struct file *file;
	__be32 status;

	file = nfs4_find_file(s, flags);
	if (file) {
		status = nfsd_permission(rqstp, fhp->fh_export, fhp->fh_dentry,
				acc | NFSD_MAY_OWNER_OVERRIDE);
		if (status) {
			fput(file);
			return status;
		}

		*filpp = file;
	} else {
		status = nfsd_open(rqstp, fhp, S_IFREG, acc, filpp);
		if (status)
			return status;

		if (tmp_file)
			*tmp_file = true;
	}

	return 0;
}

L
Linus Torvalds 已提交
5127
/*
5128 5129
 * Checks for stateid operations
 */
5130
__be32
5131
nfs4_preprocess_stateid_op(struct svc_rqst *rqstp,
5132 5133
		struct nfsd4_compound_state *cstate, struct svc_fh *fhp,
		stateid_t *stateid, int flags, struct file **filpp, bool *tmp_file)
L
Linus Torvalds 已提交
5134
{
5135
	struct inode *ino = d_inode(fhp->fh_dentry);
5136
	struct net *net = SVC_NET(rqstp);
5137
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
5138
	struct nfs4_stid *s = NULL;
5139
	__be32 status;
L
Linus Torvalds 已提交
5140 5141 5142

	if (filpp)
		*filpp = NULL;
5143 5144
	if (tmp_file)
		*tmp_file = false;
L
Linus Torvalds 已提交
5145

5146
	if (grace_disallows_io(net, ino))
L
Linus Torvalds 已提交
5147 5148
		return nfserr_grace;

5149 5150 5151 5152
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid)) {
		status = check_special_stateids(net, fhp, stateid, flags);
		goto done;
	}
L
Linus Torvalds 已提交
5153

5154
	status = nfsd4_lookup_stateid(cstate, stateid,
5155
				NFS4_DELEG_STID|NFS4_OPEN_STID|NFS4_LOCK_STID,
5156
				&s, nn);
5157
	if (status)
5158
		return status;
5159
	status = nfsd4_stid_check_stateid_generation(stateid, s,
5160
			nfsd4_has_session(cstate));
5161 5162
	if (status)
		goto out;
5163

5164 5165
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
5166
		status = nfs4_check_delegmode(delegstateid(s), flags);
5167 5168 5169
		break;
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
5170
		status = nfs4_check_olstateid(fhp, openlockstateid(s), flags);
5171 5172
		break;
	default:
5173
		status = nfserr_bad_stateid;
5174 5175
		break;
	}
5176 5177 5178
	if (status)
		goto out;
	status = nfs4_check_fh(fhp, s);
5179

5180 5181 5182
done:
	if (!status && filpp)
		status = nfs4_check_file(rqstp, fhp, s, filpp, tmp_file, flags);
L
Linus Torvalds 已提交
5183
out:
5184 5185
	if (s)
		nfs4_put_stid(s);
L
Linus Torvalds 已提交
5186 5187 5188
	return status;
}

5189 5190 5191 5192 5193
/*
 * Test if the stateid is valid
 */
__be32
nfsd4_test_stateid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5194
		   union nfsd4_op_u *u)
5195
{
5196
	struct nfsd4_test_stateid *test_stateid = &u->test_stateid;
5197 5198 5199 5200
	struct nfsd4_test_stateid_id *stateid;
	struct nfs4_client *cl = cstate->session->se_client;

	list_for_each_entry(stateid, &test_stateid->ts_stateid_list, ts_id_list)
5201 5202
		stateid->ts_id_status =
			nfsd4_validate_stateid(cl, &stateid->ts_id_stateid);
5203

5204 5205 5206
	return nfs_ok;
}

5207 5208 5209 5210 5211 5212
static __be32
nfsd4_free_lock_stateid(stateid_t *stateid, struct nfs4_stid *s)
{
	struct nfs4_ol_stateid *stp = openlockstateid(s);
	__be32 ret;

5213 5214 5215
	ret = nfsd4_lock_ol_stateid(stp);
	if (ret)
		goto out_put_stid;
5216 5217 5218 5219 5220 5221 5222 5223 5224 5225 5226 5227 5228 5229 5230

	ret = check_stateid_generation(stateid, &s->sc_stateid, 1);
	if (ret)
		goto out;

	ret = nfserr_locks_held;
	if (check_for_locks(stp->st_stid.sc_file,
			    lockowner(stp->st_stateowner)))
		goto out;

	release_lock_stateid(stp);
	ret = nfs_ok;

out:
	mutex_unlock(&stp->st_mutex);
5231
out_put_stid:
5232 5233 5234 5235
	nfs4_put_stid(s);
	return ret;
}

5236 5237
__be32
nfsd4_free_stateid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5238
		   union nfsd4_op_u *u)
5239
{
5240
	struct nfsd4_free_stateid *free_stateid = &u->free_stateid;
5241
	stateid_t *stateid = &free_stateid->fr_stateid;
J
J. Bruce Fields 已提交
5242
	struct nfs4_stid *s;
5243
	struct nfs4_delegation *dp;
5244
	struct nfs4_client *cl = cstate->session->se_client;
J
J. Bruce Fields 已提交
5245
	__be32 ret = nfserr_bad_stateid;
5246

5247 5248
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, stateid);
J
J. Bruce Fields 已提交
5249
	if (!s)
5250
		goto out_unlock;
5251
	spin_lock(&s->sc_lock);
J
J. Bruce Fields 已提交
5252 5253
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
5254
		ret = nfserr_locks_held;
5255
		break;
J
J. Bruce Fields 已提交
5256 5257 5258
	case NFS4_OPEN_STID:
		ret = check_stateid_generation(stateid, &s->sc_stateid, 1);
		if (ret)
5259 5260
			break;
		ret = nfserr_locks_held;
5261
		break;
5262
	case NFS4_LOCK_STID:
5263
		spin_unlock(&s->sc_lock);
5264
		refcount_inc(&s->sc_count);
5265
		spin_unlock(&cl->cl_lock);
5266
		ret = nfsd4_free_lock_stateid(stateid, s);
5267
		goto out;
5268
	case NFS4_REVOKED_DELEG_STID:
5269
		spin_unlock(&s->sc_lock);
5270
		dp = delegstateid(s);
5271 5272
		list_del_init(&dp->dl_recall_lru);
		spin_unlock(&cl->cl_lock);
5273
		nfs4_put_stid(s);
5274
		ret = nfs_ok;
5275 5276
		goto out;
	/* Default falls through and returns nfserr_bad_stateid */
5277
	}
5278
	spin_unlock(&s->sc_lock);
5279 5280
out_unlock:
	spin_unlock(&cl->cl_lock);
5281 5282 5283 5284
out:
	return ret;
}

5285 5286 5287 5288 5289 5290
static inline int
setlkflg (int type)
{
	return (type == NFS4_READW_LT || type == NFS4_READ_LT) ?
		RD_STATE : WR_STATE;
}
L
Linus Torvalds 已提交
5291

5292
static __be32 nfs4_seqid_op_checks(struct nfsd4_compound_state *cstate, stateid_t *stateid, u32 seqid, struct nfs4_ol_stateid *stp)
5293 5294 5295 5296 5297 5298 5299 5300
{
	struct svc_fh *current_fh = &cstate->current_fh;
	struct nfs4_stateowner *sop = stp->st_stateowner;
	__be32 status;

	status = nfsd4_check_seqid(cstate, sop, seqid);
	if (status)
		return status;
5301 5302 5303
	status = nfsd4_lock_ol_stateid(stp);
	if (status != nfs_ok)
		return status;
5304
	status = check_stateid_generation(stateid, &stp->st_stid.sc_stateid, nfsd4_has_session(cstate));
5305 5306 5307
	if (status == nfs_ok)
		status = nfs4_check_fh(current_fh, &stp->st_stid);
	if (status != nfs_ok)
5308
		mutex_unlock(&stp->st_mutex);
5309
	return status;
5310 5311
}

L
Linus Torvalds 已提交
5312 5313 5314
/* 
 * Checks for sequence id mutating operations. 
 */
5315
static __be32
5316
nfs4_preprocess_seqid_op(struct nfsd4_compound_state *cstate, u32 seqid,
5317
			 stateid_t *stateid, char typemask,
5318 5319
			 struct nfs4_ol_stateid **stpp,
			 struct nfsd_net *nn)
L
Linus Torvalds 已提交
5320
{
5321
	__be32 status;
5322
	struct nfs4_stid *s;
5323
	struct nfs4_ol_stateid *stp = NULL;
L
Linus Torvalds 已提交
5324

5325 5326
	dprintk("NFSD: %s: seqid=%d stateid = " STATEID_FMT "\n", __func__,
		seqid, STATEID_VAL(stateid));
5327

L
Linus Torvalds 已提交
5328
	*stpp = NULL;
5329
	status = nfsd4_lookup_stateid(cstate, stateid, typemask, &s, nn);
5330 5331
	if (status)
		return status;
5332
	stp = openlockstateid(s);
5333
	nfsd4_cstate_assign_replay(cstate, stp->st_stateowner);
L
Linus Torvalds 已提交
5334

5335
	status = nfs4_seqid_op_checks(cstate, stateid, seqid, stp);
5336
	if (!status)
5337
		*stpp = stp;
5338 5339
	else
		nfs4_put_stid(&stp->st_stid);
5340
	return status;
5341
}
5342

5343 5344
static __be32 nfs4_preprocess_confirmed_seqid_op(struct nfsd4_compound_state *cstate, u32 seqid,
						 stateid_t *stateid, struct nfs4_ol_stateid **stpp, struct nfsd_net *nn)
5345 5346 5347
{
	__be32 status;
	struct nfs4_openowner *oo;
5348
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
5349

5350
	status = nfs4_preprocess_seqid_op(cstate, seqid, stateid,
5351
						NFS4_OPEN_STID, &stp, nn);
5352 5353
	if (status)
		return status;
5354 5355
	oo = openowner(stp->st_stateowner);
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED)) {
5356
		mutex_unlock(&stp->st_mutex);
5357
		nfs4_put_stid(&stp->st_stid);
5358
		return nfserr_bad_stateid;
5359 5360
	}
	*stpp = stp;
5361
	return nfs_ok;
L
Linus Torvalds 已提交
5362 5363
}

5364
__be32
5365
nfsd4_open_confirm(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5366
		   union nfsd4_op_u *u)
L
Linus Torvalds 已提交
5367
{
5368
	struct nfsd4_open_confirm *oc = &u->open_confirm;
5369
	__be32 status;
5370
	struct nfs4_openowner *oo;
5371
	struct nfs4_ol_stateid *stp;
5372
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
5373

A
Al Viro 已提交
5374 5375
	dprintk("NFSD: nfsd4_open_confirm on file %pd\n",
			cstate->current_fh.fh_dentry);
L
Linus Torvalds 已提交
5376

5377
	status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0);
5378 5379
	if (status)
		return status;
L
Linus Torvalds 已提交
5380

5381
	status = nfs4_preprocess_seqid_op(cstate,
5382
					oc->oc_seqid, &oc->oc_req_stateid,
5383
					NFS4_OPEN_STID, &stp, nn);
5384
	if (status)
5385
		goto out;
5386
	oo = openowner(stp->st_stateowner);
5387
	status = nfserr_bad_stateid;
5388
	if (oo->oo_flags & NFS4_OO_CONFIRMED) {
5389
		mutex_unlock(&stp->st_mutex);
5390
		goto put_stateid;
5391
	}
5392
	oo->oo_flags |= NFS4_OO_CONFIRMED;
5393
	nfs4_inc_and_copy_stateid(&oc->oc_resp_stateid, &stp->st_stid);
5394
	mutex_unlock(&stp->st_mutex);
5395
	dprintk("NFSD: %s: success, seqid=%d stateid=" STATEID_FMT "\n",
5396
		__func__, oc->oc_seqid, STATEID_VAL(&stp->st_stid.sc_stateid));
5397

5398
	nfsd4_client_record_create(oo->oo_owner.so_client);
5399
	status = nfs_ok;
5400 5401
put_stateid:
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
5402
out:
5403
	nfsd4_bump_seqid(cstate, status);
L
Linus Torvalds 已提交
5404 5405 5406
	return status;
}

J
J. Bruce Fields 已提交
5407
static inline void nfs4_stateid_downgrade_bit(struct nfs4_ol_stateid *stp, u32 access)
L
Linus Torvalds 已提交
5408
{
5409
	if (!test_access(access, stp))
J
J. Bruce Fields 已提交
5410
		return;
5411
	nfs4_file_put_access(stp->st_stid.sc_file, access);
5412
	clear_access(access, stp);
J
J. Bruce Fields 已提交
5413
}
5414

J
J. Bruce Fields 已提交
5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426 5427 5428
static inline void nfs4_stateid_downgrade(struct nfs4_ol_stateid *stp, u32 to_access)
{
	switch (to_access) {
	case NFS4_SHARE_ACCESS_READ:
		nfs4_stateid_downgrade_bit(stp, NFS4_SHARE_ACCESS_WRITE);
		nfs4_stateid_downgrade_bit(stp, NFS4_SHARE_ACCESS_BOTH);
		break;
	case NFS4_SHARE_ACCESS_WRITE:
		nfs4_stateid_downgrade_bit(stp, NFS4_SHARE_ACCESS_READ);
		nfs4_stateid_downgrade_bit(stp, NFS4_SHARE_ACCESS_BOTH);
		break;
	case NFS4_SHARE_ACCESS_BOTH:
		break;
	default:
5429
		WARN_ON_ONCE(1);
L
Linus Torvalds 已提交
5430 5431 5432
	}
}

5433
__be32
5434
nfsd4_open_downgrade(struct svc_rqst *rqstp,
5435
		     struct nfsd4_compound_state *cstate, union nfsd4_op_u *u)
L
Linus Torvalds 已提交
5436
{
5437
	struct nfsd4_open_downgrade *od = &u->open_downgrade;
5438
	__be32 status;
5439
	struct nfs4_ol_stateid *stp;
5440
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
5441

A
Al Viro 已提交
5442 5443
	dprintk("NFSD: nfsd4_open_downgrade on file %pd\n", 
			cstate->current_fh.fh_dentry);
L
Linus Torvalds 已提交
5444

5445
	/* We don't yet support WANT bits: */
5446 5447 5448
	if (od->od_deleg_want)
		dprintk("NFSD: %s: od_deleg_want=0x%x ignored\n", __func__,
			od->od_deleg_want);
L
Linus Torvalds 已提交
5449

5450
	status = nfs4_preprocess_confirmed_seqid_op(cstate, od->od_seqid,
5451
					&od->od_stateid, &stp, nn);
5452
	if (status)
L
Linus Torvalds 已提交
5453 5454
		goto out; 
	status = nfserr_inval;
5455
	if (!test_access(od->od_share_access, stp)) {
5456
		dprintk("NFSD: access not a subset of current bitmap: 0x%hhx, input access=%08x\n",
L
Linus Torvalds 已提交
5457
			stp->st_access_bmap, od->od_share_access);
5458
		goto put_stateid;
L
Linus Torvalds 已提交
5459
	}
5460
	if (!test_deny(od->od_share_deny, stp)) {
5461
		dprintk("NFSD: deny not a subset of current bitmap: 0x%hhx, input deny=%08x\n",
L
Linus Torvalds 已提交
5462
			stp->st_deny_bmap, od->od_share_deny);
5463
		goto put_stateid;
L
Linus Torvalds 已提交
5464
	}
J
J. Bruce Fields 已提交
5465
	nfs4_stateid_downgrade(stp, od->od_share_access);
5466
	reset_union_bmap_deny(od->od_share_deny, stp);
5467
	nfs4_inc_and_copy_stateid(&od->od_stateid, &stp->st_stid);
L
Linus Torvalds 已提交
5468
	status = nfs_ok;
5469
put_stateid:
5470
	mutex_unlock(&stp->st_mutex);
5471
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
5472
out:
5473
	nfsd4_bump_seqid(cstate, status);
L
Linus Torvalds 已提交
5474 5475 5476
	return status;
}

5477 5478
static void nfsd4_close_open_stateid(struct nfs4_ol_stateid *s)
{
5479
	struct nfs4_client *clp = s->st_stid.sc_client;
5480
	bool unhashed;
5481
	LIST_HEAD(reaplist);
5482

5483
	spin_lock(&clp->cl_lock);
5484
	unhashed = unhash_open_stateid(s, &reaplist);
5485

5486
	if (clp->cl_minorversion) {
5487 5488
		if (unhashed)
			put_ol_stateid_locked(s, &reaplist);
5489 5490 5491 5492 5493
		spin_unlock(&clp->cl_lock);
		free_ol_stateid_reaplist(&reaplist);
	} else {
		spin_unlock(&clp->cl_lock);
		free_ol_stateid_reaplist(&reaplist);
5494 5495
		if (unhashed)
			move_to_close_lru(s, clp->net);
5496
	}
5497 5498
}

L
Linus Torvalds 已提交
5499 5500 5501
/*
 * nfs4_unlock_state() called after encode
 */
5502
__be32
5503
nfsd4_close(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5504
		union nfsd4_op_u *u)
L
Linus Torvalds 已提交
5505
{
5506
	struct nfsd4_close *close = &u->close;
5507
	__be32 status;
5508
	struct nfs4_ol_stateid *stp;
5509 5510
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
5511

A
Al Viro 已提交
5512 5513
	dprintk("NFSD: nfsd4_close on file %pd\n", 
			cstate->current_fh.fh_dentry);
L
Linus Torvalds 已提交
5514

5515 5516 5517
	status = nfs4_preprocess_seqid_op(cstate, close->cl_seqid,
					&close->cl_stateid,
					NFS4_OPEN_STID|NFS4_CLOSED_STID,
5518
					&stp, nn);
5519
	nfsd4_bump_seqid(cstate, status);
5520
	if (status)
L
Linus Torvalds 已提交
5521
		goto out; 
5522 5523

	stp->st_stid.sc_type = NFS4_CLOSED_STID;
5524
	nfs4_inc_and_copy_stateid(&close->cl_stateid, &stp->st_stid);
L
Linus Torvalds 已提交
5525

5526
	nfsd4_close_open_stateid(stp);
5527
	mutex_unlock(&stp->st_mutex);
5528

5529 5530 5531 5532 5533
	/* See RFC5661 sectionm 18.2.4 */
	if (stp->st_stid.sc_client->cl_minorversion)
		memcpy(&close->cl_stateid, &close_stateid,
				sizeof(close->cl_stateid));

5534 5535
	/* put reference from nfs4_preprocess_seqid_op */
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
5536 5537 5538 5539
out:
	return status;
}

5540
__be32
5541
nfsd4_delegreturn(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5542
		  union nfsd4_op_u *u)
L
Linus Torvalds 已提交
5543
{
5544
	struct nfsd4_delegreturn *dr = &u->delegreturn;
5545 5546
	struct nfs4_delegation *dp;
	stateid_t *stateid = &dr->dr_stateid;
5547
	struct nfs4_stid *s;
5548
	__be32 status;
5549
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
5550

5551
	if ((status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0)))
5552
		return status;
L
Linus Torvalds 已提交
5553

5554
	status = nfsd4_lookup_stateid(cstate, stateid, NFS4_DELEG_STID, &s, nn);
5555
	if (status)
5556
		goto out;
5557
	dp = delegstateid(s);
5558
	status = nfsd4_stid_check_stateid_generation(stateid, &dp->dl_stid, nfsd4_has_session(cstate));
5559
	if (status)
5560
		goto put_stateid;
5561

5562
	destroy_delegation(dp);
5563 5564
put_stateid:
	nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
5565 5566 5567 5568
out:
	return status;
}

B
Benny Halevy 已提交
5569 5570 5571 5572 5573 5574 5575 5576 5577 5578 5579 5580 5581 5582 5583
static inline u64
end_offset(u64 start, u64 len)
{
	u64 end;

	end = start + len;
	return end >= start ? end: NFS4_MAX_UINT64;
}

/* last octet in a range */
static inline u64
last_byte_offset(u64 start, u64 len)
{
	u64 end;

5584
	WARN_ON_ONCE(!len);
B
Benny Halevy 已提交
5585 5586 5587 5588
	end = start + len;
	return end > start ? end - 1: NFS4_MAX_UINT64;
}

L
Linus Torvalds 已提交
5589 5590 5591 5592 5593 5594 5595 5596 5597 5598 5599 5600 5601 5602 5603 5604 5605
/*
 * TODO: Linux file offsets are _signed_ 64-bit quantities, which means that
 * we can't properly handle lock requests that go beyond the (2^63 - 1)-th
 * byte, because of sign extension problems.  Since NFSv4 calls for 64-bit
 * locking, this prevents us from being completely protocol-compliant.  The
 * real solution to this problem is to start using unsigned file offsets in
 * the VFS, but this is a very deep change!
 */
static inline void
nfs4_transform_lock_offset(struct file_lock *lock)
{
	if (lock->fl_start < 0)
		lock->fl_start = OFFSET_MAX;
	if (lock->fl_end < 0)
		lock->fl_end = OFFSET_MAX;
}

5606 5607
static fl_owner_t
nfsd4_fl_get_owner(fl_owner_t owner)
5608
{
5609 5610 5611 5612
	struct nfs4_lockowner *lo = (struct nfs4_lockowner *)owner;

	nfs4_get_stateowner(&lo->lo_owner);
	return owner;
5613 5614
}

5615 5616
static void
nfsd4_fl_put_owner(fl_owner_t owner)
5617
{
5618
	struct nfs4_lockowner *lo = (struct nfs4_lockowner *)owner;
5619

5620
	if (lo)
5621 5622 5623
		nfs4_put_stateowner(&lo->lo_owner);
}

5624 5625 5626 5627 5628 5629 5630 5631 5632 5633
static void
nfsd4_lm_notify(struct file_lock *fl)
{
	struct nfs4_lockowner		*lo = (struct nfs4_lockowner *)fl->fl_owner;
	struct net			*net = lo->lo_owner.so_client->net;
	struct nfsd_net			*nn = net_generic(net, nfsd_net_id);
	struct nfsd4_blocked_lock	*nbl = container_of(fl,
						struct nfsd4_blocked_lock, nbl_lock);
	bool queue = false;

5634
	/* An empty list means that something else is going to be using it */
5635
	spin_lock(&nn->blocked_locks_lock);
5636 5637
	if (!list_empty(&nbl->nbl_list)) {
		list_del_init(&nbl->nbl_list);
5638
		list_del_init(&nbl->nbl_lru);
5639 5640
		queue = true;
	}
5641
	spin_unlock(&nn->blocked_locks_lock);
5642 5643 5644 5645 5646

	if (queue)
		nfsd4_run_cb(&nbl->nbl_cb);
}

5647
static const struct lock_manager_operations nfsd_posix_mng_ops  = {
5648
	.lm_notify = nfsd4_lm_notify,
5649 5650
	.lm_get_owner = nfsd4_fl_get_owner,
	.lm_put_owner = nfsd4_fl_put_owner,
5651
};
L
Linus Torvalds 已提交
5652 5653 5654 5655

static inline void
nfs4_set_lock_denied(struct file_lock *fl, struct nfsd4_lock_denied *deny)
{
5656
	struct nfs4_lockowner *lo;
L
Linus Torvalds 已提交
5657

5658
	if (fl->fl_lmops == &nfsd_posix_mng_ops) {
5659 5660 5661
		lo = (struct nfs4_lockowner *) fl->fl_owner;
		deny->ld_owner.data = kmemdup(lo->lo_owner.so_owner.data,
					lo->lo_owner.so_owner.len, GFP_KERNEL);
5662 5663 5664
		if (!deny->ld_owner.data)
			/* We just don't care that much */
			goto nevermind;
5665 5666
		deny->ld_owner.len = lo->lo_owner.so_owner.len;
		deny->ld_clientid = lo->lo_owner.so_client->cl_clientid;
5667
	} else {
5668 5669 5670
nevermind:
		deny->ld_owner.len = 0;
		deny->ld_owner.data = NULL;
5671 5672
		deny->ld_clientid.cl_boot = 0;
		deny->ld_clientid.cl_id = 0;
L
Linus Torvalds 已提交
5673 5674
	}
	deny->ld_start = fl->fl_start;
B
Benny Halevy 已提交
5675 5676
	deny->ld_length = NFS4_MAX_UINT64;
	if (fl->fl_end != NFS4_MAX_UINT64)
L
Linus Torvalds 已提交
5677 5678 5679 5680 5681 5682
		deny->ld_length = fl->fl_end - fl->fl_start + 1;        
	deny->ld_type = NFS4_READ_LT;
	if (fl->fl_type != F_RDLCK)
		deny->ld_type = NFS4_WRITE_LT;
}

5683
static struct nfs4_lockowner *
5684
find_lockowner_str_locked(struct nfs4_client *clp, struct xdr_netobj *owner)
L
Linus Torvalds 已提交
5685
{
5686
	unsigned int strhashval = ownerstr_hashval(owner);
5687
	struct nfs4_stateowner *so;
L
Linus Torvalds 已提交
5688

5689 5690
	lockdep_assert_held(&clp->cl_lock);

5691 5692
	list_for_each_entry(so, &clp->cl_ownerstr_hashtbl[strhashval],
			    so_strhash) {
5693 5694
		if (so->so_is_open_owner)
			continue;
5695 5696
		if (same_owner_str(so, owner))
			return lockowner(nfs4_get_stateowner(so));
L
Linus Torvalds 已提交
5697 5698 5699 5700
	}
	return NULL;
}

5701
static struct nfs4_lockowner *
5702
find_lockowner_str(struct nfs4_client *clp, struct xdr_netobj *owner)
5703 5704 5705
{
	struct nfs4_lockowner *lo;

5706
	spin_lock(&clp->cl_lock);
5707
	lo = find_lockowner_str_locked(clp, owner);
5708
	spin_unlock(&clp->cl_lock);
5709 5710 5711
	return lo;
}

5712 5713
static void nfs4_unhash_lockowner(struct nfs4_stateowner *sop)
{
5714
	unhash_lockowner_locked(lockowner(sop));
5715 5716
}

5717 5718 5719 5720 5721 5722 5723 5724
static void nfs4_free_lockowner(struct nfs4_stateowner *sop)
{
	struct nfs4_lockowner *lo = lockowner(sop);

	kmem_cache_free(lockowner_slab, lo);
}

static const struct nfs4_stateowner_operations lockowner_ops = {
5725 5726
	.so_unhash =	nfs4_unhash_lockowner,
	.so_free =	nfs4_free_lockowner,
5727 5728
};

L
Linus Torvalds 已提交
5729 5730 5731
/*
 * Alloc a lock owner structure.
 * Called in nfsd4_lock - therefore, OPEN and OPEN_CONFIRM (if needed) has 
L
Lucas De Marchi 已提交
5732
 * occurred. 
L
Linus Torvalds 已提交
5733
 *
5734
 * strhashval = ownerstr_hashval
L
Linus Torvalds 已提交
5735
 */
5736
static struct nfs4_lockowner *
5737 5738 5739 5740 5741
alloc_init_lock_stateowner(unsigned int strhashval, struct nfs4_client *clp,
			   struct nfs4_ol_stateid *open_stp,
			   struct nfsd4_lock *lock)
{
	struct nfs4_lockowner *lo, *ret;
L
Linus Torvalds 已提交
5742

5743 5744
	lo = alloc_stateowner(lockowner_slab, &lock->lk_new_owner, clp);
	if (!lo)
L
Linus Torvalds 已提交
5745
		return NULL;
5746
	INIT_LIST_HEAD(&lo->lo_blocked);
5747 5748
	INIT_LIST_HEAD(&lo->lo_owner.so_stateids);
	lo->lo_owner.so_is_open_owner = 0;
5749
	lo->lo_owner.so_seqid = lock->lk_new_lock_seqid;
5750
	lo->lo_owner.so_ops = &lockowner_ops;
5751
	spin_lock(&clp->cl_lock);
5752
	ret = find_lockowner_str_locked(clp, &lock->lk_new_owner);
5753 5754
	if (ret == NULL) {
		list_add(&lo->lo_owner.so_strhash,
5755
			 &clp->cl_ownerstr_hashtbl[strhashval]);
5756 5757
		ret = lo;
	} else
5758 5759
		nfs4_free_stateowner(&lo->lo_owner);

5760
	spin_unlock(&clp->cl_lock);
5761
	return ret;
L
Linus Torvalds 已提交
5762 5763
}

T
Trond Myklebust 已提交
5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779 5780 5781 5782
static struct nfs4_ol_stateid *
find_lock_stateid(struct nfs4_lockowner *lo, struct nfs4_file *fp)
{
	struct nfs4_ol_stateid *lst;
	struct nfs4_client *clp = lo->lo_owner.so_client;

	lockdep_assert_held(&clp->cl_lock);

	list_for_each_entry(lst, &lo->lo_owner.so_stateids, st_perstateowner) {
		if (lst->st_stid.sc_type != NFS4_LOCK_STID)
			continue;
		if (lst->st_stid.sc_file == fp) {
			refcount_inc(&lst->st_stid.sc_count);
			return lst;
		}
	}
	return NULL;
}

5783
static struct nfs4_ol_stateid *
5784 5785 5786
init_lock_stateid(struct nfs4_ol_stateid *stp, struct nfs4_lockowner *lo,
		  struct nfs4_file *fp, struct inode *inode,
		  struct nfs4_ol_stateid *open_stp)
L
Linus Torvalds 已提交
5787
{
5788
	struct nfs4_client *clp = lo->lo_owner.so_client;
5789
	struct nfs4_ol_stateid *retstp;
L
Linus Torvalds 已提交
5790

5791
	mutex_init(&stp->st_mutex);
5792
	mutex_lock_nested(&stp->st_mutex, OPEN_STATEID_MUTEX);
5793 5794 5795 5796 5797 5798
retry:
	spin_lock(&clp->cl_lock);
	spin_lock(&fp->fi_lock);
	retstp = find_lock_stateid(lo, fp);
	if (retstp)
		goto out_unlock;
5799

5800
	refcount_inc(&stp->st_stid.sc_count);
J
J. Bruce Fields 已提交
5801
	stp->st_stid.sc_type = NFS4_LOCK_STID;
5802
	stp->st_stateowner = nfs4_get_stateowner(&lo->lo_owner);
5803
	get_nfs4_file(fp);
5804
	stp->st_stid.sc_file = fp;
J
J. Bruce Fields 已提交
5805
	stp->st_access_bmap = 0;
L
Linus Torvalds 已提交
5806
	stp->st_deny_bmap = open_stp->st_deny_bmap;
5807
	stp->st_openstp = open_stp;
5808
	list_add(&stp->st_locks, &open_stp->st_locks);
5809
	list_add(&stp->st_perstateowner, &lo->lo_owner.so_stateids);
5810
	list_add(&stp->st_perfile, &fp->fi_stateids);
5811
out_unlock:
5812
	spin_unlock(&fp->fi_lock);
5813 5814 5815 5816 5817 5818 5819 5820 5821 5822 5823
	spin_unlock(&clp->cl_lock);
	if (retstp) {
		if (nfsd4_lock_ol_stateid(retstp) != nfs_ok) {
			nfs4_put_stid(&retstp->st_stid);
			goto retry;
		}
		/* To keep mutex tracking happy */
		mutex_unlock(&stp->st_mutex);
		stp = retstp;
	}
	return stp;
L
Linus Torvalds 已提交
5824 5825
}

5826 5827 5828 5829 5830 5831 5832 5833 5834 5835
static struct nfs4_ol_stateid *
find_or_create_lock_stateid(struct nfs4_lockowner *lo, struct nfs4_file *fi,
			    struct inode *inode, struct nfs4_ol_stateid *ost,
			    bool *new)
{
	struct nfs4_stid *ns = NULL;
	struct nfs4_ol_stateid *lst;
	struct nfs4_openowner *oo = openowner(ost->st_stateowner);
	struct nfs4_client *clp = oo->oo_owner.so_client;

5836
	*new = false;
5837 5838 5839
	spin_lock(&clp->cl_lock);
	lst = find_lock_stateid(lo, fi);
	spin_unlock(&clp->cl_lock);
5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852
	if (lst != NULL) {
		if (nfsd4_lock_ol_stateid(lst) == nfs_ok)
			goto out;
		nfs4_put_stid(&lst->st_stid);
	}
	ns = nfs4_alloc_stid(clp, stateid_slab, nfs4_free_lock_stateid);
	if (ns == NULL)
		return NULL;

	lst = init_lock_stateid(openlockstateid(ns), lo, fi, inode, ost);
	if (lst == openlockstateid(ns))
		*new = true;
	else
5853
		nfs4_put_stid(ns);
5854
out:
5855 5856
	return lst;
}
5857

5858
static int
L
Linus Torvalds 已提交
5859 5860
check_lock_length(u64 offset, u64 length)
{
K
Kinglong Mee 已提交
5861 5862
	return ((length == 0) || ((length != NFS4_MAX_UINT64) &&
		(length > ~offset)));
L
Linus Torvalds 已提交
5863 5864
}

5865
static void get_lock_access(struct nfs4_ol_stateid *lock_stp, u32 access)
J
J. Bruce Fields 已提交
5866
{
5867
	struct nfs4_file *fp = lock_stp->st_stid.sc_file;
J
J. Bruce Fields 已提交
5868

5869 5870
	lockdep_assert_held(&fp->fi_lock);

5871
	if (test_access(access, lock_stp))
J
J. Bruce Fields 已提交
5872
		return;
5873
	__nfs4_file_get_access(fp, access);
5874
	set_access(access, lock_stp);
J
J. Bruce Fields 已提交
5875 5876
}

5877 5878 5879 5880
static __be32
lookup_or_create_lock_state(struct nfsd4_compound_state *cstate,
			    struct nfs4_ol_stateid *ost,
			    struct nfsd4_lock *lock,
5881
			    struct nfs4_ol_stateid **plst, bool *new)
5882
{
5883
	__be32 status;
5884
	struct nfs4_file *fi = ost->st_stid.sc_file;
5885 5886
	struct nfs4_openowner *oo = openowner(ost->st_stateowner);
	struct nfs4_client *cl = oo->oo_owner.so_client;
5887
	struct inode *inode = d_inode(cstate->current_fh.fh_dentry);
5888
	struct nfs4_lockowner *lo;
5889
	struct nfs4_ol_stateid *lst;
5890 5891
	unsigned int strhashval;

5892
	lo = find_lockowner_str(cl, &lock->lk_new_owner);
5893
	if (!lo) {
5894
		strhashval = ownerstr_hashval(&lock->lk_new_owner);
5895 5896 5897 5898 5899
		lo = alloc_init_lock_stateowner(strhashval, cl, ost, lock);
		if (lo == NULL)
			return nfserr_jukebox;
	} else {
		/* with an existing lockowner, seqids must be the same */
5900
		status = nfserr_bad_seqid;
5901 5902
		if (!cstate->minorversion &&
		    lock->lk_new_lock_seqid != lo->lo_owner.so_seqid)
5903
			goto out;
5904
	}
5905

5906 5907
	lst = find_or_create_lock_stateid(lo, fi, inode, ost, new);
	if (lst == NULL) {
5908 5909
		status = nfserr_jukebox;
		goto out;
5910
	}
5911

5912
	status = nfs_ok;
5913
	*plst = lst;
5914 5915 5916
out:
	nfs4_put_stateowner(&lo->lo_owner);
	return status;
5917 5918
}

L
Linus Torvalds 已提交
5919 5920 5921
/*
 *  LOCK operation 
 */
5922
__be32
5923
nfsd4_lock(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5924
	   union nfsd4_op_u *u)
L
Linus Torvalds 已提交
5925
{
5926
	struct nfsd4_lock *lock = &u->lock;
5927 5928
	struct nfs4_openowner *open_sop = NULL;
	struct nfs4_lockowner *lock_sop = NULL;
5929
	struct nfs4_ol_stateid *lock_stp = NULL;
5930
	struct nfs4_ol_stateid *open_stp = NULL;
5931
	struct nfs4_file *fp;
5932
	struct file *filp = NULL;
5933
	struct nfsd4_blocked_lock *nbl = NULL;
5934 5935
	struct file_lock *file_lock = NULL;
	struct file_lock *conflock = NULL;
5936
	__be32 status = 0;
5937
	int lkflg;
5938
	int err;
5939
	bool new = false;
5940 5941
	unsigned char fl_type;
	unsigned int fl_flags = FL_POSIX;
5942 5943
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
5944 5945 5946 5947 5948 5949 5950 5951

	dprintk("NFSD: nfsd4_lock: start=%Ld length=%Ld\n",
		(long long) lock->lk_offset,
		(long long) lock->lk_length);

	if (check_lock_length(lock->lk_offset, lock->lk_length))
		 return nfserr_inval;

5952
	if ((status = fh_verify(rqstp, &cstate->current_fh,
M
Miklos Szeredi 已提交
5953
				S_IFREG, NFSD_MAY_LOCK))) {
A
Andy Adamson 已提交
5954 5955 5956 5957
		dprintk("NFSD: nfsd4_lock: permission denied!\n");
		return status;
	}

L
Linus Torvalds 已提交
5958
	if (lock->lk_is_new) {
5959 5960
		if (nfsd4_has_session(cstate))
			/* See rfc 5661 18.10.3: given clientid is ignored: */
5961
			memcpy(&lock->lk_new_clientid,
5962 5963 5964
				&cstate->session->se_client->cl_clientid,
				sizeof(clientid_t));

L
Linus Torvalds 已提交
5965
		status = nfserr_stale_clientid;
5966
		if (STALE_CLIENTID(&lock->lk_new_clientid, nn))
L
Linus Torvalds 已提交
5967 5968 5969
			goto out;

		/* validate and update open stateid and open seqid */
5970
		status = nfs4_preprocess_confirmed_seqid_op(cstate,
L
Linus Torvalds 已提交
5971 5972
				        lock->lk_new_open_seqid,
		                        &lock->lk_new_open_stateid,
5973
					&open_stp, nn);
5974
		if (status)
L
Linus Torvalds 已提交
5975
			goto out;
5976
		mutex_unlock(&open_stp->st_mutex);
5977
		open_sop = openowner(open_stp->st_stateowner);
5978
		status = nfserr_bad_stateid;
5979
		if (!same_clid(&open_sop->oo_owner.so_client->cl_clientid,
5980
						&lock->lk_new_clientid))
5981
			goto out;
5982
		status = lookup_or_create_lock_state(cstate, open_stp, lock,
5983
							&lock_stp, &new);
5984
	} else {
5985
		status = nfs4_preprocess_seqid_op(cstate,
5986 5987
				       lock->lk_old_lock_seqid,
				       &lock->lk_old_lock_stateid,
5988
				       NFS4_LOCK_STID, &lock_stp, nn);
5989
	}
J
J. Bruce Fields 已提交
5990 5991
	if (status)
		goto out;
5992
	lock_sop = lockowner(lock_stp->st_stateowner);
L
Linus Torvalds 已提交
5993

5994 5995 5996 5997 5998
	lkflg = setlkflg(lock->lk_type);
	status = nfs4_check_openmode(lock_stp, lkflg);
	if (status)
		goto out;

5999
	status = nfserr_grace;
6000
	if (locks_in_grace(net) && !lock->lk_reclaim)
6001 6002
		goto out;
	status = nfserr_no_grace;
6003
	if (!locks_in_grace(net) && lock->lk_reclaim)
6004 6005
		goto out;

6006
	fp = lock_stp->st_stid.sc_file;
L
Linus Torvalds 已提交
6007 6008
	switch (lock->lk_type) {
		case NFS4_READW_LT:
6009 6010 6011 6012
			if (nfsd4_has_session(cstate))
				fl_flags |= FL_SLEEP;
			/* Fallthrough */
		case NFS4_READ_LT:
6013 6014
			spin_lock(&fp->fi_lock);
			filp = find_readable_file_locked(fp);
J
J. Bruce Fields 已提交
6015 6016
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_READ);
6017
			spin_unlock(&fp->fi_lock);
6018
			fl_type = F_RDLCK;
6019
			break;
L
Linus Torvalds 已提交
6020
		case NFS4_WRITEW_LT:
6021 6022 6023 6024
			if (nfsd4_has_session(cstate))
				fl_flags |= FL_SLEEP;
			/* Fallthrough */
		case NFS4_WRITE_LT:
6025 6026
			spin_lock(&fp->fi_lock);
			filp = find_writeable_file_locked(fp);
J
J. Bruce Fields 已提交
6027 6028
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_WRITE);
6029
			spin_unlock(&fp->fi_lock);
6030
			fl_type = F_WRLCK;
6031
			break;
L
Linus Torvalds 已提交
6032 6033 6034 6035
		default:
			status = nfserr_inval;
		goto out;
	}
6036

6037 6038 6039 6040
	if (!filp) {
		status = nfserr_openmode;
		goto out;
	}
6041

6042 6043 6044 6045 6046 6047 6048 6049 6050
	nbl = find_or_allocate_block(lock_sop, &fp->fi_fhandle, nn);
	if (!nbl) {
		dprintk("NFSD: %s: unable to allocate block!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}

	file_lock = &nbl->nbl_lock;
	file_lock->fl_type = fl_type;
6051
	file_lock->fl_owner = (fl_owner_t)lockowner(nfs4_get_stateowner(&lock_sop->lo_owner));
6052 6053
	file_lock->fl_pid = current->tgid;
	file_lock->fl_file = filp;
6054
	file_lock->fl_flags = fl_flags;
6055 6056 6057 6058 6059 6060 6061 6062 6063 6064 6065
	file_lock->fl_lmops = &nfsd_posix_mng_ops;
	file_lock->fl_start = lock->lk_offset;
	file_lock->fl_end = last_byte_offset(lock->lk_offset, lock->lk_length);
	nfs4_transform_lock_offset(file_lock);

	conflock = locks_alloc_lock();
	if (!conflock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}
L
Linus Torvalds 已提交
6066

6067
	if (fl_flags & FL_SLEEP) {
6068
		nbl->nbl_time = jiffies;
6069
		spin_lock(&nn->blocked_locks_lock);
6070
		list_add_tail(&nbl->nbl_list, &lock_sop->lo_blocked);
6071
		list_add_tail(&nbl->nbl_lru, &nn->blocked_locks_lru);
6072
		spin_unlock(&nn->blocked_locks_lock);
6073 6074
	}

6075
	err = vfs_lock_file(filp, F_SETLK, file_lock, conflock);
6076
	switch (err) {
L
Linus Torvalds 已提交
6077
	case 0: /* success! */
6078
		nfs4_inc_and_copy_stateid(&lock->lk_resp_stateid, &lock_stp->st_stid);
6079
		status = 0;
6080
		break;
6081 6082 6083 6084
	case FILE_LOCK_DEFERRED:
		nbl = NULL;
		/* Fallthrough */
	case -EAGAIN:		/* conflock holds conflicting lock */
6085 6086
		status = nfserr_denied;
		dprintk("NFSD: nfsd4_lock: conflicting lock found!\n");
6087
		nfs4_set_lock_denied(conflock, &lock->lk_denied);
6088
		break;
6089
	case -EDEADLK:
L
Linus Torvalds 已提交
6090
		status = nfserr_deadlock;
6091
		break;
6092
	default:
6093
		dprintk("NFSD: nfsd4_lock: vfs_lock_file() failed! status %d\n",err);
6094
		status = nfserrno(err);
6095
		break;
L
Linus Torvalds 已提交
6096 6097
	}
out:
6098 6099 6100
	if (nbl) {
		/* dequeue it if we queued it before */
		if (fl_flags & FL_SLEEP) {
6101
			spin_lock(&nn->blocked_locks_lock);
6102
			list_del_init(&nbl->nbl_list);
6103
			list_del_init(&nbl->nbl_lru);
6104
			spin_unlock(&nn->blocked_locks_lock);
6105 6106 6107
		}
		free_blocked_lock(nbl);
	}
6108 6109
	if (filp)
		fput(filp);
6110 6111 6112 6113 6114 6115 6116 6117 6118 6119 6120
	if (lock_stp) {
		/* Bump seqid manually if the 4.0 replay owner is openowner */
		if (cstate->replay_owner &&
		    cstate->replay_owner != &lock_sop->lo_owner &&
		    seqid_mutating_err(ntohl(status)))
			lock_sop->lo_owner.so_seqid++;

		/*
		 * If this is a new, never-before-used stateid, and we are
		 * returning an error, then just go ahead and release it.
		 */
6121
		if (status && new)
6122
			release_lock_stateid(lock_stp);
6123 6124

		mutex_unlock(&lock_stp->st_mutex);
6125

6126
		nfs4_put_stid(&lock_stp->st_stid);
6127
	}
6128 6129
	if (open_stp)
		nfs4_put_stid(&open_stp->st_stid);
6130
	nfsd4_bump_seqid(cstate, status);
6131 6132
	if (conflock)
		locks_free_lock(conflock);
L
Linus Torvalds 已提交
6133 6134 6135
	return status;
}

6136 6137 6138 6139 6140 6141
/*
 * The NFSv4 spec allows a client to do a LOCKT without holding an OPEN,
 * so we do a temporary open here just to get an open file to pass to
 * vfs_test_lock.  (Arguably perhaps test_lock should be done with an
 * inode operation.)
 */
6142
static __be32 nfsd_test_lock(struct svc_rqst *rqstp, struct svc_fh *fhp, struct file_lock *lock)
6143 6144
{
	struct file *file;
6145 6146 6147
	__be32 err = nfsd_open(rqstp, fhp, S_IFREG, NFSD_MAY_READ, &file);
	if (!err) {
		err = nfserrno(vfs_test_lock(file, lock));
C
Christoph Hellwig 已提交
6148
		fput(file);
6149
	}
6150 6151 6152
	return err;
}

L
Linus Torvalds 已提交
6153 6154 6155
/*
 * LOCKT operation
 */
6156
__be32
6157
nfsd4_lockt(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
6158
	    union nfsd4_op_u *u)
L
Linus Torvalds 已提交
6159
{
6160
	struct nfsd4_lockt *lockt = &u->lockt;
6161
	struct file_lock *file_lock = NULL;
6162
	struct nfs4_lockowner *lo = NULL;
6163
	__be32 status;
6164
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
6165

6166
	if (locks_in_grace(SVC_NET(rqstp)))
L
Linus Torvalds 已提交
6167 6168 6169 6170 6171
		return nfserr_grace;

	if (check_lock_length(lockt->lt_offset, lockt->lt_length))
		 return nfserr_inval;

6172
	if (!nfsd4_has_session(cstate)) {
6173
		status = lookup_clientid(&lockt->lt_clientid, cstate, nn);
6174 6175 6176
		if (status)
			goto out;
	}
L
Linus Torvalds 已提交
6177

6178
	if ((status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0)))
L
Linus Torvalds 已提交
6179 6180
		goto out;

6181 6182 6183 6184 6185 6186
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}
6187

L
Linus Torvalds 已提交
6188 6189 6190
	switch (lockt->lt_type) {
		case NFS4_READ_LT:
		case NFS4_READW_LT:
6191
			file_lock->fl_type = F_RDLCK;
L
Linus Torvalds 已提交
6192 6193 6194
		break;
		case NFS4_WRITE_LT:
		case NFS4_WRITEW_LT:
6195
			file_lock->fl_type = F_WRLCK;
L
Linus Torvalds 已提交
6196 6197
		break;
		default:
6198
			dprintk("NFSD: nfs4_lockt: bad lock type!\n");
L
Linus Torvalds 已提交
6199 6200 6201 6202
			status = nfserr_inval;
		goto out;
	}

6203
	lo = find_lockowner_str(cstate->clp, &lockt->lt_owner);
6204
	if (lo)
6205 6206 6207
		file_lock->fl_owner = (fl_owner_t)lo;
	file_lock->fl_pid = current->tgid;
	file_lock->fl_flags = FL_POSIX;
L
Linus Torvalds 已提交
6208

6209 6210
	file_lock->fl_start = lockt->lt_offset;
	file_lock->fl_end = last_byte_offset(lockt->lt_offset, lockt->lt_length);
L
Linus Torvalds 已提交
6211

6212
	nfs4_transform_lock_offset(file_lock);
L
Linus Torvalds 已提交
6213

6214
	status = nfsd_test_lock(rqstp, &cstate->current_fh, file_lock);
6215
	if (status)
6216
		goto out;
6217

6218
	if (file_lock->fl_type != F_UNLCK) {
L
Linus Torvalds 已提交
6219
		status = nfserr_denied;
6220
		nfs4_set_lock_denied(file_lock, &lockt->lt_denied);
L
Linus Torvalds 已提交
6221 6222
	}
out:
6223 6224
	if (lo)
		nfs4_put_stateowner(&lo->lo_owner);
6225 6226
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
6227 6228 6229
	return status;
}

6230
__be32
6231
nfsd4_locku(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
6232
	    union nfsd4_op_u *u)
L
Linus Torvalds 已提交
6233
{
6234
	struct nfsd4_locku *locku = &u->locku;
6235
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
6236
	struct file *filp = NULL;
6237
	struct file_lock *file_lock = NULL;
6238
	__be32 status;
6239
	int err;
6240 6241
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

L
Linus Torvalds 已提交
6242 6243 6244 6245 6246 6247 6248
	dprintk("NFSD: nfsd4_locku: start=%Ld length=%Ld\n",
		(long long) locku->lu_offset,
		(long long) locku->lu_length);

	if (check_lock_length(locku->lu_offset, locku->lu_length))
		 return nfserr_inval;

6249
	status = nfs4_preprocess_seqid_op(cstate, locku->lu_seqid,
6250 6251
					&locku->lu_stateid, NFS4_LOCK_STID,
					&stp, nn);
6252
	if (status)
L
Linus Torvalds 已提交
6253
		goto out;
6254
	filp = find_any_file(stp->st_stid.sc_file);
6255 6256
	if (!filp) {
		status = nfserr_lock_range;
6257
		goto put_stateid;
6258
	}
6259 6260 6261 6262
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
6263
		goto fput;
6264
	}
6265

6266
	file_lock->fl_type = F_UNLCK;
6267
	file_lock->fl_owner = (fl_owner_t)lockowner(nfs4_get_stateowner(stp->st_stateowner));
6268 6269 6270 6271 6272 6273 6274 6275 6276
	file_lock->fl_pid = current->tgid;
	file_lock->fl_file = filp;
	file_lock->fl_flags = FL_POSIX;
	file_lock->fl_lmops = &nfsd_posix_mng_ops;
	file_lock->fl_start = locku->lu_offset;

	file_lock->fl_end = last_byte_offset(locku->lu_offset,
						locku->lu_length);
	nfs4_transform_lock_offset(file_lock);
L
Linus Torvalds 已提交
6277

6278
	err = vfs_lock_file(filp, F_SETLK, file_lock, NULL);
6279
	if (err) {
6280
		dprintk("NFSD: nfs4_locku: vfs_lock_file failed!\n");
L
Linus Torvalds 已提交
6281 6282
		goto out_nfserr;
	}
6283
	nfs4_inc_and_copy_stateid(&locku->lu_stateid, &stp->st_stid);
6284 6285
fput:
	fput(filp);
6286
put_stateid:
6287
	mutex_unlock(&stp->st_mutex);
6288
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
6289
out:
6290
	nfsd4_bump_seqid(cstate, status);
6291 6292
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
6293 6294 6295
	return status;

out_nfserr:
6296
	status = nfserrno(err);
6297
	goto fput;
L
Linus Torvalds 已提交
6298 6299 6300 6301
}

/*
 * returns
6302 6303
 * 	true:  locks held by lockowner
 * 	false: no locks held by lockowner
L
Linus Torvalds 已提交
6304
 */
6305 6306
static bool
check_for_locks(struct nfs4_file *fp, struct nfs4_lockowner *lowner)
L
Linus Torvalds 已提交
6307
{
6308
	struct file_lock *fl;
6309 6310 6311
	int status = false;
	struct file *filp = find_any_file(fp);
	struct inode *inode;
6312
	struct file_lock_context *flctx;
6313 6314 6315 6316 6317 6318 6319 6320

	if (!filp) {
		/* Any valid lock stateid should have some sort of access */
		WARN_ON_ONCE(1);
		return status;
	}

	inode = file_inode(filp);
6321 6322 6323
	flctx = inode->i_flctx;

	if (flctx && !list_empty_careful(&flctx->flc_posix)) {
6324
		spin_lock(&flctx->flc_lock);
6325 6326 6327 6328 6329
		list_for_each_entry(fl, &flctx->flc_posix, fl_list) {
			if (fl->fl_owner == (fl_owner_t)lowner) {
				status = true;
				break;
			}
6330
		}
6331
		spin_unlock(&flctx->flc_lock);
L
Linus Torvalds 已提交
6332
	}
6333
	fput(filp);
L
Linus Torvalds 已提交
6334 6335 6336
	return status;
}

6337
__be32
6338 6339
nfsd4_release_lockowner(struct svc_rqst *rqstp,
			struct nfsd4_compound_state *cstate,
6340
			union nfsd4_op_u *u)
L
Linus Torvalds 已提交
6341
{
6342
	struct nfsd4_release_lockowner *rlockowner = &u->release_lockowner;
L
Linus Torvalds 已提交
6343
	clientid_t *clid = &rlockowner->rl_clientid;
6344 6345
	struct nfs4_stateowner *sop;
	struct nfs4_lockowner *lo = NULL;
6346
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
6347
	struct xdr_netobj *owner = &rlockowner->rl_owner;
6348
	unsigned int hashval = ownerstr_hashval(owner);
6349
	__be32 status;
6350
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
6351
	struct nfs4_client *clp;
6352
	LIST_HEAD (reaplist);
L
Linus Torvalds 已提交
6353 6354 6355 6356

	dprintk("nfsd4_release_lockowner clientid: (%08x/%08x):\n",
		clid->cl_boot, clid->cl_id);

6357
	status = lookup_clientid(clid, cstate, nn);
6358
	if (status)
6359
		return status;
6360

6361
	clp = cstate->clp;
6362
	/* Find the matching lock stateowner */
6363
	spin_lock(&clp->cl_lock);
6364
	list_for_each_entry(sop, &clp->cl_ownerstr_hashtbl[hashval],
6365
			    so_strhash) {
6366

6367 6368
		if (sop->so_is_open_owner || !same_owner_str(sop, owner))
			continue;
6369

6370 6371 6372 6373 6374 6375
		/* see if there are still any locks associated with it */
		lo = lockowner(sop);
		list_for_each_entry(stp, &sop->so_stateids, st_perstateowner) {
			if (check_for_locks(stp->st_stid.sc_file, lo)) {
				status = nfserr_locks_held;
				spin_unlock(&clp->cl_lock);
6376
				return status;
6377
			}
6378
		}
6379

6380
		nfs4_get_stateowner(sop);
6381
		break;
L
Linus Torvalds 已提交
6382
	}
6383 6384 6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395
	if (!lo) {
		spin_unlock(&clp->cl_lock);
		return status;
	}

	unhash_lockowner_locked(lo);
	while (!list_empty(&lo->lo_owner.so_stateids)) {
		stp = list_first_entry(&lo->lo_owner.so_stateids,
				       struct nfs4_ol_stateid,
				       st_perstateowner);
		WARN_ON(!unhash_lock_stateid(stp));
		put_ol_stateid_locked(stp, &reaplist);
	}
6396
	spin_unlock(&clp->cl_lock);
6397
	free_ol_stateid_reaplist(&reaplist);
6398
	remove_blocked_locks(lo);
6399 6400
	nfs4_put_stateowner(&lo->lo_owner);

L
Linus Torvalds 已提交
6401 6402 6403 6404
	return status;
}

static inline struct nfs4_client_reclaim *
N
NeilBrown 已提交
6405
alloc_reclaim(void)
L
Linus Torvalds 已提交
6406
{
N
NeilBrown 已提交
6407
	return kmalloc(sizeof(struct nfs4_client_reclaim), GFP_KERNEL);
L
Linus Torvalds 已提交
6408 6409
}

6410
bool
6411
nfs4_has_reclaimed_state(const char *name, struct nfsd_net *nn)
6412
{
6413
	struct nfs4_client_reclaim *crp;
6414

6415
	crp = nfsd4_find_reclaim_client(name, nn);
6416
	return (crp && crp->cr_clp);
6417 6418
}

L
Linus Torvalds 已提交
6419 6420 6421
/*
 * failure => all reset bets are off, nfserr_no_grace...
 */
6422
struct nfs4_client_reclaim *
6423
nfs4_client_to_reclaim(const char *name, struct nfsd_net *nn)
L
Linus Torvalds 已提交
6424 6425
{
	unsigned int strhashval;
6426
	struct nfs4_client_reclaim *crp;
L
Linus Torvalds 已提交
6427

N
NeilBrown 已提交
6428 6429
	dprintk("NFSD nfs4_client_to_reclaim NAME: %.*s\n", HEXDIR_LEN, name);
	crp = alloc_reclaim();
6430 6431 6432
	if (crp) {
		strhashval = clientstr_hashval(name);
		INIT_LIST_HEAD(&crp->cr_strhash);
6433
		list_add(&crp->cr_strhash, &nn->reclaim_str_hashtbl[strhashval]);
6434
		memcpy(crp->cr_recdir, name, HEXDIR_LEN);
6435
		crp->cr_clp = NULL;
6436
		nn->reclaim_str_hashtbl_size++;
6437 6438
	}
	return crp;
L
Linus Torvalds 已提交
6439 6440
}

6441
void
6442
nfs4_remove_reclaim_record(struct nfs4_client_reclaim *crp, struct nfsd_net *nn)
6443 6444 6445
{
	list_del(&crp->cr_strhash);
	kfree(crp);
6446
	nn->reclaim_str_hashtbl_size--;
6447 6448
}

6449
void
6450
nfs4_release_reclaim(struct nfsd_net *nn)
L
Linus Torvalds 已提交
6451 6452 6453 6454 6455
{
	struct nfs4_client_reclaim *crp = NULL;
	int i;

	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
6456 6457
		while (!list_empty(&nn->reclaim_str_hashtbl[i])) {
			crp = list_entry(nn->reclaim_str_hashtbl[i].next,
L
Linus Torvalds 已提交
6458
			                struct nfs4_client_reclaim, cr_strhash);
6459
			nfs4_remove_reclaim_record(crp, nn);
L
Linus Torvalds 已提交
6460 6461
		}
	}
6462
	WARN_ON_ONCE(nn->reclaim_str_hashtbl_size);
L
Linus Torvalds 已提交
6463 6464 6465 6466
}

/*
 * called from OPEN, CLAIM_PREVIOUS with a new clientid. */
6467
struct nfs4_client_reclaim *
6468
nfsd4_find_reclaim_client(const char *recdir, struct nfsd_net *nn)
L
Linus Torvalds 已提交
6469 6470 6471 6472
{
	unsigned int strhashval;
	struct nfs4_client_reclaim *crp = NULL;

6473
	dprintk("NFSD: nfs4_find_reclaim_client for recdir %s\n", recdir);
L
Linus Torvalds 已提交
6474

6475
	strhashval = clientstr_hashval(recdir);
6476
	list_for_each_entry(crp, &nn->reclaim_str_hashtbl[strhashval], cr_strhash) {
6477
		if (same_name(crp->cr_recdir, recdir)) {
L
Linus Torvalds 已提交
6478 6479 6480 6481 6482 6483 6484 6485 6486
			return crp;
		}
	}
	return NULL;
}

/*
* Called from OPEN. Look for clientid in reclaim list.
*/
6487
__be32
6488 6489 6490
nfs4_check_open_reclaim(clientid_t *clid,
		struct nfsd4_compound_state *cstate,
		struct nfsd_net *nn)
L
Linus Torvalds 已提交
6491
{
6492
	__be32 status;
6493 6494

	/* find clientid in conf_id_hashtbl */
6495 6496
	status = lookup_clientid(clid, cstate, nn);
	if (status)
6497 6498
		return nfserr_reclaim_bad;

6499 6500 6501
	if (test_bit(NFSD4_CLIENT_RECLAIM_COMPLETE, &cstate->clp->cl_flags))
		return nfserr_no_grace;

6502 6503 6504 6505
	if (nfsd4_client_record_check(cstate->clp))
		return nfserr_reclaim_bad;

	return nfs_ok;
L
Linus Torvalds 已提交
6506 6507
}

B
Bryan Schumaker 已提交
6508
#ifdef CONFIG_NFSD_FAULT_INJECTION
6509 6510 6511 6512 6513 6514
static inline void
put_client(struct nfs4_client *clp)
{
	atomic_dec(&clp->cl_refcount);
}

6515 6516 6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531
static struct nfs4_client *
nfsd_find_client(struct sockaddr_storage *addr, size_t addr_size)
{
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
					  nfsd_net_id);

	if (!nfsd_netns_ready(nn))
		return NULL;

	list_for_each_entry(clp, &nn->client_lru, cl_lru) {
		if (memcmp(&clp->cl_addr, addr, addr_size) == 0)
			return clp;
	}
	return NULL;
}

6532
u64
6533
nfsd_inject_print_clients(void)
6534 6535 6536 6537 6538 6539 6540 6541 6542 6543 6544 6545 6546 6547 6548 6549 6550 6551 6552 6553
{
	struct nfs4_client *clp;
	u64 count = 0;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
					  nfsd_net_id);
	char buf[INET6_ADDRSTRLEN];

	if (!nfsd_netns_ready(nn))
		return 0;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru) {
		rpc_ntop((struct sockaddr *)&clp->cl_addr, buf, sizeof(buf));
		pr_info("NFS Client: %s\n", buf);
		++count;
	}
	spin_unlock(&nn->client_lock);

	return count;
}
B
Bryan Schumaker 已提交
6554

6555
u64
6556
nfsd_inject_forget_client(struct sockaddr_storage *addr, size_t addr_size)
6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569 6570 6571 6572 6573 6574 6575 6576 6577 6578 6579 6580 6581
{
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
					  nfsd_net_id);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	clp = nfsd_find_client(addr, addr_size);
	if (clp) {
		if (mark_client_expired_locked(clp) == nfs_ok)
			++count;
		else
			clp = NULL;
	}
	spin_unlock(&nn->client_lock);

	if (clp)
		expire_client(clp);

	return count;
}

6582
u64
6583
nfsd_inject_forget_clients(u64 max)
6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600 6601 6602 6603 6604 6605 6606 6607 6608 6609
{
	u64 count = 0;
	struct nfs4_client *clp, *next;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	list_for_each_entry_safe(clp, next, &nn->client_lru, cl_lru) {
		if (mark_client_expired_locked(clp) == nfs_ok) {
			list_add(&clp->cl_lru, &reaplist);
			if (max != 0 && ++count >= max)
				break;
		}
	}
	spin_unlock(&nn->client_lock);

	list_for_each_entry_safe(clp, next, &reaplist, cl_lru)
		expire_client(clp);

	return count;
}

6610 6611 6612 6613
static void nfsd_print_count(struct nfs4_client *clp, unsigned int count,
			     const char *type)
{
	char buf[INET6_ADDRSTRLEN];
6614
	rpc_ntop((struct sockaddr *)&clp->cl_addr, buf, sizeof(buf));
6615 6616 6617
	printk(KERN_INFO "NFS Client: %s has %u %s\n", buf, count, type);
}

6618 6619 6620 6621 6622 6623 6624 6625 6626 6627 6628 6629 6630 6631 6632 6633
static void
nfsd_inject_add_lock_to_list(struct nfs4_ol_stateid *lst,
			     struct list_head *collect)
{
	struct nfs4_client *clp = lst->st_stid.sc_client;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
					  nfsd_net_id);

	if (!collect)
		return;

	lockdep_assert_held(&nn->client_lock);
	atomic_inc(&clp->cl_refcount);
	list_add(&lst->st_locks, collect);
}

6634
static u64 nfsd_foreach_client_lock(struct nfs4_client *clp, u64 max,
6635
				    struct list_head *collect,
6636
				    bool (*func)(struct nfs4_ol_stateid *))
B
Bryan Schumaker 已提交
6637 6638 6639
{
	struct nfs4_openowner *oop;
	struct nfs4_ol_stateid *stp, *st_next;
6640
	struct nfs4_ol_stateid *lst, *lst_next;
B
Bryan Schumaker 已提交
6641 6642
	u64 count = 0;

6643
	spin_lock(&clp->cl_lock);
B
Bryan Schumaker 已提交
6644
	list_for_each_entry(oop, &clp->cl_openowners, oo_perclient) {
6645 6646 6647 6648
		list_for_each_entry_safe(stp, st_next,
				&oop->oo_owner.so_stateids, st_perstateowner) {
			list_for_each_entry_safe(lst, lst_next,
					&stp->st_locks, st_locks) {
6649
				if (func) {
6650 6651 6652
					if (func(lst))
						nfsd_inject_add_lock_to_list(lst,
									collect);
6653
				}
6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664
				++count;
				/*
				 * Despite the fact that these functions deal
				 * with 64-bit integers for "count", we must
				 * ensure that it doesn't blow up the
				 * clp->cl_refcount. Throw a warning if we
				 * start to approach INT_MAX here.
				 */
				WARN_ON_ONCE(count == (INT_MAX / 2));
				if (count == max)
					goto out;
B
Bryan Schumaker 已提交
6665 6666 6667
			}
		}
	}
6668 6669
out:
	spin_unlock(&clp->cl_lock);
B
Bryan Schumaker 已提交
6670 6671 6672 6673

	return count;
}

6674 6675 6676
static u64
nfsd_collect_client_locks(struct nfs4_client *clp, struct list_head *collect,
			  u64 max)
B
Bryan Schumaker 已提交
6677
{
6678
	return nfsd_foreach_client_lock(clp, max, collect, unhash_lock_stateid);
B
Bryan Schumaker 已提交
6679 6680
}

6681 6682
static u64
nfsd_print_client_locks(struct nfs4_client *clp)
6683
{
6684
	u64 count = nfsd_foreach_client_lock(clp, 0, NULL, NULL);
6685 6686 6687 6688
	nfsd_print_count(clp, count, "locked files");
	return count;
}

6689
u64
6690
nfsd_inject_print_locks(void)
6691 6692 6693 6694 6695 6696 6697 6698 6699 6700 6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715 6716 6717 6718 6719 6720 6721 6722
{
	struct nfs4_client *clp;
	u64 count = 0;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);

	if (!nfsd_netns_ready(nn))
		return 0;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru)
		count += nfsd_print_client_locks(clp);
	spin_unlock(&nn->client_lock);

	return count;
}

static void
nfsd_reap_locks(struct list_head *reaplist)
{
	struct nfs4_client *clp;
	struct nfs4_ol_stateid *stp, *next;

	list_for_each_entry_safe(stp, next, reaplist, st_locks) {
		list_del_init(&stp->st_locks);
		clp = stp->st_stid.sc_client;
		nfs4_put_stid(&stp->st_stid);
		put_client(clp);
	}
}

u64
6723
nfsd_inject_forget_client_locks(struct sockaddr_storage *addr, size_t addr_size)
6724 6725 6726 6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743
{
	unsigned int count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	clp = nfsd_find_client(addr, addr_size);
	if (clp)
		count = nfsd_collect_client_locks(clp, &reaplist, 0);
	spin_unlock(&nn->client_lock);
	nfsd_reap_locks(&reaplist);
	return count;
}

u64
6744
nfsd_inject_forget_locks(u64 max)
6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765
{
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru) {
		count += nfsd_collect_client_locks(clp, &reaplist, max - count);
		if (max != 0 && count >= max)
			break;
	}
	spin_unlock(&nn->client_lock);
	nfsd_reap_locks(&reaplist);
	return count;
}

6766 6767 6768 6769
static u64
nfsd_foreach_client_openowner(struct nfs4_client *clp, u64 max,
			      struct list_head *collect,
			      void (*func)(struct nfs4_openowner *))
6770 6771
{
	struct nfs4_openowner *oop, *next;
6772 6773
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
6774 6775
	u64 count = 0;

6776 6777 6778
	lockdep_assert_held(&nn->client_lock);

	spin_lock(&clp->cl_lock);
6779
	list_for_each_entry_safe(oop, next, &clp->cl_openowners, oo_perclient) {
6780
		if (func) {
6781
			func(oop);
6782 6783 6784 6785 6786 6787 6788 6789 6790 6791 6792 6793 6794 6795
			if (collect) {
				atomic_inc(&clp->cl_refcount);
				list_add(&oop->oo_perclient, collect);
			}
		}
		++count;
		/*
		 * Despite the fact that these functions deal with
		 * 64-bit integers for "count", we must ensure that
		 * it doesn't blow up the clp->cl_refcount. Throw a
		 * warning if we start to approach INT_MAX here.
		 */
		WARN_ON_ONCE(count == (INT_MAX / 2));
		if (count == max)
6796 6797
			break;
	}
6798 6799 6800 6801 6802 6803 6804 6805 6806 6807 6808 6809 6810 6811 6812 6813 6814 6815 6816 6817 6818 6819 6820
	spin_unlock(&clp->cl_lock);

	return count;
}

static u64
nfsd_print_client_openowners(struct nfs4_client *clp)
{
	u64 count = nfsd_foreach_client_openowner(clp, 0, NULL, NULL);

	nfsd_print_count(clp, count, "openowners");
	return count;
}

static u64
nfsd_collect_client_openowners(struct nfs4_client *clp,
			       struct list_head *collect, u64 max)
{
	return nfsd_foreach_client_openowner(clp, max, collect,
						unhash_openowner_locked);
}

u64
6821
nfsd_inject_print_openowners(void)
6822 6823 6824 6825 6826 6827 6828 6829 6830 6831 6832 6833 6834
{
	struct nfs4_client *clp;
	u64 count = 0;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);

	if (!nfsd_netns_ready(nn))
		return 0;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru)
		count += nfsd_print_client_openowners(clp);
	spin_unlock(&nn->client_lock);
6835 6836 6837 6838

	return count;
}

6839 6840 6841 6842 6843 6844 6845 6846 6847 6848 6849 6850 6851 6852 6853
static void
nfsd_reap_openowners(struct list_head *reaplist)
{
	struct nfs4_client *clp;
	struct nfs4_openowner *oop, *next;

	list_for_each_entry_safe(oop, next, reaplist, oo_perclient) {
		list_del_init(&oop->oo_perclient);
		clp = oop->oo_owner.so_client;
		release_openowner(oop);
		put_client(clp);
	}
}

u64
6854 6855
nfsd_inject_forget_client_openowners(struct sockaddr_storage *addr,
				     size_t addr_size)
6856
{
6857 6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870 6871 6872
	unsigned int count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	clp = nfsd_find_client(addr, addr_size);
	if (clp)
		count = nfsd_collect_client_openowners(clp, &reaplist, 0);
	spin_unlock(&nn->client_lock);
	nfsd_reap_openowners(&reaplist);
	return count;
6873 6874
}

6875
u64
6876
nfsd_inject_forget_openowners(u64 max)
6877
{
6878 6879 6880 6881 6882 6883 6884 6885 6886 6887 6888 6889 6890 6891 6892 6893 6894 6895
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru) {
		count += nfsd_collect_client_openowners(clp, &reaplist,
							max - count);
		if (max != 0 && count >= max)
			break;
	}
	spin_unlock(&nn->client_lock);
	nfsd_reap_openowners(&reaplist);
6896 6897 6898
	return count;
}

6899 6900 6901 6902
static u64 nfsd_find_all_delegations(struct nfs4_client *clp, u64 max,
				     struct list_head *victims)
{
	struct nfs4_delegation *dp, *next;
6903 6904
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
6905 6906
	u64 count = 0;

6907 6908 6909
	lockdep_assert_held(&nn->client_lock);

	spin_lock(&state_lock);
6910
	list_for_each_entry_safe(dp, next, &clp->cl_delegations, dl_perclnt) {
6911 6912 6913 6914 6915 6916 6917 6918 6919 6920
		if (victims) {
			/*
			 * It's not safe to mess with delegations that have a
			 * non-zero dl_time. They might have already been broken
			 * and could be processed by the laundromat outside of
			 * the state_lock. Just leave them be.
			 */
			if (dp->dl_time != 0)
				continue;

6921
			atomic_inc(&clp->cl_refcount);
6922
			WARN_ON(!unhash_delegation_locked(dp));
6923
			list_add(&dp->dl_recall_lru, victims);
6924
		}
6925 6926 6927 6928 6929 6930 6931 6932 6933
		++count;
		/*
		 * Despite the fact that these functions deal with
		 * 64-bit integers for "count", we must ensure that
		 * it doesn't blow up the clp->cl_refcount. Throw a
		 * warning if we start to approach INT_MAX here.
		 */
		WARN_ON_ONCE(count == (INT_MAX / 2));
		if (count == max)
6934 6935
			break;
	}
6936
	spin_unlock(&state_lock);
6937 6938 6939
	return count;
}

6940 6941
static u64
nfsd_print_client_delegations(struct nfs4_client *clp)
6942
{
6943
	u64 count = nfsd_find_all_delegations(clp, 0, NULL);
6944

6945 6946 6947 6948 6949
	nfsd_print_count(clp, count, "delegations");
	return count;
}

u64
6950
nfsd_inject_print_delegations(void)
6951 6952 6953 6954 6955 6956 6957 6958
{
	struct nfs4_client *clp;
	u64 count = 0;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);

	if (!nfsd_netns_ready(nn))
		return 0;
6959

6960 6961 6962 6963 6964 6965 6966 6967 6968 6969 6970 6971 6972 6973 6974
	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru)
		count += nfsd_print_client_delegations(clp);
	spin_unlock(&nn->client_lock);

	return count;
}

static void
nfsd_forget_delegations(struct list_head *reaplist)
{
	struct nfs4_client *clp;
	struct nfs4_delegation *dp, *next;

	list_for_each_entry_safe(dp, next, reaplist, dl_recall_lru) {
6975
		list_del_init(&dp->dl_recall_lru);
6976
		clp = dp->dl_stid.sc_client;
6977
		revoke_delegation(dp);
6978
		put_client(clp);
6979
	}
6980 6981 6982
}

u64
6983 6984
nfsd_inject_forget_client_delegations(struct sockaddr_storage *addr,
				      size_t addr_size)
6985 6986 6987 6988 6989 6990 6991 6992 6993 6994 6995 6996 6997 6998 6999 7000 7001 7002 7003
{
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	clp = nfsd_find_client(addr, addr_size);
	if (clp)
		count = nfsd_find_all_delegations(clp, 0, &reaplist);
	spin_unlock(&nn->client_lock);

	nfsd_forget_delegations(&reaplist);
	return count;
}
7004

7005
u64
7006
nfsd_inject_forget_delegations(u64 max)
7007 7008 7009 7010 7011 7012 7013 7014 7015 7016 7017 7018 7019 7020 7021 7022 7023 7024
{
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	list_for_each_entry(clp, &nn->client_lru, cl_lru) {
		count += nfsd_find_all_delegations(clp, max - count, &reaplist);
		if (max != 0 && count >= max)
			break;
	}
	spin_unlock(&nn->client_lock);
	nfsd_forget_delegations(&reaplist);
7025 7026 7027
	return count;
}

7028 7029
static void
nfsd_recall_delegations(struct list_head *reaplist)
7030
{
7031 7032
	struct nfs4_client *clp;
	struct nfs4_delegation *dp, *next;
7033

7034
	list_for_each_entry_safe(dp, next, reaplist, dl_recall_lru) {
7035
		list_del_init(&dp->dl_recall_lru);
7036 7037 7038 7039 7040 7041 7042 7043
		clp = dp->dl_stid.sc_client;
		/*
		 * We skipped all entries that had a zero dl_time before,
		 * so we can now reset the dl_time back to 0. If a delegation
		 * break comes in now, then it won't make any difference since
		 * we're recalling it either way.
		 */
		spin_lock(&state_lock);
7044
		dp->dl_time = 0;
7045
		spin_unlock(&state_lock);
7046
		nfsd_break_one_deleg(dp);
7047
		put_client(clp);
7048
	}
7049
}
7050

7051
u64
7052
nfsd_inject_recall_client_delegations(struct sockaddr_storage *addr,
7053 7054 7055 7056 7057 7058 7059 7060 7061 7062 7063 7064 7065 7066 7067 7068 7069 7070
				      size_t addr_size)
{
	u64 count = 0;
	struct nfs4_client *clp;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);

	if (!nfsd_netns_ready(nn))
		return count;

	spin_lock(&nn->client_lock);
	clp = nfsd_find_client(addr, addr_size);
	if (clp)
		count = nfsd_find_all_delegations(clp, 0, &reaplist);
	spin_unlock(&nn->client_lock);

	nfsd_recall_delegations(&reaplist);
7071 7072 7073
	return count;
}

7074
u64
7075
nfsd_inject_recall_delegations(u64 max)
7076 7077
{
	u64 count = 0;
7078 7079 7080 7081
	struct nfs4_client *clp, *next;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);
7082

7083 7084
	if (!nfsd_netns_ready(nn))
		return count;
7085

7086 7087 7088 7089 7090 7091 7092 7093
	spin_lock(&nn->client_lock);
	list_for_each_entry_safe(clp, next, &nn->client_lru, cl_lru) {
		count += nfsd_find_all_delegations(clp, max - count, &reaplist);
		if (max != 0 && ++count >= max)
			break;
	}
	spin_unlock(&nn->client_lock);
	nfsd_recall_delegations(&reaplist);
7094 7095
	return count;
}
B
Bryan Schumaker 已提交
7096 7097
#endif /* CONFIG_NFSD_FAULT_INJECTION */

7098 7099 7100 7101 7102 7103 7104 7105 7106 7107 7108 7109 7110 7111 7112 7113 7114 7115 7116 7117 7118
/*
 * Since the lifetime of a delegation isn't limited to that of an open, a
 * client may quite reasonably hang on to a delegation as long as it has
 * the inode cached.  This becomes an obvious problem the first time a
 * client's inode cache approaches the size of the server's total memory.
 *
 * For now we avoid this problem by imposing a hard limit on the number
 * of delegations, which varies according to the server's memory size.
 */
static void
set_max_delegations(void)
{
	/*
	 * Allow at most 4 delegations per megabyte of RAM.  Quick
	 * estimates suggest that in the worst case (where every delegation
	 * is for a different inode), a delegation could take about 1.5K,
	 * giving a worst case usage of about 6% of memory.
	 */
	max_delegations = nr_free_buffer_pages() >> (20 - 2 - PAGE_SHIFT);
}

7119
static int nfs4_state_create_net(struct net *net)
7120 7121 7122 7123 7124 7125 7126
{
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
	int i;

	nn->conf_id_hashtbl = kmalloc(sizeof(struct list_head) *
			CLIENT_HASH_SIZE, GFP_KERNEL);
	if (!nn->conf_id_hashtbl)
7127
		goto err;
7128 7129 7130 7131
	nn->unconf_id_hashtbl = kmalloc(sizeof(struct list_head) *
			CLIENT_HASH_SIZE, GFP_KERNEL);
	if (!nn->unconf_id_hashtbl)
		goto err_unconf_id;
7132 7133 7134 7135
	nn->sessionid_hashtbl = kmalloc(sizeof(struct list_head) *
			SESSION_HASH_SIZE, GFP_KERNEL);
	if (!nn->sessionid_hashtbl)
		goto err_sessionid;
7136

7137
	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
7138
		INIT_LIST_HEAD(&nn->conf_id_hashtbl[i]);
7139
		INIT_LIST_HEAD(&nn->unconf_id_hashtbl[i]);
7140
	}
7141 7142
	for (i = 0; i < SESSION_HASH_SIZE; i++)
		INIT_LIST_HEAD(&nn->sessionid_hashtbl[i]);
7143
	nn->conf_name_tree = RB_ROOT;
7144
	nn->unconf_name_tree = RB_ROOT;
7145 7146 7147 7148
	nn->boot_time = get_seconds();
	nn->grace_ended = false;
	nn->nfsd4_manager.block_opens = true;
	INIT_LIST_HEAD(&nn->nfsd4_manager.list);
7149
	INIT_LIST_HEAD(&nn->client_lru);
7150
	INIT_LIST_HEAD(&nn->close_lru);
7151
	INIT_LIST_HEAD(&nn->del_recall_lru);
7152
	spin_lock_init(&nn->client_lock);
7153

7154 7155 7156
	spin_lock_init(&nn->blocked_locks_lock);
	INIT_LIST_HEAD(&nn->blocked_locks_lru);

7157
	INIT_DELAYED_WORK(&nn->laundromat_work, laundromat_main);
7158
	get_net(net);
7159

7160
	return 0;
7161

7162
err_sessionid:
7163
	kfree(nn->unconf_id_hashtbl);
7164 7165
err_unconf_id:
	kfree(nn->conf_id_hashtbl);
7166 7167
err:
	return -ENOMEM;
7168 7169 7170
}

static void
7171
nfs4_state_destroy_net(struct net *net)
7172 7173 7174 7175 7176 7177 7178 7179 7180 7181 7182
{
	int i;
	struct nfs4_client *clp = NULL;
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);

	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
		while (!list_empty(&nn->conf_id_hashtbl[i])) {
			clp = list_entry(nn->conf_id_hashtbl[i].next, struct nfs4_client, cl_idhash);
			destroy_client(clp);
		}
	}
7183

7184 7185
	WARN_ON(!list_empty(&nn->blocked_locks_lru));

7186 7187 7188 7189 7190
	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
		while (!list_empty(&nn->unconf_id_hashtbl[i])) {
			clp = list_entry(nn->unconf_id_hashtbl[i].next, struct nfs4_client, cl_idhash);
			destroy_client(clp);
		}
7191 7192
	}

7193
	kfree(nn->sessionid_hashtbl);
7194
	kfree(nn->unconf_id_hashtbl);
7195
	kfree(nn->conf_id_hashtbl);
7196
	put_net(net);
7197 7198
}

7199
int
7200
nfs4_state_start_net(struct net *net)
7201
{
7202
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
7203 7204
	int ret;

7205
	ret = nfs4_state_create_net(net);
7206 7207
	if (ret)
		return ret;
7208 7209
	locks_start_grace(net, &nn->nfsd4_manager);
	nfsd4_client_tracking_init(net);
V
Vasily Averin 已提交
7210 7211
	printk(KERN_INFO "NFSD: starting %ld-second grace period (net %x)\n",
	       nn->nfsd4_grace, net->ns.inum);
7212
	queue_delayed_work(laundry_wq, &nn->laundromat_work, nn->nfsd4_grace * HZ);
7213 7214 7215 7216 7217 7218 7219 7220 7221 7222
	return 0;
}

/* initialization to perform when the nfsd service is started: */

int
nfs4_state_start(void)
{
	int ret;

7223
	ret = set_callback_cred();
7224
	if (ret)
7225 7226
		return ret;

7227
	laundry_wq = alloc_workqueue("%s", WQ_UNBOUND, 0, "nfsd4");
7228 7229
	if (laundry_wq == NULL) {
		ret = -ENOMEM;
7230
		goto out_cleanup_cred;
7231
	}
7232 7233 7234
	ret = nfsd4_create_callback_queue();
	if (ret)
		goto out_free_laundry;
7235

7236
	set_max_delegations();
7237
	return 0;
7238

7239 7240
out_free_laundry:
	destroy_workqueue(laundry_wq);
7241 7242
out_cleanup_cred:
	cleanup_callback_cred();
7243
	return ret;
L
Linus Torvalds 已提交
7244 7245
}

7246
void
7247
nfs4_state_shutdown_net(struct net *net)
L
Linus Torvalds 已提交
7248 7249 7250
{
	struct nfs4_delegation *dp = NULL;
	struct list_head *pos, *next, reaplist;
7251
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
7252

7253 7254
	cancel_delayed_work_sync(&nn->laundromat_work);
	locks_end_grace(&nn->nfsd4_manager);
7255

L
Linus Torvalds 已提交
7256
	INIT_LIST_HEAD(&reaplist);
7257
	spin_lock(&state_lock);
7258
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
7259
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
7260
		WARN_ON(!unhash_delegation_locked(dp));
7261
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
7262
	}
7263
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
7264 7265
	list_for_each_safe(pos, next, &reaplist) {
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
7266
		list_del_init(&dp->dl_recall_lru);
7267
		put_clnt_odstate(dp->dl_clnt_odstate);
7268
		nfs4_put_deleg_lease(dp->dl_stid.sc_file);
7269
		nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
7270 7271
	}

7272
	nfsd4_client_tracking_exit(net);
7273
	nfs4_state_destroy_net(net);
L
Linus Torvalds 已提交
7274 7275 7276 7277 7278
}

void
nfs4_state_shutdown(void)
{
7279
	destroy_workqueue(laundry_wq);
7280
	nfsd4_destroy_callback_queue();
7281
	cleanup_callback_cred();
L
Linus Torvalds 已提交
7282
}
7283 7284 7285 7286

static void
get_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
7287 7288
	if (HAS_STATE_ID(cstate, CURRENT_STATE_ID_FLAG) && CURRENT_STATEID(stateid))
		memcpy(stateid, &cstate->current_stateid, sizeof(stateid_t));
7289 7290 7291 7292 7293
}

static void
put_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
7294 7295 7296 7297 7298 7299 7300 7301 7302 7303
	if (cstate->minorversion) {
		memcpy(&cstate->current_stateid, stateid, sizeof(stateid_t));
		SET_STATE_ID(cstate, CURRENT_STATE_ID_FLAG);
	}
}

void
clear_current_stateid(struct nfsd4_compound_state *cstate)
{
	CLEAR_STATE_ID(cstate, CURRENT_STATE_ID_FLAG);
7304 7305
}

7306 7307 7308
/*
 * functions to set current state id
 */
7309
void
7310 7311
nfsd4_set_opendowngradestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7312
{
7313
	put_stateid(cstate, &u->open_downgrade.od_stateid);
7314 7315
}

7316
void
7317 7318
nfsd4_set_openstateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7319
{
7320
	put_stateid(cstate, &u->open.op_stateid);
7321 7322
}

7323
void
7324 7325
nfsd4_set_closestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7326
{
7327
	put_stateid(cstate, &u->close.cl_stateid);
7328 7329 7330
}

void
7331 7332
nfsd4_set_lockstateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7333
{
7334
	put_stateid(cstate, &u->lock.lk_resp_stateid);
7335 7336 7337 7338 7339
}

/*
 * functions to consume current state id
 */
7340

7341
void
7342 7343
nfsd4_get_opendowngradestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7344
{
7345
	get_stateid(cstate, &u->open_downgrade.od_stateid);
7346 7347 7348
}

void
7349 7350
nfsd4_get_delegreturnstateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7351
{
7352
	get_stateid(cstate, &u->delegreturn.dr_stateid);
7353 7354
}

7355
void
7356 7357
nfsd4_get_freestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7358
{
7359
	get_stateid(cstate, &u->free_stateid.fr_stateid);
7360 7361 7362
}

void
7363 7364
nfsd4_get_setattrstateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7365
{
7366
	get_stateid(cstate, &u->setattr.sa_stateid);
7367 7368
}

7369
void
7370 7371
nfsd4_get_closestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7372
{
7373
	get_stateid(cstate, &u->close.cl_stateid);
7374 7375 7376
}

void
7377 7378
nfsd4_get_lockustateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7379
{
7380
	get_stateid(cstate, &u->locku.lu_stateid);
7381
}
7382 7383

void
7384 7385
nfsd4_get_readstateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7386
{
7387
	get_stateid(cstate, &u->read.rd_stateid);
7388 7389 7390
}

void
7391 7392
nfsd4_get_writestateid(struct nfsd4_compound_state *cstate,
		union nfsd4_op_u *u)
7393
{
7394
	get_stateid(cstate, &u->write.wr_stateid);
7395
}