nfs_srvsubs.c revision 22975
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$
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_mount_type;
104int nfs_ticks;
105
106struct nfs_reqq nfs_reqq;
107struct nfssvc_sockhead nfssvc_sockhead;
108int nfssvc_sockhead_flag;
109struct nfsd_head nfsd_head;
110int nfsd_head_flag;
111struct nfs_bufq nfs_bufq;
112struct nqtimerhead nqtimerhead;
113struct nqfhhashhead *nqfhhashtbl;
114u_long nqfhhash;
115
116#ifndef NFS_NOSERVER
117/*
118 * Mapping of old NFS Version 2 RPC numbers to generic numbers.
119 */
120int nfsv3_procid[NFS_NPROCS] = {
121	NFSPROC_NULL,
122	NFSPROC_GETATTR,
123	NFSPROC_SETATTR,
124	NFSPROC_NOOP,
125	NFSPROC_LOOKUP,
126	NFSPROC_READLINK,
127	NFSPROC_READ,
128	NFSPROC_NOOP,
129	NFSPROC_WRITE,
130	NFSPROC_CREATE,
131	NFSPROC_REMOVE,
132	NFSPROC_RENAME,
133	NFSPROC_LINK,
134	NFSPROC_SYMLINK,
135	NFSPROC_MKDIR,
136	NFSPROC_RMDIR,
137	NFSPROC_READDIR,
138	NFSPROC_FSSTAT,
139	NFSPROC_NOOP,
140	NFSPROC_NOOP,
141	NFSPROC_NOOP,
142	NFSPROC_NOOP,
143	NFSPROC_NOOP,
144	NFSPROC_NOOP,
145	NFSPROC_NOOP,
146	NFSPROC_NOOP
147};
148
149#endif /* NFS_NOSERVER */
150/*
151 * and the reverse mapping from generic to Version 2 procedure numbers
152 */
153int nfsv2_procid[NFS_NPROCS] = {
154	NFSV2PROC_NULL,
155	NFSV2PROC_GETATTR,
156	NFSV2PROC_SETATTR,
157	NFSV2PROC_LOOKUP,
158	NFSV2PROC_NOOP,
159	NFSV2PROC_READLINK,
160	NFSV2PROC_READ,
161	NFSV2PROC_WRITE,
162	NFSV2PROC_CREATE,
163	NFSV2PROC_MKDIR,
164	NFSV2PROC_SYMLINK,
165	NFSV2PROC_CREATE,
166	NFSV2PROC_REMOVE,
167	NFSV2PROC_RMDIR,
168	NFSV2PROC_RENAME,
169	NFSV2PROC_LINK,
170	NFSV2PROC_READDIR,
171	NFSV2PROC_NOOP,
172	NFSV2PROC_STATFS,
173	NFSV2PROC_NOOP,
174	NFSV2PROC_NOOP,
175	NFSV2PROC_NOOP,
176	NFSV2PROC_NOOP,
177	NFSV2PROC_NOOP,
178	NFSV2PROC_NOOP,
179	NFSV2PROC_NOOP,
180};
181
182#ifndef NFS_NOSERVER
183/*
184 * Maps errno values to nfs error numbers.
185 * Use NFSERR_IO as the catch all for ones not specifically defined in
186 * RFC 1094.
187 */
188static u_char nfsrv_v2errmap[ELAST] = {
189  NFSERR_PERM,	NFSERR_NOENT,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
190  NFSERR_NXIO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
191  NFSERR_IO,	NFSERR_IO,	NFSERR_ACCES,	NFSERR_IO,	NFSERR_IO,
192  NFSERR_IO,	NFSERR_EXIST,	NFSERR_IO,	NFSERR_NODEV,	NFSERR_NOTDIR,
193  NFSERR_ISDIR,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
194  NFSERR_IO,	NFSERR_FBIG,	NFSERR_NOSPC,	NFSERR_IO,	NFSERR_ROFS,
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_IO,	NFSERR_IO,	NFSERR_IO,
201  NFSERR_IO,	NFSERR_IO,	NFSERR_NAMETOL,	NFSERR_IO,	NFSERR_IO,
202  NFSERR_NOTEMPTY, NFSERR_IO,	NFSERR_IO,	NFSERR_DQUOT,	NFSERR_STALE,
203  NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
204  NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
205  NFSERR_IO,
206};
207
208/*
209 * Maps errno values to nfs error numbers.
210 * Although it is not obvious whether or not NFS clients really care if
211 * a returned error value is in the specified list for the procedure, the
212 * safest thing to do is filter them appropriately. For Version 2, the
213 * X/Open XNFS document is the only specification that defines error values
214 * for each RPC (The RFC simply lists all possible error values for all RPCs),
215 * so I have decided to not do this for Version 2.
216 * The first entry is the default error return and the rest are the valid
217 * errors for that RPC in increasing numeric order.
218 */
219static short nfsv3err_null[] = {
220	0,
221	0,
222};
223
224static short nfsv3err_getattr[] = {
225	NFSERR_IO,
226	NFSERR_IO,
227	NFSERR_STALE,
228	NFSERR_BADHANDLE,
229	NFSERR_SERVERFAULT,
230	0,
231};
232
233static short nfsv3err_setattr[] = {
234	NFSERR_IO,
235	NFSERR_PERM,
236	NFSERR_IO,
237	NFSERR_ACCES,
238	NFSERR_INVAL,
239	NFSERR_NOSPC,
240	NFSERR_ROFS,
241	NFSERR_DQUOT,
242	NFSERR_STALE,
243	NFSERR_BADHANDLE,
244	NFSERR_NOT_SYNC,
245	NFSERR_SERVERFAULT,
246	0,
247};
248
249static short nfsv3err_lookup[] = {
250	NFSERR_IO,
251	NFSERR_NOENT,
252	NFSERR_IO,
253	NFSERR_ACCES,
254	NFSERR_NOTDIR,
255	NFSERR_NAMETOL,
256	NFSERR_STALE,
257	NFSERR_BADHANDLE,
258	NFSERR_SERVERFAULT,
259	0,
260};
261
262static short nfsv3err_access[] = {
263	NFSERR_IO,
264	NFSERR_IO,
265	NFSERR_STALE,
266	NFSERR_BADHANDLE,
267	NFSERR_SERVERFAULT,
268	0,
269};
270
271static short nfsv3err_readlink[] = {
272	NFSERR_IO,
273	NFSERR_IO,
274	NFSERR_ACCES,
275	NFSERR_INVAL,
276	NFSERR_STALE,
277	NFSERR_BADHANDLE,
278	NFSERR_NOTSUPP,
279	NFSERR_SERVERFAULT,
280	0,
281};
282
283static short nfsv3err_read[] = {
284	NFSERR_IO,
285	NFSERR_IO,
286	NFSERR_NXIO,
287	NFSERR_ACCES,
288	NFSERR_INVAL,
289	NFSERR_STALE,
290	NFSERR_BADHANDLE,
291	NFSERR_SERVERFAULT,
292	0,
293};
294
295static short nfsv3err_write[] = {
296	NFSERR_IO,
297	NFSERR_IO,
298	NFSERR_ACCES,
299	NFSERR_INVAL,
300	NFSERR_FBIG,
301	NFSERR_NOSPC,
302	NFSERR_ROFS,
303	NFSERR_DQUOT,
304	NFSERR_STALE,
305	NFSERR_BADHANDLE,
306	NFSERR_SERVERFAULT,
307	0,
308};
309
310static short nfsv3err_create[] = {
311	NFSERR_IO,
312	NFSERR_IO,
313	NFSERR_ACCES,
314	NFSERR_EXIST,
315	NFSERR_NOTDIR,
316	NFSERR_NOSPC,
317	NFSERR_ROFS,
318	NFSERR_NAMETOL,
319	NFSERR_DQUOT,
320	NFSERR_STALE,
321	NFSERR_BADHANDLE,
322	NFSERR_NOTSUPP,
323	NFSERR_SERVERFAULT,
324	0,
325};
326
327static short nfsv3err_mkdir[] = {
328	NFSERR_IO,
329	NFSERR_IO,
330	NFSERR_ACCES,
331	NFSERR_EXIST,
332	NFSERR_NOTDIR,
333	NFSERR_NOSPC,
334	NFSERR_ROFS,
335	NFSERR_NAMETOL,
336	NFSERR_DQUOT,
337	NFSERR_STALE,
338	NFSERR_BADHANDLE,
339	NFSERR_NOTSUPP,
340	NFSERR_SERVERFAULT,
341	0,
342};
343
344static short nfsv3err_symlink[] = {
345	NFSERR_IO,
346	NFSERR_IO,
347	NFSERR_ACCES,
348	NFSERR_EXIST,
349	NFSERR_NOTDIR,
350	NFSERR_NOSPC,
351	NFSERR_ROFS,
352	NFSERR_NAMETOL,
353	NFSERR_DQUOT,
354	NFSERR_STALE,
355	NFSERR_BADHANDLE,
356	NFSERR_NOTSUPP,
357	NFSERR_SERVERFAULT,
358	0,
359};
360
361static short nfsv3err_mknod[] = {
362	NFSERR_IO,
363	NFSERR_IO,
364	NFSERR_ACCES,
365	NFSERR_EXIST,
366	NFSERR_NOTDIR,
367	NFSERR_NOSPC,
368	NFSERR_ROFS,
369	NFSERR_NAMETOL,
370	NFSERR_DQUOT,
371	NFSERR_STALE,
372	NFSERR_BADHANDLE,
373	NFSERR_NOTSUPP,
374	NFSERR_SERVERFAULT,
375	NFSERR_BADTYPE,
376	0,
377};
378
379static short nfsv3err_remove[] = {
380	NFSERR_IO,
381	NFSERR_NOENT,
382	NFSERR_IO,
383	NFSERR_ACCES,
384	NFSERR_NOTDIR,
385	NFSERR_ROFS,
386	NFSERR_NAMETOL,
387	NFSERR_STALE,
388	NFSERR_BADHANDLE,
389	NFSERR_SERVERFAULT,
390	0,
391};
392
393static short nfsv3err_rmdir[] = {
394	NFSERR_IO,
395	NFSERR_NOENT,
396	NFSERR_IO,
397	NFSERR_ACCES,
398	NFSERR_EXIST,
399	NFSERR_NOTDIR,
400	NFSERR_INVAL,
401	NFSERR_ROFS,
402	NFSERR_NAMETOL,
403	NFSERR_NOTEMPTY,
404	NFSERR_STALE,
405	NFSERR_BADHANDLE,
406	NFSERR_NOTSUPP,
407	NFSERR_SERVERFAULT,
408	0,
409};
410
411static short nfsv3err_rename[] = {
412	NFSERR_IO,
413	NFSERR_NOENT,
414	NFSERR_IO,
415	NFSERR_ACCES,
416	NFSERR_EXIST,
417	NFSERR_XDEV,
418	NFSERR_NOTDIR,
419	NFSERR_ISDIR,
420	NFSERR_INVAL,
421	NFSERR_NOSPC,
422	NFSERR_ROFS,
423	NFSERR_MLINK,
424	NFSERR_NAMETOL,
425	NFSERR_NOTEMPTY,
426	NFSERR_DQUOT,
427	NFSERR_STALE,
428	NFSERR_BADHANDLE,
429	NFSERR_NOTSUPP,
430	NFSERR_SERVERFAULT,
431	0,
432};
433
434static short nfsv3err_link[] = {
435	NFSERR_IO,
436	NFSERR_IO,
437	NFSERR_ACCES,
438	NFSERR_EXIST,
439	NFSERR_XDEV,
440	NFSERR_NOTDIR,
441	NFSERR_INVAL,
442	NFSERR_NOSPC,
443	NFSERR_ROFS,
444	NFSERR_MLINK,
445	NFSERR_NAMETOL,
446	NFSERR_DQUOT,
447	NFSERR_STALE,
448	NFSERR_BADHANDLE,
449	NFSERR_NOTSUPP,
450	NFSERR_SERVERFAULT,
451	0,
452};
453
454static short nfsv3err_readdir[] = {
455	NFSERR_IO,
456	NFSERR_IO,
457	NFSERR_ACCES,
458	NFSERR_NOTDIR,
459	NFSERR_STALE,
460	NFSERR_BADHANDLE,
461	NFSERR_BAD_COOKIE,
462	NFSERR_TOOSMALL,
463	NFSERR_SERVERFAULT,
464	0,
465};
466
467static short nfsv3err_readdirplus[] = {
468	NFSERR_IO,
469	NFSERR_IO,
470	NFSERR_ACCES,
471	NFSERR_NOTDIR,
472	NFSERR_STALE,
473	NFSERR_BADHANDLE,
474	NFSERR_BAD_COOKIE,
475	NFSERR_NOTSUPP,
476	NFSERR_TOOSMALL,
477	NFSERR_SERVERFAULT,
478	0,
479};
480
481static short nfsv3err_fsstat[] = {
482	NFSERR_IO,
483	NFSERR_IO,
484	NFSERR_STALE,
485	NFSERR_BADHANDLE,
486	NFSERR_SERVERFAULT,
487	0,
488};
489
490static short nfsv3err_fsinfo[] = {
491	NFSERR_STALE,
492	NFSERR_STALE,
493	NFSERR_BADHANDLE,
494	NFSERR_SERVERFAULT,
495	0,
496};
497
498static short nfsv3err_pathconf[] = {
499	NFSERR_STALE,
500	NFSERR_STALE,
501	NFSERR_BADHANDLE,
502	NFSERR_SERVERFAULT,
503	0,
504};
505
506static short nfsv3err_commit[] = {
507	NFSERR_IO,
508	NFSERR_IO,
509	NFSERR_STALE,
510	NFSERR_BADHANDLE,
511	NFSERR_SERVERFAULT,
512	0,
513};
514
515static short *nfsrv_v3errmap[] = {
516	nfsv3err_null,
517	nfsv3err_getattr,
518	nfsv3err_setattr,
519	nfsv3err_lookup,
520	nfsv3err_access,
521	nfsv3err_readlink,
522	nfsv3err_read,
523	nfsv3err_write,
524	nfsv3err_create,
525	nfsv3err_mkdir,
526	nfsv3err_symlink,
527	nfsv3err_mknod,
528	nfsv3err_remove,
529	nfsv3err_rmdir,
530	nfsv3err_rename,
531	nfsv3err_link,
532	nfsv3err_readdir,
533	nfsv3err_readdirplus,
534	nfsv3err_fsstat,
535	nfsv3err_fsinfo,
536	nfsv3err_pathconf,
537	nfsv3err_commit,
538};
539
540#endif /* NFS_NOSERVER */
541
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(vfsp)
1098	struct vfsconf *vfsp;
1099{
1100	register int i;
1101
1102	/*
1103	 * Check to see if major data structures haven't bloated.
1104	 */
1105	if (sizeof (struct nfsnode) > NFS_NODEALLOC) {
1106		printf("struct nfsnode bloated (> %dbytes)\n", NFS_NODEALLOC);
1107		printf("Try reducing NFS_SMALLFH\n");
1108	}
1109	if (sizeof (struct nfsmount) > NFS_MNTALLOC) {
1110		printf("struct nfsmount bloated (> %dbytes)\n", NFS_MNTALLOC);
1111		printf("Try reducing NFS_MUIDHASHSIZ\n");
1112	}
1113	if (sizeof (struct nfssvc_sock) > NFS_SVCALLOC) {
1114		printf("struct nfssvc_sock bloated (> %dbytes)\n",NFS_SVCALLOC);
1115		printf("Try reducing NFS_UIDHASHSIZ\n");
1116	}
1117	if (sizeof (struct nfsuid) > NFS_UIDALLOC) {
1118		printf("struct nfsuid bloated (> %dbytes)\n",NFS_UIDALLOC);
1119		printf("Try unionizing the nu_nickname and nu_flag fields\n");
1120	}
1121	nfs_mount_type = vfsp->vfc_typenum;
1122	nfsrtt.pos = 0;
1123	rpc_vers = txdr_unsigned(RPC_VER2);
1124	rpc_call = txdr_unsigned(RPC_CALL);
1125	rpc_reply = txdr_unsigned(RPC_REPLY);
1126	rpc_msgdenied = txdr_unsigned(RPC_MSGDENIED);
1127	rpc_msgaccepted = txdr_unsigned(RPC_MSGACCEPTED);
1128	rpc_mismatch = txdr_unsigned(RPC_MISMATCH);
1129	rpc_autherr = txdr_unsigned(RPC_AUTHERR);
1130	rpc_auth_unix = txdr_unsigned(RPCAUTH_UNIX);
1131	rpc_auth_kerb = txdr_unsigned(RPCAUTH_KERB4);
1132	nfs_prog = txdr_unsigned(NFS_PROG);
1133	nqnfs_prog = txdr_unsigned(NQNFS_PROG);
1134	nfs_true = txdr_unsigned(TRUE);
1135	nfs_false = txdr_unsigned(FALSE);
1136	nfs_xdrneg1 = txdr_unsigned(-1);
1137	nfs_ticks = (hz * NFS_TICKINTVL + 500) / 1000;
1138	if (nfs_ticks < 1)
1139		nfs_ticks = 1;
1140	/* Ensure async daemons disabled */
1141	for (i = 0; i < NFS_MAXASYNCDAEMON; i++) {
1142		nfs_iodwant[i] = (struct proc *)0;
1143		nfs_iodmount[i] = (struct nfsmount *)0;
1144	}
1145	nfs_nhinit();			/* Init the nfsnode table */
1146#ifndef NFS_NOSERVER
1147	nfsrv_init(0);			/* Init server data structures */
1148	nfsrv_initcache();		/* Init the server request cache */
1149#endif
1150
1151	/*
1152	 * Initialize the nqnfs server stuff.
1153	 */
1154	if (nqnfsstarttime == 0) {
1155		nqnfsstarttime = boottime.tv_sec + nqsrv_maxlease
1156			+ nqsrv_clockskew + nqsrv_writeslack;
1157		NQLOADNOVRAM(nqnfsstarttime);
1158		CIRCLEQ_INIT(&nqtimerhead);
1159		nqfhhashtbl = hashinit(NQLCHSZ, M_NQLEASE, &nqfhhash);
1160	}
1161
1162	/*
1163	 * Initialize reply list and start timer
1164	 */
1165	TAILQ_INIT(&nfs_reqq);
1166
1167	nfs_timer(0);
1168
1169
1170#ifdef __FreeBSD__
1171	/*
1172	 * Set up lease_check and lease_updatetime so that other parts
1173	 * of the system can call us, if we are loadable.
1174	 */
1175#ifndef NFS_NOSERVER
1176	lease_check_hook = nqnfs_vop_lease_check;
1177#endif
1178	lease_updatetime = nfs_lease_updatetime;
1179	vfsp->vfc_refcount++; /* make us non-unloadable */
1180#ifdef VFS_LKM
1181	sysent[SYS_nfssvc].sy_narg = 2;
1182	sysent[SYS_nfssvc].sy_call = nfssvc;
1183#ifndef NFS_NOSERVER
1184	sysent[SYS_getfh].sy_narg = 2;
1185	sysent[SYS_getfh].sy_call = getfh;
1186#endif
1187#endif
1188#endif
1189
1190	return (0);
1191}
1192
1193/*
1194 * Attribute cache routines.
1195 * nfs_loadattrcache() - loads or updates the cache contents from attributes
1196 *	that are on the mbuf list
1197 * nfs_getattrcache() - returns valid attributes if found in cache, returns
1198 *	error otherwise
1199 */
1200
1201/*
1202 * Load the attribute cache (that lives in the nfsnode entry) with
1203 * the values on the mbuf list and
1204 * Iff vap not NULL
1205 *    copy the attributes to *vaper
1206 */
1207int
1208nfs_loadattrcache(vpp, mdp, dposp, vaper)
1209	struct vnode **vpp;
1210	struct mbuf **mdp;
1211	caddr_t *dposp;
1212	struct vattr *vaper;
1213{
1214	register struct vnode *vp = *vpp;
1215	register struct vattr *vap;
1216	register struct nfs_fattr *fp;
1217	register struct nfsnode *np;
1218	register long t1;
1219	caddr_t cp2;
1220	int error = 0, rdev;
1221	struct mbuf *md;
1222	enum vtype vtyp;
1223	u_short vmode;
1224	struct timespec mtime;
1225	struct vnode *nvp;
1226	int v3 = NFS_ISV3(vp);
1227	struct proc *p = curproc;
1228
1229	md = *mdp;
1230	t1 = (mtod(md, caddr_t) + md->m_len) - *dposp;
1231	if (error = nfsm_disct(mdp, dposp, NFSX_FATTR(v3), t1, &cp2))
1232		return (error);
1233	fp = (struct nfs_fattr *)cp2;
1234	if (v3) {
1235		vtyp = nfsv3tov_type(fp->fa_type);
1236		vmode = fxdr_unsigned(u_short, fp->fa_mode);
1237		rdev = makedev(fxdr_unsigned(int, fp->fa3_rdev.specdata1),
1238			fxdr_unsigned(int, fp->fa3_rdev.specdata2));
1239		fxdr_nfsv3time(&fp->fa3_mtime, &mtime);
1240	} else {
1241		vtyp = nfsv2tov_type(fp->fa_type);
1242		vmode = fxdr_unsigned(u_short, fp->fa_mode);
1243		/*
1244		 * XXX
1245		 *
1246		 * The duplicate information returned in fa_type and fa_mode
1247		 * is an ambiguity in the NFS version 2 protocol.
1248		 *
1249		 * VREG should be taken literally as a regular file.  If a
1250		 * server intents to return some type information differently
1251		 * in the upper bits of the mode field (e.g. for sockets, or
1252		 * FIFOs), NFSv2 mandates fa_type to be VNON.  Anyway, we
1253		 * leave the examination of the mode bits even in the VREG
1254		 * case to avoid breakage for bogus servers, but we make sure
1255		 * that there are actually type bits set in the upper part of
1256		 * fa_mode (and failing that, trust the va_type field).
1257		 *
1258		 * NFSv3 cleared the issue, and requires fa_mode to not
1259		 * contain any type information (while also introduing sockets
1260		 * and FIFOs for fa_type).
1261		 */
1262		if (vtyp == VNON || (vtyp == VREG && (vmode & S_IFMT) != 0))
1263			vtyp = IFTOVT(vmode);
1264		rdev = fxdr_unsigned(long, fp->fa2_rdev);
1265		fxdr_nfsv2time(&fp->fa2_mtime, &mtime);
1266
1267		/*
1268		 * Really ugly NFSv2 kludge.
1269		 */
1270		if (vtyp == VCHR && rdev == 0xffffffff)
1271			vtyp = VFIFO;
1272	}
1273
1274	/*
1275	 * If v_type == VNON it is a new node, so fill in the v_type,
1276	 * n_mtime fields. Check to see if it represents a special
1277	 * device, and if so, check for a possible alias. Once the
1278	 * correct vnode has been obtained, fill in the rest of the
1279	 * information.
1280	 */
1281	np = VTONFS(vp);
1282	if (vp->v_type != vtyp) {
1283		/*
1284		 * If we had a lock and it turns out that the vnode
1285		 * is an object which we don't want to lock (e.g. VDIR)
1286		 * to avoid nasty hanging problems on a server crash,
1287		 * then release it here.
1288		 */
1289		if (vtyp != VREG && VOP_ISLOCKED(vp))
1290			VOP_UNLOCK(vp, 0, p);
1291		vp->v_type = vtyp;
1292		if (vp->v_type == VFIFO) {
1293			vp->v_op = fifo_nfsv2nodeop_p;
1294		}
1295		if (vp->v_type == VCHR || vp->v_type == VBLK) {
1296			vp->v_op = spec_nfsv2nodeop_p;
1297			nvp = checkalias(vp, (dev_t)rdev, vp->v_mount);
1298			if (nvp) {
1299				/*
1300				 * Discard unneeded vnode, but save its nfsnode.
1301				 * Since the nfsnode does not have a lock, its
1302				 * vnode lock has to be carried over.
1303				 */
1304				nvp->v_vnlock = vp->v_vnlock;
1305				vp->v_vnlock = NULL;
1306				nvp->v_data = vp->v_data;
1307				vp->v_data = NULL;
1308				vp->v_op = spec_vnodeop_p;
1309				vrele(vp);
1310				vgone(vp);
1311				/*
1312				 * Reinitialize aliased node.
1313				 */
1314				np->n_vnode = nvp;
1315				*vpp = vp = nvp;
1316			}
1317		}
1318		np->n_mtime = mtime.tv_sec;
1319	}
1320	vap = &np->n_vattr;
1321	vap->va_type = vtyp;
1322	vap->va_mode = (vmode & 07777);
1323	vap->va_rdev = (dev_t)rdev;
1324	vap->va_mtime = mtime;
1325	vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0];
1326	if (v3) {
1327		vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1328		vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1329		vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1330		fxdr_hyper(&fp->fa3_size, &vap->va_size);
1331		vap->va_blocksize = NFS_FABLKSIZE;
1332		fxdr_hyper(&fp->fa3_used, &vap->va_bytes);
1333		vap->va_fileid = fxdr_unsigned(int, fp->fa3_fileid.nfsuquad[1]);
1334		fxdr_nfsv3time(&fp->fa3_atime, &vap->va_atime);
1335		fxdr_nfsv3time(&fp->fa3_ctime, &vap->va_ctime);
1336		vap->va_flags = 0;
1337		vap->va_filerev = 0;
1338	} else {
1339		vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1340		vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1341		vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1342		vap->va_size = fxdr_unsigned(u_long, fp->fa2_size);
1343		vap->va_blocksize = fxdr_unsigned(long, fp->fa2_blocksize);
1344		vap->va_bytes = fxdr_unsigned(long, fp->fa2_blocks) * NFS_FABLKSIZE;
1345		vap->va_fileid = fxdr_unsigned(long, fp->fa2_fileid);
1346		fxdr_nfsv2time(&fp->fa2_atime, &vap->va_atime);
1347		vap->va_flags = 0;
1348		vap->va_ctime.tv_sec = fxdr_unsigned(long, fp->fa2_ctime.nfsv2_sec);
1349		vap->va_ctime.tv_nsec = 0;
1350		vap->va_gen = fxdr_unsigned(u_long, fp->fa2_ctime.nfsv2_usec);
1351		vap->va_filerev = 0;
1352	}
1353	if (vap->va_size != np->n_size) {
1354		if (vap->va_type == VREG) {
1355			if (np->n_flag & NMODIFIED) {
1356				if (vap->va_size < np->n_size)
1357					vap->va_size = np->n_size;
1358				else
1359					np->n_size = vap->va_size;
1360			} else
1361				np->n_size = vap->va_size;
1362			vnode_pager_setsize(vp, (u_long)np->n_size);
1363		} else
1364			np->n_size = vap->va_size;
1365	}
1366	np->n_attrstamp = time.tv_sec;
1367	if (vaper != NULL) {
1368		bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(*vap));
1369		if (np->n_flag & NCHG) {
1370			if (np->n_flag & NACC)
1371				vaper->va_atime = np->n_atim;
1372			if (np->n_flag & NUPD)
1373				vaper->va_mtime = np->n_mtim;
1374		}
1375	}
1376	return (0);
1377}
1378
1379/*
1380 * Check the time stamp
1381 * If the cache is valid, copy contents to *vap and return 0
1382 * otherwise return an error
1383 */
1384int
1385nfs_getattrcache(vp, vaper)
1386	register struct vnode *vp;
1387	struct vattr *vaper;
1388{
1389	register struct nfsnode *np = VTONFS(vp);
1390	register struct vattr *vap;
1391
1392	if ((time.tv_sec - np->n_attrstamp) >= NFS_ATTRTIMEO(np)) {
1393		nfsstats.attrcache_misses++;
1394		return (ENOENT);
1395	}
1396	nfsstats.attrcache_hits++;
1397	vap = &np->n_vattr;
1398	if (vap->va_size != np->n_size) {
1399		if (vap->va_type == VREG) {
1400			if (np->n_flag & NMODIFIED) {
1401				if (vap->va_size < np->n_size)
1402					vap->va_size = np->n_size;
1403				else
1404					np->n_size = vap->va_size;
1405			} else
1406				np->n_size = vap->va_size;
1407			vnode_pager_setsize(vp, (u_long)np->n_size);
1408		} else
1409			np->n_size = vap->va_size;
1410	}
1411	bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(struct vattr));
1412	if (np->n_flag & NCHG) {
1413		if (np->n_flag & NACC)
1414			vaper->va_atime = np->n_atim;
1415		if (np->n_flag & NUPD)
1416			vaper->va_mtime = np->n_mtim;
1417	}
1418	return (0);
1419}
1420
1421#ifndef NFS_NOSERVER
1422/*
1423 * Set up nameidata for a lookup() call and do it
1424 */
1425int
1426nfs_namei(ndp, fhp, len, slp, nam, mdp, dposp, retdirp, p, kerbflag)
1427	register struct nameidata *ndp;
1428	fhandle_t *fhp;
1429	int len;
1430	struct nfssvc_sock *slp;
1431	struct mbuf *nam;
1432	struct mbuf **mdp;
1433	caddr_t *dposp;
1434	struct vnode **retdirp;
1435	struct proc *p;
1436	int kerbflag;
1437{
1438	register int i, rem;
1439	register struct mbuf *md;
1440	register char *fromcp, *tocp;
1441	struct vnode *dp;
1442	int error, rdonly;
1443	struct componentname *cnp = &ndp->ni_cnd;
1444
1445	*retdirp = (struct vnode *)0;
1446	MALLOC(cnp->cn_pnbuf, char *, len + 1, M_NAMEI, M_WAITOK);
1447	/*
1448	 * Copy the name from the mbuf list to ndp->ni_pnbuf
1449	 * and set the various ndp fields appropriately.
1450	 */
1451	fromcp = *dposp;
1452	tocp = cnp->cn_pnbuf;
1453	md = *mdp;
1454	rem = mtod(md, caddr_t) + md->m_len - fromcp;
1455	cnp->cn_hash = 0;
1456	for (i = 0; i < len; i++) {
1457		while (rem == 0) {
1458			md = md->m_next;
1459			if (md == NULL) {
1460				error = EBADRPC;
1461				goto out;
1462			}
1463			fromcp = mtod(md, caddr_t);
1464			rem = md->m_len;
1465		}
1466		if (*fromcp == '\0' || *fromcp == '/') {
1467			error = EACCES;
1468			goto out;
1469		}
1470		cnp->cn_hash += (unsigned char)*fromcp;
1471		*tocp++ = *fromcp++;
1472		rem--;
1473	}
1474	*tocp = '\0';
1475	*mdp = md;
1476	*dposp = fromcp;
1477	len = nfsm_rndup(len)-len;
1478	if (len > 0) {
1479		if (rem >= len)
1480			*dposp += len;
1481		else if (error = nfs_adv(mdp, dposp, len, rem))
1482			goto out;
1483	}
1484	ndp->ni_pathlen = tocp - cnp->cn_pnbuf;
1485	cnp->cn_nameptr = cnp->cn_pnbuf;
1486	/*
1487	 * Extract and set starting directory.
1488	 */
1489	if (error = nfsrv_fhtovp(fhp, FALSE, &dp, ndp->ni_cnd.cn_cred, slp,
1490	    nam, &rdonly, kerbflag))
1491		goto out;
1492	if (dp->v_type != VDIR) {
1493		vrele(dp);
1494		error = ENOTDIR;
1495		goto out;
1496	}
1497	VREF(dp);
1498	*retdirp = dp;
1499	ndp->ni_startdir = dp;
1500	if (rdonly)
1501		cnp->cn_flags |= (NOCROSSMOUNT | RDONLY);
1502	else
1503		cnp->cn_flags |= NOCROSSMOUNT;
1504	/*
1505	 * And call lookup() to do the real work
1506	 */
1507	cnp->cn_proc = p;
1508	if (error = lookup(ndp))
1509		goto out;
1510	/*
1511	 * Check for encountering a symbolic link
1512	 */
1513	if (cnp->cn_flags & ISSYMLINK) {
1514		if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1)
1515			vput(ndp->ni_dvp);
1516		else
1517			vrele(ndp->ni_dvp);
1518		vput(ndp->ni_vp);
1519		ndp->ni_vp = NULL;
1520		error = EINVAL;
1521		goto out;
1522	}
1523
1524	nfsrv_object_create(ndp->ni_vp);
1525
1526	/*
1527	 * Check for saved name request
1528	 */
1529	if (cnp->cn_flags & (SAVENAME | SAVESTART)) {
1530		cnp->cn_flags |= HASBUF;
1531		return (0);
1532	}
1533out:
1534	FREE(cnp->cn_pnbuf, M_NAMEI);
1535	return (error);
1536}
1537
1538/*
1539 * A fiddled version of m_adj() that ensures null fill to a long
1540 * boundary and only trims off the back end
1541 */
1542void
1543nfsm_adj(mp, len, nul)
1544	struct mbuf *mp;
1545	register int len;
1546	int nul;
1547{
1548	register struct mbuf *m;
1549	register int count, i;
1550	register char *cp;
1551
1552	/*
1553	 * Trim from tail.  Scan the mbuf chain,
1554	 * calculating its length and finding the last mbuf.
1555	 * If the adjustment only affects this mbuf, then just
1556	 * adjust and return.  Otherwise, rescan and truncate
1557	 * after the remaining size.
1558	 */
1559	count = 0;
1560	m = mp;
1561	for (;;) {
1562		count += m->m_len;
1563		if (m->m_next == (struct mbuf *)0)
1564			break;
1565		m = m->m_next;
1566	}
1567	if (m->m_len > len) {
1568		m->m_len -= len;
1569		if (nul > 0) {
1570			cp = mtod(m, caddr_t)+m->m_len-nul;
1571			for (i = 0; i < nul; i++)
1572				*cp++ = '\0';
1573		}
1574		return;
1575	}
1576	count -= len;
1577	if (count < 0)
1578		count = 0;
1579	/*
1580	 * Correct length for chain is "count".
1581	 * Find the mbuf with last data, adjust its length,
1582	 * and toss data from remaining mbufs on chain.
1583	 */
1584	for (m = mp; m; m = m->m_next) {
1585		if (m->m_len >= count) {
1586			m->m_len = count;
1587			if (nul > 0) {
1588				cp = mtod(m, caddr_t)+m->m_len-nul;
1589				for (i = 0; i < nul; i++)
1590					*cp++ = '\0';
1591			}
1592			break;
1593		}
1594		count -= m->m_len;
1595	}
1596	for (m = m->m_next;m;m = m->m_next)
1597		m->m_len = 0;
1598}
1599
1600/*
1601 * Make these functions instead of macros, so that the kernel text size
1602 * doesn't get too big...
1603 */
1604void
1605nfsm_srvwcc(nfsd, before_ret, before_vap, after_ret, after_vap, mbp, bposp)
1606	struct nfsrv_descript *nfsd;
1607	int before_ret;
1608	register struct vattr *before_vap;
1609	int after_ret;
1610	struct vattr *after_vap;
1611	struct mbuf **mbp;
1612	char **bposp;
1613{
1614	register struct mbuf *mb = *mbp, *mb2;
1615	register char *bpos = *bposp;
1616	register u_long *tl;
1617
1618	if (before_ret) {
1619		nfsm_build(tl, u_long *, NFSX_UNSIGNED);
1620		*tl = nfs_false;
1621	} else {
1622		nfsm_build(tl, u_long *, 7 * NFSX_UNSIGNED);
1623		*tl++ = nfs_true;
1624		txdr_hyper(&(before_vap->va_size), tl);
1625		tl += 2;
1626		txdr_nfsv3time(&(before_vap->va_mtime), tl);
1627		tl += 2;
1628		txdr_nfsv3time(&(before_vap->va_ctime), tl);
1629	}
1630	*bposp = bpos;
1631	*mbp = mb;
1632	nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp);
1633}
1634
1635void
1636nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp)
1637	struct nfsrv_descript *nfsd;
1638	int after_ret;
1639	struct vattr *after_vap;
1640	struct mbuf **mbp;
1641	char **bposp;
1642{
1643	register struct mbuf *mb = *mbp, *mb2;
1644	register char *bpos = *bposp;
1645	register u_long *tl;
1646	register struct nfs_fattr *fp;
1647
1648	if (after_ret) {
1649		nfsm_build(tl, u_long *, NFSX_UNSIGNED);
1650		*tl = nfs_false;
1651	} else {
1652		nfsm_build(tl, u_long *, NFSX_UNSIGNED + NFSX_V3FATTR);
1653		*tl++ = nfs_true;
1654		fp = (struct nfs_fattr *)tl;
1655		nfsm_srvfattr(nfsd, after_vap, fp);
1656	}
1657	*mbp = mb;
1658	*bposp = bpos;
1659}
1660
1661void
1662nfsm_srvfattr(nfsd, vap, fp)
1663	register struct nfsrv_descript *nfsd;
1664	register struct vattr *vap;
1665	register struct nfs_fattr *fp;
1666{
1667
1668	fp->fa_nlink = txdr_unsigned(vap->va_nlink);
1669	fp->fa_uid = txdr_unsigned(vap->va_uid);
1670	fp->fa_gid = txdr_unsigned(vap->va_gid);
1671	if (nfsd->nd_flag & ND_NFSV3) {
1672		fp->fa_type = vtonfsv3_type(vap->va_type);
1673		fp->fa_mode = vtonfsv3_mode(vap->va_mode);
1674		txdr_hyper(&vap->va_size, &fp->fa3_size);
1675		txdr_hyper(&vap->va_bytes, &fp->fa3_used);
1676		fp->fa3_rdev.specdata1 = txdr_unsigned(major(vap->va_rdev));
1677		fp->fa3_rdev.specdata2 = txdr_unsigned(minor(vap->va_rdev));
1678		fp->fa3_fsid.nfsuquad[0] = 0;
1679		fp->fa3_fsid.nfsuquad[1] = txdr_unsigned(vap->va_fsid);
1680		fp->fa3_fileid.nfsuquad[0] = 0;
1681		fp->fa3_fileid.nfsuquad[1] = txdr_unsigned(vap->va_fileid);
1682		txdr_nfsv3time(&vap->va_atime, &fp->fa3_atime);
1683		txdr_nfsv3time(&vap->va_mtime, &fp->fa3_mtime);
1684		txdr_nfsv3time(&vap->va_ctime, &fp->fa3_ctime);
1685	} else {
1686		fp->fa_type = vtonfsv2_type(vap->va_type);
1687		fp->fa_mode = vtonfsv2_mode(vap->va_type, vap->va_mode);
1688		fp->fa2_size = txdr_unsigned(vap->va_size);
1689		fp->fa2_blocksize = txdr_unsigned(vap->va_blocksize);
1690		if (vap->va_type == VFIFO)
1691			fp->fa2_rdev = 0xffffffff;
1692		else
1693			fp->fa2_rdev = txdr_unsigned(vap->va_rdev);
1694		fp->fa2_blocks = txdr_unsigned(vap->va_bytes / NFS_FABLKSIZE);
1695		fp->fa2_fsid = txdr_unsigned(vap->va_fsid);
1696		fp->fa2_fileid = txdr_unsigned(vap->va_fileid);
1697		txdr_nfsv2time(&vap->va_atime, &fp->fa2_atime);
1698		txdr_nfsv2time(&vap->va_mtime, &fp->fa2_mtime);
1699		txdr_nfsv2time(&vap->va_ctime, &fp->fa2_ctime);
1700	}
1701}
1702
1703/*
1704 * nfsrv_fhtovp() - convert a fh to a vnode ptr (optionally locked)
1705 * 	- look up fsid in mount list (if not found ret error)
1706 *	- get vp and export rights by calling VFS_FHTOVP()
1707 *	- if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon
1708 *	- if not lockflag unlock it with VOP_UNLOCK()
1709 */
1710int
1711nfsrv_fhtovp(fhp, lockflag, vpp, cred, slp, nam, rdonlyp, kerbflag)
1712	fhandle_t *fhp;
1713	int lockflag;
1714	struct vnode **vpp;
1715	struct ucred *cred;
1716	struct nfssvc_sock *slp;
1717	struct mbuf *nam;
1718	int *rdonlyp;
1719	int kerbflag;
1720{
1721	struct proc *p = curproc; /* XXX */
1722	register struct mount *mp;
1723	register int i;
1724	struct ucred *credanon;
1725	int error, exflags;
1726
1727	*vpp = (struct vnode *)0;
1728	mp = vfs_getvfs(&fhp->fh_fsid);
1729	if (!mp)
1730		return (ESTALE);
1731	error = VFS_FHTOVP(mp, &fhp->fh_fid, nam, vpp, &exflags, &credanon);
1732	if (error)
1733		return (error);
1734	/*
1735	 * Check/setup credentials.
1736	 */
1737	if (exflags & MNT_EXKERB) {
1738		if (!kerbflag) {
1739			vput(*vpp);
1740			return (NFSERR_AUTHERR | AUTH_TOOWEAK);
1741		}
1742	} else if (kerbflag) {
1743		vput(*vpp);
1744		return (NFSERR_AUTHERR | AUTH_TOOWEAK);
1745	} else if (cred->cr_uid == 0 || (exflags & MNT_EXPORTANON)) {
1746		cred->cr_uid = credanon->cr_uid;
1747		for (i = 0; i < credanon->cr_ngroups && i < NGROUPS; i++)
1748			cred->cr_groups[i] = credanon->cr_groups[i];
1749		cred->cr_ngroups = i;
1750	}
1751	if (exflags & MNT_EXRDONLY)
1752		*rdonlyp = 1;
1753	else
1754		*rdonlyp = 0;
1755
1756	nfsrv_object_create(*vpp);
1757
1758	if (!lockflag)
1759		VOP_UNLOCK(*vpp, 0, p);
1760	return (0);
1761}
1762
1763#endif /* NFS_NOSERVER */
1764/*
1765 * This function compares two net addresses by family and returns TRUE
1766 * if they are the same host.
1767 * If there is any doubt, return FALSE.
1768 * The AF_INET family is handled as a special case so that address mbufs
1769 * don't need to be saved to store "struct in_addr", which is only 4 bytes.
1770 */
1771int
1772netaddr_match(family, haddr, nam)
1773	int family;
1774	union nethostaddr *haddr;
1775	struct mbuf *nam;
1776{
1777	register struct sockaddr_in *inetaddr;
1778
1779	switch (family) {
1780	case AF_INET:
1781		inetaddr = mtod(nam, struct sockaddr_in *);
1782		if (inetaddr->sin_family == AF_INET &&
1783		    inetaddr->sin_addr.s_addr == haddr->had_inetaddr)
1784			return (1);
1785		break;
1786#ifdef ISO
1787	case AF_ISO:
1788	    {
1789		register struct sockaddr_iso *isoaddr1, *isoaddr2;
1790
1791		isoaddr1 = mtod(nam, struct sockaddr_iso *);
1792		isoaddr2 = mtod(haddr->had_nam, struct sockaddr_iso *);
1793		if (isoaddr1->siso_family == AF_ISO &&
1794		    isoaddr1->siso_nlen > 0 &&
1795		    isoaddr1->siso_nlen == isoaddr2->siso_nlen &&
1796		    SAME_ISOADDR(isoaddr1, isoaddr2))
1797			return (1);
1798		break;
1799	    }
1800#endif	/* ISO */
1801	default:
1802		break;
1803	};
1804	return (0);
1805}
1806
1807static nfsuint64 nfs_nullcookie = { 0, 0 };
1808/*
1809 * This function finds the directory cookie that corresponds to the
1810 * logical byte offset given.
1811 */
1812nfsuint64 *
1813nfs_getcookie(np, off, add)
1814	register struct nfsnode *np;
1815	off_t off;
1816	int add;
1817{
1818	register struct nfsdmap *dp, *dp2;
1819	register int pos;
1820
1821	pos = off / NFS_DIRBLKSIZ;
1822	if (pos == 0) {
1823#ifdef DIAGNOSTIC
1824		if (add)
1825			panic("nfs getcookie add at 0");
1826#endif
1827		return (&nfs_nullcookie);
1828	}
1829	pos--;
1830	dp = np->n_cookies.lh_first;
1831	if (!dp) {
1832		if (add) {
1833			MALLOC(dp, struct nfsdmap *, sizeof (struct nfsdmap),
1834				M_NFSDIROFF, M_WAITOK);
1835			dp->ndm_eocookie = 0;
1836			LIST_INSERT_HEAD(&np->n_cookies, dp, ndm_list);
1837		} else
1838			return ((nfsuint64 *)0);
1839	}
1840	while (pos >= NFSNUMCOOKIES) {
1841		pos -= NFSNUMCOOKIES;
1842		if (dp->ndm_list.le_next) {
1843			if (!add && dp->ndm_eocookie < NFSNUMCOOKIES &&
1844				pos >= dp->ndm_eocookie)
1845				return ((nfsuint64 *)0);
1846			dp = dp->ndm_list.le_next;
1847		} else if (add) {
1848			MALLOC(dp2, struct nfsdmap *, sizeof (struct nfsdmap),
1849				M_NFSDIROFF, M_WAITOK);
1850			dp2->ndm_eocookie = 0;
1851			LIST_INSERT_AFTER(dp, dp2, ndm_list);
1852			dp = dp2;
1853		} else
1854			return ((nfsuint64 *)0);
1855	}
1856	if (pos >= dp->ndm_eocookie) {
1857		if (add)
1858			dp->ndm_eocookie = pos + 1;
1859		else
1860			return ((nfsuint64 *)0);
1861	}
1862	return (&dp->ndm_cookies[pos]);
1863}
1864
1865/*
1866 * Invalidate cached directory information, except for the actual directory
1867 * blocks (which are invalidated separately).
1868 * Done mainly to avoid the use of stale offset cookies.
1869 */
1870void
1871nfs_invaldir(vp)
1872	register struct vnode *vp;
1873{
1874	register struct nfsnode *np = VTONFS(vp);
1875
1876#ifdef DIAGNOSTIC
1877	if (vp->v_type != VDIR)
1878		panic("nfs: invaldir not dir");
1879#endif
1880	np->n_direofoffset = 0;
1881	np->n_cookieverf.nfsuquad[0] = 0;
1882	np->n_cookieverf.nfsuquad[1] = 0;
1883	if (np->n_cookies.lh_first)
1884		np->n_cookies.lh_first->ndm_eocookie = 0;
1885}
1886
1887/*
1888 * The write verifier has changed (probably due to a server reboot), so all
1889 * B_NEEDCOMMIT blocks will have to be written again. Since they are on the
1890 * dirty block list as B_DELWRI, all this takes is clearing the B_NEEDCOMMIT
1891 * flag. Once done the new write verifier can be set for the mount point.
1892 */
1893void
1894nfs_clearcommit(mp)
1895	struct mount *mp;
1896{
1897	register struct vnode *vp, *nvp;
1898	register struct buf *bp, *nbp;
1899	int s;
1900
1901	s = splbio();
1902loop:
1903	for (vp = mp->mnt_vnodelist.lh_first; vp; vp = nvp) {
1904		if (vp->v_mount != mp)	/* Paranoia */
1905			goto loop;
1906		nvp = vp->v_mntvnodes.le_next;
1907		for (bp = vp->v_dirtyblkhd.lh_first; bp; bp = nbp) {
1908			nbp = bp->b_vnbufs.le_next;
1909			if ((bp->b_flags & (B_BUSY | B_DELWRI | B_NEEDCOMMIT))
1910				== (B_DELWRI | B_NEEDCOMMIT))
1911				bp->b_flags &= ~B_NEEDCOMMIT;
1912		}
1913	}
1914	splx(s);
1915}
1916
1917#ifndef NFS_NOSERVER
1918/*
1919 * Map errnos to NFS error numbers. For Version 3 also filter out error
1920 * numbers not specified for the associated procedure.
1921 */
1922int
1923nfsrv_errmap(nd, err)
1924	struct nfsrv_descript *nd;
1925	register int err;
1926{
1927	register short *defaulterrp, *errp;
1928
1929	if (nd->nd_flag & ND_NFSV3) {
1930	    if (nd->nd_procnum <= NFSPROC_COMMIT) {
1931		errp = defaulterrp = nfsrv_v3errmap[nd->nd_procnum];
1932		while (*++errp) {
1933			if (*errp == err)
1934				return (err);
1935			else if (*errp > err)
1936				break;
1937		}
1938		return ((int)*defaulterrp);
1939	    } else
1940		return (err & 0xffff);
1941	}
1942	if (err <= ELAST)
1943		return ((int)nfsrv_v2errmap[err - 1]);
1944	return (NFSERR_IO);
1945}
1946
1947int
1948nfsrv_object_create(struct vnode *vp) {
1949
1950	if ((vp == NULL) || (vp->v_type != VREG))
1951		return 1;
1952	return vfs_object_create(vp, curproc, curproc?curproc->p_ucred:NULL, 1);
1953}
1954#endif /* NFS_NOSERVER */
1955
1956