Showing error 911

User: Jiri Slaby
Error type: Double Lock
Error type description: Some lock is locked twice unintentionally in a sequence
File location: fs/jfs/jfs_txnmgr.c
Line in file: 486
Project: Linux Kernel
Project version: 2.6.28
Tools: Undetermined 1
Clang Static Analyzer (3.0)
Smatch (1.59)
Entered: 2012-02-27 21:22:42 UTC


Source:

   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 */
  66static 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
  81int jfs_tlocks_low;                /* Indicates low number of available tlocks */
  82
  83#ifdef CONFIG_JFS_STATISTICS
  84static 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
  97static int nTxBlock = -1;        /* number of transaction blocks */
  98module_param(nTxBlock, int, 0);
  99MODULE_PARM_DESC(nTxBlock,
 100                 "Number of transaction blocks (max:65536)");
 101
 102static int nTxLock = -1;        /* number of transaction locks */
 103module_param(nTxLock, int, 0);
 104MODULE_PARM_DESC(nTxLock,
 105                 "Number of transaction locks (max:65536)");
 106
 107struct tblock *TxBlock;        /* transaction block table */
 108static int TxLockLWM;        /* Low water mark for number of txLocks used */
 109static int TxLockHWM;        /* High water mark for number of txLocks used */
 110static int TxLockVHWM;        /* Very High water mark */
 111struct tlock *TxLock;        /* transaction lock table */
 112
 113/*
 114 *        transaction management lock
 115 */
 116static 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
 125static DECLARE_WAIT_QUEUE_HEAD(jfs_commit_thread_wait);
 126static int jfs_commit_thread_waking;
 127
 128/*
 129 * Retry logic exist outside these macros to protect from spurrious wakeups.
 130 */
 131static 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 */
 154static 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 */
 165static int diLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
 166                struct tlock * tlck, struct commit * cd);
 167static int dataLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
 168                struct tlock * tlck);
 169static void dtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
 170                struct tlock * tlck);
 171static void mapLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
 172                struct tlock * tlck);
 173static void txAllocPMap(struct inode *ip, struct maplock * maplock,
 174                struct tblock * tblk);
 175static void txForce(struct tblock * tblk);
 176static int txLog(struct jfs_log * log, struct tblock * tblk,
 177                struct commit * cd);
 178static void txUpdateMap(struct tblock * tblk);
 179static void txRelease(struct tblock * tblk);
 180static void xtLog(struct jfs_log * log, struct tblock * tblk, struct lrd * lrd,
 181           struct tlock * tlck);
 182static 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 */
 194static 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
 216static 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 */
 239int 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 */
 341void 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 */
 362tid_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 */
 461void 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 */
 501void 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();
 573wakeup:
 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 */
 591struct 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 */
 877static 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 */
 909static 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 */
 996struct 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 */
1069struct 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 */
1136int 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 */
1383static 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 */
1440static 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 */
1553static 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 */
1599static 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 */
1702static 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 */
2088static 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 */
2175void 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 */
2227static 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 */
2295static 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 */
2441static 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 */
2499void 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 */
2598void 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 */
2644void 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 */
2701static 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 */
2749int 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
2824void 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
2843static 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 */
2862void 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();
2872restart:
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 */
2919void 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 */
2934int 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)
3013static 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
3048static int jfs_txanchor_proc_open(struct inode *inode, struct file *file)
3049{
3050        return single_open(file, jfs_txanchor_proc_show, NULL);
3051}
3052
3053const 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)
3063static 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
3089static int jfs_txstats_proc_open(struct inode *inode, struct file *file)
3090{
3091        return single_open(file, jfs_txstats_proc_show, NULL);
3092}
3093
3094const 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