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