|
czf4bfu.prosek.czf |
Subversion Repositories: |
Compare with Previous - Blame - Download
<?php// Nastavime, aby se nam zbytecne nelogovaly chybyini_set('log_errors',FALSE);if ($dir = @opendir(".")) {echo("<!--CZF4BFU ");while (($file = readdir($dir)) !== false)if (preg_match('/^(global|local)-.*.txt/',$file))echo $file." ";echo("-->");closedir($dir);}?><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html><head><!--###################################################### # ## This script built Unreal][ # http://www.jklir.net ## # ####################################################### ## Licence: GNU/GPL ## Some Icons was downloaded from the internet and ## have copyrights. Please use it with GNU/GPL ## licence and in non-comercial projects. ## ####################################################### ## v 1.3 (c) Jirka Klír 2008 for CZFree.net ;-) ## ######################################################--><title>CZF4BFU</title><meta http-equiv="Content-Type" content="text/html; charset=windows-1250" /><meta http-equiv="Content-language" content="cz" /><meta name="author" content="Unreal][, http://www.jklir.net"><link href="styl.css" rel="stylesheet" type="text/css"></head><body style="background: #D4D0C8"><H1>Rozcestník CZFree.Net</H1><?php$group = @$_GET["group"];if($group!=2) {if(@$_GET["oblast"]!="") { $aname = "#".$_GET["oblast"]; } else { $aname = ""; }$group = !$group;$text = ($group) ? "seskupit" : "neseskupovat";echo "<a class=\"group\" href=\"?group=".$group."&id=".@$_GET["id"]."&oblast=".@$_GET["oblast"].$aname."\">$text podle typu služeb</a>";} else {echo "<a class=\"group\" href=\"#\"> </a>";}?><div class="tree"><a class="nomargin title" href="?oblast="><strong>CZFree.net</strong><br>celá síť</a><div class="smallicon"><a title="seznam služeb" href="?oblast="><img width="10" border="0" src="img/point.png"></a> <a title="seznam služeb" href="?oblast=">seznam služeb</a></div><div class="smallicon"><a title="seznam cloudů" href="?group=2"><img width="10" border="0" src="img/point.png"></a> <a title="seznam cloudů" href="?group=2">seznam cloudů</a></div><?php$jmena_cloudu = array("10.1.0.0/16" => "Connection.cz / AS Centrum network","10.2.0.0/16" => "Praha - Connection.cz","10.10.0.0/16" => "reserved","10.11.0.0/16" => "Praha - Střeovice, Břevnov, Hradčany, Strahov","10.12.0.0/16" => "Praha - Nusle, Michle, Ruská ul.","10.13.0.0/16" => "Praha - Stodůlky, Nové Butovice, Luka, Luiny, Řeporyje","10.15.0.0/16" => "Praha - Malvazinky, Koíře, Motol","10.16.0.0/16" => "Praha - Barrandov","10.17.0.0/16" => "Praha - Záběhlice, Zahradní město","10.18.0.0/16" => "Praha - Dejvice, Podbaba","10.19.0.0/16" => "Praha - Suchdol, Lysolaje, Hanspaulka, Horoměřice","10.20.0.0/16" => "Praha - P6 - Dědina, Liboc, Ruzyně","10.21.0.0/16" => "Praha - Řepy, Zličín","10.22.0.0/16" => "Praha - Holeovice","10.23.0.0/16" => "Praha - Vinohrady, Vrovice, ikov","10.24.0.0/16" => "Praha - Jarov, Stranice, Maleice, Skalka","10.25.0.0/16" => "Praha - Hlubočepy, Podolí, Braník","10.26.0.0/16" => "Praha - Lipence, Zbraslav, Radotín","10.27.0.0/16" => "Praha - Modřany, Velká Chuchle, Hodkovičky","10.28.0.0/16" => "Praha - VYPAL (VYsočany, PAlmovka, Libeň)","10.30.0.0/16" => "Praha - Hostivař, Horní Měcholupy, Dolní Měcholupy, Běchovice","10.31.0.0/16" => "Praha - Bohnice, Čimice","10.32.0.0/16" => "Praha - Dolní Chabry, Ďáblice, Kobylisy, Vychovatelna","10.33.0.0/16" => "Praha - Prosek, Letňany, Čakovice","10.34.0.0/16" => "Praha - Letná, trossmajerák","10.37.0.0/16" => "Praha - Radotín","10.38.0.0/16" => "Praha - Chodov, Opatov, Háje, Kateřinky","10.39.0.0/16" => "Praha - ibřina, Újezd nad Lesy, Koloděje, Květnice","10.40.0.0/16" => "Praha - Krč, sidl.Novodvorská, Kačerov, Spořilov, Roztyly","10.41.0.0/16" => "HMNet - Horní Měcholupy","10.43.0.0/16" => "Řepná pole, Vinoř","10.44.0.0/16" => "Praha - Podolí","10.48.0.0/16" => "Praha 2, 4, 10","10.49.0.0/16" => "Praha 1, 3","10.50.0.0/16" => "Praha - Centrum Prahy","10.51.0.0/16" => "Praha - Petřiny","10.52.0.0/16" => "Praha - Vrovice","10.55.0.0/16" => "Connection.cz","10.63.0.0/17" => "Rakovník a okolí","10.66.0.0/16" => "Hostivice, Chýně, Ptice, Červený Újezd, Sobín","10.67.0.0/16" => "Rudná u Prahy, Ptice, Úhonice, Drahelčice","10.69.0.0/17" => "Mělník a okolí","10.69.128.0/17" => "Neratovice a okolí","10.70.0.0/16" => "Beroun a okolí","10.76.0.0/16" => "Plzeň - PilsFree 1","10.78.0.0/16" => "Plzeň - PilsFree 2","10.88.0.0/16" => "Říčany a okolí","10.89.0.0/16" => "Mnichovice","10.91.0.0/19" => "Velké Přílepy","10.92.0.0/19" => "Libčice nad Vltavou","10.93.0.0/16" => "Čelákovice","10.94.0.0/17" => "Mladá Boleslav a okolí","10.95.0.0/17" => "Řevnice, Dobřichovice","10.96.0.0/16" => "Venory, Karlík, Dobřichovice, Lety, Řevnice, Třebáň","10.98.0.0/16" => "Unho, Chýně, Červený Újezd, Ptice, Nouzov, Kysice, Brakov, Horní Bezděkov a dalí","10.99.0.0/18" => "Třebestovice","10.100.0.0/16" => "Říčany","10.101.0.0/16" => "Liberec","10.102.0.0/16" => "Kladno, Unho a okolí","10.103.0.0/16" => "Karlovy Vary","10.104.0.0/17" => "Jablonec","10.105.0.0/17" => "Kolín","10.106.0.0/16" => "Kutná Hora - okres","10.107.0.0/16" => "Hradec Králové","10.108.0.0/16" => "České Budějovice","10.109.0.0/16" => "Plzeň","10.110.0.0/17" => "Chrudim","10.111.0.0/16" => "Plzeň - sever","10.112.0.0/16" => "Lysá nad Labem","10.113.0.0/16" => "Louny, atec, Pobořany","10.114.0.0/16" => "Příbram","10.117.0.0/16" => "Turnov a okolí","10.120.0.0/18" => "MH2Net - Mnichovo Hraditě směr Turnov","10.128.0.0/15" => "Brno - město","10.128.0.0/16" => "Brno - město","10.129.0.0/16" => "okolí Brna","10.129.24.0/21" => "Tinov","10.130.0.0/16" => "Severní Morava","10.131.0.0/16" => "Uherské Hraditě","10.132.0.0/16" => "Střední Morava - Olomouc","10.133.0.0/16" => "Prostějov","10.134.0.0/16" => "Přerovsko","10.135.0.0/16" => "rezerva pro Moravu","10.136.0.0/16" => "testovací sítě pro Moravu","10.144.0.0/16" => "Zlín, Vsetín, Valaské Meziříčí - okresy","10.145.0.0/16" => "Nový Jičín, Kopřivnice, Frýdek Místek - okresy","10.152.0.0/16" => "Ostrava - okres","10.153.0.0/16" => "Ostrava - okres","10.154.0.0/16" => "Ostrava - okres","10.155.0.0/16" => "Ostrava - okres","10.161.0.0/16" => "Evkanet - Ostrava","10.253.0.0/16" => "NCX - Zápy","10.254.0.0/16" => "NCX Labyrint");// prasarna, ale dokaze to radit cesky retezce :-)$trans_cz = array("Á" => "azzz", "É" => "ezzz", "Ě" => "ezzzz", "Í" => "izzz", "Ó" => "ozzz", "Ú" => "uzzz", "Ý" => "yzzz", "Ž" => "zzzz", "Š" => "szzz", "Č" => "czzz", "Ř" => "rzzz", "Ď" => "dzzz", "Ť" => "tzzz", "Ň" => "nzzz");function arfsort( $a, $y ){$GLOBALS['__ARFSORT_YES__'] = $y;usort( $a, 'arfsort_func' );return $a;}function arfsort_func( $a, $b ){global $trans_cz;$order[0][0] = "TYP";$order[1][0] = "NAZEV";foreach($order as $f) {if($GLOBALS['__ARFSORT_YES__']=="1") {$a[$f[0]]=strtr($a[$f[0]], $trans_cz);$b[$f[0]]=strtr($b[$f[0]], $trans_cz);}$strc = strcmp( strtolower($a[$f[0]]), strtolower($b[$f[0]]) );if ( $strc != 0 ) {return $strc;}}return 0;}function show_small($test) {foreach ($test as $key=>$row) {if($row['OBLAST']=="") { $row['OBLAST']="10.0.0.0/8"; }$ikonka = $row['TYP'];if(!file_exists("ikony/".$ikonka.".png")) { $ikonka = "none"; }echo "<div class=\"smallicon\"><a title=\"".$row['NAZEV']."\" href=\"?id=".$row['ID']."&oblast=".$row['OBLAST']."#".$row['OBLAST']."\"><img width=\"16\" title=\"".$row['NAZEV']."\" border=\"0\" src=\"ikony/$ikonka.png\"></a> <a title=\"".$row['NAZEV']."\" href=\"?id=".$row['ID']."&oblast=".$row['OBLAST']."#".$row['OBLAST']."\">".$row['NAZEV']."</a></div>\n";}}function show_big($test) {foreach ($test as $key=>$row) {if(@$row['OBLAST']=="") { $row['OBLAST']="10.0.0.0/8"; }$ikonka = $row['TYP'];if(!file_exists("ikony/".$ikonka.".png")) { $ikonka = "none"; }echo "<div class=\"icon\"><a title=\"".@$row['POPIS']."\" href=\"?id=".$row['ID']."&oblast=".$row['OBLAST']."#".$row['OBLAST']."\"><img title=\"".@$row['POPIS']."\" border=\"0\" width=\"32\" src=\"ikony/$ikonka.png\"><br>".$row['NAZEV']."</a></div>\n";}}function show_groups($test) {$pamatuj = "";foreach ($test as $key=>$row) {if ($row['TYP']==@$pamatuj) {if($row['OBLAST']=="") { $row['OBLAST']="10.0.0.0/8"; }$ikonka = $row['TYP'];if(!file_exists("ikony/".$ikonka.".png")) { $ikonka = "none"; }echo "<div class=\"icon\"><a title=\"".$row['POPIS']."\" href=\"?id=".$row['ID']."&oblast=".$row['OBLAST']."#".$row['OBLAST']."\"><img title=\"".$row['POPIS']."\" border=\"0\" width=\"32\" src=\"ikony/$ikonka.png\"><br>".$row['NAZEV']."</a></div>\n";} else {echo "<div class=\"sizer\"></div><a name=\"".$row['TYP']."\" href=\"#".$row['TYP']."\" class=\"title\">".$row['TYP']."</a>\n";if($row['OBLAST']=="") { $row['OBLAST']="10.0.0.0/8"; }$ikonka = $row['TYP'];if(!file_exists("ikony/".$ikonka.".png")) { $ikonka = "none"; }echo "<div class=\"icon\"><a title=\"".$row['POPIS']."\" href=\"?id=".$row['ID']."&oblast=".$row['OBLAST']."#".$row['OBLAST']."\"><img title=\"".$row['POPIS']."\" border=\"0\" width=\"32\" src=\"ikony/$ikonka.png\"><br>".$row['NAZEV']."</a></div>\n";}$pamatuj = $row['TYP'];}}function show_clouds($test) {global $jmena_cloudu;foreach ($test as $key=>$row) {if($row!="") {$cl_popis = $jmena_cloudu[$row];$cl_naz = $row;$cl_nazev = $row."<br>".$cl_popis;echo "<div class=\"icon2\"><a title=\"".$cl_popis."\" href=\"?oblast=".$cl_naz."#".$cl_naz."\"><img title=\"".$cl_popis."\" border=\"0\" width=\"50\" src=\"img/cloud.png\"><br>".$cl_nazev."</a></div>\n";}}}function show_details($test) {$ikonka_det = $test['TYP'];if(!file_exists("ikony/".$ikonka_det.".png")) { $ikonka_det = "none"; }echo "<div class=\"det\">";echo "<div class=\"icon_det\"><img alt=\"$ikonka_det\" src=\"ikony/$ikonka_det.png\"></div>";echo "<div class=\"info_det\">";foreach ($test as $key=>$row) {if($key!="HESLOEDIT") {echo "<strong>".$key."</strong>: ".$test[$key]."<br>";}}echo "</div><div class=\"info_cut\"></div></div>";}$i=0;if ($dir = @opendir(".")) {while (($file = readdir($dir)) !== false)if (preg_match('/^(global|local)-.*.txt/',$file)) {$seznam[$i] = $file;$i++;}$pocet_globalu = $i;$polozka=-1;for ($g=0; $g<$pocet_globalu; $g++) {$file = "./".$seznam[$g]; // $g$fp = Fopen($file, "r");$dat = Fread($fp, filesize($file));// $dat = file_get_contents($file);$data = explode("\n", $dat);$soucet = count($data);for ($j=0; $j<=$soucet; $j++) {if (((@$data[$j]!="") and (@$data[$j]!=" ")) and (@$data[$j][0]!=(chr(13)))) {if (strtoupper(substr("$data[$j]", 0, 4))=="TYP:") { $polozka++; }$item[$polozka]=@$item[$polozka].@$data[$j]."<br>";}$trans = array(" \\\\<br>" => "", " <br>" => "<br>", (chr(13)) => "", ": " => ":", "OBLAST:<br>" => "OBLAST:10.0.0.0/8<br>", (chr(9)) => "");$item[$polozka]=strtr($item[$polozka], $trans);$trans_code = array("á" => "á", "é" => "é", "ě" => "ě", "í" => "í", "ó" => "ó", "ú" => "ú", "ů" => "ů", "ý" => "ý", "" => "ž", "" => "š", "č" => "č", "ř" => "ř", "ď" => "ď", "" => "ť", "ň" => "ň", "Á" => "Á", "É" => "É", "Ě" => "Ě", "Í" => "Í", "Ó" => "Ó", "Ú" => "Ú", "Ů" => "Ů", "Ý" => "Ý", "" => "Ž", "" => "Š", "Č" => "Č", "Ř" => "Ř", "Ď" => "Ď", "" => "Ť", "Ň" => "Ň", "ž" => "ž", "š" => "š");$item[$polozka]=strtr($item[$polozka], $trans_code);}}// ------- naladujem data do 3-rozmernyho pole -------for ($k=0; $k<=$polozka; $k++) {$ic = explode("<br>", $item[$k]);$cnt_ic = (count($ic));for ($b=0; $b<=$cnt_ic; $b++) {if($b==$cnt_ic) {$items[$k]['ID']=$k;} else {if(($ic[$b])!="") {$pole = strpos($ic[$b], ":");if((((substr($ic[$b], 0, $pole))=="URL") or ((substr($ic[$b], 0, $pole))=="URLIP")) or ((substr($ic[$b], 0, $pole))=="URLINET")) {$items[$k][(strtoupper(substr($ic[$b], 0, $pole)))]="<a href=\"".(substr($ic[$b], $pole+1))."\">".(substr($ic[$b], $pole+1))."</a>";} else {$items[$k][(strtoupper(substr($ic[$b], 0, $pole)))]=(substr($ic[$b], $pole+1));}}}}}// -- zjisteni a serazeni oblastifor ($k=0; $k<=$polozka; $k++) {if ((eregi("OBLAST:", $item[$k])) and (!eregi("OBLAST:<br>", $item[$k]))){$vyskyt = strpos($item[$k], "OBLAST:");$cloud = substr($item[$k], $vyskyt+7, 16);$cloud = substr($cloud, 0, strpos($cloud, "/")+3);if ($cloud[strlen($cloud)-1]=="<") {$cloud = substr($cloud, 0, strpos($cloud, "/")+2);}if (!eregi($cloud, @$cloudy)) {$cloudy=@$cloudy.$cloud.";";}}}$oblast = explode(";", $cloudy);$pocet_oblasti = count($oblast)-2;for ($l=0; $l<=$pocet_oblasti; $l++) {for ($m=0; $m<=$pocet_oblasti; $m++) {if ((intval(substr($oblast[$m], 3, 3)))<(intval(substr(@$oblast[$m-1], 3, 3)))) {$x=$oblast[$m];$oblast[$m]=$oblast[$m-1];$oblast[$m-1]=$x;}}}// ------- zapiseme hodnoty do cloudovskych poli -------for ($o=0; $o<=$pocet_oblasti; $o++) {foreach ($items as $key=>$row) {if(@$row['OBLAST']=="") { $row['OBLAST']="10.0.0.0/8"; }if($row['OBLAST']==$oblast[$o]) {$obl[$oblast[$o]][]=$row;}}}// ------- prekodujem nazvy cloudu, aby nam nedelaly bordel pri spatnym kodovani -------for ($o=0; $o<=$pocet_oblasti; $o++) {$trans_code = array("á" => "á", "é" => "é", "ě" => "ě", "í" => "í", "ó" => "ó", "ú" => "ú", "ů" => "ů", "ý" => "ý", "" => "ž", "" => "š", "č" => "č", "ř" => "ř", "ď" => "ď", "" => "ť", "ň" => "ň", "Á" => "Á", "É" => "É", "Ě" => "Ě", "Í" => "Í", "Ó" => "Ó", "Ú" => "Ú", "Ů" => "Ů", "Ý" => "Ý", "" => "Ž", "" => "Š", "Č" => "Č", "Ř" => "Ř", "Ď" => "Ď", "" => "Ť", "Ň" => "Ň");$jmena_cloudu["$oblast[$o]"]=strtr(@$jmena_cloudu["$oblast[$o]"], $trans_code);}// ------- vypis ve sloupecku vlevo -------for ($o=0; $o<=$pocet_oblasti; $o++) {echo "<a class=\"title\" name=\"".$oblast[$o]."\" href=\"?oblast=".$oblast[$o]."#".$oblast[$o]."\"><span class=\"cloudip\">".$oblast[$o]."</span>\n";if(strlen($jmena_cloudu[$oblast[$o]])>=1) {echo "<br>".$jmena_cloudu[$oblast[$o]]."</a>";} else {echo "</a>";}$sorted["$oblast[$o]"] = arfsort( $obl["$oblast[$o]"], 0);show_small($sorted["$oblast[$o]"]);}?></div><div class="items"><?php//############# PODMINKY ZOBRAZENI ###############//if((@$_GET["group"]!="1") and (@$_GET["group"]!="2")) { $_GET["group"] = ""; }// ------- pokud neni uvedena oblast ani id ani groupa -------if (((@$_GET["oblast"]=="") and (@$_GET["id"]=="")) and (@$_GET["group"]=="")) {$sorted0 = arfsort( $items, 1);show_big($sorted0);echo "<div class=\"sizer\"></div></div>";}// ------- pokud neni uvedena oblast ani id ale groupa ano -------if (((@$_GET["oblast"]=="") and (@$_GET["id"]=="")) and (@$_GET["group"]=="1")) {$sorted0 = arfsort( $items, 1);show_groups($sorted0);echo "<div class=\"sizer\"></div></div>";}// ------- pokud neni uvedena oblast ani id ale groupa je 2 -------if (((@$_GET["oblast"]=="") and (@$_GET["id"]=="")) and (@$_GET["group"]=="2")) {show_clouds($oblast);echo "<div class=\"sizer\"></div></div>";}// ------- pokud je uvedena oblast i id sluzby ale groupa ne -------if (((@$_GET["oblast"]!="") and (@$_GET["id"]!="")) and (@$_GET["group"]=="")) {show_big($sorted[$_GET["oblast"]]);echo "<div class=\"sizer\"></div></div>\n";echo "<div class=\"detail\"><div class=\"nomargin title\"><strong>Detaily:</strong></div>";echo "<div class=\"contents\">\n";if ($_GET["id"]<=$polozka) {show_details($items[$_GET["id"]]);} else {echo "<br>Položka neexistuje<br>";}echo "</div></div>\n";}// ------- pokud je uvedena oblast i id sluzby i groupa -------if (((@$_GET["oblast"]!="") and (@$_GET["id"]!="")) and (@$_GET["group"]=="1")) {show_groups($sorted[$_GET["oblast"]]);echo "<div class=\"sizer\"></div></div>\n";echo "<div class=\"detail\"><div class=\"nomargin title\"><strong>Detaily:</strong></div>";echo "<div class=\"contents\">\n";if ($_GET["id"]<=$polozka) {show_details($items[$_GET["id"]]);} else {echo "<br>Položka neexistuje<br>";}echo "</div></div>\n";}// ------- pokud neni uvedena oblast ale id a groupa ne -------if (((@$_GET["oblast"]=="") and (@$_GET["id"]!="")) and (@$_GET["group"]=="")) {if ($_GET["id"]<=$polozka) {if(($items[$_GET["id"]]["OBLAST"])=="") {$sorted4 = $sorted["10.0.0.0/8"];} else {$sorted4 = $sorted[$items[$_GET["id"]]['OBLAST']];}show_big($sorted4);} else {$sorted0 = arfsort( $items, 1);show_big($sorted0);}echo "<div class=\"sizer\"></div></div>\n";echo "<div class=\"detail\"><div class=\"nomargin title\"><strong>Detaily:</strong></div>";echo "<div class=\"contents\">\n";if ($_GET["id"]<=$polozka) {show_details($items[$_GET["id"]]);} else {echo "<br>Položka neexistuje<br>";}echo "</div></div>\n";}// ------- pokud neni uvedena oblast ale id a groupa ano -------if (((@$_GET["oblast"]=="") and (@$_GET["id"]!="")) and (@$_GET["group"]=="1")) {if ($_GET["id"]<=$polozka) {if(($items[$_GET["id"]]["OBLAST"])=="") {$sorted4 = $sorted["10.0.0.0/8"];} else {$sorted4 = $sorted[$items[$_GET["id"]]['OBLAST']];}show_groups($sorted4);} else {$sorted0 = arfsort( $items, 1);show_groups($sorted0);}echo "<div class=\"sizer\"></div></div>\n";echo "<div class=\"detail\"><div class=\"nomargin title\"><strong>Detaily:</strong></div>";echo "<div class=\"contents\">\n";if ($_GET["id"]<=$polozka) {show_details($items[$_GET["id"]]);} else {echo "<br>Položka neexistuje<br>";}echo "</div></div>\n";}// ------- pokud je uvedena oblast ale ne id ani groupa -------if (((@$_GET["oblast"]!="") and (@$_GET["id"]=="")) and (@$_GET["group"]=="")){show_big($sorted[$_GET["oblast"]]);echo "<div class=\"sizer\"></div></div>\n";}// ------- pokud je uvedena oblast a groupa ale ne id -------if (((@$_GET["oblast"]!="") and (@$_GET["id"]=="")) and (@$_GET["group"]=="1")){show_groups($sorted[$_GET["oblast"]]);echo "<div class=\"sizer\"></div></div>\n";}} // end?><div id="copy">czf4bfu v1.3 - made <a href="http://www.jklir.net">Unreal][</a> </div></body></html>