- // Clear long lasting cache entries only once a day
- if (Config::get("system", "cache_cleared_day") < time() - self::duration(CACHE_DAY)) {
- if ($max_level == CACHE_MONTH) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 30 days")),
- intval(CACHE_MONTH)
- );
- }
-
- if ($max_level <= CACHE_WEEK) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 7 days")),
- intval(CACHE_WEEK)
- );
- }
-
- if ($max_level <= CACHE_DAY) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 1 days")),
- intval(CACHE_DAY)
- );
- }
- Config::set("system", "cache_cleared_day", time());
- }
-
- if (($max_level <= CACHE_HOUR) && (Config::get("system", "cache_cleared_hour")) < time() - self::duration(CACHE_HOUR)) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 1 hours")),
- intval(CACHE_HOUR)
- );
-
- Config::set("system", "cache_cleared_hour", time());
- }
-
- if (($max_level <= CACHE_HALF_HOUR) && (Config::get("system", "cache_cleared_half_hour")) < time() - self::duration(CACHE_HALF_HOUR)) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 30 minutes")),
- intval(CACHE_HALF_HOUR)
- );
-
- Config::set("system", "cache_cleared_half_hour", time());
- }
-
- if (($max_level <= CACHE_QUARTER_HOUR) && (Config::get("system", "cache_cleared_quarter_hour")) < time() - self::duration(CACHE_QUARTER_HOUR)) {
- q(
- "DELETE FROM `cache` WHERE `updated` < '%s' AND `expire_mode` = %d",
- dbesc(datetime_convert('UTC', 'UTC', "now - 15 minutes")),
- intval(CACHE_QUARTER_HOUR)
- );
-
- Config::set("system", "cache_cleared_quarter_hour", time());
- }