我有一个使用idHttpServer开发的webserver应用程序.当客户端连接我的网络服务器时,由于某种未知的原因,断开连接(没有正常断开连接),我的网络服务器不会收到通知.我知道这是正常行为,但我需要知道客户端何时死亡.
1 – 实施心跳机制.客户端套接字通知服务器它仍然存在(需要一些工作和一些代码才能使其工作)
2 – TCP Keep Alive.这是我最喜欢的方式,因为它不需要太多的代码和工作.但我对此有一些疑问.
>这是否可以使用
idHttpServer(用于服务器)和
wininet功能(为客户端)?
>这真的按预期工作吗?我的意思是,当客户端一直死亡时,服务器会被取消?
>有没有人在wininet上设置这个样本? (我想这必须在客户端设置,对吧?)
>是否有更好的方式通知服务器客户端已死(当然使用indy和wininet)
编辑
我正在使用他们的svn中的Delphi 2010和最后一个Indy10源代码.
解决方法
如果您使用的是最新的Indy 10版本,则可以使用TIdSocketHandle.SetKeepAliveValues()方法:
procedure SetKeepAliveValues(const AEnabled: Boolean; const ATimeMS,AInterval: Integer);
例如:
procedure TForm1.IdHTTPServer1Connect(AContext: TIdContext); begin // send a keep-alive every 1 second after // 5 seconds of inactivity has been detected AContext.Binding.SetKeepAliveValues(True,5000,1000); end;
请注意,ATimeMS和AInterval参数仅在Win2K及更高版本上受支持.
否则,直接使用TIdSocketHandle.SetSockOpt()方法手动启用TCP / IP SO_KEEPALIVE选项:
procedure TIdSocketHandle.SetSockOpt(ALevel: TIdSocketOptionLevel; AOptName: TIdSocketOption; AOptVal: Integer);
例如:
procedure TForm1.IdHTTPServer1Connect(AContext: TIdContext); begin AContext.Binding.SetSockOpt(Id_SOL_SOCKET,Id_SO_KEEPALIVE,1); end;