/*
 * Copyright 2000 by Hans Reiser, licensing governed by reiserfs/README
 *
 * Trivial changes by Alan Cox to add the LFS fixes
 *
 * Trivial Changes:
 * Rights granted to Hans Reiser to redistribute under other terms providing
 * he accepts all liability including but not limited to patent, fitness
 * for purpose, and direct or indirect claims arising from failure to perform.
 *
 * NO WARRANTY
 */

#include <linux/module.h>
#include <linux/slab.h>
#include <linux/vmalloc.h>
#include <linux/time.h>
#include <linux/uaccess.h>
#include "reiserfs.h"
#include "acl.h"
#include "xattr.h"
#include <linux/init.h>
#include <linux/blkdev.h>
#include <linux/backing-dev.h>
#include <linux/buffer_head.h>
#include <linux/exportfs.h>
#include <linux/quotaops.h>
#include <linux/vfs.h>
#include <linux/mount.h>
#include <linux/namei.h>
#include <linux/crc32.h>
#include <linux/seq_file.h>

struct file_system_type reiserfs_fs_type;

static const char reiserfs_3_5_magic_string[] = REISERFS_SUPER_MAGIC_STRING;
static const char reiserfs_3_6_magic_string[] = REISER2FS_SUPER_MAGIC_STRING;
static const char reiserfs_jr_magic_string[] = REISER2FS_JR_SUPER_MAGIC_STRING;

int is_reiserfs_3_5(struct reiserfs_super_block *rs)
{
        return !strncmp(rs->s_v1.s_magic, reiserfs_3_5_magic_string,
                        strlen(reiserfs_3_5_magic_string));
}

int is_reiserfs_3_6(struct reiserfs_super_block *rs)
{
        return !strncmp(rs->s_v1.s_magic, reiserfs_3_6_magic_string,
                        strlen(reiserfs_3_6_magic_string));
}

int is_reiserfs_jr(struct reiserfs_super_block *rs)
{
        return !strncmp(rs->s_v1.s_magic, reiserfs_jr_magic_string,
                        strlen(reiserfs_jr_magic_string));
}

static int is_any_reiserfs_magic_string(struct reiserfs_super_block *rs)
{
        return (is_reiserfs_3_5(rs) || is_reiserfs_3_6(rs) ||
                is_reiserfs_jr(rs));
}

static int reiserfs_remount(struct super_block *s, int *flags, char *data);
static int reiserfs_statfs(struct dentry *dentry, struct kstatfs *buf);

static int reiserfs_sync_fs(struct super_block *s, int wait)
{
        struct reiserfs_transaction_handle th;

        /*
         * Writeback quota in non-journalled quota case - journalled quota has
         * no dirty dquots
         */
        dquot_writeback_dquots(s, -1);
        reiserfs_write_lock(s);
        if (!journal_begin(&th, s, 1))
                if (!journal_end_sync(&th))
                        reiserfs_flush_old_commits(s);
        reiserfs_write_unlock(s);
        return 0;
}

static void flush_old_commits(struct work_struct *work)
{
        struct reiserfs_sb_info *sbi;
        struct super_block *s;

        sbi = container_of(work, struct reiserfs_sb_info, old_work.work);
        s = sbi->s_journal->j_work_sb;

        /*
         * We need s_umount for protecting quota writeback. We have to use
         * trylock as reiserfs_cancel_old_flush() may be waiting for this work
         * to complete with s_umount held.
         */
        if (!down_read_trylock(&s->s_umount)) {
                /* Requeue work if we are not cancelling it */
                spin_lock(&sbi->old_work_lock);
                if (sbi->work_queued == 1)
                        queue_delayed_work(system_long_wq, &sbi->old_work, HZ);
                spin_unlock(&sbi->old_work_lock);
                return;
        }
        spin_lock(&sbi->old_work_lock);
        /* Avoid clobbering the cancel state... */
        if (sbi->work_queued == 1)
                sbi->work_queued = 0;
        spin_unlock(&sbi->old_work_lock);

        reiserfs_sync_fs(s, 1);
        up_read(&s->s_umount);
}

void reiserfs_schedule_old_flush(struct super_block *s)
{
        struct reiserfs_sb_info *sbi = REISERFS_SB(s);
        unsigned long delay;

        /*
         * Avoid scheduling flush when sb is being shut down. It can race
         * with journal shutdown and free still queued delayed work.
         */
        if (sb_rdonly(s) || !(s->s_flags & SB_ACTIVE))
                return;

        spin_lock(&sbi->old_work_lock);
        if (!sbi->work_queued) {
                delay = msecs_to_jiffies(dirty_writeback_interval * 10);
                queue_delayed_work(system_long_wq, &sbi->old_work, delay);
                sbi->work_queued = 1;
        }
        spin_unlock(&sbi->old_work_lock);
}

void reiserfs_cancel_old_flush(struct super_block *s)
{
        struct reiserfs_sb_info *sbi = REISERFS_SB(s);

        spin_lock(&sbi->old_work_lock);
        /* Make sure no new flushes will be queued */
        sbi->work_queued = 2;
        spin_unlock(&sbi->old_work_lock);
        cancel_delayed_work_sync(&REISERFS_SB(s)->old_work);
}

static int reiserfs_freeze(struct super_block *s)
{
        struct reiserfs_transaction_handle th;

        reiserfs_cancel_old_flush(s);

        reiserfs_write_lock(s);
        if (!sb_rdonly(s)) {
                int err = journal_begin(&th, s, 1);
                if (err) {
                        reiserfs_block_writes(&th);
                } else {
                        reiserfs_prepare_for_journal(s, SB_BUFFER_WITH_SB(s),
                                                     1);
                        journal_mark_dirty(&th, SB_BUFFER_WITH_SB(s));
                        reiserfs_block_writes(&th);
                        journal_end_sync(&th);
                }
        }
        reiserfs_write_unlock(s);
        return 0;
}

static int reiserfs_unfreeze(struct super_block *s)
{
        struct reiserfs_sb_info *sbi = REISERFS_SB(s);

        reiserfs_allow_writes(s);
        spin_lock(&sbi->old_work_lock);
        /* Allow old_work to run again */
        sbi->work_queued = 0;
        spin_unlock(&sbi->old_work_lock);
        return 0;
}

extern const struct in_core_key MAX_IN_CORE_KEY;

/*
 * this is used to delete "save link" when there are no items of a
 * file it points to. It can either happen if unlink is completed but
 * "save unlink" removal, or if file has both unlink and truncate
 * pending and as unlink completes first (because key of "save link"
 * protecting unlink is bigger that a key lf "save link" which
 * protects truncate), so there left no items to make truncate
 * completion on
 */
static int remove_save_link_only(struct super_block *s,
                                 struct reiserfs_key *key, int oid_free)
{
        struct reiserfs_transaction_handle th;
        int err;

        /* we are going to do one balancing */
        err = journal_begin(&th, s, JOURNAL_PER_BALANCE_CNT);
        if (err)
                return err;

        reiserfs_delete_solid_item(&th, NULL, key);
        if (oid_free)
                /* removals are protected by direct items */
                reiserfs_release_objectid(&th, le32_to_cpu(key->k_objectid));

        return journal_end(&th);
}

#ifdef CONFIG_QUOTA
static int reiserfs_quota_on_mount(struct super_block *, int);
#endif

/*
 * Look for uncompleted unlinks and truncates and complete them
 *
 * Called with superblock write locked.  If quotas are enabled, we have to
 * release/retake lest we call dquot_quota_on_mount(), proceed to
 * schedule_on_each_cpu() in invalidate_bdev() and deadlock waiting for the per
 * cpu worklets to complete flush_async_commits() that in turn wait for the
 * superblock write lock.
 */
static int finish_unfinished(struct super_block *s)
{
        INITIALIZE_PATH(path);
        struct cpu_key max_cpu_key, obj_key;
        struct reiserfs_key save_link_key, last_inode_key;
        int retval = 0;
        struct item_head *ih;
        struct buffer_head *bh;
        int item_pos;
        char *item;
        int done;
        struct inode *inode;
        int truncate;
#ifdef CONFIG_QUOTA
        int i;
        int ms_active_set;
        int quota_enabled[REISERFS_MAXQUOTAS];
#endif

        /* compose key to look for "save" links */
        max_cpu_key.version = KEY_FORMAT_3_5;
        max_cpu_key.on_disk_key.k_dir_id = ~0U;
        max_cpu_key.on_disk_key.k_objectid = ~0U;
        set_cpu_key_k_offset(&max_cpu_key, ~0U);
        max_cpu_key.key_length = 3;

        memset(&last_inode_key, 0, sizeof(last_inode_key));

#ifdef CONFIG_QUOTA
        /* Needed for iput() to work correctly and not trash data */
        if (s->s_flags & SB_ACTIVE) {
                ms_active_set = 0;
        } else {
                ms_active_set = 1;
                s->s_flags |= SB_ACTIVE;
        }
        /* Turn on quotas so that they are updated correctly */
        for (i = 0; i < REISERFS_MAXQUOTAS; i++) {
                quota_enabled[i] = 1;
                if (REISERFS_SB(s)->s_qf_names[i]) {
                        int ret;

                        if (sb_has_quota_active(s, i)) {
                                quota_enabled[i] = 0;
                                continue;
                        }
                        reiserfs_write_unlock(s);
                        ret = reiserfs_quota_on_mount(s, i);
                        reiserfs_write_lock(s);
                        if (ret < 0)
                                reiserfs_warning(s, "reiserfs-2500",
                                                 "cannot turn on journaled "
                                                 "quota: error %d", ret);
                }
        }
#endif

        done = 0;
        REISERFS_SB(s)->s_is_unlinked_ok = 1;
        while (!retval) {
                int depth;
                retval = search_item(s, &max_cpu_key, &path);
                if (retval != ITEM_NOT_FOUND) {
                        reiserfs_error(s, "vs-2140",
                                       "search_by_key returned %d", retval);
                        break;
                }

                bh = get_last_bh(&path);
                item_pos = get_item_pos(&path);
                if (item_pos != B_NR_ITEMS(bh)) {
                        reiserfs_warning(s, "vs-2060",
                                         "wrong position found");
                        break;
                }
                item_pos--;
                ih = item_head(bh, item_pos);

                if (le32_to_cpu(ih->ih_key.k_dir_id) != MAX_KEY_OBJECTID)
                        /* there are no "save" links anymore */
                        break;

                save_link_key = ih->ih_key;
                if (is_indirect_le_ih(ih))
                        truncate = 1;
                else
                        truncate = 0;

                /* reiserfs_iget needs k_dirid and k_objectid only */
                item = ih_item_body(bh, ih);
                obj_key.on_disk_key.k_dir_id = le32_to_cpu(*(__le32 *) item);
                obj_key.on_disk_key.k_objectid =
                    le32_to_cpu(ih->ih_key.k_objectid);
                obj_key.on_disk_key.k_offset = 0;
                obj_key.on_disk_key.k_type = 0;

                pathrelse(&path);

                inode = reiserfs_iget(s, &obj_key);
                if (IS_ERR_OR_NULL(inode)) {
                        /*
                         * the unlink almost completed, it just did not
                         * manage to remove "save" link and release objectid
                         */
                        reiserfs_warning(s, "vs-2180", "iget failed for %K",
                                         &obj_key);
                        retval = remove_save_link_only(s, &save_link_key, 1);
                        continue;
                }

                if (!truncate && inode->i_nlink) {
                        /* file is not unlinked */
                        reiserfs_warning(s, "vs-2185",
                                         "file %K is not unlinked",
                                         &obj_key);
                        retval = remove_save_link_only(s, &save_link_key, 0);
                        continue;
                }
                depth = reiserfs_write_unlock_nested(inode->i_sb);
                dquot_initialize(inode);
                reiserfs_write_lock_nested(inode->i_sb, depth);

                if (truncate && S_ISDIR(inode->i_mode)) {
                        /*
                         * We got a truncate request for a dir which
                         * is impossible.  The only imaginable way is to
                         * execute unfinished truncate request then boot
                         * into old kernel, remove the file and create dir
                         * with the same key.
                         */
                        reiserfs_warning(s, "green-2101",
                                         "impossible truncate on a "
                                         "directory %k. Please report",
                                         INODE_PKEY(inode));
                        retval = remove_save_link_only(s, &save_link_key, 0);
                        truncate = 0;
                        iput(inode);
                        continue;
                }

                if (truncate) {
                        REISERFS_I(inode)->i_flags |=
                            i_link_saved_truncate_mask;
                        /*
                         * not completed truncate found. New size was
                         * committed together with "save" link
                         */
                        reiserfs_info(s, "Truncating %k to %lld ..",
                                      INODE_PKEY(inode), inode->i_size);

                        /* don't update modification time */
                        reiserfs_truncate_file(inode, 0);

                        retval = remove_save_link(inode, truncate);
                } else {
                        REISERFS_I(inode)->i_flags |= i_link_saved_unlink_mask;
                        /* not completed unlink (rmdir) found */
                        reiserfs_info(s, "Removing %k..", INODE_PKEY(inode));
                        if (memcmp(&last_inode_key, INODE_PKEY(inode),
                                        sizeof(last_inode_key))){
                                last_inode_key = *INODE_PKEY(inode);
                                /* removal gets completed in iput */
                                retval = 0;
                        } else {
                                reiserfs_warning(s, "super-2189", "Dead loop "
                                                 "in finish_unfinished "
                                                 "detected, just remove "
                                                 "save link\n");
                                retval = remove_save_link_only(s,
                                                        &save_link_key, 0);
                        }
                }

                iput(inode);
                printk("done\n");
                done++;
        }
        REISERFS_SB(s)->s_is_unlinked_ok = 0;

#ifdef CONFIG_QUOTA
        /* Turn quotas off */
        reiserfs_write_unlock(s);
        for (i = 0; i < REISERFS_MAXQUOTAS; i++) {
                if (sb_dqopt(s)->files[i] && quota_enabled[i])
                        dquot_quota_off(s, i);
        }
        reiserfs_write_lock(s);
        if (ms_active_set)
                /* Restore the flag back */
                s->s_flags &= ~SB_ACTIVE;
#endif
        pathrelse(&path);
        if (done)
                reiserfs_info(s, "There were %d uncompleted unlinks/truncates. "
                              "Completed\n", done);
        return retval;
}

/*
 * to protect file being unlinked from getting lost we "safe" link files
 * being unlinked. This link will be deleted in the same transaction with last
 * item of file. mounting the filesystem we scan all these links and remove
 * files which almost got lost
 */
void add_save_link(struct reiserfs_transaction_handle *th,
                   struct inode *inode, int truncate)
{
        INITIALIZE_PATH(path);
        int retval;
        struct cpu_key key;
        struct item_head ih;
        __le32 link;

        BUG_ON(!th->t_trans_id);

        /* file can only get one "save link" of each kind */
        RFALSE(truncate &&
               (REISERFS_I(inode)->i_flags & i_link_saved_truncate_mask),
               "saved link already exists for truncated inode %lx",
               (long)inode->i_ino);
        RFALSE(!truncate &&
               (REISERFS_I(inode)->i_flags & i_link_saved_unlink_mask),
               "saved link already exists for unlinked inode %lx",
               (long)inode->i_ino);

        /* setup key of "save" link */
        key.version = KEY_FORMAT_3_5;
        key.on_disk_key.k_dir_id = MAX_KEY_OBJECTID;
        key.on_disk_key.k_objectid = inode->i_ino;
        if (!truncate) {
                /* unlink, rmdir, rename */
                set_cpu_key_k_offset(&key, 1 + inode->i_sb->s_blocksize);
                set_cpu_key_k_type(&key, TYPE_DIRECT);

                /* item head of "safe" link */
                make_le_item_head(&ih, &key, key.version,
                                  1 + inode->i_sb->s_blocksize, TYPE_DIRECT,
                                  4 /*length */ , 0xffff /*free space */ );
        } else {
                /* truncate */
                if (S_ISDIR(inode->i_mode))
                        reiserfs_warning(inode->i_sb, "green-2102",
                                         "Adding a truncate savelink for "
                                         "a directory %k! Please report",
                                         INODE_PKEY(inode));
                set_cpu_key_k_offset(&key, 1);
                set_cpu_key_k_type(&key, TYPE_INDIRECT);

                /* item head of "safe" link */
                make_le_item_head(&ih, &key, key.version, 1, TYPE_INDIRECT,
                                  4 /*length */ , 0 /*free space */ );
        }
        key.key_length = 3;

        /* look for its place in the tree */
        retval = search_item(inode->i_sb, &key, &path);
        if (retval != ITEM_NOT_FOUND) {
                if (retval != -ENOSPC)
                        reiserfs_error(inode->i_sb, "vs-2100",
                                       "search_by_key (%K) returned %d", &key,
                                       retval);
                pathrelse(&path);
                return;
        }

        /* body of "save" link */
        link = INODE_PKEY(inode)->k_dir_id;

        /* put "save" link into tree, don't charge quota to anyone */
        retval =
            reiserfs_insert_item(th, &path, &key, &ih, NULL, (char *)&link);
        if (retval) {
                if (retval != -ENOSPC)
                        reiserfs_error(inode->i_sb, "vs-2120",
                                       "insert_item returned %d", retval);
        } else {
                if (truncate)
                        REISERFS_I(inode)->i_flags |=
                            i_link_saved_truncate_mask;
                else
                        REISERFS_I(inode)->i_flags |= i_link_saved_unlink_mask;
        }
}

/* this opens transaction unlike add_save_link */
int remove_save_link(struct inode *inode, int truncate)
{
        struct reiserfs_transaction_handle th;
        struct reiserfs_key key;
        int err;

        /* we are going to do one balancing only */
        err = journal_begin(&th, inode->i_sb, JOURNAL_PER_BALANCE_CNT);
        if (err)
                return err;

        /* setup key of "save" link */
        key.k_dir_id = cpu_to_le32(MAX_KEY_OBJECTID);
        key.k_objectid = INODE_PKEY(inode)->k_objectid;
        if (!truncate) {
                /* unlink, rmdir, rename */
                set_le_key_k_offset(KEY_FORMAT_3_5, &key,
                                    1 + inode->i_sb->s_blocksize);
                set_le_key_k_type(KEY_FORMAT_3_5, &key, TYPE_DIRECT);
        } else {
                /* truncate */
                set_le_key_k_offset(KEY_FORMAT_3_5, &key, 1);
                set_le_key_k_type(KEY_FORMAT_3_5, &key, TYPE_INDIRECT);
        }

        if ((truncate &&
             (REISERFS_I(inode)->i_flags & i_link_saved_truncate_mask)) ||
            (!truncate &&
             (REISERFS_I(inode)->i_flags & i_link_saved_unlink_mask)))
                /* don't take quota bytes from anywhere */
                reiserfs_delete_solid_item(&th, NULL, &key);
        if (!truncate) {
                reiserfs_release_objectid(&th, inode->i_ino);
                REISERFS_I(inode)->i_flags &= ~i_link_saved_unlink_mask;
        } else
                REISERFS_I(inode)->i_flags &= ~i_link_saved_truncate_mask;

        return journal_end(&th);
}

static void reiserfs_kill_sb(struct super_block *s)
{
        if (REISERFS_SB(s)) {
                reiserfs_proc_info_done(s);
                /*
                 * Force any pending inode evictions to occur now. Any
                 * inodes to be removed that have extended attributes
                 * associated with them need to clean them up before
                 * we can release the extended attribute root dentries.
                 * shrink_dcache_for_umount will BUG if we don't release
                 * those before it's called so ->put_super is too late.
                 */
                shrink_dcache_sb(s);

                dput(REISERFS_SB(s)->xattr_root);
                REISERFS_SB(s)->xattr_root = NULL;
                dput(REISERFS_SB(s)->priv_root);
                REISERFS_SB(s)->priv_root = NULL;
        }

        kill_block_super(s);
}

#ifdef CONFIG_QUOTA
static int reiserfs_quota_off(struct super_block *sb, int type);

static void reiserfs_quota_off_umount(struct super_block *s)
{
        int type;

        for (type = 0; type < REISERFS_MAXQUOTAS; type++)
                reiserfs_quota_off(s, type);
}
#else
static inline void reiserfs_quota_off_umount(struct super_block *s)
{
}
#endif

static void reiserfs_put_super(struct super_block *s)
{
        struct reiserfs_transaction_handle th;
        th.t_trans_id = 0;

        reiserfs_quota_off_umount(s);

        reiserfs_write_lock(s);

        /*
         * change file system state to current state if it was mounted
         * with read-write permissions
         */
        if (!sb_rdonly(s)) {
                if (!journal_begin(&th, s, 10)) {
                        reiserfs_prepare_for_journal(s, SB_BUFFER_WITH_SB(s),
                                                     1);
                        set_sb_umount_state(SB_DISK_SUPER_BLOCK(s),
                                            REISERFS_SB(s)->s_mount_state);
                        journal_mark_dirty(&th, SB_BUFFER_WITH_SB(s));
                }
        }

        /*
         * note, journal_release checks for readonly mount, and can
         * decide not to do a journal_end
         */
        journal_release(&th, s);

        reiserfs_free_bitmap_cache(s);

        brelse(SB_BUFFER_WITH_SB(s));

        print_statistics(s);

        if (REISERFS_SB(s)->reserved_blocks != 0) {
                reiserfs_warning(s, "green-2005", "reserved blocks left %d",
                                 REISERFS_SB(s)->reserved_blocks);
        }

        reiserfs_write_unlock(s);
        mutex_destroy(&REISERFS_SB(s)->lock);
        destroy_workqueue(REISERFS_SB(s)->commit_wq);
        kfree(REISERFS_SB(s)->s_jdev);
        kfree(s->s_fs_info);
        s->s_fs_info = NULL;
}

static struct kmem_cache *reiserfs_inode_cachep;

static struct inode *reiserfs_alloc_inode(struct super_block *sb)
{
        struct reiserfs_inode_info *ei;
        ei = kmem_cache_alloc(reiserfs_inode_cachep, GFP_KERNEL);
        if (!ei)
                return NULL;
        atomic_set(&ei->openers, 0);
        mutex_init(&ei->tailpack);
#ifdef CONFIG_QUOTA
        memset(&ei->i_dquot, 0, sizeof(ei->i_dquot));
#endif

        return &ei->vfs_inode;
}

static void reiserfs_free_inode(struct inode *inode)
{
        kmem_cache_free(reiserfs_inode_cachep, REISERFS_I(inode));
}

static void init_once(void *foo)
{
        struct reiserfs_inode_info *ei = (struct reiserfs_inode_info *)foo;

        INIT_LIST_HEAD(&ei->i_prealloc_list);
        inode_init_once(&ei->vfs_inode);
}

static int __init init_inodecache(void)
{
        reiserfs_inode_cachep = kmem_cache_create("reiser_inode_cache",
                                                  sizeof(struct
                                                         reiserfs_inode_info),
                                                  0, (SLAB_RECLAIM_ACCOUNT|
                                                      SLAB_MEM_SPREAD|
                                                      SLAB_ACCOUNT),
                                                  init_once);
        if (reiserfs_inode_cachep == NULL)
                return -ENOMEM;
        return 0;
}

static void destroy_inodecache(void)
{
        /*
         * Make sure all delayed rcu free inodes are flushed before we
         * destroy cache.
         */
        rcu_barrier();
        kmem_cache_destroy(reiserfs_inode_cachep);
}

/* we don't mark inodes dirty, we just log them */
static void reiserfs_dirty_inode(struct inode *inode, int flags)
{
        struct reiserfs_transaction_handle th;

        int err = 0;

        if (sb_rdonly(inode->i_sb)) {
                reiserfs_warning(inode->i_sb, "clm-6006",
                                 "writing inode %lu on readonly FS",
                                 inode->i_ino);
                return;
        }
        reiserfs_write_lock(inode->i_sb);

        /*
         * this is really only used for atime updates, so they don't have
         * to be included in O_SYNC or fsync
         */
        err = journal_begin(&th, inode->i_sb, 1);
        if (err)
                goto out;

        reiserfs_update_sd(&th, inode);
        journal_end(&th);

out:
        reiserfs_write_unlock(inode->i_sb);
}

static int reiserfs_show_options(struct seq_file *seq, struct dentry *root)
{
        struct super_block *s = root->d_sb;
        struct reiserfs_journal *journal = SB_JOURNAL(s);
        long opts = REISERFS_SB(s)->s_mount_opt;

        if (opts & (1 << REISERFS_LARGETAIL))
                seq_puts(seq, ",tails=on");
        else if (!(opts & (1 << REISERFS_SMALLTAIL)))
                seq_puts(seq, ",notail");
        /* tails=small is default so we don't show it */

        if (!(opts & (1 << REISERFS_BARRIER_FLUSH)))
                seq_puts(seq, ",barrier=none");
        /* barrier=flush is default so we don't show it */

        if (opts & (1 << REISERFS_ERROR_CONTINUE))
                seq_puts(seq, ",errors=continue");
        else if (opts & (1 << REISERFS_ERROR_PANIC))
                seq_puts(seq, ",errors=panic");
        /* errors=ro is default so we don't show it */

        if (opts & (1 << REISERFS_DATA_LOG))
                seq_puts(seq, ",data=journal");
        else if (opts & (1 << REISERFS_DATA_WRITEBACK))
                seq_puts(seq, ",data=writeback");
        /* data=ordered is default so we don't show it */

        if (opts & (1 << REISERFS_ATTRS))
                seq_puts(seq, ",attrs");

        if (opts & (1 << REISERFS_XATTRS_USER))
                seq_puts(seq, ",user_xattr");

        if (opts & (1 << REISERFS_EXPOSE_PRIVROOT))
                seq_puts(seq, ",expose_privroot");

        if (opts & (1 << REISERFS_POSIXACL))
                seq_puts(seq, ",acl");

        if (REISERFS_SB(s)->s_jdev)
                seq_show_option(seq, "jdev", REISERFS_SB(s)->s_jdev);

        if (journal->j_max_commit_age != journal->j_default_max_commit_age)
                seq_printf(seq, ",commit=%d", journal->j_max_commit_age);

#ifdef CONFIG_QUOTA
        if (REISERFS_SB(s)->s_qf_names[USRQUOTA])
                seq_show_option(seq, "usrjquota",
                                REISERFS_SB(s)->s_qf_names[USRQUOTA]);
        else if (opts & (1 << REISERFS_USRQUOTA))
                seq_puts(seq, ",usrquota");
        if (REISERFS_SB(s)->s_qf_names[GRPQUOTA])
                seq_show_option(seq, "grpjquota",
                                REISERFS_SB(s)->s_qf_names[GRPQUOTA]);
        else if (opts & (1 << REISERFS_GRPQUOTA))
                seq_puts(seq, ",grpquota");
        if (REISERFS_SB(s)->s_jquota_fmt) {
                if (REISERFS_SB(s)->s_jquota_fmt == QFMT_VFS_OLD)
                        seq_puts(seq, ",jqfmt=vfsold");
                else if (REISERFS_SB(s)->s_jquota_fmt == QFMT_VFS_V0)
                        seq_puts(seq, ",jqfmt=vfsv0");
        }
#endif

        /* Block allocator options */
        if (opts & (1 << REISERFS_NO_BORDER))
                seq_puts(seq, ",block-allocator=noborder");
        if (opts & (1 << REISERFS_NO_UNHASHED_RELOCATION))
                seq_puts(seq, ",block-allocator=no_unhashed_relocation");
        if (opts & (1 << REISERFS_HASHED_RELOCATION))
                seq_puts(seq, ",block-allocator=hashed_relocation");
        if (opts & (1 << REISERFS_TEST4))
                seq_puts(seq, ",block-allocator=test4");
        show_alloc_options(seq, s);
        return 0;
}

#ifdef CONFIG_QUOTA
static ssize_t reiserfs_quota_write(struct super_block *, int, const char *,
                                    size_t, loff_t);
static ssize_t reiserfs_quota_read(struct super_block *, int, char *, size_t,
                                   loff_t);

static struct dquot **reiserfs_get_dquots(struct inode *inode)
{
        return REISERFS_I(inode)->i_dquot;
}
#endif

static const struct super_operations reiserfs_sops = {
        .alloc_inode = reiserfs_alloc_inode,
        .free_inode = reiserfs_free_inode,
        .write_inode = reiserfs_write_inode,
        .dirty_inode = reiserfs_dirty_inode,
        .evict_inode = reiserfs_evict_inode,
        .put_super = reiserfs_put_super,
        .sync_fs = reiserfs_sync_fs,
        .freeze_fs = reiserfs_freeze,
        .unfreeze_fs = reiserfs_unfreeze,
        .statfs = reiserfs_statfs,
        .remount_fs = reiserfs_remount,
        .show_options = reiserfs_show_options,
#ifdef CONFIG_QUOTA
        .quota_read = reiserfs_quota_read,
        .quota_write = reiserfs_quota_write,
        .get_dquots = reiserfs_get_dquots,
#endif
};

#ifdef CONFIG_QUOTA
#define QTYPE2NAME(t) ((t)==USRQUOTA?"user":"group")

static int reiserfs_write_dquot(struct dquot *);
static int reiserfs_acquire_dquot(struct dquot *);
static int reiserfs_release_dquot(struct dquot *);
static int reiserfs_mark_dquot_dirty(struct dquot *);
static int reiserfs_write_info(struct super_block *, int);
static int reiserfs_quota_on(struct super_block *, int, int, const struct path *);

static const struct dquot_operations reiserfs_quota_operations = {
        .write_dquot = reiserfs_write_dquot,
        .acquire_dquot = reiserfs_acquire_dquot,
        .release_dquot = reiserfs_release_dquot,
        .mark_dirty = reiserfs_mark_dquot_dirty,
        .write_info = reiserfs_write_info,
        .alloc_dquot    = dquot_alloc,
        .destroy_dquot  = dquot_destroy,
        .get_next_id    = dquot_get_next_id,
};

static const struct quotactl_ops reiserfs_qctl_operations = {
        .quota_on = reiserfs_quota_on,
        .quota_off = reiserfs_quota_off,
        .quota_sync = dquot_quota_sync,
        .get_state = dquot_get_state,
        .set_info = dquot_set_dqinfo,
        .get_dqblk = dquot_get_dqblk,
        .set_dqblk = dquot_set_dqblk,
};
#endif

static const struct export_operations reiserfs_export_ops = {
        .encode_fh = reiserfs_encode_fh,
        .fh_to_dentry = reiserfs_fh_to_dentry,
        .fh_to_parent = reiserfs_fh_to_parent,
        .get_parent = reiserfs_get_parent,
};

/*
 * this struct is used in reiserfs_getopt () for containing the value for
 * those mount options that have values rather than being toggles.
 */
typedef struct {
        char *value;
        /*
         * bitmask which is to set on mount_options bitmask
         * when this value is found, 0 is no bits are to be changed.
         */
        int setmask;
        /*
         * bitmask which is to clear on mount_options bitmask
         * when this value is found, 0 is no bits are to be changed.
         * This is applied BEFORE setmask
         */
        int clrmask;
} arg_desc_t;

/* Set this bit in arg_required to allow empty arguments */
#define REISERFS_OPT_ALLOWEMPTY 31

/*
 * this struct is used in reiserfs_getopt() for describing the
 * set of reiserfs mount options
 */
typedef struct {
        char *option_name;

        /* 0 if argument is not required, not 0 otherwise */
        int arg_required;

        /* list of values accepted by an option */
        const arg_desc_t *values;

        /*
         * bitmask which is to set on mount_options bitmask
         * when this value is found, 0 is no bits are to be changed.
         */
        int setmask;

        /*
         * bitmask which is to clear on mount_options bitmask
         * when this value is found, 0 is no bits are to be changed.
         * This is applied BEFORE setmask
         */
        int clrmask;
} opt_desc_t;

/* possible values for -o data= */
static const arg_desc_t logging_mode[] = {
        {"ordered", 1 << REISERFS_DATA_ORDERED,
         (1 << REISERFS_DATA_LOG | 1 << REISERFS_DATA_WRITEBACK)},
        {"journal", 1 << REISERFS_DATA_LOG,
         (1 << REISERFS_DATA_ORDERED | 1 << REISERFS_DATA_WRITEBACK)},
        {"writeback", 1 << REISERFS_DATA_WRITEBACK,
         (1 << REISERFS_DATA_ORDERED | 1 << REISERFS_DATA_LOG)},
        {.value = NULL}
};

/* possible values for -o barrier= */
static const arg_desc_t barrier_mode[] = {
        {"none", 1 << REISERFS_BARRIER_NONE, 1 << REISERFS_BARRIER_FLUSH},
        {"flush", 1 << REISERFS_BARRIER_FLUSH, 1 << REISERFS_BARRIER_NONE},
        {.value = NULL}
};

/*
 * possible values for "-o block-allocator=" and bits which are to be set in
 * s_mount_opt of reiserfs specific part of in-core super block
 */
static const arg_desc_t balloc[] = {
        {"noborder", 1 << REISERFS_NO_BORDER, 0},
        {"border", 0, 1 << REISERFS_NO_BORDER},
        {"no_unhashed_relocation", 1 << REISERFS_NO_UNHASHED_RELOCATION, 0},
        {"hashed_relocation", 1 << REISERFS_HASHED_RELOCATION, 0},
        {"test4", 1 << REISERFS_TEST4, 0},
        {"notest4", 0, 1 << REISERFS_TEST4},
        {NULL, 0, 0}
};

static const arg_desc_t tails[] = {
        {"on", 1 << REISERFS_LARGETAIL, 1 << REISERFS_SMALLTAIL},
        {"off", 0, (1 << REISERFS_LARGETAIL) | (1 << REISERFS_SMALLTAIL)},
        {"small", 1 << REISERFS_SMALLTAIL, 1 << REISERFS_LARGETAIL},
        {NULL, 0, 0}
};

static const arg_desc_t error_actions[] = {
        {"panic", 1 << REISERFS_ERROR_PANIC,
         (1 << REISERFS_ERROR_RO | 1 << REISERFS_ERROR_CONTINUE)},
        {"ro-remount", 1 << REISERFS_ERROR_RO,
         (1 << REISERFS_ERROR_PANIC | 1 << REISERFS_ERROR_CONTINUE)},
#ifdef REISERFS_JOURNAL_ERROR_ALLOWS_NO_LOG
        {"continue", 1 << REISERFS_ERROR_CONTINUE,
         (1 << REISERFS_ERROR_PANIC | 1 << REISERFS_ERROR_RO)},
#endif
        {NULL, 0, 0},
};

/*
 * proceed only one option from a list *cur - string containing of mount
 * options
 * opts - array of options which are accepted
 * opt_arg - if option is found and requires an argument and if it is specifed
 * in the input - pointer to the argument is stored here
 * bit_flags - if option requires to set a certain bit - it is set here
 * return -1 if unknown option is found, opt->arg_required otherwise
 */
static int reiserfs_getopt(struct super_block *s, char **cur, opt_desc_t * opts,
                           char **opt_arg, unsigned long *bit_flags)
{
        char *p;
        /*
         * foo=bar,
         * ^   ^  ^
         * |   |  +-- option_end
         * |   +-- arg_start
         * +-- option_start
         */
        const opt_desc_t *opt;
        const arg_desc_t *arg;

        p = *cur;

        /* assume argument cannot contain commas */
        *cur = strchr(p, ',');
        if (*cur) {
                *(*cur) = '\0';
                (*cur)++;
        }

        if (!strncmp(p, "alloc=", 6)) {
                /*
                 * Ugly special case, probably we should redo options
                 * parser so that it can understand several arguments for
                 * some options, also so that it can fill several bitfields
                 * with option values.
                 */
                if (reiserfs_parse_alloc_options(s, p + 6)) {
                        return -1;
                } else {
                        return 0;
                }
        }

        /* for every option in the list */
        for (opt = opts; opt->option_name; opt++) {
                if (!strncmp(p, opt->option_name, strlen(opt->option_name))) {
                        if (bit_flags) {
                                if (opt->clrmask ==
                                    (1 << REISERFS_UNSUPPORTED_OPT))
                                        reiserfs_warning(s, "super-6500",
                                                         "%s not supported.\n",
                                                         p);
                                else
                                        *bit_flags &= ~opt->clrmask;
                                if (opt->setmask ==
                                    (1 << REISERFS_UNSUPPORTED_OPT))
                                        reiserfs_warning(s, "super-6501",
                                                         "%s not supported.\n",
                                                         p);
                                else
                                        *bit_flags |= opt->setmask;
                        }
                        break;
                }
        }
        if (!opt->option_name) {
                reiserfs_warning(s, "super-6502",
                                 "unknown mount option \"%s\"", p);
                return -1;
        }

        p += strlen(opt->option_name);
        switch (*p) {
        case '=':
                if (!opt->arg_required) {
                        reiserfs_warning(s, "super-6503",
                                         "the option \"%s\" does not "
                                         "require an argument\n",
                                         opt->option_name);
                        return -1;
                }
                break;

        case 0:
                if (opt->arg_required) {
                        reiserfs_warning(s, "super-6504",
                                         "the option \"%s\" requires an "
                                         "argument\n", opt->option_name);
                        return -1;
                }
                break;
        default:
                reiserfs_warning(s, "super-6505",
                                 "head of option \"%s\" is only correct\n",
                                 opt->option_name);
                return -1;
        }

        /*
         * move to the argument, or to next option if argument is not
         * required
         */
        p++;

        if (opt->arg_required
            && !(opt->arg_required & (1 << REISERFS_OPT_ALLOWEMPTY))
            && !strlen(p)) {
                /* this catches "option=," if not allowed */
                reiserfs_warning(s, "super-6506",
                                 "empty argument for \"%s\"\n",
                                 opt->option_name);
                return -1;
        }

        if (!opt->values) {
                /* *=NULLopt_arg contains pointer to argument */
                *opt_arg = p;
                return opt->arg_required & ~(1 << REISERFS_OPT_ALLOWEMPTY);
        }

        /* values possible for this option are listed in opt->values */
        for (arg = opt->values; arg->value; arg++) {
                if (!strcmp(p, arg->value)) {
                        if (bit_flags) {
                                *bit_flags &= ~arg->clrmask;
                                *bit_flags |= arg->setmask;
                        }
                        return opt->arg_required;
                }
        }

        reiserfs_warning(s, "super-6506",
                         "bad value \"%s\" for option \"%s\"\n", p,
                         opt->option_name);
        return -1;
}

/* returns 0 if something is wrong in option string, 1 - otherwise */
static int reiserfs_parse_options(struct super_block *s,

                                  /* string given via mount's -o */
                                  char *options,

                                  /*
                                   * after the parsing phase, contains the
                                   * collection of bitflags defining what
                                   * mount options were selected.
                                   */
                                  unsigned long *mount_options,

                                  /* strtol-ed from NNN of resize=NNN */
                                  unsigned long *blocks,
                                  char **jdev_name,
                                  unsigned int *commit_max_age,
                                  char **qf_names,
                                  unsigned int *qfmt)
{
        int c;
        char *arg = NULL;
        char *pos;
        opt_desc_t opts[] = {
                /*
                 * Compatibility stuff, so that -o notail for old
                 * setups still work
                 */
                {"tails",.arg_required = 't',.values = tails},
                {"notail",.clrmask =
                 (1 << REISERFS_LARGETAIL) | (1 << REISERFS_SMALLTAIL)},
                {"conv",.setmask = 1 << REISERFS_CONVERT},
                {"attrs",.setmask = 1 << REISERFS_ATTRS},
                {"noattrs",.clrmask = 1 << REISERFS_ATTRS},
                {"expose_privroot", .setmask = 1 << REISERFS_EXPOSE_PRIVROOT},
#ifdef CONFIG_REISERFS_FS_XATTR
                {"user_xattr",.setmask = 1 << REISERFS_XATTRS_USER},
                {"nouser_xattr",.clrmask = 1 << REISERFS_XATTRS_USER},
#else
                {"user_xattr",.setmask = 1 << REISERFS_UNSUPPORTED_OPT},
                {"nouser_xattr",.clrmask = 1 << REISERFS_UNSUPPORTED_OPT},
#endif
#ifdef CONFIG_REISERFS_FS_POSIX_ACL
                {"acl",.setmask = 1 << REISERFS_POSIXACL},
                {"noacl",.clrmask = 1 << REISERFS_POSIXACL},
#else
                {"acl",.setmask = 1 << REISERFS_UNSUPPORTED_OPT},
                {"noacl",.clrmask = 1 << REISERFS_UNSUPPORTED_OPT},
#endif
                {.option_name = "nolog"},
                {"replayonly",.setmask = 1 << REPLAYONLY},
                {"block-allocator",.arg_required = 'a',.values = balloc},
                {"data",.arg_required = 'd',.values = logging_mode},
                {"barrier",.arg_required = 'b',.values = barrier_mode},
                {"resize",.arg_required = 'r',.values = NULL},
                {"jdev",.arg_required = 'j',.values = NULL},
                {"nolargeio",.arg_required = 'w',.values = NULL},
                {"commit",.arg_required = 'c',.values = NULL},
                {"usrquota",.setmask = 1 << REISERFS_USRQUOTA},
                {"grpquota",.setmask = 1 << REISERFS_GRPQUOTA},
                {"noquota",.clrmask = 1 << REISERFS_USRQUOTA | 1 << REISERFS_GRPQUOTA},
                {"errors",.arg_required = 'e',.values = error_actions},
                {"usrjquota",.arg_required =
                 'u' | (1 << REISERFS_OPT_ALLOWEMPTY),.values = NULL},
                {"grpjquota",.arg_required =
                 'g' | (1 << REISERFS_OPT_ALLOWEMPTY),.values = NULL},
                {"jqfmt",.arg_required = 'f',.values = NULL},
                {.option_name = NULL}
        };

        *blocks = 0;
        if (!options || !*options)
                /*
                 * use default configuration: create tails, journaling on, no
                 * conversion to newest format
                 */
                return 1;

        for (pos = options; pos;) {
                c = reiserfs_getopt(s, &pos, opts, &arg, mount_options);
                if (c == -1)
                        /* wrong option is given */
                        return 0;

                if (c == 'r') {
                        char *p;

                        p = NULL;
                        /* "resize=NNN" or "resize=auto" */

                        if (!strcmp(arg, "auto")) {
                                /* From JFS code, to auto-get the size. */
                                *blocks = sb_bdev_nr_blocks(s);
                        } else {
                                *blocks = simple_strtoul(arg, &p, 0);
                                if (*p != '\0') {
                                        /* NNN does not look like a number */
                                        reiserfs_warning(s, "super-6507",
                                                         "bad value %s for "
                                                         "-oresize\n", arg);
                                        return 0;
                                }
                        }
                }

                if (c == 'c') {
                        char *p = NULL;
                        unsigned long val = simple_strtoul(arg, &p, 0);
                        /* commit=NNN (time in seconds) */
                        if (*p != '\0' || val >= (unsigned int)-1) {
                                reiserfs_warning(s, "super-6508",
                                                 "bad value %s for -ocommit\n",
                                                 arg);
                                return 0;
                        }
                        *commit_max_age = (unsigned int)val;
                }

                if (c == 'w') {
                        reiserfs_warning(s, "super-6509", "nolargeio option "
                                         "is no longer supported");
                        return 0;
                }

                if (c == 'j') {
                        if (arg && *arg && jdev_name) {
                                /* Hm, already assigned? */
                                if (*jdev_name) {
                                        reiserfs_warning(s, "super-6510",
                                                         "journal device was "
                                                         "already specified to "
                                                         "be %s", *jdev_name);
                                        return 0;
                                }
                                *jdev_name = arg;
                        }
                }
#ifdef CONFIG_QUOTA
                if (c == 'u' || c == 'g') {
                        int qtype = c == 'u' ? USRQUOTA : GRPQUOTA;

                        if (sb_any_quota_loaded(s) &&
                            (!*arg != !REISERFS_SB(s)->s_qf_names[qtype])) {
                                reiserfs_warning(s, "super-6511",
                                                 "cannot change journaled "
                                                 "quota options when quota "
                                                 "turned on.");
                                return 0;
                        }
                        if (qf_names[qtype] !=
                            REISERFS_SB(s)->s_qf_names[qtype])
                                kfree(qf_names[qtype]);
                        qf_names[qtype] = NULL;
                        if (*arg) {     /* Some filename specified? */
                                if (REISERFS_SB(s)->s_qf_names[qtype]
                                    && strcmp(REISERFS_SB(s)->s_qf_names[qtype],
                                              arg)) {
                                        reiserfs_warning(s, "super-6512",
                                                         "%s quota file "
                                                         "already specified.",
                                                         QTYPE2NAME(qtype));
                                        return 0;
                                }
                                if (strchr(arg, '/')) {
                                        reiserfs_warning(s, "super-6513",
                                                         "quotafile must be "
                                                         "on filesystem root.");
                                        return 0;
                                }
                                qf_names[qtype] = kstrdup(arg, GFP_KERNEL);
                                if (!qf_names[qtype]) {
                                        reiserfs_warning(s, "reiserfs-2502",
                                                         "not enough memory "
                                                         "for storing "
                                                         "quotafile name.");
                                        return 0;
                                }
                                if (qtype == USRQUOTA)
                                        *mount_options |= 1 << REISERFS_USRQUOTA;
                                else
                                        *mount_options |= 1 << REISERFS_GRPQUOTA;
                        } else {
                                if (qtype == USRQUOTA)
                                        *mount_options &= ~(1 << REISERFS_USRQUOTA);
                                else
                                        *mount_options &= ~(1 << REISERFS_GRPQUOTA);
                        }
                }
                if (c == 'f') {
                        if (!strcmp(arg, "vfsold"))
                                *qfmt = QFMT_VFS_OLD;
                        else if (!strcmp(arg, "vfsv0"))
                                *qfmt = QFMT_VFS_V0;
                        else {
                                reiserfs_warning(s, "super-6514",
                                                 "unknown quota format "
                                                 "specified.");
                                return 0;
                        }
                        if (sb_any_quota_loaded(s) &&
                            *qfmt != REISERFS_SB(s)->s_jquota_fmt) {
                                reiserfs_warning(s, "super-6515",
                                                 "cannot change journaled "
                                                 "quota options when quota "
                                                 "turned on.");
                                return 0;
                        }
                }
#else
                if (c == 'u' || c == 'g' || c == 'f') {
                        reiserfs_warning(s, "reiserfs-2503", "journaled "
                                         "quota options not supported.");
                        return 0;
                }
#endif
        }

#ifdef CONFIG_QUOTA
        if (!REISERFS_SB(s)->s_jquota_fmt && !*qfmt
            && (qf_names[USRQUOTA] || qf_names[GRPQUOTA])) {
                reiserfs_warning(s, "super-6515",
                                 "journaled quota format not specified.");
                return 0;
        }
        if ((!(*mount_options & (1 << REISERFS_USRQUOTA)) &&
               sb_has_quota_loaded(s, USRQUOTA)) ||
            (!(*mount_options & (1 << REISERFS_GRPQUOTA)) &&
               sb_has_quota_loaded(s, GRPQUOTA))) {
                reiserfs_warning(s, "super-6516", "quota options must "
                                 "be present when quota is turned on.");
                return 0;
        }
#endif

        return 1;
}

static void switch_data_mode(struct super_block *s, unsigned long mode)
{
        REISERFS_SB(s)->s_mount_opt &= ~((1 << REISERFS_DATA_LOG) |
                                         (1 << REISERFS_DATA_ORDERED) |
                                         (1 << REISERFS_DATA_WRITEBACK));
        REISERFS_SB(s)->s_mount_opt |= (1 << mode);
}

static void handle_data_mode(struct super_block *s, unsigned long mount_options)
{
        if (mount_options & (1 << REISERFS_DATA_LOG)) {
                if (!reiserfs_data_log(s)) {
                        switch_data_mode(s, REISERFS_DATA_LOG);
                        reiserfs_info(s, "switching to journaled data mode\n");
                }
        } else if (mount_options & (1 << REISERFS_DATA_ORDERED)) {
                if (!reiserfs_data_ordered(s)) {
                        switch_data_mode(s, REISERFS_DATA_ORDERED);
                        reiserfs_info(s, "switching to ordered data mode\n");
                }
        } else if (mount_options & (1 << REISERFS_DATA_WRITEBACK)) {
                if (!reiserfs_data_writeback(s)) {
                        switch_data_mode(s, REISERFS_DATA_WRITEBACK);
                        reiserfs_info(s, "switching to writeback data mode\n");
                }
        }
}

static void handle_barrier_mode(struct super_block *s, unsigned long bits)
{
        int flush = (1 << REISERFS_BARRIER_FLUSH);
        int none = (1 << REISERFS_BARRIER_NONE);
        int all_barrier = flush | none;

        if (bits & all_barrier) {
                REISERFS_SB(s)->s_mount_opt &= ~all_barrier;
                if (bits & flush) {
                        REISERFS_SB(s)->s_mount_opt |= flush;
                        printk("reiserfs: enabling write barrier flush mode\n");
                } else if (bits & none) {
                        REISERFS_SB(s)->s_mount_opt |= none;
                        printk("reiserfs: write barriers turned off\n");
                }
        }
}

static void handle_attrs(struct super_block *s)
{
        struct reiserfs_super_block *rs = SB_DISK_SUPER_BLOCK(s);

        if (reiserfs_attrs(s)) {
                if (old_format_only(s)) {
                        reiserfs_warning(s, "super-6517", "cannot support "
                                         "attributes on 3.5.x disk format");
                        REISERFS_SB(s)->s_mount_opt &= ~(1 << REISERFS_ATTRS);
                        return;
                }
                if (!(le32_to_cpu(rs->s_flags) & reiserfs_attrs_cleared)) {
                        reiserfs_warning(s, "super-6518", "cannot support "
                                         "attributes until flag is set in "
                                         "super-block");
                        REISERFS_SB(s)->s_mount_opt &= ~(1 << REISERFS_ATTRS);
                }
        }
}

#ifdef CONFIG_QUOTA
static void handle_quota_files(struct super_block *s, char **qf_names,
                               unsigned int *qfmt)
{
        int i;

        for (i = 0; i < REISERFS_MAXQUOTAS; i++) {
                if (qf_names[i] != REISERFS_SB(s)->s_qf_names[i])
                        kfree(REISERFS_SB(s)->s_qf_names[i]);
                REISERFS_SB(s)->s_qf_names[i] = qf_names[i];
        }
        if (*qfmt)
                REISERFS_SB(s)->s_jquota_fmt = *qfmt;
}
#endif

static int reiserfs_remount(struct super_block *s, int *mount_flags, char *arg)
{
        struct reiserfs_super_block *rs;
        struct reiserfs_transaction_handle th;
        unsigned long blocks;
        unsigned long mount_options = REISERFS_SB(s)->s_mount_opt;
        unsigned long safe_mask = 0;
        unsigned int commit_max_age = (unsigned int)-1;
        struct reiserfs_journal *journal = SB_JOURNAL(s);
        int err;
        char *qf_names[REISERFS_MAXQUOTAS];
        unsigned int qfmt = 0;
#ifdef CONFIG_QUOTA
        int i;
#endif

        sync_filesystem(s);
        reiserfs_write_lock(s);

#ifdef CONFIG_QUOTA
        memcpy(qf_names, REISERFS_SB(s)->s_qf_names, sizeof(qf_names));
#endif

        rs = SB_DISK_SUPER_BLOCK(s);

        if (!reiserfs_parse_options
            (s, arg, &mount_options, &blocks, NULL, &commit_max_age,
            qf_names, &qfmt)) {
#ifdef CONFIG_QUOTA
                for (i = 0; i < REISERFS_MAXQUOTAS; i++)
                        if (qf_names[i] != REISERFS_SB(s)->s_qf_names[i])
                                kfree(qf_names[i]);
#endif
                err = -EINVAL;
                goto out_err_unlock;
        }
#ifdef CONFIG_QUOTA
        handle_quota_files(s, qf_names, &qfmt);
#endif

        handle_attrs(s);

        /* Add options that are safe here */
        safe_mask |= 1 << REISERFS_SMALLTAIL;
        safe_mask |= 1 << REISERFS_LARGETAIL;
        safe_mask |= 1 << REISERFS_NO_BORDER;
        safe_mask |= 1 << REISERFS_NO_UNHASHED_RELOCATION;
        safe_mask |= 1 << REISERFS_HASHED_RELOCATION;
        safe_mask |= 1 << REISERFS_TEST4;
        safe_mask |= 1 << REISERFS_ATTRS;
        safe_mask |= 1 << REISERFS_XATTRS_USER;
        safe_mask |= 1 << REISERFS_POSIXACL;
        safe_mask |= 1 << REISERFS_BARRIER_FLUSH;
        safe_mask |= 1 << REISERFS_BARRIER_NONE;
        safe_mask |= 1 << REISERFS_ERROR_RO;
        safe_mask |= 1 << REISERFS_ERROR_CONTINUE;
        safe_mask |= 1 << REISERFS_ERROR_PANIC;
        safe_mask |= 1 << REISERFS_USRQUOTA;
        safe_mask |= 1 << REISERFS_GRPQUOTA;

        /*
         * Update the bitmask, taking care to keep
         * the bits we're not allowed to change here
         */
        REISERFS_SB(s)->s_mount_opt =
            (REISERFS_SB(s)->
             s_mount_opt & ~safe_mask) | (mount_options & safe_mask);

        if (commit_max_age != 0 && commit_max_age != (unsigned int)-1) {
                journal->j_max_commit_age = commit_max_age;
                journal->j_max_trans_age = commit_max_age;
        } else if (commit_max_age == 0) {
                /* 0 means restore defaults. */
                journal->j_max_commit_age = journal->j_default_max_commit_age;
                journal->j_max_trans_age = JOURNAL_MAX_TRANS_AGE;
        }

        if (blocks) {
                err = reiserfs_resize(s, blocks);
                if (err != 0)
                        goto out_err_unlock;
        }

        if (*mount_flags & SB_RDONLY) {
                reiserfs_write_unlock(s);
                reiserfs_xattr_init(s, *mount_flags);
                /* remount read-only */
                if (sb_rdonly(s))
                        /* it is read-only already */
                        goto out_ok_unlocked;

                err = dquot_suspend(s, -1);
                if (err < 0)
                        goto out_err;

                /* try to remount file system with read-only permissions */
                if (sb_umount_state(rs) == REISERFS_VALID_FS
                    || REISERFS_SB(s)->s_mount_state != REISERFS_VALID_FS) {
                        goto out_ok_unlocked;
                }

                reiserfs_write_lock(s);

                err = journal_begin(&th, s, 10);
                if (err)
                        goto out_err_unlock;

                /* Mounting a rw partition read-only. */
                reiserfs_prepare_for_journal(s, SB_BUFFER_WITH_SB(s), 1);
                set_sb_umount_state(rs, REISERFS_SB(s)->s_mount_state);
                journal_mark_dirty(&th, SB_BUFFER_WITH_SB(s));
        } else {
                /* remount read-write */
                if (!sb_rdonly(s)) {
                        reiserfs_write_unlock(s);
                        reiserfs_xattr_init(s, *mount_flags);
                        goto out_ok_unlocked;   /* We are read-write already */
                }

                if (reiserfs_is_journal_aborted(journal)) {
                        err = journal->j_errno;
                        goto out_err_unlock;
                }

                handle_data_mode(s, mount_options);
                handle_barrier_mode(s, mount_options);
                REISERFS_SB(s)->s_mount_state = sb_umount_state(rs);

                /* now it is safe to call journal_begin */
                s->s_flags &= ~SB_RDONLY;
                err = journal_begin(&th, s, 10);
                if (err)
                        goto out_err_unlock;

                /* Mount a partition which is read-only, read-write */
                reiserfs_prepare_for_journal(s, SB_BUFFER_WITH_SB(s), 1);
                REISERFS_SB(s)->s_mount_state = sb_umount_state(rs);
                s->s_flags &= ~SB_RDONLY;
                set_sb_umount_state(rs, REISERFS_ERROR_FS);
                if (!old_format_only(s))
                        set_sb_mnt_count(rs, sb_mnt_count(rs) + 1);
                /* mark_buffer_dirty (SB_BUFFER_WITH_SB (s), 1); */
                journal_mark_dirty(&th, SB_BUFFER_WITH_SB(s));
                REISERFS_SB(s)->s_mount_state = REISERFS_VALID_FS;
        }
        /* this will force a full flush of all journal lists */
        SB_JOURNAL(s)->j_must_wait = 1;
        err = journal_end(&th);
        if (err)
                goto out_err_unlock;

        reiserfs_write_unlock(s);
        if (!(*mount_flags & SB_RDONLY)) {
                dquot_resume(s, -1);
                reiserfs_write_lock(s);
                finish_unfinished(s);
                reiserfs_write_unlock(s);
                reiserfs_xattr_init(s, *mount_flags);
        }

out_ok_unlocked:
        return 0;

out_err_unlock:
        reiserfs_write_unlock(s);
out_err:
        return err;
}

static int read_super_block(struct super_block *s, int offset)
{
        struct buffer_head *bh;
        struct reiserfs_super_block *rs;
        int fs_blocksize;

        bh = sb_bread(s, offset / s->s_blocksize);
        if (!bh) {
                reiserfs_warning(s, "sh-2006",
                                 "bread failed (dev %s, block %lu, size %lu)",
                                 s->s_id, offset / s->s_blocksize,
                                 s->s_blocksize);
                return 1;
        }

        rs = (struct reiserfs_super_block *)bh->b_data;
        if (!is_any_reiserfs_magic_string(rs)) {
                brelse(bh);
                return 1;
        }
        /*
         * ok, reiserfs signature (old or new) found in at the given offset
         */
        fs_blocksize = sb_blocksize(rs);
        brelse(bh);
        sb_set_blocksize(s, fs_blocksize);

        bh = sb_bread(s, offset / s->s_blocksize);
        if (!bh) {
                reiserfs_warning(s, "sh-2007",
                                 "bread failed (dev %s, block %lu, size %lu)",
                                 s->s_id, offset / s->s_blocksize,
                                 s->s_blocksize);
                return 1;
        }

        rs = (struct reiserfs_super_block *)bh->b_data;
        if (sb_blocksize(rs) != s->s_blocksize) {
                reiserfs_warning(s, "sh-2011", "can't find a reiserfs "
                                 "filesystem on (dev %s, block %llu, size %lu)",
                                 s->s_id,
                                 (unsigned long long)bh->b_blocknr,
                                 s->s_blocksize);
                brelse(bh);
                return 1;
        }

        if (rs->s_v1.s_root_block == cpu_to_le32(-1)) {
                brelse(bh);
                reiserfs_warning(s, "super-6519", "Unfinished reiserfsck "
                                 "--rebuild-tree run detected. Please run\n"
                                 "reiserfsck --rebuild-tree and wait for a "
                                 "completion. If that fails\n"
                                 "get newer reiserfsprogs package");
                return 1;
        }

        SB_BUFFER_WITH_SB(s) = bh;
        SB_DISK_SUPER_BLOCK(s) = rs;

        /*
         * magic is of non-standard journal filesystem, look at s_version to
         * find which format is in use
         */
        if (is_reiserfs_jr(rs)) {
                if (sb_version(rs) == REISERFS_VERSION_2)
                        reiserfs_info(s, "found reiserfs format \"3.6\""
                                      " with non-standard journal\n");
                else if (sb_version(rs) == REISERFS_VERSION_1)
                        reiserfs_info(s, "found reiserfs format \"3.5\""
                                      " with non-standard journal\n");
                else {
                        reiserfs_warning(s, "sh-2012", "found unknown "
                                         "format \"%u\" of reiserfs with "
                                         "non-standard magic", sb_version(rs));
                        return 1;
                }
        } else
                /*
                 * s_version of standard format may contain incorrect
                 * information, so we just look at the magic string
                 */
                reiserfs_info(s,
                              "found reiserfs format \"%s\" with standard journal\n",
                              is_reiserfs_3_5(rs) ? "3.5" : "3.6");

        s->s_op = &reiserfs_sops;
        s->s_export_op = &reiserfs_export_ops;
#ifdef CONFIG_QUOTA
        s->s_qcop = &reiserfs_qctl_operations;
        s->dq_op = &reiserfs_quota_operations;
        s->s_quota_types = QTYPE_MASK_USR | QTYPE_MASK_GRP;
#endif

        /*
         * new format is limited by the 32 bit wide i_blocks field, want to
         * be one full block below that.
         */
        s->s_maxbytes = (512LL << 32) - s->s_blocksize;
        return 0;
}

/* after journal replay, reread all bitmap and super blocks */
static int reread_meta_blocks(struct super_block *s)
{
        ll_rw_block(REQ_OP_READ, 0, 1, &SB_BUFFER_WITH_SB(s));
        wait_on_buffer(SB_BUFFER_WITH_SB(s));
        if (!buffer_uptodate(SB_BUFFER_WITH_SB(s))) {
                reiserfs_warning(s, "reiserfs-2504", "error reading the super");
                return 1;
        }

        return 0;
}

/* hash detection stuff */

/*
 * if root directory is empty - we set default - Yura's - hash and
 * warn about it
 * FIXME: we look for only one name in a directory. If tea and yura
 * both have the same value - we ask user to send report to the
 * mailing list
 */
static __u32 find_hash_out(struct super_block *s)
{
        int retval;
        struct inode *inode;
        struct cpu_key key;
        INITIALIZE_PATH(path);
        struct reiserfs_dir_entry de;
        struct reiserfs_de_head *deh;
        __u32 hash = DEFAULT_HASH;
        __u32 deh_hashval, teahash, r5hash, yurahash;

        inode = d_inode(s->s_root);

        make_cpu_key(&key, inode, ~0, TYPE_DIRENTRY, 3);
        retval = search_by_entry_key(s, &key, &path, &de);
        if (retval == IO_ERROR) {
                pathrelse(&path);
                return UNSET_HASH;
        }
        if (retval == NAME_NOT_FOUND)
                de.de_entry_num--;

        set_de_name_and_namelen(&de);
        deh = de.de_deh + de.de_entry_num;

        if (deh_offset(deh) == DOT_DOT_OFFSET) {
                /* allow override in this case */
                if (reiserfs_rupasov_hash(s))
                        hash = YURA_HASH;
                reiserfs_info(s, "FS seems to be empty, autodetect is using the default hash\n");
                goto out;
        }

        deh_hashval = GET_HASH_VALUE(deh_offset(deh));
        r5hash = GET_HASH_VALUE(r5_hash(de.de_name, de.de_namelen));
        teahash = GET_HASH_VALUE(keyed_hash(de.de_name, de.de_namelen));
        yurahash = GET_HASH_VALUE(yura_hash(de.de_name, de.de_namelen));

        if ((teahash == r5hash && deh_hashval == r5hash) ||
            (teahash == yurahash && deh_hashval == yurahash) ||
            (r5hash == yurahash && deh_hashval == yurahash)) {
                reiserfs_warning(s, "reiserfs-2506",
                                 "Unable to automatically detect hash "
                                 "function. Please mount with -o "
                                 "hash={tea,rupasov,r5}");
                hash = UNSET_HASH;
                goto out;
        }

        if (deh_hashval == yurahash)
                hash = YURA_HASH;
        else if (deh_hashval == teahash)
                hash = TEA_HASH;
        else if (deh_hashval == r5hash)
                hash = R5_HASH;
        else {
                reiserfs_warning(s, "reiserfs-2506",
                                 "Unrecognised hash function");
                hash = UNSET_HASH;
        }
out:
        pathrelse(&path);
        return hash;
}

/* finds out which hash names are sorted with */
static int what_hash(struct super_block *s)
{
        __u32 code;

        code = sb_hash_function_code(SB_DISK_SUPER_BLOCK(s));

        /*
         * reiserfs_hash_detect() == true if any of the hash mount options
         * were used.  We must check them to make sure the user isn't
         * using a bad hash value
         */
        if (code == UNSET_HASH || reiserfs_hash_detect(s))
                code = find_hash_out(s);

        if (code != UNSET_HASH && reiserfs_hash_detect(s)) {
                /*
                 * detection has found the hash, and we must check against the
                 * mount options
                 */
                if (reiserfs_rupasov_hash(s) && code != YURA_HASH) {
                        reiserfs_warning(s, "reiserfs-2507",
                                         "Error, %s hash detected, "
                                         "unable to force rupasov hash",
                                         reiserfs_hashname(code));
                        code = UNSET_HASH;
                } else if (reiserfs_tea_hash(s) && code != TEA_HASH) {
                        reiserfs_warning(s, "reiserfs-2508",
                                         "Error, %s hash detected, "
                                         "unable to force tea hash",
                                         reiserfs_hashname(code));
                        code = UNSET_HASH;
                } else if (reiserfs_r5_hash(s) && code != R5_HASH) {
                        reiserfs_warning(s, "reiserfs-2509",
                                         "Error, %s hash detected, "
                                         "unable to force r5 hash",
                                         reiserfs_hashname(code));
                        code = UNSET_HASH;
                }
        } else {
                /*
                 * find_hash_out was not called or
                 * could not determine the hash
                 */
                if (reiserfs_rupasov_hash(s)) {
                        code = YURA_HASH;
                } else if (reiserfs_tea_hash(s)) {
                        code = TEA_HASH;
                } else if (reiserfs_r5_hash(s)) {
                        code = R5_HASH;
                }
        }

        /*
         * if we are mounted RW, and we have a new valid hash code, update
         * the super
         */
        if (code != UNSET_HASH &&
            !sb_rdonly(s) &&
            code != sb_hash_function_code(SB_DISK_SUPER_BLOCK(s))) {
                set_sb_hash_function_code(SB_DISK_SUPER_BLOCK(s), code);
        }
        return code;
}

/* return pointer to appropriate function */
static hashf_t hash_function(struct super_block *s)
{
        switch (what_hash(s)) {
        case TEA_HASH:
                reiserfs_info(s, "Using tea hash to sort names\n");
                return keyed_hash;
        case YURA_HASH:
                reiserfs_info(s, "Using rupasov hash to sort names\n");
                return yura_hash;
        case R5_HASH:
                reiserfs_info(s, "Using r5 hash to sort names\n");
                return r5_hash;
        }
        return NULL;
}

/* this is used to set up correct value for old partitions */
static int function2code(hashf_t func)
{
        if (func == keyed_hash)
                return TEA_HASH;
        if (func == yura_hash)
                return YURA_HASH;
        if (func == r5_hash)
                return R5_HASH;

        BUG();                  /* should never happen */

        return 0;
}

#define SWARN(silent, s, id, ...)                       \
        if (!(silent))                          \
                reiserfs_warning(s, id, __VA_ARGS__)

static int reiserfs_fill_super(struct super_block *s, void *data, int silent)
{
        struct inode *root_inode;
        struct reiserfs_transaction_handle th;
        int old_format = 0;
        unsigned long blocks;
        unsigned int commit_max_age = 0;
        int jinit_done = 0;
        struct reiserfs_iget_args args;
        struct reiserfs_super_block *rs;
        char *jdev_name;
        struct reiserfs_sb_info *sbi;
        int errval = -EINVAL;
        char *qf_names[REISERFS_MAXQUOTAS] = {};
        unsigned int qfmt = 0;

        sbi = kzalloc(sizeof(struct reiserfs_sb_info), GFP_KERNEL);
        if (!sbi)
                return -ENOMEM;
        s->s_fs_info = sbi;
        /* Set default values for options: non-aggressive tails, RO on errors */
        sbi->s_mount_opt |= (1 << REISERFS_SMALLTAIL);
        sbi->s_mount_opt |= (1 << REISERFS_ERROR_RO);
        sbi->s_mount_opt |= (1 << REISERFS_BARRIER_FLUSH);
        /* no preallocation minimum, be smart in reiserfs_file_write instead */
        sbi->s_alloc_options.preallocmin = 0;
        /* Preallocate by 16 blocks (17-1) at once */
        sbi->s_alloc_options.preallocsize = 17;
        /* setup default block allocator options */
        reiserfs_init_alloc_options(s);

        spin_lock_init(&sbi->old_work_lock);
        INIT_DELAYED_WORK(&sbi->old_work, flush_old_commits);
        mutex_init(&sbi->lock);
        sbi->lock_depth = -1;

        sbi->commit_wq = alloc_workqueue("reiserfs/%s", WQ_MEM_RECLAIM, 0,
                                         s->s_id);
        if (!sbi->commit_wq) {
                SWARN(silent, s, "", "Cannot allocate commit workqueue");
                errval = -ENOMEM;
                goto error_unlocked;
        }

        jdev_name = NULL;
        if (reiserfs_parse_options
            (s, (char *)data, &sbi->s_mount_opt, &blocks, &jdev_name,
             &commit_max_age, qf_names, &qfmt) == 0) {
                goto error_unlocked;
        }
        if (jdev_name && jdev_name[0]) {
                sbi->s_jdev = kstrdup(jdev_name, GFP_KERNEL);
                if (!sbi->s_jdev) {
                        SWARN(silent, s, "", "Cannot allocate memory for "
                                "journal device name");
                        goto error_unlocked;
                }
        }
#ifdef CONFIG_QUOTA
        handle_quota_files(s, qf_names, &qfmt);
#endif

        if (blocks) {
                SWARN(silent, s, "jmacd-7", "resize option for remount only");
                goto error_unlocked;
        }

        /*
         * try old format (undistributed bitmap, super block in 8-th 1k
         * block of a device)
         */
        if (!read_super_block(s, REISERFS_OLD_DISK_OFFSET_IN_BYTES))
                old_format = 1;

        /*
         * try new format (64-th 1k block), which can contain reiserfs
         * super block
         */
        else if (read_super_block(s, REISERFS_DISK_OFFSET_IN_BYTES)) {
                SWARN(silent, s, "sh-2021", "can not find reiserfs on %s",
                      s->s_id);
                goto error_unlocked;
        }

        s->s_time_min = 0;
        s->s_time_max = U32_MAX;

        rs = SB_DISK_SUPER_BLOCK(s);
        /*
         * Let's do basic sanity check to verify that underlying device is not
         * smaller than the filesystem. If the check fails then abort and
         * scream, because bad stuff will happen otherwise.
         */
        if (bdev_nr_bytes(s->s_bdev) < sb_block_count(rs) * sb_blocksize(rs)) {
                SWARN(silent, s, "", "Filesystem cannot be "
                      "mounted because it is bigger than the device");
                SWARN(silent, s, "", "You may need to run fsck "
                      "or increase size of your LVM partition");
                SWARN(silent, s, "", "Or may be you forgot to "
                      "reboot after fdisk when it told you to");
                goto error_unlocked;
        }

        sbi->s_mount_state = SB_REISERFS_STATE(s);
        sbi->s_mount_state = REISERFS_VALID_FS;

        if ((errval = reiserfs_init_bitmap_cache(s))) {
                SWARN(silent, s, "jmacd-8", "unable to read bitmap");
                goto error_unlocked;
        }

        errval = -EINVAL;
#ifdef CONFIG_REISERFS_CHECK

        SWARN(silent, s, "", "CONFIG_REISERFS_CHECK is set ON");
        SWARN(silent, s, "", "- it is slow mode for debugging.");
#endif

        /* make data=ordered the default */
        if (!reiserfs_data_log(s) && !reiserfs_data_ordered(s) &&
            !reiserfs_data_writeback(s)) {
                sbi->s_mount_opt |= (1 << REISERFS_DATA_ORDERED);
        }

        if (reiserfs_data_log(s)) {
                reiserfs_info(s, "using journaled data mode\n");
        } else if (reiserfs_data_ordered(s)) {
                reiserfs_info(s, "using ordered data mode\n");
        } else {
                reiserfs_info(s, "using writeback data mode\n");
        }
        if (reiserfs_barrier_flush(s)) {
                printk("reiserfs: using flush barriers\n");
        }

        if (journal_init(s, jdev_name, old_format, commit_max_age)) {
                SWARN(silent, s, "sh-2022",
                      "unable to initialize journal space");
                goto error_unlocked;
        } else {
                /*
                 * once this is set, journal_release must be called
                 * if we error out of the mount
                 */
                jinit_done = 1;
        }

        if (reread_meta_blocks(s)) {
                SWARN(silent, s, "jmacd-9",
                      "unable to reread meta blocks after journal init");
                goto error_unlocked;
        }

        if (replay_only(s))
                goto error_unlocked;

        s->s_xattr = reiserfs_xattr_handlers;

        if (bdev_read_only(s->s_bdev) && !sb_rdonly(s)) {
                SWARN(silent, s, "clm-7000",
                      "Detected readonly device, marking FS readonly");
                s->s_flags |= SB_RDONLY;
        }
        args.objectid = REISERFS_ROOT_OBJECTID;
        args.dirid = REISERFS_ROOT_PARENT_OBJECTID;
        root_inode =
            iget5_locked(s, REISERFS_ROOT_OBJECTID, reiserfs_find_actor,
                         reiserfs_init_locked_inode, (void *)&args);
        if (!root_inode) {
                SWARN(silent, s, "jmacd-10", "get root inode failed");
                goto error_unlocked;
        }

        /*
         * This path assumed to be called with the BKL in the old times.
         * Now we have inherited the big reiserfs lock from it and many
         * reiserfs helpers called in the mount path and elsewhere require
         * this lock to be held even if it's not always necessary. Let's be
         * conservative and hold it early. The window can be reduced after
         * careful review of the code.
         */
        reiserfs_write_lock(s);

        if (root_inode->i_state & I_NEW) {
                reiserfs_read_locked_inode(root_inode, &args);
                unlock_new_inode(root_inode);
        }

        if (!S_ISDIR(root_inode->i_mode) || !inode_get_bytes(root_inode) ||
            !root_inode->i_size) {
                SWARN(silent, s, "", "corrupt root inode, run fsck");
                iput(root_inode);
                errval = -EUCLEAN;
                goto error;
        }

        s->s_root = d_make_root(root_inode);
        if (!s->s_root)
                goto error;
        /* define and initialize hash function */
        sbi->s_hash_function = hash_function(s);
        if (sbi->s_hash_function == NULL) {
                dput(s->s_root);
                s->s_root = NULL;
                goto error;
        }

        if (is_reiserfs_3_5(rs)
            || (is_reiserfs_jr(rs) && SB_VERSION(s) == REISERFS_VERSION_1))
                set_bit(REISERFS_3_5, &sbi->s_properties);
        else if (old_format)
                set_bit(REISERFS_OLD_FORMAT, &sbi->s_properties);
        else
                set_bit(REISERFS_3_6, &sbi->s_properties);

        if (!sb_rdonly(s)) {

                errval = journal_begin(&th, s, 1);
                if (errval) {
                        dput(s->s_root);
                        s->s_root = NULL;
                        goto error;
                }
                reiserfs_prepare_for_journal(s, SB_BUFFER_WITH_SB(s), 1);

                set_sb_umount_state(rs, REISERFS_ERROR_FS);
                set_sb_fs_state(rs, 0);

                /*
                 * Clear out s_bmap_nr if it would wrap. We can handle this
                 * case, but older revisions can't. This will cause the
                 * file system to fail mount on those older implementations,
                 * avoiding corruption. -jeffm
                 */
                if (bmap_would_wrap(reiserfs_bmap_count(s)) &&
                    sb_bmap_nr(rs) != 0) {
                        reiserfs_warning(s, "super-2030", "This file system "
                                        "claims to use %u bitmap blocks in "
                                        "its super block, but requires %u. "
                                        "Clearing to zero.", sb_bmap_nr(rs),
                                        reiserfs_bmap_count(s));

                        set_sb_bmap_nr(rs, 0);
                }

                if (old_format_only(s)) {
                        /*
                         * filesystem of format 3.5 either with standard
                         * or non-standard journal
                         */
                        if (convert_reiserfs(s)) {
                                /* and -o conv is given */
                                if (!silent)
                                        reiserfs_info(s,
                                                      "converting 3.5 filesystem to the 3.6 format");

                                if (is_reiserfs_3_5(rs))
                                        /*
                                         * put magic string of 3.6 format.
                                         * 2.2 will not be able to
                                         * mount this filesystem anymore
                                         */
                                        memcpy(rs->s_v1.s_magic,
                                               reiserfs_3_6_magic_string,
                                               sizeof
                                               (reiserfs_3_6_magic_string));

                                set_sb_version(rs, REISERFS_VERSION_2);
                                reiserfs_convert_objectid_map_v1(s);
                                set_bit(REISERFS_3_6, &sbi->s_properties);
                                clear_bit(REISERFS_3_5, &sbi->s_properties);
                        } else if (!silent) {
                                reiserfs_info(s, "using 3.5.x disk format\n");
                        }
                } else
                        set_sb_mnt_count(rs, sb_mnt_count(rs) + 1);


                journal_mark_dirty(&th, SB_BUFFER_WITH_SB(s));
                errval = journal_end(&th);
                if (errval) {
                        dput(s->s_root);
                        s->s_root = NULL;
                        goto error;
                }

                reiserfs_write_unlock(s);
                if ((errval = reiserfs_lookup_privroot(s)) ||
                    (errval = reiserfs_xattr_init(s, s->s_flags))) {
                        dput(s->s_root);
                        s->s_root = NULL;
                        goto error_unlocked;
                }
                reiserfs_write_lock(s);

                /*
                 * look for files which were to be removed in previous session
                 */
                finish_unfinished(s);
        } else {
                if (old_format_only(s) && !silent) {
                        reiserfs_info(s, "using 3.5.x disk format\n");
                }

                reiserfs_write_unlock(s);
                if ((errval = reiserfs_lookup_privroot(s)) ||
                    (errval = reiserfs_xattr_init(s, s->s_flags))) {
                        dput(s->s_root);
                        s->s_root = NULL;
                        goto error_unlocked;
                }
                reiserfs_write_lock(s);
        }
        /*
         * mark hash in super block: it could be unset. overwrite should be ok
         */
        set_sb_hash_function_code(rs, function2code(sbi->s_hash_function));

        handle_attrs(s);

        reiserfs_proc_info_init(s);

        init_waitqueue_head(&(sbi->s_wait));
        spin_lock_init(&sbi->bitmap_lock);

        reiserfs_write_unlock(s);

        return (0);

error:
        reiserfs_write_unlock(s);

error_unlocked:
        /* kill the commit thread, free journal ram */
        if (jinit_done) {
                reiserfs_write_lock(s);
                journal_release_error(NULL, s);
                reiserfs_write_unlock(s);
        }

        if (sbi->commit_wq)
                destroy_workqueue(sbi->commit_wq);

        reiserfs_cancel_old_flush(s);

        reiserfs_free_bitmap_cache(s);
        if (SB_BUFFER_WITH_SB(s))
                brelse(SB_BUFFER_WITH_SB(s));
#ifdef CONFIG_QUOTA
        {
                int j;
                for (j = 0; j < REISERFS_MAXQUOTAS; j++)
                        kfree(qf_names[j]);
        }
#endif
        kfree(sbi->s_jdev);
        kfree(sbi);

        s->s_fs_info = NULL;
        return errval;
}

static int reiserfs_statfs(struct dentry *dentry, struct kstatfs *buf)
{
        struct reiserfs_super_block *rs = SB_DISK_SUPER_BLOCK(dentry->d_sb);

        buf->f_namelen = (REISERFS_MAX_NAME(s->s_blocksize));
        buf->f_bfree = sb_free_blocks(rs);
        buf->f_bavail = buf->f_bfree;
        buf->f_blocks = sb_block_count(rs) - sb_bmap_nr(rs) - 1;
        buf->f_bsize = dentry->d_sb->s_blocksize;
        /* changed to accommodate gcc folks. */
        buf->f_type = REISERFS_SUPER_MAGIC;
        buf->f_fsid.val[0] = (u32)crc32_le(0, rs->s_uuid, sizeof(rs->s_uuid)/2);
        buf->f_fsid.val[1] = (u32)crc32_le(0, rs->s_uuid + sizeof(rs->s_uuid)/2,
                                sizeof(rs->s_uuid)/2);

        return 0;
}

#ifdef CONFIG_QUOTA
static int reiserfs_write_dquot(struct dquot *dquot)
{
        struct reiserfs_transaction_handle th;
        int ret, err;
        int depth;

        reiserfs_write_lock(dquot->dq_sb);
        ret =
            journal_begin(&th, dquot->dq_sb,
                          REISERFS_QUOTA_TRANS_BLOCKS(dquot->dq_sb));
        if (ret)
                goto out;
        depth = reiserfs_write_unlock_nested(dquot->dq_sb);
        ret = dquot_commit(dquot);
        reiserfs_write_lock_nested(dquot->dq_sb, depth);
        err = journal_end(&th);
        if (!ret && err)
                ret = err;
out:
        reiserfs_write_unlock(dquot->dq_sb);
        return ret;
}

static int reiserfs_acquire_dquot(struct dquot *dquot)
{
        struct reiserfs_transaction_handle th;
        int ret, err;
        int depth;

        reiserfs_write_lock(dquot->dq_sb);
        ret =
            journal_begin(&th, dquot->dq_sb,
                          REISERFS_QUOTA_INIT_BLOCKS(dquot->dq_sb));
        if (ret)
                goto out;
        depth = reiserfs_write_unlock_nested(dquot->dq_sb);
        ret = dquot_acquire(dquot);
        reiserfs_write_lock_nested(dquot->dq_sb, depth);
        err = journal_end(&th);
        if (!ret && err)
                ret = err;
out:
        reiserfs_write_unlock(dquot->dq_sb);
        return ret;
}

static int reiserfs_release_dquot(struct dquot *dquot)
{
        struct reiserfs_transaction_handle th;
        int ret, err;

        reiserfs_write_lock(dquot->dq_sb);
        ret =
            journal_begin(&th, dquot->dq_sb,
                          REISERFS_QUOTA_DEL_BLOCKS(dquot->dq_sb));
        reiserfs_write_unlock(dquot->dq_sb);
        if (ret) {
                /* Release dquot anyway to avoid endless cycle in dqput() */
                dquot_release(dquot);
                goto out;
        }
        ret = dquot_release(dquot);
        reiserfs_write_lock(dquot->dq_sb);
        err = journal_end(&th);
        if (!ret && err)
                ret = err;
        reiserfs_write_unlock(dquot->dq_sb);
out:
        return ret;
}

static int reiserfs_mark_dquot_dirty(struct dquot *dquot)
{
        /* Are we journaling quotas? */
        if (REISERFS_SB(dquot->dq_sb)->s_qf_names[USRQUOTA] ||
            REISERFS_SB(dquot->dq_sb)->s_qf_names[GRPQUOTA]) {
                dquot_mark_dquot_dirty(dquot);
                return reiserfs_write_dquot(dquot);
        } else
                return dquot_mark_dquot_dirty(dquot);
}

static int reiserfs_write_info(struct super_block *sb, int type)
{
        struct reiserfs_transaction_handle th;
        int ret, err;
        int depth;

        /* Data block + inode block */
        reiserfs_write_lock(sb);
        ret = journal_begin(&th, sb, 2);
        if (ret)
                goto out;
        depth = reiserfs_write_unlock_nested(sb);
        ret = dquot_commit_info(sb, type);
        reiserfs_write_lock_nested(sb, depth);
        err = journal_end(&th);
        if (!ret && err)
                ret = err;
out:
        reiserfs_write_unlock(sb);
        return ret;
}

/*
 * Turn on quotas during mount time - we need to find the quota file and such...
 */
static int reiserfs_quota_on_mount(struct super_block *sb, int type)
{
        return dquot_quota_on_mount(sb, REISERFS_SB(sb)->s_qf_names[type],
                                        REISERFS_SB(sb)->s_jquota_fmt, type);
}

/*
 * Standard function to be called on quota_on
 */
static int reiserfs_quota_on(struct super_block *sb, int type, int format_id,
                             const struct path *path)
{
        int err;
        struct inode *inode;
        struct reiserfs_transaction_handle th;
        int opt = type == USRQUOTA ? REISERFS_USRQUOTA : REISERFS_GRPQUOTA;

        reiserfs_write_lock(sb);
        if (!(REISERFS_SB(sb)->s_mount_opt & (1 << opt))) {
                err = -EINVAL;
                goto out;
        }

        /* Quotafile not on the same filesystem? */
        if (path->dentry->d_sb != sb) {
                err = -EXDEV;
                goto out;
        }
        inode = d_inode(path->dentry);
        /*
         * We must not pack tails for quota files on reiserfs for quota
         * IO to work
         */
        if (!(REISERFS_I(inode)->i_flags & i_nopack_mask)) {
                err = reiserfs_unpack(inode);
                if (err) {
                        reiserfs_warning(sb, "super-6520",
                                "Unpacking tail of quota file failed"
                                " (%d). Cannot turn on quotas.", err);
                        err = -EINVAL;
                        goto out;
                }
                mark_inode_dirty(inode);
        }
        /* Journaling quota? */
        if (REISERFS_SB(sb)->s_qf_names[type]) {
                /* Quotafile not of fs root? */
                if (path->dentry->d_parent != sb->s_root)
                        reiserfs_warning(sb, "super-6521",
                                 "Quota file not on filesystem root. "
                                 "Journalled quota will not work.");
        }

        /*
         * When we journal data on quota file, we have to flush journal to see
         * all updates to the file when we bypass pagecache...
         */
        if (reiserfs_file_data_log(inode)) {
                /* Just start temporary transaction and finish it */
                err = journal_begin(&th, sb, 1);
                if (err)
                        goto out;
                err = journal_end_sync(&th);
                if (err)
                        goto out;
        }
        reiserfs_write_unlock(sb);
        err = dquot_quota_on(sb, type, format_id, path);
        if (!err) {
                inode_lock(inode);
                REISERFS_I(inode)->i_attrs |= REISERFS_IMMUTABLE_FL |
                                              REISERFS_NOATIME_FL;
                inode_set_flags(inode, S_IMMUTABLE | S_NOATIME,
                                S_IMMUTABLE | S_NOATIME);
                inode_unlock(inode);
                mark_inode_dirty(inode);
        }
        return err;
out:
        reiserfs_write_unlock(sb);
        return err;
}

static int reiserfs_quota_off(struct super_block *sb, int type)
{
        int err;
        struct inode *inode = sb_dqopt(sb)->files[type];

        if (!inode || !igrab(inode))
                goto out;

        err = dquot_quota_off(sb, type);
        if (err)
                goto out_put;

        inode_lock(inode);
        REISERFS_I(inode)->i_attrs &= ~(REISERFS_IMMUTABLE_FL |
                                        REISERFS_NOATIME_FL);
        inode_set_flags(inode, 0, S_IMMUTABLE | S_NOATIME);
        inode_unlock(inode);
        mark_inode_dirty(inode);
out_put:
        iput(inode);
        return err;
out:
        return dquot_quota_off(sb, type);
}

/*
 * Read data from quotafile - avoid pagecache and such because we cannot afford
 * acquiring the locks... As quota files are never truncated and quota code
 * itself serializes the operations (and no one else should touch the files)
 * we don't have to be afraid of races
 */
static ssize_t reiserfs_quota_read(struct super_block *sb, int type, char *data,
                                   size_t len, loff_t off)
{
        struct inode *inode = sb_dqopt(sb)->files[type];
        unsigned long blk = off >> sb->s_blocksize_bits;
        int err = 0, offset = off & (sb->s_blocksize - 1), tocopy;
        size_t toread;
        struct buffer_head tmp_bh, *bh;
        loff_t i_size = i_size_read(inode);

        if (off > i_size)
                return 0;
        if (off + len > i_size)
                len = i_size - off;
        toread = len;
        while (toread > 0) {
                tocopy =
                    sb->s_blocksize - offset <
                    toread ? sb->s_blocksize - offset : toread;
                tmp_bh.b_state = 0;
                /*
                 * Quota files are without tails so we can safely
                 * use this function
                 */
                reiserfs_write_lock(sb);
                err = reiserfs_get_block(inode, blk, &tmp_bh, 0);
                reiserfs_write_unlock(sb);
                if (err)
                        return err;
                if (!buffer_mapped(&tmp_bh))    /* A hole? */
                        memset(data, 0, tocopy);
                else {
                        bh = sb_bread(sb, tmp_bh.b_blocknr);
                        if (!bh)
                                return -EIO;
                        memcpy(data, bh->b_data + offset, tocopy);
                        brelse(bh);
                }
                offset = 0;
                toread -= tocopy;
                data += tocopy;
                blk++;
        }
        return len;
}

/*
 * Write to quotafile (we know the transaction is already started and has
 * enough credits)
 */
static ssize_t reiserfs_quota_write(struct super_block *sb, int type,
                                    const char *data, size_t len, loff_t off)
{
        struct inode *inode = sb_dqopt(sb)->files[type];
        unsigned long blk = off >> sb->s_blocksize_bits;
        int err = 0, offset = off & (sb->s_blocksize - 1), tocopy;
        int journal_quota = REISERFS_SB(sb)->s_qf_names[type] != NULL;
        size_t towrite = len;
        struct buffer_head tmp_bh, *bh;

        if (!current->journal_info) {
                printk(KERN_WARNING "reiserfs: Quota write (off=%llu, len=%llu) cancelled because transaction is not started.\n",
                        (unsigned long long)off, (unsigned long long)len);
                return -EIO;
        }
        while (towrite > 0) {
                tocopy = sb->s_blocksize - offset < towrite ?
                    sb->s_blocksize - offset : towrite;
                tmp_bh.b_state = 0;
                reiserfs_write_lock(sb);
                err = reiserfs_get_block(inode, blk, &tmp_bh, GET_BLOCK_CREATE);
                reiserfs_write_unlock(sb);
                if (err)
                        goto out;
                if (offset || tocopy != sb->s_blocksize)
                        bh = sb_bread(sb, tmp_bh.b_blocknr);
                else
                        bh = sb_getblk(sb, tmp_bh.b_blocknr);
                if (!bh) {
                        err = -EIO;
                        goto out;
                }
                lock_buffer(bh);
                memcpy(bh->b_data + offset, data, tocopy);
                flush_dcache_page(bh->b_page);
                set_buffer_uptodate(bh);
                unlock_buffer(bh);
                reiserfs_write_lock(sb);
                reiserfs_prepare_for_journal(sb, bh, 1);
                journal_mark_dirty(current->journal_info, bh);
                if (!journal_quota)
                        reiserfs_add_ordered_list(inode, bh);
                reiserfs_write_unlock(sb);
                brelse(bh);
                offset = 0;
                towrite -= tocopy;
                data += tocopy;
                blk++;
        }
out:
        if (len == towrite)
                return err;
        if (inode->i_size < off + len - towrite)
                i_size_write(inode, off + len - towrite);
        inode->i_mtime = inode->i_ctime = current_time(inode);
        mark_inode_dirty(inode);
        return len - towrite;
}

#endif

static struct dentry *get_super_block(struct file_system_type *fs_type,
                           int flags, const char *dev_name,
                           void *data)
{
        return mount_bdev(fs_type, flags, dev_name, data, reiserfs_fill_super);
}

static int __init init_reiserfs_fs(void)
{
        int ret;

        ret = init_inodecache();
        if (ret)
                return ret;

        reiserfs_proc_info_global_init();

        ret = register_filesystem(&reiserfs_fs_type);
        if (ret)
                goto out;

        return 0;
out:
        reiserfs_proc_info_global_done();
        destroy_inodecache();

        return ret;
}

static void __exit exit_reiserfs_fs(void)
{
        reiserfs_proc_info_global_done();
        unregister_filesystem(&reiserfs_fs_type);
        destroy_inodecache();
}

struct file_system_type reiserfs_fs_type = {
        .owner = THIS_MODULE,
        .name = "reiserfs",
        .mount = get_super_block,
        .kill_sb = reiserfs_kill_sb,
        .fs_flags = FS_REQUIRES_DEV,
};
MODULE_ALIAS_FS("reiserfs");

MODULE_DESCRIPTION("ReiserFS journaled filesystem");
MODULE_AUTHOR("Hans Reiser <reiser@namesys.com>");
MODULE_LICENSE("GPL");

module_init(init_reiserfs_fs);
module_exit(exit_reiserfs_fs);