AutoDavid 0 Posted October 19 Hello, I am unable to detect a client disconnect from my Autoit Server. I thought that maybe TCPRecv would throw an error of "-2" if the client disconnected, but it doesn't seem to do so. Here is a part of the code: MsgBox(0, "Version", @AutoItVersion) MsgBox($MB_OK, "Title", $Server, 10) OnAutoItExitRegister("OnAutoItExit") TCPStartup() $MainSocket = TCPListen($Server, $Port, $MaxConnection) If $MainSocket = -1 Then Exit MsgBox(16, "Error", "Unable to intialize socket.") While 1 If $ConnectedSocket = -1 Then $ConnectedSocket = TCPAccept($MainSocket) _DebugOut("TCPAccept return: " & $ConnectedSocket ) If $ConnectedSocket <> -1 Then ; Someone Connected _DebugOut("Someone Connected") TCPSend($ConnectedSocket, "Connected!") EndIf EndIf If $ConnectedSocket <> -1 Then $Data = TCPRecv($ConnectedSocket, $MaxLength) _DebugOut("Error is: " & @error) Switch @error Case 0 ;no error. process normally if StringLen($Data) <> 0 Then EndIf Case -1 ;if using AutoIt 3.3.10.0 or higher, this error is actually "no data received", not an error. This error code does not exist in previous versions of AutoIt. $Data = "" Case Else ;TCP error. disconnect TCPCloseSocket($ConnectedSocket) $ConnectedSocket = -1 $Data = "" EndSwitch EndIf _DebugOut("Connected Socket: " & $ConnectedSocket) WEnd Share this post Link to post Share on other sites
Chimp 578 Posted October 22 the error returned by the @error macro refers to the function that was just performed, and is reset at the beginning of each function. In your code the "Switch @error" line checks the error code returned by the _DebugOut() function and not the one previously returned by the TCPRecv() function. You should instead save the code returned by @error in a variable immediately after TCPRecv() and use this variable in subsequent checks. Something like: ... If $ConnectedSocket <> -1 Then $Data = TCPRecv($ConnectedSocket, $MaxLength) $iError = @error ; save the error returned by the TCPRecv function _DebugOut("Error is: " & $iError) Switch $iError ... Hide Chimp's signature Hide all signatures small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt.... Share this post Link to post Share on other sites
AutoDavid 0 Posted November 7 On 10/22/2019 at 10:07 AM, Chimp said: the error returned by the @error macro refers to the function that was just performed, and is reset at the beginning of each function. In your code the "Switch @error" line checks the error code returned by the _DebugOut() function and not the one previously returned by the TCPRecv() function. You should instead save the code returned by @error in a variable immediately after TCPRecv() and use this variable in subsequent checks. Something like: ... If $ConnectedSocket <> -1 Then $Data = TCPRecv($ConnectedSocket, $MaxLength) $iError = @error ; save the error returned by the TCPRecv function _DebugOut("Error is: " & $iError) Switch $iError ... I still get no error except for 0. I am trying from both putty connecting to myself through 127.0.0.1, and using another device. Share this post Link to post Share on other sites
Nine 301 Posted November 7 Tested it on my own TCP client/server and in case of disconnection I get @error 10054. Hard to help you with only a part of receiver and no sender... ps. when you post code, please use this tool. Hide Nine's signature Hide all signatures No signature so far... Share this post Link to post Share on other sites
AutoDavid 0 Posted November 7 (edited) 10 minutes ago, Nine said: Tested it on my own TCP client/server and in case of disconnection I get @error 10054. Hard to help you with only a part of receiver and no sender... ps. when you post code, please use this tool. I am testing with Putty etc, and it is honestly most of the code. The rest of the code is just this: Func OnAutoItExit() If $ConnectedSocket <> - 1 Then TCPSend($ConnectedSocket, "~bye") TCPCloseSocket($ConnectedSocket) EndIf If $MainSocket <> -1 Then TCPCloseSocket($MainSocket) TCPShutdown() EndFunc I just now downgraded to 3.8.1.1, changed the code a bit, and now it works. expandcollapse popup#cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.14.5 Author: myName Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ;#include <MsgBoxConstants.au3> #include <Inet.au3> #include <Debug.au3> ; Script Start - Add your code below here Global $Commands[9] Global $MainSocket = -1 Global $ConnectedSocket = -1 Local $MaxConnection = 1; Maximum Amount Of Concurrent Connections Local $MaxLength = 512; Maximum Length Of String Local $Port = 51773; Port Number ;Local $Server = @IPAddress1; Server IpAddress Local $Server = "0.0.0.0"; Server IpAddress _DebugSetup() MsgBox(0, "Version", @AutoItVersion) ;MsgBox($MB_OK, "Title", $Server, 10) OnAutoItExitRegister("OnAutoItExit") TCPStartup() $MainSocket = TCPListen($Server, $Port, $MaxConnection) If $MainSocket = -1 or $MainSocket = 0 Then Exit MsgBox(16, "Error", "Unable to intialize socket.") While 1 If $ConnectedSocket = -1 Then $ConnectedSocket = TCPAccept($MainSocket) _DebugOut("TCPAccept return: " & $ConnectedSocket ) If $ConnectedSocket <> -1 Then ; Someone Connected _DebugOut("Someone Connected") TCPSend($ConnectedSocket, "Connected!") EndIf EndIf If $ConnectedSocket <> -1 Then ;Sleep(500) $Data = TCPRecv($ConnectedSocket, $MaxLength) $iError = @error If $iError = -1 Then $Data = "" TCPCloseSocket($ConnectedSocket) $ConnectedSocket = -1 Else If StringLen($Data) > 0 Then MsgBox(0, "Test", $Data, 10) EndIf EndIf EndIf _DebugOut("Connected Socket: " & $ConnectedSocket) WEnd Func OnAutoItExit() If $ConnectedSocket <> - 1 Then TCPSend($ConnectedSocket, "~bye") TCPCloseSocket($ConnectedSocket) EndIf If $MainSocket <> -1 Then TCPCloseSocket($MainSocket) TCPShutdown() EndFunc Edited November 7 by AutoDavid Share this post Link to post Share on other sites
Nine 301 Posted November 7 idk, I get either an @error if there is an interrupted connection, and @extended = 1 if the socket gets closed without sending data... Hide Nine's signature Hide all signatures No signature so far... Share this post Link to post Share on other sites
AutoDavid 0 Posted November 7 6 minutes ago, Nine said: idk, I get either an @error if there is an interrupted connection, and @extended = 1 if the socket gets closed without sending data... Mhm. This might be a solution. Will try later. Share this post Link to post Share on other sites
AutoDavid 0 Posted Friday at 10:50 PM (edited) On 11/7/2019 at 7:44 PM, Nine said: idk, I get either an @error if there is an interrupted connection, and @extended = 1 if the socket gets closed without sending data... Extended is a bit slow, but it works @error does nothing still. Thanks. Edited Friday at 10:51 PM by AutoDavid Share this post Link to post Share on other sites
Nine 301 Posted Friday at 10:54 PM Glad it worked ! Hide Nine's signature Hide all signatures No signature so far... Share this post Link to post Share on other sites
