Files
luos/workflow/engine/classes/class.archive.php
jennylee 20a1eee6bf CODE STYLE, workflow/engine/classes/
FILES:
class.applications.php
class.archive.php
class.wsTools.php
2012-10-18 13:05:23 -04:00

747 lines
28 KiB
PHP
Executable File

<?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
*/
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) ;
}
}
/**
* This class is derived from the class archive, is imployed to use files .
* tar
*
* @package workflow.engine.classes
*
*/
class tar_file extends archive
{
/**
* This function is the constructor of the class tar_file
*
* @param string $name
*/
public function tar_file ($name)
{
$this->archive( $name );
$this->options['type'] = "tar";
}
/**
* This function create a file .
* tar
*
* @return boolean
*/
public function create_tar ()
{
$pwd = getcwd();
chdir( $this->options['basedir'] );
foreach ($this->files as $current) {
if ($current['name'] == $this->options['name']) {
continue;
}
if (strlen( $current['name2'] ) > 99) {
$path = substr( $current['name2'], 0, strpos( $current['name2'], "/", strlen( $current['name2'] ) - 100 ) + 1 );
$current['name2'] = substr( $current['name2'], strlen( $path ) );
if (strlen( $path ) > 154 || strlen( $current['name2'] ) > 99) {
$this->error[] = "Could not add {$path}{$current['name2']} to archive because the filename is too long.";
continue;
}
}
$block = pack( "a100a8a8a8a12a12a8a1a100a6a2a32a32a8a8a155a12", $current['name2'], sprintf( "%07o", $current['stat'][2] ), sprintf( "%07o", $current['stat'][4] ), sprintf( "%07o", $current['stat'][5] ), sprintf( "%011o", $current['type'] == 2 ? 0 : $current['stat'][7] ), sprintf( "%011o", $current['stat'][9] ), " ", $current['type'], $current['type'] == 2 ? @readlink( $current['name'] ) : "", "ustar ", " ", "Unknown", "Unknown", "", "", ! empty( $path ) ? $path : "", "" );
$checksum = 0;
for ($i = 0; $i < 512; $i ++) {
$checksum += ord( substr( $block, $i, 1 ) );
}
$checksum = pack( "a8", sprintf( "%07o", $checksum ) );
$block = substr_replace( $block, $checksum, 148, 8 );
if ($current['type'] == 2 || $current['stat'][7] == 0) {
$this->add_data( $block );
} elseif ($fp = @fopen( $current['name'], "rb" )) {
$this->add_data( $block );
while ($temp = fread( $fp, 1048576 )) {
$this->add_data( $temp );
}
if ($current['stat'][7] % 512 > 0) {
$temp = "";
for ($i = 0; $i < 512 - $current['stat'][7] % 512; $i ++) {
$temp .= "\0";
}
$this->add_data( $temp );
}
fclose( $fp );
} else {
$this->error[] = "Could not open file {$current['name']} for reading. It was not added.";
}
}
$this->add_data( pack( "a1024", "" ) );
chdir( $pwd );
return 1;
}
/**
* This function is used for extract files of the class tar_file
*
* @return void
*/
public function extract_files ()
{
$pwd = getcwd();
chdir( $this->options['basedir'] );
if ($fp = $this->open_archive()) {
if ($this->options['inmemory'] == 1) {
$this->files = array ();
}
while ($block = fread( $fp, 512 )) {
$temp = unpack( "a100name/a8mode/a8uid/a8gid/a12size/a12mtime/a8checksum/a1type/a100symlink/a6magic/a2temp/a32temp/a32temp/a8temp/a8temp/a155prefix/a12temp", $block );
$file = array ('name' => $this->options['basedir'] . '/' . $temp['prefix'] . $temp['name'],'stat' => array (2 => $temp['mode'],4 => octdec( $temp['uid'] ),5 => octdec( $temp['gid'] ),7 => octdec( $temp['size'] ),9 => octdec( $temp['mtime'] )
),'checksum' => octdec( $temp['checksum'] ),'type' => $temp['type'],'magic' => $temp['magic']
);
if ($file['checksum'] == 0x00000000) {
break;
} elseif (substr( $file['magic'], 0, 5 ) != "ustar") {
$this->error[] = "This script does not support extracting this type of tar file.";
break;
}
$block = substr_replace( $block, " ", 148, 8 );
$checksum = 0;
for ($i = 0; $i < 512; $i ++) {
$checksum += ord( substr( $block, $i, 1 ) );
}
if ($file['checksum'] != $checksum) {
$this->error[] = "Could not extract from {$this->options['name']}, it is corrupt.";
}
if ($this->options['inmemory'] == 1) {
$file['data'] = fread( $fp, $file['stat'][7] );
fread( $fp, (512 - $file['stat'][7] % 512) == 512 ? 0 : (512 - $file['stat'][7] % 512) );
unset( $file['checksum'], $file['magic'] );
$this->files[] = $file;
} elseif ($file['type'] == 5) {
if (! is_dir( $file['name'] )) {
//mkdir($file['name'], $file['stat'][2]);
mkdir( $file['name'], 0775 );
}
} elseif ($this->options['overwrite'] == 0 && file_exists( $file['name'] )) {
$this->error[] = "{$file['name']} already exist.";
continue;
} elseif ($file['type'] == 2) {
symlink( $temp['symlink'], $file['name'] );
//chmod($file['name'], $file['stat'][2]);
} elseif ($new = @fopen( $file['name'], "wb" )) {
fwrite( $new, fread( $fp, $file['stat'][7] ) );
if ((512 - $file['stat'][7] % 512) != 512) {
fread( $fp, (512 - $file['stat'][7] % 512) );
}
//fread($fp, (512 - $file['stat'][7] % 512) == 512 ? 0 : (512 - $file['stat'][7] % 512));
fclose( $new );
//chmod($file['name'], $file['stat'][2]);
chmod( $file['name'], 0777 );
$this->files[] = $file['name'];
} else {
$this->error[] = "Could not open {$file['name']} for writing.";
continue;
}
//chown($file['name'], $file['stat'][4]);
//chgrp($file['name'], $file['stat'][5]);
@touch( $file['name'], $file['stat'][9] );
unset( $file );
}
} else {
$this->error[] = "Could not open file {$this->options['name']}";
}
chdir( $pwd );
}
/**
* This function open a archive of the class tar_file
*
* @return void
*/
public function open_archive ()
{
return @fopen( $this->options['name'], "rb" );
}
}
/**
* This class is derived of the class archive, is employed to use archives .
* gzip
*
* @package workflow.engine.classes
*
*/
class gzip_file extends tar_file
{
/**
* This function is the constructor of the class gzip_file
*
* @param string $name
* @return void
*/
public function gzip_file ($name)
{
$this->tar_file( $name );
$this->options['type'] = "gzip";
}
/**
* This function is employed to create files .
* gzip
*
* @return boolean
*/
public function create_gzip ()
{
if ($this->options['inmemory'] == 0) {
$pwd = getcwd();
chdir( $this->options['basedir'] );
if ($fp = gzopen( $this->options['name'], "wb{$this->options['level']}" )) {
fseek( $this->archive, 0 );
while ($temp = fread( $this->archive, 1048576 )) {
gzwrite( $fp, $temp );
}
gzclose( $fp );
chdir( $pwd );
} else {
$this->error[] = "Could not open {$this->options['name']} for writing.";
chdir( $pwd );
return 0;
}
} else {
$this->archive = gzencode( $this->archive, $this->options['level'] );
}
return 1;
}
/**
* This function open a archive of the class gzip_file
*
* @return void
*/
public function open_archive ()
{
return @gzopen( $this->options['name'], "rb" );
}
}
/**
*
*
* This class is derived from the class archive, is employed to use files .bzip
*
* @package workflow.engine.classes
*
*/
class bzip_file extends tar_file
{
/**
* This function is the constructor of the class bzip_file
*
* @param string $name
* @return void
*/
public function bzip_file ($name)
{
$this->tar_file( $name );
$this->options['type'] = "bzip";
}
/**
* This function is employed to create files .
* bzip
*
* @return boolean
*/
public function create_bzip ()
{
if ($this->options['inmemory'] == 0) {
$pwd = getcwd();
chdir( $this->options['basedir'] );
if ($fp = bzopen( $this->options['name'], "wb" )) {
fseek( $this->archive, 0 );
while ($temp = fread( $this->archive, 1048576 )) {
bzwrite( $fp, $temp );
}
bzclose( $fp );
chdir( $pwd );
} else {
$this->error[] = "Could not open {$this->options['name']} for writing.";
chdir( $pwd );
return 0;
}
} else {
$this->archive = bzcompress( $this->archive, $this->options['level'] );
}
return 1;
}
/**
* This function open a archive of the class bzip_file
*
* @return void
*/
public function open_archive ()
{
return @bzopen( $this->options['name'], "rb" );
}
}
/**
* This class is derived from the class archive, is imployed to use files .
* zip
*
* @package workflow.engine.classes
*/
class zip_file extends archive
{
public function zip_file ($name)
{
$this->archive( $name );
$this->options['type'] = "zip";
}
/**
* This function is used to create archives .
* zip
*
* @return boolean
*/
public function create_zip ()
{
$files = 0;
$offset = 0;
$central = "";
if (! empty( $this->options['sfx'] )) {
if ($fp = @fopen( $this->options['sfx'], "rb" )) {
$temp = fread( $fp, filesize( $this->options['sfx'] ) );
fclose( $fp );
$this->add_data( $temp );
$offset += strlen( $temp );
unset( $temp );
} else {
$this->error[] = "Could not open sfx module from {$this->options['sfx']}.";
}
}
$pwd = getcwd();
chdir( $this->options['basedir'] );
foreach ($this->files as $current) {
if ($current['name'] == $this->options['name']) {
continue;
}
$timedate = explode( " ", date( "Y n j G i s", $current['stat'][9] ) );
$timedate = ($timedate[0] - 1980 << 25) | ($timedate[1] << 21) | ($timedate[2] << 16) | ($timedate[3] << 11) | ($timedate[4] << 5) | ($timedate[5]);
$block = pack( "VvvvV", 0x04034b50, 0x000A, 0x0000, (isset( $current['method'] ) || $this->options['method'] == 0) ? 0x0000 : 0x0008, $timedate );
if ($current['stat'][7] == 0 && $current['type'] == 5) {
$block .= pack( "VVVvv", 0x00000000, 0x00000000, 0x00000000, strlen( $current['name2'] ) + 1, 0x0000 );
$block .= $current['name2'] . "/";
$this->add_data( $block );
$central .= pack( "VvvvvVVVVvvvvvVV", 0x02014b50, 0x0014, $this->options['method'] == 0 ? 0x0000 : 0x000A, 0x0000, (isset( $current['method'] ) || $this->options['method'] == 0) ? 0x0000 : 0x0008, $timedate, 0x00000000, 0x00000000, 0x00000000, strlen( $current['name2'] ) + 1, 0x0000, 0x0000, 0x0000, 0x0000, $current['type'] == 5 ? 0x00000010 : 0x00000000, $offset );
$central .= $current['name2'] . "/";
$files ++;
$offset += (31 + strlen( $current['name2'] ));
} elseif ($current['stat'][7] == 0) {
$block .= pack( "VVVvv", 0x00000000, 0x00000000, 0x00000000, strlen( $current['name2'] ), 0x0000 );
$block .= $current['name2'];
$this->add_data( $block );
$central .= pack( "VvvvvVVVVvvvvvVV", 0x02014b50, 0x0014, $this->options['method'] == 0 ? 0x0000 : 0x000A, 0x0000, (isset( $current['method'] ) || $this->options['method'] == 0) ? 0x0000 : 0x0008, $timedate, 0x00000000, 0x00000000, 0x00000000, strlen( $current['name2'] ), 0x0000, 0x0000, 0x0000, 0x0000, $current['type'] == 5 ? 0x00000010 : 0x00000000, $offset );
$central .= $current['name2'];
$files ++;
$offset += (30 + strlen( $current['name2'] ));
} elseif ($fp = @fopen( $current['name'], "rb" )) {
$temp = fread( $fp, $current['stat'][7] );
fclose( $fp );
$crc32 = crc32( $temp );
if (! isset( $current['method'] ) && $this->options['method'] == 1) {
$temp = gzcompress( $temp, $this->options['level'] );
$size = strlen( $temp ) - 6;
$temp = substr( $temp, 2, $size );
} else {
$size = strlen( $temp );
}
$block .= pack( "VVVvv", $crc32, $size, $current['stat'][7], strlen( $current['name2'] ), 0x0000 );
$block .= $current['name2'];
$this->add_data( $block );
$this->add_data( $temp );
unset( $temp );
$central .= pack( "VvvvvVVVVvvvvvVV", 0x02014b50, 0x0014, $this->options['method'] == 0 ? 0x0000 : 0x000A, 0x0000, (isset( $current['method'] ) || $this->options['method'] == 0) ? 0x0000 : 0x0008, $timedate, $crc32, $size, $current['stat'][7], strlen( $current['name2'] ), 0x0000, 0x0000, 0x0000, 0x0000, 0x00000000, $offset );
$central .= $current['name2'];
$files ++;
$offset += (30 + strlen( $current['name2'] ) + $size);
} else {
$this->error[] = "Could not open file {$current['name']} for reading. It was not added.";
}
}
$this->add_data( $central );
$this->add_data( pack( "VvvvvVVv", 0x06054b50, 0x0000, 0x0000, $files, $files, strlen( $central ), $offset, ! empty( $this->options['comment'] ) ? strlen( $this->options['comment'] ) : 0x0000 ) );
if (! empty( $this->options['comment'] )) {
$this->add_data( $this->options['comment'] );
}
chdir( $pwd );
return 1;
}
}