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