Your IP : 172.28.240.42
<?
define("ADMIN_MODULE_NAME", "perfmon");
define("PERFMON_STOP", true);
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php");
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/perfmon/include.php");
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/perfmon/prolog.php");
IncludeModuleLangFile(__FILE__);
$obTable = new CPerfomanceTable;
$obTable->Init($table_name);
$RIGHT = $APPLICATION->GetGroupRight("perfmon");
if($RIGHT=="D" || !$obTable->IsExists() || (COption::GetOptionString("perfmon", "table_browser")!="Y"))
$APPLICATION->AuthForm(GetMessage("ACCESS_DENIED"));
$arFields = $obTable->GetTableFields();
$sTableID = "tbl_perfmon_table".md5($table_name);
$oSort = new CAdminSorting($sTableID, "ID", "asc");
$lAdmin = new CAdminList($sTableID, $oSort);
$FilterArr = array(
"find",
"find_type",
);
foreach($arFields as $FIELD_NAME=>$FIELD_TYPE)
{
if($FIELD_TYPE!="unknown")
$FilterArr[] = $FIELD_NAME;
}
$lAdmin->InitFilter($FilterArr);
$arFilter = array();
foreach($arFields as $FIELD_NAME=>$FIELD_TYPE)
{
if($FIELD_TYPE!="unknown")
$arFilter[$FIELD_NAME] = $find_type==$FIELD_NAME && strlen($find) > 0? $find: $_REQUEST["find_".$FIELD_NAME];
}
foreach($arFilter as $key=>$value)
if(!$value)
unset($arFilter[$key]);
$arHeaders = array();
foreach($arFields as $FIELD_NAME=>$FIELD_TYPE)
{
$arHeaders[$FIELD_NAME] = array(
"id" => $FIELD_NAME,
"content" => $FIELD_NAME,
"sort" => $FIELD_NAME,
"default" => true,
);
if($FIELD_TYPE=="int" || $FIELD_TYPE=="datetime" || $FIELD_TYPE=="double")
$arHeaders[$FIELD_NAME]["align"] = "right";
}
$lAdmin->AddHeaders($arHeaders);
$arSelectedFields = $lAdmin->GetVisibleHeaderColumns();
if(!is_array($arSelectedFields) || (count($arSelectedFields) < 1))
$arSelectedFields = array(
"*",
);
$rsData = $obTable->GetList($arSelectedFields, $arFilter, array($by => $order), Array("nPageSize"=>CAdminResult::GetNavSize($sTableID)));
$rsData = new CAdminResult($rsData, $sTableID);
$rsData->NavStart();
$lAdmin->NavText($rsData->GetNavPrint(GetMessage("PERFMON_TABLE_PAGE")));
$max_display_url = COption::GetOptionInt("perfmon", "max_display_url");
while($arRes = $rsData->NavNext(true, "f_")):
$row =& $lAdmin->AddRow($f_ID, $arRes);
foreach($arFields as $FIELD_NAME => $FIELD_TYPE)
{
if(strlen($arRes[$FIELD_NAME]) > 0)
{
if($FIELD_TYPE=="int")
{
if($_REQUEST["mode"] == "excel")
$row->AddViewField($FIELD_NAME, number_format($arRes[$FIELD_NAME], 0, "", ""));
else
$row->AddViewField($FIELD_NAME, str_replace(" ", " ", number_format($arRes[$FIELD_NAME], 0, "", " ")));
}
elseif($FIELD_TYPE=="double")
{
if($_REQUEST["mode"] == "excel")
$row->AddViewField($FIELD_NAME, number_format($arRes[$FIELD_NAME], 2, ".", ""));
else
$row->AddViewField($FIELD_NAME, str_replace(" ", " ", number_format($arRes[$FIELD_NAME], 2, ".", " ")));
}
elseif($FIELD_TYPE=="datetime")
$row->AddViewField($FIELD_NAME, str_replace(" ", " ", $arRes["FULL_".$FIELD_NAME]));
else
$row->AddViewField($FIELD_NAME, htmlspecialchars($arRes[$FIELD_NAME]));
}
}
endwhile;
$lAdmin->AddFooter(
array(
array("title"=>GetMessage("MAIN_ADMIN_LIST_SELECTED"), "value"=>$rsData->SelectedRowsCount()),
)
);
$aContext = array(
);
$sLastTables = CUserOptions::GetOption("perfmon", "last_tables", "");
if(strlen($sLastTables) > 0)
$arLastTables = array_flip(explode(",", $sLastTables));
else
$arLastTables = array();
unset($arLastTables[$table_name]);
$arLastTables[$table_name] = true;
if(count($arLastTables) > 10)
array_shift($arLastTables);
CUserOptions::SetOption("perfmon", "last_tables", implode(",", array_keys($arLastTables)));
unset($arLastTables[$table_name]);
if(count($arLastTables) > 0)
{
$ar = array(
"TEXT" => GetMessage("PERFMON_TABLE_RECENTLY_BROWSED", array("#COUNT#" => count($arLastTables))),
"MENU" => array(),
);
ksort($arLastTables);
foreach($arLastTables as $table => $flag)
{
$ar["MENU"][] = array(
"TEXT" => $table,
"ACTION" => $lAdmin->ActionRedirect("perfmon_table.php?table_name=".$table),
);
}
$aContext[] = $ar;
}
$lAdmin->AddAdminContextMenu($aContext);
$lAdmin->CheckListMode();
$APPLICATION->SetTitle(GetMessage("PERFMON_TABLE_TITLE"));
require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");
$arFilter = array();
foreach($arFields as $FIELD_NAME => $FIELD_TYPE)
if($FIELD_TYPE!="unknown")
$arFilter[$FIELD_NAME] = $FIELD_NAME;
$oFilter = new CAdminFilter($sTableID."_filter", $arFilter);
?>
<form name="find_form" method="get" action="<?echo $APPLICATION->GetCurPage();?>">
<input type="hidden" value="<?echo htmlspecialchars($table_name)?>" name="table_name">
<?$oFilter->Begin();?>
<tr>
<td><b><?=GetMessage("PERFMON_TABLE_FIND")?>:</b></td>
<td>
<input type="text" size="25" name="find" value="<?echo htmlspecialchars($find)?>" title="<?=GetMessage("PERFMON_TABLE_FIND")?>">
<?
$arr = array(
"reference" => array_keys($arFilter),
"reference_id" => array_keys($arFilter),
);
echo SelectBoxFromArray("find_type", $arr, $find_type, "", "");
?>
</td>
</tr>
<?foreach($arFields as $FIELD_NAME => $FIELD_TYPE):?>
<?if($FIELD_TYPE!="unknown"):?>
<tr>
<td><?echo htmlspecialchars($FIELD_NAME)?></td>
<td><input type="text" name="find_<?echo htmlspecialchars($FIELD_NAME)?>" size="47" value="<?echo htmlspecialchars(${"find_".$FIELD_NAME})?>"></td>
</tr>
<?endif?>
<?endforeach?>
<?
$oFilter->Buttons(array("table_id"=>$sTableID, "url"=>$APPLICATION->GetCurPage(), "form"=>"find_form"));
$oFilter->End();
?>
</form>
<?$lAdmin->DisplayList();?>
<?require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/epilog_admin.php");?>