拦截其它程序的网络数据封包

• 
  TJmpCode = packed record
  
  JmpCode: BYTE;
  
  Address: TSockProc;
  
  MovEAX: Array [0..2] of BYTE;
  
  end;

  //--------------------函数声明---------------------------
  
  procedure HookAPI;
  
  procedure UnHookAPI;

  var
  
  OldSend, OldRecv: TSockProc; //原来的API地址
  
  JmpCode: TJmpCode;
  
  OldProc: array [0..1] of TJmpCode;
  
  AddSend, AddRecv: pointer; //API地址
  
  TmpJmp: TJmpCode;
  
  ProcessHandle: THandle;
  
  implementation

  {---------------------------------------}
  
  {函数功能:Send函数的HOOK
  
  {函数参数:同Send
  
  {函数返回值:integer
  
  {---------------------------------------}
  
  function MySend(s: TSocket; var Buf; len, flags: Integer): Integer; stdcall;
  
  var
  
  dwSize: cardinal;
  
  begin
  
  //这儿进行发送的数据处理
  
  MessageBeep(1000); //简单的响一声
  
  //调用直正的Send函数
  
  WriteProcessMemory(ProcessHandle, AddSend, @OldProc[0], 8, dwSize);
  
  Result := OldSend(S, Buf, len, flags);
  
  JmpCode.Address := @MySend;
  
  WriteProcessMemory(ProcessHandle, AddSend, @JmpCode, 8, dwSize);
  
  end;

  {---------------------------------------}
  
  {函数功能:Recv函数的HOOK
  
  {函数参数:同Recv
  
  {函数返回值:integer
  
  {---------------------------------------}
  
  function MyRecv(s: TSocket; var Buf; len, flags: Integer): Integer; stdcall;
  
  var
  
  dwSize: cardinal;
  
  begin
  
  //这儿进行接收的数据处理
  
  MessageBeep(1000); //简单的响一声
  
  //调用直正的Recv函数
  
  WriteProcessMemory(ProcessHandle, AddRecv, @OldProc[1], 8, dwSize);
  
  Result := OldRecv(S, Buf, len, flags);
  
  JmpCode.Address := @MyRecv;
  
  WriteProcessMemory(ProcessHandle, AddRecv, @JmpCode, 8, dwSize);
  
  end;

  {------------------------------------}
  
  {过程功能:HookAPI
  
  {过程参数:无
  

• 上一页 [1] [2] [3] [4] [5] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• 拦截其它程序的网络数据封包 相关文章：
• ·网页挂马拦截防护性能大比拼
• ·谁是克星?4款网页木马拦截工具大比武
• ·C#+低级Windows API钩子拦截键盘输入
• ·如何防止被IE工具拦截导致无法弹出窗口
• ·三招八式教你拦截烦人的网上广告
• ·你的插件拦截智能吗？
• ·阻止QQ安全中心拦截将要传输的文件
• ·开启路由器的 TCP 拦截
• ·开启路由器的TCP拦截保护网络主机
• ·利用HOOK拦截封包原理
• 拦截其它程序的网络数据封包 相关软件
• ·太空拦截机之自由计划（Space Interceptor Project Freedom）免CD补丁
• ·拦截爱情记忆
• ·拦截淑女
• ·全能助手广告拦截专家V5.10
• ·3721上网助手之广告拦截专家V4.2 Build 01.18
• ·美机拍摄《王伟拦截美机的录像》

上一篇:用Delphi编写数据报存储控件(1)

下一篇:取得图片的透明区域

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐