/Server/PrjInfo/PermaLink.php
0,0 → 1,312
<?php
 
 
// Zpracovává odkazy ve formátu http://www.mlab.cz/PermaLink/Projekt/DalšíCesta
// Skript se volá ze souborů /PermaLink.cs.php a /PermaLink.en.php kde se nastavuje proměnná $Lang
// První slovo (až po lomítko) za PermaLink se chápe jako jméno modulu/projektu nebo adresáře/sekce.
// Pokud zadanému jménu odpovídá jediný odkaz, provede se hned přesměrování, jinak se vypíše seznam kandidátů.
// Pro snadné odkázání lze permanentní odkaz doplnit cestou k adresáři či souboru v rámci projektu.
 
 
define(DISPLAY_ALL_IF_EMPTY , true); // Povol zobrazení všech sekcí a projektů když je zadaný prázdný permalink
define(MAX_DEPTH, 50); // Maximální hloubka prohledávání adresářů (pojistka proti zacyklené struktuře adresářů)
 
require_once('Common.php'); // Modul společných funkcí
require_once('DirMetadata.php'); // Modul pro načítání informace o adresářích
require_once('TemplateEngine.php'); // Stroj pro práci s templejty
 
// Převezmi odkaz
if($_REQUEST['PermaLink']!='')
// Odkaz z formuláře
$LinkFull = $_REQUEST['PermaLink'];
else
// Odkaz z cesty
$LinkFull = $_SERVER['PATH_INFO'];
 
// Decode entities ?
// $LinkFull=htmlspecialchars_decode($LinkFull);
 
// Split PermaLink and aditional Path
$LinkFull = ltrim($LinkFull, DIRECTORY_SEPARATOR);
$LinkFull = rtrim($LinkFull, DIRECTORY_SEPARATOR);
$SeparatorPosition = strpos($LinkFull, DIRECTORY_SEPARATOR);
if ($SeparatorPosition===false)
{
$LinkPath = '';
$Link = $LinkFull;
}
else
{
$LinkPath = substr($LinkFull, $SeparatorPosition+1);
$Link = substr($LinkFull, 0, $SeparatorPosition);
}
unset($SeparatorPosition);
 
// Najdi cíle pro PermaLink
$PermaLinkArray = array();
if(DISPLAY_ALL_IF_EMPTY or !($Link===''))
{
// Načti seznam všech projektů a sekcí (od začátku)
$ProjectsAndSections = RecurseDirs('/');
 
// Převeď projekty a sekce na permalinky
$AllPermas = PermaLinkCreateArray($ProjectsAndSections);
unset($ProjectsAndSections);
 
if($LinkFull==='')
{
// Prázdný permalink - zkopíruj vše
$PermaLinkArray = $AllPermas;
}
else
{
// Najdi zadaný permalink
$PermaLinkArray = PermaLinkFind($AllPermas, PermaLinkCreateKey($Link));
}
unset($AllPermas);
}
$PermaLinkCount = count($PermaLinkArray);
//print_rx('Found Permalinks', $PermaLinkArray);
 
// Nalezen právě jeden odkaz bez přídavné cesty - rovnou přesměruj
if($PermaLinkCount==1 and $LinkPath==='')
Redirect($PermaLinkArray[0]['Path'], $Lang); // ------------------------------------->>>
 
// Setřiď nalezené (třídí primárně podle první položky, což je lowercase verze permalinku)
sort($PermaLinkArray);
 
// ***************************
// Zpracuj PermaLink bez cesty
// ***************************
if ($LinkPath==='')
{
// Založ objekt templejtu a načti jej
$Template = new TemplateEngine();
$error = $Template->LoadTemplate($_SERVER['DOCUMENT_ROOT'].'/'.TEMPLATE_PERMALINK, $Lang);
if ($error!='')
Error($error);
 
// Generuj dynamický obsah do proměnných (společná část)
$Template->SetVariable('InfoThisLink', $LinkFull );
$Template->SetVariable('InfoThisServer', $_SERVER['HTTP_HOST']);
 
// Nalezeno více položek - zjisti více informací a vlož je do templejtu
$Lines = '';
if($PermaLinkCount>1)
{
// Nachystej společné hodnoty z templejtu
$PictureGlue = $Template->GetVariable('InfoPictureGlue');
$PictureAlt = $Template->GetVariable('InfoPictureAlt');
$PictureNoPicture = '/'.TEMPLATE_PATH.'/'.$Template->GetVariable('InfoNoPicture');
// Načti informace o projektu
$DirInfo = new DirMetadata();
foreach($PermaLinkArray as $Data)
{
// Naplň proměnné pro definici položky
// Type / Picture / PermaLink / Path
$Variables['InfoType'] = $Data['Type'];
$Variables['InfoPicture'] = CreatePicturesLink($Data['Path'], $PictureGlue, $PictureAlt, $PictureNoPicture, 150);
$Variables['InfoPermaLink'] = "<a href=\"".PermaLinkCreateLink($Data['PermaLink'])."\">{$Data['PermaLink']}</a>";
$PathMarked = MarkPath($Data['Path']);
$Variables['InfoPath'] = "<a href=\"".CreateProjectLink($Data['Path'], $Lang)."\">$PathMarked</a>";
unset($PathMarked);
 
// Zjisti informace o projektu
if($Data['Type']==="Section")
$DirInfo->LoadDirInfo($Data['Path'].'/'.DIRINFO, $Lang);
else
$DirInfo->LoadDirInfo($Data['Path'].'/'.PRJINFO, $Lang);
 
// Vlož všechny zjištěné informace
foreach($DirInfo->DirData as $Key => $ItemInfo)
$Variables[$Key] = $ItemInfo;
 
// Ošetři chybějící popis
if($Variables['InfoShortDescription']=='' and $Variables['InfoLongDescription']=='')
$Variables['InfoShortDescription'] = $Template->GetVariable('InfoNoText');
 
// Proveď substituci a střádej výsledek (po položkách)
$Lines .= $Template->Substitute($Variables, $Template->GetVariable('InfoLine'));
 
// Zahoď nalezená data (aby se nepoužily v dalším cyklu)
unset($Variables);
}
 
// Vlož řádky do templejtu
$Template->SetVariable('InfoLine', $Lines);
}
else
{
// Nenalezeno nic (nebo prázdné zadání)
$Template->SetVariable('InfoLine', $Template->GetVariable('InfoNoData'));
}
 
// Odešli výsledek klientovi
echo $Template->GetPage();
return;
}
else
// **************************
// Zpracuj PermaLink s cestou
// **************************
{
// Založ objekt templejtu a načti jej
$Template = new TemplateEngine();
$error = $Template->LoadTemplate($_SERVER['DOCUMENT_ROOT'].'/'.TEMPLATE_PERMALINK_PATH, $Lang);
if ($error!='')
Error($error);
 
// Generuj dynamický obsah do proměnných (společná část)
$Template->SetVariable('InfoThisLink', $LinkFull );
$Template->SetVariable('InfoThisServer', $_SERVER['HTTP_HOST']);
 
// Načti proměnné z templejtu
$Glue = $Template->GetVariable('InfoNamesGlue');
 
// Prohledej adresáře (nestriktní verze)
// -------------------------------------
$FilesPathArray = array();
$FilesPathCount = 0;
 
// Rozděl cestu na dílky
$LinkPathArray = explode('/', $LinkPath);
$LinkPathDepth = count($LinkPathArray);
//print_rx("Path to be found", $LinkPathArray);
 
// Cyklus přes všechny nalezené permalinky
foreach($PermaLinkArray as $Item)
{
// Rekurentně procházej atrukturu adresáře
// Podadresáře přidávej průběžně na konec pole
// První položka je hloubka zanoření (indexuje $LinkPathArray)
// Střádej nalezené položky do pole $LinkPathData
$Dirs = array();
$Dirs[] = array('Depth'=>0, 'Path'=>$Item['Path']);
// Omez hloubku procházení adresářů
for ($i=0; $i<count($Dirs) and $i<MAX_DEPTH; $i++)
{
//print "At Depth " . $Dirs[$i]['Depth'] . " Reading Directory " . $Dirs[$i]['Path'] . PHP_EOL;
//print "Looking for " . $LinkPathArray[$Dirs[$i]['Depth']] . PHP_EOL;
$GlobFlags = GLOB_NOSORT;
if ($LinkPathDepth>$Dirs[$i]['Depth']+1)
{
// Nejsme ještě u konce cesty - přidej jen adresáře
$GlobFlags |= GLOB_ONLYDIR;
}
// Čti adresáře
$SubDirs = glob($_SERVER['DOCUMENT_ROOT'].$Dirs[$i]['Path'].DIRECTORY_SEPARATOR.'*', $GlobFlags);
foreach($SubDirs as $Item)
{
// Převeď na cestu od rootu webu
$CurentName = basename($Item);
$CurentPath = $Dirs[$i]['Path' ];
$CurentDepth = $Dirs[$i]['Depth'];
//print " $CurentName\n";
// ===> POROVNÁNÍ JE ZDE <===
if(mb_strtolower(PermaLinkFilter($CurentName))===mb_strtolower(PermaLinkFilter($LinkPathArray[$CurentDepth])))
{
//print" ^----> $CurentDepth : $CurentPath/$CurentName\n";
// Přidej další adresář do rekurze
if(is_dir($Item))
{
$Dirs[] = array('Depth'=>$CurentDepth+1, 'Path'=>$CurentPath.'/'.$CurentName);
}
// Nalezený soubor v adresáři
if(is_file($Item))
{
//print " ^----> File: $Item\n";
$FilesPathArray[$Dirs[$i]['Path']][]=$CurentName;
$FilesPathCount++;
}
}
// V posledním adresáři přidej všechny soubory
if($CurentDepth>=$LinkPathDepth)
{
//print " Test ".$_SERVER['DOCUMENT_ROOT'].$CurentPath.'/'.$CurentName.PHP_EOL;
if (is_file($_SERVER['DOCUMENT_ROOT'].$CurentPath.'/'.$CurentName))
{
//print " ^----> File All: $Item\n";
$FilesPathArray[$CurentPath][]=$CurentName;
$FilesPathCount++;
}
}
}
//print("\n");
}
}
//print_rx('Found Files', $FilesPathArray);
//print "Files Found Count $FilesPathCount\n";
 
/*
// Prohledej adresáře a soubory (striktní verze)
// ---------------------------------------------
$EatIt = strlen($_SERVER['DOCUMENT_ROOT']);
foreach($PermaLinkArray as $Item)
{
$Path = $_SERVER['DOCUMENT_ROOT'].$Item['Path'].DIRECTORY_SEPARATOR.$LinkPath;
if (is_file($Path))
{
$FilesPathArray[substr(dirname($Path), $EatIt)] = array(basename($Path));
$FilesPathCount++;
}
if (is_dir($Path))
{
foreach (scandir($Path) as $DirItem)
{
if (is_file($Path.DIRECTORY_SEPARATOR.$DirItem))
{
$FilesPathArray[substr($Path, $EatIt)][]=$DirItem;
$FilesPathCount++;
}
}
}
}
print_rx('Nalezene soubory', $FilesPathArray);
print "$FilesPathCoutn\n";
*/
 
// Nalezen právě jeden odkaz na soubor - rovnou přesměruj
if($FilesPathCount===1)
{
reset($FilesPathArray);
$tmp = current($FilesPathArray);
$Path = key($FilesPathArray).'/'.$tmp[0];
RedirectToFile($Path); // ------------------------------------->>>
}
 
// Nalezeno více položek - zjisti více informací a vlož je do templejtu
$Lines = '';
if($FilesPathCount>0)
{
foreach($FilesPathArray as $Path=>$FileArray)
{
$Variables['InfoName']=CreateFilesLink($Path, '<br>', '');
$FileNames = '';
foreach($FileArray as $FileItem)
{
$FileNames .= '<br> '.$FileItem;
}
$Variables['InfoPath'] = $Path;
$Variables['InfoNames'] = CreateFilesLink2($Path, $FileArray, $Glue);
 
// Proveď substituci a střádej výsledek (po položkách)
$Lines .= $Template->Substitute($Variables, $Template->GetVariable('InfoLine'));
 
// Zahoď nalezená data (aby se nepoužily v dalším cyklu)
unset($Variables);
}
// Vlož řádky do templejtu
$Template->SetVariable('InfoLine', $Lines);
}
else
{
// Nenalezeno nic
$Template->SetVariable('InfoLine', $Template->GetVariable('InfoNoData'));
}
 
// Odešli výsledek klientovi
echo $Template->GetPage();
return;
}
 
?>