1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/ssl/libcrypto/src/crypto/evp/evp_key.c Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,188 @@
1.4 +/* crypto/evp/evp_key.c */
1.5 +/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
1.6 + * All rights reserved.
1.7 + *
1.8 + * This package is an SSL implementation written
1.9 + * by Eric Young (eay@cryptsoft.com).
1.10 + * The implementation was written so as to conform with Netscapes SSL.
1.11 + *
1.12 + * This library is free for commercial and non-commercial use as long as
1.13 + * the following conditions are aheared to. The following conditions
1.14 + * apply to all code found in this distribution, be it the RC4, RSA,
1.15 + * lhash, DES, etc., code; not just the SSL code. The SSL documentation
1.16 + * included with this distribution is covered by the same copyright terms
1.17 + * except that the holder is Tim Hudson (tjh@cryptsoft.com).
1.18 + *
1.19 + * Copyright remains Eric Young's, and as such any Copyright notices in
1.20 + * the code are not to be removed.
1.21 + * If this package is used in a product, Eric Young should be given attribution
1.22 + * as the author of the parts of the library used.
1.23 + * This can be in the form of a textual message at program startup or
1.24 + * in documentation (online or textual) provided with the package.
1.25 + *
1.26 + * Redistribution and use in source and binary forms, with or without
1.27 + * modification, are permitted provided that the following conditions
1.28 + * are met:
1.29 + * 1. Redistributions of source code must retain the copyright
1.30 + * notice, this list of conditions and the following disclaimer.
1.31 + * 2. Redistributions in binary form must reproduce the above copyright
1.32 + * notice, this list of conditions and the following disclaimer in the
1.33 + * documentation and/or other materials provided with the distribution.
1.34 + * 3. All advertising materials mentioning features or use of this software
1.35 + * must display the following acknowledgement:
1.36 + * "This product includes cryptographic software written by
1.37 + * Eric Young (eay@cryptsoft.com)"
1.38 + * The word 'cryptographic' can be left out if the rouines from the library
1.39 + * being used are not cryptographic related :-).
1.40 + * 4. If you include any Windows specific code (or a derivative thereof) from
1.41 + * the apps directory (application code) you must include an acknowledgement:
1.42 + * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
1.43 + *
1.44 + * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
1.45 + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
1.46 + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
1.47 + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
1.48 + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
1.49 + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
1.50 + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
1.51 + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
1.52 + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
1.53 + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
1.54 + * SUCH DAMAGE.
1.55 + *
1.56 + * The licence and distribution terms for any publically available version or
1.57 + * derivative of this code cannot be changed. i.e. this code cannot simply be
1.58 + * copied and put under another distribution licence
1.59 + * [including the GNU Public Licence.]
1.60 + */
1.61 + /*
1.62 + © Portions copyright (c) 2006 Nokia Corporation. All rights reserved.
1.63 + */
1.64 +
1.65 +
1.66 +#include <stdio.h>
1.67 +#include "cryptlib.h"
1.68 +#include <openssl/x509.h>
1.69 +#include <openssl/objects.h>
1.70 +#include <openssl/evp.h>
1.71 +#include <openssl/ui.h>
1.72 +#if (defined(SYMBIAN) && (defined(__WINSCW__) || defined(__WINS__)))
1.73 +#include "libcrypto_wsd_macros.h"
1.74 +#include "libcrypto_wsd.h"
1.75 +#endif
1.76 +
1.77 +#ifndef EMULATOR
1.78 +/* should be init to zeros. */
1.79 +static char prompt_string[80];
1.80 +#else
1.81 +GET_STATIC_ARRAY_FROM_TLS(prompt_string,evp_key,char)
1.82 +#define prompt_string (GET_WSD_VAR_NAME(prompt_string,evp_key, s)())
1.83 +#endif
1.84 +
1.85 +EXPORT_C void EVP_set_pw_prompt(const char *prompt)
1.86 + {
1.87 + if (prompt == NULL)
1.88 + prompt_string[0]='\0';
1.89 + else
1.90 + {
1.91 + strncpy(prompt_string,prompt,79);
1.92 + prompt_string[79]='\0';
1.93 + }
1.94 + }
1.95 +
1.96 +EXPORT_C char *EVP_get_pw_prompt(void)
1.97 + {
1.98 + if (prompt_string[0] == '\0')
1.99 + return(NULL);
1.100 + else
1.101 + return(prompt_string);
1.102 + }
1.103 +
1.104 +/* For historical reasons, the standard function for reading passwords is
1.105 + * in the DES library -- if someone ever wants to disable DES,
1.106 + * this function will fail */
1.107 +EXPORT_C int EVP_read_pw_string(char *buf, int len, const char *prompt, int verify)
1.108 + {
1.109 + int ret;
1.110 + char buff[BUFSIZ];
1.111 + UI *ui;
1.112 +
1.113 + if ((prompt == NULL) && (prompt_string[0] != '\0'))
1.114 + prompt=prompt_string;
1.115 + ui = UI_new();
1.116 + UI_add_input_string(ui,prompt,0,buf,0,(len>=BUFSIZ)?BUFSIZ-1:len);
1.117 + if (verify)
1.118 + UI_add_verify_string(ui,prompt,0,
1.119 + buff,0,(len>=BUFSIZ)?BUFSIZ-1:len,buf);
1.120 + ret = UI_process(ui);
1.121 + UI_free(ui);
1.122 + OPENSSL_cleanse(buff,BUFSIZ);
1.123 + return ret;
1.124 + }
1.125 +
1.126 +EXPORT_C int EVP_BytesToKey(const EVP_CIPHER *type, const EVP_MD *md,
1.127 + const unsigned char *salt, const unsigned char *data, int datal,
1.128 + int count, unsigned char *key, unsigned char *iv)
1.129 + {
1.130 + EVP_MD_CTX c;
1.131 + unsigned char md_buf[EVP_MAX_MD_SIZE];
1.132 + int niv,nkey,addmd=0;
1.133 + unsigned int mds=0,i;
1.134 +
1.135 + nkey=type->key_len;
1.136 + niv=type->iv_len;
1.137 + OPENSSL_assert(nkey <= EVP_MAX_KEY_LENGTH);
1.138 + OPENSSL_assert(niv <= EVP_MAX_IV_LENGTH);
1.139 +
1.140 + if (data == NULL) return(nkey);
1.141 +
1.142 + EVP_MD_CTX_init(&c);
1.143 + for (;;)
1.144 + {
1.145 + if (!EVP_DigestInit_ex(&c,md, NULL))
1.146 + return 0;
1.147 + if (addmd++)
1.148 + EVP_DigestUpdate(&c,&(md_buf[0]),mds);
1.149 + EVP_DigestUpdate(&c,data,datal);
1.150 + if (salt != NULL)
1.151 + EVP_DigestUpdate(&c,salt,PKCS5_SALT_LEN);
1.152 + EVP_DigestFinal_ex(&c,&(md_buf[0]),&mds);
1.153 +
1.154 + for (i=1; i<(unsigned int)count; i++)
1.155 + {
1.156 + EVP_DigestInit_ex(&c,md, NULL);
1.157 + EVP_DigestUpdate(&c,&(md_buf[0]),mds);
1.158 + EVP_DigestFinal_ex(&c,&(md_buf[0]),&mds);
1.159 + }
1.160 + i=0;
1.161 + if (nkey)
1.162 + {
1.163 + for (;;)
1.164 + {
1.165 + if (nkey == 0) break;
1.166 + if (i == mds) break;
1.167 + if (key != NULL)
1.168 + *(key++)=md_buf[i];
1.169 + nkey--;
1.170 + i++;
1.171 + }
1.172 + }
1.173 + if (niv && (i != mds))
1.174 + {
1.175 + for (;;)
1.176 + {
1.177 + if (niv == 0) break;
1.178 + if (i == mds) break;
1.179 + if (iv != NULL)
1.180 + *(iv++)=md_buf[i];
1.181 + niv--;
1.182 + i++;
1.183 + }
1.184 + }
1.185 + if ((nkey == 0) && (niv == 0)) break;
1.186 + }
1.187 + EVP_MD_CTX_cleanup(&c);
1.188 + OPENSSL_cleanse(&(md_buf[0]),EVP_MAX_MD_SIZE);
1.189 + return(type->key_len);
1.190 + }
1.191 +