nfs_export.c revision 1.10 1 1.10 martin /* $NetBSD: nfs_export.c,v 1.10 2006/03/27 20:20:46 martin 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.10 martin __KERNEL_RCSID(0, "$NetBSD: nfs_export.c,v 1.10 2006/03/27 20:20:46 martin 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.5 yamt CIRCLEQ_ENTRY(netexport) ne_list;
128 1.5 yamt struct mount *ne_mount;
129 1.5 yamt struct netcred ne_defexported; /* Default export */
130 1.5 yamt struct radix_node_head *ne_rtable[AF_MAX+1]; /* Individual exports */
131 1.1 jmmv };
132 1.5 yamt CIRCLEQ_HEAD(, netexport) netexport_list =
133 1.5 yamt CIRCLEQ_HEAD_INITIALIZER(netexport_list);
134 1.1 jmmv
135 1.1 jmmv /* Malloc type used by the mount<->netexport map. */
136 1.1 jmmv MALLOC_DEFINE(M_NFS_EXPORT, "nfs_export", "NFS export data");
137 1.1 jmmv
138 1.1 jmmv /* Publicly exported file system. */
139 1.1 jmmv struct nfs_public nfs_pub;
140 1.1 jmmv
141 1.1 jmmv /*
142 1.1 jmmv * Local prototypes.
143 1.1 jmmv */
144 1.5 yamt static int init_exports(struct mount *, struct netexport **);
145 1.1 jmmv static int hang_addrlist(struct mount *, struct netexport *,
146 1.1 jmmv const struct export_args *);
147 1.1 jmmv static int sacheck(struct sockaddr *);
148 1.1 jmmv static int free_netcred(struct radix_node *, void *);
149 1.5 yamt static void clear_exports(struct netexport *);
150 1.5 yamt static int export(struct netexport *, const struct export_args *);
151 1.1 jmmv static int setpublicfs(struct mount *, struct netexport *,
152 1.1 jmmv const struct export_args *);
153 1.5 yamt static struct netcred *netcred_lookup(struct netexport *, struct mbuf *);
154 1.5 yamt static struct netexport *netexport_lookup(const struct mount *);
155 1.5 yamt static struct netexport *netexport_lookup_byfsid(const fsid_t *);
156 1.5 yamt static void netexport_insert(struct netexport *);
157 1.5 yamt static void netexport_remove(struct netexport *);
158 1.8 yamt static void netexport_wrlock(void);
159 1.8 yamt static void netexport_wrunlock(void);
160 1.1 jmmv
161 1.1 jmmv /*
162 1.1 jmmv * PUBLIC INTERFACE
163 1.1 jmmv */
164 1.1 jmmv
165 1.1 jmmv /*
166 1.1 jmmv * Declare and initialize the file system export hooks.
167 1.1 jmmv */
168 1.1 jmmv static void nfs_export_unmount(struct mount *);
169 1.1 jmmv
170 1.1 jmmv struct vfs_hooks nfs_export_hooks = {
171 1.1 jmmv nfs_export_unmount
172 1.1 jmmv };
173 1.1 jmmv VFS_HOOKS_ATTACH(nfs_export_hooks);
174 1.1 jmmv
175 1.1 jmmv /*
176 1.1 jmmv * VFS unmount hook for NFS exports.
177 1.1 jmmv *
178 1.1 jmmv * Releases NFS exports list resources if the given mount point has some.
179 1.1 jmmv * As allocation happens lazily, it may be that it doesn't has this
180 1.1 jmmv * information, although it theorically should.
181 1.1 jmmv */
182 1.1 jmmv static void
183 1.1 jmmv nfs_export_unmount(struct mount *mp)
184 1.1 jmmv {
185 1.5 yamt struct netexport *ne;
186 1.1 jmmv
187 1.1 jmmv KASSERT(mp != NULL);
188 1.1 jmmv
189 1.8 yamt netexport_wrlock();
190 1.5 yamt ne = netexport_lookup(mp);
191 1.5 yamt if (ne == NULL) {
192 1.8 yamt netexport_wrunlock();
193 1.5 yamt return;
194 1.1 jmmv }
195 1.1 jmmv
196 1.5 yamt KASSERT(mp->mnt_op->vfs_vptofh != NULL &&
197 1.5 yamt mp->mnt_op->vfs_fhtovp != NULL);
198 1.1 jmmv
199 1.5 yamt if (mp->mnt_flag & MNT_EXPUBLIC) {
200 1.5 yamt setpublicfs(NULL, NULL, NULL);
201 1.5 yamt }
202 1.2 jmmv
203 1.5 yamt netexport_remove(ne);
204 1.8 yamt netexport_wrunlock();
205 1.5 yamt free(ne, M_NFS_EXPORT);
206 1.1 jmmv }
207 1.1 jmmv
208 1.1 jmmv /*
209 1.1 jmmv * Atomically set the NFS exports list of the given file system, replacing
210 1.1 jmmv * it with a new list of entries.
211 1.1 jmmv *
212 1.1 jmmv * Returns zero on success or an appropriate error code otherwise.
213 1.1 jmmv *
214 1.1 jmmv * Helper function for the nfssvc(2) system call (NFSSVC_SETEXPORTSLIST
215 1.1 jmmv * command).
216 1.1 jmmv */
217 1.1 jmmv int
218 1.6 christos mountd_set_exports_list(const struct mountd_exports_list *mel, struct lwp *l)
219 1.1 jmmv {
220 1.1 jmmv int error;
221 1.1 jmmv #ifdef notyet
222 1.1 jmmv /* XXX: See below to see the reason why this is disabled. */
223 1.1 jmmv size_t i;
224 1.1 jmmv #endif
225 1.1 jmmv struct mount *mp;
226 1.5 yamt struct netexport *ne;
227 1.1 jmmv struct nameidata nd;
228 1.1 jmmv struct vnode *vp;
229 1.9 yamt struct fid fid;
230 1.1 jmmv
231 1.6 christos if (suser(l->l_proc->p_ucred, &l->l_proc->p_acflag) != 0)
232 1.1 jmmv return EPERM;
233 1.1 jmmv
234 1.1 jmmv /* Lookup the file system path. */
235 1.6 christos NDINIT(&nd, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE, mel->mel_path, l);
236 1.1 jmmv error = namei(&nd);
237 1.1 jmmv if (error != 0)
238 1.1 jmmv return error;
239 1.5 yamt vp = nd.ni_vp;
240 1.5 yamt mp = vp->v_mount;
241 1.1 jmmv
242 1.1 jmmv /* The selected file system may not support NFS exports, so ensure
243 1.1 jmmv * it does. */
244 1.9 yamt if (mp->mnt_op->vfs_vptofh == NULL || mp->mnt_op->vfs_fhtovp == NULL ||
245 1.9 yamt VFS_VPTOFH(vp, &fid) != 0) {
246 1.1 jmmv error = EOPNOTSUPP;
247 1.1 jmmv goto out_locked;
248 1.1 jmmv }
249 1.10 martin KASSERT(fid.fid_len <= _VFS_MAXFIDSZ);
250 1.1 jmmv KASSERT(mp->mnt_op->vfs_vptofh != NULL &&
251 1.1 jmmv mp->mnt_op->vfs_fhtovp != NULL);
252 1.1 jmmv
253 1.1 jmmv /* Mark the file system busy. */
254 1.1 jmmv error = vfs_busy(mp, LK_NOWAIT, NULL);
255 1.1 jmmv if (error != 0)
256 1.1 jmmv goto out_locked;
257 1.1 jmmv
258 1.8 yamt netexport_wrlock();
259 1.5 yamt ne = netexport_lookup(mp);
260 1.5 yamt if (ne == NULL) {
261 1.5 yamt error = init_exports(mp, &ne);
262 1.1 jmmv if (error != 0) {
263 1.8 yamt goto out_locked2;
264 1.1 jmmv }
265 1.1 jmmv }
266 1.1 jmmv
267 1.5 yamt KASSERT(ne != NULL);
268 1.5 yamt KASSERT(ne->ne_mount == mp);
269 1.5 yamt
270 1.1 jmmv /*
271 1.1 jmmv * XXX: The part marked as 'notyet' works fine from the kernel's
272 1.1 jmmv * point of view, in the sense that it is able to atomically update
273 1.1 jmmv * the complete exports list for a file system. However, supporting
274 1.1 jmmv * this in mountd(8) requires a lot of work; so, for now, keep the
275 1.1 jmmv * old behavior of updating a single entry per call.
276 1.1 jmmv *
277 1.1 jmmv * When mountd(8) is fixed, just remove the second branch of this
278 1.1 jmmv * preprocessor conditional and enable the first one.
279 1.1 jmmv */
280 1.1 jmmv #ifdef notyet
281 1.5 yamt clear_exports(ne);
282 1.1 jmmv for (i = 0; error == 0 && i < mel->mel_nexports; i++)
283 1.5 yamt error = export(ne, &mel->mel_exports[i]);
284 1.1 jmmv #else
285 1.1 jmmv if (mel->mel_nexports == 0)
286 1.5 yamt clear_exports(ne);
287 1.1 jmmv else if (mel->mel_nexports == 1)
288 1.5 yamt error = export(ne, &mel->mel_exports[0]);
289 1.1 jmmv else {
290 1.1 jmmv printf("mountd_set_exports_list: Cannot set more than one "
291 1.1 jmmv "entry at once (unimplemented)\n");
292 1.1 jmmv error = EOPNOTSUPP;
293 1.1 jmmv }
294 1.1 jmmv #endif
295 1.1 jmmv
296 1.8 yamt out_locked2:
297 1.8 yamt netexport_wrunlock();
298 1.1 jmmv vfs_unbusy(mp);
299 1.1 jmmv
300 1.1 jmmv out_locked:
301 1.1 jmmv vput(vp);
302 1.1 jmmv
303 1.4 yamt return error;
304 1.1 jmmv }
305 1.1 jmmv
306 1.5 yamt static void
307 1.5 yamt netexport_insert(struct netexport *ne)
308 1.5 yamt {
309 1.5 yamt
310 1.5 yamt CIRCLEQ_INSERT_HEAD(&netexport_list, ne, ne_list);
311 1.5 yamt }
312 1.5 yamt
313 1.5 yamt static void
314 1.5 yamt netexport_remove(struct netexport *ne)
315 1.5 yamt {
316 1.5 yamt
317 1.5 yamt CIRCLEQ_REMOVE(&netexport_list, ne, ne_list);
318 1.5 yamt }
319 1.5 yamt
320 1.5 yamt static struct netexport *
321 1.5 yamt netexport_lookup(const struct mount *mp)
322 1.5 yamt {
323 1.5 yamt struct netexport *ne;
324 1.5 yamt
325 1.5 yamt CIRCLEQ_FOREACH(ne, &netexport_list, ne_list) {
326 1.5 yamt if (ne->ne_mount == mp) {
327 1.5 yamt goto done;
328 1.5 yamt }
329 1.5 yamt }
330 1.5 yamt ne = NULL;
331 1.5 yamt done:
332 1.5 yamt return ne;
333 1.5 yamt }
334 1.5 yamt
335 1.5 yamt static struct netexport *
336 1.5 yamt netexport_lookup_byfsid(const fsid_t *fsid)
337 1.5 yamt {
338 1.5 yamt struct netexport *ne;
339 1.5 yamt
340 1.5 yamt CIRCLEQ_FOREACH(ne, &netexport_list, ne_list) {
341 1.5 yamt const struct mount *mp = ne->ne_mount;
342 1.5 yamt
343 1.5 yamt if (mp->mnt_stat.f_fsidx.__fsid_val[0] == fsid->__fsid_val[0] &&
344 1.5 yamt mp->mnt_stat.f_fsidx.__fsid_val[1] == fsid->__fsid_val[1]) {
345 1.5 yamt goto done;
346 1.5 yamt }
347 1.5 yamt }
348 1.5 yamt ne = NULL;
349 1.5 yamt done:
350 1.5 yamt
351 1.5 yamt return ne;
352 1.5 yamt }
353 1.5 yamt
354 1.1 jmmv /*
355 1.1 jmmv * Check if the file system specified by the 'mp' mount structure is
356 1.1 jmmv * exported to a client with 'anon' anonymous credentials. The 'mb'
357 1.1 jmmv * argument is an mbuf containing the network address of the client.
358 1.1 jmmv * The return parameters for the export flags for the client are returned
359 1.1 jmmv * in the address specified by 'wh'.
360 1.1 jmmv *
361 1.1 jmmv * This function is used exclusively by the NFS server. It is generally
362 1.1 jmmv * invoked before VFS_FHTOVP to validate that client has access to the
363 1.1 jmmv * file system.
364 1.1 jmmv */
365 1.5 yamt
366 1.1 jmmv int
367 1.5 yamt netexport_check(const fsid_t *fsid, struct mbuf *mb, struct mount **mpp,
368 1.5 yamt int *wh, struct ucred **anon)
369 1.1 jmmv {
370 1.5 yamt struct netexport *ne;
371 1.1 jmmv struct netcred *np;
372 1.1 jmmv
373 1.5 yamt ne = netexport_lookup_byfsid(fsid);
374 1.5 yamt if (ne == NULL) {
375 1.5 yamt return EACCES;
376 1.1 jmmv }
377 1.5 yamt np = netcred_lookup(ne, mb);
378 1.5 yamt if (np == NULL) {
379 1.1 jmmv return EACCES;
380 1.5 yamt }
381 1.1 jmmv
382 1.5 yamt *mpp = ne->ne_mount;
383 1.5 yamt *wh = np->netc_exflags;
384 1.5 yamt *anon = &np->netc_anon;
385 1.1 jmmv
386 1.5 yamt return 0;
387 1.1 jmmv }
388 1.1 jmmv
389 1.3 jmmv #ifdef COMPAT_30
390 1.3 jmmv /*
391 1.3 jmmv * Handles legacy export requests. In this case, the export information
392 1.3 jmmv * is hardcoded in a specific place of the mount arguments structure (given
393 1.3 jmmv * in data); the request for an update is given through the fspec field
394 1.3 jmmv * (also in a known location), which must be a null pointer.
395 1.3 jmmv *
396 1.3 jmmv * Returns EJUSTRETURN if the given command was not a export request.
397 1.3 jmmv * Otherwise, returns 0 on success or an appropriate error code otherwise.
398 1.3 jmmv */
399 1.3 jmmv int
400 1.3 jmmv nfs_update_exports_30(struct mount *mp, const char *path, void *data,
401 1.6 christos struct lwp *l)
402 1.3 jmmv {
403 1.3 jmmv int error;
404 1.3 jmmv struct {
405 1.3 jmmv const char *fspec;
406 1.3 jmmv struct export_args30 eargs;
407 1.3 jmmv } args;
408 1.3 jmmv struct mountd_exports_list mel;
409 1.3 jmmv
410 1.3 jmmv mel.mel_path = path;
411 1.3 jmmv
412 1.3 jmmv error = copyin(data, &args, sizeof(args));
413 1.3 jmmv if (error != 0)
414 1.3 jmmv return EJUSTRETURN;
415 1.3 jmmv
416 1.3 jmmv if (args.fspec != NULL)
417 1.3 jmmv return EJUSTRETURN;
418 1.3 jmmv
419 1.4 yamt if (args.eargs.ex_flags & 0x00020000) {
420 1.3 jmmv /* Request to delete exports. The mask above holds the
421 1.3 jmmv * value that used to be in MNT_DELEXPORT. */
422 1.3 jmmv mel.mel_nexports = 0;
423 1.3 jmmv } else {
424 1.3 jmmv struct export_args eargs;
425 1.3 jmmv
426 1.3 jmmv /* The following assumes export_args has not changed since
427 1.3 jmmv * export_args30. */
428 1.3 jmmv memcpy(&eargs, &args.eargs, sizeof(struct export_args));
429 1.3 jmmv
430 1.3 jmmv mel.mel_nexports = 1;
431 1.3 jmmv mel.mel_exports = &eargs;
432 1.3 jmmv }
433 1.3 jmmv
434 1.6 christos return mountd_set_exports_list(&mel, l);
435 1.3 jmmv }
436 1.3 jmmv #endif
437 1.3 jmmv
438 1.1 jmmv /*
439 1.1 jmmv * INTERNAL FUNCTIONS
440 1.1 jmmv */
441 1.1 jmmv
442 1.1 jmmv /*
443 1.1 jmmv * Initializes NFS exports for the file system given in 'mp' if it supports
444 1.1 jmmv * file handles; this is determined by checking whether mp's vfs_vptofh and
445 1.1 jmmv * vfs_fhtovp operations are NULL or not.
446 1.1 jmmv *
447 1.1 jmmv * If successful, returns 0 and sets *mnpp to the address of the new
448 1.1 jmmv * mount_netexport_pair item; otherwise returns and appropriate error code
449 1.1 jmmv * and *mnpp remains unmodified.
450 1.1 jmmv */
451 1.1 jmmv static int
452 1.5 yamt init_exports(struct mount *mp, struct netexport **nep)
453 1.1 jmmv {
454 1.1 jmmv int error;
455 1.1 jmmv struct export_args ea;
456 1.5 yamt struct netexport *ne;
457 1.1 jmmv
458 1.1 jmmv KASSERT(mp != NULL);
459 1.1 jmmv KASSERT(mp->mnt_op->vfs_vptofh != NULL &&
460 1.1 jmmv mp->mnt_op->vfs_fhtovp != NULL);
461 1.1 jmmv
462 1.1 jmmv /* Ensure that we do not already have this mount point. */
463 1.5 yamt KASSERT(netexport_lookup(mp) == NULL);
464 1.1 jmmv
465 1.5 yamt ne = malloc(sizeof(*ne), M_NFS_EXPORT, M_WAITOK | M_ZERO);
466 1.5 yamt ne->ne_mount = mp;
467 1.1 jmmv
468 1.1 jmmv /* Set the default export entry. Handled internally by export upon
469 1.1 jmmv * first call. */
470 1.1 jmmv memset(&ea, 0, sizeof(ea));
471 1.1 jmmv ea.ex_root = -2;
472 1.1 jmmv if (mp->mnt_flag & MNT_RDONLY)
473 1.1 jmmv ea.ex_flags |= MNT_EXRDONLY;
474 1.5 yamt error = export(ne, &ea);
475 1.5 yamt if (error != 0) {
476 1.5 yamt free(ne, M_NFS_EXPORT);
477 1.5 yamt } else {
478 1.5 yamt netexport_insert(ne);
479 1.5 yamt *nep = ne;
480 1.1 jmmv }
481 1.1 jmmv
482 1.1 jmmv return error;
483 1.1 jmmv }
484 1.1 jmmv
485 1.1 jmmv /*
486 1.1 jmmv * Build hash lists of net addresses and hang them off the mount point.
487 1.1 jmmv * Called by export() to set up a new entry in the lists of export
488 1.1 jmmv * addresses.
489 1.1 jmmv */
490 1.1 jmmv static int
491 1.1 jmmv hang_addrlist(struct mount *mp, struct netexport *nep,
492 1.1 jmmv const struct export_args *argp)
493 1.1 jmmv {
494 1.1 jmmv int error, i;
495 1.1 jmmv struct netcred *np, *enp;
496 1.1 jmmv struct radix_node_head *rnh;
497 1.1 jmmv struct sockaddr *saddr, *smask;
498 1.1 jmmv struct domain *dom;
499 1.1 jmmv
500 1.1 jmmv smask = NULL;
501 1.1 jmmv
502 1.1 jmmv if (argp->ex_addrlen == 0) {
503 1.1 jmmv if (mp->mnt_flag & MNT_DEFEXPORTED)
504 1.1 jmmv return EPERM;
505 1.1 jmmv np = &nep->ne_defexported;
506 1.1 jmmv np->netc_exflags = argp->ex_flags;
507 1.1 jmmv crcvt(&np->netc_anon, &argp->ex_anon);
508 1.1 jmmv np->netc_anon.cr_ref = 1;
509 1.1 jmmv mp->mnt_flag |= MNT_DEFEXPORTED;
510 1.1 jmmv return 0;
511 1.1 jmmv }
512 1.1 jmmv
513 1.1 jmmv if (argp->ex_addrlen > MLEN || argp->ex_masklen > MLEN)
514 1.1 jmmv return EINVAL;
515 1.1 jmmv
516 1.1 jmmv i = sizeof(struct netcred) + argp->ex_addrlen + argp->ex_masklen;
517 1.5 yamt np = malloc(i, M_NETADDR, M_WAITOK | M_ZERO);
518 1.1 jmmv saddr = (struct sockaddr *)(np + 1);
519 1.5 yamt error = copyin(argp->ex_addr, saddr, argp->ex_addrlen);
520 1.1 jmmv if (error)
521 1.1 jmmv goto out;
522 1.1 jmmv if (saddr->sa_len > argp->ex_addrlen)
523 1.1 jmmv saddr->sa_len = argp->ex_addrlen;
524 1.1 jmmv if (sacheck(saddr) == -1)
525 1.1 jmmv return EINVAL;
526 1.1 jmmv if (argp->ex_masklen) {
527 1.1 jmmv smask = (struct sockaddr *)((caddr_t)saddr + argp->ex_addrlen);
528 1.5 yamt error = copyin(argp->ex_mask, smask, argp->ex_masklen);
529 1.1 jmmv if (error)
530 1.1 jmmv goto out;
531 1.1 jmmv if (smask->sa_len > argp->ex_masklen)
532 1.1 jmmv smask->sa_len = argp->ex_masklen;
533 1.1 jmmv if (smask->sa_family != saddr->sa_family)
534 1.1 jmmv return EINVAL;
535 1.1 jmmv if (sacheck(smask) == -1)
536 1.1 jmmv return EINVAL;
537 1.1 jmmv }
538 1.1 jmmv i = saddr->sa_family;
539 1.1 jmmv if ((rnh = nep->ne_rtable[i]) == 0) {
540 1.1 jmmv /*
541 1.1 jmmv * Seems silly to initialize every AF when most are not
542 1.1 jmmv * used, do so on demand here
543 1.1 jmmv */
544 1.1 jmmv DOMAIN_FOREACH(dom) {
545 1.1 jmmv if (dom->dom_family == i && dom->dom_rtattach) {
546 1.1 jmmv dom->dom_rtattach((void **)&nep->ne_rtable[i],
547 1.1 jmmv dom->dom_rtoffset);
548 1.1 jmmv break;
549 1.1 jmmv }
550 1.1 jmmv }
551 1.1 jmmv if ((rnh = nep->ne_rtable[i]) == 0) {
552 1.1 jmmv error = ENOBUFS;
553 1.1 jmmv goto out;
554 1.1 jmmv }
555 1.1 jmmv }
556 1.1 jmmv
557 1.1 jmmv enp = (struct netcred *)(*rnh->rnh_addaddr)(saddr, smask, rnh,
558 1.1 jmmv np->netc_rnodes);
559 1.1 jmmv if (enp != np) {
560 1.1 jmmv if (enp == NULL) {
561 1.1 jmmv enp = (struct netcred *)(*rnh->rnh_lookup)(saddr,
562 1.1 jmmv smask, rnh);
563 1.1 jmmv if (enp == NULL) {
564 1.1 jmmv error = EPERM;
565 1.1 jmmv goto out;
566 1.1 jmmv }
567 1.1 jmmv } else
568 1.1 jmmv enp->netc_refcnt++;
569 1.1 jmmv
570 1.1 jmmv goto check;
571 1.1 jmmv } else
572 1.1 jmmv enp->netc_refcnt = 1;
573 1.1 jmmv
574 1.1 jmmv np->netc_exflags = argp->ex_flags;
575 1.1 jmmv crcvt(&np->netc_anon, &argp->ex_anon);
576 1.1 jmmv np->netc_anon.cr_ref = 1;
577 1.1 jmmv return 0;
578 1.1 jmmv check:
579 1.1 jmmv if (enp->netc_exflags != argp->ex_flags ||
580 1.1 jmmv crcmp(&enp->netc_anon, &argp->ex_anon) != 0)
581 1.1 jmmv error = EPERM;
582 1.1 jmmv else
583 1.1 jmmv error = 0;
584 1.1 jmmv out:
585 1.1 jmmv free(np, M_NETADDR);
586 1.1 jmmv return error;
587 1.1 jmmv }
588 1.1 jmmv
589 1.1 jmmv /*
590 1.1 jmmv * Ensure that the address stored in 'sa' is valid.
591 1.1 jmmv * Returns zero on success, otherwise -1.
592 1.1 jmmv */
593 1.1 jmmv static int
594 1.1 jmmv sacheck(struct sockaddr *sa)
595 1.1 jmmv {
596 1.1 jmmv
597 1.1 jmmv switch (sa->sa_family) {
598 1.1 jmmv #ifdef INET
599 1.1 jmmv case AF_INET: {
600 1.1 jmmv struct sockaddr_in *sin = (struct sockaddr_in *)sa;
601 1.1 jmmv char *p = (char *)sin->sin_zero;
602 1.1 jmmv size_t i;
603 1.1 jmmv
604 1.1 jmmv if (sin->sin_len != sizeof(*sin))
605 1.1 jmmv return -1;
606 1.1 jmmv if (sin->sin_port != 0)
607 1.1 jmmv return -1;
608 1.1 jmmv for (i = 0; i < sizeof(sin->sin_zero); i++)
609 1.1 jmmv if (*p++ != '\0')
610 1.1 jmmv return -1;
611 1.1 jmmv return 0;
612 1.1 jmmv }
613 1.1 jmmv #endif
614 1.1 jmmv #ifdef INET6
615 1.1 jmmv case AF_INET6: {
616 1.1 jmmv struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa;
617 1.1 jmmv
618 1.1 jmmv if (sin6->sin6_len != sizeof(*sin6))
619 1.1 jmmv return -1;
620 1.1 jmmv if (sin6->sin6_port != 0)
621 1.1 jmmv return -1;
622 1.1 jmmv return 0;
623 1.1 jmmv }
624 1.1 jmmv #endif
625 1.1 jmmv default:
626 1.1 jmmv return -1;
627 1.1 jmmv }
628 1.1 jmmv }
629 1.1 jmmv
630 1.1 jmmv /*
631 1.1 jmmv * Free the netcred object pointed to by the 'rn' radix node.
632 1.1 jmmv * 'w' holds a pointer to the radix tree head.
633 1.1 jmmv */
634 1.1 jmmv static int
635 1.1 jmmv free_netcred(struct radix_node *rn, void *w)
636 1.1 jmmv {
637 1.1 jmmv struct radix_node_head *rnh = (struct radix_node_head *)w;
638 1.1 jmmv struct netcred *np = (struct netcred *)(void *)rn;
639 1.1 jmmv
640 1.1 jmmv (*rnh->rnh_deladdr)(rn->rn_key, rn->rn_mask, rnh);
641 1.1 jmmv if (--(np->netc_refcnt) <= 0)
642 1.1 jmmv free(np, M_NETADDR);
643 1.1 jmmv return 0;
644 1.1 jmmv }
645 1.1 jmmv
646 1.1 jmmv /*
647 1.1 jmmv * Clears the exports list for a given file system.
648 1.1 jmmv */
649 1.1 jmmv static void
650 1.5 yamt clear_exports(struct netexport *ne)
651 1.1 jmmv {
652 1.5 yamt struct radix_node_head *rnh;
653 1.5 yamt struct mount *mp = ne->ne_mount;
654 1.1 jmmv int i;
655 1.1 jmmv
656 1.1 jmmv if (mp->mnt_flag & MNT_EXPUBLIC) {
657 1.1 jmmv setpublicfs(NULL, NULL, NULL);
658 1.1 jmmv mp->mnt_flag &= ~MNT_EXPUBLIC;
659 1.1 jmmv }
660 1.1 jmmv
661 1.1 jmmv for (i = 0; i <= AF_MAX; i++) {
662 1.5 yamt if ((rnh = ne->ne_rtable[i]) != NULL) {
663 1.1 jmmv (*rnh->rnh_walktree)(rnh, free_netcred, rnh);
664 1.5 yamt free(rnh, M_RTABLE);
665 1.5 yamt ne->ne_rtable[i] = NULL;
666 1.1 jmmv }
667 1.1 jmmv }
668 1.1 jmmv
669 1.1 jmmv mp->mnt_flag &= ~(MNT_EXPORTED | MNT_DEFEXPORTED);
670 1.1 jmmv }
671 1.1 jmmv
672 1.1 jmmv /*
673 1.1 jmmv * Add a new export entry (described by an export_args structure) to the
674 1.1 jmmv * given file system.
675 1.1 jmmv */
676 1.1 jmmv static int
677 1.5 yamt export(struct netexport *nep, const struct export_args *argp)
678 1.1 jmmv {
679 1.5 yamt struct mount *mp = nep->ne_mount;
680 1.1 jmmv int error;
681 1.1 jmmv
682 1.1 jmmv if (argp->ex_flags & MNT_EXPORTED) {
683 1.1 jmmv if (argp->ex_flags & MNT_EXPUBLIC) {
684 1.1 jmmv if ((error = setpublicfs(mp, nep, argp)) != 0)
685 1.1 jmmv return error;
686 1.1 jmmv mp->mnt_flag |= MNT_EXPUBLIC;
687 1.1 jmmv }
688 1.1 jmmv if ((error = hang_addrlist(mp, nep, argp)) != 0)
689 1.1 jmmv return error;
690 1.1 jmmv mp->mnt_flag |= MNT_EXPORTED;
691 1.1 jmmv }
692 1.1 jmmv return 0;
693 1.1 jmmv }
694 1.1 jmmv
695 1.1 jmmv /*
696 1.1 jmmv * Set the publicly exported filesystem (WebNFS). Currently, only
697 1.1 jmmv * one public filesystem is possible in the spec (RFC 2054 and 2055)
698 1.1 jmmv */
699 1.1 jmmv static int
700 1.1 jmmv setpublicfs(struct mount *mp, struct netexport *nep,
701 1.1 jmmv const struct export_args *argp)
702 1.1 jmmv {
703 1.1 jmmv char *cp;
704 1.1 jmmv int error;
705 1.1 jmmv struct vnode *rvp;
706 1.1 jmmv
707 1.1 jmmv /*
708 1.1 jmmv * mp == NULL -> invalidate the current info, the FS is
709 1.1 jmmv * no longer exported. May be called from either export
710 1.1 jmmv * or unmount, so check if it hasn't already been done.
711 1.1 jmmv */
712 1.1 jmmv if (mp == NULL) {
713 1.1 jmmv if (nfs_pub.np_valid) {
714 1.1 jmmv nfs_pub.np_valid = 0;
715 1.1 jmmv if (nfs_pub.np_index != NULL) {
716 1.1 jmmv FREE(nfs_pub.np_index, M_TEMP);
717 1.1 jmmv nfs_pub.np_index = NULL;
718 1.1 jmmv }
719 1.1 jmmv }
720 1.1 jmmv return 0;
721 1.1 jmmv }
722 1.1 jmmv
723 1.1 jmmv /*
724 1.1 jmmv * Only one allowed at a time.
725 1.1 jmmv */
726 1.1 jmmv if (nfs_pub.np_valid != 0 && mp != nfs_pub.np_mount)
727 1.1 jmmv return EBUSY;
728 1.1 jmmv
729 1.1 jmmv /*
730 1.1 jmmv * Get real filehandle for root of exported FS.
731 1.1 jmmv */
732 1.1 jmmv memset((caddr_t)&nfs_pub.np_handle, 0, sizeof(nfs_pub.np_handle));
733 1.1 jmmv nfs_pub.np_handle.fh_fsid = mp->mnt_stat.f_fsidx;
734 1.1 jmmv
735 1.1 jmmv if ((error = VFS_ROOT(mp, &rvp)))
736 1.1 jmmv return error;
737 1.1 jmmv
738 1.1 jmmv if ((error = VFS_VPTOFH(rvp, &nfs_pub.np_handle.fh_fid)))
739 1.1 jmmv return error;
740 1.1 jmmv
741 1.1 jmmv vput(rvp);
742 1.10 martin KASSERT(nfs_pub.np_handle.fh_fid.fid_len <= _VFS_MAXFIDSZ);
743 1.1 jmmv
744 1.1 jmmv /*
745 1.1 jmmv * If an indexfile was specified, pull it in.
746 1.1 jmmv */
747 1.1 jmmv if (argp->ex_indexfile != NULL) {
748 1.1 jmmv MALLOC(nfs_pub.np_index, char *, MAXNAMLEN + 1, M_TEMP,
749 1.1 jmmv M_WAITOK);
750 1.1 jmmv error = copyinstr(argp->ex_indexfile, nfs_pub.np_index,
751 1.1 jmmv MAXNAMLEN, (size_t *)0);
752 1.1 jmmv if (!error) {
753 1.1 jmmv /*
754 1.1 jmmv * Check for illegal filenames.
755 1.1 jmmv */
756 1.1 jmmv for (cp = nfs_pub.np_index; *cp; cp++) {
757 1.1 jmmv if (*cp == '/') {
758 1.1 jmmv error = EINVAL;
759 1.1 jmmv break;
760 1.1 jmmv }
761 1.1 jmmv }
762 1.1 jmmv }
763 1.1 jmmv if (error) {
764 1.1 jmmv FREE(nfs_pub.np_index, M_TEMP);
765 1.1 jmmv return error;
766 1.1 jmmv }
767 1.1 jmmv }
768 1.1 jmmv
769 1.1 jmmv nfs_pub.np_mount = mp;
770 1.1 jmmv nfs_pub.np_valid = 1;
771 1.1 jmmv return 0;
772 1.1 jmmv }
773 1.1 jmmv
774 1.1 jmmv /*
775 1.1 jmmv * Lookup an export entry in the exports list that matches the address
776 1.1 jmmv * stored in 'nam'. If no entry is found, the default one is used instead
777 1.1 jmmv * (if available).
778 1.1 jmmv */
779 1.1 jmmv static struct netcred *
780 1.5 yamt netcred_lookup(struct netexport *ne, struct mbuf *nam)
781 1.1 jmmv {
782 1.1 jmmv struct netcred *np;
783 1.1 jmmv struct radix_node_head *rnh;
784 1.1 jmmv struct sockaddr *saddr;
785 1.1 jmmv
786 1.7 yamt if ((ne->ne_mount->mnt_flag & MNT_EXPORTED) == 0) {
787 1.7 yamt return NULL;
788 1.7 yamt }
789 1.5 yamt
790 1.5 yamt /*
791 1.5 yamt * Lookup in the export list first.
792 1.5 yamt */
793 1.1 jmmv np = NULL;
794 1.5 yamt if (nam != NULL) {
795 1.5 yamt saddr = mtod(nam, struct sockaddr *);
796 1.5 yamt rnh = ne->ne_rtable[saddr->sa_family];
797 1.5 yamt if (rnh != NULL) {
798 1.5 yamt np = (struct netcred *)
799 1.5 yamt (*rnh->rnh_matchaddr)((caddr_t)saddr,
800 1.5 yamt rnh);
801 1.5 yamt if (np && np->netc_rnodes->rn_flags & RNF_ROOT)
802 1.5 yamt np = NULL;
803 1.1 jmmv }
804 1.1 jmmv }
805 1.5 yamt /*
806 1.5 yamt * If no address match, use the default if it exists.
807 1.5 yamt */
808 1.5 yamt if (np == NULL && ne->ne_mount->mnt_flag & MNT_DEFEXPORTED)
809 1.5 yamt np = &ne->ne_defexported;
810 1.5 yamt
811 1.1 jmmv return np;
812 1.1 jmmv }
813 1.8 yamt
814 1.8 yamt static struct lock netexport_lock = LOCK_INITIALIZER(PVFS, "netexp", 0, 0);
815 1.8 yamt
816 1.8 yamt void
817 1.8 yamt netexport_rdlock(void)
818 1.8 yamt {
819 1.8 yamt
820 1.8 yamt lockmgr(&netexport_lock, LK_SHARED, NULL);
821 1.8 yamt }
822 1.8 yamt
823 1.8 yamt void
824 1.8 yamt netexport_rdunlock(void)
825 1.8 yamt {
826 1.8 yamt
827 1.8 yamt lockmgr(&netexport_lock, LK_RELEASE, NULL);
828 1.8 yamt }
829 1.8 yamt
830 1.8 yamt static void
831 1.8 yamt netexport_wrlock(void)
832 1.8 yamt {
833 1.8 yamt
834 1.8 yamt lockmgr(&netexport_lock, LK_EXCLUSIVE, NULL);
835 1.8 yamt }
836 1.8 yamt
837 1.8 yamt static void
838 1.8 yamt netexport_wrunlock(void)
839 1.8 yamt {
840 1.8 yamt
841 1.8 yamt lockmgr(&netexport_lock, LK_RELEASE, NULL);
842 1.8 yamt }
843