[PATCH] sanitize svc_export_parse()
[safe/jmp/linux-2.6] / 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/stat.h>
20 #include <linux/in.h>
21 #include <linux/seq_file.h>
22 #include <linux/syscalls.h>
23 #include <linux/rwsem.h>
24 #include <linux/dcache.h>
25 #include <linux/namei.h>
26 #include <linux/mount.h>
27 #include <linux/hash.h>
28 #include <linux/module.h>
29 #include <linux/exportfs.h>
30
31 #include <linux/sunrpc/svc.h>
32 #include <linux/nfsd/nfsd.h>
33 #include <linux/nfsd/nfsfh.h>
34 #include <linux/nfsd/syscall.h>
35 #include <linux/lockd/bind.h>
36 #include <linux/sunrpc/msg_prot.h>
37 #include <linux/sunrpc/gss_api.h>
38 #include <net/ipv6.h>
39
40 #define NFSDDBG_FACILITY        NFSDDBG_EXPORT
41
42 typedef struct auth_domain      svc_client;
43 typedef struct svc_export       svc_export;
44
45 static void             exp_do_unexport(svc_export *unexp);
46 static int              exp_verify_string(char *cp, int max);
47
48 /*
49  * We have two caches.
50  * One maps client+vfsmnt+dentry to export options - the export map
51  * The other maps client+filehandle-fragment to export options. - the expkey map
52  *
53  * The export options are actually stored in the first map, and the
54  * second map contains a reference to the entry in the first map.
55  */
56
57 #define EXPKEY_HASHBITS         8
58 #define EXPKEY_HASHMAX          (1 << EXPKEY_HASHBITS)
59 #define EXPKEY_HASHMASK         (EXPKEY_HASHMAX -1)
60 static struct cache_head *expkey_table[EXPKEY_HASHMAX];
61
62 static void expkey_put(struct kref *ref)
63 {
64         struct svc_expkey *key = container_of(ref, struct svc_expkey, h.ref);
65
66         if (test_bit(CACHE_VALID, &key->h.flags) &&
67             !test_bit(CACHE_NEGATIVE, &key->h.flags))
68                 path_put(&key->ek_path);
69         auth_domain_put(key->ek_client);
70         kfree(key);
71 }
72
73 static void expkey_request(struct cache_detail *cd,
74                            struct cache_head *h,
75                            char **bpp, int *blen)
76 {
77         /* client fsidtype \xfsid */
78         struct svc_expkey *ek = container_of(h, struct svc_expkey, h);
79         char type[5];
80
81         qword_add(bpp, blen, ek->ek_client->name);
82         snprintf(type, 5, "%d", ek->ek_fsidtype);
83         qword_add(bpp, blen, type);
84         qword_addhex(bpp, blen, (char*)ek->ek_fsid, key_len(ek->ek_fsidtype));
85         (*bpp)[-1] = '\n';
86 }
87
88 static struct svc_expkey *svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old);
89 static struct svc_expkey *svc_expkey_lookup(struct svc_expkey *);
90 static struct cache_detail svc_expkey_cache;
91
92 static int expkey_parse(struct cache_detail *cd, char *mesg, int mlen)
93 {
94         /* client fsidtype fsid [path] */
95         char *buf;
96         int len;
97         struct auth_domain *dom = NULL;
98         int err;
99         int fsidtype;
100         char *ep;
101         struct svc_expkey key;
102         struct svc_expkey *ek;
103
104         if (mesg[mlen-1] != '\n')
105                 return -EINVAL;
106         mesg[mlen-1] = 0;
107
108         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
109         err = -ENOMEM;
110         if (!buf) goto out;
111
112         err = -EINVAL;
113         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
114                 goto out;
115
116         err = -ENOENT;
117         dom = auth_domain_find(buf);
118         if (!dom)
119                 goto out;
120         dprintk("found domain %s\n", buf);
121
122         err = -EINVAL;
123         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
124                 goto out;
125         fsidtype = simple_strtoul(buf, &ep, 10);
126         if (*ep)
127                 goto out;
128         dprintk("found fsidtype %d\n", fsidtype);
129         if (key_len(fsidtype)==0) /* invalid type */
130                 goto out;
131         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
132                 goto out;
133         dprintk("found fsid length %d\n", len);
134         if (len != key_len(fsidtype))
135                 goto out;
136
137         /* OK, we seem to have a valid key */
138         key.h.flags = 0;
139         key.h.expiry_time = get_expiry(&mesg);
140         if (key.h.expiry_time == 0)
141                 goto out;
142
143         key.ek_client = dom;    
144         key.ek_fsidtype = fsidtype;
145         memcpy(key.ek_fsid, buf, len);
146
147         ek = svc_expkey_lookup(&key);
148         err = -ENOMEM;
149         if (!ek)
150                 goto out;
151
152         /* now we want a pathname, or empty meaning NEGATIVE  */
153         err = -EINVAL;
154         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) < 0)
155                 goto out;
156         dprintk("Path seems to be <%s>\n", buf);
157         err = 0;
158         if (len == 0) {
159                 set_bit(CACHE_NEGATIVE, &key.h.flags);
160                 ek = svc_expkey_update(&key, ek);
161                 if (ek)
162                         cache_put(&ek->h, &svc_expkey_cache);
163                 else err = -ENOMEM;
164         } else {
165                 struct nameidata nd;
166                 err = path_lookup(buf, 0, &nd);
167                 if (err)
168                         goto out;
169
170                 dprintk("Found the path %s\n", buf);
171                 key.ek_path = nd.path;
172
173                 ek = svc_expkey_update(&key, ek);
174                 if (ek)
175                         cache_put(&ek->h, &svc_expkey_cache);
176                 else
177                         err = -ENOMEM;
178                 path_put(&nd.path);
179         }
180         cache_flush();
181  out:
182         if (dom)
183                 auth_domain_put(dom);
184         kfree(buf);
185         return err;
186 }
187
188 static int expkey_show(struct seq_file *m,
189                        struct cache_detail *cd,
190                        struct cache_head *h)
191 {
192         struct svc_expkey *ek ;
193         int i;
194
195         if (h ==NULL) {
196                 seq_puts(m, "#domain fsidtype fsid [path]\n");
197                 return 0;
198         }
199         ek = container_of(h, struct svc_expkey, h);
200         seq_printf(m, "%s %d 0x", ek->ek_client->name,
201                    ek->ek_fsidtype);
202         for (i=0; i < key_len(ek->ek_fsidtype)/4; i++)
203                 seq_printf(m, "%08x", ek->ek_fsid[i]);
204         if (test_bit(CACHE_VALID, &h->flags) && 
205             !test_bit(CACHE_NEGATIVE, &h->flags)) {
206                 seq_printf(m, " ");
207                 seq_path(m, &ek->ek_path, "\\ \t\n");
208         }
209         seq_printf(m, "\n");
210         return 0;
211 }
212
213 static inline int expkey_match (struct cache_head *a, struct cache_head *b)
214 {
215         struct svc_expkey *orig = container_of(a, struct svc_expkey, h);
216         struct svc_expkey *new = container_of(b, struct svc_expkey, h);
217
218         if (orig->ek_fsidtype != new->ek_fsidtype ||
219             orig->ek_client != new->ek_client ||
220             memcmp(orig->ek_fsid, new->ek_fsid, key_len(orig->ek_fsidtype)) != 0)
221                 return 0;
222         return 1;
223 }
224
225 static inline void expkey_init(struct cache_head *cnew,
226                                    struct cache_head *citem)
227 {
228         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
229         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
230
231         kref_get(&item->ek_client->ref);
232         new->ek_client = item->ek_client;
233         new->ek_fsidtype = item->ek_fsidtype;
234
235         memcpy(new->ek_fsid, item->ek_fsid, sizeof(new->ek_fsid));
236 }
237
238 static inline void expkey_update(struct cache_head *cnew,
239                                    struct cache_head *citem)
240 {
241         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
242         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
243
244         new->ek_path = item->ek_path;
245         path_get(&item->ek_path);
246 }
247
248 static struct cache_head *expkey_alloc(void)
249 {
250         struct svc_expkey *i = kmalloc(sizeof(*i), GFP_KERNEL);
251         if (i)
252                 return &i->h;
253         else
254                 return NULL;
255 }
256
257 static struct cache_detail svc_expkey_cache = {
258         .owner          = THIS_MODULE,
259         .hash_size      = EXPKEY_HASHMAX,
260         .hash_table     = expkey_table,
261         .name           = "nfsd.fh",
262         .cache_put      = expkey_put,
263         .cache_request  = expkey_request,
264         .cache_parse    = expkey_parse,
265         .cache_show     = expkey_show,
266         .match          = expkey_match,
267         .init           = expkey_init,
268         .update         = expkey_update,
269         .alloc          = expkey_alloc,
270 };
271
272 static struct svc_expkey *
273 svc_expkey_lookup(struct svc_expkey *item)
274 {
275         struct cache_head *ch;
276         int hash = item->ek_fsidtype;
277         char * cp = (char*)item->ek_fsid;
278         int len = key_len(item->ek_fsidtype);
279
280         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
281         hash ^= hash_ptr(item->ek_client, EXPKEY_HASHBITS);
282         hash &= EXPKEY_HASHMASK;
283
284         ch = sunrpc_cache_lookup(&svc_expkey_cache, &item->h,
285                                  hash);
286         if (ch)
287                 return container_of(ch, struct svc_expkey, h);
288         else
289                 return NULL;
290 }
291
292 static struct svc_expkey *
293 svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old)
294 {
295         struct cache_head *ch;
296         int hash = new->ek_fsidtype;
297         char * cp = (char*)new->ek_fsid;
298         int len = key_len(new->ek_fsidtype);
299
300         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
301         hash ^= hash_ptr(new->ek_client, EXPKEY_HASHBITS);
302         hash &= EXPKEY_HASHMASK;
303
304         ch = sunrpc_cache_update(&svc_expkey_cache, &new->h,
305                                  &old->h, hash);
306         if (ch)
307                 return container_of(ch, struct svc_expkey, h);
308         else
309                 return NULL;
310 }
311
312
313 #define EXPORT_HASHBITS         8
314 #define EXPORT_HASHMAX          (1<< EXPORT_HASHBITS)
315 #define EXPORT_HASHMASK         (EXPORT_HASHMAX -1)
316
317 static struct cache_head *export_table[EXPORT_HASHMAX];
318
319 static void nfsd4_fslocs_free(struct nfsd4_fs_locations *fsloc)
320 {
321         int i;
322
323         for (i = 0; i < fsloc->locations_count; i++) {
324                 kfree(fsloc->locations[i].path);
325                 kfree(fsloc->locations[i].hosts);
326         }
327         kfree(fsloc->locations);
328 }
329
330 static void svc_export_put(struct kref *ref)
331 {
332         struct svc_export *exp = container_of(ref, struct svc_export, h.ref);
333         path_put(&exp->ex_path);
334         auth_domain_put(exp->ex_client);
335         kfree(exp->ex_pathname);
336         nfsd4_fslocs_free(&exp->ex_fslocs);
337         kfree(exp);
338 }
339
340 static void svc_export_request(struct cache_detail *cd,
341                                struct cache_head *h,
342                                char **bpp, int *blen)
343 {
344         /*  client path */
345         struct svc_export *exp = container_of(h, struct svc_export, h);
346         char *pth;
347
348         qword_add(bpp, blen, exp->ex_client->name);
349         pth = d_path(&exp->ex_path, *bpp, *blen);
350         if (IS_ERR(pth)) {
351                 /* is this correct? */
352                 (*bpp)[0] = '\n';
353                 return;
354         }
355         qword_add(bpp, blen, pth);
356         (*bpp)[-1] = '\n';
357 }
358
359 static struct svc_export *svc_export_update(struct svc_export *new,
360                                             struct svc_export *old);
361 static struct svc_export *svc_export_lookup(struct svc_export *);
362
363 static int check_export(struct inode *inode, int flags, unsigned char *uuid)
364 {
365
366         /* We currently export only dirs and regular files.
367          * This is what umountd does.
368          */
369         if (!S_ISDIR(inode->i_mode) &&
370             !S_ISREG(inode->i_mode))
371                 return -ENOTDIR;
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                  * Just a quick sanity check; we could also try to check
469                  * whether this pseudoflavor is supported, but at worst
470                  * an unsupported pseudoflavor on the export would just
471                  * be a pseudoflavor that won't match the flavor of any
472                  * authenticated request.  The administrator will
473                  * probably discover the problem when someone fails to
474                  * authenticate.
475                  */
476                 if (f->pseudoflavor < 0)
477                         return -EINVAL;
478                 err = get_int(mesg, &f->flags);
479                 if (err)
480                         return err;
481                 /* Only some flags are allowed to differ between flavors: */
482                 if (~NFSEXP_SECINFO_FLAGS & (f->flags ^ exp->ex_flags))
483                         return -EINVAL;
484         }
485         exp->ex_nflavors = listsize;
486         return 0;
487 }
488
489 #else /* CONFIG_NFSD_V4 */
490 static inline int
491 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc){return 0;}
492 static inline int
493 secinfo_parse(char **mesg, char *buf, struct svc_export *exp) { return 0; }
494 #endif
495
496 static int svc_export_parse(struct cache_detail *cd, char *mesg, int mlen)
497 {
498         /* client path expiry [flags anonuid anongid fsid] */
499         char *buf;
500         int len;
501         int err;
502         struct auth_domain *dom = NULL;
503         struct svc_export exp = {}, *expp;
504         int an_int;
505
506         if (mesg[mlen-1] != '\n')
507                 return -EINVAL;
508         mesg[mlen-1] = 0;
509
510         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
511         if (!buf)
512                 return -ENOMEM;
513
514         /* client */
515         err = -EINVAL;
516         len = qword_get(&mesg, buf, PAGE_SIZE);
517         if (len <= 0)
518                 goto out;
519
520         err = -ENOENT;
521         dom = auth_domain_find(buf);
522         if (!dom)
523                 goto out;
524
525         /* path */
526         err = -EINVAL;
527         if ((len = qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
528                 goto out1;
529
530         err = kern_path(buf, 0, &exp.ex_path);
531         if (err)
532                 goto out1;
533
534         exp.ex_client = dom;
535
536         err = -ENOMEM;
537         exp.ex_pathname = kstrdup(buf, GFP_KERNEL);
538         if (!exp.ex_pathname)
539                 goto out2;
540
541         /* expiry */
542         err = -EINVAL;
543         exp.h.expiry_time = get_expiry(&mesg);
544         if (exp.h.expiry_time == 0)
545                 goto out3;
546
547         /* flags */
548         err = get_int(&mesg, &an_int);
549         if (err == -ENOENT) {
550                 err = 0;
551                 set_bit(CACHE_NEGATIVE, &exp.h.flags);
552         } else {
553                 if (err || an_int < 0)
554                         goto out3;
555                 exp.ex_flags= an_int;
556         
557                 /* anon uid */
558                 err = get_int(&mesg, &an_int);
559                 if (err)
560                         goto out3;
561                 exp.ex_anon_uid= an_int;
562
563                 /* anon gid */
564                 err = get_int(&mesg, &an_int);
565                 if (err)
566                         goto out3;
567                 exp.ex_anon_gid= an_int;
568
569                 /* fsid */
570                 err = get_int(&mesg, &an_int);
571                 if (err)
572                         goto out3;
573                 exp.ex_fsid = an_int;
574
575                 while ((len = qword_get(&mesg, buf, PAGE_SIZE)) > 0) {
576                         if (strcmp(buf, "fsloc") == 0)
577                                 err = fsloc_parse(&mesg, buf, &exp.ex_fslocs);
578                         else if (strcmp(buf, "uuid") == 0) {
579                                 /* expect a 16 byte uuid encoded as \xXXXX... */
580                                 len = qword_get(&mesg, buf, PAGE_SIZE);
581                                 if (len != 16)
582                                         err  = -EINVAL;
583                                 else {
584                                         exp.ex_uuid =
585                                                 kmemdup(buf, 16, GFP_KERNEL);
586                                         if (exp.ex_uuid == NULL)
587                                                 err = -ENOMEM;
588                                 }
589                         } else if (strcmp(buf, "secinfo") == 0)
590                                 err = secinfo_parse(&mesg, buf, &exp);
591                         else
592                                 /* quietly ignore unknown words and anything
593                                  * following. Newer user-space can try to set
594                                  * new values, then see what the result was.
595                                  */
596                                 break;
597                         if (err)
598                                 goto out4;
599                 }
600
601                 err = check_export(exp.ex_path.dentry->d_inode, exp.ex_flags,
602                                    exp.ex_uuid);
603                 if (err)
604                         goto out4;
605         }
606
607         expp = svc_export_lookup(&exp);
608         if (expp)
609                 expp = svc_export_update(&exp, expp);
610         else
611                 err = -ENOMEM;
612         cache_flush();
613         if (expp == NULL)
614                 err = -ENOMEM;
615         else
616                 exp_put(expp);
617 out4:
618         nfsd4_fslocs_free(&exp.ex_fslocs);
619         kfree(exp.ex_uuid);
620 out3:
621         kfree(exp.ex_pathname);
622 out2:
623         path_put(&exp.ex_path);
624 out1:
625         auth_domain_put(dom);
626 out:
627         kfree(buf);
628         return err;
629 }
630
631 static void exp_flags(struct seq_file *m, int flag, int fsid,
632                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fslocs);
633 static void show_secinfo(struct seq_file *m, struct svc_export *exp);
634
635 static int svc_export_show(struct seq_file *m,
636                            struct cache_detail *cd,
637                            struct cache_head *h)
638 {
639         struct svc_export *exp ;
640
641         if (h ==NULL) {
642                 seq_puts(m, "#path domain(flags)\n");
643                 return 0;
644         }
645         exp = container_of(h, struct svc_export, h);
646         seq_path(m, &exp->ex_path, " \t\n\\");
647         seq_putc(m, '\t');
648         seq_escape(m, exp->ex_client->name, " \t\n\\");
649         seq_putc(m, '(');
650         if (test_bit(CACHE_VALID, &h->flags) && 
651             !test_bit(CACHE_NEGATIVE, &h->flags)) {
652                 exp_flags(m, exp->ex_flags, exp->ex_fsid,
653                           exp->ex_anon_uid, exp->ex_anon_gid, &exp->ex_fslocs);
654                 if (exp->ex_uuid) {
655                         int i;
656                         seq_puts(m, ",uuid=");
657                         for (i=0; i<16; i++) {
658                                 if ((i&3) == 0 && i)
659                                         seq_putc(m, ':');
660                                 seq_printf(m, "%02x", exp->ex_uuid[i]);
661                         }
662                 }
663                 show_secinfo(m, exp);
664         }
665         seq_puts(m, ")\n");
666         return 0;
667 }
668 static int svc_export_match(struct cache_head *a, struct cache_head *b)
669 {
670         struct svc_export *orig = container_of(a, struct svc_export, h);
671         struct svc_export *new = container_of(b, struct svc_export, h);
672         return orig->ex_client == new->ex_client &&
673                 orig->ex_path.dentry == new->ex_path.dentry &&
674                 orig->ex_path.mnt == new->ex_path.mnt;
675 }
676
677 static void svc_export_init(struct cache_head *cnew, struct cache_head *citem)
678 {
679         struct svc_export *new = container_of(cnew, struct svc_export, h);
680         struct svc_export *item = container_of(citem, struct svc_export, h);
681
682         kref_get(&item->ex_client->ref);
683         new->ex_client = item->ex_client;
684         new->ex_path.dentry = dget(item->ex_path.dentry);
685         new->ex_path.mnt = mntget(item->ex_path.mnt);
686         new->ex_pathname = NULL;
687         new->ex_fslocs.locations = NULL;
688         new->ex_fslocs.locations_count = 0;
689         new->ex_fslocs.migrated = 0;
690 }
691
692 static void export_update(struct cache_head *cnew, struct cache_head *citem)
693 {
694         struct svc_export *new = container_of(cnew, struct svc_export, h);
695         struct svc_export *item = container_of(citem, struct svc_export, h);
696         int i;
697
698         new->ex_flags = item->ex_flags;
699         new->ex_anon_uid = item->ex_anon_uid;
700         new->ex_anon_gid = item->ex_anon_gid;
701         new->ex_fsid = item->ex_fsid;
702         new->ex_uuid = item->ex_uuid;
703         item->ex_uuid = NULL;
704         new->ex_pathname = item->ex_pathname;
705         item->ex_pathname = NULL;
706         new->ex_fslocs.locations = item->ex_fslocs.locations;
707         item->ex_fslocs.locations = NULL;
708         new->ex_fslocs.locations_count = item->ex_fslocs.locations_count;
709         item->ex_fslocs.locations_count = 0;
710         new->ex_fslocs.migrated = item->ex_fslocs.migrated;
711         item->ex_fslocs.migrated = 0;
712         new->ex_nflavors = item->ex_nflavors;
713         for (i = 0; i < MAX_SECINFO_LIST; i++) {
714                 new->ex_flavors[i] = item->ex_flavors[i];
715         }
716 }
717
718 static struct cache_head *svc_export_alloc(void)
719 {
720         struct svc_export *i = kmalloc(sizeof(*i), GFP_KERNEL);
721         if (i)
722                 return &i->h;
723         else
724                 return NULL;
725 }
726
727 struct cache_detail svc_export_cache = {
728         .owner          = THIS_MODULE,
729         .hash_size      = EXPORT_HASHMAX,
730         .hash_table     = export_table,
731         .name           = "nfsd.export",
732         .cache_put      = svc_export_put,
733         .cache_request  = svc_export_request,
734         .cache_parse    = svc_export_parse,
735         .cache_show     = svc_export_show,
736         .match          = svc_export_match,
737         .init           = svc_export_init,
738         .update         = export_update,
739         .alloc          = svc_export_alloc,
740 };
741
742 static struct svc_export *
743 svc_export_lookup(struct svc_export *exp)
744 {
745         struct cache_head *ch;
746         int hash;
747         hash = hash_ptr(exp->ex_client, EXPORT_HASHBITS);
748         hash ^= hash_ptr(exp->ex_path.dentry, EXPORT_HASHBITS);
749         hash ^= hash_ptr(exp->ex_path.mnt, EXPORT_HASHBITS);
750
751         ch = sunrpc_cache_lookup(&svc_export_cache, &exp->h,
752                                  hash);
753         if (ch)
754                 return container_of(ch, struct svc_export, h);
755         else
756                 return NULL;
757 }
758
759 static struct svc_export *
760 svc_export_update(struct svc_export *new, struct svc_export *old)
761 {
762         struct cache_head *ch;
763         int hash;
764         hash = hash_ptr(old->ex_client, EXPORT_HASHBITS);
765         hash ^= hash_ptr(old->ex_path.dentry, EXPORT_HASHBITS);
766         hash ^= hash_ptr(old->ex_path.mnt, EXPORT_HASHBITS);
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 static int exp_set_key(svc_client *clp, int fsid_type, u32 *fsidv,
801                        struct svc_export *exp)
802 {
803         struct svc_expkey key, *ek;
804
805         key.ek_client = clp;
806         key.ek_fsidtype = fsid_type;
807         memcpy(key.ek_fsid, fsidv, key_len(fsid_type));
808         key.ek_path = exp->ex_path;
809         key.h.expiry_time = NEVER;
810         key.h.flags = 0;
811
812         ek = svc_expkey_lookup(&key);
813         if (ek)
814                 ek = svc_expkey_update(&key,ek);
815         if (ek) {
816                 cache_put(&ek->h, &svc_expkey_cache);
817                 return 0;
818         }
819         return -ENOMEM;
820 }
821
822 /*
823  * Find the client's export entry matching xdev/xino.
824  */
825 static inline struct svc_expkey *
826 exp_get_key(svc_client *clp, dev_t dev, ino_t ino)
827 {
828         u32 fsidv[3];
829         
830         if (old_valid_dev(dev)) {
831                 mk_fsid(FSID_DEV, fsidv, dev, ino, 0, NULL);
832                 return exp_find_key(clp, FSID_DEV, fsidv, NULL);
833         }
834         mk_fsid(FSID_ENCODE_DEV, fsidv, dev, ino, 0, NULL);
835         return exp_find_key(clp, FSID_ENCODE_DEV, fsidv, NULL);
836 }
837
838 /*
839  * Find the client's export entry matching fsid
840  */
841 static inline struct svc_expkey *
842 exp_get_fsid_key(svc_client *clp, int fsid)
843 {
844         u32 fsidv[2];
845
846         mk_fsid(FSID_NUM, fsidv, 0, 0, fsid, NULL);
847
848         return exp_find_key(clp, FSID_NUM, fsidv, NULL);
849 }
850
851 static svc_export *exp_get_by_name(svc_client *clp, struct vfsmount *mnt,
852                                    struct dentry *dentry,
853                                    struct cache_req *reqp)
854 {
855         struct svc_export *exp, key;
856         int err;
857
858         if (!clp)
859                 return ERR_PTR(-ENOENT);
860
861         key.ex_client = clp;
862         key.ex_path.mnt = mnt;
863         key.ex_path.dentry = dentry;
864
865         exp = svc_export_lookup(&key);
866         if (exp == NULL)
867                 return ERR_PTR(-ENOMEM);
868         err = cache_check(&svc_export_cache, &exp->h, reqp);
869         if (err)
870                 return ERR_PTR(err);
871         return exp;
872 }
873
874 /*
875  * Find the export entry for a given dentry.
876  */
877 static struct svc_export *exp_parent(svc_client *clp, struct vfsmount *mnt,
878                                      struct dentry *dentry,
879                                      struct cache_req *reqp)
880 {
881         svc_export *exp;
882
883         dget(dentry);
884         exp = exp_get_by_name(clp, mnt, dentry, reqp);
885
886         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(dentry)) {
887                 struct dentry *parent;
888
889                 parent = dget_parent(dentry);
890                 dput(dentry);
891                 dentry = parent;
892                 exp = exp_get_by_name(clp, mnt, dentry, reqp);
893         }
894         dput(dentry);
895         return exp;
896 }
897
898 /*
899  * Hashtable locking. Write locks are placed only by user processes
900  * wanting to modify export information.
901  * Write locking only done in this file.  Read locking
902  * needed externally.
903  */
904
905 static DECLARE_RWSEM(hash_sem);
906
907 void
908 exp_readlock(void)
909 {
910         down_read(&hash_sem);
911 }
912
913 static inline void
914 exp_writelock(void)
915 {
916         down_write(&hash_sem);
917 }
918
919 void
920 exp_readunlock(void)
921 {
922         up_read(&hash_sem);
923 }
924
925 static inline void
926 exp_writeunlock(void)
927 {
928         up_write(&hash_sem);
929 }
930
931 static void exp_fsid_unhash(struct svc_export *exp)
932 {
933         struct svc_expkey *ek;
934
935         if ((exp->ex_flags & NFSEXP_FSID) == 0)
936                 return;
937
938         ek = exp_get_fsid_key(exp->ex_client, exp->ex_fsid);
939         if (!IS_ERR(ek)) {
940                 ek->h.expiry_time = get_seconds()-1;
941                 cache_put(&ek->h, &svc_expkey_cache);
942         }
943         svc_expkey_cache.nextcheck = get_seconds();
944 }
945
946 static int exp_fsid_hash(svc_client *clp, struct svc_export *exp)
947 {
948         u32 fsid[2];
949  
950         if ((exp->ex_flags & NFSEXP_FSID) == 0)
951                 return 0;
952
953         mk_fsid(FSID_NUM, fsid, 0, 0, exp->ex_fsid, NULL);
954         return exp_set_key(clp, FSID_NUM, fsid, exp);
955 }
956
957 static int exp_hash(struct auth_domain *clp, struct svc_export *exp)
958 {
959         u32 fsid[2];
960         struct inode *inode = exp->ex_path.dentry->d_inode;
961         dev_t dev = inode->i_sb->s_dev;
962
963         if (old_valid_dev(dev)) {
964                 mk_fsid(FSID_DEV, fsid, dev, inode->i_ino, 0, NULL);
965                 return exp_set_key(clp, FSID_DEV, fsid, exp);
966         }
967         mk_fsid(FSID_ENCODE_DEV, fsid, dev, inode->i_ino, 0, NULL);
968         return exp_set_key(clp, FSID_ENCODE_DEV, fsid, exp);
969 }
970
971 static void exp_unhash(struct svc_export *exp)
972 {
973         struct svc_expkey *ek;
974         struct inode *inode = exp->ex_path.dentry->d_inode;
975
976         ek = exp_get_key(exp->ex_client, inode->i_sb->s_dev, inode->i_ino);
977         if (!IS_ERR(ek)) {
978                 ek->h.expiry_time = get_seconds()-1;
979                 cache_put(&ek->h, &svc_expkey_cache);
980         }
981         svc_expkey_cache.nextcheck = get_seconds();
982 }
983         
984 /*
985  * Export a file system.
986  */
987 int
988 exp_export(struct nfsctl_export *nxp)
989 {
990         svc_client      *clp;
991         struct svc_export       *exp = NULL;
992         struct svc_export       new;
993         struct svc_expkey       *fsid_key = NULL;
994         struct nameidata nd;
995         int             err;
996
997         /* Consistency check */
998         err = -EINVAL;
999         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
1000             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
1001                 goto out;
1002
1003         dprintk("exp_export called for %s:%s (%x/%ld fl %x).\n",
1004                         nxp->ex_client, nxp->ex_path,
1005                         (unsigned)nxp->ex_dev, (long)nxp->ex_ino,
1006                         nxp->ex_flags);
1007
1008         /* Try to lock the export table for update */
1009         exp_writelock();
1010
1011         /* Look up client info */
1012         if (!(clp = auth_domain_find(nxp->ex_client)))
1013                 goto out_unlock;
1014
1015
1016         /* Look up the dentry */
1017         err = path_lookup(nxp->ex_path, 0, &nd);
1018         if (err)
1019                 goto out_put_clp;
1020         err = -EINVAL;
1021
1022         exp = exp_get_by_name(clp, nd.path.mnt, nd.path.dentry, NULL);
1023
1024         memset(&new, 0, sizeof(new));
1025
1026         /* must make sure there won't be an ex_fsid clash */
1027         if ((nxp->ex_flags & NFSEXP_FSID) &&
1028             (!IS_ERR(fsid_key = exp_get_fsid_key(clp, nxp->ex_dev))) &&
1029             fsid_key->ek_path.mnt &&
1030             (fsid_key->ek_path.mnt != nd.path.mnt ||
1031              fsid_key->ek_path.dentry != nd.path.dentry))
1032                 goto finish;
1033
1034         if (!IS_ERR(exp)) {
1035                 /* just a flags/id/fsid update */
1036
1037                 exp_fsid_unhash(exp);
1038                 exp->ex_flags    = nxp->ex_flags;
1039                 exp->ex_anon_uid = nxp->ex_anon_uid;
1040                 exp->ex_anon_gid = nxp->ex_anon_gid;
1041                 exp->ex_fsid     = nxp->ex_dev;
1042
1043                 err = exp_fsid_hash(clp, exp);
1044                 goto finish;
1045         }
1046
1047         err = check_export(nd.path.dentry->d_inode, nxp->ex_flags, NULL);
1048         if (err) goto finish;
1049
1050         err = -ENOMEM;
1051
1052         dprintk("nfsd: creating export entry %p for client %p\n", exp, clp);
1053
1054         new.h.expiry_time = NEVER;
1055         new.h.flags = 0;
1056         new.ex_pathname = kstrdup(nxp->ex_path, GFP_KERNEL);
1057         if (!new.ex_pathname)
1058                 goto finish;
1059         new.ex_client = clp;
1060         new.ex_path = nd.path;
1061         new.ex_flags = nxp->ex_flags;
1062         new.ex_anon_uid = nxp->ex_anon_uid;
1063         new.ex_anon_gid = nxp->ex_anon_gid;
1064         new.ex_fsid = nxp->ex_dev;
1065
1066         exp = svc_export_lookup(&new);
1067         if (exp)
1068                 exp = svc_export_update(&new, exp);
1069
1070         if (!exp)
1071                 goto finish;
1072
1073         if (exp_hash(clp, exp) ||
1074             exp_fsid_hash(clp, exp)) {
1075                 /* failed to create at least one index */
1076                 exp_do_unexport(exp);
1077                 cache_flush();
1078         } else
1079                 err = 0;
1080 finish:
1081         kfree(new.ex_pathname);
1082         if (exp)
1083                 exp_put(exp);
1084         if (fsid_key && !IS_ERR(fsid_key))
1085                 cache_put(&fsid_key->h, &svc_expkey_cache);
1086         path_put(&nd.path);
1087 out_put_clp:
1088         auth_domain_put(clp);
1089 out_unlock:
1090         exp_writeunlock();
1091 out:
1092         return err;
1093 }
1094
1095 /*
1096  * Unexport a file system. The export entry has already
1097  * been removed from the client's list of exported fs's.
1098  */
1099 static void
1100 exp_do_unexport(svc_export *unexp)
1101 {
1102         unexp->h.expiry_time = get_seconds()-1;
1103         svc_export_cache.nextcheck = get_seconds();
1104         exp_unhash(unexp);
1105         exp_fsid_unhash(unexp);
1106 }
1107
1108
1109 /*
1110  * unexport syscall.
1111  */
1112 int
1113 exp_unexport(struct nfsctl_export *nxp)
1114 {
1115         struct auth_domain *dom;
1116         svc_export *exp;
1117         struct nameidata nd;
1118         int             err;
1119
1120         /* Consistency check */
1121         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
1122             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
1123                 return -EINVAL;
1124
1125         exp_writelock();
1126
1127         err = -EINVAL;
1128         dom = auth_domain_find(nxp->ex_client);
1129         if (!dom) {
1130                 dprintk("nfsd: unexport couldn't find %s\n", nxp->ex_client);
1131                 goto out_unlock;
1132         }
1133
1134         err = path_lookup(nxp->ex_path, 0, &nd);
1135         if (err)
1136                 goto out_domain;
1137
1138         err = -EINVAL;
1139         exp = exp_get_by_name(dom, nd.path.mnt, nd.path.dentry, NULL);
1140         path_put(&nd.path);
1141         if (IS_ERR(exp))
1142                 goto out_domain;
1143
1144         exp_do_unexport(exp);
1145         exp_put(exp);
1146         err = 0;
1147
1148 out_domain:
1149         auth_domain_put(dom);
1150         cache_flush();
1151 out_unlock:
1152         exp_writeunlock();
1153         return err;
1154 }
1155
1156 /*
1157  * Obtain the root fh on behalf of a client.
1158  * This could be done in user space, but I feel that it adds some safety
1159  * since its harder to fool a kernel module than a user space program.
1160  */
1161 int
1162 exp_rootfh(svc_client *clp, char *path, struct knfsd_fh *f, int maxsize)
1163 {
1164         struct svc_export       *exp;
1165         struct nameidata        nd;
1166         struct inode            *inode;
1167         struct svc_fh           fh;
1168         int                     err;
1169
1170         err = -EPERM;
1171         /* NB: we probably ought to check that it's NUL-terminated */
1172         if (path_lookup(path, 0, &nd)) {
1173                 printk("nfsd: exp_rootfh path not found %s", path);
1174                 return err;
1175         }
1176         inode = nd.path.dentry->d_inode;
1177
1178         dprintk("nfsd: exp_rootfh(%s [%p] %s:%s/%ld)\n",
1179                  path, nd.path.dentry, clp->name,
1180                  inode->i_sb->s_id, inode->i_ino);
1181         exp = exp_parent(clp, nd.path.mnt, nd.path.dentry, NULL);
1182         if (IS_ERR(exp)) {
1183                 err = PTR_ERR(exp);
1184                 goto out;
1185         }
1186
1187         /*
1188          * fh must be initialized before calling fh_compose
1189          */
1190         fh_init(&fh, maxsize);
1191         if (fh_compose(&fh, exp, nd.path.dentry, NULL))
1192                 err = -EINVAL;
1193         else
1194                 err = 0;
1195         memcpy(f, &fh.fh_handle, sizeof(struct knfsd_fh));
1196         fh_put(&fh);
1197         exp_put(exp);
1198 out:
1199         path_put(&nd.path);
1200         return err;
1201 }
1202
1203 static struct svc_export *exp_find(struct auth_domain *clp, int fsid_type,
1204                                    u32 *fsidv, struct cache_req *reqp)
1205 {
1206         struct svc_export *exp;
1207         struct svc_expkey *ek = exp_find_key(clp, fsid_type, fsidv, reqp);
1208         if (IS_ERR(ek))
1209                 return ERR_CAST(ek);
1210
1211         exp = exp_get_by_name(clp, ek->ek_path.mnt, ek->ek_path.dentry, reqp);
1212         cache_put(&ek->h, &svc_expkey_cache);
1213
1214         if (IS_ERR(exp))
1215                 return ERR_CAST(exp);
1216         return exp;
1217 }
1218
1219 __be32 check_nfsd_access(struct svc_export *exp, struct svc_rqst *rqstp)
1220 {
1221         struct exp_flavor_info *f;
1222         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1223
1224         /* legacy gss-only clients are always OK: */
1225         if (exp->ex_client == rqstp->rq_gssclient)
1226                 return 0;
1227         /* ip-address based client; check sec= export option: */
1228         for (f = exp->ex_flavors; f < end; f++) {
1229                 if (f->pseudoflavor == rqstp->rq_flavor)
1230                         return 0;
1231         }
1232         /* defaults in absence of sec= options: */
1233         if (exp->ex_nflavors == 0) {
1234                 if (rqstp->rq_flavor == RPC_AUTH_NULL ||
1235                     rqstp->rq_flavor == RPC_AUTH_UNIX)
1236                         return 0;
1237         }
1238         return nfserr_wrongsec;
1239 }
1240
1241 /*
1242  * Uses rq_client and rq_gssclient to find an export; uses rq_client (an
1243  * auth_unix client) if it's available and has secinfo information;
1244  * otherwise, will try to use rq_gssclient.
1245  *
1246  * Called from functions that handle requests; functions that do work on
1247  * behalf of mountd are passed a single client name to use, and should
1248  * use exp_get_by_name() or exp_find().
1249  */
1250 struct svc_export *
1251 rqst_exp_get_by_name(struct svc_rqst *rqstp, struct vfsmount *mnt,
1252                 struct dentry *dentry)
1253 {
1254         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
1255
1256         if (rqstp->rq_client == NULL)
1257                 goto gss;
1258
1259         /* First try the auth_unix client: */
1260         exp = exp_get_by_name(rqstp->rq_client, mnt, dentry,
1261                                                 &rqstp->rq_chandle);
1262         if (PTR_ERR(exp) == -ENOENT)
1263                 goto gss;
1264         if (IS_ERR(exp))
1265                 return exp;
1266         /* If it has secinfo, assume there are no gss/... clients */
1267         if (exp->ex_nflavors > 0)
1268                 return exp;
1269 gss:
1270         /* Otherwise, try falling back on gss client */
1271         if (rqstp->rq_gssclient == NULL)
1272                 return exp;
1273         gssexp = exp_get_by_name(rqstp->rq_gssclient, mnt, dentry,
1274                                                 &rqstp->rq_chandle);
1275         if (PTR_ERR(gssexp) == -ENOENT)
1276                 return exp;
1277         if (!IS_ERR(exp))
1278                 exp_put(exp);
1279         return gssexp;
1280 }
1281
1282 struct svc_export *
1283 rqst_exp_find(struct svc_rqst *rqstp, int fsid_type, u32 *fsidv)
1284 {
1285         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
1286
1287         if (rqstp->rq_client == NULL)
1288                 goto gss;
1289
1290         /* First try the auth_unix client: */
1291         exp = exp_find(rqstp->rq_client, fsid_type, fsidv, &rqstp->rq_chandle);
1292         if (PTR_ERR(exp) == -ENOENT)
1293                 goto gss;
1294         if (IS_ERR(exp))
1295                 return exp;
1296         /* If it has secinfo, assume there are no gss/... clients */
1297         if (exp->ex_nflavors > 0)
1298                 return exp;
1299 gss:
1300         /* Otherwise, try falling back on gss client */
1301         if (rqstp->rq_gssclient == NULL)
1302                 return exp;
1303         gssexp = exp_find(rqstp->rq_gssclient, fsid_type, fsidv,
1304                                                 &rqstp->rq_chandle);
1305         if (PTR_ERR(gssexp) == -ENOENT)
1306                 return exp;
1307         if (!IS_ERR(exp))
1308                 exp_put(exp);
1309         return gssexp;
1310 }
1311
1312 struct svc_export *
1313 rqst_exp_parent(struct svc_rqst *rqstp, struct vfsmount *mnt,
1314                 struct dentry *dentry)
1315 {
1316         struct svc_export *exp;
1317
1318         dget(dentry);
1319         exp = rqst_exp_get_by_name(rqstp, mnt, dentry);
1320
1321         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(dentry)) {
1322                 struct dentry *parent;
1323
1324                 parent = dget_parent(dentry);
1325                 dput(dentry);
1326                 dentry = parent;
1327                 exp = rqst_exp_get_by_name(rqstp, mnt, dentry);
1328         }
1329         dput(dentry);
1330         return exp;
1331 }
1332
1333 /*
1334  * Called when we need the filehandle for the root of the pseudofs,
1335  * for a given NFSv4 client.   The root is defined to be the
1336  * export point with fsid==0
1337  */
1338 __be32
1339 exp_pseudoroot(struct svc_rqst *rqstp, struct svc_fh *fhp)
1340 {
1341         struct svc_export *exp;
1342         __be32 rv;
1343         u32 fsidv[2];
1344
1345         mk_fsid(FSID_NUM, fsidv, 0, 0, 0, NULL);
1346
1347         exp = rqst_exp_find(rqstp, FSID_NUM, fsidv);
1348         if (IS_ERR(exp))
1349                 return nfserrno(PTR_ERR(exp));
1350         rv = fh_compose(fhp, exp, exp->ex_path.dentry, NULL);
1351         if (rv)
1352                 goto out;
1353         rv = check_nfsd_access(exp, rqstp);
1354 out:
1355         exp_put(exp);
1356         return rv;
1357 }
1358
1359 /* Iterator */
1360
1361 static void *e_start(struct seq_file *m, loff_t *pos)
1362         __acquires(svc_export_cache.hash_lock)
1363 {
1364         loff_t n = *pos;
1365         unsigned hash, export;
1366         struct cache_head *ch;
1367         
1368         exp_readlock();
1369         read_lock(&svc_export_cache.hash_lock);
1370         if (!n--)
1371                 return SEQ_START_TOKEN;
1372         hash = n >> 32;
1373         export = n & ((1LL<<32) - 1);
1374
1375         
1376         for (ch=export_table[hash]; ch; ch=ch->next)
1377                 if (!export--)
1378                         return ch;
1379         n &= ~((1LL<<32) - 1);
1380         do {
1381                 hash++;
1382                 n += 1LL<<32;
1383         } while(hash < EXPORT_HASHMAX && export_table[hash]==NULL);
1384         if (hash >= EXPORT_HASHMAX)
1385                 return NULL;
1386         *pos = n+1;
1387         return export_table[hash];
1388 }
1389
1390 static void *e_next(struct seq_file *m, void *p, loff_t *pos)
1391 {
1392         struct cache_head *ch = p;
1393         int hash = (*pos >> 32);
1394
1395         if (p == SEQ_START_TOKEN)
1396                 hash = 0;
1397         else if (ch->next == NULL) {
1398                 hash++;
1399                 *pos += 1LL<<32;
1400         } else {
1401                 ++*pos;
1402                 return ch->next;
1403         }
1404         *pos &= ~((1LL<<32) - 1);
1405         while (hash < EXPORT_HASHMAX && export_table[hash] == NULL) {
1406                 hash++;
1407                 *pos += 1LL<<32;
1408         }
1409         if (hash >= EXPORT_HASHMAX)
1410                 return NULL;
1411         ++*pos;
1412         return export_table[hash];
1413 }
1414
1415 static void e_stop(struct seq_file *m, void *p)
1416         __releases(svc_export_cache.hash_lock)
1417 {
1418         read_unlock(&svc_export_cache.hash_lock);
1419         exp_readunlock();
1420 }
1421
1422 static struct flags {
1423         int flag;
1424         char *name[2];
1425 } expflags[] = {
1426         { NFSEXP_READONLY, {"ro", "rw"}},
1427         { NFSEXP_INSECURE_PORT, {"insecure", ""}},
1428         { NFSEXP_ROOTSQUASH, {"root_squash", "no_root_squash"}},
1429         { NFSEXP_ALLSQUASH, {"all_squash", ""}},
1430         { NFSEXP_ASYNC, {"async", "sync"}},
1431         { NFSEXP_GATHERED_WRITES, {"wdelay", "no_wdelay"}},
1432         { NFSEXP_NOHIDE, {"nohide", ""}},
1433         { NFSEXP_CROSSMOUNT, {"crossmnt", ""}},
1434         { NFSEXP_NOSUBTREECHECK, {"no_subtree_check", ""}},
1435         { NFSEXP_NOAUTHNLM, {"insecure_locks", ""}},
1436 #ifdef MSNFS
1437         { NFSEXP_MSNFS, {"msnfs", ""}},
1438 #endif
1439         { 0, {"", ""}}
1440 };
1441
1442 static void show_expflags(struct seq_file *m, int flags, int mask)
1443 {
1444         struct flags *flg;
1445         int state, first = 0;
1446
1447         for (flg = expflags; flg->flag; flg++) {
1448                 if (flg->flag & ~mask)
1449                         continue;
1450                 state = (flg->flag & flags) ? 0 : 1;
1451                 if (*flg->name[state])
1452                         seq_printf(m, "%s%s", first++?",":"", flg->name[state]);
1453         }
1454 }
1455
1456 static void show_secinfo_flags(struct seq_file *m, int flags)
1457 {
1458         seq_printf(m, ",");
1459         show_expflags(m, flags, NFSEXP_SECINFO_FLAGS);
1460 }
1461
1462 static void show_secinfo(struct seq_file *m, struct svc_export *exp)
1463 {
1464         struct exp_flavor_info *f;
1465         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1466         int lastflags = 0, first = 0;
1467
1468         if (exp->ex_nflavors == 0)
1469                 return;
1470         for (f = exp->ex_flavors; f < end; f++) {
1471                 if (first || f->flags != lastflags) {
1472                         if (!first)
1473                                 show_secinfo_flags(m, lastflags);
1474                         seq_printf(m, ",sec=%d", f->pseudoflavor);
1475                         lastflags = f->flags;
1476                 } else {
1477                         seq_printf(m, ":%d", f->pseudoflavor);
1478                 }
1479         }
1480         show_secinfo_flags(m, lastflags);
1481 }
1482
1483 static void exp_flags(struct seq_file *m, int flag, int fsid,
1484                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fsloc)
1485 {
1486         show_expflags(m, flag, NFSEXP_ALLFLAGS);
1487         if (flag & NFSEXP_FSID)
1488                 seq_printf(m, ",fsid=%d", fsid);
1489         if (anonu != (uid_t)-2 && anonu != (0x10000-2))
1490                 seq_printf(m, ",anonuid=%u", anonu);
1491         if (anong != (gid_t)-2 && anong != (0x10000-2))
1492                 seq_printf(m, ",anongid=%u", anong);
1493         if (fsloc && fsloc->locations_count > 0) {
1494                 char *loctype = (fsloc->migrated) ? "refer" : "replicas";
1495                 int i;
1496
1497                 seq_printf(m, ",%s=", loctype);
1498                 seq_escape(m, fsloc->locations[0].path, ",;@ \t\n\\");
1499                 seq_putc(m, '@');
1500                 seq_escape(m, fsloc->locations[0].hosts, ",;@ \t\n\\");
1501                 for (i = 1; i < fsloc->locations_count; i++) {
1502                         seq_putc(m, ';');
1503                         seq_escape(m, fsloc->locations[i].path, ",;@ \t\n\\");
1504                         seq_putc(m, '@');
1505                         seq_escape(m, fsloc->locations[i].hosts, ",;@ \t\n\\");
1506                 }
1507         }
1508 }
1509
1510 static int e_show(struct seq_file *m, void *p)
1511 {
1512         struct cache_head *cp = p;
1513         struct svc_export *exp = container_of(cp, struct svc_export, h);
1514
1515         if (p == SEQ_START_TOKEN) {
1516                 seq_puts(m, "# Version 1.1\n");
1517                 seq_puts(m, "# Path Client(Flags) # IPs\n");
1518                 return 0;
1519         }
1520
1521         cache_get(&exp->h);
1522         if (cache_check(&svc_export_cache, &exp->h, NULL))
1523                 return 0;
1524         cache_put(&exp->h, &svc_export_cache);
1525         return svc_export_show(m, &svc_export_cache, cp);
1526 }
1527
1528 struct seq_operations nfs_exports_op = {
1529         .start  = e_start,
1530         .next   = e_next,
1531         .stop   = e_stop,
1532         .show   = e_show,
1533 };
1534
1535 /*
1536  * Add or modify a client.
1537  * Change requests may involve the list of host addresses. The list of
1538  * exports and possibly existing uid maps are left untouched.
1539  */
1540 int
1541 exp_addclient(struct nfsctl_client *ncp)
1542 {
1543         struct auth_domain      *dom;
1544         int                     i, err;
1545         struct in6_addr addr6;
1546
1547         /* First, consistency check. */
1548         err = -EINVAL;
1549         if (! exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1550                 goto out;
1551         if (ncp->cl_naddr > NFSCLNT_ADDRMAX)
1552                 goto out;
1553
1554         /* Lock the hashtable */
1555         exp_writelock();
1556
1557         dom = unix_domain_find(ncp->cl_ident);
1558
1559         err = -ENOMEM;
1560         if (!dom)
1561                 goto out_unlock;
1562
1563         /* Insert client into hashtable. */
1564         for (i = 0; i < ncp->cl_naddr; i++) {
1565                 ipv6_addr_set_v4mapped(ncp->cl_addrlist[i].s_addr, &addr6);
1566                 auth_unix_add_addr(&addr6, dom);
1567         }
1568         auth_unix_forget_old(dom);
1569         auth_domain_put(dom);
1570
1571         err = 0;
1572
1573 out_unlock:
1574         exp_writeunlock();
1575 out:
1576         return err;
1577 }
1578
1579 /*
1580  * Delete a client given an identifier.
1581  */
1582 int
1583 exp_delclient(struct nfsctl_client *ncp)
1584 {
1585         int             err;
1586         struct auth_domain *dom;
1587
1588         err = -EINVAL;
1589         if (!exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1590                 goto out;
1591
1592         /* Lock the hashtable */
1593         exp_writelock();
1594
1595         dom = auth_domain_find(ncp->cl_ident);
1596         /* just make sure that no addresses work 
1597          * and that it will expire soon 
1598          */
1599         if (dom) {
1600                 err = auth_unix_forget_old(dom);
1601                 auth_domain_put(dom);
1602         }
1603
1604         exp_writeunlock();
1605 out:
1606         return err;
1607 }
1608
1609 /*
1610  * Verify that string is non-empty and does not exceed max length.
1611  */
1612 static int
1613 exp_verify_string(char *cp, int max)
1614 {
1615         int     i;
1616
1617         for (i = 0; i < max; i++)
1618                 if (!cp[i])
1619                         return i;
1620         cp[i] = 0;
1621         printk(KERN_NOTICE "nfsd: couldn't validate string %s\n", cp);
1622         return 0;
1623 }
1624
1625 /*
1626  * Initialize the exports module.
1627  */
1628 int
1629 nfsd_export_init(void)
1630 {
1631         int rv;
1632         dprintk("nfsd: initializing export module.\n");
1633
1634         rv = cache_register(&svc_export_cache);
1635         if (rv)
1636                 return rv;
1637         rv = cache_register(&svc_expkey_cache);
1638         if (rv)
1639                 cache_unregister(&svc_export_cache);
1640         return rv;
1641
1642 }
1643
1644 /*
1645  * Flush exports table - called when last nfsd thread is killed
1646  */
1647 void
1648 nfsd_export_flush(void)
1649 {
1650         exp_writelock();
1651         cache_purge(&svc_expkey_cache);
1652         cache_purge(&svc_export_cache);
1653         exp_writeunlock();
1654 }
1655
1656 /*
1657  * Shutdown the exports module.
1658  */
1659 void
1660 nfsd_export_shutdown(void)
1661 {
1662
1663         dprintk("nfsd: shutting down export module.\n");
1664
1665         exp_writelock();
1666
1667         cache_unregister(&svc_expkey_cache);
1668         cache_unregister(&svc_export_cache);
1669         svcauth_unix_purge();
1670
1671         exp_writeunlock();
1672         dprintk("nfsd: export shutdown complete.\n");
1673 }