"1181525", //grzes $users[1] => "1163028", //artek $users[2] => "1467110", //mnisia $users[3] => "1174640", //hal $users[4] => "1438139", //cobra $users[5] => "2045696", //michal $users[6] => "", //tomek $users[7] => "1243552" //pawel ); // identyfikatory Tlen'u $users_tlen=array( $users[0] => "sp9wun", //grzes $users[1] => "artek1986", //artek $users[2] => "kiciek600", //mnisia $users[3] => "pankot", //hal $users[4] => "cobra99", //cobra $users[5] => "thymalius", //michal $users[6] => "kr12519", //tomek $users[7] => "kaczor1985" //pawel ); // koniec zmiennych edytowanych $shaper_filename='/var/shaper/bitrate_user_sh.old'; if (! $alttlen) $tlen="Tlen"; //Inicjalizacja generatora liczb losowych srand((double)microtime()*1000000); $rand_id=rand(0,10000); Function GaduGadu ($name,$users_gg) { global $gg, $altgg; while (list($id,$val) = each($users_gg)) { if ($name==$id) { if ($val=="") return(""); else { if ($altgg) { $ipt = gethostbyname($name); for($n=0;$n "); return("GG: $val "); } else return("GG: $val "); } } } } Function Tlen ($name,$users_tlen) { global $tlen, $alttlen; while (list($id,$val) = each($users_tlen)) { if ($name==$id) { if ($val=="") return(""); else { if ($alttlen) { $ipt = gethostbyname($name); for($n=0;$n"; if ($tlen[$n] == $ipt) return("Tlen: $val "); } return("Tlen: $val "); } else return("Tlen: $val "); } } } } header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past header("Last-Modified: " . gmdate("D, d M Y H:i:s") . "GMT"); // always modified header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1 header("Pragma: no-cache"); // HTTP/1.0 for ($i=0; $i /tmp/ping.$rand_id.$users[$i] &"); } system("sleep $delay"); print "\n"; print "\n"; print "\n"; print "\n"; print "Kto jest aktywny w sieci ASK HeroNet\n"; print "\n"; print "\n"; print "
\n"; print "Komputery aktywne w sieci:\n"; print "


\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print " \n"; print " \n"; print " \n"; print "\n"; $filesize=filesize($shaper_filename); $fp=fopen($shaper_filename,'r'); $raw=fread($fp,$filesize); fclose($fp); $lines = explode("\n", $raw); // kontrola wintalka if (file_exists("/tmp/wintalk.txt")) { $filesizetmp=filesize("/tmp/wintalk.txt"); $fp=fopen("/tmp/wintalk.txt",'r'); $raw=fread($fp,$filesizetmp); fclose($fp); $linestmp = explode("\n", $raw); } $ilk=1; for ($i=0; $i10) { if ($only_ip) $ip = $users[$i]; else $ip = gethostbyname($users[$i]); $rate="0.00"; for ($n=0; $n\n"; print " "; print "\n"; print " ",$rate); print "\n"; print " "; print "\n"; $ilk++; } } print "
\n"; print "\n"; print "Mail\n"; print "\n"; print "\n"; print "\n"; print "Host\n"; print "\n"; print "\n"; print "\n"; print "QoS Bandwidth [kB/s]\n"; print "\n"; print "\n"; print "\n"; print "Komunikator\n"; print "\n"; print "
".$serwer_name."
"; print ""; $fp=popen("finger $users[$i] 2> /dev/null | grep 'New mail'","r"); $ckmail=fgets($fp,4); pclose($fp); if ($ckmail=='New') { print ""; } print ""; print ""; print "$users[$i]"; printf("%.1f"; print ""; print GaduGadu($users[$i],$users_gg); print Tlen($users[$i],$users_tlen); if ($wintalk) print "Talk: \"WinTalk\""; print "
\n"; print "
"; print "Ilosc komputerow: $ilk
\n"; print ""; print "Ostatnia aktualizacja: "; print date("H:i:s"); print "

\n"; print "(C) 2002 Grzegorz Fitrzyk
\n"; print "
"; print "This script is a part of the shaper_cbq LAN traffic manager.
\n"; print "

\n"; system("rm -f /tmp/ping.$rand_id.* >/dev/null"); if ($phpn) { CloseTable(); include ('footer.php'); } } switch($op) { default: Pokaz(); break; } ?>