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