Просмотр файла katrinka.ru/chat_add.php

Размер файла: 3.72Kb
  1. <?php
  2. include 'config.php';
  3. include 'guestbook/mylib.php';
  4. if (!checkagent($_SERVER['HTTP_USER_AGENT'])) { noemul(); exit; }
  5. list ($opname, $chatok) = check_op($_SERVER['REMOTE_ADDR']);
  6. if (!$chatok) { unk_op(); exit; }
  7. session_start();
  8. $reg=0;
  9. $lang=$_GET['lang'];
  10. $to=htmlspecialchars(trim($_GET['to']),ENT_QUOTES);
  11. $n=htmlspecialchars(trim($_GET['n']),ENT_QUOTES);
  12. $r=htmlspecialchars(trim($_GET['r']),ENT_QUOTES);
  13. if (!($conn=pg_connect("host=$dbhost port=$dbport dbname=$dbname user=$dbuser password=$dbpass"))) { exit; }
  14. if (isset($_SESSION['id'])) {
  15. $reg=1;
  16. $id=$_SESSION['id'];
  17. if (!isset($_SESSION['translit'])) {
  18. $res=pg_query($conn,"select translit,access from users where id='$id';");
  19. $_SESSION['translit']=pg_result($res,0,0);
  20. $_SESSION['access']=pg_result($res,0,1);
  21. }
  22. $translit=$_SESSION['translit'];
  23. $access=$_SESSION['access'];
  24. } else {
  25. if ((trim($_COOKIE['Login'])!='')&&(trim($_COOKIE['Password'])!='')) {
  26. $login=htmlspecialchars(trim($_COOKIE['Login']),ENT_QUOTES);
  27. $pass=htmlspecialchars(trim($_COOKIE['Password']),ENT_QUOTES);
  28. $res=pg_query($conn,"select id,translit,access from users where login='$login' and passwd='$pass';");
  29. if (pg_numrows($res)==1) {
  30. $id=pg_result($res,0,0);
  31. $translit=pg_result($res,0,1);
  32. $access=pg_result($res,0,2);
  33. $reg=1;
  34. $_SESSION['id']=$id;
  35. $_SESSION['translit']=$translit;
  36. $_SESSION['access']=$access;
  37. }
  38. }
  39. }
  40. # header("Cache-Control: no-cache");
  41. header("Content-type: text/vnd.wap.wml");
  42. ?>
  43. <?xml version="1.0" encoding="utf-8"?>
  44. <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml_1.2.dtd">
  45. <wml>
  46. <?php
  47. if ($lang=='eng')
  48. print "<card id=\"Sign\" title=\"Sign\" newcontext=\"true\">\n";
  49. else
  50. print "<card id=\"Sign\" title=\"&#x041D;&#x0430;&#x043F;&#x0438;&#x0441;&#x0430;&#x0442;&#x044C;\" newcontext=\"true\">\n";
  51. print "<p>\n";
  52. if ($to) {
  53. $res=pg_query($conn,"select login from users where id='$to';");
  54. if (pg_numrows($res)==1) {
  55. $nick=uconv(pg_result($res,0,0));
  56. }
  57. if (!$n) print "Private message to: ".$nick."<br/>\n";
  58. else print "Address to: ".$nick."<br/>\n";
  59. }
  60. pg_close($conn);
  61. if (!$reg) {
  62. print "Login:\n";
  63. print "<input name=\"login\" title=\"Login\" maxlength=\"15\"/><br/>\n";
  64. print "Password: <input name=\"pass\" type=\"password\" title=\"Password\" emptyok=\"false\" maxlength=\"15\"/><br/>\n";
  65. }
  66. if (!$translit) {
  67. ?>
  68. Convert from translit:
  69. <select name="tr" value="0">
  70. <option value="0">No</option>
  71. <option value="1">Yes</option>
  72. </select>
  73. <br/>
  74. <?php
  75. }
  76. if (($r==18)&&($to==0)) {
  77. if ($lang=='eng') {
  78. print "To:\n";
  79. } else {
  80. print "&#x041A;&#x043E;&#x043C;&#x0443;:\n";
  81. }
  82. print "<input type=\"text\" name=\"tto\" title=\"To\" value=\"\" maxlength=\"15\" /><br/>\n";
  83. }
  84. if ($lang=='eng')
  85. print "Your message:\n";
  86. else
  87. print "&#x0421;&#x043E;&#x043E;&#x0431;&#x0449;&#x0435;&#x043D;&#x0438;&#x0435;:\n";
  88. if (($access==4)||($id==1)) {
  89. print "<input type=\"text\" name=\"message\" title=\"Text\" value=\"\"/><br/>\n";
  90. } else {
  91. print "<input type=\"text\" name=\"message\" title=\"Text\" maxlength=\"150\" value=\"\"/><br/>\n";
  92. }
  93. ?>
  94. <anchor title="Ok">Ok<go href="chat_sign.php" method="post">
  95. <?php if (!$reg) {
  96. print "<postfield name=\"login\" value=\"$(login)\"/>\n";
  97. print "<postfield name=\"pass\" value=\"$(pass)\"/>\n";
  98. }
  99. print "<postfield name=\"lang\" value=\"".$_GET['lang']."\"/>\n";
  100. print "<postfield name=\"r\" value=\"".$r."\"/>\n";
  101. print "<postfield name=\"to\" value=\"".$to."\"/>\n";
  102. print "<postfield name=\"n\" value=\"".$n."\"/>\n";
  103. if (!$translit) print "<postfield name=\"tr\" value=\"$(tr)\"/>\n";
  104. if ($r==18) print "<postfield name=\"tto\" value=\"$(tto)\"/>\n";
  105. ?>
  106. <postfield name="message" value="$(message)"/>
  107. </go></anchor>
  108. </p>
  109. </card>
  110. </wml>