예제 #1
0
파일: w.php 프로젝트: serj-43/db-script
            $bestedit = 1;
        }
        //..echo "==================PERED OTPRAWKOJ==============<br>";
        //debugcfgprint ($bestheader,$bestplevel,$bestcontent) ;
        //echo "=================================================<br>";
        //..echo "ВЫХОДИМ!";exit;
        if ($bestedit == 1) {
            echo "File={$filbas}";
            $tempdescr = fopen($filbas, "w");
            //  echo "===========CHECK:WRItEFULLCFG DATA=-==============<br>";
            $code = writefullcsv($tempdescr, $bestheader, $bestplevel, $bestcontent);
            //echo "writefullcsv return code $code<br>";
            $edit = 0;
            //echo "===============END WRITEFULLCFGDATAOUT=========================<br>";
            @($best = csvopen($filbas, "r", 0));
            $data = readfullcsv($best, "new");
            $bestheader = $data[0];
            $bestplevel = $data[1];
            $bestcontent = $data[2];
            $bestcnt = $data[3];
            //echo "<font color=magenta>=============CHECK:best.cfg==============<br></red>Massive have lines (bestcnt)=$bestcnt<br>";
            //debugcfgprint ($bestheader,$bestplevel,$bestcontent) ;
            //echo "=================================================<br>";
            @fclose($best);
        }
        unset($tempdescr, $bestheader, $bestplevel, $bestcontent);
    }
    //endif  massooper 4
}
//=========================================
//модуль запуска     AND($prdbdata[$tbl][12]!="fdb")
예제 #2
0
파일: admin.php 프로젝트: serj-43/db-script
function writeconfigtblsd()
{
    //echo "Возникла проблема при реконфигурации аккаунта<br>";	exit;	//надобно как то автоопрос чтоли сделать всех переменных
    //автоматизировать немного  1- загрузку в html,2- взятие на редактирование 3- сохранение
    echo "<bb><h2>Данные записаны.</bb><br></h2>";
    global $codekey, $LOGINUSER, $PASSWORDUSER, $HASHUSER, $OSTYPE, $go, $gmlimitcfg, $ADMM, $ADM;
    // echo "ADMM==".$ADMM ;//тест
    //if ($gmlimitcfg===1){$ADMM=$ADM;}// тк добавили gmlimitcfg поэтому добавим и этот,хотя изначально gmlim вооб.тут не юзался
    for ($a = 0; $a < 200; $a++) {
        global ${"pradm" . $a};
    }
    //новое чтение global
    //кажется сюда цикл влезет
    @($gmdata = csvopen("_conf/gmdata.cfg", "r", 1));
    $data = readfullcsv($gmdata, "new");
    $gmheader = $data[0];
    $gmplevel = $data[1];
    $prauth = $data[2];
    $prauthcnt = $data[3];
    // тупо счетчик строк - дата 3
    if ($go == cmsg("A_CNEW")) {
        if ($codekey == 7) {
            demo();
        }
        if ($codekey == 9) {
            demo();
        }
        //	if ($codekey==8) demo ();	 temp for test enabling create users
        //  ADMM - пользователь, настроки которого редактируют.  а пользователь, которые это делает - ,
        if ($codekey == 4) {
            needupgrade();
        }
        $ADMM = $prauthcnt - 1;
        echo "Creating new one...<br>";
    }
    // ага нихрена он никого не создает!
    $edit = 1;
    echo "DEBUG Состояние gmlimitcfg={$gmlimitcfg}<br> ";
    if (!$prauth[$ADM][42] and $prauth[$ADMM][59] and $PASSWORDUSER == true) {
        $PASSWORDUSER = FALSE;
        LPRINT("DISPASSCH");
    }
    // здесь у нас указывается что пользователь хочет изменить пароль.  не даём ему это сделать если стоит запрет на смену пароля.
    if ($gmlimitcfg == 0) {
        $prauth[$ADMM][0] = stripslashes($LOGINUSER);
    }
    echo "<form action=\"admin.php\" method=\"POST\">";
    if ($PASSWORDUSER == true) {
        $prauth[$ADMM][1] = hashgen($PASSWORDUSER);
        //здесь у нас надо отправить новый кук чтобы пользователь мог не перезаходить после смены пароля.
        $dbsa = a(base64_encode($prauth[$ADMM][0] . "¦" . $PASSWORDUSER));
        if ($ADM == $ADMM) {
            hidekey("dbsaa", $dbsa);
        }
        if ($ADM !== $ADMM) {
            echo "...<br>";
        }
    } else {
        $prauth[$ADMM][1] = stripslashes($HASHUSER);
    }
    submitkey("dalee", "CONT");
    echo "</form>";
    // prevents fake change password
    //  Незагруженные переменные остнутся неизмененными!
    //..$counterusercolumns=count ($prauth[$ADMM]);// представьте себе так надо!
    $counterusercolumns = count($gmheader);
    // а иак лучше создаются новые пользователи в установке по дефолту. а то пишется херь всякая в конец пред юзера.
    //..if ($counterusercolumns>100) $counterusercolumns=100;
    //		echo "DEBUG Your cnt= $counterusercolumns ADMM=$ADMM ADM=$ADM<br>";
    //              echo " prauth[adm=$ADM][60]=".$prauth[$ADM][60]." prauth[admm=$ADMM]=".$prauth[$ADMM][60]."<br>";
    if (!$prauth[$ADM][42] and $prauth[$ADMM][60]) {
        LPRINT("DISPROFCH");
        exit;
    }
    for ($a = 2; $a < $counterusercolumns - 1; $a++) {
        //попробуем на 1 меньше писать может поможет если там \n \r\n передаются по ум.
        // счас работает все проверить построе на тесте.
        if ($gmlimitcfg === 1) {
            if ($a > 1 and $a < 16 or $a > 32 and $a < 37 or $a == 38 or $a > 41 and $a < 46 or $a > 49 and $a < 55 or $a == 48) {
                continue;
            }
        }
        //   echo "isset pradm$a : ".isset(${"pradm".$a})."<br>";
        //if ($gmlimitcfg===1)if (isset(${"pradm".$a})===false) continue;
        //42(су) 59( пароль) 60(профиль) должны точно пропускаться, если нет сделать это
        $prauth[$ADMM][$a] = stripslashes(${"pradm" . $a});
        //// не вышло просто оставить непоказанное в покое да и нельзя так, вдруг пришлют через GET переменную
        // дописывать сюда все настройки требующие админа или суперюзверя
    }
    //PARTIAL EXCHANGER  запись конфигов проверено
    if ($go == cmsg("A_CNEW")) {
        if ($OSTYPE == "LINUX") {
            $prauth[$ADMM][$counterusercolumns] .= "\n";
        }
    }
    // добавляет забытый в перевод строки только для создания юзера.
    //print_r($prauth);
    //..if (($prauth[$ADM][0])==($prauth[$ADMM][0])) { echo "UserName (Login) cannot be identical<br>"; $edit=0;return;};
    //это ещё от чего защита?
    //тоже похож на цикл
    //..$bugwithemptyfieldsfixlinux=1;
    @($tempdescr = csvopen("_conf/gmdata.cfg", "w", 1));
    //global $testlinuxlinefeed;$testlinuxlinefeed=1;  неправильно работает - выполняется и перед и после добавления юзера что недопустимо
    echo "--------------------------------------------";
    writefullcsv($tempdescr, $gmheader, $gmplevel, $prauth);
    $edit = 0;
    exit;
}
예제 #3
0
 $data = readfullcsv($deny, "new");
 if ($data == -1) {
     //reading denyword
     $dnheader = "word¦plevel¦special";
     $dnplevel = "4#1#1¦4¦";
     @($tempdescr = csvopen("_conf/denywords.cfg", "w", 1));
     $dnheader = splitcfgline($dnheader);
     $dnplevel = splitcfgline($dnplevel);
     $dncontent = splitcfgline($dncontent);
     $err .= writefullcsv($tempdescr, $dnheader, $dnplevel, $dncontent);
     $edit = 0;
     //writing denyword
 }
 $filbas = "_conf/dbdata.cfg";
 @($dbdata = csvopen($filbas, "r", "0"));
 $data = readfullcsv($dbdata, "new");
 if ($data == -1) {
     //reading dbdata
     $dbheader = "File base¦Base visual name¦Поддержка картинок¦Tип scr¦Режим 3 (Категория)¦Таблица Mysql¦Хост Mysql ¦Тип категории¦Колонка картин¦Выбирать базу¦Режим 1 (Имя)¦Режим 2 (Код)¦Use Mysql¦Права на запись¦Права требуемые базой¦Треб. виртуальный ID¦Отбор колонок¦reserved17¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd¦hd";
     $dbplevel = "d¦5¦d¦d¦d¦d¦d¦d¦d¦d¦a¦d¦a¦d¦5¦5¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦d¦dr";
     $prdbdata = "";
     //
     @($tempdescr = csvopen("_conf/dbdata.cfg", "w", 1));
     $dbheader = splitcfgline($dbheader);
     $dbplevel = splitcfgline($dbplevel);
     //$pgcontent=splitcfgline ($pgcontent);
     $err .= writefullcsv($tempdescr, $dbheader, $dbplevel, $prdbdata);
     $edit = 0;
     //writing dbdata
 }
 if ($languageprofile !== "russian") {