Просмотр файла game/2/f_connect.php

Конкурс дизайнеров на 15000 рублей
Свежие Креативы и море позитива !!!
Размер файла: 8.21Kb 
  1. <?php
  2. error_reporting(0);
  3. extract($HTTP_GET_VARS);
  4.   extract($HTTP_POST_VARS);
  5.   extract($HTTP_COOKIE_VARS);
  6.   extract($HTTP_SESSION_VARS);
  7.   extract($HTTP_SERVER_VARS);
  8. $tmp=$QUERY_STRING;if($tmp=='') $tmp=$_SERVER["QUERY_STRING"];
  9. $tmp=urldecode($tmp);
  10. parse_str($tmp);
  11. if(eregi("[^a-z0-9_.-]",$login) || $ip=='217.144.164.164' || $login=='u.' || $login=='u.' || $login=='u.' || $login=='u.' || $login=='u.' || ($brouzer=='' && $ip=='83.149.48.211')){
  12. header ("Location: http://download.l2db.ru/original%20clients/L2_C5_Installer.zip"); exit;}
  13.  
  14.  
  15.  
  16. // константы должны совпадать с g.php
  17. $g_admin = "u.xahtep";
  18. $zero = "no_admin";
  19. $PHP_SELF = "g.php";
  20.  
  21.         setlocale (LC_CTYPE, 'ru_RU.CP1251');
  22.         function win2unicode ( $s ) { if ( (ord($s)>=192) & (ord($s)<=255) ) $hexvalue=dechex(ord($s)+848); if ($s=="Ё") $hexvalue="401"; if ($s=="ё") $hexvalue="451"; return("&#x0".$hexvalue.";");}
  23.         function translate($s) {return(preg_replace("/[А-яЁё]/e","win2unicode('\\0')",$s));}
  24.  
  25.         if (substr($login,0,2)!="u.") $login="u.".$login;
  26.         $login=strtolower($login);
  27.         $login=substr($login,0,15);
  28.  
  29.         clearstatcache();
  30.         if (file_exists("online/".$login) && filesize("online/".$login)!=1) {if ($zx==$zero) $p.="&zx=".$zx; msg("Нажмите на ссылку ниже<br/><a href=\"g.php?site=connect2&login=$login&p=$p\">Продолжить</a>");}
  31.  
  32.         // создаем файл c точкой (длина 1 байт), чтобы нельзя было войти на 2 сервера сразу, потом удалим, если не изменится
  33.         @ignore_user_abort(true);
  34.         $file = fopen ("online/".$login, "w");
  35.         if ($file!==false) {fwrite($file,".");fclose($file);} else msg("<small><b>Ошибка создания файла</small></b>");
  36.  
  37.         // проверим на других серверах
  38.         $tmp=file("servers.dat");
  39.         $srv=implode("",file("server.dat"));
  40.         for($i=1;$i<count($tmp);$i++) if ($srv!=$i) {
  41.                 $s="";
  42.                 $s=@implode("",@file(trim($tmp[$i])."f_site_common.php?login=".$login));
  43.                 if ($s=="yes") {$loc=""; msg("<small><b>Ваш персонаж находится на <a href=\"".trim($tmp[$i])."g.php?site=connect2&login=$login&p=$p&r=".rand(1,99)."\">сервере ".$i."</a>, чтобы играть на  <font color=\"red\"><u>сервере".$srv."</u></font>, подождите 10 минут и попробуйте войти заново.</b></small>","Мрак Подземелья");}
  44.                 if ($s!="no") {$loc=""; msg("Сервер не отвечает, попробуйте зайти на <a href=\"f_newserver.php?login=$login&amp;p=$p\">другой сервер</a> или повторите через несколько минут.","Мрак Подземелья");}
  45.                 }
  46.        //    echo 1;
  47. //echo "aa";
  48.         require_once("datafunc.php");
  49.         // получаем данные с основного сервера
  50.        //  echo 1;
  51.                         $res=GetData(substr($login,2),$p,$data,$srv);
  52.                         if ($res=="Логин не найден" || $res=="Неверный пароль") $res.="<br/><small><b>Если вы давно зарегистрировались, то попробуйте использовать логин u_".substr($login,2).", а не ".substr($login,2)."</b></small>";
  53.                         if ($res && $res!="Данные не найдены") msg($res,"Ошибка");
  54.  
  55.                 if ($res=="Данные не найдены") {        // новый персонаж
  56.                         $stmp="<small><b>Пол персонажа:
  57.                         <br/><select name=\"sex\" value=\"m\">
  58.                         <option value=\"m\">Мужcкой</option>
  59.                         <option value=\"f\">Жен.</option>
  60.                         </select><br/>
  61.                         Расcа:<br/><select name=\"rassa\">
  62.                         <option value=\"opk\">орк</option>
  63.                         <option value=\"elf\">эльф</option>
  64.                          <option value=\"temniy_elf\">темный эльф</option>
  65.                         <option value=\"chelovek\">человек</option>
  66.                          <option value=\"insent\">инсент</option>
  67.                          <option value=\"gnom\">гном</option>
  68.                          <option value=\"xobbit\">хоббит</option>
  69.                          <option value=\"arxon\">архон</option>
  70.                          <option value=\"neshit\">нежить</option>
  71.                          <option value=\"ogr\">огры</option>
  72.                         </select><br/>
  73.  Возраст:
  74.                         <br/><input name=\"age\" format=\"*N\" maxlength=\"2\"/><br/>
  75. <a href=\"/game/1/rassa/ork.php\">Орки</a>
  76. <br/>
  77. <a href=\"/game/1/rassa/elf.php\">Эльфы</a>  
  78. <br/>
  79. <a href=\"/game/1/rassa/darkelf.php\">Темные эльфы</a>  
  80. <br/>
  81. <a href=\"/game/1/rassa/chelovek.php\">Люди</a> 
  82. <br/>
  83. <a href=\"/game/1/rassa/insent.php\">инсенты</a>
  84. <br/>
  85. <a href=\"/game/1/rassa/gnom.php\">Гномы</a>
  86. <br/>
  87. <a href=\"/game/1/rassa/xobbit.php\">Хоббиты</a>
  88. <br/>
  89. <a href=\"/game/1/rassa/arxon.php\">Архоны</a>
  90. <br/>
  91. <a href=\"/game/1/rassa/neshit.php\">Нежить</a>
  92. <br/>
  93. <a href=\"/game/1/rassa/ogr.php\">Огры</a>
  94. <br/>
  95. [<a href=\"$PHP_SELF?login=$login&p=$p&sex=$(sex)&rassa=$(rassa)&age=$(age)&site=reg2\">Ок</a>]</b></small>";
  96.                         msg($stmp,"Регистрация");
  97.                         }
  98.  
  99.                 $auser=unserialize($data);
  100.                 if (!$auser["char"] || !$auser["skills"]) {$data=preg_replace('/s:(?:\d+):"(.*?)";/e',"calcser('\\1')",$data);$auser=unserialize($data);}
  101.                 $tuser=explode("|",$auser["user"]);
  102.                 $tp=$tuser[0];
  103.  
  104.         $res=GetGameTime(substr($login,2), $p, $t);
  105.         if ($res=="Неверный пароль") {$login=""; msg("<small><b>Неправильный пароль. Если вы сменили пароль, подождите 10 минут, проверьте список онлайн и войдите в игру заново.</b></small>");}
  106.         if ($res) msg($res,"Ошибка");
  107.         if ($tuser[6]>$t) $tacc=$tuser[6]; else $tacc=$t;
  108.       
  109.  
  110.         $srvmain=implode("",file("srvmain.dat"));
  111.  
  112.         // проверим клан
  113. 	//print_r($auser);
  114.         if (strpos($auser["char"],"*")===false) $clan=""; else $clan=substr($auser["char"],strpos($auser["char"],"*")+1,strrpos($auser["char"],"*")-strpos($auser["char"],"*")-1);
  115. 	//echo $clan;
  116. 	if ($clan && @implode("",@file($srvmain."f_common.php?inclan=$clan&login=$login"))=="no") $clan="no"; else $clan="yes";
  117.                                  //  echo 1;
  118.         // ок, получили данные, пробуем войти в игру
  119.  
  120.                 header ("Expires: Thu, 01 Jan 1970 00:00:01 GMT");
  121.                 header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
  122.                 header ("Cache-Control: no-cache, no-store, must-revalidate, max-age=0");
  123.                 header ("Pragma: no-cache");
  124.                 header ("Content-type:text/vnd.wap.wml;charset=utf-8");
  125.                      // echo 1;
  126. //echo "aa";
  127.         ob_start("translate");
  128.         if ($zx==$zero) $p.="&zx=".$zx;
  129.         $tnews=@implode("",@file($srvmain."f_common.php?newstime=1"));
  130.        // echo 1;
  131.         if(strlen($tnews)>5) $tnews="";
  132.         $s=@implode("",@file(@implode("",@file("serverurl.dat")).$srv."/g.php?site=connect2&sid=$login&login=$login&p=$p&f_c=$f_c&clan=$clan&tacc=$tacc&tnews=$tnews&ip=".$_SERVER["REMOTE_ADDR"]."&data=".urlencode($data)));
  133.       //   echo 1;
  134.         echo $s;
  135.         ob_end_flush();
  136.       //  echo 1;
  137.         clearstatcache();
  138.         if (filesize("online/".$login)==1 || strpos($s,"cnick=1")===false) @unlink("online/".$login);
  139.         @ignore_user_abort(false);
  140.  
  141.         die("");
  142.  
  143.  
  144. function calcser($s) {return "s:".strlen($s).":\"".$s."\";";}
  145. function msg($s,$title_v="Мрак Подземелья") {
  146.         global $login;
  147.                 header ("Expires: Thu, 01 Jan 1970 00:00:01 GMT");
  148.                 header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
  149.                 header ("Cache-Control: no-cache, no-store, must-revalidate, max-age=0");
  150.                 header ("Pragma: no-cache");
  151.                 header("Content-type:text/vnd.wap.wml;charset=utf-8");
  152.         ob_start("translate");
  153.         $s=str_replace("&amp;","&",$s);
  154.         $s=str_replace("&","&amp;",$s);
  155.         if (substr($s,0,2)!="<p") $s="<p>".$s;
  156.         echo "<?xml version=\"1.0\"?>\n<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">";
  157.         echo "
  158. <wml>
  159. <card title=\"$title_v\">";
  160. echo "
  161. $s
  162. </p>
  163. </card>
  164. </wml>";
  165.         ob_end_flush();
  166.         clearstatcache();
  167.         if (filesize("online/".$login)==1) @unlink("online/".$login);
  168.         @ignore_user_abort(false);
  169.         die("");
  170.         }