nfs_subs.c revision 1.32 1 1.32 christos /* $NetBSD: nfs_subs.c,v 1.32 1996/10/13 01:39:08 christos 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.25 fvdl
42 1.1 cgd /*
43 1.1 cgd * These functions support the macros and help fiddle mbuf chains for
44 1.1 cgd * the nfs op functions. They do things like create the rpc header and
45 1.1 cgd * copy data between mbuf chains and uio lists.
46 1.1 cgd */
47 1.9 mycroft #include <sys/param.h>
48 1.9 mycroft #include <sys/proc.h>
49 1.9 mycroft #include <sys/systm.h>
50 1.9 mycroft #include <sys/kernel.h>
51 1.9 mycroft #include <sys/mount.h>
52 1.9 mycroft #include <sys/vnode.h>
53 1.9 mycroft #include <sys/namei.h>
54 1.9 mycroft #include <sys/mbuf.h>
55 1.12 mycroft #include <sys/socket.h>
56 1.12 mycroft #include <sys/stat.h>
57 1.25 fvdl #include <sys/malloc.h>
58 1.30 fvdl #include <sys/time.h>
59 1.25 fvdl
60 1.25 fvdl #include <vm/vm.h>
61 1.1 cgd
62 1.9 mycroft #include <nfs/rpcv2.h>
63 1.25 fvdl #include <nfs/nfsproto.h>
64 1.9 mycroft #include <nfs/nfsnode.h>
65 1.9 mycroft #include <nfs/nfs.h>
66 1.9 mycroft #include <nfs/xdr_subs.h>
67 1.9 mycroft #include <nfs/nfsm_subs.h>
68 1.12 mycroft #include <nfs/nfsmount.h>
69 1.12 mycroft #include <nfs/nqnfs.h>
70 1.12 mycroft #include <nfs/nfsrtt.h>
71 1.24 christos #include <nfs/nfs_var.h>
72 1.12 mycroft
73 1.12 mycroft #include <miscfs/specfs/specdev.h>
74 1.12 mycroft
75 1.24 christos #include <vm/vm.h>
76 1.24 christos
77 1.12 mycroft #include <netinet/in.h>
78 1.12 mycroft #ifdef ISO
79 1.12 mycroft #include <netiso/iso.h>
80 1.12 mycroft #endif
81 1.1 cgd
82 1.1 cgd /*
83 1.1 cgd * Data items converted to xdr at startup, since they are constant
84 1.1 cgd * This is kinda hokey, but may save a little time doing byte swaps
85 1.1 cgd */
86 1.22 cgd u_int32_t nfs_xdrneg1;
87 1.22 cgd u_int32_t rpc_call, rpc_vers, rpc_reply, rpc_msgdenied, rpc_autherr,
88 1.25 fvdl rpc_mismatch, rpc_auth_unix, rpc_msgaccepted,
89 1.12 mycroft rpc_auth_kerb;
90 1.25 fvdl u_int32_t nfs_prog, nqnfs_prog, nfs_true, nfs_false;
91 1.12 mycroft
92 1.1 cgd /* And other global data */
93 1.22 cgd static u_int32_t nfs_xid = 0;
94 1.25 fvdl nfstype nfsv2_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFNON,
95 1.25 fvdl NFCHR, NFNON };
96 1.25 fvdl nfstype nfsv3_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFSOCK,
97 1.25 fvdl NFFIFO, NFNON };
98 1.25 fvdl enum vtype nv2tov_type[8] = { VNON, VREG, VDIR, VBLK, VCHR, VLNK, VNON, VNON };
99 1.25 fvdl enum vtype nv3tov_type[8]={ VNON, VREG, VDIR, VBLK, VCHR, VLNK, VSOCK, VFIFO };
100 1.25 fvdl int nfs_ticks;
101 1.25 fvdl
102 1.25 fvdl /*
103 1.25 fvdl * Mapping of old NFS Version 2 RPC numbers to generic numbers.
104 1.25 fvdl */
105 1.25 fvdl int nfsv3_procid[NFS_NPROCS] = {
106 1.25 fvdl NFSPROC_NULL,
107 1.25 fvdl NFSPROC_GETATTR,
108 1.25 fvdl NFSPROC_SETATTR,
109 1.25 fvdl NFSPROC_NOOP,
110 1.25 fvdl NFSPROC_LOOKUP,
111 1.25 fvdl NFSPROC_READLINK,
112 1.25 fvdl NFSPROC_READ,
113 1.25 fvdl NFSPROC_NOOP,
114 1.25 fvdl NFSPROC_WRITE,
115 1.25 fvdl NFSPROC_CREATE,
116 1.25 fvdl NFSPROC_REMOVE,
117 1.25 fvdl NFSPROC_RENAME,
118 1.25 fvdl NFSPROC_LINK,
119 1.25 fvdl NFSPROC_SYMLINK,
120 1.25 fvdl NFSPROC_MKDIR,
121 1.25 fvdl NFSPROC_RMDIR,
122 1.25 fvdl NFSPROC_READDIR,
123 1.25 fvdl NFSPROC_FSSTAT,
124 1.25 fvdl NFSPROC_NOOP,
125 1.25 fvdl NFSPROC_NOOP,
126 1.25 fvdl NFSPROC_NOOP,
127 1.25 fvdl NFSPROC_NOOP,
128 1.25 fvdl NFSPROC_NOOP,
129 1.25 fvdl NFSPROC_NOOP,
130 1.25 fvdl NFSPROC_NOOP,
131 1.25 fvdl NFSPROC_NOOP
132 1.25 fvdl };
133 1.25 fvdl
134 1.25 fvdl /*
135 1.25 fvdl * and the reverse mapping from generic to Version 2 procedure numbers
136 1.25 fvdl */
137 1.25 fvdl int nfsv2_procid[NFS_NPROCS] = {
138 1.25 fvdl NFSV2PROC_NULL,
139 1.25 fvdl NFSV2PROC_GETATTR,
140 1.25 fvdl NFSV2PROC_SETATTR,
141 1.25 fvdl NFSV2PROC_LOOKUP,
142 1.25 fvdl NFSV2PROC_NOOP,
143 1.25 fvdl NFSV2PROC_READLINK,
144 1.25 fvdl NFSV2PROC_READ,
145 1.25 fvdl NFSV2PROC_WRITE,
146 1.25 fvdl NFSV2PROC_CREATE,
147 1.25 fvdl NFSV2PROC_MKDIR,
148 1.25 fvdl NFSV2PROC_SYMLINK,
149 1.25 fvdl NFSV2PROC_CREATE,
150 1.25 fvdl NFSV2PROC_REMOVE,
151 1.25 fvdl NFSV2PROC_RMDIR,
152 1.25 fvdl NFSV2PROC_RENAME,
153 1.25 fvdl NFSV2PROC_LINK,
154 1.25 fvdl NFSV2PROC_READDIR,
155 1.25 fvdl NFSV2PROC_NOOP,
156 1.25 fvdl NFSV2PROC_STATFS,
157 1.25 fvdl NFSV2PROC_NOOP,
158 1.25 fvdl NFSV2PROC_NOOP,
159 1.25 fvdl NFSV2PROC_NOOP,
160 1.25 fvdl NFSV2PROC_NOOP,
161 1.25 fvdl NFSV2PROC_NOOP,
162 1.25 fvdl NFSV2PROC_NOOP,
163 1.25 fvdl NFSV2PROC_NOOP,
164 1.25 fvdl };
165 1.25 fvdl
166 1.25 fvdl /*
167 1.25 fvdl * Maps errno values to nfs error numbers.
168 1.25 fvdl * Use NFSERR_IO as the catch all for ones not specifically defined in
169 1.25 fvdl * RFC 1094.
170 1.25 fvdl */
171 1.25 fvdl static u_char nfsrv_v2errmap[ELAST] = {
172 1.25 fvdl NFSERR_PERM, NFSERR_NOENT, NFSERR_IO, NFSERR_IO, NFSERR_IO,
173 1.25 fvdl NFSERR_NXIO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
174 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_ACCES, NFSERR_IO, NFSERR_IO,
175 1.25 fvdl NFSERR_IO, NFSERR_EXIST, NFSERR_IO, NFSERR_NODEV, NFSERR_NOTDIR,
176 1.25 fvdl NFSERR_ISDIR, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
177 1.25 fvdl NFSERR_IO, NFSERR_FBIG, NFSERR_NOSPC, NFSERR_IO, NFSERR_ROFS,
178 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
179 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
180 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
181 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
182 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
183 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
184 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_NAMETOL, NFSERR_IO, NFSERR_IO,
185 1.25 fvdl NFSERR_NOTEMPTY, NFSERR_IO, NFSERR_IO, NFSERR_DQUOT, NFSERR_STALE,
186 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
187 1.25 fvdl NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO,
188 1.25 fvdl NFSERR_IO,
189 1.25 fvdl };
190 1.25 fvdl
191 1.25 fvdl /*
192 1.25 fvdl * Maps errno values to nfs error numbers.
193 1.25 fvdl * Although it is not obvious whether or not NFS clients really care if
194 1.25 fvdl * a returned error value is in the specified list for the procedure, the
195 1.25 fvdl * safest thing to do is filter them appropriately. For Version 2, the
196 1.25 fvdl * X/Open XNFS document is the only specification that defines error values
197 1.25 fvdl * for each RPC (The RFC simply lists all possible error values for all RPCs),
198 1.25 fvdl * so I have decided to not do this for Version 2.
199 1.25 fvdl * The first entry is the default error return and the rest are the valid
200 1.25 fvdl * errors for that RPC in increasing numeric order.
201 1.25 fvdl */
202 1.25 fvdl static short nfsv3err_null[] = {
203 1.25 fvdl 0,
204 1.25 fvdl 0,
205 1.25 fvdl };
206 1.25 fvdl
207 1.25 fvdl static short nfsv3err_getattr[] = {
208 1.25 fvdl NFSERR_IO,
209 1.25 fvdl NFSERR_IO,
210 1.25 fvdl NFSERR_STALE,
211 1.25 fvdl NFSERR_BADHANDLE,
212 1.25 fvdl NFSERR_SERVERFAULT,
213 1.25 fvdl 0,
214 1.25 fvdl };
215 1.25 fvdl
216 1.25 fvdl static short nfsv3err_setattr[] = {
217 1.25 fvdl NFSERR_IO,
218 1.25 fvdl NFSERR_PERM,
219 1.25 fvdl NFSERR_IO,
220 1.25 fvdl NFSERR_ACCES,
221 1.25 fvdl NFSERR_INVAL,
222 1.25 fvdl NFSERR_NOSPC,
223 1.25 fvdl NFSERR_ROFS,
224 1.25 fvdl NFSERR_DQUOT,
225 1.25 fvdl NFSERR_STALE,
226 1.25 fvdl NFSERR_BADHANDLE,
227 1.25 fvdl NFSERR_NOT_SYNC,
228 1.25 fvdl NFSERR_SERVERFAULT,
229 1.25 fvdl 0,
230 1.25 fvdl };
231 1.25 fvdl
232 1.25 fvdl static short nfsv3err_lookup[] = {
233 1.25 fvdl NFSERR_IO,
234 1.25 fvdl NFSERR_NOENT,
235 1.25 fvdl NFSERR_IO,
236 1.25 fvdl NFSERR_ACCES,
237 1.25 fvdl NFSERR_NOTDIR,
238 1.25 fvdl NFSERR_NAMETOL,
239 1.25 fvdl NFSERR_STALE,
240 1.25 fvdl NFSERR_BADHANDLE,
241 1.25 fvdl NFSERR_SERVERFAULT,
242 1.25 fvdl 0,
243 1.25 fvdl };
244 1.25 fvdl
245 1.25 fvdl static short nfsv3err_access[] = {
246 1.25 fvdl NFSERR_IO,
247 1.25 fvdl NFSERR_IO,
248 1.25 fvdl NFSERR_STALE,
249 1.25 fvdl NFSERR_BADHANDLE,
250 1.25 fvdl NFSERR_SERVERFAULT,
251 1.25 fvdl 0,
252 1.25 fvdl };
253 1.25 fvdl
254 1.25 fvdl static short nfsv3err_readlink[] = {
255 1.25 fvdl NFSERR_IO,
256 1.25 fvdl NFSERR_IO,
257 1.25 fvdl NFSERR_ACCES,
258 1.25 fvdl NFSERR_INVAL,
259 1.25 fvdl NFSERR_STALE,
260 1.25 fvdl NFSERR_BADHANDLE,
261 1.25 fvdl NFSERR_NOTSUPP,
262 1.25 fvdl NFSERR_SERVERFAULT,
263 1.25 fvdl 0,
264 1.25 fvdl };
265 1.25 fvdl
266 1.25 fvdl static short nfsv3err_read[] = {
267 1.25 fvdl NFSERR_IO,
268 1.25 fvdl NFSERR_IO,
269 1.25 fvdl NFSERR_NXIO,
270 1.25 fvdl NFSERR_ACCES,
271 1.25 fvdl NFSERR_INVAL,
272 1.25 fvdl NFSERR_STALE,
273 1.25 fvdl NFSERR_BADHANDLE,
274 1.25 fvdl NFSERR_SERVERFAULT,
275 1.25 fvdl 0,
276 1.25 fvdl };
277 1.25 fvdl
278 1.25 fvdl static short nfsv3err_write[] = {
279 1.25 fvdl NFSERR_IO,
280 1.25 fvdl NFSERR_IO,
281 1.25 fvdl NFSERR_ACCES,
282 1.25 fvdl NFSERR_INVAL,
283 1.25 fvdl NFSERR_FBIG,
284 1.25 fvdl NFSERR_NOSPC,
285 1.25 fvdl NFSERR_ROFS,
286 1.25 fvdl NFSERR_DQUOT,
287 1.25 fvdl NFSERR_STALE,
288 1.25 fvdl NFSERR_BADHANDLE,
289 1.25 fvdl NFSERR_SERVERFAULT,
290 1.25 fvdl 0,
291 1.25 fvdl };
292 1.25 fvdl
293 1.25 fvdl static short nfsv3err_create[] = {
294 1.25 fvdl NFSERR_IO,
295 1.25 fvdl NFSERR_IO,
296 1.25 fvdl NFSERR_ACCES,
297 1.25 fvdl NFSERR_EXIST,
298 1.25 fvdl NFSERR_NOTDIR,
299 1.25 fvdl NFSERR_NOSPC,
300 1.25 fvdl NFSERR_ROFS,
301 1.25 fvdl NFSERR_NAMETOL,
302 1.25 fvdl NFSERR_DQUOT,
303 1.25 fvdl NFSERR_STALE,
304 1.25 fvdl NFSERR_BADHANDLE,
305 1.25 fvdl NFSERR_NOTSUPP,
306 1.25 fvdl NFSERR_SERVERFAULT,
307 1.25 fvdl 0,
308 1.25 fvdl };
309 1.25 fvdl
310 1.25 fvdl static short nfsv3err_mkdir[] = {
311 1.25 fvdl NFSERR_IO,
312 1.25 fvdl NFSERR_IO,
313 1.25 fvdl NFSERR_ACCES,
314 1.25 fvdl NFSERR_EXIST,
315 1.25 fvdl NFSERR_NOTDIR,
316 1.25 fvdl NFSERR_NOSPC,
317 1.25 fvdl NFSERR_ROFS,
318 1.25 fvdl NFSERR_NAMETOL,
319 1.25 fvdl NFSERR_DQUOT,
320 1.25 fvdl NFSERR_STALE,
321 1.25 fvdl NFSERR_BADHANDLE,
322 1.25 fvdl NFSERR_NOTSUPP,
323 1.25 fvdl NFSERR_SERVERFAULT,
324 1.25 fvdl 0,
325 1.25 fvdl };
326 1.25 fvdl
327 1.25 fvdl static short nfsv3err_symlink[] = {
328 1.25 fvdl NFSERR_IO,
329 1.25 fvdl NFSERR_IO,
330 1.25 fvdl NFSERR_ACCES,
331 1.25 fvdl NFSERR_EXIST,
332 1.25 fvdl NFSERR_NOTDIR,
333 1.25 fvdl NFSERR_NOSPC,
334 1.25 fvdl NFSERR_ROFS,
335 1.25 fvdl NFSERR_NAMETOL,
336 1.25 fvdl NFSERR_DQUOT,
337 1.25 fvdl NFSERR_STALE,
338 1.25 fvdl NFSERR_BADHANDLE,
339 1.25 fvdl NFSERR_NOTSUPP,
340 1.25 fvdl NFSERR_SERVERFAULT,
341 1.25 fvdl 0,
342 1.25 fvdl };
343 1.25 fvdl
344 1.25 fvdl static short nfsv3err_mknod[] = {
345 1.25 fvdl NFSERR_IO,
346 1.25 fvdl NFSERR_IO,
347 1.25 fvdl NFSERR_ACCES,
348 1.25 fvdl NFSERR_EXIST,
349 1.25 fvdl NFSERR_NOTDIR,
350 1.25 fvdl NFSERR_NOSPC,
351 1.25 fvdl NFSERR_ROFS,
352 1.25 fvdl NFSERR_NAMETOL,
353 1.25 fvdl NFSERR_DQUOT,
354 1.25 fvdl NFSERR_STALE,
355 1.25 fvdl NFSERR_BADHANDLE,
356 1.25 fvdl NFSERR_NOTSUPP,
357 1.25 fvdl NFSERR_SERVERFAULT,
358 1.25 fvdl NFSERR_BADTYPE,
359 1.25 fvdl 0,
360 1.25 fvdl };
361 1.25 fvdl
362 1.25 fvdl static short nfsv3err_remove[] = {
363 1.25 fvdl NFSERR_IO,
364 1.25 fvdl NFSERR_NOENT,
365 1.25 fvdl NFSERR_IO,
366 1.25 fvdl NFSERR_ACCES,
367 1.25 fvdl NFSERR_NOTDIR,
368 1.25 fvdl NFSERR_ROFS,
369 1.25 fvdl NFSERR_NAMETOL,
370 1.25 fvdl NFSERR_STALE,
371 1.25 fvdl NFSERR_BADHANDLE,
372 1.25 fvdl NFSERR_SERVERFAULT,
373 1.25 fvdl 0,
374 1.25 fvdl };
375 1.25 fvdl
376 1.25 fvdl static short nfsv3err_rmdir[] = {
377 1.25 fvdl NFSERR_IO,
378 1.25 fvdl NFSERR_NOENT,
379 1.25 fvdl NFSERR_IO,
380 1.25 fvdl NFSERR_ACCES,
381 1.25 fvdl NFSERR_EXIST,
382 1.25 fvdl NFSERR_NOTDIR,
383 1.25 fvdl NFSERR_INVAL,
384 1.25 fvdl NFSERR_ROFS,
385 1.25 fvdl NFSERR_NAMETOL,
386 1.25 fvdl NFSERR_NOTEMPTY,
387 1.25 fvdl NFSERR_STALE,
388 1.25 fvdl NFSERR_BADHANDLE,
389 1.25 fvdl NFSERR_NOTSUPP,
390 1.25 fvdl NFSERR_SERVERFAULT,
391 1.25 fvdl 0,
392 1.25 fvdl };
393 1.25 fvdl
394 1.25 fvdl static short nfsv3err_rename[] = {
395 1.25 fvdl NFSERR_IO,
396 1.25 fvdl NFSERR_NOENT,
397 1.25 fvdl NFSERR_IO,
398 1.25 fvdl NFSERR_ACCES,
399 1.25 fvdl NFSERR_EXIST,
400 1.25 fvdl NFSERR_XDEV,
401 1.25 fvdl NFSERR_NOTDIR,
402 1.25 fvdl NFSERR_ISDIR,
403 1.25 fvdl NFSERR_INVAL,
404 1.25 fvdl NFSERR_NOSPC,
405 1.25 fvdl NFSERR_ROFS,
406 1.25 fvdl NFSERR_MLINK,
407 1.25 fvdl NFSERR_NAMETOL,
408 1.25 fvdl NFSERR_NOTEMPTY,
409 1.25 fvdl NFSERR_DQUOT,
410 1.25 fvdl NFSERR_STALE,
411 1.25 fvdl NFSERR_BADHANDLE,
412 1.25 fvdl NFSERR_NOTSUPP,
413 1.25 fvdl NFSERR_SERVERFAULT,
414 1.25 fvdl 0,
415 1.25 fvdl };
416 1.25 fvdl
417 1.25 fvdl static short nfsv3err_link[] = {
418 1.25 fvdl NFSERR_IO,
419 1.25 fvdl NFSERR_IO,
420 1.25 fvdl NFSERR_ACCES,
421 1.25 fvdl NFSERR_EXIST,
422 1.25 fvdl NFSERR_XDEV,
423 1.25 fvdl NFSERR_NOTDIR,
424 1.25 fvdl NFSERR_INVAL,
425 1.25 fvdl NFSERR_NOSPC,
426 1.25 fvdl NFSERR_ROFS,
427 1.25 fvdl NFSERR_MLINK,
428 1.25 fvdl NFSERR_NAMETOL,
429 1.25 fvdl NFSERR_DQUOT,
430 1.25 fvdl NFSERR_STALE,
431 1.25 fvdl NFSERR_BADHANDLE,
432 1.25 fvdl NFSERR_NOTSUPP,
433 1.25 fvdl NFSERR_SERVERFAULT,
434 1.25 fvdl 0,
435 1.25 fvdl };
436 1.25 fvdl
437 1.25 fvdl static short nfsv3err_readdir[] = {
438 1.25 fvdl NFSERR_IO,
439 1.25 fvdl NFSERR_IO,
440 1.25 fvdl NFSERR_ACCES,
441 1.25 fvdl NFSERR_NOTDIR,
442 1.25 fvdl NFSERR_STALE,
443 1.25 fvdl NFSERR_BADHANDLE,
444 1.25 fvdl NFSERR_BAD_COOKIE,
445 1.25 fvdl NFSERR_TOOSMALL,
446 1.25 fvdl NFSERR_SERVERFAULT,
447 1.25 fvdl 0,
448 1.25 fvdl };
449 1.25 fvdl
450 1.25 fvdl static short nfsv3err_readdirplus[] = {
451 1.25 fvdl NFSERR_IO,
452 1.25 fvdl NFSERR_IO,
453 1.25 fvdl NFSERR_ACCES,
454 1.25 fvdl NFSERR_NOTDIR,
455 1.25 fvdl NFSERR_STALE,
456 1.25 fvdl NFSERR_BADHANDLE,
457 1.25 fvdl NFSERR_BAD_COOKIE,
458 1.25 fvdl NFSERR_NOTSUPP,
459 1.25 fvdl NFSERR_TOOSMALL,
460 1.25 fvdl NFSERR_SERVERFAULT,
461 1.25 fvdl 0,
462 1.25 fvdl };
463 1.25 fvdl
464 1.25 fvdl static short nfsv3err_fsstat[] = {
465 1.25 fvdl NFSERR_IO,
466 1.25 fvdl NFSERR_IO,
467 1.25 fvdl NFSERR_STALE,
468 1.25 fvdl NFSERR_BADHANDLE,
469 1.25 fvdl NFSERR_SERVERFAULT,
470 1.25 fvdl 0,
471 1.25 fvdl };
472 1.25 fvdl
473 1.25 fvdl static short nfsv3err_fsinfo[] = {
474 1.25 fvdl NFSERR_STALE,
475 1.25 fvdl NFSERR_STALE,
476 1.25 fvdl NFSERR_BADHANDLE,
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_pathconf[] = {
482 1.25 fvdl NFSERR_STALE,
483 1.25 fvdl NFSERR_STALE,
484 1.25 fvdl NFSERR_BADHANDLE,
485 1.25 fvdl NFSERR_SERVERFAULT,
486 1.25 fvdl 0,
487 1.25 fvdl };
488 1.25 fvdl
489 1.25 fvdl static short nfsv3err_commit[] = {
490 1.25 fvdl NFSERR_IO,
491 1.25 fvdl NFSERR_IO,
492 1.25 fvdl NFSERR_STALE,
493 1.25 fvdl NFSERR_BADHANDLE,
494 1.25 fvdl NFSERR_SERVERFAULT,
495 1.25 fvdl 0,
496 1.25 fvdl };
497 1.25 fvdl
498 1.25 fvdl static short *nfsrv_v3errmap[] = {
499 1.25 fvdl nfsv3err_null,
500 1.25 fvdl nfsv3err_getattr,
501 1.25 fvdl nfsv3err_setattr,
502 1.25 fvdl nfsv3err_lookup,
503 1.25 fvdl nfsv3err_access,
504 1.25 fvdl nfsv3err_readlink,
505 1.25 fvdl nfsv3err_read,
506 1.25 fvdl nfsv3err_write,
507 1.25 fvdl nfsv3err_create,
508 1.25 fvdl nfsv3err_mkdir,
509 1.25 fvdl nfsv3err_symlink,
510 1.25 fvdl nfsv3err_mknod,
511 1.25 fvdl nfsv3err_remove,
512 1.25 fvdl nfsv3err_rmdir,
513 1.25 fvdl nfsv3err_rename,
514 1.25 fvdl nfsv3err_link,
515 1.25 fvdl nfsv3err_readdir,
516 1.25 fvdl nfsv3err_readdirplus,
517 1.25 fvdl nfsv3err_fsstat,
518 1.25 fvdl nfsv3err_fsinfo,
519 1.25 fvdl nfsv3err_pathconf,
520 1.25 fvdl nfsv3err_commit,
521 1.25 fvdl };
522 1.25 fvdl
523 1.1 cgd extern struct proc *nfs_iodwant[NFS_MAXASYNCDAEMON];
524 1.12 mycroft extern struct nfsrtt nfsrtt;
525 1.12 mycroft extern time_t nqnfsstarttime;
526 1.12 mycroft extern int nqsrv_clockskew;
527 1.12 mycroft extern int nqsrv_writeslack;
528 1.12 mycroft extern int nqsrv_maxlease;
529 1.25 fvdl extern struct nfsstats nfsstats;
530 1.25 fvdl extern int nqnfs_piggy[NFS_NPROCS];
531 1.25 fvdl extern nfstype nfsv2_type[9];
532 1.25 fvdl extern nfstype nfsv3_type[9];
533 1.25 fvdl extern struct nfsnodehashhead *nfsnodehashtbl;
534 1.25 fvdl extern u_long nfsnodehash;
535 1.1 cgd
536 1.18 mycroft LIST_HEAD(nfsnodehashhead, nfsnode);
537 1.18 mycroft
538 1.1 cgd /*
539 1.1 cgd * Create the header for an rpc request packet
540 1.1 cgd * The hsiz is the size of the rest of the nfs request header.
541 1.1 cgd * (just used to decide if a cluster is a good idea)
542 1.1 cgd */
543 1.12 mycroft struct mbuf *
544 1.12 mycroft nfsm_reqh(vp, procid, hsiz, bposp)
545 1.12 mycroft struct vnode *vp;
546 1.1 cgd u_long procid;
547 1.1 cgd int hsiz;
548 1.12 mycroft caddr_t *bposp;
549 1.12 mycroft {
550 1.12 mycroft register struct mbuf *mb;
551 1.22 cgd register u_int32_t *tl;
552 1.12 mycroft register caddr_t bpos;
553 1.12 mycroft struct mbuf *mb2;
554 1.12 mycroft struct nfsmount *nmp;
555 1.12 mycroft int nqflag;
556 1.12 mycroft
557 1.12 mycroft MGET(mb, M_WAIT, MT_DATA);
558 1.12 mycroft if (hsiz >= MINCLSIZE)
559 1.12 mycroft MCLGET(mb, M_WAIT);
560 1.12 mycroft mb->m_len = 0;
561 1.12 mycroft bpos = mtod(mb, caddr_t);
562 1.12 mycroft
563 1.12 mycroft /*
564 1.12 mycroft * For NQNFS, add lease request.
565 1.12 mycroft */
566 1.12 mycroft if (vp) {
567 1.12 mycroft nmp = VFSTONFS(vp->v_mount);
568 1.12 mycroft if (nmp->nm_flag & NFSMNT_NQNFS) {
569 1.12 mycroft nqflag = NQNFS_NEEDLEASE(vp, procid);
570 1.12 mycroft if (nqflag) {
571 1.22 cgd nfsm_build(tl, u_int32_t *, 2*NFSX_UNSIGNED);
572 1.12 mycroft *tl++ = txdr_unsigned(nqflag);
573 1.12 mycroft *tl = txdr_unsigned(nmp->nm_leaseterm);
574 1.12 mycroft } else {
575 1.22 cgd nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
576 1.12 mycroft *tl = 0;
577 1.12 mycroft }
578 1.12 mycroft }
579 1.12 mycroft }
580 1.12 mycroft /* Finally, return values */
581 1.12 mycroft *bposp = bpos;
582 1.12 mycroft return (mb);
583 1.12 mycroft }
584 1.12 mycroft
585 1.12 mycroft /*
586 1.12 mycroft * Build the RPC header and fill in the authorization info.
587 1.12 mycroft * The authorization string argument is only used when the credentials
588 1.12 mycroft * come from outside of the kernel.
589 1.12 mycroft * Returns the head of the mbuf list.
590 1.12 mycroft */
591 1.12 mycroft struct mbuf *
592 1.25 fvdl nfsm_rpchead(cr, nmflag, procid, auth_type, auth_len, auth_str, verf_len,
593 1.25 fvdl verf_str, mrest, mrest_len, mbp, xidp)
594 1.12 mycroft register struct ucred *cr;
595 1.25 fvdl int nmflag;
596 1.12 mycroft int procid;
597 1.12 mycroft int auth_type;
598 1.12 mycroft int auth_len;
599 1.12 mycroft char *auth_str;
600 1.25 fvdl int verf_len;
601 1.25 fvdl char *verf_str;
602 1.12 mycroft struct mbuf *mrest;
603 1.12 mycroft int mrest_len;
604 1.12 mycroft struct mbuf **mbp;
605 1.22 cgd u_int32_t *xidp;
606 1.1 cgd {
607 1.12 mycroft register struct mbuf *mb;
608 1.22 cgd register u_int32_t *tl;
609 1.12 mycroft register caddr_t bpos;
610 1.12 mycroft register int i;
611 1.12 mycroft struct mbuf *mreq, *mb2;
612 1.12 mycroft int siz, grpsiz, authsiz;
613 1.30 fvdl struct timeval tv;
614 1.30 fvdl static u_int32_t base;
615 1.1 cgd
616 1.12 mycroft authsiz = nfsm_rndup(auth_len);
617 1.12 mycroft MGETHDR(mb, M_WAIT, MT_DATA);
618 1.25 fvdl if ((authsiz + 10 * NFSX_UNSIGNED) >= MINCLSIZE) {
619 1.12 mycroft MCLGET(mb, M_WAIT);
620 1.25 fvdl } else if ((authsiz + 10 * NFSX_UNSIGNED) < MHLEN) {
621 1.25 fvdl MH_ALIGN(mb, authsiz + 10 * NFSX_UNSIGNED);
622 1.12 mycroft } else {
623 1.25 fvdl MH_ALIGN(mb, 8 * NFSX_UNSIGNED);
624 1.1 cgd }
625 1.12 mycroft mb->m_len = 0;
626 1.12 mycroft mreq = mb;
627 1.12 mycroft bpos = mtod(mb, caddr_t);
628 1.12 mycroft
629 1.12 mycroft /*
630 1.12 mycroft * First the RPC header.
631 1.12 mycroft */
632 1.25 fvdl nfsm_build(tl, u_int32_t *, 8 * NFSX_UNSIGNED);
633 1.30 fvdl
634 1.30 fvdl /*
635 1.30 fvdl * derive initial xid from system time
636 1.30 fvdl * XXX time is invalid if root not yet mounted
637 1.30 fvdl */
638 1.30 fvdl if (!base && (rootvp)) {
639 1.30 fvdl microtime(&tv);
640 1.30 fvdl base = tv.tv_sec << 12;
641 1.30 fvdl nfs_xid = base;
642 1.30 fvdl }
643 1.30 fvdl /*
644 1.30 fvdl * Skip zero xid if it should ever happen.
645 1.30 fvdl */
646 1.12 mycroft if (++nfs_xid == 0)
647 1.12 mycroft nfs_xid++;
648 1.30 fvdl
649 1.12 mycroft *tl++ = *xidp = txdr_unsigned(nfs_xid);
650 1.1 cgd *tl++ = rpc_call;
651 1.1 cgd *tl++ = rpc_vers;
652 1.25 fvdl if (nmflag & NFSMNT_NQNFS) {
653 1.12 mycroft *tl++ = txdr_unsigned(NQNFS_PROG);
654 1.25 fvdl *tl++ = txdr_unsigned(NQNFS_VER3);
655 1.1 cgd } else {
656 1.12 mycroft *tl++ = txdr_unsigned(NFS_PROG);
657 1.25 fvdl if (nmflag & NFSMNT_NFSV3)
658 1.25 fvdl *tl++ = txdr_unsigned(NFS_VER3);
659 1.25 fvdl else
660 1.25 fvdl *tl++ = txdr_unsigned(NFS_VER2);
661 1.1 cgd }
662 1.25 fvdl if (nmflag & NFSMNT_NFSV3)
663 1.25 fvdl *tl++ = txdr_unsigned(procid);
664 1.25 fvdl else
665 1.25 fvdl *tl++ = txdr_unsigned(nfsv2_procid[procid]);
666 1.12 mycroft
667 1.12 mycroft /*
668 1.12 mycroft * And then the authorization cred.
669 1.12 mycroft */
670 1.12 mycroft *tl++ = txdr_unsigned(auth_type);
671 1.12 mycroft *tl = txdr_unsigned(authsiz);
672 1.12 mycroft switch (auth_type) {
673 1.12 mycroft case RPCAUTH_UNIX:
674 1.22 cgd nfsm_build(tl, u_int32_t *, auth_len);
675 1.12 mycroft *tl++ = 0; /* stamp ?? */
676 1.12 mycroft *tl++ = 0; /* NULL hostname */
677 1.12 mycroft *tl++ = txdr_unsigned(cr->cr_uid);
678 1.19 jtc *tl++ = txdr_unsigned(cr->cr_gid);
679 1.12 mycroft grpsiz = (auth_len >> 2) - 5;
680 1.12 mycroft *tl++ = txdr_unsigned(grpsiz);
681 1.20 mycroft for (i = 0; i < grpsiz; i++)
682 1.12 mycroft *tl++ = txdr_unsigned(cr->cr_groups[i]);
683 1.12 mycroft break;
684 1.25 fvdl case RPCAUTH_KERB4:
685 1.12 mycroft siz = auth_len;
686 1.12 mycroft while (siz > 0) {
687 1.12 mycroft if (M_TRAILINGSPACE(mb) == 0) {
688 1.12 mycroft MGET(mb2, M_WAIT, MT_DATA);
689 1.12 mycroft if (siz >= MINCLSIZE)
690 1.12 mycroft MCLGET(mb2, M_WAIT);
691 1.12 mycroft mb->m_next = mb2;
692 1.12 mycroft mb = mb2;
693 1.12 mycroft mb->m_len = 0;
694 1.12 mycroft bpos = mtod(mb, caddr_t);
695 1.12 mycroft }
696 1.12 mycroft i = min(siz, M_TRAILINGSPACE(mb));
697 1.12 mycroft bcopy(auth_str, bpos, i);
698 1.12 mycroft mb->m_len += i;
699 1.12 mycroft auth_str += i;
700 1.12 mycroft bpos += i;
701 1.12 mycroft siz -= i;
702 1.12 mycroft }
703 1.12 mycroft if ((siz = (nfsm_rndup(auth_len) - auth_len)) > 0) {
704 1.12 mycroft for (i = 0; i < siz; i++)
705 1.12 mycroft *bpos++ = '\0';
706 1.12 mycroft mb->m_len += siz;
707 1.12 mycroft }
708 1.12 mycroft break;
709 1.12 mycroft };
710 1.25 fvdl
711 1.25 fvdl /*
712 1.25 fvdl * And the verifier...
713 1.25 fvdl */
714 1.25 fvdl nfsm_build(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
715 1.25 fvdl if (verf_str) {
716 1.25 fvdl *tl++ = txdr_unsigned(RPCAUTH_KERB4);
717 1.25 fvdl *tl = txdr_unsigned(verf_len);
718 1.25 fvdl siz = verf_len;
719 1.25 fvdl while (siz > 0) {
720 1.25 fvdl if (M_TRAILINGSPACE(mb) == 0) {
721 1.25 fvdl MGET(mb2, M_WAIT, MT_DATA);
722 1.25 fvdl if (siz >= MINCLSIZE)
723 1.25 fvdl MCLGET(mb2, M_WAIT);
724 1.25 fvdl mb->m_next = mb2;
725 1.25 fvdl mb = mb2;
726 1.25 fvdl mb->m_len = 0;
727 1.25 fvdl bpos = mtod(mb, caddr_t);
728 1.25 fvdl }
729 1.25 fvdl i = min(siz, M_TRAILINGSPACE(mb));
730 1.25 fvdl bcopy(verf_str, bpos, i);
731 1.25 fvdl mb->m_len += i;
732 1.25 fvdl verf_str += i;
733 1.25 fvdl bpos += i;
734 1.25 fvdl siz -= i;
735 1.25 fvdl }
736 1.25 fvdl if ((siz = (nfsm_rndup(verf_len) - verf_len)) > 0) {
737 1.25 fvdl for (i = 0; i < siz; i++)
738 1.25 fvdl *bpos++ = '\0';
739 1.25 fvdl mb->m_len += siz;
740 1.25 fvdl }
741 1.25 fvdl } else {
742 1.25 fvdl *tl++ = txdr_unsigned(RPCAUTH_NULL);
743 1.25 fvdl *tl = 0;
744 1.25 fvdl }
745 1.12 mycroft mb->m_next = mrest;
746 1.25 fvdl mreq->m_pkthdr.len = authsiz + 10 * NFSX_UNSIGNED + mrest_len;
747 1.12 mycroft mreq->m_pkthdr.rcvif = (struct ifnet *)0;
748 1.12 mycroft *mbp = mb;
749 1.1 cgd return (mreq);
750 1.1 cgd }
751 1.1 cgd
752 1.1 cgd /*
753 1.1 cgd * copies mbuf chain to the uio scatter/gather list
754 1.1 cgd */
755 1.24 christos int
756 1.1 cgd nfsm_mbuftouio(mrep, uiop, siz, dpos)
757 1.1 cgd struct mbuf **mrep;
758 1.1 cgd register struct uio *uiop;
759 1.1 cgd int siz;
760 1.1 cgd caddr_t *dpos;
761 1.1 cgd {
762 1.1 cgd register char *mbufcp, *uiocp;
763 1.1 cgd register int xfer, left, len;
764 1.1 cgd register struct mbuf *mp;
765 1.1 cgd long uiosiz, rem;
766 1.1 cgd int error = 0;
767 1.1 cgd
768 1.1 cgd mp = *mrep;
769 1.1 cgd mbufcp = *dpos;
770 1.1 cgd len = mtod(mp, caddr_t)+mp->m_len-mbufcp;
771 1.1 cgd rem = nfsm_rndup(siz)-siz;
772 1.1 cgd while (siz > 0) {
773 1.1 cgd if (uiop->uio_iovcnt <= 0 || uiop->uio_iov == NULL)
774 1.1 cgd return (EFBIG);
775 1.1 cgd left = uiop->uio_iov->iov_len;
776 1.1 cgd uiocp = uiop->uio_iov->iov_base;
777 1.1 cgd if (left > siz)
778 1.1 cgd left = siz;
779 1.1 cgd uiosiz = left;
780 1.1 cgd while (left > 0) {
781 1.1 cgd while (len == 0) {
782 1.1 cgd mp = mp->m_next;
783 1.1 cgd if (mp == NULL)
784 1.1 cgd return (EBADRPC);
785 1.1 cgd mbufcp = mtod(mp, caddr_t);
786 1.1 cgd len = mp->m_len;
787 1.1 cgd }
788 1.1 cgd xfer = (left > len) ? len : left;
789 1.1 cgd #ifdef notdef
790 1.1 cgd /* Not Yet.. */
791 1.1 cgd if (uiop->uio_iov->iov_op != NULL)
792 1.1 cgd (*(uiop->uio_iov->iov_op))
793 1.1 cgd (mbufcp, uiocp, xfer);
794 1.1 cgd else
795 1.1 cgd #endif
796 1.1 cgd if (uiop->uio_segflg == UIO_SYSSPACE)
797 1.1 cgd bcopy(mbufcp, uiocp, xfer);
798 1.1 cgd else
799 1.1 cgd copyout(mbufcp, uiocp, xfer);
800 1.1 cgd left -= xfer;
801 1.1 cgd len -= xfer;
802 1.1 cgd mbufcp += xfer;
803 1.1 cgd uiocp += xfer;
804 1.1 cgd uiop->uio_offset += xfer;
805 1.1 cgd uiop->uio_resid -= xfer;
806 1.1 cgd }
807 1.1 cgd if (uiop->uio_iov->iov_len <= siz) {
808 1.1 cgd uiop->uio_iovcnt--;
809 1.1 cgd uiop->uio_iov++;
810 1.1 cgd } else {
811 1.1 cgd uiop->uio_iov->iov_base += uiosiz;
812 1.1 cgd uiop->uio_iov->iov_len -= uiosiz;
813 1.1 cgd }
814 1.1 cgd siz -= uiosiz;
815 1.1 cgd }
816 1.1 cgd *dpos = mbufcp;
817 1.1 cgd *mrep = mp;
818 1.1 cgd if (rem > 0) {
819 1.1 cgd if (len < rem)
820 1.1 cgd error = nfs_adv(mrep, dpos, rem, len);
821 1.1 cgd else
822 1.1 cgd *dpos += rem;
823 1.1 cgd }
824 1.1 cgd return (error);
825 1.1 cgd }
826 1.1 cgd
827 1.1 cgd /*
828 1.29 fvdl * copies a uio scatter/gather list to an mbuf chain.
829 1.29 fvdl * NOTE: can ony handle iovcnt == 1
830 1.1 cgd */
831 1.24 christos int
832 1.1 cgd nfsm_uiotombuf(uiop, mq, siz, bpos)
833 1.1 cgd register struct uio *uiop;
834 1.1 cgd struct mbuf **mq;
835 1.1 cgd int siz;
836 1.1 cgd caddr_t *bpos;
837 1.1 cgd {
838 1.1 cgd register char *uiocp;
839 1.1 cgd register struct mbuf *mp, *mp2;
840 1.12 mycroft register int xfer, left, mlen;
841 1.1 cgd int uiosiz, clflg, rem;
842 1.1 cgd char *cp;
843 1.1 cgd
844 1.29 fvdl #ifdef DIAGNOSTIC
845 1.29 fvdl if (uiop->uio_iovcnt != 1)
846 1.29 fvdl panic("nfsm_uiotombuf: iovcnt != 1");
847 1.29 fvdl #endif
848 1.29 fvdl
849 1.1 cgd if (siz > MLEN) /* or should it >= MCLBYTES ?? */
850 1.1 cgd clflg = 1;
851 1.1 cgd else
852 1.1 cgd clflg = 0;
853 1.1 cgd rem = nfsm_rndup(siz)-siz;
854 1.12 mycroft mp = mp2 = *mq;
855 1.1 cgd while (siz > 0) {
856 1.1 cgd left = uiop->uio_iov->iov_len;
857 1.1 cgd uiocp = uiop->uio_iov->iov_base;
858 1.1 cgd if (left > siz)
859 1.1 cgd left = siz;
860 1.1 cgd uiosiz = left;
861 1.1 cgd while (left > 0) {
862 1.12 mycroft mlen = M_TRAILINGSPACE(mp);
863 1.12 mycroft if (mlen == 0) {
864 1.12 mycroft MGET(mp, M_WAIT, MT_DATA);
865 1.12 mycroft if (clflg)
866 1.12 mycroft MCLGET(mp, M_WAIT);
867 1.12 mycroft mp->m_len = 0;
868 1.12 mycroft mp2->m_next = mp;
869 1.12 mycroft mp2 = mp;
870 1.12 mycroft mlen = M_TRAILINGSPACE(mp);
871 1.12 mycroft }
872 1.12 mycroft xfer = (left > mlen) ? mlen : left;
873 1.1 cgd #ifdef notdef
874 1.1 cgd /* Not Yet.. */
875 1.1 cgd if (uiop->uio_iov->iov_op != NULL)
876 1.1 cgd (*(uiop->uio_iov->iov_op))
877 1.12 mycroft (uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
878 1.1 cgd else
879 1.1 cgd #endif
880 1.1 cgd if (uiop->uio_segflg == UIO_SYSSPACE)
881 1.12 mycroft bcopy(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
882 1.1 cgd else
883 1.12 mycroft copyin(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
884 1.12 mycroft mp->m_len += xfer;
885 1.1 cgd left -= xfer;
886 1.1 cgd uiocp += xfer;
887 1.1 cgd uiop->uio_offset += xfer;
888 1.1 cgd uiop->uio_resid -= xfer;
889 1.1 cgd }
890 1.29 fvdl uiop->uio_iov->iov_base += uiosiz;
891 1.29 fvdl uiop->uio_iov->iov_len -= uiosiz;
892 1.1 cgd siz -= uiosiz;
893 1.1 cgd }
894 1.1 cgd if (rem > 0) {
895 1.12 mycroft if (rem > M_TRAILINGSPACE(mp)) {
896 1.1 cgd MGET(mp, M_WAIT, MT_DATA);
897 1.1 cgd mp->m_len = 0;
898 1.1 cgd mp2->m_next = mp;
899 1.1 cgd }
900 1.1 cgd cp = mtod(mp, caddr_t)+mp->m_len;
901 1.1 cgd for (left = 0; left < rem; left++)
902 1.1 cgd *cp++ = '\0';
903 1.1 cgd mp->m_len += rem;
904 1.1 cgd *bpos = cp;
905 1.1 cgd } else
906 1.1 cgd *bpos = mtod(mp, caddr_t)+mp->m_len;
907 1.1 cgd *mq = mp;
908 1.1 cgd return (0);
909 1.1 cgd }
910 1.1 cgd
911 1.1 cgd /*
912 1.1 cgd * Help break down an mbuf chain by setting the first siz bytes contiguous
913 1.1 cgd * pointed to by returned val.
914 1.12 mycroft * This is used by the macros nfsm_dissect and nfsm_dissecton for tough
915 1.1 cgd * cases. (The macros use the vars. dpos and dpos2)
916 1.1 cgd */
917 1.24 christos int
918 1.12 mycroft nfsm_disct(mdp, dposp, siz, left, cp2)
919 1.1 cgd struct mbuf **mdp;
920 1.1 cgd caddr_t *dposp;
921 1.1 cgd int siz;
922 1.1 cgd int left;
923 1.1 cgd caddr_t *cp2;
924 1.1 cgd {
925 1.1 cgd register struct mbuf *mp, *mp2;
926 1.1 cgd register int siz2, xfer;
927 1.12 mycroft register caddr_t p;
928 1.1 cgd
929 1.1 cgd mp = *mdp;
930 1.1 cgd while (left == 0) {
931 1.1 cgd *mdp = mp = mp->m_next;
932 1.1 cgd if (mp == NULL)
933 1.1 cgd return (EBADRPC);
934 1.1 cgd left = mp->m_len;
935 1.1 cgd *dposp = mtod(mp, caddr_t);
936 1.1 cgd }
937 1.1 cgd if (left >= siz) {
938 1.1 cgd *cp2 = *dposp;
939 1.1 cgd *dposp += siz;
940 1.1 cgd } else if (mp->m_next == NULL) {
941 1.1 cgd return (EBADRPC);
942 1.1 cgd } else if (siz > MHLEN) {
943 1.1 cgd panic("nfs S too big");
944 1.1 cgd } else {
945 1.12 mycroft MGET(mp2, M_WAIT, MT_DATA);
946 1.12 mycroft mp2->m_next = mp->m_next;
947 1.12 mycroft mp->m_next = mp2;
948 1.12 mycroft mp->m_len -= left;
949 1.12 mycroft mp = mp2;
950 1.12 mycroft *cp2 = p = mtod(mp, caddr_t);
951 1.12 mycroft bcopy(*dposp, p, left); /* Copy what was left */
952 1.1 cgd siz2 = siz-left;
953 1.12 mycroft p += left;
954 1.1 cgd mp2 = mp->m_next;
955 1.1 cgd /* Loop around copying up the siz2 bytes */
956 1.1 cgd while (siz2 > 0) {
957 1.1 cgd if (mp2 == NULL)
958 1.1 cgd return (EBADRPC);
959 1.1 cgd xfer = (siz2 > mp2->m_len) ? mp2->m_len : siz2;
960 1.1 cgd if (xfer > 0) {
961 1.12 mycroft bcopy(mtod(mp2, caddr_t), p, xfer);
962 1.1 cgd NFSMADV(mp2, xfer);
963 1.1 cgd mp2->m_len -= xfer;
964 1.12 mycroft p += xfer;
965 1.1 cgd siz2 -= xfer;
966 1.1 cgd }
967 1.1 cgd if (siz2 > 0)
968 1.1 cgd mp2 = mp2->m_next;
969 1.1 cgd }
970 1.1 cgd mp->m_len = siz;
971 1.1 cgd *mdp = mp2;
972 1.1 cgd *dposp = mtod(mp2, caddr_t);
973 1.1 cgd }
974 1.1 cgd return (0);
975 1.1 cgd }
976 1.1 cgd
977 1.1 cgd /*
978 1.1 cgd * Advance the position in the mbuf chain.
979 1.1 cgd */
980 1.24 christos int
981 1.1 cgd nfs_adv(mdp, dposp, offs, left)
982 1.1 cgd struct mbuf **mdp;
983 1.1 cgd caddr_t *dposp;
984 1.1 cgd int offs;
985 1.1 cgd int left;
986 1.1 cgd {
987 1.1 cgd register struct mbuf *m;
988 1.1 cgd register int s;
989 1.1 cgd
990 1.1 cgd m = *mdp;
991 1.1 cgd s = left;
992 1.1 cgd while (s < offs) {
993 1.1 cgd offs -= s;
994 1.1 cgd m = m->m_next;
995 1.1 cgd if (m == NULL)
996 1.1 cgd return (EBADRPC);
997 1.1 cgd s = m->m_len;
998 1.1 cgd }
999 1.1 cgd *mdp = m;
1000 1.1 cgd *dposp = mtod(m, caddr_t)+offs;
1001 1.1 cgd return (0);
1002 1.1 cgd }
1003 1.1 cgd
1004 1.1 cgd /*
1005 1.1 cgd * Copy a string into mbufs for the hard cases...
1006 1.1 cgd */
1007 1.24 christos int
1008 1.1 cgd nfsm_strtmbuf(mb, bpos, cp, siz)
1009 1.1 cgd struct mbuf **mb;
1010 1.1 cgd char **bpos;
1011 1.1 cgd char *cp;
1012 1.1 cgd long siz;
1013 1.1 cgd {
1014 1.24 christos register struct mbuf *m1 = NULL, *m2;
1015 1.1 cgd long left, xfer, len, tlen;
1016 1.22 cgd u_int32_t *tl;
1017 1.1 cgd int putsize;
1018 1.1 cgd
1019 1.1 cgd putsize = 1;
1020 1.1 cgd m2 = *mb;
1021 1.12 mycroft left = M_TRAILINGSPACE(m2);
1022 1.1 cgd if (left > 0) {
1023 1.22 cgd tl = ((u_int32_t *)(*bpos));
1024 1.1 cgd *tl++ = txdr_unsigned(siz);
1025 1.1 cgd putsize = 0;
1026 1.1 cgd left -= NFSX_UNSIGNED;
1027 1.1 cgd m2->m_len += NFSX_UNSIGNED;
1028 1.1 cgd if (left > 0) {
1029 1.1 cgd bcopy(cp, (caddr_t) tl, left);
1030 1.1 cgd siz -= left;
1031 1.1 cgd cp += left;
1032 1.1 cgd m2->m_len += left;
1033 1.1 cgd left = 0;
1034 1.1 cgd }
1035 1.1 cgd }
1036 1.12 mycroft /* Loop around adding mbufs */
1037 1.1 cgd while (siz > 0) {
1038 1.1 cgd MGET(m1, M_WAIT, MT_DATA);
1039 1.1 cgd if (siz > MLEN)
1040 1.1 cgd MCLGET(m1, M_WAIT);
1041 1.1 cgd m1->m_len = NFSMSIZ(m1);
1042 1.1 cgd m2->m_next = m1;
1043 1.1 cgd m2 = m1;
1044 1.22 cgd tl = mtod(m1, u_int32_t *);
1045 1.1 cgd tlen = 0;
1046 1.1 cgd if (putsize) {
1047 1.1 cgd *tl++ = txdr_unsigned(siz);
1048 1.1 cgd m1->m_len -= NFSX_UNSIGNED;
1049 1.1 cgd tlen = NFSX_UNSIGNED;
1050 1.1 cgd putsize = 0;
1051 1.1 cgd }
1052 1.1 cgd if (siz < m1->m_len) {
1053 1.1 cgd len = nfsm_rndup(siz);
1054 1.1 cgd xfer = siz;
1055 1.1 cgd if (xfer < len)
1056 1.1 cgd *(tl+(xfer>>2)) = 0;
1057 1.1 cgd } else {
1058 1.1 cgd xfer = len = m1->m_len;
1059 1.1 cgd }
1060 1.1 cgd bcopy(cp, (caddr_t) tl, xfer);
1061 1.1 cgd m1->m_len = len+tlen;
1062 1.1 cgd siz -= xfer;
1063 1.1 cgd cp += xfer;
1064 1.1 cgd }
1065 1.1 cgd *mb = m1;
1066 1.1 cgd *bpos = mtod(m1, caddr_t)+m1->m_len;
1067 1.1 cgd return (0);
1068 1.1 cgd }
1069 1.1 cgd
1070 1.1 cgd /*
1071 1.1 cgd * Called once to initialize data structures...
1072 1.1 cgd */
1073 1.24 christos void
1074 1.1 cgd nfs_init()
1075 1.1 cgd {
1076 1.1 cgd register int i;
1077 1.1 cgd
1078 1.25 fvdl #if !defined(alpha) && defined(DIAGNOSTIC)
1079 1.25 fvdl /*
1080 1.25 fvdl * Check to see if major data structures haven't bloated.
1081 1.25 fvdl */
1082 1.25 fvdl if (sizeof (struct nfsnode) > NFS_NODEALLOC) {
1083 1.32 christos printf("struct nfsnode bloated (> %dbytes)\n", NFS_NODEALLOC);
1084 1.32 christos printf("Try reducing NFS_SMALLFH\n");
1085 1.25 fvdl }
1086 1.25 fvdl if (sizeof (struct nfsmount) > NFS_MNTALLOC) {
1087 1.32 christos printf("struct nfsmount bloated (> %dbytes)\n", NFS_MNTALLOC);
1088 1.32 christos printf("Try reducing NFS_MUIDHASHSIZ\n");
1089 1.25 fvdl }
1090 1.25 fvdl if (sizeof (struct nfssvc_sock) > NFS_SVCALLOC) {
1091 1.32 christos printf("struct nfssvc_sock bloated (> %dbytes)\n",NFS_SVCALLOC);
1092 1.32 christos printf("Try reducing NFS_UIDHASHSIZ\n");
1093 1.25 fvdl }
1094 1.25 fvdl if (sizeof (struct nfsuid) > NFS_UIDALLOC) {
1095 1.32 christos printf("struct nfsuid bloated (> %dbytes)\n",NFS_UIDALLOC);
1096 1.32 christos printf("Try unionizing the nu_nickname and nu_flag fields\n");
1097 1.25 fvdl }
1098 1.25 fvdl #endif
1099 1.25 fvdl
1100 1.12 mycroft nfsrtt.pos = 0;
1101 1.1 cgd rpc_vers = txdr_unsigned(RPC_VER2);
1102 1.1 cgd rpc_call = txdr_unsigned(RPC_CALL);
1103 1.1 cgd rpc_reply = txdr_unsigned(RPC_REPLY);
1104 1.1 cgd rpc_msgdenied = txdr_unsigned(RPC_MSGDENIED);
1105 1.1 cgd rpc_msgaccepted = txdr_unsigned(RPC_MSGACCEPTED);
1106 1.1 cgd rpc_mismatch = txdr_unsigned(RPC_MISMATCH);
1107 1.12 mycroft rpc_autherr = txdr_unsigned(RPC_AUTHERR);
1108 1.1 cgd rpc_auth_unix = txdr_unsigned(RPCAUTH_UNIX);
1109 1.25 fvdl rpc_auth_kerb = txdr_unsigned(RPCAUTH_KERB4);
1110 1.1 cgd nfs_prog = txdr_unsigned(NFS_PROG);
1111 1.25 fvdl nqnfs_prog = txdr_unsigned(NQNFS_PROG);
1112 1.1 cgd nfs_true = txdr_unsigned(TRUE);
1113 1.1 cgd nfs_false = txdr_unsigned(FALSE);
1114 1.12 mycroft nfs_xdrneg1 = txdr_unsigned(-1);
1115 1.25 fvdl nfs_ticks = (hz * NFS_TICKINTVL + 500) / 1000;
1116 1.25 fvdl if (nfs_ticks < 1)
1117 1.25 fvdl nfs_ticks = 1;
1118 1.12 mycroft #ifdef NFSCLIENT
1119 1.1 cgd /* Ensure async daemons disabled */
1120 1.1 cgd for (i = 0; i < NFS_MAXASYNCDAEMON; i++)
1121 1.1 cgd nfs_iodwant[i] = (struct proc *)0;
1122 1.12 mycroft TAILQ_INIT(&nfs_bufq);
1123 1.1 cgd nfs_nhinit(); /* Init the nfsnode table */
1124 1.13 mycroft #endif /* NFSCLIENT */
1125 1.2 glass #ifdef NFSSERVER
1126 1.12 mycroft nfsrv_init(0); /* Init server data structures */
1127 1.1 cgd nfsrv_initcache(); /* Init the server request cache */
1128 1.13 mycroft #endif /* NFSSERVER */
1129 1.12 mycroft
1130 1.12 mycroft /*
1131 1.12 mycroft * Initialize the nqnfs server stuff.
1132 1.12 mycroft */
1133 1.12 mycroft if (nqnfsstarttime == 0) {
1134 1.12 mycroft nqnfsstarttime = boottime.tv_sec + nqsrv_maxlease
1135 1.12 mycroft + nqsrv_clockskew + nqsrv_writeslack;
1136 1.12 mycroft NQLOADNOVRAM(nqnfsstarttime);
1137 1.18 mycroft CIRCLEQ_INIT(&nqtimerhead);
1138 1.18 mycroft nqfhhashtbl = hashinit(NQLCHSZ, M_NQLEASE, &nqfhhash);
1139 1.12 mycroft }
1140 1.12 mycroft
1141 1.1 cgd /*
1142 1.1 cgd * Initialize reply list and start timer
1143 1.1 cgd */
1144 1.16 mycroft TAILQ_INIT(&nfs_reqq);
1145 1.24 christos nfs_timer(NULL);
1146 1.1 cgd }
1147 1.1 cgd
1148 1.12 mycroft #ifdef NFSCLIENT
1149 1.1 cgd /*
1150 1.12 mycroft * Attribute cache routines.
1151 1.12 mycroft * nfs_loadattrcache() - loads or updates the cache contents from attributes
1152 1.12 mycroft * that are on the mbuf list
1153 1.12 mycroft * nfs_getattrcache() - returns valid attributes if found in cache, returns
1154 1.12 mycroft * error otherwise
1155 1.1 cgd */
1156 1.12 mycroft
1157 1.12 mycroft /*
1158 1.12 mycroft * Load the attribute cache (that lives in the nfsnode entry) with
1159 1.12 mycroft * the values on the mbuf list and
1160 1.12 mycroft * Iff vap not NULL
1161 1.12 mycroft * copy the attributes to *vaper
1162 1.12 mycroft */
1163 1.24 christos int
1164 1.12 mycroft nfs_loadattrcache(vpp, mdp, dposp, vaper)
1165 1.12 mycroft struct vnode **vpp;
1166 1.12 mycroft struct mbuf **mdp;
1167 1.12 mycroft caddr_t *dposp;
1168 1.12 mycroft struct vattr *vaper;
1169 1.1 cgd {
1170 1.12 mycroft register struct vnode *vp = *vpp;
1171 1.12 mycroft register struct vattr *vap;
1172 1.25 fvdl register struct nfs_fattr *fp;
1173 1.24 christos extern int (**spec_nfsv2nodeop_p) __P((void *));
1174 1.18 mycroft register struct nfsnode *np;
1175 1.22 cgd register int32_t t1;
1176 1.25 fvdl caddr_t cp2;
1177 1.25 fvdl int error = 0;
1178 1.25 fvdl int32_t rdev;
1179 1.12 mycroft struct mbuf *md;
1180 1.12 mycroft enum vtype vtyp;
1181 1.12 mycroft u_short vmode;
1182 1.12 mycroft struct timespec mtime;
1183 1.12 mycroft struct vnode *nvp;
1184 1.25 fvdl int v3 = NFS_ISV3(vp);
1185 1.1 cgd
1186 1.12 mycroft md = *mdp;
1187 1.25 fvdl t1 = (mtod(md, caddr_t) + md->m_len) - *dposp;
1188 1.25 fvdl error = nfsm_disct(mdp, dposp, NFSX_FATTR(v3), t1, &cp2);
1189 1.24 christos if (error)
1190 1.12 mycroft return (error);
1191 1.25 fvdl fp = (struct nfs_fattr *)cp2;
1192 1.25 fvdl if (v3) {
1193 1.25 fvdl vtyp = nfsv3tov_type(fp->fa_type);
1194 1.25 fvdl vmode = fxdr_unsigned(u_short, fp->fa_mode);
1195 1.25 fvdl rdev = makedev(fxdr_unsigned(u_char, fp->fa3_rdev.specdata1),
1196 1.25 fvdl fxdr_unsigned(u_char, fp->fa3_rdev.specdata2));
1197 1.25 fvdl fxdr_nfsv3time(&fp->fa3_mtime, &mtime);
1198 1.12 mycroft } else {
1199 1.25 fvdl vtyp = nfsv2tov_type(fp->fa_type);
1200 1.25 fvdl vmode = fxdr_unsigned(u_short, fp->fa_mode);
1201 1.25 fvdl if (vtyp == VNON || vtyp == VREG)
1202 1.25 fvdl vtyp = IFTOVT(vmode);
1203 1.25 fvdl rdev = fxdr_unsigned(int32_t, fp->fa2_rdev);
1204 1.25 fvdl fxdr_nfsv2time(&fp->fa2_mtime, &mtime);
1205 1.25 fvdl
1206 1.25 fvdl /*
1207 1.25 fvdl * Really ugly NFSv2 kludge.
1208 1.25 fvdl */
1209 1.25 fvdl if (vtyp == VCHR && rdev == 0xffffffff)
1210 1.25 fvdl vtyp = VFIFO;
1211 1.12 mycroft }
1212 1.25 fvdl
1213 1.12 mycroft /*
1214 1.12 mycroft * If v_type == VNON it is a new node, so fill in the v_type,
1215 1.12 mycroft * n_mtime fields. Check to see if it represents a special
1216 1.12 mycroft * device, and if so, check for a possible alias. Once the
1217 1.12 mycroft * correct vnode has been obtained, fill in the rest of the
1218 1.12 mycroft * information.
1219 1.12 mycroft */
1220 1.12 mycroft np = VTONFS(vp);
1221 1.28 fvdl if (vp->v_type != vtyp) {
1222 1.25 fvdl vp->v_type = vtyp;
1223 1.12 mycroft if (vp->v_type == VFIFO) {
1224 1.27 thorpej #ifndef FIFO
1225 1.27 thorpej return (EOPNOTSUPP);
1226 1.27 thorpej #else
1227 1.24 christos extern int (**fifo_nfsv2nodeop_p) __P((void *));
1228 1.12 mycroft vp->v_op = fifo_nfsv2nodeop_p;
1229 1.27 thorpej #endif /* FIFO */
1230 1.12 mycroft }
1231 1.12 mycroft if (vp->v_type == VCHR || vp->v_type == VBLK) {
1232 1.12 mycroft vp->v_op = spec_nfsv2nodeop_p;
1233 1.24 christos nvp = checkalias(vp, (dev_t)rdev, vp->v_mount);
1234 1.24 christos if (nvp) {
1235 1.12 mycroft /*
1236 1.12 mycroft * Discard unneeded vnode, but save its nfsnode.
1237 1.25 fvdl * Since the nfsnode does not have a lock, its
1238 1.25 fvdl * vnode lock has to be carried over.
1239 1.12 mycroft */
1240 1.25 fvdl #ifdef Lite2_integrated
1241 1.25 fvdl nvp->v_vnlock = vp->v_vnlock;
1242 1.25 fvdl vp->v_vnlock = NULL;
1243 1.25 fvdl #endif
1244 1.12 mycroft nvp->v_data = vp->v_data;
1245 1.12 mycroft vp->v_data = NULL;
1246 1.12 mycroft vp->v_op = spec_vnodeop_p;
1247 1.12 mycroft vrele(vp);
1248 1.12 mycroft vgone(vp);
1249 1.12 mycroft /*
1250 1.12 mycroft * Reinitialize aliased node.
1251 1.12 mycroft */
1252 1.12 mycroft np->n_vnode = nvp;
1253 1.12 mycroft *vpp = vp = nvp;
1254 1.12 mycroft }
1255 1.12 mycroft }
1256 1.23 jtc np->n_mtime = mtime.tv_sec;
1257 1.12 mycroft }
1258 1.12 mycroft vap = &np->n_vattr;
1259 1.12 mycroft vap->va_type = vtyp;
1260 1.12 mycroft vap->va_mode = (vmode & 07777);
1261 1.12 mycroft vap->va_rdev = (dev_t)rdev;
1262 1.12 mycroft vap->va_mtime = mtime;
1263 1.12 mycroft vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0];
1264 1.25 fvdl if (v3) {
1265 1.25 fvdl vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1266 1.25 fvdl vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1267 1.25 fvdl vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1268 1.25 fvdl fxdr_hyper(&fp->fa3_size, &vap->va_size);
1269 1.25 fvdl vap->va_blocksize = NFS_FABLKSIZE;
1270 1.25 fvdl fxdr_hyper(&fp->fa3_used, &vap->va_bytes);
1271 1.25 fvdl vap->va_fileid = fxdr_unsigned(int32_t,
1272 1.25 fvdl fp->fa3_fileid.nfsuquad[1]);
1273 1.25 fvdl fxdr_nfsv3time(&fp->fa3_atime, &vap->va_atime);
1274 1.25 fvdl fxdr_nfsv3time(&fp->fa3_ctime, &vap->va_ctime);
1275 1.25 fvdl vap->va_flags = 0;
1276 1.25 fvdl vap->va_filerev = 0;
1277 1.12 mycroft } else {
1278 1.25 fvdl vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1279 1.25 fvdl vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1280 1.25 fvdl vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1281 1.25 fvdl vap->va_size = fxdr_unsigned(u_int32_t, fp->fa2_size);
1282 1.25 fvdl vap->va_blocksize = fxdr_unsigned(int32_t, fp->fa2_blocksize);
1283 1.25 fvdl vap->va_bytes = fxdr_unsigned(int32_t, fp->fa2_blocks)
1284 1.25 fvdl * NFS_FABLKSIZE;
1285 1.25 fvdl vap->va_fileid = fxdr_unsigned(int32_t, fp->fa2_fileid);
1286 1.25 fvdl fxdr_nfsv2time(&fp->fa2_atime, &vap->va_atime);
1287 1.12 mycroft vap->va_flags = 0;
1288 1.25 fvdl vap->va_ctime.tv_sec = fxdr_unsigned(u_int32_t,
1289 1.25 fvdl fp->fa2_ctime.nfsv2_sec);
1290 1.25 fvdl vap->va_ctime.tv_nsec = 0;
1291 1.25 fvdl vap->va_gen = fxdr_unsigned(u_int32_t,fp->fa2_ctime.nfsv2_usec);
1292 1.12 mycroft vap->va_filerev = 0;
1293 1.12 mycroft }
1294 1.12 mycroft if (vap->va_size != np->n_size) {
1295 1.12 mycroft if (vap->va_type == VREG) {
1296 1.12 mycroft if (np->n_flag & NMODIFIED) {
1297 1.12 mycroft if (vap->va_size < np->n_size)
1298 1.12 mycroft vap->va_size = np->n_size;
1299 1.12 mycroft else
1300 1.12 mycroft np->n_size = vap->va_size;
1301 1.12 mycroft } else
1302 1.12 mycroft np->n_size = vap->va_size;
1303 1.12 mycroft vnode_pager_setsize(vp, (u_long)np->n_size);
1304 1.12 mycroft } else
1305 1.12 mycroft np->n_size = vap->va_size;
1306 1.12 mycroft }
1307 1.12 mycroft np->n_attrstamp = time.tv_sec;
1308 1.12 mycroft if (vaper != NULL) {
1309 1.12 mycroft bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(*vap));
1310 1.12 mycroft if (np->n_flag & NCHG) {
1311 1.25 fvdl if (np->n_flag & NACC)
1312 1.25 fvdl vaper->va_atime = np->n_atim;
1313 1.25 fvdl if (np->n_flag & NUPD)
1314 1.25 fvdl vaper->va_mtime = np->n_mtim;
1315 1.12 mycroft }
1316 1.12 mycroft }
1317 1.12 mycroft return (0);
1318 1.12 mycroft }
1319 1.12 mycroft
1320 1.12 mycroft /*
1321 1.12 mycroft * Check the time stamp
1322 1.12 mycroft * If the cache is valid, copy contents to *vap and return 0
1323 1.12 mycroft * otherwise return an error
1324 1.12 mycroft */
1325 1.24 christos int
1326 1.12 mycroft nfs_getattrcache(vp, vaper)
1327 1.12 mycroft register struct vnode *vp;
1328 1.12 mycroft struct vattr *vaper;
1329 1.12 mycroft {
1330 1.12 mycroft register struct nfsnode *np = VTONFS(vp);
1331 1.12 mycroft register struct vattr *vap;
1332 1.12 mycroft
1333 1.25 fvdl if ((time.tv_sec - np->n_attrstamp) >= NFS_ATTRTIMEO(np)) {
1334 1.12 mycroft nfsstats.attrcache_misses++;
1335 1.12 mycroft return (ENOENT);
1336 1.12 mycroft }
1337 1.12 mycroft nfsstats.attrcache_hits++;
1338 1.12 mycroft vap = &np->n_vattr;
1339 1.12 mycroft if (vap->va_size != np->n_size) {
1340 1.12 mycroft if (vap->va_type == VREG) {
1341 1.12 mycroft if (np->n_flag & NMODIFIED) {
1342 1.12 mycroft if (vap->va_size < np->n_size)
1343 1.12 mycroft vap->va_size = np->n_size;
1344 1.12 mycroft else
1345 1.12 mycroft np->n_size = vap->va_size;
1346 1.12 mycroft } else
1347 1.12 mycroft np->n_size = vap->va_size;
1348 1.12 mycroft vnode_pager_setsize(vp, (u_long)np->n_size);
1349 1.12 mycroft } else
1350 1.12 mycroft np->n_size = vap->va_size;
1351 1.12 mycroft }
1352 1.12 mycroft bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(struct vattr));
1353 1.12 mycroft if (np->n_flag & NCHG) {
1354 1.25 fvdl if (np->n_flag & NACC)
1355 1.25 fvdl vaper->va_atime = np->n_atim;
1356 1.25 fvdl if (np->n_flag & NUPD)
1357 1.25 fvdl vaper->va_mtime = np->n_mtim;
1358 1.1 cgd }
1359 1.12 mycroft return (0);
1360 1.1 cgd }
1361 1.25 fvdl #endif /* NFSCLIENT */
1362 1.1 cgd
1363 1.1 cgd /*
1364 1.12 mycroft * Set up nameidata for a lookup() call and do it
1365 1.1 cgd */
1366 1.24 christos int
1367 1.25 fvdl nfs_namei(ndp, fhp, len, slp, nam, mdp, dposp, retdirp, p, kerbflag)
1368 1.1 cgd register struct nameidata *ndp;
1369 1.1 cgd fhandle_t *fhp;
1370 1.1 cgd int len;
1371 1.12 mycroft struct nfssvc_sock *slp;
1372 1.12 mycroft struct mbuf *nam;
1373 1.1 cgd struct mbuf **mdp;
1374 1.1 cgd caddr_t *dposp;
1375 1.25 fvdl struct vnode **retdirp;
1376 1.1 cgd struct proc *p;
1377 1.25 fvdl int kerbflag;
1378 1.1 cgd {
1379 1.1 cgd register int i, rem;
1380 1.1 cgd register struct mbuf *md;
1381 1.1 cgd register char *fromcp, *tocp;
1382 1.1 cgd struct vnode *dp;
1383 1.12 mycroft int error, rdonly;
1384 1.12 mycroft struct componentname *cnp = &ndp->ni_cnd;
1385 1.1 cgd
1386 1.25 fvdl *retdirp = (struct vnode *)0;
1387 1.12 mycroft MALLOC(cnp->cn_pnbuf, char *, len + 1, M_NAMEI, M_WAITOK);
1388 1.1 cgd /*
1389 1.1 cgd * Copy the name from the mbuf list to ndp->ni_pnbuf
1390 1.1 cgd * and set the various ndp fields appropriately.
1391 1.1 cgd */
1392 1.1 cgd fromcp = *dposp;
1393 1.12 mycroft tocp = cnp->cn_pnbuf;
1394 1.1 cgd md = *mdp;
1395 1.1 cgd rem = mtod(md, caddr_t) + md->m_len - fromcp;
1396 1.1 cgd for (i = 0; i < len; i++) {
1397 1.1 cgd while (rem == 0) {
1398 1.1 cgd md = md->m_next;
1399 1.1 cgd if (md == NULL) {
1400 1.1 cgd error = EBADRPC;
1401 1.1 cgd goto out;
1402 1.1 cgd }
1403 1.1 cgd fromcp = mtod(md, caddr_t);
1404 1.1 cgd rem = md->m_len;
1405 1.1 cgd }
1406 1.1 cgd if (*fromcp == '\0' || *fromcp == '/') {
1407 1.25 fvdl error = EACCES;
1408 1.1 cgd goto out;
1409 1.1 cgd }
1410 1.1 cgd *tocp++ = *fromcp++;
1411 1.1 cgd rem--;
1412 1.1 cgd }
1413 1.1 cgd *tocp = '\0';
1414 1.1 cgd *mdp = md;
1415 1.1 cgd *dposp = fromcp;
1416 1.1 cgd len = nfsm_rndup(len)-len;
1417 1.1 cgd if (len > 0) {
1418 1.1 cgd if (rem >= len)
1419 1.1 cgd *dposp += len;
1420 1.24 christos else if ((error = nfs_adv(mdp, dposp, len, rem)) != 0)
1421 1.1 cgd goto out;
1422 1.1 cgd }
1423 1.12 mycroft ndp->ni_pathlen = tocp - cnp->cn_pnbuf;
1424 1.12 mycroft cnp->cn_nameptr = cnp->cn_pnbuf;
1425 1.1 cgd /*
1426 1.1 cgd * Extract and set starting directory.
1427 1.1 cgd */
1428 1.24 christos error = nfsrv_fhtovp(fhp, FALSE, &dp, ndp->ni_cnd.cn_cred, slp,
1429 1.25 fvdl nam, &rdonly, kerbflag);
1430 1.24 christos if (error)
1431 1.1 cgd goto out;
1432 1.1 cgd if (dp->v_type != VDIR) {
1433 1.1 cgd vrele(dp);
1434 1.1 cgd error = ENOTDIR;
1435 1.1 cgd goto out;
1436 1.1 cgd }
1437 1.25 fvdl VREF(dp);
1438 1.25 fvdl *retdirp = dp;
1439 1.1 cgd ndp->ni_startdir = dp;
1440 1.12 mycroft if (rdonly)
1441 1.12 mycroft cnp->cn_flags |= (NOCROSSMOUNT | RDONLY);
1442 1.12 mycroft else
1443 1.12 mycroft cnp->cn_flags |= NOCROSSMOUNT;
1444 1.1 cgd /*
1445 1.1 cgd * And call lookup() to do the real work
1446 1.1 cgd */
1447 1.12 mycroft cnp->cn_proc = p;
1448 1.25 fvdl error = lookup(ndp);
1449 1.25 fvdl if (error)
1450 1.1 cgd goto out;
1451 1.1 cgd /*
1452 1.1 cgd * Check for encountering a symbolic link
1453 1.1 cgd */
1454 1.12 mycroft if (cnp->cn_flags & ISSYMLINK) {
1455 1.12 mycroft if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1)
1456 1.1 cgd vput(ndp->ni_dvp);
1457 1.1 cgd else
1458 1.1 cgd vrele(ndp->ni_dvp);
1459 1.1 cgd vput(ndp->ni_vp);
1460 1.1 cgd ndp->ni_vp = NULL;
1461 1.1 cgd error = EINVAL;
1462 1.1 cgd goto out;
1463 1.1 cgd }
1464 1.1 cgd /*
1465 1.1 cgd * Check for saved name request
1466 1.1 cgd */
1467 1.12 mycroft if (cnp->cn_flags & (SAVENAME | SAVESTART)) {
1468 1.12 mycroft cnp->cn_flags |= HASBUF;
1469 1.1 cgd return (0);
1470 1.1 cgd }
1471 1.1 cgd out:
1472 1.12 mycroft FREE(cnp->cn_pnbuf, M_NAMEI);
1473 1.1 cgd return (error);
1474 1.1 cgd }
1475 1.1 cgd
1476 1.1 cgd /*
1477 1.1 cgd * A fiddled version of m_adj() that ensures null fill to a long
1478 1.1 cgd * boundary and only trims off the back end
1479 1.1 cgd */
1480 1.12 mycroft void
1481 1.1 cgd nfsm_adj(mp, len, nul)
1482 1.1 cgd struct mbuf *mp;
1483 1.1 cgd register int len;
1484 1.1 cgd int nul;
1485 1.1 cgd {
1486 1.1 cgd register struct mbuf *m;
1487 1.1 cgd register int count, i;
1488 1.1 cgd register char *cp;
1489 1.1 cgd
1490 1.1 cgd /*
1491 1.1 cgd * Trim from tail. Scan the mbuf chain,
1492 1.1 cgd * calculating its length and finding the last mbuf.
1493 1.1 cgd * If the adjustment only affects this mbuf, then just
1494 1.1 cgd * adjust and return. Otherwise, rescan and truncate
1495 1.1 cgd * after the remaining size.
1496 1.1 cgd */
1497 1.1 cgd count = 0;
1498 1.1 cgd m = mp;
1499 1.1 cgd for (;;) {
1500 1.1 cgd count += m->m_len;
1501 1.1 cgd if (m->m_next == (struct mbuf *)0)
1502 1.1 cgd break;
1503 1.1 cgd m = m->m_next;
1504 1.1 cgd }
1505 1.1 cgd if (m->m_len > len) {
1506 1.1 cgd m->m_len -= len;
1507 1.1 cgd if (nul > 0) {
1508 1.1 cgd cp = mtod(m, caddr_t)+m->m_len-nul;
1509 1.1 cgd for (i = 0; i < nul; i++)
1510 1.1 cgd *cp++ = '\0';
1511 1.1 cgd }
1512 1.1 cgd return;
1513 1.1 cgd }
1514 1.1 cgd count -= len;
1515 1.1 cgd if (count < 0)
1516 1.1 cgd count = 0;
1517 1.1 cgd /*
1518 1.1 cgd * Correct length for chain is "count".
1519 1.1 cgd * Find the mbuf with last data, adjust its length,
1520 1.1 cgd * and toss data from remaining mbufs on chain.
1521 1.1 cgd */
1522 1.1 cgd for (m = mp; m; m = m->m_next) {
1523 1.1 cgd if (m->m_len >= count) {
1524 1.1 cgd m->m_len = count;
1525 1.1 cgd if (nul > 0) {
1526 1.1 cgd cp = mtod(m, caddr_t)+m->m_len-nul;
1527 1.1 cgd for (i = 0; i < nul; i++)
1528 1.1 cgd *cp++ = '\0';
1529 1.1 cgd }
1530 1.1 cgd break;
1531 1.1 cgd }
1532 1.1 cgd count -= m->m_len;
1533 1.1 cgd }
1534 1.25 fvdl for (m = m->m_next;m;m = m->m_next)
1535 1.1 cgd m->m_len = 0;
1536 1.1 cgd }
1537 1.1 cgd
1538 1.1 cgd /*
1539 1.25 fvdl * Make these functions instead of macros, so that the kernel text size
1540 1.25 fvdl * doesn't get too big...
1541 1.25 fvdl */
1542 1.25 fvdl void
1543 1.25 fvdl nfsm_srvwcc(nfsd, before_ret, before_vap, after_ret, after_vap, mbp, bposp)
1544 1.25 fvdl struct nfsrv_descript *nfsd;
1545 1.25 fvdl int before_ret;
1546 1.25 fvdl register struct vattr *before_vap;
1547 1.25 fvdl int after_ret;
1548 1.25 fvdl struct vattr *after_vap;
1549 1.25 fvdl struct mbuf **mbp;
1550 1.25 fvdl char **bposp;
1551 1.25 fvdl {
1552 1.25 fvdl register struct mbuf *mb = *mbp, *mb2;
1553 1.25 fvdl register char *bpos = *bposp;
1554 1.25 fvdl register u_int32_t *tl;
1555 1.25 fvdl
1556 1.25 fvdl if (before_ret) {
1557 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
1558 1.25 fvdl *tl = nfs_false;
1559 1.25 fvdl } else {
1560 1.25 fvdl nfsm_build(tl, u_int32_t *, 7 * NFSX_UNSIGNED);
1561 1.25 fvdl *tl++ = nfs_true;
1562 1.25 fvdl txdr_hyper(&(before_vap->va_size), tl);
1563 1.25 fvdl tl += 2;
1564 1.25 fvdl txdr_nfsv3time(&(before_vap->va_mtime), tl);
1565 1.25 fvdl tl += 2;
1566 1.25 fvdl txdr_nfsv3time(&(before_vap->va_ctime), tl);
1567 1.25 fvdl }
1568 1.25 fvdl *bposp = bpos;
1569 1.25 fvdl *mbp = mb;
1570 1.25 fvdl nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp);
1571 1.25 fvdl }
1572 1.25 fvdl
1573 1.25 fvdl void
1574 1.25 fvdl nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp)
1575 1.25 fvdl struct nfsrv_descript *nfsd;
1576 1.25 fvdl int after_ret;
1577 1.25 fvdl struct vattr *after_vap;
1578 1.25 fvdl struct mbuf **mbp;
1579 1.25 fvdl char **bposp;
1580 1.25 fvdl {
1581 1.25 fvdl register struct mbuf *mb = *mbp, *mb2;
1582 1.25 fvdl register char *bpos = *bposp;
1583 1.25 fvdl register u_int32_t *tl;
1584 1.25 fvdl register struct nfs_fattr *fp;
1585 1.25 fvdl
1586 1.25 fvdl if (after_ret) {
1587 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
1588 1.25 fvdl *tl = nfs_false;
1589 1.25 fvdl } else {
1590 1.25 fvdl nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED + NFSX_V3FATTR);
1591 1.25 fvdl *tl++ = nfs_true;
1592 1.25 fvdl fp = (struct nfs_fattr *)tl;
1593 1.25 fvdl nfsm_srvfattr(nfsd, after_vap, fp);
1594 1.25 fvdl }
1595 1.25 fvdl *mbp = mb;
1596 1.25 fvdl *bposp = bpos;
1597 1.25 fvdl }
1598 1.25 fvdl
1599 1.25 fvdl void
1600 1.25 fvdl nfsm_srvfattr(nfsd, vap, fp)
1601 1.25 fvdl register struct nfsrv_descript *nfsd;
1602 1.25 fvdl register struct vattr *vap;
1603 1.25 fvdl register struct nfs_fattr *fp;
1604 1.25 fvdl {
1605 1.25 fvdl
1606 1.25 fvdl fp->fa_nlink = txdr_unsigned(vap->va_nlink);
1607 1.25 fvdl fp->fa_uid = txdr_unsigned(vap->va_uid);
1608 1.25 fvdl fp->fa_gid = txdr_unsigned(vap->va_gid);
1609 1.25 fvdl if (nfsd->nd_flag & ND_NFSV3) {
1610 1.25 fvdl fp->fa_type = vtonfsv3_type(vap->va_type);
1611 1.25 fvdl fp->fa_mode = vtonfsv3_mode(vap->va_mode);
1612 1.25 fvdl txdr_hyper(&vap->va_size, &fp->fa3_size);
1613 1.25 fvdl txdr_hyper(&vap->va_bytes, &fp->fa3_used);
1614 1.25 fvdl fp->fa3_rdev.specdata1 = txdr_unsigned(major(vap->va_rdev));
1615 1.25 fvdl fp->fa3_rdev.specdata2 = txdr_unsigned(minor(vap->va_rdev));
1616 1.25 fvdl fp->fa3_fsid.nfsuquad[0] = 0;
1617 1.25 fvdl fp->fa3_fsid.nfsuquad[1] = txdr_unsigned(vap->va_fsid);
1618 1.25 fvdl fp->fa3_fileid.nfsuquad[0] = 0;
1619 1.25 fvdl fp->fa3_fileid.nfsuquad[1] = txdr_unsigned(vap->va_fileid);
1620 1.25 fvdl txdr_nfsv3time(&vap->va_atime, &fp->fa3_atime);
1621 1.25 fvdl txdr_nfsv3time(&vap->va_mtime, &fp->fa3_mtime);
1622 1.25 fvdl txdr_nfsv3time(&vap->va_ctime, &fp->fa3_ctime);
1623 1.25 fvdl } else {
1624 1.25 fvdl fp->fa_type = vtonfsv2_type(vap->va_type);
1625 1.25 fvdl fp->fa_mode = vtonfsv2_mode(vap->va_type, vap->va_mode);
1626 1.25 fvdl fp->fa2_size = txdr_unsigned(vap->va_size);
1627 1.25 fvdl fp->fa2_blocksize = txdr_unsigned(vap->va_blocksize);
1628 1.25 fvdl if (vap->va_type == VFIFO)
1629 1.25 fvdl fp->fa2_rdev = 0xffffffff;
1630 1.25 fvdl else
1631 1.25 fvdl fp->fa2_rdev = txdr_unsigned(vap->va_rdev);
1632 1.25 fvdl fp->fa2_blocks = txdr_unsigned(vap->va_bytes / NFS_FABLKSIZE);
1633 1.25 fvdl fp->fa2_fsid = txdr_unsigned(vap->va_fsid);
1634 1.25 fvdl fp->fa2_fileid = txdr_unsigned(vap->va_fileid);
1635 1.25 fvdl txdr_nfsv2time(&vap->va_atime, &fp->fa2_atime);
1636 1.25 fvdl txdr_nfsv2time(&vap->va_mtime, &fp->fa2_mtime);
1637 1.25 fvdl txdr_nfsv2time(&vap->va_ctime, &fp->fa2_ctime);
1638 1.25 fvdl }
1639 1.25 fvdl }
1640 1.25 fvdl
1641 1.25 fvdl /*
1642 1.1 cgd * nfsrv_fhtovp() - convert a fh to a vnode ptr (optionally locked)
1643 1.1 cgd * - look up fsid in mount list (if not found ret error)
1644 1.12 mycroft * - get vp and export rights by calling VFS_FHTOVP()
1645 1.12 mycroft * - if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon
1646 1.1 cgd * - if not lockflag unlock it with VOP_UNLOCK()
1647 1.1 cgd */
1648 1.24 christos int
1649 1.25 fvdl nfsrv_fhtovp(fhp, lockflag, vpp, cred, slp, nam, rdonlyp, kerbflag)
1650 1.1 cgd fhandle_t *fhp;
1651 1.1 cgd int lockflag;
1652 1.1 cgd struct vnode **vpp;
1653 1.1 cgd struct ucred *cred;
1654 1.12 mycroft struct nfssvc_sock *slp;
1655 1.12 mycroft struct mbuf *nam;
1656 1.12 mycroft int *rdonlyp;
1657 1.25 fvdl int kerbflag;
1658 1.1 cgd {
1659 1.25 fvdl #ifdef Lite2_integrated
1660 1.25 fvdl struct proc *p = curproc; /* XXX */
1661 1.25 fvdl #endif
1662 1.1 cgd register struct mount *mp;
1663 1.12 mycroft register int i;
1664 1.12 mycroft struct ucred *credanon;
1665 1.12 mycroft int error, exflags;
1666 1.1 cgd
1667 1.12 mycroft *vpp = (struct vnode *)0;
1668 1.25 fvdl #ifdef Lite2_integrated
1669 1.25 fvdl mp = vfs_getvfs(&fhp->fh_fsid);
1670 1.25 fvdl #else
1671 1.25 fvdl mp = getvfs(&fhp->fh_fsid);
1672 1.25 fvdl #endif
1673 1.25 fvdl if (!mp)
1674 1.1 cgd return (ESTALE);
1675 1.24 christos error = VFS_FHTOVP(mp, &fhp->fh_fid, nam, vpp, &exflags, &credanon);
1676 1.24 christos if (error)
1677 1.12 mycroft return (error);
1678 1.12 mycroft /*
1679 1.12 mycroft * Check/setup credentials.
1680 1.12 mycroft */
1681 1.12 mycroft if (exflags & MNT_EXKERB) {
1682 1.25 fvdl if (!kerbflag) {
1683 1.12 mycroft vput(*vpp);
1684 1.25 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
1685 1.12 mycroft }
1686 1.25 fvdl } else if (kerbflag) {
1687 1.25 fvdl vput(*vpp);
1688 1.25 fvdl return (NFSERR_AUTHERR | AUTH_TOOWEAK);
1689 1.12 mycroft } else if (cred->cr_uid == 0 || (exflags & MNT_EXPORTANON)) {
1690 1.12 mycroft cred->cr_uid = credanon->cr_uid;
1691 1.19 jtc cred->cr_gid = credanon->cr_gid;
1692 1.12 mycroft for (i = 0; i < credanon->cr_ngroups && i < NGROUPS; i++)
1693 1.12 mycroft cred->cr_groups[i] = credanon->cr_groups[i];
1694 1.15 mycroft cred->cr_ngroups = i;
1695 1.12 mycroft }
1696 1.12 mycroft if (exflags & MNT_EXRDONLY)
1697 1.12 mycroft *rdonlyp = 1;
1698 1.12 mycroft else
1699 1.12 mycroft *rdonlyp = 0;
1700 1.1 cgd if (!lockflag)
1701 1.25 fvdl #ifdef Lite2_integrated
1702 1.25 fvdl VOP_UNLOCK(*vpp, 0, p);
1703 1.25 fvdl #else
1704 1.1 cgd VOP_UNLOCK(*vpp);
1705 1.25 fvdl #endif
1706 1.1 cgd return (0);
1707 1.1 cgd }
1708 1.1 cgd
1709 1.1 cgd /*
1710 1.12 mycroft * This function compares two net addresses by family and returns TRUE
1711 1.12 mycroft * if they are the same host.
1712 1.12 mycroft * If there is any doubt, return FALSE.
1713 1.12 mycroft * The AF_INET family is handled as a special case so that address mbufs
1714 1.12 mycroft * don't need to be saved to store "struct in_addr", which is only 4 bytes.
1715 1.1 cgd */
1716 1.24 christos int
1717 1.12 mycroft netaddr_match(family, haddr, nam)
1718 1.12 mycroft int family;
1719 1.12 mycroft union nethostaddr *haddr;
1720 1.12 mycroft struct mbuf *nam;
1721 1.1 cgd {
1722 1.12 mycroft register struct sockaddr_in *inetaddr;
1723 1.1 cgd
1724 1.12 mycroft switch (family) {
1725 1.12 mycroft case AF_INET:
1726 1.12 mycroft inetaddr = mtod(nam, struct sockaddr_in *);
1727 1.12 mycroft if (inetaddr->sin_family == AF_INET &&
1728 1.12 mycroft inetaddr->sin_addr.s_addr == haddr->had_inetaddr)
1729 1.12 mycroft return (1);
1730 1.12 mycroft break;
1731 1.12 mycroft #ifdef ISO
1732 1.12 mycroft case AF_ISO:
1733 1.12 mycroft {
1734 1.12 mycroft register struct sockaddr_iso *isoaddr1, *isoaddr2;
1735 1.12 mycroft
1736 1.12 mycroft isoaddr1 = mtod(nam, struct sockaddr_iso *);
1737 1.12 mycroft isoaddr2 = mtod(haddr->had_nam, struct sockaddr_iso *);
1738 1.12 mycroft if (isoaddr1->siso_family == AF_ISO &&
1739 1.12 mycroft isoaddr1->siso_nlen > 0 &&
1740 1.12 mycroft isoaddr1->siso_nlen == isoaddr2->siso_nlen &&
1741 1.12 mycroft SAME_ISOADDR(isoaddr1, isoaddr2))
1742 1.12 mycroft return (1);
1743 1.12 mycroft break;
1744 1.12 mycroft }
1745 1.12 mycroft #endif /* ISO */
1746 1.12 mycroft default:
1747 1.12 mycroft break;
1748 1.12 mycroft };
1749 1.12 mycroft return (0);
1750 1.25 fvdl }
1751 1.25 fvdl
1752 1.25 fvdl static nfsuint64 nfs_nullcookie = {{ 0, 0 }};
1753 1.25 fvdl /*
1754 1.25 fvdl * This function finds the directory cookie that corresponds to the
1755 1.25 fvdl * logical byte offset given.
1756 1.25 fvdl */
1757 1.25 fvdl nfsuint64 *
1758 1.25 fvdl nfs_getcookie(np, off, add)
1759 1.25 fvdl register struct nfsnode *np;
1760 1.25 fvdl off_t off;
1761 1.25 fvdl int add;
1762 1.25 fvdl {
1763 1.25 fvdl register struct nfsdmap *dp, *dp2;
1764 1.25 fvdl register int pos;
1765 1.25 fvdl
1766 1.25 fvdl pos = off / NFS_DIRBLKSIZ;
1767 1.25 fvdl if (pos == 0) {
1768 1.25 fvdl #ifdef DIAGNOSTIC
1769 1.25 fvdl if (add)
1770 1.25 fvdl panic("nfs getcookie add at 0");
1771 1.25 fvdl #endif
1772 1.25 fvdl return (&nfs_nullcookie);
1773 1.25 fvdl }
1774 1.25 fvdl pos--;
1775 1.25 fvdl dp = np->n_cookies.lh_first;
1776 1.25 fvdl if (!dp) {
1777 1.25 fvdl if (add) {
1778 1.25 fvdl MALLOC(dp, struct nfsdmap *, sizeof (struct nfsdmap),
1779 1.25 fvdl M_NFSDIROFF, M_WAITOK);
1780 1.25 fvdl dp->ndm_eocookie = 0;
1781 1.25 fvdl LIST_INSERT_HEAD(&np->n_cookies, dp, ndm_list);
1782 1.25 fvdl } else
1783 1.25 fvdl return ((nfsuint64 *)0);
1784 1.25 fvdl }
1785 1.25 fvdl while (pos >= NFSNUMCOOKIES) {
1786 1.25 fvdl pos -= NFSNUMCOOKIES;
1787 1.25 fvdl if (dp->ndm_list.le_next) {
1788 1.25 fvdl if (!add && dp->ndm_eocookie < NFSNUMCOOKIES &&
1789 1.25 fvdl pos >= dp->ndm_eocookie)
1790 1.25 fvdl return ((nfsuint64 *)0);
1791 1.25 fvdl dp = dp->ndm_list.le_next;
1792 1.25 fvdl } else if (add) {
1793 1.25 fvdl MALLOC(dp2, struct nfsdmap *, sizeof (struct nfsdmap),
1794 1.25 fvdl M_NFSDIROFF, M_WAITOK);
1795 1.25 fvdl dp2->ndm_eocookie = 0;
1796 1.25 fvdl LIST_INSERT_AFTER(dp, dp2, ndm_list);
1797 1.25 fvdl dp = dp2;
1798 1.25 fvdl } else
1799 1.25 fvdl return ((nfsuint64 *)0);
1800 1.25 fvdl }
1801 1.25 fvdl if (pos >= dp->ndm_eocookie) {
1802 1.25 fvdl if (add)
1803 1.25 fvdl dp->ndm_eocookie = pos + 1;
1804 1.25 fvdl else
1805 1.25 fvdl return ((nfsuint64 *)0);
1806 1.25 fvdl }
1807 1.25 fvdl return (&dp->ndm_cookies[pos]);
1808 1.25 fvdl }
1809 1.25 fvdl
1810 1.25 fvdl /*
1811 1.25 fvdl * Invalidate cached directory information, except for the actual directory
1812 1.25 fvdl * blocks (which are invalidated separately).
1813 1.25 fvdl * Done mainly to avoid the use of stale offset cookies.
1814 1.25 fvdl */
1815 1.25 fvdl void
1816 1.25 fvdl nfs_invaldir(vp)
1817 1.25 fvdl register struct vnode *vp;
1818 1.25 fvdl {
1819 1.26 fvdl #ifdef notdef /* XXX */
1820 1.25 fvdl register struct nfsnode *np = VTONFS(vp);
1821 1.25 fvdl
1822 1.25 fvdl #ifdef DIAGNOSTIC
1823 1.25 fvdl if (vp->v_type != VDIR)
1824 1.25 fvdl panic("nfs: invaldir not dir");
1825 1.25 fvdl #endif
1826 1.25 fvdl np->n_direofoffset = 0;
1827 1.25 fvdl np->n_cookieverf.nfsuquad[0] = 0;
1828 1.25 fvdl np->n_cookieverf.nfsuquad[1] = 0;
1829 1.25 fvdl if (np->n_cookies.lh_first)
1830 1.25 fvdl np->n_cookies.lh_first->ndm_eocookie = 0;
1831 1.26 fvdl #endif
1832 1.25 fvdl }
1833 1.25 fvdl
1834 1.25 fvdl /*
1835 1.25 fvdl * The write verifier has changed (probably due to a server reboot), so all
1836 1.25 fvdl * B_NEEDCOMMIT blocks will have to be written again. Since they are on the
1837 1.25 fvdl * dirty block list as B_DELWRI, all this takes is clearing the B_NEEDCOMMIT
1838 1.25 fvdl * flag. Once done the new write verifier can be set for the mount point.
1839 1.25 fvdl */
1840 1.25 fvdl void
1841 1.25 fvdl nfs_clearcommit(mp)
1842 1.25 fvdl struct mount *mp;
1843 1.25 fvdl {
1844 1.25 fvdl register struct vnode *vp, *nvp;
1845 1.25 fvdl register struct buf *bp, *nbp;
1846 1.25 fvdl int s;
1847 1.25 fvdl
1848 1.25 fvdl s = splbio();
1849 1.25 fvdl loop:
1850 1.25 fvdl for (vp = mp->mnt_vnodelist.lh_first; vp; vp = nvp) {
1851 1.25 fvdl if (vp->v_mount != mp) /* Paranoia */
1852 1.25 fvdl goto loop;
1853 1.25 fvdl nvp = vp->v_mntvnodes.le_next;
1854 1.25 fvdl for (bp = vp->v_dirtyblkhd.lh_first; bp; bp = nbp) {
1855 1.25 fvdl nbp = bp->b_vnbufs.le_next;
1856 1.25 fvdl if ((bp->b_flags & (B_BUSY | B_DELWRI | B_NEEDCOMMIT))
1857 1.25 fvdl == (B_DELWRI | B_NEEDCOMMIT))
1858 1.25 fvdl bp->b_flags &= ~B_NEEDCOMMIT;
1859 1.25 fvdl }
1860 1.25 fvdl }
1861 1.25 fvdl splx(s);
1862 1.25 fvdl }
1863 1.25 fvdl
1864 1.25 fvdl /*
1865 1.25 fvdl * Map errnos to NFS error numbers. For Version 3 also filter out error
1866 1.25 fvdl * numbers not specified for the associated procedure.
1867 1.25 fvdl */
1868 1.25 fvdl int
1869 1.25 fvdl nfsrv_errmap(nd, err)
1870 1.25 fvdl struct nfsrv_descript *nd;
1871 1.25 fvdl register int err;
1872 1.25 fvdl {
1873 1.25 fvdl register short *defaulterrp, *errp;
1874 1.25 fvdl
1875 1.25 fvdl if (nd->nd_flag & ND_NFSV3) {
1876 1.25 fvdl if (nd->nd_procnum <= NFSPROC_COMMIT) {
1877 1.25 fvdl errp = defaulterrp = nfsrv_v3errmap[nd->nd_procnum];
1878 1.25 fvdl while (*++errp) {
1879 1.25 fvdl if (*errp == err)
1880 1.25 fvdl return (err);
1881 1.25 fvdl else if (*errp > err)
1882 1.25 fvdl break;
1883 1.25 fvdl }
1884 1.25 fvdl return ((int)*defaulterrp);
1885 1.25 fvdl } else
1886 1.25 fvdl return (err & 0xffff);
1887 1.25 fvdl }
1888 1.25 fvdl if (err <= ELAST)
1889 1.25 fvdl return ((int)nfsrv_v2errmap[err - 1]);
1890 1.25 fvdl return (NFSERR_IO);
1891 1.25 fvdl }
1892 1.25 fvdl
1893 1.25 fvdl /*
1894 1.25 fvdl * Sort the group list in increasing numerical order.
1895 1.25 fvdl * (Insertion sort by Chris Torek, who was grossed out by the bubble sort
1896 1.25 fvdl * that used to be here.)
1897 1.25 fvdl */
1898 1.25 fvdl void
1899 1.25 fvdl nfsrvw_sort(list, num)
1900 1.25 fvdl register gid_t *list;
1901 1.25 fvdl register int num;
1902 1.25 fvdl {
1903 1.25 fvdl register int i, j;
1904 1.25 fvdl gid_t v;
1905 1.25 fvdl
1906 1.25 fvdl /* Insertion sort. */
1907 1.25 fvdl for (i = 1; i < num; i++) {
1908 1.25 fvdl v = list[i];
1909 1.25 fvdl /* find correct slot for value v, moving others up */
1910 1.25 fvdl for (j = i; --j >= 0 && v < list[j];)
1911 1.25 fvdl list[j + 1] = list[j];
1912 1.25 fvdl list[j + 1] = v;
1913 1.25 fvdl }
1914 1.25 fvdl }
1915 1.25 fvdl
1916 1.25 fvdl /*
1917 1.25 fvdl * copy credentials making sure that the result can be compared with bcmp().
1918 1.25 fvdl */
1919 1.25 fvdl void
1920 1.25 fvdl nfsrv_setcred(incred, outcred)
1921 1.25 fvdl register struct ucred *incred, *outcred;
1922 1.25 fvdl {
1923 1.25 fvdl register int i;
1924 1.25 fvdl
1925 1.25 fvdl bzero((caddr_t)outcred, sizeof (struct ucred));
1926 1.25 fvdl outcred->cr_ref = 1;
1927 1.25 fvdl outcred->cr_uid = incred->cr_uid;
1928 1.25 fvdl outcred->cr_gid = incred->cr_gid;
1929 1.25 fvdl outcred->cr_ngroups = incred->cr_ngroups;
1930 1.25 fvdl for (i = 0; i < incred->cr_ngroups; i++)
1931 1.25 fvdl outcred->cr_groups[i] = incred->cr_groups[i];
1932 1.25 fvdl nfsrvw_sort(outcred->cr_groups, outcred->cr_ngroups);
1933 1.1 cgd }
1934