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