nfsd4: rearrange struct nfsd4_slot
[linux-2.6.git] / fs / nfsd / export.c
1 /*
2  * NFS exporting and validation.
3  *
4  * We maintain a list of clients, each of which has a list of
5  * exports. To export an fs to a given client, you first have
6  * to create the client entry with NFSCTL_ADDCLIENT, which
7  * creates a client control block and adds it to the hash
8  * table. Then, you call NFSCTL_EXPORT for each fs.
9  *
10  *
11  * Copyright (C) 1995, 1996 Olaf Kirch, <okir@monad.swb.de>
12  */
13
14 #include <linux/slab.h>
15 #include <linux/namei.h>
16 #include <linux/module.h>
17 #include <linux/exportfs.h>
18
19 #include <net/ipv6.h>
20
21 #include "nfsd.h"
22 #include "nfsfh.h"
23
24 #define NFSDDBG_FACILITY        NFSDDBG_EXPORT
25
26 typedef struct auth_domain      svc_client;
27 typedef struct svc_export       svc_export;
28
29 /*
30  * We have two caches.
31  * One maps client+vfsmnt+dentry to export options - the export map
32  * The other maps client+filehandle-fragment to export options. - the expkey map
33  *
34  * The export options are actually stored in the first map, and the
35  * second map contains a reference to the entry in the first map.
36  */
37
38 #define EXPKEY_HASHBITS         8
39 #define EXPKEY_HASHMAX          (1 << EXPKEY_HASHBITS)
40 #define EXPKEY_HASHMASK         (EXPKEY_HASHMAX -1)
41 static struct cache_head *expkey_table[EXPKEY_HASHMAX];
42
43 static void expkey_put(struct kref *ref)
44 {
45         struct svc_expkey *key = container_of(ref, struct svc_expkey, h.ref);
46
47         if (test_bit(CACHE_VALID, &key->h.flags) &&
48             !test_bit(CACHE_NEGATIVE, &key->h.flags))
49                 path_put(&key->ek_path);
50         auth_domain_put(key->ek_client);
51         kfree(key);
52 }
53
54 static void expkey_request(struct cache_detail *cd,
55                            struct cache_head *h,
56                            char **bpp, int *blen)
57 {
58         /* client fsidtype \xfsid */
59         struct svc_expkey *ek = container_of(h, struct svc_expkey, h);
60         char type[5];
61
62         qword_add(bpp, blen, ek->ek_client->name);
63         snprintf(type, 5, "%d", ek->ek_fsidtype);
64         qword_add(bpp, blen, type);
65         qword_addhex(bpp, blen, (char*)ek->ek_fsid, key_len(ek->ek_fsidtype));
66         (*bpp)[-1] = '\n';
67 }
68
69 static int expkey_upcall(struct cache_detail *cd, struct cache_head *h)
70 {
71         return sunrpc_cache_pipe_upcall(cd, h, expkey_request);
72 }
73
74 static struct svc_expkey *svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old);
75 static struct svc_expkey *svc_expkey_lookup(struct svc_expkey *);
76 static struct cache_detail svc_expkey_cache;
77
78 static int expkey_parse(struct cache_detail *cd, char *mesg, int mlen)
79 {
80         /* client fsidtype fsid [path] */
81         char *buf;
82         int len;
83         struct auth_domain *dom = NULL;
84         int err;
85         int fsidtype;
86         char *ep;
87         struct svc_expkey key;
88         struct svc_expkey *ek = NULL;
89
90         if (mesg[mlen - 1] != '\n')
91                 return -EINVAL;
92         mesg[mlen-1] = 0;
93
94         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
95         err = -ENOMEM;
96         if (!buf)
97                 goto out;
98
99         err = -EINVAL;
100         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
101                 goto out;
102
103         err = -ENOENT;
104         dom = auth_domain_find(buf);
105         if (!dom)
106                 goto out;
107         dprintk("found domain %s\n", buf);
108
109         err = -EINVAL;
110         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
111                 goto out;
112         fsidtype = simple_strtoul(buf, &ep, 10);
113         if (*ep)
114                 goto out;
115         dprintk("found fsidtype %d\n", fsidtype);
116         if (key_len(fsidtype)==0) /* invalid type */
117                 goto out;
118         if ((len=qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
119                 goto out;
120         dprintk("found fsid length %d\n", len);
121         if (len != key_len(fsidtype))
122                 goto out;
123
124         /* OK, we seem to have a valid key */
125         key.h.flags = 0;
126         key.h.expiry_time = get_expiry(&mesg);
127         if (key.h.expiry_time == 0)
128                 goto out;
129
130         key.ek_client = dom;    
131         key.ek_fsidtype = fsidtype;
132         memcpy(key.ek_fsid, buf, len);
133
134         ek = svc_expkey_lookup(&key);
135         err = -ENOMEM;
136         if (!ek)
137                 goto out;
138
139         /* now we want a pathname, or empty meaning NEGATIVE  */
140         err = -EINVAL;
141         len = qword_get(&mesg, buf, PAGE_SIZE);
142         if (len < 0)
143                 goto out;
144         dprintk("Path seems to be <%s>\n", buf);
145         err = 0;
146         if (len == 0) {
147                 set_bit(CACHE_NEGATIVE, &key.h.flags);
148                 ek = svc_expkey_update(&key, ek);
149                 if (!ek)
150                         err = -ENOMEM;
151         } else {
152                 err = kern_path(buf, 0, &key.ek_path);
153                 if (err)
154                         goto out;
155
156                 dprintk("Found the path %s\n", buf);
157
158                 ek = svc_expkey_update(&key, ek);
159                 if (!ek)
160                         err = -ENOMEM;
161                 path_put(&key.ek_path);
162         }
163         cache_flush();
164  out:
165         if (ek)
166                 cache_put(&ek->h, &svc_expkey_cache);
167         if (dom)
168                 auth_domain_put(dom);
169         kfree(buf);
170         return err;
171 }
172
173 static int expkey_show(struct seq_file *m,
174                        struct cache_detail *cd,
175                        struct cache_head *h)
176 {
177         struct svc_expkey *ek ;
178         int i;
179
180         if (h ==NULL) {
181                 seq_puts(m, "#domain fsidtype fsid [path]\n");
182                 return 0;
183         }
184         ek = container_of(h, struct svc_expkey, h);
185         seq_printf(m, "%s %d 0x", ek->ek_client->name,
186                    ek->ek_fsidtype);
187         for (i=0; i < key_len(ek->ek_fsidtype)/4; i++)
188                 seq_printf(m, "%08x", ek->ek_fsid[i]);
189         if (test_bit(CACHE_VALID, &h->flags) && 
190             !test_bit(CACHE_NEGATIVE, &h->flags)) {
191                 seq_printf(m, " ");
192                 seq_path(m, &ek->ek_path, "\\ \t\n");
193         }
194         seq_printf(m, "\n");
195         return 0;
196 }
197
198 static inline int expkey_match (struct cache_head *a, struct cache_head *b)
199 {
200         struct svc_expkey *orig = container_of(a, struct svc_expkey, h);
201         struct svc_expkey *new = container_of(b, struct svc_expkey, h);
202
203         if (orig->ek_fsidtype != new->ek_fsidtype ||
204             orig->ek_client != new->ek_client ||
205             memcmp(orig->ek_fsid, new->ek_fsid, key_len(orig->ek_fsidtype)) != 0)
206                 return 0;
207         return 1;
208 }
209
210 static inline void expkey_init(struct cache_head *cnew,
211                                    struct cache_head *citem)
212 {
213         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
214         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
215
216         kref_get(&item->ek_client->ref);
217         new->ek_client = item->ek_client;
218         new->ek_fsidtype = item->ek_fsidtype;
219
220         memcpy(new->ek_fsid, item->ek_fsid, sizeof(new->ek_fsid));
221 }
222
223 static inline void expkey_update(struct cache_head *cnew,
224                                    struct cache_head *citem)
225 {
226         struct svc_expkey *new = container_of(cnew, struct svc_expkey, h);
227         struct svc_expkey *item = container_of(citem, struct svc_expkey, h);
228
229         new->ek_path = item->ek_path;
230         path_get(&item->ek_path);
231 }
232
233 static struct cache_head *expkey_alloc(void)
234 {
235         struct svc_expkey *i = kmalloc(sizeof(*i), GFP_KERNEL);
236         if (i)
237                 return &i->h;
238         else
239                 return NULL;
240 }
241
242 static struct cache_detail svc_expkey_cache = {
243         .owner          = THIS_MODULE,
244         .hash_size      = EXPKEY_HASHMAX,
245         .hash_table     = expkey_table,
246         .name           = "nfsd.fh",
247         .cache_put      = expkey_put,
248         .cache_upcall   = expkey_upcall,
249         .cache_parse    = expkey_parse,
250         .cache_show     = expkey_show,
251         .match          = expkey_match,
252         .init           = expkey_init,
253         .update         = expkey_update,
254         .alloc          = expkey_alloc,
255 };
256
257 static int
258 svc_expkey_hash(struct svc_expkey *item)
259 {
260         int hash = item->ek_fsidtype;
261         char * cp = (char*)item->ek_fsid;
262         int len = key_len(item->ek_fsidtype);
263
264         hash ^= hash_mem(cp, len, EXPKEY_HASHBITS);
265         hash ^= hash_ptr(item->ek_client, EXPKEY_HASHBITS);
266         hash &= EXPKEY_HASHMASK;
267         return hash;
268 }
269
270 static struct svc_expkey *
271 svc_expkey_lookup(struct svc_expkey *item)
272 {
273         struct cache_head *ch;
274         int hash = svc_expkey_hash(item);
275
276         ch = sunrpc_cache_lookup(&svc_expkey_cache, &item->h,
277                                  hash);
278         if (ch)
279                 return container_of(ch, struct svc_expkey, h);
280         else
281                 return NULL;
282 }
283
284 static struct svc_expkey *
285 svc_expkey_update(struct svc_expkey *new, struct svc_expkey *old)
286 {
287         struct cache_head *ch;
288         int hash = svc_expkey_hash(new);
289
290         ch = sunrpc_cache_update(&svc_expkey_cache, &new->h,
291                                  &old->h, hash);
292         if (ch)
293                 return container_of(ch, struct svc_expkey, h);
294         else
295                 return NULL;
296 }
297
298
299 #define EXPORT_HASHBITS         8
300 #define EXPORT_HASHMAX          (1<< EXPORT_HASHBITS)
301
302 static struct cache_head *export_table[EXPORT_HASHMAX];
303
304 static void nfsd4_fslocs_free(struct nfsd4_fs_locations *fsloc)
305 {
306         int i;
307
308         for (i = 0; i < fsloc->locations_count; i++) {
309                 kfree(fsloc->locations[i].path);
310                 kfree(fsloc->locations[i].hosts);
311         }
312         kfree(fsloc->locations);
313 }
314
315 static void svc_export_put(struct kref *ref)
316 {
317         struct svc_export *exp = container_of(ref, struct svc_export, h.ref);
318         path_put(&exp->ex_path);
319         auth_domain_put(exp->ex_client);
320         nfsd4_fslocs_free(&exp->ex_fslocs);
321         kfree(exp);
322 }
323
324 static void svc_export_request(struct cache_detail *cd,
325                                struct cache_head *h,
326                                char **bpp, int *blen)
327 {
328         /*  client path */
329         struct svc_export *exp = container_of(h, struct svc_export, h);
330         char *pth;
331
332         qword_add(bpp, blen, exp->ex_client->name);
333         pth = d_path(&exp->ex_path, *bpp, *blen);
334         if (IS_ERR(pth)) {
335                 /* is this correct? */
336                 (*bpp)[0] = '\n';
337                 return;
338         }
339         qword_add(bpp, blen, pth);
340         (*bpp)[-1] = '\n';
341 }
342
343 static int svc_export_upcall(struct cache_detail *cd, struct cache_head *h)
344 {
345         return sunrpc_cache_pipe_upcall(cd, h, svc_export_request);
346 }
347
348 static struct svc_export *svc_export_update(struct svc_export *new,
349                                             struct svc_export *old);
350 static struct svc_export *svc_export_lookup(struct svc_export *);
351
352 static int check_export(struct inode *inode, int *flags, unsigned char *uuid)
353 {
354
355         /*
356          * We currently export only dirs, regular files, and (for v4
357          * pseudoroot) symlinks.
358          */
359         if (!S_ISDIR(inode->i_mode) &&
360             !S_ISLNK(inode->i_mode) &&
361             !S_ISREG(inode->i_mode))
362                 return -ENOTDIR;
363
364         /*
365          * Mountd should never pass down a writeable V4ROOT export, but,
366          * just to make sure:
367          */
368         if (*flags & NFSEXP_V4ROOT)
369                 *flags |= NFSEXP_READONLY;
370
371         /* There are two requirements on a filesystem to be exportable.
372          * 1:  We must be able to identify the filesystem from a number.
373          *       either a device number (so FS_REQUIRES_DEV needed)
374          *       or an FSID number (so NFSEXP_FSID or ->uuid is needed).
375          * 2:  We must be able to find an inode from a filehandle.
376          *       This means that s_export_op must be set.
377          */
378         if (!(inode->i_sb->s_type->fs_flags & FS_REQUIRES_DEV) &&
379             !(*flags & NFSEXP_FSID) &&
380             uuid == NULL) {
381                 dprintk("exp_export: export of non-dev fs without fsid\n");
382                 return -EINVAL;
383         }
384
385         if (!inode->i_sb->s_export_op ||
386             !inode->i_sb->s_export_op->fh_to_dentry) {
387                 dprintk("exp_export: export of invalid fs type.\n");
388                 return -EINVAL;
389         }
390
391         return 0;
392
393 }
394
395 #ifdef CONFIG_NFSD_V4
396
397 static int
398 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc)
399 {
400         int len;
401         int migrated, i, err;
402
403         /* listsize */
404         err = get_int(mesg, &fsloc->locations_count);
405         if (err)
406                 return err;
407         if (fsloc->locations_count > MAX_FS_LOCATIONS)
408                 return -EINVAL;
409         if (fsloc->locations_count == 0)
410                 return 0;
411
412         fsloc->locations = kzalloc(fsloc->locations_count
413                         * sizeof(struct nfsd4_fs_location), GFP_KERNEL);
414         if (!fsloc->locations)
415                 return -ENOMEM;
416         for (i=0; i < fsloc->locations_count; i++) {
417                 /* colon separated host list */
418                 err = -EINVAL;
419                 len = qword_get(mesg, buf, PAGE_SIZE);
420                 if (len <= 0)
421                         goto out_free_all;
422                 err = -ENOMEM;
423                 fsloc->locations[i].hosts = kstrdup(buf, GFP_KERNEL);
424                 if (!fsloc->locations[i].hosts)
425                         goto out_free_all;
426                 err = -EINVAL;
427                 /* slash separated path component list */
428                 len = qword_get(mesg, buf, PAGE_SIZE);
429                 if (len <= 0)
430                         goto out_free_all;
431                 err = -ENOMEM;
432                 fsloc->locations[i].path = kstrdup(buf, GFP_KERNEL);
433                 if (!fsloc->locations[i].path)
434                         goto out_free_all;
435         }
436         /* migrated */
437         err = get_int(mesg, &migrated);
438         if (err)
439                 goto out_free_all;
440         err = -EINVAL;
441         if (migrated < 0 || migrated > 1)
442                 goto out_free_all;
443         fsloc->migrated = migrated;
444         return 0;
445 out_free_all:
446         nfsd4_fslocs_free(fsloc);
447         return err;
448 }
449
450 static int secinfo_parse(char **mesg, char *buf, struct svc_export *exp)
451 {
452         int listsize, err;
453         struct exp_flavor_info *f;
454
455         err = get_int(mesg, &listsize);
456         if (err)
457                 return err;
458         if (listsize < 0 || listsize > MAX_SECINFO_LIST)
459                 return -EINVAL;
460
461         for (f = exp->ex_flavors; f < exp->ex_flavors + listsize; f++) {
462                 err = get_int(mesg, &f->pseudoflavor);
463                 if (err)
464                         return err;
465                 /*
466                  * XXX: It would be nice to also check whether this
467                  * pseudoflavor is supported, so we can discover the
468                  * problem at export time instead of when a client fails
469                  * to authenticate.
470                  */
471                 err = get_int(mesg, &f->flags);
472                 if (err)
473                         return err;
474                 /* Only some flags are allowed to differ between flavors: */
475                 if (~NFSEXP_SECINFO_FLAGS & (f->flags ^ exp->ex_flags))
476                         return -EINVAL;
477         }
478         exp->ex_nflavors = listsize;
479         return 0;
480 }
481
482 #else /* CONFIG_NFSD_V4 */
483 static inline int
484 fsloc_parse(char **mesg, char *buf, struct nfsd4_fs_locations *fsloc){return 0;}
485 static inline int
486 secinfo_parse(char **mesg, char *buf, struct svc_export *exp) { return 0; }
487 #endif
488
489 static int svc_export_parse(struct cache_detail *cd, char *mesg, int mlen)
490 {
491         /* client path expiry [flags anonuid anongid fsid] */
492         char *buf;
493         int len;
494         int err;
495         struct auth_domain *dom = NULL;
496         struct svc_export exp = {}, *expp;
497         int an_int;
498
499         if (mesg[mlen-1] != '\n')
500                 return -EINVAL;
501         mesg[mlen-1] = 0;
502
503         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
504         if (!buf)
505                 return -ENOMEM;
506
507         /* client */
508         err = -EINVAL;
509         len = qword_get(&mesg, buf, PAGE_SIZE);
510         if (len <= 0)
511                 goto out;
512
513         err = -ENOENT;
514         dom = auth_domain_find(buf);
515         if (!dom)
516                 goto out;
517
518         /* path */
519         err = -EINVAL;
520         if ((len = qword_get(&mesg, buf, PAGE_SIZE)) <= 0)
521                 goto out1;
522
523         err = kern_path(buf, 0, &exp.ex_path);
524         if (err)
525                 goto out1;
526
527         exp.ex_client = dom;
528
529         /* expiry */
530         err = -EINVAL;
531         exp.h.expiry_time = get_expiry(&mesg);
532         if (exp.h.expiry_time == 0)
533                 goto out3;
534
535         /* flags */
536         err = get_int(&mesg, &an_int);
537         if (err == -ENOENT) {
538                 err = 0;
539                 set_bit(CACHE_NEGATIVE, &exp.h.flags);
540         } else {
541                 if (err || an_int < 0)
542                         goto out3;
543                 exp.ex_flags= an_int;
544         
545                 /* anon uid */
546                 err = get_int(&mesg, &an_int);
547                 if (err)
548                         goto out3;
549                 exp.ex_anon_uid= an_int;
550
551                 /* anon gid */
552                 err = get_int(&mesg, &an_int);
553                 if (err)
554                         goto out3;
555                 exp.ex_anon_gid= an_int;
556
557                 /* fsid */
558                 err = get_int(&mesg, &an_int);
559                 if (err)
560                         goto out3;
561                 exp.ex_fsid = an_int;
562
563                 while ((len = qword_get(&mesg, buf, PAGE_SIZE)) > 0) {
564                         if (strcmp(buf, "fsloc") == 0)
565                                 err = fsloc_parse(&mesg, buf, &exp.ex_fslocs);
566                         else if (strcmp(buf, "uuid") == 0) {
567                                 /* expect a 16 byte uuid encoded as \xXXXX... */
568                                 len = qword_get(&mesg, buf, PAGE_SIZE);
569                                 if (len != 16)
570                                         err  = -EINVAL;
571                                 else {
572                                         exp.ex_uuid =
573                                                 kmemdup(buf, 16, GFP_KERNEL);
574                                         if (exp.ex_uuid == NULL)
575                                                 err = -ENOMEM;
576                                 }
577                         } else if (strcmp(buf, "secinfo") == 0)
578                                 err = secinfo_parse(&mesg, buf, &exp);
579                         else
580                                 /* quietly ignore unknown words and anything
581                                  * following. Newer user-space can try to set
582                                  * new values, then see what the result was.
583                                  */
584                                 break;
585                         if (err)
586                                 goto out4;
587                 }
588
589                 err = check_export(exp.ex_path.dentry->d_inode, &exp.ex_flags,
590                                    exp.ex_uuid);
591                 if (err)
592                         goto out4;
593         }
594
595         expp = svc_export_lookup(&exp);
596         if (expp)
597                 expp = svc_export_update(&exp, expp);
598         else
599                 err = -ENOMEM;
600         cache_flush();
601         if (expp == NULL)
602                 err = -ENOMEM;
603         else
604                 exp_put(expp);
605 out4:
606         nfsd4_fslocs_free(&exp.ex_fslocs);
607         kfree(exp.ex_uuid);
608 out3:
609         path_put(&exp.ex_path);
610 out1:
611         auth_domain_put(dom);
612 out:
613         kfree(buf);
614         return err;
615 }
616
617 static void exp_flags(struct seq_file *m, int flag, int fsid,
618                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fslocs);
619 static void show_secinfo(struct seq_file *m, struct svc_export *exp);
620
621 static int svc_export_show(struct seq_file *m,
622                            struct cache_detail *cd,
623                            struct cache_head *h)
624 {
625         struct svc_export *exp ;
626
627         if (h ==NULL) {
628                 seq_puts(m, "#path domain(flags)\n");
629                 return 0;
630         }
631         exp = container_of(h, struct svc_export, h);
632         seq_path(m, &exp->ex_path, " \t\n\\");
633         seq_putc(m, '\t');
634         seq_escape(m, exp->ex_client->name, " \t\n\\");
635         seq_putc(m, '(');
636         if (test_bit(CACHE_VALID, &h->flags) && 
637             !test_bit(CACHE_NEGATIVE, &h->flags)) {
638                 exp_flags(m, exp->ex_flags, exp->ex_fsid,
639                           exp->ex_anon_uid, exp->ex_anon_gid, &exp->ex_fslocs);
640                 if (exp->ex_uuid) {
641                         int i;
642                         seq_puts(m, ",uuid=");
643                         for (i=0; i<16; i++) {
644                                 if ((i&3) == 0 && i)
645                                         seq_putc(m, ':');
646                                 seq_printf(m, "%02x", exp->ex_uuid[i]);
647                         }
648                 }
649                 show_secinfo(m, exp);
650         }
651         seq_puts(m, ")\n");
652         return 0;
653 }
654 static int svc_export_match(struct cache_head *a, struct cache_head *b)
655 {
656         struct svc_export *orig = container_of(a, struct svc_export, h);
657         struct svc_export *new = container_of(b, struct svc_export, h);
658         return orig->ex_client == new->ex_client &&
659                 orig->ex_path.dentry == new->ex_path.dentry &&
660                 orig->ex_path.mnt == new->ex_path.mnt;
661 }
662
663 static void svc_export_init(struct cache_head *cnew, struct cache_head *citem)
664 {
665         struct svc_export *new = container_of(cnew, struct svc_export, h);
666         struct svc_export *item = container_of(citem, struct svc_export, h);
667
668         kref_get(&item->ex_client->ref);
669         new->ex_client = item->ex_client;
670         new->ex_path.dentry = dget(item->ex_path.dentry);
671         new->ex_path.mnt = mntget(item->ex_path.mnt);
672         new->ex_fslocs.locations = NULL;
673         new->ex_fslocs.locations_count = 0;
674         new->ex_fslocs.migrated = 0;
675 }
676
677 static void export_update(struct cache_head *cnew, struct cache_head *citem)
678 {
679         struct svc_export *new = container_of(cnew, struct svc_export, h);
680         struct svc_export *item = container_of(citem, struct svc_export, h);
681         int i;
682
683         new->ex_flags = item->ex_flags;
684         new->ex_anon_uid = item->ex_anon_uid;
685         new->ex_anon_gid = item->ex_anon_gid;
686         new->ex_fsid = item->ex_fsid;
687         new->ex_uuid = item->ex_uuid;
688         item->ex_uuid = NULL;
689         new->ex_fslocs.locations = item->ex_fslocs.locations;
690         item->ex_fslocs.locations = NULL;
691         new->ex_fslocs.locations_count = item->ex_fslocs.locations_count;
692         item->ex_fslocs.locations_count = 0;
693         new->ex_fslocs.migrated = item->ex_fslocs.migrated;
694         item->ex_fslocs.migrated = 0;
695         new->ex_nflavors = item->ex_nflavors;
696         for (i = 0; i < MAX_SECINFO_LIST; i++) {
697                 new->ex_flavors[i] = item->ex_flavors[i];
698         }
699 }
700
701 static struct cache_head *svc_export_alloc(void)
702 {
703         struct svc_export *i = kmalloc(sizeof(*i), GFP_KERNEL);
704         if (i)
705                 return &i->h;
706         else
707                 return NULL;
708 }
709
710 struct cache_detail svc_export_cache = {
711         .owner          = THIS_MODULE,
712         .hash_size      = EXPORT_HASHMAX,
713         .hash_table     = export_table,
714         .name           = "nfsd.export",
715         .cache_put      = svc_export_put,
716         .cache_upcall   = svc_export_upcall,
717         .cache_parse    = svc_export_parse,
718         .cache_show     = svc_export_show,
719         .match          = svc_export_match,
720         .init           = svc_export_init,
721         .update         = export_update,
722         .alloc          = svc_export_alloc,
723 };
724
725 static int
726 svc_export_hash(struct svc_export *exp)
727 {
728         int hash;
729
730         hash = hash_ptr(exp->ex_client, EXPORT_HASHBITS);
731         hash ^= hash_ptr(exp->ex_path.dentry, EXPORT_HASHBITS);
732         hash ^= hash_ptr(exp->ex_path.mnt, EXPORT_HASHBITS);
733         return hash;
734 }
735
736 static struct svc_export *
737 svc_export_lookup(struct svc_export *exp)
738 {
739         struct cache_head *ch;
740         int hash = svc_export_hash(exp);
741
742         ch = sunrpc_cache_lookup(&svc_export_cache, &exp->h,
743                                  hash);
744         if (ch)
745                 return container_of(ch, struct svc_export, h);
746         else
747                 return NULL;
748 }
749
750 static struct svc_export *
751 svc_export_update(struct svc_export *new, struct svc_export *old)
752 {
753         struct cache_head *ch;
754         int hash = svc_export_hash(old);
755
756         ch = sunrpc_cache_update(&svc_export_cache, &new->h,
757                                  &old->h,
758                                  hash);
759         if (ch)
760                 return container_of(ch, struct svc_export, h);
761         else
762                 return NULL;
763 }
764
765
766 static struct svc_expkey *
767 exp_find_key(svc_client *clp, int fsid_type, u32 *fsidv, struct cache_req *reqp)
768 {
769         struct svc_expkey key, *ek;
770         int err;
771         
772         if (!clp)
773                 return ERR_PTR(-ENOENT);
774
775         key.ek_client = clp;
776         key.ek_fsidtype = fsid_type;
777         memcpy(key.ek_fsid, fsidv, key_len(fsid_type));
778
779         ek = svc_expkey_lookup(&key);
780         if (ek == NULL)
781                 return ERR_PTR(-ENOMEM);
782         err = cache_check(&svc_expkey_cache, &ek->h, reqp);
783         if (err)
784                 return ERR_PTR(err);
785         return ek;
786 }
787
788
789 static svc_export *exp_get_by_name(svc_client *clp, const struct path *path,
790                                      struct cache_req *reqp)
791 {
792         struct svc_export *exp, key;
793         int err;
794
795         if (!clp)
796                 return ERR_PTR(-ENOENT);
797
798         key.ex_client = clp;
799         key.ex_path = *path;
800
801         exp = svc_export_lookup(&key);
802         if (exp == NULL)
803                 return ERR_PTR(-ENOMEM);
804         err = cache_check(&svc_export_cache, &exp->h, reqp);
805         if (err)
806                 return ERR_PTR(err);
807         return exp;
808 }
809
810 /*
811  * Find the export entry for a given dentry.
812  */
813 static struct svc_export *exp_parent(svc_client *clp, struct path *path)
814 {
815         struct dentry *saved = dget(path->dentry);
816         svc_export *exp = exp_get_by_name(clp, path, NULL);
817
818         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
819                 struct dentry *parent = dget_parent(path->dentry);
820                 dput(path->dentry);
821                 path->dentry = parent;
822                 exp = exp_get_by_name(clp, path, NULL);
823         }
824         dput(path->dentry);
825         path->dentry = saved;
826         return exp;
827 }
828
829
830
831 /*
832  * Obtain the root fh on behalf of a client.
833  * This could be done in user space, but I feel that it adds some safety
834  * since its harder to fool a kernel module than a user space program.
835  */
836 int
837 exp_rootfh(svc_client *clp, char *name, struct knfsd_fh *f, int maxsize)
838 {
839         struct svc_export       *exp;
840         struct path             path;
841         struct inode            *inode;
842         struct svc_fh           fh;
843         int                     err;
844
845         err = -EPERM;
846         /* NB: we probably ought to check that it's NUL-terminated */
847         if (kern_path(name, 0, &path)) {
848                 printk("nfsd: exp_rootfh path not found %s", name);
849                 return err;
850         }
851         inode = path.dentry->d_inode;
852
853         dprintk("nfsd: exp_rootfh(%s [%p] %s:%s/%ld)\n",
854                  name, path.dentry, clp->name,
855                  inode->i_sb->s_id, inode->i_ino);
856         exp = exp_parent(clp, &path);
857         if (IS_ERR(exp)) {
858                 err = PTR_ERR(exp);
859                 goto out;
860         }
861
862         /*
863          * fh must be initialized before calling fh_compose
864          */
865         fh_init(&fh, maxsize);
866         if (fh_compose(&fh, exp, path.dentry, NULL))
867                 err = -EINVAL;
868         else
869                 err = 0;
870         memcpy(f, &fh.fh_handle, sizeof(struct knfsd_fh));
871         fh_put(&fh);
872         exp_put(exp);
873 out:
874         path_put(&path);
875         return err;
876 }
877
878 static struct svc_export *exp_find(struct auth_domain *clp, int fsid_type,
879                                    u32 *fsidv, struct cache_req *reqp)
880 {
881         struct svc_export *exp;
882         struct svc_expkey *ek = exp_find_key(clp, fsid_type, fsidv, reqp);
883         if (IS_ERR(ek))
884                 return ERR_CAST(ek);
885
886         exp = exp_get_by_name(clp, &ek->ek_path, reqp);
887         cache_put(&ek->h, &svc_expkey_cache);
888
889         if (IS_ERR(exp))
890                 return ERR_CAST(exp);
891         return exp;
892 }
893
894 __be32 check_nfsd_access(struct svc_export *exp, struct svc_rqst *rqstp)
895 {
896         struct exp_flavor_info *f;
897         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
898
899         /* legacy gss-only clients are always OK: */
900         if (exp->ex_client == rqstp->rq_gssclient)
901                 return 0;
902         /* ip-address based client; check sec= export option: */
903         for (f = exp->ex_flavors; f < end; f++) {
904                 if (f->pseudoflavor == rqstp->rq_flavor)
905                         return 0;
906         }
907         /* defaults in absence of sec= options: */
908         if (exp->ex_nflavors == 0) {
909                 if (rqstp->rq_flavor == RPC_AUTH_NULL ||
910                     rqstp->rq_flavor == RPC_AUTH_UNIX)
911                         return 0;
912         }
913         return nfserr_wrongsec;
914 }
915
916 /*
917  * Uses rq_client and rq_gssclient to find an export; uses rq_client (an
918  * auth_unix client) if it's available and has secinfo information;
919  * otherwise, will try to use rq_gssclient.
920  *
921  * Called from functions that handle requests; functions that do work on
922  * behalf of mountd are passed a single client name to use, and should
923  * use exp_get_by_name() or exp_find().
924  */
925 struct svc_export *
926 rqst_exp_get_by_name(struct svc_rqst *rqstp, struct path *path)
927 {
928         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
929
930         if (rqstp->rq_client == NULL)
931                 goto gss;
932
933         /* First try the auth_unix client: */
934         exp = exp_get_by_name(rqstp->rq_client, path, &rqstp->rq_chandle);
935         if (PTR_ERR(exp) == -ENOENT)
936                 goto gss;
937         if (IS_ERR(exp))
938                 return exp;
939         /* If it has secinfo, assume there are no gss/... clients */
940         if (exp->ex_nflavors > 0)
941                 return exp;
942 gss:
943         /* Otherwise, try falling back on gss client */
944         if (rqstp->rq_gssclient == NULL)
945                 return exp;
946         gssexp = exp_get_by_name(rqstp->rq_gssclient, path, &rqstp->rq_chandle);
947         if (PTR_ERR(gssexp) == -ENOENT)
948                 return exp;
949         if (!IS_ERR(exp))
950                 exp_put(exp);
951         return gssexp;
952 }
953
954 struct svc_export *
955 rqst_exp_find(struct svc_rqst *rqstp, int fsid_type, u32 *fsidv)
956 {
957         struct svc_export *gssexp, *exp = ERR_PTR(-ENOENT);
958
959         if (rqstp->rq_client == NULL)
960                 goto gss;
961
962         /* First try the auth_unix client: */
963         exp = exp_find(rqstp->rq_client, fsid_type, fsidv, &rqstp->rq_chandle);
964         if (PTR_ERR(exp) == -ENOENT)
965                 goto gss;
966         if (IS_ERR(exp))
967                 return exp;
968         /* If it has secinfo, assume there are no gss/... clients */
969         if (exp->ex_nflavors > 0)
970                 return exp;
971 gss:
972         /* Otherwise, try falling back on gss client */
973         if (rqstp->rq_gssclient == NULL)
974                 return exp;
975         gssexp = exp_find(rqstp->rq_gssclient, fsid_type, fsidv,
976                                                 &rqstp->rq_chandle);
977         if (PTR_ERR(gssexp) == -ENOENT)
978                 return exp;
979         if (!IS_ERR(exp))
980                 exp_put(exp);
981         return gssexp;
982 }
983
984 struct svc_export *
985 rqst_exp_parent(struct svc_rqst *rqstp, struct path *path)
986 {
987         struct dentry *saved = dget(path->dentry);
988         struct svc_export *exp = rqst_exp_get_by_name(rqstp, path);
989
990         while (PTR_ERR(exp) == -ENOENT && !IS_ROOT(path->dentry)) {
991                 struct dentry *parent = dget_parent(path->dentry);
992                 dput(path->dentry);
993                 path->dentry = parent;
994                 exp = rqst_exp_get_by_name(rqstp, path);
995         }
996         dput(path->dentry);
997         path->dentry = saved;
998         return exp;
999 }
1000
1001 struct svc_export *rqst_find_fsidzero_export(struct svc_rqst *rqstp)
1002 {
1003         u32 fsidv[2];
1004
1005         mk_fsid(FSID_NUM, fsidv, 0, 0, 0, NULL);
1006
1007         return rqst_exp_find(rqstp, FSID_NUM, fsidv);
1008 }
1009
1010 /*
1011  * Called when we need the filehandle for the root of the pseudofs,
1012  * for a given NFSv4 client.   The root is defined to be the
1013  * export point with fsid==0
1014  */
1015 __be32
1016 exp_pseudoroot(struct svc_rqst *rqstp, struct svc_fh *fhp)
1017 {
1018         struct svc_export *exp;
1019         __be32 rv;
1020
1021         exp = rqst_find_fsidzero_export(rqstp);
1022         if (IS_ERR(exp))
1023                 return nfserrno(PTR_ERR(exp));
1024         rv = fh_compose(fhp, exp, exp->ex_path.dentry, NULL);
1025         exp_put(exp);
1026         return rv;
1027 }
1028
1029 /* Iterator */
1030
1031 static void *e_start(struct seq_file *m, loff_t *pos)
1032         __acquires(svc_export_cache.hash_lock)
1033 {
1034         loff_t n = *pos;
1035         unsigned hash, export;
1036         struct cache_head *ch;
1037         
1038         read_lock(&svc_export_cache.hash_lock);
1039         if (!n--)
1040                 return SEQ_START_TOKEN;
1041         hash = n >> 32;
1042         export = n & ((1LL<<32) - 1);
1043
1044         
1045         for (ch=export_table[hash]; ch; ch=ch->next)
1046                 if (!export--)
1047                         return ch;
1048         n &= ~((1LL<<32) - 1);
1049         do {
1050                 hash++;
1051                 n += 1LL<<32;
1052         } while(hash < EXPORT_HASHMAX && export_table[hash]==NULL);
1053         if (hash >= EXPORT_HASHMAX)
1054                 return NULL;
1055         *pos = n+1;
1056         return export_table[hash];
1057 }
1058
1059 static void *e_next(struct seq_file *m, void *p, loff_t *pos)
1060 {
1061         struct cache_head *ch = p;
1062         int hash = (*pos >> 32);
1063
1064         if (p == SEQ_START_TOKEN)
1065                 hash = 0;
1066         else if (ch->next == NULL) {
1067                 hash++;
1068                 *pos += 1LL<<32;
1069         } else {
1070                 ++*pos;
1071                 return ch->next;
1072         }
1073         *pos &= ~((1LL<<32) - 1);
1074         while (hash < EXPORT_HASHMAX && export_table[hash] == NULL) {
1075                 hash++;
1076                 *pos += 1LL<<32;
1077         }
1078         if (hash >= EXPORT_HASHMAX)
1079                 return NULL;
1080         ++*pos;
1081         return export_table[hash];
1082 }
1083
1084 static void e_stop(struct seq_file *m, void *p)
1085         __releases(svc_export_cache.hash_lock)
1086 {
1087         read_unlock(&svc_export_cache.hash_lock);
1088 }
1089
1090 static struct flags {
1091         int flag;
1092         char *name[2];
1093 } expflags[] = {
1094         { NFSEXP_READONLY, {"ro", "rw"}},
1095         { NFSEXP_INSECURE_PORT, {"insecure", ""}},
1096         { NFSEXP_ROOTSQUASH, {"root_squash", "no_root_squash"}},
1097         { NFSEXP_ALLSQUASH, {"all_squash", ""}},
1098         { NFSEXP_ASYNC, {"async", "sync"}},
1099         { NFSEXP_GATHERED_WRITES, {"wdelay", "no_wdelay"}},
1100         { NFSEXP_NOHIDE, {"nohide", ""}},
1101         { NFSEXP_CROSSMOUNT, {"crossmnt", ""}},
1102         { NFSEXP_NOSUBTREECHECK, {"no_subtree_check", ""}},
1103         { NFSEXP_NOAUTHNLM, {"insecure_locks", ""}},
1104         { NFSEXP_V4ROOT, {"v4root", ""}},
1105         { 0, {"", ""}}
1106 };
1107
1108 static void show_expflags(struct seq_file *m, int flags, int mask)
1109 {
1110         struct flags *flg;
1111         int state, first = 0;
1112
1113         for (flg = expflags; flg->flag; flg++) {
1114                 if (flg->flag & ~mask)
1115                         continue;
1116                 state = (flg->flag & flags) ? 0 : 1;
1117                 if (*flg->name[state])
1118                         seq_printf(m, "%s%s", first++?",":"", flg->name[state]);
1119         }
1120 }
1121
1122 static void show_secinfo_flags(struct seq_file *m, int flags)
1123 {
1124         seq_printf(m, ",");
1125         show_expflags(m, flags, NFSEXP_SECINFO_FLAGS);
1126 }
1127
1128 static bool secinfo_flags_equal(int f, int g)
1129 {
1130         f &= NFSEXP_SECINFO_FLAGS;
1131         g &= NFSEXP_SECINFO_FLAGS;
1132         return f == g;
1133 }
1134
1135 static int show_secinfo_run(struct seq_file *m, struct exp_flavor_info **fp, struct exp_flavor_info *end)
1136 {
1137         int flags;
1138
1139         flags = (*fp)->flags;
1140         seq_printf(m, ",sec=%d", (*fp)->pseudoflavor);
1141         (*fp)++;
1142         while (*fp != end && secinfo_flags_equal(flags, (*fp)->flags)) {
1143                 seq_printf(m, ":%d", (*fp)->pseudoflavor);
1144                 (*fp)++;
1145         }
1146         return flags;
1147 }
1148
1149 static void show_secinfo(struct seq_file *m, struct svc_export *exp)
1150 {
1151         struct exp_flavor_info *f;
1152         struct exp_flavor_info *end = exp->ex_flavors + exp->ex_nflavors;
1153         int flags;
1154
1155         if (exp->ex_nflavors == 0)
1156                 return;
1157         f = exp->ex_flavors;
1158         flags = show_secinfo_run(m, &f, end);
1159         if (!secinfo_flags_equal(flags, exp->ex_flags))
1160                 show_secinfo_flags(m, flags);
1161         while (f != end) {
1162                 flags = show_secinfo_run(m, &f, end);
1163                 show_secinfo_flags(m, flags);
1164         }
1165 }
1166
1167 static void exp_flags(struct seq_file *m, int flag, int fsid,
1168                 uid_t anonu, uid_t anong, struct nfsd4_fs_locations *fsloc)
1169 {
1170         show_expflags(m, flag, NFSEXP_ALLFLAGS);
1171         if (flag & NFSEXP_FSID)
1172                 seq_printf(m, ",fsid=%d", fsid);
1173         if (anonu != (uid_t)-2 && anonu != (0x10000-2))
1174                 seq_printf(m, ",anonuid=%u", anonu);
1175         if (anong != (gid_t)-2 && anong != (0x10000-2))
1176                 seq_printf(m, ",anongid=%u", anong);
1177         if (fsloc && fsloc->locations_count > 0) {
1178                 char *loctype = (fsloc->migrated) ? "refer" : "replicas";
1179                 int i;
1180
1181                 seq_printf(m, ",%s=", loctype);
1182                 seq_escape(m, fsloc->locations[0].path, ",;@ \t\n\\");
1183                 seq_putc(m, '@');
1184                 seq_escape(m, fsloc->locations[0].hosts, ",;@ \t\n\\");
1185                 for (i = 1; i < fsloc->locations_count; i++) {
1186                         seq_putc(m, ';');
1187                         seq_escape(m, fsloc->locations[i].path, ",;@ \t\n\\");
1188                         seq_putc(m, '@');
1189                         seq_escape(m, fsloc->locations[i].hosts, ",;@ \t\n\\");
1190                 }
1191         }
1192 }
1193
1194 static int e_show(struct seq_file *m, void *p)
1195 {
1196         struct cache_head *cp = p;
1197         struct svc_export *exp = container_of(cp, struct svc_export, h);
1198
1199         if (p == SEQ_START_TOKEN) {
1200                 seq_puts(m, "# Version 1.1\n");
1201                 seq_puts(m, "# Path Client(Flags) # IPs\n");
1202                 return 0;
1203         }
1204
1205         cache_get(&exp->h);
1206         if (cache_check(&svc_export_cache, &exp->h, NULL))
1207                 return 0;
1208         cache_put(&exp->h, &svc_export_cache);
1209         return svc_export_show(m, &svc_export_cache, cp);
1210 }
1211
1212 const struct seq_operations nfs_exports_op = {
1213         .start  = e_start,
1214         .next   = e_next,
1215         .stop   = e_stop,
1216         .show   = e_show,
1217 };
1218
1219
1220 /*
1221  * Initialize the exports module.
1222  */
1223 int
1224 nfsd_export_init(void)
1225 {
1226         int rv;
1227         dprintk("nfsd: initializing export module.\n");
1228
1229         rv = cache_register_net(&svc_export_cache, &init_net);
1230         if (rv)
1231                 return rv;
1232         rv = cache_register_net(&svc_expkey_cache, &init_net);
1233         if (rv)
1234                 cache_unregister_net(&svc_export_cache, &init_net);
1235         return rv;
1236
1237 }
1238
1239 /*
1240  * Flush exports table - called when last nfsd thread is killed
1241  */
1242 void
1243 nfsd_export_flush(void)
1244 {
1245         cache_purge(&svc_expkey_cache);
1246         cache_purge(&svc_export_cache);
1247 }
1248
1249 /*
1250  * Shutdown the exports module.
1251  */
1252 void
1253 nfsd_export_shutdown(void)
1254 {
1255
1256         dprintk("nfsd: shutting down export module.\n");
1257
1258         cache_unregister_net(&svc_expkey_cache, &init_net);
1259         cache_unregister_net(&svc_export_cache, &init_net);
1260         svcauth_unix_purge();
1261
1262         dprintk("nfsd: export shutdown complete.\n");
1263 }