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