易语言rsa-oaep 实现

ab121 · 发表于 2025-8-5 16:16:56

易语言rsa-oaep 实现公钥加密有没有模块或者本地算法，目前的方案是本地挂个nodejs，然后取返回

你送的花开了 · 发表于 2025-8-5 16:34:40

通用RSA_3.0.0-rc.1.txt (178.93 KB, 下载次数: 28)

Q3375840759 · 发表于 2025-9-13 03:11:07

你送的花开了发表于 2025-8-5 16:34

这对于oaep 根本不能用

wlp · 发表于 2025-9-14 12:19:08

常量名称	常量值	公开	备注
RSA_PKCS1_PADDING	1	√
RSA_NO_PADDING	3	√
RSA_PKCS1_OAEP_PADDING	4	√
RSA_X931_PADDING	5	√
RSA_PKCS1_PSS_PADDING	6	√
RSA_PKCS1_WITH_TLS_PADDING	7	√

DLL命令名	返回值类型	公开	备注
BIO_new	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_new
参数名	类型	传址	数组	备注
type	整数型

DLL命令名	返回值类型	公开	备注
BIO_free
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_free
参数名	类型	传址	数组	备注
bio	整数型

DLL命令名	返回值类型	公开	备注
BIO_read	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_read
参数名	类型	传址	数组	备注
bio	整数型
data	字节集
len	整数型

DLL命令名	返回值类型	公开	备注
BIO_ctrl	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_ctrl
参数名	类型	传址	数组	备注
bio	整数型
cmd	整数型
larg	整数型
parg	整数型

DLL命令名	返回值类型	公开	备注
BIO_write	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_write
参数名	类型	传址	数组	备注
bio	整数型
data	字节集
len	整数型

DLL命令名	返回值类型	公开	备注
BIO_flush	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_flush
参数名	类型	传址	数组	备注
bio	整数型

DLL命令名	返回值类型	公开	备注
PEM_read_bio_PUBKEY	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@PEM_read_bio_PUBKEY
参数名	类型	传址	数组	备注
bio
pkey
cb
u

DLL命令名	返回值类型	公开	备注
EVP_PKEY_free
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_free
参数名	类型	传址	数组	备注
pkey	整数型

DLL命令名	返回值类型	公开	备注
BIO_s_mem	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@BIO_s_mem
参数名	类型	传址	数组	备注

DLL命令名	返回值类型	公开	备注
EVP_PKEY_CTX_new	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_CTX_new
参数名	类型	传址	数组	备注
pkey
e

DLL命令名	返回值类型	公开	备注
EVP_PKEY_CTX_free
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_CTX_free
参数名	类型	传址	数组	备注
ctx

DLL命令名	返回值类型	公开	备注
EVP_PKEY_encrypt_init	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_encrypt_init
参数名	类型	传址	数组	备注
ctx

DLL命令名	返回值类型	公开	备注
EVP_PKEY_decrypt_init	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_decrypt_init
参数名	类型	传址	数组	备注
ctx

DLL命令名	返回值类型	公开	备注
EVP_PKEY_CTX_set_rsa_padding	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_CTX_set_rsa_padding
参数名	类型	传址	数组	备注
ctx
padding

DLL命令名	返回值类型	公开	备注
EVP_PKEY_CTX_set_rsa_oaep_md	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_CTX_set_rsa_oaep_md
参数名	类型	传址	数组	备注
ctx
md

DLL命令名	返回值类型	公开	备注
EVP_PKEY_CTX_set_rsa_mgf1_md	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_CTX_set_rsa_mgf1_md
参数名	类型	传址	数组	备注
ctx
md

DLL命令名	返回值类型	公开	备注
EVP_sha256	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_sha256
参数名	类型	传址	数组	备注

DLL命令名	返回值类型	公开	备注
EVP_PKEY_encrypt	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_encrypt
参数名	类型	传址	数组	备注
ctx	整数型
out	整数型
outlen	整数型
in	整数型
inlen	整数型

DLL命令名	返回值类型	公开	备注
EVP_PKEY_decrypt	整数型
DLL库文件名:
libcrypto-3.dll
在DLL库中对应命令名:
@EVP_PKEY_decrypt
参数名	类型	传址	数组	备注
ctx	整数型
out	整数型
outlen	整数型
in	整数型
inlen	整数型

DLL命令名	返回值类型	公开	备注
malloc	整数型
DLL库文件名:
msvcrt.dll
在DLL库中对应命令名:
@malloc
参数名	类型	传址	数组	备注
size	整数型

DLL命令名	返回值类型	公开	备注
realloc	整数型
DLL库文件名:
msvcrt.dll
在DLL库中对应命令名:
@realloc
参数名	类型	传址	数组	备注
ptr	整数型
size	整数型

DLL命令名	返回值类型	公开	备注
free	整数型
DLL库文件名:
msvcrt.dll
在DLL库中对应命令名:
@free
参数名	类型	传址	数组	备注
ptr	整数型

子程序名	返回值类型	公开	备注
RsaOeapWithSha256	字节集
参数名	类型	参考	可空	数组	备注
data	字节集
pubkey	文本型				pem格式

变量名	类型	静态	数组	备注
pkey	整数型
ctx	整数型
init	整数型
outlen	整数型
out	字节集
ret	逻辑型
in	字节集
pkey_bytes	字节集
bio	整数型
padding	整数型

padding ＝ #RSA_PKCS1_OAEP_PADDING
ret ＝假
pkey_bytes ＝到字节集 (pubkey)
in ＝ data
bio ＝ BIO_new (BIO_s_mem ())
BIO_write (bio, 到字节集 (pkey_bytes), 取字节集长度 (pkey_bytes))
pkey ＝ PEM_read_bio_PUBKEY (bio, 0, 0, 0)

如果真 (pkey ≠ 0)

ctx ＝ EVP_PKEY_CTX_new (pkey, 0)

如果真 (ctx ≠ 0)

如果真 (EVP_PKEY_encrypt_init (ctx) ＝ 1)

如果真 (EVP_PKEY_CTX_set_rsa_padding (ctx, padding) ＝ 1)

如果真 (EVP_PKEY_CTX_set_rsa_oaep_md (ctx, EVP_sha256 ()) ＝ 1)

如果真 (EVP_PKEY_CTX_set_rsa_mgf1_md (ctx, EVP_sha256 ()) ＝ 1)

如果真 (EVP_PKEY_encrypt (ctx, 0, outlen, 0, 0) ＝ 1)

out ＝取空白字节集 (outlen)

如果真 (EVP_PKEY_encrypt (ctx, 取变量数据地址 (out), outlen, 取变量数据地址 (in), 取字节集长度 (in)) ＝ 1)

ret ＝真

如果真 (ctx ≠ 0)

EVP_PKEY_CTX_free (ctx)

如果真 (pkey ≠ 0)

EVP_PKEY_free (pkey)

如果真 (bio ≠ 0)

BIO_free (bio)

判断 (ret)

返回 (out)

返回 ({ })

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.常量 RSA_PKCS1_PADDING, "1", 公开<br />
.常量 RSA_NO_PADDING, "3", 公开<br />
.常量 RSA_PKCS1_OAEP_PADDING, "4", 公开<br />
.常量 RSA_X931_PADDING, "5", 公开<br />
.常量 RSA_PKCS1_PSS_PADDING, "6", 公开<br />
.常量 RSA_PKCS1_WITH_TLS_PADDING, "7", 公开<br />
<br />
.DLL命令 BIO_new, 整数型, "libcrypto-3.dll", "@BIO_new"<br />
    .参数 type, 整数型<br />
<br />
.DLL命令 BIO_free, , "libcrypto-3.dll", "@BIO_free"<br />
    .参数 bio, 整数型<br />
<br />
.DLL命令 BIO_read, 整数型, "libcrypto-3.dll", "@BIO_read"<br />
    .参数 bio, 整数型<br />
    .参数 data, 字节集<br />
    .参数 len, 整数型<br />
<br />
.DLL命令 BIO_ctrl, 整数型, "libcrypto-3.dll", "@BIO_ctrl"<br />
    .参数 bio, 整数型<br />
    .参数 cmd, 整数型<br />
    .参数 larg, 整数型<br />
    .参数 parg, 整数型<br />
<br />
.DLL命令 BIO_write, 整数型, "libcrypto-3.dll", "@BIO_write"<br />
    .参数 bio, 整数型<br />
    .参数 data, 字节集<br />
    .参数 len, 整数型<br />
<br />
.DLL命令 BIO_flush, 整数型, "libcrypto-3.dll", "@BIO_flush"<br />
    .参数 bio, 整数型<br />
<br />
.DLL命令 PEM_read_bio_PUBKEY, 整数型, "libcrypto-3.dll", "@PEM_read_bio_PUBKEY"<br />
    .参数 bio<br />
    .参数 pkey<br />
    .参数 cb<br />
    .参数 u<br />
<br />
.DLL命令 EVP_PKEY_free, , "libcrypto-3.dll", "@EVP_PKEY_free"<br />
    .参数 pkey, 整数型<br />
<br />
.DLL命令 BIO_s_mem, 整数型, "libcrypto-3.dll", "@BIO_s_mem"<br />
<br />
.DLL命令 EVP_PKEY_CTX_new, 整数型, "libcrypto-3.dll", "@EVP_PKEY_CTX_new"<br />
    .参数 pkey<br />
    .参数 e<br />
<br />
.DLL命令 EVP_PKEY_CTX_free, , "libcrypto-3.dll", "@EVP_PKEY_CTX_free"<br />
    .参数 ctx<br />
<br />
.DLL命令 EVP_PKEY_encrypt_init, 整数型, "libcrypto-3.dll", "@EVP_PKEY_encrypt_init"<br />
    .参数 ctx<br />
<br />
.DLL命令 EVP_PKEY_decrypt_init, 整数型, "libcrypto-3.dll", "@EVP_PKEY_decrypt_init"<br />
    .参数 ctx<br />
<br />
.DLL命令 EVP_PKEY_CTX_set_rsa_padding, 整数型, "libcrypto-3.dll", "@EVP_PKEY_CTX_set_rsa_padding"<br />
    .参数 ctx<br />
    .参数 padding<br />
<br />
.DLL命令 EVP_PKEY_CTX_set_rsa_oaep_md, 整数型, "libcrypto-3.dll", "@EVP_PKEY_CTX_set_rsa_oaep_md"<br />
    .参数 ctx<br />
    .参数 md<br />
<br />
.DLL命令 EVP_PKEY_CTX_set_rsa_mgf1_md, 整数型, "libcrypto-3.dll", "@EVP_PKEY_CTX_set_rsa_mgf1_md"<br />
    .参数 ctx<br />
    .参数 md<br />
<br />
.DLL命令 EVP_sha256, 整数型, "libcrypto-3.dll", "@EVP_sha256"<br />
<br />
.DLL命令 EVP_PKEY_encrypt, 整数型, "libcrypto-3.dll", "@EVP_PKEY_encrypt"<br />
    .参数 ctx, 整数型<br />
    .参数 out, 整数型<br />
    .参数 outlen, 整数型, 传址<br />
    .参数 in, 整数型<br />
    .参数 inlen, 整数型<br />
<br />
.DLL命令 EVP_PKEY_decrypt, 整数型, "libcrypto-3.dll", "@EVP_PKEY_decrypt"<br />
    .参数 ctx, 整数型<br />
    .参数 out, 整数型<br />
    .参数 outlen, 整数型, 传址<br />
    .参数 in, 整数型<br />
    .参数 inlen, 整数型<br />
<br />
.DLL命令 malloc, 整数型, "msvcrt.dll", "@malloc"<br />
    .参数 size, 整数型<br />
<br />
.DLL命令 realloc, 整数型, "msvcrt.dll", "@realloc"<br />
    .参数 ptr, 整数型<br />
    .参数 size, 整数型<br />
<br />
.DLL命令 free, 整数型, "msvcrt.dll", "@free"<br />
    .参数 ptr, 整数型<br />
<br />
<br />
<br />
.子程序 RsaOeapWithSha256, 字节集<br />
.参数 data, 字节集<br />
.参数 pubkey, 文本型, , pem格式<br />
.局部变量 pkey, 整数型<br />
.局部变量 ctx, 整数型<br />
.局部变量 init, 整数型<br />
.局部变量 outlen, 整数型<br />
.局部变量 out, 字节集<br />
.局部变量 ret, 逻辑型<br />
.局部变量 in, 字节集<br />
.局部变量 pkey_bytes, 字节集<br />
.局部变量 bio, 整数型<br />
.局部变量 padding, 整数型<br />
<br />
padding ＝ #RSA_PKCS1_OAEP_PADDING<br />
ret ＝ 假<br />
pkey_bytes ＝ 到字节集 (pubkey)<br />
in ＝ data<br />
bio ＝ BIO_new (BIO_s_mem ())<br />
BIO_write (bio, 到字节集 (pkey_bytes), 取字节集长度 (pkey_bytes))<br />
pkey ＝ PEM_read_bio_PUBKEY (bio, 0, 0, 0)<br />
.如果真 (pkey ≠ 0)<br />
    ctx ＝ EVP_PKEY_CTX_new (pkey, 0)<br />
    .如果真 (ctx ≠ 0)<br />
        .如果真 (EVP_PKEY_encrypt_init (ctx) ＝ 1)<br />
            .如果真 (EVP_PKEY_CTX_set_rsa_padding (ctx, padding) ＝ 1)<br />
                .如果真 (EVP_PKEY_CTX_set_rsa_oaep_md (ctx, EVP_sha256 ()) ＝ 1)<br />
                    .如果真 (EVP_PKEY_CTX_set_rsa_mgf1_md (ctx, EVP_sha256 ()) ＝ 1)<br />
                        .如果真 (EVP_PKEY_encrypt (ctx, 0, outlen, 0, 0) ＝ 1)<br />
                            out ＝ 取空白字节集 (outlen)<br />
                            .如果真 (EVP_PKEY_encrypt (ctx, 取变量数据地址 (out), outlen, 取变量数据地址 (in), 取字节集长度 (in)) ＝ 1)<br />
                                ret ＝ 真<br />
                            .如果真结束<br />
<br />
                        .如果真结束<br />
<br />
                    .如果真结束<br />
<br />
                .如果真结束<br />
<br />
            .如果真结束<br />
<br />
        .如果真结束<br />
<br />
    .如果真结束<br />
<br />
.如果真结束<br />
<br />
.如果真 (ctx ≠ 0)<br />
    EVP_PKEY_CTX_free (ctx)<br />
.如果真结束<br />
.如果真 (pkey ≠ 0)<br />
    EVP_PKEY_free (pkey)<br />
.如果真结束<br />
.如果真 (bio ≠ 0)<br />
    BIO_free (bio)<br />
.如果真结束<br />
<br />
.判断开始 (ret)<br />
    返回 (out)<br />
.默认<br />
    返回 ({  })<br />
.判断结束

[Plain Text] 纯文本查看 复制代码

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备注
__启动窗口_创建完毕

变量名	类型	静态	数组	备注
data	字节集

data ＝ RsaOaepWithSha256 ({ 1, 2, 3 }, #测试公钥 )
调试输出 (data)

i支持库列表	支持库注释
spec	特殊功能支持库

-----BEGIN PUBLIC KEY----- #换行符
pubkey
-----END PUBLIC KEY----- #换行符

注意pubkey的2个换行符，否则会加载pubkey失败

libcrypto-3.zip (1.41 MB, 下载次数: 22)

暴力男神阿帅 · 发表于 2025-10-15 18:55:58

wlp 发表于 2025-9-14 12:19
[e=0].版本 2
.支持库 spec

老哥能搞一个oaep sha256验签的方法吗谢谢

wlp · 发表于 2025-10-15 19:36:03

暴力男神阿帅发表于 2025-10-15 18:55
老哥能搞一个oaep sha256验签的方法吗谢谢

EVP_PKEY_encrypt换成EVP_PKEY_sign 应该就可以了

暴力男神阿帅 · 发表于 2025-10-15 19:48:00

wlp 发表于 2025-10-15 19:36
EVP_PKEY_encrypt换成EVP_PKEY_sign 应该就可以了

RsaVerifyWithSha256 我看了下好像得用这个API

wlp · 发表于 2025-10-15 20:33:37

暴力男神阿帅发表于 2025-10-15 19:48
RsaVerifyWithSha256 我看了下好像得用这个API

EVP_PKEY_sign不识字吗

暴力男神阿帅 · 发表于 2025-10-15 21:04:01

wlp 发表于 2025-10-15 20:33
EVP_PKEY_sign不识字吗

对我测试了不行,我用C++写了个接口调用OK了,得用这个流程 EVP_MD_CTX *ctx = EVP_MD_CTX_new();
EVP_VerifyInit_ex(ctx, EVP_sha256(), NULL);
EVP_VerifyUpdate(ctx, data, data_len);
int result = EVP_VerifyFinal(ctx, signature, sig_len, public_key);

wlp · 发表于 2025-10-15 21:20:41

暴力男神阿帅发表于 2025-10-15 21:04
对我测试了不行,我用C++写了个接口调用OK了,得用这个流程 EVP_MD_CTX *ctx = EVP_MD_CTX_new();
EVP_Ver ...

EVP_PKEY_encrypt_init 改成 EVP_PKEY_verify_init
EVP_PKEY_encrypt 改成 EVP_PKEY_verify

最后的那2个EVP_PKEY_encrypt 删掉一个，改成正确的EVP_PKEY_verify 应该就没问题了

		自动登录	找回密码
密码			注册

[精币悬赏] 易语言rsa-oaep 实现

浏览过的版块