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