1 files changed, 87 insertions, 0 deletions
diff --git a/tests/lib/Memcache/RedisTest.php b/tests/lib/Memcache/RedisTest.php
new file mode 100644
index 00000000000..c1dcc954925
--- /dev/null
+++ b/tests/lib/Memcache/RedisTest.php
@@ -0,0 +1,87 @@
+<?php
+
+/**
+ * SPDX-FileCopyrightText: 2016-2024 Nextcloud GmbH and Nextcloud contributors
+ * SPDX-FileCopyrightText: 2016 ownCloud, Inc.
+ * SPDX-License-Identifier: AGPL-3.0-or-later
+ */
+
+namespace Test\Memcache;
+
+use OC\Memcache\Redis;
+use OCP\IConfig;
+use OCP\Server;
+
+/**
+ * @group Memcache
+ * @group Redis
+ */
+class RedisTest extends Cache {
+	/**
+	 * @var Redis cache;
+	 */
+	protected $instance;
+
+	public static function setUpBeforeClass(): void {
+		parent::setUpBeforeClass();
+
+		if (!Redis::isAvailable()) {
+			self::markTestSkipped('The redis extension is not available.');
+		}
+
+		if (Server::get(IConfig::class)->getSystemValue('redis', []) === []) {
+			self::markTestSkipped('Redis not configured in config.php');
+		}
+
+		$errorOccurred = false;
+		set_error_handler(
+			function ($errno, $errstr): void {
+				throw new \RuntimeException($errstr, 123456789);
+			},
+			E_WARNING
+		);
+		$instance = null;
+		try {
+			$instance = new Redis(self::getUniqueID());
+		} catch (\RuntimeException $e) {
+			$errorOccurred = $e->getCode() === 123456789 ? $e->getMessage() : false;
+		}
+		restore_error_handler();
+		if ($errorOccurred !== false) {
+			self::markTestSkipped($errorOccurred);
+		}
+
+		if ($instance === null) {
+			throw new \Exception('redis server is not reachable');
+		}
+
+		if ($instance->set(self::getUniqueID(), self::getUniqueID()) === false) {
+			self::markTestSkipped('redis server seems to be down.');
+		}
+	}
+
+	protected function setUp(): void {
+		parent::setUp();
+		$this->instance = new Redis($this->getUniqueID());
+	}
+
+	public function testScriptHashes(): void {
+		foreach (Redis::LUA_SCRIPTS as $script) {
+			$this->assertEquals(sha1($script[0]), $script[1]);
+		}
+	}
+
+	public function testCasTtlNotChanged(): void {
+		$this->instance->set('foo', 'bar', 50);
+		$this->assertTrue($this->instance->compareSetTTL('foo', 'bar', 100));
+		// allow for 1s of inaccuracy due to time moving forward
+		$this->assertLessThan(1, 100 - $this->instance->getTTL('foo'));
+	}
+
+	public function testCasTtlChanged(): void {
+		$this->instance->set('foo', 'bar1', 50);
+		$this->assertFalse($this->instance->compareSetTTL('foo', 'bar', 100));
+		// allow for 1s of inaccuracy due to time moving forward
+		$this->assertLessThan(1, 50 - $this->instance->getTTL('foo'));
+	}
+}