1 /*-
2 * Copyright (c) 2000-2001 Boris Popov
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by Boris Popov.
16 * 4. Neither the name of the author nor the names of any co-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 AUTHOR 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 AUTHOR 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 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
35
36 #include <sys/param.h>
37 #include <sys/condvar.h>
38 #include <sys/kernel.h>
39 #include <sys/lock.h>
40 #include <sys/malloc.h>
41 #include <sys/mbuf.h>
42 #include <sys/poll.h>
43 #include <sys/proc.h>
44 #include <sys/protosw.h>
45 #include <sys/signalvar.h>
46 #include <sys/socket.h>
47 #include <sys/socketvar.h>
48 #include <sys/sx.h>
49 #include <sys/sysctl.h>
50 #include <sys/systm.h>
51 #include <sys/uio.h>
52
53 #include <net/if.h>
54 #include <net/route.h>
55 #include <net/vnet.h>
56
57 #include <netinet/in.h>
58 #include <netinet/tcp.h>
59
60 #include <sys/mchain.h>
61
62 #include <netsmb/netbios.h>
63
64 #include <netsmb/smb.h>
65 #include <netsmb/smb_conn.h>
66 #include <netsmb/smb_tran.h>
67 #include <netsmb/smb_trantcp.h>
68 #include <netsmb/smb_subr.h>
69
70 #define M_NBDATA M_PCB
71
72 static int smb_tcpsndbuf = NB_SNDQ - 1;
73 static int smb_tcprcvbuf = NB_RCVQ - 1;
74
75 SYSCTL_DECL(_net_smb);
76 SYSCTL_INT(_net_smb, OID_AUTO, tcpsndbuf, CTLFLAG_RW, &smb_tcpsndbuf, 0, "");
77 SYSCTL_INT(_net_smb, OID_AUTO, tcprcvbuf, CTLFLAG_RW, &smb_tcprcvbuf, 0, "");
78
79 #define nb_sosend(so,m,flags,td) sosend(so, NULL, 0, m, 0, flags, td)
80
81 static int nbssn_recv(struct nbpcb *nbp, struct mbuf **mpp, int *lenp,
82 u_int8_t *rpcodep, struct thread *td);
83 static int smb_nbst_disconnect(struct smb_vc *vcp, struct thread *td);
84
85 static int
86 nb_setsockopt_int(struct socket *so, int level, int name, int val)
87 {
88 struct sockopt sopt;
89 int error;
90
91 bzero(&sopt, sizeof(sopt));
92 sopt.sopt_level = level;
93 sopt.sopt_name = name;
94 sopt.sopt_val = &val;
95 sopt.sopt_valsize = sizeof(val);
96 CURVNET_SET(so->so_vnet);
97 error = sosetopt(so, &sopt);
98 CURVNET_RESTORE();
99 return error;
100 }
101
102 static int
103 nb_intr(struct nbpcb *nbp, struct proc *p)
104 {
105 return 0;
106 }
107
108 static int
109 nb_upcall(struct socket *so, void *arg, int waitflag)
110 {
111 struct nbpcb *nbp = arg;
112
113 if (arg == NULL || nbp->nbp_selectid == NULL)
114 return (SU_OK);
115 wakeup(nbp->nbp_selectid);
116 return (SU_OK);
117 }
118
119 static int
120 nb_sethdr(struct mbuf *m, u_int8_t type, u_int32_t len)
121 {
122 u_int32_t *p = mtod(m, u_int32_t *);
123
124 *p = htonl((len & 0x1FFFF) | (type << 24));
125 return 0;
126 }
127
128 static int
129 nb_put_name(struct mbchain *mbp, struct sockaddr_nb *snb)
130 {
131 int error;
132 u_char seglen, *cp;
133
134 cp = snb->snb_name;
135 if (*cp == 0)
136 return EINVAL;
137 NBDEBUG("[%s]\n", cp);
138 for (;;) {
139 seglen = (*cp) + 1;
140 error = mb_put_mem(mbp, cp, seglen, MB_MSYSTEM);
141 if (error)
142 return error;
143 if (seglen == 1)
144 break;
145 cp += seglen;
146 }
147 return 0;
148 }
149
150 static int
151 nb_connect_in(struct nbpcb *nbp, struct sockaddr_in *to, struct thread *td)
152 {
153 struct socket *so;
154 int error, s;
155
156 error = socreate(AF_INET, &so, SOCK_STREAM, IPPROTO_TCP,
157 td->td_ucred, td);
158 if (error)
159 return error;
160 nbp->nbp_tso = so;
161 SOCKBUF_LOCK(&so->so_rcv);
162 soupcall_set(so, SO_RCV, nb_upcall, nbp);
163 SOCKBUF_UNLOCK(&so->so_rcv);
164 so->so_rcv.sb_timeo = (5 * hz);
165 so->so_snd.sb_timeo = (5 * hz);
166 error = soreserve(so, nbp->nbp_sndbuf, nbp->nbp_rcvbuf);
167 if (error)
168 goto bad;
169 nb_setsockopt_int(so, SOL_SOCKET, SO_KEEPALIVE, 1);
170 nb_setsockopt_int(so, IPPROTO_TCP, TCP_NODELAY, 1);
171 SOCKBUF_LOCK(&so->so_rcv);
172 so->so_rcv.sb_flags &= ~SB_NOINTR;
173 SOCKBUF_UNLOCK(&so->so_rcv);
174 SOCKBUF_LOCK(&so->so_snd);
175 so->so_snd.sb_flags &= ~SB_NOINTR;
176 SOCKBUF_UNLOCK(&so->so_snd);
177 error = soconnect(so, (struct sockaddr*)to, td);
178 if (error)
179 goto bad;
180 s = splnet();
181 while ((so->so_state & SS_ISCONNECTING) && so->so_error == 0) {
182 tsleep(&so->so_timeo, PSOCK, "nbcon", 2 * hz);
183 if ((so->so_state & SS_ISCONNECTING) && so->so_error == 0 &&
184 (error = nb_intr(nbp, td->td_proc)) != 0) {
185 so->so_state &= ~SS_ISCONNECTING;
186 splx(s);
187 goto bad;
188 }
189 }
190 if (so->so_error) {
191 error = so->so_error;
192 so->so_error = 0;
193 splx(s);
194 goto bad;
195 }
196 splx(s);
197 return 0;
198 bad:
199 smb_nbst_disconnect(nbp->nbp_vc, td);
200 return error;
201 }
202
203 static int
204 nbssn_rq_request(struct nbpcb *nbp, struct thread *td)
205 {
206 struct mbchain mb, *mbp = &mb;
207 struct mdchain md, *mdp = &md;
208 struct mbuf *m0;
209 struct timeval tv;
210 struct sockaddr_in sin;
211 u_short port;
212 u_int8_t rpcode;
213 int error, rplen;
214
215 error = mb_init(mbp);
216 if (error)
217 return error;
218 mb_put_uint32le(mbp, 0);
219 nb_put_name(mbp, nbp->nbp_paddr);
220 nb_put_name(mbp, nbp->nbp_laddr);
221 nb_sethdr(mbp->mb_top, NB_SSN_REQUEST, mb_fixhdr(mbp) - 4);
222 error = nb_sosend(nbp->nbp_tso, mbp->mb_top, 0, td);
223 if (!error) {
224 nbp->nbp_state = NBST_RQSENT;
225 }
226 mb_detach(mbp);
227 mb_done(mbp);
228 if (error)
229 return error;
230 TIMESPEC_TO_TIMEVAL(&tv, &nbp->nbp_timo);
231 error = selsocket(nbp->nbp_tso, POLLIN, &tv, td);
232 if (error == EWOULDBLOCK) { /* Timeout */
233 NBDEBUG("initial request timeout\n");
234 return ETIMEDOUT;
235 }
236 if (error) /* restart or interrupt */
237 return error;
238 error = nbssn_recv(nbp, &m0, &rplen, &rpcode, td);
239 if (error) {
240 NBDEBUG("recv() error %d\n", error);
241 return error;
242 }
243 /*
244 * Process NETBIOS reply
245 */
246 if (m0)
247 md_initm(mdp, m0);
248 error = 0;
249 do {
250 if (rpcode == NB_SSN_POSRESP) {
251 nbp->nbp_state = NBST_SESSION;
252 nbp->nbp_flags |= NBF_CONNECTED;
253 break;
254 }
255 if (rpcode != NB_SSN_RTGRESP) {
256 error = ECONNABORTED;
257 break;
258 }
259 if (rplen != 6) {
260 error = ECONNABORTED;
261 break;
262 }
263 md_get_mem(mdp, (caddr_t)&sin.sin_addr, 4, MB_MSYSTEM);
264 md_get_uint16(mdp, &port);
265 sin.sin_port = port;
266 nbp->nbp_state = NBST_RETARGET;
267 smb_nbst_disconnect(nbp->nbp_vc, td);
268 error = nb_connect_in(nbp, &sin, td);
269 if (!error)
270 error = nbssn_rq_request(nbp, td);
271 if (error) {
272 smb_nbst_disconnect(nbp->nbp_vc, td);
273 break;
274 }
275 } while(0);
276 if (m0)
277 md_done(mdp);
278 return error;
279 }
280
281 static int
282 nbssn_recvhdr(struct nbpcb *nbp, int *lenp,
283 u_int8_t *rpcodep, int flags, struct thread *td)
284 {
285 struct socket *so = nbp->nbp_tso;
286 struct uio auio;
287 struct iovec aio;
288 u_int32_t len;
289 int error;
290
291 aio.iov_base = (caddr_t)&len;
292 aio.iov_len = sizeof(len);
293 auio.uio_iov = &aio;
294 auio.uio_iovcnt = 1;
295 auio.uio_segflg = UIO_SYSSPACE;
296 auio.uio_rw = UIO_READ;
297 auio.uio_offset = 0;
298 auio.uio_resid = sizeof(len);
299 auio.uio_td = td;
300 CURVNET_SET(so->so_vnet);
301 error = soreceive(so, (struct sockaddr **)NULL, &auio,
302 (struct mbuf **)NULL, (struct mbuf **)NULL, &flags);
303 CURVNET_RESTORE();
304 if (error)
305 return error;
306 if (auio.uio_resid > 0) {
307 SMBSDEBUG("short reply\n");
308 return EPIPE;
309 }
310 len = ntohl(len);
311 *rpcodep = (len >> 24) & 0xFF;
312 len &= 0x1ffff;
313 if (len > SMB_MAXPKTLEN) {
314 SMBERROR("packet too long (%d)\n", len);
315 return EFBIG;
316 }
317 *lenp = len;
318 return 0;
319 }
320
321 static int
322 nbssn_recv(struct nbpcb *nbp, struct mbuf **mpp, int *lenp,
323 u_int8_t *rpcodep, struct thread *td)
324 {
325 struct socket *so = nbp->nbp_tso;
326 struct uio auio;
327 struct mbuf *m, *tm, *im;
328 u_int8_t rpcode;
329 int len, resid;
330 int error, rcvflg;
331
332 if (so == NULL)
333 return ENOTCONN;
334
335 if (mpp)
336 *mpp = NULL;
337 m = NULL;
338 for(;;) {
339 /*
340 * Poll for a response header.
341 * If we don't have one waiting, return.
342 */
343 len = 0;
344 rpcode = 0;
345 error = nbssn_recvhdr(nbp, &len, &rpcode, MSG_DONTWAIT, td);
346 if ((so->so_state & (SS_ISDISCONNECTING | SS_ISDISCONNECTED)) ||
347 (so->so_rcv.sb_state & SBS_CANTRCVMORE)) {
348 nbp->nbp_state = NBST_CLOSED;
349 NBDEBUG("session closed by peer\n");
350 return ECONNRESET;
351 }
352 if (error)
353 return error;
354 if (len == 0 && nbp->nbp_state != NBST_SESSION)
355 break;
356 /* no data, try again */
357 if (rpcode == NB_SSN_KEEPALIVE)
358 continue;
359
360 /*
361 * Loop, blocking, for data following the response header.
362 *
363 * Note that we can't simply block here with MSG_WAITALL for the
364 * entire response size, as it may be larger than the TCP
365 * slow-start window that the sender employs. This will result
366 * in the sender stalling until the delayed ACK is sent, then
367 * resuming slow-start, resulting in very poor performance.
368 *
369 * Instead, we never request more than NB_SORECEIVE_CHUNK
370 * bytes at a time, resulting in an ack being pushed by
371 * the TCP code at the completion of each call.
372 */
373 resid = len;
374 while (resid > 0) {
375 tm = NULL;
376 rcvflg = MSG_WAITALL;
377 bzero(&auio, sizeof(auio));
378 auio.uio_resid = min(resid, NB_SORECEIVE_CHUNK);
379 auio.uio_td = td;
380 resid -= auio.uio_resid;
381 /*
382 * Spin until we have collected everything in
383 * this chunk.
384 */
385 do {
386 rcvflg = MSG_WAITALL;
387 CURVNET_SET(so->so_vnet);
388 error = soreceive(so, (struct sockaddr **)NULL,
389 &auio, &tm, (struct mbuf **)NULL, &rcvflg);
390 CURVNET_RESTORE();
391 } while (error == EWOULDBLOCK || error == EINTR ||
392 error == ERESTART);
393 if (error)
394 goto out;
395 /* short return guarantees unhappiness */
396 if (auio.uio_resid > 0) {
397 SMBERROR("packet is shorter than expected\n");
398 error = EPIPE;
399 goto out;
400 }
401 /* append received chunk to previous chunk(s) */
402 if (m == NULL) {
403 m = tm;
404 } else {
405 /*
406 * Just glue the new chain on the end.
407 * Consumer will pullup as required.
408 */
409 for (im = m; im->m_next != NULL; im = im->m_next)
410 ;
411 im->m_next = tm;
412 }
413 }
414 /* got a session/message packet? */
415 if (nbp->nbp_state == NBST_SESSION &&
416 rpcode == NB_SSN_MESSAGE)
417 break;
418 /* drop packet and try for another */
419 NBDEBUG("non-session packet %x\n", rpcode);
420 if (m) {
421 m_freem(m);
422 m = NULL;
423 }
424 }
425
426 out:
427 if (error) {
428 if (m)
429 m_freem(m);
430 return error;
431 }
432 if (mpp)
433 *mpp = m;
434 else
435 m_freem(m);
436 *lenp = len;
437 *rpcodep = rpcode;
438 return 0;
439 }
440
441 /*
442 * SMB transport interface
443 */
444 static int
445 smb_nbst_create(struct smb_vc *vcp, struct thread *td)
446 {
447 struct nbpcb *nbp;
448
449 nbp = malloc(sizeof *nbp, M_NBDATA, M_WAITOK);
450 bzero(nbp, sizeof *nbp);
451 nbp->nbp_timo.tv_sec = 15; /* XXX: sysctl ? */
452 nbp->nbp_state = NBST_CLOSED;
453 nbp->nbp_vc = vcp;
454 nbp->nbp_sndbuf = smb_tcpsndbuf;
455 nbp->nbp_rcvbuf = smb_tcprcvbuf;
456 vcp->vc_tdata = nbp;
457 return 0;
458 }
459
460 static int
461 smb_nbst_done(struct smb_vc *vcp, struct thread *td)
462 {
463 struct nbpcb *nbp = vcp->vc_tdata;
464
465 if (nbp == NULL)
466 return ENOTCONN;
467 smb_nbst_disconnect(vcp, td);
468 if (nbp->nbp_laddr)
469 free(nbp->nbp_laddr, M_SONAME);
470 if (nbp->nbp_paddr)
471 free(nbp->nbp_paddr, M_SONAME);
472 free(nbp, M_NBDATA);
473 return 0;
474 }
475
476 static int
477 smb_nbst_bind(struct smb_vc *vcp, struct sockaddr *sap, struct thread *td)
478 {
479 struct nbpcb *nbp = vcp->vc_tdata;
480 struct sockaddr_nb *snb;
481 int error, slen;
482
483 NBDEBUG("\n");
484 error = EINVAL;
485 do {
486 if (nbp->nbp_flags & NBF_LOCADDR)
487 break;
488 /*
489 * It is possible to create NETBIOS name in the kernel,
490 * but nothing prevents us to do it in the user space.
491 */
492 if (sap == NULL)
493 break;
494 slen = sap->sa_len;
495 if (slen < NB_MINSALEN)
496 break;
497 snb = (struct sockaddr_nb*)sodupsockaddr(sap, M_WAITOK);
498 if (snb == NULL) {
499 error = ENOMEM;
500 break;
501 }
502 nbp->nbp_laddr = snb;
503 nbp->nbp_flags |= NBF_LOCADDR;
504 error = 0;
505 } while(0);
506 return error;
507 }
508
509 static int
510 smb_nbst_connect(struct smb_vc *vcp, struct sockaddr *sap, struct thread *td)
511 {
512 struct nbpcb *nbp = vcp->vc_tdata;
513 struct sockaddr_in sin;
514 struct sockaddr_nb *snb;
515 struct timespec ts1, ts2;
516 int error, slen;
517
518 NBDEBUG("\n");
519 if (nbp->nbp_tso != NULL)
520 return EISCONN;
521 if (nbp->nbp_laddr == NULL)
522 return EINVAL;
523 slen = sap->sa_len;
524 if (slen < NB_MINSALEN)
525 return EINVAL;
526 if (nbp->nbp_paddr) {
527 free(nbp->nbp_paddr, M_SONAME);
528 nbp->nbp_paddr = NULL;
529 }
530 snb = (struct sockaddr_nb*)sodupsockaddr(sap, M_WAITOK);
531 if (snb == NULL)
532 return ENOMEM;
533 nbp->nbp_paddr = snb;
534 sin = snb->snb_addrin;
535 getnanotime(&ts1);
536 error = nb_connect_in(nbp, &sin, td);
537 if (error)
538 return error;
539 getnanotime(&ts2);
540 timespecsub(&ts2, &ts1);
541 if (ts2.tv_sec == 0 && ts2.tv_sec == 0)
542 ts2.tv_sec = 1;
543 nbp->nbp_timo = ts2;
544 timespecadd(&nbp->nbp_timo, &ts2);
545 timespecadd(&nbp->nbp_timo, &ts2);
546 timespecadd(&nbp->nbp_timo, &ts2); /* * 4 */
547 error = nbssn_rq_request(nbp, td);
548 if (error)
549 smb_nbst_disconnect(vcp, td);
550 return error;
551 }
552
553 static int
554 smb_nbst_disconnect(struct smb_vc *vcp, struct thread *td)
555 {
556 struct nbpcb *nbp = vcp->vc_tdata;
557 struct socket *so;
558
559 if (nbp == NULL || nbp->nbp_tso == NULL)
560 return ENOTCONN;
561 if ((so = nbp->nbp_tso) != NULL) {
562 nbp->nbp_flags &= ~NBF_CONNECTED;
563 nbp->nbp_tso = (struct socket *)NULL;
564 soshutdown(so, 2);
565 soclose(so);
566 }
567 if (nbp->nbp_state != NBST_RETARGET) {
568 nbp->nbp_state = NBST_CLOSED;
569 }
570 return 0;
571 }
572
573 static int
574 smb_nbst_send(struct smb_vc *vcp, struct mbuf *m0, struct thread *td)
575 {
576 struct nbpcb *nbp = vcp->vc_tdata;
577 int error;
578
579 if (nbp->nbp_state != NBST_SESSION) {
580 error = ENOTCONN;
581 goto abort;
582 }
583 M_PREPEND(m0, 4, M_WAIT);
584 nb_sethdr(m0, NB_SSN_MESSAGE, m_fixhdr(m0) - 4);
585 error = nb_sosend(nbp->nbp_tso, m0, 0, td);
586 return error;
587 abort:
588 if (m0)
589 m_freem(m0);
590 return error;
591 }
592
593
594 static int
595 smb_nbst_recv(struct smb_vc *vcp, struct mbuf **mpp, struct thread *td)
596 {
597 struct nbpcb *nbp = vcp->vc_tdata;
598 u_int8_t rpcode;
599 int error, rplen;
600
601 nbp->nbp_flags |= NBF_RECVLOCK;
602 error = nbssn_recv(nbp, mpp, &rplen, &rpcode, td);
603 nbp->nbp_flags &= ~NBF_RECVLOCK;
604 return error;
605 }
606
607 static void
608 smb_nbst_timo(struct smb_vc *vcp)
609 {
610 return;
611 }
612
613 static void
614 smb_nbst_intr(struct smb_vc *vcp)
615 {
616 struct nbpcb *nbp = vcp->vc_tdata;
617
618 if (nbp == NULL || nbp->nbp_tso == NULL)
619 return;
620 sorwakeup(nbp->nbp_tso);
621 sowwakeup(nbp->nbp_tso);
622 }
623
624 static int
625 smb_nbst_getparam(struct smb_vc *vcp, int param, void *data)
626 {
627 struct nbpcb *nbp = vcp->vc_tdata;
628
629 switch (param) {
630 case SMBTP_SNDSZ:
631 *(int*)data = nbp->nbp_sndbuf;
632 break;
633 case SMBTP_RCVSZ:
634 *(int*)data = nbp->nbp_rcvbuf;
635 break;
636 case SMBTP_TIMEOUT:
637 *(struct timespec*)data = nbp->nbp_timo;
638 break;
639 default:
640 return EINVAL;
641 }
642 return 0;
643 }
644
645 static int
646 smb_nbst_setparam(struct smb_vc *vcp, int param, void *data)
647 {
648 struct nbpcb *nbp = vcp->vc_tdata;
649
650 switch (param) {
651 case SMBTP_SELECTID:
652 nbp->nbp_selectid = data;
653 break;
654 default:
655 return EINVAL;
656 }
657 return 0;
658 }
659
660 /*
661 * Check for fatal errors
662 */
663 static int
664 smb_nbst_fatal(struct smb_vc *vcp, int error)
665 {
666 switch (error) {
667 case ENOTCONN:
668 case ENETRESET:
669 case ECONNABORTED:
670 return 1;
671 }
672 return 0;
673 }
674
675
676 struct smb_tran_desc smb_tran_nbtcp_desc = {
677 SMBT_NBTCP,
678 smb_nbst_create, smb_nbst_done,
679 smb_nbst_bind, smb_nbst_connect, smb_nbst_disconnect,
680 smb_nbst_send, smb_nbst_recv,
681 smb_nbst_timo, smb_nbst_intr,
682 smb_nbst_getparam, smb_nbst_setparam,
683 smb_nbst_fatal
684 };
685
Cache object: 7ce045d8bab9f638fefb5078d05f5f45
|