176 lines
7.4 KiB
PHP
176 lines
7.4 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
|
|
*/
|
|
|
|
/**
|
|
* 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" );
|
|
}
|
|
}
|