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

Revision 283, 1.8 KB (checked in by ralle030583, 15 years ago)

-readded a shorten check_navigatable() to autoupgrade.php

to fix issue with not shown navigation after changeing KBSITE

Line 
1<?php
2options::cat('Maintenance', 'Database', 'Table checks');
3options::fadd('This checks automatically your database', 'none', 'custom', array('admin_db', 'checkDatabase'), array('admin_db', 'none'));
4options::fadd('Current SQL cache size', 'none', 'custom', array('admin_db', 'checkCache'), array('admin_db', 'killCache'));
5
6class admin_db
7{
8    function checkDatabase()
9    {
10        //check if navigation table filled with default links
11        check_navigationtable();
12    }
13
14    function none()
15    {
16        // do nothing on submit
17    }
18
19    function checkCache()
20    {
21        $size = 0;
22        $dir = opendir(KB_CACHEDIR);
23        while ($line = readdir($dir))
24        {
25            if (strstr($line, 'qcache_qry') !== false)
26            {
27                $size += filesize(KB_CACHEDIR.'/'.$line);
28            }
29        }
30
31        // GB
32        if (($size / 1073741824) > 1){
33                return round($size/1073741824, 4).' GB <input type="checkbox" name="option[sql_clearcache]">Clear cache ?';
34        // MB
35        }elseif (($size / 1048576) > 1){
36                return round($size/1048576, 4).' MB <input type="checkbox" name="option[sql_clearcache]">Clear cache ?';
37                // KB
38        }else{
39                return round($size/1024, 2).' KB <input type="checkbox" name="option[sql_clearcache]">Clear cache ?';
40        }
41    }
42
43    function killCache()
44    {
45        if ($_POST['option']['sql_clearcache'] != 'on')
46        {
47            return;
48        }
49
50        $dir = opendir(KB_CACHEDIR);
51        while ($line = readdir($dir))
52        {
53            if (strstr($line, 'qcache_qry') !== false)
54            {
55                @unlink(KB_CACHEDIR.'/'.$line);
56            }
57            elseif (strstr($line, 'qcache_tbl') !== false)
58            {
59                @unlink(KB_CACHEDIR.'/'.$line);
60            }
61        }
62    }
63}
64?>
Note: See TracBrowser for help on using the browser.