openssl签名验证、信封加密解密、产生随机数、md5摘要

from : http://blog.csdn.net/xyyangkun/article/details/8708510

#include <stdio.h>

#include <string.h>

#include <openssl/evp.h>

#include <openssl/rsa.h>

#include <openssl/x509.h>

#include <openssl/des.h>

#include "util/Base.h"

typedef   unsigned   char   BYTE;

/*

*

*产生随机数

*

*/

unsigned char *getRandom(unsigned char *buf, size_t l) {

  if (!RAND_bytes(buf, l)) {

    fprintf(stderr, "The PRNG is not seeded!\n");

    return NULL;

  }

  printf((char*)buf);

  return buf;

}

/**

*

*信封加密解密

*参考openssl编程.chm 21.10编程实例4

*

*/

int    EVP_enc()

{

       int                         ret,ekl[2],npubk,inl,outl,total=0,total2=0;

       unsigned long  e=RSA_3;

       char               *ek[2],iv[8],in[100],out[500],de[500];

       EVP_CIPHER_CTX      ctx,ctx2;

       EVP_CIPHER        *type;

       EVP_PKEY            *pubkey[2];

       RSA                      *rkey;

       BIGNUM               *bne;

       int i;

       /* 生成RSA密钥*/

       bne=BN_new();

       ret=BN_set_word(bne,e);

       rkey=RSA_new();

       ret=RSA_generate_key_ex(rkey,1024,bne,NULL);

       pubkey[0]=EVP_PKEY_new();

       EVP_PKEY_assign_RSA(pubkey[0],rkey);
//初始化一个公钥为RSA的密钥对公钥

       type=EVP_des_ede3_cbc(); //对称密钥的算法

       npubk=1; //设置一个公钥加密

       EVP_CIPHER_CTX_init(&ctx); //初始化信封加密上下文

       ek[0]=malloc(500);

       ek[1]=malloc(500);

       ret=EVP_SealInit(&ctx,type,(BYTE**)ek,ekl,iv,pubkey,1);  /* 只有一个公钥，如果为CBC算法IV会被产生*/

       if(ret!=1) goto err;

       strcpy(in,"openssl 编程"); //对称密钥（即将被加密为信封的数据）

       inl=strlen(in);

       ret=EVP_SealUpdate(&ctx,out,&outl,in,inl);
//加密操作

       if(ret!=1)goto err;

       total+=outl;

       ret=EVP_SealFinal(&ctx,out+outl,&outl);
//加密剩下的部分

       if(ret!=1) goto err;

       total+=outl;

 
/**
* 解密信封
*/

       memset(de,0,500);

       EVP_CIPHER_CTX_init(&ctx2); //初始化解密信封的上下文

       ret=EVP_OpenInit(&ctx2,EVP_des_ede3_cbc(),ek[0],ekl[0],iv,pubkey[0]);
//设置公钥

       if(ret!=1) goto err;

       ret=EVP_OpenUpdate(&ctx2,de,&outl,out,total);

       total2+=outl;

       ret=EVP_OpenFinal(&ctx2,de+outl,&outl);

       total2+=outl;

       de[total2]=0;

       printf("%s\n",de);

err:

       free(ek[0]);

       free(ek[1]);

       EVP_PKEY_free(pubkey[0]);

       BN_free(bne);

       getchar();

       return 0;

}

/**

*

*数字签名与验证

*参考《精通PKI安全认证技术与编程实现》

*

**/

void tSign()

{
BYTE sign_value[1024]; //保存签名值的数组
int sign_len;
//签名值长度
EVP_MD_CTX mdctx;
//摘要算法上下文变量
char messl[] = "Test Message";
//签名的消息
RSA* rsa = NULL;
//RSA结构体变量
EVP_PKEY* evpKey = NULL;
//EVP KEY结构体变量
int i;

printf("正在产生RSA密钥...");
rsa = RSA_generate_key(1024,RSA_F4,NULL,NULL);
//产生一个1024位的RSA密钥
if(rsa == NULL)
{
printf("gen rsa err\n");
return;
}
printf("成功.\n");
evpKey = EVP_PKEY_new();
//新建一个EVP_PKEY变量
if(evpKey == NULL)
{
printf("EVP_PKEY_new err\n");
RSA_free(rsa);
return;
}
if(EVP_PKEY_set1_RSA(evpKey,rsa) != 1)
//保存RSA结构体到EVP_PKEY结构体
{
printf("EVP_PKEY_set1_RSA err\n");
RSA_free(rsa);
EVP_PKEY_free(evpKey);
return;
}
//以下是计算签名的代码
EVP_MD_CTX_init(&mdctx);
//初始化摘要上下文
if(!EVP_SignInit_ex(&mdctx,EVP_md5(),NULL))
//签名初始化，设置摘要算法
{
printf("err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
if(!EVP_SignUpdate(&mdctx,messl,strlen(messl)))
//计算签名（摘要）Update
{
printf("err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
if(!EVP_SignFinal(&mdctx,sign_value,&sign_len,evpKey))
//签名输出
{
printf("err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
printf("消息\"%s\"的签名值是：\n",messl);
for(i = 0; i < sign_len; i++)
{
if(i%16==0)
printf("\n%08xH: ",i);
printf("&%2x ",sign_value[i]);
}
printf("\n");
EVP_MD_CTX_cleanup(&mdctx);

printf("\n 正在验证签名...\n");
//以下是验证签名的代码
EVP_MD_CTX_init(&mdctx);
//初始化摘要上下文
if(!EVP_VerifyInit_ex(&mdctx, EVP_md5(), NULL))
//验证初始化，设置摘要算法，一定要和签名一致
{
printf("EVP_VerifyInit_ex err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
if(!EVP_VerifyUpdate(&mdctx, messl, strlen(messl)))
//验证签名（摘要）Update
{
printf("err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
if(!EVP_VerifyFinal(&mdctx,sign_value,sign_len,evpKey))
{
printf("verify err\n");
EVP_PKEY_free(evpKey);
RSA_free(rsa);
return;
}
else
{
printf("验证签名正确.\n");
}
//释放内存
EVP_PKEY_free(evpKey);
RSA_free(rsa);
EVP_MD_CTX_cleanup(&mdctx);
return;

}

/**

*

*in为输入的字节数组，len为输入长度，out为输出hash值，outl为输出长度

*MD5摘要算法得到16字节结果

*

*/

void hash_md5(BYTE *in,int len,BYTE* out,int *outl)

{

/*************
*
*将输入初始化到临时BYTE数组
*
**************/
BYTE intemp[len];
int j;int          i;
for(j = 0; j<len;j++)
{
intemp[j] = in[j];
}
  for(i=0;i<16;i++)

                 printf("%x ",out[i]);
printf("\n");
memset(out,0,16);

     

    intemp[len] = 0;
size_t       n;
unsigned long err;

        
printf("\nMD5 digesting:\n");
printf("\n%s\n",intemp);

MD5(intemp,n,out);

printf("\n%d\n",n);

        printf("\n\nMD5 digest result :\n");

printf("\n%s\n",out); 
/*****
*
*MD5输出为16字节
*
******/
//*outl = 16;

        for(i=0;i<16;i++)

                 printf("%x ",out[i]);

}