nfsd: move most of nfsfh.h to fs/nfsd
[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/namei.h>
18 #include <linux/module.h>
19 #include <linux/exportfs.h>
20
21 #include <linux/nfsd/syscall.h>
22 #include <net/ipv6.h>
23
24 #include "nfsd.h"
25 #include "nfsfh.h"
26
27 #define NFSDDBG_FACILITY        NFSDDBG_EXPORT
28
29 typedef struct auth_domain      svc_client;
30 typedef struct svc_export       svc_export;
31
32 static void             exp_do_unexport(svc_export *unexp);
33 static int              exp_verify_string(char *cp, int max);
34
35 /*
36  * We have two caches.
37  * One maps client+vfsmnt+dentry to export options - the export map
38  * The other maps client+filehandle-fragment to export options. - the expkey map
39  *
40  * The export options are actually stored in the first map, and the
41  * second map contains a reference to the entry in the first map.
42  */
43
44 #define EXPKEY_HASHBITS         8
45 #define EXPKEY_HASHMAX          (1 << EXPKEY_HASHBITS)
46 #define EXPKEY_HASHMASK         (EXPKEY_HASHMAX -1)
47 static struct cache_head *expkey_table[EXPKEY_HASHMAX];
48
49 static void expkey_put(struct kref *ref)
50 {
51         struct svc_expkey *key = container_of(ref, struct svc_expkey, h.ref);
52
53         if (test_bit(CACHE_VALID, &key->h.flags) &&
54             !test_bit(CACHE_NEGATIVE, &key->h.flags))
55                 path_put(&key->ek_path);
56         auth_domain_put(key->ek_client);
57         kfree(key);
58 }
59
60 static void expkey_request(struct cache_detail *cd,
61                            struct cache_head *h,
62                            char **bpp, int *blen)
63 {
64         /* client fsidtype \xfsid */
65         struct svc_expkey *ek = container_of(h, struct svc_expkey, h);
66         char type[5];
67
68         qword_add(bpp, blen, ek->ek_client->name);
69         snprintf(type, 5, "%d", ek->ek_fsidtype);
70         qword_add(bpp, blen, type);
71         qword_addhex(bpp, blen, (char*)ek->ek_fsid, key_len(ek->ek_fsidtype));
72         (*bpp)[-1] = '\n';
73 }
74
75 static int expkey_upcall(struct cache_detail *cd, struct cache_head *h)
76 {
77         return sunrpc_cache_pipe_upcall(cd, h, expkey_request);
78 }
79
80 static struct svc_expkey *svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old);
81 static struct svc_expkey *svc_expkey_lookup(struct svc_expkey *);
82 static struct cache_detail svc_expkey_cache;
83
84 static int expkey_parse(struct cache_detail *cd, char *mesg, int mlen)
85 {
86         /* client fsidtype fsid [path] */
87         char *buf;
88         int len;
89         struct auth_domain *dom = NULL;
90         int err;
91         int fsidtype;
92         char *ep;
93         struct svc_expkey key;
94         struct svc_expkey *ek = NULL;
95
96         if (mesg[mlen-1] != '\n')
97                 return -EINVAL;
98         mesg[mlen-1] = 0;
99
100         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
101         err = -ENOMEM;
102         if (!buf)
103                 goto out;
104
105         err = -EINVAL;
106         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
107                 goto out;
108
109         err = -ENOENT;
110         dom = auth_domain_find(buf);
111         if (!dom)
112                 goto out;
113         dprintk("found domain %s\n", buf);
114
115         err = -EINVAL;
116         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
117                 goto out;
118         fsidtype = simple_strtoul(buf, &ep, 10);
119         if (*ep)
120                 goto out;
121         dprintk("found fsidtype %d\n", fsidtype);
122         if (key_len(fsidtype)==0) /* invalid type */
123                 goto out;
124         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
125                 goto out;
126         dprintk("found fsid length %d\n", len);
127         if (len != key_len(fsidtype))
128                 goto out;
129
130         /* OK, we seem to have a valid key */
131         key.h.flags = 0;
132         key.h.expiry_time = get_expiry(&mesg);
133         if (key.h.expiry_time == 0)
134                 goto out;
135
136         key.ek_client = dom;    
137         key.ek_fsidtype = fsidtype;
138         memcpy(key.ek_fsid, buf, len);
139
140         ek = svc_expkey_lookup(&key);
141         err = -ENOMEM;
142         if (!ek)
143                 goto out;
144
145         /* now we want a pathname, or empty meaning NEGATIVE  */
146         err = -EINVAL;
147         len = qword_get(&mesg, buf, PAGE_SIZE);
148         if (len < 0)
149                 goto out;
150         dprintk("Path seems to be <%s>\n", buf);
151         err = 0;
152         if (len == 0) {
153                 set_bit(CACHE_NEGATIVE, &key.h.flags);
154                 ek = svc_expkey_update(&key, ek);
155                 if (!ek)
156                         err = -ENOMEM;
157         } else {
158                 err = kern_path(buf, 0, &key.ek_path);
159                 if (err)
160                         goto out;
161
162                 dprintk("Found the path %s\n", buf);
163
164                 ek = svc_expkey_update(&key, ek);
165                 if (!ek)
166                         err = -ENOMEM;
167                 path_put(&key.ek_path);
168         }
169         cache_flush();
170  out:
171         if (ek)
172                 cache_put(&ek->h, &svc_expkey_cache);
173         if (dom)
174                 auth_domain_put(dom);
175         kfree(buf);
176         return err;
177 }
178
179 static int expkey_show(struct seq_file *m,
180                        struct cache_detail *cd,
181                        struct cache_head *h)
182 {
183         struct svc_expkey *ek ;
184         int i;
185
186         if (h ==NULL) {
187                 seq_puts(m, "#domain fsidtype fsid [path]\n");
188                 return 0;
189         }
190         ek = container_of(h, struct svc_expkey, h);
191         seq_printf(m, "%s %d 0x", ek->ek_client->name,
192                    ek->ek_fsidtype);
193         for (i=0; i < key_len(ek->ek_fsidtype)/4; i++)
194                 seq_printf(m, "%08x", ek->ek_fsid[i]);
195         if (test_bit(CACHE_VALID, &h->flags) && 
196             !test_bit(CACHE_NEGATIVE, &h->flags)) {
197                 seq_printf(m, " ");
198                 seq_path(m, &ek->ek_path, "\\ \t\n");
199         }
200         seq_printf(m, "\n");
201         return 0;
202 }
203
204 static inline int expkey_match (struct cache_head *a, struct cache_head *b)
205 {
206         struct svc_expkey *orig = container_of(a, struct svc_expkey, h);
207         struct svc_expkey *new = container_of(b, struct svc_expkey, h);
208
209         if (orig->ek_fsidtype != new->ek_fsidtype ||
210             orig->ek_client != new->ek_client ||
211             memcmp(orig->ek_fsid, new->ek_fsid, key_len(orig->ek_fsidtype)) != 0)
212                 return 0;
213         return 1;
214 }
215
216 static inline void expkey_init(struct cache_head *cnew,
217                                    struct cache_head *citem)
218 {
219         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
220         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
221
222         kref_get(&item->ek_client->ref);
223         new->ek_client = item->ek_client;
224         new->ek_fsidtype = item->ek_fsidtype;
225
226         memcpy(new->ek_fsid, item->ek_fsid, sizeof(new->ek_fsid));
227 }
228
229 static inline void expkey_update(struct cache_head *cnew,
230                                    struct cache_head *citem)
231 {
232         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
233         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
234
235         new->ek_path = item->ek_path;
236         path_get(&item->ek_path);
237 }
238
239 static struct cache_head *expkey_alloc(void)
240 {
241         struct svc_expkey *i = kmalloc(sizeof(*i), GFP_KERNEL);
242         if (i)
243                 return &i->h;
244         else
245                 return NULL;
246 }
247
248 static struct cache_detail svc_expkey_cache = {
249         .owner          = THIS_MODULE,
250         .hash_size      = EXPKEY_HASHMAX,
251         .hash_table     = expkey_table,
252         .name           = "nfsd.fh",
253         .cache_put      = expkey_put,
254         .cache_upcall   = expkey_upcall,
255         .cache_parse    = expkey_parse,
256         .cache_show     = expkey_show,
257         .match          = expkey_match,
258         .init           = expkey_init,
259         .update         = expkey_update,
260         .alloc          = expkey_alloc,
261 };
262
263 static struct svc_expkey *
264 svc_expkey_lookup(struct svc_expkey *item)
265 {
266         struct cache_head *ch;
267         int hash = item->ek_fsidtype;
268         char * cp = (char*)item->ek_fsid;
269         int len = key_len(item->ek_fsidtype);
270
271         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
272         hash ^= hash_ptr(item->ek_client, EXPKEY_HASHBITS);
273         hash &= EXPKEY_HASHMASK;
274
275         ch = sunrpc_cache_lookup(&svc_expkey_cache, &item->h,
276                                  hash);
277         if (ch)
278                 return container_of(ch, struct svc_expkey, h);
279         else
280                 return NULL;
281 }
282
283 static struct svc_expkey *
284 svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old)
285 {
286         struct cache_head *ch;
287         int hash = new->ek_fsidtype;
288         char * cp = (char*)new->ek_fsid;
289         int len = key_len(new->ek_fsidtype);
290
291         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
292         hash ^= hash_ptr(new->ek_client, EXPKEY_HASHBITS);
293         hash &= EXPKEY_HASHMASK;
294
295         ch = sunrpc_cache_update(&svc_expkey_cache, &new->h,
296                                  &old->h, hash);
297         if (ch)
298                 return container_of(ch, struct svc_expkey, h);
299         else
300                 return NULL;
301 }
302
303
304 #define EXPORT_HASHBITS         8
305 #define EXPORT_HASHMAX          (1<< EXPORT_HASHBITS)
306 #define EXPORT_HASHMASK         (EXPORT_HASHMAX -1)
307
308 static struct cache_head *export_table[EXPORT_HASHMAX];
309
310 static void nfsd4_fslocs_free(struct nfsd4_fs_locations *fsloc)
311 {
312         int i;
313
314         for (i = 0; i < fsloc->locations_count; i++) {
315                 kfree(fsloc->locations[i].path);
316                 kfree(fsloc->locations[i].hosts);
317         }
318         kfree(fsloc->locations);
319 }
320
321 static void svc_export_put(struct kref *ref)
322 {
323         struct svc_export *exp = container_of(ref, struct svc_export, h.ref);
324         path_put(&exp->ex_path);
325         auth_domain_put(exp->ex_client);
326         kfree(exp->ex_pathname);
327         nfsd4_fslocs_free(&exp->ex_fslocs);
328         kfree(exp);
329 }
330
331 static void svc_export_request(struct cache_detail *cd,
332                                struct cache_head *h,
333                                char **bpp, int *blen)
334 {
335         /*  client path */
336         struct svc_export *exp = container_of(h, struct svc_export, h);
337         char *pth;
338
339         qword_add(bpp, blen, exp->ex_client->name);
340         pth = d_path(&exp->ex_path, *bpp, *blen);
341         if (IS_ERR(pth)) {
342                 /* is this correct? */
343                 (*bpp)[0] = '\n';
344                 return;
345         }
346         qword_add(bpp, blen, pth);
347         (*bpp)[-1] = '\n';
348 }
349
350 static int svc_export_upcall(struct cache_detail *cd, struct cache_head *h)
351 {
352         return sunrpc_cache_pipe_upcall(cd, h, svc_export_request);
353 }
354
355 static struct svc_export *svc_export_update(struct svc_export *new,
356                                             struct svc_export *old);
357 static struct svc_export *svc_export_lookup(struct svc_export *);
358
359 static int check_export(struct inode *inode, int *flags, unsigned char *uuid)
360 {
361
362         /*
363          * We currently export only dirs, regular files, and (for v4
364          * pseudoroot) symlinks.
365          */
366         if (!S_ISDIR(inode->i_mode) &&
367             !S_ISLNK(inode->i_mode) &&
368             !S_ISREG(inode->i_mode))
369                 return -ENOTDIR;
370
371         /*
372          * Mountd should never pass down a writeable V4ROOT export, but,
373          * just to make sure:
374          */
375         if (*flags & NFSEXP_V4ROOT)
376                 *flags |= NFSEXP_READONLY;
377
378         /* There are two requirements on a filesystem to be exportable.
379          * 1:  We must be able to identify the filesystem from a number.
380          *       either a device number (so FS_REQUIRES_DEV needed)
381          *       or an FSID number (so NFSEXP_FSID or ->uuid is needed).
382          * 2:  We must be able to find an inode from a filehandle.
383          *       This means that s_export_op must be set.
384          */
385         if (!(inode->i_sb->s_type->fs_flags & FS_REQUIRES_DEV) &&
386             !(*flags & NFSEXP_FSID) &&
387             uuid == NULL) {
388                 dprintk("exp_export: export of non-dev fs without fsid\n");
389                 return -EINVAL;
390         }
391
392         if (!inode->i_sb->s_export_op ||
393             !inode->i_sb->s_export_op->fh_to_dentry) {
394                 dprintk("exp_export: export of invalid fs type.\n");
395                 return -EINVAL;
396         }
397
398         return 0;
399
400 }
401
402 #ifdef CONFIG_NFSD_V4
403
404 static int
405 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc)
406 {
407         int len;
408         int migrated, i, err;
409
410         /* listsize */
411         err = get_int(mesg, &fsloc->locations_count);
412         if (err)
413                 return err;
414         if (fsloc->locations_count > MAX_FS_LOCATIONS)
415                 return -EINVAL;
416         if (fsloc->locations_count == 0)
417                 return 0;
418
419         fsloc->locations = kzalloc(fsloc->locations_count
420                         * sizeof(struct nfsd4_fs_location), GFP_KERNEL);
421         if (!fsloc->locations)
422                 return -ENOMEM;
423         for (i=0; i < fsloc->locations_count; i++) {
424                 /* colon separated host list */
425                 err = -EINVAL;
426                 len = qword_get(mesg, buf, PAGE_SIZE);
427                 if (len <= 0)
428                         goto out_free_all;
429                 err = -ENOMEM;
430                 fsloc->locations[i].hosts = kstrdup(buf, GFP_KERNEL);
431                 if (!fsloc->locations[i].hosts)
432                         goto out_free_all;
433                 err = -EINVAL;
434                 /* slash separated path component list */
435                 len = qword_get(mesg, buf, PAGE_SIZE);
436                 if (len <= 0)
437                         goto out_free_all;
438                 err = -ENOMEM;
439                 fsloc->locations[i].path = kstrdup(buf, GFP_KERNEL);
440                 if (!fsloc->locations[i].path)
441                         goto out_free_all;
442         }
443         /* migrated */
444         err = get_int(mesg, &migrated);
445         if (err)
446                 goto out_free_all;
447         err = -EINVAL;
448         if (migrated < 0 || migrated > 1)
449                 goto out_free_all;
450         fsloc->migrated = migrated;
451         return 0;
452 out_free_all:
453         nfsd4_fslocs_free(fsloc);
454         return err;
455 }
456
457 static int secinfo_parse(char **mesg, char *buf, struct svc_export *exp)
458 {
459         int listsize, err;
460         struct exp_flavor_info *f;
461
462         err = get_int(mesg, &listsize);
463         if (err)
464                 return err;
465         if (listsize < 0 || listsize > MAX_SECINFO_LIST)
466                 return -EINVAL;
467
468         for (f = exp->ex_flavors; f < exp->ex_flavors + listsize; f++) {
469                 err = get_int(mesg, &f->pseudoflavor);
470                 if (err)
471                         return err;
472                 /*
473                  * XXX: It would be nice to also check whether this
474                  * pseudoflavor is supported, so we can discover the
475                  * problem at export time instead of when a client fails
476                  * to authenticate.
477                  */
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_upcall   = svc_export_upcall,
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, const struct path *path,
852                                      struct cache_req *reqp)
853 {
854         struct svc_export *exp, key;
855         int err;
856
857         if (!clp)
858                 return ERR_PTR(-ENOENT);
859
860         key.ex_client = clp;
861         key.ex_path = *path;
862
863         exp = svc_export_lookup(&key);
864         if (exp == NULL)
865                 return ERR_PTR(-ENOMEM);
866         err = cache_check(&svc_export_cache, &exp->h, reqp);
867         if (err)
868                 return ERR_PTR(err);
869         return exp;
870 }
871
872 /*
873  * Find the export entry for a given dentry.
874  */
875 static struct svc_export *exp_parent(svc_client *clp, struct path *path)
876 {
877         struct dentry *saved = dget(path->dentry);
878         svc_export *exp = exp_get_by_name(clp, path, NULL);
879
880         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
881                 struct dentry *parent = dget_parent(path->dentry);
882                 dput(path->dentry);
883                 path->dentry = parent;
884                 exp = exp_get_by_name(clp, path, NULL);
885         }
886         dput(path->dentry);
887         path->dentry = saved;
888         return exp;
889 }
890
891 /*
892  * Hashtable locking. Write locks are placed only by user processes
893  * wanting to modify export information.
894  * Write locking only done in this file.  Read locking
895  * needed externally.
896  */
897
898 static DECLARE_RWSEM(hash_sem);
899
900 void
901 exp_readlock(void)
902 {
903         down_read(&hash_sem);
904 }
905
906 static inline void
907 exp_writelock(void)
908 {
909         down_write(&hash_sem);
910 }
911
912 void
913 exp_readunlock(void)
914 {
915         up_read(&hash_sem);
916 }
917
918 static inline void
919 exp_writeunlock(void)
920 {
921         up_write(&hash_sem);
922 }
923
924 static void exp_fsid_unhash(struct svc_export *exp)
925 {
926         struct svc_expkey *ek;
927
928         if ((exp->ex_flags & NFSEXP_FSID) == 0)
929                 return;
930
931         ek = exp_get_fsid_key(exp->ex_client, exp->ex_fsid);
932         if (!IS_ERR(ek)) {
933                 ek->h.expiry_time = get_seconds()-1;
934                 cache_put(&ek->h, &svc_expkey_cache);
935         }
936         svc_expkey_cache.nextcheck = get_seconds();
937 }
938
939 static int exp_fsid_hash(svc_client *clp, struct svc_export *exp)
940 {
941         u32 fsid[2];
942  
943         if ((exp->ex_flags & NFSEXP_FSID) == 0)
944                 return 0;
945
946         mk_fsid(FSID_NUM, fsid, 0, 0, exp->ex_fsid, NULL);
947         return exp_set_key(clp, FSID_NUM, fsid, exp);
948 }
949
950 static int exp_hash(struct auth_domain *clp, struct svc_export *exp)
951 {
952         u32 fsid[2];
953         struct inode *inode = exp->ex_path.dentry->d_inode;
954         dev_t dev = inode->i_sb->s_dev;
955
956         if (old_valid_dev(dev)) {
957                 mk_fsid(FSID_DEV, fsid, dev, inode->i_ino, 0, NULL);
958                 return exp_set_key(clp, FSID_DEV, fsid, exp);
959         }
960         mk_fsid(FSID_ENCODE_DEV, fsid, dev, inode->i_ino, 0, NULL);
961         return exp_set_key(clp, FSID_ENCODE_DEV, fsid, exp);
962 }
963
964 static void exp_unhash(struct svc_export *exp)
965 {
966         struct svc_expkey *ek;
967         struct inode *inode = exp->ex_path.dentry->d_inode;
968
969         ek = exp_get_key(exp->ex_client, inode->i_sb->s_dev, inode->i_ino);
970         if (!IS_ERR(ek)) {
971                 ek->h.expiry_time = get_seconds()-1;
972                 cache_put(&ek->h, &svc_expkey_cache);
973         }
974         svc_expkey_cache.nextcheck = get_seconds();
975 }
976         
977 /*
978  * Export a file system.
979  */
980 int
981 exp_export(struct nfsctl_export *nxp)
982 {
983         svc_client      *clp;
984         struct svc_export       *exp = NULL;
985         struct svc_export       new;
986         struct svc_expkey       *fsid_key = NULL;
987         struct path path;
988         int             err;
989
990         /* Consistency check */
991         err = -EINVAL;
992         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
993             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
994                 goto out;
995
996         dprintk("exp_export called for %s:%s (%x/%ld fl %x).\n",
997                         nxp->ex_client, nxp->ex_path,
998                         (unsigned)nxp->ex_dev, (long)nxp->ex_ino,
999                         nxp->ex_flags);
1000
1001         /* Try to lock the export table for update */
1002         exp_writelock();
1003
1004         /* Look up client info */
1005         if (!(clp = auth_domain_find(nxp->ex_client)))
1006                 goto out_unlock;
1007
1008
1009         /* Look up the dentry */
1010         err = kern_path(nxp->ex_path, 0, &path);
1011         if (err)
1012                 goto out_put_clp;
1013         err = -EINVAL;
1014
1015         exp = exp_get_by_name(clp, &path, NULL);
1016
1017         memset(&new, 0, sizeof(new));
1018
1019         /* must make sure there won't be an ex_fsid clash */
1020         if ((nxp->ex_flags & NFSEXP_FSID) &&
1021             (!IS_ERR(fsid_key = exp_get_fsid_key(clp, nxp->ex_dev))) &&
1022             fsid_key->ek_path.mnt &&
1023             (fsid_key->ek_path.mnt != path.mnt ||
1024              fsid_key->ek_path.dentry != path.dentry))
1025                 goto finish;
1026
1027         if (!IS_ERR(exp)) {
1028                 /* just a flags/id/fsid update */
1029
1030                 exp_fsid_unhash(exp);
1031                 exp->ex_flags    = nxp->ex_flags;
1032                 exp->ex_anon_uid = nxp->ex_anon_uid;
1033                 exp->ex_anon_gid = nxp->ex_anon_gid;
1034                 exp->ex_fsid     = nxp->ex_dev;
1035
1036                 err = exp_fsid_hash(clp, exp);
1037                 goto finish;
1038         }
1039
1040         err = check_export(path.dentry->d_inode, &nxp->ex_flags, NULL);
1041         if (err) goto finish;
1042
1043         err = -ENOMEM;
1044
1045         dprintk("nfsd: creating export entry %p for client %p\n", exp, clp);
1046
1047         new.h.expiry_time = NEVER;
1048         new.h.flags = 0;
1049         new.ex_pathname = kstrdup(nxp->ex_path, GFP_KERNEL);
1050         if (!new.ex_pathname)
1051                 goto finish;
1052         new.ex_client = clp;
1053         new.ex_path = path;
1054         new.ex_flags = nxp->ex_flags;
1055         new.ex_anon_uid = nxp->ex_anon_uid;
1056         new.ex_anon_gid = nxp->ex_anon_gid;
1057         new.ex_fsid = nxp->ex_dev;
1058
1059         exp = svc_export_lookup(&new);
1060         if (exp)
1061                 exp = svc_export_update(&new, exp);
1062
1063         if (!exp)
1064                 goto finish;
1065
1066         if (exp_hash(clp, exp) ||
1067             exp_fsid_hash(clp, exp)) {
1068                 /* failed to create at least one index */
1069                 exp_do_unexport(exp);
1070                 cache_flush();
1071         } else
1072                 err = 0;
1073 finish:
1074         kfree(new.ex_pathname);
1075         if (exp)
1076                 exp_put(exp);
1077         if (fsid_key && !IS_ERR(fsid_key))
1078                 cache_put(&fsid_key->h, &svc_expkey_cache);
1079         path_put(&path);
1080 out_put_clp:
1081         auth_domain_put(clp);
1082 out_unlock:
1083         exp_writeunlock();
1084 out:
1085         return err;
1086 }
1087
1088 /*
1089  * Unexport a file system. The export entry has already
1090  * been removed from the client's list of exported fs's.
1091  */
1092 static void
1093 exp_do_unexport(svc_export *unexp)
1094 {
1095         unexp->h.expiry_time = get_seconds()-1;
1096         svc_export_cache.nextcheck = get_seconds();
1097         exp_unhash(unexp);
1098         exp_fsid_unhash(unexp);
1099 }
1100
1101
1102 /*
1103  * unexport syscall.
1104  */
1105 int
1106 exp_unexport(struct nfsctl_export *nxp)
1107 {
1108         struct auth_domain *dom;
1109         svc_export *exp;
1110         struct path path;
1111         int             err;
1112
1113         /* Consistency check */
1114         if (!exp_verify_string(nxp->ex_path, NFS_MAXPATHLEN) ||
1115             !exp_verify_string(nxp->ex_client, NFSCLNT_IDMAX))
1116                 return -EINVAL;
1117
1118         exp_writelock();
1119
1120         err = -EINVAL;
1121         dom = auth_domain_find(nxp->ex_client);
1122         if (!dom) {
1123                 dprintk("nfsd: unexport couldn't find %s\n", nxp->ex_client);
1124                 goto out_unlock;
1125         }
1126
1127         err = kern_path(nxp->ex_path, 0, &path);
1128         if (err)
1129                 goto out_domain;
1130
1131         err = -EINVAL;
1132         exp = exp_get_by_name(dom, &path, NULL);
1133         path_put(&path);
1134         if (IS_ERR(exp))
1135                 goto out_domain;
1136
1137         exp_do_unexport(exp);
1138         exp_put(exp);
1139         err = 0;
1140
1141 out_domain:
1142         auth_domain_put(dom);
1143         cache_flush();
1144 out_unlock:
1145         exp_writeunlock();
1146         return err;
1147 }
1148
1149 /*
1150  * Obtain the root fh on behalf of a client.
1151  * This could be done in user space, but I feel that it adds some safety
1152  * since its harder to fool a kernel module than a user space program.
1153  */
1154 int
1155 exp_rootfh(svc_client *clp, char *name, struct knfsd_fh *f, int maxsize)
1156 {
1157         struct svc_export       *exp;
1158         struct path             path;
1159         struct inode            *inode;
1160         struct svc_fh           fh;
1161         int                     err;
1162
1163         err = -EPERM;
1164         /* NB: we probably ought to check that it's NUL-terminated */
1165         if (kern_path(name, 0, &path)) {
1166                 printk("nfsd: exp_rootfh path not found %s", name);
1167                 return err;
1168         }
1169         inode = path.dentry->d_inode;
1170
1171         dprintk("nfsd: exp_rootfh(%s [%p] %s:%s/%ld)\n",
1172                  name, path.dentry, clp->name,
1173                  inode->i_sb->s_id, inode->i_ino);
1174         exp = exp_parent(clp, &path);
1175         if (IS_ERR(exp)) {
1176                 err = PTR_ERR(exp);
1177                 goto out;
1178         }
1179
1180         /*
1181          * fh must be initialized before calling fh_compose
1182          */
1183         fh_init(&fh, maxsize);
1184         if (fh_compose(&fh, exp, path.dentry, NULL))
1185                 err = -EINVAL;
1186         else
1187                 err = 0;
1188         memcpy(f, &fh.fh_handle, sizeof(struct knfsd_fh));
1189         fh_put(&fh);
1190         exp_put(exp);
1191 out:
1192         path_put(&path);
1193         return err;
1194 }
1195
1196 static struct svc_export *exp_find(struct auth_domain *clp, int fsid_type,
1197                                    u32 *fsidv, struct cache_req *reqp)
1198 {
1199         struct svc_export *exp;
1200         struct svc_expkey *ek = exp_find_key(clp, fsid_type, fsidv, reqp);
1201         if (IS_ERR(ek))
1202                 return ERR_CAST(ek);
1203
1204         exp = exp_get_by_name(clp, &ek->ek_path, reqp);
1205         cache_put(&ek->h, &svc_expkey_cache);
1206
1207         if (IS_ERR(exp))
1208                 return ERR_CAST(exp);
1209         return exp;
1210 }
1211
1212 __be32 check_nfsd_access(struct svc_export *exp, struct svc_rqst *rqstp)
1213 {
1214         struct exp_flavor_info *f;
1215         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1216
1217         /* legacy gss-only clients are always OK: */
1218         if (exp->ex_client == rqstp->rq_gssclient)
1219                 return 0;
1220         /* ip-address based client; check sec= export option: */
1221         for (f = exp->ex_flavors; f < end; f++) {
1222                 if (f->pseudoflavor == rqstp->rq_flavor)
1223                         return 0;
1224         }
1225         /* defaults in absence of sec= options: */
1226         if (exp->ex_nflavors == 0) {
1227                 if (rqstp->rq_flavor == RPC_AUTH_NULL ||
1228                     rqstp->rq_flavor == RPC_AUTH_UNIX)
1229                         return 0;
1230         }
1231         return nfserr_wrongsec;
1232 }
1233
1234 /*
1235  * Uses rq_client and rq_gssclient to find an export; uses rq_client (an
1236  * auth_unix client) if it's available and has secinfo information;
1237  * otherwise, will try to use rq_gssclient.
1238  *
1239  * Called from functions that handle requests; functions that do work on
1240  * behalf of mountd are passed a single client name to use, and should
1241  * use exp_get_by_name() or exp_find().
1242  */
1243 struct svc_export *
1244 rqst_exp_get_by_name(struct svc_rqst *rqstp, struct path *path)
1245 {
1246         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
1247
1248         if (rqstp->rq_client == NULL)
1249                 goto gss;
1250
1251         /* First try the auth_unix client: */
1252         exp = exp_get_by_name(rqstp->rq_client, path, &rqstp->rq_chandle);
1253         if (PTR_ERR(exp) == -ENOENT)
1254                 goto gss;
1255         if (IS_ERR(exp))
1256                 return exp;
1257         /* If it has secinfo, assume there are no gss/... clients */
1258         if (exp->ex_nflavors > 0)
1259                 return exp;
1260 gss:
1261         /* Otherwise, try falling back on gss client */
1262         if (rqstp->rq_gssclient == NULL)
1263                 return exp;
1264         gssexp = exp_get_by_name(rqstp->rq_gssclient, path, &rqstp->rq_chandle);
1265         if (PTR_ERR(gssexp) == -ENOENT)
1266                 return exp;
1267         if (!IS_ERR(exp))
1268                 exp_put(exp);
1269         return gssexp;
1270 }
1271
1272 struct svc_export *
1273 rqst_exp_find(struct svc_rqst *rqstp, int fsid_type, u32 *fsidv)
1274 {
1275         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
1276
1277         if (rqstp->rq_client == NULL)
1278                 goto gss;
1279
1280         /* First try the auth_unix client: */
1281         exp = exp_find(rqstp->rq_client, fsid_type, fsidv, &rqstp->rq_chandle);
1282         if (PTR_ERR(exp) == -ENOENT)
1283                 goto gss;
1284         if (IS_ERR(exp))
1285                 return exp;
1286         /* If it has secinfo, assume there are no gss/... clients */
1287         if (exp->ex_nflavors > 0)
1288                 return exp;
1289 gss:
1290         /* Otherwise, try falling back on gss client */
1291         if (rqstp->rq_gssclient == NULL)
1292                 return exp;
1293         gssexp = exp_find(rqstp->rq_gssclient, fsid_type, fsidv,
1294                                                 &rqstp->rq_chandle);
1295         if (PTR_ERR(gssexp) == -ENOENT)
1296                 return exp;
1297         if (!IS_ERR(exp))
1298                 exp_put(exp);
1299         return gssexp;
1300 }
1301
1302 struct svc_export *
1303 rqst_exp_parent(struct svc_rqst *rqstp, struct path *path)
1304 {
1305         struct dentry *saved = dget(path->dentry);
1306         struct svc_export *exp = rqst_exp_get_by_name(rqstp, path);
1307
1308         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
1309                 struct dentry *parent = dget_parent(path->dentry);
1310                 dput(path->dentry);
1311                 path->dentry = parent;
1312                 exp = rqst_exp_get_by_name(rqstp, path);
1313         }
1314         dput(path->dentry);
1315         path->dentry = saved;
1316         return exp;
1317 }
1318
1319 static struct svc_export *find_fsidzero_export(struct svc_rqst *rqstp)
1320 {
1321         struct svc_export *exp;
1322         u32 fsidv[2];
1323
1324         mk_fsid(FSID_NUM, fsidv, 0, 0, 0, NULL);
1325
1326         exp = rqst_exp_find(rqstp, FSID_NUM, fsidv);
1327         /*
1328          * We shouldn't have accepting an nfsv4 request at all if we
1329          * don't have a pseudoexport!:
1330          */
1331         if (IS_ERR(exp) && PTR_ERR(exp) == -ENOENT)
1332                 exp = ERR_PTR(-ESERVERFAULT);
1333         return exp;
1334 }
1335
1336 /*
1337  * Called when we need the filehandle for the root of the pseudofs,
1338  * for a given NFSv4 client.   The root is defined to be the
1339  * export point with fsid==0
1340  */
1341 __be32
1342 exp_pseudoroot(struct svc_rqst *rqstp, struct svc_fh *fhp)
1343 {
1344         struct svc_export *exp;
1345         __be32 rv;
1346
1347         exp = find_fsidzero_export(rqstp);
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         if (rv)
1355                 fh_put(fhp);
1356 out:
1357         exp_put(exp);
1358         return rv;
1359 }
1360
1361 /* Iterator */
1362
1363 static void *e_start(struct seq_file *m, loff_t *pos)
1364         __acquires(svc_export_cache.hash_lock)
1365 {
1366         loff_t n = *pos;
1367         unsigned hash, export;
1368         struct cache_head *ch;
1369         
1370         exp_readlock();
1371         read_lock(&svc_export_cache.hash_lock);
1372         if (!n--)
1373                 return SEQ_START_TOKEN;
1374         hash = n >> 32;
1375         export = n & ((1LL<<32) - 1);
1376
1377         
1378         for (ch=export_table[hash]; ch; ch=ch->next)
1379                 if (!export--)
1380                         return ch;
1381         n &= ~((1LL<<32) - 1);
1382         do {
1383                 hash++;
1384                 n += 1LL<<32;
1385         } while(hash < EXPORT_HASHMAX && export_table[hash]==NULL);
1386         if (hash >= EXPORT_HASHMAX)
1387                 return NULL;
1388         *pos = n+1;
1389         return export_table[hash];
1390 }
1391
1392 static void *e_next(struct seq_file *m, void *p, loff_t *pos)
1393 {
1394         struct cache_head *ch = p;
1395         int hash = (*pos >> 32);
1396
1397         if (p == SEQ_START_TOKEN)
1398                 hash = 0;
1399         else if (ch->next == NULL) {
1400                 hash++;
1401                 *pos += 1LL<<32;
1402         } else {
1403                 ++*pos;
1404                 return ch->next;
1405         }
1406         *pos &= ~((1LL<<32) - 1);
1407         while (hash < EXPORT_HASHMAX && export_table[hash] == NULL) {
1408                 hash++;
1409                 *pos += 1LL<<32;
1410         }
1411         if (hash >= EXPORT_HASHMAX)
1412                 return NULL;
1413         ++*pos;
1414         return export_table[hash];
1415 }
1416
1417 static void e_stop(struct seq_file *m, void *p)
1418         __releases(svc_export_cache.hash_lock)
1419 {
1420         read_unlock(&svc_export_cache.hash_lock);
1421         exp_readunlock();
1422 }
1423
1424 static struct flags {
1425         int flag;
1426         char *name[2];
1427 } expflags[] = {
1428         { NFSEXP_READONLY, {"ro", "rw"}},
1429         { NFSEXP_INSECURE_PORT, {"insecure", ""}},
1430         { NFSEXP_ROOTSQUASH, {"root_squash", "no_root_squash"}},
1431         { NFSEXP_ALLSQUASH, {"all_squash", ""}},
1432         { NFSEXP_ASYNC, {"async", "sync"}},
1433         { NFSEXP_GATHERED_WRITES, {"wdelay", "no_wdelay"}},
1434         { NFSEXP_NOHIDE, {"nohide", ""}},
1435         { NFSEXP_CROSSMOUNT, {"crossmnt", ""}},
1436         { NFSEXP_NOSUBTREECHECK, {"no_subtree_check", ""}},
1437         { NFSEXP_NOAUTHNLM, {"insecure_locks", ""}},
1438         { NFSEXP_V4ROOT, {"v4root", ""}},
1439 #ifdef MSNFS
1440         { NFSEXP_MSNFS, {"msnfs", ""}},
1441 #endif
1442         { 0, {"", ""}}
1443 };
1444
1445 static void show_expflags(struct seq_file *m, int flags, int mask)
1446 {
1447         struct flags *flg;
1448         int state, first = 0;
1449
1450         for (flg = expflags; flg->flag; flg++) {
1451                 if (flg->flag & ~mask)
1452                         continue;
1453                 state = (flg->flag & flags) ? 0 : 1;
1454                 if (*flg->name[state])
1455                         seq_printf(m, "%s%s", first++?",":"", flg->name[state]);
1456         }
1457 }
1458
1459 static void show_secinfo_flags(struct seq_file *m, int flags)
1460 {
1461         seq_printf(m, ",");
1462         show_expflags(m, flags, NFSEXP_SECINFO_FLAGS);
1463 }
1464
1465 static void show_secinfo(struct seq_file *m, struct svc_export *exp)
1466 {
1467         struct exp_flavor_info *f;
1468         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1469         int lastflags = 0, first = 0;
1470
1471         if (exp->ex_nflavors == 0)
1472                 return;
1473         for (f = exp->ex_flavors; f < end; f++) {
1474                 if (first || f->flags != lastflags) {
1475                         if (!first)
1476                                 show_secinfo_flags(m, lastflags);
1477                         seq_printf(m, ",sec=%d", f->pseudoflavor);
1478                         lastflags = f->flags;
1479                 } else {
1480                         seq_printf(m, ":%d", f->pseudoflavor);
1481                 }
1482         }
1483         show_secinfo_flags(m, lastflags);
1484 }
1485
1486 static void exp_flags(struct seq_file *m, int flag, int fsid,
1487                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fsloc)
1488 {
1489         show_expflags(m, flag, NFSEXP_ALLFLAGS);
1490         if (flag & NFSEXP_FSID)
1491                 seq_printf(m, ",fsid=%d", fsid);
1492         if (anonu != (uid_t)-2 && anonu != (0x10000-2))
1493                 seq_printf(m, ",anonuid=%u", anonu);
1494         if (anong != (gid_t)-2 && anong != (0x10000-2))
1495                 seq_printf(m, ",anongid=%u", anong);
1496         if (fsloc && fsloc->locations_count > 0) {
1497                 char *loctype = (fsloc->migrated) ? "refer" : "replicas";
1498                 int i;
1499
1500                 seq_printf(m, ",%s=", loctype);
1501                 seq_escape(m, fsloc->locations[0].path, ",;@ \t\n\\");
1502                 seq_putc(m, '@');
1503                 seq_escape(m, fsloc->locations[0].hosts, ",;@ \t\n\\");
1504                 for (i = 1; i < fsloc->locations_count; i++) {
1505                         seq_putc(m, ';');
1506                         seq_escape(m, fsloc->locations[i].path, ",;@ \t\n\\");
1507                         seq_putc(m, '@');
1508                         seq_escape(m, fsloc->locations[i].hosts, ",;@ \t\n\\");
1509                 }
1510         }
1511 }
1512
1513 static int e_show(struct seq_file *m, void *p)
1514 {
1515         struct cache_head *cp = p;
1516         struct svc_export *exp = container_of(cp, struct svc_export, h);
1517
1518         if (p == SEQ_START_TOKEN) {
1519                 seq_puts(m, "# Version 1.1\n");
1520                 seq_puts(m, "# Path Client(Flags) # IPs\n");
1521                 return 0;
1522         }
1523
1524         cache_get(&exp->h);
1525         if (cache_check(&svc_export_cache, &exp->h, NULL))
1526                 return 0;
1527         cache_put(&exp->h, &svc_export_cache);
1528         return svc_export_show(m, &svc_export_cache, cp);
1529 }
1530
1531 const struct seq_operations nfs_exports_op = {
1532         .start  = e_start,
1533         .next   = e_next,
1534         .stop   = e_stop,
1535         .show   = e_show,
1536 };
1537
1538 /*
1539  * Add or modify a client.
1540  * Change requests may involve the list of host addresses. The list of
1541  * exports and possibly existing uid maps are left untouched.
1542  */
1543 int
1544 exp_addclient(struct nfsctl_client *ncp)
1545 {
1546         struct auth_domain      *dom;
1547         int                     i, err;
1548         struct in6_addr addr6;
1549
1550         /* First, consistency check. */
1551         err = -EINVAL;
1552         if (! exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1553                 goto out;
1554         if (ncp->cl_naddr > NFSCLNT_ADDRMAX)
1555                 goto out;
1556
1557         /* Lock the hashtable */
1558         exp_writelock();
1559
1560         dom = unix_domain_find(ncp->cl_ident);
1561
1562         err = -ENOMEM;
1563         if (!dom)
1564                 goto out_unlock;
1565
1566         /* Insert client into hashtable. */
1567         for (i = 0; i < ncp->cl_naddr; i++) {
1568                 ipv6_addr_set_v4mapped(ncp->cl_addrlist[i].s_addr, &addr6);
1569                 auth_unix_add_addr(&addr6, dom);
1570         }
1571         auth_unix_forget_old(dom);
1572         auth_domain_put(dom);
1573
1574         err = 0;
1575
1576 out_unlock:
1577         exp_writeunlock();
1578 out:
1579         return err;
1580 }
1581
1582 /*
1583  * Delete a client given an identifier.
1584  */
1585 int
1586 exp_delclient(struct nfsctl_client *ncp)
1587 {
1588         int             err;
1589         struct auth_domain *dom;
1590
1591         err = -EINVAL;
1592         if (!exp_verify_string(ncp->cl_ident, NFSCLNT_IDMAX))
1593                 goto out;
1594
1595         /* Lock the hashtable */
1596         exp_writelock();
1597
1598         dom = auth_domain_find(ncp->cl_ident);
1599         /* just make sure that no addresses work 
1600          * and that it will expire soon 
1601          */
1602         if (dom) {
1603                 err = auth_unix_forget_old(dom);
1604                 auth_domain_put(dom);
1605         }
1606
1607         exp_writeunlock();
1608 out:
1609         return err;
1610 }
1611
1612 /*
1613  * Verify that string is non-empty and does not exceed max length.
1614  */
1615 static int
1616 exp_verify_string(char *cp, int max)
1617 {
1618         int     i;
1619
1620         for (i = 0; i < max; i++)
1621                 if (!cp[i])
1622                         return i;
1623         cp[i] = 0;
1624         printk(KERN_NOTICE "nfsd: couldn't validate string %s\n", cp);
1625         return 0;
1626 }
1627
1628 /*
1629  * Initialize the exports module.
1630  */
1631 int
1632 nfsd_export_init(void)
1633 {
1634         int rv;
1635         dprintk("nfsd: initializing export module.\n");
1636
1637         rv = cache_register(&svc_export_cache);
1638         if (rv)
1639                 return rv;
1640         rv = cache_register(&svc_expkey_cache);
1641         if (rv)
1642                 cache_unregister(&svc_export_cache);
1643         return rv;
1644
1645 }
1646
1647 /*
1648  * Flush exports table - called when last nfsd thread is killed
1649  */
1650 void
1651 nfsd_export_flush(void)
1652 {
1653         exp_writelock();
1654         cache_purge(&svc_expkey_cache);
1655         cache_purge(&svc_export_cache);
1656         exp_writeunlock();
1657 }
1658
1659 /*
1660  * Shutdown the exports module.
1661  */
1662 void
1663 nfsd_export_shutdown(void)
1664 {
1665
1666         dprintk("nfsd: shutting down export module.\n");
1667
1668         exp_writelock();
1669
1670         cache_unregister(&svc_expkey_cache);
1671         cache_unregister(&svc_export_cache);
1672         svcauth_unix_purge();
1673
1674         exp_writeunlock();
1675         dprintk("nfsd: export shutdown complete.\n");
1676 }