4 * SMB/CIFS session setup handling routines
6 * Copyright (c) International Business Machines Corp., 2006, 2007
7 * Author(s): Steve French (sfrench@us.ibm.com)
9 * This library is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU Lesser General Public License as published
11 * by the Free Software Foundation; either version 2.1 of the License, or
12 * (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
17 * the GNU Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public License
20 * along with this library; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26 #include "cifsproto.h"
27 #include "cifs_unicode.h"
28 #include "cifs_debug.h"
31 #include <linux/utsname.h>
32 #include "cifs_spnego.h"
34 extern void SMBNTencrypt(unsigned char *passwd
, unsigned char *c8
,
37 static __u32
cifs_ssetup_hdr(struct cifsSesInfo
*ses
, SESSION_SETUP_ANDX
*pSMB
)
39 __u32 capabilities
= 0;
41 /* init fields common to all four types of SessSetup */
42 /* note that header is initialized to zero in header_assemble */
43 pSMB
->req
.AndXCommand
= 0xFF;
44 pSMB
->req
.MaxBufferSize
= cpu_to_le16(ses
->server
->maxBuf
);
45 pSMB
->req
.MaxMpxCount
= cpu_to_le16(ses
->server
->maxReq
);
47 /* Now no need to set SMBFLG_CASELESS or obsolete CANONICAL PATH */
49 /* BB verify whether signing required on neg or just on auth frame
52 capabilities
= CAP_LARGE_FILES
| CAP_NT_SMBS
| CAP_LEVEL_II_OPLOCKS
|
53 CAP_LARGE_WRITE_X
| CAP_LARGE_READ_X
;
55 if (ses
->server
->secMode
&
56 (SECMODE_SIGN_REQUIRED
| SECMODE_SIGN_ENABLED
))
57 pSMB
->req
.hdr
.Flags2
|= SMBFLG2_SECURITY_SIGNATURE
;
59 if (ses
->capabilities
& CAP_UNICODE
) {
60 pSMB
->req
.hdr
.Flags2
|= SMBFLG2_UNICODE
;
61 capabilities
|= CAP_UNICODE
;
63 if (ses
->capabilities
& CAP_STATUS32
) {
64 pSMB
->req
.hdr
.Flags2
|= SMBFLG2_ERR_STATUS
;
65 capabilities
|= CAP_STATUS32
;
67 if (ses
->capabilities
& CAP_DFS
) {
68 pSMB
->req
.hdr
.Flags2
|= SMBFLG2_DFS
;
69 capabilities
|= CAP_DFS
;
71 if (ses
->capabilities
& CAP_UNIX
)
72 capabilities
|= CAP_UNIX
;
74 /* BB check whether to init vcnum BB */
79 unicode_oslm_strings(char **pbcc_area
, const struct nls_table
*nls_cp
)
81 char *bcc_ptr
= *pbcc_area
;
85 bytes_ret
= cifs_strtoUCS((__le16
*)bcc_ptr
, "Linux version ", 32,
87 bcc_ptr
+= 2 * bytes_ret
;
88 bytes_ret
= cifs_strtoUCS((__le16
*) bcc_ptr
, init_utsname()->release
,
90 bcc_ptr
+= 2 * bytes_ret
;
91 bcc_ptr
+= 2; /* trailing null */
93 bytes_ret
= cifs_strtoUCS((__le16
*) bcc_ptr
, CIFS_NETWORK_OPSYS
,
95 bcc_ptr
+= 2 * bytes_ret
;
96 bcc_ptr
+= 2; /* trailing null */
101 static void unicode_domain_string(char **pbcc_area
, struct cifsSesInfo
*ses
,
102 const struct nls_table
*nls_cp
)
104 char *bcc_ptr
= *pbcc_area
;
108 if (ses
->domainName
== NULL
) {
109 /* Sending null domain better than using a bogus domain name (as
110 we did briefly in 2.6.18) since server will use its default */
115 bytes_ret
= cifs_strtoUCS((__le16
*) bcc_ptr
, ses
->domainName
,
117 bcc_ptr
+= 2 * bytes_ret
;
118 bcc_ptr
+= 2; /* account for null terminator */
120 *pbcc_area
= bcc_ptr
;
124 static void unicode_ssetup_strings(char **pbcc_area
, struct cifsSesInfo
*ses
,
125 const struct nls_table
*nls_cp
)
127 char *bcc_ptr
= *pbcc_area
;
130 /* BB FIXME add check that strings total less
131 than 335 or will need to send them as arrays */
133 /* unicode strings, must be word aligned before the call */
134 /* if ((long) bcc_ptr % 2) {
139 if (ses
->userName
== NULL
) {
140 /* null user mount */
143 } else { /* 300 should be long enough for any conceivable user name */
144 bytes_ret
= cifs_strtoUCS((__le16
*) bcc_ptr
, ses
->userName
,
147 bcc_ptr
+= 2 * bytes_ret
;
148 bcc_ptr
+= 2; /* account for null termination */
150 unicode_domain_string(&bcc_ptr
, ses
, nls_cp
);
151 unicode_oslm_strings(&bcc_ptr
, nls_cp
);
153 *pbcc_area
= bcc_ptr
;
156 static void ascii_ssetup_strings(char **pbcc_area
, struct cifsSesInfo
*ses
,
157 const struct nls_table
*nls_cp
)
159 char *bcc_ptr
= *pbcc_area
;
162 /* BB what about null user mounts - check that we do this BB */
164 if (ses
->userName
== NULL
) {
165 /* BB what about null user mounts - check that we do this BB */
166 } else { /* 300 should be long enough for any conceivable user name */
167 strncpy(bcc_ptr
, ses
->userName
, 300);
169 /* BB improve check for overflow */
170 bcc_ptr
+= strnlen(ses
->userName
, 300);
172 bcc_ptr
++; /* account for null termination */
176 if (ses
->domainName
!= NULL
) {
177 strncpy(bcc_ptr
, ses
->domainName
, 256);
178 bcc_ptr
+= strnlen(ses
->domainName
, 256);
179 } /* else we will send a null domain name
180 so the server will default to its own domain */
184 /* BB check for overflow here */
186 strcpy(bcc_ptr
, "Linux version ");
187 bcc_ptr
+= strlen("Linux version ");
188 strcpy(bcc_ptr
, init_utsname()->release
);
189 bcc_ptr
+= strlen(init_utsname()->release
) + 1;
191 strcpy(bcc_ptr
, CIFS_NETWORK_OPSYS
);
192 bcc_ptr
+= strlen(CIFS_NETWORK_OPSYS
) + 1;
194 *pbcc_area
= bcc_ptr
;
197 static int decode_unicode_ssetup(char **pbcc_area
, int bleft
,
198 struct cifsSesInfo
*ses
,
199 const struct nls_table
*nls_cp
)
203 char *data
= *pbcc_area
;
205 cFYI(1, ("bleft %d", bleft
));
208 * Windows servers do not always double null terminate their final
209 * Unicode string. Check to see if there are an uneven number of bytes
210 * left. If so, then add an extra NULL pad byte to the end of the
213 * See section 2.7.2 in "Implementing CIFS" for details
220 words_left
= bleft
/ 2;
222 /* save off server operating system */
223 len
= UniStrnlen((wchar_t *) data
, words_left
);
225 if (len
>= words_left
)
228 kfree(ses
->serverOS
);
229 /* UTF-8 string will not grow more than four times as big as UCS-16 */
230 ses
->serverOS
= kzalloc(4 * len
, GFP_KERNEL
);
231 if (ses
->serverOS
!= NULL
)
232 cifs_strfromUCS_le(ses
->serverOS
, (__le16
*)data
, len
, nls_cp
);
233 data
+= 2 * (len
+ 1);
234 words_left
-= len
+ 1;
236 /* save off server network operating system */
237 len
= UniStrnlen((wchar_t *) data
, words_left
);
239 if (len
>= words_left
)
242 kfree(ses
->serverNOS
);
243 ses
->serverNOS
= kzalloc(4 * len
, GFP_KERNEL
); /* BB this is wrong length FIXME BB */
244 if (ses
->serverNOS
!= NULL
) {
245 cifs_strfromUCS_le(ses
->serverNOS
, (__le16
*)data
, len
,
247 if (strncmp(ses
->serverNOS
, "NT LAN Manager 4", 16) == 0) {
248 cFYI(1, ("NT4 server"));
249 ses
->flags
|= CIFS_SES_NT4
;
252 data
+= 2 * (len
+ 1);
253 words_left
-= len
+ 1;
255 /* save off server domain */
256 len
= UniStrnlen((wchar_t *) data
, words_left
);
258 if (len
> words_left
)
261 kfree(ses
->serverDomain
);
262 ses
->serverDomain
= kzalloc((4 * len
) + 2, GFP_KERNEL
);
263 if (ses
->serverDomain
!= NULL
)
264 cifs_strfromUCS_le(ses
->serverDomain
, (__le16
*)data
, len
,
266 data
+= 2 * (len
+ 1);
267 words_left
-= len
+ 1;
269 cFYI(1, ("words left: %d", words_left
));
274 static int decode_ascii_ssetup(char **pbcc_area
, int bleft
,
275 struct cifsSesInfo
*ses
,
276 const struct nls_table
*nls_cp
)
280 char *bcc_ptr
= *pbcc_area
;
282 cFYI(1, ("decode sessetup ascii. bleft %d", bleft
));
284 len
= strnlen(bcc_ptr
, bleft
);
288 kfree(ses
->serverOS
);
290 ses
->serverOS
= kzalloc(len
+ 1, GFP_KERNEL
);
292 strncpy(ses
->serverOS
, bcc_ptr
, len
);
293 if (strncmp(ses
->serverOS
, "OS/2", 4) == 0) {
294 cFYI(1, ("OS/2 server"));
295 ses
->flags
|= CIFS_SES_OS2
;
301 len
= strnlen(bcc_ptr
, bleft
);
305 kfree(ses
->serverNOS
);
307 ses
->serverNOS
= kzalloc(len
+ 1, GFP_KERNEL
);
309 strncpy(ses
->serverNOS
, bcc_ptr
, len
);
314 len
= strnlen(bcc_ptr
, bleft
);
318 /* No domain field in LANMAN case. Domain is
319 returned by old servers in the SMB negprot response */
320 /* BB For newer servers which do not support Unicode,
321 but thus do return domain here we could add parsing
322 for it later, but it is not very important */
323 cFYI(1, ("ascii: bytes left %d", bleft
));
329 CIFS_SessSetup(unsigned int xid
, struct cifsSesInfo
*ses
, int first_time
,
330 const struct nls_table
*nls_cp
)
334 struct smb_hdr
*smb_buf
;
337 SESSION_SETUP_ANDX
*pSMB
;
342 enum securityEnum type
;
345 struct key
*spnego_key
= NULL
;
350 type
= ses
->server
->secType
;
352 cFYI(1, ("sess setup type %d", type
));
353 if (type
== LANMAN
) {
354 #ifndef CONFIG_CIFS_WEAK_PW_HASH
355 /* LANMAN and plaintext are less secure and off by default.
356 So we make this explicitly be turned on in kconfig (in the
357 build) and turned on at runtime (changed from the default)
358 in proc/fs/cifs or via mount parm. Unfortunately this is
359 needed for old Win (e.g. Win95), some obscure NAS and OS/2 */
362 wct
= 10; /* lanman 2 style sessionsetup */
363 } else if ((type
== NTLM
) || (type
== NTLMv2
)) {
364 /* For NTLMv2 failures eventually may need to retry NTLM */
365 wct
= 13; /* old style NTLM sessionsetup */
366 } else /* same size: negotiate or auth, NTLMSSP or extended security */
369 rc
= small_smb_init_no_tc(SMB_COM_SESSION_SETUP_ANDX
, wct
, ses
,
374 pSMB
= (SESSION_SETUP_ANDX
*)smb_buf
;
376 capabilities
= cifs_ssetup_hdr(ses
, pSMB
);
378 /* we will send the SMB in three pieces:
379 a fixed length beginning part, an optional
380 SPNEGO blob (which can be zero length), and a
381 last part which will include the strings
382 and rest of bcc area. This allows us to avoid
383 a large buffer 17K allocation */
384 iov
[0].iov_base
= (char *)pSMB
;
385 iov
[0].iov_len
= smb_buf
->smb_buf_length
+ 4;
387 /* setting this here allows the code at the end of the function
388 to free the request buffer if there's an error */
389 resp_buf_type
= CIFS_SMALL_BUFFER
;
391 /* 2000 big enough to fit max user, domain, NOS name etc. */
392 str_area
= kmalloc(2000, GFP_KERNEL
);
393 if (str_area
== NULL
) {
399 ses
->flags
&= ~CIFS_SES_LANMAN
;
401 iov
[1].iov_base
= NULL
;
404 if (type
== LANMAN
) {
405 #ifdef CONFIG_CIFS_WEAK_PW_HASH
406 char lnm_session_key
[CIFS_SESS_KEY_SIZE
];
408 /* no capabilities flags in old lanman negotiation */
410 pSMB
->old_req
.PasswordLength
= cpu_to_le16(CIFS_SESS_KEY_SIZE
);
411 /* BB calculate hash with password */
412 /* and copy into bcc */
414 calc_lanman_hash(ses
, lnm_session_key
);
415 ses
->flags
|= CIFS_SES_LANMAN
;
416 /* #ifdef CONFIG_CIFS_DEBUG2
417 cifs_dump_mem("cryptkey: ",ses->server->cryptKey,
420 memcpy(bcc_ptr
, (char *)lnm_session_key
, CIFS_SESS_KEY_SIZE
);
421 bcc_ptr
+= CIFS_SESS_KEY_SIZE
;
423 /* can not sign if LANMAN negotiated so no need
424 to calculate signing key? but what if server
425 changed to do higher than lanman dialect and
426 we reconnected would we ever calc signing_key? */
428 cFYI(1, ("Negotiating LANMAN setting up strings"));
429 /* Unicode not allowed for LANMAN dialects */
430 ascii_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
432 } else if (type
== NTLM
) {
433 char ntlm_session_key
[CIFS_SESS_KEY_SIZE
];
435 pSMB
->req_no_secext
.Capabilities
= cpu_to_le32(capabilities
);
436 pSMB
->req_no_secext
.CaseInsensitivePasswordLength
=
437 cpu_to_le16(CIFS_SESS_KEY_SIZE
);
438 pSMB
->req_no_secext
.CaseSensitivePasswordLength
=
439 cpu_to_le16(CIFS_SESS_KEY_SIZE
);
441 /* calculate session key */
442 SMBNTencrypt(ses
->password
, ses
->server
->cryptKey
,
445 if (first_time
) /* should this be moved into common code
446 with similar ntlmv2 path? */
447 cifs_calculate_mac_key(&ses
->server
->mac_signing_key
,
448 ntlm_session_key
, ses
->password
);
449 /* copy session key */
451 memcpy(bcc_ptr
, (char *)ntlm_session_key
, CIFS_SESS_KEY_SIZE
);
452 bcc_ptr
+= CIFS_SESS_KEY_SIZE
;
453 memcpy(bcc_ptr
, (char *)ntlm_session_key
, CIFS_SESS_KEY_SIZE
);
454 bcc_ptr
+= CIFS_SESS_KEY_SIZE
;
455 if (ses
->capabilities
& CAP_UNICODE
) {
456 /* unicode strings must be word aligned */
457 if (iov
[0].iov_len
% 2) {
461 unicode_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
463 ascii_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
464 } else if (type
== NTLMv2
) {
466 kmalloc(sizeof(struct ntlmv2_resp
), GFP_KERNEL
);
468 /* BB FIXME change all users of v2_sess_key to
469 struct ntlmv2_resp */
471 if (v2_sess_key
== NULL
) {
476 pSMB
->req_no_secext
.Capabilities
= cpu_to_le32(capabilities
);
478 /* LM2 password would be here if we supported it */
479 pSMB
->req_no_secext
.CaseInsensitivePasswordLength
= 0;
480 /* cpu_to_le16(LM2_SESS_KEY_SIZE); */
482 pSMB
->req_no_secext
.CaseSensitivePasswordLength
=
483 cpu_to_le16(sizeof(struct ntlmv2_resp
));
485 /* calculate session key */
486 setup_ntlmv2_rsp(ses
, v2_sess_key
, nls_cp
);
487 if (first_time
) /* should this be moved into common code
488 with similar ntlmv2 path? */
489 /* cifs_calculate_ntlmv2_mac_key(ses->server->mac_signing_key,
490 response BB FIXME, v2_sess_key); */
492 /* copy session key */
494 /* memcpy(bcc_ptr, (char *)ntlm_session_key,LM2_SESS_KEY_SIZE);
495 bcc_ptr += LM2_SESS_KEY_SIZE; */
496 memcpy(bcc_ptr
, (char *)v2_sess_key
,
497 sizeof(struct ntlmv2_resp
));
498 bcc_ptr
+= sizeof(struct ntlmv2_resp
);
500 if (ses
->capabilities
& CAP_UNICODE
) {
501 if (iov
[0].iov_len
% 2) {
505 unicode_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
507 ascii_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
508 } else if (type
== Kerberos
) {
509 #ifdef CONFIG_CIFS_UPCALL
510 struct cifs_spnego_msg
*msg
;
511 spnego_key
= cifs_get_spnego_key(ses
);
512 if (IS_ERR(spnego_key
)) {
513 rc
= PTR_ERR(spnego_key
);
518 msg
= spnego_key
->payload
.data
;
519 /* bail out if key is too long */
520 if (msg
->sesskey_len
>
521 sizeof(ses
->server
->mac_signing_key
.data
.krb5
)) {
522 cERROR(1, ("Kerberos signing key too long (%u bytes)",
527 ses
->server
->mac_signing_key
.len
= msg
->sesskey_len
;
528 memcpy(ses
->server
->mac_signing_key
.data
.krb5
, msg
->data
,
530 pSMB
->req
.hdr
.Flags2
|= SMBFLG2_EXT_SEC
;
531 capabilities
|= CAP_EXTENDED_SECURITY
;
532 pSMB
->req
.Capabilities
= cpu_to_le32(capabilities
);
533 iov
[1].iov_base
= msg
->data
+ msg
->sesskey_len
;
534 iov
[1].iov_len
= msg
->secblob_len
;
535 pSMB
->req
.SecurityBlobLength
= cpu_to_le16(iov
[1].iov_len
);
537 if (ses
->capabilities
& CAP_UNICODE
) {
538 /* unicode strings must be word aligned */
539 if (iov
[0].iov_len
% 2) {
543 unicode_oslm_strings(&bcc_ptr
, nls_cp
);
544 unicode_domain_string(&bcc_ptr
, ses
, nls_cp
);
546 /* BB: is this right? */
547 ascii_ssetup_strings(&bcc_ptr
, ses
, nls_cp
);
548 #else /* ! CONFIG_CIFS_UPCALL */
549 cERROR(1, ("Kerberos negotiated but upcall support disabled!"));
552 #endif /* CONFIG_CIFS_UPCALL */
554 cERROR(1, ("secType %d not supported!", type
));
559 iov
[2].iov_base
= str_area
;
560 iov
[2].iov_len
= (long) bcc_ptr
- (long) str_area
;
562 count
= iov
[1].iov_len
+ iov
[2].iov_len
;
563 smb_buf
->smb_buf_length
+= count
;
565 BCC_LE(smb_buf
) = cpu_to_le16(count
);
567 rc
= SendReceive2(xid
, ses
, iov
, 3 /* num_iovecs */, &resp_buf_type
,
568 CIFS_STD_OP
/* not long */ | CIFS_LOG_ERROR
);
569 /* SMB request buf freed in SendReceive2 */
571 cFYI(1, ("ssetup rc from sendrecv2 is %d", rc
));
575 pSMB
= (SESSION_SETUP_ANDX
*)iov
[0].iov_base
;
576 smb_buf
= (struct smb_hdr
*)iov
[0].iov_base
;
578 if ((smb_buf
->WordCount
!= 3) && (smb_buf
->WordCount
!= 4)) {
580 cERROR(1, ("bad word count %d", smb_buf
->WordCount
));
583 action
= le16_to_cpu(pSMB
->resp
.Action
);
584 if (action
& GUEST_LOGIN
)
585 cFYI(1, ("Guest login")); /* BB mark SesInfo struct? */
586 ses
->Suid
= smb_buf
->Uid
; /* UID left in wire format (le) */
587 cFYI(1, ("UID = %d ", ses
->Suid
));
588 /* response can have either 3 or 4 word count - Samba sends 3 */
589 /* and lanman response is 3 */
590 bytes_remaining
= BCC(smb_buf
);
591 bcc_ptr
= pByteArea(smb_buf
);
593 if (smb_buf
->WordCount
== 4) {
595 blob_len
= le16_to_cpu(pSMB
->resp
.SecurityBlobLength
);
597 if (blob_len
> bytes_remaining
) {
598 cERROR(1, ("bad security blob length %d", blob_len
));
602 bytes_remaining
-= blob_len
;
605 /* BB check if Unicode and decode strings */
606 if (smb_buf
->Flags2
& SMBFLG2_UNICODE
) {
607 /* unicode string area must be word-aligned */
608 if (((unsigned long) bcc_ptr
- (unsigned long) smb_buf
) % 2) {
612 rc
= decode_unicode_ssetup(&bcc_ptr
, bytes_remaining
,
615 rc
= decode_ascii_ssetup(&bcc_ptr
, bytes_remaining
,
623 if (resp_buf_type
== CIFS_SMALL_BUFFER
) {
624 cFYI(1, ("ssetup freeing small buf %p", iov
[0].iov_base
));
625 cifs_small_buf_release(iov
[0].iov_base
);
626 } else if (resp_buf_type
== CIFS_LARGE_BUFFER
)
627 cifs_buf_release(iov
[0].iov_base
);