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