nfs4state.c 170.8 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

A
Andy Adamson 已提交
67
static u64 current_sessionid = 1;
68

69 70
#define ZERO_STATEID(stateid) (!memcmp((stateid), &zero_stateid, sizeof(stateid_t)))
#define ONE_STATEID(stateid)  (!memcmp((stateid), &one_stateid, sizeof(stateid_t)))
71
#define CURRENT_STATEID(stateid) (!memcmp((stateid), &currentstateid, sizeof(stateid_t)))
L
Linus Torvalds 已提交
72 73

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

77 78 79 80 81 82 83
/* 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:
 */
84
static DEFINE_SPINLOCK(state_lock);
85

86 87 88 89 90 91
/*
 * 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 已提交
92 93 94 95 96
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;
97
static struct kmem_cache *odstate_slab;
N
NeilBrown 已提交
98

99
static void free_session(struct nfsd4_session *);
100

101 102
static struct nfsd4_callback_ops nfsd4_cb_recall_ops;

103
static bool is_session_dead(struct nfsd4_session *ses)
104
{
105
	return ses->se_flags & NFS4_SESSION_DEAD;
106 107
}

108
static __be32 mark_session_dead_locked(struct nfsd4_session *ses, int ref_held_by_me)
109
{
110
	if (atomic_read(&ses->se_ref) > ref_held_by_me)
111 112 113
		return nfserr_jukebox;
	ses->se_flags |= NFS4_SESSION_DEAD;
	return nfs_ok;
114 115
}

116 117 118 119 120 121 122
static bool is_client_expired(struct nfs4_client *clp)
{
	return clp->cl_time == 0;
}

static __be32 get_client_locked(struct nfs4_client *clp)
{
123 124 125 126
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);

127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154
	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();
}

155
static void put_client_renew_locked(struct nfs4_client *clp)
156
{
157 158 159 160
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);

161 162 163 164 165 166
	if (!atomic_dec_and_test(&clp->cl_refcount))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
}

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

171 172 173 174
	if (!atomic_dec_and_lock(&clp->cl_refcount, &nn->client_lock))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
175 176 177
	spin_unlock(&nn->client_lock);
}

178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193
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;
194 195 196
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	lockdep_assert_held(&nn->client_lock);
197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212

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

213 214 215 216 217 218 219
static inline struct nfs4_stateowner *
nfs4_get_stateowner(struct nfs4_stateowner *sop)
{
	atomic_inc(&sop->so_count);
	return sop;
}

220
static int
221
same_owner_str(struct nfs4_stateowner *sop, struct xdr_netobj *owner)
222 223
{
	return (sop->so_owner.len == owner->len) &&
224
		0 == memcmp(sop->so_owner.data, owner->data, owner->len);
225 226 227 228
}

static struct nfs4_openowner *
find_openstateowner_str_locked(unsigned int hashval, struct nfsd4_open *open,
229
			struct nfs4_client *clp)
230 231 232
{
	struct nfs4_stateowner *so;

233
	lockdep_assert_held(&clp->cl_lock);
234

235 236
	list_for_each_entry(so, &clp->cl_ownerstr_hashtbl[hashval],
			    so_strhash) {
237 238
		if (!so->so_is_open_owner)
			continue;
239 240
		if (same_owner_str(so, &open->op_owner))
			return openowner(nfs4_get_stateowner(so));
241 242 243 244 245 246
	}
	return NULL;
}

static struct nfs4_openowner *
find_openstateowner_str(unsigned int hashval, struct nfsd4_open *open,
247
			struct nfs4_client *clp)
248 249 250
{
	struct nfs4_openowner *oo;

251 252 253
	spin_lock(&clp->cl_lock);
	oo = find_openstateowner_str_locked(hashval, open, clp);
	spin_unlock(&clp->cl_lock);
254 255 256
	return oo;
}

L
Linus Torvalds 已提交
257 258 259 260 261 262 263 264 265 266 267 268 269
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;
}

270
static void nfsd4_free_file_rcu(struct rcu_head *rcu)
271
{
272 273 274
	struct nfs4_file *fp = container_of(rcu, struct nfs4_file, fi_rcu);

	kmem_cache_free(file_slab, fp);
275 276
}

277
void
278 279
put_nfs4_file(struct nfs4_file *fi)
{
280 281
	might_lock(&state_lock);

282
	if (atomic_dec_and_lock(&fi->fi_ref, &state_lock)) {
283
		hlist_del_rcu(&fi->fi_hash);
284
		spin_unlock(&state_lock);
285
		WARN_ON_ONCE(!list_empty(&fi->fi_clnt_odstate));
286 287
		WARN_ON_ONCE(!list_empty(&fi->fi_delegations));
		call_rcu(&fi->fi_rcu, nfsd4_free_file_rcu);
288
	}
289 290
}

291 292 293 294 295 296 297 298 299 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 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347
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;
}

348
struct file *
349 350 351 352 353 354 355 356 357 358 359 360 361 362 363
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;
}

364
static atomic_long_t num_delegations;
365
unsigned long max_delegations;
366 367 368 369 370

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

371 372 373 374
/* 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)
375

376
static unsigned int ownerstr_hashval(struct xdr_netobj *ownername)
377 378 379 380
{
	unsigned int ret;

	ret = opaque_hashval(ownername->data, ownername->len);
381
	return ret & OWNER_HASH_MASK;
382
}
383 384 385 386

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

388
static unsigned int nfsd_fh_hashval(struct knfsd_fh *fh)
389
{
390 391 392 393 394 395 396 397
	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);
}

398
static struct hlist_head file_hashtbl[FILE_HASH_SIZE];
399

400 401
static void
__nfs4_file_get_access(struct nfs4_file *fp, u32 access)
402
{
403 404
	lockdep_assert_held(&fp->fi_lock);

405 406 407 408
	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]);
409 410
}

411 412
static __be32
nfs4_file_get_access(struct nfs4_file *fp, u32 access)
413
{
414 415
	lockdep_assert_held(&fp->fi_lock);

416 417 418 419
	/* Does this access mode make sense? */
	if (access & ~NFS4_SHARE_ACCESS_BOTH)
		return nfserr_inval;

420 421 422 423
	/* Does it conflict with a deny mode already set? */
	if ((access & fp->fi_share_deny) != 0)
		return nfserr_share_denied;

424 425
	__nfs4_file_get_access(fp, access);
	return nfs_ok;
426 427
}

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

447
static void __nfs4_file_put_access(struct nfs4_file *fp, int oflag)
448
{
449 450 451 452 453 454
	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 已提交
455
		swap(f1, fp->fi_fds[oflag]);
456
		if (atomic_read(&fp->fi_access[1 - oflag]) == 0)
J
Jeff Layton 已提交
457
			swap(f2, fp->fi_fds[O_RDWR]);
458 459 460 461 462
		spin_unlock(&fp->fi_lock);
		if (f1)
			fput(f1);
		if (f2)
			fput(f2);
463 464 465
	}
}

466
static void nfs4_file_put_access(struct nfs4_file *fp, u32 access)
467
{
468 469 470
	WARN_ON_ONCE(access & ~NFS4_SHARE_ACCESS_BOTH);

	if (access & NFS4_SHARE_ACCESS_WRITE)
471
		__nfs4_file_put_access(fp, O_WRONLY);
472 473
	if (access & NFS4_SHARE_ACCESS_READ)
		__nfs4_file_put_access(fp, O_RDONLY);
474 475
}

476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555
/*
 * 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;
		atomic_set(&co->co_odcount, 1);
	}
	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)
		atomic_inc(&co->co_odcount);
}

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

	if (!co)
		return;

	fp = co->co_file;
	if (atomic_dec_and_lock(&co->co_odcount, &fp->fi_lock)) {
		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;
}

556
struct nfs4_stid *nfs4_alloc_stid(struct nfs4_client *cl,
557
					 struct kmem_cache *slab)
558
{
J
J. Bruce Fields 已提交
559
	struct nfs4_stid *stid;
J
J. Bruce Fields 已提交
560
	int new_id;
561

562
	stid = kmem_cache_zalloc(slab, GFP_KERNEL);
J
J. Bruce Fields 已提交
563 564 565
	if (!stid)
		return NULL;

566 567 568 569 570
	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 已提交
571
	if (new_id < 0)
J
J. Bruce Fields 已提交
572
		goto out_free;
573
	stid->sc_client = cl;
J
J. Bruce Fields 已提交
574 575
	stid->sc_stateid.si_opaque.so_id = new_id;
	stid->sc_stateid.si_opaque.so_clid = cl->cl_clientid;
576
	/* Will be incremented before return to client: */
577
	atomic_set(&stid->sc_count, 1);
578 579

	/*
J
J. Bruce Fields 已提交
580 581 582 583 584 585 586
	 * 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):
587
	 */
J
J. Bruce Fields 已提交
588 589
	return stid;
out_free:
590
	kmem_cache_free(slab, stid);
J
J. Bruce Fields 已提交
591
	return NULL;
592 593
}

594
static struct nfs4_ol_stateid * nfs4_alloc_open_stateid(struct nfs4_client *clp)
595
{
596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611
	struct nfs4_stid *stid;
	struct nfs4_ol_stateid *stp;

	stid = nfs4_alloc_stid(clp, stateid_slab);
	if (!stid)
		return NULL;

	stp = openlockstateid(stid);
	stp->st_stid.sc_free = nfs4_free_ol_stateid;
	return stp;
}

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

614 615 616 617 618 619 620 621 622 623 624 625 626 627
/*
 * 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.
 *
628
 * 'blocked_delegations_lock', which is always taken in block_delegations(),
629 630 631
 * is used to manage concurrent access.  Testing does not need the lock
 * except when swapping the two filters.
 */
632
static DEFINE_SPINLOCK(blocked_delegations_lock);
633 634 635 636 637 638 639 640 641 642 643 644 645 646 647
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) {
648
		spin_lock(&blocked_delegations_lock);
649 650 651 652 653 654 655 656
		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();
		}
657
		spin_unlock(&blocked_delegations_lock);
658
	}
659
	hash = jhash(&fh->fh_base, fh->fh_size, 0);
660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677
	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;

678
	hash = jhash(&fh->fh_base, fh->fh_size, 0);
679

680
	spin_lock(&blocked_delegations_lock);
681 682 683 684 685 686
	__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;
687
	spin_unlock(&blocked_delegations_lock);
688 689
}

L
Linus Torvalds 已提交
690
static struct nfs4_delegation *
691 692
alloc_init_deleg(struct nfs4_client *clp, struct svc_fh *current_fh,
		 struct nfs4_clnt_odstate *odstate)
L
Linus Torvalds 已提交
693 694
{
	struct nfs4_delegation *dp;
695
	long n;
L
Linus Torvalds 已提交
696 697

	dprintk("NFSD alloc_init_deleg\n");
698 699 700
	n = atomic_long_inc_return(&num_delegations);
	if (n < 0 || n > max_delegations)
		goto out_dec;
701
	if (delegation_blocked(&current_fh->fh_handle))
702
		goto out_dec;
703
	dp = delegstateid(nfs4_alloc_stid(clp, deleg_slab));
N
NeilBrown 已提交
704
	if (dp == NULL)
705
		goto out_dec;
706 707

	dp->dl_stid.sc_free = nfs4_free_deleg;
708 709
	/*
	 * delegation seqid's are never incremented.  The 4.1 special
J
J. Bruce Fields 已提交
710 711
	 * meaning of seqid 0 isn't meaningful, really, but let's avoid
	 * 0 anyway just for consistency and use 1:
712 713
	 */
	dp->dl_stid.sc_stateid.si_generation = 1;
714 715
	INIT_LIST_HEAD(&dp->dl_perfile);
	INIT_LIST_HEAD(&dp->dl_perclnt);
L
Linus Torvalds 已提交
716
	INIT_LIST_HEAD(&dp->dl_recall_lru);
717 718
	dp->dl_clnt_odstate = odstate;
	get_clnt_odstate(odstate);
719
	dp->dl_type = NFS4_OPEN_DELEGATE_READ;
720 721
	dp->dl_retries = 1;
	nfsd4_init_cb(&dp->dl_recall, dp->dl_stid.sc_client,
722
		      &nfsd4_cb_recall_ops, NFSPROC4_CLNT_CB_RECALL);
L
Linus Torvalds 已提交
723
	return dp;
724 725 726
out_dec:
	atomic_long_dec(&num_delegations);
	return NULL;
L
Linus Torvalds 已提交
727 728 729
}

void
730
nfs4_put_stid(struct nfs4_stid *s)
L
Linus Torvalds 已提交
731
{
732
	struct nfs4_file *fp = s->sc_file;
733 734
	struct nfs4_client *clp = s->sc_client;

735 736
	might_lock(&clp->cl_lock);

737 738
	if (!atomic_dec_and_lock(&s->sc_count, &clp->cl_lock)) {
		wake_up_all(&close_wq);
739
		return;
740
	}
741
	idr_remove(&clp->cl_stateids, s->sc_stateid.si_opaque.so_id);
742
	spin_unlock(&clp->cl_lock);
743
	s->sc_free(s);
744 745
	if (fp)
		put_nfs4_file(fp);
L
Linus Torvalds 已提交
746 747
}

748
static void nfs4_put_deleg_lease(struct nfs4_file *fp)
L
Linus Torvalds 已提交
749
{
750
	struct file *filp = NULL;
751

752
	spin_lock(&fp->fi_lock);
753
	if (fp->fi_deleg_file && --fp->fi_delegees == 0)
754 755 756 757
		swap(filp, fp->fi_deleg_file);
	spin_unlock(&fp->fi_lock);

	if (filp) {
758
		vfs_setlease(filp, F_UNLCK, NULL, (void **)&fp);
759
		fput(filp);
760
	}
L
Linus Torvalds 已提交
761 762
}

763
void nfs4_unhash_stid(struct nfs4_stid *s)
J
J. Bruce Fields 已提交
764
{
J
J. Bruce Fields 已提交
765
	s->sc_type = 0;
J
J. Bruce Fields 已提交
766 767
}

768 769 770
static void
hash_delegation_locked(struct nfs4_delegation *dp, struct nfs4_file *fp)
{
771
	lockdep_assert_held(&state_lock);
772
	lockdep_assert_held(&fp->fi_lock);
773

774
	atomic_inc(&dp->dl_stid.sc_count);
775
	dp->dl_stid.sc_type = NFS4_DELEG_STID;
776 777 778 779
	list_add(&dp->dl_perfile, &fp->fi_delegations);
	list_add(&dp->dl_perclnt, &dp->dl_stid.sc_client->cl_delegations);
}

L
Linus Torvalds 已提交
780
static void
781
unhash_delegation_locked(struct nfs4_delegation *dp)
L
Linus Torvalds 已提交
782
{
783
	struct nfs4_file *fp = dp->dl_stid.sc_file;
784

785 786
	lockdep_assert_held(&state_lock);

787
	dp->dl_stid.sc_type = NFS4_CLOSED_DELEG_STID;
788 789
	/* Ensure that deleg break won't try to requeue it */
	++dp->dl_time;
790
	spin_lock(&fp->fi_lock);
791
	list_del_init(&dp->dl_perclnt);
L
Linus Torvalds 已提交
792
	list_del_init(&dp->dl_recall_lru);
793 794
	list_del_init(&dp->dl_perfile);
	spin_unlock(&fp->fi_lock);
795 796 797 798
}

static void destroy_delegation(struct nfs4_delegation *dp)
{
799 800 801
	spin_lock(&state_lock);
	unhash_delegation_locked(dp);
	spin_unlock(&state_lock);
802
	put_clnt_odstate(dp->dl_clnt_odstate);
803
	nfs4_put_deleg_lease(dp->dl_stid.sc_file);
804
	nfs4_put_stid(&dp->dl_stid);
805 806 807 808 809 810
}

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

811 812
	WARN_ON(!list_empty(&dp->dl_recall_lru));

813
	put_clnt_odstate(dp->dl_clnt_odstate);
814 815
	nfs4_put_deleg_lease(dp->dl_stid.sc_file);

816
	if (clp->cl_minorversion == 0)
817
		nfs4_put_stid(&dp->dl_stid);
818 819
	else {
		dp->dl_stid.sc_type = NFS4_REVOKED_DELEG_STID;
820 821 822
		spin_lock(&clp->cl_lock);
		list_add(&dp->dl_recall_lru, &clp->cl_revoked);
		spin_unlock(&clp->cl_lock);
823 824 825
	}
}

L
Linus Torvalds 已提交
826 827 828 829
/* 
 * SETCLIENTID state 
 */

830 831 832 833 834 835 836 837 838 839
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;
}

840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857
/*
 * 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.
 */
858 859
static unsigned int
bmap_to_share_mode(unsigned long bmap) {
860
	int i;
861
	unsigned int access = 0;
862 863 864

	for (i = 1; i < 4; i++) {
		if (test_bit(i, &bmap))
865
			access |= i;
866
	}
867
	return access;
868 869
}

870 871 872 873
/* set share access for a given stateid */
static inline void
set_access(u32 access, struct nfs4_ol_stateid *stp)
{
874 875 876 877
	unsigned char mask = 1 << access;

	WARN_ON_ONCE(access > NFS4_SHARE_ACCESS_BOTH);
	stp->st_access_bmap |= mask;
878 879 880 881 882 883
}

/* clear share access for a given stateid */
static inline void
clear_access(u32 access, struct nfs4_ol_stateid *stp)
{
884 885 886 887
	unsigned char mask = 1 << access;

	WARN_ON_ONCE(access > NFS4_SHARE_ACCESS_BOTH);
	stp->st_access_bmap &= ~mask;
888 889 890 891 892 893
}

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

	return (bool)(stp->st_access_bmap & mask);
897 898
}

899 900
/* set share deny for a given stateid */
static inline void
901
set_deny(u32 deny, struct nfs4_ol_stateid *stp)
902
{
903 904 905 906
	unsigned char mask = 1 << deny;

	WARN_ON_ONCE(deny > NFS4_SHARE_DENY_BOTH);
	stp->st_deny_bmap |= mask;
907 908 909 910
}

/* clear share deny for a given stateid */
static inline void
911
clear_deny(u32 deny, struct nfs4_ol_stateid *stp)
912
{
913 914 915 916
	unsigned char mask = 1 << deny;

	WARN_ON_ONCE(deny > NFS4_SHARE_DENY_BOTH);
	stp->st_deny_bmap &= ~mask;
917 918 919 920
}

/* test whether a given stateid is denying specific access */
static inline bool
921
test_deny(u32 deny, struct nfs4_ol_stateid *stp)
922
{
923 924 925
	unsigned char mask = 1 << deny;

	return (bool)(stp->st_deny_bmap & mask);
926 927 928 929
}

static int nfs4_access_to_omode(u32 access)
{
930
	switch (access & NFS4_SHARE_ACCESS_BOTH) {
931 932 933 934 935 936 937
	case NFS4_SHARE_ACCESS_READ:
		return O_RDONLY;
	case NFS4_SHARE_ACCESS_WRITE:
		return O_WRONLY;
	case NFS4_SHARE_ACCESS_BOTH:
		return O_RDWR;
	}
938 939
	WARN_ON_ONCE(1);
	return O_RDONLY;
940 941
}

942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972
/*
 * 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)
973
		recalculate_deny_mode(stp->st_stid.sc_file);
974 975
}

976 977 978 979 980
/* release all access and file references for a given stateid */
static void
release_all_access(struct nfs4_ol_stateid *stp)
{
	int i;
981
	struct nfs4_file *fp = stp->st_stid.sc_file;
982 983 984

	if (fp && stp->st_deny_bmap != 0)
		recalculate_deny_mode(fp);
985 986 987

	for (i = 1; i < 4; i++) {
		if (test_access(i, stp))
988
			nfs4_file_put_access(stp->st_stid.sc_file, i);
989 990 991 992
		clear_access(i, stp);
	}
}

993 994 995 996 997 998
static inline void nfs4_free_stateowner(struct nfs4_stateowner *sop)
{
	kfree(sop->so_owner.data);
	sop->so_ops->so_free(sop);
}

999 1000
static void nfs4_put_stateowner(struct nfs4_stateowner *sop)
{
1001 1002 1003 1004 1005
	struct nfs4_client *clp = sop->so_client;

	might_lock(&clp->cl_lock);

	if (!atomic_dec_and_lock(&sop->so_count, &clp->cl_lock))
1006
		return;
1007
	sop->so_ops->so_unhash(sop);
1008
	spin_unlock(&clp->cl_lock);
1009
	nfs4_free_stateowner(sop);
1010 1011
}

1012
static void unhash_ol_stateid(struct nfs4_ol_stateid *stp)
1013
{
1014
	struct nfs4_file *fp = stp->st_stid.sc_file;
1015

1016 1017
	lockdep_assert_held(&stp->st_stateowner->so_client->cl_lock);

1018
	spin_lock(&fp->fi_lock);
1019
	list_del(&stp->st_perfile);
1020
	spin_unlock(&fp->fi_lock);
1021 1022 1023
	list_del(&stp->st_perstateowner);
}

1024
static void nfs4_free_ol_stateid(struct nfs4_stid *stid)
1025
{
1026
	struct nfs4_ol_stateid *stp = openlockstateid(stid);
1027

1028
	put_clnt_odstate(stp->st_clnt_odstate);
1029
	release_all_access(stp);
1030 1031
	if (stp->st_stateowner)
		nfs4_put_stateowner(stp->st_stateowner);
1032
	kmem_cache_free(stateid_slab, stid);
1033 1034
}

1035
static void nfs4_free_lock_stateid(struct nfs4_stid *stid)
1036
{
1037 1038
	struct nfs4_ol_stateid *stp = openlockstateid(stid);
	struct nfs4_lockowner *lo = lockowner(stp->st_stateowner);
1039 1040
	struct file *file;

1041 1042 1043 1044 1045 1046
	file = find_any_file(stp->st_stid.sc_file);
	if (file)
		filp_close(file, (fl_owner_t)lo);
	nfs4_free_ol_stateid(stid);
}

1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070
/*
 * 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));

	if (!atomic_dec_and_test(&s->sc_count)) {
		wake_up_all(&close_wq);
		return;
	}

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

1071
static void unhash_lock_stateid(struct nfs4_ol_stateid *stp)
1072
{
1073 1074
	struct nfs4_openowner *oo = openowner(stp->st_openstp->st_stateowner);

1075 1076 1077
	lockdep_assert_held(&oo->oo_owner.so_client->cl_lock);

	list_del_init(&stp->st_locks);
1078
	unhash_ol_stateid(stp);
1079
	nfs4_unhash_stid(&stp->st_stid);
1080 1081 1082 1083 1084 1085 1086 1087
}

static void release_lock_stateid(struct nfs4_ol_stateid *stp)
{
	struct nfs4_openowner *oo = openowner(stp->st_openstp->st_stateowner);

	spin_lock(&oo->oo_owner.so_client->cl_lock);
	unhash_lock_stateid(stp);
1088
	spin_unlock(&oo->oo_owner.so_client->cl_lock);
1089
	nfs4_put_stid(&stp->st_stid);
1090 1091
}

1092
static void unhash_lockowner_locked(struct nfs4_lockowner *lo)
1093
{
1094
	struct nfs4_client *clp = lo->lo_owner.so_client;
1095

1096
	lockdep_assert_held(&clp->cl_lock);
1097

1098 1099 1100
	list_del_init(&lo->lo_owner.so_strhash);
}

1101 1102 1103 1104 1105 1106 1107 1108
/*
 * 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;
1109
	struct nfs4_file *fp;
1110 1111 1112 1113 1114 1115 1116

	might_sleep();

	while (!list_empty(reaplist)) {
		stp = list_first_entry(reaplist, struct nfs4_ol_stateid,
				       st_locks);
		list_del(&stp->st_locks);
1117
		fp = stp->st_stid.sc_file;
1118
		stp->st_stid.sc_free(&stp->st_stid);
1119 1120
		if (fp)
			put_nfs4_file(fp);
1121 1122 1123
	}
}

1124
static void release_lockowner(struct nfs4_lockowner *lo)
1125
{
1126
	struct nfs4_client *clp = lo->lo_owner.so_client;
1127
	struct nfs4_ol_stateid *stp;
1128
	struct list_head reaplist;
1129

1130
	INIT_LIST_HEAD(&reaplist);
1131

1132 1133
	spin_lock(&clp->cl_lock);
	unhash_lockowner_locked(lo);
1134 1135
	while (!list_empty(&lo->lo_owner.so_stateids)) {
		stp = list_first_entry(&lo->lo_owner.so_stateids,
1136
				struct nfs4_ol_stateid, st_perstateowner);
1137
		unhash_lock_stateid(stp);
1138
		put_ol_stateid_locked(stp, &reaplist);
1139
	}
1140
	spin_unlock(&clp->cl_lock);
1141
	free_ol_stateid_reaplist(&reaplist);
1142
	nfs4_put_stateowner(&lo->lo_owner);
1143 1144
}

1145 1146
static void release_open_stateid_locks(struct nfs4_ol_stateid *open_stp,
				       struct list_head *reaplist)
1147 1148 1149 1150 1151 1152
{
	struct nfs4_ol_stateid *stp;

	while (!list_empty(&open_stp->st_locks)) {
		stp = list_entry(open_stp->st_locks.next,
				struct nfs4_ol_stateid, st_locks);
1153 1154
		unhash_lock_stateid(stp);
		put_ol_stateid_locked(stp, reaplist);
1155 1156 1157
	}
}

1158 1159
static void unhash_open_stateid(struct nfs4_ol_stateid *stp,
				struct list_head *reaplist)
1160
{
1161 1162
	lockdep_assert_held(&stp->st_stid.sc_client->cl_lock);

1163
	unhash_ol_stateid(stp);
1164
	release_open_stateid_locks(stp, reaplist);
1165 1166 1167 1168
}

static void release_open_stateid(struct nfs4_ol_stateid *stp)
{
1169 1170 1171
	LIST_HEAD(reaplist);

	spin_lock(&stp->st_stid.sc_client->cl_lock);
1172
	unhash_open_stateid(stp, &reaplist);
1173 1174 1175
	put_ol_stateid_locked(stp, &reaplist);
	spin_unlock(&stp->st_stid.sc_client->cl_lock);
	free_ol_stateid_reaplist(&reaplist);
1176 1177
}

1178
static void unhash_openowner_locked(struct nfs4_openowner *oo)
1179
{
1180
	struct nfs4_client *clp = oo->oo_owner.so_client;
1181

1182
	lockdep_assert_held(&clp->cl_lock);
1183

1184 1185
	list_del_init(&oo->oo_owner.so_strhash);
	list_del_init(&oo->oo_perclient);
1186 1187
}

1188 1189
static void release_last_closed_stateid(struct nfs4_openowner *oo)
{
1190 1191 1192
	struct nfsd_net *nn = net_generic(oo->oo_owner.so_client->net,
					  nfsd_net_id);
	struct nfs4_ol_stateid *s;
1193

1194 1195
	spin_lock(&nn->client_lock);
	s = oo->oo_last_closed_stid;
1196
	if (s) {
1197
		list_del_init(&oo->oo_close_lru);
1198 1199
		oo->oo_last_closed_stid = NULL;
	}
1200 1201 1202
	spin_unlock(&nn->client_lock);
	if (s)
		nfs4_put_stid(&s->st_stid);
1203 1204
}

1205
static void release_openowner(struct nfs4_openowner *oo)
1206 1207
{
	struct nfs4_ol_stateid *stp;
1208
	struct nfs4_client *clp = oo->oo_owner.so_client;
1209
	struct list_head reaplist;
1210

1211
	INIT_LIST_HEAD(&reaplist);
1212

1213 1214
	spin_lock(&clp->cl_lock);
	unhash_openowner_locked(oo);
1215 1216 1217
	while (!list_empty(&oo->oo_owner.so_stateids)) {
		stp = list_first_entry(&oo->oo_owner.so_stateids,
				struct nfs4_ol_stateid, st_perstateowner);
1218
		unhash_open_stateid(stp, &reaplist);
1219
		put_ol_stateid_locked(stp, &reaplist);
1220
	}
1221
	spin_unlock(&clp->cl_lock);
1222
	free_ol_stateid_reaplist(&reaplist);
1223
	release_last_closed_stateid(oo);
1224
	nfs4_put_stateowner(&oo->oo_owner);
1225 1226
}

M
Marc Eshel 已提交
1227 1228 1229 1230 1231 1232 1233 1234
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 已提交
1235
#ifdef CONFIG_SUNRPC_DEBUG
M
Marc Eshel 已提交
1236 1237 1238 1239 1240 1241
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]);
}
1242 1243 1244 1245 1246 1247 1248
#else
static inline void
dump_sessionid(const char *fn, struct nfs4_sessionid *sessionid)
{
}
#endif

1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260
/*
 * 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))) {
1261
		nfsd4_cstate_clear_replay(cstate);
1262 1263 1264 1265 1266 1267 1268 1269 1270
		return;
	}
	if (!so)
		return;
	if (so->so_is_open_owner)
		release_last_closed_stateid(openowner(so));
	so->so_seqid++;
	return;
}
M
Marc Eshel 已提交
1271

A
Andy Adamson 已提交
1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284
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;
}

/*
1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297
 * 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)

1298 1299 1300 1301 1302 1303 1304 1305 1306
static void
free_session_slots(struct nfsd4_session *ses)
{
	int i;

	for (i = 0; i < ses->se_fchannel.maxreqs; i++)
		kfree(ses->se_slots[i]);
}

1307
/*
1308 1309 1310
 * We don't actually need to cache the rpc and session headers, so we
 * can allocate a little less for each slot:
 */
1311
static inline u32 slot_bytes(struct nfsd4_channel_attrs *ca)
1312
{
1313
	u32 size;
1314

1315 1316 1317 1318 1319
	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);
1320
}
A
Andy Adamson 已提交
1321

1322 1323
/*
 * XXX: If we run out of reserved DRC memory we could (up to a point)
1324
 * re-negotiate active sessions and reduce their slot usage to make
1325
 * room for new connections. For now we just fail the create session.
A
Andy Adamson 已提交
1326
 */
1327
static u32 nfsd4_get_drc_mem(struct nfsd4_channel_attrs *ca)
A
Andy Adamson 已提交
1328
{
1329 1330
	u32 slotsize = slot_bytes(ca);
	u32 num = ca->maxreqs;
1331
	int avail;
A
Andy Adamson 已提交
1332

1333
	spin_lock(&nfsd_drc_lock);
1334 1335
	avail = min((unsigned long)NFSD_MAX_MEM_PER_SESSION,
		    nfsd_drc_max_mem - nfsd_drc_mem_used);
1336 1337 1338
	num = min_t(int, num, avail / slotsize);
	nfsd_drc_mem_used += num * slotsize;
	spin_unlock(&nfsd_drc_lock);
A
Andy Adamson 已提交
1339

1340 1341
	return num;
}
A
Andy Adamson 已提交
1342

1343
static void nfsd4_put_drc_mem(struct nfsd4_channel_attrs *ca)
1344
{
1345 1346
	int slotsize = slot_bytes(ca);

1347
	spin_lock(&nfsd_drc_lock);
1348
	nfsd_drc_mem_used -= slotsize * ca->maxreqs;
1349
	spin_unlock(&nfsd_drc_lock);
1350
}
A
Andy Adamson 已提交
1351

1352 1353
static struct nfsd4_session *alloc_session(struct nfsd4_channel_attrs *fattrs,
					   struct nfsd4_channel_attrs *battrs)
1354
{
1355 1356
	int numslots = fattrs->maxreqs;
	int slotsize = slot_bytes(fattrs);
1357 1358
	struct nfsd4_session *new;
	int mem, i;
1359

1360 1361 1362
	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 已提交
1363

1364 1365 1366
	new = kzalloc(sizeof(*new) + mem, GFP_KERNEL);
	if (!new)
		return NULL;
1367
	/* allocate each struct nfsd4_slot and data cache in one piece */
1368
	for (i = 0; i < numslots; i++) {
1369
		new->se_slots[i] = kzalloc(slotsize, GFP_KERNEL);
1370
		if (!new->se_slots[i])
1371 1372
			goto out_free;
	}
1373 1374 1375 1376

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

1377 1378 1379 1380 1381 1382
	return new;
out_free:
	while (i--)
		kfree(new->se_slots[i]);
	kfree(new);
	return NULL;
A
Andy Adamson 已提交
1383 1384
}

1385 1386 1387 1388 1389
static void free_conn(struct nfsd4_conn *c)
{
	svc_xprt_put(c->cn_xprt);
	kfree(c);
}
A
Andy Adamson 已提交
1390

1391 1392 1393 1394
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 已提交
1395

1396 1397 1398 1399 1400
	spin_lock(&clp->cl_lock);
	if (!list_empty(&c->cn_persession)) {
		list_del(&c->cn_persession);
		free_conn(c);
	}
1401
	nfsd4_probe_callback(clp);
1402
	spin_unlock(&clp->cl_lock);
1403
}
A
Andy Adamson 已提交
1404

1405
static struct nfsd4_conn *alloc_conn(struct svc_rqst *rqstp, u32 flags)
1406 1407
{
	struct nfsd4_conn *conn;
A
Andy Adamson 已提交
1408

1409 1410
	conn = kmalloc(sizeof(struct nfsd4_conn), GFP_KERNEL);
	if (!conn)
1411
		return NULL;
1412 1413
	svc_xprt_get(rqstp->rq_xprt);
	conn->cn_xprt = rqstp->rq_xprt;
1414
	conn->cn_flags = flags;
1415 1416 1417
	INIT_LIST_HEAD(&conn->cn_xpt_user.list);
	return conn;
}
1418

1419 1420 1421 1422
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 已提交
1423 1424
}

1425
static void nfsd4_hash_conn(struct nfsd4_conn *conn, struct nfsd4_session *ses)
1426
{
1427
	struct nfs4_client *clp = ses->se_client;
1428

1429
	spin_lock(&clp->cl_lock);
1430
	__nfsd4_hash_conn(conn, ses);
1431
	spin_unlock(&clp->cl_lock);
1432 1433
}

1434
static int nfsd4_register_conn(struct nfsd4_conn *conn)
1435
{
1436
	conn->cn_xpt_user.callback = nfsd4_conn_lost;
1437
	return register_xpt_user(conn->cn_xprt, &conn->cn_xpt_user);
1438 1439
}

1440
static void nfsd4_init_conn(struct svc_rqst *rqstp, struct nfsd4_conn *conn, struct nfsd4_session *ses)
A
Andy Adamson 已提交
1441
{
1442
	int ret;
A
Andy Adamson 已提交
1443

1444
	nfsd4_hash_conn(conn, ses);
1445 1446 1447 1448
	ret = nfsd4_register_conn(conn);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&conn->cn_xpt_user);
1449 1450
	/* We may have gained or lost a callback channel: */
	nfsd4_probe_callback_sync(ses->se_client);
1451
}
A
Andy Adamson 已提交
1452

1453
static struct nfsd4_conn *alloc_conn_from_crses(struct svc_rqst *rqstp, struct nfsd4_create_session *cses)
1454 1455 1456
{
	u32 dir = NFS4_CDFC4_FORE;

1457
	if (cses->flags & SESSION4_BACK_CHAN)
1458
		dir |= NFS4_CDFC4_BACK;
1459
	return alloc_conn(rqstp, dir);
1460 1461 1462
}

/* must be called under client_lock */
1463
static void nfsd4_del_conns(struct nfsd4_session *s)
1464
{
1465 1466
	struct nfs4_client *clp = s->se_client;
	struct nfsd4_conn *c;
A
Andy Adamson 已提交
1467

1468 1469 1470 1471 1472
	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);
1473

1474 1475
		unregister_xpt_user(c->cn_xprt, &c->cn_xpt_user);
		free_conn(c);
A
Andy Adamson 已提交
1476

1477 1478 1479
		spin_lock(&clp->cl_lock);
	}
	spin_unlock(&clp->cl_lock);
1480
}
A
Andy Adamson 已提交
1481

1482 1483 1484 1485 1486 1487
static void __free_session(struct nfsd4_session *ses)
{
	free_session_slots(ses);
	kfree(ses);
}

1488
static void free_session(struct nfsd4_session *ses)
1489
{
1490
	nfsd4_del_conns(ses);
1491
	nfsd4_put_drc_mem(&ses->se_fchannel);
1492
	__free_session(ses);
1493 1494
}

1495
static void init_session(struct svc_rqst *rqstp, struct nfsd4_session *new, struct nfs4_client *clp, struct nfsd4_create_session *cses)
1496 1497
{
	int idx;
1498
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
1499

A
Andy Adamson 已提交
1500 1501 1502
	new->se_client = clp;
	gen_sessionid(new);

1503 1504
	INIT_LIST_HEAD(&new->se_conns);

1505
	new->se_cb_seq_nr = 1;
A
Andy Adamson 已提交
1506
	new->se_flags = cses->flags;
1507
	new->se_cb_prog = cses->callback_prog;
1508
	new->se_cb_sec = cses->cb_sec;
1509
	atomic_set(&new->se_ref, 0);
1510
	idx = hash_sessionid(&new->se_sessionid);
1511
	list_add(&new->se_hash, &nn->sessionid_hashtbl[idx]);
1512
	spin_lock(&clp->cl_lock);
A
Andy Adamson 已提交
1513
	list_add(&new->se_perclnt, &clp->cl_sessions);
1514
	spin_unlock(&clp->cl_lock);
1515

C
Chuck Lever 已提交
1516
	{
1517
		struct sockaddr *sa = svc_addr(rqstp);
1518 1519 1520 1521 1522 1523 1524
		/*
		 * 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:
		 */
1525 1526 1527
		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 已提交
1528 1529
}

1530
/* caller must hold client_lock */
M
Marc Eshel 已提交
1531
static struct nfsd4_session *
1532
__find_in_sessionid_hashtbl(struct nfs4_sessionid *sessionid, struct net *net)
M
Marc Eshel 已提交
1533 1534 1535
{
	struct nfsd4_session *elem;
	int idx;
1536
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
M
Marc Eshel 已提交
1537

1538 1539
	lockdep_assert_held(&nn->client_lock);

M
Marc Eshel 已提交
1540 1541 1542
	dump_sessionid(__func__, sessionid);
	idx = hash_sessionid(sessionid);
	/* Search in the appropriate list */
1543
	list_for_each_entry(elem, &nn->sessionid_hashtbl[idx], se_hash) {
M
Marc Eshel 已提交
1544 1545 1546 1547 1548 1549 1550 1551 1552 1553
		if (!memcmp(elem->se_sessionid.data, sessionid->data,
			    NFS4_MAX_SESSIONID_LEN)) {
			return elem;
		}
	}

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

1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571
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;
}

1572
/* caller must hold client_lock */
A
Andy Adamson 已提交
1573
static void
M
Marc Eshel 已提交
1574
unhash_session(struct nfsd4_session *ses)
A
Andy Adamson 已提交
1575
{
1576 1577 1578 1579 1580
	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 已提交
1581
	list_del(&ses->se_hash);
1582
	spin_lock(&ses->se_client->cl_lock);
A
Andy Adamson 已提交
1583
	list_del(&ses->se_perclnt);
1584
	spin_unlock(&ses->se_client->cl_lock);
M
Marc Eshel 已提交
1585 1586
}

L
Linus Torvalds 已提交
1587 1588
/* SETCLIENTID and SETCLIENTID_CONFIRM Helper functions */
static int
1589
STALE_CLIENTID(clientid_t *clid, struct nfsd_net *nn)
L
Linus Torvalds 已提交
1590
{
1591 1592 1593 1594 1595 1596
	/*
	 * 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 已提交
1597
		return 0;
A
Andy Adamson 已提交
1598
	dprintk("NFSD stale clientid (%08x/%08x) boot_time %08lx\n",
1599
		clid->cl_boot, clid->cl_id, nn->boot_time);
L
Linus Torvalds 已提交
1600 1601 1602 1603 1604 1605 1606 1607
	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.
 */
1608
static struct nfs4_client *alloc_client(struct xdr_netobj name)
L
Linus Torvalds 已提交
1609 1610
{
	struct nfs4_client *clp;
1611
	int i;
L
Linus Torvalds 已提交
1612

1613 1614 1615
	clp = kzalloc(sizeof(struct nfs4_client), GFP_KERNEL);
	if (clp == NULL)
		return NULL;
1616
	clp->cl_name.data = kmemdup(name.data, name.len, GFP_KERNEL);
1617 1618 1619 1620 1621 1622 1623 1624
	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]);
1625
	clp->cl_name.len = name.len;
1626 1627 1628 1629 1630 1631 1632 1633 1634
	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);
1635 1636 1637
#ifdef CONFIG_NFSD_PNFS
	INIT_LIST_HEAD(&clp->cl_lo_states);
#endif
1638 1639
	spin_lock_init(&clp->cl_lock);
	rpc_init_wait_queue(&clp->cl_cb_waitq, "Backchannel slot table");
L
Linus Torvalds 已提交
1640
	return clp;
1641 1642 1643 1644 1645
err_no_hashtbl:
	kfree(clp->cl_name.data);
err_no_name:
	kfree(clp);
	return NULL;
L
Linus Torvalds 已提交
1646 1647
}

1648
static void
L
Linus Torvalds 已提交
1649 1650
free_client(struct nfs4_client *clp)
{
1651 1652 1653 1654 1655
	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);
1656 1657
		WARN_ON_ONCE(atomic_read(&ses->se_ref));
		free_session(ses);
1658
	}
1659
	rpc_destroy_wait_queue(&clp->cl_cb_waitq);
1660
	free_svc_cred(&clp->cl_cred);
1661
	kfree(clp->cl_ownerstr_hashtbl);
L
Linus Torvalds 已提交
1662
	kfree(clp->cl_name.data);
M
majianpeng 已提交
1663
	idr_destroy(&clp->cl_stateids);
L
Linus Torvalds 已提交
1664 1665 1666
	kfree(clp);
}

B
Benny Halevy 已提交
1667
/* must be called under the client_lock */
1668
static void
B
Benny Halevy 已提交
1669 1670
unhash_client_locked(struct nfs4_client *clp)
{
1671
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
1672 1673
	struct nfsd4_session *ses;

1674 1675
	lockdep_assert_held(&nn->client_lock);

1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686
	/* 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);
1687
	spin_lock(&clp->cl_lock);
1688 1689
	list_for_each_entry(ses, &clp->cl_sessions, se_perclnt)
		list_del_init(&ses->se_hash);
1690
	spin_unlock(&clp->cl_lock);
B
Benny Halevy 已提交
1691 1692
}

L
Linus Torvalds 已提交
1693
static void
1694 1695 1696 1697 1698 1699 1700 1701 1702
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);
}

1703 1704 1705 1706 1707 1708 1709 1710
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;
}

1711 1712
static void
__destroy_client(struct nfs4_client *clp)
L
Linus Torvalds 已提交
1713
{
1714
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
1715 1716 1717 1718
	struct nfs4_delegation *dp;
	struct list_head reaplist;

	INIT_LIST_HEAD(&reaplist);
1719
	spin_lock(&state_lock);
1720 1721
	while (!list_empty(&clp->cl_delegations)) {
		dp = list_entry(clp->cl_delegations.next, struct nfs4_delegation, dl_perclnt);
1722 1723
		unhash_delegation_locked(dp);
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
1724
	}
1725
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
1726 1727
	while (!list_empty(&reaplist)) {
		dp = list_entry(reaplist.next, struct nfs4_delegation, dl_recall_lru);
1728
		list_del_init(&dp->dl_recall_lru);
1729
		put_clnt_odstate(dp->dl_clnt_odstate);
1730
		nfs4_put_deleg_lease(dp->dl_stid.sc_file);
1731
		nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
1732
	}
1733
	while (!list_empty(&clp->cl_revoked)) {
1734
		dp = list_entry(clp->cl_revoked.next, struct nfs4_delegation, dl_recall_lru);
1735
		list_del_init(&dp->dl_recall_lru);
1736
		nfs4_put_stid(&dp->dl_stid);
1737
	}
1738
	while (!list_empty(&clp->cl_openowners)) {
1739
		oo = list_entry(clp->cl_openowners.next, struct nfs4_openowner, oo_perclient);
1740
		nfs4_get_stateowner(&oo->oo_owner);
1741
		release_openowner(oo);
L
Linus Torvalds 已提交
1742
	}
1743
	nfsd4_return_all_client_layouts(clp);
1744
	nfsd4_shutdown_callback(clp);
B
Benny Halevy 已提交
1745 1746
	if (clp->cl_cb_conn.cb_xprt)
		svc_xprt_put(clp->cl_cb_conn.cb_xprt);
1747
	free_client(clp);
L
Linus Torvalds 已提交
1748 1749
}

1750 1751 1752 1753 1754 1755 1756
static void
destroy_client(struct nfs4_client *clp)
{
	unhash_client(clp);
	__destroy_client(clp);
}

1757 1758
static void expire_client(struct nfs4_client *clp)
{
1759
	unhash_client(clp);
1760
	nfsd4_client_record_remove(clp);
1761
	__destroy_client(clp);
1762 1763
}

1764 1765 1766 1767
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 已提交
1768 1769
}

1770 1771
static void copy_clid(struct nfs4_client *target, struct nfs4_client *source)
{
L
Linus Torvalds 已提交
1772 1773 1774 1775
	target->cl_clientid.cl_boot = source->cl_clientid.cl_boot; 
	target->cl_clientid.cl_id = source->cl_clientid.cl_id; 
}

1776
static int copy_cred(struct svc_cred *target, struct svc_cred *source)
1777
{
1778 1779 1780 1781 1782 1783 1784
	if (source->cr_principal) {
		target->cr_principal =
				kstrdup(source->cr_principal, GFP_KERNEL);
		if (target->cr_principal == NULL)
			return -ENOMEM;
	} else
		target->cr_principal = NULL;
1785
	target->cr_flavor = source->cr_flavor;
L
Linus Torvalds 已提交
1786 1787 1788 1789
	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);
1790 1791 1792
	target->cr_gss_mech = source->cr_gss_mech;
	if (source->cr_gss_mech)
		gss_mech_get(source->cr_gss_mech);
1793
	return 0;
L
Linus Torvalds 已提交
1794 1795
}

1796
static int
1797 1798
compare_blob(const struct xdr_netobj *o1, const struct xdr_netobj *o2)
{
1799 1800 1801 1802 1803
	if (o1->len < o2->len)
		return -1;
	if (o1->len > o2->len)
		return 1;
	return memcmp(o1->data, o2->data, o1->len);
1804 1805
}

1806
static int same_name(const char *n1, const char *n2)
1807
{
N
NeilBrown 已提交
1808
	return 0 == memcmp(n1, n2, HEXDIR_LEN);
L
Linus Torvalds 已提交
1809 1810 1811
}

static int
1812 1813 1814
same_verf(nfs4_verifier *v1, nfs4_verifier *v2)
{
	return 0 == memcmp(v1->data, v2->data, sizeof(v1->data));
L
Linus Torvalds 已提交
1815 1816 1817
}

static int
1818 1819 1820
same_clid(clientid_t *cl1, clientid_t *cl2)
{
	return (cl1->cl_boot == cl2->cl_boot) && (cl1->cl_id == cl2->cl_id);
L
Linus Torvalds 已提交
1821 1822
}

1823 1824 1825 1826 1827 1828 1829
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++)
1830
		if (!gid_eq(GROUP_AT(g1, i), GROUP_AT(g2, i)))
1831 1832 1833 1834
			return false;
	return true;
}

1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850
/*
 * 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);
}


1851
static bool
1852 1853
same_creds(struct svc_cred *cr1, struct svc_cred *cr2)
{
1854
	if ((is_gss_cred(cr1) != is_gss_cred(cr2))
1855 1856
		|| (!uid_eq(cr1->cr_uid, cr2->cr_uid))
		|| (!gid_eq(cr1->cr_gid, cr2->cr_gid))
1857 1858 1859 1860 1861 1862
		|| !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;
1863
	return 0 == strcmp(cr1->cr_principal, cr2->cr_principal);
L
Linus Torvalds 已提交
1864 1865
}

1866 1867 1868 1869 1870
static bool svc_rqst_integrity_protected(struct svc_rqst *rqstp)
{
	struct svc_cred *cr = &rqstp->rq_cred;
	u32 service;

1871 1872
	if (!cr->cr_gss_mech)
		return false;
1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892
	service = gss_pseudoflavor_to_service(cr->cr_gss_mech, cr->cr_flavor);
	return service == RPC_GSS_SVC_INTEGRITY ||
	       service == RPC_GSS_SVC_PRIVACY;
}

static bool mach_creds_match(struct nfs4_client *cl, struct svc_rqst *rqstp)
{
	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;
	if (!cr->cr_principal)
		return false;
	return 0 == strcmp(cl->cl_cred.cr_principal, cr->cr_principal);
}

1893
static void gen_confirm(struct nfs4_client *clp, struct nfsd_net *nn)
1894
{
1895
	__be32 verf[2];
L
Linus Torvalds 已提交
1896

1897 1898 1899 1900 1901
	/*
	 * This is opaque to client, so no need to byte-swap. Use
	 * __force to keep sparse happy
	 */
	verf[0] = (__force __be32)get_seconds();
1902
	verf[1] = (__force __be32)nn->clverifier_counter++;
1903
	memcpy(clp->cl_confirm.data, verf, sizeof(clp->cl_confirm.data));
L
Linus Torvalds 已提交
1904 1905
}

1906 1907 1908 1909 1910 1911 1912
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);
}

1913 1914
static struct nfs4_stid *
find_stateid_locked(struct nfs4_client *cl, stateid_t *t)
1915
{
J
J. Bruce Fields 已提交
1916 1917 1918 1919 1920 1921
	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 已提交
1922 1923
}

1924 1925
static struct nfs4_stid *
find_stateid_by_type(struct nfs4_client *cl, stateid_t *t, char typemask)
1926 1927
{
	struct nfs4_stid *s;
J
J. Bruce Fields 已提交
1928

1929 1930
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, t);
1931 1932 1933 1934 1935 1936
	if (s != NULL) {
		if (typemask & s->sc_type)
			atomic_inc(&s->sc_count);
		else
			s = NULL;
	}
1937 1938
	spin_unlock(&cl->cl_lock);
	return s;
1939 1940
}

J
Jeff Layton 已提交
1941
static struct nfs4_client *create_client(struct xdr_netobj name,
1942 1943 1944 1945
		struct svc_rqst *rqstp, nfs4_verifier *verf)
{
	struct nfs4_client *clp;
	struct sockaddr *sa = svc_addr(rqstp);
1946
	int ret;
1947
	struct net *net = SVC_NET(rqstp);
1948 1949 1950 1951 1952

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

1953 1954 1955 1956
	ret = copy_cred(&clp->cl_cred, &rqstp->rq_cred);
	if (ret) {
		free_client(clp);
		return NULL;
1957
	}
1958
	nfsd4_init_cb(&clp->cl_cb_null, clp, NULL, NFSPROC4_CLNT_CB_NULL);
B
Benny Halevy 已提交
1959
	clp->cl_time = get_seconds();
1960 1961 1962
	clear_bit(0, &clp->cl_cb_slot_busy);
	copy_verf(clp, verf);
	rpc_copy_addr((struct sockaddr *) &clp->cl_addr, sa);
1963
	clp->cl_cb_session = NULL;
1964
	clp->net = net;
1965 1966 1967
	return clp;
}

1968
static void
1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990
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)
{
1991
	int cmp;
1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009
	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 已提交
2010 2011
{
	unsigned int idhashval;
2012
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
2013

2014 2015
	lockdep_assert_held(&nn->client_lock);

2016
	clear_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
2017
	add_clp_to_name_tree(clp, &nn->unconf_name_tree);
L
Linus Torvalds 已提交
2018
	idhashval = clientid_hashval(clp->cl_clientid.cl_id);
2019
	list_add(&clp->cl_idhash, &nn->unconf_id_hashtbl[idhashval]);
2020
	renew_client_locked(clp);
L
Linus Torvalds 已提交
2021 2022
}

2023
static void
L
Linus Torvalds 已提交
2024 2025 2026
move_to_confirmed(struct nfs4_client *clp)
{
	unsigned int idhashval = clientid_hashval(clp->cl_clientid.cl_id);
2027
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
2028

2029 2030
	lockdep_assert_held(&nn->client_lock);

L
Linus Torvalds 已提交
2031
	dprintk("NFSD: move_to_confirm nfs4_client %p\n", clp);
2032
	list_move(&clp->cl_idhash, &nn->conf_id_hashtbl[idhashval]);
2033
	rb_erase(&clp->cl_namenode, &nn->unconf_name_tree);
2034
	add_clp_to_name_tree(clp, &nn->conf_name_tree);
2035
	set_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
2036
	renew_client_locked(clp);
L
Linus Torvalds 已提交
2037 2038 2039
}

static struct nfs4_client *
J
J. Bruce Fields 已提交
2040
find_client_in_id_table(struct list_head *tbl, clientid_t *clid, bool sessions)
L
Linus Torvalds 已提交
2041 2042 2043 2044
{
	struct nfs4_client *clp;
	unsigned int idhashval = clientid_hashval(clid->cl_id);

J
J. Bruce Fields 已提交
2045
	list_for_each_entry(clp, &tbl[idhashval], cl_idhash) {
2046
		if (same_clid(&clp->cl_clientid, clid)) {
2047 2048
			if ((bool)clp->cl_minorversion != sessions)
				return NULL;
2049
			renew_client_locked(clp);
L
Linus Torvalds 已提交
2050
			return clp;
2051
		}
L
Linus Torvalds 已提交
2052 2053 2054 2055
	}
	return NULL;
}

J
J. Bruce Fields 已提交
2056 2057 2058 2059 2060
static struct nfs4_client *
find_confirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
{
	struct list_head *tbl = nn->conf_id_hashtbl;

2061
	lockdep_assert_held(&nn->client_lock);
J
J. Bruce Fields 已提交
2062 2063 2064
	return find_client_in_id_table(tbl, clid, sessions);
}

L
Linus Torvalds 已提交
2065
static struct nfs4_client *
2066
find_unconfirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
L
Linus Torvalds 已提交
2067
{
J
J. Bruce Fields 已提交
2068
	struct list_head *tbl = nn->unconf_id_hashtbl;
L
Linus Torvalds 已提交
2069

2070
	lockdep_assert_held(&nn->client_lock);
J
J. Bruce Fields 已提交
2071
	return find_client_in_id_table(tbl, clid, sessions);
L
Linus Torvalds 已提交
2072 2073
}

2074
static bool clp_used_exchangeid(struct nfs4_client *clp)
2075
{
2076
	return clp->cl_exchange_flags != 0;
2077
} 
2078

2079
static struct nfs4_client *
2080
find_confirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
2081
{
2082
	lockdep_assert_held(&nn->client_lock);
2083
	return find_clp_in_name_tree(name, &nn->conf_name_tree);
2084 2085 2086
}

static struct nfs4_client *
2087
find_unconfirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
2088
{
2089
	lockdep_assert_held(&nn->client_lock);
2090
	return find_clp_in_name_tree(name, &nn->unconf_name_tree);
2091 2092
}

2093
static void
2094
gen_callback(struct nfs4_client *clp, struct nfsd4_setclientid *se, struct svc_rqst *rqstp)
L
Linus Torvalds 已提交
2095
{
2096
	struct nfs4_cb_conn *conn = &clp->cl_cb_conn;
2097 2098
	struct sockaddr	*sa = svc_addr(rqstp);
	u32 scopeid = rpc_get_scope_id(sa);
2099 2100 2101 2102 2103 2104 2105 2106 2107 2108
	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 已提交
2109 2110
		goto out_err;

2111
	conn->cb_addrlen = rpc_uaddr2sockaddr(clp->net, se->se_callback_addr_val,
2112
					    se->se_callback_addr_len,
2113 2114
					    (struct sockaddr *)&conn->cb_addr,
					    sizeof(conn->cb_addr));
2115

2116
	if (!conn->cb_addrlen || conn->cb_addr.ss_family != expected_family)
L
Linus Torvalds 已提交
2117
		goto out_err;
2118

2119 2120
	if (conn->cb_addr.ss_family == AF_INET6)
		((struct sockaddr_in6 *)&conn->cb_addr)->sin6_scope_id = scopeid;
2121

2122 2123
	conn->cb_prog = se->se_callback_prog;
	conn->cb_ident = se->se_callback_ident;
2124
	memcpy(&conn->cb_saddr, &rqstp->rq_daddr, rqstp->rq_daddrlen);
L
Linus Torvalds 已提交
2125 2126
	return;
out_err:
2127 2128
	conn->cb_addr.ss_family = AF_UNSPEC;
	conn->cb_addrlen = 0;
N
Neil Brown 已提交
2129
	dprintk(KERN_INFO "NFSD: this client (clientid %08x/%08x) "
L
Linus Torvalds 已提交
2130 2131 2132 2133 2134 2135
		"will not receive delegations\n",
		clp->cl_clientid.cl_boot, clp->cl_clientid.cl_id);

	return;
}

2136
/*
2137
 * Cache a reply. nfsd4_check_resp_size() has bounded the cache size.
2138
 */
2139
static void
2140 2141
nfsd4_store_cache_entry(struct nfsd4_compoundres *resp)
{
2142
	struct xdr_buf *buf = resp->xdr.buf;
2143 2144
	struct nfsd4_slot *slot = resp->cstate.slot;
	unsigned int base;
2145

2146
	dprintk("--> %s slot %p\n", __func__, slot);
2147

2148 2149
	slot->sl_opcnt = resp->opcnt;
	slot->sl_status = resp->cstate.status;
2150

2151
	slot->sl_flags |= NFSD4_SLOT_INITIALIZED;
2152
	if (nfsd4_not_cached(resp)) {
2153
		slot->sl_datalen = 0;
2154
		return;
2155
	}
2156 2157 2158
	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))
2159 2160
		WARN("%s: sessions DRC could not cache compound\n", __func__);
	return;
2161 2162 2163
}

/*
2164 2165 2166 2167
 * 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.
2168 2169
 *
 */
2170 2171 2172
static __be32
nfsd4_enc_sequence_replay(struct nfsd4_compoundargs *args,
			  struct nfsd4_compoundres *resp)
2173
{
2174 2175
	struct nfsd4_op *op;
	struct nfsd4_slot *slot = resp->cstate.slot;
2176

2177 2178 2179
	/* Encode the replayed sequence operation */
	op = &args->ops[resp->opcnt - 1];
	nfsd4_encode_operation(resp, op);
2180

2181
	/* Return nfserr_retry_uncached_rep in next operation. */
2182
	if (args->opcnt > 1 && !(slot->sl_flags & NFSD4_SLOT_CACHETHIS)) {
2183 2184 2185
		op = &args->ops[resp->opcnt++];
		op->status = nfserr_retry_uncached_rep;
		nfsd4_encode_operation(resp, op);
2186
	}
2187
	return op->status;
2188 2189 2190
}

/*
2191 2192
 * The sequence operation is not cached because we can use the slot and
 * session values.
2193
 */
2194
static __be32
2195 2196
nfsd4_replay_cache_entry(struct nfsd4_compoundres *resp,
			 struct nfsd4_sequence *seq)
2197
{
2198
	struct nfsd4_slot *slot = resp->cstate.slot;
2199 2200
	struct xdr_stream *xdr = &resp->xdr;
	__be32 *p;
2201 2202
	__be32 status;

2203
	dprintk("--> %s slot %p\n", __func__, slot);
2204

2205
	status = nfsd4_enc_sequence_replay(resp->rqstp->rq_argp, resp);
2206
	if (status)
2207
		return status;
2208

2209 2210 2211 2212 2213 2214 2215
	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);
2216

2217
	resp->opcnt = slot->sl_opcnt;
2218
	return slot->sl_status;
2219 2220
}

A
Andy Adamson 已提交
2221 2222 2223 2224 2225 2226
/*
 * Set the exchange_id flags returned by the server.
 */
static void
nfsd4_set_ex_flags(struct nfs4_client *new, struct nfsd4_exchange_id *clid)
{
2227 2228 2229
#ifdef CONFIG_NFSD_PNFS
	new->cl_exchange_flags |= EXCHGID4_FLAG_USE_PNFS_MDS;
#else
A
Andy Adamson 已提交
2230
	new->cl_exchange_flags |= EXCHGID4_FLAG_USE_NON_PNFS;
2231
#endif
A
Andy Adamson 已提交
2232 2233 2234 2235 2236 2237 2238 2239

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

2240 2241 2242 2243 2244 2245 2246 2247
static bool client_has_state(struct nfs4_client *clp)
{
	/*
	 * Note clp->cl_openowners check isn't quite right: there's no
	 * need to count owners without stateid's.
	 *
	 * Also note we should probably be using this in 4.0 case too.
	 */
2248
	return !list_empty(&clp->cl_openowners)
2249 2250 2251
#ifdef CONFIG_NFSD_PNFS
		|| !list_empty(&clp->cl_lo_states)
#endif
2252 2253
		|| !list_empty(&clp->cl_delegations)
		|| !list_empty(&clp->cl_sessions);
2254 2255
}

A
Andy Adamson 已提交
2256 2257 2258 2259 2260
__be32
nfsd4_exchange_id(struct svc_rqst *rqstp,
		  struct nfsd4_compound_state *cstate,
		  struct nfsd4_exchange_id *exid)
{
2261 2262
	struct nfs4_client *conf, *new;
	struct nfs4_client *unconf = NULL;
J
J. Bruce Fields 已提交
2263
	__be32 status;
2264
	char			addr_str[INET6_ADDRSTRLEN];
A
Andy Adamson 已提交
2265
	nfs4_verifier		verf = exid->verifier;
2266
	struct sockaddr		*sa = svc_addr(rqstp);
2267
	bool	update = exid->flags & EXCHGID4_FLAG_UPD_CONFIRMED_REC_A;
2268
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
2269

2270
	rpc_ntop(sa, addr_str, sizeof(addr_str));
A
Andy Adamson 已提交
2271
	dprintk("%s rqstp=%p exid=%p clname.len=%u clname.data=%p "
2272
		"ip_addr=%s flags %x, spa_how %d\n",
A
Andy Adamson 已提交
2273
		__func__, rqstp, exid, exid->clname.len, exid->clname.data,
2274
		addr_str, exid->flags, exid->spa_how);
A
Andy Adamson 已提交
2275

2276
	if (exid->flags & ~EXCHGID4_FLAG_MASK_A)
A
Andy Adamson 已提交
2277 2278 2279
		return nfserr_inval;

	switch (exid->spa_how) {
2280 2281 2282
	case SP4_MACH_CRED:
		if (!svc_rqst_integrity_protected(rqstp))
			return nfserr_inval;
A
Andy Adamson 已提交
2283 2284
	case SP4_NONE:
		break;
2285 2286
	default:				/* checked by xdr code */
		WARN_ON_ONCE(1);
A
Andy Adamson 已提交
2287
	case SP4_SSV:
2288
		return nfserr_encr_alg_unsupp;
A
Andy Adamson 已提交
2289 2290
	}

2291 2292 2293 2294
	new = create_client(exid->clname, rqstp, &verf);
	if (new == NULL)
		return nfserr_jukebox;

2295
	/* Cases below refer to rfc 5661 section 18.35.4: */
2296
	spin_lock(&nn->client_lock);
2297
	conf = find_confirmed_client_by_name(&exid->clname, nn);
A
Andy Adamson 已提交
2298
	if (conf) {
2299 2300 2301
		bool creds_match = same_creds(&conf->cl_cred, &rqstp->rq_cred);
		bool verfs_match = same_verf(&verf, &conf->cl_verifier);

2302 2303
		if (update) {
			if (!clp_used_exchangeid(conf)) { /* buggy client */
2304
				status = nfserr_inval;
2305 2306
				goto out;
			}
2307 2308 2309 2310
			if (!mach_creds_match(conf, rqstp)) {
				status = nfserr_wrong_cred;
				goto out;
			}
2311
			if (!creds_match) { /* case 9 */
2312
				status = nfserr_perm;
2313 2314 2315
				goto out;
			}
			if (!verfs_match) { /* case 8 */
A
Andy Adamson 已提交
2316 2317 2318
				status = nfserr_not_same;
				goto out;
			}
2319 2320 2321
			/* case 6 */
			exid->flags |= EXCHGID4_FLAG_CONFIRMED_R;
			goto out_copy;
A
Andy Adamson 已提交
2322
		}
2323
		if (!creds_match) { /* case 3 */
2324 2325
			if (client_has_state(conf)) {
				status = nfserr_clid_inuse;
A
Andy Adamson 已提交
2326 2327 2328 2329
				goto out;
			}
			goto out_new;
		}
2330
		if (verfs_match) { /* case 2 */
2331
			conf->cl_exchange_flags |= EXCHGID4_FLAG_CONFIRMED_R;
2332 2333 2334
			goto out_copy;
		}
		/* case 5, client reboot */
2335
		conf = NULL;
2336
		goto out_new;
2337 2338
	}

2339
	if (update) { /* case 7 */
2340 2341
		status = nfserr_noent;
		goto out;
A
Andy Adamson 已提交
2342 2343
	}

2344
	unconf  = find_unconfirmed_client_by_name(&exid->clname, nn);
2345
	if (unconf) /* case 4, possible retry or client restart */
2346
		unhash_client_locked(unconf);
A
Andy Adamson 已提交
2347

2348
	/* case 1 (normal case) */
A
Andy Adamson 已提交
2349
out_new:
2350 2351 2352 2353 2354
	if (conf) {
		status = mark_client_expired_locked(conf);
		if (status)
			goto out;
	}
2355
	new->cl_minorversion = cstate->minorversion;
2356
	new->cl_mach_cred = (exid->spa_how == SP4_MACH_CRED);
A
Andy Adamson 已提交
2357

2358
	gen_clid(new, nn);
2359
	add_to_unconfirmed(new);
2360
	swap(new, conf);
A
Andy Adamson 已提交
2361
out_copy:
2362 2363
	exid->clientid.cl_boot = conf->cl_clientid.cl_boot;
	exid->clientid.cl_id = conf->cl_clientid.cl_id;
A
Andy Adamson 已提交
2364

2365 2366
	exid->seqid = conf->cl_cs_slot.sl_seqid + 1;
	nfsd4_set_ex_flags(conf, exid);
A
Andy Adamson 已提交
2367 2368

	dprintk("nfsd4_exchange_id seqid %d flags %x\n",
2369
		conf->cl_cs_slot.sl_seqid, conf->cl_exchange_flags);
A
Andy Adamson 已提交
2370 2371 2372
	status = nfs_ok;

out:
2373
	spin_unlock(&nn->client_lock);
2374
	if (new)
2375 2376 2377
		expire_client(new);
	if (unconf)
		expire_client(unconf);
A
Andy Adamson 已提交
2378
	return status;
A
Andy Adamson 已提交
2379 2380
}

J
J. Bruce Fields 已提交
2381
static __be32
2382
check_slot_seqid(u32 seqid, u32 slot_seqid, int slot_inuse)
B
Benny Halevy 已提交
2383
{
2384 2385
	dprintk("%s enter. seqid %d slot_seqid %d\n", __func__, seqid,
		slot_seqid);
B
Benny Halevy 已提交
2386 2387

	/* The slot is in use, and no response has been sent. */
2388 2389
	if (slot_inuse) {
		if (seqid == slot_seqid)
B
Benny Halevy 已提交
2390 2391 2392 2393
			return nfserr_jukebox;
		else
			return nfserr_seq_misordered;
	}
2394
	/* Note unsigned 32-bit arithmetic handles wraparound: */
2395
	if (likely(seqid == slot_seqid + 1))
B
Benny Halevy 已提交
2396
		return nfs_ok;
2397
	if (seqid == slot_seqid)
B
Benny Halevy 已提交
2398 2399 2400 2401
		return nfserr_replay_cache;
	return nfserr_seq_misordered;
}

2402 2403 2404 2405 2406 2407 2408
/*
 * 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 已提交
2409
			   struct nfsd4_clid_slot *slot, __be32 nfserr)
2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422
{
	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;
}

2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439
#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))

2440
static __be32 check_forechannel_attrs(struct nfsd4_channel_attrs *ca, struct nfsd_net *nn)
2441
{
2442 2443
	u32 maxrpc = nn->nfsd_serv->sv_max_mesg;

2444 2445 2446 2447
	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;
2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466
	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;

2467
	return nfs_ok;
2468 2469
}

2470 2471 2472 2473 2474
#define NFSD_CB_MAX_REQ_SZ	((NFS4_enc_cb_recall_sz + \
				 RPC_MAX_HEADER_WITH_AUTH) * sizeof(__be32))
#define NFSD_CB_MAX_RESP_SZ	((NFS4_dec_cb_recall_sz + \
				 RPC_MAX_REPHEADER_WITH_AUTH) * sizeof(__be32))

2475
static __be32 check_backchannel_attrs(struct nfsd4_channel_attrs *ca)
2476
{
2477 2478 2479 2480 2481 2482 2483 2484
	ca->headerpadsz = 0;

	/*
	 * These RPC_MAX_HEADER macros are overkill, especially since we
	 * don't even do gss on the backchannel yet.  But this is still
	 * less than 1k.  Tighten up this estimate in the unlikely event
	 * it turns out to be a problem for some client:
	 */
2485
	if (ca->maxreq_sz < NFSD_CB_MAX_REQ_SZ)
2486
		return nfserr_toosmall;
2487
	if (ca->maxresp_sz < NFSD_CB_MAX_RESP_SZ)
2488 2489 2490 2491 2492 2493
		return nfserr_toosmall;
	ca->maxresp_cached = 0;
	if (ca->maxops < 2)
		return nfserr_toosmall;

	return nfs_ok;
2494 2495
}

2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513
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 已提交
2514 2515 2516 2517 2518
__be32
nfsd4_create_session(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
		     struct nfsd4_create_session *cr_ses)
{
2519
	struct sockaddr *sa = svc_addr(rqstp);
A
Andy Adamson 已提交
2520
	struct nfs4_client *conf, *unconf;
2521
	struct nfs4_client *old = NULL;
2522
	struct nfsd4_session *new;
2523
	struct nfsd4_conn *conn;
2524
	struct nfsd4_clid_slot *cs_slot = NULL;
J
J. Bruce Fields 已提交
2525
	__be32 status = 0;
2526
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
2527

2528 2529
	if (cr_ses->flags & ~SESSION4_FLAG_MASK_A)
		return nfserr_inval;
2530 2531 2532
	status = nfsd4_check_cb_sec(&cr_ses->cb_sec);
	if (status)
		return status;
2533
	status = check_forechannel_attrs(&cr_ses->fore_channel, nn);
2534 2535 2536
	if (status)
		return status;
	status = check_backchannel_attrs(&cr_ses->back_channel);
2537
	if (status)
2538
		goto out_release_drc_mem;
2539
	status = nfserr_jukebox;
2540
	new = alloc_session(&cr_ses->fore_channel, &cr_ses->back_channel);
2541 2542
	if (!new)
		goto out_release_drc_mem;
2543 2544 2545
	conn = alloc_conn_from_crses(rqstp, cr_ses);
	if (!conn)
		goto out_free_session;
2546

2547
	spin_lock(&nn->client_lock);
2548
	unconf = find_unconfirmed_client(&cr_ses->clientid, true, nn);
2549
	conf = find_confirmed_client(&cr_ses->clientid, true, nn);
2550
	WARN_ON_ONCE(conf && unconf);
A
Andy Adamson 已提交
2551 2552

	if (conf) {
2553 2554 2555
		status = nfserr_wrong_cred;
		if (!mach_creds_match(conf, rqstp))
			goto out_free_conn;
2556 2557
		cs_slot = &conf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2558 2559 2560
		if (status) {
			if (status == nfserr_replay_cache)
				status = nfsd4_replay_create_session(cr_ses, cs_slot);
2561
			goto out_free_conn;
A
Andy Adamson 已提交
2562 2563 2564
		}
	} else if (unconf) {
		if (!same_creds(&unconf->cl_cred, &rqstp->rq_cred) ||
2565
		    !rpc_cmp_addr(sa, (struct sockaddr *) &unconf->cl_addr)) {
A
Andy Adamson 已提交
2566
			status = nfserr_clid_inuse;
2567
			goto out_free_conn;
A
Andy Adamson 已提交
2568
		}
2569 2570 2571
		status = nfserr_wrong_cred;
		if (!mach_creds_match(unconf, rqstp))
			goto out_free_conn;
2572 2573
		cs_slot = &unconf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2574 2575
		if (status) {
			/* an unconfirmed replay returns misordered */
A
Andy Adamson 已提交
2576
			status = nfserr_seq_misordered;
2577
			goto out_free_conn;
A
Andy Adamson 已提交
2578
		}
2579
		old = find_confirmed_client_by_name(&unconf->cl_name, nn);
2580
		if (old) {
2581
			status = mark_client_expired_locked(old);
2582 2583
			if (status) {
				old = NULL;
2584
				goto out_free_conn;
2585
			}
2586
		}
J
J. Bruce Fields 已提交
2587
		move_to_confirmed(unconf);
A
Andy Adamson 已提交
2588 2589 2590
		conf = unconf;
	} else {
		status = nfserr_stale_clientid;
2591
		goto out_free_conn;
A
Andy Adamson 已提交
2592
	}
2593
	status = nfs_ok;
2594 2595 2596 2597 2598 2599
	/*
	 * We do not support RDMA or persistent sessions
	 */
	cr_ses->flags &= ~SESSION4_PERSIST;
	cr_ses->flags &= ~SESSION4_RDMA;

2600
	init_session(rqstp, new, conf, cr_ses);
2601
	nfsd4_get_session_locked(new);
2602

2603
	memcpy(cr_ses->sessionid.data, new->se_sessionid.data,
A
Andy Adamson 已提交
2604
	       NFS4_MAX_SESSIONID_LEN);
2605
	cs_slot->sl_seqid++;
2606
	cr_ses->seqid = cs_slot->sl_seqid;
A
Andy Adamson 已提交
2607

2608
	/* cache solo and embedded create sessions under the client_lock */
2609
	nfsd4_cache_create_session(cr_ses, cs_slot, status);
2610 2611 2612 2613 2614 2615
	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 已提交
2616
	return status;
2617
out_free_conn:
2618
	spin_unlock(&nn->client_lock);
2619
	free_conn(conn);
2620 2621
	if (old)
		expire_client(old);
2622 2623
out_free_session:
	__free_session(new);
2624 2625
out_release_drc_mem:
	nfsd4_put_drc_mem(&cr_ses->fore_channel);
J
J. Bruce Fields 已提交
2626
	return status;
A
Andy Adamson 已提交
2627 2628
}

2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642
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;
}

2643 2644 2645
__be32 nfsd4_backchannel_ctl(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_backchannel_ctl *bc)
{
	struct nfsd4_session *session = cstate->session;
2646
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2647
	__be32 status;
2648

2649 2650 2651
	status = nfsd4_check_cb_sec(&bc->bc_cb_sec);
	if (status)
		return status;
2652
	spin_lock(&nn->client_lock);
2653 2654
	session->se_cb_prog = bc->bc_cb_program;
	session->se_cb_sec = bc->bc_cb_sec;
2655
	spin_unlock(&nn->client_lock);
2656 2657 2658 2659 2660 2661

	nfsd4_probe_callback(session->se_client);

	return nfs_ok;
}

2662 2663 2664 2665 2666
__be32 nfsd4_bind_conn_to_session(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
		     struct nfsd4_bind_conn_to_session *bcts)
{
	__be32 status;
2667
	struct nfsd4_conn *conn;
2668
	struct nfsd4_session *session;
2669 2670
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
2671 2672 2673

	if (!nfsd4_last_compound_op(rqstp))
		return nfserr_not_only_op;
2674
	spin_lock(&nn->client_lock);
2675
	session = find_in_sessionid_hashtbl(&bcts->sessionid, net, &status);
2676
	spin_unlock(&nn->client_lock);
2677
	if (!session)
2678
		goto out_no_session;
2679 2680 2681
	status = nfserr_wrong_cred;
	if (!mach_creds_match(session->se_client, rqstp))
		goto out;
2682
	status = nfsd4_map_bcts_dir(&bcts->dir);
2683
	if (status)
2684
		goto out;
2685
	conn = alloc_conn(rqstp, bcts->dir);
2686
	status = nfserr_jukebox;
2687
	if (!conn)
2688 2689 2690 2691
		goto out;
	nfsd4_init_conn(rqstp, conn, session);
	status = nfs_ok;
out:
2692 2693
	nfsd4_put_session(session);
out_no_session:
2694
	return status;
2695 2696
}

2697 2698 2699 2700 2701 2702 2703
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 已提交
2704 2705 2706 2707 2708
__be32
nfsd4_destroy_session(struct svc_rqst *r,
		      struct nfsd4_compound_state *cstate,
		      struct nfsd4_destroy_session *sessionid)
{
B
Benny Halevy 已提交
2709
	struct nfsd4_session *ses;
2710
	__be32 status;
2711
	int ref_held_by_me = 0;
2712 2713
	struct net *net = SVC_NET(r);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
B
Benny Halevy 已提交
2714

2715
	status = nfserr_not_only_op;
2716
	if (nfsd4_compound_in_session(cstate->session, &sessionid->sessionid)) {
2717
		if (!nfsd4_last_compound_op(r))
2718
			goto out;
2719
		ref_held_by_me++;
2720
	}
B
Benny Halevy 已提交
2721
	dump_sessionid(__func__, &sessionid->sessionid);
2722
	spin_lock(&nn->client_lock);
2723
	ses = find_in_sessionid_hashtbl(&sessionid->sessionid, net, &status);
2724 2725
	if (!ses)
		goto out_client_lock;
2726 2727
	status = nfserr_wrong_cred;
	if (!mach_creds_match(ses->se_client, r))
2728
		goto out_put_session;
2729
	status = mark_session_dead_locked(ses, 1 + ref_held_by_me);
2730
	if (status)
2731
		goto out_put_session;
B
Benny Halevy 已提交
2732
	unhash_session(ses);
2733
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2734

2735
	nfsd4_probe_callback_sync(ses->se_client);
2736

2737
	spin_lock(&nn->client_lock);
B
Benny Halevy 已提交
2738
	status = nfs_ok;
2739
out_put_session:
2740
	nfsd4_put_session_locked(ses);
2741 2742
out_client_lock:
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2743 2744
out:
	return status;
A
Andy Adamson 已提交
2745 2746
}

2747
static struct nfsd4_conn *__nfsd4_find_conn(struct svc_xprt *xpt, struct nfsd4_session *s)
2748 2749 2750 2751
{
	struct nfsd4_conn *c;

	list_for_each_entry(c, &s->se_conns, cn_persession) {
2752
		if (c->cn_xprt == xpt) {
2753 2754 2755 2756 2757 2758
			return c;
		}
	}
	return NULL;
}

2759
static __be32 nfsd4_sequence_check_conn(struct nfsd4_conn *new, struct nfsd4_session *ses)
2760 2761
{
	struct nfs4_client *clp = ses->se_client;
2762
	struct nfsd4_conn *c;
2763
	__be32 status = nfs_ok;
2764
	int ret;
2765 2766

	spin_lock(&clp->cl_lock);
2767
	c = __nfsd4_find_conn(new->cn_xprt, ses);
2768 2769 2770 2771 2772
	if (c)
		goto out_free;
	status = nfserr_conn_not_bound_to_session;
	if (clp->cl_mach_cred)
		goto out_free;
2773 2774
	__nfsd4_hash_conn(new, ses);
	spin_unlock(&clp->cl_lock);
2775 2776 2777 2778
	ret = nfsd4_register_conn(new);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&new->cn_xpt_user);
2779 2780 2781 2782 2783
	return nfs_ok;
out_free:
	spin_unlock(&clp->cl_lock);
	free_conn(new);
	return status;
2784 2785
}

2786 2787 2788 2789 2790 2791 2792
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 已提交
2793 2794 2795 2796 2797 2798 2799 2800
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;
}

A
Andy Adamson 已提交
2801
__be32
B
Benny Halevy 已提交
2802
nfsd4_sequence(struct svc_rqst *rqstp,
A
Andy Adamson 已提交
2803 2804 2805
	       struct nfsd4_compound_state *cstate,
	       struct nfsd4_sequence *seq)
{
2806
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
2807
	struct xdr_stream *xdr = &resp->xdr;
B
Benny Halevy 已提交
2808
	struct nfsd4_session *session;
2809
	struct nfs4_client *clp;
B
Benny Halevy 已提交
2810
	struct nfsd4_slot *slot;
2811
	struct nfsd4_conn *conn;
J
J. Bruce Fields 已提交
2812
	__be32 status;
2813
	int buflen;
2814 2815
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
B
Benny Halevy 已提交
2816

2817 2818 2819
	if (resp->opcnt != 1)
		return nfserr_sequence_pos;

2820 2821 2822 2823 2824 2825 2826 2827
	/*
	 * Will be either used or freed by nfsd4_sequence_check_conn
	 * below.
	 */
	conn = alloc_conn(rqstp, NFS4_CDFC4_FORE);
	if (!conn)
		return nfserr_jukebox;

2828
	spin_lock(&nn->client_lock);
2829
	session = find_in_sessionid_hashtbl(&seq->sessionid, net, &status);
B
Benny Halevy 已提交
2830
	if (!session)
2831 2832
		goto out_no_session;
	clp = session->se_client;
B
Benny Halevy 已提交
2833

2834 2835
	status = nfserr_too_many_ops;
	if (nfsd4_session_too_many_ops(rqstp, session))
2836
		goto out_put_session;
2837

M
Mi Jinlong 已提交
2838 2839
	status = nfserr_req_too_big;
	if (nfsd4_request_too_big(rqstp, session))
2840
		goto out_put_session;
M
Mi Jinlong 已提交
2841

B
Benny Halevy 已提交
2842
	status = nfserr_badslot;
2843
	if (seq->slotid >= session->se_fchannel.maxreqs)
2844
		goto out_put_session;
B
Benny Halevy 已提交
2845

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

2849 2850 2851 2852 2853
	/* 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;

2854 2855
	status = check_slot_seqid(seq->seqid, slot->sl_seqid,
					slot->sl_flags & NFSD4_SLOT_INUSE);
B
Benny Halevy 已提交
2856
	if (status == nfserr_replay_cache) {
2857 2858
		status = nfserr_seq_misordered;
		if (!(slot->sl_flags & NFSD4_SLOT_INITIALIZED))
2859
			goto out_put_session;
B
Benny Halevy 已提交
2860 2861
		cstate->slot = slot;
		cstate->session = session;
2862
		cstate->clp = clp;
A
Andy Adamson 已提交
2863
		/* Return the cached reply status and set cstate->status
2864
		 * for nfsd4_proc_compound processing */
2865
		status = nfsd4_replay_cache_entry(resp, seq);
A
Andy Adamson 已提交
2866
		cstate->status = nfserr_replay_cache;
2867
		goto out;
B
Benny Halevy 已提交
2868 2869
	}
	if (status)
2870
		goto out_put_session;
B
Benny Halevy 已提交
2871

2872
	status = nfsd4_sequence_check_conn(conn, session);
2873
	conn = NULL;
2874 2875
	if (status)
		goto out_put_session;
2876

2877 2878 2879 2880 2881
	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;
2882
	if (xdr_restrict_buflen(xdr, buflen - rqstp->rq_auth_slack))
2883
		goto out_put_session;
2884
	svc_reserve(rqstp, buflen);
2885 2886

	status = nfs_ok;
B
Benny Halevy 已提交
2887 2888
	/* Success! bump slot seqid */
	slot->sl_seqid = seq->seqid;
2889
	slot->sl_flags |= NFSD4_SLOT_INUSE;
2890 2891
	if (seq->cachethis)
		slot->sl_flags |= NFSD4_SLOT_CACHETHIS;
2892 2893
	else
		slot->sl_flags &= ~NFSD4_SLOT_CACHETHIS;
B
Benny Halevy 已提交
2894 2895 2896

	cstate->slot = slot;
	cstate->session = session;
2897
	cstate->clp = clp;
B
Benny Halevy 已提交
2898 2899

out:
2900 2901 2902 2903 2904 2905 2906 2907 2908
	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;
2909
	}
2910 2911
	if (!list_empty(&clp->cl_revoked))
		seq->status_flags |= SEQ4_STATUS_RECALLABLE_STATE_REVOKED;
2912
out_no_session:
2913 2914
	if (conn)
		free_conn(conn);
2915
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2916
	return status;
2917
out_put_session:
2918
	nfsd4_put_session_locked(session);
2919
	goto out_no_session;
A
Andy Adamson 已提交
2920 2921
}

2922 2923 2924 2925 2926 2927 2928 2929 2930 2931
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;
		}
2932
		/* Drop session reference that was taken in nfsd4_sequence() */
2933
		nfsd4_put_session(cs->session);
2934 2935
	} else if (cs->clp)
		put_client_renew(cs->clp);
2936 2937
}

2938 2939 2940
__be32
nfsd4_destroy_clientid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_destroy_clientid *dc)
{
2941 2942
	struct nfs4_client *conf, *unconf;
	struct nfs4_client *clp = NULL;
J
J. Bruce Fields 已提交
2943
	__be32 status = 0;
2944
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2945

2946
	spin_lock(&nn->client_lock);
2947
	unconf = find_unconfirmed_client(&dc->clientid, true, nn);
2948
	conf = find_confirmed_client(&dc->clientid, true, nn);
2949
	WARN_ON_ONCE(conf && unconf);
2950 2951

	if (conf) {
2952
		if (client_has_state(conf)) {
2953 2954 2955
			status = nfserr_clientid_busy;
			goto out;
		}
2956 2957 2958
		status = mark_client_expired_locked(conf);
		if (status)
			goto out;
2959
		clp = conf;
2960 2961 2962 2963 2964 2965
	} else if (unconf)
		clp = unconf;
	else {
		status = nfserr_stale_clientid;
		goto out;
	}
2966
	if (!mach_creds_match(clp, rqstp)) {
2967
		clp = NULL;
2968 2969 2970
		status = nfserr_wrong_cred;
		goto out;
	}
2971
	unhash_client_locked(clp);
2972
out:
2973 2974 2975
	spin_unlock(&nn->client_lock);
	if (clp)
		expire_client(clp);
2976 2977 2978
	return status;
}

2979 2980 2981
__be32
nfsd4_reclaim_complete(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_reclaim_complete *rc)
{
J
J. Bruce Fields 已提交
2982
	__be32 status = 0;
2983

2984 2985 2986 2987 2988 2989 2990 2991 2992
	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.
		 */
		 return nfs_ok;
	}
2993 2994

	status = nfserr_complete_already;
2995 2996
	if (test_and_set_bit(NFSD4_CLIENT_RECLAIM_COMPLETE,
			     &cstate->session->se_client->cl_flags))
2997 2998 2999 3000
		goto out;

	status = nfserr_stale_clientid;
	if (is_client_expired(cstate->session->se_client))
3001 3002 3003 3004 3005 3006 3007
		/*
		 * 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.
		 */
3008 3009 3010
		goto out;

	status = nfs_ok;
3011
	nfsd4_client_record_create(cstate->session->se_client);
3012 3013
out:
	return status;
3014 3015
}

3016
__be32
3017 3018
nfsd4_setclientid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		  struct nfsd4_setclientid *setclid)
L
Linus Torvalds 已提交
3019
{
3020
	struct xdr_netobj 	clname = setclid->se_name;
L
Linus Torvalds 已提交
3021
	nfs4_verifier		clverifier = setclid->se_verf;
3022 3023
	struct nfs4_client	*conf, *new;
	struct nfs4_client	*unconf = NULL;
3024
	__be32 			status;
3025 3026
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

3027 3028 3029
	new = create_client(clname, rqstp, &clverifier);
	if (new == NULL)
		return nfserr_jukebox;
3030
	/* Cases below refer to rfc 3530 section 14.2.33: */
3031
	spin_lock(&nn->client_lock);
3032
	conf = find_confirmed_client_by_name(&clname, nn);
3033
	if (conf) {
3034
		/* case 0: */
L
Linus Torvalds 已提交
3035
		status = nfserr_clid_inuse;
3036 3037
		if (clp_used_exchangeid(conf))
			goto out;
3038
		if (!same_creds(&conf->cl_cred, &rqstp->rq_cred)) {
3039 3040 3041 3042 3043
			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 已提交
3044 3045 3046
			goto out;
		}
	}
3047
	unconf = find_unconfirmed_client_by_name(&clname, nn);
3048
	if (unconf)
3049
		unhash_client_locked(unconf);
3050
	if (conf && same_verf(&conf->cl_verifier, &clverifier)) {
3051
		/* case 1: probable callback update */
L
Linus Torvalds 已提交
3052
		copy_clid(new, conf);
3053 3054
		gen_confirm(new, nn);
	} else /* case 4 (new client) or cases 2, 3 (client reboot): */
3055
		gen_clid(new, nn);
3056
	new->cl_minorversion = 0;
3057
	gen_callback(new, setclid, rqstp);
3058
	add_to_unconfirmed(new);
L
Linus Torvalds 已提交
3059 3060 3061
	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));
3062
	new = NULL;
L
Linus Torvalds 已提交
3063 3064
	status = nfs_ok;
out:
3065
	spin_unlock(&nn->client_lock);
3066 3067
	if (new)
		free_client(new);
3068 3069
	if (unconf)
		expire_client(unconf);
L
Linus Torvalds 已提交
3070 3071 3072 3073
	return status;
}


3074
__be32
3075 3076 3077
nfsd4_setclientid_confirm(struct svc_rqst *rqstp,
			 struct nfsd4_compound_state *cstate,
			 struct nfsd4_setclientid_confirm *setclientid_confirm)
L
Linus Torvalds 已提交
3078
{
3079
	struct nfs4_client *conf, *unconf;
3080
	struct nfs4_client *old = NULL;
L
Linus Torvalds 已提交
3081 3082
	nfs4_verifier confirm = setclientid_confirm->sc_confirm; 
	clientid_t * clid = &setclientid_confirm->sc_clientid;
3083
	__be32 status;
3084
	struct nfsd_net	*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
3085

3086
	if (STALE_CLIENTID(clid, nn))
L
Linus Torvalds 已提交
3087
		return nfserr_stale_clientid;
3088

3089
	spin_lock(&nn->client_lock);
3090
	conf = find_confirmed_client(clid, false, nn);
3091
	unconf = find_unconfirmed_client(clid, false, nn);
3092
	/*
3093 3094 3095 3096
	 * We try hard to give out unique clientid's, so if we get an
	 * attempt to confirm the same clientid with a different cred,
	 * there's a bug somewhere.  Let's charitably assume it's our
	 * bug.
3097
	 */
3098 3099 3100 3101 3102
	status = nfserr_serverfault;
	if (unconf && !same_creds(&unconf->cl_cred, &rqstp->rq_cred))
		goto out;
	if (conf && !same_creds(&conf->cl_cred, &rqstp->rq_cred))
		goto out;
3103
	/* cases below refer to rfc 3530 section 14.2.34: */
3104 3105
	if (!unconf || !same_verf(&confirm, &unconf->cl_confirm)) {
		if (conf && !unconf) /* case 2: probable retransmit */
L
Linus Torvalds 已提交
3106
			status = nfs_ok;
3107 3108 3109 3110 3111 3112
		else /* case 4: client hasn't noticed we rebooted yet? */
			status = nfserr_stale_clientid;
		goto out;
	}
	status = nfs_ok;
	if (conf) { /* case 1: callback update */
3113 3114
		old = unconf;
		unhash_client_locked(old);
3115
		nfsd4_change_callback(conf, &unconf->cl_cb_conn);
3116
	} else { /* case 3: normal case; new or rebooted client */
3117 3118 3119
		old = find_confirmed_client_by_name(&unconf->cl_name, nn);
		if (old) {
			status = mark_client_expired_locked(old);
3120 3121
			if (status) {
				old = NULL;
3122
				goto out;
3123
			}
3124
		}
3125
		move_to_confirmed(unconf);
3126
		conf = unconf;
3127
	}
3128 3129 3130 3131 3132
	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 已提交
3133
out:
3134 3135 3136
	spin_unlock(&nn->client_lock);
	if (old)
		expire_client(old);
L
Linus Torvalds 已提交
3137 3138 3139
	return status;
}

3140 3141 3142 3143 3144
static struct nfs4_file *nfsd4_alloc_file(void)
{
	return kmem_cache_alloc(file_slab, GFP_KERNEL);
}

L
Linus Torvalds 已提交
3145
/* OPEN Share state helper functions */
3146 3147
static void nfsd4_init_file(struct knfsd_fh *fh, unsigned int hashval,
				struct nfs4_file *fp)
L
Linus Torvalds 已提交
3148
{
3149 3150
	lockdep_assert_held(&state_lock);

3151
	atomic_set(&fp->fi_ref, 1);
3152
	spin_lock_init(&fp->fi_lock);
3153 3154
	INIT_LIST_HEAD(&fp->fi_stateids);
	INIT_LIST_HEAD(&fp->fi_delegations);
3155
	INIT_LIST_HEAD(&fp->fi_clnt_odstate);
3156
	fh_copy_shallow(&fp->fi_fhandle, fh);
3157
	fp->fi_deleg_file = NULL;
3158
	fp->fi_had_conflict = false;
3159
	fp->fi_share_deny = 0;
3160 3161
	memset(fp->fi_fds, 0, sizeof(fp->fi_fds));
	memset(fp->fi_access, 0, sizeof(fp->fi_access));
3162 3163
#ifdef CONFIG_NFSD_PNFS
	INIT_LIST_HEAD(&fp->fi_lo_states);
3164
	atomic_set(&fp->fi_lo_recalls, 0);
3165
#endif
3166
	hlist_add_head_rcu(&fp->fi_hash, &file_hashtbl[hashval]);
L
Linus Torvalds 已提交
3167 3168
}

3169
void
L
Linus Torvalds 已提交
3170 3171
nfsd4_free_slabs(void)
{
3172
	kmem_cache_destroy(odstate_slab);
C
Christoph Hellwig 已提交
3173 3174 3175 3176 3177
	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 已提交
3178
}
L
Linus Torvalds 已提交
3179

3180
int
N
NeilBrown 已提交
3181 3182
nfsd4_init_slabs(void)
{
3183 3184 3185
	openowner_slab = kmem_cache_create("nfsd4_openowners",
			sizeof(struct nfs4_openowner), 0, 0, NULL);
	if (openowner_slab == NULL)
C
Christoph Hellwig 已提交
3186
		goto out;
3187
	lockowner_slab = kmem_cache_create("nfsd4_lockowners",
3188
			sizeof(struct nfs4_lockowner), 0, 0, NULL);
3189
	if (lockowner_slab == NULL)
C
Christoph Hellwig 已提交
3190
		goto out_free_openowner_slab;
N
NeilBrown 已提交
3191
	file_slab = kmem_cache_create("nfsd4_files",
3192
			sizeof(struct nfs4_file), 0, 0, NULL);
N
NeilBrown 已提交
3193
	if (file_slab == NULL)
C
Christoph Hellwig 已提交
3194
		goto out_free_lockowner_slab;
N
NeilBrown 已提交
3195
	stateid_slab = kmem_cache_create("nfsd4_stateids",
3196
			sizeof(struct nfs4_ol_stateid), 0, 0, NULL);
N
NeilBrown 已提交
3197
	if (stateid_slab == NULL)
C
Christoph Hellwig 已提交
3198
		goto out_free_file_slab;
N
NeilBrown 已提交
3199
	deleg_slab = kmem_cache_create("nfsd4_delegations",
3200
			sizeof(struct nfs4_delegation), 0, 0, NULL);
N
NeilBrown 已提交
3201
	if (deleg_slab == NULL)
C
Christoph Hellwig 已提交
3202
		goto out_free_stateid_slab;
3203 3204 3205 3206
	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 已提交
3207
	return 0;
C
Christoph Hellwig 已提交
3208

3209 3210
out_free_deleg_slab:
	kmem_cache_destroy(deleg_slab);
C
Christoph Hellwig 已提交
3211 3212 3213 3214 3215 3216 3217 3218 3219
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 已提交
3220 3221
	dprintk("nfsd4: out of memory while initializing nfsv4\n");
	return -ENOMEM;
L
Linus Torvalds 已提交
3222 3223
}

3224
static void init_nfs4_replay(struct nfs4_replay *rp)
L
Linus Torvalds 已提交
3225
{
3226 3227 3228
	rp->rp_status = nfserr_serverfault;
	rp->rp_buflen = 0;
	rp->rp_buf = rp->rp_ibuf;
3229 3230 3231 3232 3233 3234 3235 3236
	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);
3237
		cstate->replay_owner = nfs4_get_stateowner(so);
3238 3239 3240 3241 3242 3243 3244 3245 3246 3247 3248 3249
	}
}

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 已提交
3250 3251
}

3252
static inline void *alloc_stateowner(struct kmem_cache *slab, struct xdr_netobj *owner, struct nfs4_client *clp)
3253
{
L
Linus Torvalds 已提交
3254 3255
	struct nfs4_stateowner *sop;

3256
	sop = kmem_cache_alloc(slab, GFP_KERNEL);
3257 3258 3259 3260 3261
	if (!sop)
		return NULL;

	sop->so_owner.data = kmemdup(owner->data, owner->len, GFP_KERNEL);
	if (!sop->so_owner.data) {
3262
		kmem_cache_free(slab, sop);
L
Linus Torvalds 已提交
3263
		return NULL;
3264 3265 3266
	}
	sop->so_owner.len = owner->len;

3267
	INIT_LIST_HEAD(&sop->so_stateids);
3268 3269
	sop->so_client = clp;
	init_nfs4_replay(&sop->so_replay);
3270
	atomic_set(&sop->so_count, 1);
3271 3272 3273
	return sop;
}

3274
static void hash_openowner(struct nfs4_openowner *oo, struct nfs4_client *clp, unsigned int strhashval)
3275
{
3276
	lockdep_assert_held(&clp->cl_lock);
3277

3278 3279
	list_add(&oo->oo_owner.so_strhash,
		 &clp->cl_ownerstr_hashtbl[strhashval]);
3280
	list_add(&oo->oo_perclient, &clp->cl_openowners);
3281 3282
}

3283 3284
static void nfs4_unhash_openowner(struct nfs4_stateowner *so)
{
3285
	unhash_openowner_locked(openowner(so));
3286 3287
}

3288 3289 3290 3291 3292 3293 3294 3295
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 = {
3296 3297
	.so_unhash =	nfs4_unhash_openowner,
	.so_free =	nfs4_free_openowner,
3298 3299
};

3300
static struct nfs4_openowner *
3301
alloc_init_open_stateowner(unsigned int strhashval, struct nfsd4_open *open,
3302 3303
			   struct nfsd4_compound_state *cstate)
{
3304
	struct nfs4_client *clp = cstate->clp;
3305
	struct nfs4_openowner *oo, *ret;
3306

3307 3308
	oo = alloc_stateowner(openowner_slab, &open->op_owner, clp);
	if (!oo)
3309
		return NULL;
3310
	oo->oo_owner.so_ops = &openowner_ops;
3311 3312
	oo->oo_owner.so_is_open_owner = 1;
	oo->oo_owner.so_seqid = open->op_seqid;
3313
	oo->oo_flags = 0;
3314 3315
	if (nfsd4_has_session(cstate))
		oo->oo_flags |= NFS4_OO_CONFIRMED;
3316
	oo->oo_time = 0;
3317
	oo->oo_last_closed_stid = NULL;
3318
	INIT_LIST_HEAD(&oo->oo_close_lru);
3319 3320
	spin_lock(&clp->cl_lock);
	ret = find_openstateowner_str_locked(strhashval, open, clp);
3321 3322 3323 3324
	if (ret == NULL) {
		hash_openowner(oo, clp, strhashval);
		ret = oo;
	} else
3325 3326
		nfs4_free_stateowner(&oo->oo_owner);

3327
	spin_unlock(&clp->cl_lock);
3328
	return ret;
L
Linus Torvalds 已提交
3329 3330
}

3331
static void init_open_stateid(struct nfs4_ol_stateid *stp, struct nfs4_file *fp, struct nfsd4_open *open) {
3332
	struct nfs4_openowner *oo = open->op_openowner;
L
Linus Torvalds 已提交
3333

3334
	atomic_inc(&stp->st_stid.sc_count);
J
J. Bruce Fields 已提交
3335
	stp->st_stid.sc_type = NFS4_OPEN_STID;
3336
	INIT_LIST_HEAD(&stp->st_locks);
3337
	stp->st_stateowner = nfs4_get_stateowner(&oo->oo_owner);
3338
	get_nfs4_file(fp);
3339
	stp->st_stid.sc_file = fp;
L
Linus Torvalds 已提交
3340 3341
	stp->st_access_bmap = 0;
	stp->st_deny_bmap = 0;
3342
	stp->st_openstp = NULL;
3343 3344
	spin_lock(&oo->oo_owner.so_client->cl_lock);
	list_add(&stp->st_perstateowner, &oo->oo_owner.so_stateids);
3345 3346 3347
	spin_lock(&fp->fi_lock);
	list_add(&stp->st_perfile, &fp->fi_stateids);
	spin_unlock(&fp->fi_lock);
3348
	spin_unlock(&oo->oo_owner.so_client->cl_lock);
L
Linus Torvalds 已提交
3349 3350
}

3351 3352 3353 3354 3355
/*
 * 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.
 */
3356
static void
3357
move_to_close_lru(struct nfs4_ol_stateid *s, struct net *net)
L
Linus Torvalds 已提交
3358
{
3359
	struct nfs4_ol_stateid *last;
3360 3361 3362
	struct nfs4_openowner *oo = openowner(s->st_stateowner);
	struct nfsd_net *nn = net_generic(s->st_stid.sc_client->net,
						nfsd_net_id);
3363

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

3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376
	/*
	 * 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.
	 */
	wait_event(close_wq, atomic_read(&s->st_stid.sc_count) == 2);

3377 3378 3379 3380 3381
	release_all_access(s);
	if (s->st_stid.sc_file) {
		put_nfs4_file(s->st_stid.sc_file);
		s->st_stid.sc_file = NULL;
	}
3382 3383 3384

	spin_lock(&nn->client_lock);
	last = oo->oo_last_closed_stid;
3385
	oo->oo_last_closed_stid = s;
3386
	list_move_tail(&oo->oo_close_lru, &nn->close_lru);
3387
	oo->oo_time = get_seconds();
3388 3389 3390
	spin_unlock(&nn->client_lock);
	if (last)
		nfs4_put_stid(&last->st_stid);
L
Linus Torvalds 已提交
3391 3392 3393 3394
}

/* search file_hashtbl[] for file */
static struct nfs4_file *
3395
find_file_locked(struct knfsd_fh *fh, unsigned int hashval)
L
Linus Torvalds 已提交
3396 3397 3398
{
	struct nfs4_file *fp;

3399
	hlist_for_each_entry_rcu(fp, &file_hashtbl[hashval], fi_hash) {
3400
		if (fh_match(&fp->fi_fhandle, fh)) {
3401 3402
			if (atomic_inc_not_zero(&fp->fi_ref))
				return fp;
3403
		}
L
Linus Torvalds 已提交
3404 3405 3406 3407
	}
	return NULL;
}

3408
struct nfs4_file *
3409
find_file(struct knfsd_fh *fh)
3410 3411
{
	struct nfs4_file *fp;
3412
	unsigned int hashval = file_hashval(fh);
3413

3414 3415 3416
	rcu_read_lock();
	fp = find_file_locked(fh, hashval);
	rcu_read_unlock();
3417 3418 3419 3420
	return fp;
}

static struct nfs4_file *
3421
find_or_add_file(struct nfs4_file *new, struct knfsd_fh *fh)
3422 3423
{
	struct nfs4_file *fp;
3424 3425 3426 3427 3428 3429 3430
	unsigned int hashval = file_hashval(fh);

	rcu_read_lock();
	fp = find_file_locked(fh, hashval);
	rcu_read_unlock();
	if (fp)
		return fp;
3431 3432

	spin_lock(&state_lock);
3433 3434 3435
	fp = find_file_locked(fh, hashval);
	if (likely(fp == NULL)) {
		nfsd4_init_file(fh, hashval, new);
3436 3437 3438 3439 3440 3441 3442
		fp = new;
	}
	spin_unlock(&state_lock);

	return fp;
}

L
Linus Torvalds 已提交
3443 3444 3445 3446
/*
 * Called to check deny when READ with all zero stateid or
 * WRITE with all zero or all one stateid
 */
3447
static __be32
L
Linus Torvalds 已提交
3448 3449 3450
nfs4_share_conflict(struct svc_fh *current_fh, unsigned int deny_type)
{
	struct nfs4_file *fp;
3451
	__be32 ret = nfs_ok;
L
Linus Torvalds 已提交
3452

3453
	fp = find_file(&current_fh->fh_handle);
3454
	if (!fp)
3455 3456
		return ret;
	/* Check for conflicting share reservations */
3457
	spin_lock(&fp->fi_lock);
3458 3459
	if (fp->fi_share_deny & deny_type)
		ret = nfserr_locked;
3460
	spin_unlock(&fp->fi_lock);
3461 3462
	put_nfs4_file(fp);
	return ret;
L
Linus Torvalds 已提交
3463 3464
}

3465
static void nfsd4_cb_recall_prepare(struct nfsd4_callback *cb)
L
Linus Torvalds 已提交
3466
{
3467
	struct nfs4_delegation *dp = cb_to_delegation(cb);
3468 3469
	struct nfsd_net *nn = net_generic(dp->dl_stid.sc_client->net,
					  nfsd_net_id);
3470

3471
	block_delegations(&dp->dl_stid.sc_file->fi_fhandle);
3472

3473
	/*
3474 3475 3476
	 * We can't do this in nfsd_break_deleg_cb because it is
	 * already holding inode->i_lock.
	 *
3477 3478 3479
	 * If the dl_time != 0, then we know that it has already been
	 * queued for a lease break. Don't queue it again.
	 */
3480
	spin_lock(&state_lock);
3481 3482
	if (dp->dl_time == 0) {
		dp->dl_time = get_seconds();
3483
		list_add_tail(&dp->dl_recall_lru, &nn->del_recall_lru);
3484
	}
3485 3486
	spin_unlock(&state_lock);
}
L
Linus Torvalds 已提交
3487

3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523 3524
static int nfsd4_cb_recall_done(struct nfsd4_callback *cb,
		struct rpc_task *task)
{
	struct nfs4_delegation *dp = cb_to_delegation(cb);

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

static struct nfsd4_callback_ops nfsd4_cb_recall_ops = {
	.prepare	= nfsd4_cb_recall_prepare,
	.done		= nfsd4_cb_recall_done,
	.release	= nfsd4_cb_recall_release,
};

3525 3526 3527 3528 3529 3530 3531 3532 3533
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.
	 */
3534
	atomic_inc(&dp->dl_stid.sc_count);
3535
	nfsd4_run_cb(&dp->dl_recall);
3536 3537
}

3538
/* Called from break_lease() with i_lock held. */
J
Jeff Layton 已提交
3539 3540
static bool
nfsd_break_deleg_cb(struct file_lock *fl)
3541
{
J
Jeff Layton 已提交
3542
	bool ret = false;
3543 3544
	struct nfs4_file *fp = (struct nfs4_file *)fl->fl_owner;
	struct nfs4_delegation *dp;
3545

3546 3547
	if (!fp) {
		WARN(1, "(%p)->fl_owner NULL\n", fl);
J
Jeff Layton 已提交
3548
		return ret;
3549 3550 3551
	}
	if (fp->fi_had_conflict) {
		WARN(1, "duplicate break on %p\n", fp);
J
Jeff Layton 已提交
3552
		return ret;
3553
	}
3554 3555
	/*
	 * We don't want the locks code to timeout the lease for us;
3556
	 * we'll remove it ourself if a delegation isn't returned
3557
	 * in time:
3558 3559
	 */
	fl->fl_break_time = 0;
L
Linus Torvalds 已提交
3560

3561
	spin_lock(&fp->fi_lock);
3562 3563
	fp->fi_had_conflict = true;
	/*
J
Jeff Layton 已提交
3564 3565
	 * If there are no delegations on the list, then return true
	 * so that the lease code will go ahead and delete it.
3566 3567
	 */
	if (list_empty(&fp->fi_delegations))
J
Jeff Layton 已提交
3568
		ret = true;
3569 3570 3571
	else
		list_for_each_entry(dp, &fp->fi_delegations, dl_perfile)
			nfsd_break_one_deleg(dp);
3572
	spin_unlock(&fp->fi_lock);
J
Jeff Layton 已提交
3573
	return ret;
L
Linus Torvalds 已提交
3574 3575
}

3576
static int
3577 3578
nfsd_change_deleg_cb(struct file_lock *onlist, int arg,
		     struct list_head *dispose)
L
Linus Torvalds 已提交
3579 3580
{
	if (arg & F_UNLCK)
3581
		return lease_modify(onlist, arg, dispose);
L
Linus Torvalds 已提交
3582 3583 3584 3585
	else
		return -EAGAIN;
}

3586
static const struct lock_manager_operations nfsd_lease_mng_ops = {
J
J. Bruce Fields 已提交
3587 3588
	.lm_break = nfsd_break_deleg_cb,
	.lm_change = nfsd_change_deleg_cb,
L
Linus Torvalds 已提交
3589 3590
};

3591 3592 3593 3594 3595 3596 3597 3598 3599 3600
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 已提交
3601

3602 3603 3604 3605 3606 3607 3608 3609 3610 3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623
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);
3624
	spin_lock(&nn->client_lock);
3625
	found = find_confirmed_client(clid, false, nn);
3626 3627
	if (!found) {
		spin_unlock(&nn->client_lock);
3628
		return nfserr_expired;
3629 3630 3631
	}
	atomic_inc(&found->cl_refcount);
	spin_unlock(&nn->client_lock);
3632 3633 3634 3635 3636 3637

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

3638
__be32
A
Andy Adamson 已提交
3639
nfsd4_process_open1(struct nfsd4_compound_state *cstate,
3640
		    struct nfsd4_open *open, struct nfsd_net *nn)
L
Linus Torvalds 已提交
3641 3642 3643 3644
{
	clientid_t *clientid = &open->op_clientid;
	struct nfs4_client *clp = NULL;
	unsigned int strhashval;
3645
	struct nfs4_openowner *oo = NULL;
3646
	__be32 status;
L
Linus Torvalds 已提交
3647

3648
	if (STALE_CLIENTID(&open->op_clientid, nn))
L
Linus Torvalds 已提交
3649
		return nfserr_stale_clientid;
3650 3651 3652 3653 3654 3655 3656
	/*
	 * 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 已提交
3657

3658 3659 3660 3661 3662
	status = lookup_clientid(clientid, cstate, nn);
	if (status)
		return status;
	clp = cstate->clp;

3663 3664
	strhashval = ownerstr_hashval(&open->op_owner);
	oo = find_openstateowner_str(strhashval, open, clp);
3665 3666
	open->op_openowner = oo;
	if (!oo) {
3667
		goto new_owner;
L
Linus Torvalds 已提交
3668
	}
3669
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED)) {
3670
		/* Replace unconfirmed owners without checking for replay. */
3671 3672
		release_openowner(oo);
		open->op_openowner = NULL;
3673
		goto new_owner;
3674
	}
3675 3676 3677 3678
	status = nfsd4_check_seqid(cstate, &oo->oo_owner, open->op_seqid);
	if (status)
		return status;
	goto alloc_stateid;
3679
new_owner:
3680
	oo = alloc_init_open_stateowner(strhashval, open, cstate);
3681 3682 3683
	if (oo == NULL)
		return nfserr_jukebox;
	open->op_openowner = oo;
3684
alloc_stateid:
3685
	open->op_stp = nfs4_alloc_open_stateid(clp);
3686 3687
	if (!open->op_stp)
		return nfserr_jukebox;
3688 3689 3690 3691 3692 3693 3694 3695

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

3696
	return nfs_ok;
L
Linus Torvalds 已提交
3697 3698
}

3699
static inline __be32
N
NeilBrown 已提交
3700 3701 3702 3703 3704 3705 3706 3707
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;
}

3708
static int share_access_to_flags(u32 share_access)
3709
{
3710
	return share_access == NFS4_SHARE_ACCESS_READ ? RD_STATE : WR_STATE;
3711 3712
}

3713
static struct nfs4_delegation *find_deleg_stateid(struct nfs4_client *cl, stateid_t *s)
3714
{
3715
	struct nfs4_stid *ret;
3716

3717
	ret = find_stateid_by_type(cl, s, NFS4_DELEG_STID);
3718 3719 3720
	if (!ret)
		return NULL;
	return delegstateid(ret);
3721 3722
}

3723 3724 3725 3726 3727 3728
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;
}

3729
static __be32
3730
nfs4_check_deleg(struct nfs4_client *cl, struct nfsd4_open *open,
3731 3732 3733
		struct nfs4_delegation **dp)
{
	int flags;
3734
	__be32 status = nfserr_bad_stateid;
3735
	struct nfs4_delegation *deleg;
3736

3737 3738
	deleg = find_deleg_stateid(cl, &open->op_delegate_stateid);
	if (deleg == NULL)
3739
		goto out;
3740
	flags = share_access_to_flags(open->op_share_access);
3741 3742 3743 3744 3745 3746
	status = nfs4_check_delegmode(deleg, flags);
	if (status) {
		nfs4_put_stid(&deleg->dl_stid);
		goto out;
	}
	*dp = deleg;
3747
out:
3748
	if (!nfsd4_is_deleg_cur(open))
3749 3750 3751
		return nfs_ok;
	if (status)
		return status;
3752
	open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
3753
	return nfs_ok;
3754 3755
}

3756 3757
static struct nfs4_ol_stateid *
nfsd4_find_existing_open(struct nfs4_file *fp, struct nfsd4_open *open)
L
Linus Torvalds 已提交
3758
{
3759
	struct nfs4_ol_stateid *local, *ret = NULL;
3760
	struct nfs4_openowner *oo = open->op_openowner;
L
Linus Torvalds 已提交
3761

3762
	spin_lock(&fp->fi_lock);
3763
	list_for_each_entry(local, &fp->fi_stateids, st_perfile) {
L
Linus Torvalds 已提交
3764 3765 3766
		/* ignore lock owners */
		if (local->st_stateowner->so_is_open_owner == 0)
			continue;
3767
		if (local->st_stateowner == &oo->oo_owner) {
3768
			ret = local;
3769
			atomic_inc(&ret->st_stid.sc_count);
3770
			break;
3771
		}
L
Linus Torvalds 已提交
3772
	}
3773
	spin_unlock(&fp->fi_lock);
3774
	return ret;
L
Linus Torvalds 已提交
3775 3776
}

3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787
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;
}

3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802
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);
}

3803
static __be32 nfs4_get_vfs_file(struct svc_rqst *rqstp, struct nfs4_file *fp,
3804 3805
		struct svc_fh *cur_fh, struct nfs4_ol_stateid *stp,
		struct nfsd4_open *open)
3806
{
3807
	struct file *filp = NULL;
3808
	__be32 status;
3809 3810
	int oflag = nfs4_access_to_omode(open->op_share_access);
	int access = nfs4_access_to_access(open->op_share_access);
3811
	unsigned char old_access_bmap, old_deny_bmap;
3812

3813
	spin_lock(&fp->fi_lock);
3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 3833 3834 3835 3836 3837 3838 3839 3840

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

3841
	if (!fp->fi_fds[oflag]) {
3842 3843
		spin_unlock(&fp->fi_lock);
		status = nfsd_open(rqstp, cur_fh, S_IFREG, access, &filp);
3844
		if (status)
3845
			goto out_put_access;
3846 3847 3848 3849 3850
		spin_lock(&fp->fi_lock);
		if (!fp->fi_fds[oflag]) {
			fp->fi_fds[oflag] = filp;
			filp = NULL;
		}
3851
	}
3852 3853 3854
	spin_unlock(&fp->fi_lock);
	if (filp)
		fput(filp);
3855

3856 3857 3858 3859 3860
	status = nfsd4_truncate(rqstp, cur_fh, open);
	if (status)
		goto out_put_access;
out:
	return status;
3861 3862 3863 3864 3865
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 已提交
3866 3867
}

3868
static __be32
3869
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 已提交
3870
{
3871
	__be32 status;
3872
	unsigned char old_deny_bmap = stp->st_deny_bmap;
L
Linus Torvalds 已提交
3873

3874
	if (!test_access(open->op_share_access, stp))
3875
		return nfs4_get_vfs_file(rqstp, fp, cur_fh, stp, open);
3876

3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887
	/* 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 已提交
3888 3889
		return status;

3890 3891 3892 3893 3894
	status = nfsd4_truncate(rqstp, cur_fh, open);
	if (status != nfs_ok)
		reset_union_bmap_deny(old_deny_bmap, stp);
	return status;
}
L
Linus Torvalds 已提交
3895

3896 3897 3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908
/* 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;
}

3909
static struct file_lock *nfs4_alloc_init_lease(struct nfs4_file *fp, int flag)
3910 3911 3912 3913 3914 3915 3916
{
	struct file_lock *fl;

	fl = locks_alloc_lock();
	if (!fl)
		return NULL;
	fl->fl_lmops = &nfsd_lease_mng_ops;
3917
	fl->fl_flags = FL_DELEG;
3918 3919
	fl->fl_type = flag == NFS4_OPEN_DELEGATE_READ? F_RDLCK: F_WRLCK;
	fl->fl_end = OFFSET_MAX;
3920
	fl->fl_owner = (fl_owner_t)fp;
3921 3922 3923 3924
	fl->fl_pid = current->tgid;
	return fl;
}

3925
static int nfs4_setlease(struct nfs4_delegation *dp)
3926
{
3927
	struct nfs4_file *fp = dp->dl_stid.sc_file;
3928
	struct file_lock *fl;
3929 3930
	struct file *filp;
	int status = 0;
3931

3932
	fl = nfs4_alloc_init_lease(fp, NFS4_OPEN_DELEGATE_READ);
3933 3934
	if (!fl)
		return -ENOMEM;
3935 3936 3937 3938
	filp = find_readable_file(fp);
	if (!filp) {
		/* We should always have a readable file here */
		WARN_ON_ONCE(1);
3939
		locks_free_lock(fl);
3940 3941 3942
		return -EBADF;
	}
	fl->fl_file = filp;
3943
	status = vfs_setlease(filp, fl->fl_type, &fl, NULL);
3944
	if (fl)
3945
		locks_free_lock(fl);
3946
	if (status)
3947 3948 3949 3950 3951 3952 3953 3954
		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 */
3955
	if (fp->fi_deleg_file) {
3956
		status = 0;
3957
		++fp->fi_delegees;
3958 3959 3960 3961
		hash_delegation_locked(dp, fp);
		goto out_unlock;
	}
	fp->fi_deleg_file = filp;
3962
	fp->fi_delegees = 1;
3963
	hash_delegation_locked(dp, fp);
3964
	spin_unlock(&fp->fi_lock);
3965
	spin_unlock(&state_lock);
3966
	return 0;
3967 3968 3969 3970 3971
out_unlock:
	spin_unlock(&fp->fi_lock);
	spin_unlock(&state_lock);
out_fput:
	fput(filp);
3972
	return status;
3973 3974
}

J
Jeff Layton 已提交
3975 3976
static struct nfs4_delegation *
nfs4_set_delegation(struct nfs4_client *clp, struct svc_fh *fh,
3977
		    struct nfs4_file *fp, struct nfs4_clnt_odstate *odstate)
3978
{
J
Jeff Layton 已提交
3979 3980
	int status;
	struct nfs4_delegation *dp;
3981

3982
	if (fp->fi_had_conflict)
J
Jeff Layton 已提交
3983 3984
		return ERR_PTR(-EAGAIN);

3985
	dp = alloc_init_deleg(clp, fh, odstate);
J
Jeff Layton 已提交
3986 3987 3988
	if (!dp)
		return ERR_PTR(-ENOMEM);

3989
	get_nfs4_file(fp);
3990 3991
	spin_lock(&state_lock);
	spin_lock(&fp->fi_lock);
3992
	dp->dl_stid.sc_file = fp;
3993
	if (!fp->fi_deleg_file) {
3994 3995
		spin_unlock(&fp->fi_lock);
		spin_unlock(&state_lock);
J
Jeff Layton 已提交
3996 3997
		status = nfs4_setlease(dp);
		goto out;
3998
	}
3999
	if (fp->fi_had_conflict) {
4000 4001
		status = -EAGAIN;
		goto out_unlock;
4002
	}
4003
	++fp->fi_delegees;
4004
	hash_delegation_locked(dp, fp);
J
Jeff Layton 已提交
4005
	status = 0;
4006 4007
out_unlock:
	spin_unlock(&fp->fi_lock);
4008
	spin_unlock(&state_lock);
J
Jeff Layton 已提交
4009 4010
out:
	if (status) {
4011
		put_clnt_odstate(dp->dl_clnt_odstate);
4012
		nfs4_put_stid(&dp->dl_stid);
J
Jeff Layton 已提交
4013 4014 4015
		return ERR_PTR(status);
	}
	return dp;
4016 4017
}

4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033
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:
4034
			WARN_ON_ONCE(1);
4035 4036 4037 4038
		}
	}
}

L
Linus Torvalds 已提交
4039 4040
/*
 * Attempt to hand out a delegation.
4041 4042 4043
 *
 * Note we don't support write delegations, and won't until the vfs has
 * proper support for them.
L
Linus Torvalds 已提交
4044 4045
 */
static void
4046 4047
nfs4_open_delegation(struct svc_fh *fh, struct nfsd4_open *open,
			struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4048 4049
{
	struct nfs4_delegation *dp;
4050 4051
	struct nfs4_openowner *oo = openowner(stp->st_stateowner);
	struct nfs4_client *clp = stp->st_stid.sc_client;
4052
	int cb_up;
4053
	int status = 0;
L
Linus Torvalds 已提交
4054

4055
	cb_up = nfsd4_cb_channel_good(oo->oo_owner.so_client);
4056 4057 4058
	open->op_recall = 0;
	switch (open->op_claim_type) {
		case NFS4_OPEN_CLAIM_PREVIOUS:
4059
			if (!cb_up)
4060
				open->op_recall = 1;
4061 4062
			if (open->op_delegate_type != NFS4_OPEN_DELEGATE_READ)
				goto out_no_deleg;
4063 4064
			break;
		case NFS4_OPEN_CLAIM_NULL:
4065
		case NFS4_OPEN_CLAIM_FH:
4066 4067 4068 4069
			/*
			 * Let's not give out any delegations till everyone's
			 * had the chance to reclaim theirs....
			 */
4070
			if (locks_in_grace(clp->net))
4071
				goto out_no_deleg;
4072
			if (!cb_up || !(oo->oo_flags & NFS4_OO_CONFIRMED))
4073
				goto out_no_deleg;
4074 4075 4076 4077 4078 4079 4080
			/*
			 * 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):
			 */
4081
			if (open->op_share_access & NFS4_SHARE_ACCESS_WRITE)
4082 4083 4084
				goto out_no_deleg;
			if (open->op_create == NFS4_OPEN_CREATE)
				goto out_no_deleg;
4085 4086
			break;
		default:
4087
			goto out_no_deleg;
4088
	}
4089
	dp = nfs4_set_delegation(clp, fh, stp->st_stid.sc_file, stp->st_clnt_odstate);
J
Jeff Layton 已提交
4090
	if (IS_ERR(dp))
4091
		goto out_no_deleg;
L
Linus Torvalds 已提交
4092

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

4095
	dprintk("NFSD: delegation stateid=" STATEID_FMT "\n",
4096
		STATEID_VAL(&dp->dl_stid.sc_stateid));
4097
	open->op_delegate_type = NFS4_OPEN_DELEGATE_READ;
4098
	nfs4_put_stid(&dp->dl_stid);
4099 4100
	return;
out_no_deleg:
4101 4102
	open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE;
	if (open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS &&
4103
	    open->op_delegate_type != NFS4_OPEN_DELEGATE_NONE) {
4104
		dprintk("NFSD: WARNING: refusing delegation reclaim\n");
4105 4106
		open->op_recall = 1;
	}
4107 4108 4109 4110 4111

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

4114 4115 4116 4117 4118 4119 4120 4121 4122 4123 4124 4125 4126 4127 4128 4129 4130 4131
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.
	 */
}

4132
__be32
L
Linus Torvalds 已提交
4133 4134
nfsd4_process_open2(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
{
A
Andy Adamson 已提交
4135
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
4136
	struct nfs4_client *cl = open->op_openowner->oo_owner.so_client;
L
Linus Torvalds 已提交
4137
	struct nfs4_file *fp = NULL;
4138
	struct nfs4_ol_stateid *stp = NULL;
4139
	struct nfs4_delegation *dp = NULL;
4140
	__be32 status;
L
Linus Torvalds 已提交
4141 4142 4143 4144 4145 4146

	/*
	 * 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
	 */
4147
	fp = find_or_add_file(open->op_file, &current_fh->fh_handle);
4148
	if (fp != open->op_file) {
4149
		status = nfs4_check_deleg(cl, open, &dp);
4150 4151
		if (status)
			goto out;
4152
		stp = nfsd4_find_existing_open(fp, open);
L
Linus Torvalds 已提交
4153
	} else {
4154
		open->op_file = NULL;
4155
		status = nfserr_bad_stateid;
4156
		if (nfsd4_is_deleg_cur(open))
4157
			goto out;
L
Linus Torvalds 已提交
4158 4159 4160 4161 4162 4163 4164 4165
	}

	/*
	 * OPEN the file, or upgrade an existing OPEN.
	 * If truncate fails, the OPEN fails.
	 */
	if (stp) {
		/* Stateid was found, this is an OPEN upgrade */
4166
		status = nfs4_upgrade_open(rqstp, fp, current_fh, stp, open);
L
Linus Torvalds 已提交
4167 4168 4169
		if (status)
			goto out;
	} else {
4170 4171
		stp = open->op_stp;
		open->op_stp = NULL;
4172
		init_open_stateid(stp, fp, open);
4173 4174 4175 4176 4177
		status = nfs4_get_vfs_file(rqstp, fp, current_fh, stp, open);
		if (status) {
			release_open_stateid(stp);
			goto out;
		}
4178 4179 4180 4181 4182

		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 已提交
4183
	}
4184 4185
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&open->op_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
4186

4187 4188 4189 4190 4191 4192 4193 4194
	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 已提交
4195 4196 4197 4198
	/*
	* Attempt to hand out a delegation. No error return, because the
	* OPEN succeeds even if we fail.
	*/
4199
	nfs4_open_delegation(current_fh, open, stp);
4200
nodeleg:
L
Linus Torvalds 已提交
4201 4202
	status = nfs_ok;

4203
	dprintk("%s: stateid=" STATEID_FMT "\n", __func__,
4204
		STATEID_VAL(&stp->st_stid.sc_stateid));
L
Linus Torvalds 已提交
4205
out:
4206 4207
	/* 4.1 client trying to upgrade/downgrade delegation? */
	if (open->op_delegate_type == NFS4_OPEN_DELEGATE_NONE && dp &&
4208 4209
	    open->op_deleg_want)
		nfsd4_deleg_xgrade_none_ext(open, dp);
4210

4211 4212
	if (fp)
		put_nfs4_file(fp);
4213
	if (status == 0 && open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS)
4214
		open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
L
Linus Torvalds 已提交
4215 4216 4217 4218
	/*
	* To finish the open response, we just need to set the rflags.
	*/
	open->op_rflags = NFS4_OPEN_RESULT_LOCKTYPE_POSIX;
4219
	if (!(open->op_openowner->oo_flags & NFS4_OO_CONFIRMED) &&
A
Andy Adamson 已提交
4220
	    !nfsd4_has_session(&resp->cstate))
L
Linus Torvalds 已提交
4221
		open->op_rflags |= NFS4_OPEN_RESULT_CONFIRM;
4222 4223
	if (dp)
		nfs4_put_stid(&dp->dl_stid);
4224 4225
	if (stp)
		nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
4226 4227 4228 4229

	return status;
}

4230
void nfsd4_cleanup_open_state(struct nfsd4_compound_state *cstate,
4231
			      struct nfsd4_open *open)
4232 4233
{
	if (open->op_openowner) {
4234 4235 4236 4237
		struct nfs4_stateowner *so = &open->op_openowner->oo_owner;

		nfsd4_cstate_assign_replay(cstate, so);
		nfs4_put_stateowner(so);
4238
	}
4239
	if (open->op_file)
4240
		kmem_cache_free(file_slab, open->op_file);
4241
	if (open->op_stp)
4242
		nfs4_put_stid(&open->op_stp->st_stid);
4243 4244
	if (open->op_odstate)
		kmem_cache_free(odstate_slab, open->op_odstate);
4245 4246
}

4247
__be32
4248 4249
nfsd4_renew(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
	    clientid_t *clid)
L
Linus Torvalds 已提交
4250 4251
{
	struct nfs4_client *clp;
4252
	__be32 status;
4253
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4254 4255 4256

	dprintk("process_renew(%08x/%08x): starting\n", 
			clid->cl_boot, clid->cl_id);
4257
	status = lookup_clientid(clid, cstate, nn);
4258
	if (status)
L
Linus Torvalds 已提交
4259
		goto out;
4260
	clp = cstate->clp;
L
Linus Torvalds 已提交
4261
	status = nfserr_cb_path_down;
4262
	if (!list_empty(&clp->cl_delegations)
4263
			&& clp->cl_cb_state != NFSD4_CB_UP)
L
Linus Torvalds 已提交
4264 4265 4266 4267 4268 4269
		goto out;
	status = nfs_ok;
out:
	return status;
}

4270
void
4271
nfsd4_end_grace(struct nfsd_net *nn)
4272
{
4273
	/* do nothing if grace period already ended */
4274
	if (nn->grace_ended)
4275 4276
		return;

4277
	dprintk("NFSD: end of grace period\n");
4278
	nn->grace_ended = true;
4279 4280 4281 4282 4283 4284
	/*
	 * 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.
	 *
	 */
4285
	nfsd4_record_grace_done(nn);
4286 4287 4288 4289 4290 4291 4292 4293 4294
	/*
	 * 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.)
	 */
4295
	locks_end_grace(&nn->nfsd4_manager);
4296 4297 4298 4299 4300
	/*
	 * At this point, and once lockd and/or any other containers
	 * exit their grace period, further reclaims will fail and
	 * regular locking can resume.
	 */
4301 4302
}

4303
static time_t
4304
nfs4_laundromat(struct nfsd_net *nn)
L
Linus Torvalds 已提交
4305 4306
{
	struct nfs4_client *clp;
4307
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
4308
	struct nfs4_delegation *dp;
4309
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
4310
	struct list_head *pos, *next, reaplist;
4311
	time_t cutoff = get_seconds() - nn->nfsd4_lease;
4312
	time_t t, new_timeo = nn->nfsd4_lease;
L
Linus Torvalds 已提交
4313 4314

	dprintk("NFSD: laundromat service - starting\n");
4315
	nfsd4_end_grace(nn);
4316
	INIT_LIST_HEAD(&reaplist);
4317
	spin_lock(&nn->client_lock);
4318
	list_for_each_safe(pos, next, &nn->client_lru) {
L
Linus Torvalds 已提交
4319 4320 4321
		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;
4322
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4323 4324
			break;
		}
4325
		if (mark_client_expired_locked(clp)) {
4326 4327 4328 4329
			dprintk("NFSD: client in use (clientid %08x)\n",
				clp->cl_clientid.cl_id);
			continue;
		}
4330
		list_add(&clp->cl_lru, &reaplist);
4331
	}
4332
	spin_unlock(&nn->client_lock);
4333 4334
	list_for_each_safe(pos, next, &reaplist) {
		clp = list_entry(pos, struct nfs4_client, cl_lru);
L
Linus Torvalds 已提交
4335 4336
		dprintk("NFSD: purging unused client (clientid %08x)\n",
			clp->cl_clientid.cl_id);
4337
		list_del_init(&clp->cl_lru);
L
Linus Torvalds 已提交
4338 4339
		expire_client(clp);
	}
4340
	spin_lock(&state_lock);
4341
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
4342 4343
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
		if (time_after((unsigned long)dp->dl_time, (unsigned long)cutoff)) {
4344 4345
			t = dp->dl_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4346 4347
			break;
		}
4348 4349
		unhash_delegation_locked(dp);
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
4350
	}
4351
	spin_unlock(&state_lock);
4352 4353 4354 4355
	while (!list_empty(&reaplist)) {
		dp = list_first_entry(&reaplist, struct nfs4_delegation,
					dl_recall_lru);
		list_del_init(&dp->dl_recall_lru);
4356
		revoke_delegation(dp);
L
Linus Torvalds 已提交
4357
	}
4358 4359 4360 4361 4362 4363 4364

	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)) {
4365 4366
			t = oo->oo_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
4367 4368
			break;
		}
4369 4370 4371 4372 4373 4374
		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 已提交
4375
	}
4376 4377
	spin_unlock(&nn->client_lock);

4378 4379
	new_timeo = max_t(time_t, new_timeo, NFSD_LAUNDROMAT_MINTIMEOUT);
	return new_timeo;
L
Linus Torvalds 已提交
4380 4381
}

H
Harvey Harrison 已提交
4382 4383 4384 4385
static struct workqueue_struct *laundry_wq;
static void laundromat_main(struct work_struct *);

static void
4386
laundromat_main(struct work_struct *laundry)
L
Linus Torvalds 已提交
4387 4388
{
	time_t t;
4389 4390 4391 4392
	struct delayed_work *dwork = container_of(laundry, struct delayed_work,
						  work);
	struct nfsd_net *nn = container_of(dwork, struct nfsd_net,
					   laundromat_work);
L
Linus Torvalds 已提交
4393

4394
	t = nfs4_laundromat(nn);
L
Linus Torvalds 已提交
4395
	dprintk("NFSD: laundromat_main - sleeping for %ld seconds\n", t);
4396
	queue_delayed_work(laundry_wq, &nn->laundromat_work, t*HZ);
L
Linus Torvalds 已提交
4397 4398
}

4399
static inline __be32 nfs4_check_fh(struct svc_fh *fhp, struct nfs4_stid *stp)
L
Linus Torvalds 已提交
4400
{
4401
	if (!fh_match(&fhp->fh_handle, &stp->sc_file->fi_fhandle))
4402 4403
		return nfserr_bad_stateid;
	return nfs_ok;
L
Linus Torvalds 已提交
4404 4405 4406
}

static inline int
4407
access_permit_read(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4408
{
4409 4410 4411
	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 已提交
4412 4413 4414
}

static inline int
4415
access_permit_write(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4416
{
4417 4418
	return test_access(NFS4_SHARE_ACCESS_WRITE, stp) ||
		test_access(NFS4_SHARE_ACCESS_BOTH, stp);
L
Linus Torvalds 已提交
4419 4420 4421
}

static
4422
__be32 nfs4_check_openmode(struct nfs4_ol_stateid *stp, int flags)
L
Linus Torvalds 已提交
4423
{
4424
        __be32 status = nfserr_openmode;
L
Linus Torvalds 已提交
4425

4426 4427 4428
	/* For lock stateid's, we test the parent open, not the lock: */
	if (stp->st_openstp)
		stp = stp->st_openstp;
4429
	if ((flags & WR_STATE) && !access_permit_write(stp))
L
Linus Torvalds 已提交
4430
                goto out;
4431
	if ((flags & RD_STATE) && !access_permit_read(stp))
L
Linus Torvalds 已提交
4432 4433 4434 4435 4436 4437
                goto out;
	status = nfs_ok;
out:
	return status;
}

4438
static inline __be32
4439
check_special_stateids(struct net *net, svc_fh *current_fh, stateid_t *stateid, int flags)
L
Linus Torvalds 已提交
4440
{
4441
	if (ONE_STATEID(stateid) && (flags & RD_STATE))
L
Linus Torvalds 已提交
4442
		return nfs_ok;
4443
	else if (locks_in_grace(net)) {
L
Lucas De Marchi 已提交
4444
		/* Answer in remaining cases depends on existence of
L
Linus Torvalds 已提交
4445 4446 4447 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459
		 * 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
4460
grace_disallows_io(struct net *net, struct inode *inode)
L
Linus Torvalds 已提交
4461
{
4462
	return locks_in_grace(net) && mandatory_lock(inode);
L
Linus Torvalds 已提交
4463 4464
}

4465 4466 4467
/* Returns true iff a is later than b: */
static bool stateid_generation_after(stateid_t *a, stateid_t *b)
{
J
Jim Rees 已提交
4468
	return (s32)(a->si_generation - b->si_generation) > 0;
4469 4470
}

J
J. Bruce Fields 已提交
4471
static __be32 check_stateid_generation(stateid_t *in, stateid_t *ref, bool has_session)
4472
{
A
Andy Adamson 已提交
4473 4474 4475 4476
	/*
	 * When sessions are used the stateid generation number is ignored
	 * when it is zero.
	 */
J
J. Bruce Fields 已提交
4477
	if (has_session && in->si_generation == 0)
4478 4479 4480 4481
		return nfs_ok;

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

4483
	/* If the client sends us a stateid from the future, it's buggy: */
4484
	if (stateid_generation_after(in, ref))
4485 4486
		return nfserr_bad_stateid;
	/*
4487 4488 4489 4490 4491 4492 4493 4494
	 * 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:
4495
	 */
4496
	return nfserr_old_stateid;
4497 4498
}

4499 4500 4501 4502 4503 4504 4505 4506
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;
}

4507
static __be32 nfsd4_validate_stateid(struct nfs4_client *cl, stateid_t *stateid)
4508
{
4509
	struct nfs4_stid *s;
4510
	__be32 status = nfserr_bad_stateid;
4511

4512
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid))
4513
		return status;
4514 4515 4516 4517 4518 4519 4520
	/* 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);
4521
		return status;
4522
	}
4523 4524
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, stateid);
4525
	if (!s)
4526
		goto out_unlock;
4527
	status = check_stateid_generation(stateid, &s->sc_stateid, 1);
4528
	if (status)
4529
		goto out_unlock;
4530 4531
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
4532 4533
		status = nfs_ok;
		break;
4534
	case NFS4_REVOKED_DELEG_STID:
4535 4536
		status = nfserr_deleg_revoked;
		break;
4537 4538
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
4539
		status = nfsd4_check_openowner_confirmed(openlockstateid(s));
4540
		break;
4541 4542
	default:
		printk("unknown stateid type %x\n", s->sc_type);
4543
		/* Fallthrough */
4544
	case NFS4_CLOSED_STID:
4545
	case NFS4_CLOSED_DELEG_STID:
4546
		status = nfserr_bad_stateid;
4547
	}
4548 4549 4550
out_unlock:
	spin_unlock(&cl->cl_lock);
	return status;
4551 4552
}

4553
__be32
4554 4555 4556
nfsd4_lookup_stateid(struct nfsd4_compound_state *cstate,
		     stateid_t *stateid, unsigned char typemask,
		     struct nfs4_stid **s, struct nfsd_net *nn)
4557
{
J
J. Bruce Fields 已提交
4558
	__be32 status;
4559 4560 4561

	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid))
		return nfserr_bad_stateid;
4562
	status = lookup_clientid(&stateid->si_opaque.so_clid, cstate, nn);
4563
	if (status == nfserr_stale_clientid) {
4564
		if (cstate->session)
4565
			return nfserr_bad_stateid;
4566
		return nfserr_stale_stateid;
4567
	}
J
J. Bruce Fields 已提交
4568 4569
	if (status)
		return status;
4570
	*s = find_stateid_by_type(cstate->clp, stateid, typemask);
4571 4572 4573 4574 4575
	if (!*s)
		return nfserr_bad_stateid;
	return nfs_ok;
}

4576 4577 4578
static struct file *
nfs4_find_file(struct nfs4_stid *s, int flags)
{
4579 4580 4581
	if (!s)
		return NULL;

4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609
	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);
}

4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622 4623 4624 4625 4626 4627 4628 4629 4630 4631 4632 4633 4634 4635 4636 4637 4638 4639
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 已提交
4640
/*
4641 4642
 * Checks for stateid operations
 */
4643
__be32
4644 4645 4646
nfs4_preprocess_stateid_op(struct svc_rqst *rqstp,
		struct nfsd4_compound_state *cstate, stateid_t *stateid,
		int flags, struct file **filpp, bool *tmp_file)
L
Linus Torvalds 已提交
4647
{
4648 4649
	struct svc_fh *fhp = &cstate->current_fh;
	struct inode *ino = d_inode(fhp->fh_dentry);
4650
	struct net *net = SVC_NET(rqstp);
4651
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
4652
	struct nfs4_stid *s = NULL;
4653
	__be32 status;
L
Linus Torvalds 已提交
4654 4655 4656

	if (filpp)
		*filpp = NULL;
4657 4658
	if (tmp_file)
		*tmp_file = false;
L
Linus Torvalds 已提交
4659

4660
	if (grace_disallows_io(net, ino))
L
Linus Torvalds 已提交
4661 4662
		return nfserr_grace;

4663 4664 4665 4666
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid)) {
		status = check_special_stateids(net, fhp, stateid, flags);
		goto done;
	}
L
Linus Torvalds 已提交
4667

4668
	status = nfsd4_lookup_stateid(cstate, stateid,
4669
				NFS4_DELEG_STID|NFS4_OPEN_STID|NFS4_LOCK_STID,
4670
				&s, nn);
4671
	if (status)
4672
		return status;
4673 4674
	status = check_stateid_generation(stateid, &s->sc_stateid,
			nfsd4_has_session(cstate));
4675 4676
	if (status)
		goto out;
4677

4678 4679
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
4680
		status = nfs4_check_delegmode(delegstateid(s), flags);
4681 4682 4683
		break;
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
4684
		status = nfs4_check_olstateid(fhp, openlockstateid(s), flags);
4685 4686
		break;
	default:
4687
		status = nfserr_bad_stateid;
4688 4689
		break;
	}
4690 4691 4692
	if (status)
		goto out;
	status = nfs4_check_fh(fhp, s);
4693

4694 4695 4696
done:
	if (!status && filpp)
		status = nfs4_check_file(rqstp, fhp, s, filpp, tmp_file, flags);
L
Linus Torvalds 已提交
4697
out:
4698 4699
	if (s)
		nfs4_put_stid(s);
L
Linus Torvalds 已提交
4700 4701 4702
	return status;
}

4703 4704 4705 4706 4707 4708 4709
/*
 * Test if the stateid is valid
 */
__be32
nfsd4_test_stateid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		   struct nfsd4_test_stateid *test_stateid)
{
4710 4711 4712 4713
	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)
4714 4715
		stateid->ts_id_status =
			nfsd4_validate_stateid(cl, &stateid->ts_id_stateid);
4716

4717 4718 4719
	return nfs_ok;
}

4720 4721 4722 4723 4724
__be32
nfsd4_free_stateid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		   struct nfsd4_free_stateid *free_stateid)
{
	stateid_t *stateid = &free_stateid->fr_stateid;
J
J. Bruce Fields 已提交
4725
	struct nfs4_stid *s;
4726
	struct nfs4_delegation *dp;
4727
	struct nfs4_ol_stateid *stp;
4728
	struct nfs4_client *cl = cstate->session->se_client;
J
J. Bruce Fields 已提交
4729
	__be32 ret = nfserr_bad_stateid;
4730

4731 4732
	spin_lock(&cl->cl_lock);
	s = find_stateid_locked(cl, stateid);
J
J. Bruce Fields 已提交
4733
	if (!s)
4734
		goto out_unlock;
J
J. Bruce Fields 已提交
4735 4736
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
4737
		ret = nfserr_locks_held;
4738
		break;
J
J. Bruce Fields 已提交
4739 4740 4741
	case NFS4_OPEN_STID:
		ret = check_stateid_generation(stateid, &s->sc_stateid, 1);
		if (ret)
4742 4743
			break;
		ret = nfserr_locks_held;
4744
		break;
4745 4746 4747 4748
	case NFS4_LOCK_STID:
		ret = check_stateid_generation(stateid, &s->sc_stateid, 1);
		if (ret)
			break;
4749 4750 4751 4752 4753 4754
		stp = openlockstateid(s);
		ret = nfserr_locks_held;
		if (check_for_locks(stp->st_stid.sc_file,
				    lockowner(stp->st_stateowner)))
			break;
		unhash_lock_stateid(stp);
4755
		spin_unlock(&cl->cl_lock);
4756 4757
		nfs4_put_stid(s);
		ret = nfs_ok;
4758
		goto out;
4759 4760
	case NFS4_REVOKED_DELEG_STID:
		dp = delegstateid(s);
4761 4762
		list_del_init(&dp->dl_recall_lru);
		spin_unlock(&cl->cl_lock);
4763
		nfs4_put_stid(s);
4764
		ret = nfs_ok;
4765 4766
		goto out;
	/* Default falls through and returns nfserr_bad_stateid */
4767
	}
4768 4769
out_unlock:
	spin_unlock(&cl->cl_lock);
4770 4771 4772 4773
out:
	return ret;
}

4774 4775 4776 4777 4778 4779
static inline int
setlkflg (int type)
{
	return (type == NFS4_READW_LT || type == NFS4_READ_LT) ?
		RD_STATE : WR_STATE;
}
L
Linus Torvalds 已提交
4780

4781
static __be32 nfs4_seqid_op_checks(struct nfsd4_compound_state *cstate, stateid_t *stateid, u32 seqid, struct nfs4_ol_stateid *stp)
4782 4783 4784 4785 4786 4787 4788 4789
{
	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;
4790 4791
	if (stp->st_stid.sc_type == NFS4_CLOSED_STID
		|| stp->st_stid.sc_type == NFS4_REVOKED_DELEG_STID)
4792 4793
		/*
		 * "Closed" stateid's exist *only* to return
4794 4795
		 * nfserr_replay_me from the previous step, and
		 * revoked delegations are kept only for free_stateid.
4796 4797 4798 4799 4800
		 */
		return nfserr_bad_stateid;
	status = check_stateid_generation(stateid, &stp->st_stid.sc_stateid, nfsd4_has_session(cstate));
	if (status)
		return status;
4801
	return nfs4_check_fh(current_fh, &stp->st_stid);
4802 4803
}

L
Linus Torvalds 已提交
4804 4805 4806
/* 
 * Checks for sequence id mutating operations. 
 */
4807
static __be32
4808
nfs4_preprocess_seqid_op(struct nfsd4_compound_state *cstate, u32 seqid,
4809
			 stateid_t *stateid, char typemask,
4810 4811
			 struct nfs4_ol_stateid **stpp,
			 struct nfsd_net *nn)
L
Linus Torvalds 已提交
4812
{
4813
	__be32 status;
4814
	struct nfs4_stid *s;
4815
	struct nfs4_ol_stateid *stp = NULL;
L
Linus Torvalds 已提交
4816

4817 4818
	dprintk("NFSD: %s: seqid=%d stateid = " STATEID_FMT "\n", __func__,
		seqid, STATEID_VAL(stateid));
4819

L
Linus Torvalds 已提交
4820
	*stpp = NULL;
4821
	status = nfsd4_lookup_stateid(cstate, stateid, typemask, &s, nn);
4822 4823
	if (status)
		return status;
4824
	stp = openlockstateid(s);
4825
	nfsd4_cstate_assign_replay(cstate, stp->st_stateowner);
L
Linus Torvalds 已提交
4826

4827
	status = nfs4_seqid_op_checks(cstate, stateid, seqid, stp);
4828
	if (!status)
4829
		*stpp = stp;
4830 4831
	else
		nfs4_put_stid(&stp->st_stid);
4832
	return status;
4833
}
4834

4835 4836
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)
4837 4838 4839
{
	__be32 status;
	struct nfs4_openowner *oo;
4840
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
4841

4842
	status = nfs4_preprocess_seqid_op(cstate, seqid, stateid,
4843
						NFS4_OPEN_STID, &stp, nn);
4844 4845
	if (status)
		return status;
4846 4847 4848
	oo = openowner(stp->st_stateowner);
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED)) {
		nfs4_put_stid(&stp->st_stid);
4849
		return nfserr_bad_stateid;
4850 4851
	}
	*stpp = stp;
4852
	return nfs_ok;
L
Linus Torvalds 已提交
4853 4854
}

4855
__be32
4856
nfsd4_open_confirm(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4857
		   struct nfsd4_open_confirm *oc)
L
Linus Torvalds 已提交
4858
{
4859
	__be32 status;
4860
	struct nfs4_openowner *oo;
4861
	struct nfs4_ol_stateid *stp;
4862
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4863

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

4867
	status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0);
4868 4869
	if (status)
		return status;
L
Linus Torvalds 已提交
4870

4871
	status = nfs4_preprocess_seqid_op(cstate,
4872
					oc->oc_seqid, &oc->oc_req_stateid,
4873
					NFS4_OPEN_STID, &stp, nn);
4874
	if (status)
4875
		goto out;
4876
	oo = openowner(stp->st_stateowner);
4877
	status = nfserr_bad_stateid;
4878
	if (oo->oo_flags & NFS4_OO_CONFIRMED)
4879
		goto put_stateid;
4880
	oo->oo_flags |= NFS4_OO_CONFIRMED;
4881 4882
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&oc->oc_resp_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
4883
	dprintk("NFSD: %s: success, seqid=%d stateid=" STATEID_FMT "\n",
4884
		__func__, oc->oc_seqid, STATEID_VAL(&stp->st_stid.sc_stateid));
4885

4886
	nfsd4_client_record_create(oo->oo_owner.so_client);
4887
	status = nfs_ok;
4888 4889
put_stateid:
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
4890
out:
4891
	nfsd4_bump_seqid(cstate, status);
L
Linus Torvalds 已提交
4892 4893 4894
	return status;
}

J
J. Bruce Fields 已提交
4895
static inline void nfs4_stateid_downgrade_bit(struct nfs4_ol_stateid *stp, u32 access)
L
Linus Torvalds 已提交
4896
{
4897
	if (!test_access(access, stp))
J
J. Bruce Fields 已提交
4898
		return;
4899
	nfs4_file_put_access(stp->st_stid.sc_file, access);
4900
	clear_access(access, stp);
J
J. Bruce Fields 已提交
4901
}
4902

J
J. Bruce Fields 已提交
4903 4904 4905 4906 4907 4908 4909 4910 4911 4912 4913 4914 4915 4916
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:
4917
		WARN_ON_ONCE(1);
L
Linus Torvalds 已提交
4918 4919 4920
	}
}

4921
__be32
4922 4923
nfsd4_open_downgrade(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
4924
		     struct nfsd4_open_downgrade *od)
L
Linus Torvalds 已提交
4925
{
4926
	__be32 status;
4927
	struct nfs4_ol_stateid *stp;
4928
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4929

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

4933
	/* We don't yet support WANT bits: */
4934 4935 4936
	if (od->od_deleg_want)
		dprintk("NFSD: %s: od_deleg_want=0x%x ignored\n", __func__,
			od->od_deleg_want);
L
Linus Torvalds 已提交
4937

4938
	status = nfs4_preprocess_confirmed_seqid_op(cstate, od->od_seqid,
4939
					&od->od_stateid, &stp, nn);
4940
	if (status)
L
Linus Torvalds 已提交
4941 4942
		goto out; 
	status = nfserr_inval;
4943
	if (!test_access(od->od_share_access, stp)) {
4944
		dprintk("NFSD: access not a subset of current bitmap: 0x%hhx, input access=%08x\n",
L
Linus Torvalds 已提交
4945
			stp->st_access_bmap, od->od_share_access);
4946
		goto put_stateid;
L
Linus Torvalds 已提交
4947
	}
4948
	if (!test_deny(od->od_share_deny, stp)) {
4949
		dprintk("NFSD: deny not a subset of current bitmap: 0x%hhx, input deny=%08x\n",
L
Linus Torvalds 已提交
4950
			stp->st_deny_bmap, od->od_share_deny);
4951
		goto put_stateid;
L
Linus Torvalds 已提交
4952
	}
J
J. Bruce Fields 已提交
4953
	nfs4_stateid_downgrade(stp, od->od_share_access);
L
Linus Torvalds 已提交
4954

4955
	reset_union_bmap_deny(od->od_share_deny, stp);
L
Linus Torvalds 已提交
4956

4957 4958
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&od->od_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
4959
	status = nfs_ok;
4960 4961
put_stateid:
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
4962
out:
4963
	nfsd4_bump_seqid(cstate, status);
L
Linus Torvalds 已提交
4964 4965 4966
	return status;
}

4967 4968
static void nfsd4_close_open_stateid(struct nfs4_ol_stateid *s)
{
4969
	struct nfs4_client *clp = s->st_stid.sc_client;
4970
	LIST_HEAD(reaplist);
4971

4972
	s->st_stid.sc_type = NFS4_CLOSED_STID;
4973
	spin_lock(&clp->cl_lock);
4974
	unhash_open_stateid(s, &reaplist);
4975

4976 4977 4978 4979 4980 4981 4982
	if (clp->cl_minorversion) {
		put_ol_stateid_locked(s, &reaplist);
		spin_unlock(&clp->cl_lock);
		free_ol_stateid_reaplist(&reaplist);
	} else {
		spin_unlock(&clp->cl_lock);
		free_ol_stateid_reaplist(&reaplist);
4983
		move_to_close_lru(s, clp->net);
4984
	}
4985 4986
}

L
Linus Torvalds 已提交
4987 4988 4989
/*
 * nfs4_unlock_state() called after encode
 */
4990
__be32
4991
nfsd4_close(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4992
	    struct nfsd4_close *close)
L
Linus Torvalds 已提交
4993
{
4994
	__be32 status;
4995
	struct nfs4_ol_stateid *stp;
4996 4997
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
4998

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

5002 5003 5004
	status = nfs4_preprocess_seqid_op(cstate, close->cl_seqid,
					&close->cl_stateid,
					NFS4_OPEN_STID|NFS4_CLOSED_STID,
5005
					&stp, nn);
5006
	nfsd4_bump_seqid(cstate, status);
5007
	if (status)
L
Linus Torvalds 已提交
5008
		goto out; 
5009 5010
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&close->cl_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
5011

5012
	nfsd4_close_open_stateid(stp);
5013 5014 5015

	/* put reference from nfs4_preprocess_seqid_op */
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
5016 5017 5018 5019
out:
	return status;
}

5020
__be32
5021 5022
nfsd4_delegreturn(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		  struct nfsd4_delegreturn *dr)
L
Linus Torvalds 已提交
5023
{
5024 5025
	struct nfs4_delegation *dp;
	stateid_t *stateid = &dr->dr_stateid;
5026
	struct nfs4_stid *s;
5027
	__be32 status;
5028
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
5029

5030
	if ((status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0)))
5031
		return status;
L
Linus Torvalds 已提交
5032

5033
	status = nfsd4_lookup_stateid(cstate, stateid, NFS4_DELEG_STID, &s, nn);
5034
	if (status)
5035
		goto out;
5036
	dp = delegstateid(s);
5037
	status = check_stateid_generation(stateid, &dp->dl_stid.sc_stateid, nfsd4_has_session(cstate));
5038
	if (status)
5039
		goto put_stateid;
5040

5041
	destroy_delegation(dp);
5042 5043
put_stateid:
	nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
5044 5045 5046 5047
out:
	return status;
}

B
Benny Halevy 已提交
5048 5049 5050 5051 5052 5053 5054 5055 5056 5057 5058 5059 5060 5061 5062
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;

5063
	WARN_ON_ONCE(!len);
B
Benny Halevy 已提交
5064 5065 5066 5067
	end = start + len;
	return end > start ? end - 1: NFS4_MAX_UINT64;
}

L
Linus Torvalds 已提交
5068 5069 5070 5071 5072 5073 5074 5075 5076 5077 5078 5079 5080 5081 5082 5083 5084
/*
 * 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;
}

5085 5086
static fl_owner_t
nfsd4_fl_get_owner(fl_owner_t owner)
5087
{
5088 5089 5090 5091
	struct nfs4_lockowner *lo = (struct nfs4_lockowner *)owner;

	nfs4_get_stateowner(&lo->lo_owner);
	return owner;
5092 5093
}

5094 5095
static void
nfsd4_fl_put_owner(fl_owner_t owner)
5096
{
5097
	struct nfs4_lockowner *lo = (struct nfs4_lockowner *)owner;
5098

5099
	if (lo)
5100 5101 5102
		nfs4_put_stateowner(&lo->lo_owner);
}

5103
static const struct lock_manager_operations nfsd_posix_mng_ops  = {
5104 5105
	.lm_get_owner = nfsd4_fl_get_owner,
	.lm_put_owner = nfsd4_fl_put_owner,
5106
};
L
Linus Torvalds 已提交
5107 5108 5109 5110

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

5113
	if (fl->fl_lmops == &nfsd_posix_mng_ops) {
5114 5115 5116
		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);
5117 5118 5119
		if (!deny->ld_owner.data)
			/* We just don't care that much */
			goto nevermind;
5120 5121
		deny->ld_owner.len = lo->lo_owner.so_owner.len;
		deny->ld_clientid = lo->lo_owner.so_client->cl_clientid;
5122
	} else {
5123 5124 5125
nevermind:
		deny->ld_owner.len = 0;
		deny->ld_owner.data = NULL;
5126 5127
		deny->ld_clientid.cl_boot = 0;
		deny->ld_clientid.cl_id = 0;
L
Linus Torvalds 已提交
5128 5129
	}
	deny->ld_start = fl->fl_start;
B
Benny Halevy 已提交
5130 5131
	deny->ld_length = NFS4_MAX_UINT64;
	if (fl->fl_end != NFS4_MAX_UINT64)
L
Linus Torvalds 已提交
5132 5133 5134 5135 5136 5137
		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;
}

5138
static struct nfs4_lockowner *
5139
find_lockowner_str_locked(struct nfs4_client *clp, struct xdr_netobj *owner)
L
Linus Torvalds 已提交
5140
{
5141
	unsigned int strhashval = ownerstr_hashval(owner);
5142
	struct nfs4_stateowner *so;
L
Linus Torvalds 已提交
5143

5144 5145
	lockdep_assert_held(&clp->cl_lock);

5146 5147
	list_for_each_entry(so, &clp->cl_ownerstr_hashtbl[strhashval],
			    so_strhash) {
5148 5149
		if (so->so_is_open_owner)
			continue;
5150 5151
		if (same_owner_str(so, owner))
			return lockowner(nfs4_get_stateowner(so));
L
Linus Torvalds 已提交
5152 5153 5154 5155
	}
	return NULL;
}

5156
static struct nfs4_lockowner *
5157
find_lockowner_str(struct nfs4_client *clp, struct xdr_netobj *owner)
5158 5159 5160
{
	struct nfs4_lockowner *lo;

5161
	spin_lock(&clp->cl_lock);
5162
	lo = find_lockowner_str_locked(clp, owner);
5163
	spin_unlock(&clp->cl_lock);
5164 5165 5166
	return lo;
}

5167 5168
static void nfs4_unhash_lockowner(struct nfs4_stateowner *sop)
{
5169
	unhash_lockowner_locked(lockowner(sop));
5170 5171
}

5172 5173 5174 5175 5176 5177 5178 5179
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 = {
5180 5181
	.so_unhash =	nfs4_unhash_lockowner,
	.so_free =	nfs4_free_lockowner,
5182 5183
};

L
Linus Torvalds 已提交
5184 5185 5186
/*
 * Alloc a lock owner structure.
 * Called in nfsd4_lock - therefore, OPEN and OPEN_CONFIRM (if needed) has 
L
Lucas De Marchi 已提交
5187
 * occurred. 
L
Linus Torvalds 已提交
5188
 *
5189
 * strhashval = ownerstr_hashval
L
Linus Torvalds 已提交
5190
 */
5191
static struct nfs4_lockowner *
5192 5193 5194 5195 5196
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 已提交
5197

5198 5199
	lo = alloc_stateowner(lockowner_slab, &lock->lk_new_owner, clp);
	if (!lo)
L
Linus Torvalds 已提交
5200
		return NULL;
5201 5202
	INIT_LIST_HEAD(&lo->lo_owner.so_stateids);
	lo->lo_owner.so_is_open_owner = 0;
5203
	lo->lo_owner.so_seqid = lock->lk_new_lock_seqid;
5204
	lo->lo_owner.so_ops = &lockowner_ops;
5205
	spin_lock(&clp->cl_lock);
5206
	ret = find_lockowner_str_locked(clp, &lock->lk_new_owner);
5207 5208
	if (ret == NULL) {
		list_add(&lo->lo_owner.so_strhash,
5209
			 &clp->cl_ownerstr_hashtbl[strhashval]);
5210 5211
		ret = lo;
	} else
5212 5213
		nfs4_free_stateowner(&lo->lo_owner);

5214
	spin_unlock(&clp->cl_lock);
5215
	return ret;
L
Linus Torvalds 已提交
5216 5217
}

5218 5219 5220 5221
static void
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 已提交
5222
{
5223
	struct nfs4_client *clp = lo->lo_owner.so_client;
L
Linus Torvalds 已提交
5224

5225 5226
	lockdep_assert_held(&clp->cl_lock);

5227
	atomic_inc(&stp->st_stid.sc_count);
J
J. Bruce Fields 已提交
5228
	stp->st_stid.sc_type = NFS4_LOCK_STID;
5229
	stp->st_stateowner = nfs4_get_stateowner(&lo->lo_owner);
5230
	get_nfs4_file(fp);
5231
	stp->st_stid.sc_file = fp;
5232
	stp->st_stid.sc_free = nfs4_free_lock_stateid;
J
J. Bruce Fields 已提交
5233
	stp->st_access_bmap = 0;
L
Linus Torvalds 已提交
5234
	stp->st_deny_bmap = open_stp->st_deny_bmap;
5235
	stp->st_openstp = open_stp;
5236
	list_add(&stp->st_locks, &open_stp->st_locks);
5237
	list_add(&stp->st_perstateowner, &lo->lo_owner.so_stateids);
5238 5239 5240
	spin_lock(&fp->fi_lock);
	list_add(&stp->st_perfile, &fp->fi_stateids);
	spin_unlock(&fp->fi_lock);
L
Linus Torvalds 已提交
5241 5242
}

5243 5244 5245 5246
static struct nfs4_ol_stateid *
find_lock_stateid(struct nfs4_lockowner *lo, struct nfs4_file *fp)
{
	struct nfs4_ol_stateid *lst;
5247 5248 5249
	struct nfs4_client *clp = lo->lo_owner.so_client;

	lockdep_assert_held(&clp->cl_lock);
5250 5251

	list_for_each_entry(lst, &lo->lo_owner.so_stateids, st_perstateowner) {
5252 5253
		if (lst->st_stid.sc_file == fp) {
			atomic_inc(&lst->st_stid.sc_count);
5254
			return lst;
5255
		}
5256 5257 5258 5259
	}
	return NULL;
}

5260 5261 5262 5263 5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283 5284 5285 5286 5287 5288 5289 5290 5291
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;

	spin_lock(&clp->cl_lock);
	lst = find_lock_stateid(lo, fi);
	if (lst == NULL) {
		spin_unlock(&clp->cl_lock);
		ns = nfs4_alloc_stid(clp, stateid_slab);
		if (ns == NULL)
			return NULL;

		spin_lock(&clp->cl_lock);
		lst = find_lock_stateid(lo, fi);
		if (likely(!lst)) {
			lst = openlockstateid(ns);
			init_lock_stateid(lst, lo, fi, inode, ost);
			ns = NULL;
			*new = true;
		}
	}
	spin_unlock(&clp->cl_lock);
	if (ns)
		nfs4_put_stid(ns);
	return lst;
}
5292

5293
static int
L
Linus Torvalds 已提交
5294 5295
check_lock_length(u64 offset, u64 length)
{
K
Kinglong Mee 已提交
5296 5297
	return ((length == 0) || ((length != NFS4_MAX_UINT64) &&
		(length > ~offset)));
L
Linus Torvalds 已提交
5298 5299
}

5300
static void get_lock_access(struct nfs4_ol_stateid *lock_stp, u32 access)
J
J. Bruce Fields 已提交
5301
{
5302
	struct nfs4_file *fp = lock_stp->st_stid.sc_file;
J
J. Bruce Fields 已提交
5303

5304 5305
	lockdep_assert_held(&fp->fi_lock);

5306
	if (test_access(access, lock_stp))
J
J. Bruce Fields 已提交
5307
		return;
5308
	__nfs4_file_get_access(fp, access);
5309
	set_access(access, lock_stp);
J
J. Bruce Fields 已提交
5310 5311
}

5312 5313 5314 5315 5316
static __be32
lookup_or_create_lock_state(struct nfsd4_compound_state *cstate,
			    struct nfs4_ol_stateid *ost,
			    struct nfsd4_lock *lock,
			    struct nfs4_ol_stateid **lst, bool *new)
5317
{
5318
	__be32 status;
5319
	struct nfs4_file *fi = ost->st_stid.sc_file;
5320 5321
	struct nfs4_openowner *oo = openowner(ost->st_stateowner);
	struct nfs4_client *cl = oo->oo_owner.so_client;
5322
	struct inode *inode = d_inode(cstate->current_fh.fh_dentry);
5323 5324 5325
	struct nfs4_lockowner *lo;
	unsigned int strhashval;

5326
	lo = find_lockowner_str(cl, &lock->lk_new_owner);
5327
	if (!lo) {
5328
		strhashval = ownerstr_hashval(&lock->lk_new_owner);
5329 5330 5331 5332 5333
		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 */
5334
		status = nfserr_bad_seqid;
5335 5336
		if (!cstate->minorversion &&
		    lock->lk_new_lock_seqid != lo->lo_owner.so_seqid)
5337
			goto out;
5338
	}
5339

5340
	*lst = find_or_create_lock_stateid(lo, fi, inode, ost, new);
5341
	if (*lst == NULL) {
5342 5343
		status = nfserr_jukebox;
		goto out;
5344
	}
5345 5346 5347 5348
	status = nfs_ok;
out:
	nfs4_put_stateowner(&lo->lo_owner);
	return status;
5349 5350
}

L
Linus Torvalds 已提交
5351 5352 5353
/*
 *  LOCK operation 
 */
5354
__be32
5355
nfsd4_lock(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5356
	   struct nfsd4_lock *lock)
L
Linus Torvalds 已提交
5357
{
5358 5359
	struct nfs4_openowner *open_sop = NULL;
	struct nfs4_lockowner *lock_sop = NULL;
5360
	struct nfs4_ol_stateid *lock_stp = NULL;
5361
	struct nfs4_ol_stateid *open_stp = NULL;
5362
	struct nfs4_file *fp;
5363
	struct file *filp = NULL;
5364 5365
	struct file_lock *file_lock = NULL;
	struct file_lock *conflock = NULL;
5366
	__be32 status = 0;
5367
	int lkflg;
5368
	int err;
5369
	bool new = false;
5370 5371
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
5372 5373 5374 5375 5376 5377 5378 5379

	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;

5380
	if ((status = fh_verify(rqstp, &cstate->current_fh,
M
Miklos Szeredi 已提交
5381
				S_IFREG, NFSD_MAY_LOCK))) {
A
Andy Adamson 已提交
5382 5383 5384 5385
		dprintk("NFSD: nfsd4_lock: permission denied!\n");
		return status;
	}

L
Linus Torvalds 已提交
5386
	if (lock->lk_is_new) {
5387 5388
		if (nfsd4_has_session(cstate))
			/* See rfc 5661 18.10.3: given clientid is ignored: */
5389
			memcpy(&lock->lk_new_clientid,
5390 5391 5392
				&cstate->session->se_client->cl_clientid,
				sizeof(clientid_t));

L
Linus Torvalds 已提交
5393
		status = nfserr_stale_clientid;
5394
		if (STALE_CLIENTID(&lock->lk_new_clientid, nn))
L
Linus Torvalds 已提交
5395 5396 5397
			goto out;

		/* validate and update open stateid and open seqid */
5398
		status = nfs4_preprocess_confirmed_seqid_op(cstate,
L
Linus Torvalds 已提交
5399 5400
				        lock->lk_new_open_seqid,
		                        &lock->lk_new_open_stateid,
5401
					&open_stp, nn);
5402
		if (status)
L
Linus Torvalds 已提交
5403
			goto out;
5404
		open_sop = openowner(open_stp->st_stateowner);
5405
		status = nfserr_bad_stateid;
5406
		if (!same_clid(&open_sop->oo_owner.so_client->cl_clientid,
5407
						&lock->lk_new_clientid))
5408
			goto out;
5409
		status = lookup_or_create_lock_state(cstate, open_stp, lock,
5410
							&lock_stp, &new);
5411
	} else {
5412
		status = nfs4_preprocess_seqid_op(cstate,
5413 5414
				       lock->lk_old_lock_seqid,
				       &lock->lk_old_lock_stateid,
5415
				       NFS4_LOCK_STID, &lock_stp, nn);
5416
	}
J
J. Bruce Fields 已提交
5417 5418
	if (status)
		goto out;
5419
	lock_sop = lockowner(lock_stp->st_stateowner);
L
Linus Torvalds 已提交
5420

5421 5422 5423 5424 5425
	lkflg = setlkflg(lock->lk_type);
	status = nfs4_check_openmode(lock_stp, lkflg);
	if (status)
		goto out;

5426
	status = nfserr_grace;
5427
	if (locks_in_grace(net) && !lock->lk_reclaim)
5428 5429
		goto out;
	status = nfserr_no_grace;
5430
	if (!locks_in_grace(net) && lock->lk_reclaim)
5431 5432
		goto out;

5433 5434 5435 5436 5437 5438 5439
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}

5440
	fp = lock_stp->st_stid.sc_file;
L
Linus Torvalds 已提交
5441 5442 5443
	switch (lock->lk_type) {
		case NFS4_READ_LT:
		case NFS4_READW_LT:
5444 5445
			spin_lock(&fp->fi_lock);
			filp = find_readable_file_locked(fp);
J
J. Bruce Fields 已提交
5446 5447
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_READ);
5448
			spin_unlock(&fp->fi_lock);
5449
			file_lock->fl_type = F_RDLCK;
5450
			break;
L
Linus Torvalds 已提交
5451 5452
		case NFS4_WRITE_LT:
		case NFS4_WRITEW_LT:
5453 5454
			spin_lock(&fp->fi_lock);
			filp = find_writeable_file_locked(fp);
J
J. Bruce Fields 已提交
5455 5456
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_WRITE);
5457
			spin_unlock(&fp->fi_lock);
5458
			file_lock->fl_type = F_WRLCK;
5459
			break;
L
Linus Torvalds 已提交
5460 5461 5462 5463
		default:
			status = nfserr_inval;
		goto out;
	}
5464 5465 5466 5467
	if (!filp) {
		status = nfserr_openmode;
		goto out;
	}
5468 5469

	file_lock->fl_owner = (fl_owner_t)lockowner(nfs4_get_stateowner(&lock_sop->lo_owner));
5470 5471 5472 5473 5474 5475 5476 5477 5478 5479 5480 5481 5482 5483
	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 = 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 已提交
5484

5485
	err = vfs_lock_file(filp, F_SETLK, file_lock, conflock);
5486
	switch (-err) {
L
Linus Torvalds 已提交
5487
	case 0: /* success! */
5488 5489
		update_stateid(&lock_stp->st_stid.sc_stateid);
		memcpy(&lock->lk_resp_stateid, &lock_stp->st_stid.sc_stateid, 
L
Linus Torvalds 已提交
5490
				sizeof(stateid_t));
5491
		status = 0;
5492 5493 5494 5495
		break;
	case (EAGAIN):		/* conflock holds conflicting lock */
		status = nfserr_denied;
		dprintk("NFSD: nfsd4_lock: conflicting lock found!\n");
5496
		nfs4_set_lock_denied(conflock, &lock->lk_denied);
5497
		break;
L
Linus Torvalds 已提交
5498 5499
	case (EDEADLK):
		status = nfserr_deadlock;
5500
		break;
5501
	default:
5502
		dprintk("NFSD: nfsd4_lock: vfs_lock_file() failed! status %d\n",err);
5503
		status = nfserrno(err);
5504
		break;
L
Linus Torvalds 已提交
5505 5506
	}
out:
5507 5508
	if (filp)
		fput(filp);
5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520 5521 5522
	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.
		 */
		if (status && new)
			release_lock_stateid(lock_stp);

5523
		nfs4_put_stid(&lock_stp->st_stid);
5524
	}
5525 5526
	if (open_stp)
		nfs4_put_stid(&open_stp->st_stid);
5527
	nfsd4_bump_seqid(cstate, status);
5528 5529 5530 5531
	if (file_lock)
		locks_free_lock(file_lock);
	if (conflock)
		locks_free_lock(conflock);
L
Linus Torvalds 已提交
5532 5533 5534
	return status;
}

5535 5536 5537 5538 5539 5540
/*
 * 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.)
 */
5541
static __be32 nfsd_test_lock(struct svc_rqst *rqstp, struct svc_fh *fhp, struct file_lock *lock)
5542 5543
{
	struct file *file;
5544 5545 5546
	__be32 err = nfsd_open(rqstp, fhp, S_IFREG, NFSD_MAY_READ, &file);
	if (!err) {
		err = nfserrno(vfs_test_lock(file, lock));
C
Christoph Hellwig 已提交
5547
		fput(file);
5548
	}
5549 5550 5551
	return err;
}

L
Linus Torvalds 已提交
5552 5553 5554
/*
 * LOCKT operation
 */
5555
__be32
5556 5557
nfsd4_lockt(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
	    struct nfsd4_lockt *lockt)
L
Linus Torvalds 已提交
5558
{
5559
	struct file_lock *file_lock = NULL;
5560
	struct nfs4_lockowner *lo = NULL;
5561
	__be32 status;
5562
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
5563

5564
	if (locks_in_grace(SVC_NET(rqstp)))
L
Linus Torvalds 已提交
5565 5566 5567 5568 5569
		return nfserr_grace;

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

5570
	if (!nfsd4_has_session(cstate)) {
5571
		status = lookup_clientid(&lockt->lt_clientid, cstate, nn);
5572 5573 5574
		if (status)
			goto out;
	}
L
Linus Torvalds 已提交
5575

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

5579 5580 5581 5582 5583 5584
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}
5585

L
Linus Torvalds 已提交
5586 5587 5588
	switch (lockt->lt_type) {
		case NFS4_READ_LT:
		case NFS4_READW_LT:
5589
			file_lock->fl_type = F_RDLCK;
L
Linus Torvalds 已提交
5590 5591 5592
		break;
		case NFS4_WRITE_LT:
		case NFS4_WRITEW_LT:
5593
			file_lock->fl_type = F_WRLCK;
L
Linus Torvalds 已提交
5594 5595
		break;
		default:
5596
			dprintk("NFSD: nfs4_lockt: bad lock type!\n");
L
Linus Torvalds 已提交
5597 5598 5599 5600
			status = nfserr_inval;
		goto out;
	}

5601
	lo = find_lockowner_str(cstate->clp, &lockt->lt_owner);
5602
	if (lo)
5603 5604 5605
		file_lock->fl_owner = (fl_owner_t)lo;
	file_lock->fl_pid = current->tgid;
	file_lock->fl_flags = FL_POSIX;
L
Linus Torvalds 已提交
5606

5607 5608
	file_lock->fl_start = lockt->lt_offset;
	file_lock->fl_end = last_byte_offset(lockt->lt_offset, lockt->lt_length);
L
Linus Torvalds 已提交
5609

5610
	nfs4_transform_lock_offset(file_lock);
L
Linus Torvalds 已提交
5611

5612
	status = nfsd_test_lock(rqstp, &cstate->current_fh, file_lock);
5613
	if (status)
5614
		goto out;
5615

5616
	if (file_lock->fl_type != F_UNLCK) {
L
Linus Torvalds 已提交
5617
		status = nfserr_denied;
5618
		nfs4_set_lock_denied(file_lock, &lockt->lt_denied);
L
Linus Torvalds 已提交
5619 5620
	}
out:
5621 5622
	if (lo)
		nfs4_put_stateowner(&lo->lo_owner);
5623 5624
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
5625 5626 5627
	return status;
}

5628
__be32
5629
nfsd4_locku(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
5630
	    struct nfsd4_locku *locku)
L
Linus Torvalds 已提交
5631
{
5632
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
5633
	struct file *filp = NULL;
5634
	struct file_lock *file_lock = NULL;
5635
	__be32 status;
5636
	int err;
5637 5638
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

L
Linus Torvalds 已提交
5639 5640 5641 5642 5643 5644 5645
	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;

5646
	status = nfs4_preprocess_seqid_op(cstate, locku->lu_seqid,
5647 5648
					&locku->lu_stateid, NFS4_LOCK_STID,
					&stp, nn);
5649
	if (status)
L
Linus Torvalds 已提交
5650
		goto out;
5651
	filp = find_any_file(stp->st_stid.sc_file);
5652 5653
	if (!filp) {
		status = nfserr_lock_range;
5654
		goto put_stateid;
5655
	}
5656 5657 5658 5659
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
5660
		goto fput;
5661
	}
5662

5663
	file_lock->fl_type = F_UNLCK;
5664
	file_lock->fl_owner = (fl_owner_t)lockowner(nfs4_get_stateowner(stp->st_stateowner));
5665 5666 5667 5668 5669 5670 5671 5672 5673
	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 已提交
5674

5675
	err = vfs_lock_file(filp, F_SETLK, file_lock, NULL);
5676
	if (err) {
5677
		dprintk("NFSD: nfs4_locku: vfs_lock_file failed!\n");
L
Linus Torvalds 已提交
5678 5679
		goto out_nfserr;
	}
5680 5681
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&locku->lu_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
5682 5683
fput:
	fput(filp);
5684 5685
put_stateid:
	nfs4_put_stid(&stp->st_stid);
L
Linus Torvalds 已提交
5686
out:
5687
	nfsd4_bump_seqid(cstate, status);
5688 5689
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
5690 5691 5692
	return status;

out_nfserr:
5693
	status = nfserrno(err);
5694
	goto fput;
L
Linus Torvalds 已提交
5695 5696 5697 5698
}

/*
 * returns
5699 5700
 * 	true:  locks held by lockowner
 * 	false: no locks held by lockowner
L
Linus Torvalds 已提交
5701
 */
5702 5703
static bool
check_for_locks(struct nfs4_file *fp, struct nfs4_lockowner *lowner)
L
Linus Torvalds 已提交
5704
{
5705
	struct file_lock *fl;
5706 5707 5708
	int status = false;
	struct file *filp = find_any_file(fp);
	struct inode *inode;
5709
	struct file_lock_context *flctx;
5710 5711 5712 5713 5714 5715 5716 5717

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

	inode = file_inode(filp);
5718 5719 5720
	flctx = inode->i_flctx;

	if (flctx && !list_empty_careful(&flctx->flc_posix)) {
5721
		spin_lock(&flctx->flc_lock);
5722 5723 5724 5725 5726
		list_for_each_entry(fl, &flctx->flc_posix, fl_list) {
			if (fl->fl_owner == (fl_owner_t)lowner) {
				status = true;
				break;
			}
5727
		}
5728
		spin_unlock(&flctx->flc_lock);
L
Linus Torvalds 已提交
5729
	}
5730
	fput(filp);
L
Linus Torvalds 已提交
5731 5732 5733
	return status;
}

5734
__be32
5735 5736 5737
nfsd4_release_lockowner(struct svc_rqst *rqstp,
			struct nfsd4_compound_state *cstate,
			struct nfsd4_release_lockowner *rlockowner)
L
Linus Torvalds 已提交
5738 5739
{
	clientid_t *clid = &rlockowner->rl_clientid;
5740 5741
	struct nfs4_stateowner *sop;
	struct nfs4_lockowner *lo = NULL;
5742
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
5743
	struct xdr_netobj *owner = &rlockowner->rl_owner;
5744
	unsigned int hashval = ownerstr_hashval(owner);
5745
	__be32 status;
5746
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
5747
	struct nfs4_client *clp;
L
Linus Torvalds 已提交
5748 5749 5750 5751

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

5752
	status = lookup_clientid(clid, cstate, nn);
5753
	if (status)
5754
		return status;
5755

5756
	clp = cstate->clp;
5757
	/* Find the matching lock stateowner */
5758
	spin_lock(&clp->cl_lock);
5759
	list_for_each_entry(sop, &clp->cl_ownerstr_hashtbl[hashval],
5760
			    so_strhash) {
5761

5762 5763
		if (sop->so_is_open_owner || !same_owner_str(sop, owner))
			continue;
5764

5765 5766 5767 5768 5769 5770
		/* 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);
5771
				return status;
5772
			}
5773
		}
5774

5775
		nfs4_get_stateowner(sop);
5776
		break;
L
Linus Torvalds 已提交
5777
	}
5778
	spin_unlock(&clp->cl_lock);
5779 5780
	if (lo)
		release_lockowner(lo);
L
Linus Torvalds 已提交
5781 5782 5783 5784
	return status;
}

static inline struct nfs4_client_reclaim *
N
NeilBrown 已提交
5785
alloc_reclaim(void)
L
Linus Torvalds 已提交
5786
{
N
NeilBrown 已提交
5787
	return kmalloc(sizeof(struct nfs4_client_reclaim), GFP_KERNEL);
L
Linus Torvalds 已提交
5788 5789
}

5790
bool
5791
nfs4_has_reclaimed_state(const char *name, struct nfsd_net *nn)
5792
{
5793
	struct nfs4_client_reclaim *crp;
5794

5795
	crp = nfsd4_find_reclaim_client(name, nn);
5796
	return (crp && crp->cr_clp);
5797 5798
}

L
Linus Torvalds 已提交
5799 5800 5801
/*
 * failure => all reset bets are off, nfserr_no_grace...
 */
5802
struct nfs4_client_reclaim *
5803
nfs4_client_to_reclaim(const char *name, struct nfsd_net *nn)
L
Linus Torvalds 已提交
5804 5805
{
	unsigned int strhashval;
5806
	struct nfs4_client_reclaim *crp;
L
Linus Torvalds 已提交
5807

N
NeilBrown 已提交
5808 5809
	dprintk("NFSD nfs4_client_to_reclaim NAME: %.*s\n", HEXDIR_LEN, name);
	crp = alloc_reclaim();
5810 5811 5812
	if (crp) {
		strhashval = clientstr_hashval(name);
		INIT_LIST_HEAD(&crp->cr_strhash);
5813
		list_add(&crp->cr_strhash, &nn->reclaim_str_hashtbl[strhashval]);
5814
		memcpy(crp->cr_recdir, name, HEXDIR_LEN);
5815
		crp->cr_clp = NULL;
5816
		nn->reclaim_str_hashtbl_size++;
5817 5818
	}
	return crp;
L
Linus Torvalds 已提交
5819 5820
}

5821
void
5822
nfs4_remove_reclaim_record(struct nfs4_client_reclaim *crp, struct nfsd_net *nn)
5823 5824 5825
{
	list_del(&crp->cr_strhash);
	kfree(crp);
5826
	nn->reclaim_str_hashtbl_size--;
5827 5828
}

5829
void
5830
nfs4_release_reclaim(struct nfsd_net *nn)
L
Linus Torvalds 已提交
5831 5832 5833 5834 5835
{
	struct nfs4_client_reclaim *crp = NULL;
	int i;

	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
5836 5837
		while (!list_empty(&nn->reclaim_str_hashtbl[i])) {
			crp = list_entry(nn->reclaim_str_hashtbl[i].next,
L
Linus Torvalds 已提交
5838
			                struct nfs4_client_reclaim, cr_strhash);
5839
			nfs4_remove_reclaim_record(crp, nn);
L
Linus Torvalds 已提交
5840 5841
		}
	}
5842
	WARN_ON_ONCE(nn->reclaim_str_hashtbl_size);
L
Linus Torvalds 已提交
5843 5844 5845 5846
}

/*
 * called from OPEN, CLAIM_PREVIOUS with a new clientid. */
5847
struct nfs4_client_reclaim *
5848
nfsd4_find_reclaim_client(const char *recdir, struct nfsd_net *nn)
L
Linus Torvalds 已提交
5849 5850 5851 5852
{
	unsigned int strhashval;
	struct nfs4_client_reclaim *crp = NULL;

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

5855
	strhashval = clientstr_hashval(recdir);
5856
	list_for_each_entry(crp, &nn->reclaim_str_hashtbl[strhashval], cr_strhash) {
5857
		if (same_name(crp->cr_recdir, recdir)) {
L
Linus Torvalds 已提交
5858 5859 5860 5861 5862 5863 5864 5865 5866
			return crp;
		}
	}
	return NULL;
}

/*
* Called from OPEN. Look for clientid in reclaim list.
*/
5867
__be32
5868 5869 5870
nfs4_check_open_reclaim(clientid_t *clid,
		struct nfsd4_compound_state *cstate,
		struct nfsd_net *nn)
L
Linus Torvalds 已提交
5871
{
5872
	__be32 status;
5873 5874

	/* find clientid in conf_id_hashtbl */
5875 5876
	status = lookup_clientid(clid, cstate, nn);
	if (status)
5877 5878
		return nfserr_reclaim_bad;

5879 5880 5881
	if (test_bit(NFSD4_CLIENT_RECLAIM_COMPLETE, &cstate->clp->cl_flags))
		return nfserr_no_grace;

5882 5883 5884 5885
	if (nfsd4_client_record_check(cstate->clp))
		return nfserr_reclaim_bad;

	return nfs_ok;
L
Linus Torvalds 已提交
5886 5887
}

B
Bryan Schumaker 已提交
5888
#ifdef CONFIG_NFSD_FAULT_INJECTION
5889 5890 5891 5892 5893 5894
static inline void
put_client(struct nfs4_client *clp)
{
	atomic_dec(&clp->cl_refcount);
}

5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911
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;
}

5912
u64
5913
nfsd_inject_print_clients(void)
5914 5915 5916 5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933
{
	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 已提交
5934

5935
u64
5936
nfsd_inject_forget_client(struct sockaddr_storage *addr, size_t addr_size)
5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961
{
	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;
}

5962
u64
5963
nfsd_inject_forget_clients(u64 max)
5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980 5981 5982 5983 5984 5985 5986 5987 5988 5989
{
	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;
}

5990 5991 5992 5993
static void nfsd_print_count(struct nfs4_client *clp, unsigned int count,
			     const char *type)
{
	char buf[INET6_ADDRSTRLEN];
5994
	rpc_ntop((struct sockaddr *)&clp->cl_addr, buf, sizeof(buf));
5995 5996 5997
	printk(KERN_INFO "NFS Client: %s has %u %s\n", buf, count, type);
}

5998 5999 6000 6001 6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012 6013
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);
}

6014
static u64 nfsd_foreach_client_lock(struct nfs4_client *clp, u64 max,
6015
				    struct list_head *collect,
6016
				    void (*func)(struct nfs4_ol_stateid *))
B
Bryan Schumaker 已提交
6017 6018 6019
{
	struct nfs4_openowner *oop;
	struct nfs4_ol_stateid *stp, *st_next;
6020
	struct nfs4_ol_stateid *lst, *lst_next;
B
Bryan Schumaker 已提交
6021 6022
	u64 count = 0;

6023
	spin_lock(&clp->cl_lock);
B
Bryan Schumaker 已提交
6024
	list_for_each_entry(oop, &clp->cl_openowners, oo_perclient) {
6025 6026 6027 6028
		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) {
6029
				if (func) {
6030
					func(lst);
6031 6032
					nfsd_inject_add_lock_to_list(lst,
								collect);
6033
				}
6034 6035 6036 6037 6038 6039 6040 6041 6042 6043 6044
				++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 已提交
6045 6046 6047
			}
		}
	}
6048 6049
out:
	spin_unlock(&clp->cl_lock);
B
Bryan Schumaker 已提交
6050 6051 6052 6053

	return count;
}

6054 6055 6056
static u64
nfsd_collect_client_locks(struct nfs4_client *clp, struct list_head *collect,
			  u64 max)
B
Bryan Schumaker 已提交
6057
{
6058
	return nfsd_foreach_client_lock(clp, max, collect, unhash_lock_stateid);
B
Bryan Schumaker 已提交
6059 6060
}

6061 6062
static u64
nfsd_print_client_locks(struct nfs4_client *clp)
6063
{
6064
	u64 count = nfsd_foreach_client_lock(clp, 0, NULL, NULL);
6065 6066 6067 6068
	nfsd_print_count(clp, count, "locked files");
	return count;
}

6069
u64
6070
nfsd_inject_print_locks(void)
6071 6072 6073 6074 6075 6076 6077 6078 6079 6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098 6099 6100 6101 6102
{
	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
6103
nfsd_inject_forget_client_locks(struct sockaddr_storage *addr, size_t addr_size)
6104 6105 6106 6107 6108 6109 6110 6111 6112 6113 6114 6115 6116 6117 6118 6119 6120 6121 6122 6123
{
	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
6124
nfsd_inject_forget_locks(u64 max)
6125 6126 6127 6128 6129 6130 6131 6132 6133 6134 6135 6136 6137 6138 6139 6140 6141 6142 6143 6144 6145
{
	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;
}

6146 6147 6148 6149
static u64
nfsd_foreach_client_openowner(struct nfs4_client *clp, u64 max,
			      struct list_head *collect,
			      void (*func)(struct nfs4_openowner *))
6150 6151
{
	struct nfs4_openowner *oop, *next;
6152 6153
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
6154 6155
	u64 count = 0;

6156 6157 6158
	lockdep_assert_held(&nn->client_lock);

	spin_lock(&clp->cl_lock);
6159
	list_for_each_entry_safe(oop, next, &clp->cl_openowners, oo_perclient) {
6160
		if (func) {
6161
			func(oop);
6162 6163 6164 6165 6166 6167 6168 6169 6170 6171 6172 6173 6174 6175
			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)
6176 6177
			break;
	}
6178 6179 6180 6181 6182 6183 6184 6185 6186 6187 6188 6189 6190 6191 6192 6193 6194 6195 6196 6197 6198 6199 6200
	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
6201
nfsd_inject_print_openowners(void)
6202 6203 6204 6205 6206 6207 6208 6209 6210 6211 6212 6213 6214
{
	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);
6215 6216 6217 6218

	return count;
}

6219 6220 6221 6222 6223 6224 6225 6226 6227 6228 6229 6230 6231 6232 6233
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
6234 6235
nfsd_inject_forget_client_openowners(struct sockaddr_storage *addr,
				     size_t addr_size)
6236
{
6237 6238 6239 6240 6241 6242 6243 6244 6245 6246 6247 6248 6249 6250 6251 6252
	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;
6253 6254
}

6255
u64
6256
nfsd_inject_forget_openowners(u64 max)
6257
{
6258 6259 6260 6261 6262 6263 6264 6265 6266 6267 6268 6269 6270 6271 6272 6273 6274 6275
	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);
6276 6277 6278
	return count;
}

6279 6280 6281 6282
static u64 nfsd_find_all_delegations(struct nfs4_client *clp, u64 max,
				     struct list_head *victims)
{
	struct nfs4_delegation *dp, *next;
6283 6284
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
6285 6286
	u64 count = 0;

6287 6288 6289
	lockdep_assert_held(&nn->client_lock);

	spin_lock(&state_lock);
6290
	list_for_each_entry_safe(dp, next, &clp->cl_delegations, dl_perclnt) {
6291 6292 6293 6294 6295 6296 6297 6298 6299 6300
		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;

6301
			atomic_inc(&clp->cl_refcount);
6302 6303
			unhash_delegation_locked(dp);
			list_add(&dp->dl_recall_lru, victims);
6304
		}
6305 6306 6307 6308 6309 6310 6311 6312 6313
		++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)
6314 6315
			break;
	}
6316
	spin_unlock(&state_lock);
6317 6318 6319
	return count;
}

6320 6321
static u64
nfsd_print_client_delegations(struct nfs4_client *clp)
6322
{
6323
	u64 count = nfsd_find_all_delegations(clp, 0, NULL);
6324

6325 6326 6327 6328 6329
	nfsd_print_count(clp, count, "delegations");
	return count;
}

u64
6330
nfsd_inject_print_delegations(void)
6331 6332 6333 6334 6335 6336 6337 6338
{
	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;
6339

6340 6341 6342 6343 6344 6345 6346 6347 6348 6349 6350 6351 6352 6353 6354
	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) {
6355
		list_del_init(&dp->dl_recall_lru);
6356
		clp = dp->dl_stid.sc_client;
6357
		revoke_delegation(dp);
6358
		put_client(clp);
6359
	}
6360 6361 6362
}

u64
6363 6364
nfsd_inject_forget_client_delegations(struct sockaddr_storage *addr,
				      size_t addr_size)
6365 6366 6367 6368 6369 6370 6371 6372 6373 6374 6375 6376 6377 6378 6379 6380 6381 6382 6383
{
	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;
}
6384

6385
u64
6386
nfsd_inject_forget_delegations(u64 max)
6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399 6400 6401 6402 6403 6404
{
	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);
6405 6406 6407
	return count;
}

6408 6409
static void
nfsd_recall_delegations(struct list_head *reaplist)
6410
{
6411 6412
	struct nfs4_client *clp;
	struct nfs4_delegation *dp, *next;
6413

6414
	list_for_each_entry_safe(dp, next, reaplist, dl_recall_lru) {
6415
		list_del_init(&dp->dl_recall_lru);
6416 6417 6418 6419 6420 6421 6422 6423
		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);
6424
		dp->dl_time = 0;
6425
		spin_unlock(&state_lock);
6426
		nfsd_break_one_deleg(dp);
6427
		put_client(clp);
6428
	}
6429
}
6430

6431
u64
6432
nfsd_inject_recall_client_delegations(struct sockaddr_storage *addr,
6433 6434 6435 6436 6437 6438 6439 6440 6441 6442 6443 6444 6445 6446 6447 6448 6449 6450
				      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);
6451 6452 6453
	return count;
}

6454
u64
6455
nfsd_inject_recall_delegations(u64 max)
6456 6457
{
	u64 count = 0;
6458 6459 6460 6461
	struct nfs4_client *clp, *next;
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns,
						nfsd_net_id);
	LIST_HEAD(reaplist);
6462

6463 6464
	if (!nfsd_netns_ready(nn))
		return count;
6465

6466 6467 6468 6469 6470 6471 6472 6473
	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);
6474 6475
	return count;
}
B
Bryan Schumaker 已提交
6476 6477
#endif /* CONFIG_NFSD_FAULT_INJECTION */

6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497 6498
/*
 * 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);
}

6499
static int nfs4_state_create_net(struct net *net)
6500 6501 6502 6503 6504 6505 6506
{
	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)
6507
		goto err;
6508 6509 6510 6511
	nn->unconf_id_hashtbl = kmalloc(sizeof(struct list_head) *
			CLIENT_HASH_SIZE, GFP_KERNEL);
	if (!nn->unconf_id_hashtbl)
		goto err_unconf_id;
6512 6513 6514 6515
	nn->sessionid_hashtbl = kmalloc(sizeof(struct list_head) *
			SESSION_HASH_SIZE, GFP_KERNEL);
	if (!nn->sessionid_hashtbl)
		goto err_sessionid;
6516

6517
	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
6518
		INIT_LIST_HEAD(&nn->conf_id_hashtbl[i]);
6519
		INIT_LIST_HEAD(&nn->unconf_id_hashtbl[i]);
6520
	}
6521 6522
	for (i = 0; i < SESSION_HASH_SIZE; i++)
		INIT_LIST_HEAD(&nn->sessionid_hashtbl[i]);
6523
	nn->conf_name_tree = RB_ROOT;
6524
	nn->unconf_name_tree = RB_ROOT;
6525
	INIT_LIST_HEAD(&nn->client_lru);
6526
	INIT_LIST_HEAD(&nn->close_lru);
6527
	INIT_LIST_HEAD(&nn->del_recall_lru);
6528
	spin_lock_init(&nn->client_lock);
6529

6530
	INIT_DELAYED_WORK(&nn->laundromat_work, laundromat_main);
6531
	get_net(net);
6532

6533
	return 0;
6534

6535
err_sessionid:
6536
	kfree(nn->unconf_id_hashtbl);
6537 6538
err_unconf_id:
	kfree(nn->conf_id_hashtbl);
6539 6540
err:
	return -ENOMEM;
6541 6542 6543
}

static void
6544
nfs4_state_destroy_net(struct net *net)
6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555
{
	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);
		}
	}
6556

6557 6558 6559 6560 6561
	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);
		}
6562 6563
	}

6564
	kfree(nn->sessionid_hashtbl);
6565
	kfree(nn->unconf_id_hashtbl);
6566
	kfree(nn->conf_id_hashtbl);
6567
	put_net(net);
6568 6569
}

6570
int
6571
nfs4_state_start_net(struct net *net)
6572
{
6573
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
6574 6575
	int ret;

6576
	ret = nfs4_state_create_net(net);
6577 6578
	if (ret)
		return ret;
6579
	nn->boot_time = get_seconds();
6580
	nn->grace_ended = false;
6581 6582
	locks_start_grace(net, &nn->nfsd4_manager);
	nfsd4_client_tracking_init(net);
6583
	printk(KERN_INFO "NFSD: starting %ld-second grace period (net %p)\n",
6584 6585
	       nn->nfsd4_grace, net);
	queue_delayed_work(laundry_wq, &nn->laundromat_work, nn->nfsd4_grace * HZ);
6586 6587 6588 6589 6590 6591 6592 6593 6594 6595
	return 0;
}

/* initialization to perform when the nfsd service is started: */

int
nfs4_state_start(void)
{
	int ret;

6596
	ret = set_callback_cred();
6597 6598
	if (ret)
		return -ENOMEM;
6599
	laundry_wq = create_singlethread_workqueue("nfsd4");
6600 6601 6602 6603
	if (laundry_wq == NULL) {
		ret = -ENOMEM;
		goto out_recovery;
	}
6604 6605 6606
	ret = nfsd4_create_callback_queue();
	if (ret)
		goto out_free_laundry;
6607

6608
	set_max_delegations();
6609

6610
	return 0;
6611

6612 6613
out_free_laundry:
	destroy_workqueue(laundry_wq);
6614
out_recovery:
6615
	return ret;
L
Linus Torvalds 已提交
6616 6617
}

6618
void
6619
nfs4_state_shutdown_net(struct net *net)
L
Linus Torvalds 已提交
6620 6621 6622
{
	struct nfs4_delegation *dp = NULL;
	struct list_head *pos, *next, reaplist;
6623
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
6624

6625 6626
	cancel_delayed_work_sync(&nn->laundromat_work);
	locks_end_grace(&nn->nfsd4_manager);
6627

L
Linus Torvalds 已提交
6628
	INIT_LIST_HEAD(&reaplist);
6629
	spin_lock(&state_lock);
6630
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
6631
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
6632 6633
		unhash_delegation_locked(dp);
		list_add(&dp->dl_recall_lru, &reaplist);
L
Linus Torvalds 已提交
6634
	}
6635
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
6636 6637
	list_for_each_safe(pos, next, &reaplist) {
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
6638
		list_del_init(&dp->dl_recall_lru);
6639
		put_clnt_odstate(dp->dl_clnt_odstate);
6640
		nfs4_put_deleg_lease(dp->dl_stid.sc_file);
6641
		nfs4_put_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
6642 6643
	}

6644
	nfsd4_client_tracking_exit(net);
6645
	nfs4_state_destroy_net(net);
L
Linus Torvalds 已提交
6646 6647 6648 6649 6650
}

void
nfs4_state_shutdown(void)
{
6651
	destroy_workqueue(laundry_wq);
6652
	nfsd4_destroy_callback_queue();
L
Linus Torvalds 已提交
6653
}
6654 6655 6656 6657

static void
get_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
6658 6659
	if (HAS_STATE_ID(cstate, CURRENT_STATE_ID_FLAG) && CURRENT_STATEID(stateid))
		memcpy(stateid, &cstate->current_stateid, sizeof(stateid_t));
6660 6661 6662 6663 6664
}

static void
put_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
6665 6666 6667 6668 6669 6670 6671 6672 6673 6674
	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);
6675 6676
}

6677 6678 6679
/*
 * functions to set current state id
 */
6680 6681 6682 6683 6684 6685
void
nfsd4_set_opendowngradestateid(struct nfsd4_compound_state *cstate, struct nfsd4_open_downgrade *odp)
{
	put_stateid(cstate, &odp->od_stateid);
}

6686 6687 6688 6689 6690 6691
void
nfsd4_set_openstateid(struct nfsd4_compound_state *cstate, struct nfsd4_open *open)
{
	put_stateid(cstate, &open->op_stateid);
}

6692 6693 6694 6695 6696 6697 6698 6699 6700 6701 6702 6703 6704 6705 6706
void
nfsd4_set_closestateid(struct nfsd4_compound_state *cstate, struct nfsd4_close *close)
{
	put_stateid(cstate, &close->cl_stateid);
}

void
nfsd4_set_lockstateid(struct nfsd4_compound_state *cstate, struct nfsd4_lock *lock)
{
	put_stateid(cstate, &lock->lk_resp_stateid);
}

/*
 * functions to consume current state id
 */
6707

6708 6709 6710 6711 6712 6713 6714 6715 6716 6717 6718 6719
void
nfsd4_get_opendowngradestateid(struct nfsd4_compound_state *cstate, struct nfsd4_open_downgrade *odp)
{
	get_stateid(cstate, &odp->od_stateid);
}

void
nfsd4_get_delegreturnstateid(struct nfsd4_compound_state *cstate, struct nfsd4_delegreturn *drp)
{
	get_stateid(cstate, &drp->dr_stateid);
}

6720 6721 6722 6723 6724 6725 6726 6727 6728 6729 6730 6731
void
nfsd4_get_freestateid(struct nfsd4_compound_state *cstate, struct nfsd4_free_stateid *fsp)
{
	get_stateid(cstate, &fsp->fr_stateid);
}

void
nfsd4_get_setattrstateid(struct nfsd4_compound_state *cstate, struct nfsd4_setattr *setattr)
{
	get_stateid(cstate, &setattr->sa_stateid);
}

6732 6733 6734 6735 6736 6737 6738
void
nfsd4_get_closestateid(struct nfsd4_compound_state *cstate, struct nfsd4_close *close)
{
	get_stateid(cstate, &close->cl_stateid);
}

void
6739
nfsd4_get_lockustateid(struct nfsd4_compound_state *cstate, struct nfsd4_locku *locku)
6740
{
6741
	get_stateid(cstate, &locku->lu_stateid);
6742
}
6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754

void
nfsd4_get_readstateid(struct nfsd4_compound_state *cstate, struct nfsd4_read *read)
{
	get_stateid(cstate, &read->rd_stateid);
}

void
nfsd4_get_writestateid(struct nfsd4_compound_state *cstate, struct nfsd4_write *write)
{
	get_stateid(cstate, &write->wr_stateid);
}