fs/cifs/sess.c

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