Просмотр файла dportal_0.2/gbyk/modgost.php

<?
include 'dan.php';

/*
		by Dionisij (c) 2006
		[email protected]
		Скрипт не предназначен для продажи!
		При распространении необходимо обговорить условия распространения с автором скрипта.
		Нарушение авторских прав преследуется по закону и по понятиям!
*/

include 'ver.php';

$zag="Модер-панель";
if($ver=="wml"){include 'wapzag.php';} else{include 'webzag.php';}

include'avt.php';

$partopic=@file("dat");
$temdanar=$partopic[0];
foreach($partopic as $key => $val){
if($val!=""){$artopic[]=$val; $shtop++;}
}

$arval=explode("<br/>", $artopic[$nto]);
$arval[5]=trim($arval[5]);
if($ver!="html"){ $arval[5]= str_replace("$", "$$", $arval[5]);}


if($status=="moder"){




if($step==""){
print"
<a href=\"modgost.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;nto=$nto&amp;step=2\">Удалить сообщение</a><br/>


<br/>
<small>
Данные отправителя: <br/>
$arval[4]<br/>
$arval[5]<br/>
</small><br/>

<a href=\"modgost.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;nto=$nto&amp;step=3\">Бан ip</a><br/>
<a href=\"modgost.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;nto=$nto&amp;step=4\">Бан ip+soft</a><br/>";

}





if($step==2){
$artopic[$nto]="";
$fp=@fopen("dat","w");
foreach ($artopic as $key => $value){
if($value!=""){@fputs($fp,$value);}
}
@fclose($fp);
@chmod("dat",0777); 

print"Удалено";
}


if($step==3){

$fp=@fopen("$banlist/$arval[5]","w");
@fclose($fp);
@chmod("$banlist/$arval[5]",0777); 

if($arval[0]!=""){
$aranuz=@file("$uzer/$arval[0]");
$aranuz=explode("<br/>", $aranuz[0]);
$aranuz[16]="ban";
$zap=implode("<br/>", $aranuz);
$fp=@fopen("$uzer/$arval[0]","w");
@fputs($fp,$zap);
@fclose($fp);
@chmod ("$uzer/$arval[0]", 0777);

if(!file_exists ("$group/banlist")){
$fp=@fopen("$group/banlist","w");
@fclose($fp);
@chmod("$group/banlist",0777); 
}

$fp = @fopen("$group/banlist","a");
@fputs($fp,"$arval[0]\r\n");
@fclose($fp);

}
print"Выполнено";

}


if($step==4){
if(!file_exists ("$banlist/$arval[5]")){
$fp=@fopen("$banlist/$arval[5]","w");
@fclose($fp);
@chmod("$banlist/$arval[5]",0777); }

$fp = @fopen("$banlist/$arval[5]","a");
@fputs($fp,"$arval[4]\r\n");
@fclose($fp);



if($arval[0]!=""){
$aranuz=@file("$uzer/$arval[0]");
$aranuz=explode("<br/>", $aranuz[0]);
$aranuz[16]="ban";
$zap=implode("<br/>", $aranuz);
$fp=@fopen("$uzer/$arval[0]","w");
@fputs($fp,$zap);
@fclose($fp);
@chmod ("$uzer/$arval[0]", 0777);

if(!file_exists ("$group/banlist")){
$fp=@fopen("$group/banlist","w");
@fclose($fp);
@chmod("$group/banlist",0777); 
}

$fp = @fopen("$group/banlist","a");
@fputs($fp,"$arval[0]\r\n");
@fclose($fp);

}
print"Выполнено";
}







} else {print"Сообщение не найдено!";}



print"</p><p align=\"center\">";
if($ver=="html"){print"<table style=\"text-align: center; width: 98%;\"
 border=\"1\" cellpadding=\"2\" cellspacing=\"2\">
  <tbody>
    <tr>
      <td
 style=\"background-color: rgb($color2);\" align=\"center\"
 valign=\"top\">";}
 
 
 
 print"<a href=\"index.php?ver=$ver&amp;pas=$pas&amp;login=$login\">Вернутся в гостевую</a><br/>";
 
  if($login=="") { print"<a href=\"../vxod.php?ver=$ver\">Вход</a><br/>";}
else {print"<a href=\"../opc.php?ver=$ver&amp;pas=$pas&amp;login=$login\">[$login]</a><br/>";}

 if($ver=="wml"){print"<a href=\"modgost.php?ver=html&amp;pas=$pas&amp;login=$login&amp;r=$r&amp;pr=$pr&amp;t=$t&amp;nto=$nto\">wap 2.0</a><br/>";}
 else{print"<a href=\"modgost.php?ver=wml&amp;pas=$pas&amp;login=$login&amp;r=$r&amp;pr=$pr&amp;t=$t&amp;nto=$nto\">wap 1.2</a><br/>";}
 
 print"<a href=\"$gen_link\">На главную</a>";
 if($ver=="html"){print"</td>
    </tr>
  </tbody>
</table>
</body>
</html>
";}
else{print"</p></card></wml>";}



?>