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