403Webshell
Server IP : 80.87.202.40  /  Your IP : 216.73.216.169
Web Server : Apache
System : Linux rospirotorg.ru 5.14.0-539.el9.x86_64 #1 SMP PREEMPT_DYNAMIC Thu Dec 5 22:26:13 UTC 2024 x86_64
User : bitrix ( 600)
PHP Version : 8.2.27
Disable Function : NONE
MySQL : OFF |  cURL : ON |  WGET : ON |  Perl : ON |  Python : OFF |  Sudo : ON |  Pkexec : ON
Directory :  /home/bitrix/ext_www/rospirotorg.ru/bitrix/modules/main/tools/

Upload File :
current_dir [ Writeable] document_root [ Writeable]

 

Command :


[ Back ]     

Current File : /home/bitrix/ext_www/rospirotorg.ru/bitrix/modules/main/tools/backup.php
<?php

/**
 * @global CUser $USER
 * @global CMain $APPLICATION
 * @global CDatabase $DB
 */

if (ini_get('short_open_tag') == 0 && strtoupper(ini_get('short_open_tag')) != 'ON')
{
	die("Error: short_open_tag parameter must be turned on in php.ini\n");
}

error_reporting(E_ALL & ~E_NOTICE & ~E_DEPRECATED & ~E_WARNING);
define('START_TIME', microtime(1));
define('BX_FORCE_DISABLE_SEPARATED_SESSION_MODE', true);
define('CLI', defined('BX_CRONTAB') && BX_CRONTAB === true || !$_SERVER['DOCUMENT_ROOT']);

if (!defined('NOT_CHECK_PERMISSIONS'))
{
	define('NOT_CHECK_PERMISSIONS', true);
}

$NS = []; // NewState

if (CLI && defined('BX_CRONTAB')) // start from cron_events.php
{
	IncludeModuleLangFile($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/admin/dump.php');

	if (IntOption('dump_auto_enable') != 1)
	{
		return;
	}

	$l = COption::GetOptionInt('main', 'last_backup_start_time', 0);
	if (time() - $l < IntOption('dump_auto_interval') * 86400)
	{
		return;
	}

	$min_left = IntOption('dump_auto_time') - date('H') * 60 - date("i");
	if ($min_left > 0 || $min_left < -60)
	{
		return;
	}

	define('LOCK_FILE', $_SERVER['DOCUMENT_ROOT'] . '/bitrix/backup/auto_lock');

	if (!file_exists($_SERVER['DOCUMENT_ROOT'] . '/bitrix/backup'))
	{
		mkdir($_SERVER['DOCUMENT_ROOT'] . '/bitrix/backup');
	}

	if (file_exists(LOCK_FILE))
	{
		if (!($time = file_get_contents(LOCK_FILE)))
		{
			RaiseErrorAndDie('Can\'t read file: ' . LOCK_FILE, 1);
		}

		if ($time + 86400 > time())
		{
			return;
		}
		else
		{
			ShowBackupStatus('Warning! Last backup has failed');
			CEventLog::Add([
				"SEVERITY" => "WARNING",
				"AUDIT_TYPE_ID" => "BACKUP_ERROR",
				"MODULE_ID" => "main",
				"ITEM_ID" => LOCK_FILE,
				"DESCRIPTION" => GetMessage('AUTO_LOCK_EXISTS_ERR', ['#DATETIME#' => ConvertTimeStamp($time)]),
			]);

			foreach (GetModuleEvents("main", "OnAutoBackupUnknownError", true) as $arEvent)
			{
				ExecuteModuleEventEx($arEvent, [['TIME' => $time]]);
			}

			unlink(LOCK_FILE) || RaiseErrorAndDie('Can\'t delete file: ' . LOCK_FILE, 2);
		}
	}

	if (!file_put_contents(LOCK_FILE, time()))
	{
		RaiseErrorAndDie('Can\'t create file: ' . LOCK_FILE, 3);
	}

	COption::SetOptionInt('main', 'last_backup_start_time', time());
}
else
{
	define('NO_AGENT_CHECK', true);
	define("STATISTIC_SKIP_ACTIVITY_CHECK", true);
	if (!$_SERVER['DOCUMENT_ROOT'])
	{
		$DOCUMENT_ROOT = $_SERVER['DOCUMENT_ROOT'] = realpath(__DIR__ . '/../../../../');
	}
	require($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/prolog_before.php');
	IncludeModuleLangFile($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/admin/dump.php');
}
if (!defined('DOCUMENT_ROOT'))
{
	define('DOCUMENT_ROOT', rtrim(str_replace('\\', '/', $_SERVER['DOCUMENT_ROOT']), '/'));
}
require_once($_SERVER["DOCUMENT_ROOT"] . "/bitrix/modules/main/classes/general/backup.php");

$public = $USER?->IsAdmin();
if ($public) // backup from public
{
	$NS =& $_SESSION['BX_DUMP_STATE'];
	if (isset($_REQUEST['start']) && $_REQUEST['start'] == 'Y')
	{
		$NS = [];
	}
}
elseif (!CLI) // hit from bitrixcloud service
{
	if ((!$backup_secret_key = CPasswordStorage::Get('backup_secret_key')) || $backup_secret_key != $_REQUEST['secret_key'])
	{
		RaiseErrorAndDie('Secret key is incorrect', 10);
	}
	elseif (isset($_REQUEST['check_auth']) && $_REQUEST['check_auth'])
	{
		echo 'SUCCESS';
		exit(0);
	}
	if (IntOption('dump_auto_enable') != 2)
	{
		RaiseErrorAndDie('Backup is disabled', 4);
	}

	session_write_close();
	ini_set("session.use_strict_mode", "0");
	session_id(md5($backup_secret_key));
	session_start();
	$NS =& $_SESSION['BX_DUMP_STATE'];

	if ($NS['TIMESTAMP'] && ($i = IntOption('dump_max_exec_time_sleep')) > 0)
	{
		if (time() - $NS['TIMESTAMP'] < $i)
		{
			sleep(3);
			echo "NEXT\n" . GetProgressPercent($NS);
			exit(0);
		}
	}
}

if (!file_exists(DOCUMENT_ROOT . '/bitrix/backup'))
{
	mkdir(DOCUMENT_ROOT . '/bitrix/backup');
}

if (!file_exists(DOCUMENT_ROOT . "/bitrix/backup/index.php"))
{
	$f = fopen(DOCUMENT_ROOT . "/bitrix/backup/index.php", "w");
	fwrite($f, "<head><meta http-equiv=\"REFRESH\" content=\"0;URL=/bitrix/admin/index.php\"></head>");
	fclose($f);
}

while (ob_end_flush())
{
	;
}

@set_time_limit(0);

$bGzip = function_exists('gzcompress');
$bBitrixCloud = function_exists('openssl_encrypt') && CModule::IncludeModule('bitrixcloud') && CModule::IncludeModule('clouds');

if ($public)
{
	$arParams = [
		'dump_archive_size_limit' => 100 * 1024 * 1024,
		'dump_use_compression' => $bGzip,
		'dump_integrity_check' => 1,
		'dump_delete_old' => 0,
		'dump_site_id' => [],

		'dump_base' => 1,
		'dump_base_skip_stat' => 0,
		'dump_base_skip_search' => 0,
		'dump_base_skip_log' => 0,

		'dump_file_public' => 1,
		'dump_file_kernel' => 1,
		'dump_do_clouds' => 0,
		'skip_mask' => 0,
		'skip_mask_array' => [],
		'dump_max_file_size' => 0,
	];
}
else
{
	$arParams = [
		'dump_archive_size_limit' => IntOption('dump_archive_size_limit'),
		'dump_use_compression' => $bGzip && IntOption('dump_use_compression'),
		'dump_integrity_check' => IntOption('dump_integrity_check'),

		'dump_delete_old' => IntOption('dump_delete_old'),
		'dump_old_time' => IntOption('dump_old_time'),
		'dump_old_cnt' => IntOption('dump_old_cnt'),
		'dump_old_size' => IntOption('dump_old_size'),

		'dump_site_id' => is_array($ar = unserialize(COption::GetOptionString("main", "dump_site_id" . "_auto"), ['allowed_classes' => false])) ? $ar : [],
	];

	$arExpertBackupDefaultParams = [
		'dump_base' => IntOption('dump_base', 1),
		'dump_base_skip_stat' => IntOption('dump_base_skip_stat'),
		'dump_base_skip_search' => IntOption('dump_base_skip_search'),
		'dump_base_skip_log' => IntOption('dump_base_skip_log'),

		'dump_file_public' => IntOption('dump_file_public', 1),
		'dump_file_kernel' => IntOption('dump_file_kernel', 1),
		'dump_do_clouds' => IntOption('dump_do_clouds', 1),
		'skip_mask' => IntOption('skip_mask'),
		'skip_mask_array' => is_array($ar = unserialize(COption::GetOptionString("main", "skip_mask_array_auto"), ['allowed_classes' => false])) ? $ar : [],
		'dump_max_file_size' => IntOption('dump_max_file_size'),
	];

	$arParams = array_merge($arExpertBackupDefaultParams, $arParams);
}

$skip_mask_array = $arParams['skip_mask_array'];

if ($DB->type != 'MYSQL')
{
	$arParams['dump_base'] = 0;
}

if (!$NS['step'])
{
	$NS = ['step' => 1, 'step_cnt' => 0];
	$NS['START_TIME'] = START_TIME;
	if ($public)
	{
		$dump_bucket_id = 0;
	}
	else
	{
		$NS['dump_encrypt_key'] = CPasswordStorage::Get('dump_temporary_cache');
		$dump_bucket_id = IntOption('dump_bucket_id');
	}

	if ($dump_bucket_id == -1)
	{
		if (!$bBitrixCloud || !$NS['dump_encrypt_key'])
		{
			$dump_bucket_id = 0;
			ShowBackupStatus('BitrixCloud is not available');
		}
	}
	$NS['BUCKET_ID'] = $dump_bucket_id;

	if ($dump_bucket_id == -1)
	{
		$arc_name = DOCUMENT_ROOT . BX_ROOT . "/backup/" . date('Ymd_His_') . rand(11111111, 99999999);
	}
	elseif (($arc_name = $argv[1]) && !is_dir($arc_name))
	{
		$arc_name = str_replace(['.tar', '.gz', '.enc'], '', $arc_name);
	}
	else
	{
		$prefix = str_replace('/', '', COption::GetOptionString("main", "server_name", ""));
		$arc_name = CBackup::GetArcName(preg_match('#^[a-z0-9.\-]+$#i', $prefix) ? substr($prefix, 0, 20) . '_' : '');
	}

	$NS['arc_name'] = $arc_name . ($NS['dump_encrypt_key'] ? ".enc" : ".tar") . ($arParams['dump_use_compression'] ? ".gz" : '');
	$NS['dump_name'] = $arc_name . '.sql';

	if (!empty($arParams['dump_site_id']))
	{
		$NS['site_path_list'] = [];
		$res = CSite::GetList('sort', 'asc', ['ACTIVE' => 'Y']);
		while ($f = $res->Fetch())
		{
			$root = rtrim(str_replace('\\', '/', $f['ABS_DOC_ROOT']), '/');
			if (is_dir($root) && in_array($f['ID'], $arParams['dump_site_id']))
			{
				$NS['site_path_list'][$f['ID']] = $root;
			}
		}
	}
	else
	{
		$NS['site_path_list'] = ['s1' => DOCUMENT_ROOT];
	}

	if (!$public)
	{
		foreach (GetModuleEvents("main", "OnAutoBackupStart", true) as $arEvent)
		{
			ExecuteModuleEventEx($arEvent, [$NS]);
		}
	}

	ShowBackupStatus('Backup started to file: ' . $NS['arc_name']);
	if ($arParams['dump_base'])
	{
		$NS['step_cnt'] = 2;
	}
	if ($arParams['dump_do_clouds'] && ($arDumpClouds = CBackup::GetBucketList()))
	{
		$NS['step_cnt']++;
	}
	if (($arParams['dump_file_public'] || $arParams['dump_file_kernel']))
	{
		$NS['step_cnt']++;
	}
	if ($arParams['dump_integrity_check'])
	{
		$NS['step_cnt']++;
	}
	if ($NS['BUCKET_ID'])
	{
		$NS['step_cnt']++;
	}
	if ($arParams['dump_delete_old'] > 1)
	{
		$NS['step_cnt']++;
	}
	$NS['step_finished'] = 0;
}

$NS['step_done'] = 0;
$after_file = str_replace('.sql', '_after_connect.sql', preg_replace('#\.[0-9]+$#', '', $NS['dump_name']));

if ($NS['step'] <= 2)
{
	// dump database
	if ($arParams['dump_base'])
	{
		if ($NS['step'] == 1)
		{
			ShowBackupStatus('Dumping database');
			if (!CBackup::MakeDump($NS['dump_name'], $NS['dump_state']))
			{
				RaiseErrorAndDie(GetMessage('DUMP_NO_PERMS'), 100, $NS['dump_name']);
			}

			$TotalTables = $NS['dump_state']['TableCount'];
			$FinishedTables = $TotalTables - count($NS['dump_state']['TABLES']);
			$NS['step_done'] = $FinishedTables / $TotalTables;

			if (!$NS['dump_state']['end'])
			{
				CheckPoint();
			}

			$rs = $DB->Query('SHOW VARIABLES LIKE "character_set_results"');
			if (($f = $rs->Fetch()) && array_key_exists('Value', $f))
			{
				file_put_contents($after_file, "SET NAMES '" . $f['Value'] . "';\n");
			}

			$rs = $DB->Query('SHOW VARIABLES LIKE "collation_database"');
			if (($f = $rs->Fetch()) && array_key_exists('Value', $f))
			{
				file_put_contents($after_file, "ALTER DATABASE `<DATABASE>` COLLATE " . $f['Value'] . ";\n", 8);
			}

			$NS['step'] = 2;
			$NS['step_finished']++;
			clearstatcache();

			$next_part = $NS['dump_name'];
			$NS['dump_size'] = filesize($next_part);
			while (file_exists($next_part = CBackup::getNextName($next_part)))
			{
				$NS['dump_size'] += filesize($next_part);
			}
		}

		ShowBackupStatus('Archiving database dump');
		$tar = new CTar;
		$tar->EncryptKey = $NS['dump_encrypt_key'];
		$tar->ArchiveSizeLimit = $arParams['dump_archive_size_limit'];
		$tar->gzip = $arParams['dump_use_compression'];
		$tar->path = DOCUMENT_ROOT;
		$tar->ReadBlockCurrent = intval($NS['ReadBlockCurrent']);
		$tar->ReadFileSize = intval($NS['ReadFileSize']);

		if (!$tar->openWrite($NS["arc_name"]))
		{
			RaiseErrorAndDie(GetMessage('DUMP_NO_PERMS'), 200, $NS['arc_name']);
		}

		if (!$tar->ReadBlockCurrent)
		{
			if (file_exists($f = DOCUMENT_ROOT . BX_ROOT . '/.config.php')) // legacy SaaS support
			{
				$tar->addFile($f);
			}

			if (file_exists($after_file))
			{
				$tar->addFile($after_file);
				unlink($after_file);
			}
		}

		$Block = $tar->Block;
		while (haveTime())
		{
			$r = $tar->addFile($NS['dump_name']);
			if ($r === false)
			{
				RaiseErrorAndDie(implode('<br>', $tar->err), 210, $NS['arc_name'], true);
			}
			if ($tar->ReadBlockCurrent == 0)
			{
				unlink($NS["dump_name"]);
				if (file_exists($next_part = CBackup::getNextName($NS['dump_name'])))
				{
					$NS['dump_name'] = $next_part;
				}
				else // finish
				{
					$NS['arc_size'] = 0;
					$name = $NS["arc_name"];
					while (file_exists($name))
					{
						$size = filesize($name);
						$NS['arc_size'] += $size;
						$name = $tar->getNextName($name);
					}
					$NS['step_finished']++;

					break;
				}
			}
		}
		$tar->close();

		$NS["data_size"] += 512 * ($tar->Block - $Block);
		$NS["ReadBlockCurrent"] = $tar->ReadBlockCurrent;
		$NS["ReadFileSize"] = $tar->ReadFileSize;
		$NS['step_done'] = $NS['data_size'] / $NS['dump_size'];

		CheckPoint();
	}
	$NS['step'] = 3;
}

if ($NS['step'] == 3)
{
	$NS['step_done'] = 0;
	// Download cloud files
	if ($arParams['dump_do_clouds'] && ($arDumpClouds = CBackup::GetBucketList()))
	{
		ShowBackupStatus('Downloading cloud files');
		foreach ($arDumpClouds as $arBucket)
		{
			$id = $arBucket['ID'];
			if ($NS['bucket_finished_' . $id])
			{
				continue;
			}

			$obCloud = new CloudDownload($arBucket['ID']);
			$obCloud->last_bucket_path = $NS['last_bucket_path'];
			if ($res = $obCloud->Scan(''))
			{
				$NS['bucket_finished_' . $id] = true;
			}
			else
			{
				$NS['last_bucket_path'] = $obCloud->path;
				break;
			}
		}

		CheckPoint();
		$NS['step_finished']++;
	}
	$NS['step'] = 4;
}

$DB->Disconnect();

if ($NS['step'] == 4)
{
	// Tar files
	$NS['step_done'] = 0;
	if ($arParams['dump_file_public'] || $arParams['dump_file_kernel'])
	{
		ShowBackupStatus('Archiving files');

		$DirScan = new CDirRealScan;
		$DirScan->startPath = $NS['startPath'];

		$tar = new CTar;
		$tar->EncryptKey = $NS['dump_encrypt_key'];
		$tar->ArchiveSizeLimit = $arParams['dump_archive_size_limit'];
		$tar->gzip = $arParams['dump_use_compression'];
		$tar->ReadBlockCurrent = intval($NS['ReadBlockCurrent']);
		$tar->ReadFileSize = intval($NS['ReadFileSize']);

		foreach ($NS['site_path_list'] as $SITE_ID => $DOCUMENT_ROOT_SITE)
		{
			$DOCUMENT_ROOT_SITE = rtrim($DOCUMENT_ROOT_SITE, '/');

			$tar->path = $DOCUMENT_ROOT_SITE;

			if (!$tar->openWrite($NS["arc_name"]))
			{
				RaiseErrorAndDie(GetMessage('DUMP_NO_PERMS'), 400, $NS['arc_name'], true);
			}

			CBackup::$DOCUMENT_ROOT_SITE = $DOCUMENT_ROOT_SITE;
			CBackup::$REAL_DOCUMENT_ROOT_SITE = realpath($DOCUMENT_ROOT_SITE);

			if ($NS['multisite'])
			{
				$tar->prefix = 'bitrix/backup/sites/' . $SITE_ID . '/';
				$DirScan->arSkip[$DOCUMENT_ROOT_SITE . '/bitrix'] = true;
				$DirScan->arSkip[$DOCUMENT_ROOT_SITE . '/upload'] = true;
				if (is_link($DOCUMENT_ROOT_SITE . '/local'))
				{
					// if it's a link, we need it only the first time
					$DirScan->arSkip[$DOCUMENT_ROOT_SITE . '/local'] = true;
				}
			}

			$Block = $tar->Block;

			$r = $DirScan->Scan($DOCUMENT_ROOT_SITE);
			$tar->close();

			if (!isset($NS["data_size"]))
			{
				$NS["data_size"] = 0;
			}
			$NS["data_size"] += 512 * ($tar->Block - $Block);

			if ($r === false)
			{
				RaiseErrorAndDie(implode('<br>', array_merge($tar->err, $DirScan->err)), 410, $tar->file, true);
			}

			$NS["ReadBlockCurrent"] = $tar->ReadBlockCurrent;
			$NS["ReadFileSize"] = $tar->ReadFileSize;
			$NS["startPath"] = $DirScan->nextPath;

			if (!isset($NS["cnt"]))
			{
				$NS["cnt"] = 0;
			}
			$NS["cnt"] += $DirScan->FileCount;

			$last_files_count = IntOption('last_files_count');
			if (!$last_files_count)
			{
				$last_files_count = 200000;
			}
			$NS['step_done'] = $NS['cnt'] / $last_files_count;
			if ($NS['step_done'] > 1)
			{
				$NS['step_done'] = 1;
			}

			if ($r !== 'BREAK') // finish scan
			{
				array_shift($NS['site_path_list']);
				$NS['multisite'] = true;
				unset($NS['startPath']);
			}

			CheckPoint();
		}

		$NS['arc_size'] = 0;
		$name = $NS["arc_name"];
		$tar = new CTar();
		while (file_exists($name))
		{
			$size = filesize($name);
			$NS['arc_size'] += $size;
			$name = $tar->getNextName($name);
		}
		DeleteDirFilesEx(BX_ROOT . '/backup/clouds');
		if ($arParams['dump_file_public'] && $arParams['dump_file_kernel'])
		{
			COption::SetOptionInt("main", "last_files_count", $NS['cnt']);
		}
		$NS['step_finished']++;
	}
	$NS['step'] = 5;
}

if ($NS['step'] == 5)
{
	// Integrity check
	$NS['step_done'] = 0;
	if ($arParams['dump_integrity_check'])
	{
		ShowBackupStatus('Checking archive integrity');
		$tar = new CTarCheck;
		$tar->EncryptKey = $NS['dump_encrypt_key'];

		if (!$tar->openRead($NS["arc_name"]))
		{
			RaiseErrorAndDie(GetMessage('DUMP_NO_PERMS_READ') . '<br>' . implode('<br>', $tar->err), 510, $NS['arc_name']);
		}
		else
		{
			if (($Block = intval($NS['Block'] ?? 0)) && !$tar->SkipTo($Block))
			{
				RaiseErrorAndDie(implode('<br>', $tar->err), 520, $tar->file, true);
			}
			while (($r = $tar->extractFile()) && haveTime())
			{
				;
			}
			$NS["Block"] = $tar->Block;
			$NS['step_done'] = $NS['Block'] * 512 / $NS['data_size'];
			if ($r === false)
			{
				RaiseErrorAndDie(implode('<br>', $tar->err), 530, $tar->file, true);
			}
		}
		$tar->close();

		CheckPoint();
		$NS['step_finished']++;
	}
	$NS['step'] = 6;
}

$DB->DoConnect();

if ($NS['step'] == 6)
{
	// Send to the cloud
	$NS['step_done'] = 0;
	if ($NS['BUCKET_ID'])
	{
		ShowBackupStatus('Sending backup to the cloud');
		if (!CModule::IncludeModule('clouds'))
		{
			RaiseErrorAndDie(GetMessage("MAIN_DUMP_NO_CLOUDS_MODULE"), 600, $NS['arc_name']);
		}

		$tar = new CTar();
		while (CheckPoint())
		{
			$file_size = filesize($NS["arc_name"]);
			$file_name = $NS['BUCKET_ID'] == -1 ? basename($NS['arc_name']) : substr($NS['arc_name'], strlen(DOCUMENT_ROOT));
			$obUpload = new CCloudStorageUpload($file_name);

			if ($NS['BUCKET_ID'] == -1)
			{
				if (!$bBitrixCloud)
				{
					RaiseErrorAndDie(getMessage('DUMP_BXCLOUD_NA'), 610);
				}

				$obBucket = null;
				if (!$NS['obBucket'])
				{
					try
					{
						$backup = CBitrixCloudBackup::getInstance();
						$q = $backup->getQuota();
						if ($q && $NS['arc_size'] > $q)
						{
							RaiseErrorAndDie(GetMessage('DUMP_ERR_BIG_BACKUP', ['#ARC_SIZE#' => $NS['arc_size'], '#QUOTA#' => $q]), 620);
						}

						$obBucket = $backup->getBucketToWriteFile(CTar::getCheckword($NS['dump_encrypt_key']), basename($NS['arc_name']));
						$NS['obBucket'] = serialize($obBucket);
					}
					catch (Exception $e)
					{
						unset($NS['obBucket']);
						RaiseErrorAndDie($e->getMessage(), 630);
					}
				}
				else
				{
					$obBucket = unserialize(
						$NS['obBucket'],
						['allowed_classes' => ['CBitrixCloudBackupBucket']]
					);
				}

				$obBucket->Init();
				$obBucket->GetService()->setPublic(false);

				$bucket_id = $obBucket;
			}
			else
			{
				$obBucket = null;
				$bucket_id = $NS['BUCKET_ID'];
			}

			if (!$obUpload->isStarted())
			{
				if (is_object($obBucket))
				{
					$obBucket->setCheckWordHeader();
				}

				if (!$obUpload->Start($bucket_id, $file_size))
				{
					if ($e = $APPLICATION->GetException())
					{
						$strError = $e->GetString();
					}
					else
					{
						$strError = GetMessage('MAIN_DUMP_INT_CLOUD_ERR');
					}
					RaiseErrorAndDie($strError, 640, $NS['arc_name']);
				}

				if (is_object($obBucket))
				{
					$obBucket->unsetCheckWordHeader();
				}
			}

			if (!$fp = fopen($NS['arc_name'], 'rb'))
			{
				RaiseErrorAndDie(GetMessage("MAIN_DUMP_ERR_OPEN_FILE") . ' ' . $NS['arc_name'], 650, $NS['arc_name']);
			}

			fseek($fp, $obUpload->getPos());
			while ($obUpload->getPos() < $file_size && haveTime())
			{
				$part = fread($fp, $obUpload->getPartSize());
				$fails = 0;
				$res = false;
				while ($obUpload->hasRetries())
				{
					if ($res = $obUpload->Next($part, $obBucket))
					{
						break;
					}
					elseif (++$fails >= 10)
					{
						$e = $APPLICATION->GetException();
						$strError = $e ? '. ' . $e->GetString() : '';
						RaiseErrorAndDie('Internal Error: could not init upload for ' . $fails . ' times' . $strError, 660, $NS['arc_name']);
					}
				}
				$NS['step_done'] = $obUpload->getPos() / $NS['arc_size'];

				if (!$res)
				{
					$obUpload->Delete();
					$e = $APPLICATION->GetException();
					$strError = $e ? '. ' . $e->GetString() : '';
					RaiseErrorAndDie(GetMessage('MAIN_DUMP_ERR_FILE_SEND') . ' ' . basename($NS['arc_name']) . $strError, 670, $NS['arc_name']);
				}
			}
			fclose($fp);

			CheckPoint();

			if ($obUpload->Finish($obBucket))
			{
				if ($NS['BUCKET_ID'] != -1)
				{
					$oBucket = new CCloudStorageBucket($NS['BUCKET_ID']);
					$oBucket->IncFileCounter($file_size);
				}

				if (file_exists($arc_name = $tar->getNextName($NS['arc_name'])))
				{
					unset($NS['obBucket']);
					$NS['arc_name'] = $arc_name;
				}
				else
				{
					if ($bBitrixCloud)
					{
						$ob = new CBitrixCloudBackup;
						$ob->clearOptions();
					}

					if ($arParams['dump_delete_old'] == 1)
					{
						$name = CTar::getFirstName($NS['arc_name']);
						while (file_exists($name))
						{
							$size = filesize($name);
							if (unlink($name) && COption::GetOptionInt('main', 'disk_space', 0) > 0)
							{
								CDiskQuota::updateDiskQuota("file", $size, "del");
							}
							$name = $tar->getNextName($name);
						}
					}
					break;
				}
			}
			else
			{
				$obUpload->Delete();
				$e = $APPLICATION->GetException();
				$strError = $e ? '. ' . $e->GetString() : '';
				RaiseErrorAndDie(GetMessage('MAIN_DUMP_ERR_FILE_SEND') . basename($NS['arc_name']) . $strError, 680, $NS['arc_name']);
			}
		}
		$NS['step_finished']++;
	}
	$NS['step'] = 7;
}

if ($NS['step'] == 7)
{
	// Delete old backups
	$NS['step_done'] = 0;
	if ($arParams['dump_delete_old'] > 1)
	{
		ShowBackupStatus('Deleting old backups');
		$arFiles = [];
		$arParts = [];

		$TotalSize = $NS['arc_size'];

		if (is_dir($p = DOCUMENT_ROOT . BX_ROOT . '/backup'))
		{
			if ($dir = opendir($p))
			{
				$arc_name = CTar::getFirstName(basename($NS['arc_name']));
				while (($item = readdir($dir)) !== false)
				{
					$f = $p . '/' . $item;
					if (!is_file($f))
					{
						continue;
					}

					if (!preg_match('#\.(sql|tar|gz|enc|[0-9]+)$#', $item))
					{
						continue;
					}

					$name = CTar::getFirstName($item);
					if ($name == $arc_name)
					{
						continue;
					}

					$s = filesize($f);
					$m = filemtime($f);

					$arFiles[$name] = $m;
					$arParts[$name][] = $item;
					$TotalSize += $s;
				}
				closedir($dir);
			}
		}
		asort($arFiles);
		$cnt = count($arFiles) + 1;

		foreach ($arFiles as $name => $m)
		{
			switch ($arParams['dump_delete_old'])
			{
				case 2: // time
					if ($m >= time() - 86400 * $arParams['dump_old_time'])
					{
						break 2;
					}
					break;
				case 4: // cnt
					if ($cnt <= $arParams['dump_old_cnt'])
					{
						break 2;
					}
					break;
				case 8: // size
					if ($TotalSize / 1024 / 1024 / 1024 <= $arParams['dump_old_size'])
					{
						break 2;
					}
					break;
				default:
					break;
			}

			$cnt--;
			foreach ($arParts[$name] as $item)
			{
				$f = $p . '/' . $item;
				$size = filesize($f);
				$TotalSize -= $size;
				if (!unlink($f))
				{
					RaiseErrorAndDie('Could not delete file: ' . $f, 700, $NS['arc_name']);
				}
				if (COption::GetOptionInt('main', 'disk_space', 0) > 0)
				{
					CDiskQuota::updateDiskQuota("file", $size, "del");
				}
			}
		}
		$NS['step_finished']++;
	}
	$NS['step'] = 8;
}

if (COption::GetOptionInt('main', 'disk_space', 0) > 0)
{
	$name = $NS["arc_name"];
	$tar = new CTar();
	while (file_exists($name))
	{
		$size = filesize($name);
		CDiskQuota::updateDiskQuota("file", $size, "add");
		$name = $tar->getNextName($name);
	}
}

$info = "Finished.\n\nData size: " . round($NS['data_size'] / 1024 / 1024, 2) . " M\nArchive size: " . round($NS['arc_size'] / 1024 / 1024, 2) . " M\nTime: " . round(time() - $NS['START_TIME'], 2) . " sec\n";
ShowBackupStatus($info);
CEventLog::Add([
	"SEVERITY" => "WARNING",
	"AUDIT_TYPE_ID" => "BACKUP_SUCCESS",
	"MODULE_ID" => "main",
	"ITEM_ID" => $NS['arc_name'],
	"DESCRIPTION" => $info,
]);

foreach (GetModuleEvents("main", "OnAutoBackupSuccess", true) as $arEvent)
{
	ExecuteModuleEventEx($arEvent, [$NS]);
}

$NS = [];
if (defined('LOCK_FILE'))
{
	unlink(LOCK_FILE) || RaiseErrorAndDie('Can\'t delete file: ' . LOCK_FILE, 1000);
}
if (!CLI)
{
	echo 'FINISH';
}
COption::SetOptionInt('main', 'last_backup_end_time', time());

function IntOption($name, $def = 0)
{
	global $arParams;
	if (isset($arParams[$name]))
	{
		return $arParams[$name];
	}

	static $CACHE;
	$name .= '_auto';

	if (!isset($CACHE[$name]))
	{
		$CACHE[$name] = COption::GetOptionInt("main", $name, $def);
	}
	return $CACHE[$name];
}

function ShowBackupStatus($str)
{
	if (!CLI && !$_REQUEST['show_status'])
	{
		return;
	}
	global $NS;
	echo round(microtime(1) - $NS['START_TIME'], 2) . ' sec	' . $str . "\n";
}

function haveTime()
{
	static $timeout;
	if (!$timeout)
	{
		$timeout = IntOption('dump_max_exec_time', 30);
		if ($timeout < 5)
		{
			$timeout = 5;
		}
	}
	if (!CLI && time() - START_TIME > $timeout)
	{
		return false;
	}
	return true;
}

function RaiseErrorAndDie($strError, $errCode = 0, $ITEM_ID = '', $delete = false)
{
	global $DB, $NS;

	if ($delete)
	{
		$arc_name = CTar::getFirstName(basename($NS['arc_name']));

		if ($dir = opendir($path = DOCUMENT_ROOT . '/bitrix/backup'))
		{
			while ($item = readdir($dir))
			{
				if (is_dir($path . '/' . $item))
				{
					continue;
				}
				if (CTar::getFirstName($item) == $arc_name)
				{
					$delete = unlink($path . '/' . $item) && $delete;
				}
			}
			closedir($dir);
		}
		else
		{
			$delete = false;
		}

		$strError .= "\n" . ($delete ? 'The backup was incorrect and it was deleted' : 'The backup was incorrect but there was an error deleting it');
	}

	$NS0 = $NS;
	$NS = [];
	session_write_close();

	if (CLI)
	{
		echo 'Error [' . $errCode . ']: ' . str_replace('<br>', "\n", $strError) . "\n";
	}
	else
	{
		echo "ERROR_" . $errCode . "\n" . htmlspecialcharsbx($strError) . "\n";
	}

	if (is_object($DB))
	{
		$DB->DoConnect();

		CEventLog::Add([
			"SEVERITY" => "WARNING",
			"AUDIT_TYPE_ID" => "BACKUP_ERROR",
			"MODULE_ID" => "main",
			"ITEM_ID" => $ITEM_ID,
			"DESCRIPTION" => "[" . $errCode . "] " . $strError,
		]);

		foreach (GetModuleEvents("main", "OnAutoBackupError", true) as $arEvent)
		{
			ExecuteModuleEventEx($arEvent, [array_merge($NS0, ['ERROR' => $strError, 'ERROR_CODE' => $errCode, 'ITEM_ID' => $ITEM_ID])]);
		}

		$link = '/bitrix/admin/event_log.php?set_filter=Y&find_type=audit_type_id&find_audit_type[]=BACKUP_ERROR';
		$ar = [
			"MESSAGE" => 'The last automatic backup has failed. Please check your <a href="' . $link . '">system log<a>',
			"TAG" => "BACKUP",
			"MODULE_ID" => "MAIN",
			'NOTIFY_TYPE' => CAdminNotify::TYPE_ERROR,
			'ENABLE_CLOSE' => 'Y',
		];
		foreach (['ru', 'ua', 'en', 'de'] as $lang)
		{
			\Bitrix\Main\Localization\Loc::loadLanguageFile($_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/admin/dump.php', $lang);
			$ar["LANG"][$lang] = \Bitrix\Main\Localization\Loc::getMessage('DUMP_ERR_AUTO', ['#MESSAGE#' => $strError, '#LINK#' => $link], $lang);
		}
		CAdminNotify::Add($ar);
	}
	die();
}

function CheckPoint()
{
	if (haveTime())
	{
		return true;
	}

	global $NS;
	$NS['WORK_TIME'] = microtime(1) - START_TIME;
	$NS['TIMESTAMP'] = time();

	session_write_close();
	echo "NEXT\n" .	GetProgressPercent($NS);
	exit(0);
}

function GetProgressPercent($NS)
{
	if ($NS['step_done'] > 1)
	{
		$NS['step_done'] = 1;
	}
	$res = round(100 * ($NS['step_finished'] + $NS['step_done']) / $NS['step_cnt']);
	if ($res > 99)
	{
		$res = 99;
	}
	return $res;
}

Youez - 2016 - github.com/yon3zu
LinuXploit