<?
class archive
{
   var $path;          //текущий относительный путь


function archive($_path,$_face)
{
   include $_face;
}//archive


function translit($str)
{
   $rus = array("й","ц","у","к","е","н","г","ш","щ","з","х","ъ","ф","ы","в","а","п","р","о","л","д","ж","э","я","ч","с","м","и","т","ь","б","ю",
                "Й","Ц","У","К","Е","Н","Г","Ш","Щ","З","Х","Ъ","Ф","Ы","В","А","П","Р","О","Л","Д","Ж","Э","Я","Ч","С","М","И","Т","Ь","Б","Ю");
   $eng = array("i","ts","u","k","e","n","g","sh","shch","z","h","","f","i","v","a","p","r","o","l","d","zh","e","ya","ch","s","m","i","t","","b","yu",
                "I","Ts","U","K","E","N","G","Sh","Shch","Z","H","","F","I","V","A","P","R","O","L","D","Zh","E","Ya","Ch","S","M","I","T","","B","Yu");
   return str_replace($rus, $eng, $str);
}

function del($_path, $_file)
{

  if (AUTH()<1) {MSG('Permission denied','?'); break;}
  if ($_path=='/') $_path='';

  $f=fopen('archive'.$_path.'/'.'index.dat', 'r');
  while (!feof ($f)) {
     $str=fgets($f,250);
     if ($str=='') continue;
     $tmp = explode('|', $str);
     if ($tmp[0]==$_file) {$del_file=$tmp; continue;}
     $files[] = $tmp;
  }

  if ($_path=='/') $_path='';

  if (!isset($del_file)) {MSG_back('Такого файла не существует'); exit(1);}

  if ($del_file[1]=='dir') {  //Deleteing folder
     $f=fopen('archive'.$_path.'/'.$_file.'/index.dat', 'r');
     while (!feof ($f)) {
        $str = fgets($f,250);
        if ($str=='') continue;
        $temp = explode('|', $str);
     }
     fclose($f);

     if (isset($temp)) {MSG_back('Удаляемая папка не пуста'); exit(1);}

     unlink('archive'.$_path.'/'.$_file.'/index.dat');
     rmdir('archive'.$_path.'/'.$_file);
  }
  else                        //Deleting file
     unlink('archive'.$_path.'/'.$_file);

  //updating index file
  $f=fopen('archive'.$_path.'/'.'index.dat', 'w+');
  for ($i=0; $i<sizeof($files); $i++)
     fputs($f,$files[$i][0].'|'.$files[$i][1].'|'.$files[$i][2].'|'.$files[$i][3].'|'.$files[$i][4]);

  fclose($f);
  MSG('Файл удален', '?path='.$_path);
}

function upload($_path,$_fl, $tmp_fl, $_descr, $_type, $_endescr)
{
  $_fl=$this->translit($_fl);

  if ($_path=='/') $_path='';

  if (AUTH()<1) {MSG('Permission denied','?'); break;}

  $_fl = str_replace(" ","_",$_fl);

  //Определение поддерживаемых типов файлов
  $ffile=fopen('filetype.dat', 'r');
  while (!feof ($ffile)) {
     $str=fgets($ffile,20);
     if ($str=='') continue;
     $types[] = explode('|', $str);
  }

  //закачиваем файл на сервер
  $type=substr(strrchr($_fl,'.'),1);

  for ($i=0; $i<sizeof($types); $i++) if ($type==$types[$i][0]) {$ok = TRUE; break;}

  if ($ok) {
//     if ($_path=='/') $_path='';
     echo $uploadfile = 'archive'.$_path."/".$_fl;
     if (!move_uploaded_file($tmp_fl, $uploadfile))
     {
       MSG_back('При закачке файла произошла ошибка...');
       exit(1);
     }
  }
  else {
       $allowed_types='';
       for ($i=0; $i<(sizeof($types)-1); $i++) $allowed_types=$allowed_types.$types[$i][0].', ';
       $allowed_types=$allowed_types.$types[sizeof($types)-1][0];
       MSG_back('Вы можете закачать только '.$allowed_types.' файлы');
       exit(1);
  }


  $f=fopen('archive'.$_path.'/'.'index.dat', 'r');
  while (!feof ($f)) {
     $str=fgets($f,250);
     if ($str=='') continue;
     $files[] = explode('|', $str);
  }

  $files[] = array($_fl, $type, $_descr, date("h:i j.n.Y"), $_endescr."\r\n");

  fclose($f);

  sort($files);

  $f=fopen('archive'.$_path.'/'.'index.dat', 'w+');
  for ($i=0; $i<sizeof($files); $i++)
     fputs($f,$files[$i][0].'|'.$files[$i][1].'|'.$files[$i][2].'|'.$files[$i][3].'|'.$files[$i][4]);

  fclose($f);
  MSG('Файл загружен на сервер', '?path='.$_path);
}


function md($_path,$_dir, $_descr, $_endescr)
{
  $_dir=$this->translit($_dir);

  if ($_path=='/') $_path='';

  if (AUTH()<1) {MSG('Permission denied','?'); break;}

  $_dir = str_replace(" ","_",$_dir);

  if (!mkdir('archive'.$_path.'/'.$_dir))  {
     MSG_back('Невозможно создать такую папку, возможно такая папка уже существует');
     break;
  }

  $f=fopen('archive'.$_path.'/'.$_dir.'/'.'index.dat', 'w+');

  $f=fopen('archive'.$_path.'/'.'index.dat', 'r');
  while (!feof ($f)) {
     $str=fgets($f,250);
     if ($str=='') continue;
     $files[] = explode('|', $str);
  }

  $files[] = array($_dir, 'dir', $_descr, date("h:i j.n.Y"), $_endescr."\r\n");

  fclose($f);

  sort($files);

  $f=fopen('archive'.$_path.'/'.'index.dat', 'w+');
  for ($i=0; $i<sizeof($files); $i++)
     fputs($f,$files[$i][0].'|'.$files[$i][1].'|'.$files[$i][2].'|'.$files[$i][3].'|'.$files[$i][4]);

  fclose($f);

  echo "<META HTTP-EQUIV='Refresh' CONTENT='0; URL=?path=".$_path."'>";
}


function browse($_path)
{
  if ($_path=='/') $_path='';

  if ( !( (strpos($_path,":")===FALSE) and (strpos($_path,"./")===FALSE)) ) $_path='';
  
  $folders="";
  $files="";

  //Определение поддерживаемых типов файлов
  $ffile=fopen('filetype.dat', 'r');
  while (!feof ($ffile)) {
     $str=fgets($ffile,20);
     $types[] = explode('|', $str);
  }

  echo "<p align=left style='Font-family: Courier New; font-weight: bold;'>&nbsp;&nbsp;&nbsp;";
  if ($_path=='') echo "/";
  else echo $_path;
  echo "</p><br>
<table width=850 cellspacing=0 cellpadding=0 style='border: 1px solid #9a9aba'>";

  //Читаем записи
  $f=fopen('archive'.$_path.'/index.dat', 'r');

  $up=substr($_path, 0, strrpos($_path,'/'));

  echo "
<tr>";
  if (AUTH()>1) echo "  <td width=30 style='border-right:1px solid #9a9aba;' align=center>&nbsp;</td>\r\n";

  if ($_SESSION['lang']=='eng') echo "  <td width=200 style='border-right:1px solid #9a9aba; border-bottom:1px solid #9a9aba; font-weight: bold' align=center>File</td>
  <td width=470 style='border-right:1px solid #9a9aba; border-bottom:1px solid #9a9aba; font-weight: bold' align=center>Description</td>
  <td width=150 style='border-bottom:1px solid #9a9aba; font-weight: bold' align=center>Date</td>
</tr>";

  else echo "  <td width=200 style='border-right:1px solid #9a9aba; border-bottom:1px solid #9a9aba; font-weight: bold' align=center>Файл</td>
  <td width=470 style='border-right:1px solid #9a9aba; border-bottom:1px solid #9a9aba; font-weight: bold' align=center>Описание</td>
  <td width=150 style='border-bottom:1px solid #9a9aba; font-weight: bold' align=center>Дата</td>
</tr>";

  if ($_path!='') {
     echo "
<tr>";
     if (AUTH()>1) echo "  <td width=30 style='border-right:1px solid #9a9aba;' align=center>&nbsp;</td>\r\n";
     echo "  <td width=200 style='border-right:1px solid #9a9aba;' align=left>
               &nbsp;&nbsp;<a href='?path=".$up."'><img src=icons/back.gif alt='..'></a>
          </td>
  <td width=470 style='border-right:1px solid #9a9aba;' align=left>&nbsp;</td>
  <td width=150 align=left>&nbsp;</td>
</tr>";
  }

  if ($_path=='') $_pth='/';
  else $_pth=$_path;

  while (!feof ($f)) {
     $str = fgets($f, 250);
     if ($str=='') continue;
     $fl = explode('|', $str);

     if ($fl[1]=='dir') {
        if (strlen($fl[0])>15)
           $nm=substr( $fl[0], 0, 15)."...";
        else $nm=$fl[0];
        $res=$_path;
        if ($res=='/') $res='';
        $res=$res.'/'.$fl[0]."'><img src=icons/fldr.gif alt='folder'>".$nm;
        $folders=$folders."
<tr>";
  if (AUTH()>1) $folders=$folders."\r\n  <td width=30 style='border-right:1px solid #9a9aba;' align=center>
       <a style='Font-family: Courier New;' href=?action=del&file=".$fl[0]."&path=".$_pth."><img src=../pic/del.gif></a>
     </td>\r\n";
  $folders=$folders."  <td width=200 style='border-right:1px solid #9a9aba;' align=left>&nbsp;
      <a style='Font-family: Courier New; font-size: 15px' href='?path=".$res."</a></td>
  <td width=470 style='border-right:1px solid #9a9aba;' align=left>&nbsp;";
  if ($_SESSION['lang']=='eng') $folders=$folders.$fl[4];
  else $folders=$folders.$fl[2];
  $folders=$folders."</td>
  <td width=150 align=center>".$fl[3]."</td>
</tr>";
     }

     else {

        if (strlen($fl[0])>15) {
           $nm = substr( $fl[0], 0, strrpos( $fl[0], "." ) );
           $rassh = substr( strrchr($fl[0], "."), 1);
           $nm = substr( $nm, 0, 14-strlen($rassh));
           $nm=$nm."...".$rassh;
        }
        else $nm=$fl[0];

        $ok = FALSE;
        for ($i=0; $i<count($types); $i++) if ($fl[1]==$types[$i][0]) {$ok = TRUE; break;}
        $type=substr($types[$i][1],0,3);
        if ($ok) $files=$files."
<tr>";
  if (AUTH()>1) $files=$files."<td width=30 style='border-right:1px solid #9a9aba;' align=center>
    <a href=?action=del&file=".$fl[0]."&path=".$_pth."><img src=../pic/del.gif></a>
  </td>\r\n";
  $files=$files."  <td valign=center width=200 style='border-right:1px solid #9a9aba;' align=left>&nbsp;
     <a style='Font-family: Courier New; font-weight: normal; font-size: 15px' href='".'archive'.$_path.'/'.$fl[0]."'><img src=icons/".$type.".gif alt='".$type."'>".$nm."</a></td>
  <td width=470 style='border-right:1px solid #9a9aba;' align=left>&nbsp;";
  if ($_SESSION['lang']=='eng') $files=$files.$fl[4];
  else $files=$files.$fl[2];
  $files=$files." (".round(filesize('archive'.$_pth.'/'.$fl[0]) / 1024)."Kb)</td>
  <td width=150 align=center>".$fl[3]."</td>
</tr>";
     }
  }

  echo $folders.$files."</table>";
  if (AUTH()>1) echo "
<br><br>
<form align=center enctype='multipart/form-data' name='post1' method=POST action='?action=md'>
<table width=850 cellspacing=0 cellpadding=0>
<tr>
  <td width=200 align=right><small><b>Создать новую папку:</b></small>&nbsp;&nbsp;&nbsp;</td>
  <td width=180 align=left><input name='newdir' type=text size=30><input type='hidden' name='path' value='".$_pth."'></td>
  <td width=470 align=left>&nbsp;<small>Описание:</small>&nbsp;<input name='descr' type=text size=39>&nbsp;&nbsp;<br>
                           <small>Description:</small>&nbsp;<input name='endescr' type=text size=39>&nbsp;&nbsp;<input type=submit value='Создать'></td>
</tr>
<tr>
  <td>&nbsp;</td>
  <td align=center><small>20 симв. max</small></td>
  <td align=center><small>200 симв. max</small></td>
</tr></table></form>

<form align=center enctype='multipart/form-data' name='post2' method=POST action='?action=upload'>
<table width=850 cellspacing=0 cellpadding=0>
<tr>
  <td width=200 align=right><small><b>Загрузить файл:</b></small>&nbsp;&nbsp;&nbsp;</td>
  <td width=180 align=left><input size=18 name='newfile' type='file'><input type='hidden' name='path' value='".$_pth."'></td>
  <td width=470 align=left>&nbsp;<small>Описание:</small>&nbsp;<input name='descr' type=text size=39>&nbsp;&nbsp;<br>
                           <small>Description:</small>&nbsp;<input name='endescr' type=text size=39>&nbsp;&nbsp;<input type=submit value='Загрузить'></td>
</tr>
<tr>
  <td>&nbsp;</td>
  <td align=center><small>20 симв. max</small></td>
  <td align=center><small>200 симв. max</small></td>
</tr>
</table></form>


</body>
</html>";
  footer();
}//browse

}//class