Allow to log DB, redis and LDAP requests into files

Signed-off-by: Joas Schilling <coding@schilljs.com>

apps/user_ldap/lib/AppInfo/Application.php

 			);
 		});
 
-		$container->registerService(ILDAPWrapper::class, function () {
-			return new LDAP();
+		$container->registerService(ILDAPWrapper::class, function (IAppContainer $appContainer) {
+			/** @var IServerContainer $server */
+			$server = $appContainer->get(IServerContainer::class);
+
+			return new LDAP(
+				$server->getConfig()->getSystemValueString('ldap_log_file')
+			);
 		});
 	}
 

apps/user_ldap/lib/Jobs/Sync.php

 		if (isset($argument['ldapWrapper'])) {
 			$this->ldap = $argument['ldapWrapper'];
 		} else {
-			$this->ldap = new LDAP();
+			$this->ldap = new LDAP($this->config->getSystemValueString('ldap_log_file'));
 		}
 
 		if (isset($argument['avatarManager'])) {

apps/user_ldap/lib/LDAP.php

 use OCA\User_LDAP\PagedResults\Php73;
 
 class LDAP implements ILDAPWrapper {
+	protected $logFile = '';
 	protected $curFunc = '';
 	protected $curArgs = [];
 
 	/** @var IAdapter */
 	protected $pagedResultsAdapter;
 
-	public function __construct() {
+	public function __construct(string $logFile = '') {
 		$this->pagedResultsAdapter = new Php73();
+		$this->logFile = $logFile;
 	}
 
 	/**
 	private function preFunctionCall($functionName, $args) {
 		$this->curFunc = $functionName;
 		$this->curArgs = $args;
+
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			$args = array_reduce($this->curArgs, static function (array $carry, $item): array {
+				$carry[] = !is_resource($item) ? $item : '(resource)';
+				return $carry;
+			}, []);
+			file_put_contents(
+				$this->logFile,
+				$this->curFunc . '::' . json_encode($args) . "\n",
+				FILE_APPEND
+			);
+		}
 	}
 
 	/**

config/config.sample.php

  * Defaults to ``true``
  */
 'files_no_background_scan' => false,
+
+/**
+ * Log all queries into a file
+ *
+ * Warning: This heavily decreases the performance of the server and is only
+ * meant to debug/profile the query interaction manually.
+ * Also, it might log sensitive data into a plain text file.
+ */
+'query_log_file' => '',
+
+/**
+ * Log all redis requests into a file
+ *
+ * Warning: This heavily decreases the performance of the server and is only
+ * meant to debug/profile the redis interaction manually.
+ * Also, it might log sensitive data into a plain text file.
+ */
+'redis_log_file' => '',
+
+/**
+ * Log all LDAP requests into a file
+ *
+ * Warning: This heavily decreases the performance of the server and is only
+ * meant to debug/profile the LDAP interaction manually.
+ * Also, it might log sensitive data into a plain text file.
+ */
+'ldap_log_file' => '',
 ];

lib/private/DB/Connection.php

 		$sql = $this->replaceTablePrefix($sql);
 		$sql = $this->adapter->fixupStatement($sql);
 		$this->queriesExecuted++;
+		$this->logQueryToFile($sql);
 		return parent::executeQuery($sql, $params, $types, $qcp);
 	}
 
 		$sql = $this->replaceTablePrefix($sql);
 		$sql = $this->adapter->fixupStatement($sql);
 		$this->queriesExecuted++;
+		$this->logQueryToFile($sql);
 		return parent::executeUpdate($sql, $params, $types);
 	}
 
 		$sql = $this->replaceTablePrefix($sql);
 		$sql = $this->adapter->fixupStatement($sql);
 		$this->queriesExecuted++;
+		$this->logQueryToFile($sql);
 		return parent::executeStatement($sql, $params, $types);
 	}
 
+	protected function logQueryToFile(string $sql): void {
+		$logFile = $this->systemConfig->getValue('query_log_file', '');
+		if ($logFile !== '' && is_writable($logFile)) {
+			file_put_contents(
+				$this->systemConfig->getValue('query_log_file', ''),
+				$sql . "\n",
+				FILE_APPEND
+			);
+		}
+	}
+
 	/**
 	 * Returns the ID of the last inserted row, or the last value from a sequence object,
 	 * depending on the underlying driver.

lib/private/Memcache/Factory.php

 	 */
 	private $lockingCacheClass;
 
+	/** @var string */
+	private $logFile;
+
 	/**
 	 * @param string $globalPrefix
 	 * @param ILogger $logger
 	 * @param string|null $localCacheClass
 	 * @param string|null $distributedCacheClass
 	 * @param string|null $lockingCacheClass
+	 * @param string $logFile
 	 */
 	public function __construct(string $globalPrefix, ILogger $logger,
-		$localCacheClass = null, $distributedCacheClass = null, $lockingCacheClass = null) {
+		$localCacheClass = null, $distributedCacheClass = null, $lockingCacheClass = null, string $logFile = '') {
 		$this->logger = $logger;
+		$this->logFile = $logFile;
 		$this->globalPrefix = $globalPrefix;
 
 		if (!$localCacheClass) {
 	 * @return IMemcache
 	 */
 	public function createLocking(string $prefix = ''): IMemcache {
-		return new $this->lockingCacheClass($this->globalPrefix . '/' . $prefix);
+		return new $this->lockingCacheClass($this->globalPrefix . '/' . $prefix, $this->logFile);
 	}
 
 	/**
 	 * @return ICache
 	 */
 	public function createDistributed(string $prefix = ''): ICache {
-		return new $this->distributedCacheClass($this->globalPrefix . '/' . $prefix);
+		return new $this->distributedCacheClass($this->globalPrefix . '/' . $prefix, $this->logFile);
 	}
 
 	/**
 	 * @return ICache
 	 */
 	public function createLocal(string $prefix = ''): ICache {
-		return new $this->localCacheClass($this->globalPrefix . '/' . $prefix);
+		return new $this->localCacheClass($this->globalPrefix . '/' . $prefix, $this->logFile);
 	}
 
 	/**

lib/private/Memcache/Redis.php

 	 */
 	private static $cache = null;
 
-	public function __construct($prefix = '') {
+	private $logFile;
+
+	public function __construct($prefix = '', string $logFile = '') {
 		parent::__construct($prefix);
+		$this->logFile = $logFile;
 		if (is_null(self::$cache)) {
 			self::$cache = \OC::$server->getGetRedisFactory()->getInstance();
 		}
 	}
 
 	public function get($key) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::get::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		$result = self::$cache->get($this->getNameSpace() . $key);
 		if ($result === false && !self::$cache->exists($this->getNameSpace() . $key)) {
 			return null;
 	}
 
 	public function set($key, $value, $ttl = 0) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::set::' . $key . '::' . $ttl . '::' . json_encode($value) . "\n",
+				FILE_APPEND
+			);
+		}
+
 		if ($ttl > 0) {
 			return self::$cache->setex($this->getNameSpace() . $key, $ttl, json_encode($value));
 		} else {
 	}
 
 	public function hasKey($key) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::hasKey::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		return (bool)self::$cache->exists($this->getNameSpace() . $key);
 	}
 
 	public function remove($key) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::remove::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		if (self::$cache->del($this->getNameSpace() . $key)) {
 			return true;
 		} else {
 	}
 
 	public function clear($prefix = '') {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::clear::' . $prefix . "\n",
+				FILE_APPEND
+			);
+		}
+
 		$prefix = $this->getNameSpace() . $prefix . '*';
 		$keys = self::$cache->keys($prefix);
 		$deleted = self::$cache->del($keys);
 		if ($ttl !== 0 && is_int($ttl)) {
 			$args['ex'] = $ttl;
 		}
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::add::' . $key . '::' . $value . "\n",
+				FILE_APPEND
+			);
+		}
+
 
 		return self::$cache->set($this->getPrefix() . $key, $value, $args);
 	}
 	 * @return int | bool
 	 */
 	public function inc($key, $step = 1) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::inc::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		return self::$cache->incrBy($this->getNameSpace() . $key, $step);
 	}
 
 	 * @return int | bool
 	 */
 	public function dec($key, $step = 1) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::dec::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		if (!$this->hasKey($key)) {
 			return false;
 		}
 	 * @return bool
 	 */
 	public function cas($key, $old, $new) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::cas::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		if (!is_int($new)) {
 			$new = json_encode($new);
 		}
 	 * @return bool
 	 */
 	public function cad($key, $old) {
+		if ($this->logFile !== '' && is_writable($this->logFile)) {
+			file_put_contents(
+				$this->logFile,
+				$this->getNameSpace() . '::cad::' . $key . "\n",
+				FILE_APPEND
+			);
+		}
+
 		self::$cache->watch($this->getNameSpace() . $key);
 		if ($this->get($key) === $old) {
 			$result = self::$cache->multi()

lib/private/Server.php

 				return new \OC\Memcache\Factory($prefix, $c->get(ILogger::class),
 					$config->getSystemValue('memcache.local', null),
 					$config->getSystemValue('memcache.distributed', null),
-					$config->getSystemValue('memcache.locking', null)
+					$config->getSystemValue('memcache.locking', null),
+					$config->getSystemValueString('redis_log_file')
 				);
 			}
 			return $arrayCacheFactory;