ACC SHELL
<?php
function zjisti_robota() {
$robot = 0;
global $HTTP_USER_AGENT;
$agent_test = " " . StrToLower ($HTTP_USER_AGENT);
If ((!StrPos ($agent_test, "mozilla")) && (!StrPos ($agent_test, "opera")) && (!StrPos ($agent_test, "elinks"))):
$robot = 1;
Else:
If (StrPos ($agent_test, "@")) $robot = 1;
If (StrPos ($agent_test, "search")) $robot = 1;
If (StrPos ($agent_test, "crawl")) $robot = 1;
If (StrPos ($agent_test, "bot")) $robot = 1;
EndIf;
return $robot;
}
//puvodne tato funkce vracela hodnotu od start do konce, je treba smazat end1
//a zaupominkovany casti - nevim proc presne - pro azbuku mozna nebude takto
// upravene fungovat? http://cz.php.net/substr
function utf8_substr($str,$start,$end1)
{
preg_match_all("/./su", $str, $ar);
/*if(func_num_args() >= 3) {
$end = func_get_arg(2);
return join("",array_slice($ar[0],$start,$end));
} else {*/
return join("",array_slice($ar[0],$start,$end1));
//}
}
//funkce na zmenu obrazku small velikost 140....x neco
function makeThumb( $scrFile, $dstFile, $dstW, $dstH=160, $switch=0 )
{
$im = ImageCreateFromJPEG( $scrFile );
$srcW = ImageSX( $im );
$srcH = ImageSY( $im );
if($switch==0){
$pomer = $srcH / $srcW;
$dstH = $dstW*$pomer;
settype($dstH, "integer");
}
$ni = ImageCreateTrueColor( $dstW, $dstH ); // pro GD2
//$ni = ImageCreate( $dstW, $dstH ); //pro strasi GD2
ImageCopyResampled( $ni, $im, 0, 0, 0, 0, $dstW, $dstH, $srcW, $srcH );
ImageJPEG( $ni, $dstFile );
}
//funkce pro orezani textu
//$text_uvod - retezec, $delka - počet slov co se mají zachránit
function cutString($text_uvod,$pocet)
{
$text_uvod=strip_tags($text_uvod);
$text= preg_split ("/\s+/", $text_uvod);
//$text=explode(" ",$text_uvod);
$new="";
$delka=count($text);
while($i<$delka)
{
if($pocet<strlen($new))
{
$new=$new."".$text[$i]."...";
break;
}
else
{
$new=$new."".$text[$i]." ";
}
$i++;
}
return $new;
}
function encodeHTML007($sHTML) {
// $sHTML=preg_replace("~<table~","<table class='tdtab'",$sHTML);
$sHTML=preg_replace("~<td~","<td class='tdtab'",$sHTML);
//$sHTML=preg_replace("~>~",">",$sHTML);
return $sHTML;
}
function replace_different($search,$replace,$string) {
$occs = substr_count($string,$search);
$last = 0;
$cur = 0;
$data = '';
for ($i=0;$i<$occs;$i++) {
$find = strpos($string,$search,$last);
$data .= substr($string,$last,$find-$last).$replace[$cur];
$last = $find+strlen($search);
if (++$cur == count($replace)) {
$cur = 0;
}
}
return $data.substr($string,$last);
}
// $str="<table width=\"500\"><tr><td> </td></tr><tr><td> </td></tr><tr><td> </td></tr><tr><td> </td></tr></table>";
// echo replace_different("<tr",array("<tr style=\"background-color: silver\"","<tr style=\"background-color: red\""),$str);
function strip_selected_tags($text, $tags = array())
{
$args = func_get_args();
$text = array_shift($args);
$tags = func_num_args() > 2 ? array_diff($args,array($text)) : (array)$tags;
foreach ($tags as $tag){
if(preg_match_all('/<'.$tag.'[^>]*>(.*)<\/'.$tag.'>/iU', $text, $found)){
$text = str_replace($found[0],$found[1],$text);
}
}
return $text;
}
//pro rozcestnik
function makeThumb1( $scrFile, $dstFile, $dstH=120, $switch=1 )
{
$im = ImageCreateFromJPEG( $scrFile );
$srcW = ImageSX( $im );
$srcH = ImageSY( $im );
if($switch==1){
$pomer = $srcW / $srcH;
$dstW = $dstH * $pomer;
settype($dstW, "integer");
}
$ni = ImageCreateTrueColor( $dstW, $dstH ); // pro GD2
//$ni = ImageCreate( $dstW, $dstH ); //pro strasi GD2
ImageCopyResampled( $ni, $im, 0, 0, 0, 0, $dstW, $dstH, $srcW, $srcH );
ImageJPEG( $ni, $dstFile );
}
function sitemap($id ,$indent ,$level,$maxlevel,$prihlasen)
{ global $NAZEV_PROJEKTU;
$indent .= " "; //odsazeni
$level++; // pocitani urovni
if($level > $maxlevel) return; //presahlo povolenou uroven - konec
$table = $NAZEV_PROJEKTU."menu".$_SESSION[$NAZEV_PROJEKTU."lang"];
$table1 = $NAZEV_PROJEKTU."clanky".$_SESSION[$NAZEV_PROJEKTU."lang"];
$res = mysql_query("SELECT * FROM ".$table." WHERE Nadmenu = '".$id."' AND Zobrazeni = 'Ano' ORDER BY Poradi");
while($obj = mysql_fetch_object($res))
{
$resu =mysql_num_rows( mysql_query("SELECT * FROM ".$table1." WHERE ID_menu = '".$obj->ID_menu."' "));
//echo $resu;
echo $indent.$level."(".$obj->ID_menu.")(".$obj->Poradi.") : ";
echo "<a class=\"sitemap".$level."\" href=\"";
if($obj->Odkaz != "")
{if($obj->Nove_okno == "Ano")
{echo "http://".$obj->Odkaz."\" target=\"_blank\">";}
else {echo "".$obj->Odkaz."\">";}}
else {
if($prihlasen=="ano") {echo "administrace.php";}
else {echo "index.php";}
echo "?menu=".$obj->ID_menu."\">";}
{
echo $obj->Nazev;}
if($prihlasen=="ano") {
if($resu==0) $resu="žádný článek";
}else $resu="";
echo "</a> <span style='color:red;'>".$resu."</span><br />\n";
///
// echo $indent.$level."(".$obj->ID_menu.") : ".stripslashes($obj->Nazev)." » <a href=\"index.php?menu=".$id."\" title=\"".stripslashes($obj->Nazev)."\">".stripslashes($obj->Nazev)."</a><br />\n"; //vypis lajnu
sitemap(stripslashes($obj->ID_menu),$indent,$level,$maxlevel,$prihlasen); // zavolej sama sebe -> sup do podmenu
}
}
function uprav_odkaz($url) {
$helpurl = explode("<br>",$url);
for($i=0;$i<count($helpurl);$i++) {
if($i==0) {$url = $helpurl[$i];}
else {$url .= "-".$helpurl[$i];}
}
// $url = strtolower($url);
// $url = strtr($url, "ěščřžýáíéťúůóďňĚŠČŘŽÝÁÍÉŤÚŮÓĎŇ", "escrzyaietuuodnescrzyaietuuodn");
$url = odstran_diakritiku($url);
$url = strtr($url, "/ \" ", "-- ");
return $url;
}
function odstran_diakritiku($text) {
/*
//tez funkcni reseni
$p = array("&","á","ä","č","ď","é","ě","ë","í","ň","ó","ö","ř","š","ß","ť","ú","ů","ü","ý","ž","Á","Ä","Č","Ď","É","Ě","Ë","Í","Ň","Ó","Ö","Ř","Š","Ť","Ú","Ů","Ü","Ý","Ž");
$r = array("a","a","ae","c","d","e","e","ie","i","n","o","oe","r","s","ss","t","u","u","ue","y","z","a","AE","C","D","E","E","IE","I","N","O","OE","R","S","T","U","U","UE","Y","Z");
$uri = str_replace($p, $r, $text);
$uri = trim($uri);
$uri = strtolower($uri);
$uri = str_replace("'", "", $uri);
$uri = preg_replace("/^\W+/", "", $uri);
$uri = preg_replace("/\W+$/", "", $uri);
$uri = preg_replace("/\W+/", "-", $uri);
return $uri; */
$trans = array('á'=>'a', 'Á'=>'A', 'č'=>'c', 'Č'=>'C', 'ď'=>'d', 'Ď'=>'D',
'é'=>'e', 'É'=>'E', 'ě'=>'e', 'Ě'=>'E', 'í'=>'i', 'Í'=>'I', 'l'=>'l',
'Ą'=>'L', 'ň'=>'n', 'Ň'=>'N', 'ó'=>'o', 'Ó'=>'O', 'ř'=>'r', 'Ř'=>'R',
'š'=>'s', 'Š'=>'S', 'ť'=>'t', 'Ť'=>'T', 'ú'=>'u', 'Ú'=>'U', 'ů'=>'u',
'Ů'=>'U', 'ý'=>'y', 'Ý'=>'Y', 'ž'=>'z', 'Ž'=>'Z',
//rustina - velka pismena
'A'=>'A', 'Б'=>'B', 'В'=>'V', 'Г'=>'G', 'Д'=>'D', 'Ё'=>'E', 'Ж'=>'Z',
'З'=>'Z', 'И'=>'I', 'Й'=>'J', 'Л'=>'L', 'П'=>'P', 'Ф'=>'F', 'Ц'=>'C',
'Ч'=>'C', 'Ш'=>'S', 'Щ'=>'SC', "Ы"=>"Y", "Э"=>'E', 'Ю'=>'ju', 'Я'=>'ja',
'С'=>'S', 'О'=>'O', 'Ъ'=>'', 'Ь'=>'', 'Н'=>'N', 'К'=>'K',
//mala pismena
'а'=>'a', 'б'=>'b', 'в'=>'v', 'г'=>'g', 'д'=>'d', 'ё'=>'e', 'ж'=>'z',
'з'=>'z', 'и'=>'i', 'й'=>'j', 'к'=>'k', 'л'=>'l', 'м'=>'m', 'н'=>'n',
'о'=>'o', 'п'=>'p', 'т'=>'t', 'ф'=>'f', 'х'=>'h', 'ц'=>'c', 'ч'=>'c',
'ш'=>'s', 'щ'=>'sc', 'ы'=>'y', 'э'=>'e', 'ю'=>'ju', 'я'=>'ja',
'р'=>'r', 'с'=>'s', 'е'=>'e', 'ь'=>'', 'ъ'=>''
//konec rustiny
);
$text = trim(strtolower(preg_replace('~[^[:alnum:]]+~', '-', strtr($text, $trans))), '-');
return $text;
/* $text = iconv('UTF-8', 'ASCII//TRANSLIT', $text); //toto je nefunkcni na serveru CS / prevadi spatne Ú,Ů apod
$text = str_replace('\'', '', $text);
$text = preg_replace('/\W+/', '-', $text);
$text = trim($text, '-');
$text = strtolower($text);
return $text;*/
}
//speciální znakový řady na vymlacení utf
/*
$axiom=urlencode($axiom);
// space ("á", "ä", "č", "ď", "é", "ě", "ë", "í", "ň", "ó", "ö", "ř", "š", "ť", "ú", "ů", "ü", "ý", "ž", "Á", "Ä", "Č", "Ď", "É", " Ě", "Ë", "Í", "Ň", "Ó", "Ö", "Ř", "Š", "Ť", "Ú", "Ů", "Ü", "Ý", "Ž");
$a = array("%20","%E1","%E4 ","%E8", "%0F", "%E9", "%EC", "%EB", "%ED", "%48", "%F3", "%F6 ", "%F8", "%9A", "%65", "%FA", "%F9", "%FC", "%FD", "%9E", "%C1", "%C4", "%C8", "%0E", "%C9", "%CC", "%CB", "%CD", "%47", "%D3", "%D6", "%D8", "%8A", "%64", "%DA", "%D9", "%DC", "%DD", "%8E");
$b =array(" ","á","ä","č","ď","é","ě","ë","í","ň","ó","ö","ř","š","ť","ú","ů","ü","ý","ž","Á","Ä","Č","Ď","É","Ě","Ë","Í","Ň","Ó","Ö","Ř","Š","Ť","Ú","Ů","Ü","Ý","Ž");
$axiom = str_replace($a, $b, $axiom);
$search = addslashes($_GET['search']);
$search = strip_tags($search);
$search=utf8_encode($search);
// space ("á", "ä", "č", "ď", "é", "ě", "ë", "í", "ň", "ó", "ö", "ř", "š", "ť", "ú", "ů", "ü", "ý", "ž", "Á", "Ä", "Č", "Ď", "É", " Ě", "Ë", "Í", "Ň", "Ó", "Ö", "Ř", "Š", "Ť", "Ú", "Ů", "Ü", "Ý", "Ž");
$a = array("%u0020","%u00E1","%u00E4","%u010D","%u010F","%u00E9","%u011B","%u00EB","%u00ED ","%u0148","%u00F3","%u00F6 ","%u0159","%u0161","%u0165","%u00FA","%u016F","%u00FC","%u00FD","%u017E","%u00C1","%u00C4","%u010C","%u010E","%u00C9","%u011A","%u00CB","%u00CD","%u0147","%u00D3","%u00D6","%u0158","%u0160","%u0164","%u00DA","%u016E","%u00DC","%u00DD","%u017D");
$b =array(" ","á","ä","č","ď","é","ě","ë","í","ň","ó","ö","ř","š","ť","ú","ů","ü","ý","ž","Á","Ä","Č","Ď","É","Ě","Ë","Í","Ň","Ó","Ö","Ř","Š","Ť","Ú","Ů","Ü","Ý","Ž");
$search = str_replace($a, $b, $search);
*/
//-----------------------
//Funkce pro výpis šablon
//-----------------------
function S_nadpis ($nadpis)
{
if ($nadpis != "") $vysledek = "<h2>" . $nadpis . "</h2>" . "\n";
else $vysledek = false;
return $vysledek;
}
//funkce vypisuje fotografii (buď velkou nebo malou s odkazem na zvětšení)
//zvětšování má 2 možnosti - stará (do nového okna) / nová - lightbox
//$adresaObrVelky -adresa obrázku (vždy jen velkého)
//zvetsovaci - nastavení zda jde o zvětšovací obrázek nebo ne - hodnoty ano/ne
function S_vypisFoto ($adresaObrVelky, $zvetsovaci = "ne", $idobr)
{
global $LIGHTBOX;
$lb = $LIGHTBOX;
if (!File_Exists ($adresaObrVelky)) return false;
if ($zvetsovaci == "ano"):
$adresaObrMaly = pReg_Replace ("~^(obrazky/[0-9]*[a-z]{1})(.*)$~", "\\1s\\2", $adresaObrVelky);
if (!File_Exists ($adresaObrMaly)) return false;
$adresaObr = $adresaObrMaly;
$rozmery = GetImageSize ($adresaObrMaly);
else:
$adresaObr = $adresaObrVelky;
$rozmery = GetImageSize ($adresaObrVelky);
endif;
$kod = "";
$obr = "<img class=\"obr\" style=\"width: " . $rozmery[0] . "; height: " . $rozmery[1] . "\" src=\"" . $adresaObr . "\" alt=\"\" />";
if ($zvetsovaci == "ano"):
if (true) $kod .= "<a href=\"" . $adresaObrVelky . "\" rel=\"lightbox[$idobr]\" title=\"\">";
else $kod .= "<a href=\"zvetsiimage.php?jmenoobrazku=" . $adresaObrVelky . "\" rel=\"lightbox[$idobr]\" target=\"_blank\" title=\"\">";
$kod .= $obr;
$kod .= "</a>" . "\n";
else:
$kod .= $obr;
endif;
return $kod;
}
//funkce vypisuje soubory s ikonou
//soubor - cesta k souboru
//nazev - zobrazovaný název souboru
//ikona - velka/mala/zadna
function S_vypisSouboru ($soubor, $nazev, $ikona = "velka")
{
if (!File_Exists ($soubor)) return false;
$typ = pReg_Replace ("~^soubory/.*\.([a-zA-Z]{3})$~", "\\1", $soubor);
if ($ikona == "velka"):
$adrIkona = "images/soubor" . $typ . ".gif";
if (!File_Exists ($adrIkona)):
$ikona = "images/soubordefault.gif";
endif;
elseif ($ikona == "mala"):
$adrIkona = "images/soubor" . $typ . "small.gif";
if (!File_Exists ($adrIkona)):
$ikona = "images/soubordefaultsmall.gif";
endif;
endif;
$kod = "";
$kod .= "<div class=\"soubor\">" . "\n";
if ($ikona != "zadna"):
$kod .= "<a href=\"" . $soubor . "\" target=\"_blank\" title=\"" . $nazev . "." . $typ . "\">" . "\n";
$kod .= "<img class=\"" . $ikona . "\" src=\"" . $adrIkona . "\" alt=\"" . $nazev . "." . $typ . "\" />" . "\n";
$kod .= "</a>" . "\n";
endif;
$kod .= "<p><a href=\"" . $soubor . "\" target=\"_blank\" title=\"" . $nazev . "." . $typ . "\">" . $nazev . "." . $typ . "</a></p>" . "\n";
$kod .= "</div>" . "\n";
return $kod;
}
function urovneMenu ($nadmenu, $zanoreni = 0, $zarazeni = 0, $filtr = false) {
global $NAZEV_PROJEKTU;
global $ECONF;
if ($nadmenu !== false):
$tabulka = $NAZEV_PROJEKTU . "menu" . $_SESSION[$NAZEV_PROJEKTU."lang"];
@$vysledek = MySQL_Query("
SELECT * FROM $tabulka
WHERE (Nadmenu = '$nadmenu')
ORDER BY Poradi ASC");
$odrazky = "";
for ($i = 0; $i < $zanoreni; $i++):
$odrazky .= " ";
endfor;
if (($zanoreni == 0) && ($filtr == false)):
echo "<option value=\"0\">nezařazeno</option>";
endif;
while ($zaznam = MySQL_Fetch_Array ($vysledek)):
echo "<option value=\"".$zaznam["ID_menu"]."\"";
if ($zarazeni == $zaznam["ID_menu"]) echo " selected";
echo ">$odrazky".$zaznam["Nazev"]."</option>";
urovneMenu ($zaznam["ID_menu"], ($zanoreni + 1), $zarazeni);
endwhile;
else:
echo "<option value=\"0\">není k dispozici</option>";
endif;
}
?>
ACC SHELL 2018