<?
include '../config.php';
$komu = "$admin_email"; ///// your email
$ind = "$homepage"; ///// your index site
$title = "Контакты";
$mails = "index.php"; ///// index mail
////////////////////////////////////////////////////////////////
if ($nax == "") { header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card title=\"$title\" ontimer=\"$mails\"><timer value=\"20\" />
<p>Вы не написали имя!
<br/><br/>
<a href=\"$mails\">Написать заново</a>
</p>
</card>
</wml>"; exit;} // no name
////////////////////////////////////////////////////////////////////
if ($mail == "")
{ header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card title=\"$title\" ontimer=\"$mails\"><timer value=\"20\" />
<p>Вы не написали e-mail!
<br/><br/>
<a href=\"$mails\">Написать заново</a>
</p>
</card>
</wml>"; exit;} // no mail
/////////////////////////////////////////////////////////////////////////
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)?)$", $mail))
{ header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card title=\"$title\" ontimer=\"$mails\"><timer value=\"20\" />
<p>Вы написали неправильный e-mail!
<br/><br/>
<a href=\"$mails\">Написать заново</a>
</p>
</card>
</wml>"; exit;} // no mail
////////////////////////////////////////////////////////////////////////
if ($piz == "") { header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card title=\"$title\" ontimer=\"$mails\"><timer value=\"20\" />
<p>Вы не написали текст письма!
<br/><br/>
<a href=\"$mails\">Написать заново</a>
</p>
</card>
</wml>"; exit;}
$host = gethostbyaddr($REMOTE_ADDR);
$tel = $HTTP_USER_AGENT;
$ip = getenv("REMOTE_ADDR");
/////////////////////////////////////////////////////////
$nax = str_replace("а","a",$nax);
$nax = str_replace("б","b",$nax);
$nax = str_replace("в","v",$nax);
$nax = str_replace("г","g",$nax);
$nax = str_replace("д","d",$nax);
$nax = str_replace("е","e",$nax);
$nax = str_replace("ё","e",$nax);
$nax = str_replace("ж","zh",$nax);
$nax = str_replace("з","z",$nax);
$nax = str_replace("и","i",$nax);
$nax = str_replace("й","i",$nax);
$nax = str_replace("к","k",$nax);
$nax = str_replace("л","l",$nax);
$nax = str_replace("м","m",$nax);
$nax = str_replace("н","n",$nax);
$nax = str_replace("о","o",$nax);
$nax = str_replace("п","p",$nax);
$nax = str_replace("р","r",$nax);
$nax = str_replace("с","s",$nax);
$nax = str_replace("т","t",$nax);
$nax = str_replace("у","u",$nax);
$nax = str_replace("ф","f",$nax);
$nax = str_replace("х","h",$nax);
$nax = str_replace("ц","c",$nax);
$nax = str_replace("ч","ch",$nax);
$nax = str_replace("ш","sh",$nax);
$nax = str_replace("щ","csh",$nax);
$nax = str_replace("ъ","'",$nax);
$nax = str_replace("ы","y",$nax);
$nax = str_replace("ь","'",$nax);
$nax = str_replace("э","e",$nax);
$nax = str_replace("ю","ju",$nax);
$nax = str_replace("я","ja",$nax);
$nax = str_replace("А","A",$nax);
$nax = str_replace("Б","B",$nax);
$nax = str_replace("В","V",$nax);
$nax = str_replace("Г","G",$nax);
$nax = str_replace("Д","D",$nax);
$nax = str_replace("Е","E",$nax);
$nax = str_replace("Ё","E",$nax);
$nax = str_replace("Ж","ZH",$nax);
$nax = str_replace("З","Z",$nax);
$nax = str_replace("И","I",$nax);
$nax = str_replace("Й","I",$nax);
$nax = str_replace("К","K",$nax);
$nax = str_replace("Л","L",$nax);
$nax = str_replace("М","M",$nax);
$nax = str_replace("Н","N",$nax);
$nax = str_replace("О","O",$nax);
$nax = str_replace("П","P",$nax);
$nax = str_replace("Р","R",$nax);
$nax = str_replace("С","S",$nax);
$nax = str_replace("Т","T",$nax);
$nax = str_replace("У","U",$nax);
$nax = str_replace("Ф","F",$nax);
$nax = str_replace("Х","H",$nax);
$nax = str_replace("Ц","C",$nax);
$nax = str_replace("Ч","CH",$nax);
$nax = str_replace("Ш","SH",$nax);
$nax = str_replace("Щ","CSH",$nax);
$nax = str_replace("Ъ","'",$nax);
$nax = str_replace("Ы","Y",$nax);
$nax = str_replace("Ь","'",$nax);
$nax = str_replace("Э","E",$nax);
$nax = str_replace("Ю","JU",$nax);
$nax = str_replace("Я","JA",$nax);
///////////////////////////////////////////////////////////////////////
$piz = str_replace("а","a",$piz);
$piz = str_replace("б","b",$piz);
$piz = str_replace("в","v",$piz);
$piz = str_replace("г","g",$piz);
$piz = str_replace("д","d",$piz);
$piz = str_replace("е","e",$piz);
$piz = str_replace("ё","e",$piz);
$piz = str_replace("ж","zh",$piz);
$piz = str_replace("з","z",$piz);
$piz = str_replace("и","i",$piz);
$piz = str_replace("й","i",$piz);
$piz = str_replace("к","k",$piz);
$piz = str_replace("л","l",$piz);
$piz = str_replace("м","m",$piz);
$piz = str_replace("н","n",$piz);
$piz = str_replace("о","o",$piz);
$piz = str_replace("п","p",$piz);
$piz = str_replace("р","r",$piz);
$piz = str_replace("с","s",$piz);
$piz = str_replace("т","t",$piz);
$piz = str_replace("у","u",$piz);
$piz = str_replace("ф","f",$piz);
$piz = str_replace("х","h",$piz);
$piz = str_replace("ц","c",$piz);
$piz = str_replace("ч","ch",$piz);
$piz = str_replace("ш","sh",$piz);
$piz = str_replace("щ","csh",$piz);
$piz = str_replace("ъ","'",$piz);
$piz = str_replace("ы","y",$piz);
$piz = str_replace("ь","'",$piz);
$piz = str_replace("э","e",$piz);
$piz = str_replace("ю","ju",$piz);
$piz = str_replace("я","ja",$piz);
$piz = str_replace("А","A",$piz);
$piz = str_replace("Б","B",$piz);
$piz = str_replace("В","V",$piz);
$piz = str_replace("Г","G",$piz);
$piz = str_replace("Д","D",$piz);
$piz = str_replace("Е","E",$piz);
$piz = str_replace("Ё","E",$piz);
$piz = str_replace("Ж","ZH",$piz);
$piz = str_replace("З","Z",$piz);
$piz = str_replace("И","I",$piz);
$piz = str_replace("Й","I",$piz);
$piz = str_replace("К","K",$piz);
$piz = str_replace("Л","L",$piz);
$piz = str_replace("М","M",$piz);
$piz = str_replace("Н","H",$piz);
$piz = str_replace("О","O",$piz);
$piz = str_replace("П","P",$piz);
$piz = str_replace("Р","R",$piz);
$piz = str_replace("С","S",$piz);
$piz = str_replace("Т","T",$piz);
$piz = str_replace("У","U",$piz);
$piz = str_replace("Ф","F",$piz);
$piz = str_replace("Х","H",$piz);
$piz = str_replace("Ц","C",$piz);
$piz = str_replace("Ч","CH",$piz);
$piz = str_replace("Ш","SH",$piz);
$piz = str_replace("Щ","CSH",$piz);
$piz = str_replace("Ъ","'",$piz);
$piz = str_replace("Ы","Y",$piz);
$piz = str_replace("Ь","'",$piz);
$piz = str_replace("Э","E",$piz);
$piz = str_replace("Ю","JU",$piz);
$piz = str_replace("Я","JA",$piz);
$message = "\n$nax:\n$piz\n\nINFO: $tel\nIP: $ip\nHOST: $host";
@mail("$komu", "$nax", "$message", "From: $mail");
header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card title=\"$title\" ontimer=\"$ind\"><timer value=\"20\" />
<p>Ваше письмо было успешно отправлено!<br/>
<a href=\"$ind\">На главную</a>
</p>
</card>
</wml>";
?>