feat: add command to send raw commands to redis

Signed-off-by: Robin Appelman <robin@icewind.nl>

Author: icewind1991

core/Command/Memcache/RedisCommand.php

@@ -0,0 +1,59 @@
+<?php
+
+declare(strict_types=1);
+/**
+ * SPDX-FileCopyrightText: 2024 Robin Appelman <robin@icewind.nl>
+ * SPDX-License-Identifier: AGPL-3.0-or-later
+ */
+
+namespace OC\Core\Command\Memcache;
+
+use OC\Core\Command\Base;
+use OC\RedisFactory;
+use OCP\ICertificateManager;
+use OCP\IL10N;
+use Symfony\Component\Console\Input\InputArgument;
+use Symfony\Component\Console\Input\InputInterface;
+use Symfony\Component\Console\Output\OutputInterface;
+
+class RedisCommand extends Base {
+	protected IL10N $l;
+
+	public function __construct(
+		protected ICertificateManager $certificateManager,
+		protected RedisFactory                  $redisFactory,
+	) {
+		parent::__construct();
+	}
+
+	protected function configure() {
+		$this
+			->setName('memcache:redis')
+			->setDescription('Send raw redis command to the configured redis server')
+			->addArgument('redis-command', InputArgument::REQUIRED | InputArgument::IS_ARRAY, 'The command to run');
+		parent::configure();
+	}
+
+	protected function execute(InputInterface $input, OutputInterface $output): int {
+		$command = $input->getArgument('redis-command');
+		if (!$this->redisFactory->isAvailable()) {
+			$output->writeln("<error>No redis server configured</error>");
+			return 1;
+		}
+		try {
+			$redis = $this->redisFactory->getInstance();
+		} catch (\Exception $e) {
+			$output->writeln('Failed to connect to redis: ' . $e->getMessage());
+			return 1;
+		}
+
+		$redis->setOption(\Redis::OPT_REPLY_LITERAL, true);
+		$result = $redis->rawCommand(...$command);
+		if ($result === false) {
+			$output->writeln("<error>Redis command failed</error>");
+			return 1;
+		}
+		$output->writeln($result);
+		return 0;
+	}
+}

core/register_command.php

@@ -140,6 +140,8 @@
 	$application->add(Server::get(Command\Security\BruteforceResetAttempts::class));
 	$application->add(Server::get(Command\SetupChecks::class));
 	$application->add(Server::get(Command\FilesMetadata\Get::class));
+
+	$application->add(Server::get(Command\Memcache\RedisCommand::class));
 } else {
 	$application->add(Server::get(Command\Maintenance\Install::class));
 }