涉及使用魔鬼作坊模块Recv代码（附Send）

jyq5855

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
地址	整数型

如果真 (组合框1.现行选中项 ＝ -1)
信息框 (“请选择要拦截的程序!”, 0, “提示:”, )
返回 ()
判断 (按钮1.标题 ＝ “开启”)
进程ID ＝ 组合框1.取项目数值 (组合框1.现行选中项)
进程句柄 ＝ 进程_打开进程 (进程ID)
如果真 (进程句柄 ≤ 0)
信息框 (“指定程序不存在或无法拦截!”, 0, “错误:”, )
返回 ()

地址 ＝ 系统_取API地址 (“send”)
hook_Send.开始 (进程句柄, 十到十六 (地址), &Send接口, Send_返回, 5, 2, )
地址 ＝ 系统_取API地址 (“recv”)
hook_recv.开始 (进程句柄, 十到十六 (地址), &recv接口, recv_返回, 5, 2, )
标题 ＝ 标题 ＋ “ ” ＋ 到文本 (进程ID)
按钮1.标题 ＝ “关闭”
组合框1.禁止 ＝ 真


hook_Send.卸载 ()
hook_recv.卸载 ()
进程_关闭句柄 (进程句柄)
按钮1.标题 ＝ “开启”
组合框1.禁止 ＝ 假

子程序名	返回值类型	公开	备 注
Send接口

变量名	类 型	静态	数组	备 注
长度	整数型
数据	字节集
指针	整数型
套接字	整数型
文本数据	文本型
字节集请求	文本型
esp	整数型
a	整数型

' HOOK头部此时ebp还未压入堆栈,所以  [esp+4]是参数1
' esp ＋ 4=套接字
' esp ＋ 8=发包内容
' esp ＋ 12=发包长度
' esp ＋ 16=标识符
esp ＝ hook_Send.读值 (Send_返回.返回地址).ESP
长度 ＝ 内存_读整数型 (进程句柄, esp ＋ 12)  ' 第3个参数,请求长度
如果真 (长度 ＞ 0)
如果真 (选择框1.选中)
套接字 ＝ 内存_读整数型 (进程句柄, esp ＋ 4)
指针 ＝ 内存_读整数型 (进程句柄, esp ＋ 8)
数据 ＝ 内存_读字节集 (进程句柄, 指针, 长度)  ' 第2个参数,请求指针,读取时加一偏移0 读到数据
文本数据 ＝ 请求_请求到文本ASCLL (数据)
字节集请求 ＝ 字节集到十六进制文本 (数据)
' 写内存可修改参数~
a ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (a, 0, 到文本 (a ＋ 1))
超级列表框1.置标题 (a, 1, “Send”)
超级列表框1.置标题 (a, 2, 到文本 (套接字))
超级列表框1.置标题 (a, 3, 到文本 (长度))
超级列表框1.置标题 (a, 4, 字节集请求)
超级列表框1.置标题 (a, 5, 文本数据)


[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].子程序 Recv接口[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 长度, 整数型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 数据, 字节集[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 指针, 整数型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 套接字, 整数型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 文本数据, 文本型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 字节集请求, 文本型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 esp, 整数型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].局部变量 a, 整数型[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]esp ＝ hook_Send.读值 (Send_返回.返回地址).ESP[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]长度 ＝ 内存_读整数型 (进程句柄, esp ＋[backcolor=white] [color=red]?[/color][/backcolor])  ' 第3个参数,请求长度[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,].如果真 (长度 ＞ 0)[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]    .如果真 (选择框1.选中)[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]        套接字 ＝ 内存_读整数型 (进程句柄, esp ＋ [color=red]?[/color])[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]        指针 ＝ 内存_读整数型 (进程句柄, esp ＋ [color=red]?[/color])[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]        数据 ＝ 内存_读字节集 (进程句柄, 指针, 长度)  ' 第2个参数,请求指针,读取时加一偏移0 读到数据[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]        文本数据 ＝ 请求_请求到文本ASCLL (数据)[/font][/backcolor][/color]
[color=rgb (68, 68, 68)][backcolor=transparent][font=Tahoma,]        字节集请求 ＝ 字节集到十六进制文本 (数据)[/font][/backcolor][/color]

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 地址, 整数型<br /> <br /> .如果真 (组合框1.现行选中项 ＝ -1)<br />     信息框 (“请选择要拦截的程序!”, 0, “提示:”, )<br />     返回 ()<br /> .如果真结束<br /> .判断开始 (按钮1.标题 ＝ “开启”)<br />     进程ID ＝ 组合框1.取项目数值 (组合框1.现行选中项)<br />     进程句柄 ＝ 进程_打开进程 (进程ID)<br />     .如果真 (进程句柄 ≤ 0)<br />         信息框 (“指定程序不存在或无法拦截!”, 0, “错误:”, )<br />         返回 ()<br />     .如果真结束<br /> <br />     地址 ＝ 系统_取API地址 (“send”)<br />     hook_Send.开始 (进程句柄, 十到十六 (地址), &Send接口, Send_返回, 5, 2, )<br />     地址 ＝ 系统_取API地址 (“recv”)<br />     hook_recv.开始 (进程句柄, 十到十六 (地址), &recv接口, recv_返回, 5, 2, )<br />     标题 ＝ 标题 ＋ “ ” ＋ 到文本 (进程ID)<br />     按钮1.标题 ＝ “关闭”<br />     组合框1.禁止 ＝ 真<br /> .默认<br /> <br />     hook_Send.卸载 ()<br />     hook_recv.卸载 ()<br />     进程_关闭句柄 (进程句柄)<br />     按钮1.标题 ＝ “开启”<br />     组合框1.禁止 ＝ 假<br /> .判断结束<br /> <br /> <br /> .子程序 Send接口<br /> .局部变量 长度, 整数型<br /> .局部变量 数据, 字节集<br /> .局部变量 指针, 整数型<br /> .局部变量 套接字, 整数型<br /> .局部变量 文本数据, 文本型<br /> .局部变量 字节集请求, 文本型<br /> .局部变量 esp, 整数型<br /> .局部变量 a, 整数型<br /> <br /> ' HOOK头部此时ebp还未压入堆栈,所以  [esp+4]是参数1<br /> ' esp ＋ 4=套接字<br /> ' esp ＋ 8=发包内容<br /> ' esp ＋ 12=发包长度<br /> ' esp ＋ 16=标识符<br /> <br /> esp ＝ hook_Send.读值 (Send_返回.返回地址).ESP<br /> 长度 ＝ 内存_读整数型 (进程句柄, esp ＋ 12)  ' 第3个参数,请求长度<br /> <br /> .如果真 (长度 ＞ 0)<br />     .如果真 (选择框1.选中)<br />         套接字 ＝ 内存_读整数型 (进程句柄, esp ＋ 4)<br />         指针 ＝ 内存_读整数型 (进程句柄, esp ＋ 8)<br />         数据 ＝ 内存_读字节集 (进程句柄, 指针, 长度)  ' 第2个参数,请求指针,读取时加一偏移0 读到数据<br />         文本数据 ＝ 请求_请求到文本ASCLL (数据)<br />         字节集请求 ＝ 字节集到十六进制文本 (数据)<br />         ' 写内存可修改参数~<br />         a ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (a, 0, 到文本 (a ＋ 1))<br />         超级列表框1.置标题 (a, 1, “Send”)<br />         超级列表框1.置标题 (a, 2, 到文本 (套接字))<br />         超级列表框1.置标题 (a, 3, 到文本 (长度))<br />         超级列表框1.置标题 (a, 4, 字节集请求)<br />         超级列表框1.置标题 (a, 5, 文本数据)<br />     .如果真结束<br /> <br /> .如果真结束<br /> <br /> <br /> <br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.子程序 Recv接口</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 长度, 整数型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 数据, 字节集</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 指针, 整数型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 套接字, 整数型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 文本数据, 文本型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 字节集请求, 文本型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 esp, 整数型</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.局部变量 a, 整数型</font></font></font><br /> <br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">esp ＝ hook_Send.读值 (Send_返回.返回地址).ESP</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">长度 ＝ 内存_读整数型 (进程句柄, esp ＋<font style="background-color:white"> <font color="red">?</font></font>)  ' 第3个参数,请求长度</font></font></font><br /> <br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">.如果真 (长度 ＞ 0)</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">    .如果真 (选择框1.选中)</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">        套接字 ＝ 内存_读整数型 (进程句柄, esp ＋ <font color="red">?</font>)</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">        指针 ＝ 内存_读整数型 (进程句柄, esp ＋ <font color="red">?</font>)</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">        数据 ＝ 内存_读字节集 (进程句柄, 指针, 长度)  ' 第2个参数,请求指针,读取时加一偏移0 读到数据</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">        文本数据 ＝ 请求_请求到文本ASCLL (数据)</font></font></font><br /> <font style="color:rgb(68, 68, 68)"><font style="background-color:transparent"><font face="Tahoma,">        字节集请求 ＝ 字节集到十六进制文本 (数据)</font></font></font>

recv的代码部分应该怎么写呢?

jyq5855

郁闷，没有编辑功能的吗，下面的代码贴错了

18512604446

魔鬼作坊 好高端的样子

吴青峰

66666666666666666666666666666

jyq5855

没有人帮送个小码吗？？？

xia先生

我建议你百度下超级HOOK

jyq5855

18317173190 发表于 2019-3-18 21:13
我建议你百度下超级HOOK

找不到啊，找了好久

jyq5855

18317173190 发表于 2019-3-18 21:13
我建议你百度下超级HOOK

https://bbs.125.la/forum.php?mod=viewthread&tid=14236105&highlight=recv

jyq5855

18317173190 发表于 2019-3-18 21:13
我建议你百度下超级HOOK

https://bbs.125.la/forum.php?mod=viewthread&tid=14236105&highlight=recv

这贴的6楼说有，但我权限不行，能否帮个忙转下哦

jyq5855

请求哪位大侠可以提供一下谢谢