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