Просмотр файла waptchat/chat.php

<?

////////////////////////////////////////////////////////////////////////////
////         Автор скрипта: Трофимов Дмитрий Сергеевич aka dimidrol       // 
////                E-mail: [email protected]                          //
////            Home pages: http://www.trofimov.com.ru                    //
////              WAP SAIT: http://trofimov.com.ru/wap/                   //
////////////////////////////////////////////////////////////////////////////

$messa=7; //Кол сообщений на странице чата!

header("Content-type:text/vnd.wap.wml;charset=UTF-8");
print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card id=\"tes\" title=\"CHAT\">";

if($chat=="1")

{
echo "
<p>Ваш логин в чате
<input title=\"login\" name=\"login\" maxlength=\"10\"/><br/>
<anchor title=\"Ok\">BXOD<br/>
<go href=\"chat.php?chat=ad\" method=\"post\">
<postfield name=\"login\" value=\"$(login)\"/>
<postfield name=\"mess\" value=\"вошел в ".date("H:i:s",time())."\"/>
</go>
</anchor></p>
";

$user_agent_string    = getenv("HTTP_USER_AGENT");            
$host                 = gethostbyaddr($REMOTE_ADDR); 
$ip                   = $REMOTE_ADDR;    
$date                 = date("d-m-Y",time());                 
$time                 = date('H:i:s',time()); 
$text = "$user_agent_string::$host::$date::$time::$ip";
$fp=fopen("counter.txt","a");
fputs($fp,"$text \r\n");
fclose($fp);

}


if($chat=="ad")

{

$text = "$login::$mess";
$text=strip_tags($text);
$fp=@fopen("chat.txt","a"); 
@fputs($fp,"$text \r\n"); 
@fclose($fp);
print"
<p>Вы вошли! Можете приступить к перегоровам!
<anchor title=\"add\">ЖМИТЕ сюда!<br/>
<go href=\"chat.php?chat=2\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor></p>
";


}



if($chat=="2")

{

print"
<anchor title=\"add\">Написать<br/>
<go href=\"chat.php?chat=dob\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor>
:
<anchor title=\"obn\">Обновить<br/>
<go href=\"chat.php?chat=2\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor>
";


$xfile = @file("chat.txt");
$xfile = array_reverse($xfile);
for ($i=0;$i<$messa;$i++) {
 $udata = explode("::",$xfile[$i]);
 print "<p><b>$udata[0]</b>:$udata[1]<br/></p>";
}

}

if($chat=="3")

{

$text = "$login::$mess";
$text=strip_tags($text);
$fp=@fopen("chat.txt","a"); 
@fputs($fp,"$text \r\n"); 
@fclose($fp);

print"
<anchor title=\"add\">Написать<br/>
<go href=\"chat.php?chat=dob\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor>
:
<anchor title=\"obn\">Обновить<br/>
<go href=\"chat.php?chat=2\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor>
";

$xfile = @file("chat.txt");
$xfile = array_reverse($xfile);
for ($i=0;$i<$messa;$i++) {
 $udata = explode("::",$xfile[$i]);
 print "<p><b>$udata[0]</b>:$udata[1]<br/></p>";
}

}



if($chat=="dob")

{

echo "<p>Сообщение:
<input title=\"mess\" name=\"mess\"/><br/>
<anchor title=\"Ok\">OK<br/>
<go href=\"chat.php?chat=3\" method=\"post\">
<postfield name=\"mess\" value=\"$(mess)\"/>
<postfield name=\"login\" value=\"$login\"/>
</go>
</anchor><p/>

";

}

print "
<br/><a href=\"http://trofimov.com.ru/wap/\">WAPchat ver 0.1</a>
</card>
</wml>";

?>