sys/kern/vfs_quota.c

   1 /*
   2  * Copyright (c) 2011 François Tigeot <ftigeot@wolpond.org>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  *
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in
  13  *    the documentation and/or other materials provided with the
  14  *    distribution.
  15  * 3. Neither the name of The DragonFly Project nor the names of its
  16  *    contributors may be used to endorse or promote products derived
  17  *    from this software without specific, prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  21  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
  22  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
  23  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
  24  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
  25  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  26  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
  27  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  28  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
  29  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30  * SUCH DAMAGE.
  31  */
  32
  33 #include <sys/sysctl.h>
  34 #include <sys/mount.h>
  35 #include <sys/systm.h>
  36 #include <sys/nlookup.h>
  37 #include <sys/vnode.h>
  38 #include <sys/stat.h>
  39 #include <sys/vfs_quota.h>
  40 #include <sys/spinlock.h>
  41 #include <sys/spinlock2.h>
  42 #include <inttypes.h>
  43
  44 #include <sys/sysproto.h>
  45 #include <libprop/proplib.h>
  46 #include <libprop/prop_dictionary.h>
  47
  48 /* in-memory accounting, red-black tree based */
  49 /* FIXME: code duplication caused by uid_t / gid_t differences */
  50 RB_PROTOTYPE(ac_utree, ac_unode, rb_entry, rb_ac_unode_cmp);
  51 RB_PROTOTYPE(ac_gtree, ac_gnode, rb_entry, rb_ac_gnode_cmp);
  52
  53 static int
  54 rb_ac_unode_cmp(struct ac_unode *a, struct ac_unode *b);
  55 static int
  56 rb_ac_gnode_cmp(struct ac_gnode *a, struct ac_gnode *b);
  57
  58 RB_GENERATE(ac_utree, ac_unode, rb_entry, rb_ac_unode_cmp);
  59 RB_GENERATE(ac_gtree, ac_gnode, rb_entry, rb_ac_gnode_cmp);
  60
  61 struct ac_unode* unode_insert(struct mount*, uid_t);
  62 struct ac_gnode* gnode_insert(struct mount*, gid_t);
  63
  64 static int
  65 rb_ac_unode_cmp(struct ac_unode *a, struct ac_unode *b)
  66 {
  67         if (a->left_bits < b->left_bits)
  68                 return(-1);
  69         else if (a->left_bits > b->left_bits)
  70                 return(1);
  71         return(0);
  72 }
  73
  74 static int
  75 rb_ac_gnode_cmp(struct ac_gnode *a, struct ac_gnode *b)
  76 {
  77         if (a->left_bits < b->left_bits)
  78                 return(-1);
  79         else if (a->left_bits > b->left_bits)
  80                 return(1);
  81         return(0);
  82 }
  83
  84 struct ac_unode*
  85 unode_insert(struct mount *mp, uid_t uid)
  86 {
  87         struct ac_unode *unp, *res;
  88
  89         unp = kmalloc(sizeof(struct ac_unode), M_MOUNT, M_ZERO | M_WAITOK);
  90
  91         unp->left_bits = (uid >> ACCT_CHUNK_BITS);
  92         res = RB_INSERT(ac_utree, &mp->mnt_acct.ac_uroot, unp);
  93         KASSERT(res == NULL, ("unode_insert(): RB_INSERT didn't return NULL\n"));
  94
  95         return unp;
  96 }
  97
  98 struct ac_gnode*
  99 gnode_insert(struct mount *mp, gid_t gid)
 100 {
 101         struct ac_gnode *gnp, *res;
 102
 103         gnp = kmalloc(sizeof(struct ac_gnode), M_MOUNT, M_ZERO | M_WAITOK);
 104
 105         gnp->left_bits = (gid >> ACCT_CHUNK_BITS);
 106         res = RB_INSERT(ac_gtree, &mp->mnt_acct.ac_groot, gnp);
 107         KASSERT(res == NULL, ("gnode_insert(): RB_INSERT didn't return NULL\n"));
 108
 109         return gnp;
 110 }
 111
 112 static int vfs_accounting_enabled = 0;  /* global vfs accounting enable */
 113 TUNABLE_INT("vfs.accounting_enabled", &vfs_accounting_enabled);
 114 SYSCTL_INT(_vfs, OID_AUTO, accounting_enabled, CTLFLAG_RD,
 115                  &vfs_accounting_enabled, 0, "Enable VFS accounting");
 116
 117 /* initializes global accounting data */
 118 void
 119 vq_init(struct mount *mp) {
 120
 121         if (!vfs_accounting_enabled)
 122                 return;
 123
 124         /* initialize the rb trees */
 125         RB_INIT(&mp->mnt_acct.ac_uroot);
 126         RB_INIT(&mp->mnt_acct.ac_groot);
 127         spin_init(&mp->mnt_acct.ac_spin);
 128
 129         mp->mnt_acct.ac_bytes = 0;
 130
 131         /* enable data collection */
 132         mp->mnt_op->vfs_account = vfs_stdaccount;
 133         /* mark this filesystem as having accounting enabled */
 134         mp->mnt_flag |= MNT_ACCOUNTING;
 135         if (bootverbose)
 136                 kprintf("vfs accounting enabled for %s\n",
 137                     mp->mnt_stat.f_mntonname);
 138 }
 139
 140
 141 void
 142 vq_done(struct mount *mp) {
 143         /* TODO: remove the rb trees here */
 144 }
 145
 146 void
 147 vfs_stdaccount(struct mount *mp, uid_t uid, gid_t gid, int64_t delta)
 148 {
 149         struct ac_unode ufind, *unp;
 150         struct ac_gnode gfind, *gnp;
 151
 152         /* find or create address of chunk */
 153         ufind.left_bits = (uid >> ACCT_CHUNK_BITS);
 154         gfind.left_bits = (gid >> ACCT_CHUNK_BITS);
 155
 156         spin_lock(&mp->mnt_acct.ac_spin);
 157
 158         mp->mnt_acct.ac_bytes += delta;
 159
 160         if ((unp = RB_FIND(ac_utree, &mp->mnt_acct.ac_uroot, &ufind)) == NULL)
 161                 unp = unode_insert(mp, uid);
 162         if ((gnp = RB_FIND(ac_gtree, &mp->mnt_acct.ac_groot, &gfind)) == NULL)
 163                 gnp = gnode_insert(mp, gid);
 164
 165         /* update existing chunk */
 166         unp->uid_chunk[(uid & ACCT_CHUNK_MASK)] += delta;
 167         gnp->gid_chunk[(gid & ACCT_CHUNK_MASK)] += delta;
 168
 169         spin_unlock(&mp->mnt_acct.ac_spin);
 170 }
 171
 172 static void
 173 cmd_get_usage_all(struct mount *mp, prop_array_t dict_out) {
 174         struct ac_unode *unp;
 175         struct ac_gnode *gnp;
 176         int i;
 177         prop_dictionary_t item;
 178
 179         item = prop_dictionary_create();
 180         (void) prop_dictionary_set_uint64(item, "space used", mp->mnt_acct.ac_bytes);
 181         prop_array_add_and_rel(dict_out, item);
 182
 183         RB_FOREACH(unp, ac_utree, &mp->mnt_acct.ac_uroot) {
 184                 for (i=0; i<ACCT_CHUNK_NIDS; i++) {
 185                         if (unp->uid_chunk[i] != 0) {
 186                                 item = prop_dictionary_create();
 187                                 (void) prop_dictionary_set_uint32(item, "uid",
 188                                         (unp->left_bits << ACCT_CHUNK_BITS) + i);
 189                                 (void) prop_dictionary_set_uint64(item, "space used",
 190                                         unp->uid_chunk[i]);
 191                                 prop_array_add_and_rel(dict_out, item);
 192                         }
 193                 }
 194         }
 195
 196         RB_FOREACH(gnp, ac_gtree, &mp->mnt_acct.ac_groot) {
 197                 for (i=0; i<ACCT_CHUNK_NIDS; i++) {
 198                         if (gnp->gid_chunk[i] != 0) {
 199                                 item = prop_dictionary_create();
 200                                 (void) prop_dictionary_set_uint32(item, "gid",
 201                                         (gnp->left_bits << ACCT_CHUNK_BITS) + i);
 202                                 (void) prop_dictionary_set_uint64(item, "space used",
 203                                         gnp->gid_chunk[i]);
 204                                 prop_array_add_and_rel(dict_out, item);
 205                         }
 206                 }
 207         }
 208 }
 209
 210 int
 211 sys_vquotactl(struct vquotactl_args *vqa)
 212 /* const char *path, struct plistref *pref */
 213 {
 214         const char *path;
 215         struct plistref pref;
 216         prop_dictionary_t dict, args;
 217         char *cmd;
 218
 219         prop_array_t pa_out;
 220
 221         struct nlookupdata nd;
 222         struct mount *mp;
 223         int error;
 224
 225         path = vqa->path;
 226         error = copyin(vqa->pref, &pref, sizeof(pref));
 227         error = prop_dictionary_copyin(&pref, &dict);
 228         if (error != 0)
 229                 return(error);
 230
 231         /* we have a path, get its mount point */
 232         error = nlookup_init(&nd, path, UIO_USERSPACE, 0);
 233         if (error != 0)
 234                 return (error);
 235         error = nlookup(&nd);
 236         if (error != 0)
 237                 return (error);
 238         mp = nd.nl_nch.mount;
 239         nlookup_done(&nd);
 240
 241         /* get the command */
 242         if (prop_dictionary_get_cstring(dict, "command", &cmd) == 0) {
 243                 kprintf("sys_vquotactl(): couldn't get command\n");
 244                 return EINVAL;
 245         }
 246         args = prop_dictionary_get(dict, "arguments");
 247         if (args == NULL) {
 248                 kprintf("couldn't get arguments\n");
 249                 return EINVAL;
 250         }
 251
 252         pa_out = prop_array_create();
 253         if (pa_out == NULL)
 254                 return ENOMEM;
 255
 256         if (strcmp(cmd, "get usage all") == 0) {
 257                 cmd_get_usage_all(mp, pa_out);
 258                 goto done;
 259         }
 260         return EINVAL;
 261
 262 done:
 263         /* kernel to userland */
 264         dict = prop_dictionary_create();
 265         error = prop_dictionary_set(dict, "get usage all", pa_out);
 266
 267         error = prop_dictionary_copyout(&pref, dict);
 268         error = copyout(&pref, vqa->pref, sizeof(pref));
 269
 270         return error;
 271 }