Your IP : 172.28.240.42
<?
IncludeModuleLangFile(__FILE__);
class CCloudStorage
{
const FILE_SKIPPED = 0;
const FILE_MOVED = 1;
const FILE_PARTLY_UPLOADED = 2;
const FILE_UPLOAD_ERROR = 3;
public static $part_size = 0;
public static $part_count = 0;
private static $_services = /*.(array[string]CCloudStorageService).*/null;
/**
* @return void
*/
function _init()
{
if(!isset(self::$_services))
{
$obService = /*.(CCloudStorageService).*/null;
self::$_services = /*.(array[string]CCloudStorageService).*/array();
foreach(GetModuleEvents("clouds", "OnGetStorageService", true) as $arEvent)
{
$obService = ExecuteModuleEventEx($arEvent);
if(is_object($obService))
self::$_services[$obService->GetID()] = $obService;
}
}
}
/**
* @param string $ID
* @return CCloudStorageService
*/
function GetServiceByID($ID)
{
self::_init();
if(array_key_exists($ID, self::$_services))
return self::$_services[$ID];
else
return null;
}
/**
* @return array[string]CCloudStorageService
*/
public static function GetServiceList()
{
self::_init();
return self::$_services;
}
/**
* @param string $ID
* @return array[string]string
*/
function GetServiceLocationList($ID)
{
$obService = CCloudStorage::GetServiceByID($ID);
if(is_object($obService))
return $obService->GetLocationList();
else
return /*.(array[string]string).*/array();
}
/**
* @param string $ID
* @return string
*/
function GetServiceDescription($ID)
{
$obService = CCloudStorage::GetServiceByID($ID);
if(is_object($obService))
return $obService->GetName();
else
return "";
}
/**
* @param array[string]string $arFile
* @param string $strFileName
* @return CCloudStorageBucket
*/
function FindBucketForFile($arFile, $strFileName)
{
if(array_key_exists("size", $arFile))
$file_size = intval($arFile["size"]);
else
$file_size = intval($arFile["FILE_SIZE"]);
foreach(CCloudStorageBucket::GetAllBuckets() as $bucket)
{
if($bucket["ACTIVE"] === "Y" && $bucket["READ_ONLY"] !== "Y")
{
foreach($bucket["FILE_RULES_COMPILED"] as $rule)
{
if($rule["MODULE_MASK"] != "")
{
$bMatchModule = (preg_match($rule["MODULE_MASK"], $arFile["MODULE_ID"]) > 0);
}
else
{
$bMatchModule = true;
}
if($rule["EXTENTION_MASK"] != "")
{
$bMatchExtention =
(preg_match($rule["EXTENTION_MASK"], $strFileName) > 0)
|| (preg_match($rule["EXTENTION_MASK"], $arFile["ORIGINAL_NAME"]) > 0)
;
}
else
{
$bMatchExtention = true;
}
if($rule["SIZE_ARRAY"])
{
$bMatchSize = false;
foreach($rule["SIZE_ARRAY"] as $size)
{
if(
($file_size >= $size[0])
&& ($size[1] === 0.0 || $file_size <= $size[1])
)
$bMatchSize = true;
}
}
else
{
$bMatchSize = true;
}
if($bMatchModule && $bMatchExtention && $bMatchSize)
{
return new CCloudStorageBucket(intval($bucket["ID"]));
}
}
}
}
return null;
}
/**
* @param array[string]string $arFile
* @param array[string]string $arResizeParams
* @param array[string]mixed $callbackData
* @param bool $bNeedResize
* @param array[string]string $sourceImageFile
* @param array[string]string $cacheImageFileTmp
* @return bool
*/
function OnBeforeResizeImage($arFile, $arResizeParams, &$callbackData, &$bNeedResize, &$sourceImageFile, &$cacheImageFileTmp)
{
$callbackData = null;
if(intval($arFile["HANDLER_ID"]) <= 0)
return false;
$obSourceBucket = new CCloudStorageBucket(intval($arFile["HANDLER_ID"]));
if(!$obSourceBucket->Init())
return false;
$callbackData = /*.(array[string]mixed).*/array();
$callbackData["obSourceBucket"] = $obSourceBucket;
//Assume target bucket same as source
$callbackData["obTargetBucket"] = $obTargetBucket = $obSourceBucket;
//if original file bucket is read only
if($obSourceBucket->READ_ONLY === "Y") //Try to find bucket with write rights
{
$bucket = CCloudStorage::FindBucketForFile($arFile, $arFile["FILE_NAME"]);
if(!is_object($bucket))
return false;
if($bucket->Init())
{
$callbackData["obTargetBucket"] = $obTargetBucket = $bucket;
}
}
if (defined("BX_MOBILE") && constant("BX_MOBILE") === true)
$bImmediate = true;
else
$bImmediate = $arResizeParams[5];
$callbackData["cacheID"] = $arFile["ID"]."/".md5(serialize($arResizeParams));
$callbackData["cacheOBJ"] = new CPHPCache;
$callbackData["fileDIR"] = "/"."resize_cache/".$callbackData["cacheID"]."/".$arFile["SUBDIR"];
$callbackData["fileNAME"] = $arFile["FILE_NAME"];
$callbackData["fileURL"] = $callbackData["fileDIR"]."/".$callbackData["fileNAME"];
$result = true;
if($callbackData["cacheOBJ"]->StartDataCache(CACHED_clouds_file_resize, $callbackData["cacheID"], "clouds"))
{
$cacheImageFile = $callbackData["obTargetBucket"]->GetFileSRC($callbackData["fileURL"]);
$arDestinationSize = array();
//Check if it is cache file was deleted, but there was a successful resize
if (
!$bImmediate
&& COption::GetOptionString("clouds", "delayed_resize") === "Y"
&& is_array($delayInfo = CCloudStorage::ResizeImageFileGet($cacheImageFile))
&& $delayInfo["ERROR_CODE"] < 10
)
{
$callbackData["cacheSTARTED"] = true;
if ($arFile["FILE_SIZE"] > 1)
$callbackData["fileSize"] = $arFile["FILE_SIZE"];
$bNeedResize = false;
$result = true;
}
//Check if it is cache file was deleted, but not the file in the cloud
elseif($fs = $obTargetBucket->FileExists($callbackData["fileURL"]))
{
//If file was resized before the fact was registered
if (
!$bImmediate
&& COption::GetOptionString("clouds", "delayed_resize") === "Y"
)
{
CCloudStorage::ResizeImageFileAdd(
$arDestinationSize,
$arFile,
$cacheImageFile,
$arResizeParams
);
}
$callbackData["cacheSTARTED"] = true;
if ($fs > 1)
$callbackData["fileSize"] = $fs;
$bNeedResize = false;
$result = true;
}
else
{
$callbackData["tmpFile"] = CFile::GetTempName('', $arFile["FILE_NAME"]);
$callbackData["tmpFile"] = preg_replace("#[\\\\\\/]+#", "/", $callbackData["tmpFile"]);
if (
!$bImmediate
&& COption::GetOptionString("clouds", "delayed_resize") === "Y"
&& CCloudStorage::ResizeImageFileDelay(
$arDestinationSize,
$arFile,
$cacheImageFile,
$arResizeParams
)
)
{
$callbackData["cacheSTARTED"] = false;
$bNeedResize = false;
$callbackData["cacheOBJ"]->AbortDataCache();
$callbackData["cacheVARS"] = array(
"cacheImageFile" => $cacheImageFile,
"width" => $arDestinationSize["width"],
"height" => $arDestinationSize["height"],
);
$result = true;
}
elseif($obSourceBucket->DownloadToFile($arFile, $callbackData["tmpFile"]))
{
$callbackData["cacheSTARTED"] = true;
$bNeedResize = true;
$sourceImageFile = $callbackData["tmpFile"];
$cacheImageFileTmp = CFile::GetTempName('', $arFile["FILE_NAME"]);
$result = true;
}
else
{
$callbackData["cacheSTARTED"] = false;
$bNeedResize = false;
$callbackData["cacheOBJ"]->AbortDataCache();
$result = false;
}
}
}
else
{
$callbackData["cacheSTARTED"] = false;
$callbackData["cacheVARS"] = $callbackData["cacheOBJ"]->GetVars();
$bNeedResize = false;
$result = true;
}
return $result;
}
function OnAfterResizeImage($arFile, $arResizeParams, &$callbackData, &$cacheImageFile, &$cacheImageFileTmp, &$arImageSize)
{
global $arCloudImageSizeCache;
$io = CBXVirtualIo::GetInstance();
if(!is_array($callbackData))
return false;
if($callbackData["cacheSTARTED"])
{
/** @var CCloudStorageBucket $obTargetBucket */
$obTargetBucket = $callbackData["obTargetBucket"];
/** @var CPHPCache $cacheOBJ */
$cacheOBJ = $callbackData["cacheOBJ"];
if(isset($callbackData["tmpFile"])) //have to upload to the cloud
{
$arFileToStore = CFile::MakeFileArray($io->GetPhysicalName($cacheImageFileTmp));
if (!preg_match("/^image\\//", $arFileToStore["type"]))
$arFileToStore["type"] = $arFile["CONTENT_TYPE"];
if($obTargetBucket->SaveFile($callbackData["fileURL"], $arFileToStore))
{
$cacheImageFile = $obTargetBucket->GetFileSRC($callbackData["fileURL"]);
$arImageSize = CFile::GetImageSize($cacheImageFileTmp);
$arImageSize[2] = filesize($io->GetPhysicalName($cacheImageFileTmp));
$iFileSize = filesize($arFileToStore["tmp_name"]);
if(!is_array($arImageSize))
$arImageSize = array(0, 0);
$cacheOBJ->EndDataCache(array(
"cacheImageFile"=>$cacheImageFile,
"width"=>$arImageSize[0],
"height"=>$arImageSize[1],
"size"=>$arImageSize[2],
));
$tmpFile = $io->GetPhysicalName($callbackData["tmpFile"]);
unlink($tmpFile);
@rmdir(substr($tmpFile, 0, -strlen(bx_basename($tmpFile))));
$arCloudImageSizeCache[$cacheImageFile] = $arImageSize;
$obTargetBucket->IncFileCounter($iFileSize);
return true;
}
else
{
$cacheOBJ->AbortDataCache();
$tmpFile = $io->GetPhysicalName($callbackData["tmpFile"]);
unlink($tmpFile);
@rmdir(substr($tmpFile, 0, -strlen(bx_basename($tmpFile))));
unlink($cacheImageFileTmp);
@rmdir(substr($cacheImageFileTmp, 0, -strlen(bx_basename($cacheImageFileTmp))));
// $cacheImageFile not clear what to do
return false;
}
}
else //the file is already in the cloud
{
$bNeedCreatePicture = false;
$arSourceSize = array("x" => 0, "y" => 0, "width" => 0, "height" => 0);
$arDestinationSize = array("x" => 0, "y" => 0, "width" => 0, "height" => 0);
CFile::ScaleImage($arFile["WIDTH"], $arFile["HEIGHT"], $arResizeParams[0], $arResizeParams[1], $bNeedCreatePicture, $arSourceSize, $arDestinationSize);
$cacheImageFile = $obTargetBucket->GetFileSRC($callbackData["fileURL"]);
$arImageSize = array(
$arDestinationSize["width"],
$arDestinationSize["height"],
isset($callbackData["fileSize"])? $callbackData["fileSize"]: $obTargetBucket->GetFileSize($callbackData["fileURL"]),
);
$cacheOBJ->EndDataCache(array(
"cacheImageFile"=>$cacheImageFile,
"width"=>$arImageSize[0],
"height"=>$arImageSize[1],
"size"=>$arImageSize[2],
));
$arCloudImageSizeCache[$cacheImageFile] = $arImageSize;
return true;
}
}
elseif(is_array($callbackData["cacheVARS"]))
{
$cacheImageFile = $callbackData["cacheVARS"]["cacheImageFile"];
$arImageSize = array(
$callbackData["cacheVARS"]["width"],
$callbackData["cacheVARS"]["height"],
$callbackData["cacheVARS"]["size"],
);
$arCloudImageSizeCache[$cacheImageFile] = $arImageSize;
return true;
}
return false;
}
function ResizeImageFileGet($destinationFile)
{
global $DB;
$destinationFile = preg_replace("/^https?:/i", "", $destinationFile);
$q = $DB->Query("
select
ID
,ERROR_CODE
,FILE_ID
,".$DB->DateToCharFunction("TIMESTAMP_X", "FULL")." TIMESTAMP_X
from b_clouds_file_resize
where TO_PATH = '".$DB->ForSql($destinationFile)."'
");
$a = $q->Fetch();
return $a;
}
function ResizeImageFileAdd(&$arDestinationSize, $sourceFile, $destinationFile, $arResizeParams)
{
global $DB;
$destinationFile = preg_replace("/^https?:/i", "", $destinationFile);
$q = $DB->Query("
select
ID
,ERROR_CODE
,PARAMS
,".$DB->DateToCharFunction("TIMESTAMP_X", "FULL")." TIMESTAMP_X
from b_clouds_file_resize
where TO_PATH = '".$DB->ForSql($destinationFile)."'
");
$a = $q->Fetch();
if ($a && $a["ERROR_CODE"] >= 10 && $a["ERROR_CODE"] < 20)
{
$DB->Query("DELETE from b_clouds_file_resize WHERE ID = ".$a["ID"]);
$a = false;
}
if (!$a)
{
$arResizeParams["type"] = $sourceFile["CONTENT_TYPE"];
$DB->Add("b_clouds_file_resize", array(
"~TIMESTAMP_X" => $DB->CurrentTimeFunction(),
"ERROR_CODE" => "0",
"PARAMS" => serialize($arResizeParams),
"FROM_PATH" => $sourceFile["SRC"],
"TO_PATH" => $destinationFile,
"FILE_ID" => $sourceFile["ID"],
));
}
}
function ResizeImageFileDelay(&$arDestinationSize, $sourceFile, $destinationFile, $arResizeParams)
{
global $DB;
$destinationFile = preg_replace("/^https?:/i", "", $destinationFile);
$q = $DB->Query("
select
ID
,ERROR_CODE
,PARAMS
,".$DB->DateToCharFunction("TIMESTAMP_X", "FULL")." TIMESTAMP_X
from b_clouds_file_resize
where TO_PATH = '".$DB->ForSql($destinationFile)."'
");
if ($resize = $q->Fetch())
{
if ($resize["ERROR_CODE"] < 10)
{
$arResizeParams = unserialize($resize["PARAMS"]);
$id = $resize["ID"];
} //Give it a try
elseif (
$resize["ERROR_CODE"] >= 10
&& $resize["ERROR_CODE"] < 20
&& (MakeTimeStamp($resize["TIMESTAMP_X"]) + 300/*5min*/) < (time() + CTimeZone::GetOffset())
)
{
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE='1'
WHERE ID=".$resize["ID"]."
");
$arResizeParams = unserialize($resize["PARAMS"]);
$id = $resize["ID"];
}
else
{
return false;
}
}
else
{
$id = 0;
}
$sourceImageWidth = $sourceFile["WIDTH"];
$sourceImageHeight = $sourceFile["HEIGHT"];
$arSize = $arResizeParams[0];
$resizeType = $arResizeParams[1];
$arWaterMark = $arResizeParams[2];
$jpgQuality = $arResizeParams[3];
$arFilters = $arResizeParams[4];
$bNeedCreatePicture = false;
$arSourceSize = array("x" => 0, "y" => 0, "width" => 0, "height" => 0);
$arDestinationSize = array("x" => 0, "y" => 0, "width" => 0, "height" => 0);
CFile::ScaleImage(
$sourceImageWidth,
$sourceImageHeight,
$arSize,
$resizeType,
$bNeedCreatePicture,
$arSourceSize,
$arDestinationSize
);
$bNeedCreatePicture |= is_array($arWaterMark) && !empty($arWaterMark);
$bNeedCreatePicture |= is_array($arFilters) && !empty($arFilters);
if ($bNeedCreatePicture)
{
if ($id <= 0)
{
$arResizeParams["type"] = $sourceFile["CONTENT_TYPE"];
$id = $DB->Add("b_clouds_file_resize", array(
"~TIMESTAMP_X" => $DB->CurrentTimeFunction(),
"ERROR_CODE" => "2",
"PARAMS" => serialize($arResizeParams),
"FROM_PATH" => $sourceFile["SRC"],
"TO_PATH" => $destinationFile,
"FILE_ID" => $sourceFile["ID"],
));
}
return $id > 0;
}
else
{
return false;
}
}
/**
* @param CCloudStorageBucket $obBucket
* @param string $path
* @return bool
*/
function ResizeImageFileCheck($obBucket, $path)
{
global $DB;
$path = preg_replace("/^https?:/i", "", $path);
$q = $DB->Query("
select
ID
,ERROR_CODE
,TO_PATH
,FROM_PATH
,PARAMS
,".$DB->DateToCharFunction("TIMESTAMP_X", "FULL")." TIMESTAMP_X
from b_clouds_file_resize
where TO_PATH = '".$DB->ForSql($path)."'
");
$task = $q->Fetch();
if (!$task)
return false;
//File in the Sky with Diamonds
if ($task["ERROR_CODE"] == 9)
{
return true;
}
//Fatal error
if ($task["ERROR_CODE"] >= 20)
{
return false;
}
//Recoverable error
if ($task["ERROR_CODE"] >= 10 && $task["ERROR_CODE"] < 20)
{
if ((MakeTimeStamp($task["TIMESTAMP_X"]) + 300/*5min*/) > (time() + CTimeZone::GetOffset()))
return false;
}
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '11'
WHERE ID = ".$task["ID"]."
");
$tmpFile = CFile::MakeFileArray($task["FROM_PATH"]);
if (!is_array($tmpFile) || !file_exists($tmpFile["tmp_name"]))
{
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '22'
WHERE ID = ".$task["ID"]."
");
return false;
}
$arResizeParams = unserialize($task["PARAMS"]);
if (!is_array($arResizeParams))
{
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '23'
WHERE ID = ".$task["ID"]."
");
return false;
}
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '14'
WHERE ID = ".$task["ID"]."
");
$arSize = $arResizeParams[0];
$resizeType = $arResizeParams[1];
$arWaterMark = $arResizeParams[2];
$jpgQuality = $arResizeParams[3];
$arFilters = $arResizeParams[4];
$to_path = CFile::GetTempName('', bx_basename($task["TO_PATH"]));
if (!CFile::ResizeImageFile($tmpFile["tmp_name"], $to_path, $arSize, $resizeType, $arWaterMark, $jpgQuality, $arFilters))
{
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '25'
WHERE ID = ".$task["ID"]."
");
return false;
}
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '16'
WHERE ID = ".$task["ID"]."
");
$fileToStore = CFile::MakeFileArray($to_path);
if ($arResizeParams["type"] && !preg_match("/^image\\//", $fileToStore["type"]))
$fileToStore["type"] = $arResizeParams["type"];
$baseURL = preg_replace("/^https?:/i", "", $obBucket->GetFileSRC("/"));
$pathToStore = substr($task["TO_PATH"], strlen($baseURL)-1);
if (!$obBucket->SaveFile(urldecode($pathToStore), $fileToStore))
{
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '27'
WHERE ID = ".$task["ID"]."
");
return false;
}
$DB->Query("
UPDATE b_clouds_file_resize
SET ERROR_CODE = '9'
WHERE ID = ".$task["ID"]."
");
return true;
}
function OnMakeFileArray($arSourceFile, &$arDestination)
{
if(!is_array($arSourceFile))
{
$file = $arSourceFile;
if(substr($file, 0, strlen($_SERVER["DOCUMENT_ROOT"])) == $_SERVER["DOCUMENT_ROOT"])
$file = ltrim(substr($file, strlen($_SERVER["DOCUMENT_ROOT"])), "/");
if(!preg_match("/^http:\\/\\//", $file))
return false;
$bucket = CCloudStorage::FindBucketByFile($file);
if(!is_object($bucket))
return false;
$filePath = substr($file, strlen($bucket->GetFileSRC("/"))-1);
$filePath = urldecode($filePath);
$target = CFile::GetTempName('', bx_basename($filePath));
$target = preg_replace("#[\\\\\\/]+#", "/", $target);
if($bucket->DownloadToFile($filePath, $target))
{
$arDestination = $target;
}
return true;
}
else
{
if($arSourceFile["HANDLER_ID"] <= 0)
return false;
$bucket = new CCloudStorageBucket($arSourceFile["HANDLER_ID"]);
if(!$bucket->Init())
return false;
$target = CFile::GetTempName('', $arSourceFile["FILE_NAME"]);
$target = preg_replace("#[\\\\\\/]+#", "/", $target);
if($bucket->DownloadToFile($arSourceFile, $target))
{
$arDestination["name"] = (strlen($arSourceFile['ORIGINAL_NAME'])>0? $arSourceFile['ORIGINAL_NAME']: $arSourceFile['FILE_NAME']);
$arDestination["size"] = $arSourceFile['FILE_SIZE'];
$arDestination["type"] = $arSourceFile['CONTENT_TYPE'];
$arDestination["description"] = $arSourceFile['DESCRIPTION'];
$arDestination["tmp_name"] = $target;
}
return true;
}
}
function OnFileDelete($arFile)
{
global $DB;
if($arFile["HANDLER_ID"] <= 0)
return false;
$bucket = new CCloudStorageBucket($arFile["HANDLER_ID"]);
if((!$bucket->Init()) || ($bucket->READ_ONLY === "Y"))
return false;
$result = $bucket->DeleteFile("/".$arFile["SUBDIR"]."/".$arFile["FILE_NAME"]);
if($result)
$bucket->DecFileCounter($arFile["FILE_SIZE"]);
$path = '/resize_cache/'.$arFile["ID"]."/";
$arCloudFiles = $bucket->ListFiles($path, true);
if(is_array($arCloudFiles["file"]))
{
foreach($arCloudFiles["file"] as $i => $file_name)
{
$tmp = $bucket->DeleteFile($path.$file_name);
if($tmp)
$bucket->DecFileCounter($arCloudFiles["file_size"][$i]);
}
}
$DB->Query("
DELETE FROM b_clouds_file_resize
WHERE FILE_ID = ".intval($arFile["ID"])."
", true);
return $result;
}
function DeleteDirFilesEx($path)
{
$path = rtrim($path, "/")."/";
foreach(CCloudStorageBucket::GetAllBuckets() as $bucket)
{
$obBucket = new CCloudStorageBucket($bucket["ID"]);
if($obBucket->Init())
{
$arCloudFiles = $obBucket->ListFiles($path, true);
if(is_array($arCloudFiles["file"]))
{
foreach($arCloudFiles["file"] as $i => $file_name)
{
$tmp = $obBucket->DeleteFile($path.$file_name);
if($tmp)
$obBucket->DecFileCounter($arCloudFiles["file_size"][$i]);
}
}
}
}
}
function OnFileCopy(&$arFile, $newPath = "")
{
if($arFile["HANDLER_ID"] <= 0)
return false;
$bucket = new CCloudStorageBucket($arFile["HANDLER_ID"]);
if(!$bucket->Init())
return false;
if($bucket->READ_ONLY == "Y")
return false;
$filePath = "";
$newName = "";
if(strlen($newPath))
{
$filePath = "/".trim(str_replace("//", "/", $newPath), "/");
}
else
{
$strFileExt = strrchr($arFile["FILE_NAME"], ".");
while(true)
{
$newName = md5(uniqid(mt_rand(), true)).$strFileExt;
$filePath = "/".$arFile["SUBDIR"]."/".$newName;
if(!$bucket->FileExists($filePath))
break;
}
}
$result = $bucket->FileCopy($arFile, $filePath);
if($result)
{
$bucket->IncFileCounter($arFile["FILE_SIZE"]);
if(strlen($newPath))
{
$arFile["FILE_NAME"] = bx_basename($filePath);
$arFile["SUBDIR"] = substr($filePath, 1, -(strlen(bx_basename($filePath)) + 1));
}
else
{
$arFile["FILE_NAME"] = $newName;
}
}
return $result;
}
function OnGetFileSRC($arFile)
{
if($arFile["HANDLER_ID"] <= 0)
return false;
$bucket = new CCloudStorageBucket($arFile["HANDLER_ID"]);
if($bucket->Init())
return $bucket->GetFileSRC($arFile);
else
return false;
}
function MoveFile($arFile, $obTargetBucket)
{
$io = CBXVirtualIo::GetInstance();
//Try to find suitable bucket for the file
$bucket = CCloudStorage::FindBucketForFile($arFile, $arFile["FILE_NAME"]);
if(!is_object($bucket))
return CCloudStorage::FILE_SKIPPED;
if(!$bucket->Init())
return CCloudStorage::FILE_SKIPPED;
//Check if this is same bucket as the target
if($bucket->ID != $obTargetBucket->ID)
return CCloudStorage::FILE_SKIPPED;
if($bucket->FileExists($bucket->GetFileSRC($arFile))) //TODO rename file
return CCloudStorage::FILE_SKIPPED;
$filePath = "/".$arFile["SUBDIR"]."/".$arFile["FILE_NAME"];
$filePath = preg_replace("#[\\\\\\/]+#", "/", $filePath);
if($arFile["FILE_SIZE"] > $bucket->GetService()->GetMinUploadPartSize())
{
$obUpload = new CCloudStorageUpload($filePath);
if(!$obUpload->isStarted())
{
if($arFile["HANDLER_ID"])
{
$ar = array();
if(!CCloudStorage::OnMakeFileArray($arFile, $ar))
return CCloudStorage::FILE_SKIPPED;
if(!isset($ar["tmp_name"]))
return CCloudStorage::FILE_SKIPPED;
}
else
{
$ar = CFile::MakeFileArray($arFile["ID"]);
if(!isset($ar["tmp_name"]))
return CCloudStorage::FILE_SKIPPED;
}
$temp_file = CTempFile::GetDirectoryName(2, "clouds").bx_basename($arFile["FILE_NAME"]);
$temp_fileX = $io->GetPhysicalName($temp_file);
CheckDirPath($temp_fileX);
if (file_exists($ar["tmp_name"]))
{
$sourceFile = $ar["tmp_name"];
}
elseif (file_exists($io->GetPhysicalName($ar["tmp_name"])))
{
$sourceFile = $io->GetPhysicalName($ar["tmp_name"]);
}
else
{
return CCloudStorage::FILE_SKIPPED;
}
if(!copy($sourceFile, $temp_fileX))
return CCloudStorage::FILE_SKIPPED;
if($obUpload->Start($bucket->ID, $arFile["FILE_SIZE"], $arFile["CONTENT_TYPE"], $temp_file))
return CCloudStorage::FILE_PARTLY_UPLOADED;
else
return CCloudStorage::FILE_SKIPPED;
}
else
{
$temp_file = $obUpload->getTempFileName();
$temp_fileX = $io->GetPhysicalName($temp_file);
$fp = fopen($temp_fileX, "rb");
if(!is_resource($fp))
return CCloudStorage::FILE_SKIPPED;
$pos = $obUpload->getPos();
if($pos > filesize($temp_fileX))
{
if($obUpload->Finish())
{
$bucket->IncFileCounter(filesize($temp_fileX));
if($arFile["HANDLER_ID"])
CCloudStorage::OnFileDelete($arFile);
else
{
$ar = CFile::MakeFileArray($arFile["ID"]);
$fileNameX = $io->GetPhysicalName($ar["tmp_name"]);
unlink($fileNameX);
@rmdir(substr($fileNameX, 0, -strlen(bx_basename($fileNameX))));
}
return CCloudStorage::FILE_MOVED;
}
else
return CCloudStorage::FILE_SKIPPED;
}
fseek($fp, $pos);
self::$part_count = $obUpload->GetPartCount();
self::$part_size = $obUpload->getPartSize();
$part = fread($fp, self::$part_size);
while($obUpload->hasRetries())
{
if($obUpload->Next($part))
return CCloudStorage::FILE_PARTLY_UPLOADED;
}
return CCloudStorage::FILE_SKIPPED;
}
}
else
{
if($arFile["HANDLER_ID"])
{
$ar = array();
if(!CCloudStorage::OnMakeFileArray($arFile, $ar))
return CCloudStorage::FILE_SKIPPED;
if(!isset($ar["tmp_name"]))
return CCloudStorage::FILE_SKIPPED;
}
else
{
$ar = CFile::MakeFileArray($arFile["ID"]);
if(!isset($ar["tmp_name"]))
return CCloudStorage::FILE_SKIPPED;
}
$res = $bucket->SaveFile($filePath, $ar);
if($res)
{
$bucket->IncFileCounter(filesize($ar["tmp_name"]));
if(file_exists($ar["tmp_name"]))
{
unlink($ar["tmp_name"]);
@rmdir(substr($ar["tmp_name"], 0, -strlen(bx_basename($ar["tmp_name"]))));
}
if($arFile["HANDLER_ID"])
CCloudStorage::OnFileDelete($arFile);
}
else
{ //delete temporary copy
if($arFile["HANDLER_ID"])
{
unlink($ar["tmp_name"]);
@rmdir(substr($ar["tmp_name"], 0, -strlen(bx_basename($ar["tmp_name"]))));
}
}
return $res? CCloudStorage::FILE_MOVED: CCloudStorage::FILE_SKIPPED;
}
}
function OnFileSave(&$arFile, $strFileName, $strSavePath, $bForceMD5 = false, $bSkipExt = false)
{
if(!$arFile["tmp_name"] && !array_key_exists("content", $arFile))
return false;
if(array_key_exists("bucket", $arFile))
$bucket = $arFile["bucket"];
else
$bucket = CCloudStorage::FindBucketForFile($arFile, $strFileName);
if(!is_object($bucket))
return false;
if(!$bucket->Init())
return false;
$copySize = false;
$subDir = "";
$filePath = "";
if(array_key_exists("content", $arFile))
{
$arFile["tmp_name"] = CTempFile::GetFileName($arFile["name"]);
CheckDirPath($arFile["tmp_name"]);
$fp = fopen($arFile["tmp_name"], "ab");
if($fp)
{
fwrite($fp, $arFile["content"]);
fclose($fp);
}
}
if(array_key_exists("bucket", $arFile))
{
$newName = bx_basename($arFile["tmp_name"]);
$prefix = $bucket->GetFileSRC("/");
$subDir = substr($arFile["tmp_name"], strlen($prefix));
$subDir = substr($subDir, 0, -strlen($newName)-1);
}
else
{
if(
$bForceMD5 != true
&& COption::GetOptionString("main", "save_original_file_name", "N")=="Y"
)
{
if(COption::GetOptionString("main", "convert_original_file_name", "Y")=="Y")
$newName = CCloudStorage::translit($strFileName);
else
$newName = $strFileName;
}
else
{
$strFileExt = ($bSkipExt == true? '' : strrchr($strFileName, "."));
$newName = md5(uniqid(mt_rand(), true)).$strFileExt;
}
//check for double extension vulnerability
$newName = RemoveScriptExtension($newName);
while(true)
{
$strRand = md5(mt_rand());
$strRand = substr($strRand, 0, 3)."/".$strRand;
if(substr($strSavePath, -1) == "/")
$subDir = $strSavePath.$strRand;
else
$subDir = $strSavePath."/".$strRand;
$subDir = ltrim($subDir, "/");
$filePath = "/".$subDir."/".$newName;
if(!$bucket->FileExists($filePath))
break;
}
$targetPath = $bucket->GetFileSRC("/");
if (strpos($arFile["tmp_name"], $targetPath) === 0)
{
$arDbFile = array(
"SUBDIR" => "",
"FILE_NAME" => substr($arFile["tmp_name"], strlen($targetPath)),
"CONTENT_TYPE" => $arFile["type"],
);
$copyPath = $bucket->FileCopy($arDbFile, $filePath);
if (!$copyPath)
return false;
$copySize = $bucket->GetFileSize("/".urldecode(substr($copyPath, strlen($targetPath))));
}
else
{
$imgArray = CFile::GetImageSize($arFile["tmp_name"], true, false);
if(is_array($imgArray) && $imgArray[2] == IMAGETYPE_JPEG)
{
$exifData = CFile::ExtractImageExif($arFile["tmp_name"]);
if ($exifData && isset($exifData['Orientation']))
{
$properlyOriented = CFile::ImageHandleOrientation($exifData['Orientation'], $arFile["tmp_name"]);
if ($properlyOriented)
{
$jpgQuality = intval(COption::GetOptionString('main', 'image_resize_quality', '95'));
if($jpgQuality <= 0 || $jpgQuality > 100)
$jpgQuality = 95;
imagejpeg($properlyOriented, $arFile["tmp_name"], $jpgQuality);
}
}
}
if(!$bucket->SaveFile($filePath, $arFile))
return false;
}
}
$arFile["HANDLER_ID"] = $bucket->ID;
$arFile["SUBDIR"] = $subDir;
$arFile["FILE_NAME"] = $newName;
$arFile["WIDTH"] = 0;
$arFile["HEIGHT"] = 0;
if(array_key_exists("bucket", $arFile))
{
$arFile["WIDTH"] = $arFile["width"];
$arFile["HEIGHT"] = $arFile["height"];
$arFile["size"] = $arFile["file_size"];
}
elseif ($copySize !== false)
{
$arFile["size"] = $copySize;
$bucket->IncFileCounter($copySize);
}
else
{
$bucket->IncFileCounter(filesize($arFile["tmp_name"]));
$flashEnabled = !CFile::IsImage($arFile["ORIGINAL_NAME"], $arFile["type"]);
$imgArray = CFile::GetImageSize($arFile["tmp_name"], true, $flashEnabled);
if(is_array($imgArray))
{
$arFile["WIDTH"] = $imgArray[0];
$arFile["HEIGHT"] = $imgArray[1];
}
}
if(isset($arFile["old_file"]))
CFile::DoDelete($arFile["old_file"]);
return true;
}
function FindBucketByFile($file_name)
{
foreach(CCloudStorageBucket::GetAllBuckets() as $bucket)
{
if($bucket["ACTIVE"] == "Y")
{
$obBucket = new CCloudStorageBucket($bucket["ID"]);
if($obBucket->Init())
{
$prefix = $obBucket->GetFileSRC("/");
if(substr($file_name, 0, strlen($prefix)) === $prefix)
return $obBucket;
}
}
}
return false;
}
function FindFileURIByURN($urn, $log_descr="")
{
foreach(CCloudStorageBucket::GetAllBuckets() as $bucket)
{
if($bucket["ACTIVE"] == "Y")
{
$obBucket = new CCloudStorageBucket($bucket["ID"]);
if($obBucket->Init() && $obBucket->FileExists($urn))
{
$uri = $obBucket->GetFileSRC($urn);
if($log_descr && COption::GetOptionString("clouds", "log_404_errors") === "Y")
CEventLog::Log("WARNING", "CLOUDS_404", "clouds", $uri, $log_descr);
return $uri;
}
}
}
return "";
}
function OnBuildGlobalMenu(&$aGlobalMenu, &$aModuleMenu)
{
global $USER;
if(!$USER->CanDoOperation("clouds_browse"))
return;
//When UnRegisterModuleDependences is called from module uninstall
//cached EventHandlers may be called
if(defined("BX_CLOUDS_UNINSTALLED"))
return;
$aMenu = array(
"parent_menu" => "global_menu_content",
"section" => "clouds",
"sort" => 150,
"text" => GetMessage("CLO_STORAGE_MENU"),
"title" => GetMessage("CLO_STORAGE_TITLE"),
"icon" => "clouds_menu_icon",
"page_icon" => "clouds_page_icon",
"items_id" => "menu_clouds",
"items" => array()
);
$rsBuckets = CCloudStorageBucket::GetList(array("SORT"=>"DESC", "ID"=>"ASC"));
while($arBucket = $rsBuckets->Fetch())
$aMenu["items"][] = array(
"text" => $arBucket["BUCKET"],
"url" => "clouds_file_list.php?lang=".LANGUAGE_ID."&bucket=".$arBucket["ID"]."&path=/",
"more_url" => array(
"clouds_file_list.php?bucket=".$arBucket["ID"],
),
"title" => "",
"page_icon" => "clouds_page_icon",
"items_id" => "menu_clouds_bucket_".$arBucket["ID"],
"module_id" => "clouds",
"items" => array()
);
if(!empty($aMenu["items"]))
$aModuleMenu[] = $aMenu;
}
function OnAdminListDisplay(&$obList)
{
global $USER;
if($obList->table_id !== "tbl_fileman_admin")
return;
if(!is_object($USER) || !$USER->CanDoOperation("clouds_upload"))
return;
static $clouds = null;
if(!isset($clouds))
{
$clouds = array();
$rsClouds = CCloudStorageBucket::GetList(array("SORT"=>"DESC", "ID"=>"ASC"));
while($arStorage = $rsClouds->Fetch())
{
if($arStorage["READ_ONLY"] == "N" && $arStorage["ACTIVE"] == "Y")
$clouds[$arStorage["ID"]] = $arStorage["BUCKET"];
}
}
if(empty($clouds))
return;
foreach($obList->aRows as $obRow)
{
if($obRow->arRes["TYPE"] === "F")
{
$ID = "F".$obRow->arRes["NAME"];
$file = $obRow->arRes["NAME"];
$path = substr($obRow->arRes["ABS_PATH"], 0, -strlen($file));
$arSubMenu = array();
foreach($clouds as $id => $bucket)
$arSubMenu[] = array(
"TEXT" => $bucket,
"ACTION" => $s = "if(confirm('".GetMessage("CLO_STORAGE_UPLOAD_CONF")."')) jsUtils.Redirect([], '".CUtil::AddSlashes("/bitrix/admin/clouds_file_list.php?lang=".LANGUAGE_ID."&bucket=".urlencode($id)."&path=".urlencode($path)."&ID=".urlencode($ID)."&action=upload&".bitrix_sessid_get())."');"
);
$obRow->aActions[] = array(
"TEXT" => GetMessage("CLO_STORAGE_UPLOAD_MENU"),
"MENU" => $arSubMenu,
);
}
}
}
function HasActiveBuckets()
{
foreach(CCloudStorageBucket::GetAllBuckets() as $bucket)
if($bucket["ACTIVE"] === "Y")
return true;
return false;
}
function OnBeforeProlog()
{
if(defined("BX_CHECK_SHORT_URI") && BX_CHECK_SHORT_URI)
{
$upload_dir = "/".trim(COption::GetOptionString("main", "upload_dir", "upload"), "/")."/";
$request_uri = urldecode($_SERVER["REQUEST_URI"]);
$request_uri = CCloudUtil::URLEncode($request_uri, LANG_CHARSET);
foreach(CCloudStorageBucket::GetAllBuckets() as $arBucket)
{
if($arBucket["ACTIVE"] == "Y")
{
$obBucket = new CCloudStorageBucket($arBucket["ID"]);
if($obBucket->Init())
{
$match = array();
if(
COption::GetOptionString("clouds", "delayed_resize") === "Y"
&& preg_match("#^(/".$obBucket->PREFIX."|)(/resize_cache/.*\$)#", $request_uri, $match)
)
{
session_write_close();
$to_file = $obBucket->GetFileSRC(urldecode($match[2]));
if (CCloudStorage::ResizeImageFileCheck($obBucket, $to_file))
{
$cache_time = 3600*24*30; // 30 days
header("Cache-Control: max-age=".$cache_time);
header("Expires: ".gmdate("D, d M Y H:i:s", time()+$cache_time)." GMT");
header_remove("Pragma");
LocalRedirect($to_file, true, "301 Moved Permanently");
}
}
elseif($obBucket->FileExists($request_uri))
{
if(COption::GetOptionString("clouds", "log_404_errors") === "Y")
CEventLog::Log("WARNING", "CLOUDS_404", "clouds", $_SERVER["REQUEST_URI"], $_SERVER["HTTP_REFERER"]);
LocalRedirect($obBucket->GetFileSRC($request_uri), true);
}
elseif(strpos($request_uri, $upload_dir) === 0)
{
$check_url = substr($request_uri, strlen($upload_dir)-1);
if($obBucket->FileExists($check_url))
{
if(COption::GetOptionString("clouds", "log_404_errors") === "Y")
CEventLog::Log("WARNING", "CLOUDS_404", "clouds", $_SERVER["REQUEST_URI"], $_SERVER["HTTP_REFERER"]);
LocalRedirect($obBucket->GetFileSRC($check_url), true);
}
}
}
}
}
}
}
function GetAuditTypes()
{
return array(
"CLOUDS_404" => "[CLOUDS_404] ".GetMessage("CLO_404_ON_MOVED_FILE"),
);
}
function translit($file_name, $safe_chars = '')
{
return CUtil::translit($file_name, LANGUAGE_ID, array(
"safe_chars"=>". ".$safe_chars,
"change_case"=>false,
"max_len"=>255,
));
}
/**
* @param array[string]string $arFile
* @return void
*/
function FixFileContentType(&$arFile)
{
global $DB;
$fixedContentType = "";
if($arFile["CONTENT_TYPE"] === "image/jpg")
$fixedContentType = "image/jpeg";
else
{
$hexContentType = unpack("H*", $arFile["CONTENT_TYPE"]);
if(
$hexContentType[1] === "e0f3e4e8ee2f6d706567"
|| $hexContentType[1] === "d0b0d183d0b4d0b8d0be2f6d706567"
)
$fixedContentType = "audio/mpeg";
}
if($fixedContentType !== "")
{
$arFile["CONTENT_TYPE"] = $fixedContentType;
$DB->Query("
UPDATE b_file
SET CONTENT_TYPE = '".$DB->ForSQL($fixedContentType)."'
WHERE ID = ".intval($arFile["ID"])."
");
CFile::CleanCache($arFile["ID"]);
}
}
}
?>