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