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