]> git.mxchange.org Git - friendica.git/blobdiff - include/dbclean.php
proc_run was replaced
[friendica.git] / include / dbclean.php
index 0baece81685678fa7bcbff4978ad1eaafed21704..1e1dd908290ec045cd8166b7b0565210116e243f 100644 (file)
@@ -3,38 +3,32 @@
  * @file include/dbclean.php
  * @brief The script is called from time to time to clean the database entries and remove orphaned data.
  */
-require_once("boot.php");
 
-function dbclean_run(&$argv, &$argc) {
-       global $a, $db;
-
-       if (is_null($a))
-               $a = new App;
+use Friendica\Core\Config;
+use Friendica\Core\Worker;
 
-       if (is_null($db)) {
-               @include(".htconfig.php");
-               require_once("include/dba.php");
-               $db = new dba($db_host, $db_user, $db_pass, $db_data);
-               unset($db_host, $db_user, $db_pass, $db_data);
+function dbclean_run(&$argv, &$argc) {
+       if (!Config::get('system', 'dbclean', false)) {
+               return;
        }
 
-       load_config('config');
-       load_config('system');
-
        if ($argc == 2) {
                $stage = intval($argv[1]);
        } else {
                $stage = 0;
        }
 
-       if (get_config("system", "worker") AND ($stage == 0)) {
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 1);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 2);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 3);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 4);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 5);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 6);
-               proc_run(PRIORITY_LOW, 'include/dbclean.php', 7);
+       // Get the expire days for step 8 and 9
+       $days = Config::get('system', 'dbclean-expire-days', 0);
+
+       if ($stage == 0) {
+               for ($i = 1; $i <= 9; $i++) {
+                       // Execute the background script for a step when it isn't finished.
+                       // Execute step 8 and 9 only when $days is defined.
+                       if (!Config::get('system', 'finished-dbclean-'.$i, false) && (($i < 8) || ($days > 0))) {
+                               Worker::add(PRIORITY_LOW, 'dbclean', $i);
+                       }
+               }
        } else {
                remove_orphans($stage);
        }
@@ -42,116 +36,268 @@ function dbclean_run(&$argv, &$argc) {
 
 /**
  * @brief Remove orphaned database entries
+ * @param integer $stage What should be deleted?
+ *
+ * Values for $stage:
+ * ------------------
+ * 1:  Old global item entries from item table without user copy.
+ * 2:  Items without parents.
+ * 3:  Orphaned data from thread table.
+ * 4:  Orphaned data from notify table.
+ * 5:  Orphaned data from notify-threads table.
+ * 6:  Orphaned data from sign table.
+ * 7:  Orphaned data from term table.
+ * 8:  Expired threads.
+ * 9:  Old global item entries from expired threads
  */
 function remove_orphans($stage = 0) {
        global $db;
 
        $count = 0;
 
-       if (($stage == 1) OR ($stage == 0)) {
-               logger("Deleting old global item entries from item table without user copy");
-               if ($db->q("SELECT `id` FROM `item` WHERE `uid` = 0
-                               AND NOT EXISTS (SELECT `guid` FROM `item` AS `i` WHERE `item`.`guid` = `i`.`guid` AND `i`.`uid` != 0)
-                               AND `received` < UTC_TIMESTAMP() - INTERVAL 90 DAY LIMIT 10000", true)) {
-                       $count = $db->num_rows();
+       // We split the deletion in many small tasks
+       $limit = 1000;
+
+       // Get the expire days for step 8 and 9
+       $days = Config::get('system', 'dbclean-expire-days', 0);
+
+       if ($stage == 1) {
+               $last_id = Config::get('system', 'dbclean-last-id-1', 0);
+
+               logger("Deleting old global item entries from item table without user copy. Last ID: ".$last_id);
+               $r = dba::p("SELECT `id` FROM `item` WHERE `uid` = 0 AND
+                                       NOT EXISTS (SELECT `guid` FROM `item` AS `i` WHERE `item`.`guid` = `i`.`guid` AND `i`.`uid` != 0) AND
+                                       `received` < UTC_TIMESTAMP() - INTERVAL 90 DAY AND `id` >= ?
+                               ORDER BY `id` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found global item orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `item` WHERE `id` = %d", intval($orphan["id"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('item', array('id' => $orphan["id"]));
                        }
+               } else {
+                       logger("No global item orphans found");
                }
-               $db->qclose();
-               logger("Done deleting old global item entries from item table without user copy");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." old global item entries from item table without user copy. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-1', $last_id);
+       } elseif ($stage == 2) {
+               $last_id = Config::get('system', 'dbclean-last-id-2', 0);
 
-       if (($stage == 2) OR ($stage == 0)) {
-               logger("Deleting items without parents");
-               if ($db->q("SELECT `id` FROM `item` WHERE NOT EXISTS (SELECT `id` FROM `item` AS `i` WHERE `item`.`parent` = `i`.`id`) LIMIT 10000", true)) {
-                       $count = $db->num_rows();
+               logger("Deleting items without parents. Last ID: ".$last_id);
+               $r = dba::p("SELECT `id` FROM `item`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` AS `i` WHERE `item`.`parent` = `i`.`id`)
+                               AND `id` >= ? ORDER BY `id` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found item orphans without parents: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `item` WHERE `id` = %d", intval($orphan["id"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('item', array('id' => $orphan["id"]));
                        }
+               } else {
+                       logger("No item orphans without parents found");
                }
-               $db->qclose();
-               logger("Done deleting items without parents");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." items without parents. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-2', $last_id);
+
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-2', true);
+               }
+       } elseif ($stage == 3) {
+               $last_id = Config::get('system', 'dbclean-last-id-3', 0);
 
-       if (($stage == 3) OR ($stage == 0)) {
-               logger("Deleting orphaned data from thread table");
-               if ($db->q("SELECT `iid` FROM `thread` WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`parent` = `thread`.`iid`)", true)) {
-                       $count = $db->num_rows();
+               logger("Deleting orphaned data from thread table. Last ID: ".$last_id);
+               $r = dba::p("SELECT `iid` FROM `thread`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`parent` = `thread`.`iid`) AND `iid` >= ?
+                               ORDER BY `iid` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found thread orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `thread` WHERE `iid` = %d", intval($orphan["iid"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["iid"];
+                               dba::delete('thread', array('iid' => $orphan["iid"]));
                        }
+               } else {
+                       logger("No thread orphans found");
                }
-               $db->qclose();
-               logger("Done deleting orphaned data from thread table");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." orphaned data from thread table. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-3', $last_id);
 
-       if (($stage == 4) OR ($stage == 0)) {
-               logger("Deleting orphaned data from notify table");
-               if ($db->q("SELECT `iid` FROM `notify` WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `notify`.`iid`)", true)) {
-                       $count = $db->num_rows();
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-3', true);
+               }
+       } elseif ($stage == 4) {
+               $last_id = Config::get('system', 'dbclean-last-id-4', 0);
+
+               logger("Deleting orphaned data from notify table. Last ID: ".$last_id);
+               $r = dba::p("SELECT `iid`, `id` FROM `notify`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `notify`.`iid`) AND `id` >= ?
+                               ORDER BY `id` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found notify orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `notify` WHERE `iid` = %d", intval($orphan["iid"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('notify', array('iid' => $orphan["iid"]));
                        }
+               } else {
+                       logger("No notify orphans found");
                }
-               $db->qclose();
-               logger("Done deleting orphaned data from notify table");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." orphaned data from notify table. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-4', $last_id);
+
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-4', true);
+               }
+       } elseif ($stage == 5) {
+               $last_id = Config::get('system', 'dbclean-last-id-5', 0);
 
-       if (($stage == 5) OR ($stage == 0)) {
-               logger("Deleting orphaned data from notify-threads table");
-               if ($db->q("SELECT `id` FROM `notify-threads` WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`parent` = `notify-threads`.`master-parent-item`)", true)) {
-                       $count = $db->num_rows();
+               logger("Deleting orphaned data from notify-threads table. Last ID: ".$last_id);
+               $r = dba::p("SELECT `id` FROM `notify-threads`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`parent` = `notify-threads`.`master-parent-item`) AND `id` >= ?
+                               ORDER BY `id` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found notify-threads orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `notify-threads` WHERE `id` = %d", intval($orphan["id"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('notify-threads', array('id' => $orphan["id"]));
                        }
+               } else {
+                       logger("No notify-threads orphans found");
                }
-               $db->qclose();
-               logger("Done deleting orphaned data from notify-threads table");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." orphaned data from notify-threads table. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-5', $last_id);
 
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-5', true);
+               }
+       } elseif ($stage == 6) {
+               $last_id = Config::get('system', 'dbclean-last-id-6', 0);
 
-       if (($stage == 6) OR ($stage == 0)) {
-               logger("Deleting orphaned data from sign table");
-               if ($db->q("SELECT `iid` FROM `sign` WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `sign`.`iid`)", true)) {
-                       $count = $db->num_rows();
+               logger("Deleting orphaned data from sign table. Last ID: ".$last_id);
+               $r = dba::p("SELECT `iid`, `id` FROM `sign`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `sign`.`iid`) AND `id` >= ?
+                               ORDER BY `id` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found sign orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `sign` WHERE `iid` = %d", intval($orphan["iid"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('sign', array('iid' => $orphan["iid"]));
                        }
+               } else {
+                       logger("No sign orphans found");
                }
-               $db->qclose();
-               logger("Done deleting orphaned data from sign table");
-       }
+               dba::close($r);
+               logger("Done deleting ".$count." orphaned data from sign table. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-6', $last_id);
 
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-6', true);
+               }
+       } elseif ($stage == 7) {
+               $last_id = Config::get('system', 'dbclean-last-id-7', 0);
 
-       if (($stage == 7) OR ($stage == 0)) {
-               logger("Deleting orphaned data from term table");
-               if ($db->q("SELECT `oid` FROM `term` WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `term`.`oid`)", true)) {
-                       $count = $db->num_rows();
+               logger("Deleting orphaned data from term table. Last ID: ".$last_id);
+               $r = dba::p("SELECT `oid`, `tid` FROM `term`
+                               WHERE NOT EXISTS (SELECT `id` FROM `item` WHERE `item`.`id` = `term`.`oid`) AND `tid` >= ?
+                               ORDER BY `tid` LIMIT ".intval($limit), $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
                        logger("found term orphans: ".$count);
-                       while ($orphan = $db->qfetch()) {
-                               q("DELETE FROM `term` WHERE `oid` = %d", intval($orphan["oid"]));
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["tid"];
+                               dba::delete('term', array('oid' => $orphan["oid"]));
+                       }
+               } else {
+                       logger("No term orphans found");
+               }
+               dba::close($r);
+               logger("Done deleting ".$count." orphaned data from term table. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-7', $last_id);
+
+               if ($count < $limit) {
+                       Config::set('system', 'finished-dbclean-7', true);
+               }
+       } elseif ($stage == 8) {
+               if ($days <= 0) {
+                       return;
+               }
+
+               $last_id = Config::get('system', 'dbclean-last-id-8', 0);
+
+               logger("Deleting expired threads. Last ID: ".$last_id);
+               $r = dba::p("SELECT `thread`.`iid` FROM `thread`
+                                INNER JOIN `contact` ON `thread`.`contact-id` = `contact`.`id` AND NOT `notify_new_posts`
+                                WHERE `thread`.`received` < UTC_TIMESTAMP() - INTERVAL ? DAY
+                                        AND NOT `thread`.`mention` AND NOT `thread`.`starred`
+                                        AND NOT `thread`.`wall` AND NOT `thread`.`origin`
+                                        AND `thread`.`uid` != 0 AND `thread`.`iid` >= ?
+                                        AND NOT `thread`.`iid` IN (SELECT `parent` FROM `item`
+                                                        WHERE (`item`.`starred` OR (`item`.`resource-id` != '')
+                                                                OR (`item`.`file` != '') OR (`item`.`event-id` != '')
+                                                                OR (`item`.`attach` != '') OR `item`.`wall` OR `item`.`origin`)
+                                                                AND `item`.`parent` = `thread`.`iid`)
+                                ORDER BY `thread`.`iid` LIMIT 1000", $days, $last_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
+                       logger("found expired threads: ".$count);
+                       while ($thread = dba::fetch($r)) {
+                               $last_id = $thread["iid"];
+                               dba::delete('thread', array('iid' => $thread["iid"]));
+                       }
+               } else {
+                       logger("No expired threads found");
+               }
+               dba::close($r);
+               logger("Done deleting ".$count." expired threads. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-8', $last_id);
+       } elseif ($stage == 9) {
+               if ($days <= 0) {
+                       return;
+               }
+
+               $last_id = Config::get('system', 'dbclean-last-id-9', 0);
+               $till_id = Config::get('system', 'dbclean-last-id-8', 0);
+
+               logger("Deleting old global item entries from expired threads from ID ".$last_id." to ID ".$till_id);
+               $r = dba::p("SELECT `id` FROM `item` WHERE `uid` = 0 AND
+                                       NOT EXISTS (SELECT `guid` FROM `item` AS `i` WHERE `item`.`guid` = `i`.`guid` AND `i`.`uid` != 0) AND
+                                       `received` < UTC_TIMESTAMP() - INTERVAL 90 DAY AND `id` >= ? AND `id` <= ?
+                               ORDER BY `id` LIMIT ".intval($limit), $last_id, $till_id);
+               $count = dba::num_rows($r);
+               if ($count > 0) {
+                       logger("found global item entries from expired threads: ".$count);
+                       while ($orphan = dba::fetch($r)) {
+                               $last_id = $orphan["id"];
+                               dba::delete('item', array('id' => $orphan["id"]));
                        }
+               } else {
+                       logger("No global item entries from expired threads");
                }
-               $db->qclose();
-               logger("Done deleting orphaned data from term table");
+               dba::close($r);
+               logger("Done deleting ".$count." old global item entries from expired threads. Last ID: ".$last_id);
+
+               Config::set('system', 'dbclean-last-id-9', $last_id);
        }
 
        // Call it again if not all entries were purged
-       if (($stage != 0) AND ($count > 0) AND get_config("system", "worker")) {
-               proc_run(PRIORITY_LOW, 'include/dbclean.php');
+       if (($stage != 0) && ($count > 0)) {
+               Worker::add(PRIORITY_MEDIUM, 'dbclean');
        }
-
-}
-
-if (array_search(__file__,get_included_files())===0){
-  dbclean_run($_SERVER["argv"],$_SERVER["argc"]);
-  killme();
 }
-?>