e031d425b14e39d8835dc8a8a3811aea7330198b
[dragonfly.git] / 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.12 2004/03/01 06:33:23 dillon Exp $
39  */
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/kernel.h>
44 #include <sys/malloc.h>
45 #include <sys/fcntl.h>
46 #include <sys/proc.h>
47 #include <sys/namei.h>
48 #include <sys/vnode.h>
49 #include <sys/mount.h>
50 #include <vm/vm_zone.h>
51
52 #include "quota.h"
53 #include "inode.h"
54 #include "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 (struct inode *, long, struct ucred *, int);
64 static int chkiqchg (struct inode *, long, struct ucred *, int);
65 static int dqget (struct vnode *,
66                 u_long, struct ufsmount *, int, struct dquot **);
67 static int dqsync (struct vnode *, struct dquot *);
68 static void dqflush (struct vnode *);
69
70 #ifdef DIAGNOSTIC
71 static void dqref (struct dquot *);
72 static void chkdquot (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         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         struct inode *ip;
119         long change;
120         struct ucred *cred;
121         int flags;
122 {
123         struct dquot *dq;
124         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, 0, "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, 0, "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         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         struct inode *ip;
240         long change;
241         struct ucred *cred;
242         int flags;
243 {
244         struct dquot *dq;
245         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, 0, "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, 0, "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         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         struct inode *ip;
363 {
364         struct ufsmount *ump = VFSTOUFS(ITOV(ip)->v_mount);
365         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 struct scaninfo {
384         thread_t td;
385         int rescan;
386         int type;
387 };
388
389 /*
390  * Q_QUOTAON - set up a quota file for a particular file system.
391  */
392 static int quotaon_scan(struct mount *mp, struct vnode *vp,
393                 lwkt_tokref_t vlock, void *data);
394
395 int
396 quotaon(td, mp, type, fname)
397         struct thread *td;
398         struct mount *mp;
399         int type;
400         caddr_t fname;
401 {
402         struct ufsmount *ump = VFSTOUFS(mp);
403         struct vnode *vp, **vpp;
404         struct dquot *dq;
405         int error;
406         struct nameidata nd;
407         struct ucred *cred;
408         struct scaninfo scaninfo;
409
410         KKASSERT(td->td_proc);
411         cred = td->td_proc->p_ucred;
412
413         vpp = &ump->um_quotas[type];
414         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW, UIO_USERSPACE, fname, td);
415         error = vn_open(&nd, FREAD|FWRITE, 0);
416         if (error)
417                 return (error);
418         NDFREE(&nd, NDF_ONLY_PNBUF);
419         vp = nd.ni_vp;
420         VOP_UNLOCK(vp, NULL, 0, td);
421         if (vp->v_type != VREG) {
422                 (void) vn_close(vp, FREAD|FWRITE, td);
423                 return (EACCES);
424         }
425         if (*vpp != vp)
426                 quotaoff(td, mp, type);
427         ump->um_qflags[type] |= QTF_OPENING;
428         mp->mnt_flag |= MNT_QUOTA;
429         vp->v_flag |= VSYSTEM;
430         *vpp = vp;
431         /*
432          * Save the credential of the process that turned on quotas.
433          * Set up the time limits for this quota.
434          */
435         ump->um_cred[type] = crhold(cred);
436         ump->um_btime[type] = MAX_DQ_TIME;
437         ump->um_itime[type] = MAX_IQ_TIME;
438         if (dqget(NULLVP, 0, ump, type, &dq) == 0) {
439                 if (dq->dq_btime > 0)
440                         ump->um_btime[type] = dq->dq_btime;
441                 if (dq->dq_itime > 0)
442                         ump->um_itime[type] = dq->dq_itime;
443                 dqrele(NULLVP, dq);
444         }
445         /*
446          * Search vnodes associated with this mount point,
447          * adding references to quota file being opened.
448          * NB: only need to add dquot's for inodes being modified.
449          */
450         scaninfo.rescan = 1;
451         scaninfo.td = td;
452         while (scaninfo.rescan) {
453                 scaninfo.rescan = 0;
454                 error = vmntvnodescan(mp, NULL, quotaon_scan, &scaninfo);
455                 if (error)
456                         break;
457         }
458         ump->um_qflags[type] &= ~QTF_OPENING;
459         if (error)
460                 quotaoff(td, mp, type);
461         return (error);
462 }
463
464 static
465 int
466 quotaon_scan(struct mount *mp, struct vnode *vp,
467                 lwkt_tokref_t vlock, void *data)
468 {
469         int error;
470         struct scaninfo *info = data;
471
472         if (vp->v_type == VNON || vp->v_writecount == 0) {
473                 lwkt_reltoken(vlock);
474                 return(0);
475         }
476         if (vget(vp, vlock, LK_INTERLOCK|LK_EXCLUSIVE, info->td)) {
477                 info->rescan = 1;
478                 return(0);
479         }
480         error = getinoquota(VTOI(vp));
481         vput(vp);
482         return(error);
483 }
484
485 /*
486  * Q_QUOTAOFF - turn off disk quotas for a filesystem.
487  */
488
489 static int quotaoff_scan(struct mount *mp, struct vnode *vp,
490                 lwkt_tokref_t vlock, void *data);
491
492 int
493 quotaoff(struct thread *td, struct mount *mp, int type)
494 {
495         struct vnode *qvp;
496         struct ufsmount *ump = VFSTOUFS(mp);
497         struct ucred *cred;
498         int error;
499         struct scaninfo scaninfo;
500
501         KKASSERT(td->td_proc);
502         cred = td->td_proc->p_ucred;
503
504         if ((qvp = ump->um_quotas[type]) == NULLVP)
505                 return (0);
506         ump->um_qflags[type] |= QTF_CLOSING;
507
508         /*
509          * Search vnodes associated with this mount point,
510          * deleting any references to quota file being closed.
511          */
512         scaninfo.rescan = 1;
513         scaninfo.td = td;
514         scaninfo.type = type;
515         while (scaninfo.rescan) {
516                 scaninfo.rescan = 0;
517                 vmntvnodescan(mp, NULL, quotaoff_scan, &scaninfo);
518         }
519         dqflush(qvp);
520         qvp->v_flag &= ~VSYSTEM;
521         error = vn_close(qvp, FREAD|FWRITE, td);
522         ump->um_quotas[type] = NULLVP;
523         crfree(ump->um_cred[type]);
524         ump->um_cred[type] = NOCRED;
525         ump->um_qflags[type] &= ~QTF_CLOSING;
526         for (type = 0; type < MAXQUOTAS; type++) {
527                 if (ump->um_quotas[type] != NULLVP)
528                         break;
529         }
530         if (type == MAXQUOTAS)
531                 mp->mnt_flag &= ~MNT_QUOTA;
532         return (error);
533 }
534
535 static
536 int
537 quotaoff_scan(struct mount *mp, struct vnode *vp,
538                 lwkt_tokref_t vlock, void *data)
539 {
540         struct scaninfo *info = data;
541         struct dquot *dq;
542         struct inode *ip;
543
544         if (vp->v_type == VNON) {
545                 lwkt_reltoken(vlock);
546                 return(0);
547         }
548         if (vget(vp, vlock, LK_INTERLOCK|LK_EXCLUSIVE, info->td)) {
549                 info->rescan = 1;
550                 return(0);
551         }
552         ip = VTOI(vp);
553         dq = ip->i_dquot[info->type];
554         ip->i_dquot[info->type] = NODQUOT;
555         dqrele(vp, dq);
556         vput(vp);
557         return(0);
558 }
559
560 /*
561  * Q_GETQUOTA - return current values in a dqblk structure.
562  */
563 int
564 getquota(mp, id, type, addr)
565         struct mount *mp;
566         u_long id;
567         int type;
568         caddr_t addr;
569 {
570         struct dquot *dq;
571         int error;
572
573         error = dqget(NULLVP, id, VFSTOUFS(mp), type, &dq);
574         if (error)
575                 return (error);
576         error = copyout((caddr_t)&dq->dq_dqb, addr, sizeof (struct dqblk));
577         dqrele(NULLVP, dq);
578         return (error);
579 }
580
581 /*
582  * Q_SETQUOTA - assign an entire dqblk structure.
583  */
584 int
585 setquota(mp, id, type, addr)
586         struct mount *mp;
587         u_long id;
588         int type;
589         caddr_t addr;
590 {
591         struct dquot *dq;
592         struct dquot *ndq;
593         struct ufsmount *ump = VFSTOUFS(mp);
594         struct dqblk newlim;
595         int error;
596
597         error = copyin(addr, (caddr_t)&newlim, sizeof (struct dqblk));
598         if (error)
599                 return (error);
600         error = dqget(NULLVP, id, ump, type, &ndq);
601         if (error)
602                 return (error);
603         dq = ndq;
604         while (dq->dq_flags & DQ_LOCK) {
605                 dq->dq_flags |= DQ_WANT;
606                 (void) tsleep((caddr_t)dq, 0, "setqta", 0);
607         }
608         /*
609          * Copy all but the current values.
610          * Reset time limit if previously had no soft limit or were
611          * under it, but now have a soft limit and are over it.
612          */
613         newlim.dqb_curblocks = dq->dq_curblocks;
614         newlim.dqb_curinodes = dq->dq_curinodes;
615         if (dq->dq_id != 0) {
616                 newlim.dqb_btime = dq->dq_btime;
617                 newlim.dqb_itime = dq->dq_itime;
618         }
619         if (newlim.dqb_bsoftlimit &&
620             dq->dq_curblocks >= newlim.dqb_bsoftlimit &&
621             (dq->dq_bsoftlimit == 0 || dq->dq_curblocks < dq->dq_bsoftlimit))
622                 newlim.dqb_btime = time_second + ump->um_btime[type];
623         if (newlim.dqb_isoftlimit &&
624             dq->dq_curinodes >= newlim.dqb_isoftlimit &&
625             (dq->dq_isoftlimit == 0 || dq->dq_curinodes < dq->dq_isoftlimit))
626                 newlim.dqb_itime = time_second + ump->um_itime[type];
627         dq->dq_dqb = newlim;
628         if (dq->dq_curblocks < dq->dq_bsoftlimit)
629                 dq->dq_flags &= ~DQ_BLKS;
630         if (dq->dq_curinodes < dq->dq_isoftlimit)
631                 dq->dq_flags &= ~DQ_INODS;
632         if (dq->dq_isoftlimit == 0 && dq->dq_bsoftlimit == 0 &&
633             dq->dq_ihardlimit == 0 && dq->dq_bhardlimit == 0)
634                 dq->dq_flags |= DQ_FAKE;
635         else
636                 dq->dq_flags &= ~DQ_FAKE;
637         dq->dq_flags |= DQ_MOD;
638         dqrele(NULLVP, dq);
639         return (0);
640 }
641
642 /*
643  * Q_SETUSE - set current inode and block usage.
644  */
645 int
646 setuse(mp, id, type, addr)
647         struct mount *mp;
648         u_long id;
649         int type;
650         caddr_t addr;
651 {
652         struct dquot *dq;
653         struct ufsmount *ump = VFSTOUFS(mp);
654         struct dquot *ndq;
655         struct dqblk usage;
656         int error;
657
658         error = copyin(addr, (caddr_t)&usage, sizeof (struct dqblk));
659         if (error)
660                 return (error);
661         error = dqget(NULLVP, id, ump, type, &ndq);
662         if (error)
663                 return (error);
664         dq = ndq;
665         while (dq->dq_flags & DQ_LOCK) {
666                 dq->dq_flags |= DQ_WANT;
667                 (void) tsleep((caddr_t)dq, 0, "setuse", 0);
668         }
669         /*
670          * Reset time limit if have a soft limit and were
671          * previously under it, but are now over it.
672          */
673         if (dq->dq_bsoftlimit && dq->dq_curblocks < dq->dq_bsoftlimit &&
674             usage.dqb_curblocks >= dq->dq_bsoftlimit)
675                 dq->dq_btime = time_second + ump->um_btime[type];
676         if (dq->dq_isoftlimit && dq->dq_curinodes < dq->dq_isoftlimit &&
677             usage.dqb_curinodes >= dq->dq_isoftlimit)
678                 dq->dq_itime = time_second + ump->um_itime[type];
679         dq->dq_curblocks = usage.dqb_curblocks;
680         dq->dq_curinodes = usage.dqb_curinodes;
681         if (dq->dq_curblocks < dq->dq_bsoftlimit)
682                 dq->dq_flags &= ~DQ_BLKS;
683         if (dq->dq_curinodes < dq->dq_isoftlimit)
684                 dq->dq_flags &= ~DQ_INODS;
685         dq->dq_flags |= DQ_MOD;
686         dqrele(NULLVP, dq);
687         return (0);
688 }
689
690 /*
691  * Q_SYNC - sync quota files to disk.
692  */
693
694 static int qsync_scan(struct mount *mp, struct vnode *vp,
695                 lwkt_tokref_t vlock, void *data);
696 int
697 qsync(struct mount *mp)
698 {
699         struct ufsmount *ump = VFSTOUFS(mp);
700         struct thread *td = curthread;          /* XXX */
701         struct scaninfo scaninfo;
702         int i;
703
704         /*
705          * Check if the mount point has any quotas.
706          * If not, simply return.
707          */
708         for (i = 0; i < MAXQUOTAS; i++)
709                 if (ump->um_quotas[i] != NULLVP)
710                         break;
711         if (i == MAXQUOTAS)
712                 return (0);
713         /*
714          * Search vnodes associated with this mount point,
715          * synchronizing any modified dquot structures.
716          */
717         scaninfo.rescan = 1;
718         scaninfo.td = td;
719         while (scaninfo.rescan) {
720                 scaninfo.rescan = 0;
721                 vmntvnodescan(mp, NULL, qsync_scan, &scaninfo);
722         }
723         return (0);
724 }
725
726 static
727 int
728 qsync_scan(struct mount *mp, struct vnode *vp,
729                 lwkt_tokref_t vlock, void *data)
730 {
731         struct scaninfo *info = data;
732         struct dquot *dq;
733         int error;
734         int i;
735
736         if (vp->v_type == VNON) {
737                 lwkt_reltoken(vlock);
738                 return(0);
739         }
740         error = vget(vp, vlock, LK_EXCLUSIVE | LK_NOWAIT | LK_INTERLOCK, info->td);
741         if (error) {
742                 if (error == ENOENT)
743                         info->rescan = 1;
744                 return(0);
745         }
746         for (i = 0; i < MAXQUOTAS; i++) {
747                 dq = VTOI(vp)->i_dquot[i];
748                 if (dq != NODQUOT && (dq->dq_flags & DQ_MOD))
749                         dqsync(vp, dq);
750         }
751         vput(vp);
752         return(0);
753 }
754
755 /*
756  * Code pertaining to management of the in-core dquot data structures.
757  */
758 #define DQHASH(dqvp, id) \
759         (&dqhashtbl[((((intptr_t)(dqvp)) >> 8) + id) & dqhash])
760 static LIST_HEAD(dqhash, dquot) *dqhashtbl;
761 static u_long dqhash;
762
763 /*
764  * Dquot free list.
765  */
766 #define DQUOTINC        5       /* minimum free dquots desired */
767 static TAILQ_HEAD(dqfreelist, dquot) dqfreelist;
768 static long numdquot, desireddquot = DQUOTINC;
769
770 /*
771  * Initialize the quota system.
772  */
773 void
774 dqinit()
775 {
776
777         dqhashtbl = hashinit(desiredvnodes, M_DQUOT, &dqhash);
778         TAILQ_INIT(&dqfreelist);
779 }
780
781 /*
782  * Obtain a dquot structure for the specified identifier and quota file
783  * reading the information from the file if necessary.
784  */
785 static int
786 dqget(vp, id, ump, type, dqp)
787         struct vnode *vp;
788         u_long id;
789         struct ufsmount *ump;
790         int type;
791         struct dquot **dqp;
792 {
793         struct thread *td = curthread;          /* XXX */
794         struct dquot *dq;
795         struct dqhash *dqh;
796         struct vnode *dqvp;
797         struct iovec aiov;
798         struct uio auio;
799         int error;
800
801         dqvp = ump->um_quotas[type];
802         if (dqvp == NULLVP || (ump->um_qflags[type] & QTF_CLOSING)) {
803                 *dqp = NODQUOT;
804                 return (EINVAL);
805         }
806         /*
807          * Check the cache first.
808          */
809         dqh = DQHASH(dqvp, id);
810         for (dq = dqh->lh_first; dq; dq = dq->dq_hash.le_next) {
811                 if (dq->dq_id != id ||
812                     dq->dq_ump->um_quotas[dq->dq_type] != dqvp)
813                         continue;
814                 /*
815                  * Cache hit with no references.  Take
816                  * the structure off the free list.
817                  */
818                 if (dq->dq_cnt == 0)
819                         TAILQ_REMOVE(&dqfreelist, dq, dq_freelist);
820                 DQREF(dq);
821                 *dqp = dq;
822                 return (0);
823         }
824         /*
825          * Not in cache, allocate a new one.
826          */
827         if (dqfreelist.tqh_first == NODQUOT &&
828             numdquot < MAXQUOTAS * desiredvnodes)
829                 desireddquot += DQUOTINC;
830         if (numdquot < desireddquot) {
831                 dq = (struct dquot *)malloc(sizeof *dq, M_DQUOT, M_WAITOK);
832                 bzero((char *)dq, sizeof *dq);
833                 numdquot++;
834         } else {
835                 if ((dq = dqfreelist.tqh_first) == NULL) {
836                         tablefull("dquot");
837                         *dqp = NODQUOT;
838                         return (EUSERS);
839                 }
840                 if (dq->dq_cnt || (dq->dq_flags & DQ_MOD))
841                         panic("dqget: free dquot isn't");
842                 TAILQ_REMOVE(&dqfreelist, dq, dq_freelist);
843                 if (dq->dq_ump != NULL)
844                         LIST_REMOVE(dq, dq_hash);
845         }
846         /*
847          * Initialize the contents of the dquot structure.
848          */
849         if (vp != dqvp)
850                 vn_lock(dqvp, NULL, LK_EXCLUSIVE | LK_RETRY, td);
851         LIST_INSERT_HEAD(dqh, dq, dq_hash);
852         DQREF(dq);
853         dq->dq_flags = DQ_LOCK;
854         dq->dq_id = id;
855         dq->dq_ump = ump;
856         dq->dq_type = type;
857         auio.uio_iov = &aiov;
858         auio.uio_iovcnt = 1;
859         aiov.iov_base = (caddr_t)&dq->dq_dqb;
860         aiov.iov_len = sizeof (struct dqblk);
861         auio.uio_resid = sizeof (struct dqblk);
862         auio.uio_offset = (off_t)(id * sizeof (struct dqblk));
863         auio.uio_segflg = UIO_SYSSPACE;
864         auio.uio_rw = UIO_READ;
865         auio.uio_td = NULL;
866         error = VOP_READ(dqvp, &auio, 0, ump->um_cred[type]);
867         if (auio.uio_resid == sizeof(struct dqblk) && error == 0)
868                 bzero((caddr_t)&dq->dq_dqb, sizeof(struct dqblk));
869         if (vp != dqvp)
870                 VOP_UNLOCK(dqvp, NULL, 0, td);
871         if (dq->dq_flags & DQ_WANT)
872                 wakeup((caddr_t)dq);
873         dq->dq_flags = 0;
874         /*
875          * I/O error in reading quota file, release
876          * quota structure and reflect problem to caller.
877          */
878         if (error) {
879                 LIST_REMOVE(dq, dq_hash);
880                 dqrele(vp, dq);
881                 *dqp = NODQUOT;
882                 return (error);
883         }
884         /*
885          * Check for no limit to enforce.
886          * Initialize time values if necessary.
887          */
888         if (dq->dq_isoftlimit == 0 && dq->dq_bsoftlimit == 0 &&
889             dq->dq_ihardlimit == 0 && dq->dq_bhardlimit == 0)
890                 dq->dq_flags |= DQ_FAKE;
891         if (dq->dq_id != 0) {
892                 if (dq->dq_btime == 0)
893                         dq->dq_btime = time_second + ump->um_btime[type];
894                 if (dq->dq_itime == 0)
895                         dq->dq_itime = time_second + ump->um_itime[type];
896         }
897         *dqp = dq;
898         return (0);
899 }
900
901 #ifdef DIAGNOSTIC
902 /*
903  * Obtain a reference to a dquot.
904  */
905 static void
906 dqref(dq)
907         struct dquot *dq;
908 {
909
910         dq->dq_cnt++;
911 }
912 #endif
913
914 /*
915  * Release a reference to a dquot.
916  */
917 void
918 dqrele(vp, dq)
919         struct vnode *vp;
920         struct dquot *dq;
921 {
922
923         if (dq == NODQUOT)
924                 return;
925         if (dq->dq_cnt > 1) {
926                 dq->dq_cnt--;
927                 return;
928         }
929         if (dq->dq_flags & DQ_MOD)
930                 (void) dqsync(vp, dq);
931         if (--dq->dq_cnt > 0)
932                 return;
933         TAILQ_INSERT_TAIL(&dqfreelist, dq, dq_freelist);
934 }
935
936 /*
937  * Update the disk quota in the quota file.
938  */
939 static int
940 dqsync(struct vnode *vp, struct dquot *dq)
941 {
942         struct thread *td = curthread;          /* XXX */
943         struct vnode *dqvp;
944         struct iovec aiov;
945         struct uio auio;
946         int error;
947
948         if (dq == NODQUOT)
949                 panic("dqsync: dquot");
950         if ((dq->dq_flags & DQ_MOD) == 0)
951                 return (0);
952         if ((dqvp = dq->dq_ump->um_quotas[dq->dq_type]) == NULLVP)
953                 panic("dqsync: file");
954         if (vp != dqvp)
955                 vn_lock(dqvp, NULL, LK_EXCLUSIVE | LK_RETRY, td);
956         while (dq->dq_flags & DQ_LOCK) {
957                 dq->dq_flags |= DQ_WANT;
958                 (void) tsleep((caddr_t)dq, 0, "dqsync", 0);
959                 if ((dq->dq_flags & DQ_MOD) == 0) {
960                         if (vp != dqvp)
961                                 VOP_UNLOCK(dqvp, NULL, 0, td);
962                         return (0);
963                 }
964         }
965         dq->dq_flags |= DQ_LOCK;
966         auio.uio_iov = &aiov;
967         auio.uio_iovcnt = 1;
968         aiov.iov_base = (caddr_t)&dq->dq_dqb;
969         aiov.iov_len = sizeof (struct dqblk);
970         auio.uio_resid = sizeof (struct dqblk);
971         auio.uio_offset = (off_t)(dq->dq_id * sizeof (struct dqblk));
972         auio.uio_segflg = UIO_SYSSPACE;
973         auio.uio_rw = UIO_WRITE;
974         auio.uio_td = NULL;
975         error = VOP_WRITE(dqvp, &auio, 0, dq->dq_ump->um_cred[dq->dq_type]);
976         if (auio.uio_resid && error == 0)
977                 error = EIO;
978         if (dq->dq_flags & DQ_WANT)
979                 wakeup((caddr_t)dq);
980         dq->dq_flags &= ~(DQ_MOD|DQ_LOCK|DQ_WANT);
981         if (vp != dqvp)
982                 VOP_UNLOCK(dqvp, NULL, 0, td);
983         return (error);
984 }
985
986 /*
987  * Flush all entries from the cache for a particular vnode.
988  */
989 static void
990 dqflush(vp)
991         struct vnode *vp;
992 {
993         struct dquot *dq, *nextdq;
994         struct dqhash *dqh;
995
996         /*
997          * Move all dquot's that used to refer to this quota
998          * file off their hash chains (they will eventually
999          * fall off the head of the free list and be re-used).
1000          */
1001         for (dqh = &dqhashtbl[dqhash]; dqh >= dqhashtbl; dqh--) {
1002                 for (dq = dqh->lh_first; dq; dq = nextdq) {
1003                         nextdq = dq->dq_hash.le_next;
1004                         if (dq->dq_ump->um_quotas[dq->dq_type] != vp)
1005                                 continue;
1006                         if (dq->dq_cnt)
1007                                 panic("dqflush: stray dquot");
1008                         LIST_REMOVE(dq, dq_hash);
1009                         dq->dq_ump = (struct ufsmount *)0;
1010                 }
1011         }
1012 }