sys/vfs/ufs/ufs_quota.c

   1 /*
   2  * Copyright (c) 1982, 1986, 1990, 1993, 1995
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * This code is derived from software contributed to Berkeley by
   6  * Robert Elz at The University of Melbourne.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *      This product includes software developed by the University of
  19  *      California, Berkeley and its contributors.
  20  * 4. Neither the name of the University nor the names of its contributors
  21  *    may be used to endorse or promote products derived from this software
  22  *    without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34  * SUCH DAMAGE.
  35  *
  36  *      @(#)ufs_quota.c 8.5 (Berkeley) 5/20/95
  37  * $FreeBSD: src/sys/ufs/ufs/ufs_quota.c,v 1.27.2.3 2002/01/15 10:33:32 phk Exp $
  38  * $DragonFly: src/sys/vfs/ufs/ufs_quota.c,v 1.2 2003/06/17 04:29:00 dillon Exp $
  39  */
  40
  41 #include <sys/param.h>
  42 #include <sys/systm.h>
  43 #include <sys/kernel.h>
  44 #include <sys/namei.h>
  45 #include <sys/malloc.h>
  46 #include <sys/fcntl.h>
  47 #include <sys/proc.h>
  48 #include <sys/vnode.h>
  49 #include <sys/mount.h>
  50 #include <vm/vm_zone.h>
  51
  52 #include <ufs/ufs/quota.h>
  53 #include <ufs/ufs/inode.h>
  54 #include <ufs/ufs/ufsmount.h>
  55
  56 static MALLOC_DEFINE(M_DQUOT, "UFS quota", "UFS quota entries");
  57
  58 /*
  59  * Quota name to error message mapping.
  60  */
  61 static char *quotatypes[] = INITQFNAMES;
  62
  63 static int chkdqchg __P((struct inode *, long, struct ucred *, int));
  64 static int chkiqchg __P((struct inode *, long, struct ucred *, int));
  65 static int dqget __P((struct vnode *,
  66                 u_long, struct ufsmount *, int, struct dquot **));
  67 static int dqsync __P((struct vnode *, struct dquot *));
  68 static void dqflush __P((struct vnode *));
  69
  70 #ifdef DIAGNOSTIC
  71 static void dqref __P((struct dquot *));
  72 static void chkdquot __P((struct inode *));
  73 #endif
  74
  75 /*
  76  * Set up the quotas for an inode.
  77  *
  78  * This routine completely defines the semantics of quotas.
  79  * If other criterion want to be used to establish quotas, the
  80  * MAXQUOTAS value in quotas.h should be increased, and the
  81  * additional dquots set up here.
  82  */
  83 int
  84 getinoquota(ip)
  85         register struct inode *ip;
  86 {
  87         struct ufsmount *ump;
  88         struct vnode *vp = ITOV(ip);
  89         int error;
  90
  91         ump = VFSTOUFS(vp->v_mount);
  92         /*
  93          * Set up the user quota based on file uid.
  94          * EINVAL means that quotas are not enabled.
  95          */
  96         if (ip->i_dquot[USRQUOTA] == NODQUOT &&
  97             (error =
  98                 dqget(vp, ip->i_uid, ump, USRQUOTA, &ip->i_dquot[USRQUOTA])) &&
  99             error != EINVAL)
 100                 return (error);
 101         /*
 102          * Set up the group quota based on file gid.
 103          * EINVAL means that quotas are not enabled.
 104          */
 105         if (ip->i_dquot[GRPQUOTA] == NODQUOT &&
 106             (error =
 107                 dqget(vp, ip->i_gid, ump, GRPQUOTA, &ip->i_dquot[GRPQUOTA])) &&
 108             error != EINVAL)
 109                 return (error);
 110         return (0);
 111 }
 112
 113 /*
 114  * Update disk usage, and take corrective action.
 115  */
 116 int
 117 chkdq(ip, change, cred, flags)
 118         register struct inode *ip;
 119         long change;
 120         struct ucred *cred;
 121         int flags;
 122 {
 123         register struct dquot *dq;
 124         register int i;
 125         int ncurblocks, error;
 126
 127 #ifdef DIAGNOSTIC
 128         if ((flags & CHOWN) == 0)
 129                 chkdquot(ip);
 130 #endif
 131         if (change == 0)
 132                 return (0);
 133         if (change < 0) {
 134                 for (i = 0; i < MAXQUOTAS; i++) {
 135                         if ((dq = ip->i_dquot[i]) == NODQUOT)
 136                                 continue;
 137                         while (dq->dq_flags & DQ_LOCK) {
 138                                 dq->dq_flags |= DQ_WANT;
 139                                 (void) tsleep((caddr_t)dq, PINOD+1, "chkdq1", 0);
 140                         }
 141                         ncurblocks = dq->dq_curblocks + change;
 142                         if (ncurblocks >= 0)
 143                                 dq->dq_curblocks = ncurblocks;
 144                         else
 145                                 dq->dq_curblocks = 0;
 146                         dq->dq_flags &= ~DQ_BLKS;
 147                         dq->dq_flags |= DQ_MOD;
 148                 }
 149                 return (0);
 150         }
 151         if ((flags & FORCE) == 0 && cred->cr_uid != 0) {
 152                 for (i = 0; i < MAXQUOTAS; i++) {
 153                         if ((dq = ip->i_dquot[i]) == NODQUOT)
 154                                 continue;
 155                         error = chkdqchg(ip, change, cred, i);
 156                         if (error)
 157                                 return (error);
 158                 }
 159         }
 160         for (i = 0; i < MAXQUOTAS; i++) {
 161                 if ((dq = ip->i_dquot[i]) == NODQUOT)
 162                         continue;
 163                 while (dq->dq_flags & DQ_LOCK) {
 164                         dq->dq_flags |= DQ_WANT;
 165                         (void) tsleep((caddr_t)dq, PINOD+1, "chkdq2", 0);
 166                 }
 167                 /* Reset timer when crossing soft limit */
 168                 if (dq->dq_curblocks + change >= dq->dq_bsoftlimit &&
 169                     dq->dq_curblocks < dq->dq_bsoftlimit)
 170                         dq->dq_btime = time_second +
 171                             VFSTOUFS(ITOV(ip)->v_mount)->um_btime[i];
 172                 dq->dq_curblocks += change;
 173                 dq->dq_flags |= DQ_MOD;
 174         }
 175         return (0);
 176 }
 177
 178 /*
 179  * Check for a valid change to a users allocation.
 180  * Issue an error message if appropriate.
 181  */
 182 static int
 183 chkdqchg(ip, change, cred, type)
 184         struct inode *ip;
 185         long change;
 186         struct ucred *cred;
 187         int type;
 188 {
 189         register struct dquot *dq = ip->i_dquot[type];
 190         long ncurblocks = dq->dq_curblocks + change;
 191
 192         /*
 193          * If user would exceed their hard limit, disallow space allocation.
 194          */
 195         if (ncurblocks >= dq->dq_bhardlimit && dq->dq_bhardlimit) {
 196                 if ((dq->dq_flags & DQ_BLKS) == 0 &&
 197                     ip->i_uid == cred->cr_uid) {
 198                         uprintf("\n%s: write failed, %s disk limit reached\n",
 199                             ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 200                             quotatypes[type]);
 201                         dq->dq_flags |= DQ_BLKS;
 202                 }
 203                 return (EDQUOT);
 204         }
 205         /*
 206          * If user is over their soft limit for too long, disallow space
 207          * allocation. Reset time limit as they cross their soft limit.
 208          */
 209         if (ncurblocks >= dq->dq_bsoftlimit && dq->dq_bsoftlimit) {
 210                 if (dq->dq_curblocks < dq->dq_bsoftlimit) {
 211                         dq->dq_btime = time_second +
 212                             VFSTOUFS(ITOV(ip)->v_mount)->um_btime[type];
 213                         if (ip->i_uid == cred->cr_uid)
 214                                 uprintf("\n%s: warning, %s %s\n",
 215                                     ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 216                                     quotatypes[type], "disk quota exceeded");
 217                         return (0);
 218                 }
 219                 if (time_second > dq->dq_btime) {
 220                         if ((dq->dq_flags & DQ_BLKS) == 0 &&
 221                             ip->i_uid == cred->cr_uid) {
 222                                 uprintf("\n%s: write failed, %s %s\n",
 223                                     ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 224                                     quotatypes[type],
 225                                     "disk quota exceeded for too long");
 226                                 dq->dq_flags |= DQ_BLKS;
 227                         }
 228                         return (EDQUOT);
 229                 }
 230         }
 231         return (0);
 232 }
 233
 234 /*
 235  * Check the inode limit, applying corrective action.
 236  */
 237 int
 238 chkiq(ip, change, cred, flags)
 239         register struct inode *ip;
 240         long change;
 241         struct ucred *cred;
 242         int flags;
 243 {
 244         register struct dquot *dq;
 245         register int i;
 246         int ncurinodes, error;
 247
 248 #ifdef DIAGNOSTIC
 249         if ((flags & CHOWN) == 0)
 250                 chkdquot(ip);
 251 #endif
 252         if (change == 0)
 253                 return (0);
 254         if (change < 0) {
 255                 for (i = 0; i < MAXQUOTAS; i++) {
 256                         if ((dq = ip->i_dquot[i]) == NODQUOT)
 257                                 continue;
 258                         while (dq->dq_flags & DQ_LOCK) {
 259                                 dq->dq_flags |= DQ_WANT;
 260                                 (void) tsleep((caddr_t)dq, PINOD+1, "chkiq1", 0);
 261                         }
 262                         ncurinodes = dq->dq_curinodes + change;
 263                         if (ncurinodes >= 0)
 264                                 dq->dq_curinodes = ncurinodes;
 265                         else
 266                                 dq->dq_curinodes = 0;
 267                         dq->dq_flags &= ~DQ_INODS;
 268                         dq->dq_flags |= DQ_MOD;
 269                 }
 270                 return (0);
 271         }
 272         if ((flags & FORCE) == 0 && cred->cr_uid != 0) {
 273                 for (i = 0; i < MAXQUOTAS; i++) {
 274                         if ((dq = ip->i_dquot[i]) == NODQUOT)
 275                                 continue;
 276                         error = chkiqchg(ip, change, cred, i);
 277                         if (error)
 278                                 return (error);
 279                 }
 280         }
 281         for (i = 0; i < MAXQUOTAS; i++) {
 282                 if ((dq = ip->i_dquot[i]) == NODQUOT)
 283                         continue;
 284                 while (dq->dq_flags & DQ_LOCK) {
 285                         dq->dq_flags |= DQ_WANT;
 286                         (void) tsleep((caddr_t)dq, PINOD+1, "chkiq2", 0);
 287                 }
 288                 /* Reset timer when crossing soft limit */
 289                 if (dq->dq_curinodes + change >= dq->dq_isoftlimit &&
 290                     dq->dq_curinodes < dq->dq_isoftlimit)
 291                         dq->dq_itime = time_second +
 292                             VFSTOUFS(ITOV(ip)->v_mount)->um_itime[i];
 293                 dq->dq_curinodes += change;
 294                 dq->dq_flags |= DQ_MOD;
 295         }
 296         return (0);
 297 }
 298
 299 /*
 300  * Check for a valid change to a users allocation.
 301  * Issue an error message if appropriate.
 302  */
 303 static int
 304 chkiqchg(ip, change, cred, type)
 305         struct inode *ip;
 306         long change;
 307         struct ucred *cred;
 308         int type;
 309 {
 310         register struct dquot *dq = ip->i_dquot[type];
 311         long ncurinodes = dq->dq_curinodes + change;
 312
 313         /*
 314          * If user would exceed their hard limit, disallow inode allocation.
 315          */
 316         if (ncurinodes >= dq->dq_ihardlimit && dq->dq_ihardlimit) {
 317                 if ((dq->dq_flags & DQ_INODS) == 0 &&
 318                     ip->i_uid == cred->cr_uid) {
 319                         uprintf("\n%s: write failed, %s inode limit reached\n",
 320                             ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 321                             quotatypes[type]);
 322                         dq->dq_flags |= DQ_INODS;
 323                 }
 324                 return (EDQUOT);
 325         }
 326         /*
 327          * If user is over their soft limit for too long, disallow inode
 328          * allocation. Reset time limit as they cross their soft limit.
 329          */
 330         if (ncurinodes >= dq->dq_isoftlimit && dq->dq_isoftlimit) {
 331                 if (dq->dq_curinodes < dq->dq_isoftlimit) {
 332                         dq->dq_itime = time_second +
 333                             VFSTOUFS(ITOV(ip)->v_mount)->um_itime[type];
 334                         if (ip->i_uid == cred->cr_uid)
 335                                 uprintf("\n%s: warning, %s %s\n",
 336                                     ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 337                                     quotatypes[type], "inode quota exceeded");
 338                         return (0);
 339                 }
 340                 if (time_second > dq->dq_itime) {
 341                         if ((dq->dq_flags & DQ_INODS) == 0 &&
 342                             ip->i_uid == cred->cr_uid) {
 343                                 uprintf("\n%s: write failed, %s %s\n",
 344                                     ITOV(ip)->v_mount->mnt_stat.f_mntonname,
 345                                     quotatypes[type],
 346                                     "inode quota exceeded for too long");
 347                                 dq->dq_flags |= DQ_INODS;
 348                         }
 349                         return (EDQUOT);
 350                 }
 351         }
 352         return (0);
 353 }
 354
 355 #ifdef DIAGNOSTIC
 356 /*
 357  * On filesystems with quotas enabled, it is an error for a file to change
 358  * size and not to have a dquot structure associated with it.
 359  */
 360 static void
 361 chkdquot(ip)
 362         register struct inode *ip;
 363 {
 364         struct ufsmount *ump = VFSTOUFS(ITOV(ip)->v_mount);
 365         register int i;
 366
 367         for (i = 0; i < MAXQUOTAS; i++) {
 368                 if (ump->um_quotas[i] == NULLVP ||
 369                     (ump->um_qflags[i] & (QTF_OPENING|QTF_CLOSING)))
 370                         continue;
 371                 if (ip->i_dquot[i] == NODQUOT) {
 372                         vprint("chkdquot: missing dquot", ITOV(ip));
 373                         panic("chkdquot: missing dquot");
 374                 }
 375         }
 376 }
 377 #endif
 378
 379 /*
 380  * Code to process quotactl commands.
 381  */
 382
 383 /*
 384  * Q_QUOTAON - set up a quota file for a particular file system.
 385  */
 386 int
 387 quotaon(p, mp, type, fname)
 388         struct proc *p;
 389         struct mount *mp;
 390         register int type;
 391         caddr_t fname;
 392 {
 393         struct ufsmount *ump = VFSTOUFS(mp);
 394         struct vnode *vp, **vpp;
 395         struct vnode *nextvp;
 396         struct dquot *dq;
 397         int error;
 398         struct nameidata nd;
 399
 400         vpp = &ump->um_quotas[type];
 401         NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, fname, p);
 402         error = vn_open(&nd, FREAD|FWRITE, 0);
 403         if (error)
 404                 return (error);
 405         NDFREE(&nd, NDF_ONLY_PNBUF);
 406         vp = nd.ni_vp;
 407         VOP_UNLOCK(vp, 0, p);
 408         if (vp->v_type != VREG) {
 409                 (void) vn_close(vp, FREAD|FWRITE, p->p_ucred, p);
 410                 return (EACCES);
 411         }
 412         if (*vpp != vp)
 413                 quotaoff(p, mp, type);
 414         ump->um_qflags[type] |= QTF_OPENING;
 415         mp->mnt_flag |= MNT_QUOTA;
 416         vp->v_flag |= VSYSTEM;
 417         *vpp = vp;
 418         /*
 419          * Save the credential of the process that turned on quotas.
 420          * Set up the time limits for this quota.
 421          */
 422         crhold(p->p_ucred);
 423         ump->um_cred[type] = p->p_ucred;
 424         ump->um_btime[type] = MAX_DQ_TIME;
 425         ump->um_itime[type] = MAX_IQ_TIME;
 426         if (dqget(NULLVP, 0, ump, type, &dq) == 0) {
 427                 if (dq->dq_btime > 0)
 428                         ump->um_btime[type] = dq->dq_btime;
 429                 if (dq->dq_itime > 0)
 430                         ump->um_itime[type] = dq->dq_itime;
 431                 dqrele(NULLVP, dq);
 432         }
 433         /*
 434          * Search vnodes associated with this mount point,
 435          * adding references to quota file being opened.
 436          * NB: only need to add dquot's for inodes being modified.
 437          */
 438 again:
 439         for (vp = TAILQ_FIRST(&mp->mnt_nvnodelist); vp != NULL; vp = nextvp) {
 440                 nextvp = TAILQ_NEXT(vp, v_nmntvnodes);
 441                 if (vp->v_type == VNON || vp->v_writecount == 0)
 442                         continue;
 443                 if (vget(vp, LK_EXCLUSIVE, p))
 444                         goto again;
 445                 error = getinoquota(VTOI(vp));
 446                 if (error) {
 447                         vput(vp);
 448                         break;
 449                 }
 450                 vput(vp);
 451                 if (TAILQ_NEXT(vp, v_nmntvnodes) != nextvp || vp->v_mount != mp)
 452                         goto again;
 453         }
 454         ump->um_qflags[type] &= ~QTF_OPENING;
 455         if (error)
 456                 quotaoff(p, mp, type);
 457         return (error);
 458 }
 459
 460 /*
 461  * Q_QUOTAOFF - turn off disk quotas for a filesystem.
 462  */
 463 int
 464 quotaoff(p, mp, type)
 465         struct proc *p;
 466         struct mount *mp;
 467         register int type;
 468 {
 469         struct vnode *vp;
 470         struct vnode *qvp, *nextvp;
 471         struct ufsmount *ump = VFSTOUFS(mp);
 472         struct dquot *dq;
 473         struct inode *ip;
 474         int error;
 475
 476         if ((qvp = ump->um_quotas[type]) == NULLVP)
 477                 return (0);
 478         ump->um_qflags[type] |= QTF_CLOSING;
 479         /*
 480          * Search vnodes associated with this mount point,
 481          * deleting any references to quota file being closed.
 482          */
 483 again:
 484         for (vp = TAILQ_FIRST(&mp->mnt_nvnodelist); vp != NULL; vp = nextvp) {
 485                 nextvp = TAILQ_NEXT(vp, v_nmntvnodes);
 486                 if (vp->v_type == VNON)
 487                         continue;
 488                 if (vget(vp, LK_EXCLUSIVE, p))
 489                         goto again;
 490                 ip = VTOI(vp);
 491                 dq = ip->i_dquot[type];
 492                 ip->i_dquot[type] = NODQUOT;
 493                 dqrele(vp, dq);
 494                 vput(vp);
 495                 if (TAILQ_NEXT(vp, v_nmntvnodes) != nextvp || vp->v_mount != mp)
 496                         goto again;
 497         }
 498         dqflush(qvp);
 499         qvp->v_flag &= ~VSYSTEM;
 500         error = vn_close(qvp, FREAD|FWRITE, p->p_ucred, p);
 501         ump->um_quotas[type] = NULLVP;
 502         crfree(ump->um_cred[type]);
 503         ump->um_cred[type] = NOCRED;
 504         ump->um_qflags[type] &= ~QTF_CLOSING;
 505         for (type = 0; type < MAXQUOTAS; type++)
 506                 if (ump->um_quotas[type] != NULLVP)
 507                         break;
 508         if (type == MAXQUOTAS)
 509                 mp->mnt_flag &= ~MNT_QUOTA;
 510         return (error);
 511 }
 512
 513 /*
 514  * Q_GETQUOTA - return current values in a dqblk structure.
 515  */
 516 int
 517 getquota(mp, id, type, addr)
 518         struct mount *mp;
 519         u_long id;
 520         int type;
 521         caddr_t addr;
 522 {
 523         struct dquot *dq;
 524         int error;
 525
 526         error = dqget(NULLVP, id, VFSTOUFS(mp), type, &dq);
 527         if (error)
 528                 return (error);
 529         error = copyout((caddr_t)&dq->dq_dqb, addr, sizeof (struct dqblk));
 530         dqrele(NULLVP, dq);
 531         return (error);
 532 }
 533
 534 /*
 535  * Q_SETQUOTA - assign an entire dqblk structure.
 536  */
 537 int
 538 setquota(mp, id, type, addr)
 539         struct mount *mp;
 540         u_long id;
 541         int type;
 542         caddr_t addr;
 543 {
 544         register struct dquot *dq;
 545         struct dquot *ndq;
 546         struct ufsmount *ump = VFSTOUFS(mp);
 547         struct dqblk newlim;
 548         int error;
 549
 550         error = copyin(addr, (caddr_t)&newlim, sizeof (struct dqblk));
 551         if (error)
 552                 return (error);
 553         error = dqget(NULLVP, id, ump, type, &ndq);
 554         if (error)
 555                 return (error);
 556         dq = ndq;
 557         while (dq->dq_flags & DQ_LOCK) {
 558                 dq->dq_flags |= DQ_WANT;
 559                 (void) tsleep((caddr_t)dq, PINOD+1, "setqta", 0);
 560         }
 561         /*
 562          * Copy all but the current values.
 563          * Reset time limit if previously had no soft limit or were
 564          * under it, but now have a soft limit and are over it.
 565          */
 566         newlim.dqb_curblocks = dq->dq_curblocks;
 567         newlim.dqb_curinodes = dq->dq_curinodes;
 568         if (dq->dq_id != 0) {
 569                 newlim.dqb_btime = dq->dq_btime;
 570                 newlim.dqb_itime = dq->dq_itime;
 571         }
 572         if (newlim.dqb_bsoftlimit &&
 573             dq->dq_curblocks >= newlim.dqb_bsoftlimit &&
 574             (dq->dq_bsoftlimit == 0 || dq->dq_curblocks < dq->dq_bsoftlimit))
 575                 newlim.dqb_btime = time_second + ump->um_btime[type];
 576         if (newlim.dqb_isoftlimit &&
 577             dq->dq_curinodes >= newlim.dqb_isoftlimit &&
 578             (dq->dq_isoftlimit == 0 || dq->dq_curinodes < dq->dq_isoftlimit))
 579                 newlim.dqb_itime = time_second + ump->um_itime[type];
 580         dq->dq_dqb = newlim;
 581         if (dq->dq_curblocks < dq->dq_bsoftlimit)
 582                 dq->dq_flags &= ~DQ_BLKS;
 583         if (dq->dq_curinodes < dq->dq_isoftlimit)
 584                 dq->dq_flags &= ~DQ_INODS;
 585         if (dq->dq_isoftlimit == 0 && dq->dq_bsoftlimit == 0 &&
 586             dq->dq_ihardlimit == 0 && dq->dq_bhardlimit == 0)
 587                 dq->dq_flags |= DQ_FAKE;
 588         else
 589                 dq->dq_flags &= ~DQ_FAKE;
 590         dq->dq_flags |= DQ_MOD;
 591         dqrele(NULLVP, dq);
 592         return (0);
 593 }
 594
 595 /*
 596  * Q_SETUSE - set current inode and block usage.
 597  */
 598 int
 599 setuse(mp, id, type, addr)
 600         struct mount *mp;
 601         u_long id;
 602         int type;
 603         caddr_t addr;
 604 {
 605         register struct dquot *dq;
 606         struct ufsmount *ump = VFSTOUFS(mp);
 607         struct dquot *ndq;
 608         struct dqblk usage;
 609         int error;
 610
 611         error = copyin(addr, (caddr_t)&usage, sizeof (struct dqblk));
 612         if (error)
 613                 return (error);
 614         error = dqget(NULLVP, id, ump, type, &ndq);
 615         if (error)
 616                 return (error);
 617         dq = ndq;
 618         while (dq->dq_flags & DQ_LOCK) {
 619                 dq->dq_flags |= DQ_WANT;
 620                 (void) tsleep((caddr_t)dq, PINOD+1, "setuse", 0);
 621         }
 622         /*
 623          * Reset time limit if have a soft limit and were
 624          * previously under it, but are now over it.
 625          */
 626         if (dq->dq_bsoftlimit && dq->dq_curblocks < dq->dq_bsoftlimit &&
 627             usage.dqb_curblocks >= dq->dq_bsoftlimit)
 628                 dq->dq_btime = time_second + ump->um_btime[type];
 629         if (dq->dq_isoftlimit && dq->dq_curinodes < dq->dq_isoftlimit &&
 630             usage.dqb_curinodes >= dq->dq_isoftlimit)
 631                 dq->dq_itime = time_second + ump->um_itime[type];
 632         dq->dq_curblocks = usage.dqb_curblocks;
 633         dq->dq_curinodes = usage.dqb_curinodes;
 634         if (dq->dq_curblocks < dq->dq_bsoftlimit)
 635                 dq->dq_flags &= ~DQ_BLKS;
 636         if (dq->dq_curinodes < dq->dq_isoftlimit)
 637                 dq->dq_flags &= ~DQ_INODS;
 638         dq->dq_flags |= DQ_MOD;
 639         dqrele(NULLVP, dq);
 640         return (0);
 641 }
 642
 643 /*
 644  * Q_SYNC - sync quota files to disk.
 645  */
 646 int
 647 qsync(mp)
 648         struct mount *mp;
 649 {
 650         struct ufsmount *ump = VFSTOUFS(mp);
 651         struct proc *p = curproc;               /* XXX */
 652         struct vnode *vp, *nextvp;
 653         struct dquot *dq;
 654         int i, error;
 655
 656         /*
 657          * Check if the mount point has any quotas.
 658          * If not, simply return.
 659          */
 660         for (i = 0; i < MAXQUOTAS; i++)
 661                 if (ump->um_quotas[i] != NULLVP)
 662                         break;
 663         if (i == MAXQUOTAS)
 664                 return (0);
 665         /*
 666          * Search vnodes associated with this mount point,
 667          * synchronizing any modified dquot structures.
 668          */
 669         simple_lock(&mntvnode_slock);
 670 again:
 671         for (vp = TAILQ_FIRST(&mp->mnt_nvnodelist); vp != NULL; vp = nextvp) {
 672                 if (vp->v_mount != mp)
 673                         goto again;
 674                 nextvp = TAILQ_NEXT(vp, v_nmntvnodes);
 675                 if (vp->v_type == VNON)
 676                         continue;
 677                 simple_lock(&vp->v_interlock);
 678                 simple_unlock(&mntvnode_slock);
 679                 error = vget(vp, LK_EXCLUSIVE | LK_NOWAIT | LK_INTERLOCK, p);
 680                 if (error) {
 681                         simple_lock(&mntvnode_slock);
 682                         if (error == ENOENT)
 683                                 goto again;
 684                         continue;
 685                 }
 686                 for (i = 0; i < MAXQUOTAS; i++) {
 687                         dq = VTOI(vp)->i_dquot[i];
 688                         if (dq != NODQUOT && (dq->dq_flags & DQ_MOD))
 689                                 dqsync(vp, dq);
 690                 }
 691                 vput(vp);
 692                 simple_lock(&mntvnode_slock);
 693                 if (TAILQ_NEXT(vp, v_nmntvnodes) != nextvp)
 694                         goto again;
 695         }
 696         simple_unlock(&mntvnode_slock);
 697         return (0);
 698 }
 699
 700 /*
 701  * Code pertaining to management of the in-core dquot data structures.
 702  */
 703 #define DQHASH(dqvp, id) \
 704         (&dqhashtbl[((((intptr_t)(dqvp)) >> 8) + id) & dqhash])
 705 static LIST_HEAD(dqhash, dquot) *dqhashtbl;
 706 static u_long dqhash;
 707
 708 /*
 709  * Dquot free list.
 710  */
 711 #define DQUOTINC        5       /* minimum free dquots desired */
 712 static TAILQ_HEAD(dqfreelist, dquot) dqfreelist;
 713 static long numdquot, desireddquot = DQUOTINC;
 714
 715 /*
 716  * Initialize the quota system.
 717  */
 718 void
 719 dqinit()
 720 {
 721
 722         dqhashtbl = hashinit(desiredvnodes, M_DQUOT, &dqhash);
 723         TAILQ_INIT(&dqfreelist);
 724 }
 725
 726 /*
 727  * Obtain a dquot structure for the specified identifier and quota file
 728  * reading the information from the file if necessary.
 729  */
 730 static int
 731 dqget(vp, id, ump, type, dqp)
 732         struct vnode *vp;
 733         u_long id;
 734         register struct ufsmount *ump;
 735         register int type;
 736         struct dquot **dqp;
 737 {
 738         struct proc *p = curproc;               /* XXX */
 739         struct dquot *dq;
 740         struct dqhash *dqh;
 741         struct vnode *dqvp;
 742         struct iovec aiov;
 743         struct uio auio;
 744         int error;
 745
 746         dqvp = ump->um_quotas[type];
 747         if (dqvp == NULLVP || (ump->um_qflags[type] & QTF_CLOSING)) {
 748                 *dqp = NODQUOT;
 749                 return (EINVAL);
 750         }
 751         /*
 752          * Check the cache first.
 753          */
 754         dqh = DQHASH(dqvp, id);
 755         for (dq = dqh->lh_first; dq; dq = dq->dq_hash.le_next) {
 756                 if (dq->dq_id != id ||
 757                     dq->dq_ump->um_quotas[dq->dq_type] != dqvp)
 758                         continue;
 759                 /*
 760                  * Cache hit with no references.  Take
 761                  * the structure off the free list.
 762                  */
 763                 if (dq->dq_cnt == 0)
 764                         TAILQ_REMOVE(&dqfreelist, dq, dq_freelist);
 765                 DQREF(dq);
 766                 *dqp = dq;
 767                 return (0);
 768         }
 769         /*
 770          * Not in cache, allocate a new one.
 771          */
 772         if (dqfreelist.tqh_first == NODQUOT &&
 773             numdquot < MAXQUOTAS * desiredvnodes)
 774                 desireddquot += DQUOTINC;
 775         if (numdquot < desireddquot) {
 776                 dq = (struct dquot *)malloc(sizeof *dq, M_DQUOT, M_WAITOK);
 777                 bzero((char *)dq, sizeof *dq);
 778                 numdquot++;
 779         } else {
 780                 if ((dq = dqfreelist.tqh_first) == NULL) {
 781                         tablefull("dquot");
 782                         *dqp = NODQUOT;
 783                         return (EUSERS);
 784                 }
 785                 if (dq->dq_cnt || (dq->dq_flags & DQ_MOD))
 786                         panic("dqget: free dquot isn't");
 787                 TAILQ_REMOVE(&dqfreelist, dq, dq_freelist);
 788                 if (dq->dq_ump != NULL)
 789                         LIST_REMOVE(dq, dq_hash);
 790         }
 791         /*
 792          * Initialize the contents of the dquot structure.
 793          */
 794         if (vp != dqvp)
 795                 vn_lock(dqvp, LK_EXCLUSIVE | LK_RETRY, p);
 796         LIST_INSERT_HEAD(dqh, dq, dq_hash);
 797         DQREF(dq);
 798         dq->dq_flags = DQ_LOCK;
 799         dq->dq_id = id;
 800         dq->dq_ump = ump;
 801         dq->dq_type = type;
 802         auio.uio_iov = &aiov;
 803         auio.uio_iovcnt = 1;
 804         aiov.iov_base = (caddr_t)&dq->dq_dqb;
 805         aiov.iov_len = sizeof (struct dqblk);
 806         auio.uio_resid = sizeof (struct dqblk);
 807         auio.uio_offset = (off_t)(id * sizeof (struct dqblk));
 808         auio.uio_segflg = UIO_SYSSPACE;
 809         auio.uio_rw = UIO_READ;
 810         auio.uio_procp = (struct proc *)0;
 811         error = VOP_READ(dqvp, &auio, 0, ump->um_cred[type]);
 812         if (auio.uio_resid == sizeof(struct dqblk) && error == 0)
 813                 bzero((caddr_t)&dq->dq_dqb, sizeof(struct dqblk));
 814         if (vp != dqvp)
 815                 VOP_UNLOCK(dqvp, 0, p);
 816         if (dq->dq_flags & DQ_WANT)
 817                 wakeup((caddr_t)dq);
 818         dq->dq_flags = 0;
 819         /*
 820          * I/O error in reading quota file, release
 821          * quota structure and reflect problem to caller.
 822          */
 823         if (error) {
 824                 LIST_REMOVE(dq, dq_hash);
 825                 dqrele(vp, dq);
 826                 *dqp = NODQUOT;
 827                 return (error);
 828         }
 829         /*
 830          * Check for no limit to enforce.
 831          * Initialize time values if necessary.
 832          */
 833         if (dq->dq_isoftlimit == 0 && dq->dq_bsoftlimit == 0 &&
 834             dq->dq_ihardlimit == 0 && dq->dq_bhardlimit == 0)
 835                 dq->dq_flags |= DQ_FAKE;
 836         if (dq->dq_id != 0) {
 837                 if (dq->dq_btime == 0)
 838                         dq->dq_btime = time_second + ump->um_btime[type];
 839                 if (dq->dq_itime == 0)
 840                         dq->dq_itime = time_second + ump->um_itime[type];
 841         }
 842         *dqp = dq;
 843         return (0);
 844 }
 845
 846 #ifdef DIAGNOSTIC
 847 /*
 848  * Obtain a reference to a dquot.
 849  */
 850 static void
 851 dqref(dq)
 852         struct dquot *dq;
 853 {
 854
 855         dq->dq_cnt++;
 856 }
 857 #endif
 858
 859 /*
 860  * Release a reference to a dquot.
 861  */
 862 void
 863 dqrele(vp, dq)
 864         struct vnode *vp;
 865         register struct dquot *dq;
 866 {
 867
 868         if (dq == NODQUOT)
 869                 return;
 870         if (dq->dq_cnt > 1) {
 871                 dq->dq_cnt--;
 872                 return;
 873         }
 874         if (dq->dq_flags & DQ_MOD)
 875                 (void) dqsync(vp, dq);
 876         if (--dq->dq_cnt > 0)
 877                 return;
 878         TAILQ_INSERT_TAIL(&dqfreelist, dq, dq_freelist);
 879 }
 880
 881 /*
 882  * Update the disk quota in the quota file.
 883  */
 884 static int
 885 dqsync(vp, dq)
 886         struct vnode *vp;
 887         struct dquot *dq;
 888 {
 889         struct proc *p = curproc;               /* XXX */
 890         struct vnode *dqvp;
 891         struct iovec aiov;
 892         struct uio auio;
 893         int error;
 894
 895         if (dq == NODQUOT)
 896                 panic("dqsync: dquot");
 897         if ((dq->dq_flags & DQ_MOD) == 0)
 898                 return (0);
 899         if ((dqvp = dq->dq_ump->um_quotas[dq->dq_type]) == NULLVP)
 900                 panic("dqsync: file");
 901         if (vp != dqvp)
 902                 vn_lock(dqvp, LK_EXCLUSIVE | LK_RETRY, p);
 903         while (dq->dq_flags & DQ_LOCK) {
 904                 dq->dq_flags |= DQ_WANT;
 905                 (void) tsleep((caddr_t)dq, PINOD+2, "dqsync", 0);
 906                 if ((dq->dq_flags & DQ_MOD) == 0) {
 907                         if (vp != dqvp)
 908                                 VOP_UNLOCK(dqvp, 0, p);
 909                         return (0);
 910                 }
 911         }
 912         dq->dq_flags |= DQ_LOCK;
 913         auio.uio_iov = &aiov;
 914         auio.uio_iovcnt = 1;
 915         aiov.iov_base = (caddr_t)&dq->dq_dqb;
 916         aiov.iov_len = sizeof (struct dqblk);
 917         auio.uio_resid = sizeof (struct dqblk);
 918         auio.uio_offset = (off_t)(dq->dq_id * sizeof (struct dqblk));
 919         auio.uio_segflg = UIO_SYSSPACE;
 920         auio.uio_rw = UIO_WRITE;
 921         auio.uio_procp = (struct proc *)0;
 922         error = VOP_WRITE(dqvp, &auio, 0, dq->dq_ump->um_cred[dq->dq_type]);
 923         if (auio.uio_resid && error == 0)
 924                 error = EIO;
 925         if (dq->dq_flags & DQ_WANT)
 926                 wakeup((caddr_t)dq);
 927         dq->dq_flags &= ~(DQ_MOD|DQ_LOCK|DQ_WANT);
 928         if (vp != dqvp)
 929                 VOP_UNLOCK(dqvp, 0, p);
 930         return (error);
 931 }
 932
 933 /*
 934  * Flush all entries from the cache for a particular vnode.
 935  */
 936 static void
 937 dqflush(vp)
 938         register struct vnode *vp;
 939 {
 940         register struct dquot *dq, *nextdq;
 941         struct dqhash *dqh;
 942
 943         /*
 944          * Move all dquot's that used to refer to this quota
 945          * file off their hash chains (they will eventually
 946          * fall off the head of the free list and be re-used).
 947          */
 948         for (dqh = &dqhashtbl[dqhash]; dqh >= dqhashtbl; dqh--) {
 949                 for (dq = dqh->lh_first; dq; dq = nextdq) {
 950                         nextdq = dq->dq_hash.le_next;
 951                         if (dq->dq_ump->um_quotas[dq->dq_type] != vp)
 952                                 continue;
 953                         if (dq->dq_cnt)
 954                                 panic("dqflush: stray dquot");
 955                         LIST_REMOVE(dq, dq_hash);
 956                         dq->dq_ump = (struct ufsmount *)0;
 957                 }
 958         }
 959 }