<? // WR-anekdot v 1.0 // 23.11.04 г. // [email protected]
include "config.php";
print "<html>
<head>
<title>$fname</title>
<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">
<META HTTP-EQUIV=\"Cache-Control\" CONTENT=\"no-cache\">
<META content='text/html; charset=windows-1251' http-equiv=Content-Type>
<link rel=stylesheet type='text/css' href=style.css>
<SCRIPT language=JavaScript>
<!--
function x () {return;}
function FocusText() {
document.REPLIER.msg.focus();
document.REPLIER.msg.select();
return true; }
function DoSmilie(addSmilie) {
var revisedmsgage;
var currentmsgage = document.REPLIER.msg.value;
revisedmsgage = currentmsgage+addSmilie;
document.REPLIER.msg.value=revisedmsgage;
document.REPLIER.msg.focus();
return;
}
function DoPrompt(action) { var revisedmsgage; var currentmsgage = document.REPLIER.qmsgage.value; }
//-->
</SCRIPT>
</head>
<body onLoad='return FocusText();' bgcolor=$bagcolor>
<center><TABLE style=\"FILTER: glow(color=$bdcolor, strength=2)\"><a href=admin.php><h3>$fname</h3></a></table>
";
if ($pswrd != "$password")
{echo "<form action=\"admin.php?enter\" method=\"get\"><tr><td bgcolor=\"#face7d\" align=\"center\"><font face=\"Verdana\" size=\"2\" color=\"red\">Введите пароль</font></td></tr><tr><td bgcolor=\"#face7d\" align=\"center\"><input type=\"pswrd\" size=\"30\" value=\"\" name=\"pswrd\"></td></tr><tr><td bgcolor=\"#face7d\" align=\"center\"><input type=\"submit\" size=\"25\" value=\"Применить\"></td></tr>";}
else
{
print "<table border=0><tr><td>Так будет выглядеть окно:</td><td>";
// Выводим qq анекдотов
$lines = file($datafile);
// выбираем случайное число больше 0
$mrandom = rand($qq, sizeof($lines));
$i = $mrandom;
$n="0";
if ($i>$qq) {$a1=$i-$page; $u=$a1-$qq;} else {$a1=$i; $u=0;}
do {$a1--; $dt = explode("|", $lines[$a1]);
// заменяем текстовые смайлики на графические
$dt[0]=str_replace(":-))",$s1,$dt[0]);
$dt[0]=str_replace(":-)",$s2,$dt[0]);
$dt[0]=str_replace(":-P",$s3,$dt[0]);
$dt[0]=str_replace("8-)",$s4,$dt[0]);
$dt[0]=str_replace(":-(",$s5,$dt[0]);
$dt[0]=str_replace(":-O",$s6,$dt[0]);
$dt[0]=str_replace(";-)",$s7,$dt[0]);
$dt[0]=str_replace(":roll:",$s8,$dt[0]);
$dt[0]=str_replace(":rf:",$s9,$dt[0]);
$dt[0]=str_replace("8-(",$s10,$dt[0]);
$dt[0]=str_replace("`-(",$s11,$dt[0]);
$dt[0]=str_replace(":REDBOLD:",$s12, $dt[0]);
if ($a1>=0) {print"<table bgcolor=$acolor border=$brd bordercolor=$brdcolor cellpadding=5 cellspacing=1 width=$wdth>
<tr><td height=$heght><font color=$fontcolor>$dt[0]</font></td></tr>";
if ($podpis=="1") {print "<tr><td><center><b><a href=mailto:$dt[2]>$dt[1]</a> $dt[3]</B> <font size=-1>$dt[4]</font></td>";}
print "</table>";}
} while($a1 > $u);
print "</td></tr></table>";
print "<BR>
<table border=0 width=60% cellpadding=1 cellspacing=0 bgcolor=$bdcolor><tr><td>
<table border=0 width=100% cellpadding=1 cellspacing=0 bgcolor=$bdcolor><tr><td>
";
// Событие добавления сообщения //
if ($event =="add")
{
if ($name == "" || strlen($name) > $maxname) {print "<center><B>Вернитесь <a href='javascript:history.back(1)'>назад</a> вы не ввели имя, или вввели слишком длинное имя!</B></center>"; exit;}
if ($msg == "" || strlen($msg) > $maxmsg) {print "<center><B>Вернитесь <a href='javascript:history.back(1)'>назад</a> ваше сообщение или пустое или превышает $maxmsg символов.</B></center>"; exit;}
if (!eregi("^([0-9a-z]([-_.]?[0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\\.[a-wyz][a-z](fo|g|l|m|mes|o|op|pa|ro|seum|t|u|v|z)?)$", $email) and $email != "")
{print "<center><B>Вернитесь <a href='javascript:history.back(1)'>назад</a> и введите корректный E-mail адрес!</B></center>"; exit;}
print "<script language='Javascript'><!--
function reload() {location = \"admin.php?pswrd=$password\"}; setTimeout('reload()', 1500);
//--></script>
<center>Анекдот <B>успешно</B> добавлен
</td></tr><tr><td colspan=2 width=100% bgcolor=#FFFFFF>
<BR><BR><BR><center><table border=1 cellpadding=7 cellspacing=0 bordercolor=#224488 width=300><tr><td><center>
Спасибо <B>$name</B>, анекдот успешно добавлен. Через несколько секунд произойдёт автоматическое обновление.
Если этого не происходит, то для возврата нажмите <B><a href=\"admin.php?pswrd=$password\"> здесь</a></B> </td></tr></table></center><BR><BR><BR>";
// обрезаем лишние символы в емайле/имени/сообщении
$email=substr($email,0,30);
$msg=stripslashes($msg);
$msg=htmlspecialchars($msg);
$msg=str_replace("|"," ",$msg);
$msg=str_replace("\r\n", "<br>", $msg);
// производим запись данных в файл по шаблону: собщение|имя|емайл|дата|время
$text="$msg|$name|$email|$date|$time";
$fp=fopen($datafile,"a");
fputs($fp,"$text\r\n");
fclose($fp);
@chmod("$fp", 0644);
}
else
// Типо главной страницы
{
$lines = file($datafile);
$datasize = sizeof($lines);
print "
<center><b><font size=+1 color=$fcolor>Всего анекдотов в базе: <font color=#FF0000>$datasize</font>, добавь ещё!</font></b></center>
</td></tr><tr><td colspan=2 width=100% bgcolor=#FFFFFF>
<center><table><tr><td valign=top>
<B>Имя</B> и E-mail<BR>
<B>Анекдот</B>
<table width=90 height=70><tr><td valign=top>
<A href='javascript:%20x()' onclick=\"DoSmilie(' :-))');\">$s1</a>
<a href='javascript:%20x()' onclick=\"DoSmilie(' :-)');\">$s2</a>
<a href='javascript:%20x()' onclick=\"DoSmilie(' :-P');\">$s3</a>
<a href='javascript:%20x()' onclick=\"DoSmilie(' 8-)');\">$s4</a>
<a href='javascript:%20x()' onclick=\"DoSmilie(' :-(');\">$s5</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(' :-O');\">$s6</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(' ;-)');\">$s7</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(':roll:');\">$s8</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(':rf:');\">$s9</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(' 8-(');\">$s10</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(' `-(');\">$s11</a>
<A href='javascript:%20x()' onclick=\"DoSmilie(':REDBOLD: ');\"><font color=red><B>RB</b></font></a>
</tr></td></table>
</td><td>
<form action=admin.php?pswrd=$password&event=add method=post name=REPLIER>
<input type=text value='' name=name size=30>
<input type=text value='' name=email size=26><br>
<textarea cols=59 rows=15 size=500 name=msg></textarea>
<center><input type=submit value='Добавить'></form></td></tr></table>
";
// выводим список доступных номеров страниц вверху
$lines = file($datafile);
$a = count($lines);
$i=0;
print "</td></tr><tr><td colspan=2 width=100% bgcolor=$bdcolor>
<center><font color=$fcolor>Страницы: ";
for($i = 0; $i < $a;)
{$ii=1+$i/$qqadmin;
// подсветка номера текущей страницы
if ($page==$i) {$b1="<B>"; $b2="</B>";} else {$b1=""; $b2="";}
print "<a href=\"admin.php?pswrd=$password&page=$i\">$b1$ii$b2</a> "; $i=$i+$qqadmin;}
print "(дробление = <B>$qqadmin</B>)</font></center></td></tr><tr><td colspan=2 width=100% bgcolor=#FFFFFF>";
// Выводим qq сообщений на текущей странице.
$lines = file($datafile);
$data1size = sizeof($lines);
$i = count($lines);
$n="0";
if ($i>$qqadmin) {$a1=$i-$page; $u=$a1-$qqadmin;} else {$a1=$i; $u=0;}
do {$a1--; $dt = explode("|", $lines[$a1]);
// заменяем текстовые смайлики на графические
$dt[0]=str_replace(":-))",$s1,$dt[0]);
$dt[0]=str_replace(":-)",$s2,$dt[0]);
$dt[0]=str_replace(":-P",$s3,$dt[0]);
$dt[0]=str_replace("8-)",$s4,$dt[0]);
$dt[0]=str_replace(":-(",$s5,$dt[0]);
$dt[0]=str_replace(":-O",$s6,$dt[0]);
$dt[0]=str_replace(";-)",$s7,$dt[0]);
$dt[0]=str_replace(":roll:",$s8,$dt[0]);
$dt[0]=str_replace(":rf:",$s9,$dt[0]);
$dt[0]=str_replace("8-(",$s10,$dt[0]);
$dt[0]=str_replace("`-(",$s11,$dt[0]);
$dt[0]=str_replace(":REDBOLD:",$s12, $dt[0]);
if ($a1>=0) {print"<table bordercolor=$brdcolor cellpadding=5 cellspacing=1 width=100%>
<tr><td><font color=$fontcolor>$dt[0]</font></td></tr>";
print "<tr><td bgcolor=#DDDDDD><center><b><a href=mailto:$dt[2]>$dt[1]</a> $dt[3]</B> <font size=-1>$dt[4]
</font></td><td width=15 bgcolor=#22FF44><B><a href='admin.php?pswrd=$password&rd=$a1'>.P.</a></B></td><td width=15 bgcolor=#FF2244><B><a href='admin.php?pswrd=$password&id=$a1'>.X.</a></B></td><HR width=98% size=-1 color=#224488>";}
print "</table>";
} while($a1 > $u);
print "</td></tr></table>";
//<tr><td width=15% height=90><center><b><a href=mailto:$dt[2]>$dt[1]</a><BR><BR>$dt[3]</B><BR><font size=-1>$dt[4]</font></td>
//<td width=50%>$dt[0]</td></tr></table>";}
//} while($a1 > $u);
// выводим список доступных номеров страниц внизу
$lines = file($datafile);
$a = count($lines);
print "</td></tr><tr><td colspan=2 width=100% bgcolor=$bdcolor>
<center><font color=$fcolor>Страницы: ";
for($i = 0; $i < $a;)
{$ii=1+$i/$qqadmin;
// подсветка номера текущей страницы
if ($page==$i) {$b1="<B>"; $b2="</B>";} else {$b1=""; $b2="";}
print "<a href=\"admin.php?pswrd=$password&page=$i\">$b1$ii$b2</a> "; $i=$i+$qqadmin;}
print "(дробление = <B>$qqadmin</B>)</font></center>";
}
// Блок используется для удаления выбранного сообщения
if ($id !="")
{
//$id++;
$file=file("anekdots.dat");
$fp=fopen("anekdots.dat","w");
for ($i=0;$i< sizeof($file);$i++) { if ($i==$id) {unset($file[$i]);} }
fputs($fp, implode("",$file));
fclose($fp);
$id ="";
print "<script language='Javascript'><!--
function reload() {location = 'admin.php?pswrd=$password'}; setTimeout('reload()',0);
//--></script>";
}
}
print "</td></tr></table></td></tr></table>
<center><font size=-2>Copyrights (C) <a href='http://wr.kovostok.ru'>WR</a></font>
</body></html>";
?>