1c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org/* crypto/des/str2key.c */ 2c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 3c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * All rights reserved. 4c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 5c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * This package is an SSL implementation written 6c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * by Eric Young (eay@cryptsoft.com). 7c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * The implementation was written so as to conform with Netscapes SSL. 8c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 9c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * This library is free for commercial and non-commercial use as long as 10c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * the following conditions are aheared to. The following conditions 11c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * apply to all code found in this distribution, be it the RC4, RSA, 12c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * lhash, DES, etc., code; not just the SSL code. The SSL documentation 13c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * included with this distribution is covered by the same copyright terms 14c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * except that the holder is Tim Hudson (tjh@cryptsoft.com). 15c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 16c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * Copyright remains Eric Young's, and as such any Copyright notices in 17c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * the code are not to be removed. 18c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * If this package is used in a product, Eric Young should be given attribution 19c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * as the author of the parts of the library used. 20c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * This can be in the form of a textual message at program startup or 21c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * in documentation (online or textual) provided with the package. 22c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 23c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * Redistribution and use in source and binary forms, with or without 24c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * modification, are permitted provided that the following conditions 25c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * are met: 26c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 1. Redistributions of source code must retain the copyright 27c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * notice, this list of conditions and the following disclaimer. 28c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 2. Redistributions in binary form must reproduce the above copyright 29c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * notice, this list of conditions and the following disclaimer in the 30c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * documentation and/or other materials provided with the distribution. 31c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 3. All advertising materials mentioning features or use of this software 32c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * must display the following acknowledgement: 33c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * "This product includes cryptographic software written by 34c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * Eric Young (eay@cryptsoft.com)" 35c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * The word 'cryptographic' can be left out if the rouines from the library 36c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * being used are not cryptographic related :-). 37c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 4. If you include any Windows specific code (or a derivative thereof) from 38c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * the apps directory (application code) you must include an acknowledgement: 39c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" 40c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 41c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND 42c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 43c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 44c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 45c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 46c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 47c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 48c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 49c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 50c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 51c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * SUCH DAMAGE. 52c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * 53c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * The licence and distribution terms for any publically available version or 54c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * derivative of this code cannot be changed. i.e. this code cannot simply be 55c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * copied and put under another distribution licence 56c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org * [including the GNU Public Licence.] 57c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org */ 58c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org 59c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#include <openssl/crypto.h> 607453c6c0666947e06d87565404f4397a4b387f91digit@chromium.org#include "des_locl.h" 61c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org 62c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.orgvoid DES_string_to_key(const char *str, DES_cblock *key) 63c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 64c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_key_schedule ks; 65c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org int i,length; 66c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org register unsigned char j; 67c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org 68c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org memset(key,0,8); 69c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org length=strlen(str); 70c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#ifdef OLD_STR_TO_KEY 71c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org for (i=0; i<length; i++) 72c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key)[i%8]^=(str[i]<<1); 73c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#else /* MIT COMPATIBLE */ 74c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org for (i=0; i<length; i++) 75c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 76c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=str[i]; 77c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if ((i%16) < 8) 78c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key)[i%8]^=(j<<1); 79c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 80c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 81c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org /* Reverse the bit order 05/05/92 eay */ 82c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<4)&0xf0)|((j>>4)&0x0f); 83c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<2)&0xcc)|((j>>2)&0x33); 84c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<1)&0xaa)|((j>>1)&0x55); 85c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key)[7-(i%8)]^=j; 86c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 87c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 88c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#endif 89c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key); 90c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY 91c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if(DES_is_weak_key(key)) 92c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key)[7] ^= 0xF0; 93c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key(key,&ks); 94c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#else 95c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key_unchecked(key,&ks); 96c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#endif 97c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_cbc_cksum((const unsigned char*)str,key,length,&ks,key); 98c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org OPENSSL_cleanse(&ks,sizeof(ks)); 99c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key); 100c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 101c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org 102c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.orgvoid DES_string_to_2keys(const char *str, DES_cblock *key1, DES_cblock *key2) 103c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 104c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_key_schedule ks; 105c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org int i,length; 106c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org register unsigned char j; 107c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org 108c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org memset(key1,0,8); 109c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org memset(key2,0,8); 110c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org length=strlen(str); 111c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#ifdef OLD_STR_TO_KEY 112c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if (length <= 8) 113c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 114c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org for (i=0; i<length; i++) 115c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 116c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key2)[i]=(*key1)[i]=(str[i]<<1); 117c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 118c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 119c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 120c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 121c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org for (i=0; i<length; i++) 122c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 123c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if ((i/8)&1) 124c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key2)[i%8]^=(str[i]<<1); 125c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 126c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key1)[i%8]^=(str[i]<<1); 127c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 128c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 129c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#else /* MIT COMPATIBLE */ 130c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org for (i=0; i<length; i++) 131c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 132c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=str[i]; 133c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if ((i%32) < 16) 134c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 135c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if ((i%16) < 8) 136c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key1)[i%8]^=(j<<1); 137c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 138c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key2)[i%8]^=(j<<1); 139c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 140c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 141c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org { 142c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<4)&0xf0)|((j>>4)&0x0f); 143c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<2)&0xcc)|((j>>2)&0x33); 144c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org j=((j<<1)&0xaa)|((j>>1)&0x55); 145c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if ((i%16) < 8) 146c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key1)[7-(i%8)]^=j; 147c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org else 148c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key2)[7-(i%8)]^=j; 149c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 150c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 151c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if (length <= 8) memcpy(key2,key1,8); 152c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#endif 153c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key1); 154c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key2); 155c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY 156c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if(DES_is_weak_key(key1)) 157c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key1)[7] ^= 0xF0; 158c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key(key1,&ks); 159c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#else 160c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key_unchecked(key1,&ks); 161c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#endif 162c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_cbc_cksum((const unsigned char*)str,key1,length,&ks,key1); 163c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#ifdef EXPERIMENTAL_STR_TO_STRONG_KEY 164c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org if(DES_is_weak_key(key2)) 165c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org (*key2)[7] ^= 0xF0; 166c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key(key2,&ks); 167c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#else 168c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_key_unchecked(key2,&ks); 169c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org#endif 170c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_cbc_cksum((const unsigned char*)str,key2,length,&ks,key2); 171c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org OPENSSL_cleanse(&ks,sizeof(ks)); 172c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key1); 173c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org DES_set_odd_parity(key2); 174c9490d33b98b7affb729b5f1db13cb0a348471aagl@chromium.org } 175