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