/*      $NetBSD: nfs_commonport.c,v 1.2 2016/12/13 22:31:51 pgoyette Exp $      */
/*-
* Copyright (c) 1989, 1993
*      The Regents of the University of California.  All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Rick Macklem at The University of Guelph.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
* 4. Neither the name of the University nor the names of its contributors
*    may be used to endorse or promote products derived from this software
*    without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
*/

#include <sys/cdefs.h>
/* __FBSDID("FreeBSD: head/sys/fs/nfs/nfs_commonport.c 304026 2016-08-12 22:44:59Z rmacklem "); */
__RCSID("$NetBSD: nfs_commonport.c,v 1.2 2016/12/13 22:31:51 pgoyette Exp $");

/*
* Functions that need to be different for different versions of BSD
* kernel should be kept here, along with any global storage specific
* to this BSD variant.
*/
#include <fs/nfs/common/nfsport.h>
#include <sys/sysctl.h>
#include <vm/vm.h>
#include <vm/vm_object.h>
#include <vm/vm_page.h>
#include <vm/vm_param.h>
#include <vm/vm_map.h>
#include <vm/vm_kern.h>
#include <vm/vm_extern.h>
#include <vm/uma.h>

extern int nfscl_ticks;
extern int nfsrv_nfsuserd;
extern struct nfssockreq nfsrv_nfsuserdsock;
extern void (*nfsd_call_recall)(struct vnode *, int, struct ucred *,
   struct thread *);
extern int nfsrv_useacl;
struct mount nfsv4root_mnt;
int newnfs_numnfsd = 0;
struct nfsstatsv1 nfsstatsv1;
int nfs_numnfscbd = 0;
int nfscl_debuglevel = 0;
char nfsv4_callbackaddr[INET6_ADDRSTRLEN];
struct callout newnfsd_callout;
int nfsrv_lughashsize = 100;
void (*nfsd_call_servertimer)(void) = NULL;
void (*ncl_call_invalcaches)(struct vnode *) = NULL;

static int nfs_realign_test;
static int nfs_realign_count;
static struct ext_nfsstats oldnfsstats;

SYSCTL_NODE(_vfs, OID_AUTO, nfs, CTLFLAG_RW, 0, "NFS filesystem");
SYSCTL_INT(_vfs_nfs, OID_AUTO, realign_test, CTLFLAG_RW, &nfs_realign_test,
   0, "Number of realign tests done");
SYSCTL_INT(_vfs_nfs, OID_AUTO, realign_count, CTLFLAG_RW, &nfs_realign_count,
   0, "Number of mbuf realignments done");
SYSCTL_STRING(_vfs_nfs, OID_AUTO, callback_addr, CTLFLAG_RW,
   nfsv4_callbackaddr, sizeof(nfsv4_callbackaddr),
   "NFSv4 callback addr for server to use");
SYSCTL_INT(_vfs_nfs, OID_AUTO, debuglevel, CTLFLAG_RW, &nfscl_debuglevel,
   0, "Debug level for NFS client");
SYSCTL_INT(_vfs_nfs, OID_AUTO, userhashsize, CTLFLAG_RDTUN, &nfsrv_lughashsize,
   0, "Size of hash tables for uid/name mapping");

/*
* Defines for malloc
* (Here for FreeBSD, since they allocate storage.)
*/
MALLOC_DEFINE(M_NEWNFSRVCACHE, "NFSD srvcache", "NFSD Server Request Cache");
MALLOC_DEFINE(M_NEWNFSDCLIENT, "NFSD V4client", "NFSD V4 Client Id");
MALLOC_DEFINE(M_NEWNFSDSTATE, "NFSD V4state",
   "NFSD V4 State (Openowner, Open, Lockowner, Delegation");
MALLOC_DEFINE(M_NEWNFSDLOCK, "NFSD V4lock", "NFSD V4 byte range lock");
MALLOC_DEFINE(M_NEWNFSDLOCKFILE, "NFSD lckfile", "NFSD Open/Lock file");
MALLOC_DEFINE(M_NEWNFSSTRING, "NFSD string", "NFSD V4 long string");
MALLOC_DEFINE(M_NEWNFSUSERGROUP, "NFSD usrgroup", "NFSD V4 User/group map");
MALLOC_DEFINE(M_NEWNFSDREQ, "NFS req", "NFS request header");
MALLOC_DEFINE(M_NEWNFSFH, "NFS fh", "NFS file handle");
MALLOC_DEFINE(M_NEWNFSCLOWNER, "NFSCL owner", "NFSCL Open Owner");
MALLOC_DEFINE(M_NEWNFSCLOPEN, "NFSCL open", "NFSCL Open");
MALLOC_DEFINE(M_NEWNFSCLDELEG, "NFSCL deleg", "NFSCL Delegation");
MALLOC_DEFINE(M_NEWNFSCLCLIENT, "NFSCL client", "NFSCL Client");
MALLOC_DEFINE(M_NEWNFSCLLOCKOWNER, "NFSCL lckown", "NFSCL Lock Owner");
MALLOC_DEFINE(M_NEWNFSCLLOCK, "NFSCL lck", "NFSCL Lock");
MALLOC_DEFINE(M_NEWNFSV4NODE, "NEWNFSnode", "NFS vnode");
MALLOC_DEFINE(M_NEWNFSDIRECTIO, "NEWdirectio", "NFS Direct IO buffer");
MALLOC_DEFINE(M_NEWNFSDIROFF, "NFSCL diroffdiroff",
   "NFS directory offset data");
MALLOC_DEFINE(M_NEWNFSDROLLBACK, "NFSD rollback",
   "NFS local lock rollback");
MALLOC_DEFINE(M_NEWNFSLAYOUT, "NFSCL layout", "NFSv4.1 Layout");
MALLOC_DEFINE(M_NEWNFSFLAYOUT, "NFSCL flayout", "NFSv4.1 File Layout");
MALLOC_DEFINE(M_NEWNFSDEVINFO, "NFSCL devinfo", "NFSv4.1 Device Info");
MALLOC_DEFINE(M_NEWNFSSOCKREQ, "NFSCL sockreq", "NFS Sock Req");
MALLOC_DEFINE(M_NEWNFSCLDS, "NFSCL session", "NFSv4.1 Session");
MALLOC_DEFINE(M_NEWNFSLAYRECALL, "NFSCL layrecall", "NFSv4.1 Layout Recall");
MALLOC_DEFINE(M_NEWNFSDSESSION, "NFSD session", "NFSD Session for a client");

/*
* Definition of mutex locks.
* newnfsd_mtx is used in nfsrvd_nfsd() to protect the nfs socket list
* and assorted other nfsd structures.
*/
struct mtx newnfsd_mtx;
struct mtx nfs_sockl_mutex;
struct mtx nfs_state_mutex;
struct mtx nfs_nameid_mutex;
struct mtx nfs_req_mutex;
struct mtx nfs_slock_mutex;

/* local functions */
static int nfssvc_call(struct thread *, struct nfssvc_args *, struct ucred *);

#ifdef __NO_STRICT_ALIGNMENT
/*
* These architectures don't need re-alignment, so just return.
*/
int
newnfs_realign(struct mbuf **pm, int how)
{

       return (0);
}
#else   /* !__NO_STRICT_ALIGNMENT */
/*
*      newnfs_realign:
*
*      Check for badly aligned mbuf data and realign by copying the unaligned
*      portion of the data into a new mbuf chain and freeing the portions
*      of the old chain that were replaced.
*
*      We cannot simply realign the data within the existing mbuf chain
*      because the underlying buffers may contain other rpc commands and
*      we cannot afford to overwrite them.
*
*      We would prefer to avoid this situation entirely.  The situation does
*      not occur with NFS/UDP and is supposed to only occasionally occur
*      with TCP.  Use vfs.nfs.realign_count and realign_test to check this.
*
*/
int
newnfs_realign(struct mbuf **pm, int how)
{
       struct mbuf *m, *n;
       int off, space;

       ++nfs_realign_test;
       while ((m = *pm) != NULL) {
               if ((m->m_len & 0x3) || (mtod(m, intptr_t) & 0x3)) {
                       /*
                        * NB: we can't depend on m_pkthdr.len to help us
                        * decide what to do here.  May not be worth doing
                        * the m_length calculation as m_copyback will
                        * expand the mbuf chain below as needed.
                        */
                       space = m_length(m, NULL);
                       if (space >= MINCLSIZE) {
                               /* NB: m_copyback handles space > MCLBYTES */
                               n = m_getcl(how, MT_DATA, 0);
                       } else
                               n = m_get(how, MT_DATA);
                       if (n == NULL)
                               return (ENOMEM);
                       /*
                        * Align the remainder of the mbuf chain.
                        */
                       n->m_len = 0;
                       off = 0;
                       while (m != NULL) {
                               m_copyback(n, off, m->m_len, mtod(m, caddr_t));
                               off += m->m_len;
                               m = m->m_next;
                       }
                       m_freem(*pm);
                       *pm = n;
                       ++nfs_realign_count;
                       break;
               }
               pm = &m->m_next;
       }

       return (0);
}
#endif  /* __NO_STRICT_ALIGNMENT */

#ifdef notdef
static void
nfsrv_object_create(struct vnode *vp, struct thread *td)
{

       if (vp == NULL || vp->v_type != VREG)
               return;
       (void) vfs_object_create(vp, td, td->td_ucred);
}
#endif

/*
* Look up a file name. Basically just initialize stuff and call namei().
*/
int
nfsrv_lookupfilename(struct nameidata *ndp, char *fname, NFSPROC_T *p)
{
       int error;

       NDINIT(ndp, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE, fname,
           p);
       error = namei(ndp);
       if (!error) {
               NDFREE(ndp, NDF_ONLY_PNBUF);
       }
       return (error);
}

/*
* Copy NFS uid, gids to the cred structure.
*/
void
newnfs_copycred(struct nfscred *nfscr, struct ucred *cr)
{

       KASSERT(nfscr->nfsc_ngroups >= 0,
           ("newnfs_copycred: negative nfsc_ngroups"));
       cr->cr_uid = nfscr->nfsc_uid;
       crsetgroups(cr, nfscr->nfsc_ngroups, nfscr->nfsc_groups);
}

/*
* Map args from nfsmsleep() to msleep().
*/
int
nfsmsleep(void *chan, void *mutex, int prio, const char *wmesg,
   struct timespec *ts)
{
       u_int64_t nsecval;
       int error, timeo;

       if (ts) {
               timeo = hz * ts->tv_sec;
               nsecval = (u_int64_t)ts->tv_nsec;
               nsecval = ((nsecval * ((u_int64_t)hz)) + 500000000) /
                   1000000000;
               timeo += (int)nsecval;
       } else {
               timeo = 0;
       }
       error = msleep(chan, (struct mtx *)mutex, prio, wmesg, timeo);
       return (error);
}

/*
* Get the file system info for the server. For now, just assume FFS.
*/
void
nfsvno_getfs(struct nfsfsinfo *sip, int isdgram)
{
       int pref;

       /*
        * XXX
        * There should be file system VFS OP(s) to get this information.
        * For now, assume ufs.
        */
       if (isdgram)
               pref = NFS_MAXDGRAMDATA;
       else
               pref = NFS_SRVMAXIO;
       sip->fs_rtmax = NFS_SRVMAXIO;
       sip->fs_rtpref = pref;
       sip->fs_rtmult = NFS_FABLKSIZE;
       sip->fs_wtmax = NFS_SRVMAXIO;
       sip->fs_wtpref = pref;
       sip->fs_wtmult = NFS_FABLKSIZE;
       sip->fs_dtpref = pref;
       sip->fs_maxfilesize = 0xffffffffffffffffull;
       sip->fs_timedelta.tv_sec = 0;
       sip->fs_timedelta.tv_nsec = 1;
       sip->fs_properties = (NFSV3FSINFO_LINK |
           NFSV3FSINFO_SYMLINK | NFSV3FSINFO_HOMOGENEOUS |
           NFSV3FSINFO_CANSETTIME);
}

/*
* Do the pathconf vnode op.
*/
int
nfsvno_pathconf(struct vnode *vp, int flag, register_t *retf,
   struct ucred *cred, struct thread *p)
{
       int error;

       error = VOP_PATHCONF(vp, flag, retf);
       if (error == EOPNOTSUPP || error == EINVAL) {
               /*
                * Some file systems return EINVAL for name arguments not
                * supported and some return EOPNOTSUPP for this case.
                * So the NFSv3 Pathconf RPC doesn't fail for these cases,
                * just fake them.
                */
               switch (flag) {
               case _PC_LINK_MAX:
                       *retf = LINK_MAX;
                       break;
               case _PC_NAME_MAX:
                       *retf = NAME_MAX;
                       break;
               case _PC_CHOWN_RESTRICTED:
                       *retf = 1;
                       break;
               case _PC_NO_TRUNC:
                       *retf = 1;
                       break;
               default:
                       /*
                        * Only happens if a _PC_xxx is added to the server,
                        * but this isn't updated.
                        */
                       *retf = 0;
                       printf("nfsrvd pathconf flag=%d not supp\n", flag);
               }
               error = 0;
       }
       NFSEXITCODE(error);
       return (error);
}

/* Fake nfsrv_atroot. Just return 0 */
int
nfsrv_atroot(struct vnode *vp, long *retp)
{

       return (0);
}

/*
* Set the credentials to refer to root.
* If only the various BSDen could agree on whether cr_gid is a separate
* field or cr_groups[0]...
*/
void
newnfs_setroot(struct ucred *cred)
{

       cred->cr_uid = 0;
       cred->cr_groups[0] = 0;
       cred->cr_ngroups = 1;
}

/*
* Get the client credential. Used for Renew and recovery.
*/
struct ucred *
newnfs_getcred(void)
{
       struct ucred *cred;
       struct thread *td = curthread;

       cred = crdup(td->td_ucred);
       newnfs_setroot(cred);
       return (cred);
}

/*
* Nfs timer routine
* Call the nfsd's timer function once/sec.
*/
void
newnfs_timer(void *arg)
{
       static time_t lasttime = 0;
       /*
        * Call the server timer, if set up.
        * The argument indicates if it is the next second and therefore
        * leases should be checked.
        */
       if (lasttime != NFSD_MONOSEC) {
               lasttime = NFSD_MONOSEC;
               if (nfsd_call_servertimer != NULL)
                       (*nfsd_call_servertimer)();
       }
       callout_reset(&newnfsd_callout, nfscl_ticks, newnfs_timer, NULL);
}


/*
* Sleep for a short period of time unless errval == NFSERR_GRACE, where
* the sleep should be for 5 seconds.
* Since lbolt doesn't exist in FreeBSD-CURRENT, just use a timeout on
* an event that never gets a wakeup. Only return EINTR or 0.
*/
int
nfs_catnap(int prio, int errval, const char *wmesg)
{
       static int non_event;
       int ret;

       if (errval == NFSERR_GRACE)
               ret = tsleep(&non_event, prio, wmesg, 5 * hz);
       else
               ret = tsleep(&non_event, prio, wmesg, 1);
       if (ret != EINTR)
               ret = 0;
       return (ret);
}

/*
* Get referral. For now, just fail.
*/
struct nfsreferral *
nfsv4root_getreferral(struct vnode *vp, struct vnode *dvp, u_int32_t fileno)
{

       return (NULL);
}

static int
nfssvc_nfscommon(struct thread *td, struct nfssvc_args *uap)
{
       int error;

       error = nfssvc_call(td, uap, td->td_ucred);
       NFSEXITCODE(error);
       return (error);
}

static int
nfssvc_call(struct thread *p, struct nfssvc_args *uap, struct ucred *cred)
{
       int error = EINVAL, i, j;
       struct nfsd_idargs nid;
       struct nfsd_oidargs onid;
       struct {
               int vers;       /* Just the first field of nfsstats. */
       } nfsstatver;

       if (uap->flag & NFSSVC_IDNAME) {
               if ((uap->flag & NFSSVC_NEWSTRUCT) != 0)
                       error = copyin(uap->argp, &nid, sizeof(nid));
               else {
                       error = copyin(uap->argp, &onid, sizeof(onid));
                       if (error == 0) {
                               nid.nid_flag = onid.nid_flag;
                               nid.nid_uid = onid.nid_uid;
                               nid.nid_gid = onid.nid_gid;
                               nid.nid_usermax = onid.nid_usermax;
                               nid.nid_usertimeout = onid.nid_usertimeout;
                               nid.nid_name = onid.nid_name;
                               nid.nid_namelen = onid.nid_namelen;
                               nid.nid_ngroup = 0;
                               nid.nid_grps = NULL;
                       }
               }
               if (error)
                       goto out;
               error = nfssvc_idname(&nid);
               goto out;
       } else if (uap->flag & NFSSVC_GETSTATS) {
               if ((uap->flag & NFSSVC_NEWSTRUCT) == 0) {
                       /* Copy fields to the old ext_nfsstat structure. */
                       oldnfsstats.attrcache_hits =
                           nfsstatsv1.attrcache_hits;
                       oldnfsstats.attrcache_misses =
                           nfsstatsv1.attrcache_misses;
                       oldnfsstats.lookupcache_hits =
                           nfsstatsv1.lookupcache_hits;
                       oldnfsstats.lookupcache_misses =
                           nfsstatsv1.lookupcache_misses;
                       oldnfsstats.direofcache_hits =
                           nfsstatsv1.direofcache_hits;
                       oldnfsstats.direofcache_misses =
                           nfsstatsv1.direofcache_misses;
                       oldnfsstats.accesscache_hits =
                           nfsstatsv1.accesscache_hits;
                       oldnfsstats.accesscache_misses =
                           nfsstatsv1.accesscache_misses;
                       oldnfsstats.biocache_reads =
                           nfsstatsv1.biocache_reads;
                       oldnfsstats.read_bios =
                           nfsstatsv1.read_bios;
                       oldnfsstats.read_physios =
                           nfsstatsv1.read_physios;
                       oldnfsstats.biocache_writes =
                           nfsstatsv1.biocache_writes;
                       oldnfsstats.write_bios =
                           nfsstatsv1.write_bios;
                       oldnfsstats.write_physios =
                           nfsstatsv1.write_physios;
                       oldnfsstats.biocache_readlinks =
                           nfsstatsv1.biocache_readlinks;
                       oldnfsstats.readlink_bios =
                           nfsstatsv1.readlink_bios;
                       oldnfsstats.biocache_readdirs =
                           nfsstatsv1.biocache_readdirs;
                       oldnfsstats.readdir_bios =
                           nfsstatsv1.readdir_bios;
                       for (i = 0; i < NFSV4_NPROCS; i++)
                               oldnfsstats.rpccnt[i] = nfsstatsv1.rpccnt[i];
                       oldnfsstats.rpcretries = nfsstatsv1.rpcretries;
                       for (i = 0; i < NFSV4OP_NOPS; i++)
                               oldnfsstats.srvrpccnt[i] =
                                   nfsstatsv1.srvrpccnt[i];
                       for (i = NFSV42_NOPS, j = NFSV4OP_NOPS;
                           i < NFSV42_NOPS + NFSV4OP_FAKENOPS; i++, j++)
                               oldnfsstats.srvrpccnt[j] =
                                   nfsstatsv1.srvrpccnt[i];
                       oldnfsstats.srvrpc_errs = nfsstatsv1.srvrpc_errs;
                       oldnfsstats.srv_errs = nfsstatsv1.srv_errs;
                       oldnfsstats.rpcrequests = nfsstatsv1.rpcrequests;
                       oldnfsstats.rpctimeouts = nfsstatsv1.rpctimeouts;
                       oldnfsstats.rpcunexpected = nfsstatsv1.rpcunexpected;
                       oldnfsstats.rpcinvalid = nfsstatsv1.rpcinvalid;
                       oldnfsstats.srvcache_inproghits =
                           nfsstatsv1.srvcache_inproghits;
                       oldnfsstats.srvcache_idemdonehits =
                           nfsstatsv1.srvcache_idemdonehits;
                       oldnfsstats.srvcache_nonidemdonehits =
                           nfsstatsv1.srvcache_nonidemdonehits;
                       oldnfsstats.srvcache_misses =
                           nfsstatsv1.srvcache_misses;
                       oldnfsstats.srvcache_tcppeak =
                           nfsstatsv1.srvcache_tcppeak;
                       oldnfsstats.srvcache_size = nfsstatsv1.srvcache_size;
                       oldnfsstats.srvclients = nfsstatsv1.srvclients;
                       oldnfsstats.srvopenowners = nfsstatsv1.srvopenowners;
                       oldnfsstats.srvopens = nfsstatsv1.srvopens;
                       oldnfsstats.srvlockowners = nfsstatsv1.srvlockowners;
                       oldnfsstats.srvlocks = nfsstatsv1.srvlocks;
                       oldnfsstats.srvdelegates = nfsstatsv1.srvdelegates;
                       for (i = 0; i < NFSV4OP_CBNOPS; i++)
                               oldnfsstats.cbrpccnt[i] =
                                   nfsstatsv1.cbrpccnt[i];
                       oldnfsstats.clopenowners = nfsstatsv1.clopenowners;
                       oldnfsstats.clopens = nfsstatsv1.clopens;
                       oldnfsstats.cllockowners = nfsstatsv1.cllockowners;
                       oldnfsstats.cllocks = nfsstatsv1.cllocks;
                       oldnfsstats.cldelegates = nfsstatsv1.cldelegates;
                       oldnfsstats.cllocalopenowners =
                           nfsstatsv1.cllocalopenowners;
                       oldnfsstats.cllocalopens = nfsstatsv1.cllocalopens;
                       oldnfsstats.cllocallockowners =
                           nfsstatsv1.cllocallockowners;
                       oldnfsstats.cllocallocks = nfsstatsv1.cllocallocks;
                       error = copyout(&oldnfsstats, uap->argp,
                           sizeof (oldnfsstats));
               } else {
                       error = copyin(uap->argp, &nfsstatver,
                           sizeof(nfsstatver));
                       if (error == 0 && nfsstatver.vers != NFSSTATS_V1)
                               error = EPERM;
                       if (error == 0)
                               error = copyout(&nfsstatsv1, uap->argp,
                                   sizeof (nfsstatsv1));
               }
               if (error == 0) {
                       if ((uap->flag & NFSSVC_ZEROCLTSTATS) != 0) {
                               nfsstatsv1.attrcache_hits = 0;
                               nfsstatsv1.attrcache_misses = 0;
                               nfsstatsv1.lookupcache_hits = 0;
                               nfsstatsv1.lookupcache_misses = 0;
                               nfsstatsv1.direofcache_hits = 0;
                               nfsstatsv1.direofcache_misses = 0;
                               nfsstatsv1.accesscache_hits = 0;
                               nfsstatsv1.accesscache_misses = 0;
                               nfsstatsv1.biocache_reads = 0;
                               nfsstatsv1.read_bios = 0;
                               nfsstatsv1.read_physios = 0;
                               nfsstatsv1.biocache_writes = 0;
                               nfsstatsv1.write_bios = 0;
                               nfsstatsv1.write_physios = 0;
                               nfsstatsv1.biocache_readlinks = 0;
                               nfsstatsv1.readlink_bios = 0;
                               nfsstatsv1.biocache_readdirs = 0;
                               nfsstatsv1.readdir_bios = 0;
                               nfsstatsv1.rpcretries = 0;
                               nfsstatsv1.rpcrequests = 0;
                               nfsstatsv1.rpctimeouts = 0;
                               nfsstatsv1.rpcunexpected = 0;
                               nfsstatsv1.rpcinvalid = 0;
                               bzero(nfsstatsv1.rpccnt,
                                   sizeof(nfsstatsv1.rpccnt));
                       }
                       if ((uap->flag & NFSSVC_ZEROSRVSTATS) != 0) {
                               nfsstatsv1.srvrpc_errs = 0;
                               nfsstatsv1.srv_errs = 0;
                               nfsstatsv1.srvcache_inproghits = 0;
                               nfsstatsv1.srvcache_idemdonehits = 0;
                               nfsstatsv1.srvcache_nonidemdonehits = 0;
                               nfsstatsv1.srvcache_misses = 0;
                               nfsstatsv1.srvcache_tcppeak = 0;
                               nfsstatsv1.srvclients = 0;
                               nfsstatsv1.srvopenowners = 0;
                               nfsstatsv1.srvopens = 0;
                               nfsstatsv1.srvlockowners = 0;
                               nfsstatsv1.srvlocks = 0;
                               nfsstatsv1.srvdelegates = 0;
                               nfsstatsv1.clopenowners = 0;
                               nfsstatsv1.clopens = 0;
                               nfsstatsv1.cllockowners = 0;
                               nfsstatsv1.cllocks = 0;
                               nfsstatsv1.cldelegates = 0;
                               nfsstatsv1.cllocalopenowners = 0;
                               nfsstatsv1.cllocalopens = 0;
                               nfsstatsv1.cllocallockowners = 0;
                               nfsstatsv1.cllocallocks = 0;
                               bzero(nfsstatsv1.srvrpccnt,
                                   sizeof(nfsstatsv1.srvrpccnt));
                               bzero(nfsstatsv1.cbrpccnt,
                                   sizeof(nfsstatsv1.cbrpccnt));
                       }
               }
               goto out;
       } else if (uap->flag & NFSSVC_NFSUSERDPORT) {
               u_short sockport;

               error = copyin(uap->argp, (caddr_t)&sockport,
                   sizeof (u_short));
               if (!error)
                       error = nfsrv_nfsuserdport(sockport, p);
       } else if (uap->flag & NFSSVC_NFSUSERDDELPORT) {
               nfsrv_nfsuserddelport();
               error = 0;
       }

out:
       NFSEXITCODE(error);
       return (error);
}

/*
* called by all three modevent routines, so that it gets things
* initialized soon enough.
*/
void
newnfs_portinit(void)
{
       static int inited = 0;

       if (inited)
               return;
       inited = 1;
       /* Initialize SMP locks used by both client and server. */
       mtx_init(&newnfsd_mtx, "newnfsd_mtx", NULL, MTX_DEF);
       mtx_init(&nfs_state_mutex, "nfs_state_mutex", NULL, MTX_DEF);
}

/*
* Determine if the file system supports NFSv4 ACLs.
* Return 1 if it does, 0 otherwise.
*/
int
nfs_supportsnfsv4acls(struct vnode *vp)
{
       int error;
       register_t retval;

       ASSERT_VOP_LOCKED(vp, "nfs supports nfsv4acls");

       if (nfsrv_useacl == 0)
               return (0);
       error = VOP_PATHCONF(vp, _PC_ACL_NFS4, &retval);
       if (error == 0 && retval != 0)
               return (1);
       return (0);
}

extern int (*nfsd_call_nfscommon)(struct thread *, struct nfssvc_args *);

/*
* Called once to initialize data structures...
*/
static int
nfscommon_modevent(module_t mod, int type, void *data)
{
       int error = 0;
       static int loaded = 0;

       switch (type) {
       case MOD_LOAD:
               if (loaded)
                       goto out;
               newnfs_portinit();
               mtx_init(&nfs_nameid_mutex, "nfs_nameid_mutex", NULL, MTX_DEF);
               mtx_init(&nfs_sockl_mutex, "nfs_sockl_mutex", NULL, MTX_DEF);
               mtx_init(&nfs_slock_mutex, "nfs_slock_mutex", NULL, MTX_DEF);
               mtx_init(&nfs_req_mutex, "nfs_req_mutex", NULL, MTX_DEF);
               mtx_init(&nfsrv_nfsuserdsock.nr_mtx, "nfsuserd", NULL,
                   MTX_DEF);
               callout_init(&newnfsd_callout, 1);
               newnfs_init();
               nfsd_call_nfscommon = nfssvc_nfscommon;
               loaded = 1;
               break;

       case MOD_UNLOAD:
               if (newnfs_numnfsd != 0 || nfsrv_nfsuserd != 0 ||
                   nfs_numnfscbd != 0) {
                       error = EBUSY;
                       break;
               }

               nfsd_call_nfscommon = NULL;
               callout_drain(&newnfsd_callout);
               /* Clean out the name<-->id cache. */
               nfsrv_cleanusergroup();
               /* and get rid of the mutexes */
               mtx_destroy(&nfs_nameid_mutex);
               mtx_destroy(&newnfsd_mtx);
               mtx_destroy(&nfs_state_mutex);
               mtx_destroy(&nfs_sockl_mutex);
               mtx_destroy(&nfs_slock_mutex);
               mtx_destroy(&nfs_req_mutex);
               mtx_destroy(&nfsrv_nfsuserdsock.nr_mtx);
               loaded = 0;
               break;
       default:
               error = EOPNOTSUPP;
               break;
       }

out:
       NFSEXITCODE(error);
       return error;
}
static moduledata_t nfscommon_mod = {
       "nfscommon",
       nfscommon_modevent,
       NULL,
};
DECLARE_MODULE(nfscommon, nfscommon_mod, SI_SUB_VFS, SI_ORDER_ANY);

/* So that loader and kldload(2) can find us, wherever we are.. */
MODULE_VERSION(nfscommon, 1);
MODULE_DEPEND(nfscommon, nfssvc, 1, 1, 1);
MODULE_DEPEND(nfscommon, krpc, 1, 1, 1);