Give the kernel a native NFS mount rpc capability for mounting NFS roots by
[dragonfly.git] / sys / vfs / nfs / nfs_vfsops.c
1 /*
2  * Copyright (c) 1989, 1993, 1995
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_vfsops.c        8.12 (Berkeley) 5/20/95
37  * $FreeBSD: src/sys/nfs/nfs_vfsops.c,v 1.91.2.7 2003/01/27 20:04:08 dillon Exp $
38  * $DragonFly: src/sys/vfs/nfs/nfs_vfsops.c,v 1.31 2005/09/04 01:29:00 dillon Exp $
39  */
40
41 #include "opt_bootp.h"
42 #include "opt_nfsroot.h"
43
44 #include <sys/param.h>
45 #include <sys/sockio.h>
46 #include <sys/proc.h>
47 #include <sys/vnode.h>
48 #include <sys/kernel.h>
49 #include <sys/sysctl.h>
50 #include <sys/malloc.h>
51 #include <sys/mount.h>
52 #include <sys/mbuf.h>
53 #include <sys/socket.h>
54 #include <sys/socketvar.h>
55 #include <sys/systm.h>
56
57 #include <vm/vm.h>
58 #include <vm/vm_extern.h>
59 #include <vm/vm_zone.h>
60
61 #include <net/if.h>
62 #include <net/route.h>
63 #include <netinet/in.h>
64
65 #include <sys/thread2.h>
66
67 #include "rpcv2.h"
68 #include "nfsproto.h"
69 #include "nfs.h"
70 #include "nfsmount.h"
71 #include "nfsnode.h"
72 #include "xdr_subs.h"
73 #include "nfsm_subs.h"
74 #include "nfsdiskless.h"
75 #include "nqnfs.h"
76 #include "nfsmountrpc.h"
77
78 extern int      nfs_mountroot(struct mount *mp);
79 extern void     bootpc_init(void);
80
81 extern int      nfs_ticks;
82 extern struct vnodeopv_entry_desc nfsv2_vnodeop_entries[];
83 extern struct vnodeopv_entry_desc nfsv2_fifoop_entries[];
84 extern struct vnodeopv_entry_desc nfsv2_specop_entries[];
85
86 MALLOC_DEFINE(M_NFSREQ, "NFS req", "NFS request header");
87 MALLOC_DEFINE(M_NFSBIGFH, "NFSV3 bigfh", "NFS version 3 file handle");
88 MALLOC_DEFINE(M_NFSD, "NFS daemon", "Nfs server daemon structure");
89 MALLOC_DEFINE(M_NFSDIROFF, "NFSV3 diroff", "NFS directory offset data");
90 MALLOC_DEFINE(M_NFSRVDESC, "NFSV3 srvdesc", "NFS server socket descriptor");
91 MALLOC_DEFINE(M_NFSUID, "NFS uid", "Nfs uid mapping structure");
92 MALLOC_DEFINE(M_NQLEASE, "NQNFS Lease", "Nqnfs lease");
93 MALLOC_DEFINE(M_NFSHASH, "NFS hash", "NFS hash tables");
94
95 vm_zone_t nfsmount_zone;
96
97 struct nfsstats nfsstats;
98 SYSCTL_NODE(_vfs, OID_AUTO, nfs, CTLFLAG_RW, 0, "NFS filesystem");
99 SYSCTL_STRUCT(_vfs_nfs, NFS_NFSSTATS, nfsstats, CTLFLAG_RD,
100         &nfsstats, nfsstats, "");
101 static int nfs_ip_paranoia = 1;
102 SYSCTL_INT(_vfs_nfs, OID_AUTO, nfs_ip_paranoia, CTLFLAG_RW,
103         &nfs_ip_paranoia, 0, "");
104 #ifdef NFS_DEBUG
105 int nfs_debug;
106 SYSCTL_INT(_vfs_nfs, OID_AUTO, debug, CTLFLAG_RW, &nfs_debug, 0, "");
107 #endif
108
109 /*
110  * Tunable to determine the Read/Write unit size.  Maximum value
111  * is NFS_MAXDATA.  We also default to NFS_MAXDATA.
112  */
113 static int nfs_io_size = NFS_MAXDATA;
114 SYSCTL_INT(_vfs_nfs, OID_AUTO, nfs_io_size, CTLFLAG_RW,
115         &nfs_io_size, 0, "NFS optimal I/O unit size");
116
117 static void     nfs_decode_args (struct nfsmount *nmp,
118                         struct nfs_args *argp);
119 static int      mountnfs (struct nfs_args *,struct mount *,
120                         struct sockaddr *,char *,char *,struct vnode **);
121 static int      nfs_mount ( struct mount *mp, char *path, caddr_t data,
122                         struct thread *td);
123 static int      nfs_unmount ( struct mount *mp, int mntflags,
124                         struct thread *td);
125 static int      nfs_root ( struct mount *mp, struct vnode **vpp);
126 static int      nfs_statfs ( struct mount *mp, struct statfs *sbp,
127                         struct thread *td);
128 static int      nfs_sync ( struct mount *mp, int waitfor,
129                         struct thread *td);
130
131 /*
132  * nfs vfs operations.
133  */
134 static struct vfsops nfs_vfsops = {
135         .vfs_mount =            nfs_mount,
136         .vfs_unmount =          nfs_unmount,
137         .vfs_root =             nfs_root,
138         .vfs_statfs =           nfs_statfs,
139         .vfs_sync =             nfs_sync,
140         .vfs_init =             nfs_init,
141         .vfs_uninit =           nfs_uninit
142 };
143 VFS_SET(nfs_vfsops, nfs, VFCF_NETWORK);
144
145 /*
146  * This structure must be filled in by a primary bootstrap or bootstrap
147  * server for a diskless/dataless machine. It is initialized below just
148  * to ensure that it is allocated to initialized data (.data not .bss).
149  */
150 struct nfs_diskless nfs_diskless = { { { 0 } } };
151 struct nfsv3_diskless nfsv3_diskless = { { { 0 } } };
152 int nfs_diskless_valid = 0;
153
154 SYSCTL_INT(_vfs_nfs, OID_AUTO, diskless_valid, CTLFLAG_RD, 
155         &nfs_diskless_valid, 0, "");
156
157 SYSCTL_STRING(_vfs_nfs, OID_AUTO, diskless_rootpath, CTLFLAG_RD,
158         nfsv3_diskless.root_hostnam, 0, "");
159
160 SYSCTL_OPAQUE(_vfs_nfs, OID_AUTO, diskless_rootaddr, CTLFLAG_RD,
161         &nfsv3_diskless.root_saddr, sizeof nfsv3_diskless.root_saddr,
162         "%Ssockaddr_in", "");
163
164 SYSCTL_STRING(_vfs_nfs, OID_AUTO, diskless_swappath, CTLFLAG_RD,
165         nfsv3_diskless.swap_hostnam, 0, "");
166
167 SYSCTL_OPAQUE(_vfs_nfs, OID_AUTO, diskless_swapaddr, CTLFLAG_RD,
168         &nfsv3_diskless.swap_saddr, sizeof nfsv3_diskless.swap_saddr, 
169         "%Ssockaddr_in","");
170
171
172 void nfsargs_ntoh (struct nfs_args *);
173 static int nfs_mountdiskless (char *, char *, int,
174                                   struct sockaddr_in *, struct nfs_args *,
175                                   struct thread *, struct vnode **,
176                                   struct mount **);
177 static void nfs_convert_diskless (void);
178 static void nfs_convert_oargs (struct nfs_args *args,
179                                    struct onfs_args *oargs);
180
181 /*
182  * Calculate the buffer I/O block size to use.  The maximum V2 block size
183  * is typically 8K, the maximum datagram size is typically 16K, and the
184  * maximum V3 block size is typically 32K.  The buffer cache tends to work
185  * best with 16K blocks but we allow 32K for TCP connections.
186  *
187  * We force the block size to be at least a page for buffer cache efficiency.
188  */
189 static
190 int
191 nfs_iosize(int v3, int sotype)
192 {
193         int iosize;
194         int iomax;
195
196         if (v3) {
197                 if (sotype == SOCK_STREAM)
198                         iomax = NFS_MAXDATA;
199                 else
200                         iomax = NFS_MAXDGRAMDATA;
201         } else {
202                 iomax = NFS_V2MAXDATA;
203         }
204         if ((iosize = nfs_io_size) > iomax)
205                 iosize = iomax;
206         if (iosize < PAGE_SIZE)
207                 iosize = PAGE_SIZE;
208
209         /*
210          * This is an aweful hack but until the buffer cache is rewritten
211          * we need it.  The problem is that when you combine write() with
212          * mmap() the vm_page->valid bits can become weird looking
213          * (e.g. 0xfc).  This occurs because NFS uses piecemeal buffers
214          * at the file EOF.  To solve the problem the BIO system needs to
215          * be guarenteed that the NFS iosize for regular files will be a
216          * multiple of PAGE_SIZE so it can invalidate the whole page
217          * rather then just the piece of it owned by the buffer when
218          * NFS does vinvalbuf() calls.
219          */
220         if (iosize & PAGE_MASK)
221                 iosize = (iosize & ~PAGE_MASK) + PAGE_SIZE;
222         return iosize;
223 }
224
225 static void
226 nfs_convert_oargs(args, oargs)
227         struct nfs_args *args;
228         struct onfs_args *oargs;
229 {
230         args->version = NFS_ARGSVERSION;
231         args->addr = oargs->addr;
232         args->addrlen = oargs->addrlen;
233         args->sotype = oargs->sotype;
234         args->proto = oargs->proto;
235         args->fh = oargs->fh;
236         args->fhsize = oargs->fhsize;
237         args->flags = oargs->flags;
238         args->wsize = oargs->wsize;
239         args->rsize = oargs->rsize;
240         args->readdirsize = oargs->readdirsize;
241         args->timeo = oargs->timeo;
242         args->retrans = oargs->retrans;
243         args->maxgrouplist = oargs->maxgrouplist;
244         args->readahead = oargs->readahead;
245         args->leaseterm = oargs->leaseterm;
246         args->deadthresh = oargs->deadthresh;
247         args->hostname = oargs->hostname;
248 }
249
250 static void
251 nfs_convert_diskless()
252 {
253         int i;
254
255         bcopy(&nfs_diskless.myif, &nfsv3_diskless.myif,
256                 sizeof(struct ifaliasreq));
257         bcopy(&nfs_diskless.mygateway, &nfsv3_diskless.mygateway,
258                 sizeof(struct sockaddr_in));
259         nfs_convert_oargs(&nfsv3_diskless.swap_args,&nfs_diskless.swap_args);
260
261         bcopy(nfs_diskless.swap_fh,nfsv3_diskless.swap_fh,NFSX_V2FH);
262         nfsv3_diskless.swap_fhsize = NFSX_V2FH;
263         for (i = NFSX_V2FH - 1; i >= 0; --i) {
264                 if (nfs_diskless.swap_fh[i])
265                         break;
266         }
267         if (i < 0)
268                 nfsv3_diskless.swap_fhsize = 0;
269
270         bcopy(&nfs_diskless.swap_saddr,&nfsv3_diskless.swap_saddr,
271                 sizeof(struct sockaddr_in));
272         bcopy(nfs_diskless.swap_hostnam,nfsv3_diskless.swap_hostnam, MNAMELEN);
273         nfsv3_diskless.swap_nblks = nfs_diskless.swap_nblks;
274         bcopy(&nfs_diskless.swap_ucred, &nfsv3_diskless.swap_ucred,
275                 sizeof(struct ucred));
276         nfs_convert_oargs(&nfsv3_diskless.root_args,&nfs_diskless.root_args);
277
278         bcopy(nfs_diskless.root_fh,nfsv3_diskless.root_fh,NFSX_V2FH);
279         nfsv3_diskless.root_fhsize = NFSX_V2FH;
280         for (i = NFSX_V2FH - 1; i >= 0; --i) {
281                 if (nfs_diskless.root_fh[i])
282                         break;
283         }
284         if (i < 0)
285                 nfsv3_diskless.root_fhsize = 0;
286
287         bcopy(&nfs_diskless.root_saddr,&nfsv3_diskless.root_saddr,
288                 sizeof(struct sockaddr_in));
289         bcopy(nfs_diskless.root_hostnam,nfsv3_diskless.root_hostnam, MNAMELEN);
290         nfsv3_diskless.root_time = nfs_diskless.root_time;
291         bcopy(nfs_diskless.my_hostnam,nfsv3_diskless.my_hostnam,
292                 MAXHOSTNAMELEN);
293         nfs_diskless_valid = 3;
294 }
295
296 /*
297  * nfs statfs call
298  */
299 int
300 nfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
301 {
302         struct vnode *vp;
303         struct nfs_statfs *sfp;
304         caddr_t cp;
305         u_int32_t *tl;
306         int32_t t1, t2;
307         caddr_t bpos, dpos, cp2;
308         struct nfsmount *nmp = VFSTONFS(mp);
309         int error = 0, v3 = (nmp->nm_flag & NFSMNT_NFSV3), retattr;
310         struct mbuf *mreq, *mrep, *md, *mb, *mb2;
311         struct ucred *cred;
312         struct nfsnode *np;
313         u_quad_t tquad;
314
315 #ifndef nolint
316         sfp = (struct nfs_statfs *)0;
317 #endif
318         error = nfs_nget(mp, (nfsfh_t *)nmp->nm_fh, nmp->nm_fhsize, &np);
319         if (error)
320                 return (error);
321         vp = NFSTOV(np);
322         cred = crget();
323         cred->cr_ngroups = 1;
324         if (v3 && (nmp->nm_state & NFSSTA_GOTFSINFO) == 0)
325                 (void)nfs_fsinfo(nmp, vp, td);
326         nfsstats.rpccnt[NFSPROC_FSSTAT]++;
327         nfsm_reqhead(vp, NFSPROC_FSSTAT, NFSX_FH(v3));
328         nfsm_fhtom(vp, v3);
329         nfsm_request(vp, NFSPROC_FSSTAT, td, cred);
330         if (v3)
331                 nfsm_postop_attr(vp, retattr, NFS_LATTR_NOSHRINK);
332         if (error) {
333                 if (mrep != NULL)
334                         m_freem(mrep);
335                 goto nfsmout;
336         }
337         nfsm_dissect(sfp, struct nfs_statfs *, NFSX_STATFS(v3));
338         sbp->f_flags = nmp->nm_flag;
339         sbp->f_iosize = nfs_iosize(v3, nmp->nm_sotype);
340
341         if (v3) {
342                 sbp->f_bsize = NFS_FABLKSIZE;
343                 tquad = fxdr_hyper(&sfp->sf_tbytes);
344                 sbp->f_blocks = (long)(tquad / ((u_quad_t)NFS_FABLKSIZE));
345                 tquad = fxdr_hyper(&sfp->sf_fbytes);
346                 sbp->f_bfree = (long)(tquad / ((u_quad_t)NFS_FABLKSIZE));
347                 tquad = fxdr_hyper(&sfp->sf_abytes);
348                 sbp->f_bavail = (long)(tquad / ((u_quad_t)NFS_FABLKSIZE));
349                 sbp->f_files = (fxdr_unsigned(int32_t,
350                     sfp->sf_tfiles.nfsuquad[1]) & 0x7fffffff);
351                 sbp->f_ffree = (fxdr_unsigned(int32_t,
352                     sfp->sf_ffiles.nfsuquad[1]) & 0x7fffffff);
353         } else {
354                 sbp->f_bsize = fxdr_unsigned(int32_t, sfp->sf_bsize);
355                 sbp->f_blocks = fxdr_unsigned(int32_t, sfp->sf_blocks);
356                 sbp->f_bfree = fxdr_unsigned(int32_t, sfp->sf_bfree);
357                 sbp->f_bavail = fxdr_unsigned(int32_t, sfp->sf_bavail);
358                 sbp->f_files = 0;
359                 sbp->f_ffree = 0;
360         }
361         if (sbp != &mp->mnt_stat) {
362                 sbp->f_type = mp->mnt_vfc->vfc_typenum;
363                 bcopy(mp->mnt_stat.f_mntfromname, sbp->f_mntfromname, MNAMELEN);
364         }
365         m_freem(mrep);
366 nfsmout:
367         vput(vp);
368         crfree(cred);
369         return (error);
370 }
371
372 /*
373  * nfs version 3 fsinfo rpc call
374  */
375 int
376 nfs_fsinfo(struct nfsmount *nmp, struct vnode *vp, struct thread *td)
377 {
378         struct nfsv3_fsinfo *fsp;
379         caddr_t cp;
380         int32_t t1, t2;
381         u_int32_t *tl, pref, max;
382         caddr_t bpos, dpos, cp2;
383         int error = 0, retattr;
384         struct mbuf *mreq, *mrep, *md, *mb, *mb2;
385         u_int64_t maxfsize;
386
387         nfsstats.rpccnt[NFSPROC_FSINFO]++;
388         nfsm_reqhead(vp, NFSPROC_FSINFO, NFSX_FH(1));
389         nfsm_fhtom(vp, 1);
390         nfsm_request(vp, NFSPROC_FSINFO, td, nfs_vpcred(vp, ND_READ));
391         nfsm_postop_attr(vp, retattr, NFS_LATTR_NOSHRINK);
392         if (!error) {
393                 nfsm_dissect(fsp, struct nfsv3_fsinfo *, NFSX_V3FSINFO);
394                 pref = fxdr_unsigned(u_int32_t, fsp->fs_wtpref);
395                 if (pref < nmp->nm_wsize && pref >= NFS_FABLKSIZE)
396                         nmp->nm_wsize = (pref + NFS_FABLKSIZE - 1) &
397                                 ~(NFS_FABLKSIZE - 1);
398                 max = fxdr_unsigned(u_int32_t, fsp->fs_wtmax);
399                 if (max < nmp->nm_wsize && max > 0) {
400                         nmp->nm_wsize = max & ~(NFS_FABLKSIZE - 1);
401                         if (nmp->nm_wsize == 0)
402                                 nmp->nm_wsize = max;
403                 }
404                 pref = fxdr_unsigned(u_int32_t, fsp->fs_rtpref);
405                 if (pref < nmp->nm_rsize && pref >= NFS_FABLKSIZE)
406                         nmp->nm_rsize = (pref + NFS_FABLKSIZE - 1) &
407                                 ~(NFS_FABLKSIZE - 1);
408                 max = fxdr_unsigned(u_int32_t, fsp->fs_rtmax);
409                 if (max < nmp->nm_rsize && max > 0) {
410                         nmp->nm_rsize = max & ~(NFS_FABLKSIZE - 1);
411                         if (nmp->nm_rsize == 0)
412                                 nmp->nm_rsize = max;
413                 }
414                 pref = fxdr_unsigned(u_int32_t, fsp->fs_dtpref);
415                 if (pref < nmp->nm_readdirsize && pref >= NFS_DIRBLKSIZ)
416                         nmp->nm_readdirsize = (pref + NFS_DIRBLKSIZ - 1) &
417                                 ~(NFS_DIRBLKSIZ - 1);
418                 if (max < nmp->nm_readdirsize && max > 0) {
419                         nmp->nm_readdirsize = max & ~(NFS_DIRBLKSIZ - 1);
420                         if (nmp->nm_readdirsize == 0)
421                                 nmp->nm_readdirsize = max;
422                 }
423                 maxfsize = fxdr_hyper(&fsp->fs_maxfilesize);
424                 if (maxfsize > 0 && maxfsize < nmp->nm_maxfilesize)
425                         nmp->nm_maxfilesize = maxfsize;
426                 nmp->nm_state |= NFSSTA_GOTFSINFO;
427         }
428         m_freem(mrep);
429 nfsmout:
430         return (error);
431 }
432
433 /*
434  * Mount a remote root fs via. nfs. This depends on the info in the
435  * nfs_diskless structure that has been filled in properly by some primary
436  * bootstrap.
437  * It goes something like this:
438  * - do enough of "ifconfig" by calling ifioctl() so that the system
439  *   can talk to the server
440  * - If nfs_diskless.mygateway is filled in, use that address as
441  *   a default gateway.
442  * - build the rootfs mount point and call mountnfs() to do the rest.
443  */
444 int
445 nfs_mountroot(mp)
446         struct mount *mp;
447 {
448         struct mount  *swap_mp;
449         struct nfsv3_diskless *nd = &nfsv3_diskless;
450         struct socket *so;
451         struct vnode *vp;
452         struct thread *td = curthread;          /* XXX */
453         int error, i;
454         u_long l;
455         char buf[128];
456
457 #if defined(BOOTP_NFSROOT) && defined(BOOTP)
458         bootpc_init();          /* use bootp to get nfs_diskless filled in */
459 #endif
460
461         /*
462          * XXX time must be non-zero when we init the interface or else
463          * the arp code will wedge...
464          */
465         while (mycpu->gd_time_seconds == 0)
466                 tsleep(mycpu, 0, "arpkludge", 10);
467
468         /*
469          * The boot code may have passed us a diskless structure.
470          */
471         if (nfs_diskless_valid == 1) 
472                 nfs_convert_diskless();
473
474 #define SINP(sockaddr)  ((struct sockaddr_in *)(sockaddr))
475         printf("nfs_mountroot: interface %s ip %s",
476                 nd->myif.ifra_name, 
477                 inet_ntoa(SINP(&nd->myif.ifra_addr)->sin_addr));
478         printf(" bcast %s", 
479                 inet_ntoa(SINP(&nd->myif.ifra_broadaddr)->sin_addr));
480         printf(" mask %s\n", 
481                 inet_ntoa(SINP(&nd->myif.ifra_mask)->sin_addr));
482 #undef SINP
483
484         /*
485          * XXX splnet, so networks will receive...
486          */
487         crit_enter();
488
489         /*
490          * BOOTP does not necessarily have to be compiled into the kernel
491          * for an NFS root to work.  If we inherited the network 
492          * configuration for PXEBOOT then pxe_setup_nfsdiskless() has figured
493          * out our interface for us and all we need to do is ifconfig the
494          * interface.  We only do this if the interface has not already been
495          * ifconfig'd by e.g. BOOTP.
496          */
497         error = socreate(nd->myif.ifra_addr.sa_family, &so, SOCK_DGRAM, 0, td);
498         if (error) {
499                 panic("nfs_mountroot: socreate(%04x): %d",
500                         nd->myif.ifra_addr.sa_family, error);
501         }
502
503         error = ifioctl(so, SIOCAIFADDR, (caddr_t)&nd->myif, td);
504         if (error)
505                 panic("nfs_mountroot: SIOCAIFADDR: %d", error);
506
507         soclose(so);
508
509         /*
510          * If the gateway field is filled in, set it as the default route.
511          */
512         if (nd->mygateway.sin_len != 0) {
513                 struct sockaddr_in mask, sin;
514
515                 bzero((caddr_t)&mask, sizeof(mask));
516                 sin = mask;
517                 sin.sin_family = AF_INET;
518                 sin.sin_len = sizeof(sin);
519                 printf("nfs_mountroot: gateway %s\n",
520                         inet_ntoa(nd->mygateway.sin_addr));
521                 error = rtrequest(RTM_ADD, (struct sockaddr *)&sin,
522                     (struct sockaddr *)&nd->mygateway,
523                     (struct sockaddr *)&mask,
524                     RTF_UP | RTF_GATEWAY, (struct rtentry **)0);
525                 if (error)
526                         printf("nfs_mountroot: unable to set gateway, error %d, continuing anyway\n", error);
527         }
528
529         /*
530          * Create the rootfs mount point.
531          */
532         nd->root_args.fh = nd->root_fh;
533         nd->root_args.fhsize = nd->root_fhsize;
534         l = ntohl(nd->root_saddr.sin_addr.s_addr);
535         snprintf(buf, sizeof(buf), "%ld.%ld.%ld.%ld:%s",
536                 (l >> 24) & 0xff, (l >> 16) & 0xff,
537                 (l >>  8) & 0xff, (l >>  0) & 0xff,nd->root_hostnam);
538         printf("NFS ROOT: %s\n",buf);
539         if ((error = nfs_mountdiskless(buf, "/", MNT_RDONLY,
540             &nd->root_saddr, &nd->root_args, td, &vp, &mp)) != 0) {
541                 if (swap_mp) {
542                         mp->mnt_vfc->vfc_refcount--;
543                         free(swap_mp, M_MOUNT);
544                 }
545                 crit_exit();
546                 return (error);
547         }
548
549         swap_mp = NULL;
550         if (nd->swap_nblks) {
551
552                 /* Convert to DEV_BSIZE instead of Kilobyte */
553                 nd->swap_nblks *= 2;
554
555                 /*
556                  * Create a fake mount point just for the swap vnode so that the
557                  * swap file can be on a different server from the rootfs.
558                  */
559                 nd->swap_args.fh = nd->swap_fh;
560                 nd->swap_args.fhsize = nd->swap_fhsize;
561                 l = ntohl(nd->swap_saddr.sin_addr.s_addr);
562                 snprintf(buf, sizeof(buf), "%ld.%ld.%ld.%ld:%s",
563                         (l >> 24) & 0xff, (l >> 16) & 0xff,
564                         (l >>  8) & 0xff, (l >>  0) & 0xff,nd->swap_hostnam);
565                 printf("NFS SWAP: %s\n",buf);
566                 if ((error = nfs_mountdiskless(buf, "/swap", 0,
567                     &nd->swap_saddr, &nd->swap_args, td, &vp, &swap_mp)) != 0) {
568                         crit_exit();
569                         return (error);
570                 }
571                 vfs_unbusy(swap_mp, td);
572
573                 VTONFS(vp)->n_size = VTONFS(vp)->n_vattr.va_size = 
574                                 nd->swap_nblks * DEV_BSIZE ;
575                 
576                 /*
577                  * Since the swap file is not the root dir of a file system,
578                  * hack it to a regular file.
579                  */
580                 vp->v_type = VREG;
581                 vp->v_flag = 0;
582                 vref(vp);
583                 swaponvp(td, vp, nd->swap_nblks);
584         }
585
586         mp->mnt_flag |= MNT_ROOTFS;
587         mp->mnt_vnodecovered = NULLVP;
588         vfs_unbusy(mp, td);
589
590         /*
591          * This is not really an nfs issue, but it is much easier to
592          * set hostname here and then let the "/etc/rc.xxx" files
593          * mount the right /var based upon its preset value.
594          */
595         bcopy(nd->my_hostnam, hostname, MAXHOSTNAMELEN);
596         hostname[MAXHOSTNAMELEN - 1] = '\0';
597         for (i = 0; i < MAXHOSTNAMELEN; i++)
598                 if (hostname[i] == '\0')
599                         break;
600         inittodr(ntohl(nd->root_time));
601         crit_exit();
602         return (0);
603 }
604
605 /*
606  * Internal version of mount system call for diskless setup.
607  */
608 static int
609 nfs_mountdiskless(char *path, char *which, int mountflag,
610         struct sockaddr_in *sin, struct nfs_args *args, struct thread *td,
611         struct vnode **vpp, struct mount **mpp)
612 {
613         struct mount *mp;
614         struct sockaddr *nam;
615         int didalloc = 0;
616         int error;
617
618         mp = *mpp;
619
620         if (mp == NULL) {
621                 if ((error = vfs_rootmountalloc("nfs", path, &mp)) != 0) {
622                         printf("nfs_mountroot: NFS not configured");
623                         return (error);
624                 }
625                 didalloc = 1;
626         }
627         mp->mnt_kern_flag = 0;
628         mp->mnt_flag = mountflag;
629         nam = dup_sockaddr((struct sockaddr *)sin);
630
631 #if defined(BOOTP) || defined(NFS_ROOT)
632         if (args->fhsize == 0) {
633                 printf("NFS_ROOT: No FH passed from loader, attempting mount rpc...");
634                 args->fhsize = 0;
635                 error = md_mount(sin, which, args->fh, &args->fhsize, args, td);
636                 if (error) {
637                         printf("failed.\n");
638                         goto haderror;
639                 }
640                 printf("success!\n");
641         }
642 #endif
643
644         if ((error = mountnfs(args, mp, nam, which, path, vpp)) != 0) {
645 haderror:
646                 printf("nfs_mountroot: mount %s on %s: %d", path, which, error);
647                 mp->mnt_vfc->vfc_refcount--;
648                 vfs_unbusy(mp, td);
649                 if (didalloc)
650                         free(mp, M_MOUNT);
651                 FREE(nam, M_SONAME);
652                 return (error);
653         }
654         *mpp = mp;
655         return (0);
656 }
657
658 static void
659 nfs_decode_args(nmp, argp)
660         struct nfsmount *nmp;
661         struct nfs_args *argp;
662 {
663         int adjsock;
664         int maxio;
665
666         crit_enter();
667         /*
668          * Silently clear NFSMNT_NOCONN if it's a TCP mount, it makes
669          * no sense in that context.
670          */
671         if (argp->sotype == SOCK_STREAM)
672                 nmp->nm_flag &= ~NFSMNT_NOCONN;
673
674         /* Also clear RDIRPLUS if not NFSv3, it crashes some servers */
675         if ((argp->flags & NFSMNT_NFSV3) == 0)
676                 nmp->nm_flag &= ~NFSMNT_RDIRPLUS;
677
678         /* Re-bind if rsrvd port requested and wasn't on one */
679         adjsock = !(nmp->nm_flag & NFSMNT_RESVPORT)
680                   && (argp->flags & NFSMNT_RESVPORT);
681         /* Also re-bind if we're switching to/from a connected UDP socket */
682         adjsock |= ((nmp->nm_flag & NFSMNT_NOCONN) !=
683                     (argp->flags & NFSMNT_NOCONN));
684
685         /* Update flags atomically.  Don't change the lock bits. */
686         nmp->nm_flag = argp->flags | nmp->nm_flag;
687         crit_exit();
688
689         if ((argp->flags & NFSMNT_TIMEO) && argp->timeo > 0) {
690                 nmp->nm_timeo = (argp->timeo * NFS_HZ + 5) / 10;
691                 if (nmp->nm_timeo < NFS_MINTIMEO)
692                         nmp->nm_timeo = NFS_MINTIMEO;
693                 else if (nmp->nm_timeo > NFS_MAXTIMEO)
694                         nmp->nm_timeo = NFS_MAXTIMEO;
695         }
696
697         if ((argp->flags & NFSMNT_RETRANS) && argp->retrans > 1) {
698                 nmp->nm_retry = argp->retrans;
699                 if (nmp->nm_retry > NFS_MAXREXMIT)
700                         nmp->nm_retry = NFS_MAXREXMIT;
701         }
702
703         maxio = nfs_iosize(argp->flags & NFSMNT_NFSV3, argp->sotype);
704
705         if ((argp->flags & NFSMNT_WSIZE) && argp->wsize > 0) {
706                 nmp->nm_wsize = argp->wsize;
707                 /* Round down to multiple of blocksize */
708                 nmp->nm_wsize &= ~(NFS_FABLKSIZE - 1);
709                 if (nmp->nm_wsize <= 0)
710                         nmp->nm_wsize = NFS_FABLKSIZE;
711         }
712         if (nmp->nm_wsize > maxio)
713                 nmp->nm_wsize = maxio;
714         if (nmp->nm_wsize > MAXBSIZE)
715                 nmp->nm_wsize = MAXBSIZE;
716
717         if ((argp->flags & NFSMNT_RSIZE) && argp->rsize > 0) {
718                 nmp->nm_rsize = argp->rsize;
719                 /* Round down to multiple of blocksize */
720                 nmp->nm_rsize &= ~(NFS_FABLKSIZE - 1);
721                 if (nmp->nm_rsize <= 0)
722                         nmp->nm_rsize = NFS_FABLKSIZE;
723         }
724         if (nmp->nm_rsize > maxio)
725                 nmp->nm_rsize = maxio;
726         if (nmp->nm_rsize > MAXBSIZE)
727                 nmp->nm_rsize = MAXBSIZE;
728
729         if ((argp->flags & NFSMNT_READDIRSIZE) && argp->readdirsize > 0) {
730                 nmp->nm_readdirsize = argp->readdirsize;
731         }
732         if (nmp->nm_readdirsize > maxio)
733                 nmp->nm_readdirsize = maxio;
734         if (nmp->nm_readdirsize > nmp->nm_rsize)
735                 nmp->nm_readdirsize = nmp->nm_rsize;
736
737         if ((argp->flags & NFSMNT_ACREGMIN) && argp->acregmin >= 0)
738                 nmp->nm_acregmin = argp->acregmin;
739         else
740                 nmp->nm_acregmin = NFS_MINATTRTIMO;
741         if ((argp->flags & NFSMNT_ACREGMAX) && argp->acregmax >= 0)
742                 nmp->nm_acregmax = argp->acregmax;
743         else
744                 nmp->nm_acregmax = NFS_MAXATTRTIMO;
745         if ((argp->flags & NFSMNT_ACDIRMIN) && argp->acdirmin >= 0)
746                 nmp->nm_acdirmin = argp->acdirmin;
747         else
748                 nmp->nm_acdirmin = NFS_MINDIRATTRTIMO;
749         if ((argp->flags & NFSMNT_ACDIRMAX) && argp->acdirmax >= 0)
750                 nmp->nm_acdirmax = argp->acdirmax;
751         else
752                 nmp->nm_acdirmax = NFS_MAXDIRATTRTIMO;
753         if (nmp->nm_acdirmin > nmp->nm_acdirmax)
754                 nmp->nm_acdirmin = nmp->nm_acdirmax;
755         if (nmp->nm_acregmin > nmp->nm_acregmax)
756                 nmp->nm_acregmin = nmp->nm_acregmax;
757
758         if ((argp->flags & NFSMNT_MAXGRPS) && argp->maxgrouplist >= 0) {
759                 if (argp->maxgrouplist <= NFS_MAXGRPS)
760                         nmp->nm_numgrps = argp->maxgrouplist;
761                 else
762                         nmp->nm_numgrps = NFS_MAXGRPS;
763         }
764         if ((argp->flags & NFSMNT_READAHEAD) && argp->readahead >= 0) {
765                 if (argp->readahead <= NFS_MAXRAHEAD)
766                         nmp->nm_readahead = argp->readahead;
767                 else
768                         nmp->nm_readahead = NFS_MAXRAHEAD;
769         }
770         if ((argp->flags & NFSMNT_LEASETERM) && argp->leaseterm >= 2) {
771                 if (argp->leaseterm <= NQ_MAXLEASE)
772                         nmp->nm_leaseterm = argp->leaseterm;
773                 else
774                         nmp->nm_leaseterm = NQ_MAXLEASE;
775         }
776         if ((argp->flags & NFSMNT_DEADTHRESH) && argp->deadthresh >= 1) {
777                 if (argp->deadthresh <= NQ_NEVERDEAD)
778                         nmp->nm_deadthresh = argp->deadthresh;
779                 else
780                         nmp->nm_deadthresh = NQ_NEVERDEAD;
781         }
782
783         adjsock |= ((nmp->nm_sotype != argp->sotype) ||
784                     (nmp->nm_soproto != argp->proto));
785         nmp->nm_sotype = argp->sotype;
786         nmp->nm_soproto = argp->proto;
787
788         if (nmp->nm_so && adjsock) {
789                 nfs_safedisconnect(nmp);
790                 if (nmp->nm_sotype == SOCK_DGRAM)
791                         while (nfs_connect(nmp, (struct nfsreq *)0)) {
792                                 printf("nfs_args: retrying connect\n");
793                                 (void) tsleep((caddr_t)&lbolt, 0, "nfscon", 0);
794                         }
795         }
796 }
797
798 /*
799  * VFS Operations.
800  *
801  * mount system call
802  * It seems a bit dumb to copyinstr() the host and path here and then
803  * bcopy() them in mountnfs(), but I wanted to detect errors before
804  * doing the sockargs() call because sockargs() allocates an mbuf and
805  * an error after that means that I have to release the mbuf.
806  */
807 /* ARGSUSED */
808 static int
809 nfs_mount(struct mount *mp, char *path, caddr_t data, struct thread *td)
810 {
811         int error;
812         struct nfs_args args;
813         struct sockaddr *nam;
814         struct vnode *vp;
815         char pth[MNAMELEN], hst[MNAMELEN];
816         size_t len;
817         u_char nfh[NFSX_V3FHMAX];
818
819         if (path == NULL) {
820                 nfs_mountroot(mp);
821                 return (0);
822         }
823         error = copyin(data, (caddr_t)&args, sizeof (struct nfs_args));
824         if (error)
825                 return (error);
826         if (args.version != NFS_ARGSVERSION) {
827 #ifdef COMPAT_PRELITE2
828                 /*
829                  * If the argument version is unknown, then assume the
830                  * caller is a pre-lite2 4.4BSD client and convert its
831                  * arguments.
832                  */
833                 struct onfs_args oargs;
834                 error = copyin(data, (caddr_t)&oargs, sizeof (struct onfs_args));
835                 if (error)
836                         return (error);
837                 nfs_convert_oargs(&args,&oargs);
838 #else /* !COMPAT_PRELITE2 */
839                 return (EPROGMISMATCH);
840 #endif /* COMPAT_PRELITE2 */
841         }
842         if (mp->mnt_flag & MNT_UPDATE) {
843                 struct nfsmount *nmp = VFSTONFS(mp);
844
845                 if (nmp == NULL)
846                         return (EIO);
847                 /*
848                  * When doing an update, we can't change from or to
849                  * v3 and/or nqnfs, or change cookie translation
850                  */
851                 args.flags = (args.flags &
852                     ~(NFSMNT_NFSV3|NFSMNT_NQNFS /*|NFSMNT_XLATECOOKIE*/)) |
853                     (nmp->nm_flag &
854                         (NFSMNT_NFSV3|NFSMNT_NQNFS /*|NFSMNT_XLATECOOKIE*/));
855                 nfs_decode_args(nmp, &args);
856                 return (0);
857         }
858
859         /*
860          * Make the nfs_ip_paranoia sysctl serve as the default connection
861          * or no-connection mode for those protocols that support 
862          * no-connection mode (the flag will be cleared later for protocols
863          * that do not support no-connection mode).  This will allow a client
864          * to receive replies from a different IP then the request was
865          * sent to.  Note: default value for nfs_ip_paranoia is 1 (paranoid),
866          * not 0.
867          */
868         if (nfs_ip_paranoia == 0)
869                 args.flags |= NFSMNT_NOCONN;
870         if (args.fhsize < 0 || args.fhsize > NFSX_V3FHMAX)
871                 return (EINVAL);
872         error = copyin((caddr_t)args.fh, (caddr_t)nfh, args.fhsize);
873         if (error)
874                 return (error);
875         error = copyinstr(path, pth, MNAMELEN-1, &len);
876         if (error)
877                 return (error);
878         bzero(&pth[len], MNAMELEN - len);
879         error = copyinstr(args.hostname, hst, MNAMELEN-1, &len);
880         if (error)
881                 return (error);
882         bzero(&hst[len], MNAMELEN - len);
883         /* sockargs() call must be after above copyin() calls */
884         error = getsockaddr(&nam, (caddr_t)args.addr, args.addrlen);
885         if (error)
886                 return (error);
887         args.fh = nfh;
888         error = mountnfs(&args, mp, nam, pth, hst, &vp);
889         return (error);
890 }
891
892 /*
893  * Common code for mount and mountroot
894  */
895 static int
896 mountnfs(struct nfs_args *argp, struct mount *mp, struct sockaddr *nam,
897         char *pth, char *hst, struct vnode **vpp)
898 {
899         struct nfsmount *nmp;
900         struct nfsnode *np;
901         int error;
902
903         if (mp->mnt_flag & MNT_UPDATE) {
904                 nmp = VFSTONFS(mp);
905                 /* update paths, file handles, etc, here        XXX */
906                 FREE(nam, M_SONAME);
907                 return (0);
908         } else {
909                 nmp = zalloc(nfsmount_zone);
910                 bzero((caddr_t)nmp, sizeof (struct nfsmount));
911                 TAILQ_INIT(&nmp->nm_uidlruhead);
912                 TAILQ_INIT(&nmp->nm_bufq);
913                 mp->mnt_data = (qaddr_t)nmp;
914         }
915         vfs_getnewfsid(mp);
916         nmp->nm_mountp = mp;
917         if (argp->flags & NFSMNT_NQNFS) {
918                 /*
919                  * We have to set mnt_maxsymlink to a non-zero value so
920                  * that COMPAT_43 routines will know that we are setting
921                  * the d_type field in directories (and can zero it for
922                  * unsuspecting binaries).
923                  */
924                 mp->mnt_maxsymlinklen = 1;
925         }
926
927         /*
928          * V2 can only handle 32 bit filesizes.  A 4GB-1 limit may be too
929          * high, depending on whether we end up with negative offsets in
930          * the client or server somewhere.  2GB-1 may be safer.
931          *
932          * For V3, nfs_fsinfo will adjust this as necessary.  Assume maximum
933          * that we can handle until we find out otherwise.
934          * XXX Our "safe" limit on the client is what we can store in our
935          * buffer cache using signed(!) block numbers.
936          */
937         if ((argp->flags & NFSMNT_NFSV3) == 0)
938                 nmp->nm_maxfilesize = 0xffffffffLL;
939         else
940                 nmp->nm_maxfilesize = (u_int64_t)0x80000000 * DEV_BSIZE - 1;
941
942         nmp->nm_timeo = NFS_TIMEO;
943         nmp->nm_retry = NFS_RETRANS;
944         nmp->nm_wsize = nfs_iosize(argp->flags & NFSMNT_NFSV3, argp->sotype);
945         nmp->nm_rsize = nmp->nm_wsize;
946         nmp->nm_readdirsize = NFS_READDIRSIZE;
947         nmp->nm_numgrps = NFS_MAXGRPS;
948         nmp->nm_readahead = NFS_DEFRAHEAD;
949         nmp->nm_leaseterm = NQ_DEFLEASE;
950         nmp->nm_deadthresh = NQ_DEADTHRESH;
951         CIRCLEQ_INIT(&nmp->nm_timerhead);
952         nmp->nm_inprog = NULLVP;
953         nmp->nm_fhsize = argp->fhsize;
954         bcopy((caddr_t)argp->fh, (caddr_t)nmp->nm_fh, argp->fhsize);
955         bcopy(hst, mp->mnt_stat.f_mntfromname, MNAMELEN);
956         nmp->nm_nam = nam;
957         /* Set up the sockets and per-host congestion */
958         nmp->nm_sotype = argp->sotype;
959         nmp->nm_soproto = argp->proto;
960         nmp->nm_cred = crhold(proc0.p_ucred);
961
962         nfs_decode_args(nmp, argp);
963
964         /*
965          * For Connection based sockets (TCP,...) defer the connect until
966          * the first request, in case the server is not responding.
967          */
968         if (nmp->nm_sotype == SOCK_DGRAM &&
969                 (error = nfs_connect(nmp, (struct nfsreq *)0)))
970                 goto bad;
971
972         /*
973          * This is silly, but it has to be set so that vinifod() works.
974          * We do not want to do an nfs_statfs() here since we can get
975          * stuck on a dead server and we are holding a lock on the mount
976          * point.
977          */
978         mp->mnt_stat.f_iosize = 
979                 nfs_iosize(nmp->nm_flag & NFSMNT_NFSV3, nmp->nm_sotype);
980
981         /*
982          * Install vop_ops for our vnops
983          */
984         vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops, nfsv2_vnodeop_entries);
985         vfs_add_vnodeops(mp, &mp->mnt_vn_spec_ops, nfsv2_specop_entries);
986         vfs_add_vnodeops(mp, &mp->mnt_vn_fifo_ops, nfsv2_fifoop_entries);
987
988         /*
989          * A reference count is needed on the nfsnode representing the
990          * remote root.  If this object is not persistent, then backward
991          * traversals of the mount point (i.e. "..") will not work if
992          * the nfsnode gets flushed out of the cache. Ufs does not have
993          * this problem, because one can identify root inodes by their
994          * number == ROOTINO (2).
995          */
996         error = nfs_nget(mp, (nfsfh_t *)nmp->nm_fh, nmp->nm_fhsize, &np);
997         if (error)
998                 goto bad;
999         *vpp = NFSTOV(np);
1000
1001         /*
1002          * Retrieval of mountpoint attributes is delayed until nfs_rot
1003          * or nfs_statfs are first called.  This will happen either when
1004          * we first traverse the mount point or if somebody does a df(1).
1005          *
1006          * NFSSTA_GOTFSINFO is used to flag if we have successfully
1007          * retrieved mountpoint attributes.  In the case of NFSv3 we
1008          * also flag static fsinfo.
1009          */
1010         if (*vpp != NULL)
1011                 (*vpp)->v_type = VNON;
1012
1013         /*
1014          * Lose the lock but keep the ref.
1015          */
1016         VOP_UNLOCK(*vpp, 0, curthread);
1017
1018         return (0);
1019 bad:
1020         nfs_disconnect(nmp);
1021         nfs_free_mount(nmp);
1022         FREE(nam, M_SONAME);
1023         return (error);
1024 }
1025
1026 /*
1027  * unmount system call
1028  */
1029 static int
1030 nfs_unmount(struct mount *mp, int mntflags, struct thread *td)
1031 {
1032         struct nfsmount *nmp;
1033         int error, flags = 0;
1034
1035         if (mntflags & MNT_FORCE)
1036                 flags |= FORCECLOSE;
1037         nmp = VFSTONFS(mp);
1038         /*
1039          * Goes something like this..
1040          * - Call vflush() to clear out vnodes for this file system
1041          * - Close the socket
1042          * - Free up the data structures
1043          */
1044         /* In the forced case, cancel any outstanding requests. */
1045         if (flags & FORCECLOSE) {
1046                 error = nfs_nmcancelreqs(nmp);
1047                 if (error)
1048                         return (error);
1049         }
1050         /*
1051          * Must handshake with nqnfs_clientd() if it is active.
1052          */
1053         nmp->nm_state |= NFSSTA_DISMINPROG;
1054         while (nmp->nm_inprog != NULLVP)
1055                 (void) tsleep((caddr_t)&lbolt, 0, "nfsdism", 0);
1056
1057         /* We hold 1 extra ref on the root vnode; see comment in mountnfs(). */
1058         error = vflush(mp, 1, flags);
1059         if (error) {
1060                 nmp->nm_state &= ~NFSSTA_DISMINPROG;
1061                 return (error);
1062         }
1063
1064         /*
1065          * We are now committed to the unmount.
1066          * For NQNFS, let the server daemon free the nfsmount structure.
1067          */
1068         if (nmp->nm_flag & (NFSMNT_NQNFS | NFSMNT_KERB))
1069                 nmp->nm_state |= NFSSTA_DISMNT;
1070
1071         nfs_disconnect(nmp);
1072         FREE(nmp->nm_nam, M_SONAME);
1073
1074         if ((nmp->nm_flag & (NFSMNT_NQNFS | NFSMNT_KERB)) == 0)
1075                 nfs_free_mount(nmp);
1076         return (0);
1077 }
1078
1079 void
1080 nfs_free_mount(struct nfsmount *nmp)
1081 {
1082         if (nmp->nm_cred)  {
1083                 crfree(nmp->nm_cred);
1084                 nmp->nm_cred = NULL;
1085         }
1086         zfree(nfsmount_zone, nmp);
1087 }
1088
1089 /*
1090  * Return root of a filesystem
1091  */
1092 static int
1093 nfs_root(mp, vpp)
1094         struct mount *mp;
1095         struct vnode **vpp;
1096 {
1097         struct vnode *vp;
1098         struct nfsmount *nmp;
1099         struct vattr attrs;
1100         struct nfsnode *np;
1101         int error;
1102
1103         nmp = VFSTONFS(mp);
1104         error = nfs_nget(mp, (nfsfh_t *)nmp->nm_fh, nmp->nm_fhsize, &np);
1105         if (error)
1106                 return (error);
1107         vp = NFSTOV(np);
1108
1109         /*
1110          * Get transfer parameters and root vnode attributes
1111          */
1112         if ((nmp->nm_state & NFSSTA_GOTFSINFO) == 0) {
1113             if (nmp->nm_flag & NFSMNT_NFSV3) {
1114                 nfs_fsinfo(nmp, vp, curthread);
1115                 mp->mnt_stat.f_iosize = nfs_iosize(1, nmp->nm_sotype);
1116             } else {
1117                 if ((error = VOP_GETATTR(vp, &attrs, curthread)) == 0)
1118                         nmp->nm_state |= NFSSTA_GOTFSINFO;
1119                 
1120             }
1121         }
1122         if (vp->v_type == VNON)
1123             vp->v_type = VDIR;
1124         vp->v_flag = VROOT;
1125         *vpp = vp;
1126         return (0);
1127 }
1128
1129 extern int syncprt;
1130
1131 struct scaninfo {
1132         int rescan;
1133         thread_t td;
1134         int waitfor;
1135         int allerror;
1136 };
1137
1138 static int nfs_sync_scan1(struct mount *mp, struct vnode *vp, void *data);
1139 static int nfs_sync_scan2(struct mount *mp, struct vnode *vp, void *data);
1140
1141 /*
1142  * Flush out the buffer cache
1143  */
1144 /* ARGSUSED */
1145 static int
1146 nfs_sync(struct mount *mp, int waitfor, struct thread *td)
1147 {
1148         struct scaninfo scaninfo;
1149         int error;
1150
1151         scaninfo.rescan = 0;
1152         scaninfo.td = td;
1153         scaninfo.waitfor = waitfor;
1154         scaninfo.allerror = 0;
1155
1156         /*
1157          * Force stale buffer cache information to be flushed.
1158          */
1159         error = 0;
1160         while (error == 0 && scaninfo.rescan) {
1161                 scaninfo.rescan = 0;
1162                 error = vmntvnodescan(mp, VMSC_GETVP, nfs_sync_scan1,
1163                                         nfs_sync_scan2, &scaninfo);
1164         }
1165         return(error);
1166 }
1167
1168 static
1169 int
1170 nfs_sync_scan1(struct mount *mp, struct vnode *vp, void *data)
1171 {
1172     struct scaninfo *info = data;
1173
1174     if (VOP_ISLOCKED(vp, NULL) || RB_EMPTY(&vp->v_rbdirty_tree))
1175         return(-1);
1176     if (info->waitfor == MNT_LAZY)
1177         return(-1);
1178     return(0);
1179 }
1180
1181 static
1182 int
1183 nfs_sync_scan2(struct mount *mp, struct vnode *vp, void *data)
1184 {
1185     struct scaninfo *info = data;
1186     int error;
1187
1188     error = VOP_FSYNC(vp, info->waitfor, info->td);
1189     if (error)
1190         info->allerror = error;
1191     return(0);
1192 }
1193