302 lines
		
	
	
	
		
			11 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			302 lines
		
	
	
	
		
			11 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| /**
 | |
|  * @file include/dbclean.php
 | |
|  * @brief The script is called from time to time to clean the database entries and remove orphaned data.
 | |
|  */
 | |
| 
 | |
| use Friendica\Core\Config;
 | |
| 
 | |
| function dbclean_run(&$argv, &$argc) {
 | |
| 	if (!Config::get('system', 'dbclean', false)) {
 | |
| 		return;
 | |
| 	}
 | |
| 
 | |
| 	if ($argc == 2) {
 | |
| 		$stage = intval($argv[1]);
 | |
| 	} else {
 | |
| 		$stage = 0;
 | |
| 	}
 | |
| 
 | |
| 	// 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))) {
 | |
| 				proc_run(PRIORITY_LOW, 'include/dbclean.php', $i);
 | |
| 			}
 | |
| 		}
 | |
| 	} else {
 | |
| 		remove_orphans($stage);
 | |
| 	}
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * @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;
 | |
| 
 | |
| 	// 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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["id"];
 | |
| 				dba::delete('item', array('id' => $orphan["id"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No global item orphans found");
 | |
| 		}
 | |
| 		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);
 | |
| 
 | |
| 		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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["id"];
 | |
| 				dba::delete('item', array('id' => $orphan["id"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No item orphans without parents found");
 | |
| 		}
 | |
| 		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);
 | |
| 
 | |
| 		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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["iid"];
 | |
| 				dba::delete('thread', array('iid' => $orphan["iid"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No thread orphans found");
 | |
| 		}
 | |
| 		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 ($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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["id"];
 | |
| 				dba::delete('notify', array('iid' => $orphan["iid"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No notify orphans found");
 | |
| 		}
 | |
| 		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);
 | |
| 
 | |
| 		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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["id"];
 | |
| 				dba::delete('notify-threads', array('id' => $orphan["id"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No notify-threads orphans found");
 | |
| 		}
 | |
| 		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);
 | |
| 
 | |
| 		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 = dba::fetch($r)) {
 | |
| 				$last_id = $orphan["id"];
 | |
| 				dba::delete('sign', array('iid' => $orphan["iid"]));
 | |
| 			}
 | |
| 		} else {
 | |
| 			logger("No sign orphans found");
 | |
| 		}
 | |
| 		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);
 | |
| 
 | |
| 		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 = 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");
 | |
| 		}
 | |
| 		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) && ($count > 0)) {
 | |
| 		proc_run(PRIORITY_MEDIUM, 'include/dbclean.php');
 | |
| 	}
 | |
| }
 |