xref: /openbmc/linux/fs/jfs/jfs_txnmgr.c (revision 93dc544c)
1 /*
2  *   Copyright (C) International Business Machines Corp., 2000-2005
3  *   Portions Copyright (C) Christoph Hellwig, 2001-2002
4  *
5  *   This program is free software;  you can redistribute it and/or modify
6  *   it under the terms of the GNU General Public License as published by
7  *   the Free Software Foundation; either version 2 of the License, or
8  *   (at your option) any later version.
9  *
10  *   This program is distributed in the hope that it will be useful,
11  *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
13  *   the GNU General Public License for more details.
14  *
15  *   You should have received a copy of the GNU General Public License
16  *   along with this program;  if not, write to the Free Software
17  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18  */
19 
20 /*
21  *	jfs_txnmgr.c: transaction manager
22  *
23  * notes:
24  * transaction starts with txBegin() and ends with txCommit()
25  * or txAbort().
26  *
27  * tlock is acquired at the time of update;
28  * (obviate scan at commit time for xtree and dtree)
29  * tlock and mp points to each other;
30  * (no hashlist for mp -> tlock).
31  *
32  * special cases:
33  * tlock on in-memory inode:
34  * in-place tlock in the in-memory inode itself;
35  * converted to page lock by iWrite() at commit time.
36  *
37  * tlock during write()/mmap() under anonymous transaction (tid = 0):
38  * transferred (?) to transaction at commit time.
39  *
40  * use the page itself to update allocation maps
41  * (obviate intermediate replication of allocation/deallocation data)
42  * hold on to mp+lock thru update of maps
43  */
44 
45 #include <linux/fs.h>
46 #include <linux/vmalloc.h>
47 #include <linux/completion.h>
48 #include <linux/freezer.h>
49 #include <linux/module.h>
50 #include <linux/moduleparam.h>
51 #include <linux/kthread.h>
52 #include <linux/seq_file.h>
53 #include "jfs_incore.h"
54 #include "jfs_inode.h"
55 #include "jfs_filsys.h"
56 #include "jfs_metapage.h"
57 #include "jfs_dinode.h"
58 #include "jfs_imap.h"
59 #include "jfs_dmap.h"
60 #include "jfs_superblock.h"
61 #include "jfs_debug.h"
62 
63 /*
64  *	transaction management structures
65  */
66 static struct {
67 	int freetid;		/* index of a free tid structure */
68 	int freelock;		/* index first free lock word */
69 	wait_queue_head_t freewait;	/* eventlist of free tblock */
70 	wait_queue_head_t freelockwait;	/* eventlist of free tlock */
71 	wait_queue_head_t lowlockwait;	/* eventlist of ample tlocks */
72 	int tlocksInUse;	/* Number of tlocks in use */
73 	spinlock_t LazyLock;	/* synchronize sync_queue & unlock_queue */
74 /*	struct tblock *sync_queue; * Transactions waiting for data sync */
75 	struct list_head unlock_queue;	/* Txns waiting to be released */
76 	struct list_head anon_list;	/* inodes having anonymous txns */
77 	struct list_head anon_list2;	/* inodes having anonymous txns
78 					   that couldn't be sync'ed */
79 } TxAnchor;
80 
81 int jfs_tlocks_low;		/* Indicates low number of available tlocks */
82 
83 #ifdef CONFIG_JFS_STATISTICS
84 static struct {
85 	uint txBegin;
86 	uint txBegin_barrier;
87 	uint txBegin_lockslow;
88 	uint txBegin_freetid;
89 	uint txBeginAnon;
90 	uint txBeginAnon_barrier;
91 	uint txBeginAnon_lockslow;
92 	uint txLockAlloc;
93 	uint txLockAlloc_freelock;
94 } TxStat;
95 #endif
96 
97 static int nTxBlock = -1;	/* number of transaction blocks */
98 module_param(nTxBlock, int, 0);
99 MODULE_PARM_DESC(nTxBlock,
100 		 "Number of transaction blocks (max:65536)");
101 
102 static int nTxLock = -1;	/* number of transaction locks */
103 module_param(nTxLock, int, 0);
104 MODULE_PARM_DESC(nTxLock,
105 		 "Number of transaction locks (max:65536)");
106 
107 struct tblock *TxBlock;	/* transaction block table */
108 static int TxLockLWM;	/* Low water mark for number of txLocks used */
109 static int TxLockHWM;	/* High water mark for number of txLocks used */
110 static int TxLockVHWM;	/* Very High water mark */
111 struct tlock *TxLock;	/* transaction lock table */
112 
113 /*
114  *	transaction management lock
115  */
116 static DEFINE_SPINLOCK(jfsTxnLock);
117 
118 #define TXN_LOCK()		spin_lock(&jfsTxnLock)
119 #define TXN_UNLOCK()		spin_unlock(&jfsTxnLock)
120 
121 #define LAZY_LOCK_INIT()	spin_lock_init(&TxAnchor.LazyLock);
122 #define LAZY_LOCK(flags)	spin_lock_irqsave(&TxAnchor.LazyLock, flags)
123 #define LAZY_UNLOCK(flags) spin_unlock_irqrestore(&TxAnchor.LazyLock, flags)
124 
125 static DECLARE_WAIT_QUEUE_HEAD(jfs_commit_thread_wait);
126 static int jfs_commit_thread_waking;
127 
128 /*
129  * Retry logic exist outside these macros to protect from spurrious wakeups.
130  */
131 static inline void TXN_SLEEP_DROP_LOCK(wait_queue_head_t * event)
132 {
133 	DECLARE_WAITQUEUE(wait, current);
134 
135 	add_wait_queue(event, &wait);
136 	set_current_state(TASK_UNINTERRUPTIBLE);
137 	TXN_UNLOCK();
138 	io_schedule();
139 	__set_current_state(TASK_RUNNING);
140 	remove_wait_queue(event, &wait);
141 }
142 
143 #define TXN_SLEEP(event)\
144 {\
145 	TXN_SLEEP_DROP_LOCK(event);\
146 	TXN_LOCK();\
147 }
148 
149 #define TXN_WAKEUP(event) wake_up_all(event)
150 
151 /*
152  *	statistics
153  */
154 static struct {
155 	tid_t maxtid;		/* 4: biggest tid ever used */
156 	lid_t maxlid;		/* 4: biggest lid ever used */
157 	int ntid;		/* 4: # of transactions performed */
158 	int nlid;		/* 4: # of tlocks acquired */
159 	int waitlock;		/* 4: # of tlock wait */
160 } stattx;
161 
162 /*
163  * forward references
164  */
165 static int diLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
166 		struct tlock * tlck, struct commit * cd);
167 static int dataLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
168 		struct tlock * tlck);
169 static void dtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
170 		struct tlock * tlck);
171 static void mapLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
172 		struct tlock * tlck);
173 static void txAllocPMap(struct inode *ip, struct maplock * maplock,
174 		struct tblock * tblk);
175 static void txForce(struct tblock * tblk);
176 static int txLog(struct jfs_log * log, struct tblock * tblk,
177 		struct commit * cd);
178 static void txUpdateMap(struct tblock * tblk);
179 static void txRelease(struct tblock * tblk);
180 static void xtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
181 	   struct tlock * tlck);
182 static void LogSyncRelease(struct metapage * mp);
183 
184 /*
185  *		transaction block/lock management
186  *		---------------------------------
187  */
188 
189 /*
190  * Get a transaction lock from the free list.  If the number in use is
191  * greater than the high water mark, wake up the sync daemon.  This should
192  * free some anonymous transaction locks.  (TXN_LOCK must be held.)
193  */
194 static lid_t txLockAlloc(void)
195 {
196 	lid_t lid;
197 
198 	INCREMENT(TxStat.txLockAlloc);
199 	if (!TxAnchor.freelock) {
200 		INCREMENT(TxStat.txLockAlloc_freelock);
201 	}
202 
203 	while (!(lid = TxAnchor.freelock))
204 		TXN_SLEEP(&TxAnchor.freelockwait);
205 	TxAnchor.freelock = TxLock[lid].next;
206 	HIGHWATERMARK(stattx.maxlid, lid);
207 	if ((++TxAnchor.tlocksInUse > TxLockHWM) && (jfs_tlocks_low == 0)) {
208 		jfs_info("txLockAlloc tlocks low");
209 		jfs_tlocks_low = 1;
210 		wake_up_process(jfsSyncThread);
211 	}
212 
213 	return lid;
214 }
215 
216 static void txLockFree(lid_t lid)
217 {
218 	TxLock[lid].tid = 0;
219 	TxLock[lid].next = TxAnchor.freelock;
220 	TxAnchor.freelock = lid;
221 	TxAnchor.tlocksInUse--;
222 	if (jfs_tlocks_low && (TxAnchor.tlocksInUse < TxLockLWM)) {
223 		jfs_info("txLockFree jfs_tlocks_low no more");
224 		jfs_tlocks_low = 0;
225 		TXN_WAKEUP(&TxAnchor.lowlockwait);
226 	}
227 	TXN_WAKEUP(&TxAnchor.freelockwait);
228 }
229 
230 /*
231  * NAME:	txInit()
232  *
233  * FUNCTION:	initialize transaction management structures
234  *
235  * RETURN:
236  *
237  * serialization: single thread at jfs_init()
238  */
239 int txInit(void)
240 {
241 	int k, size;
242 	struct sysinfo si;
243 
244 	/* Set defaults for nTxLock and nTxBlock if unset */
245 
246 	if (nTxLock == -1) {
247 		if (nTxBlock == -1) {
248 			/* Base default on memory size */
249 			si_meminfo(&si);
250 			if (si.totalram > (256 * 1024)) /* 1 GB */
251 				nTxLock = 64 * 1024;
252 			else
253 				nTxLock = si.totalram >> 2;
254 		} else if (nTxBlock > (8 * 1024))
255 			nTxLock = 64 * 1024;
256 		else
257 			nTxLock = nTxBlock << 3;
258 	}
259 	if (nTxBlock == -1)
260 		nTxBlock = nTxLock >> 3;
261 
262 	/* Verify tunable parameters */
263 	if (nTxBlock < 16)
264 		nTxBlock = 16;	/* No one should set it this low */
265 	if (nTxBlock > 65536)
266 		nTxBlock = 65536;
267 	if (nTxLock < 256)
268 		nTxLock = 256;	/* No one should set it this low */
269 	if (nTxLock > 65536)
270 		nTxLock = 65536;
271 
272 	printk(KERN_INFO "JFS: nTxBlock = %d, nTxLock = %d\n",
273 	       nTxBlock, nTxLock);
274 	/*
275 	 * initialize transaction block (tblock) table
276 	 *
277 	 * transaction id (tid) = tblock index
278 	 * tid = 0 is reserved.
279 	 */
280 	TxLockLWM = (nTxLock * 4) / 10;
281 	TxLockHWM = (nTxLock * 7) / 10;
282 	TxLockVHWM = (nTxLock * 8) / 10;
283 
284 	size = sizeof(struct tblock) * nTxBlock;
285 	TxBlock = vmalloc(size);
286 	if (TxBlock == NULL)
287 		return -ENOMEM;
288 
289 	for (k = 1; k < nTxBlock - 1; k++) {
290 		TxBlock[k].next = k + 1;
291 		init_waitqueue_head(&TxBlock[k].gcwait);
292 		init_waitqueue_head(&TxBlock[k].waitor);
293 	}
294 	TxBlock[k].next = 0;
295 	init_waitqueue_head(&TxBlock[k].gcwait);
296 	init_waitqueue_head(&TxBlock[k].waitor);
297 
298 	TxAnchor.freetid = 1;
299 	init_waitqueue_head(&TxAnchor.freewait);
300 
301 	stattx.maxtid = 1;	/* statistics */
302 
303 	/*
304 	 * initialize transaction lock (tlock) table
305 	 *
306 	 * transaction lock id = tlock index
307 	 * tlock id = 0 is reserved.
308 	 */
309 	size = sizeof(struct tlock) * nTxLock;
310 	TxLock = vmalloc(size);
311 	if (TxLock == NULL) {
312 		vfree(TxBlock);
313 		return -ENOMEM;
314 	}
315 
316 	/* initialize tlock table */
317 	for (k = 1; k < nTxLock - 1; k++)
318 		TxLock[k].next = k + 1;
319 	TxLock[k].next = 0;
320 	init_waitqueue_head(&TxAnchor.freelockwait);
321 	init_waitqueue_head(&TxAnchor.lowlockwait);
322 
323 	TxAnchor.freelock = 1;
324 	TxAnchor.tlocksInUse = 0;
325 	INIT_LIST_HEAD(&TxAnchor.anon_list);
326 	INIT_LIST_HEAD(&TxAnchor.anon_list2);
327 
328 	LAZY_LOCK_INIT();
329 	INIT_LIST_HEAD(&TxAnchor.unlock_queue);
330 
331 	stattx.maxlid = 1;	/* statistics */
332 
333 	return 0;
334 }
335 
336 /*
337  * NAME:	txExit()
338  *
339  * FUNCTION:	clean up when module is unloaded
340  */
341 void txExit(void)
342 {
343 	vfree(TxLock);
344 	TxLock = NULL;
345 	vfree(TxBlock);
346 	TxBlock = NULL;
347 }
348 
349 /*
350  * NAME:	txBegin()
351  *
352  * FUNCTION:	start a transaction.
353  *
354  * PARAMETER:	sb	- superblock
355  *		flag	- force for nested tx;
356  *
357  * RETURN:	tid	- transaction id
358  *
359  * note: flag force allows to start tx for nested tx
360  * to prevent deadlock on logsync barrier;
361  */
362 tid_t txBegin(struct super_block *sb, int flag)
363 {
364 	tid_t t;
365 	struct tblock *tblk;
366 	struct jfs_log *log;
367 
368 	jfs_info("txBegin: flag = 0x%x", flag);
369 	log = JFS_SBI(sb)->log;
370 
371 	TXN_LOCK();
372 
373 	INCREMENT(TxStat.txBegin);
374 
375       retry:
376 	if (!(flag & COMMIT_FORCE)) {
377 		/*
378 		 * synchronize with logsync barrier
379 		 */
380 		if (test_bit(log_SYNCBARRIER, &log->flag) ||
381 		    test_bit(log_QUIESCE, &log->flag)) {
382 			INCREMENT(TxStat.txBegin_barrier);
383 			TXN_SLEEP(&log->syncwait);
384 			goto retry;
385 		}
386 	}
387 	if (flag == 0) {
388 		/*
389 		 * Don't begin transaction if we're getting starved for tlocks
390 		 * unless COMMIT_FORCE or COMMIT_INODE (which may ultimately
391 		 * free tlocks)
392 		 */
393 		if (TxAnchor.tlocksInUse > TxLockVHWM) {
394 			INCREMENT(TxStat.txBegin_lockslow);
395 			TXN_SLEEP(&TxAnchor.lowlockwait);
396 			goto retry;
397 		}
398 	}
399 
400 	/*
401 	 * allocate transaction id/block
402 	 */
403 	if ((t = TxAnchor.freetid) == 0) {
404 		jfs_info("txBegin: waiting for free tid");
405 		INCREMENT(TxStat.txBegin_freetid);
406 		TXN_SLEEP(&TxAnchor.freewait);
407 		goto retry;
408 	}
409 
410 	tblk = tid_to_tblock(t);
411 
412 	if ((tblk->next == 0) && !(flag & COMMIT_FORCE)) {
413 		/* Don't let a non-forced transaction take the last tblk */
414 		jfs_info("txBegin: waiting for free tid");
415 		INCREMENT(TxStat.txBegin_freetid);
416 		TXN_SLEEP(&TxAnchor.freewait);
417 		goto retry;
418 	}
419 
420 	TxAnchor.freetid = tblk->next;
421 
422 	/*
423 	 * initialize transaction
424 	 */
425 
426 	/*
427 	 * We can't zero the whole thing or we screw up another thread being
428 	 * awakened after sleeping on tblk->waitor
429 	 *
430 	 * memset(tblk, 0, sizeof(struct tblock));
431 	 */
432 	tblk->next = tblk->last = tblk->xflag = tblk->flag = tblk->lsn = 0;
433 
434 	tblk->sb = sb;
435 	++log->logtid;
436 	tblk->logtid = log->logtid;
437 
438 	++log->active;
439 
440 	HIGHWATERMARK(stattx.maxtid, t);	/* statistics */
441 	INCREMENT(stattx.ntid);	/* statistics */
442 
443 	TXN_UNLOCK();
444 
445 	jfs_info("txBegin: returning tid = %d", t);
446 
447 	return t;
448 }
449 
450 /*
451  * NAME:	txBeginAnon()
452  *
453  * FUNCTION:	start an anonymous transaction.
454  *		Blocks if logsync or available tlocks are low to prevent
455  *		anonymous tlocks from depleting supply.
456  *
457  * PARAMETER:	sb	- superblock
458  *
459  * RETURN:	none
460  */
461 void txBeginAnon(struct super_block *sb)
462 {
463 	struct jfs_log *log;
464 
465 	log = JFS_SBI(sb)->log;
466 
467 	TXN_LOCK();
468 	INCREMENT(TxStat.txBeginAnon);
469 
470       retry:
471 	/*
472 	 * synchronize with logsync barrier
473 	 */
474 	if (test_bit(log_SYNCBARRIER, &log->flag) ||
475 	    test_bit(log_QUIESCE, &log->flag)) {
476 		INCREMENT(TxStat.txBeginAnon_barrier);
477 		TXN_SLEEP(&log->syncwait);
478 		goto retry;
479 	}
480 
481 	/*
482 	 * Don't begin transaction if we're getting starved for tlocks
483 	 */
484 	if (TxAnchor.tlocksInUse > TxLockVHWM) {
485 		INCREMENT(TxStat.txBeginAnon_lockslow);
486 		TXN_SLEEP(&TxAnchor.lowlockwait);
487 		goto retry;
488 	}
489 	TXN_UNLOCK();
490 }
491 
492 /*
493  *	txEnd()
494  *
495  * function: free specified transaction block.
496  *
497  *	logsync barrier processing:
498  *
499  * serialization:
500  */
501 void txEnd(tid_t tid)
502 {
503 	struct tblock *tblk = tid_to_tblock(tid);
504 	struct jfs_log *log;
505 
506 	jfs_info("txEnd: tid = %d", tid);
507 	TXN_LOCK();
508 
509 	/*
510 	 * wakeup transactions waiting on the page locked
511 	 * by the current transaction
512 	 */
513 	TXN_WAKEUP(&tblk->waitor);
514 
515 	log = JFS_SBI(tblk->sb)->log;
516 
517 	/*
518 	 * Lazy commit thread can't free this guy until we mark it UNLOCKED,
519 	 * otherwise, we would be left with a transaction that may have been
520 	 * reused.
521 	 *
522 	 * Lazy commit thread will turn off tblkGC_LAZY before calling this
523 	 * routine.
524 	 */
525 	if (tblk->flag & tblkGC_LAZY) {
526 		jfs_info("txEnd called w/lazy tid: %d, tblk = 0x%p", tid, tblk);
527 		TXN_UNLOCK();
528 
529 		spin_lock_irq(&log->gclock);	// LOGGC_LOCK
530 		tblk->flag |= tblkGC_UNLOCKED;
531 		spin_unlock_irq(&log->gclock);	// LOGGC_UNLOCK
532 		return;
533 	}
534 
535 	jfs_info("txEnd: tid: %d, tblk = 0x%p", tid, tblk);
536 
537 	assert(tblk->next == 0);
538 
539 	/*
540 	 * insert tblock back on freelist
541 	 */
542 	tblk->next = TxAnchor.freetid;
543 	TxAnchor.freetid = tid;
544 
545 	/*
546 	 * mark the tblock not active
547 	 */
548 	if (--log->active == 0) {
549 		clear_bit(log_FLUSH, &log->flag);
550 
551 		/*
552 		 * synchronize with logsync barrier
553 		 */
554 		if (test_bit(log_SYNCBARRIER, &log->flag)) {
555 			TXN_UNLOCK();
556 
557 			/* write dirty metadata & forward log syncpt */
558 			jfs_syncpt(log, 1);
559 
560 			jfs_info("log barrier off: 0x%x", log->lsn);
561 
562 			/* enable new transactions start */
563 			clear_bit(log_SYNCBARRIER, &log->flag);
564 
565 			/* wakeup all waitors for logsync barrier */
566 			TXN_WAKEUP(&log->syncwait);
567 
568 			goto wakeup;
569 		}
570 	}
571 
572 	TXN_UNLOCK();
573 wakeup:
574 	/*
575 	 * wakeup all waitors for a free tblock
576 	 */
577 	TXN_WAKEUP(&TxAnchor.freewait);
578 }
579 
580 /*
581  *	txLock()
582  *
583  * function: acquire a transaction lock on the specified <mp>
584  *
585  * parameter:
586  *
587  * return:	transaction lock id
588  *
589  * serialization:
590  */
591 struct tlock *txLock(tid_t tid, struct inode *ip, struct metapage * mp,
592 		     int type)
593 {
594 	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
595 	int dir_xtree = 0;
596 	lid_t lid;
597 	tid_t xtid;
598 	struct tlock *tlck;
599 	struct xtlock *xtlck;
600 	struct linelock *linelock;
601 	xtpage_t *p;
602 	struct tblock *tblk;
603 
604 	TXN_LOCK();
605 
606 	if (S_ISDIR(ip->i_mode) && (type & tlckXTREE) &&
607 	    !(mp->xflag & COMMIT_PAGE)) {
608 		/*
609 		 * Directory inode is special.  It can have both an xtree tlock
610 		 * and a dtree tlock associated with it.
611 		 */
612 		dir_xtree = 1;
613 		lid = jfs_ip->xtlid;
614 	} else
615 		lid = mp->lid;
616 
617 	/* is page not locked by a transaction ? */
618 	if (lid == 0)
619 		goto allocateLock;
620 
621 	jfs_info("txLock: tid:%d ip:0x%p mp:0x%p lid:%d", tid, ip, mp, lid);
622 
623 	/* is page locked by the requester transaction ? */
624 	tlck = lid_to_tlock(lid);
625 	if ((xtid = tlck->tid) == tid) {
626 		TXN_UNLOCK();
627 		goto grantLock;
628 	}
629 
630 	/*
631 	 * is page locked by anonymous transaction/lock ?
632 	 *
633 	 * (page update without transaction (i.e., file write) is
634 	 * locked under anonymous transaction tid = 0:
635 	 * anonymous tlocks maintained on anonymous tlock list of
636 	 * the inode of the page and available to all anonymous
637 	 * transactions until txCommit() time at which point
638 	 * they are transferred to the transaction tlock list of
639 	 * the commiting transaction of the inode)
640 	 */
641 	if (xtid == 0) {
642 		tlck->tid = tid;
643 		TXN_UNLOCK();
644 		tblk = tid_to_tblock(tid);
645 		/*
646 		 * The order of the tlocks in the transaction is important
647 		 * (during truncate, child xtree pages must be freed before
648 		 * parent's tlocks change the working map).
649 		 * Take tlock off anonymous list and add to tail of
650 		 * transaction list
651 		 *
652 		 * Note:  We really need to get rid of the tid & lid and
653 		 * use list_head's.  This code is getting UGLY!
654 		 */
655 		if (jfs_ip->atlhead == lid) {
656 			if (jfs_ip->atltail == lid) {
657 				/* only anonymous txn.
658 				 * Remove from anon_list
659 				 */
660 				TXN_LOCK();
661 				list_del_init(&jfs_ip->anon_inode_list);
662 				TXN_UNLOCK();
663 			}
664 			jfs_ip->atlhead = tlck->next;
665 		} else {
666 			lid_t last;
667 			for (last = jfs_ip->atlhead;
668 			     lid_to_tlock(last)->next != lid;
669 			     last = lid_to_tlock(last)->next) {
670 				assert(last);
671 			}
672 			lid_to_tlock(last)->next = tlck->next;
673 			if (jfs_ip->atltail == lid)
674 				jfs_ip->atltail = last;
675 		}
676 
677 		/* insert the tlock at tail of transaction tlock list */
678 
679 		if (tblk->next)
680 			lid_to_tlock(tblk->last)->next = lid;
681 		else
682 			tblk->next = lid;
683 		tlck->next = 0;
684 		tblk->last = lid;
685 
686 		goto grantLock;
687 	}
688 
689 	goto waitLock;
690 
691 	/*
692 	 * allocate a tlock
693 	 */
694       allocateLock:
695 	lid = txLockAlloc();
696 	tlck = lid_to_tlock(lid);
697 
698 	/*
699 	 * initialize tlock
700 	 */
701 	tlck->tid = tid;
702 
703 	TXN_UNLOCK();
704 
705 	/* mark tlock for meta-data page */
706 	if (mp->xflag & COMMIT_PAGE) {
707 
708 		tlck->flag = tlckPAGELOCK;
709 
710 		/* mark the page dirty and nohomeok */
711 		metapage_nohomeok(mp);
712 
713 		jfs_info("locking mp = 0x%p, nohomeok = %d tid = %d tlck = 0x%p",
714 			 mp, mp->nohomeok, tid, tlck);
715 
716 		/* if anonymous transaction, and buffer is on the group
717 		 * commit synclist, mark inode to show this.  This will
718 		 * prevent the buffer from being marked nohomeok for too
719 		 * long a time.
720 		 */
721 		if ((tid == 0) && mp->lsn)
722 			set_cflag(COMMIT_Synclist, ip);
723 	}
724 	/* mark tlock for in-memory inode */
725 	else
726 		tlck->flag = tlckINODELOCK;
727 
728 	if (S_ISDIR(ip->i_mode))
729 		tlck->flag |= tlckDIRECTORY;
730 
731 	tlck->type = 0;
732 
733 	/* bind the tlock and the page */
734 	tlck->ip = ip;
735 	tlck->mp = mp;
736 	if (dir_xtree)
737 		jfs_ip->xtlid = lid;
738 	else
739 		mp->lid = lid;
740 
741 	/*
742 	 * enqueue transaction lock to transaction/inode
743 	 */
744 	/* insert the tlock at tail of transaction tlock list */
745 	if (tid) {
746 		tblk = tid_to_tblock(tid);
747 		if (tblk->next)
748 			lid_to_tlock(tblk->last)->next = lid;
749 		else
750 			tblk->next = lid;
751 		tlck->next = 0;
752 		tblk->last = lid;
753 	}
754 	/* anonymous transaction:
755 	 * insert the tlock at head of inode anonymous tlock list
756 	 */
757 	else {
758 		tlck->next = jfs_ip->atlhead;
759 		jfs_ip->atlhead = lid;
760 		if (tlck->next == 0) {
761 			/* This inode's first anonymous transaction */
762 			jfs_ip->atltail = lid;
763 			TXN_LOCK();
764 			list_add_tail(&jfs_ip->anon_inode_list,
765 				      &TxAnchor.anon_list);
766 			TXN_UNLOCK();
767 		}
768 	}
769 
770 	/* initialize type dependent area for linelock */
771 	linelock = (struct linelock *) & tlck->lock;
772 	linelock->next = 0;
773 	linelock->flag = tlckLINELOCK;
774 	linelock->maxcnt = TLOCKSHORT;
775 	linelock->index = 0;
776 
777 	switch (type & tlckTYPE) {
778 	case tlckDTREE:
779 		linelock->l2linesize = L2DTSLOTSIZE;
780 		break;
781 
782 	case tlckXTREE:
783 		linelock->l2linesize = L2XTSLOTSIZE;
784 
785 		xtlck = (struct xtlock *) linelock;
786 		xtlck->header.offset = 0;
787 		xtlck->header.length = 2;
788 
789 		if (type & tlckNEW) {
790 			xtlck->lwm.offset = XTENTRYSTART;
791 		} else {
792 			if (mp->xflag & COMMIT_PAGE)
793 				p = (xtpage_t *) mp->data;
794 			else
795 				p = &jfs_ip->i_xtroot;
796 			xtlck->lwm.offset =
797 			    le16_to_cpu(p->header.nextindex);
798 		}
799 		xtlck->lwm.length = 0;	/* ! */
800 		xtlck->twm.offset = 0;
801 		xtlck->hwm.offset = 0;
802 
803 		xtlck->index = 2;
804 		break;
805 
806 	case tlckINODE:
807 		linelock->l2linesize = L2INODESLOTSIZE;
808 		break;
809 
810 	case tlckDATA:
811 		linelock->l2linesize = L2DATASLOTSIZE;
812 		break;
813 
814 	default:
815 		jfs_err("UFO tlock:0x%p", tlck);
816 	}
817 
818 	/*
819 	 * update tlock vector
820 	 */
821       grantLock:
822 	tlck->type |= type;
823 
824 	return tlck;
825 
826 	/*
827 	 * page is being locked by another transaction:
828 	 */
829       waitLock:
830 	/* Only locks on ipimap or ipaimap should reach here */
831 	/* assert(jfs_ip->fileset == AGGREGATE_I); */
832 	if (jfs_ip->fileset != AGGREGATE_I) {
833 		printk(KERN_ERR "txLock: trying to lock locked page!");
834 		print_hex_dump(KERN_ERR, "ip: ", DUMP_PREFIX_ADDRESS, 16, 4,
835 			       ip, sizeof(*ip), 0);
836 		print_hex_dump(KERN_ERR, "mp: ", DUMP_PREFIX_ADDRESS, 16, 4,
837 			       mp, sizeof(*mp), 0);
838 		print_hex_dump(KERN_ERR, "Locker's tblock: ",
839 			       DUMP_PREFIX_ADDRESS, 16, 4, tid_to_tblock(tid),
840 			       sizeof(struct tblock), 0);
841 		print_hex_dump(KERN_ERR, "Tlock: ", DUMP_PREFIX_ADDRESS, 16, 4,
842 			       tlck, sizeof(*tlck), 0);
843 		BUG();
844 	}
845 	INCREMENT(stattx.waitlock);	/* statistics */
846 	TXN_UNLOCK();
847 	release_metapage(mp);
848 	TXN_LOCK();
849 	xtid = tlck->tid;	/* reacquire after dropping TXN_LOCK */
850 
851 	jfs_info("txLock: in waitLock, tid = %d, xtid = %d, lid = %d",
852 		 tid, xtid, lid);
853 
854 	/* Recheck everything since dropping TXN_LOCK */
855 	if (xtid && (tlck->mp == mp) && (mp->lid == lid))
856 		TXN_SLEEP_DROP_LOCK(&tid_to_tblock(xtid)->waitor);
857 	else
858 		TXN_UNLOCK();
859 	jfs_info("txLock: awakened     tid = %d, lid = %d", tid, lid);
860 
861 	return NULL;
862 }
863 
864 /*
865  * NAME:	txRelease()
866  *
867  * FUNCTION:	Release buffers associated with transaction locks, but don't
868  *		mark homeok yet.  The allows other transactions to modify
869  *		buffers, but won't let them go to disk until commit record
870  *		actually gets written.
871  *
872  * PARAMETER:
873  *		tblk	-
874  *
875  * RETURN:	Errors from subroutines.
876  */
877 static void txRelease(struct tblock * tblk)
878 {
879 	struct metapage *mp;
880 	lid_t lid;
881 	struct tlock *tlck;
882 
883 	TXN_LOCK();
884 
885 	for (lid = tblk->next; lid; lid = tlck->next) {
886 		tlck = lid_to_tlock(lid);
887 		if ((mp = tlck->mp) != NULL &&
888 		    (tlck->type & tlckBTROOT) == 0) {
889 			assert(mp->xflag & COMMIT_PAGE);
890 			mp->lid = 0;
891 		}
892 	}
893 
894 	/*
895 	 * wakeup transactions waiting on a page locked
896 	 * by the current transaction
897 	 */
898 	TXN_WAKEUP(&tblk->waitor);
899 
900 	TXN_UNLOCK();
901 }
902 
903 /*
904  * NAME:	txUnlock()
905  *
906  * FUNCTION:	Initiates pageout of pages modified by tid in journalled
907  *		objects and frees their lockwords.
908  */
909 static void txUnlock(struct tblock * tblk)
910 {
911 	struct tlock *tlck;
912 	struct linelock *linelock;
913 	lid_t lid, next, llid, k;
914 	struct metapage *mp;
915 	struct jfs_log *log;
916 	int difft, diffp;
917 	unsigned long flags;
918 
919 	jfs_info("txUnlock: tblk = 0x%p", tblk);
920 	log = JFS_SBI(tblk->sb)->log;
921 
922 	/*
923 	 * mark page under tlock homeok (its log has been written):
924 	 */
925 	for (lid = tblk->next; lid; lid = next) {
926 		tlck = lid_to_tlock(lid);
927 		next = tlck->next;
928 
929 		jfs_info("unlocking lid = %d, tlck = 0x%p", lid, tlck);
930 
931 		/* unbind page from tlock */
932 		if ((mp = tlck->mp) != NULL &&
933 		    (tlck->type & tlckBTROOT) == 0) {
934 			assert(mp->xflag & COMMIT_PAGE);
935 
936 			/* hold buffer
937 			 */
938 			hold_metapage(mp);
939 
940 			assert(mp->nohomeok > 0);
941 			_metapage_homeok(mp);
942 
943 			/* inherit younger/larger clsn */
944 			LOGSYNC_LOCK(log, flags);
945 			if (mp->clsn) {
946 				logdiff(difft, tblk->clsn, log);
947 				logdiff(diffp, mp->clsn, log);
948 				if (difft > diffp)
949 					mp->clsn = tblk->clsn;
950 			} else
951 				mp->clsn = tblk->clsn;
952 			LOGSYNC_UNLOCK(log, flags);
953 
954 			assert(!(tlck->flag & tlckFREEPAGE));
955 
956 			put_metapage(mp);
957 		}
958 
959 		/* insert tlock, and linelock(s) of the tlock if any,
960 		 * at head of freelist
961 		 */
962 		TXN_LOCK();
963 
964 		llid = ((struct linelock *) & tlck->lock)->next;
965 		while (llid) {
966 			linelock = (struct linelock *) lid_to_tlock(llid);
967 			k = linelock->next;
968 			txLockFree(llid);
969 			llid = k;
970 		}
971 		txLockFree(lid);
972 
973 		TXN_UNLOCK();
974 	}
975 	tblk->next = tblk->last = 0;
976 
977 	/*
978 	 * remove tblock from logsynclist
979 	 * (allocation map pages inherited lsn of tblk and
980 	 * has been inserted in logsync list at txUpdateMap())
981 	 */
982 	if (tblk->lsn) {
983 		LOGSYNC_LOCK(log, flags);
984 		log->count--;
985 		list_del(&tblk->synclist);
986 		LOGSYNC_UNLOCK(log, flags);
987 	}
988 }
989 
990 /*
991  *	txMaplock()
992  *
993  * function: allocate a transaction lock for freed page/entry;
994  *	for freed page, maplock is used as xtlock/dtlock type;
995  */
996 struct tlock *txMaplock(tid_t tid, struct inode *ip, int type)
997 {
998 	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
999 	lid_t lid;
1000 	struct tblock *tblk;
1001 	struct tlock *tlck;
1002 	struct maplock *maplock;
1003 
1004 	TXN_LOCK();
1005 
1006 	/*
1007 	 * allocate a tlock
1008 	 */
1009 	lid = txLockAlloc();
1010 	tlck = lid_to_tlock(lid);
1011 
1012 	/*
1013 	 * initialize tlock
1014 	 */
1015 	tlck->tid = tid;
1016 
1017 	/* bind the tlock and the object */
1018 	tlck->flag = tlckINODELOCK;
1019 	if (S_ISDIR(ip->i_mode))
1020 		tlck->flag |= tlckDIRECTORY;
1021 	tlck->ip = ip;
1022 	tlck->mp = NULL;
1023 
1024 	tlck->type = type;
1025 
1026 	/*
1027 	 * enqueue transaction lock to transaction/inode
1028 	 */
1029 	/* insert the tlock at tail of transaction tlock list */
1030 	if (tid) {
1031 		tblk = tid_to_tblock(tid);
1032 		if (tblk->next)
1033 			lid_to_tlock(tblk->last)->next = lid;
1034 		else
1035 			tblk->next = lid;
1036 		tlck->next = 0;
1037 		tblk->last = lid;
1038 	}
1039 	/* anonymous transaction:
1040 	 * insert the tlock at head of inode anonymous tlock list
1041 	 */
1042 	else {
1043 		tlck->next = jfs_ip->atlhead;
1044 		jfs_ip->atlhead = lid;
1045 		if (tlck->next == 0) {
1046 			/* This inode's first anonymous transaction */
1047 			jfs_ip->atltail = lid;
1048 			list_add_tail(&jfs_ip->anon_inode_list,
1049 				      &TxAnchor.anon_list);
1050 		}
1051 	}
1052 
1053 	TXN_UNLOCK();
1054 
1055 	/* initialize type dependent area for maplock */
1056 	maplock = (struct maplock *) & tlck->lock;
1057 	maplock->next = 0;
1058 	maplock->maxcnt = 0;
1059 	maplock->index = 0;
1060 
1061 	return tlck;
1062 }
1063 
1064 /*
1065  *	txLinelock()
1066  *
1067  * function: allocate a transaction lock for log vector list
1068  */
1069 struct linelock *txLinelock(struct linelock * tlock)
1070 {
1071 	lid_t lid;
1072 	struct tlock *tlck;
1073 	struct linelock *linelock;
1074 
1075 	TXN_LOCK();
1076 
1077 	/* allocate a TxLock structure */
1078 	lid = txLockAlloc();
1079 	tlck = lid_to_tlock(lid);
1080 
1081 	TXN_UNLOCK();
1082 
1083 	/* initialize linelock */
1084 	linelock = (struct linelock *) tlck;
1085 	linelock->next = 0;
1086 	linelock->flag = tlckLINELOCK;
1087 	linelock->maxcnt = TLOCKLONG;
1088 	linelock->index = 0;
1089 	if (tlck->flag & tlckDIRECTORY)
1090 		linelock->flag |= tlckDIRECTORY;
1091 
1092 	/* append linelock after tlock */
1093 	linelock->next = tlock->next;
1094 	tlock->next = lid;
1095 
1096 	return linelock;
1097 }
1098 
1099 /*
1100  *		transaction commit management
1101  *		-----------------------------
1102  */
1103 
1104 /*
1105  * NAME:	txCommit()
1106  *
1107  * FUNCTION:	commit the changes to the objects specified in
1108  *		clist.  For journalled segments only the
1109  *		changes of the caller are committed, ie by tid.
1110  *		for non-journalled segments the data are flushed to
1111  *		disk and then the change to the disk inode and indirect
1112  *		blocks committed (so blocks newly allocated to the
1113  *		segment will be made a part of the segment atomically).
1114  *
1115  *		all of the segments specified in clist must be in
1116  *		one file system. no more than 6 segments are needed
1117  *		to handle all unix svcs.
1118  *
1119  *		if the i_nlink field (i.e. disk inode link count)
1120  *		is zero, and the type of inode is a regular file or
1121  *		directory, or symbolic link , the inode is truncated
1122  *		to zero length. the truncation is committed but the
1123  *		VM resources are unaffected until it is closed (see
1124  *		iput and iclose).
1125  *
1126  * PARAMETER:
1127  *
1128  * RETURN:
1129  *
1130  * serialization:
1131  *		on entry the inode lock on each segment is assumed
1132  *		to be held.
1133  *
1134  * i/o error:
1135  */
1136 int txCommit(tid_t tid,		/* transaction identifier */
1137 	     int nip,		/* number of inodes to commit */
1138 	     struct inode **iplist,	/* list of inode to commit */
1139 	     int flag)
1140 {
1141 	int rc = 0;
1142 	struct commit cd;
1143 	struct jfs_log *log;
1144 	struct tblock *tblk;
1145 	struct lrd *lrd;
1146 	int lsn;
1147 	struct inode *ip;
1148 	struct jfs_inode_info *jfs_ip;
1149 	int k, n;
1150 	ino_t top;
1151 	struct super_block *sb;
1152 
1153 	jfs_info("txCommit, tid = %d, flag = %d", tid, flag);
1154 	/* is read-only file system ? */
1155 	if (isReadOnly(iplist[0])) {
1156 		rc = -EROFS;
1157 		goto TheEnd;
1158 	}
1159 
1160 	sb = cd.sb = iplist[0]->i_sb;
1161 	cd.tid = tid;
1162 
1163 	if (tid == 0)
1164 		tid = txBegin(sb, 0);
1165 	tblk = tid_to_tblock(tid);
1166 
1167 	/*
1168 	 * initialize commit structure
1169 	 */
1170 	log = JFS_SBI(sb)->log;
1171 	cd.log = log;
1172 
1173 	/* initialize log record descriptor in commit */
1174 	lrd = &cd.lrd;
1175 	lrd->logtid = cpu_to_le32(tblk->logtid);
1176 	lrd->backchain = 0;
1177 
1178 	tblk->xflag |= flag;
1179 
1180 	if ((flag & (COMMIT_FORCE | COMMIT_SYNC)) == 0)
1181 		tblk->xflag |= COMMIT_LAZY;
1182 	/*
1183 	 *	prepare non-journaled objects for commit
1184 	 *
1185 	 * flush data pages of non-journaled file
1186 	 * to prevent the file getting non-initialized disk blocks
1187 	 * in case of crash.
1188 	 * (new blocks - )
1189 	 */
1190 	cd.iplist = iplist;
1191 	cd.nip = nip;
1192 
1193 	/*
1194 	 *	acquire transaction lock on (on-disk) inodes
1195 	 *
1196 	 * update on-disk inode from in-memory inode
1197 	 * acquiring transaction locks for AFTER records
1198 	 * on the on-disk inode of file object
1199 	 *
1200 	 * sort the inodes array by inode number in descending order
1201 	 * to prevent deadlock when acquiring transaction lock
1202 	 * of on-disk inodes on multiple on-disk inode pages by
1203 	 * multiple concurrent transactions
1204 	 */
1205 	for (k = 0; k < cd.nip; k++) {
1206 		top = (cd.iplist[k])->i_ino;
1207 		for (n = k + 1; n < cd.nip; n++) {
1208 			ip = cd.iplist[n];
1209 			if (ip->i_ino > top) {
1210 				top = ip->i_ino;
1211 				cd.iplist[n] = cd.iplist[k];
1212 				cd.iplist[k] = ip;
1213 			}
1214 		}
1215 
1216 		ip = cd.iplist[k];
1217 		jfs_ip = JFS_IP(ip);
1218 
1219 		/*
1220 		 * BUGBUG - This code has temporarily been removed.  The
1221 		 * intent is to ensure that any file data is written before
1222 		 * the metadata is committed to the journal.  This prevents
1223 		 * uninitialized data from appearing in a file after the
1224 		 * journal has been replayed.  (The uninitialized data
1225 		 * could be sensitive data removed by another user.)
1226 		 *
1227 		 * The problem now is that we are holding the IWRITELOCK
1228 		 * on the inode, and calling filemap_fdatawrite on an
1229 		 * unmapped page will cause a deadlock in jfs_get_block.
1230 		 *
1231 		 * The long term solution is to pare down the use of
1232 		 * IWRITELOCK.  We are currently holding it too long.
1233 		 * We could also be smarter about which data pages need
1234 		 * to be written before the transaction is committed and
1235 		 * when we don't need to worry about it at all.
1236 		 *
1237 		 * if ((!S_ISDIR(ip->i_mode))
1238 		 *    && (tblk->flag & COMMIT_DELETE) == 0)
1239 		 *	filemap_write_and_wait(ip->i_mapping);
1240 		 */
1241 
1242 		/*
1243 		 * Mark inode as not dirty.  It will still be on the dirty
1244 		 * inode list, but we'll know not to commit it again unless
1245 		 * it gets marked dirty again
1246 		 */
1247 		clear_cflag(COMMIT_Dirty, ip);
1248 
1249 		/* inherit anonymous tlock(s) of inode */
1250 		if (jfs_ip->atlhead) {
1251 			lid_to_tlock(jfs_ip->atltail)->next = tblk->next;
1252 			tblk->next = jfs_ip->atlhead;
1253 			if (!tblk->last)
1254 				tblk->last = jfs_ip->atltail;
1255 			jfs_ip->atlhead = jfs_ip->atltail = 0;
1256 			TXN_LOCK();
1257 			list_del_init(&jfs_ip->anon_inode_list);
1258 			TXN_UNLOCK();
1259 		}
1260 
1261 		/*
1262 		 * acquire transaction lock on on-disk inode page
1263 		 * (become first tlock of the tblk's tlock list)
1264 		 */
1265 		if (((rc = diWrite(tid, ip))))
1266 			goto out;
1267 	}
1268 
1269 	/*
1270 	 *	write log records from transaction locks
1271 	 *
1272 	 * txUpdateMap() resets XAD_NEW in XAD.
1273 	 */
1274 	if ((rc = txLog(log, tblk, &cd)))
1275 		goto TheEnd;
1276 
1277 	/*
1278 	 * Ensure that inode isn't reused before
1279 	 * lazy commit thread finishes processing
1280 	 */
1281 	if (tblk->xflag & COMMIT_DELETE) {
1282 		atomic_inc(&tblk->u.ip->i_count);
1283 		/*
1284 		 * Avoid a rare deadlock
1285 		 *
1286 		 * If the inode is locked, we may be blocked in
1287 		 * jfs_commit_inode.  If so, we don't want the
1288 		 * lazy_commit thread doing the last iput() on the inode
1289 		 * since that may block on the locked inode.  Instead,
1290 		 * commit the transaction synchronously, so the last iput
1291 		 * will be done by the calling thread (or later)
1292 		 */
1293 		/*
1294 		 * I believe this code is no longer needed.  Splitting I_LOCK
1295 		 * into two bits, I_LOCK and I_SYNC should prevent this
1296 		 * deadlock as well.  But since I don't have a JFS testload
1297 		 * to verify this, only a trivial s/I_LOCK/I_SYNC/ was done.
1298 		 * Joern
1299 		 */
1300 		if (tblk->u.ip->i_state & I_SYNC)
1301 			tblk->xflag &= ~COMMIT_LAZY;
1302 	}
1303 
1304 	ASSERT((!(tblk->xflag & COMMIT_DELETE)) ||
1305 	       ((tblk->u.ip->i_nlink == 0) &&
1306 		!test_cflag(COMMIT_Nolink, tblk->u.ip)));
1307 
1308 	/*
1309 	 *	write COMMIT log record
1310 	 */
1311 	lrd->type = cpu_to_le16(LOG_COMMIT);
1312 	lrd->length = 0;
1313 	lsn = lmLog(log, tblk, lrd, NULL);
1314 
1315 	lmGroupCommit(log, tblk);
1316 
1317 	/*
1318 	 *	- transaction is now committed -
1319 	 */
1320 
1321 	/*
1322 	 * force pages in careful update
1323 	 * (imap addressing structure update)
1324 	 */
1325 	if (flag & COMMIT_FORCE)
1326 		txForce(tblk);
1327 
1328 	/*
1329 	 *	update allocation map.
1330 	 *
1331 	 * update inode allocation map and inode:
1332 	 * free pager lock on memory object of inode if any.
1333 	 * update block allocation map.
1334 	 *
1335 	 * txUpdateMap() resets XAD_NEW in XAD.
1336 	 */
1337 	if (tblk->xflag & COMMIT_FORCE)
1338 		txUpdateMap(tblk);
1339 
1340 	/*
1341 	 *	free transaction locks and pageout/free pages
1342 	 */
1343 	txRelease(tblk);
1344 
1345 	if ((tblk->flag & tblkGC_LAZY) == 0)
1346 		txUnlock(tblk);
1347 
1348 
1349 	/*
1350 	 *	reset in-memory object state
1351 	 */
1352 	for (k = 0; k < cd.nip; k++) {
1353 		ip = cd.iplist[k];
1354 		jfs_ip = JFS_IP(ip);
1355 
1356 		/*
1357 		 * reset in-memory inode state
1358 		 */
1359 		jfs_ip->bxflag = 0;
1360 		jfs_ip->blid = 0;
1361 	}
1362 
1363       out:
1364 	if (rc != 0)
1365 		txAbort(tid, 1);
1366 
1367       TheEnd:
1368 	jfs_info("txCommit: tid = %d, returning %d", tid, rc);
1369 	return rc;
1370 }
1371 
1372 /*
1373  * NAME:	txLog()
1374  *
1375  * FUNCTION:	Writes AFTER log records for all lines modified
1376  *		by tid for segments specified by inodes in comdata.
1377  *		Code assumes only WRITELOCKS are recorded in lockwords.
1378  *
1379  * PARAMETERS:
1380  *
1381  * RETURN :
1382  */
1383 static int txLog(struct jfs_log * log, struct tblock * tblk, struct commit * cd)
1384 {
1385 	int rc = 0;
1386 	struct inode *ip;
1387 	lid_t lid;
1388 	struct tlock *tlck;
1389 	struct lrd *lrd = &cd->lrd;
1390 
1391 	/*
1392 	 * write log record(s) for each tlock of transaction,
1393 	 */
1394 	for (lid = tblk->next; lid; lid = tlck->next) {
1395 		tlck = lid_to_tlock(lid);
1396 
1397 		tlck->flag |= tlckLOG;
1398 
1399 		/* initialize lrd common */
1400 		ip = tlck->ip;
1401 		lrd->aggregate = cpu_to_le32(JFS_SBI(ip->i_sb)->aggregate);
1402 		lrd->log.redopage.fileset = cpu_to_le32(JFS_IP(ip)->fileset);
1403 		lrd->log.redopage.inode = cpu_to_le32(ip->i_ino);
1404 
1405 		/* write log record of page from the tlock */
1406 		switch (tlck->type & tlckTYPE) {
1407 		case tlckXTREE:
1408 			xtLog(log, tblk, lrd, tlck);
1409 			break;
1410 
1411 		case tlckDTREE:
1412 			dtLog(log, tblk, lrd, tlck);
1413 			break;
1414 
1415 		case tlckINODE:
1416 			diLog(log, tblk, lrd, tlck, cd);
1417 			break;
1418 
1419 		case tlckMAP:
1420 			mapLog(log, tblk, lrd, tlck);
1421 			break;
1422 
1423 		case tlckDATA:
1424 			dataLog(log, tblk, lrd, tlck);
1425 			break;
1426 
1427 		default:
1428 			jfs_err("UFO tlock:0x%p", tlck);
1429 		}
1430 	}
1431 
1432 	return rc;
1433 }
1434 
1435 /*
1436  *	diLog()
1437  *
1438  * function:	log inode tlock and format maplock to update bmap;
1439  */
1440 static int diLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
1441 		 struct tlock * tlck, struct commit * cd)
1442 {
1443 	int rc = 0;
1444 	struct metapage *mp;
1445 	pxd_t *pxd;
1446 	struct pxd_lock *pxdlock;
1447 
1448 	mp = tlck->mp;
1449 
1450 	/* initialize as REDOPAGE record format */
1451 	lrd->log.redopage.type = cpu_to_le16(LOG_INODE);
1452 	lrd->log.redopage.l2linesize = cpu_to_le16(L2INODESLOTSIZE);
1453 
1454 	pxd = &lrd->log.redopage.pxd;
1455 
1456 	/*
1457 	 *	inode after image
1458 	 */
1459 	if (tlck->type & tlckENTRY) {
1460 		/* log after-image for logredo(): */
1461 		lrd->type = cpu_to_le16(LOG_REDOPAGE);
1462 		PXDaddress(pxd, mp->index);
1463 		PXDlength(pxd,
1464 			  mp->logical_size >> tblk->sb->s_blocksize_bits);
1465 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1466 
1467 		/* mark page as homeward bound */
1468 		tlck->flag |= tlckWRITEPAGE;
1469 	} else if (tlck->type & tlckFREE) {
1470 		/*
1471 		 *	free inode extent
1472 		 *
1473 		 * (pages of the freed inode extent have been invalidated and
1474 		 * a maplock for free of the extent has been formatted at
1475 		 * txLock() time);
1476 		 *
1477 		 * the tlock had been acquired on the inode allocation map page
1478 		 * (iag) that specifies the freed extent, even though the map
1479 		 * page is not itself logged, to prevent pageout of the map
1480 		 * page before the log;
1481 		 */
1482 
1483 		/* log LOG_NOREDOINOEXT of the freed inode extent for
1484 		 * logredo() to start NoRedoPage filters, and to update
1485 		 * imap and bmap for free of the extent;
1486 		 */
1487 		lrd->type = cpu_to_le16(LOG_NOREDOINOEXT);
1488 		/*
1489 		 * For the LOG_NOREDOINOEXT record, we need
1490 		 * to pass the IAG number and inode extent
1491 		 * index (within that IAG) from which the
1492 		 * the extent being released.  These have been
1493 		 * passed to us in the iplist[1] and iplist[2].
1494 		 */
1495 		lrd->log.noredoinoext.iagnum =
1496 		    cpu_to_le32((u32) (size_t) cd->iplist[1]);
1497 		lrd->log.noredoinoext.inoext_idx =
1498 		    cpu_to_le32((u32) (size_t) cd->iplist[2]);
1499 
1500 		pxdlock = (struct pxd_lock *) & tlck->lock;
1501 		*pxd = pxdlock->pxd;
1502 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, NULL));
1503 
1504 		/* update bmap */
1505 		tlck->flag |= tlckUPDATEMAP;
1506 
1507 		/* mark page as homeward bound */
1508 		tlck->flag |= tlckWRITEPAGE;
1509 	} else
1510 		jfs_err("diLog: UFO type tlck:0x%p", tlck);
1511 #ifdef  _JFS_WIP
1512 	/*
1513 	 *	alloc/free external EA extent
1514 	 *
1515 	 * a maplock for txUpdateMap() to update bPWMAP for alloc/free
1516 	 * of the extent has been formatted at txLock() time;
1517 	 */
1518 	else {
1519 		assert(tlck->type & tlckEA);
1520 
1521 		/* log LOG_UPDATEMAP for logredo() to update bmap for
1522 		 * alloc of new (and free of old) external EA extent;
1523 		 */
1524 		lrd->type = cpu_to_le16(LOG_UPDATEMAP);
1525 		pxdlock = (struct pxd_lock *) & tlck->lock;
1526 		nlock = pxdlock->index;
1527 		for (i = 0; i < nlock; i++, pxdlock++) {
1528 			if (pxdlock->flag & mlckALLOCPXD)
1529 				lrd->log.updatemap.type =
1530 				    cpu_to_le16(LOG_ALLOCPXD);
1531 			else
1532 				lrd->log.updatemap.type =
1533 				    cpu_to_le16(LOG_FREEPXD);
1534 			lrd->log.updatemap.nxd = cpu_to_le16(1);
1535 			lrd->log.updatemap.pxd = pxdlock->pxd;
1536 			lrd->backchain =
1537 			    cpu_to_le32(lmLog(log, tblk, lrd, NULL));
1538 		}
1539 
1540 		/* update bmap */
1541 		tlck->flag |= tlckUPDATEMAP;
1542 	}
1543 #endif				/* _JFS_WIP */
1544 
1545 	return rc;
1546 }
1547 
1548 /*
1549  *	dataLog()
1550  *
1551  * function:	log data tlock
1552  */
1553 static int dataLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
1554 	    struct tlock * tlck)
1555 {
1556 	struct metapage *mp;
1557 	pxd_t *pxd;
1558 
1559 	mp = tlck->mp;
1560 
1561 	/* initialize as REDOPAGE record format */
1562 	lrd->log.redopage.type = cpu_to_le16(LOG_DATA);
1563 	lrd->log.redopage.l2linesize = cpu_to_le16(L2DATASLOTSIZE);
1564 
1565 	pxd = &lrd->log.redopage.pxd;
1566 
1567 	/* log after-image for logredo(): */
1568 	lrd->type = cpu_to_le16(LOG_REDOPAGE);
1569 
1570 	if (jfs_dirtable_inline(tlck->ip)) {
1571 		/*
1572 		 * The table has been truncated, we've must have deleted
1573 		 * the last entry, so don't bother logging this
1574 		 */
1575 		mp->lid = 0;
1576 		grab_metapage(mp);
1577 		metapage_homeok(mp);
1578 		discard_metapage(mp);
1579 		tlck->mp = NULL;
1580 		return 0;
1581 	}
1582 
1583 	PXDaddress(pxd, mp->index);
1584 	PXDlength(pxd, mp->logical_size >> tblk->sb->s_blocksize_bits);
1585 
1586 	lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1587 
1588 	/* mark page as homeward bound */
1589 	tlck->flag |= tlckWRITEPAGE;
1590 
1591 	return 0;
1592 }
1593 
1594 /*
1595  *	dtLog()
1596  *
1597  * function:	log dtree tlock and format maplock to update bmap;
1598  */
1599 static void dtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
1600 	   struct tlock * tlck)
1601 {
1602 	struct metapage *mp;
1603 	struct pxd_lock *pxdlock;
1604 	pxd_t *pxd;
1605 
1606 	mp = tlck->mp;
1607 
1608 	/* initialize as REDOPAGE/NOREDOPAGE record format */
1609 	lrd->log.redopage.type = cpu_to_le16(LOG_DTREE);
1610 	lrd->log.redopage.l2linesize = cpu_to_le16(L2DTSLOTSIZE);
1611 
1612 	pxd = &lrd->log.redopage.pxd;
1613 
1614 	if (tlck->type & tlckBTROOT)
1615 		lrd->log.redopage.type |= cpu_to_le16(LOG_BTROOT);
1616 
1617 	/*
1618 	 *	page extension via relocation: entry insertion;
1619 	 *	page extension in-place: entry insertion;
1620 	 *	new right page from page split, reinitialized in-line
1621 	 *	root from root page split: entry insertion;
1622 	 */
1623 	if (tlck->type & (tlckNEW | tlckEXTEND)) {
1624 		/* log after-image of the new page for logredo():
1625 		 * mark log (LOG_NEW) for logredo() to initialize
1626 		 * freelist and update bmap for alloc of the new page;
1627 		 */
1628 		lrd->type = cpu_to_le16(LOG_REDOPAGE);
1629 		if (tlck->type & tlckEXTEND)
1630 			lrd->log.redopage.type |= cpu_to_le16(LOG_EXTEND);
1631 		else
1632 			lrd->log.redopage.type |= cpu_to_le16(LOG_NEW);
1633 		PXDaddress(pxd, mp->index);
1634 		PXDlength(pxd,
1635 			  mp->logical_size >> tblk->sb->s_blocksize_bits);
1636 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1637 
1638 		/* format a maplock for txUpdateMap() to update bPMAP for
1639 		 * alloc of the new page;
1640 		 */
1641 		if (tlck->type & tlckBTROOT)
1642 			return;
1643 		tlck->flag |= tlckUPDATEMAP;
1644 		pxdlock = (struct pxd_lock *) & tlck->lock;
1645 		pxdlock->flag = mlckALLOCPXD;
1646 		pxdlock->pxd = *pxd;
1647 
1648 		pxdlock->index = 1;
1649 
1650 		/* mark page as homeward bound */
1651 		tlck->flag |= tlckWRITEPAGE;
1652 		return;
1653 	}
1654 
1655 	/*
1656 	 *	entry insertion/deletion,
1657 	 *	sibling page link update (old right page before split);
1658 	 */
1659 	if (tlck->type & (tlckENTRY | tlckRELINK)) {
1660 		/* log after-image for logredo(): */
1661 		lrd->type = cpu_to_le16(LOG_REDOPAGE);
1662 		PXDaddress(pxd, mp->index);
1663 		PXDlength(pxd,
1664 			  mp->logical_size >> tblk->sb->s_blocksize_bits);
1665 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1666 
1667 		/* mark page as homeward bound */
1668 		tlck->flag |= tlckWRITEPAGE;
1669 		return;
1670 	}
1671 
1672 	/*
1673 	 *	page deletion: page has been invalidated
1674 	 *	page relocation: source extent
1675 	 *
1676 	 *	a maplock for free of the page has been formatted
1677 	 *	at txLock() time);
1678 	 */
1679 	if (tlck->type & (tlckFREE | tlckRELOCATE)) {
1680 		/* log LOG_NOREDOPAGE of the deleted page for logredo()
1681 		 * to start NoRedoPage filter and to update bmap for free
1682 		 * of the deletd page
1683 		 */
1684 		lrd->type = cpu_to_le16(LOG_NOREDOPAGE);
1685 		pxdlock = (struct pxd_lock *) & tlck->lock;
1686 		*pxd = pxdlock->pxd;
1687 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, NULL));
1688 
1689 		/* a maplock for txUpdateMap() for free of the page
1690 		 * has been formatted at txLock() time;
1691 		 */
1692 		tlck->flag |= tlckUPDATEMAP;
1693 	}
1694 	return;
1695 }
1696 
1697 /*
1698  *	xtLog()
1699  *
1700  * function:	log xtree tlock and format maplock to update bmap;
1701  */
1702 static void xtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
1703 	   struct tlock * tlck)
1704 {
1705 	struct inode *ip;
1706 	struct metapage *mp;
1707 	xtpage_t *p;
1708 	struct xtlock *xtlck;
1709 	struct maplock *maplock;
1710 	struct xdlistlock *xadlock;
1711 	struct pxd_lock *pxdlock;
1712 	pxd_t *page_pxd;
1713 	int next, lwm, hwm;
1714 
1715 	ip = tlck->ip;
1716 	mp = tlck->mp;
1717 
1718 	/* initialize as REDOPAGE/NOREDOPAGE record format */
1719 	lrd->log.redopage.type = cpu_to_le16(LOG_XTREE);
1720 	lrd->log.redopage.l2linesize = cpu_to_le16(L2XTSLOTSIZE);
1721 
1722 	page_pxd = &lrd->log.redopage.pxd;
1723 
1724 	if (tlck->type & tlckBTROOT) {
1725 		lrd->log.redopage.type |= cpu_to_le16(LOG_BTROOT);
1726 		p = &JFS_IP(ip)->i_xtroot;
1727 		if (S_ISDIR(ip->i_mode))
1728 			lrd->log.redopage.type |=
1729 			    cpu_to_le16(LOG_DIR_XTREE);
1730 	} else
1731 		p = (xtpage_t *) mp->data;
1732 	next = le16_to_cpu(p->header.nextindex);
1733 
1734 	xtlck = (struct xtlock *) & tlck->lock;
1735 
1736 	maplock = (struct maplock *) & tlck->lock;
1737 	xadlock = (struct xdlistlock *) maplock;
1738 
1739 	/*
1740 	 *	entry insertion/extension;
1741 	 *	sibling page link update (old right page before split);
1742 	 */
1743 	if (tlck->type & (tlckNEW | tlckGROW | tlckRELINK)) {
1744 		/* log after-image for logredo():
1745 		 * logredo() will update bmap for alloc of new/extended
1746 		 * extents (XAD_NEW|XAD_EXTEND) of XAD[lwm:next) from
1747 		 * after-image of XADlist;
1748 		 * logredo() resets (XAD_NEW|XAD_EXTEND) flag when
1749 		 * applying the after-image to the meta-data page.
1750 		 */
1751 		lrd->type = cpu_to_le16(LOG_REDOPAGE);
1752 		PXDaddress(page_pxd, mp->index);
1753 		PXDlength(page_pxd,
1754 			  mp->logical_size >> tblk->sb->s_blocksize_bits);
1755 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1756 
1757 		/* format a maplock for txUpdateMap() to update bPMAP
1758 		 * for alloc of new/extended extents of XAD[lwm:next)
1759 		 * from the page itself;
1760 		 * txUpdateMap() resets (XAD_NEW|XAD_EXTEND) flag.
1761 		 */
1762 		lwm = xtlck->lwm.offset;
1763 		if (lwm == 0)
1764 			lwm = XTPAGEMAXSLOT;
1765 
1766 		if (lwm == next)
1767 			goto out;
1768 		if (lwm > next) {
1769 			jfs_err("xtLog: lwm > next\n");
1770 			goto out;
1771 		}
1772 		tlck->flag |= tlckUPDATEMAP;
1773 		xadlock->flag = mlckALLOCXADLIST;
1774 		xadlock->count = next - lwm;
1775 		if ((xadlock->count <= 4) && (tblk->xflag & COMMIT_LAZY)) {
1776 			int i;
1777 			pxd_t *pxd;
1778 			/*
1779 			 * Lazy commit may allow xtree to be modified before
1780 			 * txUpdateMap runs.  Copy xad into linelock to
1781 			 * preserve correct data.
1782 			 *
1783 			 * We can fit twice as may pxd's as xads in the lock
1784 			 */
1785 			xadlock->flag = mlckALLOCPXDLIST;
1786 			pxd = xadlock->xdlist = &xtlck->pxdlock;
1787 			for (i = 0; i < xadlock->count; i++) {
1788 				PXDaddress(pxd, addressXAD(&p->xad[lwm + i]));
1789 				PXDlength(pxd, lengthXAD(&p->xad[lwm + i]));
1790 				p->xad[lwm + i].flag &=
1791 				    ~(XAD_NEW | XAD_EXTENDED);
1792 				pxd++;
1793 			}
1794 		} else {
1795 			/*
1796 			 * xdlist will point to into inode's xtree, ensure
1797 			 * that transaction is not committed lazily.
1798 			 */
1799 			xadlock->flag = mlckALLOCXADLIST;
1800 			xadlock->xdlist = &p->xad[lwm];
1801 			tblk->xflag &= ~COMMIT_LAZY;
1802 		}
1803 		jfs_info("xtLog: alloc ip:0x%p mp:0x%p tlck:0x%p lwm:%d "
1804 			 "count:%d", tlck->ip, mp, tlck, lwm, xadlock->count);
1805 
1806 		maplock->index = 1;
1807 
1808 	      out:
1809 		/* mark page as homeward bound */
1810 		tlck->flag |= tlckWRITEPAGE;
1811 
1812 		return;
1813 	}
1814 
1815 	/*
1816 	 *	page deletion: file deletion/truncation (ref. xtTruncate())
1817 	 *
1818 	 * (page will be invalidated after log is written and bmap
1819 	 * is updated from the page);
1820 	 */
1821 	if (tlck->type & tlckFREE) {
1822 		/* LOG_NOREDOPAGE log for NoRedoPage filter:
1823 		 * if page free from file delete, NoRedoFile filter from
1824 		 * inode image of zero link count will subsume NoRedoPage
1825 		 * filters for each page;
1826 		 * if page free from file truncattion, write NoRedoPage
1827 		 * filter;
1828 		 *
1829 		 * upadte of block allocation map for the page itself:
1830 		 * if page free from deletion and truncation, LOG_UPDATEMAP
1831 		 * log for the page itself is generated from processing
1832 		 * its parent page xad entries;
1833 		 */
1834 		/* if page free from file truncation, log LOG_NOREDOPAGE
1835 		 * of the deleted page for logredo() to start NoRedoPage
1836 		 * filter for the page;
1837 		 */
1838 		if (tblk->xflag & COMMIT_TRUNCATE) {
1839 			/* write NOREDOPAGE for the page */
1840 			lrd->type = cpu_to_le16(LOG_NOREDOPAGE);
1841 			PXDaddress(page_pxd, mp->index);
1842 			PXDlength(page_pxd,
1843 				  mp->logical_size >> tblk->sb->
1844 				  s_blocksize_bits);
1845 			lrd->backchain =
1846 			    cpu_to_le32(lmLog(log, tblk, lrd, NULL));
1847 
1848 			if (tlck->type & tlckBTROOT) {
1849 				/* Empty xtree must be logged */
1850 				lrd->type = cpu_to_le16(LOG_REDOPAGE);
1851 				lrd->backchain =
1852 				    cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1853 			}
1854 		}
1855 
1856 		/* init LOG_UPDATEMAP of the freed extents
1857 		 * XAD[XTENTRYSTART:hwm) from the deleted page itself
1858 		 * for logredo() to update bmap;
1859 		 */
1860 		lrd->type = cpu_to_le16(LOG_UPDATEMAP);
1861 		lrd->log.updatemap.type = cpu_to_le16(LOG_FREEXADLIST);
1862 		xtlck = (struct xtlock *) & tlck->lock;
1863 		hwm = xtlck->hwm.offset;
1864 		lrd->log.updatemap.nxd =
1865 		    cpu_to_le16(hwm - XTENTRYSTART + 1);
1866 		/* reformat linelock for lmLog() */
1867 		xtlck->header.offset = XTENTRYSTART;
1868 		xtlck->header.length = hwm - XTENTRYSTART + 1;
1869 		xtlck->index = 1;
1870 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1871 
1872 		/* format a maplock for txUpdateMap() to update bmap
1873 		 * to free extents of XAD[XTENTRYSTART:hwm) from the
1874 		 * deleted page itself;
1875 		 */
1876 		tlck->flag |= tlckUPDATEMAP;
1877 		xadlock->count = hwm - XTENTRYSTART + 1;
1878 		if ((xadlock->count <= 4) && (tblk->xflag & COMMIT_LAZY)) {
1879 			int i;
1880 			pxd_t *pxd;
1881 			/*
1882 			 * Lazy commit may allow xtree to be modified before
1883 			 * txUpdateMap runs.  Copy xad into linelock to
1884 			 * preserve correct data.
1885 			 *
1886 			 * We can fit twice as may pxd's as xads in the lock
1887 			 */
1888 			xadlock->flag = mlckFREEPXDLIST;
1889 			pxd = xadlock->xdlist = &xtlck->pxdlock;
1890 			for (i = 0; i < xadlock->count; i++) {
1891 				PXDaddress(pxd,
1892 					addressXAD(&p->xad[XTENTRYSTART + i]));
1893 				PXDlength(pxd,
1894 					lengthXAD(&p->xad[XTENTRYSTART + i]));
1895 				pxd++;
1896 			}
1897 		} else {
1898 			/*
1899 			 * xdlist will point to into inode's xtree, ensure
1900 			 * that transaction is not committed lazily.
1901 			 */
1902 			xadlock->flag = mlckFREEXADLIST;
1903 			xadlock->xdlist = &p->xad[XTENTRYSTART];
1904 			tblk->xflag &= ~COMMIT_LAZY;
1905 		}
1906 		jfs_info("xtLog: free ip:0x%p mp:0x%p count:%d lwm:2",
1907 			 tlck->ip, mp, xadlock->count);
1908 
1909 		maplock->index = 1;
1910 
1911 		/* mark page as invalid */
1912 		if (((tblk->xflag & COMMIT_PWMAP) || S_ISDIR(ip->i_mode))
1913 		    && !(tlck->type & tlckBTROOT))
1914 			tlck->flag |= tlckFREEPAGE;
1915 		/*
1916 		   else (tblk->xflag & COMMIT_PMAP)
1917 		   ? release the page;
1918 		 */
1919 		return;
1920 	}
1921 
1922 	/*
1923 	 *	page/entry truncation: file truncation (ref. xtTruncate())
1924 	 *
1925 	 *	|----------+------+------+---------------|
1926 	 *		   |      |      |
1927 	 *		   |      |     hwm - hwm before truncation
1928 	 *		   |     next - truncation point
1929 	 *		  lwm - lwm before truncation
1930 	 * header ?
1931 	 */
1932 	if (tlck->type & tlckTRUNCATE) {
1933 		/* This odd declaration suppresses a bogus gcc warning */
1934 		pxd_t pxd = pxd;	/* truncated extent of xad */
1935 		int twm;
1936 
1937 		/*
1938 		 * For truncation the entire linelock may be used, so it would
1939 		 * be difficult to store xad list in linelock itself.
1940 		 * Therefore, we'll just force transaction to be committed
1941 		 * synchronously, so that xtree pages won't be changed before
1942 		 * txUpdateMap runs.
1943 		 */
1944 		tblk->xflag &= ~COMMIT_LAZY;
1945 		lwm = xtlck->lwm.offset;
1946 		if (lwm == 0)
1947 			lwm = XTPAGEMAXSLOT;
1948 		hwm = xtlck->hwm.offset;
1949 		twm = xtlck->twm.offset;
1950 
1951 		/*
1952 		 *	write log records
1953 		 */
1954 		/* log after-image for logredo():
1955 		 *
1956 		 * logredo() will update bmap for alloc of new/extended
1957 		 * extents (XAD_NEW|XAD_EXTEND) of XAD[lwm:next) from
1958 		 * after-image of XADlist;
1959 		 * logredo() resets (XAD_NEW|XAD_EXTEND) flag when
1960 		 * applying the after-image to the meta-data page.
1961 		 */
1962 		lrd->type = cpu_to_le16(LOG_REDOPAGE);
1963 		PXDaddress(page_pxd, mp->index);
1964 		PXDlength(page_pxd,
1965 			  mp->logical_size >> tblk->sb->s_blocksize_bits);
1966 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, tlck));
1967 
1968 		/*
1969 		 * truncate entry XAD[twm == next - 1]:
1970 		 */
1971 		if (twm == next - 1) {
1972 			/* init LOG_UPDATEMAP for logredo() to update bmap for
1973 			 * free of truncated delta extent of the truncated
1974 			 * entry XAD[next - 1]:
1975 			 * (xtlck->pxdlock = truncated delta extent);
1976 			 */
1977 			pxdlock = (struct pxd_lock *) & xtlck->pxdlock;
1978 			/* assert(pxdlock->type & tlckTRUNCATE); */
1979 			lrd->type = cpu_to_le16(LOG_UPDATEMAP);
1980 			lrd->log.updatemap.type = cpu_to_le16(LOG_FREEPXD);
1981 			lrd->log.updatemap.nxd = cpu_to_le16(1);
1982 			lrd->log.updatemap.pxd = pxdlock->pxd;
1983 			pxd = pxdlock->pxd;	/* save to format maplock */
1984 			lrd->backchain =
1985 			    cpu_to_le32(lmLog(log, tblk, lrd, NULL));
1986 		}
1987 
1988 		/*
1989 		 * free entries XAD[next:hwm]:
1990 		 */
1991 		if (hwm >= next) {
1992 			/* init LOG_UPDATEMAP of the freed extents
1993 			 * XAD[next:hwm] from the deleted page itself
1994 			 * for logredo() to update bmap;
1995 			 */
1996 			lrd->type = cpu_to_le16(LOG_UPDATEMAP);
1997 			lrd->log.updatemap.type =
1998 			    cpu_to_le16(LOG_FREEXADLIST);
1999 			xtlck = (struct xtlock *) & tlck->lock;
2000 			hwm = xtlck->hwm.offset;
2001 			lrd->log.updatemap.nxd =
2002 			    cpu_to_le16(hwm - next + 1);
2003 			/* reformat linelock for lmLog() */
2004 			xtlck->header.offset = next;
2005 			xtlck->header.length = hwm - next + 1;
2006 			xtlck->index = 1;
2007 			lrd->backchain =
2008 			    cpu_to_le32(lmLog(log, tblk, lrd, tlck));
2009 		}
2010 
2011 		/*
2012 		 *	format maplock(s) for txUpdateMap() to update bmap
2013 		 */
2014 		maplock->index = 0;
2015 
2016 		/*
2017 		 * allocate entries XAD[lwm:next):
2018 		 */
2019 		if (lwm < next) {
2020 			/* format a maplock for txUpdateMap() to update bPMAP
2021 			 * for alloc of new/extended extents of XAD[lwm:next)
2022 			 * from the page itself;
2023 			 * txUpdateMap() resets (XAD_NEW|XAD_EXTEND) flag.
2024 			 */
2025 			tlck->flag |= tlckUPDATEMAP;
2026 			xadlock->flag = mlckALLOCXADLIST;
2027 			xadlock->count = next - lwm;
2028 			xadlock->xdlist = &p->xad[lwm];
2029 
2030 			jfs_info("xtLog: alloc ip:0x%p mp:0x%p count:%d "
2031 				 "lwm:%d next:%d",
2032 				 tlck->ip, mp, xadlock->count, lwm, next);
2033 			maplock->index++;
2034 			xadlock++;
2035 		}
2036 
2037 		/*
2038 		 * truncate entry XAD[twm == next - 1]:
2039 		 */
2040 		if (twm == next - 1) {
2041 			/* format a maplock for txUpdateMap() to update bmap
2042 			 * to free truncated delta extent of the truncated
2043 			 * entry XAD[next - 1];
2044 			 * (xtlck->pxdlock = truncated delta extent);
2045 			 */
2046 			tlck->flag |= tlckUPDATEMAP;
2047 			pxdlock = (struct pxd_lock *) xadlock;
2048 			pxdlock->flag = mlckFREEPXD;
2049 			pxdlock->count = 1;
2050 			pxdlock->pxd = pxd;
2051 
2052 			jfs_info("xtLog: truncate ip:0x%p mp:0x%p count:%d "
2053 				 "hwm:%d", ip, mp, pxdlock->count, hwm);
2054 			maplock->index++;
2055 			xadlock++;
2056 		}
2057 
2058 		/*
2059 		 * free entries XAD[next:hwm]:
2060 		 */
2061 		if (hwm >= next) {
2062 			/* format a maplock for txUpdateMap() to update bmap
2063 			 * to free extents of XAD[next:hwm] from thedeleted
2064 			 * page itself;
2065 			 */
2066 			tlck->flag |= tlckUPDATEMAP;
2067 			xadlock->flag = mlckFREEXADLIST;
2068 			xadlock->count = hwm - next + 1;
2069 			xadlock->xdlist = &p->xad[next];
2070 
2071 			jfs_info("xtLog: free ip:0x%p mp:0x%p count:%d "
2072 				 "next:%d hwm:%d",
2073 				 tlck->ip, mp, xadlock->count, next, hwm);
2074 			maplock->index++;
2075 		}
2076 
2077 		/* mark page as homeward bound */
2078 		tlck->flag |= tlckWRITEPAGE;
2079 	}
2080 	return;
2081 }
2082 
2083 /*
2084  *	mapLog()
2085  *
2086  * function:	log from maplock of freed data extents;
2087  */
2088 static void mapLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
2089 		   struct tlock * tlck)
2090 {
2091 	struct pxd_lock *pxdlock;
2092 	int i, nlock;
2093 	pxd_t *pxd;
2094 
2095 	/*
2096 	 *	page relocation: free the source page extent
2097 	 *
2098 	 * a maplock for txUpdateMap() for free of the page
2099 	 * has been formatted at txLock() time saving the src
2100 	 * relocated page address;
2101 	 */
2102 	if (tlck->type & tlckRELOCATE) {
2103 		/* log LOG_NOREDOPAGE of the old relocated page
2104 		 * for logredo() to start NoRedoPage filter;
2105 		 */
2106 		lrd->type = cpu_to_le16(LOG_NOREDOPAGE);
2107 		pxdlock = (struct pxd_lock *) & tlck->lock;
2108 		pxd = &lrd->log.redopage.pxd;
2109 		*pxd = pxdlock->pxd;
2110 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, NULL));
2111 
2112 		/* (N.B. currently, logredo() does NOT update bmap
2113 		 * for free of the page itself for (LOG_XTREE|LOG_NOREDOPAGE);
2114 		 * if page free from relocation, LOG_UPDATEMAP log is
2115 		 * specifically generated now for logredo()
2116 		 * to update bmap for free of src relocated page;
2117 		 * (new flag LOG_RELOCATE may be introduced which will
2118 		 * inform logredo() to start NORedoPage filter and also
2119 		 * update block allocation map at the same time, thus
2120 		 * avoiding an extra log write);
2121 		 */
2122 		lrd->type = cpu_to_le16(LOG_UPDATEMAP);
2123 		lrd->log.updatemap.type = cpu_to_le16(LOG_FREEPXD);
2124 		lrd->log.updatemap.nxd = cpu_to_le16(1);
2125 		lrd->log.updatemap.pxd = pxdlock->pxd;
2126 		lrd->backchain = cpu_to_le32(lmLog(log, tblk, lrd, NULL));
2127 
2128 		/* a maplock for txUpdateMap() for free of the page
2129 		 * has been formatted at txLock() time;
2130 		 */
2131 		tlck->flag |= tlckUPDATEMAP;
2132 		return;
2133 	}
2134 	/*
2135 
2136 	 * Otherwise it's not a relocate request
2137 	 *
2138 	 */
2139 	else {
2140 		/* log LOG_UPDATEMAP for logredo() to update bmap for
2141 		 * free of truncated/relocated delta extent of the data;
2142 		 * e.g.: external EA extent, relocated/truncated extent
2143 		 * from xtTailgate();
2144 		 */
2145 		lrd->type = cpu_to_le16(LOG_UPDATEMAP);
2146 		pxdlock = (struct pxd_lock *) & tlck->lock;
2147 		nlock = pxdlock->index;
2148 		for (i = 0; i < nlock; i++, pxdlock++) {
2149 			if (pxdlock->flag & mlckALLOCPXD)
2150 				lrd->log.updatemap.type =
2151 				    cpu_to_le16(LOG_ALLOCPXD);
2152 			else
2153 				lrd->log.updatemap.type =
2154 				    cpu_to_le16(LOG_FREEPXD);
2155 			lrd->log.updatemap.nxd = cpu_to_le16(1);
2156 			lrd->log.updatemap.pxd = pxdlock->pxd;
2157 			lrd->backchain =
2158 			    cpu_to_le32(lmLog(log, tblk, lrd, NULL));
2159 			jfs_info("mapLog: xaddr:0x%lx xlen:0x%x",
2160 				 (ulong) addressPXD(&pxdlock->pxd),
2161 				 lengthPXD(&pxdlock->pxd));
2162 		}
2163 
2164 		/* update bmap */
2165 		tlck->flag |= tlckUPDATEMAP;
2166 	}
2167 }
2168 
2169 /*
2170  *	txEA()
2171  *
2172  * function:	acquire maplock for EA/ACL extents or
2173  *		set COMMIT_INLINE flag;
2174  */
2175 void txEA(tid_t tid, struct inode *ip, dxd_t * oldea, dxd_t * newea)
2176 {
2177 	struct tlock *tlck = NULL;
2178 	struct pxd_lock *maplock = NULL, *pxdlock = NULL;
2179 
2180 	/*
2181 	 * format maplock for alloc of new EA extent
2182 	 */
2183 	if (newea) {
2184 		/* Since the newea could be a completely zeroed entry we need to
2185 		 * check for the two flags which indicate we should actually
2186 		 * commit new EA data
2187 		 */
2188 		if (newea->flag & DXD_EXTENT) {
2189 			tlck = txMaplock(tid, ip, tlckMAP);
2190 			maplock = (struct pxd_lock *) & tlck->lock;
2191 			pxdlock = (struct pxd_lock *) maplock;
2192 			pxdlock->flag = mlckALLOCPXD;
2193 			PXDaddress(&pxdlock->pxd, addressDXD(newea));
2194 			PXDlength(&pxdlock->pxd, lengthDXD(newea));
2195 			pxdlock++;
2196 			maplock->index = 1;
2197 		} else if (newea->flag & DXD_INLINE) {
2198 			tlck = NULL;
2199 
2200 			set_cflag(COMMIT_Inlineea, ip);
2201 		}
2202 	}
2203 
2204 	/*
2205 	 * format maplock for free of old EA extent
2206 	 */
2207 	if (!test_cflag(COMMIT_Nolink, ip) && oldea->flag & DXD_EXTENT) {
2208 		if (tlck == NULL) {
2209 			tlck = txMaplock(tid, ip, tlckMAP);
2210 			maplock = (struct pxd_lock *) & tlck->lock;
2211 			pxdlock = (struct pxd_lock *) maplock;
2212 			maplock->index = 0;
2213 		}
2214 		pxdlock->flag = mlckFREEPXD;
2215 		PXDaddress(&pxdlock->pxd, addressDXD(oldea));
2216 		PXDlength(&pxdlock->pxd, lengthDXD(oldea));
2217 		maplock->index++;
2218 	}
2219 }
2220 
2221 /*
2222  *	txForce()
2223  *
2224  * function: synchronously write pages locked by transaction
2225  *	     after txLog() but before txUpdateMap();
2226  */
2227 static void txForce(struct tblock * tblk)
2228 {
2229 	struct tlock *tlck;
2230 	lid_t lid, next;
2231 	struct metapage *mp;
2232 
2233 	/*
2234 	 * reverse the order of transaction tlocks in
2235 	 * careful update order of address index pages
2236 	 * (right to left, bottom up)
2237 	 */
2238 	tlck = lid_to_tlock(tblk->next);
2239 	lid = tlck->next;
2240 	tlck->next = 0;
2241 	while (lid) {
2242 		tlck = lid_to_tlock(lid);
2243 		next = tlck->next;
2244 		tlck->next = tblk->next;
2245 		tblk->next = lid;
2246 		lid = next;
2247 	}
2248 
2249 	/*
2250 	 * synchronously write the page, and
2251 	 * hold the page for txUpdateMap();
2252 	 */
2253 	for (lid = tblk->next; lid; lid = next) {
2254 		tlck = lid_to_tlock(lid);
2255 		next = tlck->next;
2256 
2257 		if ((mp = tlck->mp) != NULL &&
2258 		    (tlck->type & tlckBTROOT) == 0) {
2259 			assert(mp->xflag & COMMIT_PAGE);
2260 
2261 			if (tlck->flag & tlckWRITEPAGE) {
2262 				tlck->flag &= ~tlckWRITEPAGE;
2263 
2264 				/* do not release page to freelist */
2265 				force_metapage(mp);
2266 #if 0
2267 				/*
2268 				 * The "right" thing to do here is to
2269 				 * synchronously write the metadata.
2270 				 * With the current implementation this
2271 				 * is hard since write_metapage requires
2272 				 * us to kunmap & remap the page.  If we
2273 				 * have tlocks pointing into the metadata
2274 				 * pages, we don't want to do this.  I think
2275 				 * we can get by with synchronously writing
2276 				 * the pages when they are released.
2277 				 */
2278 				assert(mp->nohomeok);
2279 				set_bit(META_dirty, &mp->flag);
2280 				set_bit(META_sync, &mp->flag);
2281 #endif
2282 			}
2283 		}
2284 	}
2285 }
2286 
2287 /*
2288  *	txUpdateMap()
2289  *
2290  * function:	update persistent allocation map (and working map
2291  *		if appropriate);
2292  *
2293  * parameter:
2294  */
2295 static void txUpdateMap(struct tblock * tblk)
2296 {
2297 	struct inode *ip;
2298 	struct inode *ipimap;
2299 	lid_t lid;
2300 	struct tlock *tlck;
2301 	struct maplock *maplock;
2302 	struct pxd_lock pxdlock;
2303 	int maptype;
2304 	int k, nlock;
2305 	struct metapage *mp = NULL;
2306 
2307 	ipimap = JFS_SBI(tblk->sb)->ipimap;
2308 
2309 	maptype = (tblk->xflag & COMMIT_PMAP) ? COMMIT_PMAP : COMMIT_PWMAP;
2310 
2311 
2312 	/*
2313 	 *	update block allocation map
2314 	 *
2315 	 * update allocation state in pmap (and wmap) and
2316 	 * update lsn of the pmap page;
2317 	 */
2318 	/*
2319 	 * scan each tlock/page of transaction for block allocation/free:
2320 	 *
2321 	 * for each tlock/page of transaction, update map.
2322 	 *  ? are there tlock for pmap and pwmap at the same time ?
2323 	 */
2324 	for (lid = tblk->next; lid; lid = tlck->next) {
2325 		tlck = lid_to_tlock(lid);
2326 
2327 		if ((tlck->flag & tlckUPDATEMAP) == 0)
2328 			continue;
2329 
2330 		if (tlck->flag & tlckFREEPAGE) {
2331 			/*
2332 			 * Another thread may attempt to reuse freed space
2333 			 * immediately, so we want to get rid of the metapage
2334 			 * before anyone else has a chance to get it.
2335 			 * Lock metapage, update maps, then invalidate
2336 			 * the metapage.
2337 			 */
2338 			mp = tlck->mp;
2339 			ASSERT(mp->xflag & COMMIT_PAGE);
2340 			grab_metapage(mp);
2341 		}
2342 
2343 		/*
2344 		 * extent list:
2345 		 * . in-line PXD list:
2346 		 * . out-of-line XAD list:
2347 		 */
2348 		maplock = (struct maplock *) & tlck->lock;
2349 		nlock = maplock->index;
2350 
2351 		for (k = 0; k < nlock; k++, maplock++) {
2352 			/*
2353 			 * allocate blocks in persistent map:
2354 			 *
2355 			 * blocks have been allocated from wmap at alloc time;
2356 			 */
2357 			if (maplock->flag & mlckALLOC) {
2358 				txAllocPMap(ipimap, maplock, tblk);
2359 			}
2360 			/*
2361 			 * free blocks in persistent and working map:
2362 			 * blocks will be freed in pmap and then in wmap;
2363 			 *
2364 			 * ? tblock specifies the PMAP/PWMAP based upon
2365 			 * transaction
2366 			 *
2367 			 * free blocks in persistent map:
2368 			 * blocks will be freed from wmap at last reference
2369 			 * release of the object for regular files;
2370 			 *
2371 			 * Alway free blocks from both persistent & working
2372 			 * maps for directories
2373 			 */
2374 			else {	/* (maplock->flag & mlckFREE) */
2375 
2376 				if (tlck->flag & tlckDIRECTORY)
2377 					txFreeMap(ipimap, maplock,
2378 						  tblk, COMMIT_PWMAP);
2379 				else
2380 					txFreeMap(ipimap, maplock,
2381 						  tblk, maptype);
2382 			}
2383 		}
2384 		if (tlck->flag & tlckFREEPAGE) {
2385 			if (!(tblk->flag & tblkGC_LAZY)) {
2386 				/* This is equivalent to txRelease */
2387 				ASSERT(mp->lid == lid);
2388 				tlck->mp->lid = 0;
2389 			}
2390 			assert(mp->nohomeok == 1);
2391 			metapage_homeok(mp);
2392 			discard_metapage(mp);
2393 			tlck->mp = NULL;
2394 		}
2395 	}
2396 	/*
2397 	 *	update inode allocation map
2398 	 *
2399 	 * update allocation state in pmap and
2400 	 * update lsn of the pmap page;
2401 	 * update in-memory inode flag/state
2402 	 *
2403 	 * unlock mapper/write lock
2404 	 */
2405 	if (tblk->xflag & COMMIT_CREATE) {
2406 		diUpdatePMap(ipimap, tblk->ino, false, tblk);
2407 		/* update persistent block allocation map
2408 		 * for the allocation of inode extent;
2409 		 */
2410 		pxdlock.flag = mlckALLOCPXD;
2411 		pxdlock.pxd = tblk->u.ixpxd;
2412 		pxdlock.index = 1;
2413 		txAllocPMap(ipimap, (struct maplock *) & pxdlock, tblk);
2414 	} else if (tblk->xflag & COMMIT_DELETE) {
2415 		ip = tblk->u.ip;
2416 		diUpdatePMap(ipimap, ip->i_ino, true, tblk);
2417 		iput(ip);
2418 	}
2419 }
2420 
2421 /*
2422  *	txAllocPMap()
2423  *
2424  * function: allocate from persistent map;
2425  *
2426  * parameter:
2427  *	ipbmap	-
2428  *	malock	-
2429  *		xad list:
2430  *		pxd:
2431  *
2432  *	maptype -
2433  *		allocate from persistent map;
2434  *		free from persistent map;
2435  *		(e.g., tmp file - free from working map at releae
2436  *		 of last reference);
2437  *		free from persistent and working map;
2438  *
2439  *	lsn	- log sequence number;
2440  */
2441 static void txAllocPMap(struct inode *ip, struct maplock * maplock,
2442 			struct tblock * tblk)
2443 {
2444 	struct inode *ipbmap = JFS_SBI(ip->i_sb)->ipbmap;
2445 	struct xdlistlock *xadlistlock;
2446 	xad_t *xad;
2447 	s64 xaddr;
2448 	int xlen;
2449 	struct pxd_lock *pxdlock;
2450 	struct xdlistlock *pxdlistlock;
2451 	pxd_t *pxd;
2452 	int n;
2453 
2454 	/*
2455 	 * allocate from persistent map;
2456 	 */
2457 	if (maplock->flag & mlckALLOCXADLIST) {
2458 		xadlistlock = (struct xdlistlock *) maplock;
2459 		xad = xadlistlock->xdlist;
2460 		for (n = 0; n < xadlistlock->count; n++, xad++) {
2461 			if (xad->flag & (XAD_NEW | XAD_EXTENDED)) {
2462 				xaddr = addressXAD(xad);
2463 				xlen = lengthXAD(xad);
2464 				dbUpdatePMap(ipbmap, false, xaddr,
2465 					     (s64) xlen, tblk);
2466 				xad->flag &= ~(XAD_NEW | XAD_EXTENDED);
2467 				jfs_info("allocPMap: xaddr:0x%lx xlen:%d",
2468 					 (ulong) xaddr, xlen);
2469 			}
2470 		}
2471 	} else if (maplock->flag & mlckALLOCPXD) {
2472 		pxdlock = (struct pxd_lock *) maplock;
2473 		xaddr = addressPXD(&pxdlock->pxd);
2474 		xlen = lengthPXD(&pxdlock->pxd);
2475 		dbUpdatePMap(ipbmap, false, xaddr, (s64) xlen, tblk);
2476 		jfs_info("allocPMap: xaddr:0x%lx xlen:%d", (ulong) xaddr, xlen);
2477 	} else {		/* (maplock->flag & mlckALLOCPXDLIST) */
2478 
2479 		pxdlistlock = (struct xdlistlock *) maplock;
2480 		pxd = pxdlistlock->xdlist;
2481 		for (n = 0; n < pxdlistlock->count; n++, pxd++) {
2482 			xaddr = addressPXD(pxd);
2483 			xlen = lengthPXD(pxd);
2484 			dbUpdatePMap(ipbmap, false, xaddr, (s64) xlen,
2485 				     tblk);
2486 			jfs_info("allocPMap: xaddr:0x%lx xlen:%d",
2487 				 (ulong) xaddr, xlen);
2488 		}
2489 	}
2490 }
2491 
2492 /*
2493  *	txFreeMap()
2494  *
2495  * function:	free from persistent and/or working map;
2496  *
2497  * todo: optimization
2498  */
2499 void txFreeMap(struct inode *ip,
2500 	       struct maplock * maplock, struct tblock * tblk, int maptype)
2501 {
2502 	struct inode *ipbmap = JFS_SBI(ip->i_sb)->ipbmap;
2503 	struct xdlistlock *xadlistlock;
2504 	xad_t *xad;
2505 	s64 xaddr;
2506 	int xlen;
2507 	struct pxd_lock *pxdlock;
2508 	struct xdlistlock *pxdlistlock;
2509 	pxd_t *pxd;
2510 	int n;
2511 
2512 	jfs_info("txFreeMap: tblk:0x%p maplock:0x%p maptype:0x%x",
2513 		 tblk, maplock, maptype);
2514 
2515 	/*
2516 	 * free from persistent map;
2517 	 */
2518 	if (maptype == COMMIT_PMAP || maptype == COMMIT_PWMAP) {
2519 		if (maplock->flag & mlckFREEXADLIST) {
2520 			xadlistlock = (struct xdlistlock *) maplock;
2521 			xad = xadlistlock->xdlist;
2522 			for (n = 0; n < xadlistlock->count; n++, xad++) {
2523 				if (!(xad->flag & XAD_NEW)) {
2524 					xaddr = addressXAD(xad);
2525 					xlen = lengthXAD(xad);
2526 					dbUpdatePMap(ipbmap, true, xaddr,
2527 						     (s64) xlen, tblk);
2528 					jfs_info("freePMap: xaddr:0x%lx "
2529 						 "xlen:%d",
2530 						 (ulong) xaddr, xlen);
2531 				}
2532 			}
2533 		} else if (maplock->flag & mlckFREEPXD) {
2534 			pxdlock = (struct pxd_lock *) maplock;
2535 			xaddr = addressPXD(&pxdlock->pxd);
2536 			xlen = lengthPXD(&pxdlock->pxd);
2537 			dbUpdatePMap(ipbmap, true, xaddr, (s64) xlen,
2538 				     tblk);
2539 			jfs_info("freePMap: xaddr:0x%lx xlen:%d",
2540 				 (ulong) xaddr, xlen);
2541 		} else {	/* (maplock->flag & mlckALLOCPXDLIST) */
2542 
2543 			pxdlistlock = (struct xdlistlock *) maplock;
2544 			pxd = pxdlistlock->xdlist;
2545 			for (n = 0; n < pxdlistlock->count; n++, pxd++) {
2546 				xaddr = addressPXD(pxd);
2547 				xlen = lengthPXD(pxd);
2548 				dbUpdatePMap(ipbmap, true, xaddr,
2549 					     (s64) xlen, tblk);
2550 				jfs_info("freePMap: xaddr:0x%lx xlen:%d",
2551 					 (ulong) xaddr, xlen);
2552 			}
2553 		}
2554 	}
2555 
2556 	/*
2557 	 * free from working map;
2558 	 */
2559 	if (maptype == COMMIT_PWMAP || maptype == COMMIT_WMAP) {
2560 		if (maplock->flag & mlckFREEXADLIST) {
2561 			xadlistlock = (struct xdlistlock *) maplock;
2562 			xad = xadlistlock->xdlist;
2563 			for (n = 0; n < xadlistlock->count; n++, xad++) {
2564 				xaddr = addressXAD(xad);
2565 				xlen = lengthXAD(xad);
2566 				dbFree(ip, xaddr, (s64) xlen);
2567 				xad->flag = 0;
2568 				jfs_info("freeWMap: xaddr:0x%lx xlen:%d",
2569 					 (ulong) xaddr, xlen);
2570 			}
2571 		} else if (maplock->flag & mlckFREEPXD) {
2572 			pxdlock = (struct pxd_lock *) maplock;
2573 			xaddr = addressPXD(&pxdlock->pxd);
2574 			xlen = lengthPXD(&pxdlock->pxd);
2575 			dbFree(ip, xaddr, (s64) xlen);
2576 			jfs_info("freeWMap: xaddr:0x%lx xlen:%d",
2577 				 (ulong) xaddr, xlen);
2578 		} else {	/* (maplock->flag & mlckFREEPXDLIST) */
2579 
2580 			pxdlistlock = (struct xdlistlock *) maplock;
2581 			pxd = pxdlistlock->xdlist;
2582 			for (n = 0; n < pxdlistlock->count; n++, pxd++) {
2583 				xaddr = addressPXD(pxd);
2584 				xlen = lengthPXD(pxd);
2585 				dbFree(ip, xaddr, (s64) xlen);
2586 				jfs_info("freeWMap: xaddr:0x%lx xlen:%d",
2587 					 (ulong) xaddr, xlen);
2588 			}
2589 		}
2590 	}
2591 }
2592 
2593 /*
2594  *	txFreelock()
2595  *
2596  * function:	remove tlock from inode anonymous locklist
2597  */
2598 void txFreelock(struct inode *ip)
2599 {
2600 	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
2601 	struct tlock *xtlck, *tlck;
2602 	lid_t xlid = 0, lid;
2603 
2604 	if (!jfs_ip->atlhead)
2605 		return;
2606 
2607 	TXN_LOCK();
2608 	xtlck = (struct tlock *) &jfs_ip->atlhead;
2609 
2610 	while ((lid = xtlck->next) != 0) {
2611 		tlck = lid_to_tlock(lid);
2612 		if (tlck->flag & tlckFREELOCK) {
2613 			xtlck->next = tlck->next;
2614 			txLockFree(lid);
2615 		} else {
2616 			xtlck = tlck;
2617 			xlid = lid;
2618 		}
2619 	}
2620 
2621 	if (jfs_ip->atlhead)
2622 		jfs_ip->atltail = xlid;
2623 	else {
2624 		jfs_ip->atltail = 0;
2625 		/*
2626 		 * If inode was on anon_list, remove it
2627 		 */
2628 		list_del_init(&jfs_ip->anon_inode_list);
2629 	}
2630 	TXN_UNLOCK();
2631 }
2632 
2633 /*
2634  *	txAbort()
2635  *
2636  * function: abort tx before commit;
2637  *
2638  * frees line-locks and segment locks for all
2639  * segments in comdata structure.
2640  * Optionally sets state of file-system to FM_DIRTY in super-block.
2641  * log age of page-frames in memory for which caller has
2642  * are reset to 0 (to avoid logwarap).
2643  */
2644 void txAbort(tid_t tid, int dirty)
2645 {
2646 	lid_t lid, next;
2647 	struct metapage *mp;
2648 	struct tblock *tblk = tid_to_tblock(tid);
2649 	struct tlock *tlck;
2650 
2651 	/*
2652 	 * free tlocks of the transaction
2653 	 */
2654 	for (lid = tblk->next; lid; lid = next) {
2655 		tlck = lid_to_tlock(lid);
2656 		next = tlck->next;
2657 		mp = tlck->mp;
2658 		JFS_IP(tlck->ip)->xtlid = 0;
2659 
2660 		if (mp) {
2661 			mp->lid = 0;
2662 
2663 			/*
2664 			 * reset lsn of page to avoid logwarap:
2665 			 *
2666 			 * (page may have been previously committed by another
2667 			 * transaction(s) but has not been paged, i.e.,
2668 			 * it may be on logsync list even though it has not
2669 			 * been logged for the current tx.)
2670 			 */
2671 			if (mp->xflag & COMMIT_PAGE && mp->lsn)
2672 				LogSyncRelease(mp);
2673 		}
2674 		/* insert tlock at head of freelist */
2675 		TXN_LOCK();
2676 		txLockFree(lid);
2677 		TXN_UNLOCK();
2678 	}
2679 
2680 	/* caller will free the transaction block */
2681 
2682 	tblk->next = tblk->last = 0;
2683 
2684 	/*
2685 	 * mark filesystem dirty
2686 	 */
2687 	if (dirty)
2688 		jfs_error(tblk->sb, "txAbort");
2689 
2690 	return;
2691 }
2692 
2693 /*
2694  *	txLazyCommit(void)
2695  *
2696  *	All transactions except those changing ipimap (COMMIT_FORCE) are
2697  *	processed by this routine.  This insures that the inode and block
2698  *	allocation maps are updated in order.  For synchronous transactions,
2699  *	let the user thread finish processing after txUpdateMap() is called.
2700  */
2701 static void txLazyCommit(struct tblock * tblk)
2702 {
2703 	struct jfs_log *log;
2704 
2705 	while (((tblk->flag & tblkGC_READY) == 0) &&
2706 	       ((tblk->flag & tblkGC_UNLOCKED) == 0)) {
2707 		/* We must have gotten ahead of the user thread
2708 		 */
2709 		jfs_info("jfs_lazycommit: tblk 0x%p not unlocked", tblk);
2710 		yield();
2711 	}
2712 
2713 	jfs_info("txLazyCommit: processing tblk 0x%p", tblk);
2714 
2715 	txUpdateMap(tblk);
2716 
2717 	log = (struct jfs_log *) JFS_SBI(tblk->sb)->log;
2718 
2719 	spin_lock_irq(&log->gclock);	// LOGGC_LOCK
2720 
2721 	tblk->flag |= tblkGC_COMMITTED;
2722 
2723 	if (tblk->flag & tblkGC_READY)
2724 		log->gcrtc--;
2725 
2726 	wake_up_all(&tblk->gcwait);	// LOGGC_WAKEUP
2727 
2728 	/*
2729 	 * Can't release log->gclock until we've tested tblk->flag
2730 	 */
2731 	if (tblk->flag & tblkGC_LAZY) {
2732 		spin_unlock_irq(&log->gclock);	// LOGGC_UNLOCK
2733 		txUnlock(tblk);
2734 		tblk->flag &= ~tblkGC_LAZY;
2735 		txEnd(tblk - TxBlock);	/* Convert back to tid */
2736 	} else
2737 		spin_unlock_irq(&log->gclock);	// LOGGC_UNLOCK
2738 
2739 	jfs_info("txLazyCommit: done: tblk = 0x%p", tblk);
2740 }
2741 
2742 /*
2743  *	jfs_lazycommit(void)
2744  *
2745  *	To be run as a kernel daemon.  If lbmIODone is called in an interrupt
2746  *	context, or where blocking is not wanted, this routine will process
2747  *	committed transactions from the unlock queue.
2748  */
2749 int jfs_lazycommit(void *arg)
2750 {
2751 	int WorkDone;
2752 	struct tblock *tblk;
2753 	unsigned long flags;
2754 	struct jfs_sb_info *sbi;
2755 
2756 	do {
2757 		LAZY_LOCK(flags);
2758 		jfs_commit_thread_waking = 0;	/* OK to wake another thread */
2759 		while (!list_empty(&TxAnchor.unlock_queue)) {
2760 			WorkDone = 0;
2761 			list_for_each_entry(tblk, &TxAnchor.unlock_queue,
2762 					    cqueue) {
2763 
2764 				sbi = JFS_SBI(tblk->sb);
2765 				/*
2766 				 * For each volume, the transactions must be
2767 				 * handled in order.  If another commit thread
2768 				 * is handling a tblk for this superblock,
2769 				 * skip it
2770 				 */
2771 				if (sbi->commit_state & IN_LAZYCOMMIT)
2772 					continue;
2773 
2774 				sbi->commit_state |= IN_LAZYCOMMIT;
2775 				WorkDone = 1;
2776 
2777 				/*
2778 				 * Remove transaction from queue
2779 				 */
2780 				list_del(&tblk->cqueue);
2781 
2782 				LAZY_UNLOCK(flags);
2783 				txLazyCommit(tblk);
2784 				LAZY_LOCK(flags);
2785 
2786 				sbi->commit_state &= ~IN_LAZYCOMMIT;
2787 				/*
2788 				 * Don't continue in the for loop.  (We can't
2789 				 * anyway, it's unsafe!)  We want to go back to
2790 				 * the beginning of the list.
2791 				 */
2792 				break;
2793 			}
2794 
2795 			/* If there was nothing to do, don't continue */
2796 			if (!WorkDone)
2797 				break;
2798 		}
2799 		/* In case a wakeup came while all threads were active */
2800 		jfs_commit_thread_waking = 0;
2801 
2802 		if (freezing(current)) {
2803 			LAZY_UNLOCK(flags);
2804 			refrigerator();
2805 		} else {
2806 			DECLARE_WAITQUEUE(wq, current);
2807 
2808 			add_wait_queue(&jfs_commit_thread_wait, &wq);
2809 			set_current_state(TASK_INTERRUPTIBLE);
2810 			LAZY_UNLOCK(flags);
2811 			schedule();
2812 			__set_current_state(TASK_RUNNING);
2813 			remove_wait_queue(&jfs_commit_thread_wait, &wq);
2814 		}
2815 	} while (!kthread_should_stop());
2816 
2817 	if (!list_empty(&TxAnchor.unlock_queue))
2818 		jfs_err("jfs_lazycommit being killed w/pending transactions!");
2819 	else
2820 		jfs_info("jfs_lazycommit being killed\n");
2821 	return 0;
2822 }
2823 
2824 void txLazyUnlock(struct tblock * tblk)
2825 {
2826 	unsigned long flags;
2827 
2828 	LAZY_LOCK(flags);
2829 
2830 	list_add_tail(&tblk->cqueue, &TxAnchor.unlock_queue);
2831 	/*
2832 	 * Don't wake up a commit thread if there is already one servicing
2833 	 * this superblock, or if the last one we woke up hasn't started yet.
2834 	 */
2835 	if (!(JFS_SBI(tblk->sb)->commit_state & IN_LAZYCOMMIT) &&
2836 	    !jfs_commit_thread_waking) {
2837 		jfs_commit_thread_waking = 1;
2838 		wake_up(&jfs_commit_thread_wait);
2839 	}
2840 	LAZY_UNLOCK(flags);
2841 }
2842 
2843 static void LogSyncRelease(struct metapage * mp)
2844 {
2845 	struct jfs_log *log = mp->log;
2846 
2847 	assert(mp->nohomeok);
2848 	assert(log);
2849 	metapage_homeok(mp);
2850 }
2851 
2852 /*
2853  *	txQuiesce
2854  *
2855  *	Block all new transactions and push anonymous transactions to
2856  *	completion
2857  *
2858  *	This does almost the same thing as jfs_sync below.  We don't
2859  *	worry about deadlocking when jfs_tlocks_low is set, since we would
2860  *	expect jfs_sync to get us out of that jam.
2861  */
2862 void txQuiesce(struct super_block *sb)
2863 {
2864 	struct inode *ip;
2865 	struct jfs_inode_info *jfs_ip;
2866 	struct jfs_log *log = JFS_SBI(sb)->log;
2867 	tid_t tid;
2868 
2869 	set_bit(log_QUIESCE, &log->flag);
2870 
2871 	TXN_LOCK();
2872 restart:
2873 	while (!list_empty(&TxAnchor.anon_list)) {
2874 		jfs_ip = list_entry(TxAnchor.anon_list.next,
2875 				    struct jfs_inode_info,
2876 				    anon_inode_list);
2877 		ip = &jfs_ip->vfs_inode;
2878 
2879 		/*
2880 		 * inode will be removed from anonymous list
2881 		 * when it is committed
2882 		 */
2883 		TXN_UNLOCK();
2884 		tid = txBegin(ip->i_sb, COMMIT_INODE | COMMIT_FORCE);
2885 		mutex_lock(&jfs_ip->commit_mutex);
2886 		txCommit(tid, 1, &ip, 0);
2887 		txEnd(tid);
2888 		mutex_unlock(&jfs_ip->commit_mutex);
2889 		/*
2890 		 * Just to be safe.  I don't know how
2891 		 * long we can run without blocking
2892 		 */
2893 		cond_resched();
2894 		TXN_LOCK();
2895 	}
2896 
2897 	/*
2898 	 * If jfs_sync is running in parallel, there could be some inodes
2899 	 * on anon_list2.  Let's check.
2900 	 */
2901 	if (!list_empty(&TxAnchor.anon_list2)) {
2902 		list_splice(&TxAnchor.anon_list2, &TxAnchor.anon_list);
2903 		INIT_LIST_HEAD(&TxAnchor.anon_list2);
2904 		goto restart;
2905 	}
2906 	TXN_UNLOCK();
2907 
2908 	/*
2909 	 * We may need to kick off the group commit
2910 	 */
2911 	jfs_flush_journal(log, 0);
2912 }
2913 
2914 /*
2915  * txResume()
2916  *
2917  * Allows transactions to start again following txQuiesce
2918  */
2919 void txResume(struct super_block *sb)
2920 {
2921 	struct jfs_log *log = JFS_SBI(sb)->log;
2922 
2923 	clear_bit(log_QUIESCE, &log->flag);
2924 	TXN_WAKEUP(&log->syncwait);
2925 }
2926 
2927 /*
2928  *	jfs_sync(void)
2929  *
2930  *	To be run as a kernel daemon.  This is awakened when tlocks run low.
2931  *	We write any inodes that have anonymous tlocks so they will become
2932  *	available.
2933  */
2934 int jfs_sync(void *arg)
2935 {
2936 	struct inode *ip;
2937 	struct jfs_inode_info *jfs_ip;
2938 	int rc;
2939 	tid_t tid;
2940 
2941 	do {
2942 		/*
2943 		 * write each inode on the anonymous inode list
2944 		 */
2945 		TXN_LOCK();
2946 		while (jfs_tlocks_low && !list_empty(&TxAnchor.anon_list)) {
2947 			jfs_ip = list_entry(TxAnchor.anon_list.next,
2948 					    struct jfs_inode_info,
2949 					    anon_inode_list);
2950 			ip = &jfs_ip->vfs_inode;
2951 
2952 			if (! igrab(ip)) {
2953 				/*
2954 				 * Inode is being freed
2955 				 */
2956 				list_del_init(&jfs_ip->anon_inode_list);
2957 			} else if (mutex_trylock(&jfs_ip->commit_mutex)) {
2958 				/*
2959 				 * inode will be removed from anonymous list
2960 				 * when it is committed
2961 				 */
2962 				TXN_UNLOCK();
2963 				tid = txBegin(ip->i_sb, COMMIT_INODE);
2964 				rc = txCommit(tid, 1, &ip, 0);
2965 				txEnd(tid);
2966 				mutex_unlock(&jfs_ip->commit_mutex);
2967 
2968 				iput(ip);
2969 				/*
2970 				 * Just to be safe.  I don't know how
2971 				 * long we can run without blocking
2972 				 */
2973 				cond_resched();
2974 				TXN_LOCK();
2975 			} else {
2976 				/* We can't get the commit mutex.  It may
2977 				 * be held by a thread waiting for tlock's
2978 				 * so let's not block here.  Save it to
2979 				 * put back on the anon_list.
2980 				 */
2981 
2982 				/* Take off anon_list */
2983 				list_del(&jfs_ip->anon_inode_list);
2984 
2985 				/* Put on anon_list2 */
2986 				list_add(&jfs_ip->anon_inode_list,
2987 					 &TxAnchor.anon_list2);
2988 
2989 				TXN_UNLOCK();
2990 				iput(ip);
2991 				TXN_LOCK();
2992 			}
2993 		}
2994 		/* Add anon_list2 back to anon_list */
2995 		list_splice_init(&TxAnchor.anon_list2, &TxAnchor.anon_list);
2996 
2997 		if (freezing(current)) {
2998 			TXN_UNLOCK();
2999 			refrigerator();
3000 		} else {
3001 			set_current_state(TASK_INTERRUPTIBLE);
3002 			TXN_UNLOCK();
3003 			schedule();
3004 			__set_current_state(TASK_RUNNING);
3005 		}
3006 	} while (!kthread_should_stop());
3007 
3008 	jfs_info("jfs_sync being killed");
3009 	return 0;
3010 }
3011 
3012 #if defined(CONFIG_PROC_FS) && defined(CONFIG_JFS_DEBUG)
3013 static int jfs_txanchor_proc_show(struct seq_file *m, void *v)
3014 {
3015 	char *freewait;
3016 	char *freelockwait;
3017 	char *lowlockwait;
3018 
3019 	freewait =
3020 	    waitqueue_active(&TxAnchor.freewait) ? "active" : "empty";
3021 	freelockwait =
3022 	    waitqueue_active(&TxAnchor.freelockwait) ? "active" : "empty";
3023 	lowlockwait =
3024 	    waitqueue_active(&TxAnchor.lowlockwait) ? "active" : "empty";
3025 
3026 	seq_printf(m,
3027 		       "JFS TxAnchor\n"
3028 		       "============\n"
3029 		       "freetid = %d\n"
3030 		       "freewait = %s\n"
3031 		       "freelock = %d\n"
3032 		       "freelockwait = %s\n"
3033 		       "lowlockwait = %s\n"
3034 		       "tlocksInUse = %d\n"
3035 		       "jfs_tlocks_low = %d\n"
3036 		       "unlock_queue is %sempty\n",
3037 		       TxAnchor.freetid,
3038 		       freewait,
3039 		       TxAnchor.freelock,
3040 		       freelockwait,
3041 		       lowlockwait,
3042 		       TxAnchor.tlocksInUse,
3043 		       jfs_tlocks_low,
3044 		       list_empty(&TxAnchor.unlock_queue) ? "" : "not ");
3045 	return 0;
3046 }
3047 
3048 static int jfs_txanchor_proc_open(struct inode *inode, struct file *file)
3049 {
3050 	return single_open(file, jfs_txanchor_proc_show, NULL);
3051 }
3052 
3053 const struct file_operations jfs_txanchor_proc_fops = {
3054 	.owner		= THIS_MODULE,
3055 	.open		= jfs_txanchor_proc_open,
3056 	.read		= seq_read,
3057 	.llseek		= seq_lseek,
3058 	.release	= single_release,
3059 };
3060 #endif
3061 
3062 #if defined(CONFIG_PROC_FS) && defined(CONFIG_JFS_STATISTICS)
3063 static int jfs_txstats_proc_show(struct seq_file *m, void *v)
3064 {
3065 	seq_printf(m,
3066 		       "JFS TxStats\n"
3067 		       "===========\n"
3068 		       "calls to txBegin = %d\n"
3069 		       "txBegin blocked by sync barrier = %d\n"
3070 		       "txBegin blocked by tlocks low = %d\n"
3071 		       "txBegin blocked by no free tid = %d\n"
3072 		       "calls to txBeginAnon = %d\n"
3073 		       "txBeginAnon blocked by sync barrier = %d\n"
3074 		       "txBeginAnon blocked by tlocks low = %d\n"
3075 		       "calls to txLockAlloc = %d\n"
3076 		       "tLockAlloc blocked by no free lock = %d\n",
3077 		       TxStat.txBegin,
3078 		       TxStat.txBegin_barrier,
3079 		       TxStat.txBegin_lockslow,
3080 		       TxStat.txBegin_freetid,
3081 		       TxStat.txBeginAnon,
3082 		       TxStat.txBeginAnon_barrier,
3083 		       TxStat.txBeginAnon_lockslow,
3084 		       TxStat.txLockAlloc,
3085 		       TxStat.txLockAlloc_freelock);
3086 	return 0;
3087 }
3088 
3089 static int jfs_txstats_proc_open(struct inode *inode, struct file *file)
3090 {
3091 	return single_open(file, jfs_txstats_proc_show, NULL);
3092 }
3093 
3094 const struct file_operations jfs_txstats_proc_fops = {
3095 	.owner		= THIS_MODULE,
3096 	.open		= jfs_txstats_proc_open,
3097 	.read		= seq_read,
3098 	.llseek		= seq_lseek,
3099 	.release	= single_release,
3100 };
3101 #endif
3102