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