delphi - 随机 Indy 响应代码 = -1/EIdSocketError 套接字错误 # 0 异常

Question

我有一个delphi代码，基本上使用Indy 10.4.704将文件上传到远程安全服务器:

 IdHTTP                 := TIdHTTP.Create(nil);
 try
    TheCompressor       := TIdCompressorZLib.Create(nil);
    TheSSL              := TIdSSLIOHandlerSocketOpenSSL.Create(nil);

    with IdHTTP do
    begin
         HTTPOptions     := [hoForceEncodeParams];
         AllowCookies    := True;
         HandleRedirects := True;
         ProtocolVersion := pv1_1;

         IOHandler       := TheSSL;
         Compressor      := TheCompressor;
    end;    // with

    // Get upload resume offset
    try
       IdHttp.Head('https://www.domain.com/my-file.bin');
       if (IdHttp.Response.ResponseCode <> 404) And (IdHttp.Response.ContentLength >= 0) then
          StartPos   := IdHttp.Response.ContentLength
       else
           StartPos  := 0;
    except
          StartPos   := 0;
    end;    // try/except

    // Upload File
    TheFile          := TFileStream.Create(FileName, fmOpenRead OR fmShareDenyWrite);
    RangeStream      := TIdHTTPRangeStream.Create(TheFile, StartPos, -1, True);
    try
       if (RangeStream.ResponseCode = 206) then
          IdHTTP.Post(https://www.domain.com/upload.php', RangeStream);
    finally
           RangeStream.Free;
    end;    // try/finally
 finally
        FreeAndNil(IdHTTP);
 end;    // try/finally

问题是有时代码会失败，Indy 会抛出 EIdSocketError Socket Error # 0 异常(idHTTP.ResponseCode 为 -1)

鉴于我的互联网连接很差，我启动了一个 EC2 Windows 实例并在其上测试了我的代码(Windows 实例在云上运行，因此我假设连接不是问题)，但我遇到同样的问题!

该错误似乎是随机的，有时上传有效，有时上传失败。我用TidLogFile调试，我能找到的是这样的:

Stat Connected.
Sent 4/26/2012 4:18:42: POST /app/upload.php...
Sent 4/26/2012 4:18:42: <uploaded_file_data_here>
Stat Disconnected.

有人知道是什么原因造成的/如何解决这个问题吗？

编辑

我traced the exception back to TIdSSLIOHandlerSocketOpenSSL 。我google了很多，看来不是SSL错误。

Answer 1

请升级到最新的 Indy 10 版本，即 10.5.8 r4743。错误代码 0 的 SSL 相关问题已在一年前得到修复。