<?php

use Bitrix\Main\ArgumentException;
use Bitrix\Main\Localization\Loc;

define("NOT_CHECK_PERMISSIONS", true);
define("STOP_STATISTICS", true);
define("NO_KEEP_STATISTIC", "Y");
define("NO_AGENT_STATISTIC","Y");
define("DisableEventsCheck", true);

$siteId = '';
if (isset($_REQUEST['site_id']) && is_string($_REQUEST['site_id']))
{
	$siteId = mb_substr(preg_replace('/[^a-z0-9_]/i', '', $_REQUEST['site_id']), 0, 2);
}
if ($siteId)
{
	define('SITE_ID', $siteId);
}

require_once($_SERVER['DOCUMENT_ROOT'].'/bitrix/modules/main/include/prolog_before.php');

/**
 * @global CUser $USER
 */

if(!CModule::IncludeModule('bizproc') || !CModule::IncludeModule('bizproc'))
	die();

global $USER, $DB, $APPLICATION;

$curUser = isset($USER) && is_object($USER) ? $USER : null;
if (!$curUser || !$curUser->IsAuthorized() || !check_bitrix_sessid() || $_SERVER['REQUEST_METHOD'] != 'POST')
{
	die();
}

$jsonDataMap = [
	'robot_json' => 'robot',
	'form_data_json' => 'form_data',
	'triggers_json' => 'triggers',
	'templates_json' => 'templates',
	'robot_names' => 'robot_names',
	'trigger_names' => 'trigger_names',
	'context_robots_json' => 'context_robots',
];
$jsonValues = [];

foreach ($jsonDataMap as $k => $v)
{
	if (isset($_REQUEST[$k]))
	{
		try
		{
			$jsonValues[$v] = \Bitrix\Main\Web\Json::decode($_REQUEST[$k]);
		}
		catch (ArgumentException $e)
		{
		}

		unset($_REQUEST[$k]);
	}
}

foreach ($jsonValues as $k => $v)
{
	$_REQUEST[$k] = $v;
}

$action = !empty($_REQUEST['ajax_action']) ? $_REQUEST['ajax_action'] : null;

if (empty($action))
	die('Unknown action!');

$APPLICATION->ShowAjaxHead();
$action = mb_strtoupper($action);

$sendResponse = function($data, array $errors = array(), $plain = false)
{
	if ($data instanceof Bitrix\Main\Result)
	{
		$errors = $data->getErrorMessages();
		$data = $data->getData();
	}

	$result = array('DATA' => $data, 'ERRORS' => $errors);
	$result['SUCCESS'] = count($errors) === 0;
	if(!defined('PUBLIC_AJAX_MODE'))
	{
		define('PUBLIC_AJAX_MODE', true);
	}
	$GLOBALS['APPLICATION']->RestartBuffer();
	header('Content-Type: application/x-javascript; charset='.LANG_CHARSET);

	if ($plain)
	{
		$result = $result['DATA'];
	}

	echo \Bitrix\Main\Web\Json::encode($result);
	\Bitrix\Main\Application::getInstance()->end();
};
$sendError = function($error) use ($sendResponse)
{
	$sendResponse(array(), array($error));
};

$sendHtmlResponse = function($html)
{
	if(!defined('PUBLIC_AJAX_MODE'))
	{
		define('PUBLIC_AJAX_MODE', true);
	}
	header('Content-Type: text/html; charset='.LANG_CHARSET);
	echo $html;
	\CMain::FinalActions();
};

CBitrixComponent::includeComponentClass('bitrix:bizproc.automation');

$documentInformation = \BizprocAutomationComponent::unSignDocument($_POST['document_signed']);

if (!$documentInformation)
{
	$sendError('Invalid request [document_signed]');
}
[$documentType, $documentCategoryId, $documentId] = $documentInformation;

try
{
	$documentType = \CBPHelper::ParseDocumentId($documentType);
}
catch (\CBPArgumentNullException $e)
{
	$sendError('Invalid request [document_type]');
}

$complexDocumentId = [$documentType[0], $documentType[1], $documentId];

$runtime = CBPRuntime::GetRuntime();
$runtime->StartRuntime();

$documentService = $runtime->GetService('DocumentService');

$target = $documentService->createAutomationTarget($documentType);

if (!$target || !$target->isAvailable())
{
	$sendError('Automation target is not supported for this document');
}

$checkConfigWritePerms = function() use ($documentType, $documentCategoryId, $curUser, $sendError)
{
	$tplUser = new \CBPWorkflowTemplateUser(\CBPWorkflowTemplateUser::CurrentUser);
	if ($tplUser->isAdmin())
	{
		return true;
	}

	$canWrite = CBPDocument::CanUserOperateDocumentType(
		CBPCanUserOperateOperation::CreateAutomation,
		$curUser->getId(),
		$documentType,
		['DocumentCategoryId' => $documentCategoryId]
	);
	if (!$canWrite)
	{
		$sendError('Access denied!');
	}
};

$checkReadPerms = function($documentId) use ($documentType, $curUser, $sendError)
{
	$tplUser = new \CBPWorkflowTemplateUser(\CBPWorkflowTemplateUser::CurrentUser);
	if ($tplUser->isAdmin())
	{
		return true;
	}

	$documentId = [$documentType[0], $documentType[1], $documentId];
	$canRead = CBPDocument::CanUserOperateDocument(
		CBPCanUserOperateOperation::ViewWorkflow,
		$curUser->getId(),
		$documentId
	);
	if (!$canRead)
	{
		$sendError('Access denied!');
	}
};

switch ($action)
{
	case 'GET_ROBOT_DIALOG':
		//Check permissions.
		$checkConfigWritePerms();

		$robotData = isset($_REQUEST['robot']) && is_array($_REQUEST['robot']) ? $_REQUEST['robot'] : null;
		if (!$robotData)
		{
			$sendError(Loc::getMessage('BIZPROC_AUTOMATION_AJAX_NO_DATA_ERROR'));
		}

		$context = isset($_REQUEST['context']) && is_array($_REQUEST['context']) ? $_REQUEST['context'] : null;
		$contextRobots = isset($_REQUEST['context_robots']) && is_array($_REQUEST['context_robots']) ? $_REQUEST['context_robots'] : [];

		ob_start();
		$APPLICATION->includeComponent(
			'bitrix:bizproc.automation',
			'',
			array(
				'ACTION' => 'ROBOT_SETTINGS',
				'DOCUMENT_TYPE' => $documentType,
				'DOCUMENT_CATEGORY_ID' => $documentCategoryId,
				'ROBOT_DATA' => $robotData,
				'CONTEXT_ROBOTS' => $contextRobots,
				'REQUEST' => $_REQUEST,
				'CONTEXT' => $context
			)
		);
		$dialog = ob_get_clean();

		$sendHtmlResponse($dialog);
		break;

	case 'SAVE_ROBOT_SETTINGS':
		//Check permissions.
		$checkConfigWritePerms();

		$robotData = isset($_REQUEST['robot']) && is_array($_REQUEST['robot']) ? $_REQUEST['robot'] : null;
		if (!$robotData)
		{
			$sendError(Loc::getMessage('BIZPROC_AUTOMATION_AJAX_NO_DATA_ERROR'));
		}

		$requestData = isset($_REQUEST['form_data']) && is_array($_REQUEST['form_data']) ? $_REQUEST['form_data'] : [];

		$template = new \Bitrix\Bizproc\Automation\Engine\Template($documentType);
		$saveResult = $template->saveRobotSettings($robotData, $requestData);

		if ($saveResult->isSuccess())
		{
			$data = $saveResult->getData();
			CBitrixComponent::includeComponentClass('bitrix:bizproc.automation');
			if (!array_key_exists('robot', $data))
			{
				$data['robot'] = [];
			}
			$data['robot']['viewData'] = \BizprocAutomationComponent::getRobotViewData($data['robot'], $documentType);

			$sendResponse(array('robot' => $data['robot']));
		}
		else
		{
			$sendError($saveResult->getErrorMessages());
		}
		break;

	case 'SAVE_AUTOMATION':

		//Check permissions.
		$checkConfigWritePerms();

		//save Templates and Robots
		$templates = isset($_REQUEST['templates']) && is_array($_REQUEST['templates']) ? $_REQUEST['templates'] : [];
		$errors = array();

		//save Triggers
		$updatedTriggers = [];
		$triggers = isset($_REQUEST['triggers']) && is_array($_REQUEST['triggers']) ? $_REQUEST['triggers'] : [];

		$target->prepareTriggersToSave($triggers);
		$updatedTriggers = $target->setTriggers($triggers);
		$templateParameters = $target->extractTemplateParameters($triggers);

		$updatedTemplates = array();
		foreach ($templates as $templateData)
		{
			$template = null;
			if ($templateData['ID'])
			{
				$tpl = Bitrix\Bizproc\Workflow\Template\Entity\WorkflowTemplateTable::getById($templateData['ID'])->fetchObject();
				if ($tpl)
				{
					$template = \Bitrix\Bizproc\Automation\Engine\Template::createByTpl($tpl);
				}
			}

			if (!$template)
			{
				$template = new \Bitrix\Bizproc\Automation\Engine\Template($documentType, $templateData['DOCUMENT_STATUS']);
			}
			elseif ($template->getDocumentType() !== $documentType)
			{
				$sendError('Incorrect template id');
			}

			if (empty($templateData['IS_EXTERNAL_MODIFIED']))
			{
				$robots = isset($templateData['ROBOTS']) && is_array($templateData['ROBOTS']) ? $templateData['ROBOTS'] : array();

				$result = $template->save($robots, $curUser->GetID(), [
					'PARAMETERS' => $templateParameters[$template->getDocumentStatus()] ?? []
				]);
				if ($result->isSuccess())
				{
					$templateArray = $template->toArray();
					$templateArray['CUSTOM_ROBOTS'] = BizprocAutomationComponent::getRunningCustomRobots(
						$complexDocumentId,
						$template
					);
					$updatedTemplates[] = BizprocAutomationComponent::getTemplateViewData($templateArray, $documentType);
				}
				else
				{
					$errors = array_merge($errors, $result->getErrorMessages());
				}
			}
			else
			{
				$updatedTemplates[] = $template->toArray();
				$updatedTemplates['CUSTOM_ROBOTS'] = BizprocAutomationComponent::getRunningCustomRobots(
					$complexDocumentId,
					$template
				);
			}
		}

		$target->prepareTriggersToShow($updatedTriggers);
		$sendResponse(array('templates' => $updatedTemplates, 'triggers' => $updatedTriggers), $errors);

		break;

	case 'GET_LOG':
		//Check permissions.
		if (empty($documentId))
		{
			$sendError('Wrong document id.');
		}

		$checkReadPerms($documentId);

		/** @var \Bitrix\Bizproc\Automation\Target\BaseTarget $target */
		$target = $documentService->createAutomationTarget($documentType);

		if (!$target)
		{
			$sendError('Wrong document type.');
		}

		$target->setDocumentId($documentId);
		$statusList = $target->getDocumentStatusList($documentCategoryId);
		$tracker = new \Bitrix\Bizproc\Automation\Tracker($target);

		$sendResponse(array('LOG' => $tracker->getLog(array_keys($statusList))));
		break;

	case 'GET_AVAILABLE_TRIGGERS':
		//Check permissions.
		$checkConfigWritePerms();

		/** @var \Bitrix\Bizproc\Automation\Target\BaseTarget $target */
		$target = $documentService->createAutomationTarget($documentType);

		if (!$target)
		{
			$sendError('Wrong document type.');
		}

		$sendResponse($target->getAvailableTriggers());
		break;

	case 'DELETE_ROBOTS':
		$checkConfigWritePerms();

		$result = new \Bitrix\Main\Result();
		$selectedStatus = $_REQUEST['selected_status'] ?? null;
		$selectedRobotNames = $jsonValues['robot_names'] ?? [];
		$selectedTriggerIds = $jsonValues['trigger_names'] ?? [];
		if (!is_array($selectedRobotNames))
		{
			$selectedRobotNames = [];
		}
		if (!is_array($selectedTriggerIds))
		{
			$selectedTriggerIds = [];
		}

		if (
			is_string($selectedStatus)
			&& $selectedStatus
			&& ($selectedRobotNames || $selectedTriggerIds)
		) {
			$template = new \Bitrix\Bizproc\Automation\Engine\Template($documentType, $selectedStatus);
			$templateArray = $template->toArray();
			$templateArray['CUSTOM_ROBOTS'] = BizprocAutomationComponent::getRunningCustomRobots(
				$complexDocumentId,
				$template
			);
			$originalTemplate = BizprocAutomationComponent::getTemplateViewData($templateArray, $documentType);

			if ($template->getId() > 0)
			{
				$originalStatusTriggers = $target->getTriggers([$selectedStatus]);
				$statusTriggers = $originalStatusTriggers;
				foreach ($statusTriggers as &$trigger)
				{
					$id = isset($trigger['ID']) ? (int)$trigger['ID'] : null;

					if (in_array($id, $selectedTriggerIds, true))
					{
						$trigger['DELETED'] = 'Y';
					}
				}
				unset($trigger);
				foreach ($originalStatusTriggers as &$trigger)
				{
					unset($trigger['ID']);
				}
				$statusTriggers = $target->setTriggers($statusTriggers);
				$target->prepareTriggersToShow($originalStatusTriggers);
				$target->prepareTriggersToShow($statusTriggers);

				$robots = $template->getRobotsByNames($selectedRobotNames);
				$deletingResult = $template->deleteRobots($robots, $curUser->getId());
				if ($deletingResult->isSuccess())
				{
					$templateArray = $template->toArray();
					$templateArray['CUSTOM_ROBOTS'] = BizprocAutomationComponent::getRunningCustomRobots(
						$complexDocumentId,
						$template
					);
					$updatedTemplate = BizprocAutomationComponent::getTemplateViewData(
						$templateArray,
						$documentType
					);
					$result->setData([
						'template' => $updatedTemplate,
						'triggers' => $statusTriggers,
						'restoreData' => [
							'template' => $originalTemplate,
							'triggers' => $originalStatusTriggers,
						],
					]);
				}
				else
				{
					$result->addErrors($deletingResult->getErrors());
				}
			}
		}

		$sendResponse($result);
		break;

	case 'UPDATE_TEMPLATES':
		$checkConfigWritePerms();

		$result = new \Bitrix\Main\Result();
		$statuses = $_REQUEST['statuses'] ?? null;

		if (is_array($statuses))
		{
			$templates = [];
			foreach ($statuses as $status)
			{
				$template = new \Bitrix\Bizproc\Automation\Engine\Template($documentType, $status);
				if ($template->getId() > 0)
				{
					$templateArray = $template->toArray();
					$templateArray['CUSTOM_ROBOTS'] = BizprocAutomationComponent::getRunningCustomRobots(
						$complexDocumentId,
						$template
					);
					$templates[$status] = BizprocAutomationComponent::getTemplateViewData(
						$templateArray,
						$documentType
					);
				}
			}
			$result->setData(['templates' => $templates]);
		}

		$sendResponse($result);
		break;

	case 'GET_TRIGGERS':
		$checkConfigWritePerms();

		$statusList = array_keys($target->getDocumentStatusList($documentCategoryId));

		$triggers = $target->getTriggers($statusList);
		$target->prepareTriggersToShow($triggers);

		$sendResponse(['triggers' => $triggers]);

	default:
		$sendError('Unknown action!');
		break;
}