nfs_syscalls.c revision 1.15 1 /* $NetBSD: nfs_syscalls.c,v 1.15 1995/09/19 21:50:15 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1989, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Rick Macklem at The University of Guelph.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 *
38 * @(#)nfs_syscalls.c 8.3 (Berkeley) 1/4/94
39 */
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/kernel.h>
44 #include <sys/file.h>
45 #include <sys/stat.h>
46 #include <sys/vnode.h>
47 #include <sys/mount.h>
48 #include <sys/proc.h>
49 #include <sys/uio.h>
50 #include <sys/malloc.h>
51 #include <sys/buf.h>
52 #include <sys/mbuf.h>
53 #include <sys/socket.h>
54 #include <sys/socketvar.h>
55 #include <sys/domain.h>
56 #include <sys/protosw.h>
57 #include <sys/namei.h>
58 #include <sys/syslog.h>
59
60 #include <sys/syscallargs.h>
61
62 #include <netinet/in.h>
63 #include <netinet/tcp.h>
64 #ifdef ISO
65 #include <netiso/iso.h>
66 #endif
67 #include <nfs/rpcv2.h>
68 #include <nfs/nfsv2.h>
69 #include <nfs/nfs.h>
70 #include <nfs/nfsrvcache.h>
71 #include <nfs/nfsmount.h>
72 #include <nfs/nfsnode.h>
73 #include <nfs/nqnfs.h>
74 #include <nfs/nfsrtt.h>
75
76 /* Global defs. */
77 extern u_long nfs_prog, nfs_vers;
78 extern int (*nfsrv_procs[NFS_NPROCS])();
79 extern struct proc *nfs_iodwant[NFS_MAXASYNCDAEMON];
80 extern int nfs_numasync;
81 extern time_t nqnfsstarttime;
82 extern int nqsrv_writeslack;
83 extern int nfsrtton;
84 struct nfssvc_sock *nfs_udpsock, *nfs_cltpsock;
85 int nuidhash_max = NFS_MAXUIDHASH;
86 static int nfs_numnfsd = 0;
87 int nfsd_waiting = 0;
88 static int notstarted = 1;
89 static int modify_flag = 0;
90 static struct nfsdrt nfsdrt;
91 void nfsrv_cleancache(), nfsrv_rcv(), nfsrv_wakenfsd(), nfs_sndunlock();
92 static void nfsd_rt();
93 void nfsrv_slpderef(), nfsrv_init();
94
95 #define TRUE 1
96 #define FALSE 0
97
98 static int nfs_asyncdaemon[NFS_MAXASYNCDAEMON];
99 /*
100 * NFS server system calls
101 * getfh() lives here too, but maybe should move to kern/vfs_syscalls.c
102 */
103
104 /*
105 * Get file handle system call
106 */
107 getfh(p, v, retval)
108 struct proc *p;
109 void *v;
110 register_t *retval;
111 {
112 register struct getfh_args /* {
113 syscallarg(char *) fname;
114 syscallarg(fhandle_t *) fhp;
115 } */ *uap = v;
116 register struct vnode *vp;
117 fhandle_t fh;
118 int error;
119 struct nameidata nd;
120
121 /*
122 * Must be super user
123 */
124 if (error = suser(p->p_ucred, &p->p_acflag))
125 return (error);
126 NDINIT(&nd, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE,
127 SCARG(uap, fname), p);
128 if (error = namei(&nd))
129 return (error);
130 vp = nd.ni_vp;
131 bzero((caddr_t)&fh, sizeof(fh));
132 fh.fh_fsid = vp->v_mount->mnt_stat.f_fsid;
133 error = VFS_VPTOFH(vp, &fh.fh_fid);
134 vput(vp);
135 if (error)
136 return (error);
137 error = copyout((caddr_t)&fh, (caddr_t)SCARG(uap, fhp), sizeof (fh));
138 return (error);
139 }
140
141 /*
142 * Nfs server psuedo system call for the nfsd's
143 * Based on the flag value it either:
144 * - adds a socket to the selection list
145 * - remains in the kernel as an nfsd
146 * - remains in the kernel as an nfsiod
147 */
148 nfssvc(p, v, retval)
149 struct proc *p;
150 void *v;
151 register_t *retval;
152 {
153 register struct nfssvc_args /* {
154 syscallarg(int) flag;
155 syscallarg(caddr_t) argp;
156 } */ *uap = v;
157 struct nameidata nd;
158 struct file *fp;
159 struct mbuf *nam;
160 struct nfsd_args nfsdarg;
161 struct nfsd_srvargs nfsd_srvargs, *nsd = &nfsd_srvargs;
162 struct nfsd_cargs ncd;
163 struct nfsd *nfsd;
164 struct nfssvc_sock *slp;
165 struct nfsuid *nuidp, **nuh;
166 struct nfsmount *nmp;
167 int error;
168
169 /*
170 * Must be super user
171 */
172 if (error = suser(p->p_ucred, &p->p_acflag))
173 return (error);
174 while (nfssvc_sockhead_flag & SLP_INIT) {
175 nfssvc_sockhead_flag |= SLP_WANTINIT;
176 (void) tsleep((caddr_t)&nfssvc_sockhead, PSOCK, "nfsd init", 0);
177 }
178 if (SCARG(uap, flag) & NFSSVC_BIOD) {
179 #ifndef NFSCLIENT
180 error = ENOSYS;
181 #else /* !NFSCLIENT */
182 error = nfssvc_iod(p);
183 #endif /* !NFSCLIENT */
184 } else if (SCARG(uap, flag) & NFSSVC_MNTD) {
185 #ifndef NFSCLIENT
186 error = ENOSYS;
187 #else /* !NFSCLIENT */
188 if (error =
189 copyin(SCARG(uap, argp), (caddr_t)&ncd, sizeof (ncd)))
190 return (error);
191 NDINIT(&nd, LOOKUP, FOLLOW | LOCKLEAF, UIO_USERSPACE,
192 ncd.ncd_dirp, p);
193 if (error = namei(&nd))
194 return (error);
195 if ((nd.ni_vp->v_flag & VROOT) == 0)
196 error = EINVAL;
197 nmp = VFSTONFS(nd.ni_vp->v_mount);
198 vput(nd.ni_vp);
199 if (error)
200 return (error);
201 if ((nmp->nm_flag & NFSMNT_MNTD) &&
202 (SCARG(uap, flag) & NFSSVC_GOTAUTH) == 0)
203 return (0);
204 nmp->nm_flag |= NFSMNT_MNTD;
205 error = nqnfs_clientd(nmp, p->p_ucred, &ncd, SCARG(uap, flag),
206 SCARG(uap, argp), p);
207 #endif /* !NFSCLIENT */
208 } else if (SCARG(uap, flag) & NFSSVC_ADDSOCK) {
209 #ifndef NFSSERVER
210 error = ENOSYS;
211 #else /* !NFSSERVER */
212 if (error = copyin(SCARG(uap, argp), (caddr_t)&nfsdarg,
213 sizeof(nfsdarg)))
214 return (error);
215 if (error = getsock(p->p_fd, nfsdarg.sock, &fp))
216 return (error);
217 /*
218 * Get the client address for connected sockets.
219 */
220 if (nfsdarg.name == NULL || nfsdarg.namelen == 0)
221 nam = (struct mbuf *)0;
222 else if (error = sockargs(&nam, nfsdarg.name, nfsdarg.namelen,
223 MT_SONAME))
224 return (error);
225 error = nfssvc_addsock(fp, nam);
226 #endif /* !NFSSERVER */
227 } else {
228 #ifndef NFSSERVER
229 error = ENOSYS;
230 #else /* !NFSSERVER */
231 if (error = copyin(SCARG(uap, argp), (caddr_t)nsd,
232 sizeof (*nsd)))
233 return (error);
234 if ((SCARG(uap, flag) & NFSSVC_AUTHIN) &&
235 (nfsd = nsd->nsd_nfsd) &&
236 (nfsd->nd_slp->ns_flag & SLP_VALID)) {
237 slp = nfsd->nd_slp;
238
239 /*
240 * First check to see if another nfsd has already
241 * added this credential.
242 */
243 for (nuidp = NUIDHASH(slp, nsd->nsd_uid)->lh_first;
244 nuidp != 0; nuidp = nuidp->nu_hash.le_next) {
245 if (nuidp->nu_uid == nsd->nsd_uid)
246 break;
247 }
248 if (nuidp == 0) {
249 /*
250 * Nope, so we will.
251 */
252 if (slp->ns_numuids < nuidhash_max) {
253 slp->ns_numuids++;
254 nuidp = (struct nfsuid *)
255 malloc(sizeof (struct nfsuid), M_NFSUID,
256 M_WAITOK);
257 } else
258 nuidp = (struct nfsuid *)0;
259 if ((slp->ns_flag & SLP_VALID) == 0) {
260 if (nuidp)
261 free((caddr_t)nuidp, M_NFSUID);
262 } else {
263 if (nuidp == (struct nfsuid *)0) {
264 nuidp = slp->ns_uidlruhead.tqh_first;
265 LIST_REMOVE(nuidp, nu_hash);
266 TAILQ_REMOVE(&slp->ns_uidlruhead, nuidp,
267 nu_lru);
268 }
269 nuidp->nu_cr = nsd->nsd_cr;
270 if (nuidp->nu_cr.cr_ngroups > NGROUPS)
271 nuidp->nu_cr.cr_ngroups = NGROUPS;
272 nuidp->nu_cr.cr_ref = 1;
273 nuidp->nu_uid = nsd->nsd_uid;
274 TAILQ_INSERT_TAIL(&slp->ns_uidlruhead, nuidp,
275 nu_lru);
276 LIST_INSERT_HEAD(NUIDHASH(slp, nsd->nsd_uid),
277 nuidp, nu_hash);
278 }
279 }
280 }
281 if ((SCARG(uap, flag) & NFSSVC_AUTHINFAIL) &&
282 (nfsd = nsd->nsd_nfsd))
283 nfsd->nd_flag |= NFSD_AUTHFAIL;
284 error = nfssvc_nfsd(nsd, SCARG(uap, argp), p);
285 #endif /* !NFSSERVER */
286 }
287 if (error == EINTR || error == ERESTART)
288 error = 0;
289 return (error);
290 }
291
292 #ifdef NFSSERVER
293 /*
294 * Adds a socket to the list for servicing by nfsds.
295 */
296 nfssvc_addsock(fp, mynam)
297 struct file *fp;
298 struct mbuf *mynam;
299 {
300 register struct mbuf *m;
301 register int siz;
302 register struct nfssvc_sock *slp;
303 register struct socket *so;
304 struct nfssvc_sock *tslp;
305 int error, s;
306
307 so = (struct socket *)fp->f_data;
308 tslp = (struct nfssvc_sock *)0;
309 /*
310 * Add it to the list, as required.
311 */
312 if (so->so_proto->pr_protocol == IPPROTO_UDP) {
313 tslp = nfs_udpsock;
314 if (tslp->ns_flag & SLP_VALID) {
315 m_freem(mynam);
316 return (EPERM);
317 }
318 #ifdef ISO
319 } else if (so->so_proto->pr_protocol == ISOPROTO_CLTP) {
320 tslp = nfs_cltpsock;
321 if (tslp->ns_flag & SLP_VALID) {
322 m_freem(mynam);
323 return (EPERM);
324 }
325 #endif /* ISO */
326 }
327 if (so->so_type == SOCK_STREAM)
328 siz = NFS_MAXPACKET + sizeof (u_long);
329 else
330 siz = NFS_MAXPACKET;
331 if (error = soreserve(so, siz, siz)) {
332 m_freem(mynam);
333 return (error);
334 }
335
336 /*
337 * Set protocol specific options { for now TCP only } and
338 * reserve some space. For datagram sockets, this can get called
339 * repeatedly for the same socket, but that isn't harmful.
340 */
341 if (so->so_type == SOCK_STREAM) {
342 MGET(m, M_WAIT, MT_SOOPTS);
343 *mtod(m, int *) = 1;
344 m->m_len = sizeof(int);
345 sosetopt(so, SOL_SOCKET, SO_KEEPALIVE, m);
346 }
347 if (so->so_proto->pr_domain->dom_family == AF_INET &&
348 so->so_proto->pr_protocol == IPPROTO_TCP) {
349 MGET(m, M_WAIT, MT_SOOPTS);
350 *mtod(m, int *) = 1;
351 m->m_len = sizeof(int);
352 sosetopt(so, IPPROTO_TCP, TCP_NODELAY, m);
353 }
354 so->so_rcv.sb_flags &= ~SB_NOINTR;
355 so->so_rcv.sb_timeo = 0;
356 so->so_snd.sb_flags &= ~SB_NOINTR;
357 so->so_snd.sb_timeo = 0;
358 if (tslp)
359 slp = tslp;
360 else {
361 slp = (struct nfssvc_sock *)
362 malloc(sizeof (struct nfssvc_sock), M_NFSSVC, M_WAITOK);
363 bzero((caddr_t)slp, sizeof (struct nfssvc_sock));
364 slp->ns_uidhashtbl =
365 hashinit(NUIDHASHSIZ, M_NFSSVC, &slp->ns_uidhash);
366 TAILQ_INIT(&slp->ns_uidlruhead);
367 TAILQ_INSERT_TAIL(&nfssvc_sockhead, slp, ns_chain);
368 }
369 slp->ns_so = so;
370 slp->ns_nam = mynam;
371 fp->f_count++;
372 slp->ns_fp = fp;
373 s = splsoftnet();
374 so->so_upcallarg = (caddr_t)slp;
375 so->so_upcall = nfsrv_rcv;
376 slp->ns_flag = (SLP_VALID | SLP_NEEDQ);
377 nfsrv_wakenfsd(slp);
378 splx(s);
379 return (0);
380 }
381
382 /*
383 * Called by nfssvc() for nfsds. Just loops around servicing rpc requests
384 * until it is killed by a signal.
385 */
386 nfssvc_nfsd(nsd, argp, p)
387 struct nfsd_srvargs *nsd;
388 caddr_t argp;
389 struct proc *p;
390 {
391 register struct mbuf *m, *nam2;
392 register int siz;
393 register struct nfssvc_sock *slp;
394 register struct socket *so;
395 register int *solockp;
396 struct nfsd *nd = nsd->nsd_nfsd;
397 struct mbuf *mreq, *nam;
398 struct timeval starttime;
399 struct nfsuid *uidp;
400 int error, cacherep, s;
401 int sotype;
402
403 s = splsoftnet();
404 if (nd == (struct nfsd *)0) {
405 nsd->nsd_nfsd = nd = (struct nfsd *)
406 malloc(sizeof (struct nfsd), M_NFSD, M_WAITOK);
407 bzero((caddr_t)nd, sizeof (struct nfsd));
408 nd->nd_procp = p;
409 nd->nd_cr.cr_ref = 1;
410 TAILQ_INSERT_TAIL(&nfsd_head, nd, nd_chain);
411 nd->nd_nqlflag = NQL_NOVAL;
412 nfs_numnfsd++;
413 }
414 /*
415 * Loop getting rpc requests until SIGKILL.
416 */
417 for (;;) {
418 if ((nd->nd_flag & NFSD_REQINPROG) == 0) {
419 while (nd->nd_slp == (struct nfssvc_sock *)0 &&
420 (nfsd_head_flag & NFSD_CHECKSLP) == 0) {
421 nd->nd_flag |= NFSD_WAITING;
422 nfsd_waiting++;
423 error = tsleep((caddr_t)nd, PSOCK | PCATCH, "nfsd", 0);
424 nfsd_waiting--;
425 if (error)
426 goto done;
427 }
428 if (nd->nd_slp == (struct nfssvc_sock *)0 &&
429 (nfsd_head_flag & NFSD_CHECKSLP) != 0) {
430 for (slp = nfssvc_sockhead.tqh_first; slp != 0;
431 slp = slp->ns_chain.tqe_next) {
432 if ((slp->ns_flag & (SLP_VALID | SLP_DOREC))
433 == (SLP_VALID | SLP_DOREC)) {
434 slp->ns_flag &= ~SLP_DOREC;
435 slp->ns_sref++;
436 nd->nd_slp = slp;
437 break;
438 }
439 }
440 if (slp == 0)
441 nfsd_head_flag &= ~NFSD_CHECKSLP;
442 }
443 if ((slp = nd->nd_slp) == (struct nfssvc_sock *)0)
444 continue;
445 if (slp->ns_flag & SLP_VALID) {
446 if (slp->ns_flag & SLP_DISCONN)
447 nfsrv_zapsock(slp);
448 else if (slp->ns_flag & SLP_NEEDQ) {
449 slp->ns_flag &= ~SLP_NEEDQ;
450 (void) nfs_sndlock(&slp->ns_solock,
451 (struct nfsreq *)0);
452 nfsrv_rcv(slp->ns_so, (caddr_t)slp,
453 M_WAIT);
454 nfs_sndunlock(&slp->ns_solock);
455 }
456 error = nfsrv_dorec(slp, nd);
457 nd->nd_flag |= NFSD_REQINPROG;
458 }
459 } else {
460 error = 0;
461 slp = nd->nd_slp;
462 }
463 if (error || (slp->ns_flag & SLP_VALID) == 0) {
464 nd->nd_slp = (struct nfssvc_sock *)0;
465 nd->nd_flag &= ~NFSD_REQINPROG;
466 nfsrv_slpderef(slp);
467 continue;
468 }
469 splx(s);
470 so = slp->ns_so;
471 sotype = so->so_type;
472 starttime = time;
473 if (so->so_proto->pr_flags & PR_CONNREQUIRED)
474 solockp = &slp->ns_solock;
475 else
476 solockp = (int *)0;
477 /*
478 * nam == nam2 for connectionless protocols such as UDP
479 * nam2 == NULL for connection based protocols to disable
480 * recent request caching.
481 */
482 if (nam2 = nd->nd_nam) {
483 nam = nam2;
484 cacherep = RC_CHECKIT;
485 } else {
486 nam = slp->ns_nam;
487 cacherep = RC_DOIT;
488 }
489
490 /*
491 * Check to see if authorization is needed.
492 */
493 if (nd->nd_flag & NFSD_NEEDAUTH) {
494 static int logauth = 0;
495
496 nd->nd_flag &= ~NFSD_NEEDAUTH;
497 /*
498 * Check for a mapping already installed.
499 */
500 for (uidp = NUIDHASH(slp, nd->nd_cr.cr_uid)->lh_first;
501 uidp != 0; uidp = uidp->nu_hash.le_next) {
502 if (uidp->nu_uid == nd->nd_cr.cr_uid)
503 break;
504 }
505 if (uidp == 0) {
506 nsd->nsd_uid = nd->nd_cr.cr_uid;
507 if (nam2 && logauth++ == 0)
508 log(LOG_WARNING, "Kerberized NFS using UDP\n");
509 nsd->nsd_haddr =
510 mtod(nam, struct sockaddr_in *)->sin_addr.s_addr;
511 nsd->nsd_authlen = nd->nd_authlen;
512 if (copyout(nd->nd_authstr, nsd->nsd_authstr,
513 nd->nd_authlen) == 0 &&
514 copyout((caddr_t)nsd, argp, sizeof (*nsd)) == 0)
515 return (ENEEDAUTH);
516 cacherep = RC_DROPIT;
517 }
518 }
519 if (cacherep == RC_CHECKIT)
520 cacherep = nfsrv_getcache(nam2, nd, &mreq);
521
522 /*
523 * Check for just starting up for NQNFS and send
524 * fake "try again later" replies to the NQNFS clients.
525 */
526 if (notstarted && nqnfsstarttime <= time.tv_sec) {
527 if (modify_flag) {
528 nqnfsstarttime = time.tv_sec + nqsrv_writeslack;
529 modify_flag = 0;
530 } else
531 notstarted = 0;
532 }
533 if (notstarted) {
534 if (nd->nd_nqlflag == NQL_NOVAL)
535 cacherep = RC_DROPIT;
536 else if (nd->nd_procnum != NFSPROC_WRITE) {
537 nd->nd_procnum = NFSPROC_NOOP;
538 nd->nd_repstat = NQNFS_TRYLATER;
539 cacherep = RC_DOIT;
540 } else
541 modify_flag = 1;
542 } else if (nd->nd_flag & NFSD_AUTHFAIL) {
543 nd->nd_flag &= ~NFSD_AUTHFAIL;
544 nd->nd_procnum = NFSPROC_NOOP;
545 nd->nd_repstat = NQNFS_AUTHERR;
546 cacherep = RC_DOIT;
547 }
548
549 switch (cacherep) {
550 case RC_DOIT:
551 error = (*(nfsrv_procs[nd->nd_procnum]))(nd,
552 nd->nd_mrep, nd->nd_md, nd->nd_dpos, &nd->nd_cr,
553 nam, &mreq);
554 if (nd->nd_cr.cr_ref != 1) {
555 printf("nfssvc cref=%d\n", nd->nd_cr.cr_ref);
556 panic("nfssvc cref");
557 }
558 if (error) {
559 if (nd->nd_procnum != NQNFSPROC_VACATED)
560 nfsstats.srv_errs++;
561 if (nam2) {
562 nfsrv_updatecache(nam2, nd, FALSE, mreq);
563 m_freem(nam2);
564 }
565 break;
566 }
567 nfsstats.srvrpccnt[nd->nd_procnum]++;
568 if (nam2)
569 nfsrv_updatecache(nam2, nd, TRUE, mreq);
570 nd->nd_mrep = (struct mbuf *)0;
571 case RC_REPLY:
572 m = mreq;
573 siz = 0;
574 while (m) {
575 siz += m->m_len;
576 m = m->m_next;
577 }
578 if (siz <= 0 || siz > NFS_MAXPACKET) {
579 printf("mbuf siz=%d\n",siz);
580 panic("Bad nfs svc reply");
581 }
582 m = mreq;
583 m->m_pkthdr.len = siz;
584 m->m_pkthdr.rcvif = (struct ifnet *)0;
585 /*
586 * For stream protocols, prepend a Sun RPC
587 * Record Mark.
588 */
589 if (sotype == SOCK_STREAM) {
590 M_PREPEND(m, NFSX_UNSIGNED, M_WAIT);
591 *mtod(m, u_long *) = htonl(0x80000000 | siz);
592 }
593 if (solockp)
594 (void) nfs_sndlock(solockp, (struct nfsreq *)0);
595 if (slp->ns_flag & SLP_VALID)
596 error = nfs_send(so, nam2, m, (struct nfsreq *)0);
597 else {
598 error = EPIPE;
599 m_freem(m);
600 }
601 if (nfsrtton)
602 nfsd_rt(&starttime, sotype, nd, nam, cacherep);
603 if (nam2)
604 MFREE(nam2, m);
605 if (nd->nd_mrep)
606 m_freem(nd->nd_mrep);
607 if (error == EPIPE)
608 nfsrv_zapsock(slp);
609 if (solockp)
610 nfs_sndunlock(solockp);
611 if (error == EINTR || error == ERESTART) {
612 nfsrv_slpderef(slp);
613 s = splsoftnet();
614 goto done;
615 }
616 break;
617 case RC_DROPIT:
618 if (nfsrtton)
619 nfsd_rt(&starttime, sotype, nd, nam, cacherep);
620 m_freem(nd->nd_mrep);
621 m_freem(nam2);
622 break;
623 };
624 s = splsoftnet();
625 if (nfsrv_dorec(slp, nd)) {
626 nd->nd_flag &= ~NFSD_REQINPROG;
627 nd->nd_slp = (struct nfssvc_sock *)0;
628 nfsrv_slpderef(slp);
629 }
630 }
631 done:
632 TAILQ_REMOVE(&nfsd_head, nd, nd_chain);
633 splx(s);
634 free((caddr_t)nd, M_NFSD);
635 nsd->nsd_nfsd = (struct nfsd *)0;
636 if (--nfs_numnfsd == 0)
637 nfsrv_init(TRUE); /* Reinitialize everything */
638 return (error);
639 }
640
641 /*
642 * Shut down a socket associated with an nfssvc_sock structure.
643 * Should be called with the send lock set, if required.
644 * The trick here is to increment the sref at the start, so that the nfsds
645 * will stop using it and clear ns_flag at the end so that it will not be
646 * reassigned during cleanup.
647 */
648 nfsrv_zapsock(slp)
649 register struct nfssvc_sock *slp;
650 {
651 register struct nfsuid *nuidp, *nnuidp;
652 register int i;
653 struct socket *so;
654 struct file *fp;
655 struct mbuf *m;
656
657 slp->ns_flag &= ~SLP_ALLFLAGS;
658 if (fp = slp->ns_fp) {
659 slp->ns_fp = (struct file *)0;
660 so = slp->ns_so;
661 so->so_upcall = NULL;
662 soshutdown(so, 2);
663 closef(fp, (struct proc *)0);
664 if (slp->ns_nam)
665 MFREE(slp->ns_nam, m);
666 m_freem(slp->ns_raw);
667 m_freem(slp->ns_rec);
668 for (nuidp = slp->ns_uidlruhead.tqh_first; nuidp != 0;
669 nuidp = nnuidp) {
670 nnuidp = nuidp->nu_lru.tqe_next;
671 LIST_REMOVE(nuidp, nu_hash);
672 TAILQ_REMOVE(&slp->ns_uidlruhead, nuidp, nu_lru);
673 free((caddr_t)nuidp, M_NFSUID);
674 }
675 }
676 }
677
678 /*
679 * Derefence a server socket structure. If it has no more references and
680 * is no longer valid, you can throw it away.
681 */
682 void
683 nfsrv_slpderef(slp)
684 register struct nfssvc_sock *slp;
685 {
686 if (--(slp->ns_sref) == 0 && (slp->ns_flag & SLP_VALID) == 0) {
687 TAILQ_REMOVE(&nfssvc_sockhead, slp, ns_chain);
688 free((caddr_t)slp, M_NFSSVC);
689 }
690 }
691
692 /*
693 * Initialize the data structures for the server.
694 * Handshake with any new nfsds starting up to avoid any chance of
695 * corruption.
696 */
697 void
698 nfsrv_init(terminating)
699 int terminating;
700 {
701 register struct nfssvc_sock *slp, *nslp;
702
703 if (nfssvc_sockhead_flag & SLP_INIT)
704 panic("nfsd init");
705 nfssvc_sockhead_flag |= SLP_INIT;
706 if (terminating) {
707 for (slp = nfssvc_sockhead.tqh_first; slp != 0; slp = nslp) {
708 nslp = slp->ns_chain.tqe_next;
709 if (slp->ns_flag & SLP_VALID)
710 nfsrv_zapsock(slp);
711 TAILQ_REMOVE(&nfssvc_sockhead, slp, ns_chain);
712 free((caddr_t)slp, M_NFSSVC);
713 }
714 nfsrv_cleancache(); /* And clear out server cache */
715 }
716
717 TAILQ_INIT(&nfssvc_sockhead);
718 nfssvc_sockhead_flag &= ~SLP_INIT;
719 if (nfssvc_sockhead_flag & SLP_WANTINIT) {
720 nfssvc_sockhead_flag &= ~SLP_WANTINIT;
721 wakeup((caddr_t)&nfssvc_sockhead);
722 }
723
724 TAILQ_INIT(&nfsd_head);
725 nfsd_head_flag &= ~NFSD_CHECKSLP;
726
727 nfs_udpsock = (struct nfssvc_sock *)
728 malloc(sizeof (struct nfssvc_sock), M_NFSSVC, M_WAITOK);
729 bzero((caddr_t)nfs_udpsock, sizeof (struct nfssvc_sock));
730 nfs_udpsock->ns_uidhashtbl =
731 hashinit(NUIDHASHSIZ, M_NFSSVC, &nfs_udpsock->ns_uidhash);
732 TAILQ_INIT(&nfs_udpsock->ns_uidlruhead);
733 TAILQ_INSERT_HEAD(&nfssvc_sockhead, nfs_udpsock, ns_chain);
734
735 nfs_cltpsock = (struct nfssvc_sock *)
736 malloc(sizeof (struct nfssvc_sock), M_NFSSVC, M_WAITOK);
737 bzero((caddr_t)nfs_cltpsock, sizeof (struct nfssvc_sock));
738 nfs_cltpsock->ns_uidhashtbl =
739 hashinit(NUIDHASHSIZ, M_NFSSVC, &nfs_cltpsock->ns_uidhash);
740 TAILQ_INIT(&nfs_cltpsock->ns_uidlruhead);
741 TAILQ_INSERT_TAIL(&nfssvc_sockhead, nfs_cltpsock, ns_chain);
742 }
743
744 /*
745 * Add entries to the server monitor log.
746 */
747 static void
748 nfsd_rt(startp, sotype, nd, nam, cacherep)
749 struct timeval *startp;
750 int sotype;
751 register struct nfsd *nd;
752 struct mbuf *nam;
753 int cacherep;
754 {
755 register struct drt *rt;
756
757 rt = &nfsdrt.drt[nfsdrt.pos];
758 if (cacherep == RC_DOIT)
759 rt->flag = 0;
760 else if (cacherep == RC_REPLY)
761 rt->flag = DRT_CACHEREPLY;
762 else
763 rt->flag = DRT_CACHEDROP;
764 if (sotype == SOCK_STREAM)
765 rt->flag |= DRT_TCP;
766 if (nd->nd_nqlflag != NQL_NOVAL)
767 rt->flag |= DRT_NQNFS;
768 rt->proc = nd->nd_procnum;
769 if (mtod(nam, struct sockaddr *)->sa_family == AF_INET)
770 rt->ipadr = mtod(nam, struct sockaddr_in *)->sin_addr.s_addr;
771 else
772 rt->ipadr = INADDR_ANY;
773 rt->resptime = ((time.tv_sec - startp->tv_sec) * 1000000) +
774 (time.tv_usec - startp->tv_usec);
775 rt->tstamp = time;
776 nfsdrt.pos = (nfsdrt.pos + 1) % NFSRTTLOGSIZ;
777 }
778 #endif /* NFSSERVER */
779
780 #ifdef NFSCLIENT
781 /*
782 * Asynchronous I/O daemons for client nfs.
783 * They do read-ahead and write-behind operations on the block I/O cache.
784 * Never returns unless it fails or gets killed.
785 */
786 nfssvc_iod(p)
787 struct proc *p;
788 {
789 register struct buf *bp;
790 register int i, myiod;
791 int error = 0;
792
793 /*
794 * Assign my position or return error if too many already running
795 */
796 myiod = -1;
797 for (i = 0; i < NFS_MAXASYNCDAEMON; i++)
798 if (nfs_asyncdaemon[i] == 0) {
799 nfs_asyncdaemon[i]++;
800 myiod = i;
801 break;
802 }
803 if (myiod == -1)
804 return (EBUSY);
805 nfs_numasync++;
806 /*
807 * Just loop around doin our stuff until SIGKILL
808 */
809 for (;;) {
810 while (nfs_bufq.tqh_first == NULL && error == 0) {
811 nfs_iodwant[myiod] = p;
812 error = tsleep((caddr_t)&nfs_iodwant[myiod],
813 PWAIT | PCATCH, "nfsidl", 0);
814 }
815 while ((bp = nfs_bufq.tqh_first) != NULL) {
816 /* Take one off the front of the list */
817 TAILQ_REMOVE(&nfs_bufq, bp, b_freelist);
818 if (bp->b_flags & B_READ)
819 (void) nfs_doio(bp, bp->b_rcred, (struct proc *)0);
820 else
821 (void) nfs_doio(bp, bp->b_wcred, (struct proc *)0);
822 }
823 if (error) {
824 nfs_asyncdaemon[myiod] = 0;
825 nfs_numasync--;
826 return (error);
827 }
828 }
829 }
830
831 /*
832 * Get an authorization string for the uid by having the mount_nfs sitting
833 * on this mount point porpous out of the kernel and do it.
834 */
835 nfs_getauth(nmp, rep, cred, auth_type, auth_str, auth_len)
836 register struct nfsmount *nmp;
837 struct nfsreq *rep;
838 struct ucred *cred;
839 int *auth_type;
840 char **auth_str;
841 int *auth_len;
842 {
843 int error = 0;
844
845 while ((nmp->nm_flag & NFSMNT_WAITAUTH) == 0) {
846 nmp->nm_flag |= NFSMNT_WANTAUTH;
847 (void) tsleep((caddr_t)&nmp->nm_authtype, PSOCK,
848 "nfsauth1", 2 * hz);
849 if (error = nfs_sigintr(nmp, rep, rep->r_procp)) {
850 nmp->nm_flag &= ~NFSMNT_WANTAUTH;
851 return (error);
852 }
853 }
854 nmp->nm_flag &= ~(NFSMNT_WAITAUTH | NFSMNT_WANTAUTH);
855 nmp->nm_authstr = *auth_str = (char *)malloc(RPCAUTH_MAXSIZ, M_TEMP, M_WAITOK);
856 nmp->nm_authuid = cred->cr_uid;
857 wakeup((caddr_t)&nmp->nm_authstr);
858
859 /*
860 * And wait for mount_nfs to do its stuff.
861 */
862 while ((nmp->nm_flag & NFSMNT_HASAUTH) == 0 && error == 0) {
863 (void) tsleep((caddr_t)&nmp->nm_authlen, PSOCK,
864 "nfsauth2", 2 * hz);
865 error = nfs_sigintr(nmp, rep, rep->r_procp);
866 }
867 if (nmp->nm_flag & NFSMNT_AUTHERR) {
868 nmp->nm_flag &= ~NFSMNT_AUTHERR;
869 error = EAUTH;
870 }
871 if (error)
872 free((caddr_t)*auth_str, M_TEMP);
873 else {
874 *auth_type = nmp->nm_authtype;
875 *auth_len = nmp->nm_authlen;
876 }
877 nmp->nm_flag &= ~NFSMNT_HASAUTH;
878 nmp->nm_flag |= NFSMNT_WAITAUTH;
879 if (nmp->nm_flag & NFSMNT_WANTAUTH) {
880 nmp->nm_flag &= ~NFSMNT_WANTAUTH;
881 wakeup((caddr_t)&nmp->nm_authtype);
882 }
883 return (error);
884 }
885 #endif /* NFSCLIENT */
886