Revert "ext4: use old interface for ext4_readdir()"
[linux-3.10.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_strtoUTF16((__le16 *)bcc_ptr, "Linux version ", 32,
171                                     nls_cp);
172         bcc_ptr += 2 * bytes_ret;
173         bytes_ret = cifs_strtoUTF16((__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_strtoUTF16((__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_strtoUTF16((__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_strtoUTF16((__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         cifs_dbg(FYI, "bleft %d\n", bleft);
287
288         kfree(ses->serverOS);
289         ses->serverOS = cifs_strndup_from_utf16(data, bleft, true, nls_cp);
290         cifs_dbg(FYI, "serverOS=%s\n", 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_utf16(data, bleft, true, nls_cp);
299         cifs_dbg(FYI, "serverNOS=%s\n", 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_utf16(data, bleft, true, nls_cp);
308         cifs_dbg(FYI, "serverDomain=%s\n", 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         cifs_dbg(FYI, "decode sessetup ascii. bleft %d\n", 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                 cifs_dbg(FYI, "OS/2 server\n");
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         cifs_dbg(FYI, "ascii: bytes left %d\n", bleft);
363
364         return rc;
365 }
366
367 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                 cifs_dbg(VFS, "challenge blob len %d too small\n", blob_len);
377                 return -EINVAL;
378         }
379
380         if (memcmp(pblob->Signature, "NTLMSSP", 8)) {
381                 cifs_dbg(VFS, "blob signature incorrect %s\n",
382                          pblob->Signature);
383                 return -EINVAL;
384         }
385         if (pblob->MessageType != NtLmChallenge) {
386                 cifs_dbg(VFS, "Incorrect message type %d\n",
387                          pblob->MessageType);
388                 return -EINVAL;
389         }
390
391         memcpy(ses->ntlmssp->cryptkey, pblob->Challenge, CIFS_CRYPTO_KEY_SIZE);
392         /* BB we could decode pblob->NegotiateFlags; some may be useful */
393         /* In particular we can examine sign flags */
394         /* BB spec says that if AvId field of MsvAvTimestamp is populated then
395                 we must set the MIC field of the AUTHENTICATE_MESSAGE */
396         ses->ntlmssp->server_flags = le32_to_cpu(pblob->NegotiateFlags);
397         tioffset = le32_to_cpu(pblob->TargetInfoArray.BufferOffset);
398         tilen = le16_to_cpu(pblob->TargetInfoArray.Length);
399         if (tioffset > blob_len || tioffset + tilen > blob_len) {
400                 cifs_dbg(VFS, "tioffset + tilen too high %u + %u",
401                         tioffset, tilen);
402                 return -EINVAL;
403         }
404         if (tilen) {
405                 ses->auth_key.response = kmemdup(bcc_ptr + tioffset, tilen,
406                                                  GFP_KERNEL);
407                 if (!ses->auth_key.response) {
408                         cifs_dbg(VFS, "Challenge target info alloc failure");
409                         return -ENOMEM;
410                 }
411                 ses->auth_key.len = tilen;
412         }
413
414         return 0;
415 }
416
417 /* BB Move to ntlmssp.c eventually */
418
419 /* We do not malloc the blob, it is passed in pbuffer, because
420    it is fixed size, and small, making this approach cleaner */
421 void build_ntlmssp_negotiate_blob(unsigned char *pbuffer,
422                                          struct cifs_ses *ses)
423 {
424         NEGOTIATE_MESSAGE *sec_blob = (NEGOTIATE_MESSAGE *)pbuffer;
425         __u32 flags;
426
427         memset(pbuffer, 0, sizeof(NEGOTIATE_MESSAGE));
428         memcpy(sec_blob->Signature, NTLMSSP_SIGNATURE, 8);
429         sec_blob->MessageType = NtLmNegotiate;
430
431         /* BB is NTLMV2 session security format easier to use here? */
432         flags = NTLMSSP_NEGOTIATE_56 |  NTLMSSP_REQUEST_TARGET |
433                 NTLMSSP_NEGOTIATE_128 | NTLMSSP_NEGOTIATE_UNICODE |
434                 NTLMSSP_NEGOTIATE_NTLM | NTLMSSP_NEGOTIATE_EXTENDED_SEC;
435         if (ses->server->sec_mode &
436                         (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED)) {
437                 flags |= NTLMSSP_NEGOTIATE_SIGN;
438                 if (!ses->server->session_estab)
439                         flags |= NTLMSSP_NEGOTIATE_KEY_XCH;
440         }
441
442         sec_blob->NegotiateFlags = cpu_to_le32(flags);
443
444         sec_blob->WorkstationName.BufferOffset = 0;
445         sec_blob->WorkstationName.Length = 0;
446         sec_blob->WorkstationName.MaximumLength = 0;
447
448         /* Domain name is sent on the Challenge not Negotiate NTLMSSP request */
449         sec_blob->DomainName.BufferOffset = 0;
450         sec_blob->DomainName.Length = 0;
451         sec_blob->DomainName.MaximumLength = 0;
452 }
453
454 /* We do not malloc the blob, it is passed in pbuffer, because its
455    maximum possible size is fixed and small, making this approach cleaner.
456    This function returns the length of the data in the blob */
457 int build_ntlmssp_auth_blob(unsigned char *pbuffer,
458                                         u16 *buflen,
459                                    struct cifs_ses *ses,
460                                    const struct nls_table *nls_cp)
461 {
462         int rc;
463         AUTHENTICATE_MESSAGE *sec_blob = (AUTHENTICATE_MESSAGE *)pbuffer;
464         __u32 flags;
465         unsigned char *tmp;
466
467         memcpy(sec_blob->Signature, NTLMSSP_SIGNATURE, 8);
468         sec_blob->MessageType = NtLmAuthenticate;
469
470         flags = NTLMSSP_NEGOTIATE_56 |
471                 NTLMSSP_REQUEST_TARGET | NTLMSSP_NEGOTIATE_TARGET_INFO |
472                 NTLMSSP_NEGOTIATE_128 | NTLMSSP_NEGOTIATE_UNICODE |
473                 NTLMSSP_NEGOTIATE_NTLM | NTLMSSP_NEGOTIATE_EXTENDED_SEC;
474         if (ses->server->sec_mode &
475            (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED)) {
476                 flags |= NTLMSSP_NEGOTIATE_SIGN;
477                 if (!ses->server->session_estab)
478                         flags |= NTLMSSP_NEGOTIATE_KEY_XCH;
479         }
480
481         tmp = pbuffer + sizeof(AUTHENTICATE_MESSAGE);
482         sec_blob->NegotiateFlags = cpu_to_le32(flags);
483
484         sec_blob->LmChallengeResponse.BufferOffset =
485                                 cpu_to_le32(sizeof(AUTHENTICATE_MESSAGE));
486         sec_blob->LmChallengeResponse.Length = 0;
487         sec_blob->LmChallengeResponse.MaximumLength = 0;
488
489         sec_blob->NtChallengeResponse.BufferOffset = cpu_to_le32(tmp - pbuffer);
490         rc = setup_ntlmv2_rsp(ses, nls_cp);
491         if (rc) {
492                 cifs_dbg(VFS, "Error %d during NTLMSSP authentication\n", rc);
493                 goto setup_ntlmv2_ret;
494         }
495         memcpy(tmp, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
496                         ses->auth_key.len - CIFS_SESS_KEY_SIZE);
497         tmp += ses->auth_key.len - CIFS_SESS_KEY_SIZE;
498
499         sec_blob->NtChallengeResponse.Length =
500                         cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
501         sec_blob->NtChallengeResponse.MaximumLength =
502                         cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
503
504         if (ses->domainName == NULL) {
505                 sec_blob->DomainName.BufferOffset = cpu_to_le32(tmp - pbuffer);
506                 sec_blob->DomainName.Length = 0;
507                 sec_blob->DomainName.MaximumLength = 0;
508                 tmp += 2;
509         } else {
510                 int len;
511                 len = cifs_strtoUTF16((__le16 *)tmp, ses->domainName,
512                                       MAX_USERNAME_SIZE, nls_cp);
513                 len *= 2; /* unicode is 2 bytes each */
514                 sec_blob->DomainName.BufferOffset = cpu_to_le32(tmp - pbuffer);
515                 sec_blob->DomainName.Length = cpu_to_le16(len);
516                 sec_blob->DomainName.MaximumLength = cpu_to_le16(len);
517                 tmp += len;
518         }
519
520         if (ses->user_name == NULL) {
521                 sec_blob->UserName.BufferOffset = cpu_to_le32(tmp - pbuffer);
522                 sec_blob->UserName.Length = 0;
523                 sec_blob->UserName.MaximumLength = 0;
524                 tmp += 2;
525         } else {
526                 int len;
527                 len = cifs_strtoUTF16((__le16 *)tmp, ses->user_name,
528                                       MAX_USERNAME_SIZE, nls_cp);
529                 len *= 2; /* unicode is 2 bytes each */
530                 sec_blob->UserName.BufferOffset = cpu_to_le32(tmp - pbuffer);
531                 sec_blob->UserName.Length = cpu_to_le16(len);
532                 sec_blob->UserName.MaximumLength = cpu_to_le16(len);
533                 tmp += len;
534         }
535
536         sec_blob->WorkstationName.BufferOffset = cpu_to_le32(tmp - pbuffer);
537         sec_blob->WorkstationName.Length = 0;
538         sec_blob->WorkstationName.MaximumLength = 0;
539         tmp += 2;
540
541         if (((ses->ntlmssp->server_flags & NTLMSSP_NEGOTIATE_KEY_XCH) ||
542                 (ses->ntlmssp->server_flags & NTLMSSP_NEGOTIATE_EXTENDED_SEC))
543                         && !calc_seckey(ses)) {
544                 memcpy(tmp, ses->ntlmssp->ciphertext, CIFS_CPHTXT_SIZE);
545                 sec_blob->SessionKey.BufferOffset = cpu_to_le32(tmp - pbuffer);
546                 sec_blob->SessionKey.Length = cpu_to_le16(CIFS_CPHTXT_SIZE);
547                 sec_blob->SessionKey.MaximumLength =
548                                 cpu_to_le16(CIFS_CPHTXT_SIZE);
549                 tmp += CIFS_CPHTXT_SIZE;
550         } else {
551                 sec_blob->SessionKey.BufferOffset = cpu_to_le32(tmp - pbuffer);
552                 sec_blob->SessionKey.Length = 0;
553                 sec_blob->SessionKey.MaximumLength = 0;
554         }
555
556 setup_ntlmv2_ret:
557         *buflen = tmp - pbuffer;
558         return rc;
559 }
560
561 int
562 CIFS_SessSetup(const unsigned int xid, struct cifs_ses *ses,
563                const struct nls_table *nls_cp)
564 {
565         int rc = 0;
566         int wct;
567         struct smb_hdr *smb_buf;
568         char *bcc_ptr;
569         char *str_area;
570         SESSION_SETUP_ANDX *pSMB;
571         __u32 capabilities;
572         __u16 count;
573         int resp_buf_type;
574         struct kvec iov[3];
575         enum securityEnum type;
576         __u16 action, bytes_remaining;
577         struct key *spnego_key = NULL;
578         __le32 phase = NtLmNegotiate; /* NTLMSSP, if needed, is multistage */
579         u16 blob_len;
580         char *ntlmsspblob = NULL;
581
582         if (ses == NULL)
583                 return -EINVAL;
584
585         type = ses->server->secType;
586         cifs_dbg(FYI, "sess setup type %d\n", type);
587         if (type == RawNTLMSSP) {
588                 /* if memory allocation is successful, caller of this function
589                  * frees it.
590                  */
591                 ses->ntlmssp = kmalloc(sizeof(struct ntlmssp_auth), GFP_KERNEL);
592                 if (!ses->ntlmssp)
593                         return -ENOMEM;
594         }
595
596 ssetup_ntlmssp_authenticate:
597         if (phase == NtLmChallenge)
598                 phase = NtLmAuthenticate; /* if ntlmssp, now final phase */
599
600         if (type == LANMAN) {
601 #ifndef CONFIG_CIFS_WEAK_PW_HASH
602                 /* LANMAN and plaintext are less secure and off by default.
603                 So we make this explicitly be turned on in kconfig (in the
604                 build) and turned on at runtime (changed from the default)
605                 in proc/fs/cifs or via mount parm.  Unfortunately this is
606                 needed for old Win (e.g. Win95), some obscure NAS and OS/2 */
607                 return -EOPNOTSUPP;
608 #endif
609                 wct = 10; /* lanman 2 style sessionsetup */
610         } else if ((type == NTLM) || (type == NTLMv2)) {
611                 /* For NTLMv2 failures eventually may need to retry NTLM */
612                 wct = 13; /* old style NTLM sessionsetup */
613         } else /* same size: negotiate or auth, NTLMSSP or extended security */
614                 wct = 12;
615
616         rc = small_smb_init_no_tc(SMB_COM_SESSION_SETUP_ANDX, wct, ses,
617                             (void **)&smb_buf);
618         if (rc)
619                 return rc;
620
621         pSMB = (SESSION_SETUP_ANDX *)smb_buf;
622
623         capabilities = cifs_ssetup_hdr(ses, pSMB);
624
625         /* we will send the SMB in three pieces:
626         a fixed length beginning part, an optional
627         SPNEGO blob (which can be zero length), and a
628         last part which will include the strings
629         and rest of bcc area. This allows us to avoid
630         a large buffer 17K allocation */
631         iov[0].iov_base = (char *)pSMB;
632         iov[0].iov_len = be32_to_cpu(smb_buf->smb_buf_length) + 4;
633
634         /* setting this here allows the code at the end of the function
635            to free the request buffer if there's an error */
636         resp_buf_type = CIFS_SMALL_BUFFER;
637
638         /* 2000 big enough to fit max user, domain, NOS name etc. */
639         str_area = kmalloc(2000, GFP_KERNEL);
640         if (str_area == NULL) {
641                 rc = -ENOMEM;
642                 goto ssetup_exit;
643         }
644         bcc_ptr = str_area;
645
646         ses->flags &= ~CIFS_SES_LANMAN;
647
648         iov[1].iov_base = NULL;
649         iov[1].iov_len = 0;
650
651         if (type == LANMAN) {
652 #ifdef CONFIG_CIFS_WEAK_PW_HASH
653                 char lnm_session_key[CIFS_AUTH_RESP_SIZE];
654
655                 pSMB->req.hdr.Flags2 &= ~SMBFLG2_UNICODE;
656
657                 /* no capabilities flags in old lanman negotiation */
658
659                 pSMB->old_req.PasswordLength = cpu_to_le16(CIFS_AUTH_RESP_SIZE);
660
661                 /* Calculate hash with password and copy into bcc_ptr.
662                  * Encryption Key (stored as in cryptkey) gets used if the
663                  * security mode bit in Negottiate Protocol response states
664                  * to use challenge/response method (i.e. Password bit is 1).
665                  */
666
667                 rc = calc_lanman_hash(ses->password, ses->server->cryptkey,
668                                  ses->server->sec_mode & SECMODE_PW_ENCRYPT ?
669                                         true : false, lnm_session_key);
670
671                 ses->flags |= CIFS_SES_LANMAN;
672                 memcpy(bcc_ptr, (char *)lnm_session_key, CIFS_AUTH_RESP_SIZE);
673                 bcc_ptr += CIFS_AUTH_RESP_SIZE;
674
675                 /* can not sign if LANMAN negotiated so no need
676                 to calculate signing key? but what if server
677                 changed to do higher than lanman dialect and
678                 we reconnected would we ever calc signing_key? */
679
680                 cifs_dbg(FYI, "Negotiating LANMAN setting up strings\n");
681                 /* Unicode not allowed for LANMAN dialects */
682                 ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
683 #endif
684         } else if (type == NTLM) {
685                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
686                 pSMB->req_no_secext.CaseInsensitivePasswordLength =
687                         cpu_to_le16(CIFS_AUTH_RESP_SIZE);
688                 pSMB->req_no_secext.CaseSensitivePasswordLength =
689                         cpu_to_le16(CIFS_AUTH_RESP_SIZE);
690
691                 /* calculate ntlm response and session key */
692                 rc = setup_ntlm_response(ses, nls_cp);
693                 if (rc) {
694                         cifs_dbg(VFS, "Error %d during NTLM authentication\n",
695                                  rc);
696                         goto ssetup_exit;
697                 }
698
699                 /* copy ntlm response */
700                 memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
701                                 CIFS_AUTH_RESP_SIZE);
702                 bcc_ptr += CIFS_AUTH_RESP_SIZE;
703                 memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
704                                 CIFS_AUTH_RESP_SIZE);
705                 bcc_ptr += CIFS_AUTH_RESP_SIZE;
706
707                 if (ses->capabilities & CAP_UNICODE) {
708                         /* unicode strings must be word aligned */
709                         if (iov[0].iov_len % 2) {
710                                 *bcc_ptr = 0;
711                                 bcc_ptr++;
712                         }
713                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
714                 } else
715                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
716         } else if (type == NTLMv2) {
717                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
718
719                 /* LM2 password would be here if we supported it */
720                 pSMB->req_no_secext.CaseInsensitivePasswordLength = 0;
721
722                 /* calculate nlmv2 response and session key */
723                 rc = setup_ntlmv2_rsp(ses, nls_cp);
724                 if (rc) {
725                         cifs_dbg(VFS, "Error %d during NTLMv2 authentication\n",
726                                  rc);
727                         goto ssetup_exit;
728                 }
729                 memcpy(bcc_ptr, ses->auth_key.response + CIFS_SESS_KEY_SIZE,
730                                 ses->auth_key.len - CIFS_SESS_KEY_SIZE);
731                 bcc_ptr += ses->auth_key.len - CIFS_SESS_KEY_SIZE;
732
733                 /* set case sensitive password length after tilen may get
734                  * assigned, tilen is 0 otherwise.
735                  */
736                 pSMB->req_no_secext.CaseSensitivePasswordLength =
737                         cpu_to_le16(ses->auth_key.len - CIFS_SESS_KEY_SIZE);
738
739                 if (ses->capabilities & CAP_UNICODE) {
740                         if (iov[0].iov_len % 2) {
741                                 *bcc_ptr = 0;
742                                 bcc_ptr++;
743                         }
744                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
745                 } else
746                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
747         } else if (type == Kerberos) {
748 #ifdef CONFIG_CIFS_UPCALL
749                 struct cifs_spnego_msg *msg;
750
751                 spnego_key = cifs_get_spnego_key(ses);
752                 if (IS_ERR(spnego_key)) {
753                         rc = PTR_ERR(spnego_key);
754                         spnego_key = NULL;
755                         goto ssetup_exit;
756                 }
757
758                 msg = spnego_key->payload.data;
759                 /* check version field to make sure that cifs.upcall is
760                    sending us a response in an expected form */
761                 if (msg->version != CIFS_SPNEGO_UPCALL_VERSION) {
762                         cifs_dbg(VFS, "incorrect version of cifs.upcall "
763                                    "expected %d but got %d)",
764                                    CIFS_SPNEGO_UPCALL_VERSION, msg->version);
765                         rc = -EKEYREJECTED;
766                         goto ssetup_exit;
767                 }
768
769                 ses->auth_key.response = kmemdup(msg->data, msg->sesskey_len,
770                                                  GFP_KERNEL);
771                 if (!ses->auth_key.response) {
772                         cifs_dbg(VFS, "Kerberos can't allocate (%u bytes) memory",
773                                         msg->sesskey_len);
774                         rc = -ENOMEM;
775                         goto ssetup_exit;
776                 }
777                 ses->auth_key.len = msg->sesskey_len;
778
779                 pSMB->req.hdr.Flags2 |= SMBFLG2_EXT_SEC;
780                 capabilities |= CAP_EXTENDED_SECURITY;
781                 pSMB->req.Capabilities = cpu_to_le32(capabilities);
782                 iov[1].iov_base = msg->data + msg->sesskey_len;
783                 iov[1].iov_len = msg->secblob_len;
784                 pSMB->req.SecurityBlobLength = cpu_to_le16(iov[1].iov_len);
785
786                 if (ses->capabilities & CAP_UNICODE) {
787                         /* unicode strings must be word aligned */
788                         if ((iov[0].iov_len + iov[1].iov_len) % 2) {
789                                 *bcc_ptr = 0;
790                                 bcc_ptr++;
791                         }
792                         unicode_oslm_strings(&bcc_ptr, nls_cp);
793                         unicode_domain_string(&bcc_ptr, ses, nls_cp);
794                 } else
795                 /* BB: is this right? */
796                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
797 #else /* ! CONFIG_CIFS_UPCALL */
798                 cifs_dbg(VFS, "Kerberos negotiated but upcall support disabled!\n");
799                 rc = -ENOSYS;
800                 goto ssetup_exit;
801 #endif /* CONFIG_CIFS_UPCALL */
802         } else if (type == RawNTLMSSP) {
803                 if ((pSMB->req.hdr.Flags2 & SMBFLG2_UNICODE) == 0) {
804                         cifs_dbg(VFS, "NTLMSSP requires Unicode support\n");
805                         rc = -ENOSYS;
806                         goto ssetup_exit;
807                 }
808
809                 cifs_dbg(FYI, "ntlmssp session setup phase %d\n", phase);
810                 pSMB->req.hdr.Flags2 |= SMBFLG2_EXT_SEC;
811                 capabilities |= CAP_EXTENDED_SECURITY;
812                 pSMB->req.Capabilities |= cpu_to_le32(capabilities);
813                 switch(phase) {
814                 case NtLmNegotiate:
815                         build_ntlmssp_negotiate_blob(
816                                 pSMB->req.SecurityBlob, ses);
817                         iov[1].iov_len = sizeof(NEGOTIATE_MESSAGE);
818                         iov[1].iov_base = pSMB->req.SecurityBlob;
819                         pSMB->req.SecurityBlobLength =
820                                 cpu_to_le16(sizeof(NEGOTIATE_MESSAGE));
821                         break;
822                 case NtLmAuthenticate:
823                         /*
824                          * 5 is an empirical value, large enough to hold
825                          * authenticate message plus max 10 of av paris,
826                          * domain, user, workstation names, flags, etc.
827                          */
828                         ntlmsspblob = kzalloc(
829                                 5*sizeof(struct _AUTHENTICATE_MESSAGE),
830                                 GFP_KERNEL);
831                         if (!ntlmsspblob) {
832                                 rc = -ENOMEM;
833                                 goto ssetup_exit;
834                         }
835
836                         rc = build_ntlmssp_auth_blob(ntlmsspblob,
837                                                 &blob_len, ses, nls_cp);
838                         if (rc)
839                                 goto ssetup_exit;
840                         iov[1].iov_len = blob_len;
841                         iov[1].iov_base = ntlmsspblob;
842                         pSMB->req.SecurityBlobLength = cpu_to_le16(blob_len);
843                         /*
844                          * Make sure that we tell the server that we are using
845                          * the uid that it just gave us back on the response
846                          * (challenge)
847                          */
848                         smb_buf->Uid = ses->Suid;
849                         break;
850                 default:
851                         cifs_dbg(VFS, "invalid phase %d\n", phase);
852                         rc = -ENOSYS;
853                         goto ssetup_exit;
854                 }
855                 /* unicode strings must be word aligned */
856                 if ((iov[0].iov_len + iov[1].iov_len) % 2) {
857                         *bcc_ptr = 0;
858                         bcc_ptr++;
859                 }
860                 unicode_oslm_strings(&bcc_ptr, nls_cp);
861         } else {
862                 cifs_dbg(VFS, "secType %d not supported!\n", type);
863                 rc = -ENOSYS;
864                 goto ssetup_exit;
865         }
866
867         iov[2].iov_base = str_area;
868         iov[2].iov_len = (long) bcc_ptr - (long) str_area;
869
870         count = iov[1].iov_len + iov[2].iov_len;
871         smb_buf->smb_buf_length =
872                 cpu_to_be32(be32_to_cpu(smb_buf->smb_buf_length) + count);
873
874         put_bcc(count, smb_buf);
875
876         rc = SendReceive2(xid, ses, iov, 3 /* num_iovecs */, &resp_buf_type,
877                           CIFS_LOG_ERROR);
878         /* SMB request buf freed in SendReceive2 */
879
880         pSMB = (SESSION_SETUP_ANDX *)iov[0].iov_base;
881         smb_buf = (struct smb_hdr *)iov[0].iov_base;
882
883         if ((type == RawNTLMSSP) && (resp_buf_type != CIFS_NO_BUFFER) &&
884             (smb_buf->Status.CifsError ==
885                         cpu_to_le32(NT_STATUS_MORE_PROCESSING_REQUIRED))) {
886                 if (phase != NtLmNegotiate) {
887                         cifs_dbg(VFS, "Unexpected more processing error\n");
888                         goto ssetup_exit;
889                 }
890                 /* NTLMSSP Negotiate sent now processing challenge (response) */
891                 phase = NtLmChallenge; /* process ntlmssp challenge */
892                 rc = 0; /* MORE_PROC rc is not an error here, but expected */
893         }
894         if (rc)
895                 goto ssetup_exit;
896
897         if ((smb_buf->WordCount != 3) && (smb_buf->WordCount != 4)) {
898                 rc = -EIO;
899                 cifs_dbg(VFS, "bad word count %d\n", smb_buf->WordCount);
900                 goto ssetup_exit;
901         }
902         action = le16_to_cpu(pSMB->resp.Action);
903         if (action & GUEST_LOGIN)
904                 cifs_dbg(FYI, "Guest login\n"); /* BB mark SesInfo struct? */
905         ses->Suid = smb_buf->Uid;   /* UID left in wire format (le) */
906         cifs_dbg(FYI, "UID = %llu\n", ses->Suid);
907         /* response can have either 3 or 4 word count - Samba sends 3 */
908         /* and lanman response is 3 */
909         bytes_remaining = get_bcc(smb_buf);
910         bcc_ptr = pByteArea(smb_buf);
911
912         if (smb_buf->WordCount == 4) {
913                 blob_len = le16_to_cpu(pSMB->resp.SecurityBlobLength);
914                 if (blob_len > bytes_remaining) {
915                         cifs_dbg(VFS, "bad security blob length %d\n",
916                                  blob_len);
917                         rc = -EINVAL;
918                         goto ssetup_exit;
919                 }
920                 if (phase == NtLmChallenge) {
921                         rc = decode_ntlmssp_challenge(bcc_ptr, blob_len, ses);
922                         /* now goto beginning for ntlmssp authenticate phase */
923                         if (rc)
924                                 goto ssetup_exit;
925                 }
926                 bcc_ptr += blob_len;
927                 bytes_remaining -= blob_len;
928         }
929
930         /* BB check if Unicode and decode strings */
931         if (bytes_remaining == 0) {
932                 /* no string area to decode, do nothing */
933         } else if (smb_buf->Flags2 & SMBFLG2_UNICODE) {
934                 /* unicode string area must be word-aligned */
935                 if (((unsigned long) bcc_ptr - (unsigned long) smb_buf) % 2) {
936                         ++bcc_ptr;
937                         --bytes_remaining;
938                 }
939                 decode_unicode_ssetup(&bcc_ptr, bytes_remaining, ses, nls_cp);
940         } else {
941                 rc = decode_ascii_ssetup(&bcc_ptr, bytes_remaining,
942                                          ses, nls_cp);
943         }
944
945 ssetup_exit:
946         if (spnego_key) {
947                 key_invalidate(spnego_key);
948                 key_put(spnego_key);
949         }
950         kfree(str_area);
951         kfree(ntlmsspblob);
952         ntlmsspblob = NULL;
953         if (resp_buf_type == CIFS_SMALL_BUFFER) {
954                 cifs_dbg(FYI, "ssetup freeing small buf %p\n", iov[0].iov_base);
955                 cifs_small_buf_release(iov[0].iov_base);
956         } else if (resp_buf_type == CIFS_LARGE_BUFFER)
957                 cifs_buf_release(iov[0].iov_base);
958
959         /* if ntlmssp, and negotiate succeeded, proceed to authenticate phase */
960         if ((phase == NtLmChallenge) && (rc == 0))
961                 goto ssetup_ntlmssp_authenticate;
962
963         return rc;
964 }