|
|
易语言的防抓包检测示例源码,包含进程检测、内存关键字扫描和系统代理检测功能。
|
防抓包检测模块(易语言源码)<br>版本 2<br>支持库 eAPI<br>支持库 spec<br><br>常量抓包进程 = "fiddlerexe,charlesexe,winhexexe,wiresharkexe" ' 常用抓包进程名(可自定义扩展)<br>常量内存关键字 = "Fiddler|Charles|HTTPDEBUG|WinHex|Wireshark" ' 抓包软件特征字符串(支持正则匹配)<br><br>局部变量 进程列表, 进程信息, , "0"<br>局部变量 i, 整数型<br>局部变量 模块句柄, 整数型<br>局部变量 内存数据, 字节集<br>局部变量 代理状态, 整数型<br><br>一、进程检测模块<br>子程序 检测抓包进程, 逻辑型<br> 进程列表 = 取所有进程 ()<br> 计次循环首 (取数组成员数 (进程列表), i)<br> 如果 (寻找文本 (进程列表 进程名, #常量抓包进程, , 假) ≠ -1)<br> 调试输出 (“检测到抓包进程: ” + 进程列表 进程名)<br> 返回 (真)<br> 如果结束<br> 计次循环尾 ()<br> 返回 (假)<br><br>二、内存关键字扫描模块<br>子程序 扫描抓包软件关键字, 逻辑型<br> 进程列表 = 取所有进程 ()<br> 计次循环首 (取数组成员数 (进程列表), i)<br> 模块句柄 = 打开进程 (进程列表 进程ID, #PROCESSVMREAD, 假)<br> 如果 (模块句柄 ≠ 0)<br> 内存数据 = 读进程内存 (模块句柄, 进程列表 模块基址, 到整数 (进程列表 模块大小))<br> 如果 (匹配文本 (到文本 (内存数据), #常量内存关键字, 假, ))<br> 调试输出 (“检测到抓包软件内存特征”)<br> 关闭进程 (模块句柄)<br> 返回 (真)<br> 如果结束<br> 计次循环尾 ()<br> 关闭进程 (模块句柄)<br> 返回 (假)<br><br>三、系统代理检测模块<br>子程序 检测系统代理, 逻辑型<br> 代理状态 = 检查网络代理()<br> 如果 (代理状态 ≠ 0)<br> 调试输出 (“检测到系统代理”)<br> 关闭网络代理 (代理状态)<br> 返回 (真)<br> 如果结束<br> 返回 (假)<br><br>[本文内容由人工智能科大讯飞 - 星火认知辅助生成,仅供参考] |
|