370 lines
13 KiB
PHP
370 lines
13 KiB
PHP
|
<?php
|
||
|
|
/*--------------------------------------------------
|
||
|
|
* TAR/GZIP/BZIP2/ZIP ARCHIVE CLASSES 2.1
|
||
|
|
* By Devin Doucette
|
||
|
|
* Copyright (c) 2005 Devin Doucette
|
||
|
|
* Email: darksnoopy@shaw.ca
|
||
|
|
*--------------------------------------------------
|
||
|
|
* Email bugs/suggestions to darksnoopy@shaw.ca
|
||
|
|
*--------------------------------------------------
|
||
|
|
* This script has been created and released under
|
||
|
|
* the GNU GPL and is free to use and redistribute
|
||
|
|
* only if this copyright statement is not removed
|
||
|
|
*--------------------------------------------------*/
|
||
|
|
|
||
|
|
/**
|
||
|
|
*
|
||
|
|
* @package workflow.engine.classes
|
||
|
|
*/
|
||
|
|
|
||
|
|
/**
|
||
|
|
*
|
||
|
|
* @package workflow.engine.classes
|
||
|
|
*/class archive
|
||
|
|
{
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function is the constructor of the class archive
|
||
|
|
*
|
||
|
|
* @param string $name
|
||
|
|
* @return void
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
public function archive ($name)
|
||
|
|
{
|
||
|
|
$this->options = array ('basedir' => ".",'name' => $name,'prepend' => "",'inmemory' => 0,'overwrite' => 0,'recurse' => 1,'storepaths' => 1,'followlinks' => 0,'level' => 3,'method' => 1,'sfx' => "",'type' => "",'comment' => ""
|
||
|
|
);
|
||
|
|
$this->files = array ();
|
||
|
|
$this->exclude = array ();
|
||
|
|
$this->storeonly = array ();
|
||
|
|
$this->error = array ();
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function gives options to a archive
|
||
|
|
*
|
||
|
|
* @param array $options
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function set_options ($options)
|
||
|
|
{
|
||
|
|
foreach ($options as $key => $value) {
|
||
|
|
$this->options[$key] = $value;
|
||
|
|
}
|
||
|
|
if (! empty( $this->options['basedir'] )) {
|
||
|
|
$this->options['basedir'] = str_replace( "\\", "/", $this->options['basedir'] );
|
||
|
|
$this->options['basedir'] = preg_replace( "/\/+/", "/", $this->options['basedir'] );
|
||
|
|
$this->options['basedir'] = preg_replace( "/\/$/", "", $this->options['basedir'] );
|
||
|
|
}
|
||
|
|
if (! empty( $this->options['name'] )) {
|
||
|
|
$this->options['name'] = str_replace( "\\", "/", $this->options['name'] );
|
||
|
|
$this->options['name'] = preg_replace( "/\/+/", "/", $this->options['name'] );
|
||
|
|
}
|
||
|
|
if (! empty( $this->options['prepend'] )) {
|
||
|
|
$this->options['prepend'] = str_replace( "\\", "/", $this->options['prepend'] );
|
||
|
|
$this->options['prepend'] = preg_replace( "/^(\.*\/+)+/", "", $this->options['prepend'] );
|
||
|
|
$this->options['prepend'] = preg_replace( "/\/+/", "/", $this->options['prepend'] );
|
||
|
|
$this->options['prepend'] = preg_replace( "/\/$/", "", $this->options['prepend'] ) . "/";
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function is used to create a archive.
|
||
|
|
*
|
||
|
|
* @return boolean
|
||
|
|
*/
|
||
|
|
public function create_archive ()
|
||
|
|
{
|
||
|
|
$this->make_list();
|
||
|
|
if ($this->options['inmemory'] == 0) {
|
||
|
|
$pwd = getcwd();
|
||
|
|
chdir( $this->options['basedir'] );
|
||
|
|
if ($this->options['overwrite'] == 0 && file_exists( $this->options['name'] . ($this->options['type'] == "gzip" || $this->options['type'] == "bzip" ? ".tmp" : "") )) {
|
||
|
|
$this->error[] = "File {$this->options['name']} already exist.";
|
||
|
|
chdir( $pwd );
|
||
|
|
return 0;
|
||
|
|
} elseif ($this->archive = @fopen( $this->options['name'] . ($this->options['type'] == "gzip" || $this->options['type'] == "bzip" ? ".tmp" : ""), "wb+" )) {
|
||
|
|
chdir( $pwd );
|
||
|
|
} else {
|
||
|
|
$this->error[] = "Could not open {$this->options['name']} for writing.";
|
||
|
|
chdir( $pwd );
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
$this->archive = "";
|
||
|
|
}
|
||
|
|
switch ($this->options['type']) {
|
||
|
|
case "zip":
|
||
|
|
if (! $this->create_zip()) {
|
||
|
|
$this->error[] = "Could not create zip file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case "bzip":
|
||
|
|
if (! $this->create_tar()) {
|
||
|
|
$this->error[] = "Could not create tar file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
if (! $this->create_bzip()) {
|
||
|
|
$this->error[] = "Could not create bzip2 file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case "gzip":
|
||
|
|
if (! $this->create_tar()) {
|
||
|
|
$this->error[] = "Could not create tar file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
if (! $this->create_gzip()) {
|
||
|
|
$this->error[] = "Could not create gzip file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case "tar":
|
||
|
|
if (! $this->create_tar()) {
|
||
|
|
$this->error[] = "Could not create tar file.";
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($this->options['inmemory'] == 0) {
|
||
|
|
fclose( $this->archive );
|
||
|
|
if ($this->options['type'] == "gzip" || $this->options['type'] == "bzip") {
|
||
|
|
unlink( $this->options['basedir'] . "/" . $this->options['name'] . ".tmp" );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function is used for add data to a archive
|
||
|
|
*
|
||
|
|
* @param string $data
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function add_data ($data)
|
||
|
|
{
|
||
|
|
if ($this->options['inmemory'] == 0) {
|
||
|
|
fwrite( $this->archive, $data );
|
||
|
|
} else {
|
||
|
|
$this->archive .= $data;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function make a list
|
||
|
|
*
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function make_list ()
|
||
|
|
{
|
||
|
|
if (! empty( $this->exclude )) {
|
||
|
|
foreach ($this->files as $key => $value) {
|
||
|
|
foreach ($this->exclude as $current) {
|
||
|
|
if ($value['name'] == $current['name']) {
|
||
|
|
unset( $this->files[$key] );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (! empty( $this->storeonly )) {
|
||
|
|
foreach ($this->files as $key => $value) {
|
||
|
|
foreach ($this->storeonly as $current) {
|
||
|
|
if ($value['name'] == $current['name']) {
|
||
|
|
$this->files[$key]['method'] = 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
unset( $this->exclude, $this->storeonly );
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Add files a list
|
||
|
|
*
|
||
|
|
* @param array $list
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function add_files ($list)
|
||
|
|
{
|
||
|
|
$temp = $this->list_files( $list );
|
||
|
|
foreach ($temp as $current) {
|
||
|
|
$this->files[] = $current;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function exclude files of a list
|
||
|
|
*
|
||
|
|
* @param array $list
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function exclude_files ($list)
|
||
|
|
{
|
||
|
|
$temp = $this->list_files( $list );
|
||
|
|
foreach ($temp as $current) {
|
||
|
|
$this->exclude[] = $current;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function store files
|
||
|
|
*
|
||
|
|
* @param array $list
|
||
|
|
*/
|
||
|
|
public function store_files ($list)
|
||
|
|
{
|
||
|
|
$temp = $this->list_files( $list );
|
||
|
|
foreach ($temp as $current) {
|
||
|
|
$this->storeonly[] = $current;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* List files gives a List
|
||
|
|
*
|
||
|
|
* @param array $list
|
||
|
|
* @return array
|
||
|
|
*/
|
||
|
|
public function list_files ($list)
|
||
|
|
{
|
||
|
|
if (! is_array( $list )) {
|
||
|
|
$temp = $list;
|
||
|
|
$list = array ($temp
|
||
|
|
);
|
||
|
|
unset( $temp );
|
||
|
|
}
|
||
|
|
$files = array ();
|
||
|
|
$pwd = getcwd();
|
||
|
|
chdir( $this->options['basedir'] );
|
||
|
|
foreach ($list as $current) {
|
||
|
|
$current = str_replace( "\\", "/", $current );
|
||
|
|
$current = preg_replace( "/\/+/", "/", $current );
|
||
|
|
$current = preg_replace( "/\/$/", "", $current );
|
||
|
|
if (strstr( $current, "*" )) {
|
||
|
|
$regex = preg_replace( "/([\\\^\$\.\[\]\|\(\)\?\+\{\}\/])/", "\\\\\\1", $current );
|
||
|
|
$regex = str_replace( "*", ".*", $regex );
|
||
|
|
$dir = strstr( $current, "/" ) ? substr( $current, 0, strrpos( $current, "/" ) ) : ".";
|
||
|
|
$temp = $this->parse_dir( $dir );
|
||
|
|
foreach ($temp as $current2) {
|
||
|
|
if (preg_match( "/^{$regex}$/i", $current2['name'] )) {
|
||
|
|
$files[] = $current2;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
unset( $regex, $dir, $temp, $current );
|
||
|
|
} elseif (@is_dir( $current )) {
|
||
|
|
$temp = $this->parse_dir( $current );
|
||
|
|
foreach ($temp as $file) {
|
||
|
|
$files[] = $file;
|
||
|
|
}
|
||
|
|
unset( $temp, $file );
|
||
|
|
} elseif (@file_exists( $current )) {
|
||
|
|
$files[] = array ('name' => $current,'name2' => $this->options['prepend'] . preg_replace( "/(\.+\/+)+/", "", ($this->options['storepaths'] == 0 && strstr( $current, "/" )) ? substr( $current, strrpos( $current, "/" ) + 1 ) : $current ),'type' => @is_link( $current ) && $this->options['followlinks'] == 0 ? 2 : 0,'ext' => substr( $current, strrpos( $current, "." ) ),'stat' => stat( $current )
|
||
|
|
);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
chdir( $pwd );
|
||
|
|
unset( $current, $pwd );
|
||
|
|
usort( $files, array ("archive","sort_files"
|
||
|
|
) );
|
||
|
|
return $files;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function is for parse a directory name
|
||
|
|
*
|
||
|
|
* @param string $dirname
|
||
|
|
* @return array
|
||
|
|
*/
|
||
|
|
public function parse_dir ($dirname)
|
||
|
|
{
|
||
|
|
if ($this->options['storepaths'] == 1 && ! preg_match( "/^(\.+\/*)+$/", $dirname )) {
|
||
|
|
$files = array (array ('name' => $dirname,'name2' => $this->options['prepend'] . preg_replace( "/(\.+\/+)+/", "", ($this->options['storepaths'] == 0 && strstr( $dirname, "/" )) ? substr( $dirname, strrpos( $dirname, "/" ) + 1 ) : $dirname ),'type' => 5,'stat' => stat( $dirname )
|
||
|
|
)
|
||
|
|
);
|
||
|
|
} else {
|
||
|
|
$files = array ();
|
||
|
|
}
|
||
|
|
$dir = @opendir( $dirname );
|
||
|
|
while ($file = @readdir( $dir )) {
|
||
|
|
$fullname = $dirname . "/" . $file;
|
||
|
|
if ($file == "." || $file == "..") {
|
||
|
|
continue;
|
||
|
|
} elseif (@is_dir( $fullname )) {
|
||
|
|
if (empty( $this->options['recurse'] )) {
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$temp = $this->parse_dir( $fullname );
|
||
|
|
foreach ($temp as $file2) {
|
||
|
|
$files[] = $file2;
|
||
|
|
}
|
||
|
|
} elseif (@file_exists( $fullname )) {
|
||
|
|
$files[] = array ('name' => $fullname,'name2' => $this->options['prepend'] . preg_replace( "/(\.+\/+)+/", "", ($this->options['storepaths'] == 0 && strstr( $fullname, "/" )) ? substr( $fullname, strrpos( $fullname, "/" ) + 1 ) : $fullname ),'type' => @is_link( $fullname ) && $this->options['followlinks'] == 0 ? 2 : 0,'ext' => substr( $file, strrpos( $file, "." ) ),'stat' => stat( $fullname )
|
||
|
|
);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
@closedir( $dir );
|
||
|
|
return $files;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function sort two files
|
||
|
|
*
|
||
|
|
* @param array $a
|
||
|
|
* @param array $b
|
||
|
|
* @return boolean
|
||
|
|
*/
|
||
|
|
public function sort_files ($a, $b)
|
||
|
|
{
|
||
|
|
if ($a['type'] != $b['type']) {
|
||
|
|
if ($a['type'] == 5 || $b['type'] == 2) {
|
||
|
|
return - 1;
|
||
|
|
} elseif ($a['type'] == 2 || $b['type'] == 5) {
|
||
|
|
return 1;
|
||
|
|
} elseif ($a['type'] == 5) {
|
||
|
|
return strcmp( strtolower( $a['name'] ), strtolower( $b['name'] ) );
|
||
|
|
} elseif ($a['ext'] != $b['ext']) {
|
||
|
|
return strcmp( $a['ext'], $b['ext'] );
|
||
|
|
} elseif ($a['stat'][7] != $b['stat'][7]) {
|
||
|
|
return $a['stat'][7] > $b['stat'][7] ? - 1 : 1;
|
||
|
|
} else {
|
||
|
|
return strcmp( strtolower( $a['name'] ), strtolower( $b['name'] ) );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* This function download a file
|
||
|
|
*
|
||
|
|
* @return void
|
||
|
|
*/
|
||
|
|
public function download_file ()
|
||
|
|
{
|
||
|
|
if ($this->options['inmemory'] == 0) {
|
||
|
|
$this->error[] = "Can only use download_file() if archive is in memory. Redirect to file otherwise, it is faster.";
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
switch ($this->options['type']) {
|
||
|
|
case "zip":
|
||
|
|
header( "Content-Type: application/zip" );
|
||
|
|
break;
|
||
|
|
case "bzip":
|
||
|
|
header( "Content-Type: application/x-bzip2" );
|
||
|
|
break;
|
||
|
|
case "gzip":
|
||
|
|
header( "Content-Type: application/x-gzip" );
|
||
|
|
break;
|
||
|
|
case "tar":
|
||
|
|
header( "Content-Type: application/x-tar" );
|
||
|
|
}
|
||
|
|
$header = "Content-Disposition: attachment; filename=\"";
|
||
|
|
$header .= strstr( $this->options['name'], "/" ) ? substr( $this->options['name'], strrpos( $this->options['name'], "/" ) + 1 ) : $this->options['name'];
|
||
|
|
$header .= "\"";
|
||
|
|
header( $header );
|
||
|
|
header( "Content-Length: " . strlen( $this->archive ) );
|
||
|
|
header( "Content-Transfer-Encoding: binary" );
|
||
|
|
header( "Cache-Control: no-cache, must-revalidate, max-age=60" );
|
||
|
|
header( "Expires: Sat, 01 Jan 2000 12:00:00 GMT" );
|
||
|
|
print ($this->archive) ;
|
||
|
|
}
|
||
|
|
}
|