网络RSA加密通讯简单源码

网络RSA加密通讯简单源码

.版本 2
.支持库 EThread
.支持库 spec

.程序集 eNet
.程序集变量 私钥句柄, 整数型
.程序集变量 公钥句柄, 整数型
.程序集变量 许可证, 整数型

.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码

_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 _临时子程序
.局部变量 密钥文本, 文本型
.局部变量 通讯协议, 整数型
.局部变量 结果数据, 字节集
.局部变量 网络延迟, 整数型

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
密钥文本 ＝ 删全部空 (到文本 (读入文件 (“D:\UserData\Desktop\直播管理\Server\Config\PiKey.key”)))
私钥句柄 ＝ RSA_设置私钥 (密钥文本)
密钥文本 ＝ 删全部空 (到文本 (读入文件 (“D:\UserData\Desktop\直播管理\Client\Config\Key\PuKey.key”)))
公钥句柄 ＝ RSA_设置公钥 (密钥文本)
许可证 ＝ 创建进入许可证 ()
服务端_创建 (2236, &数据到达, &客户进入, &客户离开)
客户端_连接 (“127.0.0.1”, 2236)
客户端_发送 (公钥句柄, 1001, 到字节集 (“Hello World”), 通讯协议, 结果数据, 网络延迟)
调试输出 (“服务端返回：”, 网络延迟, 通讯协议, 到文本 (结果数据))
客户端_断开 ()
服务端_销毁 ()
RSA_释放指针 (私钥句柄)
RSA_释放指针 (公钥句柄)
删除进入许可证 (许可证)

.子程序 数据到达
.参数 内存指针, 整数型
.参数 数据长度, 整数型
.局部变量 消息代码, 文本型
.局部变量 通讯协议, 整数型
.局部变量 结果数据, 字节集
.局部变量 客户句柄, 整数型

进入许可区 (许可证)
服务端_解析 (内存指针, 数据长度, 私钥句柄, 客户句柄, 消息代码, 通讯协议, 结果数据)
调试输出 (“请求的数据”, 客户句柄, 消息代码, 通讯协议, 到文本 (结果数据))
服务端_发送 (消息代码, 通讯协议 ＋ 1, 结果数据)
' 服务端_断开 (客户句柄)
退出许可区 (许可证)

.子程序 客户进入
.参数 客户句柄, 整数型

' 调试输出 (“客户进入”, 客户句柄)

.子程序 客户离开
.参数 客户句柄, 整数型

' 调试输出 (“客户离开”, 客户句柄)

@lsq51201314