TIdTcpClient报Connection Closed Gracefully错误的处理方案咨询

现有重试方案的问题 #

你的代码在处理连接异常时存在几个关键问题，可能导致资源泄漏、竞态条件或不稳定行为：

1. 线程管理混乱 #

• 在TReadingThread的异常分支中，直接创建新的TThreadCon并启动，却没有等待旧的THD线程结束，会导致旧线程的资源（如TCPClient对象、线程内存）无法被正确释放，长期运行会引发内存泄漏。
• THD和rt作为共享变量，在多线程环境下直接赋值和访问，没有同步保护（如临界区），会出现竞态条件，可能导致野指针、重复释放或线程状态异常。
• TReadingThread中执行if rt <> nil then rt.Terminate;，如果rt指向当前线程自身，终止自己的逻辑不仅多余，还可能引发未定义行为。

2. 连接清理不彻底 #

• 使用FConn.Disconnect(False)时，False参数表示不触发断开事件，但在异常场景下，应该确保IOHandler被完全清理，建议使用Disconnect(True)，或者先检查连接状态再执行清理操作。
• TThreadCon中每次重试前直接访问TCPClient.IOHandler，如果TCPClient已经断开，IOHandler可能已经被释放，直接访问会触发访问违规。

3. 重试逻辑无效且不合理 #

• 你已经发现Attempt在Execute内部初始化，导致if (Attempt >= 3) then永远不会触发，重试次数限制完全失效。
• 固定2500ms的重试间隔没有考虑网络恢复的实际情况，频繁重试可能对服务器造成额外压力，建议使用指数退避策略（如重试间隔依次为2s、4s、8s，最大不超过10s）。

优化建议 #

1. 规范线程生命周期管理 #

• 避免在线程内部自我重启，改用一个上层控制器类统一管理连接线程的创建、终止和重试逻辑。
• 修改共享变量的访问逻辑，添加同步保护（如TCriticalSection），防止多线程同时修改THD、rt等变量。
• 终止线程后必须调用WaitFor等待线程完全结束，再释放相关资源，示例：

// 终止线程并清理的正确姿势
if Assigned(OldTHD) then
begin
  OldTHD.Terminate;
  OldTHD.WaitFor;
  OldTHD.Free;
  OldTHD := nil;
end;

2. 优化异常处理与连接清理 #

• 捕获异常时，明确针对EIdConnClosedGracefully进行处理，避免捕获所有异常掩盖其他严重错误：

except
  on E: EIdConnClosedGracefully do
  begin
    // 处理优雅关闭的重试逻辑
  end;
  on E: Exception do
  begin
    // 处理其他异常，如日志记录、告警等
  end;
end;

• 断开连接后，主动将IOHandler置为nil，避免后续访问无效对象：

FConn.Disconnect(True);
FConn.IOHandler := nil;

3. 修复重试逻辑 #

• 将Attempt的声明移到while not Terminated do循环外部，确保重试次数可以累计：

procedure TThreadCon.Execute;
var
  Attempt : Integer;
begin
  Attempt := 0; // 初始化在循环外
  while not Terminated do
  begin
    try
      Inc(Attempt);
      // 连接逻辑...
    except
      on E: Exception do
      begin
        if Attempt >= 5 then // 合理的重试次数上限
        begin
          Terminate;
          Break;
        end;
        // 指数退避等待
        Sleep(2000 * Min(Attempt, 5));
        Continue;
      end;
    end;
    // ...
  end;
end;

关于“Connection Closed Gracefully”错误的说明 #

这个错误对应Indy的EIdConnClosedGracefully异常，并非仅由服务器主动关闭导致，常见触发场景包括：

• 服务器主动发送FIN包关闭连接；
• 网络中间设备（防火墙、NAT网关）因空闲超时或策略限制断开连接；
• 服务器进程意外退出，操作系统自动关闭关联的TCP连接；
• 客户端本地网络波动，连接被重置后触发优雅关闭逻辑；
• Indy内部IO操作超时（结合ReadTimeout等设置）时，也可能触发该异常。

内容的提问来源于stack exchange，提问作者Luiz Felipe