Jump to content

Multi-process DNS resolving


Recommended Posts

Hi community

I intend to do mass DNS resolving. It has to be very fast because of its quantity (about 2000)
Currently I am openning parallelized "ping" and listen to them. Got a result of 1700 answers for 40 seconds
Above 50 ping processes performances started to decrease

I was minding using TCPNameToIP function wit forcing it to output result in STDOUT

Slave process

#AutoIt3Wrapper_Change2CUI=y
#include <Array.au3>

While 1
    TCPStartup ( )
    Local $sRes = TCPNameToIP ( $CmdLine [1] )
    If Not @error Then
        ConsoleWrite ( $sRes & @CRLF )
    Else
        ConsoleWrite ( "-1" & @CRLF )
    EndIf
    TCPShutdown ( )
WEnd

Main

Local $sHost_To_Check = "www.google.com"
While 1
    Local $tPing = Run ( @ScriptDir & "\TCPNameToIP.exe " & $sHost_To_Check, @SystemDir, @SW_HIDE, $STDERR_MERGED )
    $sStdout = StdoutRead ( $tPing )
    ConsoleWrite ( $sStdout & @CRLF )
WEnd

It looks to be hard to listen to result as process close immediately after sending result

Would you please help me with this purpose ?
May be telling me what is the best way to achieve my goal

Regards

Edited by Ebola57
Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...