Phpping port-PHP source code

Phpping Port jumps

Error_reporting (0); header ("content-Type: text/html; charset = utf-8"); set_time_limit (120 ); $ host = isset ($ _ POST ['URL'])? Chop (str_replace ('http: // ', '', $ _ POST ['URL']): 'www .baidu.com '; $ port = isset ($ _ POST ['duankou'])? Chop ($ _ POST ['duankou']): '80'; $ num = 10; function microtime_float () {list ($ usec, $ sec) = explode ("", microtime (); return (float) $ usec + (float) $ sec);} function getsoft ($ host, $ port) {$ fp = @ fsockopen ($ host, $ port, & $ errno, & $ errstr, 3); if (! $ Fp) return 'unknown '; $ get = "GET/HTTP/1.1 \ r \ nHost :". $ host. "\ r \ nConnection: Close \ r \ n"; @ fputs ($ fp, $ get); $ data = ''; while ($ fp &&! Feof ($ fp) $ data. = fread ($ fp, 1024); @ fclose ($ fp); $ array = explode ("\ n", $ data); $ k = 2; for ($ I = 0; $ I <20; $ I ++) {if (stristr ($ array [$ I], 'server ')) {$ k = $ I; break;} if (! Stristr ($ array [$ k], 'server') return 'unknown '; else return str_replace ('server', 'server soft ', $ array [$ k]);} function ping ($ host, $ port) {$ time_start = microtime_float (); $ ip = gethostbyname ($ host ); $ fp = @ fsockopen ($ host, $ port, & $ errno, & $ errstr, 1); if (! $ Fp) return 'request timed out. '. "\ r \ n"; $ get = "GET/HTTP/1.1 \ r \ nHost :". $ host. "\ r \ nConnection: Close \ r \ n"; @ fputs ($ fp, $ get); @ fclose ($ fp ); $ time_end = microtime_float (); $ time = $ time_end-$ time_start; $ time = ceil ($ time * 1000); return 'reply from '. $ ip. ': time = '. $ time. 'Ms';} if (isset ($ _ POST ['URL']) & isset ($ _ POST ['duankou']) {echo ''. getsoft ($ host, $ port ). ''; echo 'pinging '. $ host.' ['. Gethostbyname ($ host ). '] with Port :'. $ port. 'Of data :'. "\ r \ n"; ob_flush (); flush (); for ($ I = 0; $ I <$ num; $ I ++) {echo ping ($ host, $ port); ob_flush (); flush (); sleep (1) ;}}?> Domain name/IP: Port: