Файловый менеджер

Файловый менеджер - Редактировать - /var/www/axolotl/data/www/axolotls.ru/www/bitrix/modules/main/classes/general/tar_gz.php

Назад
<?php /** * Bitrix Framework * @package bitrix * @subpackage main * @copyright 2001-2013 Bitrix / IncludeModuleLangFile(__FILE__); include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/classes/general/archive.php"); class CArchiver implements IBXArchive { public $_strArchiveName = ""; public $_bCompress = false; public $_strSeparator = " "; public $_dFile = 0; public $_arErrors = array(); public $start_time = 0; public $max_exec_time = 0; public $file_pos = 0; public $stepped = false; private $add_path = ""; private $remove_path = ""; private $startFile = ""; private $lastFile = array(); private $step_time = 30; private $tempres = false; private $ReplaceExistentFiles = false; private $CheckBXPermissions = false; private static $bMbstring = false; public function __construct($strArchiveName, $bCompress = false, $start_time = -1, $max_exec_time = -1, $pos = 0, $stepped = false) { $this->io = CBXVirtualIo::GetInstance(); $this->max_exec_time = $max_exec_time; $this->start_time = $start_time; $this->file_pos = $pos; $this->_bCompress = $bCompress; $this->stepped = $stepped; self::$bMbstring = extension_loaded("mbstring"); if (!$bCompress) { if (@file_exists($this->io->GetPhysicalName($strArchiveName))) { if ($fp = @fopen($this->io->GetPhysicalName($strArchiveName), "rb")) { $data = fread($fp, 2); fclose($fp); if ($data == "\37\213") { $this->_bCompress = True; } } } else { if (substr($strArchiveName, -2) == 'gz') { $this->_bCompress = True; } } } else { $this->_bCompress = True; } $this->_strArchiveName = $strArchiveName; $this->_arErrors = array(); } /* * Packs files and folders into archive * @param array $arFileList containing files and folders to be packed into archive * @param string $startFile - if specified then all files before it won't be packed during the traversing of $arFileList. Can be used for multi-step archivation * @return mixed false or 0 if error, 1 if success, 2 if the next step should be performed. Errors can be seen using GetErrors() method / public function Pack($arFileList, $startFile = "") { $this->_arErrors = array(); $this->startFile = $this->io->GetPhysicalName($startFile); $bNewArchive = True; if (file_exists($this->io->GetPhysicalName($this->_strArchiveName)) && is_file($this->io->GetPhysicalName($this->_strArchiveName)) && ($startFile != "")) { $bNewArchive = False; } if ($bNewArchive) { if (!$this->_openWrite()) return false; } else { if (!$this->_openAppendFast()) return false; } $res = false; $arFileList = &$this->_parseFileParams($arFileList); $arConvertedFileList = array(); foreach ($arFileList as $fullpath) $arConvertedFileList[] = $this->io->GetPhysicalName($fullpath); unset($this->tempres); if (is_array($arFileList) && count($arFileList)>0) $res = $this->_processFiles($arConvertedFileList, $this->add_path, $this->remove_path, $this->startFile); if ($res !== false && $res !== "continue") { $this->_writeFooter(); } $this->_close(); if ($bNewArchive && ($res === false)) { $this->_cleanFile(); } //if packing is not completed, remember last file if ($res === 'continue') { // if (array_pop($arFileList) != $this->lastFile) $this->startFile = $this->io->GetLogicalName(array_pop($this->lastFile)); } if ($res === false) { return IBXArchive::StatusError; } elseif ($res == true && $this->startFile == "") { return IBXArchive::StatusSuccess; } elseif ($res == true && $this->startFile != "") { return IBXArchive::StatusContinue; //call Pack() with $this->getStartFile() next time to continue } return null; } /* * Unpacks archive into specified folder * @param string $strPath - path to the directory to unpack archive to * @return mixed false if error, array if success. Errors can be seen using GetErrors() method / public function Unpack($strPath) { $this->_arErrors = array(); $v_list_detail = array(); $arFileList = array(); $strExtrType = "complete"; @set_time_limit(0); if ($v_result = $this->_openRead()) { $v_result = $this->_extractList($strPath, $v_list_detail, $strExtrType, $arFileList, ''); $this->_close(); } return $v_result; } /* * Called from the archive object it returns the name of the file for the next step during multi-step archivation. Call if Pack method returned 2 * @return string path to file / public function GetStartFile() { return $this->startFile; } private function _haveTime() { return microtime(true) - START_EXEC_TIME < $this->step_time; } private function _processFiles($arFileList, $strAddPath, $strRemovePath, $startFile = "") { $arHeaders = array(); $strAddPath = str_replace("\\", "/", $strAddPath); $strRemovePath = str_replace("\\", "/", $strRemovePath); if (!$this->_dFile) { $this->_arErrors[] = array("ERR_DFILE", GetMessage("MAIN_ARCHIVE_ERR_DFILE")); return false; } if (!is_array($arFileList) \|\| count($arFileList)<=0) return true; $j = -1; if (!isset($this->tempres)) $this->tempres = "started"; //files and directory scan while ($j++ < count($arFileList) && ($this->tempres === "started")) { $strFilename = $arFileList[$j]; if ($this->_normalizePath($strFilename) == $this->_normalizePath($this->_strArchiveName)) continue; if (strlen($strFilename)<=0) continue; if (!file_exists($strFilename)) { $this->_arErrors[] = array("NO_FILE", str_replace("#FILE_NAME#", removeDocRoot($strFilename) , GetMessage("MAIN_ARCHIVE_NO_FILE"))); continue; } //is file if (!@is_dir($strFilename)) { $strFilename = str_replace("//", "/", $strFilename); //jumping to startFile, if it's specified if (strlen($this->startFile) != 0) { if ($strFilename != $this->startFile) //don't pack - jump to the next file continue; else { //if startFile is found, continue to pack files and folders without startFile, starting from next unset($this->startFile); continue; } } //check product permissions if ($this->CheckBXPermissions) { if (!CBXArchive::HasAccess($strFilename, true)) continue; } if ($this->_haveTime()) { if (!$this->_addFile($strFilename, $arHeaders, $this->add_path, $this->remove_path)) { //$arErrors is filled in the _addFile method $this->tempres = false; } else { //remember last file $this->lastFile[] = $strFilename; } } else { $this->tempres = "continue"; return $this->tempres; } } //if directory else { if (!($handle = opendir($strFilename))) { $this->_arErrors[] = array("NO_READ", str_replace("#DIR_NAME#", $strFilename, GetMessage("MAIN_ARCHIVE_ERR_DFILE"))); continue; } if ($this->CheckBXPermissions) { if (!CBXArchive::HasAccess($strFilename, false)) continue; } while (false !== ($dir = readdir($handle))) { if ($dir!="." && $dir!="..") { $arFileList_tmp = array(); if ($strFilename != ".") $arFileList_tmp[] = $strFilename.'/'.$dir; else $arFileList_tmp[] = $dir; $this->_processFiles($arFileList_tmp, $strAddPath, $strRemovePath, $this->startFile); } } unset($arFileList_tmp); unset($dir); unset($handle); } } return $this->tempres; } /* * Lets the user define packing/unpacking options * @param array $arOptions an array with the options' names and their values * @return nothing / public function SetOptions($arOptions) { if (array_key_exists("COMPRESS", $arOptions)) $this->_bCompress = $arOptions["COMPRESS"] === true; //this is for old 'block' step-by-step writing in the addFile method if (array_key_exists("STEPPED", $arOptions)) $this->stepped = $arOptions["STEPPED"] === true; if (array_key_exists("START_TIME", $arOptions)) $this->start_time = floatval($arOptions["START_TIME"]); if (array_key_exists("MAX_EXEC_TIME", $arOptions)) $this->max_exec_time = intval($arOptions["MAX_EXEC_TIME"]); if (array_key_exists("FILE_POS", $arOptions)) $this->file_pos = intval($arOptions["FILE_POS"]); //end if (array_key_exists("ADD_PATH", $arOptions)) $this->add_path = $this->io->GetPhysicalName(str_replace("\\", "/", strval($arOptions["ADD_PATH"]))); if (array_key_exists("REMOVE_PATH", $arOptions)) $this->remove_path = $this->io->GetPhysicalName(str_replace("\\", "/", strval($arOptions["REMOVE_PATH"]))); //this is for 'file' step-by-step writing - used in the Pack method if (array_key_exists("STEP_TIME", $arOptions)) $this->step_time = floatval($arOptions["STEP_TIME"]); if (array_key_exists("UNPACK_REPLACE", $arOptions)) $this->ReplaceExistentFiles = $arOptions["UNPACK_REPLACE"] === true; if (array_key_exists("CHECK_PERMISSIONS", $arOptions)) $this->CheckBXPermissions = $arOptions["CHECK_PERMISSIONS"] === true; } /* * Returns an array of packing/unpacking options and their current values * @return array / public function GetOptions() { $arOptions = array( "COMPRESS" => $this->_bCompress, "STEPPED" => $this->stepped, "START_TIME" => $this->start_time, "MAX_EXEC_TIME" => $this->max_exec_time, "FILE_POS" => $this->file_pos, "ADD_PATH" => $this->add_path, "REMOVE_PATH" => $this->remove_path, "STEP_TIME" => $this->step_time, "UNPACK_REPLACE" => $this->ReplaceExistentFiles, "CHECK_PERMISSIONS" => $this->CheckBXPermissions ); return $arOptions; } /* * Archives files and folders * @param array $vFileList containing files and folders to be packed into archive * @param string\|bool $strAddPath - if specified contains path to add to each packed file/folder * @param string\|bool $strRemovePath - if specified contains path to remove from each packed file/folder * @return mixed 0 or false if error, array with the list of packed files and folders if success. Errors can be seen using GetErrors() method / public function Add($vFileList, $strAddPath = false, $strRemovePath = false) { $this->_arErrors = array(); $bNewArchive = True; if (file_exists($this->io->GetPhysicalName($this->_strArchiveName)) && is_file($this->io->GetPhysicalName($this->_strArchiveName))) { $bNewArchive = False; } if ($bNewArchive) { if (!$this->_openWrite()) return false; } else { if (!$this->_openAppend()) return false; } $res = false; $arFileList = &$this->_parseFileParams($vFileList); if (is_array($arFileList) && count($arFileList)>0) $res = $this->_addFileList($arFileList, $strAddPath, $strRemovePath); if ($res) $this->_writeFooter(); $this->_close(); if ($bNewArchive && !$res) { $this->_cleanFile(); } return $res; } /* * Adds file into archive * @param string $strFilename full path to file * @param string $strAddPath - if specified contains path to add to each packed file/folder * @param string $strRemovePath - if specified contains path to remove from each packed file/folder * @return mixed 0 or false if error, array with the list of packed files and folders if success. Errors can be seen using GetErrors() method / public function addFile($strFilename, $strAddPath, $strRemovePath) { $arHeaders = array(); $strAddPath = str_replace("\\", "/", $strAddPath); $strRemovePath = str_replace("\\", "/", $strRemovePath); if (!$this->_dFile) { $this->_arErrors[] = array("ERR_DFILE", GetMessage("MAIN_ARCHIVE_ERR_DFILE")); return false; } if (strlen($strFilename)<=0) return false; if (!file_exists($this->io->GetPhysicalName($strFilename))) { $this->_arErrors[] = array("NO_FILE", "File '".$strFilename."' does not exist"); return false; } if (!$this->_addFile($strFilename, $arHeaders, $strAddPath, $strRemovePath)) return false; return true; } /* * Adds string as a file into archive * @param string $strFilename full path to file * @param string $strFileContent - file content * @return mixed 0 or false if error, array with the list of packed files and folders if success. Errors can be seen using GetErrors() method / public function addString($strFilename, $strFileContent) { $this->_arErrors = array(); if (!file_exists($this->io->GetPhysicalName($this->_strArchiveName)) \|\| !is_file($this->io->GetPhysicalName($this->_strArchiveName))) { if (!$this->_openWrite()) return false; $this->_close(); } if (!$this->_openAppend()) return false; $res = $this->_addString($strFilename, $strFileContent); $this->_writeFooter(); $this->_close(); return $res; } /* * Extract files from the archive * @param string $strPath path where to extract * @param array\|bool $vFileList if specified - array of files to be extracted, else - all files will be extracted * @return mixed 0 or false if error, array with the list of unpacked files and folders if success. Errors can be seen using GetErrors() method / public function extractFiles($strPath, $vFileList = false) { $this->_arErrors = array(); $v_list_detail = array(); $strExtrType = "complete"; $arFileList = 0; if ($vFileList !== false) { $arFileList = &$this->_parseFileParams($vFileList); $strExtrType = "partial"; } if ($v_result = $this->_openRead()) { $v_result = $this->_extractList($strPath, $v_list_detail, $strExtrType, $arFileList, ''); $this->_close(); } return $v_result; } /* * Extract content of the archive * @return mixed 0 or false if error, array with the list of unpacked files and folders if success. Errors can be seen using GetErrors() method / public function extractContent() { $this->_arErrors = array(); $arRes = array(); if ($this->_openRead()) { if (!$this->_extractList('', $arRes, "list", '', '')) { unset($arRes); $arRes = false; } $this->_close(); } return $arRes; } /* * Returns an array containing error codes and messages. Call this method after Pack or Unpack * @return array / public function GetErrors() { return $this->_arErrors; } private function _addFileList($arFileList, $strAddPath, $strRemovePath) { $v_result = true; $arHeaders = array(); $strAddPath = str_replace("\\", "/", $strAddPath); $strRemovePath = str_replace("\\", "/", $strRemovePath); if (!$this->_dFile) { $this->_arErrors[] = array("ERR_DFILE", GetMessage("MAIN_ARCHIVE_ERR_DFILE")); return false; } if (!is_array($arFileList) \|\| count($arFileList)<=0) return true; $fileListCount = count($arFileList); for ($j = 0; ($j<$fileListCount) && ($v_result); $j++) { $strFilename = $arFileList[$j]; if ($strFilename == $this->_strArchiveName) continue; if (strlen($strFilename)<=0) continue; if (!file_exists($this->io->GetPhysicalName($strFilename))) { $this->_arErrors[] = array("NO_FILE", "File '".$strFilename."' does not exist"); continue; } if (!$this->_addFile($strFilename, $arHeaders, $strAddPath, $strRemovePath)) return false; if (@is_dir($this->io->GetPhysicalName($strFilename))) { if (!($handle = opendir($this->io->GetPhysicalName($strFilename)))) { $this->_arErrors[] = array("NO_READ", str_replace("#DIR_NAME#", $strFilename, GetMessage("MAIN_ARCHIVE_ERR_DFILE"))); continue; } while (false !== ($dir = readdir($handle))) { if ($dir!="." && $dir!="..") { $arFileList_tmp = array(); if ($strFilename != ".") $arFileList_tmp[] = $strFilename.'/'.$dir; else $arFileList_tmp[] = $dir; $v_result = $this->_addFileList($arFileList_tmp, $strAddPath, $strRemovePath); } } unset($arFileList_tmp); unset($dir); unset($handle); } } return $v_result; } private function _addFile($strFilename, &$arHeaders, $strAddPath, $strRemovePath) { if (!$this->_dFile) { $this->_arErrors[] = array("ERR_DFILE", GetMessage("MAIN_ARCHIVE_ERR_DFILE")); return false; } if (strlen($strFilename)<=0) { $this->_arErrors[] = array("NO_FILENAME", GetMessage("MAIN_ARCHIVE_NO_FILENAME")); return false; } $strFilename = str_replace("\\", "/", $strFilename); $strFilename_stored = $strFilename; if (strcmp($strFilename, $strRemovePath) == 0) return true; if (strlen($strRemovePath)>0) { if (substr($strRemovePath, -1) != '/') $strRemovePath .= '/'; if (substr($strFilename, 0, strlen($strRemovePath)) == $strRemovePath) $strFilename_stored = substr($strFilename, strlen($strRemovePath)); } if (strlen($strAddPath)>0) { if (substr($strAddPath, -1) == '/') $strFilename_stored = $strAddPath.$strFilename_stored; else $strFilename_stored = $strAddPath.'/'.$strFilename_stored; } $strFilename_stored = $this->_normalizePath($strFilename_stored); if (is_file($strFilename)) { if (($dfile = @fopen($strFilename, "rb")) == 0) { $this->_arErrors[] = array("ERR_OPEN", str_replace("#FILE_NAME#", removeDocRoot($strFilename), GetMessage("MAIN_ARCHIVE_ERR_OPEN"))); return true; } $istime = ((getmicrotime() - $this->start_time) < round($this->max_exec_time)) \|\| !$this->stepped; if ($istime) { if(($this->file_pos == 0)) { if(!$this->_writeHeader($strFilename, $strFilename_stored)) return false; } if(($this->file_pos > 0) && $this->stepped) { if ($this->_bCompress) @gzseek($dfile, $this->file_pos); else @fseek($dfile, $this->file_pos); } while ($istime && ($v_buffer = fread($dfile, 512)) != '') { $v_binary_data = pack("a512", "$v_buffer"); $this->_writeBlock($v_binary_data); $istime = ((getmicrotime() - $this->start_time) < round($this->max_exec_time)) \|\| !$this->stepped; } } if($istime && $this->stepped) $this->file_pos = 0; elseif($this->stepped) { if ($this->_bCompress) { $this->file_pos = @gztell($dfile); } else $this->file_pos = @ftell($dfile); } fclose($dfile); } elseif (!$this->_writeHeader($strFilename, $strFilename_stored)) return false; return true; } /* * Returns the position of the file for the next step / public function getFilePos() { return $this->file_pos; } private function _addString($strFilename, $strFileContent) { if (!$this->_dFile) { $this->_arErrors[] = array("ERR_DFILE", GetMessage("MAIN_ARCHIVE_ERR_DFILE")); return false; } if (strlen($strFilename)<=0) { $this->_arErrors[] = array("NO_FILENAME", GetMessage("MAIN_ARCHIVE_NO_FILENAME")); return false; } $strFilename = str_replace("\\", "/", $strFilename); if (!$this->_writeHeaderBlock($strFilename, (self::$bMbstring ? mb_strlen($strFileContent, "latin1") : strlen($strFileContent)), 0, 0, "", 0, 0)) return false; $i = 0; while (($v_buffer = (self::$bMbstring ? mb_substr($strFileContent, (($i++)512), 512, "latin1") : substr($strFileContent, (($i++)512), 512))) != '') { $v_binary_data = pack("a512", $v_buffer); $this->_writeBlock($v_binary_data); } return true; } private function _extractList($p_path, &$p_list_detail, $p_mode, $p_file_list, $p_remove_path) { $v_result = true; $v_nb = 0; $v_extract_all = true; $v_listing = false; $p_path = str_replace("\\", "/", $p_path); $p_path = $this->io->GetPhysicalName($p_path); if ($p_path == '' \|\| (substr($p_path, 0, 1) != '/' && substr($p_path, 0, 3) != "../" && !strpos($p_path, ':'))) { $p_path = "./".$p_path; } $p_remove_path = str_replace("\\", "/", $p_remove_path); if (($p_remove_path != '') && (substr($p_remove_path, -1) != '/')) $p_remove_path .= '/'; $p_remove_path_size = strlen($p_remove_path); switch ($p_mode) { case "complete" : $v_extract_all = TRUE; $v_listing = FALSE; break; case "partial" : $v_extract_all = FALSE; $v_listing = FALSE; break; case "list" : $v_extract_all = FALSE; $v_listing = TRUE; break; default : $this->_arErrors[] = array("ERR_PARAM", str_replace("#EXTRACT_MODE#", $p_mode, GetMessage("MAIN_ARCHIVE_ERR_PARAM"))); return false; } clearstatcache(); while((self::$bMbstring? mb_strlen($v_binary_data = $this->_readBlock(), "latin1") : strlen($v_binary_data = $this->_readBlock())) != 0) { $v_extract_file = FALSE; $v_extraction_stopped = 0; if (!$this->_readHeader($v_binary_data, $v_header)) return false; if ($v_header['filename'] == '') continue; // ----- Look for long filename if ($v_header['typeflag'] == 'L') { if (!$this->_readLongHeader($v_header)) return false; } if ((!$v_extract_all) && (is_array($p_file_list))) { // ----- By default no unzip if the file is not found $v_extract_file = false; $l = count($p_file_list); for ($i = 0; $i < $l; $i++) { // ----- Look if it is a directory if (substr($p_file_list[$i], -1) == '/') { // ----- Look if the directory is in the filename path if ((strlen($v_header['filename']) > strlen($p_file_list[$i])) && (substr($v_header['filename'], 0, strlen($p_file_list[$i])) == $p_file_list[$i])) { $v_extract_file = TRUE; break; } } elseif ($p_file_list[$i] == $v_header['filename']) { // ----- It is a file, so compare the file names $v_extract_file = TRUE; break; } } } else { $v_extract_file = TRUE; } // ----- Look if this file need to be extracted if (($v_extract_file) && (!$v_listing)) { if (($p_remove_path != '') && (substr($v_header['filename'], 0, $p_remove_path_size) == $p_remove_path)) { $v_header['filename'] = substr($v_header['filename'], $p_remove_path_size); } if (($p_path != './') && ($p_path != '/')) { while (substr($p_path, -1) == '/') $p_path = substr($p_path, 0, strlen($p_path)-1); if (substr($v_header['filename'], 0, 1) == '/') $v_header['filename'] = $p_path.$v_header['filename']; else $v_header['filename'] = $p_path.'/'.$v_header['filename']; } if (file_exists($v_header['filename'])) { if ((@is_dir($v_header['filename'])) && ($v_header['typeflag'] == '')) { $this->_arErrors[] = array("DIR_EXISTS", str_replace("#FILE_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_DIR_EXISTS"))); return false; } if ((is_file($v_header['filename'])) && ($v_header['typeflag'] == "5")) { $this->_arErrors[] = array("FILE_EXISTS", str_replace("#FILE_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_FILE_EXISTS"))); return false; } if (!is_writeable($v_header['filename'])) { $this->_arErrors[] = array("FILE_PERMS", str_replace("#FILE_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_FILE_PERMS"))); return false; } } elseif (($v_result = $this->_dirCheck(($v_header['typeflag'] == "5" ? $v_header['filename'] : dirname($v_header['filename'])))) != 1) { $this->_arErrors[] = array("NO_DIR", str_replace("#FILE_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_NO_DIR"))); return false; } if ($v_extract_file) { $logicalFilename = $this->io->GetLogicalName($v_header['filename']); if ((HasScriptExtension($v_header['filename']) \|\| IsFileUnsafe($v_header['filename']) \|\| !$this->io->ValidatePathString($logicalFilename) \|\| !$this->io->ValidateFilenameString(GetFileName($logicalFilename))) && $this->CheckBXPermissions == true) { $this->_jumpBlock(ceil(($v_header['size']/512))); } //should we overwrite existent files? elseif ((file_exists($v_header['filename']) && $this->ReplaceExistentFiles) \|\| !(file_exists($v_header['filename']))) { if ($v_header['typeflag'] == "5") { if (!@file_exists($v_header['filename'])) { if (!@mkdir($v_header['filename'], BX_DIR_PERMISSIONS)) { $this->_arErrors[] = array("ERR_CREATE_DIR", str_replace("#DIR_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_ERR_CREATE_DIR"))); return false; } } } else { if (($v_dest_file = @fopen($v_header['filename'], "wb")) == 0) { $this->_arErrors[] = array("ERR_CREATE_FILE", str_replace("#FILE_NAME#", removeDocRoot($this->io->GetLogicalName($v_header['filename'])), GetMessage("MAIN_ARCHIVE_ERR_CREATE_FILE"))); return false; } else { $n = floor($v_header['size']/512); for ($i = 0; $i < $n; $i++) { $v_content = $this->_readBlock(); fwrite($v_dest_file, $v_content, 512); } if (($v_header['size'] % 512) != 0) { $v_content = $this->_readBlock(); fwrite($v_dest_file, $v_content, ($v_header['size'] % 512)); } @fclose($v_dest_file); @chmod($v_header['filename'], BX_FILE_PERMISSIONS); @touch($v_header['filename'], $v_header['mtime']); } clearstatcache(); if (filesize($v_header['filename']) != $v_header['size']) { $this->_arErrors[] = array("ERR_SIZE_CHECK", str_replace(array("#FILE_NAME#","#SIZE#","#EXP_SIZE#"), array(removeDocRoot($v_header['size']),filesize($v_header['filename']),$v_header['size']), GetMessage("MAIN_ARCHIVE_ERR_SIZE_CHECK"))); return false; } } } else { $this->_jumpBlock(ceil(($v_header['size']/512))); } } else { $this->_jumpBlock(ceil(($v_header['size']/512))); } } else { $this->_jumpBlock(ceil(($v_header['size']/512))); } if ($v_listing \|\| $v_extract_file \|\| $v_extraction_stopped) { if (($v_file_dir = dirname($v_header['filename'])) == $v_header['filename']) $v_file_dir = ''; if ((substr($v_header['filename'], 0, 1) == '/') && ($v_file_dir == '')) $v_file_dir = '/'; $p_list_detail[$v_nb++] = $v_header; } } return true; } private function _writeHeader($strFilename, $strFilename_stored) { if (strlen($strFilename_stored)<=0) $strFilename_stored = $strFilename; $strFilename_ready = $this->_normalizePath($strFilename_stored); if ((self::$bMbstring ? mb_strlen($strFilename_ready, "latin1") : strlen($strFilename_ready)) > 99) { if (!$this->_writeLongHeader($strFilename_ready)) return false; } $v_info = stat($strFilename); $v_uid = sprintf("%6s ", DecOct($v_info[4])); $v_gid = sprintf("%6s ", DecOct($v_info[5])); $v_perms = sprintf("%6s ", DecOct(fileperms($strFilename))); $v_mtime = sprintf("%11s", DecOct(filemtime($strFilename))); if (@is_dir($strFilename)) { $v_typeflag = "5"; $v_size = sprintf("%11s ", DecOct(0)); } else { $v_typeflag = ''; clearstatcache(); $v_size = sprintf("%11s ", DecOct(filesize($strFilename))); } $v_linkname = ''; $v_magic = ''; $v_version = ''; $v_uname = ''; $v_gname = ''; $v_devmajor = ''; $v_devminor = ''; $v_prefix = ''; $v_binary_data_first = pack("a100a8a8a8a12A12", $strFilename_ready, $v_perms, $v_uid, $v_gid, $v_size, $v_mtime); $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", $v_typeflag, $v_linkname, $v_magic, $v_version, $v_uname, $v_gname, $v_devmajor, $v_devminor, $v_prefix, ''); $v_checksum = 0; for ($i = 0; $i < 148; $i++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_first, $i, 1, "latin1") : substr($v_binary_data_first, $i, 1))); for ($i = 148; $i < 156; $i++) $v_checksum += ord(' '); for ($i = 156, $j = 0; $i < 512; $i++, $j++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_last, $j, 1, "latin1") : substr($v_binary_data_last, $j, 1))); $this->_writeBlock($v_binary_data_first, 148); $v_checksum = sprintf("%6s ", DecOct($v_checksum)); $v_binary_data = pack("a8", $v_checksum); $this->_writeBlock($v_binary_data, 8); $this->_writeBlock($v_binary_data_last, 356); return true; } private function _writeLongHeader($strFilename) { $v_size = sprintf("%11s ", DecOct(strlen($strFilename))); $v_typeflag = 'L'; $v_linkname = ''; $v_magic = ''; $v_version = ''; $v_uname = ''; $v_gname = ''; $v_devmajor = ''; $v_devminor = ''; $v_prefix = ''; $v_binary_data_first = pack("a100a8a8a8a12A12", '././@LongLink', 0, 0, 0, $v_size, 0); $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", $v_typeflag, $v_linkname, $v_magic, $v_version, $v_uname, $v_gname, $v_devmajor, $v_devminor, $v_prefix, ''); $v_checksum = 0; for ($i = 0; $i < 148; $i++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_first, $i, 1, "latin1") : substr($v_binary_data_first, $i, 1))); for ($i = 148; $i < 156; $i++) $v_checksum += ord(' '); for ($i = 156, $j=0; $i < 512; $i++, $j++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_last, $j, 1, "latin1") : substr($v_binary_data_last, $j, 1))); $this->_writeBlock($v_binary_data_first, 148); $v_checksum = sprintf("%6s ", DecOct($v_checksum)); $v_binary_data = pack("a8", $v_checksum); $this->_writeBlock($v_binary_data, 8); $this->_writeBlock($v_binary_data_last, 356); $p_filename = $this->_normalizePath($strFilename); $i = 0; while (($v_buffer = (self::$bMbstring ? mb_substr($p_filename, (($i++)512), 512, "latin1") : substr($p_filename, (($i++)512), 512))) != '') { $v_binary_data = pack("a512", "$v_buffer"); $this->_writeBlock($v_binary_data); } return true; } private function _writeHeaderBlock($strFilename, $iSize, $p_mtime=0, $p_perms=0, $p_type='', $p_uid=0, $p_gid=0) { $strFilename = $this->_normalizePath($strFilename); if (strlen($strFilename) > 99) { if (!$this->_writeLongHeader($strFilename)) return false; } if ($p_type == "5") $v_size = sprintf("%11s ", DecOct(0)); else $v_size = sprintf("%11s ", DecOct($iSize)); $v_uid = sprintf("%6s ", DecOct($p_uid)); $v_gid = sprintf("%6s ", DecOct($p_gid)); $v_perms = sprintf("%6s ", DecOct($p_perms)); $v_mtime = sprintf("%11s", DecOct($p_mtime)); $v_linkname = ''; $v_magic = ''; $v_version = ''; $v_uname = ''; $v_gname = ''; $v_devmajor = ''; $v_devminor = ''; $v_prefix = ''; $v_binary_data_first = pack("a100a8a8a8a12A12", $strFilename, $v_perms, $v_uid, $v_gid, $v_size, $v_mtime); $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", $p_type, $v_linkname, $v_magic, $v_version, $v_uname, $v_gname, $v_devmajor, $v_devminor, $v_prefix, ''); $v_checksum = 0; for ($i = 0; $i < 148; $i++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_first, $i, 1, "latin1") : substr($v_binary_data_first, $i, 1))); for ($i = 148; $i < 156; $i++) $v_checksum += ord(' '); for ($i = 156, $j = 0; $i < 512; $i++, $j++) $v_checksum += ord((self::$bMbstring ? mb_substr($v_binary_data_last, $j, 1, "latin1") : substr($v_binary_data_last, $j, 1))); $this->_writeBlock($v_binary_data_first, 148); $v_checksum = sprintf("%6s ", DecOct($v_checksum)); $v_binary_data = pack("a8", $v_checksum); $this->_writeBlock($v_binary_data, 8); $this->_writeBlock($v_binary_data_last, 356); return true; } private function _readBlock() { $v_block = ""; if (is_resource($this->_dFile)) { if ($this->_bCompress) $v_block = @gzread($this->_dFile, 512); else $v_block = @fread($this->_dFile, 512); } return $v_block; } private function _readHeader($v_binary_data, &$v_header) { if ((self::$bMbstring ? mb_strlen($v_binary_data, "latin1") : strlen($v_binary_data)) == 0) { $v_header['filename'] = ''; return true; } if ((self::$bMbstring ? mb_strlen($v_binary_data, "latin1") : strlen($v_binary_data)) != 512) { $v_header['filename'] = ''; $this->_arErrors[] = array("INV_BLOCK_SIZE", str_replace("#BLOCK_SIZE#", self::$bMbstring ? mb_strlen($v_binary_data, "latin1") : strlen($v_binary_data), GetMessage("MAIN_ARCHIVE_INV_BLOCK_SIZE"))); return false; } $v_checksum = 0; for ($i = 0; $i < 148; $i++) $v_checksum+=ord((self::$bMbstring ? mb_substr($v_binary_data, $i, 1, "latin1") : substr($v_binary_data, $i, 1))); for ($i = 148; $i < 156; $i++) $v_checksum += ord(' '); for ($i = 156; $i < 512; $i++) $v_checksum+=ord((self::$bMbstring ? mb_substr($v_binary_data, $i, 1, "latin1") : substr($v_binary_data, $i, 1))); //changed $v_data = unpack("a100filename/a8mode/a8uid/a8gid/a12size/a12mtime/a8checksum/a1typeflag/a100link/a6magic/a2version/a32uname/a32gname/a8devmajor/a8devminor/a131prefix", $v_binary_data); $v_header['checksum'] = octdec(trim($v_data['checksum'])); if ($v_header['checksum'] != $v_checksum) { $v_header['filename'] = ''; if (($v_checksum == 256) && ($v_header['checksum'] == 0)) return true; $this->_arErrors[] = array("INV_BLOCK_CHECK", GetMessage("MAIN_ARCHIVE_INV_BLOCK_CHECK1")); return false; } // ----- Extract the properties $v_header['filename'] = trim($v_data['prefix']."/".$v_data['filename']); $v_header['mode'] = octdec(trim($v_data['mode'])); $v_header['uid'] = octdec(trim($v_data['uid'])); $v_header['gid'] = octdec(trim($v_data['gid'])); $v_header['size'] = octdec(trim($v_data['size'])); $v_header['mtime'] = octdec(trim($v_data['mtime'])); if (($v_header['typeflag'] = $v_data['typeflag']) == "5") $v_header['size'] = 0; $v_header['filename'] = \Bitrix\Main\IO\Path::normalize($v_header['filename']); return true; } private function _readLongHeader(&$v_header) { $v_filename = ''; $n = floor($v_header['size']/512); for ($i = 0; $i < $n; $i++) { $v_content = $this->_readBlock(); $v_filename .= $v_content; } if (($tail = $v_header['size'] % 512) != 0) { $v_content = $this->_readBlock(); $v_filename .= trim($v_content); } $v_binary_data = $this->_readBlock(); if (!$this->_readHeader($v_binary_data, $v_header)) return false; $v_header['filename'] = $v_filename; return true; } private function _jumpBlock($p_len = false) { if (is_resource($this->_dFile)) { if ($p_len === false) $p_len = 1; if ($this->_bCompress) @gzseek($this->_dFile, @gztell($this->_dFile)+($p_len512)); else @fseek($this->_dFile, @ftell($this->_dFile)+($p_len*512)); } return true; } private function &_parseFileParams(&$vFileList) { if (isset($vFileList) && is_array($vFileList)) return $vFileList; if (isset($vFileList) && strlen($vFileList)>0) { if(strpos($vFileList, "\"")===0) return Array(Trim($vFileList, "\"")); return explode($this->_strSeparator, $vFileList); } return array(); } private function _openWrite() { $this->_checkDirPath($this->_strArchiveName); if ($this->_bCompress) $this->_dFile = @gzopen($this->io->GetPhysicalName($this->_strArchiveName), "wb9f"); else $this->_dFile = @fopen($this->io->GetPhysicalName($this->_strArchiveName), "wb"); if (!($this->_dFile)) { $this->_arErrors[] = array("ERR_OPEN_WRITE", str_replace("#FILE_NAME#", removeDocRoot($this->_strArchiveName), GetMessage("MAIN_ARCHIVE_ERR_OPEN_WRITE"))); return false; } return true; } private function _openAppendFast() { $this->_checkDirPath($this->_strArchiveName); if ($this->_bCompress) $this->_dFile = @gzopen($this->io->GetPhysicalName($this->_strArchiveName), "ab9f"); else $this->_dFile = @fopen($this->io->GetPhysicalName($this->_strArchiveName), "ab"); if (!($this->_dFile)) { $this->_arErrors[] = array("ERR_OPEN_WRITE",str_replace("#FILE_NAME#", removeDocRoot($this->_strArchiveName), GetMessage("MAIN_ARCHIVE_ERR_OPEN_WRITE"))); return false; } return true; } private function _openAppend() { if (filesize($this->io->GetPhysicalName($this->_strArchiveName)) == 0) return $this->_openWrite(); $this->_checkDirPath($this->_strArchiveName); if ($this->_bCompress) { $this->_close(); if (!@rename($this->io->GetPhysicalName($this->_strArchiveName), $this->io->GetPhysicalName($this->_strArchiveName.".tmp"))) { $this->_arErrors[] = array("ERR_RENAME", str_replace(array("#FILE_NAME#","#FILE_NAME2#"), array(removeDocRoot($this->_strArchiveName), removeDocRoot($this->_strArchiveName.".tmp")), GetMessage("MAIN_ARCHIVE_ERR_RENAME"))); return false; } $dTarArch_tmp = @gzopen($this->io->GetPhysicalName($this->_strArchiveName.".tmp"), "rb"); if (!$dTarArch_tmp) { $this->_arErrors[] = array("ERR_OPEN", str_replace("#FILE_NAME#", removeDocRoot($this->_strArchiveName.".tmp"), GetMessage("MAIN_ARCHIVE_ERR_OPEN"))); @rename($this->io->GetPhysicalName($this->_strArchiveName.".tmp"), $this->io->GetPhysicalName($this->_strArchiveName)); return false; } if (!$this->_openWrite()) { @rename($this->io->GetPhysicalName($this->_strArchiveName.".tmp"), $this->io->GetPhysicalName($this->_strArchiveName)); return false; } $v_buffer = @gzread($dTarArch_tmp, 512); if (!@gzeof($dTarArch_tmp)) { do { $v_binary_data = pack("a512", $v_buffer); $this->_writeBlock($v_binary_data); $v_buffer = @gzread($dTarArch_tmp, 512); } while (!@gzeof($dTarArch_tmp)); } @gzclose($dTarArch_tmp); @unlink($this->io->GetPhysicalName($this->_strArchiveName.".tmp")); } else { if (!$this->_openReadWrite()) return false; clearstatcache(); $iSize = filesize($this->io->GetPhysicalName($this->_strArchiveName)); fseek($this->_dFile, $iSize-512); } return true; } private function _openReadWrite() { if ($this->_bCompress) $this->_dFile = @gzopen($this->io->GetPhysicalName($this->_strArchiveName), "r+b"); else $this->_dFile = @fopen($this->io->GetPhysicalName($this->_strArchiveName), "r+b"); if (!$this->_dFile) return false; return true; } private function _openRead() { if ($this->_bCompress) $this->_dFile = @gzopen($this->io->GetPhysicalName($this->_strArchiveName), "rb"); else $this->_dFile = @fopen($this->io->GetPhysicalName($this->_strArchiveName), "rb"); if (!$this->_dFile) { $this->_arErrors[] = array("ERR_OPEN", str_replace("#FILE_NAME#", removeDocRoot($this->_strArchiveName), GetMessage("MAIN_ARCHIVE_ERR_OPEN"))); return false; } return true; } private function _writeBlock($v_binary_data, $iLen = false) { if (is_resource($this->_dFile)) { if ($iLen === false) { if ($this->_bCompress) @gzputs($this->_dFile, $v_binary_data); else @fputs($this->_dFile, $v_binary_data); } else { if ($this->_bCompress) @gzputs($this->_dFile, $v_binary_data, $iLen); else @fputs($this->_dFile, $v_binary_data, $iLen); } } return true; } private function _writeFooter() { if (is_resource($this->_dFile)) { $v_binary_data = pack("a512", ''); $this->_writeBlock($v_binary_data); } return true; } private function _cleanFile() { $this->_close(); @unlink($this->io->GetPhysicalName($this->_strArchiveName)); return true; } private function _close() { if (is_resource($this->_dFile)) { if ($this->_bCompress) @gzclose($this->_dFile); else @fclose($this->_dFile); $this->_dFile = 0; } return true; } private function _normalizePath($strPath) { $strResult = ""; if($strPath <> '') { $strPath = str_replace("\\", "/", $strPath); while(strpos($strPath, ".../") !== false) $strPath = str_replace(".../", "../", $strPath); $arPath = explode('/', $strPath); $nPath = count($arPath); for ($i = $nPath-1; $i >= 0; $i--) { if ($arPath[$i] == ".") ; elseif ($arPath[$i] == "..") $i--; elseif (($arPath[$i] == '') && ($i != ($nPath-1)) && ($i != 0)) ; else $strResult = $arPath[$i].($i != ($nPath-1)? '/'.$strResult : ''); } } return $strResult; } private function _checkDirPath($path, $bPermission=true) { $path = str_replace(array("\\", "//"), "/", $path); //remove file name if(substr($path, -1) != "/") { $p = strrpos($path, "/"); $path = substr($path, 0, $p); } $path = rtrim($path, "/"); if(!file_exists($this->io->GetPhysicalName($path))) return mkdir($this->io->GetPhysicalName($path), BX_DIR_PERMISSIONS, true); else return is_dir($this->io->GetPhysicalName($path)); } private function _dirCheck($p_dir) { if ((@is_dir($p_dir)) \|\| ($p_dir == '')) return true; $p_parent_dir = dirname($p_dir); if (($p_parent_dir != $p_dir) && ($p_parent_dir != '') && (!$this->_dirCheck($p_parent_dir))) return false; if (!@mkdir($p_dir, BX_DIR_PERMISSIONS)) { $this->_arErrors[] = array("CANT_CREATE_PATH", str_replace("#DIR_NAME#", $p_dir, GetMessage("MAIN_ARCHIVE_CANT_CREATE_PATH")));; return false; } return true; } }

| ver. 1.4 | Github | . | PHP 7.4.8 | Генерация страницы: 0 | proxy | phpinfo | Настройка