mirror of
https://github.com/silverstripe/silverstripe-framework
synced 2024-10-22 14:05:37 +02:00
76 lines
2.1 KiB
PHP
76 lines
2.1 KiB
PHP
|
<?php
|
||
|
|
||
|
class TarballArchive extends Archive {
|
||
|
private $filename = '';
|
||
|
private $compressionModifiers = '';
|
||
|
|
||
|
|
||
|
function __construct($filename) {
|
||
|
$this->filename = $filename;
|
||
|
|
||
|
if(substr($filename, strlen($filename) - strlen('.gz')) == '.gz' ||
|
||
|
substr($filename, strlen($filename) - strlen('.tgz')) == '.tgz') {
|
||
|
$this->compressionModifiers = 'z';
|
||
|
} else if(substr($filename, strlen($filename) - strlen('.bz2')) == '.bz2') {
|
||
|
$compressionModifiers = 'j';
|
||
|
}
|
||
|
}
|
||
|
|
||
|
function listing() {
|
||
|
// Call tar on the command line to get the info we need
|
||
|
$command = "tar -tv{$this->compressionModifiers}f ../$this->filename";
|
||
|
$consoleList = `$command`;
|
||
|
|
||
|
$listing = array();
|
||
|
// Seperate into an array of lines
|
||
|
$listItems = explode("\n", $consoleList);
|
||
|
|
||
|
foreach($listItems as $listItem) {
|
||
|
// The path is the last thing on the line
|
||
|
$fullpath = substr($listItem, strrpos($listItem, ' ') + 1);
|
||
|
$path = explode('/', $fullpath);
|
||
|
$item = array();
|
||
|
|
||
|
// The first part of the line is the permissions - the first character will be d if it is a directory
|
||
|
$item['type'] = (substr($listItem, 0, 1) == 'd') ? 'directory' : 'file';
|
||
|
if($item['type'] == 'directory') {
|
||
|
$item['listing'] = array();
|
||
|
// If it's a directory, the path will have a slash on the end, so get rid of it.
|
||
|
array_pop($path);
|
||
|
}
|
||
|
|
||
|
// The name of the file/directory is the last item on the path
|
||
|
$name = array_pop($path);
|
||
|
if($name == '') {
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
$item['path'] = implode('/', $path);
|
||
|
|
||
|
// Put the item in the right place
|
||
|
$dest = &$listing;
|
||
|
foreach($path as $folder) {
|
||
|
// If the directory doesn't exist, create it
|
||
|
if(!isset($dest[$folder])) {
|
||
|
$dest[$folder] = array();
|
||
|
$dest[$folder]['listing'] = array();
|
||
|
$dest[$folder]['type'] = 'directory';
|
||
|
}
|
||
|
$dest = &$dest[$folder]['listing'];
|
||
|
}
|
||
|
|
||
|
// If this is a directory and it's listing has already been created, copy the the listing
|
||
|
if($item['type'] == 'directory' && isset($dest[$name]['listing'])) {
|
||
|
$item['listing'] = $dest[$name]['listing'];
|
||
|
}
|
||
|
$dest[$name] = $item;
|
||
|
}
|
||
|
|
||
|
|
||
|
return $listing;
|
||
|
}
|
||
|
|
||
|
|
||
|
}
|
||
|
|
||
|
?>
|