2 * Copyright (c) 2000-2001 Boris Popov
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
32 * $FreeBSD: src/sys/netsmb/smb_smb.c,v 1.1.2.3 2002/12/14 14:44:19 fjoe Exp $
33 * $DragonFly: src/sys/netproto/smb/smb_smb.c,v 1.7 2007/08/21 17:26:47 dillon Exp $
36 * various SMB requests. Most of the routines merely packs data into mbufs.
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/kernel.h>
41 #include <sys/malloc.h>
44 #include <sys/sysctl.h>
45 #include <sys/socket.h>
48 #include <sys/iconv.h>
61 static struct smb_dialect smb_dialects
[] = {
62 {SMB_DIALECT_CORE
, "PC NETWORK PROGRAM 1.0"},
63 {SMB_DIALECT_COREPLUS
, "MICROSOFT NETWORKS 1.03"},
64 {SMB_DIALECT_LANMAN1_0
, "MICROSOFT NETWORKS 3.0"},
65 {SMB_DIALECT_LANMAN1_0
, "LANMAN1.0"},
66 {SMB_DIALECT_LANMAN2_0
, "LM1.2X002"},
67 {SMB_DIALECT_LANMAN2_0
, "Samba"},
68 {SMB_DIALECT_NTLM0_12
, "NT LANMAN 1.0"},
69 {SMB_DIALECT_NTLM0_12
, "NT LM 0.12"},
73 #define SMB_DIALECT_MAX (sizeof(smb_dialects) / sizeof(struct smb_dialect) - 2)
76 smb_smb_nomux(struct smb_vc
*vcp
, struct smb_cred
*scred
, const char *name
)
78 if (scred
->scr_td
== vcp
->vc_iod
->iod_td
)
80 SMBERROR("wrong function called(%s)\n", name
);
85 smb_smb_negotiate(struct smb_vc
*vcp
, struct smb_cred
*scred
)
87 struct smb_dialect
*dp
;
88 struct smb_sopt
*sp
= NULL
;
92 u_int8_t wc
, stime
[8], sblen
;
93 u_int16_t dindex
, tw
, tw1
, swlen
, bc
;
96 if (smb_smb_nomux(vcp
, scred
, __func__
) != 0)
100 vcp
->obj
.co_flags
&= ~(SMBV_ENCRYPT
);
102 bzero(sp
, sizeof(struct smb_sopt
));
103 error
= smb_rq_alloc(VCTOCP(vcp
), SMB_COM_NEGOTIATE
, scred
, &rqp
);
106 smb_rq_getrequest(rqp
, &mbp
);
110 for(dp
= smb_dialects
; dp
->d_id
!= -1; dp
++) {
111 mb_put_uint8(mbp
, SMB_DT_DIALECT
);
112 smb_put_dstring(mbp
, vcp
, dp
->d_name
, SMB_CS_NONE
);
115 error
= smb_rq_simple(rqp
);
116 SMBSDEBUG("%d\n", error
);
119 smb_rq_getreply(rqp
, &mdp
);
121 error
= md_get_uint8(mdp
, &wc
);
124 error
= md_get_uint16le(mdp
, &dindex
);
128 SMBERROR("Don't know how to talk with server %s (%d)\n", "xxx", dindex
);
132 dp
= smb_dialects
+ dindex
;
133 sp
->sv_proto
= dp
->d_id
;
134 SMBSDEBUG("Dialect %s (%d, %d)\n", dp
->d_name
, dindex
, wc
);
136 if (dp
->d_id
>= SMB_DIALECT_NTLM0_12
) {
139 md_get_uint8(mdp
, &sp
->sv_sm
);
140 md_get_uint16le(mdp
, &sp
->sv_maxmux
);
141 md_get_uint16le(mdp
, &sp
->sv_maxvcs
);
142 md_get_uint32le(mdp
, &sp
->sv_maxtx
);
143 md_get_uint32le(mdp
, &sp
->sv_maxraw
);
144 md_get_uint32le(mdp
, &sp
->sv_skey
);
145 md_get_uint32le(mdp
, &sp
->sv_caps
);
146 md_get_mem(mdp
, stime
, 8, MB_MSYSTEM
);
147 md_get_uint16le(mdp
, (u_int16_t
*)&sp
->sv_tz
);
148 md_get_uint8(mdp
, &sblen
);
149 if (sblen
&& (sp
->sv_sm
& SMB_SM_ENCRYPT
)) {
150 if (sblen
!= SMB_MAXCHALLENGELEN
) {
151 SMBERROR("Unexpected length of security blob (%d)\n", sblen
);
154 error
= md_get_uint16(mdp
, &bc
);
157 if (sp
->sv_caps
& SMB_CAP_EXT_SECURITY
)
158 md_get_mem(mdp
, NULL
, 16, MB_MSYSTEM
);
159 error
= md_get_mem(mdp
, vcp
->vc_ch
, sblen
, MB_MSYSTEM
);
162 vcp
->vc_chlen
= sblen
;
163 vcp
->obj
.co_flags
|= SMBV_ENCRYPT
;
165 vcp
->vc_hflags2
|= SMB_FLAGS2_KNOWS_LONG_NAMES
;
166 if (dp
->d_id
== SMB_DIALECT_NTLM0_12
&&
167 sp
->sv_maxtx
< 4096 &&
168 (sp
->sv_caps
& SMB_CAP_NT_SMBS
) == 0) {
169 vcp
->obj
.co_flags
|= SMBV_WIN95
;
170 SMBSDEBUG("Win95 detected\n");
172 } else if (dp
->d_id
> SMB_DIALECT_CORE
) {
173 md_get_uint16le(mdp
, &tw
);
175 md_get_uint16le(mdp
, &tw
);
177 md_get_uint16le(mdp
, &sp
->sv_maxmux
);
178 md_get_uint16le(mdp
, &sp
->sv_maxvcs
);
179 md_get_uint16le(mdp
, &tw
); /* rawmode */
180 md_get_uint32le(mdp
, &sp
->sv_skey
);
181 if (wc
== 13) { /* >= LANMAN1 */
182 md_get_uint16(mdp
, &tw
); /* time */
183 md_get_uint16(mdp
, &tw1
); /* date */
184 md_get_uint16le(mdp
, (u_int16_t
*)&sp
->sv_tz
);
185 md_get_uint16le(mdp
, &swlen
);
186 if (swlen
> SMB_MAXCHALLENGELEN
)
188 md_get_uint16(mdp
, NULL
); /* mbz */
189 if (md_get_uint16(mdp
, &bc
) != 0)
193 if (swlen
&& (sp
->sv_sm
& SMB_SM_ENCRYPT
)) {
194 error
= md_get_mem(mdp
, vcp
->vc_ch
, swlen
, MB_MSYSTEM
);
197 vcp
->vc_chlen
= swlen
;
198 vcp
->obj
.co_flags
|= SMBV_ENCRYPT
;
201 vcp
->vc_hflags2
|= SMB_FLAGS2_KNOWS_LONG_NAMES
;
202 } else { /* an old CORE protocol */
208 vcp
->vc_maxvcs
= sp
->sv_maxvcs
;
209 if (vcp
->vc_maxvcs
<= 1) {
210 if (vcp
->vc_maxvcs
== 0)
213 if (sp
->sv_maxtx
<= 0 || sp
->sv_maxtx
> 0xffff)
215 SMB_TRAN_GETPARAM(vcp
, SMBTP_SNDSZ
, &maxqsz
);
216 vcp
->vc_txmax
= min(sp
->sv_maxtx
, maxqsz
);
217 SMBSDEBUG("TZ = %d\n", sp
->sv_tz
);
218 SMBSDEBUG("CAPS = %x\n", sp
->sv_caps
);
219 SMBSDEBUG("MAXMUX = %d\n", sp
->sv_maxmux
);
220 SMBSDEBUG("MAXVCS = %d\n", sp
->sv_maxvcs
);
221 SMBSDEBUG("MAXRAW = %d\n", sp
->sv_maxraw
);
222 SMBSDEBUG("MAXTX = %d\n", sp
->sv_maxtx
);
230 smb_smb_ssnsetup(struct smb_vc
*vcp
, struct smb_cred
*scred
)
236 smb_uniptr unipp
, ntencpass
= NULL
;
237 char *pp
, *up
, *pbuf
, *encpass
;
238 int error
, plen
, uniplen
, ulen
;
240 vcp
->vc_smbuid
= SMB_UID_UNKNOWN
;
242 if (smb_smb_nomux(vcp
, scred
, __func__
) != 0)
245 error
= smb_rq_alloc(VCTOCP(vcp
), SMB_COM_SESSION_SETUP_ANDX
, scred
, &rqp
);
248 pbuf
= kmalloc(SMB_MAXPASSWORDLEN
+ 1, M_SMBTEMP
, M_WAITOK
);
249 encpass
= kmalloc(24, M_SMBTEMP
, M_WAITOK
);
250 if (vcp
->vc_sopt
.sv_sm
& SMB_SM_USER
) {
251 iconv_convstr(vcp
->vc_toupper
, pbuf
, smb_vc_getpass(vcp
));
252 iconv_convstr(vcp
->vc_toserver
, pbuf
, pbuf
);
253 if (vcp
->vc_sopt
.sv_sm
& SMB_SM_ENCRYPT
) {
255 smb_encrypt(pbuf
, vcp
->vc_ch
, encpass
);
256 ntencpass
= kmalloc(uniplen
, M_SMBTEMP
, M_WAITOK
);
257 iconv_convstr(vcp
->vc_toserver
, pbuf
, smb_vc_getpass(vcp
));
258 smb_ntencrypt(pbuf
, vcp
->vc_ch
, (u_char
*)ntencpass
);
262 plen
= strlen(pbuf
) + 1;
265 ntencpass
= kmalloc(uniplen
, M_SMBTEMP
, M_WAITOK
);
266 smb_strtouni(ntencpass
, smb_vc_getpass(vcp
));
270 * The uniplen is zeroed because Samba cannot deal
271 * with this 2nd cleartext password. This Samba
272 * "bug" is actually a workaround for problems in
280 * In the share security mode password will be used
281 * only in the tree authentication
286 uniplen
= 0 /* sizeof(smb_unieol) */;
290 up
= vcp
->vc_username
;
291 ulen
= strlen(up
) + 1;
292 mb_put_uint8(mbp
, 0xff);
293 mb_put_uint8(mbp
, 0);
294 mb_put_uint16le(mbp
, 0);
295 mb_put_uint16le(mbp
, vcp
->vc_sopt
.sv_maxtx
);
296 mb_put_uint16le(mbp
, vcp
->vc_sopt
.sv_maxmux
);
297 mb_put_uint16le(mbp
, vcp
->vc_number
);
298 mb_put_uint32le(mbp
, vcp
->vc_sopt
.sv_skey
);
299 mb_put_uint16le(mbp
, plen
);
300 if (SMB_DIALECT(vcp
) < SMB_DIALECT_NTLM0_12
) {
301 mb_put_uint32le(mbp
, 0);
304 mb_put_mem(mbp
, pp
, plen
, MB_MSYSTEM
);
305 smb_put_dstring(mbp
, vcp
, up
, SMB_CS_NONE
);
307 mb_put_uint16le(mbp
, uniplen
);
308 mb_put_uint32le(mbp
, 0); /* reserved */
309 mb_put_uint32le(mbp
, vcp
->obj
.co_flags
& SMBV_UNICODE
?
310 SMB_CAP_UNICODE
: 0);
313 mb_put_mem(mbp
, pp
, plen
, MB_MSYSTEM
);
314 mb_put_mem(mbp
, (caddr_t
)unipp
, uniplen
, MB_MSYSTEM
);
315 smb_put_dstring(mbp
, vcp
, up
, SMB_CS_NONE
); /* AccountName */
316 smb_put_dstring(mbp
, vcp
, vcp
->vc_domain
, SMB_CS_NONE
); /* PrimaryDomain */
317 smb_put_dstring(mbp
, vcp
, "FreeBSD", SMB_CS_NONE
); /* Client's OS */
318 smb_put_dstring(mbp
, vcp
, "NETSMB", SMB_CS_NONE
); /* Client name */
322 kfree(ntencpass
, M_SMBTEMP
);
323 error
= smb_rq_simple(rqp
);
324 SMBSDEBUG("%d\n", error
);
326 if (rqp
->sr_errclass
== ERRDOS
&& rqp
->sr_serror
== ERRnoaccess
)
330 vcp
->vc_smbuid
= rqp
->sr_rpuid
;
332 kfree(encpass
, M_SMBTEMP
);
333 kfree(pbuf
, M_SMBTEMP
);
339 smb_smb_ssnclose(struct smb_vc
*vcp
, struct smb_cred
*scred
)
345 if (vcp
->vc_smbuid
== SMB_UID_UNKNOWN
)
348 if (smb_smb_nomux(vcp
, scred
, __func__
) != 0)
351 error
= smb_rq_alloc(VCTOCP(vcp
), SMB_COM_LOGOFF_ANDX
, scred
, &rqp
);
356 mb_put_uint8(mbp
, 0xff);
357 mb_put_uint8(mbp
, 0);
358 mb_put_uint16le(mbp
, 0);
362 error
= smb_rq_simple(rqp
);
363 SMBSDEBUG("%d\n", error
);
368 static char smb_any_share
[] = "?????";
371 smb_share_typename(int stype
)
380 pp
= smb_any_share
; /* can't use LPT: here... */
397 smb_smb_treeconnect(struct smb_share
*ssp
, struct smb_cred
*scred
)
400 struct smb_rq rq
, *rqp
= &rq
;
402 char *pp
, *pbuf
, *encpass
;
403 int error
, plen
, caseopt
;
405 ssp
->ss_tid
= SMB_TID_UNKNOWN
;
406 error
= smb_rq_alloc(SSTOCP(ssp
), SMB_COM_TREE_CONNECT_ANDX
, scred
, &rqp
);
410 caseopt
= SMB_CS_NONE
;
411 if (vcp
->vc_sopt
.sv_sm
& SMB_SM_USER
) {
417 pbuf
= kmalloc(SMB_MAXPASSWORDLEN
+ 1, M_SMBTEMP
, M_WAITOK
);
418 encpass
= kmalloc(24, M_SMBTEMP
, M_WAITOK
);
419 iconv_convstr(vcp
->vc_toupper
, pbuf
, smb_share_getpass(ssp
));
420 iconv_convstr(vcp
->vc_toserver
, pbuf
, pbuf
);
421 if (vcp
->vc_sopt
.sv_sm
& SMB_SM_ENCRYPT
) {
423 smb_encrypt(pbuf
, vcp
->vc_ch
, encpass
);
426 plen
= strlen(pbuf
) + 1;
432 mb_put_uint8(mbp
, 0xff);
433 mb_put_uint8(mbp
, 0);
434 mb_put_uint16le(mbp
, 0);
435 mb_put_uint16le(mbp
, 0); /* Flags */
436 mb_put_uint16le(mbp
, plen
);
439 mb_put_mem(mbp
, pp
, plen
, MB_MSYSTEM
);
440 smb_put_dmem(mbp
, vcp
, "\\\\", 2, caseopt
);
441 pp
= vcp
->vc_srvname
;
442 smb_put_dmem(mbp
, vcp
, pp
, strlen(pp
), caseopt
);
443 smb_put_dmem(mbp
, vcp
, "\\", 1, caseopt
);
445 smb_put_dstring(mbp
, vcp
, pp
, caseopt
);
446 pp
= smb_share_typename(ssp
->ss_type
);
447 smb_put_dstring(mbp
, vcp
, pp
, caseopt
);
449 error
= smb_rq_simple(rqp
);
450 SMBSDEBUG("%d\n", error
);
453 ssp
->ss_tid
= rqp
->sr_rptid
;
454 ssp
->ss_vcgenid
= vcp
->vc_genid
;
455 ssp
->ss_flags
|= SMBS_CONNECTED
;
458 kfree(encpass
, M_SMBTEMP
);
460 kfree(pbuf
, M_SMBTEMP
);
466 smb_smb_treedisconnect(struct smb_share
*ssp
, struct smb_cred
*scred
)
472 if (ssp
->ss_tid
== SMB_TID_UNKNOWN
)
474 error
= smb_rq_alloc(SSTOCP(ssp
), SMB_COM_TREE_DISCONNECT
, scred
, &rqp
);
482 error
= smb_rq_simple(rqp
);
483 SMBSDEBUG("%d\n", error
);
485 ssp
->ss_tid
= SMB_TID_UNKNOWN
;
490 smb_smb_read(struct smb_share
*ssp
, u_int16_t fid
,
491 int *len
, int *rresid
, struct uio
*uio
, struct smb_cred
*scred
)
498 int error
, rlen
, blksz
;
500 error
= smb_rq_alloc(SSTOCP(ssp
), SMB_COM_READ
, scred
, &rqp
);
504 blksz
= SSTOVC(ssp
)->vc_txmax
- SMB_HDRLEN
- 16;
505 rlen
= *len
= min(blksz
, *len
);
507 smb_rq_getrequest(rqp
, &mbp
);
509 mb_put_mem(mbp
, (caddr_t
)&fid
, sizeof(fid
), MB_MSYSTEM
);
510 mb_put_uint16le(mbp
, rlen
);
511 mb_put_uint32le(mbp
, uio
->uio_offset
);
512 mb_put_uint16le(mbp
, min(uio
->uio_resid
, 0xffff));
517 error
= smb_rq_simple(rqp
);
520 smb_rq_getreply(rqp
, &mdp
);
521 md_get_uint8(mdp
, &wc
);
526 md_get_uint16le(mdp
, &resid
);
527 md_get_mem(mdp
, NULL
, 4 * 2, MB_MSYSTEM
);
528 md_get_uint16le(mdp
, &bc
);
529 md_get_uint8(mdp
, NULL
); /* ignore buffer type */
530 md_get_uint16le(mdp
, &resid
);
535 error
= md_get_uio(mdp
, uio
, resid
);
545 smb_read(struct smb_share
*ssp
, u_int16_t fid
, struct uio
*uio
,
546 struct smb_cred
*scred
)
548 int tsize
, len
, resid
;
551 tsize
= uio
->uio_resid
;
554 error
= smb_smb_read(ssp
, fid
, &len
, &resid
, uio
, scred
);
565 smb_smb_write(struct smb_share
*ssp
, u_int16_t fid
, int *len
, int *rresid
,
566 struct uio
*uio
, struct smb_cred
*scred
)
575 /* write data must be real */
576 KKASSERT(uio
->uio_segflg
!= UIO_NOCOPY
);
578 blksz
= SSTOVC(ssp
)->vc_txmax
- SMB_HDRLEN
- 16;
582 resid
= *len
= min(blksz
, *len
);
584 error
= smb_rq_alloc(SSTOCP(ssp
), SMB_COM_WRITE
, scred
, &rqp
);
587 smb_rq_getrequest(rqp
, &mbp
);
589 mb_put_mem(mbp
, (caddr_t
)&fid
, sizeof(fid
), MB_MSYSTEM
);
590 mb_put_uint16le(mbp
, resid
);
591 mb_put_uint32le(mbp
, uio
->uio_offset
);
592 mb_put_uint16le(mbp
, min(uio
->uio_resid
, 0xffff));
595 mb_put_uint8(mbp
, SMB_DT_DATA
);
596 mb_put_uint16le(mbp
, resid
);
598 error
= mb_put_uio(mbp
, uio
, resid
);
602 error
= smb_rq_simple(rqp
);
605 smb_rq_getreply(rqp
, &mdp
);
606 md_get_uint8(mdp
, &wc
);
611 md_get_uint16le(mdp
, &resid
);
619 smb_write(struct smb_share
*ssp
, u_int16_t fid
, struct uio
*uio
,
620 struct smb_cred
*scred
)
622 int error
= 0, len
, tsize
, resid
;
625 tsize
= uio
->uio_resid
;
629 error
= smb_smb_write(ssp
, fid
, &len
, &resid
, uio
, scred
);
640 * Errors can happen on the copyin, the rpc, etc. So they
641 * imply resid is unreliable. The only safe thing is
642 * to pretend zero bytes made it. We needn't restore the
643 * iovs because callers don't depend on them in error
644 * paths - uio_resid and uio_offset are what matter.
652 smb_smb_echo(struct smb_vc
*vcp
, struct smb_cred
*scred
)
658 error
= smb_rq_alloc(VCTOCP(vcp
), SMB_COM_ECHO
, scred
, &rqp
);
663 mb_put_uint16le(mbp
, 1);
666 mb_put_uint32le(mbp
, 0);
668 error
= smb_rq_simple(rqp
);
669 SMBSDEBUG("%d\n", error
);