• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    迪恩网络公众号

mmz-asio4delphi死链接的解决办法

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

最近一段时间,因为忙于网络的项目,特意到网上找了些例子,特意花时间研究了一下马敏钊写的 mmz-asio4delphi 感觉很好用,不过深入研究之后,发现一个问题。

马大的这个代码,会产生死链接。

 

        try
          if TAsioClient(FClientLst.Objects[i]).Socketptr > 0 then begin
            Asio_closesocket(TAsioClient(FClientLst.Objects[i]).Socketptr);
            TAsioClient(FClientLst.Objects[i]).Socketptr := 0;
          end;
          //Asio_DisConnedCallback(integer(TAsioClient(FClientLst.Objects[i])));
        except
        end

 

这是TAsioSvr.CheckDeadClients中的一段代码,可能跟原版的有点区别,不过大体在这。可以看到,上面的代码中,如果socketptr不为0则调用asio_closesocket函数关闭,

然后直接给Socketptr赋值为0。但运行后发现,虽然程序中socketptr已经赋值为0,并且对应的客户端也已经删除,但在Windows中,该链接还是存在,当初占用的端口依旧被占用。

在程序中的体现就是:显示AsioSvr.FClientLst.Count 和 AsioSvr.FDeadClients.Count 的数量,要远远小于,从360看到的该程序占用链接的数量,说明其中很多死链接存在。

以下是asio_closesocket的C++代码:

DllExport int Asio_closesocket(session * isocket)
{
    //isocket->userdata=0;//不允许再触发
    try
    {
    isocket->deadtime=GetTickCount();    
    isocket->socket().cancel();
    boost::system::error_code ignored_ec;  
        isocket->socket().shutdown(boost::asio::ip::tcp::socket::shutdown_both, ignored_ec);
    isocket->socket().close();

    }
    catch(...)
    {}
    //EnterCriticalSection(&criCounter);
    //deadlist.push_back(isocket);
    //LeaveCriticalSection(&criCounter);

    //delete isocket;
    return 0;
}

因为不怎么懂C++,所以不知道该怎么改。那怎么解决死链接杀不掉的问题呢?

有的大大说,只要把Delphi代码中注释的那句Asio_DisConnedCallback(integer(TAsioClient(FClientLst.Objects[i]))); 去掉注释就可以。

其实只要看看Asio_DisConnedCallback的执行代码就知道,问题依然存在。甚至是Delphi中,将对应的客户端对象释放,对应的socket链接还是没有断开。

后来看C++代码的时候,发现了下面这个函数:

DllExport int Asio_Client_Free(session * isocket)
{
    delete isocket;
    return 0;    
}

可以删除socket对象!这实在是太棒了,正是我想要的。

可是,应用中才发现,这个函数带来了另外一个问题。删除自身的socket链接的同时,居然将监控端口的socket也删除了!

无奈,只能另找办法。功夫不负有心人,无意中发现,原来可以用write函数来达到删除socket的目的。

void handle_write(const boost::system::error_code& error,int iuser,int iuser2)
  {
    if(Callback_writedata!=NULL)
    {
    //     std::cout << "write ok " << iuser <<  "\n" ; 
         Callback_writedata(iuser,iuser2);
    }
    if (!error)
    {
       
    }
    else
    {
      socket_.close();    
      if(Callback_DisConn!=NULL)
      {
         Callback_DisConn(userdata);
      }
    
     
       delete this;
    }
  }

从上面的代码可以看到,如果write出错,函数会disconn的回调函数,并且"delete this"。终于可以解决问题了啊。

try
          if TAsioClient(FClientLst.Objects[i]).Socketptr > 0 then begin
            TAsioClient(FClientLst.Objects[i]).Write(@bytes[0],1);
        except
        end; 

只要在一段时间没数据收发以后,随便给这个客户端发点东西,如果发送错误,自动会断开链接。

 


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
64位MATLAB和C混合编程以及联合调试发布时间:2022-07-18
下一篇:
MATLAB在三维坐标中显示图片 并 使得图片部分透明发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap