migrate therinaldos.com data

wedding-pics/lib/private/Archive/Archive.php

@@ -0,0 +1,125 @@
+<?php
+/**
+ * @copyright Copyright (c) 2016, ownCloud, Inc.
+ *
+ * @author Arthur Schiwon <blizzz@arthur-schiwon.de>
+ * @author Christopher Schäpers <kondou@ts.unde.re>
+ * @author Christoph Wurst <christoph@winzerhof-wurst.at>
+ * @author Joas Schilling <coding@schilljs.com>
+ * @author Jörn Friedrich Dreyer <jfd@butonic.de>
+ * @author Lukas Reschke <lukas@statuscode.ch>
+ * @author Morris Jobke <hey@morrisjobke.de>
+ * @author Robin Appelman <robin@icewind.nl>
+ * @author Roeland Jago Douma <roeland@famdouma.nl>
+ *
+ * @license AGPL-3.0
+ *
+ * This code is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License, version 3,
+ * as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License, version 3,
+ * along with this program. If not, see <http://www.gnu.org/licenses/>
+ *
+ */
+namespace OC\Archive;
+
+abstract class Archive {
+	abstract public function __construct(string $source);
+
+	/**
+	 * add an empty folder to the archive
+	 */
+	abstract public function addFolder(string $path): bool;
+
+	/**
+	 * add a file to the archive
+	 * @param string $source either a local file or string data
+	 */
+	abstract public function addFile(string $path, string $source = ''): bool;
+
+	/**
+	 * rename a file or folder in the archive
+	 */
+	abstract public function rename(string $source, string $dest): bool;
+
+	/**
+	 * get the uncompressed size of a file in the archive
+	 */
+	abstract public function filesize(string $path): false|int|float;
+
+	/**
+	 * get the last modified time of a file in the archive
+	 * @return int|false
+	 */
+	abstract public function mtime(string $path);
+
+	/**
+	 * get the files in a folder
+	 * @param string $path
+	 * @return array
+	 */
+	abstract public function getFolder(string $path): array;
+
+	/**
+	 * get all files in the archive
+	 */
+	abstract public function getFiles(): array;
+
+	/**
+	 * get the content of a file
+	 * @return string|false
+	 */
+	abstract public function getFile(string $path);
+
+	/**
+	 * extract a single file from the archive
+	 */
+	abstract public function extractFile(string $path, string $dest): bool;
+
+	/**
+	 * extract the archive
+	 */
+	abstract public function extract(string $dest): bool;
+
+	/**
+	 * check if a file or folder exists in the archive
+	 */
+	abstract public function fileExists(string $path): bool;
+
+	/**
+	 * remove a file or folder from the archive
+	 */
+	abstract public function remove(string $path): bool;
+
+	/**
+	 * get a file handler
+	 * @return bool|resource
+	 */
+	abstract public function getStream(string $path, string $mode);
+
+	/**
+	 * add a folder and all its content
+	 */
+	public function addRecursive(string $path, string $source): void {
+		$dh = opendir($source);
+		if (is_resource($dh)) {
+			$this->addFolder($path);
+			while (($file = readdir($dh)) !== false) {
+				if ($file === '.' || $file === '..') {
+					continue;
+				}
+				if (is_dir($source.'/'.$file)) {
+					$this->addRecursive($path.'/'.$file, $source.'/'.$file);
+				} else {
+					$this->addFile($path.'/'.$file, $source.'/'.$file);
+				}
+			}
+		}
+	}
+}

wedding-pics/lib/private/Archive/TAR.php

@@ -0,0 +1,367 @@
+<?php
+/**
+ * @copyright Copyright (c) 2016, ownCloud, Inc.
+ *
+ * @author Bart Visscher <bartv@thisnet.nl>
+ * @author Christopher Schäpers <kondou@ts.unde.re>
+ * @author Christoph Wurst <christoph@winzerhof-wurst.at>
+ * @author Daniel Kesselberg <mail@danielkesselberg.de>
+ * @author Joas Schilling <coding@schilljs.com>
+ * @author Jörn Friedrich Dreyer <jfd@butonic.de>
+ * @author Morris Jobke <hey@morrisjobke.de>
+ * @author Remco Brenninkmeijer <requist1@starmail.nl>
+ * @author Robin Appelman <robin@icewind.nl>
+ * @author Robin McCorkell <robin@mccorkell.me.uk>
+ * @author Roeland Jago Douma <roeland@famdouma.nl>
+ * @author Thomas Müller <thomas.mueller@tmit.eu>
+ *
+ * @license AGPL-3.0
+ *
+ * This code is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License, version 3,
+ * as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License, version 3,
+ * along with this program. If not, see <http://www.gnu.org/licenses/>
+ *
+ */
+namespace OC\Archive;
+
+use Icewind\Streams\CallbackWrapper;
+
+class TAR extends Archive {
+	public const PLAIN = 0;
+	public const GZIP = 1;
+	public const BZIP = 2;
+
+	/**
+	 * @var string[]|false
+	 */
+	private $fileList = false;
+	/**
+	 * @var array|false
+	 */
+	private $cachedHeaders = false;
+
+	/**
+	 * @var \Archive_Tar
+	 */
+	private $tar = null;
+
+	/**
+	 * @var string
+	 */
+	private $path;
+
+	public function __construct(string $source) {
+		$types = [null, 'gz', 'bz2'];
+		$this->path = $source;
+		$this->tar = new \Archive_Tar($source, $types[self::getTarType($source)]);
+	}
+
+	/**
+	 * try to detect the type of tar compression
+	 */
+	public static function getTarType(string $file): int {
+		if (strpos($file, '.')) {
+			$extension = substr($file, strrpos($file, '.'));
+			switch ($extension) {
+				case '.gz':
+				case '.tgz':
+					return self::GZIP;
+				case '.bz':
+				case '.bz2':
+					return self::BZIP;
+				case '.tar':
+					return self::PLAIN;
+				default:
+					return self::PLAIN;
+			}
+		} else {
+			return self::PLAIN;
+		}
+	}
+
+	/**
+	 * add an empty folder to the archive
+	 */
+	public function addFolder(string $path): bool {
+		$tmpBase = \OC::$server->getTempManager()->getTemporaryFolder();
+		$path = rtrim($path, '/') . '/';
+		if ($this->fileExists($path)) {
+			return false;
+		}
+		$parts = explode('/', $path);
+		$folder = $tmpBase;
+		foreach ($parts as $part) {
+			$folder .= '/' . $part;
+			if (!is_dir($folder)) {
+				mkdir($folder);
+			}
+		}
+		$result = $this->tar->addModify([$tmpBase . $path], '', $tmpBase);
+		rmdir($tmpBase . $path);
+		$this->fileList = false;
+		$this->cachedHeaders = false;
+		return $result;
+	}
+
+	/**
+	 * add a file to the archive
+	 *
+	 * @param string $source either a local file or string data
+	 */
+	public function addFile(string $path, string $source = ''): bool {
+		if ($this->fileExists($path)) {
+			$this->remove($path);
+		}
+		if ($source and $source[0] == '/' and file_exists($source)) {
+			$source = file_get_contents($source);
+		}
+		$result = $this->tar->addString($path, $source);
+		$this->fileList = false;
+		$this->cachedHeaders = false;
+		return $result;
+	}
+
+	/**
+	 * rename a file or folder in the archive
+	 */
+	public function rename(string $source, string $dest): bool {
+		//no proper way to delete, rename entire archive, rename file and remake archive
+		$tmp = \OC::$server->getTempManager()->getTemporaryFolder();
+		$this->tar->extract($tmp);
+		rename($tmp . $source, $tmp . $dest);
+		$this->tar = null;
+		unlink($this->path);
+		$types = [null, 'gz', 'bz'];
+		$this->tar = new \Archive_Tar($this->path, $types[self::getTarType($this->path)]);
+		$this->tar->createModify([$tmp], '', $tmp . '/');
+		$this->fileList = false;
+		$this->cachedHeaders = false;
+		return true;
+	}
+
+	private function getHeader(string $file): ?array {
+		if (!$this->cachedHeaders) {
+			$this->cachedHeaders = $this->tar->listContent();
+		}
+		foreach ($this->cachedHeaders as $header) {
+			if ($file == $header['filename']
+				or $file . '/' == $header['filename']
+				or '/' . $file . '/' == $header['filename']
+				or '/' . $file == $header['filename']
+			) {
+				return $header;
+			}
+		}
+		return null;
+	}
+
+	/**
+	 * get the uncompressed size of a file in the archive
+	 */
+	public function filesize(string $path): false|int|float {
+		$stat = $this->getHeader($path);
+		return $stat['size'] ?? false;
+	}
+
+	/**
+	 * get the last modified time of a file in the archive
+	 *
+	 * @return int|false
+	 */
+	public function mtime(string $path) {
+		$stat = $this->getHeader($path);
+		return $stat['mtime'] ?? false;
+	}
+
+	/**
+	 * get the files in a folder
+	 */
+	public function getFolder(string $path): array {
+		$files = $this->getFiles();
+		$folderContent = [];
+		$pathLength = strlen($path);
+		foreach ($files as $file) {
+			if ($file[0] == '/') {
+				$file = substr($file, 1);
+			}
+			if (substr($file, 0, $pathLength) == $path and $file != $path) {
+				$result = substr($file, $pathLength);
+				if ($pos = strpos($result, '/')) {
+					$result = substr($result, 0, $pos + 1);
+				}
+				if (!in_array($result, $folderContent)) {
+					$folderContent[] = $result;
+				}
+			}
+		}
+		return $folderContent;
+	}
+
+	/**
+	 * get all files in the archive
+	 */
+	public function getFiles(): array {
+		if ($this->fileList) {
+			return $this->fileList;
+		}
+		if (!$this->cachedHeaders) {
+			$this->cachedHeaders = $this->tar->listContent();
+		}
+		$files = [];
+		foreach ($this->cachedHeaders as $header) {
+			$files[] = $header['filename'];
+		}
+		$this->fileList = $files;
+		return $files;
+	}
+
+	/**
+	 * get the content of a file
+	 *
+	 * @return string|false
+	 */
+	public function getFile(string $path) {
+		$string = $this->tar->extractInString($path);
+		if (is_string($string)) {
+			return $string;
+		} else {
+			return false;
+		}
+	}
+
+	/**
+	 * extract a single file from the archive
+	 */
+	public function extractFile(string $path, string $dest): bool {
+		$tmp = \OC::$server->getTempManager()->getTemporaryFolder();
+		if (!$this->fileExists($path)) {
+			return false;
+		}
+		if ($this->fileExists('/' . $path)) {
+			$success = $this->tar->extractList(['/' . $path], $tmp);
+		} else {
+			$success = $this->tar->extractList([$path], $tmp);
+		}
+		if ($success) {
+			rename($tmp . $path, $dest);
+		}
+		\OCP\Files::rmdirr($tmp);
+		return $success;
+	}
+
+	/**
+	 * extract the archive
+	 */
+	public function extract(string $dest): bool {
+		return $this->tar->extract($dest);
+	}
+
+	/**
+	 * check if a file or folder exists in the archive
+	 */
+	public function fileExists(string $path): bool {
+		$files = $this->getFiles();
+		if ((in_array($path, $files)) or (in_array($path . '/', $files))) {
+			return true;
+		} else {
+			$folderPath = rtrim($path, '/') . '/';
+			$pathLength = strlen($folderPath);
+			foreach ($files as $file) {
+				if (strlen($file) > $pathLength and substr($file, 0, $pathLength) == $folderPath) {
+					return true;
+				}
+			}
+		}
+		if ($path[0] != '/') { //not all programs agree on the use of a leading /
+			return $this->fileExists('/' . $path);
+		} else {
+			return false;
+		}
+	}
+
+	/**
+	 * remove a file or folder from the archive
+	 */
+	public function remove(string $path): bool {
+		if (!$this->fileExists($path)) {
+			return false;
+		}
+		$this->fileList = false;
+		$this->cachedHeaders = false;
+		//no proper way to delete, extract entire archive, delete file and remake archive
+		$tmp = \OC::$server->getTempManager()->getTemporaryFolder();
+		$this->tar->extract($tmp);
+		\OCP\Files::rmdirr($tmp . $path);
+		$this->tar = null;
+		unlink($this->path);
+		$this->reopen();
+		$this->tar->createModify([$tmp], '', $tmp);
+		return true;
+	}
+
+	/**
+	 * get a file handler
+	 *
+	 * @return bool|resource
+	 */
+	public function getStream(string $path, string $mode) {
+		$lastPoint = strrpos($path, '.');
+		if ($lastPoint !== false) {
+			$ext = substr($path, $lastPoint);
+		} else {
+			$ext = '';
+		}
+		$tmpFile = \OC::$server->getTempManager()->getTemporaryFile($ext);
+		if ($this->fileExists($path)) {
+			$this->extractFile($path, $tmpFile);
+		} elseif ($mode == 'r' or $mode == 'rb') {
+			return false;
+		}
+		if ($mode == 'r' or $mode == 'rb') {
+			return fopen($tmpFile, $mode);
+		} else {
+			$handle = fopen($tmpFile, $mode);
+			return CallbackWrapper::wrap($handle, null, null, function () use ($path, $tmpFile) {
+				$this->writeBack($tmpFile, $path);
+			});
+		}
+	}
+
+	/**
+	 * write back temporary files
+	 */
+	public function writeBack(string $tmpFile, string $path): void {
+		$this->addFile($path, $tmpFile);
+		unlink($tmpFile);
+	}
+
+	/**
+	 * reopen the archive to ensure everything is written
+	 */
+	private function reopen(): void {
+		if ($this->tar) {
+			$this->tar->_close();
+			$this->tar = null;
+		}
+		$types = [null, 'gz', 'bz'];
+		$this->tar = new \Archive_Tar($this->path, $types[self::getTarType($this->path)]);
+	}
+
+	/**
+	 * Get error object from archive_tar.
+	 */
+	public function getError(): ?\PEAR_Error {
+		if ($this->tar instanceof \Archive_Tar && $this->tar->error_object instanceof \PEAR_Error) {
+			return $this->tar->error_object;
+		}
+		return null;
+	}
+}

wedding-pics/lib/private/Archive/ZIP.php

@@ -0,0 +1,253 @@
+<?php
+/**
+ * @copyright Copyright (c) 2016, ownCloud, Inc.
+ *
+ * @author Arthur Schiwon <blizzz@arthur-schiwon.de>
+ * @author Bart Visscher <bartv@thisnet.nl>
+ * @author Christopher Schäpers <kondou@ts.unde.re>
+ * @author Christoph Wurst <christoph@winzerhof-wurst.at>
+ * @author Joas Schilling <coding@schilljs.com>
+ * @author Jörn Friedrich Dreyer <jfd@butonic.de>
+ * @author Morris Jobke <hey@morrisjobke.de>
+ * @author Robin Appelman <robin@icewind.nl>
+ * @author Roeland Jago Douma <roeland@famdouma.nl>
+ * @author Stefan Weil <sw@weilnetz.de>
+ * @author Thomas Müller <thomas.mueller@tmit.eu>
+ *
+ * @license AGPL-3.0
+ *
+ * This code is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License, version 3,
+ * as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License, version 3,
+ * along with this program. If not, see <http://www.gnu.org/licenses/>
+ *
+ */
+namespace OC\Archive;
+
+use Icewind\Streams\CallbackWrapper;
+use Psr\Log\LoggerInterface;
+
+class ZIP extends Archive {
+	/**
+	 * @var \ZipArchive zip
+	 */
+	private $zip;
+
+	/**
+	 * @var string
+	 */
+	private $path;
+
+	public function __construct(string $source) {
+		$this->path = $source;
+		$this->zip = new \ZipArchive();
+		if ($this->zip->open($source, \ZipArchive::CREATE)) {
+		} else {
+			\OC::$server->get(LoggerInterface::class)->warning('Error while opening archive '.$source, ['app' => 'files_archive']);
+		}
+	}
+
+	/**
+	 * add an empty folder to the archive
+	 * @param string $path
+	 * @return bool
+	 */
+	public function addFolder(string $path): bool {
+		return $this->zip->addEmptyDir($path);
+	}
+
+	/**
+	 * add a file to the archive
+	 * @param string $source either a local file or string data
+	 */
+	public function addFile(string $path, string $source = ''): bool {
+		if ($source and $source[0] == '/' and file_exists($source)) {
+			$result = $this->zip->addFile($source, $path);
+		} else {
+			$result = $this->zip->addFromString($path, $source);
+		}
+		if ($result) {
+			$this->zip->close();//close and reopen to save the zip
+			$this->zip->open($this->path);
+		}
+		return $result;
+	}
+
+	/**
+	 * rename a file or folder in the archive
+	 */
+	public function rename(string $source, string $dest): bool {
+		$source = $this->stripPath($source);
+		$dest = $this->stripPath($dest);
+		return $this->zip->renameName($source, $dest);
+	}
+
+	/**
+	 * get the uncompressed size of a file in the archive
+	 */
+	public function filesize(string $path): false|int|float {
+		$stat = $this->zip->statName($path);
+		return $stat['size'] ?? false;
+	}
+
+	/**
+	 * get the last modified time of a file in the archive
+	 * @return int|false
+	 */
+	public function mtime(string $path) {
+		return filemtime($this->path);
+	}
+
+	/**
+	 * get the files in a folder
+	 */
+	public function getFolder(string $path): array {
+		// FIXME: multiple calls on getFolder would traverse
+		// the whole file list over and over again
+		// maybe use a Generator or cache the list ?
+		$files = $this->getFiles();
+		$folderContent = [];
+		$pathLength = strlen($path);
+		foreach ($files as $file) {
+			if (substr($file, 0, $pathLength) == $path and $file != $path) {
+				if (strrpos(substr($file, 0, -1), '/') <= $pathLength) {
+					$folderContent[] = substr($file, $pathLength);
+				}
+			}
+		}
+		return $folderContent;
+	}
+
+	/**
+	 * Generator that returns metadata of all files
+	 *
+	 * @return \Generator<array>
+	 */
+	public function getAllFilesStat() {
+		$fileCount = $this->zip->numFiles;
+		for ($i = 0;$i < $fileCount;$i++) {
+			yield $this->zip->statIndex($i);
+		}
+	}
+
+	/**
+	 * Return stat information for the given path
+	 *
+	 * @param string path path to get stat information on
+	 * @return ?array stat information or null if not found
+	 */
+	public function getStat(string $path): ?array {
+		$stat = $this->zip->statName($path);
+		if (!$stat) {
+			return null;
+		}
+		return $stat;
+	}
+
+	/**
+	 * get all files in the archive
+	 */
+	public function getFiles(): array {
+		$fileCount = $this->zip->numFiles;
+		$files = [];
+		for ($i = 0;$i < $fileCount;$i++) {
+			$files[] = $this->zip->getNameIndex($i);
+		}
+		return $files;
+	}
+
+	/**
+	 * get the content of a file
+	 * @return string|false
+	 */
+	public function getFile(string $path) {
+		return $this->zip->getFromName($path);
+	}
+
+	/**
+	 * extract a single file from the archive
+	 */
+	public function extractFile(string $path, string $dest): bool {
+		$fp = $this->zip->getStream($path);
+		if ($fp === false) {
+			return false;
+		}
+		return file_put_contents($dest, $fp) !== false;
+	}
+
+	/**
+	 * extract the archive
+	 */
+	public function extract(string $dest): bool {
+		return $this->zip->extractTo($dest);
+	}
+
+	/**
+	 * check if a file or folder exists in the archive
+	 */
+	public function fileExists(string $path): bool {
+		return ($this->zip->locateName($path) !== false) or ($this->zip->locateName($path.'/') !== false);
+	}
+
+	/**
+	 * remove a file or folder from the archive
+	 */
+	public function remove(string $path): bool {
+		if ($this->fileExists($path.'/')) {
+			return $this->zip->deleteName($path.'/');
+		} else {
+			return $this->zip->deleteName($path);
+		}
+	}
+
+	/**
+	 * get a file handler
+	 * @return bool|resource
+	 */
+	public function getStream(string $path, string $mode) {
+		if ($mode == 'r' or $mode == 'rb') {
+			return $this->zip->getStream($path);
+		} else {
+			//since we can't directly get a writable stream,
+			//make a temp copy of the file and put it back
+			//in the archive when the stream is closed
+			$lastPoint = strrpos($path, '.');
+			if ($lastPoint !== false) {
+				$ext = substr($path, $lastPoint);
+			} else {
+				$ext = '';
+			}
+			$tmpFile = \OC::$server->getTempManager()->getTemporaryFile($ext);
+			if ($this->fileExists($path)) {
+				$this->extractFile($path, $tmpFile);
+			}
+			$handle = fopen($tmpFile, $mode);
+			return CallbackWrapper::wrap($handle, null, null, function () use ($path, $tmpFile) {
+				$this->writeBack($tmpFile, $path);
+			});
+		}
+	}
+
+	/**
+	 * write back temporary files
+	 */
+	public function writeBack(string $tmpFile, string $path): void {
+		$this->addFile($path, $tmpFile);
+		unlink($tmpFile);
+	}
+
+	private function stripPath(string $path): string {
+		if (!$path || $path[0] == '/') {
+			return substr($path, 1);
+		} else {
+			return $path;
+		}
+	}
+}