2 files changed, 32 insertions, 1 deletions
diff --git a/engine/lib/database.php b/engine/lib/database.php
index c46d6023f..e1f007399 100644
--- a/engine/lib/database.php
+++ b/engine/lib/database.php
@@ -368,7 +368,17 @@
         		return false;
         	
         	return $tables;
-        }
+        }
+        
+    /**
+     * Run an optimize query on a mysql tables. Useful for executing after major data changes. 
+     *
+     */
+    	function optimize_table($table)
+    	{
+    		$table = sanitise_string($table);
+    		return update_data("optimize table $table");
+    	}
         
 	/**
 	 * Get the last database error for a particular database link
diff --git a/engine/lib/metastrings.php b/engine/lib/metastrings.php
index b6e3b431d..786e343ce 100644
--- a/engine/lib/metastrings.php
+++ b/engine/lib/metastrings.php
@@ -115,4 +115,25 @@
 		return $result;
 	}
 	
+	/**
+	 * Delete any orphaned entries in metastrings. This is run by the garbage collector.
+	 * 
+	 */
+	function delete_orphaned_metastrings()
+	{
+		global $CONFIG;
+		
+		$query = "
+			DELETE 
+			from {$CONFIG->dbprefix}metastrings where 
+			( 
+				(id not in (select name_id from {$CONFIG->dbprefix}metadata)) AND 
+				(id not in (select value_id from {$CONFIG->dbprefix}metadata)) AND 
+				(id not in (select name_id from {$CONFIG->dbprefix}annotations)) AND 
+				(id not in (select value_id from {$CONFIG->dbprefix}annotations))   
+			)";
+			
+		return delete_data($query);
+	}
+	
 ?>
 \ No newline at end of file