精易论坛

标题: 求助关于钉钉订阅事件怎么加密！ [打印本页]

作者: a457803910 时间: 2021-5-25 11:24
标题: 求助关于钉钉订阅事件怎么加密！

1621912949(1).png (35.26 KB, 下载次数: 1)

1621912988(1).png (47.93 KB, 下载次数: 2)

作者: liuzhe1947 时间: 2021-5-25 11:24
.版本 2
.支持库 e2ee

.子程序回调接口_解密, 文本型, 公开, decrypt
.参数 content, 文本型
.局部变量 c_content, 字节集
.局部变量 encode_aes_key, 文本型
.局部变量 vi, 文本型
.局部变量 bin, 字节集
.局部变量 str, 文本型

c_content ＝编码_BASE64解码 (content, )
encode_aes_key ＝编码_URL解码 (字节集_到文本 (编码_BASE64解码 (#aesKey, )), )
' 调试输出 (编码_BASE64解码 (#aesKeyTest, ))
' 调试输出 (取文本长度 (“4g5j64qlyl3zvetqxz5jiocdr586fn2zvjpa8zls3ij”))
vi ＝取文本左边 (encode_aes_key, 16)
' 调试输出 (“AES_key”, encode_aes_key)
' 调试输出 (“AES_vi”, vi)

' str ＝编码_BASE64编码 (对称加密 (到字节集 (“111222333”), 到字节集 (“DSFBAKLANOIQWPDANSDKHWOQNLKSA21T”), #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 到字节集 (“DSFBAKLANOIQWPDA”)))
bin ＝对称解密 (c_content, 到字节集 (encode_aes_key), #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 到字节集 (vi))
' 9hFDLYXj37x0iNXv{"EventType":"check_url"}ding7d7da86a4720960d35c2f4657eb6378f
bin ＝字节集_取右边 (bin, 字节集_取长度 (bin) － 20)
bin ＝字节集_取左边 (bin, 字节集_取长度 (bin) －字节集_取长度 (到字节集 (#corpid)))
' 调试输出 (bin)
' 调试输出 (“解密内容”, 字节集_到文本 (bin))

' URL解码 (, #文本)
返回 (URL解码 (字节集_到文本 (bin), #文本编码格式_UTF8))

作者: Pancoes 时间: 2021-5-27 23:51
同求！

作者: a457803910 时间: 2021-5-28 10:02

作者: ysjpl 时间: 2021-6-7 09:43
有预算吗

作者: liuzhe1947 时间: 2021-7-1 10:10
.版本 2

.子程序回调接口_加密, 文本型, 公开, encrypt
.参数 text, 文本型
.参数 key, 文本型
.参数 Test_text, 文本型, 可空, 测试固定文本
.局部变量 random, 字节集
.局部变量 bin, 字节集
.局部变量 msg_len, 字节集
.局部变量 encode_encrypt, 字节集
.局部变量 aes_msg, 字节集
.局部变量 encode_aes_key, 文本型
.局部变量 vi, 文本型

random ＝到字节集 (文本_取随机字符 (4, 1) ＋文本_取随机字符 (8, 2) ＋文本_取随机字符 (4, 4))
encode_aes_key ＝编码_URL解码 (字节集_到文本 (编码_BASE64解码 (#aesKey, )), )
vi ＝取文本左边 (encode_aes_key, 16)
' [random(16B) + msg_len(4B) + msg + $key]
msg_len ＝ { 0, 0, 0, 7 }
.如果 (Test_text ＝ “”)
encode_encrypt ＝ random ＋ msg_len ＋到字节集 (text) ＋到字节集 (#corpid)
.否则
encode_encrypt ＝到字节集 (Test_text)

.如果结束
' 调试输出 (“encrypt”, 字节集_到文本 (encode_encrypt))
aes_msg ＝对称加密 (到字节集 (encode_encrypt), 到字节集 (encode_aes_key), #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 到字节集 (vi))
' 调试输出 (到文本 (编码_BASE64编码A (aes_msg)))
返回 (到文本 (编码_BASE64编码A (aes_msg)))
.版本 2
.支持库 e2ee

.子程序回调接口_解密, 文本型, 公开, decrypt
.参数 content, 文本型
.局部变量 c_content, 字节集
.局部变量 encode_aes_key, 文本型
.局部变量 vi, 文本型
.局部变量 bin, 字节集
.局部变量 str, 文本型

c_content ＝编码_BASE64解码 (content, )
encode_aes_key ＝编码_URL解码 (字节集_到文本 (编码_BASE64解码 (#aesKey, )), )
' 调试输出 (编码_BASE64解码 (#aesKeyTest, ))
' 调试输出 (取文本长度 (“4g5j64qlyl3zvetqxz5jiocdr586fn2zvjpa8zls3ij”))
vi ＝取文本左边 (encode_aes_key, 16)
' 调试输出 (“AES_key”, encode_aes_key)
' 调试输出 (“AES_vi”, vi)

' str ＝编码_BASE64编码 (对称加密 (到字节集 (“111222333”), 到字节集 (“DSFBAKLANOIQWPDANSDKHWOQNLKSA21T”), #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 到字节集 (“DSFBAKLANOIQWPDA”)))
bin ＝对称解密 (c_content, 到字节集 (encode_aes_key), #对称算法_AES_256_CBC, #数据填充_PKCS7_PADDING, 到字节集 (vi))
' 9hFDLYXj37x0iNXv{"EventType":"check_url"}ding7d7da86a4720960d35c2f4657eb6378f
bin ＝字节集_取右边 (bin, 字节集_取长度 (bin) － 20)
bin ＝字节集_取左边 (bin, 字节集_取长度 (bin) －字节集_取长度 (到字节集 (#corpid)))
' 调试输出 (bin)
' 调试输出 (“解密内容”, 字节集_到文本 (bin))

' URL解码 (, #文本)
返回 (URL解码 (字节集_到文本 (bin), #文本编码格式_UTF8))

作者: Pancoes 时间: 2021-8-7 23:44

liuzhe1947 发表于 2021-7-1 10:10
.版本 2

.子程序回调接口_加密, 文本型, 公开, encrypt

大佬在zc接口时通过你的解密得到的是 {"EventType": "check_url"} 但是zc不上啊。

作者: liuzhe1947 时间: 2021-8-9 16:28

Pancoes 发表于 2021-8-7 23:44
大佬在zc接口时通过你的解密得到的是 {"EventType": "check_url"} 但是zc不上啊。 ...

自己研究吧只提供加解密方法

作者: Pancoes 时间: 2021-8-10 22:07

liuzhe1947 发表于 2021-8-9 16:28
自己研究吧只提供加解密方法

嗯嗯谢谢你大佬

欢迎光临精易论坛 (https://125.confly.eu.org/)