[XFS] Update license/copyright notices to match the prefered SGI

[deliverable/linux.git] / fs / xfs / quota / xfs_qm_syscalls.c

/*
 * Copyright (c) 2000-2005 Silicon Graphics, Inc.
 * All Rights Reserved.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it would be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write the Free Software Foundation,
 * Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */
#include "xfs.h"
#include "xfs_fs.h"
#include "xfs_bit.h"
#include "xfs_log.h"
#include "xfs_inum.h"
#include "xfs_trans.h"
#include "xfs_sb.h"
#include "xfs_ag.h"
#include "xfs_dir.h"
#include "xfs_dir2.h"
#include "xfs_alloc.h"
#include "xfs_dmapi.h"
#include "xfs_quota.h"
#include "xfs_mount.h"
#include "xfs_bmap_btree.h"
#include "xfs_alloc_btree.h"
#include "xfs_ialloc_btree.h"
#include "xfs_dir_sf.h"
#include "xfs_dir2_sf.h"
#include "xfs_attr_sf.h"
#include "xfs_dinode.h"
#include "xfs_inode.h"
#include "xfs_ialloc.h"
#include "xfs_itable.h"
#include "xfs_bmap.h"
#include "xfs_btree.h"
#include "xfs_rtalloc.h"
#include "xfs_error.h"
#include "xfs_rw.h"
#include "xfs_acl.h"
#include "xfs_cap.h"
#include "xfs_mac.h"
#include "xfs_attr.h"
#include "xfs_buf_item.h"
#include "xfs_utils.h"
#include "xfs_qm.h"

#ifdef DEBUG
# define qdprintk(s, args...)   cmn_err(CE_DEBUG, s, ## args)
#else
# define qdprintk(s, args...)   do { } while (0)
#endif

STATIC int      xfs_qm_scall_trunc_qfiles(xfs_mount_t *, uint);
STATIC int      xfs_qm_scall_getquota(xfs_mount_t *, xfs_dqid_t, uint,
                                        fs_disk_quota_t *);
STATIC int      xfs_qm_scall_getqstat(xfs_mount_t *, fs_quota_stat_t *);
STATIC int      xfs_qm_scall_setqlim(xfs_mount_t *, xfs_dqid_t, uint,
                                        fs_disk_quota_t *);
STATIC int      xfs_qm_scall_quotaon(xfs_mount_t *, uint);
STATIC int      xfs_qm_scall_quotaoff(xfs_mount_t *, uint, boolean_t);
STATIC int      xfs_qm_log_quotaoff(xfs_mount_t *, xfs_qoff_logitem_t **, uint);
STATIC int      xfs_qm_log_quotaoff_end(xfs_mount_t *, xfs_qoff_logitem_t *,
                                        uint);
STATIC uint     xfs_qm_import_flags(uint);
STATIC uint     xfs_qm_export_flags(uint);
STATIC uint     xfs_qm_import_qtype_flags(uint);
STATIC uint     xfs_qm_export_qtype_flags(uint);
STATIC void     xfs_qm_export_dquot(xfs_mount_t *, xfs_disk_dquot_t *,
                                        fs_disk_quota_t *);


/*
 * The main distribution switch of all XFS quotactl system calls.
 */
int
xfs_qm_quotactl(
        struct bhv_desc *bdp,
        int             cmd,
        int             id,
        xfs_caddr_t     addr)
{
        xfs_mount_t     *mp;
        int             error;
        struct vfs      *vfsp;

        vfsp = bhvtovfs(bdp);
        mp = XFS_VFSTOM(vfsp);

        ASSERT(addr != NULL || cmd == Q_XQUOTASYNC);

        /*
         * The following commands are valid even when quotaoff.
         */
        switch (cmd) {
        case Q_XQUOTARM:
                /*
                 * Truncate quota files. quota must be off.
                 */
                if (XFS_IS_QUOTA_ON(mp))
                        return XFS_ERROR(EINVAL);
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                return (xfs_qm_scall_trunc_qfiles(mp,
                               xfs_qm_import_qtype_flags(*(uint *)addr)));

        case Q_XGETQSTAT:
                /*
                 * Get quota status information.
                 */
                return (xfs_qm_scall_getqstat(mp, (fs_quota_stat_t *)addr));

        case Q_XQUOTAON:
                /*
                 * QUOTAON - enabling quota enforcement.
                 * Quota accounting must be turned on at mount time.
                 */
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                return (xfs_qm_scall_quotaon(mp,
                                          xfs_qm_import_flags(*(uint *)addr)));

        case Q_XQUOTAOFF:
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                break;

        case Q_XQUOTASYNC:
                return (xfs_sync_inodes(mp, SYNC_DELWRI, 0, NULL));

        default:
                break;
        }

        if (! XFS_IS_QUOTA_ON(mp))
                return XFS_ERROR(ESRCH);

        switch (cmd) {
        case Q_XQUOTAOFF:
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                error = xfs_qm_scall_quotaoff(mp,
                                            xfs_qm_import_flags(*(uint *)addr),
                                            B_FALSE);
                break;

        case Q_XGETQUOTA:
                error = xfs_qm_scall_getquota(mp, (xfs_dqid_t)id, XFS_DQ_USER,
                                        (fs_disk_quota_t *)addr);
                break;
        case Q_XGETGQUOTA:
                error = xfs_qm_scall_getquota(mp, (xfs_dqid_t)id, XFS_DQ_GROUP,
                                        (fs_disk_quota_t *)addr);
                break;
        case Q_XGETPQUOTA:
                error = xfs_qm_scall_getquota(mp, (xfs_dqid_t)id, XFS_DQ_PROJ,
                                        (fs_disk_quota_t *)addr);
                break;

        case Q_XSETQLIM:
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                error = xfs_qm_scall_setqlim(mp, (xfs_dqid_t)id, XFS_DQ_USER,
                                             (fs_disk_quota_t *)addr);
                break;
        case Q_XSETGQLIM:
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                error = xfs_qm_scall_setqlim(mp, (xfs_dqid_t)id, XFS_DQ_GROUP,
                                             (fs_disk_quota_t *)addr);
                break;
        case Q_XSETPQLIM:
                if (vfsp->vfs_flag & VFS_RDONLY)
                        return XFS_ERROR(EROFS);
                error = xfs_qm_scall_setqlim(mp, (xfs_dqid_t)id, XFS_DQ_PROJ,
                                             (fs_disk_quota_t *)addr);
                break;

        default:
                error = XFS_ERROR(EINVAL);
                break;
        }

        return (error);
}

/*
 * Turn off quota accounting and/or enforcement for all udquots and/or
 * gdquots. Called only at unmount time.
 *
 * This assumes that there are no dquots of this file system cached
 * incore, and modifies the ondisk dquot directly. Therefore, for example,
 * it is an error to call this twice, without purging the cache.
 */
STATIC int
xfs_qm_scall_quotaoff(
        xfs_mount_t             *mp,
        uint                    flags,
        boolean_t               force)
{
        uint                    dqtype;
        unsigned long   s;
        int                     error;
        uint                    inactivate_flags;
        xfs_qoff_logitem_t      *qoffstart;
        int                     nculprits;

        if (!force && !capable(CAP_SYS_ADMIN))
                return XFS_ERROR(EPERM);
        /*
         * No file system can have quotas enabled on disk but not in core.
         * Note that quota utilities (like quotaoff) _expect_
         * errno == EEXIST here.
         */
        if ((mp->m_qflags & flags) == 0)
                return XFS_ERROR(EEXIST);
        error = 0;

        flags &= (XFS_ALL_QUOTA_ACCT | XFS_ALL_QUOTA_ENFD);

        /*
         * We don't want to deal with two quotaoffs messing up each other,
         * so we're going to serialize it. quotaoff isn't exactly a performance
         * critical thing.
         * If quotaoff, then we must be dealing with the root filesystem.
         */
        ASSERT(mp->m_quotainfo);
        if (mp->m_quotainfo)
                mutex_lock(&(XFS_QI_QOFFLOCK(mp)), PINOD);

        ASSERT(mp->m_quotainfo);

        /*
         * If we're just turning off quota enforcement, change mp and go.
         */
        if ((flags & XFS_ALL_QUOTA_ACCT) == 0) {
                mp->m_qflags &= ~(flags);

                s = XFS_SB_LOCK(mp);
                mp->m_sb.sb_qflags = mp->m_qflags;
                XFS_SB_UNLOCK(mp, s);
                mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));

                /* XXX what to do if error ? Revert back to old vals incore ? */
                error = xfs_qm_write_sb_changes(mp, XFS_SB_QFLAGS);
                return (error);
        }

        dqtype = 0;
        inactivate_flags = 0;
        /*
         * If accounting is off, we must turn enforcement off, clear the
         * quota 'CHKD' certificate to make it known that we have to
         * do a quotacheck the next time this quota is turned on.
         */
        if (flags & XFS_UQUOTA_ACCT) {
                dqtype |= XFS_QMOPT_UQUOTA;
                flags |= (XFS_UQUOTA_CHKD | XFS_UQUOTA_ENFD);
                inactivate_flags |= XFS_UQUOTA_ACTIVE;
        }
        if (flags & XFS_GQUOTA_ACCT) {
                dqtype |= XFS_QMOPT_GQUOTA;
                flags |= (XFS_OQUOTA_CHKD | XFS_OQUOTA_ENFD);
                inactivate_flags |= XFS_GQUOTA_ACTIVE;
        } else if (flags & XFS_PQUOTA_ACCT) {
                dqtype |= XFS_QMOPT_PQUOTA;
                flags |= (XFS_OQUOTA_CHKD | XFS_OQUOTA_ENFD);
                inactivate_flags |= XFS_PQUOTA_ACTIVE;
        }

        /*
         * Nothing to do?  Don't complain. This happens when we're just
         * turning off quota enforcement.
         */
        if ((mp->m_qflags & flags) == 0) {
                mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));
                return (0);
        }

        /*
         * Write the LI_QUOTAOFF log record, and do SB changes atomically,
         * and synchronously.
         */
        xfs_qm_log_quotaoff(mp, &qoffstart, flags);

        /*
         * Next we clear the XFS_MOUNT_*DQ_ACTIVE bit(s) in the mount struct
         * to take care of the race between dqget and quotaoff. We don't take
         * any special locks to reset these bits. All processes need to check
         * these bits *after* taking inode lock(s) to see if the particular
         * quota type is in the process of being turned off. If *ACTIVE, it is
         * guaranteed that all dquot structures and all quotainode ptrs will all
         * stay valid as long as that inode is kept locked.
         *
         * There is no turning back after this.
         */
        mp->m_qflags &= ~inactivate_flags;

        /*
         * Give back all the dquot reference(s) held by inodes.
         * Here we go thru every single incore inode in this file system, and
         * do a dqrele on the i_udquot/i_gdquot that it may have.
         * Essentially, as long as somebody has an inode locked, this guarantees
         * that quotas will not be turned off. This is handy because in a
         * transaction once we lock the inode(s) and check for quotaon, we can
         * depend on the quota inodes (and other things) being valid as long as
         * we keep the lock(s).
         */
        xfs_qm_dqrele_all_inodes(mp, flags);

        /*
         * Next we make the changes in the quota flag in the mount struct.
         * This isn't protected by a particular lock directly, because we
         * don't want to take a mrlock everytime we depend on quotas being on.
         */
        mp->m_qflags &= ~(flags);

        /*
         * Go through all the dquots of this file system and purge them,
         * according to what was turned off. We may not be able to get rid
         * of all dquots, because dquots can have temporary references that
         * are not attached to inodes. eg. xfs_setattr, xfs_create.
         * So, if we couldn't purge all the dquots from the filesystem,
         * we can't get rid of the incore data structures.
         */
        while ((nculprits = xfs_qm_dqpurge_all(mp, dqtype|XFS_QMOPT_QUOTAOFF)))
                delay(10 * nculprits);

        /*
         * Transactions that had started before ACTIVE state bit was cleared
         * could have logged many dquots, so they'd have higher LSNs than
         * the first QUOTAOFF log record does. If we happen to crash when
         * the tail of the log has gone past the QUOTAOFF record, but
         * before the last dquot modification, those dquots __will__
         * recover, and that's not good.
         *
         * So, we have QUOTAOFF start and end logitems; the start
         * logitem won't get overwritten until the end logitem appears...
         */
        xfs_qm_log_quotaoff_end(mp, qoffstart, flags);

        /*
         * If quotas is completely disabled, close shop.
         */
        if (((flags & XFS_MOUNT_QUOTA_ALL) == XFS_MOUNT_QUOTA_SET1) ||
            ((flags & XFS_MOUNT_QUOTA_ALL) == XFS_MOUNT_QUOTA_SET2)) {
                mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));
                xfs_qm_destroy_quotainfo(mp);
                return (0);
        }

        /*
         * Release our quotainode references, and vn_purge them,
         * if we don't need them anymore.
         */
        if ((dqtype & XFS_QMOPT_UQUOTA) && XFS_QI_UQIP(mp)) {
                XFS_PURGE_INODE(XFS_QI_UQIP(mp));
                XFS_QI_UQIP(mp) = NULL;
        }
        if ((dqtype & (XFS_QMOPT_GQUOTA|XFS_QMOPT_PQUOTA)) && XFS_QI_GQIP(mp)) {
                XFS_PURGE_INODE(XFS_QI_GQIP(mp));
                XFS_QI_GQIP(mp) = NULL;
        }
        mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));

        return (error);
}

STATIC int
xfs_qm_scall_trunc_qfiles(
        xfs_mount_t     *mp,
        uint            flags)
{
        int             error;
        xfs_inode_t     *qip;

        if (!capable(CAP_SYS_ADMIN))
                return XFS_ERROR(EPERM);
        error = 0;
        if (!XFS_SB_VERSION_HASQUOTA(&mp->m_sb) || flags == 0) {
                qdprintk("qtrunc flags=%x m_qflags=%x\n", flags, mp->m_qflags);
                return XFS_ERROR(EINVAL);
        }

        if ((flags & XFS_DQ_USER) && mp->m_sb.sb_uquotino != NULLFSINO) {
                error = xfs_iget(mp, NULL, mp->m_sb.sb_uquotino, 0, 0, &qip, 0);
                if (! error) {
                        (void) xfs_truncate_file(mp, qip);
                        VN_RELE(XFS_ITOV(qip));
                }
        }

        if ((flags & (XFS_DQ_GROUP|XFS_DQ_PROJ)) &&
            mp->m_sb.sb_gquotino != NULLFSINO) {
                error = xfs_iget(mp, NULL, mp->m_sb.sb_gquotino, 0, 0, &qip, 0);
                if (! error) {
                        (void) xfs_truncate_file(mp, qip);
                        VN_RELE(XFS_ITOV(qip));
                }
        }

        return (error);
}


/*
 * Switch on (a given) quota enforcement for a filesystem.  This takes
 * effect immediately.
 * (Switching on quota accounting must be done at mount time.)
 */
STATIC int
xfs_qm_scall_quotaon(
        xfs_mount_t     *mp,
        uint            flags)
{
        int             error;
        unsigned long   s;
        uint            qf;
        uint            accflags;
        __int64_t       sbflags;

        if (!capable(CAP_SYS_ADMIN))
                return XFS_ERROR(EPERM);

        flags &= (XFS_ALL_QUOTA_ACCT | XFS_ALL_QUOTA_ENFD);
        /*
         * Switching on quota accounting must be done at mount time.
         */
        accflags = flags & XFS_ALL_QUOTA_ACCT;
        flags &= ~(XFS_ALL_QUOTA_ACCT);

        sbflags = 0;

        if (flags == 0) {
                qdprintk("quotaon: zero flags, m_qflags=%x\n", mp->m_qflags);
                return XFS_ERROR(EINVAL);
        }

        /* No fs can turn on quotas with a delayed effect */
        ASSERT((flags & XFS_ALL_QUOTA_ACCT) == 0);

        /*
         * Can't enforce without accounting. We check the superblock
         * qflags here instead of m_qflags because rootfs can have
         * quota acct on ondisk without m_qflags' knowing.
         */
        if (((flags & XFS_UQUOTA_ACCT) == 0 &&
            (mp->m_sb.sb_qflags & XFS_UQUOTA_ACCT) == 0 &&
            (flags & XFS_UQUOTA_ENFD))
            ||
            ((flags & XFS_PQUOTA_ACCT) == 0 &&
            (mp->m_sb.sb_qflags & XFS_PQUOTA_ACCT) == 0 &&
            (flags & XFS_OQUOTA_ENFD))
            ||
            ((flags & XFS_GQUOTA_ACCT) == 0 &&
            (mp->m_sb.sb_qflags & XFS_GQUOTA_ACCT) == 0 &&
            (flags & XFS_OQUOTA_ENFD))) {
                qdprintk("Can't enforce without acct, flags=%x sbflags=%x\n",
                        flags, mp->m_sb.sb_qflags);
                return XFS_ERROR(EINVAL);
        }
        /*
         * If everything's upto-date incore, then don't waste time.
         */
        if ((mp->m_qflags & flags) == flags)
                return XFS_ERROR(EEXIST);

        /*
         * Change sb_qflags on disk but not incore mp->qflags
         * if this is the root filesystem.
         */
        s = XFS_SB_LOCK(mp);
        qf = mp->m_sb.sb_qflags;
        mp->m_sb.sb_qflags = qf | flags;
        XFS_SB_UNLOCK(mp, s);

        /*
         * There's nothing to change if it's the same.
         */
        if ((qf & flags) == flags && sbflags == 0)
                return XFS_ERROR(EEXIST);
        sbflags |= XFS_SB_QFLAGS;

        if ((error = xfs_qm_write_sb_changes(mp, sbflags)))
                return (error);
        /*
         * If we aren't trying to switch on quota enforcement, we are done.
         */
        if  (((mp->m_sb.sb_qflags & XFS_UQUOTA_ACCT) !=
             (mp->m_qflags & XFS_UQUOTA_ACCT)) ||
             ((mp->m_sb.sb_qflags & XFS_PQUOTA_ACCT) !=
             (mp->m_qflags & XFS_PQUOTA_ACCT)) ||
             ((mp->m_sb.sb_qflags & XFS_GQUOTA_ACCT) !=
             (mp->m_qflags & XFS_GQUOTA_ACCT)) ||
            (flags & XFS_ALL_QUOTA_ENFD) == 0)
                return (0);

        if (! XFS_IS_QUOTA_RUNNING(mp))
                return XFS_ERROR(ESRCH);

        /*
         * Switch on quota enforcement in core.
         */
        mutex_lock(&(XFS_QI_QOFFLOCK(mp)), PINOD);
        mp->m_qflags |= (flags & XFS_ALL_QUOTA_ENFD);
        mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));

        return (0);
}


/*
 * Return quota status information, such as uquota-off, enforcements, etc.
 */
STATIC int
xfs_qm_scall_getqstat(
        xfs_mount_t     *mp,
        fs_quota_stat_t *out)
{
        xfs_inode_t     *uip, *gip;
        boolean_t       tempuqip, tempgqip;

        uip = gip = NULL;
        tempuqip = tempgqip = B_FALSE;
        memset(out, 0, sizeof(fs_quota_stat_t));

        out->qs_version = FS_QSTAT_VERSION;
        if (! XFS_SB_VERSION_HASQUOTA(&mp->m_sb)) {
                out->qs_uquota.qfs_ino = NULLFSINO;
                out->qs_gquota.qfs_ino = NULLFSINO;
                return (0);
        }
        out->qs_flags = (__uint16_t) xfs_qm_export_flags(mp->m_qflags &
                                                        (XFS_ALL_QUOTA_ACCT|
                                                         XFS_ALL_QUOTA_ENFD));
        out->qs_pad = 0;
        out->qs_uquota.qfs_ino = mp->m_sb.sb_uquotino;
        out->qs_gquota.qfs_ino = mp->m_sb.sb_gquotino;

        if (mp->m_quotainfo) {
                uip = mp->m_quotainfo->qi_uquotaip;
                gip = mp->m_quotainfo->qi_gquotaip;
        }
        if (!uip && mp->m_sb.sb_uquotino != NULLFSINO) {
                if (xfs_iget(mp, NULL, mp->m_sb.sb_uquotino,
                                        0, 0, &uip, 0) == 0)
                        tempuqip = B_TRUE;
        }
        if (!gip && mp->m_sb.sb_gquotino != NULLFSINO) {
                if (xfs_iget(mp, NULL, mp->m_sb.sb_gquotino,
                                        0, 0, &gip, 0) == 0)
                        tempgqip = B_TRUE;
        }
        if (uip) {
                out->qs_uquota.qfs_nblks = uip->i_d.di_nblocks;
                out->qs_uquota.qfs_nextents = uip->i_d.di_nextents;
                if (tempuqip)
                        VN_RELE(XFS_ITOV(uip));
        }
        if (gip) {
                out->qs_gquota.qfs_nblks = gip->i_d.di_nblocks;
                out->qs_gquota.qfs_nextents = gip->i_d.di_nextents;
                if (tempgqip)
                        VN_RELE(XFS_ITOV(gip));
        }
        if (mp->m_quotainfo) {
                out->qs_incoredqs = XFS_QI_MPLNDQUOTS(mp);
                out->qs_btimelimit = XFS_QI_BTIMELIMIT(mp);
                out->qs_itimelimit = XFS_QI_ITIMELIMIT(mp);
                out->qs_rtbtimelimit = XFS_QI_RTBTIMELIMIT(mp);
                out->qs_bwarnlimit = XFS_QI_BWARNLIMIT(mp);
                out->qs_iwarnlimit = XFS_QI_IWARNLIMIT(mp);
        }
        return (0);
}

/*
 * Adjust quota limits, and start/stop timers accordingly.
 */
STATIC int
xfs_qm_scall_setqlim(
        xfs_mount_t             *mp,
        xfs_dqid_t              id,
        uint                    type,
        fs_disk_quota_t         *newlim)
{
        xfs_disk_dquot_t        *ddq;
        xfs_dquot_t             *dqp;
        xfs_trans_t             *tp;
        int                     error;
        xfs_qcnt_t              hard, soft;

        if (!capable(CAP_SYS_ADMIN))
                return XFS_ERROR(EPERM);

        if ((newlim->d_fieldmask &
            (FS_DQ_LIMIT_MASK|FS_DQ_TIMER_MASK|FS_DQ_WARNS_MASK)) == 0)
                return (0);

        tp = xfs_trans_alloc(mp, XFS_TRANS_QM_SETQLIM);
        if ((error = xfs_trans_reserve(tp, 0, sizeof(xfs_disk_dquot_t) + 128,
                                      0, 0, XFS_DEFAULT_LOG_COUNT))) {
                xfs_trans_cancel(tp, 0);
                return (error);
        }

        /*
         * We don't want to race with a quotaoff so take the quotaoff lock.
         * (We don't hold an inode lock, so there's nothing else to stop
         * a quotaoff from happening). (XXXThis doesn't currently happen
         * because we take the vfslock before calling xfs_qm_sysent).
         */
        mutex_lock(&(XFS_QI_QOFFLOCK(mp)), PINOD);

        /*
         * Get the dquot (locked), and join it to the transaction.
         * Allocate the dquot if this doesn't exist.
         */
        if ((error = xfs_qm_dqget(mp, NULL, id, type, XFS_QMOPT_DQALLOC, &dqp))) {
                xfs_trans_cancel(tp, XFS_TRANS_ABORT);
                mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));
                ASSERT(error != ENOENT);
                return (error);
        }
        xfs_dqtrace_entry(dqp, "Q_SETQLIM: AFT DQGET");
        xfs_trans_dqjoin(tp, dqp);
        ddq = &dqp->q_core;

        /*
         * Make sure that hardlimits are >= soft limits before changing.
         */
        hard = (newlim->d_fieldmask & FS_DQ_BHARD) ?
                (xfs_qcnt_t) XFS_BB_TO_FSB(mp, newlim->d_blk_hardlimit) :
                        INT_GET(ddq->d_blk_hardlimit, ARCH_CONVERT);
        soft = (newlim->d_fieldmask & FS_DQ_BSOFT) ?
                (xfs_qcnt_t) XFS_BB_TO_FSB(mp, newlim->d_blk_softlimit) :
                        INT_GET(ddq->d_blk_softlimit, ARCH_CONVERT);
        if (hard == 0 || hard >= soft) {
                INT_SET(ddq->d_blk_hardlimit, ARCH_CONVERT, hard);
                INT_SET(ddq->d_blk_softlimit, ARCH_CONVERT, soft);
                if (id == 0) {
                        mp->m_quotainfo->qi_bhardlimit = hard;
                        mp->m_quotainfo->qi_bsoftlimit = soft;
                }
        } else {
                qdprintk("blkhard %Ld < blksoft %Ld\n", hard, soft);
        }
        hard = (newlim->d_fieldmask & FS_DQ_RTBHARD) ?
                (xfs_qcnt_t) XFS_BB_TO_FSB(mp, newlim->d_rtb_hardlimit) :
                        INT_GET(ddq->d_rtb_hardlimit, ARCH_CONVERT);
        soft = (newlim->d_fieldmask & FS_DQ_RTBSOFT) ?
                (xfs_qcnt_t) XFS_BB_TO_FSB(mp, newlim->d_rtb_softlimit) :
                        INT_GET(ddq->d_rtb_softlimit, ARCH_CONVERT);
        if (hard == 0 || hard >= soft) {
                INT_SET(ddq->d_rtb_hardlimit, ARCH_CONVERT, hard);
                INT_SET(ddq->d_rtb_softlimit, ARCH_CONVERT, soft);
                if (id == 0) {
                        mp->m_quotainfo->qi_rtbhardlimit = hard;
                        mp->m_quotainfo->qi_rtbsoftlimit = soft;
                }
        } else {
                qdprintk("rtbhard %Ld < rtbsoft %Ld\n", hard, soft);
        }

        hard = (newlim->d_fieldmask & FS_DQ_IHARD) ?
                (xfs_qcnt_t) newlim->d_ino_hardlimit :
                        INT_GET(ddq->d_ino_hardlimit, ARCH_CONVERT);
        soft = (newlim->d_fieldmask & FS_DQ_ISOFT) ?
                (xfs_qcnt_t) newlim->d_ino_softlimit :
                        INT_GET(ddq->d_ino_softlimit, ARCH_CONVERT);
        if (hard == 0 || hard >= soft) {
                INT_SET(ddq->d_ino_hardlimit, ARCH_CONVERT, hard);
                INT_SET(ddq->d_ino_softlimit, ARCH_CONVERT, soft);
                if (id == 0) {
                        mp->m_quotainfo->qi_ihardlimit = hard;
                        mp->m_quotainfo->qi_isoftlimit = soft;
                }
        } else {
                qdprintk("ihard %Ld < isoft %Ld\n", hard, soft);
        }

        /*
         * Update warnings counter(s) if requested
         */
        if (newlim->d_fieldmask & FS_DQ_BWARNS)
                INT_SET(ddq->d_bwarns, ARCH_CONVERT, newlim->d_bwarns);
        if (newlim->d_fieldmask & FS_DQ_IWARNS)
                INT_SET(ddq->d_iwarns, ARCH_CONVERT, newlim->d_iwarns);
        if (newlim->d_fieldmask & FS_DQ_RTBWARNS)
                INT_SET(ddq->d_rtbwarns, ARCH_CONVERT, newlim->d_rtbwarns);

        if (id == 0) {
                /*
                 * Timelimits for the super user set the relative time
                 * the other users can be over quota for this file system.
                 * If it is zero a default is used.  Ditto for the default
                 * soft and hard limit values (already done, above), and
                 * for warnings.
                 */
                if (newlim->d_fieldmask & FS_DQ_BTIMER) {
                        mp->m_quotainfo->qi_btimelimit = newlim->d_btimer;
                        INT_SET(ddq->d_btimer, ARCH_CONVERT, newlim->d_btimer);
                }
                if (newlim->d_fieldmask & FS_DQ_ITIMER) {
                        mp->m_quotainfo->qi_itimelimit = newlim->d_itimer;
                        INT_SET(ddq->d_itimer, ARCH_CONVERT, newlim->d_itimer);
                }
                if (newlim->d_fieldmask & FS_DQ_RTBTIMER) {
                        mp->m_quotainfo->qi_rtbtimelimit = newlim->d_rtbtimer;
                        INT_SET(ddq->d_rtbtimer, ARCH_CONVERT, newlim->d_rtbtimer);
                }
                if (newlim->d_fieldmask & FS_DQ_BWARNS)
                        mp->m_quotainfo->qi_bwarnlimit = newlim->d_bwarns;
                if (newlim->d_fieldmask & FS_DQ_IWARNS)
                        mp->m_quotainfo->qi_iwarnlimit = newlim->d_iwarns;
                if (newlim->d_fieldmask & FS_DQ_RTBWARNS)
                        mp->m_quotainfo->qi_rtbwarnlimit = newlim->d_rtbwarns;
        } else {
                /*
                 * If the user is now over quota, start the timelimit.
                 * The user will not be 'warned'.
                 * Note that we keep the timers ticking, whether enforcement
                 * is on or off. We don't really want to bother with iterating
                 * over all ondisk dquots and turning the timers on/off.
                 */
                xfs_qm_adjust_dqtimers(mp, ddq);
        }
        dqp->dq_flags |= XFS_DQ_DIRTY;
        xfs_trans_log_dquot(tp, dqp);

        xfs_dqtrace_entry(dqp, "Q_SETQLIM: COMMIT");
        xfs_trans_commit(tp, 0, NULL);
        xfs_qm_dqprint(dqp);
        xfs_qm_dqrele(dqp);
        mutex_unlock(&(XFS_QI_QOFFLOCK(mp)));

        return (0);
}

STATIC int
xfs_qm_scall_getquota(
        xfs_mount_t     *mp,
        xfs_dqid_t      id,
        uint            type,
        fs_disk_quota_t *out)
{
        xfs_dquot_t     *dqp;
        int             error;

        /*
         * Try to get the dquot. We don't want it allocated on disk, so
         * we aren't passing the XFS_QMOPT_DOALLOC flag. If it doesn't
         * exist, we'll get ENOENT back.
         */
        if ((error = xfs_qm_dqget(mp, NULL, id, type, 0, &dqp))) {
                return (error);
        }

        xfs_dqtrace_entry(dqp, "Q_GETQUOTA SUCCESS");
        /*
         * If everything's NULL, this dquot doesn't quite exist as far as
         * our utility programs are concerned.
         */
        if (XFS_IS_DQUOT_UNINITIALIZED(dqp)) {
                xfs_qm_dqput(dqp);
                return XFS_ERROR(ENOENT);
        }
        /* xfs_qm_dqprint(dqp); */
        /*
         * Convert the disk dquot to the exportable format
         */
        xfs_qm_export_dquot(mp, &dqp->q_core, out);
        xfs_qm_dqput(dqp);
        return (error ? XFS_ERROR(EFAULT) : 0);
}


STATIC int
xfs_qm_log_quotaoff_end(
        xfs_mount_t             *mp,
        xfs_qoff_logitem_t      *startqoff,
        uint                    flags)
{
        xfs_trans_t             *tp;
        int                     error;
        xfs_qoff_logitem_t      *qoffi;

        tp = xfs_trans_alloc(mp, XFS_TRANS_QM_QUOTAOFF_END);

        if ((error = xfs_trans_reserve(tp, 0, sizeof(xfs_qoff_logitem_t) * 2,
                                      0, 0, XFS_DEFAULT_LOG_COUNT))) {
                xfs_trans_cancel(tp, 0);
                return (error);
        }

        qoffi = xfs_trans_get_qoff_item(tp, startqoff,
                                        flags & XFS_ALL_QUOTA_ACCT);
        xfs_trans_log_quotaoff_item(tp, qoffi);

        /*
         * We have to make sure that the transaction is secure on disk before we
         * return and actually stop quota accounting. So, make it synchronous.
         * We don't care about quotoff's performance.
         */
        xfs_trans_set_sync(tp);
        error = xfs_trans_commit(tp, 0, NULL);
        return (error);
}


STATIC int
xfs_qm_log_quotaoff(
        xfs_mount_t            *mp,
        xfs_qoff_logitem_t     **qoffstartp,
        uint                   flags)
{
        xfs_trans_t            *tp;
        int                     error;
        unsigned long   s;
        xfs_qoff_logitem_t     *qoffi=NULL;
        uint                    oldsbqflag=0;

        tp = xfs_trans_alloc(mp, XFS_TRANS_QM_QUOTAOFF);
        if ((error = xfs_trans_reserve(tp, 0,
                                      sizeof(xfs_qoff_logitem_t) * 2 +
                                      mp->m_sb.sb_sectsize + 128,
                                      0,
                                      0,
                                      XFS_DEFAULT_LOG_COUNT))) {
                goto error0;
        }

        qoffi = xfs_trans_get_qoff_item(tp, NULL, flags & XFS_ALL_QUOTA_ACCT);
        xfs_trans_log_quotaoff_item(tp, qoffi);

        s = XFS_SB_LOCK(mp);
        oldsbqflag = mp->m_sb.sb_qflags;
        mp->m_sb.sb_qflags = (mp->m_qflags & ~(flags)) & XFS_MOUNT_QUOTA_ALL;
        XFS_SB_UNLOCK(mp, s);

        xfs_mod_sb(tp, XFS_SB_QFLAGS);

        /*
         * We have to make sure that the transaction is secure on disk before we
         * return and actually stop quota accounting. So, make it synchronous.
         * We don't care about quotoff's performance.
         */
        xfs_trans_set_sync(tp);
        error = xfs_trans_commit(tp, 0, NULL);

error0:
        if (error) {
                xfs_trans_cancel(tp, 0);
                /*
                 * No one else is modifying sb_qflags, so this is OK.
                 * We still hold the quotaofflock.
                 */
                s = XFS_SB_LOCK(mp);
                mp->m_sb.sb_qflags = oldsbqflag;
                XFS_SB_UNLOCK(mp, s);
        }
        *qoffstartp = qoffi;
        return (error);
}


/*
 * Translate an internal style on-disk-dquot to the exportable format.
 * The main differences are that the counters/limits are all in Basic
 * Blocks (BBs) instead of the internal FSBs, and all on-disk data has
 * to be converted to the native endianness.
 */
STATIC void
xfs_qm_export_dquot(
        xfs_mount_t             *mp,
        xfs_disk_dquot_t        *src,
        struct fs_disk_quota    *dst)
{
        memset(dst, 0, sizeof(*dst));
        dst->d_version = FS_DQUOT_VERSION;  /* different from src->d_version */
        dst->d_flags =
                xfs_qm_export_qtype_flags(INT_GET(src->d_flags, ARCH_CONVERT));
        dst->d_id = INT_GET(src->d_id, ARCH_CONVERT);
        dst->d_blk_hardlimit = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_blk_hardlimit, ARCH_CONVERT));
        dst->d_blk_softlimit = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_blk_softlimit, ARCH_CONVERT));
        dst->d_ino_hardlimit = (__uint64_t)
                INT_GET(src->d_ino_hardlimit, ARCH_CONVERT);
        dst->d_ino_softlimit = (__uint64_t)
                INT_GET(src->d_ino_softlimit, ARCH_CONVERT);
        dst->d_bcount = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_bcount, ARCH_CONVERT));
        dst->d_icount = (__uint64_t) INT_GET(src->d_icount, ARCH_CONVERT);
        dst->d_btimer = (__uint32_t) INT_GET(src->d_btimer, ARCH_CONVERT);
        dst->d_itimer = (__uint32_t) INT_GET(src->d_itimer, ARCH_CONVERT);
        dst->d_iwarns = INT_GET(src->d_iwarns, ARCH_CONVERT);
        dst->d_bwarns = INT_GET(src->d_bwarns, ARCH_CONVERT);

        dst->d_rtb_hardlimit = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_rtb_hardlimit, ARCH_CONVERT));
        dst->d_rtb_softlimit = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_rtb_softlimit, ARCH_CONVERT));
        dst->d_rtbcount = (__uint64_t)
                XFS_FSB_TO_BB(mp, INT_GET(src->d_rtbcount, ARCH_CONVERT));
        dst->d_rtbtimer = (__uint32_t) INT_GET(src->d_rtbtimer, ARCH_CONVERT);
        dst->d_rtbwarns = INT_GET(src->d_rtbwarns, ARCH_CONVERT);

        /*
         * Internally, we don't reset all the timers when quota enforcement
         * gets turned off. No need to confuse the userlevel code,
         * so return zeroes in that case.
         */
        if (! XFS_IS_QUOTA_ENFORCED(mp)) {
                dst->d_btimer = 0;
                dst->d_itimer = 0;
                dst->d_rtbtimer = 0;
        }

#ifdef DEBUG
        if (XFS_IS_QUOTA_ENFORCED(mp) && dst->d_id != 0) {
                if (((int) dst->d_bcount >= (int) dst->d_blk_softlimit) &&
                    (dst->d_blk_softlimit > 0)) {
                        ASSERT(dst->d_btimer != 0);
                }
                if (((int) dst->d_icount >= (int) dst->d_ino_softlimit) &&
                    (dst->d_ino_softlimit > 0)) {
                        ASSERT(dst->d_itimer != 0);
                }
        }
#endif
}

STATIC uint
xfs_qm_import_qtype_flags(
        uint            uflags)
{
        uint            oflags = 0;

        /*
         * Can't be more than one, or none.
         */
        if (((uflags & (XFS_GROUP_QUOTA | XFS_USER_QUOTA)) ==
                        (XFS_GROUP_QUOTA | XFS_USER_QUOTA)) ||
            ((uflags & (XFS_GROUP_QUOTA | XFS_PROJ_QUOTA)) ==
                        (XFS_GROUP_QUOTA | XFS_PROJ_QUOTA)) ||
            ((uflags & (XFS_USER_QUOTA | XFS_PROJ_QUOTA)) ==
                        (XFS_USER_QUOTA | XFS_PROJ_QUOTA)) ||
            ((uflags & (XFS_GROUP_QUOTA|XFS_USER_QUOTA|XFS_PROJ_QUOTA)) == 0))
                return (0);

        oflags |= (uflags & XFS_USER_QUOTA) ? XFS_DQ_USER : 0;
        oflags |= (uflags & XFS_PROJ_QUOTA) ? XFS_DQ_PROJ : 0;
        oflags |= (uflags & XFS_GROUP_QUOTA) ? XFS_DQ_GROUP: 0;
        return oflags;
}

STATIC uint
xfs_qm_export_qtype_flags(
        uint flags)
{
        /*
         * Can't be more than one, or none.
         */
        ASSERT((flags & (XFS_PROJ_QUOTA | XFS_USER_QUOTA)) !=
                (XFS_PROJ_QUOTA | XFS_USER_QUOTA));
        ASSERT((flags & (XFS_PROJ_QUOTA | XFS_GROUP_QUOTA)) !=
                (XFS_PROJ_QUOTA | XFS_GROUP_QUOTA));
        ASSERT((flags & (XFS_USER_QUOTA | XFS_GROUP_QUOTA)) !=
                (XFS_USER_QUOTA | XFS_GROUP_QUOTA));
        ASSERT((flags & (XFS_PROJ_QUOTA|XFS_USER_QUOTA|XFS_GROUP_QUOTA)) != 0);

        return (flags & XFS_DQ_USER) ?
                XFS_USER_QUOTA : (flags & XFS_DQ_PROJ) ?
                        XFS_PROJ_QUOTA : XFS_GROUP_QUOTA;
}

STATIC uint
xfs_qm_import_flags(
        uint uflags)
{
        uint flags = 0;

        if (uflags & XFS_QUOTA_UDQ_ACCT)
                flags |= XFS_UQUOTA_ACCT;
        if (uflags & XFS_QUOTA_PDQ_ACCT)
                flags |= XFS_PQUOTA_ACCT;
        if (uflags & XFS_QUOTA_GDQ_ACCT)
                flags |= XFS_GQUOTA_ACCT;
        if (uflags & XFS_QUOTA_UDQ_ENFD)
                flags |= XFS_UQUOTA_ENFD;
        if (uflags & (XFS_QUOTA_PDQ_ENFD|XFS_QUOTA_GDQ_ENFD))
                flags |= XFS_OQUOTA_ENFD;
        return (flags);
}


STATIC uint
xfs_qm_export_flags(
        uint flags)
{
        uint uflags;

        uflags = 0;
        if (flags & XFS_UQUOTA_ACCT)
                uflags |= XFS_QUOTA_UDQ_ACCT;
        if (flags & XFS_PQUOTA_ACCT)
                uflags |= XFS_QUOTA_PDQ_ACCT;
        if (flags & XFS_GQUOTA_ACCT)
                uflags |= XFS_QUOTA_GDQ_ACCT;
        if (flags & XFS_UQUOTA_ENFD)
                uflags |= XFS_QUOTA_UDQ_ENFD;
        if (flags & (XFS_OQUOTA_ENFD)) {
                uflags |= (flags & XFS_GQUOTA_ACCT) ?
                        XFS_QUOTA_GDQ_ENFD : XFS_QUOTA_PDQ_ENFD;
        }
        return (uflags);
}


/*
 * Go thru all the inodes in the file system, releasing their dquots.
 * Note that the mount structure gets modified to indicate that quotas are off
 * AFTER this, in the case of quotaoff. This also gets called from
 * xfs_rootumount.
 */
void
xfs_qm_dqrele_all_inodes(
        struct xfs_mount *mp,
        uint             flags)
{
        xfs_inode_t     *ip, *topino;
        uint            ireclaims;
        vnode_t         *vp;
        boolean_t       vnode_refd;

        ASSERT(mp->m_quotainfo);

        XFS_MOUNT_ILOCK(mp);
again:
        ip = mp->m_inodes;
        if (ip == NULL) {
                XFS_MOUNT_IUNLOCK(mp);
                return;
        }
        do {
                /* Skip markers inserted by xfs_sync */
                if (ip->i_mount == NULL) {
                        ip = ip->i_mnext;
                        continue;
                }
                /* Root inode, rbmip and rsumip have associated blocks */
                if (ip == XFS_QI_UQIP(mp) || ip == XFS_QI_GQIP(mp)) {
                        ASSERT(ip->i_udquot == NULL);
                        ASSERT(ip->i_gdquot == NULL);
                        ip = ip->i_mnext;
                        continue;
                }
                vp = XFS_ITOV_NULL(ip);
                if (!vp) {
                        ASSERT(ip->i_udquot == NULL);
                        ASSERT(ip->i_gdquot == NULL);
                        ip = ip->i_mnext;
                        continue;
                }
                vnode_refd = B_FALSE;
                if (xfs_ilock_nowait(ip, XFS_ILOCK_EXCL) == 0) {
                        ireclaims = mp->m_ireclaims;
                        topino = mp->m_inodes;
                        vp = vn_grab(vp);
                        if (!vp)
                                goto again;

                        XFS_MOUNT_IUNLOCK(mp);
                        /* XXX restart limit ? */
                        xfs_ilock(ip, XFS_ILOCK_EXCL);
                        vnode_refd = B_TRUE;
                } else {
                        ireclaims = mp->m_ireclaims;
                        topino = mp->m_inodes;
                        XFS_MOUNT_IUNLOCK(mp);
                }

                /*
                 * We don't keep the mountlock across the dqrele() call,
                 * since it can take a while..
                 */
                if ((flags & XFS_UQUOTA_ACCT) && ip->i_udquot) {
                        xfs_qm_dqrele(ip->i_udquot);
                        ip->i_udquot = NULL;
                }
                if (flags & (XFS_PQUOTA_ACCT|XFS_GQUOTA_ACCT) && ip->i_gdquot) {
                        xfs_qm_dqrele(ip->i_gdquot);
                        ip->i_gdquot = NULL;
                }
                xfs_iunlock(ip, XFS_ILOCK_EXCL);
                /*
                 * Wait until we've dropped the ilock and mountlock to
                 * do the vn_rele. Or be condemned to an eternity in the
                 * inactive code in hell.
                 */
                if (vnode_refd)
                        VN_RELE(vp);
                XFS_MOUNT_ILOCK(mp);
                /*
                 * If an inode was inserted or removed, we gotta
                 * start over again.
                 */
                if (topino != mp->m_inodes || mp->m_ireclaims != ireclaims) {
                        /* XXX use a sentinel */
                        goto again;
                }
                ip = ip->i_mnext;
        } while (ip != mp->m_inodes);

        XFS_MOUNT_IUNLOCK(mp);
}

/*------------------------------------------------------------------------*/
#ifdef DEBUG
/*
 * This contains all the test functions for XFS disk quotas.
 * Currently it does a quota accounting check. ie. it walks through
 * all inodes in the file system, calculating the dquot accounting fields,
 * and prints out any inconsistencies.
 */
xfs_dqhash_t *qmtest_udqtab;
xfs_dqhash_t *qmtest_gdqtab;
int           qmtest_hashmask;
int           qmtest_nfails;
mutex_t       qcheck_lock;

#define DQTEST_HASHVAL(mp, id) (((__psunsigned_t)(mp) + \
                                 (__psunsigned_t)(id)) & \
                                (qmtest_hashmask - 1))

#define DQTEST_HASH(mp, id, type)   ((type & XFS_DQ_USER) ? \
                                     (qmtest_udqtab + \
                                      DQTEST_HASHVAL(mp, id)) : \
                                     (qmtest_gdqtab + \
                                      DQTEST_HASHVAL(mp, id)))

#define DQTEST_LIST_PRINT(l, NXT, title) \
{ \
          xfs_dqtest_t  *dqp; int i = 0;\
          cmn_err(CE_DEBUG, "%s (#%d)", title, (int) (l)->qh_nelems); \
          for (dqp = (xfs_dqtest_t *)(l)->qh_next; dqp != NULL; \
               dqp = (xfs_dqtest_t *)dqp->NXT) { \
                cmn_err(CE_DEBUG, "  %d. \"%d (%s)\"  bcnt = %d, icnt = %d", \
                         ++i, dqp->d_id, DQFLAGTO_TYPESTR(dqp),      \
                         dqp->d_bcount, dqp->d_icount); } \
}

typedef struct dqtest {
        xfs_dqmarker_t  q_lists;
        xfs_dqhash_t    *q_hash;        /* the hashchain header */
        xfs_mount_t     *q_mount;       /* filesystem this relates to */
        xfs_dqid_t      d_id;           /* user id or group id */
        xfs_qcnt_t      d_bcount;       /* # disk blocks owned by the user */
        xfs_qcnt_t      d_icount;       /* # inodes owned by the user */
} xfs_dqtest_t;

STATIC void
xfs_qm_hashinsert(xfs_dqhash_t *h, xfs_dqtest_t *dqp)
{
        xfs_dquot_t *d;
        if (((d) = (h)->qh_next))
                (d)->HL_PREVP = &((dqp)->HL_NEXT);
        (dqp)->HL_NEXT = d;
        (dqp)->HL_PREVP = &((h)->qh_next);
        (h)->qh_next = (xfs_dquot_t *)dqp;
        (h)->qh_version++;
        (h)->qh_nelems++;
}
STATIC void
xfs_qm_dqtest_print(
        xfs_dqtest_t    *d)
{
        cmn_err(CE_DEBUG, "-----------DQTEST DQUOT----------------");
        cmn_err(CE_DEBUG, "---- dquot ID = %d", d->d_id);
        cmn_err(CE_DEBUG, "---- fs       = 0x%p", d->q_mount);
        cmn_err(CE_DEBUG, "---- bcount   = %Lu (0x%x)",
                d->d_bcount, (int)d->d_bcount);
        cmn_err(CE_DEBUG, "---- icount   = %Lu (0x%x)",
                d->d_icount, (int)d->d_icount);
        cmn_err(CE_DEBUG, "---------------------------");
}

STATIC void
xfs_qm_dqtest_failed(
        xfs_dqtest_t    *d,
        xfs_dquot_t     *dqp,
        char            *reason,
        xfs_qcnt_t      a,
        xfs_qcnt_t      b,
        int             error)
{
        qmtest_nfails++;
        if (error)
                cmn_err(CE_DEBUG, "quotacheck failed id=%d, err=%d\nreason: %s",
                       INT_GET(d->d_id, ARCH_CONVERT), error, reason);
        else
                cmn_err(CE_DEBUG, "quotacheck failed id=%d (%s) [%d != %d]",
                       INT_GET(d->d_id, ARCH_CONVERT), reason, (int)a, (int)b);
        xfs_qm_dqtest_print(d);
        if (dqp)
                xfs_qm_dqprint(dqp);
}

STATIC int
xfs_dqtest_cmp2(
        xfs_dqtest_t    *d,
        xfs_dquot_t     *dqp)
{
        int err = 0;
        if (INT_GET(dqp->q_core.d_icount, ARCH_CONVERT) != d->d_icount) {
                xfs_qm_dqtest_failed(d, dqp, "icount mismatch",
                        INT_GET(dqp->q_core.d_icount, ARCH_CONVERT),
                        d->d_icount, 0);
                err++;
        }
        if (INT_GET(dqp->q_core.d_bcount, ARCH_CONVERT) != d->d_bcount) {
                xfs_qm_dqtest_failed(d, dqp, "bcount mismatch",
                        INT_GET(dqp->q_core.d_bcount, ARCH_CONVERT),
                        d->d_bcount, 0);
                err++;
        }
        if (INT_GET(dqp->q_core.d_blk_softlimit, ARCH_CONVERT) &&
            INT_GET(dqp->q_core.d_bcount, ARCH_CONVERT) >=
            INT_GET(dqp->q_core.d_blk_softlimit, ARCH_CONVERT)) {
                if (!dqp->q_core.d_btimer && dqp->q_core.d_id) {
                        cmn_err(CE_DEBUG,
                                "%d [%s] [0x%p] BLK TIMER NOT STARTED",
                                d->d_id, DQFLAGTO_TYPESTR(d), d->q_mount);
                        err++;
                }
        }
        if (INT_GET(dqp->q_core.d_ino_softlimit, ARCH_CONVERT) &&
            INT_GET(dqp->q_core.d_icount, ARCH_CONVERT) >=
            INT_GET(dqp->q_core.d_ino_softlimit, ARCH_CONVERT)) {
                if (!dqp->q_core.d_itimer && dqp->q_core.d_id) {
                        cmn_err(CE_DEBUG,
                                "%d [%s] [0x%p] INO TIMER NOT STARTED",
                                d->d_id, DQFLAGTO_TYPESTR(d), d->q_mount);
                        err++;
                }
        }
#ifdef QUOTADEBUG
        if (!err) {
                cmn_err(CE_DEBUG, "%d [%s] [0x%p] qchecked",
                        d->d_id, DQFLAGTO_TYPESTR(d), d->q_mount);
        }
#endif
        return (err);
}

STATIC void
xfs_dqtest_cmp(
        xfs_dqtest_t    *d)
{
        xfs_dquot_t     *dqp;
        int             error;

        /* xfs_qm_dqtest_print(d); */
        if ((error = xfs_qm_dqget(d->q_mount, NULL, d->d_id, d->dq_flags, 0,
                                 &dqp))) {
                xfs_qm_dqtest_failed(d, NULL, "dqget failed", 0, 0, error);
                return;
        }
        xfs_dqtest_cmp2(d, dqp);
        xfs_qm_dqput(dqp);
}

STATIC int
xfs_qm_internalqcheck_dqget(
        xfs_mount_t     *mp,
        xfs_dqid_t      id,
        uint            type,
        xfs_dqtest_t    **O_dq)
{
        xfs_dqtest_t    *d;
        xfs_dqhash_t    *h;

        h = DQTEST_HASH(mp, id, type);
        for (d = (xfs_dqtest_t *) h->qh_next; d != NULL;
             d = (xfs_dqtest_t *) d->HL_NEXT) {
                /* DQTEST_LIST_PRINT(h, HL_NEXT, "@@@@@ dqtestlist @@@@@"); */
                if (d->d_id == id && mp == d->q_mount) {
                        *O_dq = d;
                        return (0);
                }
        }
        d = kmem_zalloc(sizeof(xfs_dqtest_t), KM_SLEEP);
        d->dq_flags = type;
        d->d_id = id;
        d->q_mount = mp;
        d->q_hash = h;
        xfs_qm_hashinsert(h, d);
        *O_dq = d;
        return (0);
}

STATIC void
xfs_qm_internalqcheck_get_dquots(
        xfs_mount_t     *mp,
        xfs_dqid_t      uid,
        xfs_dqid_t      projid,
        xfs_dqid_t      gid,
        xfs_dqtest_t    **ud,
        xfs_dqtest_t    **gd)
{
        if (XFS_IS_UQUOTA_ON(mp))
                xfs_qm_internalqcheck_dqget(mp, uid, XFS_DQ_USER, ud);
        if (XFS_IS_GQUOTA_ON(mp))
                xfs_qm_internalqcheck_dqget(mp, gid, XFS_DQ_GROUP, gd);
        else if (XFS_IS_PQUOTA_ON(mp))
                xfs_qm_internalqcheck_dqget(mp, projid, XFS_DQ_PROJ, gd);
}


STATIC void
xfs_qm_internalqcheck_dqadjust(
        xfs_inode_t             *ip,
        xfs_dqtest_t            *d)
{
        d->d_icount++;
        d->d_bcount += (xfs_qcnt_t)ip->i_d.di_nblocks;
}

STATIC int
xfs_qm_internalqcheck_adjust(
        xfs_mount_t     *mp,            /* mount point for filesystem */
        xfs_ino_t       ino,            /* inode number to get data for */
        void            __user *buffer, /* not used */
        int             ubsize,         /* not used */
        void            *private_data,  /* not used */
        xfs_daddr_t     bno,            /* starting block of inode cluster */
        int             *ubused,        /* not used */
        void            *dip,           /* not used */
        int             *res)           /* bulkstat result code */
{
        xfs_inode_t             *ip;
        xfs_dqtest_t            *ud, *gd;
        uint                    lock_flags;
        boolean_t               ipreleased;
        int                     error;

        ASSERT(XFS_IS_QUOTA_RUNNING(mp));

        if (ino == mp->m_sb.sb_uquotino || ino == mp->m_sb.sb_gquotino) {
                *res = BULKSTAT_RV_NOTHING;
                qdprintk("internalqcheck: ino=%llu, uqino=%llu, gqino=%llu\n",
                        (unsigned long long) ino,
                        (unsigned long long) mp->m_sb.sb_uquotino,
                        (unsigned long long) mp->m_sb.sb_gquotino);
                return XFS_ERROR(EINVAL);
        }
        ipreleased = B_FALSE;
 again:
        lock_flags = XFS_ILOCK_SHARED;
        if ((error = xfs_iget(mp, NULL, ino, 0, lock_flags, &ip, bno))) {
                *res = BULKSTAT_RV_NOTHING;
                return (error);
        }

        if (ip->i_d.di_mode == 0) {
                xfs_iput_new(ip, lock_flags);
                *res = BULKSTAT_RV_NOTHING;
                return XFS_ERROR(ENOENT);
        }

        /*
         * This inode can have blocks after eof which can get released
         * when we send it to inactive. Since we don't check the dquot
         * until the after all our calculations are done, we must get rid
         * of those now.
         */
        if (! ipreleased) {
                xfs_iput(ip, lock_flags);
                ipreleased = B_TRUE;
                goto again;
        }
        xfs_qm_internalqcheck_get_dquots(mp,
                                        (xfs_dqid_t) ip->i_d.di_uid,
                                        (xfs_dqid_t) ip->i_d.di_projid,
                                        (xfs_dqid_t) ip->i_d.di_gid,
                                        &ud, &gd);
        if (XFS_IS_UQUOTA_ON(mp)) {
                ASSERT(ud);
                xfs_qm_internalqcheck_dqadjust(ip, ud);
        }
        if (XFS_IS_OQUOTA_ON(mp)) {
                ASSERT(gd);
                xfs_qm_internalqcheck_dqadjust(ip, gd);
        }
        xfs_iput(ip, lock_flags);
        *res = BULKSTAT_RV_DIDONE;
        return (0);
}


/* PRIVATE, debugging */
int
xfs_qm_internalqcheck(
        xfs_mount_t     *mp)
{
        xfs_ino_t       lastino;
        int             done, count;
        int             i;
        xfs_dqtest_t    *d, *e;
        xfs_dqhash_t    *h1;
        int             error;

        lastino = 0;
        qmtest_hashmask = 32;
        count = 5;
        done = 0;
        qmtest_nfails = 0;

        if (! XFS_IS_QUOTA_ON(mp))
                return XFS_ERROR(ESRCH);

        xfs_log_force(mp, (xfs_lsn_t)0, XFS_LOG_FORCE | XFS_LOG_SYNC);
        XFS_bflush(mp->m_ddev_targp);
        xfs_log_force(mp, (xfs_lsn_t)0, XFS_LOG_FORCE | XFS_LOG_SYNC);
        XFS_bflush(mp->m_ddev_targp);

        mutex_lock(&qcheck_lock, PINOD);
        /* There should be absolutely no quota activity while this
           is going on. */
        qmtest_udqtab = kmem_zalloc(qmtest_hashmask *
                                    sizeof(xfs_dqhash_t), KM_SLEEP);
        qmtest_gdqtab = kmem_zalloc(qmtest_hashmask *
                                    sizeof(xfs_dqhash_t), KM_SLEEP);
        do {
                /*
                 * Iterate thru all the inodes in the file system,
                 * adjusting the corresponding dquot counters
                 */
                if ((error = xfs_bulkstat(mp, &lastino, &count,
                                 xfs_qm_internalqcheck_adjust, NULL,
                                 0, NULL, BULKSTAT_FG_IGET, &done))) {
                        break;
                }
        } while (! done);
        if (error) {
                cmn_err(CE_DEBUG, "Bulkstat returned error 0x%x", error);
        }
        cmn_err(CE_DEBUG, "Checking results against system dquots");
        for (i = 0; i < qmtest_hashmask; i++) {
                h1 = &qmtest_udqtab[i];
                for (d = (xfs_dqtest_t *) h1->qh_next; d != NULL; ) {
                        xfs_dqtest_cmp(d);
                        e = (xfs_dqtest_t *) d->HL_NEXT;
                        kmem_free(d, sizeof(xfs_dqtest_t));
                        d = e;
                }
                h1 = &qmtest_gdqtab[i];
                for (d = (xfs_dqtest_t *) h1->qh_next; d != NULL; ) {
                        xfs_dqtest_cmp(d);
                        e = (xfs_dqtest_t *) d->HL_NEXT;
                        kmem_free(d, sizeof(xfs_dqtest_t));
                        d = e;
                }
        }

        if (qmtest_nfails) {
                cmn_err(CE_DEBUG, "******** quotacheck failed  ********");
                cmn_err(CE_DEBUG, "failures = %d", qmtest_nfails);
        } else {
                cmn_err(CE_DEBUG, "******** quotacheck successful! ********");
        }
        kmem_free(qmtest_udqtab, qmtest_hashmask * sizeof(xfs_dqhash_t));
        kmem_free(qmtest_gdqtab, qmtest_hashmask * sizeof(xfs_dqhash_t));
        mutex_unlock(&qcheck_lock);
        return (qmtest_nfails);
}

#endif /* DEBUG */