<?php 
##
#	Project: PHPDISK File Storage Solution
#	This is NOT a freeware, use is subject to license terms.
#
#	Site: http://www.phpdisk.com
#
#	$Id: zip.class.php 25 2014-01-10 03:13:43Z along $
#
#	Copyright (C) 2008-2014 PHPDisk Team. All Rights Reserved.
#
##
class cls_zip{

	var $total_files = 0;
	var $total_folders = 0; 
	
	function unzip($zn, $to, $index = Array(-1)){
		$ok = 0; 
		$zip = @fopen($zn,'rb');
		if(!$zip) return(-1);
		$cdir = $this->read_central_dir($zip,$zn);
		$pos_entry = $cdir['offset'];
		if(!is_array($index)){ 
			$index = array($index);
		}
		for($i=0; $index[$i];$i++){
			if(intval($index[$i])!=$index[$i]||$index[$i]>$cdir['entries']){
				return(-1);
			}
		}
		for ($i=0; $i<$cdir['entries']; $i++){
		@fseek($zip, $pos_entry);
		$header = $this->read_central_file_headers($zip);
		$header['index'] = $i; 
		$pos_entry = ftell($zip);
		@rewind($zip); 
		fseek($zip, $header['offset']);
		if(in_array("-1",$index)||in_array($i,$index))
			$stat[$header['filename']]=$this->unzip_file($header, $to, $zip);
		}
		fclose($zip);
		return $stat;
	}
	
	function read_file_header($zip){
		$binary_data = fread($zip, 30);
		$data = unpack('vchk/vid/vversion/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len', $binary_data);
		$header['filename'] = fread($zip, $data['filename_len']);
		if($data['extra_len'] != 0) {
			$header['extra'] = fread($zip, $data['extra_len']);
		}else{ 
			$header['extra'] = ''; 
		}
		$header['compression'] = $data['compression'];
		$header['size'] = $data['size'];
		$header['compressed_size'] = $data['compressed_size'];
		$header['crc'] = $data['crc']; 
		$header['flag'] = $data['flag'];
		$header['mdate'] = $data['mdate'];
		$header['mtime'] = $data['mtime'];
		
		if ($header['mdate'] && $header['mtime']){
			$hour=($header['mtime']&0xF800)>>11;
			$minute=($header['mtime']&0x07E0)>>5;
			$seconde=($header['mtime']&0x001F)*2;
			$year=(($header['mdate']&0xFE00)>>9)+1980;
			$month=($header['mdate']&0x01E0)>>5;
			$day=$header['mdate']&0x001F;
			$header['mtime'] = mktime($hour, $minute, $seconde, $month, $day, $year);
		}else{
			$header['mtime'] = time();
		}
		$header['stored_filename'] = $header['filename'];
		$header['status'] = "ok";
		return $header;
	}
	
	function read_central_file_headers($zip){
		$binary_data = fread($zip, 46);
		$header = unpack('vchkid/vid/vversion/vversion_extracted/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len/vcomment_len/vdisk/vinternal/Vexternal/Voffset', $binary_data);
		if($header['filename_len'] != 0){
			$header['filename'] = fread($zip,$header['filename_len']);
		}else{
			$header['filename'] = '';
		}
		if($header['extra_len'] != 0){
			$header['extra'] = fread($zip, $header['extra_len']);
		}else{
			$header['extra'] = '';
		}
		if($header['comment_len'] != 0){
			$header['comment'] = fread($zip, $header['comment_len']);
		}else{
			$header['comment'] = '';
		}
		if($header['mdate'] && $header['mtime']){
			$hour = ($header['mtime'] & 0xF800) >> 11;
			$minute = ($header['mtime'] & 0x07E0) >> 5;
			$seconde = ($header['mtime'] & 0x001F)*2;
			$year = (($header['mdate'] & 0xFE00) >> 9) + 1980;
			$month = ($header['mdate'] & 0x01E0) >> 5;
			$day = $header['mdate'] & 0x001F;
			$header['mtime'] = mktime($hour, $minute, $seconde, $month, $day, $year);
		}else{
			$header['mtime'] = time();
		}
		$header['stored_filename'] = $header['filename'];
		$header['status'] = 'ok';
		if(substr($header['filename'], -1) == '/'){
			$header['external'] = 0x41FF0010;
		}
		return $header;
	}
	function read_central_dir($zip,$zip_name){
		$size = filesize($zip_name);
		if ($size < 277){
			$maximum_size = $size;
		}else{
			$maximum_size=277;
		}
		
		@fseek($zip, $size-$maximum_size);
		$pos = ftell($zip); 
		$bytes = 0x00000000;
		while ($pos < $size){
			$byte = @fread($zip, 1); $bytes=($bytes << 8) | ord($byte);
			if($bytes == 0x504b0506 or $bytes == 0x2e706870504b0506){ 
				$pos++;
				break;
			} 
			$pos++;
		}
		
		$fdata=fread($zip,18);
		
		$data=@unpack('vdisk/vdisk_start/vdisk_entries/ventries/Vsize/Voffset/vcomment_size',$fdata);
		
		if($data['comment_size'] != 0){
			$centd['comment'] = fread($zip, $data['comment_size']);
		}else{
		$centd['comment'] = '';
		}
		$centd['entries'] = $data['entries'];
		$centd['disk_entries'] = $data['disk_entries'];
		$centd['offset'] = $data['offset'];$centd['disk_start'] = $data['disk_start'];
		$centd['size'] = $data['size'];  $centd['disk'] = $data['disk'];
		return $centd;
	}
	function unzip_file($header,$to,$zip){
		$header = $this->read_file_header($zip);
		
		if(substr($to,-1)!="/"){
			$to.="/";
		}
		if($to=='./'){
			$to = '';
		} 
		$pth = explode("/",$to.$header['filename']);
		$mydir = '';
		for($i=0;$i<count($pth)-1;$i++){
			if(!$pth[$i]) continue;
			$mydir .= $pth[$i]."/";
			if((!is_dir($mydir) && @mkdir($mydir,0777)) || (($mydir==$to.$header['filename'] || ($mydir==$to && $this->total_folders==0)) && is_dir($mydir)) ){
				@chmod($mydir,0777);
				$this->total_folders ++;
			}
		}
		
		if(strrchr($header['filename'],'/')=='/') return; 
		if (!($header['external']==0x41FF0010)&&!($header['external']==16)){
			if ($header['compression']==0){
				$fp = @fopen($to.$header['filename'], 'wb');
				if(!$fp) return(-1);
				$size = $header['compressed_size'];
				
				while ($size != 0){
				$read_size = ($size < 2048 ? $size : 2048);
				$buffer = fread($zip, $read_size);
				$binary_data = pack('a'.$read_size, $buffer);
				@fwrite($fp, $binary_data, $read_size);
				$size -= $read_size;
			}
			fclose($fp);
			touch($to.$header['filename'], $header['mtime']);
		}else{
			$fp = @fopen($to.$header['filename'].'.gz','wb');
			if(!$fp) return(-1);
			$binary_data = pack('va1a1Va1a1', 0x8b1f, Chr($header['compression']),
			Chr(0x00), time(), Chr(0x00), Chr(3));
			
			fwrite($fp, $binary_data, 10);
			$size = $header['compressed_size'];
			
			while ($size != 0){
				$read_size = ($size < 1024 ? $size : 1024);
				$buffer = fread($zip, $read_size);
				$binary_data = pack('a'.$read_size, $buffer);
				@fwrite($fp, $binary_data, $read_size);
				$size -= $read_size;
			}
			
			$binary_data = pack('VV', $header['crc'], $header['size']);
			fwrite($fp, $binary_data,8); fclose($fp);
			
			$gzp = @gzopen($to.$header['filename'].'.gz','rb') or die("Create .gz compression error!");
			if(!$gzp) return(-2);
			$fp = @fopen($to.$header['filename'],'wb');
			if(!$fp) return(-1);
			$size = $header['size'];
		
			while ($size != 0){
				$read_size = ($size < 2048 ? $size : 2048);
				$buffer = gzread($gzp, $read_size);
				$binary_data = pack('a'.$read_size, $buffer);
				@fwrite($fp, $binary_data, $read_size);
				$size -= $read_size;
			}
			fclose($fp); 
			gzclose($gzp);
			
			touch($to.$header['filename'], $header['mtime']);
			@unlink($to.$header['filename'].'.gz');
			
			}
		}
		
		$this->total_files++;
		return true;
	}
}

?>