Network Query Tool

$msg"; flush(); } function lookup($target){ global $ntarget; echo $target."

"; $msg = "$target resolved to "; if( eregi("[a-zA-Z]", $target) ) $ntarget = gethostbyname($target); else $ntarget = gethostbyaddr($target); $msg .= $ntarget; message($msg); } function dig($target){ global $ntarget; message("

DNS Query Results:

"); #$target = gethostbyaddr($target); #if (! eregi("[a-zA-Z]", ($target = gethostbyaddr($target))) ) if( (!eregi("[a-zA-Z]", $target) && (!eregi("[a-zA-Z]", $ntarget)))) $msg .= "Can't do a DNS query without a hostname."; else{ if(!eregi("[a-zA-Z]", $target)) $target = $ntarget; if (! $msg .= trim(nl2br(`dig any '$target'`))) #bugfix $msg .= "The dig command is not working on your system."; } #TODO: Clean up output, remove ;;'s and DiG headers $msg .= "

"; message($msg); } function wwwhois($target){ global $ntarget; $server = "whois.crsnic.net"; message("

WWWhois Results:

"); #$target = gethostbyaddr($target); if((!eregi("[a-zA-Z]", $target)) && (!eregi("[a-zA-Z]", $ntarget))){ $msg .= "Can't WWWhois without a domain name."; return; } if (!eregi("\.com|\.net|\.org|\.edu", $target)) if (!eregi("\.com|\.net|\.org|\.edu", $ntarget)){ $msg .= "I currently only support .com, .net, .org, and .edu."; return; } else $target = $ntarget; message("Connecting to $server...

"); if (! $sock = fsockopen($server, 43, &$num, &$error, 10)){ unset($sock); $msg .= "Timed-out connecting to $server (port 43)"; } else{ fputs($sock, "$target\n"); while (!feof($sock)) $buffer .= fgets($sock, 10240); } fclose($sock); if(! eregi("Whois Server:", $buffer)){ if(eregi("no match", $buffer)) message("NOT FOUND: No match for $target
"); else message("Ambiguous query, multiple matches for $target:
"); } else{ $buffer = split("\n", $buffer); for ($i=0; $i
"); if(! $sock = fsockopen($nextServer, 43, &$num, &$error, 10)){ unset($sock); $msg .= "Timed-out connecting to $nextServer (port 43)"; } else{ fputs($sock, "$target\n"); while (!feof($sock)) $buffer .= fgets($sock, 10240); fclose($sock); } } $msg .= nl2br($buffer); $msg .= "

"; message($msg); } function arin($target){ $server = "whois.arin.net"; message("

IP Whois Results:

"); if (!$target = gethostbyname($target)) $msg .= "Can't IP Whois without an IP address."; else{ message("Connecting to $server...

"); if (! $sock = fsockopen($server, 43, &$num, &$error, 20)){ unset($sock); $msg .= "Timed-out connecting to $server (port 43)"; } else{ fputs($sock, "$target\n"); while (!feof($sock)) $buffer .= fgets($sock, 10240); fclose($sock); } if (eregi("RIPE.NET", $buffer)) $nextServer = "whois.ripe.net"; else if (eregi("whois.apnic.net", $buffer)) $nextServer = "whois.apnic.net"; else if (eregi("nic.ad.jp", $buffer)){ $nextServer = "whois.nic.ad.jp"; #/e suppresses Japanese character output from JPNIC $extra = "/e"; } else if (eregi("whois.registro.br", $buffer)) $nextServer = "whois.registro.br"; if($nextServer){ $buffer = ""; message("Deferred to specific whois server: $nextServer...

"); if(! $sock = fsockopen($nextServer, 43, &$num, &$error, 10)){ unset($sock); $msg .= "Timed-out connecting to $nextServer (port 43)"; } else{ fputs($sock, "$target$extra\n"); while (!feof($sock)) $buffer .= fgets($sock, 10240); fclose($sock); } } $buffer = str_replace(" ", " ", $buffer); $msg .= nl2br($buffer); } $msg .= "

"; message($msg); } function checkp($target,$portNum){ message("

Checking Port $portNum...

"); if (! $sock = fsockopen($target, $portNum, &$num, &$error, 5)) $msg .= "Port $portNum does not appear to be open."; else{ $msg .= "Port $portNum is open and accepting connections."; fclose($sock); } $msg .= "

"; message($msg); } function p($target){ message("

Ping Results:

"); if (! $msg .= trim(nl2br(`ping -c5 '$target'`))) #bugfix $msg .= "Ping failed. Host may not be active."; $msg .= "

"; message($msg); } function tr($target){ message("

Traceroute Results:

"); if (! $msg .= trim(nl2br(`/usr/sbin/traceroute '$target'`))) #bugfix $msg .= "Traceroute failed. Host may not be active."; $msg .= "

"; message($msg); } #If the form has been posted, process the query, otherwise there's #nothing to do yet foreach($_POST as $key=>$value) ${$key}=$value; if(!$queryType) exit; #Make sure the target appears valid if( (!$target) || (!preg_match("/^[\w\d\.\-]+\.[\w\d]{1,3}$/i",$target)) ){ #bugfix message("Error: You did not specify a valid target host or IP."); exit; } #Figure out which tasks to perform, and do them if( ($queryType=="all") || ($queryType=="lookup") ) lookup($target); if( ($queryType=="all") || ($queryType=="dig") ) dig($target); if( ($queryType=="all") || ($queryType=="wwwhois") ) wwwhois($target); if( ($queryType=="all") || ($queryType=="arin") ) arin($target); if( ($queryType=="all") || ($queryType=="checkp") ) checkp($target,$portNum); if( ($queryType=="all") || ($queryType=="p") ) p($target); if( ($queryType=="all") || ($queryType=="tr") ) tr($target); ?>

Host Information	Host Connectivity
Resolve/Reverse Lookup Get DNS Records Whois (Web) Whois (IP owner)	Check port: Ping host Traceroute to host Do it all