%PDF-
%PDF-
Mini Shell
Mini Shell
<?php
define("STOP_STATISTICS", true);
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php");
/** @var CMain $APPLICATION */
$STAT_RIGHT = $APPLICATION->GetGroupRight("statistic");
if($STAT_RIGHT=="D")
$APPLICATION->AuthForm(GetMessage("ACCESS_DENIED"));
include($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/statistic/colors.php");
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/img.php");
$width = intval($_GET["width"]);
$max_width = COption::GetOptionInt("statistic", "GRAPH_WEIGHT");
if($width <= 0 || $width > $max_width)
$width = $max_width;
$height = intval($_GET["height"]);
$max_height = COption::GetOptionInt("statistic", "GRAPH_HEIGHT");
if($height <= 0 || $height > $max_height)
$height = $max_height;
$max_grid = isset($_GET["max_grid"]) && !is_array($_GET["max_grid"]) ? intval($_GET["max_grid"]) : 15;
$min_grid = isset($_GET["min_grid"]) && !is_array($_GET["min_grid"]) ? intval($_GET["min_grid"]) : 10;
// create image canvas
$ImageHandle = CreateImageHandle($width, $height, "FFFFFF", true);
$colorFFFFFF = imagecolorallocate($ImageHandle,255,255,255);
imagefill($ImageHandle, 0, 0, $colorFFFFFF);
$arrX=Array();
$arrY=Array();
$arrayX=Array();
$arrayY=Array();
$M['WEEKDAY_0'] = "Sun";
$M['WEEKDAY_1'] = "Mon";
$M['WEEKDAY_2'] = "Tue";
$M['WEEKDAY_3'] = "Wed";
$M['WEEKDAY_4'] = "Thu";
$M['WEEKDAY_5'] = "Fri";
$M['WEEKDAY_6'] = "Sat";
$M['MONTH_1'] = "Jan";
$M['MONTH_2'] = "Feb";
$M['MONTH_3'] = "Mar";
$M['MONTH_4'] = "Apr";
$M['MONTH_5'] = "May";
$M['MONTH_6'] = "June";
$M['MONTH_7'] = "Jule";
$M['MONTH_8'] = "Aug";
$M['MONTH_9'] = "Sep";
$M['MONTH_10'] = "Oct";
$M['MONTH_11'] = "Nov";
$M['MONTH_12'] = "Dec";
/******************************************************
Plot data
*******************************************************/
$find_site_id = array();
if(isset($_REQUEST["find_site_id"]))
{
if(is_array($_REQUEST["find_site_id"]))
$find_site_id = $_REQUEST["find_site_id"];
else
$find_site_id = array($_REQUEST["find_site_id"]);
}
foreach($find_site_id as $k=>$v)
{
$v = trim($v);
if(strlen($v) <= 0)
unset($find_site_id[$k]);
else
$find_site_id[$k] = $v;
}
$site_filtered = !empty($find_site_id);
$arFilter = Array(
"DATE1" => $find_date1,
"DATE2" => $find_date2,
"SITE_ID" => $find_site_id
);
$arrTTF_FONT = array();
if ($find_graph_type!="date")
{
$rs = CTraffic::GetSumList($find_graph_type, $arFilter);
$ar = $rs->Fetch();
switch ($find_graph_type)
{
case "hour":
$start = 0; $end = 23; break;
case "weekday":
$start = 0; $end = 6;
if(LANGUAGE_ID != "en")
$arrTTF_FONT = array(
"X" => array(
"FONT_PATH" => "/bitrix/modules/statistic/ttf/verdana.ttf",
"FONT_SIZE" => 8,
"FONT_SHIFT" => 12,
),
);
break;
case "month":
$start = 1; $end = 12;
if(LANGUAGE_ID != "en")
$arrTTF_FONT = array(
"X" => array(
"FONT_PATH" => "/bitrix/modules/statistic/ttf/verdana.ttf",
"FONT_SIZE" => 8,
"FONT_SHIFT" => 12,
),
);
break;
}
$arColors = array();
if($find_hit == "Y")
$arColors[] = array($arrColor["HITS"]);
if($find_host == "Y")
$arColors[] = array($arrColor["HOSTS"]);
if($find_session == "Y")
$arColors[] = array($arrColor["SESSIONS"]);
if($find_event == "Y")
$arColors[] = array($arrColor["EVENTS"]);
if(!$site_filtered)
{
if($find_guest == "Y")
$arColors[] = array($arrColor["GUESTS"]);
if($find_new_guest == "Y")
$arColors[] = array($arrColor["NEW_GUESTS"]);
}
$dtu = ToUpper($find_graph_type);
$arData = array();
$arrY = array();
$arrX = array();
for ($i=$start; $i<=$end; $i++)
{
$arRec = array();
if($find_hit == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_HIT_".$i];
if($find_host == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_HOST_".$i];
if($find_session == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_SESSION_".$i];
if($find_event == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_EVENT_".$i];
if(!$site_filtered)
{
if($find_guest == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_GUEST_".$i];
if($find_new_guest == "Y")
$arrY[] = $arRec[] = $ar[$dtu."_NEW_GUEST_".$i];
}
if($find_graph_type == "hour")
$val = $i;
elseif(LANGUAGE_ID=="ru" && function_exists("ImageTTFText"))
$val = GetMessage("STAT_".$dtu."_".$i."_S");
else
$val = $M[$dtu."_".$i];
$arData[$val] = array(
"DATA" => $arRec,
"COLORS" => $arColors,
);
$arrX[] = $val;
}
$arrY = GetArrayY($arrY, $MinY, $MaxY);
$arrTTF_FONT["type"] = "bar";
$gridInfo = DrawCoordinatGrid($arrX, $arrY, $width, $height, $ImageHandle, "FFFFFF", "B1B1B1", "000000", 15, 2, $arrTTF_FONT);
/******************************************************
data plot
*******************************************************/
if(is_array($gridInfo))
Bar_Diagram($ImageHandle, $arData, $MinY, $MaxY, $gridInfo);
}
else
{
$rsDays = CTraffic::GetDailyList(($by="s_date"), ($order="asc"), $v1, $arFilter, $v2);
while($arData = $rsDays->Fetch())
{
$date = mktime(0, 0, 0, $arData["MONTH"], $arData["DAY"], $arData["YEAR"]);
$date_tmp = 0;
// when dates come not in order
$next_date = AddTime($prev_date, 1, "D");
if(($date > $next_date) && (intval($prev_date) > 0))
{
// fill date gaps
$date_tmp = $next_date;
while($date_tmp < $date)
{
$arrX[] = $date_tmp;
if ($find_hit=="Y") $arrY_hit[] = 0;
if ($find_host=="Y") $arrY_host[] = 0;
if ($find_session=="Y") $arrY_session[] = 0;
if ($find_event=="Y") $arrY_event[] = 0;
if (!$site_filtered)
{
if ($find_guest=="Y") $arrY_guest[] = 0;
if ($find_new_guest=="Y") $arrY_new_guest[] = 0;
}
$date_tmp = AddTime($date_tmp,1,"D");
}
}
$arrX[] = $date;
if ($find_hit=="Y") $arrY_hit[] = intval($arData["HITS"]);
if ($find_host=="Y") $arrY_host[] = intval($arData["C_HOSTS"]);
if ($find_session=="Y") $arrY_session[] = intval($arData["SESSIONS"]);
if ($find_event=="Y") $arrY_event[] = intval($arData["C_EVENTS"]);
if (!$site_filtered)
{
if ($find_guest=="Y") $arrY_guest[] = intval($arData["GUESTS"]);
if ($find_new_guest=="Y") $arrY_new_guest[] = intval($arData["NEW_GUESTS"]);
}
$prev_date = $date;
}
/******************************************************
axis X
*******************************************************/
$arrayX = GetArrayX($arrX, $MinX, $MaxX, $max_grid, $min_grid);
/******************************************************
axis Y
*******************************************************/
$arrY = array();
if ($find_hit=="Y") $arrY = array_merge($arrY,$arrY_hit);
if ($find_host=="Y") $arrY = array_merge($arrY,$arrY_host);
if ($find_session=="Y") $arrY = array_merge($arrY,$arrY_session);
if ($find_event=="Y") $arrY = array_merge($arrY,$arrY_event);
if (!$site_filtered)
{
if ($find_guest=="Y") $arrY = array_merge($arrY,$arrY_guest);
if ($find_new_guest=="Y") $arrY = array_merge($arrY,$arrY_new_guest);
}
$arrayY = GetArrayY($arrY, $MinY, $MaxY);
DrawCoordinatGrid($arrayX, $arrayY, $width, $height, $ImageHandle, "FFFFFF", "B1B1B1", "000000", 15, 2, $arrTTF_FONT);
/******************************************************
data plot
*******************************************************/
if ($find_hit=="Y")
Graf($arrX, $arrY_hit, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["HITS"], "N");
if ($find_host=="Y")
Graf($arrX, $arrY_host, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["HOSTS"], "N");
if ($find_session=="Y")
Graf($arrX, $arrY_session, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["SESSIONS"], "N");
if ($find_event=="Y")
Graf($arrX, $arrY_event, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["EVENTS"], "N");
if (!$site_filtered)
{
if ($find_guest=="Y")
Graf($arrX, $arrY_guest, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["GUESTS"], "N");
if ($find_new_guest=="Y")
Graf($arrX, $arrY_new_guest, $ImageHandle, $MinX, $MaxX, $MinY, $MaxY, $arrColor["NEW_GUESTS"], "N");
}
}
/******************************************************
send image to client
*******************************************************/
ShowImageHeader($ImageHandle);
Zerion Mini Shell 1.0