Differential D2554 Diff 7168 src/app/Backends/Roundcube.php

Changeset View

Standalone View

src/app/Backends/Roundcube.php

This file was added.

				<?php

				namespace App\Backends;

				use Illuminate\Support\Facades\DB;

				class Roundcube
				{
				private const FILESTORE_TABLE = 'filestore';
				private const USERS_TABLE = 'users';

				/** @var array List of GnuPG files to store */
				private static $enigma_files = ['pubring.gpg', 'secring.gpg', 'pubring.kbx'];


				/**
				* Return connection to the Roundcube database
				*
				* @return \Illuminate\Database\ConnectionInterface
				*/
				public static function dbh()
				{
				if (!\config('database.connections.roundcube')) {
				\Log::warning("Roundcube database not configured");

				return DB::connection(\config('database.default'));
				}

				return DB::connection('roundcube');
				}

				/**
				* Remove all files from the Enigma filestore.
				*
				* @param string $email User email address
				*/
				public static function enigmaCleanup(string $email): void
				{
				self::dbh()->table(self::FILESTORE_TABLE)
				->where('user_id', self::userId($email))
				->where('context', 'enigma')
				->delete();
				}

				/**
				* List all files from the Enigma filestore.
				*
				* @param string $email User email address
				*
				* @return array List of Enigma filestore records
				*/
				public static function enigmaList(string $email): array
				{
				return self::dbh()->table(self::FILESTORE_TABLE)
				->where('user_id', self::userId($email))
				->where('context', 'enigma')
				->orderBy('filename')
				->get()
				->all();
				}

				/**
				* Synchronize Enigma filestore from/to specified directory
				*
				* @param string $email User email address
				* @param string $homedir Directory location
				*/
				public static function enigmaSync(string $email, string $homedir): void
				{
				$db = self::dbh();
				$debug = \config('app.debug');
				$user_id = self::userId($email);
				$files = [];

				$result = $db->table(self::FILESTORE_TABLE)->select('file_id', 'filename', 'mtime')
				->where('user_id', $user_id)
				->where('context', 'enigma')
				->get();

				foreach ($result as $record) {
				$file = $homedir . '/' . $record->filename;
				$mtime = @filemtime($file);
				$files[] = $record->filename;

				if ($mtime < $record->mtime) {
				$record = $db->table(self::FILESTORE_TABLE)->select('file_id', 'data', 'mtime')
				->where('file_id', $record->file_id)
				->first();

				$data = $record ? base64_decode($record->data) : false;

				if ($data === false) {
				\Log::error("Failed to sync $file ({$record->file_id}). Decode error.");
				continue;
				}

				$tmpfile = $file . '.tmp';

				if (file_put_contents($tmpfile, $data, LOCK_EX) === strlen($data)) {
				rename($tmpfile, $file);
				touch($file, $record->mtime);

				if ($debug) {
				\Log::debug("[SYNC] Fetched file: $file");
				}
				} else {
				@unlink($tmpfile);
				\Log::error("Failed to sync $file.");
				}
				}
				}

				// Remove files not in database
				foreach (array_diff(self::enigmaFilesList($homedir), $files) as $file) {
				$file = $homedir . '/' . $file;

				if (unlink($file)) {
				if ($debug) {
				\Log::debug("[SYNC] Removed file: $file");
				}
				}
				}

				// No records found, do initial sync if already have the keyring
				if (empty($file)) {
				self::enigmaSave(true, $homedir);
				}
				}

				/**
				* Save the keys database
				*
				* @param string $email User email address
				* @param string $homedir Directory location
				* @param bool $is_empty Set to Tre if it is a initial save
				*/
				public static function enigmaSave(string $email, string $homedir, bool $is_empty = false): void
				{
				$db = self::dbh();
				$debug = \config('app.debug');
				$user_id = self::userId($email);
				$records = [];

				if (!$is_empty) {
				$result = $db->table(self::FILESTORE_TABLE)->select('file_id', 'filename', 'mtime')
				->where('user_id', $user_id)
				->where('context', 'enigma')
				->get()
				->each(function ($record) use ($records) {
				$records[$record->filename] = $record;
				});
				}

				foreach (self::enigmaFilesList($homedir) as $filename) {
				$file = $homedir . '/' . $filename;
				$mtime = @filemtime($file);

				$existing = !empty($records[$filename]) ? $records[$filename] : null;
				unset($records[$filename]);

				if ($mtime && (empty($existing) \|\| $mtime > $existing->mtime)) {
				$data = file_get_contents($file);
				$data = base64_encode($data);
				$datasize = strlen($data);
				/*
				if (empty($maxsize)) {
				$maxsize = min($db->get_variable('max_allowed_packet', 1048500), 410241024) - 2000;
				}

				if ($datasize > $maxsize) {
				\Log::error("Failed to save $file. Size exceeds max_allowed_packet.");
				continue;
				}
				*/
				$result = $db->table(self::FILESTORE_TABLE)->updateOrInsert(
				['user_id' => $user_id, 'context' => 'enigma', 'filename' => $filename],
				['mtime' => $mtime, 'data' => $data]
				);

				if ($debug) {
				\Log::debug("[SYNC] Pushed file: $file");
				}
				}
				}

				// Delete removed files from database
				foreach (array_keys($records) as $filename) {
				$file = $homedir . '/' . $filename;
				$result = $db->table(self::FILESTORE_TABLE)
				->where('user_id', $user_id)
				->where('context', 'enigma')
				->where('filename', $filename)
				->delete();

				if ($debug) {
				\Log::debug("[SYNC] Removed file: $file");
				}
				}
				}

				/**
				* Find the Roundcube user identifier for the specified user.
				*
				* @param string $email User email address
				* @param bool $create Make sure the user record exists
				*
				* @returns ?int Roundcube user identifier
				*/
				public static function userId(string $email, bool $create = true): ?int
				{
				$db = self::dbh();

				$user = $db->table(self::USERS_TABLE)->select('user_id')
				->where('username', \strtolower($email))
				->first();

				// Create a user record, without it we can't use the Roundcube storage
				if (empty($user)) {
				if (!$create) {
				return null;
				}

				$uri = \parse_url(\config('imap.uri'));

				return (int) $db->table(self::USERS_TABLE)->insertGetId(
				[
				'username' => $email,
				'mail_host' => $uri['host'],
				'created' => now()->toDateTimeString(),
				],
				'user_id'
				);
				}

				return (int) $user->user_id;
				}

				/**
				* Returns list of Enigma user homedir files to backup/sync
				*/
				private static function enigmaFilesList(string $homedir)
				{
				$files = [];

				foreach (self::$enigma_files as $file) {
				if (file_exists($homedir . '/' . $file)) {
				$files[] = $file;
				}
				}

				foreach (glob($homedir . '/private-keys-v1.d/*.key') as $file) {
				$files[] = ltrim(substr($file, strlen($homedir)), '/');
				}

				return $files;
				}
				}