Because of recent reductions in header interdependencies, these files need

[openssl.git] / crypto / des / str2key.c

diff --git a/crypto/des/str2key.c b/crypto/des/str2key.c
index 65a118465320d83e000b2ffadff408865063a770..9c2054bda6b9da92351d3d1a37dac671dcf0c25b 100644 (file)
--- a/crypto/des/str2key.c
+++ b/crypto/des/str2key.c
@@ -1,5 +1,5 @@
 /* crypto/des/str2key.c */
-/* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
+/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  * All rights reserved.
  *
  * This package is an SSL implementation written
@@ -57,14 +57,11 @@
  */
 
 #include "des_locl.h"
+#include <openssl/crypto.h>
 
-extern int des_check_key;
-
-void des_string_to_key(str, key)
-char *str;
-des_cblock (*key);
+void DES_string_to_key(const char *str, DES_cblock *key)
        {
-       des_key_schedule ks;
+       DES_key_schedule ks;
        int i,length;
        register unsigned char j;
 
@@ -89,23 +86,22 @@ des_cblock (*key);
                        }
                }
 #endif
-       des_set_odd_parity((des_cblock *)key);
-       i=des_check_key;
-       des_check_key=0;
-       des_set_key((des_cblock *)key,ks);
-       des_check_key=i;
-       des_cbc_cksum((des_cblock *)str,(des_cblock *)key,(long)length,ks,
-               (des_cblock *)key);
-       memset(ks,0,sizeof(ks));
-       des_set_odd_parity((des_cblock *)key);
+       DES_set_odd_parity(key);
+#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY
+       if(DES_is_weak_key(key))
+           (*key)[7] ^= 0xF0;
+       DES_set_key(key,&ks);
+#else
+       DES_set_key_unchecked(key,&ks);
+#endif
+       DES_cbc_cksum((const unsigned char*)str,key,length,&ks,key);
+       OPENSSL_cleanse(&ks,sizeof(ks));
+       DES_set_odd_parity(key);
        }
 
-void des_string_to_2keys(str, key1, key2)
-char *str;
-des_cblock (*key1);
-des_cblock (*key2);
+void DES_string_to_2keys(const char *str, DES_cblock *key1, DES_cblock *key2)
        {
-       des_key_schedule ks;
+       DES_key_schedule ks;
        int i,length;
        register unsigned char j;
 
@@ -154,18 +150,25 @@ des_cblock (*key2);
                }
        if (length <= 8) memcpy(key2,key1,8);
 #endif
-       des_set_odd_parity((des_cblock *)key1);
-       des_set_odd_parity((des_cblock *)key2);
-       i=des_check_key;
-       des_check_key=0;
-       des_set_key((des_cblock *)key1,ks);
-       des_cbc_cksum((des_cblock *)str,(des_cblock *)key1,(long)length,ks,
-               (des_cblock *)key1);
-       des_set_key((des_cblock *)key2,ks);
-       des_cbc_cksum((des_cblock *)str,(des_cblock *)key2,(long)length,ks,
-               (des_cblock *)key2);
-       des_check_key=i;
-       memset(ks,0,sizeof(ks));
-       des_set_odd_parity(key1);
-       des_set_odd_parity(key2);
+       DES_set_odd_parity(key1);
+       DES_set_odd_parity(key2);
+#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY
+       if(DES_is_weak_key(key1))
+           (*key1)[7] ^= 0xF0;
+       DES_set_key(key1,&ks);
+#else
+       DES_set_key_unchecked(key1,&ks);
+#endif
+       DES_cbc_cksum((const unsigned char*)str,key1,length,&ks,key1);
+#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY
+       if(DES_is_weak_key(key2))
+           (*key2)[7] ^= 0xF0;
+       DES_set_key(key2,&ks);
+#else
+       DES_set_key_unchecked(key2,&ks);
+#endif
+       DES_cbc_cksum((const unsigned char*)str,key2,length,&ks,key2);
+       OPENSSL_cleanse(&ks,sizeof(ks));
+       DES_set_odd_parity(key1);
+       DES_set_odd_parity(key2);
        }