From d96cd82652c6514ec6b45815e33922a503081ef3 Mon Sep 17 00:00:00 2001
From: Simon Rettberg
Date: Wed, 20 Feb 2019 22:16:55 +0100
Subject: [locationinfo] Don't refresh calendars indefinitely

We try to refresh calendars that have recently been used
to coalesce requests, which helps especially with HisInOne.
However, this would in turn make the calendar recently
refreshed so it would keep going on and on, as long as there
is at least one active info panel making actual requests.
---
 modules-available/locationinfo/inc/coursebackend.inc.php | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

(limited to 'modules-available/locationinfo/inc')

diff --git a/modules-available/locationinfo/inc/coursebackend.inc.php b/modules-available/locationinfo/inc/coursebackend.inc.php
index 2eb3f55d..f8389c78 100644
--- a/modules-available/locationinfo/inc/coursebackend.inc.php
+++ b/modules-available/locationinfo/inc/coursebackend.inc.php
@@ -167,10 +167,11 @@ abstract class CourseBackend
 		}
 		if (empty($requestedLocationIds))
 			return array();
+		$requestedLocationIds = array_values($requestedLocationIds);
 		$NOW = time();
 		$dbquery1 = Database::simpleQuery("SELECT locationid, calendar, serverlocationid, lastcalendarupdate
 				FROM locationinfo_locationconfig WHERE locationid IN (:locations)",
-				array('locations' => array_values($requestedLocationIds)));
+				array('locations' => $requestedLocationIds));
 		$returnValue = [];
 		$remoteIds = [];
 		while ($row = $dbquery1->fetch(PDO::FETCH_ASSOC)) {
@@ -186,17 +187,20 @@ abstract class CourseBackend
 		if (empty($remoteIds)) {
 			return $returnValue;
 		}
+		// Mark requested locations as used
+		Database::exec("UPDATE locationinfo_locationconfig SET lastuse = :now WHERE locationid IN (:locations)",
+			['locations' => $requestedLocationIds]);
 		// Check if we should refresh other rooms recently requested by front ends
 		$extraLocs = self::TRY_NUM_LOCATIONS - count($remoteIds);
 		if ($this->getRefreshTime() > $this->getCacheTime() && $extraLocs > 0) {
 			$dbquery4 = Database::simpleQuery("SELECT locationid, serverlocationid FROM locationinfo_locationconfig
 					WHERE serverid = :serverid AND serverlocationid NOT IN (:skiplist)
-					AND lastcalendarupdate BETWEEN :lowerage AND :upperage
+					AND lastcalendarupdate < :minage AND lastuse > :lastuse
 					LIMIT $extraLocs", array(
 						'serverid' => $this->serverId,
 						'skiplist' => array_values($remoteIds),
-						'lowerage' => $NOW - $this->getRefreshTime(),
-						'upperage' => $NOW - $this->getCacheTime(),
+						'lastuse' => $NOW - $this->getRefreshTime(),
+						'minage' => $NOW - $this->getCacheTime(),
 			));
 			while ($row = $dbquery4->fetch(PDO::FETCH_ASSOC)) {
 				$remoteIds[$row['locationid']] = $row['serverlocationid'];
-- 
cgit v1.2.3-55-g7522