Просмотр файла darkworld/outclan.php

Большой форум,библиотека креативами
Размер файла: 3.27Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE);
include_once("files/antixak.php");

header("Content-type:text/vnd.wap.wml");
echo "<?xml version=\"1.0\" encoding=\"UTF-8\"?>";
echo "<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">";
echo "<wml>\n";
echo "<head><meta http-equiv=\"Cache-Control\" content=\"no-cache\" forua=\"true\"/></head>";
echo "<card id=\"index\" title=\"&#x41A;&#x43B;&#x430;&#x43D;\">";
echo "<p align=\"left\">";

$log = htmlspecialchars(stripslashes($log));
$pas = htmlspecialchars(stripslashes($pas));
/////////////////////////////////////////////////////
$text = @file("data/reg/$log.dat"); 
if ($text!=""){
$udata = explode(":||:",$text[0]);
$login=trim($udata[0]);
$password=trim($udata[1]);}
////////////////////////////////////////////////////////
if (md5($pas)==$password && $log==$login && $log!=="" && md5($pas)!=="") {

if($id!==$udata[24]){echo"<small>&#x41A;&#x43E;&#x433;&#x43E;-&#x442;&#x43E; &#x432;&#x44B;&#x433;&#x43D;&#x430;&#x442;&#x44C; &#x43D;&#x435; &#x443;&#x434;&#x430;&#x441;&#x442;&#x44C;&#x441;&#x44F;...</small>"; include_once"files/down.php"; exit;}

if(!@file("data/clan/$lider.dat")){echo"<small>&#x422;&#x430;&#x43A;&#x43E;&#x433;&#x43E; &#x43A;&#x43B;&#x430;&#x43D;&#x430; &#x43D;&#x435; &#x441;&#x443;&#x449;&#x435;&#x441;&#x442;&#x432;&#x443;&#x435;&#x442;!</small>"; include_once"files/down.php"; exit;}

if($udata[23]=="$log"){echo"<small>Вы лидер клана. Выйти из своего клана нельзя.</small>"; include_once"files/down.php"; exit; }

$file=file("data/clan/name/$lider.dat"); 

$fp=fopen("data/clan/name/$lider.dat","w");
flock ($fp,LOCK_EX);
for ($i=0;$i< sizeof($file);$i++) { if ($i==$id) {unset($file[$i]);} }
fputs($fp, implode("",$file));
flock ($fp,LOCK_UN);
fclose($fp);

$fa = @file("data/reg/$name.dat");
$udata = explode(":||:",$fa[0]);

$udata[23]="";
$udata[24]="";

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

$fp=fopen("data/reg/$name.dat","a+");
flock($fp,LOCK_EX);           
ftruncate($fp,0);                                                                 
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp); 

echo"<small>&#x41E;&#x43F;&#x435;&#x440;&#x430;&#x446;&#x438;&#x44F; &#x443;&#x441;&#x43F;&#x435;&#x448;&#x43D;&#x43E; &#x437;&#x430;&#x432;&#x435;&#x440;&#x448;&#x435;&#x43D;&#x430;.</small>";



}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>";}

include_once"files/down.php";
?>