updated the 3.0 branch from the head branch - ready for alpha18
[nivanova/samba-autobuild/.git] / source3 / libsmb / smbencrypt.c
index 95d21dc772c4785f52a93b86cc88f72a8b53beba..95434d0ae4e102f42a54377906721b280bc3d6fa 100644 (file)
@@ -1,6 +1,5 @@
 /* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+   Unix SMB/CIFS implementation.
    SMB parameters and setup
    Copyright (C) Andrew Tridgell 1992-1998
    Modified by Jeremy Allison 1995.
 */
 
 #include "includes.h"
-
-extern int DEBUGLEVEL;
-
 #include "byteorder.h"
 
 /*
    This implements the X/Open SMB password encryption
-   It takes a password, a 8 byte "crypt key" and puts 24 bytes of 
-   encrypted password into p24 */
-void SMBencrypt(uchar *passwd, uchar *c8, uchar *p24)
+   It takes a password ('unix' string), a 8 byte "crypt key" 
+   and puts 24 bytes of encrypted password into p24 */
+void SMBencrypt(const char *passwd, const uchar *c8, uchar *p24)
 {
-       uchar p14[15], p21[21];
+       uchar p21[21];
 
        memset(p21,'\0',21);
-       memset(p14,'\0',14);
-       StrnCpy((char *)p14,(char *)passwd,14);
-
-       strupper((char *)p14);
-       E_P16(p14, p21); 
+       E_deshash(passwd, p21); 
 
        SMBOWFencrypt(p21, c8, p24);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100,("SMBencrypt: lm#, challenge, response\n"));
        dump_data(100, (char *)p21, 16);
-       dump_data(100, (char *)c8, 8);
+       dump_data(100, (const char *)c8, 8);
        dump_data(100, (char *)p24, 24);
 #endif
 }
 
-/* 
+/**
  * Creates the MD4 Hash of the users password in NT UNICODE.
+ * @param passwd password in 'unix' charset.
+ * @param p16 return password hashed with md4, caller allocated 16 byte buffer
  */
  
-void E_md4hash(uchar *passwd, uchar *p16)
+void E_md4hash(const char *passwd, uchar p16[16])
 {
        int len;
        smb_ucs2_t wpwd[129];
        
-       /* Password cannot be longer than 128 characters */
-       len = strlen((char *)passwd);
-       if(len > 128)
-               len = 128;
        /* Password must be converted to NT unicode - null terminated. */
-       push_ucs2(NULL, wpwd, passwd, 256, STR_UNICODE|STR_NOALIGN|STR_TERMINATE);
+       push_ucs2(NULL, wpwd, (const char *)passwd, 256, STR_UNICODE|STR_NOALIGN|STR_TERMINATE);
        /* Calculate length in bytes */
        len = strlen_w(wpwd) * sizeof(int16);
 
        mdfour(p16, (unsigned char *)wpwd, len);
+       ZERO_STRUCT(wpwd);      
 }
 
-/* Does both the NT and LM owfs of a user's password */
-void nt_lm_owf_gen(char *pwd, uchar nt_p16[16], uchar p16[16])
+/**
+ * Creates the MD4 Hash of the users password in NT UNICODE.
+ * @param passwd password in 'unix' charset.
+ * @param p16 return password hashed with md4, caller allocated 16 byte buffer
+ */
+void E_deshash(const char *passwd, uchar p16[16])
 {
-       char passwd[514];
+       uchar dospwd[15]; /* Password must not be > 14 chars long. */
+       ZERO_STRUCT(dospwd);
+       ZERO_STRUCTP(p16);
+       
+       /* Password must be converted to DOS charset - null terminated. */
+       push_ascii(dospwd, (const char *)passwd, sizeof(dospwd), STR_UPPER|STR_TERMINATE);
 
-       memset(passwd,'\0',514);
-       safe_strcpy( passwd, pwd, sizeof(passwd)-1);
+       E_P16(dospwd, p16);
 
+       ZERO_STRUCT(dospwd);    
+}
+
+/**
+ * Creates the MD4 and DES (LM) Hash of the users password.  
+ * MD4 is of the NT Unicode, DES is of the DOS UPPERCASE password.
+ * @param passwd password in 'unix' charset.
+ * @param nt_p16 return password hashed with md4, caller allocated 16 byte buffer
+ * @param p16 return password hashed with des, caller allocated 16 byte buffer
+ */
+/* Does both the NT and LM owfs of a user's password */
+void nt_lm_owf_gen(const char *pwd, uchar nt_p16[16], uchar p16[16])
+{
        /* Calculate the MD4 hash (NT compatible) of the password */
        memset(nt_p16, '\0', 16);
-       E_md4hash((uchar *)passwd, nt_p16);
+       E_md4hash(pwd, nt_p16);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100,("nt_lm_owf_gen: pwd, nt#\n"));
-       dump_data(120, passwd, strlen(passwd));
+       dump_data(120, pwd, strlen(pwd));
        dump_data(100, (char *)nt_p16, 16);
 #endif
 
-       /* Mangle the passwords into Lanman format */
-       passwd[14] = '\0';
-       strupper(passwd);
-
-       /* Calculate the SMB (lanman) hash functions of the password */
-
-       memset(p16, '\0', 16);
-       E_P16((uchar *) passwd, (uchar *)p16);
+       E_deshash(pwd, (uchar *)p16);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100,("nt_lm_owf_gen: pwd, lm#\n"));
-       dump_data(120, passwd, strlen(passwd));
+       dump_data(120, pwd, strlen(pwd));
        dump_data(100, (char *)p16, 16);
 #endif
-       /* clear out local copy of user's password (just being paranoid). */
-       memset(passwd, '\0', sizeof(passwd));
 }
 
 /* Does both the NTLMv2 owfs of a user's password */
@@ -125,8 +130,8 @@ void ntv2_owf_gen(const uchar owf[16],
        push_ucs2(NULL, dom_u, domain_n, (domain_l+1)*2, STR_UNICODE|STR_NOALIGN|STR_TERMINATE|STR_UPPER);
 
        hmac_md5_init_limK_to_64(owf, 16, &ctx);
-       hmac_md5_update(user_u, user_l * 2, &ctx);
-       hmac_md5_update(dom_u, domain_l * 2, &ctx);
+       hmac_md5_update((const unsigned char *)user_u, user_l * 2, &ctx);
+       hmac_md5_update((const unsigned char *)dom_u, domain_l * 2, &ctx);
        hmac_md5_final(kr_buf, &ctx);
 
 #ifdef DEBUG_PASSWORD
@@ -150,7 +155,7 @@ void SMBOWFencrypt(const uchar passwd[16], const uchar *c8, uchar p24[24])
 }
 
 /* Does the des encryption from the FIRST 8 BYTES of the NT or LM MD4 hash. */
-void NTLMSSPOWFencrypt(uchar passwd[8], uchar *ntlmchalresp, uchar p24[24])
+void NTLMSSPOWFencrypt(const uchar passwd[8], const uchar *ntlmchalresp, uchar p24[24])
 {
        uchar p21[21];
  
@@ -162,7 +167,7 @@ void NTLMSSPOWFencrypt(uchar passwd[8], uchar *ntlmchalresp, uchar p24[24])
 #ifdef DEBUG_PASSWORD
        DEBUG(100,("NTLMSSPOWFencrypt: p21, c8, p24\n"));
        dump_data(100, (char *)p21, 21);
-       dump_data(100, (char *)ntlmchalresp, 8);
+       dump_data(100, (const char *)ntlmchalresp, 8);
        dump_data(100, (char *)p24, 24);
 #endif
 }
@@ -170,7 +175,7 @@ void NTLMSSPOWFencrypt(uchar passwd[8], uchar *ntlmchalresp, uchar p24[24])
 
 /* Does the NT MD4 hash then des encryption. */
  
-void SMBNTencrypt(uchar *passwd, uchar *c8, uchar *p24)
+void SMBNTencrypt(const uchar *passwd, uchar *c8, uchar *p24)
 {
        uchar p21[21];
  
@@ -219,33 +224,33 @@ BOOL make_oem_passwd_hash(char data[516], const char *passwd, uchar old_pw_hash[
 
 /* Does the md5 encryption from the NT hash for NTLMv2. */
 void SMBOWFencrypt_ntv2(const uchar kr[16],
-                       const uchar * srv_chal, int srv_chal_len,
-                       const uchar * cli_chal, int cli_chal_len,
+                       const DATA_BLOB srv_chal,
+                       const DATA_BLOB cli_chal,
                        char resp_buf[16])
 {
        HMACMD5Context ctx;
 
        hmac_md5_init_limK_to_64(kr, 16, &ctx);
-       hmac_md5_update(srv_chal, srv_chal_len, &ctx);
-       hmac_md5_update(cli_chal, cli_chal_len, &ctx);
-       hmac_md5_final(resp_buf, &ctx);
+       hmac_md5_update(srv_chal.data, srv_chal.length, &ctx);
+       hmac_md5_update(cli_chal.data, cli_chal.length, &ctx);
+       hmac_md5_final((unsigned char *)resp_buf, &ctx);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100, ("SMBOWFencrypt_ntv2: srv_chal, cli_chal, resp_buf\n"));
-       dump_data(100, srv_chal, srv_chal_len);
-       dump_data(100, cli_chal, cli_chal_len);
+       dump_data(100, srv_chal.data, srv_chal.length);
+       dump_data(100, cli_chal.data, cli_chal.length);
        dump_data(100, resp_buf, 16);
 #endif
 }
 
 void SMBsesskeygen_ntv2(const uchar kr[16],
-                       const uchar * nt_resp, char sess_key[16])
+                       const uchar * nt_resp, uint8 sess_key[16])
 {
        HMACMD5Context ctx;
 
        hmac_md5_init_limK_to_64(kr, 16, &ctx);
        hmac_md5_update(nt_resp, 16, &ctx);
-       hmac_md5_final(sess_key, &ctx);
+       hmac_md5_final((unsigned char *)sess_key, &ctx);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100, ("SMBsesskeygen_ntv2:\n"));
@@ -254,9 +259,9 @@ void SMBsesskeygen_ntv2(const uchar kr[16],
 }
 
 void SMBsesskeygen_ntv1(const uchar kr[16],
-                       const uchar * nt_resp, char sess_key[16])
+                       const uchar * nt_resp, uint8 sess_key[16])
 {
-       mdfour(sess_key, kr, 16);
+       mdfour((unsigned char *)sess_key, kr, 16);
 
 #ifdef DEBUG_PASSWORD
        DEBUG(100, ("SMBsesskeygen_ntv1:\n"));
@@ -265,43 +270,33 @@ void SMBsesskeygen_ntv1(const uchar kr[16],
 }
 
 /***********************************************************
- encode a password buffer
+ encode a password buffer.  The caller gets to figure out 
+ what to put in it.
 ************************************************************/
-BOOL encode_pw_buffer(char buffer[516], const char *new_pass,
-                     int new_pw_len, BOOL nt_pass_set)
+BOOL encode_pw_buffer(char buffer[516], char *new_pw, int new_pw_length)
 {
-       generate_random_buffer(buffer, 516, True);
-
-       if (nt_pass_set) {
-               new_pw_len *= 2;
-               push_ucs2(NULL, &buffer[512 - new_pw_len], new_pass,
-                         new_pw_len, 0);
-       } else {
-               push_ascii(&buffer[512 - new_pw_len], new_pass,
-                          new_pw_len, 0);
-       }
+       generate_random_buffer((unsigned char *)buffer, 516, True);
+
+       memcpy(&buffer[512 - new_pw_length], new_pw, new_pw_length);
 
        /* 
         * The length of the new password is in the last 4 bytes of
         * the data buffer.
         */
-       SIVAL(buffer, 512, new_pw_len);
+       SIVAL(buffer, 512, new_pw_length);
 
        return True;
 }
 
 /***********************************************************
  decode a password buffer
+ *new_pw_len is the length in bytes of the possibly mulitbyte
+ returned password including termination.
 ************************************************************/
 BOOL decode_pw_buffer(char in_buffer[516], char *new_pwrd,
-                     int new_pwrd_size, uint32 *new_pw_len,
-                     uchar nt_p16[16], uchar p16[16])
+                     int new_pwrd_size, uint32 *new_pw_len)
 {
-       int uni_pw_len=0;
        int byte_len=0;
-       char unicode_passwd[514];
-       char lm_ascii_passwd[514];
-       char passwd[514];
 
        /*
          Warning !!! : This function is called from some rpc call.
@@ -310,13 +305,6 @@ BOOL decode_pw_buffer(char in_buffer[516], char *new_pwrd,
          If you reuse that code somewhere else check first.
        */
 
-       ZERO_STRUCT(unicode_passwd);
-       ZERO_STRUCT(lm_ascii_passwd);
-       ZERO_STRUCT(passwd);
-
-       memset(nt_p16, '\0', 16);
-       memset(p16, '\0', 16);
-
        /* The length of the new password is in the last 4 bytes of the data buffer. */
 
        byte_len = IVAL(in_buffer, 512);
@@ -328,68 +316,71 @@ BOOL decode_pw_buffer(char in_buffer[516], char *new_pwrd,
        /* Password cannot be longer than 128 characters */
        if ( (byte_len < 0) || (byte_len > new_pwrd_size - 1)) {
                DEBUG(0, ("decode_pw_buffer: incorrect password length (%d).\n", byte_len));
+               DEBUG(0, ("decode_pw_buffer: check that 'encrypt passwords = yes'\n"));
                return False;
        }
-       
-       pull_string(NULL, passwd, &in_buffer[512 - byte_len], -1, byte_len, STR_UNICODE);
-       uni_pw_len = byte_len/2;
-
-#ifdef DEBUG_PASSWORD
-       DEBUG(100,("nt_lm_owf_gen: passwd: "));
-       dump_data(100, (char *)passwd, uni_pw_len);
-       DEBUG(100,("len:%d\n", uni_pw_len));
-#endif
-       memcpy(unicode_passwd, &in_buffer[512 - byte_len], byte_len);
-               
-       mdfour(nt_p16, (unsigned char *)unicode_passwd, byte_len);
-       
-#ifdef DEBUG_PASSWORD
-       DEBUG(100,("nt_lm_owf_gen: nt#:"));
-       dump_data(100, (char *)nt_p16, 16);
-       DEBUG(100,("\n"));
-#endif
-       
-       /* Mangle the passwords into Lanman format */
-       memcpy(lm_ascii_passwd, passwd, byte_len/2);
-       lm_ascii_passwd[14] = '\0';
-       strupper(lm_ascii_passwd);
 
-       /* Calculate the SMB (lanman) hash functions of the password */
-       E_P16((uchar *) lm_ascii_passwd, (uchar *)p16);
+       /* decode into the return buffer.  Buffer must be a pstring */
+       *new_pw_len = pull_string(NULL, new_pwrd, &in_buffer[512 - byte_len], new_pwrd_size, byte_len, STR_UNICODE);
 
 #ifdef DEBUG_PASSWORD
-       DEBUG(100,("nt_lm_owf_gen: lm#:"));
-       dump_data(100, (char *)p16, 16);
-       DEBUG(100,("\n"));
+       DEBUG(100,("decode_pw_buffer: new_pwrd: "));
+       dump_data(100, (char *)new_pwrd, *new_pw_len);
+       DEBUG(100,("multibyte len:%d\n", *new_pw_len));
+       DEBUG(100,("original char len:%d\n", byte_len/2));
 #endif
-
-       /* copy the password and it's length to the return buffer */    
-       *new_pw_len = byte_len/2;
-       memcpy(new_pwrd, passwd, uni_pw_len);
-       new_pwrd[uni_pw_len]='\0';
-       
-       /* clear out local copy of user's password (just being paranoid). */
-       ZERO_STRUCT(unicode_passwd);
-       ZERO_STRUCT(lm_ascii_passwd);
-       ZERO_STRUCT(passwd);
        
        return True;
+}
+
+/***********************************************************
+ SMB signing - setup the MAC key.
+************************************************************/
 
+void cli_calculate_mac_key(struct cli_state *cli, const unsigned char *ntpasswd, const uchar resp[24])
+{
+       /* Get first 16 bytes. */
+       E_md4hash(ntpasswd,&cli->sign_info.mac_key[0]);
+       memcpy(&cli->sign_info.mac_key[16],resp,24);
+       cli->sign_info.mac_key_len = 40;
+       cli->sign_info.use_smb_signing = True;
+
+       /* These calls are INCONPATIBLE with SMB signing */
+       cli->readbraw_supported = False;
+       cli->writebraw_supported = False;    
+
+       /* Reset the sequence number in case we had a previous (aborted) attempt */
+       cli->sign_info.send_seq_num = 0;
 }
 
-/* Calculate the NT owfs of a user's password */
-void nt_owf_genW(const UNISTR2 *pwd, uchar nt_p16[16])
+/***********************************************************
+ SMB signing - calculate a MAC to send.
+************************************************************/
+
+void cli_caclulate_sign_mac(struct cli_state *cli)
 {
-       char buf[512];
-       int i;
+       unsigned char calc_md5_mac[16];
+       struct MD5Context md5_ctx;
 
-       for (i = 0; i < MIN(pwd->uni_str_len, sizeof(buf) / 2); i++)
-       {
-               SIVAL(buf, i * 2, pwd->buffer[i]);
+       if (!cli->sign_info.use_smb_signing) {
+               return;
        }
-       /* Calculate the MD4 hash (NT compatible) of the password */
-       mdfour(nt_p16, buf, pwd->uni_str_len * 2);
 
-       /* clear out local copy of user's password (just being paranoid). */
-       ZERO_STRUCT(buf);
+       /*
+        * Firstly put the sequence number into the first 4 bytes.
+        * and zero out the next 4 bytes.
+        */
+       SIVAL(cli->outbuf, smb_ss_field, cli->sign_info.send_seq_num);
+       SIVAL(cli->outbuf, smb_ss_field + 4, 0);
+
+       /* Calculate the 16 byte MAC and place first 8 bytes into the field. */
+       MD5Init(&md5_ctx);
+       MD5Update(&md5_ctx, cli->sign_info.mac_key, cli->sign_info.mac_key_len);
+       MD5Update(&md5_ctx, cli->outbuf + 4, smb_len(cli->outbuf));
+       MD5Final(calc_md5_mac, &md5_ctx);
+
+       memcpy(&cli->outbuf[smb_ss_field], calc_md5_mac, 8);
+       cli->sign_info.send_seq_num++;
+       cli->sign_info.reply_seq_num = cli->sign_info.send_seq_num;
+       cli->sign_info.send_seq_num++;
 }