nextcloud/lib/private/archive/tar.php

367 lines
7.9 KiB
PHP
Raw Normal View History

<?php
/**
* Copyright (c) 2012 Robin Appelman <icewind@owncloud.com>
* This file is licensed under the Affero General Public License version 3 or
* later.
* See the COPYING-README file.
*/
require_once OC::$THIRDPARTYROOT . '/3rdparty/Archive/Tar.php';
2014-08-17 00:13:53 +04:00
class OC_Archive_TAR extends OC_Archive {
const PLAIN = 0;
const GZIP = 1;
const BZIP = 2;
2012-05-18 03:54:02 +04:00
private $fileList;
2012-10-05 14:29:27 +04:00
private $cachedHeaders;
2012-08-29 10:38:33 +04:00
/**
* @var Archive_Tar tar
*/
2014-08-17 00:13:53 +04:00
private $tar = null;
private $path;
/**
* @param string $source
*/
2012-09-07 17:22:01 +04:00
function __construct($source) {
2014-08-17 00:13:53 +04:00
$types = array(null, 'gz', 'bz');
$this->path = $source;
$this->tar = new Archive_Tar($source, $types[self::getTarType($source)]);
}
/**
* try to detect the type of tar compression
2014-08-17 00:13:53 +04:00
*
* @param string $file
* @return integer
*/
2012-09-07 17:22:01 +04:00
static public function getTarType($file) {
2014-08-17 00:13:53 +04:00
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;
}
2014-08-17 00:13:53 +04:00
} else {
return self::PLAIN;
}
}
/**
* add an empty folder to the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return bool
*/
2012-09-07 17:22:01 +04:00
function addFolder($path) {
2014-08-17 00:13:53 +04:00
$tmpBase = OC_Helper::tmpFolder();
if (substr($path, -1, 1) != '/') {
$path .= '/';
}
2014-08-17 00:13:53 +04:00
if ($this->fileExists($path)) {
return false;
}
2014-08-17 00:13:53 +04:00
$parts = explode('/', $path);
$folder = $tmpBase;
foreach ($parts as $part) {
$folder .= '/' . $part;
if (!is_dir($folder)) {
mkdir($folder);
}
}
2014-08-17 00:13:53 +04:00
$result = $this->tar->addModify(array($tmpBase . $path), '', $tmpBase);
rmdir($tmpBase . $path);
$this->fileList = false;
$this->cachedHeaders = false;
return $result;
}
2014-08-17 00:13:53 +04:00
/**
* add a file to the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @param string $source either a local file or string data
* @return bool
*/
2014-08-17 00:13:53 +04:00
function addFile($path, $source = '') {
if ($this->fileExists($path)) {
$this->remove($path);
}
2014-08-17 00:13:53 +04:00
if ($source and $source[0] == '/' and file_exists($source)) {
2014-08-17 00:19:01 +04:00
$source = file_get_contents($source);
}
2014-08-17 00:19:01 +04:00
$result = $this->tar->addString($path, $source);
2014-08-17 00:13:53 +04:00
$this->fileList = false;
$this->cachedHeaders = false;
return $result;
}
/**
* rename a file or folder in the archive
2014-08-17 00:13:53 +04:00
*
* @param string $source
* @param string $dest
* @return bool
*/
2012-11-02 22:53:02 +04:00
function rename($source, $dest) {
//no proper way to delete, rename entire archive, rename file and remake archive
2014-08-17 00:13:53 +04:00
$tmp = OCP\Files::tmpFolder();
$this->tar->extract($tmp);
2014-08-17 00:13:53 +04:00
rename($tmp . $source, $tmp . $dest);
$this->tar = null;
unlink($this->path);
2014-08-17 00:13:53 +04:00
$types = array(null, 'gz', 'bz');
$this->tar = new Archive_Tar($this->path, $types[self::getTarType($this->path)]);
$this->tar->createModify(array($tmp), '', $tmp . '/');
$this->fileList = false;
$this->cachedHeaders = false;
2012-05-18 03:54:02 +04:00
return true;
}
/**
* @param string $file
*/
2012-09-07 17:22:01 +04:00
private function getHeader($file) {
2014-08-17 00:13:53 +04:00
if (!$this->cachedHeaders) {
2012-10-05 14:29:27 +04:00
$this->cachedHeaders = $this->tar->listContent();
}
2014-08-17 00:13:53 +04:00
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;
}
2012-08-29 10:38:33 +04:00
/**
* get the uncompressed size of a file in the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return int
*/
2012-09-07 17:22:01 +04:00
function filesize($path) {
2014-08-17 00:13:53 +04:00
$stat = $this->getHeader($path);
return $stat['size'];
}
2014-08-17 00:13:53 +04:00
/**
* get the last modified time of a file in the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return int
*/
2012-09-07 17:22:01 +04:00
function mtime($path) {
2014-08-17 00:13:53 +04:00
$stat = $this->getHeader($path);
return $stat['mtime'];
}
/**
* get the files in a folder
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return array
*/
2012-09-07 17:22:01 +04:00
function getFolder($path) {
2014-08-17 00:13:53 +04:00
$files = $this->getFiles();
$folderContent = array();
$pathLength = strlen($path);
foreach ($files as $file) {
if ($file[0] == '/') {
$file = substr($file, 1);
2012-05-18 03:54:02 +04:00
}
2014-08-17 00:13:53 +04:00
if (substr($file, 0, $pathLength) == $path and $file != $path) {
$result = substr($file, $pathLength);
if ($pos = strpos($result, '/')) {
$result = substr($result, 0, $pos + 1);
2012-05-18 03:54:02 +04:00
}
2014-08-17 00:13:53 +04:00
if (array_search($result, $folderContent) === false) {
$folderContent[] = $result;
}
}
}
return $folderContent;
}
2014-08-17 00:13:53 +04:00
/**
2013-07-16 07:56:52 +04:00
* get all files in the archive
2014-08-17 00:13:53 +04:00
*
* @return array
*/
2012-09-07 17:22:01 +04:00
function getFiles() {
2014-08-17 00:13:53 +04:00
if ($this->fileList) {
2012-05-18 03:54:02 +04:00
return $this->fileList;
}
2014-08-17 00:13:53 +04:00
if (!$this->cachedHeaders) {
2012-10-05 14:29:27 +04:00
$this->cachedHeaders = $this->tar->listContent();
}
2014-08-17 00:13:53 +04:00
$files = array();
foreach ($this->cachedHeaders as $header) {
$files[] = $header['filename'];
}
2014-08-17 00:13:53 +04:00
$this->fileList = $files;
return $files;
}
2014-08-17 00:13:53 +04:00
/**
* get the content of a file
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return string
*/
2012-09-07 17:22:01 +04:00
function getFile($path) {
return $this->tar->extractInString($path);
}
2014-08-17 00:13:53 +04:00
/**
* extract a single file from the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @param string $dest
* @return bool
*/
2012-11-02 22:53:02 +04:00
function extractFile($path, $dest) {
2014-08-17 00:13:53 +04:00
$tmp = OCP\Files::tmpFolder();
if (!$this->fileExists($path)) {
return false;
}
2014-08-17 00:13:53 +04:00
if ($this->fileExists('/' . $path)) {
$success = $this->tar->extractList(array('/' . $path), $tmp);
} else {
$success = $this->tar->extractList(array($path), $tmp);
2012-05-18 03:54:02 +04:00
}
2014-08-17 00:13:53 +04:00
if ($success) {
rename($tmp . $path, $dest);
}
OCP\Files::rmdirr($tmp);
return $success;
}
2014-08-17 00:13:53 +04:00
/**
* extract the archive
2014-08-17 00:13:53 +04:00
*
* @param string $dest
* @return bool
*/
2012-09-07 17:22:01 +04:00
function extract($dest) {
return $this->tar->extract($dest);
}
2014-08-17 00:13:53 +04:00
/**
* check if a file or folder exists in the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return bool
*/
2012-09-07 17:22:01 +04:00
function fileExists($path) {
2014-08-17 00:13:53 +04:00
$files = $this->getFiles();
if ((array_search($path, $files) !== false) or (array_search($path . '/', $files) !== false)) {
2012-05-18 03:54:02 +04:00
return true;
2014-08-17 00:13:53 +04:00
} else {
$folderPath = $path;
if (substr($folderPath, -1, 1) != '/') {
$folderPath .= '/';
2012-05-18 03:54:02 +04:00
}
2014-08-17 00:13:53 +04:00
$pathLength = strlen($folderPath);
foreach ($files as $file) {
if (strlen($file) > $pathLength and substr($file, 0, $pathLength) == $folderPath) {
2012-05-18 03:54:02 +04:00
return true;
}
}
}
2014-08-17 00:13:53 +04:00
if ($path[0] != '/') { //not all programs agree on the use of a leading /
return $this->fileExists('/' . $path);
} else {
2012-05-18 03:54:02 +04:00
return false;
}
}
2012-08-29 10:38:33 +04:00
/**
* remove a file or folder from the archive
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @return bool
*/
2012-09-07 17:22:01 +04:00
function remove($path) {
2014-08-17 00:13:53 +04:00
if (!$this->fileExists($path)) {
return false;
}
2014-08-17 00:13:53 +04:00
$this->fileList = false;
$this->cachedHeaders = false;
//no proper way to delete, extract entire archive, delete file and remake archive
2014-08-17 00:13:53 +04:00
$tmp = OCP\Files::tmpFolder();
$this->tar->extract($tmp);
2014-08-17 00:13:53 +04:00
OCP\Files::rmdirr($tmp . $path);
$this->tar = null;
unlink($this->path);
$this->reopen();
2012-09-10 13:21:54 +04:00
$this->tar->createModify(array($tmp), '', $tmp);
return true;
}
2014-08-17 00:13:53 +04:00
/**
* get a file handler
2014-08-17 00:13:53 +04:00
*
* @param string $path
* @param string $mode
* @return resource
*/
2012-11-02 22:53:02 +04:00
function getStream($path, $mode) {
2014-08-17 00:13:53 +04:00
if (strrpos($path, '.') !== false) {
$ext = substr($path, strrpos($path, '.'));
} else {
$ext = '';
}
2014-08-17 00:13:53 +04:00
$tmpFile = OCP\Files::tmpFile($ext);
if ($this->fileExists($path)) {
2012-09-10 13:21:54 +04:00
$this->extractFile($path, $tmpFile);
2014-08-17 00:13:53 +04:00
} elseif ($mode == 'r' or $mode == 'rb') {
return false;
}
2014-08-17 00:13:53 +04:00
if ($mode == 'r' or $mode == 'rb') {
2012-09-10 13:21:54 +04:00
return fopen($tmpFile, $mode);
2014-08-17 00:13:53 +04:00
} else {
\OC\Files\Stream\Close::registerCallback($tmpFile, array($this, 'writeBack'));
2014-08-17 00:13:53 +04:00
self::$tempFiles[$tmpFile] = $path;
return fopen('close://' . $tmpFile, $mode);
}
}
2014-08-17 00:13:53 +04:00
private static $tempFiles = array();
/**
* write back temporary files
*/
2012-09-07 17:22:01 +04:00
function writeBack($tmpFile) {
2014-08-17 00:13:53 +04:00
if (isset(self::$tempFiles[$tmpFile])) {
2012-09-10 13:21:54 +04:00
$this->addFile(self::$tempFiles[$tmpFile], $tmpFile);
unlink($tmpFile);
}
}
/**
* reopen the archive to ensure everything is written
*/
2012-09-07 17:22:01 +04:00
private function reopen() {
2014-08-17 00:13:53 +04:00
if ($this->tar) {
$this->tar->_close();
2014-08-17 00:13:53 +04:00
$this->tar = null;
}
2014-08-17 00:13:53 +04:00
$types = array(null, 'gz', 'bz');
$this->tar = new Archive_Tar($this->path, $types[self::getTarType($this->path)]);
}
}