glock.c 50.8 KB
Newer Older
David Teigland's avatar
David Teigland committed
1 2
/*
 * Copyright (C) Sistina Software, Inc.  1997-2003 All rights reserved.
3
 * Copyright (C) 2004-2006 Red Hat, Inc.  All rights reserved.
David Teigland's avatar
David Teigland committed
4 5 6
 *
 * This copyrighted material is made available to anyone wishing to use,
 * modify, copy, or redistribute it subject to the terms and conditions
7
 * of the GNU General Public License version 2.
David Teigland's avatar
David Teigland committed
8 9 10 11 12 13 14 15 16 17
 */

#include <linux/sched.h>
#include <linux/slab.h>
#include <linux/spinlock.h>
#include <linux/completion.h>
#include <linux/buffer_head.h>
#include <linux/delay.h>
#include <linux/sort.h>
#include <linux/jhash.h>
18
#include <linux/kallsyms.h>
19
#include <linux/gfs2_ondisk.h>
20
#include <linux/list.h>
21
#include <linux/lm_interface.h>
22
#include <linux/wait.h>
akpm@linux-foundation.org's avatar
akpm@linux-foundation.org committed
23
#include <linux/module.h>
24
#include <linux/rwsem.h>
David Teigland's avatar
David Teigland committed
25
#include <asm/uaccess.h>
26 27
#include <linux/seq_file.h>
#include <linux/debugfs.h>
28 29
#include <linux/kthread.h>
#include <linux/freezer.h>
30 31
#include <linux/workqueue.h>
#include <linux/jiffies.h>
David Teigland's avatar
David Teigland committed
32 33

#include "gfs2.h"
34
#include "incore.h"
David Teigland's avatar
David Teigland committed
35 36 37 38 39 40 41 42
#include "glock.h"
#include "glops.h"
#include "inode.h"
#include "lm.h"
#include "lops.h"
#include "meta_io.h"
#include "quota.h"
#include "super.h"
43
#include "util.h"
David Teigland's avatar
David Teigland committed
44

45
struct gfs2_gl_hash_bucket {
46
        struct hlist_head hb_list;
47 48
};

49 50 51 52 53 54 55 56
struct glock_iter {
	int hash;                     /* hash bucket index         */
	struct gfs2_sbd *sdp;         /* incore superblock         */
	struct gfs2_glock *gl;        /* current glock struct      */
	struct seq_file *seq;         /* sequence file for debugfs */
	char string[512];             /* scratch space             */
};

David Teigland's avatar
David Teigland committed
57 58
typedef void (*glock_examiner) (struct gfs2_glock * gl);

59
static int gfs2_dump_lockstate(struct gfs2_sbd *sdp);
60
static int dump_glock(struct glock_iter *gi, struct gfs2_glock *gl);
61
static void gfs2_glock_xmote_th(struct gfs2_glock *gl, struct gfs2_holder *gh);
Steven Whitehouse's avatar
Steven Whitehouse committed
62
static void gfs2_glock_drop_th(struct gfs2_glock *gl);
63 64
static void run_queue(struct gfs2_glock *gl);

65
static DECLARE_RWSEM(gfs2_umount_flush_sem);
66
static struct dentry *gfs2_root;
67 68
static struct task_struct *scand_process;
static unsigned int scand_secs = 5;
69
static struct workqueue_struct *glock_workqueue;
70

71
#define GFS2_GL_HASH_SHIFT      15
72 73 74
#define GFS2_GL_HASH_SIZE       (1 << GFS2_GL_HASH_SHIFT)
#define GFS2_GL_HASH_MASK       (GFS2_GL_HASH_SIZE - 1)

75
static struct gfs2_gl_hash_bucket gl_hash_table[GFS2_GL_HASH_SIZE];
76
static struct dentry *gfs2_root;
77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116

/*
 * Despite what you might think, the numbers below are not arbitrary :-)
 * They are taken from the ipv4 routing hash code, which is well tested
 * and thus should be nearly optimal. Later on we might tweek the numbers
 * but for now this should be fine.
 *
 * The reason for putting the locks in a separate array from the list heads
 * is that we can have fewer locks than list heads and save memory. We use
 * the same hash function for both, but with a different hash mask.
 */
#if defined(CONFIG_SMP) || defined(CONFIG_DEBUG_SPINLOCK) || \
	defined(CONFIG_PROVE_LOCKING)

#ifdef CONFIG_LOCKDEP
# define GL_HASH_LOCK_SZ        256
#else
# if NR_CPUS >= 32
#  define GL_HASH_LOCK_SZ       4096
# elif NR_CPUS >= 16
#  define GL_HASH_LOCK_SZ       2048
# elif NR_CPUS >= 8
#  define GL_HASH_LOCK_SZ       1024
# elif NR_CPUS >= 4
#  define GL_HASH_LOCK_SZ       512
# else
#  define GL_HASH_LOCK_SZ       256
# endif
#endif

/* We never want more locks than chains */
#if GFS2_GL_HASH_SIZE < GL_HASH_LOCK_SZ
# undef GL_HASH_LOCK_SZ
# define GL_HASH_LOCK_SZ GFS2_GL_HASH_SIZE
#endif

static rwlock_t gl_hash_locks[GL_HASH_LOCK_SZ];

static inline rwlock_t *gl_lock_addr(unsigned int x)
{
117
	return &gl_hash_locks[x & (GL_HASH_LOCK_SZ-1)];
118 119
}
#else /* not SMP, so no spinlocks required */
Randy Dunlap's avatar
Randy Dunlap committed
120
static inline rwlock_t *gl_lock_addr(unsigned int x)
121 122 123 124
{
	return NULL;
}
#endif
125

David Teigland's avatar
David Teigland committed
126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
/**
 * relaxed_state_ok - is a requested lock compatible with the current lock mode?
 * @actual: the current state of the lock
 * @requested: the lock state that was requested by the caller
 * @flags: the modifier flags passed in by the caller
 *
 * Returns: 1 if the locks are compatible, 0 otherwise
 */

static inline int relaxed_state_ok(unsigned int actual, unsigned requested,
				   int flags)
{
	if (actual == requested)
		return 1;

	if (flags & GL_EXACT)
		return 0;

	if (actual == LM_ST_EXCLUSIVE && requested == LM_ST_SHARED)
		return 1;

	if (actual != LM_ST_UNLOCKED && (flags & LM_FLAG_ANY))
		return 1;

	return 0;
}

/**
 * gl_hash() - Turn glock number into hash bucket number
 * @lock: The glock number
 *
 * Returns: The number of the corresponding hash bucket
 */

160 161
static unsigned int gl_hash(const struct gfs2_sbd *sdp,
			    const struct lm_lockname *name)
David Teigland's avatar
David Teigland committed
162 163 164
{
	unsigned int h;

165
	h = jhash(&name->ln_number, sizeof(u64), 0);
David Teigland's avatar
David Teigland committed
166
	h = jhash(&name->ln_type, sizeof(unsigned int), h);
167
	h = jhash(&sdp, sizeof(struct gfs2_sbd *), h);
David Teigland's avatar
David Teigland committed
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 198 199 200 201
	h &= GFS2_GL_HASH_MASK;

	return h;
}

/**
 * glock_free() - Perform a few checks and then release struct gfs2_glock
 * @gl: The glock to release
 *
 * Also calls lock module to release its internal structure for this glock.
 *
 */

static void glock_free(struct gfs2_glock *gl)
{
	struct gfs2_sbd *sdp = gl->gl_sbd;
	struct inode *aspace = gl->gl_aspace;

	gfs2_lm_put_lock(sdp, gl->gl_lock);

	if (aspace)
		gfs2_aspace_put(aspace);

	kmem_cache_free(gfs2_glock_cachep, gl);
}

/**
 * gfs2_glock_hold() - increment reference count on glock
 * @gl: The glock to hold
 *
 */

void gfs2_glock_hold(struct gfs2_glock *gl)
{
202
	atomic_inc(&gl->gl_ref);
David Teigland's avatar
David Teigland committed
203 204 205 206 207 208 209 210 211 212 213
}

/**
 * gfs2_glock_put() - Decrement reference count on glock
 * @gl: The glock to put
 *
 */

int gfs2_glock_put(struct gfs2_glock *gl)
{
	int rv = 0;
214
	struct gfs2_sbd *sdp = gl->gl_sbd;
David Teigland's avatar
David Teigland committed
215

216
	write_lock(gl_lock_addr(gl->gl_hash));
217
	if (atomic_dec_and_test(&gl->gl_ref)) {
218
		hlist_del(&gl->gl_list);
219
		write_unlock(gl_lock_addr(gl->gl_hash));
220
		BUG_ON(spin_is_locked(&gl->gl_spin));
221 222 223 224 225
		gfs2_assert(sdp, gl->gl_state == LM_ST_UNLOCKED);
		gfs2_assert(sdp, list_empty(&gl->gl_reclaim));
		gfs2_assert(sdp, list_empty(&gl->gl_holders));
		gfs2_assert(sdp, list_empty(&gl->gl_waiters1));
		gfs2_assert(sdp, list_empty(&gl->gl_waiters3));
David Teigland's avatar
David Teigland committed
226 227 228 229
		glock_free(gl);
		rv = 1;
		goto out;
	}
230
	write_unlock(gl_lock_addr(gl->gl_hash));
231
out:
David Teigland's avatar
David Teigland committed
232 233 234 235 236 237 238 239 240 241 242
	return rv;
}

/**
 * search_bucket() - Find struct gfs2_glock by lock number
 * @bucket: the bucket to search
 * @name: The lock name
 *
 * Returns: NULL, or the struct gfs2_glock with the requested number
 */

243
static struct gfs2_glock *search_bucket(unsigned int hash,
244
					const struct gfs2_sbd *sdp,
245
					const struct lm_lockname *name)
David Teigland's avatar
David Teigland committed
246 247
{
	struct gfs2_glock *gl;
248
	struct hlist_node *h;
David Teigland's avatar
David Teigland committed
249

250
	hlist_for_each_entry(gl, h, &gl_hash_table[hash].hb_list, gl_list) {
David Teigland's avatar
David Teigland committed
251 252
		if (!lm_name_equal(&gl->gl_name, name))
			continue;
253 254
		if (gl->gl_sbd != sdp)
			continue;
David Teigland's avatar
David Teigland committed
255

256
		atomic_inc(&gl->gl_ref);
David Teigland's avatar
David Teigland committed
257 258 259 260 261 262 263 264 265 266 267 268 269 270 271

		return gl;
	}

	return NULL;
}

/**
 * gfs2_glock_find() - Find glock by lock number
 * @sdp: The GFS2 superblock
 * @name: The lock name
 *
 * Returns: NULL, or the struct gfs2_glock with the requested number
 */

272
static struct gfs2_glock *gfs2_glock_find(const struct gfs2_sbd *sdp,
273
					  const struct lm_lockname *name)
David Teigland's avatar
David Teigland committed
274
{
275
	unsigned int hash = gl_hash(sdp, name);
David Teigland's avatar
David Teigland committed
276 277
	struct gfs2_glock *gl;

278
	read_lock(gl_lock_addr(hash));
279
	gl = search_bucket(hash, sdp, name);
280
	read_unlock(gl_lock_addr(hash));
David Teigland's avatar
David Teigland committed
281 282 283 284

	return gl;
}

285 286 287 288 289 290 291 292 293 294 295 296
static void glock_work_func(struct work_struct *work)
{
	struct gfs2_glock *gl = container_of(work, struct gfs2_glock, gl_work.work);

	spin_lock(&gl->gl_spin);
	if (test_and_clear_bit(GLF_PENDING_DEMOTE, &gl->gl_flags))
		set_bit(GLF_DEMOTE, &gl->gl_flags);
	run_queue(gl);
	spin_unlock(&gl->gl_spin);
	gfs2_glock_put(gl);
}

David Teigland's avatar
David Teigland committed
297 298 299 300 301 302 303 304 305 306 307 308 309
/**
 * gfs2_glock_get() - Get a glock, or create one if one doesn't exist
 * @sdp: The GFS2 superblock
 * @number: the lock number
 * @glops: The glock_operations to use
 * @create: If 0, don't create the glock if it doesn't exist
 * @glp: the glock is returned here
 *
 * This does not lock a glock, just finds/creates structures for one.
 *
 * Returns: errno
 */

310
int gfs2_glock_get(struct gfs2_sbd *sdp, u64 number,
311
		   const struct gfs2_glock_operations *glops, int create,
David Teigland's avatar
David Teigland committed
312 313
		   struct gfs2_glock **glp)
{
314
	struct lm_lockname name = { .ln_number = number, .ln_type = glops->go_type };
David Teigland's avatar
David Teigland committed
315
	struct gfs2_glock *gl, *tmp;
316
	unsigned int hash = gl_hash(sdp, &name);
David Teigland's avatar
David Teigland committed
317 318
	int error;

319
	read_lock(gl_lock_addr(hash));
320
	gl = search_bucket(hash, sdp, &name);
321
	read_unlock(gl_lock_addr(hash));
David Teigland's avatar
David Teigland committed
322 323 324 325 326 327 328 329 330 331

	if (gl || !create) {
		*glp = gl;
		return 0;
	}

	gl = kmem_cache_alloc(gfs2_glock_cachep, GFP_KERNEL);
	if (!gl)
		return -ENOMEM;

332
	gl->gl_flags = 0;
David Teigland's avatar
David Teigland committed
333
	gl->gl_name = name;
334
	atomic_set(&gl->gl_ref, 1);
David Teigland's avatar
David Teigland committed
335
	gl->gl_state = LM_ST_UNLOCKED;
336
	gl->gl_demote_state = LM_ST_EXCLUSIVE;
337
	gl->gl_hash = hash;
338
	gl->gl_owner_pid = 0;
339
	gl->gl_ip = 0;
David Teigland's avatar
David Teigland committed
340
	gl->gl_ops = glops;
341 342 343 344
	gl->gl_req_gh = NULL;
	gl->gl_req_bh = NULL;
	gl->gl_vn = 0;
	gl->gl_stamp = jiffies;
345
	gl->gl_tchange = jiffies;
346
	gl->gl_object = NULL;
David Teigland's avatar
David Teigland committed
347
	gl->gl_sbd = sdp;
348
	gl->gl_aspace = NULL;
David Teigland's avatar
David Teigland committed
349
	lops_init_le(&gl->gl_le, &gfs2_glock_lops);
350
	INIT_DELAYED_WORK(&gl->gl_work, glock_work_func);
David Teigland's avatar
David Teigland committed
351 352 353

	/* If this glock protects actual on-disk data or metadata blocks,
	   create a VFS inode to manage the pages/buffers holding them. */
354
	if (glops == &gfs2_inode_glops || glops == &gfs2_rgrp_glops) {
David Teigland's avatar
David Teigland committed
355 356 357 358 359 360 361 362 363 364 365
		gl->gl_aspace = gfs2_aspace_get(sdp);
		if (!gl->gl_aspace) {
			error = -ENOMEM;
			goto fail;
		}
	}

	error = gfs2_lm_get_lock(sdp, &name, &gl->gl_lock);
	if (error)
		goto fail_aspace;

366
	write_lock(gl_lock_addr(hash));
367
	tmp = search_bucket(hash, sdp, &name);
David Teigland's avatar
David Teigland committed
368
	if (tmp) {
369
		write_unlock(gl_lock_addr(hash));
David Teigland's avatar
David Teigland committed
370 371 372
		glock_free(gl);
		gl = tmp;
	} else {
373
		hlist_add_head(&gl->gl_list, &gl_hash_table[hash].hb_list);
374
		write_unlock(gl_lock_addr(hash));
David Teigland's avatar
David Teigland committed
375 376 377 378 379 380
	}

	*glp = gl;

	return 0;

381
fail_aspace:
David Teigland's avatar
David Teigland committed
382 383
	if (gl->gl_aspace)
		gfs2_aspace_put(gl->gl_aspace);
384
fail:
385
	kmem_cache_free(gfs2_glock_cachep, gl);
David Teigland's avatar
David Teigland committed
386 387 388 389 390 391 392 393 394 395 396 397
	return error;
}

/**
 * gfs2_holder_init - initialize a struct gfs2_holder in the default way
 * @gl: the glock
 * @state: the state we're requesting
 * @flags: the modifier flags
 * @gh: the holder structure
 *
 */

398
void gfs2_holder_init(struct gfs2_glock *gl, unsigned int state, unsigned flags,
David Teigland's avatar
David Teigland committed
399 400 401 402
		      struct gfs2_holder *gh)
{
	INIT_LIST_HEAD(&gh->gh_list);
	gh->gh_gl = gl;
403
	gh->gh_ip = (unsigned long)__builtin_return_address(0);
404
	gh->gh_owner_pid = current->pid;
David Teigland's avatar
David Teigland committed
405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421
	gh->gh_state = state;
	gh->gh_flags = flags;
	gh->gh_error = 0;
	gh->gh_iflags = 0;
	gfs2_glock_hold(gl);
}

/**
 * gfs2_holder_reinit - reinitialize a struct gfs2_holder so we can requeue it
 * @state: the state we're requesting
 * @flags: the modifier flags
 * @gh: the holder structure
 *
 * Don't mess with the glock.
 *
 */

422
void gfs2_holder_reinit(unsigned int state, unsigned flags, struct gfs2_holder *gh)
David Teigland's avatar
David Teigland committed
423 424
{
	gh->gh_state = state;
425
	gh->gh_flags = flags;
426
	gh->gh_iflags = 0;
427
	gh->gh_ip = (unsigned long)__builtin_return_address(0);
David Teigland's avatar
David Teigland committed
428 429 430 431 432 433 434 435 436 437 438 439
}

/**
 * gfs2_holder_uninit - uninitialize a holder structure (drop glock reference)
 * @gh: the holder structure
 *
 */

void gfs2_holder_uninit(struct gfs2_holder *gh)
{
	gfs2_glock_put(gh->gh_gl);
	gh->gh_gl = NULL;
440
	gh->gh_ip = 0;
David Teigland's avatar
David Teigland committed
441 442
}

443
static void gfs2_holder_wake(struct gfs2_holder *gh)
444 445
{
	clear_bit(HIF_WAIT, &gh->gh_iflags);
Abhijith Das's avatar
Abhijith Das committed
446
	smp_mb__after_clear_bit();
447 448 449
	wake_up_bit(&gh->gh_iflags, HIF_WAIT);
}

Abhijith Das's avatar
Abhijith Das committed
450
static int just_schedule(void *word)
451 452 453 454 455 456 457 458
{
        schedule();
        return 0;
}

static void wait_on_holder(struct gfs2_holder *gh)
{
	might_sleep();
Abhijith Das's avatar
Abhijith Das committed
459 460 461 462 463
	wait_on_bit(&gh->gh_iflags, HIF_WAIT, just_schedule, TASK_UNINTERRUPTIBLE);
}

static void gfs2_demote_wake(struct gfs2_glock *gl)
{
464 465
	BUG_ON(!spin_is_locked(&gl->gl_spin));
	gl->gl_demote_state = LM_ST_EXCLUSIVE;
Abhijith Das's avatar
Abhijith Das committed
466 467 468 469 470 471 472 473 474
        clear_bit(GLF_DEMOTE, &gl->gl_flags);
        smp_mb__after_clear_bit();
        wake_up_bit(&gl->gl_flags, GLF_DEMOTE);
}

static void wait_on_demote(struct gfs2_glock *gl)
{
	might_sleep();
	wait_on_bit(&gl->gl_flags, GLF_DEMOTE, just_schedule, TASK_UNINTERRUPTIBLE);
475 476
}

David Teigland's avatar
David Teigland committed
477 478 479 480 481 482 483 484 485 486 487 488 489 490
/**
 * rq_mutex - process a mutex request in the queue
 * @gh: the glock holder
 *
 * Returns: 1 if the queue is blocked
 */

static int rq_mutex(struct gfs2_holder *gh)
{
	struct gfs2_glock *gl = gh->gh_gl;

	list_del_init(&gh->gh_list);
	/*  gh->gh_error never examined.  */
	set_bit(GLF_LOCK, &gl->gl_flags);
Steven Whitehouse's avatar
Steven Whitehouse committed
491
	clear_bit(HIF_WAIT, &gh->gh_iflags);
492 493
	smp_mb();
	wake_up_bit(&gh->gh_iflags, HIF_WAIT);
David Teigland's avatar
David Teigland committed
494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515

	return 1;
}

/**
 * rq_promote - process a promote request in the queue
 * @gh: the glock holder
 *
 * Acquire a new inter-node lock, or change a lock state to more restrictive.
 *
 * Returns: 1 if the queue is blocked
 */

static int rq_promote(struct gfs2_holder *gh)
{
	struct gfs2_glock *gl = gh->gh_gl;

	if (!relaxed_state_ok(gl->gl_state, gh->gh_state, gh->gh_flags)) {
		if (list_empty(&gl->gl_holders)) {
			gl->gl_req_gh = gh;
			set_bit(GLF_LOCK, &gl->gl_flags);
			spin_unlock(&gl->gl_spin);
516
			gfs2_glock_xmote_th(gh->gh_gl, gh);
David Teigland's avatar
David Teigland committed
517 518 519 520 521 522 523 524 525 526
			spin_lock(&gl->gl_spin);
		}
		return 1;
	}

	if (list_empty(&gl->gl_holders)) {
		set_bit(HIF_FIRST, &gh->gh_iflags);
		set_bit(GLF_LOCK, &gl->gl_flags);
	} else {
		struct gfs2_holder *next_gh;
527
		if (gh->gh_state == LM_ST_EXCLUSIVE)
David Teigland's avatar
David Teigland committed
528 529 530
			return 1;
		next_gh = list_entry(gl->gl_holders.next, struct gfs2_holder,
				     gh_list);
531
		if (next_gh->gh_state == LM_ST_EXCLUSIVE)
David Teigland's avatar
David Teigland committed
532 533 534 535 536 537 538
			 return 1;
	}

	list_move_tail(&gh->gh_list, &gl->gl_holders);
	gh->gh_error = 0;
	set_bit(HIF_HOLDER, &gh->gh_iflags);

539
	gfs2_holder_wake(gh);
David Teigland's avatar
David Teigland committed
540 541 542 543 544 545 546 547 548 549 550

	return 0;
}

/**
 * rq_demote - process a demote request in the queue
 * @gh: the glock holder
 *
 * Returns: 1 if the queue is blocked
 */

551
static int rq_demote(struct gfs2_glock *gl)
David Teigland's avatar
David Teigland committed
552 553 554 555
{
	if (!list_empty(&gl->gl_holders))
		return 1;

556 557
	if (gl->gl_state == gl->gl_demote_state ||
	    gl->gl_state == LM_ST_UNLOCKED) {
Abhijith Das's avatar
Abhijith Das committed
558
		gfs2_demote_wake(gl);
559
		return 0;
David Teigland's avatar
David Teigland committed
560
	}
561

562
	set_bit(GLF_LOCK, &gl->gl_flags);
563 564
	set_bit(GLF_DEMOTE_IN_PROGRESS, &gl->gl_flags);

565
	if (gl->gl_demote_state == LM_ST_UNLOCKED ||
566 567
	    gl->gl_state != LM_ST_EXCLUSIVE) {
		spin_unlock(&gl->gl_spin);
568
		gfs2_glock_drop_th(gl);
569 570
	} else {
		spin_unlock(&gl->gl_spin);
571
		gfs2_glock_xmote_th(gl, NULL);
572
	}
573

574
	spin_lock(&gl->gl_spin);
575
	clear_bit(GLF_DEMOTE_IN_PROGRESS, &gl->gl_flags);
David Teigland's avatar
David Teigland committed
576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602

	return 0;
}

/**
 * run_queue - process holder structures on a glock
 * @gl: the glock
 *
 */
static void run_queue(struct gfs2_glock *gl)
{
	struct gfs2_holder *gh;
	int blocked = 1;

	for (;;) {
		if (test_bit(GLF_LOCK, &gl->gl_flags))
			break;

		if (!list_empty(&gl->gl_waiters1)) {
			gh = list_entry(gl->gl_waiters1.next,
					struct gfs2_holder, gh_list);

			if (test_bit(HIF_MUTEX, &gh->gh_iflags))
				blocked = rq_mutex(gh);
			else
				gfs2_assert_warn(gl->gl_sbd, 0);

603 604
		} else if (test_bit(GLF_DEMOTE, &gl->gl_flags)) {
			blocked = rq_demote(gl);
605 606 607 608 609
			if (gl->gl_waiters2 && !blocked) {
				set_bit(GLF_DEMOTE, &gl->gl_flags);
				gl->gl_demote_state = LM_ST_UNLOCKED;
			}
			gl->gl_waiters2 = 0;
David Teigland's avatar
David Teigland committed
610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633
		} else if (!list_empty(&gl->gl_waiters3)) {
			gh = list_entry(gl->gl_waiters3.next,
					struct gfs2_holder, gh_list);

			if (test_bit(HIF_PROMOTE, &gh->gh_iflags))
				blocked = rq_promote(gh);
			else
				gfs2_assert_warn(gl->gl_sbd, 0);

		} else
			break;

		if (blocked)
			break;
	}
}

/**
 * gfs2_glmutex_lock - acquire a local lock on a glock
 * @gl: the glock
 *
 * Gives caller exclusive access to manipulate a glock structure.
 */

634
static void gfs2_glmutex_lock(struct gfs2_glock *gl)
David Teigland's avatar
David Teigland committed
635 636 637 638 639
{
	struct gfs2_holder gh;

	gfs2_holder_init(gl, 0, 0, &gh);
	set_bit(HIF_MUTEX, &gh.gh_iflags);
640 641
	if (test_and_set_bit(HIF_WAIT, &gh.gh_iflags))
		BUG();
David Teigland's avatar
David Teigland committed
642 643

	spin_lock(&gl->gl_spin);
644
	if (test_and_set_bit(GLF_LOCK, &gl->gl_flags)) {
David Teigland's avatar
David Teigland committed
645
		list_add_tail(&gh.gh_list, &gl->gl_waiters1);
646
	} else {
647
		gl->gl_owner_pid = current->pid;
648
		gl->gl_ip = (unsigned long)__builtin_return_address(0);
649 650 651
		clear_bit(HIF_WAIT, &gh.gh_iflags);
		smp_mb();
		wake_up_bit(&gh.gh_iflags, HIF_WAIT);
652
	}
David Teigland's avatar
David Teigland committed
653 654
	spin_unlock(&gl->gl_spin);

655
	wait_on_holder(&gh);
David Teigland's avatar
David Teigland committed
656 657 658 659 660 661 662 663 664 665
	gfs2_holder_uninit(&gh);
}

/**
 * gfs2_glmutex_trylock - try to acquire a local lock on a glock
 * @gl: the glock
 *
 * Returns: 1 if the glock is acquired
 */

666
static int gfs2_glmutex_trylock(struct gfs2_glock *gl)
David Teigland's avatar
David Teigland committed
667 668 669 670
{
	int acquired = 1;

	spin_lock(&gl->gl_spin);
671
	if (test_and_set_bit(GLF_LOCK, &gl->gl_flags)) {
David Teigland's avatar
David Teigland committed
672
		acquired = 0;
673
	} else {
674
		gl->gl_owner_pid = current->pid;
675 676
		gl->gl_ip = (unsigned long)__builtin_return_address(0);
	}
David Teigland's avatar
David Teigland committed
677 678 679 680 681 682 683 684 685 686 687
	spin_unlock(&gl->gl_spin);

	return acquired;
}

/**
 * gfs2_glmutex_unlock - release a local lock on a glock
 * @gl: the glock
 *
 */

688
static void gfs2_glmutex_unlock(struct gfs2_glock *gl)
David Teigland's avatar
David Teigland committed
689 690 691
{
	spin_lock(&gl->gl_spin);
	clear_bit(GLF_LOCK, &gl->gl_flags);
692
	gl->gl_owner_pid = 0;
693
	gl->gl_ip = 0;
David Teigland's avatar
David Teigland committed
694
	run_queue(gl);
695
	BUG_ON(!spin_is_locked(&gl->gl_spin));
David Teigland's avatar
David Teigland committed
696 697 698 699
	spin_unlock(&gl->gl_spin);
}

/**
700
 * handle_callback - process a demote request
David Teigland's avatar
David Teigland committed
701 702 703
 * @gl: the glock
 * @state: the state the caller wants us to change to
 *
704 705
 * There are only two requests that we are going to see in actual
 * practise: LM_ST_SHARED and LM_ST_UNLOCKED
David Teigland's avatar
David Teigland committed
706 707
 */

708 709
static void handle_callback(struct gfs2_glock *gl, unsigned int state,
			    int remote, unsigned long delay)
David Teigland's avatar
David Teigland committed
710
{
711 712
	int bit = delay ? GLF_PENDING_DEMOTE : GLF_DEMOTE;

David Teigland's avatar
David Teigland committed
713
	spin_lock(&gl->gl_spin);
714 715
	set_bit(bit, &gl->gl_flags);
	if (gl->gl_demote_state == LM_ST_EXCLUSIVE) {
716 717
		gl->gl_demote_state = state;
		gl->gl_demote_time = jiffies;
Abhijith Das's avatar
Abhijith Das committed
718 719
		if (remote && gl->gl_ops->go_type == LM_TYPE_IOPEN &&
		    gl->gl_object) {
720
			gfs2_glock_schedule_for_reclaim(gl);
Abhijith Das's avatar
Abhijith Das committed
721 722 723
			spin_unlock(&gl->gl_spin);
			return;
		}
724 725
	} else if (gl->gl_demote_state != LM_ST_UNLOCKED &&
			gl->gl_demote_state != state) {
726 727 728 729
		if (test_bit(GLF_DEMOTE_IN_PROGRESS,  &gl->gl_flags)) 
			gl->gl_waiters2 = 1;
		else 
			gl->gl_demote_state = LM_ST_UNLOCKED;
David Teigland's avatar
David Teigland committed
730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748
	}
	spin_unlock(&gl->gl_spin);
}

/**
 * state_change - record that the glock is now in a different state
 * @gl: the glock
 * @new_state the new state
 *
 */

static void state_change(struct gfs2_glock *gl, unsigned int new_state)
{
	int held1, held2;

	held1 = (gl->gl_state != LM_ST_UNLOCKED);
	held2 = (new_state != LM_ST_UNLOCKED);

	if (held1 != held2) {
749
		if (held2)
David Teigland's avatar
David Teigland committed
750
			gfs2_glock_hold(gl);
751
		else
David Teigland's avatar
David Teigland committed
752 753 754 755
			gfs2_glock_put(gl);
	}

	gl->gl_state = new_state;
756
	gl->gl_tchange = jiffies;
David Teigland's avatar
David Teigland committed
757 758 759 760 761 762 763 764 765 766 767 768
}

/**
 * xmote_bh - Called after the lock module is done acquiring a lock
 * @gl: The glock in question
 * @ret: the int returned from the lock module
 *
 */

static void xmote_bh(struct gfs2_glock *gl, unsigned int ret)
{
	struct gfs2_sbd *sdp = gl->gl_sbd;
769
	const struct gfs2_glock_operations *glops = gl->gl_ops;
David Teigland's avatar
David Teigland committed
770 771 772 773 774
	struct gfs2_holder *gh = gl->gl_req_gh;
	int prev_state = gl->gl_state;
	int op_done = 1;

	gfs2_assert_warn(sdp, test_bit(GLF_LOCK, &gl->gl_flags));
775
	gfs2_assert_warn(sdp, list_empty(&gl->gl_holders));
David Teigland's avatar
David Teigland committed
776 777 778 779 780 781
	gfs2_assert_warn(sdp, !(ret & LM_OUT_ASYNC));

	state_change(gl, ret & LM_OUT_ST_MASK);

	if (prev_state != LM_ST_UNLOCKED && !(ret & LM_OUT_CACHEABLE)) {
		if (glops->go_inval)
782
			glops->go_inval(gl, DIO_METADATA);
David Teigland's avatar
David Teigland committed
783 784 785 786
	} else if (gl->gl_state == LM_ST_DEFERRED) {
		/* We might not want to do this here.
		   Look at moving to the inode glops. */
		if (glops->go_inval)
787
			glops->go_inval(gl, 0);
David Teigland's avatar
David Teigland committed
788 789 790 791
	}

	/*  Deal with each possible exit condition  */

792
	if (!gh) {
David Teigland's avatar
David Teigland committed
793
		gl->gl_stamp = jiffies;
794
		if (ret & LM_OUT_CANCELED) {
795
			op_done = 0;
796 797 798 799 800 801 802 803 804
		} else {
			spin_lock(&gl->gl_spin);
			if (gl->gl_state != gl->gl_demote_state) {
				gl->gl_req_bh = NULL;
				spin_unlock(&gl->gl_spin);
				gfs2_glock_drop_th(gl);
				gfs2_glock_put(gl);
				return;
			}
Abhijith Das's avatar
Abhijith Das committed
805
			gfs2_demote_wake(gl);
806 807
			spin_unlock(&gl->gl_spin);
		}
808
	} else {
David Teigland's avatar
David Teigland committed
809 810 811
		spin_lock(&gl->gl_spin);
		list_del_init(&gh->gh_list);
		gh->gh_error = -EIO;
812 813 814 815 816 817 818
		if (unlikely(test_bit(SDF_SHUTDOWN, &sdp->sd_flags))) 
			goto out;
		gh->gh_error = GLR_CANCELED;
		if (ret & LM_OUT_CANCELED) 
			goto out;
		if (relaxed_state_ok(gl->gl_state, gh->gh_state, gh->gh_flags)) {
			list_add_tail(&gh->gh_list, &gl->gl_holders);
David Teigland's avatar
David Teigland committed
819
			gh->gh_error = 0;
820 821 822 823
			set_bit(HIF_HOLDER, &gh->gh_iflags);
			set_bit(HIF_FIRST, &gh->gh_iflags);
			op_done = 0;
			goto out;
David Teigland's avatar
David Teigland committed
824 825
		}
		gh->gh_error = GLR_TRYFAILED;
826 827 828
		if (gh->gh_flags & (LM_FLAG_TRY | LM_FLAG_TRY_1CB))
			goto out;
		gh->gh_error = -EINVAL;
David Teigland's avatar
David Teigland committed
829 830
		if (gfs2_assert_withdraw(sdp, 0) == -1)
			fs_err(sdp, "ret = 0x%.8X\n", ret);
831 832
out:
		spin_unlock(&gl->gl_spin);
David Teigland's avatar
David Teigland committed
833 834 835 836 837 838 839 840 841 842 843 844 845 846 847
	}

	if (glops->go_xmote_bh)
		glops->go_xmote_bh(gl);

	if (op_done) {
		spin_lock(&gl->gl_spin);
		gl->gl_req_gh = NULL;
		gl->gl_req_bh = NULL;
		clear_bit(GLF_LOCK, &gl->gl_flags);
		spin_unlock(&gl->gl_spin);
	}

	gfs2_glock_put(gl);

848
	if (gh)
849
		gfs2_holder_wake(gh);
David Teigland's avatar
David Teigland committed
850 851 852 853 854 855 856 857 858 859
}

/**
 * gfs2_glock_xmote_th - Call into the lock module to acquire or change a glock
 * @gl: The glock in question
 * @state: the requested state
 * @flags: modifier flags to the lock call
 *
 */

860
static void gfs2_glock_xmote_th(struct gfs2_glock *gl, struct gfs2_holder *gh)
David Teigland's avatar
David Teigland committed
861 862
{
	struct gfs2_sbd *sdp = gl->gl_sbd;
863 864
	int flags = gh ? gh->gh_flags : 0;
	unsigned state = gh ? gh->gh_state : gl->gl_demote_state;
865
	const struct gfs2_glock_operations *glops = gl->gl_ops;
David Teigland's avatar
David Teigland committed
866 867 868 869 870
	int lck_flags = flags & (LM_FLAG_TRY | LM_FLAG_TRY_1CB |
				 LM_FLAG_NOEXP | LM_FLAG_ANY |
				 LM_FLAG_PRIORITY);
	unsigned int lck_ret;

Steven Whitehouse's avatar
Steven Whitehouse committed
871 872 873
	if (glops->go_xmote_th)
		glops->go_xmote_th(gl);

David Teigland's avatar
David Teigland committed
874
	gfs2_assert_warn(sdp, test_bit(GLF_LOCK, &gl->gl_flags));
875
	gfs2_assert_warn(sdp, list_empty(&gl->gl_holders));
David Teigland's avatar
David Teigland committed
876 877 878 879 880 881
	gfs2_assert_warn(sdp, state != LM_ST_UNLOCKED);
	gfs2_assert_warn(sdp, state != gl->gl_state);

	gfs2_glock_hold(gl);
	gl->gl_req_bh = xmote_bh;

882
	lck_ret = gfs2_lm_lock(sdp, gl->gl_lock, gl->gl_state, state, lck_flags);
David Teigland's avatar
David Teigland committed
883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905

	if (gfs2_assert_withdraw(sdp, !(lck_ret & LM_OUT_ERROR)))
		return;

	if (lck_ret & LM_OUT_ASYNC)
		gfs2_assert_warn(sdp, lck_ret == LM_OUT_ASYNC);
	else
		xmote_bh(gl, lck_ret);
}

/**
 * drop_bh - Called after a lock module unlock completes
 * @gl: the glock
 * @ret: the return status
 *
 * Doesn't wake up the process waiting on the struct gfs2_holder (if any)
 * Doesn't drop the reference on the glock the top half took out
 *
 */

static void drop_bh(struct gfs2_glock *gl, unsigned int ret)
{
	struct gfs2_sbd *sdp = gl->gl_sbd;
906
	const struct gfs2_glock_operations *glops = gl->gl_ops;
David Teigland's avatar
David Teigland committed
907 908 909
	struct gfs2_holder *gh = gl->gl_req_gh;

	gfs2_assert_warn(sdp, test_bit(GLF_LOCK, &gl->gl_flags));
910
	gfs2_assert_warn(sdp, list_empty(&gl->gl_holders));
David Teigland's avatar
David Teigland committed
911 912 913 914 915
	gfs2_assert_warn(sdp, !ret);

	state_change(gl, LM_ST_UNLOCKED);

	if (glops->go_inval)
916
		glops->go_inval(gl, DIO_METADATA);
David Teigland's avatar
David Teigland committed
917 918 919 920 921 922 923 924 925

	if (gh) {
		spin_lock(&gl->gl_spin);
		list_del_init(&gh->gh_list);
		gh->gh_error = 0;
		spin_unlock(&gl->gl_spin);
	}

	spin_lock(&gl->gl_spin);
926
	gfs2_demote_wake(gl);
David Teigland's avatar
David Teigland committed
927 928 929 930 931 932 933
	gl->gl_req_gh = NULL;
	gl->gl_req_bh = NULL;
	clear_bit(GLF_LOCK, &gl->gl_flags);
	spin_unlock(&gl->gl_spin);

	gfs2_glock_put(gl);

934
	if (gh)
935
		gfs2_holder_wake(gh);
David Teigland's avatar
David Teigland committed
936 937 938 939 940 941 942 943
}

/**
 * gfs2_glock_drop_th - call into the lock module to unlock a lock
 * @gl: the glock
 *
 */

Steven Whitehouse's avatar
Steven Whitehouse committed
944
static void gfs2_glock_drop_th(struct gfs2_glock *gl)
David Teigland's avatar
David Teigland committed
945 946
{
	struct gfs2_sbd *sdp = gl->gl_sbd;
947
	const struct gfs2_glock_operations *glops = gl->gl_ops;
David Teigland's avatar
David Teigland committed
948 949
	unsigned int ret;

Steven Whitehouse's avatar
Steven Whitehouse committed
950 951 952
	if (glops->go_drop_th)
		glops->go_drop_th(gl);

David Teigland's avatar
David Teigland committed
953
	gfs2_assert_warn(sdp, test_bit(GLF_LOCK, &gl->gl_flags));
954
	gfs2_assert_warn(sdp, list_empty(&gl->gl_holders));
David Teigland's avatar
David Teigland committed
955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986
	gfs2_assert_warn(sdp, gl->gl_state != LM_ST_UNLOCKED);

	gfs2_glock_hold(gl);
	gl->gl_req_bh = drop_bh;

	ret = gfs2_lm_unlock(sdp, gl->gl_lock, gl->gl_state);

	if (gfs2_assert_withdraw(sdp, !(ret & LM_OUT_ERROR)))
		return;

	if (!ret)
		drop_bh(gl, ret);
	else
		gfs2_assert_warn(sdp, ret == LM_OUT_ASYNC);
}

/**
 * do_cancels - cancel requests for locks stuck waiting on an expire flag
 * @gh: the LM_FLAG_PRIORITY holder waiting to acquire the lock
 *
 * Don't cancel GL_NOCANCEL requests.
 */

static void do_cancels(struct gfs2_holder *gh)
{
	struct gfs2_glock *gl = gh->gh_gl;

	spin_lock(&gl->gl_spin);

	while (gl->gl_req_gh != gh &&
	       !test_bit(HIF_HOLDER, &gh->gh_iflags) &&
	       !list_empty(&gh->gh_list)) {
987 988
		if (gl->gl_req_bh && !(gl->gl_req_gh &&
				     (gl->gl_req_gh->gh_flags & GL_NOCANCEL))) {
David Teigland's avatar
David Teigland committed
989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013
			spin_unlock(&gl->gl_spin);
			gfs2_lm_cancel(gl->gl_sbd, gl->gl_lock);
			msleep(100);
			spin_lock(&gl->gl_spin);
		} else {
			spin_unlock(&gl->gl_spin);
			msleep(100);
			spin_lock(&gl->gl_spin);
		}
	}

	spin_unlock(&gl->gl_spin);
}

/**
 * glock_wait_internal - wait on a glock acquisition
 * @gh: the glock holder
 *
 * Returns: 0 on success
 */

static int glock_wait_internal(struct gfs2_holder *gh)
{
	struct gfs2_glock *gl = gh->gh_gl;
	struct gfs2_sbd *sdp = gl->gl_sbd;
1014
	const struct gfs2_glock_operations *glops = gl->gl_ops;
David Teigland's avatar
David Teigland committed
1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035

	if (test_bit(HIF_ABORTED, &gh->gh_iflags))
		return -EIO;

	if (gh->gh_flags & (LM_FLAG_TRY | LM_FLAG_TRY_1CB)) {
		spin_lock(&gl->gl_spin);
		if (gl->gl_req_gh != gh &&
		    !test_bit(HIF_HOLDER, &gh->gh_iflags) &&
		    !list_empty(&gh->gh_list)) {
			list_del_init(&gh->gh_list);
			gh->gh_error = GLR_TRYFAILED;
			run_queue(gl);
			spin_unlock(&gl->gl_spin);
			return gh->gh_error;
		}
		spin_unlock(&gl->gl_spin);
	}

	if (gh->gh_flags & LM_FLAG_PRIORITY)
		do_cancels(gh);

1036
	wait_on_holder(gh);
David Teigland's avatar
David Teigland committed
1037 1038 1039 1040
	if (gh->gh_error)
		return gh->gh_error;

	gfs2_assert_withdraw(sdp, test_bit(HIF_HOLDER, &gh->gh_iflags));
1041
	gfs2_assert_withdraw(sdp, relaxed_state_ok(gl->gl_state, gh->gh_state,
David Teigland's avatar
David Teigland committed
1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067
						   gh->gh_flags));

	if (test_bit(HIF_FIRST, &gh->gh_iflags)) {
		gfs2_assert_warn(sdp, test_bit(GLF_LOCK, &gl->gl_flags));

		if (glops->go_lock) {
			gh->gh_error = glops->go_lock(gh);
			if (gh->gh_error) {
				spin_lock(&gl->gl_spin);
				list_del_init(&gh->gh_list);
				spin_unlock(&gl->gl_spin);
			}
		}

		spin_lock(&gl->gl_spin);
		gl->gl_req_gh = NULL;
		gl->gl_req_bh = NULL;
		clear_bit(GLF_LOCK, &gl->gl_flags);
		run_queue(gl);
		spin_unlock(&gl->gl_spin);
	}

	return gh->gh_error;
}

static inline struct gfs2_holder *
1068
find_holder_by_owner(struct list_head *head, pid_t pid)
David Teigland's avatar
David Teigland committed
1069 1070 1071 1072
{
	struct gfs2_holder *gh;

	list_for_each_entry(gh, head, gh_list) {
1073
		if (gh->gh_owner_pid == pid)
David Teigland's avatar
David Teigland committed
1074 1075 1076 1077 1078 1079
			return gh;
	}

	return NULL;
}

1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093
static void print_dbg(struct glock_iter *gi, const char *fmt, ...)
{
	va_list args;

	va_start(args, fmt);
	if (gi) {
		vsprintf(gi->string, fmt, args);
		seq_printf(gi->seq, gi->string);
	}
	else
		vprintk(fmt, args);
	va_end(args);
}

David Teigland's avatar
David Teigland committed
1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104
/**
 * add_to_queue - Add a holder to the wait queue (but look for recursion)
 * @gh: the holder structure to add
 *
 */

static void add_to_queue(struct gfs2_holder *gh)
{
	struct gfs2_glock *gl = gh->gh_gl;
	struct gfs2_holder *existing;

1105
	BUG_ON(!gh->gh_owner_pid);
1106 1107
	if (test_and_set_bit(HIF_WAIT, &gh->gh_iflags))
		BUG();
1108

1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133
	if (!(gh->gh_flags & GL_FLOCK)) {
		existing = find_holder_by_owner(&gl->gl_holders, 
						gh->gh_owner_pid);
		if (existing) {
			print_symbol(KERN_WARNING "original: %s\n", 
				     existing->gh_ip);
			printk(KERN_INFO "pid : %d\n", existing->gh_owner_pid);
			printk(KERN_INFO "lock type : %d lock state : %d\n",
			       existing->gh_gl->gl_name.ln_type, 
			       existing->gh_gl->gl_state);
			print_symbol(KERN_WARNING "new: %s\n", gh->gh_ip);
			printk(KERN_INFO "pid : %d\n", gh->gh_owner_pid);
			printk(KERN_INFO "lock type : %d lock state : %d\n",
			       gl->gl_name.ln_type, gl->gl_state);
			BUG();
		}