Changeset 195 for dev/common/admin/option_db.php

Timestamp:

03/30/07 17:05:28 (15 years ago)

Author:

exi

Message:

Added a maintenance option to kill all sql cachefiles.
Changed database connect to not use peristent connections.
Modified .htaccess in mods to only deny requests for .php pages.

Files:

• dev/common/admin/option_db.php (modified) (2 diffs)

dev/common/admin/option_db.php

@@ -2 +2 @@
 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
@@ -31 +32 @@
         // 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/1000, 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);
+            }
+        }
+    }
 }
 ?>