一个用于网络的工具函数库

时间:2010-01-16 10:37:50   来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:_query="", $a_port=43) { $sock = fsockopen($a_server, $a_port, &$errno, &$errstr, 10); if (!$sock) { echo "$errstr ($errno)n"; } else { fputs($sock, "$a_queryrn"); while(!feof($sock)) { $buf = fgets($sock,128); if (ereg( "Whois Server:", $buf)) { $a_server = str_replace( "Whois Server: ", "", $buf); $a_server = trim...
  正文:

<?PHP /* PHP Net Toolpack v0.1 08.05.2000, by waddler(@netlife.fi) phpnettoolpack.sourceforge.net To be distributed under GNU GPL */ // whois(hostname [,username, [port]]) Function whois ($a_server, $a_query="", $a_port=43) { $sock = fsockopen($a_server, $a_port, &$errno, &$errstr, 10); if (!$sock) { echo "$errstr ($errno)
n"; } else { fputs($sock, "$a_queryrn"); while(!feof($sock)) { $buf = fgets($sock,128); if (ereg( "Whois Server:", $buf)) { $a_server = str_replace( "Whois Server: ", "", $buf); $a_server = trim($a_server); } } fclose($sock); if ($a_server) { print "$a_query is registered at $a_server:
"; $sock = fsockopen($a_server, 43, &$errno, &$errstr, 10); if(!$sock) { echo "Could not open connection to $a_server on port $a_port.n"; echo "$errstr ($errno)
n"; } else { fputs($sock, "$a_queryrn"); while(!feof($sock)) { echo fgets($sock,128); } fclose($sock); } } else { echo "$a_query was not found.
"; } } } // finger(hostname [,username, [port]]) Function finger ($a_server, $a_query="", $a_port=79) { $sock=fsockopen($a_server,$a_port, &$errno, &$errstr, 10); if (!$sock) { $ret_str = "$errstr ($errno)
n"; } else { fputs($sock,"$a_queryn"); while (!feof($sock)) { $ret_str .= fgets($sock,128); } fclose($sock); } echo $ret_str; return $ret_str; } // traceroute(hostname) Function traceroute ($a_query) { exec("traceroute $a_query",$ret_strs); $str_count = count($ret_strs); for ($count=0; $count < $str_count; $count++) print "$count/$str_count".$ret_strs[$count]."n"; } // ----------------------------------------------------------- $app_name = "PHP Net Toolpack"; $app_version = "0.1"; $TOOLS = array( "finger" => "Finger", "traceroute" => "Traceroute", "whois" => "Whois?" ); // when included inside
Query :
<?PHP } break; case "traceroute": if ($query) { print "

n"; 
  traceroute($query); 
  print "
"; } else { ?>
Query :
<?PHP } break; case "whois": if ($query) { print "
n"; 
  whois($server,$query); 
  print "
"; } else { ?>

随机文章

    SQL Error: select * from ***_ecms_article where classid='86' and checked=1 order by rand() limit 10

顶出来的热门

    SQL Error: select * from ***_ecms_article where classid='86' and checked=1 order by diggtop desc,id desc limit 10
站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td