11,6 → 11,7 |
|
// Clear variables |
unset($Redirect); |
unset($RedirectUpper); |
unset($RedirectToPage); |
unset($Lang); |
|
20,10 → 21,8 |
// Do all upcase |
foreach($Redirect as $Key => $Value) |
{ |
$RedirectNew[strtoupper($Key)]=$Value; |
$RedirectUpper[strtoupper($Key)]=$Value; |
} |
$Redirect=$RedirectNew; |
unset($RedirectNew); |
|
// Process language |
$Lang=$_SERVER[SCRIPT_FILENAME]; |
31,20 → 30,54 |
if ($Lang==$_SERVER[SCRIPT_FILENAME]) $Lang=""; |
|
// Find redirect |
$RedirectToPage=$Redirect[strtoupper(urldecode($_SERVER[QUERY_STRING]))]; |
$RedirectToPage=$RedirectUpper[strtoupper(urldecode($_SERVER[QUERY_STRING]))]; |
|
// If not found -> list all posibilities |
if ($RedirectToPage=="") |
{ |
$RedirectToPage="/"; // DOPSAT |
// VYPIS a KONEC |
// File Name |
if ($Lang=="") |
$Lang="en"; |
$FileName="DirectLink.$Lang.tmpl"; |
// Read Template |
$Template=@file($FileName); |
// Trim Lines |
if ($Template<>FALSE) |
{ |
foreach($Template as $Key => $Line) |
{ |
$Template[$Key]=rtrim($Line); |
} |
$Template=implode("\n",$Template); |
} |
// Generate List |
$Table =""; |
$Table.="<table>\n"; |
$Table.=" <tr>\n"; |
$Table.=" <th> Direct Link </th>\n"; |
$Table.=" <th> Redirected to </th>\n"; |
$Table.=" </tr>\n"; |
foreach($Redirect as $Key => $Value) |
{ |
$Table.=" <tr>\n"; |
$Table.=" <td> $Key </td>\n"; |
$Table.=" <td> $Value </td>\n"; |
$Table.=" </tr>\n"; |
} |
$Table.="<table>\n"; |
// Put it into Template |
if ($Template<>"") |
print str_ireplace("<<Table>>", $Table, $Template); |
else |
print $Table; |
// Finished |
return 0; |
} |
else |
{ |
if ($Lang<>"") |
if (file_exists($RedirectToPage.".".$Lang.".html")) |
if (file_exists($_SERVER["DOCUMENT_ROOT"].$RedirectToPage.".".$Lang.".html")) |
$RedirectToPage.=".".$Lang.".html"; |
// DOPSAT - zkusit ENG/CZE verzi |
} |
|
// Redirect page |