questions about timing tcp scan

[faustf]

hi guy

how  is  possible reduce  a  timing  of  scanning  ip ??

example  i have  a lan, i want  scan  for  find  open port 3356 , start 192.168.1.1 to 192.168.1.255 , how is  possible reduce  a  probing time ?? of  TCPConnect ??

 

[Trong]

Opt('TCPTimeout', 100)

 

[faustf]

100 is  one second ???

 

[InunoTaishou]

100 is 100 milliseconds, or 1/10th of a second.

1000 is one second.

[Trong]

  On 4/28/2016 at 7:24 PM, faustf said:

100 is  one second ???

 

Expand  

Opt("TCPTimeout", 100) ;100 milliseconds
; 1seconds=1000 milliseconds

 

Eg:

expandcollapse popup

Opt('TCPTimeout', 50)

Global $hGUI = GUICreate("Autoit Port Scanner", 300, 175)
GUICtrlCreateGroup("Port Scan", 5, 5, 275, 160)
GUICtrlCreateLabel("IP", 20, 17)
Global $hcIPAddress = GUICtrlCreateInput(@IPAddress1, 20, 33, 125)
GUICtrlCreateLabel("Start on Port", 20, 55)
Global $hcPortStart = GUICtrlCreateInput("1", 20, 68, 125)
GUICtrlCreateLabel("End on Port", 20, 91)
Global $hcPortEnd = GUICtrlCreateInput("65353", 20, 108, 125)
Global $hcStartScan = GUICtrlCreateButton("Start", 20, 135, 125)
GUICtrlSetFont($hcStartScan, 12)
Global $hcOnPort = GUICtrlCreateLabel("Scanning Port: None", 150, 142)
GUICtrlCreateGroup("Open Ports", 160, 17, 105, 125)
Global $hcOpenPortList = GUICtrlCreateList("", 168, 30, 90, 109)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case -3
            ExitLoop
        Case $hcStartScan
            _StartScan(GUICtrlRead($hcIPAddress), GUICtrlRead($hcPortStart), GUICtrlRead($hcPortEnd))
    EndSwitch
WEnd

Func _StartScan($sIPScan = "127.0.0.1", $sPortStart = 1, $sPortEnd = 65353)
    TCPStartup()
    Local $sSoketID
    Local $sTimeStart = TimerInit()
    For $LetsGo = $sPortStart To $sPortEnd
        GUICtrlSetData($hcOnPort, "Scanning Port: " & $sPortStart)
        $sSoketID = TCPConnect($sIPScan, $sPortStart)
        If $sSoketID > 0 Then GUICtrlSetData($hcOpenPortList, $sPortStart)
        $sPortStart = $sPortStart + 1
    Next
    TCPShutdown()
    Local $sTimeEnd = TimerDiff($sTimeStart)
    TrayTip("Port Scanner", "Done Process took " & Round($sTimeEnd, -1) / 1000 & " seconds", 7, 1)
EndFunc   ;==>_StartScan

 

Edited April 28, 2016 by VIP
Eg

[faustf]

thankz
 

 

[faustf]

i try to use  and  also  test  your script  , change  the  number  50  to  1000   but  not  see  differnce

[Trong]

  On 4/28/2016 at 10:36 PM, faustf said:

i try to use  and  also  test  your script  , change  the  number  50  to  1000   but  not  see  differnce

Expand  

if your server is turned on, it works too slowly, try increasing the delay time in opt!
For example, that you open an FTP server on port 21 and WebServer at port 80
You set the starting port is 1, and the end port is 100.
After the scan will show: 21 and 80 in the list of ports!

[faustf]

thankz  for  suggest , but  in my case  i have  this scenario:

i  want check only  port 3356 , the  server  stay on in many  pc  of my  lan, i want  discover with scan how  many  pc  of my lan  are open, therfore  the tcpconnet , probe one  time , and    go out ,(like  a  ping , i hope  explain  a sense) , because  when is open  the  answer  at  host  is  immidiatly i mesure  with timediff, and  is :

1.53287638512716 ,  but  when host is  closed the  time  is 21001.9468954853, i  want  if  possible, reduce   this timing after  2. or 3. must  answer me  with host down  and  start next ip

thankz at all for  support

 

[faustf]

i  find  other  discussion   about  this  problem here 

https://www.autoitscript.com/forum/topic/127415-tcpconnect-sipaddr-iport-itimeout/

i  understund  , tcpconnect  not  have  timing setable , but  exist  some  solution

 

[funkey]

I solved this using my socket_UDF.

 

https://www.autoitscript.com/forum/topic/151933-another-tcp-server-written-with-my-socket_udf/

[faustf]

thank is  very  good  work i try to understund  

thankz  so much

 

[faustf]

i fund a  bug

when i  run  a  TCP Example server for socket_UDF.au3  and run  client 

i  connect  send  somthing  , and  go ok

but if  i push disconnect , start  to write  in  console Data received:

in loop  and  if i try to reconnect not  work, i must  stop