evp_key.c
上传用户:yisoukefu
上传日期:2020-08-09
资源大小:39506k
文件大小:6k
源码类别:

其他游戏

开发平台:

Visual C++

  1. /* crypto/evp/evp_key.c */
  2. /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  3.  * All rights reserved.
  4.  *
  5.  * This package is an SSL implementation written
  6.  * by Eric Young (eay@cryptsoft.com).
  7.  * The implementation was written so as to conform with Netscapes SSL.
  8.  * 
  9.  * This library is free for commercial and non-commercial use as long as
  10.  * the following conditions are aheared to.  The following conditions
  11.  * apply to all code found in this distribution, be it the RC4, RSA,
  12.  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
  13.  * included with this distribution is covered by the same copyright terms
  14.  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
  15.  * 
  16.  * Copyright remains Eric Young's, and as such any Copyright notices in
  17.  * the code are not to be removed.
  18.  * If this package is used in a product, Eric Young should be given attribution
  19.  * as the author of the parts of the library used.
  20.  * This can be in the form of a textual message at program startup or
  21.  * in documentation (online or textual) provided with the package.
  22.  * 
  23.  * Redistribution and use in source and binary forms, with or without
  24.  * modification, are permitted provided that the following conditions
  25.  * are met:
  26.  * 1. Redistributions of source code must retain the copyright
  27.  *    notice, this list of conditions and the following disclaimer.
  28.  * 2. Redistributions in binary form must reproduce the above copyright
  29.  *    notice, this list of conditions and the following disclaimer in the
  30.  *    documentation and/or other materials provided with the distribution.
  31.  * 3. All advertising materials mentioning features or use of this software
  32.  *    must display the following acknowledgement:
  33.  *    "This product includes cryptographic software written by
  34.  *     Eric Young (eay@cryptsoft.com)"
  35.  *    The word 'cryptographic' can be left out if the rouines from the library
  36.  *    being used are not cryptographic related :-).
  37.  * 4. If you include any Windows specific code (or a derivative thereof) from 
  38.  *    the apps directory (application code) you must include an acknowledgement:
  39.  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
  40.  * 
  41.  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
  42.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  43.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  44.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  45.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  46.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  47.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  49.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  50.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  51.  * SUCH DAMAGE.
  52.  * 
  53.  * The licence and distribution terms for any publically available version or
  54.  * derivative of this code cannot be changed.  i.e. this code cannot simply be
  55.  * copied and put under another distribution licence
  56.  * [including the GNU Public Licence.]
  57.  */
  58. #include <stdio.h>
  59. #include "cryptlib.h"
  60. #include <openssl/x509.h>
  61. #include <openssl/objects.h>
  62. #include <openssl/evp.h>
  63. #include <openssl/ui.h>
  64. /* should be init to zeros. */
  65. static char prompt_string[80];
  66. void EVP_set_pw_prompt(const char *prompt)
  67. {
  68. if (prompt == NULL)
  69. prompt_string[0]='';
  70. else
  71. {
  72. strncpy(prompt_string,prompt,79);
  73. prompt_string[79]='';
  74. }
  75. }
  76. char *EVP_get_pw_prompt(void)
  77. {
  78. if (prompt_string[0] == '')
  79. return(NULL);
  80. else
  81. return(prompt_string);
  82. }
  83. /* For historical reasons, the standard function for reading passwords is
  84.  * in the DES library -- if someone ever wants to disable DES,
  85.  * this function will fail */
  86. int EVP_read_pw_string(char *buf, int len, const char *prompt, int verify)
  87. {
  88. int ret;
  89. char buff[BUFSIZ];
  90. UI *ui;
  91. if ((prompt == NULL) && (prompt_string[0] != ''))
  92. prompt=prompt_string;
  93. ui = UI_new();
  94. UI_add_input_string(ui,prompt,0,buf,0,(len>=BUFSIZ)?BUFSIZ-1:len);
  95. if (verify)
  96. UI_add_verify_string(ui,prompt,0,
  97. buff,0,(len>=BUFSIZ)?BUFSIZ-1:len,buf);
  98. ret = UI_process(ui);
  99. UI_free(ui);
  100. OPENSSL_cleanse(buff,BUFSIZ);
  101. return ret;
  102. }
  103. int EVP_BytesToKey(const EVP_CIPHER *type, const EVP_MD *md, 
  104.      const unsigned char *salt, const unsigned char *data, int datal,
  105.      int count, unsigned char *key, unsigned char *iv)
  106. {
  107. EVP_MD_CTX c;
  108. unsigned char md_buf[EVP_MAX_MD_SIZE];
  109. int niv,nkey,addmd=0;
  110. unsigned int mds=0,i;
  111. nkey=type->key_len;
  112. niv=type->iv_len;
  113. OPENSSL_assert(nkey <= EVP_MAX_KEY_LENGTH);
  114. OPENSSL_assert(niv <= EVP_MAX_IV_LENGTH);
  115. if (data == NULL) return(nkey);
  116. EVP_MD_CTX_init(&c);
  117. for (;;)
  118. {
  119. if (!EVP_DigestInit_ex(&c,md, NULL))
  120. return 0;
  121. if (addmd++)
  122. EVP_DigestUpdate(&c,&(md_buf[0]),mds);
  123. EVP_DigestUpdate(&c,data,datal);
  124. if (salt != NULL)
  125. EVP_DigestUpdate(&c,salt,PKCS5_SALT_LEN);
  126. EVP_DigestFinal_ex(&c,&(md_buf[0]),&mds);
  127. for (i=1; i<(unsigned int)count; i++)
  128. {
  129. EVP_DigestInit_ex(&c,md, NULL);
  130. EVP_DigestUpdate(&c,&(md_buf[0]),mds);
  131. EVP_DigestFinal_ex(&c,&(md_buf[0]),&mds);
  132. }
  133. i=0;
  134. if (nkey)
  135. {
  136. for (;;)
  137. {
  138. if (nkey == 0) break;
  139. if (i == mds) break;
  140. if (key != NULL)
  141. *(key++)=md_buf[i];
  142. nkey--;
  143. i++;
  144. }
  145. }
  146. if (niv && (i != mds))
  147. {
  148. for (;;)
  149. {
  150. if (niv == 0) break;
  151. if (i == mds) break;
  152. if (iv != NULL)
  153. *(iv++)=md_buf[i];
  154. niv--;
  155. i++;
  156. }
  157. }
  158. if ((nkey == 0) && (niv == 0)) break;
  159. }
  160. EVP_MD_CTX_cleanup(&c);
  161. OPENSSL_cleanse(&(md_buf[0]),EVP_MAX_MD_SIZE);
  162. return(type->key_len);
  163. }