nfs_subs.c revision 1.87 1 1.87 fvdl /* $NetBSD: nfs_subs.c,v 1.87 2000/10/24 12:02:04 fvdl Exp $ */
2 1.14 cgd
3 1.1 cgd /*
4 1.12 mycroft * Copyright (c) 1989, 1993
5 1.12 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * This code is derived from software contributed to Berkeley by
8 1.1 cgd * Rick Macklem at The University of Guelph.
9 1.1 cgd *
10 1.1 cgd * Redistribution and use in source and binary forms, with or without
11 1.1 cgd * modification, are permitted provided that the following conditions
12 1.1 cgd * are met:
13 1.1 cgd * 1. Redistributions of source code must retain the above copyright
14 1.1 cgd * notice, this list of conditions and the following disclaimer.
15 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 cgd * notice, this list of conditions and the following disclaimer in the
17 1.1 cgd * documentation and/or other materials provided with the distribution.
18 1.1 cgd * 3. All advertising materials mentioning features or use of this software
19 1.1 cgd * must display the following acknowledgement:
20 1.1 cgd * This product includes software developed by the University of
21 1.1 cgd * California, Berkeley and its contributors.
22 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
23 1.1 cgd * may be used to endorse or promote products derived from this software
24 1.1 cgd * without specific prior written permission.
25 1.1 cgd *
26 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 1.1 cgd * SUCH DAMAGE.
37 1.1 cgd *
38 1.25 fvdl * @(#)nfs_subs.c 8.8 (Berkeley) 5/22/95
39 1.1 cgd */
40 1.1 cgd
41 1.83 fvdl /*
42 1.83 fvdl * Copyright 2000 Wasabi Systems, Inc.
43 1.83 fvdl * All rights reserved.
44 1.83 fvdl *
45 1.83 fvdl * Written by Frank van der Linden for Wasabi Systems, Inc.
46 1.83 fvdl *
47 1.83 fvdl * Redistribution and use in source and binary forms, with or without
48 1.83 fvdl * modification, are permitted provided that the following conditions
49 1.83 fvdl * are met:
50 1.83 fvdl * 1. Redistributions of source code must retain the above copyright
51 1.83 fvdl * notice, this list of conditions and the following disclaimer.
52 1.83 fvdl * 2. Redistributions in binary form must reproduce the above copyright
53 1.83 fvdl * notice, this list of conditions and the following disclaimer in the
54 1.83 fvdl * documentation and/or other materials provided with the distribution.
55 1.83 fvdl * 3. All advertising materials mentioning features or use of this software
56 1.83 fvdl * must display the following acknowledgement:
57 1.83 fvdl * This product includes software developed for the NetBSD Project by
58 1.83 fvdl * Wasabi Systems, Inc.
59 1.83 fvdl * 4. The name of Wasabi Systems, Inc. may not be used to endorse
60 1.83 fvdl * or promote products derived from this software without specific prior
61 1.83 fvdl * written permission.
62 1.83 fvdl *
63 1.83 fvdl * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
64 1.83 fvdl * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
65 1.83 fvdl * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
66 1.83 fvdl * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
67 1.83 fvdl * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
68 1.83 fvdl * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
69 1.83 fvdl * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
70 1.83 fvdl * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
71 1.83 fvdl * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
72 1.83 fvdl * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
73 1.83 fvdl * POSSIBILITY OF SUCH DAMAGE.
74 1.83 fvdl */
75 1.83 fvdl
76 1.55 thorpej #include "fs_nfs.h"
77 1.82 bjh21 #include "opt_nfs.h"
78 1.61 thorpej #include "opt_nfsserver.h"
79 1.62 jonathan #include "opt_iso.h"
80 1.76 fvdl #include "opt_inet.h"
81 1.25 fvdl
82 1.1 cgd /*
83 1.1 cgd * These functions support the macros and help fiddle mbuf chains for
84 1.1 cgd * the nfs op functions. They do things like create the rpc header and
85 1.1 cgd * copy data between mbuf chains and uio lists.
86 1.1 cgd */
87 1.9 mycroft #include <sys/param.h>
88 1.9 mycroft #include <sys/proc.h>
89 1.9 mycroft #include <sys/systm.h>
90 1.9 mycroft #include <sys/kernel.h>
91 1.9 mycroft #include <sys/mount.h>
92 1.9 mycroft #include <sys/vnode.h>
93 1.9 mycroft #include <sys/namei.h>
94 1.9 mycroft #include <sys/mbuf.h>
95 1.12 mycroft #include <sys/socket.h>
96 1.12 mycroft #include <sys/stat.h>
97 1.25 fvdl #include <sys/malloc.h>
98 1.30 fvdl #include <sys/time.h>
99 1.43 fvdl #include <sys/dirent.h>
100 1.1 cgd
101 1.51 mrg #include <uvm/uvm_extern.h>
102 1.51 mrg
103 1.9 mycroft #include <nfs/rpcv2.h>
104 1.25 fvdl #include <nfs/nfsproto.h>
105 1.9 mycroft #include <nfs/nfsnode.h>
106 1.9 mycroft #include <nfs/nfs.h>
107 1.9 mycroft #include <nfs/xdr_subs.h>
108 1.9 mycroft #include <nfs/nfsm_subs.h>
109 1.12 mycroft #include <nfs/nfsmount.h>
110 1.12 mycroft #include <nfs/nqnfs.h>
111 1.12 mycroft #include <nfs/nfsrtt.h>
112 1.24 christos #include <nfs/nfs_var.h>
113 1.12 mycroft
114 1.12 mycroft #include <miscfs/specfs/specdev.h>
115 1.24 christos
116 1.12 mycroft #include <netinet/in.h>
117 1.12 mycroft #ifdef ISO
118 1.12 mycroft #include <netiso/iso.h>
119 1.12 mycroft #endif
120 1.1 cgd
121 1.1 cgd /*
122 1.1 cgd * Data items converted to xdr at startup, since they are constant
123 1.1 cgd * This is kinda hokey, but may save a little time doing byte swaps
124 1.1 cgd */
125 1.22 cgd u_int32_t nfs_xdrneg1;
126 1.22 cgd u_int32_t rpc_call, rpc_vers, rpc_reply, rpc_msgdenied, rpc_autherr,
127 1.25 fvdl rpc_mismatch, rpc_auth_unix, rpc_msgaccepted,
128 1.12 mycroft rpc_auth_kerb;
129 1.25 fvdl u_int32_t nfs_prog, nqnfs_prog, nfs_true, nfs_false;
130 1.12 mycroft
131 1.1 cgd /* And other global data */
132 1.22 cgd static u_int32_t nfs_xid = 0;
133 1.25 fvdl nfstype nfsv2_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFNON,
134 1.25 fvdl NFCHR, NFNON };
135 1.25 fvdl nfstype nfsv3_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFSOCK,
136 1.25 fvdl NFFIFO, NFNON };
137 1.25 fvdl enum vtype nv2tov_type[8] = { VNON, VREG, VDIR, VBLK, VCHR, VLNK, VNON, VNON };
138 1.25 fvdl enum vtype nv3tov_type[8]={ VNON, VREG, VDIR, VBLK, VCHR, VLNK, VSOCK, VFIFO };
139 1.25 fvdl int nfs_ticks;
140 1.25 fvdl
141 1.35 thorpej /* NFS client/server stats. */
142 1.35 thorpej struct nfsstats nfsstats;
143 1.35 thorpej
144 1.25 fvdl /*
145 1.25 fvdl * Mapping of old NFS Version 2 RPC numbers to generic numbers.
146 1.25 fvdl */
147 1.25 fvdl int nfsv3_procid[NFS_NPROCS] = {
148 1.25 fvdl NFSPROC_NULL,
149 1.25 fvdl NFSPROC_GETATTR,
150 1.25 fvdl NFSPROC_SETATTR,
151 1.25 fvdl NFSPROC_NOOP,
152 1.25 fvdl NFSPROC_LOOKUP,
153 1.25 fvdl NFSPROC_READLINK,
154 1.25 fvdl NFSPROC_READ,
155 1.25 fvdl NFSPROC_NOOP,
156 1.25 fvdl NFSPROC_WRITE,
157 1.25 fvdl NFSPROC_CREATE,
158 1.25 fvdl NFSPROC_REMOVE,
159 1.25 fvdl NFSPROC_RENAME,
160 1.25 fvdl NFSPROC_LINK,
161 1.25 fvdl NFSPROC_SYMLINK,
162 1.25 fvdl NFSPROC_MKDIR,
163 1.25 fvdl NFSPROC_RMDIR,
164 1.25 fvdl NFSPROC_READDIR,
165 1.25 fvdl NFSPROC_FSSTAT,
166 1.25 fvdl NFSPROC_NOOP,
167 1.25 fvdl NFSPROC_NOOP,
168 1.25 fvdl NFSPROC_NOOP,
169 1.25 fvdl NFSPROC_NOOP,
170 1.25 fvdl NFSPROC_NOOP,
171 1.25 fvdl NFSPROC_NOOP,
172 1.25 fvdl NFSPROC_NOOP,
173 1.25 fvdl NFSPROC_NOOP
174 1.25 fvdl };
175 1.25 fvdl
176 1.25 fvdl /*
177 1.25 fvdl * and the reverse mapping from generic to Version 2 procedure numbers
178 1.25 fvdl */
179 1.25 fvdl int nfsv2_procid[NFS_NPROCS] = {
180 1.25 fvdl NFSV2PROC_NULL,
181 1.25 fvdl NFSV2PROC_GETATTR,
182 1.25 fvdl NFSV2PROC_SETATTR,
183 1.25 fvdl NFSV2PROC_LOOKUP,
184 1.25 fvdl NFSV2PROC_NOOP,
185 1.25 fvdl NFSV2PROC_READLINK,
186 1.25 fvdl NFSV2PROC_READ,
187 1.25 fvdl NFSV2PROC_WRITE,
188 1.25 fvdl NFSV2PROC_CREATE,
189 1.25 fvdl NFSV2PROC_MKDIR,
190 1.25 fvdl NFSV2PROC_SYMLINK,
191 1.25 fvdl NFSV2PROC_CREATE,
192 1.25 fvdl NFSV2PROC_REMOVE,
193 1.25 fvdl NFSV2PROC_RMDIR,
194 1.25 fvdl NFSV2PROC_RENAME,
195 1.25 fvdl NFSV2PROC_LINK,
196 1.25 fvdl NFSV2PROC_READDIR,
197 1.25 fvdl NFSV2PROC_NOOP,
198 1.25 fvdl NFSV2PROC_STATFS,
199 1.25 fvdl NFSV2PROC_NOOP,
200 1.25 fvdl NFSV2PROC_NOOP,
201 1.25 fvdl NFSV2PROC_NOOP,
202 1.25 fvdl NFSV2PROC_NOOP,
203 1.25 fvdl NFSV2PROC_NOOP,
204 1.25 fvdl NFSV2PROC_NOOP,
205 1.25 fvdl NFSV2PROC_NOOP,
206 1.25 fvdl };
207 1.25 fvdl
208 1.25 fvdl /*
209 1.25 fvdl * Maps errno values to nfs error numbers.
210 1.25 fvdl * Use NFSERR_IO as the catch all for ones not specifically defined in
211 1.25 fvdl * RFC 1094.
212 1.25 fvdl */
213 1.25 fvdl static u_char nfsrv_v2errmap[ELAST] = {
214 1.25 fvdl NFSERR_PERM, NFSERR_NOENT, NFSERR_IO, NFSERR_IO, NFSERR_IO,
215 1.25 fvdl NFSERR_NXIO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
216 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_ACCES, NFSERR_IO, NFSERR_IO,
217 1.25 fvdl NFSERR_IO, NFSERR_EXIST, NFSERR_IO, NFSERR_NODEV, NFSERR_NOTDIR,
218 1.25 fvdl NFSERR_ISDIR, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
219 1.25 fvdl NFSERR_IO, NFSERR_FBIG, NFSERR_NOSPC, NFSERR_IO, NFSERR_ROFS,
220 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
221 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
222 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
223 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
224 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
225 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
226 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_NAMETOL, NFSERR_IO, NFSERR_IO,
227 1.25 fvdl NFSERR_NOTEMPTY, NFSERR_IO, NFSERR_IO, NFSERR_DQUOT, NFSERR_STALE,
228 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
229 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
230 1.52 mikel NFSERR_IO, NFSERR_IO,
231 1.25 fvdl };
232 1.25 fvdl
233 1.25 fvdl /*
234 1.25 fvdl * Maps errno values to nfs error numbers.
235 1.25 fvdl * Although it is not obvious whether or not NFS clients really care if
236 1.25 fvdl * a returned error value is in the specified list for the procedure, the
237 1.25 fvdl * safest thing to do is filter them appropriately. For Version 2, the
238 1.25 fvdl * X/Open XNFS document is the only specification that defines error values
239 1.25 fvdl * for each RPC (The RFC simply lists all possible error values for all RPCs),
240 1.25 fvdl * so I have decided to not do this for Version 2.
241 1.25 fvdl * The first entry is the default error return and the rest are the valid
242 1.25 fvdl * errors for that RPC in increasing numeric order.
243 1.25 fvdl */
244 1.25 fvdl static short nfsv3err_null[] = {
245 1.25 fvdl 0,
246 1.25 fvdl 0,
247 1.25 fvdl };
248 1.25 fvdl
249 1.25 fvdl static short nfsv3err_getattr[] = {
250 1.25 fvdl NFSERR_IO,
251 1.25 fvdl NFSERR_IO,
252 1.25 fvdl NFSERR_STALE,
253 1.25 fvdl NFSERR_BADHANDLE,
254 1.25 fvdl NFSERR_SERVERFAULT,
255 1.25 fvdl 0,
256 1.25 fvdl };
257 1.25 fvdl
258 1.25 fvdl static short nfsv3err_setattr[] = {
259 1.25 fvdl NFSERR_IO,
260 1.25 fvdl NFSERR_PERM,
261 1.25 fvdl NFSERR_IO,
262 1.25 fvdl NFSERR_ACCES,
263 1.25 fvdl NFSERR_INVAL,
264 1.25 fvdl NFSERR_NOSPC,
265 1.25 fvdl NFSERR_ROFS,
266 1.25 fvdl NFSERR_DQUOT,
267 1.25 fvdl NFSERR_STALE,
268 1.25 fvdl NFSERR_BADHANDLE,
269 1.25 fvdl NFSERR_NOT_SYNC,
270 1.25 fvdl NFSERR_SERVERFAULT,
271 1.25 fvdl 0,
272 1.25 fvdl };
273 1.25 fvdl
274 1.25 fvdl static short nfsv3err_lookup[] = {
275 1.25 fvdl NFSERR_IO,
276 1.25 fvdl NFSERR_NOENT,
277 1.25 fvdl NFSERR_IO,
278 1.25 fvdl NFSERR_ACCES,
279 1.25 fvdl NFSERR_NOTDIR,
280 1.25 fvdl NFSERR_NAMETOL,
281 1.25 fvdl NFSERR_STALE,
282 1.25 fvdl NFSERR_BADHANDLE,
283 1.25 fvdl NFSERR_SERVERFAULT,
284 1.25 fvdl 0,
285 1.25 fvdl };
286 1.25 fvdl
287 1.25 fvdl static short nfsv3err_access[] = {
288 1.25 fvdl NFSERR_IO,
289 1.25 fvdl NFSERR_IO,
290 1.25 fvdl NFSERR_STALE,
291 1.25 fvdl NFSERR_BADHANDLE,
292 1.25 fvdl NFSERR_SERVERFAULT,
293 1.25 fvdl 0,
294 1.25 fvdl };
295 1.25 fvdl
296 1.25 fvdl static short nfsv3err_readlink[] = {
297 1.25 fvdl NFSERR_IO,
298 1.25 fvdl NFSERR_IO,
299 1.25 fvdl NFSERR_ACCES,
300 1.25 fvdl NFSERR_INVAL,
301 1.25 fvdl NFSERR_STALE,
302 1.25 fvdl NFSERR_BADHANDLE,
303 1.25 fvdl NFSERR_NOTSUPP,
304 1.25 fvdl NFSERR_SERVERFAULT,
305 1.25 fvdl 0,
306 1.25 fvdl };
307 1.25 fvdl
308 1.25 fvdl static short nfsv3err_read[] = {
309 1.25 fvdl NFSERR_IO,
310 1.25 fvdl NFSERR_IO,
311 1.25 fvdl NFSERR_NXIO,
312 1.25 fvdl NFSERR_ACCES,
313 1.25 fvdl NFSERR_INVAL,
314 1.25 fvdl NFSERR_STALE,
315 1.25 fvdl NFSERR_BADHANDLE,
316 1.25 fvdl NFSERR_SERVERFAULT,
317 1.67 fvdl NFSERR_JUKEBOX,
318 1.25 fvdl 0,
319 1.25 fvdl };
320 1.25 fvdl
321 1.25 fvdl static short nfsv3err_write[] = {
322 1.25 fvdl NFSERR_IO,
323 1.25 fvdl NFSERR_IO,
324 1.25 fvdl NFSERR_ACCES,
325 1.25 fvdl NFSERR_INVAL,
326 1.25 fvdl NFSERR_FBIG,
327 1.25 fvdl NFSERR_NOSPC,
328 1.25 fvdl NFSERR_ROFS,
329 1.25 fvdl NFSERR_DQUOT,
330 1.25 fvdl NFSERR_STALE,
331 1.25 fvdl NFSERR_BADHANDLE,
332 1.25 fvdl NFSERR_SERVERFAULT,
333 1.68 fvdl NFSERR_JUKEBOX,
334 1.25 fvdl 0,
335 1.25 fvdl };
336 1.25 fvdl
337 1.25 fvdl static short nfsv3err_create[] = {
338 1.25 fvdl NFSERR_IO,
339 1.25 fvdl NFSERR_IO,
340 1.25 fvdl NFSERR_ACCES,
341 1.25 fvdl NFSERR_EXIST,
342 1.25 fvdl NFSERR_NOTDIR,
343 1.25 fvdl NFSERR_NOSPC,
344 1.25 fvdl NFSERR_ROFS,
345 1.25 fvdl NFSERR_NAMETOL,
346 1.25 fvdl NFSERR_DQUOT,
347 1.25 fvdl NFSERR_STALE,
348 1.25 fvdl NFSERR_BADHANDLE,
349 1.25 fvdl NFSERR_NOTSUPP,
350 1.25 fvdl NFSERR_SERVERFAULT,
351 1.25 fvdl 0,
352 1.25 fvdl };
353 1.25 fvdl
354 1.25 fvdl static short nfsv3err_mkdir[] = {
355 1.25 fvdl NFSERR_IO,
356 1.25 fvdl NFSERR_IO,
357 1.25 fvdl NFSERR_ACCES,
358 1.25 fvdl NFSERR_EXIST,
359 1.25 fvdl NFSERR_NOTDIR,
360 1.25 fvdl NFSERR_NOSPC,
361 1.25 fvdl NFSERR_ROFS,
362 1.25 fvdl NFSERR_NAMETOL,
363 1.25 fvdl NFSERR_DQUOT,
364 1.25 fvdl NFSERR_STALE,
365 1.25 fvdl NFSERR_BADHANDLE,
366 1.25 fvdl NFSERR_NOTSUPP,
367 1.25 fvdl NFSERR_SERVERFAULT,
368 1.25 fvdl 0,
369 1.25 fvdl };
370 1.25 fvdl
371 1.25 fvdl static short nfsv3err_symlink[] = {
372 1.25 fvdl NFSERR_IO,
373 1.25 fvdl NFSERR_IO,
374 1.25 fvdl NFSERR_ACCES,
375 1.25 fvdl NFSERR_EXIST,
376 1.25 fvdl NFSERR_NOTDIR,
377 1.25 fvdl NFSERR_NOSPC,
378 1.25 fvdl NFSERR_ROFS,
379 1.25 fvdl NFSERR_NAMETOL,
380 1.25 fvdl NFSERR_DQUOT,
381 1.25 fvdl NFSERR_STALE,
382 1.25 fvdl NFSERR_BADHANDLE,
383 1.25 fvdl NFSERR_NOTSUPP,
384 1.25 fvdl NFSERR_SERVERFAULT,
385 1.25 fvdl 0,
386 1.25 fvdl };
387 1.25 fvdl
388 1.25 fvdl static short nfsv3err_mknod[] = {
389 1.25 fvdl NFSERR_IO,
390 1.25 fvdl NFSERR_IO,
391 1.25 fvdl NFSERR_ACCES,
392 1.25 fvdl NFSERR_EXIST,
393 1.25 fvdl NFSERR_NOTDIR,
394 1.25 fvdl NFSERR_NOSPC,
395 1.25 fvdl NFSERR_ROFS,
396 1.25 fvdl NFSERR_NAMETOL,
397 1.25 fvdl NFSERR_DQUOT,
398 1.25 fvdl NFSERR_STALE,
399 1.25 fvdl NFSERR_BADHANDLE,
400 1.25 fvdl NFSERR_NOTSUPP,
401 1.25 fvdl NFSERR_SERVERFAULT,
402 1.25 fvdl NFSERR_BADTYPE,
403 1.25 fvdl 0,
404 1.25 fvdl };
405 1.25 fvdl
406 1.25 fvdl static short nfsv3err_remove[] = {
407 1.25 fvdl NFSERR_IO,
408 1.25 fvdl NFSERR_NOENT,
409 1.25 fvdl NFSERR_IO,
410 1.25 fvdl NFSERR_ACCES,
411 1.25 fvdl NFSERR_NOTDIR,
412 1.25 fvdl NFSERR_ROFS,
413 1.25 fvdl NFSERR_NAMETOL,
414 1.25 fvdl NFSERR_STALE,
415 1.25 fvdl NFSERR_BADHANDLE,
416 1.25 fvdl NFSERR_SERVERFAULT,
417 1.25 fvdl 0,
418 1.25 fvdl };
419 1.25 fvdl
420 1.25 fvdl static short nfsv3err_rmdir[] = {
421 1.25 fvdl NFSERR_IO,
422 1.25 fvdl NFSERR_NOENT,
423 1.25 fvdl NFSERR_IO,
424 1.25 fvdl NFSERR_ACCES,
425 1.25 fvdl NFSERR_EXIST,
426 1.25 fvdl NFSERR_NOTDIR,
427 1.25 fvdl NFSERR_INVAL,
428 1.25 fvdl NFSERR_ROFS,
429 1.25 fvdl NFSERR_NAMETOL,
430 1.25 fvdl NFSERR_NOTEMPTY,
431 1.25 fvdl NFSERR_STALE,
432 1.25 fvdl NFSERR_BADHANDLE,
433 1.25 fvdl NFSERR_NOTSUPP,
434 1.25 fvdl NFSERR_SERVERFAULT,
435 1.25 fvdl 0,
436 1.25 fvdl };
437 1.25 fvdl
438 1.25 fvdl static short nfsv3err_rename[] = {
439 1.25 fvdl NFSERR_IO,
440 1.25 fvdl NFSERR_NOENT,
441 1.25 fvdl NFSERR_IO,
442 1.25 fvdl NFSERR_ACCES,
443 1.25 fvdl NFSERR_EXIST,
444 1.25 fvdl NFSERR_XDEV,
445 1.25 fvdl NFSERR_NOTDIR,
446 1.25 fvdl NFSERR_ISDIR,
447 1.25 fvdl NFSERR_INVAL,
448 1.25 fvdl NFSERR_NOSPC,
449 1.25 fvdl NFSERR_ROFS,
450 1.25 fvdl NFSERR_MLINK,
451 1.25 fvdl NFSERR_NAMETOL,
452 1.25 fvdl NFSERR_NOTEMPTY,
453 1.25 fvdl NFSERR_DQUOT,
454 1.25 fvdl NFSERR_STALE,
455 1.25 fvdl NFSERR_BADHANDLE,
456 1.25 fvdl NFSERR_NOTSUPP,
457 1.25 fvdl NFSERR_SERVERFAULT,
458 1.25 fvdl 0,
459 1.25 fvdl };
460 1.25 fvdl
461 1.25 fvdl static short nfsv3err_link[] = {
462 1.25 fvdl NFSERR_IO,
463 1.25 fvdl NFSERR_IO,
464 1.25 fvdl NFSERR_ACCES,
465 1.25 fvdl NFSERR_EXIST,
466 1.25 fvdl NFSERR_XDEV,
467 1.25 fvdl NFSERR_NOTDIR,
468 1.25 fvdl NFSERR_INVAL,
469 1.25 fvdl NFSERR_NOSPC,
470 1.25 fvdl NFSERR_ROFS,
471 1.25 fvdl NFSERR_MLINK,
472 1.25 fvdl NFSERR_NAMETOL,
473 1.25 fvdl NFSERR_DQUOT,
474 1.25 fvdl NFSERR_STALE,
475 1.25 fvdl NFSERR_BADHANDLE,
476 1.25 fvdl NFSERR_NOTSUPP,
477 1.25 fvdl NFSERR_SERVERFAULT,
478 1.25 fvdl 0,
479 1.25 fvdl };
480 1.25 fvdl
481 1.25 fvdl static short nfsv3err_readdir[] = {
482 1.25 fvdl NFSERR_IO,
483 1.25 fvdl NFSERR_IO,
484 1.25 fvdl NFSERR_ACCES,
485 1.25 fvdl NFSERR_NOTDIR,
486 1.25 fvdl NFSERR_STALE,
487 1.25 fvdl NFSERR_BADHANDLE,
488 1.25 fvdl NFSERR_BAD_COOKIE,
489 1.25 fvdl NFSERR_TOOSMALL,
490 1.25 fvdl NFSERR_SERVERFAULT,
491 1.25 fvdl 0,
492 1.25 fvdl };
493 1.25 fvdl
494 1.25 fvdl static short nfsv3err_readdirplus[] = {
495 1.25 fvdl NFSERR_IO,
496 1.25 fvdl NFSERR_IO,
497 1.25 fvdl NFSERR_ACCES,
498 1.25 fvdl NFSERR_NOTDIR,
499 1.25 fvdl NFSERR_STALE,
500 1.25 fvdl NFSERR_BADHANDLE,
501 1.25 fvdl NFSERR_BAD_COOKIE,
502 1.25 fvdl NFSERR_NOTSUPP,
503 1.25 fvdl NFSERR_TOOSMALL,
504 1.25 fvdl NFSERR_SERVERFAULT,
505 1.25 fvdl 0,
506 1.25 fvdl };
507 1.25 fvdl
508 1.25 fvdl static short nfsv3err_fsstat[] = {
509 1.25 fvdl NFSERR_IO,
510 1.25 fvdl NFSERR_IO,
511 1.25 fvdl NFSERR_STALE,
512 1.25 fvdl NFSERR_BADHANDLE,
513 1.25 fvdl NFSERR_SERVERFAULT,
514 1.25 fvdl 0,
515 1.25 fvdl };
516 1.25 fvdl
517 1.25 fvdl static short nfsv3err_fsinfo[] = {
518 1.25 fvdl NFSERR_STALE,
519 1.25 fvdl NFSERR_STALE,
520 1.25 fvdl NFSERR_BADHANDLE,
521 1.25 fvdl NFSERR_SERVERFAULT,
522 1.25 fvdl 0,
523 1.25 fvdl };
524 1.25 fvdl
525 1.25 fvdl static short nfsv3err_pathconf[] = {
526 1.25 fvdl NFSERR_STALE,
527 1.25 fvdl NFSERR_STALE,
528 1.25 fvdl NFSERR_BADHANDLE,
529 1.25 fvdl NFSERR_SERVERFAULT,
530 1.25 fvdl 0,
531 1.25 fvdl };
532 1.25 fvdl
533 1.25 fvdl static short nfsv3err_commit[] = {
534 1.25 fvdl NFSERR_IO,
535 1.25 fvdl NFSERR_IO,
536 1.25 fvdl NFSERR_STALE,
537 1.25 fvdl NFSERR_BADHANDLE,
538 1.25 fvdl NFSERR_SERVERFAULT,
539 1.25 fvdl 0,
540 1.25 fvdl };
541 1.25 fvdl
542 1.25 fvdl static short *nfsrv_v3errmap[] = {
543 1.25 fvdl nfsv3err_null,
544 1.25 fvdl nfsv3err_getattr,
545 1.25 fvdl nfsv3err_setattr,
546 1.25 fvdl nfsv3err_lookup,
547 1.25 fvdl nfsv3err_access,
548 1.25 fvdl nfsv3err_readlink,
549 1.25 fvdl nfsv3err_read,
550 1.25 fvdl nfsv3err_write,
551 1.25 fvdl nfsv3err_create,
552 1.25 fvdl nfsv3err_mkdir,
553 1.25 fvdl nfsv3err_symlink,
554 1.25 fvdl nfsv3err_mknod,
555 1.25 fvdl nfsv3err_remove,
556 1.25 fvdl nfsv3err_rmdir,
557 1.25 fvdl nfsv3err_rename,
558 1.25 fvdl nfsv3err_link,
559 1.25 fvdl nfsv3err_readdir,
560 1.25 fvdl nfsv3err_readdirplus,
561 1.25 fvdl nfsv3err_fsstat,
562 1.25 fvdl nfsv3err_fsinfo,
563 1.25 fvdl nfsv3err_pathconf,
564 1.25 fvdl nfsv3err_commit,
565 1.25 fvdl };
566 1.25 fvdl
567 1.12 mycroft extern struct nfsrtt nfsrtt;
568 1.12 mycroft extern time_t nqnfsstarttime;
569 1.12 mycroft extern int nqsrv_clockskew;
570 1.12 mycroft extern int nqsrv_writeslack;
571 1.12 mycroft extern int nqsrv_maxlease;
572 1.25 fvdl extern int nqnfs_piggy[NFS_NPROCS];
573 1.25 fvdl extern struct nfsnodehashhead *nfsnodehashtbl;
574 1.25 fvdl extern u_long nfsnodehash;
575 1.1 cgd
576 1.18 mycroft LIST_HEAD(nfsnodehashhead, nfsnode);
577 1.46 fvdl u_long nfsdirhashmask;
578 1.18 mycroft
579 1.43 fvdl int nfs_webnamei __P((struct nameidata *, struct vnode *, struct proc *));
580 1.43 fvdl
581 1.1 cgd /*
582 1.1 cgd * Create the header for an rpc request packet
583 1.1 cgd * The hsiz is the size of the rest of the nfs request header.
584 1.1 cgd * (just used to decide if a cluster is a good idea)
585 1.1 cgd */
586 1.12 mycroft struct mbuf *
587 1.12 mycroft nfsm_reqh(vp, procid, hsiz, bposp)
588 1.12 mycroft struct vnode *vp;
589 1.1 cgd u_long procid;
590 1.1 cgd int hsiz;
591 1.12 mycroft caddr_t *bposp;
592 1.12 mycroft {
593 1.75 augustss struct mbuf *mb;
594 1.86 fvdl caddr_t bpos;
595 1.86 fvdl struct nfsmount *nmp;
596 1.86 fvdl #ifndef NFS_V2_ONLY
597 1.75 augustss u_int32_t *tl;
598 1.12 mycroft struct mbuf *mb2;
599 1.12 mycroft int nqflag;
600 1.86 fvdl #endif
601 1.12 mycroft
602 1.12 mycroft MGET(mb, M_WAIT, MT_DATA);
603 1.12 mycroft if (hsiz >= MINCLSIZE)
604 1.12 mycroft MCLGET(mb, M_WAIT);
605 1.12 mycroft mb->m_len = 0;
606 1.12 mycroft bpos = mtod(mb, caddr_t);
607 1.12 mycroft
608 1.12 mycroft /*
609 1.12 mycroft * For NQNFS, add lease request.
610 1.12 mycroft */
611 1.12 mycroft if (vp) {
612 1.12 mycroft nmp = VFSTONFS(vp->v_mount);
613 1.84 bjh21 #ifndef NFS_V2_ONLY
614 1.12 mycroft if (nmp->nm_flag & NFSMNT_NQNFS) {
615 1.12 mycroft nqflag = NQNFS_NEEDLEASE(vp, procid);
616 1.12 mycroft if (nqflag) {
617 1.22 cgd nfsm_build(tl, u_int32_t *, 2*NFSX_UNSIGNED);
618 1.12 mycroft *tl++ = txdr_unsigned(nqflag);
619 1.12 mycroft *tl = txdr_unsigned(nmp->nm_leaseterm);
620 1.12 mycroft } else {
621 1.22 cgd nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
622 1.12 mycroft *tl = 0;
623 1.12 mycroft }
624 1.12 mycroft }
625 1.84 bjh21 #endif
626 1.12 mycroft }
627 1.12 mycroft /* Finally, return values */
628 1.12 mycroft *bposp = bpos;
629 1.12 mycroft return (mb);
630 1.12 mycroft }
631 1.12 mycroft
632 1.12 mycroft /*
633 1.12 mycroft * Build the RPC header and fill in the authorization info.
634 1.12 mycroft * The authorization string argument is only used when the credentials
635 1.12 mycroft * come from outside of the kernel.
636 1.12 mycroft * Returns the head of the mbuf list.
637 1.12 mycroft */
638 1.12 mycroft struct mbuf *
639 1.25 fvdl nfsm_rpchead(cr, nmflag, procid, auth_type, auth_len, auth_str, verf_len,
640 1.25 fvdl verf_str, mrest, mrest_len, mbp, xidp)
641 1.75 augustss struct ucred *cr;
642 1.25 fvdl int nmflag;
643 1.12 mycroft int procid;
644 1.12 mycroft int auth_type;
645 1.12 mycroft int auth_len;
646 1.12 mycroft char *auth_str;
647 1.25 fvdl int verf_len;
648 1.25 fvdl char *verf_str;
649 1.12 mycroft struct mbuf *mrest;
650 1.12 mycroft int mrest_len;
651 1.12 mycroft struct mbuf **mbp;
652 1.22 cgd u_int32_t *xidp;
653 1.1 cgd {
654 1.75 augustss struct mbuf *mb;
655 1.75 augustss u_int32_t *tl;
656 1.75 augustss caddr_t bpos;
657 1.75 augustss int i;
658 1.12 mycroft struct mbuf *mreq, *mb2;
659 1.12 mycroft int siz, grpsiz, authsiz;
660 1.30 fvdl struct timeval tv;
661 1.30 fvdl static u_int32_t base;
662 1.1 cgd
663 1.12 mycroft authsiz = nfsm_rndup(auth_len);
664 1.12 mycroft MGETHDR(mb, M_WAIT, MT_DATA);
665 1.25 fvdl if ((authsiz + 10 * NFSX_UNSIGNED) >= MINCLSIZE) {
666 1.12 mycroft MCLGET(mb, M_WAIT);
667 1.25 fvdl } else if ((authsiz + 10 * NFSX_UNSIGNED) < MHLEN) {
668 1.25 fvdl MH_ALIGN(mb, authsiz + 10 * NFSX_UNSIGNED);
669 1.12 mycroft } else {
670 1.25 fvdl MH_ALIGN(mb, 8 * NFSX_UNSIGNED);
671 1.1 cgd }
672 1.12 mycroft mb->m_len = 0;
673 1.12 mycroft mreq = mb;
674 1.12 mycroft bpos = mtod(mb, caddr_t);
675 1.12 mycroft
676 1.12 mycroft /*
677 1.12 mycroft * First the RPC header.
678 1.12 mycroft */
679 1.25 fvdl nfsm_build(tl, u_int32_t *, 8 * NFSX_UNSIGNED);
680 1.30 fvdl
681 1.30 fvdl /*
682 1.30 fvdl * derive initial xid from system time
683 1.30 fvdl * XXX time is invalid if root not yet mounted
684 1.30 fvdl */
685 1.30 fvdl if (!base && (rootvp)) {
686 1.30 fvdl microtime(&tv);
687 1.30 fvdl base = tv.tv_sec << 12;
688 1.30 fvdl nfs_xid = base;
689 1.30 fvdl }
690 1.30 fvdl /*
691 1.30 fvdl * Skip zero xid if it should ever happen.
692 1.30 fvdl */
693 1.12 mycroft if (++nfs_xid == 0)
694 1.12 mycroft nfs_xid++;
695 1.30 fvdl
696 1.12 mycroft *tl++ = *xidp = txdr_unsigned(nfs_xid);
697 1.1 cgd *tl++ = rpc_call;
698 1.1 cgd *tl++ = rpc_vers;
699 1.25 fvdl if (nmflag & NFSMNT_NQNFS) {
700 1.12 mycroft *tl++ = txdr_unsigned(NQNFS_PROG);
701 1.25 fvdl *tl++ = txdr_unsigned(NQNFS_VER3);
702 1.1 cgd } else {
703 1.12 mycroft *tl++ = txdr_unsigned(NFS_PROG);
704 1.25 fvdl if (nmflag & NFSMNT_NFSV3)
705 1.25 fvdl *tl++ = txdr_unsigned(NFS_VER3);
706 1.25 fvdl else
707 1.25 fvdl *tl++ = txdr_unsigned(NFS_VER2);
708 1.1 cgd }
709 1.25 fvdl if (nmflag & NFSMNT_NFSV3)
710 1.25 fvdl *tl++ = txdr_unsigned(procid);
711 1.25 fvdl else
712 1.25 fvdl *tl++ = txdr_unsigned(nfsv2_procid[procid]);
713 1.12 mycroft
714 1.12 mycroft /*
715 1.12 mycroft * And then the authorization cred.
716 1.12 mycroft */
717 1.12 mycroft *tl++ = txdr_unsigned(auth_type);
718 1.12 mycroft *tl = txdr_unsigned(authsiz);
719 1.12 mycroft switch (auth_type) {
720 1.12 mycroft case RPCAUTH_UNIX:
721 1.22 cgd nfsm_build(tl, u_int32_t *, auth_len);
722 1.12 mycroft *tl++ = 0; /* stamp ?? */
723 1.12 mycroft *tl++ = 0; /* NULL hostname */
724 1.12 mycroft *tl++ = txdr_unsigned(cr->cr_uid);
725 1.19 jtc *tl++ = txdr_unsigned(cr->cr_gid);
726 1.12 mycroft grpsiz = (auth_len >> 2) - 5;
727 1.12 mycroft *tl++ = txdr_unsigned(grpsiz);
728 1.20 mycroft for (i = 0; i < grpsiz; i++)
729 1.12 mycroft *tl++ = txdr_unsigned(cr->cr_groups[i]);
730 1.12 mycroft break;
731 1.25 fvdl case RPCAUTH_KERB4:
732 1.12 mycroft siz = auth_len;
733 1.12 mycroft while (siz > 0) {
734 1.12 mycroft if (M_TRAILINGSPACE(mb) == 0) {
735 1.12 mycroft MGET(mb2, M_WAIT, MT_DATA);
736 1.12 mycroft if (siz >= MINCLSIZE)
737 1.12 mycroft MCLGET(mb2, M_WAIT);
738 1.12 mycroft mb->m_next = mb2;
739 1.12 mycroft mb = mb2;
740 1.12 mycroft mb->m_len = 0;
741 1.12 mycroft bpos = mtod(mb, caddr_t);
742 1.12 mycroft }
743 1.12 mycroft i = min(siz, M_TRAILINGSPACE(mb));
744 1.63 perry memcpy(bpos, auth_str, i);
745 1.12 mycroft mb->m_len += i;
746 1.12 mycroft auth_str += i;
747 1.12 mycroft bpos += i;
748 1.12 mycroft siz -= i;
749 1.12 mycroft }
750 1.12 mycroft if ((siz = (nfsm_rndup(auth_len) - auth_len)) > 0) {
751 1.12 mycroft for (i = 0; i < siz; i++)
752 1.12 mycroft *bpos++ = '\0';
753 1.12 mycroft mb->m_len += siz;
754 1.12 mycroft }
755 1.12 mycroft break;
756 1.12 mycroft };
757 1.25 fvdl
758 1.25 fvdl /*
759 1.25 fvdl * And the verifier...
760 1.25 fvdl */
761 1.25 fvdl nfsm_build(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
762 1.25 fvdl if (verf_str) {
763 1.25 fvdl *tl++ = txdr_unsigned(RPCAUTH_KERB4);
764 1.25 fvdl *tl = txdr_unsigned(verf_len);
765 1.25 fvdl siz = verf_len;
766 1.25 fvdl while (siz > 0) {
767 1.25 fvdl if (M_TRAILINGSPACE(mb) == 0) {
768 1.25 fvdl MGET(mb2, M_WAIT, MT_DATA);
769 1.25 fvdl if (siz >= MINCLSIZE)
770 1.25 fvdl MCLGET(mb2, M_WAIT);
771 1.25 fvdl mb->m_next = mb2;
772 1.25 fvdl mb = mb2;
773 1.25 fvdl mb->m_len = 0;
774 1.25 fvdl bpos = mtod(mb, caddr_t);
775 1.25 fvdl }
776 1.25 fvdl i = min(siz, M_TRAILINGSPACE(mb));
777 1.63 perry memcpy(bpos, verf_str, i);
778 1.25 fvdl mb->m_len += i;
779 1.25 fvdl verf_str += i;
780 1.25 fvdl bpos += i;
781 1.25 fvdl siz -= i;
782 1.25 fvdl }
783 1.25 fvdl if ((siz = (nfsm_rndup(verf_len) - verf_len)) > 0) {
784 1.25 fvdl for (i = 0; i < siz; i++)
785 1.25 fvdl *bpos++ = '\0';
786 1.25 fvdl mb->m_len += siz;
787 1.25 fvdl }
788 1.25 fvdl } else {
789 1.25 fvdl *tl++ = txdr_unsigned(RPCAUTH_NULL);
790 1.25 fvdl *tl = 0;
791 1.25 fvdl }
792 1.12 mycroft mb->m_next = mrest;
793 1.25 fvdl mreq->m_pkthdr.len = authsiz + 10 * NFSX_UNSIGNED + mrest_len;
794 1.12 mycroft mreq->m_pkthdr.rcvif = (struct ifnet *)0;
795 1.12 mycroft *mbp = mb;
796 1.1 cgd return (mreq);
797 1.1 cgd }
798 1.1 cgd
799 1.1 cgd /*
800 1.1 cgd * copies mbuf chain to the uio scatter/gather list
801 1.1 cgd */
802 1.24 christos int
803 1.1 cgd nfsm_mbuftouio(mrep, uiop, siz, dpos)
804 1.1 cgd struct mbuf **mrep;
805 1.75 augustss struct uio *uiop;
806 1.1 cgd int siz;
807 1.1 cgd caddr_t *dpos;
808 1.1 cgd {
809 1.75 augustss char *mbufcp, *uiocp;
810 1.75 augustss int xfer, left, len;
811 1.75 augustss struct mbuf *mp;
812 1.1 cgd long uiosiz, rem;
813 1.1 cgd int error = 0;
814 1.1 cgd
815 1.1 cgd mp = *mrep;
816 1.1 cgd mbufcp = *dpos;
817 1.1 cgd len = mtod(mp, caddr_t)+mp->m_len-mbufcp;
818 1.1 cgd rem = nfsm_rndup(siz)-siz;
819 1.1 cgd while (siz > 0) {
820 1.1 cgd if (uiop->uio_iovcnt <= 0 || uiop->uio_iov == NULL)
821 1.1 cgd return (EFBIG);
822 1.1 cgd left = uiop->uio_iov->iov_len;
823 1.1 cgd uiocp = uiop->uio_iov->iov_base;
824 1.1 cgd if (left > siz)
825 1.1 cgd left = siz;
826 1.1 cgd uiosiz = left;
827 1.1 cgd while (left > 0) {
828 1.1 cgd while (len == 0) {
829 1.1 cgd mp = mp->m_next;
830 1.1 cgd if (mp == NULL)
831 1.1 cgd return (EBADRPC);
832 1.1 cgd mbufcp = mtod(mp, caddr_t);
833 1.1 cgd len = mp->m_len;
834 1.1 cgd }
835 1.1 cgd xfer = (left > len) ? len : left;
836 1.1 cgd #ifdef notdef
837 1.1 cgd /* Not Yet.. */
838 1.1 cgd if (uiop->uio_iov->iov_op != NULL)
839 1.1 cgd (*(uiop->uio_iov->iov_op))
840 1.1 cgd (mbufcp, uiocp, xfer);
841 1.1 cgd else
842 1.1 cgd #endif
843 1.1 cgd if (uiop->uio_segflg == UIO_SYSSPACE)
844 1.63 perry memcpy(uiocp, mbufcp, xfer);
845 1.1 cgd else
846 1.1 cgd copyout(mbufcp, uiocp, xfer);
847 1.1 cgd left -= xfer;
848 1.1 cgd len -= xfer;
849 1.1 cgd mbufcp += xfer;
850 1.1 cgd uiocp += xfer;
851 1.1 cgd uiop->uio_offset += xfer;
852 1.1 cgd uiop->uio_resid -= xfer;
853 1.1 cgd }
854 1.1 cgd if (uiop->uio_iov->iov_len <= siz) {
855 1.1 cgd uiop->uio_iovcnt--;
856 1.1 cgd uiop->uio_iov++;
857 1.1 cgd } else {
858 1.58 kleink (caddr_t)uiop->uio_iov->iov_base += uiosiz;
859 1.1 cgd uiop->uio_iov->iov_len -= uiosiz;
860 1.1 cgd }
861 1.1 cgd siz -= uiosiz;
862 1.1 cgd }
863 1.1 cgd *dpos = mbufcp;
864 1.1 cgd *mrep = mp;
865 1.1 cgd if (rem > 0) {
866 1.1 cgd if (len < rem)
867 1.1 cgd error = nfs_adv(mrep, dpos, rem, len);
868 1.1 cgd else
869 1.1 cgd *dpos += rem;
870 1.1 cgd }
871 1.1 cgd return (error);
872 1.1 cgd }
873 1.1 cgd
874 1.1 cgd /*
875 1.29 fvdl * copies a uio scatter/gather list to an mbuf chain.
876 1.29 fvdl * NOTE: can ony handle iovcnt == 1
877 1.1 cgd */
878 1.24 christos int
879 1.1 cgd nfsm_uiotombuf(uiop, mq, siz, bpos)
880 1.75 augustss struct uio *uiop;
881 1.1 cgd struct mbuf **mq;
882 1.1 cgd int siz;
883 1.1 cgd caddr_t *bpos;
884 1.1 cgd {
885 1.75 augustss char *uiocp;
886 1.75 augustss struct mbuf *mp, *mp2;
887 1.75 augustss int xfer, left, mlen;
888 1.1 cgd int uiosiz, clflg, rem;
889 1.1 cgd char *cp;
890 1.1 cgd
891 1.29 fvdl #ifdef DIAGNOSTIC
892 1.29 fvdl if (uiop->uio_iovcnt != 1)
893 1.29 fvdl panic("nfsm_uiotombuf: iovcnt != 1");
894 1.29 fvdl #endif
895 1.29 fvdl
896 1.1 cgd if (siz > MLEN) /* or should it >= MCLBYTES ?? */
897 1.1 cgd clflg = 1;
898 1.1 cgd else
899 1.1 cgd clflg = 0;
900 1.1 cgd rem = nfsm_rndup(siz)-siz;
901 1.12 mycroft mp = mp2 = *mq;
902 1.1 cgd while (siz > 0) {
903 1.1 cgd left = uiop->uio_iov->iov_len;
904 1.1 cgd uiocp = uiop->uio_iov->iov_base;
905 1.1 cgd if (left > siz)
906 1.1 cgd left = siz;
907 1.1 cgd uiosiz = left;
908 1.1 cgd while (left > 0) {
909 1.12 mycroft mlen = M_TRAILINGSPACE(mp);
910 1.12 mycroft if (mlen == 0) {
911 1.12 mycroft MGET(mp, M_WAIT, MT_DATA);
912 1.12 mycroft if (clflg)
913 1.12 mycroft MCLGET(mp, M_WAIT);
914 1.12 mycroft mp->m_len = 0;
915 1.12 mycroft mp2->m_next = mp;
916 1.12 mycroft mp2 = mp;
917 1.12 mycroft mlen = M_TRAILINGSPACE(mp);
918 1.12 mycroft }
919 1.12 mycroft xfer = (left > mlen) ? mlen : left;
920 1.1 cgd #ifdef notdef
921 1.1 cgd /* Not Yet.. */
922 1.1 cgd if (uiop->uio_iov->iov_op != NULL)
923 1.1 cgd (*(uiop->uio_iov->iov_op))
924 1.12 mycroft (uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
925 1.1 cgd else
926 1.1 cgd #endif
927 1.1 cgd if (uiop->uio_segflg == UIO_SYSSPACE)
928 1.63 perry memcpy(mtod(mp, caddr_t)+mp->m_len, uiocp, xfer);
929 1.1 cgd else
930 1.12 mycroft copyin(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
931 1.12 mycroft mp->m_len += xfer;
932 1.1 cgd left -= xfer;
933 1.1 cgd uiocp += xfer;
934 1.1 cgd uiop->uio_offset += xfer;
935 1.1 cgd uiop->uio_resid -= xfer;
936 1.1 cgd }
937 1.58 kleink (caddr_t)uiop->uio_iov->iov_base += uiosiz;
938 1.29 fvdl uiop->uio_iov->iov_len -= uiosiz;
939 1.1 cgd siz -= uiosiz;
940 1.1 cgd }
941 1.1 cgd if (rem > 0) {
942 1.12 mycroft if (rem > M_TRAILINGSPACE(mp)) {
943 1.1 cgd MGET(mp, M_WAIT, MT_DATA);
944 1.1 cgd mp->m_len = 0;
945 1.1 cgd mp2->m_next = mp;
946 1.1 cgd }
947 1.1 cgd cp = mtod(mp, caddr_t)+mp->m_len;
948 1.1 cgd for (left = 0; left < rem; left++)
949 1.1 cgd *cp++ = '\0';
950 1.1 cgd mp->m_len += rem;
951 1.1 cgd *bpos = cp;
952 1.1 cgd } else
953 1.1 cgd *bpos = mtod(mp, caddr_t)+mp->m_len;
954 1.1 cgd *mq = mp;
955 1.1 cgd return (0);
956 1.1 cgd }
957 1.1 cgd
958 1.1 cgd /*
959 1.39 fvdl * Get at least "siz" bytes of correctly aligned data.
960 1.39 fvdl * When called the mbuf pointers are not necessarily correct,
961 1.39 fvdl * dsosp points to what ought to be in m_data and left contains
962 1.39 fvdl * what ought to be in m_len.
963 1.12 mycroft * This is used by the macros nfsm_dissect and nfsm_dissecton for tough
964 1.1 cgd * cases. (The macros use the vars. dpos and dpos2)
965 1.1 cgd */
966 1.24 christos int
967 1.12 mycroft nfsm_disct(mdp, dposp, siz, left, cp2)
968 1.1 cgd struct mbuf **mdp;
969 1.1 cgd caddr_t *dposp;
970 1.1 cgd int siz;
971 1.1 cgd int left;
972 1.1 cgd caddr_t *cp2;
973 1.1 cgd {
974 1.75 augustss struct mbuf *m1, *m2;
975 1.39 fvdl struct mbuf *havebuf = NULL;
976 1.39 fvdl caddr_t src = *dposp;
977 1.39 fvdl caddr_t dst;
978 1.39 fvdl int len;
979 1.39 fvdl
980 1.39 fvdl #ifdef DEBUG
981 1.39 fvdl if (left < 0)
982 1.39 fvdl panic("nfsm_disct: left < 0");
983 1.39 fvdl #endif
984 1.39 fvdl m1 = *mdp;
985 1.39 fvdl /*
986 1.39 fvdl * Skip through the mbuf chain looking for an mbuf with
987 1.39 fvdl * some data. If the first mbuf found has enough data
988 1.39 fvdl * and it is correctly aligned return it.
989 1.39 fvdl */
990 1.1 cgd while (left == 0) {
991 1.39 fvdl havebuf = m1;
992 1.39 fvdl *mdp = m1 = m1->m_next;
993 1.39 fvdl if (m1 == NULL)
994 1.1 cgd return (EBADRPC);
995 1.39 fvdl src = mtod(m1, caddr_t);
996 1.39 fvdl left = m1->m_len;
997 1.39 fvdl /*
998 1.39 fvdl * If we start a new mbuf and it is big enough
999 1.39 fvdl * and correctly aligned just return it, don't
1000 1.39 fvdl * do any pull up.
1001 1.39 fvdl */
1002 1.39 fvdl if (left >= siz && nfsm_aligned(src)) {
1003 1.39 fvdl *cp2 = src;
1004 1.39 fvdl *dposp = src + siz;
1005 1.39 fvdl return (0);
1006 1.39 fvdl }
1007 1.1 cgd }
1008 1.39 fvdl if (m1->m_flags & M_EXT) {
1009 1.39 fvdl if (havebuf) {
1010 1.39 fvdl /* If the first mbuf with data has external data
1011 1.39 fvdl * and there is a previous empty mbuf use it
1012 1.39 fvdl * to move the data into.
1013 1.39 fvdl */
1014 1.39 fvdl m2 = m1;
1015 1.39 fvdl *mdp = m1 = havebuf;
1016 1.39 fvdl if (m1->m_flags & M_EXT) {
1017 1.41 thorpej MEXTREMOVE(m1);
1018 1.1 cgd }
1019 1.39 fvdl } else {
1020 1.39 fvdl /*
1021 1.39 fvdl * If the first mbuf has a external data
1022 1.39 fvdl * and there is no previous empty mbuf
1023 1.39 fvdl * allocate a new mbuf and move the external
1024 1.39 fvdl * data to the new mbuf. Also make the first
1025 1.39 fvdl * mbuf look empty.
1026 1.39 fvdl */
1027 1.39 fvdl m2 = m_get(M_WAIT, MT_DATA);
1028 1.39 fvdl m2->m_ext = m1->m_ext;
1029 1.39 fvdl m2->m_data = src;
1030 1.39 fvdl m2->m_len = left;
1031 1.41 thorpej MCLADDREFERENCE(m1, m2);
1032 1.41 thorpej MEXTREMOVE(m1);
1033 1.39 fvdl m2->m_next = m1->m_next;
1034 1.39 fvdl m1->m_next = m2;
1035 1.1 cgd }
1036 1.39 fvdl m1->m_len = 0;
1037 1.39 fvdl dst = m1->m_dat;
1038 1.39 fvdl } else {
1039 1.39 fvdl /*
1040 1.39 fvdl * If the first mbuf has no external data
1041 1.39 fvdl * move the data to the front of the mbuf.
1042 1.39 fvdl */
1043 1.39 fvdl if ((dst = m1->m_dat) != src)
1044 1.63 perry memmove(dst, src, left);
1045 1.39 fvdl dst += left;
1046 1.39 fvdl m1->m_len = left;
1047 1.39 fvdl m2 = m1->m_next;
1048 1.1 cgd }
1049 1.39 fvdl m1->m_flags &= ~M_PKTHDR;
1050 1.39 fvdl *cp2 = m1->m_data = m1->m_dat; /* data is at beginning of buffer */
1051 1.39 fvdl *dposp = mtod(m1, caddr_t) + siz;
1052 1.39 fvdl /*
1053 1.39 fvdl * Loop through mbufs pulling data up into first mbuf until
1054 1.39 fvdl * the first mbuf is full or there is no more data to
1055 1.39 fvdl * pullup.
1056 1.39 fvdl */
1057 1.39 fvdl while ((len = (MLEN - m1->m_len)) != 0 && m2) {
1058 1.39 fvdl if ((len = min(len, m2->m_len)) != 0)
1059 1.63 perry memcpy(dst, m2->m_data, len);
1060 1.39 fvdl m1->m_len += len;
1061 1.39 fvdl dst += len;
1062 1.39 fvdl m2->m_data += len;
1063 1.39 fvdl m2->m_len -= len;
1064 1.39 fvdl m2 = m2->m_next;
1065 1.39 fvdl }
1066 1.39 fvdl if (m1->m_len < siz)
1067 1.39 fvdl return (EBADRPC);
1068 1.1 cgd return (0);
1069 1.1 cgd }
1070 1.1 cgd
1071 1.1 cgd /*
1072 1.1 cgd * Advance the position in the mbuf chain.
1073 1.1 cgd */
1074 1.24 christos int
1075 1.1 cgd nfs_adv(mdp, dposp, offs, left)
1076 1.1 cgd struct mbuf **mdp;
1077 1.1 cgd caddr_t *dposp;
1078 1.1 cgd int offs;
1079 1.1 cgd int left;
1080 1.1 cgd {
1081 1.75 augustss struct mbuf *m;
1082 1.75 augustss int s;
1083 1.1 cgd
1084 1.1 cgd m = *mdp;
1085 1.1 cgd s = left;
1086 1.1 cgd while (s < offs) {
1087 1.1 cgd offs -= s;
1088 1.1 cgd m = m->m_next;
1089 1.1 cgd if (m == NULL)
1090 1.1 cgd return (EBADRPC);
1091 1.1 cgd s = m->m_len;
1092 1.1 cgd }
1093 1.1 cgd *mdp = m;
1094 1.1 cgd *dposp = mtod(m, caddr_t)+offs;
1095 1.1 cgd return (0);
1096 1.1 cgd }
1097 1.1 cgd
1098 1.1 cgd /*
1099 1.1 cgd * Copy a string into mbufs for the hard cases...
1100 1.1 cgd */
1101 1.24 christos int
1102 1.1 cgd nfsm_strtmbuf(mb, bpos, cp, siz)
1103 1.1 cgd struct mbuf **mb;
1104 1.1 cgd char **bpos;
1105 1.33 cgd const char *cp;
1106 1.1 cgd long siz;
1107 1.1 cgd {
1108 1.75 augustss struct mbuf *m1 = NULL, *m2;
1109 1.1 cgd long left, xfer, len, tlen;
1110 1.22 cgd u_int32_t *tl;
1111 1.1 cgd int putsize;
1112 1.1 cgd
1113 1.1 cgd putsize = 1;
1114 1.1 cgd m2 = *mb;
1115 1.12 mycroft left = M_TRAILINGSPACE(m2);
1116 1.1 cgd if (left > 0) {
1117 1.22 cgd tl = ((u_int32_t *)(*bpos));
1118 1.1 cgd *tl++ = txdr_unsigned(siz);
1119 1.1 cgd putsize = 0;
1120 1.1 cgd left -= NFSX_UNSIGNED;
1121 1.1 cgd m2->m_len += NFSX_UNSIGNED;
1122 1.1 cgd if (left > 0) {
1123 1.63 perry memcpy((caddr_t) tl, cp, left);
1124 1.1 cgd siz -= left;
1125 1.1 cgd cp += left;
1126 1.1 cgd m2->m_len += left;
1127 1.1 cgd left = 0;
1128 1.1 cgd }
1129 1.1 cgd }
1130 1.12 mycroft /* Loop around adding mbufs */
1131 1.1 cgd while (siz > 0) {
1132 1.1 cgd MGET(m1, M_WAIT, MT_DATA);
1133 1.1 cgd if (siz > MLEN)
1134 1.1 cgd MCLGET(m1, M_WAIT);
1135 1.1 cgd m1->m_len = NFSMSIZ(m1);
1136 1.1 cgd m2->m_next = m1;
1137 1.1 cgd m2 = m1;
1138 1.22 cgd tl = mtod(m1, u_int32_t *);
1139 1.1 cgd tlen = 0;
1140 1.1 cgd if (putsize) {
1141 1.1 cgd *tl++ = txdr_unsigned(siz);
1142 1.1 cgd m1->m_len -= NFSX_UNSIGNED;
1143 1.1 cgd tlen = NFSX_UNSIGNED;
1144 1.1 cgd putsize = 0;
1145 1.1 cgd }
1146 1.1 cgd if (siz < m1->m_len) {
1147 1.1 cgd len = nfsm_rndup(siz);
1148 1.1 cgd xfer = siz;
1149 1.1 cgd if (xfer < len)
1150 1.1 cgd *(tl+(xfer>>2)) = 0;
1151 1.1 cgd } else {
1152 1.1 cgd xfer = len = m1->m_len;
1153 1.1 cgd }
1154 1.63 perry memcpy((caddr_t) tl, cp, xfer);
1155 1.1 cgd m1->m_len = len+tlen;
1156 1.1 cgd siz -= xfer;
1157 1.1 cgd cp += xfer;
1158 1.1 cgd }
1159 1.1 cgd *mb = m1;
1160 1.1 cgd *bpos = mtod(m1, caddr_t)+m1->m_len;
1161 1.1 cgd return (0);
1162 1.1 cgd }
1163 1.1 cgd
1164 1.49 fvdl /*
1165 1.49 fvdl * Directory caching routines. They work as follows:
1166 1.49 fvdl * - a cache is maintained per VDIR nfsnode.
1167 1.49 fvdl * - for each offset cookie that is exported to userspace, and can
1168 1.49 fvdl * thus be thrown back at us as an offset to VOP_READDIR, store
1169 1.49 fvdl * information in the cache.
1170 1.49 fvdl * - cached are:
1171 1.49 fvdl * - cookie itself
1172 1.49 fvdl * - blocknumber (essentially just a search key in the buffer cache)
1173 1.49 fvdl * - entry number in block.
1174 1.49 fvdl * - offset cookie of block in which this entry is stored
1175 1.49 fvdl * - 32 bit cookie if NFSMNT_XLATECOOKIE is used.
1176 1.49 fvdl * - entries are looked up in a hash table
1177 1.49 fvdl * - also maintained is an LRU list of entries, used to determine
1178 1.49 fvdl * which ones to delete if the cache grows too large.
1179 1.49 fvdl * - if 32 <-> 64 translation mode is requested for a filesystem,
1180 1.49 fvdl * the cache also functions as a translation table
1181 1.49 fvdl * - in the translation case, invalidating the cache does not mean
1182 1.49 fvdl * flushing it, but just marking entries as invalid, except for
1183 1.49 fvdl * the <64bit cookie, 32bitcookie> pair which is still valid, to
1184 1.49 fvdl * still be able to use the cache as a translation table.
1185 1.49 fvdl * - 32 bit cookies are uniquely created by combining the hash table
1186 1.49 fvdl * entry value, and one generation count per hash table entry,
1187 1.49 fvdl * incremented each time an entry is appended to the chain.
1188 1.49 fvdl * - the cache is invalidated each time a direcory is modified
1189 1.49 fvdl * - sanity checks are also done; if an entry in a block turns
1190 1.49 fvdl * out not to have a matching cookie, the cache is invalidated
1191 1.49 fvdl * and a new block starting from the wanted offset is fetched from
1192 1.49 fvdl * the server.
1193 1.49 fvdl * - directory entries as read from the server are extended to contain
1194 1.49 fvdl * the 64bit and, optionally, the 32bit cookies, for sanity checking
1195 1.49 fvdl * the cache and exporting them to userspace through the cookie
1196 1.49 fvdl * argument to VOP_READDIR.
1197 1.49 fvdl */
1198 1.49 fvdl
1199 1.46 fvdl u_long
1200 1.46 fvdl nfs_dirhash(off)
1201 1.46 fvdl off_t off;
1202 1.46 fvdl {
1203 1.46 fvdl int i;
1204 1.46 fvdl char *cp = (char *)&off;
1205 1.46 fvdl u_long sum = 0L;
1206 1.46 fvdl
1207 1.46 fvdl for (i = 0 ; i < sizeof (off); i++)
1208 1.46 fvdl sum += *cp++;
1209 1.46 fvdl
1210 1.46 fvdl return sum;
1211 1.46 fvdl }
1212 1.46 fvdl
1213 1.49 fvdl void
1214 1.49 fvdl nfs_initdircache(vp)
1215 1.49 fvdl struct vnode *vp;
1216 1.49 fvdl {
1217 1.49 fvdl struct nfsnode *np = VTONFS(vp);
1218 1.49 fvdl struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1219 1.49 fvdl
1220 1.49 fvdl np->n_dircachesize = 0;
1221 1.49 fvdl np->n_dblkno = 1;
1222 1.49 fvdl np->n_dircache =
1223 1.53 chs hashinit(NFS_DIRHASHSIZ, M_NFSDIROFF, M_WAITOK, &nfsdirhashmask);
1224 1.49 fvdl TAILQ_INIT(&np->n_dirchain);
1225 1.49 fvdl if (nmp->nm_flag & NFSMNT_XLATECOOKIE) {
1226 1.49 fvdl MALLOC(np->n_dirgens, unsigned *,
1227 1.49 fvdl NFS_DIRHASHSIZ * sizeof (unsigned), M_NFSDIROFF,
1228 1.49 fvdl M_WAITOK);
1229 1.63 perry memset((caddr_t)np->n_dirgens, 0,
1230 1.49 fvdl NFS_DIRHASHSIZ * sizeof (unsigned));
1231 1.49 fvdl }
1232 1.49 fvdl }
1233 1.49 fvdl
1234 1.49 fvdl static struct nfsdircache dzero = {0, 0, {0, 0}, {0, 0}, 0, 0, 0};
1235 1.46 fvdl
1236 1.46 fvdl struct nfsdircache *
1237 1.49 fvdl nfs_searchdircache(vp, off, do32, hashent)
1238 1.46 fvdl struct vnode *vp;
1239 1.46 fvdl off_t off;
1240 1.49 fvdl int do32;
1241 1.49 fvdl int *hashent;
1242 1.49 fvdl {
1243 1.49 fvdl struct nfsdirhashhead *ndhp;
1244 1.49 fvdl struct nfsdircache *ndp = NULL;
1245 1.49 fvdl struct nfsnode *np = VTONFS(vp);
1246 1.49 fvdl unsigned ent;
1247 1.49 fvdl
1248 1.49 fvdl /*
1249 1.49 fvdl * Zero is always a valid cookie.
1250 1.49 fvdl */
1251 1.49 fvdl if (off == 0)
1252 1.49 fvdl return &dzero;
1253 1.49 fvdl
1254 1.49 fvdl /*
1255 1.49 fvdl * We use a 32bit cookie as search key, directly reconstruct
1256 1.49 fvdl * the hashentry. Else use the hashfunction.
1257 1.49 fvdl */
1258 1.49 fvdl if (do32) {
1259 1.49 fvdl ent = (u_int32_t)off >> 24;
1260 1.49 fvdl if (ent >= NFS_DIRHASHSIZ)
1261 1.49 fvdl return NULL;
1262 1.49 fvdl ndhp = &np->n_dircache[ent];
1263 1.49 fvdl } else {
1264 1.49 fvdl ndhp = NFSDIRHASH(np, off);
1265 1.49 fvdl }
1266 1.49 fvdl
1267 1.49 fvdl if (hashent)
1268 1.49 fvdl *hashent = (int)(ndhp - np->n_dircache);
1269 1.49 fvdl if (do32) {
1270 1.49 fvdl for (ndp = ndhp->lh_first; ndp; ndp = ndp->dc_hash.le_next) {
1271 1.49 fvdl if (ndp->dc_cookie32 == (u_int32_t)off) {
1272 1.49 fvdl /*
1273 1.49 fvdl * An invalidated entry will become the
1274 1.49 fvdl * start of a new block fetched from
1275 1.49 fvdl * the server.
1276 1.49 fvdl */
1277 1.49 fvdl if (ndp->dc_blkno == -1) {
1278 1.49 fvdl ndp->dc_blkcookie = ndp->dc_cookie;
1279 1.49 fvdl ndp->dc_blkno = np->n_dblkno++;
1280 1.49 fvdl ndp->dc_entry = 0;
1281 1.49 fvdl }
1282 1.49 fvdl break;
1283 1.49 fvdl }
1284 1.49 fvdl }
1285 1.49 fvdl } else {
1286 1.49 fvdl for (ndp = ndhp->lh_first; ndp; ndp = ndp->dc_hash.le_next)
1287 1.49 fvdl if (ndp->dc_cookie == off)
1288 1.49 fvdl break;
1289 1.49 fvdl }
1290 1.49 fvdl return ndp;
1291 1.49 fvdl }
1292 1.49 fvdl
1293 1.49 fvdl
1294 1.49 fvdl struct nfsdircache *
1295 1.49 fvdl nfs_enterdircache(vp, off, blkoff, en, blkno)
1296 1.49 fvdl struct vnode *vp;
1297 1.49 fvdl off_t off, blkoff;
1298 1.46 fvdl daddr_t blkno;
1299 1.49 fvdl int en;
1300 1.46 fvdl {
1301 1.46 fvdl struct nfsnode *np = VTONFS(vp);
1302 1.46 fvdl struct nfsdirhashhead *ndhp;
1303 1.49 fvdl struct nfsdircache *ndp = NULL, *first;
1304 1.49 fvdl struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1305 1.49 fvdl int hashent, gen, overwrite;
1306 1.46 fvdl
1307 1.49 fvdl if (!np->n_dircache)
1308 1.49 fvdl /*
1309 1.49 fvdl * XXX would like to do this in nfs_nget but vtype
1310 1.49 fvdl * isn't known at that time.
1311 1.49 fvdl */
1312 1.49 fvdl nfs_initdircache(vp);
1313 1.50 fvdl
1314 1.50 fvdl /*
1315 1.50 fvdl * XXX refuse entries for offset 0. amd(8) erroneously sets
1316 1.50 fvdl * cookie 0 for the '.' entry, making this necessary. This
1317 1.50 fvdl * isn't so bad, as 0 is a special case anyway.
1318 1.50 fvdl */
1319 1.50 fvdl if (off == 0)
1320 1.50 fvdl return &dzero;
1321 1.49 fvdl
1322 1.49 fvdl ndp = nfs_searchdircache(vp, off, 0, &hashent);
1323 1.49 fvdl
1324 1.49 fvdl if (ndp && ndp->dc_blkno != -1) {
1325 1.49 fvdl /*
1326 1.49 fvdl * Overwriting an old entry. Check if it's the same.
1327 1.49 fvdl * If so, just return. If not, remove the old entry.
1328 1.49 fvdl */
1329 1.49 fvdl if (ndp->dc_blkcookie == blkoff && ndp->dc_entry == en)
1330 1.49 fvdl return ndp;
1331 1.49 fvdl TAILQ_REMOVE(&np->n_dirchain, ndp, dc_chain);
1332 1.49 fvdl LIST_REMOVE(ndp, dc_hash);
1333 1.49 fvdl FREE(ndp, M_NFSDIROFF);
1334 1.49 fvdl ndp = 0;
1335 1.46 fvdl }
1336 1.46 fvdl
1337 1.49 fvdl ndhp = &np->n_dircache[hashent];
1338 1.46 fvdl
1339 1.49 fvdl if (!ndp) {
1340 1.49 fvdl MALLOC(ndp, struct nfsdircache *, sizeof (*ndp), M_NFSDIROFF,
1341 1.49 fvdl M_WAITOK);
1342 1.49 fvdl overwrite = 0;
1343 1.49 fvdl if (nmp->nm_flag & NFSMNT_XLATECOOKIE) {
1344 1.49 fvdl /*
1345 1.49 fvdl * We're allocating a new entry, so bump the
1346 1.49 fvdl * generation number.
1347 1.49 fvdl */
1348 1.49 fvdl gen = ++np->n_dirgens[hashent];
1349 1.49 fvdl if (gen == 0) {
1350 1.49 fvdl np->n_dirgens[hashent]++;
1351 1.49 fvdl gen++;
1352 1.49 fvdl }
1353 1.49 fvdl ndp->dc_cookie32 = (hashent << 24) | (gen & 0xffffff);
1354 1.49 fvdl }
1355 1.49 fvdl } else
1356 1.49 fvdl overwrite = 1;
1357 1.46 fvdl
1358 1.46 fvdl /*
1359 1.46 fvdl * If the entry number is 0, we are at the start of a new block, so
1360 1.46 fvdl * allocate a new blocknumber.
1361 1.46 fvdl */
1362 1.46 fvdl if (en == 0)
1363 1.46 fvdl ndp->dc_blkno = np->n_dblkno++;
1364 1.46 fvdl else
1365 1.46 fvdl ndp->dc_blkno = blkno;
1366 1.49 fvdl
1367 1.49 fvdl ndp->dc_cookie = off;
1368 1.49 fvdl ndp->dc_blkcookie = blkoff;
1369 1.46 fvdl ndp->dc_entry = en;
1370 1.46 fvdl
1371 1.49 fvdl if (overwrite)
1372 1.49 fvdl return ndp;
1373 1.49 fvdl
1374 1.46 fvdl /*
1375 1.46 fvdl * If the maximum directory cookie cache size has been reached
1376 1.46 fvdl * for this node, take one off the front. The idea is that
1377 1.46 fvdl * directories are typically read front-to-back once, so that
1378 1.46 fvdl * the oldest entries can be thrown away without much performance
1379 1.46 fvdl * loss.
1380 1.46 fvdl */
1381 1.46 fvdl if (np->n_dircachesize == NFS_MAXDIRCACHE) {
1382 1.46 fvdl first = np->n_dirchain.tqh_first;
1383 1.46 fvdl TAILQ_REMOVE(&np->n_dirchain, first, dc_chain);
1384 1.46 fvdl LIST_REMOVE(first, dc_hash);
1385 1.46 fvdl FREE(first, M_NFSDIROFF);
1386 1.46 fvdl } else
1387 1.46 fvdl np->n_dircachesize++;
1388 1.46 fvdl
1389 1.46 fvdl LIST_INSERT_HEAD(ndhp, ndp, dc_hash);
1390 1.46 fvdl TAILQ_INSERT_TAIL(&np->n_dirchain, ndp, dc_chain);
1391 1.46 fvdl return ndp;
1392 1.46 fvdl }
1393 1.46 fvdl
1394 1.46 fvdl void
1395 1.49 fvdl nfs_invaldircache(vp, forcefree)
1396 1.46 fvdl struct vnode *vp;
1397 1.49 fvdl int forcefree;
1398 1.46 fvdl {
1399 1.46 fvdl struct nfsnode *np = VTONFS(vp);
1400 1.46 fvdl struct nfsdircache *ndp = NULL;
1401 1.49 fvdl struct nfsmount *nmp = VFSTONFS(vp->v_mount);
1402 1.46 fvdl
1403 1.46 fvdl #ifdef DIAGNOSTIC
1404 1.46 fvdl if (vp->v_type != VDIR)
1405 1.46 fvdl panic("nfs: invaldircache: not dir");
1406 1.46 fvdl #endif
1407 1.46 fvdl
1408 1.46 fvdl if (!np->n_dircache)
1409 1.46 fvdl return;
1410 1.46 fvdl
1411 1.49 fvdl if (!(nmp->nm_flag & NFSMNT_XLATECOOKIE) || forcefree) {
1412 1.49 fvdl while ((ndp = np->n_dirchain.tqh_first)) {
1413 1.49 fvdl TAILQ_REMOVE(&np->n_dirchain, ndp, dc_chain);
1414 1.49 fvdl LIST_REMOVE(ndp, dc_hash);
1415 1.49 fvdl FREE(ndp, M_NFSDIROFF);
1416 1.49 fvdl }
1417 1.49 fvdl np->n_dircachesize = 0;
1418 1.49 fvdl if (forcefree && np->n_dirgens) {
1419 1.49 fvdl FREE(np->n_dirgens, M_NFSDIROFF);
1420 1.49 fvdl }
1421 1.49 fvdl } else {
1422 1.49 fvdl for (ndp = np->n_dirchain.tqh_first; ndp;
1423 1.49 fvdl ndp = ndp->dc_chain.tqe_next)
1424 1.49 fvdl ndp->dc_blkno = -1;
1425 1.46 fvdl }
1426 1.46 fvdl
1427 1.49 fvdl np->n_dblkno = 1;
1428 1.46 fvdl }
1429 1.46 fvdl
1430 1.1 cgd /*
1431 1.35 thorpej * Called once before VFS init to initialize shared and
1432 1.35 thorpej * server-specific data structures.
1433 1.1 cgd */
1434 1.24 christos void
1435 1.1 cgd nfs_init()
1436 1.1 cgd {
1437 1.12 mycroft nfsrtt.pos = 0;
1438 1.1 cgd rpc_vers = txdr_unsigned(RPC_VER2);
1439 1.1 cgd rpc_call = txdr_unsigned(RPC_CALL);
1440 1.1 cgd rpc_reply = txdr_unsigned(RPC_REPLY);
1441 1.1 cgd rpc_msgdenied = txdr_unsigned(RPC_MSGDENIED);
1442 1.1 cgd rpc_msgaccepted = txdr_unsigned(RPC_MSGACCEPTED);
1443 1.1 cgd rpc_mismatch = txdr_unsigned(RPC_MISMATCH);
1444 1.12 mycroft rpc_autherr = txdr_unsigned(RPC_AUTHERR);
1445 1.1 cgd rpc_auth_unix = txdr_unsigned(RPCAUTH_UNIX);
1446 1.25 fvdl rpc_auth_kerb = txdr_unsigned(RPCAUTH_KERB4);
1447 1.1 cgd nfs_prog = txdr_unsigned(NFS_PROG);
1448 1.25 fvdl nqnfs_prog = txdr_unsigned(NQNFS_PROG);
1449 1.1 cgd nfs_true = txdr_unsigned(TRUE);
1450 1.1 cgd nfs_false = txdr_unsigned(FALSE);
1451 1.12 mycroft nfs_xdrneg1 = txdr_unsigned(-1);
1452 1.25 fvdl nfs_ticks = (hz * NFS_TICKINTVL + 500) / 1000;
1453 1.25 fvdl if (nfs_ticks < 1)
1454 1.25 fvdl nfs_ticks = 1;
1455 1.2 glass #ifdef NFSSERVER
1456 1.12 mycroft nfsrv_init(0); /* Init server data structures */
1457 1.1 cgd nfsrv_initcache(); /* Init the server request cache */
1458 1.36 fvdl #endif /* NFSSERVER */
1459 1.12 mycroft
1460 1.84 bjh21 #if defined(NFSSERVER) || !defined(NFS_V2_ONLY)
1461 1.12 mycroft /*
1462 1.37 fvdl * Initialize the nqnfs data structures.
1463 1.12 mycroft */
1464 1.12 mycroft if (nqnfsstarttime == 0) {
1465 1.12 mycroft nqnfsstarttime = boottime.tv_sec + nqsrv_maxlease
1466 1.12 mycroft + nqsrv_clockskew + nqsrv_writeslack;
1467 1.12 mycroft NQLOADNOVRAM(nqnfsstarttime);
1468 1.18 mycroft CIRCLEQ_INIT(&nqtimerhead);
1469 1.53 chs nqfhhashtbl = hashinit(NQLCHSZ, M_NQLEASE, M_WAITOK, &nqfhhash);
1470 1.12 mycroft }
1471 1.84 bjh21 #endif
1472 1.12 mycroft
1473 1.1 cgd /*
1474 1.1 cgd * Initialize reply list and start timer
1475 1.1 cgd */
1476 1.16 mycroft TAILQ_INIT(&nfs_reqq);
1477 1.24 christos nfs_timer(NULL);
1478 1.1 cgd }
1479 1.1 cgd
1480 1.38 thorpej #ifdef NFS
1481 1.35 thorpej /*
1482 1.35 thorpej * Called once at VFS init to initialize client-specific data structures.
1483 1.35 thorpej */
1484 1.35 thorpej void
1485 1.35 thorpej nfs_vfs_init()
1486 1.35 thorpej {
1487 1.75 augustss int i;
1488 1.35 thorpej
1489 1.35 thorpej /* Ensure async daemons disabled */
1490 1.35 thorpej for (i = 0; i < NFS_MAXASYNCDAEMON; i++) {
1491 1.35 thorpej nfs_iodwant[i] = (struct proc *)0;
1492 1.35 thorpej nfs_iodmount[i] = (struct nfsmount *)0;
1493 1.35 thorpej }
1494 1.35 thorpej nfs_nhinit(); /* Init the nfsnode table */
1495 1.73 jdolecek }
1496 1.73 jdolecek
1497 1.73 jdolecek void
1498 1.73 jdolecek nfs_vfs_done()
1499 1.73 jdolecek {
1500 1.73 jdolecek nfs_nhdone();
1501 1.35 thorpej }
1502 1.35 thorpej
1503 1.1 cgd /*
1504 1.12 mycroft * Attribute cache routines.
1505 1.12 mycroft * nfs_loadattrcache() - loads or updates the cache contents from attributes
1506 1.12 mycroft * that are on the mbuf list
1507 1.12 mycroft * nfs_getattrcache() - returns valid attributes if found in cache, returns
1508 1.12 mycroft * error otherwise
1509 1.1 cgd */
1510 1.12 mycroft
1511 1.12 mycroft /*
1512 1.12 mycroft * Load the attribute cache (that lives in the nfsnode entry) with
1513 1.12 mycroft * the values on the mbuf list and
1514 1.12 mycroft * Iff vap not NULL
1515 1.12 mycroft * copy the attributes to *vaper
1516 1.12 mycroft */
1517 1.24 christos int
1518 1.45 fvdl nfsm_loadattrcache(vpp, mdp, dposp, vaper)
1519 1.12 mycroft struct vnode **vpp;
1520 1.12 mycroft struct mbuf **mdp;
1521 1.12 mycroft caddr_t *dposp;
1522 1.12 mycroft struct vattr *vaper;
1523 1.1 cgd {
1524 1.75 augustss int32_t t1;
1525 1.25 fvdl caddr_t cp2;
1526 1.25 fvdl int error = 0;
1527 1.12 mycroft struct mbuf *md;
1528 1.45 fvdl int v3 = NFS_ISV3(*vpp);
1529 1.1 cgd
1530 1.12 mycroft md = *mdp;
1531 1.25 fvdl t1 = (mtod(md, caddr_t) + md->m_len) - *dposp;
1532 1.25 fvdl error = nfsm_disct(mdp, dposp, NFSX_FATTR(v3), t1, &cp2);
1533 1.24 christos if (error)
1534 1.12 mycroft return (error);
1535 1.45 fvdl return nfs_loadattrcache(vpp, (struct nfs_fattr *)cp2, vaper);
1536 1.45 fvdl }
1537 1.45 fvdl
1538 1.45 fvdl int
1539 1.45 fvdl nfs_loadattrcache(vpp, fp, vaper)
1540 1.45 fvdl struct vnode **vpp;
1541 1.45 fvdl struct nfs_fattr *fp;
1542 1.45 fvdl struct vattr *vaper;
1543 1.45 fvdl {
1544 1.75 augustss struct vnode *vp = *vpp;
1545 1.75 augustss struct vattr *vap;
1546 1.45 fvdl int v3 = NFS_ISV3(vp);
1547 1.45 fvdl enum vtype vtyp;
1548 1.45 fvdl u_short vmode;
1549 1.45 fvdl struct timespec mtime;
1550 1.45 fvdl struct vnode *nvp;
1551 1.45 fvdl int32_t rdev;
1552 1.75 augustss struct nfsnode *np;
1553 1.45 fvdl extern int (**spec_nfsv2nodeop_p) __P((void *));
1554 1.45 fvdl
1555 1.25 fvdl if (v3) {
1556 1.25 fvdl vtyp = nfsv3tov_type(fp->fa_type);
1557 1.25 fvdl vmode = fxdr_unsigned(u_short, fp->fa_mode);
1558 1.71 is rdev = makedev(fxdr_unsigned(u_int32_t, fp->fa3_rdev.specdata1),
1559 1.71 is fxdr_unsigned(u_int32_t, fp->fa3_rdev.specdata2));
1560 1.25 fvdl fxdr_nfsv3time(&fp->fa3_mtime, &mtime);
1561 1.12 mycroft } else {
1562 1.25 fvdl vtyp = nfsv2tov_type(fp->fa_type);
1563 1.25 fvdl vmode = fxdr_unsigned(u_short, fp->fa_mode);
1564 1.25 fvdl if (vtyp == VNON || vtyp == VREG)
1565 1.25 fvdl vtyp = IFTOVT(vmode);
1566 1.25 fvdl rdev = fxdr_unsigned(int32_t, fp->fa2_rdev);
1567 1.25 fvdl fxdr_nfsv2time(&fp->fa2_mtime, &mtime);
1568 1.25 fvdl
1569 1.25 fvdl /*
1570 1.25 fvdl * Really ugly NFSv2 kludge.
1571 1.25 fvdl */
1572 1.25 fvdl if (vtyp == VCHR && rdev == 0xffffffff)
1573 1.25 fvdl vtyp = VFIFO;
1574 1.12 mycroft }
1575 1.25 fvdl
1576 1.12 mycroft /*
1577 1.12 mycroft * If v_type == VNON it is a new node, so fill in the v_type,
1578 1.12 mycroft * n_mtime fields. Check to see if it represents a special
1579 1.12 mycroft * device, and if so, check for a possible alias. Once the
1580 1.12 mycroft * correct vnode has been obtained, fill in the rest of the
1581 1.12 mycroft * information.
1582 1.12 mycroft */
1583 1.12 mycroft np = VTONFS(vp);
1584 1.87 fvdl if (vp->v_type == VNON) {
1585 1.25 fvdl vp->v_type = vtyp;
1586 1.12 mycroft if (vp->v_type == VFIFO) {
1587 1.24 christos extern int (**fifo_nfsv2nodeop_p) __P((void *));
1588 1.12 mycroft vp->v_op = fifo_nfsv2nodeop_p;
1589 1.12 mycroft }
1590 1.12 mycroft if (vp->v_type == VCHR || vp->v_type == VBLK) {
1591 1.12 mycroft vp->v_op = spec_nfsv2nodeop_p;
1592 1.24 christos nvp = checkalias(vp, (dev_t)rdev, vp->v_mount);
1593 1.24 christos if (nvp) {
1594 1.12 mycroft /*
1595 1.12 mycroft * Discard unneeded vnode, but save its nfsnode.
1596 1.25 fvdl * Since the nfsnode does not have a lock, its
1597 1.25 fvdl * vnode lock has to be carried over.
1598 1.12 mycroft */
1599 1.12 mycroft nvp->v_data = vp->v_data;
1600 1.12 mycroft vp->v_data = NULL;
1601 1.12 mycroft vp->v_op = spec_vnodeop_p;
1602 1.70 wrstuden vput(vp);
1603 1.12 mycroft vgone(vp);
1604 1.70 wrstuden /*
1605 1.70 wrstuden * XXX When nfs starts locking, we need to
1606 1.70 wrstuden * lock the new node here.
1607 1.70 wrstuden */
1608 1.12 mycroft /*
1609 1.12 mycroft * Reinitialize aliased node.
1610 1.12 mycroft */
1611 1.12 mycroft np->n_vnode = nvp;
1612 1.12 mycroft *vpp = vp = nvp;
1613 1.12 mycroft }
1614 1.12 mycroft }
1615 1.23 jtc np->n_mtime = mtime.tv_sec;
1616 1.12 mycroft }
1617 1.49 fvdl vap = np->n_vattr;
1618 1.12 mycroft vap->va_type = vtyp;
1619 1.42 mycroft vap->va_mode = vmode & ALLPERMS;
1620 1.12 mycroft vap->va_rdev = (dev_t)rdev;
1621 1.12 mycroft vap->va_mtime = mtime;
1622 1.12 mycroft vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0];
1623 1.72 fvdl switch (vtyp) {
1624 1.72 fvdl case VDIR:
1625 1.72 fvdl vap->va_blocksize = NFS_DIRFRAGSIZ;
1626 1.72 fvdl break;
1627 1.72 fvdl case VBLK:
1628 1.72 fvdl vap->va_blocksize = BLKDEV_IOSIZE;
1629 1.72 fvdl break;
1630 1.72 fvdl case VCHR:
1631 1.72 fvdl vap->va_blocksize = MAXBSIZE;
1632 1.72 fvdl break;
1633 1.72 fvdl default:
1634 1.72 fvdl vap->va_blocksize = v3 ? vp->v_mount->mnt_stat.f_iosize :
1635 1.72 fvdl fxdr_unsigned(int32_t, fp->fa2_blocksize);
1636 1.72 fvdl break;
1637 1.72 fvdl }
1638 1.25 fvdl if (v3) {
1639 1.25 fvdl vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1640 1.25 fvdl vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1641 1.25 fvdl vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1642 1.66 fair vap->va_size = fxdr_hyper(&fp->fa3_size);
1643 1.66 fair vap->va_bytes = fxdr_hyper(&fp->fa3_used);
1644 1.25 fvdl vap->va_fileid = fxdr_unsigned(int32_t,
1645 1.25 fvdl fp->fa3_fileid.nfsuquad[1]);
1646 1.25 fvdl fxdr_nfsv3time(&fp->fa3_atime, &vap->va_atime);
1647 1.25 fvdl fxdr_nfsv3time(&fp->fa3_ctime, &vap->va_ctime);
1648 1.25 fvdl vap->va_flags = 0;
1649 1.25 fvdl vap->va_filerev = 0;
1650 1.12 mycroft } else {
1651 1.25 fvdl vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1652 1.25 fvdl vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1653 1.25 fvdl vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1654 1.25 fvdl vap->va_size = fxdr_unsigned(u_int32_t, fp->fa2_size);
1655 1.25 fvdl vap->va_bytes = fxdr_unsigned(int32_t, fp->fa2_blocks)
1656 1.25 fvdl * NFS_FABLKSIZE;
1657 1.25 fvdl vap->va_fileid = fxdr_unsigned(int32_t, fp->fa2_fileid);
1658 1.25 fvdl fxdr_nfsv2time(&fp->fa2_atime, &vap->va_atime);
1659 1.12 mycroft vap->va_flags = 0;
1660 1.25 fvdl vap->va_ctime.tv_sec = fxdr_unsigned(u_int32_t,
1661 1.25 fvdl fp->fa2_ctime.nfsv2_sec);
1662 1.25 fvdl vap->va_ctime.tv_nsec = 0;
1663 1.25 fvdl vap->va_gen = fxdr_unsigned(u_int32_t,fp->fa2_ctime.nfsv2_usec);
1664 1.12 mycroft vap->va_filerev = 0;
1665 1.12 mycroft }
1666 1.12 mycroft if (vap->va_size != np->n_size) {
1667 1.12 mycroft if (vap->va_type == VREG) {
1668 1.12 mycroft if (np->n_flag & NMODIFIED) {
1669 1.12 mycroft if (vap->va_size < np->n_size)
1670 1.12 mycroft vap->va_size = np->n_size;
1671 1.12 mycroft else
1672 1.12 mycroft np->n_size = vap->va_size;
1673 1.12 mycroft } else
1674 1.12 mycroft np->n_size = vap->va_size;
1675 1.51 mrg uvm_vnp_setsize(vp, np->n_size);
1676 1.12 mycroft } else
1677 1.12 mycroft np->n_size = vap->va_size;
1678 1.12 mycroft }
1679 1.12 mycroft np->n_attrstamp = time.tv_sec;
1680 1.12 mycroft if (vaper != NULL) {
1681 1.63 perry memcpy((caddr_t)vaper, (caddr_t)vap, sizeof(*vap));
1682 1.12 mycroft if (np->n_flag & NCHG) {
1683 1.25 fvdl if (np->n_flag & NACC)
1684 1.25 fvdl vaper->va_atime = np->n_atim;
1685 1.25 fvdl if (np->n_flag & NUPD)
1686 1.25 fvdl vaper->va_mtime = np->n_mtim;
1687 1.12 mycroft }
1688 1.12 mycroft }
1689 1.12 mycroft return (0);
1690 1.12 mycroft }
1691 1.12 mycroft
1692 1.12 mycroft /*
1693 1.12 mycroft * Check the time stamp
1694 1.12 mycroft * If the cache is valid, copy contents to *vap and return 0
1695 1.12 mycroft * otherwise return an error
1696 1.12 mycroft */
1697 1.24 christos int
1698 1.12 mycroft nfs_getattrcache(vp, vaper)
1699 1.75 augustss struct vnode *vp;
1700 1.12 mycroft struct vattr *vaper;
1701 1.12 mycroft {
1702 1.75 augustss struct nfsnode *np = VTONFS(vp);
1703 1.75 augustss struct vattr *vap;
1704 1.12 mycroft
1705 1.25 fvdl if ((time.tv_sec - np->n_attrstamp) >= NFS_ATTRTIMEO(np)) {
1706 1.12 mycroft nfsstats.attrcache_misses++;
1707 1.12 mycroft return (ENOENT);
1708 1.12 mycroft }
1709 1.12 mycroft nfsstats.attrcache_hits++;
1710 1.49 fvdl vap = np->n_vattr;
1711 1.12 mycroft if (vap->va_size != np->n_size) {
1712 1.12 mycroft if (vap->va_type == VREG) {
1713 1.12 mycroft if (np->n_flag & NMODIFIED) {
1714 1.12 mycroft if (vap->va_size < np->n_size)
1715 1.12 mycroft vap->va_size = np->n_size;
1716 1.12 mycroft else
1717 1.12 mycroft np->n_size = vap->va_size;
1718 1.12 mycroft } else
1719 1.12 mycroft np->n_size = vap->va_size;
1720 1.51 mrg uvm_vnp_setsize(vp, np->n_size);
1721 1.12 mycroft } else
1722 1.12 mycroft np->n_size = vap->va_size;
1723 1.12 mycroft }
1724 1.63 perry memcpy((caddr_t)vaper, (caddr_t)vap, sizeof(struct vattr));
1725 1.12 mycroft if (np->n_flag & NCHG) {
1726 1.25 fvdl if (np->n_flag & NACC)
1727 1.25 fvdl vaper->va_atime = np->n_atim;
1728 1.25 fvdl if (np->n_flag & NUPD)
1729 1.25 fvdl vaper->va_mtime = np->n_mtim;
1730 1.1 cgd }
1731 1.12 mycroft return (0);
1732 1.1 cgd }
1733 1.48 fvdl
1734 1.48 fvdl /*
1735 1.48 fvdl * Heuristic to see if the server XDR encodes directory cookies or not.
1736 1.48 fvdl * it is not supposed to, but a lot of servers may do this. Also, since
1737 1.48 fvdl * most/all servers will implement V2 as well, it is expected that they
1738 1.48 fvdl * may return just 32 bits worth of cookie information, so we need to
1739 1.48 fvdl * find out in which 32 bits this information is available. We do this
1740 1.48 fvdl * to avoid trouble with emulated binaries that can't handle 64 bit
1741 1.48 fvdl * directory offsets.
1742 1.48 fvdl */
1743 1.48 fvdl
1744 1.48 fvdl void
1745 1.48 fvdl nfs_cookieheuristic(vp, flagp, p, cred)
1746 1.48 fvdl struct vnode *vp;
1747 1.48 fvdl int *flagp;
1748 1.48 fvdl struct proc *p;
1749 1.48 fvdl struct ucred *cred;
1750 1.48 fvdl {
1751 1.48 fvdl struct uio auio;
1752 1.48 fvdl struct iovec aiov;
1753 1.48 fvdl caddr_t buf, cp;
1754 1.48 fvdl struct dirent *dp;
1755 1.57 fvdl off_t *cookies = NULL, *cop;
1756 1.48 fvdl int error, eof, nc, len;
1757 1.48 fvdl
1758 1.48 fvdl MALLOC(buf, caddr_t, NFS_DIRFRAGSIZ, M_TEMP, M_WAITOK);
1759 1.48 fvdl
1760 1.48 fvdl aiov.iov_base = buf;
1761 1.48 fvdl aiov.iov_len = NFS_DIRFRAGSIZ;
1762 1.48 fvdl auio.uio_iov = &aiov;
1763 1.48 fvdl auio.uio_iovcnt = 1;
1764 1.48 fvdl auio.uio_rw = UIO_READ;
1765 1.48 fvdl auio.uio_segflg = UIO_SYSSPACE;
1766 1.48 fvdl auio.uio_procp = p;
1767 1.48 fvdl auio.uio_resid = NFS_DIRFRAGSIZ;
1768 1.48 fvdl auio.uio_offset = 0;
1769 1.48 fvdl
1770 1.56 fvdl error = VOP_READDIR(vp, &auio, cred, &eof, &cookies, &nc);
1771 1.48 fvdl
1772 1.48 fvdl len = NFS_DIRFRAGSIZ - auio.uio_resid;
1773 1.48 fvdl if (error || len == 0) {
1774 1.48 fvdl FREE(buf, M_TEMP);
1775 1.57 fvdl if (cookies)
1776 1.80 thorpej free(cookies, M_TEMP);
1777 1.48 fvdl return;
1778 1.48 fvdl }
1779 1.48 fvdl
1780 1.48 fvdl /*
1781 1.48 fvdl * Find the first valid entry and look at its offset cookie.
1782 1.48 fvdl */
1783 1.48 fvdl
1784 1.48 fvdl cp = buf;
1785 1.48 fvdl for (cop = cookies; len > 0; len -= dp->d_reclen) {
1786 1.48 fvdl dp = (struct dirent *)cp;
1787 1.48 fvdl if (dp->d_fileno != 0 && len >= dp->d_reclen) {
1788 1.48 fvdl if ((*cop >> 32) != 0 && (*cop & 0xffffffffLL) == 0) {
1789 1.48 fvdl *flagp |= NFSMNT_SWAPCOOKIE;
1790 1.49 fvdl nfs_invaldircache(vp, 0);
1791 1.48 fvdl nfs_vinvalbuf(vp, 0, cred, p, 1);
1792 1.48 fvdl }
1793 1.48 fvdl break;
1794 1.48 fvdl }
1795 1.48 fvdl cop++;
1796 1.48 fvdl cp += dp->d_reclen;
1797 1.48 fvdl }
1798 1.48 fvdl
1799 1.48 fvdl FREE(buf, M_TEMP);
1800 1.80 thorpej free(cookies, M_TEMP);
1801 1.48 fvdl }
1802 1.38 thorpej #endif /* NFS */
1803 1.1 cgd
1804 1.1 cgd /*
1805 1.43 fvdl * Set up nameidata for a lookup() call and do it.
1806 1.43 fvdl *
1807 1.43 fvdl * If pubflag is set, this call is done for a lookup operation on the
1808 1.43 fvdl * public filehandle. In that case we allow crossing mountpoints and
1809 1.43 fvdl * absolute pathnames. However, the caller is expected to check that
1810 1.43 fvdl * the lookup result is within the public fs, and deny access if
1811 1.43 fvdl * it is not.
1812 1.1 cgd */
1813 1.24 christos int
1814 1.43 fvdl nfs_namei(ndp, fhp, len, slp, nam, mdp, dposp, retdirp, p, kerbflag, pubflag)
1815 1.75 augustss struct nameidata *ndp;
1816 1.1 cgd fhandle_t *fhp;
1817 1.1 cgd int len;
1818 1.12 mycroft struct nfssvc_sock *slp;
1819 1.12 mycroft struct mbuf *nam;
1820 1.1 cgd struct mbuf **mdp;
1821 1.1 cgd caddr_t *dposp;
1822 1.25 fvdl struct vnode **retdirp;
1823 1.1 cgd struct proc *p;
1824 1.43 fvdl int kerbflag, pubflag;
1825 1.1 cgd {
1826 1.75 augustss int i, rem;
1827 1.75 augustss struct mbuf *md;
1828 1.75 augustss char *fromcp, *tocp, *cp;
1829 1.43 fvdl struct iovec aiov;
1830 1.43 fvdl struct uio auio;
1831 1.1 cgd struct vnode *dp;
1832 1.43 fvdl int error, rdonly, linklen;
1833 1.12 mycroft struct componentname *cnp = &ndp->ni_cnd;
1834 1.1 cgd
1835 1.25 fvdl *retdirp = (struct vnode *)0;
1836 1.81 thorpej
1837 1.81 thorpej if ((len + 1) > MAXPATHLEN)
1838 1.81 thorpej return (ENAMETOOLONG);
1839 1.81 thorpej cnp->cn_pnbuf = PNBUF_GET();
1840 1.81 thorpej
1841 1.1 cgd /*
1842 1.1 cgd * Copy the name from the mbuf list to ndp->ni_pnbuf
1843 1.1 cgd * and set the various ndp fields appropriately.
1844 1.1 cgd */
1845 1.1 cgd fromcp = *dposp;
1846 1.12 mycroft tocp = cnp->cn_pnbuf;
1847 1.1 cgd md = *mdp;
1848 1.1 cgd rem = mtod(md, caddr_t) + md->m_len - fromcp;
1849 1.1 cgd for (i = 0; i < len; i++) {
1850 1.1 cgd while (rem == 0) {
1851 1.1 cgd md = md->m_next;
1852 1.1 cgd if (md == NULL) {
1853 1.1 cgd error = EBADRPC;
1854 1.1 cgd goto out;
1855 1.1 cgd }
1856 1.1 cgd fromcp = mtod(md, caddr_t);
1857 1.1 cgd rem = md->m_len;
1858 1.1 cgd }
1859 1.43 fvdl if (*fromcp == '\0' || (!pubflag && *fromcp == '/')) {
1860 1.25 fvdl error = EACCES;
1861 1.1 cgd goto out;
1862 1.1 cgd }
1863 1.1 cgd *tocp++ = *fromcp++;
1864 1.1 cgd rem--;
1865 1.1 cgd }
1866 1.1 cgd *tocp = '\0';
1867 1.1 cgd *mdp = md;
1868 1.1 cgd *dposp = fromcp;
1869 1.1 cgd len = nfsm_rndup(len)-len;
1870 1.1 cgd if (len > 0) {
1871 1.1 cgd if (rem >= len)
1872 1.1 cgd *dposp += len;
1873 1.24 christos else if ((error = nfs_adv(mdp, dposp, len, rem)) != 0)
1874 1.1 cgd goto out;
1875 1.1 cgd }
1876 1.43 fvdl
1877 1.1 cgd /*
1878 1.1 cgd * Extract and set starting directory.
1879 1.1 cgd */
1880 1.24 christos error = nfsrv_fhtovp(fhp, FALSE, &dp, ndp->ni_cnd.cn_cred, slp,
1881 1.43 fvdl nam, &rdonly, kerbflag, pubflag);
1882 1.24 christos if (error)
1883 1.1 cgd goto out;
1884 1.1 cgd if (dp->v_type != VDIR) {
1885 1.1 cgd vrele(dp);
1886 1.1 cgd error = ENOTDIR;
1887 1.1 cgd goto out;
1888 1.1 cgd }
1889 1.43 fvdl
1890 1.43 fvdl if (rdonly)
1891 1.43 fvdl cnp->cn_flags |= RDONLY;
1892 1.43 fvdl
1893 1.43 fvdl *retdirp = dp;
1894 1.43 fvdl
1895 1.43 fvdl if (pubflag) {
1896 1.43 fvdl /*
1897 1.43 fvdl * Oh joy. For WebNFS, handle those pesky '%' escapes,
1898 1.43 fvdl * and the 'native path' indicator.
1899 1.43 fvdl */
1900 1.81 thorpej cp = PNBUF_GET();
1901 1.43 fvdl fromcp = cnp->cn_pnbuf;
1902 1.43 fvdl tocp = cp;
1903 1.43 fvdl if ((unsigned char)*fromcp >= WEBNFS_SPECCHAR_START) {
1904 1.43 fvdl switch ((unsigned char)*fromcp) {
1905 1.43 fvdl case WEBNFS_NATIVE_CHAR:
1906 1.43 fvdl /*
1907 1.43 fvdl * 'Native' path for us is the same
1908 1.43 fvdl * as a path according to the NFS spec,
1909 1.43 fvdl * just skip the escape char.
1910 1.43 fvdl */
1911 1.43 fvdl fromcp++;
1912 1.43 fvdl break;
1913 1.43 fvdl /*
1914 1.43 fvdl * More may be added in the future, range 0x80-0xff
1915 1.43 fvdl */
1916 1.43 fvdl default:
1917 1.43 fvdl error = EIO;
1918 1.43 fvdl FREE(cp, M_NAMEI);
1919 1.43 fvdl goto out;
1920 1.43 fvdl }
1921 1.43 fvdl }
1922 1.43 fvdl /*
1923 1.43 fvdl * Translate the '%' escapes, URL-style.
1924 1.43 fvdl */
1925 1.43 fvdl while (*fromcp != '\0') {
1926 1.43 fvdl if (*fromcp == WEBNFS_ESC_CHAR) {
1927 1.43 fvdl if (fromcp[1] != '\0' && fromcp[2] != '\0') {
1928 1.43 fvdl fromcp++;
1929 1.43 fvdl *tocp++ = HEXSTRTOI(fromcp);
1930 1.43 fvdl fromcp += 2;
1931 1.43 fvdl continue;
1932 1.43 fvdl } else {
1933 1.43 fvdl error = ENOENT;
1934 1.43 fvdl FREE(cp, M_NAMEI);
1935 1.43 fvdl goto out;
1936 1.43 fvdl }
1937 1.43 fvdl } else
1938 1.43 fvdl *tocp++ = *fromcp++;
1939 1.43 fvdl }
1940 1.43 fvdl *tocp = '\0';
1941 1.81 thorpej PNBUF_PUT(cnp->cn_pnbuf);
1942 1.43 fvdl cnp->cn_pnbuf = cp;
1943 1.43 fvdl }
1944 1.43 fvdl
1945 1.43 fvdl ndp->ni_pathlen = (tocp - cnp->cn_pnbuf) + 1;
1946 1.43 fvdl ndp->ni_segflg = UIO_SYSSPACE;
1947 1.43 fvdl
1948 1.43 fvdl if (pubflag) {
1949 1.43 fvdl ndp->ni_rootdir = rootvnode;
1950 1.43 fvdl ndp->ni_loopcnt = 0;
1951 1.43 fvdl if (cnp->cn_pnbuf[0] == '/')
1952 1.43 fvdl dp = rootvnode;
1953 1.43 fvdl } else {
1954 1.43 fvdl cnp->cn_flags |= NOCROSSMOUNT;
1955 1.43 fvdl }
1956 1.43 fvdl
1957 1.43 fvdl cnp->cn_proc = p;
1958 1.25 fvdl VREF(dp);
1959 1.43 fvdl
1960 1.43 fvdl for (;;) {
1961 1.43 fvdl cnp->cn_nameptr = cnp->cn_pnbuf;
1962 1.1 cgd ndp->ni_startdir = dp;
1963 1.1 cgd /*
1964 1.1 cgd * And call lookup() to do the real work
1965 1.1 cgd */
1966 1.25 fvdl error = lookup(ndp);
1967 1.25 fvdl if (error)
1968 1.43 fvdl break;
1969 1.1 cgd /*
1970 1.1 cgd * Check for encountering a symbolic link
1971 1.1 cgd */
1972 1.43 fvdl if ((cnp->cn_flags & ISSYMLINK) == 0) {
1973 1.43 fvdl if (cnp->cn_flags & (SAVENAME | SAVESTART)) {
1974 1.43 fvdl cnp->cn_flags |= HASBUF;
1975 1.43 fvdl return (0);
1976 1.43 fvdl }
1977 1.43 fvdl break;
1978 1.43 fvdl } else {
1979 1.12 mycroft if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1)
1980 1.56 fvdl VOP_UNLOCK(ndp->ni_dvp, 0);
1981 1.43 fvdl if (!pubflag) {
1982 1.43 fvdl vrele(ndp->ni_dvp);
1983 1.43 fvdl vput(ndp->ni_vp);
1984 1.43 fvdl ndp->ni_vp = NULL;
1985 1.43 fvdl error = EINVAL;
1986 1.43 fvdl break;
1987 1.43 fvdl }
1988 1.43 fvdl
1989 1.43 fvdl if (ndp->ni_loopcnt++ >= MAXSYMLINKS) {
1990 1.43 fvdl error = ELOOP;
1991 1.43 fvdl break;
1992 1.43 fvdl }
1993 1.43 fvdl if (ndp->ni_pathlen > 1)
1994 1.81 thorpej cp = PNBUF_GET();
1995 1.1 cgd else
1996 1.43 fvdl cp = cnp->cn_pnbuf;
1997 1.43 fvdl aiov.iov_base = cp;
1998 1.43 fvdl aiov.iov_len = MAXPATHLEN;
1999 1.43 fvdl auio.uio_iov = &aiov;
2000 1.43 fvdl auio.uio_iovcnt = 1;
2001 1.43 fvdl auio.uio_offset = 0;
2002 1.43 fvdl auio.uio_rw = UIO_READ;
2003 1.43 fvdl auio.uio_segflg = UIO_SYSSPACE;
2004 1.43 fvdl auio.uio_procp = (struct proc *)0;
2005 1.43 fvdl auio.uio_resid = MAXPATHLEN;
2006 1.43 fvdl error = VOP_READLINK(ndp->ni_vp, &auio, cnp->cn_cred);
2007 1.43 fvdl if (error) {
2008 1.43 fvdl badlink:
2009 1.43 fvdl if (ndp->ni_pathlen > 1)
2010 1.81 thorpej PNBUF_PUT(cp);
2011 1.43 fvdl break;
2012 1.43 fvdl }
2013 1.43 fvdl linklen = MAXPATHLEN - auio.uio_resid;
2014 1.43 fvdl if (linklen == 0) {
2015 1.43 fvdl error = ENOENT;
2016 1.43 fvdl goto badlink;
2017 1.43 fvdl }
2018 1.43 fvdl if (linklen + ndp->ni_pathlen >= MAXPATHLEN) {
2019 1.43 fvdl error = ENAMETOOLONG;
2020 1.43 fvdl goto badlink;
2021 1.43 fvdl }
2022 1.43 fvdl if (ndp->ni_pathlen > 1) {
2023 1.63 perry memcpy(cp + linklen, ndp->ni_next, ndp->ni_pathlen);
2024 1.81 thorpej PNBUF_PUT(cnp->cn_pnbuf);
2025 1.43 fvdl cnp->cn_pnbuf = cp;
2026 1.43 fvdl } else
2027 1.43 fvdl cnp->cn_pnbuf[linklen] = '\0';
2028 1.43 fvdl ndp->ni_pathlen += linklen;
2029 1.1 cgd vput(ndp->ni_vp);
2030 1.43 fvdl dp = ndp->ni_dvp;
2031 1.43 fvdl /*
2032 1.43 fvdl * Check if root directory should replace current directory.
2033 1.43 fvdl */
2034 1.43 fvdl if (cnp->cn_pnbuf[0] == '/') {
2035 1.43 fvdl vrele(dp);
2036 1.43 fvdl dp = ndp->ni_rootdir;
2037 1.43 fvdl VREF(dp);
2038 1.43 fvdl }
2039 1.1 cgd }
2040 1.43 fvdl }
2041 1.1 cgd out:
2042 1.81 thorpej PNBUF_PUT(cnp->cn_pnbuf);
2043 1.1 cgd return (error);
2044 1.1 cgd }
2045 1.1 cgd
2046 1.1 cgd /*
2047 1.1 cgd * A fiddled version of m_adj() that ensures null fill to a long
2048 1.1 cgd * boundary and only trims off the back end
2049 1.1 cgd */
2050 1.12 mycroft void
2051 1.1 cgd nfsm_adj(mp, len, nul)
2052 1.1 cgd struct mbuf *mp;
2053 1.75 augustss int len;
2054 1.1 cgd int nul;
2055 1.1 cgd {
2056 1.75 augustss struct mbuf *m;
2057 1.75 augustss int count, i;
2058 1.75 augustss char *cp;
2059 1.1 cgd
2060 1.1 cgd /*
2061 1.1 cgd * Trim from tail. Scan the mbuf chain,
2062 1.1 cgd * calculating its length and finding the last mbuf.
2063 1.1 cgd * If the adjustment only affects this mbuf, then just
2064 1.1 cgd * adjust and return. Otherwise, rescan and truncate
2065 1.1 cgd * after the remaining size.
2066 1.1 cgd */
2067 1.1 cgd count = 0;
2068 1.1 cgd m = mp;
2069 1.1 cgd for (;;) {
2070 1.1 cgd count += m->m_len;
2071 1.1 cgd if (m->m_next == (struct mbuf *)0)
2072 1.1 cgd break;
2073 1.1 cgd m = m->m_next;
2074 1.1 cgd }
2075 1.1 cgd if (m->m_len > len) {
2076 1.1 cgd m->m_len -= len;
2077 1.1 cgd if (nul > 0) {
2078 1.1 cgd cp = mtod(m, caddr_t)+m->m_len-nul;
2079 1.1 cgd for (i = 0; i < nul; i++)
2080 1.1 cgd *cp++ = '\0';
2081 1.1 cgd }
2082 1.1 cgd return;
2083 1.1 cgd }
2084 1.1 cgd count -= len;
2085 1.1 cgd if (count < 0)
2086 1.1 cgd count = 0;
2087 1.1 cgd /*
2088 1.1 cgd * Correct length for chain is "count".
2089 1.1 cgd * Find the mbuf with last data, adjust its length,
2090 1.1 cgd * and toss data from remaining mbufs on chain.
2091 1.1 cgd */
2092 1.1 cgd for (m = mp; m; m = m->m_next) {
2093 1.1 cgd if (m->m_len >= count) {
2094 1.1 cgd m->m_len = count;
2095 1.1 cgd if (nul > 0) {
2096 1.1 cgd cp = mtod(m, caddr_t)+m->m_len-nul;
2097 1.1 cgd for (i = 0; i < nul; i++)
2098 1.1 cgd *cp++ = '\0';
2099 1.1 cgd }
2100 1.1 cgd break;
2101 1.1 cgd }
2102 1.1 cgd count -= m->m_len;
2103 1.1 cgd }
2104 1.25 fvdl for (m = m->m_next;m;m = m->m_next)
2105 1.1 cgd m->m_len = 0;
2106 1.1 cgd }
2107 1.1 cgd
2108 1.1 cgd /*
2109 1.25 fvdl * Make these functions instead of macros, so that the kernel text size
2110 1.25 fvdl * doesn't get too big...
2111 1.25 fvdl */
2112 1.25 fvdl void
2113 1.25 fvdl nfsm_srvwcc(nfsd, before_ret, before_vap, after_ret, after_vap, mbp, bposp)
2114 1.25 fvdl struct nfsrv_descript *nfsd;
2115 1.25 fvdl int before_ret;
2116 1.75 augustss struct vattr *before_vap;
2117 1.25 fvdl int after_ret;
2118 1.25 fvdl struct vattr *after_vap;
2119 1.25 fvdl struct mbuf **mbp;
2120 1.25 fvdl char **bposp;
2121 1.25 fvdl {
2122 1.75 augustss struct mbuf *mb = *mbp, *mb2;
2123 1.75 augustss char *bpos = *bposp;
2124 1.75 augustss u_int32_t *tl;
2125 1.25 fvdl
2126 1.25 fvdl if (before_ret) {
2127 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
2128 1.25 fvdl *tl = nfs_false;
2129 1.25 fvdl } else {
2130 1.25 fvdl nfsm_build(tl, u_int32_t *, 7 * NFSX_UNSIGNED);
2131 1.25 fvdl *tl++ = nfs_true;
2132 1.66 fair txdr_hyper(before_vap->va_size, tl);
2133 1.25 fvdl tl += 2;
2134 1.25 fvdl txdr_nfsv3time(&(before_vap->va_mtime), tl);
2135 1.25 fvdl tl += 2;
2136 1.25 fvdl txdr_nfsv3time(&(before_vap->va_ctime), tl);
2137 1.25 fvdl }
2138 1.25 fvdl *bposp = bpos;
2139 1.25 fvdl *mbp = mb;
2140 1.25 fvdl nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp);
2141 1.25 fvdl }
2142 1.25 fvdl
2143 1.25 fvdl void
2144 1.25 fvdl nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp)
2145 1.25 fvdl struct nfsrv_descript *nfsd;
2146 1.25 fvdl int after_ret;
2147 1.25 fvdl struct vattr *after_vap;
2148 1.25 fvdl struct mbuf **mbp;
2149 1.25 fvdl char **bposp;
2150 1.25 fvdl {
2151 1.75 augustss struct mbuf *mb = *mbp, *mb2;
2152 1.75 augustss char *bpos = *bposp;
2153 1.75 augustss u_int32_t *tl;
2154 1.75 augustss struct nfs_fattr *fp;
2155 1.25 fvdl
2156 1.25 fvdl if (after_ret) {
2157 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
2158 1.25 fvdl *tl = nfs_false;
2159 1.25 fvdl } else {
2160 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED + NFSX_V3FATTR);
2161 1.25 fvdl *tl++ = nfs_true;
2162 1.25 fvdl fp = (struct nfs_fattr *)tl;
2163 1.25 fvdl nfsm_srvfattr(nfsd, after_vap, fp);
2164 1.25 fvdl }
2165 1.25 fvdl *mbp = mb;
2166 1.25 fvdl *bposp = bpos;
2167 1.25 fvdl }
2168 1.25 fvdl
2169 1.25 fvdl void
2170 1.25 fvdl nfsm_srvfattr(nfsd, vap, fp)
2171 1.75 augustss struct nfsrv_descript *nfsd;
2172 1.75 augustss struct vattr *vap;
2173 1.75 augustss struct nfs_fattr *fp;
2174 1.25 fvdl {
2175 1.25 fvdl
2176 1.25 fvdl fp->fa_nlink = txdr_unsigned(vap->va_nlink);
2177 1.25 fvdl fp->fa_uid = txdr_unsigned(vap->va_uid);
2178 1.25 fvdl fp->fa_gid = txdr_unsigned(vap->va_gid);
2179 1.25 fvdl if (nfsd->nd_flag & ND_NFSV3) {
2180 1.25 fvdl fp->fa_type = vtonfsv3_type(vap->va_type);
2181 1.25 fvdl fp->fa_mode = vtonfsv3_mode(vap->va_mode);
2182 1.66 fair txdr_hyper(vap->va_size, &fp->fa3_size);
2183 1.66 fair txdr_hyper(vap->va_bytes, &fp->fa3_used);
2184 1.25 fvdl fp->fa3_rdev.specdata1 = txdr_unsigned(major(vap->va_rdev));
2185 1.25 fvdl fp->fa3_rdev.specdata2 = txdr_unsigned(minor(vap->va_rdev));
2186 1.25 fvdl fp->fa3_fsid.nfsuquad[0] = 0;
2187 1.25 fvdl fp->fa3_fsid.nfsuquad[1] = txdr_unsigned(vap->va_fsid);
2188 1.25 fvdl fp->fa3_fileid.nfsuquad[0] = 0;
2189 1.25 fvdl fp->fa3_fileid.nfsuquad[1] = txdr_unsigned(vap->va_fileid);
2190 1.25 fvdl txdr_nfsv3time(&vap->va_atime, &fp->fa3_atime);
2191 1.25 fvdl txdr_nfsv3time(&vap->va_mtime, &fp->fa3_mtime);
2192 1.25 fvdl txdr_nfsv3time(&vap->va_ctime, &fp->fa3_ctime);
2193 1.25 fvdl } else {
2194 1.25 fvdl fp->fa_type = vtonfsv2_type(vap->va_type);
2195 1.25 fvdl fp->fa_mode = vtonfsv2_mode(vap->va_type, vap->va_mode);
2196 1.25 fvdl fp->fa2_size = txdr_unsigned(vap->va_size);
2197 1.25 fvdl fp->fa2_blocksize = txdr_unsigned(vap->va_blocksize);
2198 1.25 fvdl if (vap->va_type == VFIFO)
2199 1.25 fvdl fp->fa2_rdev = 0xffffffff;
2200 1.25 fvdl else
2201 1.25 fvdl fp->fa2_rdev = txdr_unsigned(vap->va_rdev);
2202 1.25 fvdl fp->fa2_blocks = txdr_unsigned(vap->va_bytes / NFS_FABLKSIZE);
2203 1.25 fvdl fp->fa2_fsid = txdr_unsigned(vap->va_fsid);
2204 1.25 fvdl fp->fa2_fileid = txdr_unsigned(vap->va_fileid);
2205 1.25 fvdl txdr_nfsv2time(&vap->va_atime, &fp->fa2_atime);
2206 1.25 fvdl txdr_nfsv2time(&vap->va_mtime, &fp->fa2_mtime);
2207 1.25 fvdl txdr_nfsv2time(&vap->va_ctime, &fp->fa2_ctime);
2208 1.25 fvdl }
2209 1.25 fvdl }
2210 1.25 fvdl
2211 1.25 fvdl /*
2212 1.1 cgd * nfsrv_fhtovp() - convert a fh to a vnode ptr (optionally locked)
2213 1.1 cgd * - look up fsid in mount list (if not found ret error)
2214 1.12 mycroft * - get vp and export rights by calling VFS_FHTOVP()
2215 1.12 mycroft * - if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon
2216 1.1 cgd * - if not lockflag unlock it with VOP_UNLOCK()
2217 1.1 cgd */
2218 1.24 christos int
2219 1.43 fvdl nfsrv_fhtovp(fhp, lockflag, vpp, cred, slp, nam, rdonlyp, kerbflag, pubflag)
2220 1.1 cgd fhandle_t *fhp;
2221 1.1 cgd int lockflag;
2222 1.1 cgd struct vnode **vpp;
2223 1.1 cgd struct ucred *cred;
2224 1.12 mycroft struct nfssvc_sock *slp;
2225 1.12 mycroft struct mbuf *nam;
2226 1.12 mycroft int *rdonlyp;
2227 1.25 fvdl int kerbflag;
2228 1.1 cgd {
2229 1.75 augustss struct mount *mp;
2230 1.75 augustss int i;
2231 1.12 mycroft struct ucred *credanon;
2232 1.12 mycroft int error, exflags;
2233 1.40 fvdl struct sockaddr_in *saddr;
2234 1.1 cgd
2235 1.12 mycroft *vpp = (struct vnode *)0;
2236 1.43 fvdl
2237 1.43 fvdl if (nfs_ispublicfh(fhp)) {
2238 1.43 fvdl if (!pubflag || !nfs_pub.np_valid)
2239 1.43 fvdl return (ESTALE);
2240 1.43 fvdl fhp = &nfs_pub.np_handle;
2241 1.43 fvdl }
2242 1.43 fvdl
2243 1.25 fvdl mp = vfs_getvfs(&fhp->fh_fsid);
2244 1.25 fvdl if (!mp)
2245 1.1 cgd return (ESTALE);
2246 1.65 wrstuden error = VFS_CHECKEXP(mp, nam, &exflags, &credanon);
2247 1.64 wrstuden if (error)
2248 1.64 wrstuden return (error);
2249 1.64 wrstuden error = VFS_FHTOVP(mp, &fhp->fh_fid, vpp);
2250 1.24 christos if (error)
2251 1.12 mycroft return (error);
2252 1.40 fvdl
2253 1.43 fvdl if (!(exflags & (MNT_EXNORESPORT|MNT_EXPUBLIC))) {
2254 1.40 fvdl saddr = mtod(nam, struct sockaddr_in *);
2255 1.76 fvdl if ((saddr->sin_family == AF_INET) &&
2256 1.40 fvdl ntohs(saddr->sin_port) >= IPPORT_RESERVED) {
2257 1.40 fvdl vput(*vpp);
2258 1.40 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
2259 1.40 fvdl }
2260 1.76 fvdl #ifdef INET6
2261 1.76 fvdl if ((saddr->sin_family == AF_INET6) &&
2262 1.76 fvdl ntohs(saddr->sin_port) >= IPV6PORT_RESERVED) {
2263 1.76 fvdl vput(*vpp);
2264 1.76 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
2265 1.76 fvdl }
2266 1.76 fvdl #endif
2267 1.40 fvdl }
2268 1.12 mycroft /*
2269 1.12 mycroft * Check/setup credentials.
2270 1.12 mycroft */
2271 1.12 mycroft if (exflags & MNT_EXKERB) {
2272 1.25 fvdl if (!kerbflag) {
2273 1.12 mycroft vput(*vpp);
2274 1.25 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
2275 1.12 mycroft }
2276 1.25 fvdl } else if (kerbflag) {
2277 1.25 fvdl vput(*vpp);
2278 1.25 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
2279 1.12 mycroft } else if (cred->cr_uid == 0 || (exflags & MNT_EXPORTANON)) {
2280 1.12 mycroft cred->cr_uid = credanon->cr_uid;
2281 1.19 jtc cred->cr_gid = credanon->cr_gid;
2282 1.12 mycroft for (i = 0; i < credanon->cr_ngroups && i < NGROUPS; i++)
2283 1.12 mycroft cred->cr_groups[i] = credanon->cr_groups[i];
2284 1.15 mycroft cred->cr_ngroups = i;
2285 1.12 mycroft }
2286 1.12 mycroft if (exflags & MNT_EXRDONLY)
2287 1.12 mycroft *rdonlyp = 1;
2288 1.12 mycroft else
2289 1.12 mycroft *rdonlyp = 0;
2290 1.1 cgd if (!lockflag)
2291 1.56 fvdl VOP_UNLOCK(*vpp, 0);
2292 1.1 cgd return (0);
2293 1.43 fvdl }
2294 1.43 fvdl
2295 1.43 fvdl /*
2296 1.43 fvdl * WebNFS: check if a filehandle is a public filehandle. For v3, this
2297 1.43 fvdl * means a length of 0, for v2 it means all zeroes. nfsm_srvmtofh has
2298 1.43 fvdl * transformed this to all zeroes in both cases, so check for it.
2299 1.43 fvdl */
2300 1.43 fvdl int
2301 1.43 fvdl nfs_ispublicfh(fhp)
2302 1.43 fvdl fhandle_t *fhp;
2303 1.43 fvdl {
2304 1.43 fvdl char *cp = (char *)fhp;
2305 1.43 fvdl int i;
2306 1.43 fvdl
2307 1.43 fvdl for (i = 0; i < NFSX_V3FH; i++)
2308 1.43 fvdl if (*cp++ != 0)
2309 1.43 fvdl return (FALSE);
2310 1.43 fvdl return (TRUE);
2311 1.1 cgd }
2312 1.1 cgd
2313 1.1 cgd /*
2314 1.12 mycroft * This function compares two net addresses by family and returns TRUE
2315 1.12 mycroft * if they are the same host.
2316 1.12 mycroft * If there is any doubt, return FALSE.
2317 1.12 mycroft * The AF_INET family is handled as a special case so that address mbufs
2318 1.12 mycroft * don't need to be saved to store "struct in_addr", which is only 4 bytes.
2319 1.1 cgd */
2320 1.24 christos int
2321 1.12 mycroft netaddr_match(family, haddr, nam)
2322 1.12 mycroft int family;
2323 1.12 mycroft union nethostaddr *haddr;
2324 1.12 mycroft struct mbuf *nam;
2325 1.1 cgd {
2326 1.75 augustss struct sockaddr_in *inetaddr;
2327 1.1 cgd
2328 1.12 mycroft switch (family) {
2329 1.12 mycroft case AF_INET:
2330 1.12 mycroft inetaddr = mtod(nam, struct sockaddr_in *);
2331 1.12 mycroft if (inetaddr->sin_family == AF_INET &&
2332 1.12 mycroft inetaddr->sin_addr.s_addr == haddr->had_inetaddr)
2333 1.12 mycroft return (1);
2334 1.12 mycroft break;
2335 1.76 fvdl #ifdef INET6
2336 1.76 fvdl case AF_INET6:
2337 1.76 fvdl {
2338 1.76 fvdl struct sockaddr_in6 *sin6_1, *sin6_2;
2339 1.76 fvdl
2340 1.76 fvdl sin6_1 = mtod(nam, struct sockaddr_in6 *);
2341 1.76 fvdl sin6_2 = mtod(haddr->had_nam, struct sockaddr_in6 *);
2342 1.76 fvdl if (sin6_1->sin6_family == AF_INET6 &&
2343 1.76 fvdl IN6_ARE_ADDR_EQUAL(&sin6_1->sin6_addr, &sin6_2->sin6_addr))
2344 1.76 fvdl return 1;
2345 1.76 fvdl }
2346 1.76 fvdl #endif
2347 1.12 mycroft #ifdef ISO
2348 1.12 mycroft case AF_ISO:
2349 1.12 mycroft {
2350 1.75 augustss struct sockaddr_iso *isoaddr1, *isoaddr2;
2351 1.12 mycroft
2352 1.12 mycroft isoaddr1 = mtod(nam, struct sockaddr_iso *);
2353 1.12 mycroft isoaddr2 = mtod(haddr->had_nam, struct sockaddr_iso *);
2354 1.12 mycroft if (isoaddr1->siso_family == AF_ISO &&
2355 1.12 mycroft isoaddr1->siso_nlen > 0 &&
2356 1.12 mycroft isoaddr1->siso_nlen == isoaddr2->siso_nlen &&
2357 1.12 mycroft SAME_ISOADDR(isoaddr1, isoaddr2))
2358 1.12 mycroft return (1);
2359 1.12 mycroft break;
2360 1.12 mycroft }
2361 1.12 mycroft #endif /* ISO */
2362 1.12 mycroft default:
2363 1.12 mycroft break;
2364 1.12 mycroft };
2365 1.12 mycroft return (0);
2366 1.25 fvdl }
2367 1.25 fvdl
2368 1.25 fvdl
2369 1.25 fvdl /*
2370 1.25 fvdl * The write verifier has changed (probably due to a server reboot), so all
2371 1.25 fvdl * B_NEEDCOMMIT blocks will have to be written again. Since they are on the
2372 1.25 fvdl * dirty block list as B_DELWRI, all this takes is clearing the B_NEEDCOMMIT
2373 1.25 fvdl * flag. Once done the new write verifier can be set for the mount point.
2374 1.25 fvdl */
2375 1.25 fvdl void
2376 1.25 fvdl nfs_clearcommit(mp)
2377 1.25 fvdl struct mount *mp;
2378 1.25 fvdl {
2379 1.75 augustss struct vnode *vp, *nvp;
2380 1.75 augustss struct buf *bp, *nbp;
2381 1.83 fvdl struct nfsnode *np;
2382 1.25 fvdl int s;
2383 1.25 fvdl
2384 1.25 fvdl s = splbio();
2385 1.25 fvdl loop:
2386 1.25 fvdl for (vp = mp->mnt_vnodelist.lh_first; vp; vp = nvp) {
2387 1.25 fvdl if (vp->v_mount != mp) /* Paranoia */
2388 1.25 fvdl goto loop;
2389 1.85 enami nvp = vp->v_mntvnodes.le_next;
2390 1.85 enami if (vp->v_type == VNON)
2391 1.85 enami continue;
2392 1.83 fvdl np = VTONFS(vp);
2393 1.83 fvdl np->n_pushlo = np->n_pushhi = np->n_pushedlo =
2394 1.83 fvdl np->n_pushedhi = 0;
2395 1.83 fvdl np->n_commitflags &=
2396 1.83 fvdl ~(NFS_COMMIT_PUSH_VALID | NFS_COMMIT_PUSHED_VALID);
2397 1.25 fvdl for (bp = vp->v_dirtyblkhd.lh_first; bp; bp = nbp) {
2398 1.25 fvdl nbp = bp->b_vnbufs.le_next;
2399 1.25 fvdl if ((bp->b_flags & (B_BUSY | B_DELWRI | B_NEEDCOMMIT))
2400 1.25 fvdl == (B_DELWRI | B_NEEDCOMMIT))
2401 1.25 fvdl bp->b_flags &= ~B_NEEDCOMMIT;
2402 1.25 fvdl }
2403 1.25 fvdl }
2404 1.25 fvdl splx(s);
2405 1.83 fvdl }
2406 1.83 fvdl
2407 1.83 fvdl void
2408 1.83 fvdl nfs_merge_commit_ranges(vp)
2409 1.83 fvdl struct vnode *vp;
2410 1.83 fvdl {
2411 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2412 1.83 fvdl
2413 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSHED_VALID)) {
2414 1.83 fvdl np->n_pushedlo = np->n_pushlo;
2415 1.83 fvdl np->n_pushedhi = np->n_pushhi;
2416 1.83 fvdl np->n_commitflags |= NFS_COMMIT_PUSHED_VALID;
2417 1.83 fvdl } else {
2418 1.83 fvdl if (np->n_pushlo < np->n_pushedlo)
2419 1.83 fvdl np->n_pushedlo = np->n_pushlo;
2420 1.83 fvdl if (np->n_pushhi > np->n_pushedhi)
2421 1.83 fvdl np->n_pushedhi = np->n_pushhi;
2422 1.83 fvdl }
2423 1.83 fvdl
2424 1.83 fvdl np->n_pushlo = np->n_pushhi = 0;
2425 1.83 fvdl np->n_commitflags &= ~NFS_COMMIT_PUSH_VALID;
2426 1.83 fvdl
2427 1.83 fvdl #ifdef fvdl_debug
2428 1.83 fvdl printf("merge: committed: %u - %u\n", (unsigned)np->n_pushedlo,
2429 1.83 fvdl (unsigned)np->n_pushedhi);
2430 1.83 fvdl #endif
2431 1.83 fvdl }
2432 1.83 fvdl
2433 1.83 fvdl int
2434 1.83 fvdl nfs_in_committed_range(vp, bp)
2435 1.83 fvdl struct vnode *vp;
2436 1.83 fvdl struct buf *bp;
2437 1.83 fvdl {
2438 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2439 1.83 fvdl off_t lo, hi;
2440 1.83 fvdl
2441 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSHED_VALID))
2442 1.83 fvdl return 0;
2443 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2444 1.83 fvdl hi = lo + bp->b_dirtyend;
2445 1.83 fvdl
2446 1.83 fvdl return (lo >= np->n_pushedlo && hi <= np->n_pushedhi);
2447 1.83 fvdl }
2448 1.83 fvdl
2449 1.83 fvdl int
2450 1.83 fvdl nfs_in_tobecommitted_range(vp, bp)
2451 1.83 fvdl struct vnode *vp;
2452 1.83 fvdl struct buf *bp;
2453 1.83 fvdl {
2454 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2455 1.83 fvdl off_t lo, hi;
2456 1.83 fvdl
2457 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSH_VALID))
2458 1.83 fvdl return 0;
2459 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2460 1.83 fvdl hi = lo + bp->b_dirtyend;
2461 1.83 fvdl
2462 1.83 fvdl return (lo >= np->n_pushlo && hi <= np->n_pushhi);
2463 1.83 fvdl }
2464 1.83 fvdl
2465 1.83 fvdl void
2466 1.83 fvdl nfs_add_committed_range(vp, bp)
2467 1.83 fvdl struct vnode *vp;
2468 1.83 fvdl struct buf *bp;
2469 1.83 fvdl {
2470 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2471 1.83 fvdl off_t lo, hi;
2472 1.83 fvdl
2473 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2474 1.83 fvdl hi = lo + bp->b_dirtyend;
2475 1.83 fvdl
2476 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSHED_VALID)) {
2477 1.83 fvdl np->n_pushedlo = lo;
2478 1.83 fvdl np->n_pushedhi = hi;
2479 1.83 fvdl np->n_commitflags |= NFS_COMMIT_PUSHED_VALID;
2480 1.83 fvdl } else {
2481 1.83 fvdl if (hi > np->n_pushedhi)
2482 1.83 fvdl np->n_pushedhi = hi;
2483 1.83 fvdl if (lo < np->n_pushedlo)
2484 1.83 fvdl np->n_pushedlo = lo;
2485 1.83 fvdl }
2486 1.83 fvdl #ifdef fvdl_debug
2487 1.83 fvdl printf("add: committed: %u - %u\n", (unsigned)np->n_pushedlo,
2488 1.83 fvdl (unsigned)np->n_pushedhi);
2489 1.83 fvdl #endif
2490 1.83 fvdl }
2491 1.83 fvdl
2492 1.83 fvdl void
2493 1.83 fvdl nfs_del_committed_range(vp, bp)
2494 1.83 fvdl struct vnode *vp;
2495 1.83 fvdl struct buf *bp;
2496 1.83 fvdl {
2497 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2498 1.83 fvdl off_t lo, hi;
2499 1.83 fvdl
2500 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSHED_VALID))
2501 1.83 fvdl return;
2502 1.83 fvdl
2503 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2504 1.83 fvdl hi = lo + bp->b_dirtyend;
2505 1.83 fvdl
2506 1.83 fvdl if (lo > np->n_pushedhi || hi < np->n_pushedlo)
2507 1.83 fvdl return;
2508 1.83 fvdl if (lo <= np->n_pushedlo)
2509 1.83 fvdl np->n_pushedlo = hi;
2510 1.83 fvdl else if (hi >= np->n_pushedhi)
2511 1.83 fvdl np->n_pushedhi = lo;
2512 1.83 fvdl else {
2513 1.83 fvdl /*
2514 1.83 fvdl * XXX There's only one range. If the deleted range
2515 1.83 fvdl * is in the middle, pick the largest of the
2516 1.83 fvdl * contiguous ranges that it leaves.
2517 1.83 fvdl */
2518 1.83 fvdl if ((np->n_pushedlo - lo) > (hi - np->n_pushedhi))
2519 1.83 fvdl np->n_pushedhi = lo;
2520 1.83 fvdl else
2521 1.83 fvdl np->n_pushedlo = hi;
2522 1.83 fvdl }
2523 1.83 fvdl #ifdef fvdl_debug
2524 1.83 fvdl printf("del: committed: %u - %u\n", (unsigned)np->n_pushedlo,
2525 1.83 fvdl (unsigned)np->n_pushedhi);
2526 1.83 fvdl #endif
2527 1.83 fvdl }
2528 1.83 fvdl
2529 1.83 fvdl void
2530 1.83 fvdl nfs_add_tobecommitted_range(vp, bp)
2531 1.83 fvdl struct vnode *vp;
2532 1.83 fvdl struct buf *bp;
2533 1.83 fvdl {
2534 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2535 1.83 fvdl off_t lo, hi;
2536 1.83 fvdl
2537 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2538 1.83 fvdl hi = lo + bp->b_dirtyend;
2539 1.83 fvdl
2540 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSH_VALID)) {
2541 1.83 fvdl np->n_pushlo = lo;
2542 1.83 fvdl np->n_pushhi = hi;
2543 1.83 fvdl np->n_commitflags |= NFS_COMMIT_PUSH_VALID;
2544 1.83 fvdl } else {
2545 1.83 fvdl if (lo < np->n_pushlo)
2546 1.83 fvdl np->n_pushlo = lo;
2547 1.83 fvdl if (hi > np->n_pushhi)
2548 1.83 fvdl np->n_pushhi = hi;
2549 1.83 fvdl }
2550 1.83 fvdl #ifdef fvdl_debug
2551 1.83 fvdl printf("add: tobecommitted: %u - %u\n", (unsigned)np->n_pushlo,
2552 1.83 fvdl (unsigned)np->n_pushhi);
2553 1.83 fvdl #endif
2554 1.83 fvdl }
2555 1.83 fvdl
2556 1.83 fvdl void
2557 1.83 fvdl nfs_del_tobecommitted_range(vp, bp)
2558 1.83 fvdl struct vnode *vp;
2559 1.83 fvdl struct buf *bp;
2560 1.83 fvdl {
2561 1.83 fvdl struct nfsnode *np = VTONFS(vp);
2562 1.83 fvdl off_t lo, hi;
2563 1.83 fvdl
2564 1.83 fvdl if (!(np->n_commitflags & NFS_COMMIT_PUSH_VALID))
2565 1.83 fvdl return;
2566 1.83 fvdl
2567 1.83 fvdl lo = (off_t)bp->b_blkno * DEV_BSIZE;
2568 1.83 fvdl hi = lo + bp->b_dirtyend;
2569 1.83 fvdl
2570 1.83 fvdl if (lo > np->n_pushhi || hi < np->n_pushlo)
2571 1.83 fvdl return;
2572 1.83 fvdl
2573 1.83 fvdl if (lo <= np->n_pushlo)
2574 1.83 fvdl np->n_pushlo = hi;
2575 1.83 fvdl else if (hi >= np->n_pushhi)
2576 1.83 fvdl np->n_pushhi = lo;
2577 1.83 fvdl else {
2578 1.83 fvdl /*
2579 1.83 fvdl * XXX There's only one range. If the deleted range
2580 1.83 fvdl * is in the middle, pick the largest of the
2581 1.83 fvdl * contiguous ranges that it leaves.
2582 1.83 fvdl */
2583 1.83 fvdl if ((np->n_pushlo - lo) > (hi - np->n_pushhi))
2584 1.83 fvdl np->n_pushhi = lo;
2585 1.83 fvdl else
2586 1.83 fvdl np->n_pushlo = hi;
2587 1.83 fvdl }
2588 1.83 fvdl #ifdef fvdl_debug
2589 1.83 fvdl printf("del: tobecommitted: %u - %u\n", (unsigned)np->n_pushlo,
2590 1.83 fvdl (unsigned)np->n_pushhi);
2591 1.83 fvdl #endif
2592 1.25 fvdl }
2593 1.25 fvdl
2594 1.25 fvdl /*
2595 1.25 fvdl * Map errnos to NFS error numbers. For Version 3 also filter out error
2596 1.25 fvdl * numbers not specified for the associated procedure.
2597 1.25 fvdl */
2598 1.25 fvdl int
2599 1.25 fvdl nfsrv_errmap(nd, err)
2600 1.25 fvdl struct nfsrv_descript *nd;
2601 1.75 augustss int err;
2602 1.25 fvdl {
2603 1.75 augustss short *defaulterrp, *errp;
2604 1.25 fvdl
2605 1.25 fvdl if (nd->nd_flag & ND_NFSV3) {
2606 1.25 fvdl if (nd->nd_procnum <= NFSPROC_COMMIT) {
2607 1.25 fvdl errp = defaulterrp = nfsrv_v3errmap[nd->nd_procnum];
2608 1.25 fvdl while (*++errp) {
2609 1.25 fvdl if (*errp == err)
2610 1.25 fvdl return (err);
2611 1.25 fvdl else if (*errp > err)
2612 1.25 fvdl break;
2613 1.25 fvdl }
2614 1.25 fvdl return ((int)*defaulterrp);
2615 1.25 fvdl } else
2616 1.25 fvdl return (err & 0xffff);
2617 1.25 fvdl }
2618 1.25 fvdl if (err <= ELAST)
2619 1.25 fvdl return ((int)nfsrv_v2errmap[err - 1]);
2620 1.25 fvdl return (NFSERR_IO);
2621 1.25 fvdl }
2622 1.25 fvdl
2623 1.25 fvdl /*
2624 1.25 fvdl * Sort the group list in increasing numerical order.
2625 1.25 fvdl * (Insertion sort by Chris Torek, who was grossed out by the bubble sort
2626 1.25 fvdl * that used to be here.)
2627 1.25 fvdl */
2628 1.25 fvdl void
2629 1.25 fvdl nfsrvw_sort(list, num)
2630 1.75 augustss gid_t *list;
2631 1.75 augustss int num;
2632 1.25 fvdl {
2633 1.75 augustss int i, j;
2634 1.25 fvdl gid_t v;
2635 1.25 fvdl
2636 1.25 fvdl /* Insertion sort. */
2637 1.25 fvdl for (i = 1; i < num; i++) {
2638 1.25 fvdl v = list[i];
2639 1.25 fvdl /* find correct slot for value v, moving others up */
2640 1.25 fvdl for (j = i; --j >= 0 && v < list[j];)
2641 1.25 fvdl list[j + 1] = list[j];
2642 1.25 fvdl list[j + 1] = v;
2643 1.25 fvdl }
2644 1.25 fvdl }
2645 1.25 fvdl
2646 1.25 fvdl /*
2647 1.63 perry * copy credentials making sure that the result can be compared with memcmp().
2648 1.25 fvdl */
2649 1.25 fvdl void
2650 1.25 fvdl nfsrv_setcred(incred, outcred)
2651 1.75 augustss struct ucred *incred, *outcred;
2652 1.25 fvdl {
2653 1.75 augustss int i;
2654 1.25 fvdl
2655 1.63 perry memset((caddr_t)outcred, 0, sizeof (struct ucred));
2656 1.25 fvdl outcred->cr_ref = 1;
2657 1.25 fvdl outcred->cr_uid = incred->cr_uid;
2658 1.25 fvdl outcred->cr_gid = incred->cr_gid;
2659 1.25 fvdl outcred->cr_ngroups = incred->cr_ngroups;
2660 1.25 fvdl for (i = 0; i < incred->cr_ngroups; i++)
2661 1.25 fvdl outcred->cr_groups[i] = incred->cr_groups[i];
2662 1.25 fvdl nfsrvw_sort(outcred->cr_groups, outcred->cr_ngroups);
2663 1.1 cgd }
2664