use Bitrix\Main\Loader; define("ADMIN_MODULE_NAME", "perfmon"); define("PERFMON_STOP", true); require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php"); /** @global CMain $APPLICATION */ /** @global CDatabase $DB */ /** @global CUser $USER */ Loader::includeModule('perfmon'); require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/perfmon/prolog.php"); IncludeModuleLangFile(__FILE__); $RIGHT = $APPLICATION->GetGroupRight("perfmon"); if (!$USER->IsAdmin() || ($RIGHT < "W")) $APPLICATION->AuthForm(GetMessage("ACCESS_DENIED")); if ( $_SERVER["REQUEST_METHOD"] == "POST" && ($_REQUEST["activity"] != "") && check_bitrix_sessid() ) { if (array_key_exists("ACTIVE", $_REQUEST)) { $ACTIVE = intval($_REQUEST["ACTIVE"]); CPerfomanceKeeper::SetActive($ACTIVE > 0, time() + $ACTIVE); } LocalRedirect("/bitrix/admin/perfmon_activity.php?lang=".LANGU); } $APPLICATION->SetTitle(GetMessage("PERFMON_ACTIVITY_TITLE")); require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php"); $interval = COption::GetOptionInt("perfmon", "end_time") - time(); if ($interval <= 0) { CPerfomanceKeeper::SetActive(false); $ACTIVE = false; } else { $ACTIVE = CPerfomanceKeeper::IsActive(); } ?>