delphi服务器端如何防止DDOS  
官方Delphi 学习QQ群: 682628230(三千人)
频道

delphi服务器端如何防止DDOS


delphi服务器端如何防止DDOS 
前面说到DSServer的OnConnect是socket已经完全搭好client都调用connect的服务器方法了才触发的,如果我们到这里才来想起拒绝不合法的ip连接,已经挺晚了:socket已经连接好了,都已经创建线程开始通讯了。
 
怎么做才能在最开始的socket握手里,就让捣蛋鬼死在萌芽中呢。
 
要解决这个问题,当然得从TDSTCPServerTransport下手,因为ServerTransport才是真正负责通讯的,可以在它的OnConnect事件下手
 
 procedure TServerContainer1.DSTCPServerTransport1Connect(   Event: TDSTCPConnectEventObject);
 
var  conn: TIdTCPConnection;
 
begin 
 
conn := Event.Connection as TIdTCPConnection;  
 
LogInfo('From ' + conn.Socket.Binding.PeerIP + '(' + IntToStr(conn.Socket.Binding.PeerPort) + ')');
 
 end;
 
在这里,就能得到连接上来的IP了,在blacklist里的ip,就可以直接  conn.Disconnect。当然,由于indy的架构,线程也是已经创建了的,要真正解决DDOS,下回再重述一下Indy架构来看看如何下手。

推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.033890962600708 seconds