$c = dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); echo "Using: " . $prdbdata[$tbl][9] . "<br>"; } if ($directexecute and $forcedb) { $c = dbs_selectdb($dbselected, $connect, $dbtype); echo "Forced use: {$dbselected}<br>"; //$cmd="USE $dbselected;"; dbs_query ($cmd,$connect,$dbtype);; } if ($utf8) { dbs_query("SET NAMES `utf8`;", $connect, $dbtype); } if (!$c) { echo "connection failed<br>"; } if (!$disabledesc) { $data = readdescripters(); } // получение данных заголовка массив mycol кол-во mycols $cmd = $vd; global $printlimit; // модуль лимитирования вывода SQL if ($printlimit and $limitenable) { settype($printlimit, "integer"); if ($printlimit == false) { msgexiterror("limit", "noexit", "disable"); } else { $limit = " LIMIT {$printlimit}"; } } // модуль лимитирования вывода SQL end // модуль сортировки
function testcfgs() { global $sd, $pr, $mycol, $mycols, $ADM, $tbl; global $gmheader, $gmplevel, $prauth, $prauthcnt; global $dbheader, $dbplevel, $prdbdata, $prdbdatacnt; global $edheader, $edplevel, $edcontent, $edcnt; global $dnheader, $dnplevel, $dncontent, $dncnt; global $pgheader, $pgplevel, $pgcontent, $pgcnt; global $stheader, $stplevel, $stcontent, $stcnt; global $lsheader, $lsplevel, $lscontent, $lscnt; global $filheader, $filplevel, $fildata, $filcount; $error = 0; $war = 0; $fixed = 0; //счетчик ошибок #inside func $mserror = "<red>==></red>"; $mswar = "<yel>==></yel>"; $msfixed = "<grn>==></grn>"; echo "---------------------------<br>"; // проверка dbdata.cfg $tbl = 1; $edit = 0; // edit - флаг запуска записи $silent = 0; global $silent; while ($tbl < $prdbdatacnt - 1) { $exist = 1; if ($prdbdata[$tbl][12] != "fdb") { $code = readdescripters(); $fixmsg = $code[7]; $warnmsg = $code[8]; if (strlen($fixmsg) > 15) { echo "{$msfixed} " . $fixmsg; $fixed++; } if (strlen($warnmsg) > 15) { echo "{$mswarn} " . $warnmsg; $warn++; } if ($code == -1) { echo "{$mserror} SQL " . cmsg(A_T_DB) . " " . $prdbdata[$tbl][0], " " . cmsg(NOREP) . "<br>"; $exist = 0; $error++; $errortables[] = $prdbdata[$tbl]; //continue;//added cont for test } } if ($prdbdata[$tbl][12] == "fdb") { global $mzcnt; // $filbas=$prdbdata[$tbl][0]; $mycols = 0; $code = readdescripters(); $fixmsg = $code[7]; $warnmsg = $code[8]; if (strlen($fixmsg) > 15) { echo "{$msfixed} " . $fixmsg; $fixed++; } if (strlen($warnmsg) > 15) { echo "{$mswarn} " . $warnmsg; $warn++; } if ($code == -1) { echo "{$mserror} DAT " . cmsg(A_T_DB) . " " . $prdbdata[$tbl][0] . " " . cmsg(NOREP) . "<br>"; $error++; //$tbl++; именно эта параша всё сбивала. $errortables[] = $prdbdata[$tbl]; //continue; remove as tes } $mycols = $mzcnt; $mycolsreal = $code[6]; } // К этому моменту уже должны быть базы обновлены if ($prdbdata[$tbl][12] == "1") { echo "{$msfixed} " . cmsg(TB) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_UDBT) . " -sql-<br>"; $prdbdata[$tbl][12] = "mysql"; $fixed++; $edit = 1; } if ($prdbdata[$tbl][12] === false or $prdbdata[$tbl][12] === "0") { echo "{$msfixed} " . cmsg(TB) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_UDBT) . " -fdb-<br>"; $prdbdata[$tbl][12] = "fdb"; $fixed++; $edit = 1; } if ($prdbdata[$tbl][9] == "" and $prdbdata[$tbl][12] == "mysql") { echo "{$msfixed} " . cmsg(TB) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_NC_DEF) . " <br>"; $prdbdata[$tbl][9] = "default"; $fixed++; $edit = 1; } if ($prdbdata[$tbl][5] == "" and $prdbdata[$tbl][1] !== "") { echo "{$msfixed} " . cmsg(A_SF_NAMTBL) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_CPY_MIRR) . "<br>"; $prdbdata[$tbl][5] = $prdbdata[$tbl][1]; $fixed++; $edit = 1; } if ($prdbdata[$tbl][1] == "" and $prdbdata[$tbl][5] !== "") { echo "{$msfixed} " . cmsg(A_SF_NAMMIRR) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_CPY_NAMTBL) . "<br>"; $prdbdata[$tbl][1] = $prdbdata[$tbl][5]; $fixed++; $edit = 1; } if ($prdbdata[$tbl][0] == "" and $prdbdata[$tbl][1] !== "") { echo "{$msfixed} " . cmsg(A_SF_NOFLNM) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_CPY_MIRR2) . "<br>"; $prdbdata[$tbl][0] = $prdbdata[$tbl][5]; $fixed++; $edit = 1; } if ($prdbdata[$tbl][15] == $prdbdata[$tbl][11] and $prdbdata[$tbl][15] !== "") { $prdbdata[$tbl][15]++; echo "{$msfixed} " . $prdbdata[$tbl][1] . " " . cmsg("ID!=") . " " . $prdbdata[$tbl][15] . " <br>"; $fixed++; $edit = 1; } if ($exist == 1) { if ($prdbdata[$tbl][14] == "" or $prdbdata[$tbl][14] < 0) { echo "{$msfixed} " . cmsg(A_R_TB) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_DEF) . "<br>"; $prdbdata[$tbl][14] = 0; $fixed++; $edit = 1; } if ($prdbdata[$tbl][13] < $prdbdata[$tbl][14]) { $prdbdata[$tbl][13] = $prdbdata[$tbl][14] + 1; echo "{$msfixed} " . cmsg(A_R_TB) . cmsg(T_WR) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_R_RW_ERR) . cmsg(FIXED) . "<br>"; $fixed++; $edit = 1; } $writerights = $prdbdata[$tbl][13]; if ($writerights !== "d") { settype($writerights, "integer"); if ($writerights == "") { $prdbdata[$tbl][13] = $prdbdata[$tbl][14] + 1; echo "{$msfixed} " . cmsg(A_R_TB) . cmsg(T_WR) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_R_RW_ERR) . cmsg(FIXED) . "<br>"; $fixed++; $edit = 1; } } if ($prdbdata[$tbl][10] > $mycols) { echo "{$mserror} " . cmsg(A_T_FROW1) . $prdbdata[$tbl][10] . ") ( " . cmsg(ITB) . " " . $prdbdata[$tbl][1] . cmsg(A_MCOLS) . "{$mycols} <br>"; $error++; } if ($prdbdata[$tbl][11] > $mycols) { echo "{$mserror} " . cmsg(A_T_CROW1) . $prdbdata[$tbl][11] . ") ( " . cmsg(ITB) . " " . $prdbdata[$tbl][1] . cmsg(A_MCOLS) . "{$mycols} <br>"; $error++; } if ($prdbdata[$tbl][4] > $mycols) { echo "{$mserror} " . cmsg(A_T_CGROW1) . $prdbdata[$tbl][4] . ") ( " . cmsg(ITB) . " " . $prdbdata[$tbl][1] . cmsg(A_MCOLS) . "{$mycols} <br>"; $error++; } if ($prdbdata[$tbl][8] > $mycols) { echo "{$mswar} " . cmsg(A_T_SCROW1) . $prdbdata[$tbl][8] . ") " . cmsg(ITB) . " " . $prdbdata[$tbl][1] . cmsg(A_MCOLS) . "{$mycols} <br>"; $warn++; } if ($prdbdata[$tbl][8] !== false and $prdbdata[$tbl][3] === false) { echo "{$mswar} " . cmsg(A_T_SCRPRS) . $prdbdata[$tbl][8] . ") " . cmsg(ITB) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_F_EMP) . "<br>"; $war++; } $fields = count($prdbdata[$tbl]); if ($fields < 199) { //echo echo "{$mswar} Registered table " . $prdbdata[$tbl][1] . " have " . $fields . " header fields but must have 202 , requires run update350.php or manual fix <br>"; $warn++; /* $fixadd=""; for ($a1=$fields-2;$a1++;$a1<202) {//$fixadd.="¦";// echo $a1." "; $prdbdata[$tbl][$a1]="0"; if ($a1==202) { if ($OSTYPE=="LINUX") $prdbdata[$tbl][$a1].="\n"; // исправление соединения строк if ($OSTYPE=="WINDOWS") $prdbdata[$tbl][$a1].="\r\n"; break; } //die ("a1==202 !!!!!!!!!!!!!!!!!!!!!"); возможно добавление WINDOWS вызовет баг - не проверено //$ax++; if ($ax>700) { echo "a1=$a1; ax=$ax; fixadd=$fixadd";exit;} } // F*****G SHsIT ВИСНЕТ"!!!!!!!!!!!!!!!!!!!!!!!!!!!!! */ } //исправляем если конфиг слишком короткий. не знаю в чем дело - но автоисправление длины алиаса почему то не пашет как надо // //$plinkname=$data[12]; //.//...$exist=0;// чезахерня? } //end EXIST list //ho "prb ".$prdbdata[$tbl][17]." M<br>"; //Временно отключено после расширения глючть не будет writefullcsv вызывает ошибку если нет \n if (count($prdbdata[$tbl]) > 40) { $a = $prdbdata[$tbl][17]; //echo "ept 17=$a<br>"; if (strlen(trim($a)) < 2 or $a === " ") { $ungroup = 1; } if (strlen(trim($a)) > 1) { $ungroup = 0; } if ($ungroup == 1 and $prdbdata[$tbl][12] == "mysql" and $prdbdata[$tbl][9] == true) { echo "{$msfixed} " . cmsg(A_SF_GRP_TBL) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_NO) . " (" . $prdbdata[$tbl][17] . cmsg(A_DEF_GRP) . $prdbdata[$tbl][9] . ")<br>"; $prdbdata[$tbl][17] = $prdbdata[$tbl][9]; $fixed++; $edit = 1; $ungroup = 0; } //CFG OPT FUTURE TODO: отключаемое 2 реж 1-база может отличатся от 2-база вс=базе. if ($pr[38]) { if ($prdbdata[$tbl][12] == "mysql" and $prdbdata[$tbl][9] !== $prdbdata[$tbl][17]) { echo "{$msfixed} " . cmsg(A_SF_GRP_TBL) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_GRP_DECL) . " " . $prdbdata[$tbl][17] . ")-->(" . $prdbdata[$tbl][9] . ")<br>"; $prdbdata[$tbl][17] = $prdbdata[$tbl][9]; $fixed++; $edit = 1; $ungroup = 0; } } if ($ungroup == 1 and $prdbdata[$tbl][12] == "fdb") { echo "{$msfixed} " . cmsg(A_SF_GRP_TBL) . " " . $prdbdata[$tbl][1] . " " . cmsg(A_SF_NO) . " (" . $prdbdata[$tbl][17] . cmsg(A_DEF_GRP) . "fdb)<br>"; $prdbdata[$tbl][17] = "fdb"; $fixed++; $edit = 1; $ungroup = 0; } //CFG OPT FUTURE TODO: отключаемое 2 реж 1-база может отличатся от 2-база вс=базе.AS Mysql } //*/$prdbdata[$tbl][18]="\n"; поможе если все таки достигнули крайнее число колонок. $tbl++; } echo "<br>" . cmsg(A_SF_ALLDB) . ($prdbdatacnt - 2) . "<br>---------------------------------------<br>"; ##проверка на факт редактирования должна быть обязательно везде - незачем постоянно делать сохранения. if ($edit == 1) { @($tempdescr = csvopen("_conf/dbdata.cfg", "w", 1)); writefullcsv($tempdescr, $dbheader, $dbplevel, $prdbdata); $edit = 0; fclose($tempdescr); } unset($tempdescr, $dbheader, $dbplevel, $prdbdata); // проверкa gmdata.cfg // CFG OPT FUTURE TODO: СОЗДАНИЕ ПАПОК ПОЛЬЗОВАТЕЛЕЙ И ФАЙЛА ПО УМОЛЧАНИЮ - В ЗАВИС ОТ ИНСТАНЦИИ ПО ТИПУ _DATA .. САП $cnt = 1; $admins = 0; $users = 0; while ($cnt < $prauthcnt) { if (strlen($prauth[$cnt][1]) < 32 and $prauth[$cnt][0] == true) { echo "{$msfixed} " . cmsg(A_SF_U_NOCYPH) . $prauth[$cnt][0] . " " . cmsg(A_SF_U_CYHP) . "<br>"; $fixed++; $edit = 1; $prauth[$cnt][1] = hashgen($prauth[$cnt][1]); } if ($prauth[$cnt][1][0] !== "!" and $prauth[$cnt][0] == true) { echo "{$mswar} " . cmsg(A_SF_U_NOCYPH) . " " . $prauth[$cnt][0] . " " . cmsg(A_OLD_ENC) . "<br>"; $war++; } $su = $su + $prauth[$cnt][42]; $admins = $admins + $prauth[$cnt][2]; $a = $prauth[$cnt][10]; if ($a) { $users = $users + 1; } $cnt++; } echo "<br>" . cmsg(A_SU) . " {$su} " . cmsg(A_T_ADMFRUSR) . " {$admins} " . cmsg(A_IZ) . " {$users} " . cmsg(A_USRS) . ".<br>---------------------------------------<br>"; ###rewrite cfg### :))) if ($edit == 1) { @($tempdescr = csvopen("_conf/gmdata.cfg", "w", 1)); writefullcsv($tempdescr, $gmheader, $gmplevel, $prauth); $edit = 0; fclose($tempdescr); } unset($tempdescr, $gmheader, $gmplevel, $prauth); /* // проверка editor.cfg files.cfg ??? $cnt=1; while ($cnt<$edcnt) { $cnt++; if (($edcontent[$cnt][0]!=="")AND($edcontent[$cnt][1]=="")) {echo "$mswar ".cmsg (A_T_EDAT)." $cnt (".$edcontent[$cnt][0]." (".$prdbdata[$edcontent[$cnt][0]][0].")) ".cmsg (A_T_EDATEMP)."<br>";$war++;} } echo "<br> ".cmsg (A_T_EDCFGS)." ".($edcnt-2)."<br>---------------------------------------<br>"; ###rewrite cfg### :))) if ($edit==1) { @$tempdescr=csvopen ("_conf/editor.cfg","w",1); writefullcsv ($tempdescr,$edheader,$edplevel,$edcontent);$edit=0; } unset ($tempdescr,$edheader,$edplevel,$edcontent); */ // проверка pages.cfg $cnt = 1; while ($cnt < $pgcnt) { //if ($cnt>10) { echo "Страница $cnt (".$pgcontent[$cnt][1].") не может быть обслужена из за встроенных ограничений.<br>"; $war++;} if ($pgcontent[$cnt][1] === "") { echo "{$mserror} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") " . cmsg(A_T_PGNOCONN) . ".<br>"; $error++; } if (strpos($pgcontent[$cnt][1], "readfile.php") !== false) { echo "{$msfixed} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") up to 3.5.18+.<br>"; $pgcontent[$cnt][1] = str_replace("readfile.php", "r.php", $pgcontent[$cnt][1]); $fixed++; $edit = 1; } if (strpos($pgcontent[$cnt][1], "edit.php") !== false) { echo "{$msfixed} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") up to 3.6.1+.<br>"; $pgcontent[$cnt][1] = str_replace("edit.php", "login.php", $pgcontent[$cnt][1]); $fixed++; $edit = 1; } if (strpos($pgcontent[$cnt][1], "writefile.php") !== false) { echo "{$msfixed} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") up to 3.5.18+.<br>"; $pgcontent[$cnt][1] = str_replace("writefile.php", "w.php", $pgcontent[$cnt][1]); $fixed++; $edit = 1; } if ($pgcontent[$cnt][3] === "") { echo "{$mswar} " . cmsg(A_PAGE) . "{$cnt} (" . $pgcontent[$cnt][1] . ") " . cmsg(A_T_PGNOHDR) . ".<br>"; $war++; } if ($pgcontent[$cnt][6] > 0 and $pgcontent[$cnt][7] < 4) { echo "{$mswar} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") " . cmsg(A_T_PGUPTM) . $dbc[7] . "<br>"; $war++; } if ($pgcontent[$cnt][4] == 1 and $pgcontent[$cnt][2] == false) { echo "{$mserror} " . cmsg(A_PAGE) . " {$cnt} (" . $pgcontent[$cnt][1] . ") " . cmsg(A_T_PGRDR) . ".<br>"; $error++; } $cnt++; } echo "<br>" . cmsg(A_T_ALLPG) . ($pgcnt - 2) . "<br>---------------------------------------<br>"; ###rewrite cfg### :))) if ($edit == 1) { @($tempdescr = csvopen("_conf/pages.cfg", "w", 1)); writefullcsv($tempdescr, $pgheader, $pgplevel, $pgcontent); $edit = 0; } unset($tempdescr, $pgheader, $pgplevel, $pgcontent); // проверка denywords.cfg $cnt = 1; while ($cnt < $dncnt) { if (strlen($dncontent[$cnt][0]) < 4) { echo "{$mswar} Длина слова (" . $dncontent[$cnt][0] . ") мала =" . strlen($dncontent[$cnt][0]) . ", это может вызвать ошибки <br>"; $warn++; } $cnt++; } echo "<br>" . cmsg(A_DNW_ALL) . " " . ($dncnt - 2) . "<br>---------------------------------------<br>"; ###rewrite cfg### :))) if ($edit == 1) { @($tempdescr = csvopen("_conf/denywords.cfg", "w", 1)); writefullcsv($tempdescr, $dnheader, $dnplevel, $dncontent); $edit = 0; unset($tempdescr, $dnheader, $dnplevel, $dncontent); } $date = date("d.m.Y H:i:s"); // текущая дата $dateinunix = strdbstounixtime($date); // переводим обычную dbs дату в юникс // прове files.cfg $cnt = 1; $edit = 0; while ($cnt < $filcount - 1) { //echo "filcount mlya $filcount , count fildata-= ".count ($fildata)."<br>";// zaebalo gde counter? if ($debug) { echo $fildata[$cnt][4] . "=" . $fildata[$cnt][9] . "<br>"; } // debug $downloadedfiles = $downloadedfiles + $fildata[$cnt][9]; // ////if (1==1) { echo "$fildata";}; при удалении сохранять 2 в колонку об удалении // Извините, файл найти не удалось - Возможно файл устарел , перемещён или не соответствует правилам хостинга $datarazm = $fildata[$cnt][8]; $xdataupload = strdbstounixtime($datarazm); $dataskac = $fildata[$cnt][10]; $xdatalastload = strdbstounixtime($dataskac); if (is_dir($fildata[$cnt][5])) { $fildata[$cnt][6] = 2; } //папки не имеет смысла пытаться удалять //важно после попытки удаления программа более не пытается удалять уже удаленные файлы помечая их флагом 2 в колонке удаления. $razn = $dateinunix - $xdatalastload; $toomanydays = 1295684 * 2; if ($razn > $toomanydays) { // echo "File <font color=blue>".$fildata[$cnt][5]."</font> (ID ".$fildata[$cnt][0]." is hosted> 30 days ($datarazm)<br>";//noaction // если файл есть уже 30 дней то можно проверять и дату последней скачки если она конечно же есть if ($debug) { echo "[debug] this file is dara rasm= {$datarazm} ({$xdataupload}) datascac={$dataskac} ({$xdatalastload}) razn={$razn}<br>"; } $razn2 = $dateinunix - $xdatalastload; if (!($fildata[$cnt][6] == 2)) { if ($xdatalastload < 1) { echo "File <blu>" . $fildata[$cnt][5] . "</blu> ни разу не загружался. <br>"; } } // затычка if ($xdatalastload > 0 and !($fildata[$cnt][6] == 2)) { if ($razn2 > $toomanydays) { echo "File <blu>" . $fildata[$cnt][5] . "</blu> (ID " . $fildata[$cnt][0] . " is outdated ({$dataskac})<br>"; $enableremove = 1; } if ($enableremove) { if ($pr[88]) { if (file_exists($fildata[$cnt][5])) { echo "<red>Auto removing outdated file " . $fildata[$cnt][5] . " !</red><br>"; logwrite("A_CHECK:Remove outdated file " . $fildata[$cnt][5]); $fildata[$cnt][6] = 2; $edit = 1; // знак удаленного файла - не проверяется unlink($fildata[$cnt][5]); $enableremove = 0; } } } } } if (!($fildata[$cnt][6] == 2)) { if (!file_exists($fildata[$cnt][5])) { if ($pr[85]) { echo "{$msfixed} "; } echo "" . $fildata[$cnt][5] . " " . cmsg("LNK_NOT"); if ($pr[85]) { echo " " . cmsg("LNK_RMV"); $fildata[$cnt] = ""; $fixed++; $edit = 1; } // ЭТОПРАВИЛЬНОЕ УДАЛЕНИЕ!! echo "<br>"; } } $cnt++; } echo "<br>" . cmsg(A_FIL_DWN) . ": {$downloadedfiles}<br>"; echo "<br>" . cmsg(A_FIL_ALL) . " " . (count($fildata) - 2) . "<br>---------------------------------------<br>"; ###rewrite cfg### :))) if ($edit == 1) { @($tempdescr = csvopen("_conf/files.cfg", "w", 1)); writefullcsv($tempdescr, $filheader, $filplevel, $fildata); $edit = 0; unset($tempdescr, $filheader, $filplevel, $fildata); } //------------------------------- // // //проверкa styles $cnt = 1; while ($cnt < $stcnt) { echo ""; break; } echo "<br>" . cmsg(A_STL_ALL) . " " . ($stcnt - 2) . "<br>---------------------------------------<br>"; //планируется стили подключать просто как папки if ($edit == 1) { @($tempdescr = csvopen("_conf/styles.cfg", "w", 1)); writefullcsv($tempdescr, $stheader, $stplevel, $stcontent); $edit = 0; unset($tempdescr, $stheader, $stplevel, $stcontent); } // проверка langset $cnt = 1; while ($cnt < $lscnt) { echo ""; break; } echo "<br>" . cmsg(A_LNG_ALL) . " " . ($lscnt - 2) . "<br>---------------------------------------<br>"; if ($edit == 1) { @($tempdescr = csvopen("_conf/langset.cfg", "w", 1)); writefullcsv($tempdescr, $lsheader, $lsplevel, $lscontent); $edit = 0; unset($tempdescr, $lsheader, $lsplevel, $lscontent); } global $vpropcheck; if ($vpropcheck > 1.0) { $error + 1; msgexiterror("cfgnewcrit", "property", "disable"); } if ($vpropcheck < -1.0) { $error + 1; msgexiterror("cfgoldcrit", "property", "disable"); } if ($vpropcheck > 0.8) { $error + 1; msgexiterror("cfgnewwarn", "noexit", "disable"); } if ($vpropcheck < -0.8) { $error + 1; msgexiterror("cfgoldwarn", "noexit", "disable"); } echo "=============================<br>=============================<br>"; echo "" . cmsg(A_T_ALLERR) . " : " . ($error + $war + $fixed) . "<br>"; echo "" . cmsg(A_T_FROM) . " :<br>" . cmsg(A_T_CRIT) . " {$error} <br>" . cmsg(A_T_NOCRIT) . " {$war} <br> " . cmsg(A_T_FIXED) . " {$fixed} <br>"; if ($error + $warn > 0) { echo "" . cmsg(A_T_REC) . " "; } $data = ""; if ($debug) { print_r($errortables); } if ($errortables) { echo "<form action=\"admin.php\"><br>"; checkbox(0, "yes"); echo count($errortables); for ($a = 0; $a < count($errortables); $a++) { $data .= $errortables[$a][0] . ";" . $errortables[$a][1] . "?"; } global $sd; if ($sd[19] == "utf-8") { $data = iconvx("windows-1251", "utf-8", $data); } //if ($sd[19]=="utf-8") $data=iconvx("utf-8","windows-1251",$data); $data = base64_encode($data); $fileforerrtname = "_local" . add_endslash("") . "errt"; unlink($fileforerrtname); $errtfile = fopen($fileforerrtname, "a"); fwrite($errtfile, $data); fclose($errtfile); //hidekey ("errt",$data); hidekey("count", count($errortables)); submitkey("write", "ADM_DEL_OFF_TABLES"); echo "</form>"; dispref(); } }
function search() { global $go, $olddvID, $selectedfield, $field, $fields; global $commode, $multisearch, $vID, $adm; global $mode, $tbl, $desc, $pr, $review, $mv; global $site, $sd, $lock, $db, $totalbas, $k; global $filbas, $namebas, $scrdir, $formatscr, $category; global $tablemysqlselect, $hostmysqlselect, $categorymode, $scrcolumn; global $tblmysqlselect, $md1column, $md2column, $dbtype, $writeright; global $DBC, $vIDold, $mvcnt, $b, $dbc, $prdbdata, $scrnum, $mycol, $mycols; global $myrow; //bugs with screen without it global $res16; //maybe bug with res16 передаче global $vID2; global $limitenable, $selectenable, $field, $printlimit, $addsql, $kol, $dbtype, $xfgetlimit; // глобализация как обычно млин global $oldmode; if ($oldmode > 7 and $oldmode < 8) { // затычка для случая с сбросом искомой колонки $x = explode(".", $oldmode); $kol = $x[1]; $mode = 7; if ($debug) { echo "Reselect column for mode 7 : {$kol}"; } } //echo "dbtype=$dbtype;"; тут он есть , где потерялся тогда?? ########################################################### //MYSQLMODESEARCHSTART NON-GLOBAL MODES // ########################################################### //процедура поиска по имени - mode 1 - SQL if ($mode == 1 and $prdbdata[$tbl][12] != "fdb") { @($connect = dbs_connect($prdbdata[$tbl][6], $sd[14], $sd[17], $dbtype)); @dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols global $query, $connect; global $mzdata, $mycols, $myrow, $findrecords, $scrcolumn; $query = "SELECT * FROM `" . $prdbdata[$tbl][5] . "` WHERE " . $mycol[$md1column] . " LIKE '%" . $vID . "%'"; if ($prdbdata[$tbl][15] > 0 and $vID2 !== "") { $query = $query . " AND " . $mycol[$prdbdata[$tbl][15]] . "= '" . $vID2 . "'"; } $query = $query . $addsql; // сортировка, лимит selectedprintsql($data); if ($multisearch == 0) { exit(1); } } //процедура поиска по коду - mode 2 - SQL if ($mode == 2 and $prdbdata[$tbl][12] != "fdb") { $connect = dbs_connect($prdbdata[$tbl][6], $sd[14], $sd[17], $dbtype); dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols global $query, $connect; global $mzdata, $mycols, $myrow, $findrecords, $scrcolumn; settype($vID, "integer"); if ($vID == 0) { msgexiterror("needcode", $mode, "disable"); } $query = "SELECT * FROM `" . $prdbdata[$tbl][5] . "` WHERE " . $mycol[$md2column] . "= " . $vID; if ($prdbdata[$tbl][15] > 0 and $vID2 !== "") { $query = $query . " AND " . $mycol[$prdbdata[$tbl][15]] . "= '" . $vID2 . "'"; } $query = $query . $addsql; // сортировка, лимит selectedprintsql($data); if ($multisearch == 0) { exit(1); } } //mode 3 процедура SQL поиска по категории if ($mode == 3 and $prdbdata[$tbl][12] != "fdb") { $connect = dbs_connect($prdbdata[$tbl][6], $sd[14], $sd[17], $dbtype); dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); if ($categorymode == false) { msgexiterror("nocategory", $mode, "disable"); } $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols $myrow = $data[0]; global $query, $connect, $mzdata, $mycols, $myrow, $findrecords, $scrcolumn; $query = "SELECT * FROM `" . $prdbdata[$tbl][5] . "` WHERE " . $mycol[$category] . " LIKE '%" . $vID . "%'"; if ($prdbdata[$tbl][15] > 0 and $vID2 !== "") { $query = $query . " AND " . $mycol[$prdbdata[$tbl][15]] . "= '" . $vID2 . "'"; } $query = $query . $addsql; // сортировка, лимит selectedprintsql($data); if ($multisearch == 0) { exit(1); } } if ($mode == 9) { $connect = dbs_connect($prdbdata[$tbl][6], $sd[14], $sd[17], $dbtype); dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); global $fullfield; if ($categorymode == false) { msgexiterror("nocategory", $mode, "disable"); } $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols $myrow = $data[0]; // bordf\der $namecategorycol = $myrow[$category]; $query = "SELECT DISTINCT {$namecategorycol} FROM `" . $prdbdata[$tbl][5] . "` WHERE " . $mycol[$category] . " LIKE '%" . $vID . "%'"; if ($vID == "!101") { $query = "SELECT DISTINCT {$namecategorycol} FROM `" . $prdbdata[$tbl][5] . "`"; } if ($fullfield) { $query = str_replace("LIKE", "=", $query); $query = str_replace("%", "", $query); //echo $query; } if (!$pr[8]) { echo "DEBUG - {$query}"; } $result = dbs_query($query, $dbtype); while ($myrow = dbs_fetch_row($result, $dbtype)) { echo "<a href='r.php?tbl={$tbl}&mode=3&vID=" . $myrow[0] . "'> " . $myrow[0] . "</a><br>"; } exit; } //mode 8 процедура SQL поиска по любой колонке if ($mode == 8 and $prdbdata[$tbl][12] != "fdb") { global $presettedmode; $mode = 6; $presettedmode = 3; } if ($mode == 7 and $prdbdata[$tbl][12] != "fdb") { //ubrat vse vybory polej ne svyazannye s tekushim mode==7( po menu) global $presettedmode, $res16, $mznumb, $codekey, $fullfield; echo "kol={$kol}"; $field = $kol; global $prauth, $ADM; // добавлено для переключения продвинутого поиска // echo "Field activated first $field<br>"; //TO DELETE AFTE $mode = 6; $mode7 = 1; //$presettedmode=1.1; bylo 1.1 $eid = encodevID($vID); $eolddid = encodevID($olddvID); $selectedfield = "!1" . $field; // если field выбран то выполняется ?> <form action="r.php" method=post> <?php if ($multisearch == 1) { // urlencode ($oldvID);serialize ($olddvID); $vID="!S".$vID; hidekey("vID", $eolddid); } else { hidekey("vID", $eid); } hidekey("mode", 7); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); hidekey("multisearch", $multisearch); hidekey("fullfield", $fullfield); hidekey("selectedfield", $selectedfield); hidekey("review", $review); hidekey("vID2", $vID2); hidekey("kol", $kol); // submitkey ("go","R_SEL_ROW");// проверить чтобудет если искать по значению сортировки удаляем уже не нужно :)) echo " </form> "; } //mode 6 процедура SQL поиска по выбранной колонке if ($mode == 6 and $prdbdata[$tbl][12] != "fdb") { $connect = dbs_connect($prdbdata[$tbl][6], $sd[14], $sd[17], $dbtype); global $categorymode, $mode, $fullfield; global $mode6, $m6field, $m6count; global $mycols, $mycol, $del, $res16, $presettedmode, $selectedfield, $fields; global $partquery, $vID, $mznumb; $res16 = $prdbdata[$tbl][16]; // Лимит колонок if ($mode7 == 1) { $res16 = $selectedfield; } $a = prefixdecode($res16); //echo "PREFIX $res16"; dbs_selectdb($prdbdata[$tbl][9], $connect, $dbtype); $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols //$mycol[$md1column]".." $mode6 = array(); global $query, $connect; global $mzdata, $mycols, $myrow; global $findrecords, $scrcolumn; decodecols(); $query = "SELECT * FROM `" . $prdbdata[$tbl][5] . "` WHERE " . $partquery; if ($prdbdata[$tbl][15] > 0 and $vID2 !== "") { $query = $query . " AND " . $mycol[$prdbdata[$tbl][15]] . "= '" . $vID2 . "'"; } //if (!$pr[8]) { echo "AFTER DECODE categorymode=$categorymode,mode=$mode,m6count=$m6count, mode6=$mode6,m6field=$m6field,mycols=$mycols,mycol=$mycol,del=$del,partquery=$partquery,vID=$vID<br>";} $query = $query . $addsql; // сортировка, лимит selectedprintsql($data); if ($multisearch == 0) { exit(1); } } //MYSQLMODESEARCHEND ########################################################### //CSVMODESEARCH NON GLOBAL MODE // ########################################################### // if (($prdbdata[$tbl][15]>0)AND ($vID2!=="")) { $query = $query." AND ".$mycol[$prdbdata[$tbl][15]]."= '".$vID2."'";}; // не внедрено т.к. есть ошибка с вызовом из screen которая заставляет правильно от 1 рез. // процедура поиска по имени - mode 1 - CSV if ($mode == 1 and $prdbdata[$tbl][12] == "fdb") { $findrecords = 0; echo cmsg("RF_RESSRCH") . $namebas . " - " . $vID . ":\n\n"; $vIDold = $vID; $vID = strtolower($vID); // @$f=fopen ("_data/".$filbas,"r") or die ("Файл базы не найден"); // echo ""; $z=xfgetcsv ($f,$xfgetlimit,"¦"); // $mycol=$z;$myrow=array ();$selected=array ();//added //$md1column=1;$md2column=0; //echo "$cfgmod=cfg;$filbas=fil;$namebas=na,;$md1column=md1;$md2column=md2;<br>"; $data = readdescripters(); $f = $data[4]; //echo "$cfgmod=cfg;$filbas=fil;$namebas=na,;$md1column=md1;$md2column=md2;<br>";rd вообще не возвр данные. rfsysdatareq(); // возвращаем потерянные хер знает где переменные for ($a = 0; $dbc = xfgetcsv($f, $xfgetlimit, "¦"); $a++) { $k = count($dbc); //echo "md1=$md1column";// dbc-стр табл к- число кол з-заголовок $findid = strpos(strtolower($dbc[$md1column]), strtolower($vID)); if ($findid !== false && $dbc[$md1column] !== "") { // проверка условия, не может быть удалена $selected[] = $dbc; //added } } // echo "selectedprintcsv ($mycol,$selected); ".$mycol[0].$selected[0]."--".$selected[0][0]."<br>"; вывод selectedprintcsv($data, $mycol, $selected); //fclose ($f); if ($multisearch == 0) { exit(1); } // $k= count($dbc) - вычисление кол-ва столбцов } //поиск по коду - mode 2 - CSV if ($mode == 2 and $prdbdata[$tbl][12] == "fdb") { $data = readdescripters(); $f = $data[4]; $cfgmod = $data[5]; rfsysdatareq(); // возвращаем потерянные хер знает где переменные if (!$cfgmod) { // сделано только для конфигурации, в остальных случаях эти базы мало отличаются settype($vID, "integer"); if ($vID == 0) { msgexiterror("needcode", $mode, "disable"); } } $findrecords = 0; echo cmsg("RF_RESSRCH") . $namebas . " - " . $vID . ":\n\n"; for ($a = 0; $dbc = xfgetcsv($f, $xfgetlimit, "¦"); $a++) { $k = count($dbc); // dbc-стр табл к- число кол з-заголовок if ($dbc[$md2column] == $vID) { $selected[] = $dbc; } // c проверкой } selectedprintcsv($data, $mycol, $selected); if ($multisearch == 0) { exit(1); } } //mode 8 процедура CSV поиска по любой колонке if ($mode == 8 and $prdbdata[$tbl][12] == "fdb") { global $presettedmode; $mode = 6; $presettedmode = 3; } if ($mode == 7 and $prdbdata[$tbl][12] == "fdb") { //ubrat vse vybory polej ne svyazannye s tekushim mode==7( po menu) if ($debug) { echo "m7 Текущий vID {$vID} res16 {$res16} STR595<br>"; } global $prauth, $ADM, $codekey; // добавлено для переключения продвинутого поиска global $presettedmode, $mzdata, $mzcnt, $res16, $mznumb, $mycol, $fullfield; if ($debug) { echo "kol={$kol}"; } $field = $kol; /// echo "encodevID $eid; encodevID(old) $eolddid "; $mode = 6; $mode7 = 1; //$presettedmode=-1; bylo 1.1 //.. if (!$cfgmod) @$f=csvopen ("_data/".$filbas,"r","0"); //.. if ($cfgmod==1) @$f=csvopen ("_conf/".$filbas,"r","0");echo "<br>"; $eid = encodevID($vID); $eolddid = encodevID($olddvID); //setup id if ($field === false or $go == "Выбрать_колонку") { echo "Выберите поле для поиска:<br>"; // Вставлено для выбора поля if ($debug) { echo "result res16={$res16} selfield {$selectedfield} STR603 a={$a} m6={$m6field['0']} , {$m6field['1']} , {$m6field['2']} <br>"; } if ($debug) { echo " do (574) readdesc mznumb1=" . $mznumb[1] . " mycols" . $mycols . " mzdata1=" . $mzdata[1] . " plevel=" . $plevel[1] . " mycol1=" . $mycol[1] . "<br>"; } $data = readdescripters(); if ($debug) { echo " do (576) readdesc mznumb1=" . $mznumb[1] . " mycols" . $mycols . " mzdata1=" . $mzdata[1] . " plevel=" . $plevel[1] . " mycol1=" . $mycol[1] . "<br>"; } $mznumb = $data[2]; $mycols = $data[6]; $mzdata = $data[0]; $plevels = $data[1]; $mycol = $mzdata; $a = prefixdecode($res16); decodecols($res16); if ($debug) { echo "result res16={$res16} selfield {$selectedfield} STR607 a={$a} m6={$m6field['0']} , {$m6field['1']} , {$m6field['2']} <br>"; } // echo "Всего колонок $mycols - ищем значения из списка $mznumb[0];$mznumb[1];$mznumb[2];$mznumb[3]<br>"; ?> <form action="r.php" method=post> <?php if ($multisearch == 1) { hidekey("vID", $eolddid); } else { hidekey("vID", $eid); } hidekey("mode", 7); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); hidekey("multisearch", $multisearch); hidekey("fullfield", $fullfield); //$fullfield hidekey("selectedfield", $selectedfield); hidekey("kol", $kol); echo " do (593) readdesc mznumb1=" . $mznumb[1] . " mycols" . $mycols . " mzdata1=" . $mzdata[1] . " plevel=" . $plevel[1] . " mycol1=" . $mycol[1] . "<br>"; $data = readdescripters(); //print_r ($data); $mznumb = $data[2]; $mycols = $data[6]; $mzdata = $data[0]; $plevels = $data[1]; //$mycol=$mzdata; echo "<br>do 596 readdesc mznumb1=" . $mznumb[1] . " mycols" . $mycols . " mzdata1=" . $mzdata[1] . " plevel=" . $plevel[1] . " mycol1=" . $mycol[1] . "<br>"; echo "result res16={$res16} STR621<br>"; $field = printfield($data, "nfield"); ?> <input type = "image" name = "go" src = "_ico/find.png"> </form><?php $selectedfield = "!1" . $field; exit; } else { $selectedfield = "!1" . $field; ?> <form action="r.php" method=post> <?php if ($multisearch == 1) { hidekey("vID", $eolddid); } else { hidekey("vID", $eid); } hidekey("mode", 7); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); hidekey("fullfield", $fullfield); //$fullfield hidekey("multisearch", $multisearch); hidekey("selectedfield", $selectedfield); hidekey("kol", $kol); //submitkey ("go","R_SEL_ROW"); echo "</form> "; } } //mode 6 процедура CSV поиска по новой колонке НЕ СДЕЛАНО // процедура поиска по имени - mode 1 - CSV if ($mode == 6 and $prdbdata[$tbl][12] == "fdb") { if ($debug) { echo "m6 Текущий vID {$vID}<br>"; } //echo "result res16=$res16 STR656"; global $categorymode, $mode; // добавлено для совместимости с decodecols () global $mode6, $m6field, $m6count, $mycols, $mycol, $del; global $partquery, $vID, $mzcnt, $mznumb, $presettedmode, $xfgetlimit, $fullfield; $mznumb = array(); // TEST ZONE $res16 = $prdbdata[$tbl][16]; // Лимит колонок if ($mode7 == 1) { $res16 = $selectedfield; } if ($debug) { echo "{$res16} - "; } $a = prefixdecode($res16); //echo "decoded $a=$res16 $categorymode STR 668"; //декодирование строки $data = readdescripters(); // получение данных заголовка массив mycol кол-во mycols global $mzdata; $mzcnt = count($mzdata); //$mycol[$md1column]".." $mycol = $mzdata; //echo "result res16=$res16 ?STR671"; $mode6 = array(); decodecols(); //echo "result res16=$res16 STR 672"; for ($aaa = 0; $aaa < count($mode6); $aaa++) { $fndcolumn = $mznumb[$aaa]; $findrecords = 0; //echo "Результаты поиска в ".$namebas." - по колонке ".$mzdata[$fndcolumn]."($fndcolumn) -- ".$vID.":\n\n"; $vIDold = $vID; $vID = strtolower($vID); if ($vID == "!0") { $vID == ""; $notnull = 1; } $f = $data[4]; $data = readdescripters(); $f = $data[4]; //mode 6- список всех используемых в этой сессии колонок если есть ошибки в мультипоиске можно передавать его после первой итерации //echo "1count mode6 ".count ($mode6) ."count=$a of $k -- fndcol=$fndcolumn; vid=$vID ; ".$dbc[$fndcolumn]."<br>"; //$dbc=xfgetcsv ($f,$xfgetlimit,"¦"); //echo $dbc;echo " ($f,$xfgetlimit,¦); "; for ($a = 0; $dbc = xfgetcsv($f, $xfgetlimit, "¦"); $a++) { $k = count($dbc); $myrow = $dbc; // echo "count=$a of $k -- fndcol=$fndcolumn; vid=$vID ; ".$dbc[$fndcolumn]."<br>"; // for ($b=0;$b<$k;$b++) { Бла бла бла;Фэнтэзи;Комедия;Боевик ищет фигово переключает на 1,4 films al где то производися сброс значения и оно уже не восстанавливается // $mode7=1 если вход был оттуда.копать здесь надо. if (!$fullfield) { $findid = strpos(strtolower($dbc[$fndcolumn]), $vID); } if ($fullfield) { if ($dbc[$fndcolumn] == $vID) { $selected[] = $dbc; } } if ($fullfield) { if ($dbc[$fndcolumn] == false and false == $vID) { $selected[] = $dbc; } } //echo "$fullfield ffM<br> $findid id"; if ($notnull and $dbc[$fndcolumn] != "") { $findid = 1; } if ($notnull and $dbc[$fndcolumn] == "0") { $findid = false; } if ($findid !== false && $dbc[$fndcolumn] !== "") { if (!$fullfield) { $selected[] = $dbc; } //added $findid=false; } } } selectedprintcsv($data, $mycol, $selected); //echo "result res16=$res16 STR695 END CYCLE<br>"; if (!$pr[8]) { echo "AFTER DECODE categorymode={$categorymode},mode={$mode},m6count={$m6count},\t mode6={$mode6},m6field={$m6field},mycols={$mycols},mycol={$mycol},del={$del},partquery={$partquery},vID={$vID}<br>"; } // fclose ($f); if ($multisearch == 0) { exit(1); } } // поиск по категории // процедура ищет фразу потом ищет все коды до следующей фразы // проблема в $prdbdata[$a][category] - это одна и та же колонка :) // будет сделана после покупки //режим категории один - выполняется преобразование цифр //script update csv 2,3,4 cat to 1 else return false if ($mode == 3 and $categorymode == false) { msgexiterror("nocategory", $mode, "disable"); } if ($prdbdata[$tbl][12] == "fdb") { if ($mode == 3 and $categorymode == 1 or $mode == 3 and $categorymode == 4) { echo "READFILE:OLD_CORE_MODE.<br>"; updatedb326($filbas); $findrecords = 0; // общее количество найденных позиций //$category =1; категория содержится в этой переменной - this will reset category TEST ONLY! if ($category === "" || $category === false) { msgexiterror("nocategory", $mode, "disable"); } if ($vID !== "!101") { echo "По вашему запросу " . $vID . " было найдено:\n\n"; } $vIDorig = $vID; $vID = strtolower($vID); $found = 0; @($f = fopen("_data/" . $filbas, "r")) or die("Не удалось выполнить подключение к базе, попробуйте позже."); echo ""; $z = xfgetcsv($f, $xfgetlimit, "¦"); // заголовок for ($a = 0; $dbc = xfgetcsv($f, $xfgetlimit, "¦"); $a++) { if ($limitenable and $findrecords > $printlimit) { echo "Всего значений : {$findrecords}<br><br> "; exit; } $k = count($dbc) - $tablemysqlselect; // удаление колонки, определено в prop echo "<tbody><table border=3 width=100% bgcolor=white>"; echo "<tr>"; for ($b = 0; $b < $k; $b++) { // multithread options experimental // multithread options $content1 = strtolower($dbc[$category]); $findid1 = strpos($content1, $vID); $content2 = strtolower($dbc[$category + 1]); $findid2 = strpos($content2, $vID); $content1int = $content1; settype($content1int, integer); // $content2int=$content2; settype ($content2int,integer); //!! if ($found == 1 and $content1 !== "" and $content1int == 0) { $found = 0; } // if (($found==2)AND($content2!=="")) { $found=0;} //OR($findid2!==false) if ($findid1 !== false or $found == 1) { $scrnum = $dbc[$scrcolumn]; $found = 1; //$findrecords++; # возможно ошибка 2-раза $data = wordwrap($dbc[$b], 82, "\n"); if ($findid1 !== false and $b == 0) { echo "<bb><cite>{$data}</cite></bb></tr>"; continue; } //if (($findid2!==false)AND($b==0)) { echo "<bb><cite>$data</cite></bb></tr>"; continue; } if ($hostmysqlselect == 1 && $b == 0) { echo "</tr>"; continue; } if ($data == "") { echo "</tr>"; continue; } echo "<td><bb>{$z[$b]}</bb>: " . "{$data}<br></td><td>"; //$findrecords++; if ($b == 1) { screen(); } echo "</td></tr>"; if ($b == $k - 1) { echo "<br>"; $findrecords++; } } //idfound if ($vID == "!101" and $content1 !== "" and $content1int == 0) { $findrecords++; echo "<bb><ii>" . strtoupper($content1) . "</ii></bb>"; ?> <form action="r.php" method=post><?php hidekey("go", $content1); hidekey("vID", $content1); hidekey("mode", 3); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); echo "</form>"; break; } //!101 //insertion m3c4 old } //b } // процедура сообщения об отсутствии искомого объекта 1 из 3 // Режим категории 4 очень сильно тормозит систему. подобно основному режиму 4 //DELETED if ($findrecords === 0 and $adm == 1 or $findrecords === 0 and $pr[3] == 1) { print "<font color=red id=errfnt><bb>Не найдено</bb><br></font>"; } // restart engine m3с1 fclose($f); if ($multisearch == 0) { echo "Всего значений : {$findrecords}<br><br> "; exit(1); } } } // режим категории 1 (в 4-м ищет :) )не ищет конкретные значение в отличие от режима 2 которых их пытается найти везде. if ($prdbdata[$tbl][12] == "fdb") { if ($mode == 3 and $categorymode > 1 and $categorymode !== 4) { updatedb326($filbas); // апдейтер для улучшенного формата написан // осталось сделать обработку файла в ноовм формате (_conv326) echo "READFILE:OLD_CORE_MODE.<br>"; // общее количество найденных позиций //if ($vID!=="!101") { echo cmsg ("RF_RESSRCH)."".$namebas." - ".$vID.":\n\n";} //$category =1; категория содержится в этой переменной - this will reset category TEST ONLY! if ($category === "" || $category === false) { msgexiterror("nocategory", $mode, "disable"); } // !101 - tablemysqlselect - hostmysqlselect - - функции из prop потом как альт. включить основной скрипт //если колонка 1findid!==false то это заголовок и он может иметь описание. только выделить его.выделяя //если колонка 1findid==false то проверяем колонку 2findid!==false пишем стд модулем //если колонка 1==false и 2==false пишем значение 3 если уже находились такие //echo $findrecords;//if ($vID!=="!101") { echo "По вашему запросу ".$vID." было найдено:\n\n"; } $vIDorig = $vID; $vID = strtolower($vID); $found = 0; @($f = fopen("_data/" . $filbas, "r")) or die("Не удалось выполнить подключение к базе, попробуйте позже."); echo ""; $z = xfgetcsv($f, $xfgetlimit, "¦"); // заголовок for ($a = 0; $dbc = xfgetcsv($f, $xfgetlimit, "¦"); $a++) { if ($limitenable and $findrecords > $printlimit) { echo "Всего значений : {$findrecords}<br><br> "; exit; } $k = count($dbc) - $tablemysqlselect; // удаление колонки, определено в prop echo "<tbody><table border=3 width=100% bgcolor=white>"; echo "<tr>"; for ($b = 0; $b < $k; $b++) { // echo "_SYS_content -- ".$content." findid -- ".$findid." vID -- ".$vID."\n"; $content1 = strtolower($dbc[$category]); $findid1 = strpos($content1, $vID); $content2 = strtolower($dbc[$category + 1]); $findid2 = strpos($content2, $vID); if ($found == 1 and $content1 !== "") { $found = 0; } if ($found == 2 and $content2 !== "") { $found = 0; } if ($findid1 !== false or $found == 1) { $scrnum = $dbc[$scrcolumn]; $found = 1; //$findrecords++; $data = wordwrap($dbc[$b], 82, "\n"); if ($findid1 !== false and $b == 0) { echo "<bb><cite>{$data}</cite></bb></tr>"; continue; } if ($hostmysqlselect == 1 && $b == 0) { echo "</tr>"; continue; } if ($data == "") { echo "</tr>"; continue; } echo "<td><bb>{$z[$b]}</bb>: " . "{$data}<br></td><td>"; if ($b == 1) { screen(); } echo "</td></tr>"; if ($b == $k - 1) { echo "<br>"; $findrecords++; } } if ($vID == "!101" and $content1 !== "") { $findrecords++; echo "<bb><ii>" . strtoupper($content1) . "</ii></bb>"; ?> <form action="r.php" method=post> <?php hidekey("vID", $content1); hidekey("mode", 3); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); hidekey("go", $content1); hidekey("kol", $kol); echo "</form>"; break; } // режим категории 2 позволяет смотреть колонку 2, режим 3 - не позволяет (только findid1) // любое ненулевое значение первой колонки трактуется как новая категория в отличие от 1 if ($categorymode === 3) { if ($findrecords === 0 and $adm == 1 or $findrecords === 0 and $pr[3] == 1) { print "<font color=red id=errfnt><bb>Не найдено</bb><br></font>"; print "Среди категорий не удалось найти искомую группу.<br>Поискать среди наименований?"; ?> <form action="r.php" method=post><?php hidekey("vID", $vID); hidekey("mode", 1); hidekey("adm", $adm); hidekey("commode", $commode); hidekey("tbl", $tbl); hidekey("go", $content1); echo "<p align=center>"; submitkey("go", "YES"); echo "</p></form>"; echo "<form action=disable method=post> \t<p align=center>"; submitkey("go", "NO"); echo "</p></form>"; } } // restart engine m3с2 if ($categorymode == 2) { if ($findid2 !== false or $found == 2) { $scrnum = $dbc[$scrcolumn]; $found = 2; $data = wordwrap($dbc[$b], 82, "\n"); if ($findid1 !== false and $b == 0) { echo "<bb><cite>{$data}</cite></bb></tr>"; continue; } if ($hostmysqlselect == 1 && $b == 0) { echo "</tr>"; continue; } if ($data == "") { echo "</tr>"; continue; } echo "<td><bb>{$z[$b]}</bb>: " . "{$data}<br></td><td>"; if ($b == 1) { screen(); } echo "</td></tr>"; if ($b == $k - 1) { echo "<br>"; $findrecords++; } } } } } if ($findrecords === 0 and $adm == 1 or $findrecords === 0 and $pr[3] == 1) { print "<font color=red id=errfnt><bb>Не найдено</bb><br></font>"; } // restart engine m3с3 fclose($f); if ($multisearch == 0) { echo "Всего значений : {$findrecords}<br><br> "; exit(1); } } } }