sys/fs/nfs/nfs_commonport.c

   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  * 4. Neither the name of the University nor the names of its contributors
  17  *    may be used to endorse or promote products derived from this software
  18  *    without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30  * SUCH DAMAGE.
  31  *
  32  */
  33
  34 #include <sys/cdefs.h>
  35 __FBSDID("$FreeBSD$");
  36
  37 /*
  38  * Functions that need to be different for different versions of BSD
  39  * kernel should be kept here, along with any global storage specific
  40  * to this BSD variant.
  41  */
  42 #include <fs/nfs/nfsport.h>
  43 #include <sys/sysctl.h>
  44 #include <vm/vm.h>
  45 #include <vm/vm_object.h>
  46 #include <vm/vm_page.h>
  47 #include <vm/vm_param.h>
  48 #include <vm/vm_map.h>
  49 #include <vm/vm_kern.h>
  50 #include <vm/vm_extern.h>
  51 #include <vm/uma.h>
  52
  53 extern int nfscl_ticks;
  54 extern int nfsrv_nfsuserd;
  55 extern struct nfssockreq nfsrv_nfsuserdsock;
  56 extern void (*nfsd_call_recall)(struct vnode *, int, struct ucred *,
  57     struct thread *);
  58 extern int nfsrv_useacl;
  59 struct mount nfsv4root_mnt;
  60 int newnfs_numnfsd = 0;
  61 struct nfsstats newnfsstats;
  62 int nfs_numnfscbd = 0;
  63 int nfscl_debuglevel = 0;
  64 char nfsv4_callbackaddr[INET6_ADDRSTRLEN];
  65 struct callout newnfsd_callout;
  66 void (*nfsd_call_servertimer)(void) = NULL;
  67 void (*ncl_call_invalcaches)(struct vnode *) = NULL;
  68
  69 static int nfs_realign_test;
  70 static int nfs_realign_count;
  71
  72 SYSCTL_NODE(_vfs, OID_AUTO, nfs, CTLFLAG_RW, 0, "New NFS filesystem");
  73 SYSCTL_INT(_vfs_nfs, OID_AUTO, realign_test, CTLFLAG_RW, &nfs_realign_test,
  74     0, "Number of realign tests done");
  75 SYSCTL_INT(_vfs_nfs, OID_AUTO, realign_count, CTLFLAG_RW, &nfs_realign_count,
  76     0, "Number of mbuf realignments done");
  77 SYSCTL_STRING(_vfs_nfs, OID_AUTO, callback_addr, CTLFLAG_RW,
  78     nfsv4_callbackaddr, sizeof(nfsv4_callbackaddr),
  79     "NFSv4 callback addr for server to use");
  80 SYSCTL_INT(_vfs_nfs, OID_AUTO, debuglevel, CTLFLAG_RW, &nfscl_debuglevel,
  81     0, "Debug level for new nfs client");
  82
  83 /*
  84  * Defines for malloc
  85  * (Here for FreeBSD, since they allocate storage.)
  86  */
  87 MALLOC_DEFINE(M_NEWNFSRVCACHE, "NFSD srvcache", "NFSD Server Request Cache");
  88 MALLOC_DEFINE(M_NEWNFSDCLIENT, "NFSD V4client", "NFSD V4 Client Id");
  89 MALLOC_DEFINE(M_NEWNFSDSTATE, "NFSD V4state",
  90     "NFSD V4 State (Openowner, Open, Lockowner, Delegation");
  91 MALLOC_DEFINE(M_NEWNFSDLOCK, "NFSD V4lock", "NFSD V4 byte range lock");
  92 MALLOC_DEFINE(M_NEWNFSDLOCKFILE, "NFSD lckfile", "NFSD Open/Lock file");
  93 MALLOC_DEFINE(M_NEWNFSSTRING, "NFSD string", "NFSD V4 long string");
  94 MALLOC_DEFINE(M_NEWNFSUSERGROUP, "NFSD usrgroup", "NFSD V4 User/group map");
  95 MALLOC_DEFINE(M_NEWNFSDREQ, "NFS req", "NFS request header");
  96 MALLOC_DEFINE(M_NEWNFSFH, "NFS fh", "NFS file handle");
  97 MALLOC_DEFINE(M_NEWNFSCLOWNER, "NFSCL owner", "NFSCL Open Owner");
  98 MALLOC_DEFINE(M_NEWNFSCLOPEN, "NFSCL open", "NFSCL Open");
  99 MALLOC_DEFINE(M_NEWNFSCLDELEG, "NFSCL deleg", "NFSCL Delegation");
 100 MALLOC_DEFINE(M_NEWNFSCLCLIENT, "NFSCL client", "NFSCL Client");
 101 MALLOC_DEFINE(M_NEWNFSCLLOCKOWNER, "NFSCL lckown", "NFSCL Lock Owner");
 102 MALLOC_DEFINE(M_NEWNFSCLLOCK, "NFSCL lck", "NFSCL Lock");
 103 MALLOC_DEFINE(M_NEWNFSV4NODE, "NEWNFSnode", "New nfs vnode");
 104 MALLOC_DEFINE(M_NEWNFSDIRECTIO, "NEWdirectio", "New nfs Direct IO buffer");
 105 MALLOC_DEFINE(M_NEWNFSDIROFF, "NFSCL diroffdiroff",
 106     "New NFS directory offset data");
 107 MALLOC_DEFINE(M_NEWNFSDROLLBACK, "NFSD rollback",
 108     "New NFS local lock rollback");
 109 MALLOC_DEFINE(M_NEWNFSLAYOUT, "NFSCL layout", "NFSv4.1 Layout");
 110 MALLOC_DEFINE(M_NEWNFSFLAYOUT, "NFSCL flayout", "NFSv4.1 File Layout");
 111 MALLOC_DEFINE(M_NEWNFSDEVINFO, "NFSCL devinfo", "NFSv4.1 Device Info");
 112 MALLOC_DEFINE(M_NEWNFSSOCKREQ, "NFSCL sockreq", "NFS Sock Req");
 113 MALLOC_DEFINE(M_NEWNFSCLDS, "NFSCL session", "NFSv4.1 Session");
 114 MALLOC_DEFINE(M_NEWNFSLAYRECALL, "NFSCL layrecall", "NFSv4.1 Layout Recall");
 115
 116 /*
 117  * Definition of mutex locks.
 118  * newnfsd_mtx is used in nfsrvd_nfsd() to protect the nfs socket list
 119  * and assorted other nfsd structures.
 120  */
 121 struct mtx newnfsd_mtx;
 122 struct mtx nfs_sockl_mutex;
 123 struct mtx nfs_state_mutex;
 124 struct mtx nfs_nameid_mutex;
 125 struct mtx nfs_req_mutex;
 126 struct mtx nfs_slock_mutex;
 127
 128 /* local functions */
 129 static int nfssvc_call(struct thread *, struct nfssvc_args *, struct ucred *);
 130
 131 #ifdef __NO_STRICT_ALIGNMENT
 132 /*
 133  * These architectures don't need re-alignment, so just return.
 134  */
 135 int
 136 newnfs_realign(struct mbuf **pm, int how)
 137 {
 138
 139         return (0);
 140 }
 141 #else   /* !__NO_STRICT_ALIGNMENT */
 142 /*
 143  *      newnfs_realign:
 144  *
 145  *      Check for badly aligned mbuf data and realign by copying the unaligned
 146  *      portion of the data into a new mbuf chain and freeing the portions
 147  *      of the old chain that were replaced.
 148  *
 149  *      We cannot simply realign the data within the existing mbuf chain
 150  *      because the underlying buffers may contain other rpc commands and
 151  *      we cannot afford to overwrite them.
 152  *
 153  *      We would prefer to avoid this situation entirely.  The situation does
 154  *      not occur with NFS/UDP and is supposed to only occassionally occur
 155  *      with TCP.  Use vfs.nfs.realign_count and realign_test to check this.
 156  *
 157  */
 158 int
 159 newnfs_realign(struct mbuf **pm, int how)
 160 {
 161         struct mbuf *m, *n;
 162         int off, space;
 163
 164         ++nfs_realign_test;
 165         while ((m = *pm) != NULL) {
 166                 if ((m->m_len & 0x3) || (mtod(m, intptr_t) & 0x3)) {
 167                         /*
 168                          * NB: we can't depend on m_pkthdr.len to help us
 169                          * decide what to do here.  May not be worth doing
 170                          * the m_length calculation as m_copyback will
 171                          * expand the mbuf chain below as needed.
 172                          */
 173                         space = m_length(m, NULL);
 174                         if (space >= MINCLSIZE) {
 175                                 /* NB: m_copyback handles space > MCLBYTES */
 176                                 n = m_getcl(how, MT_DATA, 0);
 177                         } else
 178                                 n = m_get(how, MT_DATA);
 179                         if (n == NULL)
 180                                 return (ENOMEM);
 181                         /*
 182                          * Align the remainder of the mbuf chain.
 183                          */
 184                         n->m_len = 0;
 185                         off = 0;
 186                         while (m != NULL) {
 187                                 m_copyback(n, off, m->m_len, mtod(m, caddr_t));
 188                                 off += m->m_len;
 189                                 m = m->m_next;
 190                         }
 191                         m_freem(*pm);
 192                         *pm = n;
 193                         ++nfs_realign_count;
 194                         break;
 195                 }
 196                 pm = &m->m_next;
 197         }
 198
 199         return (0);
 200 }
 201 #endif  /* __NO_STRICT_ALIGNMENT */
 202
 203 #ifdef notdef
 204 static void
 205 nfsrv_object_create(struct vnode *vp, struct thread *td)
 206 {
 207
 208         if (vp == NULL || vp->v_type != VREG)
 209                 return;
 210         (void) vfs_object_create(vp, td, td->td_ucred);
 211 }
 212 #endif
 213
 214 /*
 215  * Look up a file name. Basically just initialize stuff and call namei().
 216  */
 217 int
 218 nfsrv_lookupfilename(struct nameidata *ndp, char *fname, NFSPROC_T *p)
 219 {
 220         int error;
 221
 222         NDINIT(ndp, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE, fname,
 223             p);
 224         error = namei(ndp);
 225         if (!error) {
 226                 NDFREE(ndp, NDF_ONLY_PNBUF);
 227         }
 228         return (error);
 229 }
 230
 231 /*
 232  * Copy NFS uid, gids to the cred structure.
 233  */
 234 void
 235 newnfs_copycred(struct nfscred *nfscr, struct ucred *cr)
 236 {
 237
 238         KASSERT(nfscr->nfsc_ngroups >= 0,
 239             ("newnfs_copycred: negative nfsc_ngroups"));
 240         cr->cr_uid = nfscr->nfsc_uid;
 241         crsetgroups(cr, nfscr->nfsc_ngroups, nfscr->nfsc_groups);
 242 }
 243
 244 /*
 245  * Map args from nfsmsleep() to msleep().
 246  */
 247 int
 248 nfsmsleep(void *chan, void *mutex, int prio, const char *wmesg,
 249     struct timespec *ts)
 250 {
 251         u_int64_t nsecval;
 252         int error, timeo;
 253
 254         if (ts) {
 255                 timeo = hz * ts->tv_sec;
 256                 nsecval = (u_int64_t)ts->tv_nsec;
 257                 nsecval = ((nsecval * ((u_int64_t)hz)) + 500000000) /
 258                     1000000000;
 259                 timeo += (int)nsecval;
 260         } else {
 261                 timeo = 0;
 262         }
 263         error = msleep(chan, (struct mtx *)mutex, prio, wmesg, timeo);
 264         return (error);
 265 }
 266
 267 /*
 268  * Get the file system info for the server. For now, just assume FFS.
 269  */
 270 void
 271 nfsvno_getfs(struct nfsfsinfo *sip, int isdgram)
 272 {
 273         int pref;
 274
 275         /*
 276          * XXX
 277          * There should be file system VFS OP(s) to get this information.
 278          * For now, assume ufs.
 279          */
 280         if (isdgram)
 281                 pref = NFS_MAXDGRAMDATA;
 282         else
 283                 pref = NFS_MAXDATA;
 284         sip->fs_rtmax = NFS_MAXDATA;
 285         sip->fs_rtpref = pref;
 286         sip->fs_rtmult = NFS_FABLKSIZE;
 287         sip->fs_wtmax = NFS_MAXDATA;
 288         sip->fs_wtpref = pref;
 289         sip->fs_wtmult = NFS_FABLKSIZE;
 290         sip->fs_dtpref = pref;
 291         sip->fs_maxfilesize = 0xffffffffffffffffull;
 292         sip->fs_timedelta.tv_sec = 0;
 293         sip->fs_timedelta.tv_nsec = 1;
 294         sip->fs_properties = (NFSV3FSINFO_LINK |
 295             NFSV3FSINFO_SYMLINK | NFSV3FSINFO_HOMOGENEOUS |
 296             NFSV3FSINFO_CANSETTIME);
 297 }
 298
 299 /*
 300  * Do the pathconf vnode op.
 301  */
 302 int
 303 nfsvno_pathconf(struct vnode *vp, int flag, register_t *retf,
 304     struct ucred *cred, struct thread *p)
 305 {
 306         int error;
 307
 308         error = VOP_PATHCONF(vp, flag, retf);
 309         if (error == EOPNOTSUPP || error == EINVAL) {
 310                 /*
 311                  * Some file systems return EINVAL for name arguments not
 312                  * supported and some return EOPNOTSUPP for this case.
 313                  * So the NFSv3 Pathconf RPC doesn't fail for these cases,
 314                  * just fake them.
 315                  */
 316                 switch (flag) {
 317                 case _PC_LINK_MAX:
 318                         *retf = LINK_MAX;
 319                         break;
 320                 case _PC_NAME_MAX:
 321                         *retf = NAME_MAX;
 322                         break;
 323                 case _PC_CHOWN_RESTRICTED:
 324                         *retf = 1;
 325                         break;
 326                 case _PC_NO_TRUNC:
 327                         *retf = 1;
 328                         break;
 329                 default:
 330                         /*
 331                          * Only happens if a _PC_xxx is added to the server,
 332                          * but this isn't updated.
 333                          */
 334                         *retf = 0;
 335                         printf("nfsrvd pathconf flag=%d not supp\n", flag);
 336                 };
 337                 error = 0;
 338         }
 339         NFSEXITCODE(error);
 340         return (error);
 341 }
 342
 343 /* Fake nfsrv_atroot. Just return 0 */
 344 int
 345 nfsrv_atroot(struct vnode *vp, long *retp)
 346 {
 347
 348         return (0);
 349 }
 350
 351 /*
 352  * Set the credentials to refer to root.
 353  * If only the various BSDen could agree on whether cr_gid is a separate
 354  * field or cr_groups[0]...
 355  */
 356 void
 357 newnfs_setroot(struct ucred *cred)
 358 {
 359
 360         cred->cr_uid = 0;
 361         cred->cr_groups[0] = 0;
 362         cred->cr_ngroups = 1;
 363 }
 364
 365 /*
 366  * Get the client credential. Used for Renew and recovery.
 367  */
 368 struct ucred *
 369 newnfs_getcred(void)
 370 {
 371         struct ucred *cred;
 372         struct thread *td = curthread;
 373
 374         cred = crdup(td->td_ucred);
 375         newnfs_setroot(cred);
 376         return (cred);
 377 }
 378
 379 /*
 380  * Nfs timer routine
 381  * Call the nfsd's timer function once/sec.
 382  */
 383 void
 384 newnfs_timer(void *arg)
 385 {
 386         static time_t lasttime = 0;
 387         /*
 388          * Call the server timer, if set up.
 389          * The argument indicates if it is the next second and therefore
 390          * leases should be checked.
 391          */
 392         if (lasttime != NFSD_MONOSEC) {
 393                 lasttime = NFSD_MONOSEC;
 394                 if (nfsd_call_servertimer != NULL)
 395                         (*nfsd_call_servertimer)();
 396         }
 397         callout_reset(&newnfsd_callout, nfscl_ticks, newnfs_timer, NULL);
 398 }
 399
 400
 401 /*
 402  * Sleep for a short period of time unless errval == NFSERR_GRACE, where
 403  * the sleep should be for 5 seconds.
 404  * Since lbolt doesn't exist in FreeBSD-CURRENT, just use a timeout on
 405  * an event that never gets a wakeup. Only return EINTR or 0.
 406  */
 407 int
 408 nfs_catnap(int prio, int errval, const char *wmesg)
 409 {
 410         static int non_event;
 411         int ret;
 412
 413         if (errval == NFSERR_GRACE)
 414                 ret = tsleep(&non_event, prio, wmesg, 5 * hz);
 415         else
 416                 ret = tsleep(&non_event, prio, wmesg, 1);
 417         if (ret != EINTR)
 418                 ret = 0;
 419         return (ret);
 420 }
 421
 422 /*
 423  * Get referral. For now, just fail.
 424  */
 425 struct nfsreferral *
 426 nfsv4root_getreferral(struct vnode *vp, struct vnode *dvp, u_int32_t fileno)
 427 {
 428
 429         return (NULL);
 430 }
 431
 432 static int
 433 nfssvc_nfscommon(struct thread *td, struct nfssvc_args *uap)
 434 {
 435         int error;
 436
 437         error = nfssvc_call(td, uap, td->td_ucred);
 438         NFSEXITCODE(error);
 439         return (error);
 440 }
 441
 442 static int
 443 nfssvc_call(struct thread *p, struct nfssvc_args *uap, struct ucred *cred)
 444 {
 445         int error = EINVAL;
 446         struct nfsd_idargs nid;
 447
 448         if (uap->flag & NFSSVC_IDNAME) {
 449                 error = copyin(uap->argp, (caddr_t)&nid, sizeof (nid));
 450                 if (error)
 451                         goto out;
 452                 error = nfssvc_idname(&nid);
 453                 goto out;
 454         } else if (uap->flag & NFSSVC_GETSTATS) {
 455                 error = copyout(&newnfsstats,
 456                     CAST_USER_ADDR_T(uap->argp), sizeof (newnfsstats));
 457                 if (error == 0) {
 458                         if ((uap->flag & NFSSVC_ZEROCLTSTATS) != 0) {
 459                                 newnfsstats.attrcache_hits = 0;
 460                                 newnfsstats.attrcache_misses = 0;
 461                                 newnfsstats.lookupcache_hits = 0;
 462                                 newnfsstats.lookupcache_misses = 0;
 463                                 newnfsstats.direofcache_hits = 0;
 464                                 newnfsstats.direofcache_misses = 0;
 465                                 newnfsstats.accesscache_hits = 0;
 466                                 newnfsstats.accesscache_misses = 0;
 467                                 newnfsstats.biocache_reads = 0;
 468                                 newnfsstats.read_bios = 0;
 469                                 newnfsstats.read_physios = 0;
 470                                 newnfsstats.biocache_writes = 0;
 471                                 newnfsstats.write_bios = 0;
 472                                 newnfsstats.write_physios = 0;
 473                                 newnfsstats.biocache_readlinks = 0;
 474                                 newnfsstats.readlink_bios = 0;
 475                                 newnfsstats.biocache_readdirs = 0;
 476                                 newnfsstats.readdir_bios = 0;
 477                                 newnfsstats.rpcretries = 0;
 478                                 newnfsstats.rpcrequests = 0;
 479                                 newnfsstats.rpctimeouts = 0;
 480                                 newnfsstats.rpcunexpected = 0;
 481                                 newnfsstats.rpcinvalid = 0;
 482                                 bzero(newnfsstats.rpccnt,
 483                                     sizeof(newnfsstats.rpccnt));
 484                         }
 485                         if ((uap->flag & NFSSVC_ZEROSRVSTATS) != 0) {
 486                                 newnfsstats.srvrpc_errs = 0;
 487                                 newnfsstats.srv_errs = 0;
 488                                 newnfsstats.srvcache_inproghits = 0;
 489                                 newnfsstats.srvcache_idemdonehits = 0;
 490                                 newnfsstats.srvcache_nonidemdonehits = 0;
 491                                 newnfsstats.srvcache_misses = 0;
 492                                 newnfsstats.srvcache_tcppeak = 0;
 493                                 newnfsstats.srvclients = 0;
 494                                 newnfsstats.srvopenowners = 0;
 495                                 newnfsstats.srvopens = 0;
 496                                 newnfsstats.srvlockowners = 0;
 497                                 newnfsstats.srvlocks = 0;
 498                                 newnfsstats.srvdelegates = 0;
 499                                 newnfsstats.clopenowners = 0;
 500                                 newnfsstats.clopens = 0;
 501                                 newnfsstats.cllockowners = 0;
 502                                 newnfsstats.cllocks = 0;
 503                                 newnfsstats.cldelegates = 0;
 504                                 newnfsstats.cllocalopenowners = 0;
 505                                 newnfsstats.cllocalopens = 0;
 506                                 newnfsstats.cllocallockowners = 0;
 507                                 newnfsstats.cllocallocks = 0;
 508                                 bzero(newnfsstats.srvrpccnt,
 509                                     sizeof(newnfsstats.srvrpccnt));
 510                                 bzero(newnfsstats.cbrpccnt,
 511                                     sizeof(newnfsstats.cbrpccnt));
 512                         }
 513                 }
 514                 goto out;
 515         } else if (uap->flag & NFSSVC_NFSUSERDPORT) {
 516                 u_short sockport;
 517
 518                 error = copyin(uap->argp, (caddr_t)&sockport,
 519                     sizeof (u_short));
 520                 if (!error)
 521                         error = nfsrv_nfsuserdport(sockport, p);
 522         } else if (uap->flag & NFSSVC_NFSUSERDDELPORT) {
 523                 nfsrv_nfsuserddelport();
 524                 error = 0;
 525         }
 526
 527 out:
 528         NFSEXITCODE(error);
 529         return (error);
 530 }
 531
 532 /*
 533  * called by all three modevent routines, so that it gets things
 534  * initialized soon enough.
 535  */
 536 void
 537 newnfs_portinit(void)
 538 {
 539         static int inited = 0;
 540
 541         if (inited)
 542                 return;
 543         inited = 1;
 544         /* Initialize SMP locks used by both client and server. */
 545         mtx_init(&newnfsd_mtx, "newnfsd_mtx", NULL, MTX_DEF);
 546         mtx_init(&nfs_state_mutex, "nfs_state_mutex", NULL, MTX_DEF);
 547 }
 548
 549 /*
 550  * Determine if the file system supports NFSv4 ACLs.
 551  * Return 1 if it does, 0 otherwise.
 552  */
 553 int
 554 nfs_supportsnfsv4acls(struct vnode *vp)
 555 {
 556         int error;
 557         register_t retval;
 558
 559         ASSERT_VOP_LOCKED(vp, "nfs supports nfsv4acls");
 560
 561         if (nfsrv_useacl == 0)
 562                 return (0);
 563         error = VOP_PATHCONF(vp, _PC_ACL_NFS4, &retval);
 564         if (error == 0 && retval != 0)
 565                 return (1);
 566         return (0);
 567 }
 568
 569 extern int (*nfsd_call_nfscommon)(struct thread *, struct nfssvc_args *);
 570
 571 /*
 572  * Called once to initialize data structures...
 573  */
 574 static int
 575 nfscommon_modevent(module_t mod, int type, void *data)
 576 {
 577         int error = 0;
 578         static int loaded = 0;
 579
 580         switch (type) {
 581         case MOD_LOAD:
 582                 if (loaded)
 583                         goto out;
 584                 newnfs_portinit();
 585                 mtx_init(&nfs_nameid_mutex, "nfs_nameid_mutex", NULL, MTX_DEF);
 586                 mtx_init(&nfs_sockl_mutex, "nfs_sockl_mutex", NULL, MTX_DEF);
 587                 mtx_init(&nfs_slock_mutex, "nfs_slock_mutex", NULL, MTX_DEF);
 588                 mtx_init(&nfs_req_mutex, "nfs_req_mutex", NULL, MTX_DEF);
 589                 mtx_init(&nfsrv_nfsuserdsock.nr_mtx, "nfsuserd", NULL,
 590                     MTX_DEF);
 591                 callout_init(&newnfsd_callout, CALLOUT_MPSAFE);
 592                 newnfs_init();
 593                 nfsd_call_nfscommon = nfssvc_nfscommon;
 594                 loaded = 1;
 595                 break;
 596
 597         case MOD_UNLOAD:
 598                 if (newnfs_numnfsd != 0 || nfsrv_nfsuserd != 0 ||
 599                     nfs_numnfscbd != 0) {
 600                         error = EBUSY;
 601                         break;
 602                 }
 603
 604                 nfsd_call_nfscommon = NULL;
 605                 callout_drain(&newnfsd_callout);
 606                 /* and get rid of the mutexes */
 607                 mtx_destroy(&nfs_nameid_mutex);
 608                 mtx_destroy(&newnfsd_mtx);
 609                 mtx_destroy(&nfs_state_mutex);
 610                 mtx_destroy(&nfs_sockl_mutex);
 611                 mtx_destroy(&nfs_slock_mutex);
 612                 mtx_destroy(&nfs_req_mutex);
 613                 mtx_destroy(&nfsrv_nfsuserdsock.nr_mtx);
 614                 loaded = 0;
 615                 break;
 616         default:
 617                 error = EOPNOTSUPP;
 618                 break;
 619         }
 620
 621 out:
 622         NFSEXITCODE(error);
 623         return error;
 624 }
 625 static moduledata_t nfscommon_mod = {
 626         "nfscommon",
 627         nfscommon_modevent,
 628         NULL,
 629 };
 630 DECLARE_MODULE(nfscommon, nfscommon_mod, SI_SUB_VFS, SI_ORDER_ANY);
 631
 632 /* So that loader and kldload(2) can find us, wherever we are.. */
 633 MODULE_VERSION(nfscommon, 1);
 634 MODULE_DEPEND(nfscommon, nfssvc, 1, 1, 1);
 635 MODULE_DEPEND(nfscommon, krpc, 1, 1, 1);
 636