<?
require_once("../include/varsfuncs.php");
if(!$flist&&!$ac){
 include("$instp/skins/$sk/_pl_crypt.php");
}else if($ac=="Crypter"){
 set_time_limit(9999);
 function cryptf($dir,$to,$f,$delc,$key){
  if(substr($dir,-1,1)!="/") $dir.="/";
  if(substr($to,-1,1)!="/") $to.="/";
   if(!$key)
     $c=base64_encode(implode('',file($dir.$f)));
   else 
     $c=mcrypt_encrypt(MCRYPT_3DES,$key,implode('',file($dir.$f)),MCRYPT_MODE_CFB);
   if($key) $ext=".krypt"; else $ext=".crypt";
   $fp=fopen($to.$f.$ext,"w+");
   fputs($fp,$c); fclose($fp);
   if($delc=='1') @unlink($dir.$f);
 }
 function cryptdir($dir,$d,$delc,$key){
  if(substr($dir,-1,1)!="/") $dir.="/";
  if($key) $ext=".krypt"; else $ext=".crypt";
  if(!@chdir($dir.$d.$ext)) @mkdir($dir.$d.$ext,0777);
  $z=opendir($dir.$d);
  while($s=readdir($z)){ if($s!="."&&$s!=".."){
    if(is_dir($dir.$d."/".$s)){
     cryptdir($dir.$d,$s,$delc);
    }else{cryptf($dir.$d,$dir.$d.$ext,$s,$delc);}
  }}
  if($delc) @rmdir($dir.$d);
 }
 if(substr($dir,-1,1)!="/") $dir.="/";
 for($i=0;$flist[$i];$i++){
  if(is_dir($dir.$flist[$i])){
    cryptdir($dir,$flist[$i],$delc,$key);
  }else{
    cryptf($dir,$dir,$flist[$i],$delc,$key);
  }
 }
 header("Location: $path"."index.php?dir=$dir&rand=".rand(0,999));
}else if($ac=="Décrypter"){
 set_time_limit(9999);
 if(substr($dir,-1,1)!="/") $dir.="/";
 function decryptdir($dir,$d,$delc){
  if(substr($dir,-1,1)!="/") $dir.="/";
  $t=substr($d,0,strlen($d)-6);
  if(!@chdir($dir.$t)) @mkdir($dir.$t,"");
  $z=opendir($dir.$d);
  while($s=readdir($z)){ if($s!="."&&$s!=".."){
    if(is_dir($dir.$d."/".$s)){
     decryptdir($dir.$d,$s,$delc);
    }else{decryptf($dir.$d,$dir.$t,$s,$delc);}
  }}
  if($delc) @rmdir($dir.$d);
 }
 function decryptf($dir,$to,$f,$delc){
  if(substr($dir,-1,1)!="/") $dir.="/";
  if(substr($to,-1,1)!="/") $to.="/";
   $o=substr($f,0,strlen($f)-6);
   $c=base64_decode(implode('',file($dir.$f)));	
   $fp=fopen($to.$o,"w+");
   fputs($fp,$c); fclose($fp);
   if($delc=='1') @unlink($dir.$f);
 }
 for($i=0;$flist[$i];$i++){
  if(@is_dir($dir.$flist[$i])){
    decryptdir($dir,$flist[$i],$delc);
  }else{
    decryptf($dir,$dir,$flist[$i],$delc);
  }
 }
 header("Location: $path"."index.php?dir=$dir&rand=".rand(0,999));
}
?>