set FIPS allow before initialising ctx

This commit is contained in:
Dr. Stephen Henson 2011-06-14 15:25:41 +00:00
parent 8bfd0ae4c4
commit 4bea454021

View File

@ -1877,10 +1877,10 @@ int ssl3_send_server_key_exchange(SSL *s)
j=0; j=0;
for (num=2; num > 0; num--) for (num=2; num > 0; num--)
{ {
EVP_DigestInit_ex(&md_ctx,(num == 2)
?s->ctx->md5:s->ctx->sha1, NULL);
EVP_MD_CTX_set_flags(&md_ctx, EVP_MD_CTX_set_flags(&md_ctx,
EVP_MD_CTX_FLAG_NON_FIPS_ALLOW); EVP_MD_CTX_FLAG_NON_FIPS_ALLOW);
EVP_DigestInit_ex(&md_ctx,(num == 2)
?s->ctx->md5:s->ctx->sha1, NULL);
EVP_DigestUpdate(&md_ctx,&(s->s3->client_random[0]),SSL3_RANDOM_SIZE); EVP_DigestUpdate(&md_ctx,&(s->s3->client_random[0]),SSL3_RANDOM_SIZE);
EVP_DigestUpdate(&md_ctx,&(s->s3->server_random[0]),SSL3_RANDOM_SIZE); EVP_DigestUpdate(&md_ctx,&(s->s3->server_random[0]),SSL3_RANDOM_SIZE);
EVP_DigestUpdate(&md_ctx,&(d[4]),n); EVP_DigestUpdate(&md_ctx,&(d[4]),n);