PHP Unzipper

Thông báo : Hiện tại trang wap thegioi9x đã bị hack các bạn không được truy cập trang đó để tránh tình trạng bị lừa. từ bây giờ mọi người hãy lưu lại địa chỉ www.vipsinhvien.wap.sh nhé!
11

PHP Unzipper 1024){ $times++;$size=$size/1024;} $size2=floor($size); $rest=$size-$size2; $rest=$rest * 100; $decimal=floor($rest); $addsize=$decimal; if ($decimal<10) {$addsize.='0';}; if ($times==0){$addsize=$size2;} else {$addsize=$size2.$comma.substr($addsize,0,2);} switch ($times) { case 0:$mega=' bytes';break;case 1:$mega=' KB';break;case 2:$mega=' MB';break;case 3:$mega=' GB';break;case 4:$mega=' TB';break;} $addsize.=$mega;return $addsize;} $dir=$_GET['dir']; $action=$_GET['action']; $expired=FALSE; if ($_SESSION['current_session'] !=$_SESSION['user']."=".$_SESSION['session_key']) $expired=TRUE;define( 'PCLZIP_READ_BLOCK_SIZE',2048 ); define( 'PCLZIP_ERROR_EXTERNAL',0 ); define( 'PCLZIP_TEMPORARY_DIR','' ); $g_pclzip_version="1.3"; define( 'PCLZIP_ERR_WRITE_OPEN_FAIL',-1 ); define( 'PCLZIP_ERR_READ_OPEN_FAIL',-2 ); define( 'PCLZIP_ERR_INVALID_PARAMETER',-3 ); define( 'PCLZIP_ERR_MISSING_FILE',-4 ); define( 'PCLZIP_ERR_FILENAME_TOO_LONG',-5 ); define( 'PCLZIP_ERR_INVALID_ZIP',-6 ); define( 'PCLZIP_ERR_BAD_EXTRACTED_FILE',-7 ); define( 'PCLZIP_ERR_DIR_CREATE_FAIL',-8 ); define( 'PCLZIP_ERR_BAD_EXTENSION',-9 ); define( 'PCLZIP_ERR_BAD_FORMAT',-10 ); define( 'PCLZIP_ERR_DELETE_FILE_FAIL',-11 ); define( 'PCLZIP_ERR_RENAME_FILE_FAIL',-12 ); define( 'PCLZIP_ERR_BAD_CHECKSUM',-13 ); define( 'PCLZIP_ERR_INVALID_ARCHIVE_ZIP',-14 ); define( 'PCLZIP_ERR_MISSING_OPTION_VALUE',-15 ); define( 'PCLZIP_ERR_INVALID_OPTION_VALUE',-16 ); define( 'PCLZIP_OPT_PATH',77001 ); define( 'PCLZIP_OPT_ADD_PATH',77002 ); define( 'PCLZIP_OPT_REMOVE_PATH',77003 ); define( 'PCLZIP_OPT_REMOVE_ALL_PATH',77004 ); define( 'PCLZIP_OPT_SET_CHMOD',77005 ); define( 'PCLZIP_CB_PRE_EXTRACT',78001 ); define( 'PCLZIP_CB_POST_EXTRACT',78002 ); define( 'PCLZIP_CB_PRE_ADD',78003 ); define( 'PCLZIP_CB_POST_ADD',78004 ); class PclZip { var $zipname=''; var $zip_fd=0; var $error_code=1; var $error_string=''; function PclZip($p_zipname) { if (!function_exists('gzopen')) { die('Abort '.basename(__FILE__).':Missing zlib extensions');} $this->zipname=$p_zipname;$this->zip_fd=0;return;} function create($p_filelist ) { $v_result=1;$this->privErrorReset();$v_options=array();$v_add_path="";$v_remove_path="";$v_remove_all_path=false;$v_size=func_num_args();if ($v_size > 1) { $v_arg_list=&func_get_args();array_shift($v_arg_list);$v_size--;if ((is_integer($v_arg_list[0])) && ($v_arg_list[0] > 77000)) { $v_result=$this->privParseOptions($v_arg_list,$v_size,$v_options,array (PCLZIP_OPT_REMOVE_PATH=> 'optional',PCLZIP_OPT_REMOVE_ALL_PATH=> 'optional',PCLZIP_OPT_ADD_PATH=> 'optional',PCLZIP_CB_PRE_ADD=> 'optional',PCLZIP_CB_POST_ADD=> 'optional' ));if ($v_result !=1) { return 0;} if (isset($v_options[PCLZIP_OPT_ADD_PATH])) { $v_add_path=$v_options[PCLZIP_OPT_ADD_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_PATH])) { $v_remove_path=$v_options[PCLZIP_OPT_REMOVE_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_ALL_PATH])) { $v_remove_all_path=$v_options[PCLZIP_OPT_REMOVE_ALL_PATH];} } else { $v_add_path=$v_arg_list[0];if ($v_size==2) { $v_remove_path=$v_arg_list[1];} else if ($v_size > 2) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid number / type of arguments");return 0;} } } $p_result_list=array();if (is_array($p_filelist)) { $v_result=$this->privCreate($p_filelist,$p_result_list,$v_add_path,$v_remove_path,$v_remove_all_path,$v_options);} else if (is_string($p_filelist)) { $v_list=explode(" ",$p_filelist);$v_result=$this->privCreate($v_list,$p_result_list,$v_add_path,$v_remove_path,$v_remove_all_path,$v_options);} else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type p_filelist");$v_result=PCLZIP_ERR_INVALID_PARAMETER;} if ($v_result !=1) { return 0;} return $p_result_list;} function add($p_filelist ) { $v_result=1;$this->privErrorReset();$v_options=array();$v_add_path="";$v_remove_path="";$v_remove_all_path=false;$v_size=func_num_args();if ($v_size > 1) { $v_arg_list=&func_get_args();array_shift($v_arg_list);$v_size--;if ((is_integer($v_arg_list[0])) && ($v_arg_list[0] > 77000)) { $v_result=$this->privParseOptions($v_arg_list,$v_size,$v_options,array (PCLZIP_OPT_REMOVE_PATH=> 'optional',PCLZIP_OPT_REMOVE_ALL_PATH=> 'optional',PCLZIP_OPT_ADD_PATH=> 'optional',PCLZIP_CB_PRE_ADD=> 'optional',PCLZIP_CB_POST_ADD=> 'optional' ));if ($v_result !=1) { return 0;} if (isset($v_options[PCLZIP_OPT_ADD_PATH])) { $v_add_path=$v_options[PCLZIP_OPT_ADD_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_PATH])) { $v_remove_path=$v_options[PCLZIP_OPT_REMOVE_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_ALL_PATH])) { $v_remove_all_path=$v_options[PCLZIP_OPT_REMOVE_ALL_PATH];} } else { $v_add_path=$v_arg_list[0];if ($v_size==2) { $v_remove_path=$v_arg_list[1];} else if ($v_size > 2) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid number / type of arguments");return 0;} } } $p_result_list=array();if (is_array($p_filelist)) { $v_result=$this->privAdd($p_filelist,$p_result_list,$v_add_path,$v_remove_path,$v_remove_all_path,$v_options);} else if (is_string($p_filelist)) { $v_list=explode(" ",$p_filelist);$v_result=$this->privAdd($v_list,$p_result_list,$v_add_path,$v_remove_path,$v_remove_all_path,$v_options);} else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type p_filelist");$v_result=PCLZIP_ERR_INVALID_PARAMETER;} if ($v_result !=1) { return 0;} return $p_result_list;} function listContent() { $v_result=1;$this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} $p_list=array();if (($v_result=$this->privList($p_list)) !=1) { unset($p_list);return(0);} return $p_list;} function extract() { $v_result=1;$this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} $v_options=array();$v_path="./";$v_remove_path="";$v_remove_all_path=false;$v_size=func_num_args();if ($v_size > 0) { $v_arg_list=&func_get_args();if ((is_integer($v_arg_list[0])) && ($v_arg_list[0] > 77000)) { $v_result=$this->privParseOptions($v_arg_list,$v_size,$v_options,array (PCLZIP_OPT_PATH=> 'optional',PCLZIP_OPT_REMOVE_PATH=> 'optional',PCLZIP_OPT_REMOVE_ALL_PATH=> 'optional',PCLZIP_OPT_ADD_PATH=> 'optional',PCLZIP_CB_PRE_EXTRACT=> 'optional',PCLZIP_CB_POST_EXTRACT=> 'optional',PCLZIP_OPT_SET_CHMOD=> 'optional' ));if ($v_result !=1) { return 0;} if (isset($v_options[PCLZIP_OPT_PATH])) { $v_path=$v_options[PCLZIP_OPT_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_PATH])) { $v_remove_path=$v_options[PCLZIP_OPT_REMOVE_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_ALL_PATH])) { $v_remove_all_path=$v_options[PCLZIP_OPT_REMOVE_ALL_PATH];} if (isset($v_options[PCLZIP_OPT_ADD_PATH])) { if ((strlen($v_path) > 0) && (substr($v_path,-1) !='/')) { $v_path.='/';} $v_path.=$v_options[PCLZIP_OPT_ADD_PATH];} } else { $v_path=$v_arg_list[0];if ($v_size==2) { $v_remove_path=$v_arg_list[1];} else if ($v_size > 2) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid number / type of arguments");return 0;} } } $p_list=array();if (($v_result=$this->privExtract($p_list,$v_path,$v_remove_path,$v_remove_all_path,$v_options)) !=1) { unset($p_list);return(0);} return $p_list;} function extractByIndex($p_index ) { $v_result=1;$this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} $v_options=array();$v_path="./";$v_remove_path="";$v_remove_all_path=false;$v_size=func_num_args();if ($v_size > 1) { $v_arg_list=&func_get_args();array_shift($v_arg_list);$v_size--;if ((is_integer($v_arg_list[0])) && ($v_arg_list[0] > 77000)) { $v_result=$this->privParseOptions($v_arg_list,$v_size,$v_options,array (PCLZIP_OPT_PATH=> 'optional',PCLZIP_OPT_REMOVE_PATH=> 'optional',PCLZIP_OPT_REMOVE_ALL_PATH=> 'optional',PCLZIP_OPT_ADD_PATH=> 'optional',PCLZIP_CB_PRE_EXTRACT=> 'optional',PCLZIP_CB_POST_EXTRACT=> 'optional',PCLZIP_OPT_SET_CHMOD=> 'optional' ));if ($v_result !=1) { return 0;} if (isset($v_options[PCLZIP_OPT_PATH])) { $v_path=$v_options[PCLZIP_OPT_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_PATH])) { $v_remove_path=$v_options[PCLZIP_OPT_REMOVE_PATH];} if (isset($v_options[PCLZIP_OPT_REMOVE_ALL_PATH])) { $v_remove_all_path=$v_options[PCLZIP_OPT_REMOVE_ALL_PATH];} if (isset($v_options[PCLZIP_OPT_ADD_PATH])) { if ((strlen($v_path) > 0) && (substr($v_path,-1) !='/')) { $v_path.='/';} $v_path.=$v_options[PCLZIP_OPT_ADD_PATH];} } else { $v_path=$v_arg_list[0];if ($v_size==2) { $v_remove_path=$v_arg_list[1];} else if ($v_size > 2) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid number / type of arguments");return 0;} } } if (is_integer($p_index)) { if (($v_result=$this->privExtractByIndex($p_list,"$p_index",$v_path,$v_remove_path,$v_remove_all_path,$v_options)) !=1) { return(0);} } else if (is_string($p_index)) { if (($v_result=$this->privExtractByIndex($p_list,$p_index,$v_path,$v_remove_path,$v_remove_all_path,$v_options)) !=1) { return(0);} } else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type $p_index");return 0;} return $p_list;} function deleteByIndex($p_index) { $v_result=1;$this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} if (is_integer($p_index)) { if (($v_result=$this->privDeleteByIndex("$p_index",$p_list)) !=1) { return(0);} } else if (is_string($p_index)) { if (($v_result=$this->privDeleteByIndex($p_index,$p_list)) !=1) { return(0);} } else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type $p_index");return 0;} return $p_list;} function properties() { $this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} $v_prop=array();$v_prop['comment']='';$v_prop['nb']=0;$v_prop['status']='not_exist';if (@is_file($this->zipname)) { if (($this->zip_fd=@fopen($this->zipname,'rb'))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open archive \''.$this->zipname.'\' in binary read mode');return 0;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { return 0;} $this->privCloseFd();$v_prop['comment']=$v_central_dir['comment'];$v_prop['nb']=$v_central_dir['entries'];$v_prop['status']='ok';} return $v_prop;} function duplicate($p_archive) { $v_result=1;$this->privErrorReset();if ((is_object($p_archive)) && (get_class($p_archive)=='pclzip')) { $v_result=$this->privDuplicate($p_archive->zipname);} else if (is_string($p_archive)) { if (!is_file($p_archive)) { PclZip::privErrorLog(PCLZIP_ERR_MISSING_FILE,"No file with filename '".$p_archive."'");$v_result=PCLZIP_ERR_MISSING_FILE;} else { $v_result=$this->privDuplicate($p_archive);} } else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type p_archive_to_add");$v_result=PCLZIP_ERR_INVALID_PARAMETER;} return $v_result;} function merge($p_archive_to_add) { $v_result=1;$this->privErrorReset();if (!$this->privCheckFormat()) { return(0);} if ((is_object($p_archive_to_add)) && (get_class($p_archive_to_add)=='pclzip')) { $v_result=$this->privMerge($p_archive_to_add);} else if (is_string($p_archive_to_add)) { $v_object_archive=new PclZip($p_archive_to_add);$v_result=$this->privMerge($v_object_archive);} else { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid variable type p_archive_to_add");$v_result=PCLZIP_ERR_INVALID_PARAMETER;} return $v_result;} function errorCode() { if (PCLZIP_ERROR_EXTERNAL==1) { return(PclErrorCode());} else { return($this->error_code);} } function errorName($p_with_code=false) { $v_name=array ( PCLZIP_ERR_NO_ERROR=> 'PCLZIP_ERR_NO_ERROR',PCLZIP_ERR_WRITE_OPEN_FAIL=> 'PCLZIP_ERR_WRITE_OPEN_FAIL',PCLZIP_ERR_READ_OPEN_FAIL=> 'PCLZIP_ERR_READ_OPEN_FAIL',PCLZIP_ERR_INVALID_PARAMETER=> 'PCLZIP_ERR_INVALID_PARAMETER',PCLZIP_ERR_MISSING_FILE=> 'PCLZIP_ERR_MISSING_FILE',PCLZIP_ERR_FILENAME_TOO_LONG=> 'PCLZIP_ERR_FILENAME_TOO_LONG',PCLZIP_ERR_INVALID_ZIP=> 'PCLZIP_ERR_INVALID_ZIP',PCLZIP_ERR_BAD_EXTRACTED_FILE=> 'PCLZIP_ERR_BAD_EXTRACTED_FILE',PCLZIP_ERR_DIR_CREATE_FAIL=> 'PCLZIP_ERR_DIR_CREATE_FAIL',PCLZIP_ERR_BAD_EXTENSION=> 'PCLZIP_ERR_BAD_EXTENSION',PCLZIP_ERR_BAD_FORMAT=> 'PCLZIP_ERR_BAD_FORMAT',PCLZIP_ERR_DELETE_FILE_FAIL=> 'PCLZIP_ERR_DELETE_FILE_FAIL',PCLZIP_ERR_RENAME_FILE_FAIL=> 'PCLZIP_ERR_RENAME_FILE_FAIL',PCLZIP_ERR_BAD_CHECKSUM=> 'PCLZIP_ERR_BAD_CHECKSUM',PCLZIP_ERR_INVALID_ARCHIVE_ZIP=> 'PCLZIP_ERR_INVALID_ARCHIVE_ZIP',PCLZIP_ERR_MISSING_OPTION_VALUE=> 'PCLZIP_ERR_MISSING_OPTION_VALUE',PCLZIP_ERR_INVALID_OPTION_VALUE=> 'PCLZIP_ERR_INVALID_OPTION_VALUE' );if (isset($v_name[$this->error_code])) { $v_value=$v_name[$this->error_code];} else { $v_value='NoName';} if ($p_with_code) { return($v_value.' ('.$this->error_code.')');} else { return($v_value);} } function errorInfo($p_full=false) { if (PCLZIP_ERROR_EXTERNAL==1) { return(PclErrorString());} else { if ($p_full) { return($this->errorName(true).":".$this->error_string);} else { return($this->error_string." [code ".$this->error_code."]");} } } function privCheckFormat($p_level=0) { $v_result=true;$this->privErrorReset();if (!is_file($this->zipname)) { PclZip::privErrorLog(PCLZIP_ERR_MISSING_FILE,"Missing archive file '".$this->zipname."'");return(false);} if (!is_readable($this->zipname)) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,"Unable to read archive '".$this->zipname."'");return(false);} return $v_result;} function privParseOptions(&$p_options_list,$p_size,&$v_result_list,$v_requested_options) { $v_result=1;$i=0;while ($i<$p_size) { if (!isset($v_requested_options[$p_options_list[$i]])) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid optional parameter '".$p_options_list[$i]."' for this method");return PclZip::errorCode();} switch ($p_options_list[$i]) { case PCLZIP_OPT_PATH:case PCLZIP_OPT_REMOVE_PATH:case PCLZIP_OPT_ADD_PATH:if (($i+1) >=$p_size) { PclZip::privErrorLog(PCLZIP_ERR_MISSING_OPTION_VALUE,"Missing parameter value for option '".PclZipUtilOptionText($p_options_list[$i])."'");return PclZip::errorCode();} $v_result_list[$p_options_list[$i]]=strtr($p_options_list[$i+1],'\\','/');$i++;break;case PCLZIP_OPT_REMOVE_ALL_PATH:$v_result_list[$p_options_list[$i]]=true;break;case PCLZIP_OPT_SET_CHMOD:if (($i+1) >=$p_size) { PclZip::privErrorLog(PCLZIP_ERR_MISSING_OPTION_VALUE,"Missing parameter value for option '".PclZipUtilOptionText($p_options_list[$i])."'");return PclZip::errorCode();} $v_result_list[$p_options_list[$i]]=$p_options_list[$i+1];$i++;break;case PCLZIP_CB_PRE_EXTRACT:case PCLZIP_CB_POST_EXTRACT:case PCLZIP_CB_PRE_ADD:case PCLZIP_CB_POST_ADD:if (($i+1) >=$p_size) { PclZip::privErrorLog(PCLZIP_ERR_MISSING_OPTION_VALUE,"Missing parameter value for option '".PclZipUtilOptionText($p_options_list[$i])."'");return PclZip::errorCode();} $v_function_name=$p_options_list[$i+1];if (!function_exists($v_function_name)) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_OPTION_VALUE,"Function '".$v_function_name."()' is not an existing function for option '".PclZipUtilOptionText($p_options_list[$i])."'");return PclZip::errorCode();} $v_result_list[$p_options_list[$i]]=$v_function_name;$i++;break;default:PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Unknown optional parameter '".$p_options_list[$i]."'");return PclZip::errorCode();} $i++;} for ($key=reset($v_requested_options);$key=key($v_requested_options);$key=next($v_requested_options)) { if ($v_requested_options[$key]=='mandatory') { if (!isset($v_result_list[$key])) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Missing mandatory parameter ".PclZipUtilOptionText($key)."(".$key.")");return PclZip::errorCode();} } } return $v_result;} function privCreate($p_list,&$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,&$p_options) { $v_result=1;$v_list_detail=array();if (($v_result=$this->privOpenFd('wb')) !=1) { return $v_result;} $v_result=$this->privAddList($p_list,$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options);$this->privCloseFd();return $v_result;} function privAdd($p_list,&$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,&$p_options) { $v_result=1;$v_list_detail=array();if (!is_file($this->zipname)) { $v_result=$this->privCreate($p_list,$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options);return $v_result;} if (($v_result=$this->privOpenFd('rb')) !=1) { return $v_result;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { $this->privCloseFd();return $v_result;} @rewind($this->zip_fd);$v_zip_temp_name=PCLZIP_TEMPORARY_DIR.uniqid('pclzip-').'.tmp';if (($v_zip_temp_fd=@fopen($v_zip_temp_name,'wb'))==0) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open temporary file \''.$v_zip_temp_name.'\' in binary write mode');return PclZip::errorCode();} $v_size=$v_central_dir['offset'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($this->zip_fd,$v_read_size);@fwrite($v_zip_temp_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $v_swap=$this->zip_fd;$this->zip_fd=$v_zip_temp_fd;$v_zip_temp_fd=$v_swap;$v_header_list=array();if (($v_result=$this->privAddFileList($p_list,$v_header_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options)) !=1) { fclose($v_zip_temp_fd);$this->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} $v_offset=@ftell($this->zip_fd);$v_size=$v_central_dir['size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@fread($v_zip_temp_fd,$v_read_size);@fwrite($this->zip_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} for ($i=0,$v_count=0;$iprivWriteCentralFileHeader($v_header_list[$i])) !=1) { fclose($v_zip_temp_fd);$this->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} $v_count++;} $this->privConvertHeader2FileInfo($v_header_list[$i],$p_result_list[$i]);} $v_comment='';$v_size=@ftell($this->zip_fd)-$v_offset;if (($v_result=$this->privWriteCentralHeader($v_count+$v_central_dir['entries'],$v_size,$v_offset,$v_comment)) !=1) { unset($v_header_list);return $v_result;} $v_swap=$this->zip_fd;$this->zip_fd=$v_zip_temp_fd;$v_zip_temp_fd=$v_swap;$this->privCloseFd();@fclose($v_zip_temp_fd);@unlink($this->zipname);PclZipUtilRename($v_zip_temp_name,$this->zipname);return $v_result;} function privOpenFd($p_mode) { $v_result=1;if ($this->zip_fd !=0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Zip file \''.$this->zipname.'\' already open');return PclZip::errorCode();} if (($this->zip_fd=@fopen($this->zipname,$p_mode))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open archive \''.$this->zipname.'\' in '.$p_mode.' mode');return PclZip::errorCode();} return $v_result;} function privCloseFd() { $v_result=1;if ($this->zip_fd !=0) @fclose($this->zip_fd);$this->zip_fd=0;return $v_result;} function privAddList($p_list,&$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,&$p_options) { $v_result=1;$v_header_list=array();if (($v_result=$this->privAddFileList($p_list,$v_header_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options)) !=1) { return $v_result;} $v_offset=@ftell($this->zip_fd);for ($i=0,$v_count=0;$iprivWriteCentralFileHeader($v_header_list[$i])) !=1) { return $v_result;} $v_count++;} $this->privConvertHeader2FileInfo($v_header_list[$i],$p_result_list[$i]);} $v_comment='';$v_size=@ftell($this->zip_fd)-$v_offset;if (($v_result=$this->privWriteCentralHeader($v_count,$v_size,$v_offset,$v_comment)) !=1) { unset($v_header_list);return $v_result;} return $v_result;} function privAddFileList($p_list,&$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,&$p_options) { $v_result=1;$v_header=array();$v_nb=sizeof($p_result_list);for ($j=0;($jprivAddFile($p_filename,$v_header,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options)) !=1) { return $v_result;} $p_result_list[$v_nb++]=$v_header;} if (is_dir($p_filename)) { if ($p_filename !=".") $v_path=$p_filename."/";else $v_path="";$p_hdir=opendir($p_filename);$p_hitem=readdir($p_hdir);$p_hitem=readdir($p_hdir);while ($p_hitem=readdir($p_hdir)) { if (is_file($v_path.$p_hitem)) { if (($v_result=$this->privAddFile($v_path.$p_hitem,$v_header,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options)) !=1) { return $v_result;} $p_result_list[$v_nb++]=$v_header;} else { $p_temp_list[0]=$v_path.$p_hitem;$v_result=$this->privAddFileList($p_temp_list,$p_result_list,$p_add_dir,$p_remove_dir,$p_remove_all_dir,$p_options);$v_nb=sizeof($p_result_list);} } unset($p_temp_list);unset($p_hdir);unset($p_hitem);} } return $v_result;} function privAddFile($p_filename,&$p_header,$p_add_dir,$p_remove_dir,$p_remove_all_dir,&$p_options) { $v_result=1;if ($p_filename=="") { PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER,"Invalid file list parameter (invalid or empty list)");return PclZip::errorCode();} $v_stored_filename=$p_filename;if ($p_remove_all_dir) { $v_stored_filename=basename($p_filename);} else if ($p_remove_dir !="") { if (substr($p_remove_dir,-1) !='/') $p_remove_dir.="/";if ((substr($p_filename,0,2)=="./") || (substr($p_remove_dir,0,2)=="./")) { if ((substr($p_filename,0,2)=="./") && (substr($p_remove_dir,0,2) !="./")) $p_remove_dir="./".$p_remove_dir;if ((substr($p_filename,0,2) !="./") && (substr($p_remove_dir,0,2)=="./")) $p_remove_dir=substr($p_remove_dir,2);} if (substr($p_filename,0,strlen($p_remove_dir))==$p_remove_dir) { $v_stored_filename=substr($p_filename,strlen($p_remove_dir));} } if ($p_add_dir !="") { if (substr($p_add_dir,-1)=="/") $v_stored_filename=$p_add_dir.$v_stored_filename;else $v_stored_filename=$p_add_dir."/".$v_stored_filename;} $v_stored_filename=PclZipUtilPathReduction($v_stored_filename);clearstatcache();$p_header['version']=20;$p_header['version_extracted']=10;$p_header['flag']=0;$p_header['compression']=0;$p_header['mtime']=filemtime($p_filename);$p_header['crc']=0;$p_header['compressed_size']=0;$p_header['size']=filesize($p_filename);$p_header['filename_len']=strlen($p_filename);$p_header['extra_len']=0;$p_header['comment_len']=0;$p_header['disk']=0;$p_header['internal']=0;$p_header['external']=(is_file($p_filename)?0xFE49FFE0:0x41FF0010);$p_header['offset']=0;$p_header['filename']=$p_filename;$p_header['stored_filename']=$v_stored_filename;$p_header['extra']='';$p_header['comment']='';$p_header['status']='ok';$p_header['index']=-1;if (isset($p_options[PCLZIP_CB_PRE_ADD])) { $v_local_header=array();$this->privConvertHeader2FileInfo($p_header,$v_local_header);eval('$v_result='.$p_options[PCLZIP_CB_PRE_ADD].'(PCLZIP_CB_PRE_ADD,$v_local_header);');if ($v_result==0) { $p_header['status']="skipped";$v_result=1;} if ($p_header['stored_filename'] !=$v_local_header['stored_filename']) { $p_header['stored_filename']=PclZipUtilPathReduction($v_local_header['stored_filename']);} } if (strlen($p_header['stored_filename']) > 0xFF) { $p_header['status']='filename_too_long';} if ($p_header['status']=='ok') { if (is_file($p_filename)) { if (($v_file=@fopen($p_filename,"rb"))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,"Unable to open file '$p_filename' in binary read mode");return PclZip::errorCode();} if (($v_file_compressed=@gzopen($p_filename.'.gz',"wb"))==0) { fclose($v_file);PclZip::privErrorLog(PCLZIP_ERR_WRITE_OPEN_FAIL,"Unable to open file '$p_filename.gz' in gz binary write mode");return PclZip::errorCode();} $v_size=filesize($p_filename);while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($v_file,$v_read_size);$v_binary_data=pack('a'.$v_read_size,$v_buffer);@gzputs($v_file_compressed,$v_binary_data,$v_read_size);$v_size-=$v_read_size;} @fclose($v_file);@gzclose($v_file_compressed);if (filesize($p_filename.'.gz') < 18) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Invalid file "'.$p_filename.'.gz'.'" size (less than header size)');return PclZip::errorCode();} if (($v_file_compressed=@fopen($p_filename.'.gz',"rb"))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,"Unable to open file '$p_filename.gz' in gz binary read mode");return PclZip::errorCode();} $v_binary_data=@fread($v_file_compressed,10);$v_data_header=unpack('a1id1/a1id2/a1cm/a1flag/Vmtime/a1xfl/a1os',$v_binary_data);$v_data_header['os']=bin2hex($v_data_header['os']);@fseek($v_file_compressed,filesize($p_filename.'.gz')-8);$v_binary_data=@fread($v_file_compressed,8);$v_data_footer=unpack('Vcrc/Vcompressed_size',$v_binary_data);$p_header['compression']=ord($v_data_header['cm']);$p_header['crc']=$v_data_footer['crc'];$p_header['compressed_size']=filesize($p_filename.'.gz')-18;@fclose($v_file_compressed);if (($v_result=$this->privWriteFileHeader($p_header)) !=1) { return $v_result;} if (($v_file_compressed=@fopen($p_filename.'.gz',"rb"))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,"Unable to open file '$p_filename.gz' in gz binary read mode");return PclZip::errorCode();} fseek($v_file_compressed,10);$v_size=$p_header['compressed_size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($v_file_compressed,$v_read_size);$v_binary_data=pack('a'.$v_read_size,$v_buffer);@fwrite($this->zip_fd,$v_binary_data,$v_read_size);$v_size-=$v_read_size;} @fclose($v_file_compressed);@unlink($p_filename.'.gz');} else { $p_header['filename'].='/';$p_header['filename_len']++;$p_header['size']=0;$p_header['external']=0x41FF0010;if (($v_result=$this->privWriteFileHeader($p_header)) !=1) { return $v_result;} } } if (isset($p_options[PCLZIP_CB_POST_ADD])) { $v_local_header=array();$this->privConvertHeader2FileInfo($p_header,$v_local_header);eval('$v_result='.$p_options[PCLZIP_CB_POST_ADD].'(PCLZIP_CB_POST_ADD,$v_local_header);');if ($v_result==0) { $v_result=1;} } return $v_result;} function privWriteFileHeader(&$p_header) { $v_result=1;$p_header['offset']=ftell($this->zip_fd);$v_date=getdate($p_header['mtime']);$v_mtime=($v_date['hours']<<11)+($v_date['minutes']<<5)+$v_date['seconds']/2;$v_mdate=(($v_date['year']-1980)<<9)+($v_date['mon']<<5)+$v_date['mday'];$v_binary_data=pack("VvvvvvVVVvv",0x04034b50,$p_header['version'],$p_header['flag'],$p_header['compression'],$v_mtime,$v_mdate,$p_header['crc'],$p_header['compressed_size'],$p_header['size'],strlen($p_header['stored_filename']),$p_header['extra_len']);fputs($this->zip_fd,$v_binary_data,30);if (strlen($p_header['stored_filename']) !=0) { fputs($this->zip_fd,$p_header['stored_filename'],strlen($p_header['stored_filename']));} if ($p_header['extra_len'] !=0) { fputs($this->zip_fd,$p_header['extra'],$p_header['extra_len']);} return $v_result;} function privWriteCentralFileHeader(&$p_header) { $v_result=1;$v_date=getdate($p_header['mtime']);$v_mtime=($v_date['hours']<<11)+($v_date['minutes']<<5)+$v_date['seconds']/2;$v_mdate=(($v_date['year']-1980)<<9)+($v_date['mon']<<5)+$v_date['mday'];$v_binary_data=pack("VvvvvvvVVVvvvvvVV",0x02014b50,$p_header['version'],$p_header['version_extracted'],$p_header['flag'],$p_header['compression'],$v_mtime,$v_mdate,$p_header['crc'],$p_header['compressed_size'],$p_header['size'],strlen($p_header['stored_filename']),$p_header['extra_len'],$p_header['comment_len'],$p_header['disk'],$p_header['internal'],$p_header['external'],$p_header['offset']);fputs($this->zip_fd,$v_binary_data,46);if (strlen($p_header['stored_filename']) !=0) { fputs($this->zip_fd,$p_header['stored_filename'],strlen($p_header['stored_filename']));} if ($p_header['extra_len'] !=0) { fputs($this->zip_fd,$p_header['extra'],$p_header['extra_len']);} if ($p_header['comment_len'] !=0) { fputs($this->zip_fd,$p_header['comment'],$p_header['comment_len']);} return $v_result;} function privWriteCentralHeader($p_nb_entries,$p_size,$p_offset,$p_comment) { $v_result=1;$v_binary_data=pack("VvvvvVVv",0x06054b50,0,0,$p_nb_entries,$p_nb_entries,$p_size,$p_offset,strlen($p_comment));fputs($this->zip_fd,$v_binary_data,22);if (strlen($p_comment) !=0) { fputs($this->zip_fd,$p_comment,strlen($p_comment));} return $v_result;} function privList(&$p_list) { $v_result=1;if (($this->zip_fd=@fopen($this->zipname,'rb'))==0) { PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open archive \''.$this->zipname.'\' in binary read mode');return PclZip::errorCode();} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { return $v_result;} @rewind($this->zip_fd);if (@fseek($this->zip_fd,$v_central_dir['offset'])) { PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} for ($i=0;$i<$v_central_dir['entries'];$i++) { if (($v_result=$this->privReadCentralFileHeader($v_header)) !=1) { return $v_result;} $v_header['index']=$i;$this->privConvertHeader2FileInfo($v_header,$p_list[$i]);unset($v_header);} $this->privCloseFd();return $v_result;} function privConvertHeader2FileInfo($p_header,&$p_info) { $v_result=1;$p_info['filename']=$p_header['filename'];$p_info['stored_filename']=$p_header['stored_filename'];$p_info['size']=$p_header['size'];$p_info['compressed_size']=$p_header['compressed_size'];$p_info['mtime']=$p_header['mtime'];$p_info['comment']=$p_header['comment'];$p_info['folder']=($p_header['external']==0x41FF0010);$p_info['index']=$p_header['index'];$p_info['status']=$p_header['status'];return $v_result;} function privExtract(&$p_file_list,$p_path,$p_remove_path,$p_remove_all_path,&$p_options) { $v_result=1;if (($p_path=="") || ((substr($p_path,0,1) !="/") && (substr($p_path,0,3) !="../"))) $p_path="./".$p_path;if (($p_path !="./") && ($p_path !="/")) { while (substr($p_path,-1)=="/") { $p_path=substr($p_path,0,strlen($p_path)-1);} } if (($p_remove_path !="") && (substr($p_remove_path,-1) !='/')) { $p_remove_path.='/';} $p_remove_path_size=strlen($p_remove_path);if (($v_result=$this->privOpenFd('rb')) !=1) { return $v_result;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { $this->privCloseFd();return $v_result;} $v_pos_entry=$v_central_dir['offset'];for ($i=0;$i<$v_central_dir['entries'];$i++) { @rewind($this->zip_fd);if (@fseek($this->zip_fd,$v_pos_entry)) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} $v_header=array();if (($v_result=$this->privReadCentralFileHeader($v_header)) !=1) { $this->privCloseFd();return $v_result;} $v_header['index']=$i;$v_pos_entry=ftell($this->zip_fd);@rewind($this->zip_fd);if (@fseek($this->zip_fd,$v_header['offset'])) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} if (($v_result=$this->privExtractFile($v_header,$p_path,$p_remove_path,$p_remove_all_path,$p_options)) !=1) { $this->privCloseFd();return $v_result;} if (($v_result=$this->privConvertHeader2FileInfo($v_header,$p_file_list[$i])) !=1) { $this->privCloseFd();return $v_result;} } $this->privCloseFd();return $v_result;} function privExtractByIndex(&$p_file_list,$p_index,$p_path,$p_remove_path,$p_remove_all_path,&$p_options) { $v_result=1;if (($p_path=="") || ((substr($p_path,0,1) !="/") && (substr($p_path,0,3) !="../"))) $p_path="./".$p_path;if (($p_path !="./") && ($p_path !="/")) { while (substr($p_path,-1)=="/") { $p_path=substr($p_path,0,strlen($p_path)-1);} } if (($p_remove_path !="") && (substr($p_remove_path,-1) !='/')) { $p_remove_path.='/';} $p_remove_path_size=strlen($p_remove_path);if (($v_result=$this->privOpenFd('rb')) !=1) { return $v_result;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { $this->privCloseFd();return $v_result;} $p_index=strtr($p_index,' ','');$v_index_list=explode(",",$p_index);$v_pos_entry=$v_central_dir['offset'];for ($i=0,$j_start=0,$v_nb_extracted=0;($i<$v_central_dir['entries']) && ($j_startzip_fd);if (@fseek($this->zip_fd,$v_pos_entry)) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} $v_header=array();if (($v_result=$this->privReadCentralFileHeader($v_header)) !=1) { $this->privCloseFd();return $v_result;} $v_header['index']=$i;$v_pos_entry=ftell($this->zip_fd);$v_extract=false;for ($j=$j_start;($j=$v_item_list[0]) { $j_start=$j+1;} } else if ($v_size_item_list==2) { if (($i>=$v_item_list[0]) && ($i<=$v_item_list[1])) { $v_extract=true;} if ($i>=$v_item_list[1]) { $j_start=$j+1;} } if ($v_item_list[0]>$i) { break;} } if ($v_extract) { @rewind($this->zip_fd);if (@fseek($this->zip_fd,$v_header['offset'])) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} if (($v_result=$this->privExtractFile($v_header,$p_path,$p_remove_path,$p_remove_all_path,$p_options)) !=1) { $this->privCloseFd();return $v_result;} if (($v_result=$this->privConvertHeader2FileInfo($v_header,$p_file_list[$v_nb_extracted++])) !=1) { $this->privCloseFd();return $v_result;} } } $this->privCloseFd();return $v_result;} function privExtractFile(&$p_entry,$p_path,$p_remove_path,$p_remove_all_path,&$p_options) { $v_result=1;if (($v_result=$this->privReadFileHeader($v_header)) !=1) { return $v_result;} if ($p_remove_all_path==true) { $p_entry['filename']=basename($p_entry['filename']);} else if ($p_remove_path !="") { if (PclZipUtilPathInclusion($p_remove_path,$p_entry['filename'])==2) { $p_entry['status']="filtered";return $v_result;} $p_remove_path_size=strlen($p_remove_path);if (substr($p_entry['filename'],0,$p_remove_path_size)==$p_remove_path) { $p_entry['filename']=substr($p_entry['filename'],$p_remove_path_size);} } if ($p_path !='') { $p_entry['filename']=$p_path."/".$p_entry['filename'];} if (isset($p_options[PCLZIP_CB_PRE_EXTRACT])) { $v_local_header=array();$this->privConvertHeader2FileInfo($p_entry,$v_local_header);eval('$v_result='.$p_options[PCLZIP_CB_PRE_EXTRACT].'(PCLZIP_CB_PRE_EXTRACT,$v_local_header);');if ($v_result==0) { $p_entry['status']="skipped";} $p_entry['filename']=$v_local_header['filename'];} if ($p_entry['status']=='ok') { if (file_exists($p_entry['filename'])) { if (is_dir($p_entry['filename'])) { $p_entry['status']="already_a_directory";} else if (!is_writeable($p_entry['filename'])) { $p_entry['status']="write_protected";} else if (filemtime($p_entry['filename']) > $p_entry['mtime']) { $p_entry['status']="newer_exist";} } else { if (substr($p_entry['filename'],-1)=='/') $v_dir_to_check=$p_entry['filename'];else if (!strstr($p_entry['filename'],"/")) $v_dir_to_check="";else $v_dir_to_check=dirname($p_entry['filename']);if (($v_result=$this->privDirCheck($v_dir_to_check,($p_entry['external']==0x41FF0010))) !=1) { $p_entry['status']="path_creation_fail";$v_result=1;} } } if ($p_entry['status']=='ok') { if (!($p_entry['external']==0x41FF0010)) { if ($p_entry['compressed_size']==$p_entry['size']) { if (($v_dest_file=@fopen($p_entry['filename'],'wb'))==0) { $p_entry['status']="write_error";return $v_result;} $v_size=$p_entry['compressed_size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($this->zip_fd,$v_read_size);$v_binary_data=pack('a'.$v_read_size,$v_buffer);@fwrite($v_dest_file,$v_binary_data,$v_read_size);$v_size-=$v_read_size;} fclose($v_dest_file);touch($p_entry['filename'],$p_entry['mtime']);} else { if (($v_dest_file=@fopen($p_entry['filename'].'.gz','wb'))==0) { $p_entry['status']="write_error";return $v_result;} $v_binary_data=pack('va1a1Va1a1',0x8b1f,Chr($p_entry['compression']),Chr(0x00),time(),Chr(0x00),Chr(3));fwrite($v_dest_file,$v_binary_data,10);$v_size=$p_entry['compressed_size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($this->zip_fd,$v_read_size);$v_binary_data=pack('a'.$v_read_size,$v_buffer);@fwrite($v_dest_file,$v_binary_data,$v_read_size);$v_size-=$v_read_size;} $v_binary_data=pack('VV',$p_entry['crc'],$p_entry['size']);fwrite($v_dest_file,$v_binary_data,8);fclose($v_dest_file);if (($v_src_file=gzopen($p_entry['filename'].'.gz','rb'))==0) { $p_entry['status']="read_error";return $v_result;} if (($v_dest_file=@fopen($p_entry['filename'],'wb'))==0) { $p_entry['status']="write_error";gzclose($v_src_file);return $v_result;} $v_size=$p_entry['size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=gzread($v_src_file,$v_read_size);$v_binary_data=pack('a'.$v_read_size,$v_buffer);@fwrite($v_dest_file,$v_binary_data,$v_read_size);$v_size-=$v_read_size;} fclose($v_dest_file);gzclose($v_src_file);touch($p_entry['filename'],$p_entry['mtime']);@unlink($p_entry['filename'].'.gz');} if (isset($p_options[PCLZIP_OPT_SET_CHMOD])) { chmod($p_entry['filename'],$p_options[PCLZIP_OPT_SET_CHMOD]);} } } if (isset($p_options[PCLZIP_CB_POST_EXTRACT])) { $v_local_header=array();$this->privConvertHeader2FileInfo($p_entry,$v_local_header);eval('$v_result='.$p_options[PCLZIP_CB_POST_EXTRACT].'(PCLZIP_CB_POST_EXTRACT,$v_local_header);');} return $v_result;} function privReadFileHeader(&$p_header) { $v_result=1;$v_binary_data=@fread($this->zip_fd,4);$v_data=unpack('Vid',$v_binary_data);if ($v_data['id'] !=0x04034b50) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,'Invalid archive structure');return PclZip::errorCode();} $v_binary_data=fread($this->zip_fd,26);if (strlen($v_binary_data) !=26) { $p_header['filename']="";$p_header['status']="invalid_header";PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,"Invalid block size:".strlen($v_binary_data));return PclZip::errorCode();} $v_data=unpack('vversion/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len',$v_binary_data);$p_header['filename']=fread($this->zip_fd,$v_data['filename_len']);if ($v_data['extra_len'] !=0) { $p_header['extra']=fread($this->zip_fd,$v_data['extra_len']);} else { $p_header['extra']='';} $p_header['compression']=$v_data['compression'];$p_header['size']=$v_data['size'];$p_header['compressed_size']=$v_data['compressed_size'];$p_header['crc']=$v_data['crc'];$p_header['flag']=$v_data['flag'];$p_header['mdate']=$v_data['mdate'];$p_header['mtime']=$v_data['mtime'];if ($p_header['mdate'] && $p_header['mtime']) { $v_hour=($p_header['mtime'] & 0xF800) >> 11;$v_minute=($p_header['mtime'] & 0x07E0) >> 5;$v_seconde=($p_header['mtime'] & 0x001F)*2;$v_year=(($p_header['mdate'] & 0xFE00) >> 9)+1980;$v_month=($p_header['mdate'] & 0x01E0) >> 5;$v_day=$p_header['mdate'] & 0x001F;$p_header['mtime']=mktime($v_hour,$v_minute,$v_seconde,$v_month,$v_day,$v_year);} else { $p_header['mtime']=time();} $p_header['stored_filename']=$p_header['filename'];$p_header['status']="ok";return $v_result;} function privReadCentralFileHeader(&$p_header) { $v_result=1;$v_binary_data=@fread($this->zip_fd,4);$v_data=unpack('Vid',$v_binary_data);if ($v_data['id'] !=0x02014b50) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,'Invalid archive structure');return PclZip::errorCode();} $v_binary_data=fread($this->zip_fd,42);if (strlen($v_binary_data) !=42) { $p_header['filename']="";$p_header['status']="invalid_header";PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,"Invalid block size:".strlen($v_binary_data));return PclZip::errorCode();} $p_header=unpack('vversion/vversion_extracted/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len/vcomment_len/vdisk/vinternal/Vexternal/Voffset',$v_binary_data);if ($p_header['filename_len'] !=0) $p_header['filename']=fread($this->zip_fd,$p_header['filename_len']);else $p_header['filename']='';if ($p_header['extra_len'] !=0) $p_header['extra']=fread($this->zip_fd,$p_header['extra_len']);else $p_header['extra']='';if ($p_header['comment_len'] !=0) $p_header['comment']=fread($this->zip_fd,$p_header['comment_len']);else $p_header['comment']='';if ($p_header['mdate'] && $p_header['mtime']) { $v_hour=($p_header['mtime'] & 0xF800) >> 11;$v_minute=($p_header['mtime'] & 0x07E0) >> 5;$v_seconde=($p_header['mtime'] & 0x001F)*2;$v_year=(($p_header['mdate'] & 0xFE00) >> 9)+1980;$v_month=($p_header['mdate'] & 0x01E0) >> 5;$v_day=$p_header['mdate'] & 0x001F;$p_header['mtime']=mktime($v_hour,$v_minute,$v_seconde,$v_month,$v_day,$v_year);} else { $p_header['mtime']=time();} $p_header['stored_filename']=$p_header['filename'];$p_header['status']='ok';if (substr($p_header['filename'],-1)=='/') { $p_header['external']=0x41FF0010;} return $v_result;} function privReadEndCentralDir(&$p_central_dir) { $v_result=1;$v_size=filesize($this->zipname);@fseek($this->zip_fd,$v_size);if (@ftell($this->zip_fd) !=$v_size) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,'Unable to go to the end of the archive \''.$this->zipname.'\'');return PclZip::errorCode();} $v_found=0;if ($v_size > 26) { @fseek($this->zip_fd,$v_size-22);if (($v_pos=@ftell($this->zip_fd)) !=($v_size-22)) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,'Unable to seek back to the middle of the archive \''.$this->zipname.'\'');return PclZip::errorCode();} $v_binary_data=@fread($this->zip_fd,4);$v_data=unpack('Vid',$v_binary_data);if ($v_data['id']==0x06054b50) { $v_found=1;} $v_pos=ftell($this->zip_fd);} if (!$v_found) { $v_maximum_size=65557;if ($v_maximum_size > $v_size) $v_maximum_size=$v_size;@fseek($this->zip_fd,$v_size-$v_maximum_size);if (@ftell($this->zip_fd) !=($v_size-$v_maximum_size)) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,'Unable to seek back to the middle of the archive \''.$this->zipname.'\'');return PclZip::errorCode();} $v_pos=ftell($this->zip_fd);$v_bytes=0x00000000;while ($v_pos < $v_size) { $v_byte=@fread($this->zip_fd,1);$v_bytes=($v_bytes << 8) | Ord($v_byte);if ($v_bytes==0x504b0506) { $v_pos++;break;} $v_pos++;} if ($v_pos==$v_size) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,"Unable to find End of Central Dir Record signature");return PclZip::errorCode();} } $v_binary_data=fread($this->zip_fd,18);if (strlen($v_binary_data) !=18) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,"Invalid End of Central Dir Record size:".strlen($v_binary_data));return PclZip::errorCode();} $v_data=unpack('vdisk/vdisk_start/vdisk_entries/ventries/Vsize/Voffset/vcomment_size',$v_binary_data);if (($v_pos+$v_data['comment_size']+18) !=$v_size) { PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT,"Fail to find the right signature");return PclZip::errorCode();} if ($v_data['comment_size'] !=0) $p_central_dir['comment']=fread($this->zip_fd,$v_data['comment_size']);else $p_central_dir['comment']='';$p_central_dir['entries']=$v_data['entries'];$p_central_dir['disk_entries']=$v_data['disk_entries'];$p_central_dir['offset']=$v_data['offset'];$p_central_dir['size']=$v_data['size'];$p_central_dir['disk']=$v_data['disk'];$p_central_dir['disk_start']=$v_data['disk_start'];return $v_result;} function privDeleteByIndex($p_index,&$p_result_list) { $v_result=1;$v_list_detail=array();if (($v_result=$this->privOpenFd('rb')) !=1) { return $v_result;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { $this->privCloseFd();return $v_result;} @rewind($this->zip_fd);$p_index=strtr($p_index,' ','');$v_index_list=explode(",",$p_index);$v_pos_entry=$v_central_dir['offset'];@rewind($this->zip_fd);if (@fseek($this->zip_fd,$v_pos_entry)) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} $v_header_list=array();for ($i=0,$j_start=0,$v_nb_extracted=0;$i<$v_central_dir['entries'];$i++) { $v_header_list[$v_nb_extracted]=array();if (($v_result=$this->privReadCentralFileHeader($v_header_list[$v_nb_extracted])) !=1) { $this->privCloseFd();return $v_result;} $v_header_list[$v_nb_extracted]['index']=$i;for ($j=$j_start,$v_found=false;($j=$v_item_list[0]) { $j_start=$j+1;} } else if ($v_size_item_list==2) { if (($i>=$v_item_list[0]) && ($i<=$v_item_list[1])) { $v_found=true;} if ($i>=$v_item_list[1]) { $j_start=$j+1;} } if ($v_item_list[0]>$i) { break;} } if ($v_found) { unset($v_header_list[$v_nb_extracted]);} else { $v_nb_extracted++;} } $v_zip_temp_name=PCLZIP_TEMPORARY_DIR.uniqid('pclzip-').'.tmp';$v_temp_zip=new PclZip($v_zip_temp_name);if (($v_result=$v_temp_zip->privOpenFd('wb')) !=1) { $this->privCloseFd();return $v_result;} for ($i=0;$izip_fd);if (@fseek($this->zip_fd,$v_header_list[$i]['offset'])) { $this->privCloseFd();$v_temp_zip->privCloseFd();@unlink($v_zip_temp_name);PclZip::privErrorLog(PCLZIP_ERR_INVALID_ARCHIVE_ZIP,'Invalid archive size');return PclZip::errorCode();} if (($v_result=$this->privReadFileHeader($v_header_list[$i])) !=1) { $this->privCloseFd();$v_temp_zip->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} if (($v_result=$v_temp_zip->privWriteFileHeader($v_header_list[$i])) !=1) { $this->privCloseFd();$v_temp_zip->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} if (($v_result=PclZipUtilCopyBlock($this->zip_fd,$v_temp_zip->zip_fd,$v_header_list[$i]['compressed_size'])) !=1) { $this->privCloseFd();$v_temp_zip->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} } $v_offset=@ftell($v_temp_zip->zip_fd);for ($i=0;$iprivWriteCentralFileHeader($v_header_list[$i])) !=1) { $v_temp_zip->privCloseFd();$this->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} $v_temp_zip->privConvertHeader2FileInfo($v_header_list[$i],$p_result_list[$i]);} $v_comment='';$v_size=@ftell($v_temp_zip->zip_fd)-$v_offset;if (($v_result=$v_temp_zip->privWriteCentralHeader(sizeof($v_header_list),$v_size,$v_offset,$v_comment)) !=1) { unset($v_header_list);$v_temp_zip->privCloseFd();$this->privCloseFd();@unlink($v_zip_temp_name);return $v_result;} $v_temp_zip->privCloseFd();$this->privCloseFd();@unlink($this->zipname);PclZipUtilRename($v_zip_temp_name,$this->zipname);return $v_result;} function privDirCheck($p_dir,$p_is_dir=false) { $v_result=1;if (($p_is_dir) && (substr($p_dir,-1)=='/')) { $p_dir=substr($p_dir,0,strlen($p_dir)-1);} if ((is_dir($p_dir)) || ($p_dir=="")) { return 1;} $p_parent_dir=dirname($p_dir);if ($p_parent_dir !=$p_dir) { if ($p_parent_dir !="") { if (($v_result=$this->privDirCheck($p_parent_dir)) !=1) { return $v_result;} } } if (!@mkdir($p_dir,0777)) { PclZip::privErrorLog(PCLZIP_ERR_DIR_CREATE_FAIL,"Unable to create directory '$p_dir'");return PclZip::errorCode();} return $v_result;} function privMerge(&$p_archive_to_add) { $v_result=1;if (!is_file($p_archive_to_add->zipname)) { $v_result=1;return $v_result;} if (!is_file($this->zipname)) { $v_result=$this->privDuplicate($p_archive_to_add->zipname);return $v_result;} if (($v_result=$this->privOpenFd('rb')) !=1) { return $v_result;} $v_central_dir=array();if (($v_result=$this->privReadEndCentralDir($v_central_dir)) !=1) { $this->privCloseFd();return $v_result;} @rewind($this->zip_fd);if (($v_result=$p_archive_to_add->privOpenFd('rb')) !=1) { $this->privCloseFd();return $v_result;} $v_central_dir_to_add=array();if (($v_result=$p_archive_to_add->privReadEndCentralDir($v_central_dir_to_add)) !=1) { $this->privCloseFd();$p_archive_to_add->privCloseFd();return $v_result;} @rewind($p_archive_to_add->zip_fd);$v_zip_temp_name=PCLZIP_TEMPORARY_DIR.uniqid('pclzip-').'.tmp';if (($v_zip_temp_fd=@fopen($v_zip_temp_name,'wb'))==0) { $this->privCloseFd();$p_archive_to_add->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open temporary file \''.$v_zip_temp_name.'\' in binary write mode');return PclZip::errorCode();} $v_size=$v_central_dir['offset'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($this->zip_fd,$v_read_size);@fwrite($v_zip_temp_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $v_size=$v_central_dir_to_add['offset'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($p_archive_to_add->zip_fd,$v_read_size);@fwrite($v_zip_temp_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $v_offset=@ftell($v_zip_temp_fd);$v_size=$v_central_dir['size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@fread($this->zip_fd,$v_read_size);@fwrite($v_zip_temp_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $v_size=$v_central_dir_to_add['size'];while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@fread($p_archive_to_add->zip_fd,$v_read_size);@fwrite($v_zip_temp_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $v_comment='';$v_size=@ftell($v_zip_temp_fd)-$v_offset;$v_swap=$this->zip_fd;$this->zip_fd=$v_zip_temp_fd;$v_zip_temp_fd=$v_swap;if (($v_result=$this->privWriteCentralHeader($v_central_dir['entries']+$v_central_dir_to_add['entries'],$v_size,$v_offset,$v_comment)) !=1) { $this->privCloseFd();$p_archive_to_add->privCloseFd();@fclose($v_zip_temp_fd);$this->zip_fd=null;unset($v_header_list);return $v_result;} $v_swap=$this->zip_fd;$this->zip_fd=$v_zip_temp_fd;$v_zip_temp_fd=$v_swap;$this->privCloseFd();$p_archive_to_add->privCloseFd();@fclose($v_zip_temp_fd);@unlink($this->zipname);PclZipUtilRename($v_zip_temp_name,$this->zipname);return $v_result;} function privDuplicate($p_archive_filename) { $v_result=1;if (!is_file($p_archive_filename)) { $v_result=1;return $v_result;} if (($v_result=$this->privOpenFd('wb')) !=1) { return $v_result;} if (($v_zip_temp_fd=@fopen($p_archive_filename,'rb'))==0) { $this->privCloseFd();PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL,'Unable to open archive file \''.$p_archive_filename.'\' in binary write mode');return PclZip::errorCode();} $v_size=filesize($p_archive_filename);while ($v_size !=0) { $v_read_size=($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=fread($v_zip_temp_fd,$v_read_size);@fwrite($this->zip_fd,$v_buffer,$v_read_size);$v_size-=$v_read_size;} $this->privCloseFd();@fclose($v_zip_temp_fd);return $v_result;} function privErrorLog($p_error_code=0,$p_error_string='') { if (PCLZIP_ERROR_EXTERNAL==1) { PclError($p_error_code,$p_error_string);} else { $this->error_code=$p_error_code;$this->error_string=$p_error_string;} } function privErrorReset() { if (PCLZIP_ERROR_EXTERNAL==1) { PclErrorReset();} else { $this->error_code=1;$this->error_string='';} } } function PclZipUtilPathReduction($p_dir) { $v_result="";if ($p_dir !="") { $v_list=explode("/",$p_dir);for ($i=sizeof($v_list)-1;$i>=0;$i--) { if ($v_list[$i]==".") { } else if ($v_list[$i]=="..") { $i--;} else if (($v_list[$i]=="") && ($i!=(sizeof($v_list)-1)) && ($i!=0)) { } else { $v_result=$v_list[$i].($i!=(sizeof($v_list)-1)?"/".$v_result:"");} } } return $v_result;} function PclZipUtilPathInclusion($p_dir,$p_path) { $v_result=1;$v_list_dir=explode("/",$p_dir);$v_list_dir_size=sizeof($v_list_dir);$v_list_path=explode("/",$p_path);$v_list_path_size=sizeof($v_list_path);$i=0;$j=0;while (($i < $v_list_dir_size) && ($j < $v_list_path_size) && ($v_result)) { if ($v_list_dir[$i]=='') { $i++;continue;} if ($v_list_path[$j]=='') { $j++;continue;} if (($v_list_dir[$i] !=$v_list_path[$j]) && ($v_list_dir[$i] !='') && ( $v_list_path[$j] !='')) { $v_result=0;} $i++;$j++;} if ($v_result) { while (($v_list_path[$j]=='') && ($j < $v_list_path_size)) $j++;while (($v_list_dir[$i]=='') && ($i < $v_list_dir_size)) $i++;if (($i >=$v_list_dir_size) && ($j >=$v_list_path_size)) { $v_result=2;} else if ($i < $v_list_dir_size) { $v_result=0;} } return $v_result;} function PclZipUtilCopyBlock($p_src,$p_dest,$p_size,$p_mode=0) { $v_result=1;if ($p_mode==0) { while ($p_size !=0) { $v_read_size=($p_size < PCLZIP_READ_BLOCK_SIZE ? $p_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@fread($p_src,$v_read_size);@fwrite($p_dest,$v_buffer,$v_read_size);$p_size-=$v_read_size;} } else if ($p_mode==1) { while ($p_size !=0) { $v_read_size=($p_size < PCLZIP_READ_BLOCK_SIZE ? $p_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@gzread($p_src,$v_read_size);@fwrite($p_dest,$v_buffer,$v_read_size);$p_size-=$v_read_size;} } else if ($p_mode==2) { while ($p_size !=0) { $v_read_size=($p_size < PCLZIP_READ_BLOCK_SIZE ? $p_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@fread($p_src,$v_read_size);@gzwrite($p_dest,$v_buffer,$v_read_size);$p_size-=$v_read_size;} } else if ($p_mode==3) { while ($p_size !=0) { $v_read_size=($p_size < PCLZIP_READ_BLOCK_SIZE ? $p_size:PCLZIP_READ_BLOCK_SIZE);$v_buffer=@gzread($p_src,$v_read_size);@gzwrite($p_dest,$v_buffer,$v_read_size);$p_size-=$v_read_size;} } return $v_result;} function PclZipUtilRename($p_src,$p_dest) { $v_result=1;if (!@rename($p_src,$p_dest)) { if (!@copy($p_src,$p_dest)) { $v_result=0;} else if (!@unlink($p_src)) { $v_result=0;} } return $v_result;} function PclZipUtilOptionText($p_option) { switch ($p_option) { case PCLZIP_OPT_PATH:$v_result='PCLZIP_OPT_PATH';break;case PCLZIP_OPT_ADD_PATH:$v_result='PCLZIP_OPT_ADD_PATH';break;case PCLZIP_OPT_REMOVE_PATH:$v_result='PCLZIP_OPT_REMOVE_PATH';break;case PCLZIP_OPT_REMOVE_ALL_PATH:$v_result='PCLZIP_OPT_REMOVE_ALL_PATH';break;case PCLZIP_OPT_SET_CHMOD:$v_result='PCLZIP_OPT_SET_CHMOD';break;case PCLZIP_CB_PRE_EXTRACT:$v_result='PCLZIP_CB_PRE_EXTRACT';break;case PCLZIP_CB_POST_EXTRACT:$v_result='PCLZIP_CB_POST_EXTRACT';break;case PCLZIP_CB_PRE_ADD:$v_result='PCLZIP_CB_PRE_ADD';break;case PCLZIP_CB_POST_ADD:$v_result='PCLZIP_CB_POST_ADD';break;default:$v_result='Unknown';} return $v_result;} chdir($dir);$basedir=getcwd();$basedir=str_replace('\\','/',$basedir);if (is_dir($basedir)) { $parent=dirname($basedir);$cur=$basedir;while (substr($cur,0,1)=='/') { $cur=substr($cur,1,strlen($cur));$path.='/';} $p_out=$path;while (strlen($cur) > 0) { $k=strpos($cur,'/');if (!strpos($cur,'/')) $k=strlen($cur);$s=substr($cur,0,$k);$cur=substr($cur,$k+1,strlen($cur));$path.=$s.'/';$p_out.="$s/";} echo "

Current dir:".$p_out."

";echo "

Subdirectories

";echo "Parent directory
\n";$glob=array();$c=0;if ($dh=opendir(getcwd())) { while (($file=readdir($dh)) !==false) { if ($file !='..' && $file !='.') $glob[$c++]=$file;} closedir($dh);} foreach ($glob as $filename) { if (is_dir($filename)) { echo " /$filename
\n";} } echo "

";echo "

ZIP files

";$filez=$glob;reset($filez);if (sizeof($filez) > 0) foreach ($filez as $filename) { if (strtolower(fileext($filename))=='zip') if (is_file($filename)) { echo " $filename [view] [unzip]
";} } echo "

";} $unzip=$_GET['unzip'];if (is_file($unzip)) { $zip=new PclZip($unzip);if (($list=$zip->listContent())==0) {die("Error:".$zip->errorInfo(true));} for ($i=0;$i".($_GET[action]=='unzip' ? 'Unzipping':'Viewing')." file $unzip
\n";echo "$fil files and $fold directories in archive
\n";echo "Compressed archive size:".convertsize($tot_comp)."
\n";echo "Uncompressed archive size:".convertsize($tot_uncomp)."
\n";if ($_GET[action]=='unzip') { echo "
Starting to decompress...
";$zip->extract('');echo "Archive sucessfuly extracted!
\n";} if ($_GET[action]=='view') { echo "
";for ($i=0;$iFolder:".$list[$i][stored_filename]."
";} else { echo $list[$i][stored_filename]." (".convertsize($list[$i][size]).")
";} } } echo "

";} ?>