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