View file dportal_0.2/dforum/modtopic.php

File size: 6.36Kb
<?
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("$perfix$r/$t");
$temdanar=$partopic[0];
foreach($partopic as $key => $val){
if($key!=0 & $val!=""){$artopic[]=$val; $shtop++;}
}

$arval=explode("<br/>", $artopic[$nto]);
$arval[5]=trim($arval[5]);
if($ver!="html"){ $arval[5]= str_replace("$", "$$", $arval[5]);}
if($arval[3]!=""){
if($login!="" & ($status=="moder" || $login==$arval[0])){
if($status!="moder" & ($step=="" || $step!=5)){$step=1;}



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


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

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

}



if($step==1){
include'arsmile.php';
$arval[3]=str_replace($conv2, $conv1, $arval[3]);

$substr_count = substr_count($arval[3],"<a href=");
if($substr_count>0){
$zdoar1=array("<a href=\"","\">","</a>");
$zdoar2=array("<p>","<p>","<p>");
$arval[3]=str_replace($zdoar1, $zdoar2, $arval[3]);

$ardzl=explode("<p>", $arval[3]);

foreach($ardzl as $key => $val){
$predea=$key-1;
if($predea>=0){ if($ardzl[$predea]==$val){$ardzl[$key]=""; } }
}

$arval[3]= implode("", $ardzl);}

if($ver!="wml"){print"<form method=\"post\" action=\"modtopic.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;r=$r&amp;pr=$pr&amp;t=$t&amp;nto=$nto&amp;step=5\" name=\"tema\">";}

if($ver=="wml"){print"
<input name=\"post$time\" maxlength=\"1000\" value=\"$arval[3]\"/><br/>";}
else{print"<input name=\"post\" maxlength=\"1000\" value=\"$arval[3]\"/><br/>";}


if($ver=="wml"){print"<anchor title=\"ok\">Сохранить
<go href=\"modtopic.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;r=$r&amp;pr=$pr&amp;t=$t&amp;nto=$nto&amp;step=5\" method=\"post\">
<postfield name=\"post\" value=\"$(post$time)\"/>
</go>
</anchor><br/>";
} else {
print"<input class=\"button\" type=\"submit\" value=\"Сохранить\"/></form>";}
}


if($step==5){
$post=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $post))));
if($post!=""){

include 'modtext.php';
$realtime=date("d.m.Y", $time);
$arval[3]="$post (редактировалось $login $realtime)";

$artopic[$nto]=implode("<br/>", $arval);
$artopic[$nto]="$artopic[$nto]\r\n";

$fp=@fopen("$perfix$r/$t","w");
@fputs($fp,$temdanar);
foreach ($artopic as $key => $value){
if($value!=""){@fputs($fp,$value);}
}
@fclose($fp);
@chmod("$perfix$r/$t",0777); 

print"Сохранено<br/>";

print"<a href=\"topic.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;r=$r&amp;t=$t\">Вернутся в тему</a> <br/>"; 


} else {print"Сообщение не может быть пустым. Для удаления сообщения обратитесь к модератору или администратору.";}

}


if($step==2){
$artopic[$nto]="";
$fp=@fopen("$perfix$r/$t","w");
@fputs($fp,$temdanar);
foreach ($artopic as $key => $value){
if($value!=""){@fputs($fp,$value);}
}
@fclose($fp);
@chmod("$perfix$r/$t",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"У вас недостаточно прав на редактирование этого сообщения!";}
} 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=\"modtopic.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=\"modtopic.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>";}



?>