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