Indy TCP - Warten bis die Gegenseite zugemacht hat

[Der schöne Günther]

Ich bin kein Netzwerkprofi. Deswegen bin ich verwirrt.

Ich habe einen Indy (TIdTcpClient ), nennen wir ihn A und die Gegenseite B. Ich baue die Verbindung ab indem ich sage client.Disconnect(True); In Wireshark sehe ich (von oben nach unten):

Code:

+========+=============+===========+
| Source | Destination | TCP-Flags |
+========+=============+===========+
| A       | B            | FIN, ACK   |
+--------+-------------+-----------+
| B       | A            | ACK        |
+--------+-------------+-----------+
|  tcpClient.Connected() = false    |
+--------+-------------+-----------+
| B       | A            | FIN, ACK   |
+--------+-------------+-----------+
| A       | B            | ACK        |
+--------+-------------+-----------+

Mein Problem an der Sache:

Aus Delphi/Indy-Sicht ist die Verbindung schon geschlossen nachdem ich mein FIN abgesetzt habe.

Ich möchte allerdings noch bewusst warten bis die Gegenseite auch FIN gesagt hat, denn ich bin höflich.

Wie mache ich das?

[Sherlock]

Da wirst Du wohl selbst die Indys nachbauen müssen. Melde Dich, wenn Du fast fertig bist. Alternativ kannst Du einen Bug Report bei denen auf machen.

Hast Du mal in die ICS von Francois Piette reingeschaut? Die sind IMHO delphischer als die Indys.

Sherlock

[mjustin]

Hinter den Indy Kommandos stehen die Windows API Funktionen - daher würde ich zuerst einmal weiter in das Disconnect hinein schauen (oder debuggen) um zu erkennen welche API Funktion dort benutzt wird.

[Klaus01]

.. gab es bei den Indy Libraries nicht auch ein CloseGracefully?

Delphi-Quellcode:

TCPClient.IOHandler.InputBuffer.Clear;
TCPClient.IOHandler.CloseGracefully;
TCPClient.Disconnect;

Grüße
Klaus

[mjustin]

Letztendlich ruft ein Disconnect (unter Windows) diesen Code auf:

Delphi-Quellcode:

procedure TIdStackWindows.Disconnect(ASocket: TIdStackSocketHandle);
begin
  // Windows uses Id_SD_Send, Linux should use Id_SD_Both
  WSShutdown(ASocket, Id_SD_Send);
  // SO_LINGER is false - socket may take a little while to actually close after this
  WSCloseSocket(ASocket);
end;

Durch das CloseSocket ist das Socket Handle ungültig (MSDN: "The closesocket function closes a socket. Use it to release the socket descriptor passed in the s parameter. Note that the socket descriptor passed in the s parameter may immediately be reused by the system as soon as closesocket function is issued. As a result, it is not reliable to expect further references to the socket descriptor passed in the s parameter to fail with the error WSAENOTSOCK.").

Dadurch kann man nach dem Schliessen nicht mehr sinnvoll auf das Socket Handle zugreifen.

Der Client kann daher auch nicht mehr prüfen, ob noch irgendetwas vom Server gesendet wird.
Die TCP Pakete sieht man allerdings auch sonst nicht. Mit Indy (oder anderen TCP Bibliotheken die auf Winsock basieren) kommt man daher nicht weiter.

[Der schöne Günther]

Vielen Dank für die Antworten!

Zitat von mjustin:

Letztendlich ruft ein Disconnect (unter Windows) diesen Code auf
[...]
Durch das CloseSocket ist das Socket Handle ungültig [...]
Dadurch kann man nach dem Schliessen nicht mehr sinnvoll auf das Socket Handle zugreifen.

Der Client kann daher auch nicht mehr prüfen, ob noch irgendetwas vom Server gesendet wird.

Wenn ich mich an die Microsoft-Doku halte, dann gehört zwischen Shutdown und CloseSocket dass man wartet dass die Gegenseite auch zumacht. Indy zieht einfach den Stecker.

https://msdn.microsoft.com/de-de/lib...(v=vs.85).aspx

oder

Zitat:

Call shutdown with how=SD_SEND.
Call recv or WSARecv until the function completes with success and indicates zero bytes were received. If SOCKET_ERROR is returned, then the graceful disconnect is not possible.
Call closesocket.

Quelle


.net kann das doch auch, warum kann ich mit Delphi/Indy noch nicht mal einen TCP-Socket vernünftig schließen?

Code:

using System;
using System.Net.Sockets;

namespace ConsoleApplication1
{
   class Program
   {
      const String ipAddress = "192.168.86.116";
      const ushort portNo = 502; 

      static void TestReconnect()
      {
         Socket socket = new TcpClient().Client;
         socket.Connect(ipAddress, portNo);
         socket.Disconnect(reuseSocket : true); // bei false ist das Verhalten wie bei Delphi/Indy
      }

      static void Main(string[] args)
      {
         TestReconnect();
         TestReconnect();

         Console.WriteLine("end.");
         Console.ReadLine();
      }
   }
}

Ich schaue mir mal ICS an. Sonst kenne ich keine Alternativen zu Indy