91b51e4aa80e89901e35a91100af3c47ef332dcf
[pandora-kernel.git] / fs / cifs / sess.c
1 /*
2  *   fs/cifs/sess.c
3  *
4  *   SMB/CIFS session setup handling routines
5  *
6  *   Copyright (c) International Business Machines  Corp., 2006, 2009
7  *   Author(s): Steve French (sfrench@us.ibm.com)
8  *
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.
13  *
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.
18  *
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
22  */
23
24 #include "cifspdu.h"
25 #include "cifsglob.h"
26 #include "cifsproto.h"
27 #include "cifs_unicode.h"
28 #include "cifs_debug.h"
29 #include "ntlmssp.h"
30 #include "nterr.h"
31 #include <linux/utsname.h>
32 #include <linux/slab.h>
33 #include "cifs_spnego.h"
34
35 /*
36  * Checks if this is the first smb session to be reconnected after
37  * the socket has been reestablished (so we know whether to use vc 0).
38  * Called while holding the cifs_tcp_ses_lock, so do not block
39  */
40 static bool is_first_ses_reconnect(struct cifs_ses *ses)
41 {
42         struct list_head *tmp;
43         struct cifs_ses *tmp_ses;
44
45         list_for_each(tmp, &ses->server->smb_ses_list) {
46                 tmp_ses = list_entry(tmp, struct cifs_ses,
47                                      smb_ses_list);
48                 if (tmp_ses->need_reconnect == false)
49                         return false;
50         }
51         /* could not find a session that was already connected,
52            this must be the first one we are reconnecting */
53         return true;
54 }
55
56 /*
57  *      vc number 0 is treated specially by some servers, and should be the
58  *      first one we request.  After that we can use vcnumbers up to maxvcs,
59  *      one for each smb session (some Windows versions set maxvcs incorrectly
60  *      so maxvc=1 can be ignored).  If we have too many vcs, we can reuse
61  *      any vc but zero (some servers reset the connection on vcnum zero)
62  *
63  */
64 static __le16 get_next_vcnum(struct cifs_ses *ses)
65 {
66         __u16 vcnum = 0;
67         struct list_head *tmp;
68         struct cifs_ses *tmp_ses;
69         __u16 max_vcs = ses->server->max_vcs;
70         __u16 i;
71         int free_vc_found = 0;
72
73         /* Quoting the MS-SMB specification: "Windows-based SMB servers set this
74         field to one but do not enforce this limit, which allows an SMB client
75         to establish more virtual circuits than allowed by this value ... but
76         other server implementations can enforce this limit." */
77         if (max_vcs < 2)
78                 max_vcs = 0xFFFF;
79
80         spin_lock(&cifs_tcp_ses_lock);
81         if ((ses->need_reconnect) && is_first_ses_reconnect(ses))
82                         goto get_vc_num_exit;  /* vcnum will be zero */
83         for (i = ses->server->srv_count - 1; i < max_vcs; i++) {
84                 if (i == 0) /* this is the only connection, use vc 0 */
85                         break;
86
87                 free_vc_found = 1;
88
89                 list_for_each(tmp, &ses->server->smb_ses_list) {
90                         tmp_ses = list_entry(tmp, struct cifs_ses,
91                                              smb_ses_list);
92                         if (tmp_ses->vcnum == i) {
93                                 free_vc_found = 0;
94                                 break; /* found duplicate, try next vcnum */
95                         }
96                 }
97                 if (free_vc_found)
98                         break; /* we found a vcnumber that will work - use it */
99         }
100
101         if (i == 0)
102                 vcnum = 0; /* for most common case, ie if one smb session, use
103                               vc zero.  Also for case when no free vcnum, zero
104                               is safest to send (some clients only send zero) */
105         else if (free_vc_found == 0)
106                 vcnum = 1;  /* we can not reuse vc=0 safely, since some servers
107                                 reset all uids on that, but 1 is ok. */
108         else
109                 vcnum = i;
110         ses->vcnum = vcnum;
111 get_vc_num_exit:
112         spin_unlock(&cifs_tcp_ses_lock);
113
114         return cpu_to_le16(vcnum);
115 }
116
117 static __u32 cifs_ssetup_hdr(struct cifs_ses *ses, SESSION_SETUP_ANDX *pSMB)
118 {
119         __u32 capabilities = 0;
120
121         /* init fields common to all four types of SessSetup */
122         /* Note that offsets for first seven fields in req struct are same  */
123         /*      in CIFS Specs so does not matter which of 3 forms of struct */
124         /*      that we use in next few lines                               */
125         /* Note that header is initialized to zero in header_assemble */
126         pSMB->req.AndXCommand = 0xFF;
127         pSMB->req.MaxBufferSize = cpu_to_le16(min_t(u32,
128                                         CIFSMaxBufSize + MAX_CIFS_HDR_SIZE - 4,
129                                         USHRT_MAX));
130         pSMB->req.MaxMpxCount = cpu_to_le16(ses->server->maxReq);
131         pSMB->req.VcNumber = get_next_vcnum(ses);
132
133         /* Now no need to set SMBFLG_CASELESS or obsolete CANONICAL PATH */
134
135         /* BB verify whether signing required on neg or just on auth frame
136            (and NTLM case) */
137
138         capabilities = CAP_LARGE_FILES | CAP_NT_SMBS | CAP_LEVEL_II_OPLOCKS |
139                         CAP_LARGE_WRITE_X | CAP_LARGE_READ_X;
140
141         if (ses->server->sec_mode &
142             (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED))
143                 pSMB->req.hdr.Flags2 |= SMBFLG2_SECURITY_SIGNATURE;
144
145         if (ses->capabilities & CAP_UNICODE) {
146                 pSMB->req.hdr.Flags2 |= SMBFLG2_UNICODE;
147                 capabilities |= CAP_UNICODE;
148         }
149         if (ses->capabilities & CAP_STATUS32) {
150                 pSMB->req.hdr.Flags2 |= SMBFLG2_ERR_STATUS;
151                 capabilities |= CAP_STATUS32;
152         }
153         if (ses->capabilities & CAP_DFS) {
154                 pSMB->req.hdr.Flags2 |= SMBFLG2_DFS;
155                 capabilities |= CAP_DFS;
156         }
157         if (ses->capabilities & CAP_UNIX)
158                 capabilities |= CAP_UNIX;
159
160         return capabilities;
161 }
162
163 static void
164 unicode_oslm_strings(char **pbcc_area, const struct nls_table *nls_cp)
165 {
166         char *bcc_ptr = *pbcc_area;
167         int bytes_ret = 0;
168
169         /* Copy OS version */
170         bytes_ret = cifs_strtoUCS((__le16 *)bcc_ptr, "Linux version ", 32,
171                                   nls_cp);
172         bcc_ptr += 2 * bytes_ret;
173         bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, init_utsname()->release,
174                                   32, nls_cp);
175         bcc_ptr += 2 * bytes_ret;
176         bcc_ptr += 2; /* trailing null */
177
178         bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, CIFS_NETWORK_OPSYS,
179                                   32, nls_cp);
180         bcc_ptr += 2 * bytes_ret;
181         bcc_ptr += 2; /* trailing null */
182
183         *pbcc_area = bcc_ptr;
184 }
185
186 static void unicode_domain_string(char **pbcc_area, struct cifs_ses *ses,
187                                    const struct nls_table *nls_cp)
188 {
189         char *bcc_ptr = *pbcc_area;
190         int bytes_ret = 0;
191
192         /* copy domain */
193         if (ses->domainName == NULL) {
194                 /* Sending null domain better than using a bogus domain name (as
195                 we did briefly in 2.6.18) since server will use its default */
196                 *bcc_ptr = 0;
197                 *(bcc_ptr+1) = 0;
198                 bytes_ret = 0;
199         } else
200                 bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, ses->domainName,
201                                           CIFS_MAX_DOMAINNAME_LEN, nls_cp);
202         bcc_ptr += 2 * bytes_ret;
203         bcc_ptr += 2;  /* account for null terminator */
204
205         *pbcc_area = bcc_ptr;
206 }
207
208
209 static void unicode_ssetup_strings(char **pbcc_area, struct cifs_ses *ses,
210                                    const struct nls_table *nls_cp)
211 {
212         char *bcc_ptr = *pbcc_area;
213         int bytes_ret = 0;
214
215         /* BB FIXME add check that strings total less
216         than 335 or will need to send them as arrays */
217
218         /* unicode strings, must be word aligned before the call */
219 /*      if ((long) bcc_ptr % 2) {
220                 *bcc_ptr = 0;
221                 bcc_ptr++;
222         } */
223         /* copy user */
224         if (ses->user_name == NULL) {
225                 /* null user mount */
226                 *bcc_ptr = 0;
227                 *(bcc_ptr+1) = 0;
228         } else {
229                 bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, ses->user_name,
230                                           MAX_USERNAME_SIZE, nls_cp);
231         }
232         bcc_ptr += 2 * bytes_ret;
233         bcc_ptr += 2; /* account for null termination */
234
235         unicode_domain_string(&bcc_ptr, ses, nls_cp);
236         unicode_oslm_strings(&bcc_ptr, nls_cp);
237
238         *pbcc_area = bcc_ptr;
239 }
240
241 static void ascii_ssetup_strings(char **pbcc_area, struct cifs_ses *ses,
242                                  const struct nls_table *nls_cp)
243 {
244         char *bcc_ptr = *pbcc_area;
245
246         /* copy user */
247         /* BB what about null user mounts - check that we do this BB */
248         /* copy user */
249         if (ses->user_name != NULL) {
250                 strncpy(bcc_ptr, ses->user_name, MAX_USERNAME_SIZE);
251                 bcc_ptr += strnlen(ses->user_name, MAX_USERNAME_SIZE);
252         }
253         /* else null user mount */
254         *bcc_ptr = 0;
255         bcc_ptr++; /* account for null termination */
256
257         /* copy domain */
258         if (ses->domainName != NULL) {
259                 strncpy(bcc_ptr, ses->domainName, CIFS_MAX_DOMAINNAME_LEN);
260                 bcc_ptr += strnlen(ses->domainName, CIFS_MAX_DOMAINNAME_LEN);
261         } /* else we will send a null domain name
262              so the server will default to its own domain */
263         *bcc_ptr = 0;
264         bcc_ptr++;
265
266         /* BB check for overflow here */
267
268         strcpy(bcc_ptr, "Linux version ");
269         bcc_ptr += strlen("Linux version ");
270         strcpy(bcc_ptr, init_utsname()->release);
271         bcc_ptr += strlen(init_utsname()->release) + 1;
272
273         strcpy(bcc_ptr, CIFS_NETWORK_OPSYS);
274         bcc_ptr += strlen(CIFS_NETWORK_OPSYS) + 1;
275
276         *pbcc_area = bcc_ptr;
277 }
278
279 static void
280 decode_unicode_ssetup(char **pbcc_area, int bleft, struct cifs_ses *ses,
281                       const struct nls_table *nls_cp)
282 {
283         int len;
284         char *data = *pbcc_area;
285
286         cFYI(1, "bleft %d", bleft);
287
288         kfree(ses->serverOS);
289         ses->serverOS = cifs_strndup_from_ucs(data, bleft, true, nls_cp);
290         cFYI(1, "serverOS=%s", ses->serverOS);
291         len = (UniStrnlen((wchar_t *) data, bleft / 2) * 2) + 2;
292         data += len;
293         bleft -= len;
294         if (bleft <= 0)
295                 return;
296
297         kfree(ses->serverNOS);
298         ses->serverNOS = cifs_strndup_from_ucs(data, bleft, true, nls_cp);
299         cFYI(1, "serverNOS=%s", ses->serverNOS);
300         len = (UniStrnlen((wchar_t *) data, bleft / 2) * 2) + 2;
301         data += len;
302         bleft -= len;
303         if (bleft <= 0)
304                 return;
305
306         kfree(ses->serverDomain);
307         ses->serverDomain = cifs_strndup_from_ucs(data, bleft, true, nls_cp);
308         cFYI(1, "serverDomain=%s", ses->serverDomain);
309
310         return;
311 }
312
313 static int decode_ascii_ssetup(char **pbcc_area, __u16 bleft,
314                                struct cifs_ses *ses,
315                                const struct nls_table *nls_cp)
316 {
317         int rc = 0;
318         int len;
319         char *bcc_ptr = *pbcc_area;
320
321         cFYI(1, "decode sessetup ascii. bleft %d", bleft);
322
323         len = strnlen(bcc_ptr, bleft);
324         if (len >= bleft)
325                 return rc;
326
327         kfree(ses->serverOS);
328
329         ses->serverOS = kzalloc(len + 1, GFP_KERNEL);
330         if (ses->serverOS)
331                 strncpy(ses->serverOS, bcc_ptr, len);
332         if (strncmp(ses->serverOS, "OS/2", 4) == 0) {
333                         cFYI(1, "OS/2 server");
334                         ses->flags |= CIFS_SES_OS2;
335         }
336
337         bcc_ptr += len + 1;
338         bleft -= len + 1;
339
340         len = strnlen(bcc_ptr, bleft);
341         if (len >= bleft)
342                 return rc;
343
344         kfree(ses->serverNOS);
345
346         ses->serverNOS = kzalloc(len + 1, GFP_KERNEL);
347         if (ses->serverNOS)
348                 strncpy(ses->serverNOS, bcc_ptr, len);
349
350         bcc_ptr += len + 1;
351         bleft -= len + 1;
352
353         len = strnlen(bcc_ptr, bleft);
354         if (len > bleft)
355                 return rc;
356
357         /* No domain field in LANMAN case. Domain is
358            returned by old servers in the SMB negprot response */
359         /* BB For newer servers which do not support Unicode,
360            but thus do return domain here we could add parsing
361            for it later, but it is not very important */
362         cFYI(1, "ascii: bytes left %d", bleft);
363
364         return rc;
365 }
366
367 static int decode_ntlmssp_challenge(char *bcc_ptr, int blob_len,
368                                     struct cifs_ses *ses)
369 {
370         unsigned int tioffset; /* challenge message target info area */
371         unsigned int tilen; /* challenge message target info area length  */
372
373         CHALLENGE_MESSAGE *pblob = (CHALLENGE_MESSAGE *)bcc_ptr;
374
375         if (blob_len < sizeof(CHALLENGE_MESSAGE)) {
376                 cERROR(1, "challenge blob len %d too small", blob_len);
377                 return -EINVAL;
378         }
379
380         if (memcmp(pblob->Signature, "NTLMSSP", 8)) {
381                 cERROR(1, "blob signature incorrect %s", pblob->Signature);
382                 return -EINVAL;
383         }
384         if (pblob->MessageType != NtLmChallenge) {
385                 cERROR(1, "Incorrect message type %d", pblob->MessageType);
386                 return -EINVAL;
387         }
388
389         memcpy(ses->ntlmssp->cryptkey, pblob->Challenge, CIFS_CRYPTO_KEY_SIZE);
390         /* BB we could decode pblob->NegotiateFlags; some may be useful */
391         /* In particular we can examine sign flags */
392         /* BB spec says that if AvId field of MsvAvTimestamp is populated then
393                 we must set the MIC field of the AUTHENTICATE_MESSAGE */
394         ses->ntlmssp->server_flags = le32_to_cpu(pblob->NegotiateFlags);
395         tioffset = le32_to_cpu(pblob->TargetInfoArray.BufferOffset);
396         tilen = le16_to_cpu(pblob->TargetInfoArray.Length);
397         if (tilen) {
398                 ses->auth_key.response = kmalloc(tilen, GFP_KERNEL);
399                 if (!ses->auth_key.response) {
400                         cERROR(1, "Challenge target info allocation failure");
401                         return -ENOMEM;
402                 }
403                 memcpy(ses->auth_key.response, bcc_ptr + tioffset, tilen);
404                 ses->auth_key.len = tilen;
405         }
406
407         return 0;
408 }
409
410 /* BB Move to ntlmssp.c eventually */
411
412 /* We do not malloc the blob, it is passed in pbuffer, because
413    it is fixed size, and small, making this approach cleaner */
414 static void build_ntlmssp_negotiate_blob(unsigned char *pbuffer,
415                                          struct cifs_ses *ses)
416 {
417         NEGOTIATE_MESSAGE *sec_blob = (NEGOTIATE_MESSAGE *)pbuffer;
418         __u32 flags;
419
420         memset(pbuffer, 0, sizeof(NEGOTIATE_MESSAGE));
421         memcpy(sec_blob->Signature, NTLMSSP_SIGNATURE, 8);
422         sec_blob->MessageType = NtLmNegotiate;
423
424         /* BB is NTLMV2 session security format easier to use here? */
425         flags = NTLMSSP_NEGOTIATE_56 |  NTLMSSP_REQUEST_TARGET |
426                 NTLMSSP_NEGOTIATE_128 | NTLMSSP_NEGOTIATE_UNICODE |
427                 NTLMSSP_NEGOTIATE_NTLM | NTLMSSP_NEGOTIATE_EXTENDED_SEC;
428         if (ses->server->sec_mode &
429                         (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED)) {
430                 flags |= NTLMSSP_NEGOTIATE_SIGN;
431                 if (!ses->server->session_estab)
432                         flags |= NTLMSSP_NEGOTIATE_KEY_XCH;
433         }
434
435         sec_blob->NegotiateFlags = cpu_to_le32(flags);
436
437         sec_blob->WorkstationName.BufferOffset = 0;
438         sec_blob->WorkstationName.Length = 0;
439         sec_blob->WorkstationName.MaximumLength = 0;
440
441         /* Domain name is sent on the Challenge not Negotiate NTLMSSP request */
442         sec_blob->DomainName.BufferOffset = 0;
443         sec_blob->DomainName.Length = 0;
444         sec_blob->DomainName.MaximumLength = 0;
445 }
446
447 static int size_of_ntlmssp_blob(struct cifs_ses *ses)
448 {
449         int sz = sizeof(AUTHENTICATE_MESSAGE) + ses->auth_key.len
450                 - CIFS_SESS_KEY_SIZE + CIFS_CPHTXT_SIZE + 2;
451
452         if (ses->domainName)
453                 sz += 2 * strnlen(ses->domainName, CIFS_MAX_DOMAINNAME_LEN);
454         else
455                 sz += 2;
456
457         if (ses->user_name)
458                 sz += 2 * strnlen(ses->user_name, MAX_USERNAME_SIZE);
459         else
460                 sz += 2;
461
462         return sz;
463 }
464
465 static int build_ntlmssp_auth_blob(unsigned char **pbuffer,
466                                         u16 *buflen,
467                                    struct cifs_ses *ses,
468                                    const struct nls_table *nls_cp)
469 {
470         int rc;
471         AUTHENTICATE_MESSAGE *sec_blob;
472         __u32 flags;
473         unsigned char *tmp;
474
475         rc = setup_ntlmv2_rsp(ses, nls_cp);
476         if (rc) {
477                 cERROR(1, "Error %d during NTLMSSP authentication", rc);
478                 *buflen = 0;
479                 goto setup_ntlmv2_ret;
480         }
481         *pbuffer = kmalloc(size_of_ntlmssp_blob(ses), GFP_KERNEL);
482         sec_blob = (AUTHENTICATE_MESSAGE *)*pbuffer;
483
484         memcpy(sec_blob->Signature, NTLMSSP_SIGNATURE, 8);
485         sec_blob->MessageType = NtLmAuthenticate;
486
487         flags = NTLMSSP_NEGOTIATE_56 |
488                 NTLMSSP_REQUEST_TARGET | NTLMSSP_NEGOTIATE_TARGET_INFO |
489                 NTLMSSP_NEGOTIATE_128 | NTLMSSP_NEGOTIATE_UNICODE |
490                 NTLMSSP_NEGOTIATE_NTLM | NTLMSSP_NEGOTIATE_EXTENDED_SEC;
491         if (ses->server->sec_mode &
492            (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED)) {
493                 flags |= NTLMSSP_NEGOTIATE_SIGN;
494                 if (!ses->server->session_estab)
495                         flags |= NTLMSSP_NEGOTIATE_KEY_XCH;
496         }
497
498         tmp = *pbuffer + sizeof(AUTHENTICATE_MESSAGE);
499         sec_blob->NegotiateFlags = cpu_to_le32(flags);
500
501         sec_blob->LmChallengeResponse.BufferOffset =
502                                 cpu_to_le32(sizeof(AUTHENTICATE_MESSAGE));
503         sec_blob->LmChallengeResponse.Length = 0;
504         sec_blob->LmChallengeResponse.MaximumLength = 0;
505
506         sec_blob->NtChallengeResponse.BufferOffset =
507                                 cpu_to_le32(tmp - *pbuffer);
508         if (ses->user_name != NULL) {
509                 memcpy(tmp, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
510                                 ses->auth_key.len - CIFS_SESS_KEY_SIZE);
511                 tmp += ses->auth_key.len - CIFS_SESS_KEY_SIZE;
512
513                 sec_blob->NtChallengeResponse.Length =
514                                 cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
515                 sec_blob->NtChallengeResponse.MaximumLength =
516                                 cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
517         } else {
518                 /*
519                  * don't send an NT Response for anonymous access
520                  */
521                 sec_blob->NtChallengeResponse.Length = 0;
522                 sec_blob->NtChallengeResponse.MaximumLength = 0;
523         }
524
525         if (ses->domainName == NULL) {
526                 sec_blob->DomainName.BufferOffset = cpu_to_le32(tmp - *pbuffer);
527                 sec_blob->DomainName.Length = 0;
528                 sec_blob->DomainName.MaximumLength = 0;
529                 tmp += 2;
530         } else {
531                 int len;
532                 len = cifs_strtoUCS((__le16 *)tmp, ses->domainName,
533                                     MAX_USERNAME_SIZE, nls_cp);
534                 len *= 2; /* unicode is 2 bytes each */
535                 sec_blob->DomainName.BufferOffset = cpu_to_le32(tmp - *pbuffer);
536                 sec_blob->DomainName.Length = cpu_to_le16(len);
537                 sec_blob->DomainName.MaximumLength = cpu_to_le16(len);
538                 tmp += len;
539         }
540
541         if (ses->user_name == NULL) {
542                 sec_blob->UserName.BufferOffset = cpu_to_le32(tmp - *pbuffer);
543                 sec_blob->UserName.Length = 0;
544                 sec_blob->UserName.MaximumLength = 0;
545                 tmp += 2;
546         } else {
547                 int len;
548                 len = cifs_strtoUCS((__le16 *)tmp, ses->user_name,
549                                     MAX_USERNAME_SIZE, nls_cp);
550                 len *= 2; /* unicode is 2 bytes each */
551                 sec_blob->UserName.BufferOffset = cpu_to_le32(tmp - *pbuffer);
552                 sec_blob->UserName.Length = cpu_to_le16(len);
553                 sec_blob->UserName.MaximumLength = cpu_to_le16(len);
554                 tmp += len;
555         }
556
557         sec_blob->WorkstationName.BufferOffset = cpu_to_le32(tmp - *pbuffer);
558         sec_blob->WorkstationName.Length = 0;
559         sec_blob->WorkstationName.MaximumLength = 0;
560         tmp += 2;
561
562         if (((ses->ntlmssp->server_flags & NTLMSSP_NEGOTIATE_KEY_XCH) ||
563                 (ses->ntlmssp->server_flags & NTLMSSP_NEGOTIATE_EXTENDED_SEC))
564                         && !calc_seckey(ses)) {
565                 memcpy(tmp, ses->ntlmssp->ciphertext, CIFS_CPHTXT_SIZE);
566                 sec_blob->SessionKey.BufferOffset = cpu_to_le32(tmp - *pbuffer);
567                 sec_blob->SessionKey.Length = cpu_to_le16(CIFS_CPHTXT_SIZE);
568                 sec_blob->SessionKey.MaximumLength =
569                                 cpu_to_le16(CIFS_CPHTXT_SIZE);
570                 tmp += CIFS_CPHTXT_SIZE;
571         } else {
572                 sec_blob->SessionKey.BufferOffset = cpu_to_le32(tmp - *pbuffer);
573                 sec_blob->SessionKey.Length = 0;
574                 sec_blob->SessionKey.MaximumLength = 0;
575         }
576
577         *buflen = tmp - *pbuffer;
578 setup_ntlmv2_ret:
579         return rc;
580 }
581
582 int
583 CIFS_SessSetup(unsigned int xid, struct cifs_ses *ses,
584                const struct nls_table *nls_cp)
585 {
586         int rc = 0;
587         int wct;
588         struct smb_hdr *smb_buf;
589         char *bcc_ptr;
590         char *str_area;
591         SESSION_SETUP_ANDX *pSMB;
592         __u32 capabilities;
593         __u16 count;
594         int resp_buf_type;
595         struct kvec iov[3];
596         enum securityEnum type;
597         __u16 action, bytes_remaining;
598         struct key *spnego_key = NULL;
599         __le32 phase = NtLmNegotiate; /* NTLMSSP, if needed, is multistage */
600         u16 blob_len;
601         unsigned char *ntlmsspblob = NULL;
602
603         if (ses == NULL)
604                 return -EINVAL;
605
606         type = ses->server->secType;
607         cFYI(1, "sess setup type %d", type);
608         if (type == RawNTLMSSP) {
609                 /* if memory allocation is successful, caller of this function
610                  * frees it.
611                  */
612                 ses->ntlmssp = kmalloc(sizeof(struct ntlmssp_auth), GFP_KERNEL);
613                 if (!ses->ntlmssp)
614                         return -ENOMEM;
615         }
616
617 ssetup_ntlmssp_authenticate:
618         if (phase == NtLmChallenge)
619                 phase = NtLmAuthenticate; /* if ntlmssp, now final phase */
620
621         if (type == LANMAN) {
622 #ifndef CONFIG_CIFS_WEAK_PW_HASH
623                 /* LANMAN and plaintext are less secure and off by default.
624                 So we make this explicitly be turned on in kconfig (in the
625                 build) and turned on at runtime (changed from the default)
626                 in proc/fs/cifs or via mount parm.  Unfortunately this is
627                 needed for old Win (e.g. Win95), some obscure NAS and OS/2 */
628                 return -EOPNOTSUPP;
629 #endif
630                 wct = 10; /* lanman 2 style sessionsetup */
631         } else if ((type == NTLM) || (type == NTLMv2)) {
632                 /* For NTLMv2 failures eventually may need to retry NTLM */
633                 wct = 13; /* old style NTLM sessionsetup */
634         } else /* same size: negotiate or auth, NTLMSSP or extended security */
635                 wct = 12;
636
637         rc = small_smb_init_no_tc(SMB_COM_SESSION_SETUP_ANDX, wct, ses,
638                             (void **)&smb_buf);
639         if (rc)
640                 return rc;
641
642         pSMB = (SESSION_SETUP_ANDX *)smb_buf;
643
644         capabilities = cifs_ssetup_hdr(ses, pSMB);
645
646         /* we will send the SMB in three pieces:
647         a fixed length beginning part, an optional
648         SPNEGO blob (which can be zero length), and a
649         last part which will include the strings
650         and rest of bcc area. This allows us to avoid
651         a large buffer 17K allocation */
652         iov[0].iov_base = (char *)pSMB;
653         iov[0].iov_len = be32_to_cpu(smb_buf->smb_buf_length) + 4;
654
655         /* setting this here allows the code at the end of the function
656            to free the request buffer if there's an error */
657         resp_buf_type = CIFS_SMALL_BUFFER;
658
659         /* 2000 big enough to fit max user, domain, NOS name etc. */
660         str_area = kmalloc(2000, GFP_KERNEL);
661         if (str_area == NULL) {
662                 rc = -ENOMEM;
663                 goto ssetup_exit;
664         }
665         bcc_ptr = str_area;
666
667         ses->flags &= ~CIFS_SES_LANMAN;
668
669         iov[1].iov_base = NULL;
670         iov[1].iov_len = 0;
671
672         if (type == LANMAN) {
673 #ifdef CONFIG_CIFS_WEAK_PW_HASH
674                 char lnm_session_key[CIFS_AUTH_RESP_SIZE];
675
676                 pSMB->req.hdr.Flags2 &= ~SMBFLG2_UNICODE;
677
678                 if (ses->user_name != NULL) {
679                         /* no capabilities flags in old lanman negotiation */
680                         pSMB->old_req.PasswordLength = cpu_to_le16(CIFS_AUTH_RESP_SIZE);
681
682                         /* Calculate hash with password and copy into bcc_ptr.
683                          * Encryption Key (stored as in cryptkey) gets used if the
684                          * security mode bit in Negottiate Protocol response states
685                          * to use challenge/response method (i.e. Password bit is 1).
686                          */
687                         rc = calc_lanman_hash(ses->password, ses->server->cryptkey,
688                                               ses->server->sec_mode & SECMODE_PW_ENCRYPT ?
689                                               true : false, lnm_session_key);
690
691                         memcpy(bcc_ptr, (char *)lnm_session_key, CIFS_AUTH_RESP_SIZE);
692                         bcc_ptr += CIFS_AUTH_RESP_SIZE;
693                 } else {
694                         pSMB->old_req.PasswordLength = 0;
695                 }
696                 ses->flags |= CIFS_SES_LANMAN;
697
698                 /* can not sign if LANMAN negotiated so no need
699                 to calculate signing key? but what if server
700                 changed to do higher than lanman dialect and
701                 we reconnected would we ever calc signing_key? */
702
703                 cFYI(1, "Negotiating LANMAN setting up strings");
704                 /* Unicode not allowed for LANMAN dialects */
705                 ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
706 #endif
707         } else if (type == NTLM) {
708                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
709                 if (ses->user_name != NULL) {
710                         pSMB->req_no_secext.CaseInsensitivePasswordLength =
711                                         cpu_to_le16(CIFS_AUTH_RESP_SIZE);
712                         pSMB->req_no_secext.CaseSensitivePasswordLength =
713                                         cpu_to_le16(CIFS_AUTH_RESP_SIZE);
714
715                         /* calculate ntlm response and session key */
716                         rc = setup_ntlm_response(ses, nls_cp);
717                         if (rc) {
718                                 cERROR(1, "Error %d during NTLM authentication",
719                                                  rc);
720                                 goto ssetup_exit;
721                         }
722
723                         /* copy ntlm response */
724                         memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
725                                         CIFS_AUTH_RESP_SIZE);
726                         bcc_ptr += CIFS_AUTH_RESP_SIZE;
727                         memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
728                                         CIFS_AUTH_RESP_SIZE);
729                         bcc_ptr += CIFS_AUTH_RESP_SIZE;
730                 } else {
731                         pSMB->req_no_secext.CaseInsensitivePasswordLength = 0;
732                         pSMB->req_no_secext.CaseSensitivePasswordLength = 0;
733                 }
734
735                 if (ses->capabilities & CAP_UNICODE) {
736                         /* unicode strings must be word aligned */
737                         if (iov[0].iov_len % 2) {
738                                 *bcc_ptr = 0;
739                                 bcc_ptr++;
740                         }
741                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
742                 } else
743                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
744         } else if (type == NTLMv2) {
745                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
746
747                 /* LM2 password would be here if we supported it */
748                 pSMB->req_no_secext.CaseInsensitivePasswordLength = 0;
749
750                 if (ses->user_name != NULL) {
751                         /* calculate nlmv2 response and session key */
752                         rc = setup_ntlmv2_rsp(ses, nls_cp);
753                         if (rc) {
754                                 cERROR(1, "Error %d during NTLMv2 authentication", rc);
755                                 goto ssetup_exit;
756                         }
757
758                         memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
759                                         ses->auth_key.len - CIFS_SESS_KEY_SIZE);
760                         bcc_ptr += ses->auth_key.len - CIFS_SESS_KEY_SIZE;
761
762                         /* set case sensitive password length after tilen may get
763                          * assigned, tilen is 0 otherwise.
764                          */
765                         pSMB->req_no_secext.CaseSensitivePasswordLength =
766                                 cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
767                 } else {
768                         pSMB->req_no_secext.CaseSensitivePasswordLength = 0;
769                 }
770
771                 if (ses->capabilities & CAP_UNICODE) {
772                         if (iov[0].iov_len % 2) {
773                                 *bcc_ptr = 0;
774                                 bcc_ptr++;
775                         }
776                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
777                 } else
778                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
779         } else if (type == Kerberos) {
780 #ifdef CONFIG_CIFS_UPCALL
781                 struct cifs_spnego_msg *msg;
782
783                 spnego_key = cifs_get_spnego_key(ses);
784                 if (IS_ERR(spnego_key)) {
785                         rc = PTR_ERR(spnego_key);
786                         spnego_key = NULL;
787                         goto ssetup_exit;
788                 }
789
790                 msg = spnego_key->payload.data;
791                 /* check version field to make sure that cifs.upcall is
792                    sending us a response in an expected form */
793                 if (msg->version != CIFS_SPNEGO_UPCALL_VERSION) {
794                         cERROR(1, "incorrect version of cifs.upcall (expected"
795                                    " %d but got %d)",
796                                    CIFS_SPNEGO_UPCALL_VERSION, msg->version);
797                         rc = -EKEYREJECTED;
798                         goto ssetup_exit;
799                 }
800
801                 ses->auth_key.response = kmalloc(msg->sesskey_len, GFP_KERNEL);
802                 if (!ses->auth_key.response) {
803                         cERROR(1, "Kerberos can't allocate (%u bytes) memory",
804                                         msg->sesskey_len);
805                         rc = -ENOMEM;
806                         goto ssetup_exit;
807                 }
808                 memcpy(ses->auth_key.response, msg->data, msg->sesskey_len);
809                 ses->auth_key.len = msg->sesskey_len;
810
811                 pSMB->req.hdr.Flags2 |= SMBFLG2_EXT_SEC;
812                 capabilities |= CAP_EXTENDED_SECURITY;
813                 pSMB->req.Capabilities = cpu_to_le32(capabilities);
814                 iov[1].iov_base = msg->data + msg->sesskey_len;
815                 iov[1].iov_len = msg->secblob_len;
816                 pSMB->req.SecurityBlobLength = cpu_to_le16(iov[1].iov_len);
817
818                 if (ses->capabilities & CAP_UNICODE) {
819                         /* unicode strings must be word aligned */
820                         if ((iov[0].iov_len + iov[1].iov_len) % 2) {
821                                 *bcc_ptr = 0;
822                                 bcc_ptr++;
823                         }
824                         unicode_oslm_strings(&bcc_ptr, nls_cp);
825                         unicode_domain_string(&bcc_ptr, ses, nls_cp);
826                 } else
827                 /* BB: is this right? */
828                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
829 #else /* ! CONFIG_CIFS_UPCALL */
830                 cERROR(1, "Kerberos negotiated but upcall support disabled!");
831                 rc = -ENOSYS;
832                 goto ssetup_exit;
833 #endif /* CONFIG_CIFS_UPCALL */
834         } else if (type == RawNTLMSSP) {
835                 if ((pSMB->req.hdr.Flags2 & SMBFLG2_UNICODE) == 0) {
836                         cERROR(1, "NTLMSSP requires Unicode support");
837                         rc = -ENOSYS;
838                         goto ssetup_exit;
839                 }
840
841                 cFYI(1, "ntlmssp session setup phase %d", phase);
842                 pSMB->req.hdr.Flags2 |= SMBFLG2_EXT_SEC;
843                 capabilities |= CAP_EXTENDED_SECURITY;
844                 pSMB->req.Capabilities |= cpu_to_le32(capabilities);
845                 switch(phase) {
846                 case NtLmNegotiate:
847                         build_ntlmssp_negotiate_blob(
848                                 pSMB->req.SecurityBlob, ses);
849                         iov[1].iov_len = sizeof(NEGOTIATE_MESSAGE);
850                         iov[1].iov_base = pSMB->req.SecurityBlob;
851                         pSMB->req.SecurityBlobLength =
852                                 cpu_to_le16(sizeof(NEGOTIATE_MESSAGE));
853                         break;
854                 case NtLmAuthenticate:
855                         rc = build_ntlmssp_auth_blob(&ntlmsspblob,
856                                                 &blob_len, ses, nls_cp);
857                         if (rc)
858                                 goto ssetup_exit;
859                         iov[1].iov_len = blob_len;
860                         iov[1].iov_base = ntlmsspblob;
861                         pSMB->req.SecurityBlobLength = cpu_to_le16(blob_len);
862                         /*
863                          * Make sure that we tell the server that we are using
864                          * the uid that it just gave us back on the response
865                          * (challenge)
866                          */
867                         smb_buf->Uid = ses->Suid;
868                         break;
869                 default:
870                         cERROR(1, "invalid phase %d", phase);
871                         rc = -ENOSYS;
872                         goto ssetup_exit;
873                 }
874                 /* unicode strings must be word aligned */
875                 if ((iov[0].iov_len + iov[1].iov_len) % 2) {
876                         *bcc_ptr = 0;
877                         bcc_ptr++;
878                 }
879                 unicode_oslm_strings(&bcc_ptr, nls_cp);
880         } else {
881                 cERROR(1, "secType %d not supported!", type);
882                 rc = -ENOSYS;
883                 goto ssetup_exit;
884         }
885
886         iov[2].iov_base = str_area;
887         iov[2].iov_len = (long) bcc_ptr - (long) str_area;
888
889         count = iov[1].iov_len + iov[2].iov_len;
890         smb_buf->smb_buf_length =
891                 cpu_to_be32(be32_to_cpu(smb_buf->smb_buf_length) + count);
892
893         put_bcc(count, smb_buf);
894
895         rc = SendReceive2(xid, ses, iov, 3 /* num_iovecs */, &resp_buf_type,
896                           CIFS_LOG_ERROR);
897         /* SMB request buf freed in SendReceive2 */
898
899         pSMB = (SESSION_SETUP_ANDX *)iov[0].iov_base;
900         smb_buf = (struct smb_hdr *)iov[0].iov_base;
901
902         if ((type == RawNTLMSSP) && (smb_buf->Status.CifsError ==
903                         cpu_to_le32(NT_STATUS_MORE_PROCESSING_REQUIRED))) {
904                 if (phase != NtLmNegotiate) {
905                         cERROR(1, "Unexpected more processing error");
906                         goto ssetup_exit;
907                 }
908                 /* NTLMSSP Negotiate sent now processing challenge (response) */
909                 phase = NtLmChallenge; /* process ntlmssp challenge */
910                 rc = 0; /* MORE_PROC rc is not an error here, but expected */
911         }
912         if (rc)
913                 goto ssetup_exit;
914
915         if ((smb_buf->WordCount != 3) && (smb_buf->WordCount != 4)) {
916                 rc = -EIO;
917                 cERROR(1, "bad word count %d", smb_buf->WordCount);
918                 goto ssetup_exit;
919         }
920         action = le16_to_cpu(pSMB->resp.Action);
921         if (action & GUEST_LOGIN)
922                 cFYI(1, "Guest login"); /* BB mark SesInfo struct? */
923         ses->Suid = smb_buf->Uid;   /* UID left in wire format (le) */
924         cFYI(1, "UID = %d ", ses->Suid);
925         /* response can have either 3 or 4 word count - Samba sends 3 */
926         /* and lanman response is 3 */
927         bytes_remaining = get_bcc(smb_buf);
928         bcc_ptr = pByteArea(smb_buf);
929
930         if (smb_buf->WordCount == 4) {
931                 blob_len = le16_to_cpu(pSMB->resp.SecurityBlobLength);
932                 if (blob_len > bytes_remaining) {
933                         cERROR(1, "bad security blob length %d", blob_len);
934                         rc = -EINVAL;
935                         goto ssetup_exit;
936                 }
937                 if (phase == NtLmChallenge) {
938                         rc = decode_ntlmssp_challenge(bcc_ptr, blob_len, ses);
939                         /* now goto beginning for ntlmssp authenticate phase */
940                         if (rc)
941                                 goto ssetup_exit;
942                 }
943                 bcc_ptr += blob_len;
944                 bytes_remaining -= blob_len;
945         }
946
947         /* BB check if Unicode and decode strings */
948         if (bytes_remaining == 0) {
949                 /* no string area to decode, do nothing */
950         } else if (smb_buf->Flags2 & SMBFLG2_UNICODE) {
951                 /* unicode string area must be word-aligned */
952                 if (((unsigned long) bcc_ptr - (unsigned long) smb_buf) % 2) {
953                         ++bcc_ptr;
954                         --bytes_remaining;
955                 }
956                 decode_unicode_ssetup(&bcc_ptr, bytes_remaining, ses, nls_cp);
957         } else {
958                 rc = decode_ascii_ssetup(&bcc_ptr, bytes_remaining,
959                                          ses, nls_cp);
960         }
961
962 ssetup_exit:
963         if (spnego_key) {
964                 key_revoke(spnego_key);
965                 key_put(spnego_key);
966         }
967         kfree(str_area);
968         kfree(ntlmsspblob);
969         ntlmsspblob = NULL;
970         if (resp_buf_type == CIFS_SMALL_BUFFER) {
971                 cFYI(1, "ssetup freeing small buf %p", iov[0].iov_base);
972                 cifs_small_buf_release(iov[0].iov_base);
973         } else if (resp_buf_type == CIFS_LARGE_BUFFER)
974                 cifs_buf_release(iov[0].iov_base);
975
976         /* if ntlmssp, and negotiate succeeded, proceed to authenticate phase */
977         if ((phase == NtLmChallenge) && (rc == 0))
978                 goto ssetup_ntlmssp_authenticate;
979
980         return rc;
981 }