',$text); $text=preg_replace("/\n/",'
',$text); $text=preg_replace("/\\\$/",'$',$text); $text=preg_replace("/\r/",'',$text); $text=preg_replace("/\\\/",'\',$text); // если magic_quotes включена - чистим везде СЛЭШи в этих случаях: одиночные (') и двойные кавычки ("), обратный слеш (\) if (get_magic_quotes_gpc()) { $text=str_replace("\"",'"',$text); $text=str_replace("\'",'\'',$text); $text=str_replace("\\",'\',$text); } $text=str_replace("\r\n","
",$text); $text=str_replace("\n\n",'

',$text); $text=str_replace("\n",'
',$text); $text=str_replace("\t",'',$text); $text=str_replace("\r",'',$text); $text=str_replace(' ',' ',$text); return $text; } // Функция содержит ПРОДОЛЖЕНИЕ ШАПКИ. Вызывается: addtop(); function addtop() { global $wrfname,$fskin,$date,$time; // ищем КУКи и выводим ИМЯ if (isset($_COOKIE['wrfcookies'])) {$wrfc=$_COOKIE['wrfcookies']; $wrfc=replacer($wrfc); $wrfc=explode("|", $wrfc); $wrfname=$wrfc[0];} else {unset($wrfname); unset($wrfpass); $wrfpass="";} echo''; if (isset($wrfname)) {print "Ваш профиль  Выход [$wrfname]"; $name=strtolower($wrfname); if (is_file("data-pm/$name.dat")) {$linespm=file("data-pm/$name.dat"); $pmi=count($linespm); print" [Есть сообщения в ПМ: $pmi шт.]";} } if (!isset($_COOKIE['wrfcookies']) and !isset($_GET['id'])) {print " Регистрация   Вход";} if (is_file("$fskin/tiptop.html")) include("$fskin/tiptop.html"); // подключаем дополнение к ВЕРХУШКе print"Сегодня: $date - $time"; return true;} function prcmp ($a, $b) {if ($a==$b) return 0; if ($a<$b) return -1; return 1;} // Функция сортировки function nospam() { global $max_key,$rand_key; // Функция АНТИСПАМ 2011 ! if (array_key_exists("image", $_REQUEST)) { $num=replacer($_REQUEST["image"]); for ($i=0; $i<10; $i++) {if (md5("$i+$rand_key")==$num) {imgwr($st,$i); die();}} } $xkey=""; mt_srand(time()+(double)microtime()*1000000); $dopkod=mktime(0,0,0,date("m"),date("d"),date("Y")); // доп.код: меняется каждые 24 часа $stime=md5("$dopkod+$rand_key");// доп.код echo''; $nummax=0; for ($i=0; $i<=$max_key; $i++) { $snum[$i]=mt_rand(0,9); $psnum=md5($snum[$i]+$rand_key+$dopkod); $secret=mt_rand(0,1); $styles='bgcolor=#EEEEEE'; if ($nummax<3) { if ($secret==1 or $i==0) {$styles='bgcolor=#FFFF00'; $xkey=$xkey.$snum[$i]; $nummax++;}} echo "\r\n";} $xkey=md5("$xkey+$rand_key+$dopkod"); //число + ключ из config.php + код меняющийся кажые 24 часа print"

Защитный код:

\n

(введите цифры, которые на жёлтом фоне)

"; return; } function addmsg($qm) { // ФУНКЦИЯ добавления темы/сообщения global $wrfname,$maxname,$canupfile,$antispam,$max_key,$rand_key,$max_upfile_size,$smile,$smiles,$valid_types,$datadir; //Проверка ЗАПРЕТА IP-пользователя на добавление объявлений (файл bad_ip.dat) $ip=$_SERVER['REMOTE_ADDR']; // определяем IP юзера if (is_file("$datadir/bad_ip.dat")) { $lines=file("$datadir/bad_ip.dat"); $i=count($lines); if ($i>0) {do {$i--; $idt=explode("|", $lines[$i]); if ($idt[0]===$ip) exit("

Админитратор заблокировал для Вашего IP: $ip
возможность добавлять что-либо по следующей причине:

$idt[1].

Вам разрешено просматривать сообщения,
а вот ДОБАВЛЯТЬ ТЕМЫ/СООБЩЕНИЯ категорически ЗАПРЕЩЕНО!

"); } while($i > "1");} unset($lines);} echo'Имя '; if (!isset($wrfname)) print " E-mail "; else { if (isset($_COOKIE['wrfcookies'])) {$wrfc=$_COOKIE['wrfcookies']; $wrfc=htmlspecialchars($wrfc); $wrfc=stripslashes($wrfc); $wrfc=explode("|", $wrfc); $wrfpass=replacer($wrfc[1]);} else {unset($wrfpass); $wrfpass="";} print "$wrfname";} echo' Сообщение

Для вставки имени, кликните на точку рядом с ним.

Смайлики:

'; if ($smile==TRUE) {$i=count($smiles)-1; for($k=0; $k<$i; $k=$k+2) {$j=$k+1; print" ";} } print"Ещё смайлы

"; if ($canupfile==TRUE and isset($wrfname)) { $max=round($max_upfile_size/10.24)/100; print "

$qm

Добавление "; foreach($valid_types as $v) print "$v, "; print" максимально допустимый размер: $max Кб.

";} if ($antispam==TRUE and !isset($wrfname)) nospam(); // АНТИСПАМ ! echo'     '; return;} // КОНЕЦ функции-формы ДОБАВЛЕНИЯ ТЕМЫ/ОТВЕТА // Выбран ВЫХОД из форума - очищаем куки if(isset($_GET['event'])) {if ($_GET['event']=="clearcooke") {setcookie("wrfcookies","",time()); Header("Location: $furl"); exit;}} // ДОБАВЛЕНИЕ ТЕМЫ или ОТВЕТА - ШАГ 1 if(isset($_GET['event'])) { //Проверка ЗАПРЕТА IP-пользователя на добавление объявлений (файл bad_ip.dat) $ip=$_SERVER['REMOTE_ADDR']; // определяем IP юзера if (is_file("$datadir/bad_ip.dat")) { $lines=file("$datadir/bad_ip.dat"); $i=count($lines); if ($i>0) {do {$i--; $idt=explode("|", $lines[$i]); if ($idt[0]===$ip) exit("

Админитратор заблокировал для Вашего IP: $ip
возможность добавлять что-либо по следующей причине:

$idt[1].

Вам разрешено просматривать сообщения,
а вот ДОБАВЛЯТЬ ТЕМЫ/СООБЩЕНИЯ категорически ЗАПРЕЩЕНО!"); } while($i > "1");} unset($lines);} if ($stop==TRUE) exit("Временно добавление тем и сообщений приостановлено!"); if (($_GET['event']=="addtopic") or ($_GET['event']=="addanswer")) { if (isset($_POST['name'])) $name=$_POST['name']; $name=trim($name); // Вырезает ПРОБЕЛьные символы $zag=$_POST['zag']; $msg=$_POST['msg']; $fid=$_GET['id']; if ($_GET['event']=="addanswer") $id=substr($fid,3,4); if (strlen($fid)>3) $fid=substr($fid,0,3); if (isset($_POST['who'])) $who=$_POST['who']; else $who=""; if (isset($_POST['email'])) $email=$_POST['email']; else $email=""; if (isset($_POST['page'])) $page=$_POST['page']; if (isset($_POST['maxzd'])) $maxzd=$_POST['maxzd']; else $maxzd="0"; if ($maxzd==null) $maxzd="0"; if ((!ctype_digit($maxzd)) or (strlen($maxzd)>2)) exit("$back. Попытка взлома по звёздам или ошибка в файле статистики"); if ($nosssilki==TRUE and $_GET['event']=="addanswer" and preg_match("/href|url|http|www|\.ru|\.com|\.net|\.info|\.org/i",$msg) and preg_match("/\.jpg|\.gif|\.jpeg|\.png/is",$msg)<>TRUE and !isset($wrfname)) exit("Уважаемый гость с IP $ip , если Вы хотите делиться ссылками с другими пользователями форума - пройдите регистрацию.
Если Вы спаммер - выйдете вон!

"); // защита по топику fid if (!ctype_digit($fid) or strlen($fid)>3) exit("$back. Попытка взлома через номер рубрики. Номер должен содержать только цифры и быть менее 4 символов"); //--А-Н-Т-И-С-П-А-М--проверка кода-- if ($antispam==TRUE and !isset($_COOKIE['wrfcookies'])) { if (!isset($_POST['usernum']) or !isset($_POST['xkey']) or !isset($_POST['stime']) ) exit("данные из формы не поступили!"); $usernum=replacer($_POST['usernum']); $xkey=replacer($_POST['xkey']); $stime=replacer($_POST['stime']); $dopkod=mktime(0,0,0,date("m"),date("d"),date("Y")); // доп.код. Меняется каждые 24 часа $usertime=md5("$dopkod+$rand_key");// доп.код $userkey=md5("$usernum+$rand_key+$dopkod"); if (($usertime!=$stime) or ($userkey!=$xkey)) exit("введён ОШИБОЧНЫЙ код!");} // проходим по всем разделам и топикам - ищем запращиваемый // на тот случай, если mainforum.dat - пуст, подключаем резервную копию $realbase="1"; if (is_file("$datadir/mainforum.dat")) $mainlines=file("$datadir/mainforum.dat"); if (!isset($mainlines)) $datasize=0; else $datasize=sizeof($mainlines); if ($datasize<=0) {if (is_file("$datadir/copy.dat")) {$realbase="0"; $mainlines=file("$datadir/copy.dat"); $datasize=sizeof($mainlines);}} if ($datasize<=0) exit("$back. Проблемы с Базой данных, файл данных пуст - обратитесь к администратору"); $i=count($mainlines); $realfid=null; $fotodetali="|||"; do {$i--; $dt=explode("|", $mainlines[$i]); if ($dt[0]==$fid) {$realfid=$i; if ($dt[1]=="razdel") exit("$back. Данной ветки форума не существует");} // присваиваем $realfid - № п/п строки } while($i>0); if (!isset($realfid)) exit("$back. Ошибка с номером рубрики. Она не существует в базе"); $dt=explode("|",$mainlines[$realfid]); if (is_file("$datadir/topic$fid.dat")) {$tlines=file("$datadir/topic$fid.dat"); $tc=count($tlines)-2; $i=$tc+2; $ok=null; // нужно пробежаться по топику, найти тему. Если есть - нормуль, нету - значит добавление сообщений ЗАПРЕЩЕНО! if ($_GET['event']=="addanswer") { do {$i--; $tdt=explode("|", $tlines[$i]); if ($tdt[7]=="$fid$id") {$ok=1; if ($tdt[8]=="closed") exit("$back тема закрыта и добавление сообщений запрещено!"); } } while($i>0); if ($ok!=1) exit("$back тема закрыта и добавление сообщений запрещено!"); } } else $tc="2"; if ($dt[11]>0) {if ($tc>=$dt[11]) exit("$back. Превышено ограничение на кол-во допустимых тем в данной рубрике! Не более $dt[11] тем!");} // проверка Логина/Пароля юзера. Может он хакер, тогда облом ему // Этап 1 if (isset($_POST['userpass'])) $userpass=replacer($_POST['userpass']); // получаем и обрабатываем пароль юзера из файлов else $userpass=""; $realname=""; if (isset($_COOKIE['wrfcookies'])) { $wrfc=$_COOKIE['wrfcookies']; $wrfc=htmlspecialchars($wrfc); $wrfc=stripslashes($wrfc); $wrfc=explode("|", $wrfc); $wrfname=$wrfc[0]; $wrfpass=$wrfc[1]; } else {$who=null; $wrfname=null; $wrfpass=null;} // Этап 2 if ($who!=null) { $who=0; $ok=FALSE; if ($wrfname!=null & $wrfpass!=null) { $lines=file("$datadir/usersdat.php"); $i=count($lines); do {$i--; $rdt=explode("|", $lines[$i]); if (isset($rdt[1])) { $realname=strtolower($rdt[0]); if (strtolower($wrfname)===$realname & $wrfpass===$rdt[1] & $userpass===$rdt[1]) { $name=$wrfname; $who="да"; $ok="$i";}} } while($i > "1"); if ($ok==FALSE) {setcookie("wrfcookies","",time()); exit("Ошибка при работе с КУКИ! Вы не сможете оставить сообщение, попробуйте подать его как гость. Ваш логин и пароль не найдены в базе данных, попробуйте зайти на форум вновь. Если ошибка повторяется - обратитесь к администратору форума.");} }} print""; if ($_GET['event']=="addtopic" and $cangutema==FALSE and !isset($wrfname)) exit("Администратор запретил гостям создавать темы!

"); if ($_GET['event']=="addanswer" and $cangumsg==FALSE and !isset($wrfname)) exit("Администратор запретил гостям отвечать в темах!

"); if (isset($_FILES['file']['name'])) { // ЕСЛИ ДОБАВЛЯЕМ ФАЙЛ $fotoname=replacer($_FILES['file']['name']); if (strlen($fotoname)>3) { $fotosize=$_FILES['file']['size']; // Имя и размер файла //---- ЗАЩИТЫ от ВЗЛОМА ----- // 1. Проверяем РАСШИРЕНИЕ $ext = strtolower(substr($fotoname, 1 + strrpos($fotoname, "."))); if (!in_array($ext, $valid_types)) {echo "ФАЙЛ НЕ загружен. Возможные причины:
- разрешена загрузка только файлов с такими расширениями: "; $patern=""; foreach($valid_types as $v) print"$v, "; echo'
- Вы пытаетесь загрузить файл с двойным расширением;
- неверно введён адрес или выбран испорченный файл;
'; exit;} // 2. считаем КОЛ-ВО ТОЧЕК в выражении - если большей одной - СВОБОДЕН! $findtchka=substr_count($fotoname, "."); if ($findtchka>1) exit("ТОЧКА встречается в имени файла $findtchka раз(а). Это ЗАПРЕЩЕНО!
\r\n"); // 2. если в имени есть .php, .html, .htm - свободен! $bag="Извините, но в имени ФАйла запрещено использовать .php, .html, .htm"; if (preg_match("/\.php/i",$fotoname)) exit("Вхождение .php найдено. $bag"); if (preg_match("/\.html/i",$fotoname)) exit("Вхождение .html найдено. $bag"); if (preg_match("/\.htm/i",$fotoname)) exit("Вхождение .htm найдено. $bag"); // 3. защищаем от РУССКИХ букв в имени файла и проверка РАСШИРЕНИЯ файла $patern=""; foreach($valid_types as $v) $patern.="$v|"; if (!preg_match("/^[a-z0-9\.\-_]+\.(".$patern.")+$/is",$fotoname)) exit("$fotoname -
Запрещено использовать РУССКИЕ буквы в имени файла, а также запрещено загружать файлы с расширением отличным от заданных!!"); // 4. Проверяем, может быть файл с таким именем уже есть на сервере if (file_exists("$filedir/$fotoname")) exit("$back. Файл с таким именем уже существует на сервере! Либо измените имя на другое,
либо обновите страницу - возможно Вы пытаетесь добавить сообщение и файл повторно!!"); // 5. Размер файла $fotoksize=round($fotosize/10.24)/100; // размер ЗАГРУЖАЕМОГО файла в Кб. $fotomax=round($max_upfile_size/10.24)/100; // максимальный размер файла в Кб. if ($fotoksize>$fotomax) exit("Вы превысили допустимый размер файла!
Максимально допустимый размер: $fotomax Кб.
Вы пытаетесь загрузить файл размером: $fotoksize Кб!"); // ЕСЛИ включен порядок присвоения файлу случайного имени при загрузке - генерируем случайное имя if ($random_name==TRUE) {do $key=mt_rand(100000,999999); while (file_exists("$filedir/$key.$ext")); $fotoname="$key.$ext";} if (copy($_FILES['file']['tmp_name'], $filedir."/".$fotoname)) {print "

Файл УСПЕШНО загружен: $fotoname (Размер: $fotosize байт)"; $fotodetali="1|$fotoname|$fotosize|";} else echo "ОШИБКА загрузки файла - $fotoname...\n"; }} $tektime=time(); $name=wordwrap($name,30,' ',1); // разрываем длинные строки $zag=wordwrap($zag,50,' ',1); $name=str_replace("|","I",$name); $who=str_replace("|","|",$who); $email=str_replace("|","|",$email); $zag=str_replace("|","|",$zag); $msg=str_replace("|","|",$msg); $smname=$name; if (strlen($name)>18) {$smname=substr($name,0,18); $smname.="..";} $smzag=$zag; if (strlen($zag)>24) {$smzag=substr($zag,0,24); $smzag.="..";} // БЛОК ГЕНЕРИРУЕТ СЛЕДУЮЩИЙ ПО ПОРЯДКУ НОМЕР ТЕМЫ, начиная просмотр с 1000 // считываем весь файл с темами в память if ($_GET['event']=="addtopic") { $id=1000; $id="$fid$id"; $allid=null; $records=file("$datadir/topic$fid.dat"); $imax=count($records); $i=$imax; if ($i > 0) { do {$i--; $rd=explode("|",$records[$i]); $allid[$i]=$rd[7]; } while($i>0); //natcasesort($allid); // сортируем по возрастанию do $id++; while(in_array($id,$allid) or is_file("$datadir/$id.dat")); } else $id=$fid."1000"; $id=substr($id,3,4); // Нам нужен чистый ID из 4-х символов } // if (event==addtopic) // генерируем имя файлу с темой - СТАРЫЙ механизм //if ($_GET['event']=="addtopic") { if ($fid<10) $add="0"; else $add=""; //do $id=mt_rand(1000,9999); while (file_exists("$datadir/$add$fid$id.dat")); //$id="$add$fid$id"; } if (strlen($id)>8) exit("$back. Номер темы должен быть числом. Критическая ошибка скрипта или попытка взлома"); if (strlen(ltrim($zag))<3) exit("$back ! Ошибка в вводе данных заголовка!"); $ip=$_SERVER['REMOTE_ADDR']; // определяем IP юзера $text="$name|$who|$email|$zag|$msg|$date|$time|$fid$id||$tektime|$smname|$smzag|$fotodetali|$ip||||"; $text=replacer($text); $exd=explode("|",$text); $name=$exd[0]; $zag=$exd[3]; $smname=$exd[10]; $smzag=$exd[11]; $smmsg=$exd[4]; if (!isset($name) || strlen($name) > $maxname || strlen($name) <1) exit("$back Ваше Имя пустое, или превышает $maxname символов!"); if (preg_match("/[^(\\w)|(\\x7F-\\xFF)|(\\-)]/",$name)) exit("$back Ваше имя содержит запрещённые символы. Разрешены русские и английские буквы, цифры, подчёркивание и тире."); if (strlen(ltrim($zag))<3 || strlen($zag) > $maxzag) exit("$back Слишком короткое название темы или название превышает $maxzag символов!

Файл РУБРИК несуществует! Зайдите в админку и создайте рубрики!"); $error=FALSE; $frname=null; $frtname=""; $rfid=""; // ДЛЯ ссылки типа razdel= if (isset($_GET['razdel'])) { do {$i--; $dt=explode("|", $mainlines[$i]); if ($dt[0]==$_GET['razdel']) {$rfid=$i; $frname="$dt[2] ->";} } while($i >0); $i=$imax;} if (isset($_GET['id'])) { // Блок выводит в статусной строке: ТЕМА -> РАЗДЕЛ -> ФОРУМ $id=$_GET['id']; if (strlen($id)<=3 and !is_file("$datadir/topic$id.dat")) $error="ый Вами раздел"; if (strlen($id)> 3 and !is_file("$datadir/$id.dat")) $error="ая Вами тема"; if (!ctype_digit($id)) $error="ая Вами тема или раздел"; if (isset($_GET['quotemsg'])) $error=TRUE; if(strlen($id)>3) {$fid=substr($id,0,3); $id=substr($id,3,4);} else $fid=$id; // проходим по всем разделам и топикам - ищем запрашиваемый do {$i--; $dt=explode("|", $mainlines[$i]); if ($dt[0]==$fid) { $frname="$dt[1] ->"; if (isset($dt[11])) { if($dt[11]>0) $maxtem=$dt[11]; else $maxtem="999";}} } while($i >0); //$frtname="1"; $frname="2"; $fname="3"; // Блок считывает название темы для отображения в шапке форума if (strlen($id)>3 and is_file("$datadir/topic$fid.dat")) { $lines=file("$datadir/topic$fid.dat"); $imax=count($lines); $i=$imax; do {$i--; $dt=explode("|",$lines[$i]); if($dt[7]=="$fid$id") $frtname="$dt[3] ->"; } while ($i>0); } if ($error==TRUE) { // ЗАПРЕЩАЕМ ИНДЕКСАЦИЮ страниц с цитированием / УДАЛЁННЫЕ РАЗДЕЛЫ / ТЕМЫ! $topurl="$fskin/top.html"; ob_start(); include $topurl; $topurl=ob_get_contents(); ob_end_clean(); $topurl=str_replace("",'',$topurl); print"$topurl"; if (strlen($error)>1) exit("

Извините, но запрашиваем$error отсутствует.
Рекомендую перейти на главную страницу форума по этой ссылке,
и найти интересующую Вас тему.

"); } // здесь проверяем СУЩЕСТВУЕТ ЛИ СТРАНИЦА, на которую пришёл юзер if (strlen($id)==3) { $lines=file("$datadir/topic$id.dat"); $imax=count($lines); if (isset($_GET['page'])) $page=$_GET['page']; else $page=1; $maxikpage=ceil($imax/$qqmain); if ($page>$maxikpage and $imax!=0) { $topurl="$fskin/top.html"; ob_start(); include $topurl; $topurl=ob_get_contents(); ob_end_clean(); $topurl=str_replace("",'',$topurl); print"$topurl"; exit("

Страница отсутствует!
Такой страницы нет. В этой рубрике всего $maxikpage страниц. Вы можете перейти на первую или последнюю страницу. Через несколько секунд Вы будете перемещены на последнюю страницу.

"); $error=TRUE; }} } // if (isset($_GET['id'])) if ($error==FALSE) include("$fskin/top.html"); addtop(); // подключаем ШАПКУ форума // выводим ГЛАВНУЮ СТРАНИЦУ ФОРУМА if (is_file("$datadir/usersdat.php")) { // считываем имя последнего зарегистрировавшегося $userlines=file("$datadir/usersdat.php"); $dayx=""; $usercount=count($userlines); $ui=$usercount-1; $uu=$ui; $tdt=explode("|", $userlines[$ui]);} else { $fp=fopen("$datadir/usersdat.php","a+"); fputs($fp,"\r\n"); fflush ($fp); fclose($fp); $ui=""; $tdt[0]="";} $today=mktime(); if (!isset($_GET['id'])) { if (strlen($frname)>1) {$frname=str_replace('->','',$frname); $frname="-> $frname";} print"

$fname $frname

"; // Выводим все РУБРИКИ НА ГЛАВНОЙ $adminmsg=""; if (is_file("$datadir/mainforum.dat")) $lines=file("$datadir/mainforum.dat"); if (!isset($lines)) $datasize=0; else $datasize=sizeof($lines); if ($datasize<=0) {if (is_file("$datadir/copy.dat")) {$lines=file("$datadir/copy.dat"); $datasize=sizeof($lines);} $adminmsg="Администратор, внимание!!! Файл БД с рубриками повреждён. Восстановите его из резервной копии в админке!
";} if ($datasize<=0) exit("Проблемы с Базой данных - обратитесь к администратору"); $i=count($lines); $n="0"; $a1=$rfid-1; $u=$i-1; $fid="0"; $itogotem="0"; $itogomsg="0"; $alt=""; $konec=""; do {$a1++; $dt=explode("|", $lines[$a1]); if (isset($dt[1])) { // Если строчка потерялась в скрипте (пустая строка) - то просто её НЕ выводим if ($dt[1]=="razdel" and isset($_GET['razdel'])) $konec++; else { // определяем тип: топик или заголовок if ($dt[1]=="razdel") print ""; else { //$dt[9] - дата размещения сообщения; $wrftime2 - последнее посещение // Если $dt[9] раньше (т.е. больше) $wrftime2 значит раздел форума - новый $foldicon="folder.gif"; if (isset($wrfname)) {if (isset($dt[9])) {if ($dt[9]>$wrftime2) $foldicon="foldernew.gif";}} if (is_file("$datadir/$dt[3].dat")) { $msgsize=sizeof(file("$datadir/$dt[3].dat")); // считаем кол-во страниц в файле if ($msgsize>$qq) $page=ceil($msgsize/$qq); else $page=1;} else $page=1; if ($page!=1) $pageadd="&page=$page"; else $pageadd=""; if ($dt[7]==$date) $dt[7]="сегодня"; $maxzvezd=null; if (isset($dt[12])) { if ($dt[12]>=1) {$maxzvezd="*Доступна участникам, имеющим $dt[12] звезд"; $dt[4]=""; $dt[5]=""; if ($dt[12]==1) $maxzvezd.="у"; if ($dt[12]==2 or $dt[12]==3 or $dt[12]==4) $maxzvezd.="ы"; $maxzvezd.=" минимум";}} $fid="$dt[0]"; // ФИШКА: если есть файлы типа main-FID.gif, где FID - число, то вместо обычных фолдерозаглушек, ставим этот файл if (is_file("$fskin/main-$fid.gif")) {$foldicon="main-$fid.gif"; $alt="$dt[1]";} else $alt=""; $dt[8]=substr($dt[8],0,-3); $dt[10]=replacer($dt[10]); print "\r\r\n"; $itogotem=$itogotem+$dt[4];$itogomsg=$itogomsg+$dt[5]; }} if ($konec==2) $a1=$u; } // if isset($dt[1] } while($a1 < $u); echo('

Форумы		Тем	Ответов	Обновление
$dt[2]
	$dt[1] $maxzvezd $dt[2]	$dt[4]	$dt[5]	тема: "; if (strlen($dt[10])>0) print "$dt[10]"; print" автор: $dt[6] дата: $dt[7] - $dt[8]

'); // БЫСТРЫЙ ПЕРЕХОД к теме echo '

Навигация

Быстрый переход по рубрикам   Выберите рубрику'; $ii=count($mainlines); $cn=0; $i=0; do {$dt=explode("|", $mainlines[$i]); if ($dt[1]=="razdel") {if ($cn!=0) {echo''; $cn=0;} $cn++; print"";} else {print" |-$dt[1]";} $i++;} while($i<$ii); echo'

'; if ($statistika==TRUE and !isset($_GET['razdel'])) { // СТАТИСТИКА ИТОГО ТЕМ/СООБЩЕНИЙ/ПРАВА ЮЗЕРОВ if ($cangutema==TRUE) $c1="разрешено"; else $c1="запрещено"; if ($cangumsg ==TRUE) $c2="разрешено"; else $c2="запрещено"; $codename=urlencode($tdt[0]); print"

Статистика
	Сообщений: $itogomsg Тем: $itogotem Всего зарегистрировано участников: "; if (!isset($wrfname)) print"$ui"; else print"$ui"; echo' Последним зарегистрировался: '; if (!isset($wrfname)) print"$tdt[0]"; else print"$tdt[0]"; print" Гостям $c1 создавать темы и $c2 отвечать в темах $adminmsg

"; // СТАТИСТИКА -=ДНИ РОЖДЕНИЯ=- if (is_file("$datadir/usersdat.php")) { // считываем всех юзеров, ищем дни варения $userlines=file("$datadir/usersdat.php"); $usercount=count($userlines); $ui=$usercount-1; $t_people=""; $z_people=""; $s_people=""; $p_people=""; $s_p="0"; do {$udt=explode("|",$userlines[$ui]); if (isset($udt[1])) { $udt[5]=substr("$udt[5]",0, 10); // обрезаем дату рождения по формату if (preg_match("(\d{2}\.\d{2}\.\d{4})",$udt[5])) { // соответствует шаблону ДД.ММ.ГГГГ $bday=substr("$udt[5]",0,-5); $dmtoday=date("d.m"); $todaydt=explode(".",$dmtoday); $codename=urlencode($udt[0]); // собираем для МЕГОДНЯШНИХ if ($bday==$dmtoday) $t_people.="$udt[0],   "; $dt=explode(".",$udt[5]); if ($dt[1]==12) $year=1972; else $year=1973; // для того, чтобы верно считать с декабря по январь $newdate=mktime(0,0,0,$dt[1],$dt[0],$year); // для дня рождения $tekdt=mktime(0,0,0,$todaydt[1],$todaydt[0],$year); // текущую дату переводим в этот формат $deystodate=round(($newdate-$tekdt)/86400); // через сколько дней наступит событие // собираем для ВЧЕРАШНИХ if ($deystodate=="-1") $z_people.="$udt[0],  "; // собираем ПРИБЛИЖАЮЩИХСЯ в массив (БОЛЬШЕ 1 и МЕНЬШЕ 7 дней) if ($deystodate>1 and $deystodate<7) {if ($deystodate<10) $deystodate="0$deystodate"; $s_peo[$s_p]="$deystodate|$udt[0]|"; $s_p++;} } // if указан день варения в переменной $udt[5] } // if iiset($udt[1]) $ui--; } while ($ui>0); if (isset($s_peo)) { usort($s_peo,"prcmp"); // сортируем дни по возрастанию $i=0; do {$sdt=explode("|",$s_peo[$i]); $sdt[0]=intval($sdt[0]); // преобразуем строку в число, чтобы отбросить 0 в начале $codename=urlencode($sdt[1]); $s_people.="$sdt[1] ($sdt[0] дн.), "; $i++; } while ($i<$s_p); } // На тот случай, если дней рождения нет, делаем заглушки if (strlen($z_people)>1) $z_people="
Вчера: $z_people поздравляем с Днём варения!
"; if (strlen($t_people)>1) $t_people="
Сегодня: $t_peopleискренне поздравляю!
"; if (strlen($s_people)>1) $s_people="
Скоро: $s_people совсем скоро день варения!
"; if (strlen($z_people)>1 or strlen($t_people)>1 or strlen($s_people)>1){ print"

Дни рождения
	$z_people $t_people $s_people

";} } // КОНЕЦ БЛОКА ДНИ РОЖДЕНИЯ // СТАТИСТИКА -= Последние сообщения с форума =- if (is_file("$datadir/news.dat")) { $newmessfile="$datadir/news.dat"; $lines=file($newmessfile); $i=count($lines); //if ($i>10) $i=10; (РАСКОМЕНТИРУЙ - ВОТ ГДЕ СИЛА!!! ;-)) if ($i>1) { echo('

Последние сообщения

'); $a1=$i-1;$u="-1"; // выводим данные по возрастанию или убыванию do {$dt=explode("|",$lines[$a1]); $a1--; if (isset($dt[1])) { // Если строчка потерялась в скрипте (пустая строка) - то просто её НЕ выводим $msg=htmlspecialchars($dt[6]); $msg=str_replace("[b] "," ",$msg); $msg=str_replace("[/b]"," ",$msg); $msg=str_replace("[RB] "," ",$msg); $msg=str_replace("[/RB]"," ",$msg); $msg=str_replace("[Code] "," ",$msg); $msg=str_replace("[/Code]"," ",$msg); $msg=str_replace("[Quote] "," ",$msg); $msg=str_replace("[/Quote]"," ",$msg); $msg=str_replace(" ","\r\n", $msg); $msg=str_replace("'","`",$msg); $msg=str_replace("<br><br>","\r\n", $msg); $dt[2]=str_replace(".201",".1", $dt[2]); $dt[2]=substr($dt[2],0,8); $dt[3]=substr($dt[3],0,5); if ($dt[8]>$qq) $page=ceil($dt[8]/$qq); else $page=1; // Считаем страницу if ($page!=1) $pageadd="&page=$page"; else $pageadd=""; if ($dt[10]=="да") {$codename=urlencode($dt[4]); if (!isset($wrfname)) $name="$dt[4]"; else $name="$dt[4]";} else {$name="гость $dt[4]";} print"$dt[2] - $dt[3]: $dt[9] -> $dt[5] - $name. "; } // если строчка потерялась $a11=$u; $u11=$a1; } while($a11 < $u11); echo'

';} } // Конец блока последних сообщений if (is_file("tubest.php")) include("tubest.php"); // подключаем файл с: БЛОКом 15-и самых обсуждаемых тем и БЛОКом 10 самых активных пользователей } // конец if (statistika==TRUE) if (is_file("$fskin/bottom.html")) include("$fskin/bottom.html"); // подключаем НИЖНИЙ БЛОК форума } // if !isset($id) // конец главной страницы if (isset($_GET['id'])) { $id=$_GET['id']; // страница С ТЕМАМИ выбранной РУБРИКИ if (strlen($id)==3) { $fid=$id; // Защиты if (!ctype_digit($fid) or strlen($fid)>3) exit("$back. Номер рубрики должен быть цифровым и содержать менее 4 символов"); $imax=count($mainlines); if (($fid>999) or (strlen($fid)==0)) exit("Данный раздел удалён или не существует."); // Исключаем ошибку вызова несуществующей страницы if (!isset($_GET['page'])) $page=1; else {$page=$_GET['page']; if (!ctype_digit($page)) $page=1; if ($page<1) $page=1;} // Уточняем статус по кол-ву ЗВЁЗД юзера. Если меньше допустимых N в этой рубрике - то досвиданья! $maxzd=null; do {$imax--; $ddt=explode("|", $mainlines[$imax]); if ($ddt[0]==$fid) $maxzd=$ddt[12]; } while($imax>"0"); if ($maxzd>=1) { if (!ctype_digit($maxzd)) exit("$back звёзды исчисляются в цифрах. а в файле данных - ерунда!"); $noacsess="

Доступ в раздел ограничен

Для просмотра данного раздела необходимо быть зарегистрированным и иметь рейтинг не менее $maxzd звёзд."; // БЛОК проверяет логин и пароль юзера, считывает кол-во его звёзд и сравнивает с заданным в рубрике if (isset($_COOKIE['wrfcookies'])) { // весь блок работает при наличии КУКИ $text=$_COOKIE['wrfcookies']; $text=replacer($text); $wrfc=explode("|",$text); $wrfname=$wrfc[0]; if (isset($wrfc[1])) $wrfpass=$wrfc[1]; else exit("$back попытка взлома - в куки нет пароля. Куда он делся ;-) ?"); // пробегаем файл с юзерами $iu=$usercount; $ok=FALSE; do {$iu--; $du=explode("|",$userlines[$iu]); if (isset($du[1])) { $realname=strtolower($du[0]); if (strtolower($wrfname)===$realname & $wrfpass===$du[1]) {$ok="$i"; if ($du[2]<$maxzd) exit("$noacsess У Вас всего $du[2] звёзд. $back

"); }} } while($iu > "0"); } else exit("$noacsess

$back


"); // если юзер тот, за кого себя выдаёт то его пускаем, иначе - обломаем if ($ok!=FALSE) exit("$noacsess

$back


"); } $addbutton=""; else $addbutton.="Извините за неудобство, но администратор временно приостановил добавление тем и сообщений!"; // определяем есть ли информация в файле с данными if (is_file("$datadir/topic$fid.dat")) { $msglines=file("$datadir/topic$fid.dat"); $maxi=count($msglines); $i=$maxi; if (isset($_POST['findme']) or isset($_GET['findme'])) { // ЕСЛИ есть фильтр по названию темы, то: // - Считываем файл с темами и отбираем в отдельный массив только те, которые содаржат в названии искомую фразу // - в $maxi записываем кол-во тем // - в $msglines[$i] записываем данные setlocale(LC_ALL,'ru_RU.CP1251'); // ! РАЗРЕШАЕМ РАБОТУ ФУНКЦИЙ, работающих с регистором и с РУССКИМИ БУКВАМИ if (isset($_POST['findme'])) $findme=replacer($_POST['findme']); if (isset($_GET['findme'])) { $findme=replacer($_GET['findme']); $findme=urldecode($findme);} $stroka=strlen($findme); if($stroka<4 or $stroka>30) exit("разрешается поиск в количестве от 4-х до 30-и символов!"); $tmplines=$msglines; $msglines=null; $i=0; foreach($tmplines as $v) {$dt=explode("|", $v); if (stristr($dt[3],$findme)) {$msglines[$i]=$v; $i++;}} $maxi=$i-1;} else $findme=""; $frname=str_replace(' ->','',$frname); //вырезаем лишние символы print"

"; if ($stop!=TRUE) $addbutton.="

$fname -> $frname ->

Фильтр по названию темы:

"; if ($maxi>0) { if ($maxi>$maxtem-1) $addbutton="

Тема		Cообщений	Автор	Обновления

\r\r\n"; } //if is_file } while($lm < $fm); // формируем переменную $pageinfo - со СПИСКОМ СТРАНИЦ if (strlen($findme)>1) $findadd="&findme=$findme"; else $findadd=""; $pageinfo=""; $addpage=""; $maxpage=ceil(($maxi+1)/$qqmain); if ($page>$maxpage) $page=$maxpage; $pageinfo.="

Страницы:  "; if ($page>3 and $maxpage>5) $pageinfo.="1 ... "; $f1=$page+2; $f2=abs($page-2); if ($f2=="0") $f2=1; if ($page>=$maxpage-1) $f1=$maxpage; if ($maxpage<=5) {$f1=$maxpage; $f2=1;} for($i=$f2; $i<=$f1; $i++) { if ($page==$i) $pageinfo.="$i  "; else {if ($i!=1) $addpage="&page=$i"; $pageinfo.="$i  ";} } if ($page<=$maxpage-3 and $maxpage>5) $pageinfo.="... $maxpage"; $pageinfo.='

'; print" $addbutton

Количество допустимых тем в рубрике исчерпано."; // БЛОК СОРТИРОВКИ: последние ответы ВВЕРХУ (по времени создания файла с темой)! do {$i--; $dt=explode("|", $msglines[$i]); $filename="$dt[7].dat"; if (is_file("$datadir/$filename")) $ftime=filemtime("$datadir/$filename"); else $ftime=""; $newlines[$i]="$ftime|$dt[7]|$i|"; } while($i > 0); usort($newlines,"prcmp"); //print" "; print_r($msglines); //exit; // $newlines - массив с данными: ДАТА | ИМЯ_ФАЙЛА_С_ТЕМОЙ | № п/п | // $msglines - массив со всеми темами выбранной рубрики $i=$maxi; do {$i--; $dtn=explode("|", $newlines[$i]); $numtp="$dtn[2]"; $lines[$i]="$msglines[$numtp]"; } while($i > 0); // КОНЕЦ блока сортировки // Показываем QQmain ТЕМ $fm=$maxi-$qqmain*($page-1); if ($fm<"0") $fm=$qqmain; $lm=$fm-$qqmain; if ($lm<"0") $lm="0"; do {$fm--; $num=$fm+2; $dt=explode("|", $lines[$fm]); // нужно для определения темы на VIP-статус $dtn=explode("|", $newlines[$fm]); $timer=time()-$dtn[0]; // узнаем сколько прошло времени (в секундах) $filename=$dt[7]; if (is_file("$datadir/$filename.dat")) { // если файл с темой существует - то показать тему в списке! $msgsize=sizeof(file("$datadir/$filename.dat")); // --------- Выделяем новые сообщения $linetmp=file("$datadir/$filename.dat"); if (sizeof($linetmp)!=0) { $pos=$msgsize-1; $dtt=explode("|", $linetmp[$pos]); $foldicon="folder.gif"; // Если последнее сообщение в форуме произошло раньше посещения - значит раздел форума - новый if (isset($wrfname)) {if (isset($dtt[9])) {if ($dtt[9]>$wrftime2) $foldicon="foldernew.gif";}} if (strlen($dt[8])>1 and $dt[8]=="closed") {if ($msgsize<"20") $foldicon="close.gif"; else $foldicon="closed.gif";}} else $foldicon="foldernew.gif"; // --------- Конец print "
	"; if ($timer<0) echo'VIP '; $dt[3]=replacer($dt[3]); print"$dt[3]"; if ($msgsize>$qq) { // ВЫВОДИМ СПИСОК ДОСТУПНЫХ СТРАНИЦ ТЕМЫ $maxpaget=ceil($msgsize/$qq); $addpage=""; echo'      Страницы: '; if ($maxpaget<=5) $f1=$maxpaget; else $f1=5; for($i=1; $i<=$f1; $i++) {if ($i!=1) $addpage="&page=$i"; print"$i  ";} if ($maxpaget>5) print "... $maxpaget"; } print"	$msgsize	"; $codename=urlencode($dt[0]); if ($dt[1]=="да") { if (!isset($wrfname)) print "$dt[0]"; else print "$dt[0]"; print" $users"; } else print"$dt[0] $guest"; // защита if (strlen...) только если файл есть и имеет верный формат - выводим if ($msgsize>=2) {$linesdat=file("$datadir/$filename.dat"); $dtdat=explode("|", $linesdat[$msgsize-1]); if (strlen($linesdat[$msgsize-1])>10) {$dt[0]=$dtdat[0]; $dt[1]=$dtdat[1]; $dt[2]=$dtdat[2]; $dt[5]=$dtdat[5]; $dt[6]=$dtdat[6];}} $dt[6]=substr($dt[6],0,-3); if ($dt[5]===$date) $dt[5]="сегодня"; print "	автор: $dt[0] дата/время: $dt[5] в $dt[6]
$pageinfo "; } else print"$addbutton"; } else print"$addbutton"; echo'

'; if (isset($_GET['newtema'])) { if ($cangutema=="0" and !isset($wrfname)) print"

Администратор запретил создавать гостям темы! Для регистрации пройдите по ссылке: зарегистрироваться

"; else { $maxzag=$maxzag-10; // так нужно!!! print"

"; addmsg(""); } } if ($maxi>0) { // БЫСТРЫЙ ПЕРЕХОД к теме echo '

Добавление темы
Заголовок темы

Навигация

Быстрый переход по темам   Выберите тему'; $ii=$maxi; $cn=0; $i=0; do {$dt=explode("|", $lines[$i]); print" $dt[3]"; $i++;} while($i<$ii); echo'

'; } // if($maxi>0) } // показываем СООБЩЕНИЯ выбранной темы if (strlen($id)>6) { $fid=substr($id,0,3); // определяем есть ли информация в файле с данными if (!is_file("$datadir/$id.dat")) exit("
$back. Извините, но такой темы на форуме не существует.
Скорее всего её удалил администратор."); $lines=file("$datadir/$id.dat"); $mitogo=count($lines); $i=$mitogo; $maxi=$i-1; if ($mitogo>0) { $tblstyle="row1"; $printvote=null; // Считываем СТАТИСТИКУ ВСЕХ УЧАСТНИКОВ if (is_file("$datadir/userstat.dat")) {$ufile="$datadir/userstat.dat"; $ulines=file("$ufile"); $ui=count($ulines)-1;} // Ищем тему в topicХХ.dat - проверяем не закрыта ли тема? и сразу же ищем есть ли в топике $ok=FALSE; $closed=FALSE; if (is_file("$datadir/topic$fid.dat")) { $msglines=file("$datadir/topic$fid.dat"); $mg=count($msglines); do {$mg--; $mt=explode("|",$msglines[$mg]); if ($mt[7]==$id and $mt[8]=="closed") $closed=TRUE; if ($mt[7]==$id) $ok=1; // тема есть в указанном разделе? } while($mg > "0");} $realbase="1"; if (is_file("$datadir/mainforum.dat")) $mainlines=file("$datadir/mainforum.dat"); if (!isset($mainlines)) $datasize=0; else $datasize=sizeof($mainlines); if ($datasize<=0) {if (is_file("$datadir/copy.dat")) {$realbase="0"; $mainlines=file("$datadir/copy.dat"); $datasize=sizeof($mainlines);}} if ($datasize<=0) exit("$back. Проблемы с Базой данных - обратитесь к администратору"); $i=count($mainlines); $imax=$i; // Уточняем статус по кол-ву ЗВЁЗД юзера. Если меньше допустимых N в этой рубрике - то досвиданья! $maxzd=null; do {$imax--; $ddt=explode("|",$mainlines[$imax]); if ($ddt[0]==$fid) $maxzd=$ddt[12]; } while($imax>"0"); if ($maxzd>=1) { if (!ctype_digit($maxzd)) exit("$back звёзды исчисляются в цифрах. а в файле данных - ерунда!"); $noacsess="

Доступ в раздел ограничен

Для просмотра данного раздела необходимо быть зарегитстрированным и иметь рейтинг не менее $maxzd звёзд."; if ($ok==FALSE) exit(" $back. Номер раздела указан ошибочно! В указаном разделе нет такой темы!"); // БЛОК проверяет логин и пароль юзера, считывает кол-во его звёзд и сравнивает с заданным в рубрике if (isset($_COOKIE['wrfcookies'])) { // весь блок работает при наличии КУКИ $text=$_COOKIE['wrfcookies']; $text=replacer($text); $wrfc=explode("|",$text); $wrfname=$wrfc[0]; if (isset($wrfc[1])) $wrfpass=$wrfc[1]; else exit("$back попытка взлома - в куки нет пароля. Куда он делся ;-) ?"); // пробегаем файл с юзерами и считываем его в память $iu=$usercount; $ok=FALSE; do {$iu--; $du=explode("|",$userlines[$iu]); if (isset($du[1])) { $realname=strtolower($du[0]); if (strtolower($wrfname)===$realname & $wrfpass===$du[1]) {$ok="$i"; print" $ok $du[2]<$maxzd"; if ($du[2]<$maxzd) exit("$noacsess У Вас всего $du[2] звёзд. $back

"); }} } while($iu > "0"); } else exit("$noacsess

Автор	Сообщение
"; // Проверяем: это гость? if (!isset($youwr)) {if (strlen($dt[2])>5) print "$dt[0] "; else print"$dt[0] "; $kuda=$fm-1; print" ".chr(149)." "; // если емайл указан, печатаем форму для отправки ЛС if (strlen($dt[2])>5) print" "; print" $guest";} else { $codename=urlencode($dt[0]); if (!isset($wrfname)) print"$dt[0]"; else print"$dt[0]"; print" ".chr(149)." "; if (strlen($status)>2 & $dt[1]=="да" & isset($youwr)) print"$status"; else print"$users"; if (isset($reiting)) {if ($reiting>0) {echo' '; if (is_file("$fskin/star.gif")) {for ($ri=0;$ri<$reiting;$ri++) {print" ";} } }} if (isset($youavatar)) { if (is_file("avatars/$youavatar")) $avpr="$youavatar"; else $avpr="noavatar.gif"; print " ";} } // isset($youwr) if (isset($youwr) and is_file("$datadir/userstat.dat")) { // ТОЛЬКО участники видят всю репутацию! ;-) if (isset($ulines[$userpn])) { if (strlen($ulines[$userpn])>5) { $ddu=explode("|",replacer($ulines[$userpn])); $winop="window.open('tools.php?event=repa&name=$dt[0]&who=$userpn','repa','width=500,height=500,left=100,top=100')"; print" Статистика: Тем создано: $ddu[1] Сообщений: $ddu[2] Репутация: $ddu[3] ± "; }}} print "	$msg"; // БЛОК ГОЛОСОВАНИЯ (Если админ завёл голосование, то выводим) if ($fm==1+$qq*($page-1) and is_file("$datadir/$id-vote.dat")) { // БЛОК ПЕЧАТАЕМ ОДИН РАЗ $vlines=file("$datadir/$id-vote.dat"); if (sizeof($vlines)>0) {$vitogo=count($vlines); $vi=1; $vdt=explode("|",$vlines[0]); print" Голосование:  $vdt[0]  "; do {$vdt=explode("|",$vlines[$vi]); print"       $vdt[0] "; $vi++; } while($vi<$vitogo); print " Результаты "; }} // КОНЕЦ БЛОКА ГОЛОСОВАНИЯ print" "; // Если ПРИКРЕПЛЁН ФАЙЛ к сообщению - то показываем значёк и ссылку на него или картинку if (isset($dt[12])) { if ($dt[12]!="" and is_file("$filedir/$dt[13]")) { $fsize=round($dt[14]/10.24)/100; echo' Прикреплён файл: '; if (preg_match("/.(jpg|jpeg|bmp|gif|png)+$/is",$dt[13])) print""; else print" $dt[13] ($fsize Кб.) "; }} // печатаем подпись участника if (isset($youwr)) { if (strlen($youwr)>3) print " -------------------------------------------------- $youwr";} // Если имя юзер участник и имя юзера=имени в сообщении и сообщение последнее, то вывести кнопку удаления $codename=urlencode($dt[0]); if (isset($wrfname)) { if ($fm==($maxi+1) and strtolower($dt[0])==strtolower($wrfname)) print" .УДАЛИТЬ СООБЩЕНИЕ. ";} $addpage=""; if ($page>1) $addpage="&page=$page"; // нужно для цитирования print"
Сообщение # $fm	$dt[5] в $dt[6]