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