Add deflate and inflate of panel content, changed gc chance from 1% to 10%, added 10% chance to vacuum when sqlite is used, added pragma commands for optimalization when using sqlite

Author: Adam Halfar

src/Model/Entity/Panel.php

@@ -36,7 +36,7 @@ class Panel extends Entity
     protected array $_hidden = ['content'];
 
     /**
-     * Read the stream contents.
+     * Read the stream contents or inflate deflated data.
      *
      * Over certain sizes PDO will return file handles.
      * For backwards compatibility and consistency we smooth over that difference here.
@@ -46,10 +46,37 @@ class Panel extends Entity
      */
     protected function _getContent(mixed $content): string
     {
+        if (is_string($content)) {
+            $contentInflated = @gzinflate($content);
+            if ($contentInflated) {
+                return $contentInflated;
+            }
+
+            return $content;
+        }
+
         if (is_resource($content)) {
             return (string)stream_get_contents($content);
         }
 
+        return '';
+    }
+
+    /**
+     * Deflate the string data before saving it into database
+     *
+     * @param mixed $content Content
+     * @return mixed
+     */
+    protected function _setContent(mixed $content): mixed
+    {
+        if (is_string($content)) {
+            $contentDeflated = gzdeflate($content, 9);
+            if ($contentDeflated) {
+                $content = $contentDeflated;
+            }
+        }
+
         return $content;
     }
 }

src/Model/Table/RequestsTable.php

@@ -86,7 +86,17 @@ public function findRecent(SelectQuery $query): SelectQuery
      */
     protected function shouldGc(): bool
     {
-        return rand(1, 100) === 100;
+        return rand(1, 10) === 10;
+    }
+
+    /**
+     * Check if garbage collection vacuum should be run
+     *
+     * @return bool
+     */
+    protected function shouldGcVacuum(): bool
+    {
+        return rand(1, 10) === 10;
     }
 
     /**
@@ -131,7 +141,26 @@ public function gc(): void
 
             $conn = $this->getConnection();
             if ($conn->getDriver() instanceof Sqlite) {
-                $conn->execute('VACUUM;');
+                $conn->execute('
+                    PRAGMA auto_vacuum = FULL;
+                    PRAGMA journal_mode = OFF;
+                    PRAGMA synchronous = OFF;
+                    PRAGMA foreign_keys = OFF;
+                    PRAGMA temp_store = MEMORY;
+                    PRAGMA automatic_index = OFF;
+                ');
+
+                if (!$this->shouldGcVacuum()) {
+                    return;
+                }
+
+                try {
+                    $conn->execute('VACUUM;');
+                } catch (PDOException) {
+                    if (is_file(TMP . 'debug_kit.sqlite')) {
+                        unlink(TMP . 'debug_kit.sqlite');
+                    }
+                }
             }
         } catch (PDOException $e) {
             Log::warning('Unable to garbage collect requests table. This is probably due to concurrent requests.');