openssl 的RSAD的调用

function RSA_decrypt(var tmp:PAnsiChar):PAnsiChar ; stdcall;
var
rsa: PRSA;
key: PBIO;
pkey: PEVP_PKEY;
keysize :Integer;
ret,P_en:PChar;
begin
key := BIO_new(BIO_s_file());
BIO_read_filename(key,'c:\publickey.txt');
pkey := PEM_read_bio_PUBKEY(key,pkey,nil,nil);
rsa := EVP_PKEY_get1_RSA(pkey);
keysize := RSA_size(rsa);
P_en:=allocmem(keysize+1);
FillMemory(P_en,SizeOf(P_en),0);
//RSA_public_decrypt(keysize,tmp,ret,rsa,RSA_PKCS1_PADDING);

RSA_public_encrypt(keysize,tmp,P_en,rsa,RSA_PKCS1_PADDING);

Result:=P_en;
// RSA_free(rsa);
end;

调用有问题,一直返回空,不知道哪里的问题。。解密有内容后直接就崩溃。

2个回答

每步都判断一下返回值,看是否有失败

怎么看? 有例子么?

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问