开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 22226|回复: 262
收起左侧

[2020开源大赛(第五届)] 高仿PChunter线程管理器可操作任意进程 纯DLL架构注入可写exe

  [复制链接]
结帖率:0% (0/8)
发表于 2020-10-31 20:16:18 | 显示全部楼层 |阅读模式   天津市天津市
本帖最后由 伝天 于 2020-10-31 20:19 编辑
  
子程序名返回值类型公开备 注
wsShowThdInfo  
参数名类 型参考可空数组备 注
pid整数型
进程提权 (“SeDebugPrivilege”)
系统_处理事件 ()
ZwQuerySystemInformation ( #SystemProcessesAndThreadsInformation, buf, 0, size)
memaddr = GlobalAlloc (64, size)
buf = memaddr
ret = ZwQuerySystemInformation ( #SystemProcessesAndThreadsInformation, buf, size, 0)
如果真 (ret = 0)
CopyMemory_SYSTEM_PROCESSES (temp, buf, 240)
CopyMemory_SYSTEM_PROCESSES (temper, buf, 180 + 64 × temp.ThreadCount)
判断循环首 (temper.NextEntryDelta ≠ 0)
如果真 (temper.ProcessID = pid)
变量循环首 (1, temper.ThreadCount - 1, 1, i)
ii = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (ii, 0, 到文本 (temper.Threads [i].ClientId.UniqueThread))
超级列表框1.置标题 (ii, 1, GetEthreadByTid (temper.Threads [i].ClientId.UniqueThread))
超级列表框1.置标题 (ii, 2, GetTeb (temper.Threads [i].ClientId.UniqueThread))
超级列表框1.置标题 (ii, 3, 到文本 (temper.Threads [i].Priority))
超级列表框1.置标题 (ii, 4, 取线程入口 (temper.Threads [i].ClientId.UniqueThread))
超级列表框1.置标题 (ii, 5, 取线程模块 (temper.Threads [i].ClientId.UniqueThread))
超级列表框1.置标题 (ii, 6, 到文本 (temper.Threads [i].ContextSwitchCount))
如果 (状态 = 5)

超级列表框1.置标题 (ii, 7, 到文本 (“结束”))
超级列表框1.置标题 (ii, 7, 到文本 (“运行”))
超级列表框1.置标题 (ii, 9, 到文本 (“用户未操作”))
超级列表框1.置标题 (ii, 8, 到文本 (到小数 (temper.Threads [i].WaitTime)))
超级列表框1.置标题 (ii, 10, 到文本 (ii + 1))
' 超级列表框1.置标题 (ii, 4, 到文本 (temper.Threads [i].StartAddress))
' 超级列表框1.置标题 (ii, 8, 到文本 (temper.Threads [i].ClientId.UniqueThread))
' 超级列表框1.置标题 (ii, 6, 到文本 (temper.Threads [i].ClientId.UniqueProcess))
' 超级列表框1.置标题 (ii, 8, 到文本 (temper.Threads [i].BasePriority))
' 超级列表框1.置标题 (ii, 8, 到文本 (temper.Threads [i].WaitReason))
变量循环尾 ()
跳出循环 ()
buf = buf + temp.NextEntryDelta
CopyMemory_SYSTEM_PROCESSES (temp, buf, 240)
CopyMemory_SYSTEM_PROCESSES (temper, buf, 180 + 64 × temp.ThreadCount)
如果 (超级列表框1.查找表项 (超级列表框1.取标题 (ii, 5), , , 5)到整数 (“”) 超级列表框1.查找表项 (超级列表框1.取标题 (ii, 2), , , 2)到整数 (“”))
超级列表框1.获取焦点 ()
超级列表框1.现行选中项 = ii
超级列表框1.置标题 (ii, 7, 到文本 (“不存在”))
超级列表框1.置标题 (超级列表框1.现行选中项, 9, 到文本 (“线程不存在”))
置行列颜色 (窗口_进程线程, 超级列表框1, 超级列表框1.现行选中项, 9, #芙红 )




判断循环尾 ()
GlobalFree (memaddr)


i支持库列表   支持库注释   
iext扩展界面支持库一


高仿PChunter线程管理可直接移植EXE模式可过线程保护程序  内置自动搜索指定线程并处理
回复下载 xcdll.rar (415.23 KB, 下载次数: 696)
Z_9WRTKTI5C4G8H2BLXR.png

评分

参与人数 8好评 +2 精币 +12 收起 理由
ghost12 + 1 支持开源~!感谢分享
i77 + 1 支持开源~!感谢分享
完玩 -1 -1 这种烂玩意儿 还来参加开源大赛 骗精币
易语言资源网 + 1 + 5 支持开源~!感谢分享
ycsyywl + 1 不是完整开源,标题吸引人。还打广告
wscpf1919 -1 -1 不是完整开源,大家散了吧,标题吸引人而已
kofwoool + 1 + 2 感谢分享,很给力!~
冰点 + 1 + 5 支持开源~!感谢分享

查看全部评分

签到天数: 11 天

发表于 2020-10-31 20:35:25 | 显示全部楼层   云南省昆明市
支持开源 谢谢分享 抢个沙发
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)
发表于 2020-10-31 20:35:51 | 显示全部楼层   海南省海口市
白嫖了谢谢
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)
发表于 2020-10-31 20:44:08 | 显示全部楼层   湖南省长沙市
pchunter NB
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)

签到天数: 11 天

发表于 2020-10-31 20:47:43 | 显示全部楼层   湖南省长沙市
支持开源 谢谢分享
回复 支持 反对

使用道具 举报

结帖率:94% (16/17)

签到天数: 1 天

发表于 2020-10-31 20:47:52 | 显示全部楼层   四川省成都市
看看是不是好东西
回复 支持 反对

使用道具 举报

结帖率:100% (6/6)

签到天数: 8 天

发表于 2020-10-31 21:00:42 | 显示全部楼层   云南省昆明市
很好很强悍,坚持下去哦~
回复 支持 反对

使用道具 举报

发表于 2020-10-31 21:02:02 | 显示全部楼层   湖北省武汉市
喜欢看反馈
回复 支持 反对

使用道具 举报

发表于 2020-10-31 21:04:24 | 显示全部楼层   重庆市重庆市
谢谢分享
回复 支持 反对

使用道具 举报

结帖率:87% (13/15)
发表于 2020-10-31 21:07:35 | 显示全部楼层   浙江省台州市
支持一下!感谢分享!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表