<?
$module_id = "bizproc";
$bizprocPerms = $APPLICATION->GetGroupRight($module_id);
if ($bizprocPerms>="R") :

CModule::IncludeModule("bizproc");

IncludeModuleLangFile($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/options.php");
IncludeModuleLangFile(__FILE__);

$dbSites = CSite::GetList(($b = ""), ($o = ""), Array("ACTIVE" => "Y"));
$arSites = array();
$aSubTabs = array();
while ($site = $dbSites->Fetch())
{
	$site["ID"] = htmlspecialcharsbx($site["ID"]);
	$site["NAME"] = htmlspecialcharsbx($site["NAME"]);
	$arSites[] = $site;

	$aSubTabs[] = array("DIV" => "opt_site_".$site["ID"], "TAB" => "(".$site["ID"].") ".$site["NAME"], 'TITLE' => '');
}
$subTabControl = new CAdminViewTabControl("subTabControl", $aSubTabs);

if ($REQUEST_METHOD == "GET" && strlen($RestoreDefaults) > 0 && $bizprocPerms == "W" && check_bitrix_sessid())
{
	COption::RemoveOption("bizproc");
}

$arAllOptions = array(
	array("log_cleanup_days", GetMessage("BIZPROC_LOG_CLEANUP_DAYS"), "90", Array("text", 3)),
	array("log_skip_types", GetMessage("BIZPROC_LOG_SKIP_TYPES"), "1,2", Array("checkboxlist", array(
		1 => GetMessage("BIZPROC_LOG_SKIP_TYPES_1"),
		2 => GetMessage("BIZPROC_LOG_SKIP_TYPES_2"),
	))),
	array("limit_simultaneous_processes", GetMessage("BIZPROC_LIMIT_SIMULTANEOUS_PROCESSES"), "", Array("text", 3)),
	array("employee_compatible_mode", GetMessage("BIZPROC_EMPLOYEE_COMPATIBLE_MODE"), "N", Array("checkbox")),
//	array("name_template", GetMessage("BIZPROC_NAME_TEMPLATE"), "", Array("select", 35))
);

$strWarning = "";
if ($REQUEST_METHOD == "POST" && strlen($Update) > 0 && $bizprocPerms == "W" && check_bitrix_sessid())
{
	COption::SetOptionString("bizproc", "log_cleanup_days", $log_cleanup_days);
	if ($log_cleanup_days > 0)
		CAgent::AddAgent("CBPTrackingService::ClearOldAgent();", "bizproc", "N", 43200);
	else
		CAgent::RemoveAgent("CBPTrackingService::ClearOldAgent();", "bizproc");

	COption::SetOptionString("bizproc", "employee_compatible_mode", $employee_compatible_mode == "Y" ? "Y" : "N");
	COption::SetOptionString("bizproc", "limit_simultaneous_processes", $limit_simultaneous_processes ? $limit_simultaneous_processes : 0);
	COption::SetOptionString("bizproc", "log_skip_types", $log_skip_types ? implode(',', $log_skip_types) : "");

	\Bitrix\Main\Config\Option::set("bizproc", "use_gzip_compression", $_REQUEST["use_gzip_compression"]);
	\Bitrix\Main\Config\Option::set("bizproc", "locked_wi_path", $_REQUEST["locked_wi_path"]);

	CBPSchedulerService::setDelayMinLimit($_REQUEST["delay_min_limit"], $_REQUEST['delay_min_limit_type']);

	foreach($arSites as $site)
	{
		if (isset($_POST["name_template_".$site["LID"]]))
		{
			if (empty($_POST["name_template_".$site["LID"]]))
				COption::RemoveOption("bizproc", "name_template", $site["LID"]);
			else
				COption::SetOptionString("bizproc", "name_template", $_POST["name_template_".$site["LID"]], false, $site["LID"]);
		}
	}
}

if (strlen($strWarning) > 0)
	CAdminMessage::ShowMessage($strWarning);

$aTabs = array(
	array("DIV" => "edit1", "TAB" => GetMessage("BIZPROC_TAB_SET"), "ICON" => "", "TITLE" => GetMessage("BIZPROC_TAB_SET_ALT")),
);
$tabControl = new CAdminTabControl("tabControl", $aTabs);
$tabControl->Begin();
?>
<form method="POST" name="bizproc_opt_form" action="<?= $APPLICATION->GetCurPage() ?>?mid=<?= htmlspecialcharsbx($mid) ?>&lang=<?= LANGUAGE_ID ?>" ENCTYPE="multipart/form-data"><?
echo bitrix_sessid_post();
$tabControl->BeginNextTab();
?>
	<?for ($i = 0, $cnt = count($arAllOptions); $i < $cnt; $i++):
		$Option = $arAllOptions[$i];
		$val = COption::GetOptionString("bizproc", $Option[0], $Option[2]);
		$type = $Option[3];
		?>
		<tr>
			<td width="50%" valign="top"><?
				if ($type[0]=="checkbox")
					echo "<label for=\"".htmlspecialcharsbx($Option[0])."\">".$Option[1]."</label>";
				else
					echo $Option[1];
			?>:</td>
			<td width="50%" valign="top">
				<?if($type[0]=="checkbox"):?>
					<input type="checkbox" name="<?echo htmlspecialcharsbx($Option[0])?>" id="<?echo htmlspecialcharsbx($Option[0])?>" value="Y"<?if($val=="Y")echo" checked";?>>
				<?elseif($type[0]=="text"):?>
					<input type="text" size="<?echo $type[1]?>" value="<?echo htmlspecialcharsbx($val)?>" name="<?echo htmlspecialcharsbx($Option[0])?>">
				<?elseif($type[0]=="textarea"):?>
					<textarea rows="<?echo $type[1]?>" cols="<?echo $type[2]?>" name="<?echo htmlspecialcharsbx($Option[0])?>"><?echo htmlspecialcharsbx($val)?></textarea>
				<?elseif($type[0]=="checkboxlist"):?>
					<?
					$arVal = explode(',', $val);
					?>
					<?foreach ($type[1] as $k => $v):?>
						<input type="checkbox" name="<?echo htmlspecialcharsbx($Option[0])?>[]" id="<?echo htmlspecialcharsbx($Option[0].'_'.$k)?>" value="<?= $k ?>"<?if(in_array($k, $arVal))echo" checked";?>>
						<label for="<?= htmlspecialcharsbx($Option[0].'_'.$k) ?>"><?echo htmlspecialcharsbx($v)?></label><br>
					<?endforeach;?>
				<?endif?>
			</td>
		</tr>
	<?endfor;?>
		<tr>
			<td width="50%" valign="top"><?= GetMessage("BIZPROC_OPT_USE_GZIP_COMPRESSION") ?>:</td>
			<td width="50%" valign="top">
				<select name="use_gzip_compression">
					<?$useGZipCompression = \Bitrix\Main\Config\Option::get("bizproc", "use_gzip_compression", "");?>
					<option value="" <? if (empty($useGZipCompression)) echo "selected";  ?>><?= GetMessage("BIZPROC_OPT_USE_GZIP_COMPRESSION_EMPTY") ?></option>
					<option value="Y" <? if ($useGZipCompression == "Y") echo "selected";  ?>><?= GetMessage("BIZPROC_OPT_USE_GZIP_COMPRESSION_Y") ?></option>
					<option value="N" <? if ($useGZipCompression == "N") echo "selected";  ?>><?= GetMessage("BIZPROC_OPT_USE_GZIP_COMPRESSION_N") ?></option>
				</select>
			</td>
		</tr>
		<tr>
			<td width="50%" valign="top"><?= GetMessage("BIZPROC_OPT_LOCKED_WI_PATH") ?>:</td>
			<td width="50%" valign="top">
				<?$path = \Bitrix\Main\Config\Option::get("bizproc", "locked_wi_path", "/bizproc/bizproc/?type=is_locked");?>
				<input type="text" size="40" name="locked_wi_path" value="<?=htmlspecialcharsbx($path)?>">
			</td>
		</tr>
		<tr>
			<td width="50%" valign="top"><?= GetMessage("BIZPROC_OPT_TIME_LIMIT") ?>:</td>
			<td width="50%" valign="top">
				<?
					list($delayTime, $delayType) = CBPSchedulerService::getDelayMinLimit(true);
				?>
				<input type="text" name="delay_min_limit" value="<?=$delayTime?>" size="5" />
				<select name="delay_min_limit_type">
					<option value="s"<?= ($delayType == "s") ? " selected" : "" ?>><?= GetMessage("BIZPROC_OPT_TIME_LIMIT_S") ?></option>
					<option value="m"<?= ($delayType == "m") ? " selected" : "" ?>><?= GetMessage("BIZPROC_OPT_TIME_LIMIT_M") ?></option>
					<option value="h"<?= ($delayType == "h") ? " selected" : "" ?>><?= GetMessage("BIZPROC_OPT_TIME_LIMIT_H") ?></option>
					<option value="d"<?= ($delayType == "d") ? " selected" : "" ?>><?= GetMessage("BIZPROC_OPT_TIME_LIMIT_D") ?></option>
				</select>
			</td>
		</tr>
		<tr>
			<td valign="top" colspan="2" align="center">
			<?
				$subTabControl->Begin();
				foreach ($arSites as $site)
				{
					$subTabControl->BeginNextTab();
					$curVal = COption::GetOptionString("bizproc", "name_template", "", $site["LID"]);
						?>
						<label><?=GetMessage("BIZPROC_NAME_TEMPLATE")?></label>:
							<select name="name_template_<?php echo $site["LID"]?>">
								<?
								$arNameTemplates = CSite::GetNameTemplates();
								$arNameTemplates = array_reverse($arNameTemplates, true); //prepend array with default '' => Site Format value
								$arNameTemplates[""] = GetMessage("BIZPROC_OPTIONS_NAME_IN_SITE_FORMAT");
								$arNameTemplates = array_reverse($arNameTemplates, true); 
								foreach ($arNameTemplates as $template => $phrase)
								{
									$template = str_replace(array("#NOBR#","#/NOBR#"), array("",""), $template);
									?><option value="<?= $template?>" <?=(($template == $curVal) ? " selected" : "")?> ><?= $phrase?></option><?
								}
								?>
							</select>
						<?
				}
				$subTabControl->End();
			?>
		</td>
	</tr>
<?$tabControl->Buttons();?>
<script language="JavaScript">
function RestoreDefaults()
{
	if (confirm('<?echo AddSlashes(GetMessage("MAIN_HINT_RESTORE_DEFAULTS_WARNING"))?>'))
		window.location = "<?= $APPLICATION->GetCurPage() ?>?RestoreDefaults=Y&lang=<?= LANG ?>&mid=<?= urlencode($mid) ?>&<?= bitrix_sessid_get() ?>";
}
</script>

<input type="submit" class="adm-btn-save" <?if ($bizprocPerms < "W") echo "disabled" ?> name="Update" value="<?echo GetMessage("MAIN_SAVE")?>">
<input type="hidden" name="Update" value="Y">
<input type="reset" name="reset" value="<?echo GetMessage("MAIN_RESET")?>">
<input type="button" <?if ($bizprocPerms<"W") echo "disabled" ?> title="<?echo GetMessage("MAIN_HINT_RESTORE_DEFAULTS")?>" OnClick="RestoreDefaults();" value="<?echo GetMessage("MAIN_RESTORE_DEFAULTS")?>">
<?$tabControl->End();?>
</form>
<?endif;?>