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