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