root/dev/common/admin/option_db.php @ 207

<?php
options::cat('Maintenance', 'Database', 'Table checks');
options::fadd('This checks automatically your database', 'none', 'custom', array('admin_db', 'checkDatabase'), array('admin_db', 'none'));
options::fadd('Current SQL cache size', 'none', 'custom', array('admin_db', 'checkCache'), array('admin_db', 'killCache'));

class admin_db
{
    function checkDatabase()
    {
        require_once('common/includes/autoupgrade.php');

        // todo: write functions to take care of this
        // based on a database description file
        check_pilots();
        check_invdetail();
        check_contracts();
        check_index();
        check_tblstrct1();
        check_tblstrct2();
        check_tblstrct3();
        check_tblstrct4();
        check_tblstrct5();
        chk_kb3_items();
        chk_kb3_items2();
        check_tblstrct6();

        return 'Maintenance complete.<br/>';
    }

    function none()
    {
        // do nothing on submit
    }

    function checkCache()
    {
        $size = 0;
        $dir = opendir(KB_CACHEDIR);
        while ($line = readdir($dir))
        {
            if (strstr($line, 'qcache_qry') !== false)
            {
                $size += filesize(KB_CACHEDIR.'/'.$line);
            }
        }

        return round($size/1024, 2).' KB <input type="checkbox" name="option[sql_clearcache]">Clear cache ?';
    }

    function killCache()
    {
        if ($_POST['option']['sql_clearcache'] != 'on')
        {
            return;
        }

        $dir = opendir(KB_CACHEDIR);
        while ($line = readdir($dir))
        {
            if (strstr($line, 'qcache_qry') !== false)
            {
                @unlink(KB_CACHEDIR.'/'.$line);
            }
            elseif (strstr($line, 'qcache_tbl') !== false)
            {
                @unlink(KB_CACHEDIR.'/'.$line);
            }
        }
    }
}
?>