nfs_export.c revision 1.25 1 /* $NetBSD: nfs_export.c,v 1.25 2007/02/04 15:03:20 chs Exp $ */
2
3 /*-
4 * Copyright (c) 1997, 1998, 2004, 2005 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 * NASA Ames Research Center.
10 * This code is derived from software contributed to The NetBSD Foundation
11 * by Charles M. Hannum.
12 * This code is derived from software contributed to The NetBSD Foundation
13 * by Julio M. Merino Vidal.
14 *
15 * Redistribution and use in source and binary forms, with or without
16 * modification, are permitted provided that the following conditions
17 * are met:
18 * 1. Redistributions of source code must retain the above copyright
19 * notice, this list of conditions and the following disclaimer.
20 * 2. Redistributions in binary form must reproduce the above copyright
21 * notice, this list of conditions and the following disclaimer in the
22 * documentation and/or other materials provided with the distribution.
23 * 3. All advertising materials mentioning features or use of this software
24 * must display the following acknowledgement:
25 * This product includes software developed by the NetBSD
26 * Foundation, Inc. and its contributors.
27 * 4. Neither the name of The NetBSD Foundation nor the names of its
28 * contributors may be used to endorse or promote products derived
29 * from this software without specific prior written permission.
30 *
31 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
32 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
33 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
34 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
35 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
36 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
37 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
38 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
39 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
40 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGE.
42 */
43
44 /*
45 * Copyright (c) 1989, 1993
46 * The Regents of the University of California. All rights reserved.
47 * (c) UNIX System Laboratories, Inc.
48 * All or some portions of this file are derived from material licensed
49 * to the University of California by American Telephone and Telegraph
50 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
51 * the permission of UNIX System Laboratories, Inc.
52 *
53 * Redistribution and use in source and binary forms, with or without
54 * modification, are permitted provided that the following conditions
55 * are met:
56 * 1. Redistributions of source code must retain the above copyright
57 * notice, this list of conditions and the following disclaimer.
58 * 2. Redistributions in binary form must reproduce the above copyright
59 * notice, this list of conditions and the following disclaimer in the
60 * documentation and/or other materials provided with the distribution.
61 * 3. Neither the name of the University nor the names of its contributors
62 * may be used to endorse or promote products derived from this software
63 * without specific prior written permission.
64 *
65 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
66 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
67 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
68 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
69 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
70 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
71 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
72 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
73 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
74 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
75 * SUCH DAMAGE.
76 *
77 * @(#)vfs_subr.c 8.13 (Berkeley) 4/18/94
78 */
79
80 /*
81 * VFS exports list management.
82 */
83
84 #include <sys/cdefs.h>
85 __KERNEL_RCSID(0, "$NetBSD: nfs_export.c,v 1.25 2007/02/04 15:03:20 chs Exp $");
86
87 #include "opt_compat_netbsd.h"
88 #include "opt_inet.h"
89
90 #include <sys/param.h>
91 #include <sys/systm.h>
92 #include <sys/queue.h>
93 #include <sys/proc.h>
94 #include <sys/mount.h>
95 #include <sys/vnode.h>
96 #include <sys/namei.h>
97 #include <sys/errno.h>
98 #include <sys/malloc.h>
99 #include <sys/domain.h>
100 #include <sys/mbuf.h>
101 #include <sys/dirent.h>
102 #include <sys/socket.h> /* XXX for AF_MAX */
103 #include <sys/kauth.h>
104
105 #include <net/radix.h>
106
107 #include <netinet/in.h>
108
109 #include <nfs/rpcv2.h>
110 #include <nfs/nfsproto.h>
111 #include <nfs/nfs.h>
112 #include <nfs/nfs_var.h>
113
114 /*
115 * Network address lookup element.
116 */
117 struct netcred {
118 struct radix_node netc_rnodes[2];
119 int netc_refcnt;
120 int netc_exflags;
121 kauth_cred_t netc_anon;
122 };
123
124 /*
125 * Network export information.
126 */
127 struct netexport {
128 CIRCLEQ_ENTRY(netexport) ne_list;
129 struct mount *ne_mount;
130 struct netcred ne_defexported; /* Default export */
131 struct radix_node_head *ne_rtable[AF_MAX+1]; /* Individual exports */
132 };
133 CIRCLEQ_HEAD(, netexport) netexport_list =
134 CIRCLEQ_HEAD_INITIALIZER(netexport_list);
135
136 /* Malloc type used by the mount<->netexport map. */
137 MALLOC_DEFINE(M_NFS_EXPORT, "nfs_export", "NFS export data");
138
139 /* Publicly exported file system. */
140 struct nfs_public nfs_pub;
141
142 /*
143 * Local prototypes.
144 */
145 static int init_exports(struct mount *, struct netexport **);
146 static int hang_addrlist(struct mount *, struct netexport *,
147 const struct export_args *);
148 static int sacheck(struct sockaddr *);
149 static int free_netcred(struct radix_node *, void *);
150 static int export(struct netexport *, const struct export_args *);
151 static int setpublicfs(struct mount *, struct netexport *,
152 const struct export_args *);
153 static struct netcred *netcred_lookup(struct netexport *, struct mbuf *);
154 static struct netexport *netexport_lookup(const struct mount *);
155 static struct netexport *netexport_lookup_byfsid(const fsid_t *);
156 static void netexport_clear(struct netexport *);
157 static void netexport_insert(struct netexport *);
158 static void netexport_remove(struct netexport *);
159 static void netexport_wrlock(void);
160 static void netexport_wrunlock(void);
161
162 /*
163 * PUBLIC INTERFACE
164 */
165
166 /*
167 * Declare and initialize the file system export hooks.
168 */
169 static void nfs_export_unmount(struct mount *);
170
171 struct vfs_hooks nfs_export_hooks = {
172 nfs_export_unmount
173 };
174 VFS_HOOKS_ATTACH(nfs_export_hooks);
175
176 /*
177 * VFS unmount hook for NFS exports.
178 *
179 * Releases NFS exports list resources if the given mount point has some.
180 * As allocation happens lazily, it may be that it doesn't has this
181 * information, although it theorically should.
182 */
183 static void
184 nfs_export_unmount(struct mount *mp)
185 {
186 struct netexport *ne;
187
188 KASSERT(mp != NULL);
189
190 netexport_wrlock();
191 ne = netexport_lookup(mp);
192 if (ne == NULL) {
193 netexport_wrunlock();
194 return;
195 }
196 netexport_clear(ne);
197 netexport_remove(ne);
198 netexport_wrunlock();
199 free(ne, M_NFS_EXPORT);
200 }
201
202 /*
203 * Atomically set the NFS exports list of the given file system, replacing
204 * it with a new list of entries.
205 *
206 * Returns zero on success or an appropriate error code otherwise.
207 *
208 * Helper function for the nfssvc(2) system call (NFSSVC_SETEXPORTSLIST
209 * command).
210 */
211 int
212 mountd_set_exports_list(const struct mountd_exports_list *mel, struct lwp *l)
213 {
214 int error;
215 #ifdef notyet
216 /* XXX: See below to see the reason why this is disabled. */
217 size_t i;
218 #endif
219 struct mount *mp;
220 struct netexport *ne;
221 struct nameidata nd;
222 struct vnode *vp;
223 struct fid *fid;
224 size_t fid_size;
225
226 if (kauth_authorize_generic(l->l_cred, KAUTH_GENERIC_ISSUSER,
227 NULL) != 0)
228 return EPERM;
229
230 /* Lookup the file system path. */
231 NDINIT(&nd, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE, mel->mel_path, l);
232 error = namei(&nd);
233 if (error != 0)
234 return error;
235 vp = nd.ni_vp;
236 mp = vp->v_mount;
237
238 fid_size = 0;
239 if ((error = VFS_VPTOFH(vp, NULL, &fid_size)) == E2BIG) {
240 fid = malloc(fid_size, M_TEMP, M_NOWAIT);
241 if (fid != NULL) {
242 error = VFS_VPTOFH(vp, fid, &fid_size);
243 free(fid, M_TEMP);
244 }
245 }
246 if (error != 0) {
247 return EOPNOTSUPP;
248 }
249
250 /* Mark the file system busy. */
251 error = vfs_busy(mp, LK_NOWAIT, NULL);
252 vput(vp);
253 if (error != 0)
254 return error;
255
256 netexport_wrlock();
257 ne = netexport_lookup(mp);
258 if (ne == NULL) {
259 error = init_exports(mp, &ne);
260 if (error != 0) {
261 goto out;
262 }
263 }
264
265 KASSERT(ne != NULL);
266 KASSERT(ne->ne_mount == mp);
267
268 /*
269 * XXX: The part marked as 'notyet' works fine from the kernel's
270 * point of view, in the sense that it is able to atomically update
271 * the complete exports list for a file system. However, supporting
272 * this in mountd(8) requires a lot of work; so, for now, keep the
273 * old behavior of updating a single entry per call.
274 *
275 * When mountd(8) is fixed, just remove the second branch of this
276 * preprocessor conditional and enable the first one.
277 */
278 #ifdef notyet
279 netexport_clear(ne);
280 for (i = 0; error == 0 && i < mel->mel_nexports; i++)
281 error = export(ne, &mel->mel_exports[i]);
282 #else
283 if (mel->mel_nexports == 0)
284 netexport_clear(ne);
285 else if (mel->mel_nexports == 1)
286 error = export(ne, &mel->mel_exports[0]);
287 else {
288 printf("mountd_set_exports_list: Cannot set more than one "
289 "entry at once (unimplemented)\n");
290 error = EOPNOTSUPP;
291 }
292 #endif
293
294 out:
295 netexport_wrunlock();
296 vfs_unbusy(mp);
297 return error;
298 }
299
300 static void
301 netexport_insert(struct netexport *ne)
302 {
303
304 CIRCLEQ_INSERT_HEAD(&netexport_list, ne, ne_list);
305 }
306
307 static void
308 netexport_remove(struct netexport *ne)
309 {
310
311 CIRCLEQ_REMOVE(&netexport_list, ne, ne_list);
312 }
313
314 static struct netexport *
315 netexport_lookup(const struct mount *mp)
316 {
317 struct netexport *ne;
318
319 CIRCLEQ_FOREACH(ne, &netexport_list, ne_list) {
320 if (ne->ne_mount == mp) {
321 goto done;
322 }
323 }
324 ne = NULL;
325 done:
326 return ne;
327 }
328
329 static struct netexport *
330 netexport_lookup_byfsid(const fsid_t *fsid)
331 {
332 struct netexport *ne;
333
334 CIRCLEQ_FOREACH(ne, &netexport_list, ne_list) {
335 const struct mount *mp = ne->ne_mount;
336
337 if (mp->mnt_stat.f_fsidx.__fsid_val[0] == fsid->__fsid_val[0] &&
338 mp->mnt_stat.f_fsidx.__fsid_val[1] == fsid->__fsid_val[1]) {
339 goto done;
340 }
341 }
342 ne = NULL;
343 done:
344
345 return ne;
346 }
347
348 /*
349 * Check if the file system specified by the 'mp' mount structure is
350 * exported to a client with 'anon' anonymous credentials. The 'mb'
351 * argument is an mbuf containing the network address of the client.
352 * The return parameters for the export flags for the client are returned
353 * in the address specified by 'wh'.
354 *
355 * This function is used exclusively by the NFS server. It is generally
356 * invoked before VFS_FHTOVP to validate that client has access to the
357 * file system.
358 */
359
360 int
361 netexport_check(const fsid_t *fsid, struct mbuf *mb, struct mount **mpp,
362 int *wh, kauth_cred_t *anon)
363 {
364 struct netexport *ne;
365 struct netcred *np;
366
367 ne = netexport_lookup_byfsid(fsid);
368 if (ne == NULL) {
369 return EACCES;
370 }
371 np = netcred_lookup(ne, mb);
372 if (np == NULL) {
373 return EACCES;
374 }
375
376 *mpp = ne->ne_mount;
377 *wh = np->netc_exflags;
378 *anon = np->netc_anon;
379
380 return 0;
381 }
382
383 #ifdef COMPAT_30
384 /*
385 * Handles legacy export requests. In this case, the export information
386 * is hardcoded in a specific place of the mount arguments structure (given
387 * in data); the request for an update is given through the fspec field
388 * (also in a known location), which must be a null pointer.
389 *
390 * Returns EJUSTRETURN if the given command was not a export request.
391 * Otherwise, returns 0 on success or an appropriate error code otherwise.
392 */
393 int
394 nfs_update_exports_30(struct mount *mp, const char *path, void *data,
395 struct lwp *l)
396 {
397 int error;
398 struct {
399 const char *fspec;
400 struct export_args30 eargs;
401 } args;
402 struct mountd_exports_list mel;
403
404 mel.mel_path = path;
405
406 error = copyin(data, &args, sizeof(args));
407 if (error != 0)
408 return EJUSTRETURN;
409
410 if (args.fspec != NULL)
411 return EJUSTRETURN;
412
413 if (args.eargs.ex_flags & 0x00020000) {
414 /* Request to delete exports. The mask above holds the
415 * value that used to be in MNT_DELEXPORT. */
416 mel.mel_nexports = 0;
417 } else {
418 struct export_args eargs;
419
420 /* The following assumes export_args has not changed since
421 * export_args30. */
422 memcpy(&eargs, &args.eargs, sizeof(struct export_args));
423
424 mel.mel_nexports = 1;
425 mel.mel_exports = &eargs;
426 }
427
428 return mountd_set_exports_list(&mel, l);
429 }
430 #endif
431
432 /*
433 * INTERNAL FUNCTIONS
434 */
435
436 /*
437 * Initializes NFS exports for the file system given in 'mp' if it supports
438 * file handles; this is determined by checking whether mp's vfs_vptofh and
439 * vfs_fhtovp operations are NULL or not.
440 *
441 * If successful, returns 0 and sets *mnpp to the address of the new
442 * mount_netexport_pair item; otherwise returns an appropriate error code
443 * and *mnpp remains unmodified.
444 */
445 static int
446 init_exports(struct mount *mp, struct netexport **nep)
447 {
448 int error;
449 struct export_args ea;
450 struct netexport *ne;
451
452 KASSERT(mp != NULL);
453
454 /* Ensure that we do not already have this mount point. */
455 KASSERT(netexport_lookup(mp) == NULL);
456
457 ne = malloc(sizeof(*ne), M_NFS_EXPORT, M_WAITOK | M_ZERO);
458 ne->ne_mount = mp;
459
460 /* Set the default export entry. Handled internally by export upon
461 * first call. */
462 memset(&ea, 0, sizeof(ea));
463 ea.ex_root = -2;
464 if (mp->mnt_flag & MNT_RDONLY)
465 ea.ex_flags |= MNT_EXRDONLY;
466 error = export(ne, &ea);
467 if (error != 0) {
468 free(ne, M_NFS_EXPORT);
469 } else {
470 netexport_insert(ne);
471 *nep = ne;
472 }
473
474 return error;
475 }
476
477 /*
478 * Build hash lists of net addresses and hang them off the mount point.
479 * Called by export() to set up a new entry in the lists of export
480 * addresses.
481 */
482 static int
483 hang_addrlist(struct mount *mp, struct netexport *nep,
484 const struct export_args *argp)
485 {
486 int error, i;
487 struct netcred *np, *enp;
488 struct radix_node_head *rnh;
489 struct sockaddr *saddr, *smask;
490 struct domain *dom;
491
492 smask = NULL;
493
494 if (argp->ex_addrlen == 0) {
495 if (mp->mnt_flag & MNT_DEFEXPORTED)
496 return EPERM;
497 np = &nep->ne_defexported;
498 KASSERT(np->netc_anon == NULL);
499 np->netc_anon = kauth_cred_alloc();
500 np->netc_exflags = argp->ex_flags;
501 kauth_uucred_to_cred(np->netc_anon, &argp->ex_anon);
502 mp->mnt_flag |= MNT_DEFEXPORTED;
503 return 0;
504 }
505
506 if (argp->ex_addrlen > MLEN || argp->ex_masklen > MLEN)
507 return EINVAL;
508
509 i = sizeof(struct netcred) + argp->ex_addrlen + argp->ex_masklen;
510 np = malloc(i, M_NETADDR, M_WAITOK | M_ZERO);
511 np->netc_anon = kauth_cred_alloc();
512 saddr = (struct sockaddr *)(np + 1);
513 error = copyin(argp->ex_addr, saddr, argp->ex_addrlen);
514 if (error)
515 goto out;
516 if (saddr->sa_len > argp->ex_addrlen)
517 saddr->sa_len = argp->ex_addrlen;
518 if (sacheck(saddr) == -1)
519 return EINVAL;
520 if (argp->ex_masklen) {
521 smask = (struct sockaddr *)((caddr_t)saddr + argp->ex_addrlen);
522 error = copyin(argp->ex_mask, smask, argp->ex_masklen);
523 if (error)
524 goto out;
525 if (smask->sa_len > argp->ex_masklen)
526 smask->sa_len = argp->ex_masklen;
527 if (smask->sa_family != saddr->sa_family)
528 return EINVAL;
529 if (sacheck(smask) == -1)
530 return EINVAL;
531 }
532 i = saddr->sa_family;
533 if ((rnh = nep->ne_rtable[i]) == 0) {
534 /*
535 * Seems silly to initialize every AF when most are not
536 * used, do so on demand here
537 */
538 DOMAIN_FOREACH(dom) {
539 if (dom->dom_family == i && dom->dom_rtattach) {
540 dom->dom_rtattach((void **)&nep->ne_rtable[i],
541 dom->dom_rtoffset);
542 break;
543 }
544 }
545 if ((rnh = nep->ne_rtable[i]) == 0) {
546 error = ENOBUFS;
547 goto out;
548 }
549 }
550
551 enp = (struct netcred *)(*rnh->rnh_addaddr)(saddr, smask, rnh,
552 np->netc_rnodes);
553 if (enp != np) {
554 if (enp == NULL) {
555 enp = (struct netcred *)(*rnh->rnh_lookup)(saddr,
556 smask, rnh);
557 if (enp == NULL) {
558 error = EPERM;
559 goto out;
560 }
561 } else
562 enp->netc_refcnt++;
563
564 goto check;
565 } else
566 enp->netc_refcnt = 1;
567
568 np->netc_exflags = argp->ex_flags;
569 kauth_uucred_to_cred(np->netc_anon, &argp->ex_anon);
570 return 0;
571 check:
572 if (enp->netc_exflags != argp->ex_flags ||
573 kauth_cred_uucmp(enp->netc_anon, &argp->ex_anon) != 0)
574 error = EPERM;
575 else
576 error = 0;
577 out:
578 KASSERT(np->netc_anon != NULL);
579 kauth_cred_free(np->netc_anon);
580 free(np, M_NETADDR);
581 return error;
582 }
583
584 /*
585 * Ensure that the address stored in 'sa' is valid.
586 * Returns zero on success, otherwise -1.
587 */
588 static int
589 sacheck(struct sockaddr *sa)
590 {
591
592 switch (sa->sa_family) {
593 #ifdef INET
594 case AF_INET: {
595 struct sockaddr_in *sin = (struct sockaddr_in *)sa;
596 char *p = (char *)sin->sin_zero;
597 size_t i;
598
599 if (sin->sin_len != sizeof(*sin))
600 return -1;
601 if (sin->sin_port != 0)
602 return -1;
603 for (i = 0; i < sizeof(sin->sin_zero); i++)
604 if (*p++ != '\0')
605 return -1;
606 return 0;
607 }
608 #endif
609 #ifdef INET6
610 case AF_INET6: {
611 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa;
612
613 if (sin6->sin6_len != sizeof(*sin6))
614 return -1;
615 if (sin6->sin6_port != 0)
616 return -1;
617 return 0;
618 }
619 #endif
620 default:
621 return -1;
622 }
623 }
624
625 /*
626 * Free the netcred object pointed to by the 'rn' radix node.
627 * 'w' holds a pointer to the radix tree head.
628 */
629 static int
630 free_netcred(struct radix_node *rn, void *w)
631 {
632 struct radix_node_head *rnh = (struct radix_node_head *)w;
633 struct netcred *np = (struct netcred *)(void *)rn;
634
635 (*rnh->rnh_deladdr)(rn->rn_key, rn->rn_mask, rnh);
636 if (--(np->netc_refcnt) <= 0) {
637 KASSERT(np->netc_anon != NULL);
638 kauth_cred_free(np->netc_anon);
639 free(np, M_NETADDR);
640 }
641 return 0;
642 }
643
644 /*
645 * Clears the exports list for a given file system.
646 */
647 static void
648 netexport_clear(struct netexport *ne)
649 {
650 struct radix_node_head *rnh;
651 struct mount *mp = ne->ne_mount;
652 int i;
653
654 if (mp->mnt_flag & MNT_EXPUBLIC) {
655 setpublicfs(NULL, NULL, NULL);
656 mp->mnt_flag &= ~MNT_EXPUBLIC;
657 }
658
659 for (i = 0; i <= AF_MAX; i++) {
660 if ((rnh = ne->ne_rtable[i]) != NULL) {
661 (*rnh->rnh_walktree)(rnh, free_netcred, rnh);
662 free(rnh, M_RTABLE);
663 ne->ne_rtable[i] = NULL;
664 }
665 }
666
667 if ((mp->mnt_flag & MNT_DEFEXPORTED) != 0) {
668 struct netcred *np = &ne->ne_defexported;
669
670 KASSERT(np->netc_anon != NULL);
671 kauth_cred_free(np->netc_anon);
672 np->netc_anon = NULL;
673 } else {
674 KASSERT(ne->ne_defexported.netc_anon == NULL);
675 }
676
677 mp->mnt_flag &= ~(MNT_EXPORTED | MNT_DEFEXPORTED);
678 }
679
680 /*
681 * Add a new export entry (described by an export_args structure) to the
682 * given file system.
683 */
684 static int
685 export(struct netexport *nep, const struct export_args *argp)
686 {
687 struct mount *mp = nep->ne_mount;
688 int error;
689
690 if (argp->ex_flags & MNT_EXPORTED) {
691 if (argp->ex_flags & MNT_EXPUBLIC) {
692 if ((error = setpublicfs(mp, nep, argp)) != 0)
693 return error;
694 mp->mnt_flag |= MNT_EXPUBLIC;
695 }
696 if ((error = hang_addrlist(mp, nep, argp)) != 0)
697 return error;
698 mp->mnt_flag |= MNT_EXPORTED;
699 }
700 return 0;
701 }
702
703 /*
704 * Set the publicly exported filesystem (WebNFS). Currently, only
705 * one public filesystem is possible in the spec (RFC 2054 and 2055)
706 */
707 static int
708 setpublicfs(struct mount *mp, struct netexport *nep,
709 const struct export_args *argp)
710 {
711 char *cp;
712 int error;
713 struct vnode *rvp;
714 size_t fhsize;
715
716 /*
717 * mp == NULL -> invalidate the current info, the FS is
718 * no longer exported. May be called from either export
719 * or unmount, so check if it hasn't already been done.
720 */
721 if (mp == NULL) {
722 if (nfs_pub.np_valid) {
723 nfs_pub.np_valid = 0;
724 if (nfs_pub.np_handle != NULL) {
725 free(nfs_pub.np_handle, M_TEMP);
726 nfs_pub.np_handle = NULL;
727 }
728 if (nfs_pub.np_index != NULL) {
729 FREE(nfs_pub.np_index, M_TEMP);
730 nfs_pub.np_index = NULL;
731 }
732 }
733 return 0;
734 }
735
736 /*
737 * Only one allowed at a time.
738 */
739 if (nfs_pub.np_valid != 0 && mp != nfs_pub.np_mount)
740 return EBUSY;
741
742 /*
743 * Get real filehandle for root of exported FS.
744 */
745 if ((error = VFS_ROOT(mp, &rvp)))
746 return error;
747
748 fhsize = 0;
749 error = vfs_composefh(rvp, NULL, &fhsize);
750 if (error != E2BIG)
751 return error;
752 nfs_pub.np_handle = malloc(fhsize, M_TEMP, M_NOWAIT);
753 if (nfs_pub.np_handle == NULL)
754 error = ENOMEM;
755 else
756 error = vfs_composefh(rvp, nfs_pub.np_handle, &fhsize);
757 if (error)
758 return error;
759
760 vput(rvp);
761
762 /*
763 * If an indexfile was specified, pull it in.
764 */
765 if (argp->ex_indexfile != NULL) {
766 MALLOC(nfs_pub.np_index, char *, MAXNAMLEN + 1, M_TEMP,
767 M_WAITOK);
768 error = copyinstr(argp->ex_indexfile, nfs_pub.np_index,
769 MAXNAMLEN, (size_t *)0);
770 if (!error) {
771 /*
772 * Check for illegal filenames.
773 */
774 for (cp = nfs_pub.np_index; *cp; cp++) {
775 if (*cp == '/') {
776 error = EINVAL;
777 break;
778 }
779 }
780 }
781 if (error) {
782 FREE(nfs_pub.np_index, M_TEMP);
783 return error;
784 }
785 }
786
787 nfs_pub.np_mount = mp;
788 nfs_pub.np_valid = 1;
789 return 0;
790 }
791
792 /*
793 * Lookup an export entry in the exports list that matches the address
794 * stored in 'nam'. If no entry is found, the default one is used instead
795 * (if available).
796 */
797 static struct netcred *
798 netcred_lookup(struct netexport *ne, struct mbuf *nam)
799 {
800 struct netcred *np;
801 struct radix_node_head *rnh;
802 struct sockaddr *saddr;
803
804 if ((ne->ne_mount->mnt_flag & MNT_EXPORTED) == 0) {
805 return NULL;
806 }
807
808 /*
809 * Lookup in the export list first.
810 */
811 np = NULL;
812 if (nam != NULL) {
813 saddr = mtod(nam, struct sockaddr *);
814 rnh = ne->ne_rtable[saddr->sa_family];
815 if (rnh != NULL) {
816 np = (struct netcred *)
817 (*rnh->rnh_matchaddr)((caddr_t)saddr,
818 rnh);
819 if (np && np->netc_rnodes->rn_flags & RNF_ROOT)
820 np = NULL;
821 }
822 }
823 /*
824 * If no address match, use the default if it exists.
825 */
826 if (np == NULL && ne->ne_mount->mnt_flag & MNT_DEFEXPORTED)
827 np = &ne->ne_defexported;
828
829 return np;
830 }
831
832 static struct lock netexport_lock = LOCK_INITIALIZER(PVFS, "netexp", 0, 0);
833
834 void
835 netexport_rdlock(void)
836 {
837
838 lockmgr(&netexport_lock, LK_SHARED, NULL);
839 }
840
841 void
842 netexport_rdunlock(void)
843 {
844
845 lockmgr(&netexport_lock, LK_RELEASE, NULL);
846 }
847
848 static void
849 netexport_wrlock(void)
850 {
851
852 lockmgr(&netexport_lock, LK_EXCLUSIVE, NULL);
853 }
854
855 static void
856 netexport_wrunlock(void)
857 {
858
859 lockmgr(&netexport_lock, LK_RELEASE, NULL);
860 }
861