fs/nfsd/export.c

   1 #define MSNFS   /* HACK HACK */
   2 /*
   3  * linux/fs/nfsd/export.c
   4  *
   5  * NFS exporting and validation.
   6  *
   7  * We maintain a list of clients, each of which has a list of
   8  * exports. To export an fs to a given client, you first have
   9  * to create the client entry with NFSCTL_ADDCLIENT, which
  10  * creates a client control block and adds it to the hash
  11  * table. Then, you call NFSCTL_EXPORT for each fs.
  12  *
  13  *
  14  * Copyright (C) 1995, 1996 Olaf Kirch, <okir@monad.swb.de>
  15  */
  16
  17 #include <linux/unistd.h>
  18 #include <linux/slab.h>
  19 #include <linux/sched.h>
  20 #include <linux/stat.h>
  21 #include <linux/in.h>
  22 #include <linux/seq_file.h>
  23 #include <linux/syscalls.h>
  24 #include <linux/rwsem.h>
  25 #include <linux/dcache.h>
  26 #include <linux/namei.h>
  27 #include <linux/mount.h>
  28 #include <linux/hash.h>
  29
  30 #include <linux/sunrpc/svc.h>
  31 #include <linux/nfsd/nfsd.h>
  32 #include <linux/nfsd/nfsfh.h>
  33 #include <linux/nfsd/syscall.h>
  34 #include <linux/lockd/bind.h>
  35
  36 #define NFSDDBG_FACILITY        NFSDDBG_EXPORT
  37 #define NFSD_PARANOIA 1
  38
  39 typedef struct auth_domain      svc_client;
  40 typedef struct svc_export       svc_export;
  41
  42 static void             exp_do_unexport(svc_export *unexp);
  43 static int              exp_verify_string(char *cp, int max);
  44
  45 /*
  46  * We have two caches.
  47  * One maps client+vfsmnt+dentry to export options - the export map
  48  * The other maps client+filehandle-fragment to export options. - the expkey map
  49  *
  50  * The export options are actually stored in the first map, and the
  51  * second map contains a reference to the entry in the first map.
  52  */
  53
  54 #define EXPKEY_HASHBITS         8
  55 #define EXPKEY_HASHMAX          (1 << EXPKEY_HASHBITS)
  56 #define EXPKEY_HASHMASK         (EXPKEY_HASHMAX -1)
  57 static struct cache_head *expkey_table[EXPKEY_HASHMAX];
  58
  59 static inline int svc_expkey_hash(struct svc_expkey *item)
  60 {
  61         int hash = item->ek_fsidtype;
  62         char * cp = (char*)item->ek_fsid;
  63         int len = key_len(item->ek_fsidtype);
  64
  65         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
  66         hash ^= hash_ptr(item->ek_client, EXPKEY_HASHBITS);
  67         return hash & EXPKEY_HASHMASK;
  68 }
  69
  70 void expkey_put(struct cache_head *item, struct cache_detail *cd)
  71 {
  72         if (cache_put(item, cd)) {
  73                 struct svc_expkey *key = container_of(item, struct svc_expkey, h);
  74                 if (test_bit(CACHE_VALID, &item->flags) &&
  75                     !test_bit(CACHE_NEGATIVE, &item->flags))
  76                         exp_put(key->ek_export);
  77                 auth_domain_put(key->ek_client);
  78                 kfree(key);
  79         }
  80 }
  81
  82 void expkey_request(struct cache_detail *cd,
  83                     struct cache_head *h,
  84                     char **bpp, int *blen)
  85 {
  86         /* client fsidtype \xfsid */
  87         struct svc_expkey *ek = container_of(h, struct svc_expkey, h);
  88         char type[5];
  89
  90         qword_add(bpp, blen, ek->ek_client->name);
  91         snprintf(type, 5, "%d", ek->ek_fsidtype);
  92         qword_add(bpp, blen, type);
  93         qword_addhex(bpp, blen, (char*)ek->ek_fsid, key_len(ek->ek_fsidtype));
  94         (*bpp)[-1] = '\n';
  95 }
  96
  97 static struct svc_expkey *svc_expkey_lookup(struct svc_expkey *, int);
  98 int expkey_parse(struct cache_detail *cd, char *mesg, int mlen)
  99 {
 100         /* client fsidtype fsid [path] */
 101         char *buf;
 102         int len;
 103         struct auth_domain *dom = NULL;
 104         int err;
 105         int fsidtype;
 106         char *ep;
 107         struct svc_expkey key;
 108
 109         if (mesg[mlen-1] != '\n')
 110                 return -EINVAL;
 111         mesg[mlen-1] = 0;
 112
 113         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
 114         err = -ENOMEM;
 115         if (!buf) goto out;
 116
 117         err = -EINVAL;
 118         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 119                 goto out;
 120
 121         err = -ENOENT;
 122         dom = auth_domain_find(buf);
 123         if (!dom)
 124                 goto out;
 125         dprintk("found domain %s\n", buf);
 126
 127         err = -EINVAL;
 128         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 129                 goto out;
 130         fsidtype = simple_strtoul(buf, &ep, 10);
 131         if (*ep)
 132                 goto out;
 133         dprintk("found fsidtype %d\n", fsidtype);
 134         if (fsidtype > 2)
 135                 goto out;
 136         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 137                 goto out;
 138         dprintk("found fsid length %d\n", len);
 139         if (len != key_len(fsidtype))
 140                 goto out;
 141
 142         /* OK, we seem to have a valid key */
 143         key.h.flags = 0;
 144         key.h.expiry_time = get_expiry(&mesg);
 145         if (key.h.expiry_time == 0)
 146                 goto out;
 147
 148         key.ek_client = dom;
 149         key.ek_fsidtype = fsidtype;
 150         memcpy(key.ek_fsid, buf, len);
 151
 152         /* now we want a pathname, or empty meaning NEGATIVE  */
 153         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) < 0)
 154                 goto out;
 155         dprintk("Path seems to be <%s>\n", buf);
 156         err = 0;
 157         if (len == 0) {
 158                 struct svc_expkey *ek;
 159                 set_bit(CACHE_NEGATIVE, &key.h.flags);
 160                 ek = svc_expkey_lookup(&key, 1);
 161                 if (ek)
 162                         expkey_put(&ek->h, &svc_expkey_cache);
 163         } else {
 164                 struct nameidata nd;
 165                 struct svc_expkey *ek;
 166                 struct svc_export *exp;
 167                 err = path_lookup(buf, 0, &nd);
 168                 if (err)
 169                         goto out;
 170
 171                 dprintk("Found the path %s\n", buf);
 172                 exp = exp_get_by_name(dom, nd.mnt, nd.dentry, NULL);
 173
 174                 err = -ENOENT;
 175                 if (!exp)
 176                         goto out_nd;
 177                 key.ek_export = exp;
 178                 dprintk("And found export\n");
 179
 180                 ek = svc_expkey_lookup(&key, 1);
 181                 if (ek)
 182                         expkey_put(&ek->h, &svc_expkey_cache);
 183                 exp_put(exp);
 184                 err = 0;
 185         out_nd:
 186                 path_release(&nd);
 187         }
 188         cache_flush();
 189  out:
 190         if (dom)
 191                 auth_domain_put(dom);
 192         if (buf)
 193                 kfree(buf);
 194         return err;
 195 }
 196
 197 static int expkey_show(struct seq_file *m,
 198                        struct cache_detail *cd,
 199                        struct cache_head *h)
 200 {
 201         struct svc_expkey *ek ;
 202
 203         if (h ==NULL) {
 204                 seq_puts(m, "#domain fsidtype fsid [path]\n");
 205                 return 0;
 206         }
 207         ek = container_of(h, struct svc_expkey, h);
 208         seq_printf(m, "%s %d 0x%08x", ek->ek_client->name,
 209                    ek->ek_fsidtype, ek->ek_fsid[0]);
 210         if (ek->ek_fsidtype != 1)
 211                 seq_printf(m, "%08x", ek->ek_fsid[1]);
 212         if (ek->ek_fsidtype == 2)
 213                 seq_printf(m, "%08x", ek->ek_fsid[2]);
 214         if (test_bit(CACHE_VALID, &h->flags) &&
 215             !test_bit(CACHE_NEGATIVE, &h->flags)) {
 216                 seq_printf(m, " ");
 217                 seq_path(m, ek->ek_export->ex_mnt, ek->ek_export->ex_dentry, "\\ \t\n");
 218         }
 219         seq_printf(m, "\n");
 220         return 0;
 221 }
 222
 223 struct cache_detail svc_expkey_cache = {
 224         .hash_size      = EXPKEY_HASHMAX,
 225         .hash_table     = expkey_table,
 226         .name           = "nfsd.fh",
 227         .cache_put      = expkey_put,
 228         .cache_request  = expkey_request,
 229         .cache_parse    = expkey_parse,
 230         .cache_show     = expkey_show,
 231 };
 232
 233 static inline int svc_expkey_match (struct svc_expkey *a, struct svc_expkey *b)
 234 {
 235         if (a->ek_fsidtype != b->ek_fsidtype ||
 236             a->ek_client != b->ek_client ||
 237             memcmp(a->ek_fsid, b->ek_fsid, key_len(a->ek_fsidtype)) != 0)
 238                 return 0;
 239         return 1;
 240 }
 241
 242 static inline void svc_expkey_init(struct svc_expkey *new, struct svc_expkey *item)
 243 {
 244         cache_get(&item->ek_client->h);
 245         new->ek_client = item->ek_client;
 246         new->ek_fsidtype = item->ek_fsidtype;
 247         new->ek_fsid[0] = item->ek_fsid[0];
 248         new->ek_fsid[1] = item->ek_fsid[1];
 249         new->ek_fsid[2] = item->ek_fsid[2];
 250 }
 251
 252 static inline void svc_expkey_update(struct svc_expkey *new, struct svc_expkey *item)
 253 {
 254         cache_get(&item->ek_export->h);
 255         new->ek_export = item->ek_export;
 256 }
 257
 258 static DefineSimpleCacheLookup(svc_expkey,0) /* no inplace updates */
 259
 260 #define EXPORT_HASHBITS         8
 261 #define EXPORT_HASHMAX          (1<< EXPORT_HASHBITS)
 262 #define EXPORT_HASHMASK         (EXPORT_HASHMAX -1)
 263
 264 static struct cache_head *export_table[EXPORT_HASHMAX];
 265
 266 static inline int svc_export_hash(struct svc_export *item)
 267 {
 268         int rv;
 269
 270         rv = hash_ptr(item->ex_client, EXPORT_HASHBITS);
 271         rv ^= hash_ptr(item->ex_dentry, EXPORT_HASHBITS);
 272         rv ^= hash_ptr(item->ex_mnt, EXPORT_HASHBITS);
 273         return rv;
 274 }
 275
 276 void svc_export_put(struct cache_head *item, struct cache_detail *cd)
 277 {
 278         if (cache_put(item, cd)) {
 279                 struct svc_export *exp = container_of(item, struct svc_export, h);
 280                 dput(exp->ex_dentry);
 281                 mntput(exp->ex_mnt);
 282                 auth_domain_put(exp->ex_client);
 283                 kfree(exp);
 284         }
 285 }
 286
 287 void svc_export_request(struct cache_detail *cd,
 288                         struct cache_head *h,
 289                         char **bpp, int *blen)
 290 {
 291         /*  client path */
 292         struct svc_export *exp = container_of(h, struct svc_export, h);
 293         char *pth;
 294
 295         qword_add(bpp, blen, exp->ex_client->name);
 296         pth = d_path(exp->ex_dentry, exp->ex_mnt, *bpp, *blen);
 297         if (IS_ERR(pth)) {
 298                 /* is this correct? */
 299                 (*bpp)[0] = '\n';
 300                 return;
 301         }
 302         qword_add(bpp, blen, pth);
 303         (*bpp)[-1] = '\n';
 304 }
 305
 306 static struct svc_export *svc_export_lookup(struct svc_export *, int);
 307
 308 extern struct dentry *
 309 find_exported_dentry(struct super_block *sb, void *obj, void *parent,
 310                      int (*acceptable)(void *context, struct dentry *de),
 311                      void *context);
 312
 313 static int check_export(struct inode *inode, int flags)
 314 {
 315
 316         /* We currently export only dirs and regular files.
 317          * This is what umountd does.
 318          */
 319         if (!S_ISDIR(inode->i_mode) &&
 320             !S_ISREG(inode->i_mode))
 321                 return -ENOTDIR;
 322
 323         /* There are two requirements on a filesystem to be exportable.
 324          * 1:  We must be able to identify the filesystem from a number.
 325          *       either a device number (so FS_REQUIRES_DEV needed)
 326          *       or an FSID number (so NFSEXP_FSID needed).
 327          * 2:  We must be able to find an inode from a filehandle.
 328          *       This means that s_export_op must be set.
 329          */
 330         if (!(inode->i_sb->s_type->fs_flags & FS_REQUIRES_DEV) &&
 331             !(flags & NFSEXP_FSID)) {
 332                 dprintk("exp_export: export of non-dev fs without fsid");
 333                 return -EINVAL;
 334         }
 335         if (!inode->i_sb->s_export_op) {
 336                 dprintk("exp_export: export of invalid fs type.\n");
 337                 return -EINVAL;
 338         }
 339
 340         /* Ok, we can export it */;
 341         if (!inode->i_sb->s_export_op->find_exported_dentry)
 342                 inode->i_sb->s_export_op->find_exported_dentry =
 343                         find_exported_dentry;
 344         return 0;
 345
 346 }
 347
 348 int svc_export_parse(struct cache_detail *cd, char *mesg, int mlen)
 349 {
 350         /* client path expiry [flags anonuid anongid fsid] */
 351         char *buf;
 352         int len;
 353         int err;
 354         struct auth_domain *dom = NULL;
 355         struct nameidata nd;
 356         struct svc_export exp, *expp;
 357         int an_int;
 358
 359         nd.dentry = NULL;
 360
 361         if (mesg[mlen-1] != '\n')
 362                 return -EINVAL;
 363         mesg[mlen-1] = 0;
 364
 365         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
 366         err = -ENOMEM;
 367         if (!buf) goto out;
 368
 369         /* client */
 370         len = qword_get(&mesg, buf, PAGE_SIZE);
 371         err = -EINVAL;
 372         if (len <= 0) goto out;
 373
 374         err = -ENOENT;
 375         dom = auth_domain_find(buf);
 376         if (!dom)
 377                 goto out;
 378
 379         /* path */
 380         err = -EINVAL;
 381         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 382                 goto out;
 383         err = path_lookup(buf, 0, &nd);
 384         if (err) goto out;
 385
 386         exp.h.flags = 0;
 387         exp.ex_client = dom;
 388         exp.ex_mnt = nd.mnt;
 389         exp.ex_dentry = nd.dentry;
 390
 391         /* expiry */
 392         err = -EINVAL;
 393         exp.h.expiry_time = get_expiry(&mesg);
 394         if (exp.h.expiry_time == 0)
 395                 goto out;
 396
 397         /* flags */
 398         err = get_int(&mesg, &an_int);
 399         if (err == -ENOENT)
 400                 set_bit(CACHE_NEGATIVE, &exp.h.flags);
 401         else {
 402                 if (err || an_int < 0) goto out;
 403                 exp.ex_flags= an_int;
 404
 405                 /* anon uid */
 406                 err = get_int(&mesg, &an_int);
 407                 if (err) goto out;
 408                 exp.ex_anon_uid= an_int;
 409
 410                 /* anon gid */
 411                 err = get_int(&mesg, &an_int);
 412                 if (err) goto out;
 413                 exp.ex_anon_gid= an_int;
 414
 415                 /* fsid */
 416                 err = get_int(&mesg, &an_int);
 417                 if (err) goto out;
 418                 exp.ex_fsid = an_int;
 419
 420                 err = check_export(nd.dentry->d_inode, exp.ex_flags);
 421                 if (err) goto out;
 422         }
 423
 424         expp = svc_export_lookup(&exp, 1);
 425         if (expp)
 426                 exp_put(expp);
 427         err = 0;
 428         cache_flush();
 429  out:
 430         if (nd.dentry)
 431                 path_release(&nd);
 432         if (dom)
 433                 auth_domain_put(dom);
 434         if (buf)
 435                 kfree(buf);
 436         return err;
 437 }
 438
 439 static void exp_flags(struct seq_file *m, int flag, int fsid, uid_t anonu, uid_t anong);
 440
 441 static int svc_export_show(struct seq_file *m,
 442                            struct cache_detail *cd,
 443                            struct cache_head *h)
 444 {
 445         struct svc_export *exp ;
 446
 447         if (h ==NULL) {
 448                 seq_puts(m, "#path domain(flags)\n");
 449                 return 0;
 450         }
 451         exp = container_of(h, struct svc_export, h);
 452         seq_path(m, exp->ex_mnt, exp->ex_dentry, " \t\n\\");
 453         seq_putc(m, '\t');
 454         seq_escape(m, exp->ex_client->name, " \t\n\\");
 455         seq_putc(m, '(');
 456         if (test_bit(CACHE_VALID, &h->flags) &&
 457             !test_bit(CACHE_NEGATIVE, &h->flags))
 458                 exp_flags(m, exp->ex_flags, exp->ex_fsid,
 459                           exp->ex_anon_uid, exp->ex_anon_gid);
 460         seq_puts(m, ")\n");
 461         return 0;
 462 }
 463 struct cache_detail svc_export_cache = {
 464         .hash_size      = EXPORT_HASHMAX,
 465         .hash_table     = export_table,
 466         .name           = "nfsd.export",
 467         .cache_put      = svc_export_put,
 468         .cache_request  = svc_export_request,
 469         .cache_parse    = svc_export_parse,
 470         .cache_show     = svc_export_show,
 471 };
 472
 473 static inline int svc_export_match(struct svc_export *a, struct svc_export *b)
 474 {
 475         return a->ex_client == b->ex_client &&
 476                 a->ex_dentry == b->ex_dentry &&
 477                 a->ex_mnt == b->ex_mnt;
 478 }
 479 static inline void svc_export_init(struct svc_export *new, struct svc_export *item)
 480 {
 481         cache_get(&item->ex_client->h);
 482         new->ex_client = item->ex_client;
 483         new->ex_dentry = dget(item->ex_dentry);
 484         new->ex_mnt = mntget(item->ex_mnt);
 485 }
 486
 487 static inline void svc_export_update(struct svc_export *new, struct svc_export *item)
 488 {
 489         new->ex_flags = item->ex_flags;
 490         new->ex_anon_uid = item->ex_anon_uid;
 491         new->ex_anon_gid = item->ex_anon_gid;
 492         new->ex_fsid = item->ex_fsid;
 493 }
 494
 495 static DefineSimpleCacheLookup(svc_export,1) /* allow inplace updates */
 496
 497
 498 struct svc_expkey *
 499 exp_find_key(svc_client *clp, int fsid_type, u32 *fsidv, struct cache_req *reqp)
 500 {
 501         struct svc_expkey key, *ek;
 502         int err;
 503
 504         if (!clp)
 505                 return NULL;
 506
 507         key.ek_client = clp;
 508         key.ek_fsidtype = fsid_type;
 509         memcpy(key.ek_fsid, fsidv, key_len(fsid_type));
 510
 511         ek = svc_expkey_lookup(&key, 0);
 512         if (ek != NULL) {
 513                 if ((err = cache_check(&svc_expkey_cache, &ek->h, reqp))) {
 514                         dprintk("exp_find_key: cache_check failed: %d\n", err);
 515                         ek = ERR_PTR(err);
 516                 }
 517         }
 518         return ek;
 519 }
 520
 521 int exp_set_key(svc_client *clp, int fsid_type, u32 *fsidv,
 522                 struct svc_export *exp)
 523 {
 524         struct svc_expkey key, *ek;
 525
 526         key.ek_client = clp;
 527         key.ek_fsidtype = fsid_type;
 528         memcpy(key.ek_fsid, fsidv, key_len(fsid_type));
 529         key.ek_export = exp;
 530         key.h.expiry_time = NEVER;
 531         key.h.flags = 0;
 532
 533         ek = svc_expkey_lookup(&key, 1);
 534         if (ek) {
 535                 expkey_put(&ek->h, &svc_expkey_cache);
 536                 return 0;
 537         }
 538         return -ENOMEM;
 539 }
 540
 541 /*
 542  * Find the client's export entry matching xdev/xino.
 543  */
 544 static inline struct svc_expkey *
 545 exp_get_key(svc_client *clp, dev_t dev, ino_t ino)
 546 {
 547         u32 fsidv[3];
 548
 549         if (old_valid_dev(dev)) {
 550                 mk_fsid_v0(fsidv, dev, ino);
 551                 return exp_find_key(clp, 0, fsidv, NULL);
 552         }
 553         mk_fsid_v3(fsidv, dev, ino);
 554         return exp_find_key(clp, 3, fsidv, NULL);
 555 }
 556
 557 /*
 558  * Find the client's export entry matching fsid
 559  */
 560 static inline struct svc_expkey *
 561 exp_get_fsid_key(svc_client *clp, int fsid)
 562 {
 563         u32 fsidv[2];
 564
 565         mk_fsid_v1(fsidv, fsid);
 566
 567         return exp_find_key(clp, 1, fsidv, NULL);
 568 }
 569
 570 svc_export *
 571 exp_get_by_name(svc_client *clp, struct vfsmount *mnt, struct dentry *dentry,
 572                 struct cache_req *reqp)
 573 {
 574         struct svc_export *exp, key;
 575
 576         if (!clp)
 577                 return NULL;
 578
 579         key.ex_client = clp;
 580         key.ex_mnt = mnt;
 581         key.ex_dentry = dentry;
 582
 583         exp = svc_export_lookup(&key, 0);
 584         if (exp != NULL)
 585                 switch (cache_check(&svc_export_cache, &exp->h, reqp)) {
 586                 case 0: break;
 587                 case -EAGAIN:
 588                         exp = ERR_PTR(-EAGAIN);
 589                         break;
 590                 default:
 591                         exp = NULL;
 592                 }
 593
 594         return exp;
 595 }
 596
 597 /*
 598  * Find the export entry for a given dentry.
 599  */
 600 struct svc_export *
 601 exp_parent(svc_client *clp, struct vfsmount *mnt, struct dentry *dentry,
 602            struct cache_req *reqp)
 603 {
 604         svc_export *exp;
 605
 606         dget(dentry);
 607         exp = exp_get_by_name(clp, mnt, dentry, reqp);
 608
 609         while (exp == NULL && !IS_ROOT(dentry)) {
 610                 struct dentry *parent;
 611
 612                 parent = dget_parent(dentry);
 613                 dput(dentry);
 614                 dentry = parent;
 615                 exp = exp_get_by_name(clp, mnt, dentry, reqp);
 616         }
 617         dput(dentry);
 618         return exp;
 619 }
 620
 621 /*
 622  * Hashtable locking. Write locks are placed only by user processes
 623  * wanting to modify export information.
 624  * Write locking only done in this file.  Read locking
 625  * needed externally.
 626  */
 627
 628 static DECLARE_RWSEM(hash_sem);
 629
 630 void
 631 exp_readlock(void)
 632 {
 633         down_read(&hash_sem);
 634 }
 635
 636 static inline void
 637 exp_writelock(void)
 638 {
 639         down_write(&hash_sem);
 640 }
 641
 642 void
 643 exp_readunlock(void)
 644 {
 645         up_read(&hash_sem);
 646 }
 647
 648 static inline void
 649 exp_writeunlock(void)
 650 {
 651         up_write(&hash_sem);
 652 }
 653
 654 static void exp_fsid_unhash(struct svc_export *exp)
 655 {
 656         struct svc_expkey *ek;
 657
 658         if ((exp->ex_flags & NFSEXP_FSID) == 0)
 659                 return;
 660
 661         ek = exp_get_fsid_key(exp->ex_client, exp->ex_fsid);
 662         if (ek && !IS_ERR(ek)) {
 663                 ek->h.expiry_time = get_seconds()-1;
 664                 expkey_put(&ek->h, &svc_expkey_cache);
 665         }
 666         svc_expkey_cache.nextcheck = get_seconds();
 667 }
 668
 669 static int exp_fsid_hash(svc_client *clp, struct svc_export *exp)
 670 {
 671         u32 fsid[2];
 672
 673         if ((exp->ex_flags & NFSEXP_FSID) == 0)
 674                 return 0;
 675
 676         mk_fsid_v1(fsid, exp->ex_fsid);
 677         return exp_set_key(clp, 1, fsid, exp);
 678 }
 679
 680 static int exp_hash(struct auth_domain *clp, struct svc_export *exp)
 681 {
 682         u32 fsid[2];
 683         struct inode *inode = exp->ex_dentry->d_inode;
 684         dev_t dev = inode->i_sb->s_dev;
 685
 686         if (old_valid_dev(dev)) {
 687                 mk_fsid_v0(fsid, dev, inode->i_ino);
 688                 return exp_set_key(clp, 0, fsid, exp);
 689         }
 690         mk_fsid_v3(fsid, dev, inode->i_ino);
 691         return exp_set_key(clp, 3, fsid, exp);
 692 }
 693
 694 static void exp_unhash(struct svc_export *exp)
 695 {
 696         struct svc_expkey *ek;
 697         struct inode *inode = exp->ex_dentry->d_inode;
 698
 699         ek = exp_get_key(exp->ex_client, inode->i_sb->s_dev, inode->i_ino);
 700         if (ek && !IS_ERR(ek)) {
 701                 ek->h.expiry_time = get_seconds()-1;
 702                 expkey_put(&ek->h, &svc_expkey_cache);
 703         }
 704         svc_expkey_cache.nextcheck = get_seconds();
 705 }
 706
 707 /*
 708  * Export a file system.
 709  */
 710 int
 711 exp_export(struct nfsctl_export *nxp)
 712 {
 713         svc_client      *clp;
 714         struct svc_export       *exp = NULL;
 715         struct svc_export       new;
 716         struct svc_expkey       *fsid_key = NULL;
 717         struct nameidata nd;
 718         int             err;
 719
 720         /* Consistency check */
 721         err = -EINVAL;
 722         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
 723             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
 724                 goto out;
 725
 726         dprintk("exp_export called for %s:%s (%x/%ld fl %x).\n",
 727                         nxp->ex_client, nxp->ex_path,
 728                         (unsigned)nxp->ex_dev, (long)nxp->ex_ino,
 729                         nxp->ex_flags);
 730
 731         /* Try to lock the export table for update */
 732         exp_writelock();
 733
 734         /* Look up client info */
 735         if (!(clp = auth_domain_find(nxp->ex_client)))
 736                 goto out_unlock;
 737
 738
 739         /* Look up the dentry */
 740         err = path_lookup(nxp->ex_path, 0, &nd);
 741         if (err)
 742                 goto out_unlock;
 743         err = -EINVAL;
 744
 745         exp = exp_get_by_name(clp, nd.mnt, nd.dentry, NULL);
 746
 747         /* must make sure there won't be an ex_fsid clash */
 748         if ((nxp->ex_flags & NFSEXP_FSID) &&
 749             (fsid_key = exp_get_fsid_key(clp, nxp->ex_dev)) &&
 750             !IS_ERR(fsid_key) &&
 751             fsid_key->ek_export &&
 752             fsid_key->ek_export != exp)
 753                 goto finish;
 754
 755         if (exp) {
 756                 /* just a flags/id/fsid update */
 757
 758                 exp_fsid_unhash(exp);
 759                 exp->ex_flags    = nxp->ex_flags;
 760                 exp->ex_anon_uid = nxp->ex_anon_uid;
 761                 exp->ex_anon_gid = nxp->ex_anon_gid;
 762                 exp->ex_fsid     = nxp->ex_dev;
 763
 764                 err = exp_fsid_hash(clp, exp);
 765                 goto finish;
 766         }
 767
 768         err = check_export(nd.dentry->d_inode, nxp->ex_flags);
 769         if (err) goto finish;
 770
 771         err = -ENOMEM;
 772
 773         dprintk("nfsd: creating export entry %p for client %p\n", exp, clp);
 774
 775         new.h.expiry_time = NEVER;
 776         new.h.flags = 0;
 777         new.ex_client = clp;
 778         new.ex_mnt = nd.mnt;
 779         new.ex_dentry = nd.dentry;
 780         new.ex_flags = nxp->ex_flags;
 781         new.ex_anon_uid = nxp->ex_anon_uid;
 782         new.ex_anon_gid = nxp->ex_anon_gid;
 783         new.ex_fsid = nxp->ex_dev;
 784
 785         exp = svc_export_lookup(&new, 1);
 786
 787         if (exp == NULL)
 788                 goto finish;
 789
 790         err = 0;
 791
 792         if (exp_hash(clp, exp) ||
 793             exp_fsid_hash(clp, exp)) {
 794                 /* failed to create at least one index */
 795                 exp_do_unexport(exp);
 796                 cache_flush();
 797                 err = -ENOMEM;
 798         }
 799
 800 finish:
 801         if (exp)
 802                 exp_put(exp);
 803         if (fsid_key && !IS_ERR(fsid_key))
 804                 expkey_put(&fsid_key->h, &svc_expkey_cache);
 805         if (clp)
 806                 auth_domain_put(clp);
 807         path_release(&nd);
 808 out_unlock:
 809         exp_writeunlock();
 810 out:
 811         return err;
 812 }
 813
 814 /*
 815  * Unexport a file system. The export entry has already
 816  * been removed from the client's list of exported fs's.
 817  */
 818 static void
 819 exp_do_unexport(svc_export *unexp)
 820 {
 821         unexp->h.expiry_time = get_seconds()-1;
 822         svc_export_cache.nextcheck = get_seconds();
 823         exp_unhash(unexp);
 824         exp_fsid_unhash(unexp);
 825 }
 826
 827
 828 /*
 829  * unexport syscall.
 830  */
 831 int
 832 exp_unexport(struct nfsctl_export *nxp)
 833 {
 834         struct auth_domain *dom;
 835         svc_export *exp;
 836         struct nameidata nd;
 837         int             err;
 838
 839         /* Consistency check */
 840         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
 841             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
 842                 return -EINVAL;
 843
 844         exp_writelock();
 845
 846         err = -EINVAL;
 847         dom = auth_domain_find(nxp->ex_client);
 848         if (!dom) {
 849                 dprintk("nfsd: unexport couldn't find %s\n", nxp->ex_client);
 850                 goto out_unlock;
 851         }
 852
 853         err = path_lookup(nxp->ex_path, 0, &nd);
 854         if (err)
 855                 goto out_domain;
 856
 857         err = -EINVAL;
 858         exp = exp_get_by_name(dom, nd.mnt, nd.dentry, NULL);
 859         path_release(&nd);
 860         if (!exp)
 861                 goto out_domain;
 862
 863         exp_do_unexport(exp);
 864         exp_put(exp);
 865         err = 0;
 866
 867 out_domain:
 868         auth_domain_put(dom);
 869         cache_flush();
 870 out_unlock:
 871         exp_writeunlock();
 872         return err;
 873 }
 874
 875 /*
 876  * Obtain the root fh on behalf of a client.
 877  * This could be done in user space, but I feel that it adds some safety
 878  * since its harder to fool a kernel module than a user space program.
 879  */
 880 int
 881 exp_rootfh(svc_client *clp, char *path, struct knfsd_fh *f, int maxsize)
 882 {
 883         struct svc_export       *exp;
 884         struct nameidata        nd;
 885         struct inode            *inode;
 886         struct svc_fh           fh;
 887         int                     err;
 888
 889         err = -EPERM;
 890         /* NB: we probably ought to check that it's NUL-terminated */
 891         if (path_lookup(path, 0, &nd)) {
 892                 printk("nfsd: exp_rootfh path not found %s", path);
 893                 return err;
 894         }
 895         inode = nd.dentry->d_inode;
 896
 897         dprintk("nfsd: exp_rootfh(%s [%p] %s:%s/%ld)\n",
 898                  path, nd.dentry, clp->name,
 899                  inode->i_sb->s_id, inode->i_ino);
 900         exp = exp_parent(clp, nd.mnt, nd.dentry, NULL);
 901         if (!exp) {
 902                 dprintk("nfsd: exp_rootfh export not found.\n");
 903                 goto out;
 904         }
 905
 906         /*
 907          * fh must be initialized before calling fh_compose
 908          */
 909         fh_init(&fh, maxsize);
 910         if (fh_compose(&fh, exp, nd.dentry, NULL))
 911                 err = -EINVAL;
 912         else
 913                 err = 0;
 914         memcpy(f, &fh.fh_handle, sizeof(struct knfsd_fh));
 915         fh_put(&fh);
 916         exp_put(exp);
 917 out:
 918         path_release(&nd);
 919         return err;
 920 }
 921
 922 /*
 923  * Called when we need the filehandle for the root of the pseudofs,
 924  * for a given NFSv4 client.   The root is defined to be the
 925  * export point with fsid==0
 926  */
 927 int
 928 exp_pseudoroot(struct auth_domain *clp, struct svc_fh *fhp,
 929                struct cache_req *creq)
 930 {
 931         struct svc_expkey *fsid_key;
 932         int rv;
 933         u32 fsidv[2];
 934
 935         mk_fsid_v1(fsidv, 0);
 936
 937         fsid_key = exp_find_key(clp, 1, fsidv, creq);
 938         if (IS_ERR(fsid_key) && PTR_ERR(fsid_key) == -EAGAIN)
 939                 return nfserr_dropit;
 940         if (!fsid_key || IS_ERR(fsid_key))
 941                 return nfserr_perm;
 942
 943         rv = fh_compose(fhp, fsid_key->ek_export,
 944                           fsid_key->ek_export->ex_dentry, NULL);
 945         expkey_put(&fsid_key->h, &svc_expkey_cache);
 946         return rv;
 947 }
 948
 949 /* Iterator */
 950
 951 static void *e_start(struct seq_file *m, loff_t *pos)
 952 {
 953         loff_t n = *pos;
 954         unsigned hash, export;
 955         struct cache_head *ch;
 956
 957         exp_readlock();
 958         read_lock(&svc_export_cache.hash_lock);
 959         if (!n--)
 960                 return (void *)1;
 961         hash = n >> 32;
 962         export = n & ((1LL<<32) - 1);
 963
 964
 965         for (ch=export_table[hash]; ch; ch=ch->next)
 966                 if (!export--)
 967                         return ch;
 968         n &= ~((1LL<<32) - 1);
 969         do {
 970                 hash++;
 971                 n += 1LL<<32;
 972         } while(hash < EXPORT_HASHMAX && export_table[hash]==NULL);
 973         if (hash >= EXPORT_HASHMAX)
 974                 return NULL;
 975         *pos = n+1;
 976         return export_table[hash];
 977 }
 978
 979 static void *e_next(struct seq_file *m, void *p, loff_t *pos)
 980 {
 981         struct cache_head *ch = p;
 982         int hash = (*pos >> 32);
 983
 984         if (p == (void *)1)
 985                 hash = 0;
 986         else if (ch->next == NULL) {
 987                 hash++;
 988                 *pos += 1LL<<32;
 989         } else {
 990                 ++*pos;
 991                 return ch->next;
 992         }
 993         *pos &= ~((1LL<<32) - 1);
 994         while (hash < EXPORT_HASHMAX && export_table[hash] == NULL) {
 995                 hash++;
 996                 *pos += 1LL<<32;
 997         }
 998         if (hash >= EXPORT_HASHMAX)
 999                 return NULL;
1000         ++*pos;
1001         return export_table[hash];
1002 }
1003
1004 static void e_stop(struct seq_file *m, void *p)
1005 {
1006         read_unlock(&svc_export_cache.hash_lock);
1007         exp_readunlock();
1008 }
1009
1010 struct flags {
1011         int flag;
1012         char *name[2];
1013 } expflags[] = {
1014         { NFSEXP_READONLY, {"ro", "rw"}},
1015         { NFSEXP_INSECURE_PORT, {"insecure", ""}},
1016         { NFSEXP_ROOTSQUASH, {"root_squash", "no_root_squash"}},
1017         { NFSEXP_ALLSQUASH, {"all_squash", ""}},
1018         { NFSEXP_ASYNC, {"async", "sync"}},
1019         { NFSEXP_GATHERED_WRITES, {"wdelay", "no_wdelay"}},
1020         { NFSEXP_NOHIDE, {"nohide", ""}},
1021         { NFSEXP_CROSSMOUNT, {"crossmnt", ""}},
1022         { NFSEXP_NOSUBTREECHECK, {"no_subtree_check", ""}},
1023         { NFSEXP_NOAUTHNLM, {"insecure_locks", ""}},
1024 #ifdef MSNFS
1025         { NFSEXP_MSNFS, {"msnfs", ""}},
1026 #endif
1027         { 0, {"", ""}}
1028 };
1029
1030 static void exp_flags(struct seq_file *m, int flag, int fsid, uid_t anonu, uid_t anong)
1031 {
1032         int first = 0;
1033         struct flags *flg;
1034
1035         for (flg = expflags; flg->flag; flg++) {
1036                 int state = (flg->flag & flag)?0:1;
1037                 if (*flg->name[state])
1038                         seq_printf(m, "%s%s", first++?",":"", flg->name[state]);
1039         }
1040         if (flag & NFSEXP_FSID)
1041                 seq_printf(m, "%sfsid=%d", first++?",":"", fsid);
1042         if (anonu != (uid_t)-2 && anonu != (0x10000-2))
1043                 seq_printf(m, "%sanonuid=%d", first++?",":"", anonu);
1044         if (anong != (gid_t)-2 && anong != (0x10000-2))
1045                 seq_printf(m, "%sanongid=%d", first++?",":"", anong);
1046 }
1047
1048 static int e_show(struct seq_file *m, void *p)
1049 {
1050         struct cache_head *cp = p;
1051         struct svc_export *exp = container_of(cp, struct svc_export, h);
1052         svc_client *clp;
1053
1054         if (p == (void *)1) {
1055                 seq_puts(m, "# Version 1.1\n");
1056                 seq_puts(m, "# Path Client(Flags) # IPs\n");
1057                 return 0;
1058         }
1059
1060         clp = exp->ex_client;
1061         cache_get(&exp->h);
1062         if (cache_check(&svc_export_cache, &exp->h, NULL))
1063                 return 0;
1064         if (cache_put(&exp->h, &svc_export_cache)) BUG();
1065         return svc_export_show(m, &svc_export_cache, cp);
1066 }
1067
1068 struct seq_operations nfs_exports_op = {
1069         .start  = e_start,
1070         .next   = e_next,
1071         .stop   = e_stop,
1072         .show   = e_show,
1073 };
1074
1075 /*
1076  * Add or modify a client.
1077  * Change requests may involve the list of host addresses. The list of
1078  * exports and possibly existing uid maps are left untouched.
1079  */
1080 int
1081 exp_addclient(struct nfsctl_client *ncp)
1082 {
1083         struct auth_domain      *dom;
1084         int                     i, err;
1085
1086         /* First, consistency check. */
1087         err = -EINVAL;
1088         if (! exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1089                 goto out;
1090         if (ncp->cl_naddr > NFSCLNT_ADDRMAX)
1091                 goto out;
1092
1093         /* Lock the hashtable */
1094         exp_writelock();
1095
1096         dom = unix_domain_find(ncp->cl_ident);
1097
1098         err = -ENOMEM;
1099         if (!dom)
1100                 goto out_unlock;
1101
1102         /* Insert client into hashtable. */
1103         for (i = 0; i < ncp->cl_naddr; i++)
1104                 auth_unix_add_addr(ncp->cl_addrlist[i], dom);
1105
1106         auth_unix_forget_old(dom);
1107         auth_domain_put(dom);
1108
1109         err = 0;
1110
1111 out_unlock:
1112         exp_writeunlock();
1113 out:
1114         return err;
1115 }
1116
1117 /*
1118  * Delete a client given an identifier.
1119  */
1120 int
1121 exp_delclient(struct nfsctl_client *ncp)
1122 {
1123         int             err;
1124         struct auth_domain *dom;
1125
1126         err = -EINVAL;
1127         if (!exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1128                 goto out;
1129
1130         /* Lock the hashtable */
1131         exp_writelock();
1132
1133         dom = auth_domain_find(ncp->cl_ident);
1134         /* just make sure that no addresses work
1135          * and that it will expire soon
1136          */
1137         if (dom) {
1138                 err = auth_unix_forget_old(dom);
1139                 dom->h.expiry_time = get_seconds();
1140                 auth_domain_put(dom);
1141         }
1142
1143         exp_writeunlock();
1144 out:
1145         return err;
1146 }
1147
1148 /*
1149  * Verify that string is non-empty and does not exceed max length.
1150  */
1151 static int
1152 exp_verify_string(char *cp, int max)
1153 {
1154         int     i;
1155
1156         for (i = 0; i < max; i++)
1157                 if (!cp[i])
1158                         return i;
1159         cp[i] = 0;
1160         printk(KERN_NOTICE "nfsd: couldn't validate string %s\n", cp);
1161         return 0;
1162 }
1163
1164 /*
1165  * Initialize the exports module.
1166  */
1167 void
1168 nfsd_export_init(void)
1169 {
1170         dprintk("nfsd: initializing export module.\n");
1171
1172         cache_register(&svc_export_cache);
1173         cache_register(&svc_expkey_cache);
1174
1175 }
1176
1177 /*
1178  * Flush exports table - called when last nfsd thread is killed
1179  */
1180 void
1181 nfsd_export_flush(void)
1182 {
1183         exp_writelock();
1184         cache_purge(&svc_expkey_cache);
1185         cache_purge(&svc_export_cache);
1186         exp_writeunlock();
1187 }
1188
1189 /*
1190  * Shutdown the exports module.
1191  */
1192 void
1193 nfsd_export_shutdown(void)
1194 {
1195
1196         dprintk("nfsd: shutting down export module.\n");
1197
1198         exp_writelock();
1199
1200         if (cache_unregister(&svc_expkey_cache))
1201                 printk(KERN_ERR "nfsd: failed to unregister expkey cache\n");
1202         if (cache_unregister(&svc_export_cache))
1203                 printk(KERN_ERR "nfsd: failed to unregister export cache\n");
1204         svcauth_unix_purge();
1205
1206         exp_writeunlock();
1207         dprintk("nfsd: export shutdown complete.\n");
1208 }