fs/nfsd/nfs4recover.c

   1 /*
   2 *  linux/fs/nfsd/nfs4recover.c
   3 *
   4 *  Copyright (c) 2004 The Regents of the University of Michigan.
   5 *  All rights reserved.
   6 *
   7 *  Andy Adamson <andros@citi.umich.edu>
   8 *
   9 *  Redistribution and use in source and binary forms, with or without
  10 *  modification, are permitted provided that the following conditions
  11 *  are met:
  12 *
  13 *  1. Redistributions of source code must retain the above copyright
  14 *     notice, this list of conditions and the following disclaimer.
  15 *  2. Redistributions in binary form must reproduce the above copyright
  16 *     notice, this list of conditions and the following disclaimer in the
  17 *     documentation and/or other materials provided with the distribution.
  18 *  3. Neither the name of the University nor the names of its
  19 *     contributors may be used to endorse or promote products derived
  20 *     from this software without specific prior written permission.
  21 *
  22 *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  23 *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  24 *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  25 *  DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  26 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  27 *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  28 *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  29 *  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  30 *  LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  31 *  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  32 *  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33 *
  34 */
  35
  36 #include <linux/err.h>
  37 #include <linux/sunrpc/svc.h>
  38 #include <linux/nfsd/nfsd.h>
  39 #include <linux/nfs4.h>
  40 #include <linux/nfsd/state.h>
  41 #include <linux/nfsd/xdr4.h>
  42 #include <linux/param.h>
  43 #include <linux/file.h>
  44 #include <linux/namei.h>
  45 #include <asm/uaccess.h>
  46 #include <linux/scatterlist.h>
  47 #include <linux/crypto.h>
  48 #include <linux/sched.h>
  49 #include <linux/mount.h>
  50
  51 #define NFSDDBG_FACILITY                NFSDDBG_PROC
  52
  53 /* Globals */
  54 static struct nameidata rec_dir;
  55 static int rec_dir_init = 0;
  56
  57 static void
  58 nfs4_save_user(uid_t *saveuid, gid_t *savegid)
  59 {
  60         *saveuid = current->fsuid;
  61         *savegid = current->fsgid;
  62         current->fsuid = 0;
  63         current->fsgid = 0;
  64 }
  65
  66 static void
  67 nfs4_reset_user(uid_t saveuid, gid_t savegid)
  68 {
  69         current->fsuid = saveuid;
  70         current->fsgid = savegid;
  71 }
  72
  73 static void
  74 md5_to_hex(char *out, char *md5)
  75 {
  76         int i;
  77
  78         for (i=0; i<16; i++) {
  79                 unsigned char c = md5[i];
  80
  81                 *out++ = '0' + ((c&0xf0)>>4) + (c>=0xa0)*('a'-'9'-1);
  82                 *out++ = '0' + (c&0x0f) + ((c&0x0f)>=0x0a)*('a'-'9'-1);
  83         }
  84         *out = '\0';
  85 }
  86
  87 __be32
  88 nfs4_make_rec_clidname(char *dname, struct xdr_netobj *clname)
  89 {
  90         struct xdr_netobj cksum;
  91         struct hash_desc desc;
  92         struct scatterlist sg;
  93         __be32 status = nfserr_resource;
  94
  95         dprintk("NFSD: nfs4_make_rec_clidname for %.*s\n",
  96                         clname->len, clname->data);
  97         desc.flags = CRYPTO_TFM_REQ_MAY_SLEEP;
  98         desc.tfm = crypto_alloc_hash("md5", 0, CRYPTO_ALG_ASYNC);
  99         if (IS_ERR(desc.tfm))
 100                 goto out_no_tfm;
 101         cksum.len = crypto_hash_digestsize(desc.tfm);
 102         cksum.data = kmalloc(cksum.len, GFP_KERNEL);
 103         if (cksum.data == NULL)
 104                 goto out;
 105
 106         sg_init_one(&sg, clname->data, clname->len);
 107
 108         if (crypto_hash_digest(&desc, &sg, sg.length, cksum.data))
 109                 goto out;
 110
 111         md5_to_hex(dname, cksum.data);
 112
 113         kfree(cksum.data);
 114         status = nfs_ok;
 115 out:
 116         crypto_free_hash(desc.tfm);
 117 out_no_tfm:
 118         return status;
 119 }
 120
 121 static void
 122 nfsd4_sync_rec_dir(void)
 123 {
 124         mutex_lock(&rec_dir.path.dentry->d_inode->i_mutex);
 125         nfsd_sync_dir(rec_dir.path.dentry);
 126         mutex_unlock(&rec_dir.path.dentry->d_inode->i_mutex);
 127 }
 128
 129 int
 130 nfsd4_create_clid_dir(struct nfs4_client *clp)
 131 {
 132         char *dname = clp->cl_recdir;
 133         struct dentry *dentry;
 134         uid_t uid;
 135         gid_t gid;
 136         int status;
 137
 138         dprintk("NFSD: nfsd4_create_clid_dir for \"%s\"\n", dname);
 139
 140         if (!rec_dir_init || clp->cl_firststate)
 141                 return 0;
 142
 143         nfs4_save_user(&uid, &gid);
 144
 145         /* lock the parent */
 146         mutex_lock(&rec_dir.path.dentry->d_inode->i_mutex);
 147
 148         dentry = lookup_one_len(dname, rec_dir.path.dentry, HEXDIR_LEN-1);
 149         if (IS_ERR(dentry)) {
 150                 status = PTR_ERR(dentry);
 151                 goto out_unlock;
 152         }
 153         status = -EEXIST;
 154         if (dentry->d_inode) {
 155                 dprintk("NFSD: nfsd4_create_clid_dir: DIRECTORY EXISTS\n");
 156                 goto out_put;
 157         }
 158         status = mnt_want_write(rec_dir.path.mnt);
 159         if (status)
 160                 goto out_put;
 161         status = vfs_mkdir(rec_dir.path.dentry->d_inode, dentry, S_IRWXU);
 162         mnt_drop_write(rec_dir.path.mnt);
 163 out_put:
 164         dput(dentry);
 165 out_unlock:
 166         mutex_unlock(&rec_dir.path.dentry->d_inode->i_mutex);
 167         if (status == 0) {
 168                 clp->cl_firststate = 1;
 169                 nfsd4_sync_rec_dir();
 170         }
 171         nfs4_reset_user(uid, gid);
 172         dprintk("NFSD: nfsd4_create_clid_dir returns %d\n", status);
 173         return status;
 174 }
 175
 176 typedef int (recdir_func)(struct dentry *, struct dentry *);
 177
 178 struct dentry_list {
 179         struct dentry *dentry;
 180         struct list_head list;
 181 };
 182
 183 struct dentry_list_arg {
 184         struct list_head dentries;
 185         struct dentry *parent;
 186 };
 187
 188 static int
 189 nfsd4_build_dentrylist(void *arg, const char *name, int namlen,
 190                 loff_t offset, u64 ino, unsigned int d_type)
 191 {
 192         struct dentry_list_arg *dla = arg;
 193         struct list_head *dentries = &dla->dentries;
 194         struct dentry *parent = dla->parent;
 195         struct dentry *dentry;
 196         struct dentry_list *child;
 197
 198         if (name && isdotent(name, namlen))
 199                 return 0;
 200         dentry = lookup_one_len(name, parent, namlen);
 201         if (IS_ERR(dentry))
 202                 return PTR_ERR(dentry);
 203         child = kmalloc(sizeof(*child), GFP_KERNEL);
 204         if (child == NULL)
 205                 return -ENOMEM;
 206         child->dentry = dentry;
 207         list_add(&child->list, dentries);
 208         return 0;
 209 }
 210
 211 static int
 212 nfsd4_list_rec_dir(struct dentry *dir, recdir_func *f)
 213 {
 214         struct file *filp;
 215         struct dentry_list_arg dla = {
 216                 .parent = dir,
 217         };
 218         struct list_head *dentries = &dla.dentries;
 219         struct dentry_list *child;
 220         uid_t uid;
 221         gid_t gid;
 222         int status;
 223
 224         if (!rec_dir_init)
 225                 return 0;
 226
 227         nfs4_save_user(&uid, &gid);
 228
 229         filp = dentry_open(dget(dir), mntget(rec_dir.path.mnt), O_RDONLY);
 230         status = PTR_ERR(filp);
 231         if (IS_ERR(filp))
 232                 goto out;
 233         INIT_LIST_HEAD(dentries);
 234         status = vfs_readdir(filp, nfsd4_build_dentrylist, &dla);
 235         fput(filp);
 236         while (!list_empty(dentries)) {
 237                 child = list_entry(dentries->next, struct dentry_list, list);
 238                 status = f(dir, child->dentry);
 239                 if (status)
 240                         goto out;
 241                 list_del(&child->list);
 242                 dput(child->dentry);
 243                 kfree(child);
 244         }
 245 out:
 246         while (!list_empty(dentries)) {
 247                 child = list_entry(dentries->next, struct dentry_list, list);
 248                 list_del(&child->list);
 249                 dput(child->dentry);
 250                 kfree(child);
 251         }
 252         nfs4_reset_user(uid, gid);
 253         return status;
 254 }
 255
 256 static int
 257 nfsd4_remove_clid_file(struct dentry *dir, struct dentry *dentry)
 258 {
 259         int status;
 260
 261         if (!S_ISREG(dir->d_inode->i_mode)) {
 262                 printk("nfsd4: non-file found in client recovery directory\n");
 263                 return -EINVAL;
 264         }
 265         mutex_lock_nested(&dir->d_inode->i_mutex, I_MUTEX_PARENT);
 266         status = vfs_unlink(dir->d_inode, dentry);
 267         mutex_unlock(&dir->d_inode->i_mutex);
 268         return status;
 269 }
 270
 271 static int
 272 nfsd4_clear_clid_dir(struct dentry *dir, struct dentry *dentry)
 273 {
 274         int status;
 275
 276         /* For now this directory should already be empty, but we empty it of
 277          * any regular files anyway, just in case the directory was created by
 278          * a kernel from the future.... */
 279         nfsd4_list_rec_dir(dentry, nfsd4_remove_clid_file);
 280         mutex_lock_nested(&dir->d_inode->i_mutex, I_MUTEX_PARENT);
 281         status = vfs_rmdir(dir->d_inode, dentry);
 282         mutex_unlock(&dir->d_inode->i_mutex);
 283         return status;
 284 }
 285
 286 static int
 287 nfsd4_unlink_clid_dir(char *name, int namlen)
 288 {
 289         struct dentry *dentry;
 290         int status;
 291
 292         dprintk("NFSD: nfsd4_unlink_clid_dir. name %.*s\n", namlen, name);
 293
 294         mutex_lock(&rec_dir.path.dentry->d_inode->i_mutex);
 295         dentry = lookup_one_len(name, rec_dir.path.dentry, namlen);
 296         mutex_unlock(&rec_dir.path.dentry->d_inode->i_mutex);
 297         if (IS_ERR(dentry)) {
 298                 status = PTR_ERR(dentry);
 299                 return status;
 300         }
 301         status = -ENOENT;
 302         if (!dentry->d_inode)
 303                 goto out;
 304
 305         status = nfsd4_clear_clid_dir(rec_dir.path.dentry, dentry);
 306 out:
 307         dput(dentry);
 308         return status;
 309 }
 310
 311 void
 312 nfsd4_remove_clid_dir(struct nfs4_client *clp)
 313 {
 314         uid_t uid;
 315         gid_t gid;
 316         int status;
 317
 318         if (!rec_dir_init || !clp->cl_firststate)
 319                 return;
 320
 321         status = mnt_want_write(rec_dir.path.mnt);
 322         if (status)
 323                 goto out;
 324         clp->cl_firststate = 0;
 325         nfs4_save_user(&uid, &gid);
 326         status = nfsd4_unlink_clid_dir(clp->cl_recdir, HEXDIR_LEN-1);
 327         nfs4_reset_user(uid, gid);
 328         if (status == 0)
 329                 nfsd4_sync_rec_dir();
 330         mnt_drop_write(rec_dir.path.mnt);
 331 out:
 332         if (status)
 333                 printk("NFSD: Failed to remove expired client state directory"
 334                                 " %.*s\n", HEXDIR_LEN, clp->cl_recdir);
 335         return;
 336 }
 337
 338 static int
 339 purge_old(struct dentry *parent, struct dentry *child)
 340 {
 341         int status;
 342
 343         if (nfs4_has_reclaimed_state(child->d_name.name))
 344                 return 0;
 345
 346         status = nfsd4_clear_clid_dir(parent, child);
 347         if (status)
 348                 printk("failed to remove client recovery directory %s\n",
 349                                 child->d_name.name);
 350         /* Keep trying, success or failure: */
 351         return 0;
 352 }
 353
 354 void
 355 nfsd4_recdir_purge_old(void) {
 356         int status;
 357
 358         if (!rec_dir_init)
 359                 return;
 360         status = mnt_want_write(rec_dir.path.mnt);
 361         if (status)
 362                 goto out;
 363         status = nfsd4_list_rec_dir(rec_dir.path.dentry, purge_old);
 364         if (status == 0)
 365                 nfsd4_sync_rec_dir();
 366         mnt_drop_write(rec_dir.path.mnt);
 367 out:
 368         if (status)
 369                 printk("nfsd4: failed to purge old clients from recovery"
 370                         " directory %s\n", rec_dir.path.dentry->d_name.name);
 371 }
 372
 373 static int
 374 load_recdir(struct dentry *parent, struct dentry *child)
 375 {
 376         if (child->d_name.len != HEXDIR_LEN - 1) {
 377                 printk("nfsd4: illegal name %s in recovery directory\n",
 378                                 child->d_name.name);
 379                 /* Keep trying; maybe the others are OK: */
 380                 return 0;
 381         }
 382         nfs4_client_to_reclaim(child->d_name.name);
 383         return 0;
 384 }
 385
 386 int
 387 nfsd4_recdir_load(void) {
 388         int status;
 389
 390         status = nfsd4_list_rec_dir(rec_dir.path.dentry, load_recdir);
 391         if (status)
 392                 printk("nfsd4: failed loading clients from recovery"
 393                         " directory %s\n", rec_dir.path.dentry->d_name.name);
 394         return status;
 395 }
 396
 397 /*
 398  * Hold reference to the recovery directory.
 399  */
 400
 401 void
 402 nfsd4_init_recdir(char *rec_dirname)
 403 {
 404         uid_t                   uid = 0;
 405         gid_t                   gid = 0;
 406         int                     status;
 407
 408         printk("NFSD: Using %s as the NFSv4 state recovery directory\n",
 409                         rec_dirname);
 410
 411         BUG_ON(rec_dir_init);
 412
 413         nfs4_save_user(&uid, &gid);
 414
 415         status = path_lookup(rec_dirname, LOOKUP_FOLLOW | LOOKUP_DIRECTORY,
 416                         &rec_dir);
 417         if (status)
 418                 printk("NFSD: unable to find recovery directory %s\n",
 419                                 rec_dirname);
 420
 421         if (!status)
 422                 rec_dir_init = 1;
 423         nfs4_reset_user(uid, gid);
 424 }
 425
 426 void
 427 nfsd4_shutdown_recdir(void)
 428 {
 429         if (!rec_dir_init)
 430                 return;
 431         rec_dir_init = 0;
 432         path_put(&rec_dir.path);
 433 }