nfs4state.c 139.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/hash.h>
45
#include "xdr4.h"
46
#include "xdr4cb.h"
47
#include "vfs.h"
48
#include "current_stateid.h"
L
Linus Torvalds 已提交
49

50 51
#include "netns.h"

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

54 55 56 57 58 59 60 61
#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 */
};
62 63 64
static const stateid_t currentstateid = {
	.si_generation = 1,
};
65

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

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

/* forward declarations */
73
static int check_for_locks(struct nfs4_file *filp, struct nfs4_lockowner *lowner);
L
Linus Torvalds 已提交
74

75 76 77
/* Locking: */

/* Currently used for almost all code touching nfsv4 state: */
I
Ingo Molnar 已提交
78
static DEFINE_MUTEX(client_mutex);
L
Linus Torvalds 已提交
79

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

C
Christoph Hellwig 已提交
87 88 89 90 91
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;
N
NeilBrown 已提交
92

L
Linus Torvalds 已提交
93 94 95
void
nfs4_lock_state(void)
{
I
Ingo Molnar 已提交
96
	mutex_lock(&client_mutex);
L
Linus Torvalds 已提交
97 98
}

99
static void free_session(struct nfsd4_session *);
100

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

106
void nfsd4_put_session(struct nfsd4_session *ses)
107
{
108 109
	if (atomic_dec_and_test(&ses->se_ref) && is_session_dead(ses))
		free_session(ses);
110 111
}

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

120
static __be32 nfsd4_get_session_locked(struct nfsd4_session *ses)
121
{
122 123 124 125
	if (is_session_dead(ses))
		return nfserr_badsession;
	atomic_inc(&ses->se_ref);
	return nfs_ok;
126 127
}

L
Linus Torvalds 已提交
128 129 130
void
nfs4_unlock_state(void)
{
I
Ingo Molnar 已提交
131
	mutex_unlock(&client_mutex);
L
Linus Torvalds 已提交
132 133
}

134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197
static bool is_client_expired(struct nfs4_client *clp)
{
	return clp->cl_time == 0;
}

static __be32 mark_client_expired_locked(struct nfs4_client *clp)
{
	if (atomic_read(&clp->cl_refcount))
		return nfserr_jukebox;
	clp->cl_time = 0;
	return nfs_ok;
}

static __be32 mark_client_expired(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
	__be32 ret;

	spin_lock(&nn->client_lock);
	ret = mark_client_expired_locked(clp);
	spin_unlock(&nn->client_lock);
	return ret;
}

static __be32 get_client_locked(struct nfs4_client *clp)
{
	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();
}

static inline void
renew_client(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

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

198
static void put_client_renew_locked(struct nfs4_client *clp)
199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217
{
	if (!atomic_dec_and_test(&clp->cl_refcount))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
}

void put_client_renew(struct nfs4_client *clp)
{
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	if (!atomic_dec_and_lock(&clp->cl_refcount, &nn->client_lock))
		return;
	if (!is_client_expired(clp))
		renew_client_locked(clp);
	spin_unlock(&nn->client_lock);
}


L
Linus Torvalds 已提交
218 219 220 221 222 223 224 225 226 227 228 229 230
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;
}

231 232 233 234 235
static void nfsd4_free_file(struct nfs4_file *f)
{
	kmem_cache_free(file_slab, f);
}

236 237 238
static inline void
put_nfs4_file(struct nfs4_file *fi)
{
239
	if (atomic_dec_and_lock(&fi->fi_ref, &state_lock)) {
240
		hlist_del(&fi->fi_hash);
241
		spin_unlock(&state_lock);
242
		iput(fi->fi_inode);
243
		nfsd4_free_file(fi);
244
	}
245 246 247 248 249
}

static inline void
get_nfs4_file(struct nfs4_file *fi)
{
250
	atomic_inc(&fi->fi_ref);
251 252
}

253
static int num_delegations;
254
unsigned long max_delegations;
255 256 257 258 259

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

260 261 262 263
/* 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)
264

265
static unsigned int ownerstr_hashval(u32 clientid, struct xdr_netobj *ownername)
266 267 268 269 270
{
	unsigned int ret;

	ret = opaque_hashval(ownername->data, ownername->len);
	ret += clientid;
271
	return ret & OWNER_HASH_MASK;
272
}
273 274 275 276

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

278 279 280 281 282 283
static unsigned int file_hashval(struct inode *ino)
{
	/* XXX: why are we hashing on inode pointer, anyway? */
	return hash_ptr(ino, FILE_HASH_BITS);
}

284
static struct hlist_head file_hashtbl[FILE_HASH_SIZE];
285

286 287 288 289 290 291
static void __nfs4_file_get_access(struct nfs4_file *fp, int oflag)
{
	WARN_ON_ONCE(!(fp->fi_fds[oflag] || fp->fi_fds[O_RDWR]));
	atomic_inc(&fp->fi_access[oflag]);
}

292 293 294
static void nfs4_file_get_access(struct nfs4_file *fp, int oflag)
{
	if (oflag == O_RDWR) {
295 296
		__nfs4_file_get_access(fp, O_RDONLY);
		__nfs4_file_get_access(fp, O_WRONLY);
297
	} else
298
		__nfs4_file_get_access(fp, oflag);
299 300 301
}

static void nfs4_file_put_fd(struct nfs4_file *fp, int oflag)
302 303 304 305 306 307 308
{
	if (fp->fi_fds[oflag]) {
		fput(fp->fi_fds[oflag]);
		fp->fi_fds[oflag] = NULL;
	}
}

309
static void __nfs4_file_put_access(struct nfs4_file *fp, int oflag)
310 311 312
{
	if (atomic_dec_and_test(&fp->fi_access[oflag])) {
		nfs4_file_put_fd(fp, oflag);
313
		if (atomic_read(&fp->fi_access[1 - oflag]) == 0)
314
			nfs4_file_put_fd(fp, O_RDWR);
315 316 317
	}
}

318 319 320 321 322 323 324 325 326
static void nfs4_file_put_access(struct nfs4_file *fp, int oflag)
{
	if (oflag == O_RDWR) {
		__nfs4_file_put_access(fp, O_RDONLY);
		__nfs4_file_put_access(fp, O_WRONLY);
	} else
		__nfs4_file_put_access(fp, oflag);
}

J
J. Bruce Fields 已提交
327 328
static struct nfs4_stid *nfs4_alloc_stid(struct nfs4_client *cl, struct
kmem_cache *slab)
329
{
J
J. Bruce Fields 已提交
330 331
	struct idr *stateids = &cl->cl_stateids;
	struct nfs4_stid *stid;
J
J. Bruce Fields 已提交
332
	int new_id;
333

J
J. Bruce Fields 已提交
334 335 336 337
	stid = kmem_cache_alloc(slab, GFP_KERNEL);
	if (!stid)
		return NULL;

338
	new_id = idr_alloc_cyclic(stateids, stid, 0, 0, GFP_KERNEL);
T
Tejun Heo 已提交
339
	if (new_id < 0)
J
J. Bruce Fields 已提交
340
		goto out_free;
341
	stid->sc_client = cl;
J
J. Bruce Fields 已提交
342 343 344
	stid->sc_type = 0;
	stid->sc_stateid.si_opaque.so_id = new_id;
	stid->sc_stateid.si_opaque.so_clid = cl->cl_clientid;
345
	/* Will be incremented before return to client: */
J
J. Bruce Fields 已提交
346
	stid->sc_stateid.si_generation = 0;
347 348

	/*
J
J. Bruce Fields 已提交
349 350 351 352 353 354 355
	 * 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):
356
	 */
J
J. Bruce Fields 已提交
357 358
	return stid;
out_free:
359
	kmem_cache_free(slab, stid);
J
J. Bruce Fields 已提交
360
	return NULL;
361 362
}

363 364 365 366 367
static struct nfs4_ol_stateid * nfs4_alloc_stateid(struct nfs4_client *clp)
{
	return openlockstateid(nfs4_alloc_stid(clp, stateid_slab));
}

368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440
/*
 * 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.
 *
 * 'state_lock', which is always held when block_delegations() is called,
 * is used to manage concurrent access.  Testing does not need the lock
 * except when swapping the two filters.
 */
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) {
		spin_lock(&state_lock);
		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();
		}
		spin_unlock(&state_lock);
	}
	hash = arch_fast_hash(&fh->fh_base, fh->fh_size, 0);
	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;

	hash = arch_fast_hash(&fh->fh_base, fh->fh_size, 0);

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

L
Linus Torvalds 已提交
441
static struct nfs4_delegation *
442
alloc_init_deleg(struct nfs4_client *clp, struct nfs4_ol_stateid *stp, struct svc_fh *current_fh)
L
Linus Torvalds 已提交
443 444 445 446
{
	struct nfs4_delegation *dp;

	dprintk("NFSD alloc_init_deleg\n");
447
	if (num_delegations > max_delegations)
448
		return NULL;
449 450
	if (delegation_blocked(&current_fh->fh_handle))
		return NULL;
451
	dp = delegstateid(nfs4_alloc_stid(clp, deleg_slab));
N
NeilBrown 已提交
452
	if (dp == NULL)
L
Linus Torvalds 已提交
453
		return dp;
454 455
	/*
	 * delegation seqid's are never incremented.  The 4.1 special
J
J. Bruce Fields 已提交
456 457
	 * meaning of seqid 0 isn't meaningful, really, but let's avoid
	 * 0 anyway just for consistency and use 1:
458 459
	 */
	dp->dl_stid.sc_stateid.si_generation = 1;
460
	num_delegations++;
461 462
	INIT_LIST_HEAD(&dp->dl_perfile);
	INIT_LIST_HEAD(&dp->dl_perclnt);
L
Linus Torvalds 已提交
463
	INIT_LIST_HEAD(&dp->dl_recall_lru);
464
	dp->dl_file = NULL;
465
	dp->dl_type = NFS4_OPEN_DELEGATE_READ;
466
	fh_copy_shallow(&dp->dl_fh, &current_fh->fh_handle);
L
Linus Torvalds 已提交
467 468
	dp->dl_time = 0;
	atomic_set(&dp->dl_count, 1);
469
	nfsd4_init_callback(&dp->dl_recall);
L
Linus Torvalds 已提交
470 471 472
	return dp;
}

473
static void remove_stid(struct nfs4_stid *s)
J
J. Bruce Fields 已提交
474 475 476 477 478 479
{
	struct idr *stateids = &s->sc_client->cl_stateids;

	idr_remove(stateids, s->sc_stateid.si_opaque.so_id);
}

B
Benny Halevy 已提交
480 481 482 483 484
static void nfs4_free_stid(struct kmem_cache *slab, struct nfs4_stid *s)
{
	kmem_cache_free(slab, s);
}

L
Linus Torvalds 已提交
485 486 487 488
void
nfs4_put_delegation(struct nfs4_delegation *dp)
{
	if (atomic_dec_and_test(&dp->dl_count)) {
B
Benny Halevy 已提交
489
		nfs4_free_stid(deleg_slab, &dp->dl_stid);
490
		num_delegations--;
L
Linus Torvalds 已提交
491 492 493
	}
}

494
static void nfs4_put_deleg_lease(struct nfs4_file *fp)
L
Linus Torvalds 已提交
495
{
496 497
	if (!fp->fi_lease)
		return;
498 499 500
	if (atomic_dec_and_test(&fp->fi_delegees)) {
		vfs_setlease(fp->fi_deleg_file, F_UNLCK, &fp->fi_lease);
		fp->fi_lease = NULL;
501
		fput(fp->fi_deleg_file);
502 503
		fp->fi_deleg_file = NULL;
	}
L
Linus Torvalds 已提交
504 505
}

J
J. Bruce Fields 已提交
506 507
static void unhash_stid(struct nfs4_stid *s)
{
J
J. Bruce Fields 已提交
508
	s->sc_type = 0;
J
J. Bruce Fields 已提交
509 510
}

511 512 513
static void
hash_delegation_locked(struct nfs4_delegation *dp, struct nfs4_file *fp)
{
514
	lockdep_assert_held(&state_lock);
515

516
	dp->dl_stid.sc_type = NFS4_DELEG_STID;
517 518 519 520
	list_add(&dp->dl_perfile, &fp->fi_delegations);
	list_add(&dp->dl_perclnt, &dp->dl_stid.sc_client->cl_delegations);
}

L
Linus Torvalds 已提交
521 522 523 524
/* Called under the state lock. */
static void
unhash_delegation(struct nfs4_delegation *dp)
{
525
	spin_lock(&state_lock);
526
	list_del_init(&dp->dl_perclnt);
527
	list_del_init(&dp->dl_perfile);
L
Linus Torvalds 已提交
528
	list_del_init(&dp->dl_recall_lru);
529
	spin_unlock(&state_lock);
530 531 532 533 534
	if (dp->dl_file) {
		nfs4_put_deleg_lease(dp->dl_file);
		put_nfs4_file(dp->dl_file);
		dp->dl_file = NULL;
	}
535 536 537 538 539 540 541
}



static void destroy_revoked_delegation(struct nfs4_delegation *dp)
{
	list_del_init(&dp->dl_recall_lru);
542
	remove_stid(&dp->dl_stid);
L
Linus Torvalds 已提交
543 544 545
	nfs4_put_delegation(dp);
}

546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565
static void destroy_delegation(struct nfs4_delegation *dp)
{
	unhash_delegation(dp);
	remove_stid(&dp->dl_stid);
	nfs4_put_delegation(dp);
}

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

	if (clp->cl_minorversion == 0)
		destroy_delegation(dp);
	else {
		unhash_delegation(dp);
		dp->dl_stid.sc_type = NFS4_REVOKED_DELEG_STID;
		list_add(&dp->dl_recall_lru, &clp->cl_revoked);
	}
}

L
Linus Torvalds 已提交
566 567 568 569
/* 
 * SETCLIENTID state 
 */

570 571 572 573 574 575 576 577 578 579
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;
}

580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597
/*
 * 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.
 */
598 599
static unsigned int
bmap_to_share_mode(unsigned long bmap) {
600
	int i;
601
	unsigned int access = 0;
602 603 604

	for (i = 1; i < 4; i++) {
		if (test_bit(i, &bmap))
605
			access |= i;
606
	}
607
	return access;
608 609
}

610
static bool
611
test_share(struct nfs4_ol_stateid *stp, struct nfsd4_open *open) {
612 613
	unsigned int access, deny;

614 615
	access = bmap_to_share_mode(stp->st_access_bmap);
	deny = bmap_to_share_mode(stp->st_deny_bmap);
616
	if ((access & open->op_share_deny) || (deny & open->op_share_access))
617 618
		return false;
	return true;
619 620
}

621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641
/* set share access for a given stateid */
static inline void
set_access(u32 access, struct nfs4_ol_stateid *stp)
{
	__set_bit(access, &stp->st_access_bmap);
}

/* clear share access for a given stateid */
static inline void
clear_access(u32 access, struct nfs4_ol_stateid *stp)
{
	__clear_bit(access, &stp->st_access_bmap);
}

/* test whether a given stateid has access */
static inline bool
test_access(u32 access, struct nfs4_ol_stateid *stp)
{
	return test_bit(access, &stp->st_access_bmap);
}

642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660
/* set share deny for a given stateid */
static inline void
set_deny(u32 access, struct nfs4_ol_stateid *stp)
{
	__set_bit(access, &stp->st_deny_bmap);
}

/* clear share deny for a given stateid */
static inline void
clear_deny(u32 access, struct nfs4_ol_stateid *stp)
{
	__clear_bit(access, &stp->st_deny_bmap);
}

/* test whether a given stateid is denying specific access */
static inline bool
test_deny(u32 access, struct nfs4_ol_stateid *stp)
{
	return test_bit(access, &stp->st_deny_bmap);
661 662 663 664
}

static int nfs4_access_to_omode(u32 access)
{
665
	switch (access & NFS4_SHARE_ACCESS_BOTH) {
666 667 668 669 670 671 672
	case NFS4_SHARE_ACCESS_READ:
		return O_RDONLY;
	case NFS4_SHARE_ACCESS_WRITE:
		return O_WRONLY;
	case NFS4_SHARE_ACCESS_BOTH:
		return O_RDWR;
	}
673 674
	WARN_ON_ONCE(1);
	return O_RDONLY;
675 676
}

677 678 679 680 681 682 683 684 685 686 687 688 689 690
/* release all access and file references for a given stateid */
static void
release_all_access(struct nfs4_ol_stateid *stp)
{
	int i;

	for (i = 1; i < 4; i++) {
		if (test_access(i, stp))
			nfs4_file_put_access(stp->st_file,
					     nfs4_access_to_omode(i));
		clear_access(i, stp);
	}
}

691
static void unhash_generic_stateid(struct nfs4_ol_stateid *stp)
692 693 694 695 696
{
	list_del(&stp->st_perfile);
	list_del(&stp->st_perstateowner);
}

697
static void close_generic_stateid(struct nfs4_ol_stateid *stp)
698
{
699
	release_all_access(stp);
O
OGAWA Hirofumi 已提交
700
	put_nfs4_file(stp->st_file);
701 702 703
	stp->st_file = NULL;
}

704
static void free_generic_stateid(struct nfs4_ol_stateid *stp)
705
{
706
	remove_stid(&stp->st_stid);
B
Benny Halevy 已提交
707
	nfs4_free_stid(stateid_slab, &stp->st_stid);
708 709
}

710
static void release_lock_stateid(struct nfs4_ol_stateid *stp)
711 712 713 714
{
	struct file *file;

	unhash_generic_stateid(stp);
J
J. Bruce Fields 已提交
715
	unhash_stid(&stp->st_stid);
716 717
	file = find_any_file(stp->st_file);
	if (file)
718
		locks_remove_posix(file, (fl_owner_t)lockowner(stp->st_stateowner));
719
	close_generic_stateid(stp);
720 721 722
	free_generic_stateid(stp);
}

723
static void unhash_lockowner(struct nfs4_lockowner *lo)
724
{
725
	struct nfs4_ol_stateid *stp;
726

727 728
	list_del(&lo->lo_owner.so_strhash);
	list_del(&lo->lo_perstateid);
729
	list_del(&lo->lo_owner_ino_hash);
730 731
	while (!list_empty(&lo->lo_owner.so_stateids)) {
		stp = list_first_entry(&lo->lo_owner.so_stateids,
732
				struct nfs4_ol_stateid, st_perstateowner);
733 734 735 736
		release_lock_stateid(stp);
	}
}

737 738 739 740 741 742
static void nfs4_free_lockowner(struct nfs4_lockowner *lo)
{
	kfree(lo->lo_owner.so_owner.data);
	kmem_cache_free(lockowner_slab, lo);
}

743
static void release_lockowner(struct nfs4_lockowner *lo)
744
{
745 746
	unhash_lockowner(lo);
	nfs4_free_lockowner(lo);
747 748 749
}

static void
750
release_stateid_lockowners(struct nfs4_ol_stateid *open_stp)
751
{
752
	struct nfs4_lockowner *lo;
753 754

	while (!list_empty(&open_stp->st_lockowners)) {
755 756 757
		lo = list_entry(open_stp->st_lockowners.next,
				struct nfs4_lockowner, lo_perstateid);
		release_lockowner(lo);
758 759 760
	}
}

761
static void unhash_open_stateid(struct nfs4_ol_stateid *stp)
762 763 764
{
	unhash_generic_stateid(stp);
	release_stateid_lockowners(stp);
765 766 767 768 769 770
	close_generic_stateid(stp);
}

static void release_open_stateid(struct nfs4_ol_stateid *stp)
{
	unhash_open_stateid(stp);
771 772 773
	free_generic_stateid(stp);
}

774
static void unhash_openowner(struct nfs4_openowner *oo)
775
{
776
	struct nfs4_ol_stateid *stp;
777

778 779 780 781
	list_del(&oo->oo_owner.so_strhash);
	list_del(&oo->oo_perclient);
	while (!list_empty(&oo->oo_owner.so_stateids)) {
		stp = list_first_entry(&oo->oo_owner.so_stateids,
782
				struct nfs4_ol_stateid, st_perstateowner);
783
		release_open_stateid(stp);
784 785 786
	}
}

787 788 789 790 791 792 793 794 795 796
static void release_last_closed_stateid(struct nfs4_openowner *oo)
{
	struct nfs4_ol_stateid *s = oo->oo_last_closed_stid;

	if (s) {
		free_generic_stateid(s);
		oo->oo_last_closed_stid = NULL;
	}
}

797 798 799 800 801 802
static void nfs4_free_openowner(struct nfs4_openowner *oo)
{
	kfree(oo->oo_owner.so_owner.data);
	kmem_cache_free(openowner_slab, oo);
}

803
static void release_openowner(struct nfs4_openowner *oo)
804
{
805 806
	unhash_openowner(oo);
	list_del(&oo->oo_close_lru);
807
	release_last_closed_stateid(oo);
808
	nfs4_free_openowner(oo);
809 810
}

M
Marc Eshel 已提交
811 812 813 814 815 816 817 818
static inline int
hash_sessionid(struct nfs4_sessionid *sessionid)
{
	struct nfsd4_sessionid *sid = (struct nfsd4_sessionid *)sessionid;

	return sid->sequence % SESSION_HASH_SIZE;
}

819
#ifdef NFSD_DEBUG
M
Marc Eshel 已提交
820 821 822 823 824 825
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]);
}
826 827 828 829 830 831 832
#else
static inline void
dump_sessionid(const char *fn, struct nfs4_sessionid *sessionid)
{
}
#endif

833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854
/*
 * 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))) {
		cstate->replay_owner = NULL;
		return;
	}
	if (!so)
		return;
	if (so->so_is_open_owner)
		release_last_closed_stateid(openowner(so));
	so->so_seqid++;
	return;
}
M
Marc Eshel 已提交
855

A
Andy Adamson 已提交
856 857 858 859 860 861 862 863 864 865 866 867 868
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;
}

/*
869 870 871 872 873 874 875 876 877 878 879 880 881
 * 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)

882 883 884 885 886 887 888 889 890
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]);
}

891
/*
892 893 894
 * We don't actually need to cache the rpc and session headers, so we
 * can allocate a little less for each slot:
 */
895
static inline u32 slot_bytes(struct nfsd4_channel_attrs *ca)
896
{
897
	u32 size;
898

899 900 901 902 903
	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);
904
}
A
Andy Adamson 已提交
905

906 907
/*
 * XXX: If we run out of reserved DRC memory we could (up to a point)
908
 * re-negotiate active sessions and reduce their slot usage to make
909
 * room for new connections. For now we just fail the create session.
A
Andy Adamson 已提交
910
 */
911
static u32 nfsd4_get_drc_mem(struct nfsd4_channel_attrs *ca)
A
Andy Adamson 已提交
912
{
913 914
	u32 slotsize = slot_bytes(ca);
	u32 num = ca->maxreqs;
915
	int avail;
A
Andy Adamson 已提交
916

917
	spin_lock(&nfsd_drc_lock);
918 919
	avail = min((unsigned long)NFSD_MAX_MEM_PER_SESSION,
		    nfsd_drc_max_mem - nfsd_drc_mem_used);
920 921 922
	num = min_t(int, num, avail / slotsize);
	nfsd_drc_mem_used += num * slotsize;
	spin_unlock(&nfsd_drc_lock);
A
Andy Adamson 已提交
923

924 925
	return num;
}
A
Andy Adamson 已提交
926

927
static void nfsd4_put_drc_mem(struct nfsd4_channel_attrs *ca)
928
{
929 930
	int slotsize = slot_bytes(ca);

931
	spin_lock(&nfsd_drc_lock);
932
	nfsd_drc_mem_used -= slotsize * ca->maxreqs;
933
	spin_unlock(&nfsd_drc_lock);
934
}
A
Andy Adamson 已提交
935

936 937
static struct nfsd4_session *alloc_session(struct nfsd4_channel_attrs *fattrs,
					   struct nfsd4_channel_attrs *battrs)
938
{
939 940
	int numslots = fattrs->maxreqs;
	int slotsize = slot_bytes(fattrs);
941 942
	struct nfsd4_session *new;
	int mem, i;
943

944 945 946
	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 已提交
947

948 949 950
	new = kzalloc(sizeof(*new) + mem, GFP_KERNEL);
	if (!new)
		return NULL;
951
	/* allocate each struct nfsd4_slot and data cache in one piece */
952
	for (i = 0; i < numslots; i++) {
953
		new->se_slots[i] = kzalloc(slotsize, GFP_KERNEL);
954
		if (!new->se_slots[i])
955 956
			goto out_free;
	}
957 958 959 960

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

961 962 963 964 965 966
	return new;
out_free:
	while (i--)
		kfree(new->se_slots[i]);
	kfree(new);
	return NULL;
A
Andy Adamson 已提交
967 968
}

969 970 971 972 973
static void free_conn(struct nfsd4_conn *c)
{
	svc_xprt_put(c->cn_xprt);
	kfree(c);
}
A
Andy Adamson 已提交
974

975 976 977 978
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 已提交
979

980 981 982 983 984
	spin_lock(&clp->cl_lock);
	if (!list_empty(&c->cn_persession)) {
		list_del(&c->cn_persession);
		free_conn(c);
	}
985
	nfsd4_probe_callback(clp);
986
	spin_unlock(&clp->cl_lock);
987
}
A
Andy Adamson 已提交
988

989
static struct nfsd4_conn *alloc_conn(struct svc_rqst *rqstp, u32 flags)
990 991
{
	struct nfsd4_conn *conn;
A
Andy Adamson 已提交
992

993 994
	conn = kmalloc(sizeof(struct nfsd4_conn), GFP_KERNEL);
	if (!conn)
995
		return NULL;
996 997
	svc_xprt_get(rqstp->rq_xprt);
	conn->cn_xprt = rqstp->rq_xprt;
998
	conn->cn_flags = flags;
999 1000 1001
	INIT_LIST_HEAD(&conn->cn_xpt_user.list);
	return conn;
}
1002

1003 1004 1005 1006
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 已提交
1007 1008
}

1009
static void nfsd4_hash_conn(struct nfsd4_conn *conn, struct nfsd4_session *ses)
1010
{
1011
	struct nfs4_client *clp = ses->se_client;
1012

1013
	spin_lock(&clp->cl_lock);
1014
	__nfsd4_hash_conn(conn, ses);
1015
	spin_unlock(&clp->cl_lock);
1016 1017
}

1018
static int nfsd4_register_conn(struct nfsd4_conn *conn)
1019
{
1020
	conn->cn_xpt_user.callback = nfsd4_conn_lost;
1021
	return register_xpt_user(conn->cn_xprt, &conn->cn_xpt_user);
1022 1023
}

1024
static void nfsd4_init_conn(struct svc_rqst *rqstp, struct nfsd4_conn *conn, struct nfsd4_session *ses)
A
Andy Adamson 已提交
1025
{
1026
	int ret;
A
Andy Adamson 已提交
1027

1028
	nfsd4_hash_conn(conn, ses);
1029 1030 1031 1032
	ret = nfsd4_register_conn(conn);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&conn->cn_xpt_user);
1033
	if (conn->cn_flags & NFS4_CDFC4_BACK) {
1034 1035 1036
		/* callback channel may be back up */
		nfsd4_probe_callback(ses->se_client);
	}
1037
}
A
Andy Adamson 已提交
1038

1039
static struct nfsd4_conn *alloc_conn_from_crses(struct svc_rqst *rqstp, struct nfsd4_create_session *cses)
1040 1041 1042
{
	u32 dir = NFS4_CDFC4_FORE;

1043
	if (cses->flags & SESSION4_BACK_CHAN)
1044
		dir |= NFS4_CDFC4_BACK;
1045
	return alloc_conn(rqstp, dir);
1046 1047 1048
}

/* must be called under client_lock */
1049
static void nfsd4_del_conns(struct nfsd4_session *s)
1050
{
1051 1052
	struct nfs4_client *clp = s->se_client;
	struct nfsd4_conn *c;
A
Andy Adamson 已提交
1053

1054 1055 1056 1057 1058
	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);
1059

1060 1061
		unregister_xpt_user(c->cn_xprt, &c->cn_xpt_user);
		free_conn(c);
A
Andy Adamson 已提交
1062

1063 1064 1065
		spin_lock(&clp->cl_lock);
	}
	spin_unlock(&clp->cl_lock);
1066
}
A
Andy Adamson 已提交
1067

1068 1069 1070 1071 1072 1073
static void __free_session(struct nfsd4_session *ses)
{
	free_session_slots(ses);
	kfree(ses);
}

1074
static void free_session(struct nfsd4_session *ses)
1075
{
1076
	struct nfsd_net *nn = net_generic(ses->se_client->net, nfsd_net_id);
1077 1078

	lockdep_assert_held(&nn->client_lock);
1079
	nfsd4_del_conns(ses);
1080
	nfsd4_put_drc_mem(&ses->se_fchannel);
1081
	__free_session(ses);
1082 1083
}

1084
static void init_session(struct svc_rqst *rqstp, struct nfsd4_session *new, struct nfs4_client *clp, struct nfsd4_create_session *cses)
1085 1086
{
	int idx;
1087
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
1088

A
Andy Adamson 已提交
1089 1090 1091
	new->se_client = clp;
	gen_sessionid(new);

1092 1093
	INIT_LIST_HEAD(&new->se_conns);

1094
	new->se_cb_seq_nr = 1;
A
Andy Adamson 已提交
1095
	new->se_flags = cses->flags;
1096
	new->se_cb_prog = cses->callback_prog;
1097
	new->se_cb_sec = cses->cb_sec;
1098
	atomic_set(&new->se_ref, 0);
1099
	idx = hash_sessionid(&new->se_sessionid);
1100
	spin_lock(&nn->client_lock);
1101
	list_add(&new->se_hash, &nn->sessionid_hashtbl[idx]);
1102
	spin_lock(&clp->cl_lock);
A
Andy Adamson 已提交
1103
	list_add(&new->se_perclnt, &clp->cl_sessions);
1104
	spin_unlock(&clp->cl_lock);
1105
	spin_unlock(&nn->client_lock);
1106

1107
	if (cses->flags & SESSION4_BACK_CHAN) {
1108
		struct sockaddr *sa = svc_addr(rqstp);
1109 1110 1111 1112 1113 1114 1115
		/*
		 * 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:
		 */
1116 1117 1118
		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 已提交
1119 1120
}

1121
/* caller must hold client_lock */
M
Marc Eshel 已提交
1122
static struct nfsd4_session *
1123
find_in_sessionid_hashtbl(struct nfs4_sessionid *sessionid, struct net *net)
M
Marc Eshel 已提交
1124 1125 1126
{
	struct nfsd4_session *elem;
	int idx;
1127
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
M
Marc Eshel 已提交
1128 1129 1130 1131

	dump_sessionid(__func__, sessionid);
	idx = hash_sessionid(sessionid);
	/* Search in the appropriate list */
1132
	list_for_each_entry(elem, &nn->sessionid_hashtbl[idx], se_hash) {
M
Marc Eshel 已提交
1133 1134 1135 1136 1137 1138 1139 1140 1141 1142
		if (!memcmp(elem->se_sessionid.data, sessionid->data,
			    NFS4_MAX_SESSIONID_LEN)) {
			return elem;
		}
	}

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

1143
/* caller must hold client_lock */
A
Andy Adamson 已提交
1144
static void
M
Marc Eshel 已提交
1145
unhash_session(struct nfsd4_session *ses)
A
Andy Adamson 已提交
1146 1147
{
	list_del(&ses->se_hash);
1148
	spin_lock(&ses->se_client->cl_lock);
A
Andy Adamson 已提交
1149
	list_del(&ses->se_perclnt);
1150
	spin_unlock(&ses->se_client->cl_lock);
M
Marc Eshel 已提交
1151 1152
}

L
Linus Torvalds 已提交
1153 1154
/* SETCLIENTID and SETCLIENTID_CONFIRM Helper functions */
static int
1155
STALE_CLIENTID(clientid_t *clid, struct nfsd_net *nn)
L
Linus Torvalds 已提交
1156
{
1157
	if (clid->cl_boot == nn->boot_time)
L
Linus Torvalds 已提交
1158
		return 0;
A
Andy Adamson 已提交
1159
	dprintk("NFSD stale clientid (%08x/%08x) boot_time %08lx\n",
1160
		clid->cl_boot, clid->cl_id, nn->boot_time);
L
Linus Torvalds 已提交
1161 1162 1163 1164 1165 1166 1167 1168
	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.
 */
1169
static struct nfs4_client *alloc_client(struct xdr_netobj name)
L
Linus Torvalds 已提交
1170 1171 1172
{
	struct nfs4_client *clp;

1173 1174 1175
	clp = kzalloc(sizeof(struct nfs4_client), GFP_KERNEL);
	if (clp == NULL)
		return NULL;
1176
	clp->cl_name.data = kmemdup(name.data, name.len, GFP_KERNEL);
1177 1178 1179
	if (clp->cl_name.data == NULL) {
		kfree(clp);
		return NULL;
L
Linus Torvalds 已提交
1180
	}
1181
	clp->cl_name.len = name.len;
1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193
	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_callbacks);
	INIT_LIST_HEAD(&clp->cl_revoked);
	spin_lock_init(&clp->cl_lock);
	rpc_init_wait_queue(&clp->cl_cb_waitq, "Backchannel slot table");
L
Linus Torvalds 已提交
1194 1195 1196
	return clp;
}

1197
static void
L
Linus Torvalds 已提交
1198 1199
free_client(struct nfs4_client *clp)
{
1200
	struct nfsd_net __maybe_unused *nn = net_generic(clp->net, nfsd_net_id);
1201 1202

	lockdep_assert_held(&nn->client_lock);
1203 1204 1205 1206 1207
	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);
1208 1209
		WARN_ON_ONCE(atomic_read(&ses->se_ref));
		free_session(ses);
1210
	}
1211
	rpc_destroy_wait_queue(&clp->cl_cb_waitq);
1212
	free_svc_cred(&clp->cl_cred);
L
Linus Torvalds 已提交
1213
	kfree(clp->cl_name.data);
M
majianpeng 已提交
1214
	idr_destroy(&clp->cl_stateids);
L
Linus Torvalds 已提交
1215 1216 1217
	kfree(clp);
}

B
Benny Halevy 已提交
1218 1219 1220 1221
/* must be called under the client_lock */
static inline void
unhash_client_locked(struct nfs4_client *clp)
{
1222 1223
	struct nfsd4_session *ses;

B
Benny Halevy 已提交
1224
	list_del(&clp->cl_lru);
1225
	spin_lock(&clp->cl_lock);
1226 1227
	list_for_each_entry(ses, &clp->cl_sessions, se_perclnt)
		list_del_init(&ses->se_hash);
1228
	spin_unlock(&clp->cl_lock);
B
Benny Halevy 已提交
1229 1230
}

L
Linus Torvalds 已提交
1231
static void
1232
destroy_client(struct nfs4_client *clp)
L
Linus Torvalds 已提交
1233
{
1234
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
1235 1236
	struct nfs4_delegation *dp;
	struct list_head reaplist;
1237
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
1238 1239

	INIT_LIST_HEAD(&reaplist);
1240
	spin_lock(&state_lock);
1241 1242 1243
	while (!list_empty(&clp->cl_delegations)) {
		dp = list_entry(clp->cl_delegations.next, struct nfs4_delegation, dl_perclnt);
		list_del_init(&dp->dl_perclnt);
L
Linus Torvalds 已提交
1244 1245
		list_move(&dp->dl_recall_lru, &reaplist);
	}
1246
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
1247 1248
	while (!list_empty(&reaplist)) {
		dp = list_entry(reaplist.next, struct nfs4_delegation, dl_recall_lru);
1249
		destroy_delegation(dp);
L
Linus Torvalds 已提交
1250
	}
1251 1252 1253 1254 1255
	list_splice_init(&clp->cl_revoked, &reaplist);
	while (!list_empty(&reaplist)) {
		dp = list_entry(reaplist.next, struct nfs4_delegation, dl_recall_lru);
		destroy_revoked_delegation(dp);
	}
1256
	while (!list_empty(&clp->cl_openowners)) {
1257 1258
		oo = list_entry(clp->cl_openowners.next, struct nfs4_openowner, oo_perclient);
		release_openowner(oo);
L
Linus Torvalds 已提交
1259
	}
1260
	nfsd4_shutdown_callback(clp);
B
Benny Halevy 已提交
1261 1262
	if (clp->cl_cb_conn.cb_xprt)
		svc_xprt_put(clp->cl_cb_conn.cb_xprt);
1263
	list_del(&clp->cl_idhash);
1264
	if (test_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags))
1265
		rb_erase(&clp->cl_namenode, &nn->conf_name_tree);
1266
	else
1267
		rb_erase(&clp->cl_namenode, &nn->unconf_name_tree);
1268
	spin_lock(&nn->client_lock);
B
Benny Halevy 已提交
1269
	unhash_client_locked(clp);
1270 1271
	WARN_ON_ONCE(atomic_read(&clp->cl_refcount));
	free_client(clp);
1272
	spin_unlock(&nn->client_lock);
L
Linus Torvalds 已提交
1273 1274
}

1275 1276 1277 1278 1279 1280
static void expire_client(struct nfs4_client *clp)
{
	nfsd4_client_record_remove(clp);
	destroy_client(clp);
}

1281 1282 1283 1284
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 已提交
1285 1286
}

1287 1288
static void copy_clid(struct nfs4_client *target, struct nfs4_client *source)
{
L
Linus Torvalds 已提交
1289 1290 1291 1292
	target->cl_clientid.cl_boot = source->cl_clientid.cl_boot; 
	target->cl_clientid.cl_id = source->cl_clientid.cl_id; 
}

1293
static int copy_cred(struct svc_cred *target, struct svc_cred *source)
1294
{
1295 1296 1297 1298 1299 1300 1301
	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;
1302
	target->cr_flavor = source->cr_flavor;
L
Linus Torvalds 已提交
1303 1304 1305 1306
	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);
1307 1308 1309
	target->cr_gss_mech = source->cr_gss_mech;
	if (source->cr_gss_mech)
		gss_mech_get(source->cr_gss_mech);
1310
	return 0;
L
Linus Torvalds 已提交
1311 1312
}

1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323
static long long
compare_blob(const struct xdr_netobj *o1, const struct xdr_netobj *o2)
{
	long long res;

	res = o1->len - o2->len;
	if (res)
		return res;
	return (long long)memcmp(o1->data, o2->data, o1->len);
}

1324
static int same_name(const char *n1, const char *n2)
1325
{
N
NeilBrown 已提交
1326
	return 0 == memcmp(n1, n2, HEXDIR_LEN);
L
Linus Torvalds 已提交
1327 1328 1329
}

static int
1330 1331 1332
same_verf(nfs4_verifier *v1, nfs4_verifier *v2)
{
	return 0 == memcmp(v1->data, v2->data, sizeof(v1->data));
L
Linus Torvalds 已提交
1333 1334 1335
}

static int
1336 1337 1338
same_clid(clientid_t *cl1, clientid_t *cl2)
{
	return (cl1->cl_boot == cl2->cl_boot) && (cl1->cl_id == cl2->cl_id);
L
Linus Torvalds 已提交
1339 1340
}

1341 1342 1343 1344 1345 1346 1347
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++)
1348
		if (!gid_eq(GROUP_AT(g1, i), GROUP_AT(g2, i)))
1349 1350 1351 1352
			return false;
	return true;
}

1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368
/*
 * 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);
}


1369
static bool
1370 1371
same_creds(struct svc_cred *cr1, struct svc_cred *cr2)
{
1372
	if ((is_gss_cred(cr1) != is_gss_cred(cr2))
1373 1374
		|| (!uid_eq(cr1->cr_uid, cr2->cr_uid))
		|| (!gid_eq(cr1->cr_gid, cr2->cr_gid))
1375 1376 1377 1378 1379 1380
		|| !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;
1381
	return 0 == strcmp(cr1->cr_principal, cr2->cr_principal);
L
Linus Torvalds 已提交
1382 1383
}

1384 1385 1386 1387 1388
static bool svc_rqst_integrity_protected(struct svc_rqst *rqstp)
{
	struct svc_cred *cr = &rqstp->rq_cred;
	u32 service;

1389 1390
	if (!cr->cr_gss_mech)
		return false;
1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410
	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);
}

1411
static void gen_clid(struct nfs4_client *clp, struct nfsd_net *nn)
1412 1413 1414
{
	static u32 current_clientid = 1;

1415
	clp->cl_clientid.cl_boot = nn->boot_time;
L
Linus Torvalds 已提交
1416 1417 1418
	clp->cl_clientid.cl_id = current_clientid++; 
}

1419 1420
static void gen_confirm(struct nfs4_client *clp)
{
1421
	__be32 verf[2];
1422
	static u32 i;
L
Linus Torvalds 已提交
1423

1424 1425 1426
	verf[0] = (__be32)get_seconds();
	verf[1] = (__be32)i++;
	memcpy(clp->cl_confirm.data, verf, sizeof(clp->cl_confirm.data));
L
Linus Torvalds 已提交
1427 1428
}

1429
static struct nfs4_stid *find_stateid(struct nfs4_client *cl, stateid_t *t)
1430
{
J
J. Bruce Fields 已提交
1431 1432 1433 1434 1435 1436
	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 已提交
1437 1438
}

1439
static struct nfs4_stid *find_stateid_by_type(struct nfs4_client *cl, stateid_t *t, char typemask)
1440 1441
{
	struct nfs4_stid *s;
J
J. Bruce Fields 已提交
1442

1443
	s = find_stateid(cl, t);
J
J. Bruce Fields 已提交
1444 1445
	if (!s)
		return NULL;
1446
	if (typemask & s->sc_type)
1447 1448 1449 1450
		return s;
	return NULL;
}

J
Jeff Layton 已提交
1451
static struct nfs4_client *create_client(struct xdr_netobj name,
1452 1453 1454 1455
		struct svc_rqst *rqstp, nfs4_verifier *verf)
{
	struct nfs4_client *clp;
	struct sockaddr *sa = svc_addr(rqstp);
1456
	int ret;
1457
	struct net *net = SVC_NET(rqstp);
1458
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
1459 1460 1461 1462 1463

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

1464 1465
	ret = copy_cred(&clp->cl_cred, &rqstp->rq_cred);
	if (ret) {
1466
		spin_lock(&nn->client_lock);
1467
		free_client(clp);
1468
		spin_unlock(&nn->client_lock);
1469
		return NULL;
1470
	}
1471
	nfsd4_init_callback(&clp->cl_cb_null);
B
Benny Halevy 已提交
1472
	clp->cl_time = get_seconds();
1473 1474 1475 1476
	clear_bit(0, &clp->cl_cb_slot_busy);
	copy_verf(clp, verf);
	rpc_copy_addr((struct sockaddr *) &clp->cl_addr, sa);
	gen_confirm(clp);
1477
	clp->cl_cb_session = NULL;
1478
	clp->net = net;
1479 1480 1481
	return clp;
}

1482
static void
1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523
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)
{
	long long cmp;
	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 已提交
1524 1525
{
	unsigned int idhashval;
1526
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
1527

1528
	clear_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
1529
	add_clp_to_name_tree(clp, &nn->unconf_name_tree);
L
Linus Torvalds 已提交
1530
	idhashval = clientid_hashval(clp->cl_clientid.cl_id);
1531
	list_add(&clp->cl_idhash, &nn->unconf_id_hashtbl[idhashval]);
1532
	renew_client(clp);
L
Linus Torvalds 已提交
1533 1534
}

1535
static void
L
Linus Torvalds 已提交
1536 1537 1538
move_to_confirmed(struct nfs4_client *clp)
{
	unsigned int idhashval = clientid_hashval(clp->cl_clientid.cl_id);
1539
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
L
Linus Torvalds 已提交
1540 1541

	dprintk("NFSD: move_to_confirm nfs4_client %p\n", clp);
1542
	list_move(&clp->cl_idhash, &nn->conf_id_hashtbl[idhashval]);
1543
	rb_erase(&clp->cl_namenode, &nn->unconf_name_tree);
1544
	add_clp_to_name_tree(clp, &nn->conf_name_tree);
1545
	set_bit(NFSD4_CLIENT_CONFIRMED, &clp->cl_flags);
L
Linus Torvalds 已提交
1546 1547 1548 1549
	renew_client(clp);
}

static struct nfs4_client *
J
J. Bruce Fields 已提交
1550
find_client_in_id_table(struct list_head *tbl, clientid_t *clid, bool sessions)
L
Linus Torvalds 已提交
1551 1552 1553 1554
{
	struct nfs4_client *clp;
	unsigned int idhashval = clientid_hashval(clid->cl_id);

J
J. Bruce Fields 已提交
1555
	list_for_each_entry(clp, &tbl[idhashval], cl_idhash) {
1556
		if (same_clid(&clp->cl_clientid, clid)) {
1557 1558
			if ((bool)clp->cl_minorversion != sessions)
				return NULL;
1559
			renew_client(clp);
L
Linus Torvalds 已提交
1560
			return clp;
1561
		}
L
Linus Torvalds 已提交
1562 1563 1564 1565
	}
	return NULL;
}

J
J. Bruce Fields 已提交
1566 1567 1568 1569 1570 1571 1572 1573
static struct nfs4_client *
find_confirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
{
	struct list_head *tbl = nn->conf_id_hashtbl;

	return find_client_in_id_table(tbl, clid, sessions);
}

L
Linus Torvalds 已提交
1574
static struct nfs4_client *
1575
find_unconfirmed_client(clientid_t *clid, bool sessions, struct nfsd_net *nn)
L
Linus Torvalds 已提交
1576
{
J
J. Bruce Fields 已提交
1577
	struct list_head *tbl = nn->unconf_id_hashtbl;
L
Linus Torvalds 已提交
1578

J
J. Bruce Fields 已提交
1579
	return find_client_in_id_table(tbl, clid, sessions);
L
Linus Torvalds 已提交
1580 1581
}

1582
static bool clp_used_exchangeid(struct nfs4_client *clp)
1583
{
1584
	return clp->cl_exchange_flags != 0;
1585
} 
1586

1587
static struct nfs4_client *
1588
find_confirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
1589
{
1590
	return find_clp_in_name_tree(name, &nn->conf_name_tree);
1591 1592 1593
}

static struct nfs4_client *
1594
find_unconfirmed_client_by_name(struct xdr_netobj *name, struct nfsd_net *nn)
1595
{
1596
	return find_clp_in_name_tree(name, &nn->unconf_name_tree);
1597 1598
}

1599
static void
1600
gen_callback(struct nfs4_client *clp, struct nfsd4_setclientid *se, struct svc_rqst *rqstp)
L
Linus Torvalds 已提交
1601
{
1602
	struct nfs4_cb_conn *conn = &clp->cl_cb_conn;
1603 1604
	struct sockaddr	*sa = svc_addr(rqstp);
	u32 scopeid = rpc_get_scope_id(sa);
1605 1606 1607 1608 1609 1610 1611 1612 1613 1614
	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 已提交
1615 1616
		goto out_err;

1617
	conn->cb_addrlen = rpc_uaddr2sockaddr(clp->net, se->se_callback_addr_val,
1618
					    se->se_callback_addr_len,
1619 1620
					    (struct sockaddr *)&conn->cb_addr,
					    sizeof(conn->cb_addr));
1621

1622
	if (!conn->cb_addrlen || conn->cb_addr.ss_family != expected_family)
L
Linus Torvalds 已提交
1623
		goto out_err;
1624

1625 1626
	if (conn->cb_addr.ss_family == AF_INET6)
		((struct sockaddr_in6 *)&conn->cb_addr)->sin6_scope_id = scopeid;
1627

1628 1629
	conn->cb_prog = se->se_callback_prog;
	conn->cb_ident = se->se_callback_ident;
1630
	memcpy(&conn->cb_saddr, &rqstp->rq_daddr, rqstp->rq_daddrlen);
L
Linus Torvalds 已提交
1631 1632
	return;
out_err:
1633 1634
	conn->cb_addr.ss_family = AF_UNSPEC;
	conn->cb_addrlen = 0;
N
Neil Brown 已提交
1635
	dprintk(KERN_INFO "NFSD: this client (clientid %08x/%08x) "
L
Linus Torvalds 已提交
1636 1637 1638 1639 1640 1641
		"will not receive delegations\n",
		clp->cl_clientid.cl_boot, clp->cl_clientid.cl_id);

	return;
}

1642
/*
1643
 * Cache a reply. nfsd4_check_resp_size() has bounded the cache size.
1644 1645 1646 1647
 */
void
nfsd4_store_cache_entry(struct nfsd4_compoundres *resp)
{
1648
	struct xdr_buf *buf = resp->xdr.buf;
1649 1650
	struct nfsd4_slot *slot = resp->cstate.slot;
	unsigned int base;
1651

1652
	dprintk("--> %s slot %p\n", __func__, slot);
1653

1654 1655
	slot->sl_opcnt = resp->opcnt;
	slot->sl_status = resp->cstate.status;
1656

1657
	slot->sl_flags |= NFSD4_SLOT_INITIALIZED;
1658
	if (nfsd4_not_cached(resp)) {
1659
		slot->sl_datalen = 0;
1660
		return;
1661
	}
1662 1663 1664
	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))
1665 1666
		WARN("%s: sessions DRC could not cache compound\n", __func__);
	return;
1667 1668 1669
}

/*
1670 1671 1672 1673
 * 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.
1674 1675
 *
 */
1676 1677 1678
static __be32
nfsd4_enc_sequence_replay(struct nfsd4_compoundargs *args,
			  struct nfsd4_compoundres *resp)
1679
{
1680 1681
	struct nfsd4_op *op;
	struct nfsd4_slot *slot = resp->cstate.slot;
1682

1683 1684 1685
	/* Encode the replayed sequence operation */
	op = &args->ops[resp->opcnt - 1];
	nfsd4_encode_operation(resp, op);
1686

1687
	/* Return nfserr_retry_uncached_rep in next operation. */
1688
	if (args->opcnt > 1 && !(slot->sl_flags & NFSD4_SLOT_CACHETHIS)) {
1689 1690 1691
		op = &args->ops[resp->opcnt++];
		op->status = nfserr_retry_uncached_rep;
		nfsd4_encode_operation(resp, op);
1692
	}
1693
	return op->status;
1694 1695 1696
}

/*
1697 1698
 * The sequence operation is not cached because we can use the slot and
 * session values.
1699
 */
1700
static __be32
1701 1702
nfsd4_replay_cache_entry(struct nfsd4_compoundres *resp,
			 struct nfsd4_sequence *seq)
1703
{
1704
	struct nfsd4_slot *slot = resp->cstate.slot;
1705 1706
	struct xdr_stream *xdr = &resp->xdr;
	__be32 *p;
1707 1708
	__be32 status;

1709
	dprintk("--> %s slot %p\n", __func__, slot);
1710

1711
	status = nfsd4_enc_sequence_replay(resp->rqstp->rq_argp, resp);
1712
	if (status)
1713
		return status;
1714

1715 1716 1717 1718 1719 1720 1721
	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);
1722

1723
	resp->opcnt = slot->sl_opcnt;
1724
	return slot->sl_status;
1725 1726
}

A
Andy Adamson 已提交
1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742
/*
 * Set the exchange_id flags returned by the server.
 */
static void
nfsd4_set_ex_flags(struct nfs4_client *new, struct nfsd4_exchange_id *clid)
{
	/* pNFS is not supported */
	new->cl_exchange_flags |= EXCHGID4_FLAG_USE_NON_PNFS;

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

1743 1744 1745 1746 1747 1748 1749 1750
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.
	 */
1751 1752 1753
	return !list_empty(&clp->cl_openowners)
		|| !list_empty(&clp->cl_delegations)
		|| !list_empty(&clp->cl_sessions);
1754 1755
}

A
Andy Adamson 已提交
1756 1757 1758 1759 1760
__be32
nfsd4_exchange_id(struct svc_rqst *rqstp,
		  struct nfsd4_compound_state *cstate,
		  struct nfsd4_exchange_id *exid)
{
A
Andy Adamson 已提交
1761
	struct nfs4_client *unconf, *conf, *new;
J
J. Bruce Fields 已提交
1762
	__be32 status;
1763
	char			addr_str[INET6_ADDRSTRLEN];
A
Andy Adamson 已提交
1764
	nfs4_verifier		verf = exid->verifier;
1765
	struct sockaddr		*sa = svc_addr(rqstp);
1766
	bool	update = exid->flags & EXCHGID4_FLAG_UPD_CONFIRMED_REC_A;
1767
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
1768

1769
	rpc_ntop(sa, addr_str, sizeof(addr_str));
A
Andy Adamson 已提交
1770
	dprintk("%s rqstp=%p exid=%p clname.len=%u clname.data=%p "
1771
		"ip_addr=%s flags %x, spa_how %d\n",
A
Andy Adamson 已提交
1772
		__func__, rqstp, exid, exid->clname.len, exid->clname.data,
1773
		addr_str, exid->flags, exid->spa_how);
A
Andy Adamson 已提交
1774

1775
	if (exid->flags & ~EXCHGID4_FLAG_MASK_A)
A
Andy Adamson 已提交
1776 1777 1778
		return nfserr_inval;

	switch (exid->spa_how) {
1779 1780 1781
	case SP4_MACH_CRED:
		if (!svc_rqst_integrity_protected(rqstp))
			return nfserr_inval;
A
Andy Adamson 已提交
1782 1783
	case SP4_NONE:
		break;
1784 1785
	default:				/* checked by xdr code */
		WARN_ON_ONCE(1);
A
Andy Adamson 已提交
1786
	case SP4_SSV:
1787
		return nfserr_encr_alg_unsupp;
A
Andy Adamson 已提交
1788 1789
	}

1790
	/* Cases below refer to rfc 5661 section 18.35.4: */
A
Andy Adamson 已提交
1791
	nfs4_lock_state();
1792
	conf = find_confirmed_client_by_name(&exid->clname, nn);
A
Andy Adamson 已提交
1793
	if (conf) {
1794 1795 1796
		bool creds_match = same_creds(&conf->cl_cred, &rqstp->rq_cred);
		bool verfs_match = same_verf(&verf, &conf->cl_verifier);

1797 1798
		if (update) {
			if (!clp_used_exchangeid(conf)) { /* buggy client */
1799
				status = nfserr_inval;
1800 1801
				goto out;
			}
1802 1803 1804 1805
			if (!mach_creds_match(conf, rqstp)) {
				status = nfserr_wrong_cred;
				goto out;
			}
1806
			if (!creds_match) { /* case 9 */
1807
				status = nfserr_perm;
1808 1809 1810
				goto out;
			}
			if (!verfs_match) { /* case 8 */
A
Andy Adamson 已提交
1811 1812 1813
				status = nfserr_not_same;
				goto out;
			}
1814 1815 1816 1817
			/* case 6 */
			exid->flags |= EXCHGID4_FLAG_CONFIRMED_R;
			new = conf;
			goto out_copy;
A
Andy Adamson 已提交
1818
		}
1819
		if (!creds_match) { /* case 3 */
1820 1821
			if (client_has_state(conf)) {
				status = nfserr_clid_inuse;
A
Andy Adamson 已提交
1822 1823 1824 1825 1826
				goto out;
			}
			expire_client(conf);
			goto out_new;
		}
1827
		if (verfs_match) { /* case 2 */
1828
			conf->cl_exchange_flags |= EXCHGID4_FLAG_CONFIRMED_R;
1829 1830 1831 1832 1833
			new = conf;
			goto out_copy;
		}
		/* case 5, client reboot */
		goto out_new;
1834 1835
	}

1836
	if (update) { /* case 7 */
1837 1838
		status = nfserr_noent;
		goto out;
A
Andy Adamson 已提交
1839 1840
	}

1841
	unconf  = find_unconfirmed_client_by_name(&exid->clname, nn);
1842
	if (unconf) /* case 4, possible retry or client restart */
A
Andy Adamson 已提交
1843 1844
		expire_client(unconf);

1845
	/* case 1 (normal case) */
A
Andy Adamson 已提交
1846
out_new:
J
Jeff Layton 已提交
1847
	new = create_client(exid->clname, rqstp, &verf);
A
Andy Adamson 已提交
1848
	if (new == NULL) {
1849
		status = nfserr_jukebox;
A
Andy Adamson 已提交
1850 1851
		goto out;
	}
1852
	new->cl_minorversion = cstate->minorversion;
1853
	new->cl_mach_cred = (exid->spa_how == SP4_MACH_CRED);
A
Andy Adamson 已提交
1854

1855
	gen_clid(new, nn);
1856
	add_to_unconfirmed(new);
A
Andy Adamson 已提交
1857 1858 1859 1860
out_copy:
	exid->clientid.cl_boot = new->cl_clientid.cl_boot;
	exid->clientid.cl_id = new->cl_clientid.cl_id;

1861
	exid->seqid = new->cl_cs_slot.sl_seqid + 1;
A
Andy Adamson 已提交
1862 1863 1864
	nfsd4_set_ex_flags(new, exid);

	dprintk("nfsd4_exchange_id seqid %d flags %x\n",
1865
		new->cl_cs_slot.sl_seqid, new->cl_exchange_flags);
A
Andy Adamson 已提交
1866 1867 1868 1869 1870
	status = nfs_ok;

out:
	nfs4_unlock_state();
	return status;
A
Andy Adamson 已提交
1871 1872
}

J
J. Bruce Fields 已提交
1873
static __be32
1874
check_slot_seqid(u32 seqid, u32 slot_seqid, int slot_inuse)
B
Benny Halevy 已提交
1875
{
1876 1877
	dprintk("%s enter. seqid %d slot_seqid %d\n", __func__, seqid,
		slot_seqid);
B
Benny Halevy 已提交
1878 1879

	/* The slot is in use, and no response has been sent. */
1880 1881
	if (slot_inuse) {
		if (seqid == slot_seqid)
B
Benny Halevy 已提交
1882 1883 1884 1885
			return nfserr_jukebox;
		else
			return nfserr_seq_misordered;
	}
1886
	/* Note unsigned 32-bit arithmetic handles wraparound: */
1887
	if (likely(seqid == slot_seqid + 1))
B
Benny Halevy 已提交
1888
		return nfs_ok;
1889
	if (seqid == slot_seqid)
B
Benny Halevy 已提交
1890 1891 1892 1893
		return nfserr_replay_cache;
	return nfserr_seq_misordered;
}

1894 1895 1896 1897 1898 1899 1900
/*
 * 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 已提交
1901
			   struct nfsd4_clid_slot *slot, __be32 nfserr)
1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914
{
	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;
}

1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931
#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))

1932
static __be32 check_forechannel_attrs(struct nfsd4_channel_attrs *ca, struct nfsd_net *nn)
1933
{
1934 1935
	u32 maxrpc = nn->nfsd_serv->sv_max_mesg;

1936 1937 1938 1939
	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;
1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958
	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;

1959
	return nfs_ok;
1960 1961
}

1962 1963 1964 1965 1966
#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))

1967
static __be32 check_backchannel_attrs(struct nfsd4_channel_attrs *ca)
1968
{
1969 1970 1971 1972 1973 1974 1975 1976
	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:
	 */
1977
	if (ca->maxreq_sz < NFSD_CB_MAX_REQ_SZ)
1978
		return nfserr_toosmall;
1979
	if (ca->maxresp_sz < NFSD_CB_MAX_RESP_SZ)
1980 1981 1982 1983 1984 1985
		return nfserr_toosmall;
	ca->maxresp_cached = 0;
	if (ca->maxops < 2)
		return nfserr_toosmall;

	return nfs_ok;
1986 1987
}

1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005
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 已提交
2006 2007 2008 2009 2010
__be32
nfsd4_create_session(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
		     struct nfsd4_create_session *cr_ses)
{
2011
	struct sockaddr *sa = svc_addr(rqstp);
A
Andy Adamson 已提交
2012
	struct nfs4_client *conf, *unconf;
2013
	struct nfsd4_session *new;
2014
	struct nfsd4_conn *conn;
2015
	struct nfsd4_clid_slot *cs_slot = NULL;
J
J. Bruce Fields 已提交
2016
	__be32 status = 0;
2017
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
A
Andy Adamson 已提交
2018

2019 2020
	if (cr_ses->flags & ~SESSION4_FLAG_MASK_A)
		return nfserr_inval;
2021 2022 2023
	status = nfsd4_check_cb_sec(&cr_ses->cb_sec);
	if (status)
		return status;
2024
	status = check_forechannel_attrs(&cr_ses->fore_channel, nn);
2025 2026 2027
	if (status)
		return status;
	status = check_backchannel_attrs(&cr_ses->back_channel);
2028
	if (status)
2029
		goto out_release_drc_mem;
2030
	status = nfserr_jukebox;
2031
	new = alloc_session(&cr_ses->fore_channel, &cr_ses->back_channel);
2032 2033
	if (!new)
		goto out_release_drc_mem;
2034 2035 2036
	conn = alloc_conn_from_crses(rqstp, cr_ses);
	if (!conn)
		goto out_free_session;
2037

A
Andy Adamson 已提交
2038
	nfs4_lock_state();
2039
	unconf = find_unconfirmed_client(&cr_ses->clientid, true, nn);
2040
	conf = find_confirmed_client(&cr_ses->clientid, true, nn);
2041
	WARN_ON_ONCE(conf && unconf);
A
Andy Adamson 已提交
2042 2043

	if (conf) {
2044 2045 2046
		status = nfserr_wrong_cred;
		if (!mach_creds_match(conf, rqstp))
			goto out_free_conn;
2047 2048
		cs_slot = &conf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2049
		if (status == nfserr_replay_cache) {
2050
			status = nfsd4_replay_create_session(cr_ses, cs_slot);
2051
			goto out_free_conn;
2052
		} else if (cr_ses->seqid != cs_slot->sl_seqid + 1) {
A
Andy Adamson 已提交
2053
			status = nfserr_seq_misordered;
2054
			goto out_free_conn;
A
Andy Adamson 已提交
2055 2056
		}
	} else if (unconf) {
J
J. Bruce Fields 已提交
2057
		struct nfs4_client *old;
A
Andy Adamson 已提交
2058
		if (!same_creds(&unconf->cl_cred, &rqstp->rq_cred) ||
2059
		    !rpc_cmp_addr(sa, (struct sockaddr *) &unconf->cl_addr)) {
A
Andy Adamson 已提交
2060
			status = nfserr_clid_inuse;
2061
			goto out_free_conn;
A
Andy Adamson 已提交
2062
		}
2063 2064 2065
		status = nfserr_wrong_cred;
		if (!mach_creds_match(unconf, rqstp))
			goto out_free_conn;
2066 2067
		cs_slot = &unconf->cl_cs_slot;
		status = check_slot_seqid(cr_ses->seqid, cs_slot->sl_seqid, 0);
2068 2069
		if (status) {
			/* an unconfirmed replay returns misordered */
A
Andy Adamson 已提交
2070
			status = nfserr_seq_misordered;
2071
			goto out_free_conn;
A
Andy Adamson 已提交
2072
		}
2073
		old = find_confirmed_client_by_name(&unconf->cl_name, nn);
2074 2075 2076 2077
		if (old) {
			status = mark_client_expired(old);
			if (status)
				goto out_free_conn;
J
J. Bruce Fields 已提交
2078
			expire_client(old);
2079
		}
J
J. Bruce Fields 已提交
2080
		move_to_confirmed(unconf);
A
Andy Adamson 已提交
2081 2082 2083
		conf = unconf;
	} else {
		status = nfserr_stale_clientid;
2084
		goto out_free_conn;
A
Andy Adamson 已提交
2085
	}
2086
	status = nfs_ok;
2087 2088 2089 2090 2091 2092
	/*
	 * We do not support RDMA or persistent sessions
	 */
	cr_ses->flags &= ~SESSION4_PERSIST;
	cr_ses->flags &= ~SESSION4_RDMA;

2093 2094 2095
	init_session(rqstp, new, conf, cr_ses);
	nfsd4_init_conn(rqstp, conn, new);

2096
	memcpy(cr_ses->sessionid.data, new->se_sessionid.data,
A
Andy Adamson 已提交
2097
	       NFS4_MAX_SESSIONID_LEN);
2098
	cs_slot->sl_seqid++;
2099
	cr_ses->seqid = cs_slot->sl_seqid;
A
Andy Adamson 已提交
2100

2101 2102
	/* cache solo and embedded create sessions under the state lock */
	nfsd4_cache_create_session(cr_ses, cs_slot, status);
A
Andy Adamson 已提交
2103 2104
	nfs4_unlock_state();
	return status;
2105
out_free_conn:
2106
	nfs4_unlock_state();
2107 2108 2109
	free_conn(conn);
out_free_session:
	__free_session(new);
2110 2111
out_release_drc_mem:
	nfsd4_put_drc_mem(&cr_ses->fore_channel);
J
J. Bruce Fields 已提交
2112
	return status;
A
Andy Adamson 已提交
2113 2114
}

2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128
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;
}

2129 2130 2131
__be32 nfsd4_backchannel_ctl(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_backchannel_ctl *bc)
{
	struct nfsd4_session *session = cstate->session;
2132
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2133
	__be32 status;
2134

2135 2136 2137
	status = nfsd4_check_cb_sec(&bc->bc_cb_sec);
	if (status)
		return status;
2138
	spin_lock(&nn->client_lock);
2139 2140
	session->se_cb_prog = bc->bc_cb_program;
	session->se_cb_sec = bc->bc_cb_sec;
2141
	spin_unlock(&nn->client_lock);
2142 2143 2144 2145 2146 2147

	nfsd4_probe_callback(session->se_client);

	return nfs_ok;
}

2148 2149 2150 2151 2152
__be32 nfsd4_bind_conn_to_session(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
		     struct nfsd4_bind_conn_to_session *bcts)
{
	__be32 status;
2153
	struct nfsd4_conn *conn;
2154
	struct nfsd4_session *session;
2155
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2156 2157 2158

	if (!nfsd4_last_compound_op(rqstp))
		return nfserr_not_only_op;
2159
	nfs4_lock_state();
2160
	spin_lock(&nn->client_lock);
2161
	session = find_in_sessionid_hashtbl(&bcts->sessionid, SVC_NET(rqstp));
2162
	spin_unlock(&nn->client_lock);
2163 2164 2165
	status = nfserr_badsession;
	if (!session)
		goto out;
2166 2167 2168
	status = nfserr_wrong_cred;
	if (!mach_creds_match(session->se_client, rqstp))
		goto out;
2169
	status = nfsd4_map_bcts_dir(&bcts->dir);
2170
	if (status)
2171
		goto out;
2172
	conn = alloc_conn(rqstp, bcts->dir);
2173
	status = nfserr_jukebox;
2174
	if (!conn)
2175 2176 2177 2178 2179 2180
		goto out;
	nfsd4_init_conn(rqstp, conn, session);
	status = nfs_ok;
out:
	nfs4_unlock_state();
	return status;
2181 2182
}

2183 2184 2185 2186 2187 2188 2189
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 已提交
2190 2191 2192 2193 2194
__be32
nfsd4_destroy_session(struct svc_rqst *r,
		      struct nfsd4_compound_state *cstate,
		      struct nfsd4_destroy_session *sessionid)
{
B
Benny Halevy 已提交
2195
	struct nfsd4_session *ses;
2196
	__be32 status;
2197
	int ref_held_by_me = 0;
2198
	struct nfsd_net *nn = net_generic(SVC_NET(r), nfsd_net_id);
B
Benny Halevy 已提交
2199

2200 2201
	nfs4_lock_state();
	status = nfserr_not_only_op;
2202
	if (nfsd4_compound_in_session(cstate->session, &sessionid->sessionid)) {
2203
		if (!nfsd4_last_compound_op(r))
2204
			goto out;
2205
		ref_held_by_me++;
2206
	}
B
Benny Halevy 已提交
2207
	dump_sessionid(__func__, &sessionid->sessionid);
2208
	spin_lock(&nn->client_lock);
2209
	ses = find_in_sessionid_hashtbl(&sessionid->sessionid, SVC_NET(r));
2210 2211 2212
	status = nfserr_badsession;
	if (!ses)
		goto out_client_lock;
2213 2214
	status = nfserr_wrong_cred;
	if (!mach_creds_match(ses->se_client, r))
2215
		goto out_client_lock;
2216 2217
	nfsd4_get_session_locked(ses);
	status = mark_session_dead_locked(ses, 1 + ref_held_by_me);
2218
	if (status)
2219
		goto out_put_session;
B
Benny Halevy 已提交
2220
	unhash_session(ses);
2221
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2222

2223
	nfsd4_probe_callback_sync(ses->se_client);
2224

2225
	spin_lock(&nn->client_lock);
B
Benny Halevy 已提交
2226
	status = nfs_ok;
2227 2228
out_put_session:
	nfsd4_put_session(ses);
2229 2230
out_client_lock:
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2231
out:
2232
	nfs4_unlock_state();
B
Benny Halevy 已提交
2233
	return status;
A
Andy Adamson 已提交
2234 2235
}

2236
static struct nfsd4_conn *__nfsd4_find_conn(struct svc_xprt *xpt, struct nfsd4_session *s)
2237 2238 2239 2240
{
	struct nfsd4_conn *c;

	list_for_each_entry(c, &s->se_conns, cn_persession) {
2241
		if (c->cn_xprt == xpt) {
2242 2243 2244 2245 2246 2247
			return c;
		}
	}
	return NULL;
}

2248
static __be32 nfsd4_sequence_check_conn(struct nfsd4_conn *new, struct nfsd4_session *ses)
2249 2250
{
	struct nfs4_client *clp = ses->se_client;
2251
	struct nfsd4_conn *c;
2252
	__be32 status = nfs_ok;
2253
	int ret;
2254 2255

	spin_lock(&clp->cl_lock);
2256
	c = __nfsd4_find_conn(new->cn_xprt, ses);
2257 2258 2259 2260 2261
	if (c)
		goto out_free;
	status = nfserr_conn_not_bound_to_session;
	if (clp->cl_mach_cred)
		goto out_free;
2262 2263
	__nfsd4_hash_conn(new, ses);
	spin_unlock(&clp->cl_lock);
2264 2265 2266 2267
	ret = nfsd4_register_conn(new);
	if (ret)
		/* oops; xprt is already down: */
		nfsd4_conn_lost(&new->cn_xpt_user);
2268 2269 2270 2271 2272
	return nfs_ok;
out_free:
	spin_unlock(&clp->cl_lock);
	free_conn(new);
	return status;
2273 2274
}

2275 2276 2277 2278 2279 2280 2281
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 已提交
2282 2283 2284 2285 2286 2287 2288 2289
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 已提交
2290
__be32
B
Benny Halevy 已提交
2291
nfsd4_sequence(struct svc_rqst *rqstp,
A
Andy Adamson 已提交
2292 2293 2294
	       struct nfsd4_compound_state *cstate,
	       struct nfsd4_sequence *seq)
{
2295
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
2296
	struct xdr_stream *xdr = &resp->xdr;
B
Benny Halevy 已提交
2297
	struct nfsd4_session *session;
2298
	struct nfs4_client *clp;
B
Benny Halevy 已提交
2299
	struct nfsd4_slot *slot;
2300
	struct nfsd4_conn *conn;
J
J. Bruce Fields 已提交
2301
	__be32 status;
2302
	int buflen;
2303
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
B
Benny Halevy 已提交
2304

2305 2306 2307
	if (resp->opcnt != 1)
		return nfserr_sequence_pos;

2308 2309 2310 2311 2312 2313 2314 2315
	/*
	 * Will be either used or freed by nfsd4_sequence_check_conn
	 * below.
	 */
	conn = alloc_conn(rqstp, NFS4_CDFC4_FORE);
	if (!conn)
		return nfserr_jukebox;

2316
	spin_lock(&nn->client_lock);
B
Benny Halevy 已提交
2317
	status = nfserr_badsession;
2318
	session = find_in_sessionid_hashtbl(&seq->sessionid, SVC_NET(rqstp));
B
Benny Halevy 已提交
2319
	if (!session)
2320 2321 2322 2323 2324
		goto out_no_session;
	clp = session->se_client;
	status = get_client_locked(clp);
	if (status)
		goto out_no_session;
2325 2326 2327
	status = nfsd4_get_session_locked(session);
	if (status)
		goto out_put_client;
B
Benny Halevy 已提交
2328

2329 2330
	status = nfserr_too_many_ops;
	if (nfsd4_session_too_many_ops(rqstp, session))
2331
		goto out_put_session;
2332

M
Mi Jinlong 已提交
2333 2334
	status = nfserr_req_too_big;
	if (nfsd4_request_too_big(rqstp, session))
2335
		goto out_put_session;
M
Mi Jinlong 已提交
2336

B
Benny Halevy 已提交
2337
	status = nfserr_badslot;
2338
	if (seq->slotid >= session->se_fchannel.maxreqs)
2339
		goto out_put_session;
B
Benny Halevy 已提交
2340

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

2344 2345 2346 2347 2348
	/* 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;

2349 2350
	status = check_slot_seqid(seq->seqid, slot->sl_seqid,
					slot->sl_flags & NFSD4_SLOT_INUSE);
B
Benny Halevy 已提交
2351
	if (status == nfserr_replay_cache) {
2352 2353
		status = nfserr_seq_misordered;
		if (!(slot->sl_flags & NFSD4_SLOT_INITIALIZED))
2354
			goto out_put_session;
B
Benny Halevy 已提交
2355 2356
		cstate->slot = slot;
		cstate->session = session;
A
Andy Adamson 已提交
2357
		/* Return the cached reply status and set cstate->status
2358
		 * for nfsd4_proc_compound processing */
2359
		status = nfsd4_replay_cache_entry(resp, seq);
A
Andy Adamson 已提交
2360
		cstate->status = nfserr_replay_cache;
2361
		goto out;
B
Benny Halevy 已提交
2362 2363
	}
	if (status)
2364
		goto out_put_session;
B
Benny Halevy 已提交
2365

2366
	status = nfsd4_sequence_check_conn(conn, session);
2367
	conn = NULL;
2368 2369
	if (status)
		goto out_put_session;
2370

2371 2372 2373 2374 2375
	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;
2376
	if (xdr_restrict_buflen(xdr, buflen - rqstp->rq_auth_slack))
2377
		goto out_put_session;
2378
	svc_reserve(rqstp, buflen);
2379 2380

	status = nfs_ok;
B
Benny Halevy 已提交
2381 2382
	/* Success! bump slot seqid */
	slot->sl_seqid = seq->seqid;
2383
	slot->sl_flags |= NFSD4_SLOT_INUSE;
2384 2385
	if (seq->cachethis)
		slot->sl_flags |= NFSD4_SLOT_CACHETHIS;
2386 2387
	else
		slot->sl_flags &= ~NFSD4_SLOT_CACHETHIS;
B
Benny Halevy 已提交
2388 2389 2390 2391 2392

	cstate->slot = slot;
	cstate->session = session;

out:
2393 2394 2395 2396 2397 2398 2399 2400 2401
	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;
2402
	}
2403 2404
	if (!list_empty(&clp->cl_revoked))
		seq->status_flags |= SEQ4_STATUS_RECALLABLE_STATE_REVOKED;
2405
out_no_session:
2406 2407
	if (conn)
		free_conn(conn);
2408
	spin_unlock(&nn->client_lock);
B
Benny Halevy 已提交
2409
	return status;
2410 2411
out_put_session:
	nfsd4_put_session(session);
2412 2413 2414
out_put_client:
	put_client_renew_locked(clp);
	goto out_no_session;
A
Andy Adamson 已提交
2415 2416
}

2417 2418 2419 2420
__be32
nfsd4_destroy_clientid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_destroy_clientid *dc)
{
	struct nfs4_client *conf, *unconf, *clp;
J
J. Bruce Fields 已提交
2421
	__be32 status = 0;
2422
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
2423 2424

	nfs4_lock_state();
2425
	unconf = find_unconfirmed_client(&dc->clientid, true, nn);
2426
	conf = find_confirmed_client(&dc->clientid, true, nn);
2427
	WARN_ON_ONCE(conf && unconf);
2428 2429 2430 2431

	if (conf) {
		clp = conf;

2432
		if (client_has_state(conf)) {
2433 2434 2435 2436 2437 2438 2439 2440 2441
			status = nfserr_clientid_busy;
			goto out;
		}
	} else if (unconf)
		clp = unconf;
	else {
		status = nfserr_stale_clientid;
		goto out;
	}
2442 2443 2444 2445
	if (!mach_creds_match(clp, rqstp)) {
		status = nfserr_wrong_cred;
		goto out;
	}
2446 2447 2448 2449 2450 2451
	expire_client(clp);
out:
	nfs4_unlock_state();
	return status;
}

2452 2453 2454
__be32
nfsd4_reclaim_complete(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate, struct nfsd4_reclaim_complete *rc)
{
J
J. Bruce Fields 已提交
2455
	__be32 status = 0;
2456

2457 2458 2459 2460 2461 2462 2463 2464 2465
	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;
	}
2466

2467
	nfs4_lock_state();
2468
	status = nfserr_complete_already;
2469 2470
	if (test_and_set_bit(NFSD4_CLIENT_RECLAIM_COMPLETE,
			     &cstate->session->se_client->cl_flags))
2471 2472 2473 2474
		goto out;

	status = nfserr_stale_clientid;
	if (is_client_expired(cstate->session->se_client))
2475 2476 2477 2478 2479 2480 2481
		/*
		 * 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.
		 */
2482 2483 2484
		goto out;

	status = nfs_ok;
2485
	nfsd4_client_record_create(cstate->session->se_client);
2486
out:
2487
	nfs4_unlock_state();
2488
	return status;
2489 2490
}

2491
__be32
2492 2493
nfsd4_setclientid(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		  struct nfsd4_setclientid *setclid)
L
Linus Torvalds 已提交
2494
{
2495
	struct xdr_netobj 	clname = setclid->se_name;
L
Linus Torvalds 已提交
2496
	nfs4_verifier		clverifier = setclid->se_verf;
2497
	struct nfs4_client	*conf, *unconf, *new;
2498
	__be32 			status;
2499 2500
	struct nfsd_net		*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

2501
	/* Cases below refer to rfc 3530 section 14.2.33: */
L
Linus Torvalds 已提交
2502
	nfs4_lock_state();
2503
	conf = find_confirmed_client_by_name(&clname, nn);
2504
	if (conf) {
2505
		/* case 0: */
L
Linus Torvalds 已提交
2506
		status = nfserr_clid_inuse;
2507 2508
		if (clp_used_exchangeid(conf))
			goto out;
2509
		if (!same_creds(&conf->cl_cred, &rqstp->rq_cred)) {
2510 2511 2512 2513 2514
			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 已提交
2515 2516 2517
			goto out;
		}
	}
2518
	unconf = find_unconfirmed_client_by_name(&clname, nn);
2519 2520
	if (unconf)
		expire_client(unconf);
2521
	status = nfserr_jukebox;
J
Jeff Layton 已提交
2522
	new = create_client(clname, rqstp, &clverifier);
2523 2524
	if (new == NULL)
		goto out;
2525
	if (conf && same_verf(&conf->cl_verifier, &clverifier))
2526
		/* case 1: probable callback update */
L
Linus Torvalds 已提交
2527
		copy_clid(new, conf);
2528
	else /* case 4 (new client) or cases 2, 3 (client reboot): */
2529
		gen_clid(new, nn);
2530
	new->cl_minorversion = 0;
2531
	gen_callback(new, setclid, rqstp);
2532
	add_to_unconfirmed(new);
L
Linus Torvalds 已提交
2533 2534 2535 2536 2537 2538 2539 2540 2541 2542
	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));
	status = nfs_ok;
out:
	nfs4_unlock_state();
	return status;
}


2543
__be32
2544 2545 2546
nfsd4_setclientid_confirm(struct svc_rqst *rqstp,
			 struct nfsd4_compound_state *cstate,
			 struct nfsd4_setclientid_confirm *setclientid_confirm)
L
Linus Torvalds 已提交
2547
{
2548
	struct nfs4_client *conf, *unconf;
L
Linus Torvalds 已提交
2549 2550
	nfs4_verifier confirm = setclientid_confirm->sc_confirm; 
	clientid_t * clid = &setclientid_confirm->sc_clientid;
2551
	__be32 status;
2552
	struct nfsd_net	*nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
2553

2554
	if (STALE_CLIENTID(clid, nn))
L
Linus Torvalds 已提交
2555 2556
		return nfserr_stale_clientid;
	nfs4_lock_state();
2557

2558
	conf = find_confirmed_client(clid, false, nn);
2559
	unconf = find_unconfirmed_client(clid, false, nn);
2560
	/*
2561 2562 2563 2564
	 * 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.
2565
	 */
2566 2567 2568 2569 2570
	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;
2571
	/* cases below refer to rfc 3530 section 14.2.34: */
2572 2573
	if (!unconf || !same_verf(&confirm, &unconf->cl_confirm)) {
		if (conf && !unconf) /* case 2: probable retransmit */
L
Linus Torvalds 已提交
2574
			status = nfs_ok;
2575 2576 2577 2578 2579 2580
		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 */
2581 2582 2583
		nfsd4_change_callback(conf, &unconf->cl_cb_conn);
		nfsd4_probe_callback(conf);
		expire_client(unconf);
2584
	} else { /* case 3: normal case; new or rebooted client */
2585
		conf = find_confirmed_client_by_name(&unconf->cl_name, nn);
2586 2587 2588 2589
		if (conf) {
			status = mark_client_expired(conf);
			if (status)
				goto out;
2590
			expire_client(conf);
2591
		}
2592
		move_to_confirmed(unconf);
2593
		nfsd4_probe_callback(unconf);
2594
	}
L
Linus Torvalds 已提交
2595 2596 2597 2598 2599
out:
	nfs4_unlock_state();
	return status;
}

2600 2601 2602 2603 2604
static struct nfs4_file *nfsd4_alloc_file(void)
{
	return kmem_cache_alloc(file_slab, GFP_KERNEL);
}

L
Linus Torvalds 已提交
2605
/* OPEN Share state helper functions */
2606
static void nfsd4_init_file(struct nfs4_file *fp, struct inode *ino)
L
Linus Torvalds 已提交
2607 2608 2609
{
	unsigned int hashval = file_hashval(ino);

2610 2611 2612 2613 2614 2615 2616 2617
	atomic_set(&fp->fi_ref, 1);
	INIT_LIST_HEAD(&fp->fi_stateids);
	INIT_LIST_HEAD(&fp->fi_delegations);
	fp->fi_inode = igrab(ino);
	fp->fi_had_conflict = false;
	fp->fi_lease = NULL;
	memset(fp->fi_fds, 0, sizeof(fp->fi_fds));
	memset(fp->fi_access, 0, sizeof(fp->fi_access));
2618
	spin_lock(&state_lock);
2619
	hlist_add_head(&fp->fi_hash, &file_hashtbl[hashval]);
2620
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
2621 2622
}

2623
void
L
Linus Torvalds 已提交
2624 2625
nfsd4_free_slabs(void)
{
C
Christoph Hellwig 已提交
2626 2627 2628 2629 2630
	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 已提交
2631
}
L
Linus Torvalds 已提交
2632

2633
int
N
NeilBrown 已提交
2634 2635
nfsd4_init_slabs(void)
{
2636 2637 2638
	openowner_slab = kmem_cache_create("nfsd4_openowners",
			sizeof(struct nfs4_openowner), 0, 0, NULL);
	if (openowner_slab == NULL)
C
Christoph Hellwig 已提交
2639
		goto out;
2640
	lockowner_slab = kmem_cache_create("nfsd4_lockowners",
2641
			sizeof(struct nfs4_lockowner), 0, 0, NULL);
2642
	if (lockowner_slab == NULL)
C
Christoph Hellwig 已提交
2643
		goto out_free_openowner_slab;
N
NeilBrown 已提交
2644
	file_slab = kmem_cache_create("nfsd4_files",
2645
			sizeof(struct nfs4_file), 0, 0, NULL);
N
NeilBrown 已提交
2646
	if (file_slab == NULL)
C
Christoph Hellwig 已提交
2647
		goto out_free_lockowner_slab;
N
NeilBrown 已提交
2648
	stateid_slab = kmem_cache_create("nfsd4_stateids",
2649
			sizeof(struct nfs4_ol_stateid), 0, 0, NULL);
N
NeilBrown 已提交
2650
	if (stateid_slab == NULL)
C
Christoph Hellwig 已提交
2651
		goto out_free_file_slab;
N
NeilBrown 已提交
2652
	deleg_slab = kmem_cache_create("nfsd4_delegations",
2653
			sizeof(struct nfs4_delegation), 0, 0, NULL);
N
NeilBrown 已提交
2654
	if (deleg_slab == NULL)
C
Christoph Hellwig 已提交
2655
		goto out_free_stateid_slab;
N
NeilBrown 已提交
2656
	return 0;
C
Christoph Hellwig 已提交
2657 2658 2659 2660 2661 2662 2663 2664 2665 2666

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 已提交
2667 2668
	dprintk("nfsd4: out of memory while initializing nfsv4\n");
	return -ENOMEM;
L
Linus Torvalds 已提交
2669 2670
}

2671
static void init_nfs4_replay(struct nfs4_replay *rp)
L
Linus Torvalds 已提交
2672
{
2673 2674 2675
	rp->rp_status = nfserr_serverfault;
	rp->rp_buflen = 0;
	rp->rp_buf = rp->rp_ibuf;
L
Linus Torvalds 已提交
2676 2677
}

2678
static inline void *alloc_stateowner(struct kmem_cache *slab, struct xdr_netobj *owner, struct nfs4_client *clp)
2679
{
L
Linus Torvalds 已提交
2680 2681
	struct nfs4_stateowner *sop;

2682
	sop = kmem_cache_alloc(slab, GFP_KERNEL);
2683 2684 2685 2686 2687
	if (!sop)
		return NULL;

	sop->so_owner.data = kmemdup(owner->data, owner->len, GFP_KERNEL);
	if (!sop->so_owner.data) {
2688
		kmem_cache_free(slab, sop);
L
Linus Torvalds 已提交
2689
		return NULL;
2690 2691 2692
	}
	sop->so_owner.len = owner->len;

2693
	INIT_LIST_HEAD(&sop->so_stateids);
2694 2695 2696 2697 2698
	sop->so_client = clp;
	init_nfs4_replay(&sop->so_replay);
	return sop;
}

2699
static void hash_openowner(struct nfs4_openowner *oo, struct nfs4_client *clp, unsigned int strhashval)
2700
{
2701 2702 2703
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

	list_add(&oo->oo_owner.so_strhash, &nn->ownerstr_hashtbl[strhashval]);
2704
	list_add(&oo->oo_perclient, &clp->cl_openowners);
2705 2706
}

2707
static struct nfs4_openowner *
2708
alloc_init_open_stateowner(unsigned int strhashval, struct nfs4_client *clp, struct nfsd4_open *open) {
2709
	struct nfs4_openowner *oo;
2710

2711 2712
	oo = alloc_stateowner(openowner_slab, &open->op_owner, clp);
	if (!oo)
2713
		return NULL;
2714 2715
	oo->oo_owner.so_is_open_owner = 1;
	oo->oo_owner.so_seqid = open->op_seqid;
2716
	oo->oo_flags = NFS4_OO_NEW;
2717
	oo->oo_time = 0;
2718
	oo->oo_last_closed_stid = NULL;
2719 2720 2721
	INIT_LIST_HEAD(&oo->oo_close_lru);
	hash_openowner(oo, clp, strhashval);
	return oo;
L
Linus Torvalds 已提交
2722 2723
}

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

J
J. Bruce Fields 已提交
2727
	stp->st_stid.sc_type = NFS4_OPEN_STID;
2728
	INIT_LIST_HEAD(&stp->st_lockowners);
2729
	list_add(&stp->st_perstateowner, &oo->oo_owner.so_stateids);
2730
	list_add(&stp->st_perfile, &fp->fi_stateids);
2731
	stp->st_stateowner = &oo->oo_owner;
2732
	get_nfs4_file(fp);
L
Linus Torvalds 已提交
2733 2734 2735
	stp->st_file = fp;
	stp->st_access_bmap = 0;
	stp->st_deny_bmap = 0;
2736
	set_access(open->op_share_access, stp);
2737
	set_deny(open->op_share_deny, stp);
2738
	stp->st_openstp = NULL;
L
Linus Torvalds 已提交
2739 2740
}

2741
static void
2742
move_to_close_lru(struct nfs4_openowner *oo, struct net *net)
L
Linus Torvalds 已提交
2743
{
2744 2745
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);

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

2748
	list_move_tail(&oo->oo_close_lru, &nn->close_lru);
2749
	oo->oo_time = get_seconds();
L
Linus Torvalds 已提交
2750 2751 2752
}

static int
2753 2754 2755 2756 2757 2758
same_owner_str(struct nfs4_stateowner *sop, struct xdr_netobj *owner,
							clientid_t *clid)
{
	return (sop->so_owner.len == owner->len) &&
		0 == memcmp(sop->so_owner.data, owner->data, owner->len) &&
		(sop->so_client->cl_clientid.cl_id == clid->cl_id);
L
Linus Torvalds 已提交
2759 2760
}

2761
static struct nfs4_openowner *
2762 2763
find_openstateowner_str(unsigned int hashval, struct nfsd4_open *open,
			bool sessions, struct nfsd_net *nn)
L
Linus Torvalds 已提交
2764
{
2765 2766
	struct nfs4_stateowner *so;
	struct nfs4_openowner *oo;
2767
	struct nfs4_client *clp;
L
Linus Torvalds 已提交
2768

2769
	list_for_each_entry(so, &nn->ownerstr_hashtbl[hashval], so_strhash) {
2770 2771
		if (!so->so_is_open_owner)
			continue;
2772 2773
		if (same_owner_str(so, &open->op_owner, &open->op_clientid)) {
			oo = openowner(so);
2774 2775 2776
			clp = oo->oo_owner.so_client;
			if ((bool)clp->cl_minorversion != sessions)
				return NULL;
2777 2778 2779
			renew_client(oo->oo_owner.so_client);
			return oo;
		}
L
Linus Torvalds 已提交
2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790
	}
	return NULL;
}

/* search file_hashtbl[] for file */
static struct nfs4_file *
find_file(struct inode *ino)
{
	unsigned int hashval = file_hashval(ino);
	struct nfs4_file *fp;

2791
	spin_lock(&state_lock);
2792
	hlist_for_each_entry(fp, &file_hashtbl[hashval], fi_hash) {
2793 2794
		if (fp->fi_inode == ino) {
			get_nfs4_file(fp);
2795
			spin_unlock(&state_lock);
L
Linus Torvalds 已提交
2796
			return fp;
2797
		}
L
Linus Torvalds 已提交
2798
	}
2799
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
2800 2801 2802 2803 2804 2805 2806
	return NULL;
}

/*
 * Called to check deny when READ with all zero stateid or
 * WRITE with all zero or all one stateid
 */
2807
static __be32
L
Linus Torvalds 已提交
2808 2809 2810 2811
nfs4_share_conflict(struct svc_fh *current_fh, unsigned int deny_type)
{
	struct inode *ino = current_fh->fh_dentry->d_inode;
	struct nfs4_file *fp;
2812
	struct nfs4_ol_stateid *stp;
2813
	__be32 ret;
L
Linus Torvalds 已提交
2814 2815

	fp = find_file(ino);
2816 2817
	if (!fp)
		return nfs_ok;
2818
	ret = nfserr_locked;
L
Linus Torvalds 已提交
2819
	/* Search for conflicting share reservations */
2820
	list_for_each_entry(stp, &fp->fi_stateids, st_perfile) {
2821 2822
		if (test_deny(deny_type, stp) ||
		    test_deny(NFS4_SHARE_DENY_BOTH, stp))
2823
			goto out;
L
Linus Torvalds 已提交
2824
	}
2825 2826 2827 2828
	ret = nfs_ok;
out:
	put_nfs4_file(fp);
	return ret;
L
Linus Torvalds 已提交
2829 2830
}

2831
static void nfsd_break_one_deleg(struct nfs4_delegation *dp)
L
Linus Torvalds 已提交
2832
{
2833 2834 2835
	struct nfs4_client *clp = dp->dl_stid.sc_client;
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);

2836
	lockdep_assert_held(&state_lock);
L
Linus Torvalds 已提交
2837 2838 2839 2840 2841 2842 2843
	/* 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: */
	atomic_inc(&dp->dl_count);

2844
	list_add_tail(&dp->dl_recall_lru, &nn->del_recall_lru);
L
Linus Torvalds 已提交
2845

2846
	/* Only place dl_time is set; protected by i_lock: */
L
Linus Torvalds 已提交
2847 2848
	dp->dl_time = get_seconds();

2849 2850
	block_delegations(&dp->dl_fh);

2851 2852 2853
	nfsd4_cb_recall(dp);
}

2854
/* Called from break_lease() with i_lock held. */
2855 2856
static void nfsd_break_deleg_cb(struct file_lock *fl)
{
2857 2858
	struct nfs4_file *fp = (struct nfs4_file *)fl->fl_owner;
	struct nfs4_delegation *dp;
2859

2860 2861 2862 2863 2864 2865 2866 2867
	if (!fp) {
		WARN(1, "(%p)->fl_owner NULL\n", fl);
		return;
	}
	if (fp->fi_had_conflict) {
		WARN(1, "duplicate break on %p\n", fp);
		return;
	}
2868 2869
	/*
	 * We don't want the locks code to timeout the lease for us;
2870
	 * we'll remove it ourself if a delegation isn't returned
2871
	 * in time:
2872 2873
	 */
	fl->fl_break_time = 0;
L
Linus Torvalds 已提交
2874

2875
	spin_lock(&state_lock);
2876 2877 2878
	fp->fi_had_conflict = true;
	list_for_each_entry(dp, &fp->fi_delegations, dl_perfile)
		nfsd_break_one_deleg(dp);
2879
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890
}

static
int nfsd_change_deleg_cb(struct file_lock **onlist, int arg)
{
	if (arg & F_UNLCK)
		return lease_modify(onlist, arg);
	else
		return -EAGAIN;
}

2891
static const struct lock_manager_operations nfsd_lease_mng_ops = {
J
J. Bruce Fields 已提交
2892 2893
	.lm_break = nfsd_break_deleg_cb,
	.lm_change = nfsd_change_deleg_cb,
L
Linus Torvalds 已提交
2894 2895
};

2896 2897 2898 2899 2900 2901 2902 2903 2904 2905
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 已提交
2906

2907
__be32
A
Andy Adamson 已提交
2908
nfsd4_process_open1(struct nfsd4_compound_state *cstate,
2909
		    struct nfsd4_open *open, struct nfsd_net *nn)
L
Linus Torvalds 已提交
2910 2911 2912 2913
{
	clientid_t *clientid = &open->op_clientid;
	struct nfs4_client *clp = NULL;
	unsigned int strhashval;
2914
	struct nfs4_openowner *oo = NULL;
2915
	__be32 status;
L
Linus Torvalds 已提交
2916

2917
	if (STALE_CLIENTID(&open->op_clientid, nn))
L
Linus Torvalds 已提交
2918
		return nfserr_stale_clientid;
2919 2920 2921 2922 2923 2924 2925
	/*
	 * 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 已提交
2926

2927
	strhashval = ownerstr_hashval(clientid->cl_id, &open->op_owner);
2928
	oo = find_openstateowner_str(strhashval, open, cstate->minorversion, nn);
2929 2930
	open->op_openowner = oo;
	if (!oo) {
2931 2932
		clp = find_confirmed_client(clientid, cstate->minorversion,
					    nn);
L
Linus Torvalds 已提交
2933
		if (clp == NULL)
2934
			return nfserr_expired;
2935
		goto new_owner;
L
Linus Torvalds 已提交
2936
	}
2937
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED)) {
2938
		/* Replace unconfirmed owners without checking for replay. */
2939 2940 2941
		clp = oo->oo_owner.so_client;
		release_openowner(oo);
		open->op_openowner = NULL;
2942
		goto new_owner;
2943
	}
2944 2945 2946 2947 2948
	status = nfsd4_check_seqid(cstate, &oo->oo_owner, open->op_seqid);
	if (status)
		return status;
	clp = oo->oo_owner.so_client;
	goto alloc_stateid;
2949 2950 2951 2952 2953
new_owner:
	oo = alloc_init_open_stateowner(strhashval, clp, open);
	if (oo == NULL)
		return nfserr_jukebox;
	open->op_openowner = oo;
2954 2955 2956 2957
alloc_stateid:
	open->op_stp = nfs4_alloc_stateid(clp);
	if (!open->op_stp)
		return nfserr_jukebox;
2958
	return nfs_ok;
L
Linus Torvalds 已提交
2959 2960
}

2961
static inline __be32
N
NeilBrown 已提交
2962 2963 2964 2965 2966 2967 2968 2969
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;
}

2970
static int share_access_to_flags(u32 share_access)
2971
{
2972
	return share_access == NFS4_SHARE_ACCESS_READ ? RD_STATE : WR_STATE;
2973 2974
}

2975
static struct nfs4_delegation *find_deleg_stateid(struct nfs4_client *cl, stateid_t *s)
2976
{
2977
	struct nfs4_stid *ret;
2978

2979
	ret = find_stateid_by_type(cl, s, NFS4_DELEG_STID);
2980 2981 2982
	if (!ret)
		return NULL;
	return delegstateid(ret);
2983 2984
}

2985 2986 2987 2988 2989 2990
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;
}

2991
static __be32
2992
nfs4_check_deleg(struct nfs4_client *cl, struct nfsd4_open *open,
2993 2994 2995
		struct nfs4_delegation **dp)
{
	int flags;
2996
	__be32 status = nfserr_bad_stateid;
2997

2998
	*dp = find_deleg_stateid(cl, &open->op_delegate_stateid);
2999
	if (*dp == NULL)
3000
		goto out;
3001
	flags = share_access_to_flags(open->op_share_access);
3002 3003 3004
	status = nfs4_check_delegmode(*dp, flags);
	if (status)
		*dp = NULL;
3005
out:
3006
	if (!nfsd4_is_deleg_cur(open))
3007 3008 3009
		return nfs_ok;
	if (status)
		return status;
3010
	open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
3011
	return nfs_ok;
3012 3013
}

3014
static __be32
3015
nfs4_check_open(struct nfs4_file *fp, struct nfsd4_open *open, struct nfs4_ol_stateid **stpp)
L
Linus Torvalds 已提交
3016
{
3017
	struct nfs4_ol_stateid *local;
3018
	struct nfs4_openowner *oo = open->op_openowner;
L
Linus Torvalds 已提交
3019

3020
	list_for_each_entry(local, &fp->fi_stateids, st_perfile) {
L
Linus Torvalds 已提交
3021 3022 3023 3024
		/* ignore lock owners */
		if (local->st_stateowner->so_is_open_owner == 0)
			continue;
		/* remember if we have seen this open owner */
3025
		if (local->st_stateowner == &oo->oo_owner)
L
Linus Torvalds 已提交
3026 3027 3028
			*stpp = local;
		/* check for conflicting share reservations */
		if (!test_share(local, open))
3029
			return nfserr_share_denied;
L
Linus Torvalds 已提交
3030
	}
3031
	return nfs_ok;
L
Linus Torvalds 已提交
3032 3033
}

3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044
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;
}

3045 3046
static __be32 nfs4_get_vfs_file(struct svc_rqst *rqstp, struct nfs4_file *fp,
		struct svc_fh *cur_fh, struct nfsd4_open *open)
3047 3048
{
	__be32 status;
3049 3050 3051
	int oflag = nfs4_access_to_omode(open->op_share_access);
	int access = nfs4_access_to_access(open->op_share_access);

3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062
	if (!fp->fi_fds[oflag]) {
		status = nfsd_open(rqstp, cur_fh, S_IFREG, access,
			&fp->fi_fds[oflag]);
		if (status)
			return status;
	}
	nfs4_file_get_access(fp, oflag);

	return nfs_ok;
}

3063
static inline __be32
L
Linus Torvalds 已提交
3064 3065 3066 3067 3068 3069 3070 3071 3072 3073
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))
3074
		return nfserr_inval;
L
Linus Torvalds 已提交
3075 3076 3077
	return nfsd_setattr(rqstp, fh, &iattr, 0, (time_t)0);
}

3078
static __be32
3079
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 已提交
3080
{
3081
	u32 op_share_access = open->op_share_access;
3082
	bool new_access;
3083
	__be32 status;
L
Linus Torvalds 已提交
3084

3085
	new_access = !test_access(op_share_access, stp);
3086
	if (new_access) {
3087
		status = nfs4_get_vfs_file(rqstp, fp, cur_fh, open);
3088 3089
		if (status)
			return status;
3090
	}
L
Linus Torvalds 已提交
3091 3092
	status = nfsd4_truncate(rqstp, cur_fh, open);
	if (status) {
3093
		if (new_access) {
3094
			int oflag = nfs4_access_to_omode(op_share_access);
3095 3096
			nfs4_file_put_access(fp, oflag);
		}
L
Linus Torvalds 已提交
3097 3098 3099
		return status;
	}
	/* remember the open */
3100
	set_access(op_share_access, stp);
3101
	set_deny(open->op_share_deny, stp);
L
Linus Torvalds 已提交
3102 3103 3104 3105 3106 3107

	return nfs_ok;
}


static void
3108
nfs4_set_claim_prev(struct nfsd4_open *open, bool has_session)
L
Linus Torvalds 已提交
3109
{
3110
	open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
L
Linus Torvalds 已提交
3111 3112
}

3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125
/* 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;
}

3126 3127 3128 3129 3130 3131 3132 3133 3134
static struct file_lock *nfs4_alloc_init_lease(struct nfs4_delegation *dp, int flag)
{
	struct file_lock *fl;

	fl = locks_alloc_lock();
	if (!fl)
		return NULL;
	locks_init_lock(fl);
	fl->fl_lmops = &nfsd_lease_mng_ops;
3135
	fl->fl_flags = FL_DELEG;
3136 3137
	fl->fl_type = flag == NFS4_OPEN_DELEGATE_READ? F_RDLCK: F_WRLCK;
	fl->fl_end = OFFSET_MAX;
3138
	fl->fl_owner = (fl_owner_t)(dp->dl_file);
3139 3140 3141 3142
	fl->fl_pid = current->tgid;
	return fl;
}

3143
static int nfs4_setlease(struct nfs4_delegation *dp)
3144
{
3145
	struct nfs4_file *fp = dp->dl_file;
3146 3147 3148
	struct file_lock *fl;
	int status;

3149
	fl = nfs4_alloc_init_lease(dp, NFS4_OPEN_DELEGATE_READ);
3150 3151
	if (!fl)
		return -ENOMEM;
3152 3153
	fl->fl_file = find_readable_file(fp);
	status = vfs_setlease(fl->fl_file, fl->fl_type, &fl);
3154 3155
	if (status)
		goto out_free;
3156
	fp->fi_lease = fl;
A
Al Viro 已提交
3157
	fp->fi_deleg_file = get_file(fl->fl_file);
3158
	atomic_set(&fp->fi_delegees, 1);
3159
	spin_lock(&state_lock);
3160
	hash_delegation_locked(dp, fp);
3161
	spin_unlock(&state_lock);
3162
	return 0;
3163 3164 3165
out_free:
	locks_free_lock(fl);
	return status;
3166 3167
}

3168
static int nfs4_set_delegation(struct nfs4_delegation *dp, struct nfs4_file *fp)
3169
{
3170 3171 3172 3173
	if (fp->fi_had_conflict)
		return -EAGAIN;
	get_nfs4_file(fp);
	dp->dl_file = fp;
3174 3175
	if (!fp->fi_lease)
		return nfs4_setlease(dp);
3176
	spin_lock(&state_lock);
3177
	atomic_inc(&fp->fi_delegees);
3178
	if (fp->fi_had_conflict) {
3179
		spin_unlock(&state_lock);
3180
		return -EAGAIN;
3181
	}
3182
	hash_delegation_locked(dp, fp);
3183
	spin_unlock(&state_lock);
3184 3185 3186
	return 0;
}

3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200 3201 3202
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:
3203
			WARN_ON_ONCE(1);
3204 3205 3206 3207
		}
	}
}

L
Linus Torvalds 已提交
3208 3209
/*
 * Attempt to hand out a delegation.
3210 3211 3212
 *
 * Note we don't support write delegations, and won't until the vfs has
 * proper support for them.
L
Linus Torvalds 已提交
3213 3214
 */
static void
3215 3216
nfs4_open_delegation(struct net *net, struct svc_fh *fh,
		     struct nfsd4_open *open, struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
3217 3218
{
	struct nfs4_delegation *dp;
3219
	struct nfs4_openowner *oo = container_of(stp->st_stateowner, struct nfs4_openowner, oo_owner);
3220
	int cb_up;
3221
	int status = 0;
L
Linus Torvalds 已提交
3222

3223
	cb_up = nfsd4_cb_channel_good(oo->oo_owner.so_client);
3224 3225 3226
	open->op_recall = 0;
	switch (open->op_claim_type) {
		case NFS4_OPEN_CLAIM_PREVIOUS:
3227
			if (!cb_up)
3228
				open->op_recall = 1;
3229 3230
			if (open->op_delegate_type != NFS4_OPEN_DELEGATE_READ)
				goto out_no_deleg;
3231 3232
			break;
		case NFS4_OPEN_CLAIM_NULL:
3233
		case NFS4_OPEN_CLAIM_FH:
3234 3235 3236 3237
			/*
			 * Let's not give out any delegations till everyone's
			 * had the chance to reclaim theirs....
			 */
3238
			if (locks_in_grace(net))
3239
				goto out_no_deleg;
3240
			if (!cb_up || !(oo->oo_flags & NFS4_OO_CONFIRMED))
3241
				goto out_no_deleg;
3242 3243 3244 3245 3246 3247 3248
			/*
			 * 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):
			 */
3249
			if (open->op_share_access & NFS4_SHARE_ACCESS_WRITE)
3250 3251 3252
				goto out_no_deleg;
			if (open->op_create == NFS4_OPEN_CREATE)
				goto out_no_deleg;
3253 3254
			break;
		default:
3255
			goto out_no_deleg;
3256
	}
3257
	dp = alloc_init_deleg(oo->oo_owner.so_client, stp, fh);
3258 3259
	if (dp == NULL)
		goto out_no_deleg;
3260
	status = nfs4_set_delegation(dp, stp->st_file);
3261
	if (status)
3262
		goto out_free;
L
Linus Torvalds 已提交
3263

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

3266
	dprintk("NFSD: delegation stateid=" STATEID_FMT "\n",
3267
		STATEID_VAL(&dp->dl_stid.sc_stateid));
3268
	open->op_delegate_type = NFS4_OPEN_DELEGATE_READ;
3269 3270
	return;
out_free:
3271
	destroy_delegation(dp);
3272
out_no_deleg:
3273 3274
	open->op_delegate_type = NFS4_OPEN_DELEGATE_NONE;
	if (open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS &&
3275
	    open->op_delegate_type != NFS4_OPEN_DELEGATE_NONE) {
3276
		dprintk("NFSD: WARNING: refusing delegation reclaim\n");
3277 3278
		open->op_recall = 1;
	}
3279 3280 3281 3282 3283

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

3286 3287 3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303
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.
	 */
}

L
Linus Torvalds 已提交
3304 3305 3306
/*
 * called with nfs4_lock_state() held.
 */
3307
__be32
L
Linus Torvalds 已提交
3308 3309
nfsd4_process_open2(struct svc_rqst *rqstp, struct svc_fh *current_fh, struct nfsd4_open *open)
{
A
Andy Adamson 已提交
3310
	struct nfsd4_compoundres *resp = rqstp->rq_resp;
3311
	struct nfs4_client *cl = open->op_openowner->oo_owner.so_client;
L
Linus Torvalds 已提交
3312 3313
	struct nfs4_file *fp = NULL;
	struct inode *ino = current_fh->fh_dentry->d_inode;
3314
	struct nfs4_ol_stateid *stp = NULL;
3315
	struct nfs4_delegation *dp = NULL;
3316
	__be32 status;
L
Linus Torvalds 已提交
3317 3318 3319 3320 3321 3322 3323 3324 3325 3326

	/*
	 * 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
	 */
	fp = find_file(ino);
	if (fp) {
		if ((status = nfs4_check_open(fp, open, &stp)))
			goto out;
3327
		status = nfs4_check_deleg(cl, open, &dp);
3328 3329
		if (status)
			goto out;
L
Linus Torvalds 已提交
3330
	} else {
3331
		status = nfserr_bad_stateid;
3332
		if (nfsd4_is_deleg_cur(open))
3333
			goto out;
3334
		status = nfserr_jukebox;
3335 3336 3337
		fp = open->op_file;
		open->op_file = NULL;
		nfsd4_init_file(fp, ino);
L
Linus Torvalds 已提交
3338 3339 3340 3341 3342 3343 3344 3345
	}

	/*
	 * OPEN the file, or upgrade an existing OPEN.
	 * If truncate fails, the OPEN fails.
	 */
	if (stp) {
		/* Stateid was found, this is an OPEN upgrade */
3346
		status = nfs4_upgrade_open(rqstp, fp, current_fh, stp, open);
L
Linus Torvalds 已提交
3347 3348 3349
		if (status)
			goto out;
	} else {
3350
		status = nfs4_get_vfs_file(rqstp, fp, current_fh, open);
J
J. Bruce Fields 已提交
3351 3352 3353
		if (status)
			goto out;
		status = nfsd4_truncate(rqstp, current_fh, open);
3354
		if (status)
L
Linus Torvalds 已提交
3355
			goto out;
3356 3357
		stp = open->op_stp;
		open->op_stp = NULL;
3358
		init_open_stateid(stp, fp, open);
L
Linus Torvalds 已提交
3359
	}
3360 3361
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&open->op_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
3362

3363
	if (nfsd4_has_session(&resp->cstate)) {
3364
		open->op_openowner->oo_flags |= NFS4_OO_CONFIRMED;
A
Andy Adamson 已提交
3365

3366 3367 3368 3369 3370 3371 3372
		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 已提交
3373 3374 3375 3376
	/*
	* Attempt to hand out a delegation. No error return, because the
	* OPEN succeeds even if we fail.
	*/
3377
	nfs4_open_delegation(SVC_NET(rqstp), current_fh, open, stp);
3378
nodeleg:
L
Linus Torvalds 已提交
3379 3380
	status = nfs_ok;

3381
	dprintk("%s: stateid=" STATEID_FMT "\n", __func__,
3382
		STATEID_VAL(&stp->st_stid.sc_stateid));
L
Linus Torvalds 已提交
3383
out:
3384 3385
	/* 4.1 client trying to upgrade/downgrade delegation? */
	if (open->op_delegate_type == NFS4_OPEN_DELEGATE_NONE && dp &&
3386 3387
	    open->op_deleg_want)
		nfsd4_deleg_xgrade_none_ext(open, dp);
3388

3389 3390
	if (fp)
		put_nfs4_file(fp);
3391
	if (status == 0 && open->op_claim_type == NFS4_OPEN_CLAIM_PREVIOUS)
3392
		nfs4_set_claim_prev(open, nfsd4_has_session(&resp->cstate));
L
Linus Torvalds 已提交
3393 3394 3395 3396
	/*
	* To finish the open response, we just need to set the rflags.
	*/
	open->op_rflags = NFS4_OPEN_RESULT_LOCKTYPE_POSIX;
3397
	if (!(open->op_openowner->oo_flags & NFS4_OO_CONFIRMED) &&
A
Andy Adamson 已提交
3398
	    !nfsd4_has_session(&resp->cstate))
L
Linus Torvalds 已提交
3399 3400 3401 3402 3403
		open->op_rflags |= NFS4_OPEN_RESULT_CONFIRM;

	return status;
}

3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418
void nfsd4_cleanup_open_state(struct nfsd4_open *open, __be32 status)
{
	if (open->op_openowner) {
		struct nfs4_openowner *oo = open->op_openowner;

		if (!list_empty(&oo->oo_owner.so_stateids))
			list_del_init(&oo->oo_close_lru);
		if (oo->oo_flags & NFS4_OO_NEW) {
			if (status) {
				release_openowner(oo);
				open->op_openowner = NULL;
			} else
				oo->oo_flags &= ~NFS4_OO_NEW;
		}
	}
3419 3420
	if (open->op_file)
		nfsd4_free_file(open->op_file);
3421
	if (open->op_stp)
3422
		free_generic_stateid(open->op_stp);
3423 3424
}

3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436
static __be32 lookup_clientid(clientid_t *clid, bool session, struct nfsd_net *nn, struct nfs4_client **clp)
{
	struct nfs4_client *found;

	if (STALE_CLIENTID(clid, nn))
		return nfserr_stale_clientid;
	found = find_confirmed_client(clid, session, nn);
	if (clp)
		*clp = found;
	return found ? nfs_ok : nfserr_expired;
}

3437
__be32
3438 3439
nfsd4_renew(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
	    clientid_t *clid)
L
Linus Torvalds 已提交
3440 3441
{
	struct nfs4_client *clp;
3442
	__be32 status;
3443
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
3444 3445 3446 3447

	nfs4_lock_state();
	dprintk("process_renew(%08x/%08x): starting\n", 
			clid->cl_boot, clid->cl_id);
3448 3449
	status = lookup_clientid(clid, cstate->minorversion, nn, &clp);
	if (status)
L
Linus Torvalds 已提交
3450 3451
		goto out;
	status = nfserr_cb_path_down;
3452
	if (!list_empty(&clp->cl_delegations)
3453
			&& clp->cl_cb_state != NFSD4_CB_UP)
L
Linus Torvalds 已提交
3454 3455 3456 3457 3458 3459 3460
		goto out;
	status = nfs_ok;
out:
	nfs4_unlock_state();
	return status;
}

3461
static void
3462
nfsd4_end_grace(struct nfsd_net *nn)
3463
{
3464
	/* do nothing if grace period already ended */
3465
	if (nn->grace_ended)
3466 3467
		return;

3468
	dprintk("NFSD: end of grace period\n");
3469
	nn->grace_ended = true;
3470
	nfsd4_record_grace_done(nn, nn->boot_time);
3471
	locks_end_grace(&nn->nfsd4_manager);
3472 3473 3474 3475 3476
	/*
	 * Now that every NFSv4 client has had the chance to recover and
	 * to see the (possibly new, possibly shorter) lease time, we
	 * can safely set the next grace time to the current lease time:
	 */
3477
	nn->nfsd4_grace = nn->nfsd4_lease;
3478 3479
}

3480
static time_t
3481
nfs4_laundromat(struct nfsd_net *nn)
L
Linus Torvalds 已提交
3482 3483
{
	struct nfs4_client *clp;
3484
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
3485 3486
	struct nfs4_delegation *dp;
	struct list_head *pos, *next, reaplist;
3487
	time_t cutoff = get_seconds() - nn->nfsd4_lease;
3488
	time_t t, new_timeo = nn->nfsd4_lease;
L
Linus Torvalds 已提交
3489 3490 3491 3492

	nfs4_lock_state();

	dprintk("NFSD: laundromat service - starting\n");
3493
	nfsd4_end_grace(nn);
3494
	INIT_LIST_HEAD(&reaplist);
3495
	spin_lock(&nn->client_lock);
3496
	list_for_each_safe(pos, next, &nn->client_lru) {
L
Linus Torvalds 已提交
3497 3498 3499
		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;
3500
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
3501 3502
			break;
		}
3503
		if (mark_client_expired_locked(clp)) {
3504 3505 3506 3507
			dprintk("NFSD: client in use (clientid %08x)\n",
				clp->cl_clientid.cl_id);
			continue;
		}
3508
		list_move(&clp->cl_lru, &reaplist);
3509
	}
3510
	spin_unlock(&nn->client_lock);
3511 3512
	list_for_each_safe(pos, next, &reaplist) {
		clp = list_entry(pos, struct nfs4_client, cl_lru);
L
Linus Torvalds 已提交
3513 3514 3515 3516
		dprintk("NFSD: purging unused client (clientid %08x)\n",
			clp->cl_clientid.cl_id);
		expire_client(clp);
	}
3517
	spin_lock(&state_lock);
3518
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
3519
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
3520 3521
		if (net_generic(dp->dl_stid.sc_client->net, nfsd_net_id) != nn)
			continue;
L
Linus Torvalds 已提交
3522
		if (time_after((unsigned long)dp->dl_time, (unsigned long)cutoff)) {
3523 3524
			t = dp->dl_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
3525 3526 3527 3528
			break;
		}
		list_move(&dp->dl_recall_lru, &reaplist);
	}
3529
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
3530 3531
	list_for_each_safe(pos, next, &reaplist) {
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
3532
		revoke_delegation(dp);
L
Linus Torvalds 已提交
3533
	}
3534
	list_for_each_safe(pos, next, &nn->close_lru) {
3535 3536
		oo = container_of(pos, struct nfs4_openowner, oo_close_lru);
		if (time_after((unsigned long)oo->oo_time, (unsigned long)cutoff)) {
3537 3538
			t = oo->oo_time - cutoff;
			new_timeo = min(new_timeo, t);
L
Linus Torvalds 已提交
3539 3540
			break;
		}
3541
		release_openowner(oo);
L
Linus Torvalds 已提交
3542
	}
3543
	new_timeo = max_t(time_t, new_timeo, NFSD_LAUNDROMAT_MINTIMEOUT);
L
Linus Torvalds 已提交
3544
	nfs4_unlock_state();
3545
	return new_timeo;
L
Linus Torvalds 已提交
3546 3547
}

H
Harvey Harrison 已提交
3548 3549 3550 3551
static struct workqueue_struct *laundry_wq;
static void laundromat_main(struct work_struct *);

static void
3552
laundromat_main(struct work_struct *laundry)
L
Linus Torvalds 已提交
3553 3554
{
	time_t t;
3555 3556 3557 3558
	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 已提交
3559

3560
	t = nfs4_laundromat(nn);
L
Linus Torvalds 已提交
3561
	dprintk("NFSD: laundromat_main - sleeping for %ld seconds\n", t);
3562
	queue_delayed_work(laundry_wq, &nn->laundromat_work, t*HZ);
L
Linus Torvalds 已提交
3563 3564
}

3565
static inline __be32 nfs4_check_fh(struct svc_fh *fhp, struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
3566
{
3567 3568 3569
	if (fhp->fh_dentry->d_inode != stp->st_file->fi_inode)
		return nfserr_bad_stateid;
	return nfs_ok;
L
Linus Torvalds 已提交
3570 3571 3572
}

static inline int
3573
access_permit_read(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
3574
{
3575 3576 3577
	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 已提交
3578 3579 3580
}

static inline int
3581
access_permit_write(struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
3582
{
3583 3584
	return test_access(NFS4_SHARE_ACCESS_WRITE, stp) ||
		test_access(NFS4_SHARE_ACCESS_BOTH, stp);
L
Linus Torvalds 已提交
3585 3586 3587
}

static
3588
__be32 nfs4_check_openmode(struct nfs4_ol_stateid *stp, int flags)
L
Linus Torvalds 已提交
3589
{
3590
        __be32 status = nfserr_openmode;
L
Linus Torvalds 已提交
3591

3592 3593 3594
	/* For lock stateid's, we test the parent open, not the lock: */
	if (stp->st_openstp)
		stp = stp->st_openstp;
3595
	if ((flags & WR_STATE) && !access_permit_write(stp))
L
Linus Torvalds 已提交
3596
                goto out;
3597
	if ((flags & RD_STATE) && !access_permit_read(stp))
L
Linus Torvalds 已提交
3598 3599 3600 3601 3602 3603
                goto out;
	status = nfs_ok;
out:
	return status;
}

3604
static inline __be32
3605
check_special_stateids(struct net *net, svc_fh *current_fh, stateid_t *stateid, int flags)
L
Linus Torvalds 已提交
3606
{
3607
	if (ONE_STATEID(stateid) && (flags & RD_STATE))
L
Linus Torvalds 已提交
3608
		return nfs_ok;
3609
	else if (locks_in_grace(net)) {
L
Lucas De Marchi 已提交
3610
		/* Answer in remaining cases depends on existence of
L
Linus Torvalds 已提交
3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625
		 * 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
3626
grace_disallows_io(struct net *net, struct inode *inode)
L
Linus Torvalds 已提交
3627
{
3628
	return locks_in_grace(net) && mandatory_lock(inode);
L
Linus Torvalds 已提交
3629 3630
}

3631 3632 3633
/* Returns true iff a is later than b: */
static bool stateid_generation_after(stateid_t *a, stateid_t *b)
{
J
Jim Rees 已提交
3634
	return (s32)(a->si_generation - b->si_generation) > 0;
3635 3636
}

J
J. Bruce Fields 已提交
3637
static __be32 check_stateid_generation(stateid_t *in, stateid_t *ref, bool has_session)
3638
{
A
Andy Adamson 已提交
3639 3640 3641 3642
	/*
	 * When sessions are used the stateid generation number is ignored
	 * when it is zero.
	 */
J
J. Bruce Fields 已提交
3643
	if (has_session && in->si_generation == 0)
3644 3645 3646 3647
		return nfs_ok;

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

3649
	/* If the client sends us a stateid from the future, it's buggy: */
3650
	if (stateid_generation_after(in, ref))
3651 3652
		return nfserr_bad_stateid;
	/*
3653 3654 3655 3656 3657 3658 3659 3660
	 * 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:
3661
	 */
3662
	return nfserr_old_stateid;
3663 3664
}

3665
static __be32 nfsd4_validate_stateid(struct nfs4_client *cl, stateid_t *stateid)
3666
{
3667 3668 3669
	struct nfs4_stid *s;
	struct nfs4_ol_stateid *ols;
	__be32 status;
3670

3671 3672 3673 3674 3675 3676 3677 3678 3679 3680 3681
	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid))
		return nfserr_bad_stateid;
	/* 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);
		return nfserr_bad_stateid;
	}
3682
	s = find_stateid(cl, stateid);
3683
	if (!s)
3684
		return nfserr_bad_stateid;
3685
	status = check_stateid_generation(stateid, &s->sc_stateid, 1);
3686
	if (status)
3687
		return status;
3688 3689
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
3690
		return nfs_ok;
3691 3692
	case NFS4_REVOKED_DELEG_STID:
		return nfserr_deleg_revoked;
3693 3694 3695 3696 3697 3698 3699
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
		ols = openlockstateid(s);
		if (ols->st_stateowner->so_is_open_owner
	    			&& !(openowner(ols->st_stateowner)->oo_flags
						& NFS4_OO_CONFIRMED))
			return nfserr_bad_stateid;
3700
		return nfs_ok;
3701 3702 3703
	default:
		printk("unknown stateid type %x\n", s->sc_type);
	case NFS4_CLOSED_STID:
3704
		return nfserr_bad_stateid;
3705
	}
3706 3707
}

3708 3709 3710
static __be32 nfsd4_lookup_stateid(stateid_t *stateid, unsigned char typemask,
				   struct nfs4_stid **s, bool sessions,
				   struct nfsd_net *nn)
3711 3712
{
	struct nfs4_client *cl;
J
J. Bruce Fields 已提交
3713
	__be32 status;
3714 3715 3716

	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid))
		return nfserr_bad_stateid;
J
J. Bruce Fields 已提交
3717 3718
	status = lookup_clientid(&stateid->si_opaque.so_clid, sessions,
							nn, &cl);
3719 3720 3721
	if (status == nfserr_stale_clientid) {
		if (sessions)
			return nfserr_bad_stateid;
3722
		return nfserr_stale_stateid;
3723
	}
J
J. Bruce Fields 已提交
3724 3725
	if (status)
		return status;
3726 3727 3728 3729 3730 3731
	*s = find_stateid_by_type(cl, stateid, typemask);
	if (!*s)
		return nfserr_bad_stateid;
	return nfs_ok;
}

L
Linus Torvalds 已提交
3732 3733 3734
/*
* Checks for stateid operations
*/
3735
__be32
3736
nfs4_preprocess_stateid_op(struct net *net, struct nfsd4_compound_state *cstate,
3737
			   stateid_t *stateid, int flags, struct file **filpp)
L
Linus Torvalds 已提交
3738
{
3739
	struct nfs4_stid *s;
3740
	struct nfs4_ol_stateid *stp = NULL;
L
Linus Torvalds 已提交
3741
	struct nfs4_delegation *dp = NULL;
3742
	struct svc_fh *current_fh = &cstate->current_fh;
L
Linus Torvalds 已提交
3743
	struct inode *ino = current_fh->fh_dentry->d_inode;
3744
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
3745
	struct file *file = NULL;
3746
	__be32 status;
L
Linus Torvalds 已提交
3747 3748 3749 3750

	if (filpp)
		*filpp = NULL;

3751
	if (grace_disallows_io(net, ino))
L
Linus Torvalds 已提交
3752 3753 3754
		return nfserr_grace;

	if (ZERO_STATEID(stateid) || ONE_STATEID(stateid))
3755
		return check_special_stateids(net, current_fh, stateid, flags);
L
Linus Torvalds 已提交
3756

3757 3758
	nfs4_lock_state();

3759 3760
	status = nfsd4_lookup_stateid(stateid, NFS4_DELEG_STID|NFS4_OPEN_STID|NFS4_LOCK_STID,
				      &s, cstate->minorversion, nn);
3761
	if (status)
3762
		goto out;
3763 3764 3765
	status = check_stateid_generation(stateid, &s->sc_stateid, nfsd4_has_session(cstate));
	if (status)
		goto out;
3766 3767
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
3768
		dp = delegstateid(s);
3769 3770 3771
		status = nfs4_check_delegmode(dp, flags);
		if (status)
			goto out;
3772
		if (filpp) {
3773 3774
			file = dp->dl_file->fi_deleg_file;
			if (!file) {
3775 3776 3777 3778
				WARN_ON_ONCE(1);
				status = nfserr_serverfault;
				goto out;
			}
3779
		}
3780 3781 3782
		break;
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
3783
		stp = openlockstateid(s);
3784 3785
		status = nfs4_check_fh(current_fh, stp);
		if (status)
L
Linus Torvalds 已提交
3786
			goto out;
3787
		if (stp->st_stateowner->so_is_open_owner
3788
		    && !(openowner(stp->st_stateowner)->oo_flags & NFS4_OO_CONFIRMED))
L
Linus Torvalds 已提交
3789
			goto out;
3790 3791
		status = nfs4_check_openmode(stp, flags);
		if (status)
L
Linus Torvalds 已提交
3792
			goto out;
3793 3794
		if (filpp) {
			if (flags & RD_STATE)
3795
				file = find_readable_file(stp->st_file);
3796
			else
3797
				file = find_writeable_file(stp->st_file);
3798
		}
3799 3800
		break;
	default:
3801 3802
		status = nfserr_bad_stateid;
		goto out;
L
Linus Torvalds 已提交
3803 3804
	}
	status = nfs_ok;
3805 3806
	if (file)
		*filpp = get_file(file);
L
Linus Torvalds 已提交
3807
out:
3808
	nfs4_unlock_state();
L
Linus Torvalds 已提交
3809 3810 3811
	return status;
}

3812
static __be32
3813
nfsd4_free_lock_stateid(struct nfs4_ol_stateid *stp)
3814
{
3815 3816 3817
	struct nfs4_lockowner *lo = lockowner(stp->st_stateowner);

	if (check_for_locks(stp->st_file, lo))
3818
		return nfserr_locks_held;
3819 3820 3821 3822 3823
	/*
	 * Currently there's a 1-1 lock stateid<->lockowner
	 * correspondance, and we have to delete the lockowner when we
	 * delete the lock stateid:
	 */
3824
	release_lockowner(lo);
3825 3826 3827
	return nfs_ok;
}

3828 3829 3830 3831 3832 3833 3834
/*
 * 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)
{
3835 3836 3837 3838 3839
	struct nfsd4_test_stateid_id *stateid;
	struct nfs4_client *cl = cstate->session->se_client;

	nfs4_lock_state();
	list_for_each_entry(stateid, &test_stateid->ts_stateid_list, ts_id_list)
3840 3841
		stateid->ts_id_status =
			nfsd4_validate_stateid(cl, &stateid->ts_id_stateid);
3842 3843
	nfs4_unlock_state();

3844 3845 3846
	return nfs_ok;
}

3847 3848 3849 3850 3851
__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 已提交
3852
	struct nfs4_stid *s;
3853
	struct nfs4_delegation *dp;
3854
	struct nfs4_client *cl = cstate->session->se_client;
J
J. Bruce Fields 已提交
3855
	__be32 ret = nfserr_bad_stateid;
3856 3857

	nfs4_lock_state();
3858
	s = find_stateid(cl, stateid);
J
J. Bruce Fields 已提交
3859
	if (!s)
3860
		goto out;
J
J. Bruce Fields 已提交
3861 3862
	switch (s->sc_type) {
	case NFS4_DELEG_STID:
3863 3864
		ret = nfserr_locks_held;
		goto out;
J
J. Bruce Fields 已提交
3865 3866 3867 3868 3869 3870 3871 3872 3873
	case NFS4_OPEN_STID:
	case NFS4_LOCK_STID:
		ret = check_stateid_generation(stateid, &s->sc_stateid, 1);
		if (ret)
			goto out;
		if (s->sc_type == NFS4_LOCK_STID)
			ret = nfsd4_free_lock_stateid(openlockstateid(s));
		else
			ret = nfserr_locks_held;
3874
		break;
3875 3876 3877 3878 3879
	case NFS4_REVOKED_DELEG_STID:
		dp = delegstateid(s);
		destroy_revoked_delegation(dp);
		ret = nfs_ok;
		break;
3880 3881
	default:
		ret = nfserr_bad_stateid;
3882 3883 3884 3885 3886 3887
	}
out:
	nfs4_unlock_state();
	return ret;
}

3888 3889 3890 3891 3892 3893
static inline int
setlkflg (int type)
{
	return (type == NFS4_READW_LT || type == NFS4_READ_LT) ?
		RD_STATE : WR_STATE;
}
L
Linus Torvalds 已提交
3894

3895
static __be32 nfs4_seqid_op_checks(struct nfsd4_compound_state *cstate, stateid_t *stateid, u32 seqid, struct nfs4_ol_stateid *stp)
3896 3897 3898 3899 3900 3901 3902 3903
{
	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;
3904 3905
	if (stp->st_stid.sc_type == NFS4_CLOSED_STID
		|| stp->st_stid.sc_type == NFS4_REVOKED_DELEG_STID)
3906 3907
		/*
		 * "Closed" stateid's exist *only* to return
3908 3909
		 * nfserr_replay_me from the previous step, and
		 * revoked delegations are kept only for free_stateid.
3910 3911 3912 3913 3914 3915
		 */
		return nfserr_bad_stateid;
	status = check_stateid_generation(stateid, &stp->st_stid.sc_stateid, nfsd4_has_session(cstate));
	if (status)
		return status;
	return nfs4_check_fh(current_fh, stp);
3916 3917
}

L
Linus Torvalds 已提交
3918 3919 3920
/* 
 * Checks for sequence id mutating operations. 
 */
3921
static __be32
3922
nfs4_preprocess_seqid_op(struct nfsd4_compound_state *cstate, u32 seqid,
3923
			 stateid_t *stateid, char typemask,
3924 3925
			 struct nfs4_ol_stateid **stpp,
			 struct nfsd_net *nn)
L
Linus Torvalds 已提交
3926
{
3927
	__be32 status;
3928
	struct nfs4_stid *s;
L
Linus Torvalds 已提交
3929

3930 3931
	dprintk("NFSD: %s: seqid=%d stateid = " STATEID_FMT "\n", __func__,
		seqid, STATEID_VAL(stateid));
3932

L
Linus Torvalds 已提交
3933
	*stpp = NULL;
3934 3935
	status = nfsd4_lookup_stateid(stateid, typemask, &s,
				      cstate->minorversion, nn);
3936 3937
	if (status)
		return status;
3938
	*stpp = openlockstateid(s);
3939 3940
	if (!nfsd4_has_session(cstate))
		cstate->replay_owner = (*stpp)->st_stateowner;
L
Linus Torvalds 已提交
3941

3942 3943
	return nfs4_seqid_op_checks(cstate, stateid, seqid, *stpp);
}
3944

3945 3946
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)
3947 3948 3949
{
	__be32 status;
	struct nfs4_openowner *oo;
L
Linus Torvalds 已提交
3950

3951
	status = nfs4_preprocess_seqid_op(cstate, seqid, stateid,
3952
						NFS4_OPEN_STID, stpp, nn);
3953 3954
	if (status)
		return status;
3955
	oo = openowner((*stpp)->st_stateowner);
3956
	if (!(oo->oo_flags & NFS4_OO_CONFIRMED))
3957 3958
		return nfserr_bad_stateid;
	return nfs_ok;
L
Linus Torvalds 已提交
3959 3960
}

3961
__be32
3962
nfsd4_open_confirm(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
3963
		   struct nfsd4_open_confirm *oc)
L
Linus Torvalds 已提交
3964
{
3965
	__be32 status;
3966
	struct nfs4_openowner *oo;
3967
	struct nfs4_ol_stateid *stp;
3968
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
3969

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

3973
	status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0);
3974 3975
	if (status)
		return status;
L
Linus Torvalds 已提交
3976 3977 3978

	nfs4_lock_state();

3979
	status = nfs4_preprocess_seqid_op(cstate,
3980
					oc->oc_seqid, &oc->oc_req_stateid,
3981
					NFS4_OPEN_STID, &stp, nn);
3982
	if (status)
3983
		goto out;
3984
	oo = openowner(stp->st_stateowner);
3985
	status = nfserr_bad_stateid;
3986
	if (oo->oo_flags & NFS4_OO_CONFIRMED)
3987
		goto out;
3988
	oo->oo_flags |= NFS4_OO_CONFIRMED;
3989 3990
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&oc->oc_resp_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
3991
	dprintk("NFSD: %s: success, seqid=%d stateid=" STATEID_FMT "\n",
3992
		__func__, oc->oc_seqid, STATEID_VAL(&stp->st_stid.sc_stateid));
3993

3994
	nfsd4_client_record_create(oo->oo_owner.so_client);
3995
	status = nfs_ok;
L
Linus Torvalds 已提交
3996
out:
3997
	nfsd4_bump_seqid(cstate, status);
3998 3999
	if (!cstate->replay_owner)
		nfs4_unlock_state();
L
Linus Torvalds 已提交
4000 4001 4002
	return status;
}

J
J. Bruce Fields 已提交
4003
static inline void nfs4_stateid_downgrade_bit(struct nfs4_ol_stateid *stp, u32 access)
L
Linus Torvalds 已提交
4004
{
4005
	if (!test_access(access, stp))
J
J. Bruce Fields 已提交
4006 4007
		return;
	nfs4_file_put_access(stp->st_file, nfs4_access_to_omode(access));
4008
	clear_access(access, stp);
J
J. Bruce Fields 已提交
4009
}
4010

J
J. Bruce Fields 已提交
4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024
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:
4025
		WARN_ON_ONCE(1);
L
Linus Torvalds 已提交
4026 4027 4028 4029
	}
}

static void
4030
reset_union_bmap_deny(unsigned long deny, struct nfs4_ol_stateid *stp)
L
Linus Torvalds 已提交
4031 4032 4033 4034
{
	int i;
	for (i = 0; i < 4; i++) {
		if ((i & deny) != i)
4035
			clear_deny(i, stp);
L
Linus Torvalds 已提交
4036 4037 4038
	}
}

4039
__be32
4040 4041
nfsd4_open_downgrade(struct svc_rqst *rqstp,
		     struct nfsd4_compound_state *cstate,
4042
		     struct nfsd4_open_downgrade *od)
L
Linus Torvalds 已提交
4043
{
4044
	__be32 status;
4045
	struct nfs4_ol_stateid *stp;
4046
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4047

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

4051
	/* We don't yet support WANT bits: */
4052 4053 4054
	if (od->od_deleg_want)
		dprintk("NFSD: %s: od_deleg_want=0x%x ignored\n", __func__,
			od->od_deleg_want);
L
Linus Torvalds 已提交
4055 4056

	nfs4_lock_state();
4057
	status = nfs4_preprocess_confirmed_seqid_op(cstate, od->od_seqid,
4058
					&od->od_stateid, &stp, nn);
4059
	if (status)
L
Linus Torvalds 已提交
4060 4061
		goto out; 
	status = nfserr_inval;
4062 4063
	if (!test_access(od->od_share_access, stp)) {
		dprintk("NFSD: access not a subset current bitmap: 0x%lx, input access=%08x\n",
L
Linus Torvalds 已提交
4064 4065 4066
			stp->st_access_bmap, od->od_share_access);
		goto out;
	}
4067
	if (!test_deny(od->od_share_deny, stp)) {
L
Linus Torvalds 已提交
4068 4069 4070 4071
		dprintk("NFSD:deny not a subset current bitmap: 0x%lx, input deny=%08x\n",
			stp->st_deny_bmap, od->od_share_deny);
		goto out;
	}
J
J. Bruce Fields 已提交
4072
	nfs4_stateid_downgrade(stp, od->od_share_access);
L
Linus Torvalds 已提交
4073

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

4076 4077
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&od->od_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
4078 4079
	status = nfs_ok;
out:
4080
	nfsd4_bump_seqid(cstate, status);
4081 4082
	if (!cstate->replay_owner)
		nfs4_unlock_state();
L
Linus Torvalds 已提交
4083 4084 4085
	return status;
}

4086 4087 4088 4089
static void nfsd4_close_open_stateid(struct nfs4_ol_stateid *s)
{
	unhash_open_stateid(s);
	s->st_stid.sc_type = NFS4_CLOSED_STID;
4090 4091
}

L
Linus Torvalds 已提交
4092 4093 4094
/*
 * nfs4_unlock_state() called after encode
 */
4095
__be32
4096
nfsd4_close(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4097
	    struct nfsd4_close *close)
L
Linus Torvalds 已提交
4098
{
4099
	__be32 status;
4100
	struct nfs4_openowner *oo;
4101
	struct nfs4_ol_stateid *stp;
4102 4103
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
4104

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

	nfs4_lock_state();
4109 4110 4111
	status = nfs4_preprocess_seqid_op(cstate, close->cl_seqid,
					&close->cl_stateid,
					NFS4_OPEN_STID|NFS4_CLOSED_STID,
4112
					&stp, nn);
4113
	nfsd4_bump_seqid(cstate, status);
4114
	if (status)
L
Linus Torvalds 已提交
4115
		goto out; 
4116
	oo = openowner(stp->st_stateowner);
4117 4118
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&close->cl_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
4119

4120
	nfsd4_close_open_stateid(stp);
4121

4122
	if (cstate->minorversion)
4123
		free_generic_stateid(stp);
4124
	else
4125
		oo->oo_last_closed_stid = stp;
4126

4127
	if (list_empty(&oo->oo_owner.so_stateids)) {
4128
		if (cstate->minorversion)
4129
			release_openowner(oo);
4130
		else {
4131 4132 4133 4134
			/*
			 * In the 4.0 case we need to keep the owners around a
			 * little while to handle CLOSE replay.
			 */
F
fanchaoting 已提交
4135
			move_to_close_lru(oo, SVC_NET(rqstp));
4136 4137
		}
	}
L
Linus Torvalds 已提交
4138
out:
4139 4140
	if (!cstate->replay_owner)
		nfs4_unlock_state();
L
Linus Torvalds 已提交
4141 4142 4143
	return status;
}

4144
__be32
4145 4146
nfsd4_delegreturn(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
		  struct nfsd4_delegreturn *dr)
L
Linus Torvalds 已提交
4147
{
4148 4149
	struct nfs4_delegation *dp;
	stateid_t *stateid = &dr->dr_stateid;
4150
	struct nfs4_stid *s;
4151
	__be32 status;
4152
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4153

4154
	if ((status = fh_verify(rqstp, &cstate->current_fh, S_IFREG, 0)))
4155
		return status;
L
Linus Torvalds 已提交
4156 4157

	nfs4_lock_state();
4158 4159
	status = nfsd4_lookup_stateid(stateid, NFS4_DELEG_STID, &s,
				      cstate->minorversion, nn);
4160
	if (status)
4161
		goto out;
4162
	dp = delegstateid(s);
4163
	status = check_stateid_generation(stateid, &dp->dl_stid.sc_stateid, nfsd4_has_session(cstate));
4164 4165 4166
	if (status)
		goto out;

4167
	destroy_delegation(dp);
L
Linus Torvalds 已提交
4168
out:
4169 4170
	nfs4_unlock_state();

L
Linus Torvalds 已提交
4171 4172 4173 4174 4175 4176
	return status;
}


#define LOFF_OVERFLOW(start, len)      ((u64)(len) > ~(u64)(start))

4177
#define LOCKOWNER_INO_HASH_MASK (LOCKOWNER_INO_HASH_SIZE - 1)
L
Linus Torvalds 已提交
4178

B
Benny Halevy 已提交
4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193
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;

4194
	WARN_ON_ONCE(!len);
B
Benny Halevy 已提交
4195 4196 4197 4198
	end = start + len;
	return end > start ? end - 1: NFS4_MAX_UINT64;
}

4199
static unsigned int lockowner_ino_hashval(struct inode *inode, u32 cl_id, struct xdr_netobj *ownername)
L
Linus Torvalds 已提交
4200 4201 4202
{
	return (file_hashval(inode) + cl_id
			+ opaque_hashval(ownername->data, ownername->len))
4203
		& LOCKOWNER_INO_HASH_MASK;
L
Linus Torvalds 已提交
4204 4205 4206 4207 4208 4209 4210 4211 4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222
}

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

4223 4224
/* Hack!: For now, we're defining this just so we can use a pointer to it
 * as a unique cookie to identify our (NFSv4's) posix locks. */
4225
static const struct lock_manager_operations nfsd_posix_mng_ops  = {
4226
};
L
Linus Torvalds 已提交
4227 4228 4229 4230

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

4233
	if (fl->fl_lmops == &nfsd_posix_mng_ops) {
4234 4235 4236
		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);
4237 4238 4239
		if (!deny->ld_owner.data)
			/* We just don't care that much */
			goto nevermind;
4240 4241
		deny->ld_owner.len = lo->lo_owner.so_owner.len;
		deny->ld_clientid = lo->lo_owner.so_client->cl_clientid;
4242
	} else {
4243 4244 4245
nevermind:
		deny->ld_owner.len = 0;
		deny->ld_owner.data = NULL;
4246 4247
		deny->ld_clientid.cl_boot = 0;
		deny->ld_clientid.cl_id = 0;
L
Linus Torvalds 已提交
4248 4249
	}
	deny->ld_start = fl->fl_start;
B
Benny Halevy 已提交
4250 4251
	deny->ld_length = NFS4_MAX_UINT64;
	if (fl->fl_end != NFS4_MAX_UINT64)
L
Linus Torvalds 已提交
4252 4253 4254 4255 4256 4257
		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;
}

J
J. Bruce Fields 已提交
4258 4259 4260 4261 4262 4263
static bool same_lockowner_ino(struct nfs4_lockowner *lo, struct inode *inode, clientid_t *clid, struct xdr_netobj *owner)
{
	struct nfs4_ol_stateid *lst;

	if (!same_owner_str(&lo->lo_owner, owner, clid))
		return false;
4264 4265 4266 4267
	if (list_empty(&lo->lo_owner.so_stateids)) {
		WARN_ON_ONCE(1);
		return false;
	}
J
J. Bruce Fields 已提交
4268 4269 4270 4271 4272
	lst = list_first_entry(&lo->lo_owner.so_stateids,
			       struct nfs4_ol_stateid, st_perstateowner);
	return lst->st_file->fi_inode == inode;
}

4273 4274
static struct nfs4_lockowner *
find_lockowner_str(struct inode *inode, clientid_t *clid,
4275
		   struct xdr_netobj *owner, struct nfsd_net *nn)
L
Linus Torvalds 已提交
4276
{
4277
	unsigned int hashval = lockowner_ino_hashval(inode, clid->cl_id, owner);
J
J. Bruce Fields 已提交
4278
	struct nfs4_lockowner *lo;
L
Linus Torvalds 已提交
4279

4280
	list_for_each_entry(lo, &nn->lockowner_ino_hashtbl[hashval], lo_owner_ino_hash) {
J
J. Bruce Fields 已提交
4281 4282
		if (same_lockowner_ino(lo, inode, clid, owner))
			return lo;
L
Linus Torvalds 已提交
4283 4284 4285 4286
	}
	return NULL;
}

4287
static void hash_lockowner(struct nfs4_lockowner *lo, unsigned int strhashval, struct nfs4_client *clp, struct nfs4_ol_stateid *open_stp)
4288
{
4289 4290 4291
	struct inode *inode = open_stp->st_file->fi_inode;
	unsigned int inohash = lockowner_ino_hashval(inode,
			clp->cl_clientid.cl_id, &lo->lo_owner.so_owner);
4292
	struct nfsd_net *nn = net_generic(clp->net, nfsd_net_id);
4293

4294
	list_add(&lo->lo_owner.so_strhash, &nn->ownerstr_hashtbl[strhashval]);
4295
	list_add(&lo->lo_owner_ino_hash, &nn->lockowner_ino_hashtbl[inohash]);
4296
	list_add(&lo->lo_perstateid, &open_stp->st_lockowners);
4297 4298
}

L
Linus Torvalds 已提交
4299 4300 4301
/*
 * Alloc a lock owner structure.
 * Called in nfsd4_lock - therefore, OPEN and OPEN_CONFIRM (if needed) has 
L
Lucas De Marchi 已提交
4302
 * occurred. 
L
Linus Torvalds 已提交
4303
 *
4304
 * strhashval = ownerstr_hashval
L
Linus Torvalds 已提交
4305 4306
 */

4307
static struct nfs4_lockowner *
4308
alloc_init_lock_stateowner(unsigned int strhashval, struct nfs4_client *clp, struct nfs4_ol_stateid *open_stp, struct nfsd4_lock *lock) {
4309
	struct nfs4_lockowner *lo;
L
Linus Torvalds 已提交
4310

4311 4312
	lo = alloc_stateowner(lockowner_slab, &lock->lk_new_owner, clp);
	if (!lo)
L
Linus Torvalds 已提交
4313
		return NULL;
4314 4315
	INIT_LIST_HEAD(&lo->lo_owner.so_stateids);
	lo->lo_owner.so_is_open_owner = 0;
4316 4317
	/* It is the openowner seqid that will be incremented in encode in the
	 * case of new lockowners; so increment the lock seqid manually: */
4318 4319 4320
	lo->lo_owner.so_seqid = lock->lk_new_lock_seqid + 1;
	hash_lockowner(lo, strhashval, clp, open_stp);
	return lo;
L
Linus Torvalds 已提交
4321 4322
}

4323 4324
static struct nfs4_ol_stateid *
alloc_init_lock_stateid(struct nfs4_lockowner *lo, struct nfs4_file *fp, struct nfs4_ol_stateid *open_stp)
L
Linus Torvalds 已提交
4325
{
4326
	struct nfs4_ol_stateid *stp;
4327
	struct nfs4_client *clp = lo->lo_owner.so_client;
L
Linus Torvalds 已提交
4328

4329
	stp = nfs4_alloc_stateid(clp);
N
NeilBrown 已提交
4330
	if (stp == NULL)
J
J. Bruce Fields 已提交
4331
		return NULL;
J
J. Bruce Fields 已提交
4332
	stp->st_stid.sc_type = NFS4_LOCK_STID;
4333
	list_add(&stp->st_perfile, &fp->fi_stateids);
4334 4335
	list_add(&stp->st_perstateowner, &lo->lo_owner.so_stateids);
	stp->st_stateowner = &lo->lo_owner;
4336
	get_nfs4_file(fp);
L
Linus Torvalds 已提交
4337
	stp->st_file = fp;
J
J. Bruce Fields 已提交
4338
	stp->st_access_bmap = 0;
L
Linus Torvalds 已提交
4339
	stp->st_deny_bmap = open_stp->st_deny_bmap;
4340
	stp->st_openstp = open_stp;
L
Linus Torvalds 已提交
4341 4342 4343
	return stp;
}

4344
static int
L
Linus Torvalds 已提交
4345 4346
check_lock_length(u64 offset, u64 length)
{
B
Benny Halevy 已提交
4347
	return ((length == 0)  || ((length != NFS4_MAX_UINT64) &&
L
Linus Torvalds 已提交
4348 4349 4350
	     LOFF_OVERFLOW(offset, length)));
}

4351
static void get_lock_access(struct nfs4_ol_stateid *lock_stp, u32 access)
J
J. Bruce Fields 已提交
4352 4353 4354 4355
{
	struct nfs4_file *fp = lock_stp->st_file;
	int oflag = nfs4_access_to_omode(access);

4356
	if (test_access(access, lock_stp))
J
J. Bruce Fields 已提交
4357 4358
		return;
	nfs4_file_get_access(fp, oflag);
4359
	set_access(access, lock_stp);
J
J. Bruce Fields 已提交
4360 4361
}

J
J. Bruce Fields 已提交
4362
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)
4363 4364 4365 4366 4367 4368
{
	struct nfs4_file *fi = ost->st_file;
	struct nfs4_openowner *oo = openowner(ost->st_stateowner);
	struct nfs4_client *cl = oo->oo_owner.so_client;
	struct nfs4_lockowner *lo;
	unsigned int strhashval;
4369
	struct nfsd_net *nn = net_generic(cl->net, nfsd_net_id);
4370

4371 4372
	lo = find_lockowner_str(fi->fi_inode, &cl->cl_clientid,
				&lock->v.new.owner, nn);
4373 4374 4375 4376 4377 4378 4379 4380
	if (lo) {
		if (!cstate->minorversion)
			return nfserr_bad_seqid;
		/* XXX: a lockowner always has exactly one stateid: */
		*lst = list_first_entry(&lo->lo_owner.so_stateids,
				struct nfs4_ol_stateid, st_perstateowner);
		return nfs_ok;
	}
4381
	strhashval = ownerstr_hashval(cl->cl_clientid.cl_id,
4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394
			&lock->v.new.owner);
	lo = alloc_init_lock_stateowner(strhashval, cl, ost, lock);
	if (lo == NULL)
		return nfserr_jukebox;
	*lst = alloc_init_lock_stateid(lo, fi, ost);
	if (*lst == NULL) {
		release_lockowner(lo);
		return nfserr_jukebox;
	}
	*new = true;
	return nfs_ok;
}

L
Linus Torvalds 已提交
4395 4396 4397
/*
 *  LOCK operation 
 */
4398
__be32
4399
nfsd4_lock(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4400
	   struct nfsd4_lock *lock)
L
Linus Torvalds 已提交
4401
{
4402 4403
	struct nfs4_openowner *open_sop = NULL;
	struct nfs4_lockowner *lock_sop = NULL;
4404
	struct nfs4_ol_stateid *lock_stp;
4405
	struct file *filp = NULL;
4406 4407
	struct file_lock *file_lock = NULL;
	struct file_lock *conflock = NULL;
4408
	__be32 status = 0;
4409
	bool new_state = false;
4410
	int lkflg;
4411
	int err;
4412 4413
	struct net *net = SVC_NET(rqstp);
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
4414 4415 4416 4417 4418 4419 4420 4421

	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;

4422
	if ((status = fh_verify(rqstp, &cstate->current_fh,
M
Miklos Szeredi 已提交
4423
				S_IFREG, NFSD_MAY_LOCK))) {
A
Andy Adamson 已提交
4424 4425 4426 4427
		dprintk("NFSD: nfsd4_lock: permission denied!\n");
		return status;
	}

L
Linus Torvalds 已提交
4428 4429 4430
	nfs4_lock_state();

	if (lock->lk_is_new) {
4431
		struct nfs4_ol_stateid *open_stp = NULL;
4432 4433 4434 4435 4436 4437 4438

		if (nfsd4_has_session(cstate))
			/* See rfc 5661 18.10.3: given clientid is ignored: */
			memcpy(&lock->v.new.clientid,
				&cstate->session->se_client->cl_clientid,
				sizeof(clientid_t));

L
Linus Torvalds 已提交
4439
		status = nfserr_stale_clientid;
4440
		if (STALE_CLIENTID(&lock->lk_new_clientid, nn))
L
Linus Torvalds 已提交
4441 4442 4443
			goto out;

		/* validate and update open stateid and open seqid */
4444
		status = nfs4_preprocess_confirmed_seqid_op(cstate,
L
Linus Torvalds 已提交
4445 4446
				        lock->lk_new_open_seqid,
		                        &lock->lk_new_open_stateid,
4447
					&open_stp, nn);
4448
		if (status)
L
Linus Torvalds 已提交
4449
			goto out;
4450
		open_sop = openowner(open_stp->st_stateowner);
4451
		status = nfserr_bad_stateid;
4452
		if (!same_clid(&open_sop->oo_owner.so_client->cl_clientid,
4453 4454
						&lock->v.new.clientid))
			goto out;
4455 4456
		status = lookup_or_create_lock_state(cstate, open_stp, lock,
							&lock_stp, &new_state);
J
J. Bruce Fields 已提交
4457
	} else
4458
		status = nfs4_preprocess_seqid_op(cstate,
4459 4460
				       lock->lk_old_lock_seqid,
				       &lock->lk_old_lock_stateid,
4461
				       NFS4_LOCK_STID, &lock_stp, nn);
J
J. Bruce Fields 已提交
4462 4463
	if (status)
		goto out;
4464
	lock_sop = lockowner(lock_stp->st_stateowner);
L
Linus Torvalds 已提交
4465

4466 4467 4468 4469 4470
	lkflg = setlkflg(lock->lk_type);
	status = nfs4_check_openmode(lock_stp, lkflg);
	if (status)
		goto out;

4471
	status = nfserr_grace;
4472
	if (locks_in_grace(net) && !lock->lk_reclaim)
4473 4474
		goto out;
	status = nfserr_no_grace;
4475
	if (!locks_in_grace(net) && lock->lk_reclaim)
4476 4477
		goto out;

4478 4479 4480 4481 4482 4483 4484 4485
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}

	locks_init_lock(file_lock);
L
Linus Torvalds 已提交
4486 4487 4488
	switch (lock->lk_type) {
		case NFS4_READ_LT:
		case NFS4_READW_LT:
J
J. Bruce Fields 已提交
4489 4490 4491
			filp = find_readable_file(lock_stp->st_file);
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_READ);
4492
			file_lock->fl_type = F_RDLCK;
4493
			break;
L
Linus Torvalds 已提交
4494 4495
		case NFS4_WRITE_LT:
		case NFS4_WRITEW_LT:
J
J. Bruce Fields 已提交
4496 4497 4498
			filp = find_writeable_file(lock_stp->st_file);
			if (filp)
				get_lock_access(lock_stp, NFS4_SHARE_ACCESS_WRITE);
4499
			file_lock->fl_type = F_WRLCK;
4500
			break;
L
Linus Torvalds 已提交
4501 4502 4503 4504
		default:
			status = nfserr_inval;
		goto out;
	}
4505 4506 4507 4508
	if (!filp) {
		status = nfserr_openmode;
		goto out;
	}
4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523
	file_lock->fl_owner = (fl_owner_t)lock_sop;
	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 已提交
4524

4525
	err = vfs_lock_file(filp, F_SETLK, file_lock, conflock);
4526
	switch (-err) {
L
Linus Torvalds 已提交
4527
	case 0: /* success! */
4528 4529
		update_stateid(&lock_stp->st_stid.sc_stateid);
		memcpy(&lock->lk_resp_stateid, &lock_stp->st_stid.sc_stateid, 
L
Linus Torvalds 已提交
4530
				sizeof(stateid_t));
4531
		status = 0;
4532 4533 4534 4535
		break;
	case (EAGAIN):		/* conflock holds conflicting lock */
		status = nfserr_denied;
		dprintk("NFSD: nfsd4_lock: conflicting lock found!\n");
4536
		nfs4_set_lock_denied(conflock, &lock->lk_denied);
4537
		break;
L
Linus Torvalds 已提交
4538 4539
	case (EDEADLK):
		status = nfserr_deadlock;
4540
		break;
4541
	default:
4542
		dprintk("NFSD: nfsd4_lock: vfs_lock_file() failed! status %d\n",err);
4543
		status = nfserrno(err);
4544
		break;
L
Linus Torvalds 已提交
4545 4546
	}
out:
4547
	if (status && new_state)
4548
		release_lockowner(lock_sop);
4549
	nfsd4_bump_seqid(cstate, status);
4550 4551
	if (!cstate->replay_owner)
		nfs4_unlock_state();
4552 4553 4554 4555
	if (file_lock)
		locks_free_lock(file_lock);
	if (conflock)
		locks_free_lock(conflock);
L
Linus Torvalds 已提交
4556 4557 4558
	return status;
}

4559 4560 4561 4562 4563 4564
/*
 * 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.)
 */
4565
static __be32 nfsd_test_lock(struct svc_rqst *rqstp, struct svc_fh *fhp, struct file_lock *lock)
4566 4567
{
	struct file *file;
4568 4569 4570 4571 4572
	__be32 err = nfsd_open(rqstp, fhp, S_IFREG, NFSD_MAY_READ, &file);
	if (!err) {
		err = nfserrno(vfs_test_lock(file, lock));
		nfsd_close(file);
	}
4573 4574 4575
	return err;
}

L
Linus Torvalds 已提交
4576 4577 4578
/*
 * LOCKT operation
 */
4579
__be32
4580 4581
nfsd4_lockt(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
	    struct nfsd4_lockt *lockt)
L
Linus Torvalds 已提交
4582 4583
{
	struct inode *inode;
4584
	struct file_lock *file_lock = NULL;
4585
	struct nfs4_lockowner *lo;
4586
	__be32 status;
4587
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4588

4589
	if (locks_in_grace(SVC_NET(rqstp)))
L
Linus Torvalds 已提交
4590 4591 4592 4593 4594 4595 4596
		return nfserr_grace;

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

	nfs4_lock_state();

4597 4598 4599 4600 4601
	if (!nfsd4_has_session(cstate)) {
		status = lookup_clientid(&lockt->lt_clientid, false, nn, NULL);
		if (status)
			goto out;
	}
L
Linus Torvalds 已提交
4602

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

4606
	inode = cstate->current_fh.fh_dentry->d_inode;
4607 4608 4609 4610 4611 4612 4613
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}
	locks_init_lock(file_lock);
L
Linus Torvalds 已提交
4614 4615 4616
	switch (lockt->lt_type) {
		case NFS4_READ_LT:
		case NFS4_READW_LT:
4617
			file_lock->fl_type = F_RDLCK;
L
Linus Torvalds 已提交
4618 4619 4620
		break;
		case NFS4_WRITE_LT:
		case NFS4_WRITEW_LT:
4621
			file_lock->fl_type = F_WRLCK;
L
Linus Torvalds 已提交
4622 4623
		break;
		default:
4624
			dprintk("NFSD: nfs4_lockt: bad lock type!\n");
L
Linus Torvalds 已提交
4625 4626 4627 4628
			status = nfserr_inval;
		goto out;
	}

4629
	lo = find_lockowner_str(inode, &lockt->lt_clientid, &lockt->lt_owner, nn);
4630
	if (lo)
4631 4632 4633
		file_lock->fl_owner = (fl_owner_t)lo;
	file_lock->fl_pid = current->tgid;
	file_lock->fl_flags = FL_POSIX;
L
Linus Torvalds 已提交
4634

4635 4636
	file_lock->fl_start = lockt->lt_offset;
	file_lock->fl_end = last_byte_offset(lockt->lt_offset, lockt->lt_length);
L
Linus Torvalds 已提交
4637

4638
	nfs4_transform_lock_offset(file_lock);
L
Linus Torvalds 已提交
4639

4640
	status = nfsd_test_lock(rqstp, &cstate->current_fh, file_lock);
4641
	if (status)
4642
		goto out;
4643

4644
	if (file_lock->fl_type != F_UNLCK) {
L
Linus Torvalds 已提交
4645
		status = nfserr_denied;
4646
		nfs4_set_lock_denied(file_lock, &lockt->lt_denied);
L
Linus Torvalds 已提交
4647 4648 4649
	}
out:
	nfs4_unlock_state();
4650 4651
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
4652 4653 4654
	return status;
}

4655
__be32
4656
nfsd4_locku(struct svc_rqst *rqstp, struct nfsd4_compound_state *cstate,
4657
	    struct nfsd4_locku *locku)
L
Linus Torvalds 已提交
4658
{
4659
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
4660
	struct file *filp = NULL;
4661
	struct file_lock *file_lock = NULL;
4662
	__be32 status;
4663
	int err;
4664 4665
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);

L
Linus Torvalds 已提交
4666 4667 4668 4669 4670 4671 4672 4673 4674
	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;

	nfs4_lock_state();
									        
4675
	status = nfs4_preprocess_seqid_op(cstate, locku->lu_seqid,
4676 4677
					&locku->lu_stateid, NFS4_LOCK_STID,
					&stp, nn);
4678
	if (status)
L
Linus Torvalds 已提交
4679
		goto out;
4680 4681 4682 4683 4684
	filp = find_any_file(stp->st_file);
	if (!filp) {
		status = nfserr_lock_range;
		goto out;
	}
4685 4686 4687 4688 4689 4690 4691 4692
	file_lock = locks_alloc_lock();
	if (!file_lock) {
		dprintk("NFSD: %s: unable to allocate lock!\n", __func__);
		status = nfserr_jukebox;
		goto out;
	}
	locks_init_lock(file_lock);
	file_lock->fl_type = F_UNLCK;
4693
	file_lock->fl_owner = (fl_owner_t)lockowner(stp->st_stateowner);
4694 4695 4696 4697 4698 4699 4700 4701 4702
	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 已提交
4703

4704
	err = vfs_lock_file(filp, F_SETLK, file_lock, NULL);
4705
	if (err) {
4706
		dprintk("NFSD: nfs4_locku: vfs_lock_file failed!\n");
L
Linus Torvalds 已提交
4707 4708
		goto out_nfserr;
	}
4709 4710
	update_stateid(&stp->st_stid.sc_stateid);
	memcpy(&locku->lu_stateid, &stp->st_stid.sc_stateid, sizeof(stateid_t));
L
Linus Torvalds 已提交
4711 4712

out:
4713
	nfsd4_bump_seqid(cstate, status);
4714 4715
	if (!cstate->replay_owner)
		nfs4_unlock_state();
4716 4717
	if (file_lock)
		locks_free_lock(file_lock);
L
Linus Torvalds 已提交
4718 4719 4720
	return status;

out_nfserr:
4721
	status = nfserrno(err);
L
Linus Torvalds 已提交
4722 4723 4724 4725 4726 4727 4728 4729 4730
	goto out;
}

/*
 * returns
 * 	1: locks held by lockowner
 * 	0: no locks held by lockowner
 */
static int
4731
check_for_locks(struct nfs4_file *filp, struct nfs4_lockowner *lowner)
L
Linus Torvalds 已提交
4732 4733
{
	struct file_lock **flpp;
4734
	struct inode *inode = filp->fi_inode;
L
Linus Torvalds 已提交
4735 4736
	int status = 0;

4737
	spin_lock(&inode->i_lock);
L
Linus Torvalds 已提交
4738
	for (flpp = &inode->i_flock; *flpp != NULL; flpp = &(*flpp)->fl_next) {
4739
		if ((*flpp)->fl_owner == (fl_owner_t)lowner) {
L
Linus Torvalds 已提交
4740 4741
			status = 1;
			goto out;
4742
		}
L
Linus Torvalds 已提交
4743 4744
	}
out:
4745
	spin_unlock(&inode->i_lock);
L
Linus Torvalds 已提交
4746 4747 4748
	return status;
}

4749
__be32
4750 4751 4752
nfsd4_release_lockowner(struct svc_rqst *rqstp,
			struct nfsd4_compound_state *cstate,
			struct nfsd4_release_lockowner *rlockowner)
L
Linus Torvalds 已提交
4753 4754
{
	clientid_t *clid = &rlockowner->rl_clientid;
4755
	struct nfs4_stateowner *sop;
4756
	struct nfs4_lockowner *lo;
4757
	struct nfs4_ol_stateid *stp;
L
Linus Torvalds 已提交
4758
	struct xdr_netobj *owner = &rlockowner->rl_owner;
4759
	struct list_head matches;
4760
	unsigned int hashval = ownerstr_hashval(clid->cl_id, owner);
4761
	__be32 status;
4762
	struct nfsd_net *nn = net_generic(SVC_NET(rqstp), nfsd_net_id);
L
Linus Torvalds 已提交
4763 4764 4765 4766 4767 4768

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

	nfs4_lock_state();

4769 4770 4771 4772
	status = lookup_clientid(clid, cstate->minorversion, nn, NULL);
	if (status)
		goto out;

4773 4774
	status = nfserr_locks_held;
	INIT_LIST_HEAD(&matches);
4775

4776
	list_for_each_entry(sop, &nn->ownerstr_hashtbl[hashval], so_strhash) {
4777 4778
		if (sop->so_is_open_owner)
			continue;
4779 4780 4781 4782 4783 4784 4785 4786
		if (!same_owner_str(sop, owner, clid))
			continue;
		list_for_each_entry(stp, &sop->so_stateids,
				st_perstateowner) {
			lo = lockowner(sop);
			if (check_for_locks(stp->st_file, lo))
				goto out;
			list_add(&lo->lo_list, &matches);
L
Linus Torvalds 已提交
4787
		}
4788 4789 4790 4791 4792
	}
	/* Clients probably won't expect us to return with some (but not all)
	 * of the lockowner state released; so don't release any until all
	 * have been checked. */
	status = nfs_ok;
N
NeilBrown 已提交
4793
	while (!list_empty(&matches)) {
4794 4795
		lo = list_entry(matches.next, struct nfs4_lockowner,
								lo_list);
N
NeilBrown 已提交
4796 4797
		/* unhash_stateowner deletes so_perclient only
		 * for openowners. */
4798 4799
		list_del(&lo->lo_list);
		release_lockowner(lo);
L
Linus Torvalds 已提交
4800 4801 4802 4803 4804 4805 4806
	}
out:
	nfs4_unlock_state();
	return status;
}

static inline struct nfs4_client_reclaim *
N
NeilBrown 已提交
4807
alloc_reclaim(void)
L
Linus Torvalds 已提交
4808
{
N
NeilBrown 已提交
4809
	return kmalloc(sizeof(struct nfs4_client_reclaim), GFP_KERNEL);
L
Linus Torvalds 已提交
4810 4811
}

4812
bool
4813
nfs4_has_reclaimed_state(const char *name, struct nfsd_net *nn)
4814
{
4815
	struct nfs4_client_reclaim *crp;
4816

4817
	crp = nfsd4_find_reclaim_client(name, nn);
4818
	return (crp && crp->cr_clp);
4819 4820
}

L
Linus Torvalds 已提交
4821 4822 4823
/*
 * failure => all reset bets are off, nfserr_no_grace...
 */
4824
struct nfs4_client_reclaim *
4825
nfs4_client_to_reclaim(const char *name, struct nfsd_net *nn)
L
Linus Torvalds 已提交
4826 4827
{
	unsigned int strhashval;
4828
	struct nfs4_client_reclaim *crp;
L
Linus Torvalds 已提交
4829

N
NeilBrown 已提交
4830 4831
	dprintk("NFSD nfs4_client_to_reclaim NAME: %.*s\n", HEXDIR_LEN, name);
	crp = alloc_reclaim();
4832 4833 4834
	if (crp) {
		strhashval = clientstr_hashval(name);
		INIT_LIST_HEAD(&crp->cr_strhash);
4835
		list_add(&crp->cr_strhash, &nn->reclaim_str_hashtbl[strhashval]);
4836
		memcpy(crp->cr_recdir, name, HEXDIR_LEN);
4837
		crp->cr_clp = NULL;
4838
		nn->reclaim_str_hashtbl_size++;
4839 4840
	}
	return crp;
L
Linus Torvalds 已提交
4841 4842
}

4843
void
4844
nfs4_remove_reclaim_record(struct nfs4_client_reclaim *crp, struct nfsd_net *nn)
4845 4846 4847
{
	list_del(&crp->cr_strhash);
	kfree(crp);
4848
	nn->reclaim_str_hashtbl_size--;
4849 4850
}

4851
void
4852
nfs4_release_reclaim(struct nfsd_net *nn)
L
Linus Torvalds 已提交
4853 4854 4855 4856 4857
{
	struct nfs4_client_reclaim *crp = NULL;
	int i;

	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
4858 4859
		while (!list_empty(&nn->reclaim_str_hashtbl[i])) {
			crp = list_entry(nn->reclaim_str_hashtbl[i].next,
L
Linus Torvalds 已提交
4860
			                struct nfs4_client_reclaim, cr_strhash);
4861
			nfs4_remove_reclaim_record(crp, nn);
L
Linus Torvalds 已提交
4862 4863
		}
	}
4864
	WARN_ON_ONCE(nn->reclaim_str_hashtbl_size);
L
Linus Torvalds 已提交
4865 4866 4867 4868
}

/*
 * called from OPEN, CLAIM_PREVIOUS with a new clientid. */
4869
struct nfs4_client_reclaim *
4870
nfsd4_find_reclaim_client(const char *recdir, struct nfsd_net *nn)
L
Linus Torvalds 已提交
4871 4872 4873 4874
{
	unsigned int strhashval;
	struct nfs4_client_reclaim *crp = NULL;

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

4877
	strhashval = clientstr_hashval(recdir);
4878
	list_for_each_entry(crp, &nn->reclaim_str_hashtbl[strhashval], cr_strhash) {
4879
		if (same_name(crp->cr_recdir, recdir)) {
L
Linus Torvalds 已提交
4880 4881 4882 4883 4884 4885 4886 4887 4888
			return crp;
		}
	}
	return NULL;
}

/*
* Called from OPEN. Look for clientid in reclaim list.
*/
4889
__be32
4890
nfs4_check_open_reclaim(clientid_t *clid, bool sessions, struct nfsd_net *nn)
L
Linus Torvalds 已提交
4891
{
4892 4893 4894
	struct nfs4_client *clp;

	/* find clientid in conf_id_hashtbl */
4895
	clp = find_confirmed_client(clid, sessions, nn);
4896 4897 4898 4899
	if (clp == NULL)
		return nfserr_reclaim_bad;

	return nfsd4_client_record_check(clp) ? nfserr_reclaim_bad : nfs_ok;
L
Linus Torvalds 已提交
4900 4901
}

B
Bryan Schumaker 已提交
4902 4903
#ifdef CONFIG_NFSD_FAULT_INJECTION

4904 4905
u64 nfsd_forget_client(struct nfs4_client *clp, u64 max)
{
4906 4907
	if (mark_client_expired(clp))
		return 0;
4908 4909 4910 4911
	expire_client(clp);
	return 1;
}

4912 4913 4914
u64 nfsd_print_client(struct nfs4_client *clp, u64 num)
{
	char buf[INET6_ADDRSTRLEN];
4915
	rpc_ntop((struct sockaddr *)&clp->cl_addr, buf, sizeof(buf));
4916 4917 4918 4919 4920 4921 4922 4923
	printk(KERN_INFO "NFS Client: %s\n", buf);
	return 1;
}

static void nfsd_print_count(struct nfs4_client *clp, unsigned int count,
			     const char *type)
{
	char buf[INET6_ADDRSTRLEN];
4924
	rpc_ntop((struct sockaddr *)&clp->cl_addr, buf, sizeof(buf));
4925 4926 4927
	printk(KERN_INFO "NFS Client: %s has %u %s\n", buf, count, type);
}

B
Bryan Schumaker 已提交
4928 4929 4930 4931 4932 4933 4934 4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946 4947 4948 4949 4950 4951 4952 4953
static u64 nfsd_foreach_client_lock(struct nfs4_client *clp, u64 max, void (*func)(struct nfs4_lockowner *))
{
	struct nfs4_openowner *oop;
	struct nfs4_lockowner *lop, *lo_next;
	struct nfs4_ol_stateid *stp, *st_next;
	u64 count = 0;

	list_for_each_entry(oop, &clp->cl_openowners, oo_perclient) {
		list_for_each_entry_safe(stp, st_next, &oop->oo_owner.so_stateids, st_perstateowner) {
			list_for_each_entry_safe(lop, lo_next, &stp->st_lockowners, lo_perstateid) {
				if (func)
					func(lop);
				if (++count == max)
					return count;
			}
		}
	}

	return count;
}

u64 nfsd_forget_client_locks(struct nfs4_client *clp, u64 max)
{
	return nfsd_foreach_client_lock(clp, max, release_lockowner);
}

4954 4955 4956 4957 4958 4959 4960
u64 nfsd_print_client_locks(struct nfs4_client *clp, u64 max)
{
	u64 count = nfsd_foreach_client_lock(clp, max, NULL);
	nfsd_print_count(clp, count, "locked files");
	return count;
}

4961 4962 4963 4964 4965 4966 4967 4968 4969 4970 4971 4972 4973 4974 4975 4976 4977 4978 4979 4980
static u64 nfsd_foreach_client_open(struct nfs4_client *clp, u64 max, void (*func)(struct nfs4_openowner *))
{
	struct nfs4_openowner *oop, *next;
	u64 count = 0;

	list_for_each_entry_safe(oop, next, &clp->cl_openowners, oo_perclient) {
		if (func)
			func(oop);
		if (++count == max)
			break;
	}

	return count;
}

u64 nfsd_forget_client_openowners(struct nfs4_client *clp, u64 max)
{
	return nfsd_foreach_client_open(clp, max, release_openowner);
}

4981 4982 4983 4984 4985 4986 4987
u64 nfsd_print_client_openowners(struct nfs4_client *clp, u64 max)
{
	u64 count = nfsd_foreach_client_open(clp, max, NULL);
	nfsd_print_count(clp, count, "open files");
	return count;
}

4988 4989 4990 4991 4992 4993
static u64 nfsd_find_all_delegations(struct nfs4_client *clp, u64 max,
				     struct list_head *victims)
{
	struct nfs4_delegation *dp, *next;
	u64 count = 0;

4994
	lockdep_assert_held(&state_lock);
4995 4996 4997 4998 4999 5000 5001 5002 5003 5004 5005 5006 5007 5008 5009
	list_for_each_entry_safe(dp, next, &clp->cl_delegations, dl_perclnt) {
		if (victims)
			list_move(&dp->dl_recall_lru, victims);
		if (++count == max)
			break;
	}
	return count;
}

u64 nfsd_forget_client_delegations(struct nfs4_client *clp, u64 max)
{
	struct nfs4_delegation *dp, *next;
	LIST_HEAD(victims);
	u64 count;

5010
	spin_lock(&state_lock);
5011
	count = nfsd_find_all_delegations(clp, max, &victims);
5012
	spin_unlock(&state_lock);
5013 5014

	list_for_each_entry_safe(dp, next, &victims, dl_recall_lru)
5015
		revoke_delegation(dp);
5016 5017 5018 5019 5020 5021 5022 5023 5024 5025

	return count;
}

u64 nfsd_recall_client_delegations(struct nfs4_client *clp, u64 max)
{
	struct nfs4_delegation *dp, *next;
	LIST_HEAD(victims);
	u64 count;

5026
	spin_lock(&state_lock);
5027 5028 5029
	count = nfsd_find_all_delegations(clp, max, &victims);
	list_for_each_entry_safe(dp, next, &victims, dl_recall_lru)
		nfsd_break_one_deleg(dp);
5030
	spin_unlock(&state_lock);
5031 5032 5033 5034

	return count;
}

5035 5036 5037 5038
u64 nfsd_print_client_delegations(struct nfs4_client *clp, u64 max)
{
	u64 count = 0;

5039
	spin_lock(&state_lock);
5040
	count = nfsd_find_all_delegations(clp, max, NULL);
5041
	spin_unlock(&state_lock);
5042 5043 5044 5045 5046

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

5047
u64 nfsd_for_n_state(u64 max, u64 (*func)(struct nfs4_client *, u64))
B
Bryan Schumaker 已提交
5048 5049
{
	struct nfs4_client *clp, *next;
5050
	u64 count = 0;
5051
	struct nfsd_net *nn = net_generic(current->nsproxy->net_ns, nfsd_net_id);
B
Bryan Schumaker 已提交
5052

5053 5054 5055
	if (!nfsd_netns_ready(nn))
		return 0;

5056
	list_for_each_entry_safe(clp, next, &nn->client_lru, cl_lru) {
5057 5058
		count += func(clp, max - count);
		if ((max != 0) && (count >= max))
B
Bryan Schumaker 已提交
5059 5060 5061
			break;
	}

5062 5063 5064
	return count;
}

5065 5066 5067 5068 5069 5070 5071 5072 5073 5074 5075 5076 5077 5078 5079
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;
}

B
Bryan Schumaker 已提交
5080 5081
#endif /* CONFIG_NFSD_FAULT_INJECTION */

5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100 5101 5102
/*
 * 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);
}

5103
static int nfs4_state_create_net(struct net *net)
5104 5105 5106 5107 5108 5109 5110
{
	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)
5111
		goto err;
5112 5113 5114 5115
	nn->unconf_id_hashtbl = kmalloc(sizeof(struct list_head) *
			CLIENT_HASH_SIZE, GFP_KERNEL);
	if (!nn->unconf_id_hashtbl)
		goto err_unconf_id;
5116 5117 5118 5119
	nn->ownerstr_hashtbl = kmalloc(sizeof(struct list_head) *
			OWNER_HASH_SIZE, GFP_KERNEL);
	if (!nn->ownerstr_hashtbl)
		goto err_ownerstr;
5120 5121 5122 5123
	nn->lockowner_ino_hashtbl = kmalloc(sizeof(struct list_head) *
			LOCKOWNER_INO_HASH_SIZE, GFP_KERNEL);
	if (!nn->lockowner_ino_hashtbl)
		goto err_lockowner_ino;
5124 5125 5126 5127
	nn->sessionid_hashtbl = kmalloc(sizeof(struct list_head) *
			SESSION_HASH_SIZE, GFP_KERNEL);
	if (!nn->sessionid_hashtbl)
		goto err_sessionid;
5128

5129
	for (i = 0; i < CLIENT_HASH_SIZE; i++) {
5130
		INIT_LIST_HEAD(&nn->conf_id_hashtbl[i]);
5131
		INIT_LIST_HEAD(&nn->unconf_id_hashtbl[i]);
5132
	}
5133 5134
	for (i = 0; i < OWNER_HASH_SIZE; i++)
		INIT_LIST_HEAD(&nn->ownerstr_hashtbl[i]);
5135 5136
	for (i = 0; i < LOCKOWNER_INO_HASH_SIZE; i++)
		INIT_LIST_HEAD(&nn->lockowner_ino_hashtbl[i]);
5137 5138
	for (i = 0; i < SESSION_HASH_SIZE; i++)
		INIT_LIST_HEAD(&nn->sessionid_hashtbl[i]);
5139
	nn->conf_name_tree = RB_ROOT;
5140
	nn->unconf_name_tree = RB_ROOT;
5141
	INIT_LIST_HEAD(&nn->client_lru);
5142
	INIT_LIST_HEAD(&nn->close_lru);
5143
	INIT_LIST_HEAD(&nn->del_recall_lru);
5144
	spin_lock_init(&nn->client_lock);
5145

5146
	INIT_DELAYED_WORK(&nn->laundromat_work, laundromat_main);
5147
	get_net(net);
5148

5149
	return 0;
5150

5151 5152
err_sessionid:
	kfree(nn->lockowner_ino_hashtbl);
5153 5154
err_lockowner_ino:
	kfree(nn->ownerstr_hashtbl);
5155 5156
err_ownerstr:
	kfree(nn->unconf_id_hashtbl);
5157 5158
err_unconf_id:
	kfree(nn->conf_id_hashtbl);
5159 5160
err:
	return -ENOMEM;
5161 5162 5163
}

static void
5164
nfs4_state_destroy_net(struct net *net)
5165 5166 5167 5168 5169 5170 5171 5172 5173 5174 5175
{
	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);
		}
	}
5176

5177 5178 5179 5180 5181
	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);
		}
5182 5183
	}

5184
	kfree(nn->sessionid_hashtbl);
5185
	kfree(nn->lockowner_ino_hashtbl);
5186
	kfree(nn->ownerstr_hashtbl);
5187
	kfree(nn->unconf_id_hashtbl);
5188
	kfree(nn->conf_id_hashtbl);
5189
	put_net(net);
5190 5191
}

5192
int
5193
nfs4_state_start_net(struct net *net)
5194
{
5195
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
5196 5197
	int ret;

5198
	ret = nfs4_state_create_net(net);
5199 5200
	if (ret)
		return ret;
5201
	nfsd4_client_tracking_init(net);
5202
	nn->boot_time = get_seconds();
5203
	locks_start_grace(net, &nn->nfsd4_manager);
5204
	nn->grace_ended = false;
5205
	printk(KERN_INFO "NFSD: starting %ld-second grace period (net %p)\n",
5206 5207
	       nn->nfsd4_grace, net);
	queue_delayed_work(laundry_wq, &nn->laundromat_work, nn->nfsd4_grace * HZ);
5208 5209 5210 5211 5212 5213 5214 5215 5216 5217
	return 0;
}

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

int
nfs4_state_start(void)
{
	int ret;

5218
	ret = set_callback_cred();
5219 5220
	if (ret)
		return -ENOMEM;
5221
	laundry_wq = create_singlethread_workqueue("nfsd4");
5222 5223 5224 5225
	if (laundry_wq == NULL) {
		ret = -ENOMEM;
		goto out_recovery;
	}
5226 5227 5228
	ret = nfsd4_create_callback_queue();
	if (ret)
		goto out_free_laundry;
5229

5230
	set_max_delegations();
5231

5232
	return 0;
5233

5234 5235
out_free_laundry:
	destroy_workqueue(laundry_wq);
5236
out_recovery:
5237
	return ret;
L
Linus Torvalds 已提交
5238 5239
}

5240
void
5241
nfs4_state_shutdown_net(struct net *net)
L
Linus Torvalds 已提交
5242 5243 5244
{
	struct nfs4_delegation *dp = NULL;
	struct list_head *pos, *next, reaplist;
5245
	struct nfsd_net *nn = net_generic(net, nfsd_net_id);
L
Linus Torvalds 已提交
5246

5247 5248
	cancel_delayed_work_sync(&nn->laundromat_work);
	locks_end_grace(&nn->nfsd4_manager);
5249

5250
	nfs4_lock_state();
L
Linus Torvalds 已提交
5251
	INIT_LIST_HEAD(&reaplist);
5252
	spin_lock(&state_lock);
5253
	list_for_each_safe(pos, next, &nn->del_recall_lru) {
L
Linus Torvalds 已提交
5254 5255 5256
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
		list_move(&dp->dl_recall_lru, &reaplist);
	}
5257
	spin_unlock(&state_lock);
L
Linus Torvalds 已提交
5258 5259
	list_for_each_safe(pos, next, &reaplist) {
		dp = list_entry (pos, struct nfs4_delegation, dl_recall_lru);
5260
		destroy_delegation(dp);
L
Linus Torvalds 已提交
5261 5262
	}

5263
	nfsd4_client_tracking_exit(net);
5264
	nfs4_state_destroy_net(net);
5265
	nfs4_unlock_state();
L
Linus Torvalds 已提交
5266 5267 5268 5269 5270
}

void
nfs4_state_shutdown(void)
{
5271
	destroy_workqueue(laundry_wq);
5272
	nfsd4_destroy_callback_queue();
L
Linus Torvalds 已提交
5273
}
5274 5275 5276 5277

static void
get_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
5278 5279
	if (HAS_STATE_ID(cstate, CURRENT_STATE_ID_FLAG) && CURRENT_STATEID(stateid))
		memcpy(stateid, &cstate->current_stateid, sizeof(stateid_t));
5280 5281 5282 5283 5284
}

static void
put_stateid(struct nfsd4_compound_state *cstate, stateid_t *stateid)
{
5285 5286 5287 5288 5289 5290 5291 5292 5293 5294
	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);
5295 5296
}

5297 5298 5299
/*
 * functions to set current state id
 */
5300 5301 5302 5303 5304 5305
void
nfsd4_set_opendowngradestateid(struct nfsd4_compound_state *cstate, struct nfsd4_open_downgrade *odp)
{
	put_stateid(cstate, &odp->od_stateid);
}

5306 5307 5308 5309 5310 5311
void
nfsd4_set_openstateid(struct nfsd4_compound_state *cstate, struct nfsd4_open *open)
{
	put_stateid(cstate, &open->op_stateid);
}

5312 5313 5314 5315 5316 5317 5318 5319 5320 5321 5322 5323 5324 5325 5326
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
 */
5327

5328 5329 5330 5331 5332 5333 5334 5335 5336 5337 5338 5339
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);
}

5340 5341 5342 5343 5344 5345 5346 5347 5348 5349 5350 5351
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);
}

5352 5353 5354 5355 5356 5357 5358
void
nfsd4_get_closestateid(struct nfsd4_compound_state *cstate, struct nfsd4_close *close)
{
	get_stateid(cstate, &close->cl_stateid);
}

void
5359
nfsd4_get_lockustateid(struct nfsd4_compound_state *cstate, struct nfsd4_locku *locku)
5360
{
5361
	get_stateid(cstate, &locku->lu_stateid);
5362
}
5363 5364 5365 5366 5367 5368 5369 5370 5371 5372 5373 5374

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