Просмотр архива Ядро l2wap


<?php



  include('files/zag.php');



  if(isset($_COOKIE['aut']) and $_COOKIE['aut'] 

             == 1){





switch($go) {



default:



echo"&#x417;&#x434;&#x430;&#x440;&#x43E;&#x432;&#x430; GM!";

echo"<br/><br/><a href="gm.php?log=$log&amp;pas=$pas&amp;go=profil">&#x41F;&#x440;&#x43E;&#x444;&#x438;&#x43B;&#x44C; &#x438;&#x433;&#x440;&#x43E;&#x43A;&#x43E;&#x432;</a>";

echo"<br/><a href="gm.php?log=$log&amp;pas=$pas&amp;go=backupdata">Backup-data</a>";

echo"<br/><a href="gm.php?log=$log&amp;pas=$pas&amp;go=backupgame">Backup-game</a>";

echo"<br/><a href="gm.php?log=$log&amp;pas=$pas&amp;go=resbackup">&#x412;&#x43E;&#x441;&#x441;&#x442;&#x430;&#x43D;&#x43E;&#x432;&#x438;&#x442;&#x44C; &#x431;&#x44D;&#x43A;&#x430;&#x43F; &#x441; &#x434;&#x430;&#x43D;&#x43D;&#x44B;&#x43C;&#x438;</a>";

echo"<br/><a href="gm.php?log=$log&amp;pas=$pas&amp;go=chmodreg">&#x412;&#x44B;&#x441;&#x442;&#x430;&#x432;&#x438;&#x442;&#x44C; &#x43F;&#x440;&#x430;&#x432;&#x430; &#x43A; &#x440;&#x435;&#x433;&#x438;&#x441;&#x442;&#x440;&#x430;&#x446;&#x438;&#x44F;&#x43C;</a>";



break;



case 'profil':



echo "<small>&#x41B;&#x43E;&#x433;&#x438;&#x43D;:</small><br/>";

echo "<input name="loginn" maxlength="10" title="nick"/><br/>";

echo "<small><anchor title="go">OK<go href="gm.php?log=$log&amp;pas=$pas&amp;go=profiledit" method="post">";

echo "<postfield name="logi" value="$(loginn)"/>";

echo "</go></anchor></small><br/>";



break;



case 'profiledit':



$logi=$_POST['logi'];



$text = @file("data/reg/$logi.dat"); 

$udata = explode(":||:",$text[0]);

$aden=trim($udata[8]);

$exp=trim($udata[19]);

$lvl=trim($udata[9]);

$sp=trim($udata[31]);





echo "<small>&#x423;&#x440;&#x43E;&#x432;&#x435;&#x43D;&#x44C;:</small><br/>";

echo "<input name="lvl$ref" maxlength="100" value="$lvl"/><br/>";

echo "<small>&#x414;&#x435;&#x43D;&#x44C;&#x433;&#x438;:</small><br/>";

echo "<input name="aden$ref" maxlength="10" value="$aden"/><br/>";

echo "<small>&#x41E;&#x43F;&#x44B;&#x442;:</small><br/>";

echo "<input name="exp$ref" maxlength="10" value="$exp"/><br/>";

echo "<small>SP:</small><br/>";

echo "<input name="sp$ref" maxlength="100" value="$sp"/><br/>";



echo "<small><anchor title="go">OK<go href="gm.php?log=$log&amp;pas=$pas&amp;go=profilsave" method="post">";

echo "<postfield name="lvl2" value="$(lvl$ref)"/>";

echo "<postfield name="aden2" value="$(aden$ref)"/>";

echo "<postfield name="exp2" value="$(exp$ref)"/>";

echo "<postfield name="sp2" value="$(sp$ref)"/>";

echo "<postfield name="login2" value="$logi"/>";

echo "</go></anchor></small><br/>";



break;



case 'profilsave':



$login2=$_POST['login2'];



$fal = @file("data/reg/$login2.dat"); 

$uda = explode(":||:",$fal[0]);



$sp2=$_POST['sp2'];

$aden2=$_POST['aden2'];

$lvl2=$_POST['lvl2'];

$uda[19]=$_POST['exp2'];



$t=$uda[0].':||:'.$uda[1].':||:'.$uda[2].':||:'.$uda[3].':||:'.$uda[4].':||:'.$uda[5].':||:'.$uda[6].':||:'.$uda[7].':||:'.$aden2.':||:'.$lvl2.':||:'.$uda[10].':||:'.$uda[11].':||:'.$uda[12].':||:'.$uda[13].':||:'.$uda[14].':||:'.$uda[15].':||:'.$uda[16].':||:'.$uda[17].':||:'.$uda[18].':||:'.$uda[19].':||:'.$uda[20].':||:'.$uda[21].':||:'.$uda[22].':||:'.$uda[23].':||:'.$uda[24].':||:'.$uda[25].':||:'.$uda[26].':||:'.$uda[27].':||:'.$uda[28].':||:'.$uda[29].':||:'.$uda[30].':||:'.$sp2.':||:'.$uda[32].':||:'.$uda[33].':||:'.$uda[34].':||:'.$uda[35].':||:'.$uda[36].':||:'.$uda[37].':||:'.$uda[38].':||:'.$uda[39].':||:'.$uda[40].':||:';



$fp=fopen("data/reg/$login2.dat","w");

flock($fp,LOCK_EX);           

ftruncate($fp,0);                                                                 

fputs($fp,"$t");

fflush($fp);

flock($fp,LOCK_UN);

fclose($fp); 



echo"&#x41F;&#x440;&#x43E;&#x444;&#x438;&#x43B;&#x44C; &#x438;&#x437;&#x43C;&#x435;&#x43D;&#x435;&#x43D;!";



break;



case 'backupdata':



class zipfile

{



    var $datasec = array(); 

    var $ctrl_dir = array(); 

    var $eof_ctrl_dir = "x50x4bx05x06x00x00x00x00"; 

    var $old_offset = 0;



    function add_dir($name)



    {

        $name = str_replace("\", "/", $name);



        $fr = "x50x4bx03x04";

        $fr .= "x0ax00";   

        $fr .= "x00x00";   

        $fr .= "x00x00";   

        $fr .= "x00x00x00x00"; 

        $fr .= pack("V",0); 

        $fr .= pack("V",0); 

        $fr .= pack("V",0); 

        $fr .= pack("v", strlen($name) ); 

        $fr .= pack("v", 0 ); 

        $fr .= $name;

        $fr .= pack("V",$crc); 

        $fr .= pack("V",$c_len); 

        $fr .= pack("V",$unc_len); 

        $this -> datasec[] = $fr;

        $new_offset = strlen(implode("", $this->datasec));

        $cdrec = "x50x4bx01x02";

        $cdrec .="x00x00";    

        $cdrec .="x0ax00";    

        $cdrec .="x00x00";    

        $cdrec .="x00x00";   

        $cdrec .="x00x00x00x00"; 

        $cdrec .= pack("V",0); 

        $cdrec .= pack("V",0); 

        $cdrec .= pack("V",0); 

        $cdrec .= pack("v", strlen($name) ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $ext = "x00x00x10x00";

        $ext = "xffxffxffxff";

        $cdrec .= pack("V", 16 ); 

        $cdrec .= pack("V", $this -> old_offset ); 

        $this -> old_offset = $new_offset;

        $cdrec .= $name;

        $this -> ctrl_dir[] = $cdrec;

    }





    function add_file($data, $name)

    { $name = str_replace("\", "/", $name);

$fr = "x50x4bx03x04";

        $fr .= "x14x00";    

        $fr .= "x00x00";    

        $fr .= "x08x00";    

        $fr .= "x00x00x00x00"; 



        $unc_len = strlen($data);

        $crc = crc32($data);

        $zdata = gzcompress($data);

        $zdata = substr( substr($zdata, 0, strlen($zdata) - 4), 2); 

        $c_len = strlen($zdata);

        $fr .= pack("V",$crc); 

        $fr .= pack("V",$c_len); 

        $fr .= pack("V",$unc_len); 

        $fr .= pack("v", strlen($name) ); 

        $fr .= pack("v", 0 ); 

        $fr .= $name;

        $fr .= $zdata;

        $fr .= pack("V",$crc); 

        $fr .= pack("V",$c_len); 

        $fr .= pack("V",$unc_len); 

        $this -> datasec[] = $fr;

        $new_offset = strlen(implode("", $this->datasec));

        $cdrec = "x50x4bx01x02";

        $cdrec .="x00x00";    

        $cdrec .="x14x00";  

        $cdrec .="x00x00";   

        $cdrec .="x08x00";   

        $cdrec .="x00x00x00x00"; 

        $cdrec .= pack("V",$crc); 

        $cdrec .= pack("V",$c_len); 

        $cdrec .= pack("V",$unc_len);

        $cdrec .= pack("v", strlen($name) ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("v", 0 ); 

        $cdrec .= pack("V", 32 ); 



        $cdrec .= pack("V", $this -> old_offset ); 

        $this -> old_offset = $new_offset;



        $cdrec .= $name;

        $this -> ctrl_dir[] = $cdrec;

    }



    function file() { 

        $data = implode("", $this -> datasec);

        $ctrldir = implode("", $this -> ctrl_dir);

        return

            $data.

            $ctrldir.

            $this -> eof_ctrl_dir.

            pack("v", sizeof($this -> ctrl_dir)).    

            pack("v", sizeof($this -> ctrl_dir)). 

            pack("V", strlen($ctrldir)).   

            pack("V", strlen($data)).    

            "x00x00"; 

    }

}





$abort = ignore_user_abort(1);



if (0 == (bool) ini_get('safe_mode')){

    set_time_limit(600);

}









$zipfile = new zipfile();



$fdir = opendir('data/');

while($file = readdir($fdir)){



    if ($file != '.' and $file != '..'){



        if (is_file('data/'.$file)){$zipfile->add_file(file_get_contents('data/'.$file),$file);}



        if (is_dir('data/'.$file)){



            $sdir = opendir('data/'.$file);



            while($sfile = readdir($sdir)){



                if ($sfile != '.' and $sfile != '..'){



                    if (is_file('data/'.$file.'/'.$sfile)){$zipfile->add_file(file_get_contents('data/'.$file.'/'.$sfile), $file.'/'.$sfile);}



        if (is_dir('data/'.$file.'/'.$sfile)){



            $ssdir = opendir('data/'.$file.'/'.$sfile);

            while($ssfile = readdir($ssdir)){

                if ($ssfile != '.' and $ssfile != '..'){

                    if (is_file('data/'.$file.'/'.$sfile.'/'.$ssfile)){$zipfile->add_file(file_get_contents('data/'.$file.'/'.$sfile.'/'.$ssfile), $file.'/'.$sfile.'/'.$ssfile);}



}}}}}}}}



$save=$zipfile->file();



$fp=fopen("data.zip","w");  

flock($fp,LOCK_EX);                                                     

fputs($fp,"$save");

fflush($fp);

flock($fp,LOCK_UN);

fclose($fp);



if($fp){echo"Backup &#x443;&#x441;&#x43F;&#x435;&#x448;&#x43D;&#x43E; &#x441;&#x434;&#x435;&#x43B;&#x430;&#x43D;!";}



break;



}

}else{echo"<small>&#x41F;&#x430;&#x440;&#x43E;&#x43B;&#x44C; &#x438;&#x43B;&#x438; &#x43B;&#x43E;&#x433;&#x438;&#x43D; &#x43D;&#x435;&#x432;&#x435;&#x440;&#x435;&#x43D;!</small>";}





echo "</p></card></wml>"; 



?>