<?php
define('ADMIN_MODULE_NAME', 'bitrixcloud');
if (isset($_REQUEST['referer']) && $_REQUEST['referer'] === 'monitoring')
{
	define('NOT_CHECK_PERMISSIONS', true);
}
require_once $_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/prolog_admin_before.php';
IncludeModuleLangFile(__FILE__);

/* @var CMain $APPLICATION */
/* @var CUser $USER */

if (!CModule::IncludeModule('bitrixcloud'))
{
	$APPLICATION->AuthForm(GetMessage('ACCESS_DENIED'));
}

if ($_REQUEST['referer'] === 'monitoring')
{
	CBitrixCloudMonitoringResult::setExpirationTime(0);
	require $_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/epilog_after.php';
	die();
}

if (!$USER->CanDoOperation('bitrixcloud_monitoring'))
{
	$APPLICATION->AuthForm(GetMessage('ACCESS_DENIED'));
}

$strError = '';
$arNotes = [];
$monitoringResults = null;
$APPLICATION->SetTitle(GetMessage('BCL_MONITORING_TITLE'));
$converter = CBXPunycode::GetConverter();
$monitoring = CBitrixCloudMonitoring::getInstance();

$sTableID = 't_bitrixcloud_monitoring';
$lAdmin = new CAdminList($sTableID);

$arHeaders = [
	[
		'id' => 'DOMAIN',
		'content' => GetMessage('BCL_MONITORING_DOMAIN'),
		'default' => true,
	],
	[
		'id' => 'RESULT',
		'content' => GetMessage('BCL_MONITORING_RESULT'),
		'default' => true,
	],
];

try
{
	if ($arID = $lAdmin->GroupAction())
	{
		foreach ($arID as $ID)
		{
			if ($ID == '')
			{
				continue;
			}
			if ($_REQUEST['action'] === 'delete')
			{
				$strError = $monitoring->stopMonitoring($ID);
				if ($strError !== '')
				{
					$lAdmin->AddUpdateError($strError, $ID);
				}
			}
		}
	}

	$monitoringResults = $monitoring->getMonitoringResults();
	if (is_string($monitoringResults))
	{
		throw new CBitrixCloudException($monitoringResults);
	}

	if ($_REQUEST['referer'] === 'gadget')
	{
		$monitoringAlertsCurrent = $monitoring->getAlertsCurrentResult();
		$monitoringAlertsStored = $monitoring->getAlertsStored();
		if ($monitoringAlertsStored != $monitoringAlertsCurrent)
		{
			$monitoring->storeAlertsCurrentResult();
		}
	}
}
catch (Exception $e)
{
	require_once $_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/prolog_admin_after.php';
	$strError = $e->getMessage();
}

$lAdmin->AddHeaders($arHeaders);
$rsData = new CDBResult;
$arResult = [];
if (is_object($monitoringResults))
{
	foreach ($monitoringResults as $domainName => $tmp)
	{
		$arResult[] = [
			'DOMAIN' => $domainName,
		];
	}
}
$rsData->InitFromArray($arResult);
$rsData = new CAdminResult($rsData, $sTableID);

while ($arRes = $rsData->GetNext())
{
	$row = $lAdmin->AddRow($arRes['DOMAIN'], $arRes);
	$isOK = true;
	/** @var CBitrixCloudMonitoringDomainResult $domainResults */
	$domainResults = $monitoringResults[$arRes['DOMAIN']];
	$html = '<table width="100%">';
	/** @var CBitrixCloudMonitoringTest $test_http_response_time */
	$test_http_response_time = $domainResults['test_http_response_time'];
	if ($test_http_response_time)
	{
		if ($test_http_response_time->getStatus() === CBitrixCloudMonitoringResult::RED_LAMP)
		{
			$isOK = false;
			$indicatorStyle = 'style="color:red"';
		}
		else
		{
			$indicatorStyle = '';
		}

		$result = explode('/', $test_http_response_time->getUptime());
		if ($result[0] > 0 && $result[1] > 0)
		{
			$resultText = round($result[0] / $result[1] * 100, 2) . '%';
		}
		else
		{
			$resultText = GetMessage('BCL_MONITORING_NO_DATA');
		}

		$html .= '<tr>';
		$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_RESPONSE_TIME') . ':</td>';
		$html .= '<td align="left" ' . $indicatorStyle . '>' . $resultText . '</td>';
		$html .= '</tr>';

		if ($result[1] > 0)
		{
			$failTime = ($result[1] - $result[0]);
			$resultText = FormatDate([
				's' => 'sdiff',
				'i' => 'idiff',
				'H' => 'Hdiff',
			], time() - $failTime);
			$html .= '<tr>';
			$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_FAILED_PERIOD') . '</td>';
			if ($failTime > 0)
			{
				$html .= '<td align="left" style="color:red">' . $resultText . '</td>';
			}
			else
			{
				$html .= '<td align="left">' . GetMessage('MAIN_NO') . '</td>';
			}
			$html .= '</tr>';

			$resultText = FormatDate([
				's' => 'sdiff',
				'i' => 'idiff',
				'H' => 'Hdiff',
				'-' => 'ddiff',
			], time() - $result[1]);
			$html .= '<tr>';
			$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_PERIOD') . '</td>';
			$html .= '<td align="left">' . $resultText . '</td>';
			$html .= '</tr>';
		}
	}
	/** @var CBitrixCloudMonitoringTest $test_domain_registration */
	$test_domain_registration = $domainResults['test_domain_registration'];
	if ($test_domain_registration)
	{
		if ($test_domain_registration->getStatus() === CBitrixCloudMonitoringResult::RED_LAMP)
		{
			$isOK = false;
			$indicatorStyle = 'style="color:red"';
		}
		else
		{
			$indicatorStyle = '';
		}

		$result = $test_domain_registration->getResult();
		if ($result === 'n/a')
		{
			$c = array_search(GetMessage('BCL_MONITORING_DOMAIN_REGISTRATION_NOTE'), $arNotes);
			if ($c === false)
			{
				$c = count($arNotes);
				$arNotes[] = GetMessage('BCL_MONITORING_DOMAIN_REGISTRATION_NOTE');
			}
			$resultText = GetMessage('BCL_MONITORING_NO_DATA_AVAILABLE') . '<span class="required"><sup>' . ($c + 1) . '</sup></span>';
		}
		elseif ($result === '-' || $result < 1)
		{
			$resultText = GetMessage('BCL_MONITORING_NO_DATA');
		}
		else
		{
			$resultText = FormatDate('ddiff', time(), $result) . ' (' . FormatDate('SHORT', $result) . ')';
		}

		$html .= '<tr>';
		$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_DOMAIN_REGISTRATION') . '</td>';
		$html .= '<td align="left" ' . $indicatorStyle . '>' . $resultText . '</td>';
		$html .= '</tr>';
	}
	/** @var CBitrixCloudMonitoringTest $test_lic */
	$test_lic = $domainResults['test_lic'];
	if ($test_lic)
	{
		if ($test_lic->getStatus() === CBitrixCloudMonitoringResult::RED_LAMP)
		{
			$isOK = false;
			$indicatorStyle = 'style="color:red"';
		}
		else
		{
			$indicatorStyle = '';
		}

		$result = $test_lic->getResult();
		if ($result === '-' || $result < 1)
		{
			$resultText = GetMessage('BCL_MONITORING_NO_DATA');
		}
		else
		{
			$resultText = FormatDate('ddiff', time(), $result) . ' (' . FormatDate('SHORT', $result) . ')';
		}

		$html .= '<tr>';
		$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_LICENSE') . '</td>';
		$html .= '<td align="left" ' . $indicatorStyle . '>' . $resultText . '</td>';
		$html .= '</tr>';
	}
	/** @var CBitrixCloudMonitoringTest $test_ssl_cert_validity */
	$test_ssl_cert_validity = $domainResults['test_ssl_cert_validity'];
	if ($test_ssl_cert_validity)
	{
		if ($test_ssl_cert_validity->getStatus() === CBitrixCloudMonitoringResult::RED_LAMP)
		{
			$isOK = false;
			$indicatorStyle = 'style="color:red"';
		}
		else
		{
			$indicatorStyle = '';
		}

		$result = $test_ssl_cert_validity->getResult();
		if ($result === '-' || $result < 1)
		{
			$resultText = GetMessage('BCL_MONITORING_NO_DATA');
		}
		else
		{
			$resultText = FormatDate('ddiff', time(), $result) . ' (' . FormatDate('SHORT', $result) . ')';
		}

		$html .= '<tr>';
		$html .= '<td width="50%" align="right">' . GetMessage('BCL_MONITORING_SSL') . '</td>';
		$html .= '<td align="left" ' . $indicatorStyle . '>' . $resultText . '</td>';
		$html .= '</tr>';
	}
	$html .= '</table>';
	$row->AddViewField('RESULT', $html);

	$lamp = '<span class="adm-lamp adm-lamp-in-list adm-lamp-' . ($isOK ? 'green' : 'red') . '"></span>';
	$row->AddViewField('DOMAIN', $lamp . ' ' . $converter->Decode($arRes['DOMAIN']));

	$arActions = [
		[
			'ICON' => 'edit',
			'DEFAULT' => true,
			'TEXT' => GetMessage('BCL_MONITORING_EDIT'),
			'ACTION' => $lAdmin->ActionRedirect('bitrixcloud_monitoring_edit.php?domain=' . urlencode($arRes['DOMAIN'])),
		],
		[
			'SEPARATOR' => 'Y',
		],
		[
			'ICON' => 'delete',
			'TEXT' => GetMessage('BCL_MONITORING_DELETE'),
			'ACTION' => "if(confirm('" . GetMessage('BCL_MONITORING_DELETE_CONF') . "')) " . $lAdmin->ActionDoGroup($arRes['DOMAIN'], 'delete'),
		],
	];
	$row->AddActions($arActions);
}

$localDomains = $monitoring->getConfiguredDomains();

if (empty($arResult) && empty($localDomains))
{
	$strError = GetMessage('BCL_MONITORING_NO_DOMAINS_CONFIGURED');
}

foreach ($arResult as $arRes)
{
	unset($localDomains[$arRes['DOMAIN']]);
}

if (!empty($localDomains))
{
	$aContext = [];
	foreach ($localDomains as $punyName => $domainName)
	{
		$aContext[] = [
			'TEXT' => htmlspecialcharsEx($domainName),
			'LINK' => 'bitrixcloud_monitoring_edit.php?lang=' . LANGUAGE_ID . '&domain=' . urlencode($punyName),
			'TITLE' => '',
		];
	}
	$aContext = [
		[
			'TEXT' => GetMessage('BCL_MONITORING_START'),
			'ICON' => 'btn_new',
			'TITLE' => '',
			'MENU' => $aContext,
		],
	];
	$lAdmin->AddAdminContextMenu($aContext, /*$bShowExcel=*/false);
}

$lAdmin->CheckListMode();
require_once $_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/prolog_admin_after.php';
if ($strError)
{
	CAdminMessage::ShowMessage($strError);
}

$lAdmin->DisplayList();
if (!empty($arNotes))
{
	echo BeginNote();
	foreach ($arNotes as $i => $note)
	{
		echo '<span class="required"><sup>' . ($i + 1) . '</sup></span>', $note, '<br>';
	}
	echo EndNote();
}
require_once $_SERVER['DOCUMENT_ROOT'] . '/bitrix/modules/main/include/epilog_admin.php';