fs/nfsd/export.c

   1 /*
   2  * NFS exporting and validation.
   3  *
   4  * We maintain a list of clients, each of which has a list of
   5  * exports. To export an fs to a given client, you first have
   6  * to create the client entry with NFSCTL_ADDCLIENT, which
   7  * creates a client control block and adds it to the hash
   8  * table. Then, you call NFSCTL_EXPORT for each fs.
   9  *
  10  *
  11  * Copyright (C) 1995, 1996 Olaf Kirch, <okir@monad.swb.de>
  12  */
  13
  14 #include <linux/slab.h>
  15 #include <linux/namei.h>
  16 #include <linux/module.h>
  17 #include <linux/exportfs.h>
  18
  19 #include <linux/nfsd/syscall.h>
  20 #include <net/ipv6.h>
  21
  22 #include "nfsd.h"
  23 #include "nfsfh.h"
  24
  25 #define NFSDDBG_FACILITY        NFSDDBG_EXPORT
  26
  27 typedef struct auth_domain      svc_client;
  28 typedef struct svc_export       svc_export;
  29
  30 /*
  31  * We have two caches.
  32  * One maps client+vfsmnt+dentry to export options - the export map
  33  * The other maps client+filehandle-fragment to export options. - the expkey map
  34  *
  35  * The export options are actually stored in the first map, and the
  36  * second map contains a reference to the entry in the first map.
  37  */
  38
  39 #define EXPKEY_HASHBITS         8
  40 #define EXPKEY_HASHMAX          (1 << EXPKEY_HASHBITS)
  41 #define EXPKEY_HASHMASK         (EXPKEY_HASHMAX -1)
  42 static struct cache_head *expkey_table[EXPKEY_HASHMAX];
  43
  44 static void expkey_put(struct kref *ref)
  45 {
  46         struct svc_expkey *key = container_of(ref, struct svc_expkey, h.ref);
  47
  48         if (test_bit(CACHE_VALID, &key->h.flags) &&
  49             !test_bit(CACHE_NEGATIVE, &key->h.flags))
  50                 path_put(&key->ek_path);
  51         auth_domain_put(key->ek_client);
  52         kfree(key);
  53 }
  54
  55 static void expkey_request(struct cache_detail *cd,
  56                            struct cache_head *h,
  57                            char **bpp, int *blen)
  58 {
  59         /* client fsidtype \xfsid */
  60         struct svc_expkey *ek = container_of(h, struct svc_expkey, h);
  61         char type[5];
  62
  63         qword_add(bpp, blen, ek->ek_client->name);
  64         snprintf(type, 5, "%d", ek->ek_fsidtype);
  65         qword_add(bpp, blen, type);
  66         qword_addhex(bpp, blen, (char*)ek->ek_fsid, key_len(ek->ek_fsidtype));
  67         (*bpp)[-1] = '\n';
  68 }
  69
  70 static int expkey_upcall(struct cache_detail *cd, struct cache_head *h)
  71 {
  72         return sunrpc_cache_pipe_upcall(cd, h, expkey_request);
  73 }
  74
  75 static struct svc_expkey *svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old);
  76 static struct svc_expkey *svc_expkey_lookup(struct svc_expkey *);
  77 static struct cache_detail svc_expkey_cache;
  78
  79 static int expkey_parse(struct cache_detail *cd, char *mesg, int mlen)
  80 {
  81         /* client fsidtype fsid [path] */
  82         char *buf;
  83         int len;
  84         struct auth_domain *dom = NULL;
  85         int err;
  86         int fsidtype;
  87         char *ep;
  88         struct svc_expkey key;
  89         struct svc_expkey *ek = NULL;
  90
  91         if (mesg[mlen-1] != '\n')
  92                 return -EINVAL;
  93         mesg[mlen-1] = 0;
  94
  95         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
  96         err = -ENOMEM;
  97         if (!buf)
  98                 goto out;
  99
 100         err = -EINVAL;
 101         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 102                 goto out;
 103
 104         err = -ENOENT;
 105         dom = auth_domain_find(buf);
 106         if (!dom)
 107                 goto out;
 108         dprintk("found domain %s\n", buf);
 109
 110         err = -EINVAL;
 111         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 112                 goto out;
 113         fsidtype = simple_strtoul(buf, &ep, 10);
 114         if (*ep)
 115                 goto out;
 116         dprintk("found fsidtype %d\n", fsidtype);
 117         if (key_len(fsidtype)==0) /* invalid type */
 118                 goto out;
 119         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 120                 goto out;
 121         dprintk("found fsid length %d\n", len);
 122         if (len != key_len(fsidtype))
 123                 goto out;
 124
 125         /* OK, we seem to have a valid key */
 126         key.h.flags = 0;
 127         key.h.expiry_time = get_expiry(&mesg);
 128         if (key.h.expiry_time == 0)
 129                 goto out;
 130
 131         key.ek_client = dom;
 132         key.ek_fsidtype = fsidtype;
 133         memcpy(key.ek_fsid, buf, len);
 134
 135         ek = svc_expkey_lookup(&key);
 136         err = -ENOMEM;
 137         if (!ek)
 138                 goto out;
 139
 140         /* now we want a pathname, or empty meaning NEGATIVE  */
 141         err = -EINVAL;
 142         len = qword_get(&mesg, buf, PAGE_SIZE);
 143         if (len < 0)
 144                 goto out;
 145         dprintk("Path seems to be <%s>\n", buf);
 146         err = 0;
 147         if (len == 0) {
 148                 set_bit(CACHE_NEGATIVE, &key.h.flags);
 149                 ek = svc_expkey_update(&key, ek);
 150                 if (!ek)
 151                         err = -ENOMEM;
 152         } else {
 153                 err = kern_path(buf, 0, &key.ek_path);
 154                 if (err)
 155                         goto out;
 156
 157                 dprintk("Found the path %s\n", buf);
 158
 159                 ek = svc_expkey_update(&key, ek);
 160                 if (!ek)
 161                         err = -ENOMEM;
 162                 path_put(&key.ek_path);
 163         }
 164         cache_flush();
 165  out:
 166         if (ek)
 167                 cache_put(&ek->h, &svc_expkey_cache);
 168         if (dom)
 169                 auth_domain_put(dom);
 170         kfree(buf);
 171         return err;
 172 }
 173
 174 static int expkey_show(struct seq_file *m,
 175                        struct cache_detail *cd,
 176                        struct cache_head *h)
 177 {
 178         struct svc_expkey *ek ;
 179         int i;
 180
 181         if (h ==NULL) {
 182                 seq_puts(m, "#domain fsidtype fsid [path]\n");
 183                 return 0;
 184         }
 185         ek = container_of(h, struct svc_expkey, h);
 186         seq_printf(m, "%s %d 0x", ek->ek_client->name,
 187                    ek->ek_fsidtype);
 188         for (i=0; i < key_len(ek->ek_fsidtype)/4; i++)
 189                 seq_printf(m, "%08x", ek->ek_fsid[i]);
 190         if (test_bit(CACHE_VALID, &h->flags) &&
 191             !test_bit(CACHE_NEGATIVE, &h->flags)) {
 192                 seq_printf(m, " ");
 193                 seq_path(m, &ek->ek_path, "\\ \t\n");
 194         }
 195         seq_printf(m, "\n");
 196         return 0;
 197 }
 198
 199 static inline int expkey_match (struct cache_head *a, struct cache_head *b)
 200 {
 201         struct svc_expkey *orig = container_of(a, struct svc_expkey, h);
 202         struct svc_expkey *new = container_of(b, struct svc_expkey, h);
 203
 204         if (orig->ek_fsidtype != new->ek_fsidtype ||
 205             orig->ek_client != new->ek_client ||
 206             memcmp(orig->ek_fsid, new->ek_fsid, key_len(orig->ek_fsidtype)) != 0)
 207                 return 0;
 208         return 1;
 209 }
 210
 211 static inline void expkey_init(struct cache_head *cnew,
 212                                    struct cache_head *citem)
 213 {
 214         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
 215         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
 216
 217         kref_get(&item->ek_client->ref);
 218         new->ek_client = item->ek_client;
 219         new->ek_fsidtype = item->ek_fsidtype;
 220
 221         memcpy(new->ek_fsid, item->ek_fsid, sizeof(new->ek_fsid));
 222 }
 223
 224 static inline void expkey_update(struct cache_head *cnew,
 225                                    struct cache_head *citem)
 226 {
 227         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
 228         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
 229
 230         new->ek_path = item->ek_path;
 231         path_get(&item->ek_path);
 232 }
 233
 234 static struct cache_head *expkey_alloc(void)
 235 {
 236         struct svc_expkey *i = kmalloc(sizeof(*i), GFP_KERNEL);
 237         if (i)
 238                 return &i->h;
 239         else
 240                 return NULL;
 241 }
 242
 243 static struct cache_detail svc_expkey_cache = {
 244         .owner          = THIS_MODULE,
 245         .hash_size      = EXPKEY_HASHMAX,
 246         .hash_table     = expkey_table,
 247         .name           = "nfsd.fh",
 248         .cache_put      = expkey_put,
 249         .cache_upcall   = expkey_upcall,
 250         .cache_parse    = expkey_parse,
 251         .cache_show     = expkey_show,
 252         .match          = expkey_match,
 253         .init           = expkey_init,
 254         .update         = expkey_update,
 255         .alloc          = expkey_alloc,
 256 };
 257
 258 static int
 259 svc_expkey_hash(struct svc_expkey *item)
 260 {
 261         int hash = item->ek_fsidtype;
 262         char * cp = (char*)item->ek_fsid;
 263         int len = key_len(item->ek_fsidtype);
 264
 265         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
 266         hash ^= hash_ptr(item->ek_client, EXPKEY_HASHBITS);
 267         hash &= EXPKEY_HASHMASK;
 268         return hash;
 269 }
 270
 271 static struct svc_expkey *
 272 svc_expkey_lookup(struct svc_expkey *item)
 273 {
 274         struct cache_head *ch;
 275         int hash = svc_expkey_hash(item);
 276
 277         ch = sunrpc_cache_lookup(&svc_expkey_cache, &item->h,
 278                                  hash);
 279         if (ch)
 280                 return container_of(ch, struct svc_expkey, h);
 281         else
 282                 return NULL;
 283 }
 284
 285 static struct svc_expkey *
 286 svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old)
 287 {
 288         struct cache_head *ch;
 289         int hash = svc_expkey_hash(new);
 290
 291         ch = sunrpc_cache_update(&svc_expkey_cache, &new->h,
 292                                  &old->h, hash);
 293         if (ch)
 294                 return container_of(ch, struct svc_expkey, h);
 295         else
 296                 return NULL;
 297 }
 298
 299
 300 #define EXPORT_HASHBITS         8
 301 #define EXPORT_HASHMAX          (1<< EXPORT_HASHBITS)
 302
 303 static struct cache_head *export_table[EXPORT_HASHMAX];
 304
 305 static void nfsd4_fslocs_free(struct nfsd4_fs_locations *fsloc)
 306 {
 307         int i;
 308
 309         for (i = 0; i < fsloc->locations_count; i++) {
 310                 kfree(fsloc->locations[i].path);
 311                 kfree(fsloc->locations[i].hosts);
 312         }
 313         kfree(fsloc->locations);
 314 }
 315
 316 static void svc_export_put(struct kref *ref)
 317 {
 318         struct svc_export *exp = container_of(ref, struct svc_export, h.ref);
 319         path_put(&exp->ex_path);
 320         auth_domain_put(exp->ex_client);
 321         kfree(exp->ex_pathname);
 322         nfsd4_fslocs_free(&exp->ex_fslocs);
 323         kfree(exp);
 324 }
 325
 326 static void svc_export_request(struct cache_detail *cd,
 327                                struct cache_head *h,
 328                                char **bpp, int *blen)
 329 {
 330         /*  client path */
 331         struct svc_export *exp = container_of(h, struct svc_export, h);
 332         char *pth;
 333
 334         qword_add(bpp, blen, exp->ex_client->name);
 335         pth = d_path(&exp->ex_path, *bpp, *blen);
 336         if (IS_ERR(pth)) {
 337                 /* is this correct? */
 338                 (*bpp)[0] = '\n';
 339                 return;
 340         }
 341         qword_add(bpp, blen, pth);
 342         (*bpp)[-1] = '\n';
 343 }
 344
 345 static int svc_export_upcall(struct cache_detail *cd, struct cache_head *h)
 346 {
 347         return sunrpc_cache_pipe_upcall(cd, h, svc_export_request);
 348 }
 349
 350 static struct svc_export *svc_export_update(struct svc_export *new,
 351                                             struct svc_export *old);
 352 static struct svc_export *svc_export_lookup(struct svc_export *);
 353
 354 static int check_export(struct inode *inode, int *flags, unsigned char *uuid)
 355 {
 356
 357         /*
 358          * We currently export only dirs, regular files, and (for v4
 359          * pseudoroot) symlinks.
 360          */
 361         if (!S_ISDIR(inode->i_mode) &&
 362             !S_ISLNK(inode->i_mode) &&
 363             !S_ISREG(inode->i_mode))
 364                 return -ENOTDIR;
 365
 366         /*
 367          * Mountd should never pass down a writeable V4ROOT export, but,
 368          * just to make sure:
 369          */
 370         if (*flags & NFSEXP_V4ROOT)
 371                 *flags |= NFSEXP_READONLY;
 372
 373         /* There are two requirements on a filesystem to be exportable.
 374          * 1:  We must be able to identify the filesystem from a number.
 375          *       either a device number (so FS_REQUIRES_DEV needed)
 376          *       or an FSID number (so NFSEXP_FSID or ->uuid is needed).
 377          * 2:  We must be able to find an inode from a filehandle.
 378          *       This means that s_export_op must be set.
 379          */
 380         if (!(inode->i_sb->s_type->fs_flags & FS_REQUIRES_DEV) &&
 381             !(*flags & NFSEXP_FSID) &&
 382             uuid == NULL) {
 383                 dprintk("exp_export: export of non-dev fs without fsid\n");
 384                 return -EINVAL;
 385         }
 386
 387         if (!inode->i_sb->s_export_op ||
 388             !inode->i_sb->s_export_op->fh_to_dentry) {
 389                 dprintk("exp_export: export of invalid fs type.\n");
 390                 return -EINVAL;
 391         }
 392
 393         return 0;
 394
 395 }
 396
 397 #ifdef CONFIG_NFSD_V4
 398
 399 static int
 400 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc)
 401 {
 402         int len;
 403         int migrated, i, err;
 404
 405         /* listsize */
 406         err = get_int(mesg, &fsloc->locations_count);
 407         if (err)
 408                 return err;
 409         if (fsloc->locations_count > MAX_FS_LOCATIONS)
 410                 return -EINVAL;
 411         if (fsloc->locations_count == 0)
 412                 return 0;
 413
 414         fsloc->locations = kzalloc(fsloc->locations_count
 415                         * sizeof(struct nfsd4_fs_location), GFP_KERNEL);
 416         if (!fsloc->locations)
 417                 return -ENOMEM;
 418         for (i=0; i < fsloc->locations_count; i++) {
 419                 /* colon separated host list */
 420                 err = -EINVAL;
 421                 len = qword_get(mesg, buf, PAGE_SIZE);
 422                 if (len <= 0)
 423                         goto out_free_all;
 424                 err = -ENOMEM;
 425                 fsloc->locations[i].hosts = kstrdup(buf, GFP_KERNEL);
 426                 if (!fsloc->locations[i].hosts)
 427                         goto out_free_all;
 428                 err = -EINVAL;
 429                 /* slash separated path component list */
 430                 len = qword_get(mesg, buf, PAGE_SIZE);
 431                 if (len <= 0)
 432                         goto out_free_all;
 433                 err = -ENOMEM;
 434                 fsloc->locations[i].path = kstrdup(buf, GFP_KERNEL);
 435                 if (!fsloc->locations[i].path)
 436                         goto out_free_all;
 437         }
 438         /* migrated */
 439         err = get_int(mesg, &migrated);
 440         if (err)
 441                 goto out_free_all;
 442         err = -EINVAL;
 443         if (migrated < 0 || migrated > 1)
 444                 goto out_free_all;
 445         fsloc->migrated = migrated;
 446         return 0;
 447 out_free_all:
 448         nfsd4_fslocs_free(fsloc);
 449         return err;
 450 }
 451
 452 static int secinfo_parse(char **mesg, char *buf, struct svc_export *exp)
 453 {
 454         int listsize, err;
 455         struct exp_flavor_info *f;
 456
 457         err = get_int(mesg, &listsize);
 458         if (err)
 459                 return err;
 460         if (listsize < 0 || listsize > MAX_SECINFO_LIST)
 461                 return -EINVAL;
 462
 463         for (f = exp->ex_flavors; f < exp->ex_flavors + listsize; f++) {
 464                 err = get_int(mesg, &f->pseudoflavor);
 465                 if (err)
 466                         return err;
 467                 /*
 468                  * XXX: It would be nice to also check whether this
 469                  * pseudoflavor is supported, so we can discover the
 470                  * problem at export time instead of when a client fails
 471                  * to authenticate.
 472                  */
 473                 err = get_int(mesg, &f->flags);
 474                 if (err)
 475                         return err;
 476                 /* Only some flags are allowed to differ between flavors: */
 477                 if (~NFSEXP_SECINFO_FLAGS & (f->flags ^ exp->ex_flags))
 478                         return -EINVAL;
 479         }
 480         exp->ex_nflavors = listsize;
 481         return 0;
 482 }
 483
 484 #else /* CONFIG_NFSD_V4 */
 485 static inline int
 486 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc){return 0;}
 487 static inline int
 488 secinfo_parse(char **mesg, char *buf, struct svc_export *exp) { return 0; }
 489 #endif
 490
 491 static int svc_export_parse(struct cache_detail *cd, char *mesg, int mlen)
 492 {
 493         /* client path expiry [flags anonuid anongid fsid] */
 494         char *buf;
 495         int len;
 496         int err;
 497         struct auth_domain *dom = NULL;
 498         struct svc_export exp = {}, *expp;
 499         int an_int;
 500
 501         if (mesg[mlen-1] != '\n')
 502                 return -EINVAL;
 503         mesg[mlen-1] = 0;
 504
 505         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
 506         if (!buf)
 507                 return -ENOMEM;
 508
 509         /* client */
 510         err = -EINVAL;
 511         len = qword_get(&mesg, buf, PAGE_SIZE);
 512         if (len <= 0)
 513                 goto out;
 514
 515         err = -ENOENT;
 516         dom = auth_domain_find(buf);
 517         if (!dom)
 518                 goto out;
 519
 520         /* path */
 521         err = -EINVAL;
 522         if ((len = qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
 523                 goto out1;
 524
 525         err = kern_path(buf, 0, &exp.ex_path);
 526         if (err)
 527                 goto out1;
 528
 529         exp.ex_client = dom;
 530
 531         err = -ENOMEM;
 532         exp.ex_pathname = kstrdup(buf, GFP_KERNEL);
 533         if (!exp.ex_pathname)
 534                 goto out2;
 535
 536         /* expiry */
 537         err = -EINVAL;
 538         exp.h.expiry_time = get_expiry(&mesg);
 539         if (exp.h.expiry_time == 0)
 540                 goto out3;
 541
 542         /* flags */
 543         err = get_int(&mesg, &an_int);
 544         if (err == -ENOENT) {
 545                 err = 0;
 546                 set_bit(CACHE_NEGATIVE, &exp.h.flags);
 547         } else {
 548                 if (err || an_int < 0)
 549                         goto out3;
 550                 exp.ex_flags= an_int;
 551
 552                 /* anon uid */
 553                 err = get_int(&mesg, &an_int);
 554                 if (err)
 555                         goto out3;
 556                 exp.ex_anon_uid= an_int;
 557
 558                 /* anon gid */
 559                 err = get_int(&mesg, &an_int);
 560                 if (err)
 561                         goto out3;
 562                 exp.ex_anon_gid= an_int;
 563
 564                 /* fsid */
 565                 err = get_int(&mesg, &an_int);
 566                 if (err)
 567                         goto out3;
 568                 exp.ex_fsid = an_int;
 569
 570                 while ((len = qword_get(&mesg, buf, PAGE_SIZE)) > 0) {
 571                         if (strcmp(buf, "fsloc") == 0)
 572                                 err = fsloc_parse(&mesg, buf, &exp.ex_fslocs);
 573                         else if (strcmp(buf, "uuid") == 0) {
 574                                 /* expect a 16 byte uuid encoded as \xXXXX... */
 575                                 len = qword_get(&mesg, buf, PAGE_SIZE);
 576                                 if (len != 16)
 577                                         err  = -EINVAL;
 578                                 else {
 579                                         exp.ex_uuid =
 580                                                 kmemdup(buf, 16, GFP_KERNEL);
 581                                         if (exp.ex_uuid == NULL)
 582                                                 err = -ENOMEM;
 583                                 }
 584                         } else if (strcmp(buf, "secinfo") == 0)
 585                                 err = secinfo_parse(&mesg, buf, &exp);
 586                         else
 587                                 /* quietly ignore unknown words and anything
 588                                  * following. Newer user-space can try to set
 589                                  * new values, then see what the result was.
 590                                  */
 591                                 break;
 592                         if (err)
 593                                 goto out4;
 594                 }
 595
 596                 err = check_export(exp.ex_path.dentry->d_inode, &exp.ex_flags,
 597                                    exp.ex_uuid);
 598                 if (err)
 599                         goto out4;
 600         }
 601
 602         expp = svc_export_lookup(&exp);
 603         if (expp)
 604                 expp = svc_export_update(&exp, expp);
 605         else
 606                 err = -ENOMEM;
 607         cache_flush();
 608         if (expp == NULL)
 609                 err = -ENOMEM;
 610         else
 611                 exp_put(expp);
 612 out4:
 613         nfsd4_fslocs_free(&exp.ex_fslocs);
 614         kfree(exp.ex_uuid);
 615 out3:
 616         kfree(exp.ex_pathname);
 617 out2:
 618         path_put(&exp.ex_path);
 619 out1:
 620         auth_domain_put(dom);
 621 out:
 622         kfree(buf);
 623         return err;
 624 }
 625
 626 static void exp_flags(struct seq_file *m, int flag, int fsid,
 627                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fslocs);
 628 static void show_secinfo(struct seq_file *m, struct svc_export *exp);
 629
 630 static int svc_export_show(struct seq_file *m,
 631                            struct cache_detail *cd,
 632                            struct cache_head *h)
 633 {
 634         struct svc_export *exp ;
 635
 636         if (h ==NULL) {
 637                 seq_puts(m, "#path domain(flags)\n");
 638                 return 0;
 639         }
 640         exp = container_of(h, struct svc_export, h);
 641         seq_path(m, &exp->ex_path, " \t\n\\");
 642         seq_putc(m, '\t');
 643         seq_escape(m, exp->ex_client->name, " \t\n\\");
 644         seq_putc(m, '(');
 645         if (test_bit(CACHE_VALID, &h->flags) &&
 646             !test_bit(CACHE_NEGATIVE, &h->flags)) {
 647                 exp_flags(m, exp->ex_flags, exp->ex_fsid,
 648                           exp->ex_anon_uid, exp->ex_anon_gid, &exp->ex_fslocs);
 649                 if (exp->ex_uuid) {
 650                         int i;
 651                         seq_puts(m, ",uuid=");
 652                         for (i=0; i<16; i++) {
 653                                 if ((i&3) == 0 && i)
 654                                         seq_putc(m, ':');
 655                                 seq_printf(m, "%02x", exp->ex_uuid[i]);
 656                         }
 657                 }
 658                 show_secinfo(m, exp);
 659         }
 660         seq_puts(m, ")\n");
 661         return 0;
 662 }
 663 static int svc_export_match(struct cache_head *a, struct cache_head *b)
 664 {
 665         struct svc_export *orig = container_of(a, struct svc_export, h);
 666         struct svc_export *new = container_of(b, struct svc_export, h);
 667         return orig->ex_client == new->ex_client &&
 668                 orig->ex_path.dentry == new->ex_path.dentry &&
 669                 orig->ex_path.mnt == new->ex_path.mnt;
 670 }
 671
 672 static void svc_export_init(struct cache_head *cnew, struct cache_head *citem)
 673 {
 674         struct svc_export *new = container_of(cnew, struct svc_export, h);
 675         struct svc_export *item = container_of(citem, struct svc_export, h);
 676
 677         kref_get(&item->ex_client->ref);
 678         new->ex_client = item->ex_client;
 679         new->ex_path.dentry = dget(item->ex_path.dentry);
 680         new->ex_path.mnt = mntget(item->ex_path.mnt);
 681         new->ex_pathname = NULL;
 682         new->ex_fslocs.locations = NULL;
 683         new->ex_fslocs.locations_count = 0;
 684         new->ex_fslocs.migrated = 0;
 685 }
 686
 687 static void export_update(struct cache_head *cnew, struct cache_head *citem)
 688 {
 689         struct svc_export *new = container_of(cnew, struct svc_export, h);
 690         struct svc_export *item = container_of(citem, struct svc_export, h);
 691         int i;
 692
 693         new->ex_flags = item->ex_flags;
 694         new->ex_anon_uid = item->ex_anon_uid;
 695         new->ex_anon_gid = item->ex_anon_gid;
 696         new->ex_fsid = item->ex_fsid;
 697         new->ex_uuid = item->ex_uuid;
 698         item->ex_uuid = NULL;
 699         new->ex_pathname = item->ex_pathname;
 700         item->ex_pathname = NULL;
 701         new->ex_fslocs.locations = item->ex_fslocs.locations;
 702         item->ex_fslocs.locations = NULL;
 703         new->ex_fslocs.locations_count = item->ex_fslocs.locations_count;
 704         item->ex_fslocs.locations_count = 0;
 705         new->ex_fslocs.migrated = item->ex_fslocs.migrated;
 706         item->ex_fslocs.migrated = 0;
 707         new->ex_nflavors = item->ex_nflavors;
 708         for (i = 0; i < MAX_SECINFO_LIST; i++) {
 709                 new->ex_flavors[i] = item->ex_flavors[i];
 710         }
 711 }
 712
 713 static struct cache_head *svc_export_alloc(void)
 714 {
 715         struct svc_export *i = kmalloc(sizeof(*i), GFP_KERNEL);
 716         if (i)
 717                 return &i->h;
 718         else
 719                 return NULL;
 720 }
 721
 722 struct cache_detail svc_export_cache = {
 723         .owner          = THIS_MODULE,
 724         .hash_size      = EXPORT_HASHMAX,
 725         .hash_table     = export_table,
 726         .name           = "nfsd.export",
 727         .cache_put      = svc_export_put,
 728         .cache_upcall   = svc_export_upcall,
 729         .cache_parse    = svc_export_parse,
 730         .cache_show     = svc_export_show,
 731         .match          = svc_export_match,
 732         .init           = svc_export_init,
 733         .update         = export_update,
 734         .alloc          = svc_export_alloc,
 735 };
 736
 737 static int
 738 svc_export_hash(struct svc_export *exp)
 739 {
 740         int hash;
 741
 742         hash = hash_ptr(exp->ex_client, EXPORT_HASHBITS);
 743         hash ^= hash_ptr(exp->ex_path.dentry, EXPORT_HASHBITS);
 744         hash ^= hash_ptr(exp->ex_path.mnt, EXPORT_HASHBITS);
 745         return hash;
 746 }
 747
 748 static struct svc_export *
 749 svc_export_lookup(struct svc_export *exp)
 750 {
 751         struct cache_head *ch;
 752         int hash = svc_export_hash(exp);
 753
 754         ch = sunrpc_cache_lookup(&svc_export_cache, &exp->h,
 755                                  hash);
 756         if (ch)
 757                 return container_of(ch, struct svc_export, h);
 758         else
 759                 return NULL;
 760 }
 761
 762 static struct svc_export *
 763 svc_export_update(struct svc_export *new, struct svc_export *old)
 764 {
 765         struct cache_head *ch;
 766         int hash = svc_export_hash(old);
 767
 768         ch = sunrpc_cache_update(&svc_export_cache, &new->h,
 769                                  &old->h,
 770                                  hash);
 771         if (ch)
 772                 return container_of(ch, struct svc_export, h);
 773         else
 774                 return NULL;
 775 }
 776
 777
 778 static struct svc_expkey *
 779 exp_find_key(svc_client *clp, int fsid_type, u32 *fsidv, struct cache_req *reqp)
 780 {
 781         struct svc_expkey key, *ek;
 782         int err;
 783
 784         if (!clp)
 785                 return ERR_PTR(-ENOENT);
 786
 787         key.ek_client = clp;
 788         key.ek_fsidtype = fsid_type;
 789         memcpy(key.ek_fsid, fsidv, key_len(fsid_type));
 790
 791         ek = svc_expkey_lookup(&key);
 792         if (ek == NULL)
 793                 return ERR_PTR(-ENOMEM);
 794         err = cache_check(&svc_expkey_cache, &ek->h, reqp);
 795         if (err)
 796                 return ERR_PTR(err);
 797         return ek;
 798 }
 799
 800
 801 static svc_export *exp_get_by_name(svc_client *clp, const struct path *path,
 802                                      struct cache_req *reqp)
 803 {
 804         struct svc_export *exp, key;
 805         int err;
 806
 807         if (!clp)
 808                 return ERR_PTR(-ENOENT);
 809
 810         key.ex_client = clp;
 811         key.ex_path = *path;
 812
 813         exp = svc_export_lookup(&key);
 814         if (exp == NULL)
 815                 return ERR_PTR(-ENOMEM);
 816         err = cache_check(&svc_export_cache, &exp->h, reqp);
 817         if (err)
 818                 return ERR_PTR(err);
 819         return exp;
 820 }
 821
 822 /*
 823  * Find the export entry for a given dentry.
 824  */
 825 static struct svc_export *exp_parent(svc_client *clp, struct path *path)
 826 {
 827         struct dentry *saved = dget(path->dentry);
 828         svc_export *exp = exp_get_by_name(clp, path, NULL);
 829
 830         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
 831                 struct dentry *parent = dget_parent(path->dentry);
 832                 dput(path->dentry);
 833                 path->dentry = parent;
 834                 exp = exp_get_by_name(clp, path, NULL);
 835         }
 836         dput(path->dentry);
 837         path->dentry = saved;
 838         return exp;
 839 }
 840
 841
 842
 843 /*
 844  * Obtain the root fh on behalf of a client.
 845  * This could be done in user space, but I feel that it adds some safety
 846  * since its harder to fool a kernel module than a user space program.
 847  */
 848 int
 849 exp_rootfh(svc_client *clp, char *name, struct knfsd_fh *f, int maxsize)
 850 {
 851         struct svc_export       *exp;
 852         struct path             path;
 853         struct inode            *inode;
 854         struct svc_fh           fh;
 855         int                     err;
 856
 857         err = -EPERM;
 858         /* NB: we probably ought to check that it's NUL-terminated */
 859         if (kern_path(name, 0, &path)) {
 860                 printk("nfsd: exp_rootfh path not found %s", name);
 861                 return err;
 862         }
 863         inode = path.dentry->d_inode;
 864
 865         dprintk("nfsd: exp_rootfh(%s [%p] %s:%s/%ld)\n",
 866                  name, path.dentry, clp->name,
 867                  inode->i_sb->s_id, inode->i_ino);
 868         exp = exp_parent(clp, &path);
 869         if (IS_ERR(exp)) {
 870                 err = PTR_ERR(exp);
 871                 goto out;
 872         }
 873
 874         /*
 875          * fh must be initialized before calling fh_compose
 876          */
 877         fh_init(&fh, maxsize);
 878         if (fh_compose(&fh, exp, path.dentry, NULL))
 879                 err = -EINVAL;
 880         else
 881                 err = 0;
 882         memcpy(f, &fh.fh_handle, sizeof(struct knfsd_fh));
 883         fh_put(&fh);
 884         exp_put(exp);
 885 out:
 886         path_put(&path);
 887         return err;
 888 }
 889
 890 static struct svc_export *exp_find(struct auth_domain *clp, int fsid_type,
 891                                    u32 *fsidv, struct cache_req *reqp)
 892 {
 893         struct svc_export *exp;
 894         struct svc_expkey *ek = exp_find_key(clp, fsid_type, fsidv, reqp);
 895         if (IS_ERR(ek))
 896                 return ERR_CAST(ek);
 897
 898         exp = exp_get_by_name(clp, &ek->ek_path, reqp);
 899         cache_put(&ek->h, &svc_expkey_cache);
 900
 901         if (IS_ERR(exp))
 902                 return ERR_CAST(exp);
 903         return exp;
 904 }
 905
 906 __be32 check_nfsd_access(struct svc_export *exp, struct svc_rqst *rqstp)
 907 {
 908         struct exp_flavor_info *f;
 909         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
 910
 911         /* legacy gss-only clients are always OK: */
 912         if (exp->ex_client == rqstp->rq_gssclient)
 913                 return 0;
 914         /* ip-address based client; check sec= export option: */
 915         for (f = exp->ex_flavors; f < end; f++) {
 916                 if (f->pseudoflavor == rqstp->rq_flavor)
 917                         return 0;
 918         }
 919         /* defaults in absence of sec= options: */
 920         if (exp->ex_nflavors == 0) {
 921                 if (rqstp->rq_flavor == RPC_AUTH_NULL ||
 922                     rqstp->rq_flavor == RPC_AUTH_UNIX)
 923                         return 0;
 924         }
 925         return nfserr_wrongsec;
 926 }
 927
 928 /*
 929  * Uses rq_client and rq_gssclient to find an export; uses rq_client (an
 930  * auth_unix client) if it's available and has secinfo information;
 931  * otherwise, will try to use rq_gssclient.
 932  *
 933  * Called from functions that handle requests; functions that do work on
 934  * behalf of mountd are passed a single client name to use, and should
 935  * use exp_get_by_name() or exp_find().
 936  */
 937 struct svc_export *
 938 rqst_exp_get_by_name(struct svc_rqst *rqstp, struct path *path)
 939 {
 940         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
 941
 942         if (rqstp->rq_client == NULL)
 943                 goto gss;
 944
 945         /* First try the auth_unix client: */
 946         exp = exp_get_by_name(rqstp->rq_client, path, &rqstp->rq_chandle);
 947         if (PTR_ERR(exp) == -ENOENT)
 948                 goto gss;
 949         if (IS_ERR(exp))
 950                 return exp;
 951         /* If it has secinfo, assume there are no gss/... clients */
 952         if (exp->ex_nflavors > 0)
 953                 return exp;
 954 gss:
 955         /* Otherwise, try falling back on gss client */
 956         if (rqstp->rq_gssclient == NULL)
 957                 return exp;
 958         gssexp = exp_get_by_name(rqstp->rq_gssclient, path, &rqstp->rq_chandle);
 959         if (PTR_ERR(gssexp) == -ENOENT)
 960                 return exp;
 961         if (!IS_ERR(exp))
 962                 exp_put(exp);
 963         return gssexp;
 964 }
 965
 966 struct svc_export *
 967 rqst_exp_find(struct svc_rqst *rqstp, int fsid_type, u32 *fsidv)
 968 {
 969         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
 970
 971         if (rqstp->rq_client == NULL)
 972                 goto gss;
 973
 974         /* First try the auth_unix client: */
 975         exp = exp_find(rqstp->rq_client, fsid_type, fsidv, &rqstp->rq_chandle);
 976         if (PTR_ERR(exp) == -ENOENT)
 977                 goto gss;
 978         if (IS_ERR(exp))
 979                 return exp;
 980         /* If it has secinfo, assume there are no gss/... clients */
 981         if (exp->ex_nflavors > 0)
 982                 return exp;
 983 gss:
 984         /* Otherwise, try falling back on gss client */
 985         if (rqstp->rq_gssclient == NULL)
 986                 return exp;
 987         gssexp = exp_find(rqstp->rq_gssclient, fsid_type, fsidv,
 988                                                 &rqstp->rq_chandle);
 989         if (PTR_ERR(gssexp) == -ENOENT)
 990                 return exp;
 991         if (!IS_ERR(exp))
 992                 exp_put(exp);
 993         return gssexp;
 994 }
 995
 996 struct svc_export *
 997 rqst_exp_parent(struct svc_rqst *rqstp, struct path *path)
 998 {
 999         struct dentry *saved = dget(path->dentry);
1000         struct svc_export *exp = rqst_exp_get_by_name(rqstp, path);
1001
1002         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
1003                 struct dentry *parent = dget_parent(path->dentry);
1004                 dput(path->dentry);
1005                 path->dentry = parent;
1006                 exp = rqst_exp_get_by_name(rqstp, path);
1007         }
1008         dput(path->dentry);
1009         path->dentry = saved;
1010         return exp;
1011 }
1012
1013 static struct svc_export *find_fsidzero_export(struct svc_rqst *rqstp)
1014 {
1015         u32 fsidv[2];
1016
1017         mk_fsid(FSID_NUM, fsidv, 0, 0, 0, NULL);
1018
1019         return rqst_exp_find(rqstp, FSID_NUM, fsidv);
1020 }
1021
1022 /*
1023  * Called when we need the filehandle for the root of the pseudofs,
1024  * for a given NFSv4 client.   The root is defined to be the
1025  * export point with fsid==0
1026  */
1027 __be32
1028 exp_pseudoroot(struct svc_rqst *rqstp, struct svc_fh *fhp)
1029 {
1030         struct svc_export *exp;
1031         __be32 rv;
1032
1033         exp = find_fsidzero_export(rqstp);
1034         if (IS_ERR(exp))
1035                 return nfserrno(PTR_ERR(exp));
1036         rv = fh_compose(fhp, exp, exp->ex_path.dentry, NULL);
1037         exp_put(exp);
1038         return rv;
1039 }
1040
1041 /* Iterator */
1042
1043 static void *e_start(struct seq_file *m, loff_t *pos)
1044         __acquires(svc_export_cache.hash_lock)
1045 {
1046         loff_t n = *pos;
1047         unsigned hash, export;
1048         struct cache_head *ch;
1049
1050         read_lock(&svc_export_cache.hash_lock);
1051         if (!n--)
1052                 return SEQ_START_TOKEN;
1053         hash = n >> 32;
1054         export = n & ((1LL<<32) - 1);
1055
1056
1057         for (ch=export_table[hash]; ch; ch=ch->next)
1058                 if (!export--)
1059                         return ch;
1060         n &= ~((1LL<<32) - 1);
1061         do {
1062                 hash++;
1063                 n += 1LL<<32;
1064         } while(hash < EXPORT_HASHMAX && export_table[hash]==NULL);
1065         if (hash >= EXPORT_HASHMAX)
1066                 return NULL;
1067         *pos = n+1;
1068         return export_table[hash];
1069 }
1070
1071 static void *e_next(struct seq_file *m, void *p, loff_t *pos)
1072 {
1073         struct cache_head *ch = p;
1074         int hash = (*pos >> 32);
1075
1076         if (p == SEQ_START_TOKEN)
1077                 hash = 0;
1078         else if (ch->next == NULL) {
1079                 hash++;
1080                 *pos += 1LL<<32;
1081         } else {
1082                 ++*pos;
1083                 return ch->next;
1084         }
1085         *pos &= ~((1LL<<32) - 1);
1086         while (hash < EXPORT_HASHMAX && export_table[hash] == NULL) {
1087                 hash++;
1088                 *pos += 1LL<<32;
1089         }
1090         if (hash >= EXPORT_HASHMAX)
1091                 return NULL;
1092         ++*pos;
1093         return export_table[hash];
1094 }
1095
1096 static void e_stop(struct seq_file *m, void *p)
1097         __releases(svc_export_cache.hash_lock)
1098 {
1099         read_unlock(&svc_export_cache.hash_lock);
1100 }
1101
1102 static struct flags {
1103         int flag;
1104         char *name[2];
1105 } expflags[] = {
1106         { NFSEXP_READONLY, {"ro", "rw"}},
1107         { NFSEXP_INSECURE_PORT, {"insecure", ""}},
1108         { NFSEXP_ROOTSQUASH, {"root_squash", "no_root_squash"}},
1109         { NFSEXP_ALLSQUASH, {"all_squash", ""}},
1110         { NFSEXP_ASYNC, {"async", "sync"}},
1111         { NFSEXP_GATHERED_WRITES, {"wdelay", "no_wdelay"}},
1112         { NFSEXP_NOHIDE, {"nohide", ""}},
1113         { NFSEXP_CROSSMOUNT, {"crossmnt", ""}},
1114         { NFSEXP_NOSUBTREECHECK, {"no_subtree_check", ""}},
1115         { NFSEXP_NOAUTHNLM, {"insecure_locks", ""}},
1116         { NFSEXP_V4ROOT, {"v4root", ""}},
1117         { 0, {"", ""}}
1118 };
1119
1120 static void show_expflags(struct seq_file *m, int flags, int mask)
1121 {
1122         struct flags *flg;
1123         int state, first = 0;
1124
1125         for (flg = expflags; flg->flag; flg++) {
1126                 if (flg->flag & ~mask)
1127                         continue;
1128                 state = (flg->flag & flags) ? 0 : 1;
1129                 if (*flg->name[state])
1130                         seq_printf(m, "%s%s", first++?",":"", flg->name[state]);
1131         }
1132 }
1133
1134 static void show_secinfo_flags(struct seq_file *m, int flags)
1135 {
1136         seq_printf(m, ",");
1137         show_expflags(m, flags, NFSEXP_SECINFO_FLAGS);
1138 }
1139
1140 static bool secinfo_flags_equal(int f, int g)
1141 {
1142         f &= NFSEXP_SECINFO_FLAGS;
1143         g &= NFSEXP_SECINFO_FLAGS;
1144         return f == g;
1145 }
1146
1147 static int show_secinfo_run(struct seq_file *m, struct exp_flavor_info **fp, struct exp_flavor_info *end)
1148 {
1149         int flags;
1150
1151         flags = (*fp)->flags;
1152         seq_printf(m, ",sec=%d", (*fp)->pseudoflavor);
1153         (*fp)++;
1154         while (*fp != end && secinfo_flags_equal(flags, (*fp)->flags)) {
1155                 seq_printf(m, ":%d", (*fp)->pseudoflavor);
1156                 (*fp)++;
1157         }
1158         return flags;
1159 }
1160
1161 static void show_secinfo(struct seq_file *m, struct svc_export *exp)
1162 {
1163         struct exp_flavor_info *f;
1164         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1165         int flags;
1166
1167         if (exp->ex_nflavors == 0)
1168                 return;
1169         f = exp->ex_flavors;
1170         flags = show_secinfo_run(m, &f, end);
1171         if (!secinfo_flags_equal(flags, exp->ex_flags))
1172                 show_secinfo_flags(m, flags);
1173         while (f != end) {
1174                 flags = show_secinfo_run(m, &f, end);
1175                 show_secinfo_flags(m, flags);
1176         }
1177 }
1178
1179 static void exp_flags(struct seq_file *m, int flag, int fsid,
1180                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fsloc)
1181 {
1182         show_expflags(m, flag, NFSEXP_ALLFLAGS);
1183         if (flag & NFSEXP_FSID)
1184                 seq_printf(m, ",fsid=%d", fsid);
1185         if (anonu != (uid_t)-2 && anonu != (0x10000-2))
1186                 seq_printf(m, ",anonuid=%u", anonu);
1187         if (anong != (gid_t)-2 && anong != (0x10000-2))
1188                 seq_printf(m, ",anongid=%u", anong);
1189         if (fsloc && fsloc->locations_count > 0) {
1190                 char *loctype = (fsloc->migrated) ? "refer" : "replicas";
1191                 int i;
1192
1193                 seq_printf(m, ",%s=", loctype);
1194                 seq_escape(m, fsloc->locations[0].path, ",;@ \t\n\\");
1195                 seq_putc(m, '@');
1196                 seq_escape(m, fsloc->locations[0].hosts, ",;@ \t\n\\");
1197                 for (i = 1; i < fsloc->locations_count; i++) {
1198                         seq_putc(m, ';');
1199                         seq_escape(m, fsloc->locations[i].path, ",;@ \t\n\\");
1200                         seq_putc(m, '@');
1201                         seq_escape(m, fsloc->locations[i].hosts, ",;@ \t\n\\");
1202                 }
1203         }
1204 }
1205
1206 static int e_show(struct seq_file *m, void *p)
1207 {
1208         struct cache_head *cp = p;
1209         struct svc_export *exp = container_of(cp, struct svc_export, h);
1210
1211         if (p == SEQ_START_TOKEN) {
1212                 seq_puts(m, "# Version 1.1\n");
1213                 seq_puts(m, "# Path Client(Flags) # IPs\n");
1214                 return 0;
1215         }
1216
1217         cache_get(&exp->h);
1218         if (cache_check(&svc_export_cache, &exp->h, NULL))
1219                 return 0;
1220         cache_put(&exp->h, &svc_export_cache);
1221         return svc_export_show(m, &svc_export_cache, cp);
1222 }
1223
1224 const struct seq_operations nfs_exports_op = {
1225         .start  = e_start,
1226         .next   = e_next,
1227         .stop   = e_stop,
1228         .show   = e_show,
1229 };
1230
1231
1232 /*
1233  * Initialize the exports module.
1234  */
1235 int
1236 nfsd_export_init(void)
1237 {
1238         int rv;
1239         dprintk("nfsd: initializing export module.\n");
1240
1241         rv = cache_register(&svc_export_cache);
1242         if (rv)
1243                 return rv;
1244         rv = cache_register(&svc_expkey_cache);
1245         if (rv)
1246                 cache_unregister(&svc_export_cache);
1247         return rv;
1248
1249 }
1250
1251 /*
1252  * Flush exports table - called when last nfsd thread is killed
1253  */
1254 void
1255 nfsd_export_flush(void)
1256 {
1257         cache_purge(&svc_expkey_cache);
1258         cache_purge(&svc_export_cache);
1259 }
1260
1261 /*
1262  * Shutdown the exports module.
1263  */
1264 void
1265 nfsd_export_shutdown(void)
1266 {
1267
1268         dprintk("nfsd: shutting down export module.\n");
1269
1270         cache_unregister(&svc_expkey_cache);
1271         cache_unregister(&svc_export_cache);
1272         svcauth_unix_purge();
1273
1274         dprintk("nfsd: export shutdown complete.\n");
1275 }