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();
}
}
<?php
$dbtype = "mysql";
$tbl = 192;
$tbl = $sd[38];
$x = newscreatesql();
//..echo " Вы должны установить tbl= тому ИД , которому равен _dbs__news43 он есть в админке - $sd[38] Мод Блог - идентификатор таблицы. ";
if ($debug) {
echo "Returned message about existing tables:{$x}<br>";
}
if ($debug) {
echo "Settings: requires tbl dbs id for work: {$tbl} *usually 1<br>";
}
//показать новости за последний месяц data gutentag
$date = date("d.m.Y H:i:s");
$datesrch = date("m.Y");
$dateinunix = strdbstounixtime($date);
// переводим обычную dbs дату в юникс
//..$dateinunix2=strdbstounixtime ("13.04.2010 10:38:53");// переводим обычную dbs дату в юникс
if ($debug) {
echo "Now {$date} = Now date in unix=" . $dateinunix . "<br>";
}
//echo "Now date in unix by time ".time ()."<br>";
$dateinunixminux15 = $dateinunix - 1295684 * 2;
//CFG OPT FUTURE - это число дней 15 его можно изменять.
$dateminus15 = date("d.m.Y H:i:s", $dateinunixminux15);
if ($debug) {
echo "date -15days= " . $dateminus15 . " ({$dateinunixminux15})<br>";
}
//1295684 - 15 юникс дней.
$vID = $datesrch;
//$tempdate=date("d.m.Y H:i:s",1272436417); //переводим юникс дату в дбс
